parse-struct-slots ( slots -- slots' more? )

Vocabulary

classes.struct.private

Inputs

slots

an object

Outputs

slots'	an object
more?	an object

Definition

USING: classes.struct combinators lexer sequences ;

IN: classes.struct.private

: parse-struct-slots ( slots -- slots' more? )
    scan-token {
        { ";" [ f ] }
        { "{" [ parse-struct-slot suffix! t ] }
        [ invalid-struct-slot ]
    } case ;