add-binary-literal ( obj -- label )

Vocabulary

compiler.codegen.labels

Inputs

obj

an object

Outputs

label

an object

Definition

USING: arrays kernel namespaces sequences ;

IN: compiler.codegen.labels

: add-binary-literal ( obj -- label )
    <label> [ 2array binary-literal-table get push ] keep ;