Linux Cubed Series 2: Applications

home *** CD-ROM | disk | FTP | other *** search

/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / pcl-cvs / elib-node.elc < prev next >

Emacs Compiled Lisp | 1995-08-29 | 1.2 KB

open in:

MacOS 8.1 |

Win98 |

DOS

view JSON data |

view as text

This file was processed as: Emacs Compiled Lisp (other/emacsCompiledLisp).
This format is not currently supported by dexvert.

Confidence	Program	Detection	Match Type	Support
`1%`	dexvert	Emacs Compiled Lisp `(other/emacsCompiledLisp)`	magic	Unsupported
`1%`	dexvert	Combustion 2 Particle Library `(other/combustion2ParticleLibrary)`	ext	Unsupported
`100%`	file	Emacs/XEmacs v19 byte-compiled Lisp data	default
`99%`	file	data	default
`100%`	TrID	Emacs/XEmacs byte-compiled Lisp (generic)	default
`100%`	xdgMime	text/x-emacs-lisp	default (weak)

hex view

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 34 3a 31 39 3a 33 | 31 20 31 39 39 35 0a 3b | 14:19:3|1 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 78 65 |;; from |file /xe|
|00000060| 6d 61 63 73 2f 78 65 6d | 61 63 73 2d 31 39 2e 31 |macs/xem|acs-19.1|
|00000070| 33 2d 72 65 6c 65 61 73 | 65 2f 65 64 69 74 6f 72 |3-releas|e/editor|
|00000080| 2f 6c 69 73 70 2f 70 63 | 6c 2d 63 76 73 2f 65 6c |/lisp/pc|l-cvs/el|
|00000090| 69 62 2d 6e 6f 64 65 2e | 65 6c 0a 3b 3b 3b 20 65 |ib-node.|el.;;; e|
|000000a0| 6d 61 63 73 20 76 65 72 | 73 69 6f 6e 20 31 39 2e |macs ver|sion 19.|
|000000b0| 31 33 20 58 45 6d 61 63 | 73 20 4c 75 63 69 64 2e |13 XEmac|s Lucid.|
|000000c0| 0a 3b 3b 3b 20 62 79 74 | 65 63 6f 6d 70 20 76 65 |.;;; byt|ecomp ve|
|000000d0| 72 73 69 6f 6e 20 32 2e | 32 35 3b 20 31 2d 53 65 |rsion 2.|25; 1-Se|
|000000e0| 70 2d 39 34 2e 0a 3b 3b | 3b 20 6f 70 74 69 6d 69 |p-94..;;|; optimi|
|000000f0| 7a 61 74 69 6f 6e 20 69 | 73 20 6f 6e 2e 0a 3b 3b |zation i|s on..;;|
|00000100| 3b 20 74 68 69 73 20 66 | 69 6c 65 20 75 73 65 73 |; this f|ile uses|
|00000110| 20 6f 70 63 6f 64 65 73 | 20 77 68 69 63 68 20 64 | opcodes| which d|
|00000120| 6f 20 6e 6f 74 20 65 78 | 69 73 74 20 69 6e 20 45 |o not ex|ist in E|
|00000130| 6d 61 63 73 20 31 38 2e | 0a 0a 28 69 66 20 28 61 |macs 18.|..(if (a|
|00000140| 6e 64 20 28 62 6f 75 6e | 64 70 20 27 65 6d 61 63 |nd (boun|dp 'emac|
|00000150| 73 2d 76 65 72 73 69 6f | 6e 29 0a 09 20 28 6f 72 |s-versio|n).. (or|
|00000160| 20 28 61 6e 64 20 28 62 | 6f 75 6e 64 70 20 27 65 | (and (b|oundp 'e|
|00000170| 70 6f 63 68 3a 3a 76 65 | 72 73 69 6f 6e 29 20 65 |poch::ve|rsion) e|
|00000180| 70 6f 63 68 3a 3a 76 65 | 72 73 69 6f 6e 29 0a 09 |poch::ve|rsion)..|
|00000190| 20 20 20 20 20 28 73 74 | 72 69 6e 67 2d 6c 65 73 |     (st|ring-les|
|000001a0| 73 70 20 65 6d 61 63 73 | 2d 76 65 72 73 69 6f 6e |sp emacs|-version|
|000001b0| 20 22 31 39 22 29 29 29 | 0a 20 20 20 20 28 65 72 | "19")))|.    (er|
|000001c0| 72 6f 72 20 22 54 68 69 | 73 20 66 69 6c 65 20 77 |ror "Thi|s file w|
|000001d0| 61 73 20 63 6f 6d 70 69 | 6c 65 64 20 66 6f 72 20 |as compi|led for |
|000001e0| 45 6d 61 63 73 20 31 39 | 2e 22 29 29 0a 0a 28 62 |Emacs 19|."))..(b|
|000001f0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 21 88 c2 c3 |yte-code| "..!...|
|00000200| 4d 88 c4 c5 4d 88 c6 c7 | 4d 88 c8 c9 4d 88 ca cb |M...M...|M...M...|
|00000210| 4d 88 cc cd 4d 88 ce cf | 4d 88 d0 d1 4d 88 d2 d3 |M...M...|M...M...|
|00000220| 4d 87 22 20 5b 70 72 6f | 76 69 64 65 20 65 6c 69 |M." [pro|vide eli|
|00000230| 62 2d 6e 6f 64 65 20 65 | 6c 69 62 2d 6e 6f 64 65 |b-node e|lib-node|
|00000240| 2d 63 72 65 61 74 65 20 | 28 6d 61 63 72 6f 20 2e |-create |(macro .|
|00000250| 20 23 5b 28 6c 65 66 74 | 20 72 69 67 68 74 20 64 | #[(left| right d|
|00000260| 61 74 61 29 20 22 c0 09 | 5c 6e 0b 46 87 22 20 5b |ata) "..|\n.F." [|
|00000270| 76 65 63 74 6f 72 20 6c | 65 66 74 20 72 69 67 68 |vector l|eft righ|
|00000280| 74 20 64 61 74 61 5d 20 | 34 5d 29 20 65 6c 69 62 |t data] |4]) elib|
|00000290| 2d 6e 6f 64 65 2d 6c 65 | 66 74 20 28 6d 61 63 72 |-node-le|ft (macr|
|000002a0| 6f 20 2e 20 23 5b 28 6e | 6f 64 65 29 20 22 c0 09 |o . #[(n|ode) "..|
|000002b0| c2 42 42 87 22 20 5b 61 | 72 65 66 20 6e 6f 64 65 |.BB." [a|ref node|
|000002c0| 20 28 30 29 5d 20 33 5d | 29 20 65 6c 69 62 2d 6e | (0)] 3]|) elib-n|
|000002d0| 6f 64 65 2d 72 69 67 68 | 74 20 28 6d 61 63 72 6f |ode-righ|t (macro|
|000002e0| 20 2e 20 23 5b 28 6e 6f | 64 65 29 20 22 c0 09 c2 | . #[(no|de) "...|
|000002f0| 42 42 87 22 20 5b 61 72 | 65 66 20 6e 6f 64 65 20 |BB." [ar|ef node |
|00000300| 28 31 29 5d 20 33 5d 29 | 20 65 6c 69 62 2d 6e 6f |(1)] 3])| elib-no|
|00000310| 64 65 2d 64 61 74 61 20 | 28 6d 61 63 72 6f 20 2e |de-data |(macro .|
|00000320| 20 23 5b 28 6e 6f 64 65 | 29 20 22 c0 09 c2 42 42 | #[(node|) "...BB|
|00000330| 87 22 20 5b 61 72 65 66 | 20 6e 6f 64 65 20 28 32 |." [aref| node (2|
|00000340| 29 5d 20 33 5d 29 20 65 | 6c 69 62 2d 6e 6f 64 65 |)] 3]) e|lib-node|
|00000350| 2d 73 65 74 2d 6c 65 66 | 74 20 28 6d 61 63 72 6f |-set-lef|t (macro|
|00000360| 20 2e 20 23 5b 28 6e 6f | 64 65 20 6e 65 77 6c 65 | . #[(no|de newle|
|00000370| 66 74 29 20 22 c0 09 c2 | 0b 46 87 22 20 5b 61 73 |ft) "...|.F." [as|
|00000380| 65 74 20 6e 6f 64 65 20 | 30 20 6e 65 77 6c 65 66 |et node |0 newlef|
|00000390| 74 5d 20 34 5d 29 20 65 | 6c 69 62 2d 6e 6f 64 65 |t] 4]) e|lib-node|
|000003a0| 2d 73 65 74 2d 72 69 67 | 68 74 20 28 6d 61 63 72 |-set-rig|ht (macr|
|000003b0| 6f 20 2e 20 23 5b 28 6e | 6f 64 65 20 6e 65 77 72 |o . #[(n|ode newr|
|000003c0| 69 67 68 74 29 20 22 c0 | 09 c2 0b 46 87 22 20 5b |ight) ".|...F." [|
|000003d0| 61 73 65 74 20 6e 6f 64 | 65 20 31 20 6e 65 77 72 |aset nod|e 1 newr|
|000003e0| 69 67 68 74 5d 20 34 5d | 29 20 65 6c 69 62 2d 6e |ight] 4]|) elib-n|
|000003f0| 6f 64 65 2d 73 65 74 2d | 64 61 74 61 20 28 6d 61 |ode-set-|data (ma|
|00000400| 63 72 6f 20 2e 20 23 5b | 28 6e 6f 64 65 20 6e 65 |cro . #[|(node ne|
|00000410| 77 64 61 74 61 29 20 22 | c0 09 c2 0b 46 87 22 20 |wdata) "|....F." |
|00000420| 5b 61 73 65 74 20 6e 6f | 64 65 20 32 20 6e 65 77 |[aset no|de 2 new|
|00000430| 64 61 74 61 5d 20 34 5d | 29 20 65 6c 69 62 2d 6e |data] 4]|) elib-n|
|00000440| 6f 64 65 2d 62 72 61 6e | 63 68 20 28 6d 61 63 72 |ode-bran|ch (macr|
|00000450| 6f 20 2e 20 23 5b 28 6e | 6f 64 65 20 62 72 61 6e |o . #[(n|ode bran|
|00000460| 63 68 29 20 22 c0 09 5c | 6e 45 87 22 20 5b 61 72 |ch) "..\|nE." [ar|
|00000470| 65 66 20 6e 6f 64 65 20 | 62 72 61 6e 63 68 5d 20 |ef node |branch] |
|00000480| 33 5d 29 20 65 6c 69 62 | 2d 6e 6f 64 65 2d 73 65 |3]) elib|-node-se|
|00000490| 74 2d 62 72 61 6e 63 68 | 20 28 6d 61 63 72 6f 20 |t-branch| (macro |
|000004a0| 2e 20 23 5b 28 6e 6f 64 | 65 20 62 72 61 6e 63 68 |. #[(nod|e branch|
|000004b0| 20 6e 65 77 76 61 6c 29 | 20 22 c0 09 5c 6e 0b 46 | newval)| "..\n.F|
|000004c0| 87 22 20 5b 61 73 65 74 | 20 6e 6f 64 65 20 62 72 |." [aset| node br|
|000004d0| 61 6e 63 68 20 6e 65 77 | 76 61 6c 5d 20 34 5d 29 |anch new|val] 4])|
|000004e0| 5d 20 32 29 0a          |                         |] 2).   |        |
+--------+-------------------------+-------------------------+--------+--------+