/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / msdos / winemacs / lisp / prim / loadup.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 3b 3b 20 63 6f 6d 70 | 69 6c 65 64 20 62 79 20 |;;; comp|iled by |
|00000010| 40 77 69 6e 33 38 36 20 | 6f 6e 20 53 61 74 20 4d |@win386 |on Sat M|
|00000020| 61 72 20 31 33 20 30 31 | 3a 33 38 3a 35 31 20 31 |ar 13 01|:38:51 1|
|00000030| 39 39 33 0a 3b 3b 3b 20 | 66 72 6f 6d 20 66 69 6c |993.;;; |from fil|
|00000040| 65 20 63 3a 2f 73 72 63 | 2f 6c 75 63 69 64 2d 31 |e c:/src|/lucid-1|
|00000050| 39 2e 34 2f 6c 69 73 70 | 2f 70 72 69 6d 2f 6c 6f |9.4/lisp|/prim/lo|
|00000060| 61 64 75 70 2e 65 6c 0a | 3b 3b 3b 20 65 6d 61 63 |adup.el.|;;; emac|
|00000070| 73 20 76 65 72 73 69 6f | 6e 20 31 39 2e 33 20 4c |s versio|n 19.3 L|
|00000080| 75 63 69 64 2e 0a 3b 3b | 3b 20 62 79 74 65 63 6f |ucid..;;|; byteco|
|00000090| 6d 70 20 76 65 72 73 69 | 6f 6e 20 32 2e 30 38 3b |mp versi|on 2.08;|
|000000a0| 20 32 37 2d 61 75 67 2d | 39 32 2e 0a 3b 3b 3b 20 | 27-aug-|92..;;; |
|000000b0| 6f 70 74 69 6d 69 7a 61 | 74 69 6f 6e 20 69 73 20 |optimiza|tion is |
|000000c0| 6f 6e 2e 0a 3b 3b 3b 20 | 74 68 69 73 20 66 69 6c |on..;;; |this fil|
|000000d0| 65 20 75 73 65 73 20 6f | 70 63 6f 64 65 73 20 77 |e uses o|pcodes w|
|000000e0| 68 69 63 68 20 64 6f 20 | 6e 6f 74 20 65 78 69 73 |hich do |not exis|
|000000f0| 74 20 69 6e 20 45 6d 61 | 63 73 31 38 2e 0a 0a 28 |t in Ema|cs18...(|
|00000100| 69 66 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |if (and |(boundp |
|00000110| 27 65 6d 61 63 73 2d 76 | 65 72 73 69 6f 6e 29 0a |'emacs-v|ersion).|
|00000120| 09 20 28 6f 72 20 28 61 | 6e 64 20 28 62 6f 75 6e |. (or (a|nd (boun|
|00000130| 64 70 20 27 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |dp 'epoc|h::versi|
|00000140| 6f 6e 29 20 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |on) epoc|h::versi|
|00000150| 6f 6e 29 0a 09 20 20 20 | 20 20 28 73 74 72 69 6e |on)..   |  (strin|
|00000160| 67 2d 6c 65 73 73 70 20 | 65 6d 61 63 73 2d 76 65 |g-lessp |emacs-ve|
|00000170| 72 73 69 6f 6e 20 22 31 | 39 22 29 29 29 0a 20 20 |rsion "1|9"))).  |
|00000180| 20 20 28 65 72 72 6f 72 | 20 22 54 68 69 73 20 66 |  (error| "This f|
|00000190| 69 6c 65 20 77 61 73 20 | 63 6f 6d 70 69 6c 65 64 |ile was |compiled|
|000001a0| 20 66 6f 72 20 45 6d 61 | 63 73 31 39 2e 22 29 29 | for Ema|cs19."))|
|000001b0| 0a 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |..(byte-|code "..|
|000001c0| c2 21 21 88 c3 c4 c5 c6 | c7 c8 25 c4 0e 09 42 a4 |.!!.....|..%...B.|
|000001d0| 16 09 c5 16 5c 6e c5 16 | 0b cc cd 21 88 ce 20 88 |....\n..|...!.. .|
|000001e0| cc cf 21 88 cc d0 21 88 | ce 20 88 cc d1 21 88 cc |..!...!.|. ...!..|
|000001f0| d2 21 88 ce 20 88 cc d3 | 21 88 ce 20 88 cc d4 21 |.!.. ...|!.. ...!|
|00000200| 88 ce 20 88 cc d5 21 88 | ce 20 88 cc d6 21 88 cc |.. ...!.|. ...!..|
|00000210| d7 21 88 cc d8 21 88 ce | 20 88 cc d9 21 88 cc da |.!...!..| ...!...|
|00000220| 21 88 ce 20 88 cc db 21 | 88 cc dc 21 88 ce 20 88 |!.. ...!|...!.. .|
|00000230| cc dd 21 88 cc de 21 88 | cc df 21 88 ce 20 88 cc |..!...!.|..!.. ..|
|00000240| e0 21 88 cc e1 21 88 ce | 20 88 cc e2 21 88 ce 20 |.!...!..| ...!.. |
|00000250| 88 cc e3 21 88 ce 20 88 | cc e4 21 88 0e 25 e6 3d |...!.. .|..!..%.=|
|00000260| ab 87 ce 20 88 cc e7 21 | 88 ce 20 88 cc e8 21 88 |... ...!|.. ...!.|
|00000270| ce 20 88 cc e9 21 88 0e | 25 e6 3d ab 87 ce 20 88 |. ...!..|%.=... .|
|00000280| cc ea 21 88 eb ec 21 ab | 87 ce 20 88 cc ed 21 88 |..!...!.|.. ...!.|
|00000290| eb ee 21 ab 98 ef f0 21 | 88 ef f1 21 88 ef f2 21 |..!....!|...!...!|
|000002a0| 88 ef f3 21 88 ef f4 21 | 88 ef f5 21 88 cc f6 21 |...!...!|...!...!|
|000002b0| 88 cc f7 21 88 eb f8 f9 | 21 21 ab 84 cc fa 21 88 |...!....|!!....!.|
|000002c0| ce 20 88 0e 25 fb 3e ab | 9c cc fc 21 88 ce 20 88 |. ..%.>.|...!.. .|
|000002d0| cc fd 21 88 ce 20 88 fe | ff 21 ab 89 cc 81 40 00 |..!.. ..|.!....@.|
|000002e0| 21 88 ce 20 88 c7 16 5c | 6e c7 16 0b cc 81 41 00 |!.. ...\|n.....A.|
|000002f0| c5 5c 22 ab 83 ce 20 88 | 81 42 00 0e 43 38 81 44 |.\"... .|.B..C8.D|
|00000300| 00 9a ac 8c 81 45 00 0e | 43 38 81 44 00 9a ab f4 |.....E..|C8.D....|
|00000310| 81 46 00 81 47 00 21 88 | eb 81 48 00 21 ab d5 0e |.F..G.!.|..H.!...|
|00000320| 25 81 49 00 3e ac cd 0e | 4a 1e 4b 81 4c 00 81 4d |%.I.>...|J.K.L..M|
|00000330| 00 0e 4b 5c 22 ab 99 0e | 4b 81 4e 00 89 94 4f 97 |..K\"...|K.N...O.|
|00000340| 81 4f 00 0e 4b 81 4e 00 | 95 c7 4f 51 16 4b aa 5c |.O..K.N.|..OQ.K.\|
|00000350| 5c 81 50 00 81 51 00 81 | 52 00 21 81 51 00 81 53 |\.P..Q..|R.!.Q..S|
|00000360| 00 21 0e 4b 50 c5 23 88 | 81 54 00 81 55 00 0e 4b |.!.KP.#.|.T..U..K|
|00000370| 50 21 88 29 aa 88 81 54 | 00 81 56 00 21 88 81 46 |P!.)...T|..V.!..F|
|00000380| 00 81 57 00 21 88 cc 81 | 58 00 c5 5c 22 88 ce 20 |..W.!...|X..\".. |
|00000390| 88 81 59 00 c2 21 88 81 | 42 00 0e 43 38 81 44 00 |..Y..!..|B..C8.D.|
|000003a0| 9a ac 8d 81 45 00 0e 43 | 38 81 44 00 9a 83 a1 02 |....E..C|8.D.....|
|000003b0| 0e 25 e6 3d ab 9b 81 46 | 00 81 5a 00 21 88 81 48 |.%.=...F|..Z.!..H|
|000003c0| 00 81 5b 00 81 5c 5c 00 | 5c 22 88 81 5d 00 20 88 |..[..\\.|\"..]. .|
|000003d0| 82 a1 02 81 5e 00 0e 4a | 50 1e 4b 81 4c 00 81 4d |....^..J|P.K.L..M|
|000003e0| 00 0e 4b 5c 22 ab 99 0e | 4b 81 4e 00 89 94 4f 97 |..K\"...|K.N...O.|
|000003f0| 81 4f 00 0e 4b 81 4e 00 | 95 c7 4f 51 16 4b aa 5c |.O..K.N.|..OQ.K.\|
|00000400| 5c 81 46 00 81 5f 00 0e | 4b 5c 22 88 29 c7 81 60 |\.F.._..|K\".)..`|
|00000410| 00 81 61 00 8f 88 eb 81 | 62 00 21 ab 85 81 62 00 |..a.....|b.!...b.|
|00000420| 20 88 81 48 00 81 63 00 | 81 5c 5c 00 5c 22 88 81 | ..H..c.|.\\.\"..|
|00000430| 5e 00 0e 4a 50 1e 4b 81 | 4c 00 81 4d 00 0e 4b 5c |^..JP.K.|L..M..K\|
|00000440| 22 ab 99 0e 4b 81 4e 00 | 89 94 4f 97 81 4f 00 0e |"...K.N.|..O..O..|
|00000450| 4b 81 4e 00 95 c7 4f 51 | 16 4b aa 5c 5c 81 64 00 |K.N...OQ|.K.\\.d.|
|00000460| 81 63 00 0e 4b c5 23 88 | 29 81 5d 00 20 88 c7 16 |.c..K.#.|).]. ...|
|00000470| 65 0e 43 81 42 00 9c 81 | 66 00 9a ac 8c 0e 43 81 |e.C.B...|f.....C.|
|00000480| 45 00 9c 81 66 00 9a ab | c5 81 67 00 81 68 00 81 |E...f...|..g..h..|
|00000490| 69 00 5c 22 88 81 54 00 | 81 56 00 21 88 81 67 00 |i.\"..T.|.V.!..g.|
|000004a0| 81 6a 00 81 69 00 5c 22 | 88 c7 16 65 81 6b 00 81 |.j..i.\"|...e.k..|
|000004b0| 6c 00 0e 43 81 42 00 9c | 81 66 00 9a ab 85 81 45 |l..C.B..|.f.....E|
|000004c0| 00 aa 83 81 6d 00 0e 43 | 9b 5c 22 88 81 5d 00 20 |....m..C|.\"..]. |
|000004d0| 88 c7 16 65 eb 81 48 00 | 21 ac 87 81 6e 00 0e 6f |...e..H.|!...n..o|
|000004e0| 21 88 c7 87 22 20 5b 62 | 75 66 66 65 72 2d 64 69 |!..." [b|uffer-di|
|000004f0| 73 61 62 6c 65 2d 75 6e | 64 6f 20 67 65 74 2d 62 |sable-un|do get-b|
|00000500| 75 66 66 65 72 20 22 2a | 73 63 72 61 74 63 68 2a |uffer "*|scratch*|
|00000510| 22 20 64 69 72 65 63 74 | 6f 72 79 2d 66 69 6c 65 |" direct|ory-file|
|00000520| 73 20 22 2e 2e 2f 6c 69 | 73 70 22 20 74 20 22 5e |s "../li|sp" t "^|
|00000530| 5b 5e 2d 2e 5d 22 20 6e | 69 6c 20 64 69 72 73 2d |[^-.]" n|il dirs-|
|00000540| 6f 6e 6c 79 20 6c 6f 61 | 64 2d 70 61 74 68 20 6c |only loa|d-path l|
|00000550| 6f 61 64 2d 77 61 72 6e | 2d 77 68 65 6e 2d 73 6f |oad-warn|-when-so|
|00000560| 75 72 63 65 2d 6e 65 77 | 65 72 20 6c 6f 61 64 2d |urce-new|er load-|
|00000570| 77 61 72 6e 2d 77 68 65 | 6e 2d 73 6f 75 72 63 65 |warn-whe|n-source|
|00000580| 2d 6f 6e 6c 79 20 6c 6f | 61 64 20 22 73 75 62 72 |-only lo|ad "subr|
|00000590| 22 20 67 61 72 62 61 67 | 65 2d 63 6f 6c 6c 65 63 |" garbag|e-collec|
|000005a0| 74 20 22 6d 69 6e 69 62 | 75 66 22 20 22 66 61 63 |t "minib|uf" "fac|
|000005b0| 65 73 22 20 22 6c 6f 61 | 64 64 65 66 73 2e 65 6c |es" "loa|ddefs.el|
|000005c0| 22 20 22 6b 65 79 64 65 | 66 73 2e 65 6c 22 20 22 |" "keyde|fs.el" "|
|000005d0| 73 69 6d 70 6c 65 22 20 | 22 68 65 6c 70 22 20 22 |simple" |"help" "|
|000005e0| 66 69 6c 65 73 22 20 22 | 69 6e 64 65 6e 74 22 20 |files" "|indent" |
|000005f0| 22 77 69 6e 64 6f 77 22 | 20 22 70 61 74 68 73 2e |"window"| "paths.|
|00000600| 65 6c 22 20 22 73 74 61 | 72 74 75 70 22 20 22 6c |el" "sta|rtup" "l|
|00000610| 69 73 70 22 20 22 70 61 | 67 65 22 20 22 72 65 67 |isp" "pa|ge" "reg|
|00000620| 69 73 74 65 72 22 20 22 | 69 73 6f 38 38 35 39 2d |ister" "|iso8859-|
|00000630| 31 22 20 22 70 61 72 61 | 67 72 61 70 68 73 22 20 |1" "para|graphs" |
|00000640| 22 6c 69 73 70 2d 6d 6f | 64 65 22 20 22 74 65 78 |"lisp-mo|de" "tex|
|00000650| 74 2d 6d 6f 64 65 22 20 | 22 66 69 6c 6c 22 20 22 |t-mode" |"fill" "|
|00000660| 63 2d 6d 6f 64 65 22 20 | 22 69 73 65 61 72 63 68 |c-mode" |"isearch|
|00000670| 2d 6d 6f 64 65 22 20 22 | 72 65 70 6c 61 63 65 22 |-mode" "|replace"|
|00000680| 20 73 79 73 74 65 6d 2d | 74 79 70 65 20 76 61 78 | system-|type vax|
|00000690| 2d 76 6d 73 20 22 76 6d | 73 70 72 6f 63 22 20 22 |-vms "vm|sproc" "|
|000006a0| 61 62 62 72 65 76 22 20 | 22 62 75 66 66 2d 6d 65 |abbrev" |"buff-me|
|000006b0| 6e 75 22 20 22 76 6d 73 | 2d 70 61 74 63 68 22 20 |nu" "vms|-patch" |
|000006c0| 66 62 6f 75 6e 64 70 20 | 61 74 61 6e 20 22 66 6c |fboundp |atan "fl|
|000006d0| 6f 61 74 2d 73 75 70 22 | 20 78 2d 63 72 65 61 74 |oat-sup"| x-creat|
|000006e0| 65 2d 73 63 72 65 65 6e | 20 72 65 71 75 69 72 65 |e-screen| require|
|000006f0| 20 73 63 72 65 65 6e 20 | 6d 65 6e 75 62 61 72 20 | screen |menubar |
|00000700| 78 2d 66 61 63 65 73 20 | 78 2d 69 73 6f 38 38 35 |x-faces |x-iso885|
|00000710| 39 2d 31 20 78 2d 6d 6f | 75 73 65 20 78 73 65 6c |9-1 x-mo|use xsel|
|00000720| 65 63 74 20 22 76 65 72 | 73 69 6f 6e 2e 65 6c 22 |ect "ver|sion.el"|
|00000730| 20 22 62 63 2d 72 75 6e | 74 69 6d 65 22 20 69 6e | "bc-run|time" in|
|00000740| 74 65 72 6e 2d 73 6f 66 | 74 20 22 68 61 6e 64 6c |tern-sof|t "handl|
|00000750| 65 2d 65 6e 65 72 67 69 | 7a 65 2d 72 65 71 75 65 |e-energi|ze-reque|
|00000760| 73 74 22 20 22 65 6e 65 | 72 67 69 7a 65 2f 65 6e |st" "ene|rgize/en|
|00000770| 65 72 67 69 7a 65 2d 6c | 6f 61 64 2e 65 6c 22 20 |ergize-l|oad.el" |
|00000780| 28 6d 73 2d 64 6f 73 20 | 77 69 6e 33 38 36 29 20 |(ms-dos |win386) |
|00000790| 22 64 65 6d 61 63 73 22 | 20 22 64 6f 73 2d 66 6e |"demacs"| "dos-fn|
|000007a0| 73 22 20 62 6f 75 6e 64 | 70 20 4e 45 4d 41 43 53 |s" bound|p NEMACS|
|000007b0| 20 22 66 65 70 63 74 72 | 6c 22 20 22 73 69 74 65 | "fepctr|l" "site|
|000007c0| 2d 6c 6f 61 64 22 20 33 | 20 63 6f 6d 6d 61 6e 64 |-load" 3| command|
|000007d0| 2d 6c 69 6e 65 2d 61 72 | 67 73 20 22 64 75 6d 70 |-line-ar|gs "dump|
|000007e0| 22 20 34 20 6d 65 73 73 | 61 67 65 20 22 46 69 6e |" 4 mess|age "Fin|
|000007f0| 64 69 6e 67 20 70 6f 69 | 6e 74 65 72 73 20 74 6f |ding poi|nters to|
|00000800| 20 64 6f 63 20 73 74 72 | 69 6e 67 73 2e 2e 2e 22 | doc str|ings..."|
|00000810| 20 64 75 6d 70 2d 65 6d | 61 63 73 20 28 6d 73 2d | dump-em|acs (ms-|
|00000820| 64 6f 73 20 77 69 6e 33 | 38 36 29 20 65 6d 61 63 |dos win3|86) emac|
|00000830| 73 2d 76 65 72 73 69 6f | 6e 20 6e 61 6d 65 20 73 |s-versio|n name s|
|00000840| 74 72 69 6e 67 2d 6d 61 | 74 63 68 20 22 5b 5e 2d |tring-ma|tch "[^-|
|00000850| 2b 5f 2e 61 2d 7a 41 2d | 5a 30 2d 39 5d 2b 22 20 |+_.a-zA-|Z0-9]+" |
|00000860| 30 20 22 2d 22 20 63 6f | 70 79 2d 66 69 6c 65 20 |0 "-" co|py-file |
|00000870| 65 78 70 61 6e 64 2d 66 | 69 6c 65 2d 6e 61 6d 65 |expand-f|ile-name|
|00000880| 20 22 2e 2e 2f 65 74 63 | 2f 44 4f 43 22 20 22 2e | "../etc|/DOC" ".|
|00000890| 2e 2f 65 74 63 2f 44 4f | 43 2d 22 20 53 6e 61 72 |./etc/DO|C-" Snar|
|000008a0| 66 2d 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 20 |f-docume|ntation |
|000008b0| 22 44 4f 43 2d 22 20 22 | 44 4f 43 22 20 22 46 69 |"DOC-" "|DOC" "Fi|
|000008c0| 6e 64 69 6e 67 20 70 6f | 69 6e 74 65 72 73 20 74 |nding po|inters t|
|000008d0| 6f 20 64 6f 63 20 73 74 | 72 69 6e 67 73 2e 2e 2e |o doc st|rings...|
|000008e0| 64 6f 6e 65 22 20 22 73 | 69 74 65 2d 69 6e 69 74 |done" "s|ite-init|
|000008f0| 22 20 62 75 66 66 65 72 | 2d 65 6e 61 62 6c 65 2d |" buffer|-enable-|
|00000900| 75 6e 64 6f 20 22 44 75 | 6d 70 69 6e 67 20 64 61 |undo "Du|mping da|
|00000910| 74 61 20 61 73 20 66 69 | 6c 65 20 74 65 6d 61 63 |ta as fi|le temac|
|00000920| 73 2e 64 75 6d 70 22 20 | 22 74 65 6d 61 63 73 2e |s.dump" |"temacs.|
|00000930| 64 75 6d 70 22 20 22 74 | 65 6d 61 63 73 22 20 6b |dump" "t|emacs" k|
|00000940| 69 6c 6c 2d 65 6d 61 63 | 73 20 22 65 6d 61 63 73 |ill-emac|s "emacs|
|00000950| 2d 22 20 22 44 75 6d 70 | 69 6e 67 20 75 6e 64 65 |-" "Dump|ing unde|
|00000960| 72 20 6e 61 6d 65 73 20 | 78 65 6d 61 63 73 20 61 |r names |xemacs a|
|00000970| 6e 64 20 25 73 22 20 28 | 64 65 6c 65 74 65 2d 66 |nd %s" (|delete-f|
|00000980| 69 6c 65 20 22 78 65 6d | 61 63 73 22 29 20 28 28 |ile "xem|acs") ((|
|00000990| 66 69 6c 65 2d 65 72 72 | 6f 72 29 29 20 72 65 61 |file-err|or)) rea|
|000009a0| 6c 6c 79 2d 66 72 65 65 | 20 22 78 65 6d 61 63 73 |lly-free| "xemacs|
|000009b0| 22 20 61 64 64 2d 6e 61 | 6d 65 2d 74 6f 2d 66 69 |" add-na|me-to-fi|
|000009c0| 6c 65 20 70 75 72 69 66 | 79 2d 66 6c 61 67 20 22 |le purif|y-flag "|
|000009d0| 72 75 6e 2d 74 65 6d 61 | 63 73 22 20 70 72 69 6e |run-tema|cs" prin|
|000009e0| 63 20 22 5c 6e 53 6e 61 | 72 66 69 6e 67 20 64 6f |c "\nSna|rfing do|
|000009f0| 63 2e 2e 2e 5c 6e 22 20 | 65 78 74 65 72 6e 61 6c |c...\n" |external|
|00000a00| 2d 64 65 62 75 67 67 69 | 6e 67 2d 6f 75 74 70 75 |-debuggi|ng-outpu|
|00000a10| 74 20 22 5c 6e 42 6f 6f | 74 73 74 72 61 70 70 69 |t "\nBoo|tstrappi|
|00000a20| 6e 67 20 66 72 6f 6d 20 | 74 65 6d 61 63 73 2e 2e |ng from |temacs..|
|00000a30| 2e 5c 6e 22 20 61 70 70 | 6c 79 20 72 75 6e 2d 65 |.\n" app|ly run-e|
|00000a40| 6d 61 63 73 2d 66 72 6f | 6d 2d 74 65 6d 61 63 73 |macs-fro|m-temacs|
|00000a50| 20 35 20 65 76 61 6c 20 | 74 6f 70 2d 6c 65 76 65 | 5 eval |top-leve|
|00000a60| 6c 5d 20 36 29 0a       |                         |l] 6).  |        |
+--------+-------------------------+-------------------------+--------+--------+