// CopyDiskBoot.bcpl - stuff for the boot file version
// Copyright Xerox Corporation 1979, 1980
// Last modified April 13, 1980  7:11 PM by Boggs

external
[
// outgoing procedures
BootRunInit

// outgoing statics
bootflag; comCm
]

static
[
bootflag = true
comCm = 0
]

//----------------------------------------------------------------------------
let BootRunInit() be [ ]
//----------------------------------------------------------------------------