all-test.headers 23 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316
  1. "XXX-HEADER.RED"$ MAIN2 6/1
  2. FIRSTCALL; MAIN2 14/2
  3. UNDEFINEDFUNCTIONAUX; MAIN2 77/3
  4. "PT:MINI-CHAR-IO.RED"$ SUB2 3/1
  5. "PT:MINI-PRINTERS.RED"$ SUB2 4/2
  6. "PT:MINI-ERROR-ERRORSET.RED"$ SUB2 5/3
  7. "PT:MINI-ERROR-HANDLERS.RED"$ SUB2 6/4
  8. "PT:MINI-TYPE-ERRORS.RED"$ SUB2 7/5
  9. "XXX-HEADER.RED"$ MAIN3 6/1
  10. "PT:STUBS3.RED"$ MAIN3 7/2
  11. FIRSTCALL; MAIN3 12/3
  12. CASETEST; MAIN3 23/4
  13. CTEST N; MAIN3 41/5
  14. SHOW(N,S); MAIN3 49/6
  15. CONSTEST(); MAIN3 56/7
  16. UNDEFINEDFUNCTIONAUX; MAIN3 68/8
  17. "PT:MINI-ALLOCATORS.RED"$ SUB3 3/1
  18. "PT:MINI-CONS-MKVECT.RED"$ SUB3 4/2
  19. "PT:MINI-COMP-SUPPORT.RED"$ SUB3 5/3
  20. "PT:MINI-SEQUENCE.RED"$ SUB3 7/4
  21. "PT:MINI-GC.RED"$ STUBS3 4/1
  22. "XXX-HEADER.RED"$ MAIN4 5/1
  23. "PT:P-FUNCTION-PRIMITIVES.RED"$ MAIN4 6/2
  24. "PT:STUBS4.RED"$ MAIN4 7/3
  25. "PT:STUBS3.RED"$ MAIN4 8/4
  26. FIRSTCALL; MAIN4 15/5
  27. MORESTUFF; MAIN4 68/6
  28. FUNCTIONTEST(); MAIN4 74/7
  29. COMPILED1; MAIN4 124/8
  30. COMPILED2; MAIN4 128/9
  31. COMPILED3(A1,A2,A3,A4); MAIN4 132/10
  32. UNDEFINEDFUNCTIONAUXAUX ; MAIN4 142/11
  33. COMPILEDCALLINGINTERPRETEDAUX(); MAIN4 155/12
  34. "PT:MINI-EQUAL.RED"$ SUB4 6/1
  35. "PT:MINI-TOKEN.RED"$ SUB4 7/2
  36. "PT:MINI-READ.RED"$ SUB4 8/3
  37. SPACED(M); STUBS4 3/1
  38. DASHED(M); STUBS4 7/2
  39. DOTTED(M); STUBS4 12/3
  40. SHOULDBE(M,V,E); STUBS4 18/4
  41. "XXX-HEADER.RED"$ MAIN5 4/1
  42. "PT:STUBS3.RED"$ MAIN5 5/2
  43. "PT:STUBS4.RED"$ MAIN5 6/3
  44. "PT:STUBS5.RED"$ MAIN5 7/4
  45. FIRSTCALL; MAIN5 13/5
  46. TESTSERIES(); MAIN5 45/6
  47. TESTGET(); MAIN5 49/7
  48. TESTUNDEFINED; MAIN5 59/8
  49. UNBINDN N; MAIN5 64/9
  50. LBIND1(X,Y); MAIN5 67/10
  51. "PT:P-FUNCTION-PRIMITIVES.RED"$ SUB5 5/1
  52. "PT:P-APPLY-LAP.RED"$ SUB5 6/2
  53. "PT:MINI-ARITHMETIC.RED"$ SUB5 8/3
  54. "PT:MINI-CARCDR.RED"$ SUB5 9/4
  55. "PT:MINI-EASY-SL.RED"$ SUB5 10/5
  56. "PT:MINI-EASY-NON-SL.RED"$ SUB5 11/6
  57. "PT:MINI-EVAL-APPLY.RED"$ SUB5 12/7
  58. "PT:MINI-KNOWN-TO-COMP.RED"$ SUB5 13/8
  59. "PT:MINI-LOOP-MACROS.RED"$ SUB5 14/9
  60. "PT:MINI-OTHERS-SL.RED"$ SUB5 15/10
  61. "PT:MINI-OBLIST.RED"$ SUB5 16/11
  62. "PT:MINI-PROPERTY-LIST.RED"$ SUB5 17/12
  63. "PT:MINI-SYMBOL-VALUES.RED"$ SUB5 18/13
  64. UNDEFINEDFUNCTIONAUXAUX; STUBS5 6/1
  65. INF X; STUBS5 22/2
  66. TAG X; STUBS5 25/3
  67. MKITEM(X,Y); STUBS5 28/4
  68. "XXX-HEADER.RED"$ MAIN6 5/1
  69. "PT:STUBS3.RED"$ MAIN6 6/2
  70. "PT:STUBS4.RED"$ MAIN6 7/3
  71. "PT:STUBS5.RED"$ MAIN6 8/4
  72. "PT:STUBS6.RED"$ MAIN6 9/5
  73. FIRSTCALL; MAIN6 15/6
  74. TESTSERIES(); MAIN6 48/7
  75. BINDINGTEST; MAIN6 55/8
  76. INTERPTEST(); MAIN6 71/9
  77. TESTFASTAPPLY EXPR 0) MAIN6 102/10
  78. TESTAPPLY(MSG,FN,ANSWER); MAIN6 107/11
  79. COMPILED1(XXX,YYY); MAIN6 117/12
  80. COMPILED2(XXX,YYY); MAIN6 122/13
  81. COMPBINDTEST(); MAIN6 129/14
  82. CBIND1(X,CFL1,CFL2); MAIN6 139/15
  83. CBIND2(); MAIN6 149/16
  84. "PK:BINDING.RED"$ SUB6 3/1
  85. "PT:P-FAST-BINDER.RED"$ SUB6 4/2
  86. "PT:MINI-PUTD-GETD.RED"$ SUB6 6/3
  87. RESET(); SUB6 8/4
  88. "PT:MINI-PRINTF.RED"$ STUBS6 3/1
  89. "PT:MINI-TOP-LOOP.RED"$ STUBS6 4/2
  90. FUNCALL(FN,I); STUBS6 8/3
  91. "XXX-HEADER.RED"$ MAIN7 5/1
  92. "PT:STUBS3.RED"$ MAIN7 6/2
  93. "PT:STUBS4.RED"$ MAIN7 7/3
  94. "PT:STUBS5.RED"$ MAIN7 8/4
  95. "PT:STUBS6.RED"$ MAIN7 9/5
  96. "PT:STUBS7.RED"$ MAIN7 10/6
  97. "PT:PSL-TIMER.SL"$ MAIN7 11/7
  98. FIRSTCALL; MAIN7 17/8
  99. IOTEST; MAIN7 61/9
  100. "XXX-SYSTEM-IO.RED"$ SUB7 5/1
  101. "PT:IO-DATA.RED"$ SUB7 6/2
  102. "PT:MINI-IO-ERRORS.RED"$ SUB7 7/3
  103. "PT:MINI-DSKIN.RED"$ SUB7 8/4
  104. "PT:MINI-OPEN-CLOSE.RED"$ SUB7 9/5
  105. "PT:MINI-RDS-WRS.RED"$ SUB7 10/6
  106. "PT:SYSTEM-IO.RED"$ SUB7 11/7
  107. GTHEAP N; MINI-ALLOCATOR 14/1
  108. GTSTR N; MINI-ALLOCATOR 27/2
  109. GTVECT N; MINI-ALLOCATOR 36/3
  110. GTWARRAY N; MINI-ALLOCATOR 44/4
  111. GTID(); MINI-ALLOCATOR 48/5
  112. PLUS2(X,Y); MINI-ARITHMETI 5/1
  113. MINUS(X); MINI-ARITHMETI 9/2
  114. ADD1 N; MINI-ARITHMETI 13/3
  115. SUB1 N; MINI-ARITHMETI 17/4
  116. GREATERP(N1,N2); MINI-ARITHMETI 21/5
  117. LESSP(N1,N2); MINI-ARITHMETI 24/6
  118. DIFFERENCE(N1,N2); MINI-ARITHMETI 28/7
  119. CAR X; MINI-CARCDR 5/1
  120. CDR X; MINI-CARCDR 8/2
  121. CAAR X; MINI-CARCDR 13/3
  122. CADR X; MINI-CARCDR 16/4
  123. CDAR X; MINI-CARCDR 19/5
  124. CDDR X; MINI-CARCDR 22/6
  125. CHANNELWRITECHAR(CHN,X); MINI-CHAR-IO 3/1
  126. WRITECHAR CH; MINI-CHAR-IO 6/2
  127. LIST2(A1,A2); MINI-COMP-SUPP 4/1
  128. LIST3(A1,A2,A3); MINI-COMP-SUPP 7/2
  129. LIST4(A1,A2,A3,A4); MINI-COMP-SUPP 10/3
  130. LIST5(A1,A2,A3,A4,A5); MINI-COMP-SUPP 13/4
  131. HARDCONS(X,Y); MINI-CONS-MKVE 6/1
  132. CONS(X,Y); MINI-CONS-MKVE 14/2
  133. XCONS(X,Y); MINI-CONS-MKVE 17/3
  134. NCONS X; MINI-CONS-MKVE 20/4
  135. MKVECT N; MINI-CONS-MKVE 23/5
  136. TYPEFILE F; MINI-DSKIN 3/1
  137. DSKIN F; MINI-DSKIN 12/2
  138. LAPIN F; MINI-DSKIN 25/3
  139. ATSOC(X,Y); MINI-EASY-NON- 3/1
  140. GEQ(N1,N2); MINI-EASY-NON- 9/2
  141. LEQ(N1,N2); MINI-EASY-NON- 12/3
  142. EQCAR(X,Y); MINI-EASY-NON- 15/4
  143. COPYD(NEWID,OLDID); MINI-EASY-NON- 18/5
  144. DELATQ(X,Y); MINI-EASY-NON- 28/6
  145. ATOM X; MINI-EASY-SL 8/1
  146. APPEND(U,V); MINI-EASY-SL 13/2
  147. MEMQ(X,Y); MINI-EASY-SL 17/3
  148. REVERSE U; MINI-EASY-SL 22/4
  149. EVLIS X; MINI-EASY-SL 31/5
  150. EVPROGN FL; MINI-EASY-SL 35/6
  151. PROGN X; MINI-EASY-SL 42/7
  152. EVCOND FL; MINI-EASY-SL 45/8
  153. COND X; MINI-EASY-SL 51/9
  154. QUOTE A; MINI-EASY-SL 54/10
  155. SETQ A; MINI-EASY-SL 57/11
  156. DE(X); MINI-EASY-SL 60/12
  157. DF(X); MINI-EASY-SL 63/13
  158. DN(X); MINI-EASY-SL 66/14
  159. DM(X); MINI-EASY-SL 69/15
  160. LIST X; MINI-EASY-SL 73/16
  161. EQSTR(S1,S2); MINI-EQUAL 5/1
  162. ERRORHEADER; MINI-ERROR-ERR 4/1
  163. ERROR S; MINI-ERROR-ERR 7/2
  164. ERRORTRAILER S; MINI-ERROR-ERR 11/3
  165. FATALERROR S; MINI-ERROR-HAN 5/1
  166. STDERROR M; MINI-ERROR-HAN 8/2
  167. INITEVAL; MINI-EVAL-APPL 5/1
  168. EVAL X; MINI-EVAL-APPL 19/2
  169. APPLY(FN,A); MINI-EVAL-APPL 43/3
  170. LAMBDAAPPLY(X,A); MINI-EVAL-APPL 60/4
  171. LAMBDAEVALAPPLY(X,Y); MINI-EVAL-APPL 68/5
  172. DOLAMBDA(VARS,BODY,ARGS); MINI-EVAL-APPL 71/6
  173. LAMBDAP(X); MINI-EVAL-APPL 86/7
  174. GETLAMBDA(FN); MINI-EVAL-APPL 89/8
  175. !%RECLAIM(); MINI-GC 9/1
  176. RECLAIM(); MINI-GC 13/2
  177. HEAPINFO(); MINI-GC 17/3
  178. IOERROR M; MINI-IO-ERRORS 3/1
  179. CODEP X; MINI-KNOWN-TO- 3/1
  180. PAIRP X; MINI-KNOWN-TO- 6/2
  181. IDP X; MINI-KNOWN-TO- 9/3
  182. EQ(X,Y); MINI-KNOWN-TO- 12/4
  183. NULL X; MINI-KNOWN-TO- 15/5
  184. NOT X; MINI-KNOWN-TO- 18/6
  185. WHILE FL; MINI-LOOP-MACR 3/1
  186. MAPOBL(FN); MINI-OBLIST 6/1
  187. PRINTFEXPRS; MINI-OBLIST 9/2
  188. PRINT1FEXPR(X); MINI-OBLIST 12/3
  189. PRINTFUNCTIONS; MINI-OBLIST 15/4
  190. PRINT1FUNCTION(X); MINI-OBLIST 18/5
  191. OPEN(FILENAME,HOW); MINI-OPEN-CLOS 3/1
  192. CLOSE N; MINI-OPEN-CLOS 8/2
  193. LENGTH U; MINI-OTHERS-SL 4/1
  194. LENGTH1(U, N); MINI-OTHERS-SL 8/2
  195. PRIN1 X; MINI-PRINTERS 8/1
  196. PRIN2 X; MINI-PRINTERS 15/2
  197. PRINT X; MINI-PRINTERS 22/3
  198. PRIN2T X; MINI-PRINTERS 25/4
  199. PBLANK; MINI-PRINTERS 30/5
  200. PRIN1INT X; MINI-PRINTERS 33/6
  201. PRIN1INTX X; MINI-PRINTERS 40/7
  202. PRIN1ID X; MINI-PRINTERS 45/8
  203. PRIN2ID X; MINI-PRINTERS 50/9
  204. PRIN1STRING X; MINI-PRINTERS 53/10
  205. PRIN2STRING X; MINI-PRINTERS 60/11
  206. PRIN1PAIR X; MINI-PRINTERS 67/12
  207. PRIN2PAIR X; MINI-PRINTERS 78/13
  208. TERPRI(); MINI-PRINTERS 89/14
  209. PRTITM X; MINI-PRINTERS 92/15
  210. CHANNELPRIN2(CHN,X); MINI-PRINTERS 102/16
  211. BLDMSG(FMT,A1,A2,A3,A4,A5,A6); MINI-PRINTF 3/1
  212. PROP X; MINI-PROPERTY- 5/1
  213. GET(X,Y); MINI-PROPERTY- 9/2
  214. PUT(X,Y,Z); MINI-PROPERTY- 17/3
  215. REMPROP(X,Y); MINI-PROPERTY- 28/4
  216. GETFNTYPE X; MINI-PROPERTY- 38/5
  217. GETD(FN); MINI-PUTD-GETD 6/1
  218. PUTD(FN,TYPE,BODY); MINI-PUTD-GETD 21/2
  219. RDS N; MINI-RDS-WRS 5/1
  220. WRS N; MINI-RDS-WRS 13/2
  221. READ; MINI-READ 6/1
  222. READ1(X); MINI-READ 10/2
  223. READLIST(X); MINI-READ 15/3
  224. MKSTRING(L, C); MINI-SEQUENCE 5/1
  225. SET(X,Y); MINI-SYMBOL-VA 3/1
  226. INITREAD; MINI-TOKEN 11/1
  227. SETRAISE X; MINI-TOKEN 21/2
  228. RATOM; MINI-TOKEN 24/3
  229. CLEARWHITE(); MINI-TOKEN 41/4
  230. CLEARCOMMENT(); MINI-TOKEN 45/5
  231. READINT; MINI-TOKEN 50/6
  232. BUFFERTOSTRING N; MINI-TOKEN 59/7
  233. READSTR; MINI-TOKEN 67/8
  234. READID; MINI-TOKEN 77/9
  235. RAISECHAR C; MINI-TOKEN 88/10
  236. INTERN S; MINI-TOKEN 95/11
  237. INITNEWID(D,S); MINI-TOKEN 105/12
  238. LOOKUPID(S); MINI-TOKEN 115/13
  239. WHITEP X; MINI-TOKEN 131/14
  240. DIGITP X; MINI-TOKEN 135/15
  241. ALPHAP(X); MINI-TOKEN 138/16
  242. UPPERCASEP X; MINI-TOKEN 141/17
  243. LOWERCASEP X; MINI-TOKEN 144/18
  244. ESCAPEP X; MINI-TOKEN 147/19
  245. ALPHAESCP X; MINI-TOKEN 150/20
  246. ALPHANUMP X; MINI-TOKEN 153/21
  247. ALPHANUMESCP X; MINI-TOKEN 156/22
  248. TIME(); MINI-TOP-LOOP 3/1
  249. TYPEERROR(OFFENDER, FN, TYP); MINI-TYPE-ERRO 3/1
  250. USAGETYPEERROR(OFFENDER, FN, TYP, USAGE); MINI-TYPE-ERRO 15/2
  251. NONIDERROR(X,Y); MINI-TYPE-ERRO 29/3
  252. NONNUMBERERROR(OFFENDER, FN); MINI-TYPE-ERRO 32/4
  253. NONINTEGERERROR(OFFENDER, FN); MINI-TYPE-ERRO 35/5
  254. NONPOSITIVEINTEGERERROR(OFFENDER, FN); MINI-TYPE-ERRO 38/6
  255. CODEAPPLY(CODEPTR, ARGLIST); P-APPLY-LAP 53/1
  256. CODEEVALAPPLY EXPR 2) P-APPLY-LAP 206/2
  257. CODEEVALAPPLYAUX(CODEPTR, ARGLIST, P); P-APPLY-LAP 213/3
  258. BINDEVAL(FORMALS, ARGS); P-APPLY-LAP 363/4
  259. BINDEVALAUX(FORMALS, ARGS, N); P-APPLY-LAP 366/5
  260. COMPILEDCALLINGINTERPRETEDAUX(); P-APPLY-LAP 381/6
  261. FASTLAMBDAAPPLY(); P-APPLY-LAP 387/7
  262. COMPILEDCALLINGINTERPRETEDAUXAUX FN; P-APPLY-LAP 391/8
  263. LAMBIND V; P-FAST-BINDER 23/1
  264. PROGBIND V; P-FAST-BINDER 32/2
  265. SYMFNCBASE D; % THE ADDRESS OF CELL, P-FUNCTION-PRI 57/1
  266. FUNBOUNDP FN; P-FUNCTION-PRI 65/2
  267. MAKEFUNBOUND(D); P-FUNCTION-PRI 73/3
  268. FLAMBDALINKP FN; P-FUNCTION-PRI 79/4
  269. MAKEFLAMBDALINK D; P-FUNCTION-PRI 85/5
  270. FCODEP FN; P-FUNCTION-PRI 91/6
  271. MAKEFCODE(U, CODEPTR); P-FUNCTION-PRI 96/7
  272. GETFCODEPOINTER U; P-FUNCTION-PRI 106/8
  273. CODEPRIMITIVE EXPR 15) P-FUNCTION-PRI 121/9
  274. COMPILEDCALLINGINTERPRETED EXPR 15) P-FUNCTION-PRI 136/10
  275. FASTAPPLY EXPR 0) P-FUNCTION-PRI 153/11
  276. SAVEREGISTERS(A1, A2, A3, A4, A5, P-FUNCTION-PRI 193/12
  277. UNDEFINEDFUNCTIONAUX EXPR 0) P-FUNCTION-PRI 214/13
  278. ERNAL WCONST STACKSIZE = 5000; P20T:XXX-HEADE 11/1
  279. ERNAL WARRAY STACK[STACKSIZE]; P20T:XXX-HEADE 12/2
  280. ERNAL WCONST HEAPSIZE = 150000; % ENOUGH FOR PSL-TIM P20T:XXX-HEADE 21/3
  281. ERNAL WARRAY HEAP[HEAPSIZE]; % COULD DO A DYNAMIC A P20T:XXX-HEADE 22/4
  282. ERNAL WARRAY OTHERHEAP[HEAPSIZE]; P20T:XXX-HEADE 30/5
  283. ERNAL WCONST BPSSIZE = 500; P20T:XXX-HEADE 36/6
  284. ERNAL WARRAY BPS[BPSSIZE]; % COULD DO A DYNAMIC ALL P20T:XXX-HEADE 37/7
  285. INITHEAP(); P20T:XXX-HEADE 44/8
  286. ERNAL WCONST MAXARGBLOCK = (MAXARGS - MAXREALREGS) - P20T:XXX-HEADE 53/9
  287. MAIN!. EXPR 0) P20T:XXX-HEADE 64/10
  288. INIT(); P20T:XXX-HEADE 88/11
  289. GETC(); P20T:XXX-HEADE 94/12
  290. TIMC(); P20T:XXX-HEADE 98/13
  291. PUTC X; P20T:XXX-HEADE 101/14
  292. QUIT; P20T:XXX-HEADE 105/15
  293. DATE; P20T:XXX-HEADE 108/16
  294. VERSIONNAME; P20T:XXX-HEADE 111/17
  295. PUTINT I; P20T:XXX-HEADE 114/18
  296. !%STORE!-JCALL EXPR 2) % CODEADDRESS, STORAGE ADDRESS P20T:XXX-HEADE 118/19
  297. !%COPY!-FUNCTION!-CELL EXPR 2) % FROM TO P20T:XXX-HEADE 124/20
  298. UNDEFINEDFUNCTION EXPR 0) % FOR MISSING FUNCTION P20T:XXX-HEADE 131/21
  299. FLAG EXPR 2) % DUMMY FOR INIT P20T:XXX-HEADE 138/22
  300. LONGTIMES(X,Y); P20T:XXX-HEADE 144/23
  301. LONGDIV(X,Y); P20T:XXX-HEADE 147/24
  302. LONGREMAINDER(X,Y); P20T:XXX-HEADE 150/25
  303. SYSCLEARIO EXPR 0) P20T:XXX-SYSTE 30/1
  304. SYSOPENREAD(CHANNEL,FILENAME); P20T:XXX-SYSTE 44/2
  305. SYSOPENWRITE(CHANNEL,FILENAME); P20T:XXX-SYSTE 56/3
  306. DEC20OPEN EXPR 3) P20T:XXX-SYSTE 64/4
  307. SYSREADREC(FILEDESCRIPTOR,STRINGBUFFER); P20T:XXX-SYSTE 83/5
  308. DEC20READCHAR EXPR 1) P20T:XXX-SYSTE 98/6
  309. SYSWRITEREC (FILEDESCRIPTOR, STRINGTOWRITE, STRINGLE P20T:XXX-SYSTE 123/7
  310. DEC20WRITECHAR EXPR 2) P20T:XXX-SYSTE 130/8
  311. SYSCLOSE EXPR 1) P20T:XXX-SYSTE 145/9
  312. SYSMAXBUFFER(FILEDESC); P20T:XXX-SYSTE 154/10
  313. 2945 lines, 312 procedures found