-- file PPComDataImpl.mesa
-- last edit by Russ Atkinson,  9-Jul-81 14:10:54

DIRECTORY
  PPComData: TYPE USING [],
  PPLeaves: TYPE USING [ISEIndex];

PPComDataImpl: PROGRAM EXPORTS PPComData = PUBLIC BEGIN

  Init: PROC = {};
  
  idANY: PPLeaves.ISEIndex ← "UNSPECIFIED";
  idINT: PPLeaves.ISEIndex ← "INTEGER";
  idLOCK: PPLeaves.ISEIndex ← "LOCK";

  END.