assigned-locals ( ast -- seq )

Vocabulary

smalltalk.compiler.assignment

Inputs

ast

an object

Outputs

seq

an object

Definition

IN: smalltalk.compiler.assignment

GENERIC: assigned-locals ( ast -- seq )

Methods

USING: arrays sequences smalltalk.compiler.assignment ;

M: array assigned-locals [ assigned-locals ] map concat ;


USING: accessors arrays kernel sequences smalltalk.ast
smalltalk.compiler.assignment ;

M: ast-assignment assigned-locals
    [ name>> dup ast-name? [ name>> 1array ] [ drop { } ] if ]
    [ value>> assigned-locals ] bi append ;


USING: accessors kernel sets smalltalk.ast
smalltalk.compiler.assignment ;

M: ast-block assigned-locals
    [ body>> assigned-locals ] [ arguments>> ] bi diff ;


USING: accessors kernel sequences smalltalk.ast
smalltalk.compiler.assignment ;

M: ast-cascade assigned-locals
    [ receiver>> assigned-locals ]
    [ messages>> assigned-locals ] bi append ;


USING: accessors kernel sequences smalltalk.ast
smalltalk.compiler.assignment ;

M: ast-message-send assigned-locals
    [ receiver>> assigned-locals ]
    [ arguments>> assigned-locals ] bi append ;


USING: accessors smalltalk.ast smalltalk.compiler.assignment ;

M: ast-message assigned-locals arguments>> assigned-locals ;


USING: accessors smalltalk.ast smalltalk.compiler.assignment ;

M: ast-return assigned-locals value>> assigned-locals ;


USING: accessors smalltalk.ast smalltalk.compiler.assignment ;

M: ast-sequence assigned-locals body>> assigned-locals ;


USING: kernel smalltalk.compiler.assignment ;

M: object assigned-locals drop f ;