BaseAddress * &8000

 LEADR BaseAddress

 GET $.ALib.BCPLMacs

RootStackSize * &1000 ; an unreasonably large amount

realarm  * 1
lispmode * 0
StackDirn * 1

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

 LNK a.mclibr
