/ Otherware / Otherware_1_SB_Development.iso / amiga / utility / text / emacsdif.lha / emacs-18.58 / lisp / amiga-init.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0a 28 6c 6f 61 64 20 22 | 61 6d 69 67 61 2d 6d 6f |.(load "|amiga-mo|
|00000010| 75 73 65 22 29 0a 0a 28 | 6c 6f 61 64 20 22 61 6d |use")..(|load "am|
|00000020| 69 67 61 2d 6d 65 6e 75 | 22 29 0a 0a 28 67 6c 6f |iga-menu|")..(glo|
|00000030| 62 61 6c 2d 73 65 74 2d | 6b 65 79 20 22 1c 41 22 |bal-set-|key ".A"|
|00000040| 20 28 71 75 6f 74 65 20 | 70 72 65 76 69 6f 75 73 | (quote |previous|
|00000050| 2d 6c 69 6e 65 29 29 0a | 0a 28 67 6c 6f 62 61 6c |-line)).|.(global|
|00000060| 2d 73 65 74 2d 6b 65 79 | 20 22 1c 42 22 20 28 71 |-set-key| ".B" (q|
|00000070| 75 6f 74 65 20 6e 65 78 | 74 2d 6c 69 6e 65 29 29 |uote nex|t-line))|
|00000080| 0a 0a 28 67 6c 6f 62 61 | 6c 2d 73 65 74 2d 6b 65 |..(globa|l-set-ke|
|00000090| 79 20 22 1c 44 22 20 28 | 71 75 6f 74 65 20 62 61 |y ".D" (|quote ba|
|000000a0| 63 6b 77 61 72 64 2d 63 | 68 61 72 29 29 0a 0a 28 |ckward-c|har))..(|
|000000b0| 67 6c 6f 62 61 6c 2d 73 | 65 74 2d 6b 65 79 20 22 |global-s|et-key "|
|000000c0| 1c 43 22 20 28 71 75 6f | 74 65 20 66 6f 72 77 61 |.C" (quo|te forwa|
|000000d0| 72 64 2d 63 68 61 72 29 | 29 0a 0a 28 67 6c 6f 62 |rd-char)|)..(glob|
|000000e0| 61 6c 2d 73 65 74 2d 6b | 65 79 20 22 1c 3f 7e 22 |al-set-k|ey ".?~"|
|000000f0| 20 28 71 75 6f 74 65 20 | 69 6e 66 6f 29 29 0a 0a | (quote |info))..|
|00000100| 28 67 6c 6f 62 61 6c 2d | 73 65 74 2d 6b 65 79 20 |(global-|set-key |
|00000110| 22 1c 54 22 20 28 71 75 | 6f 74 65 20 73 63 72 6f |".T" (qu|ote scro|
|00000120| 6c 6c 2d 64 6f 77 6e 29 | 29 0a 0a 28 67 6c 6f 62 |ll-down)|)..(glob|
|00000130| 61 6c 2d 73 65 74 2d 6b | 65 79 20 22 1c 53 22 20 |al-set-k|ey ".S" |
|00000140| 28 71 75 6f 74 65 20 73 | 63 72 6f 6c 6c 2d 75 70 |(quote s|croll-up|
|00000150| 29 29 0a 0a 28 67 6c 6f | 62 61 6c 2d 73 65 74 2d |))..(glo|bal-set-|
|00000160| 6b 65 79 20 22 1c 20 40 | 22 20 28 71 75 6f 74 65 |key ". @|" (quote|
|00000170| 20 66 6f 72 77 61 72 64 | 2d 77 6f 72 64 29 29 0a | forward|-word)).|
|00000180| 0a 28 67 6c 6f 62 61 6c | 2d 73 65 74 2d 6b 65 79 |.(global|-set-key|
|00000190| 20 22 1c 20 41 22 20 28 | 71 75 6f 74 65 20 62 61 | ". A" (|quote ba|
|000001a0| 63 6b 77 61 72 64 2d 77 | 6f 72 64 29 29 0a 0a 28 |ckward-w|ord))..(|
|000001b0| 67 6c 6f 62 61 6c 2d 73 | 65 74 2d 6b 65 79 20 22 |global-s|et-key "|
|000001c0| 1c c1 22 20 28 71 75 6f | 74 65 20 62 65 67 69 6e |.." (quo|te begin|
|000001d0| 6e 69 6e 67 2d 6f 66 2d | 62 75 66 66 65 72 29 29 |ning-of-|buffer))|
|000001e0| 0a 0a 28 67 6c 6f 62 61 | 6c 2d 73 65 74 2d 6b 65 |..(globa|l-set-ke|
|000001f0| 79 20 22 1c c2 22 20 28 | 71 75 6f 74 65 20 65 6e |y ".." (|quote en|
|00000200| 64 2d 6f 66 2d 62 75 66 | 66 65 72 29 29 0a 0a 28 |d-of-buf|fer))..(|
|00000210| 67 6c 6f 62 61 6c 2d 73 | 65 74 2d 6b 65 79 20 22 |global-s|et-key "|
|00000220| 1c c4 22 20 28 71 75 6f | 74 65 20 62 65 67 69 6e |.." (quo|te begin|
|00000230| 6e 69 6e 67 2d 6f 66 2d | 6c 69 6e 65 29 29 0a 0a |ning-of-|line))..|
|00000240| 28 67 6c 6f 62 61 6c 2d | 73 65 74 2d 6b 65 79 20 |(global-|set-key |
|00000250| 22 1c c3 22 20 28 71 75 | 6f 74 65 20 65 6e 64 2d |".." (qu|ote end-|
|00000260| 6f 66 2d 6c 69 6e 65 29 | 29 0a 0a 28 67 6c 6f 62 |of-line)|)..(glob|
|00000270| 61 6c 2d 73 65 74 2d 6b | 65 79 20 22 1c a0 c0 22 |al-set-k|ey "..."|
|00000280| 20 28 71 75 6f 74 65 20 | 66 6f 72 77 61 72 64 2d | (quote |forward-|
|00000290| 73 65 78 70 29 29 0a 0a | 28 67 6c 6f 62 61 6c 2d |sexp))..|(global-|
|000002a0| 73 65 74 2d 6b 65 79 20 | 22 1c a0 c1 22 20 28 71 |set-key |"..." (q|
|000002b0| 75 6f 74 65 20 62 61 63 | 6b 77 61 72 64 2d 73 65 |uote bac|kward-se|
|000002c0| 78 70 29 29 0a 0a 28 67 | 6c 6f 62 61 6c 2d 73 65 |xp))..(g|lobal-se|
|000002d0| 74 2d 6b 65 79 20 22 1a | 22 20 28 71 75 6f 74 65 |t-key ".|" (quote|
|000002e0| 20 61 6d 69 67 61 2d 69 | 63 6f 6e 69 66 79 29 29 | amiga-i|conify))|
|000002f0| 0a 0a 28 64 65 66 75 6e | 20 73 63 72 6f 6c 6c 2d |..(defun| scroll-|
|00000300| 64 6f 77 6e 2d 31 20 6e | 69 6c 20 22 5c 0a 4d 6f |down-1 n|il "\.Mo|
|00000310| 76 65 20 75 70 20 6f 6e | 65 20 6c 69 6e 65 20 6f |ve up on|e line o|
|00000320| 6e 20 73 63 72 65 65 6e | 22 20 28 69 6e 74 65 72 |n screen|" (inter|
|00000330| 61 63 74 69 76 65 29 20 | 28 62 79 74 65 2d 63 6f |active) |(byte-co|
|00000340| 64 65 20 22 c0 88 c1 c2 | 21 87 22 20 5b 6e 69 6c |de "....|!." [nil|
|00000350| 20 73 63 72 6f 6c 6c 2d | 64 6f 77 6e 20 31 5d 20 | scroll-|down 1] |
|00000360| 32 29 29 0a 0a 28 64 65 | 66 75 6e 20 73 63 72 6f |2))..(de|fun scro|
|00000370| 6c 6c 2d 75 70 2d 31 20 | 6e 69 6c 20 22 5c 0a 4d |ll-up-1 |nil "\.M|
|00000380| 6f 76 65 20 64 6f 77 6e | 20 6f 6e 65 20 6c 69 6e |ove down| one lin|
|00000390| 65 20 6f 6e 20 73 63 72 | 65 65 6e 22 20 28 69 6e |e on scr|een" (in|
|000003a0| 74 65 72 61 63 74 69 76 | 65 29 20 28 62 79 74 65 |teractiv|e) (byte|
|000003b0| 2d 63 6f 64 65 20 22 c0 | 88 c1 c2 21 87 22 20 5b |-code ".|...!." [|
|000003c0| 6e 69 6c 20 73 63 72 6f | 6c 6c 2d 75 70 20 31 5d |nil scro|ll-up 1]|
|000003d0| 20 32 29 29 0a 0a 28 67 | 6c 6f 62 61 6c 2d 73 65 | 2))..(g|lobal-se|
|000003e0| 74 2d 6b 65 79 20 22 1c | d4 22 20 28 71 75 6f 74 |t-key ".|." (quot|
|000003f0| 65 20 73 63 72 6f 6c 6c | 2d 64 6f 77 6e 2d 31 29 |e scroll|-down-1)|
|00000400| 29 0a 0a 28 67 6c 6f 62 | 61 6c 2d 73 65 74 2d 6b |)..(glob|al-set-k|
|00000410| 65 79 20 22 1c d3 22 20 | 28 71 75 6f 74 65 20 73 |ey ".." |(quote s|
|00000420| 63 72 6f 6c 6c 2d 75 70 | 2d 31 29 29 0a 0a 28 73 |croll-up|-1))..(s|
|00000430| 65 74 71 20 61 6d 69 67 | 61 2d 61 72 65 78 78 2d |etq amig|a-arexx-|
|00000440| 70 72 6f 63 65 73 73 69 | 6e 67 20 6e 69 6c 29 0a |processi|ng nil).|
|00000450| 0a 28 73 65 74 71 20 61 | 6d 69 67 61 2d 61 72 65 |.(setq a|miga-are|
|00000460| 78 78 2d 65 72 72 6f 72 | 73 20 6e 69 6c 29 0a 0a |xx-error|s nil)..|
|00000470| 28 64 65 66 76 61 72 20 | 61 6d 69 67 61 2d 61 72 |(defvar |amiga-ar|
|00000480| 65 78 78 2d 66 61 69 6c | 61 74 20 35 20 22 5c 0a |exx-fail|at 5 "\.|
|00000490| 52 65 74 75 72 6e 20 6c | 65 76 65 6c 20 66 72 6f |Return l|evel fro|
|000004a0| 6d 20 77 68 69 63 68 20 | 61 72 65 78 78 20 63 6f |m which |arexx co|
|000004b0| 6d 6d 61 6e 64 73 20 72 | 65 74 75 72 6e 73 20 63 |mmands r|eturns c|
|000004c0| 61 75 73 65 20 65 72 72 | 6f 72 73 22 29 0a 0a 28 |ause err|ors")..(|
|000004d0| 64 65 66 75 6e 20 61 6d | 69 67 61 2d 61 72 65 78 |defun am|iga-arex|
|000004e0| 78 2d 70 72 6f 63 65 73 | 73 20 6e 69 6c 20 28 69 |x-proces|s nil (i|
|000004f0| 6e 74 65 72 61 63 74 69 | 76 65 29 20 28 62 79 74 |nteracti|ve) (byt|
|00000500| 65 2d 63 6f 64 65 20 22 | c2 88 08 3f 85 13 00 c1 |e-code "|...?....|
|00000510| 89 10 88 c2 c3 c4 8f 88 | c2 89 10 87 22 20 5b 61 |........|...." [a|
|00000520| 6d 69 67 61 2d 61 72 65 | 78 78 2d 70 72 6f 63 65 |miga-are|xx-proce|
|00000530| 73 73 69 6e 67 20 74 20 | 6e 69 6c 20 28 62 79 74 |ssing t |nil (byt|
|00000540| 65 2d 63 6f 64 65 20 22 | c4 18 c5 20 89 10 85 28 |e-code "|... ...(|
|00000550| 00 08 3c 83 16 00 08 09 | 42 89 11 82 24 00 c6 c4 |..<.....|B...$...|
|00000560| 1b 1a c7 c8 c9 8f 88 ca | 0a 0b 5c 22 2a 88 82 02 |........|..\"*...|
|00000570| 00 29 87 22 20 5b 61 72 | 65 78 78 63 6d 64 20 61 |.)." [ar|exxcmd a|
|00000580| 6d 69 67 61 2d 61 72 65 | 78 78 2d 65 72 72 6f 72 |miga-are|xx-error|
|00000590| 73 20 72 63 20 72 65 73 | 75 6c 74 20 6e 69 6c 20 |s rc res|ult nil |
|000005a0| 61 6d 69 67 61 2d 61 72 | 65 78 78 2d 67 65 74 2d |amiga-ar|exx-get-|
|000005b0| 65 76 65 6e 74 20 30 20 | 65 72 72 20 28 62 79 74 |event 0 |err (byt|
|000005c0| 65 2d 63 6f 64 65 20 22 | c3 09 21 40 18 c4 c5 08 |e-code "|..!@....|
|000005d0| 21 21 89 12 29 87 22 20 | 5b 65 78 70 72 20 61 72 |!!..)." |[expr ar|
|000005e0| 65 78 78 63 6d 64 20 72 | 65 73 75 6c 74 20 72 65 |exxcmd r|esult re|
|000005f0| 61 64 2d 66 72 6f 6d 2d | 73 74 72 69 6e 67 20 70 |ad-from-|string p|
|00000600| 72 69 6e 31 2d 74 6f 2d | 73 74 72 69 6e 67 20 65 |rin1-to-|string e|
|00000610| 76 61 6c 5d 20 35 29 20 | 28 28 65 72 72 6f 72 20 |val] 5) |((error |
|00000620| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c3 89 10 88 |(byte-co|de "....|
|00000630| c4 0a 21 89 11 87 22 20 | 5b 72 63 20 72 65 73 75 |..!..." |[rc resu|
|00000640| 6c 74 20 65 72 72 20 32 | 30 20 70 72 69 6e 31 2d |lt err 2|0 prin1-|
|00000650| 74 6f 2d 73 74 72 69 6e | 67 5d 20 33 29 29 29 20 |to-strin|g] 3))) |
|00000660| 61 6d 69 67 61 2d 61 72 | 65 78 78 2d 72 65 70 6c |amiga-ar|exx-repl|
|00000670| 79 5d 20 35 29 20 28 28 | 65 72 72 6f 72 20 28 62 |y] 5) ((|error (b|
|00000680| 79 74 65 2d 63 6f 64 65 | 20 22 c0 87 22 20 5b 6e |yte-code| ".." [n|
|00000690| 69 6c 5d 20 31 29 29 29 | 5d 20 33 29 29 0a 0a 28 |il] 1)))|] 3))..(|
|000006a0| 64 65 66 75 6e 20 61 6d | 69 67 61 2d 61 72 65 78 |defun am|iga-arex|
|000006b0| 78 2d 77 61 69 74 2d 63 | 6f 6d 6d 61 6e 64 20 28 |x-wait-c|ommand (|
|000006c0| 69 64 29 20 22 5c 0a 57 | 61 69 74 73 20 66 6f 72 |id) "\.W|aits for|
|000006d0| 20 61 20 70 65 6e 64 69 | 6e 67 20 41 52 65 78 78 | a pendi|ng ARexx|
|000006e0| 20 63 6f 6d 6d 61 6e 64 | 73 20 74 6f 20 63 6f 6d | command|s to com|
|000006f0| 70 6c 65 74 65 2e 0a 41 | 6c 73 6f 20 70 72 6f 63 |plete..A|lso proc|
|00000700| 65 73 73 65 73 20 61 6e | 79 20 70 65 6e 64 69 6e |esses an|y pendin|
|00000710| 67 20 41 52 65 78 78 20 | 72 65 71 75 65 73 74 73 |g ARexx |requests|
|00000720| 20 64 75 72 69 6e 67 20 | 74 68 69 73 20 69 6e 74 | during |this int|
|00000730| 65 72 76 61 6c 2e 22 20 | 28 62 79 74 65 2d 63 6f |erval." |(byte-co|
|00000740| 64 65 20 22 c1 20 88 c2 | 08 21 85 12 00 c3 20 88 |de ". ..|.!.... .|
|00000750| c1 20 88 82 03 00 87 22 | 20 5b 69 64 20 61 6d 69 |. ....."| [id ami|
|00000760| 67 61 2d 61 72 65 78 78 | 2d 70 72 6f 63 65 73 73 |ga-arexx|-process|
|00000770| 20 61 6d 69 67 61 2d 61 | 72 65 78 78 2d 63 68 65 | amiga-a|rexx-che|
|00000780| 63 6b 2d 63 6f 6d 6d 61 | 6e 64 20 61 6d 69 67 61 |ck-comma|nd amiga|
|00000790| 2d 61 72 65 78 78 2d 77 | 61 69 74 5d 20 36 29 29 |-arexx-w|ait] 6))|
|000007a0| 0a 0a 28 64 65 66 63 6f | 6e 73 74 20 61 6d 69 67 |..(defco|nst amig|
|000007b0| 61 2d 61 72 65 78 78 2d | 65 72 72 6f 72 2d 6d 65 |a-arexx-|error-me|
|000007c0| 73 73 61 67 65 73 20 5b | 22 4e 6f 20 63 61 75 73 |ssages [|"No caus|
|000007d0| 65 22 20 22 50 72 6f 67 | 72 61 6d 20 6e 6f 74 20 |e" "Prog|ram not |
|000007e0| 66 6f 75 6e 64 22 20 22 | 45 78 65 63 75 74 69 6f |found" "|Executio|
|000007f0| 6e 20 67 61 6c 74 65 64 | 22 20 22 49 6e 73 75 66 |n galted|" "Insuf|
|00000800| 66 69 63 69 65 6e 74 20 | 6d 65 6d 6f 72 79 22 20 |ficient |memory" |
|00000810| 22 49 6e 76 61 6c 69 64 | 20 63 68 61 72 61 63 74 |"Invalid| charact|
|00000820| 65 72 22 20 22 55 6e 6d | 61 74 63 68 65 64 20 71 |er" "Unm|atched q|
|00000830| 75 6f 74 65 22 20 22 55 | 6e 74 65 72 6d 69 6e 61 |uote" "U|ntermina|
|00000840| 74 65 64 20 63 6f 6d 6d | 65 6e 74 22 20 22 43 6c |ted comm|ent" "Cl|
|00000850| 61 75 73 65 20 74 6f 6f | 20 6c 6f 6e 67 22 20 22 |ause too| long" "|
|00000860| 49 6e 76 61 6c 69 64 20 | 74 6f 6b 65 6e 22 20 22 |Invalid |token" "|
|00000870| 53 79 6d 62 6f 6c 20 6f | 72 20 73 74 72 69 6e 67 |Symbol o|r string|
|00000880| 20 74 6f 6f 20 6c 6f 6e | 67 22 20 22 49 6e 76 61 | too lon|g" "Inva|
|00000890| 6c 69 64 20 6d 65 73 73 | 61 67 65 20 70 61 63 6b |lid mess|age pack|
|000008a0| 65 74 22 20 22 43 6f 6d | 6d 61 6e 64 20 73 74 72 |et" "Com|mand str|
|000008b0| 69 6e 67 20 65 72 72 6f | 72 22 20 22 45 72 72 6f |ing erro|r" "Erro|
|000008c0| 72 20 72 65 74 75 72 6e | 20 66 72 6f 6d 20 66 75 |r return| from fu|
|000008d0| 6e 63 74 69 6f 6e 22 20 | 22 48 6f 73 74 20 65 6e |nction" |"Host en|
|000008e0| 76 69 72 6f 6e 6d 65 6e | 74 20 6e 6f 74 20 66 6f |vironmen|t not fo|
|000008f0| 75 6e 64 22 20 22 52 65 | 71 75 65 73 74 65 64 20 |und" "Re|quested |
|00000900| 6c 69 62 72 61 72 79 20 | 6e 6f 74 20 66 6f 75 6e |library |not foun|
|00000910| 64 22 20 22 46 75 6e 63 | 74 69 6f 6e 20 6e 6f 74 |d" "Func|tion not|
|00000920| 20 66 6f 75 6e 64 22 20 | 22 46 75 6e 63 74 69 6f | found" |"Functio|
|00000930| 6e 20 64 69 64 20 6e 6f | 74 20 72 65 74 75 72 6e |n did no|t return|
|00000940| 20 76 61 6c 75 65 22 20 | 22 57 72 6f 6e 67 20 6e | value" |"Wrong n|
|00000950| 75 6d 62 65 72 20 6f 66 | 20 61 72 67 75 6d 65 6e |umber of| argumen|
|00000960| 74 73 22 20 22 49 6e 76 | 61 6c 69 64 20 61 72 67 |ts" "Inv|alid arg|
|00000970| 75 6d 65 6e 74 20 74 6f | 20 66 75 6e 63 74 69 6f |ument to| functio|
|00000980| 6e 22 20 22 49 6e 76 61 | 6c 69 64 20 50 52 4f 43 |n" "Inva|lid PROC|
|00000990| 45 44 55 52 45 22 20 22 | 55 6e 65 78 70 65 63 74 |EDURE" "|Unexpect|
|000009a0| 65 64 20 54 48 45 4e 20 | 6f 72 20 57 48 45 4e 22 |ed THEN |or WHEN"|
|000009b0| 20 22 55 6e 65 78 70 65 | 63 74 65 64 20 45 4c 53 | "Unexpe|cted ELS|
|000009c0| 45 20 6f 72 20 4f 54 48 | 45 52 57 49 53 45 22 20 |E or OTH|ERWISE" |
|000009d0| 22 55 6e 65 78 70 65 63 | 74 65 64 20 42 52 45 41 |"Unexpec|ted BREA|
|000009e0| 4b 2c 20 4c 45 41 56 45 | 20 6f 72 20 49 54 45 52 |K, LEAVE| or ITER|
|000009f0| 41 54 45 22 20 22 49 6e | 76 61 6c 69 64 20 73 74 |ATE" "In|valid st|
|00000a00| 61 74 65 6d 65 6e 74 20 | 69 6e 20 53 45 4c 45 43 |atement |in SELEC|
|00000a10| 54 22 20 22 4d 69 73 73 | 69 6e 67 20 6f 72 20 6d |T" "Miss|ing or m|
|00000a20| 75 6c 74 69 70 6c 65 20 | 54 48 45 4e 22 20 22 4d |ultiple |THEN" "M|
|00000a30| 69 73 73 69 6e 67 20 4f | 54 48 45 52 57 49 53 45 |issing O|THERWISE|
|00000a40| 22 20 22 4d 69 73 73 69 | 6e 67 20 6f 72 20 75 6e |" "Missi|ng or un|
|00000a50| 65 78 70 65 63 74 65 64 | 20 45 4e 44 22 20 22 53 |expected| END" "S|
|00000a60| 79 6d 62 6f 6c 20 6d 69 | 73 6d 61 74 63 68 22 20 |ymbol mi|smatch" |
|00000a70| 22 49 6e 76 61 6c 69 64 | 20 44 4f 20 73 79 6e 74 |"Invalid| DO synt|
|00000a80| 61 78 22 20 22 49 6e 63 | 6f 6d 70 6c 65 74 65 20 |ax" "Inc|omplete |
|00000a90| 49 46 20 6f 72 20 53 45 | 4c 45 43 54 22 20 22 4c |IF or SE|LECT" "L|
|00000aa0| 61 62 65 6c 20 6e 6f 74 | 20 66 6f 75 6e 64 22 20 |abel not| found" |
|00000ab0| 22 53 79 6d 62 6f 6c 20 | 65 78 70 65 63 74 65 64 |"Symbol |expected|
|00000ac0| 22 20 22 53 79 6d 62 6f | 6c 20 6f 72 20 73 74 72 |" "Symbo|l or str|
|00000ad0| 69 6e 67 20 65 78 70 65 | 63 74 65 64 22 20 22 49 |ing expe|cted" "I|
|00000ae0| 6e 76 61 6c 69 64 20 6b | 65 79 77 6f 72 64 22 20 |nvalid k|eyword" |
|00000af0| 22 52 65 71 75 69 72 65 | 64 20 6b 65 79 77 6f 72 |"Require|d keywor|
|00000b00| 64 20 6d 69 73 73 69 6e | 67 22 20 22 45 78 74 72 |d missin|g" "Extr|
|00000b10| 61 6e 65 6f 75 73 20 63 | 68 61 72 61 63 74 65 72 |aneous c|haracter|
|00000b20| 73 22 20 22 4b 65 79 77 | 6f 72 64 20 63 6f 6e 66 |s" "Keyw|ord conf|
|00000b30| 6c 69 63 74 22 20 22 49 | 6e 76 61 6c 69 64 20 74 |lict" "I|nvalid t|
|00000b40| 65 6d 70 6c 61 74 65 22 | 20 22 49 6e 76 61 6c 69 |emplate"| "Invali|
|00000b50| 64 20 54 52 41 43 45 20 | 72 65 71 75 65 73 74 22 |d TRACE |request"|
|00000b60| 20 22 55 6e 69 74 69 61 | 6c 69 7a 65 64 20 76 61 | "Unitia|lized va|
|00000b70| 72 69 61 62 6c 65 22 20 | 22 49 6e 76 61 6c 69 64 |riable" |"Invalid|
|00000b80| 20 76 61 72 69 61 62 6c | 65 20 6e 61 6d 65 22 20 | variabl|e name" |
|00000b90| 22 49 6e 76 61 6c 69 64 | 20 65 78 70 72 65 73 73 |"Invalid| express|
|00000ba0| 69 6f 6e 22 20 22 55 6e | 62 61 6c 61 6e 63 65 64 |ion" "Un|balanced|
|00000bb0| 20 70 61 72 65 6e 74 68 | 65 73 65 73 22 20 22 4e | parenth|eses" "N|
|00000bc0| 65 73 74 69 6e 67 20 6c | 69 6d 69 74 20 65 78 63 |esting l|imit exc|
|00000bd0| 65 65 64 65 64 22 20 22 | 49 6e 76 61 6c 69 64 20 |eeded" "|Invalid |
|00000be0| 65 78 70 72 65 73 73 69 | 6f 6e 20 72 65 73 75 6c |expressi|on resul|
|00000bf0| 74 22 20 22 45 78 70 72 | 65 73 73 69 6f 6e 20 72 |t" "Expr|ession r|
|00000c00| 65 71 75 69 72 65 64 22 | 20 22 42 6f 6f 6c 65 61 |equired"| "Boolea|
|00000c10| 6e 20 76 61 6c 75 65 20 | 6e 6f 74 20 30 20 6f 72 |n value |not 0 or|
|00000c20| 20 31 22 20 22 41 72 69 | 74 68 6d 65 74 69 63 20 | 1" "Ari|thmetic |
|00000c30| 63 6f 6e 76 65 72 73 69 | 6f 6e 20 65 72 72 6f 72 |conversi|on error|
|00000c40| 22 20 22 49 6e 76 61 6c | 69 64 20 6f 70 65 72 61 |" "Inval|id opera|
|00000c50| 6e 64 22 5d 20 22 5c 0a | 54 68 65 20 61 72 65 78 |nd"] "\.|The arex|
|00000c60| 78 20 65 72 72 6f 72 20 | 6d 65 73 73 61 67 65 73 |x error |messages|
|00000c70| 2c 20 73 6f 72 74 65 64 | 20 62 79 20 6e 75 6d 62 |, sorted| by numb|
|00000c80| 65 72 22 29 0a 0a 28 64 | 65 66 75 6e 20 61 6d 69 |er")..(d|efun ami|
|00000c90| 67 61 2d 61 72 65 78 78 | 2d 64 6f 2d 63 6f 6d 6d |ga-arexx|-do-comm|
|00000ca0| 61 6e 64 20 28 73 74 72 | 20 61 73 2d 66 69 6c 65 |and (str| as-file|
|00000cb0| 29 20 22 5c 0a 53 65 6e | 64 73 20 41 52 65 78 78 |) "\.Sen|ds ARexx|
|00000cc0| 20 63 6f 6d 6d 61 6e 64 | 20 73 74 72 20 28 6c 69 | command| str (li|
|00000cd0| 6b 65 20 61 6d 69 67 61 | 2d 61 72 65 78 78 2d 73 |ke amiga|-arexx-s|
|00000ce0| 65 6e 64 2d 63 6f 6d 6d | 61 6e 64 29 20 62 75 74 |end-comm|and) but|
|00000cf0| 20 77 61 69 74 73 0a 66 | 6f 72 20 61 6c 6c 20 70 | waits.f|or all p|
|00000d00| 65 6e 64 69 6e 67 20 63 | 6f 6d 6d 61 6e 64 73 20 |ending c|ommands |
|00000d10| 74 6f 20 63 6f 6d 70 6c | 65 74 65 20 28 69 6e 63 |to compl|ete (inc|
|00000d20| 6c 75 64 69 6e 67 20 74 | 68 69 73 20 6f 6e 65 29 |luding t|his one)|
|00000d30| 2e 22 20 28 69 6e 74 65 | 72 61 63 74 69 76 65 20 |." (inte|ractive |
|00000d40| 22 73 41 52 65 78 78 20 | 63 6f 6d 6d 61 6e 64 3a |"sARexx |command:|
|00000d50| 20 0a 50 22 29 20 28 62 | 79 74 65 2d 63 6f 64 65 | .P") (b|yte-code|
|00000d60| 20 22 ca 88 cb 09 0a 5c | 22 18 cc 08 21 88 cd 08 | ".....\|"...!...|
|00000d70| 0c 5c 22 1b 0b 85 4d 00 | 0b 41 40 1d ce 0b 0c 5c |.\"...M.|.A@....\|
|00000d80| 22 89 14 88 0d 0e 06 59 | 85 4c 00 0b 41 41 40 1e |"......Y|.L..AA@.|
|00000d90| 07 0e 07 0e 09 47 57 83 | 3d 00 0e 09 0e 07 48 82 |.....GW.|=.....H.|
|00000da0| 43 00 cf ca d0 0e 07 23 | 1e 08 d1 d2 0d 0e 08 23 |C......#|.......#|
|00000db0| 2a 29 29 29 87 22 20 5b | 69 64 20 73 74 72 20 61 |*)))." [|id str a|
|00000dc0| 73 2d 66 69 6c 65 20 65 | 72 72 20 61 6d 69 67 61 |s-file e|rr amiga|
|00000dd0| 2d 61 72 65 78 78 2d 65 | 72 72 6f 72 73 20 73 65 |-arexx-e|rrors se|
|00000de0| 76 65 72 69 74 79 20 61 | 6d 69 67 61 2d 61 72 65 |verity a|miga-are|
|00000df0| 78 78 2d 66 61 69 6c 61 | 74 20 65 72 72 6f 72 2d |xx-faila|t error-|
|00000e00| 63 6f 64 65 20 65 72 72 | 6f 72 2d 6d 65 73 73 61 |code err|or-messa|
|00000e10| 67 65 20 61 6d 69 67 61 | 2d 61 72 65 78 78 2d 65 |ge amiga|-arexx-e|
|00000e20| 72 72 6f 72 2d 6d 65 73 | 73 61 67 65 73 20 6e 69 |rror-mes|sages ni|
|00000e30| 6c 20 61 6d 69 67 61 2d | 61 72 65 78 78 2d 73 65 |l amiga-|arexx-se|
|00000e40| 6e 64 2d 63 6f 6d 6d 61 | 6e 64 20 61 6d 69 67 61 |nd-comma|nd amiga|
|00000e50| 2d 61 72 65 78 78 2d 77 | 61 69 74 2d 63 6f 6d 6d |-arexx-w|ait-comm|
|00000e60| 61 6e 64 20 61 73 73 71 | 20 64 65 6c 71 20 66 6f |and assq| delq fo|
|00000e70| 72 6d 61 74 20 22 55 6e | 6b 6e 6f 77 6e 20 65 72 |rmat "Un|known er|
|00000e80| 72 6f 72 20 25 64 22 20 | 65 72 72 6f 72 20 22 41 |ror %d" |error "A|
|00000e90| 72 65 78 78 20 63 6f 6d | 6d 61 6e 64 20 66 61 69 |rexx com|mand fai|
|00000ea0| 6c 65 64 2c 20 6c 65 76 | 65 6c 20 25 64 2c 20 63 |led, lev|el %d, c|
|00000eb0| 61 75 73 65 20 25 73 22 | 5d 20 39 29 29 0a 0a 28 |ause %s"|] 9))..(|
|00000ec0| 67 6c 6f 62 61 6c 2d 73 | 65 74 2d 6b 65 79 20 22 |global-s|et-key "|
|00000ed0| 1c 58 22 20 28 71 75 6f | 74 65 20 61 6d 69 67 61 |.X" (quo|te amiga|
|00000ee0| 2d 61 72 65 78 78 2d 70 | 72 6f 63 65 73 73 29 29 |-arexx-p|rocess))|
|00000ef0| 0a 0a 28 73 65 74 71 20 | 61 6d 69 67 61 2d 61 72 |..(setq |amiga-ar|
|00000f00| 65 78 78 2d 69 6e 69 74 | 69 61 6c 69 7a 65 64 20 |exx-init|ialized |
|00000f10| 74 29 0a 0a 28 73 65 74 | 71 20 63 6f 6d 70 6c 65 |t)..(set|q comple|
|00000f20| 74 69 6f 6e 2d 69 67 6e | 6f 72 65 2d 63 61 73 65 |tion-ign|ore-case|
|00000f30| 20 74 29 0a 0a 28 73 65 | 74 71 20 76 65 72 73 69 | t)..(se|tq versi|
|00000f40| 6f 6e 2d 63 6f 6e 74 72 | 6f 6c 20 28 71 75 6f 74 |on-contr|ol (quot|
|00000f50| 65 20 6e 65 76 65 72 29 | 29 0a                   |e never)|).      |
+--------+-------------------------+-------------------------+--------+--------+