// PupTestBoot.bcpl -- ground out some undefs
// Copyright Xerox Corporation 1979
// Last modified January 6, 1979  4:36 PM by Boggs

external
[
//outgoing procedures
InitAltoComProc; InitAltoEIA

//outgoing statics
eiaMcLoaded; cpMcLoaded; PupTestCPMc
]

static [ eiaMcLoaded; cpMcLoaded; PupTestCPMc ]

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

//----------------------------------------------------------------------------
and InitAltoEIA() be [ ]
//----------------------------------------------------------------------------