home *** CD-ROM | disk | FTP | other *** search
/ GEMini Atari / GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso / zip / program / funnel.zoo / answers / pr04.lis < prev    next >
File List  |  1993-04-11  |  22KB  |  657 lines
  1. FUNNELWEB LISTING FILE
  2. ======================
  3.  
  4. Dump of mapped file "<<Suppressed>>".
  5.  
  6. MEMORY DUMP OF MAPPED FILE
  7. ==========================
  8.  
  9. +-------------------------------------------------+------------------+
  10. | 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F | 0123456789ABCDEF |
  11. +-------------------------------------------------+------------------+
  12. | 50 52 30 34 3A 20 54 65 73 74 20 74 68 65 20 64 | PR04: Test the d |
  13. | 65 66 69 6E 69 74 69 6F 6E 20 6F 66 20 6F 72 64 | efinition of ord |
  14. | 69 6E 61 72 79 20 6D 61 63 72 6F 73 2E 0A 0A 31 | inary macros...1 |
  15. | 2E 20 54 65 73 74 20 61 6E 20 6F 72 64 69 6E 61 | . Test an ordina |
  16. | 72 79 20 6D 61 63 72 6F 20 64 65 66 69 6E 69 74 | ry macro definit |
  17. | 69 6F 6E 2E 0A 40 24 40 3C 4F 72 64 69 6E 61 72 | ion..@$@<Ordinar |
  18. | 79 40 3E 40 7B 54 68 65 20 74 65 78 74 20 6F 66 | y@>@{The text of |
  19. | 20 6F 72 64 69 6E 61 72 79 40 7D 0A 0A 32 2E 20 |  ordinary@}..2.  |
  20. | 54 65 73 74 20 61 6E 20 6F 72 64 69 6E 61 72 79 | Test an ordinary |
  21. | 20 64 65 66 69 6E 69 74 69 6F 6E 20 75 73 69 6E |  definition usin |
  22. | 67 20 61 20 71 75 69 63 6B 6E 61 6D 65 2E 0A 40 | g a quickname..@ |
  23. | 24 40 23 7C 40 7B 54 68 65 20 74 65 78 74 20 6F | $@#|@{The text o |
  24. | 66 20 6F 72 64 69 6E 61 72 79 40 7D 0A 0A 33 2E | f ordinary@}..3. |
  25. | 20 54 65 73 74 20 61 20 6E 61 6D 65 20 74 68 61 |  Test a name tha |
  26. | 74 20 69 6E 63 6C 75 64 65 73 20 45 4F 4C 2E 0A | t includes EOL.. |
  27. | 40 24 40 3C 54 68 69 73 20 6E 61 6D 65 20 69 73 | @$@<This name is |
  28. | 20 69 6C 6C 65 67 61 6C 20 62 65 63 61 75 73 65 |  illegal because |
  29. | 0A 69 74 20 63 72 6F 73 73 65 73 20 61 20 6C 69 | .it crosses a li |
  30. | 6F 6E 40 3E 40 7B 41 6E 64 20 70 65 6F 70 6C 65 | on@>@{And people |
  31. | 20 77 68 6F 20 63 72 6F 73 73 20 6C 69 6F 6E 73 |  who cross lions |
  32. | 20 74 65 6E 64 20 74 6F 20 67 65 74 20 65 61 74 |  tend to get eat |
  33. | 65 6E 2E 40 7D 0A 40 41 40 3C 45 72 72 6F 72 20 | en.@}.@A@<Error  |
  34. | 52 65 63 6F 76 65 72 79 20 50 6F 69 6E 74 40 3E | Recovery Point@> |
  35. | 0A 0A 34 2E 20 54 65 73 74 20 74 68 65 20 6D 69 | ..4. Test the mi |
  36. | 6E 69 6D 75 6D 20 6C 65 6E 67 74 68 20 6E 61 6D | nimum length nam |
  37. | 65 20 28 74 68 65 20 65 6D 70 74 79 20 6E 61 6D | e (the empty nam |
  38. | 65 29 2E 0A 40 24 40 3C 40 3E 40 7B 54 68 65 20 | e)..@$@<@>@{The  |
  39. | 65 6D 70 74 79 20 6D 61 63 72 6F 20 6E 61 6D 65 | empty macro name |
  40. | 20 69 73 20 71 75 69 74 65 20 6C 65 67 61 6C 20 |  is quite legal  |
  41. | 69 6E 20 46 75 6E 6E 65 6C 57 65 62 2E 40 7D 0A | in FunnelWeb.@}. |
  42. | 0A 35 2E 20 54 65 73 74 20 61 20 6E 61 6D 65 20 | .5. Test a name  |
  43. | 61 74 20 74 68 65 20 6D 61 78 69 6D 75 6D 20 6E | at the maximum n |
  44. | 61 6D 65 20 6C 65 6E 67 74 68 20 6C 69 6D 69 74 | ame length limit |
  45. | 20 28 38 30 29 2E 0A 4F 4E 6C 79 20 74 68 65 20 |  (80)..ONly the  |
  46. | 73 65 63 6F 6E 64 20 6F 66 20 74 68 65 20 74 77 | second of the tw |
  47. | 6F 20 6D 61 63 72 6F 73 20 73 68 6F 75 6C 64 20 | o macros should  |
  48. | 67 65 6E 65 72 61 74 65 20 61 6E 20 65 72 72 6F | generate an erro |
  49. | 72 2E 0A 40 70 20 6D 61 78 69 6D 75 6D 5F 69 6E | r..@p maximum_in |
  50. | 70 75 74 5F 6C 69 6E 65 5F 6C 65 6E 67 74 68 20 | put_line_length  |
  51. | 3D 20 31 30 30 0A 40 24 40 3C 31 32 33 34 35 36 | = 100.@$@<123456 |
  52. | 37 38 39 30 31 32 33 34 35 36 37 38 39 30 31 32 | 7890123456789012 |
  53. | 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 38 | 3456789012345678 |
  54. | 39 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 | 9012345678901234 |
  55. | 35 36 37 38 39 30 31 32 33 34 35 36 37 38 39 30 | 5678901234567890 |
  56. | 31 32 33 34 35 36 37 38 39 30 40 3E 40 7B 40 7D | 1234567890@>@{@} |
  57. | 0A 40 24 40 3C 31 32 33 34 35 36 37 38 39 30 31 | .@$@<12345678901 |
  58. | 32 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 | 2345678901234567 |
  59. | 38 39 30 31 32 33 34 35 36 37 38 39 30 31 32 33 | 8901234567890123 |
  60. | 34 35 36 37 38 39 30 31 32 33 34 35 36 37 38 39 | 4567890123456789 |
  61. | 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 35 | 0123456789012345 |
  62. | 36 37 38 39 30 31 40 3E 40 7B 40 7D 0A 40 41 40 | 678901@>@{@}.@A@ |
  63. | 3C 45 72 72 6F 72 20 52 65 63 6F 76 65 72 79 20 | <Error Recovery  |
  64. | 50 6F 69 6E 74 40 3E 0A 0A 36 2E 20 54 65 73 74 | Point@>..6. Test |
  65. | 20 6E 61 6D 65 73 20 77 69 74 68 20 61 6C 6C 20 |  names with all  |
  66. | 6C 65 67 61 6C 20 63 68 61 72 61 63 74 65 72 73 | legal characters |
  67. | 2E 20 54 68 65 72 65 20 73 68 6F 75 6C 64 20 62 | . There should b |
  68. | 65 20 6E 6F 20 65 72 72 6F 72 73 2E 0A 40 24 40 | e no errors..@$@ |
  69. | 3C 20 21 22 23 24 25 27 28 29 2A 2B 2C 2D 2E 2F | < !"#$%'()*+,-./ |
  70. | 30 31 32 33 34 35 36 37 38 39 3A 3B 3C 3D 3E 3F | 0123456789:;<=>? |
  71. | 40 3E 40 7B 40 7D 0A 40 24 40 3C 41 42 43 44 45 | @>@{@}.@$@<ABCDE |
  72. | 46 47 48 49 4A 4B 4C 4D 4E 4F 50 51 52 53 54 55 | FGHIJKLMNOPQRSTU |
  73. | 56 57 58 59 5A 5B 5C 5D 5E 5F 60 40 3E 40 7B 40 | VWXYZ[\]^_`@>@{@ |
  74. | 7D 0A 40 24 40 3C 61 62 63 64 65 66 67 68 69 6A | }.@$@<abcdefghij |
  75. | 6B 6C 6D 6E 6F 70 71 72 73 74 75 76 77 78 79 7A | klmnopqrstuvwxyz |
  76. | 7B 7C 7D 7E 40 3E 40 7B 40 7D 0A 0A 37 2E 20 54 | {|}~@>@{@}..7. T |
  77. | 65 73 74 20 61 20 6E 61 6D 65 20 74 68 61 74 20 | est a name that  |
  78. | 68 61 73 20 69 6E 73 65 72 74 65 64 20 74 65 78 | has inserted tex |
  79. | 74 20 73 65 71 75 65 6E 63 65 73 2E 0A 0A 40 24 | t sequences...@$ |
  80. | 40 3C 40 5E 44 28 30 36 35 29 40 40 40 3E 3D 3D | @<@^D(065)@@@>== |
  81. | 40 7B 40 7D 0A 0A 0A                            | @{@}...          |
  82. +-------------------------------------------------+------------------+
  83.  
  84.  
  85. =========================== Start of LINE LIST DUMP ============================
  86.  
  87. Globl Local| Text
  88. -----------+--------------------------------------------------------------------
  89. 00001 00001| PR04: Test the definition of ordinary macros.<010>
  90. 00002 00002| <010>
  91. 00003 00003| 1. Test an ordinary macro definition.<010>
  92. 00004 00004| @$@<Ordinary@>@{The text of ordinary@}<010>
  93. 00005 00005| <010>
  94. 00006 00006| 2. Test an ordinary definition using a quickname.<010>
  95. 00007 00007| @$@#|@{The text of ordinary@}<010>
  96. 00008 00008| <010>
  97. 00009 00009| 3. Test a name that includes EOL.<010>
  98. 00010 00010| @$@<This name is illegal because<010>
  99. 00011 00011| it crosses a lion@>@{And people who cross lions tend to get eaten.@}<010>
  100. 00012 00012| @A@<Error Recovery Point@><010>
  101. 00013 00013| <010>
  102. 00014 00014| 4. Test the minimum length name (the empty name).<010>
  103. 00015 00015| @$@<@>@{The empty macro name is quite legal in FunnelWeb.@}<010>
  104. 00016 00016| <010>
  105. 00017 00017| 5. Test a name at the maximum name length limit (80).<010>
  106. 00018 00018| ONly the second of the two macros should generate an error.<010>
  107. 00019 00019| @p maximum_input_line_length = 100<010>
  108. 00020 00020| @$@<12345678901234567890123456789012345678901234567890123456789012345678901234567890@>@{@}<010>
  109. 00021 00021| @$@<123456789012345678901234567890123456789012345678901234567890123456789012345678901@>@{@}<010>
  110. 00022 00022| @A@<Error Recovery Point@><010>
  111. 00023 00023| <010>
  112. 00024 00024| 6. Test names with all legal characters. There should be no errors.<010>
  113. 00025 00025| @$@< !"#$%'()*+,-./0123456789:;<=>?@>@{@}<010>
  114. 00026 00026| @$@<ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`@>@{@}<010>
  115. 00027 00027| @$@<abcdefghijklmnopqrstuvwxyz{|}~@>@{@}<010>
  116. 00028 00028| <010>
  117. 00029 00029| 7. Test a name that has inserted text sequences.<010>
  118. 00030 00030| <010>
  119. 00031 00031| @$@<@^D(065)@@@>==@{@}<010>
  120. 00032 00032| <010>
  121. 00033 00033| <010>
  122. 00034 00034| <End-Of-File><010>
  123. -----------+--------------------------------------------------------------------
  124. Globl Local| Text
  125.  
  126. ============================ End of LINE LIST DUMP =============================
  127.  
  128.  
  129. =========================== Start of TOKEN LIST DUMP ===========================
  130.  
  131. Summary: There are 85 tokens in the token list.
  132.  
  133. Line[Column]: Token Description
  134. -------------------------------
  135.  
  136. 0001[01]: Text. Text scrap[Grey]="PR04: Test the definition of ordinary macros.<010>
  137. <010>
  138. 1. Test an ordinary macro definition.<010>
  139. "
  140. 0004[01]: @$ Macro defn. 
  141. 0004[03]: @< Open name. 
  142. 0004[05]: Text. Text scrap[Grey]="Ordinary"
  143. 0004[13]: @> Close name. 
  144. 0004[15]: @{ Open defn. 
  145. 0004[17]: Text. Text scrap[Grey]="The text of ordinary"
  146. 0004[37]: @} Close defn. 
  147. 0004[39]: Text. Text scrap[Grey]="<010>
  148. <010>
  149. 2. Test an ordinary definition using a quickname.<010>
  150. "
  151. 0007[01]: @$ Macro defn. 
  152. 0007[03]: @# Name. Character='|'.
  153. 0007[06]: @{ Open defn. 
  154. 0007[08]: Text. Text scrap[Grey]="The text of ordinary"
  155. 0007[28]: @} Close defn. 
  156. 0007[30]: Text. Text scrap[Grey]="<010>
  157. <010>
  158. 3. Test a name that includes EOL.<010>
  159. "
  160. 0010[01]: @$ Macro defn. 
  161. 0010[03]: @< Open name. 
  162. 0010[05]: Text. Text scrap[Grey]="This name is illegal because<010>
  163. it crosses a lion"
  164. 0011[18]: @> Close name. 
  165. 0011[20]: @{ Open defn. 
  166. 0011[22]: Text. Text scrap[Grey]="And people who cross lions tend to get eaten."
  167. 0011[67]: @} Close defn. 
  168. 0011[69]: Text. Text scrap[White]="<010>
  169. "
  170. 0012[01]: @A New section (Level 1). 
  171. 0012[03]: @< Open name. 
  172. 0012[05]: Text. Text scrap[Grey]="Error Recovery Point"
  173. 0012[25]: @> Close name. 
  174. 0012[27]: Text. Text scrap[Grey]="<010>
  175. <010>
  176. 4. Test the minimum length name (the empty name).<010>
  177. "
  178. 0015[01]: @$ Macro defn. 
  179. 0015[03]: @< Open name. 
  180. 0015[05]: @> Close name. 
  181. 0015[07]: @{ Open defn. 
  182. 0015[09]: Text. Text scrap[Grey]="The empty macro name is quite legal in FunnelWeb."
  183. 0015[58]: @} Close defn. 
  184. 0015[60]: Text. Text scrap[Grey]="<010>
  185. <010>
  186. 5. Test a name at the maximum name length limit (80).<010>
  187. ONly the second of the two macros should generate an error.<010>
  188. "
  189. 0020[01]: @$ Macro defn. 
  190. 0020[03]: @< Open name. 
  191. 0020[05]: Text. Text scrap[Grey]="12345678901234567890123456789012345678901234567890123456789012345678901234567890"
  192. 0020[85]: @> Close name. 
  193. 0020[87]: @{ Open defn. 
  194. 0020[89]: @} Close defn. 
  195. 0020[91]: Text. Text scrap[White]="<010>
  196. "
  197. 0021[01]: @$ Macro defn. 
  198. 0021[03]: @< Open name. 
  199. 0021[05]: Text. Text scrap[Grey]="123456789012345678901234567890123456789012345678901234567890123456789012345678901"
  200. 0021[86]: @> Close name. 
  201. 0021[88]: @{ Open defn. 
  202. 0021[90]: @} Close defn. 
  203. 0021[92]: Text. Text scrap[White]="<010>
  204. "
  205. 0022[01]: @A New section (Level 1). 
  206. 0022[03]: @< Open name. 
  207. 0022[05]: Text. Text scrap[Grey]="Error Recovery Point"
  208. 0022[25]: @> Close name. 
  209. 0022[27]: Text. Text scrap[Grey]="<010>
  210. <010>
  211. 6. Test names with all legal characters. There should be no errors.<010>
  212. "
  213. 0025[01]: @$ Macro defn. 
  214. 0025[03]: @< Open name. 
  215. 0025[05]: Text. Text scrap[Grey]=" !"#$%'()*+,-./0123456789:;<=>?"
  216. 0025[36]: @> Close name. 
  217. 0025[38]: @{ Open defn. 
  218. 0025[40]: @} Close defn. 
  219. 0025[42]: Text. Text scrap[White]="<010>
  220. "
  221. 0026[01]: @$ Macro defn. 
  222. 0026[03]: @< Open name. 
  223. 0026[05]: Text. Text scrap[Grey]="ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`"
  224. 0026[37]: @> Close name. 
  225. 0026[39]: @{ Open defn. 
  226. 0026[41]: @} Close defn. 
  227. 0026[43]: Text. Text scrap[White]="<010>
  228. "
  229. 0027[01]: @$ Macro defn. 
  230. 0027[03]: @< Open name. 
  231. 0027[05]: Text. Text scrap[Grey]="abcdefghijklmnopqrstuvwxyz{|}~"
  232. 0027[35]: @> Close name. 
  233. 0027[37]: @{ Open defn. 
  234. 0027[39]: @} Close defn. 
  235. 0027[41]: Text. Text scrap[Grey]="<010>
  236. <010>
  237. 7. Test a name that has inserted text sequences.<010>
  238. <010>
  239. "
  240. 0031[01]: @$ Macro defn. 
  241. 0031[03]: @< Open name. 
  242. 0031[05]: Text. Text scrap[Grey]="A"
  243. 0031[13]: Text. Text scrap[Grey]="@"
  244. 0031[15]: @> Close name. 
  245. 0031[17]: Text. Text scrap[Grey]="=="
  246. 0031[19]: @{ Open defn. 
  247. 0031[21]: @} Close defn. 
  248. 0031[23]: Text. Text scrap[White]="<010>
  249. <010>
  250. <010>
  251. "
  252. 0034[01]: End Of File. 
  253. ============================ End of TOKEN LIST DUMP ============================
  254.  
  255.  
  256. ========================== Start of MACRO TABLE DUMP ===========================
  257.  
  258.  
  259. ------------------- Start of Macro Dump --------------------
  260. Macro Name  : ""
  261. Defined?    : Yes.
  262. Parameters  : 0
  263. Additive?   : No.
  264. Zero Calls? : No.
  265. Many Calls? : No.
  266. Output File?: No.
  267. Call list   :
  268. Macro body  :
  269.  
  270. --Start of List of Body Parts--
  271. This macro has 1 body part.
  272. Body part 1: Seqnum=3, Pos(L,C)=(15,3), Expression follows:
  273.  
  274. ---- Start of Expression ----
  275.  
  276. ----- Start Text Element -----
  277. Text scrap[Grey]="The empty macro name is quite legal in FunnelWeb."
  278. ------ End Text Element ------
  279.  
  280. ----- End of Expression -----
  281.  
  282. ---End of List of Body Parts---
  283.  
  284. -------------------- End of Macro Dump ---------------------
  285.  
  286.  
  287.  
  288. ------------------- Start of Macro Dump --------------------
  289. Macro Name  : " !"#$%'()*+,-./0123456789:;<=>?"
  290. Defined?    : Yes.
  291. Parameters  : 0
  292. Additive?   : No.
  293. Zero Calls? : No.
  294. Many Calls? : No.
  295. Output File?: No.
  296. Call list   :
  297. Macro body  :
  298.  
  299. --Start of List of Body Parts--
  300. This macro has 1 body part.
  301. Body part 1: Seqnum=5, Pos(L,C)=(25,3), Expression follows:
  302.  
  303. ---- Start of Expression ----
  304. ----- End of Expression -----
  305.  
  306. ---End of List of Body Parts---
  307.  
  308. -------------------- End of Macro Dump ---------------------
  309.  
  310.  
  311.  
  312. ------------------- Start of Macro Dump --------------------
  313. Macro Name  : "12345678901234567890123456789012345678901234567890123456789012345678901234567890"
  314. Defined?    : Yes.
  315. Parameters  : 0
  316. Additive?   : No.
  317. Zero Calls? : No.
  318. Many Calls? : No.
  319. Output File?: No.
  320. Call list   :
  321. Macro body  :
  322.  
  323. --Start of List of Body Parts--
  324. This macro has 1 body part.
  325. Body part 1: Seqnum=4, Pos(L,C)=(20,3), Expression follows:
  326.  
  327. ---- Start of Expression ----
  328. ----- End of Expression -----
  329.  
  330. ---End of List of Body Parts---
  331.  
  332. -------------------- End of Macro Dump ---------------------
  333.  
  334.  
  335.  
  336. ------------------- Start of Macro Dump --------------------
  337. Macro Name  : "A@"
  338. Defined?    : Yes.
  339. Parameters  : 0
  340. Additive?   : No.
  341. Zero Calls? : No.
  342. Many Calls? : No.
  343. Output File?: No.
  344. Call list   :
  345. Macro body  :
  346.  
  347. --Start of List of Body Parts--
  348. This macro has 1 body part.
  349. Body part 1: Seqnum=8, Pos(L,C)=(31,3), Expression follows:
  350.  
  351. ---- Start of Expression ----
  352. ----- End of Expression -----
  353.  
  354. ---End of List of Body Parts---
  355.  
  356. -------------------- End of Macro Dump ---------------------
  357.  
  358.  
  359.  
  360. ------------------- Start of Macro Dump --------------------
  361. Macro Name  : "ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`"
  362. Defined?    : Yes.
  363. Parameters  : 0
  364. Additive?   : No.
  365. Zero Calls? : No.
  366. Many Calls? : No.
  367. Output File?: No.
  368. Call list   :
  369. Macro body  :
  370.  
  371. --Start of List of Body Parts--
  372. This macro has 1 body part.
  373. Body part 1: Seqnum=6, Pos(L,C)=(26,3), Expression follows:
  374.  
  375. ---- Start of Expression ----
  376. ----- End of Expression -----
  377.  
  378. ---End of List of Body Parts---
  379.  
  380. -------------------- End of Macro Dump ---------------------
  381.  
  382.  
  383.  
  384. ------------------- Start of Macro Dump --------------------
  385. Macro Name  : "Ordinary"
  386. Defined?    : Yes.
  387. Parameters  : 0
  388. Additive?   : No.
  389. Zero Calls? : No.
  390. Many Calls? : No.
  391. Output File?: No.
  392. Call list   :
  393. Macro body  :
  394.  
  395. --Start of List of Body Parts--
  396. This macro has 1 body part.
  397. Body part 1: Seqnum=1, Pos(L,C)=(4,3), Expression follows:
  398.  
  399. ---- Start of Expression ----
  400.  
  401. ----- Start Text Element -----
  402. Text scrap[Grey]="The text of ordinary"
  403. ------ End Text Element ------
  404.  
  405. ----- End of Expression -----
  406.  
  407. ---End of List of Body Parts---
  408.  
  409. -------------------- End of Macro Dump ---------------------
  410.  
  411.  
  412.  
  413. ------------------- Start of Macro Dump --------------------
  414. Macro Name  : "abcdefghijklmnopqrstuvwxyz{|}~"
  415. Defined?    : Yes.
  416. Parameters  : 0
  417. Additive?   : No.
  418. Zero Calls? : No.
  419. Many Calls? : No.
  420. Output File?: No.
  421. Call list   :
  422. Macro body  :
  423.  
  424. --Start of List of Body Parts--
  425. This macro has 1 body part.
  426. Body part 1: Seqnum=7, Pos(L,C)=(27,3), Expression follows:
  427.  
  428. ---- Start of Expression ----
  429. ----- End of Expression -----
  430.  
  431. ---End of List of Body Parts---
  432.  
  433. -------------------- End of Macro Dump ---------------------
  434.  
  435.  
  436.  
  437. ------------------- Start of Macro Dump --------------------
  438. Macro Name  : "|"
  439. Defined?    : Yes.
  440. Parameters  : 0
  441. Additive?   : No.
  442. Zero Calls? : No.
  443. Many Calls? : No.
  444. Output File?: No.
  445. Call list   :
  446. Macro body  :
  447.  
  448. --Start of List of Body Parts--
  449. This macro has 1 body part.
  450. Body part 1: Seqnum=2, Pos(L,C)=(7,3), Expression follows:
  451.  
  452. ---- Start of Expression ----
  453.  
  454. ----- Start Text Element -----
  455. Text scrap[Grey]="The text of ordinary"
  456. ------ End Text Element ------
  457.  
  458. ----- End of Expression -----
  459.  
  460. ---End of List of Body Parts---
  461.  
  462. -------------------- End of Macro Dump ---------------------
  463.  
  464.  
  465.  
  466. =========================== End of MACRO TABLE DUMP ============================
  467.  
  468.  
  469. ========================= Start of DOCUMENT LIST DUMP ==========================
  470.  
  471.  
  472. TEXT COMPONENT: Pos(L,C)=(1,1). 
  473.  
  474. -- Start of Text Scrap List --
  475. Text scrap[Grey]="PR04: Test the definition of ordinary macros.<010>
  476. <010>
  477. 1. Test an ordinary macro definition.<010>
  478. "
  479. --- End of Text Scrap List ---
  480.  
  481.  
  482. MACRO DEFINITION COMPONENT: Pos(L,C)=(4,1). 
  483. Part 1 of macro @<Ordinary@>.
  484.  
  485. TEXT COMPONENT: Pos(L,C)=(4,39). 
  486.  
  487. -- Start of Text Scrap List --
  488. Text scrap[Grey]="<010>
  489. <010>
  490. 2. Test an ordinary definition using a quickname.<010>
  491. "
  492. --- End of Text Scrap List ---
  493.  
  494.  
  495. MACRO DEFINITION COMPONENT: Pos(L,C)=(7,1). 
  496. Part 1 of macro @<|@>.
  497.  
  498. TEXT COMPONENT: Pos(L,C)=(7,30). 
  499.  
  500. -- Start of Text Scrap List --
  501. Text scrap[Grey]="<010>
  502. <010>
  503. 3. Test a name that includes EOL.<010>
  504. "
  505. --- End of Text Scrap List ---
  506.  
  507.  
  508. TYPESETTER DIRECTIVE COMPONENT: 
  509.    Section "1", Section name="Error Recovery Point".
  510.  
  511. TEXT COMPONENT: Pos(L,C)=(12,27). 
  512.  
  513. -- Start of Text Scrap List --
  514. Text scrap[Grey]="<010>
  515. <010>
  516. 4. Test the minimum length name (the empty name).<010>
  517. "
  518. --- End of Text Scrap List ---
  519.  
  520.  
  521. MACRO DEFINITION COMPONENT: Pos(L,C)=(15,1). 
  522. Part 1 of macro @<@>.
  523.  
  524. TEXT COMPONENT: Pos(L,C)=(15,60). 
  525.  
  526. -- Start of Text Scrap List --
  527. Text scrap[Grey]="<010>
  528. <010>
  529. 5. Test a name at the maximum name length limit (80).<010>
  530. ONly the second of the two macros should generate an error.<010>
  531. "
  532. --- End of Text Scrap List ---
  533.  
  534.  
  535. MACRO DEFINITION COMPONENT: Pos(L,C)=(20,1). 
  536. Part 1 of macro @<12345678901234567890123456789012345678901234567890123456789012345678901234567890@>.
  537.  
  538. TEXT COMPONENT: Pos(L,C)=(20,91). 
  539.  
  540. -- Start of Text Scrap List --
  541. Text scrap[White]="<010>
  542. "
  543. --- End of Text Scrap List ---
  544.  
  545.  
  546. TYPESETTER DIRECTIVE COMPONENT: 
  547.    Section "2", Section name="Error Recovery Point".
  548.  
  549. TEXT COMPONENT: Pos(L,C)=(22,27). 
  550.  
  551. -- Start of Text Scrap List --
  552. Text scrap[Grey]="<010>
  553. <010>
  554. 6. Test names with all legal characters. There should be no errors.<010>
  555. "
  556. --- End of Text Scrap List ---
  557.  
  558.  
  559. MACRO DEFINITION COMPONENT: Pos(L,C)=(25,1). 
  560. Part 1 of macro @< !"#$%'()*+,-./0123456789:;<=>?@>.
  561.  
  562. TEXT COMPONENT: Pos(L,C)=(25,42). 
  563.  
  564. -- Start of Text Scrap List --
  565. Text scrap[White]="<010>
  566. "
  567. --- End of Text Scrap List ---
  568.  
  569.  
  570. MACRO DEFINITION COMPONENT: Pos(L,C)=(26,1). 
  571. Part 1 of macro @<ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`@>.
  572.  
  573. TEXT COMPONENT: Pos(L,C)=(26,43). 
  574.  
  575. -- Start of Text Scrap List --
  576. Text scrap[White]="<010>
  577. "
  578. --- End of Text Scrap List ---
  579.  
  580.  
  581. MACRO DEFINITION COMPONENT: Pos(L,C)=(27,1). 
  582. Part 1 of macro @<abcdefghijklmnopqrstuvwxyz{|}~@>.
  583.  
  584. TEXT COMPONENT: Pos(L,C)=(27,41). 
  585.  
  586. -- Start of Text Scrap List --
  587. Text scrap[Grey]="<010>
  588. <010>
  589. 7. Test a name that has inserted text sequences.<010>
  590. <010>
  591. "
  592. --- End of Text Scrap List ---
  593.  
  594.  
  595. MACRO DEFINITION COMPONENT: Pos(L,C)=(31,1). 
  596. Part 1 of macro @<A@@>.
  597.  
  598. TEXT COMPONENT: Pos(L,C)=(31,23). 
  599.  
  600. -- Start of Text Scrap List --
  601. Text scrap[White]="<010>
  602. <010>
  603. <010>
  604. "
  605. --- End of Text Scrap List ---
  606.  
  607.  
  608. ========================== End of DOCUMENT LIST DUMP ===========================
  609.  
  610.  
  611. Global Local| Input File
  612. ------------+-------------------------------------------------------------------
  613.      1     1| PR04: Test the definition of ordinary macros.
  614.      2     2| 
  615.      3     3| 1. Test an ordinary macro definition.
  616.      4     4| @$@<Ordinary@>@{The text of ordinary@}
  617.      5     5| 
  618.      6     6| 2. Test an ordinary definition using a quickname.
  619.      7     7| @$@#|@{The text of ordinary@}
  620.      8     8| 
  621.      9     9| 3. Test a name that includes EOL.
  622.     10    10| @$@<This name is illegal because
  623.        Error|.....^Names cannot cross lines.
  624.             |.....^Skipping after error to the next major construct...
  625.     11    11| it crosses a lion@>@{And people who cross lions tend to get eaten.@}
  626.     12    12| @A@<Error Recovery Point@>
  627.             |.^...skipped to here after the error.
  628.     13    13| 
  629.     14    14| 4. Test the minimum length name (the empty name).
  630.     15    15| @$@<@>@{The empty macro name is quite legal in FunnelWeb.@}
  631.     16    16| 
  632.     17    17| 5. Test a name at the maximum name length limit (80).
  633.     18    18| ONly the second of the two macros should generate an error.
  634.     19    19| @p maximum_input_line_length = 100
  635.     20    20| @$@<12345678901234567890123456789012345678901234567890123456789012345678901234567890@>@{@}
  636.     21    21| @$@<123456789012345678901234567890123456789012345678901234567890123456789012345678901@>@{@}
  637.        Error|.....^Name is too long.
  638.             |.....^The maximum length of a legal name is 80 characters.
  639.             |.....^Skipping after error to the next major construct...
  640.     22    22| @A@<Error Recovery Point@>
  641.             |.^...skipped to here after the error.
  642.     23    23| 
  643.     24    24| 6. Test names with all legal characters. There should be no errors.
  644.     25    25| @$@< !"#$%'()*+,-./0123456789:;<=>?@>@{@}
  645.     26    26| @$@<ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`@>@{@}
  646.     27    27| @$@<abcdefghijklmnopqrstuvwxyz{|}~@>@{@}
  647.     28    28| 
  648.     29    29| 7. Test a name that has inserted text sequences.
  649.     30    30| 
  650.     31    31| @$@<@^D(065)@@@>==@{@}
  651.     32    32| 
  652.     33    33| 
  653.             | <End-Of-File>
  654. ------------+-------------------------------------------------------------------
  655.  
  656. There were 2 Errors.
  657.