-- SMFakeBcd.mesa
-- last edit by Schmidt, May 11, 1983 2:39 pm
-- last edit by Satterthwaite, August 12, 1983 12:38 pm

DIRECTORY
  IO: TYPE USING [Handle],
  PilotLoadStateFormat: TYPE USING [ConfigIndex],
  Rope: TYPE USING [Text],
  SMTree: TYPE Tree USING [Link],
  Space: TYPE USING [Handle];
	
SMFakeBcd: CEDAR DEFINITIONS = {
  OPEN Tree~~SMTree;
	
 -- exported by SMFakeBcdImpl
  BuildFakeBcd: PROC[
  	configIndex: PilotLoadStateFormat.ConfigIndex, root: Tree.Link,
  	oldFakeBcdFileName: Rope.Text, oldFakeBcdSpace: Space.Handle,
	out: IO.Handle]
      RETURNS [fakeBcdFileName: Rope.Text, fakeBcdSpace: Space.Handle];
	
  }.