4 lines
101 B
Factor
4 lines
101 B
Factor
|
USE: sequences.extras
|
||
|
|
: strip-comments ( str -- str' )
|
||
|
|
[ "#;" member? not ] take-while "" like ;
|