ofs | hex dump | ascii |
---|
0000 | 0a 28 64 65 66 76 61 72 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c | .(defvar.prolog-mode-syntax-tabl |
0020 | 65 20 6e 69 6c 29 0a 0a 28 64 65 66 76 61 72 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 61 62 62 72 | e.nil)..(defvar.prolog-mode-abbr |
0040 | 65 76 2d 74 61 62 6c 65 20 6e 69 6c 29 0a 0a 28 64 65 66 76 61 72 20 70 72 6f 6c 6f 67 2d 6d 6f | ev-table.nil)..(defvar.prolog-mo |
0060 | 64 65 2d 6d 61 70 20 6e 69 6c 29 0a 0a 28 64 65 66 76 61 72 20 70 72 6f 6c 6f 67 2d 63 6f 6e 73 | de-map.nil)..(defvar.prolog-cons |
0080 | 75 6c 74 2d 73 74 72 69 6e 67 20 22 72 65 63 6f 6e 73 75 6c 74 28 75 73 65 72 29 2e 0a 22 20 22 | ult-string."reconsult(user).."." |
00a0 | 2a 28 52 65 29 43 6f 6e 73 75 6c 74 20 6d 6f 64 65 20 28 66 6f 72 20 43 2d 50 72 6f 6c 6f 67 20 | *(Re)Consult.mode.(for.C-Prolog. |
00c0 | 61 6e 64 20 51 75 69 6e 74 75 73 20 50 72 6f 6c 6f 67 29 2e 20 22 29 0a 0a 28 64 65 66 76 61 72 | and.Quintus.Prolog)..")..(defvar |
00e0 | 20 70 72 6f 6c 6f 67 2d 63 6f 6d 70 69 6c 65 2d 73 74 72 69 6e 67 20 22 63 6f 6d 70 69 6c 65 28 | .prolog-compile-string."compile( |
0100 | 75 73 65 72 29 2e 0a 22 20 22 2a 43 6f 6d 70 69 6c 65 20 6d 6f 64 65 20 28 66 6f 72 20 51 75 69 | user).."."*Compile.mode.(for.Qui |
0120 | 6e 74 75 73 20 50 72 6f 6c 6f 67 29 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 70 72 6f 6c 6f 67 2d | ntus.Prolog).")..(defvar.prolog- |
0140 | 65 6f 66 2d 73 74 72 69 6e 67 20 22 65 6e 64 5f 6f 66 5f 66 69 6c 65 2e 0a 22 20 22 2a 53 74 72 | eof-string."end_of_file.."."*Str |
0160 | 69 6e 67 20 74 68 61 74 20 72 65 70 72 65 73 65 6e 74 73 20 65 6e 64 20 6f 66 20 66 69 6c 65 20 | ing.that.represents.end.of.file. |
0180 | 66 6f 72 20 70 72 6f 6c 6f 67 2e 0a 6e 69 6c 20 6d 65 61 6e 73 20 73 65 6e 64 20 61 63 74 75 61 | for.prolog..nil.means.send.actua |
01a0 | 6c 20 6f 70 65 72 61 69 6e 67 20 73 79 73 74 65 6d 20 65 6e 64 20 6f 66 20 66 69 6c 65 2e 22 29 | l.operaing.system.end.of.file.") |
01c0 | 0a 0a 28 64 65 66 76 61 72 20 70 72 6f 6c 6f 67 2d 69 6e 64 65 6e 74 2d 77 69 64 74 68 20 34 29 | ..(defvar.prolog-indent-width.4) |
01e0 | 0a 0a 28 69 66 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 6e | ..(if.prolog-mode-syntax-table.n |
0200 | 69 6c 20 28 6c 65 74 20 28 28 74 61 62 6c 65 20 28 6d 61 6b 65 2d 73 79 6e 74 61 78 2d 74 61 62 | il.(let.((table.(make-syntax-tab |
0220 | 6c 65 29 29 29 20 28 6d 6f 64 69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 20 39 35 20 22 77 | le))).(modify-syntax-entry.95."w |
0240 | 22 20 74 61 62 6c 65 29 20 28 6d 6f 64 69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 20 39 32 | ".table).(modify-syntax-entry.92 |
0260 | 20 22 5c 5c 22 20 74 61 62 6c 65 29 20 28 6d 6f 64 69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 | ."\\".table).(modify-syntax-entr |
0280 | 79 20 34 37 20 22 2e 22 20 74 61 62 6c 65 29 20 28 6d 6f 64 69 66 79 2d 73 79 6e 74 61 78 2d 65 | y.47.".".table).(modify-syntax-e |
02a0 | 6e 74 72 79 20 34 32 20 22 2e 22 20 74 61 62 6c 65 29 20 28 6d 6f 64 69 66 79 2d 73 79 6e 74 61 | ntry.42.".".table).(modify-synta |
02c0 | 78 2d 65 6e 74 72 79 20 34 33 20 22 2e 22 20 74 61 62 6c 65 29 20 28 6d 6f 64 69 66 79 2d 73 79 | x-entry.43.".".table).(modify-sy |
02e0 | 6e 74 61 78 2d 65 6e 74 72 79 20 34 35 20 22 2e 22 20 74 61 62 6c 65 29 20 28 6d 6f 64 69 66 79 | ntax-entry.45.".".table).(modify |
0300 | 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 20 36 31 20 22 2e 22 20 74 61 62 6c 65 29 20 28 6d 6f 64 | -syntax-entry.61.".".table).(mod |
0320 | 69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 20 33 37 20 22 3c 22 20 74 61 62 6c 65 29 20 28 | ify-syntax-entry.37."<".table).( |
0340 | 6d 6f 64 69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 20 36 30 20 22 2e 22 20 74 61 62 6c 65 | modify-syntax-entry.60.".".table |
0360 | 29 20 28 6d 6f 64 69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 20 36 32 20 22 2e 22 20 74 61 | ).(modify-syntax-entry.62.".".ta |
0380 | 62 6c 65 29 20 28 6d 6f 64 69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 20 33 39 20 22 5c 22 | ble).(modify-syntax-entry.39."\" |
03a0 | 22 20 74 61 62 6c 65 29 20 28 73 65 74 71 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 73 79 6e 74 61 | ".table).(setq.prolog-mode-synta |
03c0 | 78 2d 74 61 62 6c 65 20 74 61 62 6c 65 29 29 29 0a 0a 28 64 65 66 69 6e 65 2d 61 62 62 72 65 76 | x-table.table)))..(define-abbrev |
03e0 | 2d 74 61 62 6c 65 20 28 71 75 6f 74 65 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 61 62 62 72 65 76 | -table.(quote.prolog-mode-abbrev |
0400 | 2d 74 61 62 6c 65 29 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 | -table).nil)..(defun.prolog-mode |
0420 | 2d 76 61 72 69 61 62 6c 65 73 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 cd 08 21 88 0a | -variables.nil.(byte-code."..!.. |
0440 | 89 11 88 ce c3 21 88 cf 0c 50 89 13 88 ce c5 21 88 0b 89 15 88 ce c6 21 88 c7 89 16 06 88 ce c8 | .....!...P.....!.......!........ |
0460 | 21 88 d0 89 16 08 88 ce c9 21 88 d1 89 16 09 88 ce ca 21 88 d2 89 16 0a 88 ce cb 21 88 d3 89 16 | !........!........!........!.... |
0480 | 0b 88 ce cc 21 88 d4 89 16 0c 87 22 20 5b 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 | ....!......".[prolog-mode-syntax |
04a0 | 2d 74 61 62 6c 65 20 6c 6f 63 61 6c 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 20 70 72 6f 6c 6f 67 | -table.local-abbrev-table.prolog |
04c0 | 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 20 70 61 72 61 67 72 61 70 68 2d 73 74 61 | -mode-abbrev-table.paragraph-sta |
04e0 | 72 74 20 70 61 67 65 2d 64 65 6c 69 6d 69 74 65 72 20 70 61 72 61 67 72 61 70 68 2d 73 65 70 61 | rt.page-delimiter.paragraph-sepa |
0500 | 72 61 74 65 20 70 61 72 61 67 72 61 70 68 2d 69 67 6e 6f 72 65 2d 66 69 6c 6c 2d 70 72 65 66 69 | rate.paragraph-ignore-fill-prefi |
0520 | 78 20 74 20 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6f 6d 6d 65 6e 74 | x.t.indent-line-function.comment |
0540 | 2d 73 74 61 72 74 20 63 6f 6d 6d 65 6e 74 2d 73 74 61 72 74 2d 73 6b 69 70 20 63 6f 6d 6d 65 6e | -start.comment-start-skip.commen |
0560 | 74 2d 63 6f 6c 75 6d 6e 20 63 6f 6d 6d 65 6e 74 2d 69 6e 64 65 6e 74 2d 68 6f 6f 6b 20 73 65 74 | t-column.comment-indent-hook.set |
0580 | 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c | -syntax-table.make-local-variabl |
05a0 | 65 20 22 5e 25 25 5c 5c 7c 5e 24 5c 5c 7c 22 20 70 72 6f 6c 6f 67 2d 69 6e 64 65 6e 74 2d 6c 69 | e."^%%\\|^$\\|".prolog-indent-li |
05c0 | 6e 65 20 22 25 22 20 22 25 2b 20 2a 22 20 34 38 20 70 72 6f 6c 6f 67 2d 63 6f 6d 6d 65 6e 74 2d | ne."%"."%+.*".48.prolog-comment- |
05e0 | 69 6e 64 65 6e 74 5d 20 31 31 29 29 0a 0a 28 64 65 66 75 6e 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 | indent].11))..(defun.prolog-mode |
0600 | 2d 63 6f 6d 6d 61 6e 64 73 20 28 6d 61 70 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 c2 c3 | -commands.(map).(byte-code.".... |
0620 | 23 88 c1 08 c4 c5 23 87 22 20 5b 6d 61 70 20 64 65 66 69 6e 65 2d 6b 65 79 20 22 09 22 20 70 72 | #.....#.".[map.define-key.".".pr |
0640 | 6f 6c 6f 67 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 20 22 1b 18 22 20 70 72 6f 6c 6f 67 2d 63 6f 6e | olog-indent-line."..".prolog-con |
0660 | 73 75 6c 74 2d 72 65 67 69 6f 6e 5d 20 35 29 29 0a 0a 28 69 66 20 70 72 6f 6c 6f 67 2d 6d 6f 64 | sult-region].5))..(if.prolog-mod |
0680 | 65 2d 6d 61 70 20 6e 69 6c 20 28 73 65 74 71 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 6d 61 70 20 | e-map.nil.(setq.prolog-mode-map. |
06a0 | 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 20 28 70 72 6f 6c 6f 67 2d 6d 6f | (make-sparse-keymap)).(prolog-mo |
06c0 | 64 65 2d 63 6f 6d 6d 61 6e 64 73 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 6d 61 70 29 29 0a 0a 28 | de-commands.prolog-mode-map))..( |
06e0 | 64 65 66 75 6e 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 20 6e 69 6c 20 22 5c 0a 4d 61 6a 6f 72 20 6d | defun.prolog-mode.nil."\.Major.m |
0700 | 6f 64 65 20 66 6f 72 20 65 64 69 74 69 6e 67 20 50 72 6f 6c 6f 67 20 63 6f 64 65 20 66 6f 72 20 | ode.for.editing.Prolog.code.for. |
0720 | 50 72 6f 6c 6f 67 73 2e 0a 42 6c 61 6e 6b 20 6c 69 6e 65 73 20 61 6e 64 20 60 25 25 2e 2e 2e 27 | Prologs..Blank.lines.and.`%%...' |
0740 | 20 73 65 70 61 72 61 74 65 20 70 61 72 61 67 72 61 70 68 73 2e 20 20 60 25 27 73 20 73 74 61 72 | .separate.paragraphs...`%'s.star |
0760 | 74 20 63 6f 6d 6d 65 6e 74 73 2e 0a 43 6f 6d 6d 61 6e 64 73 3a 0a 5c 5c 7b 70 72 6f 6c 6f 67 2d | t.comments..Commands:.\\{prolog- |
0780 | 6d 6f 64 65 2d 6d 61 70 7d 0a 45 6e 74 72 79 20 74 6f 20 74 68 69 73 20 6d 6f 64 65 20 63 61 6c | mode-map}.Entry.to.this.mode.cal |
07a0 | 6c 73 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 68 6f 6f 6b | ls.the.value.of.prolog-mode-hook |
07c0 | 0a 69 66 20 74 68 61 74 20 76 61 6c 75 65 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 22 20 28 69 6e 74 | .if.that.value.is.non-nil.".(int |
07e0 | 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 88 c4 20 88 c5 08 21 88 c6 | eractive).(byte-code.".......!.. |
0800 | 89 11 88 c7 89 12 88 c8 20 88 c9 ca 21 87 22 20 5b 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 6d 61 70 | ............!.".[prolog-mode-map |
0820 | 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 6d 6f 64 65 2d 6e 61 6d 65 20 6e 69 6c 20 6b 69 6c 6c 2d 61 | .major-mode.mode-name.nil.kill-a |
0840 | 6c 6c 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 | ll-local-variables.use-local-map |
0860 | 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 20 22 50 72 6f 6c 6f 67 22 20 70 72 6f 6c 6f 67 2d 6d 6f 64 | .prolog-mode."Prolog".prolog-mod |
0880 | 65 2d 76 61 72 69 61 62 6c 65 73 20 72 75 6e 2d 68 6f 6f 6b 73 20 70 72 6f 6c 6f 67 2d 6d 6f 64 | e-variables.run-hooks.prolog-mod |
08a0 | 65 2d 68 6f 6f 6b 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 70 72 6f 6c 6f 67 2d 69 6e 64 65 6e | e-hook].5))..(defun.prolog-inden |
08c0 | 74 2d 6c 69 6e 65 20 28 26 6f 70 74 69 6f 6e 61 6c 20 77 68 6f 6c 65 2d 65 78 70 29 20 22 5c 0a | t-line.(&optional.whole-exp)."\. |
08e0 | 49 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 61 73 20 50 72 6f 6c 6f 67 20 63 6f | Indent.current.line.as.Prolog.co |
0900 | 64 65 2e 0a 57 69 74 68 20 61 72 67 75 6d 65 6e 74 2c 20 69 6e 64 65 6e 74 20 61 6e 79 20 61 64 | de..With.argument,.indent.any.ad |
0920 | 64 69 74 69 6f 6e 61 6c 20 6c 69 6e 65 73 20 6f 66 20 74 68 65 20 73 61 6d 65 20 63 6c 61 75 73 | ditional.lines.of.the.same.claus |
0940 | 65 0a 72 69 67 69 64 6c 79 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 6f 6e 65 20 28 6e | e.rigidly.along.with.this.one.(n |
0960 | 6f 74 20 79 65 74 29 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 20 28 62 79 74 | ot.yet).".(interactive."p").(byt |
0980 | 65 2d 63 6f 64 65 20 22 c3 88 c4 20 64 60 5a c3 1a 19 18 c5 20 88 60 89 12 88 c6 c7 21 88 c8 08 | e-code."....d`Z.......`.....!... |
09a0 | 69 5a 21 83 5c 22 00 c3 82 29 00 c9 0a 60 5c 22 88 08 6a 88 64 09 5a 60 56 85 36 00 64 09 5a 62 | iZ!.\"...)...`\"..j.d.Z`V.6.d.Zb |
09c0 | 2b 87 22 20 5b 69 6e 64 65 6e 74 20 70 6f 73 20 62 65 67 20 6e 69 6c 20 70 72 6f 6c 6f 67 2d 69 | +.".[indent.pos.beg.nil.prolog-i |
09e0 | 6e 64 65 6e 74 2d 6c 65 76 65 6c 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 73 6b | ndent-level.beginning-of-line.sk |
0a00 | 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 20 09 22 20 7a 65 72 6f 70 20 64 65 6c 65 | ip-chars-forward."..".zerop.dele |
0a20 | 74 65 2d 72 65 67 69 6f 6e 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e 20 70 72 6f 6c 6f 67 2d 69 6e | te-region].7))..(defun.prolog-in |
0a40 | 64 65 6e 74 2d 6c 65 76 65 6c 20 6e 69 6c 20 22 5c 0a 43 6f 6d 70 75 74 65 20 70 72 6f 6c 6f 67 | dent-level.nil."\.Compute.prolog |
0a60 | 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6c 65 76 65 6c 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 | .indentation.level.".(byte-code. |
0a80 | 22 8a c9 20 88 ca cb 21 88 cc cd 21 83 12 00 ce 82 db 00 cc cf 21 83 1c 00 08 82 db 00 6f 83 24 | "......!...!.........!.......o.$ |
0aa0 | 00 ce 82 db 00 c1 c6 c6 c6 1d 1c 1b 1a cc d0 21 83 38 00 c1 89 15 82 3b 00 c6 89 15 88 0a 85 69 | ...............!.8.....;.......i |
0ac0 | 00 d1 d2 21 88 c9 20 88 6f 83 51 00 c6 89 12 82 65 00 ca cb 21 88 cc cf 21 86 5e 00 cc d3 21 3f | ...!....o.Q.....e...!...!.^...!? |
0ae0 | 85 65 00 c6 89 12 88 82 3c 00 88 6f 83 74 00 ce 89 13 82 77 00 69 89 13 88 cc d4 21 83 82 00 0b | .e......<..o.t.....w.i.....!.... |
0b00 | 82 da 00 cc d5 21 83 8e 00 c1 89 14 82 91 00 c6 89 14 88 d6 20 88 6f 86 9c 00 d7 d2 21 88 cc d8 | .....!................o.....!... |
0b20 | 21 83 bb 00 0c 85 aa 00 cc d9 21 83 b4 00 0b 0e 07 5c 5c 82 b8 00 0e 08 0b 5d 82 da 00 cc da 21 | !.........!......\\......].....! |
0b40 | 83 c6 00 0e 08 82 da 00 0d 86 cd 00 cc db 21 83 d9 00 0b 0e 07 5a ce 5d 82 da 00 ce 2c 29 87 22 | ..............!......Z.]....,)." |
0b60 | 20 5b 63 6f 6d 6d 65 6e 74 2d 63 6f 6c 75 6d 6e 20 74 20 65 6d 70 74 79 20 69 6e 64 20 6d 6f 72 | .[comment-column.t.empty.ind.mor |
0b80 | 65 20 6c 65 73 73 20 6e 69 6c 20 70 72 6f 6c 6f 67 2d 69 6e 64 65 6e 74 2d 77 69 64 74 68 20 74 | e.less.nil.prolog-indent-width.t |
0ba0 | 61 62 2d 77 69 64 74 68 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 73 6b 69 70 2d | ab-width.beginning-of-line.skip- |
0bc0 | 63 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 20 09 22 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 25 | chars-forward."..".looking-at."% |
0be0 | 25 25 22 20 30 20 22 25 5b 5e 25 5d 22 20 22 29 22 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d | %%".0."%[^%]".")".forward-line.- |
0c00 | 31 20 22 0a 22 20 22 25 25 5b 5e 25 5d 22 20 22 28 22 20 65 6e 64 2d 6f 66 2d 70 72 6f 6c 6f 67 | 1."."."%%[^%]"."(".end-of-prolog |
0c20 | 2d 63 6c 61 75 73 65 20 66 6f 72 77 61 72 64 2d 63 68 61 72 20 22 5b 2c 28 3b 3e 5d 22 20 22 5b | -clause.forward-char."[,(;>]"."[ |
0c40 | 5e 2c 5d 22 20 22 2d 22 20 22 5b 5e 2e 5d 22 5d 20 32 30 29 29 0a 0a 28 64 65 66 75 6e 20 65 6e | ^,]"."-"."[^.]"].20))..(defun.en |
0c60 | 64 2d 6f 66 2d 70 72 6f 6c 6f 67 2d 63 6c 61 75 73 65 20 6e 69 6c 20 22 5c 0a 47 6f 20 74 6f 20 | d-of-prolog-clause.nil."\.Go.to. |
0c80 | 65 6e 64 20 6f 66 20 63 6c 61 75 73 65 20 69 6e 20 74 68 69 73 20 6c 69 6e 65 2e 22 20 28 62 79 | end.of.clause.in.this.line.".(by |
0ca0 | 74 65 2d 63 6f 64 65 20 22 c2 c3 21 88 8a c4 20 88 60 29 18 c5 09 08 c6 23 85 17 00 c7 c8 21 62 | te-code."..!.....`).....#.....!b |
0cc0 | 88 c9 ca 21 29 87 22 20 5b 65 6f 6c 70 6f 73 20 63 6f 6d 6d 65 6e 74 2d 73 74 61 72 74 2d 73 6b | ...!).".[eolpos.comment-start-sk |
0ce0 | 69 70 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 31 20 65 6e 64 2d 6f 66 2d 6c 69 | ip.beginning-of-line.1.end-of-li |
0d00 | 6e 65 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 6d 6f 76 65 20 6d 61 74 63 68 2d | ne.re-search-forward.move.match- |
0d20 | 62 65 67 69 6e 6e 69 6e 67 20 30 20 73 6b 69 70 2d 63 68 61 72 73 2d 62 61 63 6b 77 61 72 64 20 | beginning.0.skip-chars-backward. |
0d40 | 22 20 09 22 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 70 72 6f 6c 6f 67 2d 63 6f 6d 6d 65 6e 74 | ".."].6))..(defun.prolog-comment |
0d60 | 2d 69 6e 64 65 6e 74 20 6e 69 6c 20 22 5c 0a 43 6f 6d 70 75 74 65 20 70 72 6f 6c 6f 67 20 63 6f | -indent.nil."\.Compute.prolog.co |
0d80 | 6d 6d 65 6e 74 20 69 6e 64 65 6e 74 61 74 69 6f 6e 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 | mment.indentation.".(byte-code." |
0da0 | c2 c3 21 83 0a 00 c4 82 1f 00 c2 c5 21 83 15 00 c6 20 82 1f 00 8a c7 c8 21 88 69 54 09 5d 29 87 | ..!.........!...........!.iT.]). |
0dc0 | 22 20 5b 74 20 63 6f 6d 6d 65 6e 74 2d 63 6f 6c 75 6d 6e 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 | ".[t.comment-column.looking-at." |
0de0 | 25 25 25 22 20 30 20 22 25 25 22 20 70 72 6f 6c 6f 67 2d 69 6e 64 65 6e 74 2d 6c 65 76 65 6c 20 | %%%".0."%%".prolog-indent-level. |
0e00 | 73 6b 69 70 2d 63 68 61 72 73 2d 62 61 63 6b 77 61 72 64 20 22 20 09 22 5d 20 36 29 29 0a 0a 28 | skip-chars-backward.".."].6))..( |
0e20 | 64 65 66 76 61 72 20 69 6e 66 65 72 69 6f 72 2d 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 6d 61 70 20 | defvar.inferior-prolog-mode-map. |
0e40 | 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 69 6e 66 65 72 69 6f 72 2d 70 72 6f 6c 6f 67 2d 6d 6f 64 | nil)..(defun.inferior-prolog-mod |
0e60 | 65 20 6e 69 6c 20 22 5c 0a 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 69 6e 74 65 72 61 63 74 | e.nil."\.Major.mode.for.interact |
0e80 | 69 6e 67 20 77 69 74 68 20 61 6e 20 69 6e 66 65 72 69 6f 72 20 50 72 6f 6c 6f 67 20 70 72 6f 63 | ing.with.an.inferior.Prolog.proc |
0ea0 | 65 73 73 2e 0a 0a 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 6f 6d 6d 61 6e 64 73 20 61 72 65 | ess...The.following.commands.are |
0ec0 | 20 61 76 61 69 6c 61 62 6c 65 3a 0a 5c 5c 7b 69 6e 66 65 72 69 6f 72 2d 70 72 6f 6c 6f 67 2d 6d | .available:.\\{inferior-prolog-m |
0ee0 | 6f 64 65 2d 6d 61 70 7d 0a 0a 45 6e 74 72 79 20 74 6f 20 74 68 69 73 20 6d 6f 64 65 20 63 61 6c | ode-map}..Entry.to.this.mode.cal |
0f00 | 6c 73 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 68 6f 6f 6b | ls.the.value.of.prolog-mode-hook |
0f20 | 20 77 69 74 68 20 6e 6f 20 61 72 67 75 6d 65 6e 74 73 2c 0a 69 66 20 74 68 61 74 20 76 61 6c 75 | .with.no.arguments,.if.that.valu |
0f40 | 65 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 20 20 4c 69 6b 65 77 69 73 65 20 77 69 74 68 20 74 68 65 | e.is.non-nil...Likewise.with.the |
0f60 | 20 76 61 6c 75 65 20 6f 66 20 73 68 65 6c 6c 2d 6d 6f 64 65 2d 68 6f 6f 6b 2e 0a 70 72 6f 6c 6f | .value.of.shell-mode-hook..prolo |
0f80 | 67 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 69 73 20 63 61 6c 6c 65 64 20 61 66 74 65 72 20 73 68 65 6c | g-mode-hook.is.called.after.shel |
0fa0 | 6c 2d 6d 6f 64 65 2d 68 6f 6f 6b 2e 0a 0a 59 6f 75 20 63 61 6e 20 73 65 6e 64 20 74 65 78 74 20 | l-mode-hook...You.can.send.text. |
0fc0 | 74 6f 20 74 68 65 20 69 6e 66 65 72 69 6f 72 20 50 72 6f 6c 6f 67 20 66 72 6f 6d 20 6f 74 68 65 | to.the.inferior.Prolog.from.othe |
0fe0 | 72 20 62 75 66 66 65 72 73 0a 75 73 69 6e 67 20 74 68 65 20 63 6f 6d 6d 61 6e 64 73 20 73 65 6e | r.buffers.using.the.commands.sen |
1000 | 64 2d 72 65 67 69 6f 6e 2c 20 73 65 6e 64 2d 73 74 72 69 6e 67 20 61 6e 64 20 5c 5c 5b 70 72 6f | d-region,.send-string.and.\\[pro |
1020 | 6c 6f 67 2d 63 6f 6e 73 75 6c 74 2d 72 65 67 69 6f 6e 5d 2e 0a 0a 43 6f 6d 6d 61 6e 64 73 3a 0a | log-consult-region]...Commands:. |
1040 | 54 61 62 20 69 6e 64 65 6e 74 73 20 66 6f 72 20 50 72 6f 6c 6f 67 3b 20 77 69 74 68 20 61 72 67 | Tab.indents.for.Prolog;.with.arg |
1060 | 75 6d 65 6e 74 2c 20 73 68 69 66 74 73 20 72 65 73 74 0a 20 6f 66 20 65 78 70 72 65 73 73 69 6f | ument,.shifts.rest..of.expressio |
1080 | 6e 20 72 69 67 69 64 6c 79 20 77 69 74 68 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 2e | n.rigidly.with.the.current.line. |
10a0 | 0a 50 61 72 61 67 72 61 70 68 73 20 61 72 65 20 73 65 70 61 72 61 74 65 64 20 6f 6e 6c 79 20 62 | .Paragraphs.are.separated.only.b |
10c0 | 79 20 62 6c 61 6e 6b 20 6c 69 6e 65 73 20 61 6e 64 20 27 25 25 27 2e 20 27 25 27 73 20 73 74 61 | y.blank.lines.and.'%%'..'%'s.sta |
10e0 | 72 74 20 63 6f 6d 6d 65 6e 74 73 2e 0a 0a 52 65 74 75 72 6e 20 61 74 20 65 6e 64 20 6f 66 20 62 | rt.comments...Return.at.end.of.b |
1100 | 75 66 66 65 72 20 73 65 6e 64 73 20 6c 69 6e 65 20 61 73 20 69 6e 70 75 74 2e 0a 52 65 74 75 72 | uffer.sends.line.as.input..Retur |
1120 | 6e 20 6e 6f 74 20 61 74 20 65 6e 64 20 63 6f 70 69 65 73 20 72 65 73 74 20 6f 66 20 6c 69 6e 65 | n.not.at.end.copies.rest.of.line |
1140 | 20 74 6f 20 65 6e 64 20 61 6e 64 20 73 65 6e 64 73 20 69 74 2e 0a 5c 5c 5b 73 68 65 6c 6c 2d 73 | .to.end.and.sends.it..\\[shell-s |
1160 | 65 6e 64 2d 65 6f 66 5d 20 73 65 6e 64 73 20 65 6e 64 2d 6f 66 2d 66 69 6c 65 20 61 73 20 69 6e | end-eof].sends.end-of-file.as.in |
1180 | 70 75 74 2e 0a 5c 5c 5b 6b 69 6c 6c 2d 73 68 65 6c 6c 2d 69 6e 70 75 74 5d 20 61 6e 64 20 5c 5c | put..\\[kill-shell-input].and.\\ |
11a0 | 5b 62 61 63 6b 77 61 72 64 2d 6b 69 6c 6c 2d 77 6f 72 64 5d 20 61 72 65 20 6b 69 6c 6c 20 63 6f | [backward-kill-word].are.kill.co |
11c0 | 6d 6d 61 6e 64 73 2c 20 69 6d 69 74 61 74 69 6e 67 20 6e 6f 72 6d 61 6c 20 55 6e 69 78 20 69 6e | mmands,.imitating.normal.Unix.in |
11e0 | 70 75 74 20 65 64 69 74 69 6e 67 2e 0a 5c 5c 5b 69 6e 74 65 72 72 75 70 74 2d 73 68 65 6c 6c 2d | put.editing..\\[interrupt-shell- |
1200 | 73 75 62 6a 6f 62 5d 20 69 6e 74 65 72 72 75 70 74 73 20 74 68 65 20 73 68 65 6c 6c 20 6f 72 20 | subjob].interrupts.the.shell.or. |
1220 | 69 74 73 20 63 75 72 72 65 6e 74 20 73 75 62 6a 6f 62 20 69 66 20 61 6e 79 2e 0a 5c 5c 5b 73 74 | its.current.subjob.if.any..\\[st |
1240 | 6f 70 2d 73 68 65 6c 6c 2d 73 75 62 6a 6f 62 5d 20 73 74 6f 70 73 2c 20 6c 69 6b 65 77 69 73 65 | op-shell-subjob].stops,.likewise |
1260 | 2e 20 5c 5c 5b 71 75 69 74 2d 73 68 65 6c 6c 2d 73 75 62 6a 6f 62 5d 20 73 65 6e 64 73 20 71 75 | ..\\[quit-shell-subjob].sends.qu |
1280 | 69 74 20 73 69 67 6e 61 6c 2c 20 6c 69 6b 65 77 69 73 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 | it.signal,.likewise.".(interacti |
12a0 | 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c4 88 c9 20 88 ca 89 10 88 cb 89 11 88 cc 89 12 | ve).(byte-code."................ |
12c0 | 88 cd 20 88 ce cf 21 88 0b 83 20 00 c4 82 29 00 d0 0d 21 89 13 88 d1 0b 21 88 d2 0b 21 88 d3 c6 | ......!.......)...!.....!...!... |
12e0 | 21 88 d4 20 89 16 06 88 d3 c7 21 88 d4 20 89 16 07 88 d5 c8 21 88 d6 89 16 08 88 d7 d8 d9 5c 22 | !.........!.........!.........\" |
1300 | 87 22 20 5b 6d 61 6a 6f 72 2d 6d 6f 64 65 20 6d 6f 64 65 2d 6e 61 6d 65 20 6d 6f 64 65 2d 6c 69 | .".[major-mode.mode-name.mode-li |
1320 | 6e 65 2d 70 72 6f 63 65 73 73 20 69 6e 66 65 72 69 6f 72 2d 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d | ne-process.inferior-prolog-mode- |
1340 | 6d 61 70 20 6e 69 6c 20 73 68 65 6c 6c 2d 6d 6f 64 65 2d 6d 61 70 20 6c 61 73 74 2d 69 6e 70 75 | map.nil.shell-mode-map.last-inpu |
1360 | 74 2d 73 74 61 72 74 20 6c 61 73 74 2d 69 6e 70 75 74 2d 65 6e 64 20 73 68 65 6c 6c 2d 70 72 6f | t-start.last-input-end.shell-pro |
1380 | 6d 70 74 2d 70 61 74 74 65 72 6e 20 6b 69 6c 6c 2d 61 6c 6c 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 | mpt-pattern.kill-all-local-varia |
13a0 | 62 6c 65 73 20 69 6e 66 65 72 69 6f 72 2d 70 72 6f 6c 6f 67 2d 6d 6f 64 65 20 22 49 6e 66 65 72 | bles.inferior-prolog-mode."Infer |
13c0 | 69 6f 72 20 50 72 6f 6c 6f 67 22 20 28 22 3a 20 25 73 22 29 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 | ior.Prolog".(":.%s").prolog-mode |
13e0 | 2d 76 61 72 69 61 62 6c 65 73 20 72 65 71 75 69 72 65 20 73 68 65 6c 6c 20 63 6f 70 79 2d 61 6c | -variables.require.shell.copy-al |
1400 | 69 73 74 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 63 6f 6d 6d 61 6e 64 73 20 75 73 65 2d 6c 6f 63 | ist.prolog-mode-commands.use-loc |
1420 | 61 6c 2d 6d 61 70 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 6d 61 6b 65 2d | al-map.make-local-variable.make- |
1440 | 6d 61 72 6b 65 72 20 6d 61 6b 65 2d 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61 | marker.make-variable-buffer-loca |
1460 | 6c 20 22 5e 7c 20 5b 20 3f 5d 5b 2d 20 5d 20 2a 22 20 72 75 6e 2d 68 6f 6f 6b 73 20 73 68 65 6c | l."^|.[.?][-.].*".run-hooks.shel |
1480 | 6c 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 70 72 6f 6c 6f 67 2d 6d 6f 64 65 2d 68 6f 6f 6b 5d 20 31 34 | l-mode-hook.prolog-mode-hook].14 |
14a0 | 29 29 0a 0a 28 64 65 66 75 6e 20 72 75 6e 2d 70 72 6f 6c 6f 67 20 6e 69 6c 20 22 5c 0a 52 75 6e | ))..(defun.run-prolog.nil."\.Run |
14c0 | 20 61 6e 20 69 6e 66 65 72 69 6f 72 20 50 72 6f 6c 6f 67 20 70 72 6f 63 65 73 73 2c 20 69 6e 70 | .an.inferior.Prolog.process,.inp |
14e0 | 75 74 20 61 6e 64 20 6f 75 74 70 75 74 20 76 69 61 20 62 75 66 66 65 72 20 2a 70 72 6f 6c 6f 67 | ut.and.output.via.buffer.*prolog |
1500 | 2a 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 | *.".(interactive).(byte-code.".. |
1520 | c1 c2 21 88 c3 c4 c5 c5 5c 22 21 88 c6 20 87 22 20 5b 6e 69 6c 20 72 65 71 75 69 72 65 20 73 68 | ..!.....\"!....".[nil.require.sh |
1540 | 65 6c 6c 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 6d 61 6b 65 2d 73 68 65 6c 6c 20 | ell.switch-to-buffer.make-shell. |
1560 | 22 70 72 6f 6c 6f 67 22 20 69 6e 66 65 72 69 6f 72 2d 70 72 6f 6c 6f 67 2d 6d 6f 64 65 5d 20 35 | "prolog".inferior-prolog-mode].5 |
1580 | 29 29 0a 0a 28 64 65 66 75 6e 20 70 72 6f 6c 6f 67 2d 63 6f 6e 73 75 6c 74 2d 72 65 67 69 6f 6e | ))..(defun.prolog-consult-region |
15a0 | 20 28 63 6f 6d 70 69 6c 65 20 62 65 67 20 65 6e 64 29 20 22 5c 0a 53 65 6e 64 20 74 68 65 20 72 | .(compile.beg.end)."\.Send.the.r |
15c0 | 65 67 69 6f 6e 20 74 6f 20 74 68 65 20 50 72 6f 6c 6f 67 20 70 72 6f 63 65 73 73 20 6d 61 64 65 | egion.to.the.Prolog.process.made |
15e0 | 20 62 79 20 4d 2d 78 20 72 75 6e 2d 70 72 6f 6c 6f 67 2e 0a 20 49 66 20 43 4f 4d 50 49 4c 45 20 | .by.M-x.run-prolog...If.COMPILE. |
1600 | 28 70 72 65 66 69 78 20 61 72 67 29 20 69 73 20 6e 6f 74 20 6e 69 6c 2c 0a 20 75 73 65 20 63 6f | (prefix.arg).is.not.nil,..use.co |
1620 | 6d 70 69 6c 65 20 6d 6f 64 65 20 72 61 74 68 65 72 20 74 68 61 6e 20 63 6f 6e 73 75 6c 74 20 6d | mpile.mode.rather.than.consult.m |
1640 | 6f 64 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 0a 72 22 29 20 28 62 79 74 65 2d | ode.".(interactive."P.r").(byte- |
1660 | 63 6f 64 65 20 22 c6 88 8a 08 83 0e 00 c7 c8 09 5c 22 82 12 00 c7 c8 0a 5c 22 88 c9 c8 0b 0c 23 | code."..........\"......\".....# |
1680 | 88 c7 c8 ca 5c 22 88 0d 83 29 00 c7 c8 0d 5c 22 82 2c 00 cb c8 21 29 87 22 20 5b 63 6f 6d 70 69 | ....\"...)....\".,...!).".[compi |
16a0 | 6c 65 20 70 72 6f 6c 6f 67 2d 63 6f 6d 70 69 6c 65 2d 73 74 72 69 6e 67 20 70 72 6f 6c 6f 67 2d | le.prolog-compile-string.prolog- |
16c0 | 63 6f 6e 73 75 6c 74 2d 73 74 72 69 6e 67 20 62 65 67 20 65 6e 64 20 70 72 6f 6c 6f 67 2d 65 6f | consult-string.beg.end.prolog-eo |
16e0 | 66 2d 73 74 72 69 6e 67 20 6e 69 6c 20 73 65 6e 64 2d 73 74 72 69 6e 67 20 22 70 72 6f 6c 6f 67 | f-string.nil.send-string."prolog |
1700 | 22 20 73 65 6e 64 2d 72 65 67 69 6f 6e 20 22 0a 22 20 70 72 6f 63 65 73 73 2d 73 65 6e 64 2d 65 | ".send-region.".".process-send-e |
1720 | 6f 66 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e 20 70 72 6f 6c 6f 67 2d 63 6f 6e 73 75 6c 74 2d 72 | of].7))..(defun.prolog-consult-r |
1740 | 65 67 69 6f 6e 2d 61 6e 64 2d 67 6f 20 28 63 6f 6d 70 69 6c 65 20 62 65 67 20 65 6e 64 29 20 22 | egion-and-go.(compile.beg.end)." |
1760 | 5c 0a 53 65 6e 64 20 74 68 65 20 72 65 67 69 6f 6e 20 74 6f 20 74 68 65 20 69 6e 66 65 72 69 6f | \.Send.the.region.to.the.inferio |
1780 | 72 20 50 72 6f 6c 6f 67 2c 20 61 6e 64 20 73 77 69 74 63 68 20 74 6f 20 2a 70 72 6f 6c 6f 67 2a | r.Prolog,.and.switch.to.*prolog* |
17a0 | 20 62 75 66 66 65 72 2e 0a 20 49 66 20 43 4f 4d 50 49 4c 45 20 28 70 72 65 66 69 78 20 61 72 67 | .buffer...If.COMPILE.(prefix.arg |
17c0 | 29 20 69 73 20 6e 6f 74 20 6e 69 6c 2c 0a 20 75 73 65 20 63 6f 6d 70 69 6c 65 20 6d 6f 64 65 20 | ).is.not.nil,..use.compile.mode. |
17e0 | 72 61 74 68 65 72 20 74 68 61 6e 20 63 6f 6e 73 75 6c 74 20 6d 6f 64 65 2e 22 20 28 69 6e 74 65 | rather.than.consult.mode.".(inte |
1800 | 72 61 63 74 69 76 65 20 22 50 0a 72 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 88 c4 08 09 | ractive."P.r").(byte-code."..... |
1820 | 0a 23 88 c5 c6 21 87 22 20 5b 63 6f 6d 70 69 6c 65 20 62 65 67 20 65 6e 64 20 6e 69 6c 20 70 72 | .#...!.".[compile.beg.end.nil.pr |
1840 | 6f 6c 6f 67 2d 63 6f 6e 73 75 6c 74 2d 72 65 67 69 6f 6e 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 | olog-consult-region.switch-to-bu |
1860 | 66 66 65 72 20 22 2a 70 72 6f 6c 6f 67 2a 22 5d 20 34 29 29 0a | ffer."*prolog*"].4)). |