?lookup-word ( name vocab -- word )

Vocabulary

cpu.arm.64.assembler.opcodes

Inputs

name	an object
vocab	an object

Outputs

word

an object

Definition

USING: kernel sequences words ;

IN: cpu.arm.64.assembler.opcodes

: ?lookup-word ( name vocab -- word )
    2dup lookup-word
    [ 2nip ] [
        over [ "01x" member? ] all?
        [ drop make-integer-literal ] [ no-field-word ] if
    ] if* ;