/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_xemacs.idb / usr / freeware / lib / xemacs-20.4 / lisp / modes / ksh-mode.elc.z / ksh-mode.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 4d 6f 6e 20 4d | 61 72 20 20 39 20 31 32 |on Mon M|ar  9 12|
|00000040| 3a 35 31 3a 30 34 20 31 | 39 39 38 0a 3b 3b 3b 20 |:51:04 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 32 30 | 2e 33 2f 78 65 6d 61 63 |emacs/20|.3/xemac|
|00000090| 73 2d 32 30 2e 33 2f 6c | 69 73 70 2f 6d 6f 64 65 |s-20.3/l|isp/mode|
|000000a0| 73 2f 6b 73 68 2d 6d 6f | 64 65 2e 65 6c 0a 3b 3b |s/ksh-mo|de.el.;;|
|000000b0| 3b 20 65 6d 61 63 73 20 | 76 65 72 73 69 6f 6e 20 |; emacs |version |
|000000c0| 32 30 2e 34 20 22 45 6d | 65 72 61 6c 64 22 20 58 |20.4 "Em|erald" X|
|000000d0| 45 6d 61 63 73 20 20 4c | 75 63 69 64 2e 0a 3b 3b |Emacs  L|ucid..;;|
|000000e0| 3b 20 62 79 74 65 63 6f | 6d 70 20 76 65 72 73 69 |; byteco|mp versi|
|000000f0| 6f 6e 20 32 2e 32 35 20 | 58 45 6d 61 63 73 3b 20 |on 2.25 |XEmacs; |
|00000100| 32 32 2d 4d 61 72 2d 39 | 36 2e 0a 3b 3b 3b 20 6f |22-Mar-9|6..;;; o|
|00000110| 70 74 69 6d 69 7a 61 74 | 69 6f 6e 20 69 73 20 6f |ptimizat|ion is o|
|00000120| 6e 2e 0a 3b 3b 3b 20 74 | 68 69 73 20 66 69 6c 65 |n..;;; t|his file|
|00000130| 20 75 73 65 73 20 6f 70 | 63 6f 64 65 73 20 77 68 | uses op|codes wh|
|00000140| 69 63 68 20 64 6f 20 6e | 6f 74 20 65 78 69 73 74 |ich do n|ot exist|
|00000150| 20 69 6e 20 45 6d 61 63 | 73 20 31 39 2e 0a 0a 28 | in Emac|s 19...(|
|00000160| 69 66 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |if (and |(boundp |
|00000170| 27 65 6d 61 63 73 2d 76 | 65 72 73 69 6f 6e 29 0a |'emacs-v|ersion).|
|00000180| 09 20 28 6f 72 20 28 61 | 6e 64 20 28 62 6f 75 6e |. (or (a|nd (boun|
|00000190| 64 70 20 27 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |dp 'epoc|h::versi|
|000001a0| 6f 6e 29 20 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |on) epoc|h::versi|
|000001b0| 6f 6e 29 0a 09 20 20 20 | 20 20 28 73 74 72 69 6e |on)..   |  (strin|
|000001c0| 67 2d 6c 65 73 73 70 20 | 65 6d 61 63 73 2d 76 65 |g-lessp |emacs-ve|
|000001d0| 72 73 69 6f 6e 20 22 32 | 30 22 29 29 29 0a 20 20 |rsion "2|0"))).  |
|000001e0| 20 20 28 65 72 72 6f 72 | 20 22 60 6b 73 68 2d 6d |  (error| "`ksh-m|
|000001f0| 6f 64 65 2e 65 6c 27 20 | 77 61 73 20 63 6f 6d 70 |ode.el' |was comp|
|00000200| 69 6c 65 64 20 66 6f 72 | 20 45 6d 61 63 73 20 32 |iled for| Emacs 2|
|00000210| 30 22 29 29 0a 0a 28 6f | 72 20 28 62 6f 75 6e 64 |0"))..(o|r (bound|
|00000220| 70 20 27 63 75 72 72 65 | 6e 74 2d 6c 6f 61 64 2d |p 'curre|nt-load-|
|00000230| 6c 69 73 74 29 20 28 73 | 65 74 71 20 63 75 72 72 |list) (s|etq curr|
|00000240| 65 6e 74 2d 6c 6f 61 64 | 2d 6c 69 73 74 20 6e 69 |ent-load|-list ni|
|00000250| 6c 29 29 0a 0a 0a 23 40 | 34 36 20 2a 56 65 72 73 |l))...#@|46 *Vers|
|00000260| 69 6f 6e 20 6e 75 6d 62 | 65 72 73 20 6f 66 20 74 |ion numb|ers of t|
|00000270| 68 69 73 20 76 65 72 73 | 69 6f 6e 20 6f 66 20 6b |his vers|ion of k|
|00000280| 73 68 2d 6d 6f 64 65 1f | 0a 28 64 65 66 63 6f 6e |sh-mode.|.(defcon|
|00000290| 73 74 20 6b 73 68 2d 6d | 6f 64 65 2d 76 65 72 73 |st ksh-m|ode-vers|
|000002a0| 69 6f 6e 20 22 24 52 65 | 76 69 73 69 6f 6e 3a 20 |ion "$Re|vision: |
|000002b0| 32 2e 39 20 24 22 20 28 | 23 24 20 2e 20 2d 36 30 |2.9 $" (|#$ . -60|
|000002c0| 33 29 29 0a 23 40 31 34 | 32 20 2a 49 6e 64 65 6e |3)).#@14|2 *Inden|
|000002d0| 74 61 74 69 6f 6e 20 6f | 66 20 6b 73 68 20 73 74 |tation o|f ksh st|
|000002e0| 61 74 65 6d 65 6e 74 73 | 20 77 69 74 68 20 72 65 |atements| with re|
|000002f0| 73 70 65 63 74 20 74 6f | 20 63 6f 6e 74 61 69 6e |spect to| contain|
|00000300| 69 6e 67 20 62 6c 6f 63 | 6b 2e 20 41 20 76 61 6c |ing bloc|k. A val|
|00000310| 75 65 0a 6f 66 20 6e 69 | 6c 20 69 6e 64 69 63 61 |ue.of ni|l indica|
|00000320| 74 65 73 20 63 6f 6d 70 | 6f 75 6e 64 20 6c 69 73 |tes comp|ound lis|
|00000330| 74 20 6b 65 79 77 6f 72 | 64 20 28 22 64 6f 22 20 |t keywor|d ("do" |
|00000340| 61 6e 64 20 22 74 68 65 | 6e 22 29 20 61 6c 69 67 |and "the|n") alig|
|00000350| 6e 6d 65 6e 74 2e 1f 0a | 28 64 65 66 76 61 72 20 |nment...|(defvar |
|00000360| 6b 73 68 2d 69 6e 64 65 | 6e 74 20 32 20 28 23 24 |ksh-inde|nt 2 (#$|
|00000370| 20 2e 20 2d 37 31 34 29 | 29 0a 23 40 36 35 20 2a | . -714)|).#@65 *|
|00000380| 41 64 64 69 74 69 6f 6e | 61 6c 20 69 6e 64 65 6e |Addition|al inden|
|00000390| 74 61 74 69 6f 6e 20 66 | 6f 72 20 63 61 73 65 20 |tation f|or case |
|000003a0| 69 74 65 6d 73 20 77 69 | 74 68 69 6e 20 61 20 63 |items wi|thin a c|
|000003b0| 61 73 65 20 73 74 61 74 | 65 6d 65 6e 74 2e 1f 0a |ase stat|ement...|
|000003c0| 28 64 65 66 76 61 72 20 | 6b 73 68 2d 63 61 73 65 |(defvar |ksh-case|
|000003d0| 2d 69 74 65 6d 2d 6f 66 | 66 73 65 74 20 6b 73 68 |-item-of|fset ksh|
|000003e0| 2d 69 6e 64 65 6e 74 20 | 28 23 24 20 2e 20 2d 38 |-indent |(#$ . -8|
|000003f0| 39 35 29 29 0a 23 40 35 | 38 20 2a 41 64 64 69 74 |95)).#@5|8 *Addit|
|00000400| 69 6f 6e 61 6c 20 69 6e | 64 65 6e 74 61 74 69 6f |ional in|dentatio|
|00000410| 6e 20 66 6f 72 20 73 74 | 61 74 65 6d 65 6e 74 73 |n for st|atements|
|00000420| 20 75 6e 64 65 72 20 63 | 61 73 65 20 69 74 65 6d | under c|ase item|
|00000430| 73 2e 1f 0a 28 64 65 66 | 76 61 72 20 6b 73 68 2d |s...(def|var ksh-|
|00000440| 63 61 73 65 2d 69 6e 64 | 65 6e 74 20 6e 69 6c 20 |case-ind|ent nil |
|00000450| 28 23 24 20 2e 20 2d 31 | 30 31 38 29 29 0a 23 40 |(#$ . -1|018)).#@|
|00000460| 35 35 20 2a 41 64 64 69 | 74 69 6f 6e 61 6c 20 69 |55 *Addi|tional i|
|00000470| 6e 64 65 6e 74 61 74 69 | 6f 6e 20 66 6f 72 20 6b |ndentati|on for k|
|00000480| 65 79 77 6f 72 64 73 20 | 22 64 6f 22 20 61 6e 64 |eywords |"do" and|
|00000490| 20 22 74 68 65 6e 22 2e | 1f 0a 28 64 65 66 76 61 | "then".|..(defva|
|000004a0| 72 20 6b 73 68 2d 67 72 | 6f 75 70 2d 6f 66 66 73 |r ksh-gr|oup-offs|
|000004b0| 65 74 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 08 |et (byte|-code ".|
|000004c0| 5b 87 22 20 5b 6b 73 68 | 2d 69 6e 64 65 6e 74 5d |[." [ksh|-indent]|
|000004d0| 20 31 29 20 28 23 24 20 | 2e 20 2d 31 31 32 33 29 | 1) (#$ |. -1123)|
|000004e0| 29 0a 23 40 36 38 20 2a | 41 64 64 69 74 69 6f 6e |).#@68 *|Addition|
|000004f0| 61 6c 20 69 6e 64 65 6e | 74 61 74 69 6f 6e 20 6f |al inden|tation o|
|00000500| 66 20 22 7b 22 20 75 6e | 64 65 72 20 66 75 6e 63 |f "{" un|der func|
|00000510| 74 69 6f 6e 73 20 6f 72 | 20 62 72 61 63 65 20 67 |tions or| brace g|
|00000520| 72 6f 75 70 69 6e 67 73 | 2e 1f 0a 28 64 65 66 76 |roupings|...(defv|
|00000530| 61 72 20 6b 73 68 2d 62 | 72 61 63 65 2d 6f 66 66 |ar ksh-b|race-off|
|00000540| 73 65 74 20 30 20 28 23 | 24 20 2e 20 2d 31 32 35 |set 0 (#|$ . -125|
|00000550| 35 29 29 0a 23 40 31 31 | 30 20 2a 41 64 64 69 74 |5)).#@11|0 *Addit|
|00000560| 69 6f 6e 61 6c 20 69 6e | 64 65 6e 74 61 74 69 6f |ional in|dentatio|
|00000570| 6e 20 6f 66 20 6c 69 6e | 65 20 74 68 61 74 20 69 |n of lin|e that i|
|00000580| 73 20 70 72 65 63 65 64 | 65 64 20 6f 66 20 61 20 |s preced|ed of a |
|00000590| 6c 69 6e 65 20 65 6e 64 | 69 6e 67 20 77 69 74 68 |line end|ing with|
|000005a0| 20 61 0a 5c 20 74 6f 20 | 6d 61 6b 65 20 69 74 20 | a.\ to |make it |
|000005b0| 63 6f 6e 74 69 6e 75 65 | 20 6f 6e 20 6e 65 78 74 |continue| on next|
|000005c0| 20 6c 69 6e 65 2e 1f 0a | 28 64 65 66 76 61 72 20 | line...|(defvar |
|000005d0| 6b 73 68 2d 6d 75 6c 74 | 69 6c 69 6e 65 2d 6f 66 |ksh-mult|iline-of|
|000005e0| 66 73 65 74 20 31 20 28 | 23 24 20 2e 20 2d 31 33 |fset 1 (|#$ . -13|
|000005f0| 37 30 29 29 0a 23 40 31 | 30 35 20 2a 49 66 20 6e |70)).#@1|05 *If n|
|00000600| 6f 6e 2d 6e 69 6c 20 65 | 63 68 6f 20 69 6e 20 74 |on-nil e|cho in t|
|00000610| 68 65 20 6d 69 6e 69 62 | 75 66 66 65 72 20 74 68 |he minib|uffer th|
|00000620| 65 20 6d 61 74 63 68 69 | 6e 67 20 63 6f 6d 70 6f |e matchi|ng compo|
|00000630| 75 6e 64 20 63 6f 6d 6d | 61 6e 64 0a 66 6f 72 20 |und comm|and.for |
|00000640| 74 68 65 20 22 64 6f 6e | 65 22 2c 20 22 7d 22 2c |the "don|e", "}",|
|00000650| 20 22 66 69 22 2c 20 6f | 72 20 22 65 73 61 63 22 | "fi", o|r "esac"|
|00000660| 2e 20 1f 0a 28 64 65 66 | 76 61 72 20 6b 73 68 2d |. ..(def|var ksh-|
|00000670| 6d 61 74 63 68 2d 61 6e | 64 2d 74 65 6c 6c 20 74 |match-an|d-tell t|
|00000680| 20 28 23 24 20 2e 20 2d | 31 35 33 31 29 29 0a 23 | (#$ . -|1531)).#|
|00000690| 40 32 31 38 20 2a 43 6f | 6e 74 72 6f 6c 73 20 74 |@218 *Co|ntrols t|
|000006a0| 68 65 20 6f 70 65 72 61 | 74 69 6f 6e 20 6f 66 20 |he opera|tion of |
|000006b0| 74 68 65 20 54 41 42 20 | 6b 65 79 2e 20 49 66 20 |the TAB |key. If |
|000006c0| 74 20 28 74 68 65 20 64 | 65 66 61 75 6c 74 29 2c |t (the d|efault),|
|000006d0| 20 61 6c 77 61 79 73 0a | 72 65 69 6e 64 65 6e 74 | always.|reindent|
|000006e0| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 6c 69 6e | the cur|rent lin|
|000006f0| 65 2e 20 20 49 66 20 6e | 69 6c 2c 20 69 6e 64 65 |e.  If n|il, inde|
|00000700| 6e 74 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 6c |nt the c|urrent l|
|00000710| 69 6e 65 20 6f 6e 6c 79 | 20 69 66 0a 70 6f 69 6e |ine only| if.poin|
|00000720| 74 20 69 73 20 61 74 20 | 74 68 65 20 6c 65 66 74 |t is at |the left|
|00000730| 20 6d 61 72 67 69 6e 20 | 6f 72 20 69 6e 20 74 68 | margin |or in th|
|00000740| 65 20 6c 69 6e 65 27 73 | 20 69 6e 64 65 6e 74 61 |e line's| indenta|
|00000750| 74 69 6f 6e 3b 20 6f 74 | 68 65 72 77 69 73 65 0a |tion; ot|herwise.|
|00000760| 69 6e 73 65 72 74 20 61 | 20 74 61 62 2e 1f 0a 28 |insert a| tab...(|
|00000770| 64 65 66 76 61 72 20 6b | 73 68 2d 74 61 62 2d 61 |defvar k|sh-tab-a|
|00000780| 6c 77 61 79 73 2d 69 6e | 64 65 6e 74 20 74 20 28 |lways-in|dent t (|
|00000790| 23 24 20 2e 20 2d 31 36 | 38 35 29 29 0a 23 40 33 |#$ . -16|85)).#@3|
|000007a0| 33 30 20 2a 43 6f 6e 74 | 72 6f 6c 73 20 77 68 65 |30 *Cont|rols whe|
|000007b0| 74 68 65 72 20 6e 65 73 | 74 65 64 20 63 6f 6e 73 |ther nes|ted cons|
|000007c0| 74 72 75 63 74 73 20 61 | 6c 69 67 6e 20 66 72 6f |tructs a|lign fro|
|000007d0| 6d 20 74 68 65 20 6b 65 | 79 77 6f 72 64 20 6f 72 |m the ke|yword or|
|000007e0| 0a 74 68 65 20 63 75 72 | 72 65 6e 74 20 69 6e 64 |.the cur|rent ind|
|000007f0| 65 6e 74 61 74 69 6f 6e | 2e 20 49 66 20 6e 6f 6e |entation|. If non|
|00000800| 2d 6e 69 6c 2c 20 69 6e | 64 65 6e 74 61 74 69 6f |-nil, in|dentatio|
|00000810| 6e 20 77 69 6c 6c 20 62 | 65 20 72 65 6c 61 74 69 |n will b|e relati|
|00000820| 76 65 20 74 6f 0a 74 68 | 65 20 63 6f 6c 75 6d 6e |ve to.th|e column|
|00000830| 20 74 68 65 20 6b 65 79 | 77 6f 72 64 20 73 74 61 | the key|word sta|
|00000840| 72 74 73 2e 20 49 66 20 | 6e 69 6c 2c 20 69 6e 64 |rts. If |nil, ind|
|00000850| 65 6e 74 61 74 69 6f 6e | 20 77 69 6c 6c 20 62 65 |entation| will be|
|00000860| 20 72 65 6c 61 74 69 76 | 65 20 74 6f 0a 74 68 65 | relativ|e to.the|
|00000870| 20 63 75 72 72 65 6e 74 | 20 69 6e 64 65 6e 74 61 | current| indenta|
|00000880| 74 69 6f 6e 20 6f 66 20 | 74 68 65 20 6c 69 6e 65 |tion of |the line|
|00000890| 20 74 68 65 20 6b 65 79 | 77 6f 72 64 20 69 73 20 | the key|word is |
|000008a0| 6f 6e 2e 0a 54 68 65 20 | 64 65 66 61 75 6c 74 20 |on..The |default |
|000008b0| 76 61 6c 75 65 20 69 73 | 20 6e 6f 6e 2d 6e 69 6c |value is| non-nil|
|000008c0| 2e 20 20 54 68 65 20 6e | 6f 6e 2d 6e 69 6c 20 63 |.  The n|on-nil c|
|000008d0| 61 73 65 20 64 6f 65 73 | 6e 27 74 20 77 6f 72 6b |ase does|n't work|
|000008e0| 20 76 65 72 79 20 77 65 | 6c 6c 2e 1f 0a 28 64 65 | very we|ll...(de|
|000008f0| 66 76 61 72 20 6b 73 68 | 2d 61 6c 69 67 6e 2d 74 |fvar ksh|-align-t|
|00000900| 6f 2d 6b 65 79 77 6f 72 | 64 20 6e 69 6c 20 28 23 |o-keywor|d nil (#|
|00000910| 24 20 2e 20 2d 31 39 35 | 35 29 29 0a 23 40 39 30 |$ . -195|5)).#@90|
|00000920| 20 2a 52 65 67 75 6c 61 | 72 20 65 78 70 72 65 73 | *Regula|r expres|
|00000930| 73 69 6f 6e 20 75 73 65 | 64 20 74 6f 20 72 65 63 |sion use|d to rec|
|00000940| 6f 67 6e 69 7a 65 20 63 | 6f 6d 6d 65 6e 74 73 2e |ognize c|omments.|
|00000950| 20 43 75 73 74 6f 6d 69 | 7a 65 20 74 6f 20 73 75 | Customi|ze to su|
|00000960| 70 70 6f 72 74 0a 6b 73 | 68 2d 6c 69 6b 65 20 6c |pport.ks|h-like l|
|00000970| 61 6e 67 75 61 67 65 73 | 2e 1f 0a 28 64 65 66 76 |anguages|...(defv|
|00000980| 61 72 20 6b 73 68 2d 63 | 6f 6d 6d 65 6e 74 2d 72 |ar ksh-c|omment-r|
|00000990| 65 67 65 78 70 20 22 5e | 5c 5c 73 20 2a 23 22 20 |egexp "^|\\s *#" |
|000009a0| 28 23 24 20 2e 20 2d 32 | 33 33 37 29 29 0a 28 64 |(#$ . -2|337)).(d|
|000009b0| 65 66 61 6c 69 61 73 20 | 27 6b 73 68 2d 63 75 72 |efalias |'ksh-cur|
|000009c0| 72 65 6e 74 2d 69 6e 64 | 65 6e 74 61 74 69 6f 6e |rent-ind|entation|
|000009d0| 20 23 5b 6e 69 6c 20 22 | c0 87 22 20 5b 6e 69 6c | #[nil "|.." [nil|
|000009e0| 5d 20 31 5d 29 0a 28 62 | 79 74 65 2d 63 6f 64 65 |] 1]).(b|yte-code|
|000009f0| 20 22 c0 c1 4d 88 c2 c3 | 21 ac 82 c4 13 c3 0d 42 | "..M...|!......B|
|00000a00| 15 c6 c3 21 88 c7 c3 c4 | 5c 22 88 c2 c8 21 ac 83 |...!....|\"...!..|
|00000a10| c9 16 08 c8 0d 42 15 c2 | ca 21 ac 83 cb 16 5c 6e |.....B..|.!....\n|
|00000a20| ca 0d 42 15 c2 cc 21 ac | 83 cd 16 0c cc 0d 42 15 |..B...!.|......B.|
|00000a30| c2 ce 21 ac 83 cd 16 0e | ce 0d 42 15 c2 cf 21 ac |..!.....|..B...!.|
|00000a40| 83 d0 16 0f cf 0d 42 15 | c2 d1 21 ac 83 d2 16 11 |......B.|..!.....|
|00000a50| d1 0d 42 15 c2 d3 21 ac | 83 d4 16 13 d3 0d 42 15 |..B...!.|......B.|
|00000a60| c2 d5 21 ac 83 d2 16 15 | d5 0d 42 15 c2 d6 21 ac |..!.....|..B...!.|
|00000a70| 83 d2 16 16 d6 0d 42 15 | c2 d7 21 ac 83 d8 16 17 |......B.|..!.....|
|00000a80| d7 0d 42 15 d9 da db dc | 0e 17 dd 23 de 51 cd 42 |..B.....|...#.Q.B|
|00000a90| df e0 46 16 21 e1 0d 42 | 15 e2 e3 e4 e1 23 87 22 |..F.!..B|.....#."|
|00000aa0| 20 5b 6b 73 68 2d 63 75 | 72 72 65 6e 74 2d 69 6e | [ksh-cu|rrent-in|
|00000ab0| 64 65 6e 74 61 74 69 6f | 6e 20 63 75 72 72 65 6e |dentatio|n curren|
|00000ac0| 74 2d 63 6f 6c 75 6d 6e | 20 62 6f 75 6e 64 70 20 |t-column| boundp |
|00000ad0| 6b 73 68 2d 63 6f 6d 70 | 6c 65 74 69 6f 6e 2d 6c |ksh-comp|letion-l|
|00000ae0| 69 73 74 20 6e 69 6c 20 | 63 75 72 72 65 6e 74 2d |ist nil |current-|
|00000af0| 6c 6f 61 64 2d 6c 69 73 | 74 20 6d 61 6b 65 2d 76 |load-lis|t make-v|
|00000b00| 61 72 69 61 62 6c 65 2d | 62 75 66 66 65 72 2d 6c |ariable-|buffer-l|
|00000b10| 6f 63 61 6c 20 73 65 74 | 2d 64 65 66 61 75 6c 74 |ocal set|-default|
|00000b20| 20 6b 73 68 2d 63 6f 6d | 70 6c 65 74 69 6f 6e 2d | ksh-com|pletion-|
|00000b30| 74 79 70 65 2d 6d 69 73 | 63 20 30 20 6b 73 68 2d |type-mis|c 0 ksh-|
|00000b40| 63 6f 6d 70 6c 65 74 69 | 6f 6e 2d 72 65 67 65 78 |completi|on-regex|
|00000b50| 70 2d 76 61 72 20 22 5c | 5c 28 5b 41 2d 5a 61 2d |p-var "\|\([A-Za-|
|00000b60| 7a 5f 30 2d 39 5d 2b 5c | 5c 29 3d 22 20 6b 73 68 |z_0-9]+\|\)=" ksh|
|00000b70| 2d 63 6f 6d 70 6c 65 74 | 69 6f 6e 2d 74 79 70 65 |-complet|ion-type|
|00000b80| 2d 76 61 72 20 31 20 6b | 73 68 2d 63 6f 6d 70 6c |-var 1 k|sh-compl|
|00000b90| 65 74 69 6f 6e 2d 6d 61 | 74 63 68 2d 76 61 72 20 |etion-ma|tch-var |
|00000ba0| 6b 73 68 2d 63 6f 6d 70 | 6c 65 74 69 6f 6e 2d 72 |ksh-comp|letion-r|
|00000bb0| 65 67 65 78 70 2d 76 61 | 72 32 20 22 5c 5c 24 5c |egexp-va|r2 "\\$\|
|00000bc0| 5c 28 7b 5c 5c 7c 7b 23 | 5c 5c 29 3f 5c 5c 28 5b |\({\\|{#|\\)?\\([|
|00000bd0| 41 2d 5a 61 2d 7a 5f 30 | 2d 39 5d 2b 5c 5c 29 5b |A-Za-z_0|-9]+\\)[|
|00000be0| 23 25 3a 7d 5d 3f 22 20 | 6b 73 68 2d 63 6f 6d 70 |#%:}]?" |ksh-comp|
|00000bf0| 6c 65 74 69 6f 6e 2d 6d | 61 74 63 68 2d 76 61 72 |letion-m|atch-var|
|00000c00| 32 20 32 20 6b 73 68 2d | 63 6f 6d 70 6c 65 74 69 |2 2 ksh-|completi|
|00000c10| 6f 6e 2d 72 65 67 65 78 | 70 2d 66 75 6e 63 74 69 |on-regex|p-functi|
|00000c20| 6f 6e 20 22 5c 5c 28 66 | 75 6e 63 74 69 6f 6e 5c |on "\\(f|unction\|
|00000c30| 5c 29 3f 5b 20 09 5d 2a | 5c 5c 28 5b 41 2d 5a 61 |\)?[ .]*|\\([A-Za|
|00000c40| 2d 7a 5f 30 2d 39 5d 2b | 5c 5c 29 5b 20 09 5d 2a |-z_0-9]+|\\)[ .]*|
|00000c50| 28 5b 20 09 5d 2a 29 22 | 20 6b 73 68 2d 63 6f 6d |([ .]*)"| ksh-com|
|00000c60| 70 6c 65 74 69 6f 6e 2d | 74 79 70 65 2d 66 75 6e |pletion-|type-fun|
|00000c70| 63 74 69 6f 6e 20 6b 73 | 68 2d 63 6f 6d 70 6c 65 |ction ks|h-comple|
|00000c80| 74 69 6f 6e 2d 6d 61 74 | 63 68 2d 66 75 6e 63 74 |tion-mat|ch-funct|
|00000c90| 69 6f 6e 20 6b 73 68 2d | 6b 65 79 77 6f 72 64 73 |ion ksh-|keywords|
|00000ca0| 20 28 22 66 6f 72 22 20 | 22 69 6e 22 20 22 64 6f | ("for" |"in" "do|
|00000cb0| 22 20 22 64 6f 6e 65 22 | 20 22 73 65 6c 65 63 74 |" "done"| "select|
|00000cc0| 22 20 22 63 61 73 65 22 | 20 22 65 73 61 63 22 20 |" "case"| "esac" |
|00000cd0| 22 69 66 22 20 22 74 68 | 65 6e 22 20 22 65 6c 69 |"if" "th|en" "eli|
|00000ce0| 66 22 20 22 65 6c 73 65 | 22 20 22 66 69 22 20 22 |f" "else|" "fi" "|
|00000cf0| 77 68 69 6c 65 22 20 22 | 75 6e 74 69 6c 22 20 22 |while" "|until" "|
|00000d00| 66 75 6e 63 74 69 6f 6e | 22 20 22 74 69 6d 65 22 |function|" "time"|
|00000d10| 20 22 61 6c 69 61 73 22 | 20 22 62 67 22 20 22 62 | "alias"| "bg" "b|
|00000d20| 72 65 61 6b 22 20 22 63 | 6f 6e 74 69 6e 75 65 22 |reak" "c|ontinue"|
|00000d30| 20 22 63 64 22 20 22 65 | 78 69 74 22 20 22 65 63 | "cd" "e|xit" "ec|
|00000d40| 68 6f 22 20 22 66 63 22 | 20 22 66 67 22 20 22 67 |ho" "fc"| "fg" "g|
|00000d50| 65 74 6f 70 74 73 22 20 | 22 6a 6f 62 73 22 20 22 |etopts" |"jobs" "|
|00000d60| 6b 69 6c 6c 22 20 22 6c | 65 74 22 20 22 6e 65 77 |kill" "l|et" "new|
|00000d70| 67 72 70 22 20 22 70 72 | 69 6e 74 22 20 22 70 77 |grp" "pr|int" "pw|
|00000d80| 64 22 20 22 72 65 61 64 | 22 20 22 72 65 61 64 6f |d" "read|" "reado|
|00000d90| 6e 6c 79 22 20 22 72 65 | 74 75 72 6e 22 20 22 73 |nly" "re|turn" "s|
|00000da0| 65 74 22 20 22 73 68 69 | 66 74 22 20 22 74 65 73 |et" "shi|ft" "tes|
|00000db0| 74 22 20 22 74 69 6d 65 | 73 22 20 22 74 72 61 70 |t" "time|s" "trap|
|00000dc0| 22 20 22 74 79 70 65 73 | 65 74 22 20 22 75 6c 69 |" "types|et" "uli|
|00000dd0| 6d 69 74 22 20 22 75 6d | 61 73 6b 22 20 22 75 6e |mit" "um|ask" "un|
|00000de0| 61 6c 69 61 73 22 20 22 | 75 6e 73 65 74 22 20 22 |alias" "|unset" "|
|00000df0| 77 61 69 74 22 20 22 77 | 68 65 6e 63 65 22 29 20 |wait" "w|hence") |
|00000e00| 28 22 5c 5c 28 5c 5c 5b | 2e 2a 5c 5c 5d 5c 5c 29 |("\\(\\[|.*\\]\\)|
|00000e10| 22 20 31 20 66 6f 6e 74 | 2d 6c 6f 63 6b 2d 73 74 |" 1 font|-lock-st|
|00000e20| 72 69 6e 67 2d 66 61 63 | 65 20 74 29 20 22 5c 5c |ring-fac|e t) "\\|
|00000e30| 28 5c 5c 3c 22 20 6d 61 | 70 63 6f 6e 63 61 74 20 |(\\<" ma|pconcat |
|00000e40| 69 64 65 6e 74 69 74 79 | 20 22 5c 5c 3e 5c 5c 7c |identity| "\\>\\||
|00000e50| 5c 5c 3c 22 20 22 5c 5c | 3e 5c 5c 29 22 20 28 22 |\\<" "\\|>\\)" ("|
|00000e60| 5c 5c 3c 66 75 6e 63 74 | 69 6f 6e 5b 20 09 5d 2b |\\<funct|ion[ .]+|
|00000e70| 5c 5c 28 5b 5e 28 3b 20 | 09 5d 2b 5c 5c 29 22 20 |\\([^(; |.]+\\)" |
|00000e80| 31 20 66 6f 6e 74 2d 6c | 6f 63 6b 2d 66 75 6e 63 |1 font-l|ock-func|
|00000e90| 74 69 6f 6e 2d 6e 61 6d | 65 2d 66 61 63 65 29 20 |tion-nam|e-face) |
|00000ea0| 28 22 5c 5c 28 5e 5b 20 | 09 5d 2a 5b 41 2d 5a 61 |("\\(^[ |.]*[A-Za|
|00000eb0| 2d 7a 5f 5d 5b 41 2d 5a | 61 2d 7a 5f 30 2d 39 5d |-z_][A-Z|a-z_0-9]|
|00000ec0| 2a 5b 20 09 5d 2a 28 29 | 5c 5c 29 22 20 31 20 66 |*[ .]*()|\\)" 1 f|
|00000ed0| 6f 6e 74 2d 6c 6f 63 6b | 2d 66 75 6e 63 74 69 6f |ont-lock|-functio|
|00000ee0| 6e 2d 6e 61 6d 65 2d 66 | 61 63 65 29 20 6b 73 68 |n-name-f|ace) ksh|
|00000ef0| 2d 66 6f 6e 74 2d 6c 6f | 63 6b 2d 6b 65 79 77 6f |-font-lo|ck-keywo|
|00000f00| 72 64 73 20 70 75 74 20 | 6b 73 68 2d 6d 6f 64 65 |rds put |ksh-mode|
|00000f10| 20 66 6f 6e 74 2d 6c 6f | 63 6b 2d 6b 65 79 77 6f | font-lo|ck-keywo|
|00000f20| 72 64 73 5d 20 36 29 0a | 23 40 35 39 20 2a 52 65 |rds] 6).|#@59 *Re|
|00000f30| 67 65 78 70 20 75 73 65 | 64 20 74 6f 20 6c 6f 63 |gexp use|d to loc|
|00000f40| 61 74 65 20 67 72 6f 75 | 70 69 6e 67 20 6b 65 79 |ate grou|ping key|
|00000f50| 77 6f 72 64 73 3a 20 22 | 74 68 65 6e 22 20 61 6e |words: "|then" an|
|00000f60| 64 20 22 64 6f 22 1f 0a | 28 64 65 66 63 6f 6e 73 |d "do"..|(defcons|
|00000f70| 74 20 6b 73 68 2d 74 68 | 65 6e 2d 64 6f 2d 72 65 |t ksh-th|en-do-re|
|00000f80| 20 22 5c 5c 73 20 2a 5c | 5c 62 5c 5c 28 74 68 65 | "\\s *\|\b\\(the|
|00000f90| 6e 5c 5c 7c 64 6f 5c 5c | 29 5c 5c 62 22 20 28 23 |n\\|do\\|)\\b" (#|
|00000fa0| 24 20 2e 20 2d 33 38 38 | 35 29 29 0a 23 40 33 35 |$ . -388|5)).#@35|
|00000fb0| 20 2a 52 65 67 65 78 70 | 20 75 73 65 64 20 74 6f | *Regexp| used to|
|00000fc0| 20 6d 61 74 63 68 20 6b | 65 79 77 6f 72 64 3a 20 | match k|eyword: |
|00000fd0| 64 6f 1f 0a 28 64 65 66 | 63 6f 6e 73 74 20 6b 73 |do..(def|const ks|
|00000fe0| 68 2d 64 6f 2d 72 65 20 | 22 5c 5c 73 20 2a 5c 5c |h-do-re |"\\s *\\|
|00000ff0| 62 64 6f 5c 5c 28 5c 5c | 62 5c 5c 7c 24 5c 5c 29 |bdo\\(\\|b\\|$\\)|
|00001000| 22 20 28 23 24 20 2e 20 | 2d 34 30 31 37 29 29 0a |" (#$ . |-4017)).|
|00001010| 23 40 33 37 20 2a 52 65 | 67 65 78 70 20 75 73 65 |#@37 *Re|gexp use|
|00001020| 64 20 74 6f 20 6d 61 74 | 63 68 20 6b 65 79 77 6f |d to mat|ch keywo|
|00001030| 72 64 3a 20 74 68 65 6e | 1f 0a 28 64 65 66 63 6f |rd: then|..(defco|
|00001040| 6e 73 74 20 6b 73 68 2d | 74 68 65 6e 2d 72 65 20 |nst ksh-|then-re |
|00001050| 22 5c 5c 73 20 2a 5c 5c | 62 74 68 65 6e 5c 5c 28 |"\\s *\\|bthen\\(|
|00001060| 5c 5c 62 5c 5c 7c 24 5c | 5c 29 22 20 28 23 24 20 |\\b\\|$\|\)" (#$ |
|00001070| 2e 20 2d 34 31 31 37 29 | 29 0a 23 40 33 37 20 2a |. -4117)|).#@37 *|
|00001080| 52 65 67 65 78 70 20 75 | 73 65 64 20 74 6f 20 6d |Regexp u|sed to m|
|00001090| 61 74 63 68 20 6b 65 79 | 77 6f 72 64 3a 20 65 6c |atch key|word: el|
|000010a0| 73 65 1f 0a 28 64 65 66 | 63 6f 6e 73 74 20 6b 73 |se..(def|const ks|
|000010b0| 68 2d 65 6c 73 65 2d 72 | 65 20 22 5c 5c 73 20 2a |h-else-r|e "\\s *|
|000010c0| 5c 5c 62 65 6c 73 65 5c | 5c 28 5c 5c 62 5c 5c 7c |\\belse\|\(\\b\\||
|000010d0| 24 5c 5c 29 22 20 28 23 | 24 20 2e 20 2d 34 32 32 |$\\)" (#|$ . -422|
|000010e0| 33 29 29 0a 23 40 33 37 | 20 2a 52 65 67 65 78 70 |3)).#@37| *Regexp|
|000010f0| 20 75 73 65 64 20 74 6f | 20 6d 61 74 63 68 20 6b | used to| match k|
|00001100| 65 79 77 6f 72 64 3a 20 | 65 6c 69 66 1f 0a 28 64 |eyword: |elif..(d|
|00001110| 65 66 63 6f 6e 73 74 20 | 6b 73 68 2d 65 6c 69 66 |efconst |ksh-elif|
|00001120| 2d 72 65 20 22 5c 5c 73 | 20 2a 5c 5c 62 65 6c 69 |-re "\\s| *\\beli|
|00001130| 66 5c 5c 28 5c 5c 62 5c | 5c 7c 24 5c 5c 29 22 20 |f\\(\\b\|\|$\\)" |
|00001140| 28 23 24 20 2e 20 2d 34 | 33 32 39 29 29 0a 23 40 |(#$ . -4|329)).#@|
|00001150| 34 34 20 2a 52 65 67 65 | 78 70 20 75 73 65 64 20 |44 *Rege|xp used |
|00001160| 74 6f 20 6d 61 74 63 68 | 20 73 79 6e 74 61 63 74 |to match| syntact|
|00001170| 69 63 20 65 6e 74 69 74 | 79 3a 20 7b 20 1f 0a 28 |ic entit|y: { ..(|
|00001180| 64 65 66 63 6f 6e 73 74 | 20 6b 73 68 2d 62 72 61 |defconst| ksh-bra|
|00001190| 63 65 2d 72 65 20 22 5c | 5c 53 3e 2a 7b 5b 20 09 |ce-re "\|\S>*{[ .|
|000011a0| 5c 6e 5d 22 20 28 23 24 | 20 2e 20 2d 34 34 33 35 |\n]" (#$| . -4435|
|000011b0| 29 29 0a 23 40 35 38 20 | 2a 52 65 67 65 78 70 20 |)).#@58 |*Regexp |
|000011c0| 75 73 65 64 20 74 6f 20 | 6d 61 74 63 68 20 63 61 |used to |match ca|
|000011d0| 73 65 20 69 74 65 6d 20 | 65 6e 64 20 73 79 6e 74 |se item |end synt|
|000011e0| 61 63 74 69 63 20 65 6e | 74 69 74 79 3a 20 3b 3b |actic en|tity: ;;|
|000011f0| 1f 0a 28 64 65 66 63 6f | 6e 73 74 20 6b 73 68 2d |..(defco|nst ksh-|
|00001200| 63 61 73 65 2d 69 74 65 | 6d 2d 65 6e 64 2d 72 65 |case-ite|m-end-re|
|00001210| 20 22 5c 5c 53 3e 2a 3b | 3b 5b 20 09 5c 6e 5d 22 | "\\S>*;|;[ .\n]"|
|00001220| 20 28 23 24 20 2e 20 2d | 34 35 33 36 29 29 0a 23 | (#$ . -|4536)).#|
|00001230| 40 31 30 33 20 2a 52 65 | 67 65 78 70 20 75 73 65 |@103 *Re|gexp use|
|00001240| 64 20 74 6f 20 64 65 74 | 65 63 74 20 63 6f 6d 70 |d to det|ect comp|
|00001250| 6f 75 6e 64 20 63 6f 6d | 6d 61 6e 64 20 6b 65 79 |ound com|mand key|
|00001260| 77 6f 72 64 73 3a 20 69 | 66 2c 20 65 6c 73 65 2c |words: i|f, else,|
|00001270| 20 65 6c 69 66 20 63 61 | 73 65 2c 20 0a 77 68 69 | elif ca|se, .whi|
|00001280| 6c 65 2c 20 66 6f 72 2c | 20 75 6e 74 69 6c 2c 20 |le, for,| until, |
|00001290| 61 6e 64 20 73 65 6c 65 | 63 74 1f 0a 28 64 65 66 |and sele|ct..(def|
|000012a0| 63 6f 6e 73 74 20 6b 73 | 68 2d 6b 65 79 77 6f 72 |const ks|h-keywor|
|000012b0| 64 73 2d 72 65 20 22 5c | 5c 73 20 2a 5c 5c 62 5c |ds-re "\|\s *\\b\|
|000012c0| 5c 28 65 6c 73 65 5c 5c | 7c 69 66 5c 5c 7c 65 6c |\(else\\||if\\|el|
|000012d0| 69 66 5c 5c 7c 63 61 73 | 65 5c 5c 7c 77 68 69 6c |if\\|cas|e\\|whil|
|000012e0| 65 5c 5c 7c 66 6f 72 5c | 5c 7c 75 6e 74 69 6c 5c |e\\|for\|\|until\|
|000012f0| 5c 7c 73 65 6c 65 63 74 | 5c 5c 29 5c 5c 62 22 20 |\|select|\\)\\b" |
|00001300| 28 23 24 20 2e 20 2d 34 | 36 36 31 29 29 0a 23 40 |(#$ . -4|661)).#@|
|00001310| 33 35 20 2a 52 65 67 65 | 78 70 20 75 73 65 64 20 |35 *Rege|xp used |
|00001320| 74 6f 20 6d 61 74 63 68 | 20 6b 65 79 77 6f 72 64 |to match| keyword|
|00001330| 3a 20 69 66 1f 0a 28 64 | 65 66 63 6f 6e 73 74 20 |: if..(d|efconst |
|00001340| 6b 73 68 2d 69 66 2d 72 | 65 20 22 5c 5c 73 20 2a |ksh-if-r|e "\\s *|
|00001350| 5c 5c 62 5c 5c 28 69 66 | 5c 5c 29 5c 5c 62 22 20 |\\b\\(if|\\)\\b" |
|00001360| 28 23 24 20 2e 20 2d 34 | 38 38 33 29 29 0a 23 40 |(#$ . -4|883)).#@|
|00001370| 35 35 20 2a 4d 61 74 63 | 68 20 6f 6e 65 20 6f 66 |55 *Matc|h one of|
|00001380| 20 74 68 65 20 6b 65 79 | 77 6f 72 64 73 3a 20 77 | the key|words: w|
|00001390| 68 69 6c 65 2c 20 75 6e | 74 69 6c 2c 20 66 6f 72 |hile, un|til, for|
|000013a0| 2c 20 73 65 6c 65 63 74 | 1f 0a 28 64 65 66 63 6f |, select|..(defco|
|000013b0| 6e 73 74 20 6b 73 68 2d | 69 74 65 72 61 74 69 6f |nst ksh-|iteratio|
|000013c0| 6e 2d 6b 65 79 77 6f 72 | 64 73 2d 72 65 20 22 5c |n-keywor|ds-re "\|
|000013d0| 5c 73 20 2a 5c 5c 62 5c | 5c 28 77 68 69 6c 65 5c |\s *\\b\|\(while\|
|000013e0| 5c 7c 66 6f 72 5c 5c 7c | 75 6e 74 69 6c 5c 5c 7c |\|for\\||until\\||
|000013f0| 73 65 6c 65 63 74 5c 5c | 29 5c 5c 62 22 20 28 23 |select\\|)\\b" (#|
|00001400| 24 20 2e 20 2d 34 39 37 | 39 29 29 0a 23 40 33 37 |$ . -497|9)).#@37|
|00001410| 20 2a 52 65 67 65 78 70 | 20 75 73 65 64 20 74 6f | *Regexp| used to|
|00001420| 20 6d 61 74 63 68 20 6b | 65 79 77 6f 72 64 3a 20 | match k|eyword: |
|00001430| 63 61 73 65 1f 0a 28 64 | 65 66 63 6f 6e 73 74 20 |case..(d|efconst |
|00001440| 6b 73 68 2d 63 61 73 65 | 2d 72 65 20 22 5c 5c 73 |ksh-case|-re "\\s|
|00001450| 20 2a 5c 5c 62 63 61 73 | 65 5c 5c 62 22 20 28 23 | *\\bcas|e\\b" (#|
|00001460| 24 20 2e 20 2d 35 31 33 | 37 29 29 0a 23 40 35 35 |$ . -513|7)).#@55|
|00001470| 20 2a 4d 61 74 63 68 20 | 61 6e 20 65 78 70 6c 69 | *Match |an expli|
|00001480| 63 69 74 20 66 75 6e 63 | 74 69 6f 6e 20 64 65 66 |cit func|tion def|
|00001490| 69 6e 69 74 69 6f 6e 3a | 20 66 75 6e 63 74 69 6f |inition:| functio|
|000014a0| 6e 20 6e 61 6d 65 1f 0a | 28 64 65 66 63 6f 6e 73 |n name..|(defcons|
|000014b0| 74 20 6b 73 68 2d 65 78 | 70 6c 69 63 69 74 2d 66 |t ksh-ex|plicit-f|
|000014c0| 75 6e 63 2d 72 65 20 22 | 5e 5c 5c 73 20 2a 5c 5c |unc-re "|^\\s *\\|
|000014d0| 28 66 75 6e 63 74 69 6f | 6e 5c 5c 73 20 5b 61 2d |(functio|n\\s [a-|
|000014e0| 7a 41 2d 7a 5f 5d 5b 61 | 2d 7a 41 2d 5a 30 2d 31 |zA-z_][a|-zA-Z0-1|
|000014f0| 5f 5d 2a 5c 5c 29 5c 5c | 62 22 20 28 23 24 20 2e |_]*\\)\\|b" (#$ .|
|00001500| 20 2d 35 32 33 33 29 29 | 0a 23 40 34 39 20 2a 4d | -5233))|.#@49 *M|
|00001510| 61 74 63 68 20 61 6e 20 | 69 6d 70 6c 69 63 69 74 |atch an |implicit|
|00001520| 20 66 75 6e 63 74 69 6f | 6e 20 64 65 66 69 6e 69 | functio|n defini|
|00001530| 74 69 6f 6e 3a 20 6e 61 | 6d 65 20 28 29 1f 0a 28 |tion: na|me ()..(|
|00001540| 64 65 66 63 6f 6e 73 74 | 20 6b 73 68 2d 69 6d 70 |defconst| ksh-imp|
|00001550| 6c 69 63 69 74 2d 66 75 | 6e 63 2d 72 65 20 22 5e |licit-fu|nc-re "^|
|00001560| 5c 5c 73 20 2a 5c 5c 28 | 5b 61 2d 7a 41 2d 7a 5f |\\s *\\(|[a-zA-z_|
|00001570| 5d 5b 61 2d 7a 41 2d 5a | 30 2d 31 5f 5d 2a 5c 5c |][a-zA-Z|0-1_]*\\|
|00001580| 29 5c 5c 73 20 2a 28 29 | 5c 5c 73 20 2a 22 20 28 |)\\s *()|\\s *" (|
|00001590| 23 24 20 2e 20 2d 35 33 | 39 30 29 29 0a 23 40 35 |#$ . -53|90)).#@5|
|000015a0| 34 20 2a 4d 61 74 63 68 | 20 61 20 69 6d 70 6c 69 |4 *Match| a impli|
|000015b0| 63 69 74 20 66 75 6e 63 | 74 69 6f 6e 20 64 65 66 |cit func|tion def|
|000015c0| 69 6e 69 74 69 6f 6e 20 | 62 72 61 63 65 3a 20 6e |inition |brace: n|
|000015d0| 61 6d 65 20 7b 20 1f 0a | 28 64 65 66 63 6f 6e 73 |ame { ..|(defcons|
|000015e0| 74 20 6b 73 68 2d 66 75 | 6e 63 2d 62 72 61 63 65 |t ksh-fu|nc-brace|
|000015f0| 2d 72 65 20 22 5e 5c 5c | 73 20 2a 5c 5c 28 2e 2a |-re "^\\|s *\\(.*|
|00001600| 7b 5c 5c 29 5b 20 09 5c | 6e 5d 2b 22 20 28 23 24 |{\\)[ .\|n]+" (#$|
|00001610| 20 2e 20 2d 35 35 33 38 | 29 29 0a 23 40 35 30 20 | . -5538|)).#@50 |
|00001620| 2a 52 65 67 65 78 70 20 | 75 73 65 64 20 74 6f 20 |*Regexp |used to |
|00001630| 6d 61 74 63 68 20 63 61 | 73 65 2d 69 74 65 6d 73 |match ca|se-items|
|00001640| 20 69 6e 63 6c 75 64 69 | 6e 67 20 6b 73 68 38 38 | includi|ng ksh88|
|00001650| 1f 0a 28 64 65 66 63 6f | 6e 73 74 20 6b 73 68 2d |..(defco|nst ksh-|
|00001660| 63 61 73 65 2d 69 74 65 | 6d 2d 72 65 20 22 5e 5b |case-ite|m-re "^[|
|00001670| 5e 23 5c 6e 5d 2a 5c 5c | 73 5c 22 2a 5c 5c 28 29 |^#\n]*\\|s\"*\\()|
|00001680| 5c 5c 29 22 20 28 23 24 | 20 2e 20 2d 35 36 36 34 |\\)" (#$| . -5664|
|00001690| 29 29 0a 23 40 35 30 20 | 2a 52 65 67 65 78 70 20 |)).#@50 |*Regexp |
|000016a0| 75 73 65 64 20 74 6f 20 | 6d 61 74 63 68 20 63 6f |used to |match co|
|000016b0| 6d 70 6f 75 6e 64 20 6c | 69 73 74 20 26 20 63 61 |mpound l|ist & ca|
|000016c0| 73 65 20 69 74 65 6d 73 | 1f 0a 28 64 65 66 63 6f |se items|..(defco|
|000016d0| 6e 73 74 20 6b 73 68 2d | 70 61 72 65 6e 2d 72 65 |nst ksh-|paren-re|
|000016e0| 20 22 5e 5b 5e 23 5c 6e | 5d 2a 5c 5c 73 5c 22 2a | "^[^#\n|]*\\s\"*|
|000016f0| 29 5b 20 09 5c 6e 5d 2b | 22 20 28 23 24 20 2e 20 |)[ .\n]+|" (#$ . |
|00001700| 2d 35 37 38 34 29 29 0a | 23 40 33 35 20 2a 52 65 |-5784)).|#@35 *Re|
|00001710| 67 65 78 70 20 75 73 65 | 64 20 74 6f 20 6d 61 74 |gexp use|d to mat|
|00001720| 63 68 20 6b 65 79 77 6f | 72 64 3a 20 66 69 1f 0a |ch keywo|rd: fi..|
|00001730| 28 64 65 66 63 6f 6e 73 | 74 20 6b 73 68 2d 66 69 |(defcons|t ksh-fi|
|00001740| 2d 72 65 20 22 5c 5c 73 | 20 2a 5c 5c 62 66 69 5c |-re "\\s| *\\bfi\|
|00001750| 5c 62 22 20 28 23 24 20 | 2e 20 2d 35 39 30 31 29 |\b" (#$ |. -5901)|
|00001760| 29 0a 23 40 33 37 20 2a | 52 65 67 65 78 70 20 75 |).#@37 *|Regexp u|
|00001770| 73 65 64 20 74 6f 20 6d | 61 74 63 68 20 6b 65 79 |sed to m|atch key|
|00001780| 77 6f 72 64 3a 20 65 73 | 61 63 1f 0a 28 64 65 66 |word: es|ac..(def|
|00001790| 63 6f 6e 73 74 20 6b 73 | 68 2d 65 73 61 63 2d 72 |const ks|h-esac-r|
|000017a0| 65 20 22 5c 5c 73 20 2a | 5c 5c 62 65 73 61 63 5c |e "\\s *|\\besac\|
|000017b0| 5c 62 22 20 28 23 24 20 | 2e 20 2d 35 39 39 31 29 |\b" (#$ |. -5991)|
|000017c0| 29 0a 23 40 33 37 20 2a | 52 65 67 65 78 70 20 75 |).#@37 *|Regexp u|
|000017d0| 73 65 64 20 74 6f 20 6d | 61 74 63 68 20 6b 65 79 |sed to m|atch key|
|000017e0| 77 6f 72 64 3a 20 64 6f | 6e 65 1f 0a 28 64 65 66 |word: do|ne..(def|
|000017f0| 63 6f 6e 73 74 20 6b 73 | 68 2d 64 6f 6e 65 2d 72 |const ks|h-done-r|
|00001800| 65 20 22 5c 5c 73 20 2a | 5c 5c 62 64 6f 6e 65 5c |e "\\s *|\\bdone\|
|00001810| 5c 62 22 20 28 23 24 20 | 2e 20 2d 36 30 38 37 29 |\b" (#$ |. -6087)|
|00001820| 29 0a 23 40 34 35 20 2a | 52 65 67 65 78 70 20 75 |).#@45 *|Regexp u|
|00001830| 73 65 64 20 74 6f 20 6d | 61 74 63 68 20 66 75 6e |sed to m|atch fun|
|00001840| 63 74 69 6f 6e 20 62 72 | 61 63 65 2d 67 72 6f 75 |ction br|ace-grou|
|00001850| 70 73 1f 0a 28 64 65 66 | 63 6f 6e 73 74 20 6b 73 |ps..(def|const ks|
|00001860| 68 2d 62 72 61 63 65 2d | 65 6e 64 2d 72 65 20 22 |h-brace-|end-re "|
|00001870| 5c 5c 73 20 2a 7d 5c 5c | 73 20 2a 22 20 28 23 24 |\\s *}\\|s *" (#$|
|00001880| 20 2e 20 2d 36 31 38 33 | 29 29 0a 23 40 36 35 20 | . -6183|)).#@65 |
|00001890| 2a 52 65 67 65 78 70 20 | 75 73 65 64 20 74 6f 20 |*Regexp |used to |
|000018a0| 6d 61 74 63 68 20 61 20 | 6c 69 6e 65 20 77 69 74 |match a |line wit|
|000018b0| 68 20 61 20 73 74 61 74 | 65 6d 65 6e 74 20 75 73 |h a stat|ement us|
|000018c0| 69 6e 67 20 6d 6f 72 65 | 20 6c 69 6e 65 73 2e 1f |ing more| lines..|
|000018d0| 0a 28 64 65 66 63 6f 6e | 73 74 20 6b 73 68 2d 6d |.(defcon|st ksh-m|
|000018e0| 75 6c 74 69 6c 69 6e 65 | 2d 72 65 20 22 5e 2e 2a |ultiline|-re "^.*|
|000018f0| 5c 5c 5c 5c 24 22 20 28 | 23 24 20 2e 20 2d 36 32 |\\\\$" (|#$ . -62|
|00001900| 38 38 29 29 0a 23 40 33 | 38 20 53 79 6e 74 61 78 |88)).#@3|8 Syntax|
|00001910| 20 74 61 62 6c 65 20 75 | 73 65 64 20 77 68 69 6c | table u|sed whil|
|00001920| 65 20 69 6e 20 6b 73 68 | 20 6d 6f 64 65 2e 1f 0a |e in ksh| mode...|
|00001930| 28 64 65 66 76 61 72 20 | 6b 73 68 2d 6d 6f 64 65 |(defvar |ksh-mode|
|00001940| 2d 73 79 6e 74 61 78 2d | 74 61 62 6c 65 20 6e 69 |-syntax-|table ni|
|00001950| 6c 20 28 23 24 20 2e 20 | 36 34 31 30 29 29 0a 28 |l (#$ . |6410)).(|
|00001960| 62 79 74 65 2d 63 6f 64 | 65 20 22 08 84 9f 00 c1 |byte-cod|e ".....|
|00001970| c2 20 21 10 c3 c4 c5 08 | 23 88 c3 c6 c5 08 23 88 |. !.....|#.....#.|
|00001980| c3 c7 c5 08 23 88 c3 c8 | c5 08 23 88 c3 c9 ca 08 |....#...|..#.....|
|00001990| 23 88 c3 cb cc 08 23 88 | c3 cd ce 08 23 88 c3 cf |#.....#.|....#...|
|000019a0| ce 08 23 88 c3 d0 d1 08 | 23 88 c3 d2 d1 08 23 88 |..#.....|#.....#.|
|000019b0| c3 d3 d4 08 23 88 c3 d5 | d6 08 23 88 c3 d7 c5 08 |....#...|..#.....|
|000019c0| 23 88 c3 d8 c5 08 23 88 | c3 d9 c5 08 23 88 c3 da |#.....#.|....#...|
|000019d0| c5 08 23 88 c3 db dc 08 | 23 88 c3 dd c5 08 23 88 |..#.....|#.....#.|
|000019e0| c3 de c5 08 23 88 c3 df | c5 08 23 88 c3 e0 c5 08 |....#...|..#.....|
|000019f0| 23 88 c3 e1 c5 08 23 88 | c3 e2 c5 08 23 88 c3 e3 |#.....#.|....#...|
|00001a00| c5 08 23 88 c3 e4 c5 08 | 23 88 c1 87 22 20 5b 6b |..#.....|#..." [k|
|00001a10| 73 68 2d 6d 6f 64 65 2d | 73 79 6e 74 61 78 2d 74 |sh-mode-|syntax-t|
|00001a20| 61 62 6c 65 20 6d 61 6b | 65 2d 73 79 6e 74 61 78 |able mak|e-syntax|
|00001a30| 2d 74 61 62 6c 65 20 73 | 74 61 6e 64 61 72 64 2d |-table s|tandard-|
|00001a40| 73 79 6e 74 61 78 2d 74 | 61 62 6c 65 20 6d 6f 64 |syntax-t|able mod|
|00001a50| 69 66 79 2d 73 79 6e 74 | 61 78 2d 65 6e 74 72 79 |ify-synt|ax-entry|
|00001a60| 20 3f 5c 28 20 22 2e 22 | 20 3f 5c 29 20 3f 5c 7b | ?\( "."| ?\) ?\{|
|00001a70| 20 3f 5c 7d 20 3f 5c 5b | 20 22 28 5d 22 20 3f 5c | ?\} ?\[| "(]" ?\|
|00001a80| 5d 20 22 29 5b 22 20 3f | 5c 27 20 22 5c 22 22 20 |] ")[" ?|\' "\"" |
|00001a90| 3f 5c 60 20 3f 5c 6e 20 | 22 3e 22 20 3f 5c 5e 4c |?\` ?\n |">" ?\^L|
|00001aa0| 20 3f 5c 23 20 22 3c 22 | 20 3f 5c 5f 20 22 5f 22 | ?\# "<"| ?\_ "_"|
|00001ab0| 20 3f 5c 3c 20 3f 5c 3e | 20 3f 5c 26 20 3f 5c 7c | ?\< ?\>| ?\& ?\||
|00001ac0| 20 3f 5c 24 20 22 5c 5c | 22 20 3f 5c 25 20 3f 5c | ?\$ "\\|" ?\% ?\|
|00001ad0| 3d 20 3f 5c 2f 20 3f 5c | 2b 20 3f 5c 2a 20 3f 5c |= ?\/ ?\|+ ?\* ?\|
|00001ae0| 2d 20 3f 5c 3b 20 3f 5c | 3a 5d 20 34 29 0a 23 40 |- ?\; ?\|:] 4).#@|
|00001af0| 33 38 20 41 62 62 72 65 | 76 20 74 61 62 6c 65 20 |38 Abbre|v table |
|00001b00| 75 73 65 64 20 77 68 69 | 6c 65 20 69 6e 20 6b 73 |used whi|le in ks|
|00001b10| 68 20 6d 6f 64 65 2e 1f | 0a 28 64 65 66 76 61 72 |h mode..|.(defvar|
|00001b20| 20 6b 73 68 2d 6d 6f 64 | 65 2d 61 62 62 72 65 76 | ksh-mod|e-abbrev|
|00001b30| 2d 74 61 62 6c 65 20 6e | 69 6c 20 28 23 24 20 2e |-table n|il (#$ .|
|00001b40| 20 36 38 39 39 29 29 0a | 28 64 65 66 69 6e 65 2d | 6899)).|(define-|
|00001b50| 61 62 62 72 65 76 2d 74 | 61 62 6c 65 20 27 6b 73 |abbrev-t|able 'ks|
|00001b60| 68 2d 6d 6f 64 65 2d 61 | 62 62 72 65 76 2d 74 61 |h-mode-a|bbrev-ta|
|00001b70| 62 6c 65 20 6e 69 6c 29 | 0a 23 40 32 35 20 4b 65 |ble nil)|.#@25 Ke|
|00001b80| 79 6d 61 70 20 75 73 65 | 64 20 69 6e 20 6b 73 68 |ymap use|d in ksh|
|00001b90| 20 6d 6f 64 65 1f 0a 28 | 64 65 66 76 61 72 20 6b | mode..(|defvar k|
|00001ba0| 73 68 2d 6d 6f 64 65 2d | 6d 61 70 20 6e 69 6c 20 |sh-mode-|map nil |
|00001bb0| 28 23 24 20 2e 20 37 30 | 33 38 29 29 0a 28 62 79 |(#$ . 70|38)).(by|
|00001bc0| 74 65 2d 63 6f 64 65 20 | 22 08 ac 9b c1 20 10 c2 |te-code |".... ..|
|00001bd0| 08 c3 c4 23 88 c2 08 c5 | c6 23 88 c2 08 c7 c8 23 |...#....|.#.....#|
|00001be0| 88 c2 08 c9 ca 23 88 c1 | 87 22 20 5b 6b 73 68 2d |.....#..|." [ksh-|
|00001bf0| 6d 6f 64 65 2d 6d 61 70 | 20 6d 61 6b 65 2d 73 70 |mode-map| make-sp|
|00001c00| 61 72 73 65 2d 6b 65 79 | 6d 61 70 20 64 65 66 69 |arse-key|map defi|
|00001c10| 6e 65 2d 6b 65 79 20 22 | 09 22 20 6b 73 68 2d 69 |ne-key "|." ksh-i|
|00001c20| 6e 64 65 6e 74 2d 63 6f | 6d 6d 61 6e 64 20 22 5c |ndent-co|mmand "\|
|00001c30| 6e 22 20 72 65 69 6e 64 | 65 6e 74 2d 74 68 65 6e |n" reind|ent-then|
|00001c40| 2d 6e 65 77 6c 69 6e 65 | 2d 61 6e 64 2d 69 6e 64 |-newline|-and-ind|
|00001c50| 65 6e 74 20 22 1b 09 22 | 20 6b 73 68 2d 63 6f 6d |ent ".."| ksh-com|
|00001c60| 70 6c 65 74 65 2d 73 79 | 6d 62 6f 6c 20 22 03 09 |plete-sy|mbol "..|
|00001c70| 22 20 6b 73 68 2d 63 6f | 6d 70 6c 65 74 69 6f 6e |" ksh-co|mpletion|
|00001c80| 2d 69 6e 69 74 2d 61 6e | 64 2d 70 69 63 6b 75 70 |-init-an|d-pickup|
|00001c90| 5d 20 34 29 0a 23 40 33 | 31 36 39 20 6b 73 68 2d |] 4).#@3|169 ksh-|
|00001ca0| 6d 6f 64 65 20 24 52 65 | 76 69 73 69 6f 6e 3a 20 |mode $Re|vision: |
|00001cb0| 32 2e 39 20 24 20 2d 20 | 4d 61 6a 6f 72 20 6d 6f |2.9 $ - |Major mo|
|00001cc0| 64 65 20 66 6f 72 20 65 | 64 69 74 69 6e 67 20 28 |de for e|diting (|
|00001cd0| 42 6f 75 72 6e 65 2c 20 | 4b 6f 72 6e 20 6f 72 20 |Bourne, |Korn or |
|00001ce0| 42 6f 75 72 6e 65 20 61 | 67 61 69 6e 29 0a 73 68 |Bourne a|gain).sh|
|00001cf0| 65 6c 6c 20 73 63 72 69 | 70 74 73 2e 0a 53 70 65 |ell scri|pts..Spe|
|00001d00| 63 69 61 6c 20 6b 65 79 | 20 62 69 6e 64 69 6e 67 |cial key| binding|
|00001d10| 73 20 61 6e 64 20 63 6f | 6d 6d 61 6e 64 73 3a 0a |s and co|mmands:.|
|00001d20| 5c 7b 6b 73 68 2d 6d 6f | 64 65 2d 6d 61 70 7d 0a |\{ksh-mo|de-map}.|
|00001d30| 56 61 72 69 61 62 6c 65 | 73 20 63 6f 6e 74 72 6f |Variable|s contro|
|00001d40| 6c 6c 69 6e 67 20 69 6e | 64 65 6e 74 61 74 69 6f |lling in|dentatio|
|00001d50| 6e 20 73 74 79 6c 65 3a | 0a 6b 73 68 2d 69 6e 64 |n style:|.ksh-ind|
|00001d60| 65 6e 74 0a 20 20 20 20 | 49 6e 64 65 6e 74 61 74 |ent.    |Indentat|
|00001d70| 69 6f 6e 20 6f 66 20 6b | 73 68 20 73 74 61 74 65 |ion of k|sh state|
|00001d80| 6d 65 6e 74 73 20 77 69 | 74 68 20 72 65 73 70 65 |ments wi|th respe|
|00001d90| 63 74 20 74 6f 20 63 6f | 6e 74 61 69 6e 69 6e 67 |ct to co|ntaining|
|00001da0| 20 62 6c 6f 63 6b 2e 0a | 20 20 20 20 44 65 66 61 | block..|    Defa|
|00001db0| 75 6c 74 20 76 61 6c 75 | 65 20 69 73 20 32 2e 0a |ult valu|e is 2..|
|00001dc0| 6b 73 68 2d 63 61 73 65 | 2d 69 6e 64 65 6e 74 0a |ksh-case|-indent.|
|00001dd0| 20 20 20 20 41 64 64 69 | 74 69 6f 6e 61 6c 20 69 |    Addi|tional i|
|00001de0| 6e 64 65 6e 74 61 74 69 | 6f 6e 20 66 6f 72 20 73 |ndentati|on for s|
|00001df0| 74 61 74 65 6d 65 6e 74 | 73 20 75 6e 64 65 72 20 |tatement|s under |
|00001e00| 63 61 73 65 20 69 74 65 | 6d 73 2e 0a 20 20 20 20 |case ite|ms..    |
|00001e10| 44 65 66 61 75 6c 74 20 | 76 61 6c 75 65 20 69 73 |Default |value is|
|00001e20| 20 6e 69 6c 20 77 68 69 | 63 68 20 77 69 6c 6c 20 | nil whi|ch will |
|00001e30| 61 6c 69 67 6e 20 74 68 | 65 20 73 74 61 74 65 6d |align th|e statem|
|00001e40| 65 6e 74 73 20 6f 6e 65 | 20 70 6f 73 69 74 69 6f |ents one| positio|
|00001e50| 6e 20 0a 20 20 20 20 70 | 61 73 74 20 74 68 65 20 |n .    p|ast the |
|00001e60| 22 29 22 20 6f 66 20 74 | 68 65 20 70 61 74 74 65 |")" of t|he patte|
|00001e70| 72 6e 2e 0a 6b 73 68 2d | 63 61 73 65 2d 69 74 65 |rn..ksh-|case-ite|
|00001e80| 6d 2d 6f 66 66 73 65 74 | 0a 20 20 20 20 41 64 64 |m-offset|.    Add|
|00001e90| 69 74 69 6f 6e 61 6c 20 | 69 6e 64 65 6e 74 61 74 |itional |indentat|
|00001ea0| 69 6f 6e 20 66 6f 72 20 | 63 61 73 65 20 69 74 65 |ion for |case ite|
|00001eb0| 6d 73 20 77 69 74 68 69 | 6e 20 61 20 63 61 73 65 |ms withi|n a case|
|00001ec0| 20 73 74 61 74 65 6d 65 | 6e 74 2e 0a 20 20 20 20 | stateme|nt..    |
|00001ed0| 44 65 66 61 75 6c 74 20 | 76 61 6c 75 65 20 69 73 |Default |value is|
|00001ee0| 20 32 2e 0a 6b 73 68 2d | 67 72 6f 75 70 2d 6f 66 | 2..ksh-|group-of|
|00001ef0| 66 73 65 74 0a 20 20 20 | 20 41 64 64 69 74 69 6f |fset.   | Additio|
|00001f00| 6e 61 6c 20 69 6e 64 65 | 6e 74 61 74 69 6f 6e 20 |nal inde|ntation |
|00001f10| 66 6f 72 20 6b 65 79 77 | 6f 72 64 73 20 22 64 6f |for keyw|ords "do|
|00001f20| 22 20 61 6e 64 20 22 74 | 68 65 6e 22 2e 0a 20 20 |" and "t|hen"..  |
|00001f30| 20 20 44 65 66 61 75 6c | 74 20 76 61 6c 75 65 20 |  Defaul|t value |
|00001f40| 69 73 20 2d 32 2e 0a 6b | 73 68 2d 62 72 61 63 65 |is -2..k|sh-brace|
|00001f50| 2d 6f 66 66 73 65 74 0a | 20 20 20 20 41 64 64 69 |-offset.|    Addi|
|00001f60| 74 69 6f 6e 61 6c 20 69 | 6e 64 65 6e 74 61 74 69 |tional i|ndentati|
|00001f70| 6f 6e 20 6f 66 20 22 7b | 22 20 75 6e 64 65 72 20 |on of "{|" under |
|00001f80| 66 75 6e 63 74 69 6f 6e | 73 20 6f 72 20 62 72 61 |function|s or bra|
|00001f90| 63 65 20 67 72 6f 75 70 | 69 6e 67 73 2e 0a 20 20 |ce group|ings..  |
|00001fa0| 20 20 44 65 66 61 75 6c | 74 20 76 61 6c 75 65 20 |  Defaul|t value |
|00001fb0| 69 73 20 30 2e 0a 6b 73 | 68 2d 6d 75 6c 74 69 6c |is 0..ks|h-multil|
|00001fc0| 69 6e 65 2d 6f 66 66 73 | 65 74 0a 20 20 20 41 64 |ine-offs|et.   Ad|
|00001fd0| 64 69 74 69 6f 6e 61 6c | 20 69 6e 64 65 6e 74 61 |ditional| indenta|
|00001fe0| 74 69 6f 6e 20 6f 66 20 | 6c 69 6e 65 20 74 68 61 |tion of |line tha|
|00001ff0| 74 20 69 73 20 70 72 65 | 63 65 64 65 64 20 6f 66 |t is pre|ceded of|
|00002000| 20 61 20 6c 69 6e 65 20 | 65 6e 64 69 6e 67 20 77 | a line |ending w|
|00002010| 69 74 68 20 61 0a 20 20 | 20 5c 20 74 6f 20 6d 61 |ith a.  | \ to ma|
|00002020| 6b 65 20 69 74 20 63 6f | 6e 74 69 6e 75 65 20 6f |ke it co|ntinue o|
|00002030| 6e 20 6e 65 78 74 20 6c | 69 6e 65 2e 0a 6b 73 68 |n next l|ine..ksh|
|00002040| 2d 74 61 62 2d 61 6c 77 | 61 79 73 2d 69 6e 64 65 |-tab-alw|ays-inde|
|00002050| 6e 74 0a 20 20 20 20 43 | 6f 6e 74 72 6f 6c 73 20 |nt.    C|ontrols |
|00002060| 74 68 65 20 6f 70 65 72 | 61 74 69 6f 6e 20 6f 66 |the oper|ation of|
|00002070| 20 74 68 65 20 54 41 42 | 20 6b 65 79 2e 20 49 66 | the TAB| key. If|
|00002080| 20 74 20 28 74 68 65 20 | 64 65 66 61 75 6c 74 29 | t (the |default)|
|00002090| 2c 20 61 6c 77 61 79 73 | 0a 20 20 20 20 72 65 69 |, always|.    rei|
|000020a0| 6e 64 65 6e 74 20 74 68 | 65 20 63 75 72 72 65 6e |ndent th|e curren|
|000020b0| 74 20 6c 69 6e 65 2e 20 | 20 49 66 20 6e 69 6c 2c |t line. | If nil,|
|000020c0| 20 69 6e 64 65 6e 74 20 | 74 68 65 20 63 75 72 72 | indent |the curr|
|000020d0| 65 6e 74 20 6c 69 6e 65 | 20 6f 6e 6c 79 20 69 66 |ent line| only if|
|000020e0| 0a 20 20 20 20 70 6f 69 | 6e 74 20 69 73 20 61 74 |.    poi|nt is at|
|000020f0| 20 74 68 65 20 6c 65 66 | 74 20 6d 61 72 67 69 6e | the lef|t margin|
|00002100| 20 6f 72 20 69 6e 20 74 | 68 65 20 6c 69 6e 65 27 | or in t|he line'|
|00002110| 73 20 69 6e 64 65 6e 74 | 61 74 69 6f 6e 3b 20 6f |s indent|ation; o|
|00002120| 74 68 65 72 77 69 73 65 | 0a 20 20 20 20 69 6e 73 |therwise|.    ins|
|00002130| 65 72 74 20 61 20 74 61 | 62 2e 0a 6b 73 68 2d 6d |ert a ta|b..ksh-m|
|00002140| 61 74 63 68 2d 61 6e 64 | 2d 74 65 6c 6c 0a 20 20 |atch-and|-tell.  |
|00002150| 20 20 49 66 20 6e 6f 6e | 2d 6e 69 6c 20 65 63 68 |  If non|-nil ech|
|00002160| 6f 20 69 6e 20 74 68 65 | 20 6d 69 6e 69 62 75 66 |o in the| minibuf|
|00002170| 66 65 72 20 74 68 65 20 | 6d 61 74 63 68 69 6e 67 |fer the |matching|
|00002180| 20 63 6f 6d 70 6f 75 6e | 64 20 63 6f 6d 6d 61 6e | compoun|d comman|
|00002190| 64 0a 20 20 20 20 66 6f | 72 20 74 68 65 20 22 64 |d.    fo|r the "d|
|000021a0| 6f 6e 65 22 2c 20 22 7d | 22 2c 20 22 66 69 22 2c |one", "}|", "fi",|
|000021b0| 20 6f 72 20 22 65 73 61 | 63 22 2e 20 44 65 66 61 | or "esa|c". Defa|
|000021c0| 75 6c 74 20 76 61 6c 75 | 65 20 69 73 20 74 2e 0a |ult valu|e is t..|
|000021d0| 0a 6b 73 68 2d 61 6c 69 | 67 6e 2d 74 6f 2d 6b 65 |.ksh-ali|gn-to-ke|
|000021e0| 79 77 6f 72 64 0a 20 20 | 20 20 43 6f 6e 74 72 6f |yword.  |  Contro|
|000021f0| 6c 73 20 77 68 65 74 68 | 65 72 20 6e 65 73 74 65 |ls wheth|er neste|
|00002200| 64 20 63 6f 6e 73 74 72 | 75 63 74 73 20 61 6c 69 |d constr|ucts ali|
|00002210| 67 6e 20 66 72 6f 6d 20 | 74 68 65 20 6b 65 79 77 |gn from |the keyw|
|00002220| 6f 72 64 20 6f 72 0a 20 | 20 20 20 74 68 65 20 63 |ord or. |   the c|
|00002230| 75 72 72 65 6e 74 20 69 | 6e 64 65 6e 74 61 74 69 |urrent i|ndentati|
|00002240| 6f 6e 2e 20 49 66 20 6e | 6f 6e 2d 6e 69 6c 2c 20 |on. If n|on-nil, |
|00002250| 69 6e 64 65 6e 74 61 74 | 69 6f 6e 20 77 69 6c 6c |indentat|ion will|
|00002260| 20 62 65 20 72 65 6c 61 | 74 69 76 65 20 74 6f 0a | be rela|tive to.|
|00002270| 20 20 20 20 74 68 65 20 | 63 6f 6c 75 6d 6e 20 74 |    the |column t|
|00002280| 68 65 20 6b 65 79 77 6f | 72 64 20 73 74 61 72 74 |he keywo|rd start|
|00002290| 73 2e 20 49 66 20 6e 69 | 6c 2c 20 69 6e 64 65 6e |s. If ni|l, inden|
|000022a0| 74 61 74 69 6f 6e 20 77 | 69 6c 6c 20 62 65 20 72 |tation w|ill be r|
|000022b0| 65 6c 61 74 69 76 65 20 | 74 6f 0a 20 20 20 20 74 |elative |to.    t|
|000022c0| 68 65 20 63 75 72 72 65 | 6e 74 20 69 6e 64 65 6e |he curre|nt inden|
|000022d0| 74 61 74 69 6f 6e 20 6f | 66 20 74 68 65 20 6c 69 |tation o|f the li|
|000022e0| 6e 65 20 74 68 65 20 6b | 65 79 77 6f 72 64 20 69 |ne the k|eyword i|
|000022f0| 73 20 6f 6e 2e 0a 20 20 | 20 20 54 68 65 20 64 65 |s on..  |  The de|
|00002300| 66 61 75 6c 74 20 76 61 | 6c 75 65 20 69 73 20 6e |fault va|lue is n|
|00002310| 6f 6e 2d 6e 69 6c 2e 0a | 0a 6b 73 68 2d 63 6f 6d |on-nil..|.ksh-com|
|00002320| 6d 65 6e 74 2d 72 65 67 | 65 78 70 0a 20 20 52 65 |ment-reg|exp.  Re|
|00002330| 67 75 6c 61 72 20 65 78 | 70 72 65 73 73 69 6f 6e |gular ex|pression|
|00002340| 20 75 73 65 64 20 74 6f | 20 72 65 63 6f 67 6e 69 | used to| recogni|
|00002350| 7a 65 20 63 6f 6d 6d 65 | 6e 74 73 2e 20 43 75 73 |ze comme|nts. Cus|
|00002360| 74 6f 6d 69 7a 65 20 74 | 6f 20 73 75 70 70 6f 72 |tomize t|o suppor|
|00002370| 74 0a 20 20 6b 73 68 2d | 6c 69 6b 65 20 6c 61 6e |t.  ksh-|like lan|
|00002380| 67 75 61 67 65 73 2e 20 | 44 65 66 61 75 6c 74 20 |guages. |Default |
|00002390| 76 61 6c 75 65 20 69 73 | 20 22 1c 5c 73 20 2a 23 |value is| ".\s *#|
|000023a0| 22 2e 0a 0a 53 74 79 6c | 65 20 47 75 69 64 65 2e |"...Styl|e Guide.|
|000023b0| 0a 20 42 79 20 73 65 74 | 74 69 6e 67 0a 20 20 20 |. By set|ting.   |
|000023c0| 20 28 73 65 74 71 20 6b | 73 68 2d 69 6e 64 65 6e | (setq k|sh-inden|
|000023d0| 74 20 64 65 66 61 75 6c | 74 2d 74 61 62 2d 77 69 |t defaul|t-tab-wi|
|000023e0| 64 74 68 29 0a 20 20 20 | 20 28 73 65 74 71 20 6b |dth).   | (setq k|
|000023f0| 73 68 2d 67 72 6f 75 70 | 2d 6f 66 66 73 65 74 20 |sh-group|-offset |
|00002400| 30 29 0a 0a 20 20 20 20 | 54 68 65 20 66 6f 6c 6c |0)..    |The foll|
|00002410| 6f 77 69 6e 67 20 73 74 | 79 6c 65 20 69 73 20 6f |owing st|yle is o|
|00002420| 62 74 61 69 6e 65 64 3a | 0a 0a 20 20 20 20 69 66 |btained:|..    if|
|00002430| 20 5b 20 2d 7a 20 24 66 | 6f 6f 20 5d 0a 09 20 20 | [ -z $f|oo ]..  |
|00002440| 20 20 74 68 65 6e 0a 09 | 09 20 20 20 20 62 61 72 |  then..|.    bar|
|00002450| 20 20 20 20 23 20 3c 2d | 2d 20 6b 73 68 2d 67 72 |    # <-|- ksh-gr|
|00002460| 6f 75 70 2d 6f 66 66 73 | 65 74 20 69 73 20 61 64 |oup-offs|et is ad|
|00002470| 64 69 74 69 76 65 20 74 | 6f 20 6b 73 68 2d 69 6e |ditive t|o ksh-in|
|00002480| 64 65 6e 74 0a 09 09 20 | 20 20 20 66 6f 6f 0a 20 |dent... |   foo. |
|00002490| 20 20 20 66 69 0a 0a 20 | 42 79 20 73 65 74 74 69 |   fi.. |By setti|
|000024a0| 6e 67 0a 20 20 20 20 28 | 73 65 74 71 20 6b 73 68 |ng.    (|setq ksh|
|000024b0| 2d 69 6e 64 65 6e 74 20 | 64 65 66 61 75 6c 74 2d |-indent |default-|
|000024c0| 74 61 62 2d 77 69 64 74 | 68 29 0a 20 20 20 20 28 |tab-widt|h).    (|
|000024d0| 73 65 74 71 20 6b 73 68 | 2d 67 72 6f 75 70 2d 6f |setq ksh|-group-o|
|000024e0| 66 66 73 65 74 20 28 2d | 20 30 20 6b 73 68 2d 69 |ffset (-| 0 ksh-i|
|000024f0| 6e 64 65 6e 74 29 29 0a | 0a 20 20 20 20 54 68 65 |ndent)).|.    The|
|00002500| 20 66 6f 6c 6c 6f 77 69 | 6e 67 20 73 74 79 6c 65 | followi|ng style|
|00002510| 20 69 73 20 6f 62 74 61 | 69 6e 65 64 3a 0a 0a 20 | is obta|ined:.. |
|00002520| 20 20 20 69 66 20 5b 20 | 2d 7a 20 24 66 6f 6f 20 |   if [ |-z $foo |
|00002530| 5d 0a 20 20 20 20 74 68 | 65 6e 0a 09 20 20 20 20 |].    th|en..    |
|00002540| 62 61 72 0a 09 20 20 20 | 20 66 6f 6f 0a 20 20 20 |bar..   | foo.   |
|00002550| 20 66 69 0a 0a 20 42 79 | 20 73 65 74 74 69 6e 67 | fi.. By| setting|
|00002560| 0a 20 20 20 20 28 73 65 | 74 71 20 6b 73 68 2d 63 |.    (se|tq ksh-c|
|00002570| 61 73 65 2d 69 74 65 6d | 2d 6f 66 66 73 65 74 20 |ase-item|-offset |
|00002580| 31 29 0a 20 20 20 20 28 | 73 65 74 71 20 6b 73 68 |1).    (|setq ksh|
|00002590| 2d 63 61 73 65 2d 69 6e | 64 65 6e 74 20 6e 69 6c |-case-in|dent nil|
|000025a0| 29 0a 0a 20 20 20 20 54 | 68 65 20 66 6f 6c 6c 6f |)..    T|he follo|
|000025b0| 77 69 6e 67 20 73 74 79 | 6c 65 20 69 73 20 6f 62 |wing sty|le is ob|
|000025c0| 74 61 69 6e 65 64 3a 0a | 0a 20 20 20 20 63 61 73 |tained:.|.    cas|
|000025d0| 65 20 78 20 69 6e 20 2a | 0a 20 20 20 20 20 66 6f |e x in *|.     fo|
|000025e0| 6f 29 20 62 61 72 20 20 | 20 20 20 20 20 20 20 20 |o) bar  |        |
|000025f0| 20 23 20 3c 2d 2d 20 6b | 73 68 2d 63 61 73 65 2d | # <-- k|sh-case-|
|00002600| 69 74 65 6d 2d 6f 66 66 | 73 65 74 0a 20 20 20 20 |item-off|set.    |
|00002610| 20 20 20 20 20 20 62 61 | 7a 3b 3b 20 20 20 20 20 |      ba|z;;     |
|00002620| 20 20 20 20 23 20 3c 2d | 2d 20 6b 73 68 2d 63 61 |    # <-|- ksh-ca|
|00002630| 73 65 2d 69 6e 64 65 6e | 74 20 61 6c 69 67 6e 73 |se-inden|t aligns|
|00002640| 20 77 69 74 68 20 22 29 | 22 0a 20 20 20 20 20 66 | with ")|".     f|
|00002650| 6f 6f 62 61 72 29 20 66 | 6f 6f 0a 20 20 20 20 20 |oobar) f|oo.     |
|00002660| 20 20 20 20 20 20 20 20 | 62 61 72 3b 3b 0a 20 20 |        |bar;;.  |
|00002670| 20 20 65 73 61 63 0a 0a | 20 42 79 20 73 65 74 74 |  esac..| By sett|
|00002680| 69 6e 67 0a 20 20 20 20 | 28 73 65 74 71 20 6b 73 |ing.    |(setq ks|
|00002690| 68 2d 63 61 73 65 2d 69 | 74 65 6d 2d 6f 66 66 73 |h-case-i|tem-offs|
|000026a0| 65 74 20 31 29 0a 20 20 | 20 20 28 73 65 74 71 20 |et 1).  |  (setq |
|000026b0| 6b 73 68 2d 63 61 73 65 | 2d 69 6e 64 65 6e 74 20 |ksh-case|-indent |
|000026c0| 36 29 0a 0a 20 20 20 20 | 54 68 65 20 66 6f 6c 6c |6)..    |The foll|
|000026d0| 6f 77 69 6e 67 20 73 74 | 79 6c 65 20 69 73 20 6f |owing st|yle is o|
|000026e0| 62 74 61 69 6e 65 64 3a | 0a 0a 20 20 20 20 63 61 |btained:|..    ca|
|000026f0| 73 65 20 78 20 69 6e 20 | 2a 0a 20 20 20 20 20 66 |se x in |*.     f|
|00002700| 6f 6f 29 20 62 61 72 20 | 20 20 20 20 20 20 20 20 |oo) bar |        |
|00002710| 20 20 23 20 3c 2d 2d 20 | 6b 73 68 2d 63 61 73 65 |  # <-- |ksh-case|
|00002720| 2d 69 74 65 6d 2d 6f 66 | 66 73 65 74 0a 20 20 20 |-item-of|fset.   |
|00002730| 20 20 20 20 20 20 20 20 | 62 61 7a 3b 3b 20 20 20 |        |baz;;   |
|00002740| 20 20 20 20 20 23 20 3c | 2d 2d 20 6b 73 68 2d 63 |     # <|-- ksh-c|
|00002750| 61 73 65 2d 69 6e 64 65 | 6e 74 0a 20 20 20 20 20 |ase-inde|nt.     |
|00002760| 66 6f 6f 62 61 72 29 20 | 66 6f 6f 0a 20 20 20 20 |foobar) |foo.    |
|00002770| 20 20 20 20 20 20 20 62 | 61 72 3b 3b 0a 20 20 20 |       b|ar;;.   |
|00002780| 20 65 73 61 63 0a 20 20 | 20 20 0a 0a 49 6e 73 74 | esac.  |  ..Inst|
|00002790| 61 6c 6c 61 74 69 6f 6e | 3a 0a 0a 20 28 73 65 74 |allation|:.. (set|
|000027a0| 71 20 6b 73 68 2d 6d 6f | 64 65 2d 68 6f 6f 6b 0a |q ksh-mo|de-hook.|
|000027b0| 20 20 20 20 20 20 28 66 | 75 6e 63 74 69 6f 6e 20 |      (f|unction |
|000027c0| 28 6c 61 6d 62 64 61 20 | 28 29 0a 20 20 20 20 20 |(lambda |().     |
|000027d0| 20 20 20 20 28 66 6f 6e | 74 2d 6c 6f 63 6b 2d 6d |    (fon|t-lock-m|
|000027e0| 6f 64 65 20 31 29 20 20 | 20 20 20 20 20 20 20 20 |ode 1)  |        |
|000027f0| 20 20 20 3b 3b 20 66 6f | 6e 74 2d 6c 6f 63 6b 20 |   ;; fo|nt-lock |
|00002800| 74 68 65 20 62 75 66 66 | 65 72 0a 20 20 20 20 20 |the buff|er.     |
|00002810| 20 20 20 20 28 73 65 74 | 71 20 6b 73 68 2d 69 6e |    (set|q ksh-in|
|00002820| 64 65 6e 74 20 38 29 0a | 09 20 28 73 65 74 71 20 |dent 8).|. (setq |
|00002830| 6b 73 68 2d 67 72 6f 75 | 70 2d 6f 66 66 73 65 74 |ksh-grou|p-offset|
|00002840| 20 2d 38 29 0a 09 20 28 | 73 65 74 71 20 6b 73 68 | -8).. (|setq ksh|
|00002850| 2d 62 72 61 63 65 2d 6f | 66 66 73 65 74 20 2d 38 |-brace-o|ffset -8|
|00002860| 29 20 20 20 0a 20 20 20 | 20 20 20 20 20 20 28 73 |)   .   |      (s|
|00002870| 65 74 71 20 6b 73 68 2d | 74 61 62 2d 61 6c 77 61 |etq ksh-|tab-alwa|
|00002880| 79 73 2d 69 6e 64 65 6e | 74 20 74 29 0a 20 20 20 |ys-inden|t t).   |
|00002890| 20 20 20 20 20 20 28 73 | 65 74 71 20 6b 73 68 2d |      (s|etq ksh-|
|000028a0| 6d 61 74 63 68 2d 61 6e | 64 2d 74 65 6c 6c 20 74 |match-an|d-tell t|
|000028b0| 29 0a 20 20 20 20 20 20 | 20 20 20 28 73 65 74 71 |).      |   (setq|
|000028c0| 20 6b 73 68 2d 61 6c 69 | 67 6e 2d 74 6f 2d 6b 65 | ksh-ali|gn-to-ke|
|000028d0| 79 77 6f 72 64 20 74 29 | 09 3b 3b 20 54 75 72 6e |yword t)|.;; Turn|
|000028e0| 20 6f 6e 20 6b 65 79 77 | 6f 72 64 20 61 6c 69 67 | on keyw|ord alig|
|000028f0| 6e 6d 65 6e 74 0a 09 20 | 29 29 29 1f 0a 28 64 65 |nment.. |)))..(de|
|00002900| 66 61 6c 69 61 73 20 27 | 6b 73 68 2d 6d 6f 64 65 |falias '|ksh-mode|
|00002910| 20 23 5b 6e 69 6c 20 22 | c0 20 88 c1 5c 6e 21 88 | #[nil "|. ..\n!.|
|00002920| c3 14 c5 16 06 0e 07 16 | 08 c9 0e 5c 6e 21 88 cb |........|...\n!..|
|00002930| cc 21 88 cd 16 0c cb ce | 21 88 cf 16 0e cb d0 21 |.!......|!......!|
|00002940| 88 d1 16 10 cb d2 21 88 | d3 16 12 cb d4 21 88 d5 |......!.|.....!..|
|00002950| 16 14 cb d6 21 88 d7 16 | 16 cb d8 21 88 0e 19 16 |....!...|...!....|
|00002960| 18 da db 21 88 0e 1c 3f | ad 83 dc dd 21 87 22 20 |...!...?|....!." |
|00002970| 5b 6b 69 6c 6c 2d 61 6c | 6c 2d 6c 6f 63 61 6c 2d |[kill-al|l-local-|
|00002980| 76 61 72 69 61 62 6c 65 | 73 20 75 73 65 2d 6c 6f |variable|s use-lo|
|00002990| 63 61 6c 2d 6d 61 70 20 | 6b 73 68 2d 6d 6f 64 65 |cal-map |ksh-mode|
|000029a0| 2d 6d 61 70 20 6b 73 68 | 2d 6d 6f 64 65 20 6d 61 |-map ksh|-mode ma|
|000029b0| 6a 6f 72 2d 6d 6f 64 65 | 20 22 4b 73 68 22 20 6d |jor-mode| "Ksh" m|
|000029c0| 6f 64 65 2d 6e 61 6d 65 | 20 6b 73 68 2d 6d 6f 64 |ode-name| ksh-mod|
|000029d0| 65 2d 61 62 62 72 65 76 | 2d 74 61 62 6c 65 20 6c |e-abbrev|-table l|
|000029e0| 6f 63 61 6c 2d 61 62 62 | 72 65 76 2d 74 61 62 6c |ocal-abb|rev-tabl|
|000029f0| 65 20 73 65 74 2d 73 79 | 6e 74 61 78 2d 74 61 62 |e set-sy|ntax-tab|
|00002a00| 6c 65 20 6b 73 68 2d 6d | 6f 64 65 2d 73 79 6e 74 |le ksh-m|ode-synt|
|00002a10| 61 78 2d 74 61 62 6c 65 | 20 6d 61 6b 65 2d 6c 6f |ax-table| make-lo|
|00002a20| 63 61 6c 2d 76 61 72 69 | 61 62 6c 65 20 69 6e 64 |cal-vari|able ind|
|00002a30| 65 6e 74 2d 6c 69 6e 65 | 2d 66 75 6e 63 74 69 6f |ent-line|-functio|
|00002a40| 6e 20 6b 73 68 2d 69 6e | 64 65 6e 74 2d 6c 69 6e |n ksh-in|dent-lin|
|00002a50| 65 20 69 6e 64 65 6e 74 | 2d 72 65 67 69 6f 6e 2d |e indent|-region-|
|00002a60| 66 75 6e 63 74 69 6f 6e | 20 6b 73 68 2d 69 6e 64 |function| ksh-ind|
|00002a70| 65 6e 74 2d 72 65 67 69 | 6f 6e 20 63 6f 6d 6d 65 |ent-regi|on comme|
|00002a80| 6e 74 2d 73 74 61 72 74 | 20 22 23 20 22 20 63 6f |nt-start| "# " co|
|00002a90| 6d 6d 65 6e 74 2d 65 6e | 64 20 22 22 20 63 6f 6d |mment-en|d "" com|
|00002aa0| 6d 65 6e 74 2d 63 6f 6c | 75 6d 6e 20 33 32 20 63 |ment-col|umn 32 c|
|00002ab0| 6f 6d 6d 65 6e 74 2d 73 | 74 61 72 74 2d 73 6b 69 |omment-s|tart-ski|
|00002ac0| 70 20 22 23 2b 20 2a 22 | 20 66 6f 6e 74 2d 6c 6f |p "#+ *"| font-lo|
|00002ad0| 63 6b 2d 6b 65 79 77 6f | 72 64 73 20 6b 73 68 2d |ck-keywo|rds ksh-|
|00002ae0| 66 6f 6e 74 2d 6c 6f 63 | 6b 2d 6b 65 79 77 6f 72 |font-loc|k-keywor|
|00002af0| 64 73 20 72 75 6e 2d 68 | 6f 6f 6b 73 20 6b 73 68 |ds run-h|ooks ksh|
|00002b00| 2d 6d 6f 64 65 2d 68 6f | 6f 6b 20 6b 73 68 2d 61 |-mode-ho|ok ksh-a|
|00002b10| 6c 69 67 6e 2d 74 6f 2d | 6b 65 79 77 6f 72 64 20 |lign-to-|keyword |
|00002b20| 2d 31 5d 20 32 20 28 23 | 24 20 2e 20 37 33 32 34 |-1] 2 (#|$ . 7324|
|00002b30| 29 20 6e 69 6c 5d 29 0a | 23 40 31 35 36 20 54 6f |) nil]).|#@156 To|
|00002b40| 67 67 6c 65 20 76 61 6c | 75 65 20 6f 66 20 6b 73 |ggle val|ue of ks|
|00002b50| 68 2d 61 6c 69 67 6e 2d | 74 6f 2d 6b 65 79 77 6f |h-align-|to-keywo|
|00002b60| 72 64 20 61 6e 64 20 72 | 65 62 69 6e 64 20 74 68 |rd and r|ebind th|
|00002b70| 65 20 6b 73 68 2d 63 75 | 72 72 65 6e 74 2d 69 6e |e ksh-cu|rrent-in|
|00002b80| 64 65 6e 74 61 74 69 6f | 6e 0a 66 75 6e 63 74 69 |dentatio|n.functi|
|00002b90| 6f 6e 2e 20 57 69 74 68 | 20 61 72 67 2c 20 66 6f |on. With| arg, fo|
|00002ba0| 72 63 65 20 61 6c 69 67 | 6e 6d 65 6e 74 20 74 6f |rce alig|nment to|
|00002bb0| 20 6b 65 79 77 6f 72 64 | 20 69 66 20 61 6e 64 20 | keyword| if and |
|00002bc0| 6f 6e 6c 79 20 69 66 20 | 61 72 67 20 69 73 20 70 |only if |arg is p|
|00002bd0| 6f 73 69 74 69 76 65 2e | 1f 0a 28 64 65 66 61 6c |ositive.|..(defal|
|00002be0| 69 61 73 20 27 6b 73 68 | 2d 61 6c 69 67 6e 2d 74 |ias 'ksh|-align-t|
|00002bf0| 6f 2d 6b 65 79 77 6f 72 | 64 20 23 5b 28 26 6f 70 |o-keywor|d #[(&op|
|00002c00| 74 69 6f 6e 61 6c 20 61 | 72 67 29 20 22 08 ac 8f |tional a|rg) "...|
|00002c10| 09 ac 86 c2 11 c3 c4 4d | 87 c5 11 c3 c6 4d 87 c7 |.......M|.....M..|
|00002c20| 08 21 ab 86 c2 11 c3 c4 | 4d 87 c5 11 c3 c6 4d 87 |.!......|M.....M.|
|00002c30| 22 20 5b 61 72 67 20 6b | 73 68 2d 61 6c 69 67 6e |" [arg k|sh-align|
|00002c40| 2d 74 6f 2d 6b 65 79 77 | 6f 72 64 20 74 20 6b 73 |-to-keyw|ord t ks|
|00002c50| 68 2d 63 75 72 72 65 6e | 74 2d 69 6e 64 65 6e 74 |h-curren|t-indent|
|00002c60| 61 74 69 6f 6e 20 63 75 | 72 72 65 6e 74 2d 63 6f |ation cu|rrent-co|
|00002c70| 6c 75 6d 6e 20 6e 69 6c | 20 63 75 72 72 65 6e 74 |lumn nil| current|
|00002c80| 2d 69 6e 64 65 6e 74 61 | 74 69 6f 6e 20 6e 61 74 |-indenta|tion nat|
|00002c90| 6e 75 6d 70 5d 20 32 20 | 28 23 24 20 2e 20 31 31 |nump] 2 |(#$ . 11|
|00002ca0| 30 37 30 29 20 6e 69 6c | 5d 29 0a 23 40 36 39 20 |070) nil|]).#@69 |
|00002cb0| 52 65 74 75 72 6e 20 74 | 68 65 20 76 65 72 74 69 |Return t|he verti|
|00002cc0| 63 61 6c 20 70 6f 73 69 | 74 69 6f 6e 20 6f 66 20 |cal posi|tion of |
|00002cd0| 70 6f 69 6e 74 20 69 6e | 20 74 68 65 20 62 75 66 |point in| the buf|
|00002ce0| 66 65 72 2e 0a 54 6f 70 | 20 6c 69 6e 65 20 69 73 |fer..Top| line is|
|00002cf0| 20 31 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 | 1...(de|falias '|
|00002d00| 6b 73 68 2d 63 75 72 72 | 65 6e 74 2d 6c 69 6e 65 |ksh-curr|ent-line|
|00002d10| 20 23 5b 6e 69 6c 20 22 | c0 65 60 5c 22 69 c1 55 | #[nil "|.e`\"i.U|
|00002d20| ab 83 c2 aa 81 c1 5c 5c | 87 22 20 5b 63 6f 75 6e |......\\|." [coun|
|00002d30| 74 2d 6c 69 6e 65 73 20 | 30 20 31 5d 20 33 20 28 |t-lines |0 1] 3 (|
|00002d40| 23 24 20 2e 20 31 31 34 | 34 30 29 5d 29 0a 23 40 |#$ . 114|40)]).#@|
|00002d50| 36 38 20 46 72 6f 6d 20 | 70 6f 69 6e 74 2c 20 63 |68 From |point, c|
|00002d60| 6f 6e 73 74 72 75 63 74 | 20 61 20 73 74 72 69 6e |onstruct| a strin|
|00002d70| 67 20 66 72 6f 6d 20 61 | 6c 6c 20 63 68 61 72 61 |g from a|ll chara|
|00002d80| 63 74 65 72 73 20 6f 6e | 0a 63 75 72 72 65 6e 74 |cters on|.current|
|00002d90| 20 6c 69 6e 65 1f 0a 28 | 64 65 66 61 6c 69 61 73 | line..(|defalias|
|00002da0| 20 27 6b 73 68 2d 6c 69 | 6e 65 2d 74 6f 2d 73 74 | 'ksh-li|ne-to-st|
|00002db0| 72 69 6e 67 20 23 5b 6e | 69 6c 20 22 c0 c1 77 88 |ring #[n|il "..w.|
|00002dc0| 60 c2 7f 88 60 7b 87 22 | 20 5b 22 20 09 22 20 6e |`...`{."| [" ." n|
|00002dd0| 69 6c 20 31 5d 20 32 20 | 28 23 24 20 2e 20 31 31 |il 1] 2 |(#$ . 11|
|00002de0| 36 30 33 29 5d 29 0a 23 | 40 39 35 20 52 65 74 75 |603)]).#|@95 Retu|
|00002df0| 72 6e 20 61 20 32 20 65 | 6c 65 6d 65 6e 74 20 6c |rn a 2 e|lement l|
|00002e00| 69 73 74 20 28 6e 65 73 | 74 2d 6c 65 76 65 6c 20 |ist (nes|t-level |
|00002e10| 6e 65 73 74 2d 6c 69 6e | 65 29 20 64 65 73 63 72 |nest-lin|e) descr|
|00002e20| 69 62 69 6e 67 20 77 68 | 65 72 65 20 74 68 65 0a |ibing wh|ere the.|
|00002e30| 63 75 72 72 65 6e 74 20 | 6c 69 6e 65 20 73 68 6f |current |line sho|
|00002e40| 75 6c 64 20 6e 65 73 74 | 2e 1f 0a 28 64 65 66 61 |uld nest|...(defa|
|00002e50| 6c 69 61 73 20 27 6b 73 | 68 2d 67 65 74 2d 6e 65 |lias 'ks|h-get-ne|
|00002e60| 73 74 2d 6c 65 76 65 6c | 20 23 5b 6e 69 6c 20 22 |st-level| #[nil "|
|00002e70| c0 89 19 1a 8a c3 79 88 | 6f ac a9 09 ac a6 c4 c5 |......y.|o.......|
|00002e80| 21 ac 9c 8a c3 79 88 c6 | 79 88 c4 0e 07 21 29 ac |!....y..|y....!).|
|00002e90| 8e c4 0e 08 21 ac 88 c9 | 20 ca 20 42 11 aa 59 c3 |....!...| . B..Y.|
|00002ea0| 79 88 aa 54 09 ac 87 c9 | 20 ca 20 42 aa 81 09 2b |y..T....| . B...+|
|00002eb0| 87 22 20 5b 6e 69 6c 20 | 6c 65 76 65 6c 20 63 61 |." [nil |level ca|
|00002ec0| 73 65 2d 66 6f 6c 64 2d | 73 65 61 72 63 68 20 2d |se-fold-|search -|
|00002ed0| 31 20 6c 6f 6f 6b 69 6e | 67 2d 61 74 20 22 5e 5c |1 lookin|g-at "^\|
|00002ee0| 5c 73 20 2a 24 22 20 30 | 20 6b 73 68 2d 6d 75 6c |\s *$" 0| ksh-mul|
|00002ef0| 74 69 6c 69 6e 65 2d 72 | 65 20 6b 73 68 2d 63 6f |tiline-r|e ksh-co|
|00002f00| 6d 6d 65 6e 74 2d 72 65 | 67 65 78 70 20 63 75 72 |mment-re|gexp cur|
|00002f10| 72 65 6e 74 2d 69 6e 64 | 65 6e 74 61 74 69 6f 6e |rent-ind|entation|
|00002f20| 20 6b 73 68 2d 63 75 72 | 72 65 6e 74 2d 6c 69 6e | ksh-cur|rent-lin|
|00002f30| 65 5d 20 32 20 28 23 24 | 20 2e 20 31 31 37 35 36 |e] 2 (#$| . 11756|
|00002f40| 29 5d 29 0a 23 40 37 31 | 20 52 65 74 75 72 6e 20 |)]).#@71| Return |
|00002f50| 74 72 75 65 20 69 66 20 | 63 75 72 72 65 6e 74 20 |true if |current |
|00002f60| 6c 69 6e 65 20 63 6f 6e | 74 61 69 6e 73 20 63 6f |line con|tains co|
|00002f70| 6d 70 6f 75 6e 64 20 6c | 69 73 74 20 69 6e 69 74 |mpound l|ist init|
|00002f80| 69 61 74 69 6e 67 20 6b | 65 79 77 6f 72 64 1f 0a |iating k|eyword..|
|00002f90| 28 64 65 66 61 6c 69 61 | 73 20 27 6b 73 68 2d 6c |(defalia|s 'ksh-l|
|00002fa0| 6f 6f 6b 69 6e 67 2d 61 | 74 2d 63 6f 6d 70 6f 75 |ooking-a|t-compou|
|00002fb0| 6e 64 2d 6c 69 73 74 20 | 23 5b 6e 69 6c 20 22 c0 |nd-list |#[nil ".|
|00002fc0| 09 21 ae 83 c0 5c 6e 21 | 87 22 20 5b 6c 6f 6f 6b |.!...\n!|." [look|
|00002fd0| 69 6e 67 2d 61 74 20 6b | 73 68 2d 64 6f 2d 72 65 |ing-at k|sh-do-re|
|00002fe0| 20 6b 73 68 2d 74 68 65 | 6e 2d 72 65 5d 20 32 20 | ksh-the|n-re] 2 |
|00002ff0| 28 23 24 20 2e 20 31 32 | 31 30 35 29 5d 29 0a 23 |(#$ . 12|105)]).#|
|00003000| 40 36 39 20 52 65 74 75 | 72 6e 20 74 72 75 65 20 |@69 Retu|rn true |
|00003010| 69 66 20 63 75 72 72 65 | 6e 74 20 6c 69 6e 65 20 |if curre|nt line |
|00003020| 69 73 20 61 20 63 61 73 | 65 2d 69 74 65 6d 20 2e |is a cas|e-item .|
|00003030| 76 73 2e 20 70 61 72 65 | 6e 20 63 6f 6d 70 6f 75 |vs. pare|n compou|
|00003040| 6e 64 20 6c 69 73 74 1f | 0a 28 64 65 66 61 6c 69 |nd list.|.(defali|
|00003050| 61 73 20 27 6b 73 68 2d | 6c 6f 6f 6b 69 6e 67 2d |as 'ksh-|looking-|
|00003060| 61 74 2d 63 61 73 65 2d | 69 74 65 6d 20 23 5b 6e |at-case-|item #[n|
|00003070| 69 6c 20 22 8a c0 79 88 | c1 5c 6e 21 ad 92 c3 c4 |il "..y.|.\n!....|
|00003080| 20 41 21 88 c1 0d 21 ae | 87 c1 0e 06 21 ae 81 c7 | A!...!.|....!...|
|00003090| 29 87 22 20 5b 30 20 6c | 6f 6f 6b 69 6e 67 2d 61 |)." [0 l|ooking-a|
|000030a0| 74 20 6b 73 68 2d 70 61 | 72 65 6e 2d 72 65 20 67 |t ksh-pa|ren-re g|
|000030b0| 6f 74 6f 2d 6c 69 6e 65 | 20 6b 73 68 2d 67 65 74 |oto-line| ksh-get|
|000030c0| 2d 6e 65 73 74 2d 6c 65 | 76 65 6c 20 6b 73 68 2d |-nest-le|vel ksh-|
|000030d0| 63 61 73 65 2d 72 65 20 | 6b 73 68 2d 63 61 73 65 |case-re |ksh-case|
|000030e0| 2d 69 74 65 6d 2d 65 6e | 64 2d 72 65 20 6e 69 6c |-item-en|d-re nil|
|000030f0| 5d 20 32 20 28 23 24 20 | 2e 20 31 32 32 39 32 29 |] 2 (#$ |. 12292)|
|00003100| 5d 29 0a 23 40 35 34 20 | 52 65 74 75 72 6e 20 74 |]).#@54 |Return t|
|00003110| 68 65 20 63 6f 6c 75 6d | 6e 20 6f 66 20 74 68 65 |he colum|n of the|
|00003120| 20 63 6c 6f 73 65 73 74 | 20 6f 70 65 6e 20 63 61 | closest| open ca|
|00003130| 73 65 20 73 74 61 74 65 | 6d 65 6e 74 1f 0a 28 64 |se state|ment..(d|
|00003140| 65 66 61 6c 69 61 73 20 | 27 6b 73 68 2d 67 65 74 |efalias |'ksh-get|
|00003150| 2d 63 61 73 65 2d 69 6e | 64 65 6e 74 20 23 5b 6e |-case-in|dent #[n|
|00003160| 69 6c 20 22 8a c0 09 5c | 6e 60 23 89 1b ac 8a 0c |il "...\|n`#.....|
|00003170| ab 84 c5 c6 21 88 c7 aa | 82 0b 40 2a 87 22 20 5b |....!...|..@*." [|
|00003180| 6b 73 68 2d 67 65 74 2d | 63 6f 6d 70 6f 75 6e 64 |ksh-get-|compound|
|00003190| 2d 6c 65 76 65 6c 20 6b | 73 68 2d 63 61 73 65 2d |-level k|sh-case-|
|000031a0| 72 65 20 6b 73 68 2d 65 | 73 61 63 2d 72 65 20 6e |re ksh-e|sac-re n|
|000031b0| 65 73 74 2d 6c 69 73 74 | 20 6b 73 68 2d 6d 61 74 |est-list| ksh-mat|
|000031c0| 63 68 2d 61 6e 64 2d 74 | 65 6c 6c 20 6d 65 73 73 |ch-and-t|ell mess|
|000031d0| 61 67 65 20 22 4e 6f 20 | 6d 61 74 63 68 69 6e 67 |age "No |matching|
|000031e0| 20 63 61 73 65 20 66 6f | 72 20 3b 3b 22 20 30 5d | case fo|r ;;" 0]|
|000031f0| 20 35 20 28 23 24 20 2e | 20 31 32 35 35 32 29 5d | 5 (#$ .| 12552)]|
|00003200| 29 0a 23 40 31 32 34 20 | 52 65 74 75 72 6e 20 74 |).#@124 |Return t|
|00003210| 68 65 20 63 6f 6c 75 6d | 6e 20 74 6f 20 69 6e 64 |he colum|n to ind|
|00003220| 65 6e 74 20 74 6f 20 77 | 69 74 68 20 72 65 73 70 |ent to w|ith resp|
|00003230| 65 63 74 20 74 6f 20 6e | 65 73 74 2d 6c 69 6e 65 |ect to n|est-line|
|00003240| 20 74 61 6b 69 6e 67 20 | 0a 69 6e 74 6f 20 63 6f | taking |.into co|
|00003250| 6e 73 69 64 65 72 61 74 | 69 6f 6e 20 6b 65 79 77 |nsiderat|ion keyw|
|00003260| 6f 72 64 73 20 61 6e 64 | 20 6f 74 68 65 72 20 6e |ords and| other n|
|00003270| 65 73 74 69 6e 67 20 63 | 6f 6e 73 74 72 75 63 74 |esting c|onstruct|
|00003280| 73 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 6b |s...(def|alias 'k|
|00003290| 73 68 2d 67 65 74 2d 6e | 65 73 74 65 72 2d 63 6f |sh-get-n|ester-co|
|000032a0| 6c 75 6d 6e 20 23 5b 28 | 6e 65 73 74 2d 6c 69 6e |lumn #[(|nest-lin|
|000032b0| 65 29 20 22 8a c0 89 89 | c1 20 1a 1b 1c 1d c6 20 |e) "....|. ..... |
|000032c0| ab b4 8a c7 0e 08 21 88 | c9 20 88 ca 20 1d cb 0e |......!.|. .. ...|
|000032d0| 0c 0d 5c 22 ab 87 cd 20 | 0e 0e 5c 5c aa 96 c6 20 |..\"... |..\\... |
|000032e0| ab 84 cf 20 aa 8e d0 0e | 11 21 ad 88 c0 7f 88 d2 |... ....|.!......|
|000032f0| 20 0e 0e 5c 5c 2a 82 2a | 01 8a c7 0e 08 21 88 ca | ..\\*.*|.....!..|
|00003300| 20 15 8a d0 0e 13 21 ab | 95 8a c7 5c 6e 53 21 88 | .....!.|...\nS!.|
|00003310| d0 0e 13 21 29 ab 88 cf | 20 0e 14 5c 5c 82 10 01 |...!)...| ..\\...|
|00003320| 8a c9 20 88 cb 0e 15 0d | 5c 22 ad 99 d0 0e 0c 21 |.. .....|\".....!|
|00003330| ab 87 cd 20 0e 0e 5c 5c | aa 8c cd 20 0e 16 ac 83 |... ..\\|... ....|
|00003340| d7 aa 82 0e 16 5c 5c 29 | 86 10 01 8a c9 20 88 cb |.....\\)|..... ..|
|00003350| 0e 18 0d 5c 22 ad 8e 0e | 16 ac 85 cd 20 54 aa 85 |...\"...|.... T..|
|00003360| cd 20 0e 16 5c 5c 29 ae | e5 d0 0e 19 21 ab 8e cf |. ..\\).|....!...|
|00003370| 20 0e 16 ac 83 d7 aa 82 | 0e 16 5c 5c aa d1 d0 0e | .......|..\\....|
|00003380| 1a 21 ac 86 d0 0e 1b 21 | ab 95 d0 0e 1c 21 ab 8b |.!.....!|.....!..|
|00003390| 0e 16 ac 83 d7 aa b8 0e | 16 aa b4 0e 1d aa b0 d0 |........|........|
|000033a0| 0e 11 21 ab 8a c0 7f 88 | d2 20 0e 0e 5c 5c aa a0 |..!.....|. ..\\..|
|000033b0| c6 20 ab 9a 0e 1e ac 8f | df 0e 20 0d e1 23 88 e2 |. ......|.. ..#..|
|000033c0| 95 62 88 69 54 aa 89 cf | 20 0e 1e 5c 5c aa 82 cf |.b.iT...| ..\\...|
|000033d0| 20 29 14 29 e3 20 ab 86 | 0c 0e 24 5c 5c aa 8d d0 | ).). ..|..$\\...|
|000033e0| 0e 19 21 ab 86 0c 0e 1d | 5c 5c aa 81 0c 2d 87 22 |..!.....|\\...-."|
|000033f0| 20 5b 6e 69 6c 20 6b 73 | 68 2d 63 75 72 72 65 6e | [nil ks|h-curren|
|00003400| 74 2d 6c 69 6e 65 20 73 | 74 61 72 74 2d 6c 69 6e |t-line s|tart-lin|
|00003410| 65 20 63 61 73 65 2d 66 | 6f 6c 64 2d 73 65 61 72 |e case-f|old-sear|
|00003420| 63 68 20 6e 65 73 74 65 | 72 2d 63 6f 6c 75 6d 6e |ch neste|r-column|
|00003430| 20 66 65 6e 63 65 2d 70 | 6f 73 74 20 6b 73 68 2d | fence-p|ost ksh-|
|00003440| 6c 6f 6f 6b 69 6e 67 2d | 61 74 2d 63 61 73 65 2d |looking-|at-case-|
|00003450| 69 74 65 6d 20 67 6f 74 | 6f 2d 6c 69 6e 65 20 6e |item got|o-line n|
|00003460| 65 73 74 2d 6c 69 6e 65 | 20 62 61 63 6b 2d 74 6f |est-line| back-to|
|00003470| 2d 69 6e 64 65 6e 74 61 | 74 69 6f 6e 20 6b 73 68 |-indenta|tion ksh|
|00003480| 2d 65 6f 6c 2d 70 6f 69 | 6e 74 20 6b 73 68 2d 73 |-eol-poi|nt ksh-s|
|00003490| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 2d 73 65 |earch-fo|rward-se|
|000034a0| 78 70 20 6b 73 68 2d 63 | 61 73 65 2d 72 65 20 6b |xp ksh-c|ase-re k|
|000034b0| 73 68 2d 63 75 72 72 65 | 6e 74 2d 69 6e 64 65 6e |sh-curre|nt-inden|
|000034c0| 74 61 74 69 6f 6e 20 6b | 73 68 2d 63 61 73 65 2d |tation k|sh-case-|
|000034d0| 69 74 65 6d 2d 6f 66 66 | 73 65 74 20 63 75 72 72 |item-off|set curr|
|000034e0| 65 6e 74 2d 69 6e 64 65 | 6e 74 61 74 69 6f 6e 20 |ent-inde|ntation |
|000034f0| 6c 6f 6f 6b 69 6e 67 2d | 61 74 20 6b 73 68 2d 63 |looking-|at ksh-c|
|00003500| 61 73 65 2d 69 74 65 6d | 2d 65 6e 64 2d 72 65 20 |ase-item|-end-re |
|00003510| 6b 73 68 2d 67 65 74 2d | 63 61 73 65 2d 69 6e 64 |ksh-get-|case-ind|
|00003520| 65 6e 74 20 6b 73 68 2d | 6d 75 6c 74 69 6c 69 6e |ent ksh-|multilin|
|00003530| 65 2d 72 65 20 6b 73 68 | 2d 6d 75 6c 74 69 6c 69 |e-re ksh|-multili|
|00003540| 6e 65 2d 6f 66 66 73 65 | 74 20 6b 73 68 2d 6b 65 |ne-offse|t ksh-ke|
|00003550| 79 77 6f 72 64 73 2d 72 | 65 20 6b 73 68 2d 69 6e |ywords-r|e ksh-in|
|00003560| 64 65 6e 74 20 32 20 6b | 73 68 2d 74 68 65 6e 2d |dent 2 k|sh-then-|
|00003570| 64 6f 2d 72 65 20 6b 73 | 68 2d 62 72 61 63 65 2d |do-re ks|h-brace-|
|00003580| 72 65 20 6b 73 68 2d 69 | 6d 70 6c 69 63 69 74 2d |re ksh-i|mplicit-|
|00003590| 66 75 6e 63 2d 72 65 20 | 6b 73 68 2d 65 78 70 6c |func-re |ksh-expl|
|000035a0| 69 63 69 74 2d 66 75 6e | 63 2d 72 65 20 6b 73 68 |icit-fun|c-re ksh|
|000035b0| 2d 66 75 6e 63 2d 62 72 | 61 63 65 2d 72 65 20 6b |-func-br|ace-re k|
|000035c0| 73 68 2d 62 72 61 63 65 | 2d 6f 66 66 73 65 74 20 |sh-brace|-offset |
|000035d0| 6b 73 68 2d 63 61 73 65 | 2d 69 6e 64 65 6e 74 20 |ksh-case|-indent |
|000035e0| 72 65 2d 73 65 61 72 63 | 68 2d 66 6f 72 77 61 72 |re-searc|h-forwar|
|000035f0| 64 20 6b 73 68 2d 63 61 | 73 65 2d 69 74 65 6d 2d |d ksh-ca|se-item-|
|00003600| 72 65 20 74 20 31 20 6b | 73 68 2d 6c 6f 6f 6b 69 |re t 1 k|sh-looki|
|00003610| 6e 67 2d 61 74 2d 63 6f | 6d 70 6f 75 6e 64 2d 6c |ng-at-co|mpound-l|
|00003620| 69 73 74 20 6b 73 68 2d | 67 72 6f 75 70 2d 6f 66 |ist ksh-|group-of|
|00003630| 66 73 65 74 5d 20 34 20 | 28 23 24 20 2e 20 31 32 |fset] 4 |(#$ . 12|
|00003640| 38 30 38 29 5d 29 0a 23 | 40 31 30 30 20 49 6e 64 |808)]).#|@100 Ind|
|00003650| 65 6e 74 20 63 75 72 72 | 65 6e 74 20 6c 69 6e 65 |ent curr|ent line|
|00003660| 20 72 65 6c 61 74 69 76 | 65 20 74 6f 20 63 6f 6e | relativ|e to con|
|00003670| 74 61 69 6e 69 6e 67 20 | 62 6c 6f 63 6b 20 61 6e |taining |block an|
|00003680| 64 20 61 6c 6c 6f 77 20 | 66 6f 72 0a 6b 73 68 2d |d allow |for.ksh-|
|00003690| 74 61 62 2d 61 6c 77 61 | 79 73 2d 69 6e 64 65 6e |tab-alwa|ys-inden|
|000036a0| 74 20 63 75 73 74 6f 6d | 69 7a 61 74 69 6f 6e 1f |t custom|ization.|
|000036b0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6b 73 68 2d |.(defali|as 'ksh-|
|000036c0| 69 6e 64 65 6e 74 2d 63 | 6f 6d 6d 61 6e 64 20 23 |indent-c|ommand #|
|000036d0| 5b 6e 69 6c 20 22 c0 19 | 8a c2 c0 78 88 6e 29 ab |[nil "..|...x.n).|
|000036e0| 84 c3 20 aa 8b 0c ab 86 | 8a c3 20 29 aa 82 c5 20 |.. .....|.. )... |
|000036f0| 29 87 22 20 5b 6e 69 6c | 20 63 61 73 65 2d 66 6f |)." [nil| case-fo|
|00003700| 6c 64 2d 73 65 61 72 63 | 68 20 22 20 09 22 20 6b |ld-searc|h " ." k|
|00003710| 73 68 2d 69 6e 64 65 6e | 74 2d 6c 69 6e 65 20 6b |sh-inden|t-line k|
|00003720| 73 68 2d 74 61 62 2d 61 | 6c 77 61 79 73 2d 69 6e |sh-tab-a|lways-in|
|00003730| 64 65 6e 74 20 69 6e 73 | 65 72 74 2d 74 61 62 5d |dent ins|ert-tab]|
|00003740| 20 32 20 28 23 24 20 2e | 20 31 33 39 30 31 29 20 | 2 (#$ .| 13901) |
|00003750| 6e 69 6c 5d 29 0a 23 40 | 37 36 20 49 6e 64 65 6e |nil]).#@|76 Inden|
|00003760| 74 20 63 75 72 72 65 6e | 74 20 6c 69 6e 65 20 61 |t curren|t line a|
|00003770| 73 20 66 61 72 20 61 73 | 20 69 74 20 73 68 6f 75 |s far as| it shou|
|00003780| 6c 64 20 67 6f 20 61 63 | 63 6f 72 64 69 6e 67 0a |ld go ac|cording.|
|00003790| 74 6f 20 74 68 65 20 73 | 79 6e 74 61 78 2f 63 6f |to the s|yntax/co|
|000037a0| 6e 74 65 78 74 1f 0a 28 | 64 65 66 61 6c 69 61 73 |ntext..(|defalias|
|000037b0| 20 27 6b 73 68 2d 69 6e | 64 65 6e 74 2d 6c 69 6e | 'ksh-in|dent-lin|
|000037c0| 65 20 23 5b 6e 69 6c 20 | 22 c0 19 8a c2 79 88 6f |e #[nil |"....y.o|
|000037d0| ac b3 c3 20 1c c5 20 1e | 06 c7 0c 41 21 1e 08 c9 |... .. .|...A!...|
|000037e0| 20 89 1e 5c 6e ab 84 0e | 5c 6e 16 08 0e 08 0e 06 | ..\n...|\n......|
|000037f0| 61 ac 93 c2 79 88 60 1e | 0b cc 20 88 0e 0b 60 7c |a...y.`.|.. ...`||
|00003800| 88 29 0e 08 6a 88 2c 29 | c5 20 1e 06 cd 20 1e 0e |.)..j.,)|. ... ..|
|00003810| 60 0e 0e 5a 1e 0f 0e 06 | 0e 0f 56 ab 84 cc 20 aa |`..Z....|..V... .|
|00003820| 81 c0 2c 87 22 20 5b 6e | 69 6c 20 63 61 73 65 2d |..,." [n|il case-|
|00003830| 66 6f 6c 64 2d 73 65 61 | 72 63 68 20 30 20 6b 73 |fold-sea|rch 0 ks|
|00003840| 68 2d 67 65 74 2d 6e 65 | 73 74 2d 6c 65 76 65 6c |h-get-ne|st-level|
|00003850| 20 6c 65 76 65 6c 2d 6c | 69 73 74 20 63 75 72 72 | level-l|ist curr|
|00003860| 65 6e 74 2d 69 6e 64 65 | 6e 74 61 74 69 6f 6e 20 |ent-inde|ntation |
|00003870| 74 68 69 73 2d 6c 69 6e | 65 2d 6c 65 76 65 6c 20 |this-lin|e-level |
|00003880| 6b 73 68 2d 67 65 74 2d | 6e 65 73 74 65 72 2d 63 |ksh-get-|nester-c|
|00003890| 6f 6c 75 6d 6e 20 6e 65 | 73 74 65 72 2d 63 6f 6c |olumn ne|ster-col|
|000038a0| 75 6d 6e 20 6b 73 68 2d | 6d 61 74 63 68 2d 73 74 |umn ksh-|match-st|
|000038b0| 72 75 63 74 75 72 65 2d | 61 6e 64 2d 72 65 69 6e |ructure-|and-rein|
|000038c0| 64 65 6e 74 20 73 74 72 | 75 63 74 2d 6d 61 74 63 |dent str|uct-matc|
|000038d0| 68 20 62 65 67 20 62 61 | 63 6b 2d 74 6f 2d 69 6e |h beg ba|ck-to-in|
|000038e0| 64 65 6e 74 61 74 69 6f | 6e 20 6b 73 68 2d 62 6f |dentatio|n ksh-bo|
|000038f0| 6c 2d 70 6f 69 6e 74 20 | 74 68 69 73 2d 62 6f 6c |l-point |this-bol|
|00003900| 20 74 68 69 73 2d 70 6f | 69 6e 74 5d 20 33 20 28 | this-po|int] 3 (|
|00003910| 23 24 20 2e 20 31 34 31 | 37 31 29 20 6e 69 6c 5d |#$ . 141|71) nil]|
|00003920| 29 0a 23 40 31 30 38 20 | 4d 61 74 63 68 20 74 68 |).#@108 |Match th|
|00003930| 65 20 63 6f 6d 70 6f 75 | 6e 64 20 63 6f 6d 6d 61 |e compou|nd comma|
|00003940| 6e 64 20 61 6e 64 20 69 | 6e 64 65 6e 74 2e 20 52 |nd and i|ndent. R|
|00003950| 65 74 75 72 6e 20 6e 69 | 6c 20 6f 6e 20 6e 6f 20 |eturn ni|l on no |
|00003960| 6d 61 74 63 68 2c 0a 69 | 6e 64 65 6e 74 61 74 69 |match,.i|ndentati|
|00003970| 6f 6e 20 74 6f 20 75 73 | 65 20 66 6f 72 20 74 68 |on to us|e for th|
|00003980| 69 73 20 6c 69 6e 65 20 | 6f 74 68 65 72 77 69 73 |is line |otherwis|
|00003990| 65 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 6b |e...(def|alias 'k|
|000039a0| 73 68 2d 6d 61 74 63 68 | 2d 69 6e 64 65 6e 74 2d |sh-match|-indent-|
|000039b0| 6c 65 76 65 6c 20 23 5b | 28 62 65 67 69 6e 2d 72 |level #[|(begin-r|
|000039c0| 65 20 65 6e 64 2d 72 65 | 29 20 22 c0 19 8a c2 0b |e end-re|) ".....|
|000039d0| 0c 60 23 29 89 1d ac 8b | 0e 06 ab 84 c7 c8 21 88 |.`#)....|......!.|
|000039e0| c0 aa 9c 0d 40 1e 09 0d | 41 1e 5c 6e 0e 06 ab 8d |....@...|A.\n....|
|000039f0| 8a cb 0e 5c 6e 21 88 c7 | cc cd 20 5c 22 88 29 0e |...\n!..|.. \".).|
|00003a00| 09 2a 2a 87 22 20 5b 6e | 69 6c 20 63 61 73 65 2d |.**." [n|il case-|
|00003a10| 66 6f 6c 64 2d 73 65 61 | 72 63 68 20 6b 73 68 2d |fold-sea|rch ksh-|
|00003a20| 67 65 74 2d 63 6f 6d 70 | 6f 75 6e 64 2d 6c 65 76 |get-comp|ound-lev|
|00003a30| 65 6c 20 62 65 67 69 6e | 2d 72 65 20 65 6e 64 2d |el begin|-re end-|
|00003a40| 72 65 20 6e 65 73 74 2d | 6c 69 73 74 20 6b 73 68 |re nest-|list ksh|
|00003a50| 2d 6d 61 74 63 68 2d 61 | 6e 64 2d 74 65 6c 6c 20 |-match-a|nd-tell |
|00003a60| 6d 65 73 73 61 67 65 20 | 22 4e 6f 20 6d 61 74 63 |message |"No matc|
|00003a70| 68 69 6e 67 20 63 6f 6d | 70 6f 75 6e 64 20 63 6f |hing com|pound co|
|00003a80| 6d 6d 61 6e 64 22 20 6e | 65 73 74 2d 6c 65 76 65 |mmand" n|est-leve|
|00003a90| 6c 20 6d 61 74 63 68 2d | 6c 69 6e 65 20 67 6f 74 |l match-|line got|
|00003aa0| 6f 2d 6c 69 6e 65 20 22 | 4d 61 74 63 68 65 64 20 |o-line "|Matched |
|00003ab0| 2e 2e 2e 20 25 73 22 20 | 6b 73 68 2d 6c 69 6e 65 |... %s" |ksh-line|
|00003ac0| 2d 74 6f 2d 73 74 72 69 | 6e 67 5d 20 35 20 28 23 |-to-stri|ng] 5 (#|
|00003ad0| 24 20 2e 20 31 34 36 33 | 32 29 20 6e 69 6c 5d 29 |$ . 1463|2) nil])|
|00003ae0| 0a 23 40 32 31 31 20 49 | 66 20 74 68 65 20 63 75 |.#@211 I|f the cu|
|00003af0| 72 72 65 6e 74 20 6c 69 | 6e 65 20 6d 61 74 63 68 |rrent li|ne match|
|00003b00| 65 73 20 6f 6e 65 20 6f | 66 20 74 68 65 20 69 6e |es one o|f the in|
|00003b10| 64 65 6e 74 69 6e 67 20 | 6b 65 79 77 6f 72 64 73 |denting |keywords|
|00003b20| 0a 6f 72 20 6f 6e 65 20 | 6f 66 20 74 68 65 20 63 |.or one |of the c|
|00003b30| 6f 6e 74 72 6f 6c 20 73 | 74 72 75 63 74 75 72 65 |ontrol s|tructure|
|00003b40| 20 65 6e 64 69 6e 67 20 | 6b 65 79 77 6f 72 64 73 | ending |keywords|
|00003b50| 20 74 68 65 6e 20 72 65 | 69 6e 64 65 6e 74 2e 20 | then re|indent. |
|00003b60| 41 6c 73 6f 0a 69 66 20 | 6b 73 68 2d 6d 61 74 63 |Also.if |ksh-matc|
|00003b70| 68 2d 61 6e 64 2d 74 65 | 6c 6c 20 69 73 20 6e 6f |h-and-te|ll is no|
|00003b80| 6e 2d 6e 69 6c 20 74 68 | 65 20 6d 61 74 63 68 69 |n-nil th|e matchi|
|00003b90| 6e 67 20 73 74 72 75 63 | 74 75 72 65 20 77 69 6c |ng struc|ture wil|
|00003ba0| 6c 20 65 63 68 6f 20 69 | 6e 0a 74 68 65 20 6d 69 |l echo i|n.the mi|
|00003bb0| 6e 69 62 75 66 66 65 72 | 1f 0a 28 64 65 66 61 6c |nibuffer|..(defal|
|00003bc0| 69 61 73 20 27 6b 73 68 | 2d 6d 61 74 63 68 2d 73 |ias 'ksh|-match-s|
|00003bd0| 74 72 75 63 74 75 72 65 | 2d 61 6e 64 2d 72 65 69 |tructure|-and-rei|
|00003be0| 6e 64 65 6e 74 20 23 5b | 6e 69 6c 20 22 c0 19 8a |ndent #[|nil "...|
|00003bf0| c2 79 88 c3 20 88 c4 0d | 21 ab 88 c6 0e 07 0e 08 |.y.. ...|!.......|
|00003c00| 5c 22 aa d7 c4 0e 09 21 | ab 88 c6 0e 07 0e 08 5c |\".....!|.......\|
|00003c10| 22 aa c9 c4 0e 08 21 ab | 88 c6 0e 07 0e 08 5c 22 |".....!.|......\"|
|00003c20| aa bb c4 0e 5c 6e 21 ab | 88 c6 0e 0b 0e 5c 6e 5c |....\n!.|.....\n\|
|00003c30| 22 aa ad c4 0e 0c 21 ab | 88 c6 0e 0d 0e 0c 5c 22 |".....!.|......\"|
|00003c40| aa 9f c4 0e 0e 21 ab 98 | c6 0e 0f 0e 0e 5c 22 ae |.....!..|.....\".|
|00003c50| 91 c6 0e 10 0e 0e 5c 22 | ae 89 c6 0e 11 0e 0e 5c |......\"|.......\|
|00003c60| 22 aa 81 c0 2a 87 22 20 | 5b 6e 69 6c 20 63 61 73 |"...*." |[nil cas|
|00003c70| 65 2d 66 6f 6c 64 2d 73 | 65 61 72 63 68 20 30 20 |e-fold-s|earch 0 |
|00003c80| 62 61 63 6b 2d 74 6f 2d | 69 6e 64 65 6e 74 61 74 |back-to-|indentat|
|00003c90| 69 6f 6e 20 6c 6f 6f 6b | 69 6e 67 2d 61 74 20 6b |ion look|ing-at k|
|00003ca0| 73 68 2d 65 6c 73 65 2d | 72 65 20 6b 73 68 2d 6d |sh-else-|re ksh-m|
|00003cb0| 61 74 63 68 2d 69 6e 64 | 65 6e 74 2d 6c 65 76 65 |atch-ind|ent-leve|
|00003cc0| 6c 20 6b 73 68 2d 69 66 | 2d 72 65 20 6b 73 68 2d |l ksh-if|-re ksh-|
|00003cd0| 66 69 2d 72 65 20 6b 73 | 68 2d 65 6c 69 66 2d 72 |fi-re ks|h-elif-r|
|00003ce0| 65 20 6b 73 68 2d 64 6f | 6e 65 2d 72 65 20 6b 73 |e ksh-do|ne-re ks|
|00003cf0| 68 2d 69 74 65 72 61 74 | 69 6f 6e 2d 6b 65 79 77 |h-iterat|ion-keyw|
|00003d00| 6f 72 64 73 2d 72 65 20 | 6b 73 68 2d 65 73 61 63 |ords-re |ksh-esac|
|00003d10| 2d 72 65 20 6b 73 68 2d | 63 61 73 65 2d 72 65 20 |-re ksh-|case-re |
|00003d20| 6b 73 68 2d 62 72 61 63 | 65 2d 65 6e 64 2d 72 65 |ksh-brac|e-end-re|
|00003d30| 20 6b 73 68 2d 69 6d 70 | 6c 69 63 69 74 2d 66 75 | ksh-imp|licit-fu|
|00003d40| 6e 63 2d 72 65 20 6b 73 | 68 2d 65 78 70 6c 69 63 |nc-re ks|h-explic|
|00003d50| 69 74 2d 66 75 6e 63 2d | 72 65 20 6b 73 68 2d 66 |it-func-|re ksh-f|
|00003d60| 75 6e 63 2d 62 72 61 63 | 65 2d 72 65 5d 20 33 20 |unc-brac|e-re] 3 |
|00003d70| 28 23 24 20 2e 20 31 35 | 30 37 39 29 20 6e 69 6c |(#$ . 15|079) nil|
|00003d80| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 6b 73 |]).(defa|lias 'ks|
|00003d90| 68 2d 73 65 61 72 63 68 | 2d 62 61 63 6b 77 61 72 |h-search|-backwar|
|00003da0| 64 2d 73 65 78 70 20 23 | 5b 28 73 65 78 70 2d 72 |d-sexp #|[(sexp-r|
|00003db0| 65 20 66 65 6e 63 65 2d | 70 6f 73 74 29 20 22 60 |e fence-|post) "`|
|00003dc0| c0 19 1a 09 ac 84 c3 c4 | 21 88 60 0d 56 ab ac 09 |........|!.`.V...|
|00003dd0| ac a9 c6 0e 07 21 ab 6b | 8a 60 1e 08 c9 79 88 ca |.....!.k|.`...y..|
|00003de0| 20 88 cb 0e 07 0e 08 5c | 22 ab 86 60 0e 08 57 ac | ......\|"..`..W.|
|00003df0| 72 0e 08 60 55 ab 82 cc | 11 2a aa 48 60 0d 57 ab |r..`U...|.*.H`.W.|
|00003e00| 86 5c 6e 62 88 c0 aa 81 | cc 2a 87 22 20 5b 6e 69 |.\nb....|.*." [ni|
|00003e10| 6c 20 73 65 6e 74 69 6e | 61 6c 20 6f 6c 64 2d 70 |l sentin|al old-p|
|00003e20| 6e 74 20 62 61 63 6b 77 | 61 72 64 2d 73 65 78 70 |nt backw|ard-sexp|
|00003e30| 20 31 20 66 65 6e 63 65 | 2d 70 6f 73 74 20 6c 6f | 1 fence|-post lo|
|00003e40| 6f 6b 69 6e 67 2d 61 74 | 20 73 65 78 70 2d 72 65 |oking-at| sexp-re|
|00003e50| 20 6b 65 79 2d 66 65 6e | 63 65 20 30 20 62 61 63 | key-fen|ce 0 bac|
|00003e60| 6b 2d 74 6f 2d 69 6e 64 | 65 6e 74 61 74 69 6f 6e |k-to-ind|entation|
|00003e70| 20 6b 73 68 2d 73 65 61 | 72 63 68 2d 66 6f 72 77 | ksh-sea|rch-forw|
|00003e80| 61 72 64 2d 73 65 78 70 | 20 74 5d 20 33 5d 29 0a |ard-sexp| t] 3]).|
|00003e90| 23 40 38 36 20 53 70 65 | 63 69 61 6c 20 69 6e 63 |#@86 Spe|cial inc|
|00003ea0| 61 6e 74 61 74 69 6f 6e | 20 74 6f 20 6d 61 72 63 |antation| to marc|
|00003eb0| 68 20 6f 76 65 72 20 73 | 79 6e 74 61 78 20 65 78 |h over s|yntax ex|
|00003ec0| 70 72 65 73 73 69 6f 6e | 73 20 61 6e 64 0a 61 76 |pression|s and.av|
|00003ed0| 6f 69 64 20 61 6c 6c 20 | 73 6f 72 74 73 20 6f 66 |oid all |sorts of|
|00003ee0| 20 6e 6f 6e 73 65 6e 73 | 65 1f 0a 28 64 65 66 61 | nonsens|e..(defa|
|00003ef0| 6c 69 61 73 20 27 6b 73 | 68 2d 66 6f 72 77 61 72 |lias 'ks|h-forwar|
|00003f00| 64 2d 73 65 78 70 20 23 | 5b 6e 69 6c 20 22 c0 c1 |d-sexp #|[nil "..|
|00003f10| 60 66 7a 5c 22 ab 85 c2 | 7f 88 aa 91 c0 c3 60 66 |`fz\"...|......`f|
|00003f20| 7a 5c 22 ab 85 c2 75 88 | aa 84 c4 c5 21 88 6c ab |z\"...u.|....!.l.|
|00003f30| 83 c2 79 88 c6 c2 77 87 | 22 20 5b 63 68 61 72 2d |..y...w.|" [char-|
|00003f40| 65 71 75 61 6c 20 3f 5c | 3c 20 6e 69 6c 20 3f 5c |equal ?\|< nil ?\|
|00003f50| 2e 20 66 6f 72 77 61 72 | 64 2d 73 65 78 70 20 31 |. forwar|d-sexp 1|
|00003f60| 20 22 29 20 09 22 5d 20 | 33 20 28 23 24 20 2e 20 | ") ."] |3 (#$ . |
|00003f70| 31 36 30 32 31 29 5d 29 | 0a 23 40 31 35 30 20 53 |16021)])|.#@150 S|
|00003f80| 65 61 72 63 68 20 66 6f | 72 20 61 6e 20 73 65 78 |earch fo|r an sex|
|00003f90| 70 2e 20 52 65 74 75 72 | 6e 20 74 20 6f 6e 20 73 |p. Retur|n t on s|
|00003fa0| 75 63 63 65 73 73 20 77 | 69 74 68 20 70 6f 69 6e |uccess w|ith poin|
|00003fb0| 74 20 61 74 20 74 68 65 | 0a 62 65 67 69 6e 6e 69 |t at the|.beginni|
|00003fc0| 6e 67 20 6f 66 20 74 68 | 65 20 73 65 78 70 2e 20 |ng of th|e sexp. |
|00003fd0| 52 65 74 75 72 6e 20 6e | 69 6c 20 6f 6e 20 66 61 |Return n|il on fa|
|00003fe0| 69 6c 75 72 65 20 61 6e | 64 20 72 65 73 74 6f 72 |ilure an|d restor|
|00003ff0| 69 6e 67 20 70 6f 69 6e | 74 0a 74 6f 20 69 74 27 |ing poin|t.to it'|
|00004000| 73 20 6f 72 69 67 69 6e | 61 6c 20 70 6f 73 69 74 |s origin|al posit|
|00004010| 69 6f 6e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |ion..(de|falias '|
|00004020| 6b 73 68 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 |ksh-sear|ch-forwa|
|00004030| 72 64 2d 73 65 78 70 20 | 23 5b 28 73 65 78 70 2d |rd-sexp |#[(sexp-|
|00004040| 72 65 20 66 65 6e 63 65 | 2d 70 6f 73 74 29 20 22 |re fence|-post) "|
|00004050| 60 18 60 09 57 ab 8a c2 | 0b 21 ac 85 c4 20 88 aa |`.`.W...|.!... ..|
|00004060| 71 60 09 56 ab 86 08 62 | 88 c5 aa 81 c6 29 87 22 |q`.V...b|.....)."|
|00004070| 20 5b 6f 6c 64 2d 70 6e | 74 20 66 65 6e 63 65 2d | [old-pn|t fence-|
|00004080| 70 6f 73 74 20 6c 6f 6f | 6b 69 6e 67 2d 61 74 20 |post loo|king-at |
|00004090| 73 65 78 70 2d 72 65 20 | 6b 73 68 2d 66 6f 72 77 |sexp-re |ksh-forw|
|000040a0| 61 72 64 2d 73 65 78 70 | 20 6e 69 6c 20 74 5d 20 |ard-sexp| nil t] |
|000040b0| 32 20 28 23 24 20 2e 20 | 31 36 32 35 35 29 5d 29 |2 (#$ . |16255)])|
|000040c0| 0a 23 40 31 33 33 20 44 | 65 74 65 72 6d 69 6e 65 |.#@133 D|etermine|
|000040d0| 20 68 6f 77 20 6d 75 63 | 68 20 74 6f 20 69 6e 64 | how muc|h to ind|
|000040e0| 65 6e 74 20 74 68 69 73 | 20 73 74 72 75 63 74 75 |ent this| structu|
|000040f0| 72 65 2e 20 52 65 74 75 | 72 6e 20 61 20 6c 69 73 |re. Retu|rn a lis|
|00004100| 74 20 28 6c 65 76 65 6c | 20 6c 69 6e 65 29 20 0a |t (level| line) .|
|00004110| 6f 66 20 74 68 65 20 6d | 61 74 63 68 69 6e 67 20 |of the m|atching |
|00004120| 63 6f 6d 70 6f 75 6e 64 | 20 63 6f 6d 6d 61 6e 64 |compound| command|
|00004130| 20 6f 72 20 6e 69 6c 20 | 69 66 20 6e 6f 20 6d 61 | or nil |if no ma|
|00004140| 74 63 68 20 66 6f 75 6e | 64 2e 1f 0a 28 64 65 66 |tch foun|d...(def|
|00004150| 61 6c 69 61 73 20 27 6b | 73 68 2d 67 65 74 2d 63 |alias 'k|sh-get-c|
|00004160| 6f 6d 70 6f 75 6e 64 2d | 6c 65 76 65 6c 20 23 5b |ompound-|level #[|
|00004170| 28 62 65 67 69 6e 2d 72 | 65 20 65 6e 64 2d 72 65 |(begin-r|e end-re|
|00004180| 20 61 6e 63 68 6f 72 2d | 70 6f 69 6e 74 20 26 6f | anchor-|point &o|
|00004190| 70 74 69 6f 6e 61 6c 20 | 62 61 6c 61 6e 63 65 2d |ptional |balance-|
|000041a0| 6c 69 73 74 29 20 22 c0 | 09 65 5c 22 ab 88 60 65 |list) ".|.e\"..`e|
|000041b0| 59 ab 83 60 aa 81 c2 89 | 1b c2 55 ab 83 c4 aa 85 |Y..`....|..U.....|
|000041c0| 0b 62 88 c5 20 1e 06 c2 | 89 42 1e 07 0b c2 55 3f |.b.. ...|.B....U?|
|000041d0| ad df 0e 08 3c ac 83 c9 | 16 08 0e 07 3a ab b7 0e |....<...|....:...|
|000041e0| 07 41 c2 55 ab b0 ca 0e | 0b 0e 0c 5c 22 ab a8 0e |.A.U....|...\"...|
|000041f0| 0c 60 56 ab a2 60 0e 08 | 73 ac 97 60 0e 08 42 16 |.`V..`..|s..`..B.|
|00004200| 08 0b 62 88 cd 09 0e 0b | 0e 0c 0e 08 24 89 16 07 |..b.....|....$...|
|00004210| aa 4b ce 20 88 aa 44 0e | 07 3a ab 95 0e 07 41 c2 |.K. ..D.|.:....A.|
|00004220| 55 ab 8a 0b 62 88 0e 06 | cf 20 42 aa 85 0e 07 aa |U...b...|. B.....|
|00004230| 81 c9 2b 87 22 20 5b 6b | 73 68 2d 73 65 61 72 63 |..+." [k|sh-searc|
|00004240| 68 2d 62 61 63 6b 77 61 | 72 64 2d 73 65 78 70 20 |h-backwa|rd-sexp |
|00004250| 62 65 67 69 6e 2d 72 65 | 20 30 20 6d 61 74 63 68 |begin-re| 0 match|
|00004260| 2d 70 6f 69 6e 74 20 31 | 20 6b 73 68 2d 63 75 72 |-point 1| ksh-cur|
|00004270| 72 65 6e 74 2d 69 6e 64 | 65 6e 74 61 74 69 6f 6e |rent-ind|entation|
|00004280| 20 6e 65 73 74 2d 63 6f | 6c 75 6d 6e 20 6e 65 73 | nest-co|lumn nes|
|00004290| 74 2d 6c 69 73 74 20 62 | 61 6c 61 6e 63 65 2d 6c |t-list b|alance-l|
|000042a0| 69 73 74 20 6e 69 6c 20 | 6b 73 68 2d 73 65 61 72 |ist nil |ksh-sear|
|000042b0| 63 68 2d 66 6f 72 77 61 | 72 64 2d 73 65 78 70 20 |ch-forwa|rd-sexp |
|000042c0| 65 6e 64 2d 72 65 20 61 | 6e 63 68 6f 72 2d 70 6f |end-re a|nchor-po|
|000042d0| 69 6e 74 20 6b 73 68 2d | 67 65 74 2d 63 6f 6d 70 |int ksh-|get-comp|
|000042e0| 6f 75 6e 64 2d 6c 65 76 | 65 6c 20 6b 73 68 2d 66 |ound-lev|el ksh-f|
|000042f0| 6f 72 77 61 72 64 2d 73 | 65 78 70 20 6b 73 68 2d |orward-s|exp ksh-|
|00004300| 63 75 72 72 65 6e 74 2d | 6c 69 6e 65 5d 20 36 20 |current-|line] 6 |
|00004310| 28 23 24 20 2e 20 31 36 | 35 38 33 29 5d 29 0a 23 |(#$ . 16|583)]).#|
|00004320| 40 33 38 20 46 72 6f 6d | 20 73 74 61 72 74 20 74 |@38 From| start t|
|00004330| 6f 20 65 6e 64 2c 20 69 | 6e 64 65 6e 74 20 65 61 |o end, i|ndent ea|
|00004340| 63 68 20 6c 69 6e 65 2e | 1f 0a 28 64 65 66 61 6c |ch line.|..(defal|
|00004350| 69 61 73 20 27 6b 73 68 | 2d 69 6e 64 65 6e 74 2d |ias 'ksh|-indent-|
|00004360| 72 65 67 69 6f 6e 20 23 | 5b 28 73 74 61 72 74 20 |region #|[(start |
|00004370| 65 6e 64 29 20 22 8a c0 | c1 5c 6e 21 1b 1c 0d 62 |end) "..|.\n!...b|
|00004380| 88 c6 79 88 60 15 c7 0b | 21 0d 56 ab 90 6e ab 83 |..y.`...|!.V..n..|
|00004390| 6c ac 83 c8 20 88 c9 79 | 88 60 15 aa 69 0b c0 89 |l... ..y|.`..i...|
|000043a0| 93 2b 87 22 20 5b 6e 69 | 6c 20 63 6f 70 79 2d 6d |.+." [ni|l copy-m|
|000043b0| 61 72 6b 65 72 20 65 6e | 64 20 65 6e 64 6d 61 72 |arker en|d endmar|
|000043c0| 6b 20 6b 73 68 2d 6d 61 | 74 63 68 2d 61 6e 64 2d |k ksh-ma|tch-and-|
|000043d0| 74 65 6c 6c 20 73 74 61 | 72 74 20 30 20 6d 61 72 |tell sta|rt 0 mar|
|000043e0| 6b 65 72 2d 70 6f 73 69 | 74 69 6f 6e 20 6b 73 68 |ker-posi|tion ksh|
|000043f0| 2d 69 6e 64 65 6e 74 2d | 6c 69 6e 65 20 31 5d 20 |-indent-|line 1] |
|00004400| 33 20 28 23 24 20 2e 20 | 31 37 31 38 38 29 5d 29 |3 (#$ . |17188)])|
|00004410| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6b 73 68 2d |.(defali|as 'ksh-|
|00004420| 61 64 64 74 6f 2d 61 6c | 69 73 74 20 23 5b 28 63 |addto-al|ist #[(c|
|00004430| 6f 6d 70 6c 65 74 69 6f | 6e 20 74 79 70 65 29 20 |ompletio|n type) |
|00004440| 22 c0 09 5c 6e 0b 42 43 | 5c 22 89 11 87 22 20 5b |"..\n.BC|\"..." [|
|00004450| 61 70 70 65 6e 64 20 6b | 73 68 2d 63 6f 6d 70 6c |append k|sh-compl|
|00004460| 65 74 69 6f 6e 2d 6c 69 | 73 74 20 63 6f 6d 70 6c |etion-li|st compl|
|00004470| 65 74 69 6f 6e 20 74 79 | 70 65 5d 20 34 5d 29 0a |etion ty|pe] 4]).|
|00004480| 28 64 65 66 61 6c 69 61 | 73 20 27 6b 73 68 2d 63 |(defalia|s 'ksh-c|
|00004490| 6f 6d 70 6c 65 74 69 6f | 6e 2d 69 6e 69 74 2d 61 |ompletio|n-init-a|
|000044a0| 6e 64 2d 70 69 63 6b 75 | 70 20 23 5b 6e 69 6c 20 |nd-picku|p #[nil |
|000044b0| 22 c0 19 c2 20 88 c3 20 | 29 87 22 20 5b 6e 69 6c |"... .. |)." [nil|
|000044c0| 20 63 61 73 65 2d 66 6f | 6c 64 2d 73 65 61 72 63 | case-fo|ld-searc|
|000044d0| 68 20 6b 73 68 2d 63 6f | 6d 70 6c 65 74 69 6f 6e |h ksh-co|mpletion|
|000044e0| 2d 6c 69 73 74 2d 69 6e | 69 74 20 6b 73 68 2d 70 |-list-in|it ksh-p|
|000044f0| 69 63 6b 75 70 2d 61 6c | 6c 5d 20 31 20 6e 69 6c |ickup-al|l] 1 nil|
|00004500| 20 6e 69 6c 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 | nil]).(|defalias|
|00004510| 20 27 6b 73 68 2d 63 6f | 6d 70 6c 65 74 69 6f 6e | 'ksh-co|mpletion|
|00004520| 2d 6c 69 73 74 2d 69 6e | 69 74 20 23 5b 6e 69 6c |-list-in|it #[nil|
|00004530| 20 22 c0 09 42 c2 09 42 | c3 09 42 c4 09 42 c5 09 | "..B..B|..B..B..|
|00004540| 42 c6 09 42 c7 09 42 c8 | 09 42 c9 09 42 ca 09 42 |B..B..B.|.B..B..B|
|00004550| cb 09 42 cc 09 42 cd 09 | 42 ce 09 42 af 0e 89 16 |..B..B..|B..B....|
|00004560| 0f 87 22 20 5b 22 69 66 | 22 20 6b 73 68 2d 63 6f |.." ["if|" ksh-co|
|00004570| 6d 70 6c 65 74 69 6f 6e | 2d 74 79 70 65 2d 6d 69 |mpletion|-type-mi|
|00004580| 73 63 20 22 77 68 69 6c | 65 22 20 22 75 6e 74 69 |sc "whil|e" "unti|
|00004590| 6c 22 20 22 73 65 6c 65 | 63 74 22 20 22 66 6f 72 |l" "sele|ct" "for|
|000045a0| 22 20 22 63 6f 6e 74 69 | 6e 75 65 22 20 22 66 75 |" "conti|nue" "fu|
|000045b0| 6e 63 74 69 6f 6e 22 20 | 22 66 69 22 20 22 63 61 |nction" |"fi" "ca|
|000045c0| 73 65 22 20 22 65 73 61 | 63 22 20 22 62 72 65 61 |se" "esa|c" "brea|
|000045d0| 6b 22 20 22 65 78 69 74 | 22 20 22 64 6f 6e 65 22 |k" "exit|" "done"|
|000045e0| 20 22 64 6f 22 20 6b 73 | 68 2d 63 6f 6d 70 6c 65 | "do" ks|h-comple|
|000045f0| 74 69 6f 6e 2d 6c 69 73 | 74 5d 20 31 35 20 6e 69 |tion-lis|t] 15 ni|
|00004600| 6c 20 6e 69 6c 5d 29 0a | 28 64 65 66 61 6c 69 61 |l nil]).|(defalia|
|00004610| 73 20 27 6b 73 68 2d 65 | 6f 6c 2d 70 6f 69 6e 74 |s 'ksh-e|ol-point|
|00004620| 20 23 5b 6e 69 6c 20 22 | 8a c0 7f 88 60 29 87 22 | #[nil "|....`)."|
|00004630| 20 5b 6e 69 6c 5d 20 31 | 5d 29 0a 28 64 65 66 61 | [nil] 1|]).(defa|
|00004640| 6c 69 61 73 20 27 6b 73 | 68 2d 62 6f 6c 2d 70 6f |lias 'ks|h-bol-po|
|00004650| 69 6e 74 20 23 5b 6e 69 | 6c 20 22 8a c0 79 88 60 |int #[ni|l "..y.`|
|00004660| 29 87 22 20 5b 30 5d 20 | 31 5d 29 0a 23 40 33 35 |)." [0] |1]).#@35|
|00004670| 20 50 69 63 6b 75 70 20 | 61 6c 6c 20 63 6f 6d 70 | Pickup |all comp|
|00004680| 6c 65 74 69 6f 6e 73 20 | 69 6e 20 62 75 66 66 65 |letions |in buffe|
|00004690| 72 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 6b |r...(def|alias 'k|
|000046a0| 73 68 2d 70 69 63 6b 75 | 70 2d 61 6c 6c 20 23 5b |sh-picku|p-all #[|
|000046b0| 6e 69 6c 20 22 c0 65 64 | c1 23 87 22 20 5b 6b 73 |nil ".ed|.#." [ks|
|000046c0| 68 2d 70 69 63 6b 75 70 | 2d 63 6f 6d 70 6c 65 74 |h-pickup|-complet|
|000046d0| 69 6f 6e 2d 64 72 69 76 | 65 72 20 74 5d 20 34 20 |ion-driv|er t] 4 |
|000046e0| 28 23 24 20 2e 20 31 38 | 30 33 33 29 20 6e 69 6c |(#$ . 18|033) nil|
|000046f0| 5d 29 0a 23 40 34 31 20 | 50 69 63 6b 75 70 20 61 |]).#@41 |Pickup a|
|00004700| 6c 6c 20 63 6f 6d 70 6c | 65 74 69 6f 6e 73 20 69 |ll compl|etions i|
|00004710| 6e 20 63 75 72 72 65 6e | 74 20 6c 69 6e 65 2e 1f |n curren|t line..|
|00004720| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6b 73 68 2d |.(defali|as 'ksh-|
|00004730| 70 69 63 6b 75 70 2d 74 | 68 69 73 2d 6c 69 6e 65 |pickup-t|his-line|
|00004740| 20 23 5b 6e 69 6c 20 22 | c0 c1 20 c2 20 c3 23 87 | #[nil "|.. . .#.|
|00004750| 22 20 5b 6b 73 68 2d 70 | 69 63 6b 75 70 2d 63 6f |" [ksh-p|ickup-co|
|00004760| 6d 70 6c 65 74 69 6f 6e | 2d 64 72 69 76 65 72 20 |mpletion|-driver |
|00004770| 6b 73 68 2d 62 6f 6c 2d | 70 6f 69 6e 74 20 6b 73 |ksh-bol-|point ks|
|00004780| 68 2d 65 6f 6c 2d 70 6f | 69 6e 74 20 6e 69 6c 5d |h-eol-po|int nil]|
|00004790| 20 34 20 28 23 24 20 2e | 20 31 38 31 36 38 29 20 | 4 (#$ .| 18168) |
|000047a0| 6e 69 6c 5d 29 0a 23 40 | 34 33 20 44 72 69 76 65 |nil]).#@|43 Drive|
|000047b0| 72 20 72 6f 75 74 69 6e | 65 20 66 6f 72 20 6b 73 |r routin|e for ks|
|000047c0| 68 2d 70 69 63 6b 75 70 | 2d 63 6f 6d 70 6c 65 74 |h-pickup|-complet|
|000047d0| 69 6f 6e 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |ion...(d|efalias |
|000047e0| 27 6b 73 68 2d 70 69 63 | 6b 75 70 2d 63 6f 6d 70 |'ksh-pic|kup-comp|
|000047f0| 6c 65 74 69 6f 6e 2d 64 | 72 69 76 65 72 20 23 5b |letion-d|river #[|
|00004800| 28 70 6d 69 6e 20 70 6d | 61 78 20 6d 65 73 73 61 |(pmin pm|ax messa|
|00004810| 67 65 29 20 22 08 ab 84 | c0 c1 21 88 c2 0b 0c 0d |ge) "...|..!.....|
|00004820| 0e 06 0e 07 25 1e 08 c2 | 0e 09 0c 0e 5c 6e 0e 06 |....%...|....\n..|
|00004830| 0e 07 25 1e 0b c2 0e 0c | 0e 0d 0e 0e 0e 06 0e 07 |..%.....|........|
|00004840| 25 1e 0f 08 ad 8a c0 d0 | 0e 08 0e 0b 5c 5c 0e 0f |%.......|....\\..|
|00004850| 23 2b 87 22 20 5b 6d 65 | 73 73 61 67 65 20 22 70 |#+." [me|ssage "p|
|00004860| 69 63 6b 75 70 20 63 6f | 6d 70 6c 65 74 69 6f 6e |ickup co|mpletion|
|00004870| 2e 2e 2e 22 20 6b 73 68 | 2d 70 69 63 6b 75 70 2d |..." ksh|-pickup-|
|00004880| 63 6f 6d 70 6c 65 74 69 | 6f 6e 20 6b 73 68 2d 63 |completi|on ksh-c|
|00004890| 6f 6d 70 6c 65 74 69 6f | 6e 2d 72 65 67 65 78 70 |ompletio|n-regexp|
|000048a0| 2d 76 61 72 20 6b 73 68 | 2d 63 6f 6d 70 6c 65 74 |-var ksh|-complet|
|000048b0| 69 6f 6e 2d 74 79 70 65 | 2d 76 61 72 20 6b 73 68 |ion-type|-var ksh|
|000048c0| 2d 63 6f 6d 70 6c 65 74 | 69 6f 6e 2d 6d 61 74 63 |-complet|ion-matc|
|000048d0| 68 2d 76 61 72 20 70 6d | 69 6e 20 70 6d 61 78 20 |h-var pm|in pmax |
|000048e0| 69 31 20 6b 73 68 2d 63 | 6f 6d 70 6c 65 74 69 6f |i1 ksh-c|ompletio|
|000048f0| 6e 2d 72 65 67 65 78 70 | 2d 76 61 72 32 20 6b 73 |n-regexp|-var2 ks|
|00004900| 68 2d 63 6f 6d 70 6c 65 | 74 69 6f 6e 2d 6d 61 74 |h-comple|tion-mat|
|00004910| 63 68 2d 76 61 72 32 20 | 69 32 20 6b 73 68 2d 63 |ch-var2 |i2 ksh-c|
|00004920| 6f 6d 70 6c 65 74 69 6f | 6e 2d 72 65 67 65 78 70 |ompletio|n-regexp|
|00004930| 2d 66 75 6e 63 74 69 6f | 6e 20 6b 73 68 2d 63 6f |-functio|n ksh-co|
|00004940| 6d 70 6c 65 74 69 6f 6e | 2d 74 79 70 65 2d 66 75 |mpletion|-type-fu|
|00004950| 6e 63 74 69 6f 6e 20 6b | 73 68 2d 63 6f 6d 70 6c |nction k|sh-compl|
|00004960| 65 74 69 6f 6e 2d 6d 61 | 74 63 68 2d 66 75 6e 63 |etion-ma|tch-func|
|00004970| 74 69 6f 6e 20 69 33 20 | 22 70 69 63 6b 75 70 20 |tion i3 |"pickup |
|00004980| 25 64 20 76 61 72 69 61 | 62 6c 65 73 20 61 6e 64 |%d varia|bles and|
|00004990| 20 25 64 20 66 75 6e 63 | 74 69 6f 6e 73 2e 22 5d | %d func|tions."]|
|000049a0| 20 36 20 28 23 24 20 2e | 20 31 38 33 34 37 29 5d | 6 (#$ .| 18347)]|
|000049b0| 29 0a 23 40 37 34 20 50 | 69 63 6b 75 70 20 63 6f |).#@74 P|ickup co|
|000049c0| 6d 70 6c 65 74 69 6f 6e | 20 69 6e 20 72 65 67 69 |mpletion| in regi|
|000049d0| 6f 6e 20 61 6e 64 20 61 | 64 64 69 74 20 74 6f 20 |on and a|ddit to |
|000049e0| 74 68 65 20 6c 69 73 74 | 2c 20 69 66 20 6e 6f 74 |the list|, if not|
|000049f0| 20 61 6c 72 65 61 64 79 | 0a 74 68 65 72 65 2e 1f | already|.there..|
|00004a00| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 6b 73 68 2d |.(defali|as 'ksh-|
|00004a10| 70 69 63 6b 75 70 2d 63 | 6f 6d 70 6c 65 74 69 6f |pickup-c|ompletio|
|00004a20| 6e 20 23 5b 28 72 65 67 | 65 78 70 20 74 79 70 65 |n #[(reg|exp type|
|00004a30| 20 6d 61 74 63 68 20 70 | 6d 69 6e 20 70 6d 61 78 | match p|min pmax|
|00004a40| 29 20 22 c0 c1 89 1a 1b | 1c 8a 0d 62 88 c6 0e 07 |) ".....|...b....|
|00004a50| 0e 08 c9 23 ab b2 0e 5c | 6e 94 ab ad 0e 5c 6e 94 |...#...\|n....\n.|
|00004a60| 0e 5c 6e 95 7b 89 13 ab | a2 cb 0b 0e 0c 5c 22 89 |.\n.{...|.....\".|
|00004a70| 12 c1 6b ac 8c 5c 6e c1 | 6b ac 57 0e 0d 5c 6e 41 |..k..\n.|k.W..\nA|
|00004a80| 55 ac 50 0c 54 14 ce 0b | 0e 0d 5c 22 88 aa 45 29 |U.P.T...|..\"..E)|
|00004a90| 0c 2b 87 22 20 5b 30 20 | 6e 69 6c 20 6f 62 6a 20 |.+." [0 |nil obj |
|00004aa0| 6b 77 20 69 20 70 6d 69 | 6e 20 72 65 2d 73 65 61 |kw i pmi|n re-sea|
|00004ab0| 72 63 68 2d 66 6f 72 77 | 61 72 64 20 72 65 67 65 |rch-forw|ard rege|
|00004ac0| 78 70 20 70 6d 61 78 20 | 74 20 6d 61 74 63 68 20 |xp pmax |t match |
|00004ad0| 61 73 73 6f 63 20 6b 73 | 68 2d 63 6f 6d 70 6c 65 |assoc ks|h-comple|
|00004ae0| 74 69 6f 6e 2d 6c 69 73 | 74 20 74 79 70 65 20 6b |tion-lis|t type k|
|00004af0| 73 68 2d 61 64 64 74 6f | 2d 61 6c 69 73 74 5d 20 |sh-addto|-alist] |
|00004b00| 35 20 28 23 24 20 2e 20 | 31 38 38 37 31 29 5d 29 |5 (#$ . |18871)])|
|00004b10| 0a 23 40 32 31 20 50 65 | 72 66 6f 72 6d 20 63 6f |.#@21 Pe|rform co|
|00004b20| 6d 70 6c 65 74 69 6f 6e | 2e 1f 0a 28 64 65 66 61 |mpletion|...(defa|
|00004b30| 6c 69 61 73 20 27 6b 73 | 68 2d 63 6f 6d 70 6c 65 |lias 'ks|h-comple|
|00004b40| 74 65 2d 73 79 6d 62 6f | 6c 20 23 5b 6e 69 6c 20 |te-symbo|l #[nil |
|00004b50| 22 c0 19 60 1a c0 8e 8a | c3 c4 21 88 67 7a c5 55 |"..`....|..!.gz.U|
|00004b60| ab 85 c4 75 88 aa 75 60 | 2a 89 1e 06 5c 6e 7b 1e |...u..u`|*...\n{.|
|00004b70| 07 8a 0e 06 62 88 8a c8 | c4 21 88 c9 ca 21 29 ac |....b...|.!...!).|
|00004b80| 8b 8a c8 cb 21 88 c9 cc | 21 29 ab 83 cd aa a5 8a |....!...|!)......|
|00004b90| c8 c4 21 88 c9 ce 21 29 | ac 96 8a c8 cb 21 88 c9 |..!...!)|.....!..|
|00004ba0| cf 21 29 ac 8b 8a c8 d0 | 21 88 c9 d1 21 29 ab 83 |.!).....|!...!)..|
|00004bb0| d2 aa 81 d3 29 1e 14 d5 | 0e 07 0e 16 0e 14 23 89 |....)...|......#.|
|00004bc0| 1e 17 d8 61 ae c4 0e 17 | ac 87 d9 da 0e 07 5c 22 |...a....|......\"|
|00004bd0| aa b9 0e 07 0e 17 98 ac | 8a 0e 06 5c 6e 7c 88 0e |........|...\n|..|
|00004be0| 17 63 aa a8 db 0e 07 0e | 16 0e 14 23 dc 1e 1d 89 |.c......|...#....|
|00004bf0| 1e 1e ab 93 0e 1d df e0 | 0e 1e 40 5c 22 50 16 1d |........|..@\"P..|
|00004c00| 0e 1e 41 89 16 1e ac 6d | d9 0e 1d 21 2a 2e 06 87 |..A....m|...!*...|
|00004c10| 22 20 5b 6e 69 6c 20 63 | 61 73 65 2d 66 6f 6c 64 |" [nil c|ase-fold|
|00004c20| 2d 73 65 61 72 63 68 20 | 65 6e 64 20 62 61 63 6b |-search |end back|
|00004c30| 77 61 72 64 2d 73 65 78 | 70 20 31 20 3f 5c 27 20 |ward-sex|p 1 ?\' |
|00004c40| 62 65 67 20 70 61 74 74 | 65 72 6e 20 62 61 63 6b |beg patt|ern back|
|00004c50| 77 61 72 64 2d 63 68 61 | 72 20 6c 6f 6f 6b 69 6e |ward-cha|r lookin|
|00004c60| 67 2d 61 74 20 22 60 22 | 20 32 20 22 5c 5c 24 28 |g-at "`"| 2 "\\$(|
|00004c70| 22 20 23 5b 28 73 79 6d | 29 20 22 08 41 09 6b 87 |" #[(sym|) ".A.k.|
|00004c80| 22 20 5b 73 79 6d 20 6b | 73 68 2d 63 6f 6d 70 6c |" [sym k|sh-compl|
|00004c90| 65 74 69 6f 6e 2d 74 79 | 70 65 2d 66 75 6e 63 74 |etion-ty|pe-funct|
|00004ca0| 69 6f 6e 5d 20 32 5d 20 | 22 5c 5c 24 22 20 22 5c |ion] 2] |"\\$" "\|
|00004cb0| 5c 24 7b 22 20 33 20 22 | 5c 5c 24 7b 23 22 20 23 |\${" 3 "|\\${#" #|
|00004cc0| 5b 28 73 79 6d 29 20 22 | 08 41 09 6b 87 22 20 5b |[(sym) "|.A.k." [|
|00004cd0| 73 79 6d 20 6b 73 68 2d | 63 6f 6d 70 6c 65 74 69 |sym ksh-|completi|
|00004ce0| 6f 6e 2d 74 79 70 65 2d | 76 61 72 5d 20 32 5d 20 |on-type-|var] 2] |
|00004cf0| 23 5b 28 73 79 6d 29 20 | 22 c0 87 22 20 5b 74 5d |#[(sym) |".." [t]|
|00004d00| 20 31 5d 20 70 72 65 64 | 69 63 61 74 65 20 74 72 | 1] pred|icate tr|
|00004d10| 79 2d 63 6f 6d 70 6c 65 | 74 69 6f 6e 20 6b 73 68 |y-comple|tion ksh|
|00004d20| 2d 63 6f 6d 70 6c 65 74 | 69 6f 6e 2d 6c 69 73 74 |-complet|ion-list|
|00004d30| 20 63 6f 6d 70 6c 65 74 | 69 6f 6e 20 74 20 6d 65 | complet|ion t me|
|00004d40| 73 73 61 67 65 20 22 43 | 61 6e 27 74 20 66 69 6e |ssage "C|an't fin|
|00004d50| 64 20 63 6f 6d 70 6c 65 | 74 69 6f 6e 20 66 6f 72 |d comple|tion for|
|00004d60| 20 5c 22 25 73 5c 22 22 | 20 61 6c 6c 2d 63 6f 6d | \"%s\""| all-com|
|00004d70| 70 6c 65 74 69 6f 6e 73 | 20 22 22 20 73 74 72 69 |pletions| "" stri|
|00004d80| 6e 67 20 6c 69 73 74 20 | 66 6f 72 6d 61 74 20 22 |ng list |format "|
|00004d90| 25 73 20 22 5d 20 35 20 | 28 23 24 20 2e 20 31 39 |%s "] 5 |(#$ . 19|
|00004da0| 32 32 32 29 20 6e 69 6c | 5d 29 0a 28 70 72 6f 76 |222) nil|]).(prov|
|00004db0| 69 64 65 20 27 6b 73 68 | 2d 6d 6f 64 65 29 0a    |ide 'ksh|-mode). |
+--------+-------------------------+-------------------------+--------+--------+