// IfsLeafOEP.bcpl
// Copyright Xerox Corporation 1979

//last modified by Butterfield, October 25, 1979  7:38 PM
//last modified November 24, 1980  10:35 AM by Wobber
//last modified June 20, 1979  11:55 AM by Taft

external
[
//outgoing procedures
InitLeafOEP

//incoming procedures
DeclareOEP; LeafCtx; SequinCtx; SequinFeedCtx;
ReadLeaf; WriteLeaf; OpenLeaf; CloseLeaf; ResetLeaf; DeleteLeaf;
TruncateLeaf; DoNothingLeaf; BuddingLeaf; ParamsLeaf;
]


//----------------------------------------------------------------------------
let InitLeafOEP(oev) be
//----------------------------------------------------------------------------
[
DeclareOEP(oev, lv LeafCtx, lv SequinCtx, lv SequinFeedCtx);
DeclareOEP(oev, lv ReadLeaf, lv WriteLeaf, lv OpenLeaf, lv CloseLeaf,
 lv ResetLeaf, lv DeleteLeaf, lv TruncateLeaf, lv DoNothingLeaf,
 lv BuddingLeaf, lv ParamsLeaf);
]