* HERE-WORD ( char "name" -- ) a FIG-compatible WORD. Where ANSI says "skip leading delimiters" this one acts as "skip leading whitespace". And it will not return anything and have the string parsed to HERE
HERE-WORD
( char "name" -- )
HERE
EXTENSIONS your ordinary primitive