API tools faq
paste
Advertisement
Guest User

strings *.dc42 | grep -C3 1984

a guest
Dec 25th, 2022
35
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.30 KB | None | 0 0
raw download clone embed print report
  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
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!