-- CGenDebugGlobalDefs.mesa  Edited by Sweet, May 21, 1980  9:40 AM

DIRECTORY
  Allocator USING [base, top],
  Code USING [codeptr, curctxlvl, framesz, stking, tempcontext, tempstart],
  ComData USING [bodyIndex, sourceFile, textIndex],
  Constructor USING [cd],
  Driver USING [codestart],
  Expression USING [recentExp],
  Final USING [ccInfo],
  Flow USING [labelStack],
  StackImpl USING [stkHead, stkPtr],
  Statement USING [recentStmt],
  Temp USING [heapList, pendTempList];

CGenDebugGlobalDefs: DEFINITIONS 
  SHARES Allocator, Driver, Final, Flow, StackImpl, Temp =
  BEGIN

  al: PRIVATE POINTER TO FRAME[Allocator] = LOOPHOLE[0];
  constructor: PRIVATE POINTER TO FRAME[Constructor] = LOOPHOLE[0];
  CPtr: PRIVATE POINTER TO FRAME[Code] = LOOPHOLE[0];
  driver: PRIVATE POINTER TO FRAME[Driver] = LOOPHOLE[0];
  expression: PRIVATE POINTER TO FRAME[Expression] = LOOPHOLE[0];
  final: PRIVATE POINTER TO FRAME[Final] = LOOPHOLE[0];
  flow: PRIVATE POINTER TO FRAME[Flow] = LOOPHOLE[0];
  MPtr: PRIVATE POINTER TO FRAME[ComData] = LOOPHOLE[0];
  stack: PRIVATE POINTER TO FRAME[StackImpl] = LOOPHOLE[0];
  statement: PRIVATE POINTER TO FRAME[Statement] = LOOPHOLE[0];
  temp: PRIVATE POINTER TO FRAME[Temp] = LOOPHOLE[0];

  AllocatorbaseOffset: CARDINAL = LOOPHOLE[@al.base];
  AllocatortopOffset: CARDINAL = LOOPHOLE[@al.top];
  CodecodeptrOffset: CARDINAL = LOOPHOLE[@CPtr.codeptr];
  CodecurctxlvlOffset: CARDINAL = LOOPHOLE[@CPtr.curctxlvl];
  CodeframeszOffset: CARDINAL = LOOPHOLE[@CPtr.framesz];
  CodestkingOffset: CARDINAL = LOOPHOLE[@CPtr.stking];
  CodetempcontextOffset: CARDINAL = LOOPHOLE[@CPtr.tempcontext];
  CodetempstartOffset: CARDINAL = LOOPHOLE[@CPtr.tempstart];
  ComDatabodyIndexOffset: CARDINAL = LOOPHOLE[@MPtr.bodyIndex];
  ComDatatextIndexOffset: CARDINAL = LOOPHOLE[@MPtr.textIndex];
  ComDatasourceFileOffset: CARDINAL = LOOPHOLE[@MPtr.sourceFile];
  ConstructorcdOffset: CARDINAL = LOOPHOLE[@constructor.cd];
  DrivercodestartOffset: CARDINAL = LOOPHOLE[@driver.codestart];
  ExpressionrecentExpOffset: CARDINAL = LOOPHOLE[@expression.recentExp];
  FinalccInfoOffset: CARDINAL = LOOPHOLE[@final.ccInfo];
  FlowlabelStackOffset: CARDINAL = LOOPHOLE[@flow.labelStack];
  StackImplstkPtrOffset: CARDINAL = LOOPHOLE[@stack.stkPtr];
  StackImplstkHeadOffset: CARDINAL = LOOPHOLE[@stack.stkHead];
  StatementrecentStmtOffset: CARDINAL = LOOPHOLE[@statement.recentStmt];
  TempheapListOffset: CARDINAL = LOOPHOLE[@temp.heapList];
  TemppendTempListOffset: CARDINAL = LOOPHOLE[@temp.pendTempList];
  END.