home *** CD-ROM | disk | FTP | other *** search
/ GEMini Atari / GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso / files / program / funnel / sc15.lis < prev    next >
Encoding:
File List  |  1993-10-23  |  19.7 KB  |  356 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. | 53 43 31 35 3A 20 54 65 73 74 20 74 68 61 74 20 | SC15: Test that  |
  13. | 63 65 72 74 61 69 6E 20 61 74 74 72 69 62 75 74 | certain attribut |
  14. | 65 73 20 61 72 65 20 73 61 76 65 64 20 61 63 72 | es are saved acr |
  15. | 6F 73 73 20 69 6E 63 6C 75 73 69 6F 6E 73 2E 0A | oss inclusions.. |
  16. | 0A 31 2E 20 4D 61 78 69 6D 75 6D 20 69 6E 70 75 | .1. Maximum inpu |
  17. | 74 20 6C 69 6E 65 20 6C 65 6E 67 74 68 2E 0A 32 | t line length..2 |
  18. | 2E 20 53 70 65 63 69 61 6C 20 63 68 61 72 61 63 | . Special charac |
  19. | 74 65 72 2E 0A 33 2E 20 4C 6F 63 61 6C 20 6C 69 | ter..3. Local li |
  20. | 6E 65 20 6E 75 6D 62 65 72 2E 0A 0A 54 6F 20 74 | ne number...To t |
  21. | 65 73 74 20 74 68 69 73 2C 20 77 65 20 66 69 72 | est this, we fir |
  22. | 73 74 20 73 65 74 20 74 68 65 20 66 69 72 73 74 | st set the first |
  23. | 20 74 77 6F 20 61 74 74 72 69 62 75 74 65 73 20 |  two attributes  |
  24. | 61 77 61 79 20 66 72 6F 6D 20 74 68 65 0A 64 65 | away from the.de |
  25. | 66 61 75 6C 74 2E 20 54 68 69 73 20 77 69 6C 6C | fault. This will |
  26. | 20 65 6E 61 62 6C 65 20 75 73 20 74 6F 20 62 65 |  enable us to be |
  27. | 20 73 75 72 65 20 74 68 61 74 20 77 68 65 6E 20 |  sure that when  |
  28. | 74 68 65 79 20 61 72 65 20 72 65 73 74 6F 72 65 | they are restore |
  29. | 64 20 74 68 61 74 0A 74 68 65 79 20 61 72 65 20 | d that.they are  |
  30. | 62 65 69 6E 67 20 72 65 73 74 6F 72 65 64 20 74 | being restored t |
  31. | 6F 20 74 68 65 69 72 20 66 6F 72 6D 65 72 20 76 | o their former v |
  32. | 61 6C 75 65 73 20 61 6E 64 20 6E 6F 74 20 6A 75 | alues and not ju |
  33. | 73 74 20 73 65 74 20 74 6F 20 74 68 65 0A 64 65 | st set to the.de |
  34. | 66 61 75 6C 74 2E 0A 0A 40 3D 2A 20 20 20 2A 21 | fault...@=*   *! |
  35. | 20 43 68 61 6E 67 65 20 74 68 65 20 73 70 65 63 |  Change the spec |
  36. | 69 61 6C 20 63 68 61 72 61 63 74 65 72 2E 0A 2A | ial character..* |
  37. | 70 20 6D 61 78 69 6D 75 6D 5F 69 6E 70 75 74 5F | p maximum_input_ |
  38. | 6C 69 6E 65 5F 6C 65 6E 67 74 68 20 3D 20 37 35 | line_length = 75 |
  39. | 0A 0A 42 65 66 6F 72 65 20 69 6E 63 6C 75 64 65 | ..Before include |
  40. | 2E 0A 2A 69 20 73 63 31 35 61 0A 41 66 74 65 72 | ..*i sc15a.After |
  41. | 20 69 6E 63 6C 75 64 65 2E 0A 0A 49 66 20 74 68 |  include...If th |
  42. | 65 20 6D 61 78 69 6D 75 6D 20 69 6E 70 75 74 20 | e maximum input  |
  43. | 6C 69 6E 65 20 6C 65 6E 67 74 68 20 68 61 73 20 | line length has  |
  44. | 62 65 65 6E 20 63 6F 72 72 65 63 74 6C 79 20 72 | been correctly r |
  45. | 65 73 74 6F 72 65 64 20 74 68 65 6E 20 74 68 65 | estored then the |
  46. | 0A 73 65 63 6F 6E 64 20 6F 66 20 74 68 65 20 66 | .second of the f |
  47. | 6F 6C 6C 6F 77 69 6E 67 20 74 77 6F 20 6C 69 6E | ollowing two lin |
  48. | 65 73 20 73 68 6F 75 6C 64 20 67 69 76 65 20 61 | es should give a |
  49. | 6E 20 65 72 72 6F 72 2C 20 62 75 74 20 6E 6F 74 | n error, but not |
  50. | 20 74 68 65 20 66 69 72 73 74 2E 0A 31 32 33 34 |  the first..1234 |
  51. | 35 36 37 38 39 30 31 32 33 34 35 36 37 38 39 30 | 5678901234567890 |
  52. | 31 32 33 34 35 36 37 38 39 30 31 32 33 34 35 36 | 1234567890123456 |
  53. | 37 38 39 30 31 32 33 34 35 36 37 38 39 30 31 32 | 7890123456789012 |
  54. | 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 38 | 3456789012345678 |
  55. | 39 30 31 32 33 34 35 0A 31 32 33 34 35 36 37 38 | 9012345.12345678 |
  56. | 39 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 | 9012345678901234 |
  57. | 35 36 37 38 39 30 31 32 33 34 35 36 37 38 39 30 | 5678901234567890 |
  58. | 31 32 33 34 35 36 37 38 39 30 31 32 33 34 35 36 | 1234567890123456 |
  59. | 37 38 39 30 31 32 33 34 35 36 37 38 39 30 31 32 | 7890123456789012 |
  60. | 33 34 35 36 0A 0A 49 66 20 74 68 65 20 73 70 65 | 3456..If the spe |
  61. | 63 69 61 6C 20 63 68 61 72 61 63 74 65 72 20 68 | cial character h |
  62. | 61 73 20 62 65 65 6E 20 70 72 65 73 65 72 76 65 | as been preserve |
  63. | 64 2C 20 74 68 65 6E 20 74 68 65 20 66 6F 6C 6C | d, then the foll |
  64. | 6F 77 69 6E 67 20 73 68 6F 75 6C 64 0A 67 65 6E | owing should.gen |
  65. | 65 72 61 74 65 20 61 6E 20 65 72 72 6F 72 2E 0A | erate an error.. |
  66. | 0A 2A 20 20 20 2D 20 54 68 69 73 20 73 68 6F 75 | .*   - This shou |
  67. | 6C 64 20 67 65 6E 65 72 61 74 65 20 61 6E 20 65 | ld generate an e |
  68. | 72 72 6F 72 20 69 66 20 61 6C 6C 20 69 73 20 77 | rror if all is w |
  69. | 65 6C 6C 2E 0A 0A 50 72 65 73 65 72 76 61 74 69 | ell...Preservati |
  70. | 6F 6E 20 6F 66 20 74 68 65 20 6C 6F 63 61 6C 20 | on of the local  |
  71. | 6C 69 6E 65 20 6E 75 6D 62 65 72 20 63 61 6E 20 | line number can  |
  72. | 62 65 20 63 68 65 63 6B 65 64 20 62 79 20 6C 6F | be checked by lo |
  73. | 6F 6B 69 6E 67 20 61 74 20 74 68 65 0A 6C 69 73 | oking at the.lis |
  74. | 74 69 6E 67 20 66 69 6C 65 2E 0A                | ting file..      |
  75. +-------------------------------------------------+------------------+
  76.  
  77. Dump of mapped file "<<Suppressed>>".
  78.  
  79. MEMORY DUMP OF MAPPED FILE
  80. ==========================
  81.  
  82. +-------------------------------------------------+------------------+
  83. | 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F | 0123456789ABCDEF |
  84. +-------------------------------------------------+------------------+
  85. | 54 68 69 73 20 69 73 20 74 68 65 20 69 6E 63 6C | This is the incl |
  86. | 75 64 65 20 66 69 6C 65 20 66 6F 72 20 74 65 73 | ude file for tes |
  87. | 74 20 53 43 31 35 2E 20 54 68 65 20 53 43 31 35 | t SC15. The SC15 |
  88. | 20 74 65 73 74 20 63 68 65 63 6B 73 20 74 6F 20 |  test checks to  |
  89. | 6D 61 6B 65 0A 73 75 72 65 20 74 68 61 74 20 46 | make.sure that F |
  90. | 75 6E 6E 65 6C 57 65 62 20 69 73 20 73 61 76 69 | unnelWeb is savi |
  91. | 6E 67 20 61 6E 64 20 72 65 73 74 6F 72 69 6E 67 | ng and restoring |
  92. | 20 74 68 72 65 65 20 73 63 61 6E 6E 69 6E 67 0A |  three scanning. |
  93. | 61 74 74 72 69 62 75 74 65 73 20 61 63 72 6F 73 | attributes acros |
  94. | 73 20 69 6E 63 6C 75 64 65 20 66 69 6C 65 73 2E | s include files. |
  95. | 20 57 65 20 61 6C 73 6F 20 77 61 6E 74 20 74 6F |  We also want to |
  96. | 20 6D 61 6B 65 20 73 75 72 65 0A 74 68 61 74 20 |  make sure.that  |
  97. | 74 68 65 20 73 63 61 6E 6E 65 72 20 69 73 20 69 | the scanner is i |
  98. | 6E 69 74 69 61 6C 69 7A 69 6E 67 20 74 68 65 73 | nitializing thes |
  99. | 65 20 61 74 74 72 69 62 75 74 65 73 20 63 6F 72 | e attributes cor |
  100. | 72 65 63 74 6C 79 20 77 69 74 68 69 6E 0A 74 68 | rectly within.th |
  101. | 65 20 69 6E 63 6C 75 64 65 20 66 69 6C 65 2E 0A | e include file.. |
  102. | 0A 53 43 31 35 2E 34 3A 20 4D 61 6B 65 20 73 75 | .SC15.4: Make su |
  103. | 72 65 20 74 68 61 74 20 74 68 65 20 73 70 65 63 | re that the spec |
  104. | 69 61 6C 20 63 68 61 72 61 63 74 65 72 20 69 73 | ial character is |
  105. | 20 41 54 20 61 74 20 74 68 65 20 73 74 61 72 74 |  AT at the start |
  106. | 20 6F 66 0A 69 6E 63 6C 75 64 65 20 66 69 6C 65 |  of.include file |
  107. | 73 2E 0A 0A 40 20 20 20 20 2D 20 54 68 69 73 20 | s...@    - This  |
  108. | 73 68 6F 75 6C 64 20 79 69 65 6C 64 20 61 6E 20 | should yield an  |
  109. | 65 72 72 6F 72 2E 0A 0A 53 43 31 35 2E 35 20 45 | error...SC15.5 E |
  110. | 6E 73 75 72 65 20 74 68 61 74 20 74 68 65 20 6D | nsure that the m |
  111. | 61 78 69 6D 75 6D 20 69 6E 70 75 74 20 6C 69 6E | aximum input lin |
  112. | 65 20 6C 65 6E 67 74 68 20 69 73 20 38 30 20 61 | e length is 80 a |
  113. | 74 20 74 68 65 20 73 74 61 72 74 0A 6F 66 20 61 | t the start.of a |
  114. | 6E 20 69 6E 63 6C 75 64 65 20 66 69 6C 65 2E 20 | n include file.  |
  115. | 49 66 20 61 6C 6C 20 69 73 20 77 65 6C 6C 2C 20 | If all is well,  |
  116. | 6F 6E 6C 79 20 74 68 65 20 73 65 63 6F 6E 64 20 | only the second  |
  117. | 6F 66 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 | of the following |
  118. | 20 74 77 6F 0A 6C 69 6E 65 73 20 77 69 6C 6C 20 |  two.lines will  |
  119. | 70 72 6F 76 6F 6B 65 20 61 20 22 6C 69 6E 65 20 | provoke a "line  |
  120. | 74 6F 6F 20 6C 6F 6E 67 22 20 65 72 72 6F 72 2E | too long" error. |
  121. | 0A 0A 31 32 33 34 35 36 37 38 39 30 31 32 33 34 | ..12345678901234 |
  122. | 35 36 37 38 39 30 31 32 33 34 35 36 37 38 39 30 | 5678901234567890 |
  123. | 31 32 33 34 35 36 37 38 39 30 31 32 33 34 35 36 | 1234567890123456 |
  124. | 37 38 39 30 31 32 33 34 35 36 37 38 39 30 31 32 | 7890123456789012 |
  125. | 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 38 | 3456789012345678 |
  126. | 39 30 0A 31 32 33 34 35 36 37 38 39 30 31 32 33 | 90.1234567890123 |
  127. | 34 35 36 37 38 39 30 31 32 33 34 35 36 37 38 39 | 4567890123456789 |
  128. | 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 35 | 0123456789012345 |
  129. | 36 37 38 39 30 31 32 33 34 35 36 37 38 39 30 31 | 6789012345678901 |
  130. | 32 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 | 2345678901234567 |
  131. | 38 39 30 31 0A 0A 4E 6F 77 20 74 68 61 74 20 77 | 8901..Now that w |
  132. | 65 20 68 61 76 65 20 63 68 65 63 6B 65 64 20 74 | e have checked t |
  133. | 68 65 20 64 65 66 61 75 6C 74 20 61 74 74 72 69 | he default attri |
  134. | 62 75 74 65 73 20 6F 6E 20 65 6E 74 65 72 69 6E | butes on enterin |
  135. | 67 20 61 6E 20 69 6E 63 6C 75 64 65 20 66 69 6C | g an include fil |
  136. | 65 2C 0A 77 65 20 77 61 6E 74 20 74 6F 20 73 74 | e,.we want to st |
  137. | 75 66 66 20 74 68 65 6D 20 75 70 20 73 6F 20 61 | uff them up so a |
  138. | 73 20 74 6F 20 6D 61 6B 65 20 73 75 72 65 20 74 | s to make sure t |
  139. | 68 61 74 20 74 68 65 20 61 74 74 72 69 62 75 74 | hat the attribut |
  140. | 65 73 0A 70 72 65 76 61 69 6C 69 6E 67 20 77 68 | es.prevailing wh |
  141. | 65 6E 20 74 68 65 20 69 6E 63 6C 75 64 65 20 77 | en the include w |
  142. | 61 73 20 68 69 74 20 61 72 65 20 72 65 73 74 6F | as hit are resto |
  143. | 72 65 64 2E 0A 0A 40 70 20 6D 61 78 69 6D 75 6D | red...@p maximum |
  144. | 5F 69 6E 70 75 74 5F 6C 69 6E 65 5F 6C 65 6E 67 | _input_line_leng |
  145. | 74 68 20 3D 20 36 35 0A 40 3D 2B 0A 0A          | th = 65.@=+..    |
  146. +-------------------------------------------------+------------------+
  147.  
  148.  
  149. =========================== Start of LINE LIST DUMP ============================
  150.  
  151. Globl Local| Text
  152. -----------+--------------------------------------------------------------------
  153. 00001 00001| SC15: Test that certain attributes are saved across inclusions.<010>
  154. 00002 00002| <010>
  155. 00003 00003| 1. Maximum input line length.<010>
  156. 00004 00004| 2. Special character.<010>
  157. 00005 00005| 3. Local line number.<010>
  158. 00006 00006| <010>
  159. 00007 00007| To test this, we first set the first two attributes away from the<010>
  160. 00008 00008| default. This will enable us to be sure that when they are restored that<010>
  161. 00009 00009| they are being restored to their former values and not just set to the<010>
  162. 00010 00010| default.<010>
  163. 00011 00011| <010>
  164. 00012 00012| @=*   *! Change the special character.<010>
  165. 00013 00013| *p maximum_input_line_length = 75<010>
  166. 00014 00014| <010>
  167. 00015 00015| Before include.<010>
  168. 00016 00016| *i sc15a<010>
  169. 00017 00001| This is the include file for test SC15. The SC15 test checks to make<010>
  170. 00018 00002| sure that FunnelWeb is saving and restoring three scanning<010>
  171. 00019 00003| attributes across include files. We also want to make sure<010>
  172. 00020 00004| that the scanner is initializing these attributes correctly within<010>
  173. 00021 00005| the include file.<010>
  174. 00022 00006| <010>
  175. 00023 00007| SC15.4: Make sure that the special character is AT at the start of<010>
  176. 00024 00008| include files.<010>
  177. 00025 00009| <010>
  178. 00026 00010| @    - This should yield an error.<010>
  179. 00027 00011| <010>
  180. 00028 00012| SC15.5 Ensure that the maximum input line length is 80 at the start<010>
  181. 00029 00013| of an include file. If all is well, only the second of the following two<010>
  182. 00030 00014| lines will provoke a "line too long" error.<010>
  183. 00031 00015| <010>
  184. 00032 00016| 12345678901234567890123456789012345678901234567890123456789012345678901234567890<010>
  185. 00033 00017| 123456789012345678901234567890123456789012345678901234567890123456789012345678901<010>
  186. 00034 00018| <010>
  187. 00035 00019| Now that we have checked the default attributes on entering an include file,<010>
  188. 00036 00020| we want to stuff them up so as to make sure that the attributes<010>
  189. 00037 00021| prevailing when the include was hit are restored.<010>
  190. 00038 00022| <010>
  191. 00039 00023| @p maximum_input_line_length = 65<010>
  192. 00040 00024| @=+<010>
  193. 00041 00025| <010>
  194. 00042 00017| After include.<010>
  195. 00043 00018| <010>
  196. 00044 00019| If the maximum input line length has been correctly restored then the<010>
  197. 00045 00020| second of the following two lines should give an error, but not the first.<010>
  198. 00046 00021| 123456789012345678901234567890123456789012345678901234567890123456789012345<010>
  199. 00047 00022| 1234567890123456789012345678901234567890123456789012345678901234567890123456<010>
  200. 00048 00023| <010>
  201. 00049 00024| If the special character has been preserved, then the following should<010>
  202. 00050 00025| generate an error.<010>
  203. 00051 00026| <010>
  204. 00052 00027| *   - This should generate an error if all is well.<010>
  205. 00053 00028| <010>
  206. 00054 00029| Preservation of the local line number can be checked by looking at the<010>
  207. 00055 00030| listing file.<010>
  208. 00056 00031| <End-Of-File><010>
  209. -----------+--------------------------------------------------------------------
  210. Globl Local| Text
  211.  
  212. ============================ End of LINE LIST DUMP =============================
  213.  
  214.  
  215. =========================== Start of TOKEN LIST DUMP ===========================
  216.  
  217. Summary: There are 9 tokens in the token list.
  218.  
  219. Line[Column]: Token Description
  220. -------------------------------
  221.  
  222. 0001[01]: Text. Text scrap[Grey]="SC15: Test that certain attributes are saved across inclusions.<010>
  223. <010>
  224. 1. Maximum input line length.<010>
  225. 2. Special character.<010>
  226. 3. Local line number.<010>
  227. <010>
  228. To test this, we first set the first two attributes away from the<010>
  229. default. This will enable us to be sure that when they are restored that<010>
  230. they are being restored to their former values and not just set to the<010>
  231. default.<010>
  232. <010>
  233. "
  234. 0012[04]: Text. Text scrap[White]="   "
  235. 0014[01]: Text. Text scrap[Grey]="<010>
  236. Before include.<010>
  237. "
  238. 0017[01]: Text. Text scrap[Grey]="This is the include file for test SC15. The SC15 test checks to make<010>
  239. sure that FunnelWeb is saving and restoring three scanning<010>
  240. attributes across include files. We also want to make sure<010>
  241. that the scanner is initializing these attributes correctly within<010>
  242. the include file.<010>
  243. <010>
  244. SC15.4: Make sure that the special character is AT at the start of<010>
  245. include files.<010>
  246. <010>
  247. "
  248. 0026[03]: Text. Text scrap[Grey]="   - This should yield an error.<010>
  249. <010>
  250. SC15.5 Ensure that the maximum input line length is 80 at the start<010>
  251. of an include file. If all is well, only the second of the following two<010>
  252. lines will provoke a "line too long" error.<010>
  253. <010>
  254. 12345678901234567890123456789012345678901234567890123456789012345678901234567890<010>
  255. 123456789012345678901234567890123456789012345678901234567890123456789012345678901<010>
  256. <010>
  257. Now that we have checked the default attributes on entering an include file,<010>
  258. we want to stuff them up so as to make sure that the attributes<010>
  259. prevailing when the include was hit are restored.<010>
  260. <010>
  261. "
  262. 0040[04]: Text. Text scrap[White]="<010>
  263. <010>
  264. "
  265. 0042[01]: Text. Text scrap[Grey]="After include.<010>
  266. <010>
  267. If the maximum input line length has been correctly restored then the<010>
  268. second of the following two lines should give an error, but not the first.<010>
  269. 123456789012345678901234567890123456789012345678901234567890123456789012345<010>
  270. 1234567890123456789012345678901234567890123456789012345678901234567890123456<010>
  271. <010>
  272. If the special character has been preserved, then the following should<010>
  273. generate an error.<010>
  274. <010>
  275. "
  276. 0052[03]: Text. Text scrap[Grey]="  - This should generate an error if all is well.<010>
  277. <010>
  278. Preservation of the local line number can be checked by looking at the<010>
  279. listing file.<010>
  280. "
  281. 0056[01]: End Of File. 
  282. ============================ End of TOKEN LIST DUMP ============================
  283.  
  284. Macro table dump skipped (Parser was not invoked).
  285. Document list dump skipped (Parser was not invoked).
  286.  
  287. Global Local| Input File
  288. ------------+-------------------------------------------------------------------
  289.      1     1| SC15: Test that certain attributes are saved across inclusions.
  290.      2     2| 
  291.      3     3| 1. Maximum input line length.
  292.      4     4| 2. Special character.
  293.      5     5| 3. Local line number.
  294.      6     6| 
  295.      7     7| To test this, we first set the first two attributes away from the
  296.      8     8| default. This will enable us to be sure that when they are restored that
  297.      9     9| they are being restored to their former values and not just set to the
  298.     10    10| default.
  299.     11    11| 
  300.     12    12| @=*   *! Change the special character.
  301.     13    13| *p maximum_input_line_length = 75
  302.     14    14| 
  303.     15    15| Before include.
  304.     16    16| *i sc15a
  305.     17     1| This is the include file for test SC15. The SC15 test checks to make
  306.     18     2| sure that FunnelWeb is saving and restoring three scanning
  307.     19     3| attributes across include files. We also want to make sure
  308.     20     4| that the scanner is initializing these attributes correctly within
  309.     21     5| the include file.
  310.     22     6| 
  311.     23     7| SC15.4: Make sure that the special character is AT at the start of
  312.     24     8| include files.
  313.     25     9| 
  314.     26    10| @    - This should yield an error.
  315.        Error|.^<special><space> is not a legal special sequence.
  316.     27    11| 
  317.     28    12| SC15.5 Ensure that the maximum input line length is 80 at the start
  318.     29    13| of an include file. If all is well, only the second of the following two
  319.     30    14| lines will provoke a "line too long" error.
  320.     31    15| 
  321.     32    16| 12345678901234567890123456789012345678901234567890123456789012345678901234567890
  322.     33    17| 123456789012345678901234567890123456789012345678901234567890123456789012345678901
  323.        Error|.................................................................................^Input line is too long (this character is the first offender).
  324.             |.................................................................................^Currently, the maximum allowable input line length is 80.
  325.             |.................................................................................^Note: You can change this using a pragma directive (@p).
  326.     34    18| 
  327.     35    19| Now that we have checked the default attributes on entering an include file,
  328.     36    20| we want to stuff them up so as to make sure that the attributes
  329.     37    21| prevailing when the include was hit are restored.
  330.     38    22| 
  331.     39    23| @p maximum_input_line_length = 65
  332.     40    24| @=+
  333.     41    25| 
  334.     42    17| After include.
  335.     43    18| 
  336.     44    19| If the maximum input line length has been correctly restored then the
  337.     45    20| second of the following two lines should give an error, but not the first.
  338.     46    21| 123456789012345678901234567890123456789012345678901234567890123456789012345
  339.     47    22| 1234567890123456789012345678901234567890123456789012345678901234567890123456
  340.        Error|............................................................................^Input line is too long (this character is the first offender).
  341.             |............................................................................^Currently, the maximum allowable input line length is 75.
  342.             |............................................................................^Note: You can change this using a pragma directive (@p).
  343.     48    23| 
  344.     49    24| If the special character has been preserved, then the following should
  345.     50    25| generate an error.
  346.     51    26| 
  347.     52    27| *   - This should generate an error if all is well.
  348.        Error|.^<special><space> is not a legal special sequence.
  349.     53    28| 
  350.     54    29| Preservation of the local line number can be checked by looking at the
  351.     55    30| listing file.
  352.             | <End-Of-File>
  353. ------------+-------------------------------------------------------------------
  354.  
  355. There were 4 Errors.
  356.