identifier-middle? ( ch -- bool )

Vocabulary

fjsc

Inputs

ch

an object

Outputs

bool

an object

Definition

USING: ascii combinators.short-circuit kernel sequences ;

IN: fjsc

: identifier-middle? ( ch -- bool )
    { [ blank? not ] [ "}];\"" member? not ] [ digit? not ] }
    1&& ;