REDUCE

26.8 Disassembler

For most implementations of PSL, a disassembler for compiled functions is available which gives insight into the ’real’ code. It is a tool for code optimization only and not meant to give insight for the ’normal’ LISP user.
Example:

(load disassemble)  
NIL  
(disassemble 'get)  
( ⋆⋆ Function  GET  at 16#36110)  
 
00036110    9DE3BFA0    save       r14,-x'60,r14  
00036114    3B3E0000    sethi      -x'20000,r29  
00036118    21360002    sethi      -x'9FFFE,r16             Alloc 2  
0003611C    A2100002    or         r0,r2,r17                (frame 1)  
00036120    9930601B    srl        r1,x'1B,r12  
00036124    80A3201E    subcc      r12,x'1E,r0  
00036128    32800007    bne,a      L0003  
0003612C    82100006    or         r0,r6,r1  
00036130    9930A01B    srl        r2,x'1B,r12  
00036134    80A3201E    subcc      r12,x'1E,r0  
00036138    22800005    be,a       L0004  
0003613C    88100006    or         r0,r6,r4  
00036140    82100006    or         r0,r6,r1  
                    L0003:  
00036144    81C7E008    jmpl       r31+8,r0  
00036148    81E82000    restore    r0,0,r0  
 
              ... etc ...