Remove vowels from a string: Difference between revisions
Content added Content deleted
Line 711: | Line 711: | ||
?DO |
?DO |
||
I C@ DUP VOWELS VALIDATE |
I C@ DUP VOWELS VALIDATE |
||
IF DROP \ don't need vowels |
|||
ELSE |
ELSE PAD, \ compile char & incr. byte count |
||
THEN |
THEN |
||
LOOP |
LOOP |