remove-whitespace ( seq -- newseq )

Vocabulary

modern.html

Inputs

seq

an object

Outputs

newseq

an object

Definition

USING: combinators.short-circuit kernel sequences strings
unicode ;

IN: modern.html

: remove-whitespace ( seq -- newseq )
    [ { [ string? not ] [ [ blank? ] all? not ] } 1|| ] filter ;