fork download
copy 
  1. (declaim (optimize speed (safety 1)))
  2.  
  3. (defun example/add (a b)
  4.   (declare ((unsigned-byte 16) a b))
  5.   (+ a b))
  6.  
  7. (describe #'example/add)
  8. (disassemble #'example/add)
Success #stdin #stdout 0.03s 33644KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
#<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
https://ideone.com/db8O0e
language:
Common Lisp (sbcl 1.4.16)
created:
7 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!