 LEADR &1000

 GET $.ALib.BCPLMacsB

RootStackSize * &1000 ; an unreasonably large amount

Kreadl	 * 14  ; different between emulator & u-K
realarm  * 1
lispmode * 0
StackDirn * -1

; description of stack-frame linkage
frrb * 0
frrp * 4
frrl * 8
frpc * 12

 LNK mclibr
