CL-USER> (declaim (optimize (speed 3) (safety 0)))
NIL
CL-USER> (disassemble (lambda (arr off) (aref (the simple-vector arr) off)))
; disassembly for (LAMBDA (ARR OFF))
; Size: 11 bytes. Origin: #x1002920DA9
; A9:       488B54B801       MOV RDX, [RAX+RDI*4+1]           ; no-arg-parsing entry point
; AE:       488BE5           MOV RSP, RBP
; B1:       F8               CLC
; B2:       5D               POP RBP
; B3:       C3               RET
NIL
CL-USER>