Plaster

text
(emit (make-instance 'arm64-instruction :opcode 'lap:ldr :operands (list temp (ash (logxor (1- (ash 1 sys.int::+object-type-size+)) sys.int::+object-tag-instance+ sys.int::+object-tag-funcallable-instance+) sys.int::+object-type-shift+)) :inputs () :outputs (list temp)))