// DiskStreamsOEP.bcpl
// Copyright Xerox Corporation 1979
// Last modified October 7, 1977  6:34 PM by Boggs

external
[
//outgoing procedures
InitDiskStreamsOEP

//incoming procedures
DeclareOEP; AccessError; KsHandleBfsError; CreateDiskStream
ResetDiskStream; CloseDiskStream; FixupDiskStream
]

//---------------------------------------------------------------------------
let InitDiskStreamsOEP(oepVec) be
//---------------------------------------------------------------------------
   DeclareOEP(oepVec, lv AccessError, lv KsHandleBfsError,
    lv CreateDiskStream, lv ResetDiskStream, lv CloseDiskStream,
    lv FixupDiskStream)