home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1994-10-16 | 2.4 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| gt2
| Kopftext: ';;; Source file'
| default (weak)
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 3b 3b 20 53 6f 75 72 | 63 65 20 66 69 6c 65 3a |;;; Sour|ce file:|
|00000010| 20 2f 75 73 72 2f 6c 6f | 63 61 6c 2f 6c 69 62 2f | /usr/lo|cal/lib/|
|00000020| 6a 61 64 65 2f 33 2e 32 | 2f 6c 69 73 70 2f 64 65 |jade/3.2|/lisp/de|
|00000030| 62 75 67 2e 6a 6c 0a 3b | 3b 3b 20 43 6f 6d 70 69 |bug.jl.;|;; Compi|
|00000040| 6c 65 64 20 62 79 20 6a | 73 68 40 6f 72 63 72 69 |led by j|sh@orcri|
|00000050| 73 74 20 6f 6e 20 53 75 | 6e 20 4f 63 74 20 31 36 |st on Su|n Oct 16|
|00000060| 20 32 30 3a 32 31 3a 31 | 35 20 31 39 39 34 0a 3b | 20:21:1|5 1994.;|
|00000070| 3b 3b 20 4a 61 64 65 20 | 33 2e 32 0a 0a 28 70 72 |;; Jade |3.2..(pr|
|00000080| 6f 76 69 64 65 20 28 71 | 75 6f 74 65 20 64 65 62 |ovide (q|uote deb|
|00000090| 75 67 29 29 0a 0a 28 64 | 65 66 76 61 72 20 64 65 |ug))..(d|efvar de|
|000000a0| 62 75 67 2d 62 75 66 66 | 65 72 20 28 6d 61 6b 65 |bug-buff|er (make|
|000000b0| 2d 62 75 66 66 65 72 20 | 22 2a 64 65 62 75 67 67 |-buffer |"*debugg|
|000000c0| 65 72 2a 22 29 20 39 32 | 34 37 32 29 0a 0a 28 73 |er*") 92|472)..(s|
|000000d0| 65 74 2d 62 75 66 66 65 | 72 2d 73 70 65 63 69 61 |et-buffe|r-specia|
|000000e0| 6c 20 64 65 62 75 67 2d | 62 75 66 66 65 72 20 74 |l debug-|buffer t|
|000000f0| 29 0a 0a 28 61 64 64 2d | 62 75 66 66 65 72 20 64 |)..(add-|buffer d|
|00000100| 65 62 75 67 2d 62 75 66 | 66 65 72 29 0a 0a 28 64 |ebug-buf|fer)..(d|
|00000110| 65 66 76 61 72 20 64 65 | 62 75 67 2d 63 74 72 6c |efvar de|bug-ctrl|
|00000120| 2d 63 2d 6b 65 79 6d 61 | 70 20 28 6d 61 6b 65 2d |-c-keyma|p (make-|
|00000130| 6b 65 79 6c 69 73 74 29 | 20 39 32 35 30 39 29 0a |keylist)| 92509).|
|00000140| 0a 28 62 69 6e 64 2d 6b | 65 79 73 20 64 65 62 75 |.(bind-k|eys debu|
|00000150| 67 2d 63 74 72 6c 2d 63 | 2d 6b 65 79 6d 61 70 20 |g-ctrl-c|-keymap |
|00000160| 22 43 74 72 6c 2d 73 22 | 20 28 71 75 6f 74 65 20 |"Ctrl-s"| (quote |
|00000170| 64 65 62 75 67 2d 73 74 | 65 70 29 20 22 43 74 72 |debug-st|ep) "Ctr|
|00000180| 6c 2d 69 22 20 28 71 75 | 6f 74 65 20 28 64 65 62 |l-i" (qu|ote (deb|
|00000190| 75 67 2d 73 65 74 2d 72 | 65 73 75 6c 74 20 6e 69 |ug-set-r|esult ni|
|000001a0| 6c 29 29 20 22 43 74 72 | 6c 2d 6e 22 20 28 71 75 |l)) "Ctr|l-n" (qu|
|000001b0| 6f 74 65 20 64 65 62 75 | 67 2d 6e 65 78 74 29 20 |ote debu|g-next) |
|000001c0| 22 43 74 72 6c 2d 63 22 | 20 28 71 75 6f 74 65 20 |"Ctrl-c"| (quote |
|000001d0| 64 65 62 75 67 2d 63 6f | 6e 74 69 6e 75 65 29 20 |debug-co|ntinue) |
|000001e0| 22 43 74 72 6c 2d 72 22 | 20 28 71 75 6f 74 65 20 |"Ctrl-r"| (quote |
|000001f0| 64 65 62 75 67 2d 63 6f | 6e 74 69 6e 75 65 29 20 |debug-co|ntinue) |
|00000200| 22 43 74 72 6c 2d 62 22 | 20 28 71 75 6f 74 65 20 |"Ctrl-b"| (quote |
|00000210| 28 64 65 62 75 67 2d 62 | 61 63 6b 74 72 61 63 65 |(debug-b|acktrace|
|00000220| 20 32 29 29 20 22 43 74 | 72 6c 2d 78 22 20 28 71 | 2)) "Ct|rl-x" (q|
|00000230| 75 6f 74 65 20 64 65 62 | 75 67 2d 73 65 74 2d 72 |uote deb|ug-set-r|
|00000240| 65 73 75 6c 74 29 29 0a | 0a 28 64 65 66 75 6e 20 |esult)).|.(defun |
|00000250| 64 65 62 75 67 2d 6d 6f | 64 65 20 6e 69 6c 20 39 |debug-mo|de nil 9|
|00000260| 32 35 34 36 20 28 6a 61 | 64 65 2d 62 79 74 65 2d |2546 (ja|de-byte-|
|00000270| 63 6f 64 65 20 22 18 21 | 12 23 14 46 25 22 20 5b |code ".!|.#.F%" [|
|00000280| 64 65 62 75 67 2d 63 74 | 72 6c 2d 63 2d 6b 65 79 |debug-ct|rl-c-key|
|00000290| 6d 61 70 20 63 74 72 6c | 2d 63 2d 6b 65 79 6d 61 |map ctrl|-c-keyma|
|000002a0| 70 20 64 65 62 75 67 2d | 6d 6f 64 65 20 6d 61 6a |p debug-|mode maj|
|000002b0| 6f 72 2d 6d 6f 64 65 20 | 22 44 65 62 75 67 22 20 |or-mode |"Debug" |
|000002c0| 6d 6f 64 65 2d 6e 61 6d | 65 5d 20 32 29 29 0a 0a |mode-nam|e] 2))..|
|000002d0| 28 6a 61 64 65 2d 62 79 | 74 65 2d 63 6f 64 65 20 |(jade-by|te-code |
|000002e0| 22 18 b1 11 08 48 12 08 | 48 13 14 09 47 b1 48 22 |"....H..|H...G.H"|
|000002f0| 20 5b 64 65 62 75 67 2d | 62 75 66 66 65 72 20 64 | [debug-|buffer d|
|00000300| 65 62 75 67 2d 6d 6f 64 | 65 20 73 70 6c 69 74 2d |ebug-mod|e split-|
|00000310| 6c 69 6e 65 20 69 6e 73 | 65 72 74 20 22 3a 3a 4c |line ins|ert "::L|
|00000320| 69 73 70 20 44 65 62 75 | 67 67 65 72 3a 3a 0a 0a |isp Debu|gger::..|
|00000330| 43 74 72 6c 2d 63 20 43 | 74 72 6c 2d 73 09 3a 20 |Ctrl-c C|trl-s.: |
|00000340| 53 74 65 70 20 69 6e 74 | 6f 20 66 6f 72 6d 0a 43 |Step int|o form.C|
|00000350| 74 72 6c 2d 63 20 43 74 | 72 6c 2d 69 09 3a 20 49 |trl-c Ct|rl-i.: I|
|00000360| 67 6e 6f 72 65 20 66 6f | 72 6d 0a 43 74 72 6c 2d |gnore fo|rm.Ctrl-|
|00000370| 63 20 43 74 72 6c 2d 6e | 09 3a 20 43 6f 6e 74 69 |c Ctrl-n|.: Conti|
|00000380| 6e 75 65 20 75 6e 74 69 | 6c 20 6e 65 78 74 20 66 |nue unti|l next f|
|00000390| 6f 72 6d 0a 43 74 72 6c | 2d 63 20 43 74 72 6c 2d |orm.Ctrl|-c Ctrl-|
|000003a0| 72 09 3a 20 43 6f 6e 74 | 69 6e 75 65 0a 43 74 72 |r.: Cont|inue.Ctr|
|000003b0| 6c 2d 63 20 43 74 72 6c | 2d 62 09 3a 20 50 72 69 |l-c Ctrl|-b.: Pri|
|000003c0| 6e 74 20 62 61 63 6b 74 | 72 61 63 65 0a 43 74 72 |nt backt|race.Ctr|
|000003d0| 6c 2d 63 20 43 74 72 6c | 2d 78 09 3a 20 53 65 74 |l-c Ctrl|-x.: Set|
|000003e0| 20 76 61 6c 75 65 20 6f | 66 20 66 6f 72 6d 0a 0a | value o|f form..|
|000003f0| 22 5d 20 33 29 0a 0a 28 | 64 65 66 75 6e 20 64 65 |"] 3)..(|defun de|
|00000400| 62 75 67 2d 65 6e 74 72 | 79 20 28 64 65 62 75 67 |bug-entr|y (debug|
|00000410| 2d 6f 62 6a 20 64 65 62 | 75 67 2d 64 65 70 74 68 |-obj deb|ug-depth|
|00000420| 29 20 28 6a 61 64 65 2d | 62 79 74 65 2d 63 6f 64 |) (jade-|byte-cod|
|00000430| 65 20 22 18 b1 11 12 13 | 08 09 09 48 14 18 15 16 |e ".....|...H....|
|00000440| 06 16 07 1e 08 59 09 1e | 09 0c 48 16 0a 16 0b 16 |.....Y..|..H.....|
|00000450| 0c 16 0d 16 0e 08 09 0a | 09 48 16 0f 16 10 73 47 |........|.H....sG|
|00000460| b1 48 22 20 5b 64 65 62 | 75 67 2d 62 75 66 66 65 |.H" [deb|ug-buffe|
|00000470| 72 20 67 6f 74 6f 2d 63 | 68 61 72 20 6c 69 6e 65 |r goto-c|har line|
|00000480| 2d 73 74 61 72 74 20 62 | 75 66 66 65 72 2d 65 6e |-start b|uffer-en|
|00000490| 64 20 66 6f 72 6d 61 74 | 20 22 25 73 25 53 0a 22 |d format| "%s%S."|
|000004a0| 20 6d 61 6b 65 2d 73 74 | 72 69 6e 67 20 32 20 64 | make-st|ring 2 d|
|000004b0| 65 62 75 67 2d 64 65 70 | 74 68 20 64 65 62 75 67 |ebug-dep|th debug|
|000004c0| 2d 6f 62 6a 20 67 6f 74 | 6f 2d 67 6c 79 70 68 20 |-obj got|o-glyph |
|000004d0| 6e 65 78 74 2d 6c 69 6e | 65 20 31 20 69 6e 64 65 |next-lin|e 1 inde|
|000004e0| 6e 74 2d 70 6f 73 20 70 | 72 65 76 2d 6c 69 6e 65 |nt-pos p|rev-line|
|000004f0| 20 28 6a 61 64 65 2d 62 | 79 74 65 2d 63 6f 64 65 | (jade-b|yte-code|
|00000500| 20 22 10 08 22 20 5b 72 | 65 63 75 72 73 69 76 65 | ".." [r|ecursive|
|00000510| 2d 65 64 69 74 5d 20 31 | 29 20 28 71 75 6f 74 65 |-edit] 1|) (quote|
|00000520| 20 64 65 62 75 67 29 5d | 20 37 29 29 0a 0a 28 64 | debug)]| 7))..(d|
|00000530| 65 66 75 6e 20 64 65 62 | 75 67 2d 65 78 69 74 20 |efun deb|ug-exit |
|00000540| 28 64 65 62 75 67 2d 76 | 61 6c 20 64 65 62 75 67 |(debug-v|al debug|
|00000550| 2d 64 65 70 74 68 29 20 | 28 6a 61 64 65 2d 62 79 |-depth) |(jade-by|
|00000560| 74 65 2d 63 6f 64 65 20 | 22 18 b1 11 12 13 08 09 |te-code |".......|
|00000570| 09 48 14 18 15 16 06 16 | 07 1e 08 59 09 1e 09 0c |.H......|...Y....|
|00000580| 47 b1 48 22 20 5b 64 65 | 62 75 67 2d 62 75 66 66 |G.H" [de|bug-buff|
|00000590| 65 72 20 67 6f 74 6f 2d | 63 68 61 72 20 6c 69 6e |er goto-|char lin|
|000005a0| 65 2d 73 74 61 72 74 20 | 62 75 66 66 65 72 2d 65 |e-start |buffer-e|
|000005b0| 6e 64 20 66 6f 72 6d 61 | 74 20 22 25 73 3d 3e 20 |nd forma|t "%s=> |
|000005c0| 25 53 0a 22 20 6d 61 6b | 65 2d 73 74 72 69 6e 67 |%S." mak|e-string|
|000005d0| 20 32 20 64 65 62 75 67 | 2d 64 65 70 74 68 20 64 | 2 debug|-depth d|
|000005e0| 65 62 75 67 2d 76 61 6c | 5d 20 37 29 29 0a 0a 28 |ebug-val|] 7))..(|
|000005f0| 64 65 66 75 6e 20 64 65 | 62 75 67 2d 65 72 72 6f |defun de|bug-erro|
|00000600| 72 2d 65 6e 74 72 79 20 | 28 65 72 72 6f 72 2d 6c |r-entry |(error-l|
|00000610| 69 73 74 29 20 28 6a 61 | 64 65 2d 62 79 74 65 2d |ist) (ja|de-byte-|
|00000620| 63 6f 64 65 20 22 18 b1 | 11 12 13 08 09 09 48 14 |code "..|......H.|
|00000630| 18 15 1e 06 4c 16 07 7a | ff 00 18 1e 06 4c 1e 06 |....L..z|.....L..|
|00000640| 4d 0c 48 16 08 16 09 73 | 47 b1 48 22 20 5b 64 65 |M.H....s|G.H" [de|
|00000650| 62 75 67 2d 62 75 66 66 | 65 72 20 67 6f 74 6f 2d |bug-buff|er goto-|
|00000660| 63 68 61 72 20 6c 69 6e | 65 2d 73 74 61 72 74 20 |char lin|e-start |
|00000670| 62 75 66 66 65 72 2d 65 | 6e 64 20 66 6f 72 6d 61 |buffer-e|nd forma|
|00000680| 74 20 22 2a 2a 2a 20 45 | 72 72 6f 72 3a 20 25 73 |t "*** E|rror: %s|
|00000690| 3a 20 25 53 0a 22 20 65 | 72 72 6f 72 2d 6c 69 73 |: %S." e|rror-lis|
|000006a0| 74 20 65 72 72 6f 72 2d | 6d 65 73 73 61 67 65 20 |t error-|message |
|000006b0| 28 6a 61 64 65 2d 62 79 | 74 65 2d 63 6f 64 65 20 |(jade-by|te-code |
|000006c0| 22 10 08 48 49 22 20 5b | 72 65 63 75 72 73 69 76 |"..HI" [|recursiv|
|000006d0| 65 2d 65 64 69 74 5d 20 | 31 29 20 28 71 75 6f 74 |e-edit] |1) (quot|
|000006e0| 65 20 64 65 62 75 67 29 | 5d 20 36 29 29 0a 0a 28 |e debug)|] 6))..(|
|000006f0| 64 65 66 75 6e 20 64 65 | 62 75 67 2d 73 74 65 70 |defun de|bug-step|
|00000700| 20 6e 69 6c 20 28 69 6e | 74 65 72 61 63 74 69 76 | nil (in|teractiv|
|00000710| 65 29 20 28 6a 61 64 65 | 2d 62 79 74 65 2d 63 6f |e) (jade|-byte-co|
|00000720| 64 65 20 22 10 78 fc 00 | 0d 11 12 18 4b 74 fb 00 |de ".x..|....Kt..|
|00000730| 0f 13 08 22 20 5b 64 65 | 62 75 67 2d 6f 62 6a 20 |..." [de|bug-obj |
|00000740| 64 65 62 75 67 20 31 20 | 62 65 65 70 5d 20 33 29 |debug 1 |beep] 3)|
|00000750| 29 0a 0a 28 64 65 66 75 | 6e 20 64 65 62 75 67 2d |)..(defu|n debug-|
|00000760| 73 65 74 2d 72 65 73 75 | 6c 74 20 28 76 61 6c 75 |set-resu|lt (valu|
|00000770| 65 29 20 28 69 6e 74 65 | 72 61 63 74 69 76 65 20 |e) (inte|ractive |
|00000780| 22 58 45 76 61 6c 3a 22 | 29 20 28 6a 61 64 65 2d |"XEval:"|) (jade-|
|00000790| 62 79 74 65 2d 63 6f 64 | 65 20 22 10 78 fc 00 0d |byte-cod|e ".x...|
|000007a0| 11 12 1b 4b 74 fb 00 0f | 14 08 22 20 5b 64 65 62 |...Kt...|.." [deb|
|000007b0| 75 67 2d 6f 62 6a 20 64 | 65 62 75 67 20 34 20 76 |ug-obj d|ebug 4 v|
|000007c0| 61 6c 75 65 20 62 65 65 | 70 5d 20 33 29 29 0a 0a |alue bee|p] 3))..|
|000007d0| 28 64 65 66 75 6e 20 64 | 65 62 75 67 2d 6e 65 78 |(defun d|ebug-nex|
|000007e0| 74 20 6e 69 6c 20 28 69 | 6e 74 65 72 61 63 74 69 |t nil (i|nteracti|
|000007f0| 76 65 29 20 28 6a 61 64 | 65 2d 62 79 74 65 2d 63 |ve) (jad|e-byte-c|
|00000800| 6f 64 65 20 22 10 78 fc | 00 0d 11 12 18 4b 74 fb |ode ".x.|.....Kt.|
|00000810| 00 0f 13 08 22 20 5b 64 | 65 62 75 67 2d 6f 62 6a |...." [d|ebug-obj|
|00000820| 20 64 65 62 75 67 20 32 | 20 62 65 65 70 5d 20 33 | debug 2| beep] 3|
|00000830| 29 29 0a 0a 28 64 65 66 | 75 6e 20 64 65 62 75 67 |))..(def|un debug|
|00000840| 2d 63 6f 6e 74 69 6e 75 | 65 20 6e 69 6c 20 28 69 |-continu|e nil (i|
|00000850| 6e 74 65 72 61 63 74 69 | 76 65 29 20 28 6a 61 64 |nteracti|ve) (jad|
|00000860| 65 2d 62 79 74 65 2d 63 | 6f 64 65 20 22 10 78 fc |e-byte-c|ode ".x.|
|00000870| 00 0d 11 12 18 4b 74 fb | 00 5c 22 13 78 fc 00 18 |.....Kt.|.\".x...|
|00000880| 11 49 74 fb 00 5c 22 4a | fc 00 21 14 08 fb 00 5c |.It..\"J|..!....\|
|00000890| 22 49 22 20 5b 64 65 62 | 75 67 2d 6f 62 6a 20 64 |"I" [deb|ug-obj d|
|000008a0| 65 62 75 67 20 33 20 65 | 72 72 6f 72 2d 6c 69 73 |ebug 3 e|rror-lis|
|000008b0| 74 20 62 65 65 70 5d 20 | 33 29 29 0a 0a 28 64 65 |t beep] |3))..(de|
|000008c0| 66 75 6e 20 64 65 62 75 | 67 2d 62 61 63 6b 74 72 |fun debu|g-backtr|
|000008d0| 61 63 65 20 28 64 65 70 | 74 68 29 20 28 6a 61 64 |ace (dep|th) (jad|
|000008e0| 65 2d 62 79 74 65 2d 63 | 6f 64 65 20 22 10 11 12 |e-byte-c|ode "...|
|000008f0| 08 09 09 48 44 13 08 34 | 15 1e 06 09 48 16 07 1c |...HD..4|....H...|
|00000900| 16 08 1e 09 68 16 0a 1c | 09 0a 0a 48 16 0b 08 45 |....h...|...H...E|
|00000910| 22 20 5b 67 6f 74 6f 2d | 63 68 61 72 20 6c 69 6e |" [goto-|char lin|
|00000920| 65 2d 73 74 61 72 74 20 | 62 75 66 66 65 72 2d 65 |e-start |buffer-e|
|00000930| 6e 64 20 63 75 72 73 6f | 72 2d 70 6f 73 20 6f 6c |nd curso|r-pos ol|
|00000940| 64 2d 70 6f 73 20 62 61 | 63 6b 74 72 61 63 65 20 |d-pos ba|cktrace |
|00000950| 64 65 62 75 67 2d 62 75 | 66 66 65 72 20 64 65 6c |debug-bu|ffer del|
|00000960| 65 74 65 2d 61 72 65 61 | 20 6e 65 78 74 2d 6c 69 |ete-area| next-li|
|00000970| 6e 65 20 64 65 70 74 68 | 20 63 6f 70 79 2d 70 6f |ne depth| copy-po|
|00000980| 73 20 73 70 6c 69 74 2d | 6c 69 6e 65 5d 20 36 29 |s split-|line] 6)|
|00000990| 29 0a | |). | |
+--------+-------------------------+-------------------------+--------+--------+
