$ od -c -N 50000 [eris]<LispCore>bcpl>BcplEnv.dm!1>Stack.br
0000000  002 002 002   S  \0  \0  \0 017  \0  \0  \0 257  \0  \0  \0 302
0000020   \0  \0 002   ;  \0  \0 002   R  \0  \0  \0  \0  \0  \0  \0 026
0000040   \0   @  \0 001 017   N   X   T   U   S   E   D   S   T   K   B
0000060    L   O   C   K  \0   @  \0 002  \r   C   O   N   T   E   X   T
0000100    S   W   I   T   C   H  \0   @  \0 003  \r   S   t   a   c   k
0000120    O   v   e   r   f   l   o   w  \0   @  \0 004 006   G   e   t
0000140    F   X   P  \0  \0   A  \0 005 006   S   e   t   F   X   P  \0
0000160   \0   P  \0 006 006   B   i   C   a   l   l  \0  \0   @  \0  \a
0000200   \r   G   e   t   S   t   k   B   l   k   T   y   p   e  \0   A
0000220   \0  \b  \r   S   e   t   S   t   k   B   l   k   T   y   p   e
0000240   \0  \0  \0  \0  \b   R   A   I   D   C   o   d   e  \0  \0  \0
0000260   \0  \0  \n   S   m   a   l   l   U   n   b   o   x  \0  \0 020
0000300   \0  \0  \b   S   G   e   t   B   a   s   e  \0  \0  \0  \0  \0
0000320  003   U   s   c  \0 020  \0  \0  \b   S   P   u   t   B   a   s
0000340    e  \0  \0  \0  \0  \0  \n   M   k   S   m   a   l   l   P   o
0000360    s  \0  \0  \0  \0  \0  \b   I   G   e   t   B   a   s   e  \0
0000400   \0  \0  \0  \0  \b   I   P   u   t   B   a   s   e  \0  \0 020
0000420   \0  \0  \n   A   P   u   t   B   a   s   e   3   2  \0  \0 020
0000440   \0  \0 017   I   n   t   e   r   r   u   p   t   E   n   a   b
0000460    l   e  \0 020  \0  \0 004   l   v   K   T  \0  \0   a  \0  \t
0000500  002   l   p  \0  \0  \0  \0  \0  \b   C   a   l   l   S   w   a
0000520    t  \0  \0  \0  \0  \0 006   C   a   l   l   F   n  \0  \0  \t
0000540   \0 001  \0 001  \0 002  \0   a  \0 003  \0 213  \0 004  \0 237
0000560   \0 005  \0 250  \0 006  \0 261  \0  \a 001   `  \0  \b 001   j
0000600   \0 024  \0 344 001   x 001   x   Z 001  \f 370  \0  \r  \f 367
0000620   \t  \r 027   C   a   l   l       t   o       N   X   T   U   S
0000640    E   D   S   T   K   B   L   O   C   K 342  \0   i   F  \0 001
0000660    " 004   i   D  \0 001   B 005 375  \0   Z 006   " 005   9   C
0000700  346  \0  \f  \0  \0 001   B 005   " 005   i   b  \0 001   9   a
0000720  345  \f 001  \a   " 006   )   ^   i   ^  \0 002 201   K 001 002
0000740  001   .   " 005 203  \0  \f 022  \0 001   B  \a   "  \a   )   T
0000760    i   R  \0 002 201   K 001 030   9   P   Z  \b   " 005 203  \0
0001000    *  \b  \f  \0  \0 002   " 005   :  \b 346  \0   B 005   " 005
0001020    )   X   i   X  \0 002   " 005 203  \0   *  \a   :  \b 355  \0
0001040   \f 017  \0 002 001  \f   " 006   :  \a 346  \0   B 006   " 005
0001060    :  \a 346  \0   B 005 001 311  \0  \0  \0  \0   " 005   i   K
0001100   \0 001 001 002  \0 004  \f 366   Z 001  \f 370  \0  \f  \f 367
0001120    " 004   i 364  \0 001   B 005   " 005   i   k  \0 001   B 006
0001140    : 005   Z  \b 205  \0   i   e  \0 001 212  \0   "  \b   i   b
0001160   \0 002 205  \0   * 006   i   ^  \0 002   " 005   9   \ 345  \f
0001200  001 005      \0   (  \0  \f  \0  \0 002   " 004 001  \a  \0  \0
0001220  240  \0  \0 310  \0  \0 001  \0  \0 376  \f 366   Z 001  \f 370
0001240   \0  \b  \f 367  \t  \n 020   S   t   a   c   k       o   v   f
0001260    l   w       p   u   n   t  \0 342  \0   i 277  \0 001  \f 366
0001300  340  \0  \0  \0   Z 001  \f 370  \0  \a  \f 367 205  \0   i   1
0001320   \0 001  \f 366  \0  \0   Z 001  \f 370  \0  \t  \f 367 205  \0
0001340    * 004   i   (  \0 002  \f 366   Z 001  \f 370  \0 020  \f 367
0001360    i   a  \0  \0   B 005   : 005   Z  \a   " 005  \f 213  \0 001
0001400    )   Z  \f 340 212  \0   "  \a  \f   t  \0 002   " 005   9 233
0001420  346  \0  \f  \v  \0 001   B 006   " 006 203  \0  \f 005  \0 001
0001440    B  \a   " 006   i 265  \0 001   9 264 345  \r 001 021 001 004
0001460   \0  \0  \0  \0  \0 003  \t  \t 017   N   o       C   a   l   l
0001500    F   n       s   p   a   c   e 342  \0   i   <  \0 001 001   5
0001520    " 006   9   9 346  \0   ) 235   i 265  \0 002   " 006   9   3
0001540  346  \0 203  \0   *  \a   9   / 355  \0  \f   1  \0 002 001   9
0001560  001   8   " 006   :  \a 346  \0   B  \b   "  \b   i 211  \0 001
0001600    9 210 345  \r 001  \r  \t  \t 017   N   o       C   a   l   l
0001620    F   n       s   p   a   c   e 342  \0   i 024  \0 001   :  \a
0001640    Z  \t   "  \b 203  \0  \f   E  \0 001   *  \t 216  \0   J  \a
0001660    i  \r  \0  \0 004  \0 001 025   "  \a   ) 005   i  \b  \0 002
0001700  001  \a  \0  \0  \0 004  \f 355  \0  \f  \0  \0  \0 207  \f 351
0001720   \0 003  \0 001 377 276  \0  \0 377 314 377 377 377 313 001 001
0001740    " 005   9 361 346  \0   * 006   9 356 356  \0  \f   A  \0 002
0001760    " 006 255  \0  \f 004  \0 002   " 006 203  \0   * 004  \f 005
0002000   \0 002   " 006   9   4 346  \0   )   3  \f 006  \0 002   " 006
0002020    9 222 346  \0 255  \0  \f 006  \0 002   !   + 306  \0   B  \b
0002040    "  \b 375   P 347  \0 202  \r 001 004   "  \b 203  \0   B  \b
0002060  205  \0   :  \b   C  \0   " 004   :  \b   C 001 205  \0   *  \b
0002100    i 031  \0 002  \f 366   Z 001  \f 370  \0  \b  \f 367   " 004
0002120   \f   U  \0 001   9 020 347  \0  \f 366   Z 001  \f 370  \0  \n
0002140   \f 367   " 004   * 005  \f   (  \0 002  \f 366  \0 002  \0 016
0002160   \0  \r  \0  \0 340  \0  \0 026  \0  \0  \0  \0  \0  \0 001 026
0002200   \0  \0  \0  \0  \0 204  \0 236  \0   Y  \0   Z 201   e 001   #
0002220  201   p  \0 247  \0 325  \0 326 200 200 200   ~ 200 177 001   "
0002240  001 036 001   v  \0  \0                                        
0002246