/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / lucid / lemacs-19.6 / lisp / vm / vm-mark.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 77 7a 40 74 68 61 |piled by| jwz@tha|
|00000020| 6c 69 64 6f 6d 69 64 65 | 20 6f 6e 20 53 75 6e 20 |lidomide| on Sun |
|00000030| 46 65 62 20 31 34 20 32 | 33 3a 31 38 3a 32 35 20 |Feb 14 2|3:18:25 |
|00000040| 31 39 39 33 0a 3b 3b 3b | 20 66 72 6f 6d 20 66 69 |1993.;;;| from fi|
|00000050| 6c 65 20 2f 63 61 64 69 | 6c 6c 61 63 31 2f 63 6f |le /cadi|llac1/co|
|00000060| 64 65 2f 62 75 69 6c 64 | 2f 6c 65 6d 61 63 73 2f |de/build|/lemacs/|
|00000070| 6c 69 73 70 2f 76 6d 2f | 76 6d 2d 6d 61 72 6b 2e |lisp/vm/|vm-mark.|
|00000080| 65 6c 0a 3b 3b 3b 20 65 | 6d 61 63 73 20 76 65 72 |el.;;; e|macs ver|
|00000090| 73 69 6f 6e 20 31 39 2e | 34 2e 31 33 20 4c 75 63 |sion 19.|4.13 Luc|
|000000a0| 69 64 2e 0a 3b 3b 3b 20 | 62 79 74 65 63 6f 6d 70 |id..;;; |bytecomp|
|000000b0| 20 76 65 72 73 69 6f 6e | 20 32 2e 31 30 3b 20 20 | version| 2.10;  |
|000000c0| 31 2d 66 65 62 2d 39 33 | 2e 0a 3b 3b 3b 20 6f 70 |1-feb-93|..;;; op|
|000000d0| 74 69 6d 69 7a 61 74 69 | 6f 6e 20 69 73 20 6f 6e |timizati|on is on|
|000000e0| 2e 0a 3b 3b 3b 20 74 68 | 69 73 20 66 69 6c 65 20 |..;;; th|is file |
|000000f0| 75 73 65 73 20 6f 70 63 | 6f 64 65 73 20 77 68 69 |uses opc|odes whi|
|00000100| 63 68 20 64 6f 20 6e 6f | 74 20 65 78 69 73 74 20 |ch do no|t exist |
|00000110| 69 6e 20 45 6d 61 63 73 | 31 38 2e 0a 0a 28 69 66 |in Emacs|18...(if|
|00000120| 20 28 61 6e 64 20 28 62 | 6f 75 6e 64 70 20 27 65 | (and (b|oundp 'e|
|00000130| 6d 61 63 73 2d 76 65 72 | 73 69 6f 6e 29 0a 09 20 |macs-ver|sion).. |
|00000140| 28 6f 72 20 28 61 6e 64 | 20 28 62 6f 75 6e 64 70 |(or (and| (boundp|
|00000150| 20 27 65 70 6f 63 68 3a | 3a 76 65 72 73 69 6f 6e | 'epoch:|:version|
|00000160| 29 20 65 70 6f 63 68 3a | 3a 76 65 72 73 69 6f 6e |) epoch:|:version|
|00000170| 29 0a 09 20 20 20 20 20 | 28 73 74 72 69 6e 67 2d |)..     |(string-|
|00000180| 6c 65 73 73 70 20 65 6d | 61 63 73 2d 76 65 72 73 |lessp em|acs-vers|
|00000190| 69 6f 6e 20 22 31 39 22 | 29 29 29 0a 20 20 20 20 |ion "19"|))).    |
|000001a0| 28 65 72 72 6f 72 20 22 | 54 68 69 73 20 66 69 6c |(error "|This fil|
|000001b0| 65 20 77 61 73 20 63 6f | 6d 70 69 6c 65 64 20 66 |e was co|mpiled f|
|000001c0| 6f 72 20 45 6d 61 63 73 | 31 39 2e 22 29 29 0a 0a |or Emacs|19."))..|
|000001d0| 28 66 73 65 74 20 27 76 | 6d 2d 63 6c 65 61 72 2d |(fset 'v|m-clear-|
|000001e0| 61 6c 6c 2d 6d 61 72 6b | 73 20 23 5b 6e 69 6c 20 |all-mark|s #[nil |
|000001f0| 22 08 ab 88 c1 08 21 ab | 83 08 71 88 c2 0b 21 ab |".....!.|..q...!.|
|00000200| 87 c1 0b 21 ac 82 c4 13 | c5 20 88 0e 06 89 1e 07 |...!....|. ......|
|00000210| ab 97 0e 07 40 c8 48 c8 | c4 49 88 c9 0e 07 40 21 |....@.H.|.I....@!|
|00000220| 88 0e 07 41 89 16 07 ac | 69 29 ca 20 87 22 20 5b |...A....|i). ." [|
|00000230| 76 6d 2d 6d 61 69 6c 2d | 62 75 66 66 65 72 20 62 |vm-mail-|buffer b|
|00000240| 75 66 66 65 72 2d 6e 61 | 6d 65 20 62 75 66 66 65 |uffer-na|me buffe|
|00000250| 72 70 20 76 6d 2d 73 75 | 6d 6d 61 72 79 2d 62 75 |rp vm-su|mmary-bu|
|00000260| 66 66 65 72 20 6e 69 6c | 20 76 6d 2d 65 72 72 6f |ffer nil| vm-erro|
|00000270| 72 2d 69 66 2d 66 6f 6c | 64 65 72 2d 65 6d 70 74 |r-if-fol|der-empt|
|00000280| 79 20 76 6d 2d 6d 65 73 | 73 61 67 65 2d 6c 69 73 |y vm-mes|sage-lis|
|00000290| 74 20 6d 70 20 31 20 76 | 6d 2d 6d 61 72 6b 2d 66 |t mp 1 v|m-mark-f|
|000002a0| 6f 72 2d 64 69 73 70 6c | 61 79 2d 75 70 64 61 74 |or-displ|ay-updat|
|000002b0| 65 20 76 6d 2d 75 70 64 | 61 74 65 2d 73 75 6d 6d |e vm-upd|ate-summ|
|000002c0| 61 72 79 2d 61 6e 64 2d | 6d 6f 64 65 2d 6c 69 6e |ary-and-|mode-lin|
|000002d0| 65 5d 20 34 20 22 5c 0a | 52 65 6d 6f 76 65 73 20 |e] 4 "\.|Removes |
|000002e0| 61 6c 6c 20 6d 65 73 73 | 61 67 65 20 6d 61 72 6b |all mess|age mark|
|000002f0| 73 20 69 6e 20 74 68 65 | 20 63 75 72 72 65 6e 74 |s in the| current|
|00000300| 20 66 6f 6c 64 65 72 2e | 22 20 6e 69 6c 5d 29 0a | folder.|" nil]).|
|00000310| 28 66 73 65 74 20 27 76 | 6d 2d 6d 61 72 6b 2d 61 |(fset 'v|m-mark-a|
|00000320| 6c 6c 2d 6d 65 73 73 61 | 67 65 73 20 23 5b 6e 69 |ll-messa|ges #[ni|
|00000330| 6c 20 22 08 ab 88 c1 08 | 21 ab 83 08 71 88 c2 0b |l ".....|!...q...|
|00000340| 21 ab 87 c1 0b 21 ac 82 | c4 13 c5 20 88 0e 06 89 |!....!..|... ....|
|00000350| 1e 07 ab 97 0e 07 40 c8 | 48 c8 c9 49 88 ca 0e 07 |......@.|H..I....|
|00000360| 40 21 88 0e 07 41 89 16 | 07 ac 69 29 cb 20 87 22 |@!...A..|..i). ."|
|00000370| 20 5b 76 6d 2d 6d 61 69 | 6c 2d 62 75 66 66 65 72 | [vm-mai|l-buffer|
|00000380| 20 62 75 66 66 65 72 2d | 6e 61 6d 65 20 62 75 66 | buffer-|name buf|
|00000390| 66 65 72 70 20 76 6d 2d | 73 75 6d 6d 61 72 79 2d |ferp vm-|summary-|
|000003a0| 62 75 66 66 65 72 20 6e | 69 6c 20 76 6d 2d 65 72 |buffer n|il vm-er|
|000003b0| 72 6f 72 2d 69 66 2d 66 | 6f 6c 64 65 72 2d 65 6d |ror-if-f|older-em|
|000003c0| 70 74 79 20 76 6d 2d 6d | 65 73 73 61 67 65 2d 6c |pty vm-m|essage-l|
|000003d0| 69 73 74 20 6d 70 20 31 | 20 74 20 76 6d 2d 6d 61 |ist mp 1| t vm-ma|
|000003e0| 72 6b 2d 66 6f 72 2d 64 | 69 73 70 6c 61 79 2d 75 |rk-for-d|isplay-u|
|000003f0| 70 64 61 74 65 20 76 6d | 2d 75 70 64 61 74 65 2d |pdate vm|-update-|
|00000400| 73 75 6d 6d 61 72 79 2d | 61 6e 64 2d 6d 6f 64 65 |summary-|and-mode|
|00000410| 2d 6c 69 6e 65 5d 20 34 | 20 22 5c 0a 4d 61 72 6b |-line] 4| "\.Mark|
|00000420| 20 61 6c 6c 20 6d 65 73 | 73 61 67 65 73 20 69 6e | all mes|sages in|
|00000430| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 66 6f 6c | the cur|rent fol|
|00000440| 64 65 72 2e 22 20 6e 69 | 6c 5d 29 0a 28 66 73 65 |der." ni|l]).(fse|
|00000450| 74 20 27 76 6d 2d 6d 61 | 72 6b 2d 6d 65 73 73 61 |t 'vm-ma|rk-messa|
|00000460| 67 65 20 23 5b 28 63 6f | 75 6e 74 29 20 22 74 ab |ge #[(co|unt) "t.|
|00000470| 83 c0 20 88 09 ab 88 c2 | 09 21 ab 83 09 71 88 c3 |.. .....|.!...q..|
|00000480| 0c 21 ab 87 c2 0c 21 ac | 82 c5 14 c6 20 88 0e 07 |.!....!.|.... ...|
|00000490| c8 3d ac 85 c9 0e 5c 6e | 21 88 0e 5c 6e cb 57 ab |.=....\n|!..\n.W.|
|000004a0| 83 cc aa 81 cd ce 0e 5c | 6e 21 0e 0f 89 1e 0f 1e |.......\|n!......|
|000004b0| 10 1e 5c 6e 1e 11 0e 5c | 6e cb 55 ac a9 0e 0f 40 |..\n...\|n.U....@|
|000004c0| d2 48 d2 48 ac 8f 0e 0f | 40 d2 48 d2 c8 49 88 d3 |.H.H....|@.H..I..|
|000004d0| 0e 0f 40 21 88 0e 5c 6e | 53 89 16 5c 6e cb 55 ac |..@!..\n|S..\n.U.|
|000004e0| 58 d4 0e 11 21 88 aa 51 | 2c d5 20 87 22 20 5b 76 |X...!..Q|,. ." [v|
|000004f0| 6d 2d 66 6f 6c 6c 6f 77 | 2d 73 75 6d 6d 61 72 79 |m-follow|-summary|
|00000500| 2d 63 75 72 73 6f 72 20 | 76 6d 2d 6d 61 69 6c 2d |-cursor |vm-mail-|
|00000510| 62 75 66 66 65 72 20 62 | 75 66 66 65 72 2d 6e 61 |buffer b|uffer-na|
|00000520| 6d 65 20 62 75 66 66 65 | 72 70 20 76 6d 2d 73 75 |me buffe|rp vm-su|
|00000530| 6d 6d 61 72 79 2d 62 75 | 66 66 65 72 20 6e 69 6c |mmary-bu|ffer nil|
|00000540| 20 76 6d 2d 65 72 72 6f | 72 2d 69 66 2d 66 6f 6c | vm-erro|r-if-fol|
|00000550| 64 65 72 2d 65 6d 70 74 | 79 20 76 6d 2d 63 69 72 |der-empt|y vm-cir|
|00000560| 63 75 6c 61 72 2d 66 6f | 6c 64 65 72 73 20 74 20 |cular-fo|lders t |
|00000570| 76 6d 2d 63 68 65 63 6b | 2d 63 6f 75 6e 74 20 63 |vm-check|-count c|
|00000580| 6f 75 6e 74 20 30 20 62 | 61 63 6b 77 61 72 64 20 |ount 0 b|ackward |
|00000590| 66 6f 72 77 61 72 64 20 | 76 6d 2d 61 62 73 20 76 |forward |vm-abs v|
|000005a0| 6d 2d 6d 65 73 73 61 67 | 65 2d 70 6f 69 6e 74 65 |m-messag|e-pointe|
|000005b0| 72 20 6f 6c 64 6d 70 20 | 64 69 72 65 63 74 69 6f |r oldmp |directio|
|000005c0| 6e 20 31 20 76 6d 2d 6d | 61 72 6b 2d 66 6f 72 2d |n 1 vm-m|ark-for-|
|000005d0| 64 69 73 70 6c 61 79 2d | 75 70 64 61 74 65 20 76 |display-|update v|
|000005e0| 6d 2d 6d 6f 76 65 2d 6d | 65 73 73 61 67 65 2d 70 |m-move-m|essage-p|
|000005f0| 6f 69 6e 74 65 72 20 76 | 6d 2d 75 70 64 61 74 65 |ointer v|m-update|
|00000600| 2d 73 75 6d 6d 61 72 79 | 2d 61 6e 64 2d 6d 6f 64 |-summary|-and-mod|
|00000610| 65 2d 6c 69 6e 65 5d 20 | 35 20 22 5c 0a 4d 61 72 |e-line] |5 "\.Mar|
|00000620| 6b 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 6d 65 |k the cu|rrent me|
|00000630| 73 73 61 67 65 2e 0a 4e | 75 6d 65 72 69 63 20 70 |ssage..N|umeric p|
|00000640| 72 65 66 69 78 20 61 72 | 67 75 6d 65 6e 74 20 4e |refix ar|gument N|
|00000650| 20 6d 65 61 6e 73 20 6d | 61 72 6b 20 74 68 65 20 | means m|ark the |
|00000660| 63 75 72 72 65 6e 74 20 | 6d 65 73 73 61 67 65 20 |current |message |
|00000670| 61 6e 64 20 74 68 65 20 | 6e 65 78 74 0a 4e 2d 31 |and the |next.N-1|
|00000680| 20 6d 65 73 73 61 67 65 | 73 2e 20 20 41 20 6e 65 | message|s.  A ne|
|00000690| 67 61 74 69 76 65 20 4e | 20 6d 65 61 6e 73 20 6d |gative N| means m|
|000006a0| 61 72 6b 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |ark the |current |
|000006b0| 6d 65 73 73 61 67 65 20 | 61 6e 64 20 74 68 65 0a |message |and the.|
|000006c0| 70 72 65 76 69 6f 75 73 | 20 4e 2d 31 20 6d 65 73 |previous| N-1 mes|
|000006d0| 73 61 67 65 73 2e 22 20 | 22 70 22 5d 29 0a 28 66 |sages." |"p"]).(f|
|000006e0| 73 65 74 20 27 76 6d 2d | 75 6e 6d 61 72 6b 2d 6d |set 'vm-|unmark-m|
|000006f0| 65 73 73 61 67 65 20 23 | 5b 28 63 6f 75 6e 74 29 |essage #|[(count)|
|00000700| 20 22 74 ab 83 c0 20 88 | 09 ab 88 c2 09 21 ab 83 | "t... .|.....!..|
|00000710| 09 71 88 c3 0c 21 ab 87 | c2 0c 21 ac 82 c5 14 c6 |.q...!..|..!.....|
|00000720| 20 88 0e 07 c8 3d ac 85 | c9 0e 5c 6e 21 88 0e 5c | ....=..|..\n!..\|
|00000730| 6e cb 57 ab 83 cc aa 81 | cd ce 0e 5c 6e 21 0e 0f |n.W.....|...\n!..|
|00000740| 89 1e 0f 1e 10 1e 5c 6e | 1e 11 0e 5c 6e cb 55 ac |......\n|...\n.U.|
|00000750| a9 0e 0f 40 d2 48 d2 48 | ab 8f 0e 0f 40 d2 48 d2 |...@.H.H|....@.H.|
|00000760| c5 49 88 d3 0e 0f 40 21 | 88 0e 5c 6e 53 89 16 5c |.I....@!|..\nS..\|
|00000770| 6e cb 55 ac 58 d4 0e 11 | 21 88 aa 51 2c d5 20 87 |n.U.X...|!..Q,. .|
|00000780| 22 20 5b 76 6d 2d 66 6f | 6c 6c 6f 77 2d 73 75 6d |" [vm-fo|llow-sum|
|00000790| 6d 61 72 79 2d 63 75 72 | 73 6f 72 20 76 6d 2d 6d |mary-cur|sor vm-m|
|000007a0| 61 69 6c 2d 62 75 66 66 | 65 72 20 62 75 66 66 65 |ail-buff|er buffe|
|000007b0| 72 2d 6e 61 6d 65 20 62 | 75 66 66 65 72 70 20 76 |r-name b|ufferp v|
|000007c0| 6d 2d 73 75 6d 6d 61 72 | 79 2d 62 75 66 66 65 72 |m-summar|y-buffer|
|000007d0| 20 6e 69 6c 20 76 6d 2d | 65 72 72 6f 72 2d 69 66 | nil vm-|error-if|
|000007e0| 2d 66 6f 6c 64 65 72 2d | 65 6d 70 74 79 20 76 6d |-folder-|empty vm|
|000007f0| 2d 63 69 72 63 75 6c 61 | 72 2d 66 6f 6c 64 65 72 |-circula|r-folder|
|00000800| 73 20 74 20 76 6d 2d 63 | 68 65 63 6b 2d 63 6f 75 |s t vm-c|heck-cou|
|00000810| 6e 74 20 63 6f 75 6e 74 | 20 30 20 62 61 63 6b 77 |nt count| 0 backw|
|00000820| 61 72 64 20 66 6f 72 77 | 61 72 64 20 76 6d 2d 61 |ard forw|ard vm-a|
|00000830| 62 73 20 76 6d 2d 6d 65 | 73 73 61 67 65 2d 70 6f |bs vm-me|ssage-po|
|00000840| 69 6e 74 65 72 20 6f 6c | 64 6d 70 20 64 69 72 65 |inter ol|dmp dire|
|00000850| 63 74 69 6f 6e 20 31 20 | 76 6d 2d 6d 61 72 6b 2d |ction 1 |vm-mark-|
|00000860| 66 6f 72 2d 64 69 73 70 | 6c 61 79 2d 75 70 64 61 |for-disp|lay-upda|
|00000870| 74 65 20 76 6d 2d 6d 6f | 76 65 2d 6d 65 73 73 61 |te vm-mo|ve-messa|
|00000880| 67 65 2d 70 6f 69 6e 74 | 65 72 20 76 6d 2d 75 70 |ge-point|er vm-up|
|00000890| 64 61 74 65 2d 73 75 6d | 6d 61 72 79 2d 61 6e 64 |date-sum|mary-and|
|000008a0| 2d 6d 6f 64 65 2d 6c 69 | 6e 65 5d 20 35 20 22 5c |-mode-li|ne] 5 "\|
|000008b0| 0a 52 65 6d 6f 76 65 20 | 74 68 65 20 6d 61 72 6b |.Remove |the mark|
|000008c0| 20 66 72 6f 6d 20 74 68 | 65 20 63 75 72 72 65 6e | from th|e curren|
|000008d0| 74 20 6d 65 73 73 61 67 | 65 2e 0a 4e 75 6d 65 72 |t messag|e..Numer|
|000008e0| 69 63 20 70 72 65 66 69 | 78 20 61 72 67 75 6d 65 |ic prefi|x argume|
|000008f0| 6e 74 20 4e 20 6d 65 61 | 6e 73 20 75 6e 6d 61 72 |nt N mea|ns unmar|
|00000900| 6b 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 6d 65 |k the cu|rrent me|
|00000910| 73 73 61 67 65 20 61 6e | 64 20 74 68 65 20 6e 65 |ssage an|d the ne|
|00000920| 78 74 0a 4e 2d 31 20 6d | 65 73 73 61 67 65 73 2e |xt.N-1 m|essages.|
|00000930| 20 20 41 20 6e 65 67 61 | 74 69 76 65 20 4e 20 6d |  A nega|tive N m|
|00000940| 65 61 6e 73 20 75 6e 6d | 61 72 6b 20 74 68 65 20 |eans unm|ark the |
|00000950| 63 75 72 72 65 6e 74 20 | 6d 65 73 73 61 67 65 20 |current |message |
|00000960| 61 6e 64 20 74 68 65 0a | 70 72 65 76 69 6f 75 73 |and the.|previous|
|00000970| 20 4e 2d 31 20 6d 65 73 | 73 61 67 65 73 2e 22 20 | N-1 mes|sages." |
|00000980| 22 70 22 5d 29 0a 28 66 | 73 65 74 20 27 76 6d 2d |"p"]).(f|set 'vm-|
|00000990| 6e 65 78 74 2d 63 6f 6d | 6d 61 6e 64 2d 75 73 65 |next-com|mand-use|
|000009a0| 73 2d 6d 61 72 6b 73 20 | 23 5b 6e 69 6c 20 22 c0 |s-marks |#[nil ".|
|000009b0| c1 21 88 c2 c3 21 ab 87 | c3 c4 20 21 89 15 87 c6 |.!...!..|.. !....|
|000009c0| 20 89 16 07 87 22 20 5b | 6d 65 73 73 61 67 65 20 | ...." [|message |
|000009d0| 22 4e 65 78 74 20 63 6f | 6d 6d 61 6e 64 20 75 73 |"Next co|mmand us|
|000009e0| 65 73 20 6d 61 72 6b 73 | 2e 2e 2e 22 20 66 62 6f |es marks|..." fbo|
|000009f0| 75 6e 64 70 20 6e 65 78 | 74 2d 63 6f 6d 6d 61 6e |undp nex|t-comman|
|00000a00| 64 2d 65 76 65 6e 74 20 | 61 6c 6c 6f 63 61 74 65 |d-event |allocate|
|00000a10| 2d 65 76 65 6e 74 20 75 | 6e 72 65 61 64 2d 63 6f |-event u|nread-co|
|00000a20| 6d 6d 61 6e 64 2d 65 76 | 65 6e 74 20 72 65 61 64 |mmand-ev|ent read|
|00000a30| 2d 63 68 61 72 20 75 6e | 72 65 61 64 2d 63 6f 6d |-char un|read-com|
|00000a40| 6d 61 6e 64 2d 63 68 61 | 72 5d 20 32 20 22 5c 0a |mand-cha|r] 2 "\.|
|00000a50| 44 6f 65 73 20 6e 6f 74 | 68 69 6e 67 20 65 78 63 |Does not|hing exc|
|00000a60| 65 70 74 20 69 6e 73 75 | 72 65 20 74 68 61 74 20 |ept insu|re that |
|00000a70| 74 68 65 20 6e 65 78 74 | 20 56 4d 20 63 6f 6d 6d |the next| VM comm|
|00000a80| 61 6e 64 20 77 69 6c 6c | 20 6f 70 65 72 61 74 65 |and will| operate|
|00000a90| 20 6f 6e 6c 79 0a 6f 6e | 20 74 68 65 20 6d 61 72 | only.on| the mar|
|00000aa0| 6b 65 64 20 6d 65 73 73 | 61 67 65 73 20 69 6e 20 |ked mess|ages in |
|00000ab0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 66 6f 6c 64 |the curr|ent fold|
|00000ac0| 65 72 2e 22 20 6e 69 6c | 5d 29 0a 28 62 79 74 65 |er." nil|]).(byte|
|00000ad0| 2d 63 6f 64 65 20 22 c0 | c1 4d 88 c2 c3 4d 87 22 |-code ".|.M...M."|
|00000ae0| 20 5b 76 6d 2d 6d 61 72 | 6b 65 64 2d 6d 65 73 73 | [vm-mar|ked-mess|
|00000af0| 61 67 65 73 20 23 5b 6e | 69 6c 20 22 c0 09 1a 1b |ages #[n|il "....|
|00000b00| 5c 6e ab 93 5c 6e 40 c4 | 48 c4 48 ab 85 5c 6e 40 |\n..\n@.|H.H..\n@|
|00000b10| 0b 42 13 5c 6e 41 89 12 | ac 6d 0b 9f 2a 87 22 20 |.B.\nA..|.m..*." |
|00000b20| 5b 6e 69 6c 20 76 6d 2d | 6d 65 73 73 61 67 65 2d |[nil vm-|message-|
|00000b30| 6c 69 73 74 20 6d 70 20 | 6c 69 73 74 20 31 5d 20 |list mp |list 1] |
|00000b40| 33 5d 20 76 6d 2d 6d 61 | 72 6b 2d 68 65 6c 70 20 |3] vm-ma|rk-help |
|00000b50| 23 5b 6e 69 6c 20 22 c0 | c1 21 87 22 20 5b 6d 65 |#[nil ".|.!." [me|
|00000b60| 73 73 61 67 65 20 22 4d | 4d 20 3d 20 6d 61 72 6b |ssage "M|M = mark|
|00000b70| 2c 20 4d 55 20 3d 20 75 | 6e 6d 61 72 6b 2c 20 4d |, MU = u|nmark, M|
|00000b80| 6d 20 3d 20 6d 61 72 6b | 20 61 6c 6c 2c 20 4d 75 |m = mark| all, Mu|
|00000b90| 20 3d 20 75 6e 6d 61 72 | 6b 20 61 6c 6c 2c 20 4d | = unmar|k all, M|
|00000ba0| 4e 20 2d 20 75 73 65 20 | 6d 61 72 6b 73 22 5d 20 |N - use |marks"] |
|00000bb0| 32 20 6e 69 6c 20 6e 69 | 6c 5d 5d 20 32 29 0a    |2 nil ni|l]] 2). |
+--------+-------------------------+-------------------------+--------+--------+