trim-head-slice ( string -- string )

Vocabulary

parser-combinators

Inputs

string

an object

Outputs

string

an object

Definition

USING: kernel sequences unicode ;

IN: parser-combinators

: trim-head-slice ( string -- string )
    dup empty?
    [ dup first blank? [ rest-slice trim-head-slice ] when ]
    unless ;