(declaim (optimize speed (safety 1))) (defun example/add (a b) (declare ((unsigned-byte 16) a b)) (+ a b)) (describe #'example/add) (disassemble #'example/add)
Standard input is empty
#<FUNCTION EXAMPLE/ADD> [compiled function] Lambda-list: (A B) Derived type: (FUNCTION (#1=(UNSIGNED-BYTE 16) #1#) (VALUES (MOD 131071) &OPTIONAL)) ; disassembly for EXAMPLE/ADD ; Size: 11 bytes. Origin: #x226AFB3B ; 3B: 4801FA ADD RDX, RDI ; no-arg-parsing entry point ; 3E: 488BE5 MOV RSP, RBP ; 41: F8 CLC ; 42: 5D POP RBP ; 43: C3 RET ; 44: CC10 BREAK 16 ; Invalid argument count trap