1 //  Declarations for the semantic translator.
  2 //  Last modified on 04/02/74 at 16:02:39 by R F Mabee.
  3 //  Revised during 6180 bootstrap, and installed as Version 3.4 by R F Mabee.
  4 //  First installed as Version 2.7 by R F Mabee.
  5 
  6 get "bcpl_compiler_head"
  7 get "bcpl_symbols"
  8 get "bcpl_trans_codes"
  9 
 10 external
 11      $(   Transbody = "bcpl_trans1$Transbody"               //  The routines of Trans.
 12 
 13           Transdef = "bcpl_trans2$Transdef"
 14           Addlocal = "bcpl_trans2$Addlocal"
 15           Declitem = "bcpl_trans2$Declitem"
 16           Declnames = "bcpl_trans2$Declnames"
 17           Decllabels = "bcpl_trans2$Decllabels"
 18           Checkdistinct = "bcpl_trans2$Checkdistinct"
 19           Cellwithname = "bcpl_trans2$Cellwithname"
 20           Removenames = "bcpl_trans2$Removenames"
 21 
 22           TransConditional = "bcpl_trans3$TransConditional"
 23           TransFor = "bcpl_trans3$TransFor"
 24           WalkList = "bcpl_trans3$WalkList"
 25           ListSize = "bcpl_trans3$ListSize"
 26           Assignlist = "bcpl_trans3$Assignlist"
 27           Target = "bcpl_trans3$Target"
 28           TransLoop = "bcpl_trans3$TransLoop"
 29 
 30           CompileExpression = "bcpl_trans4$CompileExpression"
 31           CompileOperand = "bcpl_trans4$CompileOperand"
 32           SetResult = "bcpl_trans4$SetResult"
 33 
 34           Evalconst = "bcpl_trans5$Evalconst"
 35           PartialEvalconst = "bcpl_trans5$PartialEvalconst"
 36           IsConst = "bcpl_trans5$IsConst"
 37           EvaluateOperator = "bcpl_trans5$EvaluateOperator"
 38           CountTemporaries = "bcpl_trans5$CountTemporaries"
 39           IsRelational = "bcpl_trans5$IsRelational"
 40 
 41           ResetSSP = "bcpl_trans6$ResetSSP"
 42           AllocateLocal = "bcpl_trans6$AllocateLocal"
 43           DeallocateLocal = "bcpl_trans6$DeallocateLocal"
 44           MakeTemp = "bcpl_trans6$MakeTemp"
 45           MakeCopy = "bcpl_trans6$MakeCopy"
 46           PutBackTemps = "bcpl_trans6$PutBackTemps"
 47           TransFnap = "bcpl_trans6$TransFnap"
 48           TransSystemCall = "bcpl_trans6$TransSystemCall"
 49 
 50           GenerateLabel = "bcpl_cg_interface$GenerateLabel"
 51           GenerateJump = "bcpl_cg_interface$GenerateJump"
 52           GenerateRtdefBegin = "bcpl_cg_interface$GenerateRtdefBegin"
 53           GenerateRtdefEnd = "bcpl_cg_interface$GenerateRtdefEnd"
 54           ReserveArglist = "bcpl_cg_interface$ReserveArglist"
 55           GenerateArg = "bcpl_cg_interface$GenerateArg"
 56           GenerateFnap = "bcpl_cg_interface$GenerateFnap"
 57           ReserveSystemArglist = "bcpl_cg_interface$ReserveSystemArglist"
 58           GenerateSystemArg = "bcpl_cg_interface$GenerateSystemArg"
 59           GenerateSystemCall = "bcpl_cg_interface$GenerateSystemCall"
 60           GenerateResultBlock = "bcpl_cg_interface$GenerateResultBlock"
 61           GenerateResultValue = "bcpl_cg_interface$GenerateResultValue"
 62           GenerateClaimResult = "bcpl_cg_interface$GenerateClaimResult"
 63           GenerateGoto = "bcpl_cg_interface$GenerateGoto"
 64           GenerateFinish = "bcpl_cg_interface$GenerateFinish"
 65           GenerateSwitch = "bcpl_cg_interface$GenerateSwitch"
 66           GenerateMonadicOperator = "bcpl_cg_interface$GenerateMonadicOperator"
 67           GenerateDiadicOperator = "bcpl_cg_interface$GenerateDiadicOperator"
 68           GenerateOffsetOperator = "bcpl_cg_interface$GenerateOffsetOperator"
 69           GenerateMonadicConditional = "bcpl_cg_interface$GenerateMonadicConditional"
 70           GenerateDiadicConditional = "bcpl_cg_interface$GenerateDiadicConditional"
 71           GenerateSSP = "bcpl_cg_interface$GenerateSSP"
 72           GenerateLineNumber = "bcpl_cg_interface$GenerateLineNumber"
 73           StoreAll = "bcpl_cg_interface$StoreAll"
 74           CgFinish = "bcpl_cg_interface$CgFinish"
 75      $)
 76 global              //  250 - 299 are reserved for Trans.
 77      $(   ArgInfo             : 250
 78           BreakLabel          : 251
 79           CaseFirst : 252
 80           CaseList            : 253
 81           DefaultLabel        : 254
 82           DefList             : 255
 83           DvecC               : 246
 84           DvecP               : 257
 85           EndcaseLabel        : 258
 86 
 87           EnvBase             : 260
 88           FreeLocalList       : 261
 89           InsideRtdef         : 262
 90           LHSpointer          : 263
 91           LoopFlag            : 264
 92           LoopLabel           : 265
 93           PendingTemps        : 266
 94           ReturnLabel         : 267
 95           RtdefList           : 268
 96 
 97           RtdefNesting        : 270
 98           SSP                 : 271
 99           StaticAllocationCounter : 272
100           StaticFirst         : 273
101           StaticList          : 274
102           SwitchFlag          : 275
103           TableCell           : 276
104           ValofFlag           : 277
105           ValofLabel          : 278
106      $)
107 manifest
108      $(   DescSize = 2
109           DvecSize = 4
110      $)