Advertisement
Guest User

strings *.dc42 | grep -C3 1984

a guest
Dec 25th, 2022
10
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.30 KB | None | 0 0
  1. #BEGIN {DumpIcode}
  2. &GetTD(@TD);
  3. &WriteLn;
  4. &WriteLn('Lisa Pascal I-Code Dump, (C) 1984 Apple Computer, Inc. (Ver ',
  5. .Version, ') - ', TD);
  6. &WriteLn;
  7. &WriteLn;
  8. --
  9. { }
  10. { File: Pas/Dates }
  11. { }
  12. { (C) Copyright 1984 Apple Computer, Inc. }
  13. { }
  14. { 11-Feb-84 }
  15. {****************************************************************************}
  16. --
  17. "(* File: CODE.1.TEXT *)
  18. "(* *)
  19. "(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  20. "(* 1983, 1984 Apple Computer, Inc. *)
  21. "(* *)
  22. "(* All rights reserved. 18-Jul-82 *)
  23. "(* *)
  24. --
  25. "(* File: CODE.2.TEXT *)
  26. "(* *)
  27. "(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  28. "(* 1983, 1984 Apple Computer, Inc. *)
  29. "(* *)
  30. "(* All rights reserved. 18-Jul-82 *)
  31. "(* *)
  32. --
  33. "(* File: CODE.3.TEXT *)
  34. "(* *)
  35. "(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  36. "(* 1983, 1984 Apple Computer, Inc. *)
  37. "(* *)
  38. "(* All rights reserved. 18-Jul-82 *)
  39. "(* *)
  40. --
  41. "(* File: CODE.4.TEXT *)
  42. "(* *)
  43. "(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  44. "(* 1983, 1984 Apple Computer, Inc. *)
  45. "(* *)
  46. "(* All rights reserved. 2-Dec-82 *)
  47. "(* 2-Dec-82 nil ptr bugs fixed in assignstring and assignalfa *)
  48. --
  49. "(* File: CODE.5.TEXT *)
  50. "(* *)
  51. "(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  52. "(* 1983, 1984 Apple Computer, Inc. *)
  53. "(* *)
  54. "(* All rights reserved. 20-Jul-82 *)
  55. "(* *)
  56. --
  57. (* File: CODE.TEXT *)
  58. (* *)
  59. (* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  60. (* 1983, 1984 Apple Computer, Inc. *)
  61. (* *)
  62. (* All rights reserved. 31-Aug-82 *)
  63. (* *)
  64. --
  65. $CONST
  66. &SVS = '1981 SVS, Inc.';
  67. &COPY1 = 'Copyright';
  68. &Apple = '1983, 1984 Apple Computer, Inc.';
  69. &COPY2 = 'Copyright';
  70. $BEGIN {Copyrights - This routine appears here to cause the Apple and SVS
  71. +copyrights to appear physically in the linked code file. It is the
  72. --
  73. { }
  74. { File: Pas/TIMES }
  75. { }
  76. { (C) Copyright 1983, 1984 Apple Computer, Inc. }
  77. { }
  78. { 24-Mar-83 }
  79. { 24-Mar-83 removed "Xhwint" kludge for A2/Mon version }
  80. --
  81. ****** I-CODE BLOCK
  82. 0123456789ABCDEF
  83. ) -
  84. 8.8<Lisa Pascal I-Code Dump, (C) 1984 Apple Computer, Inc. (Ver
  85. MainProgIOPrimit
  86. N^Nu
  87. NITIO
  88. --
  89. "(* File: BODY.TEXT *)
  90. "(* *)
  91. "(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  92. "(* 1983, 1984 Apple Computer, Inc. *)
  93. "(* *)
  94. "(* All rights reserved. 11-Aug-81 *)
  95. "(* *)
  96. --
  97. "(* *)
  98. "(* File: DBG.PAS.TEXT *)
  99. "(* *)
  100. "(* (C) Copyright 1983, 1984 Apple Computer, Inc. *)
  101. "(* *)
  102. "(* *)
  103. "(* 5-Oct-81 *)
  104. --
  105. "(* File: DECL.TEXT *)
  106. "(* *)
  107. "(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  108. "(* 1983, 1984 Apple Computer, Inc. *)
  109. "(* *)
  110. "(* All rights reserved. 11-Aug-81 *)
  111. "(* *)
  112. --
  113. "(* File: DUMP.TEXT *)
  114. "(* *)
  115. "(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  116. "(* 1983, 1984 Apple Computer, Inc. *)
  117. "(* *)
  118. "(* All rights reserved. 28-Jul-82 *)
  119. "(* *)
  120. --
  121. #(* File: GLOBAL.TEXT *)
  122. #(* *)
  123. #(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  124. #(* 1983, 1984 Apple Computer, Inc. *)
  125. #(* *)
  126. #(* All rights reserved. 22-Jun-82 *)
  127. #(* *)
  128. --
  129. "(* File: INIT.TEXT *)
  130. "(* *)
  131. "(* (c) Copyright 1981 Silicon Valley Software, Inc. *)
  132. "(* 1983, 1984 Apple Computer, Inc. *)
  133. "(* *)
  134. "(* All rights reserved. 11-Jun-82 *)
  135. "(* *)
  136. --
  137. $END; {Initialize}
  138. &SVS = '1981 SVS, Inc.';
  139. &COPY1 = 'Copyright';
  140. &APPLE = '1983, 1984 Apple Computer, Inc.';
  141. &COPY2 = 'Copyright';
  142. $BEGIN {CopyRights - this routine appears here to cause the Apple and SVS
  143. +copyrights to appear physically in the linked code file. It is the
  144. --
  145. (* File: PAS/PASCAL.TEXT *)
  146. (* *)
  147. (* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  148. (* 1983, 1984 Apple Computer, Inc. *)
  149. (* *)
  150. (* All rights reserved. 7-Aug-82 *)
  151. (* *)
  152. --
  153. "(* File: MISC.TEXT *)
  154. "(* *)
  155. "(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  156. "(* 1983, 1984 Apple Computer, Inc. *)
  157. "(* *)
  158. "(* All rights reserved. 11-Jun-82 *)
  159. "(* *)
  160. --
  161. "(* File: OPT.1.TEXT *)
  162. "(* *)
  163. "(* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  164. "(* 1983, 1984 Apple Computer, Inc. *)
  165. "(* *)
  166. "(* All rights reserved. 12-Oct-82 *)
  167. "(* *)
  168. --
  169. "(* *)
  170. "(* File: OPT.2.TEXT *)
  171. "(* *)
  172. "(* (C) Copyright 1983, 1984 Apple Computer, Inc. *)
  173. "(* *)
  174. "(* All rights reserved. 22-Feb-84 *)
  175. "(* *)
  176. --
  177. (* File: PAS/PASCAL.TEXT *)
  178. (* *)
  179. (* (C) Copyright 1981 Silicon Valley Software, Inc. *)
  180. (* 1983, 1984 Apple Computer, Inc. *)
  181. (* *)
  182. (* All rights reserved. 7-Aug-82 *)
  183. (* *)
  184. --
  185. N^Nu
  186. OPYRIGH
  187. Copyright
  188. 1983, 1984 Apple Computer, Inc.
  189. (c)
  190. 1981 SVS, Inc.
  191. (c)Jo
  192. --
  193. N^Nu
  194. OPYRIGH
  195. Copyright
  196. 1983, 1984 Apple Computer, Inc.
  197. (c)
  198. 1981 SVS, Inc.
  199. (c)Jo
  200. --
  201. { }
  202. { File: Pas/Dates }
  203. { }
  204. { (C) Copyright 1984 Apple Computer, Inc. }
  205. { }
  206. { 11-Feb-84 }
  207. {****************************************************************************}
  208. --
  209. { }
  210. { File: Pas/TIMES }
  211. { }
  212. { (C) Copyright 1983, 1984 Apple Computer, Inc. }
  213. { }
  214. { 24-Mar-83 }
  215. { 24-Mar-83 removed "Xhwint" kludge for A2/Mon version }
  216. --
  217. 6END;
  218. (*****************************************************************************)
  219. (* File: PAS/OBJINTER.TEXT *)
  220. (* (C) Copyright 1983, 1984 Apple Computer, Inc. *)
  221. (* All rights reserved. *)
  222. (* 11-Jan-84 *)
  223. (* 11-Jan-84 Converted to Spring Release IUMan Data Structures *)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement