SINGLETONS-UNION:

Vocabulary

opencl.syntax

Inputs

parsed

an object

Outputs

parsed

an object

Definition

USING: classes.parser classes.singleton classes.union kernel
lexer sequences ;

IN: opencl.syntax

SYNTAX: SINGLETONS-UNION:
    scan-new-class ";" parse-tokens
    [ create-class-in [ define-singleton-class ] keep ] map
    define-union-class ;