--- /tmp/xemacs21-21.4.24-9won_rp25/debian/xemacs21-support_21.4.24-9_all.deb +++ xemacs21-support_21.4.24-9_all.deb ├── file list │ @@ -1,3 +1,3 @@ │ -rw-r--r-- 0 0 0 4 2020-02-24 23:09:41.000000 debian-binary │ --rw-r--r-- 0 0 0 16424 2020-02-24 23:09:41.000000 control.tar.xz │ --rw-r--r-- 0 0 0 4164472 2020-02-24 23:09:41.000000 data.tar.xz │ +-rw-r--r-- 0 0 0 16420 2020-02-24 23:09:41.000000 control.tar.xz │ +-rw-r--r-- 0 0 0 4164572 2020-02-24 23:09:41.000000 data.tar.xz ├── control.tar.xz │ ├── control.tar │ │ ├── ./control │ │ │ @@ -1,13 +1,13 @@ │ │ │ Package: xemacs21-support │ │ │ Source: xemacs21 │ │ │ Version: 21.4.24-9 │ │ │ Architecture: all │ │ │ Maintainer: Mark Brown │ │ │ -Installed-Size: 9228 │ │ │ +Installed-Size: 9222 │ │ │ Depends: emacsen-common (>= 3.0.0) │ │ │ Suggests: xemacs21-supportel (= 21.4.24-9) │ │ │ Conflicts: sgml-base (<< 1.23), xemacs-support │ │ │ Replaces: xemacs-support │ │ │ Section: editors │ │ │ Priority: optional │ │ │ Homepage: http://www.xemacs.org/ │ │ ├── ./md5sums │ │ │ ├── ./md5sums │ │ │ │┄ Files differ ├── data.tar.xz │ ├── data.tar │ │ ├── file list │ │ │ @@ -460,211 +460,211 @@ │ │ │ -rw-r--r-- 0 root (0) root (0) 10738 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/etc/xemacs.xbm │ │ │ -rw-r--r-- 0 root (0) root (0) 57342 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/etc/xemacs.xpm │ │ │ drwxr-xr-x 0 root (0) root (0) 0 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/ │ │ │ -rw-r--r-- 0 root (0) root (0) 389474 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/ChangeLog │ │ │ -rw-r--r-- 0 root (0) root (0) 260385 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/ChangeLog.1 │ │ │ -rw-r--r-- 0 root (0) root (0) 9071 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/ChangeLog.GTK │ │ │ -rw-r--r-- 0 root (0) root (0) 2283 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/README │ │ │ --rw-r--r-- 0 root (0) root (0) 14499 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/abbrev.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 77561 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/about.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2286 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/alist.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 12780 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/apropos.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 101120 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/auto-autoloads.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 10669 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/auto-save.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3766 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/auto-show.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 13616 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/autoload.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5305 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/backquote.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1134 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/blessmail.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 14742 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/buff-menu.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2671 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/buffer.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 12813 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/build-report.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 24666 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/byte-optimize.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 6867 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/bytecomp-runtime.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 92976 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/bytecomp.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2297 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/callers-of-rpt.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1323 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/check-features.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3795 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cl-compat.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 16741 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cl-extra.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 93281 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cl-macs.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 34180 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cl-seq.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 17001 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cl.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 12107 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cmdloop.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5131 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/code-cmds.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 16754 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/code-files.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 9175 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/code-process.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8112 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/coding.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4641 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/compat.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1535 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/config.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1145 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/console.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3334 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-dep.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 89108 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-edit.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 9150 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-face.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1305 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-file.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1302 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-load.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4817 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-start.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3960 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/custom-load.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 20377 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/custom.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 10020 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/derived.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5261 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/device.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5333 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/dialog-gtk.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2507 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/dialog-items.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 20998 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/dialog.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4014 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/disass.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4098 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/disp-table.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 10985 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/dragdrop.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1850 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/dump-paths.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 14491 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/abbrev.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 77553 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/about.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2278 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/alist.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 12772 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/apropos.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 101112 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/auto-autoloads.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 10661 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/auto-save.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3758 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/auto-show.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 13608 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/autoload.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5297 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/backquote.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1126 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/blessmail.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 14734 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/buff-menu.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2663 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/buffer.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 12805 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/build-report.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 24658 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/byte-optimize.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 6859 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/bytecomp-runtime.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 92968 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/bytecomp.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2289 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/callers-of-rpt.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1315 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/check-features.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3787 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cl-compat.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 16733 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cl-extra.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 93273 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cl-macs.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 34172 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cl-seq.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 16993 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cl.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 12099 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cmdloop.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5122 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/code-cmds.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 16746 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/code-files.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 9167 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/code-process.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8104 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/coding.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4633 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/compat.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1527 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/config.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1137 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/console.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3326 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-dep.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 89100 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-edit.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 9142 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-face.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1297 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-file.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1294 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-load.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4809 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/cus-start.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3952 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/custom-load.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 20369 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/custom.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 10012 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/derived.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5253 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/device.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5325 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/dialog-gtk.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2499 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/dialog-items.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 20990 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/dialog.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4006 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/disass.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4090 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/disp-table.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 10977 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/dragdrop.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1842 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/dump-paths.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 8774 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/dumped-lisp.el │ │ │ --rw-r--r-- 0 root (0) root (0) 12441 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/easy-mmode.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 6406 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/easymenu.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 29799 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/etags.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4399 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/events.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3918 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/extents.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 58782 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/faces.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3832 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/files-nomule.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 75183 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/files.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 19166 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/fill.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8245 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/find-paths.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 15873 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/finder-inf.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 10253 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/finder.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1323 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/float-sup.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 73934 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/font-lock.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8513 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/font-menu.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 36061 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/font.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2775 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/fontl-hooks.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 21930 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/format.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 26630 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/frame.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 15875 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gdk.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8467 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/generic-widgets.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 6362 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/glade.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 46705 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/glyphs.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 70232 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gnome-widgets.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1167 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gnome.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 25573 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gnuserv.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2010 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gpm.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 682 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-compose.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 10862 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-extra.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5483 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-faces.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2349 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-ffi.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5257 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-file-dialog.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4927 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-font-menu.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1478 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-glyphs.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8046 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-init.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 709 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-iso8859-1.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8956 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-marshal.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1647 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-mouse.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 819 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-package.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2178 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-password-dialog.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1731 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-select.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 6491 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-widget-accessors.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 343423 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-widgets.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1327 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3306 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gui.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 20753 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gutter-items.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 6821 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gutter.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3641 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/help-macro.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2644 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/help-nomule.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 40276 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/help.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 29079 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/hyper-apropos.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 12184 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/indent.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 65583 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/info.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 35587 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/isearch-mode.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2163 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/iso8859-1.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2434 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/itimer-autosave.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 21211 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/itimer.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 12037 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/keydefs.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 11427 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/keymap.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 14098 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/ldap.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8541 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/lib-complete.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 10859 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/lisp-mnt.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 19704 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/lisp-mode.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8364 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/lisp.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 15303 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/list-mode.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 748 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/loaddefs.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3853 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/loadhist.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 12433 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/easy-mmode.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 6398 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/easymenu.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 29791 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/etags.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4391 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/events.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3910 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/extents.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 58774 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/faces.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3824 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/files-nomule.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 75175 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/files.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 19157 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/fill.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8237 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/find-paths.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 15865 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/finder-inf.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 10245 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/finder.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1315 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/float-sup.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 73926 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/font-lock.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8505 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/font-menu.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 36053 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/font.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2767 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/fontl-hooks.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 21922 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/format.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 26622 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/frame.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 15866 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gdk.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8459 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/generic-widgets.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 6354 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/glade.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 46697 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/glyphs.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 70224 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gnome-widgets.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1159 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gnome.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 25565 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gnuserv.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2002 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gpm.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 674 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-compose.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 10853 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-extra.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5475 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-faces.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2341 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-ffi.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5249 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-file-dialog.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4919 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-font-menu.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1470 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-glyphs.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8038 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-init.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 701 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-iso8859-1.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8948 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-marshal.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1639 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-mouse.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 811 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-package.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2170 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-password-dialog.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1723 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-select.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 6483 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-widget-accessors.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 343415 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk-widgets.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1319 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gtk.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3298 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gui.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 20745 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gutter-items.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 6813 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/gutter.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3633 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/help-macro.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2636 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/help-nomule.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 40268 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/help.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 29071 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/hyper-apropos.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 12176 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/indent.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 65575 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/info.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 35579 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/isearch-mode.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2155 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/iso8859-1.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2426 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/itimer-autosave.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 21203 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/itimer.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 12029 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/keydefs.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 11419 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/keymap.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 14090 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/ldap.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8533 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/lib-complete.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 10851 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/lisp-mnt.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 19696 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/lisp-mode.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8356 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/lisp.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 15295 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/list-mode.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 740 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/loaddefs.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3845 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/loadhist.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 943 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/loadup-el.el │ │ │ -rw-r--r-- 0 root (0) root (0) 11301 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/loadup.el │ │ │ -rw-r--r-- 0 root (0) root (0) 6311 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/make-docfile.el │ │ │ --rw-r--r-- 0 root (0) root (0) 4675 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/map-ynp.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 63642 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/menubar-items.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 16225 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/menubar.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 48986 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/minibuf.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1096 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/misc.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4309 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mode-motion.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 16949 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/modeline.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 38684 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mouse.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1231 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/movemail.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4971 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-faces.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4318 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-font-menu.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2306 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-glyphs.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2066 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-init.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1270 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-mouse.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1032 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-select.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4667 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/map-ynp.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 63634 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/menubar-items.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 16217 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/menubar.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 48978 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/minibuf.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1088 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/misc.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4301 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mode-motion.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 16941 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/modeline.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 38676 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mouse.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1223 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/movemail.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4963 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-faces.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4310 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-font-menu.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2298 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-glyphs.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2058 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-init.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1262 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-mouse.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1024 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/msw-select.elc │ │ │ drwxr-xr-x 0 root (0) root (0) 0 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/ │ │ │ --rw-r--r-- 0 root (0) root (0) 981 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/arabic.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8258 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/auto-autoloads.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1137 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/canna-leim.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3969 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/chinese.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 973 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/arabic.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8250 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/auto-autoloads.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1129 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/canna-leim.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3961 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/chinese.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 149 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/mule/custom-load.el │ │ │ --rw-r--r-- 0 root (0) root (0) 14955 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/cyrillic.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1081 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/english.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1512 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/ethiopic.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8636 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/european.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1304 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/greek.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1563 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/hebrew.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4871 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/japanese.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5397 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/kinsoku.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2290 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/korean.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2390 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/latin.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1102 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/misc-lang.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 7675 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-category.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 29036 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-ccl.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5697 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-charset.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 26715 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-cmds.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4101 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-coding.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1775 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-help.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1935 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-init.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5322 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-misc.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1074 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-tty-init.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2946 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-x-init.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 851 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/thai-xtis-chars.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 9107 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/thai-xtis.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 995 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/viet-chars.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 10896 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/vietnamese.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2084 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/multicast.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2571 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mwheel.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 9143 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/objects.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 13292 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/obsolete.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 11503 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/package-admin.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 36805 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/package-get.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2924 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/package-info.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3806 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/package-net.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 16792 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/package-ui.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 13701 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/packages.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2615 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/page.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 9407 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/paragraphs.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3881 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/paths.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 20235 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/picture.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 18712 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/printer.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 13699 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/process.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 7613 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/rect.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8512 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/register.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 19335 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/replace.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4101 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/scrollbar.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 18304 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/select.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5397 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/setup-paths.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4546 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/shadow.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 112225 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/simple.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 14947 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/cyrillic.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1073 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/english.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1504 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/ethiopic.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8628 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/european.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1296 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/greek.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1555 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/hebrew.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4863 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/japanese.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5389 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/kinsoku.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2282 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/korean.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2382 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/latin.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1094 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/misc-lang.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 7667 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-category.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 29028 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-ccl.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5689 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-charset.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 26707 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-cmds.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4093 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-coding.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1767 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-help.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1927 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-init.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5314 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-misc.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1066 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-tty-init.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2938 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/mule-x-init.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 843 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/thai-xtis-chars.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 9099 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/thai-xtis.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 987 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/viet-chars.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 10888 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mule/vietnamese.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2076 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/multicast.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2563 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/mwheel.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 9135 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/objects.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 13284 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/obsolete.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 11495 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/package-admin.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 36797 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/package-get.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2916 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/package-info.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3798 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/package-net.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 16784 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/package-ui.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 13693 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/packages.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2607 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/page.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 9399 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/paragraphs.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3873 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/paths.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 20227 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/picture.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 18704 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/printer.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 13691 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/process.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 7605 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/rect.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8504 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/register.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 19327 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/replace.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4093 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/scrollbar.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 18295 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/select.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5389 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/setup-paths.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4538 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/shadow.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 112217 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/simple.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 2436 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/site-load.el │ │ │ --rw-r--r-- 0 root (0) root (0) 4835 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/sound.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 17794 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/specifier.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 31228 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/startup.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 30137 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/subr.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2018 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/symbol-syntax.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2980 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/symbols.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8692 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/syntax.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4827 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/sound.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 17786 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/specifier.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 31220 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/startup.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 30129 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/subr.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2010 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/symbol-syntax.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2972 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/symbols.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8684 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/syntax.elc │ │ │ drwxr-xr-x 0 root (0) root (0) 0 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/term/ │ │ │ -rw-r--r-- 0 root (0) root (0) 2226 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/AT386.el │ │ │ -rw-r--r-- 0 root (0) root (0) 8428 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/README │ │ │ -rw-r--r-- 0 root (0) root (0) 29846 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/apollo.el │ │ │ -rw-r--r-- 0 root (0) root (0) 11126 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/bg-mouse.el │ │ │ -rw-r--r-- 0 root (0) root (0) 96 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/bobcat.el │ │ │ -rw-r--r-- 0 root (0) root (0) 3234 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/internal.el │ │ │ @@ -690,43 +690,43 @@ │ │ │ -rw-r--r-- 0 root (0) root (0) 99 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/vt300.el │ │ │ -rw-r--r-- 0 root (0) root (0) 99 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/vt320.el │ │ │ -rw-r--r-- 0 root (0) root (0) 99 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/vt400.el │ │ │ -rw-r--r-- 0 root (0) root (0) 99 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/vt420.el │ │ │ -rw-r--r-- 0 root (0) root (0) 18521 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/win32-win.el │ │ │ -rw-r--r-- 0 root (0) root (0) 4865 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/wyse50.el │ │ │ -rw-r--r-- 0 root (0) root (0) 4886 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/term/xterm.el │ │ │ --rw-r--r-- 0 root (0) root (0) 4827 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/text-mode.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 7678 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/text-props.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 15733 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/toolbar-items.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 5898 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/toolbar.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2621 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/tty-init.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4304 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/undo-stack.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4819 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/text-mode.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 7670 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/text-props.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 15725 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/toolbar-items.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 5890 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/toolbar.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2613 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/tty-init.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4296 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/undo-stack.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 5138 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/update-elc-2.el │ │ │ -rw-r--r-- 0 root (0) root (0) 5668 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/update-elc.el │ │ │ --rw-r--r-- 0 root (0) root (0) 6209 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/userlock.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2666 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/version.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 6201 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/userlock.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2658 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/version.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 2462 2015-03-25 11:25:33.000000 ./usr/share/xemacs-21.4.24/lisp/very-early-lisp.el │ │ │ --rw-r--r-- 0 root (0) root (0) 10717 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/view-less.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 6629 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/wid-browse.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 79379 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/wid-edit.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1518 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/widget.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3055 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/widgets-gtk.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4863 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/win32-native.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 14719 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/window-xemacs.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 10575 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/window.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 11137 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-compose.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 10851 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-faces.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4885 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-font-menu.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 8297 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-init.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 6553 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-iso8859-1.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2489 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-misc.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3303 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-mouse.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1775 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-scrollbar.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 4099 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-select.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 2560 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-win-sun.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 1064 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-win-xfree86.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 10709 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/view-less.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 6620 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/wid-browse.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 79371 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/wid-edit.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1510 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/widget.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3047 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/widgets-gtk.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4855 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/win32-native.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 14711 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/window-xemacs.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 10567 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/window.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 11129 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-compose.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 10843 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-faces.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4877 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-font-menu.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 8289 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-init.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 6545 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-iso8859-1.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2481 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-misc.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3295 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-mouse.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1767 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-scrollbar.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 4091 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-select.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 2552 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-win-sun.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 1056 2020-02-24 23:09:41.000000 ./usr/share/xemacs-21.4.24/lisp/x-win-xfree86.elc │ │ │ drwxr-xr-x 0 root (0) root (0) 0 2020-02-24 23:09:41.000000 ./usr/share/xemacs21/ │ │ │ drwxr-xr-x 0 root (0) root (0) 0 2020-02-24 23:09:41.000000 ./usr/share/xemacs21/site-lisp/ │ │ │ drwxr-xr-x 0 root (0) root (0) 0 2020-02-24 23:09:41.000000 ./usr/share/xemacs21/site-packages/ │ │ │ drwxr-xr-x 0 root (0) root (0) 0 2020-02-24 23:09:41.000000 ./usr/share/xemacs21/site-packages/info/ │ │ │ drwxr-xr-x 0 root (0) root (0) 0 2020-02-24 23:09:41.000000 ./usr/share/xemacs21/site-packages/lisp/ │ │ │ -rw-r--r-- 0 root (0) root (0) 723 2020-02-24 23:09:41.000000 ./usr/share/xemacs21/site-packages/lisp/site-start.el │ │ ├── ./usr/share/xemacs-21.4.24/lisp/abbrev.elc │ │ │ @@ -1,907 +1,906 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3438 2032 eb 25 01:53:48 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f61 1-21.4.24/lisp/a │ │ │ -00000090: 6262 7265 762e 656c 0a3b 3b3b 2065 6d61 bbrev.el.;;; ema │ │ │ -000000a0: 6373 2076 6572 7369 6f6e 2032 312e 3420 cs version 21.4 │ │ │ -000000b0: 2870 6174 6368 2032 3429 2022 5374 616e (patch 24) "Stan │ │ │ -000000c0: 6461 7264 2043 2220 5845 6d61 6373 204c dard C" XEmacs L │ │ │ -000000d0: 7563 6964 2e0a 3b3b 3b20 6279 7465 636f ucid..;;; byteco │ │ │ -000000e0: 6d70 2076 6572 7369 6f6e 2032 2e32 3720 mp version 2.27 │ │ │ -000000f0: 5845 6d61 6373 3b20 3230 3030 2d30 392d XEmacs; 2000-09- │ │ │ -00000100: 3132 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 12..;;; optimiza │ │ │ -00000110: 7469 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 tion is on..;;; │ │ │ -00000120: 7468 6973 2066 696c 6520 7573 6573 206f this file uses o │ │ │ -00000130: 7063 6f64 6573 2077 6869 6368 2064 6f20 pcodes which do │ │ │ -00000140: 6e6f 7420 6578 6973 7420 696e 2045 6d61 not exist in Ema │ │ │ -00000150: 6373 2031 392e 0a0a 2869 6620 2861 6e64 cs 19...(if (and │ │ │ -00000160: 2028 626f 756e 6470 2027 656d 6163 732d (boundp 'emacs- │ │ │ -00000170: 7665 7273 696f 6e29 0a09 2028 6f72 2028 version).. (or ( │ │ │ -00000180: 616e 6420 2862 6f75 6e64 7020 2765 706f and (boundp 'epo │ │ │ -00000190: 6368 3a3a 7665 7273 696f 6e29 2065 706f ch::version) epo │ │ │ -000001a0: 6368 3a3a 7665 7273 696f 6e29 0a09 2020 ch::version).. │ │ │ -000001b0: 2020 2028 7374 7269 6e67 2d6c 6573 7370 (string-lessp │ │ │ -000001c0: 2065 6d61 6373 2d76 6572 7369 6f6e 2022 emacs-version " │ │ │ -000001d0: 3230 2229 2929 0a20 2020 2028 6572 726f 20"))). (erro │ │ │ -000001e0: 7220 2260 6162 6272 6576 2e65 6c27 2077 r "`abbrev.el' w │ │ │ -000001f0: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ -00000200: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ -00000210: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ -00000220: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ -00000230: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ -00000240: 6c69 7374 206e 696c 2929 0a0a 0a28 6279 list nil))...(by │ │ │ -00000250: 7465 2d63 6f64 6520 22c0 c1c2 c3c4 c5c6 te-code "....... │ │ │ -00000260: c726 0788 c0c8 c2c9 c6c1 2587 2220 5b63 .&........%." [c │ │ │ -00000270: 7573 746f 6d2d 6465 636c 6172 652d 6772 ustom-declare-gr │ │ │ -00000280: 6f75 7020 6162 6272 6576 206e 696c 2022 oup abbrev nil " │ │ │ -00000290: 4162 6272 6576 6961 7469 6f6e 2068 616e Abbreviation han │ │ │ -000002a0: 646c 696e 672c 2074 7970 696e 6720 7368 dling, typing sh │ │ │ -000002b0: 6f72 7463 7574 732c 206d 6163 726f 732e ortcuts, macros. │ │ │ -000002c0: 2220 3a74 6167 2022 4162 6272 6576 6961 " :tag "Abbrevia │ │ │ -000002d0: 7469 6f6e 7322 203a 6772 6f75 7020 6564 tions" :group ed │ │ │ -000002e0: 6974 696e 6720 6162 6272 6576 2d6d 6f64 iting abbrev-mod │ │ │ -000002f0: 6520 2257 6f72 6420 6162 6272 6576 6961 e "Word abbrevia │ │ │ -00000300: 7469 6f6e 7320 6d6f 6465 2e22 5d20 3829 tions mode."] 8) │ │ │ -00000310: 0a28 6375 7374 6f6d 2d64 6563 6c61 7265 .(custom-declare │ │ │ -00000320: 2d76 6172 6961 626c 6520 276f 6e6c 792d -variable 'only- │ │ │ -00000330: 676c 6f62 616c 2d61 6262 7265 7673 2027 global-abbrevs ' │ │ │ -00000340: 6e69 6c20 222a 4e6f 6e2d 6e69 6c20 6d65 nil "*Non-nil me │ │ │ -00000350: 616e 7320 7573 6572 2070 6c61 6e73 2074 ans user plans t │ │ │ -00000360: 6f20 7573 6520 676c 6f62 616c 2061 6262 o use global abb │ │ │ -00000370: 7265 7673 206f 6e6c 792e 5c6e 4d61 6b65 revs only.\nMake │ │ │ -00000380: 7320 7468 6520 636f 6d6d 616e 6473 2074 s the commands t │ │ │ -00000390: 6f20 6465 6669 6e65 206d 6f64 652d 7370 o define mode-sp │ │ │ -000003a0: 6563 6966 6963 2061 6262 7265 7673 2064 ecific abbrevs d │ │ │ -000003b0: 6566 696e 6520 676c 6f62 616c 206f 6e65 efine global one │ │ │ -000003c0: 7320 696e 7374 6561 642e 2220 3a74 7970 s instead." :typ │ │ │ -000003d0: 6520 2762 6f6f 6c65 616e 203a 6772 6f75 e 'boolean :grou │ │ │ -000003e0: 7020 2761 6262 7265 7629 0a23 4034 3920 p 'abbrev).#@49 │ │ │ -000003f0: 4c69 7374 206f 6620 7379 6d62 6f6c 7320 List of symbols │ │ │ -00000400: 7768 6f73 6520 7661 6c75 6573 2061 7265 whose values are │ │ │ -00000410: 2061 6262 7265 7620 7461 626c 6573 2e1f abbrev tables.. │ │ │ -00000420: 0a28 6465 6676 6172 2061 6262 7265 762d .(defvar abbrev- │ │ │ -00000430: 7461 626c 652d 6e61 6d65 2d6c 6973 7420 table-name-list │ │ │ -00000440: 6e69 6c20 2823 2420 2e20 3130 3038 2929 nil (#$ . 1008)) │ │ │ -00000450: 0a23 4031 3137 2053 6574 206e 6f6e 2d6e .#@117 Set non-n │ │ │ -00000460: 696c 2062 7920 6465 6669 6e69 6e67 206f il by defining o │ │ │ -00000470: 7220 616c 7465 7269 6e67 2061 6e79 2077 r altering any w │ │ │ -00000480: 6f72 6420 6162 6272 6576 732e 0a54 6869 ord abbrevs..Thi │ │ │ -00000490: 7320 6361 7573 6573 2060 7361 7665 2d73 s causes `save-s │ │ │ -000004a0: 6f6d 652d 6275 6666 6572 7327 2074 6f20 ome-buffers' to │ │ │ -000004b0: 6f66 6665 7220 746f 2073 6176 6520 7468 offer to save th │ │ │ -000004c0: 6520 6162 6272 6576 732e 1f0a 2864 6566 e abbrevs...(def │ │ │ -000004d0: 7661 7220 6162 6272 6576 732d 6368 616e var abbrevs-chan │ │ │ -000004e0: 6765 6420 6e69 6c20 2823 2420 2e20 3131 ged nil (#$ . 11 │ │ │ -000004f0: 3131 2929 0a23 4034 3220 5265 7475 726e 11)).#@42 Return │ │ │ -00000500: 2061 206e 6577 2c20 656d 7074 7920 6162 a new, empty ab │ │ │ -00000510: 6272 6576 2074 6162 6c65 206f 626a 6563 brev table objec │ │ │ -00000520: 742e 1f0a 2864 6566 616c 6961 7320 276d t...(defalias 'm │ │ │ -00000530: 616b 652d 6162 6272 6576 2d74 6162 6c65 ake-abbrev-table │ │ │ -00000540: 2023 5b6e 696c 2022 c0c1 c25c 2287 2220 #[nil "...\"." │ │ │ -00000550: 5b6d 616b 652d 7665 6374 6f72 2035 3920 [make-vector 59 │ │ │ -00000560: 305d 2033 2028 2324 202e 2031 3237 3429 0] 3 (#$ . 1274) │ │ │ -00000570: 5d29 0a23 4036 3320 556e 6465 6669 6e65 ]).#@63 Undefine │ │ │ -00000580: 2061 6c6c 2061 6262 7265 7673 2069 6e20 all abbrevs in │ │ │ -00000590: 6162 6272 6576 2074 6162 6c65 2054 4142 abbrev table TAB │ │ │ -000005a0: 4c45 2c20 6c65 6176 696e 6720 6974 2065 LE, leaving it e │ │ │ -000005b0: 6d70 7479 2e1f 0a28 6465 6661 6c69 6173 mpty...(defalias │ │ │ -000005c0: 2027 636c 6561 722d 6162 6272 6576 2d74 'clear-abbrev-t │ │ │ -000005d0: 6162 6c65 2023 5b28 7461 626c 6529 2022 able #[(table) " │ │ │ -000005e0: c209 c35c 2288 c410 c587 2220 5b61 6262 ...\"....." [abb │ │ │ -000005f0: 7265 7673 2d63 6861 6e67 6564 2074 6162 revs-changed tab │ │ │ -00000600: 6c65 2066 696c 6c61 7272 6179 2030 2074 le fillarray 0 t │ │ │ -00000610: 206e 696c 5d20 3320 2823 2420 2e20 3134 nil] 3 (#$ . 14 │ │ │ -00000620: 3030 295d 290a 2340 3138 3020 4465 6669 00)]).#@180 Defi │ │ │ -00000630: 6e65 2054 4142 4c45 2d4e 414d 4520 2861 ne TABLE-NAME (a │ │ │ -00000640: 2073 796d 626f 6c29 2061 7320 616e 2061 symbol) as an a │ │ │ -00000650: 6262 7265 7620 7461 626c 6520 6e61 6d65 bbrev table name │ │ │ -00000660: 2e0a 4465 6669 6e65 2061 6262 7265 7673 ..Define abbrevs │ │ │ -00000670: 2069 6e20 6974 2061 6363 6f72 6469 6e67 in it according │ │ │ -00000680: 2074 6f20 4445 4649 4e49 5449 4f4e 532c to DEFINITIONS, │ │ │ -00000690: 2077 6869 6368 2069 7320 6120 6c69 7374 which is a list │ │ │ -000006a0: 206f 6620 656c 656d 656e 7473 0a6f 6620 of elements.of │ │ │ -000006b0: 7468 6520 666f 726d 2028 4142 4252 4556 the form (ABBREV │ │ │ -000006c0: 4e41 4d45 2045 5850 414e 5349 4f4e 2048 NAME EXPANSION H │ │ │ -000006d0: 4f4f 4b20 5553 4543 4f55 4e54 292e 1f0a OOK USECOUNT)... │ │ │ -000006e0: 2864 6566 616c 6961 7320 2764 6566 696e (defalias 'defin │ │ │ -000006f0: 652d 6162 6272 6576 2d74 6162 6c65 2023 e-abbrev-table # │ │ │ -00000700: 5b28 7461 626c 652d 6e61 6d65 2064 6566 [(table-name def │ │ │ -00000710: 696e 6974 696f 6e73 2920 22c4 5c6e 21ad initions) ".\n!. │ │ │ -00000720: 825c 6e4a 1bc5 0b21 ac99 0bac 8dc6 2013 .\nJ...!...... . │ │ │ -00000730: 5c6e 0b4c 885c 6e08 4210 aa89 c7c5 0b5c \n.L.\n.B......\ │ │ │ -00000740: 2213 5c6e 0b4c 8809 ad8e c8c9 0b09 4023 ".\n.L........@# │ │ │ -00000750: 8809 4189 11ac 73ca 2987 2220 5b61 6262 ..A...s.)." [abb │ │ │ -00000760: 7265 762d 7461 626c 652d 6e61 6d65 2d6c rev-table-name-l │ │ │ -00000770: 6973 7420 6465 6669 6e69 7469 6f6e 7320 ist definitions │ │ │ -00000780: 7461 626c 652d 6e61 6d65 2074 6162 6c65 table-name table │ │ │ -00000790: 2062 6f75 6e64 7020 7665 6374 6f72 7020 boundp vectorp │ │ │ -000007a0: 6d61 6b65 2d61 6262 7265 762d 7461 626c make-abbrev-tabl │ │ │ -000007b0: 6520 7772 6f6e 672d 7479 7065 2d61 7267 e wrong-type-arg │ │ │ -000007c0: 756d 656e 7420 6170 706c 7920 6465 6669 ument apply defi │ │ │ -000007d0: 6e65 2d61 6262 7265 7620 6e69 6c5d 2035 ne-abbrev nil] 5 │ │ │ -000007e0: 2028 2324 202e 2031 3538 3029 5d29 0a23 (#$ . 1580)]).# │ │ │ -000007f0: 4031 3939 2044 6566 696e 6520 616e 2061 @199 Define an a │ │ │ -00000800: 6262 7265 7620 696e 2054 4142 4c45 206e bbrev in TABLE n │ │ │ -00000810: 616d 6564 204e 414d 452c 2074 6f20 6578 amed NAME, to ex │ │ │ -00000820: 7061 6e64 2074 6f20 4558 5041 4e53 494f pand to EXPANSIO │ │ │ -00000830: 4e20 6f72 2063 616c 6c20 484f 4f4b 2e0a N or call HOOK.. │ │ │ -00000840: 4e41 4d45 2061 6e64 2045 5850 414e 5349 NAME and EXPANSI │ │ │ -00000850: 4f4e 2061 7265 2073 7472 696e 6773 2e20 ON are strings. │ │ │ -00000860: 2048 6f6f 6b20 6973 2061 2066 756e 6374 Hook is a funct │ │ │ -00000870: 696f 6e20 6f72 2060 6e69 6c27 2e0a 546f ion or `nil'..To │ │ │ -00000880: 2075 6e64 6566 696e 6520 616e 2061 6262 undefine an abb │ │ │ -00000890: 7265 762c 2064 6566 696e 6520 6974 2077 rev, define it w │ │ │ -000008a0: 6974 6820 616e 2065 7870 616e 7369 6f6e ith an expansion │ │ │ -000008b0: 206f 6620 606e 696c 272e 1f0a 2864 6566 of `nil'...(def │ │ │ -000008c0: 616c 6961 7320 2764 6566 696e 652d 6162 alias 'define-ab │ │ │ -000008d0: 6272 6576 2023 5b28 7461 626c 6520 6e61 brev #[(table na │ │ │ -000008e0: 6d65 2026 6f70 7469 6f6e 616c 2065 7870 me &optional exp │ │ │ -000008f0: 616e 7369 6f6e 2068 6f6f 6b20 636f 756e ansion hook coun │ │ │ -00000900: 7429 2022 0cab 8f0c 3bac 8bc6 c7c8 0cc4 t) "....;....... │ │ │ -00000910: 455c 2289 14ac 710b ab8f 0ba8 ac8b c6c7 E\"...q......... │ │ │ -00000920: c90b c345 5c22 8913 ac71 ca5c 6e21 ac8a ...E\"...q.\n!.. │ │ │ -00000930: c6c7 cb5c 6ec2 455c 2212 aa71 cc09 5c6e ...\n.E\"..q..\n │ │ │ -00000940: 5c22 1dcd 0d21 ad82 0d4a 18ce 0d21 ad82 \"...!...J...!.. │ │ │ -00000950: 0d4b 891e 170e 166b ab8d 083b ab89 0c3b .K.....k...;...; │ │ │ -00000960: ab85 080c 98ac 90cf 1618 d0d1 095c 22ab .............\". │ │ │ -00000970: 87cc d25c 6e5c 22d3 4c88 0d0c 4c88 0d0e ...\n\".L...L... │ │ │ -00000980: 164d 88d4 0d0b ae81 d55c 2288 092b 8722 .M.......\"..+." │ │ │ -00000990: 205b 6f65 7870 206e 616d 6520 7461 626c [oexp name tabl │ │ │ -000009a0: 6520 636f 756e 7420 6578 7061 6e73 696f e count expansio │ │ │ -000009b0: 6e20 7379 6d20 7369 676e 616c 2077 726f n sym signal wro │ │ │ -000009c0: 6e67 2d74 7970 652d 6172 6775 6d65 6e74 ng-type-argument │ │ │ -000009d0: 2028 6f72 206e 756c 6c20 7374 7269 6e67 (or null string │ │ │ -000009e0: 2920 286f 7220 6e75 6c6c 2069 6e74 6567 ) (or null integ │ │ │ -000009f0: 6572 2920 7665 6374 6f72 7020 7665 6374 er) vectorp vect │ │ │ -00000a00: 6f72 2069 6e74 6572 6e20 626f 756e 6470 or intern boundp │ │ │ -00000a10: 2066 626f 756e 6470 2074 2073 7472 696e fboundp t strin │ │ │ -00000a20: 672d 6d61 7463 6820 225c 5c57 2220 2220 g-match "\\W" " │ │ │ -00000a30: 2220 6e69 6c20 7365 7470 6c69 7374 2030 " nil setplist 0 │ │ │ -00000a40: 2068 6f6f 6b20 6f68 6f6f 6b20 6162 6272 hook ohook abbr │ │ │ -00000a50: 6576 732d 6368 616e 6765 645d 2036 2028 evs-changed] 6 ( │ │ │ -00000a60: 2324 202e 2032 3033 3729 5d29 0a28 6279 #$ . 2037)]).(by │ │ │ -00000a70: 7465 2d63 6f64 6520 220d 1c0c ab99 0c40 te-code "......@ │ │ │ -00000a80: 891b 3aab 8cc6 0b0d 5c22 15c7 0b40 0b41 ..:.....\"...@.A │ │ │ -00000a90: 5c22 880c 4114 29aa 6409 ac87 c820 11c1 \"..A.).d.... .. │ │ │ -00000aa0: 0d42 155c 6eac 87c8 2012 c20d 4215 0e5c .B.\n... ...B..\ │ │ │ -00000ab0: 6ec9 61ab 8508 ac82 5c6e 1029 c687 2220 n.a.....\n.).." │ │ │ -00000ac0: 5b6c 6f63 616c 2d61 6262 7265 762d 7461 [local-abbrev-ta │ │ │ -00000ad0: 626c 6520 676c 6f62 616c 2d61 6262 7265 ble global-abbre │ │ │ -00000ae0: 762d 7461 626c 6520 6675 6e64 616d 656e v-table fundamen │ │ │ -00000af0: 7461 6c2d 6d6f 6465 2d61 6262 7265 762d tal-mode-abbrev- │ │ │ -00000b00: 7461 626c 6520 6669 7875 7020 6c20 6162 table fixup l ab │ │ │ -00000b10: 6272 6576 2d74 6162 6c65 2d6e 616d 652d brev-table-name- │ │ │ -00000b20: 6c69 7374 2064 656c 7120 6465 6669 6e65 list delq define │ │ │ -00000b30: 2d61 6262 7265 762d 7461 626c 6520 6d61 -abbrev-table ma │ │ │ -00000b40: 6b65 2d61 6262 7265 762d 7461 626c 6520 ke-abbrev-table │ │ │ -00000b50: 6675 6e64 616d 656e 7461 6c2d 6d6f 6465 fundamental-mode │ │ │ -00000b60: 206d 616a 6f72 2d6d 6f64 655d 2034 290a major-mode] 4). │ │ │ -00000b70: 2340 3535 2044 6566 696e 6520 4142 4252 #@55 Define ABBR │ │ │ -00000b80: 4556 2061 7320 6120 676c 6f62 616c 2061 EV as a global a │ │ │ -00000b90: 6262 7265 7669 6174 696f 6e20 666f 7220 bbreviation for │ │ │ -00000ba0: 4558 5041 4e53 494f 4e2e 1f0a 2864 6566 EXPANSION...(def │ │ │ -00000bb0: 616c 6961 7320 2764 6566 696e 652d 676c alias 'define-gl │ │ │ -00000bc0: 6f62 616c 2d61 6262 7265 7620 235b 286e obal-abbrev #[(n │ │ │ -00000bd0: 616d 6520 6578 7061 6e73 696f 6e29 2022 ame expansion) " │ │ │ -00000be0: c35c 6e09 9708 c4c5 2587 2220 5b65 7870 .\n.....%." [exp │ │ │ -00000bf0: 616e 7369 6f6e 206e 616d 6520 676c 6f62 ansion name glob │ │ │ -00000c00: 616c 2d61 6262 7265 762d 7461 626c 6520 al-abbrev-table │ │ │ -00000c10: 6465 6669 6e65 2d61 6262 7265 7620 6e69 define-abbrev ni │ │ │ -00000c20: 6c20 305d 2036 2028 2324 202e 2032 3933 l 0] 6 (#$ . 293 │ │ │ -00000c30: 3329 2022 7344 6566 696e 6520 676c 6f62 3) "sDefine glob │ │ │ -00000c40: 616c 2061 6262 7265 763a 205c 6e73 4578 al abbrev: \nsEx │ │ │ -00000c50: 7061 6e73 696f 6e20 666f 7220 2573 3a20 pansion for %s: │ │ │ -00000c60: 225d 290a 2340 3632 2044 6566 696e 6520 "]).#@62 Define │ │ │ -00000c70: 4142 4252 4556 2061 7320 6120 6d6f 6465 ABBREV as a mode │ │ │ -00000c80: 2d73 7065 6369 6669 6320 6162 6272 6576 -specific abbrev │ │ │ -00000c90: 6961 7469 6f6e 2066 6f72 2045 5850 414e iation for EXPAN │ │ │ -00000ca0: 5349 4f4e 2e1f 0a28 6465 6661 6c69 6173 SION...(defalias │ │ │ -00000cb0: 2027 6465 6669 6e65 2d6d 6f64 652d 6162 'define-mode-ab │ │ │ -00000cc0: 6272 6576 2023 5b28 6e61 6d65 2065 7870 brev #[(name exp │ │ │ -00000cd0: 616e 7369 6f6e 2920 22c3 5c6e ae83 c4c5 ansion) ".\n.... │ │ │ -00000ce0: 2109 9708 c6c7 2587 2220 5b65 7870 616e !.....%." [expan │ │ │ -00000cf0: 7369 6f6e 206e 616d 6520 6c6f 6361 6c2d sion name local- │ │ │ -00000d00: 6162 6272 6576 2d74 6162 6c65 2064 6566 abbrev-table def │ │ │ -00000d10: 696e 652d 6162 6272 6576 2065 7272 6f72 ine-abbrev error │ │ │ -00000d20: 2022 4d61 6a6f 7220 6d6f 6465 2068 6173 "Major mode has │ │ │ -00000d30: 206e 6f20 6162 6272 6576 2074 6162 6c65 no abbrev table │ │ │ -00000d40: 2220 6e69 6c20 305d 2036 2028 2324 202e " nil 0] 6 (#$ . │ │ │ -00000d50: 2033 3137 3729 2022 7344 6566 696e 6520 3177) "sDefine │ │ │ -00000d60: 6d6f 6465 2061 6262 7265 763a 205c 6e73 mode abbrev: \ns │ │ │ -00000d70: 4578 7061 6e73 696f 6e20 666f 7220 2573 Expansion for %s │ │ │ -00000d80: 3a20 225d 290a 2340 3338 3420 5265 7475 : "]).#@384 Retu │ │ │ -00000d90: 726e 2074 6865 2073 796d 626f 6c20 7265 rn the symbol re │ │ │ -00000da0: 7072 6573 656e 7469 6e67 2061 6262 7265 presenting abbre │ │ │ -00000db0: 7620 6e61 6d65 6420 4142 4252 4556 2e0a v named ABBREV.. │ │ │ -00000dc0: 5468 6973 2073 796d 626f 6c27 7320 6e61 This symbol's na │ │ │ -00000dd0: 6d65 2069 7320 4142 4252 4556 2c20 6275 me is ABBREV, bu │ │ │ -00000de0: 7420 6974 2069 7320 6e6f 7420 7468 6520 t it is not the │ │ │ -00000df0: 6361 6e6f 6e69 6361 6c20 7379 6d62 6f6c canonical symbol │ │ │ -00000e00: 206f 6620 7468 6174 206e 616d 653b 0a69 of that name;.i │ │ │ -00000e10: 7420 6973 2069 6e74 6572 6e65 6420 696e t is interned in │ │ │ -00000e20: 2061 6e20 6162 6272 6576 2d74 6162 6c65 an abbrev-table │ │ │ -00000e30: 2072 6174 6865 7220 7468 616e 2074 6865 rather than the │ │ │ -00000e40: 206e 6f72 6d61 6c20 6f62 6172 7261 792e normal obarray. │ │ │ -00000e50: 0a54 6865 2076 616c 7565 2069 7320 6e69 .The value is ni │ │ │ -00000e60: 6c20 6966 2074 6861 7420 6162 6272 6576 l if that abbrev │ │ │ -00000e70: 2069 7320 6e6f 7420 6465 6669 6e65 642e is not defined. │ │ │ -00000e80: 0a4f 7074 696f 6e61 6c20 7365 636f 6e64 .Optional second │ │ │ -00000e90: 2061 7267 2054 4142 4c45 2069 7320 6162 arg TABLE is ab │ │ │ -00000ea0: 6272 6576 2074 6162 6c65 2074 6f20 6c6f brev table to lo │ │ │ -00000eb0: 6f6b 2069 7420 7570 2069 6e2e 0a54 6865 ok it up in..The │ │ │ -00000ec0: 2064 6566 6175 6c74 2069 7320 746f 2074 default is to t │ │ │ -00000ed0: 7279 2062 7566 6665 7227 7320 6d6f 6465 ry buffer's mode │ │ │ -00000ee0: 2d73 7065 6369 6669 6320 6162 6272 6576 -specific abbrev │ │ │ -00000ef0: 2074 6162 6c65 2c20 7468 656e 2067 6c6f table, then glo │ │ │ -00000f00: 6261 6c20 7461 626c 652e 1f0a 2864 6566 bal table...(def │ │ │ -00000f10: 616c 6961 7320 2761 6262 7265 762d 7379 alias 'abbrev-sy │ │ │ -00000f20: 6d62 6f6c 2023 5b28 6162 6272 6576 2026 mbol #[(abbrev & │ │ │ -00000f30: 6f70 7469 6f6e 616c 2074 6162 6c65 2920 optional table) │ │ │ -00000f40: 22c4 1b5c 6eab 850b 5c6e 21aa 8b09 ab85 "..\n...\n!..... │ │ │ -00000f50: 0b09 21ae 830b 0821 2987 2220 5b67 6c6f ..!....!)." [glo │ │ │ -00000f60: 6261 6c2d 6162 6272 6576 2d74 6162 6c65 bal-abbrev-table │ │ │ -00000f70: 206c 6f63 616c 2d61 6262 7265 762d 7461 local-abbrev-ta │ │ │ -00000f80: 626c 6520 7461 626c 6520 6672 6f62 2023 ble table frob # │ │ │ -00000f90: 5b28 7461 626c 6529 2022 c309 085c 221a [(table) "...\". │ │ │ -00000fa0: c45c 6e21 ad86 5c6e 4a3b ad81 5c6e 2987 .\n!..\nJ;..\n). │ │ │ -00000fb0: 2220 5b74 6162 6c65 2061 6262 7265 7620 " [table abbrev │ │ │ -00000fc0: 7379 6d20 696e 7465 726e 2d73 6f66 7420 sym intern-soft │ │ │ -00000fd0: 626f 756e 6470 5d20 335d 5d20 3220 2823 boundp] 3]] 2 (# │ │ │ -00000fe0: 2420 2e20 3334 3638 295d 290a 2340 3136 $ . 3468)]).#@16 │ │ │ -00000ff0: 3220 5265 7475 726e 2074 6865 2073 7472 2 Return the str │ │ │ -00001000: 696e 6720 7468 6174 2041 4242 5245 5620 ing that ABBREV │ │ │ -00001010: 6578 7061 6e64 7320 696e 746f 2069 6e20 expands into in │ │ │ -00001020: 7468 6520 6375 7272 656e 7420 6275 6666 the current buff │ │ │ -00001030: 6572 2e0a 4f70 7469 6f6e 616c 6c79 2073 er..Optionally s │ │ │ -00001040: 7065 6369 6679 2061 6e20 6162 6272 6576 pecify an abbrev │ │ │ -00001050: 2074 6162 6c65 2061 7320 7365 636f 6e64 table as second │ │ │ -00001060: 2061 7267 3b0a 7468 656e 2041 4242 5245 arg;.then ABBRE │ │ │ -00001070: 5620 6973 206c 6f6f 6b65 6420 7570 2069 V is looked up i │ │ │ -00001080: 6e20 7468 6174 2074 6162 6c65 206f 6e6c n that table onl │ │ │ -00001090: 792e 1f0a 2864 6566 616c 6961 7320 2761 y...(defalias 'a │ │ │ -000010a0: 6262 7265 762d 6578 7061 6e73 696f 6e20 bbrev-expansion │ │ │ -000010b0: 235b 2861 6262 7265 7620 266f 7074 696f #[(abbrev &optio │ │ │ -000010c0: 6e61 6c20 7461 626c 6529 2022 c309 085c nal table) "...\ │ │ │ -000010d0: 2289 1aad 825c 6e4a 2987 2220 5b74 6162 "....\nJ)." [tab │ │ │ -000010e0: 6c65 2061 6262 7265 7620 7379 6d20 6162 le abbrev sym ab │ │ │ -000010f0: 6272 6576 2d73 796d 626f 6c5d 2034 2028 brev-symbol] 4 ( │ │ │ -00001100: 2324 202e 2034 3038 3229 5d29 0a23 4031 #$ . 4082)]).#@1 │ │ │ -00001110: 3339 2055 6e64 6f20 7468 6520 6578 7061 39 Undo the expa │ │ │ -00001120: 6e73 696f 6e20 6f66 2074 6865 206c 6173 nsion of the las │ │ │ -00001130: 7420 6162 6272 6576 2074 6861 7420 6578 t abbrev that ex │ │ │ -00001140: 7061 6e64 6564 2e0a 5468 6973 2064 6966 panded..This dif │ │ │ -00001150: 6665 7273 2066 726f 6d20 6f72 6469 6e61 fers from ordina │ │ │ -00001160: 7279 2075 6e64 6f20 696e 2074 6861 7420 ry undo in that │ │ │ -00001170: 6f74 6865 7220 6564 6974 696e 6720 646f other editing do │ │ │ -00001180: 6e65 2073 696e 6365 2074 6865 6e0a 6973 ne since then.is │ │ │ -00001190: 206e 6f74 2075 6e64 6f6e 652e 1f0a 2864 not undone...(d │ │ │ -000011a0: 6566 616c 6961 7320 2775 6e65 7870 616e efalias 'unexpan │ │ │ -000011b0: 642d 6162 6272 6576 2023 5b6e 696c 2022 d-abbrev #[nil " │ │ │ -000011c0: 0d65 57ae 880d 6456 ae83 0b3b 3f3f ada9 .eW...dV...;??.. │ │ │ -000011d0: 601a 094a 8918 471c 0d62 880d 890c 5c5c `..J..G..b....\\ │ │ │ -000011e0: 7c88 0b63 880c 0b47 5a14 c613 0d5c 6e57 |..c...GZ....\nW │ │ │ -000011f0: ab86 5c6e 0c5a 62aa 825c 6e62 2b87 2220 ..\n.Zb..\nb+." │ │ │ -00001200: 5b76 616c 206c 6173 742d 6162 6272 6576 [val last-abbrev │ │ │ -00001210: 206f 706f 696e 7420 6c61 7374 2d61 6262 opoint last-abb │ │ │ -00001220: 7265 762d 7465 7874 2061 646a 7573 7420 rev-text adjust │ │ │ -00001230: 6c61 7374 2d61 6262 7265 762d 6c6f 6361 last-abbrev-loca │ │ │ -00001240: 7469 6f6e 206e 696c 5d20 3420 2823 2420 tion nil] 4 (#$ │ │ │ -00001250: 2e20 3433 3731 2920 6e69 6c5d 290a 2340 . 4371) nil]).#@ │ │ │ -00001260: 3336 3320 496e 7365 7274 2062 6566 6f72 363 Insert befor │ │ │ -00001270: 6520 706f 696e 7420 6120 6675 6c6c 2064 e point a full d │ │ │ -00001280: 6573 6372 6970 7469 6f6e 206f 6620 6162 escription of ab │ │ │ -00001290: 6272 6576 2074 6162 6c65 206e 616d 6564 brev table named │ │ │ -000012a0: 204e 414d 452e 0a4e 414d 4520 6973 2061 NAME..NAME is a │ │ │ -000012b0: 2073 796d 626f 6c20 7768 6f73 6520 7661 symbol whose va │ │ │ -000012c0: 6c75 6520 6973 2061 6e20 6162 6272 6576 lue is an abbrev │ │ │ -000012d0: 2074 6162 6c65 2e0a 4966 206f 7074 696f table..If optio │ │ │ -000012e0: 6e61 6c20 7365 636f 6e64 2061 7267 756d nal second argum │ │ │ -000012f0: 656e 7420 4855 4d41 4e2d 5245 4144 4142 ent HUMAN-READAB │ │ │ -00001300: 4c45 2069 7320 6e6f 6e2d 6e69 6c2c 2069 LE is non-nil, i │ │ │ -00001310: 6e73 6572 7420 610a 6875 6d61 6e2d 7265 nsert a.human-re │ │ │ -00001320: 6164 6162 6c65 2064 6573 6372 6970 7469 adable descripti │ │ │ -00001330: 6f6e 2e20 4f74 6865 7277 6973 6520 7468 on. Otherwise th │ │ │ -00001340: 6520 6465 7363 7269 7074 696f 6e20 6973 e description is │ │ │ -00001350: 2061 6e0a 6578 7072 6573 7369 6f6e 2c20 an.expression, │ │ │ -00001360: 6120 6361 6c6c 2074 6f20 6064 6566 696e a call to `defin │ │ │ -00001370: 652d 6162 6272 6576 2d74 6162 6c65 272c e-abbrev-table', │ │ │ -00001380: 2077 6869 6368 2077 6f75 6c64 2064 6566 which would def │ │ │ -00001390: 696e 6520 7468 650a 6162 6272 6576 2074 ine the.abbrev t │ │ │ -000013a0: 6162 6c65 204e 414d 4520 6578 6163 746c able NAME exactl │ │ │ -000013b0: 7920 6173 2069 7420 6973 2063 7572 7265 y as it is curre │ │ │ -000013c0: 6e74 6c79 2064 6566 696e 6564 2e1f 0a28 ntly defined...( │ │ │ -000013d0: 6465 6661 6c69 6173 2027 696e 7365 7274 defalias 'insert │ │ │ -000013e0: 2d61 6262 7265 762d 7461 626c 652d 6465 -abbrev-table-de │ │ │ -000013f0: 7363 7269 7074 696f 6e20 235b 286e 616d scription #[(nam │ │ │ -00001400: 6520 266f 7074 696f 6e61 6c20 6875 6d61 e &optional huma │ │ │ -00001410: 6e2d 7265 6164 6162 6c65 2920 225c 6e4a n-readable) "\nJ │ │ │ -00001420: 701b 19c4 c55c 6e5c 2288 08ab 99c6 5c6e p....\n\".....\n │ │ │ -00001430: 430b 5c22 88c7 0b21 88c7 0b21 88c8 c909 C.\"...!...!.... │ │ │ -00001440: 5c22 88c7 0b21 88aa 99ca cb0b 5c22 88c6 \"...!......\".. │ │ │ -00001450: 5c6e 0b5c 2288 cacc 0b5c 2288 c8cd 095c \n.\"....\"....\ │ │ │ -00001460: 2288 cace 0b5c 2288 c70b 2188 2ac4 cf21 "....\"...!.*..! │ │ │ -00001470: 8722 205b 6875 6d61 6e2d 7265 6164 6162 ." [human-readab │ │ │ -00001480: 6c65 2074 6162 6c65 206e 616d 6520 7374 le table name st │ │ │ -00001490: 7265 616d 206d 6573 7361 6765 2022 4162 ream message "Ab │ │ │ -000014a0: 6272 6576 2d74 6162 6c65 2025 732e 2e2e brev-table %s... │ │ │ -000014b0: 2220 7072 696e 3120 7465 7270 7269 206d " prin1 terpri m │ │ │ -000014c0: 6170 6174 6f6d 7320 235b 2873 796d 2920 apatoms #[(sym) │ │ │ -000014d0: 2209 4aad dfc4 c509 2121 8918 471b c608 ".J.....!!..G... │ │ │ -000014e0: 5c6e 5c22 880b c757 ab8b c8c9 5c6e 5c22 \n\"...W....\n\" │ │ │ -000014f0: 880b 5489 13aa 71c6 cacb cc09 215c 225c ..T...q.....!\"\ │ │ │ -00001500: 6e5c 2288 094b ac88 cd09 4a5c 6e5c 2288 n\"..K....J\n\". │ │ │ -00001510: aaa7 c409 4a21 100b 0847 5c5c ce5c 5c13 ....J!...G\\.\\. │ │ │ -00001520: c608 5c6e 5c22 880b cf57 ab8b c8c9 5c6e ..\n\"...W....\n │ │ │ -00001530: 5c22 880b 5489 13aa 71cd 094b 5c6e 5c22 \"..T...q..K\n\" │ │ │ -00001540: 88d0 5c6e 212a 8722 205b 6e20 7379 6d20 ..\n!*." [n sym │ │ │ -00001550: 7374 7265 616d 2070 6f73 2070 7269 6e31 stream pos prin1 │ │ │ -00001560: 2d74 6f2d 7374 7269 6e67 2073 796d 626f -to-string symbo │ │ │ -00001570: 6c2d 6e61 6d65 2070 7269 6e63 2031 3420 l-name princ 14 │ │ │ -00001580: 7772 6974 652d 6368 6172 203f 5c20 2066 write-char ?\ f │ │ │ -00001590: 6f72 6d61 7420 2220 252d 3553 2022 2073 ormat " %-5S " s │ │ │ -000015a0: 796d 626f 6c2d 706c 6973 7420 7072 696e ymbol-plist prin │ │ │ -000015b0: 3120 3620 3435 2074 6572 7072 695d 2036 1 6 45 terpri] 6 │ │ │ -000015c0: 5d20 7072 696e 6320 2228 6465 6669 6e65 ] princ "(define │ │ │ -000015d0: 2d61 6262 7265 762d 7461 626c 6520 2722 -abbrev-table '" │ │ │ -000015e0: 2022 2027 285c 6e22 2023 5b28 7379 6d29 " '(\n" #[(sym) │ │ │ -000015f0: 2022 094a ad97 c2c3 085c 2288 c4c5 0921 ".J.....\"....! │ │ │ -00001600: 094a 094b c609 2146 085c 2288 c708 2187 .J.K..!F.\"...!. │ │ │ -00001610: 2220 5b73 7472 6561 6d20 7379 6d20 7072 " [stream sym pr │ │ │ -00001620: 696e 6320 2220 2020 2022 2070 7269 6e31 inc " " prin1 │ │ │ -00001630: 2073 796d 626f 6c2d 6e61 6d65 2073 796d symbol-name sym │ │ │ -00001640: 626f 6c2d 706c 6973 7420 7465 7270 7269 bol-plist terpri │ │ │ -00001650: 5d20 365d 2022 2020 2020 2929 5c6e 2220 ] 6] " ))\n" │ │ │ -00001660: 2222 5d20 3320 2823 2420 2e20 3437 3038 ""] 3 (#$ . 4708 │ │ │ -00001670: 295d 290a 2340 3138 3920 546f 6767 6c65 )]).#@189 Toggle │ │ │ -00001680: 2061 6262 7265 7620 6d6f 6465 2e0a 5769 abbrev mode..Wi │ │ │ -00001690: 7468 2061 7267 756d 656e 7420 4152 472c th argument ARG, │ │ │ -000016a0: 2065 6e61 626c 6520 6162 6272 6576 206d enable abbrev m │ │ │ -000016b0: 6f64 6520 6966 2041 5247 2069 7320 706f ode if ARG is po │ │ │ -000016c0: 7369 7469 7665 2c20 656c 7365 2064 6973 sitive, else dis │ │ │ -000016d0: 6162 6c65 2e0a 496e 2061 6262 7265 7620 able..In abbrev │ │ │ -000016e0: 6d6f 6465 2c20 696e 7365 7274 696e 6720 mode, inserting │ │ │ -000016f0: 616e 2061 6262 7265 7669 6174 696f 6e20 an abbreviation │ │ │ -00001700: 6361 7573 6573 2069 7420 746f 2065 7870 causes it to exp │ │ │ -00001710: 616e 640a 616e 6420 6265 2072 6570 6c61 and.and be repla │ │ │ -00001720: 6365 6420 6279 2069 7473 2065 7870 616e ced by its expan │ │ │ -00001730: 7369 6f6e 2e1f 0a28 6465 6661 6c69 6173 sion...(defalias │ │ │ -00001740: 2027 6162 6272 6576 2d6d 6f64 6520 235b 'abbrev-mode #[ │ │ │ -00001750: 2861 7267 2920 2209 ac84 083f aa85 c209 (arg) "....?.... │ │ │ -00001760: 21c3 5610 c420 8722 205b 6162 6272 6576 !.V.. ." [abbrev │ │ │ -00001770: 2d6d 6f64 6520 6172 6720 7072 6566 6978 -mode arg prefix │ │ │ -00001780: 2d6e 756d 6572 6963 2d76 616c 7565 2030 -numeric-value 0 │ │ │ -00001790: 2072 6564 7261 772d 6d6f 6465 6c69 6e65 redraw-modeline │ │ │ -000017a0: 5d20 3220 2823 2420 2e20 3537 3534 2920 ] 2 (#$ . 5754) │ │ │ -000017b0: 2250 225d 290a 2340 3330 204b 6579 6d61 "P"]).#@30 Keyma │ │ │ -000017c0: 7020 7573 6564 2069 6e20 6564 6974 2d61 p used in edit-a │ │ │ -000017d0: 6262 7265 7673 2e1f 0a28 6465 6676 6172 bbrevs...(defvar │ │ │ -000017e0: 2065 6469 742d 6162 6272 6576 732d 6d61 edit-abbrevs-ma │ │ │ -000017f0: 7020 6e69 6c20 2823 2420 2e20 3630 3735 p nil (#$ . 6075 │ │ │ -00001800: 2929 0a28 6279 7465 2d63 6f64 6520 2208 )).(byte-code ". │ │ │ -00001810: ac94 c120 10c2 08c0 5c22 88c3 08c4 c523 ... ....\".....# │ │ │ -00001820: 88c3 08c6 c523 88c1 8722 205b 6564 6974 .....#..." [edit │ │ │ -00001830: 2d61 6262 7265 7673 2d6d 6170 206d 616b -abbrevs-map mak │ │ │ -00001840: 652d 7370 6172 7365 2d6b 6579 6d61 7020 e-sparse-keymap │ │ │ -00001850: 7365 742d 6b65 796d 6170 2d6e 616d 6520 set-keymap-name │ │ │ -00001860: 6465 6669 6e65 2d6b 6579 2022 1813 2220 define-key ".." │ │ │ -00001870: 6564 6974 2d61 6262 7265 7673 2d72 6564 edit-abbrevs-red │ │ │ -00001880: 6566 696e 6520 2203 0322 5d20 3429 0a23 efine ".."] 4).# │ │ │ -00001890: 4033 3120 556e 6465 6669 6e65 2061 6c6c @31 Undefine all │ │ │ -000018a0: 2064 6566 696e 6564 2061 6262 7265 7673 defined abbrevs │ │ │ -000018b0: 2e1f 0a28 6465 6661 6c69 6173 2027 6b69 ...(defalias 'ki │ │ │ -000018c0: 6c6c 2d61 6c6c 2d61 6262 7265 7673 2023 ll-all-abbrevs # │ │ │ -000018d0: 5b6e 696c 2022 0889 19ad 8dc2 0940 4a21 [nil ".......@J! │ │ │ -000018e0: 8809 4189 11ac 74c3 2987 2220 5b61 6262 ..A...t.)." [abb │ │ │ -000018f0: 7265 762d 7461 626c 652d 6e61 6d65 2d6c rev-table-name-l │ │ │ -00001900: 6973 7420 7461 626c 6573 2063 6c65 6172 ist tables clear │ │ │ -00001910: 2d61 6262 7265 762d 7461 626c 6520 6e69 -abbrev-table ni │ │ │ -00001920: 6c5d 2033 2028 2324 202e 2036 3239 3229 l] 3 (#$ . 6292) │ │ │ -00001930: 206e 696c 5d29 0a23 4039 3520 496e 7365 nil]).#@95 Inse │ │ │ -00001940: 7274 2061 6674 6572 2070 6f69 6e74 2061 rt after point a │ │ │ -00001950: 2064 6573 6372 6970 7469 6f6e 206f 6620 description of │ │ │ -00001960: 616c 6c20 6465 6669 6e65 6420 6162 6272 all defined abbr │ │ │ -00001970: 6576 732e 0a4d 6172 6b20 6973 2073 6574 evs..Mark is set │ │ │ -00001980: 2061 6674 6572 2074 6865 2069 6e73 6572 after the inser │ │ │ -00001990: 7465 6420 7465 7874 2e1f 0a28 6465 6661 ted text...(defa │ │ │ -000019a0: 6c69 6173 2027 696e 7365 7274 2d61 6262 lias 'insert-abb │ │ │ -000019b0: 7265 7673 2023 5b6e 696c 2022 c28a 0889 revs #[nil ".... │ │ │ -000019c0: 19ab 8cc3 0940 c45c 2288 0941 8911 ac74 .....@.\"..A...t │ │ │ -000019d0: 2960 2921 8722 205b 6162 6272 6576 2d74 )`)!." [abbrev-t │ │ │ -000019e0: 6162 6c65 2d6e 616d 652d 6c69 7374 2074 able-name-list t │ │ │ -000019f0: 6162 6c65 7320 7075 7368 2d6d 6172 6b20 ables push-mark │ │ │ -00001a00: 696e 7365 7274 2d61 6262 7265 762d 7461 insert-abbrev-ta │ │ │ -00001a10: 626c 652d 6465 7363 7269 7074 696f 6e20 ble-description │ │ │ -00001a20: 745d 2035 2028 2324 202e 2036 3436 3029 t] 5 (#$ . 6460) │ │ │ -00001a30: 206e 696c 5d29 0a23 4034 3020 4469 7370 nil]).#@40 Disp │ │ │ -00001a40: 6c61 7920 6120 6c69 7374 206f 6620 616c lay a list of al │ │ │ -00001a50: 6c20 6465 6669 6e65 6420 6162 6272 6576 l defined abbrev │ │ │ -00001a60: 732e 1f0a 2864 6566 616c 6961 7320 276c s...(defalias 'l │ │ │ -00001a70: 6973 742d 6162 6272 6576 7320 235b 6e69 ist-abbrevs #[ni │ │ │ -00001a80: 6c20 22c0 c120 2187 2220 5b64 6973 706c l ".. !." [displ │ │ │ -00001a90: 6179 2d62 7566 6665 7220 7072 6570 6172 ay-buffer prepar │ │ │ -00001aa0: 652d 6162 6272 6576 2d6c 6973 742d 6275 e-abbrev-list-bu │ │ │ -00001ab0: 6666 6572 5d20 3220 2823 2420 2e20 3637 ffer] 2 (#$ . 67 │ │ │ -00001ac0: 3136 2920 6e69 6c5d 290a 2864 6566 616c 16) nil]).(defal │ │ │ -00001ad0: 6961 7320 2770 7265 7061 7265 2d61 6262 ias 'prepare-abb │ │ │ -00001ae0: 7265 762d 6c69 7374 2d62 7566 6665 7220 rev-list-buffer │ │ │ -00001af0: 235b 6e69 6c20 228a c2c3 2171 88c4 2088 #[nil "...!q.. . │ │ │ -00001b00: 0889 19ab 8cc5 0940 c65c 2288 0941 8911 .......@.\"..A.. │ │ │ -00001b10: ac74 2965 6288 c7c8 2188 c920 8829 c2c3 .t)eb...!.. .).. │ │ │ -00001b20: 2187 2220 5b61 6262 7265 762d 7461 626c !." [abbrev-tabl │ │ │ -00001b30: 652d 6e61 6d65 2d6c 6973 7420 7461 626c e-name-list tabl │ │ │ -00001b40: 6573 2067 6574 2d62 7566 6665 722d 6372 es get-buffer-cr │ │ │ -00001b50: 6561 7465 2022 2a41 6262 7265 7673 2a22 eate "*Abbrevs*" │ │ │ -00001b60: 2065 7261 7365 2d62 7566 6665 7220 696e erase-buffer in │ │ │ -00001b70: 7365 7274 2d61 6262 7265 762d 7461 626c sert-abbrev-tabl │ │ │ -00001b80: 652d 6465 7363 7269 7074 696f 6e20 7420 e-description t │ │ │ -00001b90: 7365 742d 6275 6666 6572 2d6d 6f64 6966 set-buffer-modif │ │ │ -00001ba0: 6965 642d 7020 6e69 6c20 6564 6974 2d61 ied-p nil edit-a │ │ │ -00001bb0: 6262 7265 7673 2d6d 6f64 655d 2034 5d29 bbrevs-mode] 4]) │ │ │ -00001bc0: 0a23 4037 3620 4d61 6a6f 7220 6d6f 6465 .#@76 Major mode │ │ │ -00001bd0: 2066 6f72 2065 6469 7469 6e67 2074 6865 for editing the │ │ │ -00001be0: 206c 6973 7420 6f66 2061 6262 7265 7620 list of abbrev │ │ │ -00001bf0: 6465 6669 6e69 7469 6f6e 732e 0a5c 7b65 definitions..\{e │ │ │ -00001c00: 6469 742d 6162 6272 6576 732d 6d61 707d dit-abbrevs-map} │ │ │ -00001c10: 1f0a 2864 6566 616c 6961 7320 2765 6469 ..(defalias 'edi │ │ │ -00001c20: 742d 6162 6272 6576 732d 6d6f 6465 2023 t-abbrevs-mode # │ │ │ -00001c30: 5b6e 696c 2022 c312 c411 c508 2187 2220 [nil "......!." │ │ │ -00001c40: 5b65 6469 742d 6162 6272 6576 732d 6d61 [edit-abbrevs-ma │ │ │ -00001c50: 7020 6d6f 6465 2d6e 616d 6520 6d61 6a6f p mode-name majo │ │ │ -00001c60: 722d 6d6f 6465 2065 6469 742d 6162 6272 r-mode edit-abbr │ │ │ -00001c70: 6576 732d 6d6f 6465 2022 4564 6974 2d41 evs-mode "Edit-A │ │ │ -00001c80: 6262 7265 7673 2220 7573 652d 6c6f 6361 bbrevs" use-loca │ │ │ -00001c90: 6c2d 6d61 705d 2032 2028 2324 202e 2037 l-map] 2 (#$ . 7 │ │ │ -00001ca0: 3131 3029 206e 696c 5d29 0a23 4035 3638 110) nil]).#@568 │ │ │ -00001cb0: 2041 6c74 6572 2061 6262 7265 7620 6465 Alter abbrev de │ │ │ -00001cc0: 6669 6e69 7469 6f6e 7320 6279 2065 6469 finitions by edi │ │ │ -00001cd0: 7469 6e67 2061 206c 6973 7420 6f66 2074 ting a list of t │ │ │ -00001ce0: 6865 6d2e 0a53 656c 6563 7473 2061 2062 hem..Selects a b │ │ │ -00001cf0: 7566 6665 7220 636f 6e74 6169 6e69 6e67 uffer containing │ │ │ -00001d00: 2061 206c 6973 7420 6f66 2061 6262 7265 a list of abbre │ │ │ -00001d10: 7620 6465 6669 6e69 7469 6f6e 732e 0a59 v definitions..Y │ │ │ -00001d20: 6f75 2063 616e 2065 6469 7420 7468 656d ou can edit them │ │ │ -00001d30: 2061 6e64 2074 7970 6520 5c3c 6564 6974 and type \\[e │ │ │ -00001d50: 6469 742d 6162 6272 6576 732d 7265 6465 dit-abbrevs-rede │ │ │ -00001d60: 6669 6e65 5d20 746f 2072 6564 6566 696e fine] to redefin │ │ │ -00001d70: 6520 6162 6272 6576 730a 6163 636f 7264 e abbrevs.accord │ │ │ -00001d80: 696e 6720 746f 2079 6f75 7220 6564 6974 ing to your edit │ │ │ -00001d90: 696e 672e 0a42 7566 6665 7220 636f 6e74 ing..Buffer cont │ │ │ -00001da0: 6169 6e73 2061 2068 6561 6465 7220 6c69 ains a header li │ │ │ -00001db0: 6e65 2066 6f72 2065 6163 6820 6162 6272 ne for each abbr │ │ │ -00001dc0: 6576 2074 6162 6c65 2c0a 2077 6869 6368 ev table,. which │ │ │ -00001dd0: 2069 7320 7468 6520 6162 6272 6576 2074 is the abbrev t │ │ │ -00001de0: 6162 6c65 206e 616d 6520 696e 2070 6172 able name in par │ │ │ -00001df0: 656e 7468 6573 6573 2e0a 5468 6973 2069 entheses..This i │ │ │ -00001e00: 7320 666f 6c6c 6f77 6564 2062 7920 6f6e s followed by on │ │ │ -00001e10: 6520 6c69 6e65 2070 6572 2061 6262 7265 e line per abbre │ │ │ -00001e20: 7620 696e 2074 6861 7420 7461 626c 653a v in that table: │ │ │ -00001e30: 0a4e 414d 4520 2020 5553 4543 4f55 4e54 .NAME USECOUNT │ │ │ -00001e40: 2020 2045 5850 414e 5349 4f4e 2020 2048 EXPANSION H │ │ │ -00001e50: 4f4f 4b0a 7768 6572 6520 4e41 4d45 2061 OOK.where NAME a │ │ │ -00001e60: 6e64 2045 5850 414e 5349 4f4e 2061 7265 nd EXPANSION are │ │ │ -00001e70: 2073 7472 696e 6773 2077 6974 6820 7175 strings with qu │ │ │ -00001e80: 6f74 6573 2c0a 5553 4543 4f55 4e54 2069 otes,.USECOUNT i │ │ │ -00001e90: 7320 616e 2069 6e74 6567 6572 2c20 616e s an integer, an │ │ │ -00001ea0: 6420 484f 4f4b 2069 7320 616e 7920 7661 d HOOK is any va │ │ │ -00001eb0: 6c69 6420 6675 6e63 7469 6f6e 0a6f 7220 lid function.or │ │ │ -00001ec0: 6d61 7920 6265 206f 6d69 7474 6564 2028 may be omitted ( │ │ │ -00001ed0: 6974 2069 7320 7573 7561 6c6c 7920 6f6d it is usually om │ │ │ -00001ee0: 6974 7465 6429 2e1f 0a28 6465 6661 6c69 itted)...(defali │ │ │ -00001ef0: 6173 2027 6564 6974 2d61 6262 7265 7673 as 'edit-abbrevs │ │ │ -00001f00: 2023 5b6e 696c 2022 c0c1 2021 8722 205b #[nil ".. !." [ │ │ │ -00001f10: 7377 6974 6368 2d74 6f2d 6275 6666 6572 switch-to-buffer │ │ │ -00001f20: 2070 7265 7061 7265 2d61 6262 7265 762d prepare-abbrev- │ │ │ -00001f30: 6c69 7374 2d62 7566 6665 725d 2032 2028 list-buffer] 2 ( │ │ │ -00001f40: 2324 202e 2037 3334 3529 206e 696c 5d29 #$ . 7345) nil]) │ │ │ -00001f50: 0a23 4035 3620 5265 6465 6669 6e65 2061 .#@56 Redefine a │ │ │ -00001f60: 6262 7265 7673 2061 6363 6f72 6469 6e67 bbrevs according │ │ │ -00001f70: 2074 6f20 6375 7272 656e 7420 6275 6666 to current buff │ │ │ -00001f80: 6572 2063 6f6e 7465 6e74 732e 1f0a 2864 er contents...(d │ │ │ -00001f90: 6566 616c 6961 7320 2765 6469 742d 6162 efalias 'edit-ab │ │ │ -00001fa0: 6272 6576 732d 7265 6465 6669 6e65 2023 brevs-redefine # │ │ │ -00001fb0: 5b6e 696c 2022 c0c1 2188 c2c3 2187 2220 [nil "..!...!." │ │ │ -00001fc0: 5b64 6566 696e 652d 6162 6272 6576 7320 [define-abbrevs │ │ │ -00001fd0: 7420 7365 742d 6275 6666 6572 2d6d 6f64 t set-buffer-mod │ │ │ -00001fe0: 6966 6965 642d 7020 6e69 6c5d 2032 2028 ified-p nil] 2 ( │ │ │ -00001ff0: 2324 202e 2038 3032 3229 206e 696c 5d29 #$ . 8022) nil]) │ │ │ -00002000: 0a23 4032 3535 2044 6566 696e 6520 6162 .#@255 Define ab │ │ │ -00002010: 6272 6576 7320 6163 636f 7264 696e 6720 brevs according │ │ │ -00002020: 746f 2063 7572 7265 6e74 2076 6973 6962 to current visib │ │ │ -00002030: 6c65 2062 7566 6665 7220 636f 6e74 656e le buffer conten │ │ │ -00002040: 7473 2e0a 5365 6520 646f 6375 6d65 6e74 ts..See document │ │ │ -00002050: 6174 696f 6e20 6f66 2060 6564 6974 2d61 ation of `edit-a │ │ │ -00002060: 6262 7265 7673 2720 666f 7220 696e 666f bbrevs' for info │ │ │ -00002070: 206f 6e20 7468 6520 666f 726d 6174 206f on the format o │ │ │ -00002080: 6620 7468 650a 7465 7874 2079 6f75 206d f the.text you m │ │ │ -00002090: 7573 7420 6861 7665 2069 6e20 7468 6520 ust have in the │ │ │ -000020a0: 6275 6666 6572 2e0a 5769 7468 2061 7267 buffer..With arg │ │ │ -000020b0: 756d 656e 742c 2065 6c69 6d69 6e61 7465 ument, eliminate │ │ │ -000020c0: 2061 6c6c 2061 6262 7265 7620 6465 6669 all abbrev defi │ │ │ -000020d0: 6e69 7469 6f6e 7320 6578 6365 7074 0a74 nitions except.t │ │ │ -000020e0: 6865 206f 6e65 7320 6465 6669 6e65 6420 he ones defined │ │ │ -000020f0: 6672 6f6d 2074 6865 2062 7566 6665 7220 from the buffer │ │ │ -00002100: 6e6f 772e 1f0a 2864 6566 616c 6961 7320 now...(defalias │ │ │ -00002110: 2764 6566 696e 652d 6162 6272 6576 7320 'define-abbrevs │ │ │ -00002120: 235b 2826 6f70 7469 6f6e 616c 2061 7267 #[(&optional arg │ │ │ -00002130: 2920 220e 10ab 83c6 2088 8a65 6288 6d3f ) "..... ..eb.m? │ │ │ -00002140: add1 c7c8 c9ca 23ad ca70 1dcb 0d21 1e0f ......#..p...!.. │ │ │ -00002150: c989 1c1b c989 1a19 c918 cc79 88cc 7988 ...........y..y. │ │ │ -00002160: 6cac a6cb 0d21 13cb 0d21 10cb 0d21 11cd l....!...!...!.. │ │ │ -00002170: c978 886c 3fad 83cb 0d21 12cd c978 880b .x.l?....!...x.. │ │ │ -00002180: 095c 6e08 460c 4214 aa54 ce0e 0f0c 5c22 .\n.F.B..T....\" │ │ │ -00002190: 882e 07aa 2b29 8722 205b 636f 756e 7420 ....+)." [count │ │ │ -000021a0: 6578 7020 686f 6f6b 206e 616d 6520 6162 exp hook name ab │ │ │ -000021b0: 6272 6576 7320 6275 6620 6b69 6c6c 2d61 brevs buf kill-a │ │ │ -000021c0: 6c6c 2d61 6262 7265 7673 2072 652d 7365 ll-abbrevs re-se │ │ │ -000021d0: 6172 6368 2d66 6f72 7761 7264 2022 5e28 arch-forward "^( │ │ │ -000021e0: 2220 6e69 6c20 7420 7265 6164 2031 2022 " nil t read 1 " │ │ │ -000021f0: 2009 5c6e 0c22 2064 6566 696e 652d 6162 .\n." define-ab │ │ │ -00002200: 6272 6576 2d74 6162 6c65 2074 6162 6c65 brev-table table │ │ │ -00002210: 2061 7267 5d20 3520 2823 2420 2e20 3831 arg] 5 (#$ . 81 │ │ │ -00002220: 3939 2920 2250 225d 290a 2340 3234 3220 99) "P"]).#@242 │ │ │ -00002230: 5265 6164 2061 6262 7265 7620 6465 6669 Read abbrev defi │ │ │ -00002240: 6e69 7469 6f6e 7320 6672 6f6d 2066 696c nitions from fil │ │ │ -00002250: 6520 7772 6974 7465 6e20 7769 7468 2060 e written with ` │ │ │ -00002260: 7772 6974 652d 6162 6272 6576 2d66 696c write-abbrev-fil │ │ │ -00002270: 6527 2e0a 4f70 7469 6f6e 616c 2061 7267 e'..Optional arg │ │ │ -00002280: 756d 656e 7420 4649 4c45 2069 7320 7468 ument FILE is th │ │ │ -00002290: 6520 6e61 6d65 206f 6620 7468 6520 6669 e name of the fi │ │ │ -000022a0: 6c65 2074 6f20 7265 6164 3b0a 6974 2064 le to read;.it d │ │ │ -000022b0: 6566 6175 6c74 7320 746f 2074 6865 2076 efaults to the v │ │ │ -000022c0: 616c 7565 206f 6620 6061 6262 7265 762d alue of `abbrev- │ │ │ -000022d0: 6669 6c65 2d6e 616d 6527 2e0a 4f70 7469 file-name'..Opti │ │ │ -000022e0: 6f6e 616c 2073 6563 6f6e 6420 6172 6775 onal second argu │ │ │ -000022f0: 6d65 6e74 2051 5549 4554 4c59 206e 6f6e ment QUIETLY non │ │ │ -00002300: 2d6e 696c 206d 6561 6e73 2064 6f6e 2774 -nil means don't │ │ │ -00002310: 2070 7269 6e74 2061 6e79 7468 696e 672e print anything. │ │ │ -00002320: 1f0a 2864 6566 616c 6961 7320 2772 6561 ..(defalias 'rea │ │ │ -00002330: 642d 6162 6272 6576 2d66 696c 6520 235b d-abbrev-file #[ │ │ │ -00002340: 2826 6f70 7469 6f6e 616c 2066 696c 6520 (&optional file │ │ │ -00002350: 7175 6965 746c 7929 2022 c50c ab89 0c47 quietly) ".....G │ │ │ -00002360: c656 ab83 0caa 810b c75c 6e23 88c8 11c7 .V.......\n#.... │ │ │ -00002370: 8910 8722 205b 6162 6272 6576 732d 6368 ..." [abbrevs-ch │ │ │ -00002380: 616e 6765 6420 7361 7665 2d61 6262 7265 anged save-abbre │ │ │ -00002390: 7673 2071 7569 6574 6c79 2061 6262 7265 vs quietly abbre │ │ │ -000023a0: 762d 6669 6c65 2d6e 616d 6520 6669 6c65 v-file-name file │ │ │ -000023b0: 206c 6f61 6420 3020 6e69 6c20 745d 2034 load 0 nil t] 4 │ │ │ -000023c0: 2028 2324 202e 2038 3735 3229 2022 6652 (#$ . 8752) "fR │ │ │ -000023d0: 6561 6420 6162 6272 6576 2066 696c 653a ead abbrev file: │ │ │ -000023e0: 2022 5d29 0a23 4031 3938 2052 6561 6420 "]).#@198 Read │ │ │ -000023f0: 6162 6272 6576 2064 6566 696e 6974 696f abbrev definitio │ │ │ -00002400: 6e73 2066 726f 6d20 6669 6c65 2077 7269 ns from file wri │ │ │ -00002410: 7474 656e 2077 6974 6820 6077 7269 7465 tten with `write │ │ │ -00002420: 2d61 6262 7265 762d 6669 6c65 272e 0a4f -abbrev-file'..O │ │ │ -00002430: 7074 696f 6e61 6c20 6172 6775 6d65 6e74 ptional argument │ │ │ -00002440: 2046 494c 4520 6973 2074 6865 206e 616d FILE is the nam │ │ │ -00002450: 6520 6f66 2074 6865 2066 696c 6520 746f e of the file to │ │ │ -00002460: 2072 6561 643b 0a69 7420 6465 6661 756c read;.it defaul │ │ │ -00002470: 7473 2074 6f20 7468 6520 7661 6c75 6520 ts to the value │ │ │ -00002480: 6f66 2060 6162 6272 6576 2d66 696c 652d of `abbrev-file- │ │ │ -00002490: 6e61 6d65 272e 0a44 6f65 7320 6e6f 7420 name'..Does not │ │ │ -000024a0: 7072 696e 7420 616e 7974 6869 6e67 2e1f print anything.. │ │ │ -000024b0: 0a28 6465 6661 6c69 6173 2027 7175 6965 .(defalias 'quie │ │ │ -000024c0: 746c 792d 7265 6164 2d61 6262 7265 762d tly-read-abbrev- │ │ │ -000024d0: 6669 6c65 2023 5b28 266f 7074 696f 6e61 file #[(&optiona │ │ │ -000024e0: 6c20 6669 6c65 2920 22c1 08c2 5c22 8722 l file) "...\"." │ │ │ -000024f0: 205b 6669 6c65 2072 6561 642d 6162 6272 [file read-abbr │ │ │ -00002500: 6576 2d66 696c 6520 745d 2033 2028 2324 ev-file t] 3 (#$ │ │ │ -00002510: 202e 2039 3139 3529 5d29 0a23 4031 3737 . 9195)]).#@177 │ │ │ -00002520: 2057 7269 7465 2061 6c6c 2061 6262 7265 Write all abbre │ │ │ -00002530: 7620 6465 6669 6e69 7469 6f6e 7320 746f v definitions to │ │ │ -00002540: 2061 2066 696c 6520 6f66 204c 6973 7020 a file of Lisp │ │ │ -00002550: 636f 6465 2e0a 5468 6520 6669 6c65 2077 code..The file w │ │ │ -00002560: 7269 7474 656e 2063 616e 2062 6520 6c6f ritten can be lo │ │ │ -00002570: 6164 6564 2069 6e20 616e 6f74 6865 7220 aded in another │ │ │ -00002580: 7365 7373 696f 6e20 746f 2064 6566 696e session to defin │ │ │ -00002590: 6520 7468 6520 7361 6d65 2061 6262 7265 e the same abbre │ │ │ -000025a0: 7673 2e0a 5468 6520 6172 6775 6d65 6e74 vs..The argument │ │ │ -000025b0: 2046 494c 4520 6973 2074 6865 2066 696c FILE is the fil │ │ │ -000025c0: 6520 6e61 6d65 2074 6f20 7772 6974 652e e name to write. │ │ │ -000025d0: 1f0a 2864 6566 616c 6961 7320 2777 7269 ..(defalias 'wri │ │ │ -000025e0: 7465 2d61 6262 7265 762d 6669 6c65 2023 te-abbrev-file # │ │ │ -000025f0: 5b28 6669 6c65 2920 220b ab86 0b47 c456 [(file) "....G.V │ │ │ -00002600: ac82 0913 8ac5 c621 7188 c720 8808 891a .......!q.. .... │ │ │ -00002610: ab8c c85c 6e40 c95c 2288 5c6e 4189 12ac ...\n@.\".\nA... │ │ │ -00002620: 7429 cacb 640b 2388 c720 2987 2220 5b61 t)..d.#.. )." [a │ │ │ -00002630: 6262 7265 762d 7461 626c 652d 6e61 6d65 bbrev-table-name │ │ │ -00002640: 2d6c 6973 7420 6162 6272 6576 2d66 696c -list abbrev-fil │ │ │ -00002650: 652d 6e61 6d65 2074 6162 6c65 7320 6669 e-name tables fi │ │ │ -00002660: 6c65 2030 2067 6574 2d62 7566 6665 722d le 0 get-buffer- │ │ │ -00002670: 6372 6561 7465 2022 2077 7269 7465 2d61 create " write-a │ │ │ -00002680: 6262 7265 762d 6669 6c65 2220 6572 6173 bbrev-file" eras │ │ │ -00002690: 652d 6275 6666 6572 2069 6e73 6572 742d e-buffer insert- │ │ │ -000026a0: 6162 6272 6576 2d74 6162 6c65 2d64 6573 abbrev-table-des │ │ │ -000026b0: 6372 6970 7469 6f6e 206e 696c 2077 7269 cription nil wri │ │ │ -000026c0: 7465 2d72 6567 696f 6e20 315d 2035 2028 te-region 1] 5 ( │ │ │ -000026d0: 2324 202e 2039 3530 3529 2028 6c69 7374 #$ . 9505) (list │ │ │ -000026e0: 2028 7265 6164 2d66 696c 652d 6e61 6d65 (read-file-name │ │ │ -000026f0: 2022 5772 6974 6520 6162 6272 6576 2066 "Write abbrev f │ │ │ -00002700: 696c 653a 2022 2028 6669 6c65 2d6e 616d ile: " (file-nam │ │ │ -00002710: 652d 6469 7265 6374 6f72 7920 2865 7870 e-directory (exp │ │ │ -00002720: 616e 642d 6669 6c65 2d6e 616d 6520 6162 and-file-name ab │ │ │ -00002730: 6272 6576 2d66 696c 652d 6e61 6d65 2929 brev-file-name)) │ │ │ -00002740: 2061 6262 7265 762d 6669 6c65 2d6e 616d abbrev-file-nam │ │ │ -00002750: 6529 295d 290a 2340 3132 3120 5265 7475 e))]).#@121 Retu │ │ │ -00002760: 726e 2074 6865 2073 7472 696e 6720 666f rn the string fo │ │ │ -00002770: 7220 7768 6963 6820 616e 2061 6262 7265 r which an abbre │ │ │ -00002780: 7620 7769 6c6c 2062 6520 6465 6669 6e65 v will be define │ │ │ -00002790: 642e 0a41 5247 2069 7320 7468 6520 6172 d..ARG is the ar │ │ │ -000027a0: 6775 6d65 6e74 2074 6f20 6061 6464 2d67 gument to `add-g │ │ │ -000027b0: 6c6f 6261 6c2d 6162 6272 6576 2720 6f72 lobal-abbrev' or │ │ │ -000027c0: 2060 6164 642d 6d6f 6465 2d61 6262 7265 `add-mode-abbre │ │ │ -000027d0: 7627 2e1f 0a28 6465 6661 6c69 6173 2027 v'...(defalias ' │ │ │ -000027e0: 6162 6272 6576 2d73 7472 696e 672d 746f abbrev-string-to │ │ │ -000027f0: 2d62 652d 6465 6669 6e65 6420 235b 2861 -be-defined #[(a │ │ │ -00002800: 7267 2920 2208 ac88 c120 ab84 c210 aa84 rg) ".... ...... │ │ │ -00002810: c308 2110 08c2 59ad 9560 08c2 55ab 84c4 ..!...Y..`..U... │ │ │ -00002820: 20aa 8a8a 08ae 81c5 5b76 8860 297b 8722 .......[v.`){." │ │ │ -00002830: 205b 6172 6720 7265 6769 6f6e 2d61 6374 [arg region-act │ │ │ -00002840: 6976 652d 7020 3020 7072 6566 6978 2d6e ive-p 0 prefix-n │ │ │ -00002850: 756d 6572 6963 2d76 616c 7565 206d 6172 umeric-value mar │ │ │ -00002860: 6b20 315d 2033 2028 2324 202e 2031 3030 k 1] 3 (#$ . 100 │ │ │ -00002870: 3736 295d 290a 2340 3333 3820 4465 6669 76)]).#@338 Defi │ │ │ -00002880: 6e65 206d 6f64 652d 7370 6563 6966 6963 ne mode-specific │ │ │ -00002890: 2061 6262 7265 7620 666f 7220 6c61 7374 abbrev for last │ │ │ -000028a0: 2077 6f72 6428 7329 2062 6566 6f72 6520 word(s) before │ │ │ -000028b0: 706f 696e 742e 0a41 7267 756d 656e 7420 point..Argument │ │ │ -000028c0: 6973 2068 6f77 206d 616e 7920 776f 7264 is how many word │ │ │ -000028d0: 7320 6265 666f 7265 2070 6f69 6e74 2066 s before point f │ │ │ -000028e0: 6f72 6d20 7468 6520 6578 7061 6e73 696f orm the expansio │ │ │ -000028f0: 6e3b 0a6f 7220 7a65 726f 206d 6561 6e73 n;.or zero means │ │ │ -00002900: 2074 6865 2072 6567 696f 6e20 6973 2074 the region is t │ │ │ -00002910: 6865 2065 7870 616e 7369 6f6e 2e0a 4120 he expansion..A │ │ │ -00002920: 6e65 6761 7469 7665 2061 7267 756d 656e negative argumen │ │ │ -00002930: 7420 6d65 616e 7320 746f 2075 6e64 6566 t means to undef │ │ │ -00002940: 696e 6520 7468 6520 7370 6563 6966 6965 ine the specifie │ │ │ -00002950: 6420 6162 6272 6576 2e0a 5265 6164 7320 d abbrev..Reads │ │ │ -00002960: 7468 6520 6162 6272 6576 6961 7469 6f6e the abbreviation │ │ │ -00002970: 2069 6e20 7468 6520 6d69 6e69 6275 6666 in the minibuff │ │ │ -00002980: 6572 2e0a 0a44 6f6e 2774 2075 7365 2074 er...Don't use t │ │ │ -00002990: 6869 7320 6675 6e63 7469 6f6e 2069 6e20 his function in │ │ │ -000029a0: 6120 4c69 7370 2070 726f 6772 616d 3b20 a Lisp program; │ │ │ -000029b0: 7573 6520 6064 6566 696e 652d 6162 6272 use `define-abbr │ │ │ -000029c0: 6576 2720 696e 7374 6561 642e 1f0a 2864 ev' instead...(d │ │ │ -000029d0: 6566 616c 6961 7320 2761 6464 2d6d 6f64 efalias 'add-mod │ │ │ -000029e0: 652d 6162 6272 6576 2023 5b28 6172 6729 e-abbrev #[(arg) │ │ │ -000029f0: 2022 c40b ab83 5c6e aa86 09ae 83c5 c621 "....\n.......! │ │ │ -00002a00: c708 2387 2220 5b61 7267 206c 6f63 616c ..#." [arg local │ │ │ -00002a10: 2d61 6262 7265 762d 7461 626c 6520 676c -abbrev-table gl │ │ │ -00002a20: 6f62 616c 2d61 6262 7265 762d 7461 626c obal-abbrev-tabl │ │ │ -00002a30: 6520 6f6e 6c79 2d67 6c6f 6261 6c2d 6162 e only-global-ab │ │ │ -00002a40: 6272 6576 7320 6164 642d 6162 6272 6576 brevs add-abbrev │ │ │ -00002a50: 2065 7272 6f72 2022 4e6f 2070 6572 2d6d error "No per-m │ │ │ -00002a60: 6f64 6520 6162 6272 6576 2074 6162 6c65 ode abbrev table │ │ │ -00002a70: 2220 224d 6f64 6522 5d20 3420 2823 2420 " "Mode"] 4 (#$ │ │ │ -00002a80: 2e20 3130 3336 3429 2022 5022 5d29 0a23 . 10364) "P"]).# │ │ │ -00002a90: 4033 3838 2044 6566 696e 6520 676c 6f62 @388 Define glob │ │ │ -00002aa0: 616c 2028 616c 6c20 6d6f 6465 7329 2061 al (all modes) a │ │ │ -00002ab0: 6262 7265 7620 666f 7220 6c61 7374 2077 bbrev for last w │ │ │ -00002ac0: 6f72 6428 7329 2062 6566 6f72 6520 706f ord(s) before po │ │ │ -00002ad0: 696e 742e 0a54 6865 2070 7265 6669 7820 int..The prefix │ │ │ -00002ae0: 6172 6775 6d65 6e74 2073 7065 6369 6669 argument specifi │ │ │ -00002af0: 6573 2074 6865 206e 756d 6265 7220 6f66 es the number of │ │ │ -00002b00: 2077 6f72 6473 2062 6566 6f72 6520 706f words before po │ │ │ -00002b10: 696e 7420 7468 6174 2066 6f72 6d20 7468 int that form th │ │ │ -00002b20: 650a 6578 7061 6e73 696f 6e3b 206f 7220 e.expansion; or │ │ │ -00002b30: 7a65 726f 206d 6561 6e73 2074 6865 2072 zero means the r │ │ │ -00002b40: 6567 696f 6e20 6973 2074 6865 2065 7870 egion is the exp │ │ │ -00002b50: 616e 7369 6f6e 2e0a 4120 6e65 6761 7469 ansion..A negati │ │ │ -00002b60: 7665 2061 7267 756d 656e 7420 6d65 616e ve argument mean │ │ │ -00002b70: 7320 746f 2075 6e64 6566 696e 6520 7468 s to undefine th │ │ │ -00002b80: 6520 7370 6563 6966 6965 6420 6162 6272 e specified abbr │ │ │ -00002b90: 6576 2e0a 5468 6973 2063 6f6d 6d61 6e64 ev..This command │ │ │ -00002ba0: 2075 7365 7320 7468 6520 6d69 6e69 6275 uses the minibu │ │ │ -00002bb0: 6666 6572 2074 6f20 7265 6164 2074 6865 ffer to read the │ │ │ -00002bc0: 2061 6262 7265 7669 6174 696f 6e2e 0a0a abbreviation... │ │ │ -00002bd0: 446f 6e27 7420 7573 6520 7468 6973 2066 Don't use this f │ │ │ -00002be0: 756e 6374 696f 6e20 696e 2061 204c 6973 unction in a Lis │ │ │ -00002bf0: 7020 7072 6f67 7261 6d3b 2075 7365 2060 p program; use ` │ │ │ -00002c00: 6465 6669 6e65 2d61 6262 7265 7627 2069 define-abbrev' i │ │ │ -00002c10: 6e73 7465 6164 2e1f 0a28 6465 6661 6c69 nstead...(defali │ │ │ -00002c20: 6173 2027 6164 642d 676c 6f62 616c 2d61 as 'add-global-a │ │ │ -00002c30: 6262 7265 7620 235b 2861 7267 2920 22c2 bbrev #[(arg) ". │ │ │ -00002c40: 09c3 0823 8722 205b 6172 6720 676c 6f62 ...#." [arg glob │ │ │ -00002c50: 616c 2d61 6262 7265 762d 7461 626c 6520 al-abbrev-table │ │ │ -00002c60: 6164 642d 6162 6272 6576 2022 476c 6f62 add-abbrev "Glob │ │ │ -00002c70: 616c 225d 2034 2028 2324 202e 2031 3039 al"] 4 (#$ . 109 │ │ │ -00002c80: 3031 2920 2250 225d 290a 2340 3337 3120 01) "P"]).#@371 │ │ │ -00002c90: 4164 6420 616e 2061 6262 7265 7669 6174 Add an abbreviat │ │ │ -00002ca0: 696f 6e20 746f 2061 6262 7265 7620 7461 ion to abbrev ta │ │ │ -00002cb0: 626c 6520 5441 424c 452e 0a54 5950 4520 ble TABLE..TYPE │ │ │ -00002cc0: 6973 2061 2073 7472 696e 6720 6465 7363 is a string desc │ │ │ -00002cd0: 7269 6269 6e67 2069 6e20 456e 676c 6973 ribing in Englis │ │ │ -00002ce0: 6820 7468 6520 6b69 6e64 206f 6620 6162 h the kind of ab │ │ │ -00002cf0: 6272 6576 2074 6869 7320 7769 6c6c 2062 brev this will b │ │ │ -00002d00: 650a 2874 7970 6963 616c 6c79 2c20 2267 e.(typically, "g │ │ │ -00002d10: 6c6f 6261 6c22 206f 7220 226d 6f64 652d lobal" or "mode- │ │ │ -00002d20: 7370 6563 6966 6963 2229 3b20 7468 6973 specific"); this │ │ │ -00002d30: 2069 7320 7573 6564 2069 6e0a 7072 6f6d is used in.prom │ │ │ -00002d40: 7074 696e 6720 7468 6520 7573 6572 2e20 pting the user. │ │ │ -00002d50: 2041 5247 2069 7320 7468 6520 6e75 6d62 ARG is the numb │ │ │ -00002d60: 6572 206f 6620 776f 7264 7320 696e 2074 er of words in t │ │ │ -00002d70: 6865 2065 7870 616e 7369 6f6e 2e0a 0a52 he expansion...R │ │ │ -00002d80: 6574 7572 6e20 7468 6520 7379 6d62 6f6c eturn the symbol │ │ │ -00002d90: 2074 6861 7420 696e 7465 726e 616c 6c79 that internally │ │ │ -00002da0: 2072 6570 7265 7365 6e74 7320 7468 6520 represents the │ │ │ -00002db0: 6e65 7720 6162 6272 6576 2c20 6f72 206e new abbrev, or n │ │ │ -00002dc0: 696c 2069 660a 7468 6520 7573 6572 2064 il if.the user d │ │ │ -00002dd0: 6563 6c69 6e65 7320 746f 2063 6f6e 6669 eclines to confi │ │ │ -00002de0: 726d 2072 6564 6566 696e 696e 6720 616e rm redefining an │ │ │ -00002df0: 2065 7869 7374 696e 6720 6162 6272 6576 existing abbrev │ │ │ -00002e00: 2e1f 0a28 6465 6661 6c69 6173 2027 6164 ...(defalias 'ad │ │ │ -00002e10: 642d 6162 6272 6576 2023 5b28 7461 626c d-abbrev #[(tabl │ │ │ -00002e20: 6520 7479 7065 2061 7267 2920 22c5 0921 e type arg) "..! │ │ │ -00002e30: c61c 1bc7 c80b ab83 c9aa 81ca 080b 2321 ..............#! │ │ │ -00002e40: 14cb cc0c 47c6 0c24 880b ab92 cd0c 5c6e ....G..$......\n │ │ │ -00002e50: 5c22 ab8c cec8 cf0c cd0c 5c6e 5c22 2321 \"........\n\"#! │ │ │ -00002e60: ad86 d05c 6e0c 970b 232a 8722 205b 7479 ...\n...#*." [ty │ │ │ -00002e70: 7065 2061 7267 2074 6162 6c65 2065 7870 pe arg table exp │ │ │ -00002e80: 206e 616d 6520 6162 6272 6576 2d73 7472 name abbrev-str │ │ │ -00002e90: 696e 672d 746f 2d62 652d 6465 6669 6e65 ing-to-be-define │ │ │ -00002ea0: 6420 6e69 6c20 7265 6164 2d73 7472 696e d nil read-strin │ │ │ -00002eb0: 6720 666f 726d 6174 2022 2573 2061 6262 g format "%s abb │ │ │ -00002ec0: 7265 7620 666f 7220 5c22 2573 5c22 3a20 rev for \"%s\": │ │ │ -00002ed0: 2220 2255 6e64 6566 696e 6520 2573 2061 " "Undefine %s a │ │ │ -00002ee0: 6262 7265 763a 2022 2073 6574 2d74 6578 bbrev: " set-tex │ │ │ -00002ef0: 742d 7072 6f70 6572 7469 6573 2030 2061 t-properties 0 a │ │ │ -00002f00: 6262 7265 762d 6578 7061 6e73 696f 6e20 bbrev-expansion │ │ │ -00002f10: 792d 6f72 2d6e 2d70 2022 2573 2065 7870 y-or-n-p "%s exp │ │ │ -00002f20: 616e 6473 2074 6f20 5c22 2573 5c22 3b20 ands to \"%s\"; │ │ │ -00002f30: 7265 6465 6669 6e65 3f20 2220 6465 6669 redefine? " defi │ │ │ -00002f40: 6e65 2d61 6262 7265 765d 2037 2028 2324 ne-abbrev] 7 (#$ │ │ │ -00002f50: 202e 2031 3134 3038 295d 290a 2340 3134 . 11408)]).#@14 │ │ │ -00002f60: 3520 5265 7475 726e 2074 6865 2073 7472 5 Return the str │ │ │ -00002f70: 696e 6720 666f 7220 7768 6963 6820 616e ing for which an │ │ │ -00002f80: 2069 6e76 6572 7365 2061 6262 7265 7620 inverse abbrev │ │ │ -00002f90: 7769 6c6c 2062 6520 6465 6669 6e65 642e will be defined. │ │ │ -00002fa0: 0a41 5247 2069 7320 7468 6520 6172 6775 .ARG is the argu │ │ │ -00002fb0: 6d65 6e74 2074 6f20 6069 6e76 6572 7365 ment to `inverse │ │ │ -00002fc0: 2d61 6464 2d67 6c6f 6261 6c2d 6162 6272 -add-global-abbr │ │ │ -00002fd0: 6576 2720 6f72 0a60 696e 7665 7273 652d ev' or.`inverse- │ │ │ -00002fe0: 6164 642d 6d6f 6465 2d61 6262 7265 7627 add-mode-abbrev' │ │ │ -00002ff0: 2e1f 0a28 6465 6661 6c69 6173 2027 696e ...(defalias 'in │ │ │ -00003000: 7665 7273 652d 6162 6272 6576 2d73 7472 verse-abbrev-str │ │ │ -00003010: 696e 672d 746f 2d62 652d 6465 6669 6e65 ing-to-be-define │ │ │ -00003020: 6420 235b 2861 7267 2920 228a 08ae 81c1 d #[(arg) "..... │ │ │ -00003030: 5b76 8860 c176 8860 7b29 8722 205b 6172 [v.`.v.`{)." [ar │ │ │ -00003040: 6720 315d 2032 2028 2324 202e 2031 3231 g 1] 2 (#$ . 121 │ │ │ -00003050: 3330 295d 290a 2340 3231 3720 4465 6669 30)]).#@217 Defi │ │ │ -00003060: 6e65 206c 6173 7420 776f 7264 2062 6566 ne last word bef │ │ │ -00003070: 6f72 6520 706f 696e 7420 6173 2061 206d ore point as a m │ │ │ -00003080: 6f64 652d 7370 6563 6966 6963 2061 6262 ode-specific abb │ │ │ -00003090: 7265 762e 0a57 6974 6820 7072 6566 6978 rev..With prefix │ │ │ -000030a0: 2061 7267 756d 656e 7420 4e2c 2064 6566 argument N, def │ │ │ -000030b0: 696e 6573 2074 6865 204e 7468 2077 6f72 ines the Nth wor │ │ │ -000030c0: 6420 6265 666f 7265 2070 6f69 6e74 2e0a d before point.. │ │ │ -000030d0: 5468 6973 2063 6f6d 6d61 6e64 2075 7365 This command use │ │ │ -000030e0: 7320 7468 6520 6d69 6e69 6275 6666 6572 s the minibuffer │ │ │ -000030f0: 2074 6f20 7265 6164 2074 6865 2065 7870 to read the exp │ │ │ -00003100: 616e 7369 6f6e 2e0a 4578 7061 6e64 7320 ansion..Expands │ │ │ -00003110: 7468 6520 6162 6272 6576 6961 7469 6f6e the abbreviation │ │ │ -00003120: 2061 6674 6572 2064 6566 696e 696e 6720 after defining │ │ │ -00003130: 6974 2e1f 0a28 6465 6661 6c69 6173 2027 it...(defalias ' │ │ │ -00003140: 696e 7665 7273 652d 6164 642d 6d6f 6465 inverse-add-mode │ │ │ -00003150: 2d61 6262 7265 7620 235b 2861 7267 2920 -abbrev #[(arg) │ │ │ -00003160: 22c4 0bab 835c 6eaa 8609 ae83 c5c6 21c7 "....\n.......!. │ │ │ -00003170: 0823 8722 205b 6172 6720 6c6f 6361 6c2d .#." [arg local- │ │ │ -00003180: 6162 6272 6576 2d74 6162 6c65 2067 6c6f abbrev-table glo │ │ │ -00003190: 6261 6c2d 6162 6272 6576 2d74 6162 6c65 bal-abbrev-table │ │ │ -000031a0: 206f 6e6c 792d 676c 6f62 616c 2d61 6262 only-global-abb │ │ │ -000031b0: 7265 7673 2069 6e76 6572 7365 2d61 6464 revs inverse-add │ │ │ -000031c0: 2d61 6262 7265 7620 6572 726f 7220 224e -abbrev error "N │ │ │ -000031d0: 6f20 7065 722d 6d6f 6465 2061 6262 7265 o per-mode abbre │ │ │ -000031e0: 7620 7461 626c 6522 2022 4d6f 6465 225d v table" "Mode"] │ │ │ -000031f0: 2034 2028 2324 202e 2031 3233 3830 2920 4 (#$ . 12380) │ │ │ -00003200: 2270 225d 290a 2340 3232 3920 4465 6669 "p"]).#@229 Defi │ │ │ -00003210: 6e65 206c 6173 7420 776f 7264 2062 6566 ne last word bef │ │ │ -00003220: 6f72 6520 706f 696e 7420 6173 2061 2067 ore point as a g │ │ │ -00003230: 6c6f 6261 6c20 286d 6f64 652d 696e 6465 lobal (mode-inde │ │ │ -00003240: 7065 6e64 656e 7429 2061 6262 7265 762e pendent) abbrev. │ │ │ -00003250: 0a57 6974 6820 7072 6566 6978 2061 7267 .With prefix arg │ │ │ -00003260: 756d 656e 7420 4e2c 2064 6566 696e 6573 ument N, defines │ │ │ -00003270: 2074 6865 204e 7468 2077 6f72 6420 6265 the Nth word be │ │ │ -00003280: 666f 7265 2070 6f69 6e74 2e0a 5468 6973 fore point..This │ │ │ -00003290: 2063 6f6d 6d61 6e64 2075 7365 7320 7468 command uses th │ │ │ -000032a0: 6520 6d69 6e69 6275 6666 6572 2074 6f20 e minibuffer to │ │ │ -000032b0: 7265 6164 2074 6865 2065 7870 616e 7369 read the expansi │ │ │ -000032c0: 6f6e 2e0a 4578 7061 6e64 7320 7468 6520 on..Expands the │ │ │ -000032d0: 6162 6272 6576 6961 7469 6f6e 2061 6674 abbreviation aft │ │ │ -000032e0: 6572 2064 6566 696e 696e 6720 6974 2e1f er defining it.. │ │ │ -000032f0: 0a28 6465 6661 6c69 6173 2027 696e 7665 .(defalias 'inve │ │ │ -00003300: 7273 652d 6164 642d 676c 6f62 616c 2d61 rse-add-global-a │ │ │ -00003310: 6262 7265 7620 235b 2861 7267 2920 22c2 bbrev #[(arg) ". │ │ │ -00003320: 09c3 0823 8722 205b 6172 6720 676c 6f62 ...#." [arg glob │ │ │ -00003330: 616c 2d61 6262 7265 762d 7461 626c 6520 al-abbrev-table │ │ │ -00003340: 696e 7665 7273 652d 6164 642d 6162 6272 inverse-add-abbr │ │ │ -00003350: 6576 2022 476c 6f62 616c 225d 2034 2028 ev "Global"] 4 ( │ │ │ -00003360: 2324 202e 2031 3238 3132 2920 2270 225d #$ . 12812) "p"] │ │ │ -00003370: 290a 2864 6566 616c 6961 7320 2769 6e76 ).(defalias 'inv │ │ │ -00003380: 6572 7365 2d61 6464 2d61 6262 7265 7620 erse-add-abbrev │ │ │ -00003390: 235b 2874 6162 6c65 2074 7970 6520 6172 #[(table type ar │ │ │ -000033a0: 6729 2022 c689 891c 1b1d 8a09 ae81 c75b g) "...........[ │ │ │ -000033b0: 7688 60c7 7688 6089 137b 1529 c8c9 0d47 v.`.v.`..{.)...G │ │ │ -000033c0: c60d 2488 cacb cc08 0d23 2114 cd0d 5c6e ..$......#!...\n │ │ │ -000033d0: 5c22 ab8c cecb cf0d cd0d 5c6e 5c22 2321 \"........\n\"#! │ │ │ -000033e0: ad8e d05c 6e0d 970c 2388 8a0b 6288 d120 ...\n...#...b.. │ │ │ -000033f0: 292b 8722 205b 7479 7065 2061 7267 2074 )+." [type arg t │ │ │ -00003400: 6162 6c65 206e 616d 656c 6f63 2065 7870 able nameloc exp │ │ │ -00003410: 206e 616d 6520 6e69 6c20 3120 7365 742d name nil 1 set- │ │ │ -00003420: 7465 7874 2d70 726f 7065 7274 6965 7320 text-properties │ │ │ -00003430: 3020 7265 6164 2d73 7472 696e 6720 666f 0 read-string fo │ │ │ -00003440: 726d 6174 2022 2573 2065 7870 616e 7369 rmat "%s expansi │ │ │ -00003450: 6f6e 2066 6f72 205c 2225 735c 223a 2022 on for \"%s\": " │ │ │ -00003460: 2061 6262 7265 762d 6578 7061 6e73 696f abbrev-expansio │ │ │ -00003470: 6e20 792d 6f72 2d6e 2d70 2022 2573 2065 n y-or-n-p "%s e │ │ │ -00003480: 7870 616e 6473 2074 6f20 5c22 2573 5c22 xpands to \"%s\" │ │ │ -00003490: 3b20 7265 6465 6669 6e65 3f20 2220 6465 ; redefine? " de │ │ │ -000034a0: 6669 6e65 2d61 6262 7265 7620 6578 7061 fine-abbrev expa │ │ │ -000034b0: 6e64 2d61 6262 7265 765d 2037 5d29 0a23 nd-abbrev] 7]).# │ │ │ -000034c0: 4032 3330 204d 6172 6b20 6375 7272 656e @230 Mark curren │ │ │ -000034d0: 7420 706f 696e 7420 6173 2074 6865 2062 t point as the b │ │ │ -000034e0: 6567 696e 6e69 6e67 206f 6620 616e 2061 eginning of an a │ │ │ -000034f0: 6262 7265 762e 0a41 6262 7265 7620 746f bbrev..Abbrev to │ │ │ -00003500: 2062 6520 6578 7061 6e64 6564 2073 7461 be expanded sta │ │ │ -00003510: 7274 7320 6865 7265 2072 6174 6865 7220 rts here rather │ │ │ -00003520: 7468 616e 2061 7420 6265 6769 6e6e 696e than at beginnin │ │ │ -00003530: 6720 6f66 2077 6f72 642e 0a54 6869 7320 g of word..This │ │ │ -00003540: 7761 792c 2079 6f75 2063 616e 2065 7870 way, you can exp │ │ │ -00003550: 616e 6420 616e 2061 6262 7265 7620 7769 and an abbrev wi │ │ │ -00003560: 7468 2061 2070 7265 6669 783a 2069 6e73 th a prefix: ins │ │ │ -00003570: 6572 7420 7468 6520 7072 6566 6978 2c0a ert the prefix,. │ │ │ -00003580: 7573 6520 7468 6973 2063 6f6d 6d61 6e64 use this command │ │ │ -00003590: 2c20 7468 656e 2069 6e73 6572 7420 7468 , then insert th │ │ │ -000035a0: 6520 6162 6272 6576 2e1f 0a28 6465 6661 e abbrev...(defa │ │ │ -000035b0: 6c69 6173 2027 6162 6272 6576 2d70 7265 lias 'abbrev-pre │ │ │ -000035c0: 6669 782d 6d61 726b 2023 5b28 266f 7074 fix-mark #[(&opt │ │ │ -000035d0: 696f 6e61 6c20 6172 6729 2022 5c6e ac83 ional arg) "\n.. │ │ │ -000035e0: c420 88c5 2011 7010 c660 605c 221b c70b . .. .p..``\"... │ │ │ -000035f0: c8c9 215c 2229 8722 205b 6162 6272 6576 ..!\")." [abbrev │ │ │ -00003600: 2d73 7461 7274 2d6c 6f63 6174 696f 6e2d -start-location- │ │ │ -00003610: 6275 6666 6572 2061 6262 7265 762d 7374 buffer abbrev-st │ │ │ -00003620: 6172 742d 6c6f 6361 7469 6f6e 2061 7267 art-location arg │ │ │ -00003630: 2065 2065 7870 616e 642d 6162 6272 6576 e expand-abbrev │ │ │ -00003640: 2070 6f69 6e74 2d6d 6172 6b65 7220 6d61 point-marker ma │ │ │ -00003650: 6b65 2d65 7874 656e 7420 7365 742d 6578 ke-extent set-ex │ │ │ -00003660: 7465 6e74 2d62 6567 696e 2d67 6c79 7068 tent-begin-glyph │ │ │ -00003670: 206d 616b 652d 676c 7970 6820 5b73 7472 make-glyph [str │ │ │ -00003680: 696e 6720 3a64 6174 6120 222d 225d 5d20 ing :data "-"]] │ │ │ -00003690: 3420 2823 2420 2e20 3133 3530 3929 2022 4 (#$ . 13509) " │ │ │ -000036a0: 5022 5d29 0a23 4032 3433 2046 6f72 2061 P"]).#@243 For a │ │ │ -000036b0: 6262 7265 7620 6f63 6375 7272 656e 6365 bbrev occurrence │ │ │ -000036c0: 2069 6e20 7468 6520 7265 6769 6f6e 2c20 in the region, │ │ │ -000036d0: 6f66 6665 7220 746f 2065 7870 616e 6420 offer to expand │ │ │ -000036e0: 6974 2e0a 5468 6520 7573 6572 2069 7320 it..The user is │ │ │ -000036f0: 6173 6b65 6420 746f 2074 7970 6520 7920 asked to type y │ │ │ -00003700: 6f72 206e 2066 6f72 2065 6163 6820 6f63 or n for each oc │ │ │ -00003710: 6375 7272 656e 6365 2e0a 4120 7072 6566 currence..A pref │ │ │ -00003720: 6978 2061 7267 756d 656e 7420 6d65 616e ix argument mean │ │ │ -00003730: 7320 646f 6e27 7420 7175 6572 793b 2065 s don't query; e │ │ │ -00003740: 7870 616e 6420 616c 6c20 6162 6272 6576 xpand all abbrev │ │ │ -00003750: 732e 0a49 6620 6361 6c6c 6564 2066 726f s..If called fro │ │ │ -00003760: 6d20 6120 4c69 7370 2070 726f 6772 616d m a Lisp program │ │ │ -00003770: 2c20 6172 6775 6d65 6e74 7320 6172 6520 , arguments are │ │ │ -00003780: 5354 4152 5420 454e 4420 266f 7074 696f START END &optio │ │ │ -00003790: 6e61 6c20 4e4f 5155 4552 592e 1f0a 2864 nal NOQUERY...(d │ │ │ -000037a0: 6566 616c 6961 7320 2765 7870 616e 642d efalias 'expand- │ │ │ -000037b0: 7265 6769 6f6e 2d61 6262 7265 7673 2023 region-abbrevs # │ │ │ -000037c0: 5b28 7374 6172 7420 656e 6420 266f 7074 [(start end &opt │ │ │ -000037d0: 696f 6e61 6c20 6e6f 7175 6572 7929 2022 ional noquery) " │ │ │ -000037e0: 8a5c 6e62 8864 095a c689 1d1c 1b6d 3fad .\nb.d.Z.....m?. │ │ │ -000037f0: aac7 7688 6089 1464 0b5a 58ad 9ec8 8ac9 ..v.`..d.ZX..... │ │ │ -00003800: 7688 6029 0c7b 8915 21ab 6208 ac88 cacb v.`).{..!.b..... │ │ │ -00003810: cc0d 5c22 21ab 57cd 2088 aa52 2c87 2220 ..\"!.W. ..R,." │ │ │ -00003820: 5b6e 6f71 7565 7279 2065 6e64 2073 7461 [noquery end sta │ │ │ -00003830: 7274 206c 696d 2070 6e74 2073 7472 696e rt lim pnt strin │ │ │ -00003840: 6720 6e69 6c20 3120 6162 6272 6576 2d65 g nil 1 abbrev-e │ │ │ -00003850: 7870 616e 7369 6f6e 202d 3120 792d 6f72 xpansion -1 y-or │ │ │ -00003860: 2d6e 2d70 2066 6f72 6d61 7420 2245 7870 -n-p format "Exp │ │ │ -00003870: 616e 6420 6025 7327 3f20 2220 6578 7061 and `%s'? " expa │ │ │ -00003880: 6e64 2d61 6262 7265 765d 2034 2028 2324 nd-abbrev] 4 (#$ │ │ │ -00003890: 202e 2031 3339 3935 2920 2272 5c6e 5022 . 13995) "r\nP" │ │ │ -000038a0: 5d29 0a ]). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3138 2032 3032 310a 3b3b 3b20 :08:18 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f61 6262 7265 762e 656c 4/lisp/abbrev.el │ │ │ +00000090: 0a3b 3b3b 2065 6d61 6373 2076 6572 7369 .;;; emacs versi │ │ │ +000000a0: 6f6e 2032 312e 3420 2870 6174 6368 2032 on 21.4 (patch 2 │ │ │ +000000b0: 3429 2022 5374 616e 6461 7264 2043 2220 4) "Standard C" │ │ │ +000000c0: 5845 6d61 6373 204c 7563 6964 2e0a 3b3b XEmacs Lucid..;; │ │ │ +000000d0: 3b20 6279 7465 636f 6d70 2076 6572 7369 ; bytecomp versi │ │ │ +000000e0: 6f6e 2032 2e32 3720 5845 6d61 6373 3b20 on 2.27 XEmacs; │ │ │ +000000f0: 3230 3030 2d30 392d 3132 2e0a 3b3b 3b20 2000-09-12..;;; │ │ │ +00000100: 6f70 7469 6d69 7a61 7469 6f6e 2069 7320 optimization is │ │ │ +00000110: 6f6e 2e0a 3b3b 3b20 7468 6973 2066 696c on..;;; this fil │ │ │ +00000120: 6520 7573 6573 206f 7063 6f64 6573 2077 e uses opcodes w │ │ │ +00000130: 6869 6368 2064 6f20 6e6f 7420 6578 6973 hich do not exis │ │ │ +00000140: 7420 696e 2045 6d61 6373 2031 392e 0a0a t in Emacs 19... │ │ │ +00000150: 2869 6620 2861 6e64 2028 626f 756e 6470 (if (and (boundp │ │ │ +00000160: 2027 656d 6163 732d 7665 7273 696f 6e29 'emacs-version) │ │ │ +00000170: 0a09 2028 6f72 2028 616e 6420 2862 6f75 .. (or (and (bou │ │ │ +00000180: 6e64 7020 2765 706f 6368 3a3a 7665 7273 ndp 'epoch::vers │ │ │ +00000190: 696f 6e29 2065 706f 6368 3a3a 7665 7273 ion) epoch::vers │ │ │ +000001a0: 696f 6e29 0a09 2020 2020 2028 7374 7269 ion).. (stri │ │ │ +000001b0: 6e67 2d6c 6573 7370 2065 6d61 6373 2d76 ng-lessp emacs-v │ │ │ +000001c0: 6572 7369 6f6e 2022 3230 2229 2929 0a20 ersion "20"))). │ │ │ +000001d0: 2020 2028 6572 726f 7220 2260 6162 6272 (error "`abbr │ │ │ +000001e0: 6576 2e65 6c27 2077 6173 2063 6f6d 7069 ev.el' was compi │ │ │ +000001f0: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ +00000200: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ +00000210: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ +00000220: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ +00000230: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ +00000240: 2929 0a0a 0a28 6279 7465 2d63 6f64 6520 ))...(byte-code │ │ │ +00000250: 22c0 c1c2 c3c4 c5c6 c726 0788 c0c8 c2c9 "........&...... │ │ │ +00000260: c6c1 2587 2220 5b63 7573 746f 6d2d 6465 ..%." [custom-de │ │ │ +00000270: 636c 6172 652d 6772 6f75 7020 6162 6272 clare-group abbr │ │ │ +00000280: 6576 206e 696c 2022 4162 6272 6576 6961 ev nil "Abbrevia │ │ │ +00000290: 7469 6f6e 2068 616e 646c 696e 672c 2074 tion handling, t │ │ │ +000002a0: 7970 696e 6720 7368 6f72 7463 7574 732c yping shortcuts, │ │ │ +000002b0: 206d 6163 726f 732e 2220 3a74 6167 2022 macros." :tag " │ │ │ +000002c0: 4162 6272 6576 6961 7469 6f6e 7322 203a Abbreviations" : │ │ │ +000002d0: 6772 6f75 7020 6564 6974 696e 6720 6162 group editing ab │ │ │ +000002e0: 6272 6576 2d6d 6f64 6520 2257 6f72 6420 brev-mode "Word │ │ │ +000002f0: 6162 6272 6576 6961 7469 6f6e 7320 6d6f abbreviations mo │ │ │ +00000300: 6465 2e22 5d20 3829 0a28 6375 7374 6f6d de."] 8).(custom │ │ │ +00000310: 2d64 6563 6c61 7265 2d76 6172 6961 626c -declare-variabl │ │ │ +00000320: 6520 276f 6e6c 792d 676c 6f62 616c 2d61 e 'only-global-a │ │ │ +00000330: 6262 7265 7673 2027 6e69 6c20 222a 4e6f bbrevs 'nil "*No │ │ │ +00000340: 6e2d 6e69 6c20 6d65 616e 7320 7573 6572 n-nil means user │ │ │ +00000350: 2070 6c61 6e73 2074 6f20 7573 6520 676c plans to use gl │ │ │ +00000360: 6f62 616c 2061 6262 7265 7673 206f 6e6c obal abbrevs onl │ │ │ +00000370: 792e 5c6e 4d61 6b65 7320 7468 6520 636f y.\nMakes the co │ │ │ +00000380: 6d6d 616e 6473 2074 6f20 6465 6669 6e65 mmands to define │ │ │ +00000390: 206d 6f64 652d 7370 6563 6966 6963 2061 mode-specific a │ │ │ +000003a0: 6262 7265 7673 2064 6566 696e 6520 676c bbrevs define gl │ │ │ +000003b0: 6f62 616c 206f 6e65 7320 696e 7374 6561 obal ones instea │ │ │ +000003c0: 642e 2220 3a74 7970 6520 2762 6f6f 6c65 d." :type 'boole │ │ │ +000003d0: 616e 203a 6772 6f75 7020 2761 6262 7265 an :group 'abbre │ │ │ +000003e0: 7629 0a23 4034 3920 4c69 7374 206f 6620 v).#@49 List of │ │ │ +000003f0: 7379 6d62 6f6c 7320 7768 6f73 6520 7661 symbols whose va │ │ │ +00000400: 6c75 6573 2061 7265 2061 6262 7265 7620 lues are abbrev │ │ │ +00000410: 7461 626c 6573 2e1f 0a28 6465 6676 6172 tables...(defvar │ │ │ +00000420: 2061 6262 7265 762d 7461 626c 652d 6e61 abbrev-table-na │ │ │ +00000430: 6d65 2d6c 6973 7420 6e69 6c20 2823 2420 me-list nil (#$ │ │ │ +00000440: 2e20 3130 3030 2929 0a23 4031 3137 2053 . 1000)).#@117 S │ │ │ +00000450: 6574 206e 6f6e 2d6e 696c 2062 7920 6465 et non-nil by de │ │ │ +00000460: 6669 6e69 6e67 206f 7220 616c 7465 7269 fining or alteri │ │ │ +00000470: 6e67 2061 6e79 2077 6f72 6420 6162 6272 ng any word abbr │ │ │ +00000480: 6576 732e 0a54 6869 7320 6361 7573 6573 evs..This causes │ │ │ +00000490: 2060 7361 7665 2d73 6f6d 652d 6275 6666 `save-some-buff │ │ │ +000004a0: 6572 7327 2074 6f20 6f66 6665 7220 746f ers' to offer to │ │ │ +000004b0: 2073 6176 6520 7468 6520 6162 6272 6576 save the abbrev │ │ │ +000004c0: 732e 1f0a 2864 6566 7661 7220 6162 6272 s...(defvar abbr │ │ │ +000004d0: 6576 732d 6368 616e 6765 6420 6e69 6c20 evs-changed nil │ │ │ +000004e0: 2823 2420 2e20 3131 3033 2929 0a23 4034 (#$ . 1103)).#@4 │ │ │ +000004f0: 3220 5265 7475 726e 2061 206e 6577 2c20 2 Return a new, │ │ │ +00000500: 656d 7074 7920 6162 6272 6576 2074 6162 empty abbrev tab │ │ │ +00000510: 6c65 206f 626a 6563 742e 1f0a 2864 6566 le object...(def │ │ │ +00000520: 616c 6961 7320 276d 616b 652d 6162 6272 alias 'make-abbr │ │ │ +00000530: 6576 2d74 6162 6c65 2023 5b6e 696c 2022 ev-table #[nil " │ │ │ +00000540: c0c1 c25c 2287 2220 5b6d 616b 652d 7665 ...\"." [make-ve │ │ │ +00000550: 6374 6f72 2035 3920 305d 2033 2028 2324 ctor 59 0] 3 (#$ │ │ │ +00000560: 202e 2031 3236 3629 5d29 0a23 4036 3320 . 1266)]).#@63 │ │ │ +00000570: 556e 6465 6669 6e65 2061 6c6c 2061 6262 Undefine all abb │ │ │ +00000580: 7265 7673 2069 6e20 6162 6272 6576 2074 revs in abbrev t │ │ │ +00000590: 6162 6c65 2054 4142 4c45 2c20 6c65 6176 able TABLE, leav │ │ │ +000005a0: 696e 6720 6974 2065 6d70 7479 2e1f 0a28 ing it empty...( │ │ │ +000005b0: 6465 6661 6c69 6173 2027 636c 6561 722d defalias 'clear- │ │ │ +000005c0: 6162 6272 6576 2d74 6162 6c65 2023 5b28 abbrev-table #[( │ │ │ +000005d0: 7461 626c 6529 2022 c209 c35c 2288 c410 table) "...\"... │ │ │ +000005e0: c587 2220 5b61 6262 7265 7673 2d63 6861 .." [abbrevs-cha │ │ │ +000005f0: 6e67 6564 2074 6162 6c65 2066 696c 6c61 nged table filla │ │ │ +00000600: 7272 6179 2030 2074 206e 696c 5d20 3320 rray 0 t nil] 3 │ │ │ +00000610: 2823 2420 2e20 3133 3932 295d 290a 2340 (#$ . 1392)]).#@ │ │ │ +00000620: 3138 3020 4465 6669 6e65 2054 4142 4c45 180 Define TABLE │ │ │ +00000630: 2d4e 414d 4520 2861 2073 796d 626f 6c29 -NAME (a symbol) │ │ │ +00000640: 2061 7320 616e 2061 6262 7265 7620 7461 as an abbrev ta │ │ │ +00000650: 626c 6520 6e61 6d65 2e0a 4465 6669 6e65 ble name..Define │ │ │ +00000660: 2061 6262 7265 7673 2069 6e20 6974 2061 abbrevs in it a │ │ │ +00000670: 6363 6f72 6469 6e67 2074 6f20 4445 4649 ccording to DEFI │ │ │ +00000680: 4e49 5449 4f4e 532c 2077 6869 6368 2069 NITIONS, which i │ │ │ +00000690: 7320 6120 6c69 7374 206f 6620 656c 656d s a list of elem │ │ │ +000006a0: 656e 7473 0a6f 6620 7468 6520 666f 726d ents.of the form │ │ │ +000006b0: 2028 4142 4252 4556 4e41 4d45 2045 5850 (ABBREVNAME EXP │ │ │ +000006c0: 414e 5349 4f4e 2048 4f4f 4b20 5553 4543 ANSION HOOK USEC │ │ │ +000006d0: 4f55 4e54 292e 1f0a 2864 6566 616c 6961 OUNT)...(defalia │ │ │ +000006e0: 7320 2764 6566 696e 652d 6162 6272 6576 s 'define-abbrev │ │ │ +000006f0: 2d74 6162 6c65 2023 5b28 7461 626c 652d -table #[(table- │ │ │ +00000700: 6e61 6d65 2064 6566 696e 6974 696f 6e73 name definitions │ │ │ +00000710: 2920 22c4 5c6e 21ad 825c 6e4a 1bc5 0b21 ) ".\n!..\nJ...! │ │ │ +00000720: ac99 0bac 8dc6 2013 5c6e 0b4c 885c 6e08 ...... .\n.L.\n. │ │ │ +00000730: 4210 aa89 c7c5 0b5c 2213 5c6e 0b4c 8809 B......\".\n.L.. │ │ │ +00000740: ad8e c8c9 0b09 4023 8809 4189 11ac 73ca ......@#..A...s. │ │ │ +00000750: 2987 2220 5b61 6262 7265 762d 7461 626c )." [abbrev-tabl │ │ │ +00000760: 652d 6e61 6d65 2d6c 6973 7420 6465 6669 e-name-list defi │ │ │ +00000770: 6e69 7469 6f6e 7320 7461 626c 652d 6e61 nitions table-na │ │ │ +00000780: 6d65 2074 6162 6c65 2062 6f75 6e64 7020 me table boundp │ │ │ +00000790: 7665 6374 6f72 7020 6d61 6b65 2d61 6262 vectorp make-abb │ │ │ +000007a0: 7265 762d 7461 626c 6520 7772 6f6e 672d rev-table wrong- │ │ │ +000007b0: 7479 7065 2d61 7267 756d 656e 7420 6170 type-argument ap │ │ │ +000007c0: 706c 7920 6465 6669 6e65 2d61 6262 7265 ply define-abbre │ │ │ +000007d0: 7620 6e69 6c5d 2035 2028 2324 202e 2031 v nil] 5 (#$ . 1 │ │ │ +000007e0: 3537 3229 5d29 0a23 4031 3939 2044 6566 572)]).#@199 Def │ │ │ +000007f0: 696e 6520 616e 2061 6262 7265 7620 696e ine an abbrev in │ │ │ +00000800: 2054 4142 4c45 206e 616d 6564 204e 414d TABLE named NAM │ │ │ +00000810: 452c 2074 6f20 6578 7061 6e64 2074 6f20 E, to expand to │ │ │ +00000820: 4558 5041 4e53 494f 4e20 6f72 2063 616c EXPANSION or cal │ │ │ +00000830: 6c20 484f 4f4b 2e0a 4e41 4d45 2061 6e64 l HOOK..NAME and │ │ │ +00000840: 2045 5850 414e 5349 4f4e 2061 7265 2073 EXPANSION are s │ │ │ +00000850: 7472 696e 6773 2e20 2048 6f6f 6b20 6973 trings. Hook is │ │ │ +00000860: 2061 2066 756e 6374 696f 6e20 6f72 2060 a function or ` │ │ │ +00000870: 6e69 6c27 2e0a 546f 2075 6e64 6566 696e nil'..To undefin │ │ │ +00000880: 6520 616e 2061 6262 7265 762c 2064 6566 e an abbrev, def │ │ │ +00000890: 696e 6520 6974 2077 6974 6820 616e 2065 ine it with an e │ │ │ +000008a0: 7870 616e 7369 6f6e 206f 6620 606e 696c xpansion of `nil │ │ │ +000008b0: 272e 1f0a 2864 6566 616c 6961 7320 2764 '...(defalias 'd │ │ │ +000008c0: 6566 696e 652d 6162 6272 6576 2023 5b28 efine-abbrev #[( │ │ │ +000008d0: 7461 626c 6520 6e61 6d65 2026 6f70 7469 table name &opti │ │ │ +000008e0: 6f6e 616c 2065 7870 616e 7369 6f6e 2068 onal expansion h │ │ │ +000008f0: 6f6f 6b20 636f 756e 7429 2022 0cab 8f0c ook count) ".... │ │ │ +00000900: 3bac 8bc6 c7c8 0cc4 455c 2289 14ac 710b ;.......E\"...q. │ │ │ +00000910: ab8f 0ba8 ac8b c6c7 c90b c345 5c22 8913 ...........E\".. │ │ │ +00000920: ac71 ca5c 6e21 ac8a c6c7 cb5c 6ec2 455c .q.\n!.....\n.E\ │ │ │ +00000930: 2212 aa71 cc09 5c6e 5c22 1dcd 0d21 ad82 "..q..\n\"...!.. │ │ │ +00000940: 0d4a 18ce 0d21 ad82 0d4b 891e 170e 166b .J...!...K.....k │ │ │ +00000950: ab8d 083b ab89 0c3b ab85 080c 98ac 90cf ...;...;........ │ │ │ +00000960: 1618 d0d1 095c 22ab 87cc d25c 6e5c 22d3 .....\"....\n\". │ │ │ +00000970: 4c88 0d0c 4c88 0d0e 164d 88d4 0d0b ae81 L...L....M...... │ │ │ +00000980: d55c 2288 092b 8722 205b 6f65 7870 206e .\"..+." [oexp n │ │ │ +00000990: 616d 6520 7461 626c 6520 636f 756e 7420 ame table count │ │ │ +000009a0: 6578 7061 6e73 696f 6e20 7379 6d20 7369 expansion sym si │ │ │ +000009b0: 676e 616c 2077 726f 6e67 2d74 7970 652d gnal wrong-type- │ │ │ +000009c0: 6172 6775 6d65 6e74 2028 6f72 206e 756c argument (or nul │ │ │ +000009d0: 6c20 7374 7269 6e67 2920 286f 7220 6e75 l string) (or nu │ │ │ +000009e0: 6c6c 2069 6e74 6567 6572 2920 7665 6374 ll integer) vect │ │ │ +000009f0: 6f72 7020 7665 6374 6f72 2069 6e74 6572 orp vector inter │ │ │ +00000a00: 6e20 626f 756e 6470 2066 626f 756e 6470 n boundp fboundp │ │ │ +00000a10: 2074 2073 7472 696e 672d 6d61 7463 6820 t string-match │ │ │ +00000a20: 225c 5c57 2220 2220 2220 6e69 6c20 7365 "\\W" " " nil se │ │ │ +00000a30: 7470 6c69 7374 2030 2068 6f6f 6b20 6f68 tplist 0 hook oh │ │ │ +00000a40: 6f6f 6b20 6162 6272 6576 732d 6368 616e ook abbrevs-chan │ │ │ +00000a50: 6765 645d 2036 2028 2324 202e 2032 3032 ged] 6 (#$ . 202 │ │ │ +00000a60: 3929 5d29 0a28 6279 7465 2d63 6f64 6520 9)]).(byte-code │ │ │ +00000a70: 220d 1c0c ab99 0c40 891b 3aab 8cc6 0b0d "......@..:..... │ │ │ +00000a80: 5c22 15c7 0b40 0b41 5c22 880c 4114 29aa \"...@.A\"..A.). │ │ │ +00000a90: 6409 ac87 c820 11c1 0d42 155c 6eac 87c8 d.... ...B.\n... │ │ │ +00000aa0: 2012 c20d 4215 0e5c 6ec9 61ab 8508 ac82 ...B..\n.a..... │ │ │ +00000ab0: 5c6e 1029 c687 2220 5b6c 6f63 616c 2d61 \n.).." [local-a │ │ │ +00000ac0: 6262 7265 762d 7461 626c 6520 676c 6f62 bbrev-table glob │ │ │ +00000ad0: 616c 2d61 6262 7265 762d 7461 626c 6520 al-abbrev-table │ │ │ +00000ae0: 6675 6e64 616d 656e 7461 6c2d 6d6f 6465 fundamental-mode │ │ │ +00000af0: 2d61 6262 7265 762d 7461 626c 6520 6669 -abbrev-table fi │ │ │ +00000b00: 7875 7020 6c20 6162 6272 6576 2d74 6162 xup l abbrev-tab │ │ │ +00000b10: 6c65 2d6e 616d 652d 6c69 7374 2064 656c le-name-list del │ │ │ +00000b20: 7120 6465 6669 6e65 2d61 6262 7265 762d q define-abbrev- │ │ │ +00000b30: 7461 626c 6520 6d61 6b65 2d61 6262 7265 table make-abbre │ │ │ +00000b40: 762d 7461 626c 6520 6675 6e64 616d 656e v-table fundamen │ │ │ +00000b50: 7461 6c2d 6d6f 6465 206d 616a 6f72 2d6d tal-mode major-m │ │ │ +00000b60: 6f64 655d 2034 290a 2340 3535 2044 6566 ode] 4).#@55 Def │ │ │ +00000b70: 696e 6520 4142 4252 4556 2061 7320 6120 ine ABBREV as a │ │ │ +00000b80: 676c 6f62 616c 2061 6262 7265 7669 6174 global abbreviat │ │ │ +00000b90: 696f 6e20 666f 7220 4558 5041 4e53 494f ion for EXPANSIO │ │ │ +00000ba0: 4e2e 1f0a 2864 6566 616c 6961 7320 2764 N...(defalias 'd │ │ │ +00000bb0: 6566 696e 652d 676c 6f62 616c 2d61 6262 efine-global-abb │ │ │ +00000bc0: 7265 7620 235b 286e 616d 6520 6578 7061 rev #[(name expa │ │ │ +00000bd0: 6e73 696f 6e29 2022 c35c 6e09 9708 c4c5 nsion) ".\n..... │ │ │ +00000be0: 2587 2220 5b65 7870 616e 7369 6f6e 206e %." [expansion n │ │ │ +00000bf0: 616d 6520 676c 6f62 616c 2d61 6262 7265 ame global-abbre │ │ │ +00000c00: 762d 7461 626c 6520 6465 6669 6e65 2d61 v-table define-a │ │ │ +00000c10: 6262 7265 7620 6e69 6c20 305d 2036 2028 bbrev nil 0] 6 ( │ │ │ +00000c20: 2324 202e 2032 3932 3529 2022 7344 6566 #$ . 2925) "sDef │ │ │ +00000c30: 696e 6520 676c 6f62 616c 2061 6262 7265 ine global abbre │ │ │ +00000c40: 763a 205c 6e73 4578 7061 6e73 696f 6e20 v: \nsExpansion │ │ │ +00000c50: 666f 7220 2573 3a20 225d 290a 2340 3632 for %s: "]).#@62 │ │ │ +00000c60: 2044 6566 696e 6520 4142 4252 4556 2061 Define ABBREV a │ │ │ +00000c70: 7320 6120 6d6f 6465 2d73 7065 6369 6669 s a mode-specifi │ │ │ +00000c80: 6320 6162 6272 6576 6961 7469 6f6e 2066 c abbreviation f │ │ │ +00000c90: 6f72 2045 5850 414e 5349 4f4e 2e1f 0a28 or EXPANSION...( │ │ │ +00000ca0: 6465 6661 6c69 6173 2027 6465 6669 6e65 defalias 'define │ │ │ +00000cb0: 2d6d 6f64 652d 6162 6272 6576 2023 5b28 -mode-abbrev #[( │ │ │ +00000cc0: 6e61 6d65 2065 7870 616e 7369 6f6e 2920 name expansion) │ │ │ +00000cd0: 22c3 5c6e ae83 c4c5 2109 9708 c6c7 2587 ".\n....!.....%. │ │ │ +00000ce0: 2220 5b65 7870 616e 7369 6f6e 206e 616d " [expansion nam │ │ │ +00000cf0: 6520 6c6f 6361 6c2d 6162 6272 6576 2d74 e local-abbrev-t │ │ │ +00000d00: 6162 6c65 2064 6566 696e 652d 6162 6272 able define-abbr │ │ │ +00000d10: 6576 2065 7272 6f72 2022 4d61 6a6f 7220 ev error "Major │ │ │ +00000d20: 6d6f 6465 2068 6173 206e 6f20 6162 6272 mode has no abbr │ │ │ +00000d30: 6576 2074 6162 6c65 2220 6e69 6c20 305d ev table" nil 0] │ │ │ +00000d40: 2036 2028 2324 202e 2033 3136 3929 2022 6 (#$ . 3169) " │ │ │ +00000d50: 7344 6566 696e 6520 6d6f 6465 2061 6262 sDefine mode abb │ │ │ +00000d60: 7265 763a 205c 6e73 4578 7061 6e73 696f rev: \nsExpansio │ │ │ +00000d70: 6e20 666f 7220 2573 3a20 225d 290a 2340 n for %s: "]).#@ │ │ │ +00000d80: 3338 3420 5265 7475 726e 2074 6865 2073 384 Return the s │ │ │ +00000d90: 796d 626f 6c20 7265 7072 6573 656e 7469 ymbol representi │ │ │ +00000da0: 6e67 2061 6262 7265 7620 6e61 6d65 6420 ng abbrev named │ │ │ +00000db0: 4142 4252 4556 2e0a 5468 6973 2073 796d ABBREV..This sym │ │ │ +00000dc0: 626f 6c27 7320 6e61 6d65 2069 7320 4142 bol's name is AB │ │ │ +00000dd0: 4252 4556 2c20 6275 7420 6974 2069 7320 BREV, but it is │ │ │ +00000de0: 6e6f 7420 7468 6520 6361 6e6f 6e69 6361 not the canonica │ │ │ +00000df0: 6c20 7379 6d62 6f6c 206f 6620 7468 6174 l symbol of that │ │ │ +00000e00: 206e 616d 653b 0a69 7420 6973 2069 6e74 name;.it is int │ │ │ +00000e10: 6572 6e65 6420 696e 2061 6e20 6162 6272 erned in an abbr │ │ │ +00000e20: 6576 2d74 6162 6c65 2072 6174 6865 7220 ev-table rather │ │ │ +00000e30: 7468 616e 2074 6865 206e 6f72 6d61 6c20 than the normal │ │ │ +00000e40: 6f62 6172 7261 792e 0a54 6865 2076 616c obarray..The val │ │ │ +00000e50: 7565 2069 7320 6e69 6c20 6966 2074 6861 ue is nil if tha │ │ │ +00000e60: 7420 6162 6272 6576 2069 7320 6e6f 7420 t abbrev is not │ │ │ +00000e70: 6465 6669 6e65 642e 0a4f 7074 696f 6e61 defined..Optiona │ │ │ +00000e80: 6c20 7365 636f 6e64 2061 7267 2054 4142 l second arg TAB │ │ │ +00000e90: 4c45 2069 7320 6162 6272 6576 2074 6162 LE is abbrev tab │ │ │ +00000ea0: 6c65 2074 6f20 6c6f 6f6b 2069 7420 7570 le to look it up │ │ │ +00000eb0: 2069 6e2e 0a54 6865 2064 6566 6175 6c74 in..The default │ │ │ +00000ec0: 2069 7320 746f 2074 7279 2062 7566 6665 is to try buffe │ │ │ +00000ed0: 7227 7320 6d6f 6465 2d73 7065 6369 6669 r's mode-specifi │ │ │ +00000ee0: 6320 6162 6272 6576 2074 6162 6c65 2c20 c abbrev table, │ │ │ +00000ef0: 7468 656e 2067 6c6f 6261 6c20 7461 626c then global tabl │ │ │ +00000f00: 652e 1f0a 2864 6566 616c 6961 7320 2761 e...(defalias 'a │ │ │ +00000f10: 6262 7265 762d 7379 6d62 6f6c 2023 5b28 bbrev-symbol #[( │ │ │ +00000f20: 6162 6272 6576 2026 6f70 7469 6f6e 616c abbrev &optional │ │ │ +00000f30: 2074 6162 6c65 2920 22c4 1b5c 6eab 850b table) "..\n... │ │ │ +00000f40: 5c6e 21aa 8b09 ab85 0b09 21ae 830b 0821 \n!.......!....! │ │ │ +00000f50: 2987 2220 5b67 6c6f 6261 6c2d 6162 6272 )." [global-abbr │ │ │ +00000f60: 6576 2d74 6162 6c65 206c 6f63 616c 2d61 ev-table local-a │ │ │ +00000f70: 6262 7265 762d 7461 626c 6520 7461 626c bbrev-table tabl │ │ │ +00000f80: 6520 6672 6f62 2023 5b28 7461 626c 6529 e frob #[(table) │ │ │ +00000f90: 2022 c309 085c 221a c45c 6e21 ad86 5c6e "...\"..\n!..\n │ │ │ +00000fa0: 4a3b ad81 5c6e 2987 2220 5b74 6162 6c65 J;..\n)." [table │ │ │ +00000fb0: 2061 6262 7265 7620 7379 6d20 696e 7465 abbrev sym inte │ │ │ +00000fc0: 726e 2d73 6f66 7420 626f 756e 6470 5d20 rn-soft boundp] │ │ │ +00000fd0: 335d 5d20 3220 2823 2420 2e20 3334 3630 3]] 2 (#$ . 3460 │ │ │ +00000fe0: 295d 290a 2340 3136 3220 5265 7475 726e )]).#@162 Return │ │ │ +00000ff0: 2074 6865 2073 7472 696e 6720 7468 6174 the string that │ │ │ +00001000: 2041 4242 5245 5620 6578 7061 6e64 7320 ABBREV expands │ │ │ +00001010: 696e 746f 2069 6e20 7468 6520 6375 7272 into in the curr │ │ │ +00001020: 656e 7420 6275 6666 6572 2e0a 4f70 7469 ent buffer..Opti │ │ │ +00001030: 6f6e 616c 6c79 2073 7065 6369 6679 2061 onally specify a │ │ │ +00001040: 6e20 6162 6272 6576 2074 6162 6c65 2061 n abbrev table a │ │ │ +00001050: 7320 7365 636f 6e64 2061 7267 3b0a 7468 s second arg;.th │ │ │ +00001060: 656e 2041 4242 5245 5620 6973 206c 6f6f en ABBREV is loo │ │ │ +00001070: 6b65 6420 7570 2069 6e20 7468 6174 2074 ked up in that t │ │ │ +00001080: 6162 6c65 206f 6e6c 792e 1f0a 2864 6566 able only...(def │ │ │ +00001090: 616c 6961 7320 2761 6262 7265 762d 6578 alias 'abbrev-ex │ │ │ +000010a0: 7061 6e73 696f 6e20 235b 2861 6262 7265 pansion #[(abbre │ │ │ +000010b0: 7620 266f 7074 696f 6e61 6c20 7461 626c v &optional tabl │ │ │ +000010c0: 6529 2022 c309 085c 2289 1aad 825c 6e4a e) "...\"....\nJ │ │ │ +000010d0: 2987 2220 5b74 6162 6c65 2061 6262 7265 )." [table abbre │ │ │ +000010e0: 7620 7379 6d20 6162 6272 6576 2d73 796d v sym abbrev-sym │ │ │ +000010f0: 626f 6c5d 2034 2028 2324 202e 2034 3037 bol] 4 (#$ . 407 │ │ │ +00001100: 3429 5d29 0a23 4031 3339 2055 6e64 6f20 4)]).#@139 Undo │ │ │ +00001110: 7468 6520 6578 7061 6e73 696f 6e20 6f66 the expansion of │ │ │ +00001120: 2074 6865 206c 6173 7420 6162 6272 6576 the last abbrev │ │ │ +00001130: 2074 6861 7420 6578 7061 6e64 6564 2e0a that expanded.. │ │ │ +00001140: 5468 6973 2064 6966 6665 7273 2066 726f This differs fro │ │ │ +00001150: 6d20 6f72 6469 6e61 7279 2075 6e64 6f20 m ordinary undo │ │ │ +00001160: 696e 2074 6861 7420 6f74 6865 7220 6564 in that other ed │ │ │ +00001170: 6974 696e 6720 646f 6e65 2073 696e 6365 iting done since │ │ │ +00001180: 2074 6865 6e0a 6973 206e 6f74 2075 6e64 then.is not und │ │ │ +00001190: 6f6e 652e 1f0a 2864 6566 616c 6961 7320 one...(defalias │ │ │ +000011a0: 2775 6e65 7870 616e 642d 6162 6272 6576 'unexpand-abbrev │ │ │ +000011b0: 2023 5b6e 696c 2022 0d65 57ae 880d 6456 #[nil ".eW...dV │ │ │ +000011c0: ae83 0b3b 3f3f ada9 601a 094a 8918 471c ...;??..`..J..G. │ │ │ +000011d0: 0d62 880d 890c 5c5c 7c88 0b63 880c 0b47 .b....\\|..c...G │ │ │ +000011e0: 5a14 c613 0d5c 6e57 ab86 5c6e 0c5a 62aa Z....\nW..\n.Zb. │ │ │ +000011f0: 825c 6e62 2b87 2220 5b76 616c 206c 6173 .\nb+." [val las │ │ │ +00001200: 742d 6162 6272 6576 206f 706f 696e 7420 t-abbrev opoint │ │ │ +00001210: 6c61 7374 2d61 6262 7265 762d 7465 7874 last-abbrev-text │ │ │ +00001220: 2061 646a 7573 7420 6c61 7374 2d61 6262 adjust last-abb │ │ │ +00001230: 7265 762d 6c6f 6361 7469 6f6e 206e 696c rev-location nil │ │ │ +00001240: 5d20 3420 2823 2420 2e20 3433 3633 2920 ] 4 (#$ . 4363) │ │ │ +00001250: 6e69 6c5d 290a 2340 3336 3320 496e 7365 nil]).#@363 Inse │ │ │ +00001260: 7274 2062 6566 6f72 6520 706f 696e 7420 rt before point │ │ │ +00001270: 6120 6675 6c6c 2064 6573 6372 6970 7469 a full descripti │ │ │ +00001280: 6f6e 206f 6620 6162 6272 6576 2074 6162 on of abbrev tab │ │ │ +00001290: 6c65 206e 616d 6564 204e 414d 452e 0a4e le named NAME..N │ │ │ +000012a0: 414d 4520 6973 2061 2073 796d 626f 6c20 AME is a symbol │ │ │ +000012b0: 7768 6f73 6520 7661 6c75 6520 6973 2061 whose value is a │ │ │ +000012c0: 6e20 6162 6272 6576 2074 6162 6c65 2e0a n abbrev table.. │ │ │ +000012d0: 4966 206f 7074 696f 6e61 6c20 7365 636f If optional seco │ │ │ +000012e0: 6e64 2061 7267 756d 656e 7420 4855 4d41 nd argument HUMA │ │ │ +000012f0: 4e2d 5245 4144 4142 4c45 2069 7320 6e6f N-READABLE is no │ │ │ +00001300: 6e2d 6e69 6c2c 2069 6e73 6572 7420 610a n-nil, insert a. │ │ │ +00001310: 6875 6d61 6e2d 7265 6164 6162 6c65 2064 human-readable d │ │ │ +00001320: 6573 6372 6970 7469 6f6e 2e20 4f74 6865 escription. Othe │ │ │ +00001330: 7277 6973 6520 7468 6520 6465 7363 7269 rwise the descri │ │ │ +00001340: 7074 696f 6e20 6973 2061 6e0a 6578 7072 ption is an.expr │ │ │ +00001350: 6573 7369 6f6e 2c20 6120 6361 6c6c 2074 ession, a call t │ │ │ +00001360: 6f20 6064 6566 696e 652d 6162 6272 6576 o `define-abbrev │ │ │ +00001370: 2d74 6162 6c65 272c 2077 6869 6368 2077 -table', which w │ │ │ +00001380: 6f75 6c64 2064 6566 696e 6520 7468 650a ould define the. │ │ │ +00001390: 6162 6272 6576 2074 6162 6c65 204e 414d abbrev table NAM │ │ │ +000013a0: 4520 6578 6163 746c 7920 6173 2069 7420 E exactly as it │ │ │ +000013b0: 6973 2063 7572 7265 6e74 6c79 2064 6566 is currently def │ │ │ +000013c0: 696e 6564 2e1f 0a28 6465 6661 6c69 6173 ined...(defalias │ │ │ +000013d0: 2027 696e 7365 7274 2d61 6262 7265 762d 'insert-abbrev- │ │ │ +000013e0: 7461 626c 652d 6465 7363 7269 7074 696f table-descriptio │ │ │ +000013f0: 6e20 235b 286e 616d 6520 266f 7074 696f n #[(name &optio │ │ │ +00001400: 6e61 6c20 6875 6d61 6e2d 7265 6164 6162 nal human-readab │ │ │ +00001410: 6c65 2920 225c 6e4a 701b 19c4 c55c 6e5c le) "\nJp....\n\ │ │ │ +00001420: 2288 08ab 99c6 5c6e 430b 5c22 88c7 0b21 ".....\nC.\"...! │ │ │ +00001430: 88c7 0b21 88c8 c909 5c22 88c7 0b21 88aa ...!....\"...!.. │ │ │ +00001440: 99ca cb0b 5c22 88c6 5c6e 0b5c 2288 cacc ....\"..\n.\"... │ │ │ +00001450: 0b5c 2288 c8cd 095c 2288 cace 0b5c 2288 .\"....\"....\". │ │ │ +00001460: c70b 2188 2ac4 cf21 8722 205b 6875 6d61 ..!.*..!." [huma │ │ │ +00001470: 6e2d 7265 6164 6162 6c65 2074 6162 6c65 n-readable table │ │ │ +00001480: 206e 616d 6520 7374 7265 616d 206d 6573 name stream mes │ │ │ +00001490: 7361 6765 2022 4162 6272 6576 2d74 6162 sage "Abbrev-tab │ │ │ +000014a0: 6c65 2025 732e 2e2e 2220 7072 696e 3120 le %s..." prin1 │ │ │ +000014b0: 7465 7270 7269 206d 6170 6174 6f6d 7320 terpri mapatoms │ │ │ +000014c0: 235b 2873 796d 2920 2209 4aad dfc4 c509 #[(sym) ".J..... │ │ │ +000014d0: 2121 8918 471b c608 5c6e 5c22 880b c757 !!..G...\n\"...W │ │ │ +000014e0: ab8b c8c9 5c6e 5c22 880b 5489 13aa 71c6 ....\n\"..T...q. │ │ │ +000014f0: cacb cc09 215c 225c 6e5c 2288 094b ac88 ....!\"\n\"..K.. │ │ │ +00001500: cd09 4a5c 6e5c 2288 aaa7 c409 4a21 100b ..J\n\".....J!.. │ │ │ +00001510: 0847 5c5c ce5c 5c13 c608 5c6e 5c22 880b .G\\.\\...\n\".. │ │ │ +00001520: cf57 ab8b c8c9 5c6e 5c22 880b 5489 13aa .W....\n\"..T... │ │ │ +00001530: 71cd 094b 5c6e 5c22 88d0 5c6e 212a 8722 q..K\n\"..\n!*." │ │ │ +00001540: 205b 6e20 7379 6d20 7374 7265 616d 2070 [n sym stream p │ │ │ +00001550: 6f73 2070 7269 6e31 2d74 6f2d 7374 7269 os prin1-to-stri │ │ │ +00001560: 6e67 2073 796d 626f 6c2d 6e61 6d65 2070 ng symbol-name p │ │ │ +00001570: 7269 6e63 2031 3420 7772 6974 652d 6368 rinc 14 write-ch │ │ │ +00001580: 6172 203f 5c20 2066 6f72 6d61 7420 2220 ar ?\ format " │ │ │ +00001590: 252d 3553 2022 2073 796d 626f 6c2d 706c %-5S " symbol-pl │ │ │ +000015a0: 6973 7420 7072 696e 3120 3620 3435 2074 ist prin1 6 45 t │ │ │ +000015b0: 6572 7072 695d 2036 5d20 7072 696e 6320 erpri] 6] princ │ │ │ +000015c0: 2228 6465 6669 6e65 2d61 6262 7265 762d "(define-abbrev- │ │ │ +000015d0: 7461 626c 6520 2722 2022 2027 285c 6e22 table '" " '(\n" │ │ │ +000015e0: 2023 5b28 7379 6d29 2022 094a ad97 c2c3 #[(sym) ".J.... │ │ │ +000015f0: 085c 2288 c4c5 0921 094a 094b c609 2146 .\"....!.J.K..!F │ │ │ +00001600: 085c 2288 c708 2187 2220 5b73 7472 6561 .\"...!." [strea │ │ │ +00001610: 6d20 7379 6d20 7072 696e 6320 2220 2020 m sym princ " │ │ │ +00001620: 2022 2070 7269 6e31 2073 796d 626f 6c2d " prin1 symbol- │ │ │ +00001630: 6e61 6d65 2073 796d 626f 6c2d 706c 6973 name symbol-plis │ │ │ +00001640: 7420 7465 7270 7269 5d20 365d 2022 2020 t terpri] 6] " │ │ │ +00001650: 2020 2929 5c6e 2220 2222 5d20 3320 2823 ))\n" ""] 3 (# │ │ │ +00001660: 2420 2e20 3437 3030 295d 290a 2340 3138 $ . 4700)]).#@18 │ │ │ +00001670: 3920 546f 6767 6c65 2061 6262 7265 7620 9 Toggle abbrev │ │ │ +00001680: 6d6f 6465 2e0a 5769 7468 2061 7267 756d mode..With argum │ │ │ +00001690: 656e 7420 4152 472c 2065 6e61 626c 6520 ent ARG, enable │ │ │ +000016a0: 6162 6272 6576 206d 6f64 6520 6966 2041 abbrev mode if A │ │ │ +000016b0: 5247 2069 7320 706f 7369 7469 7665 2c20 RG is positive, │ │ │ +000016c0: 656c 7365 2064 6973 6162 6c65 2e0a 496e else disable..In │ │ │ +000016d0: 2061 6262 7265 7620 6d6f 6465 2c20 696e abbrev mode, in │ │ │ +000016e0: 7365 7274 696e 6720 616e 2061 6262 7265 serting an abbre │ │ │ +000016f0: 7669 6174 696f 6e20 6361 7573 6573 2069 viation causes i │ │ │ +00001700: 7420 746f 2065 7870 616e 640a 616e 6420 t to expand.and │ │ │ +00001710: 6265 2072 6570 6c61 6365 6420 6279 2069 be replaced by i │ │ │ +00001720: 7473 2065 7870 616e 7369 6f6e 2e1f 0a28 ts expansion...( │ │ │ +00001730: 6465 6661 6c69 6173 2027 6162 6272 6576 defalias 'abbrev │ │ │ +00001740: 2d6d 6f64 6520 235b 2861 7267 2920 2209 -mode #[(arg) ". │ │ │ +00001750: ac84 083f aa85 c209 21c3 5610 c420 8722 ...?....!.V.. ." │ │ │ +00001760: 205b 6162 6272 6576 2d6d 6f64 6520 6172 [abbrev-mode ar │ │ │ +00001770: 6720 7072 6566 6978 2d6e 756d 6572 6963 g prefix-numeric │ │ │ +00001780: 2d76 616c 7565 2030 2072 6564 7261 772d -value 0 redraw- │ │ │ +00001790: 6d6f 6465 6c69 6e65 5d20 3220 2823 2420 modeline] 2 (#$ │ │ │ +000017a0: 2e20 3537 3436 2920 2250 225d 290a 2340 . 5746) "P"]).#@ │ │ │ +000017b0: 3330 204b 6579 6d61 7020 7573 6564 2069 30 Keymap used i │ │ │ +000017c0: 6e20 6564 6974 2d61 6262 7265 7673 2e1f n edit-abbrevs.. │ │ │ +000017d0: 0a28 6465 6676 6172 2065 6469 742d 6162 .(defvar edit-ab │ │ │ +000017e0: 6272 6576 732d 6d61 7020 6e69 6c20 2823 brevs-map nil (# │ │ │ +000017f0: 2420 2e20 3630 3637 2929 0a28 6279 7465 $ . 6067)).(byte │ │ │ +00001800: 2d63 6f64 6520 2208 ac94 c120 10c2 08c0 -code ".... .... │ │ │ +00001810: 5c22 88c3 08c4 c523 88c3 08c6 c523 88c1 \".....#.....#.. │ │ │ +00001820: 8722 205b 6564 6974 2d61 6262 7265 7673 ." [edit-abbrevs │ │ │ +00001830: 2d6d 6170 206d 616b 652d 7370 6172 7365 -map make-sparse │ │ │ +00001840: 2d6b 6579 6d61 7020 7365 742d 6b65 796d -keymap set-keym │ │ │ +00001850: 6170 2d6e 616d 6520 6465 6669 6e65 2d6b ap-name define-k │ │ │ +00001860: 6579 2022 1813 2220 6564 6974 2d61 6262 ey ".." edit-abb │ │ │ +00001870: 7265 7673 2d72 6564 6566 696e 6520 2203 revs-redefine ". │ │ │ +00001880: 0322 5d20 3429 0a23 4033 3120 556e 6465 ."] 4).#@31 Unde │ │ │ +00001890: 6669 6e65 2061 6c6c 2064 6566 696e 6564 fine all defined │ │ │ +000018a0: 2061 6262 7265 7673 2e1f 0a28 6465 6661 abbrevs...(defa │ │ │ +000018b0: 6c69 6173 2027 6b69 6c6c 2d61 6c6c 2d61 lias 'kill-all-a │ │ │ +000018c0: 6262 7265 7673 2023 5b6e 696c 2022 0889 bbrevs #[nil ".. │ │ │ +000018d0: 19ad 8dc2 0940 4a21 8809 4189 11ac 74c3 .....@J!..A...t. │ │ │ +000018e0: 2987 2220 5b61 6262 7265 762d 7461 626c )." [abbrev-tabl │ │ │ +000018f0: 652d 6e61 6d65 2d6c 6973 7420 7461 626c e-name-list tabl │ │ │ +00001900: 6573 2063 6c65 6172 2d61 6262 7265 762d es clear-abbrev- │ │ │ +00001910: 7461 626c 6520 6e69 6c5d 2033 2028 2324 table nil] 3 (#$ │ │ │ +00001920: 202e 2036 3238 3429 206e 696c 5d29 0a23 . 6284) nil]).# │ │ │ +00001930: 4039 3520 496e 7365 7274 2061 6674 6572 @95 Insert after │ │ │ +00001940: 2070 6f69 6e74 2061 2064 6573 6372 6970 point a descrip │ │ │ +00001950: 7469 6f6e 206f 6620 616c 6c20 6465 6669 tion of all defi │ │ │ +00001960: 6e65 6420 6162 6272 6576 732e 0a4d 6172 ned abbrevs..Mar │ │ │ +00001970: 6b20 6973 2073 6574 2061 6674 6572 2074 k is set after t │ │ │ +00001980: 6865 2069 6e73 6572 7465 6420 7465 7874 he inserted text │ │ │ +00001990: 2e1f 0a28 6465 6661 6c69 6173 2027 696e ...(defalias 'in │ │ │ +000019a0: 7365 7274 2d61 6262 7265 7673 2023 5b6e sert-abbrevs #[n │ │ │ +000019b0: 696c 2022 c28a 0889 19ab 8cc3 0940 c45c il ".........@.\ │ │ │ +000019c0: 2288 0941 8911 ac74 2960 2921 8722 205b "..A...t)`)!." [ │ │ │ +000019d0: 6162 6272 6576 2d74 6162 6c65 2d6e 616d abbrev-table-nam │ │ │ +000019e0: 652d 6c69 7374 2074 6162 6c65 7320 7075 e-list tables pu │ │ │ +000019f0: 7368 2d6d 6172 6b20 696e 7365 7274 2d61 sh-mark insert-a │ │ │ +00001a00: 6262 7265 762d 7461 626c 652d 6465 7363 bbrev-table-desc │ │ │ +00001a10: 7269 7074 696f 6e20 745d 2035 2028 2324 ription t] 5 (#$ │ │ │ +00001a20: 202e 2036 3435 3229 206e 696c 5d29 0a23 . 6452) nil]).# │ │ │ +00001a30: 4034 3020 4469 7370 6c61 7920 6120 6c69 @40 Display a li │ │ │ +00001a40: 7374 206f 6620 616c 6c20 6465 6669 6e65 st of all define │ │ │ +00001a50: 6420 6162 6272 6576 732e 1f0a 2864 6566 d abbrevs...(def │ │ │ +00001a60: 616c 6961 7320 276c 6973 742d 6162 6272 alias 'list-abbr │ │ │ +00001a70: 6576 7320 235b 6e69 6c20 22c0 c120 2187 evs #[nil ".. !. │ │ │ +00001a80: 2220 5b64 6973 706c 6179 2d62 7566 6665 " [display-buffe │ │ │ +00001a90: 7220 7072 6570 6172 652d 6162 6272 6576 r prepare-abbrev │ │ │ +00001aa0: 2d6c 6973 742d 6275 6666 6572 5d20 3220 -list-buffer] 2 │ │ │ +00001ab0: 2823 2420 2e20 3637 3038 2920 6e69 6c5d (#$ . 6708) nil] │ │ │ +00001ac0: 290a 2864 6566 616c 6961 7320 2770 7265 ).(defalias 'pre │ │ │ +00001ad0: 7061 7265 2d61 6262 7265 762d 6c69 7374 pare-abbrev-list │ │ │ +00001ae0: 2d62 7566 6665 7220 235b 6e69 6c20 228a -buffer #[nil ". │ │ │ +00001af0: c2c3 2171 88c4 2088 0889 19ab 8cc5 0940 ..!q.. ........@ │ │ │ +00001b00: c65c 2288 0941 8911 ac74 2965 6288 c7c8 .\"..A...t)eb... │ │ │ +00001b10: 2188 c920 8829 c2c3 2187 2220 5b61 6262 !.. .)..!." [abb │ │ │ +00001b20: 7265 762d 7461 626c 652d 6e61 6d65 2d6c rev-table-name-l │ │ │ +00001b30: 6973 7420 7461 626c 6573 2067 6574 2d62 ist tables get-b │ │ │ +00001b40: 7566 6665 722d 6372 6561 7465 2022 2a41 uffer-create "*A │ │ │ +00001b50: 6262 7265 7673 2a22 2065 7261 7365 2d62 bbrevs*" erase-b │ │ │ +00001b60: 7566 6665 7220 696e 7365 7274 2d61 6262 uffer insert-abb │ │ │ +00001b70: 7265 762d 7461 626c 652d 6465 7363 7269 rev-table-descri │ │ │ +00001b80: 7074 696f 6e20 7420 7365 742d 6275 6666 ption t set-buff │ │ │ +00001b90: 6572 2d6d 6f64 6966 6965 642d 7020 6e69 er-modified-p ni │ │ │ +00001ba0: 6c20 6564 6974 2d61 6262 7265 7673 2d6d l edit-abbrevs-m │ │ │ +00001bb0: 6f64 655d 2034 5d29 0a23 4037 3620 4d61 ode] 4]).#@76 Ma │ │ │ +00001bc0: 6a6f 7220 6d6f 6465 2066 6f72 2065 6469 jor mode for edi │ │ │ +00001bd0: 7469 6e67 2074 6865 206c 6973 7420 6f66 ting the list of │ │ │ +00001be0: 2061 6262 7265 7620 6465 6669 6e69 7469 abbrev definiti │ │ │ +00001bf0: 6f6e 732e 0a5c 7b65 6469 742d 6162 6272 ons..\{edit-abbr │ │ │ +00001c00: 6576 732d 6d61 707d 1f0a 2864 6566 616c evs-map}..(defal │ │ │ +00001c10: 6961 7320 2765 6469 742d 6162 6272 6576 ias 'edit-abbrev │ │ │ +00001c20: 732d 6d6f 6465 2023 5b6e 696c 2022 c312 s-mode #[nil ".. │ │ │ +00001c30: c411 c508 2187 2220 5b65 6469 742d 6162 ....!." [edit-ab │ │ │ +00001c40: 6272 6576 732d 6d61 7020 6d6f 6465 2d6e brevs-map mode-n │ │ │ +00001c50: 616d 6520 6d61 6a6f 722d 6d6f 6465 2065 ame major-mode e │ │ │ +00001c60: 6469 742d 6162 6272 6576 732d 6d6f 6465 dit-abbrevs-mode │ │ │ +00001c70: 2022 4564 6974 2d41 6262 7265 7673 2220 "Edit-Abbrevs" │ │ │ +00001c80: 7573 652d 6c6f 6361 6c2d 6d61 705d 2032 use-local-map] 2 │ │ │ +00001c90: 2028 2324 202e 2037 3130 3229 206e 696c (#$ . 7102) nil │ │ │ +00001ca0: 5d29 0a23 4035 3638 2041 6c74 6572 2061 ]).#@568 Alter a │ │ │ +00001cb0: 6262 7265 7620 6465 6669 6e69 7469 6f6e bbrev definition │ │ │ +00001cc0: 7320 6279 2065 6469 7469 6e67 2061 206c s by editing a l │ │ │ +00001cd0: 6973 7420 6f66 2074 6865 6d2e 0a53 656c ist of them..Sel │ │ │ +00001ce0: 6563 7473 2061 2062 7566 6665 7220 636f ects a buffer co │ │ │ +00001cf0: 6e74 6169 6e69 6e67 2061 206c 6973 7420 ntaining a list │ │ │ +00001d00: 6f66 2061 6262 7265 7620 6465 6669 6e69 of abbrev defini │ │ │ +00001d10: 7469 6f6e 732e 0a59 6f75 2063 616e 2065 tions..You can e │ │ │ +00001d20: 6469 7420 7468 656d 2061 6e64 2074 7970 dit them and typ │ │ │ +00001d30: 6520 5c3c 6564 6974 2d61 6262 7265 7673 e \\[edit-abbr │ │ │ +00001d50: 6576 732d 7265 6465 6669 6e65 5d20 746f evs-redefine] to │ │ │ +00001d60: 2072 6564 6566 696e 6520 6162 6272 6576 redefine abbrev │ │ │ +00001d70: 730a 6163 636f 7264 696e 6720 746f 2079 s.according to y │ │ │ +00001d80: 6f75 7220 6564 6974 696e 672e 0a42 7566 our editing..Buf │ │ │ +00001d90: 6665 7220 636f 6e74 6169 6e73 2061 2068 fer contains a h │ │ │ +00001da0: 6561 6465 7220 6c69 6e65 2066 6f72 2065 eader line for e │ │ │ +00001db0: 6163 6820 6162 6272 6576 2074 6162 6c65 ach abbrev table │ │ │ +00001dc0: 2c0a 2077 6869 6368 2069 7320 7468 6520 ,. which is the │ │ │ +00001dd0: 6162 6272 6576 2074 6162 6c65 206e 616d abbrev table nam │ │ │ +00001de0: 6520 696e 2070 6172 656e 7468 6573 6573 e in parentheses │ │ │ +00001df0: 2e0a 5468 6973 2069 7320 666f 6c6c 6f77 ..This is follow │ │ │ +00001e00: 6564 2062 7920 6f6e 6520 6c69 6e65 2070 ed by one line p │ │ │ +00001e10: 6572 2061 6262 7265 7620 696e 2074 6861 er abbrev in tha │ │ │ +00001e20: 7420 7461 626c 653a 0a4e 414d 4520 2020 t table:.NAME │ │ │ +00001e30: 5553 4543 4f55 4e54 2020 2045 5850 414e USECOUNT EXPAN │ │ │ +00001e40: 5349 4f4e 2020 2048 4f4f 4b0a 7768 6572 SION HOOK.wher │ │ │ +00001e50: 6520 4e41 4d45 2061 6e64 2045 5850 414e e NAME and EXPAN │ │ │ +00001e60: 5349 4f4e 2061 7265 2073 7472 696e 6773 SION are strings │ │ │ +00001e70: 2077 6974 6820 7175 6f74 6573 2c0a 5553 with quotes,.US │ │ │ +00001e80: 4543 4f55 4e54 2069 7320 616e 2069 6e74 ECOUNT is an int │ │ │ +00001e90: 6567 6572 2c20 616e 6420 484f 4f4b 2069 eger, and HOOK i │ │ │ +00001ea0: 7320 616e 7920 7661 6c69 6420 6675 6e63 s any valid func │ │ │ +00001eb0: 7469 6f6e 0a6f 7220 6d61 7920 6265 206f tion.or may be o │ │ │ +00001ec0: 6d69 7474 6564 2028 6974 2069 7320 7573 mitted (it is us │ │ │ +00001ed0: 7561 6c6c 7920 6f6d 6974 7465 6429 2e1f ually omitted).. │ │ │ +00001ee0: 0a28 6465 6661 6c69 6173 2027 6564 6974 .(defalias 'edit │ │ │ +00001ef0: 2d61 6262 7265 7673 2023 5b6e 696c 2022 -abbrevs #[nil " │ │ │ +00001f00: c0c1 2021 8722 205b 7377 6974 6368 2d74 .. !." [switch-t │ │ │ +00001f10: 6f2d 6275 6666 6572 2070 7265 7061 7265 o-buffer prepare │ │ │ +00001f20: 2d61 6262 7265 762d 6c69 7374 2d62 7566 -abbrev-list-buf │ │ │ +00001f30: 6665 725d 2032 2028 2324 202e 2037 3333 fer] 2 (#$ . 733 │ │ │ +00001f40: 3729 206e 696c 5d29 0a23 4035 3620 5265 7) nil]).#@56 Re │ │ │ +00001f50: 6465 6669 6e65 2061 6262 7265 7673 2061 define abbrevs a │ │ │ +00001f60: 6363 6f72 6469 6e67 2074 6f20 6375 7272 ccording to curr │ │ │ +00001f70: 656e 7420 6275 6666 6572 2063 6f6e 7465 ent buffer conte │ │ │ +00001f80: 6e74 732e 1f0a 2864 6566 616c 6961 7320 nts...(defalias │ │ │ +00001f90: 2765 6469 742d 6162 6272 6576 732d 7265 'edit-abbrevs-re │ │ │ +00001fa0: 6465 6669 6e65 2023 5b6e 696c 2022 c0c1 define #[nil ".. │ │ │ +00001fb0: 2188 c2c3 2187 2220 5b64 6566 696e 652d !...!." [define- │ │ │ +00001fc0: 6162 6272 6576 7320 7420 7365 742d 6275 abbrevs t set-bu │ │ │ +00001fd0: 6666 6572 2d6d 6f64 6966 6965 642d 7020 ffer-modified-p │ │ │ +00001fe0: 6e69 6c5d 2032 2028 2324 202e 2038 3031 nil] 2 (#$ . 801 │ │ │ +00001ff0: 3429 206e 696c 5d29 0a23 4032 3535 2044 4) nil]).#@255 D │ │ │ +00002000: 6566 696e 6520 6162 6272 6576 7320 6163 efine abbrevs ac │ │ │ +00002010: 636f 7264 696e 6720 746f 2063 7572 7265 cording to curre │ │ │ +00002020: 6e74 2076 6973 6962 6c65 2062 7566 6665 nt visible buffe │ │ │ +00002030: 7220 636f 6e74 656e 7473 2e0a 5365 6520 r contents..See │ │ │ +00002040: 646f 6375 6d65 6e74 6174 696f 6e20 6f66 documentation of │ │ │ +00002050: 2060 6564 6974 2d61 6262 7265 7673 2720 `edit-abbrevs' │ │ │ +00002060: 666f 7220 696e 666f 206f 6e20 7468 6520 for info on the │ │ │ +00002070: 666f 726d 6174 206f 6620 7468 650a 7465 format of the.te │ │ │ +00002080: 7874 2079 6f75 206d 7573 7420 6861 7665 xt you must have │ │ │ +00002090: 2069 6e20 7468 6520 6275 6666 6572 2e0a in the buffer.. │ │ │ +000020a0: 5769 7468 2061 7267 756d 656e 742c 2065 With argument, e │ │ │ +000020b0: 6c69 6d69 6e61 7465 2061 6c6c 2061 6262 liminate all abb │ │ │ +000020c0: 7265 7620 6465 6669 6e69 7469 6f6e 7320 rev definitions │ │ │ +000020d0: 6578 6365 7074 0a74 6865 206f 6e65 7320 except.the ones │ │ │ +000020e0: 6465 6669 6e65 6420 6672 6f6d 2074 6865 defined from the │ │ │ +000020f0: 2062 7566 6665 7220 6e6f 772e 1f0a 2864 buffer now...(d │ │ │ +00002100: 6566 616c 6961 7320 2764 6566 696e 652d efalias 'define- │ │ │ +00002110: 6162 6272 6576 7320 235b 2826 6f70 7469 abbrevs #[(&opti │ │ │ +00002120: 6f6e 616c 2061 7267 2920 220e 10ab 83c6 onal arg) "..... │ │ │ +00002130: 2088 8a65 6288 6d3f add1 c7c8 c9ca 23ad ..eb.m?......#. │ │ │ +00002140: ca70 1dcb 0d21 1e0f c989 1c1b c989 1a19 .p...!.......... │ │ │ +00002150: c918 cc79 88cc 7988 6cac a6cb 0d21 13cb ...y..y.l....!.. │ │ │ +00002160: 0d21 10cb 0d21 11cd c978 886c 3fad 83cb .!...!...x.l?... │ │ │ +00002170: 0d21 12cd c978 880b 095c 6e08 460c 4214 .!...x...\n.F.B. │ │ │ +00002180: aa54 ce0e 0f0c 5c22 882e 07aa 2b29 8722 .T....\"....+)." │ │ │ +00002190: 205b 636f 756e 7420 6578 7020 686f 6f6b [count exp hook │ │ │ +000021a0: 206e 616d 6520 6162 6272 6576 7320 6275 name abbrevs bu │ │ │ +000021b0: 6620 6b69 6c6c 2d61 6c6c 2d61 6262 7265 f kill-all-abbre │ │ │ +000021c0: 7673 2072 652d 7365 6172 6368 2d66 6f72 vs re-search-for │ │ │ +000021d0: 7761 7264 2022 5e28 2220 6e69 6c20 7420 ward "^(" nil t │ │ │ +000021e0: 7265 6164 2031 2022 2009 5c6e 0c22 2064 read 1 " .\n." d │ │ │ +000021f0: 6566 696e 652d 6162 6272 6576 2d74 6162 efine-abbrev-tab │ │ │ +00002200: 6c65 2074 6162 6c65 2061 7267 5d20 3520 le table arg] 5 │ │ │ +00002210: 2823 2420 2e20 3831 3931 2920 2250 225d (#$ . 8191) "P"] │ │ │ +00002220: 290a 2340 3234 3220 5265 6164 2061 6262 ).#@242 Read abb │ │ │ +00002230: 7265 7620 6465 6669 6e69 7469 6f6e 7320 rev definitions │ │ │ +00002240: 6672 6f6d 2066 696c 6520 7772 6974 7465 from file writte │ │ │ +00002250: 6e20 7769 7468 2060 7772 6974 652d 6162 n with `write-ab │ │ │ +00002260: 6272 6576 2d66 696c 6527 2e0a 4f70 7469 brev-file'..Opti │ │ │ +00002270: 6f6e 616c 2061 7267 756d 656e 7420 4649 onal argument FI │ │ │ +00002280: 4c45 2069 7320 7468 6520 6e61 6d65 206f LE is the name o │ │ │ +00002290: 6620 7468 6520 6669 6c65 2074 6f20 7265 f the file to re │ │ │ +000022a0: 6164 3b0a 6974 2064 6566 6175 6c74 7320 ad;.it defaults │ │ │ +000022b0: 746f 2074 6865 2076 616c 7565 206f 6620 to the value of │ │ │ +000022c0: 6061 6262 7265 762d 6669 6c65 2d6e 616d `abbrev-file-nam │ │ │ +000022d0: 6527 2e0a 4f70 7469 6f6e 616c 2073 6563 e'..Optional sec │ │ │ +000022e0: 6f6e 6420 6172 6775 6d65 6e74 2051 5549 ond argument QUI │ │ │ +000022f0: 4554 4c59 206e 6f6e 2d6e 696c 206d 6561 ETLY non-nil mea │ │ │ +00002300: 6e73 2064 6f6e 2774 2070 7269 6e74 2061 ns don't print a │ │ │ +00002310: 6e79 7468 696e 672e 1f0a 2864 6566 616c nything...(defal │ │ │ +00002320: 6961 7320 2772 6561 642d 6162 6272 6576 ias 'read-abbrev │ │ │ +00002330: 2d66 696c 6520 235b 2826 6f70 7469 6f6e -file #[(&option │ │ │ +00002340: 616c 2066 696c 6520 7175 6965 746c 7929 al file quietly) │ │ │ +00002350: 2022 c50c ab89 0c47 c656 ab83 0caa 810b ".....G.V...... │ │ │ +00002360: c75c 6e23 88c8 11c7 8910 8722 205b 6162 .\n#......." [ab │ │ │ +00002370: 6272 6576 732d 6368 616e 6765 6420 7361 brevs-changed sa │ │ │ +00002380: 7665 2d61 6262 7265 7673 2071 7569 6574 ve-abbrevs quiet │ │ │ +00002390: 6c79 2061 6262 7265 762d 6669 6c65 2d6e ly abbrev-file-n │ │ │ +000023a0: 616d 6520 6669 6c65 206c 6f61 6420 3020 ame file load 0 │ │ │ +000023b0: 6e69 6c20 745d 2034 2028 2324 202e 2038 nil t] 4 (#$ . 8 │ │ │ +000023c0: 3734 3429 2022 6652 6561 6420 6162 6272 744) "fRead abbr │ │ │ +000023d0: 6576 2066 696c 653a 2022 5d29 0a23 4031 ev file: "]).#@1 │ │ │ +000023e0: 3938 2052 6561 6420 6162 6272 6576 2064 98 Read abbrev d │ │ │ +000023f0: 6566 696e 6974 696f 6e73 2066 726f 6d20 efinitions from │ │ │ +00002400: 6669 6c65 2077 7269 7474 656e 2077 6974 file written wit │ │ │ +00002410: 6820 6077 7269 7465 2d61 6262 7265 762d h `write-abbrev- │ │ │ +00002420: 6669 6c65 272e 0a4f 7074 696f 6e61 6c20 file'..Optional │ │ │ +00002430: 6172 6775 6d65 6e74 2046 494c 4520 6973 argument FILE is │ │ │ +00002440: 2074 6865 206e 616d 6520 6f66 2074 6865 the name of the │ │ │ +00002450: 2066 696c 6520 746f 2072 6561 643b 0a69 file to read;.i │ │ │ +00002460: 7420 6465 6661 756c 7473 2074 6f20 7468 t defaults to th │ │ │ +00002470: 6520 7661 6c75 6520 6f66 2060 6162 6272 e value of `abbr │ │ │ +00002480: 6576 2d66 696c 652d 6e61 6d65 272e 0a44 ev-file-name'..D │ │ │ +00002490: 6f65 7320 6e6f 7420 7072 696e 7420 616e oes not print an │ │ │ +000024a0: 7974 6869 6e67 2e1f 0a28 6465 6661 6c69 ything...(defali │ │ │ +000024b0: 6173 2027 7175 6965 746c 792d 7265 6164 as 'quietly-read │ │ │ +000024c0: 2d61 6262 7265 762d 6669 6c65 2023 5b28 -abbrev-file #[( │ │ │ +000024d0: 266f 7074 696f 6e61 6c20 6669 6c65 2920 &optional file) │ │ │ +000024e0: 22c1 08c2 5c22 8722 205b 6669 6c65 2072 "...\"." [file r │ │ │ +000024f0: 6561 642d 6162 6272 6576 2d66 696c 6520 ead-abbrev-file │ │ │ +00002500: 745d 2033 2028 2324 202e 2039 3138 3729 t] 3 (#$ . 9187) │ │ │ +00002510: 5d29 0a23 4031 3737 2057 7269 7465 2061 ]).#@177 Write a │ │ │ +00002520: 6c6c 2061 6262 7265 7620 6465 6669 6e69 ll abbrev defini │ │ │ +00002530: 7469 6f6e 7320 746f 2061 2066 696c 6520 tions to a file │ │ │ +00002540: 6f66 204c 6973 7020 636f 6465 2e0a 5468 of Lisp code..Th │ │ │ +00002550: 6520 6669 6c65 2077 7269 7474 656e 2063 e file written c │ │ │ +00002560: 616e 2062 6520 6c6f 6164 6564 2069 6e20 an be loaded in │ │ │ +00002570: 616e 6f74 6865 7220 7365 7373 696f 6e20 another session │ │ │ +00002580: 746f 2064 6566 696e 6520 7468 6520 7361 to define the sa │ │ │ +00002590: 6d65 2061 6262 7265 7673 2e0a 5468 6520 me abbrevs..The │ │ │ +000025a0: 6172 6775 6d65 6e74 2046 494c 4520 6973 argument FILE is │ │ │ +000025b0: 2074 6865 2066 696c 6520 6e61 6d65 2074 the file name t │ │ │ +000025c0: 6f20 7772 6974 652e 1f0a 2864 6566 616c o write...(defal │ │ │ +000025d0: 6961 7320 2777 7269 7465 2d61 6262 7265 ias 'write-abbre │ │ │ +000025e0: 762d 6669 6c65 2023 5b28 6669 6c65 2920 v-file #[(file) │ │ │ +000025f0: 220b ab86 0b47 c456 ac82 0913 8ac5 c621 "....G.V.......! │ │ │ +00002600: 7188 c720 8808 891a ab8c c85c 6e40 c95c q.. .......\n@.\ │ │ │ +00002610: 2288 5c6e 4189 12ac 7429 cacb 640b 2388 ".\nA...t)..d.#. │ │ │ +00002620: c720 2987 2220 5b61 6262 7265 762d 7461 . )." [abbrev-ta │ │ │ +00002630: 626c 652d 6e61 6d65 2d6c 6973 7420 6162 ble-name-list ab │ │ │ +00002640: 6272 6576 2d66 696c 652d 6e61 6d65 2074 brev-file-name t │ │ │ +00002650: 6162 6c65 7320 6669 6c65 2030 2067 6574 ables file 0 get │ │ │ +00002660: 2d62 7566 6665 722d 6372 6561 7465 2022 -buffer-create " │ │ │ +00002670: 2077 7269 7465 2d61 6262 7265 762d 6669 write-abbrev-fi │ │ │ +00002680: 6c65 2220 6572 6173 652d 6275 6666 6572 le" erase-buffer │ │ │ +00002690: 2069 6e73 6572 742d 6162 6272 6576 2d74 insert-abbrev-t │ │ │ +000026a0: 6162 6c65 2d64 6573 6372 6970 7469 6f6e able-description │ │ │ +000026b0: 206e 696c 2077 7269 7465 2d72 6567 696f nil write-regio │ │ │ +000026c0: 6e20 315d 2035 2028 2324 202e 2039 3439 n 1] 5 (#$ . 949 │ │ │ +000026d0: 3729 2028 6c69 7374 2028 7265 6164 2d66 7) (list (read-f │ │ │ +000026e0: 696c 652d 6e61 6d65 2022 5772 6974 6520 ile-name "Write │ │ │ +000026f0: 6162 6272 6576 2066 696c 653a 2022 2028 abbrev file: " ( │ │ │ +00002700: 6669 6c65 2d6e 616d 652d 6469 7265 6374 file-name-direct │ │ │ +00002710: 6f72 7920 2865 7870 616e 642d 6669 6c65 ory (expand-file │ │ │ +00002720: 2d6e 616d 6520 6162 6272 6576 2d66 696c -name abbrev-fil │ │ │ +00002730: 652d 6e61 6d65 2929 2061 6262 7265 762d e-name)) abbrev- │ │ │ +00002740: 6669 6c65 2d6e 616d 6529 295d 290a 2340 file-name))]).#@ │ │ │ +00002750: 3132 3120 5265 7475 726e 2074 6865 2073 121 Return the s │ │ │ +00002760: 7472 696e 6720 666f 7220 7768 6963 6820 tring for which │ │ │ +00002770: 616e 2061 6262 7265 7620 7769 6c6c 2062 an abbrev will b │ │ │ +00002780: 6520 6465 6669 6e65 642e 0a41 5247 2069 e defined..ARG i │ │ │ +00002790: 7320 7468 6520 6172 6775 6d65 6e74 2074 s the argument t │ │ │ +000027a0: 6f20 6061 6464 2d67 6c6f 6261 6c2d 6162 o `add-global-ab │ │ │ +000027b0: 6272 6576 2720 6f72 2060 6164 642d 6d6f brev' or `add-mo │ │ │ +000027c0: 6465 2d61 6262 7265 7627 2e1f 0a28 6465 de-abbrev'...(de │ │ │ +000027d0: 6661 6c69 6173 2027 6162 6272 6576 2d73 falias 'abbrev-s │ │ │ +000027e0: 7472 696e 672d 746f 2d62 652d 6465 6669 tring-to-be-defi │ │ │ +000027f0: 6e65 6420 235b 2861 7267 2920 2208 ac88 ned #[(arg) "... │ │ │ +00002800: c120 ab84 c210 aa84 c308 2110 08c2 59ad . ........!...Y. │ │ │ +00002810: 9560 08c2 55ab 84c4 20aa 8a8a 08ae 81c5 .`..U... ....... │ │ │ +00002820: 5b76 8860 297b 8722 205b 6172 6720 7265 [v.`){." [arg re │ │ │ +00002830: 6769 6f6e 2d61 6374 6976 652d 7020 3020 gion-active-p 0 │ │ │ +00002840: 7072 6566 6978 2d6e 756d 6572 6963 2d76 prefix-numeric-v │ │ │ +00002850: 616c 7565 206d 6172 6b20 315d 2033 2028 alue mark 1] 3 ( │ │ │ +00002860: 2324 202e 2031 3030 3638 295d 290a 2340 #$ . 10068)]).#@ │ │ │ +00002870: 3333 3820 4465 6669 6e65 206d 6f64 652d 338 Define mode- │ │ │ +00002880: 7370 6563 6966 6963 2061 6262 7265 7620 specific abbrev │ │ │ +00002890: 666f 7220 6c61 7374 2077 6f72 6428 7329 for last word(s) │ │ │ +000028a0: 2062 6566 6f72 6520 706f 696e 742e 0a41 before point..A │ │ │ +000028b0: 7267 756d 656e 7420 6973 2068 6f77 206d rgument is how m │ │ │ +000028c0: 616e 7920 776f 7264 7320 6265 666f 7265 any words before │ │ │ +000028d0: 2070 6f69 6e74 2066 6f72 6d20 7468 6520 point form the │ │ │ +000028e0: 6578 7061 6e73 696f 6e3b 0a6f 7220 7a65 expansion;.or ze │ │ │ +000028f0: 726f 206d 6561 6e73 2074 6865 2072 6567 ro means the reg │ │ │ +00002900: 696f 6e20 6973 2074 6865 2065 7870 616e ion is the expan │ │ │ +00002910: 7369 6f6e 2e0a 4120 6e65 6761 7469 7665 sion..A negative │ │ │ +00002920: 2061 7267 756d 656e 7420 6d65 616e 7320 argument means │ │ │ +00002930: 746f 2075 6e64 6566 696e 6520 7468 6520 to undefine the │ │ │ +00002940: 7370 6563 6966 6965 6420 6162 6272 6576 specified abbrev │ │ │ +00002950: 2e0a 5265 6164 7320 7468 6520 6162 6272 ..Reads the abbr │ │ │ +00002960: 6576 6961 7469 6f6e 2069 6e20 7468 6520 eviation in the │ │ │ +00002970: 6d69 6e69 6275 6666 6572 2e0a 0a44 6f6e minibuffer...Don │ │ │ +00002980: 2774 2075 7365 2074 6869 7320 6675 6e63 't use this func │ │ │ +00002990: 7469 6f6e 2069 6e20 6120 4c69 7370 2070 tion in a Lisp p │ │ │ +000029a0: 726f 6772 616d 3b20 7573 6520 6064 6566 rogram; use `def │ │ │ +000029b0: 696e 652d 6162 6272 6576 2720 696e 7374 ine-abbrev' inst │ │ │ +000029c0: 6561 642e 1f0a 2864 6566 616c 6961 7320 ead...(defalias │ │ │ +000029d0: 2761 6464 2d6d 6f64 652d 6162 6272 6576 'add-mode-abbrev │ │ │ +000029e0: 2023 5b28 6172 6729 2022 c40b ab83 5c6e #[(arg) "....\n │ │ │ +000029f0: aa86 09ae 83c5 c621 c708 2387 2220 5b61 .......!..#." [a │ │ │ +00002a00: 7267 206c 6f63 616c 2d61 6262 7265 762d rg local-abbrev- │ │ │ +00002a10: 7461 626c 6520 676c 6f62 616c 2d61 6262 table global-abb │ │ │ +00002a20: 7265 762d 7461 626c 6520 6f6e 6c79 2d67 rev-table only-g │ │ │ +00002a30: 6c6f 6261 6c2d 6162 6272 6576 7320 6164 lobal-abbrevs ad │ │ │ +00002a40: 642d 6162 6272 6576 2065 7272 6f72 2022 d-abbrev error " │ │ │ +00002a50: 4e6f 2070 6572 2d6d 6f64 6520 6162 6272 No per-mode abbr │ │ │ +00002a60: 6576 2074 6162 6c65 2220 224d 6f64 6522 ev table" "Mode" │ │ │ +00002a70: 5d20 3420 2823 2420 2e20 3130 3335 3629 ] 4 (#$ . 10356) │ │ │ +00002a80: 2022 5022 5d29 0a23 4033 3838 2044 6566 "P"]).#@388 Def │ │ │ +00002a90: 696e 6520 676c 6f62 616c 2028 616c 6c20 ine global (all │ │ │ +00002aa0: 6d6f 6465 7329 2061 6262 7265 7620 666f modes) abbrev fo │ │ │ +00002ab0: 7220 6c61 7374 2077 6f72 6428 7329 2062 r last word(s) b │ │ │ +00002ac0: 6566 6f72 6520 706f 696e 742e 0a54 6865 efore point..The │ │ │ +00002ad0: 2070 7265 6669 7820 6172 6775 6d65 6e74 prefix argument │ │ │ +00002ae0: 2073 7065 6369 6669 6573 2074 6865 206e specifies the n │ │ │ +00002af0: 756d 6265 7220 6f66 2077 6f72 6473 2062 umber of words b │ │ │ +00002b00: 6566 6f72 6520 706f 696e 7420 7468 6174 efore point that │ │ │ +00002b10: 2066 6f72 6d20 7468 650a 6578 7061 6e73 form the.expans │ │ │ +00002b20: 696f 6e3b 206f 7220 7a65 726f 206d 6561 ion; or zero mea │ │ │ +00002b30: 6e73 2074 6865 2072 6567 696f 6e20 6973 ns the region is │ │ │ +00002b40: 2074 6865 2065 7870 616e 7369 6f6e 2e0a the expansion.. │ │ │ +00002b50: 4120 6e65 6761 7469 7665 2061 7267 756d A negative argum │ │ │ +00002b60: 656e 7420 6d65 616e 7320 746f 2075 6e64 ent means to und │ │ │ +00002b70: 6566 696e 6520 7468 6520 7370 6563 6966 efine the specif │ │ │ +00002b80: 6965 6420 6162 6272 6576 2e0a 5468 6973 ied abbrev..This │ │ │ +00002b90: 2063 6f6d 6d61 6e64 2075 7365 7320 7468 command uses th │ │ │ +00002ba0: 6520 6d69 6e69 6275 6666 6572 2074 6f20 e minibuffer to │ │ │ +00002bb0: 7265 6164 2074 6865 2061 6262 7265 7669 read the abbrevi │ │ │ +00002bc0: 6174 696f 6e2e 0a0a 446f 6e27 7420 7573 ation...Don't us │ │ │ +00002bd0: 6520 7468 6973 2066 756e 6374 696f 6e20 e this function │ │ │ +00002be0: 696e 2061 204c 6973 7020 7072 6f67 7261 in a Lisp progra │ │ │ +00002bf0: 6d3b 2075 7365 2060 6465 6669 6e65 2d61 m; use `define-a │ │ │ +00002c00: 6262 7265 7627 2069 6e73 7465 6164 2e1f bbrev' instead.. │ │ │ +00002c10: 0a28 6465 6661 6c69 6173 2027 6164 642d .(defalias 'add- │ │ │ +00002c20: 676c 6f62 616c 2d61 6262 7265 7620 235b global-abbrev #[ │ │ │ +00002c30: 2861 7267 2920 22c2 09c3 0823 8722 205b (arg) "....#." [ │ │ │ +00002c40: 6172 6720 676c 6f62 616c 2d61 6262 7265 arg global-abbre │ │ │ +00002c50: 762d 7461 626c 6520 6164 642d 6162 6272 v-table add-abbr │ │ │ +00002c60: 6576 2022 476c 6f62 616c 225d 2034 2028 ev "Global"] 4 ( │ │ │ +00002c70: 2324 202e 2031 3038 3933 2920 2250 225d #$ . 10893) "P"] │ │ │ +00002c80: 290a 2340 3337 3120 4164 6420 616e 2061 ).#@371 Add an a │ │ │ +00002c90: 6262 7265 7669 6174 696f 6e20 746f 2061 bbreviation to a │ │ │ +00002ca0: 6262 7265 7620 7461 626c 6520 5441 424c bbrev table TABL │ │ │ +00002cb0: 452e 0a54 5950 4520 6973 2061 2073 7472 E..TYPE is a str │ │ │ +00002cc0: 696e 6720 6465 7363 7269 6269 6e67 2069 ing describing i │ │ │ +00002cd0: 6e20 456e 676c 6973 6820 7468 6520 6b69 n English the ki │ │ │ +00002ce0: 6e64 206f 6620 6162 6272 6576 2074 6869 nd of abbrev thi │ │ │ +00002cf0: 7320 7769 6c6c 2062 650a 2874 7970 6963 s will be.(typic │ │ │ +00002d00: 616c 6c79 2c20 2267 6c6f 6261 6c22 206f ally, "global" o │ │ │ +00002d10: 7220 226d 6f64 652d 7370 6563 6966 6963 r "mode-specific │ │ │ +00002d20: 2229 3b20 7468 6973 2069 7320 7573 6564 "); this is used │ │ │ +00002d30: 2069 6e0a 7072 6f6d 7074 696e 6720 7468 in.prompting th │ │ │ +00002d40: 6520 7573 6572 2e20 2041 5247 2069 7320 e user. ARG is │ │ │ +00002d50: 7468 6520 6e75 6d62 6572 206f 6620 776f the number of wo │ │ │ +00002d60: 7264 7320 696e 2074 6865 2065 7870 616e rds in the expan │ │ │ +00002d70: 7369 6f6e 2e0a 0a52 6574 7572 6e20 7468 sion...Return th │ │ │ +00002d80: 6520 7379 6d62 6f6c 2074 6861 7420 696e e symbol that in │ │ │ +00002d90: 7465 726e 616c 6c79 2072 6570 7265 7365 ternally represe │ │ │ +00002da0: 6e74 7320 7468 6520 6e65 7720 6162 6272 nts the new abbr │ │ │ +00002db0: 6576 2c20 6f72 206e 696c 2069 660a 7468 ev, or nil if.th │ │ │ +00002dc0: 6520 7573 6572 2064 6563 6c69 6e65 7320 e user declines │ │ │ +00002dd0: 746f 2063 6f6e 6669 726d 2072 6564 6566 to confirm redef │ │ │ +00002de0: 696e 696e 6720 616e 2065 7869 7374 696e ining an existin │ │ │ +00002df0: 6720 6162 6272 6576 2e1f 0a28 6465 6661 g abbrev...(defa │ │ │ +00002e00: 6c69 6173 2027 6164 642d 6162 6272 6576 lias 'add-abbrev │ │ │ +00002e10: 2023 5b28 7461 626c 6520 7479 7065 2061 #[(table type a │ │ │ +00002e20: 7267 2920 22c5 0921 c61c 1bc7 c80b ab83 rg) "..!........ │ │ │ +00002e30: c9aa 81ca 080b 2321 14cb cc0c 47c6 0c24 ......#!....G..$ │ │ │ +00002e40: 880b ab92 cd0c 5c6e 5c22 ab8c cec8 cf0c ......\n\"...... │ │ │ +00002e50: cd0c 5c6e 5c22 2321 ad86 d05c 6e0c 970b ..\n\"#!...\n... │ │ │ +00002e60: 232a 8722 205b 7479 7065 2061 7267 2074 #*." [type arg t │ │ │ +00002e70: 6162 6c65 2065 7870 206e 616d 6520 6162 able exp name ab │ │ │ +00002e80: 6272 6576 2d73 7472 696e 672d 746f 2d62 brev-string-to-b │ │ │ +00002e90: 652d 6465 6669 6e65 6420 6e69 6c20 7265 e-defined nil re │ │ │ +00002ea0: 6164 2d73 7472 696e 6720 666f 726d 6174 ad-string format │ │ │ +00002eb0: 2022 2573 2061 6262 7265 7620 666f 7220 "%s abbrev for │ │ │ +00002ec0: 5c22 2573 5c22 3a20 2220 2255 6e64 6566 \"%s\": " "Undef │ │ │ +00002ed0: 696e 6520 2573 2061 6262 7265 763a 2022 ine %s abbrev: " │ │ │ +00002ee0: 2073 6574 2d74 6578 742d 7072 6f70 6572 set-text-proper │ │ │ +00002ef0: 7469 6573 2030 2061 6262 7265 762d 6578 ties 0 abbrev-ex │ │ │ +00002f00: 7061 6e73 696f 6e20 792d 6f72 2d6e 2d70 pansion y-or-n-p │ │ │ +00002f10: 2022 2573 2065 7870 616e 6473 2074 6f20 "%s expands to │ │ │ +00002f20: 5c22 2573 5c22 3b20 7265 6465 6669 6e65 \"%s\"; redefine │ │ │ +00002f30: 3f20 2220 6465 6669 6e65 2d61 6262 7265 ? " define-abbre │ │ │ +00002f40: 765d 2037 2028 2324 202e 2031 3134 3030 v] 7 (#$ . 11400 │ │ │ +00002f50: 295d 290a 2340 3134 3520 5265 7475 726e )]).#@145 Return │ │ │ +00002f60: 2074 6865 2073 7472 696e 6720 666f 7220 the string for │ │ │ +00002f70: 7768 6963 6820 616e 2069 6e76 6572 7365 which an inverse │ │ │ +00002f80: 2061 6262 7265 7620 7769 6c6c 2062 6520 abbrev will be │ │ │ +00002f90: 6465 6669 6e65 642e 0a41 5247 2069 7320 defined..ARG is │ │ │ +00002fa0: 7468 6520 6172 6775 6d65 6e74 2074 6f20 the argument to │ │ │ +00002fb0: 6069 6e76 6572 7365 2d61 6464 2d67 6c6f `inverse-add-glo │ │ │ +00002fc0: 6261 6c2d 6162 6272 6576 2720 6f72 0a60 bal-abbrev' or.` │ │ │ +00002fd0: 696e 7665 7273 652d 6164 642d 6d6f 6465 inverse-add-mode │ │ │ +00002fe0: 2d61 6262 7265 7627 2e1f 0a28 6465 6661 -abbrev'...(defa │ │ │ +00002ff0: 6c69 6173 2027 696e 7665 7273 652d 6162 lias 'inverse-ab │ │ │ +00003000: 6272 6576 2d73 7472 696e 672d 746f 2d62 brev-string-to-b │ │ │ +00003010: 652d 6465 6669 6e65 6420 235b 2861 7267 e-defined #[(arg │ │ │ +00003020: 2920 228a 08ae 81c1 5b76 8860 c176 8860 ) ".....[v.`.v.` │ │ │ +00003030: 7b29 8722 205b 6172 6720 315d 2032 2028 {)." [arg 1] 2 ( │ │ │ +00003040: 2324 202e 2031 3231 3232 295d 290a 2340 #$ . 12122)]).#@ │ │ │ +00003050: 3231 3720 4465 6669 6e65 206c 6173 7420 217 Define last │ │ │ +00003060: 776f 7264 2062 6566 6f72 6520 706f 696e word before poin │ │ │ +00003070: 7420 6173 2061 206d 6f64 652d 7370 6563 t as a mode-spec │ │ │ +00003080: 6966 6963 2061 6262 7265 762e 0a57 6974 ific abbrev..Wit │ │ │ +00003090: 6820 7072 6566 6978 2061 7267 756d 656e h prefix argumen │ │ │ +000030a0: 7420 4e2c 2064 6566 696e 6573 2074 6865 t N, defines the │ │ │ +000030b0: 204e 7468 2077 6f72 6420 6265 666f 7265 Nth word before │ │ │ +000030c0: 2070 6f69 6e74 2e0a 5468 6973 2063 6f6d point..This com │ │ │ +000030d0: 6d61 6e64 2075 7365 7320 7468 6520 6d69 mand uses the mi │ │ │ +000030e0: 6e69 6275 6666 6572 2074 6f20 7265 6164 nibuffer to read │ │ │ +000030f0: 2074 6865 2065 7870 616e 7369 6f6e 2e0a the expansion.. │ │ │ +00003100: 4578 7061 6e64 7320 7468 6520 6162 6272 Expands the abbr │ │ │ +00003110: 6576 6961 7469 6f6e 2061 6674 6572 2064 eviation after d │ │ │ +00003120: 6566 696e 696e 6720 6974 2e1f 0a28 6465 efining it...(de │ │ │ +00003130: 6661 6c69 6173 2027 696e 7665 7273 652d falias 'inverse- │ │ │ +00003140: 6164 642d 6d6f 6465 2d61 6262 7265 7620 add-mode-abbrev │ │ │ +00003150: 235b 2861 7267 2920 22c4 0bab 835c 6eaa #[(arg) "....\n. │ │ │ +00003160: 8609 ae83 c5c6 21c7 0823 8722 205b 6172 ......!..#." [ar │ │ │ +00003170: 6720 6c6f 6361 6c2d 6162 6272 6576 2d74 g local-abbrev-t │ │ │ +00003180: 6162 6c65 2067 6c6f 6261 6c2d 6162 6272 able global-abbr │ │ │ +00003190: 6576 2d74 6162 6c65 206f 6e6c 792d 676c ev-table only-gl │ │ │ +000031a0: 6f62 616c 2d61 6262 7265 7673 2069 6e76 obal-abbrevs inv │ │ │ +000031b0: 6572 7365 2d61 6464 2d61 6262 7265 7620 erse-add-abbrev │ │ │ +000031c0: 6572 726f 7220 224e 6f20 7065 722d 6d6f error "No per-mo │ │ │ +000031d0: 6465 2061 6262 7265 7620 7461 626c 6522 de abbrev table" │ │ │ +000031e0: 2022 4d6f 6465 225d 2034 2028 2324 202e "Mode"] 4 (#$ . │ │ │ +000031f0: 2031 3233 3732 2920 2270 225d 290a 2340 12372) "p"]).#@ │ │ │ +00003200: 3232 3920 4465 6669 6e65 206c 6173 7420 229 Define last │ │ │ +00003210: 776f 7264 2062 6566 6f72 6520 706f 696e word before poin │ │ │ +00003220: 7420 6173 2061 2067 6c6f 6261 6c20 286d t as a global (m │ │ │ +00003230: 6f64 652d 696e 6465 7065 6e64 656e 7429 ode-independent) │ │ │ +00003240: 2061 6262 7265 762e 0a57 6974 6820 7072 abbrev..With pr │ │ │ +00003250: 6566 6978 2061 7267 756d 656e 7420 4e2c efix argument N, │ │ │ +00003260: 2064 6566 696e 6573 2074 6865 204e 7468 defines the Nth │ │ │ +00003270: 2077 6f72 6420 6265 666f 7265 2070 6f69 word before poi │ │ │ +00003280: 6e74 2e0a 5468 6973 2063 6f6d 6d61 6e64 nt..This command │ │ │ +00003290: 2075 7365 7320 7468 6520 6d69 6e69 6275 uses the minibu │ │ │ +000032a0: 6666 6572 2074 6f20 7265 6164 2074 6865 ffer to read the │ │ │ +000032b0: 2065 7870 616e 7369 6f6e 2e0a 4578 7061 expansion..Expa │ │ │ +000032c0: 6e64 7320 7468 6520 6162 6272 6576 6961 nds the abbrevia │ │ │ +000032d0: 7469 6f6e 2061 6674 6572 2064 6566 696e tion after defin │ │ │ +000032e0: 696e 6720 6974 2e1f 0a28 6465 6661 6c69 ing it...(defali │ │ │ +000032f0: 6173 2027 696e 7665 7273 652d 6164 642d as 'inverse-add- │ │ │ +00003300: 676c 6f62 616c 2d61 6262 7265 7620 235b global-abbrev #[ │ │ │ +00003310: 2861 7267 2920 22c2 09c3 0823 8722 205b (arg) "....#." [ │ │ │ +00003320: 6172 6720 676c 6f62 616c 2d61 6262 7265 arg global-abbre │ │ │ +00003330: 762d 7461 626c 6520 696e 7665 7273 652d v-table inverse- │ │ │ +00003340: 6164 642d 6162 6272 6576 2022 476c 6f62 add-abbrev "Glob │ │ │ +00003350: 616c 225d 2034 2028 2324 202e 2031 3238 al"] 4 (#$ . 128 │ │ │ +00003360: 3034 2920 2270 225d 290a 2864 6566 616c 04) "p"]).(defal │ │ │ +00003370: 6961 7320 2769 6e76 6572 7365 2d61 6464 ias 'inverse-add │ │ │ +00003380: 2d61 6262 7265 7620 235b 2874 6162 6c65 -abbrev #[(table │ │ │ +00003390: 2074 7970 6520 6172 6729 2022 c689 891c type arg) ".... │ │ │ +000033a0: 1b1d 8a09 ae81 c75b 7688 60c7 7688 6089 .......[v.`.v.`. │ │ │ +000033b0: 137b 1529 c8c9 0d47 c60d 2488 cacb cc08 .{.)...G..$..... │ │ │ +000033c0: 0d23 2114 cd0d 5c6e 5c22 ab8c cecb cf0d .#!...\n\"...... │ │ │ +000033d0: cd0d 5c6e 5c22 2321 ad8e d05c 6e0d 970c ..\n\"#!...\n... │ │ │ +000033e0: 2388 8a0b 6288 d120 292b 8722 205b 7479 #...b.. )+." [ty │ │ │ +000033f0: 7065 2061 7267 2074 6162 6c65 206e 616d pe arg table nam │ │ │ +00003400: 656c 6f63 2065 7870 206e 616d 6520 6e69 eloc exp name ni │ │ │ +00003410: 6c20 3120 7365 742d 7465 7874 2d70 726f l 1 set-text-pro │ │ │ +00003420: 7065 7274 6965 7320 3020 7265 6164 2d73 perties 0 read-s │ │ │ +00003430: 7472 696e 6720 666f 726d 6174 2022 2573 tring format "%s │ │ │ +00003440: 2065 7870 616e 7369 6f6e 2066 6f72 205c expansion for \ │ │ │ +00003450: 2225 735c 223a 2022 2061 6262 7265 762d "%s\": " abbrev- │ │ │ +00003460: 6578 7061 6e73 696f 6e20 792d 6f72 2d6e expansion y-or-n │ │ │ +00003470: 2d70 2022 2573 2065 7870 616e 6473 2074 -p "%s expands t │ │ │ +00003480: 6f20 5c22 2573 5c22 3b20 7265 6465 6669 o \"%s\"; redefi │ │ │ +00003490: 6e65 3f20 2220 6465 6669 6e65 2d61 6262 ne? " define-abb │ │ │ +000034a0: 7265 7620 6578 7061 6e64 2d61 6262 7265 rev expand-abbre │ │ │ +000034b0: 765d 2037 5d29 0a23 4032 3330 204d 6172 v] 7]).#@230 Mar │ │ │ +000034c0: 6b20 6375 7272 656e 7420 706f 696e 7420 k current point │ │ │ +000034d0: 6173 2074 6865 2062 6567 696e 6e69 6e67 as the beginning │ │ │ +000034e0: 206f 6620 616e 2061 6262 7265 762e 0a41 of an abbrev..A │ │ │ +000034f0: 6262 7265 7620 746f 2062 6520 6578 7061 bbrev to be expa │ │ │ +00003500: 6e64 6564 2073 7461 7274 7320 6865 7265 nded starts here │ │ │ +00003510: 2072 6174 6865 7220 7468 616e 2061 7420 rather than at │ │ │ +00003520: 6265 6769 6e6e 696e 6720 6f66 2077 6f72 beginning of wor │ │ │ +00003530: 642e 0a54 6869 7320 7761 792c 2079 6f75 d..This way, you │ │ │ +00003540: 2063 616e 2065 7870 616e 6420 616e 2061 can expand an a │ │ │ +00003550: 6262 7265 7620 7769 7468 2061 2070 7265 bbrev with a pre │ │ │ +00003560: 6669 783a 2069 6e73 6572 7420 7468 6520 fix: insert the │ │ │ +00003570: 7072 6566 6978 2c0a 7573 6520 7468 6973 prefix,.use this │ │ │ +00003580: 2063 6f6d 6d61 6e64 2c20 7468 656e 2069 command, then i │ │ │ +00003590: 6e73 6572 7420 7468 6520 6162 6272 6576 nsert the abbrev │ │ │ +000035a0: 2e1f 0a28 6465 6661 6c69 6173 2027 6162 ...(defalias 'ab │ │ │ +000035b0: 6272 6576 2d70 7265 6669 782d 6d61 726b brev-prefix-mark │ │ │ +000035c0: 2023 5b28 266f 7074 696f 6e61 6c20 6172 #[(&optional ar │ │ │ +000035d0: 6729 2022 5c6e ac83 c420 88c5 2011 7010 g) "\n... .. .p. │ │ │ +000035e0: c660 605c 221b c70b c8c9 215c 2229 8722 .``\".....!\")." │ │ │ +000035f0: 205b 6162 6272 6576 2d73 7461 7274 2d6c [abbrev-start-l │ │ │ +00003600: 6f63 6174 696f 6e2d 6275 6666 6572 2061 ocation-buffer a │ │ │ +00003610: 6262 7265 762d 7374 6172 742d 6c6f 6361 bbrev-start-loca │ │ │ +00003620: 7469 6f6e 2061 7267 2065 2065 7870 616e tion arg e expan │ │ │ +00003630: 642d 6162 6272 6576 2070 6f69 6e74 2d6d d-abbrev point-m │ │ │ +00003640: 6172 6b65 7220 6d61 6b65 2d65 7874 656e arker make-exten │ │ │ +00003650: 7420 7365 742d 6578 7465 6e74 2d62 6567 t set-extent-beg │ │ │ +00003660: 696e 2d67 6c79 7068 206d 616b 652d 676c in-glyph make-gl │ │ │ +00003670: 7970 6820 5b73 7472 696e 6720 3a64 6174 yph [string :dat │ │ │ +00003680: 6120 222d 225d 5d20 3420 2823 2420 2e20 a "-"]] 4 (#$ . │ │ │ +00003690: 3133 3530 3129 2022 5022 5d29 0a23 4032 13501) "P"]).#@2 │ │ │ +000036a0: 3433 2046 6f72 2061 6262 7265 7620 6f63 43 For abbrev oc │ │ │ +000036b0: 6375 7272 656e 6365 2069 6e20 7468 6520 currence in the │ │ │ +000036c0: 7265 6769 6f6e 2c20 6f66 6665 7220 746f region, offer to │ │ │ +000036d0: 2065 7870 616e 6420 6974 2e0a 5468 6520 expand it..The │ │ │ +000036e0: 7573 6572 2069 7320 6173 6b65 6420 746f user is asked to │ │ │ +000036f0: 2074 7970 6520 7920 6f72 206e 2066 6f72 type y or n for │ │ │ +00003700: 2065 6163 6820 6f63 6375 7272 656e 6365 each occurrence │ │ │ +00003710: 2e0a 4120 7072 6566 6978 2061 7267 756d ..A prefix argum │ │ │ +00003720: 656e 7420 6d65 616e 7320 646f 6e27 7420 ent means don't │ │ │ +00003730: 7175 6572 793b 2065 7870 616e 6420 616c query; expand al │ │ │ +00003740: 6c20 6162 6272 6576 732e 0a49 6620 6361 l abbrevs..If ca │ │ │ +00003750: 6c6c 6564 2066 726f 6d20 6120 4c69 7370 lled from a Lisp │ │ │ +00003760: 2070 726f 6772 616d 2c20 6172 6775 6d65 program, argume │ │ │ +00003770: 6e74 7320 6172 6520 5354 4152 5420 454e nts are START EN │ │ │ +00003780: 4420 266f 7074 696f 6e61 6c20 4e4f 5155 D &optional NOQU │ │ │ +00003790: 4552 592e 1f0a 2864 6566 616c 6961 7320 ERY...(defalias │ │ │ +000037a0: 2765 7870 616e 642d 7265 6769 6f6e 2d61 'expand-region-a │ │ │ +000037b0: 6262 7265 7673 2023 5b28 7374 6172 7420 bbrevs #[(start │ │ │ +000037c0: 656e 6420 266f 7074 696f 6e61 6c20 6e6f end &optional no │ │ │ +000037d0: 7175 6572 7929 2022 8a5c 6e62 8864 095a query) ".\nb.d.Z │ │ │ +000037e0: c689 1d1c 1b6d 3fad aac7 7688 6089 1464 .....m?...v.`..d │ │ │ +000037f0: 0b5a 58ad 9ec8 8ac9 7688 6029 0c7b 8915 .ZX.....v.`).{.. │ │ │ +00003800: 21ab 6208 ac88 cacb cc0d 5c22 21ab 57cd !.b.......\"!.W. │ │ │ +00003810: 2088 aa52 2c87 2220 5b6e 6f71 7565 7279 ..R,." [noquery │ │ │ +00003820: 2065 6e64 2073 7461 7274 206c 696d 2070 end start lim p │ │ │ +00003830: 6e74 2073 7472 696e 6720 6e69 6c20 3120 nt string nil 1 │ │ │ +00003840: 6162 6272 6576 2d65 7870 616e 7369 6f6e abbrev-expansion │ │ │ +00003850: 202d 3120 792d 6f72 2d6e 2d70 2066 6f72 -1 y-or-n-p for │ │ │ +00003860: 6d61 7420 2245 7870 616e 6420 6025 7327 mat "Expand `%s' │ │ │ +00003870: 3f20 2220 6578 7061 6e64 2d61 6262 7265 ? " expand-abbre │ │ │ +00003880: 765d 2034 2028 2324 202e 2031 3339 3837 v] 4 (#$ . 13987 │ │ │ +00003890: 2920 2272 5c6e 5022 5d29 0a ) "r\nP"]). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/about.elc │ │ │ @@ -1,4848 +1,4848 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f61 1-21.4.24/lisp/a │ │ │ -00000090: 626f 7574 2e65 6c0a 3b3b 3b20 656d 6163 bout.el.;;; emac │ │ │ -000000a0: 7320 7665 7273 696f 6e20 3231 2e34 2028 s version 21.4 ( │ │ │ -000000b0: 7061 7463 6820 3234 2920 2253 7461 6e64 patch 24) "Stand │ │ │ -000000c0: 6172 6420 4322 2058 456d 6163 7320 4c75 ard C" XEmacs Lu │ │ │ -000000d0: 6369 642e 0a3b 3b3b 2062 7974 6563 6f6d cid..;;; bytecom │ │ │ -000000e0: 7020 7665 7273 696f 6e20 322e 3237 2058 p version 2.27 X │ │ │ -000000f0: 456d 6163 733b 2032 3030 302d 3039 2d31 Emacs; 2000-09-1 │ │ │ -00000100: 322e 0a3b 3b3b 206f 7074 696d 697a 6174 2..;;; optimizat │ │ │ -00000110: 696f 6e20 6973 206f 6e2e 0a3b 3b3b 2074 ion is on..;;; t │ │ │ -00000120: 6869 7320 6669 6c65 2075 7365 7320 6f70 his file uses op │ │ │ -00000130: 636f 6465 7320 7768 6963 6820 646f 206e codes which do n │ │ │ -00000140: 6f74 2065 7869 7374 2069 6e20 456d 6163 ot exist in Emac │ │ │ -00000150: 7320 3139 2e0a 0a28 6966 2028 616e 6420 s 19...(if (and │ │ │ -00000160: 2862 6f75 6e64 7020 2765 6d61 6373 2d76 (boundp 'emacs-v │ │ │ -00000170: 6572 7369 6f6e 290a 0920 286f 7220 2861 ersion).. (or (a │ │ │ -00000180: 6e64 2028 626f 756e 6470 2027 6570 6f63 nd (boundp 'epoc │ │ │ -00000190: 683a 3a76 6572 7369 6f6e 2920 6570 6f63 h::version) epoc │ │ │ -000001a0: 683a 3a76 6572 7369 6f6e 290a 0920 2020 h::version).. │ │ │ -000001b0: 2020 2873 7472 696e 672d 6c65 7373 7020 (string-lessp │ │ │ -000001c0: 656d 6163 732d 7665 7273 696f 6e20 2232 emacs-version "2 │ │ │ -000001d0: 3022 2929 290a 2020 2020 2865 7272 6f72 0"))). (error │ │ │ -000001e0: 2022 6061 626f 7574 2e65 6c27 2077 6173 "`about.el' was │ │ │ -000001f0: 2063 6f6d 7069 6c65 6420 666f 7220 456d compiled for Em │ │ │ -00000200: 6163 7320 3230 2229 290a 0a28 6f72 2028 acs 20"))..(or ( │ │ │ -00000210: 626f 756e 6470 2027 6375 7272 656e 742d boundp 'current- │ │ │ -00000220: 6c6f 6164 2d6c 6973 7429 2028 7365 7471 load-list) (setq │ │ │ -00000230: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ -00000240: 7374 206e 696c 2929 0a0a 0a28 6279 7465 st nil))...(byte │ │ │ -00000250: 2d63 6f64 6520 22c0 c121 88c2 c3c4 c523 -code "..!.....# │ │ │ -00000260: 88c2 c6c7 c823 8722 205b 7265 7175 6972 .....#." [requir │ │ │ -00000270: 6520 7769 642d 6564 6974 2063 7573 746f e wid-edit custo │ │ │ -00000280: 6d2d 6465 636c 6172 652d 6661 6365 2061 m-declare-face a │ │ │ -00000290: 626f 7574 2d68 6561 646c 696e 652d 6661 bout-headline-fa │ │ │ -000002a0: 6365 2028 2828 2863 6c61 7373 2063 6f6c ce ((((class col │ │ │ -000002b0: 6f72 2920 2862 6163 6b67 726f 756e 6420 or) (background │ │ │ -000002c0: 6461 726b 2929 2028 3a66 6f72 6567 726f dark)) (:foregro │ │ │ -000002d0: 756e 6420 2272 6564 2220 3a62 6f6c 6420 und "red" :bold │ │ │ -000002e0: 7429 2920 2828 2863 6c61 7373 2063 6f6c t)) (((class col │ │ │ -000002f0: 6f72 2920 2862 6163 6b67 726f 756e 6420 or) (background │ │ │ -00000300: 6c69 6768 7429 2028 7479 7065 206d 7377 light) (type msw │ │ │ -00000310: 696e 646f 7773 2929 2028 3a66 6f72 6567 indows)) (:foreg │ │ │ -00000320: 726f 756e 6420 2272 6564 2220 3a62 6f6c round "red" :bol │ │ │ -00000330: 6420 7429 2920 2828 2863 6c61 7373 2063 d t)) (((class c │ │ │ -00000340: 6f6c 6f72 2920 2862 6163 6b67 726f 756e olor) (backgroun │ │ │ -00000350: 6420 6c69 6768 7429 2920 283a 666f 7265 d light)) (:fore │ │ │ -00000360: 6772 6f75 6e64 2022 7265 6434 2220 3a62 ground "red4" :b │ │ │ -00000370: 6f6c 6420 7429 2920 2828 2863 6c61 7373 old t)) (((class │ │ │ -00000380: 2067 7261 7973 6361 6c65 2920 2862 6163 grayscale) (bac │ │ │ -00000390: 6b67 726f 756e 6420 6c69 6768 7429 2920 kground light)) │ │ │ -000003a0: 283a 666f 7265 6772 6f75 6e64 2022 4c69 (:foreground "Li │ │ │ -000003b0: 6768 7447 7261 7922 203a 626f 6c64 2074 ghtGray" :bold t │ │ │ -000003c0: 2929 2028 2828 636c 6173 7320 6772 6179 )) (((class gray │ │ │ -000003d0: 7363 616c 6529 2028 6261 636b 6772 6f75 scale) (backgrou │ │ │ -000003e0: 6e64 2064 6172 6b29 2920 283a 666f 7265 nd dark)) (:fore │ │ │ -000003f0: 6772 6f75 6e64 2022 4469 6d47 7261 7922 ground "DimGray" │ │ │ -00000400: 203a 626f 6c64 2074 2929 2028 7420 283a :bold t)) (t (: │ │ │ -00000410: 626f 6c64 2074 2929 2920 2246 6163 6520 bold t))) "Face │ │ │ -00000420: 7573 6564 2066 6f72 2063 6f6c 6f72 2d68 used for color-h │ │ │ -00000430: 6967 686c 6967 6874 6564 2068 6561 646c ighlighted headl │ │ │ -00000440: 696e 6573 2069 6e20 7468 6520 4162 6f75 ines in the Abou │ │ │ -00000450: 7420 7061 6765 2e22 2061 626f 7574 2d6c t page." about-l │ │ │ -00000460: 696e 6b2d 6661 6365 2028 2828 2863 6c61 ink-face ((((cla │ │ │ -00000470: 7373 2063 6f6c 6f72 2920 2862 6163 6b67 ss color) (backg │ │ │ -00000480: 726f 756e 6420 6461 726b 2929 2028 3a66 round dark)) (:f │ │ │ -00000490: 6f72 6567 726f 756e 6420 2262 6c75 6522 oreground "blue" │ │ │ -000004a0: 203a 756e 6465 726c 696e 6520 7429 2920 :underline t)) │ │ │ -000004b0: 2828 2863 6c61 7373 2063 6f6c 6f72 2920 (((class color) │ │ │ -000004c0: 2862 6163 6b67 726f 756e 6420 6c69 6768 (background ligh │ │ │ -000004d0: 7429 2028 7479 7065 206d 7377 696e 646f t) (type mswindo │ │ │ -000004e0: 7773 2929 2028 3a66 6f72 6567 726f 756e ws)) (:foregroun │ │ │ -000004f0: 6420 2262 6c75 6533 2220 3a75 6e64 6572 d "blue3" :under │ │ │ -00000500: 6c69 6e65 2074 2929 2028 2828 636c 6173 line t)) (((clas │ │ │ -00000510: 7320 636f 6c6f 7229 2028 6261 636b 6772 s color) (backgr │ │ │ -00000520: 6f75 6e64 206c 6967 6874 2929 2028 3a66 ound light)) (:f │ │ │ -00000530: 6f72 6567 726f 756e 6420 2262 6c75 6534 oreground "blue4 │ │ │ -00000540: 2220 3a75 6e64 6572 6c69 6e65 2074 2929 " :underline t)) │ │ │ -00000550: 2028 2828 636c 6173 7320 6772 6179 7363 (((class graysc │ │ │ -00000560: 616c 6529 2028 6261 636b 6772 6f75 6e64 ale) (background │ │ │ -00000570: 206c 6967 6874 2929 2028 3a66 6f72 6567 light)) (:foreg │ │ │ -00000580: 726f 756e 6420 2244 696d 4772 6179 2220 round "DimGray" │ │ │ -00000590: 3a62 6f6c 6420 7420 3a69 7461 6c69 6320 :bold t :italic │ │ │ -000005a0: 7420 3a75 6e64 6572 6c69 6e65 2074 2929 t :underline t)) │ │ │ -000005b0: 2028 2828 636c 6173 7320 6772 6179 7363 (((class graysc │ │ │ -000005c0: 616c 6529 2028 6261 636b 6772 6f75 6e64 ale) (background │ │ │ -000005d0: 2064 6172 6b29 2920 283a 666f 7265 6772 dark)) (:foregr │ │ │ -000005e0: 6f75 6e64 2022 4c69 6768 7447 7261 7922 ound "LightGray" │ │ │ -000005f0: 203a 626f 6c64 2074 203a 6974 616c 6963 :bold t :italic │ │ │ -00000600: 2074 203a 756e 6465 726c 696e 6520 7429 t :underline t) │ │ │ -00000610: 2920 2874 2028 3a75 6e64 6572 6c69 6e65 ) (t (:underline │ │ │ -00000620: 2074 2929 2920 2246 6163 6520 7573 6564 t))) "Face used │ │ │ -00000630: 2066 6f72 206c 696e 6b73 2069 6e20 7468 for links in th │ │ │ -00000640: 6520 4162 6f75 7420 7061 6765 2e22 5d20 e About page."] │ │ │ -00000650: 3429 0a23 4032 3620 416c 6973 7420 6f66 4).#@26 Alist of │ │ │ -00000660: 2058 456d 6163 7320 6861 636b 6572 732e XEmacs hackers. │ │ │ -00000670: 1f0a 2864 6566 7661 7220 7865 6d61 6373 ..(defvar xemacs │ │ │ -00000680: 2d68 6163 6b65 7273 2027 2828 6164 7269 -hackers '((adri │ │ │ -00000690: 616e 2022 4164 7269 616e 2041 6963 686e an "Adrian Aichn │ │ │ -000006a0: 6572 2220 2261 6472 6961 6e40 7865 6d61 er" "adrian@xema │ │ │ -000006b0: 6373 2e6f 7267 2229 2028 616a 2022 416e cs.org") (aj "An │ │ │ -000006c0: 6472 6561 7320 4a61 6567 6572 2220 2261 dreas Jaeger" "a │ │ │ -000006d0: 6a40 7865 6d61 6373 2e6f 7267 2229 2028 j@xemacs.org") ( │ │ │ -000006e0: 616a 6320 2241 6e64 7265 7720 436f 7367 ajc "Andrew Cosg │ │ │ -000006f0: 7269 6666 2220 2261 6a63 4078 656d 6163 riff" "ajc@xemac │ │ │ -00000700: 732e 6f72 6722 2920 2861 6c61 7374 6169 s.org") (alastai │ │ │ -00000710: 7220 2241 6c61 7374 6169 7220 486f 7567 r "Alastair Houg │ │ │ -00000720: 6874 6f6e 2220 2261 6c61 7374 6169 7240 hton" "alastair@ │ │ │ -00000730: 7865 6d61 6373 2e6f 7267 2229 2028 6261 xemacs.org") (ba │ │ │ -00000740: 7720 2242 6172 7279 2057 6172 7361 7722 w "Barry Warsaw" │ │ │ -00000750: 2022 6277 6172 7361 7740 7865 6d61 6373 "bwarsaw@xemacs │ │ │ -00000760: 2e6f 7267 2229 2028 6265 6e20 2242 656e .org") (ben "Ben │ │ │ -00000770: 2057 696e 6722 2022 6265 6e40 7865 6d61 Wing" "ben@xema │ │ │ -00000780: 6373 2e6f 7267 2229 2028 6277 2022 426f cs.org") (bw "Bo │ │ │ -00000790: 6220 5765 696e 6572 2220 2277 6569 6e65 b Weiner" "weine │ │ │ -000007a0: 7240 7865 6d61 6373 2e6f 7267 2229 2028 r@xemacs.org") ( │ │ │ -000007b0: 6367 7720 2243 6861 726c 6573 2057 616c cgw "Charles Wal │ │ │ -000007c0: 646d 616e 2220 2263 6777 4078 656d 6163 dman" "cgw@xemac │ │ │ -000007d0: 732e 6f72 6722 2920 2863 6872 2022 4368 s.org") (chr "Ch │ │ │ -000007e0: 7269 7374 6961 6e20 4e79 62f8 2220 2263 ristian Nyb." "c │ │ │ -000007f0: 6872 4078 656d 6163 732e 6f72 6722 2920 hr@xemacs.org") │ │ │ -00000800: 2863 7261 6967 2022 4372 6169 6720 4c61 (craig "Craig La │ │ │ -00000810: 6e6e 696e 6722 2022 6372 6169 6740 7865 nning" "craig@xe │ │ │ -00000820: 6d61 6373 2e6f 7267 2229 2028 6374 686f macs.org") (ctho │ │ │ -00000830: 6d70 2022 4368 7563 6b20 5468 6f6d 7073 mp "Chuck Thomps │ │ │ -00000840: 6f6e 2220 2263 7468 6f6d 7040 7865 6d61 on" "cthomp@xema │ │ │ -00000850: 6373 2e6f 7267 2229 2028 6461 696b 6920 cs.org") (daiki │ │ │ -00000860: 2244 6169 6b69 2055 656e 6f22 2022 6461 "Daiki Ueno" "da │ │ │ -00000870: 696b 6940 7865 6d61 6373 2e6f 7267 2229 iki@xemacs.org") │ │ │ -00000880: 2028 6461 6e20 2244 616e 2048 6f6c 6d73 (dan "Dan Holms │ │ │ -00000890: 616e 6422 2022 6461 6e40 7865 6d61 6373 and" "dan@xemacs │ │ │ -000008a0: 2e6f 7267 2229 2028 6461 7272 796c 6f20 .org") (darrylo │ │ │ -000008b0: 2244 6172 7279 6c20 4f6b 6168 6174 6122 "Darryl Okahata" │ │ │ -000008c0: 2022 6461 7272 796c 6f40 7865 6d61 6373 "darrylo@xemacs │ │ │ -000008d0: 2e6f 7267 2229 2028 6465 7669 6e20 224d .org") (devin "M │ │ │ -000008e0: 6174 7468 6965 7520 4465 7669 6e22 2022 atthieu Devin" " │ │ │ -000008f0: 6465 7669 6e40 7865 6d61 6373 2e6f 7267 devin@xemacs.org │ │ │ -00000900: 2229 2028 646b 696e 6472 6564 2022 4461 ") (dkindred "Da │ │ │ -00000910: 7272 656c 6c20 4b69 6e64 7265 6422 2022 rrell Kindred" " │ │ │ -00000920: 646b 696e 6472 6564 4078 656d 6163 732e dkindred@xemacs. │ │ │ -00000930: 6f72 6722 2920 2864 6d6f 6f72 6520 2244 org") (dmoore "D │ │ │ -00000940: 6176 6964 204d 6f6f 7265 2220 2264 6d6f avid Moore" "dmo │ │ │ -00000950: 6f72 6540 7865 6d61 6373 2e6f 7267 2229 ore@xemacs.org") │ │ │ -00000960: 2028 6469 6469 6572 2022 4469 6469 6572 (didier "Didier │ │ │ -00000970: 2056 6572 6e61 2220 2264 6964 6965 7240 Verna" "didier@ │ │ │ -00000980: 7865 6d61 6373 2e6f 7267 2229 2028 6562 xemacs.org") (eb │ │ │ -00000990: 2022 4572 6963 2042 656e 736f 6e22 2022 "Eric Benson" " │ │ │ -000009a0: 6562 4078 656d 6163 732e 6f72 6722 2920 eb@xemacs.org") │ │ │ -000009b0: 2866 6162 7269 6365 2022 4661 6272 6963 (fabrice "Fabric │ │ │ -000009c0: 6520 506f 7069 6e65 6175 2220 2266 6162 e Popineau" "fab │ │ │ -000009d0: 7269 6365 4078 656d 6163 732e 6f72 6722 rice@xemacs.org" │ │ │ -000009e0: 2920 2867 6f6c 7562 6576 2022 496c 7961 ) (golubev "Ilya │ │ │ -000009f0: 2047 6f6c 7562 6576 2220 2267 6f6c 7562 Golubev" "golub │ │ │ -00000a00: 6576 4078 656d 6163 732e 6f72 6722 2920 ev@xemacs.org") │ │ │ -00000a10: 2867 756e 6e61 7220 2247 756e 6e61 7220 (gunnar "Gunnar │ │ │ -00000a20: 4576 6572 6d61 6e6e 2220 2267 756e 6e61 Evermann" "gunna │ │ │ -00000a30: 7240 7865 6d61 6373 2e6f 7267 2229 2028 r@xemacs.org") ( │ │ │ -00000a40: 6862 7320 2248 6172 6c61 6e20 5365 7874 hbs "Harlan Sext │ │ │ -00000a50: 6f6e 2220 2268 6273 4078 656d 6163 732e on" "hbs@xemacs. │ │ │ -00000a60: 6f72 6722 2920 2868 6973 6173 6869 2022 org") (hisashi " │ │ │ -00000a70: 4869 7361 7368 6920 4d69 7961 7368 6974 Hisashi Miyashit │ │ │ -00000a80: 6122 2022 6869 7361 7368 6940 7865 6d61 a" "hisashi@xema │ │ │ -00000a90: 6373 2e6f 7267 2229 2028 686d 756c 6c65 cs.org") (hmulle │ │ │ -00000aa0: 7220 2248 616e 7320 4d75 6c6c 6572 2220 r "Hans Muller" │ │ │ -00000ab0: 2268 6d75 6c6c 6572 4078 656d 6163 732e "hmuller@xemacs. │ │ │ -00000ac0: 6f72 6722 2920 2868 6e69 6b73 6963 2022 org") (hniksic " │ │ │ -00000ad0: 4872 766f 6a65 204e 696b 7369 6322 2022 Hrvoje Niksic" " │ │ │ -00000ae0: 686e 696b 7369 6340 7865 6d61 6373 2e6f hniksic@xemacs.o │ │ │ -00000af0: 7267 2229 2028 686f 626c 6579 2022 4461 rg") (hobley "Da │ │ │ -00000b00: 7669 6420 686f 626c 6579 2220 2268 6f62 vid hobley" "hob │ │ │ -00000b10: 6c65 7940 7865 6d61 6373 2e6f 7267 2229 ley@xemacs.org") │ │ │ -00000b20: 2028 6a61 6e20 224a 616e 2056 726f 6f6e (jan "Jan Vroon │ │ │ -00000b30: 686f 6622 2022 6a61 6e40 7865 6d61 6373 hof" "jan@xemacs │ │ │ -00000b40: 2e6f 7267 2229 2028 6a61 7265 7468 2022 .org") (jareth " │ │ │ -00000b50: 4a61 7265 7468 2048 6569 6e22 2022 6a61 Jareth Hein" "ja │ │ │ -00000b60: 7265 7468 4078 656d 6163 732e 6f72 6722 reth@xemacs.org" │ │ │ -00000b70: 2920 286a 6173 2022 5369 6d6f 6e20 4a6f ) (jas "Simon Jo │ │ │ -00000b80: 7365 6673 736f 6e22 2022 7369 6d6f 6e40 sefsson" "simon@ │ │ │ -00000b90: 7865 6d61 6373 2e6f 7267 2229 2028 6a61 xemacs.org") (ja │ │ │ -00000ba0: 736f 6e20 224a 6173 6f6e 2052 2e20 4d61 son "Jason R. Ma │ │ │ -00000bb0: 7374 616c 6572 2220 226a 6173 6f6e 4078 staler" "jason@x │ │ │ -00000bc0: 656d 6163 732e 6f72 6722 2920 286a 656e emacs.org") (jen │ │ │ -00000bd0: 7320 224a 656e 7320 4c61 7574 656e 6261 s "Jens Lautenba │ │ │ -00000be0: 6368 6572 2220 226a 656e 7340 7865 6d61 cher" "jens@xema │ │ │ -00000bf0: 6373 2e6f 7267 2229 2028 6a6d 696c 6c65 cs.org") (jmille │ │ │ -00000c00: 7220 224a 6566 6620 4d69 6c6c 6572 2220 r "Jeff Miller" │ │ │ -00000c10: 226a 6d69 6c6c 6572 4078 656d 6163 732e "jmiller@xemacs. │ │ │ -00000c20: 6f72 6722 2920 286a 6f6e 6174 6861 6e20 org") (jonathan │ │ │ -00000c30: 224a 6f6e 6174 6861 6e20 4861 7272 6973 "Jonathan Harris │ │ │ -00000c40: 2220 226a 6f6e 6174 6861 6e40 7865 6d61 " "jonathan@xema │ │ │ -00000c50: 6373 2e6f 7267 2229 2028 6a75 6870 2022 cs.org") (juhp " │ │ │ -00000c60: 4a65 6e73 2d55 6c72 696b 2048 6f6c 6765 Jens-Ulrik Holge │ │ │ -00000c70: 7220 5065 7465 7273 656e 2220 2270 6574 r Petersen" "pet │ │ │ -00000c80: 6572 7365 6e40 7865 6d61 6373 2e6f 7267 ersen@xemacs.org │ │ │ -00000c90: 2229 2028 6a77 7a20 224a 616d 6965 205a ") (jwz "Jamie Z │ │ │ -00000ca0: 6177 696e 736b 6922 2022 6a77 7a40 7865 awinski" "jwz@xe │ │ │ -00000cb0: 6d61 6373 2e6f 7267 2229 2028 6b61 7a7a macs.org") (kazz │ │ │ -00000cc0: 2022 4945 4e41 4741 204b 617a 7579 756b "IENAGA Kazuyuk │ │ │ -00000cd0: 6922 2022 6965 6e61 6761 4078 656d 6163 i" "ienaga@xemac │ │ │ -00000ce0: 732e 6f72 6722 2920 286b 6972 696c 6c20 s.org") (kirill │ │ │ -00000cf0: 224b 6972 696c 6c20 4b61 7473 6e65 6c73 "Kirill Katsnels │ │ │ -00000d00: 6f6e 2220 226b 6972 696c 6c40 7865 6d61 on" "kirill@xema │ │ │ -00000d10: 6373 2e6f 7267 2229 2028 6b79 6c65 2022 cs.org") (kyle " │ │ │ -00000d20: 4b79 6c65 204a 6f6e 6573 2220 226b 796c Kyle Jones" "kyl │ │ │ -00000d30: 6540 7865 6d61 6373 2e6f 7267 2229 2028 e@xemacs.org") ( │ │ │ -00000d40: 6c61 7273 6920 224c 6172 7320 4d61 676e larsi "Lars Magn │ │ │ -00000d50: 6520 496e 6765 6272 6967 7473 656e 2220 e Ingebrigtsen" │ │ │ -00000d60: 226c 6172 7369 4078 656d 6163 732e 6f72 "larsi@xemacs.or │ │ │ -00000d70: 6722 2920 286d 6172 6370 6120 224d 6172 g") (marcpa "Mar │ │ │ -00000d80: 6320 5061 7175 6574 7465 2220 226d 6172 c Paquette" "mar │ │ │ -00000d90: 6370 6140 7865 6d61 6373 2e6f 7267 2229 cpa@xemacs.org") │ │ │ -00000da0: 2028 6d61 7274 696e 2022 4d61 7274 696e (martin "Martin │ │ │ -00000db0: 2042 7563 6868 6f6c 7a22 2022 6d61 7274 Buchholz" "mart │ │ │ -00000dc0: 696e 4078 656d 6163 732e 6f72 6722 2920 in@xemacs.org") │ │ │ -00000dd0: 286d 636f 6f6b 2022 4d69 6368 6165 6c20 (mcook "Michael │ │ │ -00000de0: 522e 2043 6f6f 6b22 2022 6d63 6f6f 6b40 R. Cook" "mcook@ │ │ │ -00000df0: 7865 6d61 6373 2e6f 7267 2229 2028 6d6c xemacs.org") (ml │ │ │ -00000e00: 7920 2252 6963 6861 7264 204d 6c79 6e61 y "Richard Mlyna │ │ │ -00000e10: 7269 6b22 2022 6d6c 7940 7865 6d61 6373 rik" "mly@xemacs │ │ │ -00000e20: 2e6f 7267 2229 2028 6d6f 7269 6f6b 6120 .org") (morioka │ │ │ -00000e30: 224d 4f52 494f 4b41 2054 6f6d 6f68 696b "MORIOKA Tomohik │ │ │ -00000e40: 6f22 2022 6d6f 7269 6f6b 6140 7865 6d61 o" "morioka@xema │ │ │ -00000e50: 6373 2e6f 7267 2229 2028 6d74 6120 224d cs.org") (mta "M │ │ │ -00000e60: 696b 6520 416c 6578 616e 6465 7222 2022 ike Alexander" " │ │ │ -00000e70: 6d74 6140 7865 6d61 6373 2e6f 7267 2229 mta@xemacs.org") │ │ │ -00000e80: 2028 6f67 7261 6620 224f 6c69 7665 7220 (ograf "Oliver │ │ │ -00000e90: 4772 6166 2220 226f 6772 6166 4078 656d Graf" "ograf@xem │ │ │ -00000ea0: 6163 732e 6f72 6722 2920 286f 6c69 7669 acs.org") (olivi │ │ │ -00000eb0: 6572 2022 4f6c 6976 6965 7220 4761 6c69 er "Olivier Gali │ │ │ -00000ec0: 6265 7274 2220 226f 6c69 7669 6572 4078 bert" "olivier@x │ │ │ -00000ed0: 656d 6163 732e 6f72 6722 2920 286f 7363 emacs.org") (osc │ │ │ -00000ee0: 6172 2022 4f73 6361 7220 4669 6775 6569 ar "Oscar Figuei │ │ │ -00000ef0: 7265 646f 2220 226f 7363 6172 4078 656d redo" "oscar@xem │ │ │ -00000f00: 6163 732e 6f72 6722 2920 2870 656c 6567 acs.org") (peleg │ │ │ -00000f10: 7269 2022 4564 7561 7264 6f20 5065 6c65 ri "Eduardo Pele │ │ │ -00000f20: 6772 692d 4c6c 6f70 6172 7422 2022 7065 gri-Llopart" "pe │ │ │ -00000f30: 6c65 6772 6940 7865 6d61 6373 2e6f 7267 legri@xemacs.org │ │ │ -00000f40: 2229 2028 7065 7a20 2250 6574 6572 2050 ") (pez "Peter P │ │ │ -00000f50: 657a 6172 6973 2220 2270 657a 4078 656d ezaris" "pez@xem │ │ │ -00000f60: 6163 732e 6f72 6722 2920 2870 6970 6572 acs.org") (piper │ │ │ -00000f70: 2022 416e 6479 2050 6970 6572 2220 2261 "Andy Piper" "a │ │ │ -00000f80: 6e64 7940 7865 6d61 6373 2e6f 7267 2229 ndy@xemacs.org") │ │ │ -00000f90: 2028 7069 7474 6d61 6e20 2244 616e 6965 (pittman "Danie │ │ │ -00000fa0: 6c20 5069 7474 6d61 6e22 2022 7069 7474 l Pittman" "pitt │ │ │ -00000fb0: 6d61 6e40 7865 6d61 6373 2e6f 7267 2229 man@xemacs.org") │ │ │ -00000fc0: 2028 7269 636b 6320 2252 6963 6b20 4361 (rickc "Rick Ca │ │ │ -00000fd0: 6d70 6265 6c6c 2220 2272 6963 6b63 4078 mpbell" "rickc@x │ │ │ -00000fe0: 656d 6163 732e 6f72 6722 2920 2872 6f73 emacs.org") (ros │ │ │ -00000ff0: 6520 224a 6f68 6e20 526f 7365 2220 2272 e "John Rose" "r │ │ │ -00001000: 6f73 6540 7865 6d61 6373 2e6f 7267 2229 ose@xemacs.org") │ │ │ -00001010: 2028 726f 7373 696e 6920 2241 6e74 686f (rossini "Antho │ │ │ -00001020: 6e79 2052 6f73 7369 6e69 2220 2272 6f73 ny Rossini" "ros │ │ │ -00001030: 7369 6e69 4078 656d 6163 732e 6f72 6722 sini@xemacs.org" │ │ │ -00001040: 2920 2873 6c62 2022 5374 6576 6520 4261 ) (slb "Steve Ba │ │ │ -00001050: 7572 2220 2273 7465 7665 4078 656d 6163 ur" "steve@xemac │ │ │ -00001060: 732e 6f72 6722 2920 2873 7065 7262 6572 s.org") (sperber │ │ │ -00001070: 2022 4d69 6368 6165 6c20 5370 6572 6265 "Michael Sperbe │ │ │ -00001080: 7222 2022 6d69 6b65 4078 656d 6163 732e r" "mike@xemacs. │ │ │ -00001090: 6f72 6722 2920 2873 7469 6720 224a 6f6e org") (stig "Jon │ │ │ -000010a0: 6174 6861 6e20 5374 6967 656c 6d61 6e22 athan Stigelman" │ │ │ -000010b0: 2022 7374 6967 4078 656d 6163 732e 6f72 "stig@xemacs.or │ │ │ -000010c0: 6722 2920 2873 7469 6762 2022 5374 6967 g") (stigb "Stig │ │ │ -000010d0: 2042 6a6f 726c 796b 6b65 2220 2273 7469 Bjorlykke" "sti │ │ │ -000010e0: 6762 4078 656d 6163 732e 6f72 6722 2920 gb@xemacs.org") │ │ │ -000010f0: 2874 6869 6573 7365 6c20 224d 6172 6375 (thiessel "Marcu │ │ │ -00001100: 7320 5468 6965 7373 656c 2220 226d 6172 s Thiessel" "mar │ │ │ -00001110: 6375 7340 7865 6d61 6373 2e6f 7267 2229 cus@xemacs.org") │ │ │ -00001120: 2028 746f 6d6f 6e6f 7269 2022 546f 6d6f (tomonori "Tomo │ │ │ -00001130: 6e6f 7269 2049 6b65 7961 6d61 2220 2274 nori Ikeyama" "t │ │ │ -00001140: 6f6d 6f6e 6f72 6940 7865 6d61 6373 2e6f omonori@xemacs.o │ │ │ -00001150: 7267 2229 2028 7475 636b 2022 4d61 7474 rg") (tuck "Matt │ │ │ -00001160: 2054 7563 6b65 7222 2022 7475 636b 4078 Tucker" "tuck@x │ │ │ -00001170: 656d 6163 732e 6f72 6722 2920 2874 7572 emacs.org") (tur │ │ │ -00001180: 6e62 756c 6c20 2253 7465 7068 656e 2054 nbull "Stephen T │ │ │ -00001190: 7572 6e62 756c 6c22 2022 7475 726e 6275 urnbull" "turnbu │ │ │ -000011a0: 6c6c 4078 656d 6163 732e 6f72 6722 2920 ll@xemacs.org") │ │ │ -000011b0: 2876 696e 2022 5669 6e20 5368 656c 746f (vin "Vin Shelto │ │ │ -000011c0: 6e22 2022 6163 7340 7865 6d61 6373 2e6f n" "acs@xemacs.o │ │ │ -000011d0: 7267 2229 2028 766c 6164 696d 6972 2022 rg") (vladimir " │ │ │ -000011e0: 566c 6164 696d 6972 2049 7661 6e6f 7669 Vladimir Ivanovi │ │ │ -000011f0: 6322 2022 766c 6164 696d 6972 4078 656d c" "vladimir@xem │ │ │ -00001200: 6163 732e 6f72 6722 2920 2877 6d70 6572 acs.org") (wmper │ │ │ -00001210: 7279 2022 5769 6c6c 6961 6d20 5065 7272 ry "William Perr │ │ │ -00001220: 7922 2022 776d 7065 7272 7940 7865 6d61 y" "wmperry@xema │ │ │ -00001230: 6373 2e6f 7267 2229 2028 796f 7368 696b cs.org") (yoshik │ │ │ -00001240: 6920 2259 6f73 6869 6b69 2048 6179 6173 i "Yoshiki Hayas │ │ │ -00001250: 6869 2220 2279 6f73 6869 6b69 4078 656d hi" "yoshiki@xem │ │ │ -00001260: 6163 732e 6f72 6722 2920 2879 6f75 6e67 acs.org") (young │ │ │ -00001270: 7320 2253 7465 7665 2059 6f75 6e67 7322 s "Steve Youngs" │ │ │ -00001280: 2022 796f 756e 6773 4078 656d 6163 732e "youngs@xemacs. │ │ │ -00001290: 6f72 6722 2929 2028 2324 202e 2031 3632 org")) (#$ . 162 │ │ │ -000012a0: 3429 290a 2862 7974 652d 636f 6465 2022 4)).(byte-code " │ │ │ -000012b0: c108 4210 c2c1 21ac 85c3 c1c4 5c22 88c5 ..B...!.....\".. │ │ │ -000012c0: 0842 10c2 c521 ac85 c3c5 c65c 2288 c708 .B...!.....\"... │ │ │ -000012d0: 4210 c2c7 21ac 85c3 c7c8 5c22 88c1 8722 B...!.....\"..." │ │ │ -000012e0: 205b 6375 7272 656e 742d 6c6f 6164 2d6c [current-load-l │ │ │ -000012f0: 6973 7420 6162 6f75 742d 6375 7272 656e ist about-curren │ │ │ -00001300: 742d 7265 6c65 6173 652d 6d61 696e 7461 t-release-mainta │ │ │ -00001310: 696e 6572 7320 6465 6661 756c 742d 626f iners default-bo │ │ │ -00001320: 756e 6470 2073 6574 2d64 6566 6175 6c74 undp set-default │ │ │ -00001330: 2028 7669 6e20 7475 726e 6275 6c6c 2061 (vin turnbull a │ │ │ -00001340: 6472 6961 6e20 6265 6e20 6d61 7274 696e drian ben martin │ │ │ -00001350: 2070 6970 6572 2073 7065 7262 6572 2079 piper sperber y │ │ │ -00001360: 6f75 6e67 7329 2061 626f 7574 2d6f 7468 oungs) about-oth │ │ │ -00001370: 6572 2d63 7572 7265 6e74 2d68 6163 6b65 er-current-hacke │ │ │ -00001380: 7273 2028 616a 2061 6c61 7374 6169 7220 rs (aj alastair │ │ │ -00001390: 6367 7720 6372 6169 6720 6461 696b 6920 cgw craig daiki │ │ │ -000013a0: 6461 6e20 6469 6469 6572 2066 6162 7269 dan didier fabri │ │ │ -000013b0: 6365 2067 6f6c 7562 6576 2067 756e 6e61 ce golubev gunna │ │ │ -000013c0: 7220 6869 7361 7368 6920 686e 696b 7369 r hisashi hniksi │ │ │ -000013d0: 6320 6a61 6e20 6a61 7265 7468 206a 6d69 c jan jareth jmi │ │ │ -000013e0: 6c6c 6572 206a 6173 6f6e 206a 6f6e 6174 ller jason jonat │ │ │ -000013f0: 6861 6e20 6b61 7a7a 206b 6972 696c 6c20 han kazz kirill │ │ │ -00001400: 6c61 7273 6920 6d6f 7269 6f6b 6120 6d74 larsi morioka mt │ │ │ -00001410: 6120 6f67 7261 6620 6f6c 6976 6965 7220 a ograf olivier │ │ │ -00001420: 6f73 6361 7220 7069 7474 6d61 6e20 746f oscar pittman to │ │ │ -00001430: 6d6f 6e6f 7269 2074 7563 6b20 776d 7065 monori tuck wmpe │ │ │ -00001440: 7272 7920 796f 7368 696b 6929 2061 626f rry yoshiki) abo │ │ │ -00001450: 7574 2d6f 6e63 652d 616e 642d 6675 7475 ut-once-and-futu │ │ │ -00001460: 7265 2d68 6163 6b65 7273 2028 616a 6320 re-hackers (ajc │ │ │ -00001470: 6261 7720 6277 2063 6872 2063 7468 6f6d baw bw chr cthom │ │ │ -00001480: 7020 6461 7272 796c 6f20 6465 7669 6e20 p darrylo devin │ │ │ -00001490: 646b 696e 6472 6564 2064 6d6f 6f72 6520 dkindred dmoore │ │ │ -000014a0: 6562 2068 6273 2068 6d75 6c6c 6572 2068 eb hbs hmuller h │ │ │ -000014b0: 6f62 6c65 7920 6a61 7320 6a65 6e73 206a obley jas jens j │ │ │ -000014c0: 7568 7020 6a77 7a20 6b79 6c65 206d 6172 uhp jwz kyle mar │ │ │ -000014d0: 6370 6120 6d63 6f6f 6b20 6d6c 7920 6f67 cpa mcook mly og │ │ │ -000014e0: 7261 6620 7065 6c65 6772 6920 7065 7a20 raf pelegri pez │ │ │ -000014f0: 7269 636b 6320 726f 7365 2072 6f73 7369 rickc rose rossi │ │ │ -00001500: 6e69 2073 6c62 2073 7469 6720 7374 6967 ni slb stig stig │ │ │ -00001510: 6220 7468 6965 7373 656c 2076 6c61 6469 b thiessel vladi │ │ │ -00001520: 6d69 7229 5d20 3329 0a23 4033 3420 536f mir)] 3).#@34 So │ │ │ -00001530: 6d65 206f 6620 7468 6520 6d6f 7265 2069 me of the more i │ │ │ -00001540: 6d70 6f72 7461 6e74 2055 524c 732e 1f0a mportant URLs... │ │ │ -00001550: 2864 6566 7661 7220 6162 6f75 742d 7572 (defvar about-ur │ │ │ -00001560: 6c2d 616c 6973 7420 2728 2861 6a63 202e l-alist '((ajc . │ │ │ -00001570: 2022 6874 7470 3a2f 2f77 7777 2d70 6572 "http://www-per │ │ │ -00001580: 736f 6e61 6c2e 6d6f 6e61 7368 2e65 6475 sonal.monash.edu │ │ │ -00001590: 2e61 752f 7e61 6a63 2f22 2920 2861 6c61 .au/~ajc/") (ala │ │ │ -000015a0: 7374 6169 7220 2e20 2268 7474 703a 2f2f stair . "http:// │ │ │ -000015b0: 7765 6273 6974 652e 6c69 6e65 6f6e 652e website.lineone. │ │ │ -000015c0: 6e65 742f 7e61 6a68 6f75 6768 746f 6e2f net/~ajhoughton/ │ │ │ -000015d0: 2229 2028 6261 7720 2e20 2268 7474 703a ") (baw . "http: │ │ │ -000015e0: 2f2f 6261 7272 792e 776f 6f7a 2e6f 7267 //barry.wooz.org │ │ │ -000015f0: 2f22 2920 2862 656e 202e 2022 6874 7470 /") (ben . "http │ │ │ -00001600: 3a2f 2f77 7777 2e36 3636 2e63 6f6d 2f62 ://www.666.com/b │ │ │ -00001610: 656e 2f22 2920 2862 656e 2d78 656d 6163 en/") (ben-xemac │ │ │ -00001620: 7320 2e20 2268 7474 703a 2f2f 7777 772e s . "http://www. │ │ │ -00001630: 7865 6d61 6373 2e6f 7267 2f41 7263 6869 xemacs.org/Archi │ │ │ -00001640: 7465 6374 696e 672d 5845 6d61 6373 2f69 tecting-XEmacs/i │ │ │ -00001650: 6e64 6578 2e68 746d 6c22 2920 2862 656f ndex.html") (beo │ │ │ -00001660: 7065 6e20 2e20 2268 7474 703a 2f2f 7777 pen . "http://ww │ │ │ -00001670: 772e 6265 6f70 656e 2e63 6f6d 2f22 2920 w.beopen.com/") │ │ │ -00001680: 2863 632d 6d6f 6465 202e 2022 6874 7470 (cc-mode . "http │ │ │ -00001690: 3a2f 2f63 632d 6d6f 6465 2e73 6f75 7263 ://cc-mode.sourc │ │ │ -000016a0: 6566 6f72 6765 2e6e 6574 2f22 2920 2863 eforge.net/") (c │ │ │ -000016b0: 6872 202e 2022 6874 7470 3a2f 2f77 7777 hr . "http://www │ │ │ -000016c0: 2e78 656d 6163 732e 6f72 672f 6661 712f .xemacs.org/faq/ │ │ │ -000016d0: 2229 2028 6461 696b 6920 2e20 2268 7474 ") (daiki . "htt │ │ │ -000016e0: 703a 2f2f 6465 6973 7569 2e62 7567 2e6f p://deisui.bug.o │ │ │ -000016f0: 7267 2f64 6961 7279 2f73 6572 766c 6574 rg/diary/servlet │ │ │ -00001700: 2f76 6965 7722 2920 2864 6b69 6e64 7265 /view") (dkindre │ │ │ -00001710: 6420 2e20 2268 7474 703a 2f2f 7777 772e d . "http://www. │ │ │ -00001720: 6373 2e63 6d75 2e65 6475 2f50 656f 706c cs.cmu.edu/Peopl │ │ │ -00001730: 652f 646b 696e 6472 6564 2f6d 652e 6874 e/dkindred/me.ht │ │ │ -00001740: 6d6c 2229 2028 646d 6f6f 7265 202e 2022 ml") (dmoore . " │ │ │ -00001750: 6874 7470 3a2f 2f6f 6a2e 6567 6274 2e6f http://oj.egbt.o │ │ │ -00001760: 7267 2f64 6d6f 6f72 652f 2229 2028 6469 rg/dmoore/") (di │ │ │ -00001770: 6469 6572 202e 2022 6874 7470 3a2f 2f64 dier . "http://d │ │ │ -00001780: 6964 6965 722e 6c72 6465 2e6f 7267 2f22 idier.lrde.org/" │ │ │ -00001790: 2920 2864 766c 6a61 7a7a 202e 2022 6874 ) (dvljazz . "ht │ │ │ -000017a0: 7470 3a2f 2f77 7777 2e64 6964 6965 7276 tp://www.didierv │ │ │ -000017b0: 6572 6e61 2e63 6f6d 2f22 2920 2866 6162 erna.com/") (fab │ │ │ -000017c0: 7269 6365 202e 2022 6874 7470 3a2f 2f77 rice . "http://w │ │ │ -000017d0: 7777 2e65 7365 2d6d 6574 7a2e 6672 2f7e ww.ese-metz.fr/~ │ │ │ -000017e0: 706f 7069 6e65 6175 2f22 2920 2866 7074 popineau/") (fpt │ │ │ -000017f0: 6578 202e 2022 6874 7470 3a2f 2f77 7777 ex . "http://www │ │ │ -00001800: 2e66 7074 6578 2e6f 7267 2f22 2920 286a .fptex.org/") (j │ │ │ -00001810: 6173 202e 2022 6874 7470 3a2f 2f6a 6f73 as . "http://jos │ │ │ -00001820: 6566 7373 6f6e 2e6f 7267 2f22 2920 286a efsson.org/") (j │ │ │ -00001830: 6173 6f6e 202e 2022 6874 7470 3a2f 2f77 ason . "http://w │ │ │ -00001840: 7777 2e6d 6173 7461 6c65 722e 636f 6d2f ww.mastaler.com/ │ │ │ -00001850: 2229 2028 6a75 6870 202e 2022 6874 7470 ") (juhp . "http │ │ │ -00001860: 3a2f 2f77 7777 2e30 312e 3234 362e 6e65 ://www.01.246.ne │ │ │ -00001870: 2e6a 702f 7e6a 7568 702f 2229 2028 6a77 .jp/~juhp/") (jw │ │ │ -00001880: 7a20 2e20 2268 7474 703a 2f2f 7777 772e z . "http://www. │ │ │ -00001890: 6a77 7a2e 6f72 672f 2229 2028 6b61 7a7a jwz.org/") (kazz │ │ │ -000018a0: 202e 2022 6874 7470 3a2f 2f77 7777 2e69 . "http://www.i │ │ │ -000018b0: 6d61 7379 2e6f 722e 6a70 2f7e 6b61 7a7a masy.or.jp/~kazz │ │ │ -000018c0: 2f22 2920 286b 796c 6520 2e20 2268 7474 /") (kyle . "htt │ │ │ -000018d0: 703a 2f2f 7777 772e 776f 6e64 6572 776f p://www.wonderwo │ │ │ -000018e0: 726b 732e 636f 6d2f 6b79 6c65 2f22 2920 rks.com/kyle/") │ │ │ -000018f0: 286c 6172 7369 202e 2022 6874 7470 3a2f (larsi . "http:/ │ │ │ -00001900: 2f71 7569 6d62 792e 676e 7573 2e6f 7267 /quimby.gnus.org │ │ │ -00001910: 2f6c 6d69 2f22 2920 286d 6172 6370 6120 /lmi/") (marcpa │ │ │ -00001920: 2e20 2268 7474 703a 2f2f 7777 772e 706f . "http://www.po │ │ │ -00001930: 7369 7472 6f6e 3931 312e 636f 6d2f 7072 sitron911.com/pr │ │ │ -00001940: 6f64 7563 7473 2f70 6f77 6572 2e68 746d oducts/power.htm │ │ │ -00001950: 2229 2028 6f67 7261 6620 2e20 2268 7474 ") (ograf . "htt │ │ │ -00001960: 703a 2f2f 7777 772e 6667 612e 6465 2f7e p://www.fga.de/~ │ │ │ -00001970: 6f67 7261 662f 2229 2028 7065 7a20 2e20 ograf/") (pez . │ │ │ -00001980: 2268 7474 703a 2f2f 6362 732e 7370 6f72 "http://cbs.spor │ │ │ -00001990: 7473 6c69 6e65 2e63 6f6d 2f22 2920 2870 tsline.com/") (p │ │ │ -000019a0: 6970 6572 202e 2022 6874 7470 3a2f 2f77 iper . "http://w │ │ │ -000019b0: 7777 2e61 6e64 7970 6970 6572 2e63 6f6d ww.andypiper.com │ │ │ -000019c0: 2f22 2920 2872 6f73 7369 6e69 202e 2022 /") (rossini . " │ │ │ -000019d0: 6874 7470 3a2f 2f66 6163 756c 7479 2e77 http://faculty.w │ │ │ -000019e0: 6173 6869 6e67 746f 6e2e 6564 752f 726f ashington.edu/ro │ │ │ -000019f0: 7373 696e 692f 2229 2028 7374 6967 6220 ssini/") (stigb │ │ │ -00001a00: 2e20 2268 7474 703a 2f2f 7777 772e 7469 . "http://www.ti │ │ │ -00001a10: 686c 6465 2e68 6973 742e 6e6f 2f7e 7374 hlde.hist.no/~st │ │ │ -00001a20: 6967 622f 2229 2028 7669 6e20 2e20 2268 igb/") (vin . "h │ │ │ -00001a30: 7474 703a 2f2f 7777 772e 7570 612e 6f72 ttp://www.upa.or │ │ │ -00001a40: 672f 2229 2028 766c 6164 696d 6972 202e g/") (vladimir . │ │ │ -00001a50: 2022 6874 7470 3a2f 2f77 7777 2e6c 656f "http://www.leo │ │ │ -00001a60: 6e6f 7261 2e6f 7267 2f7e 766c 6164 696d nora.org/~vladim │ │ │ -00001a70: 6972 2f22 2920 2877 6765 7420 2e20 2268 ir/") (wget . "h │ │ │ -00001a80: 7474 703a 2f2f 7375 6e73 6974 652e 646b ttp://sunsite.dk │ │ │ -00001a90: 2f77 6765 742f 2229 2028 7865 6d61 6373 /wget/") (xemacs │ │ │ -00001aa0: 202e 2022 6874 7470 3a2f 2f77 7777 2e78 . "http://www.x │ │ │ -00001ab0: 656d 6163 732e 6f72 672f 2229 2028 796f emacs.org/") (yo │ │ │ -00001ac0: 756e 6773 202e 2022 6874 7470 3a2f 2f65 ungs . "http://e │ │ │ -00001ad0: 6963 712e 736f 7572 6365 666f 7267 652e icq.sourceforge. │ │ │ -00001ae0: 6e65 742f 2229 2920 2823 2420 2e20 3534 net/")) (#$ . 54 │ │ │ -00001af0: 3232 2929 0a28 6279 7465 2d63 6f64 6520 22)).(byte-code │ │ │ -00001b00: 22c1 0842 10c2 c121 ac85 c3c1 c45c 2288 "..B...!.....\". │ │ │ -00001b10: c187 2220 5b63 7572 7265 6e74 2d6c 6f61 .." [current-loa │ │ │ -00001b20: 642d 6c69 7374 2061 626f 7574 2d6c 6566 d-list about-lef │ │ │ -00001b30: 742d 6d61 7267 696e 2064 6566 6175 6c74 t-margin default │ │ │ -00001b40: 2d62 6f75 6e64 7020 7365 742d 6465 6661 -boundp set-defa │ │ │ -00001b50: 756c 7420 335d 2033 290a 2864 6566 616c ult 3] 3).(defal │ │ │ -00001b60: 6961 7320 2761 626f 7574 2d6c 6f6f 6b75 ias 'about-looku │ │ │ -00001b70: 702d 7572 6c20 235b 286e 616d 6529 2022 p-url #[(name) " │ │ │ -00001b80: 0908 b741 891a ac86 c3c4 c243 5c22 885c ...A.......C\".\ │ │ │ -00001b90: 6e29 8722 205b 6162 6f75 742d 7572 6c2d n)." [about-url- │ │ │ -00001ba0: 616c 6973 7420 6e61 6d65 2072 6573 756c alist name resul │ │ │ -00001bb0: 7420 7369 676e 616c 2063 6c2d 6173 7365 t signal cl-asse │ │ │ -00001bc0: 7274 696f 6e2d 6661 696c 6564 5d20 345d rtion-failed] 4] │ │ │ -00001bd0: 290a 2864 6566 616c 6961 7320 2761 626f ).(defalias 'abo │ │ │ -00001be0: 7574 2d75 726c 2d6c 696e 6b20 235b 2875 ut-url-link #[(u │ │ │ -00001bf0: 726c 2026 6f70 7469 6f6e 616c 2074 6578 rl &optional tex │ │ │ -00001c00: 742d 746f 2d69 6e73 6572 7420 6865 6c70 t-to-insert help │ │ │ -00001c10: 2d65 6368 6f29 2022 5c6e ac86 c3c4 c243 -echo) "\n.....C │ │ │ -00001c20: 5c22 885c 6e39 ab84 c55c 6e21 1209 ab88 \".\n9...\n!.... │ │ │ -00001c30: 0939 ab84 c509 2111 c6c7 c8c9 cac9 cb08 .9....!......... │ │ │ -00001c40: cc09 ae81 5c6e 5c6e 265c 6e87 2220 5b68 ....\n\n&\n." [h │ │ │ -00001c50: 656c 702d 6563 686f 2074 6578 742d 746f elp-echo text-to │ │ │ -00001c60: 2d69 6e73 6572 7420 7572 6c20 7369 676e -insert url sign │ │ │ -00001c70: 616c 2063 6c2d 6173 7365 7274 696f 6e2d al cl-assertion- │ │ │ -00001c80: 6661 696c 6564 2061 626f 7574 2d6c 6f6f failed about-loo │ │ │ -00001c90: 6b75 702d 7572 6c20 7769 6467 6574 2d63 kup-url widget-c │ │ │ -00001ca0: 7265 6174 6520 7572 6c2d 6c69 6e6b 203a reate url-link : │ │ │ -00001cb0: 6275 7474 6f6e 2d70 7265 6669 7820 2222 button-prefix "" │ │ │ -00001cc0: 203a 6275 7474 6f6e 2d73 7566 6669 7820 :button-suffix │ │ │ -00001cd0: 3a68 656c 702d 6563 686f 203a 7461 675d :help-echo :tag] │ │ │ -00001ce0: 2031 315d 290a 2864 6566 616c 6961 7320 11]).(defalias │ │ │ -00001cf0: 2761 626f 7574 2d6d 6169 6c74 6f2d 6c69 'about-mailto-li │ │ │ -00001d00: 6e6b 2023 5b28 6164 6472 6573 7329 2022 nk #[(address) " │ │ │ -00001d10: c2c3 2189 1908 4c88 c4c5 c609 4ac7 c8c9 ..!...L.....J... │ │ │ -00001d20: c8ca cbcc cdce cf44 ce09 44d0 4645 d1d2 .......D..D.FE.. │ │ │ -00001d30: d309 4a5c 2226 0b29 8722 205b 6164 6472 ..J\"&.)." [addr │ │ │ -00001d40: 6573 7320 2331 3d23 3a2d 2d61 6464 7265 ess #1=#:--addre │ │ │ -00001d50: 7373 2d2d 3931 3530 3820 6d61 6b65 2d73 ss--91508 make-s │ │ │ -00001d60: 796d 626f 6c20 222d 2d61 6464 7265 7373 ymbol "--address │ │ │ -00001d70: 2d2d 2220 7769 6467 6574 2d63 7265 6174 --" widget-creat │ │ │ -00001d80: 6520 6c69 6e6b 203a 7461 6720 3a62 7574 e link :tag :but │ │ │ -00001d90: 746f 6e2d 7072 6566 6978 2022 2220 3a62 ton-prefix "" :b │ │ │ -00001da0: 7574 746f 6e2d 7375 6666 6978 203a 6163 utton-suffix :ac │ │ │ -00001db0: 7469 6f6e 206c 616d 6264 6120 2826 7265 tion lambda (&re │ │ │ -00001dc0: 7374 202d 2d63 6c2d 7265 7374 2d2d 2920 st --cl-rest--) │ │ │ -00001dd0: 6170 706c 7920 7175 6f74 6520 235b 2823 apply quote #[(# │ │ │ -00001de0: 323d 233a 4739 3135 3039 2077 6964 6765 2=#:G91509 widge │ │ │ -00001df0: 7420 266f 7074 696f 6e61 6c20 6576 656e t &optional even │ │ │ -00001e00: 7429 2022 c108 4a21 8722 205b 2332 2320 t) "..J!." [#2# │ │ │ -00001e10: 636f 6d70 6f73 652d 6d61 696c 5d20 325d compose-mail] 2] │ │ │ -00001e20: 202d 2d63 6c2d 7265 7374 2d2d 203a 6865 --cl-rest-- :he │ │ │ -00001e30: 6c70 2d65 6368 6f20 666f 726d 6174 2022 lp-echo format " │ │ │ -00001e40: 5365 6e64 206d 6169 6c20 746f 2025 7322 Send mail to %s" │ │ │ -00001e50: 5d20 3136 5d29 0a28 6465 6661 6c69 6173 ] 16]).(defalias │ │ │ -00001e60: 2027 6162 6f75 742d 7769 7468 2d66 6163 'about-with-fac │ │ │ -00001e70: 6520 235b 2873 7472 696e 6720 6661 6365 e #[(string face │ │ │ -00001e80: 2920 22c3 c409 4709 231a c55c 6ec6 c723 ) "...G.#..\n..# │ │ │ -00001e90: 88c5 5c6e c8c7 2388 c55c 6ec9 c723 88c5 ..\n..#..\n..#.. │ │ │ -00001ea0: 5c6e cac7 2388 cb5c 6e08 5c22 8829 0987 \n..#..\n.\".).. │ │ │ -00001eb0: 2220 5b66 6163 6520 7374 7269 6e67 2065 " [face string e │ │ │ -00001ec0: 7874 206d 616b 652d 6578 7465 6e74 2030 xt make-extent 0 │ │ │ -00001ed0: 2073 6574 2d65 7874 656e 742d 7072 6f70 set-extent-prop │ │ │ -00001ee0: 6572 7479 2064 7570 6c69 6361 626c 6520 erty duplicable │ │ │ -00001ef0: 7420 756e 6971 7565 2073 7461 7274 2d6f t unique start-o │ │ │ -00001f00: 7065 6e20 656e 642d 6f70 656e 2073 6574 pen end-open set │ │ │ -00001f10: 2d65 7874 656e 742d 6661 6365 5d20 345d -extent-face] 4] │ │ │ -00001f20: 290a 2864 6566 616c 6961 7320 2761 626f ).(defalias 'abo │ │ │ -00001f30: 7574 2d67 6574 2d62 7566 6665 7220 235b ut-get-buffer #[ │ │ │ -00001f40: 286e 616d 6529 2022 c35c 6e21 ab8c c45c (name) ".\n!...\ │ │ │ -00001f50: 6e21 88c5 2088 6562 885c 6e87 c45c 6e21 n!.. .eb.\n..\n! │ │ │ -00001f60: 88c5 2088 c620 88c7 c8c9 5c22 88ca 0908 .. .. ....\".... │ │ │ -00001f70: 7023 88cb cc21 cd4c 88ce 8722 205b 6162 p#...!.L..." [ab │ │ │ -00001f80: 6f75 742d 6c65 6674 2d6d 6172 6769 6e20 out-left-margin │ │ │ -00001f90: 6c65 6674 2d6d 6172 6769 6e2d 7769 6474 left-margin-widt │ │ │ -00001fa0: 6820 6e61 6d65 2067 6574 2d62 7566 6665 h name get-buffe │ │ │ -00001fb0: 7220 7377 6974 6368 2d74 6f2d 6275 6666 r switch-to-buff │ │ │ -00001fc0: 6572 2064 656c 6574 652d 6f74 6865 722d er delete-other- │ │ │ -00001fd0: 7769 6e64 6f77 7320 6275 6666 6572 2d64 windows buffer-d │ │ │ -00001fe0: 6973 6162 6c65 2d75 6e64 6f20 6164 642d isable-undo add- │ │ │ -00001ff0: 6c6f 6361 6c2d 686f 6f6b 206d 6f75 7365 local-hook mouse │ │ │ -00002000: 2d74 7261 636b 2d63 6c69 636b 2d68 6f6f -track-click-hoo │ │ │ -00002010: 6b20 235b 2865 7665 6e74 2063 6f75 6e74 k #[(event count │ │ │ -00002020: 2920 22c3 5c6e 21ad 93c3 5c6e 2119 c409 ) ".\n!...\n!... │ │ │ -00002030: c05c 2289 18ad 86c5 085c 6e5c 2288 c62a .\"......\n\"..* │ │ │ -00002040: 8722 205b 6275 7474 6f6e 2070 6f73 2065 ." [button pos e │ │ │ -00002050: 7665 6e74 2077 6964 6765 742d 6576 656e vent widget-even │ │ │ -00002060: 742d 706f 696e 7420 6765 742d 6368 6172 t-point get-char │ │ │ -00002070: 2d70 726f 7065 7274 7920 7769 6467 6574 -property widget │ │ │ -00002080: 2d61 7070 6c79 2d61 6374 696f 6e20 745d -apply-action t] │ │ │ -00002090: 2034 5d20 7365 742d 7370 6563 6966 6965 4] set-specifie │ │ │ -000020a0: 7220 6d61 6b65 2d6c 6f63 616c 2d76 6172 r make-local-var │ │ │ -000020b0: 6961 626c 6520 7769 6467 6574 2d62 7574 iable widget-but │ │ │ -000020c0: 746f 6e2d 6661 6365 2061 626f 7574 2d6c ton-face about-l │ │ │ -000020d0: 696e 6b2d 6661 6365 206e 696c 5d20 345d ink-face nil] 4] │ │ │ -000020e0: 290a 2864 6566 616c 6961 7320 2761 626f ).(defalias 'abo │ │ │ -000020f0: 7574 2d66 696e 6973 682d 6275 6666 6572 ut-finish-buffer │ │ │ -00002100: 2023 5b28 266f 7074 696f 6e61 6c20 7479 #[(&optional ty │ │ │ -00002110: 7065 2920 225c 6eac 82c3 12c4 c521 885c pe) "\n......!.\ │ │ │ -00002120: 6ec3 61ab 8dc6 c7c8 c9ca cbcc cd26 0788 n.a..........&.. │ │ │ -00002130: aa8b c6c7 c8ce cacf ccd0 2607 88c4 d121 ..........&....! │ │ │ -00002140: 88d2 d320 2188 d4d5 2008 5c22 885c 6ec3 ... !... .\".\n. │ │ │ -00002150: 61ab 8cd6 d7d8 5c22 88d6 d9d8 5c22 88aa a.....\"....\".. │ │ │ -00002160: 8dda 19d6 d709 5c22 88d6 d909 5c22 8829 ......\"....\".) │ │ │ -00002170: d6db dc5c 2288 d6dd de5c 2288 d6df de5c ...\"....\"....\ │ │ │ -00002180: 2288 e020 8865 6288 e1e2 2188 e3e4 2187 ".. .eb...!...!. │ │ │ -00002190: 2220 5b77 6964 6765 742d 6b65 796d 6170 " [widget-keymap │ │ │ -000021a0: 2064 6973 706f 7365 2074 7970 6520 6275 dispose type bu │ │ │ -000021b0: 7279 2077 6964 6765 742d 696e 7365 7274 ry widget-insert │ │ │ -000021c0: 2022 5c6e 2220 7769 6467 6574 2d63 7265 "\n" widget-cre │ │ │ -000021d0: 6174 6520 6c69 6e6b 203a 6865 6c70 2d65 ate link :help-e │ │ │ -000021e0: 6368 6f20 2242 7572 7920 7468 6973 2062 cho "Bury this b │ │ │ -000021f0: 7566 6665 7222 203a 6163 7469 6f6e 2023 uffer" :action # │ │ │ -00002200: 5b28 7769 6467 6574 2065 7665 6e74 2920 [(widget event) │ │ │ -00002210: 2209 ab8f c220 18c3 8ec4 c509 2121 88c6 ".... ......!!.. │ │ │ -00002220: 202a 87c6 2087 2220 5b23 313d 233a 7373 *.. ." [#1=#:ss │ │ │ -00002230: 7739 3135 3132 2065 7665 6e74 2073 656c w91512 event sel │ │ │ -00002240: 6563 7465 642d 7769 6e64 6f77 2028 2862 ected-window ((b │ │ │ -00002250: 7974 652d 636f 6465 2022 c108 21ab 84c2 yte-code "..!... │ │ │ -00002260: 0821 88c1 8722 205b 2331 2320 7769 6e64 .!..." [#1# wind │ │ │ -00002270: 6f77 2d6c 6976 652d 7020 7365 6c65 6374 ow-live-p select │ │ │ -00002280: 2d77 696e 646f 775d 2032 2929 2073 656c -window] 2)) sel │ │ │ -00002290: 6563 742d 7769 6e64 6f77 2065 7665 6e74 ect-window event │ │ │ -000022a0: 2d77 696e 646f 7720 6275 7279 2d62 7566 -window bury-buf │ │ │ -000022b0: 6665 725d 2033 5d20 3a74 6167 2022 4275 fer] 3] :tag "Bu │ │ │ -000022c0: 7279 2220 224b 696c 6c20 7468 6973 2062 ry" "Kill this b │ │ │ -000022d0: 7566 6665 7222 2023 5b28 7769 6467 6574 uffer" #[(widget │ │ │ -000022e0: 2065 7665 6e74 2920 2208 ab86 c1c2 0821 event) "......! │ │ │ -000022f0: 2187 c170 2187 2220 5b65 7665 6e74 206b !..p!." [event k │ │ │ -00002300: 696c 6c2d 6275 6666 6572 2065 7665 6e74 ill-buffer event │ │ │ -00002310: 2d62 7566 6665 725d 2033 5d20 224b 696c -buffer] 3] "Kil │ │ │ -00002320: 6c22 2022 2074 6869 7320 6275 6666 6572 l" " this buffer │ │ │ -00002330: 2061 6e64 2072 6574 7572 6e20 746f 2070 and return to p │ │ │ -00002340: 7265 7669 6f75 732e 5c6e 2220 7573 652d revious.\n" use- │ │ │ -00002350: 6c6f 6361 6c2d 6d61 7020 6d61 6b65 2d73 local-map make-s │ │ │ -00002360: 7061 7273 652d 6b65 796d 6170 2073 6574 parse-keymap set │ │ │ -00002370: 2d6b 6579 6d61 702d 7061 7265 6e74 2063 -keymap-parent c │ │ │ -00002380: 7572 7265 6e74 2d6c 6f63 616c 2d6d 6170 urrent-local-map │ │ │ -00002390: 206c 6f63 616c 2d73 6574 2d6b 6579 2022 local-set-key " │ │ │ -000023a0: 7122 2062 7572 792d 6275 6666 6572 2022 q" bury-buffer " │ │ │ -000023b0: 6c22 2023 5b6e 696c 2022 c070 2187 2220 l" #[nil ".p!." │ │ │ -000023c0: 5b6b 696c 6c2d 6275 6666 6572 5d20 3220 [kill-buffer] 2 │ │ │ -000023d0: 6e69 6c20 6e69 6c5d 2022 2022 2073 6372 nil nil] " " scr │ │ │ -000023e0: 6f6c 6c2d 7570 205b 6261 636b 7370 6163 oll-up [backspac │ │ │ -000023f0: 655d 2073 6372 6f6c 6c2d 646f 776e 2022 e] scroll-down " │ │ │ -00002400: 7f22 2077 6964 6765 742d 7365 7475 7020 ." widget-setup │ │ │ -00002410: 746f 6767 6c65 2d72 6561 642d 6f6e 6c79 toggle-read-only │ │ │ -00002420: 2031 2073 6574 2d62 7566 6665 722d 6d6f 1 set-buffer-mo │ │ │ -00002430: 6469 6669 6564 2d70 206e 696c 5d20 385d dified-p nil] 8] │ │ │ -00002440: 290a 2864 6566 616c 6961 7320 2761 626f ).(defalias 'abo │ │ │ -00002450: 7574 2d63 656e 7465 7220 235b 2873 7472 ut-center #[(str │ │ │ -00002460: 696e 672d 6f72 2d67 6c79 7068 2920 22c3 ing-or-glyph) ". │ │ │ -00002470: 0921 085a 1ac4 c55c 6e21 ab83 5c6e aa81 .!.Z...\n!..\n.. │ │ │ -00002480: c6c7 5c22 2987 2220 5b61 626f 7574 2d6c ..\")." [about-l │ │ │ -00002490: 6566 742d 6d61 7267 696e 2073 7472 696e eft-margin strin │ │ │ -000024a0: 672d 6f72 2d67 6c79 7068 206e 2073 7461 g-or-glyph n sta │ │ │ -000024b0: 7274 7570 2d63 656e 7465 722d 7370 6163 rtup-center-spac │ │ │ -000024c0: 6573 206d 616b 652d 7374 7269 6e67 206e es make-string n │ │ │ -000024d0: 6174 6e75 6d70 2030 203f 5c20 5d20 335d atnump 0 ?\ ] 3] │ │ │ -000024e0: 290a 2340 3433 2044 6573 6372 6962 6520 ).#@43 Describe │ │ │ -000024f0: 7468 6520 5472 7565 2045 6469 746f 7220 the True Editor │ │ │ -00002500: 616e 6420 6974 7320 6d69 6e69 6f6e 732e and its minions. │ │ │ -00002510: 1f0a 2864 6566 616c 6961 7320 2761 626f ..(defalias 'abo │ │ │ -00002520: 7574 2d78 656d 6163 7320 235b 6e69 6c20 ut-xemacs #[nil │ │ │ -00002530: 22c6 c721 3f85 0701 c8c9 0c21 2188 cacb "..!?......!!... │ │ │ -00002540: cccd ce0c 2588 c8cf 2188 d0d1 0908 0e40 ....%...!......@ │ │ │ -00002550: 241b d0d2 0bd3 5c6e d4d5 4fd6 5c22 415c $.....\n..O.\"A\ │ │ │ -00002560: 6ed7 d84f 241d c8c9 0d21 2188 cad9 dadb n..O$....!!..... │ │ │ -00002570: dcdd 0d26 0688 2ac8 dedf e0e1 5c22 e223 ...&..*.....\".# │ │ │ -00002580: 88ca d9da e3dc e4e5 e6e7 e6e8 265c 6e88 ............&\n. │ │ │ -00002590: c8e9 2188 cad9 daea dceb e5e6 e7e6 ec26 ..!............& │ │ │ -000025a0: 5c6e 88c8 ed21 88ca d9da eedc dde5 e6e7 \n...!.......... │ │ │ -000025b0: e6ef 265c 6e88 c8f0 2188 caf1 daf2 e5e6 ..&\n...!....... │ │ │ -000025c0: e7e6 f3f4 f526 5c6e 88c8 f621 88f7 f8d8 .....&\n...!.... │ │ │ -000025d0: f923 88c8 fa21 88fb fc21 891e 41ad 82fc .#...!...!..A... │ │ │ -000025e0: 4b1e 42fd 8efc fe4d 88ff fc0e 435c 2288 K.B....M....C\". │ │ │ -000025f0: c881 4400 2188 cad9 da81 4500 dc81 4600 ..D.!.....E...F. │ │ │ -00002600: e5e6 e7e6 8147 0026 5c6e 88c8 8148 0021 .....G.&\n...H.! │ │ │ -00002610: 88fc 8149 0021 88c8 814a 0021 88fc 814b ...I.!...J.!...K │ │ │ -00002620: 0021 88fc 814c 0021 88c8 814d 0021 88fc .!...L.!...M.!.. │ │ │ -00002630: 814e 0021 882b 814f 0020 8881 5000 8151 .N.!.+.O. ..P..Q │ │ │ -00002640: 0021 8722 205b 656d 6163 732d 6d69 6e6f .!." [emacs-mino │ │ │ -00002650: 722d 7665 7273 696f 6e20 656d 6163 732d r-version emacs- │ │ │ -00002660: 6d61 6a6f 722d 7665 7273 696f 6e20 656d major-version em │ │ │ -00002670: 6163 732d 6275 696c 642d 7469 6d65 2065 acs-build-time e │ │ │ -00002680: 6d61 6373 2d73 686f 7274 2d76 6572 7369 macs-short-versi │ │ │ -00002690: 6f6e 2078 656d 6163 732d 6c6f 676f 2065 on xemacs-logo e │ │ │ -000026a0: 6d61 6373 2d61 626f 7574 2d76 6572 7369 macs-about-versi │ │ │ -000026b0: 6f6e 2061 626f 7574 2d67 6574 2d62 7566 on about-get-buf │ │ │ -000026c0: 6665 7220 222a 4162 6f75 7420 5845 6d61 fer "*About XEma │ │ │ -000026d0: 6373 2a22 2077 6964 6765 742d 696e 7365 cs*" widget-inse │ │ │ -000026e0: 7274 2061 626f 7574 2d63 656e 7465 7220 rt about-center │ │ │ -000026f0: 7769 6467 6574 2d63 7265 6174 6520 6465 widget-create de │ │ │ -00002700: 6661 756c 7420 3a66 6f72 6d61 7420 2225 fault :format "% │ │ │ -00002710: 7422 203a 7461 672d 676c 7970 6820 225c t" :tag-glyph "\ │ │ │ -00002720: 6e22 2066 6f72 6d61 7420 2225 642e 2564 n" format "%d.%d │ │ │ -00002730: 2e25 6422 2022 7665 7273 696f 6e20 2573 .%d" "version %s │ │ │ -00002740: 3b20 2573 2025 7322 2061 7373 6f63 2034 ; %s %s" assoc 4 │ │ │ -00002750: 2037 2028 2822 4a61 6e22 202e 2022 4a61 7 (("Jan" . "Ja │ │ │ -00002760: 6e75 6172 7922 2920 2822 4665 6222 202e nuary") ("Feb" . │ │ │ -00002770: 2022 4665 6272 7561 7279 2229 2028 224d "February") ("M │ │ │ -00002780: 6172 2220 2e20 224d 6172 6368 2229 2028 ar" . "March") ( │ │ │ -00002790: 2241 7072 2220 2e20 2241 7072 696c 2229 "Apr" . "April") │ │ │ -000027a0: 2028 224d 6179 2220 2e20 224d 6179 2229 ("May" . "May") │ │ │ -000027b0: 2028 224a 756e 2220 2e20 224a 756e 6522 ("Jun" . "June" │ │ │ -000027c0: 2920 2822 4a75 6c22 202e 2022 4a75 6c79 ) ("Jul" . "July │ │ │ -000027d0: 2229 2028 2241 7567 2220 2e20 2241 7567 ") ("Aug" . "Aug │ │ │ -000027e0: 7573 7422 2920 2822 5365 7022 202e 2022 ust") ("Sep" . " │ │ │ -000027f0: 5365 7074 656d 6265 7222 2920 2822 4f63 September") ("Oc │ │ │ -00002800: 7422 202e 2022 4f63 746f 6265 7222 2920 t" . "October") │ │ │ -00002810: 2822 4e6f 7622 202e 2022 4e6f 7665 6d62 ("Nov" . "Novemb │ │ │ -00002820: 6572 2229 2028 2244 6563 2220 2e20 2244 er") ("Dec" . "D │ │ │ -00002830: 6563 656d 6265 7222 2929 202d 3420 6e69 ecember")) -4 ni │ │ │ -00002840: 6c20 6c69 6e6b 203a 6865 6c70 2d65 6368 l link :help-ech │ │ │ -00002850: 6f20 2257 6861 7427 7320 6e65 7720 696e o "What's new in │ │ │ -00002860: 2058 456d 6163 7322 203a 6163 7469 6f6e XEmacs" :action │ │ │ -00002870: 2061 626f 7574 2d6e 6577 7320 225c 6e5c about-news "\n\ │ │ │ -00002880: 6e22 2061 626f 7574 2d77 6974 682d 6661 n" about-with-fa │ │ │ -00002890: 6365 2022 5845 6d61 6373 2220 626f 6c64 ce "XEmacs" bold │ │ │ -000028a0: 2d69 7461 6c69 6320 2220 6973 2061 2070 -italic " is a p │ │ │ -000028b0: 6f77 6572 6675 6c2c 2068 6967 686c 7920 owerful, highly │ │ │ -000028c0: 6375 7374 6f6d 697a 6162 6c65 206f 7065 customizable ope │ │ │ -000028d0: 6e20 736f 7572 6365 2074 6578 7420 6564 n source text ed │ │ │ -000028e0: 6974 6f72 2061 6e64 5c6e 6170 706c 6963 itor and\napplic │ │ │ -000028f0: 6174 696f 6e20 6465 7665 6c6f 706d 656e ation developmen │ │ │ -00002900: 7420 7379 7374 656d 2c20 7769 7468 2066 t system, with f │ │ │ -00002910: 756c 6c20 4755 4920 7375 7070 6f72 742e ull GUI support. │ │ │ -00002920: 2020 4974 2069 7320 7072 6f74 6563 7465 It is protecte │ │ │ -00002930: 645c 6e75 6e64 6572 2074 6865 2047 4e55 d\nunder the GNU │ │ │ -00002940: 2050 7562 6c69 6320 4c69 6365 6e73 6520 Public License │ │ │ -00002950: 616e 6420 7265 6c61 7465 6420 746f 206f and related to o │ │ │ -00002960: 7468 6572 2076 6572 7369 6f6e 7320 6f66 ther versions of │ │ │ -00002970: 2045 6d61 6373 2c20 696e 5c6e 7061 7274 Emacs, in\npart │ │ │ -00002980: 6963 756c 6172 2047 4e55 2045 6d61 6373 icular GNU Emacs │ │ │ -00002990: 2e20 2049 7473 2065 6d70 6861 7369 7320 . Its emphasis │ │ │ -000029a0: 6973 206f 6e20 6d6f 6465 726e 2067 7261 is on modern gra │ │ │ -000029b0: 7068 6963 616c 2075 7365 725c 6e69 6e74 phical user\nint │ │ │ -000029c0: 6572 6661 6365 2073 7570 706f 7274 2061 erface support a │ │ │ -000029d0: 6e64 2061 6e20 6f70 656e 2073 6f66 7477 nd an open softw │ │ │ -000029e0: 6172 6520 6465 7665 6c6f 706d 656e 7420 are development │ │ │ -000029f0: 6d6f 6465 6c2c 2073 696d 696c 6172 2074 model, similar t │ │ │ -00002a00: 6f5c 6e4c 696e 7578 2e20 2058 456d 6163 o\nLinux. XEmac │ │ │ -00002a10: 7320 6861 7320 616e 2061 6374 6976 6520 s has an active │ │ │ -00002a20: 6465 7665 6c6f 706d 656e 7420 636f 6d6d development comm │ │ │ -00002a30: 756e 6974 7920 6e75 6d62 6572 696e 6720 unity numbering │ │ │ -00002a40: 696e 2074 6865 5c6e 6875 6e64 7265 6473 in the\nhundreds │ │ │ -00002a50: 2028 616e 6420 7468 6f75 7361 6e64 7320 (and thousands │ │ │ -00002a60: 6f66 2061 6374 6976 6520 6265 7461 2074 of active beta t │ │ │ -00002a70: 6573 7465 7273 206f 6e20 746f 7020 6f66 esters on top of │ │ │ -00002a80: 2074 6869 7329 2c20 616e 6420 7275 6e73 this), and runs │ │ │ -00002a90: 5c6e 6f6e 2061 6c6c 2076 6572 7369 6f6e \non all version │ │ │ -00002aa0: 7320 6f66 204d 5320 5769 6e64 6f77 732c s of MS Windows, │ │ │ -00002ab0: 206f 6e20 4c69 6e75 782c 2061 6e64 206f on Linux, and o │ │ │ -00002ac0: 6e20 6e65 6172 6c79 2065 7665 7279 206f n nearly every o │ │ │ -00002ad0: 7468 6572 5c6e 7665 7273 696f 6e20 6f66 ther\nversion of │ │ │ -00002ae0: 2055 6e69 7820 696e 2065 7869 7374 656e Unix in existen │ │ │ -00002af0: 6365 2e20 2022 2022 416e 2058 456d 6163 ce. " "An XEmac │ │ │ -00002b00: 7320 6869 7374 6f72 7920 6c65 7373 6f6e s history lesson │ │ │ -00002b10: 2220 6162 6f75 742d 636f 6c6c 6162 6f72 " about-collabor │ │ │ -00002b20: 6174 696f 6e20 3a62 7574 746f 6e2d 7072 ation :button-pr │ │ │ -00002b30: 6566 6978 2022 2220 3a62 7574 746f 6e2d efix "" :button- │ │ │ -00002b40: 7375 6666 6978 2022 5375 7070 6f72 7420 suffix "Support │ │ │ -00002b50: 666f 7220 5845 6d61 6373 2220 2220 6861 for XEmacs" " ha │ │ │ -00002b60: 7320 6265 656e 2073 7570 706c 6965 6420 s been supplied │ │ │ -00002b70: 6279 5c6e 5375 6e20 4d69 6372 6f73 7973 by\nSun Microsys │ │ │ -00002b80: 7465 6d73 2c20 556e 6976 6572 7369 7479 tems, University │ │ │ -00002b90: 206f 6620 496c 6c69 6e6f 6973 2c20 4c75 of Illinois, Lu │ │ │ -00002ba0: 6369 642c 2045 544c 2f45 6c65 6374 726f cid, ETL/Electro │ │ │ -00002bb0: 7465 6368 6e69 6361 6c5c 6e4c 6162 6f72 technical\nLabor │ │ │ -00002bc0: 6174 6f72 792c 2041 6d64 6168 6c20 436f atory, Amdahl Co │ │ │ -00002bd0: 7270 6f72 6174 696f 6e2c 2042 654f 7065 rporation, BeOpe │ │ │ -00002be0: 6e2c 2061 6e64 206f 7468 6572 732c 2061 n, and others, a │ │ │ -00002bf0: 7320 7765 6c6c 2061 7320 7468 655c 6e75 s well as the\nu │ │ │ -00002c00: 6e70 6169 6420 7469 6d65 206f 6620 6120 npaid time of a │ │ │ -00002c10: 6772 6561 7420 6e75 6d62 6572 206f 6620 great number of │ │ │ -00002c20: 696e 6469 7669 6475 616c 2064 6576 656c individual devel │ │ │ -00002c30: 6f70 6572 732e 5c6e 5c6e 5845 6d61 6373 opers.\n\nXEmacs │ │ │ -00002c40: 2068 6173 206d 616e 7920 2220 2253 6565 has many " "See │ │ │ -00002c50: 2061 206c 6973 7420 6f66 2058 456d 6163 a list of XEmac │ │ │ -00002c60: 7320 6164 7661 6e74 6167 6573 206f 7665 s advantages ove │ │ │ -00002c70: 7220 474e 5520 456d 6163 7322 2061 626f r GNU Emacs" abo │ │ │ -00002c80: 7574 2d61 6476 616e 7461 6765 7320 2261 ut-advantages "a │ │ │ -00002c90: 6476 616e 7461 6765 7322 2022 206f 7665 dvantages" " ove │ │ │ -00002ca0: 7220 474e 5520 456d 6163 732e 2020 496e r GNU Emacs. In │ │ │ -00002cb0: 2061 6464 6974 696f 6e2c 2058 456d 6163 addition, XEmac │ │ │ -00002cc0: 7320 3231 2e34 5c6e 7072 6f76 6964 6573 s 21.4\nprovides │ │ │ -00002cd0: 206d 616e 7920 2220 2253 6565 2061 206c many " "See a l │ │ │ -00002ce0: 6973 7420 6f66 206e 6577 2066 6561 7475 ist of new featu │ │ │ -00002cf0: 7265 7320 696e 2058 456d 6163 7320 3231 res in XEmacs 21 │ │ │ -00002d00: 2e34 2220 226e 6577 2066 6561 7475 7265 .4" "new feature │ │ │ -00002d10: 7322 2022 206e 6f74 2066 6f75 6e64 2069 s" " not found i │ │ │ -00002d20: 6e20 7072 6576 696f 7573 2076 6572 7369 n previous versi │ │ │ -00002d30: 6f6e 7320 6f66 2058 456d 6163 732e 5c6e ons of XEmacs.\n │ │ │ -00002d40: 4d6f 7265 2064 6574 6169 6c73 206f 6e20 More details on │ │ │ -00002d50: 5845 6d61 6373 2773 2066 756e 6374 696f XEmacs's functio │ │ │ -00002d60: 6e61 6c69 7479 2c20 696e 636c 7564 696e nality, includin │ │ │ -00002d70: 6720 6275 6e64 6c65 6420 7061 636b 6167 g bundled packag │ │ │ -00002d80: 6573 2c20 6361 6e5c 6e62 6520 6f62 7461 es, can\nbe obta │ │ │ -00002d90: 696e 6564 2074 6872 6f75 6768 2074 6865 ined through the │ │ │ -00002da0: 2022 2069 6e66 6f2d 6c69 6e6b 2022 4272 " info-link "Br │ │ │ -00002db0: 6f77 7365 2074 6865 2069 6e66 6f20 7379 owse the info sy │ │ │ -00002dc0: 7374 656d 2220 3a74 6167 2022 696e 666f stem" :tag "info │ │ │ -00002dd0: 2220 2228 6469 7229 2220 2220 6f6e 2d6c " "(dir)" " on-l │ │ │ -00002de0: 696e 6520 696e 666f 726d 6174 696f 6e20 ine information │ │ │ -00002df0: 7379 7374 656d 2e5c 6e5c 6e54 6865 2058 system.\n\nThe X │ │ │ -00002e00: 456d 6163 7320 7765 6220 7061 6765 2063 Emacs web page c │ │ │ -00002e10: 616e 2062 6520 6272 6f77 7365 642c 2075 an be browsed, u │ │ │ -00002e20: 7369 6e67 2061 6e79 2057 5757 2062 726f sing any WWW bro │ │ │ -00002e30: 7773 6572 2061 745c 6e5c 6e09 0920 2020 wser at\n\n.. │ │ │ -00002e40: 2022 2061 626f 7574 2d75 726c 2d6c 696e " about-url-lin │ │ │ -00002e50: 6b20 7865 6d61 6373 2022 5669 7369 7420 k xemacs "Visit │ │ │ -00002e60: 5845 6d61 6373 2057 5757 2070 6167 6522 XEmacs WWW page" │ │ │ -00002e70: 2022 5c6e 5c6e 4e6f 7465 2074 6861 7420 "\n\nNote that │ │ │ -00002e80: 5733 2028 5845 6d61 6373 2773 206f 776e W3 (XEmacs's own │ │ │ -00002e90: 2062 726f 7773 6572 292c 206d 6967 6874 browser), might │ │ │ -00002ea0: 206e 6565 6420 6375 7374 6f6d 697a 6174 need customizat │ │ │ -00002eb0: 696f 6e20 2864 7565 2074 6f5c 6e66 6972 ion (due to\nfir │ │ │ -00002ec0: 6577 616c 6c73 2920 696e 206f 7264 6572 ewalls) in order │ │ │ -00002ed0: 2074 6f20 776f 726b 2063 6f72 7265 6374 to work correct │ │ │ -00002ee0: 6c79 2e5c 6e5c 6e58 456d 6163 7320 6973 ly.\n\nXEmacs is │ │ │ -00002ef0: 2074 6865 2072 6573 756c 7420 6f66 2074 the result of t │ │ │ -00002f00: 6865 2074 696d 6520 616e 6420 6566 666f he time and effo │ │ │ -00002f10: 7274 206f 6620 6d61 6e79 2070 656f 706c rt of many peopl │ │ │ -00002f20: 652e 2020 5468 655c 6e64 6576 656c 6f70 e. The\ndevelop │ │ │ -00002f30: 6572 7320 7265 7370 6f6e 7369 626c 6520 ers responsible │ │ │ -00002f40: 666f 7220 7468 6973 2072 656c 6561 7365 for this release │ │ │ -00002f50: 2061 7265 3a5c 6e5c 6e22 2066 626f 756e are:\n\n" fboun │ │ │ -00002f60: 6470 2073 6574 7570 2d70 6572 736f 6e20 dp setup-person │ │ │ -00002f70: 2828 6279 7465 2d63 6f64 6520 2209 ab86 ((byte-code "... │ │ │ -00002f80: c208 4d88 aa84 c3c2 2188 c287 2220 5b23 ..M.....!..." [# │ │ │ -00002f90: 313d 233a 2d2d 6c65 7466 2d73 6176 652d 1=#:--letf-save- │ │ │ -00002fa0: 2d39 3135 3135 2023 323d 233a 2d2d 6c65 -91515 #2=#:--le │ │ │ -00002fb0: 7466 2d62 6f75 6e64 2d2d 3931 3531 3620 tf-bound--91516 │ │ │ -00002fc0: 7365 7475 702d 7065 7273 6f6e 2066 6d61 setup-person fma │ │ │ -00002fd0: 6b75 6e62 6f75 6e64 5d20 3229 2920 235b kunbound] 2)) #[ │ │ │ -00002fe0: 2877 686f 2920 22c5 c621 880b 08b7 891a (who) "..!...... │ │ │ -00002ff0: 4140 1c5c 6e41 4140 19c7 c8c9 ca0c 50cb A@.\nAA@......P. │ │ │ -00003000: cccd ccce cfd0 0cd1 0b26 0d88 c5d2 d309 .........&...... │ │ │ -00003010: 5c22 212b 8722 205b 7865 6d61 6373 2d68 \"!+." [xemacs-h │ │ │ -00003020: 6163 6b65 7273 2061 6464 7265 7373 2065 ackers address e │ │ │ -00003030: 6e74 7279 2077 686f 206e 616d 6520 7769 ntry who name wi │ │ │ -00003040: 6467 6574 2d69 6e73 6572 7420 2209 2a20 dget-insert ".* │ │ │ -00003050: 2220 7769 6467 6574 2d63 7265 6174 6520 " widget-create │ │ │ -00003060: 6c69 6e6b 203a 6865 6c70 2d65 6368 6f20 link :help-echo │ │ │ -00003070: 2246 696e 6420 6f75 7420 6d6f 7265 2061 "Find out more a │ │ │ -00003080: 626f 7574 2022 203a 6275 7474 6f6e 2d70 bout " :button-p │ │ │ -00003090: 7265 6669 7820 2222 203a 6275 7474 6f6e refix "" :button │ │ │ -000030a0: 2d73 7566 6669 7820 3a61 6374 696f 6e20 -suffix :action │ │ │ -000030b0: 6162 6f75 742d 6d61 696e 7461 696e 6572 about-maintainer │ │ │ -000030c0: 203a 7461 6720 3a76 616c 7565 2066 6f72 :tag :value for │ │ │ -000030d0: 6d61 7420 2220 203c 2573 3e5c 6e22 5d20 mat " <%s>\n"] │ │ │ -000030e0: 3135 2022 5c6e 436f 6d6d 6f6e 204c 6973 15 "\nCommon Lis │ │ │ -000030f0: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ -00003100: 2020 286c 616d 6264 6120 5748 4f29 5c6e (lambda WHO)\n │ │ │ -00003110: 5c6e 225d 206d 6170 6320 656d 6163 732d \n"] mapc emacs- │ │ │ -00003120: 7061 7463 682d 6c65 7665 6c20 2332 2320 patch-level #2# │ │ │ -00003130: 2331 2320 6162 6f75 742d 6375 7272 656e #1# about-curren │ │ │ -00003140: 742d 7265 6c65 6173 652d 6d61 696e 7461 t-release-mainta │ │ │ -00003150: 696e 6572 7320 225c 6e09 2a20 2220 2241 iners "\n.* " "A │ │ │ -00003160: 206c 6567 696f 6e20 6f66 2058 456d 6163 legion of XEmac │ │ │ -00003170: 7320 6861 636b 6572 7322 2061 626f 7574 s hackers" about │ │ │ -00003180: 2d68 6163 6b65 7273 2022 5468 6520 6675 -hackers "The fu │ │ │ -00003190: 6c6c 206c 6973 7420 6f66 2063 6f6e 7472 ll list of contr │ │ │ -000031a0: 6962 7574 6f72 732e 2e2e 2220 225c 6e5c ibutors..." "\n\ │ │ │ -000031b0: 6e53 7465 7665 2042 6175 7220 7761 7320 nSteve Baur was │ │ │ -000031c0: 7468 6520 7072 696d 6172 7920 6d61 696e the primary main │ │ │ -000031d0: 7461 696e 6572 2066 6f72 2031 392e 3135 tainer for 19.15 │ │ │ -000031e0: 2074 6872 6f75 6768 2032 312e 302e 5c6e through 21.0.\n │ │ │ -000031f0: 5c6e 2220 736c 6220 225c 6e43 6875 636b \n" slb "\nChuck │ │ │ -00003200: 2054 686f 6d70 736f 6e20 616e 6420 4265 Thompson and Be │ │ │ -00003210: 6e20 5769 6e67 2077 6572 6520 7468 6520 n Wing were the │ │ │ -00003220: 6d61 696e 7461 696e 6572 7320 666f 7220 maintainers for │ │ │ -00003230: 3139 2e31 3120 7468 726f 7567 6820 3139 19.11 through 19 │ │ │ -00003240: 2e31 345c 6e61 6e64 2068 6561 7679 2063 .14\nand heavy c │ │ │ -00003250: 6f64 6520 636f 6e74 7269 6275 746f 7273 ode contributors │ │ │ -00003260: 2066 6f72 2031 392e 3820 7468 726f 7567 for 19.8 throug │ │ │ -00003270: 6820 3139 2e31 302e 5c6e 5c6e 2220 6374 h 19.10.\n\n" ct │ │ │ -00003280: 686f 6d70 2062 656e 2022 5c6e 4a61 6d69 homp ben "\nJami │ │ │ -00003290: 6520 5a61 7769 6e73 6b69 2077 6173 2074 e Zawinski was t │ │ │ -000032a0: 6865 206d 6169 6e74 6169 6e65 7220 666f he maintainer fo │ │ │ -000032b0: 7220 3139 2e30 2074 6872 6f75 6768 2031 r 19.0 through 1 │ │ │ -000032c0: 392e 3130 2028 7468 6520 656e 7469 7265 9.10 (the entire │ │ │ -000032d0: 5c6e 6869 7374 6f72 7920 6f66 204c 7563 \nhistory of Luc │ │ │ -000032e0: 6964 2045 6d61 6373 292e 5c6e 5c6e 2220 id Emacs).\n\n" │ │ │ -000032f0: 6a77 7a20 6162 6f75 742d 6669 6e69 7368 jwz about-finish │ │ │ -00003300: 2d62 7566 6665 7220 676f 746f 2d6c 696e -buffer goto-lin │ │ │ -00003310: 6520 325d 2031 3220 2823 2420 2e20 3934 e 2] 12 (#$ . 94 │ │ │ -00003320: 3437 2920 6e69 6c5d 290a 2864 6566 616c 47) nil]).(defal │ │ │ -00003330: 6961 7320 2761 626f 7574 2d6e 6577 7320 ias 'about-news │ │ │ -00003340: 235b 2826 7265 7374 2069 676e 6f72 6529 #[(&rest ignore) │ │ │ -00003350: 2022 c020 88c1 c2c3 c421 5c22 8722 205b ". .....!\"." [ │ │ │ -00003360: 7669 6577 2d65 6d61 6373 2d6e 6577 7320 view-emacs-news │ │ │ -00003370: 6d65 7373 6167 6520 2225 7322 2073 7562 message "%s" sub │ │ │ -00003380: 7374 6974 7574 652d 636f 6d6d 616e 642d stitute-command- │ │ │ -00003390: 6b65 7973 2022 5072 6573 7320 5c5c 5b6b keys "Press \\[k │ │ │ -000033a0: 696c 6c2d 6275 6666 6572 5d20 746f 2065 ill-buffer] to e │ │ │ -000033b0: 7869 7420 7468 6973 2062 7566 6665 7222 xit this buffer" │ │ │ -000033c0: 5d20 345d 290a 2864 6566 616c 6961 7320 ] 4]).(defalias │ │ │ -000033d0: 2761 626f 7574 2d63 6f6c 6c61 626f 7261 'about-collabora │ │ │ -000033e0: 7469 6f6e 2023 5b28 2672 6573 7420 6967 tion #[(&rest ig │ │ │ -000033f0: 6e6f 7265 2920 22c1 c221 3fad aec3 18c4 nore) "..!?..... │ │ │ -00003400: c5c6 0821 c708 c85c 2223 8829 c4c9 c7ca ...!...\"#.).... │ │ │ -00003410: cb5c 22cc c7cd cb5c 22ce c7cf cb5c 22d0 .\"....\"....\". │ │ │ -00003420: c7d1 cb5c 22d2 c7d3 cb5c 22d4 260b 88d5 ...\"....\".&... │ │ │ -00003430: 2087 2220 5b74 6974 6c65 2061 626f 7574 ." [title about │ │ │ -00003440: 2d67 6574 2d62 7566 6665 7220 222a 4162 -get-buffer "*Ab │ │ │ -00003450: 6f75 7420 436f 6c6c 6162 6f72 6174 696f out Collaboratio │ │ │ -00003460: 6e2a 2220 2257 6879 2041 6e6f 7468 6572 n*" "Why Another │ │ │ -00003470: 2056 6572 7369 6f6e 206f 6620 456d 6163 Version of Emac │ │ │ -00003480: 7322 2077 6964 6765 742d 696e 7365 7274 s" widget-insert │ │ │ -00003490: 2022 5c6e 2220 6162 6f75 742d 6365 6e74 "\n" about-cent │ │ │ -000034a0: 6572 2061 626f 7574 2d77 6974 682d 6661 er about-with-fa │ │ │ -000034b0: 6365 2062 6f6c 6420 225c 6e5c 6e22 2022 ce bold "\n\n" " │ │ │ -000034c0: 5468 6520 4c75 6369 642c 2049 6e63 2e20 The Lucid, Inc. │ │ │ -000034d0: 506f 696e 7420 6f66 2056 6965 7722 2069 Point of View" i │ │ │ -000034e0: 7461 6c69 6320 2220 2871 7569 7465 206f talic " (quite o │ │ │ -000034f0: 7574 6461 7465 6429 5c6e 5c6e 4174 2074 utdated)\n\nAt t │ │ │ -00003500: 6865 2074 696d 6520 6f66 2074 6865 2069 he time of the i │ │ │ -00003510: 6e63 6570 7469 6f6e 206f 6620 4c75 6369 nception of Luci │ │ │ -00003520: 6420 456d 6163 7320 2874 6865 2066 6f72 d Emacs (the for │ │ │ -00003530: 6d65 7220 6e61 6d65 206f 665c 6e58 456d mer name of\nXEm │ │ │ -00003540: 6163 7329 2c20 4c75 6369 6427 7320 6c61 acs), Lucid's la │ │ │ -00003550: 7465 7374 2070 726f 6475 6374 2077 6173 test product was │ │ │ -00003560: 2045 6e65 7267 697a 652c 2061 2043 2f43 Energize, a C/C │ │ │ -00003570: 2b2b 2064 6576 656c 6f70 6d65 6e74 5c6e ++ development\n │ │ │ -00003580: 656e 7669 726f 6e6d 656e 742e 2020 5261 environment. Ra │ │ │ -00003590: 7468 6572 2074 6861 6e20 696e 7665 6e74 ther than invent │ │ │ -000035a0: 2028 616e 6420 666f 7263 6520 6f75 7220 (and force our │ │ │ -000035b0: 7573 6572 7320 746f 206c 6561 726e 2920 users to learn) │ │ │ -000035c0: 6120 6e65 775c 6e75 7365 7220 696e 7465 a new\nuser inte │ │ │ -000035d0: 7266 6163 652c 2077 6520 6368 6f73 6520 rface, we chose │ │ │ -000035e0: 746f 2062 7569 6c64 2070 6172 7420 6f66 to build part of │ │ │ -000035f0: 206f 7572 2065 6e76 6972 6f6e 6d65 6e74 our environment │ │ │ -00003600: 206f 6e20 746f 7020 6f66 5c6e 7468 6520 on top of\nthe │ │ │ -00003610: 776f 726c 6427 7320 6265 7374 2065 6469 world's best edi │ │ │ -00003620: 746f 722c 2047 4e55 2045 6d61 6373 2e20 tor, GNU Emacs. │ │ │ -00003630: 2028 5468 6f75 6768 206f 7572 2070 726f (Though our pro │ │ │ -00003640: 6475 6374 2069 735c 6e63 6f6d 6d65 7263 duct is\ncommerc │ │ │ -00003650: 6961 6c2c 2074 6865 2077 6f72 6b20 7765 ial, the work we │ │ │ -00003660: 2064 6964 206f 6e20 474e 5520 456d 6163 did on GNU Emac │ │ │ -00003670: 7320 6973 2066 7265 6520 736f 6674 7761 s is free softwa │ │ │ -00003680: 7265 2c20 616e 6420 6973 5c6e 7573 6566 re, and is\nusef │ │ │ -00003690: 756c 2069 6e20 6974 7320 6f77 6e20 7269 ul in its own ri │ │ │ -000036a0: 6768 742e 295c 6e5c 6e57 6520 6e65 6564 ght.)\n\nWe need │ │ │ -000036b0: 6564 2061 2076 6572 7369 6f6e 206f 6620 ed a version of │ │ │ -000036c0: 456d 6163 7320 7769 7468 206d 6f75 7365 Emacs with mouse │ │ │ -000036d0: 2d73 656e 7369 7469 7665 2072 6567 696f -sensitive regio │ │ │ -000036e0: 6e73 2c20 6d75 6c74 6970 6c65 5c6e 666f ns, multiple\nfo │ │ │ -000036f0: 6e74 732c 2074 6865 2061 6269 6c69 7479 nts, the ability │ │ │ -00003700: 2074 6f20 6d61 726b 2073 6563 7469 6f6e to mark section │ │ │ -00003710: 7320 6f66 2061 2062 7566 6665 7220 6173 s of a buffer as │ │ │ -00003720: 2072 6561 642d 6f6e 6c79 2c20 7468 655c read-only, the\ │ │ │ -00003730: 6e61 6269 6c69 7479 2074 6f20 6465 7465 nability to dete │ │ │ -00003740: 6374 2077 6869 6368 2070 6172 7473 206f ct which parts o │ │ │ -00003750: 6620 6120 6275 6666 6572 2068 6176 6520 f a buffer have │ │ │ -00003760: 6265 656e 206d 6f64 6966 6965 642c 2061 been modified, a │ │ │ -00003770: 6e64 206d 616e 795c 6e6f 7468 6572 2066 nd many\nother f │ │ │ -00003780: 6561 7475 7265 732e 5c6e 5c6e 466f 7220 eatures.\n\nFor │ │ │ -00003790: 6f75 7220 7075 7270 6f73 6573 2c20 7468 our purposes, th │ │ │ -000037a0: 6520 6578 6973 7469 6e67 2076 6572 7369 e existing versi │ │ │ -000037b0: 6f6e 206f 6620 4570 6f63 6820 7761 7320 on of Epoch was │ │ │ -000037c0: 6e6f 7420 7375 6666 6963 6965 6e74 3b20 not sufficient; │ │ │ -000037d0: 6974 5c6e 6469 6420 6e6f 7420 616c 6c6f it\ndid not allo │ │ │ -000037e0: 7720 7573 2074 6f20 7075 7420 6172 6269 w us to put arbi │ │ │ -000037f0: 7472 6172 7920 7069 786d 6170 732f 6963 trary pixmaps/ic │ │ │ -00003800: 6f6e 7320 696e 2062 7566 6665 7273 2c20 ons in buffers, │ │ │ -00003810: 6075 6e64 6f27 2064 6964 5c6e 6e6f 7420 `undo' did\nnot │ │ │ -00003820: 7265 7374 6f72 6520 6368 616e 6765 7320 restore changes │ │ │ -00003830: 746f 2072 6567 696f 6e73 2c20 7265 6769 to regions, regi │ │ │ -00003840: 6f6e 7320 6469 6420 6e6f 7420 6f76 6572 ons did not over │ │ │ -00003850: 6c61 7020 616e 6420 6d65 7267 655c 6e74 lap and merge\nt │ │ │ -00003860: 6865 6972 2061 7474 7269 6275 7465 7320 heir attributes │ │ │ -00003870: 696e 2074 6865 2077 6179 2077 6520 6e65 in the way we ne │ │ │ -00003880: 6564 6564 2c20 616e 6420 7365 7665 7261 eded, and severa │ │ │ -00003890: 6c20 6f74 6865 7220 7468 696e 6773 2e5c l other things.\ │ │ │ -000038a0: 6e5c 6e57 6520 636f 756c 6420 6861 7665 n\nWe could have │ │ │ -000038b0: 2064 6576 6f74 6564 206f 7572 2074 696d devoted our tim │ │ │ -000038c0: 6520 746f 206d 616b 696e 6720 4570 6f63 e to making Epoc │ │ │ -000038d0: 6820 646f 2077 6861 7420 7765 206e 6565 h do what we nee │ │ │ -000038e0: 6465 6420 2861 6e64 2c5c 6e69 6e20 6661 ded (and,\nin fa │ │ │ -000038f0: 6374 2c20 7765 2073 7065 6e74 2073 6f6d ct, we spent som │ │ │ -00003900: 6520 7469 6d65 2064 6f69 6e67 2074 6861 e time doing tha │ │ │ -00003910: 7420 696e 2031 3939 3029 2062 7574 2c20 t in 1990) but, │ │ │ -00003920: 7369 6e63 6520 7468 6520 4653 465c 6e70 since the FSF\np │ │ │ -00003930: 6c61 6e6e 6564 2074 6f20 696e 636c 7564 lanned to includ │ │ │ -00003940: 6520 4570 6f63 682d 6c69 6b65 2066 6561 e Epoch-like fea │ │ │ -00003950: 7475 7265 7320 696e 2074 6865 6972 2076 tures in their v │ │ │ -00003960: 6572 7369 6f6e 2031 392c 2077 6520 6465 ersion 19, we de │ │ │ -00003970: 6369 6465 645c 6e74 6861 7420 6f75 7220 cided\nthat our │ │ │ -00003980: 6566 666f 7274 7320 776f 756c 6420 6265 efforts would be │ │ │ -00003990: 2062 6574 7465 7220 7370 656e 7420 696d better spent im │ │ │ -000039a0: 7072 6f76 696e 6720 456d 6163 7320 3139 proving Emacs 19 │ │ │ -000039b0: 2069 6e73 7465 6164 206f 665c 6e45 706f instead of\nEpo │ │ │ -000039c0: 6368 2e5c 6e5c 6e4f 7572 206f 7269 6769 ch.\n\nOur origi │ │ │ -000039d0: 6e61 6c20 686f 7065 2077 6173 2074 6861 nal hope was tha │ │ │ -000039e0: 7420 6f75 7220 6368 616e 6765 7320 746f t our changes to │ │ │ -000039f0: 2045 6d61 6373 2077 6f75 6c64 2062 6520 Emacs would be │ │ │ -00003a00: 696e 636f 7270 6f72 6174 6564 5c6e 696e incorporated\nin │ │ │ -00003a10: 746f 2074 6865 205c 226f 6666 6963 6961 to the \"officia │ │ │ -00003a20: 6c5c 2220 7631 392e 2020 486f 7765 7665 l\" v19. Howeve │ │ │ -00003a30: 722c 2073 6368 6564 756c 696e 6720 636f r, scheduling co │ │ │ -00003a40: 6e66 6c69 6374 7320 6172 6f73 652c 2061 nflicts arose, a │ │ │ -00003a50: 6e64 5c6e 7765 2066 6f75 6e64 2074 6861 nd\nwe found tha │ │ │ -00003a60: 742c 2067 6976 656e 2074 6865 2061 6d6f t, given the amo │ │ │ -00003a70: 756e 7420 6f66 2077 6f72 6b20 7374 696c unt of work stil │ │ │ -00003a80: 6c20 7265 6d61 696e 696e 6720 746f 2062 l remaining to b │ │ │ -00003a90: 6520 646f 6e65 2c20 7765 5c6e 6469 646e e done, we\ndidn │ │ │ -00003aa0: 2774 2068 6176 6520 7468 6520 7469 6d65 't have the time │ │ │ -00003ab0: 206f 7220 6d61 6e70 6f77 6572 2074 6f20 or manpower to │ │ │ -00003ac0: 646f 2074 6865 206c 6576 656c 206f 6620 do the level of │ │ │ -00003ad0: 636f 6f72 6469 6e61 7469 6f6e 2074 6861 coordination tha │ │ │ -00003ae0: 745c 6e77 6f75 6c64 2062 6520 6e65 6365 t\nwould be nece │ │ │ -00003af0: 7373 6172 7920 746f 2067 6574 206f 7572 ssary to get our │ │ │ -00003b00: 2063 6861 6e67 6573 2061 6363 6570 7465 changes accepte │ │ │ -00003b10: 6420 6279 2074 6865 2046 5346 2e5c 6e43 d by the FSF.\nC │ │ │ -00003b20: 6f6e 7365 7175 656e 746c 792c 2077 6520 onsequently, we │ │ │ -00003b30: 7265 6c65 6173 6564 206f 7572 2077 6f72 released our wor │ │ │ -00003b40: 6b20 6173 2061 2066 6f72 6b65 6420 6272 k as a forked br │ │ │ -00003b50: 616e 6368 206f 6620 456d 6163 732c 5c6e anch of Emacs,\n │ │ │ -00003b60: 696e 7374 6561 6420 6f66 2064 656c 6179 instead of delay │ │ │ -00003b70: 696e 6720 616e 7920 6c6f 6e67 6572 2e5c ing any longer.\ │ │ │ -00003b80: 6e5c 6e52 6f75 6768 6c79 2061 2079 6561 n\nRoughly a yea │ │ │ -00003b90: 7220 6166 7465 7220 4c75 6369 6420 456d r after Lucid Em │ │ │ -00003ba0: 6163 7320 3139 2e30 2077 6173 2072 656c acs 19.0 was rel │ │ │ -00003bb0: 6561 7365 642c 2061 2062 6574 6120 7665 eased, a beta ve │ │ │ -00003bc0: 7273 696f 6e20 6f66 5c6e 7468 6520 4653 rsion of\nthe FS │ │ │ -00003bd0: 4620 6272 616e 6368 206f 6620 456d 6163 F branch of Emac │ │ │ -00003be0: 7320 3139 2077 6173 2072 656c 6561 7365 s 19 was release │ │ │ -00003bf0: 642e 2020 5468 6520 4653 4620 7665 7273 d. The FSF vers │ │ │ -00003c00: 696f 6e20 6973 2062 6574 7465 7220 696e ion is better in │ │ │ -00003c10: 5c6e 736f 6d65 2061 7265 6173 2c20 616e \nsome areas, an │ │ │ -00003c20: 6420 776f 7273 6520 696e 206f 7468 6572 d worse in other │ │ │ -00003c30: 732c 2061 7320 7265 666c 6563 7473 2074 s, as reflects t │ │ │ -00003c40: 6865 2064 6966 6665 7269 6e67 2066 6f63 he differing foc │ │ │ -00003c50: 7573 206f 665c 6e6f 7572 2064 6576 656c us of\nour devel │ │ │ -00003c60: 6f70 6d65 6e74 2065 6666 6f72 7473 2e5c opment efforts.\ │ │ │ -00003c70: 6e5c 6e57 6520 706c 616e 2074 6f20 636f n\nWe plan to co │ │ │ -00003c80: 6e74 696e 7565 2064 6576 656c 6f70 696e ntinue developin │ │ │ -00003c90: 6720 616e 6420 7375 7070 6f72 7469 6e67 g and supporting │ │ │ -00003ca0: 204c 7563 6964 2045 6d61 6373 2c20 616e Lucid Emacs, an │ │ │ -00003cb0: 6420 6d65 7267 696e 675c 6e69 6e20 6275 d merging\nin bu │ │ │ -00003cc0: 6720 6669 7865 7320 616e 6420 6e65 7720 g fixes and new │ │ │ -00003cd0: 6665 6174 7572 6573 2066 726f 6d20 7468 features from th │ │ │ -00003ce0: 6520 4653 4620 6272 616e 6368 2061 7320 e FSF branch as │ │ │ -00003cf0: 6170 7072 6f70 7269 6174 653b 2077 655c appropriate; we\ │ │ │ -00003d00: 6e64 6f20 6e6f 7420 706c 616e 2074 6f20 ndo not plan to │ │ │ -00003d10: 6469 7363 6172 6420 616e 7920 6f66 2074 discard any of t │ │ │ -00003d20: 6865 2066 756e 6374 696f 6e61 6c69 7479 he functionality │ │ │ -00003d30: 2074 6861 7420 7765 2069 6d70 6c65 6d65 that we impleme │ │ │ -00003d40: 6e74 6564 5c6e 7768 6963 6820 524d 5320 nted\nwhich RMS │ │ │ -00003d50: 6861 7320 6368 6f73 656e 206e 6f74 2074 has chosen not t │ │ │ -00003d60: 6f20 696e 636c 7564 6520 696e 2068 6973 o include in his │ │ │ -00003d70: 2076 6572 7369 6f6e 2e5c 6e5c 6e43 6572 version.\n\nCer │ │ │ -00003d80: 7461 696e 2065 6c65 6d65 6e74 7320 6f66 tain elements of │ │ │ -00003d90: 204c 7563 6964 2045 6d61 6373 2c20 6f72 Lucid Emacs, or │ │ │ -00003da0: 2064 6572 6976 6174 6976 6573 206f 6620 derivatives of │ │ │ -00003db0: 7468 656d 2c20 6861 7665 2062 6565 6e5c them, have been\ │ │ │ -00003dc0: 6e70 6f72 7465 6420 746f 2074 6865 2046 nported to the F │ │ │ -00003dd0: 5346 2076 6572 7369 6f6e 2e20 2057 6520 SF version. We │ │ │ -00003de0: 6861 7665 206e 6f74 2062 6565 6e20 646f have not been do │ │ │ -00003df0: 696e 6720 776f 726b 2069 6e20 7468 6973 ing work in this │ │ │ -00003e00: 5c6e 6469 7265 6374 696f 6e2c 2062 6563 \ndirection, bec │ │ │ -00003e10: 6175 7365 2077 6520 6665 656c 2074 6861 ause we feel tha │ │ │ -00003e20: 7420 4c75 6369 6420 456d 6163 7320 6861 t Lucid Emacs ha │ │ │ -00003e30: 7320 6120 636c 6561 6e65 7220 616e 6420 s a cleaner and │ │ │ -00003e40: 6d6f 7265 5c6e 6578 7465 6e73 6962 6c65 more\nextensible │ │ │ -00003e50: 2073 7562 7374 7261 7465 2c20 616e 6420 substrate, and │ │ │ -00003e60: 7468 6174 2061 6e79 206b 696e 6420 6f66 that any kind of │ │ │ -00003e70: 206d 6572 6765 7220 6265 7477 6565 6e20 merger between │ │ │ -00003e80: 7468 6520 7477 6f5c 6e62 7261 6e63 6865 the two\nbranche │ │ │ -00003e90: 7320 776f 756c 6420 6265 2066 6172 2065 s would be far e │ │ │ -00003ea0: 6173 6965 7220 6279 206d 6572 6769 6e67 asier by merging │ │ │ -00003eb0: 2074 6865 2046 5346 2063 6861 6e67 6573 the FSF changes │ │ │ -00003ec0: 2069 6e74 6f20 6f75 725c 6e76 6572 7369 into our\nversi │ │ │ -00003ed0: 6f6e 2074 6861 6e20 7468 6520 6f74 6865 on than the othe │ │ │ -00003ee0: 7220 7761 7920 6172 6f75 6e64 2e5c 6e5c r way around.\n\ │ │ │ -00003ef0: 6e57 6520 6861 7665 2062 6565 6e20 776f nWe have been wo │ │ │ -00003f00: 726b 696e 6720 636c 6f73 656c 7920 7769 rking closely wi │ │ │ -00003f10: 7468 2074 6865 2045 706f 6368 2064 6576 th the Epoch dev │ │ │ -00003f20: 656c 6f70 6572 7320 746f 206d 6572 6765 elopers to merge │ │ │ -00003f30: 2069 6e20 7468 655c 6e72 656d 6169 6e69 in the\nremaini │ │ │ -00003f40: 6e67 2045 706f 6368 2066 756e 6374 696f ng Epoch functio │ │ │ -00003f50: 6e61 6c69 7479 2077 6869 6368 204c 7563 nality which Luc │ │ │ -00003f60: 6964 2045 6d61 6373 2064 6f65 7320 6e6f id Emacs does no │ │ │ -00003f70: 7420 7965 7420 6861 7665 2e5c 6e45 706f t yet have.\nEpo │ │ │ -00003f80: 6368 2061 6e64 204c 7563 6964 2045 6d61 ch and Lucid Ema │ │ │ -00003f90: 6373 2077 696c 6c20 736f 6f6e 2062 6520 cs will soon be │ │ │ -00003fa0: 6f6e 6520 616e 6420 7468 6520 7361 6d65 one and the same │ │ │ -00003fb0: 2074 6869 6e67 2e20 2057 6f72 6b20 6973 thing. Work is │ │ │ -00003fc0: 5c6e 6265 696e 6720 646f 6e65 206f 6e20 \nbeing done on │ │ │ -00003fd0: 6120 636f 6d70 6174 6962 696c 6974 7920 a compatibility │ │ │ -00003fe0: 7061 636b 6167 6520 7768 6963 6820 7769 package which wi │ │ │ -00003ff0: 6c6c 2061 6c6c 6f77 2045 706f 6368 2034 ll allow Epoch 4 │ │ │ -00004000: 2063 6f64 6520 746f 5c6e 7275 6e20 696e code to\nrun in │ │ │ -00004010: 2058 456d 6163 7320 7769 7468 206c 6974 XEmacs with lit │ │ │ -00004020: 746c 6520 6f72 206e 6f20 6368 616e 6765 tle or no change │ │ │ -00004030: 2e5c 6e5c 6e22 2022 5468 6520 5375 6e20 .\n\n" "The Sun │ │ │ -00004040: 4d69 6372 6f73 7973 7465 6d73 2c20 496e Microsystems, In │ │ │ -00004050: 632e 2050 6f69 6e74 206f 6620 5669 6577 c. Point of View │ │ │ -00004060: 2220 225c 6e5c 6e45 6d61 6373 2031 3820 " "\n\nEmacs 18 │ │ │ -00004070: 6861 7320 6265 656e 2061 726f 756e 6420 has been around │ │ │ -00004080: 666f 7220 6120 6c6f 6e67 2c20 6c6f 6e67 for a long, long │ │ │ -00004090: 2074 696d 652e 2020 5665 7273 696f 6e20 time. Version │ │ │ -000040a0: 3139 2077 6173 5c6e 7375 7070 6f73 6564 19 was\nsupposed │ │ │ -000040b0: 2074 6f20 6265 2074 6865 2073 7563 6365 to be the succe │ │ │ -000040c0: 7373 6f72 2074 6f20 7631 3820 7769 7468 ssor to v18 with │ │ │ -000040d0: 2058 2073 7570 706f 7274 2e20 2049 7420 X support. It │ │ │ -000040e0: 7761 7320 676f 696e 6720 746f 5c6e 6265 was going to\nbe │ │ │ -000040f0: 2061 7661 696c 6162 6c65 205c 2272 6561 available \"rea │ │ │ -00004100: 6c20 736f 6f6e 5c22 2066 6f72 2061 206c l soon\" for a l │ │ │ -00004110: 6f6e 6720 7469 6d65 2028 736f 6d65 2070 ong time (some p │ │ │ -00004120: 656f 706c 6520 7265 6d65 6d62 6572 5c6e eople remember\n │ │ │ -00004130: 6865 6172 696e 6720 6162 6f75 7420 7631 hearing about v1 │ │ │ -00004140: 3920 6173 2065 6172 6c79 2061 7320 3139 9 as early as 19 │ │ │ -00004150: 3834 2129 2c20 6275 7420 6974 206e 6576 84!), but it nev │ │ │ -00004160: 6572 2063 616d 6520 6f75 742e 2020 7631 er came out. v1 │ │ │ -00004170: 395c 6e64 6576 656c 6f70 6d65 6e74 2077 9\ndevelopment w │ │ │ -00004180: 6173 2067 6f69 6e67 2076 6572 792c 2076 as going very, v │ │ │ -00004190: 6572 7920 736c 6f77 6c79 2c20 616e 6420 ery slowly, and │ │ │ -000041a0: 6672 6f6d 2074 6865 206f 7574 7369 6465 from the outside │ │ │ -000041b0: 2069 745c 6e73 6565 6d65 6420 7468 6174 it\nseemed that │ │ │ -000041c0: 2069 7420 7761 7320 6e6f 7420 6d6f 7669 it was not movi │ │ │ -000041d0: 6e67 2061 7420 616c 6c2e 2020 496e 2074 ng at all. In t │ │ │ -000041e0: 6865 206d 6561 6e74 696d 6520 6f74 6865 he meantime othe │ │ │ -000041f0: 7220 7065 6f70 6c65 5c6e 6761 7665 2075 r people\ngave u │ │ │ -00004200: 7020 7761 6974 696e 6720 666f 7220 7631 p waiting for v1 │ │ │ -00004210: 3920 616e 6420 6465 6369 6465 6420 746f 9 and decided to │ │ │ -00004220: 2062 7569 6c64 2074 6865 6972 206f 776e build their own │ │ │ -00004230: 2058 2d61 7761 7265 5c6e 456d 6163 7365 X-aware\nEmacse │ │ │ -00004240: 6e2e 2020 5468 6520 6d6f 7374 2069 6d70 n. The most imp │ │ │ -00004250: 6f72 7461 6e74 206f 6620 7468 6573 6520 ortant of these │ │ │ -00004260: 7761 7320 7072 6f62 6162 6c79 2045 706f was probably Epo │ │ │ -00004270: 6368 2c20 7768 6963 6820 6361 6d65 5c6e ch, which came\n │ │ │ -00004280: 6672 6f6d 2074 6865 2055 6e69 7665 7273 from the Univers │ │ │ -00004290: 6974 7920 6f66 2049 6c6c 696e 6f69 7320 ity of Illinois │ │ │ -000042a0: 285c 2255 6f66 495c 2229 2061 6e64 2077 (\"UofI\") and w │ │ │ -000042b0: 6173 2062 6173 6564 206f 6e20 7631 382e as based on v18. │ │ │ -000042c0: 5c6e 5c6e 4172 6f75 6e64 2031 3939 302c \n\nAround 1990, │ │ │ -000042d0: 2074 6865 2044 6576 656c 6f70 6572 2050 the Developer P │ │ │ -000042e0: 726f 6475 6374 7320 6772 6f75 7020 7769 roducts group wi │ │ │ -000042f0: 7468 696e 2053 756e 204d 6963 726f 7379 thin Sun Microsy │ │ │ -00004300: 7374 656d 735c 6e49 6e63 2e2c 2064 6563 stems\nInc., dec │ │ │ -00004310: 6964 6564 2074 6861 7420 6974 2077 616e ided that it wan │ │ │ -00004320: 7465 6420 616e 2069 6e74 6567 7261 7465 ted an integrate │ │ │ -00004330: 6420 6564 6974 6f72 2e20 2028 5468 6973 d editor. (This │ │ │ -00004340: 2067 726f 7570 2069 7320 6e6f 775c 6e6b group is now\nk │ │ │ -00004350: 6e6f 776e 2061 7320 4465 7650 726f 2e20 nown as DevPro. │ │ │ -00004360: 2049 7420 7573 6564 2074 6f20 6265 206b It used to be k │ │ │ -00004370: 6e6f 776e 2061 7320 5375 6e50 726f 202d nown as SunPro - │ │ │ -00004380: 2074 6865 206e 616d 6520 7761 7320 6368 the name was ch │ │ │ -00004390: 616e 6765 645c 6e69 6e20 6d69 642d 3139 anged\nin mid-19 │ │ │ -000043a0: 3934 2e29 2020 5468 6579 2063 6f6e 7472 94.) They contr │ │ │ -000043b0: 6163 7465 6420 7769 7468 2074 6865 2055 acted with the U │ │ │ -000043c0: 6e69 7665 7273 6974 7920 6f66 2049 6c6c niversity of Ill │ │ │ -000043d0: 696e 6f69 7320 746f 5c6e 7072 6f76 6964 inois to\nprovid │ │ │ -000043e0: 6520 6120 6e75 6d62 6572 206f 6620 6261 e a number of ba │ │ │ -000043f0: 7369 6320 656e 6861 6e63 656d 656e 7473 sic enhancements │ │ │ -00004400: 2074 6f20 7468 6520 6675 6e63 7469 6f6e to the function │ │ │ -00004410: 616c 6974 7920 696e 2045 706f 6368 2e5c ality in Epoch.\ │ │ │ -00004420: 6e55 6f66 4920 696e 6974 6961 6c6c 7920 nUofI initially │ │ │ -00004430: 7761 7320 706c 616e 6e69 6e67 2074 6f20 was planning to │ │ │ -00004440: 6465 6c69 7665 7220 7468 6973 206f 6e20 deliver this on │ │ │ -00004450: 746f 7020 6f66 2045 706f 6368 2063 6f64 top of Epoch cod │ │ │ -00004460: 652e 5c6e 5c6e 496e 2074 6865 206d 6561 e.\n\nIn the mea │ │ │ -00004470: 6e74 696d 652c 2028 6163 7475 616c 6c79 ntime, (actually │ │ │ -00004480: 2073 6f6d 6520 7469 6d65 2062 6566 6f72 some time befor │ │ │ -00004490: 6520 7468 6579 2074 616c 6b65 6420 7769 e they talked wi │ │ │ -000044a0: 7468 2055 6f66 4929 5c6e 4c75 6369 6420 th UofI)\nLucid │ │ │ -000044b0: 6861 6420 6465 6369 6465 6420 7468 6174 had decided that │ │ │ -000044c0: 2069 7420 616c 736f 2077 616e 7465 6420 it also wanted │ │ │ -000044d0: 746f 2070 726f 7669 6465 2061 6e20 696e to provide an in │ │ │ -000044e0: 7465 6772 6174 6564 5c6e 656e 7669 726f tegrated\nenviro │ │ │ -000044f0: 6e6d 656e 7420 7769 7468 2061 6e20 696e nment with an in │ │ │ -00004500: 7465 6772 6174 6564 2065 6469 746f 722e tegrated editor. │ │ │ -00004510: 2020 4c75 6369 6420 6465 6369 6465 6420 Lucid decided │ │ │ -00004520: 7468 6174 2074 6865 2056 6572 7369 6f6e that the Version │ │ │ -00004530: 5c6e 3139 2062 6173 6520 7761 7320 6120 \n19 base was a │ │ │ -00004540: 6265 7474 6572 206f 6e65 2074 6861 6e20 better one than │ │ │ -00004550: 5665 7273 696f 6e20 3138 2061 6e64 2074 Version 18 and t │ │ │ -00004560: 6875 7320 6465 6369 6465 6420 6e6f 7420 hus decided not │ │ │ -00004570: 746f 2075 7365 5c6e 4570 6f63 6820 6275 to use\nEpoch bu │ │ │ -00004580: 7420 696e 7374 6561 6420 746f 2077 6f72 t instead to wor │ │ │ -00004590: 6b20 7769 7468 2052 6963 6861 7264 2053 k with Richard S │ │ │ -000045a0: 7461 6c6c 6d61 6e2c 2074 6865 2068 6561 tallman, the hea │ │ │ -000045b0: 6420 6f66 2074 6865 2046 7265 655c 6e53 d of the Free\nS │ │ │ -000045c0: 6f66 7477 6172 6520 466f 756e 6461 7469 oftware Foundati │ │ │ -000045d0: 6f6e 2061 6e64 2070 7269 6e63 6970 616c on and principal │ │ │ -000045e0: 2061 7574 686f 7220 6f66 2045 6d61 6373 author of Emacs │ │ │ -000045f0: 2c20 6f6e 2067 6574 7469 6e67 2076 3139 , on getting v19 │ │ │ -00004600: 206f 7574 2e5c 6e41 7420 736f 6d65 2070 out.\nAt some p │ │ │ -00004610: 6f69 6e74 2053 7461 6c6c 6d61 6e20 616e oint Stallman an │ │ │ -00004620: 6420 4c75 6369 6420 7061 7274 6564 2077 d Lucid parted w │ │ │ -00004630: 6179 732e 2020 4c75 6369 6420 6b65 7074 ays. Lucid kept │ │ │ -00004640: 2077 6f72 6b69 6e67 2061 6e64 5c6e 676f working and\ngo │ │ │ -00004650: 7420 6120 7631 3920 6f75 7420 7468 6174 t a v19 out that │ │ │ -00004660: 2074 6865 7920 6361 6c6c 6564 204c 7563 they called Luc │ │ │ -00004670: 6964 2045 6d61 6373 2031 392e 5c6e 5c6e id Emacs 19.\n\n │ │ │ -00004680: 4166 7465 7220 4c75 6369 6427 7320 7631 After Lucid's v1 │ │ │ -00004690: 3920 6361 6d65 206f 7574 2069 7420 6265 9 came out it be │ │ │ -000046a0: 6361 6d65 2063 6c65 6172 2074 6f20 7573 came clear to us │ │ │ -000046b0: 2028 7468 6520 556f 6649 2061 6e64 2053 (the UofI and S │ │ │ -000046c0: 756e 295c 6e74 6861 7420 7468 6520 7269 un)\nthat the ri │ │ │ -000046d0: 6768 7420 7468 696e 6720 746f 2064 6f20 ght thing to do │ │ │ -000046e0: 7761 7320 746f 2070 7573 6820 666f 7220 was to push for │ │ │ -000046f0: 616e 2069 6e74 6567 7261 7469 6f6e 206f an integration o │ │ │ -00004700: 6620 626f 7468 5c6e 4c75 6369 6420 456d f both\nLucid Em │ │ │ -00004710: 6163 7320 616e 6420 4570 6f63 682c 2061 acs and Epoch, a │ │ │ -00004720: 6e64 2074 6f20 6765 7420 7468 6520 6465 nd to get the de │ │ │ -00004730: 6c69 7665 7261 626c 6573 2074 6861 7420 liverables that │ │ │ -00004740: 5375 6e20 7761 7320 6173 6b69 6e67 5c6e Sun was asking\n │ │ │ -00004750: 6672 6f6d 2074 6865 2055 6e69 7665 7273 from the Univers │ │ │ -00004760: 6974 7920 6f66 2049 6c6c 696e 6f69 7320 ity of Illinois │ │ │ -00004770: 6f6e 2074 6f70 206f 6620 7468 6973 2069 on top of this i │ │ │ -00004780: 6e74 6567 7261 7465 6420 706c 6174 666f ntegrated platfo │ │ │ -00004790: 726d 2e5c 6e55 6e74 696c 2031 3939 342c rm.\nUntil 1994, │ │ │ -000047a0: 2053 756e 2061 6e64 204c 7563 6964 2062 Sun and Lucid b │ │ │ -000047b0: 6f74 6820 6163 7469 7665 6c79 2073 7570 oth actively sup │ │ │ -000047c0: 706f 7274 6564 2058 456d 6163 7320 6173 ported XEmacs as │ │ │ -000047d0: 2070 6172 7420 6f66 5c6e 7468 6569 7220 part of\ntheir │ │ │ -000047e0: 7072 6f64 7563 7420 7375 6974 6520 616e product suite an │ │ │ -000047f0: 6420 696e 7665 7374 6564 2061 2063 6f6d d invested a com │ │ │ -00004800: 7061 7261 626c 6520 616d 6f75 6e74 206f parable amount o │ │ │ -00004810: 6620 6566 666f 7274 2069 6e74 6f5c 6e69 f effort into\ni │ │ │ -00004820: 742e 2020 5375 6273 7461 6e74 6961 6c20 t. Substantial │ │ │ -00004830: 706f 7274 696f 6e73 206f 6620 7468 6520 portions of the │ │ │ -00004840: 6375 7272 656e 7420 636f 6465 2068 6176 current code hav │ │ │ -00004850: 6520 6f72 6967 696e 6174 6564 2075 6e64 e originated und │ │ │ -00004860: 6572 5c6e 7468 6520 7375 7070 6f72 7420 er\nthe support │ │ │ -00004870: 6f66 2053 756e 2c20 6569 7468 6572 2064 of Sun, either d │ │ │ -00004880: 6972 6563 746c 7920 7769 7468 696e 2053 irectly within S │ │ │ -00004890: 756e 2c20 6f72 2061 7420 556f 6649 2062 un, or at UofI b │ │ │ -000048a0: 7574 2070 6169 645c 6e66 6f72 2062 7920 ut paid\nfor by │ │ │ -000048b0: 5375 6e2e 2020 5468 6973 2063 6f64 6520 Sun. This code │ │ │ -000048c0: 7761 7320 6b65 7074 2061 7761 7920 6672 was kept away fr │ │ │ -000048d0: 6f6d 204c 7563 6964 2066 6f72 2061 2077 om Lucid for a w │ │ │ -000048e0: 6869 6c65 2c20 6275 7420 6c61 7465 725c hile, but later\ │ │ │ -000048f0: 6e77 6173 206d 6164 6520 6176 6169 6c61 nwas made availa │ │ │ -00004900: 626c 6520 746f 2074 6865 6d2e 2020 496e ble to them. In │ │ │ -00004910: 6974 6961 6c6c 7920 4c75 6369 6420 6469 itially Lucid di │ │ │ -00004920: 646e 2774 206b 6e6f 7720 7468 6174 2053 dn't know that S │ │ │ -00004930: 756e 2077 6173 5c6e 7375 7070 6f72 7469 un was\nsupporti │ │ │ -00004940: 6e67 2055 6f66 492c 2062 7574 206c 6174 ng UofI, but lat │ │ │ -00004950: 6572 2053 756e 2077 6173 206f 7065 6e20 er Sun was open │ │ │ -00004960: 6162 6f75 7420 6974 2e5c 6e5c 6e41 726f about it.\n\nAro │ │ │ -00004970: 756e 6420 3139 3932 2044 6576 5072 6f2d und 1992 DevPro- │ │ │ -00004980: 6f72 6967 696e 6174 6564 2063 6f64 6520 originated code │ │ │ -00004990: 7374 6172 7465 6420 7368 6f77 696e 6720 started showing │ │ │ -000049a0: 7570 2069 6e20 4c75 6369 6420 456d 6163 up in Lucid Emac │ │ │ -000049b0: 732c 5c6e 7374 6172 7469 6e67 2077 6974 s,\nstarting wit │ │ │ -000049c0: 6820 7468 6520 696e 6675 7369 6f6e 206f h the infusion o │ │ │ -000049d0: 6620 7468 6520 4570 6f63 6820 7265 6469 f the Epoch redi │ │ │ -000049e0: 7370 6c61 7920 636f 6465 2e20 2054 6865 splay code. The │ │ │ -000049f0: 2073 6570 6172 6174 655c 6e63 6f64 6520 separate\ncode │ │ │ -00004a00: 6261 7365 7320 6174 204c 7563 6964 2c20 bases at Lucid, │ │ │ -00004a10: 5375 6e2c 2061 6e64 2074 6865 2055 6e69 Sun, and the Uni │ │ │ -00004a20: 7665 7273 6974 7920 6f66 2049 6c6c 696e versity of Illin │ │ │ -00004a30: 6f69 7320 7765 7265 206d 6572 6765 642c ois were merged, │ │ │ -00004a40: 5c6e 616c 6c6f 7769 6e67 2061 2073 696e \nallowing a sin │ │ │ -00004a50: 676c 6520 5845 6d61 6373 2074 6f20 6576 gle XEmacs to ev │ │ │ -00004a60: 6f6c 7665 2066 726f 6d20 7468 6174 2070 olve from that p │ │ │ -00004a70: 6f69 6e74 206f 6e2e 5c6e 5c6e 5375 6e20 oint on.\n\nSun │ │ │ -00004a80: 6f72 6967 696e 616c 6c79 2063 616c 6c65 originally calle │ │ │ -00004a90: 6420 7468 6520 696e 7465 6772 6174 6564 d the integrated │ │ │ -00004aa0: 2070 726f 6475 6374 2045 5241 2c20 666f product ERA, fo │ │ │ -00004ab0: 7220 5c22 456d 6163 735c 6e52 6577 7269 r \"Emacs\nRewri │ │ │ -00004ac0: 7474 656e 2041 6761 696e 5c22 2e20 2053 tten Again\". S │ │ │ -00004ad0: 756e 5072 6f20 616e 6420 4c75 6369 6420 unPro and Lucid │ │ │ -00004ae0: 6576 656e 7475 616c 6c79 2063 616d 6520 eventually came │ │ │ -00004af0: 746f 2061 6e20 6167 7265 656d 656e 745c to an agreement\ │ │ │ -00004b00: 6e74 6f20 6669 6e64 2061 206e 616d 6520 nto find a name │ │ │ -00004b10: 666f 7220 7468 6520 7072 6f64 7563 7420 for the product │ │ │ -00004b20: 7468 6174 2077 6173 206e 6f74 2073 7065 that was not spe │ │ │ -00004b30: 6369 6669 6320 746f 2065 6974 6865 725c cific to either\ │ │ │ -00004b40: 6e63 6f6d 7061 6e79 2e20 2041 6e20 6164 ncompany. An ad │ │ │ -00004b50: 6469 7469 6f6e 616c 2063 6f6e 7374 7261 ditional constra │ │ │ -00004b60: 696e 7420 7468 6174 204c 7563 6964 2070 int that Lucid p │ │ │ -00004b70: 6c61 6365 6420 6f6e 2074 6865 206e 616d laced on the nam │ │ │ -00004b80: 6520 7761 735c 6e74 6861 7420 6974 206d e was\nthat it m │ │ │ -00004b90: 7573 7420 636f 6e74 6169 6e20 7468 6520 ust contain the │ │ │ -00004ba0: 776f 7264 205c 2245 6d61 6373 5c22 2069 word \"Emacs\" i │ │ │ -00004bb0: 6e20 6974 202d 2d20 7468 7573 205c 2245 n it -- thus \"E │ │ │ -00004bc0: 5241 5c22 2077 6173 206e 6f74 5c6e 6163 RA\" was not\nac │ │ │ -00004bd0: 6365 7074 6162 6c65 2e20 2054 6865 2074 ceptable. The t │ │ │ -00004be0: 656e 7461 7469 7665 6c79 2061 6772 6565 entatively agree │ │ │ -00004bf0: 642d 7570 6f6e 206e 616d 6520 7761 7320 d-upon name was │ │ │ -00004c00: 5c22 5845 6d61 6373 5c22 2c20 616e 6420 \"XEmacs\", and │ │ │ -00004c10: 7468 6973 5c6e 6861 7320 6265 656e 2074 this\nhas been t │ │ │ -00004c20: 6865 206e 616d 6520 6f66 2074 6865 2070 he name of the p │ │ │ -00004c30: 726f 6772 616d 2073 696e 6365 2076 6572 rogram since ver │ │ │ -00004c40: 7369 6f6e 2031 392e 3131 2e29 5c6e 5c6e sion 19.11.)\n\n │ │ │ -00004c50: 4173 206f 6620 3139 3937 2c20 5375 6e20 As of 1997, Sun │ │ │ -00004c60: 6973 2073 6869 7070 696e 6720 5845 6d61 is shipping XEma │ │ │ -00004c70: 6373 2061 7320 7061 7274 206f 6620 6974 cs as part of it │ │ │ -00004c80: 7320 4465 7665 6c6f 7065 7220 5072 6f64 s Developer Prod │ │ │ -00004c90: 7563 7473 5c6e 696e 7465 6772 6174 6564 ucts\nintegrated │ │ │ -00004ca0: 2070 726f 6772 616d 6d69 6e67 2065 6e76 programming env │ │ │ -00004cb0: 6972 6f6e 6d65 6e74 205c 2253 756e 2057 ironment \"Sun W │ │ │ -00004cc0: 6f72 6b53 686f 705c 222e 2020 5375 6e20 orkShop\". Sun │ │ │ -00004cd0: 6973 5c6e 636f 6e74 696e 7569 6e67 2074 is\ncontinuing t │ │ │ -00004ce0: 6f20 7375 7070 6f72 7420 5845 6d61 6373 o support XEmacs │ │ │ -00004cf0: 2064 6576 656c 6f70 6d65 6e74 2c20 7769 development, wi │ │ │ -00004d00: 7468 2066 6f63 7573 206f 6e5c 6e69 6e74 th focus on\nint │ │ │ -00004d10: 6572 6e61 7469 6f6e 616c 697a 6174 696f ernationalizatio │ │ │ -00004d20: 6e20 616e 6420 7175 616c 6974 7920 696d n and quality im │ │ │ -00004d30: 7072 6f76 656d 656e 742e 5c6e 5c6e 2220 provement.\n\n" │ │ │ -00004d40: 224c 7563 6964 2067 6f65 7320 756e 6465 "Lucid goes unde │ │ │ -00004d50: 7222 2022 5c6e 5c6e 4172 6f75 6e64 206d r" "\n\nAround m │ │ │ -00004d60: 6964 2d27 3934 2c20 4c75 6369 6420 7765 id-'94, Lucid we │ │ │ -00004d70: 6e74 206f 7574 206f 6620 6275 7369 6e65 nt out of busine │ │ │ -00004d80: 7373 2e20 204c 7563 6964 2066 6f75 6e64 ss. Lucid found │ │ │ -00004d90: 6572 2052 6963 6861 7264 5c6e 4761 6272 er Richard\nGabr │ │ │ -00004da0: 6965 6c27 7320 626f 6f6b 205c 2250 6174 iel's book \"Pat │ │ │ -00004db0: 7465 726e 7320 6f66 2053 6f66 7477 6172 terns of Softwar │ │ │ -00004dc0: 655c 222c 2077 6869 6368 2069 7320 6869 e\", which is hi │ │ │ -00004dd0: 6768 6c79 2072 6563 6f6d 6d65 6e64 6564 ghly recommended │ │ │ -00004de0: 5c6e 7265 6164 696e 6720 696e 2061 6e79 \nreading in any │ │ │ -00004df0: 2063 6173 652c 2064 6f63 756d 656e 7473 case, documents │ │ │ -00004e00: 2074 6865 2064 656d 6973 6520 6f66 204c the demise of L │ │ │ -00004e10: 7563 6964 2061 6e64 2073 7567 6765 7374 ucid and suggest │ │ │ -00004e20: 735c 6e6c 6573 736f 6e73 2074 6f20 6265 s\nlessons to be │ │ │ -00004e30: 206c 6561 726e 6564 2066 6f72 2074 6865 learned for the │ │ │ -00004e40: 2077 686f 6c65 2073 6f66 7477 6172 6520 whole software │ │ │ -00004e50: 6465 7665 6c6f 706d 656e 7420 636f 6d6d development comm │ │ │ -00004e60: 756e 6974 792e 5c6e 5c6e 4465 7665 6c6f unity.\n\nDevelo │ │ │ -00004e70: 706d 656e 7420 6f6e 2058 456d 6163 732c pment on XEmacs, │ │ │ -00004e80: 2068 6f77 6576 6572 2c20 6861 7320 636f however, has co │ │ │ -00004e90: 6e74 696e 7565 6420 756e 6162 6174 6564 ntinued unabated │ │ │ -00004ea0: 2075 6e64 6572 2074 6865 5c6e 6175 7370 under the\nausp │ │ │ -00004eb0: 6963 6573 206f 6620 5375 6e20 4d69 6372 ices of Sun Micr │ │ │ -00004ec0: 6f73 7973 7465 6d73 2061 6e64 2074 6865 osystems and the │ │ │ -00004ed0: 2055 6e69 7665 7273 6974 7920 6f66 2049 University of I │ │ │ -00004ee0: 6c6c 696e 6f69 732c 2077 6974 6820 6865 llinois, with he │ │ │ -00004ef0: 6c70 5c6e 6672 6f6d 2041 6d64 6168 6c20 lp\nfrom Amdahl │ │ │ -00004f00: 436f 7270 6f72 6174 696f 6e20 616e 6420 Corporation and │ │ │ -00004f10: 494e 5320 456e 6769 6e65 6572 696e 6720 INS Engineering │ │ │ -00004f20: 436f 7270 6f72 6174 696f 6e2e 2020 5375 Corporation. Su │ │ │ -00004f30: 6e20 706c 616e 7320 746f 5c6e 636f 6e74 n plans to\ncont │ │ │ -00004f40: 696e 7565 2074 6f20 7375 7070 6f72 7420 inue to support │ │ │ -00004f50: 5845 6d61 6373 2069 6e74 6f20 7468 6520 XEmacs into the │ │ │ -00004f60: 6675 7475 7265 2e5c 6e5c 6e22 2022 5468 future.\n\n" "Th │ │ │ -00004f70: 6520 416d 6461 686c 2043 6f72 706f 7261 e Amdahl Corpora │ │ │ -00004f80: 7469 6f6e 2070 6f69 6e74 206f 6620 7669 tion point of vi │ │ │ -00004f90: 6577 2220 225c 6e5c 6e41 6d64 6168 6c20 ew" "\n\nAmdahl │ │ │ -00004fa0: 436f 7270 6f72 6174 696f 6e27 7320 5374 Corporation's St │ │ │ -00004fb0: 6f72 6167 6520 5072 6f64 7563 7473 2047 orage Products G │ │ │ -00004fc0: 726f 7570 2028 5350 4729 2075 7365 7320 roup (SPG) uses │ │ │ -00004fd0: 5845 6d61 6373 2061 7320 7468 655c 6e66 XEmacs as the\nf │ │ │ -00004fe0: 6f63 616c 2070 6f69 6e74 206f 6620 6120 ocal point of a │ │ │ -00004ff0: 656e 7669 726f 6e6d 656e 7420 666f 7220 environment for │ │ │ -00005000: 6465 7665 6c6f 706d 656e 7420 6f66 2074 development of t │ │ │ -00005010: 6865 206d 6963 726f 636f 6465 2075 7365 he microcode use │ │ │ -00005020: 6420 696e 5c6e 416d 6461 686c 2773 206c d in\nAmdahl's l │ │ │ -00005030: 6172 6765 2d73 6361 6c65 2064 6973 6b20 arge-scale disk │ │ │ -00005040: 6172 7261 7973 2c20 6f72 2044 4153 4427 arrays, or DASD' │ │ │ -00005050: 732e 2020 5350 4720 6861 7320 6a6f 696e s. SPG has join │ │ │ -00005060: 7420 7665 6e74 7572 6573 5c6e 7769 7468 t ventures\nwith │ │ │ -00005070: 204a 6170 616e 6573 6520 636f 6d70 616e Japanese compan │ │ │ -00005080: 6965 732c 2061 6e64 2064 6563 6964 6564 ies, and decided │ │ │ -00005090: 2069 6e20 6c61 7465 2031 3939 3420 746f in late 1994 to │ │ │ -000050a0: 2063 6f6e 7472 6163 7420 6f75 7420 666f contract out fo │ │ │ -000050b0: 725c 6e77 6f72 6b20 6f6e 2058 456d 6163 r\nwork on XEmac │ │ │ -000050c0: 7320 696e 206f 7264 6572 2074 6f20 6861 s in order to ha │ │ │ -000050d0: 7374 656e 2074 6865 2064 6576 656c 6f70 sten the develop │ │ │ -000050e0: 6d65 6e74 206f 6620 4d75 6c65 2073 7570 ment of Mule sup │ │ │ -000050f0: 706f 7274 5c6e 2869 2e65 2e20 7375 7070 port\n(i.e. supp │ │ │ -00005100: 6f72 7420 666f 7220 4a61 7061 6e65 7365 ort for Japanese │ │ │ -00005110: 2c20 4368 696e 6573 652c 2065 7463 2e29 , Chinese, etc.) │ │ │ -00005120: 2069 6e20 5845 6d61 6373 2061 6e64 2061 in XEmacs and a │ │ │ -00005130: 7320 6120 6765 7374 7572 655c 6e6f 6620 s a gesture\nof │ │ │ -00005140: 676f 6f64 7769 6c6c 2074 6f77 6172 6473 goodwill towards │ │ │ -00005150: 2074 6865 2058 456d 6163 7320 636f 6d6d the XEmacs comm │ │ │ -00005160: 756e 6974 7920 666f 7220 616c 6c20 7468 unity for all th │ │ │ -00005170: 6520 776f 726b 2074 6865 7920 6861 7665 e work they have │ │ │ -00005180: 5c6e 646f 6e65 206f 6e20 6d61 6b69 6e67 \ndone on making │ │ │ -00005190: 2061 2070 6f77 6572 6675 6c2c 206d 6f64 a powerful, mod │ │ │ -000051a0: 6572 6e2c 2066 7265 656c 7920 6176 6169 ern, freely avai │ │ │ -000051b0: 6c61 626c 6520 7465 7874 2065 6469 746f lable text edito │ │ │ -000051c0: 722e 5c6e 5468 726f 7567 6820 7468 6973 r.\nThrough this │ │ │ -000051d0: 2063 6f6e 7472 6163 742c 2041 6d64 6168 contract, Amdah │ │ │ -000051e0: 6c20 7072 6f76 6964 6564 2061 206c 6172 l provided a lar │ │ │ -000051f0: 6765 2061 6d6f 756e 7420 6f66 2077 6f72 ge amount of wor │ │ │ -00005200: 6b20 696e 5c6e 5845 6d61 6373 2069 6e20 k in\nXEmacs in │ │ │ -00005210: 7468 6520 666f 726d 206f 6620 7265 7772 the form of rewr │ │ │ -00005220: 6974 696e 6720 7468 6520 6261 7369 6320 iting the basic │ │ │ -00005230: 7465 7874 2d70 726f 6365 7373 696e 6720 text-processing │ │ │ -00005240: 6d65 6368 616e 6973 6d73 5c6e 746f 2061 mechanisms\nto a │ │ │ -00005250: 6c6c 6f77 2066 6f72 204d 756c 6520 7375 llow for Mule su │ │ │ -00005260: 7070 6f72 7420 616e 6420 7772 6974 696e pport and writin │ │ │ -00005270: 6720 6120 6c61 7267 6520 616d 6f75 6e74 g a large amount │ │ │ -00005280: 206f 6620 7468 6520 7375 7070 6f72 745c of the support\ │ │ │ -00005290: 6e66 6f72 206d 756c 7469 706c 6520 6465 nfor multiple de │ │ │ -000052a0: 7669 6365 732e 5c6e 5c6e 416c 7468 6f75 vices.\n\nAlthou │ │ │ -000052b0: 6768 2041 6d64 6168 6c20 6973 206e 6f20 gh Amdahl is no │ │ │ -000052c0: 6c6f 6e67 6572 2068 6972 696e 6720 6120 longer hiring a │ │ │ -000052d0: 6675 6c6c 2d74 696d 6520 636f 6e74 7261 full-time contra │ │ │ -000052e0: 6374 6f72 2c20 7468 6579 2061 7265 5c6e ctor, they are\n │ │ │ -000052f0: 7374 696c 6c20 6675 6e64 696e 6720 7061 still funding pa │ │ │ -00005300: 7274 2d74 696d 6520 776f 726b 206f 6e20 rt-time work on │ │ │ -00005310: 5845 6d61 6373 2061 6e64 2070 726f 7669 XEmacs and provi │ │ │ -00005320: 6469 6e67 2072 6573 6f75 7263 6573 2066 ding resources f │ │ │ -00005330: 6f72 5c6e 6675 7274 6865 7220 5845 6d61 or\nfurther XEma │ │ │ -00005340: 6373 2064 6576 656c 6f70 6d65 6e74 2e5c cs development.\ │ │ │ -00005350: 6e5c 6e22 2022 5468 6520 494e 5320 456e n\n" "The INS En │ │ │ -00005360: 6769 6e65 6572 696e 6720 706f 696e 7420 gineering point │ │ │ -00005370: 6f66 2076 6965 7722 2022 5c6e 5c6e 494e of view" "\n\nIN │ │ │ -00005380: 5320 456e 6769 6e65 6572 696e 6720 436f S Engineering Co │ │ │ -00005390: 7270 6f72 6174 696f 6e2c 2062 6173 6564 rporation, based │ │ │ -000053a0: 2069 6e20 546f 6b79 6f2c 2062 6f75 6768 in Tokyo, bough │ │ │ -000053b0: 7420 7269 6768 7473 2074 6f20 7365 6c6c t rights to sell │ │ │ -000053c0: 5c6e 456e 6572 6769 7a65 2077 6865 6e20 \nEnergize when │ │ │ -000053d0: 4c75 6369 6420 7765 6e74 206f 7574 206f Lucid went out o │ │ │ -000053e0: 6620 6275 7369 6e65 7373 2e20 2055 6e68 f business. Unh │ │ │ -000053f0: 6170 7079 2077 6974 6820 7468 655c 6e70 appy with the\np │ │ │ -00005400: 6572 666f 726d 616e 6365 206f 6620 7468 erformance of th │ │ │ -00005410: 6520 4a61 7061 6e65 7365 2073 7570 706f e Japanese suppo │ │ │ -00005420: 7274 2069 6e20 5845 6d61 6373 2031 392e rt in XEmacs 19. │ │ │ -00005430: 3131 2c20 494e 5320 616c 736f 5c6e 636f 11, INS also\nco │ │ │ -00005440: 6e74 7269 6275 7465 6420 746f 2074 6865 ntributed to the │ │ │ -00005450: 2058 456d 6163 7320 6465 7665 6c6f 706d XEmacs developm │ │ │ -00005460: 656e 7420 6672 6f6d 206c 6174 6520 3139 ent from late 19 │ │ │ -00005470: 3934 2074 6f20 6561 726c 795c 6e31 3939 94 to early\n199 │ │ │ -00005480: 352e 5c6e 2220 6162 6f75 742d 6669 6e69 5.\n" about-fini │ │ │ -00005490: 7368 2d62 7566 6665 725d 2031 335d 290a sh-buffer] 13]). │ │ │ -000054a0: 2864 6566 616c 6961 7320 2761 626f 7574 (defalias 'about │ │ │ -000054b0: 2d61 6476 616e 7461 6765 7320 235b 2826 -advantages #[(& │ │ │ -000054c0: 7265 7374 2069 676e 6f72 6529 2022 c1c2 rest ignore) ".. │ │ │ -000054d0: 213f ad94 c318 c4c5 c608 21c7 08c8 5c22 !?........!...\" │ │ │ -000054e0: 2388 29c4 c921 88ca 2087 2220 5b74 6974 #.)..!.. ." [tit │ │ │ -000054f0: 6c65 2061 626f 7574 2d67 6574 2d62 7566 le about-get-buf │ │ │ -00005500: 6665 7220 222a 4162 6f75 7420 4164 7661 fer "*About Adva │ │ │ -00005510: 6e74 6167 6573 2a22 2022 5845 6d61 6373 ntages*" "XEmacs │ │ │ -00005520: 2041 6476 616e 7461 6765 7320 6f76 6572 Advantages over │ │ │ -00005530: 2047 4e55 2045 6d61 6373 2220 7769 6467 GNU Emacs" widg │ │ │ -00005540: 6574 2d69 6e73 6572 7420 225c 6e22 2061 et-insert "\n" a │ │ │ -00005550: 626f 7574 2d63 656e 7465 7220 6162 6f75 bout-center abou │ │ │ -00005560: 742d 7769 7468 2d66 6163 6520 626f 6c64 t-with-face bold │ │ │ -00005570: 2022 5c6e 5c6e 2a20 4d75 6368 2062 6574 "\n\n* Much bet │ │ │ -00005580: 7465 7220 4755 4920 7375 7070 6f72 743a ter GUI support: │ │ │ -00005590: 5c6e 5c6e 2020 2d2d 2061 2072 6561 6c20 \n\n -- a real │ │ │ -000055a0: 746f 6f6c 6261 725c 6e20 202d 2d20 6d6f toolbar\n -- mo │ │ │ -000055b0: 7265 2063 6f6d 7072 6568 656e 7369 7665 re comprehensive │ │ │ -000055c0: 2061 6e64 2062 6574 7465 722d 6465 7369 and better-desi │ │ │ -000055d0: 676e 6564 206d 656e 7562 6172 735c 6e20 gned menubars\n │ │ │ -000055e0: 202d 2d20 686f 7269 7a6f 6e74 616c 2061 -- horizontal a │ │ │ -000055f0: 6e64 2076 6572 7469 6361 6c20 7363 726f nd vertical scro │ │ │ -00005600: 6c6c 6261 7273 2069 6e20 616c 6c20 7769 llbars in all wi │ │ │ -00005610: 6e64 6f77 735c 6e20 202d 2d20 7072 6f70 ndows\n -- prop │ │ │ -00005620: 6572 2064 6961 6c6f 6720 626f 7865 735c er dialog boxes\ │ │ │ -00005630: 6e20 202d 2d20 7461 6273 2066 6f72 2073 n -- tabs for s │ │ │ -00005640: 656c 6563 7469 6e67 2062 7566 6665 7273 electing buffers │ │ │ -00005650: 5c6e 2020 2d2d 2073 7570 706f 7274 2066 \n -- support f │ │ │ -00005660: 6f72 2076 6172 6961 626c 652d 7769 6474 or variable-widt │ │ │ -00005670: 6820 616e 6420 7661 7269 6162 6c65 2068 h and variable h │ │ │ -00005680: 6569 6768 7420 666f 6e74 735c 6e20 202d eight fonts\n - │ │ │ -00005690: 2d20 7375 7070 6f72 7420 666f 7220 6172 - support for ar │ │ │ -000056a0: 6269 7472 6172 7920 7069 786d 6170 7320 bitrary pixmaps │ │ │ -000056b0: 616e 6420 7769 6467 6574 7320 696e 2061 and widgets in a │ │ │ -000056c0: 2062 7566 6665 725c 6e20 202d 2d20 6661 buffer\n -- fa │ │ │ -000056d0: 6365 2073 7570 706f 7274 206f 6e20 5454 ce support on TT │ │ │ -000056e0: 5927 732c 2069 6e63 6c75 6469 6e67 2063 Y's, including c │ │ │ -000056f0: 6f6c 6f72 5c6e 5c6e 2a20 416e 2069 6e73 olor\n\n* An ins │ │ │ -00005700: 7461 6c6c 6162 6c65 2070 6163 6b61 6765 tallable package │ │ │ -00005710: 2073 7973 7465 6d2c 2077 6974 6820 6120 system, with a │ │ │ -00005720: 6875 6765 206e 756d 6265 7220 6f66 2070 huge number of p │ │ │ -00005730: 6163 6b61 6765 7320 6176 6169 6c61 626c ackages availabl │ │ │ -00005740: 655c 6e20 2074 6861 7420 6861 7665 2062 e\n that have b │ │ │ -00005750: 6565 6e20 7465 7374 6564 2061 6e64 2061 een tested and a │ │ │ -00005760: 7265 206b 6e6f 776e 2074 6f20 776f 726b re known to work │ │ │ -00005770: 2077 6974 6820 7468 6520 6c61 7465 7374 with the latest │ │ │ -00005780: 2076 6572 7369 6f6e 5c6e 2020 6f66 2058 version\n of X │ │ │ -00005790: 456d 6163 732e 5c6e 5c6e 2a20 436f 6d70 Emacs.\n\n* Comp │ │ │ -000057a0: 7265 6865 6e73 6976 6520 7375 7070 6f72 rehensive suppor │ │ │ -000057b0: 7420 666f 7220 7468 6520 4754 4b20 746f t for the GTK to │ │ │ -000057c0: 6f6c 6b69 742e 5c6e 5c6e 2a20 416e 206f olkit.\n\n* An o │ │ │ -000057d0: 7065 6e20 6465 7665 6c6f 706d 656e 7420 pen development │ │ │ -000057e0: 636f 6d6d 756e 6974 792c 2077 6974 6820 community, with │ │ │ -000057f0: 636f 6e74 7269 6275 7469 6f6e 7320 7765 contributions we │ │ │ -00005800: 6c63 6f6d 6520 616e 6420 6e6f 206e 6565 lcome and no nee │ │ │ -00005810: 645c 6e20 2074 6f20 7369 676e 206f 7665 d\n to sign ove │ │ │ -00005820: 7220 796f 7572 2063 6f70 7972 6967 6874 r your copyright │ │ │ -00005830: 2074 6f20 616e 7920 6f72 6761 6e69 7a61 to any organiza │ │ │ -00005840: 7469 6f6e 2e20 2850 6c65 6173 6520 7365 tion. (Please se │ │ │ -00005850: 6e64 5c6e 2020 636f 6e74 7269 6275 7469 nd\n contributi │ │ │ -00005860: 6f6e 7320 746f 2078 656d 6163 732d 7061 ons to xemacs-pa │ │ │ -00005870: 7463 6865 7340 7865 6d61 6373 2e6f 7267 tches@xemacs.org │ │ │ -00005880: 2e20 2053 6565 2068 7474 703a 2f2f 7777 . See http://ww │ │ │ -00005890: 772e 7865 6d61 6373 2e6f 7267 5c6e 2020 w.xemacs.org\n │ │ │ -000058a0: 666f 7220 6d6f 7265 2069 6e66 6f72 6d61 for more informa │ │ │ -000058b0: 7469 6f6e 206f 6e20 5845 6d61 6373 206d tion on XEmacs m │ │ │ -000058c0: 6169 6c69 6e67 206c 6973 7473 2c20 616e ailing lists, an │ │ │ -000058d0: 6420 6f74 6865 7220 696e 666f 2e29 5c6e d other info.)\n │ │ │ -000058e0: 5c6e 2a20 5375 7070 6f72 7420 666f 7220 \n* Support for │ │ │ -000058f0: 6469 7370 6c61 7920 6f6e 206d 756c 7469 display on multi │ │ │ -00005900: 706c 6520 7369 6d75 6c74 616e 656f 7573 ple simultaneous │ │ │ -00005910: 2058 2061 6e64 2f6f 7220 5454 5920 6465 X and/or TTY de │ │ │ -00005920: 7669 6365 732e 5c6e 5c6e 2a20 506f 7765 vices.\n\n* Powe │ │ │ -00005930: 7266 756c 2c20 666c 6578 6962 6c65 2063 rful, flexible c │ │ │ -00005940: 6f6e 7472 6f6c 206f 7665 7220 7468 6520 ontrol over the │ │ │ -00005950: 6469 7370 6c61 7920 6368 6172 6163 7465 display characte │ │ │ -00005960: 7269 7374 6963 7320 6f66 206d 6f73 745c ristics of most\ │ │ │ -00005970: 6e20 206f 6620 7468 6520 7669 7375 616c n of the visual │ │ │ -00005980: 2061 7370 6563 7473 206f 6620 5845 6d61 aspects of XEma │ │ │ -00005990: 6373 2074 6872 6f75 6768 2074 6865 2075 cs through the u │ │ │ -000059a0: 7365 206f 6620 7370 6563 6966 6965 7273 se of specifiers │ │ │ -000059b0: 2c20 7768 6963 685c 6e20 2061 6c6c 6f77 , which\n allow │ │ │ -000059c0: 2073 6570 6172 6174 6520 7661 6c75 6573 separate values │ │ │ -000059d0: 2074 6f20 6265 2073 7065 6369 6669 6564 to be specified │ │ │ -000059e0: 2066 6f72 2069 6e64 6976 6964 7561 6c20 for individual │ │ │ -000059f0: 6275 6666 6572 732c 5c6e 2020 7769 6e64 buffers,\n wind │ │ │ -00005a00: 6f77 732c 2066 7261 6d65 732c 2064 6576 ows, frames, dev │ │ │ -00005a10: 6963 6573 2c20 6465 7669 6365 2063 6c61 ices, device cla │ │ │ -00005a20: 7373 6573 2c20 616e 6420 6465 7669 6365 sses, and device │ │ │ -00005a30: 2074 7970 6573 2e5c 6e5c 6e2a 2041 2063 types.\n\n* A c │ │ │ -00005a40: 6c65 616e 2c20 6d6f 6465 726e 2c20 6162 lean, modern, ab │ │ │ -00005a50: 7374 7261 6374 6564 204c 6973 7020 696e stracted Lisp in │ │ │ -00005a60: 7465 7266 6163 6520 746f 2074 6865 206d terface to the m │ │ │ -00005a70: 656e 7562 6172 2c20 746f 6f6c 6261 722c enubar, toolbar, │ │ │ -00005a80: 5c6e 2020 7769 6e64 6f77 2d73 7973 7465 \n window-syste │ │ │ -00005a90: 6d20 6576 656e 7473 2c20 6b65 7920 636f m events, key co │ │ │ -00005aa0: 6d62 696e 6174 696f 6e73 2c20 6578 7465 mbinations, exte │ │ │ -00005ab0: 6e74 7320 2872 6567 696f 6e73 2069 6e20 nts (regions in │ │ │ -00005ac0: 6120 6275 6666 6572 5c6e 2020 7769 7468 a buffer\n with │ │ │ -00005ad0: 2073 7065 6369 6669 6320 7072 6f70 6572 specific proper │ │ │ -00005ae0: 7469 6573 292c 2061 6e64 2061 6c6c 206f ties), and all o │ │ │ -00005af0: 7468 6572 2064 6973 706c 6179 2061 7370 ther display asp │ │ │ -00005b00: 6563 7473 2e5c 6e5c 6e2a 2050 726f 7065 ects.\n\n* Prope │ │ │ -00005b10: 7220 696e 7465 6772 6174 696f 6e20 7769 r integration wi │ │ │ -00005b20: 7468 2058 7420 616e 6420 4d6f 7469 6620 th Xt and Motif │ │ │ -00005b30: 2869 6e63 6c75 6469 6e67 204d 6f74 6966 (including Motif │ │ │ -00005b40: 206d 656e 7562 6172 7320 616e 645c 6e20 menubars and\n │ │ │ -00005b50: 2073 6372 6f6c 6c62 6172 7329 2e20 204d scrollbars). M │ │ │ -00005b60: 6f74 6966 206c 6f6f 6b2d 616c 696b 6520 otif look-alike │ │ │ -00005b70: 6d65 6e75 6261 7273 2061 6e64 2073 6372 menubars and scr │ │ │ -00005b80: 6f6c 6c62 6172 7320 6172 6520 7072 6f76 ollbars are prov │ │ │ -00005b90: 6964 6564 5c6e 2020 666f 7220 7468 6f73 ided\n for thos │ │ │ -00005ba0: 6520 7379 7374 656d 7320 7769 7468 6f75 e systems withou │ │ │ -00005bb0: 7420 7265 616c 204d 6f74 6966 2073 7570 t real Motif sup │ │ │ -00005bc0: 706f 7274 2e5c 6e5c 6e2a 204d 616e 7920 port.\n\n* Many │ │ │ -00005bd0: 696d 7072 6f76 656d 656e 7473 2074 6f20 improvements to │ │ │ -00005be0: 7468 6520 6d75 6c74 696c 696e 6775 616c the multilingual │ │ │ -00005bf0: 2073 7570 706f 7274 2c20 7375 6368 2061 support, such a │ │ │ -00005c00: 7320 7468 6520 6162 696c 6974 7920 746f s the ability to │ │ │ -00005c10: 5c6e 2020 656e 7465 7220 7465 7874 2066 \n enter text f │ │ │ -00005c20: 6f72 2063 6f6d 706c 6578 206c 616e 6775 or complex langu │ │ │ -00005c30: 6167 6573 2075 7369 6e67 2074 6865 2058 ages using the X │ │ │ -00005c40: 494d 206d 6563 6861 6e69 736d 2061 6e64 IM mechanism and │ │ │ -00005c50: 5c6e 2020 6c6f 6361 6c69 7a61 7469 6f6e \n localization │ │ │ -00005c60: 206f 6620 6d65 6e75 6261 7220 7465 7874 of menubar text │ │ │ -00005c70: 2066 6f72 2074 6865 204a 6170 616e 6573 for the Japanes │ │ │ -00005c80: 6520 6c6f 6361 6c65 2e5c 6e5c 6e5c 6e22 e locale.\n\n\n" │ │ │ -00005c90: 2061 626f 7574 2d66 696e 6973 682d 6275 about-finish-bu │ │ │ -00005ca0: 6666 6572 5d20 365d 290a 2340 3135 2043 ffer] 6]).#@15 C │ │ │ -00005cb0: 6163 6865 6420 676c 7970 6873 1f0a 2864 ached glyphs..(d │ │ │ -00005cc0: 6566 7661 7220 6162 6f75 742d 676c 7970 efvar about-glyp │ │ │ -00005cd0: 6873 206e 696c 2028 2324 202e 2032 3337 hs nil (#$ . 237 │ │ │ -00005ce0: 3237 2929 0a28 6465 6661 6c69 6173 2027 27)).(defalias ' │ │ │ -00005cf0: 6162 6f75 742d 6d61 696e 7461 696e 6572 about-maintainer │ │ │ -00005d00: 2d67 6c79 7068 2023 5b28 7768 6f29 2022 -glyph #[(who) " │ │ │ -00005d10: 5c6e 09b7 4189 1cac f5c5 c65c 6e21 c720 \n..A......\n!. │ │ │ -00005d20: c873 ab83 c9aa 81ca cb51 cccd 215c 22ce .s.......Q..!\". │ │ │ -00005d30: 1b18 0b3b ab9e cfd0 d121 ab8f d2d3 d1d4 ...;.....!...... │ │ │ -00005d40: 0b45 5c22 d3d5 d4d6 2344 aa86 d3d5 d4d6 .E\"....#D...... │ │ │ -00005d50: 2343 21aa ae0b d761 ab85 cfd8 21aa a408 #C!....a....!... │ │ │ -00005d60: ab9e cfd0 d121 ab8f d2d3 d1d9 0845 5c22 .....!.......E\" │ │ │ -00005d70: d3d5 d4d6 2344 aa86 d3d5 d4d6 2343 21aa ....#D......#C!. │ │ │ -00005d80: 83cf da21 14db 0cdc dd23 885c 6e0c 4209 ...!.....#.\n.B. │ │ │ -00005d90: 4211 2a0c 2987 2220 5b66 696c 6520 6162 B.*.)." [file ab │ │ │ -00005da0: 6f75 742d 676c 7970 6873 2077 686f 2064 out-glyphs who d │ │ │ -00005db0: 6174 6120 676c 7970 6820 6578 7061 6e64 ata glyph expand │ │ │ -00005dc0: 2d66 696c 652d 6e61 6d65 2073 796d 626f -file-name symbo │ │ │ -00005dd0: 6c2d 6e61 6d65 2064 6576 6963 652d 636c l-name device-cl │ │ │ -00005de0: 6173 7320 2863 6f6c 6f72 2067 7261 7973 ass (color grays │ │ │ -00005df0: 6361 6c65 2920 2222 2022 6d22 2022 2e70 cale) "" "m" ".p │ │ │ -00005e00: 6e67 2220 6c6f 6361 7465 2d64 6174 612d ng" locate-data- │ │ │ -00005e10: 6469 7265 6374 6f72 7920 2270 686f 746f directory "photo │ │ │ -00005e20: 7322 206e 696c 206d 616b 652d 676c 7970 s" nil make-glyp │ │ │ -00005e30: 6820 6665 6174 7572 6570 2070 6e67 2061 h featurep png a │ │ │ -00005e40: 7070 6c79 2076 6563 746f 7220 3a64 6174 pply vector :dat │ │ │ -00005e50: 6120 7374 7269 6e67 2022 5b49 6d61 6765 a string "[Image │ │ │ -00005e60: 5d22 2065 7272 6f72 205b 7374 7269 6e67 ]" error [string │ │ │ -00005e70: 203a 6461 7461 2022 5b45 7272 6f72 5d22 :data "[Error]" │ │ │ -00005e80: 5d20 3a66 696c 6520 5b6e 6f74 6869 6e67 ] :file [nothing │ │ │ -00005e90: 5d20 7365 742d 676c 7970 682d 7072 6f70 ] set-glyph-prop │ │ │ -00005ea0: 6572 7479 2062 6173 656c 696e 6520 3130 erty baseline 10 │ │ │ -00005eb0: 305d 2037 5d29 0a28 6465 6661 6c69 6173 0] 7]).(defalias │ │ │ -00005ec0: 2027 6162 6f75 742d 7065 7273 6f6e 616c 'about-personal │ │ │ -00005ed0: 2d69 6e66 6f20 235b 2865 6e74 7279 2920 -info #[(entry) │ │ │ -00005ee0: 2209 40c2 61ab 84c3 c421 8709 40c5 61ab ".@.a....!..@.a. │ │ │ -00005ef0: 88c3 c621 88c3 c721 8709 40c8 61ab 8ec3 ...!...!..@.a... │ │ │ -00005f00: c921 88ca c8cb cc23 88c3 c721 8709 40cd .!.....#...!..@. │ │ │ -00005f10: 61ab 8ec3 ce21 88ca cdcb cf23 88c3 c721 a....!.....#...! │ │ │ -00005f20: 8709 40d0 61ab 8ec3 d121 88ca d0cb d223 ..@.a....!.....# │ │ │ -00005f30: 88c3 d321 8709 40d4 61ab 9cc3 d521 88c3 ...!..@.a....!.. │ │ │ -00005f40: d621 88ca d7cb d823 88c3 d921 88ca d4cb .!.....#...!.... │ │ │ -00005f50: da23 88c3 d321 8709 40db 61ab 84c3 dc21 .#...!..@.a....! │ │ │ -00005f60: 8709 40dd 61ab 84c3 c421 8709 40de 61ab ..@.a....!..@.a. │ │ │ -00005f70: 84c3 df21 8709 40e0 61ab 84c3 c421 8709 ...!..@.a....!.. │ │ │ -00005f80: 40e1 61ab 84c3 e221 8709 40e3 61ab 86ca @.a....!..@.a... │ │ │ -00005f90: e3cb e423 8709 40e5 61ab 84c3 c421 8709 ...#..@.a....!.. │ │ │ -00005fa0: 40e6 61ab 84c3 e721 8709 40e8 61ab 84c3 @.a....!..@.a... │ │ │ -00005fb0: c421 8709 40e9 61ab 8ec3 ea21 88ca e9cb .!..@.a....!.... │ │ │ -00005fc0: eb23 88c3 c721 8709 40ec 61ab 8ec3 ed21 .#...!..@.a....! │ │ │ -00005fd0: 88ca eccb ee23 88c3 c721 8709 40ef 61ab .....#...!..@.a. │ │ │ -00005fe0: 9cc3 f021 88c3 f121 88ca efcb f223 88c3 ...!...!.....#.. │ │ │ -00005ff0: f321 88ca f4cb f523 88c3 d321 8709 40f6 .!.....#...!..@. │ │ │ -00006000: 61ab 84c3 c421 8709 40f7 61ab 9cc3 f821 a....!..@.a....! │ │ │ -00006010: 88c3 f921 88ca facb fb23 88c3 fc21 88ca ...!.....#...!.. │ │ │ -00006020: f7cb fd23 88c3 d321 8709 40fe 61ab 96c3 ...#...!..@.a... │ │ │ -00006030: ff21 88ca 8140 0081 4100 8142 0023 88c3 .!...@..A..B.#.. │ │ │ -00006040: 8143 0021 8709 4081 4400 61ab 84c3 c421 .C.!..@.D.a....! │ │ │ -00006050: 8709 4081 4500 61ab 84c3 c421 8709 4081 ..@.E.a....!..@. │ │ │ -00006060: 4600 61ab 84c3 c421 8709 4081 4700 61ab F.a....!..@.G.a. │ │ │ -00006070: 84c3 c421 8709 4081 4800 61ab fec3 8149 ...!..@.H.a....I │ │ │ -00006080: 0021 88ca 814a 0081 4b00 814c 0023 8881 .!...J..K..L.#.. │ │ │ -00006090: 4d00 814e 0081 4f00 8150 0081 5100 5c22 M..N..O..P..Q.\" │ │ │ -000060a0: 5c22 18c3 814d 0081 5200 085c 2221 8829 \"...M..R..\"!.) │ │ │ -000060b0: c381 5300 2188 ca81 5400 8155 0081 5600 ..S.!...T..U..V. │ │ │ -000060c0: 2388 c381 5700 2188 ca81 5800 8159 0081 #...W.!...X..Y.. │ │ │ -000060d0: 5a00 2388 c381 5b00 2188 ca81 5c5c 0081 Z.#...[.!...\\.. │ │ │ -000060e0: 5d00 815e 0023 88c3 815f 0021 88ca 8160 ]..^.#..._.!...` │ │ │ -000060f0: 0081 6100 8162 0023 88c3 8163 0021 8709 ..a..b.#...c.!.. │ │ │ -00006100: 4081 6400 61ab 86c3 8165 0021 8709 4081 @.d.a....e.!..@. │ │ │ -00006110: 6600 61ab 86c3 8167 0021 8709 4081 6800 f.a....g.!..@.h. │ │ │ -00006120: 61ab 94c3 8169 0021 88ca 8168 00cb 816a a....i.!...h...j │ │ │ -00006130: 0023 88c3 c721 8709 4081 6b00 61ab 86c3 .#...!..@.k.a... │ │ │ -00006140: 816c 0021 8709 4081 6d00 61ab 94c3 816e .l.!..@.m.a....n │ │ │ -00006150: 0021 88ca 816d 00cb 816f 0023 88c3 c721 .!...m...o.#...! │ │ │ -00006160: 8709 4081 7000 61ab 86c3 8171 0021 8709 ..@.p.a....q.!.. │ │ │ -00006170: 4081 7200 61ab 8ac3 8173 0021 88c3 c721 @.r.a....s.!...! │ │ │ -00006180: 8709 4081 7400 61ab 86c3 8175 0021 8709 ..@.t.a....u.!.. │ │ │ -00006190: 4081 7600 61ab 94c3 8177 0021 88ca 8176 @.v.a....w.!...v │ │ │ -000061a0: 00cb 8178 0023 88c3 d321 8709 4081 7900 ...x.#...!..@.y. │ │ │ -000061b0: 61ab cdc3 817a 0081 7b00 817c 0081 7d00 a....z..{..|..}. │ │ │ -000061c0: 5c22 817e 0023 88ca 817f 0081 8000 8181 \".~.#.......... │ │ │ -000061d0: 0023 88c3 8182 0021 88ca 8183 0081 8400 .#.....!........ │ │ │ -000061e0: 8185 0023 88c3 8186 0021 88c3 8187 0021 ...#.....!.....! │ │ │ -000061f0: 88ca 8179 0081 8800 8189 0023 88c3 c721 ...y.......#...! │ │ │ -00006200: 8709 4081 8a00 61ab 94c3 818b 0021 88ca ..@...a......!.. │ │ │ -00006210: 818a 00cb 818c 0023 88c3 c721 8709 4081 .......#...!..@. │ │ │ -00006220: 8d00 61ab 84c3 c421 8709 4081 8e00 61ab ..a....!..@...a. │ │ │ -00006230: 94c3 818f 0021 88ca 818e 00cb 8190 0023 .....!.........# │ │ │ -00006240: 88c3 c721 8709 4081 9100 61ab 94c3 8192 ...!..@...a..... │ │ │ -00006250: 0021 88ca 8191 00cb 8193 0023 88c3 c721 .!.........#...! │ │ │ -00006260: 8709 4081 9400 61ab 96c3 8195 0021 88ca ..@...a......!.. │ │ │ -00006270: 8194 00cb 8196 0023 88c3 8197 0021 8709 .......#.....!.. │ │ │ -00006280: 4081 9800 61ab 86c3 8199 0021 8709 4081 @...a......!..@. │ │ │ -00006290: 9a00 61ab 84c3 c421 8709 4081 9b00 61ab ..a....!..@...a. │ │ │ -000062a0: 86c3 819c 0021 8709 4081 9d00 61ab 86c3 .....!..@...a... │ │ │ -000062b0: 819e 0021 8709 4081 9f00 61ab 86c3 81a0 ...!..@...a..... │ │ │ -000062c0: 0021 8709 4081 a100 61ab 94c3 81a2 0021 .!..@...a......! │ │ │ -000062d0: 88ca 81a1 00cb 81a3 0023 88c3 c721 8709 .........#...!.. │ │ │ -000062e0: 4081 a400 61ab 84c3 c421 8709 4081 a500 @...a....!..@... │ │ │ -000062f0: 61ab 86c3 81a6 0021 8709 4081 a700 61ab a......!..@...a. │ │ │ -00006300: 86c3 81a8 0021 8709 4081 a900 61ab 94c3 .....!..@...a... │ │ │ -00006310: 81aa 0021 88ca 81a9 00cb 81ab 0023 88c3 ...!.........#.. │ │ │ -00006320: c721 8709 4081 ac00 61ab 96c3 81ad 0021 .!..@...a......! │ │ │ -00006330: 88ca 81ac 00cb 81ae 0023 88c3 81af 0021 .........#.....! │ │ │ -00006340: 8709 4081 b000 61ab 84c3 c421 8709 4081 ..@...a....!..@. │ │ │ -00006350: b100 61ab 86c3 81b2 0021 8709 4081 b300 ..a......!..@... │ │ │ -00006360: 61ab 84c3 c421 8709 4081 b400 61ab 94c3 a....!..@...a... │ │ │ -00006370: 81b5 0021 88ca 81b4 00cb 81b6 0023 88c3 ...!.........#.. │ │ │ -00006380: c721 8709 4081 b700 61ab 8ac3 81b8 0021 .!..@...a......! │ │ │ -00006390: 88c3 c721 8709 4081 b900 61ab 86c3 81ba ...!..@...a..... │ │ │ -000063a0: 0021 8709 4081 bb00 61ab 86c3 81bc 0021 .!..@...a......! │ │ │ -000063b0: 8709 4081 bd00 61ab 90c3 81be 0021 88ca ..@...a......!.. │ │ │ -000063c0: 81bd 00cb 81bf 0023 8709 4081 c000 61ab .......#..@...a. │ │ │ -000063d0: 86c3 81c1 0021 8709 4081 c200 61ab 84c3 .....!..@...a... │ │ │ -000063e0: c421 8709 4081 c300 61ab 84c3 c421 8709 .!..@...a....!.. │ │ │ -000063f0: 4081 c400 61ab 86c3 81c5 0021 8709 4081 @...a......!..@. │ │ │ -00006400: c600 61ab 96c3 81c7 0021 88ca 81c6 00cb ..a......!...... │ │ │ -00006410: 81c8 0023 88c3 81c9 0021 8709 4081 ca00 ...#.....!..@... │ │ │ -00006420: 61ab 94c3 81cb 0021 88ca 81ca 00cb 81cc a......!........ │ │ │ -00006430: 0023 88c3 c721 8709 4081 cd00 61ab 86c3 .#...!..@...a... │ │ │ -00006440: 81ce 0021 8709 4081 cf00 61ab 84c3 c421 ...!..@...a....! │ │ │ -00006450: 8709 4081 d000 61ab 94c3 81d1 0021 88ca ..@...a......!.. │ │ │ -00006460: 81d0 00cb 81d2 0023 88c3 c721 8781 d300 .......#...!.... │ │ │ -00006470: 81d4 0009 4081 d500 2388 cb87 2220 5b6d ....@...#..." [m │ │ │ -00006480: 7565 6e63 6865 6e20 656e 7472 7920 6164 uenchen entry ad │ │ │ -00006490: 7269 616e 2077 6964 6765 742d 696e 7365 rian widget-inse │ │ │ -000064a0: 7274 2022 536f 7272 792c 206e 6f20 7065 rt "Sorry, no pe │ │ │ -000064b0: 7273 6f6e 616c 2069 6e66 6f72 6d61 7469 rsonal informati │ │ │ -000064c0: 6f6e 2061 7661 696c 6162 6c65 2061 626f on available abo │ │ │ -000064d0: 7574 206d 6520 7965 742e 5c6e 2220 616a ut me yet.\n" aj │ │ │ -000064e0: 2022 4927 6d20 6120 736f 6674 7761 7265 "I'm a software │ │ │ -000064f0: 2064 6576 656c 6f70 6572 2077 6f72 6b69 developer worki │ │ │ -00006500: 6e67 2066 6f72 2074 6865 2053 7553 4520 ng for the SuSE │ │ │ -00006510: 4c61 6273 206f 6620 7468 6520 4c69 6e75 Labs of the Linu │ │ │ -00006520: 785c 6e64 6973 7472 6962 7574 6f72 2053 x\ndistributor S │ │ │ -00006530: 7553 452e 2020 4d79 206d 6169 6e20 7461 uSE. My main ta │ │ │ -00006540: 736b 2069 7320 746f 2069 6d70 726f 7665 sk is to improve │ │ │ -00006550: 2074 6865 2047 4e55 2043 206c 6962 7261 the GNU C libra │ │ │ -00006560: 7279 2e22 2022 2e5c 6e22 2061 6a63 2022 ry." ".\n" ajc " │ │ │ -00006570: 5768 656e 206e 6f74 2068 656c 7069 6e67 When not helping │ │ │ -00006580: 206d 6169 6e74 6169 6e20 7468 6520 5845 maintain the XE │ │ │ -00006590: 6d61 6373 2077 6562 7369 7465 2c20 416e macs website, An │ │ │ -000065a0: 6472 6577 2069 7320 6120 4e65 7477 6f72 drew is a Networ │ │ │ -000065b0: 6b5c 6e53 6f66 7477 6172 6520 456e 6769 k\nSoftware Engi │ │ │ -000065c0: 6e65 6572 2874 6d29 2066 6f72 204d 6f6e neer(tm) for Mon │ │ │ -000065d0: 6173 6820 556e 6976 6572 7369 7479 2069 ash University i │ │ │ -000065e0: 6e20 4175 7374 7261 6c69 612c 206d 6169 n Australia, mai │ │ │ -000065f0: 6e74 6169 6e69 6e67 5c6e 7765 6273 6572 ntaining\nwebser │ │ │ -00006600: 7665 7273 2061 6e64 2064 6f69 6e67 2072 vers and doing r │ │ │ -00006610: 616e 646f 6d20 6f74 6865 7220 7468 696e andom other thin │ │ │ -00006620: 6773 2e20 2041 7320 7765 6c6c 2061 7320 gs. As well as │ │ │ -00006630: 7370 656e 6469 6e67 2073 7061 7265 5c6e spending spare\n │ │ │ -00006640: 7469 6d65 2062 6569 6e67 2061 6e20 4561 time being an Ea │ │ │ -00006650: 6765 7220 596f 756e 6720 5370 6163 6520 ger Young Space │ │ │ -00006660: 4361 6465 7420 616e 6420 6669 6464 6c69 Cadet and fiddli │ │ │ -00006670: 6e67 2077 6974 6820 5845 6d61 6373 2f47 ng with XEmacs/G │ │ │ -00006680: 6e75 735c 6e65 742e 2061 6c2e 2c20 6865 nus\net. al., he │ │ │ -00006690: 2073 7065 6e64 7320 6869 7320 7469 6d65 spends his time │ │ │ -000066a0: 2070 7572 7375 696e 672c 2061 6d6f 6e67 pursuing, among │ │ │ -000066b0: 206f 7468 6572 2074 6869 6e67 732c 2061 other things, a │ │ │ -000066c0: 204c 6966 652e 5c6e 536f 6d65 206f 6620 Life.\nSome of │ │ │ -000066d0: 7468 6973 2063 7572 7265 6e74 6c79 2069 this currently i │ │ │ -000066e0: 6e76 6f6c 7665 7320 646f 696e 6720 616e nvolves doing an │ │ │ -000066f0: 2041 2d5a 2028 6279 2063 6f75 6e74 7279 A-Z (by country │ │ │ -00006700: 2920 6f66 5c6e 7265 7374 6175 7261 6e74 ) of\nrestaurant │ │ │ -00006710: 7320 7769 7468 2066 7269 656e 6473 2c20 s with friends, │ │ │ -00006720: 616e 6420 6861 732c 2069 6e20 7468 6520 and has, in the │ │ │ -00006730: 7061 7374 2c20 696e 766f 6c76 6564 2064 past, involved d │ │ │ -00006740: 7965 696e 6720 6869 735c 6e68 6169 7220 yeing his\nhair │ │ │ -00006750: 7661 7269 6f75 7320 636f 6c6f 7572 7320 various colours │ │ │ -00006760: 2873 6565 2022 2061 626f 7574 2d75 726c (see " about-url │ │ │ -00006770: 2d6c 696e 6b20 6e69 6c20 2256 6973 6974 -link nil "Visit │ │ │ -00006780: 2041 6e64 7265 7727 7320 686f 6d65 2070 Andrew's home p │ │ │ -00006790: 6167 6522 2061 6c61 7374 6169 7220 2241 age" alastair "A │ │ │ -000067a0: 6c61 7374 6169 722c 2061 7061 7274 2066 lastair, apart f │ │ │ -000067b0: 726f 6d20 6265 696e 6720 616e 2061 6c6c rom being an all │ │ │ -000067c0: 2d72 6f75 6e64 2068 6163 6b65 722c 206f -round hacker, o │ │ │ -000067d0: 6363 6173 696f 6e61 6c20 636f 6e74 7269 ccasional contri │ │ │ -000067e0: 6275 746f 725c 6e74 6f20 6672 6565 2073 butor\nto free s │ │ │ -000067f0: 6f66 7477 6172 6520 7072 6f6a 6563 7473 oftware projects │ │ │ -00006800: 2061 6e64 2067 656e 6572 616c 2067 6f6f and general goo │ │ │ -00006810: 6420 6567 6728 2129 2c20 6375 7272 656e d egg(!), curren │ │ │ -00006820: 746c 7920 776f 726b 7320 666f 725c 6e54 tly works for\nT │ │ │ -00006830: 656c 7369 732c 2061 206d 616e 7566 6163 elsis, a manufac │ │ │ -00006840: 7475 7265 7220 6f66 2074 656c 6570 686f turer of telepho │ │ │ -00006850: 6e79 2065 7175 6970 6d65 6e74 206f 6e20 ny equipment on │ │ │ -00006860: 7468 6520 736f 7574 6820 636f 6173 7420 the south coast │ │ │ -00006870: 6f66 5c6e 456e 676c 616e 642e 2020 4865 of\nEngland. He │ │ │ -00006880: 2764 2071 7569 7465 206c 696b 6520 746f 'd quite like to │ │ │ -00006890: 2068 6176 6520 6869 7320 6f77 6e20 636f have his own co │ │ │ -000068a0: 6d70 616e 7920 6f6e 6520 6461 792c 2062 mpany one day, b │ │ │ -000068b0: 7574 2068 6173 2079 6574 5c6e 746f 2074 ut has yet\nto t │ │ │ -000068c0: 6869 6e6b 206f 6620 7468 6174 206b 696c hink of that kil │ │ │ -000068d0: 6c65 7220 7072 6f64 7563 742e 2e2e 5c6e ler product...\n │ │ │ -000068e0: 5c6e 5365 6520 616c 736f 2022 2022 5669 \nSee also " "Vi │ │ │ -000068f0: 7369 7420 416c 6173 7461 6972 2773 2068 sit Alastair's h │ │ │ -00006900: 6f6d 6520 7061 6765 2220 6261 7720 2241 ome page" baw "A │ │ │ -00006910: 7320 6f66 204e 6f76 656d 6265 7220 3230 s of November 20 │ │ │ -00006920: 3030 2c20 4920 616d 2061 2073 6f66 7477 00, I am a softw │ │ │ -00006930: 6172 6520 656e 6769 6e65 6572 2077 6974 are engineer wit │ │ │ -00006940: 6820 7468 6520 5079 7468 6f6e 6c61 6273 h the Pythonlabs │ │ │ -00006950: 2061 745c 6e44 6967 6974 616c 2043 7265 at\nDigital Cre │ │ │ -00006960: 6174 696f 6e73 2e20 2050 7974 686f 6e6c ations. Pythonl │ │ │ -00006970: 6162 7320 6973 2074 6865 2063 6f72 6520 abs is the core │ │ │ -00006980: 7465 616d 2064 6576 656c 6f70 696e 6720 team developing │ │ │ -00006990: 616e 645c 6e6d 6169 6e74 6169 6e69 6e67 and\nmaintaining │ │ │ -000069a0: 2074 6865 2050 7974 686f 6e20 6f70 656e the Python open │ │ │ -000069b0: 2073 6f75 7263 652c 206f 626a 6563 742d source, object- │ │ │ -000069c0: 6f72 6965 6e74 6564 2073 6372 6970 7469 oriented scripti │ │ │ -000069d0: 6e67 5c6e 6c61 6e67 7561 6765 2e20 2044 ng\nlanguage. D │ │ │ -000069e0: 6967 6974 616c 2043 7265 6174 696f 6e73 igital Creations │ │ │ -000069f0: 2069 7320 7468 6520 7075 626c 6973 6865 is the publishe │ │ │ -00006a00: 7220 6f66 205a 6f70 652c 2061 6e20 6f70 r of Zope, an op │ │ │ -00006a10: 656e 2073 6f75 7263 655c 6e63 6f6e 7465 en source\nconte │ │ │ -00006a20: 6e74 206d 616e 6167 656d 656e 7420 7379 nt management sy │ │ │ -00006a30: 7374 656d 2077 7269 7474 656e 2069 6e20 stem written in │ │ │ -00006a40: 5079 7468 6f6e 2e5c 6e5c 6e49 6e20 6164 Python.\n\nIn ad │ │ │ -00006a50: 6469 7469 6f6e 2074 6f20 6d79 2050 7974 dition to my Pyt │ │ │ -00006a60: 686f 6e20 616e 6420 5a6f 7065 2077 6f72 hon and Zope wor │ │ │ -00006a70: 6b2c 2049 2061 6d20 6c65 6164 2064 6576 k, I am lead dev │ │ │ -00006a80: 656c 6f70 6572 2066 6f72 2074 6865 5c6e eloper for the\n │ │ │ -00006a90: 474e 5520 4d61 696c 6d61 6e20 7072 6f6a GNU Mailman proj │ │ │ -00006aa0: 6563 742c 2061 206d 6169 6c69 6e67 206c ect, a mailing l │ │ │ -00006ab0: 6973 7420 6d61 6e61 6765 6d65 6e74 2073 ist management s │ │ │ -00006ac0: 7973 7465 6d20 7772 6974 7465 6e2c 5c6e ystem written,\n │ │ │ -00006ad0: 6e61 7475 7261 6c6c 792c 2069 6e20 5079 naturally, in Py │ │ │ -00006ae0: 7468 6f6e 2e20 2053 6565 2074 6865 2074 thon. See the t │ │ │ -00006af0: 7265 6e64 3f5c 6e5c 6e4f 6e20 7468 6520 rend?\n\nOn the │ │ │ -00006b00: 7369 6465 2049 2070 6c61 7920 6261 7373 side I play bass │ │ │ -00006b10: 2077 6974 6820 6120 6e75 6d62 6572 206f with a number o │ │ │ -00006b20: 6620 5761 7368 696e 6774 6f6e 2044 4320 f Washington DC │ │ │ -00006b30: 6172 6561 2062 616e 6473 2061 6e64 5c6e area bands and\n │ │ │ -00006b40: 616c 736f 2077 7269 7465 2070 6f65 6d73 also write poems │ │ │ -00006b50: 2061 626f 7574 2063 6f77 732c 206d 696c about cows, mil │ │ │ -00006b60: 6b2c 2061 6e64 2066 6174 6865 7273 2e20 k, and fathers. │ │ │ -00006b70: 2048 6572 6527 7320 6120 7361 6d70 6c65 Here's a sample │ │ │ -00006b80: 2c20 616e 645c 6e64 726f 7020 6d65 2061 , and\ndrop me a │ │ │ -00006b90: 6e20 656d 6169 6c20 6966 2079 6f75 206c n email if you l │ │ │ -00006ba0: 6976 6520 696e 2074 6865 204e 5943 2074 ive in the NYC t │ │ │ -00006bb0: 6f20 4368 6172 6c6f 7474 6520 7265 6769 o Charlotte regi │ │ │ -00006bc0: 6f6e 3b20 4927 6c6c 206c 6574 5c6e 796f on; I'll let\nyo │ │ │ -00006bd0: 7520 6b6e 6f77 2077 6865 6e20 7468 6520 u know when the │ │ │ -00006be0: 6261 6e64 2773 2070 6c61 7969 6e67 2069 band's playing i │ │ │ -00006bf0: 6e20 796f 7572 2061 7265 612e 2020 4974 n your area. It │ │ │ -00006c00: 2764 2062 6520 636f 6f6c 2074 6f20 6d65 'd be cool to me │ │ │ -00006c10: 6574 5c6e 796f 752c 2061 6e64 2074 616c et\nyou, and tal │ │ │ -00006c20: 6b69 6e67 2061 626f 7574 2058 456d 6163 king about XEmac │ │ │ -00006c30: 7320 776f 756c 6420 6d61 6b65 206d 7920 s would make my │ │ │ -00006c40: 7769 6665 2076 6572 7920 6861 7070 7920 wife very happy │ │ │ -00006c50: 6279 2068 656c 7069 6e67 5c6e 746f 2066 by helping\nto f │ │ │ -00006c60: 656e 6420 6f66 6620 7468 6520 6c65 6769 end off the legi │ │ │ -00006c70: 6f6e 7320 6f66 2067 726f 7570 6965 7320 ons of groupies │ │ │ -00006c80: 7468 6174 2073 6565 6d20 746f 2066 6f6c that seem to fol │ │ │ -00006c90: 6c6f 7720 6d65 2065 7665 7279 7768 6572 low me everywher │ │ │ -00006ca0: 652e 5c6e 5c6e 2020 2020 4d69 6c6b 204d e.\n\n Milk M │ │ │ -00006cb0: 6520 4461 6464 795c 6e20 2020 2028 4329 e Daddy\n (C) │ │ │ -00006cc0: 2031 3939 3020 5761 7273 6177 5c6e 2020 1990 Warsaw\n │ │ │ -00006cd0: 2020 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d ============== │ │ │ -00006ce0: 3d5c 6e20 2020 204f 6820 6461 6464 7920 =\n Oh daddy │ │ │ -00006cf0: 7769 7468 2079 6f75 7220 6669 6e67 6572 with your finger │ │ │ -00006d00: 7320 7069 6e6b 205c 6e20 2020 2046 726f s pink \n Fro │ │ │ -00006d10: 6d20 7768 6f73 6520 7564 6465 7273 2064 m whose udders d │ │ │ -00006d20: 6f20 796f 7520 6472 696e 6b3f 205c 6e20 o you drink? \n │ │ │ -00006d30: 2020 2054 6879 206d 696c 6b20 6f66 6665 Thy milk offe │ │ │ -00006d40: 6e64 7320 7769 7468 2070 7574 7269 6420 nds with putrid │ │ │ -00006d50: 7374 696e 6b20 5c6e 2020 2020 4927 6c6c stink \n I'll │ │ │ -00006d60: 2076 6f6d 6974 206e 6f77 2c20 6c61 6374 vomit now, lact │ │ │ -00006d70: 6f73 6520 4920 7468 696e 6b20 5c6e 5c6e ose I think \n\n │ │ │ -00006d80: 2020 2020 4966 2049 2063 6f75 6c64 2064 If I could d │ │ │ -00006d90: 7265 616d 2c20 4927 6420 6265 2061 2063 ream, I'd be a c │ │ │ -00006da0: 6f77 205c 6e20 2020 204e 6f74 2068 6f72 ow \n Not hor │ │ │ -00006db0: 7365 2c20 6f72 206d 756c 652c 206f 7220 se, or mule, or │ │ │ -00006dc0: 6261 726e 7961 7264 2073 6f77 205c 6e20 barnyard sow \n │ │ │ -00006dd0: 2020 2054 6865 2063 7564 2049 2764 2063 The cud I'd c │ │ │ -00006de0: 6865 7720 776f 756c 6420 6472 6970 2061 hew would drip a │ │ │ -00006df0: 6e64 2068 6f77 2120 5c6e 2020 2020 536f nd how! \n So │ │ │ -00006e00: 206d 696c 6b20 6d65 2064 6164 6479 2c20 milk me daddy, │ │ │ -00006e10: 6d69 6c6b 206d 6520 6e6f 7721 205c 6e5c milk me now! \n\ │ │ │ -00006e20: 6e20 2020 204d 7920 626f 7669 6e65 206e n My bovine n │ │ │ -00006e30: 6174 7572 6520 6b6e 6f77 7320 6e6f 2062 ature knows no b │ │ │ -00006e40: 6f75 6e64 7320 5c6e 2020 2020 4927 6420 ounds \n I'd │ │ │ -00006e50: 6e61 7567 6874 2061 7761 6b65 2061 7420 naught awake at │ │ │ -00006e60: 6d69 646e 6967 6874 2073 6f75 6e64 7320 midnight sounds │ │ │ -00006e70: 5c6e 2020 2020 4f66 2074 6565 6e73 2061 \n Of teens a │ │ │ -00006e80: 7070 726f 6163 6869 6e67 206f 2765 7220 pproaching o'er │ │ │ -00006e90: 7468 6520 6772 6f75 6e64 7320 5c6e 2020 the grounds \n │ │ │ -00006ea0: 2020 546f 2074 6970 2077 6974 6820 676c To tip with gl │ │ │ -00006eb0: 6565 2c20 7468 656e 2073 6372 6565 6368 ee, then screech │ │ │ -00006ec0: 206c 696b 6520 636c 6f77 6e73 205c 6e5c like clowns \n\ │ │ │ -00006ed0: 6e20 2020 2041 6e64 2073 6f20 4920 7374 n And so I st │ │ │ -00006ee0: 6172 6520 696e 746f 2074 6869 7320 676c are into this gl │ │ │ -00006ef0: 6173 7320 5c6e 2020 2020 4f66 2073 7765 ass \n Of swe │ │ │ -00006f00: 6174 7920 6a75 6963 652c 2049 2067 756c aty juice, I gul │ │ │ -00006f10: 7020 736f 2066 6173 7420 5c6e 2020 2020 p so fast \n │ │ │ -00006f20: 4561 6368 2064 726f 7020 4920 6c69 636b Each drop I lick │ │ │ -00006f30: 2c20 646f 776e 2074 6f20 7468 6520 6c61 , down to the la │ │ │ -00006f40: 7374 205c 6e20 2020 2054 6865 2076 6572 st \n The ver │ │ │ -00006f50: 7469 676f 2049 206b 6e6f 7720 7769 6c6c tigo I know will │ │ │ -00006f60: 2070 6173 7320 5c6e 5c6e 2020 2020 4d79 pass \n\n My │ │ │ -00006f70: 206d 6f74 6865 7220 736d 696c 6573 2061 mother smiles a │ │ │ -00006f80: 6e64 2070 6174 7320 6d79 2068 6561 6420 nd pats my head │ │ │ -00006f90: 5c6e 2020 2020 5368 6527 7320 7072 6f75 \n She's prou │ │ │ -00006fa0: 6420 6f66 206d 652c 2073 6f20 7368 6520 d of me, so she │ │ │ -00006fb0: 6861 7320 7361 6964 205c 6e20 2020 204d has said \n M │ │ │ -00006fc0: 7920 706f 7020 6a75 7374 206e 6f77 2067 y pop just now g │ │ │ -00006fd0: 6574 7320 6f75 7420 6f66 2062 6564 205c ets out of bed \ │ │ │ -00006fe0: 6e20 2020 2048 6973 2065 7965 7320 7175 n His eyes qu │ │ │ -00006ff0: 6974 6520 636f 6d61 746f 7365 2061 6e64 ite comatose and │ │ │ -00007000: 2072 6564 205c 6e5c 6e20 2020 2048 6527 red \n\n He' │ │ │ -00007010: 6c6c 2065 6d70 6174 6869 7a65 206d 7920 ll empathize my │ │ │ -00007020: 6d69 6c6b 7920 6661 7465 205c 6e20 2020 milky fate \n │ │ │ -00007030: 2057 6869 6c65 7374 2073 6f70 7069 6e67 Whilest sopping │ │ │ -00007040: 2067 7261 7679 2066 726f 6d20 6869 7320 gravy from his │ │ │ -00007050: 706c 6174 6520 5c6e 2020 2020 416e 6420 plate \n And │ │ │ -00007060: 6173 2074 6865 2068 6f75 7220 6973 2067 as the hour is g │ │ │ -00007070: 6574 7469 6e67 206c 6174 6520 5c6e 2020 etting late \n │ │ │ -00007080: 2020 4869 7320 6265 6c6c 7920 7461 7574 His belly taut │ │ │ -00007090: 2077 6974 6820 616c 6c20 6865 2061 7465 with all he ate │ │ │ -000070a0: 205c 6e5c 6e20 2020 2048 6520 6973 6e27 \n\n He isn' │ │ │ -000070b0: 7420 6f66 7465 6e20 7175 6974 6520 736f t often quite so │ │ │ -000070c0: 2063 6861 7474 7920 5c6e 2020 2020 4869 chatty \n Hi │ │ │ -000070d0: 7320 6172 7465 7269 6573 2063 6c6f 6767 s arteries clogg │ │ │ -000070e0: 6564 2077 6974 6820 6d65 6174 2073 6f20 ed with meat so │ │ │ -000070f0: 6661 7474 7920 5c6e 2020 2020 5769 7468 fatty \n With │ │ │ -00007100: 2062 7572 7073 2074 6861 7420 6c61 756e burps that laun │ │ │ -00007110: 6368 2073 6f75 702c 2074 6869 636b 2061 ch soup, thick a │ │ │ -00007120: 6e64 2073 706c 6174 7479 205c 6e20 2020 nd splatty \n │ │ │ -00007130: 204f 6820 686f 7720 4920 7769 7368 2079 Oh how I wish y │ │ │ -00007140: 6f75 2764 206d 696c 6b20 6d65 2064 6164 ou'd milk me dad │ │ │ -00007150: 6479 5c6e 5c6e 0922 2022 5669 7369 7420 dy\n\n." "Visit │ │ │ -00007160: 4261 7272 7927 7320 686f 6d65 2070 6167 Barry's home pag │ │ │ -00007170: 6522 2022 5c6e 2220 6265 6e20 2253 696e e" "\n" ben "Sin │ │ │ -00007180: 6365 2053 6570 7465 6d62 6572 2031 3939 ce September 199 │ │ │ -00007190: 322c 2049 2776 6520 776f 726b 6564 206f 2, I've worked o │ │ │ -000071a0: 6e20 5845 6d61 6373 2061 7320 6120 636f n XEmacs as a co │ │ │ -000071b0: 6e74 7261 6374 6f72 2066 6f72 5c6e 7661 ntractor for\nva │ │ │ -000071c0: 7269 6f75 7320 636f 6d70 616e 6965 7320 rious companies │ │ │ -000071d0: 616e 6420 6d6f 7265 2072 6563 656e 746c and more recentl │ │ │ -000071e0: 7920 6173 2061 6e20 756e 7061 6964 2076 y as an unpaid v │ │ │ -000071f0: 6f6c 756e 7465 6572 2e5c 6e5c 6e41 6c61 olunteer.\n\nAla │ │ │ -00007200: 732c 206c 6966 6520 6861 7320 6e6f 7420 s, life has not │ │ │ -00007210: 6265 656e 2067 6f6f 6420 746f 206d 6520 been good to me │ │ │ -00007220: 7265 6365 6e74 6c79 2e20 2054 6869 7320 recently. This │ │ │ -00007230: 666f 726d 6572 2053 616e 5c6e 4672 616e former San\nFran │ │ │ -00007240: 6369 7363 6f20 5c22 4d69 7373 696f 6e20 cisco \"Mission │ │ │ -00007250: 4372 6974 7465 725c 2220 6465 7665 6c6f Critter\" develo │ │ │ -00007260: 7065 6420 696e 7369 6469 6f75 7320 6861 ped insidious ha │ │ │ -00007270: 6e64 2061 6e64 206e 6563 6b5c 6e70 726f nd and neck\npro │ │ │ -00007280: 626c 656d 7320 6166 7465 7220 6120 6272 blems after a br │ │ │ -00007290: 6965 6620 7374 696e 7420 776f 726b 696e ief stint workin │ │ │ -000072a0: 6720 6f6e 2061 204a 6176 612d 6261 7365 g on a Java-base │ │ │ -000072b0: 6420 5652 4d4c 2074 6f6f 6c6b 6974 2066 d VRML toolkit f │ │ │ -000072c0: 6f72 5c6e 7468 6520 6e6f 7720 6465 6675 or\nthe now defu │ │ │ -000072d0: 6e63 7420 4469 6d65 6e73 696f 6e20 582c nct Dimension X, │ │ │ -000072e0: 2061 6e64 2049 2077 6173 2066 6f72 6365 and I was force │ │ │ -000072f0: 6420 746f 2071 7569 7420 776f 726b 696e d to quit workin │ │ │ -00007300: 672e 2020 4920 7761 735c 6e65 7869 6c65 g. I was\nexile │ │ │ -00007310: 6420 6669 7273 7420 746f 205c 2253 7472 d first to \"Str │ │ │ -00007320: 6f6c 6c65 7220 5661 6c6c 6579 5c22 2061 oller Valley\" a │ │ │ -00007330: 6e64 206c 6174 6572 2061 6c6c 2074 6865 nd later all the │ │ │ -00007340: 2077 6179 2074 6f20 5475 6373 6f6e 2c5c way to Tucson,\ │ │ │ -00007350: 6e41 7269 7a6f 6e61 2c20 616e 6420 666f nArizona, and fo │ │ │ -00007360: 7220 7477 6f20 7965 6172 7320 7761 7320 r two years was │ │ │ -00007370: 616c 6d6f 7374 2063 6f6d 706c 6574 656c almost completel │ │ │ -00007380: 7920 6469 7361 626c 6564 2064 7565 2074 y disabled due t │ │ │ -00007390: 6f20 7061 696e 2e5c 6e4d 6f72 6520 7265 o pain.\nMore re │ │ │ -000073a0: 6365 6e74 6c79 2049 2068 6176 6520 666f cently I have fo │ │ │ -000073b0: 7567 6874 206d 7920 7761 7920 6261 636b ught my way back │ │ │ -000073c0: 2077 6974 6820 6c6f 6164 7320 616e 6420 with loads and │ │ │ -000073d0: 6c6f 6164 7320 6f66 5c6e 6e61 7263 6f74 loads of\nnarcot │ │ │ -000073e0: 6963 2070 6169 6e6b 696c 6c65 7273 2c20 ic painkillers, │ │ │ -000073f0: 616e 6420 6375 7272 656e 746c 7920 4927 and currently I' │ │ │ -00007400: 6d20 616e 2061 7274 2073 7475 6465 6e74 m an art student │ │ │ -00007410: 2061 7420 7468 655c 6e55 6e69 7665 7273 at the\nUnivers │ │ │ -00007420: 6974 7920 6f66 2041 7269 7a6f 6e61 2e5c ity of Arizona.\ │ │ │ -00007430: 6e5c 6e22 2022 4172 6368 6974 6563 7469 n\n" "Architecti │ │ │ -00007440: 6e67 2058 456d 6163 733a 2022 2062 656e ng XEmacs: " ben │ │ │ -00007450: 2d78 656d 6163 7320 2246 696e 6420 7468 -xemacs "Find th │ │ │ -00007460: 6520 6d69 7261 636c 6573 2069 6e20 7374 e miracles in st │ │ │ -00007470: 6f72 6520 666f 7220 5845 6d61 6373 2220 ore for XEmacs" │ │ │ -00007480: 225c 6e42 656e 2773 2068 6f6d 6520 7061 "\nBen's home pa │ │ │ -00007490: 6765 3a20 2020 2020 2220 2256 6973 6974 ge: " "Visit │ │ │ -000074a0: 2042 656e 2773 2070 6167 6522 2062 7720 Ben's page" bw │ │ │ -000074b0: 2248 6973 2069 6e74 6572 6573 7473 2069 "His interests i │ │ │ -000074c0: 6e63 6c75 6465 2075 7365 7220 696e 7465 nclude user inte │ │ │ -000074d0: 7266 6163 6573 2c20 696e 666f 726d 6174 rfaces, informat │ │ │ -000074e0: 696f 6e20 6d61 6e61 6765 6d65 6e74 2c20 ion management, │ │ │ -000074f0: 4341 5345 5c6e 746f 6f6c 732c 2063 6f6d CASE\ntools, com │ │ │ -00007500: 6d75 6e69 6361 7469 6f6e 7320 616e 6420 munications and │ │ │ -00007510: 656e 7465 7270 7269 7365 2069 6e74 6567 enterprise integ │ │ │ -00007520: 7261 7469 6f6e 2e5c 6e22 2063 6777 2063 ration.\n" cgw c │ │ │ -00007530: 6872 2022 4368 7269 7374 6961 6e20 6973 hr "Christian is │ │ │ -00007540: 2061 2073 7475 6465 6e74 2061 7420 7468 a student at th │ │ │ -00007550: 6520 4e6f 7277 6567 6961 6e20 5363 686f e Norwegian Scho │ │ │ -00007560: 6f6c 206f 6620 4563 6f6e 6f6d 6963 7320 ol of Economics │ │ │ -00007570: 616e 645c 6e42 7573 696e 6573 7320 4164 and\nBusiness Ad │ │ │ -00007580: 6d69 6e69 7374 7261 7469 6f6e 2069 6e20 ministration in │ │ │ -00007590: 4265 7267 656e 2c20 4e6f 7277 6179 2e20 Bergen, Norway. │ │ │ -000075a0: 2048 6520 7573 6564 2074 6f20 776f 726b He used to work │ │ │ -000075b0: 2066 6f72 2061 6e5c 6e69 6e74 6572 6e65 for an\ninterne │ │ │ -000075c0: 7420 7374 6172 7475 7020 6361 6c6c 6564 t startup called │ │ │ -000075d0: 204e 6577 204d 6564 6961 2053 6369 656e New Media Scien │ │ │ -000075e0: 6365 2c20 646f 696e 6720 7363 7269 7074 ce, doing script │ │ │ -000075f0: 696e 6720 616e 645c 6e76 696f 6c61 7469 ing and\nviolati │ │ │ -00007600: 6f6e 206f 6620 4854 4d4c 2044 5444 2773 on of HTML DTD's │ │ │ -00007610: 2e20 2041 6674 6572 2067 7261 6475 6174 . After graduat │ │ │ -00007620: 696f 6e2c 2073 7072 696e 6720 3139 3939 ion, spring 1999 │ │ │ -00007630: 2c20 6865 276c 6c20 6265 5c6e 6c6f 6f6b , he'll be\nlook │ │ │ -00007640: 696e 6720 666f 7220 6120 6a6f 6220 696e ing for a job in │ │ │ -00007650: 766f 6c76 696e 6720 6c69 7370 2070 726f volving lisp pro │ │ │ -00007660: 6772 616d 6d69 6e67 2c20 4672 656e 6368 gramming, French │ │ │ -00007670: 2061 6e64 2052 7573 7369 616e 2e5c 6e22 and Russian.\n" │ │ │ -00007680: 2063 7261 6967 2063 7468 6f6d 7020 2243 craig cthomp "C │ │ │ -00007690: 6875 636b 2069 7320 6120 7365 6e69 6f72 huck is a senior │ │ │ -000076a0: 2073 7973 7465 6d20 616e 6420 6e65 7477 system and netw │ │ │ -000076b0: 6f72 6b20 6164 6d69 6e69 7374 7261 746f ork administrato │ │ │ -000076c0: 7220 666f 7220 7468 6520 436f 6d70 7574 r for the Comput │ │ │ -000076d0: 6572 5c6e 5363 6965 6e63 6520 6465 7061 er\nScience depa │ │ │ -000076e0: 7274 6d65 6e74 2061 7420 7468 6520 556e rtment at the Un │ │ │ -000076f0: 7665 7273 6974 7920 6f66 2049 6c6c 696e versity of Illin │ │ │ -00007700: 6f69 732e 2020 496e 206f 6e65 2070 7265 ois. In one pre │ │ │ -00007710: 7669 6f75 7320 6c69 6665 5c6e 6865 2073 vious life\nhe s │ │ │ -00007720: 7065 6e74 2065 7665 7279 2077 616b 696e pent every wakin │ │ │ -00007730: 6720 686f 7572 2077 6f72 6b69 6e67 206f g hour working o │ │ │ -00007740: 6e20 5845 6d61 6373 2e20 2049 6e20 616e n XEmacs. In an │ │ │ -00007750: 6f74 6865 7220 6865 2064 6162 626c 6564 other he dabbled │ │ │ -00007760: 5c6e 6173 2061 2070 726f 6a65 6374 206d \nas a project m │ │ │ -00007770: 616e 6167 6572 2066 6f72 2061 2073 7472 anager for a str │ │ │ -00007780: 6561 6d69 6e67 2076 6964 656f 2073 7461 eaming video sta │ │ │ -00007790: 7274 7570 2028 5249 5029 2e20 2048 6973 rtup (RIP). His │ │ │ -000077a0: 2063 7572 7265 6e74 5c6e 7265 6173 6f6e current\nreason │ │ │ -000077b0: 2066 6f72 206e 6f74 2068 6176 696e 6720 for not having │ │ │ -000077c0: 7469 6d65 2074 6f20 636f 6e74 7269 6275 time to contribu │ │ │ -000077d0: 7465 2074 6f20 5845 6d61 6373 2069 7320 te to XEmacs is │ │ │ -000077e0: 7468 6520 5468 6f6d 7073 6f6e 5c6e 5477 the Thompson\nTw │ │ │ -000077f0: 696e 732e 5c6e 2220 6461 696b 6920 2256 ins.\n" daiki "V │ │ │ -00007800: 6973 6974 2044 6169 6b69 2773 2070 6167 isit Daiki's pag │ │ │ -00007810: 6522 2064 616e 2064 6172 7279 6c6f 2022 e" dan darrylo " │ │ │ -00007820: 5065 7265 6e6e 6961 6c20 456d 6163 7320 Perennial Emacs │ │ │ -00007830: 6861 636b 6572 2073 696e 6365 2031 3938 hacker since 198 │ │ │ -00007840: 3620 6f72 2073 6f2c 2077 6865 6e20 6865 6 or so, when he │ │ │ -00007850: 2066 6972 7374 2073 7461 7274 6564 206f first started o │ │ │ -00007860: 6e20 474e 555c 6e45 6d61 6373 2031 372e n GNU\nEmacs 17. │ │ │ -00007870: 736f 6d65 7468 696e 672e 2020 4f76 6572 something. Over │ │ │ -00007880: 2074 6865 2079 6561 7273 2c20 6865 2773 the years, he's │ │ │ -00007890: 2064 6576 656c 6f70 6564 205c 224f 456d developed \"OEm │ │ │ -000078a0: 6163 735c 222c 2074 6865 2066 6972 7374 acs\", the first │ │ │ -000078b0: 5c6e 7665 7273 696f 6e20 6f66 2047 4e55 \nversion of GNU │ │ │ -000078c0: 2045 6d61 6373 2031 3920 666f 7220 4d53 Emacs 19 for MS │ │ │ -000078d0: 444f 532c 2061 6e64 205c 2262 6967 7065 DOS, and \"bigpe │ │ │ -000078e0: 726c 5c22 2c20 6120 3332 2d62 6974 2076 rl\", a 32-bit v │ │ │ -000078f0: 6572 7369 6f6e 206f 665c 6e50 6572 6c34 ersion of\nPerl4 │ │ │ -00007900: 2066 6f72 204d 5344 4f53 2e20 2049 6e20 for MSDOS. In │ │ │ -00007910: 7265 6365 6e74 2079 6561 7273 2c20 7265 recent years, re │ │ │ -00007920: 616c 6974 7920 6861 7320 696e 7472 7564 ality has intrud │ │ │ -00007930: 6564 2061 6e64 2068 6520 6e6f 206c 6f6e ed and he no lon │ │ │ -00007940: 6765 725c 6e68 6173 206d 7563 6820 7469 ger\nhas much ti │ │ │ -00007950: 6d65 2066 6f72 2070 6c61 7969 6e67 2077 me for playing w │ │ │ -00007960: 6974 6820 636f 6f6c 2070 726f 6772 616d ith cool program │ │ │ -00007970: 732e 2020 5768 6174 206c 6974 746c 6520 s. What little │ │ │ -00007980: 7469 6d65 2068 6520 6861 735c 6e6e 6f77 time he has\nnow │ │ │ -00007990: 2067 6f65 7320 746f 2058 456d 6163 7320 goes to XEmacs │ │ │ -000079a0: 6861 636b 696e 672c 2077 6865 7265 2068 hacking, where h │ │ │ -000079b0: 6527 7320 776f 726b 6564 206f 6e20 7370 e's worked on sp │ │ │ -000079c0: 6565 6469 6e67 2075 7020 6469 7265 6420 eeding up dired │ │ │ -000079d0: 756e 6465 725c 6e4d 5320 5769 6e64 6f77 under\nMS Window │ │ │ -000079e0: 732c 2061 6e64 2074 6f20 6665 6564 696e s, and to feedin │ │ │ -000079f0: 6720 6869 7320 7477 6f20 6361 7473 2e5c g his two cats.\ │ │ │ -00007a00: 6e22 2064 6576 696e 2064 6b69 6e64 7265 n" devin dkindre │ │ │ -00007a10: 6420 2244 6172 7265 6c6c 2069 7320 6375 d "Darrell is cu │ │ │ -00007a20: 7272 656e 746c 7920 6120 646f 6374 6f72 rrently a doctor │ │ │ -00007a30: 616c 2073 7475 6465 6e74 2069 6e20 636f al student in co │ │ │ -00007a40: 6d70 7574 6572 2073 6369 656e 6365 2061 mputer science a │ │ │ -00007a50: 745c 6e43 6172 6e65 6769 6520 4d65 6c6c t\nCarnegie Mell │ │ │ -00007a60: 6f6e 2055 6e69 7665 7273 6974 792c 2062 on University, b │ │ │ -00007a70: 7574 2068 6527 7320 7472 7969 6e67 2068 ut he's trying h │ │ │ -00007a80: 6172 6420 746f 206b 6963 6b20 7468 6174 ard to kick that │ │ │ -00007a90: 5c6e 6861 6269 742e 5c6e 5c6e 5365 6520 \nhabit.\n\nSee │ │ │ -00007aa0: 2220 2256 6973 6974 2044 6172 7265 6c6c " "Visit Darrell │ │ │ -00007ab0: 2773 2057 5757 2070 6167 6522 2064 6d6f 's WWW page" dmo │ │ │ -00007ac0: 6f72 6520 2244 6176 6964 2069 7320 6120 ore "David is a │ │ │ -00007ad0: 7374 7564 656e 7420 696e 2074 6865 2043 student in the C │ │ │ -00007ae0: 6f6d 7075 7465 7220 5379 7374 656d 7320 omputer Systems │ │ │ -00007af0: 4c61 626f 7261 746f 7279 2061 7420 5543 Laboratory at UC │ │ │ -00007b00: 5344 2e20 2057 6865 6e5c 6e68 6520 6d61 SD. When\nhe ma │ │ │ -00007b10: 6e61 6765 7320 746f 2068 6176 6520 6672 nages to have fr │ │ │ -00007b20: 6565 2074 696d 652c 2068 6520 7573 7561 ee time, he usua │ │ │ -00007b30: 6c6c 7920 7370 656e 6473 2069 7420 6f6e lly spends it on │ │ │ -00007b40: 2032 3030 206d 696c 6520 6269 6379 636c 200 mile bicycl │ │ │ -00007b50: 655c 6e72 6964 6573 2c20 6c65 6172 6e69 e\nrides, learni │ │ │ -00007b60: 6e67 2047 6572 6d61 6e20 6f72 2073 686f ng German or sho │ │ │ -00007b70: 7769 6e67 2070 656f 706c 6520 7468 6520 wing people the │ │ │ -00007b80: 6265 7374 206d 6169 6c20 2620 6e65 7773 best mail & news │ │ │ -00007b90: 5c6e 656e 7669 726f 6e6d 656e 7420 6865 \nenvironment he │ │ │ -00007ba0: 2773 2066 6f75 6e64 2069 6e20 3130 2079 's found in 10 y │ │ │ -00007bb0: 6561 7273 2e20 2028 5468 6174 2764 2062 ears. (That'd b │ │ │ -00007bc0: 6520 5845 6d61 6373 2c20 476e 7573 2061 e XEmacs, Gnus a │ │ │ -00007bd0: 6e64 2062 6264 622c 5c6e 6f66 2063 6f75 nd bbdb,\nof cou │ │ │ -00007be0: 7273 652e 2920 2048 6520 6361 6e20 6265 rse.) He can be │ │ │ -00007bf0: 2066 6f75 6e64 2061 7420 6064 7275 6964 found at `druid │ │ │ -00007c00: 6d75 636b 2e65 6762 742e 6f72 6720 3432 muck.egbt.org 42 │ │ │ -00007c10: 3031 2720 6174 2076 6172 696f 7573 5c6e 01' at various\n │ │ │ -00007c20: 686f 7572 7320 6f66 2074 6865 2064 6179 hours of the day │ │ │ -00007c30: 2e5c 6e5c 6e48 6520 6861 7320 6120 7061 .\n\nHe has a pa │ │ │ -00007c40: 6765 2061 7420 2220 2256 6973 6974 2044 ge at " "Visit D │ │ │ -00007c50: 6176 6964 2773 2068 6f6d 6520 7061 6765 avid's home page │ │ │ -00007c60: 2220 6469 6469 6572 2022 4469 6469 6572 " didier "Didier │ │ │ -00007c70: 2068 6173 2061 2050 682e 442e 2069 6e20 has a Ph.D. in │ │ │ -00007c80: 436f 6d70 7574 6572 2053 6369 656e 6365 Computer Science │ │ │ -00007c90: 2061 6e64 2069 7320 6375 7272 656e 746c and is currentl │ │ │ -00007ca0: 7920 776f 726b 696e 6720 6173 2061 6e5c y working as an\ │ │ │ -00007cb0: 6e61 7373 6973 7461 6e74 2070 726f 6665 nassistant profe │ │ │ -00007cc0: 7373 6f72 2066 6f72 2061 6e20 656e 6769 ssor for an engi │ │ │ -00007cd0: 6e65 6572 696e 6720 7363 686f 6f6c 2069 neering school i │ │ │ -00007ce0: 6e20 5061 7269 7329 2e20 2048 6520 6769 n Paris). He gi │ │ │ -00007cf0: 7665 735c 6e6c 6563 7475 7265 7320 6f6e ves\nlectures on │ │ │ -00007d00: 204f 7065 7261 7469 6e67 2053 7973 7465 Operating Syste │ │ │ -00007d10: 6d73 2c20 436f 6d70 7574 6572 2047 7261 ms, Computer Gra │ │ │ -00007d20: 7068 6963 732c 2046 756e 6374 696f 6e61 phics, Functiona │ │ │ -00007d30: 6c20 5072 6f67 7261 6d6d 696e 675c 6e61 l Programming\na │ │ │ -00007d40: 6e64 2054 7970 6573 6574 7469 6e67 2e20 nd Typesetting. │ │ │ -00007d50: 2048 6973 2072 6573 6561 7263 6820 696e His research in │ │ │ -00007d60: 7465 7265 7374 7320 696e 636c 7564 6520 terests include │ │ │ -00007d70: 4765 6e65 7269 6369 7479 2c20 4f62 6a65 Genericity, Obje │ │ │ -00007d80: 6374 5c6e 4f72 6965 6e74 6174 696f 6e20 ct\nOrientation │ │ │ -00007d90: 616e 6420 4675 6e63 7469 6f6e 616c 2050 and Functional P │ │ │ -00007da0: 726f 6772 616d 6d69 6e67 2c20 616c 6c20 rogramming, all │ │ │ -00007db0: 696e 206f 6e65 206c 616e 6775 6167 653a in one language: │ │ │ -00007dc0: 5c6e 5c6e 2e2e 2e20 436f 6d6d 6f6e 204c \n\n... Common L │ │ │ -00007dd0: 6973 702e 5c6e 5c6e 5c6e 4170 6172 7420 isp.\n\n\nApart │ │ │ -00007de0: 6672 6f6d 2074 6865 2077 6f72 6c64 206f from the world o │ │ │ -00007df0: 6620 5845 6d61 6373 2061 6e64 2045 6d61 f XEmacs and Ema │ │ │ -00007e00: 6373 204c 6973 702c 2044 6964 6965 7220 cs Lisp, Didier │ │ │ -00007e10: 6973 2061 6c73 6f20 7468 6520 6175 7468 is also the auth │ │ │ -00007e20: 6f72 5c6e 6f66 2073 6576 6572 616c 204c or\nof several L │ │ │ -00007e30: 6154 6558 2070 6163 6b61 6765 7320 2846 aTeX packages (F │ │ │ -00007e40: 694e 4b2c 2046 6958 6d65 2c20 5143 4d20 iNK, FiXme, QCM │ │ │ -00007e50: 616e 6420 4375 7256 6529 2061 6e64 2061 and CurVe) and a │ │ │ -00007e60: 6e20 6f63 6361 7369 6f6e 616c 5c6e 636f n occasional\nco │ │ │ -00007e70: 6e74 7269 6275 746f 7220 746f 206f 7468 ntributor to oth │ │ │ -00007e80: 6572 2046 7265 6520 536f 6674 7761 7265 er Free Software │ │ │ -00007e90: 2070 726f 6a65 6374 7320 2874 6865 2047 projects (the G │ │ │ -00007ea0: 4e55 2041 7574 6f74 6f6f 6c73 206d 6f73 NU Autotools mos │ │ │ -00007eb0: 745c 6e6e 6f74 6162 6c79 3b20 6865 2077 t\nnotably; he w │ │ │ -00007ec0: 6173 206f 6e65 206f 6620 7468 6520 7465 as one of the te │ │ │ -00007ed0: 6368 6e69 6361 6c20 7265 7669 6577 6572 chnical reviewer │ │ │ -00007ee0: 7320 666f 7220 7468 6520 5c22 476f 6174 s for the \"Goat │ │ │ -00007ef0: 2042 6f6f 6b5c 2229 2e5c 6e5c 6e42 7574 Book\").\n\nBut │ │ │ -00007f00: 2061 6c6c 206f 6620 7468 6973 2069 7320 all of this is │ │ │ -00007f10: 6f6e 6c79 2036 3025 2074 7275 652e 2e2e only 60% true... │ │ │ -00007f20: 2054 776f 2064 6179 7320 7065 7220 7765 Two days per we │ │ │ -00007f30: 656b 2c20 4469 6469 6572 2069 7320 696e ek, Didier is in │ │ │ -00007f40: 6465 6564 5c6e 6120 7365 6d69 2d70 726f deed\na semi-pro │ │ │ -00007f50: 6665 7373 696f 6e61 6c20 4a61 7a7a 2067 fessional Jazz g │ │ │ -00007f60: 7569 7461 7220 706c 6179 6572 2028 616e uitar player (an │ │ │ -00007f70: 6420 7369 6e67 6572 292c 2077 6869 6368 d singer), which │ │ │ -00007f80: 206d 6561 6e73 2074 6861 7420 6865 5c6e means that he\n │ │ │ -00007f90: 646f 6573 6e27 7420 7175 6974 6520 6561 doesn't quite ea │ │ │ -00007fa0: 726e 2068 6973 2063 7275 7374 2077 6974 rn his crust wit │ │ │ -00007fb0: 6820 6974 2c20 6275 7420 7468 696e 6773 h it, but things │ │ │ -00007fc0: 206d 6179 2076 6572 7920 7765 6c6c 2072 may very well r │ │ │ -00007fd0: 6576 6572 7365 2069 6e5c 6e74 6865 2066 everse in\nthe f │ │ │ -00007fe0: 7574 7572 652e 2e2e 5c6e 2220 225c 6e56 uture...\n" "\nV │ │ │ -00007ff0: 6973 6974 2044 6964 6965 7227 7320 7363 isit Didier's sc │ │ │ -00008000: 6965 6e74 6966 6963 2077 6562 7369 7465 ientific website │ │ │ -00008010: 3a20 2220 2256 6973 6974 2044 6964 6965 : " "Visit Didie │ │ │ -00008020: 7227 7320 7363 6965 6e74 6966 6963 2077 r's scientific w │ │ │ -00008030: 6562 7369 7465 2220 225c 6e56 6973 6974 ebsite" "\nVisit │ │ │ -00008040: 2044 6964 6965 7227 7320 6d75 7369 6361 Didier's musica │ │ │ -00008050: 6c20 7765 6273 6974 653a 2022 2064 766c l website: " dvl │ │ │ -00008060: 6a61 7a7a 2022 5669 7369 7420 4469 6469 jazz "Visit Didi │ │ │ -00008070: 6572 2773 206d 7573 6963 616c 2077 6562 er's musical web │ │ │ -00008080: 7369 7465 2220 6562 2066 6162 7269 6365 site" eb fabrice │ │ │ -00008090: 2022 4927 6d20 6120 636f 6d70 7574 6572 "I'm a computer │ │ │ -000080a0: 2073 6369 656e 6365 2072 6573 6561 7263 science researc │ │ │ -000080b0: 6865 7220 616e 6420 7465 6163 6865 7220 her and teacher │ │ │ -000080c0: 696e 2061 2046 7265 6e63 6820 656c 6563 in a French elec │ │ │ -000080d0: 7472 6963 616c 5c6e 656e 6769 6e65 6572 trical\nengineer │ │ │ -000080e0: 696e 6720 696e 7374 6974 7574 696f 6e20 ing institution │ │ │ -000080f0: 6361 6c6c 6564 2053 7570 656c 6563 2e20 called Supelec. │ │ │ -00008100: 4d79 2066 6965 6c64 7320 6f66 2069 6e74 My fields of int │ │ │ -00008110: 6572 6573 7420 6172 655c 6e73 796d 626f erest are\nsymbo │ │ │ -00008120: 6c69 6320 6172 7469 6669 6369 616c 2069 lic artificial i │ │ │ -00008130: 6e74 656c 6c69 6765 6e63 652c 2074 6865 ntelligence, the │ │ │ -00008140: 6f72 6574 6963 616c 2063 6f6d 7075 7465 oretical compute │ │ │ -00008150: 7220 7363 6965 6e63 652c 2066 756e 6374 r science, funct │ │ │ -00008160: 696f 6e61 6c5c 6e6c 616e 6775 6167 6573 ional\nlanguages │ │ │ -00008170: 202e 2e2e 2061 6e64 2054 6558 2e5c 6e5c ... and TeX.\n\ │ │ │ -00008180: 6e4c 6174 656c 792c 206d 7920 6861 636b nLately, my hack │ │ │ -00008190: 696e 6720 7469 6d65 2068 6173 2062 6565 ing time has bee │ │ │ -000081a0: 6e20 6465 766f 7465 6420 746f 2070 6f72 n devoted to por │ │ │ -000081b0: 7469 6e67 2074 6865 2057 6562 3243 2f74 ting the Web2C/t │ │ │ -000081c0: 6554 6558 5c6e 6469 7374 7269 6275 7469 eTeX\ndistributi │ │ │ -000081d0: 6f6e 206f 6620 5465 5820 666f 7220 556e on of TeX for Un │ │ │ -000081e0: 6978 2074 6f20 5769 6e33 322c 2061 6e64 ix to Win32, and │ │ │ -000081f0: 2049 276d 2073 7469 6c6c 206d 6169 6e74 I'm still maint │ │ │ -00008200: 6169 6e69 6e67 2069 742e 5c6e 4974 2069 aining it.\nIt i │ │ │ -00008210: 7320 696e 636c 7564 6564 2069 6e20 7468 s included in th │ │ │ -00008220: 6520 5465 5820 4c69 7665 2063 6472 6f6d e TeX Live cdrom │ │ │ -00008230: 2065 6469 7465 6420 6279 2053 6562 6173 edited by Sebas │ │ │ -00008240: 7469 616e 2052 6168 747a 2e5c 6e22 2022 tian Rahtz.\n" " │ │ │ -00008250: 5669 7369 7420 6670 5465 5820 686f 6d65 Visit fpTeX home │ │ │ -00008260: 2070 6167 653a 2022 2066 7074 6578 2022 page: " fptex " │ │ │ -00008270: 5669 7369 7420 6670 5465 5820 686f 6d65 Visit fpTeX home │ │ │ -00008280: 2070 6167 6522 2022 5c6e 4661 6272 6963 page" "\nFabric │ │ │ -00008290: 6527 7320 686f 6d65 2070 6167 653a 2020 e's home page: │ │ │ -000082a0: 2022 2022 5669 7369 7420 4661 6272 6963 " "Visit Fabric │ │ │ -000082b0: 6527 7320 7061 6765 2220 676f 6c75 6265 e's page" golube │ │ │ -000082c0: 7620 2249 2061 7070 7265 6369 6174 6520 v "I appreciate │ │ │ -000082d0: 706f 7765 7220 6f66 2058 456d 6163 732c power of XEmacs, │ │ │ -000082e0: 2062 7574 2065 6c65 6d65 6e74 6172 7920 but elementary │ │ │ -000082f0: 6564 6974 696e 6720 6f70 6572 6174 696f editing operatio │ │ │ -00008300: 6e73 2073 686f 756c 645c 6e62 6520 646f ns should\nbe do │ │ │ -00008310: 6e65 2062 7920 7369 6e67 6c65 206b 6579 ne by single key │ │ │ -00008320: 7374 726f 6b65 7320 7769 7468 206e 6f20 strokes with no │ │ │ -00008330: 6d6f 6469 6669 6572 732e 2020 536f 2077 modifiers. So w │ │ │ -00008340: 6f75 6c64 206e 6f74 2075 7365 5c6e 5845 ould not use\nXE │ │ │ -00008350: 6d61 6373 2075 6e74 696c 2064 6973 636f macs until disco │ │ │ -00008360: 7665 7265 6420 7669 7065 722c 2061 6e64 vered viper, and │ │ │ -00008370: 206e 6f77 2063 616e 2774 206c 6976 6520 now can't live │ │ │ -00008380: 7769 7468 6f75 7420 7669 7065 722e 5c6e without viper.\n │ │ │ -00008390: 4f63 6361 7369 6f6e 616c 6c79 2064 6973 Occasionally dis │ │ │ -000083a0: 6c69 6b65 2073 6f6d 6574 6869 6e67 2069 like something i │ │ │ -000083b0: 6e20 7468 6572 6520 6f72 2069 6e20 6f74 n there or in ot │ │ │ -000083c0: 6865 7220 6672 6565 2073 6f66 7477 6172 her free softwar │ │ │ -000083d0: 652c 2061 6e64 5c6e 7472 7920 746f 2067 e, and\ntry to g │ │ │ -000083e0: 6574 2069 7420 6669 7865 642e 2020 2e70 et it fixed. .p │ │ │ -000083f0: 6c61 6e20 6669 6c65 2063 6f6e 7461 696e lan file contain │ │ │ -00008400: 7320 636c 6173 7369 6320 2870 6572 6861 s classic (perha │ │ │ -00008410: 7073 2072 6569 6e76 656e 7465 645c 6e69 ps reinvented\ni │ │ │ -00008420: 6e64 6570 656e 6465 6e74 6c79 2920 666f ndependently) fo │ │ │ -00008430: 726d 756c 613a 5c6e 5c6e 4861 636b 696e rmula:\n\nHackin │ │ │ -00008440: 6720 776f 726c 6420 666f 7220 6576 6572 g world for ever │ │ │ -00008450: 5c6e 5c6e 2862 6f72 726f 7765 6420 6672 \n\n(borrowed fr │ │ │ -00008460: 6f6d 205c 2248 6163 6b69 6e67 2058 2066 om \"Hacking X f │ │ │ -00008470: 6f72 2059 5c22 2069 6e20 2220 2268 7474 or Y\" in " "htt │ │ │ -00008480: 703a 2f2f 7777 772e 6a61 7267 6f6e 2e6f p://www.jargon.o │ │ │ -00008490: 7267 2f22 2022 4a61 7267 6f6e 2046 696c rg/" "Jargon Fil │ │ │ -000084a0: 6522 2022 7777 772e 6a61 7267 6f6e 2e6f e" "www.jargon.o │ │ │ -000084b0: 7267 2220 2229 2e5c 6e22 2067 756e 6e61 rg" ").\n" gunna │ │ │ -000084c0: 7220 6862 7320 6869 7361 7368 6920 686d r hbs hisashi hm │ │ │ -000084d0: 756c 6c65 7220 686e 696b 7369 6320 2248 uller hniksic "H │ │ │ -000084e0: 7276 6f6a 6520 7468 696e 6b73 2068 6520 rvoje thinks he │ │ │ -000084f0: 776f 726b 7320 696e 2074 6865 2073 6572 works in the ser │ │ │ -00008500: 7665 722d 7369 6465 2077 6562 2062 7573 ver-side web bus │ │ │ -00008510: 696e 6573 732e 2020 496e 2072 6561 6c69 iness. In reali │ │ │ -00008520: 7479 2c5c 6e68 6520 6372 616e 6b73 206f ty,\nhe cranks o │ │ │ -00008530: 7574 2068 7567 6520 7175 616e 7469 7469 ut huge quantiti │ │ │ -00008540: 6573 206f 6620 4854 4d4c 2c20 5463 6c2c es of HTML, Tcl, │ │ │ -00008550: 2061 6e64 204a 6176 6120 666f 7220 7468 and Java for th │ │ │ -00008560: 6520 4765 726d 616e 5c6e 6272 616e 6368 e German\nbranch │ │ │ -00008570: 206f 6620 2220 2268 7474 703a 2f2f 7777 of " "http://ww │ │ │ -00008580: 772e 6172 7364 6967 6974 612e 636f 6d2f w.arsdigita.com/ │ │ │ -00008590: 2220 2241 7273 4469 6769 7461 2c20 496e " "ArsDigita, In │ │ │ -000085a0: 632e 2220 2277 7777 2e61 7273 6469 6769 c." "www.arsdigi │ │ │ -000085b0: 7461 2e63 6f6d 2220 666f 726d 6174 2022 ta.com" format " │ │ │ -000085c0: 4d25 636e 6368 656e 2220 6d61 6b65 2d63 M%cnchen" make-c │ │ │ -000085d0: 6861 7220 6c61 7469 6e2d 6973 6f38 3835 har latin-iso885 │ │ │ -000085e0: 392d 3120 3235 3220 2220 2048 6520 6a6f 9-1 252 " He jo │ │ │ -000085f0: 696e 6564 2074 6865 2072 616e 6b73 206f ined the ranks o │ │ │ -00008600: 6620 4761 7374 6172 6265 6974 6572 7320 f Gastarbeiters │ │ │ -00008610: 6f6e 6c79 5c6e 7265 6365 6e74 6c79 3b20 only\nrecently; │ │ │ -00008620: 6865 2069 7320 7472 7969 6e67 2074 6f20 he is trying to │ │ │ -00008630: 6c65 6172 6e20 4765 726d 616e 2061 6e64 learn German and │ │ │ -00008640: 2067 6574 2061 7474 756e 6564 2074 6f20 get attuned to │ │ │ -00008650: 2573 5c6e 616e 6420 4261 765e 485e 485e %s\nand Bav^H^H^ │ │ │ -00008660: 4847 6572 6d61 6e79 2e5c 6e22 2022 5c6e HGermany.\n" "\n │ │ │ -00008670: 4265 666f 7265 2041 7273 4469 6769 7461 Before ArsDigita │ │ │ -00008680: 2c20 6865 2077 6f72 6b65 6420 6173 2061 , he worked as a │ │ │ -00008690: 2070 726f 6772 616d 6d65 7220 6174 2022 programmer at " │ │ │ -000086a0: 2022 6874 7470 3a2f 2f77 7777 2e69 736b "http://www.isk │ │ │ -000086b0: 6f6e 2e68 722f 2220 2249 736b 6f6e 2c22 on.hr/" "Iskon," │ │ │ -000086c0: 2022 7777 772e 6973 6b6f 6e2e 6872 2220 "www.iskon.hr" │ │ │ -000086d0: 2220 6120 6661 7374 2d67 726f 7769 6e67 " a fast-growing │ │ │ -000086e0: 5c6e 4372 6f61 7469 616e 2049 5350 2e20 \nCroatian ISP. │ │ │ -000086f0: 2045 7665 6e20 6265 666f 7265 2074 6861 Even before tha │ │ │ -00008700: 742c 2068 6520 776f 726b 6564 2070 6172 t, he worked par │ │ │ -00008710: 742d 7469 6d65 2066 6f72 2061 6361 6465 t-time for acade │ │ │ -00008720: 6d69 635c 6e69 6e73 7469 7475 7469 6f6e mic\ninstitution │ │ │ -00008730: 7320 6c69 6b65 2022 2022 6874 7470 3a2f s like " "http:/ │ │ │ -00008740: 2f77 7777 2e73 7263 652e 6872 2f22 2022 /www.srce.hr/" " │ │ │ -00008750: 5352 4345 2220 2277 7777 2e73 7263 652e SRCE" "www.srce. │ │ │ -00008760: 6872 2220 2220 616e 6420 2220 2268 7474 hr" " and " "htt │ │ │ -00008770: 703a 2f2f 7777 772e 6361 726e 6574 2e68 p://www.carnet.h │ │ │ -00008780: 722f 2220 2243 4152 4e65 742c 2220 2277 r/" "CARNet," "w │ │ │ -00008790: 7777 2e63 6172 6e65 742e 6872 2220 2220 ww.carnet.hr" " │ │ │ -000087a0: 616e 6420 7472 6965 6420 746f 2061 7474 and tried to att │ │ │ -000087b0: 656e 6420 756e 6976 6572 7369 7479 2e5c end university.\ │ │ │ -000087c0: 6e5c 6e48 6520 7461 6b65 7320 7065 7276 n\nHe takes perv │ │ │ -000087d0: 6572 7365 2070 6c65 6173 7572 6520 696e erse pleasure in │ │ │ -000087e0: 2062 7569 6c64 696e 6720 616e 6420 6d61 building and ma │ │ │ -000087f0: 696e 7461 696e 696e 6720 6672 6565 2073 intaining free s │ │ │ -00008800: 6f66 7477 6172 655c 6e69 6e20 6869 7320 oftware\nin his │ │ │ -00008810: 6672 6565 2074 696d 652e 2020 4170 6172 free time. Apar │ │ │ -00008820: 7420 6672 6f6d 2058 456d 6163 732c 2068 t from XEmacs, h │ │ │ -00008830: 6973 206d 616a 6f72 2063 6f6e 7472 6962 is major contrib │ │ │ -00008840: 7574 696f 6e20 6973 2022 2077 6765 7420 ution is " wget │ │ │ -00008850: 2257 6765 742c 2220 2257 6765 7420 686f "Wget," "Wget ho │ │ │ -00008860: 6d65 2070 6167 6522 2022 5c6e 6869 7320 me page" "\nhis │ │ │ -00008870: 7665 7279 206f 776e 2063 7265 6174 696f very own creatio │ │ │ -00008880: 6e2c 206e 6f77 206a 6f69 6e74 6c79 206d n, now jointly m │ │ │ -00008890: 6169 6e74 6169 6e65 6420 6279 2061 2068 aintained by a h │ │ │ -000088a0: 6170 7079 2063 7265 772e 5c6e 5c6e 4865 appy crew.\n\nHe │ │ │ -000088b0: 2064 7265 616d 7320 6f66 2068 6176 696e dreams of havin │ │ │ -000088c0: 6720 6120 686f 6d65 2070 6167 652e 5c6e g a home page.\n │ │ │ -000088d0: 2220 686f 626c 6579 2022 4920 7573 6564 " hobley "I used │ │ │ -000088e0: 2074 6f20 646f 2072 6561 6c20 776f 726b to do real work │ │ │ -000088f0: 2c20 6275 7420 6e6f 7720 4920 616d 2061 , but now I am a │ │ │ -00008900: 2050 726f 6a65 6374 204d 616e 6167 6572 Project Manager │ │ │ -00008910: 2066 6f72 206f 6e65 206f 6620 7468 655c for one of the\ │ │ │ -00008920: 6e54 656c 636f 2773 2069 6e20 4175 7374 nTelco's in Aust │ │ │ -00008930: 7261 6c69 612e 2049 6e20 6d79 2073 7061 ralia. In my spa │ │ │ -00008940: 7265 2074 696d 6520 4920 6c69 6b65 2074 re time I like t │ │ │ -00008950: 6f20 6765 7420 6261 636b 2074 6f20 6261 o get back to ba │ │ │ -00008960: 7369 6373 2061 6e64 5c6e 6d75 636b 2061 sics and\nmuck a │ │ │ -00008970: 726f 756e 6420 7769 7468 2074 6869 6e67 round with thing │ │ │ -00008980: 732e 2041 7320 6120 7265 7375 6c74 2049 s. As a result I │ │ │ -00008990: 2073 7461 7274 6564 2074 6865 204e 5420 started the NT │ │ │ -000089a0: 706f 7274 2e20 486f 7065 6675 6c6c 7920 port. Hopefully │ │ │ -000089b0: 495c 6e77 696c 6c20 6765 7420 746f 2066 I\nwill get to f │ │ │ -000089c0: 696e 6973 6820 6974 2073 6f6d 6574 696d inish it sometim │ │ │ -000089d0: 6520 736f 6f6e 6572 2072 6174 6865 7220 e sooner rather │ │ │ -000089e0: 7468 616e 206c 6174 6572 2e20 4920 646f than later. I do │ │ │ -000089f0: 2076 6167 7565 6c79 5c6e 7265 6d65 6d62 vaguely\nrememb │ │ │ -00008a00: 6572 2055 6e69 7665 7273 6974 7920 7768 er University wh │ │ │ -00008a10: 6572 6520 6974 2073 6565 6d73 206c 696b ere it seems lik │ │ │ -00008a20: 6520 4920 6861 6420 6d6f 7265 2073 7061 e I had more spa │ │ │ -00008a30: 7265 2074 696d 6520 7468 6174 2049 2063 re time that I c │ │ │ -00008a40: 616e 5c6e 6265 6c69 6576 6520 6e6f 772e an\nbelieve now. │ │ │ -00008a50: 204f 6820 7765 6c6c 2c20 7375 6368 2069 Oh well, such i │ │ │ -00008a60: 7320 6c69 6665 2e5c 6e22 206a 616e 2022 s life.\n" jan " │ │ │ -00008a70: 4a61 6e20 5672 6f6f 6e68 6f66 2068 6173 Jan Vroonhof has │ │ │ -00008a80: 2062 6565 6e20 7573 696e 6720 5845 6d61 been using XEma │ │ │ -00008a90: 6373 2073 696e 6365 2068 6520 6e65 6564 cs since he need │ │ │ -00008aa0: 6564 2074 6f20 7772 6974 6520 2e74 6578 ed to write .tex │ │ │ -00008ab0: 2066 696c 6573 5c6e 666f 7220 6869 7320 files\nfor his │ │ │ -00008ac0: 776f 726b 2061 7320 6120 7068 7973 6963 work as a physic │ │ │ -00008ad0: 7320 616e 6420 6d61 7468 7320 7374 7564 s and maths stud │ │ │ -00008ae0: 656e 7420 6174 2074 6865 2055 6e69 7665 ent at the Unive │ │ │ -00008af0: 7269 7369 7479 206f 6620 4c65 6964 656e risity of Leiden │ │ │ -00008b00: 2e5c 6e48 6973 2058 456d 6163 7320 6861 .\nHis XEmacs ha │ │ │ -00008b10: 636b 696e 6720 7374 6172 7465 6420 7768 cking started wh │ │ │ -00008b20: 656e 2058 456d 6163 7320 6b65 7074 2066 en XEmacs kept f │ │ │ -00008b30: 7265 657a 696e 6720 7570 2075 6e64 6572 reezing up under │ │ │ -00008b40: 2061 2068 6973 5c6e 7769 6e64 6f77 206d a his\nwindow m │ │ │ -00008b50: 616e 6167 6572 2e20 4865 2073 7562 6d69 anager. He submi │ │ │ -00008b60: 7474 6564 2061 2066 6978 2061 6e64 2068 tted a fix and h │ │ │ -00008b70: 6173 2062 6565 6e20 686f 6f6b 6564 2065 as been hooked e │ │ │ -00008b80: 7665 7279 2073 696e 6365 2e5c 6e5c 6e58 very since.\n\nX │ │ │ -00008b90: 456d 6163 7320 6861 7320 666f 6c6c 6f77 Emacs has follow │ │ │ -00008ba0: 6564 2068 696d 2066 6972 7374 2074 6f20 ed him first to │ │ │ -00008bb0: 5377 6974 7a65 726c 616e 6420 7768 6572 Switzerland wher │ │ │ -00008bc0: 6520 6865 2064 6964 2061 206d 6174 6873 e he did a maths │ │ │ -00008bd0: 5c6e 646f 6374 6f72 6174 6520 6174 2074 \ndoctorate at t │ │ │ -00008be0: 6865 2045 5448 2069 6e20 5a75 7269 6368 he ETH in Zurich │ │ │ -00008bf0: 2c20 776f 726b 696e 6720 6f6e 2061 2063 , working on a c │ │ │ -00008c00: 6f6e 6a65 6374 7572 6520 6279 204d 6967 onjecture by Mig │ │ │ -00008c10: 6461 6c20 6f6e 5c6e 7468 6520 6265 6861 dal on\nthe beha │ │ │ -00008c20: 7669 6f72 206f 6620 7665 7274 6578 2063 vior of vertex c │ │ │ -00008c30: 6f72 7265 6374 696f 6e73 2069 6e20 456c orrections in El │ │ │ -00008c40: 6563 7472 6f6e 2d50 686f 6e6f 6e20 7468 ectron-Phonon th │ │ │ -00008c50: 656f 7279 2e20 2046 696e 616c 6c79 5c6e eory. Finally\n │ │ │ -00008c60: 7368 6172 696e 6720 6120 686f 7573 6520 sharing a house │ │ │ -00008c70: 7769 7468 2068 6973 206c 6f76 6564 206f with his loved o │ │ │ -00008c80: 6e65 2c20 6865 206e 6f77 206c 6976 6573 ne, he now lives │ │ │ -00008c90: 2069 6e20 4f78 666f 7264 2028 554b 295c in Oxford (UK)\ │ │ │ -00008ca0: 6e77 6f72 6b69 6e67 206f 6e20 7468 6520 nworking on the │ │ │ -00008cb0: 4a65 6f64 6520 4a61 7661 2056 6972 7475 Jeode Java Virtu │ │ │ -00008cc0: 616c 204d 6163 6869 6e65 2c20 7768 6963 al Machine, whic │ │ │ -00008cd0: 6820 6c69 6b65 2058 456d 6163 7320 6973 h like XEmacs is │ │ │ -00008ce0: 5c6e 706f 7274 6162 6c65 2c20 696d 706c \nportable, impl │ │ │ -00008cf0: 656d 656e 7473 2061 206c 616e 6775 6167 ements a languag │ │ │ -00008d00: 652c 2069 6e63 6c75 6465 7320 6120 6e6f e, includes a no │ │ │ -00008d10: 6e2d 7472 6976 6961 6c20 6269 7420 6f66 n-trivial bit of │ │ │ -00008d20: 5c6e 6772 6170 6869 6373 2061 6e64 2061 \ngraphics and a │ │ │ -00008d30: 2067 6172 6261 6765 2063 6f6c 6c65 6374 garbage collect │ │ │ -00008d40: 6f72 2c20 6275 7420 6973 206d 756c 7469 or, but is multi │ │ │ -00008d50: 7468 7265 6164 6564 2074 6f20 626f 6f74 threaded to boot │ │ │ -00008d60: 215c 6e55 6e66 6f72 7475 6e61 7465 6c79 !\nUnfortunately │ │ │ -00008d70: 2068 6973 2058 456d 6163 7320 7469 6d65 his XEmacs time │ │ │ -00008d80: 2069 7320 6469 7265 6374 6c79 206c 696d is directly lim │ │ │ -00008d90: 6974 6564 2062 7920 7468 6520 616d 6f75 ited by the amou │ │ │ -00008da0: 6e74 206f 665c 6e74 7261 6666 6963 206f nt of\ntraffic o │ │ │ -00008db0: 6e20 7468 6520 4d34 302e 5c6e 2220 6a61 n the M40.\n" ja │ │ │ -00008dc0: 7320 225c 6e53 696d 6f6e 206c 6976 6573 s "\nSimon lives │ │ │ -00008dd0: 2069 6e20 5374 6f63 6b68 6f6c 6d20 7768 in Stockholm wh │ │ │ -00008de0: 6572 6520 6865 2068 6173 2064 6973 636f ere he has disco │ │ │ -00008df0: 7665 7265 6420 7468 6174 2063 6f6d 7075 vered that compu │ │ │ -00008e00: 7465 7273 5c6e 6361 6e20 6265 2061 2070 ters\ncan be a p │ │ │ -00008e10: 6f77 6572 6675 6c20 7072 6f63 7261 7374 owerful procrast │ │ │ -00008e20: 696e 6174 696e 6720 746f 6f6c 2e20 2043 inating tool. C │ │ │ -00008e30: 6f6d 6269 6e65 6420 7769 7468 2061 5c6e ombined with a\n │ │ │ -00008e40: 6672 7573 7472 6174 696e 6720 6465 7369 frustrating desi │ │ │ -00008e50: 7265 2074 6f20 7365 6520 636f 6d70 7574 re to see comput │ │ │ -00008e60: 6572 7320 7369 6d70 6c79 2077 6f72 6b2c ers simply work, │ │ │ -00008e70: 2068 6520 7370 656e 6473 206d 6f73 745c he spends most\ │ │ │ -00008e80: 6e6f 6620 6869 7320 7469 6d65 2063 6f6d nof his time com │ │ │ -00008e90: 706c 6169 6e69 6e67 2e20 204f 6363 6173 plaining. Occas │ │ │ -00008ea0: 696f 6e61 6c6c 7920 6865 2072 6973 6573 ionally he rises │ │ │ -00008eb0: 2075 7020 746f 2074 6865 2074 6173 6b5c up to the task\ │ │ │ -00008ec0: 6e61 6e64 2070 726f 6475 6365 7320 736f nand produces so │ │ │ -00008ed0: 6d65 7468 696e 6720 7468 6174 206f 7468 mething that oth │ │ │ -00008ee0: 6572 7320 6d61 7920 636f 6d70 6c61 696e ers may complain │ │ │ -00008ef0: 2061 626f 7574 2c20 7768 6963 685c 6e62 about, which\nb │ │ │ -00008f00: 7269 6e67 7320 6869 6d20 696e 6372 6561 rings him increa │ │ │ -00008f10: 7365 6420 7361 7469 7366 6163 7469 6f6e sed satisfaction │ │ │ -00008f20: 2077 6974 6820 6576 6572 7920 6275 6720 with every bug │ │ │ -00008f30: 7265 706f 7274 2e20 2054 6f64 6179 5c6e report. Today\n │ │ │ -00008f40: 6865 2069 7320 7072 6574 656e 6469 6e67 he is pretending │ │ │ -00008f50: 2074 6f20 6265 2061 206e 6574 776f 726b to be a network │ │ │ -00008f60: 2073 6563 7572 6974 7920 6775 792c 2077 security guy, w │ │ │ -00008f70: 6974 6820 6120 7072 6566 6572 656e 6365 ith a preference │ │ │ -00008f80: 5c6e 666f 7220 7374 616e 6461 7264 697a \nfor standardiz │ │ │ -00008f90: 6174 696f 6e20 6973 7375 6573 2c20 7768 ation issues, wh │ │ │ -00008fa0: 696c 6520 7365 6372 6574 6c79 206c 6f6e ile secretly lon │ │ │ -00008fb0: 6769 6e67 2074 6f20 7374 6172 7420 615c ging to start a\ │ │ │ -00008fc0: 6e63 6166 6520 6f72 2062 6563 6f6d 696e ncafe or becomin │ │ │ -00008fd0: 6720 6120 7468 656f 7265 7469 6361 6c20 g a theoretical │ │ │ -00008fe0: 636f 6d70 7574 6572 2073 6369 656e 7469 computer scienti │ │ │ -00008ff0: 7374 2e20 2048 6973 2070 6572 736f 6e61 st. His persona │ │ │ -00009000: 6c5c 6e69 6e74 6572 6573 7420 6973 206c l\ninterest is l │ │ │ -00009010: 6974 6572 6174 7572 652c 2061 6e64 2074 iterature, and t │ │ │ -00009020: 6f20 736f 6d65 2065 7874 656e 7420 7472 o some extent tr │ │ │ -00009030: 6176 656c 696e 672c 2062 7574 2077 696c aveling, but wil │ │ │ -00009040: 6c5c 6e74 7279 2061 6e79 7468 696e 6720 l\ntry anything │ │ │ -00009050: 666f 7220 6675 6e2c 2073 7563 6820 6173 for fun, such as │ │ │ -00009060: 206a 7567 676c 696e 672c 2073 6b69 696e juggling, skiin │ │ │ -00009070: 672c 2077 696e 652c 2061 6e64 5c6e 6c6f g, wine, and\nlo │ │ │ -00009080: 6e67 2d64 6973 7461 6e63 6520 6269 6b69 ng-distance biki │ │ │ -00009090: 6e67 2e5c 6e5c 6e53 6565 3a20 2220 2256 ng.\n\nSee: " "V │ │ │ -000090a0: 6973 6974 2053 696d 6f6e 2773 2068 6f6d isit Simon's hom │ │ │ -000090b0: 6570 6167 6522 206a 6172 6574 6820 224a epage" jareth "J │ │ │ -000090c0: 6172 6574 6820 4865 696e 2069 7320 6120 areth Hein is a │ │ │ -000090d0: 6d6f 756e 7461 696e 2062 6f79 2077 686f mountain boy who │ │ │ -000090e0: 2061 6261 6e64 6f6e 6564 2068 6973 2068 abandoned his h │ │ │ -000090f0: 6f6d 6520 7374 6174 6520 6f66 2043 6f6c ome state of Col │ │ │ -00009100: 6f72 6164 6f5c 6e66 6f72 2074 6865 2070 orado\nfor the p │ │ │ -00009110: 6572 7065 7475 616c 2073 7461 7465 206f erpetual state o │ │ │ -00009120: 6620 6368 616f 7320 6b6e 6f77 6e20 6173 f chaos known as │ │ │ -00009130: 2054 6f6b 796f 2069 6e20 6120 6661 696c Tokyo in a fail │ │ │ -00009140: 6564 2061 7474 656d 7074 2074 6f5c 6e62 ed attempt to\nb │ │ │ -00009150: 6563 6f6d 6520 6120 6365 6c2d 616e 696d ecome a cel-anim │ │ │ -00009160: 6174 6f72 2c20 616e 6420 6120 6d6f 7265 ator, and a more │ │ │ -00009170: 2073 7563 6365 7373 6675 6c20 6f6e 6520 successful one │ │ │ -00009180: 746f 2062 6563 6f6d 6520 615c 6e63 6f6d to become a\ncom │ │ │ -00009190: 7075 7465 722d 6761 6d65 2070 726f 6772 puter-game progr │ │ │ -000091a0: 616d 6d65 722e 2041 7320 6865 2068 6170 ammer. As he hap │ │ │ -000091b0: 7065 6e73 2074 6f20 6265 2062 696c 696e pens to be bilin │ │ │ -000091c0: 6775 616c 2028 6775 6573 7320 7768 6963 gual (guess whic │ │ │ -000091d0: 685c 6e74 776f 3f29 2068 6527 7320 6265 h\ntwo?) he's be │ │ │ -000091e0: 656e 2064 6f69 6e67 2071 7569 7465 2061 en doing quite a │ │ │ -000091f0: 2062 6974 206f 6620 4d55 4c45 2068 6163 bit of MULE hac │ │ │ -00009200: 6b69 6e67 2e20 2048 6527 7320 616c 736f king. He's also │ │ │ -00009210: 2067 6574 7469 6e67 5c6e 6869 7320 6861 getting\nhis ha │ │ │ -00009220: 6e64 7320 6469 7274 7920 696e 2074 6865 nds dirty in the │ │ │ -00009230: 2067 7261 7068 6963 7320 6172 6561 7320 graphics areas │ │ │ -00009240: 6173 2077 656c 6c2e 5c6e 2220 6a61 736f as well.\n" jaso │ │ │ -00009250: 6e20 224a 6173 6f6e 2072 6573 6964 6573 n "Jason resides │ │ │ -00009260: 2069 6e20 4e6f 7274 6865 726e 204e 6577 in Northern New │ │ │ -00009270: 204d 6578 6963 6f20 7768 6572 6520 6865 Mexico where he │ │ │ -00009280: 2077 6f72 6b73 2061 7320 6120 5379 7374 works as a Syst │ │ │ -00009290: 656d 735c 6e53 6369 656e 7469 7374 2874 ems\nScientist(t │ │ │ -000092a0: 6d29 2069 6e20 7468 6520 4c6f 7320 416c m) in the Los Al │ │ │ -000092b0: 616d 6f73 204e 6174 696f 6e61 6c20 4c61 amos National La │ │ │ -000092c0: 626f 7261 746f 7279 2773 2041 6476 616e boratory's Advan │ │ │ -000092d0: 6365 645c 6e43 6f6d 7075 7469 6e67 2047 ced\nComputing G │ │ │ -000092e0: 726f 7570 2e5c 6e5c 6e53 6565 3a20 2220 roup.\n\nSee: " │ │ │ -000092f0: 2256 6973 6974 204a 6173 6f6e 2773 2068 "Visit Jason's h │ │ │ -00009300: 6f6d 6570 6167 6522 206a 656e 7320 2249 omepage" jens "I │ │ │ -00009310: 276d 2063 7572 7265 6e74 6c79 2077 6f72 'm currently wor │ │ │ -00009320: 6b69 6e67 2066 6f72 2031 2631 2049 6e74 king for 1&1 Int │ │ │ -00009330: 6572 6e65 7420 4147 2c20 6120 6c61 7267 ernet AG, a larg │ │ │ -00009340: 6520 446f 6d61 696e 2061 6e64 2057 6562 e Domain and Web │ │ │ -00009350: 7370 6163 655c 6e50 726f 7669 6465 7220 space\nProvider │ │ │ -00009360: 696e 2047 6572 6d61 6e79 2061 6e64 2045 in Germany and E │ │ │ -00009370: 7572 6f70 652e 2020 4920 646f 206d 6f73 urope. I do mos │ │ │ -00009380: 746c 7920 4a61 7661 2f58 4d4c 2f4f 4f2f tly Java/XML/OO/ │ │ │ -00009390: 436f 6d70 6f6e 656e 745c 6e73 7475 6666 Component\nstuff │ │ │ -000093a0: 2074 6f64 6179 2e20 2049 276d 2069 6e74 today. I'm int │ │ │ -000093b0: 6572 6573 7465 6420 454a 422c 2043 6f72 erested EJB, Cor │ │ │ -000093c0: 6261 2061 6e64 206f 7468 6572 206d 6964 ba and other mid │ │ │ -000093d0: 646c 6577 6172 6520 6f72 5c6e 6469 7374 dleware or\ndist │ │ │ -000093e0: 7269 6275 7465 6420 5379 7374 656d 732e ributed Systems. │ │ │ -000093f0: 2020 4265 7369 6465 7320 776f 726b 2c20 Besides work, │ │ │ -00009400: 4920 6f63 6361 7369 6f6e 616c 6c79 2068 I occasionally h │ │ │ -00009410: 6163 6b20 6f6e 2054 6865 2047 696d 705c ack on The Gimp\ │ │ │ -00009420: 6e61 6e64 206f 7468 6572 2067 746b 2f67 nand other gtk/g │ │ │ -00009430: 6e6f 6d65 2072 656c 6174 6564 2070 726f nome related pro │ │ │ -00009440: 6a65 6374 732e 2020 4d61 7962 6520 7468 jects. Maybe th │ │ │ -00009450: 6520 6164 7665 6e74 206f 6620 5845 6d61 e advent of XEma │ │ │ -00009460: 6373 2f47 746b 5c6e 7769 6c6c 2067 6574 cs/Gtk\nwill get │ │ │ -00009470: 206d 6520 6261 636b 2074 6f20 7370 656e me back to spen │ │ │ -00009480: 6420 736f 6d65 2074 696d 6520 6167 6169 d some time agai │ │ │ -00009490: 6e20 6861 636b 696e 6720 6f6e 2058 456d n hacking on XEm │ │ │ -000094a0: 6163 7320 696e 2074 6865 5c6e 6e65 6172 acs in the\nnear │ │ │ -000094b0: 2066 7574 7572 652e 5c6e 2220 6a6d 696c future.\n" jmil │ │ │ -000094c0: 6c65 7220 224a 6566 6620 6772 6577 2075 ler "Jeff grew u │ │ │ -000094d0: 7020 696e 2049 6e64 6961 6e61 2061 6e64 p in Indiana and │ │ │ -000094e0: 2069 7320 6120 636f 756e 7472 7920 626f is a country bo │ │ │ -000094f0: 7920 6174 2068 6561 7274 2e20 2048 6520 y at heart. He │ │ │ -00009500: 6375 7272 656e 746c 795c 6e6c 6976 6573 currently\nlives │ │ │ -00009510: 2069 6e2c 206f 6620 616c 6c20 706c 6163 in, of all plac │ │ │ -00009520: 6573 2c20 4d69 6c6c 6572 7376 696c 6c65 es, Millersville │ │ │ -00009530: 204d 6172 796c 616e 642e 2020 4865 2073 Maryland. He s │ │ │ -00009540: 7065 6e64 7320 6120 6c6f 7420 6f66 5c6e pends a lot of\n │ │ │ -00009550: 6869 7320 6672 6565 2074 696d 6520 7469 his free time ti │ │ │ -00009560: 6e6b 6572 696e 6720 7769 7468 204c 696e nkering with Lin │ │ │ -00009570: 7578 2061 6e64 2068 6163 6b69 6e67 206f ux and hacking o │ │ │ -00009580: 6e20 5845 6d61 6373 2061 6e64 206c 6f76 n XEmacs and lov │ │ │ -00009590: 6573 2069 745c 6e77 6865 6e20 6865 2066 es it\nwhen he f │ │ │ -000095a0: 696e 6473 206e 6577 2063 6f6f 6c20 6665 inds new cool fe │ │ │ -000095b0: 6174 7572 6573 2069 6e20 6569 7468 6572 atures in either │ │ │ -000095c0: 2e20 2057 6865 6e20 6865 2773 206e 6f74 . When he's not │ │ │ -000095d0: 2064 6f69 6e67 2074 6861 742c 5c6e 6865 doing that,\nhe │ │ │ -000095e0: 2065 6e6a 6f79 7320 646f 776e 6869 6c6c enjoys downhill │ │ │ -000095f0: 2073 6b69 696e 672c 2070 757a 7a6c 6573 skiing, puzzles │ │ │ -00009600: 2c20 616e 6420 7363 692d 6669 2e20 204a , and sci-fi. J │ │ │ -00009610: 6566 6620 6973 2061 6c73 6f20 7265 616c eff is also real │ │ │ -00009620: 6c79 5c6e 696e 7465 7265 7374 6564 2069 ly\ninterested i │ │ │ -00009630: 6e20 636c 6173 7369 6361 6c20 526f 6d61 n classical Roma │ │ │ -00009640: 6e20 6869 7374 6f72 7920 616e 6420 656e n history and en │ │ │ -00009650: 6a6f 7973 206d 616b 696e 6720 7472 6970 joys making trip │ │ │ -00009660: 7320 746f 5c6e 4974 616c 792c 2077 6865 s to\nItaly, whe │ │ │ -00009670: 7265 2068 6520 7761 7320 626f 726e 2c20 re he was born, │ │ │ -00009680: 616e 6420 7365 6569 6e67 2074 6865 2073 and seeing the s │ │ │ -00009690: 6967 6874 7322 206a 6f6e 6174 6861 6e20 ights" jonathan │ │ │ -000096a0: 2249 2077 6f72 6b20 666f 7220 5379 6d62 "I work for Symb │ │ │ -000096b0: 6961 6e20 4c74 6420 696e 204c 6f6e 646f ian Ltd in Londo │ │ │ -000096c0: 6e2c 2045 6e67 6c61 6e64 2c20 6c6f 6f6b n, England, look │ │ │ -000096d0: 696e 6720 6166 7465 7220 6c6f 772d 6c65 ing after low-le │ │ │ -000096e0: 7665 6c5c 6e6b 6572 6e65 6c2c 2070 6572 vel\nkernel, per │ │ │ -000096f0: 6970 6865 7261 6c20 616e 6420 746f 6f6c ipheral and tool │ │ │ -00009700: 6368 6169 6e20 7374 7566 6620 666f 7220 chain stuff for │ │ │ -00009710: 7468 6520 4550 4f43 204f 532e 5c6e 5c6e the EPOC OS.\n\n │ │ │ -00009720: 4927 7665 2062 6565 6e20 7573 696e 6720 I've been using │ │ │ -00009730: 5845 6d61 6373 2073 696e 6365 2031 3939 XEmacs since 199 │ │ │ -00009740: 342c 2062 7574 2064 6964 6e27 7420 7374 4, but didn't st │ │ │ -00009750: 6172 7420 6861 636b 696e 6720 6f6e 2069 art hacking on i │ │ │ -00009760: 745c 6e75 6e74 696c 206c 6174 6520 3139 t\nuntil late 19 │ │ │ -00009770: 3937 2077 6865 6e20 4920 7374 6172 7465 97 when I starte │ │ │ -00009780: 6420 776f 726b 696e 6720 6174 2053 796d d working at Sym │ │ │ -00009790: 6269 616e 2c20 6120 5769 6e64 6f77 732d bian, a Windows- │ │ │ -000097a0: 6f6e 6c79 5c6e 636f 6d70 616e 792c 2061 only\ncompany, a │ │ │ -000097b0: 6e64 2066 656c 7420 6c6f 7374 2077 6974 nd felt lost wit │ │ │ -000097c0: 686f 7574 206d 7920 6661 766f 7572 6974 hout my favourit │ │ │ -000097d0: 6520 6564 6974 696e 6720 656e 7669 726f e editing enviro │ │ │ -000097e0: 6e6d 656e 742e 5c6e 2220 6a75 6870 2022 nment.\n" juhp " │ │ │ -000097f0: 4a65 6e73 2077 6173 2062 6f72 6e20 696e Jens was born in │ │ │ -00009800: 2043 6f70 656e 6861 6765 6e2c 2067 7265 Copenhagen, gre │ │ │ -00009810: 7720 7570 2069 6e20 4272 6974 6169 6e20 w up in Britain │ │ │ -00009820: 616e 6420 6973 206e 6f77 206c 6976 696e and is now livin │ │ │ -00009830: 6720 696e 5c6e 4a61 7061 6e2e 2020 4865 g in\nJapan. He │ │ │ -00009840: 2073 7461 7274 6564 2075 7369 6e67 2058 started using X │ │ │ -00009850: 456d 6163 7320 3230 2028 696e 7374 6561 Emacs 20 (instea │ │ │ -00009860: 6420 6f66 2045 6d61 6373 2920 6173 2068 d of Emacs) as h │ │ │ -00009870: 6973 5c6e 776f 726b 2d65 6e76 6972 6f6e is\nwork-environ │ │ │ -00009880: 6d65 6e74 2069 6e20 4a75 6e65 2031 3939 ment in June 199 │ │ │ -00009890: 3720 7768 696c 6520 7374 696c 6c20 616e 7 while still an │ │ │ -000098a0: 2045 5520 706f 7374 646f 6320 6174 2052 EU postdoc at R │ │ │ -000098b0: 494d 532c 204b 796f 746f 5c6e 556e 6976 IMS, Kyoto\nUniv │ │ │ -000098c0: 6572 7369 7479 2c20 616e 6420 7175 6963 ersity, and quic │ │ │ -000098d0: 6b6c 7920 676f 7420 696e 766f 6c76 6564 kly got involved │ │ │ -000098e0: 2069 6e20 5845 6d61 6373 2064 6576 656c in XEmacs devel │ │ │ -000098f0: 6f70 6d65 6e74 2e20 2052 6563 656e 746c opment. Recentl │ │ │ -00009900: 795c 6e68 6520 6973 2067 6574 7469 6e67 y\nhe is getting │ │ │ -00009910: 2069 6e74 6f20 4861 736b 656c 6c2c 2061 into Haskell, a │ │ │ -00009920: 2076 6572 7920 6e69 6365 2070 7572 6520 very nice pure │ │ │ -00009930: 6675 6e63 7469 6f6e 616c 2070 726f 6772 functional progr │ │ │ -00009940: 616d 6d69 6e67 5c6e 6c61 6e67 7561 6765 amming\nlanguage │ │ │ -00009950: 2e5c 6e5c 6e22 2022 5669 7369 7420 4a65 .\n\n" "Visit Je │ │ │ -00009960: 6e73 2720 686f 6d65 7061 6765 2220 6a77 ns' homepage" jw │ │ │ -00009970: 7a20 2209 2220 6162 6f75 742d 7769 7468 z "." about-with │ │ │ -00009980: 2d66 6163 6520 225c 2253 6f20 6d75 6368 -face "\"So much │ │ │ -00009990: 2074 6f20 646f 2c20 736f 206c 6974 746c to do, so littl │ │ │ -000099a0: 6520 7469 6d65 2e5c 2222 2069 7461 6c69 e time.\"" itali │ │ │ -000099b0: 6320 225c 6e5c 6e4a 616d 6965 205a 6177 c "\n\nJamie Zaw │ │ │ -000099c0: 696e 736b 6920 7761 7320 7072 696d 6172 inski was primar │ │ │ -000099d0: 696c 7920 746f 2062 6c61 6d65 2066 6f72 ily to blame for │ │ │ -000099e0: 204c 7563 6964 2045 6d61 6373 2066 726f Lucid Emacs fro │ │ │ -000099f0: 6d20 6974 735c 6e69 6e63 6570 7469 6f6e m its\ninception │ │ │ -00009a00: 2069 6e20 3139 3931 2c20 746f 2031 3939 in 1991, to 199 │ │ │ -00009a10: 3420 7768 656e 204c 7563 6964 2049 6e63 4 when Lucid Inc │ │ │ -00009a20: 2e20 6669 6e61 6c6c 7920 6469 6564 2e20 . finally died. │ │ │ -00009a30: 2041 6674 6572 2074 6861 742c 5c6e 6865 After that,\nhe │ │ │ -00009a40: 2077 6173 206f 6e65 206f 6620 7468 6520 was one of the │ │ │ -00009a50: 696e 6974 6961 6c20 656d 706c 6f79 6565 initial employee │ │ │ -00009a60: 7320 6f66 204e 6574 7363 6170 6520 436f s of Netscape Co │ │ │ -00009a70: 6d6d 756e 6963 6174 696f 6e73 2c20 7772 mmunications, wr │ │ │ -00009a80: 6974 696e 675c 6e74 6865 2066 6972 7374 iting\nthe first │ │ │ -00009a90: 2055 6e69 7820 7665 7273 696f 6e20 6f66 Unix version of │ │ │ -00009aa0: 204e 6574 7363 6170 6520 4e61 7669 6761 Netscape Naviga │ │ │ -00009ab0: 746f 722c 2061 6e64 2064 6573 6967 6e69 tor, and designi │ │ │ -00009ac0: 6e67 2061 6e64 5c6e 696d 706c 656d 656e ng and\nimplemen │ │ │ -00009ad0: 7469 6e67 2074 6865 2066 6972 7374 2076 ting the first v │ │ │ -00009ae0: 6572 7369 6f6e 206f 6620 7468 6520 4e65 ersion of the Ne │ │ │ -00009af0: 7473 6361 7065 204d 6169 6c20 616e 6420 tscape Mail and │ │ │ -00009b00: 4e65 7773 2072 6561 6465 7273 2e5c 6e48 News readers.\nH │ │ │ -00009b10: 6520 7468 656e 2068 656c 7065 6420 6372 e then helped cr │ │ │ -00009b20: 6561 7465 2061 6e64 2072 756e 2022 2022 eate and run " " │ │ │ -00009b30: 6874 7470 3a2f 2f77 7777 2e6d 6f7a 696c http://www.mozil │ │ │ -00009b40: 6c61 2e6f 7267 2f22 2022 6d6f 7a69 6c6c la.org/" "mozill │ │ │ -00009b50: 612e 6f72 6722 2022 5669 7369 7420 5468 a.org" "Visit Th │ │ │ -00009b60: 6520 4d6f 7a69 6c6c 6120 4f72 6761 6e69 e Mozilla Organi │ │ │ -00009b70: 7a61 7469 6f6e 2220 2220 666f 7220 6974 zation" " for it │ │ │ -00009b80: 7320 6669 7273 7420 7477 6f20 7965 6172 s first two year │ │ │ -00009b90: 732c 5c6e 756e 7469 6c20 416d 6572 6963 s,\nuntil Americ │ │ │ -00009ba0: 6120 4f6e 6c69 6e65 2062 6f75 6768 7420 a Online bought │ │ │ -00009bb0: 4e65 7473 6361 7065 2043 6f6d 6d75 6e69 Netscape Communi │ │ │ -00009bc0: 6361 7469 6f6e 732c 2061 7420 7768 6963 cations, at whic │ │ │ -00009bd0: 6820 706f 696e 7420 6865 5c6e 6761 7665 h point he\ngave │ │ │ -00009be0: 2075 7020 696e 2064 6973 6775 7374 2061 up in disgust a │ │ │ -00009bf0: 6e64 2064 726f 7070 6564 206f 7574 206f nd dropped out o │ │ │ -00009c00: 6620 7468 6520 636f 6d70 7574 6572 2069 f the computer i │ │ │ -00009c10: 6e64 7573 7472 7920 656e 7469 7265 6c79 ndustry entirely │ │ │ -00009c20: 2e5c 6e5c 6e48 6520 6e6f 7720 7275 6e73 .\n\nHe now runs │ │ │ -00009c30: 2061 2022 2022 6874 7470 3a2f 2f77 7777 a " "http://www │ │ │ -00009c40: 2e64 6e61 6c6f 756e 6765 2e63 6f6d 2f22 .dnalounge.com/" │ │ │ -00009c50: 2022 6e69 6768 7463 6c75 6222 2022 5669 "nightclub" "Vi │ │ │ -00009c60: 7369 7420 5468 6520 444e 4120 4c6f 756e sit The DNA Loun │ │ │ -00009c70: 6765 2220 2220 696e 2053 616e 2046 7261 ge" " in San Fra │ │ │ -00009c80: 6e63 6973 636f 2c20 616e 6420 6f63 6361 ncisco, and occa │ │ │ -00009c90: 7369 6f6e 616c 6c79 2077 7269 7465 735c sionally writes\ │ │ │ -00009ca0: 6e73 6372 6565 6e20 7361 7665 7273 2e5c nscreen savers.\ │ │ │ -00009cb0: 6e5c 6e22 2022 5669 7369 7420 6a77 7a27 n\n" "Visit jwz' │ │ │ -00009cc0: 7320 2220 2268 6f6d 6520 7061 6765 2220 s " "home page" │ │ │ -00009cd0: 2256 6973 6974 206a 777a 2773 2068 6f6d "Visit jwz's hom │ │ │ -00009ce0: 6520 7061 6765 2220 6b61 7a7a 2022 4b61 e page" kazz "Ka │ │ │ -00009cf0: 7a7a 2069 7320 7468 6520 5845 6d61 6373 zz is the XEmacs │ │ │ -00009d00: 206c 6561 6420 6f6e 2042 5344 2028 6573 lead on BSD (es │ │ │ -00009d10: 7065 6369 616c 6c79 2046 7265 6542 5344 pecially FreeBSD │ │ │ -00009d20: 292e 5c6e 4869 7320 6d61 696e 2077 6f72 ).\nHis main wor │ │ │ -00009d30: 6b73 7061 6365 2069 732c 2070 726f 6261 kspace is, proba │ │ │ -00009d40: 626c 792c 2074 6865 206c 6174 6573 7420 bly, the latest │ │ │ -00009d50: 7374 6162 6c65 2076 6572 7369 6f6e 206f stable version o │ │ │ -00009d60: 665c 6e46 7265 6542 5344 2061 6e64 2069 f\nFreeBSD and i │ │ │ -00009d70: 7420 6d61 6b65 7320 6869 6d20 636f 6d66 t makes him comf │ │ │ -00009d80: 6f72 7461 626c 6520 616e 6420 6e6f 742e ortable and not. │ │ │ -00009d90: 5c6e 4869 7320 2a6d 6973 7369 6f6e 2a20 \nHis *mission* │ │ │ -00009da0: 6973 2074 6f20 6d61 6b65 2058 456d 6163 is to make XEmac │ │ │ -00009db0: 7320 7275 6e73 206f 6e20 4672 6565 4253 s runs on FreeBS │ │ │ -00009dc0: 4420 7769 7468 6f75 745c 6e61 6e79 2070 D without\nany p │ │ │ -00009dd0: 726f 626c 656d 2e5c 6e5c 6e49 6e20 7265 roblem.\n\nIn re │ │ │ -00009de0: 616c 206c 6966 652c 2068 6520 6973 2077 al life, he is w │ │ │ -00009df0: 6f72 6b69 6e67 206f 6e20 6120 5044 4d20 orking on a PDM │ │ │ -00009e00: 7072 6f64 7563 7420 6261 7365 6420 6f6e product based on │ │ │ -00009e10: 2043 4f52 4241 2c5c 6e61 6e64 2064 6f69 CORBA,\nand doi │ │ │ -00009e20: 6e67 2063 6f6e 7375 6c74 6174 696f 6e2c ng consultation, │ │ │ -00009e30: 2064 6573 6967 6e20 616e 6420 696d 706c design and impl │ │ │ -00009e40: 656d 656e 7469 6f6e 2e5c 6e48 6520 6c6f emention.\nHe lo │ │ │ -00009e50: 7665 7320 746f 2070 6c61 7920 736f 6363 ves to play socc │ │ │ -00009e60: 6572 2c20 7965 7320 666f 6f74 6261 6c6c er, yes football │ │ │ -00009e70: 215c 6e53 6565 2061 6c73 6f3a 2220 2256 !\nSee also:" "V │ │ │ -00009e80: 6973 6974 204b 617a 7a27 7320 686f 6d65 isit Kazz's home │ │ │ -00009e90: 2070 6167 6522 206b 6972 696c 6c20 6b79 page" kirill ky │ │ │ -00009ea0: 6c65 2022 5365 655c 6e22 2022 5669 7369 le "See\n" "Visi │ │ │ -00009eb0: 7420 4b79 6c65 2773 2048 6f6d 6520 7061 t Kyle's Home pa │ │ │ -00009ec0: 6765 2220 6c61 7273 6920 224c 6172 7327 ge" larsi "Lars' │ │ │ -00009ed0: 7320 6461 7920 6a6f 6220 6973 2061 7320 s day job is as │ │ │ -00009ee0: 7468 6520 6865 6164 206f 6620 7468 6520 the head of the │ │ │ -00009ef0: 4954 2064 6570 6172 746d 656e 7420 6f66 IT department of │ │ │ -00009f00: 2061 204e 6f72 7765 6769 616e 5c6e 496e a Norwegian\nIn │ │ │ -00009f10: 7465 726e 6574 2073 746f 636b 2062 726f ternet stock bro │ │ │ -00009f20: 6b65 722e 2020 4865 2063 6c61 696d 7320 ker. He claims │ │ │ -00009f30: 6e6f 2072 6573 706f 6e73 6962 696c 6974 no responsibilit │ │ │ -00009f40: 7920 666f 7220 7468 6520 446f 745c 6e43 y for the Dot\nC │ │ │ -00009f50: 6f6d 2042 6f6d 622c 2062 7574 2068 6520 om Bomb, but he │ │ │ -00009f60: 736e 6963 6b65 7273 2061 206c 6f74 2e5c snickers a lot.\ │ │ │ -00009f70: 6e5c 6e53 6565 2022 2022 5669 7369 7420 n\nSee " "Visit │ │ │ -00009f80: 7468 6520 4c61 7273 6973 7369 7374 6963 the Larsissistic │ │ │ -00009f90: 2070 6167 6573 2220 6d61 7263 7061 2022 pages" marcpa " │ │ │ -00009fa0: 4920 776f 726b 2066 6f72 2050 6f73 6974 I work for Posit │ │ │ -00009fb0: 726f 6e20 496e 6475 7374 7269 6573 2049 ron Industries I │ │ │ -00009fc0: 6e63 2e2c 2050 7562 6c69 6320 5361 6665 nc., Public Safe │ │ │ -00009fd0: 7479 2044 6976 6973 696f 6e2e 5c6e 4927 ty Division.\nI' │ │ │ -00009fe0: 6d20 7061 7274 206f 6620 7468 6520 7465 m part of the te │ │ │ -00009ff0: 616d 2070 726f 6475 6369 6e67 2050 4f57 am producing POW │ │ │ -0000a000: 4552 2039 3131 2c20 6120 3931 3120 656d ER 911, a 911 em │ │ │ -0000a010: 6572 6765 6e63 7920 7265 7370 6f6e 7365 ergency response │ │ │ -0000a020: 5c6e 7379 7374 656d 2077 7269 7474 656e \nsystem written │ │ │ -0000a030: 2069 6e20 4d6f 6475 6c61 333a 5c6e 2220 in Modula3:\n" │ │ │ -0000a040: 2256 6973 6974 2050 4f57 4552 2039 3131 "Visit POWER 911 │ │ │ -0000a050: 2220 225c 6e5c 6e50 7265 7669 6f75 736c " "\n\nPreviousl │ │ │ -0000a060: 792c 2049 2077 6f72 6b65 6420 6174 2053 y, I worked at S │ │ │ -0000a070: 6f66 7469 6d61 6765 2049 6e63 2e2c 206e oftimage Inc., n │ │ │ -0000a080: 6f77 2061 204d 6963 726f 736f 6674 2063 ow a Microsoft c │ │ │ -0000a090: 6f6d 7061 6e79 5c6e 2865 6565 6b6b 6b21 ompany\n(eeekkk! │ │ │ -0000a0a0: 292c 2061 7320 6120 554e 4958 2073 7973 ), as a UNIX sys │ │ │ -0000a0b0: 7465 6d20 6164 6d69 6e69 7374 7261 746f tem administrato │ │ │ -0000a0c0: 722e 2020 5468 6973 2069 7320 7768 6572 r. This is wher │ │ │ -0000a0d0: 6520 4927 7665 2062 6565 6e5c 6e63 6f6e e I've been\ncon │ │ │ -0000a0e0: 7665 7274 6564 2074 6f20 4e54 2e5c 6e5c verted to NT.\n\ │ │ │ -0000a0f0: 6e49 6e20 6120 7072 6576 696f 7573 206c nIn a previous l │ │ │ -0000a100: 6966 652c 2049 2077 6173 2061 2070 726f ife, I was a pro │ │ │ -0000a110: 6772 616d 6d65 722f 7379 7361 646d 696e grammer/sysadmin │ │ │ -0000a120: 2061 7420 4352 494d 2028 4365 6e74 7265 at CRIM (Centre │ │ │ -0000a130: 2064 655c 6e52 6563 6865 7263 6865 2049 de\nRecherche I │ │ │ -0000a140: 6e66 6f72 6d61 7469 7175 6520 6465 204d nformatique de M │ │ │ -0000a150: 6f6e 7472 6561 6c29 2066 6f72 2074 6865 ontreal) for the │ │ │ -0000a160: 2073 7065 6563 6820 7265 636f 676e 6974 speech recognit │ │ │ -0000a170: 696f 6e20 6772 6f75 702e 5c6e 2220 6d61 ion group.\n" ma │ │ │ -0000a180: 7274 696e 2022 4d61 7274 696e 2077 6173 rtin "Martin was │ │ │ -0000a190: 2074 6865 2058 456d 6163 7320 6775 7920 the XEmacs guy │ │ │ -0000a1a0: 6174 2044 6576 5072 6f2c 2061 2070 6172 at DevPro, a par │ │ │ -0000a1b0: 7420 6f66 2053 756e 204d 6963 726f 7379 t of Sun Microsy │ │ │ -0000a1c0: 7374 656d 732e 5c6e 4d61 7274 696e 2075 stems.\nMartin u │ │ │ -0000a1d0: 7365 6420 746f 2064 6f20 5845 6d61 6373 sed to do XEmacs │ │ │ -0000a1e0: 2061 7320 6120 6068 6f62 6279 2720 7768 as a `hobby' wh │ │ │ -0000a1f0: 696c 6520 6174 2049 424d 2c20 616e 6420 ile at IBM, and │ │ │ -0000a200: 7761 7320 6372 617a 795c 6e65 6e6f 7567 was crazy\nenoug │ │ │ -0000a210: 6820 746f 2074 7279 2074 6f20 6d61 6b65 h to try to make │ │ │ -0000a220: 2061 206c 6976 696e 6720 646f 696e 6720 a living doing │ │ │ -0000a230: 6974 2061 7420 5375 6e2e 5c6e 5c6e 4d61 it at Sun.\n\nMa │ │ │ -0000a240: 7274 696e 2073 7461 7274 696e 6720 7573 rtin starting us │ │ │ -0000a250: 696e 6720 456d 6163 7320 6f72 6967 696e ing Emacs origin │ │ │ -0000a260: 616c 6c79 206e 6f74 2074 6f20 6564 6974 ally not to edit │ │ │ -0000a270: 2066 696c 6573 2c20 6275 7420 746f 2067 files, but to g │ │ │ -0000a280: 6574 5c6e 7468 6520 6265 6e65 6669 7420 et\nthe benefit │ │ │ -0000a290: 6f66 2073 6865 6c6c 206d 6f64 652e 2048 of shell mode. H │ │ │ -0000a2a0: 6520 6163 7475 616c 6c79 2075 7365 6420 e actually used │ │ │ -0000a2b0: 746f 2072 756e 206e 6f74 6869 6e67 2062 to run nothing b │ │ │ -0000a2c0: 7574 2061 2073 6865 6c6c 5c6e 6275 6666 ut a shell\nbuff │ │ │ -0000a2d0: 6572 2c20 616e 6420 7573 6520 6078 7465 er, and use `xte │ │ │ -0000a2e0: 726d 202d 6520 7669 2720 746f 2065 6469 rm -e vi' to edi │ │ │ -0000a2f0: 7420 6669 6c65 732e 2020 4275 7420 7468 t files. But th │ │ │ -0000a300: 656e 2068 6520 7361 7720 7468 655c 6e6c en he saw the\nl │ │ │ -0000a310: 6967 6874 2e20 2048 6520 6472 6561 6d73 ight. He dreams │ │ │ -0000a320: 206f 6620 7265 7772 6974 696e 6720 7368 of rewriting sh │ │ │ -0000a330: 656c 6c20 6d6f 6465 2066 726f 6d20 7363 ell mode from sc │ │ │ -0000a340: 7261 7463 682e 2020 5374 6465 7272 2073 ratch. Stderr s │ │ │ -0000a350: 686f 756c 645c 6e73 686f 7720 7570 2069 hould\nshow up i │ │ │ -0000a360: 6e20 7265 6421 215c 6e5c 6e4d 6172 7469 n red!!\n\nMarti │ │ │ -0000a370: 6e20 6973 206e 6f20 6c6f 6e67 6572 2064 n is no longer d │ │ │ -0000a380: 6f69 6e67 2058 456d 6163 7320 666f 7220 oing XEmacs for │ │ │ -0000a390: 6120 6c69 7669 6e67 2c20 616e 6420 6973 a living, and is │ │ │ -0000a3a0: 204a 7573 7420 416e 6f74 6865 725c 6e56 Just Another\nV │ │ │ -0000a3b0: 6f6c 756e 7465 6572 2e5c 6e22 206d 636f olunteer.\n" mco │ │ │ -0000a3c0: 6f6b 206d 6c79 2022 4361 7273 2061 7265 ok mly "Cars are │ │ │ -0000a3d0: 2065 7669 6c2e 2020 5269 6465 2061 2062 evil. Ride a b │ │ │ -0000a3e0: 696b 652e 5c6e 2220 6d6f 7269 6f6b 6120 ike.\n" morioka │ │ │ -0000a3f0: 2249 2061 6d20 6120 646f 6374 6f72 616c "I am a doctoral │ │ │ -0000a400: 2073 7475 6465 6e74 2061 7420 5363 686f student at Scho │ │ │ -0000a410: 6f6c 206f 6620 496e 666f 726d 6174 696f ol of Informatio │ │ │ -0000a420: 6e20 5363 6965 6e63 6520 6f66 204a 4149 n Science of JAI │ │ │ -0000a430: 5354 5c6e 284a 6170 616e 2041 6476 616e ST\n(Japan Advan │ │ │ -0000a440: 6365 6420 496e 7374 6974 7574 6520 6f66 ced Institute of │ │ │ -0000a450: 2053 6369 656e 6365 2061 6e64 2054 6563 Science and Tec │ │ │ -0000a460: 686e 6f6c 6f67 792c 2048 6f6b 7572 696b hnology, Hokurik │ │ │ -0000a470: 7529 2e20 2049 276d 5c6e 696e 7465 7265 u). I'm\nintere │ │ │ -0000a480: 7374 6564 2069 6e20 4e61 7475 7261 6c20 sted in Natural │ │ │ -0000a490: 4c61 6e67 7561 6765 2c20 4166 666f 7264 Language, Afford │ │ │ -0000a4a0: 616e 6365 2061 6e64 2077 7269 7469 6e67 ance and writing │ │ │ -0000a4b0: 2073 7973 7465 6d73 2e5c 6e22 206d 7461 systems.\n" mta │ │ │ -0000a4c0: 2022 4920 616d 2061 2073 6f66 7477 6172 "I am a softwar │ │ │ -0000a4d0: 6520 6465 7665 6c6f 7065 7220 7768 6f20 e developer who │ │ │ -0000a4e0: 776f 726b 6564 2066 6f72 2074 6865 2055 worked for the U │ │ │ -0000a4f0: 6e69 7665 7273 6974 7920 6f66 204d 6963 niversity of Mic │ │ │ -0000a500: 6869 6761 6e5c 6e66 6f72 206d 616e 7920 higan\nfor many │ │ │ -0000a510: 7965 6172 7320 7768 6572 6520 4920 7761 years where I wa │ │ │ -0000a520: 7320 6f6e 6520 6f66 2074 6865 2070 7269 s one of the pri │ │ │ -0000a530: 6e63 6970 616c 2061 7263 6869 7465 6374 ncipal architect │ │ │ -0000a540: 7320 6f66 2074 6865 5c6e 4d69 6368 6967 s of the\nMichig │ │ │ -0000a550: 616e 2054 6572 6d69 6e61 6c20 5379 7374 an Terminal Syst │ │ │ -0000a560: 656d 2e20 2046 6f72 2074 6865 206c 6173 em. For the las │ │ │ -0000a570: 7420 7365 7665 7261 6c20 7965 6172 7320 t several years │ │ │ -0000a580: 4927 7665 2062 6565 6e5c 6e77 6f72 6b69 I've been\nworki │ │ │ -0000a590: 6e67 2066 6f72 2041 7262 6f72 7465 7874 ng for Arbortext │ │ │ -0000a5a0: 2c20 6120 7075 626c 6973 6865 7220 6f66 , a publisher of │ │ │ -0000a5b0: 2058 4d4c 2070 7562 6c69 7368 696e 6720 XML publishing │ │ │ -0000a5c0: 616e 6420 636f 6e74 656e 745c 6e6d 616e and content\nman │ │ │ -0000a5d0: 6167 656d 656e 7420 736f 6674 7761 7265 agement software │ │ │ -0000a5e0: 2e5c 6e22 206f 6772 6166 2022 4927 6d20 .\n" ograf "I'm │ │ │ -0000a5f0: 6120 7374 7564 656e 7420 6f66 2063 6f6d a student of com │ │ │ -0000a600: 7075 7465 7220 7363 6965 6e63 6573 2061 puter sciences a │ │ │ -0000a610: 7420 7468 6520 556e 6976 6572 7369 7479 t the University │ │ │ -0000a620: 206f 6620 4b6f 626c 656e 7a2e 204d 795c of Koblenz. My\ │ │ │ -0000a630: 6e6d 616a 6f72 2069 7320 636f 6d70 7574 nmajor is comput │ │ │ -0000a640: 6174 696f 6e61 6c20 6c69 6e67 7569 7374 ational linguist │ │ │ -0000a650: 6963 7320 2868 756d 616e 206c 616e 6775 ics (human langu │ │ │ -0000a660: 6167 6520 6765 6e65 7261 7469 6f6e 2061 age generation a │ │ │ -0000a670: 6e64 5c6e 616e 616c 7973 6973 292e 5c6e nd\nanalysis).\n │ │ │ -0000a680: 5c6e 4920 6d61 6b65 206d 7920 6c69 7669 \nI make my livi │ │ │ -0000a690: 6e67 2061 7320 6120 6d61 6e61 6769 6e67 ng as a managing │ │ │ -0000a6a0: 2064 6972 6563 746f 7220 6f66 2061 2073 director of a s │ │ │ -0000a6b0: 6d61 6c6c 2062 7574 2066 696e 6520 636f mall but fine co │ │ │ -0000a6c0: 6d70 616e 795c 6e77 6869 6368 2049 2073 mpany\nwhich I s │ │ │ -0000a6d0: 7461 7274 6564 2074 776f 2079 6561 7273 tarted two years │ │ │ -0000a6e0: 2061 676f 2077 6974 6820 6f6e 6520 6f66 ago with one of │ │ │ -0000a6f0: 206d 7920 6672 6965 6e64 732e 2057 6520 my friends. We │ │ │ -0000a700: 7072 6f76 6964 655c 6e62 7573 696e 6573 provide\nbusines │ │ │ -0000a710: 7320 6e65 7477 6f72 6b20 736f 6c75 7469 s network soluti │ │ │ -0000a720: 6f6e 7320 6261 7365 6420 6f6e 206c 696e ons based on lin │ │ │ -0000a730: 7578 2073 6572 7665 7273 2061 6e64 2076 ux servers and v │ │ │ -0000a740: 6172 696f 7573 206f 7468 6572 5c6e 6e65 arious other\nne │ │ │ -0000a750: 7477 6f72 6b69 6e67 2070 726f 6475 6374 tworking product │ │ │ -0000a760: 732e 5c6e 5c6e 4d6f 7374 206f 6620 6d79 s.\n\nMost of my │ │ │ -0000a770: 2073 7061 7265 2074 696d 6520 4920 7370 spare time I sp │ │ │ -0000a780: 656e 7420 6f6e 2074 6865 2064 6576 656c ent on the devel │ │ │ -0000a790: 6f70 6d65 6e74 206f 6620 7468 6520 5845 opment of the XE │ │ │ -0000a7a0: 6d61 6373 5c6e 4472 6167 276e 2744 726f macs\nDrag'n'Dro │ │ │ -0000a7b0: 7020 4150 492c 2061 2065 6e68 616e 6365 p API, a enhance │ │ │ -0000a7c0: 6420 7665 7273 696f 6e20 6f66 2054 6b20 d version of Tk │ │ │ -0000a7d0: 6361 6c6c 6564 2054 6b53 7465 7020 2862 called TkStep (b │ │ │ -0000a7e0: 6574 7465 7220 6c6f 6f6b 732c 5c6e 616c etter looks,\nal │ │ │ -0000a7f0: 736f 2044 7261 6727 6e27 4472 6f70 2c20 so Drag'n'Drop, │ │ │ -0000a800: 616e 6420 6d6f 7265 292c 2061 6e64 2076 and more), and v │ │ │ -0000a810: 6172 696f 7573 206f 7468 6572 2068 6163 arious other hac │ │ │ -0000a820: 6b73 3a20 4953 444e 2d74 6f6f 6c73 2c5c ks: ISDN-tools,\ │ │ │ -0000a830: 6e63 6420 706c 6179 6572 732c 2070 7974 ncd players, pyt │ │ │ -0000a840: 686f 6e2c 2065 7463 2e2e 2e5c 6e5c 6e54 hon, etc...\n\nT │ │ │ -0000a850: 6f20 7365 6520 736f 6d65 206f 6620 7468 o see some of th │ │ │ -0000a860: 6573 6520 6861 7665 2061 206c 6f6f 6b20 ese have a look │ │ │ -0000a870: 6174 2022 2022 6f6e 6520 6f66 206d 7920 at " "one of my │ │ │ -0000a880: 686f 6d65 7061 6765 7322 206f 6c69 7669 homepages" olivi │ │ │ -0000a890: 6572 206f 7363 6172 2022 4f73 6361 7220 er oscar "Oscar │ │ │ -0000a8a0: 6865 6164 7320 7468 6520 436f 6d70 7574 heads the Comput │ │ │ -0000a8b0: 6572 2053 6369 656e 6365 2064 6570 6172 er Science depar │ │ │ -0000a8c0: 746d 656e 7420 6174 2043 5045 204c 796f tment at CPE Lyo │ │ │ -0000a8d0: 6e2c 2061 2066 7265 6e63 685c 6e65 6e67 n, a french\neng │ │ │ -0000a8e0: 696e 6565 7269 6e67 2073 6368 6f6f 6c20 ineering school │ │ │ -0000a8f0: 696e 2046 7261 6e63 652e 2042 6573 6964 in France. Besid │ │ │ -0000a900: 6573 2068 6973 2061 646d 696e 6973 7472 es his administr │ │ │ -0000a910: 6174 6976 6520 7461 736b 7320 6865 5c6e ative tasks he\n │ │ │ -0000a920: 7465 6163 6865 7320 6e65 7477 6f72 6b69 teaches networki │ │ │ -0000a930: 6e67 2062 6173 6963 732c 2049 6e74 6572 ng basics, Inter │ │ │ -0000a940: 6e65 7420 7465 6368 6e6f 6c6f 6769 6573 net technologies │ │ │ -0000a950: 2028 796f 7520 6b6e 6f77 2c20 616c 6c20 (you know, all │ │ │ -0000a960: 7468 6573 655c 6e78 784d 4c20 616e 6420 these\nxxML and │ │ │ -0000a970: 6861 6972 7920 7363 7269 7074 206c 616e hairy script lan │ │ │ -0000a980: 6775 6167 6573 2021 2920 2061 6e64 2074 guages !) and t │ │ │ -0000a990: 6865 2053 6368 656d 6520 6c61 6e67 7561 he Scheme langua │ │ │ -0000a9a0: 6765 2e5c 6e22 2070 656c 6567 7269 2022 ge.\n" pelegri " │ │ │ -0000a9b0: 4920 6469 6420 6d79 2050 6844 2061 7420 I did my PhD at │ │ │ -0000a9c0: 5543 4220 616e 6420 6120 706f 7374 646f UCB and a postdo │ │ │ -0000a9d0: 6320 6174 2043 534c 2f50 4152 432e 2020 c at CSL/PARC. │ │ │ -0000a9e0: 4920 6a6f 696e 6564 2053 756e 2069 6e20 I joined Sun in │ │ │ -0000a9f0: 3139 3930 2c5c 6e73 7065 6e74 2073 6f6d 1990,\nspent som │ │ │ -0000aa00: 6520 7469 6d65 2069 6e20 4465 7650 726f e time in DevPro │ │ │ -0000aa10: 2028 7468 6174 2069 7320 7768 656e 2049 (that is when I │ │ │ -0000aa20: 206d 6164 6520 6d79 2063 6f6e 7472 6962 made my contrib │ │ │ -0000aa30: 7574 696f 6e20 746f 5c6e 5845 6d61 6373 ution to\nXEmacs │ │ │ -0000aa40: 2920 616e 6420 6a6f 696e 6564 204a 6176 ) and joined Jav │ │ │ -0000aa50: 6153 6f66 7420 696e 2066 616c 6c20 2739 aSoft in fall '9 │ │ │ -0000aa60: 352c 2077 6865 7265 2049 2776 6520 6265 5, where I've be │ │ │ -0000aa70: 656e 2074 6865 206c 6561 6420 666f 725c en the lead for\ │ │ │ -0000aa80: 6e73 6576 6572 616c 204a 5350 2d72 656c nseveral JSP-rel │ │ │ -0000aa90: 6174 6564 2073 7065 6369 6669 6361 7469 ated specificati │ │ │ -0000aaa0: 6f6e 7320 616e 6420 4a41 582d 5250 432e ons and JAX-RPC. │ │ │ -0000aab0: 2020 4927 6d20 6375 7272 656e 746c 7920 I'm currently │ │ │ -0000aac0: 7468 6520 5765 625c 6e4c 6179 6572 2061 the Web\nLayer a │ │ │ -0000aad0: 7263 6869 7465 6374 2066 6f72 204a 3245 rchitect for J2E │ │ │ -0000aae0: 452e 205c 6e5c 6e49 2077 6173 2062 6f72 E. \n\nI was bor │ │ │ -0000aaf0: 6e20 696e 2042 6172 6365 6c6f 6e61 2061 n in Barcelona a │ │ │ -0000ab00: 6e64 2049 2067 7265 7720 7570 206d 6f73 nd I grew up mos │ │ │ -0000ab10: 746c 7920 696e 2043 6172 6163 6173 3b20 tly in Caracas; │ │ │ -0000ab20: 4920 6861 7665 2074 776f 206b 6964 735c I have two kids\ │ │ │ -0000ab30: 6e61 6e64 2049 2073 7065 616b 206f 6e6c nand I speak onl │ │ │ -0000ab40: 7920 6361 7461 6c61 6e20 746f 2074 6865 y catalan to the │ │ │ -0000ab50: 6d3b 2049 2063 616e 206a 7567 676c 6520 m; I can juggle │ │ │ -0000ab60: 736f 6d65 2028 6361 7265 6572 2c20 6661 some (career, fa │ │ │ -0000ab70: 6d69 6c79 2c20 616e 645c 6e34 2062 616c mily, and\n4 bal │ │ │ -0000ab80: 6c73 206f 7220 3320 7069 6e73 293b 2061 ls or 3 pins); a │ │ │ -0000ab90: 6e64 206d 7920 656e 676c 6973 6820 6361 nd my english ca │ │ │ -0000aba0: 6e20 6265 2069 6469 6f73 796e 6372 6174 n be idiosyncrat │ │ │ -0000abb0: 6963 212e 5c6e 2220 7065 7a20 2250 6574 ic!.\n" pez "Pet │ │ │ -0000abc0: 6572 2063 7572 7265 6e74 6c79 2073 6572 er currently ser │ │ │ -0000abd0: 7665 7320 6173 2053 656e 696f 7220 5669 ves as Senior Vi │ │ │ -0000abe0: 6365 2050 7265 7369 6465 6e74 2c20 5072 ce President, Pr │ │ │ -0000abf0: 6f64 7563 7420 4465 7665 6c6f 706d 656e oduct Developmen │ │ │ -0000ac00: 745c 6e66 6f72 2043 4253 2053 706f 7274 t\nfor CBS Sport │ │ │ -0000ac10: 734c 696e 652e 2020 5365 6520 2220 2243 sLine. See " "C │ │ │ -0000ac20: 4253 2053 706f 7274 734c 696e 6522 2070 BS SportsLine" p │ │ │ -0000ac30: 6970 6572 2022 4d79 2068 6f6d 6520 7061 iper "My home pa │ │ │ -0000ac40: 6765 2069 7320 6865 7265 3a5c 6e22 2022 ge is here:\n" " │ │ │ -0000ac50: 5669 7369 7420 616e 6479 2773 2068 6f6d Visit andy's hom │ │ │ -0000ac60: 6520 7061 6765 2220 225c 6e5c 6e20 416e e page" "\n\n An │ │ │ -0000ac70: 6479 2068 6173 2062 6565 6e20 6163 7469 dy has been acti │ │ │ -0000ac80: 7665 2069 6e20 7468 6520 5845 6d61 6373 ve in the XEmacs │ │ │ -0000ac90: 2074 6561 6d20 666f 7220 6120 6e75 6d62 team for a numb │ │ │ -0000aca0: 6572 206f 6620 7965 6172 732c 5c6e 6865 er of years,\nhe │ │ │ -0000acb0: 6c70 696e 6720 706f 7274 2058 456d 6163 lping port XEmac │ │ │ -0000acc0: 7320 746f 204d 5320 5769 6e64 6f77 7320 s to MS Windows │ │ │ -0000acd0: 6f70 6572 6174 696e 6720 7379 7374 656d operating system │ │ │ -0000ace0: 732e 2048 6520 6973 2061 6c73 6f20 7468 s. He is also th │ │ │ -0000acf0: 655c 6e63 7572 7265 6e74 204d 5320 5769 e\ncurrent MS Wi │ │ │ -0000ad00: 6e64 6f77 7320 7265 6c65 6173 6520 6d61 ndows release ma │ │ │ -0000ad10: 6e61 6765 7220 616e 6420 6d61 696e 7461 nager and mainta │ │ │ -0000ad20: 696e 7320 7468 6520 4d53 2057 696e 646f ins the MS Windo │ │ │ -0000ad30: 7773 5c6e 6e65 7469 6e73 7461 6c6c 6572 ws\nnetinstaller │ │ │ -0000ad40: 2e5c 6e22 2070 6974 746d 616e 2072 6963 .\n" pittman ric │ │ │ -0000ad50: 6b63 2022 5468 6520 6861 636b 6572 2066 kc "The hacker f │ │ │ -0000ad60: 6f72 6d65 726c 7920 6b6e 6f77 6e20 6173 ormerly known as │ │ │ -0000ad70: 2052 6963 6b20 4275 7364 6965 636b 6572 Rick Busdiecker │ │ │ -0000ad80: 2069 7320 6120 6465 7665 6c6f 7065 7220 is a developer │ │ │ -0000ad90: 616e 645c 6e74 6563 686e 6963 616c 206d and\ntechnical m │ │ │ -0000ada0: 616e 6167 6572 2061 7420 4465 7574 7363 anager at Deutsc │ │ │ -0000adb0: 6865 2042 616e 6b20 696e 204e 6577 2059 he Bank in New Y │ │ │ -0000adc0: 6f72 6b20 6475 7269 6e67 2064 6179 6c69 ork during dayli │ │ │ -0000add0: 6768 7420 686f 7572 732e 5c6e 496e 2074 ght hours.\nIn t │ │ │ -0000ade0: 6865 2065 7665 6e69 6e67 7320 6865 206d he evenings he m │ │ │ -0000adf0: 6169 6e74 6169 6e73 2074 6872 6565 2063 aintains three c │ │ │ -0000ae00: 6869 6c64 7265 6e2c 2061 6e64 2077 6865 hildren, and whe │ │ │ -0000ae10: 6e20 6865 206f 7567 6874 2074 6f20 6265 n he ought to be │ │ │ -0000ae20: 5c6e 736c 6565 7069 6e67 2068 6520 6275 \nsleeping he bu │ │ │ -0000ae30: 696c 6473 2058 456d 6163 7320 6265 7461 ilds XEmacs beta │ │ │ -0000ae40: 732c 2061 6e64 2074 696e 6b65 7273 2077 s, and tinkers w │ │ │ -0000ae50: 6974 6820 7661 7269 6f75 7320 7065 7273 ith various pers │ │ │ -0000ae60: 6f6e 616c 5c6e 6861 636b 696e 6720 7072 onal\nhacking pr │ │ │ -0000ae70: 6f6a 6563 7473 2e5c 6e22 2072 6f73 6520 ojects.\n" rose │ │ │ -0000ae80: 726f 7373 696e 6920 2243 7572 7265 6e74 rossini "Current │ │ │ -0000ae90: 2064 6576 656c 6f70 6d65 6e74 206c 6561 development lea │ │ │ -0000aea0: 6420 666f 7220 4553 5320 2845 6d61 6373 d for ESS (Emacs │ │ │ -0000aeb0: 2053 7065 616b 7320 5374 6174 6973 7469 Speaks Statisti │ │ │ -0000aec0: 6373 292c 2061 206d 6f64 6520 616e 645c cs), a mode and\ │ │ │ -0000aed0: 6e69 6e66 6572 696f 7220 6d6f 6465 2066 ninferior mode f │ │ │ -0000aee0: 6f72 2073 7461 7469 7374 6963 616c 2070 or statistical p │ │ │ -0000aef0: 726f 6772 616d 6d69 6e67 2061 6e64 2064 rogramming and d │ │ │ -0000af00: 6174 6120 616e 616c 7973 6973 2066 6f72 ata analysis for │ │ │ -0000af10: 2053 4153 2c5c 6e53 2c20 532d 504c 5553 SAS,\nS, S-PLUS │ │ │ -0000af20: 2c20 522c 2058 4c69 7370 5374 6174 3b20 , R, XLispStat; │ │ │ -0000af30: 636f 6e66 6967 7572 6162 6c65 2066 6f72 configurable for │ │ │ -0000af40: 206e 6561 726c 7920 616e 7920 6f74 6865 nearly any othe │ │ │ -0000af50: 7220 7374 6174 6973 7469 6361 6c5c 6e6c r statistical\nl │ │ │ -0000af60: 616e 6775 6167 652f 7061 636b 6167 6520 anguage/package │ │ │ -0000af70: 6f6e 6520 6d69 6768 7420 7761 6e74 2e20 one might want. │ │ │ -0000af80: 2049 6e20 7370 6172 6520 7469 6d65 2c20 In spare time, │ │ │ -0000af90: 6368 6173 6573 2068 6973 2073 6f6e 2061 chases his son a │ │ │ -0000afa0: 726f 756e 645c 6e61 6e64 2061 6374 7320 round\nand acts │ │ │ -0000afb0: 6173 2061 2050 682e 442e 2028 6269 6f29 as a Ph.D. (bio) │ │ │ -0000afc0: 7374 6174 6973 7469 6369 616e 2066 6f72 statistician for │ │ │ -0000afd0: 206d 6f6e 6579 2061 6e64 2061 6d75 7365 money and amuse │ │ │ -0000afe0: 6d65 6e74 2c5c 6e70 7269 6d61 7269 6c79 ment,\nprimarily │ │ │ -0000aff0: 2066 6f63 7573 696e 6720 6f6e 2073 7461 focusing on sta │ │ │ -0000b000: 7469 7374 6963 616c 2063 6f6d 7075 7469 tistical computi │ │ │ -0000b010: 6e67 2c20 7669 7375 616c 697a 6174 696f ng, visualizatio │ │ │ -0000b020: 6e2c 2061 6e64 2074 6865 5c6e 6465 7369 n, and the\ndesi │ │ │ -0000b030: 676e 2061 6e64 2061 6e61 6c79 7369 7320 gn and analysis │ │ │ -0000b040: 6f66 2048 4956 2076 6163 6369 6e65 2074 of HIV vaccine t │ │ │ -0000b050: 7269 616c 732e 2020 4375 7272 656e 7420 rials. Current │ │ │ -0000b060: 706f 7369 7469 6f6e 3a20 5265 7365 6172 position: Resear │ │ │ -0000b070: 6368 5c6e 4173 7369 7374 616e 7420 5072 ch\nAssistant Pr │ │ │ -0000b080: 6f66 6573 736f 7220 6f66 2042 696f 7374 ofessor of Biost │ │ │ -0000b090: 6174 6973 7469 6373 2061 7420 7468 6520 atistics at the │ │ │ -0000b0a0: 556e 6976 6572 7369 7479 206f 6620 5761 University of Wa │ │ │ -0000b0b0: 7368 696e 6774 6f6e 5c6e 616e 6420 7468 shington\nand th │ │ │ -0000b0c0: 6520 4672 6564 2048 7574 6368 696e 736f e Fred Hutchinso │ │ │ -0000b0d0: 6e20 4361 6e63 6572 2052 6573 6561 7263 n Cancer Researc │ │ │ -0000b0e0: 6820 4365 6e74 6572 2e5c 6e5c 6e53 6565 h Center.\n\nSee │ │ │ -0000b0f0: 2022 2022 5669 7369 7420 416e 7468 6f6e " "Visit Anthon │ │ │ -0000b100: 7927 7320 686f 6d65 2070 6167 6522 2073 y's home page" s │ │ │ -0000b110: 6c62 2022 5065 6163 6865 7320 4261 7572 lb "Peaches Baur │ │ │ -0000b120: 2c20 3139 3836 2d31 3939 392e 5c6e 5265 , 1986-1999.\nRe │ │ │ -0000b130: 7374 2069 6e20 7065 6163 6522 2073 7065 st in peace" spe │ │ │ -0000b140: 7262 6572 2022 5768 656e 204d 696b 6520 rber "When Mike │ │ │ -0000b150: 6973 6e27 7420 6275 7379 2070 7574 7469 isn't busy putti │ │ │ -0000b160: 6e67 2074 6f67 6574 6865 7220 7061 7463 ng together patc │ │ │ -0000b170: 6865 7320 666f 7220 6672 6565 2073 6f66 hes for free sof │ │ │ -0000b180: 7477 6172 6520 6865 2068 6173 5c6e 6a75 tware he has\nju │ │ │ -0000b190: 7374 2069 6e73 7461 6c6c 6564 206f 7220 st installed or │ │ │ -0000b1a0: 6368 616e 6769 6e67 2068 6973 2068 6169 changing his hai │ │ │ -0000b1b0: 7273 7479 6c65 2c20 6865 2064 6f65 7320 rstyle, he does │ │ │ -0000b1c0: 7265 7365 6172 6368 2069 6e20 6d6f 6465 research in mode │ │ │ -0000b1d0: 726e 5c6e 7072 6f67 7261 6d6d 696e 6720 rn\nprogramming │ │ │ -0000b1e0: 6c61 6e67 7561 6765 7320 616e 6420 7468 languages and th │ │ │ -0000b1f0: 6569 7220 696d 706c 656d 656e 7461 7469 eir implementati │ │ │ -0000b200: 6f6e 2c20 616e 6420 686f 7065 7320 7468 on, and hopes th │ │ │ -0000b210: 6174 206f 6e65 2064 6179 5c6e 5845 6d61 at one day\nXEma │ │ │ -0000b220: 6373 2077 696c 6c20 7370 6561 6b20 5363 cs will speak Sc │ │ │ -0000b230: 6865 6d65 2e5c 6e22 2073 7469 6720 2250 heme.\n" stig "P │ │ │ -0000b240: 6572 6970 6174 6574 6963 2075 6e69 6e6f eripatetic unino │ │ │ -0000b250: 6d69 6e61 6c20 456d 6163 7320 6861 636b minal Emacs hack │ │ │ -0000b260: 6572 2e20 2053 7469 6720 736f 6d65 7469 er. Stig someti │ │ │ -0000b270: 6d65 7320 6f70 6572 6174 6573 206f 7574 mes operates out │ │ │ -0000b280: 206f 6620 615c 6e62 6967 2077 6869 7465 of a\nbig white │ │ │ -0000b290: 2076 616e 2073 6574 2075 7020 666f 7220 van set up for │ │ │ -0000b2a0: 6e6f 6d61 6469 6320 6c69 7669 6e67 2061 nomadic living a │ │ │ -0000b2b0: 6e64 2068 6163 6b69 6e67 2e20 2053 7469 nd hacking. Sti │ │ │ -0000b2c0: 6720 6973 2073 6f72 7420 6f66 5c6e 6120 g is sort of\na │ │ │ -0000b2d0: 746f 6f6c 2066 6574 6973 6869 7374 2e20 tool fetishist. │ │ │ -0000b2e0: 2048 6520 6861 7320 6120 6861 7465 2f6c He has a hate/l │ │ │ -0000b2f0: 6f76 6520 7265 6c61 7469 6f6e 7368 6970 ove relationship │ │ │ -0000b300: 2077 6974 6820 636f 6d70 7574 6572 7320 with computers │ │ │ -0000b310: 616e 645c 6e68 6520 6861 636b 7320 6f6e and\nhe hacks on │ │ │ -0000b320: 2058 456d 6163 7320 6265 6361 7573 6520 XEmacs because │ │ │ -0000b330: 6974 2773 2061 2067 6f6f 6420 746f 6f6c it's a good tool │ │ │ -0000b340: 2074 6861 7420 6d61 6b65 7320 636f 6d70 that makes comp │ │ │ -0000b350: 7574 6572 735c 6e73 6f6d 6577 6861 7420 uters\nsomewhat │ │ │ -0000b360: 6c65 7373 206f 6620 6120 6e75 6973 616e less of a nuisan │ │ │ -0000b370: 6365 2e20 2042 6573 6964 6573 2058 456d ce. Besides XEm │ │ │ -0000b380: 6163 732c 2053 7469 6720 6573 7065 6369 acs, Stig especi │ │ │ -0000b390: 616c 6c79 206c 696b 6573 5c6e 6869 7320 ally likes\nhis │ │ │ -0000b3a0: 4c65 6174 6865 726d 616e 2c20 6869 7320 Leatherman, his │ │ │ -0000b3b0: 4d61 6b69 7461 2c20 616e 6420 6869 7320 Makita, and his │ │ │ -0000b3c0: 6c6f 636b 7069 636b 732e 2020 5374 6967 lockpicks. Stig │ │ │ -0000b3d0: 2077 616e 7473 2061 204d 4947 5c6e 7765 wants a MIG\nwe │ │ │ -0000b3e0: 6c64 6572 2061 6e64 2061 6972 2074 6f6f lder and air too │ │ │ -0000b3f0: 6c73 2e5c 6e5c 6e53 7469 6720 6c69 6b65 ls.\n\nStig like │ │ │ -0000b400: 7320 746f 2070 6572 6368 2c20 6861 6e67 s to perch, hang │ │ │ -0000b410: 2066 726f 6d20 7468 6520 6365 696c 696e from the ceilin │ │ │ -0000b420: 672c 2061 6e64 2063 6c69 6d62 206f 6e20 g, and climb on │ │ │ -0000b430: 7468 6520 7761 6c6c 732e 5c6e 5374 6967 the walls.\nStig │ │ │ -0000b440: 2068 6173 2061 2063 6f6f 6c20 7661 6e2e has a cool van. │ │ │ -0000b450: 2020 5374 6967 2077 6f75 6c64 206c 696b Stig would lik │ │ │ -0000b460: 6520 746f 2062 6520 6162 6c65 2074 6f20 e to be able to │ │ │ -0000b470: 7465 6c65 636f 6d6d 7574 6520 6672 6f6d telecommute from │ │ │ -0000b480: 2c5c 6e73 6179 2c20 7468 6520 6e6f 7274 ,\nsay, the nort │ │ │ -0000b490: 6820 7269 6d20 6f66 2074 6865 2047 7261 h rim of the Gra │ │ │ -0000b4a0: 6e64 2043 616e 796f 6e20 6f72 2074 6865 nd Canyon or the │ │ │ -0000b4b0: 206d 6964 7374 206f 6620 4261 6a61 2e5c midst of Baja.\ │ │ │ -0000b4c0: 6e22 2073 7469 6762 2022 4375 7272 656e n" stigb "Curren │ │ │ -0000b4d0: 746c 7920 7374 7564 7969 6e67 2063 6f6d tly studying com │ │ │ -0000b4e0: 7075 7465 7220 7363 6965 6e63 6520 696e puter science in │ │ │ -0000b4f0: 2054 726f 6e64 6865 696d 2c20 4e6f 7277 Trondheim, Norw │ │ │ -0000b500: 6179 2e20 2046 756c 6c20 7469 6d65 5c6e ay. Full time\n │ │ │ -0000b510: 4c69 6e75 7820 7573 6572 2061 6e64 2070 Linux user and p │ │ │ -0000b520: 726f 7564 206f 6620 6974 2e20 2058 456d roud of it. XEm │ │ │ -0000b530: 6163 7320 6861 636b 6572 206c 6967 6874 acs hacker light │ │ │ -0000b540: 2e5c 6e5c 6e53 6565 3a09 2220 2256 6973 .\n\nSee:." "Vis │ │ │ -0000b550: 6974 2053 7469 6727 7320 686f 6d65 2070 it Stig's home p │ │ │ -0000b560: 6167 6522 2074 6869 6573 7365 6c20 2257 age" thiessel "W │ │ │ -0000b570: 6f72 6b65 6420 6174 2055 6e69 7665 7273 orked at Univers │ │ │ -0000b580: 6974 7920 6f66 204b 6169 7365 7273 6c61 ity of Kaisersla │ │ │ -0000b590: 7574 6572 6e20 7768 6572 6520 6865 2074 utern where he t │ │ │ -0000b5a0: 6f6f 6b20 7061 7274 2069 6e20 7468 655c ook part in the\ │ │ │ -0000b5b0: 6e64 6576 656c 6f70 6d65 6e74 2061 6e64 ndevelopment and │ │ │ -0000b5c0: 2064 6573 6967 6e20 6f66 2061 2043 4144 design of a CAD │ │ │ -0000b5d0: 2066 7261 6d65 776f 726b 2066 6f72 2061 framework for a │ │ │ -0000b5e0: 6e61 6c6f 6720 696e 7465 6772 6174 6564 nalog integrated │ │ │ -0000b5f0: 5c6e 6369 7263 7569 7473 2077 6974 6820 \ncircuits with │ │ │ -0000b600: 7370 6563 6961 6c20 656d 7068 6173 6973 special emphasis │ │ │ -0000b610: 206f 6e20 6469 7374 7269 6275 7465 6420 on distributed │ │ │ -0000b620: 736f 6674 7761 7265 2063 6f6e 6365 7074 software concept │ │ │ -0000b630: 732e 2048 655c 6e68 6173 206e 6f77 206a s. He\nhas now j │ │ │ -0000b640: 6f69 6e65 6420 4850 2061 7320 7465 6368 oined HP as tech │ │ │ -0000b650: 6e69 6361 6c20 636f 6e73 756c 7461 6e74 nical consultant │ │ │ -0000b660: 2e5c 6e5c 6e20 2020 2020 2020 2020 2020 .\n\n │ │ │ -0000b670: 2020 2020 2020 2020 2020 2041 6c6c 206f All o │ │ │ -0000b680: 6620 7468 6520 6275 696c 6469 6e67 732c f the buildings, │ │ │ -0000b690: 5c6e 2020 2020 2020 2020 2020 2020 2020 \n │ │ │ -0000b6a0: 2020 2020 2020 2020 616c 6c20 6f66 2074 all of t │ │ │ -0000b6b0: 6865 2063 6172 735c 6e20 2020 2020 2020 he cars\n │ │ │ -0000b6c0: 2020 2020 2020 2020 2020 2020 2020 2077 w │ │ │ -0000b6d0: 6572 6520 6f6e 6365 206a 7573 7420 6120 ere once just a │ │ │ -0000b6e0: 6472 6561 6d5c 6e20 2020 2020 2020 2020 dream\n │ │ │ -0000b6f0: 2020 2020 2020 2020 2020 2020 2069 6e20 in │ │ │ -0000b700: 736f 6d65 626f 6479 2773 2068 6561 642e somebody's head. │ │ │ -0000b710: 5c6e 5c6e 2020 2020 2020 2020 2020 2020 \n\n │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3439 2032 3032 310a 3b3b 3b20 :08:49 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f61 626f 7574 2e65 6c0a 4/lisp/about.el. │ │ │ +00000090: 3b3b 3b20 656d 6163 7320 7665 7273 696f ;;; emacs versio │ │ │ +000000a0: 6e20 3231 2e34 2028 7061 7463 6820 3234 n 21.4 (patch 24 │ │ │ +000000b0: 2920 2253 7461 6e64 6172 6420 4322 2058 ) "Standard C" X │ │ │ +000000c0: 456d 6163 7320 4c75 6369 642e 0a3b 3b3b Emacs Lucid..;;; │ │ │ +000000d0: 2062 7974 6563 6f6d 7020 7665 7273 696f bytecomp versio │ │ │ +000000e0: 6e20 322e 3237 2058 456d 6163 733b 2032 n 2.27 XEmacs; 2 │ │ │ +000000f0: 3030 302d 3039 2d31 322e 0a3b 3b3b 206f 000-09-12..;;; o │ │ │ +00000100: 7074 696d 697a 6174 696f 6e20 6973 206f ptimization is o │ │ │ +00000110: 6e2e 0a3b 3b3b 2074 6869 7320 6669 6c65 n..;;; this file │ │ │ +00000120: 2075 7365 7320 6f70 636f 6465 7320 7768 uses opcodes wh │ │ │ +00000130: 6963 6820 646f 206e 6f74 2065 7869 7374 ich do not exist │ │ │ +00000140: 2069 6e20 456d 6163 7320 3139 2e0a 0a28 in Emacs 19...( │ │ │ +00000150: 6966 2028 616e 6420 2862 6f75 6e64 7020 if (and (boundp │ │ │ +00000160: 2765 6d61 6373 2d76 6572 7369 6f6e 290a 'emacs-version). │ │ │ +00000170: 0920 286f 7220 2861 6e64 2028 626f 756e . (or (and (boun │ │ │ +00000180: 6470 2027 6570 6f63 683a 3a76 6572 7369 dp 'epoch::versi │ │ │ +00000190: 6f6e 2920 6570 6f63 683a 3a76 6572 7369 on) epoch::versi │ │ │ +000001a0: 6f6e 290a 0920 2020 2020 2873 7472 696e on).. (strin │ │ │ +000001b0: 672d 6c65 7373 7020 656d 6163 732d 7665 g-lessp emacs-ve │ │ │ +000001c0: 7273 696f 6e20 2232 3022 2929 290a 2020 rsion "20"))). │ │ │ +000001d0: 2020 2865 7272 6f72 2022 6061 626f 7574 (error "`about │ │ │ +000001e0: 2e65 6c27 2077 6173 2063 6f6d 7069 6c65 .el' was compile │ │ │ +000001f0: 6420 666f 7220 456d 6163 7320 3230 2229 d for Emacs 20") │ │ │ +00000200: 290a 0a28 6f72 2028 626f 756e 6470 2027 )..(or (boundp ' │ │ │ +00000210: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ +00000220: 7429 2028 7365 7471 2063 7572 7265 6e74 t) (setq current │ │ │ +00000230: 2d6c 6f61 642d 6c69 7374 206e 696c 2929 -load-list nil)) │ │ │ +00000240: 0a0a 0a28 6279 7465 2d63 6f64 6520 22c0 ...(byte-code ". │ │ │ +00000250: c121 88c2 c3c4 c523 88c2 c6c7 c823 8722 .!.....#.....#." │ │ │ +00000260: 205b 7265 7175 6972 6520 7769 642d 6564 [require wid-ed │ │ │ +00000270: 6974 2063 7573 746f 6d2d 6465 636c 6172 it custom-declar │ │ │ +00000280: 652d 6661 6365 2061 626f 7574 2d68 6561 e-face about-hea │ │ │ +00000290: 646c 696e 652d 6661 6365 2028 2828 2863 dline-face ((((c │ │ │ +000002a0: 6c61 7373 2063 6f6c 6f72 2920 2862 6163 lass color) (bac │ │ │ +000002b0: 6b67 726f 756e 6420 6461 726b 2929 2028 kground dark)) ( │ │ │ +000002c0: 3a66 6f72 6567 726f 756e 6420 2272 6564 :foreground "red │ │ │ +000002d0: 2220 3a62 6f6c 6420 7429 2920 2828 2863 " :bold t)) (((c │ │ │ +000002e0: 6c61 7373 2063 6f6c 6f72 2920 2862 6163 lass color) (bac │ │ │ +000002f0: 6b67 726f 756e 6420 6c69 6768 7429 2028 kground light) ( │ │ │ +00000300: 7479 7065 206d 7377 696e 646f 7773 2929 type mswindows)) │ │ │ +00000310: 2028 3a66 6f72 6567 726f 756e 6420 2272 (:foreground "r │ │ │ +00000320: 6564 2220 3a62 6f6c 6420 7429 2920 2828 ed" :bold t)) (( │ │ │ +00000330: 2863 6c61 7373 2063 6f6c 6f72 2920 2862 (class color) (b │ │ │ +00000340: 6163 6b67 726f 756e 6420 6c69 6768 7429 ackground light) │ │ │ +00000350: 2920 283a 666f 7265 6772 6f75 6e64 2022 ) (:foreground " │ │ │ +00000360: 7265 6434 2220 3a62 6f6c 6420 7429 2920 red4" :bold t)) │ │ │ +00000370: 2828 2863 6c61 7373 2067 7261 7973 6361 (((class graysca │ │ │ +00000380: 6c65 2920 2862 6163 6b67 726f 756e 6420 le) (background │ │ │ +00000390: 6c69 6768 7429 2920 283a 666f 7265 6772 light)) (:foregr │ │ │ +000003a0: 6f75 6e64 2022 4c69 6768 7447 7261 7922 ound "LightGray" │ │ │ +000003b0: 203a 626f 6c64 2074 2929 2028 2828 636c :bold t)) (((cl │ │ │ +000003c0: 6173 7320 6772 6179 7363 616c 6529 2028 ass grayscale) ( │ │ │ +000003d0: 6261 636b 6772 6f75 6e64 2064 6172 6b29 background dark) │ │ │ +000003e0: 2920 283a 666f 7265 6772 6f75 6e64 2022 ) (:foreground " │ │ │ +000003f0: 4469 6d47 7261 7922 203a 626f 6c64 2074 DimGray" :bold t │ │ │ +00000400: 2929 2028 7420 283a 626f 6c64 2074 2929 )) (t (:bold t)) │ │ │ +00000410: 2920 2246 6163 6520 7573 6564 2066 6f72 ) "Face used for │ │ │ +00000420: 2063 6f6c 6f72 2d68 6967 686c 6967 6874 color-highlight │ │ │ +00000430: 6564 2068 6561 646c 696e 6573 2069 6e20 ed headlines in │ │ │ +00000440: 7468 6520 4162 6f75 7420 7061 6765 2e22 the About page." │ │ │ +00000450: 2061 626f 7574 2d6c 696e 6b2d 6661 6365 about-link-face │ │ │ +00000460: 2028 2828 2863 6c61 7373 2063 6f6c 6f72 ((((class color │ │ │ +00000470: 2920 2862 6163 6b67 726f 756e 6420 6461 ) (background da │ │ │ +00000480: 726b 2929 2028 3a66 6f72 6567 726f 756e rk)) (:foregroun │ │ │ +00000490: 6420 2262 6c75 6522 203a 756e 6465 726c d "blue" :underl │ │ │ +000004a0: 696e 6520 7429 2920 2828 2863 6c61 7373 ine t)) (((class │ │ │ +000004b0: 2063 6f6c 6f72 2920 2862 6163 6b67 726f color) (backgro │ │ │ +000004c0: 756e 6420 6c69 6768 7429 2028 7479 7065 und light) (type │ │ │ +000004d0: 206d 7377 696e 646f 7773 2929 2028 3a66 mswindows)) (:f │ │ │ +000004e0: 6f72 6567 726f 756e 6420 2262 6c75 6533 oreground "blue3 │ │ │ +000004f0: 2220 3a75 6e64 6572 6c69 6e65 2074 2929 " :underline t)) │ │ │ +00000500: 2028 2828 636c 6173 7320 636f 6c6f 7229 (((class color) │ │ │ +00000510: 2028 6261 636b 6772 6f75 6e64 206c 6967 (background lig │ │ │ +00000520: 6874 2929 2028 3a66 6f72 6567 726f 756e ht)) (:foregroun │ │ │ +00000530: 6420 2262 6c75 6534 2220 3a75 6e64 6572 d "blue4" :under │ │ │ +00000540: 6c69 6e65 2074 2929 2028 2828 636c 6173 line t)) (((clas │ │ │ +00000550: 7320 6772 6179 7363 616c 6529 2028 6261 s grayscale) (ba │ │ │ +00000560: 636b 6772 6f75 6e64 206c 6967 6874 2929 ckground light)) │ │ │ +00000570: 2028 3a66 6f72 6567 726f 756e 6420 2244 (:foreground "D │ │ │ +00000580: 696d 4772 6179 2220 3a62 6f6c 6420 7420 imGray" :bold t │ │ │ +00000590: 3a69 7461 6c69 6320 7420 3a75 6e64 6572 :italic t :under │ │ │ +000005a0: 6c69 6e65 2074 2929 2028 2828 636c 6173 line t)) (((clas │ │ │ +000005b0: 7320 6772 6179 7363 616c 6529 2028 6261 s grayscale) (ba │ │ │ +000005c0: 636b 6772 6f75 6e64 2064 6172 6b29 2920 ckground dark)) │ │ │ +000005d0: 283a 666f 7265 6772 6f75 6e64 2022 4c69 (:foreground "Li │ │ │ +000005e0: 6768 7447 7261 7922 203a 626f 6c64 2074 ghtGray" :bold t │ │ │ +000005f0: 203a 6974 616c 6963 2074 203a 756e 6465 :italic t :unde │ │ │ +00000600: 726c 696e 6520 7429 2920 2874 2028 3a75 rline t)) (t (:u │ │ │ +00000610: 6e64 6572 6c69 6e65 2074 2929 2920 2246 nderline t))) "F │ │ │ +00000620: 6163 6520 7573 6564 2066 6f72 206c 696e ace used for lin │ │ │ +00000630: 6b73 2069 6e20 7468 6520 4162 6f75 7420 ks in the About │ │ │ +00000640: 7061 6765 2e22 5d20 3429 0a23 4032 3620 page."] 4).#@26 │ │ │ +00000650: 416c 6973 7420 6f66 2058 456d 6163 7320 Alist of XEmacs │ │ │ +00000660: 6861 636b 6572 732e 1f0a 2864 6566 7661 hackers...(defva │ │ │ +00000670: 7220 7865 6d61 6373 2d68 6163 6b65 7273 r xemacs-hackers │ │ │ +00000680: 2027 2828 6164 7269 616e 2022 4164 7269 '((adrian "Adri │ │ │ +00000690: 616e 2041 6963 686e 6572 2220 2261 6472 an Aichner" "adr │ │ │ +000006a0: 6961 6e40 7865 6d61 6373 2e6f 7267 2229 ian@xemacs.org") │ │ │ +000006b0: 2028 616a 2022 416e 6472 6561 7320 4a61 (aj "Andreas Ja │ │ │ +000006c0: 6567 6572 2220 2261 6a40 7865 6d61 6373 eger" "aj@xemacs │ │ │ +000006d0: 2e6f 7267 2229 2028 616a 6320 2241 6e64 .org") (ajc "And │ │ │ +000006e0: 7265 7720 436f 7367 7269 6666 2220 2261 rew Cosgriff" "a │ │ │ +000006f0: 6a63 4078 656d 6163 732e 6f72 6722 2920 jc@xemacs.org") │ │ │ +00000700: 2861 6c61 7374 6169 7220 2241 6c61 7374 (alastair "Alast │ │ │ +00000710: 6169 7220 486f 7567 6874 6f6e 2220 2261 air Houghton" "a │ │ │ +00000720: 6c61 7374 6169 7240 7865 6d61 6373 2e6f lastair@xemacs.o │ │ │ +00000730: 7267 2229 2028 6261 7720 2242 6172 7279 rg") (baw "Barry │ │ │ +00000740: 2057 6172 7361 7722 2022 6277 6172 7361 Warsaw" "bwarsa │ │ │ +00000750: 7740 7865 6d61 6373 2e6f 7267 2229 2028 w@xemacs.org") ( │ │ │ +00000760: 6265 6e20 2242 656e 2057 696e 6722 2022 ben "Ben Wing" " │ │ │ +00000770: 6265 6e40 7865 6d61 6373 2e6f 7267 2229 ben@xemacs.org") │ │ │ +00000780: 2028 6277 2022 426f 6220 5765 696e 6572 (bw "Bob Weiner │ │ │ +00000790: 2220 2277 6569 6e65 7240 7865 6d61 6373 " "weiner@xemacs │ │ │ +000007a0: 2e6f 7267 2229 2028 6367 7720 2243 6861 .org") (cgw "Cha │ │ │ +000007b0: 726c 6573 2057 616c 646d 616e 2220 2263 rles Waldman" "c │ │ │ +000007c0: 6777 4078 656d 6163 732e 6f72 6722 2920 gw@xemacs.org") │ │ │ +000007d0: 2863 6872 2022 4368 7269 7374 6961 6e20 (chr "Christian │ │ │ +000007e0: 4e79 62f8 2220 2263 6872 4078 656d 6163 Nyb." "chr@xemac │ │ │ +000007f0: 732e 6f72 6722 2920 2863 7261 6967 2022 s.org") (craig " │ │ │ +00000800: 4372 6169 6720 4c61 6e6e 696e 6722 2022 Craig Lanning" " │ │ │ +00000810: 6372 6169 6740 7865 6d61 6373 2e6f 7267 craig@xemacs.org │ │ │ +00000820: 2229 2028 6374 686f 6d70 2022 4368 7563 ") (cthomp "Chuc │ │ │ +00000830: 6b20 5468 6f6d 7073 6f6e 2220 2263 7468 k Thompson" "cth │ │ │ +00000840: 6f6d 7040 7865 6d61 6373 2e6f 7267 2229 omp@xemacs.org") │ │ │ +00000850: 2028 6461 696b 6920 2244 6169 6b69 2055 (daiki "Daiki U │ │ │ +00000860: 656e 6f22 2022 6461 696b 6940 7865 6d61 eno" "daiki@xema │ │ │ +00000870: 6373 2e6f 7267 2229 2028 6461 6e20 2244 cs.org") (dan "D │ │ │ +00000880: 616e 2048 6f6c 6d73 616e 6422 2022 6461 an Holmsand" "da │ │ │ +00000890: 6e40 7865 6d61 6373 2e6f 7267 2229 2028 n@xemacs.org") ( │ │ │ +000008a0: 6461 7272 796c 6f20 2244 6172 7279 6c20 darrylo "Darryl │ │ │ +000008b0: 4f6b 6168 6174 6122 2022 6461 7272 796c Okahata" "darryl │ │ │ +000008c0: 6f40 7865 6d61 6373 2e6f 7267 2229 2028 o@xemacs.org") ( │ │ │ +000008d0: 6465 7669 6e20 224d 6174 7468 6965 7520 devin "Matthieu │ │ │ +000008e0: 4465 7669 6e22 2022 6465 7669 6e40 7865 Devin" "devin@xe │ │ │ +000008f0: 6d61 6373 2e6f 7267 2229 2028 646b 696e macs.org") (dkin │ │ │ +00000900: 6472 6564 2022 4461 7272 656c 6c20 4b69 dred "Darrell Ki │ │ │ +00000910: 6e64 7265 6422 2022 646b 696e 6472 6564 ndred" "dkindred │ │ │ +00000920: 4078 656d 6163 732e 6f72 6722 2920 2864 @xemacs.org") (d │ │ │ +00000930: 6d6f 6f72 6520 2244 6176 6964 204d 6f6f moore "David Moo │ │ │ +00000940: 7265 2220 2264 6d6f 6f72 6540 7865 6d61 re" "dmoore@xema │ │ │ +00000950: 6373 2e6f 7267 2229 2028 6469 6469 6572 cs.org") (didier │ │ │ +00000960: 2022 4469 6469 6572 2056 6572 6e61 2220 "Didier Verna" │ │ │ +00000970: 2264 6964 6965 7240 7865 6d61 6373 2e6f "didier@xemacs.o │ │ │ +00000980: 7267 2229 2028 6562 2022 4572 6963 2042 rg") (eb "Eric B │ │ │ +00000990: 656e 736f 6e22 2022 6562 4078 656d 6163 enson" "eb@xemac │ │ │ +000009a0: 732e 6f72 6722 2920 2866 6162 7269 6365 s.org") (fabrice │ │ │ +000009b0: 2022 4661 6272 6963 6520 506f 7069 6e65 "Fabrice Popine │ │ │ +000009c0: 6175 2220 2266 6162 7269 6365 4078 656d au" "fabrice@xem │ │ │ +000009d0: 6163 732e 6f72 6722 2920 2867 6f6c 7562 acs.org") (golub │ │ │ +000009e0: 6576 2022 496c 7961 2047 6f6c 7562 6576 ev "Ilya Golubev │ │ │ +000009f0: 2220 2267 6f6c 7562 6576 4078 656d 6163 " "golubev@xemac │ │ │ +00000a00: 732e 6f72 6722 2920 2867 756e 6e61 7220 s.org") (gunnar │ │ │ +00000a10: 2247 756e 6e61 7220 4576 6572 6d61 6e6e "Gunnar Evermann │ │ │ +00000a20: 2220 2267 756e 6e61 7240 7865 6d61 6373 " "gunnar@xemacs │ │ │ +00000a30: 2e6f 7267 2229 2028 6862 7320 2248 6172 .org") (hbs "Har │ │ │ +00000a40: 6c61 6e20 5365 7874 6f6e 2220 2268 6273 lan Sexton" "hbs │ │ │ +00000a50: 4078 656d 6163 732e 6f72 6722 2920 2868 @xemacs.org") (h │ │ │ +00000a60: 6973 6173 6869 2022 4869 7361 7368 6920 isashi "Hisashi │ │ │ +00000a70: 4d69 7961 7368 6974 6122 2022 6869 7361 Miyashita" "hisa │ │ │ +00000a80: 7368 6940 7865 6d61 6373 2e6f 7267 2229 shi@xemacs.org") │ │ │ +00000a90: 2028 686d 756c 6c65 7220 2248 616e 7320 (hmuller "Hans │ │ │ +00000aa0: 4d75 6c6c 6572 2220 2268 6d75 6c6c 6572 Muller" "hmuller │ │ │ +00000ab0: 4078 656d 6163 732e 6f72 6722 2920 2868 @xemacs.org") (h │ │ │ +00000ac0: 6e69 6b73 6963 2022 4872 766f 6a65 204e niksic "Hrvoje N │ │ │ +00000ad0: 696b 7369 6322 2022 686e 696b 7369 6340 iksic" "hniksic@ │ │ │ +00000ae0: 7865 6d61 6373 2e6f 7267 2229 2028 686f xemacs.org") (ho │ │ │ +00000af0: 626c 6579 2022 4461 7669 6420 686f 626c bley "David hobl │ │ │ +00000b00: 6579 2220 2268 6f62 6c65 7940 7865 6d61 ey" "hobley@xema │ │ │ +00000b10: 6373 2e6f 7267 2229 2028 6a61 6e20 224a cs.org") (jan "J │ │ │ +00000b20: 616e 2056 726f 6f6e 686f 6622 2022 6a61 an Vroonhof" "ja │ │ │ +00000b30: 6e40 7865 6d61 6373 2e6f 7267 2229 2028 n@xemacs.org") ( │ │ │ +00000b40: 6a61 7265 7468 2022 4a61 7265 7468 2048 jareth "Jareth H │ │ │ +00000b50: 6569 6e22 2022 6a61 7265 7468 4078 656d ein" "jareth@xem │ │ │ +00000b60: 6163 732e 6f72 6722 2920 286a 6173 2022 acs.org") (jas " │ │ │ +00000b70: 5369 6d6f 6e20 4a6f 7365 6673 736f 6e22 Simon Josefsson" │ │ │ +00000b80: 2022 7369 6d6f 6e40 7865 6d61 6373 2e6f "simon@xemacs.o │ │ │ +00000b90: 7267 2229 2028 6a61 736f 6e20 224a 6173 rg") (jason "Jas │ │ │ +00000ba0: 6f6e 2052 2e20 4d61 7374 616c 6572 2220 on R. Mastaler" │ │ │ +00000bb0: 226a 6173 6f6e 4078 656d 6163 732e 6f72 "jason@xemacs.or │ │ │ +00000bc0: 6722 2920 286a 656e 7320 224a 656e 7320 g") (jens "Jens │ │ │ +00000bd0: 4c61 7574 656e 6261 6368 6572 2220 226a Lautenbacher" "j │ │ │ +00000be0: 656e 7340 7865 6d61 6373 2e6f 7267 2229 ens@xemacs.org") │ │ │ +00000bf0: 2028 6a6d 696c 6c65 7220 224a 6566 6620 (jmiller "Jeff │ │ │ +00000c00: 4d69 6c6c 6572 2220 226a 6d69 6c6c 6572 Miller" "jmiller │ │ │ +00000c10: 4078 656d 6163 732e 6f72 6722 2920 286a @xemacs.org") (j │ │ │ +00000c20: 6f6e 6174 6861 6e20 224a 6f6e 6174 6861 onathan "Jonatha │ │ │ +00000c30: 6e20 4861 7272 6973 2220 226a 6f6e 6174 n Harris" "jonat │ │ │ +00000c40: 6861 6e40 7865 6d61 6373 2e6f 7267 2229 han@xemacs.org") │ │ │ +00000c50: 2028 6a75 6870 2022 4a65 6e73 2d55 6c72 (juhp "Jens-Ulr │ │ │ +00000c60: 696b 2048 6f6c 6765 7220 5065 7465 7273 ik Holger Peters │ │ │ +00000c70: 656e 2220 2270 6574 6572 7365 6e40 7865 en" "petersen@xe │ │ │ +00000c80: 6d61 6373 2e6f 7267 2229 2028 6a77 7a20 macs.org") (jwz │ │ │ +00000c90: 224a 616d 6965 205a 6177 696e 736b 6922 "Jamie Zawinski" │ │ │ +00000ca0: 2022 6a77 7a40 7865 6d61 6373 2e6f 7267 "jwz@xemacs.org │ │ │ +00000cb0: 2229 2028 6b61 7a7a 2022 4945 4e41 4741 ") (kazz "IENAGA │ │ │ +00000cc0: 204b 617a 7579 756b 6922 2022 6965 6e61 Kazuyuki" "iena │ │ │ +00000cd0: 6761 4078 656d 6163 732e 6f72 6722 2920 ga@xemacs.org") │ │ │ +00000ce0: 286b 6972 696c 6c20 224b 6972 696c 6c20 (kirill "Kirill │ │ │ +00000cf0: 4b61 7473 6e65 6c73 6f6e 2220 226b 6972 Katsnelson" "kir │ │ │ +00000d00: 696c 6c40 7865 6d61 6373 2e6f 7267 2229 ill@xemacs.org") │ │ │ +00000d10: 2028 6b79 6c65 2022 4b79 6c65 204a 6f6e (kyle "Kyle Jon │ │ │ +00000d20: 6573 2220 226b 796c 6540 7865 6d61 6373 es" "kyle@xemacs │ │ │ +00000d30: 2e6f 7267 2229 2028 6c61 7273 6920 224c .org") (larsi "L │ │ │ +00000d40: 6172 7320 4d61 676e 6520 496e 6765 6272 ars Magne Ingebr │ │ │ +00000d50: 6967 7473 656e 2220 226c 6172 7369 4078 igtsen" "larsi@x │ │ │ +00000d60: 656d 6163 732e 6f72 6722 2920 286d 6172 emacs.org") (mar │ │ │ +00000d70: 6370 6120 224d 6172 6320 5061 7175 6574 cpa "Marc Paquet │ │ │ +00000d80: 7465 2220 226d 6172 6370 6140 7865 6d61 te" "marcpa@xema │ │ │ +00000d90: 6373 2e6f 7267 2229 2028 6d61 7274 696e cs.org") (martin │ │ │ +00000da0: 2022 4d61 7274 696e 2042 7563 6868 6f6c "Martin Buchhol │ │ │ +00000db0: 7a22 2022 6d61 7274 696e 4078 656d 6163 z" "martin@xemac │ │ │ +00000dc0: 732e 6f72 6722 2920 286d 636f 6f6b 2022 s.org") (mcook " │ │ │ +00000dd0: 4d69 6368 6165 6c20 522e 2043 6f6f 6b22 Michael R. Cook" │ │ │ +00000de0: 2022 6d63 6f6f 6b40 7865 6d61 6373 2e6f "mcook@xemacs.o │ │ │ +00000df0: 7267 2229 2028 6d6c 7920 2252 6963 6861 rg") (mly "Richa │ │ │ +00000e00: 7264 204d 6c79 6e61 7269 6b22 2022 6d6c rd Mlynarik" "ml │ │ │ +00000e10: 7940 7865 6d61 6373 2e6f 7267 2229 2028 y@xemacs.org") ( │ │ │ +00000e20: 6d6f 7269 6f6b 6120 224d 4f52 494f 4b41 morioka "MORIOKA │ │ │ +00000e30: 2054 6f6d 6f68 696b 6f22 2022 6d6f 7269 Tomohiko" "mori │ │ │ +00000e40: 6f6b 6140 7865 6d61 6373 2e6f 7267 2229 oka@xemacs.org") │ │ │ +00000e50: 2028 6d74 6120 224d 696b 6520 416c 6578 (mta "Mike Alex │ │ │ +00000e60: 616e 6465 7222 2022 6d74 6140 7865 6d61 ander" "mta@xema │ │ │ +00000e70: 6373 2e6f 7267 2229 2028 6f67 7261 6620 cs.org") (ograf │ │ │ +00000e80: 224f 6c69 7665 7220 4772 6166 2220 226f "Oliver Graf" "o │ │ │ +00000e90: 6772 6166 4078 656d 6163 732e 6f72 6722 graf@xemacs.org" │ │ │ +00000ea0: 2920 286f 6c69 7669 6572 2022 4f6c 6976 ) (olivier "Oliv │ │ │ +00000eb0: 6965 7220 4761 6c69 6265 7274 2220 226f ier Galibert" "o │ │ │ +00000ec0: 6c69 7669 6572 4078 656d 6163 732e 6f72 livier@xemacs.or │ │ │ +00000ed0: 6722 2920 286f 7363 6172 2022 4f73 6361 g") (oscar "Osca │ │ │ +00000ee0: 7220 4669 6775 6569 7265 646f 2220 226f r Figueiredo" "o │ │ │ +00000ef0: 7363 6172 4078 656d 6163 732e 6f72 6722 scar@xemacs.org" │ │ │ +00000f00: 2920 2870 656c 6567 7269 2022 4564 7561 ) (pelegri "Edua │ │ │ +00000f10: 7264 6f20 5065 6c65 6772 692d 4c6c 6f70 rdo Pelegri-Llop │ │ │ +00000f20: 6172 7422 2022 7065 6c65 6772 6940 7865 art" "pelegri@xe │ │ │ +00000f30: 6d61 6373 2e6f 7267 2229 2028 7065 7a20 macs.org") (pez │ │ │ +00000f40: 2250 6574 6572 2050 657a 6172 6973 2220 "Peter Pezaris" │ │ │ +00000f50: 2270 657a 4078 656d 6163 732e 6f72 6722 "pez@xemacs.org" │ │ │ +00000f60: 2920 2870 6970 6572 2022 416e 6479 2050 ) (piper "Andy P │ │ │ +00000f70: 6970 6572 2220 2261 6e64 7940 7865 6d61 iper" "andy@xema │ │ │ +00000f80: 6373 2e6f 7267 2229 2028 7069 7474 6d61 cs.org") (pittma │ │ │ +00000f90: 6e20 2244 616e 6965 6c20 5069 7474 6d61 n "Daniel Pittma │ │ │ +00000fa0: 6e22 2022 7069 7474 6d61 6e40 7865 6d61 n" "pittman@xema │ │ │ +00000fb0: 6373 2e6f 7267 2229 2028 7269 636b 6320 cs.org") (rickc │ │ │ +00000fc0: 2252 6963 6b20 4361 6d70 6265 6c6c 2220 "Rick Campbell" │ │ │ +00000fd0: 2272 6963 6b63 4078 656d 6163 732e 6f72 "rickc@xemacs.or │ │ │ +00000fe0: 6722 2920 2872 6f73 6520 224a 6f68 6e20 g") (rose "John │ │ │ +00000ff0: 526f 7365 2220 2272 6f73 6540 7865 6d61 Rose" "rose@xema │ │ │ +00001000: 6373 2e6f 7267 2229 2028 726f 7373 696e cs.org") (rossin │ │ │ +00001010: 6920 2241 6e74 686f 6e79 2052 6f73 7369 i "Anthony Rossi │ │ │ +00001020: 6e69 2220 2272 6f73 7369 6e69 4078 656d ni" "rossini@xem │ │ │ +00001030: 6163 732e 6f72 6722 2920 2873 6c62 2022 acs.org") (slb " │ │ │ +00001040: 5374 6576 6520 4261 7572 2220 2273 7465 Steve Baur" "ste │ │ │ +00001050: 7665 4078 656d 6163 732e 6f72 6722 2920 ve@xemacs.org") │ │ │ +00001060: 2873 7065 7262 6572 2022 4d69 6368 6165 (sperber "Michae │ │ │ +00001070: 6c20 5370 6572 6265 7222 2022 6d69 6b65 l Sperber" "mike │ │ │ +00001080: 4078 656d 6163 732e 6f72 6722 2920 2873 @xemacs.org") (s │ │ │ +00001090: 7469 6720 224a 6f6e 6174 6861 6e20 5374 tig "Jonathan St │ │ │ +000010a0: 6967 656c 6d61 6e22 2022 7374 6967 4078 igelman" "stig@x │ │ │ +000010b0: 656d 6163 732e 6f72 6722 2920 2873 7469 emacs.org") (sti │ │ │ +000010c0: 6762 2022 5374 6967 2042 6a6f 726c 796b gb "Stig Bjorlyk │ │ │ +000010d0: 6b65 2220 2273 7469 6762 4078 656d 6163 ke" "stigb@xemac │ │ │ +000010e0: 732e 6f72 6722 2920 2874 6869 6573 7365 s.org") (thiesse │ │ │ +000010f0: 6c20 224d 6172 6375 7320 5468 6965 7373 l "Marcus Thiess │ │ │ +00001100: 656c 2220 226d 6172 6375 7340 7865 6d61 el" "marcus@xema │ │ │ +00001110: 6373 2e6f 7267 2229 2028 746f 6d6f 6e6f cs.org") (tomono │ │ │ +00001120: 7269 2022 546f 6d6f 6e6f 7269 2049 6b65 ri "Tomonori Ike │ │ │ +00001130: 7961 6d61 2220 2274 6f6d 6f6e 6f72 6940 yama" "tomonori@ │ │ │ +00001140: 7865 6d61 6373 2e6f 7267 2229 2028 7475 xemacs.org") (tu │ │ │ +00001150: 636b 2022 4d61 7474 2054 7563 6b65 7222 ck "Matt Tucker" │ │ │ +00001160: 2022 7475 636b 4078 656d 6163 732e 6f72 "tuck@xemacs.or │ │ │ +00001170: 6722 2920 2874 7572 6e62 756c 6c20 2253 g") (turnbull "S │ │ │ +00001180: 7465 7068 656e 2054 7572 6e62 756c 6c22 tephen Turnbull" │ │ │ +00001190: 2022 7475 726e 6275 6c6c 4078 656d 6163 "turnbull@xemac │ │ │ +000011a0: 732e 6f72 6722 2920 2876 696e 2022 5669 s.org") (vin "Vi │ │ │ +000011b0: 6e20 5368 656c 746f 6e22 2022 6163 7340 n Shelton" "acs@ │ │ │ +000011c0: 7865 6d61 6373 2e6f 7267 2229 2028 766c xemacs.org") (vl │ │ │ +000011d0: 6164 696d 6972 2022 566c 6164 696d 6972 adimir "Vladimir │ │ │ +000011e0: 2049 7661 6e6f 7669 6322 2022 766c 6164 Ivanovic" "vlad │ │ │ +000011f0: 696d 6972 4078 656d 6163 732e 6f72 6722 imir@xemacs.org" │ │ │ +00001200: 2920 2877 6d70 6572 7279 2022 5769 6c6c ) (wmperry "Will │ │ │ +00001210: 6961 6d20 5065 7272 7922 2022 776d 7065 iam Perry" "wmpe │ │ │ +00001220: 7272 7940 7865 6d61 6373 2e6f 7267 2229 rry@xemacs.org") │ │ │ +00001230: 2028 796f 7368 696b 6920 2259 6f73 6869 (yoshiki "Yoshi │ │ │ +00001240: 6b69 2048 6179 6173 6869 2220 2279 6f73 ki Hayashi" "yos │ │ │ +00001250: 6869 6b69 4078 656d 6163 732e 6f72 6722 hiki@xemacs.org" │ │ │ +00001260: 2920 2879 6f75 6e67 7320 2253 7465 7665 ) (youngs "Steve │ │ │ +00001270: 2059 6f75 6e67 7322 2022 796f 756e 6773 Youngs" "youngs │ │ │ +00001280: 4078 656d 6163 732e 6f72 6722 2929 2028 @xemacs.org")) ( │ │ │ +00001290: 2324 202e 2031 3631 3629 290a 2862 7974 #$ . 1616)).(byt │ │ │ +000012a0: 652d 636f 6465 2022 c108 4210 c2c1 21ac e-code "..B...!. │ │ │ +000012b0: 85c3 c1c4 5c22 88c5 0842 10c2 c521 ac85 ....\"...B...!.. │ │ │ +000012c0: c3c5 c65c 2288 c708 4210 c2c7 21ac 85c3 ...\"...B...!... │ │ │ +000012d0: c7c8 5c22 88c1 8722 205b 6375 7272 656e ..\"..." [curren │ │ │ +000012e0: 742d 6c6f 6164 2d6c 6973 7420 6162 6f75 t-load-list abou │ │ │ +000012f0: 742d 6375 7272 656e 742d 7265 6c65 6173 t-current-releas │ │ │ +00001300: 652d 6d61 696e 7461 696e 6572 7320 6465 e-maintainers de │ │ │ +00001310: 6661 756c 742d 626f 756e 6470 2073 6574 fault-boundp set │ │ │ +00001320: 2d64 6566 6175 6c74 2028 7669 6e20 7475 -default (vin tu │ │ │ +00001330: 726e 6275 6c6c 2061 6472 6961 6e20 6265 rnbull adrian be │ │ │ +00001340: 6e20 6d61 7274 696e 2070 6970 6572 2073 n martin piper s │ │ │ +00001350: 7065 7262 6572 2079 6f75 6e67 7329 2061 perber youngs) a │ │ │ +00001360: 626f 7574 2d6f 7468 6572 2d63 7572 7265 bout-other-curre │ │ │ +00001370: 6e74 2d68 6163 6b65 7273 2028 616a 2061 nt-hackers (aj a │ │ │ +00001380: 6c61 7374 6169 7220 6367 7720 6372 6169 lastair cgw crai │ │ │ +00001390: 6720 6461 696b 6920 6461 6e20 6469 6469 g daiki dan didi │ │ │ +000013a0: 6572 2066 6162 7269 6365 2067 6f6c 7562 er fabrice golub │ │ │ +000013b0: 6576 2067 756e 6e61 7220 6869 7361 7368 ev gunnar hisash │ │ │ +000013c0: 6920 686e 696b 7369 6320 6a61 6e20 6a61 i hniksic jan ja │ │ │ +000013d0: 7265 7468 206a 6d69 6c6c 6572 206a 6173 reth jmiller jas │ │ │ +000013e0: 6f6e 206a 6f6e 6174 6861 6e20 6b61 7a7a on jonathan kazz │ │ │ +000013f0: 206b 6972 696c 6c20 6c61 7273 6920 6d6f kirill larsi mo │ │ │ +00001400: 7269 6f6b 6120 6d74 6120 6f67 7261 6620 rioka mta ograf │ │ │ +00001410: 6f6c 6976 6965 7220 6f73 6361 7220 7069 olivier oscar pi │ │ │ +00001420: 7474 6d61 6e20 746f 6d6f 6e6f 7269 2074 ttman tomonori t │ │ │ +00001430: 7563 6b20 776d 7065 7272 7920 796f 7368 uck wmperry yosh │ │ │ +00001440: 696b 6929 2061 626f 7574 2d6f 6e63 652d iki) about-once- │ │ │ +00001450: 616e 642d 6675 7475 7265 2d68 6163 6b65 and-future-hacke │ │ │ +00001460: 7273 2028 616a 6320 6261 7720 6277 2063 rs (ajc baw bw c │ │ │ +00001470: 6872 2063 7468 6f6d 7020 6461 7272 796c hr cthomp darryl │ │ │ +00001480: 6f20 6465 7669 6e20 646b 696e 6472 6564 o devin dkindred │ │ │ +00001490: 2064 6d6f 6f72 6520 6562 2068 6273 2068 dmoore eb hbs h │ │ │ +000014a0: 6d75 6c6c 6572 2068 6f62 6c65 7920 6a61 muller hobley ja │ │ │ +000014b0: 7320 6a65 6e73 206a 7568 7020 6a77 7a20 s jens juhp jwz │ │ │ +000014c0: 6b79 6c65 206d 6172 6370 6120 6d63 6f6f kyle marcpa mcoo │ │ │ +000014d0: 6b20 6d6c 7920 6f67 7261 6620 7065 6c65 k mly ograf pele │ │ │ +000014e0: 6772 6920 7065 7a20 7269 636b 6320 726f gri pez rickc ro │ │ │ +000014f0: 7365 2072 6f73 7369 6e69 2073 6c62 2073 se rossini slb s │ │ │ +00001500: 7469 6720 7374 6967 6220 7468 6965 7373 tig stigb thiess │ │ │ +00001510: 656c 2076 6c61 6469 6d69 7229 5d20 3329 el vladimir)] 3) │ │ │ +00001520: 0a23 4033 3420 536f 6d65 206f 6620 7468 .#@34 Some of th │ │ │ +00001530: 6520 6d6f 7265 2069 6d70 6f72 7461 6e74 e more important │ │ │ +00001540: 2055 524c 732e 1f0a 2864 6566 7661 7220 URLs...(defvar │ │ │ +00001550: 6162 6f75 742d 7572 6c2d 616c 6973 7420 about-url-alist │ │ │ +00001560: 2728 2861 6a63 202e 2022 6874 7470 3a2f '((ajc . "http:/ │ │ │ +00001570: 2f77 7777 2d70 6572 736f 6e61 6c2e 6d6f /www-personal.mo │ │ │ +00001580: 6e61 7368 2e65 6475 2e61 752f 7e61 6a63 nash.edu.au/~ajc │ │ │ +00001590: 2f22 2920 2861 6c61 7374 6169 7220 2e20 /") (alastair . │ │ │ +000015a0: 2268 7474 703a 2f2f 7765 6273 6974 652e "http://website. │ │ │ +000015b0: 6c69 6e65 6f6e 652e 6e65 742f 7e61 6a68 lineone.net/~ajh │ │ │ +000015c0: 6f75 6768 746f 6e2f 2229 2028 6261 7720 oughton/") (baw │ │ │ +000015d0: 2e20 2268 7474 703a 2f2f 6261 7272 792e . "http://barry. │ │ │ +000015e0: 776f 6f7a 2e6f 7267 2f22 2920 2862 656e wooz.org/") (ben │ │ │ +000015f0: 202e 2022 6874 7470 3a2f 2f77 7777 2e36 . "http://www.6 │ │ │ +00001600: 3636 2e63 6f6d 2f62 656e 2f22 2920 2862 66.com/ben/") (b │ │ │ +00001610: 656e 2d78 656d 6163 7320 2e20 2268 7474 en-xemacs . "htt │ │ │ +00001620: 703a 2f2f 7777 772e 7865 6d61 6373 2e6f p://www.xemacs.o │ │ │ +00001630: 7267 2f41 7263 6869 7465 6374 696e 672d rg/Architecting- │ │ │ +00001640: 5845 6d61 6373 2f69 6e64 6578 2e68 746d XEmacs/index.htm │ │ │ +00001650: 6c22 2920 2862 656f 7065 6e20 2e20 2268 l") (beopen . "h │ │ │ +00001660: 7474 703a 2f2f 7777 772e 6265 6f70 656e ttp://www.beopen │ │ │ +00001670: 2e63 6f6d 2f22 2920 2863 632d 6d6f 6465 .com/") (cc-mode │ │ │ +00001680: 202e 2022 6874 7470 3a2f 2f63 632d 6d6f . "http://cc-mo │ │ │ +00001690: 6465 2e73 6f75 7263 6566 6f72 6765 2e6e de.sourceforge.n │ │ │ +000016a0: 6574 2f22 2920 2863 6872 202e 2022 6874 et/") (chr . "ht │ │ │ +000016b0: 7470 3a2f 2f77 7777 2e78 656d 6163 732e tp://www.xemacs. │ │ │ +000016c0: 6f72 672f 6661 712f 2229 2028 6461 696b org/faq/") (daik │ │ │ +000016d0: 6920 2e20 2268 7474 703a 2f2f 6465 6973 i . "http://deis │ │ │ +000016e0: 7569 2e62 7567 2e6f 7267 2f64 6961 7279 ui.bug.org/diary │ │ │ +000016f0: 2f73 6572 766c 6574 2f76 6965 7722 2920 /servlet/view") │ │ │ +00001700: 2864 6b69 6e64 7265 6420 2e20 2268 7474 (dkindred . "htt │ │ │ +00001710: 703a 2f2f 7777 772e 6373 2e63 6d75 2e65 p://www.cs.cmu.e │ │ │ +00001720: 6475 2f50 656f 706c 652f 646b 696e 6472 du/People/dkindr │ │ │ +00001730: 6564 2f6d 652e 6874 6d6c 2229 2028 646d ed/me.html") (dm │ │ │ +00001740: 6f6f 7265 202e 2022 6874 7470 3a2f 2f6f oore . "http://o │ │ │ +00001750: 6a2e 6567 6274 2e6f 7267 2f64 6d6f 6f72 j.egbt.org/dmoor │ │ │ +00001760: 652f 2229 2028 6469 6469 6572 202e 2022 e/") (didier . " │ │ │ +00001770: 6874 7470 3a2f 2f64 6964 6965 722e 6c72 http://didier.lr │ │ │ +00001780: 6465 2e6f 7267 2f22 2920 2864 766c 6a61 de.org/") (dvlja │ │ │ +00001790: 7a7a 202e 2022 6874 7470 3a2f 2f77 7777 zz . "http://www │ │ │ +000017a0: 2e64 6964 6965 7276 6572 6e61 2e63 6f6d .didierverna.com │ │ │ +000017b0: 2f22 2920 2866 6162 7269 6365 202e 2022 /") (fabrice . " │ │ │ +000017c0: 6874 7470 3a2f 2f77 7777 2e65 7365 2d6d http://www.ese-m │ │ │ +000017d0: 6574 7a2e 6672 2f7e 706f 7069 6e65 6175 etz.fr/~popineau │ │ │ +000017e0: 2f22 2920 2866 7074 6578 202e 2022 6874 /") (fptex . "ht │ │ │ +000017f0: 7470 3a2f 2f77 7777 2e66 7074 6578 2e6f tp://www.fptex.o │ │ │ +00001800: 7267 2f22 2920 286a 6173 202e 2022 6874 rg/") (jas . "ht │ │ │ +00001810: 7470 3a2f 2f6a 6f73 6566 7373 6f6e 2e6f tp://josefsson.o │ │ │ +00001820: 7267 2f22 2920 286a 6173 6f6e 202e 2022 rg/") (jason . " │ │ │ +00001830: 6874 7470 3a2f 2f77 7777 2e6d 6173 7461 http://www.masta │ │ │ +00001840: 6c65 722e 636f 6d2f 2229 2028 6a75 6870 ler.com/") (juhp │ │ │ +00001850: 202e 2022 6874 7470 3a2f 2f77 7777 2e30 . "http://www.0 │ │ │ +00001860: 312e 3234 362e 6e65 2e6a 702f 7e6a 7568 1.246.ne.jp/~juh │ │ │ +00001870: 702f 2229 2028 6a77 7a20 2e20 2268 7474 p/") (jwz . "htt │ │ │ +00001880: 703a 2f2f 7777 772e 6a77 7a2e 6f72 672f p://www.jwz.org/ │ │ │ +00001890: 2229 2028 6b61 7a7a 202e 2022 6874 7470 ") (kazz . "http │ │ │ +000018a0: 3a2f 2f77 7777 2e69 6d61 7379 2e6f 722e ://www.imasy.or. │ │ │ +000018b0: 6a70 2f7e 6b61 7a7a 2f22 2920 286b 796c jp/~kazz/") (kyl │ │ │ +000018c0: 6520 2e20 2268 7474 703a 2f2f 7777 772e e . "http://www. │ │ │ +000018d0: 776f 6e64 6572 776f 726b 732e 636f 6d2f wonderworks.com/ │ │ │ +000018e0: 6b79 6c65 2f22 2920 286c 6172 7369 202e kyle/") (larsi . │ │ │ +000018f0: 2022 6874 7470 3a2f 2f71 7569 6d62 792e "http://quimby. │ │ │ +00001900: 676e 7573 2e6f 7267 2f6c 6d69 2f22 2920 gnus.org/lmi/") │ │ │ +00001910: 286d 6172 6370 6120 2e20 2268 7474 703a (marcpa . "http: │ │ │ +00001920: 2f2f 7777 772e 706f 7369 7472 6f6e 3931 //www.positron91 │ │ │ +00001930: 312e 636f 6d2f 7072 6f64 7563 7473 2f70 1.com/products/p │ │ │ +00001940: 6f77 6572 2e68 746d 2229 2028 6f67 7261 ower.htm") (ogra │ │ │ +00001950: 6620 2e20 2268 7474 703a 2f2f 7777 772e f . "http://www. │ │ │ +00001960: 6667 612e 6465 2f7e 6f67 7261 662f 2229 fga.de/~ograf/") │ │ │ +00001970: 2028 7065 7a20 2e20 2268 7474 703a 2f2f (pez . "http:// │ │ │ +00001980: 6362 732e 7370 6f72 7473 6c69 6e65 2e63 cbs.sportsline.c │ │ │ +00001990: 6f6d 2f22 2920 2870 6970 6572 202e 2022 om/") (piper . " │ │ │ +000019a0: 6874 7470 3a2f 2f77 7777 2e61 6e64 7970 http://www.andyp │ │ │ +000019b0: 6970 6572 2e63 6f6d 2f22 2920 2872 6f73 iper.com/") (ros │ │ │ +000019c0: 7369 6e69 202e 2022 6874 7470 3a2f 2f66 sini . "http://f │ │ │ +000019d0: 6163 756c 7479 2e77 6173 6869 6e67 746f aculty.washingto │ │ │ +000019e0: 6e2e 6564 752f 726f 7373 696e 692f 2229 n.edu/rossini/") │ │ │ +000019f0: 2028 7374 6967 6220 2e20 2268 7474 703a (stigb . "http: │ │ │ +00001a00: 2f2f 7777 772e 7469 686c 6465 2e68 6973 //www.tihlde.his │ │ │ +00001a10: 742e 6e6f 2f7e 7374 6967 622f 2229 2028 t.no/~stigb/") ( │ │ │ +00001a20: 7669 6e20 2e20 2268 7474 703a 2f2f 7777 vin . "http://ww │ │ │ +00001a30: 772e 7570 612e 6f72 672f 2229 2028 766c w.upa.org/") (vl │ │ │ +00001a40: 6164 696d 6972 202e 2022 6874 7470 3a2f adimir . "http:/ │ │ │ +00001a50: 2f77 7777 2e6c 656f 6e6f 7261 2e6f 7267 /www.leonora.org │ │ │ +00001a60: 2f7e 766c 6164 696d 6972 2f22 2920 2877 /~vladimir/") (w │ │ │ +00001a70: 6765 7420 2e20 2268 7474 703a 2f2f 7375 get . "http://su │ │ │ +00001a80: 6e73 6974 652e 646b 2f77 6765 742f 2229 nsite.dk/wget/") │ │ │ +00001a90: 2028 7865 6d61 6373 202e 2022 6874 7470 (xemacs . "http │ │ │ +00001aa0: 3a2f 2f77 7777 2e78 656d 6163 732e 6f72 ://www.xemacs.or │ │ │ +00001ab0: 672f 2229 2028 796f 756e 6773 202e 2022 g/") (youngs . " │ │ │ +00001ac0: 6874 7470 3a2f 2f65 6963 712e 736f 7572 http://eicq.sour │ │ │ +00001ad0: 6365 666f 7267 652e 6e65 742f 2229 2920 ceforge.net/")) │ │ │ +00001ae0: 2823 2420 2e20 3534 3134 2929 0a28 6279 (#$ . 5414)).(by │ │ │ +00001af0: 7465 2d63 6f64 6520 22c1 0842 10c2 c121 te-code "..B...! │ │ │ +00001b00: ac85 c3c1 c45c 2288 c187 2220 5b63 7572 .....\"..." [cur │ │ │ +00001b10: 7265 6e74 2d6c 6f61 642d 6c69 7374 2061 rent-load-list a │ │ │ +00001b20: 626f 7574 2d6c 6566 742d 6d61 7267 696e bout-left-margin │ │ │ +00001b30: 2064 6566 6175 6c74 2d62 6f75 6e64 7020 default-boundp │ │ │ +00001b40: 7365 742d 6465 6661 756c 7420 335d 2033 set-default 3] 3 │ │ │ +00001b50: 290a 2864 6566 616c 6961 7320 2761 626f ).(defalias 'abo │ │ │ +00001b60: 7574 2d6c 6f6f 6b75 702d 7572 6c20 235b ut-lookup-url #[ │ │ │ +00001b70: 286e 616d 6529 2022 0908 b741 891a ac86 (name) "...A.... │ │ │ +00001b80: c3c4 c243 5c22 885c 6e29 8722 205b 6162 ...C\".\n)." [ab │ │ │ +00001b90: 6f75 742d 7572 6c2d 616c 6973 7420 6e61 out-url-alist na │ │ │ +00001ba0: 6d65 2072 6573 756c 7420 7369 676e 616c me result signal │ │ │ +00001bb0: 2063 6c2d 6173 7365 7274 696f 6e2d 6661 cl-assertion-fa │ │ │ +00001bc0: 696c 6564 5d20 345d 290a 2864 6566 616c iled] 4]).(defal │ │ │ +00001bd0: 6961 7320 2761 626f 7574 2d75 726c 2d6c ias 'about-url-l │ │ │ +00001be0: 696e 6b20 235b 2875 726c 2026 6f70 7469 ink #[(url &opti │ │ │ +00001bf0: 6f6e 616c 2074 6578 742d 746f 2d69 6e73 onal text-to-ins │ │ │ +00001c00: 6572 7420 6865 6c70 2d65 6368 6f29 2022 ert help-echo) " │ │ │ +00001c10: 5c6e ac86 c3c4 c243 5c22 885c 6e39 ab84 \n.....C\".\n9.. │ │ │ +00001c20: c55c 6e21 1209 ab88 0939 ab84 c509 2111 .\n!.....9....!. │ │ │ +00001c30: c6c7 c8c9 cac9 cb08 cc09 ae81 5c6e 5c6e ............\n\n │ │ │ +00001c40: 265c 6e87 2220 5b68 656c 702d 6563 686f &\n." [help-echo │ │ │ +00001c50: 2074 6578 742d 746f 2d69 6e73 6572 7420 text-to-insert │ │ │ +00001c60: 7572 6c20 7369 676e 616c 2063 6c2d 6173 url signal cl-as │ │ │ +00001c70: 7365 7274 696f 6e2d 6661 696c 6564 2061 sertion-failed a │ │ │ +00001c80: 626f 7574 2d6c 6f6f 6b75 702d 7572 6c20 bout-lookup-url │ │ │ +00001c90: 7769 6467 6574 2d63 7265 6174 6520 7572 widget-create ur │ │ │ +00001ca0: 6c2d 6c69 6e6b 203a 6275 7474 6f6e 2d70 l-link :button-p │ │ │ +00001cb0: 7265 6669 7820 2222 203a 6275 7474 6f6e refix "" :button │ │ │ +00001cc0: 2d73 7566 6669 7820 3a68 656c 702d 6563 -suffix :help-ec │ │ │ +00001cd0: 686f 203a 7461 675d 2031 315d 290a 2864 ho :tag] 11]).(d │ │ │ +00001ce0: 6566 616c 6961 7320 2761 626f 7574 2d6d efalias 'about-m │ │ │ +00001cf0: 6169 6c74 6f2d 6c69 6e6b 2023 5b28 6164 ailto-link #[(ad │ │ │ +00001d00: 6472 6573 7329 2022 c2c3 2189 1908 4c88 dress) "..!...L. │ │ │ +00001d10: c4c5 c609 4ac7 c8c9 c8ca cbcc cdce cf44 ....J..........D │ │ │ +00001d20: ce09 44d0 4645 d1d2 d309 4a5c 2226 0b29 ..D.FE....J\"&.) │ │ │ +00001d30: 8722 205b 6164 6472 6573 7320 2331 3d23 ." [address #1=# │ │ │ +00001d40: 3a2d 2d61 6464 7265 7373 2d2d 3335 3930 :--address--3590 │ │ │ +00001d50: 3820 6d61 6b65 2d73 796d 626f 6c20 222d 8 make-symbol "- │ │ │ +00001d60: 2d61 6464 7265 7373 2d2d 2220 7769 6467 -address--" widg │ │ │ +00001d70: 6574 2d63 7265 6174 6520 6c69 6e6b 203a et-create link : │ │ │ +00001d80: 7461 6720 3a62 7574 746f 6e2d 7072 6566 tag :button-pref │ │ │ +00001d90: 6978 2022 2220 3a62 7574 746f 6e2d 7375 ix "" :button-su │ │ │ +00001da0: 6666 6978 203a 6163 7469 6f6e 206c 616d ffix :action lam │ │ │ +00001db0: 6264 6120 2826 7265 7374 202d 2d63 6c2d bda (&rest --cl- │ │ │ +00001dc0: 7265 7374 2d2d 2920 6170 706c 7920 7175 rest--) apply qu │ │ │ +00001dd0: 6f74 6520 235b 2823 323d 233a 4733 3539 ote #[(#2=#:G359 │ │ │ +00001de0: 3039 2077 6964 6765 7420 266f 7074 696f 09 widget &optio │ │ │ +00001df0: 6e61 6c20 6576 656e 7429 2022 c108 4a21 nal event) "..J! │ │ │ +00001e00: 8722 205b 2332 2320 636f 6d70 6f73 652d ." [#2# compose- │ │ │ +00001e10: 6d61 696c 5d20 325d 202d 2d63 6c2d 7265 mail] 2] --cl-re │ │ │ +00001e20: 7374 2d2d 203a 6865 6c70 2d65 6368 6f20 st-- :help-echo │ │ │ +00001e30: 666f 726d 6174 2022 5365 6e64 206d 6169 format "Send mai │ │ │ +00001e40: 6c20 746f 2025 7322 5d20 3136 5d29 0a28 l to %s"] 16]).( │ │ │ +00001e50: 6465 6661 6c69 6173 2027 6162 6f75 742d defalias 'about- │ │ │ +00001e60: 7769 7468 2d66 6163 6520 235b 2873 7472 with-face #[(str │ │ │ +00001e70: 696e 6720 6661 6365 2920 22c3 c409 4709 ing face) "...G. │ │ │ +00001e80: 231a c55c 6ec6 c723 88c5 5c6e c8c7 2388 #..\n..#..\n..#. │ │ │ +00001e90: c55c 6ec9 c723 88c5 5c6e cac7 2388 cb5c .\n..#..\n..#..\ │ │ │ +00001ea0: 6e08 5c22 8829 0987 2220 5b66 6163 6520 n.\".).." [face │ │ │ +00001eb0: 7374 7269 6e67 2065 7874 206d 616b 652d string ext make- │ │ │ +00001ec0: 6578 7465 6e74 2030 2073 6574 2d65 7874 extent 0 set-ext │ │ │ +00001ed0: 656e 742d 7072 6f70 6572 7479 2064 7570 ent-property dup │ │ │ +00001ee0: 6c69 6361 626c 6520 7420 756e 6971 7565 licable t unique │ │ │ +00001ef0: 2073 7461 7274 2d6f 7065 6e20 656e 642d start-open end- │ │ │ +00001f00: 6f70 656e 2073 6574 2d65 7874 656e 742d open set-extent- │ │ │ +00001f10: 6661 6365 5d20 345d 290a 2864 6566 616c face] 4]).(defal │ │ │ +00001f20: 6961 7320 2761 626f 7574 2d67 6574 2d62 ias 'about-get-b │ │ │ +00001f30: 7566 6665 7220 235b 286e 616d 6529 2022 uffer #[(name) " │ │ │ +00001f40: c35c 6e21 ab8c c45c 6e21 88c5 2088 6562 .\n!...\n!.. .eb │ │ │ +00001f50: 885c 6e87 c45c 6e21 88c5 2088 c620 88c7 .\n..\n!.. .. .. │ │ │ +00001f60: c8c9 5c22 88ca 0908 7023 88cb cc21 cd4c ..\"....p#...!.L │ │ │ +00001f70: 88ce 8722 205b 6162 6f75 742d 6c65 6674 ..." [about-left │ │ │ +00001f80: 2d6d 6172 6769 6e20 6c65 6674 2d6d 6172 -margin left-mar │ │ │ +00001f90: 6769 6e2d 7769 6474 6820 6e61 6d65 2067 gin-width name g │ │ │ +00001fa0: 6574 2d62 7566 6665 7220 7377 6974 6368 et-buffer switch │ │ │ +00001fb0: 2d74 6f2d 6275 6666 6572 2064 656c 6574 -to-buffer delet │ │ │ +00001fc0: 652d 6f74 6865 722d 7769 6e64 6f77 7320 e-other-windows │ │ │ +00001fd0: 6275 6666 6572 2d64 6973 6162 6c65 2d75 buffer-disable-u │ │ │ +00001fe0: 6e64 6f20 6164 642d 6c6f 6361 6c2d 686f ndo add-local-ho │ │ │ +00001ff0: 6f6b 206d 6f75 7365 2d74 7261 636b 2d63 ok mouse-track-c │ │ │ +00002000: 6c69 636b 2d68 6f6f 6b20 235b 2865 7665 lick-hook #[(eve │ │ │ +00002010: 6e74 2063 6f75 6e74 2920 22c3 5c6e 21ad nt count) ".\n!. │ │ │ +00002020: 93c3 5c6e 2119 c409 c05c 2289 18ad 86c5 ..\n!....\"..... │ │ │ +00002030: 085c 6e5c 2288 c62a 8722 205b 6275 7474 .\n\"..*." [butt │ │ │ +00002040: 6f6e 2070 6f73 2065 7665 6e74 2077 6964 on pos event wid │ │ │ +00002050: 6765 742d 6576 656e 742d 706f 696e 7420 get-event-point │ │ │ +00002060: 6765 742d 6368 6172 2d70 726f 7065 7274 get-char-propert │ │ │ +00002070: 7920 7769 6467 6574 2d61 7070 6c79 2d61 y widget-apply-a │ │ │ +00002080: 6374 696f 6e20 745d 2034 5d20 7365 742d ction t] 4] set- │ │ │ +00002090: 7370 6563 6966 6965 7220 6d61 6b65 2d6c specifier make-l │ │ │ +000020a0: 6f63 616c 2d76 6172 6961 626c 6520 7769 ocal-variable wi │ │ │ +000020b0: 6467 6574 2d62 7574 746f 6e2d 6661 6365 dget-button-face │ │ │ +000020c0: 2061 626f 7574 2d6c 696e 6b2d 6661 6365 about-link-face │ │ │ +000020d0: 206e 696c 5d20 345d 290a 2864 6566 616c nil] 4]).(defal │ │ │ +000020e0: 6961 7320 2761 626f 7574 2d66 696e 6973 ias 'about-finis │ │ │ +000020f0: 682d 6275 6666 6572 2023 5b28 266f 7074 h-buffer #[(&opt │ │ │ +00002100: 696f 6e61 6c20 7479 7065 2920 225c 6eac ional type) "\n. │ │ │ +00002110: 82c3 12c4 c521 885c 6ec3 61ab 8dc6 c7c8 .....!.\n.a..... │ │ │ +00002120: c9ca cbcc cd26 0788 aa8b c6c7 c8ce cacf .....&.......... │ │ │ +00002130: ccd0 2607 88c4 d121 88d2 d320 2188 d4d5 ..&....!... !... │ │ │ +00002140: 2008 5c22 885c 6ec3 61ab 8cd6 d7d8 5c22 .\".\n.a.....\" │ │ │ +00002150: 88d6 d9d8 5c22 88aa 8dda 19d6 d709 5c22 ....\"........\" │ │ │ +00002160: 88d6 d909 5c22 8829 d6db dc5c 2288 d6dd ....\".)...\"... │ │ │ +00002170: de5c 2288 d6df de5c 2288 e020 8865 6288 .\"....\".. .eb. │ │ │ +00002180: e1e2 2188 e3e4 2187 2220 5b77 6964 6765 ..!...!." [widge │ │ │ +00002190: 742d 6b65 796d 6170 2064 6973 706f 7365 t-keymap dispose │ │ │ +000021a0: 2074 7970 6520 6275 7279 2077 6964 6765 type bury widge │ │ │ +000021b0: 742d 696e 7365 7274 2022 5c6e 2220 7769 t-insert "\n" wi │ │ │ +000021c0: 6467 6574 2d63 7265 6174 6520 6c69 6e6b dget-create link │ │ │ +000021d0: 203a 6865 6c70 2d65 6368 6f20 2242 7572 :help-echo "Bur │ │ │ +000021e0: 7920 7468 6973 2062 7566 6665 7222 203a y this buffer" : │ │ │ +000021f0: 6163 7469 6f6e 2023 5b28 7769 6467 6574 action #[(widget │ │ │ +00002200: 2065 7665 6e74 2920 2209 ab8f c220 18c3 event) ".... .. │ │ │ +00002210: 8ec4 c509 2121 88c6 202a 87c6 2087 2220 ....!!.. *.. ." │ │ │ +00002220: 5b23 313d 233a 7373 7733 3539 3132 2065 [#1=#:ssw35912 e │ │ │ +00002230: 7665 6e74 2073 656c 6563 7465 642d 7769 vent selected-wi │ │ │ +00002240: 6e64 6f77 2028 2862 7974 652d 636f 6465 ndow ((byte-code │ │ │ +00002250: 2022 c108 21ab 84c2 0821 88c1 8722 205b "..!....!..." [ │ │ │ +00002260: 2331 2320 7769 6e64 6f77 2d6c 6976 652d #1# window-live- │ │ │ +00002270: 7020 7365 6c65 6374 2d77 696e 646f 775d p select-window] │ │ │ +00002280: 2032 2929 2073 656c 6563 742d 7769 6e64 2)) select-wind │ │ │ +00002290: 6f77 2065 7665 6e74 2d77 696e 646f 7720 ow event-window │ │ │ +000022a0: 6275 7279 2d62 7566 6665 725d 2033 5d20 bury-buffer] 3] │ │ │ +000022b0: 3a74 6167 2022 4275 7279 2220 224b 696c :tag "Bury" "Kil │ │ │ +000022c0: 6c20 7468 6973 2062 7566 6665 7222 2023 l this buffer" # │ │ │ +000022d0: 5b28 7769 6467 6574 2065 7665 6e74 2920 [(widget event) │ │ │ +000022e0: 2208 ab86 c1c2 0821 2187 c170 2187 2220 "......!!..p!." │ │ │ +000022f0: 5b65 7665 6e74 206b 696c 6c2d 6275 6666 [event kill-buff │ │ │ +00002300: 6572 2065 7665 6e74 2d62 7566 6665 725d er event-buffer] │ │ │ +00002310: 2033 5d20 224b 696c 6c22 2022 2074 6869 3] "Kill" " thi │ │ │ +00002320: 7320 6275 6666 6572 2061 6e64 2072 6574 s buffer and ret │ │ │ +00002330: 7572 6e20 746f 2070 7265 7669 6f75 732e urn to previous. │ │ │ +00002340: 5c6e 2220 7573 652d 6c6f 6361 6c2d 6d61 \n" use-local-ma │ │ │ +00002350: 7020 6d61 6b65 2d73 7061 7273 652d 6b65 p make-sparse-ke │ │ │ +00002360: 796d 6170 2073 6574 2d6b 6579 6d61 702d ymap set-keymap- │ │ │ +00002370: 7061 7265 6e74 2063 7572 7265 6e74 2d6c parent current-l │ │ │ +00002380: 6f63 616c 2d6d 6170 206c 6f63 616c 2d73 ocal-map local-s │ │ │ +00002390: 6574 2d6b 6579 2022 7122 2062 7572 792d et-key "q" bury- │ │ │ +000023a0: 6275 6666 6572 2022 6c22 2023 5b6e 696c buffer "l" #[nil │ │ │ +000023b0: 2022 c070 2187 2220 5b6b 696c 6c2d 6275 ".p!." [kill-bu │ │ │ +000023c0: 6666 6572 5d20 3220 6e69 6c20 6e69 6c5d ffer] 2 nil nil] │ │ │ +000023d0: 2022 2022 2073 6372 6f6c 6c2d 7570 205b " " scroll-up [ │ │ │ +000023e0: 6261 636b 7370 6163 655d 2073 6372 6f6c backspace] scrol │ │ │ +000023f0: 6c2d 646f 776e 2022 7f22 2077 6964 6765 l-down "." widge │ │ │ +00002400: 742d 7365 7475 7020 746f 6767 6c65 2d72 t-setup toggle-r │ │ │ +00002410: 6561 642d 6f6e 6c79 2031 2073 6574 2d62 ead-only 1 set-b │ │ │ +00002420: 7566 6665 722d 6d6f 6469 6669 6564 2d70 uffer-modified-p │ │ │ +00002430: 206e 696c 5d20 385d 290a 2864 6566 616c nil] 8]).(defal │ │ │ +00002440: 6961 7320 2761 626f 7574 2d63 656e 7465 ias 'about-cente │ │ │ +00002450: 7220 235b 2873 7472 696e 672d 6f72 2d67 r #[(string-or-g │ │ │ +00002460: 6c79 7068 2920 22c3 0921 085a 1ac4 c55c lyph) "..!.Z...\ │ │ │ +00002470: 6e21 ab83 5c6e aa81 c6c7 5c22 2987 2220 n!..\n....\")." │ │ │ +00002480: 5b61 626f 7574 2d6c 6566 742d 6d61 7267 [about-left-marg │ │ │ +00002490: 696e 2073 7472 696e 672d 6f72 2d67 6c79 in string-or-gly │ │ │ +000024a0: 7068 206e 2073 7461 7274 7570 2d63 656e ph n startup-cen │ │ │ +000024b0: 7465 722d 7370 6163 6573 206d 616b 652d ter-spaces make- │ │ │ +000024c0: 7374 7269 6e67 206e 6174 6e75 6d70 2030 string natnump 0 │ │ │ +000024d0: 203f 5c20 5d20 335d 290a 2340 3433 2044 ?\ ] 3]).#@43 D │ │ │ +000024e0: 6573 6372 6962 6520 7468 6520 5472 7565 escribe the True │ │ │ +000024f0: 2045 6469 746f 7220 616e 6420 6974 7320 Editor and its │ │ │ +00002500: 6d69 6e69 6f6e 732e 1f0a 2864 6566 616c minions...(defal │ │ │ +00002510: 6961 7320 2761 626f 7574 2d78 656d 6163 ias 'about-xemac │ │ │ +00002520: 7320 235b 6e69 6c20 22c6 c721 3f85 0701 s #[nil "..!?... │ │ │ +00002530: c8c9 0c21 2188 cacb cccd ce0c 2588 c8cf ...!!.......%... │ │ │ +00002540: 2188 d0d1 0908 0e40 241b d0d2 0bd3 5c6e !......@$.....\n │ │ │ +00002550: d4d5 4fd6 5c22 415c 6ed7 d84f 241d c8c9 ..O.\"A\n..O$... │ │ │ +00002560: 0d21 2188 cad9 dadb dcdd 0d26 0688 2ac8 .!!........&..*. │ │ │ +00002570: dedf e0e1 5c22 e223 88ca d9da e3dc e4e5 ....\".#........ │ │ │ +00002580: e6e7 e6e8 265c 6e88 c8e9 2188 cad9 daea ....&\n...!..... │ │ │ +00002590: dceb e5e6 e7e6 ec26 5c6e 88c8 ed21 88ca .......&\n...!.. │ │ │ +000025a0: d9da eedc dde5 e6e7 e6ef 265c 6e88 c8f0 ..........&\n... │ │ │ +000025b0: 2188 caf1 daf2 e5e6 e7e6 f3f4 f526 5c6e !............&\n │ │ │ +000025c0: 88c8 f621 88f7 f8d8 f923 88c8 fa21 88fb ...!.....#...!.. │ │ │ +000025d0: fc21 891e 41ad 82fc 4b1e 42fd 8efc fe4d .!..A...K.B....M │ │ │ +000025e0: 88ff fc0e 435c 2288 c881 4400 2188 cad9 ....C\"...D.!... │ │ │ +000025f0: da81 4500 dc81 4600 e5e6 e7e6 8147 0026 ..E...F......G.& │ │ │ +00002600: 5c6e 88c8 8148 0021 88fc 8149 0021 88c8 \n...H.!...I.!.. │ │ │ +00002610: 814a 0021 88fc 814b 0021 88fc 814c 0021 .J.!...K.!...L.! │ │ │ +00002620: 88c8 814d 0021 88fc 814e 0021 882b 814f ...M.!...N.!.+.O │ │ │ +00002630: 0020 8881 5000 8151 0021 8722 205b 656d . ..P..Q.!." [em │ │ │ +00002640: 6163 732d 6d69 6e6f 722d 7665 7273 696f acs-minor-versio │ │ │ +00002650: 6e20 656d 6163 732d 6d61 6a6f 722d 7665 n emacs-major-ve │ │ │ +00002660: 7273 696f 6e20 656d 6163 732d 6275 696c rsion emacs-buil │ │ │ +00002670: 642d 7469 6d65 2065 6d61 6373 2d73 686f d-time emacs-sho │ │ │ +00002680: 7274 2d76 6572 7369 6f6e 2078 656d 6163 rt-version xemac │ │ │ +00002690: 732d 6c6f 676f 2065 6d61 6373 2d61 626f s-logo emacs-abo │ │ │ +000026a0: 7574 2d76 6572 7369 6f6e 2061 626f 7574 ut-version about │ │ │ +000026b0: 2d67 6574 2d62 7566 6665 7220 222a 4162 -get-buffer "*Ab │ │ │ +000026c0: 6f75 7420 5845 6d61 6373 2a22 2077 6964 out XEmacs*" wid │ │ │ +000026d0: 6765 742d 696e 7365 7274 2061 626f 7574 get-insert about │ │ │ +000026e0: 2d63 656e 7465 7220 7769 6467 6574 2d63 -center widget-c │ │ │ +000026f0: 7265 6174 6520 6465 6661 756c 7420 3a66 reate default :f │ │ │ +00002700: 6f72 6d61 7420 2225 7422 203a 7461 672d ormat "%t" :tag- │ │ │ +00002710: 676c 7970 6820 225c 6e22 2066 6f72 6d61 glyph "\n" forma │ │ │ +00002720: 7420 2225 642e 2564 2e25 6422 2022 7665 t "%d.%d.%d" "ve │ │ │ +00002730: 7273 696f 6e20 2573 3b20 2573 2025 7322 rsion %s; %s %s" │ │ │ +00002740: 2061 7373 6f63 2034 2037 2028 2822 4a61 assoc 4 7 (("Ja │ │ │ +00002750: 6e22 202e 2022 4a61 6e75 6172 7922 2920 n" . "January") │ │ │ +00002760: 2822 4665 6222 202e 2022 4665 6272 7561 ("Feb" . "Februa │ │ │ +00002770: 7279 2229 2028 224d 6172 2220 2e20 224d ry") ("Mar" . "M │ │ │ +00002780: 6172 6368 2229 2028 2241 7072 2220 2e20 arch") ("Apr" . │ │ │ +00002790: 2241 7072 696c 2229 2028 224d 6179 2220 "April") ("May" │ │ │ +000027a0: 2e20 224d 6179 2229 2028 224a 756e 2220 . "May") ("Jun" │ │ │ +000027b0: 2e20 224a 756e 6522 2920 2822 4a75 6c22 . "June") ("Jul" │ │ │ +000027c0: 202e 2022 4a75 6c79 2229 2028 2241 7567 . "July") ("Aug │ │ │ +000027d0: 2220 2e20 2241 7567 7573 7422 2920 2822 " . "August") (" │ │ │ +000027e0: 5365 7022 202e 2022 5365 7074 656d 6265 Sep" . "Septembe │ │ │ +000027f0: 7222 2920 2822 4f63 7422 202e 2022 4f63 r") ("Oct" . "Oc │ │ │ +00002800: 746f 6265 7222 2920 2822 4e6f 7622 202e tober") ("Nov" . │ │ │ +00002810: 2022 4e6f 7665 6d62 6572 2229 2028 2244 "November") ("D │ │ │ +00002820: 6563 2220 2e20 2244 6563 656d 6265 7222 ec" . "December" │ │ │ +00002830: 2929 202d 3420 6e69 6c20 6c69 6e6b 203a )) -4 nil link : │ │ │ +00002840: 6865 6c70 2d65 6368 6f20 2257 6861 7427 help-echo "What' │ │ │ +00002850: 7320 6e65 7720 696e 2058 456d 6163 7322 s new in XEmacs" │ │ │ +00002860: 203a 6163 7469 6f6e 2061 626f 7574 2d6e :action about-n │ │ │ +00002870: 6577 7320 225c 6e5c 6e22 2061 626f 7574 ews "\n\n" about │ │ │ +00002880: 2d77 6974 682d 6661 6365 2022 5845 6d61 -with-face "XEma │ │ │ +00002890: 6373 2220 626f 6c64 2d69 7461 6c69 6320 cs" bold-italic │ │ │ +000028a0: 2220 6973 2061 2070 6f77 6572 6675 6c2c " is a powerful, │ │ │ +000028b0: 2068 6967 686c 7920 6375 7374 6f6d 697a highly customiz │ │ │ +000028c0: 6162 6c65 206f 7065 6e20 736f 7572 6365 able open source │ │ │ +000028d0: 2074 6578 7420 6564 6974 6f72 2061 6e64 text editor and │ │ │ +000028e0: 5c6e 6170 706c 6963 6174 696f 6e20 6465 \napplication de │ │ │ +000028f0: 7665 6c6f 706d 656e 7420 7379 7374 656d velopment system │ │ │ +00002900: 2c20 7769 7468 2066 756c 6c20 4755 4920 , with full GUI │ │ │ +00002910: 7375 7070 6f72 742e 2020 4974 2069 7320 support. It is │ │ │ +00002920: 7072 6f74 6563 7465 645c 6e75 6e64 6572 protected\nunder │ │ │ +00002930: 2074 6865 2047 4e55 2050 7562 6c69 6320 the GNU Public │ │ │ +00002940: 4c69 6365 6e73 6520 616e 6420 7265 6c61 License and rela │ │ │ +00002950: 7465 6420 746f 206f 7468 6572 2076 6572 ted to other ver │ │ │ +00002960: 7369 6f6e 7320 6f66 2045 6d61 6373 2c20 sions of Emacs, │ │ │ +00002970: 696e 5c6e 7061 7274 6963 756c 6172 2047 in\nparticular G │ │ │ +00002980: 4e55 2045 6d61 6373 2e20 2049 7473 2065 NU Emacs. Its e │ │ │ +00002990: 6d70 6861 7369 7320 6973 206f 6e20 6d6f mphasis is on mo │ │ │ +000029a0: 6465 726e 2067 7261 7068 6963 616c 2075 dern graphical u │ │ │ +000029b0: 7365 725c 6e69 6e74 6572 6661 6365 2073 ser\ninterface s │ │ │ +000029c0: 7570 706f 7274 2061 6e64 2061 6e20 6f70 upport and an op │ │ │ +000029d0: 656e 2073 6f66 7477 6172 6520 6465 7665 en software deve │ │ │ +000029e0: 6c6f 706d 656e 7420 6d6f 6465 6c2c 2073 lopment model, s │ │ │ +000029f0: 696d 696c 6172 2074 6f5c 6e4c 696e 7578 imilar to\nLinux │ │ │ +00002a00: 2e20 2058 456d 6163 7320 6861 7320 616e . XEmacs has an │ │ │ +00002a10: 2061 6374 6976 6520 6465 7665 6c6f 706d active developm │ │ │ +00002a20: 656e 7420 636f 6d6d 756e 6974 7920 6e75 ent community nu │ │ │ +00002a30: 6d62 6572 696e 6720 696e 2074 6865 5c6e mbering in the\n │ │ │ +00002a40: 6875 6e64 7265 6473 2028 616e 6420 7468 hundreds (and th │ │ │ +00002a50: 6f75 7361 6e64 7320 6f66 2061 6374 6976 ousands of activ │ │ │ +00002a60: 6520 6265 7461 2074 6573 7465 7273 206f e beta testers o │ │ │ +00002a70: 6e20 746f 7020 6f66 2074 6869 7329 2c20 n top of this), │ │ │ +00002a80: 616e 6420 7275 6e73 5c6e 6f6e 2061 6c6c and runs\non all │ │ │ +00002a90: 2076 6572 7369 6f6e 7320 6f66 204d 5320 versions of MS │ │ │ +00002aa0: 5769 6e64 6f77 732c 206f 6e20 4c69 6e75 Windows, on Linu │ │ │ +00002ab0: 782c 2061 6e64 206f 6e20 6e65 6172 6c79 x, and on nearly │ │ │ +00002ac0: 2065 7665 7279 206f 7468 6572 5c6e 7665 every other\nve │ │ │ +00002ad0: 7273 696f 6e20 6f66 2055 6e69 7820 696e rsion of Unix in │ │ │ +00002ae0: 2065 7869 7374 656e 6365 2e20 2022 2022 existence. " " │ │ │ +00002af0: 416e 2058 456d 6163 7320 6869 7374 6f72 An XEmacs histor │ │ │ +00002b00: 7920 6c65 7373 6f6e 2220 6162 6f75 742d y lesson" about- │ │ │ +00002b10: 636f 6c6c 6162 6f72 6174 696f 6e20 3a62 collaboration :b │ │ │ +00002b20: 7574 746f 6e2d 7072 6566 6978 2022 2220 utton-prefix "" │ │ │ +00002b30: 3a62 7574 746f 6e2d 7375 6666 6978 2022 :button-suffix " │ │ │ +00002b40: 5375 7070 6f72 7420 666f 7220 5845 6d61 Support for XEma │ │ │ +00002b50: 6373 2220 2220 6861 7320 6265 656e 2073 cs" " has been s │ │ │ +00002b60: 7570 706c 6965 6420 6279 5c6e 5375 6e20 upplied by\nSun │ │ │ +00002b70: 4d69 6372 6f73 7973 7465 6d73 2c20 556e Microsystems, Un │ │ │ +00002b80: 6976 6572 7369 7479 206f 6620 496c 6c69 iversity of Illi │ │ │ +00002b90: 6e6f 6973 2c20 4c75 6369 642c 2045 544c nois, Lucid, ETL │ │ │ +00002ba0: 2f45 6c65 6374 726f 7465 6368 6e69 6361 /Electrotechnica │ │ │ +00002bb0: 6c5c 6e4c 6162 6f72 6174 6f72 792c 2041 l\nLaboratory, A │ │ │ +00002bc0: 6d64 6168 6c20 436f 7270 6f72 6174 696f mdahl Corporatio │ │ │ +00002bd0: 6e2c 2042 654f 7065 6e2c 2061 6e64 206f n, BeOpen, and o │ │ │ +00002be0: 7468 6572 732c 2061 7320 7765 6c6c 2061 thers, as well a │ │ │ +00002bf0: 7320 7468 655c 6e75 6e70 6169 6420 7469 s the\nunpaid ti │ │ │ +00002c00: 6d65 206f 6620 6120 6772 6561 7420 6e75 me of a great nu │ │ │ +00002c10: 6d62 6572 206f 6620 696e 6469 7669 6475 mber of individu │ │ │ +00002c20: 616c 2064 6576 656c 6f70 6572 732e 5c6e al developers.\n │ │ │ +00002c30: 5c6e 5845 6d61 6373 2068 6173 206d 616e \nXEmacs has man │ │ │ +00002c40: 7920 2220 2253 6565 2061 206c 6973 7420 y " "See a list │ │ │ +00002c50: 6f66 2058 456d 6163 7320 6164 7661 6e74 of XEmacs advant │ │ │ +00002c60: 6167 6573 206f 7665 7220 474e 5520 456d ages over GNU Em │ │ │ +00002c70: 6163 7322 2061 626f 7574 2d61 6476 616e acs" about-advan │ │ │ +00002c80: 7461 6765 7320 2261 6476 616e 7461 6765 tages "advantage │ │ │ +00002c90: 7322 2022 206f 7665 7220 474e 5520 456d s" " over GNU Em │ │ │ +00002ca0: 6163 732e 2020 496e 2061 6464 6974 696f acs. In additio │ │ │ +00002cb0: 6e2c 2058 456d 6163 7320 3231 2e34 5c6e n, XEmacs 21.4\n │ │ │ +00002cc0: 7072 6f76 6964 6573 206d 616e 7920 2220 provides many " │ │ │ +00002cd0: 2253 6565 2061 206c 6973 7420 6f66 206e "See a list of n │ │ │ +00002ce0: 6577 2066 6561 7475 7265 7320 696e 2058 ew features in X │ │ │ +00002cf0: 456d 6163 7320 3231 2e34 2220 226e 6577 Emacs 21.4" "new │ │ │ +00002d00: 2066 6561 7475 7265 7322 2022 206e 6f74 features" " not │ │ │ +00002d10: 2066 6f75 6e64 2069 6e20 7072 6576 696f found in previo │ │ │ +00002d20: 7573 2076 6572 7369 6f6e 7320 6f66 2058 us versions of X │ │ │ +00002d30: 456d 6163 732e 5c6e 4d6f 7265 2064 6574 Emacs.\nMore det │ │ │ +00002d40: 6169 6c73 206f 6e20 5845 6d61 6373 2773 ails on XEmacs's │ │ │ +00002d50: 2066 756e 6374 696f 6e61 6c69 7479 2c20 functionality, │ │ │ +00002d60: 696e 636c 7564 696e 6720 6275 6e64 6c65 including bundle │ │ │ +00002d70: 6420 7061 636b 6167 6573 2c20 6361 6e5c d packages, can\ │ │ │ +00002d80: 6e62 6520 6f62 7461 696e 6564 2074 6872 nbe obtained thr │ │ │ +00002d90: 6f75 6768 2074 6865 2022 2069 6e66 6f2d ough the " info- │ │ │ +00002da0: 6c69 6e6b 2022 4272 6f77 7365 2074 6865 link "Browse the │ │ │ +00002db0: 2069 6e66 6f20 7379 7374 656d 2220 3a74 info system" :t │ │ │ +00002dc0: 6167 2022 696e 666f 2220 2228 6469 7229 ag "info" "(dir) │ │ │ +00002dd0: 2220 2220 6f6e 2d6c 696e 6520 696e 666f " " on-line info │ │ │ +00002de0: 726d 6174 696f 6e20 7379 7374 656d 2e5c rmation system.\ │ │ │ +00002df0: 6e5c 6e54 6865 2058 456d 6163 7320 7765 n\nThe XEmacs we │ │ │ +00002e00: 6220 7061 6765 2063 616e 2062 6520 6272 b page can be br │ │ │ +00002e10: 6f77 7365 642c 2075 7369 6e67 2061 6e79 owsed, using any │ │ │ +00002e20: 2057 5757 2062 726f 7773 6572 2061 745c WWW browser at\ │ │ │ +00002e30: 6e5c 6e09 0920 2020 2022 2061 626f 7574 n\n.. " about │ │ │ +00002e40: 2d75 726c 2d6c 696e 6b20 7865 6d61 6373 -url-link xemacs │ │ │ +00002e50: 2022 5669 7369 7420 5845 6d61 6373 2057 "Visit XEmacs W │ │ │ +00002e60: 5757 2070 6167 6522 2022 5c6e 5c6e 4e6f WW page" "\n\nNo │ │ │ +00002e70: 7465 2074 6861 7420 5733 2028 5845 6d61 te that W3 (XEma │ │ │ +00002e80: 6373 2773 206f 776e 2062 726f 7773 6572 cs's own browser │ │ │ +00002e90: 292c 206d 6967 6874 206e 6565 6420 6375 ), might need cu │ │ │ +00002ea0: 7374 6f6d 697a 6174 696f 6e20 2864 7565 stomization (due │ │ │ +00002eb0: 2074 6f5c 6e66 6972 6577 616c 6c73 2920 to\nfirewalls) │ │ │ +00002ec0: 696e 206f 7264 6572 2074 6f20 776f 726b in order to work │ │ │ +00002ed0: 2063 6f72 7265 6374 6c79 2e5c 6e5c 6e58 correctly.\n\nX │ │ │ +00002ee0: 456d 6163 7320 6973 2074 6865 2072 6573 Emacs is the res │ │ │ +00002ef0: 756c 7420 6f66 2074 6865 2074 696d 6520 ult of the time │ │ │ +00002f00: 616e 6420 6566 666f 7274 206f 6620 6d61 and effort of ma │ │ │ +00002f10: 6e79 2070 656f 706c 652e 2020 5468 655c ny people. The\ │ │ │ +00002f20: 6e64 6576 656c 6f70 6572 7320 7265 7370 ndevelopers resp │ │ │ +00002f30: 6f6e 7369 626c 6520 666f 7220 7468 6973 onsible for this │ │ │ +00002f40: 2072 656c 6561 7365 2061 7265 3a5c 6e5c release are:\n\ │ │ │ +00002f50: 6e22 2066 626f 756e 6470 2073 6574 7570 n" fboundp setup │ │ │ +00002f60: 2d70 6572 736f 6e20 2828 6279 7465 2d63 -person ((byte-c │ │ │ +00002f70: 6f64 6520 2209 ab86 c208 4d88 aa84 c3c2 ode ".....M..... │ │ │ +00002f80: 2188 c287 2220 5b23 313d 233a 2d2d 6c65 !..." [#1=#:--le │ │ │ +00002f90: 7466 2d73 6176 652d 2d33 3539 3135 2023 tf-save--35915 # │ │ │ +00002fa0: 323d 233a 2d2d 6c65 7466 2d62 6f75 6e64 2=#:--letf-bound │ │ │ +00002fb0: 2d2d 3335 3931 3620 7365 7475 702d 7065 --35916 setup-pe │ │ │ +00002fc0: 7273 6f6e 2066 6d61 6b75 6e62 6f75 6e64 rson fmakunbound │ │ │ +00002fd0: 5d20 3229 2920 235b 2877 686f 2920 22c5 ] 2)) #[(who) ". │ │ │ +00002fe0: c621 880b 08b7 891a 4140 1c5c 6e41 4140 .!......A@.\nAA@ │ │ │ +00002ff0: 19c7 c8c9 ca0c 50cb cccd ccce cfd0 0cd1 ......P......... │ │ │ +00003000: 0b26 0d88 c5d2 d309 5c22 212b 8722 205b .&......\"!+." [ │ │ │ +00003010: 7865 6d61 6373 2d68 6163 6b65 7273 2061 xemacs-hackers a │ │ │ +00003020: 6464 7265 7373 2065 6e74 7279 2077 686f ddress entry who │ │ │ +00003030: 206e 616d 6520 7769 6467 6574 2d69 6e73 name widget-ins │ │ │ +00003040: 6572 7420 2209 2a20 2220 7769 6467 6574 ert ".* " widget │ │ │ +00003050: 2d63 7265 6174 6520 6c69 6e6b 203a 6865 -create link :he │ │ │ +00003060: 6c70 2d65 6368 6f20 2246 696e 6420 6f75 lp-echo "Find ou │ │ │ +00003070: 7420 6d6f 7265 2061 626f 7574 2022 203a t more about " : │ │ │ +00003080: 6275 7474 6f6e 2d70 7265 6669 7820 2222 button-prefix "" │ │ │ +00003090: 203a 6275 7474 6f6e 2d73 7566 6669 7820 :button-suffix │ │ │ +000030a0: 3a61 6374 696f 6e20 6162 6f75 742d 6d61 :action about-ma │ │ │ +000030b0: 696e 7461 696e 6572 203a 7461 6720 3a76 intainer :tag :v │ │ │ +000030c0: 616c 7565 2066 6f72 6d61 7420 2220 203c alue format " < │ │ │ +000030d0: 2573 3e5c 6e22 5d20 3135 2022 5c6e 436f %s>\n"] 15 "\nCo │ │ │ +000030e0: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ +000030f0: 206c 6973 743a 5c6e 2020 286c 616d 6264 list:\n (lambd │ │ │ +00003100: 6120 5748 4f29 5c6e 5c6e 225d 206d 6170 a WHO)\n\n"] map │ │ │ +00003110: 6320 656d 6163 732d 7061 7463 682d 6c65 c emacs-patch-le │ │ │ +00003120: 7665 6c20 2332 2320 2331 2320 6162 6f75 vel #2# #1# abou │ │ │ +00003130: 742d 6375 7272 656e 742d 7265 6c65 6173 t-current-releas │ │ │ +00003140: 652d 6d61 696e 7461 696e 6572 7320 225c e-maintainers "\ │ │ │ +00003150: 6e09 2a20 2220 2241 206c 6567 696f 6e20 n.* " "A legion │ │ │ +00003160: 6f66 2058 456d 6163 7320 6861 636b 6572 of XEmacs hacker │ │ │ +00003170: 7322 2061 626f 7574 2d68 6163 6b65 7273 s" about-hackers │ │ │ +00003180: 2022 5468 6520 6675 6c6c 206c 6973 7420 "The full list │ │ │ +00003190: 6f66 2063 6f6e 7472 6962 7574 6f72 732e of contributors. │ │ │ +000031a0: 2e2e 2220 225c 6e5c 6e53 7465 7665 2042 .." "\n\nSteve B │ │ │ +000031b0: 6175 7220 7761 7320 7468 6520 7072 696d aur was the prim │ │ │ +000031c0: 6172 7920 6d61 696e 7461 696e 6572 2066 ary maintainer f │ │ │ +000031d0: 6f72 2031 392e 3135 2074 6872 6f75 6768 or 19.15 through │ │ │ +000031e0: 2032 312e 302e 5c6e 5c6e 2220 736c 6220 21.0.\n\n" slb │ │ │ +000031f0: 225c 6e43 6875 636b 2054 686f 6d70 736f "\nChuck Thompso │ │ │ +00003200: 6e20 616e 6420 4265 6e20 5769 6e67 2077 n and Ben Wing w │ │ │ +00003210: 6572 6520 7468 6520 6d61 696e 7461 696e ere the maintain │ │ │ +00003220: 6572 7320 666f 7220 3139 2e31 3120 7468 ers for 19.11 th │ │ │ +00003230: 726f 7567 6820 3139 2e31 345c 6e61 6e64 rough 19.14\nand │ │ │ +00003240: 2068 6561 7679 2063 6f64 6520 636f 6e74 heavy code cont │ │ │ +00003250: 7269 6275 746f 7273 2066 6f72 2031 392e ributors for 19. │ │ │ +00003260: 3820 7468 726f 7567 6820 3139 2e31 302e 8 through 19.10. │ │ │ +00003270: 5c6e 5c6e 2220 6374 686f 6d70 2062 656e \n\n" cthomp ben │ │ │ +00003280: 2022 5c6e 4a61 6d69 6520 5a61 7769 6e73 "\nJamie Zawins │ │ │ +00003290: 6b69 2077 6173 2074 6865 206d 6169 6e74 ki was the maint │ │ │ +000032a0: 6169 6e65 7220 666f 7220 3139 2e30 2074 ainer for 19.0 t │ │ │ +000032b0: 6872 6f75 6768 2031 392e 3130 2028 7468 hrough 19.10 (th │ │ │ +000032c0: 6520 656e 7469 7265 5c6e 6869 7374 6f72 e entire\nhistor │ │ │ +000032d0: 7920 6f66 204c 7563 6964 2045 6d61 6373 y of Lucid Emacs │ │ │ +000032e0: 292e 5c6e 5c6e 2220 6a77 7a20 6162 6f75 ).\n\n" jwz abou │ │ │ +000032f0: 742d 6669 6e69 7368 2d62 7566 6665 7220 t-finish-buffer │ │ │ +00003300: 676f 746f 2d6c 696e 6520 325d 2031 3220 goto-line 2] 12 │ │ │ +00003310: 2823 2420 2e20 3934 3339 2920 6e69 6c5d (#$ . 9439) nil] │ │ │ +00003320: 290a 2864 6566 616c 6961 7320 2761 626f ).(defalias 'abo │ │ │ +00003330: 7574 2d6e 6577 7320 235b 2826 7265 7374 ut-news #[(&rest │ │ │ +00003340: 2069 676e 6f72 6529 2022 c020 88c1 c2c3 ignore) ". .... │ │ │ +00003350: c421 5c22 8722 205b 7669 6577 2d65 6d61 .!\"." [view-ema │ │ │ +00003360: 6373 2d6e 6577 7320 6d65 7373 6167 6520 cs-news message │ │ │ +00003370: 2225 7322 2073 7562 7374 6974 7574 652d "%s" substitute- │ │ │ +00003380: 636f 6d6d 616e 642d 6b65 7973 2022 5072 command-keys "Pr │ │ │ +00003390: 6573 7320 5c5c 5b6b 696c 6c2d 6275 6666 ess \\[kill-buff │ │ │ +000033a0: 6572 5d20 746f 2065 7869 7420 7468 6973 er] to exit this │ │ │ +000033b0: 2062 7566 6665 7222 5d20 345d 290a 2864 buffer"] 4]).(d │ │ │ +000033c0: 6566 616c 6961 7320 2761 626f 7574 2d63 efalias 'about-c │ │ │ +000033d0: 6f6c 6c61 626f 7261 7469 6f6e 2023 5b28 ollaboration #[( │ │ │ +000033e0: 2672 6573 7420 6967 6e6f 7265 2920 22c1 &rest ignore) ". │ │ │ +000033f0: c221 3fad aec3 18c4 c5c6 0821 c708 c85c .!?........!...\ │ │ │ +00003400: 2223 8829 c4c9 c7ca cb5c 22cc c7cd cb5c "#.).....\"....\ │ │ │ +00003410: 22ce c7cf cb5c 22d0 c7d1 cb5c 22d2 c7d3 "....\"....\"... │ │ │ +00003420: cb5c 22d4 260b 88d5 2087 2220 5b74 6974 .\".&... ." [tit │ │ │ +00003430: 6c65 2061 626f 7574 2d67 6574 2d62 7566 le about-get-buf │ │ │ +00003440: 6665 7220 222a 4162 6f75 7420 436f 6c6c fer "*About Coll │ │ │ +00003450: 6162 6f72 6174 696f 6e2a 2220 2257 6879 aboration*" "Why │ │ │ +00003460: 2041 6e6f 7468 6572 2056 6572 7369 6f6e Another Version │ │ │ +00003470: 206f 6620 456d 6163 7322 2077 6964 6765 of Emacs" widge │ │ │ +00003480: 742d 696e 7365 7274 2022 5c6e 2220 6162 t-insert "\n" ab │ │ │ +00003490: 6f75 742d 6365 6e74 6572 2061 626f 7574 out-center about │ │ │ +000034a0: 2d77 6974 682d 6661 6365 2062 6f6c 6420 -with-face bold │ │ │ +000034b0: 225c 6e5c 6e22 2022 5468 6520 4c75 6369 "\n\n" "The Luci │ │ │ +000034c0: 642c 2049 6e63 2e20 506f 696e 7420 6f66 d, Inc. Point of │ │ │ +000034d0: 2056 6965 7722 2069 7461 6c69 6320 2220 View" italic " │ │ │ +000034e0: 2871 7569 7465 206f 7574 6461 7465 6429 (quite outdated) │ │ │ +000034f0: 5c6e 5c6e 4174 2074 6865 2074 696d 6520 \n\nAt the time │ │ │ +00003500: 6f66 2074 6865 2069 6e63 6570 7469 6f6e of the inception │ │ │ +00003510: 206f 6620 4c75 6369 6420 456d 6163 7320 of Lucid Emacs │ │ │ +00003520: 2874 6865 2066 6f72 6d65 7220 6e61 6d65 (the former name │ │ │ +00003530: 206f 665c 6e58 456d 6163 7329 2c20 4c75 of\nXEmacs), Lu │ │ │ +00003540: 6369 6427 7320 6c61 7465 7374 2070 726f cid's latest pro │ │ │ +00003550: 6475 6374 2077 6173 2045 6e65 7267 697a duct was Energiz │ │ │ +00003560: 652c 2061 2043 2f43 2b2b 2064 6576 656c e, a C/C++ devel │ │ │ +00003570: 6f70 6d65 6e74 5c6e 656e 7669 726f 6e6d opment\nenvironm │ │ │ +00003580: 656e 742e 2020 5261 7468 6572 2074 6861 ent. Rather tha │ │ │ +00003590: 6e20 696e 7665 6e74 2028 616e 6420 666f n invent (and fo │ │ │ +000035a0: 7263 6520 6f75 7220 7573 6572 7320 746f rce our users to │ │ │ +000035b0: 206c 6561 726e 2920 6120 6e65 775c 6e75 learn) a new\nu │ │ │ +000035c0: 7365 7220 696e 7465 7266 6163 652c 2077 ser interface, w │ │ │ +000035d0: 6520 6368 6f73 6520 746f 2062 7569 6c64 e chose to build │ │ │ +000035e0: 2070 6172 7420 6f66 206f 7572 2065 6e76 part of our env │ │ │ +000035f0: 6972 6f6e 6d65 6e74 206f 6e20 746f 7020 ironment on top │ │ │ +00003600: 6f66 5c6e 7468 6520 776f 726c 6427 7320 of\nthe world's │ │ │ +00003610: 6265 7374 2065 6469 746f 722c 2047 4e55 best editor, GNU │ │ │ +00003620: 2045 6d61 6373 2e20 2028 5468 6f75 6768 Emacs. (Though │ │ │ +00003630: 206f 7572 2070 726f 6475 6374 2069 735c our product is\ │ │ │ +00003640: 6e63 6f6d 6d65 7263 6961 6c2c 2074 6865 ncommercial, the │ │ │ +00003650: 2077 6f72 6b20 7765 2064 6964 206f 6e20 work we did on │ │ │ +00003660: 474e 5520 456d 6163 7320 6973 2066 7265 GNU Emacs is fre │ │ │ +00003670: 6520 736f 6674 7761 7265 2c20 616e 6420 e software, and │ │ │ +00003680: 6973 5c6e 7573 6566 756c 2069 6e20 6974 is\nuseful in it │ │ │ +00003690: 7320 6f77 6e20 7269 6768 742e 295c 6e5c s own right.)\n\ │ │ │ +000036a0: 6e57 6520 6e65 6564 6564 2061 2076 6572 nWe needed a ver │ │ │ +000036b0: 7369 6f6e 206f 6620 456d 6163 7320 7769 sion of Emacs wi │ │ │ +000036c0: 7468 206d 6f75 7365 2d73 656e 7369 7469 th mouse-sensiti │ │ │ +000036d0: 7665 2072 6567 696f 6e73 2c20 6d75 6c74 ve regions, mult │ │ │ +000036e0: 6970 6c65 5c6e 666f 6e74 732c 2074 6865 iple\nfonts, the │ │ │ +000036f0: 2061 6269 6c69 7479 2074 6f20 6d61 726b ability to mark │ │ │ +00003700: 2073 6563 7469 6f6e 7320 6f66 2061 2062 sections of a b │ │ │ +00003710: 7566 6665 7220 6173 2072 6561 642d 6f6e uffer as read-on │ │ │ +00003720: 6c79 2c20 7468 655c 6e61 6269 6c69 7479 ly, the\nability │ │ │ +00003730: 2074 6f20 6465 7465 6374 2077 6869 6368 to detect which │ │ │ +00003740: 2070 6172 7473 206f 6620 6120 6275 6666 parts of a buff │ │ │ +00003750: 6572 2068 6176 6520 6265 656e 206d 6f64 er have been mod │ │ │ +00003760: 6966 6965 642c 2061 6e64 206d 616e 795c ified, and many\ │ │ │ +00003770: 6e6f 7468 6572 2066 6561 7475 7265 732e nother features. │ │ │ +00003780: 5c6e 5c6e 466f 7220 6f75 7220 7075 7270 \n\nFor our purp │ │ │ +00003790: 6f73 6573 2c20 7468 6520 6578 6973 7469 oses, the existi │ │ │ +000037a0: 6e67 2076 6572 7369 6f6e 206f 6620 4570 ng version of Ep │ │ │ +000037b0: 6f63 6820 7761 7320 6e6f 7420 7375 6666 och was not suff │ │ │ +000037c0: 6963 6965 6e74 3b20 6974 5c6e 6469 6420 icient; it\ndid │ │ │ +000037d0: 6e6f 7420 616c 6c6f 7720 7573 2074 6f20 not allow us to │ │ │ +000037e0: 7075 7420 6172 6269 7472 6172 7920 7069 put arbitrary pi │ │ │ +000037f0: 786d 6170 732f 6963 6f6e 7320 696e 2062 xmaps/icons in b │ │ │ +00003800: 7566 6665 7273 2c20 6075 6e64 6f27 2064 uffers, `undo' d │ │ │ +00003810: 6964 5c6e 6e6f 7420 7265 7374 6f72 6520 id\nnot restore │ │ │ +00003820: 6368 616e 6765 7320 746f 2072 6567 696f changes to regio │ │ │ +00003830: 6e73 2c20 7265 6769 6f6e 7320 6469 6420 ns, regions did │ │ │ +00003840: 6e6f 7420 6f76 6572 6c61 7020 616e 6420 not overlap and │ │ │ +00003850: 6d65 7267 655c 6e74 6865 6972 2061 7474 merge\ntheir att │ │ │ +00003860: 7269 6275 7465 7320 696e 2074 6865 2077 ributes in the w │ │ │ +00003870: 6179 2077 6520 6e65 6564 6564 2c20 616e ay we needed, an │ │ │ +00003880: 6420 7365 7665 7261 6c20 6f74 6865 7220 d several other │ │ │ +00003890: 7468 696e 6773 2e5c 6e5c 6e57 6520 636f things.\n\nWe co │ │ │ +000038a0: 756c 6420 6861 7665 2064 6576 6f74 6564 uld have devoted │ │ │ +000038b0: 206f 7572 2074 696d 6520 746f 206d 616b our time to mak │ │ │ +000038c0: 696e 6720 4570 6f63 6820 646f 2077 6861 ing Epoch do wha │ │ │ +000038d0: 7420 7765 206e 6565 6465 6420 2861 6e64 t we needed (and │ │ │ +000038e0: 2c5c 6e69 6e20 6661 6374 2c20 7765 2073 ,\nin fact, we s │ │ │ +000038f0: 7065 6e74 2073 6f6d 6520 7469 6d65 2064 pent some time d │ │ │ +00003900: 6f69 6e67 2074 6861 7420 696e 2031 3939 oing that in 199 │ │ │ +00003910: 3029 2062 7574 2c20 7369 6e63 6520 7468 0) but, since th │ │ │ +00003920: 6520 4653 465c 6e70 6c61 6e6e 6564 2074 e FSF\nplanned t │ │ │ +00003930: 6f20 696e 636c 7564 6520 4570 6f63 682d o include Epoch- │ │ │ +00003940: 6c69 6b65 2066 6561 7475 7265 7320 696e like features in │ │ │ +00003950: 2074 6865 6972 2076 6572 7369 6f6e 2031 their version 1 │ │ │ +00003960: 392c 2077 6520 6465 6369 6465 645c 6e74 9, we decided\nt │ │ │ +00003970: 6861 7420 6f75 7220 6566 666f 7274 7320 hat our efforts │ │ │ +00003980: 776f 756c 6420 6265 2062 6574 7465 7220 would be better │ │ │ +00003990: 7370 656e 7420 696d 7072 6f76 696e 6720 spent improving │ │ │ +000039a0: 456d 6163 7320 3139 2069 6e73 7465 6164 Emacs 19 instead │ │ │ +000039b0: 206f 665c 6e45 706f 6368 2e5c 6e5c 6e4f of\nEpoch.\n\nO │ │ │ +000039c0: 7572 206f 7269 6769 6e61 6c20 686f 7065 ur original hope │ │ │ +000039d0: 2077 6173 2074 6861 7420 6f75 7220 6368 was that our ch │ │ │ +000039e0: 616e 6765 7320 746f 2045 6d61 6373 2077 anges to Emacs w │ │ │ +000039f0: 6f75 6c64 2062 6520 696e 636f 7270 6f72 ould be incorpor │ │ │ +00003a00: 6174 6564 5c6e 696e 746f 2074 6865 205c ated\ninto the \ │ │ │ +00003a10: 226f 6666 6963 6961 6c5c 2220 7631 392e "official\" v19. │ │ │ +00003a20: 2020 486f 7765 7665 722c 2073 6368 6564 However, sched │ │ │ +00003a30: 756c 696e 6720 636f 6e66 6c69 6374 7320 uling conflicts │ │ │ +00003a40: 6172 6f73 652c 2061 6e64 5c6e 7765 2066 arose, and\nwe f │ │ │ +00003a50: 6f75 6e64 2074 6861 742c 2067 6976 656e ound that, given │ │ │ +00003a60: 2074 6865 2061 6d6f 756e 7420 6f66 2077 the amount of w │ │ │ +00003a70: 6f72 6b20 7374 696c 6c20 7265 6d61 696e ork still remain │ │ │ +00003a80: 696e 6720 746f 2062 6520 646f 6e65 2c20 ing to be done, │ │ │ +00003a90: 7765 5c6e 6469 646e 2774 2068 6176 6520 we\ndidn't have │ │ │ +00003aa0: 7468 6520 7469 6d65 206f 7220 6d61 6e70 the time or manp │ │ │ +00003ab0: 6f77 6572 2074 6f20 646f 2074 6865 206c ower to do the l │ │ │ +00003ac0: 6576 656c 206f 6620 636f 6f72 6469 6e61 evel of coordina │ │ │ +00003ad0: 7469 6f6e 2074 6861 745c 6e77 6f75 6c64 tion that\nwould │ │ │ +00003ae0: 2062 6520 6e65 6365 7373 6172 7920 746f be necessary to │ │ │ +00003af0: 2067 6574 206f 7572 2063 6861 6e67 6573 get our changes │ │ │ +00003b00: 2061 6363 6570 7465 6420 6279 2074 6865 accepted by the │ │ │ +00003b10: 2046 5346 2e5c 6e43 6f6e 7365 7175 656e FSF.\nConsequen │ │ │ +00003b20: 746c 792c 2077 6520 7265 6c65 6173 6564 tly, we released │ │ │ +00003b30: 206f 7572 2077 6f72 6b20 6173 2061 2066 our work as a f │ │ │ +00003b40: 6f72 6b65 6420 6272 616e 6368 206f 6620 orked branch of │ │ │ +00003b50: 456d 6163 732c 5c6e 696e 7374 6561 6420 Emacs,\ninstead │ │ │ +00003b60: 6f66 2064 656c 6179 696e 6720 616e 7920 of delaying any │ │ │ +00003b70: 6c6f 6e67 6572 2e5c 6e5c 6e52 6f75 6768 longer.\n\nRough │ │ │ +00003b80: 6c79 2061 2079 6561 7220 6166 7465 7220 ly a year after │ │ │ +00003b90: 4c75 6369 6420 456d 6163 7320 3139 2e30 Lucid Emacs 19.0 │ │ │ +00003ba0: 2077 6173 2072 656c 6561 7365 642c 2061 was released, a │ │ │ +00003bb0: 2062 6574 6120 7665 7273 696f 6e20 6f66 beta version of │ │ │ +00003bc0: 5c6e 7468 6520 4653 4620 6272 616e 6368 \nthe FSF branch │ │ │ +00003bd0: 206f 6620 456d 6163 7320 3139 2077 6173 of Emacs 19 was │ │ │ +00003be0: 2072 656c 6561 7365 642e 2020 5468 6520 released. The │ │ │ +00003bf0: 4653 4620 7665 7273 696f 6e20 6973 2062 FSF version is b │ │ │ +00003c00: 6574 7465 7220 696e 5c6e 736f 6d65 2061 etter in\nsome a │ │ │ +00003c10: 7265 6173 2c20 616e 6420 776f 7273 6520 reas, and worse │ │ │ +00003c20: 696e 206f 7468 6572 732c 2061 7320 7265 in others, as re │ │ │ +00003c30: 666c 6563 7473 2074 6865 2064 6966 6665 flects the diffe │ │ │ +00003c40: 7269 6e67 2066 6f63 7573 206f 665c 6e6f ring focus of\no │ │ │ +00003c50: 7572 2064 6576 656c 6f70 6d65 6e74 2065 ur development e │ │ │ +00003c60: 6666 6f72 7473 2e5c 6e5c 6e57 6520 706c fforts.\n\nWe pl │ │ │ +00003c70: 616e 2074 6f20 636f 6e74 696e 7565 2064 an to continue d │ │ │ +00003c80: 6576 656c 6f70 696e 6720 616e 6420 7375 eveloping and su │ │ │ +00003c90: 7070 6f72 7469 6e67 204c 7563 6964 2045 pporting Lucid E │ │ │ +00003ca0: 6d61 6373 2c20 616e 6420 6d65 7267 696e macs, and mergin │ │ │ +00003cb0: 675c 6e69 6e20 6275 6720 6669 7865 7320 g\nin bug fixes │ │ │ +00003cc0: 616e 6420 6e65 7720 6665 6174 7572 6573 and new features │ │ │ +00003cd0: 2066 726f 6d20 7468 6520 4653 4620 6272 from the FSF br │ │ │ +00003ce0: 616e 6368 2061 7320 6170 7072 6f70 7269 anch as appropri │ │ │ +00003cf0: 6174 653b 2077 655c 6e64 6f20 6e6f 7420 ate; we\ndo not │ │ │ +00003d00: 706c 616e 2074 6f20 6469 7363 6172 6420 plan to discard │ │ │ +00003d10: 616e 7920 6f66 2074 6865 2066 756e 6374 any of the funct │ │ │ +00003d20: 696f 6e61 6c69 7479 2074 6861 7420 7765 ionality that we │ │ │ +00003d30: 2069 6d70 6c65 6d65 6e74 6564 5c6e 7768 implemented\nwh │ │ │ +00003d40: 6963 6820 524d 5320 6861 7320 6368 6f73 ich RMS has chos │ │ │ +00003d50: 656e 206e 6f74 2074 6f20 696e 636c 7564 en not to includ │ │ │ +00003d60: 6520 696e 2068 6973 2076 6572 7369 6f6e e in his version │ │ │ +00003d70: 2e5c 6e5c 6e43 6572 7461 696e 2065 6c65 .\n\nCertain ele │ │ │ +00003d80: 6d65 6e74 7320 6f66 204c 7563 6964 2045 ments of Lucid E │ │ │ +00003d90: 6d61 6373 2c20 6f72 2064 6572 6976 6174 macs, or derivat │ │ │ +00003da0: 6976 6573 206f 6620 7468 656d 2c20 6861 ives of them, ha │ │ │ +00003db0: 7665 2062 6565 6e5c 6e70 6f72 7465 6420 ve been\nported │ │ │ +00003dc0: 746f 2074 6865 2046 5346 2076 6572 7369 to the FSF versi │ │ │ +00003dd0: 6f6e 2e20 2057 6520 6861 7665 206e 6f74 on. We have not │ │ │ +00003de0: 2062 6565 6e20 646f 696e 6720 776f 726b been doing work │ │ │ +00003df0: 2069 6e20 7468 6973 5c6e 6469 7265 6374 in this\ndirect │ │ │ +00003e00: 696f 6e2c 2062 6563 6175 7365 2077 6520 ion, because we │ │ │ +00003e10: 6665 656c 2074 6861 7420 4c75 6369 6420 feel that Lucid │ │ │ +00003e20: 456d 6163 7320 6861 7320 6120 636c 6561 Emacs has a clea │ │ │ +00003e30: 6e65 7220 616e 6420 6d6f 7265 5c6e 6578 ner and more\nex │ │ │ +00003e40: 7465 6e73 6962 6c65 2073 7562 7374 7261 tensible substra │ │ │ +00003e50: 7465 2c20 616e 6420 7468 6174 2061 6e79 te, and that any │ │ │ +00003e60: 206b 696e 6420 6f66 206d 6572 6765 7220 kind of merger │ │ │ +00003e70: 6265 7477 6565 6e20 7468 6520 7477 6f5c between the two\ │ │ │ +00003e80: 6e62 7261 6e63 6865 7320 776f 756c 6420 nbranches would │ │ │ +00003e90: 6265 2066 6172 2065 6173 6965 7220 6279 be far easier by │ │ │ +00003ea0: 206d 6572 6769 6e67 2074 6865 2046 5346 merging the FSF │ │ │ +00003eb0: 2063 6861 6e67 6573 2069 6e74 6f20 6f75 changes into ou │ │ │ +00003ec0: 725c 6e76 6572 7369 6f6e 2074 6861 6e20 r\nversion than │ │ │ +00003ed0: 7468 6520 6f74 6865 7220 7761 7920 6172 the other way ar │ │ │ +00003ee0: 6f75 6e64 2e5c 6e5c 6e57 6520 6861 7665 ound.\n\nWe have │ │ │ +00003ef0: 2062 6565 6e20 776f 726b 696e 6720 636c been working cl │ │ │ +00003f00: 6f73 656c 7920 7769 7468 2074 6865 2045 osely with the E │ │ │ +00003f10: 706f 6368 2064 6576 656c 6f70 6572 7320 poch developers │ │ │ +00003f20: 746f 206d 6572 6765 2069 6e20 7468 655c to merge in the\ │ │ │ +00003f30: 6e72 656d 6169 6e69 6e67 2045 706f 6368 nremaining Epoch │ │ │ +00003f40: 2066 756e 6374 696f 6e61 6c69 7479 2077 functionality w │ │ │ +00003f50: 6869 6368 204c 7563 6964 2045 6d61 6373 hich Lucid Emacs │ │ │ +00003f60: 2064 6f65 7320 6e6f 7420 7965 7420 6861 does not yet ha │ │ │ +00003f70: 7665 2e5c 6e45 706f 6368 2061 6e64 204c ve.\nEpoch and L │ │ │ +00003f80: 7563 6964 2045 6d61 6373 2077 696c 6c20 ucid Emacs will │ │ │ +00003f90: 736f 6f6e 2062 6520 6f6e 6520 616e 6420 soon be one and │ │ │ +00003fa0: 7468 6520 7361 6d65 2074 6869 6e67 2e20 the same thing. │ │ │ +00003fb0: 2057 6f72 6b20 6973 5c6e 6265 696e 6720 Work is\nbeing │ │ │ +00003fc0: 646f 6e65 206f 6e20 6120 636f 6d70 6174 done on a compat │ │ │ +00003fd0: 6962 696c 6974 7920 7061 636b 6167 6520 ibility package │ │ │ +00003fe0: 7768 6963 6820 7769 6c6c 2061 6c6c 6f77 which will allow │ │ │ +00003ff0: 2045 706f 6368 2034 2063 6f64 6520 746f Epoch 4 code to │ │ │ +00004000: 5c6e 7275 6e20 696e 2058 456d 6163 7320 \nrun in XEmacs │ │ │ +00004010: 7769 7468 206c 6974 746c 6520 6f72 206e with little or n │ │ │ +00004020: 6f20 6368 616e 6765 2e5c 6e5c 6e22 2022 o change.\n\n" " │ │ │ +00004030: 5468 6520 5375 6e20 4d69 6372 6f73 7973 The Sun Microsys │ │ │ +00004040: 7465 6d73 2c20 496e 632e 2050 6f69 6e74 tems, Inc. Point │ │ │ +00004050: 206f 6620 5669 6577 2220 225c 6e5c 6e45 of View" "\n\nE │ │ │ +00004060: 6d61 6373 2031 3820 6861 7320 6265 656e macs 18 has been │ │ │ +00004070: 2061 726f 756e 6420 666f 7220 6120 6c6f around for a lo │ │ │ +00004080: 6e67 2c20 6c6f 6e67 2074 696d 652e 2020 ng, long time. │ │ │ +00004090: 5665 7273 696f 6e20 3139 2077 6173 5c6e Version 19 was\n │ │ │ +000040a0: 7375 7070 6f73 6564 2074 6f20 6265 2074 supposed to be t │ │ │ +000040b0: 6865 2073 7563 6365 7373 6f72 2074 6f20 he successor to │ │ │ +000040c0: 7631 3820 7769 7468 2058 2073 7570 706f v18 with X suppo │ │ │ +000040d0: 7274 2e20 2049 7420 7761 7320 676f 696e rt. It was goin │ │ │ +000040e0: 6720 746f 5c6e 6265 2061 7661 696c 6162 g to\nbe availab │ │ │ +000040f0: 6c65 205c 2272 6561 6c20 736f 6f6e 5c22 le \"real soon\" │ │ │ +00004100: 2066 6f72 2061 206c 6f6e 6720 7469 6d65 for a long time │ │ │ +00004110: 2028 736f 6d65 2070 656f 706c 6520 7265 (some people re │ │ │ +00004120: 6d65 6d62 6572 5c6e 6865 6172 696e 6720 member\nhearing │ │ │ +00004130: 6162 6f75 7420 7631 3920 6173 2065 6172 about v19 as ear │ │ │ +00004140: 6c79 2061 7320 3139 3834 2129 2c20 6275 ly as 1984!), bu │ │ │ +00004150: 7420 6974 206e 6576 6572 2063 616d 6520 t it never came │ │ │ +00004160: 6f75 742e 2020 7631 395c 6e64 6576 656c out. v19\ndevel │ │ │ +00004170: 6f70 6d65 6e74 2077 6173 2067 6f69 6e67 opment was going │ │ │ +00004180: 2076 6572 792c 2076 6572 7920 736c 6f77 very, very slow │ │ │ +00004190: 6c79 2c20 616e 6420 6672 6f6d 2074 6865 ly, and from the │ │ │ +000041a0: 206f 7574 7369 6465 2069 745c 6e73 6565 outside it\nsee │ │ │ +000041b0: 6d65 6420 7468 6174 2069 7420 7761 7320 med that it was │ │ │ +000041c0: 6e6f 7420 6d6f 7669 6e67 2061 7420 616c not moving at al │ │ │ +000041d0: 6c2e 2020 496e 2074 6865 206d 6561 6e74 l. In the meant │ │ │ +000041e0: 696d 6520 6f74 6865 7220 7065 6f70 6c65 ime other people │ │ │ +000041f0: 5c6e 6761 7665 2075 7020 7761 6974 696e \ngave up waitin │ │ │ +00004200: 6720 666f 7220 7631 3920 616e 6420 6465 g for v19 and de │ │ │ +00004210: 6369 6465 6420 746f 2062 7569 6c64 2074 cided to build t │ │ │ +00004220: 6865 6972 206f 776e 2058 2d61 7761 7265 heir own X-aware │ │ │ +00004230: 5c6e 456d 6163 7365 6e2e 2020 5468 6520 \nEmacsen. The │ │ │ +00004240: 6d6f 7374 2069 6d70 6f72 7461 6e74 206f most important o │ │ │ +00004250: 6620 7468 6573 6520 7761 7320 7072 6f62 f these was prob │ │ │ +00004260: 6162 6c79 2045 706f 6368 2c20 7768 6963 ably Epoch, whic │ │ │ +00004270: 6820 6361 6d65 5c6e 6672 6f6d 2074 6865 h came\nfrom the │ │ │ +00004280: 2055 6e69 7665 7273 6974 7920 6f66 2049 University of I │ │ │ +00004290: 6c6c 696e 6f69 7320 285c 2255 6f66 495c llinois (\"UofI\ │ │ │ +000042a0: 2229 2061 6e64 2077 6173 2062 6173 6564 ") and was based │ │ │ +000042b0: 206f 6e20 7631 382e 5c6e 5c6e 4172 6f75 on v18.\n\nArou │ │ │ +000042c0: 6e64 2031 3939 302c 2074 6865 2044 6576 nd 1990, the Dev │ │ │ +000042d0: 656c 6f70 6572 2050 726f 6475 6374 7320 eloper Products │ │ │ +000042e0: 6772 6f75 7020 7769 7468 696e 2053 756e group within Sun │ │ │ +000042f0: 204d 6963 726f 7379 7374 656d 735c 6e49 Microsystems\nI │ │ │ +00004300: 6e63 2e2c 2064 6563 6964 6564 2074 6861 nc., decided tha │ │ │ +00004310: 7420 6974 2077 616e 7465 6420 616e 2069 t it wanted an i │ │ │ +00004320: 6e74 6567 7261 7465 6420 6564 6974 6f72 ntegrated editor │ │ │ +00004330: 2e20 2028 5468 6973 2067 726f 7570 2069 . (This group i │ │ │ +00004340: 7320 6e6f 775c 6e6b 6e6f 776e 2061 7320 s now\nknown as │ │ │ +00004350: 4465 7650 726f 2e20 2049 7420 7573 6564 DevPro. It used │ │ │ +00004360: 2074 6f20 6265 206b 6e6f 776e 2061 7320 to be known as │ │ │ +00004370: 5375 6e50 726f 202d 2074 6865 206e 616d SunPro - the nam │ │ │ +00004380: 6520 7761 7320 6368 616e 6765 645c 6e69 e was changed\ni │ │ │ +00004390: 6e20 6d69 642d 3139 3934 2e29 2020 5468 n mid-1994.) Th │ │ │ +000043a0: 6579 2063 6f6e 7472 6163 7465 6420 7769 ey contracted wi │ │ │ +000043b0: 7468 2074 6865 2055 6e69 7665 7273 6974 th the Universit │ │ │ +000043c0: 7920 6f66 2049 6c6c 696e 6f69 7320 746f y of Illinois to │ │ │ +000043d0: 5c6e 7072 6f76 6964 6520 6120 6e75 6d62 \nprovide a numb │ │ │ +000043e0: 6572 206f 6620 6261 7369 6320 656e 6861 er of basic enha │ │ │ +000043f0: 6e63 656d 656e 7473 2074 6f20 7468 6520 ncements to the │ │ │ +00004400: 6675 6e63 7469 6f6e 616c 6974 7920 696e functionality in │ │ │ +00004410: 2045 706f 6368 2e5c 6e55 6f66 4920 696e Epoch.\nUofI in │ │ │ +00004420: 6974 6961 6c6c 7920 7761 7320 706c 616e itially was plan │ │ │ +00004430: 6e69 6e67 2074 6f20 6465 6c69 7665 7220 ning to deliver │ │ │ +00004440: 7468 6973 206f 6e20 746f 7020 6f66 2045 this on top of E │ │ │ +00004450: 706f 6368 2063 6f64 652e 5c6e 5c6e 496e poch code.\n\nIn │ │ │ +00004460: 2074 6865 206d 6561 6e74 696d 652c 2028 the meantime, ( │ │ │ +00004470: 6163 7475 616c 6c79 2073 6f6d 6520 7469 actually some ti │ │ │ +00004480: 6d65 2062 6566 6f72 6520 7468 6579 2074 me before they t │ │ │ +00004490: 616c 6b65 6420 7769 7468 2055 6f66 4929 alked with UofI) │ │ │ +000044a0: 5c6e 4c75 6369 6420 6861 6420 6465 6369 \nLucid had deci │ │ │ +000044b0: 6465 6420 7468 6174 2069 7420 616c 736f ded that it also │ │ │ +000044c0: 2077 616e 7465 6420 746f 2070 726f 7669 wanted to provi │ │ │ +000044d0: 6465 2061 6e20 696e 7465 6772 6174 6564 de an integrated │ │ │ +000044e0: 5c6e 656e 7669 726f 6e6d 656e 7420 7769 \nenvironment wi │ │ │ +000044f0: 7468 2061 6e20 696e 7465 6772 6174 6564 th an integrated │ │ │ +00004500: 2065 6469 746f 722e 2020 4c75 6369 6420 editor. Lucid │ │ │ +00004510: 6465 6369 6465 6420 7468 6174 2074 6865 decided that the │ │ │ +00004520: 2056 6572 7369 6f6e 5c6e 3139 2062 6173 Version\n19 bas │ │ │ +00004530: 6520 7761 7320 6120 6265 7474 6572 206f e was a better o │ │ │ +00004540: 6e65 2074 6861 6e20 5665 7273 696f 6e20 ne than Version │ │ │ +00004550: 3138 2061 6e64 2074 6875 7320 6465 6369 18 and thus deci │ │ │ +00004560: 6465 6420 6e6f 7420 746f 2075 7365 5c6e ded not to use\n │ │ │ +00004570: 4570 6f63 6820 6275 7420 696e 7374 6561 Epoch but instea │ │ │ +00004580: 6420 746f 2077 6f72 6b20 7769 7468 2052 d to work with R │ │ │ +00004590: 6963 6861 7264 2053 7461 6c6c 6d61 6e2c ichard Stallman, │ │ │ +000045a0: 2074 6865 2068 6561 6420 6f66 2074 6865 the head of the │ │ │ +000045b0: 2046 7265 655c 6e53 6f66 7477 6172 6520 Free\nSoftware │ │ │ +000045c0: 466f 756e 6461 7469 6f6e 2061 6e64 2070 Foundation and p │ │ │ +000045d0: 7269 6e63 6970 616c 2061 7574 686f 7220 rincipal author │ │ │ +000045e0: 6f66 2045 6d61 6373 2c20 6f6e 2067 6574 of Emacs, on get │ │ │ +000045f0: 7469 6e67 2076 3139 206f 7574 2e5c 6e41 ting v19 out.\nA │ │ │ +00004600: 7420 736f 6d65 2070 6f69 6e74 2053 7461 t some point Sta │ │ │ +00004610: 6c6c 6d61 6e20 616e 6420 4c75 6369 6420 llman and Lucid │ │ │ +00004620: 7061 7274 6564 2077 6179 732e 2020 4c75 parted ways. Lu │ │ │ +00004630: 6369 6420 6b65 7074 2077 6f72 6b69 6e67 cid kept working │ │ │ +00004640: 2061 6e64 5c6e 676f 7420 6120 7631 3920 and\ngot a v19 │ │ │ +00004650: 6f75 7420 7468 6174 2074 6865 7920 6361 out that they ca │ │ │ +00004660: 6c6c 6564 204c 7563 6964 2045 6d61 6373 lled Lucid Emacs │ │ │ +00004670: 2031 392e 5c6e 5c6e 4166 7465 7220 4c75 19.\n\nAfter Lu │ │ │ +00004680: 6369 6427 7320 7631 3920 6361 6d65 206f cid's v19 came o │ │ │ +00004690: 7574 2069 7420 6265 6361 6d65 2063 6c65 ut it became cle │ │ │ +000046a0: 6172 2074 6f20 7573 2028 7468 6520 556f ar to us (the Uo │ │ │ +000046b0: 6649 2061 6e64 2053 756e 295c 6e74 6861 fI and Sun)\ntha │ │ │ +000046c0: 7420 7468 6520 7269 6768 7420 7468 696e t the right thin │ │ │ +000046d0: 6720 746f 2064 6f20 7761 7320 746f 2070 g to do was to p │ │ │ +000046e0: 7573 6820 666f 7220 616e 2069 6e74 6567 ush for an integ │ │ │ +000046f0: 7261 7469 6f6e 206f 6620 626f 7468 5c6e ration of both\n │ │ │ +00004700: 4c75 6369 6420 456d 6163 7320 616e 6420 Lucid Emacs and │ │ │ +00004710: 4570 6f63 682c 2061 6e64 2074 6f20 6765 Epoch, and to ge │ │ │ +00004720: 7420 7468 6520 6465 6c69 7665 7261 626c t the deliverabl │ │ │ +00004730: 6573 2074 6861 7420 5375 6e20 7761 7320 es that Sun was │ │ │ +00004740: 6173 6b69 6e67 5c6e 6672 6f6d 2074 6865 asking\nfrom the │ │ │ +00004750: 2055 6e69 7665 7273 6974 7920 6f66 2049 University of I │ │ │ +00004760: 6c6c 696e 6f69 7320 6f6e 2074 6f70 206f llinois on top o │ │ │ +00004770: 6620 7468 6973 2069 6e74 6567 7261 7465 f this integrate │ │ │ +00004780: 6420 706c 6174 666f 726d 2e5c 6e55 6e74 d platform.\nUnt │ │ │ +00004790: 696c 2031 3939 342c 2053 756e 2061 6e64 il 1994, Sun and │ │ │ +000047a0: 204c 7563 6964 2062 6f74 6820 6163 7469 Lucid both acti │ │ │ +000047b0: 7665 6c79 2073 7570 706f 7274 6564 2058 vely supported X │ │ │ +000047c0: 456d 6163 7320 6173 2070 6172 7420 6f66 Emacs as part of │ │ │ +000047d0: 5c6e 7468 6569 7220 7072 6f64 7563 7420 \ntheir product │ │ │ +000047e0: 7375 6974 6520 616e 6420 696e 7665 7374 suite and invest │ │ │ +000047f0: 6564 2061 2063 6f6d 7061 7261 626c 6520 ed a comparable │ │ │ +00004800: 616d 6f75 6e74 206f 6620 6566 666f 7274 amount of effort │ │ │ +00004810: 2069 6e74 6f5c 6e69 742e 2020 5375 6273 into\nit. Subs │ │ │ +00004820: 7461 6e74 6961 6c20 706f 7274 696f 6e73 tantial portions │ │ │ +00004830: 206f 6620 7468 6520 6375 7272 656e 7420 of the current │ │ │ +00004840: 636f 6465 2068 6176 6520 6f72 6967 696e code have origin │ │ │ +00004850: 6174 6564 2075 6e64 6572 5c6e 7468 6520 ated under\nthe │ │ │ +00004860: 7375 7070 6f72 7420 6f66 2053 756e 2c20 support of Sun, │ │ │ +00004870: 6569 7468 6572 2064 6972 6563 746c 7920 either directly │ │ │ +00004880: 7769 7468 696e 2053 756e 2c20 6f72 2061 within Sun, or a │ │ │ +00004890: 7420 556f 6649 2062 7574 2070 6169 645c t UofI but paid\ │ │ │ +000048a0: 6e66 6f72 2062 7920 5375 6e2e 2020 5468 nfor by Sun. Th │ │ │ +000048b0: 6973 2063 6f64 6520 7761 7320 6b65 7074 is code was kept │ │ │ +000048c0: 2061 7761 7920 6672 6f6d 204c 7563 6964 away from Lucid │ │ │ +000048d0: 2066 6f72 2061 2077 6869 6c65 2c20 6275 for a while, bu │ │ │ +000048e0: 7420 6c61 7465 725c 6e77 6173 206d 6164 t later\nwas mad │ │ │ +000048f0: 6520 6176 6169 6c61 626c 6520 746f 2074 e available to t │ │ │ +00004900: 6865 6d2e 2020 496e 6974 6961 6c6c 7920 hem. Initially │ │ │ +00004910: 4c75 6369 6420 6469 646e 2774 206b 6e6f Lucid didn't kno │ │ │ +00004920: 7720 7468 6174 2053 756e 2077 6173 5c6e w that Sun was\n │ │ │ +00004930: 7375 7070 6f72 7469 6e67 2055 6f66 492c supporting UofI, │ │ │ +00004940: 2062 7574 206c 6174 6572 2053 756e 2077 but later Sun w │ │ │ +00004950: 6173 206f 7065 6e20 6162 6f75 7420 6974 as open about it │ │ │ +00004960: 2e5c 6e5c 6e41 726f 756e 6420 3139 3932 .\n\nAround 1992 │ │ │ +00004970: 2044 6576 5072 6f2d 6f72 6967 696e 6174 DevPro-originat │ │ │ +00004980: 6564 2063 6f64 6520 7374 6172 7465 6420 ed code started │ │ │ +00004990: 7368 6f77 696e 6720 7570 2069 6e20 4c75 showing up in Lu │ │ │ +000049a0: 6369 6420 456d 6163 732c 5c6e 7374 6172 cid Emacs,\nstar │ │ │ +000049b0: 7469 6e67 2077 6974 6820 7468 6520 696e ting with the in │ │ │ +000049c0: 6675 7369 6f6e 206f 6620 7468 6520 4570 fusion of the Ep │ │ │ +000049d0: 6f63 6820 7265 6469 7370 6c61 7920 636f och redisplay co │ │ │ +000049e0: 6465 2e20 2054 6865 2073 6570 6172 6174 de. The separat │ │ │ +000049f0: 655c 6e63 6f64 6520 6261 7365 7320 6174 e\ncode bases at │ │ │ +00004a00: 204c 7563 6964 2c20 5375 6e2c 2061 6e64 Lucid, Sun, and │ │ │ +00004a10: 2074 6865 2055 6e69 7665 7273 6974 7920 the University │ │ │ +00004a20: 6f66 2049 6c6c 696e 6f69 7320 7765 7265 of Illinois were │ │ │ +00004a30: 206d 6572 6765 642c 5c6e 616c 6c6f 7769 merged,\nallowi │ │ │ +00004a40: 6e67 2061 2073 696e 676c 6520 5845 6d61 ng a single XEma │ │ │ +00004a50: 6373 2074 6f20 6576 6f6c 7665 2066 726f cs to evolve fro │ │ │ +00004a60: 6d20 7468 6174 2070 6f69 6e74 206f 6e2e m that point on. │ │ │ +00004a70: 5c6e 5c6e 5375 6e20 6f72 6967 696e 616c \n\nSun original │ │ │ +00004a80: 6c79 2063 616c 6c65 6420 7468 6520 696e ly called the in │ │ │ +00004a90: 7465 6772 6174 6564 2070 726f 6475 6374 tegrated product │ │ │ +00004aa0: 2045 5241 2c20 666f 7220 5c22 456d 6163 ERA, for \"Emac │ │ │ +00004ab0: 735c 6e52 6577 7269 7474 656e 2041 6761 s\nRewritten Aga │ │ │ +00004ac0: 696e 5c22 2e20 2053 756e 5072 6f20 616e in\". SunPro an │ │ │ +00004ad0: 6420 4c75 6369 6420 6576 656e 7475 616c d Lucid eventual │ │ │ +00004ae0: 6c79 2063 616d 6520 746f 2061 6e20 6167 ly came to an ag │ │ │ +00004af0: 7265 656d 656e 745c 6e74 6f20 6669 6e64 reement\nto find │ │ │ +00004b00: 2061 206e 616d 6520 666f 7220 7468 6520 a name for the │ │ │ +00004b10: 7072 6f64 7563 7420 7468 6174 2077 6173 product that was │ │ │ +00004b20: 206e 6f74 2073 7065 6369 6669 6320 746f not specific to │ │ │ +00004b30: 2065 6974 6865 725c 6e63 6f6d 7061 6e79 either\ncompany │ │ │ +00004b40: 2e20 2041 6e20 6164 6469 7469 6f6e 616c . An additional │ │ │ +00004b50: 2063 6f6e 7374 7261 696e 7420 7468 6174 constraint that │ │ │ +00004b60: 204c 7563 6964 2070 6c61 6365 6420 6f6e Lucid placed on │ │ │ +00004b70: 2074 6865 206e 616d 6520 7761 735c 6e74 the name was\nt │ │ │ +00004b80: 6861 7420 6974 206d 7573 7420 636f 6e74 hat it must cont │ │ │ +00004b90: 6169 6e20 7468 6520 776f 7264 205c 2245 ain the word \"E │ │ │ +00004ba0: 6d61 6373 5c22 2069 6e20 6974 202d 2d20 macs\" in it -- │ │ │ +00004bb0: 7468 7573 205c 2245 5241 5c22 2077 6173 thus \"ERA\" was │ │ │ +00004bc0: 206e 6f74 5c6e 6163 6365 7074 6162 6c65 not\nacceptable │ │ │ +00004bd0: 2e20 2054 6865 2074 656e 7461 7469 7665 . The tentative │ │ │ +00004be0: 6c79 2061 6772 6565 642d 7570 6f6e 206e ly agreed-upon n │ │ │ +00004bf0: 616d 6520 7761 7320 5c22 5845 6d61 6373 ame was \"XEmacs │ │ │ +00004c00: 5c22 2c20 616e 6420 7468 6973 5c6e 6861 \", and this\nha │ │ │ +00004c10: 7320 6265 656e 2074 6865 206e 616d 6520 s been the name │ │ │ +00004c20: 6f66 2074 6865 2070 726f 6772 616d 2073 of the program s │ │ │ +00004c30: 696e 6365 2076 6572 7369 6f6e 2031 392e ince version 19. │ │ │ +00004c40: 3131 2e29 5c6e 5c6e 4173 206f 6620 3139 11.)\n\nAs of 19 │ │ │ +00004c50: 3937 2c20 5375 6e20 6973 2073 6869 7070 97, Sun is shipp │ │ │ +00004c60: 696e 6720 5845 6d61 6373 2061 7320 7061 ing XEmacs as pa │ │ │ +00004c70: 7274 206f 6620 6974 7320 4465 7665 6c6f rt of its Develo │ │ │ +00004c80: 7065 7220 5072 6f64 7563 7473 5c6e 696e per Products\nin │ │ │ +00004c90: 7465 6772 6174 6564 2070 726f 6772 616d tegrated program │ │ │ +00004ca0: 6d69 6e67 2065 6e76 6972 6f6e 6d65 6e74 ming environment │ │ │ +00004cb0: 205c 2253 756e 2057 6f72 6b53 686f 705c \"Sun WorkShop\ │ │ │ +00004cc0: 222e 2020 5375 6e20 6973 5c6e 636f 6e74 ". Sun is\ncont │ │ │ +00004cd0: 696e 7569 6e67 2074 6f20 7375 7070 6f72 inuing to suppor │ │ │ +00004ce0: 7420 5845 6d61 6373 2064 6576 656c 6f70 t XEmacs develop │ │ │ +00004cf0: 6d65 6e74 2c20 7769 7468 2066 6f63 7573 ment, with focus │ │ │ +00004d00: 206f 6e5c 6e69 6e74 6572 6e61 7469 6f6e on\ninternation │ │ │ +00004d10: 616c 697a 6174 696f 6e20 616e 6420 7175 alization and qu │ │ │ +00004d20: 616c 6974 7920 696d 7072 6f76 656d 656e ality improvemen │ │ │ +00004d30: 742e 5c6e 5c6e 2220 224c 7563 6964 2067 t.\n\n" "Lucid g │ │ │ +00004d40: 6f65 7320 756e 6465 7222 2022 5c6e 5c6e oes under" "\n\n │ │ │ +00004d50: 4172 6f75 6e64 206d 6964 2d27 3934 2c20 Around mid-'94, │ │ │ +00004d60: 4c75 6369 6420 7765 6e74 206f 7574 206f Lucid went out o │ │ │ +00004d70: 6620 6275 7369 6e65 7373 2e20 204c 7563 f business. Luc │ │ │ +00004d80: 6964 2066 6f75 6e64 6572 2052 6963 6861 id founder Richa │ │ │ +00004d90: 7264 5c6e 4761 6272 6965 6c27 7320 626f rd\nGabriel's bo │ │ │ +00004da0: 6f6b 205c 2250 6174 7465 726e 7320 6f66 ok \"Patterns of │ │ │ +00004db0: 2053 6f66 7477 6172 655c 222c 2077 6869 Software\", whi │ │ │ +00004dc0: 6368 2069 7320 6869 6768 6c79 2072 6563 ch is highly rec │ │ │ +00004dd0: 6f6d 6d65 6e64 6564 5c6e 7265 6164 696e ommended\nreadin │ │ │ +00004de0: 6720 696e 2061 6e79 2063 6173 652c 2064 g in any case, d │ │ │ +00004df0: 6f63 756d 656e 7473 2074 6865 2064 656d ocuments the dem │ │ │ +00004e00: 6973 6520 6f66 204c 7563 6964 2061 6e64 ise of Lucid and │ │ │ +00004e10: 2073 7567 6765 7374 735c 6e6c 6573 736f suggests\nlesso │ │ │ +00004e20: 6e73 2074 6f20 6265 206c 6561 726e 6564 ns to be learned │ │ │ +00004e30: 2066 6f72 2074 6865 2077 686f 6c65 2073 for the whole s │ │ │ +00004e40: 6f66 7477 6172 6520 6465 7665 6c6f 706d oftware developm │ │ │ +00004e50: 656e 7420 636f 6d6d 756e 6974 792e 5c6e ent community.\n │ │ │ +00004e60: 5c6e 4465 7665 6c6f 706d 656e 7420 6f6e \nDevelopment on │ │ │ +00004e70: 2058 456d 6163 732c 2068 6f77 6576 6572 XEmacs, however │ │ │ +00004e80: 2c20 6861 7320 636f 6e74 696e 7565 6420 , has continued │ │ │ +00004e90: 756e 6162 6174 6564 2075 6e64 6572 2074 unabated under t │ │ │ +00004ea0: 6865 5c6e 6175 7370 6963 6573 206f 6620 he\nauspices of │ │ │ +00004eb0: 5375 6e20 4d69 6372 6f73 7973 7465 6d73 Sun Microsystems │ │ │ +00004ec0: 2061 6e64 2074 6865 2055 6e69 7665 7273 and the Univers │ │ │ +00004ed0: 6974 7920 6f66 2049 6c6c 696e 6f69 732c ity of Illinois, │ │ │ +00004ee0: 2077 6974 6820 6865 6c70 5c6e 6672 6f6d with help\nfrom │ │ │ +00004ef0: 2041 6d64 6168 6c20 436f 7270 6f72 6174 Amdahl Corporat │ │ │ +00004f00: 696f 6e20 616e 6420 494e 5320 456e 6769 ion and INS Engi │ │ │ +00004f10: 6e65 6572 696e 6720 436f 7270 6f72 6174 neering Corporat │ │ │ +00004f20: 696f 6e2e 2020 5375 6e20 706c 616e 7320 ion. Sun plans │ │ │ +00004f30: 746f 5c6e 636f 6e74 696e 7565 2074 6f20 to\ncontinue to │ │ │ +00004f40: 7375 7070 6f72 7420 5845 6d61 6373 2069 support XEmacs i │ │ │ +00004f50: 6e74 6f20 7468 6520 6675 7475 7265 2e5c nto the future.\ │ │ │ +00004f60: 6e5c 6e22 2022 5468 6520 416d 6461 686c n\n" "The Amdahl │ │ │ +00004f70: 2043 6f72 706f 7261 7469 6f6e 2070 6f69 Corporation poi │ │ │ +00004f80: 6e74 206f 6620 7669 6577 2220 225c 6e5c nt of view" "\n\ │ │ │ +00004f90: 6e41 6d64 6168 6c20 436f 7270 6f72 6174 nAmdahl Corporat │ │ │ +00004fa0: 696f 6e27 7320 5374 6f72 6167 6520 5072 ion's Storage Pr │ │ │ +00004fb0: 6f64 7563 7473 2047 726f 7570 2028 5350 oducts Group (SP │ │ │ +00004fc0: 4729 2075 7365 7320 5845 6d61 6373 2061 G) uses XEmacs a │ │ │ +00004fd0: 7320 7468 655c 6e66 6f63 616c 2070 6f69 s the\nfocal poi │ │ │ +00004fe0: 6e74 206f 6620 6120 656e 7669 726f 6e6d nt of a environm │ │ │ +00004ff0: 656e 7420 666f 7220 6465 7665 6c6f 706d ent for developm │ │ │ +00005000: 656e 7420 6f66 2074 6865 206d 6963 726f ent of the micro │ │ │ +00005010: 636f 6465 2075 7365 6420 696e 5c6e 416d code used in\nAm │ │ │ +00005020: 6461 686c 2773 206c 6172 6765 2d73 6361 dahl's large-sca │ │ │ +00005030: 6c65 2064 6973 6b20 6172 7261 7973 2c20 le disk arrays, │ │ │ +00005040: 6f72 2044 4153 4427 732e 2020 5350 4720 or DASD's. SPG │ │ │ +00005050: 6861 7320 6a6f 696e 7420 7665 6e74 7572 has joint ventur │ │ │ +00005060: 6573 5c6e 7769 7468 204a 6170 616e 6573 es\nwith Japanes │ │ │ +00005070: 6520 636f 6d70 616e 6965 732c 2061 6e64 e companies, and │ │ │ +00005080: 2064 6563 6964 6564 2069 6e20 6c61 7465 decided in late │ │ │ +00005090: 2031 3939 3420 746f 2063 6f6e 7472 6163 1994 to contrac │ │ │ +000050a0: 7420 6f75 7420 666f 725c 6e77 6f72 6b20 t out for\nwork │ │ │ +000050b0: 6f6e 2058 456d 6163 7320 696e 206f 7264 on XEmacs in ord │ │ │ +000050c0: 6572 2074 6f20 6861 7374 656e 2074 6865 er to hasten the │ │ │ +000050d0: 2064 6576 656c 6f70 6d65 6e74 206f 6620 development of │ │ │ +000050e0: 4d75 6c65 2073 7570 706f 7274 5c6e 2869 Mule support\n(i │ │ │ +000050f0: 2e65 2e20 7375 7070 6f72 7420 666f 7220 .e. support for │ │ │ +00005100: 4a61 7061 6e65 7365 2c20 4368 696e 6573 Japanese, Chines │ │ │ +00005110: 652c 2065 7463 2e29 2069 6e20 5845 6d61 e, etc.) in XEma │ │ │ +00005120: 6373 2061 6e64 2061 7320 6120 6765 7374 cs and as a gest │ │ │ +00005130: 7572 655c 6e6f 6620 676f 6f64 7769 6c6c ure\nof goodwill │ │ │ +00005140: 2074 6f77 6172 6473 2074 6865 2058 456d towards the XEm │ │ │ +00005150: 6163 7320 636f 6d6d 756e 6974 7920 666f acs community fo │ │ │ +00005160: 7220 616c 6c20 7468 6520 776f 726b 2074 r all the work t │ │ │ +00005170: 6865 7920 6861 7665 5c6e 646f 6e65 206f hey have\ndone o │ │ │ +00005180: 6e20 6d61 6b69 6e67 2061 2070 6f77 6572 n making a power │ │ │ +00005190: 6675 6c2c 206d 6f64 6572 6e2c 2066 7265 ful, modern, fre │ │ │ +000051a0: 656c 7920 6176 6169 6c61 626c 6520 7465 ely available te │ │ │ +000051b0: 7874 2065 6469 746f 722e 5c6e 5468 726f xt editor.\nThro │ │ │ +000051c0: 7567 6820 7468 6973 2063 6f6e 7472 6163 ugh this contrac │ │ │ +000051d0: 742c 2041 6d64 6168 6c20 7072 6f76 6964 t, Amdahl provid │ │ │ +000051e0: 6564 2061 206c 6172 6765 2061 6d6f 756e ed a large amoun │ │ │ +000051f0: 7420 6f66 2077 6f72 6b20 696e 5c6e 5845 t of work in\nXE │ │ │ +00005200: 6d61 6373 2069 6e20 7468 6520 666f 726d macs in the form │ │ │ +00005210: 206f 6620 7265 7772 6974 696e 6720 7468 of rewriting th │ │ │ +00005220: 6520 6261 7369 6320 7465 7874 2d70 726f e basic text-pro │ │ │ +00005230: 6365 7373 696e 6720 6d65 6368 616e 6973 cessing mechanis │ │ │ +00005240: 6d73 5c6e 746f 2061 6c6c 6f77 2066 6f72 ms\nto allow for │ │ │ +00005250: 204d 756c 6520 7375 7070 6f72 7420 616e Mule support an │ │ │ +00005260: 6420 7772 6974 696e 6720 6120 6c61 7267 d writing a larg │ │ │ +00005270: 6520 616d 6f75 6e74 206f 6620 7468 6520 e amount of the │ │ │ +00005280: 7375 7070 6f72 745c 6e66 6f72 206d 756c support\nfor mul │ │ │ +00005290: 7469 706c 6520 6465 7669 6365 732e 5c6e tiple devices.\n │ │ │ +000052a0: 5c6e 416c 7468 6f75 6768 2041 6d64 6168 \nAlthough Amdah │ │ │ +000052b0: 6c20 6973 206e 6f20 6c6f 6e67 6572 2068 l is no longer h │ │ │ +000052c0: 6972 696e 6720 6120 6675 6c6c 2d74 696d iring a full-tim │ │ │ +000052d0: 6520 636f 6e74 7261 6374 6f72 2c20 7468 e contractor, th │ │ │ +000052e0: 6579 2061 7265 5c6e 7374 696c 6c20 6675 ey are\nstill fu │ │ │ +000052f0: 6e64 696e 6720 7061 7274 2d74 696d 6520 nding part-time │ │ │ +00005300: 776f 726b 206f 6e20 5845 6d61 6373 2061 work on XEmacs a │ │ │ +00005310: 6e64 2070 726f 7669 6469 6e67 2072 6573 nd providing res │ │ │ +00005320: 6f75 7263 6573 2066 6f72 5c6e 6675 7274 ources for\nfurt │ │ │ +00005330: 6865 7220 5845 6d61 6373 2064 6576 656c her XEmacs devel │ │ │ +00005340: 6f70 6d65 6e74 2e5c 6e5c 6e22 2022 5468 opment.\n\n" "Th │ │ │ +00005350: 6520 494e 5320 456e 6769 6e65 6572 696e e INS Engineerin │ │ │ +00005360: 6720 706f 696e 7420 6f66 2076 6965 7722 g point of view" │ │ │ +00005370: 2022 5c6e 5c6e 494e 5320 456e 6769 6e65 "\n\nINS Engine │ │ │ +00005380: 6572 696e 6720 436f 7270 6f72 6174 696f ering Corporatio │ │ │ +00005390: 6e2c 2062 6173 6564 2069 6e20 546f 6b79 n, based in Toky │ │ │ +000053a0: 6f2c 2062 6f75 6768 7420 7269 6768 7473 o, bought rights │ │ │ +000053b0: 2074 6f20 7365 6c6c 5c6e 456e 6572 6769 to sell\nEnergi │ │ │ +000053c0: 7a65 2077 6865 6e20 4c75 6369 6420 7765 ze when Lucid we │ │ │ +000053d0: 6e74 206f 7574 206f 6620 6275 7369 6e65 nt out of busine │ │ │ +000053e0: 7373 2e20 2055 6e68 6170 7079 2077 6974 ss. Unhappy wit │ │ │ +000053f0: 6820 7468 655c 6e70 6572 666f 726d 616e h the\nperforman │ │ │ +00005400: 6365 206f 6620 7468 6520 4a61 7061 6e65 ce of the Japane │ │ │ +00005410: 7365 2073 7570 706f 7274 2069 6e20 5845 se support in XE │ │ │ +00005420: 6d61 6373 2031 392e 3131 2c20 494e 5320 macs 19.11, INS │ │ │ +00005430: 616c 736f 5c6e 636f 6e74 7269 6275 7465 also\ncontribute │ │ │ +00005440: 6420 746f 2074 6865 2058 456d 6163 7320 d to the XEmacs │ │ │ +00005450: 6465 7665 6c6f 706d 656e 7420 6672 6f6d development from │ │ │ +00005460: 206c 6174 6520 3139 3934 2074 6f20 6561 late 1994 to ea │ │ │ +00005470: 726c 795c 6e31 3939 352e 5c6e 2220 6162 rly\n1995.\n" ab │ │ │ +00005480: 6f75 742d 6669 6e69 7368 2d62 7566 6665 out-finish-buffe │ │ │ +00005490: 725d 2031 335d 290a 2864 6566 616c 6961 r] 13]).(defalia │ │ │ +000054a0: 7320 2761 626f 7574 2d61 6476 616e 7461 s 'about-advanta │ │ │ +000054b0: 6765 7320 235b 2826 7265 7374 2069 676e ges #[(&rest ign │ │ │ +000054c0: 6f72 6529 2022 c1c2 213f ad94 c318 c4c5 ore) "..!?...... │ │ │ +000054d0: c608 21c7 08c8 5c22 2388 29c4 c921 88ca ..!...\"#.)..!.. │ │ │ +000054e0: 2087 2220 5b74 6974 6c65 2061 626f 7574 ." [title about │ │ │ +000054f0: 2d67 6574 2d62 7566 6665 7220 222a 4162 -get-buffer "*Ab │ │ │ +00005500: 6f75 7420 4164 7661 6e74 6167 6573 2a22 out Advantages*" │ │ │ +00005510: 2022 5845 6d61 6373 2041 6476 616e 7461 "XEmacs Advanta │ │ │ +00005520: 6765 7320 6f76 6572 2047 4e55 2045 6d61 ges over GNU Ema │ │ │ +00005530: 6373 2220 7769 6467 6574 2d69 6e73 6572 cs" widget-inser │ │ │ +00005540: 7420 225c 6e22 2061 626f 7574 2d63 656e t "\n" about-cen │ │ │ +00005550: 7465 7220 6162 6f75 742d 7769 7468 2d66 ter about-with-f │ │ │ +00005560: 6163 6520 626f 6c64 2022 5c6e 5c6e 2a20 ace bold "\n\n* │ │ │ +00005570: 4d75 6368 2062 6574 7465 7220 4755 4920 Much better GUI │ │ │ +00005580: 7375 7070 6f72 743a 5c6e 5c6e 2020 2d2d support:\n\n -- │ │ │ +00005590: 2061 2072 6561 6c20 746f 6f6c 6261 725c a real toolbar\ │ │ │ +000055a0: 6e20 202d 2d20 6d6f 7265 2063 6f6d 7072 n -- more compr │ │ │ +000055b0: 6568 656e 7369 7665 2061 6e64 2062 6574 ehensive and bet │ │ │ +000055c0: 7465 722d 6465 7369 676e 6564 206d 656e ter-designed men │ │ │ +000055d0: 7562 6172 735c 6e20 202d 2d20 686f 7269 ubars\n -- hori │ │ │ +000055e0: 7a6f 6e74 616c 2061 6e64 2076 6572 7469 zontal and verti │ │ │ +000055f0: 6361 6c20 7363 726f 6c6c 6261 7273 2069 cal scrollbars i │ │ │ +00005600: 6e20 616c 6c20 7769 6e64 6f77 735c 6e20 n all windows\n │ │ │ +00005610: 202d 2d20 7072 6f70 6572 2064 6961 6c6f -- proper dialo │ │ │ +00005620: 6720 626f 7865 735c 6e20 202d 2d20 7461 g boxes\n -- ta │ │ │ +00005630: 6273 2066 6f72 2073 656c 6563 7469 6e67 bs for selecting │ │ │ +00005640: 2062 7566 6665 7273 5c6e 2020 2d2d 2073 buffers\n -- s │ │ │ +00005650: 7570 706f 7274 2066 6f72 2076 6172 6961 upport for varia │ │ │ +00005660: 626c 652d 7769 6474 6820 616e 6420 7661 ble-width and va │ │ │ +00005670: 7269 6162 6c65 2068 6569 6768 7420 666f riable height fo │ │ │ +00005680: 6e74 735c 6e20 202d 2d20 7375 7070 6f72 nts\n -- suppor │ │ │ +00005690: 7420 666f 7220 6172 6269 7472 6172 7920 t for arbitrary │ │ │ +000056a0: 7069 786d 6170 7320 616e 6420 7769 6467 pixmaps and widg │ │ │ +000056b0: 6574 7320 696e 2061 2062 7566 6665 725c ets in a buffer\ │ │ │ +000056c0: 6e20 202d 2d20 6661 6365 2073 7570 706f n -- face suppo │ │ │ +000056d0: 7274 206f 6e20 5454 5927 732c 2069 6e63 rt on TTY's, inc │ │ │ +000056e0: 6c75 6469 6e67 2063 6f6c 6f72 5c6e 5c6e luding color\n\n │ │ │ +000056f0: 2a20 416e 2069 6e73 7461 6c6c 6162 6c65 * An installable │ │ │ +00005700: 2070 6163 6b61 6765 2073 7973 7465 6d2c package system, │ │ │ +00005710: 2077 6974 6820 6120 6875 6765 206e 756d with a huge num │ │ │ +00005720: 6265 7220 6f66 2070 6163 6b61 6765 7320 ber of packages │ │ │ +00005730: 6176 6169 6c61 626c 655c 6e20 2074 6861 available\n tha │ │ │ +00005740: 7420 6861 7665 2062 6565 6e20 7465 7374 t have been test │ │ │ +00005750: 6564 2061 6e64 2061 7265 206b 6e6f 776e ed and are known │ │ │ +00005760: 2074 6f20 776f 726b 2077 6974 6820 7468 to work with th │ │ │ +00005770: 6520 6c61 7465 7374 2076 6572 7369 6f6e e latest version │ │ │ +00005780: 5c6e 2020 6f66 2058 456d 6163 732e 5c6e \n of XEmacs.\n │ │ │ +00005790: 5c6e 2a20 436f 6d70 7265 6865 6e73 6976 \n* Comprehensiv │ │ │ +000057a0: 6520 7375 7070 6f72 7420 666f 7220 7468 e support for th │ │ │ +000057b0: 6520 4754 4b20 746f 6f6c 6b69 742e 5c6e e GTK toolkit.\n │ │ │ +000057c0: 5c6e 2a20 416e 206f 7065 6e20 6465 7665 \n* An open deve │ │ │ +000057d0: 6c6f 706d 656e 7420 636f 6d6d 756e 6974 lopment communit │ │ │ +000057e0: 792c 2077 6974 6820 636f 6e74 7269 6275 y, with contribu │ │ │ +000057f0: 7469 6f6e 7320 7765 6c63 6f6d 6520 616e tions welcome an │ │ │ +00005800: 6420 6e6f 206e 6565 645c 6e20 2074 6f20 d no need\n to │ │ │ +00005810: 7369 676e 206f 7665 7220 796f 7572 2063 sign over your c │ │ │ +00005820: 6f70 7972 6967 6874 2074 6f20 616e 7920 opyright to any │ │ │ +00005830: 6f72 6761 6e69 7a61 7469 6f6e 2e20 2850 organization. (P │ │ │ +00005840: 6c65 6173 6520 7365 6e64 5c6e 2020 636f lease send\n co │ │ │ +00005850: 6e74 7269 6275 7469 6f6e 7320 746f 2078 ntributions to x │ │ │ +00005860: 656d 6163 732d 7061 7463 6865 7340 7865 emacs-patches@xe │ │ │ +00005870: 6d61 6373 2e6f 7267 2e20 2053 6565 2068 macs.org. See h │ │ │ +00005880: 7474 703a 2f2f 7777 772e 7865 6d61 6373 ttp://www.xemacs │ │ │ +00005890: 2e6f 7267 5c6e 2020 666f 7220 6d6f 7265 .org\n for more │ │ │ +000058a0: 2069 6e66 6f72 6d61 7469 6f6e 206f 6e20 information on │ │ │ +000058b0: 5845 6d61 6373 206d 6169 6c69 6e67 206c XEmacs mailing l │ │ │ +000058c0: 6973 7473 2c20 616e 6420 6f74 6865 7220 ists, and other │ │ │ +000058d0: 696e 666f 2e29 5c6e 5c6e 2a20 5375 7070 info.)\n\n* Supp │ │ │ +000058e0: 6f72 7420 666f 7220 6469 7370 6c61 7920 ort for display │ │ │ +000058f0: 6f6e 206d 756c 7469 706c 6520 7369 6d75 on multiple simu │ │ │ +00005900: 6c74 616e 656f 7573 2058 2061 6e64 2f6f ltaneous X and/o │ │ │ +00005910: 7220 5454 5920 6465 7669 6365 732e 5c6e r TTY devices.\n │ │ │ +00005920: 5c6e 2a20 506f 7765 7266 756c 2c20 666c \n* Powerful, fl │ │ │ +00005930: 6578 6962 6c65 2063 6f6e 7472 6f6c 206f exible control o │ │ │ +00005940: 7665 7220 7468 6520 6469 7370 6c61 7920 ver the display │ │ │ +00005950: 6368 6172 6163 7465 7269 7374 6963 7320 characteristics │ │ │ +00005960: 6f66 206d 6f73 745c 6e20 206f 6620 7468 of most\n of th │ │ │ +00005970: 6520 7669 7375 616c 2061 7370 6563 7473 e visual aspects │ │ │ +00005980: 206f 6620 5845 6d61 6373 2074 6872 6f75 of XEmacs throu │ │ │ +00005990: 6768 2074 6865 2075 7365 206f 6620 7370 gh the use of sp │ │ │ +000059a0: 6563 6966 6965 7273 2c20 7768 6963 685c ecifiers, which\ │ │ │ +000059b0: 6e20 2061 6c6c 6f77 2073 6570 6172 6174 n allow separat │ │ │ +000059c0: 6520 7661 6c75 6573 2074 6f20 6265 2073 e values to be s │ │ │ +000059d0: 7065 6369 6669 6564 2066 6f72 2069 6e64 pecified for ind │ │ │ +000059e0: 6976 6964 7561 6c20 6275 6666 6572 732c ividual buffers, │ │ │ +000059f0: 5c6e 2020 7769 6e64 6f77 732c 2066 7261 \n windows, fra │ │ │ +00005a00: 6d65 732c 2064 6576 6963 6573 2c20 6465 mes, devices, de │ │ │ +00005a10: 7669 6365 2063 6c61 7373 6573 2c20 616e vice classes, an │ │ │ +00005a20: 6420 6465 7669 6365 2074 7970 6573 2e5c d device types.\ │ │ │ +00005a30: 6e5c 6e2a 2041 2063 6c65 616e 2c20 6d6f n\n* A clean, mo │ │ │ +00005a40: 6465 726e 2c20 6162 7374 7261 6374 6564 dern, abstracted │ │ │ +00005a50: 204c 6973 7020 696e 7465 7266 6163 6520 Lisp interface │ │ │ +00005a60: 746f 2074 6865 206d 656e 7562 6172 2c20 to the menubar, │ │ │ +00005a70: 746f 6f6c 6261 722c 5c6e 2020 7769 6e64 toolbar,\n wind │ │ │ +00005a80: 6f77 2d73 7973 7465 6d20 6576 656e 7473 ow-system events │ │ │ +00005a90: 2c20 6b65 7920 636f 6d62 696e 6174 696f , key combinatio │ │ │ +00005aa0: 6e73 2c20 6578 7465 6e74 7320 2872 6567 ns, extents (reg │ │ │ +00005ab0: 696f 6e73 2069 6e20 6120 6275 6666 6572 ions in a buffer │ │ │ +00005ac0: 5c6e 2020 7769 7468 2073 7065 6369 6669 \n with specifi │ │ │ +00005ad0: 6320 7072 6f70 6572 7469 6573 292c 2061 c properties), a │ │ │ +00005ae0: 6e64 2061 6c6c 206f 7468 6572 2064 6973 nd all other dis │ │ │ +00005af0: 706c 6179 2061 7370 6563 7473 2e5c 6e5c play aspects.\n\ │ │ │ +00005b00: 6e2a 2050 726f 7065 7220 696e 7465 6772 n* Proper integr │ │ │ +00005b10: 6174 696f 6e20 7769 7468 2058 7420 616e ation with Xt an │ │ │ +00005b20: 6420 4d6f 7469 6620 2869 6e63 6c75 6469 d Motif (includi │ │ │ +00005b30: 6e67 204d 6f74 6966 206d 656e 7562 6172 ng Motif menubar │ │ │ +00005b40: 7320 616e 645c 6e20 2073 6372 6f6c 6c62 s and\n scrollb │ │ │ +00005b50: 6172 7329 2e20 204d 6f74 6966 206c 6f6f ars). Motif loo │ │ │ +00005b60: 6b2d 616c 696b 6520 6d65 6e75 6261 7273 k-alike menubars │ │ │ +00005b70: 2061 6e64 2073 6372 6f6c 6c62 6172 7320 and scrollbars │ │ │ +00005b80: 6172 6520 7072 6f76 6964 6564 5c6e 2020 are provided\n │ │ │ +00005b90: 666f 7220 7468 6f73 6520 7379 7374 656d for those system │ │ │ +00005ba0: 7320 7769 7468 6f75 7420 7265 616c 204d s without real M │ │ │ +00005bb0: 6f74 6966 2073 7570 706f 7274 2e5c 6e5c otif support.\n\ │ │ │ +00005bc0: 6e2a 204d 616e 7920 696d 7072 6f76 656d n* Many improvem │ │ │ +00005bd0: 656e 7473 2074 6f20 7468 6520 6d75 6c74 ents to the mult │ │ │ +00005be0: 696c 696e 6775 616c 2073 7570 706f 7274 ilingual support │ │ │ +00005bf0: 2c20 7375 6368 2061 7320 7468 6520 6162 , such as the ab │ │ │ +00005c00: 696c 6974 7920 746f 5c6e 2020 656e 7465 ility to\n ente │ │ │ +00005c10: 7220 7465 7874 2066 6f72 2063 6f6d 706c r text for compl │ │ │ +00005c20: 6578 206c 616e 6775 6167 6573 2075 7369 ex languages usi │ │ │ +00005c30: 6e67 2074 6865 2058 494d 206d 6563 6861 ng the XIM mecha │ │ │ +00005c40: 6e69 736d 2061 6e64 5c6e 2020 6c6f 6361 nism and\n loca │ │ │ +00005c50: 6c69 7a61 7469 6f6e 206f 6620 6d65 6e75 lization of menu │ │ │ +00005c60: 6261 7220 7465 7874 2066 6f72 2074 6865 bar text for the │ │ │ +00005c70: 204a 6170 616e 6573 6520 6c6f 6361 6c65 Japanese locale │ │ │ +00005c80: 2e5c 6e5c 6e5c 6e22 2061 626f 7574 2d66 .\n\n\n" about-f │ │ │ +00005c90: 696e 6973 682d 6275 6666 6572 5d20 365d inish-buffer] 6] │ │ │ +00005ca0: 290a 2340 3135 2043 6163 6865 6420 676c ).#@15 Cached gl │ │ │ +00005cb0: 7970 6873 1f0a 2864 6566 7661 7220 6162 yphs..(defvar ab │ │ │ +00005cc0: 6f75 742d 676c 7970 6873 206e 696c 2028 out-glyphs nil ( │ │ │ +00005cd0: 2324 202e 2032 3337 3139 2929 0a28 6465 #$ . 23719)).(de │ │ │ +00005ce0: 6661 6c69 6173 2027 6162 6f75 742d 6d61 falias 'about-ma │ │ │ +00005cf0: 696e 7461 696e 6572 2d67 6c79 7068 2023 intainer-glyph # │ │ │ +00005d00: 5b28 7768 6f29 2022 5c6e 09b7 4189 1cac [(who) "\n..A... │ │ │ +00005d10: f5c5 c65c 6e21 c720 c873 ab83 c9aa 81ca ...\n!. .s...... │ │ │ +00005d20: cb51 cccd 215c 22ce 1b18 0b3b ab9e cfd0 .Q..!\"....;.... │ │ │ +00005d30: d121 ab8f d2d3 d1d4 0b45 5c22 d3d5 d4d6 .!.......E\".... │ │ │ +00005d40: 2344 aa86 d3d5 d4d6 2343 21aa ae0b d761 #D......#C!....a │ │ │ +00005d50: ab85 cfd8 21aa a408 ab9e cfd0 d121 ab8f ....!........!.. │ │ │ +00005d60: d2d3 d1d9 0845 5c22 d3d5 d4d6 2344 aa86 .....E\"....#D.. │ │ │ +00005d70: d3d5 d4d6 2343 21aa 83cf da21 14db 0cdc ....#C!....!.... │ │ │ +00005d80: dd23 885c 6e0c 4209 4211 2a0c 2987 2220 .#.\n.B.B.*.)." │ │ │ +00005d90: 5b66 696c 6520 6162 6f75 742d 676c 7970 [file about-glyp │ │ │ +00005da0: 6873 2077 686f 2064 6174 6120 676c 7970 hs who data glyp │ │ │ +00005db0: 6820 6578 7061 6e64 2d66 696c 652d 6e61 h expand-file-na │ │ │ +00005dc0: 6d65 2073 796d 626f 6c2d 6e61 6d65 2064 me symbol-name d │ │ │ +00005dd0: 6576 6963 652d 636c 6173 7320 2863 6f6c evice-class (col │ │ │ +00005de0: 6f72 2067 7261 7973 6361 6c65 2920 2222 or grayscale) "" │ │ │ +00005df0: 2022 6d22 2022 2e70 6e67 2220 6c6f 6361 "m" ".png" loca │ │ │ +00005e00: 7465 2d64 6174 612d 6469 7265 6374 6f72 te-data-director │ │ │ +00005e10: 7920 2270 686f 746f 7322 206e 696c 206d y "photos" nil m │ │ │ +00005e20: 616b 652d 676c 7970 6820 6665 6174 7572 ake-glyph featur │ │ │ +00005e30: 6570 2070 6e67 2061 7070 6c79 2076 6563 ep png apply vec │ │ │ +00005e40: 746f 7220 3a64 6174 6120 7374 7269 6e67 tor :data string │ │ │ +00005e50: 2022 5b49 6d61 6765 5d22 2065 7272 6f72 "[Image]" error │ │ │ +00005e60: 205b 7374 7269 6e67 203a 6461 7461 2022 [string :data " │ │ │ +00005e70: 5b45 7272 6f72 5d22 5d20 3a66 696c 6520 [Error]"] :file │ │ │ +00005e80: 5b6e 6f74 6869 6e67 5d20 7365 742d 676c [nothing] set-gl │ │ │ +00005e90: 7970 682d 7072 6f70 6572 7479 2062 6173 yph-property bas │ │ │ +00005ea0: 656c 696e 6520 3130 305d 2037 5d29 0a28 eline 100] 7]).( │ │ │ +00005eb0: 6465 6661 6c69 6173 2027 6162 6f75 742d defalias 'about- │ │ │ +00005ec0: 7065 7273 6f6e 616c 2d69 6e66 6f20 235b personal-info #[ │ │ │ +00005ed0: 2865 6e74 7279 2920 2209 40c2 61ab 84c3 (entry) ".@.a... │ │ │ +00005ee0: c421 8709 40c5 61ab 88c3 c621 88c3 c721 .!..@.a....!...! │ │ │ +00005ef0: 8709 40c8 61ab 8ec3 c921 88ca c8cb cc23 ..@.a....!.....# │ │ │ +00005f00: 88c3 c721 8709 40cd 61ab 8ec3 ce21 88ca ...!..@.a....!.. │ │ │ +00005f10: cdcb cf23 88c3 c721 8709 40d0 61ab 8ec3 ...#...!..@.a... │ │ │ +00005f20: d121 88ca d0cb d223 88c3 d321 8709 40d4 .!.....#...!..@. │ │ │ +00005f30: 61ab 9cc3 d521 88c3 d621 88ca d7cb d823 a....!...!.....# │ │ │ +00005f40: 88c3 d921 88ca d4cb da23 88c3 d321 8709 ...!.....#...!.. │ │ │ +00005f50: 40db 61ab 84c3 dc21 8709 40dd 61ab 84c3 @.a....!..@.a... │ │ │ +00005f60: c421 8709 40de 61ab 84c3 df21 8709 40e0 .!..@.a....!..@. │ │ │ +00005f70: 61ab 84c3 c421 8709 40e1 61ab 84c3 e221 a....!..@.a....! │ │ │ +00005f80: 8709 40e3 61ab 86ca e3cb e423 8709 40e5 ..@.a......#..@. │ │ │ +00005f90: 61ab 84c3 c421 8709 40e6 61ab 84c3 e721 a....!..@.a....! │ │ │ +00005fa0: 8709 40e8 61ab 84c3 c421 8709 40e9 61ab ..@.a....!..@.a. │ │ │ +00005fb0: 8ec3 ea21 88ca e9cb eb23 88c3 c721 8709 ...!.....#...!.. │ │ │ +00005fc0: 40ec 61ab 8ec3 ed21 88ca eccb ee23 88c3 @.a....!.....#.. │ │ │ +00005fd0: c721 8709 40ef 61ab 9cc3 f021 88c3 f121 .!..@.a....!...! │ │ │ +00005fe0: 88ca efcb f223 88c3 f321 88ca f4cb f523 .....#...!.....# │ │ │ +00005ff0: 88c3 d321 8709 40f6 61ab 84c3 c421 8709 ...!..@.a....!.. │ │ │ +00006000: 40f7 61ab 9cc3 f821 88c3 f921 88ca facb @.a....!...!.... │ │ │ +00006010: fb23 88c3 fc21 88ca f7cb fd23 88c3 d321 .#...!.....#...! │ │ │ +00006020: 8709 40fe 61ab 96c3 ff21 88ca 8140 0081 ..@.a....!...@.. │ │ │ +00006030: 4100 8142 0023 88c3 8143 0021 8709 4081 A..B.#...C.!..@. │ │ │ +00006040: 4400 61ab 84c3 c421 8709 4081 4500 61ab D.a....!..@.E.a. │ │ │ +00006050: 84c3 c421 8709 4081 4600 61ab 84c3 c421 ...!..@.F.a....! │ │ │ +00006060: 8709 4081 4700 61ab 84c3 c421 8709 4081 ..@.G.a....!..@. │ │ │ +00006070: 4800 61ab fec3 8149 0021 88ca 814a 0081 H.a....I.!...J.. │ │ │ +00006080: 4b00 814c 0023 8881 4d00 814e 0081 4f00 K..L.#..M..N..O. │ │ │ +00006090: 8150 0081 5100 5c22 5c22 18c3 814d 0081 .P..Q.\"\"...M.. │ │ │ +000060a0: 5200 085c 2221 8829 c381 5300 2188 ca81 R..\"!.)..S.!... │ │ │ +000060b0: 5400 8155 0081 5600 2388 c381 5700 2188 T..U..V.#...W.!. │ │ │ +000060c0: ca81 5800 8159 0081 5a00 2388 c381 5b00 ..X..Y..Z.#...[. │ │ │ +000060d0: 2188 ca81 5c5c 0081 5d00 815e 0023 88c3 !...\\..]..^.#.. │ │ │ +000060e0: 815f 0021 88ca 8160 0081 6100 8162 0023 ._.!...`..a..b.# │ │ │ +000060f0: 88c3 8163 0021 8709 4081 6400 61ab 86c3 ...c.!..@.d.a... │ │ │ +00006100: 8165 0021 8709 4081 6600 61ab 86c3 8167 .e.!..@.f.a....g │ │ │ +00006110: 0021 8709 4081 6800 61ab 94c3 8169 0021 .!..@.h.a....i.! │ │ │ +00006120: 88ca 8168 00cb 816a 0023 88c3 c721 8709 ...h...j.#...!.. │ │ │ +00006130: 4081 6b00 61ab 86c3 816c 0021 8709 4081 @.k.a....l.!..@. │ │ │ +00006140: 6d00 61ab 94c3 816e 0021 88ca 816d 00cb m.a....n.!...m.. │ │ │ +00006150: 816f 0023 88c3 c721 8709 4081 7000 61ab .o.#...!..@.p.a. │ │ │ +00006160: 86c3 8171 0021 8709 4081 7200 61ab 8ac3 ...q.!..@.r.a... │ │ │ +00006170: 8173 0021 88c3 c721 8709 4081 7400 61ab .s.!...!..@.t.a. │ │ │ +00006180: 86c3 8175 0021 8709 4081 7600 61ab 94c3 ...u.!..@.v.a... │ │ │ +00006190: 8177 0021 88ca 8176 00cb 8178 0023 88c3 .w.!...v...x.#.. │ │ │ +000061a0: d321 8709 4081 7900 61ab cdc3 817a 0081 .!..@.y.a....z.. │ │ │ +000061b0: 7b00 817c 0081 7d00 5c22 817e 0023 88ca {..|..}.\".~.#.. │ │ │ +000061c0: 817f 0081 8000 8181 0023 88c3 8182 0021 .........#.....! │ │ │ +000061d0: 88ca 8183 0081 8400 8185 0023 88c3 8186 ...........#.... │ │ │ +000061e0: 0021 88c3 8187 0021 88ca 8179 0081 8800 .!.....!...y.... │ │ │ +000061f0: 8189 0023 88c3 c721 8709 4081 8a00 61ab ...#...!..@...a. │ │ │ +00006200: 94c3 818b 0021 88ca 818a 00cb 818c 0023 .....!.........# │ │ │ +00006210: 88c3 c721 8709 4081 8d00 61ab 84c3 c421 ...!..@...a....! │ │ │ +00006220: 8709 4081 8e00 61ab 94c3 818f 0021 88ca ..@...a......!.. │ │ │ +00006230: 818e 00cb 8190 0023 88c3 c721 8709 4081 .......#...!..@. │ │ │ +00006240: 9100 61ab 94c3 8192 0021 88ca 8191 00cb ..a......!...... │ │ │ +00006250: 8193 0023 88c3 c721 8709 4081 9400 61ab ...#...!..@...a. │ │ │ +00006260: 96c3 8195 0021 88ca 8194 00cb 8196 0023 .....!.........# │ │ │ +00006270: 88c3 8197 0021 8709 4081 9800 61ab 86c3 .....!..@...a... │ │ │ +00006280: 8199 0021 8709 4081 9a00 61ab 84c3 c421 ...!..@...a....! │ │ │ +00006290: 8709 4081 9b00 61ab 86c3 819c 0021 8709 ..@...a......!.. │ │ │ +000062a0: 4081 9d00 61ab 86c3 819e 0021 8709 4081 @...a......!..@. │ │ │ +000062b0: 9f00 61ab 86c3 81a0 0021 8709 4081 a100 ..a......!..@... │ │ │ +000062c0: 61ab 94c3 81a2 0021 88ca 81a1 00cb 81a3 a......!........ │ │ │ +000062d0: 0023 88c3 c721 8709 4081 a400 61ab 84c3 .#...!..@...a... │ │ │ +000062e0: c421 8709 4081 a500 61ab 86c3 81a6 0021 .!..@...a......! │ │ │ +000062f0: 8709 4081 a700 61ab 86c3 81a8 0021 8709 ..@...a......!.. │ │ │ +00006300: 4081 a900 61ab 94c3 81aa 0021 88ca 81a9 @...a......!.... │ │ │ +00006310: 00cb 81ab 0023 88c3 c721 8709 4081 ac00 .....#...!..@... │ │ │ +00006320: 61ab 96c3 81ad 0021 88ca 81ac 00cb 81ae a......!........ │ │ │ +00006330: 0023 88c3 81af 0021 8709 4081 b000 61ab .#.....!..@...a. │ │ │ +00006340: 84c3 c421 8709 4081 b100 61ab 86c3 81b2 ...!..@...a..... │ │ │ +00006350: 0021 8709 4081 b300 61ab 84c3 c421 8709 .!..@...a....!.. │ │ │ +00006360: 4081 b400 61ab 94c3 81b5 0021 88ca 81b4 @...a......!.... │ │ │ +00006370: 00cb 81b6 0023 88c3 c721 8709 4081 b700 .....#...!..@... │ │ │ +00006380: 61ab 8ac3 81b8 0021 88c3 c721 8709 4081 a......!...!..@. │ │ │ +00006390: b900 61ab 86c3 81ba 0021 8709 4081 bb00 ..a......!..@... │ │ │ +000063a0: 61ab 86c3 81bc 0021 8709 4081 bd00 61ab a......!..@...a. │ │ │ +000063b0: 90c3 81be 0021 88ca 81bd 00cb 81bf 0023 .....!.........# │ │ │ +000063c0: 8709 4081 c000 61ab 86c3 81c1 0021 8709 ..@...a......!.. │ │ │ +000063d0: 4081 c200 61ab 84c3 c421 8709 4081 c300 @...a....!..@... │ │ │ +000063e0: 61ab 84c3 c421 8709 4081 c400 61ab 86c3 a....!..@...a... │ │ │ +000063f0: 81c5 0021 8709 4081 c600 61ab 96c3 81c7 ...!..@...a..... │ │ │ +00006400: 0021 88ca 81c6 00cb 81c8 0023 88c3 81c9 .!.........#.... │ │ │ +00006410: 0021 8709 4081 ca00 61ab 94c3 81cb 0021 .!..@...a......! │ │ │ +00006420: 88ca 81ca 00cb 81cc 0023 88c3 c721 8709 .........#...!.. │ │ │ +00006430: 4081 cd00 61ab 86c3 81ce 0021 8709 4081 @...a......!..@. │ │ │ +00006440: cf00 61ab 84c3 c421 8709 4081 d000 61ab ..a....!..@...a. │ │ │ +00006450: 94c3 81d1 0021 88ca 81d0 00cb 81d2 0023 .....!.........# │ │ │ +00006460: 88c3 c721 8781 d300 81d4 0009 4081 d500 ...!........@... │ │ │ +00006470: 2388 cb87 2220 5b6d 7565 6e63 6865 6e20 #..." [muenchen │ │ │ +00006480: 656e 7472 7920 6164 7269 616e 2077 6964 entry adrian wid │ │ │ +00006490: 6765 742d 696e 7365 7274 2022 536f 7272 get-insert "Sorr │ │ │ +000064a0: 792c 206e 6f20 7065 7273 6f6e 616c 2069 y, no personal i │ │ │ +000064b0: 6e66 6f72 6d61 7469 6f6e 2061 7661 696c nformation avail │ │ │ +000064c0: 6162 6c65 2061 626f 7574 206d 6520 7965 able about me ye │ │ │ +000064d0: 742e 5c6e 2220 616a 2022 4927 6d20 6120 t.\n" aj "I'm a │ │ │ +000064e0: 736f 6674 7761 7265 2064 6576 656c 6f70 software develop │ │ │ +000064f0: 6572 2077 6f72 6b69 6e67 2066 6f72 2074 er working for t │ │ │ +00006500: 6865 2053 7553 4520 4c61 6273 206f 6620 he SuSE Labs of │ │ │ +00006510: 7468 6520 4c69 6e75 785c 6e64 6973 7472 the Linux\ndistr │ │ │ +00006520: 6962 7574 6f72 2053 7553 452e 2020 4d79 ibutor SuSE. My │ │ │ +00006530: 206d 6169 6e20 7461 736b 2069 7320 746f main task is to │ │ │ +00006540: 2069 6d70 726f 7665 2074 6865 2047 4e55 improve the GNU │ │ │ +00006550: 2043 206c 6962 7261 7279 2e22 2022 2e5c C library." ".\ │ │ │ +00006560: 6e22 2061 6a63 2022 5768 656e 206e 6f74 n" ajc "When not │ │ │ +00006570: 2068 656c 7069 6e67 206d 6169 6e74 6169 helping maintai │ │ │ +00006580: 6e20 7468 6520 5845 6d61 6373 2077 6562 n the XEmacs web │ │ │ +00006590: 7369 7465 2c20 416e 6472 6577 2069 7320 site, Andrew is │ │ │ +000065a0: 6120 4e65 7477 6f72 6b5c 6e53 6f66 7477 a Network\nSoftw │ │ │ +000065b0: 6172 6520 456e 6769 6e65 6572 2874 6d29 are Engineer(tm) │ │ │ +000065c0: 2066 6f72 204d 6f6e 6173 6820 556e 6976 for Monash Univ │ │ │ +000065d0: 6572 7369 7479 2069 6e20 4175 7374 7261 ersity in Austra │ │ │ +000065e0: 6c69 612c 206d 6169 6e74 6169 6e69 6e67 lia, maintaining │ │ │ +000065f0: 5c6e 7765 6273 6572 7665 7273 2061 6e64 \nwebservers and │ │ │ +00006600: 2064 6f69 6e67 2072 616e 646f 6d20 6f74 doing random ot │ │ │ +00006610: 6865 7220 7468 696e 6773 2e20 2041 7320 her things. As │ │ │ +00006620: 7765 6c6c 2061 7320 7370 656e 6469 6e67 well as spending │ │ │ +00006630: 2073 7061 7265 5c6e 7469 6d65 2062 6569 spare\ntime bei │ │ │ +00006640: 6e67 2061 6e20 4561 6765 7220 596f 756e ng an Eager Youn │ │ │ +00006650: 6720 5370 6163 6520 4361 6465 7420 616e g Space Cadet an │ │ │ +00006660: 6420 6669 6464 6c69 6e67 2077 6974 6820 d fiddling with │ │ │ +00006670: 5845 6d61 6373 2f47 6e75 735c 6e65 742e XEmacs/Gnus\net. │ │ │ +00006680: 2061 6c2e 2c20 6865 2073 7065 6e64 7320 al., he spends │ │ │ +00006690: 6869 7320 7469 6d65 2070 7572 7375 696e his time pursuin │ │ │ +000066a0: 672c 2061 6d6f 6e67 206f 7468 6572 2074 g, among other t │ │ │ +000066b0: 6869 6e67 732c 2061 204c 6966 652e 5c6e hings, a Life.\n │ │ │ +000066c0: 536f 6d65 206f 6620 7468 6973 2063 7572 Some of this cur │ │ │ +000066d0: 7265 6e74 6c79 2069 6e76 6f6c 7665 7320 rently involves │ │ │ +000066e0: 646f 696e 6720 616e 2041 2d5a 2028 6279 doing an A-Z (by │ │ │ +000066f0: 2063 6f75 6e74 7279 2920 6f66 5c6e 7265 country) of\nre │ │ │ +00006700: 7374 6175 7261 6e74 7320 7769 7468 2066 staurants with f │ │ │ +00006710: 7269 656e 6473 2c20 616e 6420 6861 732c riends, and has, │ │ │ +00006720: 2069 6e20 7468 6520 7061 7374 2c20 696e in the past, in │ │ │ +00006730: 766f 6c76 6564 2064 7965 696e 6720 6869 volved dyeing hi │ │ │ +00006740: 735c 6e68 6169 7220 7661 7269 6f75 7320 s\nhair various │ │ │ +00006750: 636f 6c6f 7572 7320 2873 6565 2022 2061 colours (see " a │ │ │ +00006760: 626f 7574 2d75 726c 2d6c 696e 6b20 6e69 bout-url-link ni │ │ │ +00006770: 6c20 2256 6973 6974 2041 6e64 7265 7727 l "Visit Andrew' │ │ │ +00006780: 7320 686f 6d65 2070 6167 6522 2061 6c61 s home page" ala │ │ │ +00006790: 7374 6169 7220 2241 6c61 7374 6169 722c stair "Alastair, │ │ │ +000067a0: 2061 7061 7274 2066 726f 6d20 6265 696e apart from bein │ │ │ +000067b0: 6720 616e 2061 6c6c 2d72 6f75 6e64 2068 g an all-round h │ │ │ +000067c0: 6163 6b65 722c 206f 6363 6173 696f 6e61 acker, occasiona │ │ │ +000067d0: 6c20 636f 6e74 7269 6275 746f 725c 6e74 l contributor\nt │ │ │ +000067e0: 6f20 6672 6565 2073 6f66 7477 6172 6520 o free software │ │ │ +000067f0: 7072 6f6a 6563 7473 2061 6e64 2067 656e projects and gen │ │ │ +00006800: 6572 616c 2067 6f6f 6420 6567 6728 2129 eral good egg(!) │ │ │ +00006810: 2c20 6375 7272 656e 746c 7920 776f 726b , currently work │ │ │ +00006820: 7320 666f 725c 6e54 656c 7369 732c 2061 s for\nTelsis, a │ │ │ +00006830: 206d 616e 7566 6163 7475 7265 7220 6f66 manufacturer of │ │ │ +00006840: 2074 656c 6570 686f 6e79 2065 7175 6970 telephony equip │ │ │ +00006850: 6d65 6e74 206f 6e20 7468 6520 736f 7574 ment on the sout │ │ │ +00006860: 6820 636f 6173 7420 6f66 5c6e 456e 676c h coast of\nEngl │ │ │ +00006870: 616e 642e 2020 4865 2764 2071 7569 7465 and. He'd quite │ │ │ +00006880: 206c 696b 6520 746f 2068 6176 6520 6869 like to have hi │ │ │ +00006890: 7320 6f77 6e20 636f 6d70 616e 7920 6f6e s own company on │ │ │ +000068a0: 6520 6461 792c 2062 7574 2068 6173 2079 e day, but has y │ │ │ +000068b0: 6574 5c6e 746f 2074 6869 6e6b 206f 6620 et\nto think of │ │ │ +000068c0: 7468 6174 206b 696c 6c65 7220 7072 6f64 that killer prod │ │ │ +000068d0: 7563 742e 2e2e 5c6e 5c6e 5365 6520 616c uct...\n\nSee al │ │ │ +000068e0: 736f 2022 2022 5669 7369 7420 416c 6173 so " "Visit Alas │ │ │ +000068f0: 7461 6972 2773 2068 6f6d 6520 7061 6765 tair's home page │ │ │ +00006900: 2220 6261 7720 2241 7320 6f66 204e 6f76 " baw "As of Nov │ │ │ +00006910: 656d 6265 7220 3230 3030 2c20 4920 616d ember 2000, I am │ │ │ +00006920: 2061 2073 6f66 7477 6172 6520 656e 6769 a software engi │ │ │ +00006930: 6e65 6572 2077 6974 6820 7468 6520 5079 neer with the Py │ │ │ +00006940: 7468 6f6e 6c61 6273 2061 745c 6e44 6967 thonlabs at\nDig │ │ │ +00006950: 6974 616c 2043 7265 6174 696f 6e73 2e20 ital Creations. │ │ │ +00006960: 2050 7974 686f 6e6c 6162 7320 6973 2074 Pythonlabs is t │ │ │ +00006970: 6865 2063 6f72 6520 7465 616d 2064 6576 he core team dev │ │ │ +00006980: 656c 6f70 696e 6720 616e 645c 6e6d 6169 eloping and\nmai │ │ │ +00006990: 6e74 6169 6e69 6e67 2074 6865 2050 7974 ntaining the Pyt │ │ │ +000069a0: 686f 6e20 6f70 656e 2073 6f75 7263 652c hon open source, │ │ │ +000069b0: 206f 626a 6563 742d 6f72 6965 6e74 6564 object-oriented │ │ │ +000069c0: 2073 6372 6970 7469 6e67 5c6e 6c61 6e67 scripting\nlang │ │ │ +000069d0: 7561 6765 2e20 2044 6967 6974 616c 2043 uage. Digital C │ │ │ +000069e0: 7265 6174 696f 6e73 2069 7320 7468 6520 reations is the │ │ │ +000069f0: 7075 626c 6973 6865 7220 6f66 205a 6f70 publisher of Zop │ │ │ +00006a00: 652c 2061 6e20 6f70 656e 2073 6f75 7263 e, an open sourc │ │ │ +00006a10: 655c 6e63 6f6e 7465 6e74 206d 616e 6167 e\ncontent manag │ │ │ +00006a20: 656d 656e 7420 7379 7374 656d 2077 7269 ement system wri │ │ │ +00006a30: 7474 656e 2069 6e20 5079 7468 6f6e 2e5c tten in Python.\ │ │ │ +00006a40: 6e5c 6e49 6e20 6164 6469 7469 6f6e 2074 n\nIn addition t │ │ │ +00006a50: 6f20 6d79 2050 7974 686f 6e20 616e 6420 o my Python and │ │ │ +00006a60: 5a6f 7065 2077 6f72 6b2c 2049 2061 6d20 Zope work, I am │ │ │ +00006a70: 6c65 6164 2064 6576 656c 6f70 6572 2066 lead developer f │ │ │ +00006a80: 6f72 2074 6865 5c6e 474e 5520 4d61 696c or the\nGNU Mail │ │ │ +00006a90: 6d61 6e20 7072 6f6a 6563 742c 2061 206d man project, a m │ │ │ +00006aa0: 6169 6c69 6e67 206c 6973 7420 6d61 6e61 ailing list mana │ │ │ +00006ab0: 6765 6d65 6e74 2073 7973 7465 6d20 7772 gement system wr │ │ │ +00006ac0: 6974 7465 6e2c 5c6e 6e61 7475 7261 6c6c itten,\nnaturall │ │ │ +00006ad0: 792c 2069 6e20 5079 7468 6f6e 2e20 2053 y, in Python. S │ │ │ +00006ae0: 6565 2074 6865 2074 7265 6e64 3f5c 6e5c ee the trend?\n\ │ │ │ +00006af0: 6e4f 6e20 7468 6520 7369 6465 2049 2070 nOn the side I p │ │ │ +00006b00: 6c61 7920 6261 7373 2077 6974 6820 6120 lay bass with a │ │ │ +00006b10: 6e75 6d62 6572 206f 6620 5761 7368 696e number of Washin │ │ │ +00006b20: 6774 6f6e 2044 4320 6172 6561 2062 616e gton DC area ban │ │ │ +00006b30: 6473 2061 6e64 5c6e 616c 736f 2077 7269 ds and\nalso wri │ │ │ +00006b40: 7465 2070 6f65 6d73 2061 626f 7574 2063 te poems about c │ │ │ +00006b50: 6f77 732c 206d 696c 6b2c 2061 6e64 2066 ows, milk, and f │ │ │ +00006b60: 6174 6865 7273 2e20 2048 6572 6527 7320 athers. Here's │ │ │ +00006b70: 6120 7361 6d70 6c65 2c20 616e 645c 6e64 a sample, and\nd │ │ │ +00006b80: 726f 7020 6d65 2061 6e20 656d 6169 6c20 rop me an email │ │ │ +00006b90: 6966 2079 6f75 206c 6976 6520 696e 2074 if you live in t │ │ │ +00006ba0: 6865 204e 5943 2074 6f20 4368 6172 6c6f he NYC to Charlo │ │ │ +00006bb0: 7474 6520 7265 6769 6f6e 3b20 4927 6c6c tte region; I'll │ │ │ +00006bc0: 206c 6574 5c6e 796f 7520 6b6e 6f77 2077 let\nyou know w │ │ │ +00006bd0: 6865 6e20 7468 6520 6261 6e64 2773 2070 hen the band's p │ │ │ +00006be0: 6c61 7969 6e67 2069 6e20 796f 7572 2061 laying in your a │ │ │ +00006bf0: 7265 612e 2020 4974 2764 2062 6520 636f rea. It'd be co │ │ │ +00006c00: 6f6c 2074 6f20 6d65 6574 5c6e 796f 752c ol to meet\nyou, │ │ │ +00006c10: 2061 6e64 2074 616c 6b69 6e67 2061 626f and talking abo │ │ │ +00006c20: 7574 2058 456d 6163 7320 776f 756c 6420 ut XEmacs would │ │ │ +00006c30: 6d61 6b65 206d 7920 7769 6665 2076 6572 make my wife ver │ │ │ +00006c40: 7920 6861 7070 7920 6279 2068 656c 7069 y happy by helpi │ │ │ +00006c50: 6e67 5c6e 746f 2066 656e 6420 6f66 6620 ng\nto fend off │ │ │ +00006c60: 7468 6520 6c65 6769 6f6e 7320 6f66 2067 the legions of g │ │ │ +00006c70: 726f 7570 6965 7320 7468 6174 2073 6565 roupies that see │ │ │ +00006c80: 6d20 746f 2066 6f6c 6c6f 7720 6d65 2065 m to follow me e │ │ │ +00006c90: 7665 7279 7768 6572 652e 5c6e 5c6e 2020 verywhere.\n\n │ │ │ +00006ca0: 2020 4d69 6c6b 204d 6520 4461 6464 795c Milk Me Daddy\ │ │ │ +00006cb0: 6e20 2020 2028 4329 2031 3939 3020 5761 n (C) 1990 Wa │ │ │ +00006cc0: 7273 6177 5c6e 2020 2020 3d3d 3d3d 3d3d rsaw\n ====== │ │ │ +00006cd0: 3d3d 3d3d 3d3d 3d3d 3d5c 6e20 2020 204f =========\n O │ │ │ +00006ce0: 6820 6461 6464 7920 7769 7468 2079 6f75 h daddy with you │ │ │ +00006cf0: 7220 6669 6e67 6572 7320 7069 6e6b 205c r fingers pink \ │ │ │ +00006d00: 6e20 2020 2046 726f 6d20 7768 6f73 6520 n From whose │ │ │ +00006d10: 7564 6465 7273 2064 6f20 796f 7520 6472 udders do you dr │ │ │ +00006d20: 696e 6b3f 205c 6e20 2020 2054 6879 206d ink? \n Thy m │ │ │ +00006d30: 696c 6b20 6f66 6665 6e64 7320 7769 7468 ilk offends with │ │ │ +00006d40: 2070 7574 7269 6420 7374 696e 6b20 5c6e putrid stink \n │ │ │ +00006d50: 2020 2020 4927 6c6c 2076 6f6d 6974 206e I'll vomit n │ │ │ +00006d60: 6f77 2c20 6c61 6374 6f73 6520 4920 7468 ow, lactose I th │ │ │ +00006d70: 696e 6b20 5c6e 5c6e 2020 2020 4966 2049 ink \n\n If I │ │ │ +00006d80: 2063 6f75 6c64 2064 7265 616d 2c20 4927 could dream, I' │ │ │ +00006d90: 6420 6265 2061 2063 6f77 205c 6e20 2020 d be a cow \n │ │ │ +00006da0: 204e 6f74 2068 6f72 7365 2c20 6f72 206d Not horse, or m │ │ │ +00006db0: 756c 652c 206f 7220 6261 726e 7961 7264 ule, or barnyard │ │ │ +00006dc0: 2073 6f77 205c 6e20 2020 2054 6865 2063 sow \n The c │ │ │ +00006dd0: 7564 2049 2764 2063 6865 7720 776f 756c ud I'd chew woul │ │ │ +00006de0: 6420 6472 6970 2061 6e64 2068 6f77 2120 d drip and how! │ │ │ +00006df0: 5c6e 2020 2020 536f 206d 696c 6b20 6d65 \n So milk me │ │ │ +00006e00: 2064 6164 6479 2c20 6d69 6c6b 206d 6520 daddy, milk me │ │ │ +00006e10: 6e6f 7721 205c 6e5c 6e20 2020 204d 7920 now! \n\n My │ │ │ +00006e20: 626f 7669 6e65 206e 6174 7572 6520 6b6e bovine nature kn │ │ │ +00006e30: 6f77 7320 6e6f 2062 6f75 6e64 7320 5c6e ows no bounds \n │ │ │ +00006e40: 2020 2020 4927 6420 6e61 7567 6874 2061 I'd naught a │ │ │ +00006e50: 7761 6b65 2061 7420 6d69 646e 6967 6874 wake at midnight │ │ │ +00006e60: 2073 6f75 6e64 7320 5c6e 2020 2020 4f66 sounds \n Of │ │ │ +00006e70: 2074 6565 6e73 2061 7070 726f 6163 6869 teens approachi │ │ │ +00006e80: 6e67 206f 2765 7220 7468 6520 6772 6f75 ng o'er the grou │ │ │ +00006e90: 6e64 7320 5c6e 2020 2020 546f 2074 6970 nds \n To tip │ │ │ +00006ea0: 2077 6974 6820 676c 6565 2c20 7468 656e with glee, then │ │ │ +00006eb0: 2073 6372 6565 6368 206c 696b 6520 636c screech like cl │ │ │ +00006ec0: 6f77 6e73 205c 6e5c 6e20 2020 2041 6e64 owns \n\n And │ │ │ +00006ed0: 2073 6f20 4920 7374 6172 6520 696e 746f so I stare into │ │ │ +00006ee0: 2074 6869 7320 676c 6173 7320 5c6e 2020 this glass \n │ │ │ +00006ef0: 2020 4f66 2073 7765 6174 7920 6a75 6963 Of sweaty juic │ │ │ +00006f00: 652c 2049 2067 756c 7020 736f 2066 6173 e, I gulp so fas │ │ │ +00006f10: 7420 5c6e 2020 2020 4561 6368 2064 726f t \n Each dro │ │ │ +00006f20: 7020 4920 6c69 636b 2c20 646f 776e 2074 p I lick, down t │ │ │ +00006f30: 6f20 7468 6520 6c61 7374 205c 6e20 2020 o the last \n │ │ │ +00006f40: 2054 6865 2076 6572 7469 676f 2049 206b The vertigo I k │ │ │ +00006f50: 6e6f 7720 7769 6c6c 2070 6173 7320 5c6e now will pass \n │ │ │ +00006f60: 5c6e 2020 2020 4d79 206d 6f74 6865 7220 \n My mother │ │ │ +00006f70: 736d 696c 6573 2061 6e64 2070 6174 7320 smiles and pats │ │ │ +00006f80: 6d79 2068 6561 6420 5c6e 2020 2020 5368 my head \n Sh │ │ │ +00006f90: 6527 7320 7072 6f75 6420 6f66 206d 652c e's proud of me, │ │ │ +00006fa0: 2073 6f20 7368 6520 6861 7320 7361 6964 so she has said │ │ │ +00006fb0: 205c 6e20 2020 204d 7920 706f 7020 6a75 \n My pop ju │ │ │ +00006fc0: 7374 206e 6f77 2067 6574 7320 6f75 7420 st now gets out │ │ │ +00006fd0: 6f66 2062 6564 205c 6e20 2020 2048 6973 of bed \n His │ │ │ +00006fe0: 2065 7965 7320 7175 6974 6520 636f 6d61 eyes quite coma │ │ │ +00006ff0: 746f 7365 2061 6e64 2072 6564 205c 6e5c tose and red \n\ │ │ │ +00007000: 6e20 2020 2048 6527 6c6c 2065 6d70 6174 n He'll empat │ │ │ +00007010: 6869 7a65 206d 7920 6d69 6c6b 7920 6661 hize my milky fa │ │ │ +00007020: 7465 205c 6e20 2020 2057 6869 6c65 7374 te \n Whilest │ │ │ +00007030: 2073 6f70 7069 6e67 2067 7261 7679 2066 sopping gravy f │ │ │ +00007040: 726f 6d20 6869 7320 706c 6174 6520 5c6e rom his plate \n │ │ │ +00007050: 2020 2020 416e 6420 6173 2074 6865 2068 And as the h │ │ │ +00007060: 6f75 7220 6973 2067 6574 7469 6e67 206c our is getting l │ │ │ +00007070: 6174 6520 5c6e 2020 2020 4869 7320 6265 ate \n His be │ │ │ +00007080: 6c6c 7920 7461 7574 2077 6974 6820 616c lly taut with al │ │ │ +00007090: 6c20 6865 2061 7465 205c 6e5c 6e20 2020 l he ate \n\n │ │ │ +000070a0: 2048 6520 6973 6e27 7420 6f66 7465 6e20 He isn't often │ │ │ +000070b0: 7175 6974 6520 736f 2063 6861 7474 7920 quite so chatty │ │ │ +000070c0: 5c6e 2020 2020 4869 7320 6172 7465 7269 \n His arteri │ │ │ +000070d0: 6573 2063 6c6f 6767 6564 2077 6974 6820 es clogged with │ │ │ +000070e0: 6d65 6174 2073 6f20 6661 7474 7920 5c6e meat so fatty \n │ │ │ +000070f0: 2020 2020 5769 7468 2062 7572 7073 2074 With burps t │ │ │ +00007100: 6861 7420 6c61 756e 6368 2073 6f75 702c hat launch soup, │ │ │ +00007110: 2074 6869 636b 2061 6e64 2073 706c 6174 thick and splat │ │ │ +00007120: 7479 205c 6e20 2020 204f 6820 686f 7720 ty \n Oh how │ │ │ +00007130: 4920 7769 7368 2079 6f75 2764 206d 696c I wish you'd mil │ │ │ +00007140: 6b20 6d65 2064 6164 6479 5c6e 5c6e 0922 k me daddy\n\n." │ │ │ +00007150: 2022 5669 7369 7420 4261 7272 7927 7320 "Visit Barry's │ │ │ +00007160: 686f 6d65 2070 6167 6522 2022 5c6e 2220 home page" "\n" │ │ │ +00007170: 6265 6e20 2253 696e 6365 2053 6570 7465 ben "Since Septe │ │ │ +00007180: 6d62 6572 2031 3939 322c 2049 2776 6520 mber 1992, I've │ │ │ +00007190: 776f 726b 6564 206f 6e20 5845 6d61 6373 worked on XEmacs │ │ │ +000071a0: 2061 7320 6120 636f 6e74 7261 6374 6f72 as a contractor │ │ │ +000071b0: 2066 6f72 5c6e 7661 7269 6f75 7320 636f for\nvarious co │ │ │ +000071c0: 6d70 616e 6965 7320 616e 6420 6d6f 7265 mpanies and more │ │ │ +000071d0: 2072 6563 656e 746c 7920 6173 2061 6e20 recently as an │ │ │ +000071e0: 756e 7061 6964 2076 6f6c 756e 7465 6572 unpaid volunteer │ │ │ +000071f0: 2e5c 6e5c 6e41 6c61 732c 206c 6966 6520 .\n\nAlas, life │ │ │ +00007200: 6861 7320 6e6f 7420 6265 656e 2067 6f6f has not been goo │ │ │ +00007210: 6420 746f 206d 6520 7265 6365 6e74 6c79 d to me recently │ │ │ +00007220: 2e20 2054 6869 7320 666f 726d 6572 2053 . This former S │ │ │ +00007230: 616e 5c6e 4672 616e 6369 7363 6f20 5c22 an\nFrancisco \" │ │ │ +00007240: 4d69 7373 696f 6e20 4372 6974 7465 725c Mission Critter\ │ │ │ +00007250: 2220 6465 7665 6c6f 7065 6420 696e 7369 " developed insi │ │ │ +00007260: 6469 6f75 7320 6861 6e64 2061 6e64 206e dious hand and n │ │ │ +00007270: 6563 6b5c 6e70 726f 626c 656d 7320 6166 eck\nproblems af │ │ │ +00007280: 7465 7220 6120 6272 6965 6620 7374 696e ter a brief stin │ │ │ +00007290: 7420 776f 726b 696e 6720 6f6e 2061 204a t working on a J │ │ │ +000072a0: 6176 612d 6261 7365 6420 5652 4d4c 2074 ava-based VRML t │ │ │ +000072b0: 6f6f 6c6b 6974 2066 6f72 5c6e 7468 6520 oolkit for\nthe │ │ │ +000072c0: 6e6f 7720 6465 6675 6e63 7420 4469 6d65 now defunct Dime │ │ │ +000072d0: 6e73 696f 6e20 582c 2061 6e64 2049 2077 nsion X, and I w │ │ │ +000072e0: 6173 2066 6f72 6365 6420 746f 2071 7569 as forced to qui │ │ │ +000072f0: 7420 776f 726b 696e 672e 2020 4920 7761 t working. I wa │ │ │ +00007300: 735c 6e65 7869 6c65 6420 6669 7273 7420 s\nexiled first │ │ │ +00007310: 746f 205c 2253 7472 6f6c 6c65 7220 5661 to \"Stroller Va │ │ │ +00007320: 6c6c 6579 5c22 2061 6e64 206c 6174 6572 lley\" and later │ │ │ +00007330: 2061 6c6c 2074 6865 2077 6179 2074 6f20 all the way to │ │ │ +00007340: 5475 6373 6f6e 2c5c 6e41 7269 7a6f 6e61 Tucson,\nArizona │ │ │ +00007350: 2c20 616e 6420 666f 7220 7477 6f20 7965 , and for two ye │ │ │ +00007360: 6172 7320 7761 7320 616c 6d6f 7374 2063 ars was almost c │ │ │ +00007370: 6f6d 706c 6574 656c 7920 6469 7361 626c ompletely disabl │ │ │ +00007380: 6564 2064 7565 2074 6f20 7061 696e 2e5c ed due to pain.\ │ │ │ +00007390: 6e4d 6f72 6520 7265 6365 6e74 6c79 2049 nMore recently I │ │ │ +000073a0: 2068 6176 6520 666f 7567 6874 206d 7920 have fought my │ │ │ +000073b0: 7761 7920 6261 636b 2077 6974 6820 6c6f way back with lo │ │ │ +000073c0: 6164 7320 616e 6420 6c6f 6164 7320 6f66 ads and loads of │ │ │ +000073d0: 5c6e 6e61 7263 6f74 6963 2070 6169 6e6b \nnarcotic paink │ │ │ +000073e0: 696c 6c65 7273 2c20 616e 6420 6375 7272 illers, and curr │ │ │ +000073f0: 656e 746c 7920 4927 6d20 616e 2061 7274 ently I'm an art │ │ │ +00007400: 2073 7475 6465 6e74 2061 7420 7468 655c student at the\ │ │ │ +00007410: 6e55 6e69 7665 7273 6974 7920 6f66 2041 nUniversity of A │ │ │ +00007420: 7269 7a6f 6e61 2e5c 6e5c 6e22 2022 4172 rizona.\n\n" "Ar │ │ │ +00007430: 6368 6974 6563 7469 6e67 2058 456d 6163 chitecting XEmac │ │ │ +00007440: 733a 2022 2062 656e 2d78 656d 6163 7320 s: " ben-xemacs │ │ │ +00007450: 2246 696e 6420 7468 6520 6d69 7261 636c "Find the miracl │ │ │ +00007460: 6573 2069 6e20 7374 6f72 6520 666f 7220 es in store for │ │ │ +00007470: 5845 6d61 6373 2220 225c 6e42 656e 2773 XEmacs" "\nBen's │ │ │ +00007480: 2068 6f6d 6520 7061 6765 3a20 2020 2020 home page: │ │ │ +00007490: 2220 2256 6973 6974 2042 656e 2773 2070 " "Visit Ben's p │ │ │ +000074a0: 6167 6522 2062 7720 2248 6973 2069 6e74 age" bw "His int │ │ │ +000074b0: 6572 6573 7473 2069 6e63 6c75 6465 2075 erests include u │ │ │ +000074c0: 7365 7220 696e 7465 7266 6163 6573 2c20 ser interfaces, │ │ │ +000074d0: 696e 666f 726d 6174 696f 6e20 6d61 6e61 information mana │ │ │ +000074e0: 6765 6d65 6e74 2c20 4341 5345 5c6e 746f gement, CASE\nto │ │ │ +000074f0: 6f6c 732c 2063 6f6d 6d75 6e69 6361 7469 ols, communicati │ │ │ +00007500: 6f6e 7320 616e 6420 656e 7465 7270 7269 ons and enterpri │ │ │ +00007510: 7365 2069 6e74 6567 7261 7469 6f6e 2e5c se integration.\ │ │ │ +00007520: 6e22 2063 6777 2063 6872 2022 4368 7269 n" cgw chr "Chri │ │ │ +00007530: 7374 6961 6e20 6973 2061 2073 7475 6465 stian is a stude │ │ │ +00007540: 6e74 2061 7420 7468 6520 4e6f 7277 6567 nt at the Norweg │ │ │ +00007550: 6961 6e20 5363 686f 6f6c 206f 6620 4563 ian School of Ec │ │ │ +00007560: 6f6e 6f6d 6963 7320 616e 645c 6e42 7573 onomics and\nBus │ │ │ +00007570: 696e 6573 7320 4164 6d69 6e69 7374 7261 iness Administra │ │ │ +00007580: 7469 6f6e 2069 6e20 4265 7267 656e 2c20 tion in Bergen, │ │ │ +00007590: 4e6f 7277 6179 2e20 2048 6520 7573 6564 Norway. He used │ │ │ +000075a0: 2074 6f20 776f 726b 2066 6f72 2061 6e5c to work for an\ │ │ │ +000075b0: 6e69 6e74 6572 6e65 7420 7374 6172 7475 ninternet startu │ │ │ +000075c0: 7020 6361 6c6c 6564 204e 6577 204d 6564 p called New Med │ │ │ +000075d0: 6961 2053 6369 656e 6365 2c20 646f 696e ia Science, doin │ │ │ +000075e0: 6720 7363 7269 7074 696e 6720 616e 645c g scripting and\ │ │ │ +000075f0: 6e76 696f 6c61 7469 6f6e 206f 6620 4854 nviolation of HT │ │ │ +00007600: 4d4c 2044 5444 2773 2e20 2041 6674 6572 ML DTD's. After │ │ │ +00007610: 2067 7261 6475 6174 696f 6e2c 2073 7072 graduation, spr │ │ │ +00007620: 696e 6720 3139 3939 2c20 6865 276c 6c20 ing 1999, he'll │ │ │ +00007630: 6265 5c6e 6c6f 6f6b 696e 6720 666f 7220 be\nlooking for │ │ │ +00007640: 6120 6a6f 6220 696e 766f 6c76 696e 6720 a job involving │ │ │ +00007650: 6c69 7370 2070 726f 6772 616d 6d69 6e67 lisp programming │ │ │ +00007660: 2c20 4672 656e 6368 2061 6e64 2052 7573 , French and Rus │ │ │ +00007670: 7369 616e 2e5c 6e22 2063 7261 6967 2063 sian.\n" craig c │ │ │ +00007680: 7468 6f6d 7020 2243 6875 636b 2069 7320 thomp "Chuck is │ │ │ +00007690: 6120 7365 6e69 6f72 2073 7973 7465 6d20 a senior system │ │ │ +000076a0: 616e 6420 6e65 7477 6f72 6b20 6164 6d69 and network admi │ │ │ +000076b0: 6e69 7374 7261 746f 7220 666f 7220 7468 nistrator for th │ │ │ +000076c0: 6520 436f 6d70 7574 6572 5c6e 5363 6965 e Computer\nScie │ │ │ +000076d0: 6e63 6520 6465 7061 7274 6d65 6e74 2061 nce department a │ │ │ +000076e0: 7420 7468 6520 556e 7665 7273 6974 7920 t the Unversity │ │ │ +000076f0: 6f66 2049 6c6c 696e 6f69 732e 2020 496e of Illinois. In │ │ │ +00007700: 206f 6e65 2070 7265 7669 6f75 7320 6c69 one previous li │ │ │ +00007710: 6665 5c6e 6865 2073 7065 6e74 2065 7665 fe\nhe spent eve │ │ │ +00007720: 7279 2077 616b 696e 6720 686f 7572 2077 ry waking hour w │ │ │ +00007730: 6f72 6b69 6e67 206f 6e20 5845 6d61 6373 orking on XEmacs │ │ │ +00007740: 2e20 2049 6e20 616e 6f74 6865 7220 6865 . In another he │ │ │ +00007750: 2064 6162 626c 6564 5c6e 6173 2061 2070 dabbled\nas a p │ │ │ +00007760: 726f 6a65 6374 206d 616e 6167 6572 2066 roject manager f │ │ │ +00007770: 6f72 2061 2073 7472 6561 6d69 6e67 2076 or a streaming v │ │ │ +00007780: 6964 656f 2073 7461 7274 7570 2028 5249 ideo startup (RI │ │ │ +00007790: 5029 2e20 2048 6973 2063 7572 7265 6e74 P). His current │ │ │ +000077a0: 5c6e 7265 6173 6f6e 2066 6f72 206e 6f74 \nreason for not │ │ │ +000077b0: 2068 6176 696e 6720 7469 6d65 2074 6f20 having time to │ │ │ +000077c0: 636f 6e74 7269 6275 7465 2074 6f20 5845 contribute to XE │ │ │ +000077d0: 6d61 6373 2069 7320 7468 6520 5468 6f6d macs is the Thom │ │ │ +000077e0: 7073 6f6e 5c6e 5477 696e 732e 5c6e 2220 pson\nTwins.\n" │ │ │ +000077f0: 6461 696b 6920 2256 6973 6974 2044 6169 daiki "Visit Dai │ │ │ +00007800: 6b69 2773 2070 6167 6522 2064 616e 2064 ki's page" dan d │ │ │ +00007810: 6172 7279 6c6f 2022 5065 7265 6e6e 6961 arrylo "Perennia │ │ │ +00007820: 6c20 456d 6163 7320 6861 636b 6572 2073 l Emacs hacker s │ │ │ +00007830: 696e 6365 2031 3938 3620 6f72 2073 6f2c ince 1986 or so, │ │ │ +00007840: 2077 6865 6e20 6865 2066 6972 7374 2073 when he first s │ │ │ +00007850: 7461 7274 6564 206f 6e20 474e 555c 6e45 tarted on GNU\nE │ │ │ +00007860: 6d61 6373 2031 372e 736f 6d65 7468 696e macs 17.somethin │ │ │ +00007870: 672e 2020 4f76 6572 2074 6865 2079 6561 g. Over the yea │ │ │ +00007880: 7273 2c20 6865 2773 2064 6576 656c 6f70 rs, he's develop │ │ │ +00007890: 6564 205c 224f 456d 6163 735c 222c 2074 ed \"OEmacs\", t │ │ │ +000078a0: 6865 2066 6972 7374 5c6e 7665 7273 696f he first\nversio │ │ │ +000078b0: 6e20 6f66 2047 4e55 2045 6d61 6373 2031 n of GNU Emacs 1 │ │ │ +000078c0: 3920 666f 7220 4d53 444f 532c 2061 6e64 9 for MSDOS, and │ │ │ +000078d0: 205c 2262 6967 7065 726c 5c22 2c20 6120 \"bigperl\", a │ │ │ +000078e0: 3332 2d62 6974 2076 6572 7369 6f6e 206f 32-bit version o │ │ │ +000078f0: 665c 6e50 6572 6c34 2066 6f72 204d 5344 f\nPerl4 for MSD │ │ │ +00007900: 4f53 2e20 2049 6e20 7265 6365 6e74 2079 OS. In recent y │ │ │ +00007910: 6561 7273 2c20 7265 616c 6974 7920 6861 ears, reality ha │ │ │ +00007920: 7320 696e 7472 7564 6564 2061 6e64 2068 s intruded and h │ │ │ +00007930: 6520 6e6f 206c 6f6e 6765 725c 6e68 6173 e no longer\nhas │ │ │ +00007940: 206d 7563 6820 7469 6d65 2066 6f72 2070 much time for p │ │ │ +00007950: 6c61 7969 6e67 2077 6974 6820 636f 6f6c laying with cool │ │ │ +00007960: 2070 726f 6772 616d 732e 2020 5768 6174 programs. What │ │ │ +00007970: 206c 6974 746c 6520 7469 6d65 2068 6520 little time he │ │ │ +00007980: 6861 735c 6e6e 6f77 2067 6f65 7320 746f has\nnow goes to │ │ │ +00007990: 2058 456d 6163 7320 6861 636b 696e 672c XEmacs hacking, │ │ │ +000079a0: 2077 6865 7265 2068 6527 7320 776f 726b where he's work │ │ │ +000079b0: 6564 206f 6e20 7370 6565 6469 6e67 2075 ed on speeding u │ │ │ +000079c0: 7020 6469 7265 6420 756e 6465 725c 6e4d p dired under\nM │ │ │ +000079d0: 5320 5769 6e64 6f77 732c 2061 6e64 2074 S Windows, and t │ │ │ +000079e0: 6f20 6665 6564 696e 6720 6869 7320 7477 o feeding his tw │ │ │ +000079f0: 6f20 6361 7473 2e5c 6e22 2064 6576 696e o cats.\n" devin │ │ │ +00007a00: 2064 6b69 6e64 7265 6420 2244 6172 7265 dkindred "Darre │ │ │ +00007a10: 6c6c 2069 7320 6375 7272 656e 746c 7920 ll is currently │ │ │ +00007a20: 6120 646f 6374 6f72 616c 2073 7475 6465 a doctoral stude │ │ │ +00007a30: 6e74 2069 6e20 636f 6d70 7574 6572 2073 nt in computer s │ │ │ +00007a40: 6369 656e 6365 2061 745c 6e43 6172 6e65 cience at\nCarne │ │ │ +00007a50: 6769 6520 4d65 6c6c 6f6e 2055 6e69 7665 gie Mellon Unive │ │ │ +00007a60: 7273 6974 792c 2062 7574 2068 6527 7320 rsity, but he's │ │ │ +00007a70: 7472 7969 6e67 2068 6172 6420 746f 206b trying hard to k │ │ │ +00007a80: 6963 6b20 7468 6174 5c6e 6861 6269 742e ick that\nhabit. │ │ │ +00007a90: 5c6e 5c6e 5365 6520 2220 2256 6973 6974 \n\nSee " "Visit │ │ │ +00007aa0: 2044 6172 7265 6c6c 2773 2057 5757 2070 Darrell's WWW p │ │ │ +00007ab0: 6167 6522 2064 6d6f 6f72 6520 2244 6176 age" dmoore "Dav │ │ │ +00007ac0: 6964 2069 7320 6120 7374 7564 656e 7420 id is a student │ │ │ +00007ad0: 696e 2074 6865 2043 6f6d 7075 7465 7220 in the Computer │ │ │ +00007ae0: 5379 7374 656d 7320 4c61 626f 7261 746f Systems Laborato │ │ │ +00007af0: 7279 2061 7420 5543 5344 2e20 2057 6865 ry at UCSD. Whe │ │ │ +00007b00: 6e5c 6e68 6520 6d61 6e61 6765 7320 746f n\nhe manages to │ │ │ +00007b10: 2068 6176 6520 6672 6565 2074 696d 652c have free time, │ │ │ +00007b20: 2068 6520 7573 7561 6c6c 7920 7370 656e he usually spen │ │ │ +00007b30: 6473 2069 7420 6f6e 2032 3030 206d 696c ds it on 200 mil │ │ │ +00007b40: 6520 6269 6379 636c 655c 6e72 6964 6573 e bicycle\nrides │ │ │ +00007b50: 2c20 6c65 6172 6e69 6e67 2047 6572 6d61 , learning Germa │ │ │ +00007b60: 6e20 6f72 2073 686f 7769 6e67 2070 656f n or showing peo │ │ │ +00007b70: 706c 6520 7468 6520 6265 7374 206d 6169 ple the best mai │ │ │ +00007b80: 6c20 2620 6e65 7773 5c6e 656e 7669 726f l & news\nenviro │ │ │ +00007b90: 6e6d 656e 7420 6865 2773 2066 6f75 6e64 nment he's found │ │ │ +00007ba0: 2069 6e20 3130 2079 6561 7273 2e20 2028 in 10 years. ( │ │ │ +00007bb0: 5468 6174 2764 2062 6520 5845 6d61 6373 That'd be XEmacs │ │ │ +00007bc0: 2c20 476e 7573 2061 6e64 2062 6264 622c , Gnus and bbdb, │ │ │ +00007bd0: 5c6e 6f66 2063 6f75 7273 652e 2920 2048 \nof course.) H │ │ │ +00007be0: 6520 6361 6e20 6265 2066 6f75 6e64 2061 e can be found a │ │ │ +00007bf0: 7420 6064 7275 6964 6d75 636b 2e65 6762 t `druidmuck.egb │ │ │ +00007c00: 742e 6f72 6720 3432 3031 2720 6174 2076 t.org 4201' at v │ │ │ +00007c10: 6172 696f 7573 5c6e 686f 7572 7320 6f66 arious\nhours of │ │ │ +00007c20: 2074 6865 2064 6179 2e5c 6e5c 6e48 6520 the day.\n\nHe │ │ │ +00007c30: 6861 7320 6120 7061 6765 2061 7420 2220 has a page at " │ │ │ +00007c40: 2256 6973 6974 2044 6176 6964 2773 2068 "Visit David's h │ │ │ +00007c50: 6f6d 6520 7061 6765 2220 6469 6469 6572 ome page" didier │ │ │ +00007c60: 2022 4469 6469 6572 2068 6173 2061 2050 "Didier has a P │ │ │ +00007c70: 682e 442e 2069 6e20 436f 6d70 7574 6572 h.D. in Computer │ │ │ +00007c80: 2053 6369 656e 6365 2061 6e64 2069 7320 Science and is │ │ │ +00007c90: 6375 7272 656e 746c 7920 776f 726b 696e currently workin │ │ │ +00007ca0: 6720 6173 2061 6e5c 6e61 7373 6973 7461 g as an\nassista │ │ │ +00007cb0: 6e74 2070 726f 6665 7373 6f72 2066 6f72 nt professor for │ │ │ +00007cc0: 2061 6e20 656e 6769 6e65 6572 696e 6720 an engineering │ │ │ +00007cd0: 7363 686f 6f6c 2069 6e20 5061 7269 7329 school in Paris) │ │ │ +00007ce0: 2e20 2048 6520 6769 7665 735c 6e6c 6563 . He gives\nlec │ │ │ +00007cf0: 7475 7265 7320 6f6e 204f 7065 7261 7469 tures on Operati │ │ │ +00007d00: 6e67 2053 7973 7465 6d73 2c20 436f 6d70 ng Systems, Comp │ │ │ +00007d10: 7574 6572 2047 7261 7068 6963 732c 2046 uter Graphics, F │ │ │ +00007d20: 756e 6374 696f 6e61 6c20 5072 6f67 7261 unctional Progra │ │ │ +00007d30: 6d6d 696e 675c 6e61 6e64 2054 7970 6573 mming\nand Types │ │ │ +00007d40: 6574 7469 6e67 2e20 2048 6973 2072 6573 etting. His res │ │ │ +00007d50: 6561 7263 6820 696e 7465 7265 7374 7320 earch interests │ │ │ +00007d60: 696e 636c 7564 6520 4765 6e65 7269 6369 include Generici │ │ │ +00007d70: 7479 2c20 4f62 6a65 6374 5c6e 4f72 6965 ty, Object\nOrie │ │ │ +00007d80: 6e74 6174 696f 6e20 616e 6420 4675 6e63 ntation and Func │ │ │ +00007d90: 7469 6f6e 616c 2050 726f 6772 616d 6d69 tional Programmi │ │ │ +00007da0: 6e67 2c20 616c 6c20 696e 206f 6e65 206c ng, all in one l │ │ │ +00007db0: 616e 6775 6167 653a 5c6e 5c6e 2e2e 2e20 anguage:\n\n... │ │ │ +00007dc0: 436f 6d6d 6f6e 204c 6973 702e 5c6e 5c6e Common Lisp.\n\n │ │ │ +00007dd0: 5c6e 4170 6172 7420 6672 6f6d 2074 6865 \nApart from the │ │ │ +00007de0: 2077 6f72 6c64 206f 6620 5845 6d61 6373 world of XEmacs │ │ │ +00007df0: 2061 6e64 2045 6d61 6373 204c 6973 702c and Emacs Lisp, │ │ │ +00007e00: 2044 6964 6965 7220 6973 2061 6c73 6f20 Didier is also │ │ │ +00007e10: 7468 6520 6175 7468 6f72 5c6e 6f66 2073 the author\nof s │ │ │ +00007e20: 6576 6572 616c 204c 6154 6558 2070 6163 everal LaTeX pac │ │ │ +00007e30: 6b61 6765 7320 2846 694e 4b2c 2046 6958 kages (FiNK, FiX │ │ │ +00007e40: 6d65 2c20 5143 4d20 616e 6420 4375 7256 me, QCM and CurV │ │ │ +00007e50: 6529 2061 6e64 2061 6e20 6f63 6361 7369 e) and an occasi │ │ │ +00007e60: 6f6e 616c 5c6e 636f 6e74 7269 6275 746f onal\ncontributo │ │ │ +00007e70: 7220 746f 206f 7468 6572 2046 7265 6520 r to other Free │ │ │ +00007e80: 536f 6674 7761 7265 2070 726f 6a65 6374 Software project │ │ │ +00007e90: 7320 2874 6865 2047 4e55 2041 7574 6f74 s (the GNU Autot │ │ │ +00007ea0: 6f6f 6c73 206d 6f73 745c 6e6e 6f74 6162 ools most\nnotab │ │ │ +00007eb0: 6c79 3b20 6865 2077 6173 206f 6e65 206f ly; he was one o │ │ │ +00007ec0: 6620 7468 6520 7465 6368 6e69 6361 6c20 f the technical │ │ │ +00007ed0: 7265 7669 6577 6572 7320 666f 7220 7468 reviewers for th │ │ │ +00007ee0: 6520 5c22 476f 6174 2042 6f6f 6b5c 2229 e \"Goat Book\") │ │ │ +00007ef0: 2e5c 6e5c 6e42 7574 2061 6c6c 206f 6620 .\n\nBut all of │ │ │ +00007f00: 7468 6973 2069 7320 6f6e 6c79 2036 3025 this is only 60% │ │ │ +00007f10: 2074 7275 652e 2e2e 2054 776f 2064 6179 true... Two day │ │ │ +00007f20: 7320 7065 7220 7765 656b 2c20 4469 6469 s per week, Didi │ │ │ +00007f30: 6572 2069 7320 696e 6465 6564 5c6e 6120 er is indeed\na │ │ │ +00007f40: 7365 6d69 2d70 726f 6665 7373 696f 6e61 semi-professiona │ │ │ +00007f50: 6c20 4a61 7a7a 2067 7569 7461 7220 706c l Jazz guitar pl │ │ │ +00007f60: 6179 6572 2028 616e 6420 7369 6e67 6572 ayer (and singer │ │ │ +00007f70: 292c 2077 6869 6368 206d 6561 6e73 2074 ), which means t │ │ │ +00007f80: 6861 7420 6865 5c6e 646f 6573 6e27 7420 hat he\ndoesn't │ │ │ +00007f90: 7175 6974 6520 6561 726e 2068 6973 2063 quite earn his c │ │ │ +00007fa0: 7275 7374 2077 6974 6820 6974 2c20 6275 rust with it, bu │ │ │ +00007fb0: 7420 7468 696e 6773 206d 6179 2076 6572 t things may ver │ │ │ +00007fc0: 7920 7765 6c6c 2072 6576 6572 7365 2069 y well reverse i │ │ │ +00007fd0: 6e5c 6e74 6865 2066 7574 7572 652e 2e2e n\nthe future... │ │ │ +00007fe0: 5c6e 2220 225c 6e56 6973 6974 2044 6964 \n" "\nVisit Did │ │ │ +00007ff0: 6965 7227 7320 7363 6965 6e74 6966 6963 ier's scientific │ │ │ +00008000: 2077 6562 7369 7465 3a20 2220 2256 6973 website: " "Vis │ │ │ +00008010: 6974 2044 6964 6965 7227 7320 7363 6965 it Didier's scie │ │ │ +00008020: 6e74 6966 6963 2077 6562 7369 7465 2220 ntific website" │ │ │ +00008030: 225c 6e56 6973 6974 2044 6964 6965 7227 "\nVisit Didier' │ │ │ +00008040: 7320 6d75 7369 6361 6c20 7765 6273 6974 s musical websit │ │ │ +00008050: 653a 2022 2064 766c 6a61 7a7a 2022 5669 e: " dvljazz "Vi │ │ │ +00008060: 7369 7420 4469 6469 6572 2773 206d 7573 sit Didier's mus │ │ │ +00008070: 6963 616c 2077 6562 7369 7465 2220 6562 ical website" eb │ │ │ +00008080: 2066 6162 7269 6365 2022 4927 6d20 6120 fabrice "I'm a │ │ │ +00008090: 636f 6d70 7574 6572 2073 6369 656e 6365 computer science │ │ │ +000080a0: 2072 6573 6561 7263 6865 7220 616e 6420 researcher and │ │ │ +000080b0: 7465 6163 6865 7220 696e 2061 2046 7265 teacher in a Fre │ │ │ +000080c0: 6e63 6820 656c 6563 7472 6963 616c 5c6e nch electrical\n │ │ │ +000080d0: 656e 6769 6e65 6572 696e 6720 696e 7374 engineering inst │ │ │ +000080e0: 6974 7574 696f 6e20 6361 6c6c 6564 2053 itution called S │ │ │ +000080f0: 7570 656c 6563 2e20 4d79 2066 6965 6c64 upelec. My field │ │ │ +00008100: 7320 6f66 2069 6e74 6572 6573 7420 6172 s of interest ar │ │ │ +00008110: 655c 6e73 796d 626f 6c69 6320 6172 7469 e\nsymbolic arti │ │ │ +00008120: 6669 6369 616c 2069 6e74 656c 6c69 6765 ficial intellige │ │ │ +00008130: 6e63 652c 2074 6865 6f72 6574 6963 616c nce, theoretical │ │ │ +00008140: 2063 6f6d 7075 7465 7220 7363 6965 6e63 computer scienc │ │ │ +00008150: 652c 2066 756e 6374 696f 6e61 6c5c 6e6c e, functional\nl │ │ │ +00008160: 616e 6775 6167 6573 202e 2e2e 2061 6e64 anguages ... and │ │ │ +00008170: 2054 6558 2e5c 6e5c 6e4c 6174 656c 792c TeX.\n\nLately, │ │ │ +00008180: 206d 7920 6861 636b 696e 6720 7469 6d65 my hacking time │ │ │ +00008190: 2068 6173 2062 6565 6e20 6465 766f 7465 has been devote │ │ │ +000081a0: 6420 746f 2070 6f72 7469 6e67 2074 6865 d to porting the │ │ │ +000081b0: 2057 6562 3243 2f74 6554 6558 5c6e 6469 Web2C/teTeX\ndi │ │ │ +000081c0: 7374 7269 6275 7469 6f6e 206f 6620 5465 stribution of Te │ │ │ +000081d0: 5820 666f 7220 556e 6978 2074 6f20 5769 X for Unix to Wi │ │ │ +000081e0: 6e33 322c 2061 6e64 2049 276d 2073 7469 n32, and I'm sti │ │ │ +000081f0: 6c6c 206d 6169 6e74 6169 6e69 6e67 2069 ll maintaining i │ │ │ +00008200: 742e 5c6e 4974 2069 7320 696e 636c 7564 t.\nIt is includ │ │ │ +00008210: 6564 2069 6e20 7468 6520 5465 5820 4c69 ed in the TeX Li │ │ │ +00008220: 7665 2063 6472 6f6d 2065 6469 7465 6420 ve cdrom edited │ │ │ +00008230: 6279 2053 6562 6173 7469 616e 2052 6168 by Sebastian Rah │ │ │ +00008240: 747a 2e5c 6e22 2022 5669 7369 7420 6670 tz.\n" "Visit fp │ │ │ +00008250: 5465 5820 686f 6d65 2070 6167 653a 2022 TeX home page: " │ │ │ +00008260: 2066 7074 6578 2022 5669 7369 7420 6670 fptex "Visit fp │ │ │ +00008270: 5465 5820 686f 6d65 2070 6167 6522 2022 TeX home page" " │ │ │ +00008280: 5c6e 4661 6272 6963 6527 7320 686f 6d65 \nFabrice's home │ │ │ +00008290: 2070 6167 653a 2020 2022 2022 5669 7369 page: " "Visi │ │ │ +000082a0: 7420 4661 6272 6963 6527 7320 7061 6765 t Fabrice's page │ │ │ +000082b0: 2220 676f 6c75 6265 7620 2249 2061 7070 " golubev "I app │ │ │ +000082c0: 7265 6369 6174 6520 706f 7765 7220 6f66 reciate power of │ │ │ +000082d0: 2058 456d 6163 732c 2062 7574 2065 6c65 XEmacs, but ele │ │ │ +000082e0: 6d65 6e74 6172 7920 6564 6974 696e 6720 mentary editing │ │ │ +000082f0: 6f70 6572 6174 696f 6e73 2073 686f 756c operations shoul │ │ │ +00008300: 645c 6e62 6520 646f 6e65 2062 7920 7369 d\nbe done by si │ │ │ +00008310: 6e67 6c65 206b 6579 7374 726f 6b65 7320 ngle keystrokes │ │ │ +00008320: 7769 7468 206e 6f20 6d6f 6469 6669 6572 with no modifier │ │ │ +00008330: 732e 2020 536f 2077 6f75 6c64 206e 6f74 s. So would not │ │ │ +00008340: 2075 7365 5c6e 5845 6d61 6373 2075 6e74 use\nXEmacs unt │ │ │ +00008350: 696c 2064 6973 636f 7665 7265 6420 7669 il discovered vi │ │ │ +00008360: 7065 722c 2061 6e64 206e 6f77 2063 616e per, and now can │ │ │ +00008370: 2774 206c 6976 6520 7769 7468 6f75 7420 't live without │ │ │ +00008380: 7669 7065 722e 5c6e 4f63 6361 7369 6f6e viper.\nOccasion │ │ │ +00008390: 616c 6c79 2064 6973 6c69 6b65 2073 6f6d ally dislike som │ │ │ +000083a0: 6574 6869 6e67 2069 6e20 7468 6572 6520 ething in there │ │ │ +000083b0: 6f72 2069 6e20 6f74 6865 7220 6672 6565 or in other free │ │ │ +000083c0: 2073 6f66 7477 6172 652c 2061 6e64 5c6e software, and\n │ │ │ +000083d0: 7472 7920 746f 2067 6574 2069 7420 6669 try to get it fi │ │ │ +000083e0: 7865 642e 2020 2e70 6c61 6e20 6669 6c65 xed. .plan file │ │ │ +000083f0: 2063 6f6e 7461 696e 7320 636c 6173 7369 contains classi │ │ │ +00008400: 6320 2870 6572 6861 7073 2072 6569 6e76 c (perhaps reinv │ │ │ +00008410: 656e 7465 645c 6e69 6e64 6570 656e 6465 ented\nindepende │ │ │ +00008420: 6e74 6c79 2920 666f 726d 756c 613a 5c6e ntly) formula:\n │ │ │ +00008430: 5c6e 4861 636b 696e 6720 776f 726c 6420 \nHacking world │ │ │ +00008440: 666f 7220 6576 6572 5c6e 5c6e 2862 6f72 for ever\n\n(bor │ │ │ +00008450: 726f 7765 6420 6672 6f6d 205c 2248 6163 rowed from \"Hac │ │ │ +00008460: 6b69 6e67 2058 2066 6f72 2059 5c22 2069 king X for Y\" i │ │ │ +00008470: 6e20 2220 2268 7474 703a 2f2f 7777 772e n " "http://www. │ │ │ +00008480: 6a61 7267 6f6e 2e6f 7267 2f22 2022 4a61 jargon.org/" "Ja │ │ │ +00008490: 7267 6f6e 2046 696c 6522 2022 7777 772e rgon File" "www. │ │ │ +000084a0: 6a61 7267 6f6e 2e6f 7267 2220 2229 2e5c jargon.org" ").\ │ │ │ +000084b0: 6e22 2067 756e 6e61 7220 6862 7320 6869 n" gunnar hbs hi │ │ │ +000084c0: 7361 7368 6920 686d 756c 6c65 7220 686e sashi hmuller hn │ │ │ +000084d0: 696b 7369 6320 2248 7276 6f6a 6520 7468 iksic "Hrvoje th │ │ │ +000084e0: 696e 6b73 2068 6520 776f 726b 7320 696e inks he works in │ │ │ +000084f0: 2074 6865 2073 6572 7665 722d 7369 6465 the server-side │ │ │ +00008500: 2077 6562 2062 7573 696e 6573 732e 2020 web business. │ │ │ +00008510: 496e 2072 6561 6c69 7479 2c5c 6e68 6520 In reality,\nhe │ │ │ +00008520: 6372 616e 6b73 206f 7574 2068 7567 6520 cranks out huge │ │ │ +00008530: 7175 616e 7469 7469 6573 206f 6620 4854 quantities of HT │ │ │ +00008540: 4d4c 2c20 5463 6c2c 2061 6e64 204a 6176 ML, Tcl, and Jav │ │ │ +00008550: 6120 666f 7220 7468 6520 4765 726d 616e a for the German │ │ │ +00008560: 5c6e 6272 616e 6368 206f 6620 2220 2268 \nbranch of " "h │ │ │ +00008570: 7474 703a 2f2f 7777 772e 6172 7364 6967 ttp://www.arsdig │ │ │ +00008580: 6974 612e 636f 6d2f 2220 2241 7273 4469 ita.com/" "ArsDi │ │ │ +00008590: 6769 7461 2c20 496e 632e 2220 2277 7777 gita, Inc." "www │ │ │ +000085a0: 2e61 7273 6469 6769 7461 2e63 6f6d 2220 .arsdigita.com" │ │ │ +000085b0: 666f 726d 6174 2022 4d25 636e 6368 656e format "M%cnchen │ │ │ +000085c0: 2220 6d61 6b65 2d63 6861 7220 6c61 7469 " make-char lati │ │ │ +000085d0: 6e2d 6973 6f38 3835 392d 3120 3235 3220 n-iso8859-1 252 │ │ │ +000085e0: 2220 2048 6520 6a6f 696e 6564 2074 6865 " He joined the │ │ │ +000085f0: 2072 616e 6b73 206f 6620 4761 7374 6172 ranks of Gastar │ │ │ +00008600: 6265 6974 6572 7320 6f6e 6c79 5c6e 7265 beiters only\nre │ │ │ +00008610: 6365 6e74 6c79 3b20 6865 2069 7320 7472 cently; he is tr │ │ │ +00008620: 7969 6e67 2074 6f20 6c65 6172 6e20 4765 ying to learn Ge │ │ │ +00008630: 726d 616e 2061 6e64 2067 6574 2061 7474 rman and get att │ │ │ +00008640: 756e 6564 2074 6f20 2573 5c6e 616e 6420 uned to %s\nand │ │ │ +00008650: 4261 765e 485e 485e 4847 6572 6d61 6e79 Bav^H^H^HGermany │ │ │ +00008660: 2e5c 6e22 2022 5c6e 4265 666f 7265 2041 .\n" "\nBefore A │ │ │ +00008670: 7273 4469 6769 7461 2c20 6865 2077 6f72 rsDigita, he wor │ │ │ +00008680: 6b65 6420 6173 2061 2070 726f 6772 616d ked as a program │ │ │ +00008690: 6d65 7220 6174 2022 2022 6874 7470 3a2f mer at " "http:/ │ │ │ +000086a0: 2f77 7777 2e69 736b 6f6e 2e68 722f 2220 /www.iskon.hr/" │ │ │ +000086b0: 2249 736b 6f6e 2c22 2022 7777 772e 6973 "Iskon," "www.is │ │ │ +000086c0: 6b6f 6e2e 6872 2220 2220 6120 6661 7374 kon.hr" " a fast │ │ │ +000086d0: 2d67 726f 7769 6e67 5c6e 4372 6f61 7469 -growing\nCroati │ │ │ +000086e0: 616e 2049 5350 2e20 2045 7665 6e20 6265 an ISP. Even be │ │ │ +000086f0: 666f 7265 2074 6861 742c 2068 6520 776f fore that, he wo │ │ │ +00008700: 726b 6564 2070 6172 742d 7469 6d65 2066 rked part-time f │ │ │ +00008710: 6f72 2061 6361 6465 6d69 635c 6e69 6e73 or academic\nins │ │ │ +00008720: 7469 7475 7469 6f6e 7320 6c69 6b65 2022 titutions like " │ │ │ +00008730: 2022 6874 7470 3a2f 2f77 7777 2e73 7263 "http://www.src │ │ │ +00008740: 652e 6872 2f22 2022 5352 4345 2220 2277 e.hr/" "SRCE" "w │ │ │ +00008750: 7777 2e73 7263 652e 6872 2220 2220 616e ww.srce.hr" " an │ │ │ +00008760: 6420 2220 2268 7474 703a 2f2f 7777 772e d " "http://www. │ │ │ +00008770: 6361 726e 6574 2e68 722f 2220 2243 4152 carnet.hr/" "CAR │ │ │ +00008780: 4e65 742c 2220 2277 7777 2e63 6172 6e65 Net," "www.carne │ │ │ +00008790: 742e 6872 2220 2220 616e 6420 7472 6965 t.hr" " and trie │ │ │ +000087a0: 6420 746f 2061 7474 656e 6420 756e 6976 d to attend univ │ │ │ +000087b0: 6572 7369 7479 2e5c 6e5c 6e48 6520 7461 ersity.\n\nHe ta │ │ │ +000087c0: 6b65 7320 7065 7276 6572 7365 2070 6c65 kes perverse ple │ │ │ +000087d0: 6173 7572 6520 696e 2062 7569 6c64 696e asure in buildin │ │ │ +000087e0: 6720 616e 6420 6d61 696e 7461 696e 696e g and maintainin │ │ │ +000087f0: 6720 6672 6565 2073 6f66 7477 6172 655c g free software\ │ │ │ +00008800: 6e69 6e20 6869 7320 6672 6565 2074 696d nin his free tim │ │ │ +00008810: 652e 2020 4170 6172 7420 6672 6f6d 2058 e. Apart from X │ │ │ +00008820: 456d 6163 732c 2068 6973 206d 616a 6f72 Emacs, his major │ │ │ +00008830: 2063 6f6e 7472 6962 7574 696f 6e20 6973 contribution is │ │ │ +00008840: 2022 2077 6765 7420 2257 6765 742c 2220 " wget "Wget," │ │ │ +00008850: 2257 6765 7420 686f 6d65 2070 6167 6522 "Wget home page" │ │ │ +00008860: 2022 5c6e 6869 7320 7665 7279 206f 776e "\nhis very own │ │ │ +00008870: 2063 7265 6174 696f 6e2c 206e 6f77 206a creation, now j │ │ │ +00008880: 6f69 6e74 6c79 206d 6169 6e74 6169 6e65 ointly maintaine │ │ │ +00008890: 6420 6279 2061 2068 6170 7079 2063 7265 d by a happy cre │ │ │ +000088a0: 772e 5c6e 5c6e 4865 2064 7265 616d 7320 w.\n\nHe dreams │ │ │ +000088b0: 6f66 2068 6176 696e 6720 6120 686f 6d65 of having a home │ │ │ +000088c0: 2070 6167 652e 5c6e 2220 686f 626c 6579 page.\n" hobley │ │ │ +000088d0: 2022 4920 7573 6564 2074 6f20 646f 2072 "I used to do r │ │ │ +000088e0: 6561 6c20 776f 726b 2c20 6275 7420 6e6f eal work, but no │ │ │ +000088f0: 7720 4920 616d 2061 2050 726f 6a65 6374 w I am a Project │ │ │ +00008900: 204d 616e 6167 6572 2066 6f72 206f 6e65 Manager for one │ │ │ +00008910: 206f 6620 7468 655c 6e54 656c 636f 2773 of the\nTelco's │ │ │ +00008920: 2069 6e20 4175 7374 7261 6c69 612e 2049 in Australia. I │ │ │ +00008930: 6e20 6d79 2073 7061 7265 2074 696d 6520 n my spare time │ │ │ +00008940: 4920 6c69 6b65 2074 6f20 6765 7420 6261 I like to get ba │ │ │ +00008950: 636b 2074 6f20 6261 7369 6373 2061 6e64 ck to basics and │ │ │ +00008960: 5c6e 6d75 636b 2061 726f 756e 6420 7769 \nmuck around wi │ │ │ +00008970: 7468 2074 6869 6e67 732e 2041 7320 6120 th things. As a │ │ │ +00008980: 7265 7375 6c74 2049 2073 7461 7274 6564 result I started │ │ │ +00008990: 2074 6865 204e 5420 706f 7274 2e20 486f the NT port. Ho │ │ │ +000089a0: 7065 6675 6c6c 7920 495c 6e77 696c 6c20 pefully I\nwill │ │ │ +000089b0: 6765 7420 746f 2066 696e 6973 6820 6974 get to finish it │ │ │ +000089c0: 2073 6f6d 6574 696d 6520 736f 6f6e 6572 sometime sooner │ │ │ +000089d0: 2072 6174 6865 7220 7468 616e 206c 6174 rather than lat │ │ │ +000089e0: 6572 2e20 4920 646f 2076 6167 7565 6c79 er. I do vaguely │ │ │ +000089f0: 5c6e 7265 6d65 6d62 6572 2055 6e69 7665 \nremember Unive │ │ │ +00008a00: 7273 6974 7920 7768 6572 6520 6974 2073 rsity where it s │ │ │ +00008a10: 6565 6d73 206c 696b 6520 4920 6861 6420 eems like I had │ │ │ +00008a20: 6d6f 7265 2073 7061 7265 2074 696d 6520 more spare time │ │ │ +00008a30: 7468 6174 2049 2063 616e 5c6e 6265 6c69 that I can\nbeli │ │ │ +00008a40: 6576 6520 6e6f 772e 204f 6820 7765 6c6c eve now. Oh well │ │ │ +00008a50: 2c20 7375 6368 2069 7320 6c69 6665 2e5c , such is life.\ │ │ │ +00008a60: 6e22 206a 616e 2022 4a61 6e20 5672 6f6f n" jan "Jan Vroo │ │ │ +00008a70: 6e68 6f66 2068 6173 2062 6565 6e20 7573 nhof has been us │ │ │ +00008a80: 696e 6720 5845 6d61 6373 2073 696e 6365 ing XEmacs since │ │ │ +00008a90: 2068 6520 6e65 6564 6564 2074 6f20 7772 he needed to wr │ │ │ +00008aa0: 6974 6520 2e74 6578 2066 696c 6573 5c6e ite .tex files\n │ │ │ +00008ab0: 666f 7220 6869 7320 776f 726b 2061 7320 for his work as │ │ │ +00008ac0: 6120 7068 7973 6963 7320 616e 6420 6d61 a physics and ma │ │ │ +00008ad0: 7468 7320 7374 7564 656e 7420 6174 2074 ths student at t │ │ │ +00008ae0: 6865 2055 6e69 7665 7269 7369 7479 206f he Univerisity o │ │ │ +00008af0: 6620 4c65 6964 656e 2e5c 6e48 6973 2058 f Leiden.\nHis X │ │ │ +00008b00: 456d 6163 7320 6861 636b 696e 6720 7374 Emacs hacking st │ │ │ +00008b10: 6172 7465 6420 7768 656e 2058 456d 6163 arted when XEmac │ │ │ +00008b20: 7320 6b65 7074 2066 7265 657a 696e 6720 s kept freezing │ │ │ +00008b30: 7570 2075 6e64 6572 2061 2068 6973 5c6e up under a his\n │ │ │ +00008b40: 7769 6e64 6f77 206d 616e 6167 6572 2e20 window manager. │ │ │ +00008b50: 4865 2073 7562 6d69 7474 6564 2061 2066 He submitted a f │ │ │ +00008b60: 6978 2061 6e64 2068 6173 2062 6565 6e20 ix and has been │ │ │ +00008b70: 686f 6f6b 6564 2065 7665 7279 2073 696e hooked every sin │ │ │ +00008b80: 6365 2e5c 6e5c 6e58 456d 6163 7320 6861 ce.\n\nXEmacs ha │ │ │ +00008b90: 7320 666f 6c6c 6f77 6564 2068 696d 2066 s followed him f │ │ │ +00008ba0: 6972 7374 2074 6f20 5377 6974 7a65 726c irst to Switzerl │ │ │ +00008bb0: 616e 6420 7768 6572 6520 6865 2064 6964 and where he did │ │ │ +00008bc0: 2061 206d 6174 6873 5c6e 646f 6374 6f72 a maths\ndoctor │ │ │ +00008bd0: 6174 6520 6174 2074 6865 2045 5448 2069 ate at the ETH i │ │ │ +00008be0: 6e20 5a75 7269 6368 2c20 776f 726b 696e n Zurich, workin │ │ │ +00008bf0: 6720 6f6e 2061 2063 6f6e 6a65 6374 7572 g on a conjectur │ │ │ +00008c00: 6520 6279 204d 6967 6461 6c20 6f6e 5c6e e by Migdal on\n │ │ │ +00008c10: 7468 6520 6265 6861 7669 6f72 206f 6620 the behavior of │ │ │ +00008c20: 7665 7274 6578 2063 6f72 7265 6374 696f vertex correctio │ │ │ +00008c30: 6e73 2069 6e20 456c 6563 7472 6f6e 2d50 ns in Electron-P │ │ │ +00008c40: 686f 6e6f 6e20 7468 656f 7279 2e20 2046 honon theory. F │ │ │ +00008c50: 696e 616c 6c79 5c6e 7368 6172 696e 6720 inally\nsharing │ │ │ +00008c60: 6120 686f 7573 6520 7769 7468 2068 6973 a house with his │ │ │ +00008c70: 206c 6f76 6564 206f 6e65 2c20 6865 206e loved one, he n │ │ │ +00008c80: 6f77 206c 6976 6573 2069 6e20 4f78 666f ow lives in Oxfo │ │ │ +00008c90: 7264 2028 554b 295c 6e77 6f72 6b69 6e67 rd (UK)\nworking │ │ │ +00008ca0: 206f 6e20 7468 6520 4a65 6f64 6520 4a61 on the Jeode Ja │ │ │ +00008cb0: 7661 2056 6972 7475 616c 204d 6163 6869 va Virtual Machi │ │ │ +00008cc0: 6e65 2c20 7768 6963 6820 6c69 6b65 2058 ne, which like X │ │ │ +00008cd0: 456d 6163 7320 6973 5c6e 706f 7274 6162 Emacs is\nportab │ │ │ +00008ce0: 6c65 2c20 696d 706c 656d 656e 7473 2061 le, implements a │ │ │ +00008cf0: 206c 616e 6775 6167 652c 2069 6e63 6c75 language, inclu │ │ │ +00008d00: 6465 7320 6120 6e6f 6e2d 7472 6976 6961 des a non-trivia │ │ │ +00008d10: 6c20 6269 7420 6f66 5c6e 6772 6170 6869 l bit of\ngraphi │ │ │ +00008d20: 6373 2061 6e64 2061 2067 6172 6261 6765 cs and a garbage │ │ │ +00008d30: 2063 6f6c 6c65 6374 6f72 2c20 6275 7420 collector, but │ │ │ +00008d40: 6973 206d 756c 7469 7468 7265 6164 6564 is multithreaded │ │ │ +00008d50: 2074 6f20 626f 6f74 215c 6e55 6e66 6f72 to boot!\nUnfor │ │ │ +00008d60: 7475 6e61 7465 6c79 2068 6973 2058 456d tunately his XEm │ │ │ +00008d70: 6163 7320 7469 6d65 2069 7320 6469 7265 acs time is dire │ │ │ +00008d80: 6374 6c79 206c 696d 6974 6564 2062 7920 ctly limited by │ │ │ +00008d90: 7468 6520 616d 6f75 6e74 206f 665c 6e74 the amount of\nt │ │ │ +00008da0: 7261 6666 6963 206f 6e20 7468 6520 4d34 raffic on the M4 │ │ │ +00008db0: 302e 5c6e 2220 6a61 7320 225c 6e53 696d 0.\n" jas "\nSim │ │ │ +00008dc0: 6f6e 206c 6976 6573 2069 6e20 5374 6f63 on lives in Stoc │ │ │ +00008dd0: 6b68 6f6c 6d20 7768 6572 6520 6865 2068 kholm where he h │ │ │ +00008de0: 6173 2064 6973 636f 7665 7265 6420 7468 as discovered th │ │ │ +00008df0: 6174 2063 6f6d 7075 7465 7273 5c6e 6361 at computers\nca │ │ │ +00008e00: 6e20 6265 2061 2070 6f77 6572 6675 6c20 n be a powerful │ │ │ +00008e10: 7072 6f63 7261 7374 696e 6174 696e 6720 procrastinating │ │ │ +00008e20: 746f 6f6c 2e20 2043 6f6d 6269 6e65 6420 tool. Combined │ │ │ +00008e30: 7769 7468 2061 5c6e 6672 7573 7472 6174 with a\nfrustrat │ │ │ +00008e40: 696e 6720 6465 7369 7265 2074 6f20 7365 ing desire to se │ │ │ +00008e50: 6520 636f 6d70 7574 6572 7320 7369 6d70 e computers simp │ │ │ +00008e60: 6c79 2077 6f72 6b2c 2068 6520 7370 656e ly work, he spen │ │ │ +00008e70: 6473 206d 6f73 745c 6e6f 6620 6869 7320 ds most\nof his │ │ │ +00008e80: 7469 6d65 2063 6f6d 706c 6169 6e69 6e67 time complaining │ │ │ +00008e90: 2e20 204f 6363 6173 696f 6e61 6c6c 7920 . Occasionally │ │ │ +00008ea0: 6865 2072 6973 6573 2075 7020 746f 2074 he rises up to t │ │ │ +00008eb0: 6865 2074 6173 6b5c 6e61 6e64 2070 726f he task\nand pro │ │ │ +00008ec0: 6475 6365 7320 736f 6d65 7468 696e 6720 duces something │ │ │ +00008ed0: 7468 6174 206f 7468 6572 7320 6d61 7920 that others may │ │ │ +00008ee0: 636f 6d70 6c61 696e 2061 626f 7574 2c20 complain about, │ │ │ +00008ef0: 7768 6963 685c 6e62 7269 6e67 7320 6869 which\nbrings hi │ │ │ +00008f00: 6d20 696e 6372 6561 7365 6420 7361 7469 m increased sati │ │ │ +00008f10: 7366 6163 7469 6f6e 2077 6974 6820 6576 sfaction with ev │ │ │ +00008f20: 6572 7920 6275 6720 7265 706f 7274 2e20 ery bug report. │ │ │ +00008f30: 2054 6f64 6179 5c6e 6865 2069 7320 7072 Today\nhe is pr │ │ │ +00008f40: 6574 656e 6469 6e67 2074 6f20 6265 2061 etending to be a │ │ │ +00008f50: 206e 6574 776f 726b 2073 6563 7572 6974 network securit │ │ │ +00008f60: 7920 6775 792c 2077 6974 6820 6120 7072 y guy, with a pr │ │ │ +00008f70: 6566 6572 656e 6365 5c6e 666f 7220 7374 eference\nfor st │ │ │ +00008f80: 616e 6461 7264 697a 6174 696f 6e20 6973 andardization is │ │ │ +00008f90: 7375 6573 2c20 7768 696c 6520 7365 6372 sues, while secr │ │ │ +00008fa0: 6574 6c79 206c 6f6e 6769 6e67 2074 6f20 etly longing to │ │ │ +00008fb0: 7374 6172 7420 615c 6e63 6166 6520 6f72 start a\ncafe or │ │ │ +00008fc0: 2062 6563 6f6d 696e 6720 6120 7468 656f becoming a theo │ │ │ +00008fd0: 7265 7469 6361 6c20 636f 6d70 7574 6572 retical computer │ │ │ +00008fe0: 2073 6369 656e 7469 7374 2e20 2048 6973 scientist. His │ │ │ +00008ff0: 2070 6572 736f 6e61 6c5c 6e69 6e74 6572 personal\ninter │ │ │ +00009000: 6573 7420 6973 206c 6974 6572 6174 7572 est is literatur │ │ │ +00009010: 652c 2061 6e64 2074 6f20 736f 6d65 2065 e, and to some e │ │ │ +00009020: 7874 656e 7420 7472 6176 656c 696e 672c xtent traveling, │ │ │ +00009030: 2062 7574 2077 696c 6c5c 6e74 7279 2061 but will\ntry a │ │ │ +00009040: 6e79 7468 696e 6720 666f 7220 6675 6e2c nything for fun, │ │ │ +00009050: 2073 7563 6820 6173 206a 7567 676c 696e such as jugglin │ │ │ +00009060: 672c 2073 6b69 696e 672c 2077 696e 652c g, skiing, wine, │ │ │ +00009070: 2061 6e64 5c6e 6c6f 6e67 2d64 6973 7461 and\nlong-dista │ │ │ +00009080: 6e63 6520 6269 6b69 6e67 2e5c 6e5c 6e53 nce biking.\n\nS │ │ │ +00009090: 6565 3a20 2220 2256 6973 6974 2053 696d ee: " "Visit Sim │ │ │ +000090a0: 6f6e 2773 2068 6f6d 6570 6167 6522 206a on's homepage" j │ │ │ +000090b0: 6172 6574 6820 224a 6172 6574 6820 4865 areth "Jareth He │ │ │ +000090c0: 696e 2069 7320 6120 6d6f 756e 7461 696e in is a mountain │ │ │ +000090d0: 2062 6f79 2077 686f 2061 6261 6e64 6f6e boy who abandon │ │ │ +000090e0: 6564 2068 6973 2068 6f6d 6520 7374 6174 ed his home stat │ │ │ +000090f0: 6520 6f66 2043 6f6c 6f72 6164 6f5c 6e66 e of Colorado\nf │ │ │ +00009100: 6f72 2074 6865 2070 6572 7065 7475 616c or the perpetual │ │ │ +00009110: 2073 7461 7465 206f 6620 6368 616f 7320 state of chaos │ │ │ +00009120: 6b6e 6f77 6e20 6173 2054 6f6b 796f 2069 known as Tokyo i │ │ │ +00009130: 6e20 6120 6661 696c 6564 2061 7474 656d n a failed attem │ │ │ +00009140: 7074 2074 6f5c 6e62 6563 6f6d 6520 6120 pt to\nbecome a │ │ │ +00009150: 6365 6c2d 616e 696d 6174 6f72 2c20 616e cel-animator, an │ │ │ +00009160: 6420 6120 6d6f 7265 2073 7563 6365 7373 d a more success │ │ │ +00009170: 6675 6c20 6f6e 6520 746f 2062 6563 6f6d ful one to becom │ │ │ +00009180: 6520 615c 6e63 6f6d 7075 7465 722d 6761 e a\ncomputer-ga │ │ │ +00009190: 6d65 2070 726f 6772 616d 6d65 722e 2041 me programmer. A │ │ │ +000091a0: 7320 6865 2068 6170 7065 6e73 2074 6f20 s he happens to │ │ │ +000091b0: 6265 2062 696c 696e 6775 616c 2028 6775 be bilingual (gu │ │ │ +000091c0: 6573 7320 7768 6963 685c 6e74 776f 3f29 ess which\ntwo?) │ │ │ +000091d0: 2068 6527 7320 6265 656e 2064 6f69 6e67 he's been doing │ │ │ +000091e0: 2071 7569 7465 2061 2062 6974 206f 6620 quite a bit of │ │ │ +000091f0: 4d55 4c45 2068 6163 6b69 6e67 2e20 2048 MULE hacking. H │ │ │ +00009200: 6527 7320 616c 736f 2067 6574 7469 6e67 e's also getting │ │ │ +00009210: 5c6e 6869 7320 6861 6e64 7320 6469 7274 \nhis hands dirt │ │ │ +00009220: 7920 696e 2074 6865 2067 7261 7068 6963 y in the graphic │ │ │ +00009230: 7320 6172 6561 7320 6173 2077 656c 6c2e s areas as well. │ │ │ +00009240: 5c6e 2220 6a61 736f 6e20 224a 6173 6f6e \n" jason "Jason │ │ │ +00009250: 2072 6573 6964 6573 2069 6e20 4e6f 7274 resides in Nort │ │ │ +00009260: 6865 726e 204e 6577 204d 6578 6963 6f20 hern New Mexico │ │ │ +00009270: 7768 6572 6520 6865 2077 6f72 6b73 2061 where he works a │ │ │ +00009280: 7320 6120 5379 7374 656d 735c 6e53 6369 s a Systems\nSci │ │ │ +00009290: 656e 7469 7374 2874 6d29 2069 6e20 7468 entist(tm) in th │ │ │ +000092a0: 6520 4c6f 7320 416c 616d 6f73 204e 6174 e Los Alamos Nat │ │ │ +000092b0: 696f 6e61 6c20 4c61 626f 7261 746f 7279 ional Laboratory │ │ │ +000092c0: 2773 2041 6476 616e 6365 645c 6e43 6f6d 's Advanced\nCom │ │ │ +000092d0: 7075 7469 6e67 2047 726f 7570 2e5c 6e5c puting Group.\n\ │ │ │ +000092e0: 6e53 6565 3a20 2220 2256 6973 6974 204a nSee: " "Visit J │ │ │ +000092f0: 6173 6f6e 2773 2068 6f6d 6570 6167 6522 ason's homepage" │ │ │ +00009300: 206a 656e 7320 2249 276d 2063 7572 7265 jens "I'm curre │ │ │ +00009310: 6e74 6c79 2077 6f72 6b69 6e67 2066 6f72 ntly working for │ │ │ +00009320: 2031 2631 2049 6e74 6572 6e65 7420 4147 1&1 Internet AG │ │ │ +00009330: 2c20 6120 6c61 7267 6520 446f 6d61 696e , a large Domain │ │ │ +00009340: 2061 6e64 2057 6562 7370 6163 655c 6e50 and Webspace\nP │ │ │ +00009350: 726f 7669 6465 7220 696e 2047 6572 6d61 rovider in Germa │ │ │ +00009360: 6e79 2061 6e64 2045 7572 6f70 652e 2020 ny and Europe. │ │ │ +00009370: 4920 646f 206d 6f73 746c 7920 4a61 7661 I do mostly Java │ │ │ +00009380: 2f58 4d4c 2f4f 4f2f 436f 6d70 6f6e 656e /XML/OO/Componen │ │ │ +00009390: 745c 6e73 7475 6666 2074 6f64 6179 2e20 t\nstuff today. │ │ │ +000093a0: 2049 276d 2069 6e74 6572 6573 7465 6420 I'm interested │ │ │ +000093b0: 454a 422c 2043 6f72 6261 2061 6e64 206f EJB, Corba and o │ │ │ +000093c0: 7468 6572 206d 6964 646c 6577 6172 6520 ther middleware │ │ │ +000093d0: 6f72 5c6e 6469 7374 7269 6275 7465 6420 or\ndistributed │ │ │ +000093e0: 5379 7374 656d 732e 2020 4265 7369 6465 Systems. Beside │ │ │ +000093f0: 7320 776f 726b 2c20 4920 6f63 6361 7369 s work, I occasi │ │ │ +00009400: 6f6e 616c 6c79 2068 6163 6b20 6f6e 2054 onally hack on T │ │ │ +00009410: 6865 2047 696d 705c 6e61 6e64 206f 7468 he Gimp\nand oth │ │ │ +00009420: 6572 2067 746b 2f67 6e6f 6d65 2072 656c er gtk/gnome rel │ │ │ +00009430: 6174 6564 2070 726f 6a65 6374 732e 2020 ated projects. │ │ │ +00009440: 4d61 7962 6520 7468 6520 6164 7665 6e74 Maybe the advent │ │ │ +00009450: 206f 6620 5845 6d61 6373 2f47 746b 5c6e of XEmacs/Gtk\n │ │ │ +00009460: 7769 6c6c 2067 6574 206d 6520 6261 636b will get me back │ │ │ +00009470: 2074 6f20 7370 656e 6420 736f 6d65 2074 to spend some t │ │ │ +00009480: 696d 6520 6167 6169 6e20 6861 636b 696e ime again hackin │ │ │ +00009490: 6720 6f6e 2058 456d 6163 7320 696e 2074 g on XEmacs in t │ │ │ +000094a0: 6865 5c6e 6e65 6172 2066 7574 7572 652e he\nnear future. │ │ │ +000094b0: 5c6e 2220 6a6d 696c 6c65 7220 224a 6566 \n" jmiller "Jef │ │ │ +000094c0: 6620 6772 6577 2075 7020 696e 2049 6e64 f grew up in Ind │ │ │ +000094d0: 6961 6e61 2061 6e64 2069 7320 6120 636f iana and is a co │ │ │ +000094e0: 756e 7472 7920 626f 7920 6174 2068 6561 untry boy at hea │ │ │ +000094f0: 7274 2e20 2048 6520 6375 7272 656e 746c rt. He currentl │ │ │ +00009500: 795c 6e6c 6976 6573 2069 6e2c 206f 6620 y\nlives in, of │ │ │ +00009510: 616c 6c20 706c 6163 6573 2c20 4d69 6c6c all places, Mill │ │ │ +00009520: 6572 7376 696c 6c65 204d 6172 796c 616e ersville Marylan │ │ │ +00009530: 642e 2020 4865 2073 7065 6e64 7320 6120 d. He spends a │ │ │ +00009540: 6c6f 7420 6f66 5c6e 6869 7320 6672 6565 lot of\nhis free │ │ │ +00009550: 2074 696d 6520 7469 6e6b 6572 696e 6720 time tinkering │ │ │ +00009560: 7769 7468 204c 696e 7578 2061 6e64 2068 with Linux and h │ │ │ +00009570: 6163 6b69 6e67 206f 6e20 5845 6d61 6373 acking on XEmacs │ │ │ +00009580: 2061 6e64 206c 6f76 6573 2069 745c 6e77 and loves it\nw │ │ │ +00009590: 6865 6e20 6865 2066 696e 6473 206e 6577 hen he finds new │ │ │ +000095a0: 2063 6f6f 6c20 6665 6174 7572 6573 2069 cool features i │ │ │ +000095b0: 6e20 6569 7468 6572 2e20 2057 6865 6e20 n either. When │ │ │ +000095c0: 6865 2773 206e 6f74 2064 6f69 6e67 2074 he's not doing t │ │ │ +000095d0: 6861 742c 5c6e 6865 2065 6e6a 6f79 7320 hat,\nhe enjoys │ │ │ +000095e0: 646f 776e 6869 6c6c 2073 6b69 696e 672c downhill skiing, │ │ │ +000095f0: 2070 757a 7a6c 6573 2c20 616e 6420 7363 puzzles, and sc │ │ │ +00009600: 692d 6669 2e20 204a 6566 6620 6973 2061 i-fi. Jeff is a │ │ │ +00009610: 6c73 6f20 7265 616c 6c79 5c6e 696e 7465 lso really\ninte │ │ │ +00009620: 7265 7374 6564 2069 6e20 636c 6173 7369 rested in classi │ │ │ +00009630: 6361 6c20 526f 6d61 6e20 6869 7374 6f72 cal Roman histor │ │ │ +00009640: 7920 616e 6420 656e 6a6f 7973 206d 616b y and enjoys mak │ │ │ +00009650: 696e 6720 7472 6970 7320 746f 5c6e 4974 ing trips to\nIt │ │ │ +00009660: 616c 792c 2077 6865 7265 2068 6520 7761 aly, where he wa │ │ │ +00009670: 7320 626f 726e 2c20 616e 6420 7365 6569 s born, and seei │ │ │ +00009680: 6e67 2074 6865 2073 6967 6874 7322 206a ng the sights" j │ │ │ +00009690: 6f6e 6174 6861 6e20 2249 2077 6f72 6b20 onathan "I work │ │ │ +000096a0: 666f 7220 5379 6d62 6961 6e20 4c74 6420 for Symbian Ltd │ │ │ +000096b0: 696e 204c 6f6e 646f 6e2c 2045 6e67 6c61 in London, Engla │ │ │ +000096c0: 6e64 2c20 6c6f 6f6b 696e 6720 6166 7465 nd, looking afte │ │ │ +000096d0: 7220 6c6f 772d 6c65 7665 6c5c 6e6b 6572 r low-level\nker │ │ │ +000096e0: 6e65 6c2c 2070 6572 6970 6865 7261 6c20 nel, peripheral │ │ │ +000096f0: 616e 6420 746f 6f6c 6368 6169 6e20 7374 and toolchain st │ │ │ +00009700: 7566 6620 666f 7220 7468 6520 4550 4f43 uff for the EPOC │ │ │ +00009710: 204f 532e 5c6e 5c6e 4927 7665 2062 6565 OS.\n\nI've bee │ │ │ +00009720: 6e20 7573 696e 6720 5845 6d61 6373 2073 n using XEmacs s │ │ │ +00009730: 696e 6365 2031 3939 342c 2062 7574 2064 ince 1994, but d │ │ │ +00009740: 6964 6e27 7420 7374 6172 7420 6861 636b idn't start hack │ │ │ +00009750: 696e 6720 6f6e 2069 745c 6e75 6e74 696c ing on it\nuntil │ │ │ +00009760: 206c 6174 6520 3139 3937 2077 6865 6e20 late 1997 when │ │ │ +00009770: 4920 7374 6172 7465 6420 776f 726b 696e I started workin │ │ │ +00009780: 6720 6174 2053 796d 6269 616e 2c20 6120 g at Symbian, a │ │ │ +00009790: 5769 6e64 6f77 732d 6f6e 6c79 5c6e 636f Windows-only\nco │ │ │ +000097a0: 6d70 616e 792c 2061 6e64 2066 656c 7420 mpany, and felt │ │ │ +000097b0: 6c6f 7374 2077 6974 686f 7574 206d 7920 lost without my │ │ │ +000097c0: 6661 766f 7572 6974 6520 6564 6974 696e favourite editin │ │ │ +000097d0: 6720 656e 7669 726f 6e6d 656e 742e 5c6e g environment.\n │ │ │ +000097e0: 2220 6a75 6870 2022 4a65 6e73 2077 6173 " juhp "Jens was │ │ │ +000097f0: 2062 6f72 6e20 696e 2043 6f70 656e 6861 born in Copenha │ │ │ +00009800: 6765 6e2c 2067 7265 7720 7570 2069 6e20 gen, grew up in │ │ │ +00009810: 4272 6974 6169 6e20 616e 6420 6973 206e Britain and is n │ │ │ +00009820: 6f77 206c 6976 696e 6720 696e 5c6e 4a61 ow living in\nJa │ │ │ +00009830: 7061 6e2e 2020 4865 2073 7461 7274 6564 pan. He started │ │ │ +00009840: 2075 7369 6e67 2058 456d 6163 7320 3230 using XEmacs 20 │ │ │ +00009850: 2028 696e 7374 6561 6420 6f66 2045 6d61 (instead of Ema │ │ │ +00009860: 6373 2920 6173 2068 6973 5c6e 776f 726b cs) as his\nwork │ │ │ +00009870: 2d65 6e76 6972 6f6e 6d65 6e74 2069 6e20 -environment in │ │ │ +00009880: 4a75 6e65 2031 3939 3720 7768 696c 6520 June 1997 while │ │ │ +00009890: 7374 696c 6c20 616e 2045 5520 706f 7374 still an EU post │ │ │ +000098a0: 646f 6320 6174 2052 494d 532c 204b 796f doc at RIMS, Kyo │ │ │ +000098b0: 746f 5c6e 556e 6976 6572 7369 7479 2c20 to\nUniversity, │ │ │ +000098c0: 616e 6420 7175 6963 6b6c 7920 676f 7420 and quickly got │ │ │ +000098d0: 696e 766f 6c76 6564 2069 6e20 5845 6d61 involved in XEma │ │ │ +000098e0: 6373 2064 6576 656c 6f70 6d65 6e74 2e20 cs development. │ │ │ +000098f0: 2052 6563 656e 746c 795c 6e68 6520 6973 Recently\nhe is │ │ │ +00009900: 2067 6574 7469 6e67 2069 6e74 6f20 4861 getting into Ha │ │ │ +00009910: 736b 656c 6c2c 2061 2076 6572 7920 6e69 skell, a very ni │ │ │ +00009920: 6365 2070 7572 6520 6675 6e63 7469 6f6e ce pure function │ │ │ +00009930: 616c 2070 726f 6772 616d 6d69 6e67 5c6e al programming\n │ │ │ +00009940: 6c61 6e67 7561 6765 2e5c 6e5c 6e22 2022 language.\n\n" " │ │ │ +00009950: 5669 7369 7420 4a65 6e73 2720 686f 6d65 Visit Jens' home │ │ │ +00009960: 7061 6765 2220 6a77 7a20 2209 2220 6162 page" jwz "." ab │ │ │ +00009970: 6f75 742d 7769 7468 2d66 6163 6520 225c out-with-face "\ │ │ │ +00009980: 2253 6f20 6d75 6368 2074 6f20 646f 2c20 "So much to do, │ │ │ +00009990: 736f 206c 6974 746c 6520 7469 6d65 2e5c so little time.\ │ │ │ +000099a0: 2222 2069 7461 6c69 6320 225c 6e5c 6e4a "" italic "\n\nJ │ │ │ +000099b0: 616d 6965 205a 6177 696e 736b 6920 7761 amie Zawinski wa │ │ │ +000099c0: 7320 7072 696d 6172 696c 7920 746f 2062 s primarily to b │ │ │ +000099d0: 6c61 6d65 2066 6f72 204c 7563 6964 2045 lame for Lucid E │ │ │ +000099e0: 6d61 6373 2066 726f 6d20 6974 735c 6e69 macs from its\ni │ │ │ +000099f0: 6e63 6570 7469 6f6e 2069 6e20 3139 3931 nception in 1991 │ │ │ +00009a00: 2c20 746f 2031 3939 3420 7768 656e 204c , to 1994 when L │ │ │ +00009a10: 7563 6964 2049 6e63 2e20 6669 6e61 6c6c ucid Inc. finall │ │ │ +00009a20: 7920 6469 6564 2e20 2041 6674 6572 2074 y died. After t │ │ │ +00009a30: 6861 742c 5c6e 6865 2077 6173 206f 6e65 hat,\nhe was one │ │ │ +00009a40: 206f 6620 7468 6520 696e 6974 6961 6c20 of the initial │ │ │ +00009a50: 656d 706c 6f79 6565 7320 6f66 204e 6574 employees of Net │ │ │ +00009a60: 7363 6170 6520 436f 6d6d 756e 6963 6174 scape Communicat │ │ │ +00009a70: 696f 6e73 2c20 7772 6974 696e 675c 6e74 ions, writing\nt │ │ │ +00009a80: 6865 2066 6972 7374 2055 6e69 7820 7665 he first Unix ve │ │ │ +00009a90: 7273 696f 6e20 6f66 204e 6574 7363 6170 rsion of Netscap │ │ │ +00009aa0: 6520 4e61 7669 6761 746f 722c 2061 6e64 e Navigator, and │ │ │ +00009ab0: 2064 6573 6967 6e69 6e67 2061 6e64 5c6e designing and\n │ │ │ +00009ac0: 696d 706c 656d 656e 7469 6e67 2074 6865 implementing the │ │ │ +00009ad0: 2066 6972 7374 2076 6572 7369 6f6e 206f first version o │ │ │ +00009ae0: 6620 7468 6520 4e65 7473 6361 7065 204d f the Netscape M │ │ │ +00009af0: 6169 6c20 616e 6420 4e65 7773 2072 6561 ail and News rea │ │ │ +00009b00: 6465 7273 2e5c 6e48 6520 7468 656e 2068 ders.\nHe then h │ │ │ +00009b10: 656c 7065 6420 6372 6561 7465 2061 6e64 elped create and │ │ │ +00009b20: 2072 756e 2022 2022 6874 7470 3a2f 2f77 run " "http://w │ │ │ +00009b30: 7777 2e6d 6f7a 696c 6c61 2e6f 7267 2f22 ww.mozilla.org/" │ │ │ +00009b40: 2022 6d6f 7a69 6c6c 612e 6f72 6722 2022 "mozilla.org" " │ │ │ +00009b50: 5669 7369 7420 5468 6520 4d6f 7a69 6c6c Visit The Mozill │ │ │ +00009b60: 6120 4f72 6761 6e69 7a61 7469 6f6e 2220 a Organization" │ │ │ +00009b70: 2220 666f 7220 6974 7320 6669 7273 7420 " for its first │ │ │ +00009b80: 7477 6f20 7965 6172 732c 5c6e 756e 7469 two years,\nunti │ │ │ +00009b90: 6c20 416d 6572 6963 6120 4f6e 6c69 6e65 l America Online │ │ │ +00009ba0: 2062 6f75 6768 7420 4e65 7473 6361 7065 bought Netscape │ │ │ +00009bb0: 2043 6f6d 6d75 6e69 6361 7469 6f6e 732c Communications, │ │ │ +00009bc0: 2061 7420 7768 6963 6820 706f 696e 7420 at which point │ │ │ +00009bd0: 6865 5c6e 6761 7665 2075 7020 696e 2064 he\ngave up in d │ │ │ +00009be0: 6973 6775 7374 2061 6e64 2064 726f 7070 isgust and dropp │ │ │ +00009bf0: 6564 206f 7574 206f 6620 7468 6520 636f ed out of the co │ │ │ +00009c00: 6d70 7574 6572 2069 6e64 7573 7472 7920 mputer industry │ │ │ +00009c10: 656e 7469 7265 6c79 2e5c 6e5c 6e48 6520 entirely.\n\nHe │ │ │ +00009c20: 6e6f 7720 7275 6e73 2061 2022 2022 6874 now runs a " "ht │ │ │ +00009c30: 7470 3a2f 2f77 7777 2e64 6e61 6c6f 756e tp://www.dnaloun │ │ │ +00009c40: 6765 2e63 6f6d 2f22 2022 6e69 6768 7463 ge.com/" "nightc │ │ │ +00009c50: 6c75 6222 2022 5669 7369 7420 5468 6520 lub" "Visit The │ │ │ +00009c60: 444e 4120 4c6f 756e 6765 2220 2220 696e DNA Lounge" " in │ │ │ +00009c70: 2053 616e 2046 7261 6e63 6973 636f 2c20 San Francisco, │ │ │ +00009c80: 616e 6420 6f63 6361 7369 6f6e 616c 6c79 and occasionally │ │ │ +00009c90: 2077 7269 7465 735c 6e73 6372 6565 6e20 writes\nscreen │ │ │ +00009ca0: 7361 7665 7273 2e5c 6e5c 6e22 2022 5669 savers.\n\n" "Vi │ │ │ +00009cb0: 7369 7420 6a77 7a27 7320 2220 2268 6f6d sit jwz's " "hom │ │ │ +00009cc0: 6520 7061 6765 2220 2256 6973 6974 206a e page" "Visit j │ │ │ +00009cd0: 777a 2773 2068 6f6d 6520 7061 6765 2220 wz's home page" │ │ │ +00009ce0: 6b61 7a7a 2022 4b61 7a7a 2069 7320 7468 kazz "Kazz is th │ │ │ +00009cf0: 6520 5845 6d61 6373 206c 6561 6420 6f6e e XEmacs lead on │ │ │ +00009d00: 2042 5344 2028 6573 7065 6369 616c 6c79 BSD (especially │ │ │ +00009d10: 2046 7265 6542 5344 292e 5c6e 4869 7320 FreeBSD).\nHis │ │ │ +00009d20: 6d61 696e 2077 6f72 6b73 7061 6365 2069 main workspace i │ │ │ +00009d30: 732c 2070 726f 6261 626c 792c 2074 6865 s, probably, the │ │ │ +00009d40: 206c 6174 6573 7420 7374 6162 6c65 2076 latest stable v │ │ │ +00009d50: 6572 7369 6f6e 206f 665c 6e46 7265 6542 ersion of\nFreeB │ │ │ +00009d60: 5344 2061 6e64 2069 7420 6d61 6b65 7320 SD and it makes │ │ │ +00009d70: 6869 6d20 636f 6d66 6f72 7461 626c 6520 him comfortable │ │ │ +00009d80: 616e 6420 6e6f 742e 5c6e 4869 7320 2a6d and not.\nHis *m │ │ │ +00009d90: 6973 7369 6f6e 2a20 6973 2074 6f20 6d61 ission* is to ma │ │ │ +00009da0: 6b65 2058 456d 6163 7320 7275 6e73 206f ke XEmacs runs o │ │ │ +00009db0: 6e20 4672 6565 4253 4420 7769 7468 6f75 n FreeBSD withou │ │ │ +00009dc0: 745c 6e61 6e79 2070 726f 626c 656d 2e5c t\nany problem.\ │ │ │ +00009dd0: 6e5c 6e49 6e20 7265 616c 206c 6966 652c n\nIn real life, │ │ │ +00009de0: 2068 6520 6973 2077 6f72 6b69 6e67 206f he is working o │ │ │ +00009df0: 6e20 6120 5044 4d20 7072 6f64 7563 7420 n a PDM product │ │ │ +00009e00: 6261 7365 6420 6f6e 2043 4f52 4241 2c5c based on CORBA,\ │ │ │ +00009e10: 6e61 6e64 2064 6f69 6e67 2063 6f6e 7375 nand doing consu │ │ │ +00009e20: 6c74 6174 696f 6e2c 2064 6573 6967 6e20 ltation, design │ │ │ +00009e30: 616e 6420 696d 706c 656d 656e 7469 6f6e and implemention │ │ │ +00009e40: 2e5c 6e48 6520 6c6f 7665 7320 746f 2070 .\nHe loves to p │ │ │ +00009e50: 6c61 7920 736f 6363 6572 2c20 7965 7320 lay soccer, yes │ │ │ +00009e60: 666f 6f74 6261 6c6c 215c 6e53 6565 2061 football!\nSee a │ │ │ +00009e70: 6c73 6f3a 2220 2256 6973 6974 204b 617a lso:" "Visit Kaz │ │ │ +00009e80: 7a27 7320 686f 6d65 2070 6167 6522 206b z's home page" k │ │ │ +00009e90: 6972 696c 6c20 6b79 6c65 2022 5365 655c irill kyle "See\ │ │ │ +00009ea0: 6e22 2022 5669 7369 7420 4b79 6c65 2773 n" "Visit Kyle's │ │ │ +00009eb0: 2048 6f6d 6520 7061 6765 2220 6c61 7273 Home page" lars │ │ │ +00009ec0: 6920 224c 6172 7327 7320 6461 7920 6a6f i "Lars's day jo │ │ │ +00009ed0: 6220 6973 2061 7320 7468 6520 6865 6164 b is as the head │ │ │ +00009ee0: 206f 6620 7468 6520 4954 2064 6570 6172 of the IT depar │ │ │ +00009ef0: 746d 656e 7420 6f66 2061 204e 6f72 7765 tment of a Norwe │ │ │ +00009f00: 6769 616e 5c6e 496e 7465 726e 6574 2073 gian\nInternet s │ │ │ +00009f10: 746f 636b 2062 726f 6b65 722e 2020 4865 tock broker. He │ │ │ +00009f20: 2063 6c61 696d 7320 6e6f 2072 6573 706f claims no respo │ │ │ +00009f30: 6e73 6962 696c 6974 7920 666f 7220 7468 nsibility for th │ │ │ +00009f40: 6520 446f 745c 6e43 6f6d 2042 6f6d 622c e Dot\nCom Bomb, │ │ │ +00009f50: 2062 7574 2068 6520 736e 6963 6b65 7273 but he snickers │ │ │ +00009f60: 2061 206c 6f74 2e5c 6e5c 6e53 6565 2022 a lot.\n\nSee " │ │ │ +00009f70: 2022 5669 7369 7420 7468 6520 4c61 7273 "Visit the Lars │ │ │ +00009f80: 6973 7369 7374 6963 2070 6167 6573 2220 issistic pages" │ │ │ +00009f90: 6d61 7263 7061 2022 4920 776f 726b 2066 marcpa "I work f │ │ │ +00009fa0: 6f72 2050 6f73 6974 726f 6e20 496e 6475 or Positron Indu │ │ │ +00009fb0: 7374 7269 6573 2049 6e63 2e2c 2050 7562 stries Inc., Pub │ │ │ +00009fc0: 6c69 6320 5361 6665 7479 2044 6976 6973 lic Safety Divis │ │ │ +00009fd0: 696f 6e2e 5c6e 4927 6d20 7061 7274 206f ion.\nI'm part o │ │ │ +00009fe0: 6620 7468 6520 7465 616d 2070 726f 6475 f the team produ │ │ │ +00009ff0: 6369 6e67 2050 4f57 4552 2039 3131 2c20 cing POWER 911, │ │ │ +0000a000: 6120 3931 3120 656d 6572 6765 6e63 7920 a 911 emergency │ │ │ +0000a010: 7265 7370 6f6e 7365 5c6e 7379 7374 656d response\nsystem │ │ │ +0000a020: 2077 7269 7474 656e 2069 6e20 4d6f 6475 written in Modu │ │ │ +0000a030: 6c61 333a 5c6e 2220 2256 6973 6974 2050 la3:\n" "Visit P │ │ │ +0000a040: 4f57 4552 2039 3131 2220 225c 6e5c 6e50 OWER 911" "\n\nP │ │ │ +0000a050: 7265 7669 6f75 736c 792c 2049 2077 6f72 reviously, I wor │ │ │ +0000a060: 6b65 6420 6174 2053 6f66 7469 6d61 6765 ked at Softimage │ │ │ +0000a070: 2049 6e63 2e2c 206e 6f77 2061 204d 6963 Inc., now a Mic │ │ │ +0000a080: 726f 736f 6674 2063 6f6d 7061 6e79 5c6e rosoft company\n │ │ │ +0000a090: 2865 6565 6b6b 6b21 292c 2061 7320 6120 (eeekkk!), as a │ │ │ +0000a0a0: 554e 4958 2073 7973 7465 6d20 6164 6d69 UNIX system admi │ │ │ +0000a0b0: 6e69 7374 7261 746f 722e 2020 5468 6973 nistrator. This │ │ │ +0000a0c0: 2069 7320 7768 6572 6520 4927 7665 2062 is where I've b │ │ │ +0000a0d0: 6565 6e5c 6e63 6f6e 7665 7274 6564 2074 een\nconverted t │ │ │ +0000a0e0: 6f20 4e54 2e5c 6e5c 6e49 6e20 6120 7072 o NT.\n\nIn a pr │ │ │ +0000a0f0: 6576 696f 7573 206c 6966 652c 2049 2077 evious life, I w │ │ │ +0000a100: 6173 2061 2070 726f 6772 616d 6d65 722f as a programmer/ │ │ │ +0000a110: 7379 7361 646d 696e 2061 7420 4352 494d sysadmin at CRIM │ │ │ +0000a120: 2028 4365 6e74 7265 2064 655c 6e52 6563 (Centre de\nRec │ │ │ +0000a130: 6865 7263 6865 2049 6e66 6f72 6d61 7469 herche Informati │ │ │ +0000a140: 7175 6520 6465 204d 6f6e 7472 6561 6c29 que de Montreal) │ │ │ +0000a150: 2066 6f72 2074 6865 2073 7065 6563 6820 for the speech │ │ │ +0000a160: 7265 636f 676e 6974 696f 6e20 6772 6f75 recognition grou │ │ │ +0000a170: 702e 5c6e 2220 6d61 7274 696e 2022 4d61 p.\n" martin "Ma │ │ │ +0000a180: 7274 696e 2077 6173 2074 6865 2058 456d rtin was the XEm │ │ │ +0000a190: 6163 7320 6775 7920 6174 2044 6576 5072 acs guy at DevPr │ │ │ +0000a1a0: 6f2c 2061 2070 6172 7420 6f66 2053 756e o, a part of Sun │ │ │ +0000a1b0: 204d 6963 726f 7379 7374 656d 732e 5c6e Microsystems.\n │ │ │ +0000a1c0: 4d61 7274 696e 2075 7365 6420 746f 2064 Martin used to d │ │ │ +0000a1d0: 6f20 5845 6d61 6373 2061 7320 6120 6068 o XEmacs as a `h │ │ │ +0000a1e0: 6f62 6279 2720 7768 696c 6520 6174 2049 obby' while at I │ │ │ +0000a1f0: 424d 2c20 616e 6420 7761 7320 6372 617a BM, and was craz │ │ │ +0000a200: 795c 6e65 6e6f 7567 6820 746f 2074 7279 y\nenough to try │ │ │ +0000a210: 2074 6f20 6d61 6b65 2061 206c 6976 696e to make a livin │ │ │ +0000a220: 6720 646f 696e 6720 6974 2061 7420 5375 g doing it at Su │ │ │ +0000a230: 6e2e 5c6e 5c6e 4d61 7274 696e 2073 7461 n.\n\nMartin sta │ │ │ +0000a240: 7274 696e 6720 7573 696e 6720 456d 6163 rting using Emac │ │ │ +0000a250: 7320 6f72 6967 696e 616c 6c79 206e 6f74 s originally not │ │ │ +0000a260: 2074 6f20 6564 6974 2066 696c 6573 2c20 to edit files, │ │ │ +0000a270: 6275 7420 746f 2067 6574 5c6e 7468 6520 but to get\nthe │ │ │ +0000a280: 6265 6e65 6669 7420 6f66 2073 6865 6c6c benefit of shell │ │ │ +0000a290: 206d 6f64 652e 2048 6520 6163 7475 616c mode. He actual │ │ │ +0000a2a0: 6c79 2075 7365 6420 746f 2072 756e 206e ly used to run n │ │ │ +0000a2b0: 6f74 6869 6e67 2062 7574 2061 2073 6865 othing but a she │ │ │ +0000a2c0: 6c6c 5c6e 6275 6666 6572 2c20 616e 6420 ll\nbuffer, and │ │ │ +0000a2d0: 7573 6520 6078 7465 726d 202d 6520 7669 use `xterm -e vi │ │ │ +0000a2e0: 2720 746f 2065 6469 7420 6669 6c65 732e ' to edit files. │ │ │ +0000a2f0: 2020 4275 7420 7468 656e 2068 6520 7361 But then he sa │ │ │ +0000a300: 7720 7468 655c 6e6c 6967 6874 2e20 2048 w the\nlight. H │ │ │ +0000a310: 6520 6472 6561 6d73 206f 6620 7265 7772 e dreams of rewr │ │ │ +0000a320: 6974 696e 6720 7368 656c 6c20 6d6f 6465 iting shell mode │ │ │ +0000a330: 2066 726f 6d20 7363 7261 7463 682e 2020 from scratch. │ │ │ +0000a340: 5374 6465 7272 2073 686f 756c 645c 6e73 Stderr should\ns │ │ │ +0000a350: 686f 7720 7570 2069 6e20 7265 6421 215c how up in red!!\ │ │ │ +0000a360: 6e5c 6e4d 6172 7469 6e20 6973 206e 6f20 n\nMartin is no │ │ │ +0000a370: 6c6f 6e67 6572 2064 6f69 6e67 2058 456d longer doing XEm │ │ │ +0000a380: 6163 7320 666f 7220 6120 6c69 7669 6e67 acs for a living │ │ │ +0000a390: 2c20 616e 6420 6973 204a 7573 7420 416e , and is Just An │ │ │ +0000a3a0: 6f74 6865 725c 6e56 6f6c 756e 7465 6572 other\nVolunteer │ │ │ +0000a3b0: 2e5c 6e22 206d 636f 6f6b 206d 6c79 2022 .\n" mcook mly " │ │ │ +0000a3c0: 4361 7273 2061 7265 2065 7669 6c2e 2020 Cars are evil. │ │ │ +0000a3d0: 5269 6465 2061 2062 696b 652e 5c6e 2220 Ride a bike.\n" │ │ │ +0000a3e0: 6d6f 7269 6f6b 6120 2249 2061 6d20 6120 morioka "I am a │ │ │ +0000a3f0: 646f 6374 6f72 616c 2073 7475 6465 6e74 doctoral student │ │ │ +0000a400: 2061 7420 5363 686f 6f6c 206f 6620 496e at School of In │ │ │ +0000a410: 666f 726d 6174 696f 6e20 5363 6965 6e63 formation Scienc │ │ │ +0000a420: 6520 6f66 204a 4149 5354 5c6e 284a 6170 e of JAIST\n(Jap │ │ │ +0000a430: 616e 2041 6476 616e 6365 6420 496e 7374 an Advanced Inst │ │ │ +0000a440: 6974 7574 6520 6f66 2053 6369 656e 6365 itute of Science │ │ │ +0000a450: 2061 6e64 2054 6563 686e 6f6c 6f67 792c and Technology, │ │ │ +0000a460: 2048 6f6b 7572 696b 7529 2e20 2049 276d Hokuriku). I'm │ │ │ +0000a470: 5c6e 696e 7465 7265 7374 6564 2069 6e20 \ninterested in │ │ │ +0000a480: 4e61 7475 7261 6c20 4c61 6e67 7561 6765 Natural Language │ │ │ +0000a490: 2c20 4166 666f 7264 616e 6365 2061 6e64 , Affordance and │ │ │ +0000a4a0: 2077 7269 7469 6e67 2073 7973 7465 6d73 writing systems │ │ │ +0000a4b0: 2e5c 6e22 206d 7461 2022 4920 616d 2061 .\n" mta "I am a │ │ │ +0000a4c0: 2073 6f66 7477 6172 6520 6465 7665 6c6f software develo │ │ │ +0000a4d0: 7065 7220 7768 6f20 776f 726b 6564 2066 per who worked f │ │ │ +0000a4e0: 6f72 2074 6865 2055 6e69 7665 7273 6974 or the Universit │ │ │ +0000a4f0: 7920 6f66 204d 6963 6869 6761 6e5c 6e66 y of Michigan\nf │ │ │ +0000a500: 6f72 206d 616e 7920 7965 6172 7320 7768 or many years wh │ │ │ +0000a510: 6572 6520 4920 7761 7320 6f6e 6520 6f66 ere I was one of │ │ │ +0000a520: 2074 6865 2070 7269 6e63 6970 616c 2061 the principal a │ │ │ +0000a530: 7263 6869 7465 6374 7320 6f66 2074 6865 rchitects of the │ │ │ +0000a540: 5c6e 4d69 6368 6967 616e 2054 6572 6d69 \nMichigan Termi │ │ │ +0000a550: 6e61 6c20 5379 7374 656d 2e20 2046 6f72 nal System. For │ │ │ +0000a560: 2074 6865 206c 6173 7420 7365 7665 7261 the last severa │ │ │ +0000a570: 6c20 7965 6172 7320 4927 7665 2062 6565 l years I've bee │ │ │ +0000a580: 6e5c 6e77 6f72 6b69 6e67 2066 6f72 2041 n\nworking for A │ │ │ +0000a590: 7262 6f72 7465 7874 2c20 6120 7075 626c rbortext, a publ │ │ │ +0000a5a0: 6973 6865 7220 6f66 2058 4d4c 2070 7562 isher of XML pub │ │ │ +0000a5b0: 6c69 7368 696e 6720 616e 6420 636f 6e74 lishing and cont │ │ │ +0000a5c0: 656e 745c 6e6d 616e 6167 656d 656e 7420 ent\nmanagement │ │ │ +0000a5d0: 736f 6674 7761 7265 2e5c 6e22 206f 6772 software.\n" ogr │ │ │ +0000a5e0: 6166 2022 4927 6d20 6120 7374 7564 656e af "I'm a studen │ │ │ +0000a5f0: 7420 6f66 2063 6f6d 7075 7465 7220 7363 t of computer sc │ │ │ +0000a600: 6965 6e63 6573 2061 7420 7468 6520 556e iences at the Un │ │ │ +0000a610: 6976 6572 7369 7479 206f 6620 4b6f 626c iversity of Kobl │ │ │ +0000a620: 656e 7a2e 204d 795c 6e6d 616a 6f72 2069 enz. My\nmajor i │ │ │ +0000a630: 7320 636f 6d70 7574 6174 696f 6e61 6c20 s computational │ │ │ +0000a640: 6c69 6e67 7569 7374 6963 7320 2868 756d linguistics (hum │ │ │ +0000a650: 616e 206c 616e 6775 6167 6520 6765 6e65 an language gene │ │ │ +0000a660: 7261 7469 6f6e 2061 6e64 5c6e 616e 616c ration and\nanal │ │ │ +0000a670: 7973 6973 292e 5c6e 5c6e 4920 6d61 6b65 ysis).\n\nI make │ │ │ +0000a680: 206d 7920 6c69 7669 6e67 2061 7320 6120 my living as a │ │ │ +0000a690: 6d61 6e61 6769 6e67 2064 6972 6563 746f managing directo │ │ │ +0000a6a0: 7220 6f66 2061 2073 6d61 6c6c 2062 7574 r of a small but │ │ │ +0000a6b0: 2066 696e 6520 636f 6d70 616e 795c 6e77 fine company\nw │ │ │ +0000a6c0: 6869 6368 2049 2073 7461 7274 6564 2074 hich I started t │ │ │ +0000a6d0: 776f 2079 6561 7273 2061 676f 2077 6974 wo years ago wit │ │ │ +0000a6e0: 6820 6f6e 6520 6f66 206d 7920 6672 6965 h one of my frie │ │ │ +0000a6f0: 6e64 732e 2057 6520 7072 6f76 6964 655c nds. We provide\ │ │ │ +0000a700: 6e62 7573 696e 6573 7320 6e65 7477 6f72 nbusiness networ │ │ │ +0000a710: 6b20 736f 6c75 7469 6f6e 7320 6261 7365 k solutions base │ │ │ +0000a720: 6420 6f6e 206c 696e 7578 2073 6572 7665 d on linux serve │ │ │ +0000a730: 7273 2061 6e64 2076 6172 696f 7573 206f rs and various o │ │ │ +0000a740: 7468 6572 5c6e 6e65 7477 6f72 6b69 6e67 ther\nnetworking │ │ │ +0000a750: 2070 726f 6475 6374 732e 5c6e 5c6e 4d6f products.\n\nMo │ │ │ +0000a760: 7374 206f 6620 6d79 2073 7061 7265 2074 st of my spare t │ │ │ +0000a770: 696d 6520 4920 7370 656e 7420 6f6e 2074 ime I spent on t │ │ │ +0000a780: 6865 2064 6576 656c 6f70 6d65 6e74 206f he development o │ │ │ +0000a790: 6620 7468 6520 5845 6d61 6373 5c6e 4472 f the XEmacs\nDr │ │ │ +0000a7a0: 6167 276e 2744 726f 7020 4150 492c 2061 ag'n'Drop API, a │ │ │ +0000a7b0: 2065 6e68 616e 6365 6420 7665 7273 696f enhanced versio │ │ │ +0000a7c0: 6e20 6f66 2054 6b20 6361 6c6c 6564 2054 n of Tk called T │ │ │ +0000a7d0: 6b53 7465 7020 2862 6574 7465 7220 6c6f kStep (better lo │ │ │ +0000a7e0: 6f6b 732c 5c6e 616c 736f 2044 7261 6727 oks,\nalso Drag' │ │ │ +0000a7f0: 6e27 4472 6f70 2c20 616e 6420 6d6f 7265 n'Drop, and more │ │ │ +0000a800: 292c 2061 6e64 2076 6172 696f 7573 206f ), and various o │ │ │ +0000a810: 7468 6572 2068 6163 6b73 3a20 4953 444e ther hacks: ISDN │ │ │ +0000a820: 2d74 6f6f 6c73 2c5c 6e63 6420 706c 6179 -tools,\ncd play │ │ │ +0000a830: 6572 732c 2070 7974 686f 6e2c 2065 7463 ers, python, etc │ │ │ +0000a840: 2e2e 2e5c 6e5c 6e54 6f20 7365 6520 736f ...\n\nTo see so │ │ │ +0000a850: 6d65 206f 6620 7468 6573 6520 6861 7665 me of these have │ │ │ +0000a860: 2061 206c 6f6f 6b20 6174 2022 2022 6f6e a look at " "on │ │ │ +0000a870: 6520 6f66 206d 7920 686f 6d65 7061 6765 e of my homepage │ │ │ +0000a880: 7322 206f 6c69 7669 6572 206f 7363 6172 s" olivier oscar │ │ │ +0000a890: 2022 4f73 6361 7220 6865 6164 7320 7468 "Oscar heads th │ │ │ +0000a8a0: 6520 436f 6d70 7574 6572 2053 6369 656e e Computer Scien │ │ │ +0000a8b0: 6365 2064 6570 6172 746d 656e 7420 6174 ce department at │ │ │ +0000a8c0: 2043 5045 204c 796f 6e2c 2061 2066 7265 CPE Lyon, a fre │ │ │ +0000a8d0: 6e63 685c 6e65 6e67 696e 6565 7269 6e67 nch\nengineering │ │ │ +0000a8e0: 2073 6368 6f6f 6c20 696e 2046 7261 6e63 school in Franc │ │ │ +0000a8f0: 652e 2042 6573 6964 6573 2068 6973 2061 e. Besides his a │ │ │ +0000a900: 646d 696e 6973 7472 6174 6976 6520 7461 dministrative ta │ │ │ +0000a910: 736b 7320 6865 5c6e 7465 6163 6865 7320 sks he\nteaches │ │ │ +0000a920: 6e65 7477 6f72 6b69 6e67 2062 6173 6963 networking basic │ │ │ +0000a930: 732c 2049 6e74 6572 6e65 7420 7465 6368 s, Internet tech │ │ │ +0000a940: 6e6f 6c6f 6769 6573 2028 796f 7520 6b6e nologies (you kn │ │ │ +0000a950: 6f77 2c20 616c 6c20 7468 6573 655c 6e78 ow, all these\nx │ │ │ +0000a960: 784d 4c20 616e 6420 6861 6972 7920 7363 xML and hairy sc │ │ │ +0000a970: 7269 7074 206c 616e 6775 6167 6573 2021 ript languages ! │ │ │ +0000a980: 2920 2061 6e64 2074 6865 2053 6368 656d ) and the Schem │ │ │ +0000a990: 6520 6c61 6e67 7561 6765 2e5c 6e22 2070 e language.\n" p │ │ │ +0000a9a0: 656c 6567 7269 2022 4920 6469 6420 6d79 elegri "I did my │ │ │ +0000a9b0: 2050 6844 2061 7420 5543 4220 616e 6420 PhD at UCB and │ │ │ +0000a9c0: 6120 706f 7374 646f 6320 6174 2043 534c a postdoc at CSL │ │ │ +0000a9d0: 2f50 4152 432e 2020 4920 6a6f 696e 6564 /PARC. I joined │ │ │ +0000a9e0: 2053 756e 2069 6e20 3139 3930 2c5c 6e73 Sun in 1990,\ns │ │ │ +0000a9f0: 7065 6e74 2073 6f6d 6520 7469 6d65 2069 pent some time i │ │ │ +0000aa00: 6e20 4465 7650 726f 2028 7468 6174 2069 n DevPro (that i │ │ │ +0000aa10: 7320 7768 656e 2049 206d 6164 6520 6d79 s when I made my │ │ │ +0000aa20: 2063 6f6e 7472 6962 7574 696f 6e20 746f contribution to │ │ │ +0000aa30: 5c6e 5845 6d61 6373 2920 616e 6420 6a6f \nXEmacs) and jo │ │ │ +0000aa40: 696e 6564 204a 6176 6153 6f66 7420 696e ined JavaSoft in │ │ │ +0000aa50: 2066 616c 6c20 2739 352c 2077 6865 7265 fall '95, where │ │ │ +0000aa60: 2049 2776 6520 6265 656e 2074 6865 206c I've been the l │ │ │ +0000aa70: 6561 6420 666f 725c 6e73 6576 6572 616c ead for\nseveral │ │ │ +0000aa80: 204a 5350 2d72 656c 6174 6564 2073 7065 JSP-related spe │ │ │ +0000aa90: 6369 6669 6361 7469 6f6e 7320 616e 6420 cifications and │ │ │ +0000aaa0: 4a41 582d 5250 432e 2020 4927 6d20 6375 JAX-RPC. I'm cu │ │ │ +0000aab0: 7272 656e 746c 7920 7468 6520 5765 625c rrently the Web\ │ │ │ +0000aac0: 6e4c 6179 6572 2061 7263 6869 7465 6374 nLayer architect │ │ │ +0000aad0: 2066 6f72 204a 3245 452e 205c 6e5c 6e49 for J2EE. \n\nI │ │ │ +0000aae0: 2077 6173 2062 6f72 6e20 696e 2042 6172 was born in Bar │ │ │ +0000aaf0: 6365 6c6f 6e61 2061 6e64 2049 2067 7265 celona and I gre │ │ │ +0000ab00: 7720 7570 206d 6f73 746c 7920 696e 2043 w up mostly in C │ │ │ +0000ab10: 6172 6163 6173 3b20 4920 6861 7665 2074 aracas; I have t │ │ │ +0000ab20: 776f 206b 6964 735c 6e61 6e64 2049 2073 wo kids\nand I s │ │ │ +0000ab30: 7065 616b 206f 6e6c 7920 6361 7461 6c61 peak only catala │ │ │ +0000ab40: 6e20 746f 2074 6865 6d3b 2049 2063 616e n to them; I can │ │ │ +0000ab50: 206a 7567 676c 6520 736f 6d65 2028 6361 juggle some (ca │ │ │ +0000ab60: 7265 6572 2c20 6661 6d69 6c79 2c20 616e reer, family, an │ │ │ +0000ab70: 645c 6e34 2062 616c 6c73 206f 7220 3320 d\n4 balls or 3 │ │ │ +0000ab80: 7069 6e73 293b 2061 6e64 206d 7920 656e pins); and my en │ │ │ +0000ab90: 676c 6973 6820 6361 6e20 6265 2069 6469 glish can be idi │ │ │ +0000aba0: 6f73 796e 6372 6174 6963 212e 5c6e 2220 osyncratic!.\n" │ │ │ +0000abb0: 7065 7a20 2250 6574 6572 2063 7572 7265 pez "Peter curre │ │ │ +0000abc0: 6e74 6c79 2073 6572 7665 7320 6173 2053 ntly serves as S │ │ │ +0000abd0: 656e 696f 7220 5669 6365 2050 7265 7369 enior Vice Presi │ │ │ +0000abe0: 6465 6e74 2c20 5072 6f64 7563 7420 4465 dent, Product De │ │ │ +0000abf0: 7665 6c6f 706d 656e 745c 6e66 6f72 2043 velopment\nfor C │ │ │ +0000ac00: 4253 2053 706f 7274 734c 696e 652e 2020 BS SportsLine. │ │ │ +0000ac10: 5365 6520 2220 2243 4253 2053 706f 7274 See " "CBS Sport │ │ │ +0000ac20: 734c 696e 6522 2070 6970 6572 2022 4d79 sLine" piper "My │ │ │ +0000ac30: 2068 6f6d 6520 7061 6765 2069 7320 6865 home page is he │ │ │ +0000ac40: 7265 3a5c 6e22 2022 5669 7369 7420 616e re:\n" "Visit an │ │ │ +0000ac50: 6479 2773 2068 6f6d 6520 7061 6765 2220 dy's home page" │ │ │ +0000ac60: 225c 6e5c 6e20 416e 6479 2068 6173 2062 "\n\n Andy has b │ │ │ +0000ac70: 6565 6e20 6163 7469 7665 2069 6e20 7468 een active in th │ │ │ +0000ac80: 6520 5845 6d61 6373 2074 6561 6d20 666f e XEmacs team fo │ │ │ +0000ac90: 7220 6120 6e75 6d62 6572 206f 6620 7965 r a number of ye │ │ │ +0000aca0: 6172 732c 5c6e 6865 6c70 696e 6720 706f ars,\nhelping po │ │ │ +0000acb0: 7274 2058 456d 6163 7320 746f 204d 5320 rt XEmacs to MS │ │ │ +0000acc0: 5769 6e64 6f77 7320 6f70 6572 6174 696e Windows operatin │ │ │ +0000acd0: 6720 7379 7374 656d 732e 2048 6520 6973 g systems. He is │ │ │ +0000ace0: 2061 6c73 6f20 7468 655c 6e63 7572 7265 also the\ncurre │ │ │ +0000acf0: 6e74 204d 5320 5769 6e64 6f77 7320 7265 nt MS Windows re │ │ │ +0000ad00: 6c65 6173 6520 6d61 6e61 6765 7220 616e lease manager an │ │ │ +0000ad10: 6420 6d61 696e 7461 696e 7320 7468 6520 d maintains the │ │ │ +0000ad20: 4d53 2057 696e 646f 7773 5c6e 6e65 7469 MS Windows\nneti │ │ │ +0000ad30: 6e73 7461 6c6c 6572 2e5c 6e22 2070 6974 nstaller.\n" pit │ │ │ +0000ad40: 746d 616e 2072 6963 6b63 2022 5468 6520 tman rickc "The │ │ │ +0000ad50: 6861 636b 6572 2066 6f72 6d65 726c 7920 hacker formerly │ │ │ +0000ad60: 6b6e 6f77 6e20 6173 2052 6963 6b20 4275 known as Rick Bu │ │ │ +0000ad70: 7364 6965 636b 6572 2069 7320 6120 6465 sdiecker is a de │ │ │ +0000ad80: 7665 6c6f 7065 7220 616e 645c 6e74 6563 veloper and\ntec │ │ │ +0000ad90: 686e 6963 616c 206d 616e 6167 6572 2061 hnical manager a │ │ │ +0000ada0: 7420 4465 7574 7363 6865 2042 616e 6b20 t Deutsche Bank │ │ │ +0000adb0: 696e 204e 6577 2059 6f72 6b20 6475 7269 in New York duri │ │ │ +0000adc0: 6e67 2064 6179 6c69 6768 7420 686f 7572 ng daylight hour │ │ │ +0000add0: 732e 5c6e 496e 2074 6865 2065 7665 6e69 s.\nIn the eveni │ │ │ +0000ade0: 6e67 7320 6865 206d 6169 6e74 6169 6e73 ngs he maintains │ │ │ +0000adf0: 2074 6872 6565 2063 6869 6c64 7265 6e2c three children, │ │ │ +0000ae00: 2061 6e64 2077 6865 6e20 6865 206f 7567 and when he oug │ │ │ +0000ae10: 6874 2074 6f20 6265 5c6e 736c 6565 7069 ht to be\nsleepi │ │ │ +0000ae20: 6e67 2068 6520 6275 696c 6473 2058 456d ng he builds XEm │ │ │ +0000ae30: 6163 7320 6265 7461 732c 2061 6e64 2074 acs betas, and t │ │ │ +0000ae40: 696e 6b65 7273 2077 6974 6820 7661 7269 inkers with vari │ │ │ +0000ae50: 6f75 7320 7065 7273 6f6e 616c 5c6e 6861 ous personal\nha │ │ │ +0000ae60: 636b 696e 6720 7072 6f6a 6563 7473 2e5c cking projects.\ │ │ │ +0000ae70: 6e22 2072 6f73 6520 726f 7373 696e 6920 n" rose rossini │ │ │ +0000ae80: 2243 7572 7265 6e74 2064 6576 656c 6f70 "Current develop │ │ │ +0000ae90: 6d65 6e74 206c 6561 6420 666f 7220 4553 ment lead for ES │ │ │ +0000aea0: 5320 2845 6d61 6373 2053 7065 616b 7320 S (Emacs Speaks │ │ │ +0000aeb0: 5374 6174 6973 7469 6373 292c 2061 206d Statistics), a m │ │ │ +0000aec0: 6f64 6520 616e 645c 6e69 6e66 6572 696f ode and\ninferio │ │ │ +0000aed0: 7220 6d6f 6465 2066 6f72 2073 7461 7469 r mode for stati │ │ │ +0000aee0: 7374 6963 616c 2070 726f 6772 616d 6d69 stical programmi │ │ │ +0000aef0: 6e67 2061 6e64 2064 6174 6120 616e 616c ng and data anal │ │ │ +0000af00: 7973 6973 2066 6f72 2053 4153 2c5c 6e53 ysis for SAS,\nS │ │ │ +0000af10: 2c20 532d 504c 5553 2c20 522c 2058 4c69 , S-PLUS, R, XLi │ │ │ +0000af20: 7370 5374 6174 3b20 636f 6e66 6967 7572 spStat; configur │ │ │ +0000af30: 6162 6c65 2066 6f72 206e 6561 726c 7920 able for nearly │ │ │ +0000af40: 616e 7920 6f74 6865 7220 7374 6174 6973 any other statis │ │ │ +0000af50: 7469 6361 6c5c 6e6c 616e 6775 6167 652f tical\nlanguage/ │ │ │ +0000af60: 7061 636b 6167 6520 6f6e 6520 6d69 6768 package one migh │ │ │ +0000af70: 7420 7761 6e74 2e20 2049 6e20 7370 6172 t want. In spar │ │ │ +0000af80: 6520 7469 6d65 2c20 6368 6173 6573 2068 e time, chases h │ │ │ +0000af90: 6973 2073 6f6e 2061 726f 756e 645c 6e61 is son around\na │ │ │ +0000afa0: 6e64 2061 6374 7320 6173 2061 2050 682e nd acts as a Ph. │ │ │ +0000afb0: 442e 2028 6269 6f29 7374 6174 6973 7469 D. (bio)statisti │ │ │ +0000afc0: 6369 616e 2066 6f72 206d 6f6e 6579 2061 cian for money a │ │ │ +0000afd0: 6e64 2061 6d75 7365 6d65 6e74 2c5c 6e70 nd amusement,\np │ │ │ +0000afe0: 7269 6d61 7269 6c79 2066 6f63 7573 696e rimarily focusin │ │ │ +0000aff0: 6720 6f6e 2073 7461 7469 7374 6963 616c g on statistical │ │ │ +0000b000: 2063 6f6d 7075 7469 6e67 2c20 7669 7375 computing, visu │ │ │ +0000b010: 616c 697a 6174 696f 6e2c 2061 6e64 2074 alization, and t │ │ │ +0000b020: 6865 5c6e 6465 7369 676e 2061 6e64 2061 he\ndesign and a │ │ │ +0000b030: 6e61 6c79 7369 7320 6f66 2048 4956 2076 nalysis of HIV v │ │ │ +0000b040: 6163 6369 6e65 2074 7269 616c 732e 2020 accine trials. │ │ │ +0000b050: 4375 7272 656e 7420 706f 7369 7469 6f6e Current position │ │ │ +0000b060: 3a20 5265 7365 6172 6368 5c6e 4173 7369 : Research\nAssi │ │ │ +0000b070: 7374 616e 7420 5072 6f66 6573 736f 7220 stant Professor │ │ │ +0000b080: 6f66 2042 696f 7374 6174 6973 7469 6373 of Biostatistics │ │ │ +0000b090: 2061 7420 7468 6520 556e 6976 6572 7369 at the Universi │ │ │ +0000b0a0: 7479 206f 6620 5761 7368 696e 6774 6f6e ty of Washington │ │ │ +0000b0b0: 5c6e 616e 6420 7468 6520 4672 6564 2048 \nand the Fred H │ │ │ +0000b0c0: 7574 6368 696e 736f 6e20 4361 6e63 6572 utchinson Cancer │ │ │ +0000b0d0: 2052 6573 6561 7263 6820 4365 6e74 6572 Research Center │ │ │ +0000b0e0: 2e5c 6e5c 6e53 6565 2022 2022 5669 7369 .\n\nSee " "Visi │ │ │ +0000b0f0: 7420 416e 7468 6f6e 7927 7320 686f 6d65 t Anthony's home │ │ │ +0000b100: 2070 6167 6522 2073 6c62 2022 5065 6163 page" slb "Peac │ │ │ +0000b110: 6865 7320 4261 7572 2c20 3139 3836 2d31 hes Baur, 1986-1 │ │ │ +0000b120: 3939 392e 5c6e 5265 7374 2069 6e20 7065 999.\nRest in pe │ │ │ +0000b130: 6163 6522 2073 7065 7262 6572 2022 5768 ace" sperber "Wh │ │ │ +0000b140: 656e 204d 696b 6520 6973 6e27 7420 6275 en Mike isn't bu │ │ │ +0000b150: 7379 2070 7574 7469 6e67 2074 6f67 6574 sy putting toget │ │ │ +0000b160: 6865 7220 7061 7463 6865 7320 666f 7220 her patches for │ │ │ +0000b170: 6672 6565 2073 6f66 7477 6172 6520 6865 free software he │ │ │ +0000b180: 2068 6173 5c6e 6a75 7374 2069 6e73 7461 has\njust insta │ │ │ +0000b190: 6c6c 6564 206f 7220 6368 616e 6769 6e67 lled or changing │ │ │ +0000b1a0: 2068 6973 2068 6169 7273 7479 6c65 2c20 his hairstyle, │ │ │ +0000b1b0: 6865 2064 6f65 7320 7265 7365 6172 6368 he does research │ │ │ +0000b1c0: 2069 6e20 6d6f 6465 726e 5c6e 7072 6f67 in modern\nprog │ │ │ +0000b1d0: 7261 6d6d 696e 6720 6c61 6e67 7561 6765 ramming language │ │ │ +0000b1e0: 7320 616e 6420 7468 6569 7220 696d 706c s and their impl │ │ │ +0000b1f0: 656d 656e 7461 7469 6f6e 2c20 616e 6420 ementation, and │ │ │ +0000b200: 686f 7065 7320 7468 6174 206f 6e65 2064 hopes that one d │ │ │ +0000b210: 6179 5c6e 5845 6d61 6373 2077 696c 6c20 ay\nXEmacs will │ │ │ +0000b220: 7370 6561 6b20 5363 6865 6d65 2e5c 6e22 speak Scheme.\n" │ │ │ +0000b230: 2073 7469 6720 2250 6572 6970 6174 6574 stig "Peripatet │ │ │ +0000b240: 6963 2075 6e69 6e6f 6d69 6e61 6c20 456d ic uninominal Em │ │ │ +0000b250: 6163 7320 6861 636b 6572 2e20 2053 7469 acs hacker. Sti │ │ │ +0000b260: 6720 736f 6d65 7469 6d65 7320 6f70 6572 g sometimes oper │ │ │ +0000b270: 6174 6573 206f 7574 206f 6620 615c 6e62 ates out of a\nb │ │ │ +0000b280: 6967 2077 6869 7465 2076 616e 2073 6574 ig white van set │ │ │ +0000b290: 2075 7020 666f 7220 6e6f 6d61 6469 6320 up for nomadic │ │ │ +0000b2a0: 6c69 7669 6e67 2061 6e64 2068 6163 6b69 living and hacki │ │ │ +0000b2b0: 6e67 2e20 2053 7469 6720 6973 2073 6f72 ng. Stig is sor │ │ │ +0000b2c0: 7420 6f66 5c6e 6120 746f 6f6c 2066 6574 t of\na tool fet │ │ │ +0000b2d0: 6973 6869 7374 2e20 2048 6520 6861 7320 ishist. He has │ │ │ +0000b2e0: 6120 6861 7465 2f6c 6f76 6520 7265 6c61 a hate/love rela │ │ │ +0000b2f0: 7469 6f6e 7368 6970 2077 6974 6820 636f tionship with co │ │ │ +0000b300: 6d70 7574 6572 7320 616e 645c 6e68 6520 mputers and\nhe │ │ │ +0000b310: 6861 636b 7320 6f6e 2058 456d 6163 7320 hacks on XEmacs │ │ │ +0000b320: 6265 6361 7573 6520 6974 2773 2061 2067 because it's a g │ │ │ +0000b330: 6f6f 6420 746f 6f6c 2074 6861 7420 6d61 ood tool that ma │ │ │ +0000b340: 6b65 7320 636f 6d70 7574 6572 735c 6e73 kes computers\ns │ │ │ +0000b350: 6f6d 6577 6861 7420 6c65 7373 206f 6620 omewhat less of │ │ │ +0000b360: 6120 6e75 6973 616e 6365 2e20 2042 6573 a nuisance. Bes │ │ │ +0000b370: 6964 6573 2058 456d 6163 732c 2053 7469 ides XEmacs, Sti │ │ │ +0000b380: 6720 6573 7065 6369 616c 6c79 206c 696b g especially lik │ │ │ +0000b390: 6573 5c6e 6869 7320 4c65 6174 6865 726d es\nhis Leatherm │ │ │ +0000b3a0: 616e 2c20 6869 7320 4d61 6b69 7461 2c20 an, his Makita, │ │ │ +0000b3b0: 616e 6420 6869 7320 6c6f 636b 7069 636b and his lockpick │ │ │ +0000b3c0: 732e 2020 5374 6967 2077 616e 7473 2061 s. Stig wants a │ │ │ +0000b3d0: 204d 4947 5c6e 7765 6c64 6572 2061 6e64 MIG\nwelder and │ │ │ +0000b3e0: 2061 6972 2074 6f6f 6c73 2e5c 6e5c 6e53 air tools.\n\nS │ │ │ +0000b3f0: 7469 6720 6c69 6b65 7320 746f 2070 6572 tig likes to per │ │ │ +0000b400: 6368 2c20 6861 6e67 2066 726f 6d20 7468 ch, hang from th │ │ │ +0000b410: 6520 6365 696c 696e 672c 2061 6e64 2063 e ceiling, and c │ │ │ +0000b420: 6c69 6d62 206f 6e20 7468 6520 7761 6c6c limb on the wall │ │ │ +0000b430: 732e 5c6e 5374 6967 2068 6173 2061 2063 s.\nStig has a c │ │ │ +0000b440: 6f6f 6c20 7661 6e2e 2020 5374 6967 2077 ool van. Stig w │ │ │ +0000b450: 6f75 6c64 206c 696b 6520 746f 2062 6520 ould like to be │ │ │ +0000b460: 6162 6c65 2074 6f20 7465 6c65 636f 6d6d able to telecomm │ │ │ +0000b470: 7574 6520 6672 6f6d 2c5c 6e73 6179 2c20 ute from,\nsay, │ │ │ +0000b480: 7468 6520 6e6f 7274 6820 7269 6d20 6f66 the north rim of │ │ │ +0000b490: 2074 6865 2047 7261 6e64 2043 616e 796f the Grand Canyo │ │ │ +0000b4a0: 6e20 6f72 2074 6865 206d 6964 7374 206f n or the midst o │ │ │ +0000b4b0: 6620 4261 6a61 2e5c 6e22 2073 7469 6762 f Baja.\n" stigb │ │ │ +0000b4c0: 2022 4375 7272 656e 746c 7920 7374 7564 "Currently stud │ │ │ +0000b4d0: 7969 6e67 2063 6f6d 7075 7465 7220 7363 ying computer sc │ │ │ +0000b4e0: 6965 6e63 6520 696e 2054 726f 6e64 6865 ience in Trondhe │ │ │ +0000b4f0: 696d 2c20 4e6f 7277 6179 2e20 2046 756c im, Norway. Ful │ │ │ +0000b500: 6c20 7469 6d65 5c6e 4c69 6e75 7820 7573 l time\nLinux us │ │ │ +0000b510: 6572 2061 6e64 2070 726f 7564 206f 6620 er and proud of │ │ │ +0000b520: 6974 2e20 2058 456d 6163 7320 6861 636b it. XEmacs hack │ │ │ +0000b530: 6572 206c 6967 6874 2e5c 6e5c 6e53 6565 er light.\n\nSee │ │ │ +0000b540: 3a09 2220 2256 6973 6974 2053 7469 6727 :." "Visit Stig' │ │ │ +0000b550: 7320 686f 6d65 2070 6167 6522 2074 6869 s home page" thi │ │ │ +0000b560: 6573 7365 6c20 2257 6f72 6b65 6420 6174 essel "Worked at │ │ │ +0000b570: 2055 6e69 7665 7273 6974 7920 6f66 204b University of K │ │ │ +0000b580: 6169 7365 7273 6c61 7574 6572 6e20 7768 aiserslautern wh │ │ │ +0000b590: 6572 6520 6865 2074 6f6f 6b20 7061 7274 ere he took part │ │ │ +0000b5a0: 2069 6e20 7468 655c 6e64 6576 656c 6f70 in the\ndevelop │ │ │ +0000b5b0: 6d65 6e74 2061 6e64 2064 6573 6967 6e20 ment and design │ │ │ +0000b5c0: 6f66 2061 2043 4144 2066 7261 6d65 776f of a CAD framewo │ │ │ +0000b5d0: 726b 2066 6f72 2061 6e61 6c6f 6720 696e rk for analog in │ │ │ +0000b5e0: 7465 6772 6174 6564 5c6e 6369 7263 7569 tegrated\ncircui │ │ │ +0000b5f0: 7473 2077 6974 6820 7370 6563 6961 6c20 ts with special │ │ │ +0000b600: 656d 7068 6173 6973 206f 6e20 6469 7374 emphasis on dist │ │ │ +0000b610: 7269 6275 7465 6420 736f 6674 7761 7265 ributed software │ │ │ +0000b620: 2063 6f6e 6365 7074 732e 2048 655c 6e68 concepts. He\nh │ │ │ +0000b630: 6173 206e 6f77 206a 6f69 6e65 6420 4850 as now joined HP │ │ │ +0000b640: 2061 7320 7465 6368 6e69 6361 6c20 636f as technical co │ │ │ +0000b650: 6e73 756c 7461 6e74 2e5c 6e5c 6e20 2020 nsultant.\n\n │ │ │ +0000b660: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000b670: 2020 2041 6c6c 206f 6620 7468 6520 6275 All of the bu │ │ │ +0000b680: 696c 6469 6e67 732c 5c6e 2020 2020 2020 ildings,\n │ │ │ +0000b690: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000b6a0: 616c 6c20 6f66 2074 6865 2063 6172 735c all of the cars\ │ │ │ +0000b6b0: 6e20 2020 2020 2020 2020 2020 2020 2020 n │ │ │ +0000b6c0: 2020 2020 2020 2077 6572 6520 6f6e 6365 were once │ │ │ +0000b6d0: 206a 7573 7420 6120 6472 6561 6d5c 6e20 just a dream\n │ │ │ +0000b6e0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000b6f0: 2020 2020 2069 6e20 736f 6d65 626f 6479 in somebody │ │ │ +0000b700: 2773 2068 6561 642e 5c6e 5c6e 2020 2020 's head.\n\n │ │ │ +0000b710: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ 0000b720: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000b730: 2020 2020 2020 2020 2050 2e20 4761 6272 P. Gabr │ │ │ -0000b740: 6965 6c5c 6e22 2074 6f6d 6f6e 6f72 6920 iel\n" tomonori │ │ │ -0000b750: 7475 636b 2074 7572 6e62 756c 6c20 2253 tuck turnbull "S │ │ │ -0000b760: 7465 7068 656e 206c 6976 6573 2077 6974 tephen lives wit │ │ │ -0000b770: 6820 6869 7320 4a61 7061 6e65 7365 2077 h his Japanese w │ │ │ -0000b780: 6966 6520 616e 6420 6368 696c 6472 656e ife and children │ │ │ -0000b790: 2069 6e20 5473 756b 7562 612c 204a 6170 in Tsukuba, Jap │ │ │ -0000b7a0: 616e 2c5c 6e77 6865 7265 2068 6520 6973 an,\nwhere he is │ │ │ -0000b7b0: 2061 2070 726f 6665 7373 6f72 206f 6620 a professor of │ │ │ -0000b7c0: 6563 6f6e 6f6d 6963 7320 6174 2074 6865 economics at the │ │ │ -0000b7d0: 2055 6e69 7665 7273 6974 7920 6f66 2054 University of T │ │ │ -0000b7e0: 7375 6b75 6261 2e5c 6e22 2076 696e 2022 sukuba.\n" vin " │ │ │ -0000b7f0: 4927 6d20 6120 736f 6674 7761 7265 2065 I'm a software e │ │ │ -0000b800: 6e67 696e 6565 7220 616e 6420 6d61 6e61 ngineer and mana │ │ │ -0000b810: 6765 7220 666f 7220 4164 6170 7469 7665 ger for Adaptive │ │ │ -0000b820: 204f 7074 6963 7320 4173 736f 6369 6174 Optics Associat │ │ │ -0000b830: 6573 5c6e 696e 2043 616d 6272 6964 6765 es\nin Cambridge │ │ │ -0000b840: 2c20 4d61 7373 6163 6875 7365 7474 732e , Massachusetts. │ │ │ -0000b850: 2020 4920 7573 6564 2074 6f20 706c 6179 I used to play │ │ │ -0000b860: 2061 206c 6f74 206f 6620 556c 7469 6d61 a lot of Ultima │ │ │ -0000b870: 7465 2028 7365 655c 6e22 2022 5669 7369 te (see\n" "Visi │ │ │ -0000b880: 7420 7468 6520 556c 7469 6d61 7465 2050 t the Ultimate P │ │ │ -0000b890: 6c61 7965 7273 2041 7373 6f63 6961 7469 layers Associati │ │ │ -0000b8a0: 6f6e 2068 6f6d 6570 6167 6522 2022 2066 on homepage" " f │ │ │ -0000b8b0: 6f72 206d 6f72 6520 6465 7461 696c 7329 or more details) │ │ │ -0000b8c0: 2c20 6275 7420 4920 646f 6e27 7420 6861 , but I don't ha │ │ │ -0000b8d0: 7665 2074 696d 6520 746f 5c6e 706c 6179 ve time to\nplay │ │ │ -0000b8e0: 206d 7563 6820 616e 7920 6d6f 7265 2e20 much any more. │ │ │ -0000b8f0: 204e 6f77 6164 6179 7320 4927 6d20 6120 Nowadays I'm a │ │ │ -0000b900: 6661 6d69 6c79 206d 616e 2c20 736f 2049 family man, so I │ │ │ -0000b910: 2073 7065 6e64 206d 6f73 7420 6f66 5c6e spend most of\n │ │ │ -0000b920: 6d79 2074 696d 6520 7769 7468 206d 7920 my time with my │ │ │ -0000b930: 7769 6665 2c20 4265 636b 792c 2061 6e64 wife, Becky, and │ │ │ -0000b940: 206f 7572 2073 6f6e 732c 204e 6f61 6820 our sons, Noah │ │ │ -0000b950: 616e 6420 4672 616e 6369 7363 6f2e 5c6e and Francisco.\n │ │ │ -0000b960: 2220 766c 6164 696d 6972 2022 466f 726d " vladimir "Form │ │ │ -0000b970: 6572 2074 6563 686e 6963 616c 206c 6561 er technical lea │ │ │ -0000b980: 6420 666f 7220 5845 6d61 6373 2061 7420 d for XEmacs at │ │ │ -0000b990: 5375 6e2e 2020 4865 2069 7320 6e6f 7720 Sun. He is now │ │ │ -0000b9a0: 7772 6974 696e 6720 6120 626f 6f6b 206f writing a book o │ │ │ -0000b9b0: 6e5c 6e64 6973 7472 6962 7574 6564 204a n\ndistributed J │ │ │ -0000b9c0: 6176 6120 616e 6420 6973 2077 6f72 6b69 ava and is worki │ │ │ -0000b9d0: 6e67 2061 7420 5865 726f 7820 5041 5243 ng at Xerox PARC │ │ │ -0000b9e0: 2064 6f63 756d 656e 7469 6e67 2041 7370 documenting Asp │ │ │ -0000b9f0: 6563 744a 2c20 615c 6e6c 6967 6874 2d77 ectJ, a\nlight-w │ │ │ -0000ba00: 6569 6768 7420 6578 7465 6e73 696f 6e20 eight extension │ │ │ -0000ba10: 746f 204a 6176 6120 7468 6174 2073 7570 to Java that sup │ │ │ -0000ba20: 706f 7274 7320 6372 6f73 7363 7574 7469 ports crosscutti │ │ │ -0000ba30: 6e67 2063 6f6e 6365 726e 732e 5c6e 5365 ng concerns.\nSe │ │ │ -0000ba40: 6520 2220 2256 6973 6974 2056 6c61 6469 e " "Visit Vladi │ │ │ -0000ba50: 6d69 7227 7320 686f 6d65 2070 6167 6522 mir's home page" │ │ │ -0000ba60: 2077 6d70 6572 7279 2022 4861 7070 696c wmperry "Happil │ │ │ -0000ba70: 7920 6c69 7669 6e67 2069 6e20 496e 6469 y living in Indi │ │ │ -0000ba80: 616e 6120 7465 6c65 636f 6d6d 7574 696e ana telecommutin │ │ │ -0000ba90: 6720 666f 7220 6120 636f 6d70 616e 7920 g for a company │ │ │ -0000baa0: 6261 7365 6420 696e 2053 6561 7474 6c65 based in Seattle │ │ │ -0000bab0: 5c6e 2877 686f 2049 206e 6f77 2070 7265 \n(who I now pre │ │ │ -0000bac0: 6665 7220 6e6f 7420 746f 206e 616d 6529 fer not to name) │ │ │ -0000bad0: 2c20 7769 7368 696e 6720 4920 7761 7320 , wishing I was │ │ │ -0000bae0: 696e 2049 7265 6c61 6e64 2069 6e73 7465 in Ireland inste │ │ │ -0000baf0: 6164 2e5c 6e22 2079 6f73 6869 6b69 2079 ad.\n" yoshiki y │ │ │ -0000bb00: 6f75 6e67 7320 2249 206c 6976 6520 696e oungs "I live in │ │ │ -0000bb10: 2042 7269 7362 616e 652c 2041 7573 7472 Brisbane, Austr │ │ │ -0000bb20: 616c 6961 2077 6974 6820 6d79 2077 6966 alia with my wif │ │ │ -0000bb30: 652c 204d 6963 6865 6c6c 6520 616e 6420 e, Michelle and │ │ │ -0000bb40: 6f75 7220 6461 7567 6874 6572 2c5c 6e4b our daughter,\nK │ │ │ -0000bb50: 6169 746c 796e 2e20 2049 2776 6520 6f6e aitlyn. I've on │ │ │ -0000bb60: 6c79 2062 6565 6e20 6861 636b 696e 6720 ly been hacking │ │ │ -0000bb70: 5845 6d61 6373 2066 6f72 2061 2073 686f XEmacs for a sho │ │ │ -0000bb80: 7274 2074 696d 6520 2861 7070 726f 7820 rt time (approx │ │ │ -0000bb90: 3138 5c6e 6d74 6873 292c 2062 7574 2049 18\nmths), but I │ │ │ -0000bba0: 2776 6520 6265 656e 2066 6f6f 6c69 6e67 've been fooling │ │ │ -0000bbb0: 2061 726f 756e 6420 7769 7468 2063 6f6d around with com │ │ │ -0000bbc0: 7075 7465 7273 2073 696e 6365 2074 6865 puters since the │ │ │ -0000bbd0: 2065 6172 6c79 5c6e 3830 2773 2e5c 6e5c early\n80's.\n\ │ │ │ -0000bbe0: 6e49 6e20 7468 6520 7061 7374 2c20 4927 nIn the past, I' │ │ │ -0000bbf0: 7665 2062 6565 6e20 6120 6261 6e6b 206f ve been a bank o │ │ │ -0000bc00: 6666 6963 6572 2c20 6361 7220 7361 6c65 fficer, car sale │ │ │ -0000bc10: 736d 616e 2c20 696e 7375 7261 6e63 6520 sman, insurance │ │ │ -0000bc20: 6167 656e 742c 5c6e 6d61 6e61 6765 6420 agent,\nmanaged │ │ │ -0000bc30: 6120 636f 6d70 7574 6572 2066 6972 6d20 a computer firm │ │ │ -0000bc40: 616e 6420 6f77 6e65 6420 616e 6420 6f70 and owned and op │ │ │ -0000bc50: 6572 6174 6564 206d 7920 6f77 6e20 6275 erated my own bu │ │ │ -0000bc60: 7369 6e65 7373 2e20 2049 206e 6f77 5c6e siness. I now\n │ │ │ -0000bc70: 6469 7669 6465 206d 7920 7469 6d65 2062 divide my time b │ │ │ -0000bc80: 6574 7765 656e 206d 7920 6661 6d69 6c79 etween my family │ │ │ -0000bc90: 2c20 706c 616e 6e69 6e67 206d 7920 6e65 , planning my ne │ │ │ -0000bca0: 7874 2062 7573 696e 6573 7320 6964 6561 xt business idea │ │ │ -0000bcb0: 2028 615c 6e63 6f6d 7075 7465 7220 636f (a\ncomputer co │ │ │ -0000bcc0: 6e73 756c 7469 6e67 2066 6972 6d20 7468 nsulting firm th │ │ │ -0000bcd0: 6174 2075 7365 7320 7a65 726f 204d 6963 at uses zero Mic │ │ │ -0000bce0: 726f 736f 6674 2070 726f 6475 6374 7329 rosoft products) │ │ │ -0000bcf0: 2c20 6c6f 6f6b 696e 675c 6e61 6674 6572 , looking\nafter │ │ │ -0000bd00: 2074 6865 2058 456d 6163 7320 5061 636b the XEmacs Pack │ │ │ -0000bd10: 6167 6573 2061 6e64 2068 6163 6b69 6e67 ages and hacking │ │ │ -0000bd20: 206d 7920 6f77 6e20 5845 6d61 6373 2070 my own XEmacs p │ │ │ -0000bd30: 6163 6b61 6765 2c20 4569 6371 2e5c 6e5c ackage, Eicq.\n\ │ │ │ -0000bd40: 6e09 5365 653a 2022 2022 5669 7369 7420 n.See: " "Visit │ │ │ -0000bd50: 7468 6520 4569 6371 2068 6f6d 6570 6167 the Eicq homepag │ │ │ -0000bd60: 6522 2065 7272 6f72 2022 6563 6173 6520 e" error "ecase │ │ │ -0000bd70: 6661 696c 6564 3a20 2573 2c20 2573 2220 failed: %s, %s" │ │ │ -0000bd80: 2861 6472 6961 6e20 616a 2061 6a63 2061 (adrian aj ajc a │ │ │ -0000bd90: 6c61 7374 6169 7220 6261 7720 6265 6e20 lastair baw ben │ │ │ -0000bda0: 6277 2063 6777 2063 6872 2063 7261 6967 bw cgw chr craig │ │ │ -0000bdb0: 2063 7468 6f6d 7020 6461 696b 6920 6461 cthomp daiki da │ │ │ -0000bdc0: 6e20 6461 7272 796c 6f20 6465 7669 6e20 n darrylo devin │ │ │ -0000bdd0: 646b 696e 6472 6564 2064 6d6f 6f72 6520 dkindred dmoore │ │ │ -0000bde0: 6469 6469 6572 2065 6220 6661 6272 6963 didier eb fabric │ │ │ -0000bdf0: 6520 676f 6c75 6265 7620 6775 6e6e 6172 e golubev gunnar │ │ │ -0000be00: 2068 6273 2068 6973 6173 6869 2068 6d75 hbs hisashi hmu │ │ │ -0000be10: 6c6c 6572 2068 6e69 6b73 6963 2068 6f62 ller hniksic hob │ │ │ -0000be20: 6c65 7920 6a61 6e20 6a61 7320 6a61 7265 ley jan jas jare │ │ │ -0000be30: 7468 206a 6173 6f6e 206a 656e 7320 6a6d th jason jens jm │ │ │ -0000be40: 696c 6c65 7220 6a6f 6e61 7468 616e 206a iller jonathan j │ │ │ -0000be50: 7568 7020 6a77 7a20 6b61 7a7a 206b 6972 uhp jwz kazz kir │ │ │ -0000be60: 696c 6c20 6b79 6c65 206c 6172 7369 206d ill kyle larsi m │ │ │ -0000be70: 6172 6370 6120 6d61 7274 696e 206d 636f arcpa martin mco │ │ │ -0000be80: 6f6b 206d 6c79 206d 6f72 696f 6b61 206d ok mly morioka m │ │ │ -0000be90: 7461 206f 6772 6166 206f 6c69 7669 6572 ta ograf olivier │ │ │ -0000bea0: 206f 7363 6172 2070 656c 6567 7269 2070 oscar pelegri p │ │ │ -0000beb0: 657a 2070 6970 6572 2070 6974 746d 616e ez piper pittman │ │ │ -0000bec0: 2072 6963 6b63 2072 6f73 6520 726f 7373 rickc rose ross │ │ │ -0000bed0: 696e 6920 736c 6220 7370 6572 6265 7220 ini slb sperber │ │ │ -0000bee0: 7374 6967 2073 7469 6762 2074 6869 6573 stig stigb thies │ │ │ -0000bef0: 7365 6c20 746f 6d6f 6e6f 7269 2074 7563 sel tomonori tuc │ │ │ -0000bf00: 6b20 7475 726e 6275 6c6c 2076 696e 2076 k turnbull vin v │ │ │ -0000bf10: 6c61 6469 6d69 7220 776d 7065 7272 7920 ladimir wmperry │ │ │ -0000bf20: 796f 7368 696b 6920 796f 756e 6773 295d yoshiki youngs)] │ │ │ -0000bf30: 2035 5d29 0a28 6465 6661 6c69 6173 2027 5]).(defalias ' │ │ │ -0000bf40: 6162 6f75 742d 6861 636b 6572 2d63 6f6e about-hacker-con │ │ │ -0000bf50: 7472 6962 7574 696f 6e20 235b 2865 6e74 tribution #[(ent │ │ │ -0000bf60: 7279 2920 2208 40c1 61ab 84c2 c321 8708 ry) ".@.a....!.. │ │ │ -0000bf70: 40c4 61ab 84c2 c521 8708 40c6 61ab 84c2 @.a....!..@.a... │ │ │ -0000bf80: c721 8708 40c8 61ab 84c2 c921 8708 40ca .!..@.a....!..@. │ │ │ -0000bf90: 61ab 98c2 cb21 88cc cdce cf23 88c2 d021 a....!.....#...! │ │ │ -0000bfa0: 88cc d1d2 d323 88c2 d421 8708 40d5 61ab .....#...!..@.a. │ │ │ -0000bfb0: 84c2 d621 8708 40d7 61ab 8ec2 d821 88cc ...!..@.a....!.. │ │ │ -0000bfc0: d9d2 da23 88c2 d421 8708 40db 61ab 84c2 ...#...!..@.a... │ │ │ -0000bfd0: dc21 8708 40dd 61ab 84c2 de21 8708 40df .!..@.a....!..@. │ │ │ -0000bfe0: 61ab 84c2 e021 8708 40e1 61ab 84c2 e221 a....!..@.a....! │ │ │ -0000bff0: 8708 40e3 61ab 84c2 e021 8708 40e4 61ab ..@.a....!..@.a. │ │ │ -0000c000: 84c2 e021 8708 40e5 61ab 84c2 e021 8708 ...!..@.a....!.. │ │ │ -0000c010: 40e6 61ab 84c2 e721 8708 40e8 61ab 84c2 @.a....!..@.a... │ │ │ -0000c020: e921 8708 40ea 61ab 84c2 eb21 8708 40ec .!..@.a....!..@. │ │ │ -0000c030: 61ab 84c2 ed21 8708 40ee 61ab 84c2 ef21 a....!..@.a....! │ │ │ -0000c040: 8708 40f0 61ab 84c2 f121 8708 40f2 61ab ..@.a....!..@.a. │ │ │ -0000c050: 84c2 f321 8708 40f4 61ab 84c2 e021 8708 ...!..@.a....!.. │ │ │ -0000c060: 40f5 61ab 84c2 f621 8708 40f7 61ab 84c2 @.a....!..@.a... │ │ │ -0000c070: e021 8708 40f8 61ab 84c2 f921 8708 40fa .!..@.a....!..@. │ │ │ -0000c080: 61ab 84c2 fb21 8708 40fc 61ab 84c2 fd21 a....!..@.a....! │ │ │ -0000c090: 8708 40fe 61ab 84c2 ff21 8708 4081 4000 ..@.a....!..@.@. │ │ │ -0000c0a0: 61ab 86c2 8141 0021 8708 4081 4200 61ab a....A.!..@.B.a. │ │ │ -0000c0b0: 86c2 8143 0021 8708 4081 4400 61ab 86c2 ...C.!..@.D.a... │ │ │ -0000c0c0: 8145 0021 8708 4081 4600 61ab 86c2 8147 .E.!..@.F.a....G │ │ │ -0000c0d0: 0021 8708 4081 4800 61ab 86c2 8149 0021 .!..@.H.a....I.! │ │ │ -0000c0e0: 8708 4081 4a00 61ab 86c2 814b 0021 8708 ..@.J.a....K.!.. │ │ │ -0000c0f0: 4081 4c00 61ab 86c2 814d 0021 8708 4081 @.L.a....M.!..@. │ │ │ -0000c100: 4e00 61ab 86c2 814f 0021 8708 4081 5000 N.a....O.!..@.P. │ │ │ -0000c110: 61ab 86c2 8151 0021 8708 4081 5200 61ab a....Q.!..@.R.a. │ │ │ -0000c120: 86c2 8153 0021 8708 4081 5400 61ab 86c2 ...S.!..@.T.a... │ │ │ -0000c130: 8155 0021 8708 4081 5600 61ab 86c2 8157 .U.!..@.V.a....W │ │ │ -0000c140: 0021 8708 4081 5800 61ab 84c2 e021 8708 .!..@.X.a....!.. │ │ │ -0000c150: 4081 5900 61ab 86c2 815a 0021 8708 4081 @.Y.a....Z.!..@. │ │ │ -0000c160: 5b00 61ab 86c2 815c 5c00 2187 0840 815d [.a....\\.!..@.] │ │ │ -0000c170: 0061 ab86 c281 5e00 2187 0840 815f 0061 .a....^.!..@._.a │ │ │ -0000c180: ab86 c281 6000 2187 0840 8161 0061 ab86 ....`.!..@.a.a.. │ │ │ -0000c190: c281 6200 2187 0840 8163 0061 ab86 c281 ..b.!..@.c.a.... │ │ │ -0000c1a0: 6400 2187 0840 8165 0061 ab86 c281 6600 d.!..@.e.a....f. │ │ │ -0000c1b0: 2187 0840 8167 0061 ab86 c281 6800 2187 !..@.g.a....h.!. │ │ │ -0000c1c0: 0840 8169 0061 ab86 c281 6a00 2187 0840 .@.i.a....j.!..@ │ │ │ -0000c1d0: 816b 0061 ab86 c281 6c00 2187 0840 816d .k.a....l.!..@.m │ │ │ -0000c1e0: 0061 ab86 c281 6e00 2187 0840 816f 0061 .a....n.!..@.o.a │ │ │ -0000c1f0: ab84 c2e0 2187 0840 8170 0061 ab86 c281 ....!..@.p.a.... │ │ │ -0000c200: 7100 2187 0840 8172 0061 ab86 c281 7300 q.!..@.r.a....s. │ │ │ -0000c210: 2187 0840 8174 0061 ab86 c281 7500 2187 !..@.t.a....u.!. │ │ │ -0000c220: 0840 8176 0061 ab86 c281 7700 2187 0840 .@.v.a....w.!..@ │ │ │ -0000c230: 8178 0061 ab86 c281 7900 2187 0840 817a .x.a....y.!..@.z │ │ │ -0000c240: 0061 ab86 c281 7b00 2187 0840 817c 0061 .a....{.!..@.|.a │ │ │ -0000c250: ab86 c281 7d00 2187 0840 817e 0061 ab86 ....}.!..@.~.a.. │ │ │ -0000c260: c281 7f00 2187 0840 8180 0061 ab84 c2e0 ....!..@...a.... │ │ │ -0000c270: 2187 0840 8181 0061 ab84 c2e0 2187 0840 !..@...a....!..@ │ │ │ -0000c280: 8182 0061 ab86 c281 8300 2187 0840 8184 ...a......!..@.. │ │ │ -0000c290: 0061 ab86 c281 8500 2187 0840 8186 0061 .a......!..@...a │ │ │ -0000c2a0: ab86 c281 8700 2187 0840 8188 0061 ab86 ......!..@...a.. │ │ │ -0000c2b0: c281 8900 2187 0840 818a 0061 ab84 c2e0 ....!..@...a.... │ │ │ -0000c2c0: 2187 0840 818b 0061 ab86 c281 8c00 2187 !..@...a......!. │ │ │ -0000c2d0: 818d 0081 8e00 0840 818f 0023 88d2 8722 .......@...#..." │ │ │ -0000c2e0: 205b 656e 7472 7920 6164 7269 616e 2077 [entry adrian w │ │ │ -0000c2f0: 6964 6765 742d 696e 7365 7274 2022 4164 idget-insert "Ad │ │ │ -0000c300: 7269 616e 2068 6173 2064 6f6e 6520 696e rian has done in │ │ │ -0000c310: 7661 6c75 6162 6c65 2077 6f72 6b20 7265 valuable work re │ │ │ -0000c320: 7772 6974 696e 6720 616e 6420 6d61 696e writing and main │ │ │ -0000c330: 7461 696e 696e 6720 7468 6520 5845 6d61 taining the XEma │ │ │ -0000c340: 6373 5c6e 7765 6220 7061 6765 7320 6174 cs\nweb pages at │ │ │ -0000c350: 2077 7777 2e78 656d 6163 732e 6f72 672e www.xemacs.org. │ │ │ -0000c360: 2020 4475 7269 6e67 2068 6973 2074 656e During his ten │ │ │ -0000c370: 7572 6573 6869 702c 2068 6520 6861 735c ureship, he has\ │ │ │ -0000c380: 6e65 7374 6162 6c69 7368 6564 2061 2063 nestablished a c │ │ │ -0000c390: 6f6e 7369 7374 656e 7420 6c6f 6f6b 2061 onsistent look a │ │ │ -0000c3a0: 6e64 2066 6565 6c2c 2070 6c61 6365 6420 nd feel, placed │ │ │ -0000c3b0: 7468 6520 7765 6220 7061 6765 7320 756e the web pages un │ │ │ -0000c3c0: 6465 725c 6e43 5653 2c20 7365 7420 7570 der\nCVS, set up │ │ │ -0000c3d0: 206d 6169 6e74 656e 616e 6365 2070 726f maintenance pro │ │ │ -0000c3e0: 6365 6475 7265 732c 2077 7269 7474 656e cedures, written │ │ │ -0000c3f0: 2073 6372 6970 7473 2074 6f20 6861 6e64 scripts to hand │ │ │ -0000c400: 6c65 5c6e 6175 746f 6d61 7469 6320 7570 le\nautomatic up │ │ │ -0000c410: 6461 7469 6e67 2c20 7661 6c69 6461 7469 dating, validati │ │ │ -0000c420: 6f6e 2061 6e64 206d 6972 726f 7269 6e67 on and mirroring │ │ │ -0000c430: 2c20 616e 6420 646f 6e65 2069 6e6e 756d , and done innum │ │ │ -0000c440: 6572 6162 6c65 5c6e 6f74 6865 7220 7461 erable\nother ta │ │ │ -0000c450: 736b 732e 2020 4865 2068 6173 2061 6c73 sks. He has als │ │ │ -0000c460: 6f20 6865 6c70 6564 2077 6974 6820 6d61 o helped with ma │ │ │ -0000c470: 6e79 206f 7468 6572 2061 646d 696e 6973 ny other adminis │ │ │ -0000c480: 7472 6174 6976 6520 7461 736b 732c 5c6e trative tasks,\n │ │ │ -0000c490: 7375 6368 2061 7320 7468 6520 7468 616e such as the than │ │ │ -0000c4a0: 6b6c 6573 7320 776f 726b 206f 6620 6465 kless work of de │ │ │ -0000c4b0: 616c 696e 6720 7769 7468 2074 6865 2070 aling with the p │ │ │ -0000c4c0: 726f 7669 6465 7273 206f 6620 7265 736f roviders of reso │ │ │ -0000c4d0: 7572 6365 735c 6e74 6f20 5845 6d61 6373 urces\nto XEmacs │ │ │ -0000c4e0: 2061 7420 536f 7572 6365 466f 7267 6520 at SourceForge │ │ │ -0000c4f0: 616e 6420 7475 782e 6f72 672e 5c6e 2220 and tux.org.\n" │ │ │ -0000c500: 616a 2022 466f 726d 6572 2060 5061 636b aj "Former `Pack │ │ │ -0000c510: 6167 6520 5061 7463 6820 5465 6e64 6572 age Patch Tender │ │ │ -0000c520: 272c 2062 6574 6120 7465 7374 6572 2061 ', beta tester a │ │ │ -0000c530: 6e64 2047 4e55 206c 6962 6320 6465 7665 nd GNU libc deve │ │ │ -0000c540: 6c6f 7065 722e 5c6e 2220 616a 6320 2246 loper.\n" ajc "F │ │ │ -0000c550: 6f72 6d65 7220 5845 6d61 6373 2077 6562 ormer XEmacs web │ │ │ -0000c560: 2073 6974 6520 6d61 696e 7461 696e 6572 site maintainer │ │ │ -0000c570: 2e5c 6e22 2061 6c61 7374 6169 7220 2252 .\n" alastair "R │ │ │ -0000c580: 6577 726f 7465 2074 6865 2073 656c 6563 ewrote the selec │ │ │ -0000c590: 7469 6f6e 2063 6f64 652c 2061 6464 696e tion code, addin │ │ │ -0000c5a0: 6720 6d61 6e79 206e 6577 2066 6561 7475 g many new featu │ │ │ -0000c5b0: 7265 7320 7375 6368 2061 7320 6265 7474 res such as bett │ │ │ -0000c5c0: 6572 5c6e 7375 7070 6f72 7420 666f 7220 er\nsupport for │ │ │ -0000c5d0: 6172 6269 7472 6172 7920 7365 6c65 6374 arbitrary select │ │ │ -0000c5e0: 696f 6e20 7479 7065 7320 2865 7370 6563 ion types (espec │ │ │ -0000c5f0: 6961 6c6c 7920 756e 6465 7220 4d53 2057 ially under MS W │ │ │ -0000c600: 696e 646f 7773 2c5c 6e77 6865 7265 2074 indows,\nwhere t │ │ │ -0000c610: 6865 2066 756c 6c20 706f 7765 7220 6f66 he full power of │ │ │ -0000c620: 2074 6865 2063 6c69 7062 6f61 7264 2073 the clipboard s │ │ │ -0000c630: 7973 7465 6d20 6973 2061 7661 696c 6162 ystem is availab │ │ │ -0000c640: 6c65 2075 6e64 6572 5c6e 5845 6d61 6373 le under\nXEmacs │ │ │ -0000c650: 292e 5c6e 2220 6261 7720 2249 276d 2074 ).\n" baw "I'm t │ │ │ -0000c660: 6865 2061 7574 686f 7220 6f66 2022 2061 he author of " a │ │ │ -0000c670: 626f 7574 2d75 726c 2d6c 696e 6b20 6363 bout-url-link cc │ │ │ -0000c680: 2d6d 6f64 6520 2243 4320 4d6f 6465 2220 -mode "CC Mode" │ │ │ -0000c690: 2256 6973 6974 2074 6865 2043 4320 4d6f "Visit the CC Mo │ │ │ -0000c6a0: 6465 2070 6167 6522 2022 2c20 666f 7220 de page" ", for │ │ │ -0000c6b0: 432c 2043 2b2b 2c20 4f62 6a65 6374 6976 C, C++, Objectiv │ │ │ -0000c6c0: 652d 4320 616e 6420 4a61 7661 2065 6469 e-C and Java edi │ │ │ -0000c6d0: 7469 6e67 2c5c 6e53 7570 6572 6369 7465 ting,\nSupercite │ │ │ -0000c6e0: 2066 6f72 206d 6169 6c20 616e 6420 6e65 for mail and ne │ │ │ -0000c6f0: 7773 2063 6974 696e 672c 2061 6e64 2073 ws citing, and s │ │ │ -0000c700: 756e 6472 7920 6f74 6865 7220 5845 6d61 undry other XEma │ │ │ -0000c710: 6373 2070 6163 6b61 6765 735c 6e73 7563 cs packages\nsuc │ │ │ -0000c720: 6820 6173 2045 4c50 2028 7468 6520 456d h as ELP (the Em │ │ │ -0000c730: 6163 7320 4c69 7370 2050 726f 6669 6c65 acs Lisp Profile │ │ │ -0000c740: 7229 2c20 5265 706f 7274 6572 2c20 7872 r), Reporter, xr │ │ │ -0000c750: 6462 2d6d 6f64 652c 2061 6e64 5c6e 7769 db-mode, and\nwi │ │ │ -0000c760: 6e72 696e 672e 2020 4576 656e 2074 686f nring. Even tho │ │ │ -0000c770: 7567 6820 4920 7374 696c 6c20 6c69 7665 ugh I still live │ │ │ -0000c780: 2061 6c6d 6f73 7420 3130 3025 2069 6e20 almost 100% in │ │ │ -0000c790: 5845 6d61 6373 2074 6865 7365 2064 6179 XEmacs these day │ │ │ -0000c7a0: 732c 5c6e 6d79 204c 6973 7020 6861 636b s,\nmy Lisp hack │ │ │ -0000c7b0: 696e 6720 6861 7320 6661 6c6c 656e 206f ing has fallen o │ │ │ -0000c7c0: 6666 2069 6e20 7265 6365 6e74 2079 6561 ff in recent yea │ │ │ -0000c7d0: 7273 2061 7320 4920 6265 6361 6d65 206d rs as I became m │ │ │ -0000c7e0: 6f72 655c 6e69 6e76 6f6c 7665 6420 696e ore\ninvolved in │ │ │ -0000c7f0: 2050 7974 686f 6e2c 2061 6e64 2069 6e20 Python, and in │ │ │ -0000c800: 6661 6374 2c20 4920 6375 7272 656e 746c fact, I currentl │ │ │ -0000c810: 7920 6d61 696e 7461 696e 2074 6865 2050 y maintain the P │ │ │ -0000c820: 7974 686f 6e5c 6e65 6469 7469 6e67 206d ython\nediting m │ │ │ -0000c830: 6f64 652e 2020 5365 6520 616c 736f 3a20 ode. See also: │ │ │ -0000c840: 2220 2268 7474 703a 2f2f 7777 772e 7079 " "http://www.py │ │ │ -0000c850: 7468 6f6e 2e6f 7267 2f65 6d61 6373 2220 thon.org/emacs" │ │ │ -0000c860: 6e69 6c20 2256 6973 6974 2074 6865 2070 nil "Visit the p │ │ │ -0000c870: 7974 686f 6e2e 6f72 6720 456d 6163 7320 ython.org Emacs │ │ │ -0000c880: 476f 6f64 6965 7320 7061 6765 2220 222e Goodies page" ". │ │ │ -0000c890: 5c6e 2220 6265 6e20 2249 2061 6d20 7468 \n" ben "I am th │ │ │ -0000c8a0: 6520 6c61 7267 6573 7420 636f 6465 2063 e largest code c │ │ │ -0000c8b0: 6f6e 7472 6962 7574 6f72 2074 6f20 5845 ontributor to XE │ │ │ -0000c8c0: 6d61 6373 2c20 616e 6420 7468 6520 6172 macs, and the ar │ │ │ -0000c8d0: 6368 6974 6563 7420 6f66 206d 616e 795c chitect of many\ │ │ │ -0000c8e0: 6e6f 6620 7468 6520 6665 6174 7572 6573 nof the features │ │ │ -0000c8f0: 2074 6861 7420 6469 7374 696e 6775 6973 that distinguis │ │ │ -0000c900: 6820 5845 6d61 6373 2066 726f 6d20 474e h XEmacs from GN │ │ │ -0000c910: 5520 456d 6163 7320 616e 6420 6f74 6865 U Emacs and othe │ │ │ -0000c920: 7220 456d 6163 735c 6e76 6572 7369 6f6e r Emacs\nversion │ │ │ -0000c930: 732e 2020 4d79 206d 6169 6e20 636f 6e74 s. My main cont │ │ │ -0000c940: 7269 6275 7469 6f6e 7320 746f 2058 456d ributions to XEm │ │ │ -0000c950: 6163 7320 696e 636c 7564 6520 7265 7772 acs include rewr │ │ │ -0000c960: 6974 696e 6720 6c61 7267 655c 6e70 6172 iting large\npar │ │ │ -0000c970: 7473 206f 6620 7468 6520 696e 7465 726e ts of the intern │ │ │ -0000c980: 616c 7320 616e 6420 7468 6520 676f 7279 als and the gory │ │ │ -0000c990: 2058 742f 586c 6962 2069 6e74 6572 6661 Xt/Xlib interfa │ │ │ -0000c9a0: 6369 6e67 2c20 6164 6469 6e67 2074 6865 cing, adding the │ │ │ -0000c9b0: 5c6e 4d75 6c65 2028 696e 7465 726e 6174 \nMule (internat │ │ │ -0000c9c0: 696f 6e61 6c29 2073 7570 706f 7274 2c20 ional) support, │ │ │ -0000c9d0: 696d 7072 6f76 696e 6720 7468 6520 4d53 improving the MS │ │ │ -0000c9e0: 2057 696e 646f 7773 2073 7570 706f 7274 Windows support │ │ │ -0000c9f0: 2c5c 6e61 6464 696e 6720 6d61 6e79 2047 ,\nadding many G │ │ │ -0000ca00: 5549 2066 6561 7475 7265 7320 746f 2058 UI features to X │ │ │ -0000ca10: 456d 6163 732c 2061 7263 6869 7465 6374 Emacs, architect │ │ │ -0000ca20: 696e 6720 7468 655c 6e64 6576 6963 652d ing the\ndevice- │ │ │ -0000ca30: 6162 7374 7261 6374 696f 6e20 616e 6420 abstraction and │ │ │ -0000ca40: 7370 6563 6966 6965 7220 636f 6465 2c20 specifier code, │ │ │ -0000ca50: 7772 6974 696e 6720 6d6f 7374 206f 6620 writing most of │ │ │ -0000ca60: 7468 6520 5845 6d61 6373 5c6e 496e 7465 the XEmacs\nInte │ │ │ -0000ca70: 726e 616c 7320 4d61 6e75 616c 2061 6e64 rnals Manual and │ │ │ -0000ca80: 2074 6865 2058 456d 6163 732d 7370 6563 the XEmacs-spec │ │ │ -0000ca90: 6966 6963 2070 6172 7473 206f 6620 7468 ific parts of th │ │ │ -0000caa0: 6520 5845 6d61 6373 204c 6973 705c 6e52 e XEmacs Lisp\nR │ │ │ -0000cab0: 6566 6572 656e 6365 204d 616e 7561 6c2c eference Manual, │ │ │ -0000cac0: 2073 796e 6368 696e 6720 6120 6772 6561 synching a grea │ │ │ -0000cad0: 7420 6465 616c 206f 6620 636f 6465 2077 t deal of code w │ │ │ -0000cae0: 6974 6820 474e 5520 456d 6163 732c 2061 ith GNU Emacs, a │ │ │ -0000caf0: 6e64 5c6e 6265 696e 6720 6120 6765 6e65 nd\nbeing a gene │ │ │ -0000cb00: 7261 6c20 6e75 6973 616e 6365 202e 2e2e ral nuisance ... │ │ │ -0000cb10: 2065 722c 2062 7261 696e 7374 6f72 6d65 er, brainstorme │ │ │ -0000cb20: 7220 666f 7220 6d61 6e79 206f 6620 7468 r for many of th │ │ │ -0000cb30: 6520 6e65 775c 6e66 6561 7475 7265 7320 e new\nfeatures │ │ │ -0000cb40: 6f66 2058 456d 6163 732e 5c6e 2220 6277 of XEmacs.\n" bw │ │ │ -0000cb50: 2022 4175 7468 6f72 206f 6620 7468 6520 "Author of the │ │ │ -0000cb60: 4879 7065 7262 6f6c 6520 6576 6572 7964 Hyperbole everyd │ │ │ -0000cb70: 6179 2069 6e66 6f72 6d61 7469 6f6e 206d ay information m │ │ │ -0000cb80: 616e 6167 656d 656e 7420 6879 7065 7274 anagement hypert │ │ │ -0000cb90: 6578 745c 6e73 7973 7465 6d20 616e 6420 ext\nsystem and │ │ │ -0000cba0: 7468 6520 4f4f 2d42 726f 7773 6572 206d the OO-Browser m │ │ │ -0000cbb0: 756c 7469 2d6c 616e 6775 6167 6520 636f ulti-language co │ │ │ -0000cbc0: 6465 2062 726f 7773 6572 2e20 2048 6520 de browser. He │ │ │ -0000cbd0: 616c 736f 5c6e 6465 7369 676e 6564 2074 also\ndesigned t │ │ │ -0000cbe0: 6865 2042 654f 7065 6e20 496e 666f 446f he BeOpen InfoDo │ │ │ -0000cbf0: 636b 2069 6e74 6567 7261 7465 6420 6465 ck integrated de │ │ │ -0000cc00: 7665 6c6f 706d 656e 7420 656e 7669 726f velopment enviro │ │ │ -0000cc10: 6e6d 656e 745c 6e66 6f72 2073 6f66 7477 nment\nfor softw │ │ │ -0000cc20: 6172 6520 656e 6769 6e65 6572 732e 2020 are engineers. │ │ │ -0000cc30: 4974 2072 756e 7320 6174 6f70 2058 456d It runs atop XEm │ │ │ -0000cc40: 6163 7320 616e 6420 6973 2061 7661 696c acs and is avail │ │ │ -0000cc50: 6162 6c65 2066 726f 6d5c 6e68 6973 2066 able from\nhis f │ │ │ -0000cc60: 6972 6d2c 2042 654f 7065 6e2c 2077 6869 irm, BeOpen, whi │ │ │ -0000cc70: 6368 206f 6666 6572 7320 6469 7374 7269 ch offers distri │ │ │ -0000cc80: 6275 7469 6f6e 732c 2063 7573 746f 6d20 butions, custom │ │ │ -0000cc90: 6465 7665 6c6f 706d 656e 742c 5c6e 7375 development,\nsu │ │ │ -0000cca0: 7070 6f72 742c 2061 6e64 2074 7261 696e pport, and train │ │ │ -0000ccb0: 696e 6720 7061 636b 6167 6573 2066 6f72 ing packages for │ │ │ -0000ccc0: 2063 6f72 706f 7261 7465 2075 7365 7273 corporate users │ │ │ -0000ccd0: 206f 6620 5845 6d61 6373 2c20 474e 555c of XEmacs, GNU\ │ │ │ -0000cce0: 6e45 6d61 6373 2061 6e64 2049 6e66 6f44 nEmacs and InfoD │ │ │ -0000ccf0: 6f63 6b2e 2020 5365 6520 2220 6265 6f70 ock. See " beop │ │ │ -0000cd00: 656e 2022 5669 7369 7420 4265 4f70 656e en "Visit BeOpen │ │ │ -0000cd10: 2057 5757 2070 6167 6522 2063 6777 2022 WWW page" cgw " │ │ │ -0000cd20: 4175 7468 6f72 206f 6620 616e 2065 6172 Author of an ear │ │ │ -0000cd30: 6c69 6572 2076 6572 7369 6f6e 206f 6620 lier version of │ │ │ -0000cd40: 7468 6520 4d53 2057 696e 646f 7773 2073 the MS Windows s │ │ │ -0000cd50: 6574 7570 2070 726f 6772 616d 2066 6f72 etup program for │ │ │ -0000cd60: 2058 456d 6163 732e 5c6e 2220 6368 7220 XEmacs.\n" chr │ │ │ -0000cd70: 224d 6169 6e74 6169 6e65 7220 6f66 2074 "Maintainer of t │ │ │ -0000cd80: 6865 2058 456d 6163 7320 4641 5120 616e he XEmacs FAQ an │ │ │ -0000cd90: 6420 7072 6f75 6420 6175 7468 6f72 206f d proud author o │ │ │ -0000cda0: 6620 607a 6170 2d75 702d 746f 2d63 6861 f `zap-up-to-cha │ │ │ -0000cdb0: 7227 2e5c 6e22 2063 7261 6967 2022 536f r'.\n" craig "So │ │ │ -0000cdc0: 7272 792c 206e 6f20 696e 666f 726d 6174 rry, no informat │ │ │ -0000cdd0: 696f 6e20 6162 6f75 7420 6d79 2058 456d ion about my XEm │ │ │ -0000cde0: 6163 7320 636f 6e74 7269 6275 7469 6f6e acs contribution │ │ │ -0000cdf0: 7320 7965 742e 5c6e 2220 6374 686f 6d70 s yet.\n" cthomp │ │ │ -0000ce00: 2022 4d61 696e 7461 696e 6572 206f 6620 "Maintainer of │ │ │ -0000ce10: 5845 6d61 6373 2066 726f 6d20 6d69 642d XEmacs from mid- │ │ │ -0000ce20: 3139 3934 2074 6872 6f75 6768 2031 3939 1994 through 199 │ │ │ -0000ce30: 362e 2020 4175 7468 6f72 206f 6620 7468 6. Author of th │ │ │ -0000ce40: 655c 6e72 6564 6973 706c 6179 2065 6e67 e\nredisplay eng │ │ │ -0000ce50: 696e 652c 2074 6865 206f 7269 6769 6e61 ine, the origina │ │ │ -0000ce60: 6c20 746f 6f6c 6261 7220 616e 6420 7363 l toolbar and sc │ │ │ -0000ce70: 726f 6c6c 6261 7273 2061 6e64 2073 6f6d rollbars and som │ │ │ -0000ce80: 6520 6f66 2074 6865 5c6e 6465 7669 6365 e of the\ndevice │ │ │ -0000ce90: 2d61 6273 7472 6163 7469 6f6e 2c20 5454 -abstraction, TT │ │ │ -0000cea0: 5920 616e 6420 676c 7970 6820 636f 6465 Y and glyph code │ │ │ -0000ceb0: 2e20 2043 7265 6174 6f72 206f 6620 7468 . Creator of th │ │ │ -0000cec0: 6520 7865 6d61 6373 2e6f 7267 5c6e 646f e xemacs.org\ndo │ │ │ -0000ced0: 6d61 696e 2061 6e64 2063 6f6d 702e 656d main and comp.em │ │ │ -0000cee0: 6163 732e 7865 6d61 6373 2e5c 6e22 2064 acs.xemacs.\n" d │ │ │ -0000cef0: 6169 6b69 2064 616e 2064 6172 7279 6c6f aiki dan darrylo │ │ │ -0000cf00: 2064 6576 696e 2022 5061 7274 206f 6620 devin "Part of │ │ │ -0000cf10: 7468 6520 6f72 6967 696e 616c 2028 7072 the original (pr │ │ │ -0000cf20: 652d 3139 2e30 2920 4c75 6369 6420 456d e-19.0) Lucid Em │ │ │ -0000cf30: 6163 7320 6465 7665 6c6f 706d 656e 7420 acs development │ │ │ -0000cf40: 7465 616d 2e5c 6e4d 6174 7468 6965 7520 team.\nMatthieu │ │ │ -0000cf50: 7772 6f74 6520 7468 6520 696e 6974 6961 wrote the initia │ │ │ -0000cf60: 6c20 456e 6572 6769 7a65 2069 6e74 6572 l Energize inter │ │ │ -0000cf70: 6661 6365 2c20 6465 7369 676e 6564 2074 face, designed t │ │ │ -0000cf80: 6865 5c6e 746f 6f6c 6b69 742d 696e 6465 he\ntoolkit-inde │ │ │ -0000cf90: 7065 6e64 656e 7420 4c75 6369 6420 5769 pendent Lucid Wi │ │ │ -0000cfa0: 6467 6574 206c 6962 7261 7279 2c20 616e dget library, an │ │ │ -0000cfb0: 6420 6669 7865 6420 656e 6f75 6768 2072 d fixed enough r │ │ │ -0000cfc0: 6564 6973 706c 6179 5c6e 6275 6773 2074 edisplay\nbugs t │ │ │ -0000cfd0: 6f20 6c61 7374 2061 206c 6966 6574 696d o last a lifetim │ │ │ -0000cfe0: 652e 2020 5468 6520 6665 6174 7572 6573 e. The features │ │ │ -0000cff0: 2069 6e20 4c75 6369 6420 456d 6163 7320 in Lucid Emacs │ │ │ -0000d000: 7765 7265 206c 6172 6765 6c79 5c6e 696e were largely\nin │ │ │ -0000d010: 7370 6972 6564 2062 7920 4d61 7474 6869 spired by Matthi │ │ │ -0000d020: 6575 2773 2069 6e69 7469 616c 2070 726f eu's initial pro │ │ │ -0000d030: 746f 7479 7065 206f 6620 616e 2045 6e65 totype of an Ene │ │ │ -0000d040: 7267 697a 6520 696e 7465 7266 6163 655c rgize interface\ │ │ │ -0000d050: 6e75 7369 6e67 2045 706f 6368 2e5c 6e22 nusing Epoch.\n" │ │ │ -0000d060: 2064 6b69 6e64 7265 6420 2244 6172 7265 dkindred "Darre │ │ │ -0000d070: 6c6c 2074 656e 6473 2074 6f20 636f 6d65 ll tends to come │ │ │ -0000d080: 206f 7574 206f 6620 7468 6520 776f 6f64 out of the wood │ │ │ -0000d090: 776f 726b 2061 2063 6f75 706c 6520 6f66 work a couple of │ │ │ -0000d0a0: 2077 6565 6b73 5c6e 6265 666f 7265 2061 weeks\nbefore a │ │ │ -0000d0b0: 206e 6577 2072 656c 6561 7365 2077 6974 new release wit │ │ │ -0000d0c0: 6820 6120 666c 7572 7279 206f 6620 6669 h a flurry of fi │ │ │ -0000d0d0: 7865 7320 666f 7220 6275 6773 2074 6861 xes for bugs tha │ │ │ -0000d0e0: 7420 5c6e 616e 6e6f 7920 6869 6d2e 2020 t \nannoy him. │ │ │ -0000d0f0: 4865 2068 6f70 6573 2068 6527 7320 7370 He hopes he's sp │ │ │ -0000d100: 6172 6564 2079 6f75 2066 726f 6d20 6120 ared you from a │ │ │ -0000d110: 636f 7265 2064 756d 7020 6f72 2074 776f core dump or two │ │ │ -0000d120: 2e5c 6e22 2064 6d6f 6f72 6520 2244 6176 .\n" dmoore "Dav │ │ │ -0000d130: 6964 2068 6173 2063 6f6e 7472 6962 7574 id has contribut │ │ │ -0000d140: 6564 2067 7265 6174 6c79 2074 6f20 7468 ed greatly to th │ │ │ -0000d150: 6520 7175 6573 7420 746f 2073 7065 6564 e quest to speed │ │ │ -0000d160: 2075 7020 5845 6d61 6373 2e5c 6e22 2064 up XEmacs.\n" d │ │ │ -0000d170: 6964 6965 7220 2244 6964 6965 7220 6a6f idier "Didier jo │ │ │ -0000d180: 696e 6564 2074 6865 2064 6576 656c 6f70 ined the develop │ │ │ -0000d190: 6d65 6e74 206f 6620 5845 6d61 6373 2069 ment of XEmacs i │ │ │ -0000d1a0: 6e20 3139 3936 2c20 616e 6420 6861 7320 n 1996, and has │ │ │ -0000d1b0: 6265 656e 206f 6e65 206f 665c 6e74 6865 been one of\nthe │ │ │ -0000d1c0: 2063 6f72 6520 6d61 696e 7461 696e 6572 core maintainer │ │ │ -0000d1d0: 7320 7369 6e63 6520 3139 3938 2e20 2048 s since 1998. H │ │ │ -0000d1e0: 6973 2076 6572 7920 6669 7273 7420 636f is very first co │ │ │ -0000d1f0: 6e74 7269 6275 7469 6f6e 2077 6173 2074 ntribution was t │ │ │ -0000d200: 6865 5c6e 7472 616e 736c 6174 696f 6e20 he\ntranslation │ │ │ -0000d210: 6f66 2074 6865 2074 7574 6f72 6961 6c20 of the tutorial │ │ │ -0000d220: 746f 2046 7265 6e63 682e 2053 696e 6365 to French. Since │ │ │ -0000d230: 2074 6865 6e2c 2068 6520 6861 7320 636f then, he has co │ │ │ -0000d240: 6e74 7269 6275 7465 645c 6e76 6172 696f ntributed\nvario │ │ │ -0000d250: 7573 2062 7567 2066 6978 6573 2061 6e64 us bug fixes and │ │ │ -0000d260: 2065 6e68 616e 6365 6d65 6e74 7320 696e enhancements in │ │ │ -0000d270: 2066 6965 6c64 7320 6173 2064 6976 6572 fields as diver │ │ │ -0000d280: 7365 2061 7320 7468 6520 4755 492c 5c6e se as the GUI,\n │ │ │ -0000d290: 7265 6469 7370 6c61 7920 656e 6769 6e65 redisplay engine │ │ │ -0000d2a0: 2061 6e64 2061 7574 6f63 6f6e 6620 7375 and autoconf su │ │ │ -0000d2b0: 7070 6f72 742e 5c6e 5c6e 4469 6469 6572 pport.\n\nDidier │ │ │ -0000d2c0: 2069 7320 7468 6520 6f66 6669 6369 616c is the official │ │ │ -0000d2d0: 206d 6169 6e74 6169 6e65 7220 6f66 2073 maintainer of s │ │ │ -0000d2e0: 6f6d 6520 636f 7265 206c 6962 7261 7269 ome core librari │ │ │ -0000d2f0: 6573 2028 7265 6374 2c20 6375 732d 6564 es (rect, cus-ed │ │ │ -0000d300: 6974 2c5c 6e77 6964 2d65 6469 7429 2061 it,\nwid-edit) a │ │ │ -0000d310: 6e64 2074 6865 2061 7574 686f 7220 6f66 nd the author of │ │ │ -0000d320: 2074 6865 206d 756c 7469 6361 7374 2073 the multicast s │ │ │ -0000d330: 7570 706f 7274 2e20 2048 6520 6973 2061 upport. He is a │ │ │ -0000d340: 6c73 6f20 7468 6520 6175 7468 6f72 5c6e lso the author\n │ │ │ -0000d350: 6f66 2073 6576 6572 616c 2070 6163 6b61 of several packa │ │ │ -0000d360: 6765 732c 2069 6e63 6c75 6469 6e67 206d ges, including m │ │ │ -0000d370: 6368 6174 2061 6e64 2050 6174 6368 6572 chat and Patcher │ │ │ -0000d380: 2e5c 6e22 2065 6220 2241 6c73 6f20 7061 .\n" eb "Also pa │ │ │ -0000d390: 7274 206f 6620 7468 6520 6f72 6967 696e rt of the origin │ │ │ -0000d3a0: 616c 204c 7563 6964 2045 6d61 6373 2064 al Lucid Emacs d │ │ │ -0000d3b0: 6576 656c 6f70 6d65 6e74 2074 6561 6d2e evelopment team. │ │ │ -0000d3c0: 2020 4572 6963 2070 6c61 7965 6420 615c Eric played a\ │ │ │ -0000d3d0: 6e62 6967 2070 6172 7420 696e 2074 6865 nbig part in the │ │ │ -0000d3e0: 2064 6573 6967 6e20 6f66 206d 616e 7920 design of many │ │ │ -0000d3f0: 6173 7065 6374 7320 6f66 2074 6865 2073 aspects of the s │ │ │ -0000d400: 7973 7465 6d2c 2069 6e63 6c75 6469 6e67 ystem, including │ │ │ -0000d410: 2074 6865 5c6e 6e65 7720 636f 6d6d 616e the\nnew comman │ │ │ -0000d420: 6420 6c6f 6f70 2061 6e64 206b 6579 6d61 d loop and keyma │ │ │ -0000d430: 7073 2c20 6669 7865 6420 6e75 6d65 726f ps, fixed numero │ │ │ -0000d440: 7573 2062 7567 732c 2061 6e64 2068 6173 us bugs, and has │ │ │ -0000d450: 2062 6565 6e20 615c 6e72 656c 6961 626c been a\nreliabl │ │ │ -0000d460: 6520 6265 7461 2074 6573 7465 7220 6576 e beta tester ev │ │ │ -0000d470: 6572 2073 696e 6365 2e5c 6e22 2066 6162 er since.\n" fab │ │ │ -0000d480: 7269 6365 2022 4920 6861 7665 2073 7461 rice "I have sta │ │ │ -0000d490: 7274 6564 2074 6f20 7072 6f76 6964 6520 rted to provide │ │ │ -0000d4a0: 6269 6e61 7279 206b 6974 7320 666f 7220 binary kits for │ │ │ -0000d4b0: 7468 6520 3231 2e32 2073 6572 6965 7320 the 21.2 series │ │ │ -0000d4c0: 7768 656e 2074 6865 7265 5c6e 7761 7320 when there\nwas │ │ │ -0000d4d0: 6e6f 2069 6e73 7461 6c6c 6572 2061 7661 no installer ava │ │ │ -0000d4e0: 696c 6162 6c65 2e20 4920 636f 6e74 7269 ilable. I contri │ │ │ -0000d4f0: 6275 7465 6420 6120 6665 7720 6c69 6e65 buted a few line │ │ │ -0000d500: 7320 6f66 2063 6f72 6520 636f 6465 5c6e s of core code\n │ │ │ -0000d510: 6f63 6361 7369 6f6e 616c 6c79 2074 6f20 occasionally to │ │ │ -0000d520: 6d61 6b65 2074 6869 6e67 7320 736d 6f6f make things smoo │ │ │ -0000d530: 7468 6572 2077 6974 6820 7468 6520 6e61 ther with the na │ │ │ -0000d540: 7469 7665 2077 696e 3332 2070 6f72 7420 tive win32 port │ │ │ -0000d550: 7768 6963 685c 6e49 276d 2075 7369 6e67 which\nI'm using │ │ │ -0000d560: 2061 6c6c 2074 6865 2064 6179 2e5c 6e5c all the day.\n\ │ │ │ -0000d570: 6e49 2061 6c73 6f20 636f 6e74 7269 6275 nI also contribu │ │ │ -0000d580: 7465 6420 656c 6973 7020 636f 6465 206c ted elisp code l │ │ │ -0000d590: 6f6e 6720 6167 6f20 746f 206d 616b 6520 ong ago to make │ │ │ -0000d5a0: 476e 7573 2072 756e 2075 6e64 6572 2058 Gnus run under X │ │ │ -0000d5b0: 456d 6163 732e 5c6e 2220 676f 6c75 6265 Emacs.\n" golube │ │ │ -0000d5c0: 7620 2255 7365 6420 5845 6d61 6373 2073 v "Used XEmacs s │ │ │ -0000d5d0: 696e 6365 2065 6172 6c79 2031 3939 372e ince early 1997. │ │ │ -0000d5e0: 2020 4669 7865 6420 6275 6773 2074 6861 Fixed bugs tha │ │ │ -0000d5f0: 7420 616e 6e6f 7920 6d65 2c20 626f 7468 t annoy me, both │ │ │ -0000d600: 2069 6e5c 6e58 456d 6163 7320 636f 7265 in\nXEmacs core │ │ │ -0000d610: 2061 6e64 2069 6e20 7061 636b 6167 6573 and in packages │ │ │ -0000d620: 2049 2075 7365 2c20 6d6f 7374 6c79 2076 I use, mostly v │ │ │ -0000d630: 6970 6572 2e20 2048 6f70 696e 6720 746f iper. Hoping to │ │ │ -0000d640: 2067 6574 5c6e 636f 6469 6e67 2d63 6f6f get\ncoding-coo │ │ │ -0000d650: 6b69 6520 7061 636b 6167 6520 6469 7374 kie package dist │ │ │ -0000d660: 7269 6275 7465 642c 2077 6869 6368 2069 ributed, which i │ │ │ -0000d670: 7320 616c 736f 2061 2066 6978 206f 6620 s also a fix of │ │ │ -0000d680: 7768 6174 2049 5c6e 636f 6e73 6964 6572 what I\nconsider │ │ │ -0000d690: 2061 2062 7567 2e5c 6e22 2067 756e 6e61 a bug.\n" gunna │ │ │ -0000d6a0: 7220 6862 7320 2250 6172 7420 6f66 2074 r hbs "Part of t │ │ │ -0000d6b0: 6865 206f 7269 6769 6e61 6c20 2870 7265 he original (pre │ │ │ -0000d6c0: 2d31 392e 3029 204c 7563 6964 2045 6d61 -19.0) Lucid Ema │ │ │ -0000d6d0: 6373 2064 6576 656c 6f70 6d65 6e74 2074 cs development t │ │ │ -0000d6e0: 6561 6d2e 2020 4861 726c 616e 5c6e 6465 eam. Harlan\nde │ │ │ -0000d6f0: 7369 676e 6564 2061 6e64 2069 6d70 6c65 signed and imple │ │ │ -0000d700: 6d65 6e74 6564 206d 616e 7920 6f66 2074 mented many of t │ │ │ -0000d710: 6865 206c 6f77 206c 6576 656c 2064 6174 he low level dat │ │ │ -0000d720: 6120 7374 7275 6374 7572 6573 2077 6869 a structures whi │ │ │ -0000d730: 6368 5c6e 6172 6520 6f72 6967 696e 616c ch\nare original │ │ │ -0000d740: 2074 6f20 7468 6520 4c75 6369 6420 7665 to the Lucid ve │ │ │ -0000d750: 7273 696f 6e20 6f66 2045 6d61 6373 2c20 rsion of Emacs, │ │ │ -0000d760: 696e 636c 7564 696e 6720 6578 7465 6e74 including extent │ │ │ -0000d770: 7320 616e 6420 6861 7368 5c6e 7461 626c s and hash\ntabl │ │ │ -0000d780: 6573 2e5c 6e22 2068 6973 6173 6869 2068 es.\n" hisashi h │ │ │ -0000d790: 6d75 6c6c 6572 2022 4175 7468 6f72 206f muller "Author o │ │ │ -0000d7a0: 6620 7468 6520 636f 6465 2075 7365 6420 f the code used │ │ │ -0000d7b0: 746f 2063 6f6e 6e65 6374 2058 456d 6163 to connect XEmac │ │ │ -0000d7c0: 7320 7769 7468 2054 6f6f 6c54 616c 6b2c s with ToolTalk, │ │ │ -0000d7d0: 2061 6e64 206f 6620 616e 5c6e 6561 726c and of an\nearl │ │ │ -0000d7e0: 7920 636c 6965 6e74 206f 6620 7468 6520 y client of the │ │ │ -0000d7f0: 6578 7465 726e 616c 2045 6d61 6373 2077 external Emacs w │ │ │ -0000d800: 6964 6765 742e 5c6e 2220 686e 696b 7369 idget.\n" hniksi │ │ │ -0000d810: 6320 2248 7276 6f6a 6527 7320 636f 6e74 c "Hrvoje's cont │ │ │ -0000d820: 7269 6275 7469 6f6e 2074 6f20 5845 6d61 ribution to XEma │ │ │ -0000d830: 6373 2063 6f6e 7369 7374 7320 6f66 206d cs consists of m │ │ │ -0000d840: 616e 7920 686f 7572 7320 7370 656e 7420 any hours spent │ │ │ -0000d850: 776f 726b 696e 675c 6e6f 6e20 636f 6465 working\non code │ │ │ -0000d860: 2061 6e64 2074 616b 696e 6720 7061 7274 and taking part │ │ │ -0000d870: 2069 6e20 7075 626c 6963 2064 6973 6375 in public discu │ │ │ -0000d880: 7373 696f 6e73 2e5c 6e5c 6e48 6520 7772 ssions.\n\nHe wr │ │ │ -0000d890: 6f74 6520 6073 6176 6568 6973 7427 2061 ote `savehist' a │ │ │ -0000d8a0: 6e64 2060 6874 6d6c 697a 6527 2070 6163 nd `htmlize' pac │ │ │ -0000d8b0: 6b61 6765 732c 2074 6865 206c 6174 7465 kages, the latte │ │ │ -0000d8c0: 7220 6861 7669 6e67 2061 2070 7265 7474 r having a prett │ │ │ -0000d8d0: 795c 6e6c 6172 6765 2067 6174 6865 7269 y\nlarge gatheri │ │ │ -0000d8e0: 6e67 206f 6620 7573 6572 732e 2020 4865 ng of users. He │ │ │ -0000d8f0: 2077 6f72 6b65 6420 746f 2069 6d70 726f worked to impro │ │ │ -0000d900: 7665 206d 616e 7920 7061 7274 7320 6f66 ve many parts of │ │ │ -0000d910: 2058 456d 6163 735c 6e4c 6973 7020 636f XEmacs\nLisp co │ │ │ -0000d920: 6465 2c20 696e 636c 7564 696e 6720 6973 de, including is │ │ │ -0000d930: 6561 7263 6820 2846 5346 2073 796e 6368 earch (FSF synch │ │ │ -0000d940: 2061 6e64 206e 6577 2066 6561 7475 7265 and new feature │ │ │ -0000d950: 7329 2c20 636c 2c20 6564 6d61 6372 6f5c s), cl, edmacro\ │ │ │ -0000d960: 6e28 4653 4620 7379 6e63 6820 616e 6420 n(FSF synch and │ │ │ -0000d970: 616e 2061 6c6d 6f73 7420 636f 6d70 6c65 an almost comple │ │ │ -0000d980: 7465 2072 6577 7269 7465 292c 2070 726f te rewrite), pro │ │ │ -0000d990: 6669 6c65 2c20 676e 7573 6572 762c 5c6e file, gnuserv,\n │ │ │ -0000d9a0: 6879 7065 722d 6170 726f 706f 732c 2065 hyper-apropos, e │ │ │ -0000d9b0: 7461 6773 2c20 6162 6f75 742c 2061 6e64 tags, about, and │ │ │ -0000d9c0: 2063 7573 746f 6d2e 5c6e 5c6e 4865 2068 custom.\n\nHe h │ │ │ -0000d9d0: 6173 2077 6f72 6b65 6420 6f6e 2069 6d70 as worked on imp │ │ │ -0000d9e0: 726f 7669 6e67 2061 6e64 206f 7074 696d roving and optim │ │ │ -0000d9f0: 697a 696e 6720 7468 6520 4320 636f 7265 izing the C core │ │ │ -0000da00: 2e20 2048 6520 706f 7274 6564 206d 616e . He ported man │ │ │ -0000da10: 795c 6e46 5346 2063 6f72 6520 6665 6174 y\nFSF core feat │ │ │ -0000da20: 7572 6573 2073 7563 6820 6173 2069 6e64 ures such as ind │ │ │ -0000da30: 6972 6563 7420 6275 6666 6572 732c 2074 irect buffers, t │ │ │ -0000da40: 7479 2d65 7261 7365 2d63 6861 722c 5c6e ty-erase-char,\n │ │ │ -0000da50: 7361 7665 2d63 7572 7265 6e74 2d62 7566 save-current-buf │ │ │ -0000da60: 6665 7220 616e 6420 6672 6965 6e64 732c fer and friends, │ │ │ -0000da70: 2064 6562 7567 2d69 676e 6f72 6564 2d65 debug-ignored-e │ │ │ -0000da80: 7272 6f72 732c 2065 7463 2e20 2048 6520 rrors, etc. He │ │ │ -0000da90: 616c 736f 5c6e 7772 6f74 6520 6c69 6e65 also\nwrote line │ │ │ -0000daa0: 206e 756d 6265 7269 6e67 206f 7074 696d numbering optim │ │ │ -0000dab0: 697a 6174 696f 6e73 2066 6f72 206c 6172 izations for lar │ │ │ -0000dac0: 6765 2062 7566 6665 7273 2c20 696e 6974 ge buffers, init │ │ │ -0000dad0: 6961 6c20 7375 7070 6f72 745c 6e66 6f72 ial support\nfor │ │ │ -0000dae0: 2054 5459 2066 7261 6d65 732c 2061 6262 TTY frames, abb │ │ │ -0000daf0: 7265 7620 696d 7072 6f76 656d 656e 7473 rev improvements │ │ │ -0000db00: 2c20 4c69 7370 2070 7269 6e74 6572 2061 , Lisp printer a │ │ │ -0000db10: 6e64 2072 6561 6465 725c 6e69 6d70 726f nd reader\nimpro │ │ │ -0000db20: 7665 6d65 6e74 732c 2073 7570 706f 7274 vements, support │ │ │ -0000db30: 2066 6f72 2065 7874 656e 7420 6d6f 6469 for extent modi │ │ │ -0000db40: 6669 6361 7469 6f6e 2066 756e 6374 696f fication functio │ │ │ -0000db50: 6e73 2c20 616e 6420 6c6f 7473 206f 665c ns, and lots of\ │ │ │ -0000db60: 6e6d 696e 6f72 2062 7567 6669 7865 732c nminor bugfixes, │ │ │ -0000db70: 206f 7074 696d 697a 6174 696f 6e73 2c20 optimizations, │ │ │ -0000db80: 616e 6420 4d75 6c65 6966 6963 6174 696f and Muleificatio │ │ │ -0000db90: 6e73 2e5c 6e5c 6e48 6520 636f 6e74 7269 ns.\n\nHe contri │ │ │ -0000dba0: 6275 7465 6420 746f 204c 6973 7072 6566 buted to Lispref │ │ │ -0000dbb0: 2061 6e64 2049 6e74 6572 6e61 6c73 2064 and Internals d │ │ │ -0000dbc0: 6f63 756d 656e 7461 7469 6f6e 2c20 696e ocumentation, in │ │ │ -0000dbd0: 636c 7564 696e 6720 615c 6e73 6563 7469 cluding a\nsecti │ │ │ -0000dbe0: 6f6e 206f 6e20 7772 6974 696e 6720 4d75 on on writing Mu │ │ │ -0000dbf0: 6c65 2d63 6f6d 706c 6961 6e74 2043 2063 le-compliant C c │ │ │ -0000dc00: 6f64 652e 2020 4d61 696e 7461 696e 7320 ode. Maintains │ │ │ -0000dc10: 4e45 5753 2e20 2048 655c 6e70 6172 7469 NEWS. He\nparti │ │ │ -0000dc20: 6369 7061 7465 6420 6f6e 2078 656d 6163 cipated on xemac │ │ │ -0000dc30: 732d 6265 7461 2073 696e 6365 2031 3939 s-beta since 199 │ │ │ -0000dc40: 3620 616e 6420 6f6e 2074 6865 2050 6174 6 and on the Pat │ │ │ -0000dc50: 6368 2052 6576 6965 7720 426f 6172 645c ch Review Board\ │ │ │ -0000dc60: 6e73 696e 6365 2069 7473 2069 6e63 6570 nsince its incep │ │ │ -0000dc70: 7469 6f6e 2069 6e20 3139 3938 2e5c 6e22 tion in 1998.\n" │ │ │ -0000dc80: 2068 6f62 6c65 7920 2243 7265 6174 6f72 hobley "Creator │ │ │ -0000dc90: 206f 6620 7468 6520 6561 726c 6965 7374 of the earliest │ │ │ -0000dca0: 2076 6572 7369 6f6e 206f 6620 7468 6520 version of the │ │ │ -0000dcb0: 4d53 2057 696e 646f 7773 2070 6f72 7420 MS Windows port │ │ │ -0000dcc0: 6f66 2058 456d 6163 732e 5c6e 2220 6a61 of XEmacs.\n" ja │ │ │ -0000dcd0: 6e20 2241 7061 7274 2066 726f 6d20 6875 n "Apart from hu │ │ │ -0000dce0: 6e74 696e 6720 646f 776e 2072 6564 6973 nting down redis │ │ │ -0000dcf0: 706c 6179 2062 7567 7320 4a61 6e20 6861 play bugs Jan ha │ │ │ -0000dd00: 7320 776f 726b 6564 206f 6e20 7375 6368 s worked on such │ │ │ -0000dd10: 5c6e 7468 696e 6773 2061 7320 696d 7072 \nthings as impr │ │ │ -0000dd20: 6f76 656d 656e 7473 2074 6f20 7468 6520 ovements to the │ │ │ -0000dd30: 7061 636b 6167 6520 7379 7374 656d 2c20 package system, │ │ │ -0000dd40: 696d 706c 656d 656e 7469 6e67 206c 617a implementing laz │ │ │ -0000dd50: 792d 7368 6f74 2c5c 6e61 2073 686f 7274 y-shot,\na short │ │ │ -0000dd60: 2073 7469 6e74 2061 7420 7472 6163 6b69 stint at tracki │ │ │ -0000dd70: 6e67 2070 6174 6368 6573 2061 6e64 2063 ng patches and c │ │ │ -0000dd80: 7572 7265 6e74 6c79 2061 6374 7320 6173 urrently acts as │ │ │ -0000dd90: 2061 2067 7561 7264 6961 6e5c 6e6f 6620 a guardian\nof │ │ │ -0000dda0: 7468 6520 5845 6d61 6373 2063 7573 746f the XEmacs custo │ │ │ -0000ddb0: 6d20 7375 6273 7973 7465 6d20 616e 6420 m subsystem and │ │ │ -0000ddc0: 676e 7573 6572 762e 5c6e 2220 6a61 7265 gnuserv.\n" jare │ │ │ -0000ddd0: 7468 2022 4f77 6e65 7220 6f66 2063 7673 th "Owner of cvs │ │ │ -0000dde0: 2e78 656d 6163 732e 6f72 672c 2074 6865 .xemacs.org, the │ │ │ -0000ddf0: 206d 6163 6869 6e65 2074 6861 7420 686f machine that ho │ │ │ -0000de00: 6c64 7320 7468 6520 5845 6d61 6373 2043 lds the XEmacs C │ │ │ -0000de10: 5653 5c6e 7265 706f 7369 746f 7279 2c20 VS\nrepository, │ │ │ -0000de20: 616e 6420 6175 7468 6f72 206f 6620 736f and author of so │ │ │ -0000de30: 6d65 206f 6620 7468 6520 6772 6170 6869 me of the graphi │ │ │ -0000de40: 6373 2063 6f64 6520 696e 2058 456d 6163 cs code in XEmac │ │ │ -0000de50: 732e 5c6e 2220 6a61 7320 2257 726f 7465 s.\n" jas "Wrote │ │ │ -0000de60: 2061 6e64 2f6f 7220 696e 7465 6772 6174 and/or integrat │ │ │ -0000de70: 6564 2073 6576 6572 616c 2070 6163 6b61 ed several packa │ │ │ -0000de80: 6765 7320 666f 7220 476e 7573 2c20 7375 ges for Gnus, su │ │ │ -0000de90: 6368 2061 735c 6e73 7570 706f 7274 2066 ch as\nsupport f │ │ │ -0000dea0: 6f72 2049 4d41 502c 2053 6965 7665 2c20 or IMAP, Sieve, │ │ │ -0000deb0: 666f 726d 6174 3d66 6c6f 7765 642c 2047 format=flowed, G │ │ │ -0000dec0: 6e75 544c 532c 2053 2f4d 494d 452c 2061 nuTLS, S/MIME, a │ │ │ -0000ded0: 6e64 2050 4750 2e5c 6e49 7272 6567 756c nd PGP.\nIrregul │ │ │ -0000dee0: 6172 6c79 2073 796e 6368 726f 6e69 7a65 arly synchronize │ │ │ -0000def0: 7320 6c69 7370 2063 6f64 6520 6265 7477 s lisp code betw │ │ │ -0000df00: 6565 6e20 456d 6163 7320 616e 6420 5845 een Emacs and XE │ │ │ -0000df10: 6d61 6373 2e20 2048 655c 6e6d 6169 6e74 macs. He\nmaint │ │ │ -0000df20: 6169 6e73 2074 6865 206d 6169 6c2d 6c69 ains the mail-li │ │ │ -0000df30: 622c 2073 6965 7665 2c20 7361 736c 2c20 b, sieve, sasl, │ │ │ -0000df40: 7067 6720 616e 6420 6563 7279 7074 6f20 pgg and ecrypto │ │ │ -0000df50: 5845 6d61 6373 5c6e 7061 636b 6167 6573 XEmacs\npackages │ │ │ -0000df60: 2e20 204f 7065 7261 7465 7320 7468 6520 . Operates the │ │ │ -0000df70: 7365 636f 6e64 6172 7920 444e 5320 616e secondary DNS an │ │ │ -0000df80: 6420 6d61 696c 2073 6572 7665 7220 666f d mail server fo │ │ │ -0000df90: 725c 6e78 656d 6163 732e 6f72 672e 5c6e r\nxemacs.org.\n │ │ │ -0000dfa0: 2220 6a61 736f 6e20 2242 6574 6120 7465 " jason "Beta te │ │ │ -0000dfb0: 7374 6572 2c20 6d61 6e61 6765 7220 6f66 ster, manager of │ │ │ -0000dfc0: 2074 6865 2076 6172 696f 7573 2058 456d the various XEm │ │ │ -0000dfd0: 6163 7320 6d61 696c 696e 6720 6c69 7374 acs mailing list │ │ │ -0000dfe0: 7320 616e 6420 6269 6e61 7279 5c6e 6b69 s and binary\nki │ │ │ -0000dff0: 7420 6d61 6e61 6765 722e 2020 416c 736f t manager. Also │ │ │ -0000e000: 2c20 6f72 6967 696e 6174 6f72 2061 6e64 , originator and │ │ │ -0000e010: 206d 6169 6e74 6169 6e65 7220 6f66 2074 maintainer of t │ │ │ -0000e020: 6865 2067 6e75 732e 6f72 6720 646f 6d61 he gnus.org doma │ │ │ -0000e030: 696e 2e5c 6e22 206a 656e 7320 224a 656e in.\n" jens "Jen │ │ │ -0000e040: 7320 6469 6420 7468 6520 6172 7477 6f72 s did the artwor │ │ │ -0000e050: 6b20 666f 7220 6772 6170 6869 6373 2061 k for graphics a │ │ │ -0000e060: 6464 6564 2074 6f20 5845 6d61 6373 2032 dded to XEmacs 2 │ │ │ -0000e070: 302e 3220 616e 6420 3139 2e31 352e 2048 0.2 and 19.15. H │ │ │ -0000e080: 6527 735c 6e61 6c73 6f20 7468 6520 6175 e's\nalso the au │ │ │ -0000e090: 7468 6f72 206f 6620 5c22 5845 6d61 6373 thor of \"XEmacs │ │ │ -0000e0a0: 204d 696e 655c 222c 2061 2067 616d 6520 Mine\", a game │ │ │ -0000e0b0: 7369 6d69 6c61 7220 746f 204d 696e 6573 similar to Mines │ │ │ -0000e0c0: 7765 6570 6572 2c20 6275 745c 6e72 756e weeper, but\nrun │ │ │ -0000e0d0: 6e69 6e67 2069 6e20 5845 6d61 6373 5c6e ning in XEmacs\n │ │ │ -0000e0e0: 2220 6a6d 696c 6c65 7220 2242 6574 6120 " jmiller "Beta │ │ │ -0000e0f0: 7465 7374 6572 2061 6e64 206c 6173 7420 tester and last │ │ │ -0000e100: 6861 636b 6572 206f 6620 6361 6c65 6e64 hacker of calend │ │ │ -0000e110: 6172 2e5c 6e22 206a 6f6e 6174 6861 6e20 ar.\n" jonathan │ │ │ -0000e120: 2249 2073 7461 7274 6564 2074 6865 206e "I started the n │ │ │ -0000e130: 6174 6976 6520 706f 7274 206f 6620 5845 ative port of XE │ │ │ -0000e140: 6d61 6373 2074 6f20 4d53 2057 696e 646f macs to MS Windo │ │ │ -0000e150: 7773 2e20 4175 7468 6f72 206f 6620 7468 ws. Author of th │ │ │ -0000e160: 655c 6e57 696e 646f 7773 2066 7261 6d65 e\nWindows frame │ │ │ -0000e170: 2c20 7265 6469 7370 6c61 792c 2066 6163 , redisplay, fac │ │ │ -0000e180: 6520 616e 6420 6576 656e 7420 6c6f 6f70 e and event loop │ │ │ -0000e190: 2073 7570 706f 7274 2e5c 6e22 206a 7568 support.\n" juh │ │ │ -0000e1a0: 7020 2241 7574 686f 7220 6f66 205c 2266 p "Author of \"f │ │ │ -0000e1b0: 696e 642d 6675 6e63 2e65 6c5c 222c 2069 ind-func.el\", i │ │ │ -0000e1c0: 6d70 726f 7665 6d65 6e74 7320 746f 205c mprovements to \ │ │ │ -0000e1d0: 2268 656c 702e 656c 5c22 2061 6e64 2061 "help.el\" and a │ │ │ -0000e1e0: 2067 6f6f 645c 6e6e 756d 6265 7220 6f66 good\nnumber of │ │ │ -0000e1f0: 2062 7567 2066 6978 6573 2064 7572 696e bug fixes durin │ │ │ -0000e200: 6720 4a75 6e65 2031 3939 3720 746f 2044 g June 1997 to D │ │ │ -0000e210: 6563 656d 6265 7220 3139 3938 2e5c 6e22 ecember 1998.\n" │ │ │ -0000e220: 206a 777a 2022 4372 6561 746f 7220 616e jwz "Creator an │ │ │ -0000e230: 6420 6d61 696e 7461 696e 6572 206f 6620 d maintainer of │ │ │ -0000e240: 4c75 6369 6420 456d 6163 7320 2874 6865 Lucid Emacs (the │ │ │ -0000e250: 2070 7265 6465 6365 7373 6f72 206f 6620 predecessor of │ │ │ -0000e260: 5845 6d61 6373 292c 5c6e 6672 6f6d 2031 XEmacs),\nfrom 1 │ │ │ -0000e270: 3939 3120 7468 726f 7567 6820 6d69 642d 991 through mid- │ │ │ -0000e280: 3139 3934 2e5c 6e22 206b 617a 7a20 2249 1994.\n" kazz "I │ │ │ -0000e290: 454e 4147 4120 4b61 7a75 7975 6b69 2069 ENAGA Kazuyuki i │ │ │ -0000e2a0: 7320 7468 6520 5845 6d61 6373 2074 6563 s the XEmacs tec │ │ │ -0000e2b0: 686e 6963 616c 206c 6561 6420 6f6e 2042 hnical lead on B │ │ │ -0000e2c0: 5344 2c20 7061 7274 6963 756c 6172 6c79 SD, particularly │ │ │ -0000e2d0: 5c6e 4672 6565 4253 442e 5c6e 2220 6b69 \nFreeBSD.\n" ki │ │ │ -0000e2e0: 7269 6c6c 2022 4162 7374 7261 6374 6564 rill "Abstracted │ │ │ -0000e2f0: 2074 6865 2073 7562 7072 6f63 6573 7320 the subprocess │ │ │ -0000e300: 636f 6465 2061 6e64 2077 726f 7465 206d code and wrote m │ │ │ -0000e310: 7563 6820 6f66 2074 6865 204d 5320 5769 uch of the MS Wi │ │ │ -0000e320: 6e64 6f77 735c 6e73 7570 706f 7274 2069 ndows\nsupport i │ │ │ -0000e330: 6e20 5845 6d61 6373 2c20 696e 636c 7564 n XEmacs, includ │ │ │ -0000e340: 696e 6720 7468 6520 7375 6270 726f 6365 ing the subproce │ │ │ -0000e350: 7373 2069 6e74 6572 6661 6365 2c20 6469 ss interface, di │ │ │ -0000e360: 616c 6f67 2062 6f78 6573 2c5c 6e70 7269 alog boxes,\npri │ │ │ -0000e370: 6e74 696e 6720 7375 7070 6f72 742c 2061 nting support, a │ │ │ -0000e380: 6e64 206d 7563 6820 6f66 2074 6865 2065 nd much of the e │ │ │ -0000e390: 7665 6e74 206c 6f6f 702e 5c6e 2220 6b79 vent loop.\n" ky │ │ │ -0000e3a0: 6c65 2022 4175 7468 6f72 206f 6620 564d le "Author of VM │ │ │ -0000e3b0: 2c20 6120 6d61 696c 2d72 6561 6469 6e67 , a mail-reading │ │ │ -0000e3c0: 2070 6163 6b61 6765 2074 6861 7420 6973 package that is │ │ │ -0000e3d0: 2069 6e63 6c75 6465 6420 696e 2074 6865 included in the │ │ │ -0000e3e0: 2073 7461 6e64 6172 645c 6e58 456d 6163 standard\nXEmac │ │ │ -0000e3f0: 7320 6469 7374 7269 6275 7469 6f6e 2c20 s distribution, │ │ │ -0000e400: 616e 6420 636f 6e74 7269 6275 746f 7220 and contributor │ │ │ -0000e410: 6f66 206d 616e 7920 696d 7072 6f76 656d of many improvem │ │ │ -0000e420: 656e 7473 2061 6e64 2062 7567 5c6e 6669 ents and bug\nfi │ │ │ -0000e430: 7865 732e 2020 556e 6c69 6b65 2052 4d41 xes. Unlike RMA │ │ │ -0000e440: 494c 2061 6e64 204d 482d 452c 2056 4d20 IL and MH-E, VM │ │ │ -0000e450: 7573 6573 2074 6865 2073 7461 6e64 6172 uses the standar │ │ │ -0000e460: 6420 554e 4958 206d 6169 6c62 6f78 5c6e d UNIX mailbox\n │ │ │ -0000e470: 666f 726d 6174 2066 6f72 2069 7473 2066 format for its f │ │ │ -0000e480: 6f6c 6465 7273 3b20 7468 7573 2c20 796f olders; thus, yo │ │ │ -0000e490: 7520 6361 6e20 7573 6520 564d 2063 6f6e u can use VM con │ │ │ -0000e4a0: 6375 7272 656e 746c 7920 7769 7468 206f currently with o │ │ │ -0000e4b0: 7468 6572 5c6e 554e 4958 206d 6169 6c20 ther\nUNIX mail │ │ │ -0000e4c0: 7265 6164 6572 7320 7375 6368 2061 7320 readers such as │ │ │ -0000e4d0: 4265 726b 656c 6579 204d 6169 6c20 616e Berkeley Mail an │ │ │ -0000e4e0: 6420 454c 4d2e 5c6e 5c6e 416c 736f 2072 d ELM.\n\nAlso r │ │ │ -0000e4f0: 6577 726f 7465 2074 6865 206f 626a 6563 ewrote the objec │ │ │ -0000e500: 7420 616c 6c6f 6361 7469 6f6e 2073 7973 t allocation sys │ │ │ -0000e510: 7465 6d20 696e 2058 456d 6163 7320 746f tem in XEmacs to │ │ │ -0000e520: 2073 7570 706f 7274 2066 756c 6c5c 6e33 support full\n3 │ │ │ -0000e530: 322d 6269 7420 706f 696e 7465 7273 2061 2-bit pointers a │ │ │ -0000e540: 6e64 2033 312d 6269 7420 696e 7465 6765 nd 31-bit intege │ │ │ -0000e550: 7273 2e5c 6e22 206c 6172 7369 2022 4175 rs.\n" larsi "Au │ │ │ -0000e560: 7468 6f72 206f 6620 476e 7573 2074 6865 thor of Gnus the │ │ │ -0000e570: 2055 7365 6e65 7420 6e65 7773 2061 6e64 Usenet news and │ │ │ -0000e580: 204d 6169 6c20 7265 6164 696e 6720 7061 Mail reading pa │ │ │ -0000e590: 636b 6167 6520 696e 2074 6865 5c6e 7374 ckage in the\nst │ │ │ -0000e5a0: 616e 6461 7264 2058 456d 6163 7320 6469 andard XEmacs di │ │ │ -0000e5b0: 7374 7269 6275 7469 6f6e 2c20 616e 6420 stribution, and │ │ │ -0000e5c0: 636f 6e74 7269 6275 746f 7220 6f66 2076 contributor of v │ │ │ -0000e5d0: 6172 696f 7573 2065 6e68 616e 6365 6d65 arious enhanceme │ │ │ -0000e5e0: 6e74 735c 6e61 6e64 2070 6f72 7461 6269 nts\nand portabi │ │ │ -0000e5f0: 6c69 7479 2066 6978 6573 2e5c 6e22 206d lity fixes.\n" m │ │ │ -0000e600: 6172 6370 6120 6d61 7274 696e 2022 4265 arcpa martin "Be │ │ │ -0000e610: 7461 2072 656c 6561 7365 206d 616e 6167 ta release manag │ │ │ -0000e620: 6572 2061 6e64 2061 7574 686f 7220 6f66 er and author of │ │ │ -0000e630: 206d 616e 7920 7374 6162 696c 6974 7920 many stability │ │ │ -0000e640: 6669 7865 7320 616e 6420 7370 6565 645c fixes and speed\ │ │ │ -0000e650: 6e69 6d70 726f 7665 6d65 6e74 7320 696e nimprovements in │ │ │ -0000e660: 2058 456d 6163 732e 5c6e 2220 6d63 6f6f XEmacs.\n" mcoo │ │ │ -0000e670: 6b20 2241 7574 686f 7220 6f66 2074 6865 k "Author of the │ │ │ -0000e680: 205c 2273 6879 2067 726f 7570 735c 2220 \"shy groups\" │ │ │ -0000e690: 616e 6420 6d69 6e69 6d61 6c20 6d61 7463 and minimal matc │ │ │ -0000e6a0: 6869 6e67 2072 6567 756c 6172 2065 7870 hing regular exp │ │ │ -0000e6b0: 7265 7373 696f 6e5c 6e65 7874 656e 7369 ression\nextensi │ │ │ -0000e6c0: 6f6e 732e 5c6e 2220 6d6c 7920 2245 6172 ons.\n" mly "Ear │ │ │ -0000e6d0: 6c79 2063 6f64 6520 636f 6e74 7269 6275 ly code contribu │ │ │ -0000e6e0: 746f 7220 746f 204c 7563 6964 2045 6d61 tor to Lucid Ema │ │ │ -0000e6f0: 6373 2e20 2053 796e 6368 6564 2075 7020 cs. Synched up │ │ │ -0000e700: 4c75 6369 6420 456d 6163 7320 7769 7468 Lucid Emacs with │ │ │ -0000e710: 5c6e 7468 6520 6669 7273 7420 6163 7475 \nthe first actu │ │ │ -0000e720: 616c 2072 656c 6561 7365 206f 6620 474e al release of GN │ │ │ -0000e730: 5520 456d 6163 7320 3139 2c20 616e 6420 U Emacs 19, and │ │ │ -0000e740: 6172 6368 6974 6563 7465 6420 616e 6420 architected and │ │ │ -0000e750: 7772 6f74 655c 6e74 6865 2066 6972 7374 wrote\nthe first │ │ │ -0000e760: 2076 6572 7369 6f6e 206f 6620 5845 6d61 version of XEma │ │ │ -0000e770: 6373 2773 206f 626a 6563 7420 616c 6c6f cs's object allo │ │ │ -0000e780: 6361 7469 6f6e 2073 7973 7465 6d2e 5c6e cation system.\n │ │ │ -0000e790: 2220 6d6f 7269 6f6b 6120 2249 2061 6d20 " morioka "I am │ │ │ -0000e7a0: 7468 6520 6175 7468 6f72 206f 6620 746d the author of tm │ │ │ -0000e7b0: 2d76 6965 7720 2867 656e 6572 616c 204d -view (general M │ │ │ -0000e7c0: 494d 4520 5669 6577 6572 2066 6f72 2047 IME Viewer for G │ │ │ -0000e7d0: 4e55 2045 6d61 6373 2920 616e 645c 6e6d NU Emacs) and\nm │ │ │ -0000e7e0: 616a 6f72 2061 7574 686f 7220 616e 6420 ajor author and │ │ │ -0000e7f0: 6d61 696e 7461 696e 6572 206f 6620 746d maintainer of tm │ │ │ -0000e800: 2028 546f 6f6c 7320 666f 7220 4d49 4d45 (Tools for MIME │ │ │ -0000e810: 3b20 6765 6e65 7261 6c20 4d49 4d45 5c6e ; general MIME\n │ │ │ -0000e820: 7061 636b 6167 6520 666f 7220 474e 5520 package for GNU │ │ │ -0000e830: 456d 6163 7329 2e20 2049 6e20 6164 6469 Emacs). In addi │ │ │ -0000e840: 7469 6f6e 2c20 4920 616d 2077 6f72 6b69 tion, I am worki │ │ │ -0000e850: 6e67 2074 6f20 756e 6966 7920 4d55 4c45 ng to unify MULE │ │ │ -0000e860: 2041 5049 5c6e 666f 7220 456d 6163 7320 API\nfor Emacs │ │ │ -0000e870: 616e 6420 5845 6d61 6373 2e20 2049 6e20 and XEmacs. In │ │ │ -0000e880: 5845 6d61 6373 2c20 4920 6861 7665 2070 XEmacs, I have p │ │ │ -0000e890: 6f72 7465 6420 6d61 6e79 206d 756c 6520 orted many mule │ │ │ -0000e8a0: 6665 6174 7572 6573 2e5c 6e22 206d 7461 features.\n" mta │ │ │ -0000e8b0: 2022 436f 6e74 7269 6275 7465 6420 6d69 "Contributed mi │ │ │ -0000e8c0: 6e6f 7220 696d 7072 6f76 656d 656e 7473 nor improvements │ │ │ -0000e8d0: 2074 6f20 7468 6520 5769 6e64 6f77 7320 to the Windows │ │ │ -0000e8e0: 7375 7070 6f72 742c 2065 7370 6563 6961 support, especia │ │ │ -0000e8f0: 6c6c 795c 6e72 656c 6174 6564 2074 6f20 lly\nrelated to │ │ │ -0000e900: 7375 6270 726f 6365 7373 2063 6f6d 6d75 subprocess commu │ │ │ -0000e910: 6e69 6361 7469 6f6e 2061 6e64 2070 6f72 nication and por │ │ │ -0000e920: 7461 626c 6520 6475 6d70 696e 6720 6173 table dumping as │ │ │ -0000e930: 2077 656c 6c20 6173 5c6e 6120 6269 7420 well as\na bit │ │ │ -0000e940: 6f66 2067 656e 6572 616c 2062 7567 2066 of general bug f │ │ │ -0000e950: 6978 696e 672e 5c6e 2220 6f67 7261 6620 ixing.\n" ograf │ │ │ -0000e960: 2241 7574 686f 7220 6f66 2074 6865 2058 "Author of the X │ │ │ -0000e970: 456d 6163 7320 4472 6167 276e 2744 726f Emacs Drag'n'Dro │ │ │ -0000e980: 7020 4150 492e 5c6e 2220 6f6c 6976 6965 p API.\n" olivie │ │ │ -0000e990: 7220 2241 7574 686f 7220 6f66 2074 6865 r "Author of the │ │ │ -0000e9a0: 2070 6f72 7461 626c 6520 6475 6d70 6572 portable dumper │ │ │ -0000e9b0: 2e5c 6e22 206f 7363 6172 2022 4f73 6361 .\n" oscar "Osca │ │ │ -0000e9c0: 7227 7320 6d61 6a6f 7220 636f 6e74 7269 r's major contri │ │ │ -0000e9d0: 6275 7469 6f6e 7320 746f 2058 456d 6163 butions to XEmac │ │ │ -0000e9e0: 7320 6172 6520 7468 6520 696e 7465 726e s are the intern │ │ │ -0000e9f0: 616c 204c 4441 5020 7375 7070 6f72 745c al LDAP support\ │ │ │ -0000ea00: 6e61 6e64 2074 6865 2045 5544 4320 7061 nand the EUDC pa │ │ │ -0000ea10: 636b 6167 652c 2061 6e20 696e 7465 7266 ckage, an interf │ │ │ -0000ea20: 6163 6520 746f 2071 7565 7279 2076 6172 ace to query var │ │ │ -0000ea30: 696f 7573 2064 6972 6563 746f 7279 2073 ious directory s │ │ │ -0000ea40: 6572 7669 6365 735c 6e69 6e20 6120 756e ervices\nin a un │ │ │ -0000ea50: 6966 6f72 6d20 6d61 6e6e 6572 2028 7768 iform manner (wh │ │ │ -0000ea60: 656e 2063 6f6d 706f 7369 6e67 206d 6169 en composing mai │ │ │ -0000ea70: 6c20 666f 7220 696e 7374 616e 6365 292e l for instance). │ │ │ -0000ea80: 5c6e 2220 7065 6c65 6772 6920 2241 7574 \n" pelegri "Aut │ │ │ -0000ea90: 686f 7220 6f66 2045 4f53 2c20 6120 7061 hor of EOS, a pa │ │ │ -0000eaa0: 636b 6167 6520 696e 636c 7564 6564 2069 ckage included i │ │ │ -0000eab0: 6e20 7468 6520 7374 616e 6461 7264 2058 n the standard X │ │ │ -0000eac0: 456d 6163 7320 6469 7374 7269 6275 7469 Emacs distributi │ │ │ -0000ead0: 6f6e 5c6e 7468 6174 2069 6e74 6567 7261 on\nthat integra │ │ │ -0000eae0: 7465 7320 5845 6d61 6373 2077 6974 6820 tes XEmacs with │ │ │ -0000eaf0: 7468 6520 5350 4152 4377 6f72 6b73 2064 the SPARCworks d │ │ │ -0000eb00: 6576 656c 6f70 6d65 6e74 2065 6e76 6972 evelopment envir │ │ │ -0000eb10: 6f6e 6d65 6e74 5c6e 6672 6f6d 2053 756e onment\nfrom Sun │ │ │ -0000eb20: 2e20 2050 6173 7420 6c65 6164 2066 6f72 . Past lead for │ │ │ -0000eb30: 2058 456d 6163 7320 6174 2053 756e 3b20 XEmacs at Sun; │ │ │ -0000eb40: 6164 766f 6361 7465 6420 7468 6520 7661 advocated the va │ │ │ -0000eb50: 6c69 6469 7479 206f 665c 6e75 7369 6e67 lidity of\nusing │ │ │ -0000eb60: 2045 706f 6368 2c20 616e 6420 6c61 7465 Epoch, and late │ │ │ -0000eb70: 7220 4c65 6d61 6373 2c20 6174 2053 756e r Lemacs, at Sun │ │ │ -0000eb80: 2074 6872 6f75 6768 2073 6576 6572 616c through several │ │ │ -0000eb90: 2065 6172 6c79 5c6e 7072 6f74 6f74 7970 early\nprototyp │ │ │ -0000eba0: 6573 2e5c 6e22 2070 657a 2022 4175 7468 es.\n" pez "Auth │ │ │ -0000ebb0: 6f72 206f 6620 5351 4c20 4d6f 6465 2c20 or of SQL Mode, │ │ │ -0000ebc0: 6564 6974 2d74 6f6f 6c62 6172 2c20 6d61 edit-toolbar, ma │ │ │ -0000ebd0: 696c 746f 6f6c 2d6d 6f64 652c 2061 6e64 iltool-mode, and │ │ │ -0000ebe0: 2076 6172 696f 7573 206f 7468 6572 5c6e various other\n │ │ │ -0000ebf0: 736d 616c 6c20 7061 636b 6167 6573 2077 small packages w │ │ │ -0000ec00: 6974 6820 7661 7279 696e 6720 6465 6772 ith varying degr │ │ │ -0000ec10: 6565 7320 6f66 2075 7365 6675 6c6e 6573 ees of usefulnes │ │ │ -0000ec20: 732e 5c6e 2220 7069 7065 7220 2241 7574 s.\n" piper "Aut │ │ │ -0000ec30: 686f 7220 6f66 2074 6865 2043 7967 7769 hor of the Cygwi │ │ │ -0000ec40: 6e20 706f 7274 206f 6620 5845 6d61 6373 n port of XEmacs │ │ │ -0000ec50: 2069 6e63 6c75 6469 6e67 2075 6e65 7865 including unexe │ │ │ -0000ec60: 632c 2074 6865 2077 6964 6765 742c 5c6e c, the widget,\n │ │ │ -0000ec70: 6775 7474 6572 2061 6e64 2062 7566 6665 gutter and buffe │ │ │ -0000ec80: 722d 7461 6220 7375 7070 6f72 742c 2067 r-tab support, g │ │ │ -0000ec90: 6c79 7068 7320 756e 6465 7220 4d53 2d57 lyphs under MS-W │ │ │ -0000eca0: 696e 646f 7773 2c20 746f 6f6c 6261 7273 indows, toolbars │ │ │ -0000ecb0: 2075 6e64 6572 5c6e 4d53 2d57 696e 646f under\nMS-Windo │ │ │ -0000ecc0: 7773 2c20 7468 6520 6f72 6967 696e 616c ws, the original │ │ │ -0000ecd0: 205c 2266 616b 655c 2220 5845 6d61 6373 \"fake\" XEmacs │ │ │ -0000ece0: 2074 6f6f 6c62 6172 2c20 6f75 746c 2d6d toolbar, outl-m │ │ │ -0000ecf0: 6f75 7365 2066 6f72 206d 6f75 7365 5c6e ouse for mouse\n │ │ │ -0000ed00: 6765 7374 7572 6520 6261 7365 6420 6f75 gesture based ou │ │ │ -0000ed10: 746c 696e 696e 672c 2061 6e64 2074 6865 tlining, and the │ │ │ -0000ed20: 206f 7269 6769 6e61 6c20 4344 4520 6472 original CDE dr │ │ │ -0000ed30: 6167 2d6e 2d64 726f 705c 6e73 7570 706f ag-n-drop\nsuppo │ │ │ -0000ed40: 7274 2e5c 6e22 2070 6974 746d 616e 2072 rt.\n" pittman r │ │ │ -0000ed50: 6963 6b63 2022 4d61 696e 7461 696e 6572 ickc "Maintainer │ │ │ -0000ed60: 206f 6620 494c 4953 502e 5c6e 2220 726f of ILISP.\n" ro │ │ │ -0000ed70: 7365 2022 4175 7468 6f72 206f 6620 6d61 se "Author of ma │ │ │ -0000ed80: 6e79 2065 7874 656e 7369 6f6e 7320 746f ny extensions to │ │ │ -0000ed90: 2074 6865 2060 6578 7465 6e74 7327 2063 the `extents' c │ │ │ -0000eda0: 6f64 652c 2069 6e63 6c75 6469 6e67 2074 ode, including t │ │ │ -0000edb0: 6865 2069 6e69 7469 616c 5c6e 696d 706c he initial\nimpl │ │ │ -0000edc0: 656d 656e 7461 7469 6f6e 206f 6620 6064 ementation of `d │ │ │ -0000edd0: 7570 6c69 6361 626c 6527 2070 726f 7065 uplicable' prope │ │ │ -0000ede0: 7274 6965 732e 5c6e 2220 726f 7373 696e rties.\n" rossin │ │ │ -0000edf0: 6920 2241 7574 686f 7220 6f66 2074 6865 i "Author of the │ │ │ -0000ee00: 2066 6972 7374 2058 456d 6163 7320 4641 first XEmacs FA │ │ │ -0000ee10: 513b 5c6e 4465 7665 6c6f 706d 656e 7420 Q;\nDevelopment │ │ │ -0000ee20: 6c65 6164 206f 6e20 456d 6163 7320 5370 lead on Emacs Sp │ │ │ -0000ee30: 6561 6b73 2053 7461 7469 7374 6963 733b eaks Statistics; │ │ │ -0000ee40: 5c6e 4173 7369 7374 6564 204a 6172 6574 \nAssisted Jaret │ │ │ -0000ee50: 6820 4865 696e 2077 6974 6820 7365 7474 h Hein with sett │ │ │ -0000ee60: 696e 6720 7570 2074 6865 204a 6974 7465 ing up the Jitte │ │ │ -0000ee70: 7242 7567 2074 7261 636b 696e 6720 7379 rBug tracking sy │ │ │ -0000ee80: 7374 656d 2e5c 6e22 2073 6c62 2022 4d61 stem.\n" slb "Ma │ │ │ -0000ee90: 696e 7461 696e 6572 206f 6620 5845 6d61 intainer of XEma │ │ │ -0000eea0: 6373 2066 726f 6d20 3139 3936 2074 6872 cs from 1996 thr │ │ │ -0000eeb0: 6f75 6768 2031 3939 382e 2020 4175 7468 ough 1998. Auth │ │ │ -0000eec0: 6f72 206f 6620 7468 6520 7061 636b 6167 or of the packag │ │ │ -0000eed0: 655c 6e73 7973 7465 6d2e 5c6e 2220 7370 e\nsystem.\n" sp │ │ │ -0000eee0: 6572 6265 7220 224d 696b 6520 706f 7274 erber "Mike port │ │ │ -0000eef0: 6564 2045 4653 2074 6f20 5845 6d61 6373 ed EFS to XEmacs │ │ │ -0000ef00: 2032 3020 616e 6420 696e 7465 6772 6174 20 and integrat │ │ │ -0000ef10: 6564 2045 4653 2069 6e74 6f20 5845 6d61 ed EFS into XEma │ │ │ -0000ef20: 6373 2e20 2048 6527 735c 6e61 6c73 6f20 cs. He's\nalso │ │ │ -0000ef30: 7265 7370 6f6e 7369 626c 6520 666f 7220 responsible for │ │ │ -0000ef40: 7468 6520 706f 7274 7320 6f66 2066 6163 the ports of fac │ │ │ -0000ef50: 656d 656e 752e 656c 2061 6e64 2065 6e72 emenu.el and enr │ │ │ -0000ef60: 6963 6865 642e 656c 2c20 7468 655c 6e63 iched.el, the\nc │ │ │ -0000ef70: 6f64 6520 746f 2068 616e 646c 6520 7061 ode to handle pa │ │ │ -0000ef80: 7468 2d66 726f 6262 696e 6720 6174 2073 th-frobbing at s │ │ │ -0000ef90: 7461 7274 7570 2066 6f72 2074 6865 2058 tartup for the X │ │ │ -0000efa0: 456d 6163 7320 636f 7265 2061 6e64 2074 Emacs core and t │ │ │ -0000efb0: 6865 5c6e 7061 636b 6167 6520 7379 7374 he\npackage syst │ │ │ -0000efc0: 656d 2c20 7468 6520 696e 6974 2066 696c em, the init fil │ │ │ -0000efd0: 6520 6d69 6772 6174 696f 6e20 6672 6f6d e migration from │ │ │ -0000efe0: 202e 656d 6163 7320 746f 5c6e 2e78 656d .emacs to\n.xem │ │ │ -0000eff0: 6163 732f 696e 6974 2e65 6c2c 2061 6e64 acs/init.el, and │ │ │ -0000f000: 2074 6865 2043 5653 2047 7265 6174 2054 the CVS Great T │ │ │ -0000f010: 7275 6e6b 204d 6f76 652e 5c6e 2220 7374 runk Move.\n" st │ │ │ -0000f020: 6967 2022 496d 706c 656d 656e 7465 6420 ig "Implemented │ │ │ -0000f030: 7468 6520 6661 7374 6572 2073 7461 792d the faster stay- │ │ │ -0000f040: 7570 204c 7563 6964 206d 656e 7573 2061 up Lucid menus a │ │ │ -0000f050: 6e64 2068 7970 6572 2d61 7072 6f70 6f73 nd hyper-apropos │ │ │ -0000f060: 2e5c 6e43 6f6e 7472 6962 7574 6f72 206f .\nContributor o │ │ │ -0000f070: 6620 6d61 6e79 2064 6973 7065 7273 6564 f many dispersed │ │ │ -0000f080: 2069 6d70 726f 7665 6d65 6e74 7320 696e improvements in │ │ │ -0000f090: 2074 6865 2063 6f72 6520 4c69 7370 2063 the core Lisp c │ │ │ -0000f0a0: 6f64 652c 2061 6e64 5c6e 6261 636b 2d73 ode, and\nback-s │ │ │ -0000f0b0: 6561 7420 636f 6e74 7269 6275 746f 7220 eat contributor │ │ │ -0000f0c0: 666f 7220 7365 7665 7261 6c20 6f66 2069 for several of i │ │ │ -0000f0d0: 7473 206d 616a 6f72 2070 6163 6b61 6765 ts major package │ │ │ -0000f0e0: 732e 5c6e 2220 7374 6967 6220 224d 6169 s.\n" stigb "Mai │ │ │ -0000f0f0: 6e74 6169 6e65 7220 6f66 2074 6865 2052 ntainer of the R │ │ │ -0000f100: 504d 2070 6163 6b61 6765 2e5c 6e22 2074 PM package.\n" t │ │ │ -0000f110: 6869 6573 7365 6c20 2244 6f65 7320 6265 hiessel "Does be │ │ │ -0000f120: 7461 2074 6573 7469 6e67 2061 6e64 2068 ta testing and h │ │ │ -0000f130: 656c 7073 2074 616b 6520 6361 7265 206f elps take care o │ │ │ -0000f140: 6620 7468 6520 5845 6d61 6373 2077 6562 f the XEmacs web │ │ │ -0000f150: 2073 6974 652e 5c6e 2220 746f 6d6f 6e6f site.\n" tomono │ │ │ -0000f160: 7269 2074 7563 6b20 7475 726e 6275 6c6c ri tuck turnbull │ │ │ -0000f170: 2022 5265 7370 6f6e 7369 626c 6520 666f "Responsible fo │ │ │ -0000f180: 7220 6765 7474 696e 6720 7468 6520 6375 r getting the cu │ │ │ -0000f190: 7272 656e 7420 7265 6c65 6173 6520 6f66 rrent release of │ │ │ -0000f1a0: 2058 456d 6163 7320 6f75 7420 7468 655c XEmacs out the\ │ │ │ -0000f1b0: 6e64 6f6f 722e 5c6e 2220 7669 6e20 2256 ndoor.\n" vin "V │ │ │ -0000f1c0: 696e 206d 6169 6e74 6169 6e73 2074 6865 in maintains the │ │ │ -0000f1d0: 2073 7461 626c 6520 7665 7273 696f 6e20 stable version │ │ │ -0000f1e0: 6f66 2058 456d 6163 732e 2020 5468 6973 of XEmacs. This │ │ │ -0000f1f0: 2069 6e76 6f6c 7665 7320 7265 7669 6577 involves review │ │ │ -0000f200: 696e 675c 6e61 206c 6f74 206f 6620 6f74 ing\na lot of ot │ │ │ -0000f210: 6865 7220 7065 6f70 6c65 7327 2070 6174 her peoples' pat │ │ │ -0000f220: 6368 6573 2061 6e64 2074 6573 7469 6e67 ches and testing │ │ │ -0000f230: 2061 6e64 2061 7070 6c79 696e 6720 7468 and applying th │ │ │ -0000f240: 656d 2e5c 6e48 6520 616c 736f 2067 6574 em.\nHe also get │ │ │ -0000f250: 7320 746f 2067 656e 6572 6174 6520 6869 s to generate hi │ │ │ -0000f260: 7320 6f77 6e20 7061 7463 6865 7320 6672 s own patches fr │ │ │ -0000f270: 6f6d 2074 696d 6520 746f 2074 696d 652e om time to time. │ │ │ -0000f280: 2020 4265 696e 675c 6e72 656c 6561 7365 Being\nrelease │ │ │ -0000f290: 206d 616e 6167 6572 2069 7320 6120 6675 manager is a fu │ │ │ -0000f2a0: 6e20 7761 7920 746f 2063 6f6e 7472 6962 n way to contrib │ │ │ -0000f2b0: 7574 6520 746f 2074 6865 2058 456d 6163 ute to the XEmac │ │ │ -0000f2c0: 7320 7072 6f6a 6563 742e 5c6e 5772 6974 s project.\nWrit │ │ │ -0000f2d0: 6520 6d65 2061 7420 6163 7340 7865 6d61 e me at acs@xema │ │ │ -0000f2e0: 6373 2e6f 7267 2069 6620 796f 7527 7265 cs.org if you're │ │ │ -0000f2f0: 2069 6e74 6572 6573 7465 6420 696e 206c interested in l │ │ │ -0000f300: 6561 726e 696e 6720 6d6f 7265 2e5c 6e22 earning more.\n" │ │ │ -0000f310: 2076 6c61 6469 6d69 7220 2246 6f72 6d65 vladimir "Forme │ │ │ -0000f320: 7220 7465 6368 6e69 6361 6c20 6c65 6164 r technical lead │ │ │ -0000f330: 2066 6f72 2058 456d 6163 7320 6174 2053 for XEmacs at S │ │ │ -0000f340: 756e 2e5c 6e22 2077 6d70 6572 7279 2022 un.\n" wmperry " │ │ │ -0000f350: 4175 7468 6f72 206f 6620 7468 6520 4754 Author of the GT │ │ │ -0000f360: 4b20 7375 7070 6f72 7420 696e 2058 456d K support in XEm │ │ │ -0000f370: 6163 732c 2045 6d61 6373 2d77 3320 2874 acs, Emacs-w3 (t │ │ │ -0000f380: 6865 2062 7569 6c74 696e 2077 6562 2062 he builtin web b │ │ │ -0000f390: 726f 7773 6572 5c6e 7468 6174 2063 6f6d rowser\nthat com │ │ │ -0000f3a0: 6573 2077 6974 6820 5845 6d61 6373 292c es with XEmacs), │ │ │ -0000f3b0: 2061 6e64 2076 6172 696f 7573 2061 6464 and various add │ │ │ -0000f3c0: 6974 696f 6e73 2074 6f20 7468 6520 4320 itions to the C │ │ │ -0000f3d0: 636f 6465 2028 652e 672e 2074 6865 5c6e code (e.g. the\n │ │ │ -0000f3e0: 6461 7461 6261 7365 2073 7570 706f 7274 database support │ │ │ -0000f3f0: 2c20 7468 6520 504e 4720 7375 7070 6f72 , the PNG suppor │ │ │ -0000f400: 742c 2073 6f6d 6520 6f66 2074 6865 2047 t, some of the G │ │ │ -0000f410: 4946 2f4a 5045 4720 7375 7070 6f72 742c IF/JPEG support, │ │ │ -0000f420: 2074 6865 5c6e 7374 7269 6b65 7468 7275 the\nstrikethru │ │ │ -0000f430: 2066 6163 6520 6174 7472 6962 7574 6520 face attribute │ │ │ -0000f440: 7375 7070 6f72 7429 2e5c 6e22 2079 6f73 support).\n" yos │ │ │ -0000f450: 6869 6b69 2079 6f75 6e67 7320 224d 6169 hiki youngs "Mai │ │ │ -0000f460: 6e74 6169 6e65 7220 616e 6420 7265 6c65 ntainer and rele │ │ │ -0000f470: 6173 6520 6d61 6e61 6765 7220 6f66 2074 ase manager of t │ │ │ -0000f480: 6865 2070 6163 6b61 6765 732e 5c6e 2220 he packages.\n" │ │ │ -0000f490: 6572 726f 7220 2265 6361 7365 2066 6169 error "ecase fai │ │ │ -0000f4a0: 6c65 643a 2025 732c 2025 7322 2028 6164 led: %s, %s" (ad │ │ │ -0000f4b0: 7269 616e 2061 6a20 616a 6320 616c 6173 rian aj ajc alas │ │ │ -0000f4c0: 7461 6972 2062 6177 2062 656e 2062 7720 tair baw ben bw │ │ │ -0000f4d0: 6367 7720 6368 7220 6372 6169 6720 6374 cgw chr craig ct │ │ │ -0000f4e0: 686f 6d70 2064 6169 6b69 2064 616e 2064 homp daiki dan d │ │ │ -0000f4f0: 6172 7279 6c6f 2064 6576 696e 2064 6b69 arrylo devin dki │ │ │ -0000f500: 6e64 7265 6420 646d 6f6f 7265 2064 6964 ndred dmoore did │ │ │ -0000f510: 6965 7220 6562 2066 6162 7269 6365 2067 ier eb fabrice g │ │ │ -0000f520: 6f6c 7562 6576 2067 756e 6e61 7220 6862 olubev gunnar hb │ │ │ -0000f530: 7320 6869 7361 7368 6920 686d 756c 6c65 s hisashi hmulle │ │ │ -0000f540: 7220 686e 696b 7369 6320 686f 626c 6579 r hniksic hobley │ │ │ -0000f550: 206a 616e 206a 6172 6574 6820 6a61 7320 jan jareth jas │ │ │ -0000f560: 6a61 736f 6e20 6a65 6e73 206a 6d69 6c6c jason jens jmill │ │ │ -0000f570: 6572 206a 6f6e 6174 6861 6e20 6a75 6870 er jonathan juhp │ │ │ -0000f580: 206a 777a 206b 617a 7a20 6b69 7269 6c6c jwz kazz kirill │ │ │ -0000f590: 206b 796c 6520 6c61 7273 6920 6d61 7263 kyle larsi marc │ │ │ -0000f5a0: 7061 206d 6172 7469 6e20 6d63 6f6f 6b20 pa martin mcook │ │ │ -0000f5b0: 6d6c 7920 6d6f 7269 6f6b 6120 6d74 6120 mly morioka mta │ │ │ -0000f5c0: 6f67 7261 6620 6f6c 6976 6965 7220 6f73 ograf olivier os │ │ │ -0000f5d0: 6361 7220 7065 6c65 6772 6920 7065 7a20 car pelegri pez │ │ │ -0000f5e0: 7069 7065 7220 7069 7474 6d61 6e20 7269 piper pittman ri │ │ │ -0000f5f0: 636b 6320 726f 7365 2072 6f73 7369 6e69 ckc rose rossini │ │ │ -0000f600: 2073 6c62 2073 7065 7262 6572 2073 7469 slb sperber sti │ │ │ -0000f610: 6720 7374 6967 6220 7468 6965 7373 656c g stigb thiessel │ │ │ -0000f620: 2074 6f6d 6f6e 6f72 6920 7475 636b 2074 tomonori tuck t │ │ │ -0000f630: 7572 6e62 756c 6c20 7669 6e20 766c 6164 urnbull vin vlad │ │ │ -0000f640: 696d 6972 2077 6d70 6572 7279 2079 6f73 imir wmperry yos │ │ │ -0000f650: 6869 6b69 2079 6f75 6e67 7329 5d20 345d hiki youngs)] 4] │ │ │ -0000f660: 290a 2864 6566 616c 6961 7320 2761 626f ).(defalias 'abo │ │ │ -0000f670: 7574 2d6d 6169 6e74 6169 6e65 7220 235b ut-maintainer #[ │ │ │ -0000f680: 2877 6964 6765 7420 266f 7074 696f 6e61 (widget &optiona │ │ │ -0000f690: 6c20 6576 656e 7429 2022 c608 210e 20b7 l event) "..!. . │ │ │ -0000f6a0: 891d 401b 0d41 401c 0d41 4140 1ac7 c80c ..@..A@..AA@.... │ │ │ -0000f6b0: 5c22 19c9 0921 3fad bfca cb21 88cc cdce \"...!?....!.... │ │ │ -0000f6c0: cfd0 d10b 2125 88ca d2d3 c7d4 0c5c 22d5 ....!%.......\". │ │ │ -0000f6d0: 5c22 d623 88d7 5c6e 2188 cad8 2188 d90d \".#..\n!...!... │ │ │ -0000f6e0: 2188 cacb 2188 cad3 dadb 5c22 2188 dc0d !...!.....\"!... │ │ │ -0000f6f0: 2188 cacb 2188 ddde 2188 df79 2d87 2220 !...!...!..y-." │ │ │ -0000f700: 5b77 6964 6765 7420 6275 666e 616d 6520 [widget bufname │ │ │ -0000f710: 6164 6472 6573 7320 7768 6f20 6e61 6d65 address who name │ │ │ -0000f720: 2065 6e74 7279 2077 6964 6765 742d 7661 entry widget-va │ │ │ -0000f730: 6c75 6520 666f 726d 6174 2022 2a41 626f lue format "*Abo │ │ │ -0000f740: 7574 2025 732a 2220 6162 6f75 742d 6765 ut %s*" about-ge │ │ │ -0000f750: 742d 6275 6666 6572 2077 6964 6765 742d t-buffer widget- │ │ │ -0000f760: 696e 7365 7274 2022 5c6e 2220 7769 6467 insert "\n" widg │ │ │ -0000f770: 6574 2d63 7265 6174 6520 6465 6661 756c et-create defaul │ │ │ -0000f780: 7420 3a66 6f72 6d61 7420 2225 7422 203a t :format "%t" : │ │ │ -0000f790: 7461 672d 676c 7970 6820 6162 6f75 742d tag-glyph about- │ │ │ -0000f7a0: 6d61 696e 7461 696e 6572 2d67 6c79 7068 maintainer-glyph │ │ │ -0000f7b0: 2022 5c6e 5c6e 2220 6162 6f75 742d 7769 "\n\n" about-wi │ │ │ -0000f7c0: 7468 2d66 6163 6520 2225 7322 2062 6f6c th-face "%s" bol │ │ │ -0000f7d0: 6420 2220 3c22 2061 626f 7574 2d6d 6169 d " <" about-mai │ │ │ -0000f7e0: 6c74 6f2d 6c69 6e6b 2022 3e5c 6e5c 6e22 lto-link ">\n\n" │ │ │ -0000f7f0: 2061 626f 7574 2d70 6572 736f 6e61 6c2d about-personal- │ │ │ -0000f800: 696e 666f 2022 436f 6e74 7269 6275 7469 info "Contributi │ │ │ -0000f810: 6f6e 7320 746f 2058 456d 6163 733a 5c6e ons to XEmacs:\n │ │ │ -0000f820: 5c6e 2220 6162 6f75 742d 6865 6164 6c69 \n" about-headli │ │ │ -0000f830: 6e65 2d66 6163 6520 6162 6f75 742d 6861 ne-face about-ha │ │ │ -0000f840: 636b 6572 2d63 6f6e 7472 6962 7574 696f cker-contributio │ │ │ -0000f850: 6e20 6162 6f75 742d 6669 6e69 7368 2d62 n about-finish-b │ │ │ -0000f860: 7566 6665 7220 6b69 6c6c 2032 2078 656d uffer kill 2 xem │ │ │ -0000f870: 6163 732d 6861 636b 6572 735d 2038 5d29 acs-hackers] 8]) │ │ │ -0000f880: 0a28 6465 6661 6c69 6173 2027 6162 6f75 .(defalias 'abou │ │ │ -0000f890: 742d 7461 6273 2023 5b28 7374 7229 2022 t-tabs #[(str) " │ │ │ -0000f8a0: 0847 8919 c259 ab83 c3aa 9109 c459 ab83 .G...Y.......Y.. │ │ │ -0000f8b0: c5aa 8909 c659 ab83 c7aa 81c8 2987 2220 .....Y......)." │ │ │ -0000f8c0: 5b73 7472 2078 2032 3420 2220 2220 3136 [str x 24 " " 16 │ │ │ -0000f8d0: 2022 0922 2038 2022 0909 2220 2209 0909 "." 8 ".." "... │ │ │ -0000f8e0: 225d 2033 5d29 0a28 6279 7465 2d63 6f64 "] 3]).(byte-cod │ │ │ -0000f8f0: 6520 22c0 c14e c273 ac85 c3c4 c05c 2288 e "..N.s.....\". │ │ │ -0000f900: c5c0 c1c6 2387 2220 5b61 626f 7574 2d74 ....#." [about-t │ │ │ -0000f910: 6162 7320 6279 7465 2d6f 7074 696d 697a abs byte-optimiz │ │ │ -0000f920: 6572 2028 6e69 6c20 6279 7465 2d63 6f6d er (nil byte-com │ │ │ -0000f930: 7069 6c65 2d69 6e6c 696e 652d 6578 7061 pile-inline-expa │ │ │ -0000f940: 6e64 2920 6572 726f 7220 2225 7320 616c nd) error "%s al │ │ │ -0000f950: 7265 6164 7920 6861 7320 6120 6279 7465 ready has a byte │ │ │ -0000f960: 2d6f 7074 696d 697a 6572 2c20 6361 6e27 -optimizer, can' │ │ │ -0000f970: 7420 6d61 6b65 2069 7420 696e 6c69 6e65 t make it inline │ │ │ -0000f980: 2220 7075 7420 6279 7465 2d63 6f6d 7069 " put byte-compi │ │ │ -0000f990: 6c65 2d69 6e6c 696e 652d 6578 7061 6e64 le-inline-expand │ │ │ -0000f9a0: 5d20 3429 0a28 6465 6661 6c69 6173 2027 ] 4).(defalias ' │ │ │ -0000f9b0: 6162 6f75 742d 7368 6f77 2d6c 696e 6b65 about-show-linke │ │ │ -0000f9c0: 642d 696e 666f 2023 5b28 7768 6f29 2022 d-info #[(who) " │ │ │ -0000f9d0: 5c6e 08b7 891c 4140 1d0c 4141 4019 c6c7 \n....A@..AA@... │ │ │ -0000f9e0: c8c9 0d50 cacb cccd cecd cf0d d05c 6e26 ...P.........\n& │ │ │ -0000f9f0: 0d88 d10d 891e 1e47 891b d259 ab83 d3aa .......G...Y.... │ │ │ -0000fa00: 910b d459 ab83 d5aa 890b d659 ab83 d7aa ...Y.......Y.... │ │ │ -0000fa10: 81d8 2ad9 5c22 88da 0921 88d1 db21 88dc ..*.\"...!...!.. │ │ │ -0000fa20: 0c21 88d1 dd21 2b87 2220 5b78 656d 6163 .!...!+." [xemac │ │ │ -0000fa30: 732d 6861 636b 6572 7320 6164 6472 6573 s-hackers addres │ │ │ -0000fa40: 7320 7768 6f20 7820 656e 7472 7920 6e61 s who x entry na │ │ │ -0000fa50: 6d65 2077 6964 6765 742d 6372 6561 7465 me widget-create │ │ │ -0000fa60: 206c 696e 6b20 3a68 656c 702d 6563 686f link :help-echo │ │ │ -0000fa70: 2022 4669 6e64 206f 7574 206d 6f72 6520 "Find out more │ │ │ -0000fa80: 6162 6f75 7420 2220 3a61 6374 696f 6e20 about " :action │ │ │ -0000fa90: 6162 6f75 742d 6d61 696e 7461 696e 6572 about-maintainer │ │ │ -0000faa0: 203a 6275 7474 6f6e 2d70 7265 6669 7820 :button-prefix │ │ │ -0000fab0: 2222 203a 6275 7474 6f6e 2d73 7566 6669 "" :button-suffi │ │ │ -0000fac0: 7820 3a74 6167 203a 7661 6c75 6520 7769 x :tag :value wi │ │ │ -0000fad0: 6467 6574 2d69 6e73 6572 7420 3234 2022 dget-insert 24 " │ │ │ -0000fae0: 2022 2031 3620 2209 2220 3820 2209 0922 " 16 "." 8 ".." │ │ │ -0000faf0: 2022 0909 0922 2022 3c22 2061 626f 7574 "..." "<" about │ │ │ -0000fb00: 2d6d 6169 6c74 6f2d 6c69 6e6b 2022 3e5c -mailto-link ">\ │ │ │ -0000fb10: 6e22 2061 626f 7574 2d68 6163 6b65 722d n" about-hacker- │ │ │ -0000fb20: 636f 6e74 7269 6275 7469 6f6e 2022 5c6e contribution "\n │ │ │ -0000fb30: 2220 7374 725d 2031 355d 290a 2864 6566 " str] 15]).(def │ │ │ -0000fb40: 616c 6961 7320 2761 626f 7574 2d68 6163 alias 'about-hac │ │ │ -0000fb50: 6b65 7273 2023 5b28 2672 6573 7420 6967 kers #[(&rest ig │ │ │ -0000fb60: 6e6f 7265 2920 22c6 c721 3f85 6608 c81d nore) "..!?.f... │ │ │ -0000fb70: c9ca 0d21 cb0d cc5c 225c 2288 29c9 cdcb ...!...\"\".)... │ │ │ -0000fb80: cecf 5c22 d023 88d1 d20c 5c22 88c9 d3cb ..\".#....\".... │ │ │ -0000fb90: d4cf 5c22 d023 88d1 d20b 5c22 88c9 d3cb ..\".#....\".... │ │ │ -0000fba0: d5cf 5c22 d023 88d1 d25c 6e5c 2288 d6d7 ..\".#...\n\"... │ │ │ -0000fbb0: 2189 19ad 82d7 4b18 d88e d7d9 4d88 c9da !.....K.....M... │ │ │ -0000fbc0: 2188 d7db dc5c 2288 d7dd de5c 2288 d7df !....\"....\"... │ │ │ -0000fbd0: e05c 2288 d7e1 e25c 2288 d7e3 e45c 2288 .\"....\"....\". │ │ │ -0000fbe0: d7e5 e65c 2288 d7e7 e85c 2288 d7e9 ea5c ...\"....\"....\ │ │ │ -0000fbf0: 2288 d7eb ec5c 2288 d7ed ee5c 2288 d7ef "....\"....\"... │ │ │ -0000fc00: f05c 2288 d7f1 f25c 2288 d7f3 f45c 2288 .\"....\"....\". │ │ │ -0000fc10: d7f5 f65c 2288 d7f7 f85c 2288 d7f9 fa5c ...\"....\"....\ │ │ │ -0000fc20: 2288 d7fb fc5c 2288 d7fd fe5c 2288 d7ff "....\"....\"... │ │ │ -0000fc30: 8140 005c 2288 d781 4100 8142 005c 2288 .@.\"...A..B.\". │ │ │ -0000fc40: d781 4300 8144 005c 2288 d781 4500 8146 ..C..D.\"...E..F │ │ │ -0000fc50: 005c 2288 d781 4700 8148 005c 2288 d781 .\"...G..H.\"... │ │ │ -0000fc60: 4900 814a 005c 2288 d781 4b00 814c 005c I..J.\"...K..L.\ │ │ │ -0000fc70: 2288 d781 4d00 814e 005c 2288 d781 4f00 "...M..N.\"...O. │ │ │ -0000fc80: 8150 005c 2288 d781 5100 8152 005c 2288 .P.\"...Q..R.\". │ │ │ -0000fc90: d781 5300 8154 005c 2288 d781 5500 8156 ..S..T.\"...U..V │ │ │ -0000fca0: 005c 2288 d781 5700 8158 005c 2288 d781 .\"...W..X.\"... │ │ │ -0000fcb0: 5900 815a 005c 2288 d781 5b00 815c 5c00 Y..Z.\"...[..\\. │ │ │ -0000fcc0: 5c22 88d7 815d 0081 5e00 5c22 88d7 815f \"...]..^.\"..._ │ │ │ -0000fcd0: 0081 6000 5c22 88d7 8161 0081 6200 5c22 ..`.\"...a..b.\" │ │ │ -0000fce0: 88d7 8163 0081 6400 5c22 88d7 8165 0081 ...c..d.\"...e.. │ │ │ -0000fcf0: 6600 5c22 88d7 8167 0081 6800 5c22 88d7 f.\"...g..h.\".. │ │ │ -0000fd00: 8169 0081 6a00 5c22 88d7 816b 0081 6c00 .i..j.\"...k..l. │ │ │ -0000fd10: 5c22 88d7 816d 0081 6e00 5c22 88d7 816f \"...m..n.\"...o │ │ │ -0000fd20: 0081 7000 5c22 88d7 8171 0081 7200 5c22 ..p.\"...q..r.\" │ │ │ -0000fd30: 88d7 8173 0081 7400 5c22 88d7 8175 0081 ...s..t.\"...u.. │ │ │ -0000fd40: 7600 5c22 88d7 8177 0081 7800 5c22 88d7 v.\"...w..x.\".. │ │ │ -0000fd50: 8179 0081 7a00 5c22 88d7 817b 0081 7c00 .y..z.\"...{..|. │ │ │ -0000fd60: 5c22 88d7 817d 0081 7e00 5c22 88d7 817f \"...}..~.\".... │ │ │ -0000fd70: 0081 8000 5c22 88d7 8181 0081 8200 5c22 ....\"........\" │ │ │ -0000fd80: 88d7 8183 0081 8400 5c22 88d7 8185 0081 ........\"...... │ │ │ -0000fd90: 8600 5c22 88d7 8187 0081 8800 5c22 88d7 ..\"........\".. │ │ │ -0000fda0: 8189 0081 8a00 5c22 88d7 818b 0081 8c00 ......\"........ │ │ │ -0000fdb0: 5c22 88d7 818d 0081 8e00 5c22 88d7 818f \"........\".... │ │ │ -0000fdc0: 0081 9000 5c22 88d7 8191 0081 9200 5c22 ....\"........\" │ │ │ -0000fdd0: 88d7 8193 0081 9400 5c22 88d7 8195 0081 ........\"...... │ │ │ -0000fde0: 9600 5c22 88d7 8197 0081 9800 5c22 88d7 ..\"........\".. │ │ │ -0000fdf0: 8199 0081 9a00 5c22 88d7 819b 0081 9c00 ......\"........ │ │ │ -0000fe00: 5c22 88d7 819d 0081 9e00 5c22 88d7 819f \"........\".... │ │ │ -0000fe10: 0081 a000 5c22 88d7 81a1 0081 a200 5c22 ....\"........\" │ │ │ -0000fe20: 88d7 81a3 0081 a400 5c22 88d7 81a5 0081 ........\"...... │ │ │ -0000fe30: a600 5c22 88d7 81a7 0081 a800 5c22 88d7 ..\"........\".. │ │ │ -0000fe40: 81a9 0081 aa00 5c22 88d7 81ab 0081 ac00 ......\"........ │ │ │ -0000fe50: 5c22 88d7 81ad 0081 ae00 5c22 88d7 81af \"........\".... │ │ │ -0000fe60: 0081 b000 5c22 88d7 81b1 0081 b200 5c22 ....\"........\" │ │ │ -0000fe70: 88d7 81b3 0081 b400 5c22 88d7 81b5 0081 ........\"...... │ │ │ -0000fe80: b600 5c22 88d7 81b7 0081 b800 5c22 88d7 ..\"........\".. │ │ │ -0000fe90: 81b9 0081 ba00 5c22 88d7 81bb 0081 bc00 ......\"........ │ │ │ -0000fea0: 5c22 88d7 81bd 0081 be00 5c22 88d7 81bf \"........\".... │ │ │ -0000feb0: 0081 c000 5c22 88d7 81c1 0081 c200 5c22 ....\"........\" │ │ │ -0000fec0: 88d7 81c3 0081 c400 5c22 88d7 81c5 0081 ........\"...... │ │ │ -0000fed0: c600 5c22 88d7 81c7 0081 c800 5c22 88d7 ..\"........\".. │ │ │ -0000fee0: 81c9 0081 ca00 5c22 88d7 81cb 0081 cc00 ......\"........ │ │ │ -0000fef0: 5c22 88d7 81cd 0081 ce00 5c22 88d7 81cf \"........\".... │ │ │ -0000ff00: 0081 d000 5c22 88d7 81d1 0081 d200 5c22 ....\"........\" │ │ │ -0000ff10: 88d7 81d3 0081 d400 5c22 88d7 81d5 0081 ........\"...... │ │ │ -0000ff20: d600 5c22 88d7 81d7 0081 d800 5c22 88d7 ..\"........\".. │ │ │ -0000ff30: 81d9 0081 da00 5c22 88d7 81db 0081 dc00 ......\"........ │ │ │ -0000ff40: 5c22 88d7 81dd 0081 de00 5c22 88d7 81df \"........\".... │ │ │ -0000ff50: 0081 e000 5c22 88d7 81e1 0081 e200 5c22 ....\"........\" │ │ │ -0000ff60: 88d7 81e3 0081 e400 5c22 88d7 81e5 0081 ........\"...... │ │ │ -0000ff70: e600 5c22 88d7 81e7 0081 e800 5c22 88d7 ..\"........\".. │ │ │ -0000ff80: 81e9 0081 ea00 5c22 88d7 81eb 0081 ec00 ......\"........ │ │ │ -0000ff90: 5c22 88d7 81ed 0081 ee00 5c22 88d7 81ef \"........\".... │ │ │ -0000ffa0: 0081 f000 5c22 88d7 81f1 0081 f200 5c22 ....\"........\" │ │ │ -0000ffb0: 88d7 81f3 0081 f400 5c22 88d7 81f5 0081 ........\"...... │ │ │ -0000ffc0: f600 5c22 88d7 81f7 0081 f800 5c22 88d7 ..\"........\".. │ │ │ -0000ffd0: 81f9 0081 fa00 5c22 88d7 81fb 0081 fc00 ......\"........ │ │ │ -0000ffe0: 5c22 88d7 81fd 0081 fe00 5c22 88d7 81ff \"........\".... │ │ │ -0000fff0: 0081 0001 5c22 88d7 8101 0181 0201 5c22 ....\"........\" │ │ │ -00010000: 88d7 8103 0181 0401 5c22 88d7 8105 0181 ........\"...... │ │ │ -00010010: 0601 5c22 88d7 8107 0181 0801 5c22 88d7 ..\"........\".. │ │ │ -00010020: 8109 0181 5c6e 015c 2288 d781 0b01 810c ....\n.\"....... │ │ │ -00010030: 015c 2288 d781 0d01 810e 015c 2288 d781 .\"........\"... │ │ │ -00010040: 0f01 8110 015c 2288 d781 0101 8102 015c .....\"........\ │ │ │ -00010050: 2288 d781 1101 8112 015c 2288 d781 1301 "........\"..... │ │ │ -00010060: 8114 015c 2288 d781 1501 8116 015c 2288 ...\"........\". │ │ │ -00010070: d781 1701 8118 015c 2288 d781 1901 811a .......\"....... │ │ │ -00010080: 015c 2288 d781 1b01 811c 015c 2288 d781 .\"........\"... │ │ │ -00010090: 1d01 811e 015c 2288 d781 1f01 8120 015c .....\"...... .\ │ │ │ -000100a0: 2288 d781 2101 815c 2201 5c22 88d7 8123 "...!..\".\"...# │ │ │ -000100b0: 0181 2401 5c22 88d7 8125 0181 2601 5c22 ..$.\"...%..&.\" │ │ │ -000100c0: 88d7 8127 0181 2801 5c22 88d7 8129 0181 ...'..(.\"...).. │ │ │ -000100d0: 2a01 5c22 88d7 812b 0181 2c01 5c22 88d7 *.\"...+..,.\".. │ │ │ -000100e0: 812d 0181 2e01 5c22 88d7 812f 0181 3001 .-....\".../..0. │ │ │ -000100f0: 5c22 88d7 8131 0181 3201 5c22 88d7 8133 \"...1..2.\"...3 │ │ │ -00010100: 0181 3401 5c22 88d7 8135 0181 3601 5c22 ..4.\"...5..6.\" │ │ │ -00010110: 88d7 8137 0181 3801 5c22 88d7 8139 0181 ...7..8.\"...9.. │ │ │ -00010120: 3a01 5c22 88d7 813b 0181 3c01 5c22 88d7 :.\"...;..<.\".. │ │ │ -00010130: 813d 0181 3e01 5c22 88d7 813f 0181 4001 .=..>.\"...?..@. │ │ │ -00010140: 5c22 88d7 8141 0181 4201 5c22 88d7 8143 \"...A..B.\"...C │ │ │ -00010150: 0181 4401 5c22 88d7 8145 0181 4601 5c22 ..D.\"...E..F.\" │ │ │ -00010160: 88d7 8147 0181 4801 5c22 88d7 8149 0181 ...G..H.\"...I.. │ │ │ -00010170: 4a01 5c22 88d7 814b 0181 4c01 5c22 88d7 J.\"...K..L.\".. │ │ │ -00010180: 814d 0181 4e01 5c22 88d7 814f 0181 5001 .M..N.\"...O..P. │ │ │ -00010190: 5c22 88d7 8151 0181 5201 5c22 88d7 8153 \"...Q..R.\"...S │ │ │ -000101a0: 0181 5401 5c22 88d7 8155 0181 5601 5c22 ..T.\"...U..V.\" │ │ │ -000101b0: 88d7 8157 0181 5801 5c22 88d7 8159 0181 ...W..X.\"...Y.. │ │ │ -000101c0: 5a01 5c22 88d7 815b 0181 5c5c 015c 2288 Z.\"...[..\\.\". │ │ │ -000101d0: d781 5d01 815e 015c 2288 d781 5f01 8160 ..]..^.\"..._..` │ │ │ -000101e0: 015c 2288 d781 6101 8162 015c 2288 d781 .\"...a..b.\"... │ │ │ -000101f0: 6301 8164 015c 2288 d781 6501 8166 015c c..d.\"...e..f.\ │ │ │ -00010200: 2288 d781 6701 8168 015c 2288 d781 6901 "...g..h.\"...i. │ │ │ -00010210: 816a 015c 2288 d781 6b01 816c 015c 2288 .j.\"...k..l.\". │ │ │ -00010220: d781 6d01 816e 015c 2288 d781 6f01 8170 ..m..n.\"...o..p │ │ │ -00010230: 015c 2288 d781 7101 8172 015c 2288 d781 .\"...q..r.\"... │ │ │ -00010240: 7301 8174 015c 2288 d781 7501 8176 015c s..t.\"...u..v.\ │ │ │ -00010250: 2288 d781 7701 8178 015c 2288 d781 7901 "...w..x.\"...y. │ │ │ -00010260: 817a 015c 2288 d781 7b01 817c 015c 2288 .z.\"...{..|.\". │ │ │ -00010270: d781 7d01 8178 015c 2288 d781 7e01 817f ..}..x.\"...~... │ │ │ -00010280: 015c 2288 d781 8001 8181 015c 2288 d781 .\"........\"... │ │ │ -00010290: 8201 8183 015c 2288 d781 8401 8185 015c .....\"........\ │ │ │ -000102a0: 2288 d781 8601 8187 015c 2288 d781 8801 "........\"..... │ │ │ -000102b0: 8189 015c 2288 d781 8a01 818b 015c 2288 ...\"........\". │ │ │ -000102c0: d781 8c01 818d 015c 2288 d781 8e01 818f .......\"....... │ │ │ -000102d0: 015c 2288 d781 9001 8191 015c 2288 d781 .\"........\"... │ │ │ -000102e0: 9201 8193 015c 2288 d781 9401 8195 015c .....\"........\ │ │ │ -000102f0: 2288 d781 9601 8197 015c 2288 d781 9801 "........\"..... │ │ │ -00010300: 8199 015c 2288 d781 9a01 819b 015c 2288 ...\"........\". │ │ │ -00010310: d781 9c01 819d 015c 2288 d781 9e01 819f .......\"....... │ │ │ -00010320: 015c 2288 d781 a001 81a1 015c 2288 d781 .\"........\"... │ │ │ -00010330: a201 81a3 015c 2288 d781 a401 81a5 015c .....\"........\ │ │ │ -00010340: 2288 d781 a601 81a7 015c 2288 d781 a801 "........\"..... │ │ │ -00010350: 81a9 015c 2288 d781 aa01 81ab 015c 2288 ...\"........\". │ │ │ -00010360: d781 ac01 81ad 015c 2288 d781 ae01 81af .......\"....... │ │ │ -00010370: 015c 2288 d781 b001 81b1 015c 2288 d781 .\"........\"... │ │ │ -00010380: b201 81b3 015c 2288 d781 b401 81b5 015c .....\"........\ │ │ │ -00010390: 2288 d781 b601 81b7 015c 2288 d781 b801 "........\"..... │ │ │ -000103a0: 81b9 015c 2288 d781 ba01 81bb 015c 2288 ...\"........\". │ │ │ -000103b0: d781 bc01 81bd 015c 2288 d781 be01 81bf .......\"....... │ │ │ -000103c0: 015c 2288 d781 c001 81c1 015c 2288 d781 .\"........\"... │ │ │ -000103d0: c201 81c3 015c 2288 d781 c401 81c5 015c .....\"........\ │ │ │ -000103e0: 2288 d781 c601 81c7 015c 2288 d781 c801 "........\"..... │ │ │ -000103f0: 81c9 015c 2288 d781 ca01 81cb 015c 2288 ...\"........\". │ │ │ -00010400: d781 cc01 81cd 015c 2288 d781 ce01 81cf .......\"....... │ │ │ -00010410: 015c 2288 d781 d001 81d1 015c 2288 d781 .\"........\"... │ │ │ -00010420: d201 81d3 015c 2288 d781 d401 81d5 015c .....\"........\ │ │ │ -00010430: 2288 d781 d601 81d7 015c 2288 d781 d801 "........\"..... │ │ │ -00010440: 81d9 015c 2288 d781 da01 81db 015c 2288 ...\"........\". │ │ │ -00010450: d781 dc01 81dd 015c 2288 d781 de01 81df .......\"....... │ │ │ -00010460: 015c 2288 d781 e001 81e1 015c 2288 d781 .\"........\"... │ │ │ -00010470: e201 81e3 015c 2288 d781 e401 81e5 015c .....\"........\ │ │ │ -00010480: 2288 d781 e601 81e7 015c 2288 d781 e801 "........\"..... │ │ │ -00010490: 81e9 015c 2288 d781 ea01 81eb 015c 2288 ...\"........\". │ │ │ -000104a0: d781 ec01 81ed 015c 2288 d781 ee01 81ef .......\"....... │ │ │ -000104b0: 015c 2288 d781 f001 81f1 015c 2288 c9d3 .\"........\"... │ │ │ -000104c0: 2188 2b81 f201 2087 2220 5b23 313d 233a !.+... ." [#1=#: │ │ │ -000104d0: 2d2d 6c65 7466 2d73 6176 652d 2d39 3135 --letf-save--915 │ │ │ -000104e0: 3139 2023 323d 233a 2d2d 6c65 7466 2d62 19 #2=#:--letf-b │ │ │ -000104f0: 6f75 6e64 2d2d 3931 3532 3020 6162 6f75 ound--91520 abou │ │ │ -00010500: 742d 6f6e 6365 2d61 6e64 2d66 7574 7572 t-once-and-futur │ │ │ -00010510: 652d 6861 636b 6572 7320 6162 6f75 742d e-hackers about- │ │ │ -00010520: 6f74 6865 722d 6375 7272 656e 742d 6861 other-current-ha │ │ │ -00010530: 636b 6572 7320 6162 6f75 742d 6375 7272 ckers about-curr │ │ │ -00010540: 656e 742d 7265 6c65 6173 652d 6d61 696e ent-release-main │ │ │ -00010550: 7461 696e 6572 7320 7469 746c 6520 6162 tainers title ab │ │ │ -00010560: 6f75 742d 6765 742d 6275 6666 6572 2022 out-get-buffer " │ │ │ -00010570: 2a41 626f 7574 2043 6f6e 7472 6962 7574 *About Contribut │ │ │ -00010580: 6f72 732a 2220 2241 204c 6567 696f 6e20 ors*" "A Legion │ │ │ -00010590: 6f66 2043 6f6e 7472 6962 7574 6f72 7320 of Contributors │ │ │ -000105a0: 746f 2058 456d 6163 7322 2077 6964 6765 to XEmacs" widge │ │ │ -000105b0: 742d 696e 7365 7274 2061 626f 7574 2d63 t-insert about-c │ │ │ -000105c0: 656e 7465 7220 6162 6f75 742d 7769 7468 enter about-with │ │ │ -000105d0: 2d66 6163 6520 626f 6c64 2022 5c6e 5c6e -face bold "\n\n │ │ │ -000105e0: 4c69 6b65 206d 6f73 7420 6672 6565 2073 Like most free s │ │ │ -000105f0: 6f66 7477 6172 652c 2058 456d 6163 7320 oftware, XEmacs │ │ │ -00010600: 6973 2061 2063 6f6c 6c61 626f 7261 7469 is a collaborati │ │ │ -00010610: 7665 2065 6666 6f72 742e 2020 5468 6573 ve effort. Thes │ │ │ -00010620: 6520 6172 655c 6e73 6f6d 6520 6f66 2074 e are\nsome of t │ │ │ -00010630: 6865 2063 6f6e 7472 6962 7574 6f72 732e he contributors. │ │ │ -00010640: 2020 5765 2068 6176 6520 6e6f 2064 6f75 We have no dou │ │ │ -00010650: 6274 2066 6f72 676f 7474 656e 2073 6f6d bt forgotten som │ │ │ -00010660: 656f 6e65 3b20 7765 5c6e 6170 6f6c 6f67 eone; we\napolog │ │ │ -00010670: 697a 6521 2020 596f 7520 6361 6e20 7365 ize! You can se │ │ │ -00010680: 6520 736f 6d65 206f 6620 6f75 7220 6661 e some of our fa │ │ │ -00010690: 6365 7320 756e 6465 7220 7468 6520 6c69 ces under the li │ │ │ -000106a0: 6e6b 732e 5c6e 5c6e 2220 2250 7269 6d61 nks.\n\n" "Prima │ │ │ -000106b0: 7279 206d 6169 6e74 6169 6e65 7273 2066 ry maintainers f │ │ │ -000106c0: 6f72 2074 6869 7320 7265 6c65 6173 653a or this release: │ │ │ -000106d0: 2220 6162 6f75 742d 6865 6164 6c69 6e65 " about-headline │ │ │ -000106e0: 2d66 6163 6520 225c 6e5c 6e22 206d 6170 -face "\n\n" map │ │ │ -000106f0: 6320 6162 6f75 742d 7368 6f77 2d6c 696e c about-show-lin │ │ │ -00010700: 6b65 642d 696e 666f 2022 5c6e 2220 224f ked-info "\n" "O │ │ │ -00010710: 7468 6572 206e 6f74 6162 6c65 2063 7572 ther notable cur │ │ │ -00010720: 7265 6e74 2068 6163 6b65 7273 3a22 2022 rent hackers:" " │ │ │ -00010730: 4f74 6865 7220 6e6f 7461 626c 6520 6f6e Other notable on │ │ │ -00010740: 6365 2061 6e64 2066 7574 7572 6520 6861 ce and future ha │ │ │ -00010750: 636b 6572 733a 2220 6662 6f75 6e64 7020 ckers:" fboundp │ │ │ -00010760: 7072 696e 742d 7368 6f72 7420 2828 6279 print-short ((by │ │ │ -00010770: 7465 2d63 6f64 6520 2209 ab86 c208 4d88 te-code ".....M. │ │ │ -00010780: aa84 c3c2 2188 c287 2220 5b23 3123 2023 ....!..." [#1# # │ │ │ -00010790: 3223 2070 7269 6e74 2d73 686f 7274 2066 2# print-short f │ │ │ -000107a0: 6d61 6b75 6e62 6f75 6e64 5d20 3229 2920 makunbound] 2)) │ │ │ -000107b0: 235b 286e 616d 6520 6164 6472 2026 6f70 #[(name addr &op │ │ │ -000107c0: 7469 6f6e 616c 2073 686f 7274 696e 666f tional shortinfo │ │ │ -000107d0: 2920 22c5 c60b c75c 220b 8919 4789 1cc8 ) "....\"...G... │ │ │ -000107e0: 59ab 83c9 aa91 0cca 59ab 83cb aa89 0ccc Y.......Y....... │ │ │ -000107f0: 59ab 83cd aa81 ce2a cf51 2188 d008 2188 Y......*.Q!...!. │ │ │ -00010800: c5d1 5c6e ab85 5c6e d250 aa81 d350 2187 ..\n..\n.P...P!. │ │ │ -00010810: 2220 5b61 6464 7220 7374 7220 7368 6f72 " [addr str shor │ │ │ -00010820: 7469 6e66 6f20 6e61 6d65 2078 2077 6964 tinfo name x wid │ │ │ -00010830: 6765 742d 696e 7365 7274 2061 626f 7574 get-insert about │ │ │ -00010840: 2d77 6974 682d 6661 6365 2069 7461 6c69 -with-face itali │ │ │ -00010850: 6320 3234 2022 2022 2031 3620 2209 2220 c 24 " " 16 "." │ │ │ -00010860: 3820 2209 0922 2022 0909 0922 2022 3c22 8 ".." "..." "<" │ │ │ -00010870: 2061 626f 7574 2d6d 6169 6c74 6f2d 6c69 about-mailto-li │ │ │ -00010880: 6e6b 2022 3e5c 6e22 2022 5c6e 2220 2222 nk ">\n" "\n" "" │ │ │ -00010890: 5d20 3620 225c 6e43 6f6d 6d6f 6e20 4c69 ] 6 "\nCommon Li │ │ │ -000108a0: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -000108b0: 6e20 2028 6c61 6d62 6461 204e 414d 4520 n (lambda NAME │ │ │ -000108c0: 4144 4452 2026 6f70 7469 6f6e 616c 2053 ADDR &optional S │ │ │ -000108d0: 484f 5254 494e 464f 295c 6e5c 6e22 5d20 HORTINFO)\n\n"] │ │ │ -000108e0: 225c 6e49 6e20 6164 6469 7469 6f6e 2074 "\nIn addition t │ │ │ -000108f0: 6f20 7468 6f73 6520 6a75 7374 206d 656e o those just men │ │ │ -00010900: 7469 6f6e 6564 2c20 7468 6520 666f 6c6c tioned, the foll │ │ │ -00010910: 6f77 696e 6720 7065 6f70 6c65 2068 6176 owing people hav │ │ │ -00010920: 6520 7370 656e 7420 615c 6e67 7265 6174 e spent a\ngreat │ │ │ -00010930: 2064 6561 6c20 6f66 2065 6666 6f72 7420 deal of effort │ │ │ -00010940: 7072 6f76 6964 696e 6720 6665 6564 6261 providing feedba │ │ │ -00010950: 636b 2c20 7465 7374 696e 6720 6265 7461 ck, testing beta │ │ │ -00010960: 2076 6572 7369 6f6e 7320 6f66 5c6e 5845 versions of\nXE │ │ │ -00010970: 6d61 6373 2c20 7072 6f76 6964 696e 6720 macs, providing │ │ │ -00010980: 7061 7463 6865 7320 746f 2074 6865 2073 patches to the s │ │ │ -00010990: 6f75 7263 6520 636f 6465 2c20 6f72 2064 ource code, or d │ │ │ -000109a0: 6f69 6e67 2061 6c6c 206f 6620 7468 655c oing all of the\ │ │ │ -000109b0: 6e61 626f 7665 2e20 2057 6520 636f 756c nabove. We coul │ │ │ -000109c0: 646e 2774 2068 6176 6520 646f 6e65 2069 dn't have done i │ │ │ -000109d0: 7420 7769 7468 6f75 7420 7468 656d 2e5c t without them.\ │ │ │ -000109e0: 6e5c 6e22 2022 4e61 6769 204d 2e20 4162 n\n" "Nagi M. Ab │ │ │ -000109f0: 6f75 6c65 6e65 696e 2220 2261 626f 756c oulenein" "aboul │ │ │ -00010a00: 656e 6540 706f 6e64 6572 2e63 7363 692e ene@ponder.csci. │ │ │ -00010a10: 756e 742e 6564 7522 2022 5065 7220 4162 unt.edu" "Per Ab │ │ │ -00010a20: 7261 6861 6d73 656e 2220 2261 6272 6168 rahamsen" "abrah │ │ │ -00010a30: 616d 4064 696e 612e 6b76 6c2e 646b 2220 am@dina.kvl.dk" │ │ │ -00010a40: 2247 6172 7920 4164 616d 7322 2022 6772 "Gary Adams" "gr │ │ │ -00010a50: 6140 7a65 7070 6f2e 4561 7374 2e53 756e a@zeppo.East.Sun │ │ │ -00010a60: 2e43 4f4d 2220 2247 656e 6e61 6479 2041 .COM" "Gennady A │ │ │ -00010a70: 6772 616e 6f76 2220 2261 6772 616e 6f76 granov" "agranov │ │ │ -00010a80: 4063 7361 2e43 532e 5465 6368 6e69 6f6e @csa.CS.Technion │ │ │ -00010a90: 2e41 632e 494c 2220 224d 6172 6b20 416c .Ac.IL" "Mark Al │ │ │ -00010aa0: 6c65 6e64 6572 2220 2261 6c6c 656e 6465 lender" "allende │ │ │ -00010ab0: 7240 766e 6574 2e49 424d 2e43 4f4d 2220 r@vnet.IBM.COM" │ │ │ -00010ac0: 2253 7465 7068 656e 2052 2e20 416e 6465 "Stephen R. Ande │ │ │ -00010ad0: 7273 6f6e 2220 2273 7261 4062 6c6f 6368 rson" "sra@bloch │ │ │ -00010ae0: 2e6c 696e 672e 7961 6c65 2e65 6475 2220 .ling.yale.edu" │ │ │ -00010af0: 2242 7574 6368 2041 6e74 6f6e 2220 2262 "Butch Anton" "b │ │ │ -00010b00: 7574 6368 407a 6170 686f 642e 7563 6869 utch@zaphod.uchi │ │ │ -00010b10: 6361 676f 2e65 6475 2220 2246 7265 6420 cago.edu" "Fred │ │ │ -00010b20: 4170 7065 6c6d 616e 2220 2246 7265 642e Appelman" "Fred. │ │ │ -00010b30: 4170 7065 6c6d 616e 4063 762e 7275 752e Appelman@cv.ruu. │ │ │ -00010b40: 6e6c 2220 2245 7269 6b20 5c22 5468 6520 nl" "Erik \"The │ │ │ -00010b50: 506f 7065 5c22 2041 726e 6573 6f6e 2220 Pope\" Arneson" │ │ │ -00010b60: 226c 617a 6172 7573 406d 696e 642e 6e65 "lazarus@mind.ne │ │ │ -00010b70: 7422 2022 546f 7220 4172 6e74 7365 6e22 t" "Tor Arntsen" │ │ │ -00010b80: 2022 746f 7240 7370 6163 6574 6563 2e6e "tor@spacetec.n │ │ │ -00010b90: 6f22 2022 4d61 7263 2041 7572 656c 2220 o" "Marc Aurel" │ │ │ -00010ba0: 2234 2d74 6561 2d32 4062 6f6e 672e 7361 "4-tea-2@bong.sa │ │ │ -00010bb0: 6172 2e64 6522 2022 4c61 7272 7920 4175 ar.de" "Larry Au │ │ │ -00010bc0: 746f 6e22 2022 6c64 6140 636f 6e74 726f ton" "lda@contro │ │ │ -00010bd0: 6c2e 6174 742e 636f 6d22 2022 4c61 7272 l.att.com" "Larr │ │ │ -00010be0: 7920 4179 6572 7322 2022 6c61 7965 7273 y Ayers" "layers │ │ │ -00010bf0: 406d 6172 6b74 7761 696e 2e6e 6574 2220 @marktwain.net" │ │ │ -00010c00: 224f 7377 616c 6420 502e 2042 6163 6b75 "Oswald P. Backu │ │ │ -00010c10: 7320 4956 2220 2262 6163 6b75 7340 616c s IV" "backus@al │ │ │ -00010c20: 7461 6772 6f75 702e 636f 6d22 2022 4d69 tagroup.com" "Mi │ │ │ -00010c30: 6b65 2042 6174 7461 676c 6961 2220 226d ke Battaglia" "m │ │ │ -00010c40: 6261 7474 6167 6c40 6473 6363 632e 636f battagl@dsccc.co │ │ │ -00010c50: 6d22 2022 4e65 616c 2042 6563 6b65 7222 m" "Neal Becker" │ │ │ -00010c60: 2022 6e65 616c 4063 7464 2e63 6f6d 7361 "neal@ctd.comsa │ │ │ -00010c70: 742e 636f 6d22 2022 5061 756c 2042 6962 t.com" "Paul Bib │ │ │ -00010c80: 696c 6f22 2022 7065 6240 6465 6c63 616d ilo" "peb@delcam │ │ │ -00010c90: 2e63 6f6d 2220 224c 656f 6e61 7264 2042 .com" "Leonard B │ │ │ -00010ca0: 6c61 6e6b 7322 2022 6c74 6240 6861 7275 lanks" "ltb@haru │ │ │ -00010cb0: 7370 6578 2e64 656d 6f6e 2e63 6f2e 756b spex.demon.co.uk │ │ │ -00010cc0: 2220 224a 616e 2042 6f72 6368 6572 7322 " "Jan Borchers" │ │ │ -00010cd0: 2022 6a6f 6240 746b 2e75 6e69 2d6c 696e "job@tk.uni-lin │ │ │ -00010ce0: 7a2e 6163 2e61 7422 2022 4d61 726b 2042 z.ac.at" "Mark B │ │ │ -00010cf0: 6f72 6765 7322 2022 6d64 6240 6364 632e orges" "mdb@cdc. │ │ │ -00010d00: 6e6f 6161 2e67 6f76 2220 2244 6176 6964 noaa.gov" "David │ │ │ -00010d10: 2050 2e20 426f 7377 656c 6c22 2022 6461 P. Boswell" "da │ │ │ -00010d20: 7665 6240 7461 752e 7370 6163 652e 7468 veb@tau.space.th │ │ │ -00010d30: 696f 6b6f 6c2e 636f 6d22 2022 5469 6d20 iokol.com" "Tim │ │ │ -00010d40: 4272 6164 7368 6177 2220 2274 6662 4065 Bradshaw" "tfb@e │ │ │ -00010d50: 6469 6e62 7572 6768 2e61 632e 756b 2220 dinburgh.ac.uk" │ │ │ -00010d60: 2252 6963 6b20 4272 6175 6d6f 656c 6c65 "Rick Braumoelle │ │ │ -00010d70: 7222 2022 7269 636b 6240 6d74 692e 7367 r" "rickb@mti.sg │ │ │ -00010d80: 692e 636f 6d22 2022 4d61 7474 6865 7720 i.com" "Matthew │ │ │ -00010d90: 4a2e 2042 726f 776e 2220 226d 6a62 4064 J. Brown" "mjb@d │ │ │ -00010da0: 6f63 2e69 632e 6163 2e75 6b22 2022 416c oc.ic.ac.uk" "Al │ │ │ -00010db0: 6173 7461 6972 2042 7572 7422 2022 6275 astair Burt" "bu │ │ │ -00010dc0: 7274 4064 666b 692e 756e 692d 6b6c 2e64 rt@dfki.uni-kl.d │ │ │ -00010dd0: 6522 2022 4461 7669 6420 4275 7368 2220 e" "David Bush" │ │ │ -00010de0: 2264 6176 6964 2e62 7573 6840 6164 6e2e "david.bush@adn. │ │ │ -00010df0: 616c 6361 7465 6c2e 636f 6d22 2022 5269 alcatel.com" "Ri │ │ │ -00010e00: 6368 6172 6420 4361 6c65 7922 2022 726a chard Caley" "rj │ │ │ -00010e10: 6340 6373 7472 2e65 6469 6e62 7572 6768 c@cstr.edinburgh │ │ │ -00010e20: 2e61 632e 756b 2220 2253 7465 7068 656e .ac.uk" "Stephen │ │ │ -00010e30: 2043 6172 6e65 7922 2022 6361 726e 6579 Carney" "carney │ │ │ -00010e40: 4067 7663 2e64 6563 2e63 6f6d 2220 224c @gvc.dec.com" "L │ │ │ -00010e50: 6f72 656e 7a6f 204d 2e20 4361 7475 6363 orenzo M. Catucc │ │ │ -00010e60: 6922 2022 6c6f 7265 6e7a 6f40 6172 676f i" "lorenzo@argo │ │ │ -00010e70: 6e2e 726f 6d61 322e 696e 666e 2e69 7422 n.roma2.infn.it" │ │ │ -00010e80: 2022 5068 696c 6970 7065 2043 6861 7274 "Philippe Chart │ │ │ -00010e90: 6f6e 2220 2263 6861 7274 6f6e 406c 6d64 on" "charton@lmd │ │ │ -00010ea0: 2e65 6e73 2e66 7222 2022 5065 7465 7220 .ens.fr" "Peter │ │ │ -00010eb0: 4368 656e 6722 2022 7065 7465 722e 6368 Cheng" "peter.ch │ │ │ -00010ec0: 656e 6740 7375 6e2e 636f 6d22 2022 4a69 eng@sun.com" "Ji │ │ │ -00010ed0: 6e20 532e 2043 686f 6922 2022 6a69 6e40 n S. Choi" "jin@ │ │ │ -00010ee0: 6174 7970 652e 636f 6d22 2022 546f 6d61 atype.com" "Toma │ │ │ -00010ef0: 737a 204a 2e20 4368 6f6c 6577 6f22 2022 sz J. Cholewo" " │ │ │ -00010f00: 746a 6368 6f6c 3031 406d 6563 6361 2e73 tjchol01@mecca.s │ │ │ -00010f10: 7064 2e6c 6f75 6973 7669 6c6c 652e 6564 pd.louisville.ed │ │ │ -00010f20: 7522 2022 5365 7265 6e65 6c6c 6120 4369 u" "Serenella Ci │ │ │ -00010f30: 6f6e 676f 6c69 2220 2263 7a73 3030 406c ongoli" "czs00@l │ │ │ -00010f40: 6164 7962 7567 2e6f 6573 2e61 6d64 6168 adybug.oes.amdah │ │ │ -00010f50: 6c2e 636f 6d22 2022 476c 796e 6e20 436c l.com" "Glynn Cl │ │ │ -00010f60: 656d 656e 7473 2220 2267 6c79 6e6e 4073 ements" "glynn@s │ │ │ -00010f70: 656e 7365 692e 636f 2e75 6b22 2022 5269 ensei.co.uk" "Ri │ │ │ -00010f80: 6368 6172 6420 436f 676e 6f74 2220 2263 chard Cognot" "c │ │ │ -00010f90: 6f67 6e6f 7440 656e 7367 2e75 2d6e 616e ognot@ensg.u-nan │ │ │ -00010fa0: 6379 2e66 7222 2022 416e 6479 2043 6f68 cy.fr" "Andy Coh │ │ │ -00010fb0: 656e 2220 2263 6f68 656e 4061 6e64 792e en" "cohen@andy. │ │ │ -00010fc0: 6275 2e65 6475 2220 2252 6963 6861 7264 bu.edu" "Richard │ │ │ -00010fd0: 2043 6f6c 656d 616e 2220 2263 6f6c 656d Coleman" "colem │ │ │ -00010fe0: 616e 406d 6174 682e 6761 7465 6368 2e65 an@math.gatech.e │ │ │ -00010ff0: 6475 2220 224d 6175 726f 2043 6f6e 6461 du" "Mauro Conda │ │ │ -00011000: 7265 6c6c 6922 2022 4d43 3536 3836 406d relli" "MC5686@m │ │ │ -00011010: 636c 696e 6b2e 6974 2220 224e 6963 6b20 clink.it" "Nick │ │ │ -00011020: 4a2e 2043 7261 6274 7265 6522 2022 6e69 J. Crabtree" "ni │ │ │ -00011030: 636b 6340 7363 6f70 6963 2e63 6f6d 2220 ckc@scopic.com" │ │ │ -00011040: 2243 6872 6973 746f 7068 6572 2044 6176 "Christopher Dav │ │ │ -00011050: 6973 2220 2263 6b64 406b 6569 2e63 6f6d is" "ckd@kei.com │ │ │ -00011060: 2220 2253 6f72 656e 2044 6179 746f 6e22 " "Soren Dayton" │ │ │ -00011070: 2022 6373 6461 7974 6f6e 4063 732e 7563 "csdayton@cs.uc │ │ │ -00011080: 6869 6361 676f 2e65 6475 2220 2243 6872 hicago.edu" "Chr │ │ │ -00011090: 6973 2044 6561 6e22 2022 6374 6465 616e is Dean" "ctdean │ │ │ -000110a0: 4063 6f67 6974 2e63 6f6d 2220 224d 6963 @cogit.com" "Mic │ │ │ -000110b0: 6861 656c 2044 6965 7273 2220 226d 6469 hael Diers" "mdi │ │ │ -000110c0: 6572 7340 6c6f 6777 6172 652e 6465 2220 ers@logware.de" │ │ │ -000110d0: 2257 696c 6c69 616d 2047 2e20 4475 6275 "William G. Dubu │ │ │ -000110e0: 7175 6522 2022 7767 6440 6d61 7274 6967 que" "wgd@martig │ │ │ -000110f0: 6e79 2e61 692e 6d69 742e 6564 7522 2022 ny.ai.mit.edu" " │ │ │ -00011100: 5374 6576 6520 4475 6e68 616d 2220 2264 Steve Dunham" "d │ │ │ -00011110: 756e 6861 6d40 6475 6e68 616d 2e74 6369 unham@dunham.tci │ │ │ -00011120: 6d65 742e 6e65 7422 2022 5361 6d75 656c met.net" "Samuel │ │ │ -00011130: 204a 2e20 4561 746f 6e22 2022 7361 6d75 J. Eaton" "samu │ │ │ -00011140: 656c 6540 636f 6773 2e73 7573 782e 6163 ele@cogs.susx.ac │ │ │ -00011150: 2e75 6b22 2022 4361 726c 2045 646d 616e .uk" "Carl Edman │ │ │ -00011160: 2220 2263 6564 6d61 6e40 5072 696e 6365 " "cedman@Prince │ │ │ -00011170: 746f 6e2e 4544 5522 2022 4461 7665 2045 ton.EDU" "Dave E │ │ │ -00011180: 646d 6f6e 6473 6f6e 2220 2264 6176 6964 dmondson" "david │ │ │ -00011190: 6564 4073 636f 2e63 6f6d 2220 224a 6f6e ed@sco.com" "Jon │ │ │ -000111a0: 6174 6861 6e20 4564 7761 7264 7322 2022 athan Edwards" " │ │ │ -000111b0: 6564 7761 7264 7340 696e 7472 616e 6574 edwards@intranet │ │ │ -000111c0: 2e63 6f6d 2220 2245 7269 6320 4569 6465 .com" "Eric Eide │ │ │ -000111d0: 2220 2265 6569 6465 4061 7379 6c75 6d2e " "eeide@asylum. │ │ │ -000111e0: 6373 2e75 7461 682e 6564 7522 2022 454b cs.utah.edu" "EK │ │ │ -000111f0: 5222 2022 656b 7240 7465 7269 7361 2e63 R" "ekr@terisa.c │ │ │ -00011200: 6f6d 2220 2244 6176 6964 2046 6c65 7463 om" "David Fletc │ │ │ -00011210: 6865 7222 2022 6672 6f64 6f40 7473 756e her" "frodo@tsun │ │ │ -00011220: 616d 692e 636f 6d22 2022 5061 756c 2046 ami.com" "Paul F │ │ │ -00011230: 6c69 6e64 6572 7322 2022 7074 6640 6465 linders" "ptf@de │ │ │ -00011240: 6c63 616d 2e63 6f2e 756b 2220 224a 6572 lcam.co.uk" "Jer │ │ │ -00011250: 6564 204a 2046 6c6f 7964 2220 226a 6572 ed J Floyd" "jer │ │ │ -00011260: 6564 406d 6974 2e65 6475 2220 2247 6172 ed@mit.edu" "Gar │ │ │ -00011270: 7920 442e 2046 6f73 7465 7222 2022 4761 y D. Foster" "Ga │ │ │ -00011280: 7279 2e46 6f73 7465 7240 436f 7270 2e53 ry.Foster@Corp.S │ │ │ -00011290: 756e 2e43 4f4d 2220 224a 6572 7279 2046 un.COM" "Jerry F │ │ │ -000112a0: 7261 696e 2220 226a 6572 7279 4073 6e65 rain" "jerry@sne │ │ │ -000112b0: 6666 656c 732e 7469 766f 6c69 2e63 6f6d ffels.tivoli.com │ │ │ -000112c0: 2220 2248 6f6c 6765 7220 4672 616e 7a22 " "Holger Franz" │ │ │ -000112d0: 2022 6866 7261 6e7a 4070 6879 7369 6b2e "hfranz@physik. │ │ │ -000112e0: 7277 7468 2d61 6163 6865 6e2e 6465 2220 rwth-aachen.de" │ │ │ -000112f0: 2242 656e 6a61 6d69 6e20 4672 6965 6422 "Benjamin Fried" │ │ │ -00011300: 2022 6266 406d 6f72 6761 6e2e 636f 6d22 "bf@morgan.com" │ │ │ -00011310: 2022 4261 7272 7920 4672 6965 646d 616e "Barry Friedman │ │ │ -00011320: 2220 2266 7269 6564 6d61 6e40 6e6f 7274 " "friedman@nort │ │ │ -00011330: 656c 2e63 6122 2022 4e6f 6168 2046 7269 el.ca" "Noah Fri │ │ │ -00011340: 6564 6d61 6e22 2022 6672 6965 646d 616e edman" "friedman │ │ │ -00011350: 4073 706c 6f64 652e 636f 6d22 2022 4b61 @splode.com" "Ka │ │ │ -00011360: 7a75 796f 7368 6920 4675 7275 7461 6b61 zuyoshi Furutaka │ │ │ -00011370: 2220 2266 7572 7574 616b 6140 466c 7578 " "furutaka@Flux │ │ │ -00011380: 2e74 6f6b 6169 2e6a 6165 7269 2e67 6f2e .tokai.jaeri.go. │ │ │ -00011390: 6a70 2220 224c 6577 2047 6169 7465 7220 jp" "Lew Gaiter │ │ │ -000113a0: 4949 4922 2022 6c65 7740 5374 6172 4669 III" "lew@StarFi │ │ │ -000113b0: 7265 2e63 6f6d 2220 2249 7461 7920 4761 re.com" "Itay Ga │ │ │ -000113c0: 7422 2022 6974 6179 4063 732e 6875 6a69 t" "itay@cs.huji │ │ │ -000113d0: 2e61 632e 696c 2220 2254 696d 2047 6569 .ac.il" "Tim Gei │ │ │ -000113e0: 736c 6572 2220 2254 696d 2e47 6569 736c sler" "Tim.Geisl │ │ │ -000113f0: 6572 4069 6e66 6f72 6d61 7469 6b2e 756e er@informatik.un │ │ │ -00011400: 692d 6d75 656e 6368 656e 2e64 6522 2022 i-muenchen.de" " │ │ │ -00011410: 4461 7665 2047 696c 6c65 7370 6965 2220 Dave Gillespie" │ │ │ -00011420: 2264 6176 6567 4073 796e 6170 7469 6373 "daveg@synaptics │ │ │ -00011430: 2e63 6f6d 2220 2243 6872 6973 7469 616e .com" "Christian │ │ │ -00011440: 2046 2e20 476f 6574 7a65 2220 2263 6740 F. Goetze" "cg@ │ │ │ -00011450: 6269 6762 6f6f 6b2e 636f 6d22 2022 5975 bigbook.com" "Yu │ │ │ -00011460: 7375 6620 476f 6f6c 616d 6162 6261 7322 suf Goolamabbas" │ │ │ -00011470: 2022 7975 7375 6667 4069 7373 2e6e 7573 "yusufg@iss.nus │ │ │ -00011480: 2e73 6722 2022 576f 6c66 6761 6e67 2047 .sg" "Wolfgang G │ │ │ -00011490: 7269 6573 6b61 6d70 2220 2277 6740 6373 rieskamp" "wg@cs │ │ │ -000114a0: 2e74 752d 6265 726c 696e 2e64 6522 2022 .tu-berlin.de" " │ │ │ -000114b0: 4a6f 686e 2047 7269 6666 6974 6822 2022 John Griffith" " │ │ │ -000114c0: 6772 6966 6669 7468 4073 6673 2e6e 7068 griffith@sfs.nph │ │ │ -000114d0: 696c 2e75 6e69 2d74 7565 6269 6e67 656e il.uni-tuebingen │ │ │ -000114e0: 2e64 6522 2022 4a61 6d65 7320 4772 696e .de" "James Grin │ │ │ -000114f0: 7465 7222 2022 6a72 6740 6465 6d6f 6e2e ter" "jrg@demon. │ │ │ -00011500: 6e65 7422 2022 4265 6e20 4772 6f73 7322 net" "Ben Gross" │ │ │ -00011510: 2022 6267 726f 7373 4075 6975 632e 6564 "bgross@uiuc.ed │ │ │ -00011520: 7522 2022 4469 726b 2047 7275 6e77 616c u" "Dirk Grunwal │ │ │ -00011530: 6422 2022 6772 756e 7761 6c64 4066 6f6f d" "grunwald@foo │ │ │ -00011540: 6261 722e 6373 2e43 6f6c 6f72 6164 6f2e bar.cs.Colorado. │ │ │ -00011550: 4544 5522 2022 4d69 6368 6165 6c20 4775 EDU" "Michael Gu │ │ │ -00011560: 656e 7468 6572 2220 226d 6963 6861 656c enther" "michael │ │ │ -00011570: 6740 6967 6f72 2e73 7475 7474 6761 7274 g@igor.stuttgart │ │ │ -00011580: 2e6e 6574 7375 7266 2e64 6522 2022 4469 .netsurf.de" "Di │ │ │ -00011590: 7061 6e6b 6172 2047 7570 7461 2220 2264 pankar Gupta" "d │ │ │ -000115a0: 6740 6870 6c62 2e68 706c 2e68 702e 636f g@hplb.hpl.hp.co │ │ │ -000115b0: 6d22 2022 4d61 726b 7573 2047 7574 7363 m" "Markus Gutsc │ │ │ -000115c0: 686b 6522 2022 6775 7473 6368 6b40 474f hke" "gutschk@GO │ │ │ -000115d0: 4544 454c 2e55 4e49 2d4d 5545 4e53 5445 EDEL.UNI-MUENSTE │ │ │ -000115e0: 522e 4445 2220 224b 6169 2048 6162 6572 R.DE" "Kai Haber │ │ │ -000115f0: 7a65 7474 6c22 2022 6b68 6162 6572 7a40 zettl" "khaberz@ │ │ │ -00011600: 7379 6e6e 6574 2e64 6522 2022 4164 616d synnet.de" "Adam │ │ │ -00011610: 2048 616d 6d65 7222 2022 6861 6d6d 6572 Hammer" "hammer │ │ │ -00011620: 4063 732e 7075 7264 7565 2e65 6475 2220 @cs.purdue.edu" │ │ │ -00011630: 224d 6167 6e75 7320 4861 6d6d 6572 696e "Magnus Hammerin │ │ │ -00011640: 2220 226d 6167 6e75 7368 4065 7061 6374 " "magnush@epact │ │ │ -00011650: 2e73 6522 2022 4368 616e 6747 696c 2048 .se" "ChangGil H │ │ │ -00011660: 616e 2220 2263 6768 616e 4070 6879 7334 an" "cghan@phys4 │ │ │ -00011670: 3031 2e70 6879 732e 7075 7361 6e2e 6163 01.phys.pusan.ac │ │ │ -00011680: 2e6b 7222 2022 4465 7265 6b20 4861 7264 .kr" "Derek Hard │ │ │ -00011690: 696e 6722 2022 6468 6172 6469 6e67 406c ing" "dharding@l │ │ │ -000116a0: 7373 6563 2e62 742e 636f 2e75 6b22 2022 ssec.bt.co.uk" " │ │ │ -000116b0: 4d69 6368 6165 6c20 4861 726e 6f69 7322 Michael Harnois" │ │ │ -000116c0: 2022 6d68 6172 6e6f 6973 4073 6274 2e6e "mharnois@sbt.n │ │ │ -000116d0: 6574 2220 224a 6f68 6e20 4861 7862 7922 et" "John Haxby" │ │ │ -000116e0: 2022 4a2e 4861 7862 7940 6973 6f64 652e "J.Haxby@isode. │ │ │ -000116f0: 636f 6d22 2022 4b61 726c 204d 2e20 4865 com" "Karl M. He │ │ │ -00011700: 6762 6c6f 6f6d 2220 226b 6172 6c68 6567 gbloom" "karlheg │ │ │ -00011710: 4069 6e65 7461 7265 6e61 2e63 6f6d 2220 @inetarena.com" │ │ │ -00011720: 2242 656e 6564 696b 7420 4865 696e 656e "Benedikt Heinen │ │ │ -00011730: 2220 2262 6568 4069 6365 6d61 726b 2e74 " "beh@icemark.t │ │ │ -00011740: 6865 6e65 742e 6368 2220 2253 7465 7068 henet.ch" "Steph │ │ │ -00011750: 616e 2048 6572 726d 616e 6e22 2022 7368 an Herrmann" "sh │ │ │ -00011760: 4066 6972 7374 2e67 6d64 2e64 6522 2022 @first.gmd.de" " │ │ │ -00011770: 4175 6775 7374 2048 696c 6c22 2022 6177 August Hill" "aw │ │ │ -00011780: 6869 6c6c 4069 6e6c 696e 6b2e 636f 6d22 hill@inlink.com" │ │ │ -00011790: 2022 4d69 6b65 2048 696c 6c22 2022 6d69 "Mike Hill" "mi │ │ │ -000117a0: 6b65 6869 6c6c 4068 6765 6e67 2e63 6f6d kehill@hgeng.com │ │ │ -000117b0: 2220 2243 6861 726c 6573 2048 696e 6573 " "Charles Hines │ │ │ -000117c0: 2220 2263 6875 636b 5f68 696e 6573 4056 " "chuck_hines@V │ │ │ -000117d0: 4e45 542e 4942 4d2e 434f 4d22 2022 5368 NET.IBM.COM" "Sh │ │ │ -000117e0: 616e 6520 486f 6c64 6572 2220 2268 6f6c ane Holder" "hol │ │ │ -000117f0: 6465 7240 7273 6e2e 6870 2e63 6f6d 2220 der@rsn.hp.com" │ │ │ -00011800: 2243 6872 6973 2048 6f6c 7422 2022 7872 "Chris Holt" "xr │ │ │ -00011810: 6973 406d 6967 7261 696e 652e 7374 616e is@migraine.stan │ │ │ -00011820: 666f 7264 2e65 6475 2220 2254 6574 7375 ford.edu" "Tetsu │ │ │ -00011830: 7961 2048 4f59 414e 4f22 2022 686f 7961 ya HOYANO" "hoya │ │ │ -00011840: 6e6f 4061 7269 2e62 656b 6b6f 616d 652e no@ari.bekkoame. │ │ │ -00011850: 6f72 2e6a 7022 2022 4461 7669 6420 4875 or.jp" "David Hu │ │ │ -00011860: 6768 6573 2220 2264 6a68 4068 6172 7374 ghes" "djh@harst │ │ │ -00011870: 6f6e 2e63 762e 636f 6d22 2022 5475 646f on.cv.com" "Tudo │ │ │ -00011880: 7220 4875 6c75 6265 6922 2022 7475 646f r Hulubei" "tudo │ │ │ -00011890: 7240 6373 2e75 6e68 2e65 6475 2220 2254 r@cs.unh.edu" "T │ │ │ -000118a0: 6174 7375 7961 2049 6368 696b 6177 6122 atsuya Ichikawa" │ │ │ -000118b0: 2022 6963 6869 6b61 7761 4068 762e 6570 "ichikawa@hv.ep │ │ │ -000118c0: 736f 6e2e 636f 2e6a 7022 2022 416e 6472 son.co.jp" "Andr │ │ │ -000118d0: 6577 2049 6e6e 6573 2220 2261 6e64 7265 ew Innes" "andre │ │ │ -000118e0: 7769 4068 6172 6c65 7175 696e 2e63 6f2e wi@harlequin.co. │ │ │ -000118f0: 756b 2220 224d 6172 6b6b 7520 4a61 7276 uk" "Markku Jarv │ │ │ -00011900: 696e 656e 2220 224d 6172 6b6b 752e 4a61 inen" "Markku.Ja │ │ │ -00011910: 7276 696e 656e 4073 696d 7075 6b6b 612e rvinen@simpukka. │ │ │ -00011920: 6675 6e65 742e 6669 2220 2252 6f62 696e funet.fi" "Robin │ │ │ -00011930: 204a 6566 6672 6965 7322 2022 726f 6269 Jeffries" "robi │ │ │ -00011940: 6e2e 6a65 6666 7269 6573 4073 756e 2e63 n.jeffries@sun.c │ │ │ -00011950: 6f6d 2220 2250 6869 6c69 7020 4a6f 686e om" "Philip John │ │ │ -00011960: 736f 6e22 2022 6a6f 686e 736f 6e40 7568 son" "johnson@uh │ │ │ -00011970: 6963 732e 6963 732e 4861 7761 6969 2e45 ics.ics.Hawaii.E │ │ │ -00011980: 6475 2220 224a 2e20 4b65 616e 204a 6f68 du" "J. Kean Joh │ │ │ -00011990: 6e73 746f 6e22 2022 6a6b 6a40 7061 7261 nston" "jkj@para │ │ │ -000119a0: 6469 676d 2d73 612e 636f 6d22 2022 4a6f digm-sa.com" "Jo │ │ │ -000119b0: 686e 2057 2e20 4a6f 6e65 7322 2022 6a6a hn W. Jones" "jj │ │ │ -000119c0: 4061 7375 2e65 6475 2220 2241 6e64 7265 @asu.edu" "Andre │ │ │ -000119d0: 6173 204b 6165 6d70 6622 2022 616e 6472 as Kaempf" "andr │ │ │ -000119e0: 6561 7340 7363 636f 6e2e 636f 6d22 2022 eas@sccon.com" " │ │ │ -000119f0: 596f 7368 6961 6b69 204b 6173 6168 6172 Yoshiaki Kasahar │ │ │ -00011a00: 6122 2022 6b61 7361 6861 7261 406e 632e a" "kasahara@nc. │ │ │ -00011a10: 6b79 7573 6875 2d75 2e61 632e 6a70 2220 kyushu-u.ac.jp" │ │ │ -00011a20: 2241 6d69 7220 4b61 747a 2220 2261 6d69 "Amir Katz" "ami │ │ │ -00011a30: 7240 6e64 736f 6674 2e63 6f6d 2220 2244 r@ndsoft.com" "D │ │ │ -00011a40: 6f75 6720 4b65 6c6c 6572 2220 2264 6b65 oug Keller" "dke │ │ │ -00011a50: 6c6c 6572 4076 6e65 742e 6962 6d2e 636f ller@vnet.ibm.co │ │ │ -00011a60: 6d22 2022 4875 6e74 6572 204b 656c 6c79 m" "Hunter Kelly │ │ │ -00011a70: 2220 2272 6574 6e75 6840 636f 726f 6e61 " "retnuh@corona │ │ │ -00011a80: 2220 2247 7265 676f 7220 4b65 6e6e 6564 " "Gregor Kenned │ │ │ -00011a90: 7922 2022 6772 6567 6f72 6b40 6461 6464 y" "gregork@dadd │ │ │ -00011aa0: 2e74 692e 636f 6d22 2022 4d69 6368 6165 .ti.com" "Michae │ │ │ -00011ab0: 6c20 4b69 6665 7222 2022 6b69 6665 7240 l Kifer" "kifer@ │ │ │ -00011ac0: 6373 2e73 756e 7973 622e 6564 7522 2022 cs.sunysb.edu" " │ │ │ -00011ad0: 5961 7375 6869 6b6f 204b 6975 6368 6922 Yasuhiko Kiuchi" │ │ │ -00011ae0: 2022 6b69 7563 6869 4064 7370 2e6b 7370 "kiuchi@dsp.ksp │ │ │ -00011af0: 2e66 756a 6978 6572 6f78 2e63 6f2e 6a70 .fujixerox.co.jp │ │ │ -00011b00: 2220 2247 7265 6720 4b6c 616e 6465 726d " "Greg Klanderm │ │ │ -00011b10: 616e 2220 2267 7265 672e 6b6c 616e 6465 an" "greg.klande │ │ │ -00011b20: 726d 616e 4061 6c75 6d2e 6d69 742e 6564 rman@alum.mit.ed │ │ │ -00011b30: 7522 2022 5661 6c64 6973 204b 6c65 746e u" "Valdis Kletn │ │ │ -00011b40: 6965 6b73 2220 2256 616c 6469 732e 4b6c ieks" "Valdis.Kl │ │ │ -00011b50: 6574 6e69 656b 7340 7674 2e65 6475 2220 etnieks@vt.edu" │ │ │ -00011b60: 224e 6f72 6265 7274 204b 6f63 6822 2022 "Norbert Koch" " │ │ │ -00011b70: 6e2e 6b6f 6368 4064 656c 7461 2d69 692e n.koch@delta-ii. │ │ │ -00011b80: 6465 2220 2252 6f62 204b 6f6f 7065 7222 de" "Rob Kooper" │ │ │ -00011b90: 2022 6b6f 6f70 6572 4063 632e 6761 7465 "kooper@cc.gate │ │ │ -00011ba0: 6368 2e65 6475 2220 2250 6574 6572 2053 ch.edu" "Peter S │ │ │ -00011bb0: 6b6f 7620 4b6e 7564 7365 6e22 2022 6b6e kov Knudsen" "kn │ │ │ -00011bc0: 7540 6464 652e 646b 2220 224a 656e 7320 u@dde.dk" "Jens │ │ │ -00011bd0: 4b72 696e 6b65 2220 226b 7269 6e6b 6540 Krinke" "krinke@ │ │ │ -00011be0: 6970 732e 6373 2e74 752d 6273 2e64 6522 ips.cs.tu-bs.de" │ │ │ -00011bf0: 2022 4d61 7869 6d69 6c69 656e 204c 696e "Maximilien Lin │ │ │ -00011c00: 636f 7572 7422 2022 6d61 7840 746f 6f6e court" "max@toon │ │ │ -00011c10: 626f 6f6d 2e63 6f6d 2220 224d 6174 7320 boom.com" "Mats │ │ │ -00011c20: 4c61 7273 736f 6e22 2022 4d61 7473 2e4c Larsson" "Mats.L │ │ │ -00011c30: 6172 7373 6f6e 4075 6162 2e65 7269 6373 arsson@uab.erics │ │ │ -00011c40: 736f 6e2e 7365 2220 2253 696d 6f6e 204c son.se" "Simon L │ │ │ -00011c50: 6569 6e65 6e22 2022 7369 6d6f 6e40 696e einen" "simon@in │ │ │ -00011c60: 7374 7275 6d61 7469 632e 6368 2220 2243 strumatic.ch" "C │ │ │ -00011c70: 6172 7374 656e 204c 656f 6e68 6172 6474 arsten Leonhardt │ │ │ -00011c80: 2220 226c 656f 4061 7269 6f63 682e 6f63 " "leo@arioch.oc │ │ │ -00011c90: 6865 2e64 6522 2022 4a61 6d65 7320 4c65 he.de" "James Le │ │ │ -00011ca0: 7769 734d 6f73 7322 2022 6d6f 7373 4063 wisMoss" "moss@c │ │ │ -00011cb0: 732e 7363 2e65 6475 2220 224d 6174 7320 s.sc.edu" "Mats │ │ │ -00011cc0: 4c69 6465 6c6c 2220 226d 6174 732e 6c69 Lidell" "mats.li │ │ │ -00011cd0: 6465 6c6c 4063 6f6e 7461 6374 6f72 2e73 dell@contactor.s │ │ │ -00011ce0: 6522 2022 4d61 7474 204c 6967 6765 7474 e" "Matt Liggett │ │ │ -00011cf0: 2220 226d 6c69 6767 6574 7440 7365 7665 " "mliggett@seve │ │ │ -00011d00: 6e2e 7563 732e 696e 6469 616e 612e 6564 n.ucs.indiana.ed │ │ │ -00011d10: 7522 2022 4368 7269 7374 6961 6e20 4c69 u" "Christian Li │ │ │ -00011d20: 6d70 6163 6822 2022 4368 7269 7374 6961 mpach" "Christia │ │ │ -00011d30: 6e2e 4c69 6d70 6163 6840 6e69 6365 2e63 n.Limpach@nice.c │ │ │ -00011d40: 6822 2022 4d61 726b 7573 204c 696e 6e61 h" "Markus Linna │ │ │ -00011d50: 6c61 2220 226d 6161 6765 4062 3134 622e la" "maage@b14b. │ │ │ -00011d60: 7475 7073 752e 746f 6e2e 7475 742e 6669 tupsu.ton.tut.fi │ │ │ -00011d70: 2220 2252 6f62 6572 7420 4c69 7065 2220 " "Robert Lipe" │ │ │ -00011d80: 2272 6f62 6572 746c 4061 726e 6574 2e63 "robertl@arnet.c │ │ │ -00011d90: 6f6d 2220 2244 6572 7265 6c6c 204c 6970 om" "Derrell Lip │ │ │ -00011da0: 6d61 6e22 2022 6465 7272 656c 6c40 7669 man" "derrell@vi │ │ │ -00011db0: 732d 6176 2e63 6f6d 2220 2244 616d 6f6e s-av.com" "Damon │ │ │ -00011dc0: 204c 6970 7061 7265 6c6c 6922 2022 6c69 Lipparelli" "li │ │ │ -00011dd0: 7070 4061 612e 6e65 7422 2022 4861 6d69 pp@aa.net" "Hami │ │ │ -00011de0: 7368 204d 6163 646f 6e61 6c64 2220 2268 sh Macdonald" "h │ │ │ -00011df0: 616d 6973 6840 626e 722e 6361 2220 2249 amish@bnr.ca" "I │ │ │ -00011e00: 616e 204d 6163 4b69 6e6e 6f6e 2220 2269 an MacKinnon" "i │ │ │ -00011e10: 6d61 636b 696e 6e6f 6e40 7465 6c69 612e mackinnon@telia. │ │ │ -00011e20: 636f 2e75 6b22 2022 5061 7472 6963 6b20 co.uk" "Patrick │ │ │ -00011e30: 4d61 6352 6f62 6572 7473 2220 226d 6163 MacRoberts" "mac │ │ │ -00011e40: 726f 4068 7063 6f62 7233 302e 6375 702e ro@hpcobr30.cup. │ │ │ -00011e50: 6870 2e63 6f6d 2220 2254 6f6e 6e79 204d hp.com" "Tonny M │ │ │ -00011e60: 6164 7365 6e22 2022 546f 6e6e 792e 4d61 adsen" "Tonny.Ma │ │ │ -00011e70: 6473 656e 406e 6574 6d61 6e2e 646b 2220 dsen@netman.dk" │ │ │ -00011e80: 224b 6574 696c 205a 204d 616c 6465 2220 "Ketil Z Malde" │ │ │ -00011e90: 226b 6574 696c 4069 692e 7569 622e 6e6f "ketil@ii.uib.no │ │ │ -00011ea0: 2220 2253 7465 7665 204d 6172 6368 2220 " "Steve March" │ │ │ -00011eb0: 2273 6d61 7263 6840 7175 6176 6572 2e75 "smarch@quaver.u │ │ │ -00011ec0: 7262 616e 612e 6d63 642e 6d6f 742e 636f rbana.mcd.mot.co │ │ │ -00011ed0: 6d22 2022 5269 6361 7264 6f20 4d61 7265 m" "Ricardo Mare │ │ │ -00011ee0: 6b22 2022 7269 636b 7940 6f72 6e65 742e k" "ricky@ornet. │ │ │ -00011ef0: 636f 2e69 6c22 2022 5065 6b6b 6120 4d61 co.il" "Pekka Ma │ │ │ -00011f00: 726a 6f6c 6122 2022 7065 6d61 4069 6b69 rjola" "pema@iki │ │ │ -00011f10: 2e66 6922 2022 5369 6d6f 6e20 4d61 7273 .fi" "Simon Mars │ │ │ -00011f20: 6861 6c6c 2220 2273 696d 6f6e 4067 6e75 hall" "simon@gnu │ │ │ -00011f30: 2e61 692e 6d69 742e 6564 7522 2022 4461 .ai.mit.edu" "Da │ │ │ -00011f40: 7665 204d 6173 6f6e 2220 2264 6d61 736f ve Mason" "dmaso │ │ │ -00011f50: 6e40 706c 672e 7577 6174 6572 6c6f 6f2e n@plg.uwaterloo. │ │ │ -00011f60: 6361 2220 224a 6179 6520 4d61 7468 6973 ca" "Jaye Mathis │ │ │ -00011f70: 656e 2220 226d 7263 7075 4063 6473 6e65 en" "mrcpu@cdsne │ │ │ -00011f80: 742e 6e65 7422 2022 4a61 736f 6e20 4d63 t.net" "Jason Mc │ │ │ -00011f90: 4c61 7265 6e22 2022 6d63 6c61 7265 6e40 Laren" "mclaren@ │ │ │ -00011fa0: 6d61 7468 2e6d 6367 696c 6c2e 6361 2220 math.mcgill.ca" │ │ │ -00011fb0: 224d 6963 6861 656c 204d 634e 616d 6172 "Michael McNamar │ │ │ -00011fc0: 6122 2022 6d61 6340 7369 6c69 636f 6e2d a" "mac@silicon- │ │ │ -00011fd0: 736f 7263 6572 792e 636f 6d22 2022 4d69 sorcery.com" "Mi │ │ │ -00011fe0: 6368 6165 6c20 4d65 6973 736e 6572 2220 chael Meissner" │ │ │ -00011ff0: 226d 6569 7373 6e65 7240 6f73 662e 6f72 "meissner@osf.or │ │ │ -00012000: 6722 2022 4461 7669 6420 4d2e 204d 6579 g" "David M. Mey │ │ │ -00012010: 6572 2220 226d 6579 6572 406e 732e 756f er" "meyer@ns.uo │ │ │ -00012020: 7265 676f 6e2e 6564 7522 2022 4a6f 686e regon.edu" "John │ │ │ -00012030: 204d 6967 6e61 756c 7422 2022 6a62 6d40 Mignault" "jbm@ │ │ │ -00012040: 7061 6e69 782e 636f 6d22 2022 4272 6164 panix.com" "Brad │ │ │ -00012050: 204d 696c 6c65 7222 2022 626d 696c 6c65 Miller" "bmille │ │ │ -00012060: 7240 6373 2e75 6d6e 2e65 6475 2220 224a r@cs.umn.edu" "J │ │ │ -00012070: 6f68 6e20 4d6f 7265 7922 2022 6a6d 6f72 ohn Morey" "jmor │ │ │ -00012080: 6579 4063 726c 2e63 6f6d 2220 2252 6f62 ey@crl.com" "Rob │ │ │ -00012090: 204d 6f72 6922 2022 726f 622e 6d6f 7269 Mori" "rob.mori │ │ │ -000120a0: 4073 756e 2e63 6f6d 2220 2248 6569 6b6f @sun.com" "Heiko │ │ │ -000120b0: 204d 7565 6e6b 656c 2220 226d 7565 6e6b Muenkel" "muenk │ │ │ -000120c0: 656c 4074 6e74 2e75 6e69 2d68 616e 6e6f el@tnt.uni-hanno │ │ │ -000120d0: 7665 722e 6465 2220 2241 7275 7020 4d75 ver.de" "Arup Mu │ │ │ -000120e0: 6b68 6572 6a65 6522 2022 6172 7570 2b40 kherjee" "arup+@ │ │ │ -000120f0: 6373 2e63 6d75 2e65 6475 2220 2243 6f6c cs.cmu.edu" "Col │ │ │ -00012100: 6173 204e 6168 6162 6f6f 2220 2243 6f6c as Nahaboo" "Col │ │ │ -00012110: 6173 2e4e 6168 6162 6f6f 4073 6f70 6869 as.Nahaboo@sophi │ │ │ -00012120: 612e 696e 7269 612e 6672 2220 224c 796e a.inria.fr" "Lyn │ │ │ -00012130: 6e20 442e 204e 6577 746f 6e22 2022 6c79 n D. Newton" "ly │ │ │ -00012140: 6e6e 4069 7665 732e 7068 782e 6d63 642e nn@ives.phx.mcd. │ │ │ -00012150: 6d6f 742e 636f 6d22 2022 4361 7365 7920 mot.com" "Casey │ │ │ -00012160: 4e69 656c 736f 6e22 2022 6b6e 6965 6c73 Nielson" "kniels │ │ │ -00012170: 6f6e 406a 6f75 6c65 2e65 6c65 652e 6361 on@joule.elee.ca │ │ │ -00012180: 6c70 6f6c 792e 6564 7522 2022 4765 6f72 lpoly.edu" "Geor │ │ │ -00012190: 6720 4e69 6b6f 6479 6d22 2022 4765 6f72 g Nikodym" "Geor │ │ │ -000121a0: 672e 4e69 6b6f 6479 6d40 6361 6e61 6461 g.Nikodym@canada │ │ │ -000121b0: 2e73 756e 2e63 6f6d 2220 2241 6e64 7920 .sun.com" "Andy │ │ │ -000121c0: 4e6f 726d 616e 2220 2261 6e67 6540 6870 Norman" "ange@hp │ │ │ -000121d0: 6c62 2e68 706c 2e68 702e 636f 6d22 2022 lb.hpl.hp.com" " │ │ │ -000121e0: 4a6f 6520 4e75 7370 6c22 2022 6e75 7370 Joe Nuspl" "nusp │ │ │ -000121f0: 6c40 7365 7175 656e 742e 636f 6d22 2022 l@sequent.com" " │ │ │ -00012200: 4b69 6d20 4e79 6265 7267 2220 226b 6e79 Kim Nyberg" "kny │ │ │ -00012210: 4074 656b 6c61 2e66 6922 2022 4b65 7669 @tekla.fi" "Kevi │ │ │ -00012220: 6e20 4f62 6572 6d61 6e22 2022 6f62 6572 n Oberman" "ober │ │ │ -00012230: 6d61 6e40 6573 2e6e 6574 2220 2244 6176 man@es.net" "Dav │ │ │ -00012240: 6964 204f 6665 6c74 2220 226f 6665 6c74 id Ofelt" "ofelt │ │ │ -00012250: 4067 6574 616c 6966 652e 5374 616e 666f @getalife.Stanfo │ │ │ -00012260: 7264 2e45 4455 2220 2241 6c65 7861 6e64 rd.EDU" "Alexand │ │ │ -00012270: 7265 204f 6c69 7661 2220 226f 6c69 7661 re Oliva" "oliva │ │ │ -00012280: 4064 6363 2e75 6e69 6361 6d70 2e62 7222 @dcc.unicamp.br" │ │ │ -00012290: 2022 546f 7265 204f 6c73 656e 2220 2274 "Tore Olsen" "t │ │ │ -000122a0: 6f72 656f 4063 6f6c 6172 676f 6c2e 6964 oreo@colargol.id │ │ │ -000122b0: 622e 6869 7374 2e6e 6f22 2022 4772 6567 b.hist.no" "Greg │ │ │ -000122c0: 204f 6e75 6665 7222 2022 4772 6567 2e4f Onufer" "Greg.O │ │ │ -000122d0: 6e75 6665 7240 656e 672e 7375 6e2e 636f nufer@eng.sun.co │ │ │ -000122e0: 6d22 2022 4163 6869 6d20 4f70 7065 6c74 m" "Achim Oppelt │ │ │ -000122f0: 2220 2261 6f70 7065 6c74 4074 6865 6f72 " "aoppelt@theor │ │ │ -00012300: 6965 332e 7068 7973 696b 2e75 6e69 2d65 ie3.physik.uni-e │ │ │ -00012310: 726c 616e 6765 6e2e 6465 2220 2252 6562 rlangen.de" "Reb │ │ │ -00012320: 6563 6361 204f 7265 2220 2272 6562 6563 ecca Ore" "rebec │ │ │ -00012330: 6361 2e6f 7265 406f 702e 6e65 7422 2022 ca.ore@op.net" " │ │ │ -00012340: 5375 6465 6570 204b 756d 6172 2050 616c Sudeep Kumar Pal │ │ │ -00012350: 6174 2220 2270 616c 6174 4069 6474 2e75 at" "palat@idt.u │ │ │ -00012360: 6e69 742e 6e6f 2220 224a 6f65 6c20 5065 nit.no" "Joel Pe │ │ │ -00012370: 7465 7273 6f6e 2220 2274 6172 7a61 6e40 terson" "tarzan@ │ │ │ -00012380: 616f 7369 2e63 6f6d 2220 2254 686f 6d61 aosi.com" "Thoma │ │ │ -00012390: 7320 412e 2050 6574 6572 736f 6e22 2022 s A. Peterson" " │ │ │ -000123a0: 7461 7040 7372 632e 686f 6e65 7977 656c tap@src.honeywel │ │ │ -000123b0: 6c2e 636f 6d22 2022 5469 626f 7220 506f l.com" "Tibor Po │ │ │ -000123c0: 6c67 6172 2220 2274 6962 6f72 4061 6c74 lgar" "tibor@alt │ │ │ -000123d0: 656f 6e2e 636f 6d22 2022 4672 6564 6572 eon.com" "Freder │ │ │ -000123e0: 6963 2050 6f6e 6369 6e22 2022 6670 4069 ic Poncin" "fp@i │ │ │ -000123f0: 6e66 6f2e 7563 6c2e 6163 2e62 6522 2022 nfo.ucl.ac.be" " │ │ │ -00012400: 452e 2052 6568 6d69 2050 6f73 7422 2022 E. Rehmi Post" " │ │ │ -00012410: 7265 686d 6940 6173 796c 756d 2e73 662e rehmi@asylum.sf. │ │ │ -00012420: 6361 2e75 7322 2022 4d61 7274 696e 2050 ca.us" "Martin P │ │ │ -00012430: 6f74 7465 6e64 6f72 6665 7222 2022 4d61 ottendorfer" "Ma │ │ │ -00012440: 7274 696e 2e50 6f74 7465 6e64 6f72 6665 rtin.Pottendorfe │ │ │ -00012450: 7240 6175 742e 616c 6361 7465 6c2e 6174 r@aut.alcatel.at │ │ │ -00012460: 2220 2243 6f6c 696e 2052 6166 6665 7274 " "Colin Raffert │ │ │ -00012470: 7922 2022 636f 6c69 6e40 7865 6d61 6373 y" "colin@xemacs │ │ │ -00012480: 2e6f 7267 2220 2252 6963 6b20 5261 6e6b .org" "Rick Rank │ │ │ -00012490: 696e 2220 2252 6963 6b5f 5261 6e6b 696e in" "Rick_Rankin │ │ │ -000124a0: 2d50 3135 3235 3440 656d 6169 6c2e 6d6f -P15254@email.mo │ │ │ -000124b0: 742e 636f 6d22 2022 5061 756c 204d 2052 t.com" "Paul M R │ │ │ -000124c0: 6569 6c6c 7922 2022 706d 7240 7061 6a61 eilly" "pmr@paja │ │ │ -000124d0: 746f 2e63 6f6d 2220 224a 6163 6b20 5265 to.com" "Jack Re │ │ │ -000124e0: 7065 6e6e 696e 6722 2022 6a61 636b 7240 penning" "jackr@ │ │ │ -000124f0: 7367 692e 636f 6d22 2022 4461 6e69 656c sgi.com" "Daniel │ │ │ -00012500: 2052 6963 6822 2022 6472 6963 6840 6369 Rich" "drich@ci │ │ │ -00012510: 7363 6f2e 636f 6d22 2022 526f 6c61 6e64 sco.com" "Roland │ │ │ -00012520: 2052 6965 6b65 2220 2272 6f6c 4064 6172 Rieke" "rol@dar │ │ │ -00012530: 6d73 7461 6474 2e67 6d64 2e64 6522 2022 mstadt.gmd.de" " │ │ │ -00012540: 4172 7420 5269 6a6f 7322 2022 6172 742e Art Rijos" "art. │ │ │ -00012550: 7269 6a6f 7340 534e 4554 2e63 6f6d 2220 rijos@SNET.com" │ │ │ -00012560: 2252 7573 7365 6c6c 2052 6974 6368 6965 "Russell Ritchie │ │ │ -00012570: 2220 2272 6974 6368 6965 7240 6272 6974 " "ritchier@brit │ │ │ -00012580: 616e 6e69 612d 6c69 6665 2e63 6f2e 756b annia-life.co.uk │ │ │ -00012590: 2220 2252 6f6c 616e 6422 2022 4d69 6b65 " "Roland" "Mike │ │ │ -000125a0: 2052 7573 7365 6c6c 2220 226d 6a72 7573 Russell" "mjrus │ │ │ -000125b0: 7340 7263 686c 616e 642e 766e 6574 2e69 s@rchland.vnet.i │ │ │ -000125c0: 626d 2e63 6f6d 2220 2248 616a 696d 6520 bm.com" "Hajime │ │ │ -000125d0: 5361 6974 6f75 2220 2268 616a 696d 6540 Saitou" "hajime@ │ │ │ -000125e0: 6a73 6b2e 742e 752d 746f 6b79 6f2e 6163 jsk.t.u-tokyo.ac │ │ │ -000125f0: 2e6a 7022 2022 4a61 6e20 5361 6e64 7175 .jp" "Jan Sandqu │ │ │ -00012600: 6973 7422 2022 6574 7871 7569 7374 4069 ist" "etxquist@i │ │ │ -00012610: 7161 2e65 7269 6373 736f 6e2e 7365 2220 qa.ericsson.se" │ │ │ -00012620: 224d 6172 7479 2053 6173 616b 6922 2022 "Marty Sasaki" " │ │ │ -00012630: 7361 7361 6b69 4073 7064 6363 2e63 6f6d sasaki@spdcc.com │ │ │ -00012640: 2220 2253 4154 4f20 4461 6973 756b 6522 " "SATO Daisuke" │ │ │ -00012650: 2022 6465 6e73 756b 6540 6761 322e 736f "densuke@ga2.so │ │ │ -00012660: 2d6e 6574 2e6f 722e 6a70 2220 224b 656e -net.or.jp" "Ken │ │ │ -00012670: 6a69 2053 6174 6f22 2022 6b65 6e40 6e79 ji Sato" "ken@ny │ │ │ -00012680: 2e6b 6464 2e63 6f6d 2220 224d 696b 6520 .kdd.com" "Mike │ │ │ -00012690: 5363 6865 6964 6c65 7222 2022 6332 336d Scheidler" "c23m │ │ │ -000126a0: 7473 4065 6e67 2e64 656c 636f 656c 6563 ts@eng.delcoelec │ │ │ -000126b0: 742e 636f 6d22 2022 4461 6e69 656c 2053 t.com" "Daniel S │ │ │ -000126c0: 6368 6570 6c65 7222 2022 6461 6e69 656c chepler" "daniel │ │ │ -000126d0: 4073 6865 7031 332e 7775 7374 6c2e 6564 @shep13.wustl.ed │ │ │ -000126e0: 7522 2022 486f 6c67 6572 2053 6368 6175 u" "Holger Schau │ │ │ -000126f0: 6572 2220 2273 6368 6175 6572 4063 6f6c er" "schauer@col │ │ │ -00012700: 696e 672e 756e 692d 6672 6569 6275 7267 ing.uni-freiburg │ │ │ -00012710: 2e64 6522 2022 4461 7272 656c 2053 6368 .de" "Darrel Sch │ │ │ -00012720: 6e65 6964 6572 2220 2264 6172 7265 6c40 neider" "darrel@ │ │ │ -00012730: 736c 632e 636f 6d22 2022 4861 7964 656e slc.com" "Hayden │ │ │ -00012740: 2053 6368 756c 747a 2220 2268 6179 6465 Schultz" "hayde │ │ │ -00012750: 6e73 406c 6c2e 6d69 742e 6564 7522 2022 ns@ll.mit.edu" " │ │ │ -00012760: 436f 7474 6f6e 2053 6565 6422 2022 636f Cotton Seed" "co │ │ │ -00012770: 7474 6f6e 7340 6379 6265 7263 6f6d 2e6e ttons@cybercom.n │ │ │ -00012780: 6574 2220 2241 7865 6c20 5365 6962 6572 et" "Axel Seiber │ │ │ -00012790: 7422 2022 7365 6962 6572 7461 4069 6e66 t" "seiberta@inf │ │ │ -000127a0: 6f72 6d61 7469 6b2e 7475 2d6d 7565 6e63 ormatik.tu-muenc │ │ │ -000127b0: 6865 6e2e 6465 2220 224f 6464 2d4d 6167 hen.de" "Odd-Mag │ │ │ -000127c0: 6e65 2053 656b 6b69 6e67 7374 6164 2220 ne Sekkingstad" │ │ │ -000127d0: 226f 6464 6d73 4069 692e 7569 622e 6e6f "oddms@ii.uib.no │ │ │ -000127e0: 2220 2247 7265 676f 7279 204e 6569 6c20 " "Gregory Neil │ │ │ -000127f0: 5368 6170 6972 6f22 2022 6773 6861 7069 Shapiro" "gshapi │ │ │ -00012800: 726f 4073 656e 646d 6169 6c2e 6f72 6722 ro@sendmail.org" │ │ │ -00012810: 2022 4a75 7374 696e 2053 6865 6568 7922 "Justin Sheehy" │ │ │ -00012820: 2022 6a75 7374 696e 406c 696e 7573 2e6d "justin@linus.m │ │ │ -00012830: 6974 7265 2e6f 7267 2220 224a 6f68 6e20 itre.org" "John │ │ │ -00012840: 5368 656e 2220 227a 6673 3630 4063 6173 Shen" "zfs60@cas │ │ │ -00012850: 2e6f 7267 2220 224d 7572 6174 6120 5368 .org" "Murata Sh │ │ │ -00012860: 7575 6963 6869 726f 7522 2022 6d72 7440 uuichirou" "mrt@ │ │ │ -00012870: 6d69 636b 6579 2e61 692e 6b79 7574 6563 mickey.ai.kyutec │ │ │ -00012880: 682e 6163 2e6a 7022 2022 4d61 7474 2053 h.ac.jp" "Matt S │ │ │ -00012890: 696d 6d6f 6e73 2220 2273 696d 6d6f 6e6d immons" "simmonm │ │ │ -000128a0: 7440 6163 6d2e 6f72 6722 2022 4469 6e65 t@acm.org" "Dine │ │ │ -000128b0: 7368 2053 6f6d 6173 656b 6861 7222 2022 sh Somasekhar" " │ │ │ -000128c0: 736f 6d61 7365 6b68 4065 636e 2e70 7572 somasekh@ecn.pur │ │ │ -000128d0: 6475 652e 6564 7522 2022 4a65 6666 7265 due.edu" "Jeffre │ │ │ -000128e0: 7920 5370 6172 6b65 7322 2022 6a73 7061 y Sparkes" "jspa │ │ │ -000128f0: 726b 6573 4062 6e72 2e63 6122 2022 4d61 rkes@bnr.ca" "Ma │ │ │ -00012900: 6e6f 6a20 5372 6976 6173 7461 7661 2220 noj Srivastava" │ │ │ -00012910: 2273 7269 7661 7374 6140 7069 6c67 7269 "srivasta@pilgri │ │ │ -00012920: 6d2e 756d 6173 732e 6564 7522 2022 4672 m.umass.edu" "Fr │ │ │ -00012930: 616e 636f 6973 2053 7461 6573 2220 2266 ancois Staes" "f │ │ │ -00012940: 7261 6e73 406b 6977 692e 7569 612e 6163 rans@kiwi.uia.ac │ │ │ -00012950: 2e62 6522 2022 416e 6465 7273 2053 7465 .be" "Anders Ste │ │ │ -00012960: 6e6d 616e 2220 2273 7465 6e6d 616e 4069 nman" "stenman@i │ │ │ -00012970: 7379 2e6c 6975 2e73 6522 2022 4a61 736f sy.liu.se" "Jaso │ │ │ -00012980: 6e20 5374 6577 6172 7422 2022 6a61 736f n Stewart" "jaso │ │ │ -00012990: 6e73 4063 732e 756e 6d2e 6564 7522 2022 ns@cs.unm.edu" " │ │ │ -000129a0: 5269 636b 2054 6169 7422 2022 7269 636b Rick Tait" "rick │ │ │ -000129b0: 7440 676e 752e 6169 2e6d 6974 2e65 6475 t@gnu.ai.mit.edu │ │ │ -000129c0: 2220 2254 414e 414b 4120 4861 7961 7368 " "TANAKA Hayash │ │ │ -000129d0: 6922 2022 7461 6e61 6b61 6840 6d78 612e i" "tanakah@mxa. │ │ │ -000129e0: 6d65 7368 2e6e 652e 6a70 2220 2253 616d mesh.ne.jp" "Sam │ │ │ -000129f0: 7565 6c20 5461 7264 6965 7522 2022 7361 uel Tardieu" "sa │ │ │ -00012a00: 6d40 696e 662e 656e 7374 2e66 7222 2022 m@inf.enst.fr" " │ │ │ -00012a10: 4a61 6d65 7320 5468 6f6d 7073 6f6e 2220 James Thompson" │ │ │ -00012a20: 2274 686f 6d70 736f 6e40 7767 322e 7761 "thompson@wg2.wa │ │ │ -00012a30: 6969 2e63 6f6d 2220 224e 6f62 7520 546f ii.com" "Nobu To │ │ │ -00012a40: 6765 2220 2274 6f67 6540 6163 6361 6431 ge" "toge@accad1 │ │ │ -00012a50: 2e6b 656b 2e6a 7022 2022 5261 796d 6f6e .kek.jp" "Raymon │ │ │ -00012a60: 6420 4c2e 2054 6f79 2220 2274 6f79 4072 d L. Toy" "toy@r │ │ │ -00012a70: 7470 2e65 7269 6373 736f 6e2e 7365 2220 tp.ericsson.se" │ │ │ -00012a80: 2252 656d 656b 2054 727a 6173 6b61 2220 "Remek Trzaska" │ │ │ -00012a90: 2272 656d 656b 406e 7061 632e 7379 722e "remek@npac.syr. │ │ │ -00012aa0: 6564 7522 2022 5453 5554 4f4d 5520 4e61 edu" "TSUTOMU Na │ │ │ -00012ab0: 6b61 6d75 7261 2220 2274 7375 746f 6d75 kamura" "tsutomu │ │ │ -00012ac0: 4072 732e 6b79 6f74 6f2e 6f6d 726f 6e73 @rs.kyoto.omrons │ │ │ -00012ad0: 6f66 742e 636f 2e6a 7022 2022 5374 6566 oft.co.jp" "Stef │ │ │ -00012ae0: 616e 6965 2054 6575 6665 6c22 2022 732e anie Teufel" "s. │ │ │ -00012af0: 7465 7566 656c 406e 6468 2e6e 6574 2220 teufel@ndh.net" │ │ │ -00012b00: 2247 6172 7920 5468 6f6d 6173 2220 2267 "Gary Thomas" "g │ │ │ -00012b10: 2e74 686f 6d61 7340 6f70 656e 6772 6f75 .thomas@opengrou │ │ │ -00012b20: 702e 6f72 6722 2022 4a6f 686e 2054 7572 p.org" "John Tur │ │ │ -00012b30: 6e65 7222 2022 7475 726e 6572 4078 6469 ner" "turner@xdi │ │ │ -00012b40: 762e 6c61 6e6c 2e67 6f76 2220 2255 454e v.lanl.gov" "UEN │ │ │ -00012b50: 4f20 4675 6d69 6869 726f 2220 2237 6d32 O Fumihiro" "7m2 │ │ │ -00012b60: 7665 6a40 7269 7470 2e79 652e 4948 492e vej@ritp.ye.IHI. │ │ │ -00012b70: 434f 2e4a 5022 2022 416b 6920 5665 6874 CO.JP" "Aki Veht │ │ │ -00012b80: 6172 6922 2022 416b 692e 5665 6874 6172 ari" "Aki.Vehtar │ │ │ -00012b90: 6940 6875 742e 6669 2220 224a 7561 6e20 i@hut.fi" "Juan │ │ │ -00012ba0: 452e 2056 696c 6c61 6369 7322 2022 6a76 E. Villacis" "jv │ │ │ -00012bb0: 696c 6c61 6369 4063 732e 696e 6469 616e illaci@cs.indian │ │ │ -00012bc0: 612e 6564 7522 2022 566c 6164 696d 6972 a.edu" "Vladimir │ │ │ -00012bd0: 2056 756b 6963 6576 6963 2220 2276 6c61 Vukicevic" "vla │ │ │ -00012be0: 6469 6d69 7240 696e 7472 6570 6964 2e63 dimir@intrepid.c │ │ │ -00012bf0: 6f6d 2220 2244 6176 6964 2057 616c 7465 om" "David Walte │ │ │ -00012c00: 2220 2264 6a77 3138 4063 6f72 6e65 6c6c " "djw18@cornell │ │ │ -00012c10: 2e65 6475 2220 2250 6574 6572 2057 6172 .edu" "Peter War │ │ │ -00012c20: 6522 2022 7761 7265 4063 6973 2e6f 6869 e" "ware@cis.ohi │ │ │ -00012c30: 6f2d 7374 6174 652e 6564 7522 2022 4368 o-state.edu" "Ch │ │ │ -00012c40: 7269 7374 6f70 6820 5765 646c 6572 2220 ristoph Wedler" │ │ │ -00012c50: 2277 6564 6c65 7240 666d 692e 756e 692d "wedler@fmi.uni- │ │ │ -00012c60: 7061 7373 6175 2e64 6522 2022 596f 6176 passau.de" "Yoav │ │ │ -00012c70: 2057 6569 7373 2220 2279 6f61 7640 7a65 Weiss" "yoav@ze │ │ │ -00012c80: 7573 2e64 6174 6173 7276 2e63 6f2e 696c us.datasrv.co.il │ │ │ -00012c90: 2220 2250 6574 6572 2042 2e20 5765 7374 " "Peter B. West │ │ │ -00012ca0: 2220 2270 2e77 6573 7440 7571 2e6e 6574 " "p.west@uq.net │ │ │ -00012cb0: 2e61 7522 2022 526f 6420 5768 6974 6279 .au" "Rod Whitby │ │ │ -00012cc0: 2220 2272 7768 6974 6279 4061 7363 2e63 " "rwhitby@asc.c │ │ │ -00012cd0: 6f72 702e 6d6f 742e 636f 6d22 2022 5269 orp.mot.com" "Ri │ │ │ -00012ce0: 6368 2057 696c 6c69 616d 7322 2022 7264 ch Williams" "rd │ │ │ -00012cf0: 7740 6870 6c62 2e68 706c 2e68 702e 636f w@hplb.hpl.hp.co │ │ │ -00012d00: 6d22 2022 5261 796d 6f6e 6420 5769 6b65 m" "Raymond Wike │ │ │ -00012d10: 7222 2022 7261 796d 6f6e 6440 6f72 696f r" "raymond@orio │ │ │ -00012d20: 6e2e 6e6f 2220 2250 6574 6572 2057 696e n.no" "Peter Win │ │ │ -00012d30: 646c 6522 2022 7065 7465 7277 4053 444c dle" "peterw@SDL │ │ │ -00012d40: 2e55 472e 4544 532e 434f 4d22 2022 4461 .UG.EDS.COM" "Da │ │ │ -00012d50: 7669 6420 4320 576f 7265 6e6b 6c65 696e vid C Worenklein │ │ │ -00012d60: 2220 2264 6377 4067 636d 2e63 6f6d 2220 " "dcw@gcm.com" │ │ │ -00012d70: 2254 616b 6573 6869 2059 616d 6164 6122 "Takeshi Yamada" │ │ │ -00012d80: 2022 7961 6d61 6461 4073 796c 7669 652e "yamada@sylvie. │ │ │ -00012d90: 6b65 636c 2e6e 7474 2e6a 7022 2022 4b61 kecl.ntt.jp" "Ka │ │ │ -00012da0: 7473 756d 6920 5961 6d61 6f6b 6122 2022 tsumi Yamaoka" " │ │ │ -00012db0: 7961 6d61 6f6b 6140 6761 2e73 6f6e 792e yamaoka@ga.sony. │ │ │ -00012dc0: 636f 2e6a 7022 2022 4a61 736f 6e20 5961 co.jp" "Jason Ya │ │ │ -00012dd0: 6e6f 7769 747a 2220 2279 616e 6f77 6974 nowitz" "yanowit │ │ │ -00012de0: 7a40 6574 6572 6e69 7479 2e63 732e 756d z@eternity.cs.um │ │ │ -00012df0: 6173 732e 6564 7522 2022 4c61 204d 6f6e ass.edu" "La Mon │ │ │ -00012e00: 7465 2059 6172 726f 6c6c 2220 2270 6967 te Yarroll" "pig │ │ │ -00012e10: 6779 4068 696c 6265 7274 2e6d 6174 6873 gy@hilbert.maths │ │ │ -00012e20: 2e75 7461 732e 6564 752e 6175 2220 2242 .utas.edu.au" "B │ │ │ -00012e30: 6c61 6972 205a 616a 6163 2220 2262 6c61 lair Zajac" "bla │ │ │ -00012e40: 6972 406f 6c79 6d70 6961 2e67 7073 2e63 ir@olympia.gps.c │ │ │ -00012e50: 616c 7465 6368 2e65 6475 2220 2256 6f6c altech.edu" "Vol │ │ │ -00012e60: 6b65 7220 5a65 6c6c 2220 2264 722e 766f ker Zell" "dr.vo │ │ │ -00012e70: 6c6b 6572 2e7a 656c 6c40 6f72 6163 6c65 lker.zell@oracle │ │ │ -00012e80: 2e63 6f6d 2220 2244 616e 6965 6c20 5a69 .com" "Daniel Zi │ │ │ -00012e90: 766b 6f76 6963 2220 2264 616e 6965 6c40 vkovic" "daniel@ │ │ │ -00012ea0: 6361 6e61 6461 2e73 756e 2e63 6f6d 2220 canada.sun.com" │ │ │ -00012eb0: 224b 6172 656c 205a 7569 6465 7276 656c "Karel Zuidervel │ │ │ -00012ec0: 6422 2022 4b61 7265 6c2e 5a75 6964 6572 d" "Karel.Zuider │ │ │ -00012ed0: 7665 6c64 4063 762e 7275 752e 6e6c 2220 veld@cv.ruu.nl" │ │ │ -00012ee0: 6162 6f75 742d 6669 6e69 7368 2d62 7566 about-finish-buf │ │ │ -00012ef0: 6665 725d 2036 5d29 0a fer] 6]). │ │ │ +0000b730: 2050 2e20 4761 6272 6965 6c5c 6e22 2074 P. Gabriel\n" t │ │ │ +0000b740: 6f6d 6f6e 6f72 6920 7475 636b 2074 7572 omonori tuck tur │ │ │ +0000b750: 6e62 756c 6c20 2253 7465 7068 656e 206c nbull "Stephen l │ │ │ +0000b760: 6976 6573 2077 6974 6820 6869 7320 4a61 ives with his Ja │ │ │ +0000b770: 7061 6e65 7365 2077 6966 6520 616e 6420 panese wife and │ │ │ +0000b780: 6368 696c 6472 656e 2069 6e20 5473 756b children in Tsuk │ │ │ +0000b790: 7562 612c 204a 6170 616e 2c5c 6e77 6865 uba, Japan,\nwhe │ │ │ +0000b7a0: 7265 2068 6520 6973 2061 2070 726f 6665 re he is a profe │ │ │ +0000b7b0: 7373 6f72 206f 6620 6563 6f6e 6f6d 6963 ssor of economic │ │ │ +0000b7c0: 7320 6174 2074 6865 2055 6e69 7665 7273 s at the Univers │ │ │ +0000b7d0: 6974 7920 6f66 2054 7375 6b75 6261 2e5c ity of Tsukuba.\ │ │ │ +0000b7e0: 6e22 2076 696e 2022 4927 6d20 6120 736f n" vin "I'm a so │ │ │ +0000b7f0: 6674 7761 7265 2065 6e67 696e 6565 7220 ftware engineer │ │ │ +0000b800: 616e 6420 6d61 6e61 6765 7220 666f 7220 and manager for │ │ │ +0000b810: 4164 6170 7469 7665 204f 7074 6963 7320 Adaptive Optics │ │ │ +0000b820: 4173 736f 6369 6174 6573 5c6e 696e 2043 Associates\nin C │ │ │ +0000b830: 616d 6272 6964 6765 2c20 4d61 7373 6163 ambridge, Massac │ │ │ +0000b840: 6875 7365 7474 732e 2020 4920 7573 6564 husetts. I used │ │ │ +0000b850: 2074 6f20 706c 6179 2061 206c 6f74 206f to play a lot o │ │ │ +0000b860: 6620 556c 7469 6d61 7465 2028 7365 655c f Ultimate (see\ │ │ │ +0000b870: 6e22 2022 5669 7369 7420 7468 6520 556c n" "Visit the Ul │ │ │ +0000b880: 7469 6d61 7465 2050 6c61 7965 7273 2041 timate Players A │ │ │ +0000b890: 7373 6f63 6961 7469 6f6e 2068 6f6d 6570 ssociation homep │ │ │ +0000b8a0: 6167 6522 2022 2066 6f72 206d 6f72 6520 age" " for more │ │ │ +0000b8b0: 6465 7461 696c 7329 2c20 6275 7420 4920 details), but I │ │ │ +0000b8c0: 646f 6e27 7420 6861 7665 2074 696d 6520 don't have time │ │ │ +0000b8d0: 746f 5c6e 706c 6179 206d 7563 6820 616e to\nplay much an │ │ │ +0000b8e0: 7920 6d6f 7265 2e20 204e 6f77 6164 6179 y more. Nowaday │ │ │ +0000b8f0: 7320 4927 6d20 6120 6661 6d69 6c79 206d s I'm a family m │ │ │ +0000b900: 616e 2c20 736f 2049 2073 7065 6e64 206d an, so I spend m │ │ │ +0000b910: 6f73 7420 6f66 5c6e 6d79 2074 696d 6520 ost of\nmy time │ │ │ +0000b920: 7769 7468 206d 7920 7769 6665 2c20 4265 with my wife, Be │ │ │ +0000b930: 636b 792c 2061 6e64 206f 7572 2073 6f6e cky, and our son │ │ │ +0000b940: 732c 204e 6f61 6820 616e 6420 4672 616e s, Noah and Fran │ │ │ +0000b950: 6369 7363 6f2e 5c6e 2220 766c 6164 696d cisco.\n" vladim │ │ │ +0000b960: 6972 2022 466f 726d 6572 2074 6563 686e ir "Former techn │ │ │ +0000b970: 6963 616c 206c 6561 6420 666f 7220 5845 ical lead for XE │ │ │ +0000b980: 6d61 6373 2061 7420 5375 6e2e 2020 4865 macs at Sun. He │ │ │ +0000b990: 2069 7320 6e6f 7720 7772 6974 696e 6720 is now writing │ │ │ +0000b9a0: 6120 626f 6f6b 206f 6e5c 6e64 6973 7472 a book on\ndistr │ │ │ +0000b9b0: 6962 7574 6564 204a 6176 6120 616e 6420 ibuted Java and │ │ │ +0000b9c0: 6973 2077 6f72 6b69 6e67 2061 7420 5865 is working at Xe │ │ │ +0000b9d0: 726f 7820 5041 5243 2064 6f63 756d 656e rox PARC documen │ │ │ +0000b9e0: 7469 6e67 2041 7370 6563 744a 2c20 615c ting AspectJ, a\ │ │ │ +0000b9f0: 6e6c 6967 6874 2d77 6569 6768 7420 6578 nlight-weight ex │ │ │ +0000ba00: 7465 6e73 696f 6e20 746f 204a 6176 6120 tension to Java │ │ │ +0000ba10: 7468 6174 2073 7570 706f 7274 7320 6372 that supports cr │ │ │ +0000ba20: 6f73 7363 7574 7469 6e67 2063 6f6e 6365 osscutting conce │ │ │ +0000ba30: 726e 732e 5c6e 5365 6520 2220 2256 6973 rns.\nSee " "Vis │ │ │ +0000ba40: 6974 2056 6c61 6469 6d69 7227 7320 686f it Vladimir's ho │ │ │ +0000ba50: 6d65 2070 6167 6522 2077 6d70 6572 7279 me page" wmperry │ │ │ +0000ba60: 2022 4861 7070 696c 7920 6c69 7669 6e67 "Happily living │ │ │ +0000ba70: 2069 6e20 496e 6469 616e 6120 7465 6c65 in Indiana tele │ │ │ +0000ba80: 636f 6d6d 7574 696e 6720 666f 7220 6120 commuting for a │ │ │ +0000ba90: 636f 6d70 616e 7920 6261 7365 6420 696e company based in │ │ │ +0000baa0: 2053 6561 7474 6c65 5c6e 2877 686f 2049 Seattle\n(who I │ │ │ +0000bab0: 206e 6f77 2070 7265 6665 7220 6e6f 7420 now prefer not │ │ │ +0000bac0: 746f 206e 616d 6529 2c20 7769 7368 696e to name), wishin │ │ │ +0000bad0: 6720 4920 7761 7320 696e 2049 7265 6c61 g I was in Irela │ │ │ +0000bae0: 6e64 2069 6e73 7465 6164 2e5c 6e22 2079 nd instead.\n" y │ │ │ +0000baf0: 6f73 6869 6b69 2079 6f75 6e67 7320 2249 oshiki youngs "I │ │ │ +0000bb00: 206c 6976 6520 696e 2042 7269 7362 616e live in Brisban │ │ │ +0000bb10: 652c 2041 7573 7472 616c 6961 2077 6974 e, Australia wit │ │ │ +0000bb20: 6820 6d79 2077 6966 652c 204d 6963 6865 h my wife, Miche │ │ │ +0000bb30: 6c6c 6520 616e 6420 6f75 7220 6461 7567 lle and our daug │ │ │ +0000bb40: 6874 6572 2c5c 6e4b 6169 746c 796e 2e20 hter,\nKaitlyn. │ │ │ +0000bb50: 2049 2776 6520 6f6e 6c79 2062 6565 6e20 I've only been │ │ │ +0000bb60: 6861 636b 696e 6720 5845 6d61 6373 2066 hacking XEmacs f │ │ │ +0000bb70: 6f72 2061 2073 686f 7274 2074 696d 6520 or a short time │ │ │ +0000bb80: 2861 7070 726f 7820 3138 5c6e 6d74 6873 (approx 18\nmths │ │ │ +0000bb90: 292c 2062 7574 2049 2776 6520 6265 656e ), but I've been │ │ │ +0000bba0: 2066 6f6f 6c69 6e67 2061 726f 756e 6420 fooling around │ │ │ +0000bbb0: 7769 7468 2063 6f6d 7075 7465 7273 2073 with computers s │ │ │ +0000bbc0: 696e 6365 2074 6865 2065 6172 6c79 5c6e ince the early\n │ │ │ +0000bbd0: 3830 2773 2e5c 6e5c 6e49 6e20 7468 6520 80's.\n\nIn the │ │ │ +0000bbe0: 7061 7374 2c20 4927 7665 2062 6565 6e20 past, I've been │ │ │ +0000bbf0: 6120 6261 6e6b 206f 6666 6963 6572 2c20 a bank officer, │ │ │ +0000bc00: 6361 7220 7361 6c65 736d 616e 2c20 696e car salesman, in │ │ │ +0000bc10: 7375 7261 6e63 6520 6167 656e 742c 5c6e surance agent,\n │ │ │ +0000bc20: 6d61 6e61 6765 6420 6120 636f 6d70 7574 managed a comput │ │ │ +0000bc30: 6572 2066 6972 6d20 616e 6420 6f77 6e65 er firm and owne │ │ │ +0000bc40: 6420 616e 6420 6f70 6572 6174 6564 206d d and operated m │ │ │ +0000bc50: 7920 6f77 6e20 6275 7369 6e65 7373 2e20 y own business. │ │ │ +0000bc60: 2049 206e 6f77 5c6e 6469 7669 6465 206d I now\ndivide m │ │ │ +0000bc70: 7920 7469 6d65 2062 6574 7765 656e 206d y time between m │ │ │ +0000bc80: 7920 6661 6d69 6c79 2c20 706c 616e 6e69 y family, planni │ │ │ +0000bc90: 6e67 206d 7920 6e65 7874 2062 7573 696e ng my next busin │ │ │ +0000bca0: 6573 7320 6964 6561 2028 615c 6e63 6f6d ess idea (a\ncom │ │ │ +0000bcb0: 7075 7465 7220 636f 6e73 756c 7469 6e67 puter consulting │ │ │ +0000bcc0: 2066 6972 6d20 7468 6174 2075 7365 7320 firm that uses │ │ │ +0000bcd0: 7a65 726f 204d 6963 726f 736f 6674 2070 zero Microsoft p │ │ │ +0000bce0: 726f 6475 6374 7329 2c20 6c6f 6f6b 696e roducts), lookin │ │ │ +0000bcf0: 675c 6e61 6674 6572 2074 6865 2058 456d g\nafter the XEm │ │ │ +0000bd00: 6163 7320 5061 636b 6167 6573 2061 6e64 acs Packages and │ │ │ +0000bd10: 2068 6163 6b69 6e67 206d 7920 6f77 6e20 hacking my own │ │ │ +0000bd20: 5845 6d61 6373 2070 6163 6b61 6765 2c20 XEmacs package, │ │ │ +0000bd30: 4569 6371 2e5c 6e5c 6e09 5365 653a 2022 Eicq.\n\n.See: " │ │ │ +0000bd40: 2022 5669 7369 7420 7468 6520 4569 6371 "Visit the Eicq │ │ │ +0000bd50: 2068 6f6d 6570 6167 6522 2065 7272 6f72 homepage" error │ │ │ +0000bd60: 2022 6563 6173 6520 6661 696c 6564 3a20 "ecase failed: │ │ │ +0000bd70: 2573 2c20 2573 2220 2861 6472 6961 6e20 %s, %s" (adrian │ │ │ +0000bd80: 616a 2061 6a63 2061 6c61 7374 6169 7220 aj ajc alastair │ │ │ +0000bd90: 6261 7720 6265 6e20 6277 2063 6777 2063 baw ben bw cgw c │ │ │ +0000bda0: 6872 2063 7261 6967 2063 7468 6f6d 7020 hr craig cthomp │ │ │ +0000bdb0: 6461 696b 6920 6461 6e20 6461 7272 796c daiki dan darryl │ │ │ +0000bdc0: 6f20 6465 7669 6e20 646b 696e 6472 6564 o devin dkindred │ │ │ +0000bdd0: 2064 6d6f 6f72 6520 6469 6469 6572 2065 dmoore didier e │ │ │ +0000bde0: 6220 6661 6272 6963 6520 676f 6c75 6265 b fabrice golube │ │ │ +0000bdf0: 7620 6775 6e6e 6172 2068 6273 2068 6973 v gunnar hbs his │ │ │ +0000be00: 6173 6869 2068 6d75 6c6c 6572 2068 6e69 ashi hmuller hni │ │ │ +0000be10: 6b73 6963 2068 6f62 6c65 7920 6a61 6e20 ksic hobley jan │ │ │ +0000be20: 6a61 7320 6a61 7265 7468 206a 6173 6f6e jas jareth jason │ │ │ +0000be30: 206a 656e 7320 6a6d 696c 6c65 7220 6a6f jens jmiller jo │ │ │ +0000be40: 6e61 7468 616e 206a 7568 7020 6a77 7a20 nathan juhp jwz │ │ │ +0000be50: 6b61 7a7a 206b 6972 696c 6c20 6b79 6c65 kazz kirill kyle │ │ │ +0000be60: 206c 6172 7369 206d 6172 6370 6120 6d61 larsi marcpa ma │ │ │ +0000be70: 7274 696e 206d 636f 6f6b 206d 6c79 206d rtin mcook mly m │ │ │ +0000be80: 6f72 696f 6b61 206d 7461 206f 6772 6166 orioka mta ograf │ │ │ +0000be90: 206f 6c69 7669 6572 206f 7363 6172 2070 olivier oscar p │ │ │ +0000bea0: 656c 6567 7269 2070 657a 2070 6970 6572 elegri pez piper │ │ │ +0000beb0: 2070 6974 746d 616e 2072 6963 6b63 2072 pittman rickc r │ │ │ +0000bec0: 6f73 6520 726f 7373 696e 6920 736c 6220 ose rossini slb │ │ │ +0000bed0: 7370 6572 6265 7220 7374 6967 2073 7469 sperber stig sti │ │ │ +0000bee0: 6762 2074 6869 6573 7365 6c20 746f 6d6f gb thiessel tomo │ │ │ +0000bef0: 6e6f 7269 2074 7563 6b20 7475 726e 6275 nori tuck turnbu │ │ │ +0000bf00: 6c6c 2076 696e 2076 6c61 6469 6d69 7220 ll vin vladimir │ │ │ +0000bf10: 776d 7065 7272 7920 796f 7368 696b 6920 wmperry yoshiki │ │ │ +0000bf20: 796f 756e 6773 295d 2035 5d29 0a28 6465 youngs)] 5]).(de │ │ │ +0000bf30: 6661 6c69 6173 2027 6162 6f75 742d 6861 falias 'about-ha │ │ │ +0000bf40: 636b 6572 2d63 6f6e 7472 6962 7574 696f cker-contributio │ │ │ +0000bf50: 6e20 235b 2865 6e74 7279 2920 2208 40c1 n #[(entry) ".@. │ │ │ +0000bf60: 61ab 84c2 c321 8708 40c4 61ab 84c2 c521 a....!..@.a....! │ │ │ +0000bf70: 8708 40c6 61ab 84c2 c721 8708 40c8 61ab ..@.a....!..@.a. │ │ │ +0000bf80: 84c2 c921 8708 40ca 61ab 98c2 cb21 88cc ...!..@.a....!.. │ │ │ +0000bf90: cdce cf23 88c2 d021 88cc d1d2 d323 88c2 ...#...!.....#.. │ │ │ +0000bfa0: d421 8708 40d5 61ab 84c2 d621 8708 40d7 .!..@.a....!..@. │ │ │ +0000bfb0: 61ab 8ec2 d821 88cc d9d2 da23 88c2 d421 a....!.....#...! │ │ │ +0000bfc0: 8708 40db 61ab 84c2 dc21 8708 40dd 61ab ..@.a....!..@.a. │ │ │ +0000bfd0: 84c2 de21 8708 40df 61ab 84c2 e021 8708 ...!..@.a....!.. │ │ │ +0000bfe0: 40e1 61ab 84c2 e221 8708 40e3 61ab 84c2 @.a....!..@.a... │ │ │ +0000bff0: e021 8708 40e4 61ab 84c2 e021 8708 40e5 .!..@.a....!..@. │ │ │ +0000c000: 61ab 84c2 e021 8708 40e6 61ab 84c2 e721 a....!..@.a....! │ │ │ +0000c010: 8708 40e8 61ab 84c2 e921 8708 40ea 61ab ..@.a....!..@.a. │ │ │ +0000c020: 84c2 eb21 8708 40ec 61ab 84c2 ed21 8708 ...!..@.a....!.. │ │ │ +0000c030: 40ee 61ab 84c2 ef21 8708 40f0 61ab 84c2 @.a....!..@.a... │ │ │ +0000c040: f121 8708 40f2 61ab 84c2 f321 8708 40f4 .!..@.a....!..@. │ │ │ +0000c050: 61ab 84c2 e021 8708 40f5 61ab 84c2 f621 a....!..@.a....! │ │ │ +0000c060: 8708 40f7 61ab 84c2 e021 8708 40f8 61ab ..@.a....!..@.a. │ │ │ +0000c070: 84c2 f921 8708 40fa 61ab 84c2 fb21 8708 ...!..@.a....!.. │ │ │ +0000c080: 40fc 61ab 84c2 fd21 8708 40fe 61ab 84c2 @.a....!..@.a... │ │ │ +0000c090: ff21 8708 4081 4000 61ab 86c2 8141 0021 .!..@.@.a....A.! │ │ │ +0000c0a0: 8708 4081 4200 61ab 86c2 8143 0021 8708 ..@.B.a....C.!.. │ │ │ +0000c0b0: 4081 4400 61ab 86c2 8145 0021 8708 4081 @.D.a....E.!..@. │ │ │ +0000c0c0: 4600 61ab 86c2 8147 0021 8708 4081 4800 F.a....G.!..@.H. │ │ │ +0000c0d0: 61ab 86c2 8149 0021 8708 4081 4a00 61ab a....I.!..@.J.a. │ │ │ +0000c0e0: 86c2 814b 0021 8708 4081 4c00 61ab 86c2 ...K.!..@.L.a... │ │ │ +0000c0f0: 814d 0021 8708 4081 4e00 61ab 86c2 814f .M.!..@.N.a....O │ │ │ +0000c100: 0021 8708 4081 5000 61ab 86c2 8151 0021 .!..@.P.a....Q.! │ │ │ +0000c110: 8708 4081 5200 61ab 86c2 8153 0021 8708 ..@.R.a....S.!.. │ │ │ +0000c120: 4081 5400 61ab 86c2 8155 0021 8708 4081 @.T.a....U.!..@. │ │ │ +0000c130: 5600 61ab 86c2 8157 0021 8708 4081 5800 V.a....W.!..@.X. │ │ │ +0000c140: 61ab 84c2 e021 8708 4081 5900 61ab 86c2 a....!..@.Y.a... │ │ │ +0000c150: 815a 0021 8708 4081 5b00 61ab 86c2 815c .Z.!..@.[.a....\ │ │ │ +0000c160: 5c00 2187 0840 815d 0061 ab86 c281 5e00 \.!..@.].a....^. │ │ │ +0000c170: 2187 0840 815f 0061 ab86 c281 6000 2187 !..@._.a....`.!. │ │ │ +0000c180: 0840 8161 0061 ab86 c281 6200 2187 0840 .@.a.a....b.!..@ │ │ │ +0000c190: 8163 0061 ab86 c281 6400 2187 0840 8165 .c.a....d.!..@.e │ │ │ +0000c1a0: 0061 ab86 c281 6600 2187 0840 8167 0061 .a....f.!..@.g.a │ │ │ +0000c1b0: ab86 c281 6800 2187 0840 8169 0061 ab86 ....h.!..@.i.a.. │ │ │ +0000c1c0: c281 6a00 2187 0840 816b 0061 ab86 c281 ..j.!..@.k.a.... │ │ │ +0000c1d0: 6c00 2187 0840 816d 0061 ab86 c281 6e00 l.!..@.m.a....n. │ │ │ +0000c1e0: 2187 0840 816f 0061 ab84 c2e0 2187 0840 !..@.o.a....!..@ │ │ │ +0000c1f0: 8170 0061 ab86 c281 7100 2187 0840 8172 .p.a....q.!..@.r │ │ │ +0000c200: 0061 ab86 c281 7300 2187 0840 8174 0061 .a....s.!..@.t.a │ │ │ +0000c210: ab86 c281 7500 2187 0840 8176 0061 ab86 ....u.!..@.v.a.. │ │ │ +0000c220: c281 7700 2187 0840 8178 0061 ab86 c281 ..w.!..@.x.a.... │ │ │ +0000c230: 7900 2187 0840 817a 0061 ab86 c281 7b00 y.!..@.z.a....{. │ │ │ +0000c240: 2187 0840 817c 0061 ab86 c281 7d00 2187 !..@.|.a....}.!. │ │ │ +0000c250: 0840 817e 0061 ab86 c281 7f00 2187 0840 .@.~.a......!..@ │ │ │ +0000c260: 8180 0061 ab84 c2e0 2187 0840 8181 0061 ...a....!..@...a │ │ │ +0000c270: ab84 c2e0 2187 0840 8182 0061 ab86 c281 ....!..@...a.... │ │ │ +0000c280: 8300 2187 0840 8184 0061 ab86 c281 8500 ..!..@...a...... │ │ │ +0000c290: 2187 0840 8186 0061 ab86 c281 8700 2187 !..@...a......!. │ │ │ +0000c2a0: 0840 8188 0061 ab86 c281 8900 2187 0840 .@...a......!..@ │ │ │ +0000c2b0: 818a 0061 ab84 c2e0 2187 0840 818b 0061 ...a....!..@...a │ │ │ +0000c2c0: ab86 c281 8c00 2187 818d 0081 8e00 0840 ......!........@ │ │ │ +0000c2d0: 818f 0023 88d2 8722 205b 656e 7472 7920 ...#..." [entry │ │ │ +0000c2e0: 6164 7269 616e 2077 6964 6765 742d 696e adrian widget-in │ │ │ +0000c2f0: 7365 7274 2022 4164 7269 616e 2068 6173 sert "Adrian has │ │ │ +0000c300: 2064 6f6e 6520 696e 7661 6c75 6162 6c65 done invaluable │ │ │ +0000c310: 2077 6f72 6b20 7265 7772 6974 696e 6720 work rewriting │ │ │ +0000c320: 616e 6420 6d61 696e 7461 696e 696e 6720 and maintaining │ │ │ +0000c330: 7468 6520 5845 6d61 6373 5c6e 7765 6220 the XEmacs\nweb │ │ │ +0000c340: 7061 6765 7320 6174 2077 7777 2e78 656d pages at www.xem │ │ │ +0000c350: 6163 732e 6f72 672e 2020 4475 7269 6e67 acs.org. During │ │ │ +0000c360: 2068 6973 2074 656e 7572 6573 6869 702c his tenureship, │ │ │ +0000c370: 2068 6520 6861 735c 6e65 7374 6162 6c69 he has\nestabli │ │ │ +0000c380: 7368 6564 2061 2063 6f6e 7369 7374 656e shed a consisten │ │ │ +0000c390: 7420 6c6f 6f6b 2061 6e64 2066 6565 6c2c t look and feel, │ │ │ +0000c3a0: 2070 6c61 6365 6420 7468 6520 7765 6220 placed the web │ │ │ +0000c3b0: 7061 6765 7320 756e 6465 725c 6e43 5653 pages under\nCVS │ │ │ +0000c3c0: 2c20 7365 7420 7570 206d 6169 6e74 656e , set up mainten │ │ │ +0000c3d0: 616e 6365 2070 726f 6365 6475 7265 732c ance procedures, │ │ │ +0000c3e0: 2077 7269 7474 656e 2073 6372 6970 7473 written scripts │ │ │ +0000c3f0: 2074 6f20 6861 6e64 6c65 5c6e 6175 746f to handle\nauto │ │ │ +0000c400: 6d61 7469 6320 7570 6461 7469 6e67 2c20 matic updating, │ │ │ +0000c410: 7661 6c69 6461 7469 6f6e 2061 6e64 206d validation and m │ │ │ +0000c420: 6972 726f 7269 6e67 2c20 616e 6420 646f irroring, and do │ │ │ +0000c430: 6e65 2069 6e6e 756d 6572 6162 6c65 5c6e ne innumerable\n │ │ │ +0000c440: 6f74 6865 7220 7461 736b 732e 2020 4865 other tasks. He │ │ │ +0000c450: 2068 6173 2061 6c73 6f20 6865 6c70 6564 has also helped │ │ │ +0000c460: 2077 6974 6820 6d61 6e79 206f 7468 6572 with many other │ │ │ +0000c470: 2061 646d 696e 6973 7472 6174 6976 6520 administrative │ │ │ +0000c480: 7461 736b 732c 5c6e 7375 6368 2061 7320 tasks,\nsuch as │ │ │ +0000c490: 7468 6520 7468 616e 6b6c 6573 7320 776f the thankless wo │ │ │ +0000c4a0: 726b 206f 6620 6465 616c 696e 6720 7769 rk of dealing wi │ │ │ +0000c4b0: 7468 2074 6865 2070 726f 7669 6465 7273 th the providers │ │ │ +0000c4c0: 206f 6620 7265 736f 7572 6365 735c 6e74 of resources\nt │ │ │ +0000c4d0: 6f20 5845 6d61 6373 2061 7420 536f 7572 o XEmacs at Sour │ │ │ +0000c4e0: 6365 466f 7267 6520 616e 6420 7475 782e ceForge and tux. │ │ │ +0000c4f0: 6f72 672e 5c6e 2220 616a 2022 466f 726d org.\n" aj "Form │ │ │ +0000c500: 6572 2060 5061 636b 6167 6520 5061 7463 er `Package Patc │ │ │ +0000c510: 6820 5465 6e64 6572 272c 2062 6574 6120 h Tender', beta │ │ │ +0000c520: 7465 7374 6572 2061 6e64 2047 4e55 206c tester and GNU l │ │ │ +0000c530: 6962 6320 6465 7665 6c6f 7065 722e 5c6e ibc developer.\n │ │ │ +0000c540: 2220 616a 6320 2246 6f72 6d65 7220 5845 " ajc "Former XE │ │ │ +0000c550: 6d61 6373 2077 6562 2073 6974 6520 6d61 macs web site ma │ │ │ +0000c560: 696e 7461 696e 6572 2e5c 6e22 2061 6c61 intainer.\n" ala │ │ │ +0000c570: 7374 6169 7220 2252 6577 726f 7465 2074 stair "Rewrote t │ │ │ +0000c580: 6865 2073 656c 6563 7469 6f6e 2063 6f64 he selection cod │ │ │ +0000c590: 652c 2061 6464 696e 6720 6d61 6e79 206e e, adding many n │ │ │ +0000c5a0: 6577 2066 6561 7475 7265 7320 7375 6368 ew features such │ │ │ +0000c5b0: 2061 7320 6265 7474 6572 5c6e 7375 7070 as better\nsupp │ │ │ +0000c5c0: 6f72 7420 666f 7220 6172 6269 7472 6172 ort for arbitrar │ │ │ +0000c5d0: 7920 7365 6c65 6374 696f 6e20 7479 7065 y selection type │ │ │ +0000c5e0: 7320 2865 7370 6563 6961 6c6c 7920 756e s (especially un │ │ │ +0000c5f0: 6465 7220 4d53 2057 696e 646f 7773 2c5c der MS Windows,\ │ │ │ +0000c600: 6e77 6865 7265 2074 6865 2066 756c 6c20 nwhere the full │ │ │ +0000c610: 706f 7765 7220 6f66 2074 6865 2063 6c69 power of the cli │ │ │ +0000c620: 7062 6f61 7264 2073 7973 7465 6d20 6973 pboard system is │ │ │ +0000c630: 2061 7661 696c 6162 6c65 2075 6e64 6572 available under │ │ │ +0000c640: 5c6e 5845 6d61 6373 292e 5c6e 2220 6261 \nXEmacs).\n" ba │ │ │ +0000c650: 7720 2249 276d 2074 6865 2061 7574 686f w "I'm the autho │ │ │ +0000c660: 7220 6f66 2022 2061 626f 7574 2d75 726c r of " about-url │ │ │ +0000c670: 2d6c 696e 6b20 6363 2d6d 6f64 6520 2243 -link cc-mode "C │ │ │ +0000c680: 4320 4d6f 6465 2220 2256 6973 6974 2074 C Mode" "Visit t │ │ │ +0000c690: 6865 2043 4320 4d6f 6465 2070 6167 6522 he CC Mode page" │ │ │ +0000c6a0: 2022 2c20 666f 7220 432c 2043 2b2b 2c20 ", for C, C++, │ │ │ +0000c6b0: 4f62 6a65 6374 6976 652d 4320 616e 6420 Objective-C and │ │ │ +0000c6c0: 4a61 7661 2065 6469 7469 6e67 2c5c 6e53 Java editing,\nS │ │ │ +0000c6d0: 7570 6572 6369 7465 2066 6f72 206d 6169 upercite for mai │ │ │ +0000c6e0: 6c20 616e 6420 6e65 7773 2063 6974 696e l and news citin │ │ │ +0000c6f0: 672c 2061 6e64 2073 756e 6472 7920 6f74 g, and sundry ot │ │ │ +0000c700: 6865 7220 5845 6d61 6373 2070 6163 6b61 her XEmacs packa │ │ │ +0000c710: 6765 735c 6e73 7563 6820 6173 2045 4c50 ges\nsuch as ELP │ │ │ +0000c720: 2028 7468 6520 456d 6163 7320 4c69 7370 (the Emacs Lisp │ │ │ +0000c730: 2050 726f 6669 6c65 7229 2c20 5265 706f Profiler), Repo │ │ │ +0000c740: 7274 6572 2c20 7872 6462 2d6d 6f64 652c rter, xrdb-mode, │ │ │ +0000c750: 2061 6e64 5c6e 7769 6e72 696e 672e 2020 and\nwinring. │ │ │ +0000c760: 4576 656e 2074 686f 7567 6820 4920 7374 Even though I st │ │ │ +0000c770: 696c 6c20 6c69 7665 2061 6c6d 6f73 7420 ill live almost │ │ │ +0000c780: 3130 3025 2069 6e20 5845 6d61 6373 2074 100% in XEmacs t │ │ │ +0000c790: 6865 7365 2064 6179 732c 5c6e 6d79 204c hese days,\nmy L │ │ │ +0000c7a0: 6973 7020 6861 636b 696e 6720 6861 7320 isp hacking has │ │ │ +0000c7b0: 6661 6c6c 656e 206f 6666 2069 6e20 7265 fallen off in re │ │ │ +0000c7c0: 6365 6e74 2079 6561 7273 2061 7320 4920 cent years as I │ │ │ +0000c7d0: 6265 6361 6d65 206d 6f72 655c 6e69 6e76 became more\ninv │ │ │ +0000c7e0: 6f6c 7665 6420 696e 2050 7974 686f 6e2c olved in Python, │ │ │ +0000c7f0: 2061 6e64 2069 6e20 6661 6374 2c20 4920 and in fact, I │ │ │ +0000c800: 6375 7272 656e 746c 7920 6d61 696e 7461 currently mainta │ │ │ +0000c810: 696e 2074 6865 2050 7974 686f 6e5c 6e65 in the Python\ne │ │ │ +0000c820: 6469 7469 6e67 206d 6f64 652e 2020 5365 diting mode. Se │ │ │ +0000c830: 6520 616c 736f 3a20 2220 2268 7474 703a e also: " "http: │ │ │ +0000c840: 2f2f 7777 772e 7079 7468 6f6e 2e6f 7267 //www.python.org │ │ │ +0000c850: 2f65 6d61 6373 2220 6e69 6c20 2256 6973 /emacs" nil "Vis │ │ │ +0000c860: 6974 2074 6865 2070 7974 686f 6e2e 6f72 it the python.or │ │ │ +0000c870: 6720 456d 6163 7320 476f 6f64 6965 7320 g Emacs Goodies │ │ │ +0000c880: 7061 6765 2220 222e 5c6e 2220 6265 6e20 page" ".\n" ben │ │ │ +0000c890: 2249 2061 6d20 7468 6520 6c61 7267 6573 "I am the larges │ │ │ +0000c8a0: 7420 636f 6465 2063 6f6e 7472 6962 7574 t code contribut │ │ │ +0000c8b0: 6f72 2074 6f20 5845 6d61 6373 2c20 616e or to XEmacs, an │ │ │ +0000c8c0: 6420 7468 6520 6172 6368 6974 6563 7420 d the architect │ │ │ +0000c8d0: 6f66 206d 616e 795c 6e6f 6620 7468 6520 of many\nof the │ │ │ +0000c8e0: 6665 6174 7572 6573 2074 6861 7420 6469 features that di │ │ │ +0000c8f0: 7374 696e 6775 6973 6820 5845 6d61 6373 stinguish XEmacs │ │ │ +0000c900: 2066 726f 6d20 474e 5520 456d 6163 7320 from GNU Emacs │ │ │ +0000c910: 616e 6420 6f74 6865 7220 456d 6163 735c and other Emacs\ │ │ │ +0000c920: 6e76 6572 7369 6f6e 732e 2020 4d79 206d nversions. My m │ │ │ +0000c930: 6169 6e20 636f 6e74 7269 6275 7469 6f6e ain contribution │ │ │ +0000c940: 7320 746f 2058 456d 6163 7320 696e 636c s to XEmacs incl │ │ │ +0000c950: 7564 6520 7265 7772 6974 696e 6720 6c61 ude rewriting la │ │ │ +0000c960: 7267 655c 6e70 6172 7473 206f 6620 7468 rge\nparts of th │ │ │ +0000c970: 6520 696e 7465 726e 616c 7320 616e 6420 e internals and │ │ │ +0000c980: 7468 6520 676f 7279 2058 742f 586c 6962 the gory Xt/Xlib │ │ │ +0000c990: 2069 6e74 6572 6661 6369 6e67 2c20 6164 interfacing, ad │ │ │ +0000c9a0: 6469 6e67 2074 6865 5c6e 4d75 6c65 2028 ding the\nMule ( │ │ │ +0000c9b0: 696e 7465 726e 6174 696f 6e61 6c29 2073 international) s │ │ │ +0000c9c0: 7570 706f 7274 2c20 696d 7072 6f76 696e upport, improvin │ │ │ +0000c9d0: 6720 7468 6520 4d53 2057 696e 646f 7773 g the MS Windows │ │ │ +0000c9e0: 2073 7570 706f 7274 2c5c 6e61 6464 696e support,\naddin │ │ │ +0000c9f0: 6720 6d61 6e79 2047 5549 2066 6561 7475 g many GUI featu │ │ │ +0000ca00: 7265 7320 746f 2058 456d 6163 732c 2061 res to XEmacs, a │ │ │ +0000ca10: 7263 6869 7465 6374 696e 6720 7468 655c rchitecting the\ │ │ │ +0000ca20: 6e64 6576 6963 652d 6162 7374 7261 6374 ndevice-abstract │ │ │ +0000ca30: 696f 6e20 616e 6420 7370 6563 6966 6965 ion and specifie │ │ │ +0000ca40: 7220 636f 6465 2c20 7772 6974 696e 6720 r code, writing │ │ │ +0000ca50: 6d6f 7374 206f 6620 7468 6520 5845 6d61 most of the XEma │ │ │ +0000ca60: 6373 5c6e 496e 7465 726e 616c 7320 4d61 cs\nInternals Ma │ │ │ +0000ca70: 6e75 616c 2061 6e64 2074 6865 2058 456d nual and the XEm │ │ │ +0000ca80: 6163 732d 7370 6563 6966 6963 2070 6172 acs-specific par │ │ │ +0000ca90: 7473 206f 6620 7468 6520 5845 6d61 6373 ts of the XEmacs │ │ │ +0000caa0: 204c 6973 705c 6e52 6566 6572 656e 6365 Lisp\nReference │ │ │ +0000cab0: 204d 616e 7561 6c2c 2073 796e 6368 696e Manual, synchin │ │ │ +0000cac0: 6720 6120 6772 6561 7420 6465 616c 206f g a great deal o │ │ │ +0000cad0: 6620 636f 6465 2077 6974 6820 474e 5520 f code with GNU │ │ │ +0000cae0: 456d 6163 732c 2061 6e64 5c6e 6265 696e Emacs, and\nbein │ │ │ +0000caf0: 6720 6120 6765 6e65 7261 6c20 6e75 6973 g a general nuis │ │ │ +0000cb00: 616e 6365 202e 2e2e 2065 722c 2062 7261 ance ... er, bra │ │ │ +0000cb10: 696e 7374 6f72 6d65 7220 666f 7220 6d61 instormer for ma │ │ │ +0000cb20: 6e79 206f 6620 7468 6520 6e65 775c 6e66 ny of the new\nf │ │ │ +0000cb30: 6561 7475 7265 7320 6f66 2058 456d 6163 eatures of XEmac │ │ │ +0000cb40: 732e 5c6e 2220 6277 2022 4175 7468 6f72 s.\n" bw "Author │ │ │ +0000cb50: 206f 6620 7468 6520 4879 7065 7262 6f6c of the Hyperbol │ │ │ +0000cb60: 6520 6576 6572 7964 6179 2069 6e66 6f72 e everyday infor │ │ │ +0000cb70: 6d61 7469 6f6e 206d 616e 6167 656d 656e mation managemen │ │ │ +0000cb80: 7420 6879 7065 7274 6578 745c 6e73 7973 t hypertext\nsys │ │ │ +0000cb90: 7465 6d20 616e 6420 7468 6520 4f4f 2d42 tem and the OO-B │ │ │ +0000cba0: 726f 7773 6572 206d 756c 7469 2d6c 616e rowser multi-lan │ │ │ +0000cbb0: 6775 6167 6520 636f 6465 2062 726f 7773 guage code brows │ │ │ +0000cbc0: 6572 2e20 2048 6520 616c 736f 5c6e 6465 er. He also\nde │ │ │ +0000cbd0: 7369 676e 6564 2074 6865 2042 654f 7065 signed the BeOpe │ │ │ +0000cbe0: 6e20 496e 666f 446f 636b 2069 6e74 6567 n InfoDock integ │ │ │ +0000cbf0: 7261 7465 6420 6465 7665 6c6f 706d 656e rated developmen │ │ │ +0000cc00: 7420 656e 7669 726f 6e6d 656e 745c 6e66 t environment\nf │ │ │ +0000cc10: 6f72 2073 6f66 7477 6172 6520 656e 6769 or software engi │ │ │ +0000cc20: 6e65 6572 732e 2020 4974 2072 756e 7320 neers. It runs │ │ │ +0000cc30: 6174 6f70 2058 456d 6163 7320 616e 6420 atop XEmacs and │ │ │ +0000cc40: 6973 2061 7661 696c 6162 6c65 2066 726f is available fro │ │ │ +0000cc50: 6d5c 6e68 6973 2066 6972 6d2c 2042 654f m\nhis firm, BeO │ │ │ +0000cc60: 7065 6e2c 2077 6869 6368 206f 6666 6572 pen, which offer │ │ │ +0000cc70: 7320 6469 7374 7269 6275 7469 6f6e 732c s distributions, │ │ │ +0000cc80: 2063 7573 746f 6d20 6465 7665 6c6f 706d custom developm │ │ │ +0000cc90: 656e 742c 5c6e 7375 7070 6f72 742c 2061 ent,\nsupport, a │ │ │ +0000cca0: 6e64 2074 7261 696e 696e 6720 7061 636b nd training pack │ │ │ +0000ccb0: 6167 6573 2066 6f72 2063 6f72 706f 7261 ages for corpora │ │ │ +0000ccc0: 7465 2075 7365 7273 206f 6620 5845 6d61 te users of XEma │ │ │ +0000ccd0: 6373 2c20 474e 555c 6e45 6d61 6373 2061 cs, GNU\nEmacs a │ │ │ +0000cce0: 6e64 2049 6e66 6f44 6f63 6b2e 2020 5365 nd InfoDock. Se │ │ │ +0000ccf0: 6520 2220 6265 6f70 656e 2022 5669 7369 e " beopen "Visi │ │ │ +0000cd00: 7420 4265 4f70 656e 2057 5757 2070 6167 t BeOpen WWW pag │ │ │ +0000cd10: 6522 2063 6777 2022 4175 7468 6f72 206f e" cgw "Author o │ │ │ +0000cd20: 6620 616e 2065 6172 6c69 6572 2076 6572 f an earlier ver │ │ │ +0000cd30: 7369 6f6e 206f 6620 7468 6520 4d53 2057 sion of the MS W │ │ │ +0000cd40: 696e 646f 7773 2073 6574 7570 2070 726f indows setup pro │ │ │ +0000cd50: 6772 616d 2066 6f72 2058 456d 6163 732e gram for XEmacs. │ │ │ +0000cd60: 5c6e 2220 6368 7220 224d 6169 6e74 6169 \n" chr "Maintai │ │ │ +0000cd70: 6e65 7220 6f66 2074 6865 2058 456d 6163 ner of the XEmac │ │ │ +0000cd80: 7320 4641 5120 616e 6420 7072 6f75 6420 s FAQ and proud │ │ │ +0000cd90: 6175 7468 6f72 206f 6620 607a 6170 2d75 author of `zap-u │ │ │ +0000cda0: 702d 746f 2d63 6861 7227 2e5c 6e22 2063 p-to-char'.\n" c │ │ │ +0000cdb0: 7261 6967 2022 536f 7272 792c 206e 6f20 raig "Sorry, no │ │ │ +0000cdc0: 696e 666f 726d 6174 696f 6e20 6162 6f75 information abou │ │ │ +0000cdd0: 7420 6d79 2058 456d 6163 7320 636f 6e74 t my XEmacs cont │ │ │ +0000cde0: 7269 6275 7469 6f6e 7320 7965 742e 5c6e ributions yet.\n │ │ │ +0000cdf0: 2220 6374 686f 6d70 2022 4d61 696e 7461 " cthomp "Mainta │ │ │ +0000ce00: 696e 6572 206f 6620 5845 6d61 6373 2066 iner of XEmacs f │ │ │ +0000ce10: 726f 6d20 6d69 642d 3139 3934 2074 6872 rom mid-1994 thr │ │ │ +0000ce20: 6f75 6768 2031 3939 362e 2020 4175 7468 ough 1996. Auth │ │ │ +0000ce30: 6f72 206f 6620 7468 655c 6e72 6564 6973 or of the\nredis │ │ │ +0000ce40: 706c 6179 2065 6e67 696e 652c 2074 6865 play engine, the │ │ │ +0000ce50: 206f 7269 6769 6e61 6c20 746f 6f6c 6261 original toolba │ │ │ +0000ce60: 7220 616e 6420 7363 726f 6c6c 6261 7273 r and scrollbars │ │ │ +0000ce70: 2061 6e64 2073 6f6d 6520 6f66 2074 6865 and some of the │ │ │ +0000ce80: 5c6e 6465 7669 6365 2d61 6273 7472 6163 \ndevice-abstrac │ │ │ +0000ce90: 7469 6f6e 2c20 5454 5920 616e 6420 676c tion, TTY and gl │ │ │ +0000cea0: 7970 6820 636f 6465 2e20 2043 7265 6174 yph code. Creat │ │ │ +0000ceb0: 6f72 206f 6620 7468 6520 7865 6d61 6373 or of the xemacs │ │ │ +0000cec0: 2e6f 7267 5c6e 646f 6d61 696e 2061 6e64 .org\ndomain and │ │ │ +0000ced0: 2063 6f6d 702e 656d 6163 732e 7865 6d61 comp.emacs.xema │ │ │ +0000cee0: 6373 2e5c 6e22 2064 6169 6b69 2064 616e cs.\n" daiki dan │ │ │ +0000cef0: 2064 6172 7279 6c6f 2064 6576 696e 2022 darrylo devin " │ │ │ +0000cf00: 5061 7274 206f 6620 7468 6520 6f72 6967 Part of the orig │ │ │ +0000cf10: 696e 616c 2028 7072 652d 3139 2e30 2920 inal (pre-19.0) │ │ │ +0000cf20: 4c75 6369 6420 456d 6163 7320 6465 7665 Lucid Emacs deve │ │ │ +0000cf30: 6c6f 706d 656e 7420 7465 616d 2e5c 6e4d lopment team.\nM │ │ │ +0000cf40: 6174 7468 6965 7520 7772 6f74 6520 7468 atthieu wrote th │ │ │ +0000cf50: 6520 696e 6974 6961 6c20 456e 6572 6769 e initial Energi │ │ │ +0000cf60: 7a65 2069 6e74 6572 6661 6365 2c20 6465 ze interface, de │ │ │ +0000cf70: 7369 676e 6564 2074 6865 5c6e 746f 6f6c signed the\ntool │ │ │ +0000cf80: 6b69 742d 696e 6465 7065 6e64 656e 7420 kit-independent │ │ │ +0000cf90: 4c75 6369 6420 5769 6467 6574 206c 6962 Lucid Widget lib │ │ │ +0000cfa0: 7261 7279 2c20 616e 6420 6669 7865 6420 rary, and fixed │ │ │ +0000cfb0: 656e 6f75 6768 2072 6564 6973 706c 6179 enough redisplay │ │ │ +0000cfc0: 5c6e 6275 6773 2074 6f20 6c61 7374 2061 \nbugs to last a │ │ │ +0000cfd0: 206c 6966 6574 696d 652e 2020 5468 6520 lifetime. The │ │ │ +0000cfe0: 6665 6174 7572 6573 2069 6e20 4c75 6369 features in Luci │ │ │ +0000cff0: 6420 456d 6163 7320 7765 7265 206c 6172 d Emacs were lar │ │ │ +0000d000: 6765 6c79 5c6e 696e 7370 6972 6564 2062 gely\ninspired b │ │ │ +0000d010: 7920 4d61 7474 6869 6575 2773 2069 6e69 y Matthieu's ini │ │ │ +0000d020: 7469 616c 2070 726f 746f 7479 7065 206f tial prototype o │ │ │ +0000d030: 6620 616e 2045 6e65 7267 697a 6520 696e f an Energize in │ │ │ +0000d040: 7465 7266 6163 655c 6e75 7369 6e67 2045 terface\nusing E │ │ │ +0000d050: 706f 6368 2e5c 6e22 2064 6b69 6e64 7265 poch.\n" dkindre │ │ │ +0000d060: 6420 2244 6172 7265 6c6c 2074 656e 6473 d "Darrell tends │ │ │ +0000d070: 2074 6f20 636f 6d65 206f 7574 206f 6620 to come out of │ │ │ +0000d080: 7468 6520 776f 6f64 776f 726b 2061 2063 the woodwork a c │ │ │ +0000d090: 6f75 706c 6520 6f66 2077 6565 6b73 5c6e ouple of weeks\n │ │ │ +0000d0a0: 6265 666f 7265 2061 206e 6577 2072 656c before a new rel │ │ │ +0000d0b0: 6561 7365 2077 6974 6820 6120 666c 7572 ease with a flur │ │ │ +0000d0c0: 7279 206f 6620 6669 7865 7320 666f 7220 ry of fixes for │ │ │ +0000d0d0: 6275 6773 2074 6861 7420 5c6e 616e 6e6f bugs that \nanno │ │ │ +0000d0e0: 7920 6869 6d2e 2020 4865 2068 6f70 6573 y him. He hopes │ │ │ +0000d0f0: 2068 6527 7320 7370 6172 6564 2079 6f75 he's spared you │ │ │ +0000d100: 2066 726f 6d20 6120 636f 7265 2064 756d from a core dum │ │ │ +0000d110: 7020 6f72 2074 776f 2e5c 6e22 2064 6d6f p or two.\n" dmo │ │ │ +0000d120: 6f72 6520 2244 6176 6964 2068 6173 2063 ore "David has c │ │ │ +0000d130: 6f6e 7472 6962 7574 6564 2067 7265 6174 ontributed great │ │ │ +0000d140: 6c79 2074 6f20 7468 6520 7175 6573 7420 ly to the quest │ │ │ +0000d150: 746f 2073 7065 6564 2075 7020 5845 6d61 to speed up XEma │ │ │ +0000d160: 6373 2e5c 6e22 2064 6964 6965 7220 2244 cs.\n" didier "D │ │ │ +0000d170: 6964 6965 7220 6a6f 696e 6564 2074 6865 idier joined the │ │ │ +0000d180: 2064 6576 656c 6f70 6d65 6e74 206f 6620 development of │ │ │ +0000d190: 5845 6d61 6373 2069 6e20 3139 3936 2c20 XEmacs in 1996, │ │ │ +0000d1a0: 616e 6420 6861 7320 6265 656e 206f 6e65 and has been one │ │ │ +0000d1b0: 206f 665c 6e74 6865 2063 6f72 6520 6d61 of\nthe core ma │ │ │ +0000d1c0: 696e 7461 696e 6572 7320 7369 6e63 6520 intainers since │ │ │ +0000d1d0: 3139 3938 2e20 2048 6973 2076 6572 7920 1998. His very │ │ │ +0000d1e0: 6669 7273 7420 636f 6e74 7269 6275 7469 first contributi │ │ │ +0000d1f0: 6f6e 2077 6173 2074 6865 5c6e 7472 616e on was the\ntran │ │ │ +0000d200: 736c 6174 696f 6e20 6f66 2074 6865 2074 slation of the t │ │ │ +0000d210: 7574 6f72 6961 6c20 746f 2046 7265 6e63 utorial to Frenc │ │ │ +0000d220: 682e 2053 696e 6365 2074 6865 6e2c 2068 h. Since then, h │ │ │ +0000d230: 6520 6861 7320 636f 6e74 7269 6275 7465 e has contribute │ │ │ +0000d240: 645c 6e76 6172 696f 7573 2062 7567 2066 d\nvarious bug f │ │ │ +0000d250: 6978 6573 2061 6e64 2065 6e68 616e 6365 ixes and enhance │ │ │ +0000d260: 6d65 6e74 7320 696e 2066 6965 6c64 7320 ments in fields │ │ │ +0000d270: 6173 2064 6976 6572 7365 2061 7320 7468 as diverse as th │ │ │ +0000d280: 6520 4755 492c 5c6e 7265 6469 7370 6c61 e GUI,\nredispla │ │ │ +0000d290: 7920 656e 6769 6e65 2061 6e64 2061 7574 y engine and aut │ │ │ +0000d2a0: 6f63 6f6e 6620 7375 7070 6f72 742e 5c6e oconf support.\n │ │ │ +0000d2b0: 5c6e 4469 6469 6572 2069 7320 7468 6520 \nDidier is the │ │ │ +0000d2c0: 6f66 6669 6369 616c 206d 6169 6e74 6169 official maintai │ │ │ +0000d2d0: 6e65 7220 6f66 2073 6f6d 6520 636f 7265 ner of some core │ │ │ +0000d2e0: 206c 6962 7261 7269 6573 2028 7265 6374 libraries (rect │ │ │ +0000d2f0: 2c20 6375 732d 6564 6974 2c5c 6e77 6964 , cus-edit,\nwid │ │ │ +0000d300: 2d65 6469 7429 2061 6e64 2074 6865 2061 -edit) and the a │ │ │ +0000d310: 7574 686f 7220 6f66 2074 6865 206d 756c uthor of the mul │ │ │ +0000d320: 7469 6361 7374 2073 7570 706f 7274 2e20 ticast support. │ │ │ +0000d330: 2048 6520 6973 2061 6c73 6f20 7468 6520 He is also the │ │ │ +0000d340: 6175 7468 6f72 5c6e 6f66 2073 6576 6572 author\nof sever │ │ │ +0000d350: 616c 2070 6163 6b61 6765 732c 2069 6e63 al packages, inc │ │ │ +0000d360: 6c75 6469 6e67 206d 6368 6174 2061 6e64 luding mchat and │ │ │ +0000d370: 2050 6174 6368 6572 2e5c 6e22 2065 6220 Patcher.\n" eb │ │ │ +0000d380: 2241 6c73 6f20 7061 7274 206f 6620 7468 "Also part of th │ │ │ +0000d390: 6520 6f72 6967 696e 616c 204c 7563 6964 e original Lucid │ │ │ +0000d3a0: 2045 6d61 6373 2064 6576 656c 6f70 6d65 Emacs developme │ │ │ +0000d3b0: 6e74 2074 6561 6d2e 2020 4572 6963 2070 nt team. Eric p │ │ │ +0000d3c0: 6c61 7965 6420 615c 6e62 6967 2070 6172 layed a\nbig par │ │ │ +0000d3d0: 7420 696e 2074 6865 2064 6573 6967 6e20 t in the design │ │ │ +0000d3e0: 6f66 206d 616e 7920 6173 7065 6374 7320 of many aspects │ │ │ +0000d3f0: 6f66 2074 6865 2073 7973 7465 6d2c 2069 of the system, i │ │ │ +0000d400: 6e63 6c75 6469 6e67 2074 6865 5c6e 6e65 ncluding the\nne │ │ │ +0000d410: 7720 636f 6d6d 616e 6420 6c6f 6f70 2061 w command loop a │ │ │ +0000d420: 6e64 206b 6579 6d61 7073 2c20 6669 7865 nd keymaps, fixe │ │ │ +0000d430: 6420 6e75 6d65 726f 7573 2062 7567 732c d numerous bugs, │ │ │ +0000d440: 2061 6e64 2068 6173 2062 6565 6e20 615c and has been a\ │ │ │ +0000d450: 6e72 656c 6961 626c 6520 6265 7461 2074 nreliable beta t │ │ │ +0000d460: 6573 7465 7220 6576 6572 2073 696e 6365 ester ever since │ │ │ +0000d470: 2e5c 6e22 2066 6162 7269 6365 2022 4920 .\n" fabrice "I │ │ │ +0000d480: 6861 7665 2073 7461 7274 6564 2074 6f20 have started to │ │ │ +0000d490: 7072 6f76 6964 6520 6269 6e61 7279 206b provide binary k │ │ │ +0000d4a0: 6974 7320 666f 7220 7468 6520 3231 2e32 its for the 21.2 │ │ │ +0000d4b0: 2073 6572 6965 7320 7768 656e 2074 6865 series when the │ │ │ +0000d4c0: 7265 5c6e 7761 7320 6e6f 2069 6e73 7461 re\nwas no insta │ │ │ +0000d4d0: 6c6c 6572 2061 7661 696c 6162 6c65 2e20 ller available. │ │ │ +0000d4e0: 4920 636f 6e74 7269 6275 7465 6420 6120 I contributed a │ │ │ +0000d4f0: 6665 7720 6c69 6e65 7320 6f66 2063 6f72 few lines of cor │ │ │ +0000d500: 6520 636f 6465 5c6e 6f63 6361 7369 6f6e e code\noccasion │ │ │ +0000d510: 616c 6c79 2074 6f20 6d61 6b65 2074 6869 ally to make thi │ │ │ +0000d520: 6e67 7320 736d 6f6f 7468 6572 2077 6974 ngs smoother wit │ │ │ +0000d530: 6820 7468 6520 6e61 7469 7665 2077 696e h the native win │ │ │ +0000d540: 3332 2070 6f72 7420 7768 6963 685c 6e49 32 port which\nI │ │ │ +0000d550: 276d 2075 7369 6e67 2061 6c6c 2074 6865 'm using all the │ │ │ +0000d560: 2064 6179 2e5c 6e5c 6e49 2061 6c73 6f20 day.\n\nI also │ │ │ +0000d570: 636f 6e74 7269 6275 7465 6420 656c 6973 contributed elis │ │ │ +0000d580: 7020 636f 6465 206c 6f6e 6720 6167 6f20 p code long ago │ │ │ +0000d590: 746f 206d 616b 6520 476e 7573 2072 756e to make Gnus run │ │ │ +0000d5a0: 2075 6e64 6572 2058 456d 6163 732e 5c6e under XEmacs.\n │ │ │ +0000d5b0: 2220 676f 6c75 6265 7620 2255 7365 6420 " golubev "Used │ │ │ +0000d5c0: 5845 6d61 6373 2073 696e 6365 2065 6172 XEmacs since ear │ │ │ +0000d5d0: 6c79 2031 3939 372e 2020 4669 7865 6420 ly 1997. Fixed │ │ │ +0000d5e0: 6275 6773 2074 6861 7420 616e 6e6f 7920 bugs that annoy │ │ │ +0000d5f0: 6d65 2c20 626f 7468 2069 6e5c 6e58 456d me, both in\nXEm │ │ │ +0000d600: 6163 7320 636f 7265 2061 6e64 2069 6e20 acs core and in │ │ │ +0000d610: 7061 636b 6167 6573 2049 2075 7365 2c20 packages I use, │ │ │ +0000d620: 6d6f 7374 6c79 2076 6970 6572 2e20 2048 mostly viper. H │ │ │ +0000d630: 6f70 696e 6720 746f 2067 6574 5c6e 636f oping to get\nco │ │ │ +0000d640: 6469 6e67 2d63 6f6f 6b69 6520 7061 636b ding-cookie pack │ │ │ +0000d650: 6167 6520 6469 7374 7269 6275 7465 642c age distributed, │ │ │ +0000d660: 2077 6869 6368 2069 7320 616c 736f 2061 which is also a │ │ │ +0000d670: 2066 6978 206f 6620 7768 6174 2049 5c6e fix of what I\n │ │ │ +0000d680: 636f 6e73 6964 6572 2061 2062 7567 2e5c consider a bug.\ │ │ │ +0000d690: 6e22 2067 756e 6e61 7220 6862 7320 2250 n" gunnar hbs "P │ │ │ +0000d6a0: 6172 7420 6f66 2074 6865 206f 7269 6769 art of the origi │ │ │ +0000d6b0: 6e61 6c20 2870 7265 2d31 392e 3029 204c nal (pre-19.0) L │ │ │ +0000d6c0: 7563 6964 2045 6d61 6373 2064 6576 656c ucid Emacs devel │ │ │ +0000d6d0: 6f70 6d65 6e74 2074 6561 6d2e 2020 4861 opment team. Ha │ │ │ +0000d6e0: 726c 616e 5c6e 6465 7369 676e 6564 2061 rlan\ndesigned a │ │ │ +0000d6f0: 6e64 2069 6d70 6c65 6d65 6e74 6564 206d nd implemented m │ │ │ +0000d700: 616e 7920 6f66 2074 6865 206c 6f77 206c any of the low l │ │ │ +0000d710: 6576 656c 2064 6174 6120 7374 7275 6374 evel data struct │ │ │ +0000d720: 7572 6573 2077 6869 6368 5c6e 6172 6520 ures which\nare │ │ │ +0000d730: 6f72 6967 696e 616c 2074 6f20 7468 6520 original to the │ │ │ +0000d740: 4c75 6369 6420 7665 7273 696f 6e20 6f66 Lucid version of │ │ │ +0000d750: 2045 6d61 6373 2c20 696e 636c 7564 696e Emacs, includin │ │ │ +0000d760: 6720 6578 7465 6e74 7320 616e 6420 6861 g extents and ha │ │ │ +0000d770: 7368 5c6e 7461 626c 6573 2e5c 6e22 2068 sh\ntables.\n" h │ │ │ +0000d780: 6973 6173 6869 2068 6d75 6c6c 6572 2022 isashi hmuller " │ │ │ +0000d790: 4175 7468 6f72 206f 6620 7468 6520 636f Author of the co │ │ │ +0000d7a0: 6465 2075 7365 6420 746f 2063 6f6e 6e65 de used to conne │ │ │ +0000d7b0: 6374 2058 456d 6163 7320 7769 7468 2054 ct XEmacs with T │ │ │ +0000d7c0: 6f6f 6c54 616c 6b2c 2061 6e64 206f 6620 oolTalk, and of │ │ │ +0000d7d0: 616e 5c6e 6561 726c 7920 636c 6965 6e74 an\nearly client │ │ │ +0000d7e0: 206f 6620 7468 6520 6578 7465 726e 616c of the external │ │ │ +0000d7f0: 2045 6d61 6373 2077 6964 6765 742e 5c6e Emacs widget.\n │ │ │ +0000d800: 2220 686e 696b 7369 6320 2248 7276 6f6a " hniksic "Hrvoj │ │ │ +0000d810: 6527 7320 636f 6e74 7269 6275 7469 6f6e e's contribution │ │ │ +0000d820: 2074 6f20 5845 6d61 6373 2063 6f6e 7369 to XEmacs consi │ │ │ +0000d830: 7374 7320 6f66 206d 616e 7920 686f 7572 sts of many hour │ │ │ +0000d840: 7320 7370 656e 7420 776f 726b 696e 675c s spent working\ │ │ │ +0000d850: 6e6f 6e20 636f 6465 2061 6e64 2074 616b non code and tak │ │ │ +0000d860: 696e 6720 7061 7274 2069 6e20 7075 626c ing part in publ │ │ │ +0000d870: 6963 2064 6973 6375 7373 696f 6e73 2e5c ic discussions.\ │ │ │ +0000d880: 6e5c 6e48 6520 7772 6f74 6520 6073 6176 n\nHe wrote `sav │ │ │ +0000d890: 6568 6973 7427 2061 6e64 2060 6874 6d6c ehist' and `html │ │ │ +0000d8a0: 697a 6527 2070 6163 6b61 6765 732c 2074 ize' packages, t │ │ │ +0000d8b0: 6865 206c 6174 7465 7220 6861 7669 6e67 he latter having │ │ │ +0000d8c0: 2061 2070 7265 7474 795c 6e6c 6172 6765 a pretty\nlarge │ │ │ +0000d8d0: 2067 6174 6865 7269 6e67 206f 6620 7573 gathering of us │ │ │ +0000d8e0: 6572 732e 2020 4865 2077 6f72 6b65 6420 ers. He worked │ │ │ +0000d8f0: 746f 2069 6d70 726f 7665 206d 616e 7920 to improve many │ │ │ +0000d900: 7061 7274 7320 6f66 2058 456d 6163 735c parts of XEmacs\ │ │ │ +0000d910: 6e4c 6973 7020 636f 6465 2c20 696e 636c nLisp code, incl │ │ │ +0000d920: 7564 696e 6720 6973 6561 7263 6820 2846 uding isearch (F │ │ │ +0000d930: 5346 2073 796e 6368 2061 6e64 206e 6577 SF synch and new │ │ │ +0000d940: 2066 6561 7475 7265 7329 2c20 636c 2c20 features), cl, │ │ │ +0000d950: 6564 6d61 6372 6f5c 6e28 4653 4620 7379 edmacro\n(FSF sy │ │ │ +0000d960: 6e63 6820 616e 6420 616e 2061 6c6d 6f73 nch and an almos │ │ │ +0000d970: 7420 636f 6d70 6c65 7465 2072 6577 7269 t complete rewri │ │ │ +0000d980: 7465 292c 2070 726f 6669 6c65 2c20 676e te), profile, gn │ │ │ +0000d990: 7573 6572 762c 5c6e 6879 7065 722d 6170 userv,\nhyper-ap │ │ │ +0000d9a0: 726f 706f 732c 2065 7461 6773 2c20 6162 ropos, etags, ab │ │ │ +0000d9b0: 6f75 742c 2061 6e64 2063 7573 746f 6d2e out, and custom. │ │ │ +0000d9c0: 5c6e 5c6e 4865 2068 6173 2077 6f72 6b65 \n\nHe has worke │ │ │ +0000d9d0: 6420 6f6e 2069 6d70 726f 7669 6e67 2061 d on improving a │ │ │ +0000d9e0: 6e64 206f 7074 696d 697a 696e 6720 7468 nd optimizing th │ │ │ +0000d9f0: 6520 4320 636f 7265 2e20 2048 6520 706f e C core. He po │ │ │ +0000da00: 7274 6564 206d 616e 795c 6e46 5346 2063 rted many\nFSF c │ │ │ +0000da10: 6f72 6520 6665 6174 7572 6573 2073 7563 ore features suc │ │ │ +0000da20: 6820 6173 2069 6e64 6972 6563 7420 6275 h as indirect bu │ │ │ +0000da30: 6666 6572 732c 2074 7479 2d65 7261 7365 ffers, tty-erase │ │ │ +0000da40: 2d63 6861 722c 5c6e 7361 7665 2d63 7572 -char,\nsave-cur │ │ │ +0000da50: 7265 6e74 2d62 7566 6665 7220 616e 6420 rent-buffer and │ │ │ +0000da60: 6672 6965 6e64 732c 2064 6562 7567 2d69 friends, debug-i │ │ │ +0000da70: 676e 6f72 6564 2d65 7272 6f72 732c 2065 gnored-errors, e │ │ │ +0000da80: 7463 2e20 2048 6520 616c 736f 5c6e 7772 tc. He also\nwr │ │ │ +0000da90: 6f74 6520 6c69 6e65 206e 756d 6265 7269 ote line numberi │ │ │ +0000daa0: 6e67 206f 7074 696d 697a 6174 696f 6e73 ng optimizations │ │ │ +0000dab0: 2066 6f72 206c 6172 6765 2062 7566 6665 for large buffe │ │ │ +0000dac0: 7273 2c20 696e 6974 6961 6c20 7375 7070 rs, initial supp │ │ │ +0000dad0: 6f72 745c 6e66 6f72 2054 5459 2066 7261 ort\nfor TTY fra │ │ │ +0000dae0: 6d65 732c 2061 6262 7265 7620 696d 7072 mes, abbrev impr │ │ │ +0000daf0: 6f76 656d 656e 7473 2c20 4c69 7370 2070 ovements, Lisp p │ │ │ +0000db00: 7269 6e74 6572 2061 6e64 2072 6561 6465 rinter and reade │ │ │ +0000db10: 725c 6e69 6d70 726f 7665 6d65 6e74 732c r\nimprovements, │ │ │ +0000db20: 2073 7570 706f 7274 2066 6f72 2065 7874 support for ext │ │ │ +0000db30: 656e 7420 6d6f 6469 6669 6361 7469 6f6e ent modification │ │ │ +0000db40: 2066 756e 6374 696f 6e73 2c20 616e 6420 functions, and │ │ │ +0000db50: 6c6f 7473 206f 665c 6e6d 696e 6f72 2062 lots of\nminor b │ │ │ +0000db60: 7567 6669 7865 732c 206f 7074 696d 697a ugfixes, optimiz │ │ │ +0000db70: 6174 696f 6e73 2c20 616e 6420 4d75 6c65 ations, and Mule │ │ │ +0000db80: 6966 6963 6174 696f 6e73 2e5c 6e5c 6e48 ifications.\n\nH │ │ │ +0000db90: 6520 636f 6e74 7269 6275 7465 6420 746f e contributed to │ │ │ +0000dba0: 204c 6973 7072 6566 2061 6e64 2049 6e74 Lispref and Int │ │ │ +0000dbb0: 6572 6e61 6c73 2064 6f63 756d 656e 7461 ernals documenta │ │ │ +0000dbc0: 7469 6f6e 2c20 696e 636c 7564 696e 6720 tion, including │ │ │ +0000dbd0: 615c 6e73 6563 7469 6f6e 206f 6e20 7772 a\nsection on wr │ │ │ +0000dbe0: 6974 696e 6720 4d75 6c65 2d63 6f6d 706c iting Mule-compl │ │ │ +0000dbf0: 6961 6e74 2043 2063 6f64 652e 2020 4d61 iant C code. Ma │ │ │ +0000dc00: 696e 7461 696e 7320 4e45 5753 2e20 2048 intains NEWS. H │ │ │ +0000dc10: 655c 6e70 6172 7469 6369 7061 7465 6420 e\nparticipated │ │ │ +0000dc20: 6f6e 2078 656d 6163 732d 6265 7461 2073 on xemacs-beta s │ │ │ +0000dc30: 696e 6365 2031 3939 3620 616e 6420 6f6e ince 1996 and on │ │ │ +0000dc40: 2074 6865 2050 6174 6368 2052 6576 6965 the Patch Revie │ │ │ +0000dc50: 7720 426f 6172 645c 6e73 696e 6365 2069 w Board\nsince i │ │ │ +0000dc60: 7473 2069 6e63 6570 7469 6f6e 2069 6e20 ts inception in │ │ │ +0000dc70: 3139 3938 2e5c 6e22 2068 6f62 6c65 7920 1998.\n" hobley │ │ │ +0000dc80: 2243 7265 6174 6f72 206f 6620 7468 6520 "Creator of the │ │ │ +0000dc90: 6561 726c 6965 7374 2076 6572 7369 6f6e earliest version │ │ │ +0000dca0: 206f 6620 7468 6520 4d53 2057 696e 646f of the MS Windo │ │ │ +0000dcb0: 7773 2070 6f72 7420 6f66 2058 456d 6163 ws port of XEmac │ │ │ +0000dcc0: 732e 5c6e 2220 6a61 6e20 2241 7061 7274 s.\n" jan "Apart │ │ │ +0000dcd0: 2066 726f 6d20 6875 6e74 696e 6720 646f from hunting do │ │ │ +0000dce0: 776e 2072 6564 6973 706c 6179 2062 7567 wn redisplay bug │ │ │ +0000dcf0: 7320 4a61 6e20 6861 7320 776f 726b 6564 s Jan has worked │ │ │ +0000dd00: 206f 6e20 7375 6368 5c6e 7468 696e 6773 on such\nthings │ │ │ +0000dd10: 2061 7320 696d 7072 6f76 656d 656e 7473 as improvements │ │ │ +0000dd20: 2074 6f20 7468 6520 7061 636b 6167 6520 to the package │ │ │ +0000dd30: 7379 7374 656d 2c20 696d 706c 656d 656e system, implemen │ │ │ +0000dd40: 7469 6e67 206c 617a 792d 7368 6f74 2c5c ting lazy-shot,\ │ │ │ +0000dd50: 6e61 2073 686f 7274 2073 7469 6e74 2061 na short stint a │ │ │ +0000dd60: 7420 7472 6163 6b69 6e67 2070 6174 6368 t tracking patch │ │ │ +0000dd70: 6573 2061 6e64 2063 7572 7265 6e74 6c79 es and currently │ │ │ +0000dd80: 2061 6374 7320 6173 2061 2067 7561 7264 acts as a guard │ │ │ +0000dd90: 6961 6e5c 6e6f 6620 7468 6520 5845 6d61 ian\nof the XEma │ │ │ +0000dda0: 6373 2063 7573 746f 6d20 7375 6273 7973 cs custom subsys │ │ │ +0000ddb0: 7465 6d20 616e 6420 676e 7573 6572 762e tem and gnuserv. │ │ │ +0000ddc0: 5c6e 2220 6a61 7265 7468 2022 4f77 6e65 \n" jareth "Owne │ │ │ +0000ddd0: 7220 6f66 2063 7673 2e78 656d 6163 732e r of cvs.xemacs. │ │ │ +0000dde0: 6f72 672c 2074 6865 206d 6163 6869 6e65 org, the machine │ │ │ +0000ddf0: 2074 6861 7420 686f 6c64 7320 7468 6520 that holds the │ │ │ +0000de00: 5845 6d61 6373 2043 5653 5c6e 7265 706f XEmacs CVS\nrepo │ │ │ +0000de10: 7369 746f 7279 2c20 616e 6420 6175 7468 sitory, and auth │ │ │ +0000de20: 6f72 206f 6620 736f 6d65 206f 6620 7468 or of some of th │ │ │ +0000de30: 6520 6772 6170 6869 6373 2063 6f64 6520 e graphics code │ │ │ +0000de40: 696e 2058 456d 6163 732e 5c6e 2220 6a61 in XEmacs.\n" ja │ │ │ +0000de50: 7320 2257 726f 7465 2061 6e64 2f6f 7220 s "Wrote and/or │ │ │ +0000de60: 696e 7465 6772 6174 6564 2073 6576 6572 integrated sever │ │ │ +0000de70: 616c 2070 6163 6b61 6765 7320 666f 7220 al packages for │ │ │ +0000de80: 476e 7573 2c20 7375 6368 2061 735c 6e73 Gnus, such as\ns │ │ │ +0000de90: 7570 706f 7274 2066 6f72 2049 4d41 502c upport for IMAP, │ │ │ +0000dea0: 2053 6965 7665 2c20 666f 726d 6174 3d66 Sieve, format=f │ │ │ +0000deb0: 6c6f 7765 642c 2047 6e75 544c 532c 2053 lowed, GnuTLS, S │ │ │ +0000dec0: 2f4d 494d 452c 2061 6e64 2050 4750 2e5c /MIME, and PGP.\ │ │ │ +0000ded0: 6e49 7272 6567 756c 6172 6c79 2073 796e nIrregularly syn │ │ │ +0000dee0: 6368 726f 6e69 7a65 7320 6c69 7370 2063 chronizes lisp c │ │ │ +0000def0: 6f64 6520 6265 7477 6565 6e20 456d 6163 ode between Emac │ │ │ +0000df00: 7320 616e 6420 5845 6d61 6373 2e20 2048 s and XEmacs. H │ │ │ +0000df10: 655c 6e6d 6169 6e74 6169 6e73 2074 6865 e\nmaintains the │ │ │ +0000df20: 206d 6169 6c2d 6c69 622c 2073 6965 7665 mail-lib, sieve │ │ │ +0000df30: 2c20 7361 736c 2c20 7067 6720 616e 6420 , sasl, pgg and │ │ │ +0000df40: 6563 7279 7074 6f20 5845 6d61 6373 5c6e ecrypto XEmacs\n │ │ │ +0000df50: 7061 636b 6167 6573 2e20 204f 7065 7261 packages. Opera │ │ │ +0000df60: 7465 7320 7468 6520 7365 636f 6e64 6172 tes the secondar │ │ │ +0000df70: 7920 444e 5320 616e 6420 6d61 696c 2073 y DNS and mail s │ │ │ +0000df80: 6572 7665 7220 666f 725c 6e78 656d 6163 erver for\nxemac │ │ │ +0000df90: 732e 6f72 672e 5c6e 2220 6a61 736f 6e20 s.org.\n" jason │ │ │ +0000dfa0: 2242 6574 6120 7465 7374 6572 2c20 6d61 "Beta tester, ma │ │ │ +0000dfb0: 6e61 6765 7220 6f66 2074 6865 2076 6172 nager of the var │ │ │ +0000dfc0: 696f 7573 2058 456d 6163 7320 6d61 696c ious XEmacs mail │ │ │ +0000dfd0: 696e 6720 6c69 7374 7320 616e 6420 6269 ing lists and bi │ │ │ +0000dfe0: 6e61 7279 5c6e 6b69 7420 6d61 6e61 6765 nary\nkit manage │ │ │ +0000dff0: 722e 2020 416c 736f 2c20 6f72 6967 696e r. Also, origin │ │ │ +0000e000: 6174 6f72 2061 6e64 206d 6169 6e74 6169 ator and maintai │ │ │ +0000e010: 6e65 7220 6f66 2074 6865 2067 6e75 732e ner of the gnus. │ │ │ +0000e020: 6f72 6720 646f 6d61 696e 2e5c 6e22 206a org domain.\n" j │ │ │ +0000e030: 656e 7320 224a 656e 7320 6469 6420 7468 ens "Jens did th │ │ │ +0000e040: 6520 6172 7477 6f72 6b20 666f 7220 6772 e artwork for gr │ │ │ +0000e050: 6170 6869 6373 2061 6464 6564 2074 6f20 aphics added to │ │ │ +0000e060: 5845 6d61 6373 2032 302e 3220 616e 6420 XEmacs 20.2 and │ │ │ +0000e070: 3139 2e31 352e 2048 6527 735c 6e61 6c73 19.15. He's\nals │ │ │ +0000e080: 6f20 7468 6520 6175 7468 6f72 206f 6620 o the author of │ │ │ +0000e090: 5c22 5845 6d61 6373 204d 696e 655c 222c \"XEmacs Mine\", │ │ │ +0000e0a0: 2061 2067 616d 6520 7369 6d69 6c61 7220 a game similar │ │ │ +0000e0b0: 746f 204d 696e 6573 7765 6570 6572 2c20 to Minesweeper, │ │ │ +0000e0c0: 6275 745c 6e72 756e 6e69 6e67 2069 6e20 but\nrunning in │ │ │ +0000e0d0: 5845 6d61 6373 5c6e 2220 6a6d 696c 6c65 XEmacs\n" jmille │ │ │ +0000e0e0: 7220 2242 6574 6120 7465 7374 6572 2061 r "Beta tester a │ │ │ +0000e0f0: 6e64 206c 6173 7420 6861 636b 6572 206f nd last hacker o │ │ │ +0000e100: 6620 6361 6c65 6e64 6172 2e5c 6e22 206a f calendar.\n" j │ │ │ +0000e110: 6f6e 6174 6861 6e20 2249 2073 7461 7274 onathan "I start │ │ │ +0000e120: 6564 2074 6865 206e 6174 6976 6520 706f ed the native po │ │ │ +0000e130: 7274 206f 6620 5845 6d61 6373 2074 6f20 rt of XEmacs to │ │ │ +0000e140: 4d53 2057 696e 646f 7773 2e20 4175 7468 MS Windows. Auth │ │ │ +0000e150: 6f72 206f 6620 7468 655c 6e57 696e 646f or of the\nWindo │ │ │ +0000e160: 7773 2066 7261 6d65 2c20 7265 6469 7370 ws frame, redisp │ │ │ +0000e170: 6c61 792c 2066 6163 6520 616e 6420 6576 lay, face and ev │ │ │ +0000e180: 656e 7420 6c6f 6f70 2073 7570 706f 7274 ent loop support │ │ │ +0000e190: 2e5c 6e22 206a 7568 7020 2241 7574 686f .\n" juhp "Autho │ │ │ +0000e1a0: 7220 6f66 205c 2266 696e 642d 6675 6e63 r of \"find-func │ │ │ +0000e1b0: 2e65 6c5c 222c 2069 6d70 726f 7665 6d65 .el\", improveme │ │ │ +0000e1c0: 6e74 7320 746f 205c 2268 656c 702e 656c nts to \"help.el │ │ │ +0000e1d0: 5c22 2061 6e64 2061 2067 6f6f 645c 6e6e \" and a good\nn │ │ │ +0000e1e0: 756d 6265 7220 6f66 2062 7567 2066 6978 umber of bug fix │ │ │ +0000e1f0: 6573 2064 7572 696e 6720 4a75 6e65 2031 es during June 1 │ │ │ +0000e200: 3939 3720 746f 2044 6563 656d 6265 7220 997 to December │ │ │ +0000e210: 3139 3938 2e5c 6e22 206a 777a 2022 4372 1998.\n" jwz "Cr │ │ │ +0000e220: 6561 746f 7220 616e 6420 6d61 696e 7461 eator and mainta │ │ │ +0000e230: 696e 6572 206f 6620 4c75 6369 6420 456d iner of Lucid Em │ │ │ +0000e240: 6163 7320 2874 6865 2070 7265 6465 6365 acs (the predece │ │ │ +0000e250: 7373 6f72 206f 6620 5845 6d61 6373 292c ssor of XEmacs), │ │ │ +0000e260: 5c6e 6672 6f6d 2031 3939 3120 7468 726f \nfrom 1991 thro │ │ │ +0000e270: 7567 6820 6d69 642d 3139 3934 2e5c 6e22 ugh mid-1994.\n" │ │ │ +0000e280: 206b 617a 7a20 2249 454e 4147 4120 4b61 kazz "IENAGA Ka │ │ │ +0000e290: 7a75 7975 6b69 2069 7320 7468 6520 5845 zuyuki is the XE │ │ │ +0000e2a0: 6d61 6373 2074 6563 686e 6963 616c 206c macs technical l │ │ │ +0000e2b0: 6561 6420 6f6e 2042 5344 2c20 7061 7274 ead on BSD, part │ │ │ +0000e2c0: 6963 756c 6172 6c79 5c6e 4672 6565 4253 icularly\nFreeBS │ │ │ +0000e2d0: 442e 5c6e 2220 6b69 7269 6c6c 2022 4162 D.\n" kirill "Ab │ │ │ +0000e2e0: 7374 7261 6374 6564 2074 6865 2073 7562 stracted the sub │ │ │ +0000e2f0: 7072 6f63 6573 7320 636f 6465 2061 6e64 process code and │ │ │ +0000e300: 2077 726f 7465 206d 7563 6820 6f66 2074 wrote much of t │ │ │ +0000e310: 6865 204d 5320 5769 6e64 6f77 735c 6e73 he MS Windows\ns │ │ │ +0000e320: 7570 706f 7274 2069 6e20 5845 6d61 6373 upport in XEmacs │ │ │ +0000e330: 2c20 696e 636c 7564 696e 6720 7468 6520 , including the │ │ │ +0000e340: 7375 6270 726f 6365 7373 2069 6e74 6572 subprocess inter │ │ │ +0000e350: 6661 6365 2c20 6469 616c 6f67 2062 6f78 face, dialog box │ │ │ +0000e360: 6573 2c5c 6e70 7269 6e74 696e 6720 7375 es,\nprinting su │ │ │ +0000e370: 7070 6f72 742c 2061 6e64 206d 7563 6820 pport, and much │ │ │ +0000e380: 6f66 2074 6865 2065 7665 6e74 206c 6f6f of the event loo │ │ │ +0000e390: 702e 5c6e 2220 6b79 6c65 2022 4175 7468 p.\n" kyle "Auth │ │ │ +0000e3a0: 6f72 206f 6620 564d 2c20 6120 6d61 696c or of VM, a mail │ │ │ +0000e3b0: 2d72 6561 6469 6e67 2070 6163 6b61 6765 -reading package │ │ │ +0000e3c0: 2074 6861 7420 6973 2069 6e63 6c75 6465 that is include │ │ │ +0000e3d0: 6420 696e 2074 6865 2073 7461 6e64 6172 d in the standar │ │ │ +0000e3e0: 645c 6e58 456d 6163 7320 6469 7374 7269 d\nXEmacs distri │ │ │ +0000e3f0: 6275 7469 6f6e 2c20 616e 6420 636f 6e74 bution, and cont │ │ │ +0000e400: 7269 6275 746f 7220 6f66 206d 616e 7920 ributor of many │ │ │ +0000e410: 696d 7072 6f76 656d 656e 7473 2061 6e64 improvements and │ │ │ +0000e420: 2062 7567 5c6e 6669 7865 732e 2020 556e bug\nfixes. Un │ │ │ +0000e430: 6c69 6b65 2052 4d41 494c 2061 6e64 204d like RMAIL and M │ │ │ +0000e440: 482d 452c 2056 4d20 7573 6573 2074 6865 H-E, VM uses the │ │ │ +0000e450: 2073 7461 6e64 6172 6420 554e 4958 206d standard UNIX m │ │ │ +0000e460: 6169 6c62 6f78 5c6e 666f 726d 6174 2066 ailbox\nformat f │ │ │ +0000e470: 6f72 2069 7473 2066 6f6c 6465 7273 3b20 or its folders; │ │ │ +0000e480: 7468 7573 2c20 796f 7520 6361 6e20 7573 thus, you can us │ │ │ +0000e490: 6520 564d 2063 6f6e 6375 7272 656e 746c e VM concurrentl │ │ │ +0000e4a0: 7920 7769 7468 206f 7468 6572 5c6e 554e y with other\nUN │ │ │ +0000e4b0: 4958 206d 6169 6c20 7265 6164 6572 7320 IX mail readers │ │ │ +0000e4c0: 7375 6368 2061 7320 4265 726b 656c 6579 such as Berkeley │ │ │ +0000e4d0: 204d 6169 6c20 616e 6420 454c 4d2e 5c6e Mail and ELM.\n │ │ │ +0000e4e0: 5c6e 416c 736f 2072 6577 726f 7465 2074 \nAlso rewrote t │ │ │ +0000e4f0: 6865 206f 626a 6563 7420 616c 6c6f 6361 he object alloca │ │ │ +0000e500: 7469 6f6e 2073 7973 7465 6d20 696e 2058 tion system in X │ │ │ +0000e510: 456d 6163 7320 746f 2073 7570 706f 7274 Emacs to support │ │ │ +0000e520: 2066 756c 6c5c 6e33 322d 6269 7420 706f full\n32-bit po │ │ │ +0000e530: 696e 7465 7273 2061 6e64 2033 312d 6269 inters and 31-bi │ │ │ +0000e540: 7420 696e 7465 6765 7273 2e5c 6e22 206c t integers.\n" l │ │ │ +0000e550: 6172 7369 2022 4175 7468 6f72 206f 6620 arsi "Author of │ │ │ +0000e560: 476e 7573 2074 6865 2055 7365 6e65 7420 Gnus the Usenet │ │ │ +0000e570: 6e65 7773 2061 6e64 204d 6169 6c20 7265 news and Mail re │ │ │ +0000e580: 6164 696e 6720 7061 636b 6167 6520 696e ading package in │ │ │ +0000e590: 2074 6865 5c6e 7374 616e 6461 7264 2058 the\nstandard X │ │ │ +0000e5a0: 456d 6163 7320 6469 7374 7269 6275 7469 Emacs distributi │ │ │ +0000e5b0: 6f6e 2c20 616e 6420 636f 6e74 7269 6275 on, and contribu │ │ │ +0000e5c0: 746f 7220 6f66 2076 6172 696f 7573 2065 tor of various e │ │ │ +0000e5d0: 6e68 616e 6365 6d65 6e74 735c 6e61 6e64 nhancements\nand │ │ │ +0000e5e0: 2070 6f72 7461 6269 6c69 7479 2066 6978 portability fix │ │ │ +0000e5f0: 6573 2e5c 6e22 206d 6172 6370 6120 6d61 es.\n" marcpa ma │ │ │ +0000e600: 7274 696e 2022 4265 7461 2072 656c 6561 rtin "Beta relea │ │ │ +0000e610: 7365 206d 616e 6167 6572 2061 6e64 2061 se manager and a │ │ │ +0000e620: 7574 686f 7220 6f66 206d 616e 7920 7374 uthor of many st │ │ │ +0000e630: 6162 696c 6974 7920 6669 7865 7320 616e ability fixes an │ │ │ +0000e640: 6420 7370 6565 645c 6e69 6d70 726f 7665 d speed\nimprove │ │ │ +0000e650: 6d65 6e74 7320 696e 2058 456d 6163 732e ments in XEmacs. │ │ │ +0000e660: 5c6e 2220 6d63 6f6f 6b20 2241 7574 686f \n" mcook "Autho │ │ │ +0000e670: 7220 6f66 2074 6865 205c 2273 6879 2067 r of the \"shy g │ │ │ +0000e680: 726f 7570 735c 2220 616e 6420 6d69 6e69 roups\" and mini │ │ │ +0000e690: 6d61 6c20 6d61 7463 6869 6e67 2072 6567 mal matching reg │ │ │ +0000e6a0: 756c 6172 2065 7870 7265 7373 696f 6e5c ular expression\ │ │ │ +0000e6b0: 6e65 7874 656e 7369 6f6e 732e 5c6e 2220 nextensions.\n" │ │ │ +0000e6c0: 6d6c 7920 2245 6172 6c79 2063 6f64 6520 mly "Early code │ │ │ +0000e6d0: 636f 6e74 7269 6275 746f 7220 746f 204c contributor to L │ │ │ +0000e6e0: 7563 6964 2045 6d61 6373 2e20 2053 796e ucid Emacs. Syn │ │ │ +0000e6f0: 6368 6564 2075 7020 4c75 6369 6420 456d ched up Lucid Em │ │ │ +0000e700: 6163 7320 7769 7468 5c6e 7468 6520 6669 acs with\nthe fi │ │ │ +0000e710: 7273 7420 6163 7475 616c 2072 656c 6561 rst actual relea │ │ │ +0000e720: 7365 206f 6620 474e 5520 456d 6163 7320 se of GNU Emacs │ │ │ +0000e730: 3139 2c20 616e 6420 6172 6368 6974 6563 19, and architec │ │ │ +0000e740: 7465 6420 616e 6420 7772 6f74 655c 6e74 ted and wrote\nt │ │ │ +0000e750: 6865 2066 6972 7374 2076 6572 7369 6f6e he first version │ │ │ +0000e760: 206f 6620 5845 6d61 6373 2773 206f 626a of XEmacs's obj │ │ │ +0000e770: 6563 7420 616c 6c6f 6361 7469 6f6e 2073 ect allocation s │ │ │ +0000e780: 7973 7465 6d2e 5c6e 2220 6d6f 7269 6f6b ystem.\n" moriok │ │ │ +0000e790: 6120 2249 2061 6d20 7468 6520 6175 7468 a "I am the auth │ │ │ +0000e7a0: 6f72 206f 6620 746d 2d76 6965 7720 2867 or of tm-view (g │ │ │ +0000e7b0: 656e 6572 616c 204d 494d 4520 5669 6577 eneral MIME View │ │ │ +0000e7c0: 6572 2066 6f72 2047 4e55 2045 6d61 6373 er for GNU Emacs │ │ │ +0000e7d0: 2920 616e 645c 6e6d 616a 6f72 2061 7574 ) and\nmajor aut │ │ │ +0000e7e0: 686f 7220 616e 6420 6d61 696e 7461 696e hor and maintain │ │ │ +0000e7f0: 6572 206f 6620 746d 2028 546f 6f6c 7320 er of tm (Tools │ │ │ +0000e800: 666f 7220 4d49 4d45 3b20 6765 6e65 7261 for MIME; genera │ │ │ +0000e810: 6c20 4d49 4d45 5c6e 7061 636b 6167 6520 l MIME\npackage │ │ │ +0000e820: 666f 7220 474e 5520 456d 6163 7329 2e20 for GNU Emacs). │ │ │ +0000e830: 2049 6e20 6164 6469 7469 6f6e 2c20 4920 In addition, I │ │ │ +0000e840: 616d 2077 6f72 6b69 6e67 2074 6f20 756e am working to un │ │ │ +0000e850: 6966 7920 4d55 4c45 2041 5049 5c6e 666f ify MULE API\nfo │ │ │ +0000e860: 7220 456d 6163 7320 616e 6420 5845 6d61 r Emacs and XEma │ │ │ +0000e870: 6373 2e20 2049 6e20 5845 6d61 6373 2c20 cs. In XEmacs, │ │ │ +0000e880: 4920 6861 7665 2070 6f72 7465 6420 6d61 I have ported ma │ │ │ +0000e890: 6e79 206d 756c 6520 6665 6174 7572 6573 ny mule features │ │ │ +0000e8a0: 2e5c 6e22 206d 7461 2022 436f 6e74 7269 .\n" mta "Contri │ │ │ +0000e8b0: 6275 7465 6420 6d69 6e6f 7220 696d 7072 buted minor impr │ │ │ +0000e8c0: 6f76 656d 656e 7473 2074 6f20 7468 6520 ovements to the │ │ │ +0000e8d0: 5769 6e64 6f77 7320 7375 7070 6f72 742c Windows support, │ │ │ +0000e8e0: 2065 7370 6563 6961 6c6c 795c 6e72 656c especially\nrel │ │ │ +0000e8f0: 6174 6564 2074 6f20 7375 6270 726f 6365 ated to subproce │ │ │ +0000e900: 7373 2063 6f6d 6d75 6e69 6361 7469 6f6e ss communication │ │ │ +0000e910: 2061 6e64 2070 6f72 7461 626c 6520 6475 and portable du │ │ │ +0000e920: 6d70 696e 6720 6173 2077 656c 6c20 6173 mping as well as │ │ │ +0000e930: 5c6e 6120 6269 7420 6f66 2067 656e 6572 \na bit of gener │ │ │ +0000e940: 616c 2062 7567 2066 6978 696e 672e 5c6e al bug fixing.\n │ │ │ +0000e950: 2220 6f67 7261 6620 2241 7574 686f 7220 " ograf "Author │ │ │ +0000e960: 6f66 2074 6865 2058 456d 6163 7320 4472 of the XEmacs Dr │ │ │ +0000e970: 6167 276e 2744 726f 7020 4150 492e 5c6e ag'n'Drop API.\n │ │ │ +0000e980: 2220 6f6c 6976 6965 7220 2241 7574 686f " olivier "Autho │ │ │ +0000e990: 7220 6f66 2074 6865 2070 6f72 7461 626c r of the portabl │ │ │ +0000e9a0: 6520 6475 6d70 6572 2e5c 6e22 206f 7363 e dumper.\n" osc │ │ │ +0000e9b0: 6172 2022 4f73 6361 7227 7320 6d61 6a6f ar "Oscar's majo │ │ │ +0000e9c0: 7220 636f 6e74 7269 6275 7469 6f6e 7320 r contributions │ │ │ +0000e9d0: 746f 2058 456d 6163 7320 6172 6520 7468 to XEmacs are th │ │ │ +0000e9e0: 6520 696e 7465 726e 616c 204c 4441 5020 e internal LDAP │ │ │ +0000e9f0: 7375 7070 6f72 745c 6e61 6e64 2074 6865 support\nand the │ │ │ +0000ea00: 2045 5544 4320 7061 636b 6167 652c 2061 EUDC package, a │ │ │ +0000ea10: 6e20 696e 7465 7266 6163 6520 746f 2071 n interface to q │ │ │ +0000ea20: 7565 7279 2076 6172 696f 7573 2064 6972 uery various dir │ │ │ +0000ea30: 6563 746f 7279 2073 6572 7669 6365 735c ectory services\ │ │ │ +0000ea40: 6e69 6e20 6120 756e 6966 6f72 6d20 6d61 nin a uniform ma │ │ │ +0000ea50: 6e6e 6572 2028 7768 656e 2063 6f6d 706f nner (when compo │ │ │ +0000ea60: 7369 6e67 206d 6169 6c20 666f 7220 696e sing mail for in │ │ │ +0000ea70: 7374 616e 6365 292e 5c6e 2220 7065 6c65 stance).\n" pele │ │ │ +0000ea80: 6772 6920 2241 7574 686f 7220 6f66 2045 gri "Author of E │ │ │ +0000ea90: 4f53 2c20 6120 7061 636b 6167 6520 696e OS, a package in │ │ │ +0000eaa0: 636c 7564 6564 2069 6e20 7468 6520 7374 cluded in the st │ │ │ +0000eab0: 616e 6461 7264 2058 456d 6163 7320 6469 andard XEmacs di │ │ │ +0000eac0: 7374 7269 6275 7469 6f6e 5c6e 7468 6174 stribution\nthat │ │ │ +0000ead0: 2069 6e74 6567 7261 7465 7320 5845 6d61 integrates XEma │ │ │ +0000eae0: 6373 2077 6974 6820 7468 6520 5350 4152 cs with the SPAR │ │ │ +0000eaf0: 4377 6f72 6b73 2064 6576 656c 6f70 6d65 Cworks developme │ │ │ +0000eb00: 6e74 2065 6e76 6972 6f6e 6d65 6e74 5c6e nt environment\n │ │ │ +0000eb10: 6672 6f6d 2053 756e 2e20 2050 6173 7420 from Sun. Past │ │ │ +0000eb20: 6c65 6164 2066 6f72 2058 456d 6163 7320 lead for XEmacs │ │ │ +0000eb30: 6174 2053 756e 3b20 6164 766f 6361 7465 at Sun; advocate │ │ │ +0000eb40: 6420 7468 6520 7661 6c69 6469 7479 206f d the validity o │ │ │ +0000eb50: 665c 6e75 7369 6e67 2045 706f 6368 2c20 f\nusing Epoch, │ │ │ +0000eb60: 616e 6420 6c61 7465 7220 4c65 6d61 6373 and later Lemacs │ │ │ +0000eb70: 2c20 6174 2053 756e 2074 6872 6f75 6768 , at Sun through │ │ │ +0000eb80: 2073 6576 6572 616c 2065 6172 6c79 5c6e several early\n │ │ │ +0000eb90: 7072 6f74 6f74 7970 6573 2e5c 6e22 2070 prototypes.\n" p │ │ │ +0000eba0: 657a 2022 4175 7468 6f72 206f 6620 5351 ez "Author of SQ │ │ │ +0000ebb0: 4c20 4d6f 6465 2c20 6564 6974 2d74 6f6f L Mode, edit-too │ │ │ +0000ebc0: 6c62 6172 2c20 6d61 696c 746f 6f6c 2d6d lbar, mailtool-m │ │ │ +0000ebd0: 6f64 652c 2061 6e64 2076 6172 696f 7573 ode, and various │ │ │ +0000ebe0: 206f 7468 6572 5c6e 736d 616c 6c20 7061 other\nsmall pa │ │ │ +0000ebf0: 636b 6167 6573 2077 6974 6820 7661 7279 ckages with vary │ │ │ +0000ec00: 696e 6720 6465 6772 6565 7320 6f66 2075 ing degrees of u │ │ │ +0000ec10: 7365 6675 6c6e 6573 732e 5c6e 2220 7069 sefulness.\n" pi │ │ │ +0000ec20: 7065 7220 2241 7574 686f 7220 6f66 2074 per "Author of t │ │ │ +0000ec30: 6865 2043 7967 7769 6e20 706f 7274 206f he Cygwin port o │ │ │ +0000ec40: 6620 5845 6d61 6373 2069 6e63 6c75 6469 f XEmacs includi │ │ │ +0000ec50: 6e67 2075 6e65 7865 632c 2074 6865 2077 ng unexec, the w │ │ │ +0000ec60: 6964 6765 742c 5c6e 6775 7474 6572 2061 idget,\ngutter a │ │ │ +0000ec70: 6e64 2062 7566 6665 722d 7461 6220 7375 nd buffer-tab su │ │ │ +0000ec80: 7070 6f72 742c 2067 6c79 7068 7320 756e pport, glyphs un │ │ │ +0000ec90: 6465 7220 4d53 2d57 696e 646f 7773 2c20 der MS-Windows, │ │ │ +0000eca0: 746f 6f6c 6261 7273 2075 6e64 6572 5c6e toolbars under\n │ │ │ +0000ecb0: 4d53 2d57 696e 646f 7773 2c20 7468 6520 MS-Windows, the │ │ │ +0000ecc0: 6f72 6967 696e 616c 205c 2266 616b 655c original \"fake\ │ │ │ +0000ecd0: 2220 5845 6d61 6373 2074 6f6f 6c62 6172 " XEmacs toolbar │ │ │ +0000ece0: 2c20 6f75 746c 2d6d 6f75 7365 2066 6f72 , outl-mouse for │ │ │ +0000ecf0: 206d 6f75 7365 5c6e 6765 7374 7572 6520 mouse\ngesture │ │ │ +0000ed00: 6261 7365 6420 6f75 746c 696e 696e 672c based outlining, │ │ │ +0000ed10: 2061 6e64 2074 6865 206f 7269 6769 6e61 and the origina │ │ │ +0000ed20: 6c20 4344 4520 6472 6167 2d6e 2d64 726f l CDE drag-n-dro │ │ │ +0000ed30: 705c 6e73 7570 706f 7274 2e5c 6e22 2070 p\nsupport.\n" p │ │ │ +0000ed40: 6974 746d 616e 2072 6963 6b63 2022 4d61 ittman rickc "Ma │ │ │ +0000ed50: 696e 7461 696e 6572 206f 6620 494c 4953 intainer of ILIS │ │ │ +0000ed60: 502e 5c6e 2220 726f 7365 2022 4175 7468 P.\n" rose "Auth │ │ │ +0000ed70: 6f72 206f 6620 6d61 6e79 2065 7874 656e or of many exten │ │ │ +0000ed80: 7369 6f6e 7320 746f 2074 6865 2060 6578 sions to the `ex │ │ │ +0000ed90: 7465 6e74 7327 2063 6f64 652c 2069 6e63 tents' code, inc │ │ │ +0000eda0: 6c75 6469 6e67 2074 6865 2069 6e69 7469 luding the initi │ │ │ +0000edb0: 616c 5c6e 696d 706c 656d 656e 7461 7469 al\nimplementati │ │ │ +0000edc0: 6f6e 206f 6620 6064 7570 6c69 6361 626c on of `duplicabl │ │ │ +0000edd0: 6527 2070 726f 7065 7274 6965 732e 5c6e e' properties.\n │ │ │ +0000ede0: 2220 726f 7373 696e 6920 2241 7574 686f " rossini "Autho │ │ │ +0000edf0: 7220 6f66 2074 6865 2066 6972 7374 2058 r of the first X │ │ │ +0000ee00: 456d 6163 7320 4641 513b 5c6e 4465 7665 Emacs FAQ;\nDeve │ │ │ +0000ee10: 6c6f 706d 656e 7420 6c65 6164 206f 6e20 lopment lead on │ │ │ +0000ee20: 456d 6163 7320 5370 6561 6b73 2053 7461 Emacs Speaks Sta │ │ │ +0000ee30: 7469 7374 6963 733b 5c6e 4173 7369 7374 tistics;\nAssist │ │ │ +0000ee40: 6564 204a 6172 6574 6820 4865 696e 2077 ed Jareth Hein w │ │ │ +0000ee50: 6974 6820 7365 7474 696e 6720 7570 2074 ith setting up t │ │ │ +0000ee60: 6865 204a 6974 7465 7242 7567 2074 7261 he JitterBug tra │ │ │ +0000ee70: 636b 696e 6720 7379 7374 656d 2e5c 6e22 cking system.\n" │ │ │ +0000ee80: 2073 6c62 2022 4d61 696e 7461 696e 6572 slb "Maintainer │ │ │ +0000ee90: 206f 6620 5845 6d61 6373 2066 726f 6d20 of XEmacs from │ │ │ +0000eea0: 3139 3936 2074 6872 6f75 6768 2031 3939 1996 through 199 │ │ │ +0000eeb0: 382e 2020 4175 7468 6f72 206f 6620 7468 8. Author of th │ │ │ +0000eec0: 6520 7061 636b 6167 655c 6e73 7973 7465 e package\nsyste │ │ │ +0000eed0: 6d2e 5c6e 2220 7370 6572 6265 7220 224d m.\n" sperber "M │ │ │ +0000eee0: 696b 6520 706f 7274 6564 2045 4653 2074 ike ported EFS t │ │ │ +0000eef0: 6f20 5845 6d61 6373 2032 3020 616e 6420 o XEmacs 20 and │ │ │ +0000ef00: 696e 7465 6772 6174 6564 2045 4653 2069 integrated EFS i │ │ │ +0000ef10: 6e74 6f20 5845 6d61 6373 2e20 2048 6527 nto XEmacs. He' │ │ │ +0000ef20: 735c 6e61 6c73 6f20 7265 7370 6f6e 7369 s\nalso responsi │ │ │ +0000ef30: 626c 6520 666f 7220 7468 6520 706f 7274 ble for the port │ │ │ +0000ef40: 7320 6f66 2066 6163 656d 656e 752e 656c s of facemenu.el │ │ │ +0000ef50: 2061 6e64 2065 6e72 6963 6865 642e 656c and enriched.el │ │ │ +0000ef60: 2c20 7468 655c 6e63 6f64 6520 746f 2068 , the\ncode to h │ │ │ +0000ef70: 616e 646c 6520 7061 7468 2d66 726f 6262 andle path-frobb │ │ │ +0000ef80: 696e 6720 6174 2073 7461 7274 7570 2066 ing at startup f │ │ │ +0000ef90: 6f72 2074 6865 2058 456d 6163 7320 636f or the XEmacs co │ │ │ +0000efa0: 7265 2061 6e64 2074 6865 5c6e 7061 636b re and the\npack │ │ │ +0000efb0: 6167 6520 7379 7374 656d 2c20 7468 6520 age system, the │ │ │ +0000efc0: 696e 6974 2066 696c 6520 6d69 6772 6174 init file migrat │ │ │ +0000efd0: 696f 6e20 6672 6f6d 202e 656d 6163 7320 ion from .emacs │ │ │ +0000efe0: 746f 5c6e 2e78 656d 6163 732f 696e 6974 to\n.xemacs/init │ │ │ +0000eff0: 2e65 6c2c 2061 6e64 2074 6865 2043 5653 .el, and the CVS │ │ │ +0000f000: 2047 7265 6174 2054 7275 6e6b 204d 6f76 Great Trunk Mov │ │ │ +0000f010: 652e 5c6e 2220 7374 6967 2022 496d 706c e.\n" stig "Impl │ │ │ +0000f020: 656d 656e 7465 6420 7468 6520 6661 7374 emented the fast │ │ │ +0000f030: 6572 2073 7461 792d 7570 204c 7563 6964 er stay-up Lucid │ │ │ +0000f040: 206d 656e 7573 2061 6e64 2068 7970 6572 menus and hyper │ │ │ +0000f050: 2d61 7072 6f70 6f73 2e5c 6e43 6f6e 7472 -apropos.\nContr │ │ │ +0000f060: 6962 7574 6f72 206f 6620 6d61 6e79 2064 ibutor of many d │ │ │ +0000f070: 6973 7065 7273 6564 2069 6d70 726f 7665 ispersed improve │ │ │ +0000f080: 6d65 6e74 7320 696e 2074 6865 2063 6f72 ments in the cor │ │ │ +0000f090: 6520 4c69 7370 2063 6f64 652c 2061 6e64 e Lisp code, and │ │ │ +0000f0a0: 5c6e 6261 636b 2d73 6561 7420 636f 6e74 \nback-seat cont │ │ │ +0000f0b0: 7269 6275 746f 7220 666f 7220 7365 7665 ributor for seve │ │ │ +0000f0c0: 7261 6c20 6f66 2069 7473 206d 616a 6f72 ral of its major │ │ │ +0000f0d0: 2070 6163 6b61 6765 732e 5c6e 2220 7374 packages.\n" st │ │ │ +0000f0e0: 6967 6220 224d 6169 6e74 6169 6e65 7220 igb "Maintainer │ │ │ +0000f0f0: 6f66 2074 6865 2052 504d 2070 6163 6b61 of the RPM packa │ │ │ +0000f100: 6765 2e5c 6e22 2074 6869 6573 7365 6c20 ge.\n" thiessel │ │ │ +0000f110: 2244 6f65 7320 6265 7461 2074 6573 7469 "Does beta testi │ │ │ +0000f120: 6e67 2061 6e64 2068 656c 7073 2074 616b ng and helps tak │ │ │ +0000f130: 6520 6361 7265 206f 6620 7468 6520 5845 e care of the XE │ │ │ +0000f140: 6d61 6373 2077 6562 2073 6974 652e 5c6e macs web site.\n │ │ │ +0000f150: 2220 746f 6d6f 6e6f 7269 2074 7563 6b20 " tomonori tuck │ │ │ +0000f160: 7475 726e 6275 6c6c 2022 5265 7370 6f6e turnbull "Respon │ │ │ +0000f170: 7369 626c 6520 666f 7220 6765 7474 696e sible for gettin │ │ │ +0000f180: 6720 7468 6520 6375 7272 656e 7420 7265 g the current re │ │ │ +0000f190: 6c65 6173 6520 6f66 2058 456d 6163 7320 lease of XEmacs │ │ │ +0000f1a0: 6f75 7420 7468 655c 6e64 6f6f 722e 5c6e out the\ndoor.\n │ │ │ +0000f1b0: 2220 7669 6e20 2256 696e 206d 6169 6e74 " vin "Vin maint │ │ │ +0000f1c0: 6169 6e73 2074 6865 2073 7461 626c 6520 ains the stable │ │ │ +0000f1d0: 7665 7273 696f 6e20 6f66 2058 456d 6163 version of XEmac │ │ │ +0000f1e0: 732e 2020 5468 6973 2069 6e76 6f6c 7665 s. This involve │ │ │ +0000f1f0: 7320 7265 7669 6577 696e 675c 6e61 206c s reviewing\na l │ │ │ +0000f200: 6f74 206f 6620 6f74 6865 7220 7065 6f70 ot of other peop │ │ │ +0000f210: 6c65 7327 2070 6174 6368 6573 2061 6e64 les' patches and │ │ │ +0000f220: 2074 6573 7469 6e67 2061 6e64 2061 7070 testing and app │ │ │ +0000f230: 6c79 696e 6720 7468 656d 2e5c 6e48 6520 lying them.\nHe │ │ │ +0000f240: 616c 736f 2067 6574 7320 746f 2067 656e also gets to gen │ │ │ +0000f250: 6572 6174 6520 6869 7320 6f77 6e20 7061 erate his own pa │ │ │ +0000f260: 7463 6865 7320 6672 6f6d 2074 696d 6520 tches from time │ │ │ +0000f270: 746f 2074 696d 652e 2020 4265 696e 675c to time. Being\ │ │ │ +0000f280: 6e72 656c 6561 7365 206d 616e 6167 6572 nrelease manager │ │ │ +0000f290: 2069 7320 6120 6675 6e20 7761 7920 746f is a fun way to │ │ │ +0000f2a0: 2063 6f6e 7472 6962 7574 6520 746f 2074 contribute to t │ │ │ +0000f2b0: 6865 2058 456d 6163 7320 7072 6f6a 6563 he XEmacs projec │ │ │ +0000f2c0: 742e 5c6e 5772 6974 6520 6d65 2061 7420 t.\nWrite me at │ │ │ +0000f2d0: 6163 7340 7865 6d61 6373 2e6f 7267 2069 acs@xemacs.org i │ │ │ +0000f2e0: 6620 796f 7527 7265 2069 6e74 6572 6573 f you're interes │ │ │ +0000f2f0: 7465 6420 696e 206c 6561 726e 696e 6720 ted in learning │ │ │ +0000f300: 6d6f 7265 2e5c 6e22 2076 6c61 6469 6d69 more.\n" vladimi │ │ │ +0000f310: 7220 2246 6f72 6d65 7220 7465 6368 6e69 r "Former techni │ │ │ +0000f320: 6361 6c20 6c65 6164 2066 6f72 2058 456d cal lead for XEm │ │ │ +0000f330: 6163 7320 6174 2053 756e 2e5c 6e22 2077 acs at Sun.\n" w │ │ │ +0000f340: 6d70 6572 7279 2022 4175 7468 6f72 206f mperry "Author o │ │ │ +0000f350: 6620 7468 6520 4754 4b20 7375 7070 6f72 f the GTK suppor │ │ │ +0000f360: 7420 696e 2058 456d 6163 732c 2045 6d61 t in XEmacs, Ema │ │ │ +0000f370: 6373 2d77 3320 2874 6865 2062 7569 6c74 cs-w3 (the built │ │ │ +0000f380: 696e 2077 6562 2062 726f 7773 6572 5c6e in web browser\n │ │ │ +0000f390: 7468 6174 2063 6f6d 6573 2077 6974 6820 that comes with │ │ │ +0000f3a0: 5845 6d61 6373 292c 2061 6e64 2076 6172 XEmacs), and var │ │ │ +0000f3b0: 696f 7573 2061 6464 6974 696f 6e73 2074 ious additions t │ │ │ +0000f3c0: 6f20 7468 6520 4320 636f 6465 2028 652e o the C code (e. │ │ │ +0000f3d0: 672e 2074 6865 5c6e 6461 7461 6261 7365 g. the\ndatabase │ │ │ +0000f3e0: 2073 7570 706f 7274 2c20 7468 6520 504e support, the PN │ │ │ +0000f3f0: 4720 7375 7070 6f72 742c 2073 6f6d 6520 G support, some │ │ │ +0000f400: 6f66 2074 6865 2047 4946 2f4a 5045 4720 of the GIF/JPEG │ │ │ +0000f410: 7375 7070 6f72 742c 2074 6865 5c6e 7374 support, the\nst │ │ │ +0000f420: 7269 6b65 7468 7275 2066 6163 6520 6174 rikethru face at │ │ │ +0000f430: 7472 6962 7574 6520 7375 7070 6f72 7429 tribute support) │ │ │ +0000f440: 2e5c 6e22 2079 6f73 6869 6b69 2079 6f75 .\n" yoshiki you │ │ │ +0000f450: 6e67 7320 224d 6169 6e74 6169 6e65 7220 ngs "Maintainer │ │ │ +0000f460: 616e 6420 7265 6c65 6173 6520 6d61 6e61 and release mana │ │ │ +0000f470: 6765 7220 6f66 2074 6865 2070 6163 6b61 ger of the packa │ │ │ +0000f480: 6765 732e 5c6e 2220 6572 726f 7220 2265 ges.\n" error "e │ │ │ +0000f490: 6361 7365 2066 6169 6c65 643a 2025 732c case failed: %s, │ │ │ +0000f4a0: 2025 7322 2028 6164 7269 616e 2061 6a20 %s" (adrian aj │ │ │ +0000f4b0: 616a 6320 616c 6173 7461 6972 2062 6177 ajc alastair baw │ │ │ +0000f4c0: 2062 656e 2062 7720 6367 7720 6368 7220 ben bw cgw chr │ │ │ +0000f4d0: 6372 6169 6720 6374 686f 6d70 2064 6169 craig cthomp dai │ │ │ +0000f4e0: 6b69 2064 616e 2064 6172 7279 6c6f 2064 ki dan darrylo d │ │ │ +0000f4f0: 6576 696e 2064 6b69 6e64 7265 6420 646d evin dkindred dm │ │ │ +0000f500: 6f6f 7265 2064 6964 6965 7220 6562 2066 oore didier eb f │ │ │ +0000f510: 6162 7269 6365 2067 6f6c 7562 6576 2067 abrice golubev g │ │ │ +0000f520: 756e 6e61 7220 6862 7320 6869 7361 7368 unnar hbs hisash │ │ │ +0000f530: 6920 686d 756c 6c65 7220 686e 696b 7369 i hmuller hniksi │ │ │ +0000f540: 6320 686f 626c 6579 206a 616e 206a 6172 c hobley jan jar │ │ │ +0000f550: 6574 6820 6a61 7320 6a61 736f 6e20 6a65 eth jas jason je │ │ │ +0000f560: 6e73 206a 6d69 6c6c 6572 206a 6f6e 6174 ns jmiller jonat │ │ │ +0000f570: 6861 6e20 6a75 6870 206a 777a 206b 617a han juhp jwz kaz │ │ │ +0000f580: 7a20 6b69 7269 6c6c 206b 796c 6520 6c61 z kirill kyle la │ │ │ +0000f590: 7273 6920 6d61 7263 7061 206d 6172 7469 rsi marcpa marti │ │ │ +0000f5a0: 6e20 6d63 6f6f 6b20 6d6c 7920 6d6f 7269 n mcook mly mori │ │ │ +0000f5b0: 6f6b 6120 6d74 6120 6f67 7261 6620 6f6c oka mta ograf ol │ │ │ +0000f5c0: 6976 6965 7220 6f73 6361 7220 7065 6c65 ivier oscar pele │ │ │ +0000f5d0: 6772 6920 7065 7a20 7069 7065 7220 7069 gri pez piper pi │ │ │ +0000f5e0: 7474 6d61 6e20 7269 636b 6320 726f 7365 ttman rickc rose │ │ │ +0000f5f0: 2072 6f73 7369 6e69 2073 6c62 2073 7065 rossini slb spe │ │ │ +0000f600: 7262 6572 2073 7469 6720 7374 6967 6220 rber stig stigb │ │ │ +0000f610: 7468 6965 7373 656c 2074 6f6d 6f6e 6f72 thiessel tomonor │ │ │ +0000f620: 6920 7475 636b 2074 7572 6e62 756c 6c20 i tuck turnbull │ │ │ +0000f630: 7669 6e20 766c 6164 696d 6972 2077 6d70 vin vladimir wmp │ │ │ +0000f640: 6572 7279 2079 6f73 6869 6b69 2079 6f75 erry yoshiki you │ │ │ +0000f650: 6e67 7329 5d20 345d 290a 2864 6566 616c ngs)] 4]).(defal │ │ │ +0000f660: 6961 7320 2761 626f 7574 2d6d 6169 6e74 ias 'about-maint │ │ │ +0000f670: 6169 6e65 7220 235b 2877 6964 6765 7420 ainer #[(widget │ │ │ +0000f680: 266f 7074 696f 6e61 6c20 6576 656e 7429 &optional event) │ │ │ +0000f690: 2022 c608 210e 20b7 891d 401b 0d41 401c "..!. ...@..A@. │ │ │ +0000f6a0: 0d41 4140 1ac7 c80c 5c22 19c9 0921 3fad .AA@....\"...!?. │ │ │ +0000f6b0: bfca cb21 88cc cdce cfd0 d10b 2125 88ca ...!........!%.. │ │ │ +0000f6c0: d2d3 c7d4 0c5c 22d5 5c22 d623 88d7 5c6e .....\".\".#..\n │ │ │ +0000f6d0: 2188 cad8 2188 d90d 2188 cacb 2188 cad3 !...!...!...!... │ │ │ +0000f6e0: dadb 5c22 2188 dc0d 2188 cacb 2188 ddde ..\"!...!...!... │ │ │ +0000f6f0: 2188 df79 2d87 2220 5b77 6964 6765 7420 !..y-." [widget │ │ │ +0000f700: 6275 666e 616d 6520 6164 6472 6573 7320 bufname address │ │ │ +0000f710: 7768 6f20 6e61 6d65 2065 6e74 7279 2077 who name entry w │ │ │ +0000f720: 6964 6765 742d 7661 6c75 6520 666f 726d idget-value form │ │ │ +0000f730: 6174 2022 2a41 626f 7574 2025 732a 2220 at "*About %s*" │ │ │ +0000f740: 6162 6f75 742d 6765 742d 6275 6666 6572 about-get-buffer │ │ │ +0000f750: 2077 6964 6765 742d 696e 7365 7274 2022 widget-insert " │ │ │ +0000f760: 5c6e 2220 7769 6467 6574 2d63 7265 6174 \n" widget-creat │ │ │ +0000f770: 6520 6465 6661 756c 7420 3a66 6f72 6d61 e default :forma │ │ │ +0000f780: 7420 2225 7422 203a 7461 672d 676c 7970 t "%t" :tag-glyp │ │ │ +0000f790: 6820 6162 6f75 742d 6d61 696e 7461 696e h about-maintain │ │ │ +0000f7a0: 6572 2d67 6c79 7068 2022 5c6e 5c6e 2220 er-glyph "\n\n" │ │ │ +0000f7b0: 6162 6f75 742d 7769 7468 2d66 6163 6520 about-with-face │ │ │ +0000f7c0: 2225 7322 2062 6f6c 6420 2220 3c22 2061 "%s" bold " <" a │ │ │ +0000f7d0: 626f 7574 2d6d 6169 6c74 6f2d 6c69 6e6b bout-mailto-link │ │ │ +0000f7e0: 2022 3e5c 6e5c 6e22 2061 626f 7574 2d70 ">\n\n" about-p │ │ │ +0000f7f0: 6572 736f 6e61 6c2d 696e 666f 2022 436f ersonal-info "Co │ │ │ +0000f800: 6e74 7269 6275 7469 6f6e 7320 746f 2058 ntributions to X │ │ │ +0000f810: 456d 6163 733a 5c6e 5c6e 2220 6162 6f75 Emacs:\n\n" abou │ │ │ +0000f820: 742d 6865 6164 6c69 6e65 2d66 6163 6520 t-headline-face │ │ │ +0000f830: 6162 6f75 742d 6861 636b 6572 2d63 6f6e about-hacker-con │ │ │ +0000f840: 7472 6962 7574 696f 6e20 6162 6f75 742d tribution about- │ │ │ +0000f850: 6669 6e69 7368 2d62 7566 6665 7220 6b69 finish-buffer ki │ │ │ +0000f860: 6c6c 2032 2078 656d 6163 732d 6861 636b ll 2 xemacs-hack │ │ │ +0000f870: 6572 735d 2038 5d29 0a28 6465 6661 6c69 ers] 8]).(defali │ │ │ +0000f880: 6173 2027 6162 6f75 742d 7461 6273 2023 as 'about-tabs # │ │ │ +0000f890: 5b28 7374 7229 2022 0847 8919 c259 ab83 [(str) ".G...Y.. │ │ │ +0000f8a0: c3aa 9109 c459 ab83 c5aa 8909 c659 ab83 .....Y.......Y.. │ │ │ +0000f8b0: c7aa 81c8 2987 2220 5b73 7472 2078 2032 ....)." [str x 2 │ │ │ +0000f8c0: 3420 2220 2220 3136 2022 0922 2038 2022 4 " " 16 "." 8 " │ │ │ +0000f8d0: 0909 2220 2209 0909 225d 2033 5d29 0a28 .." "..."] 3]).( │ │ │ +0000f8e0: 6279 7465 2d63 6f64 6520 22c0 c14e c273 byte-code "..N.s │ │ │ +0000f8f0: ac85 c3c4 c05c 2288 c5c0 c1c6 2387 2220 .....\".....#." │ │ │ +0000f900: 5b61 626f 7574 2d74 6162 7320 6279 7465 [about-tabs byte │ │ │ +0000f910: 2d6f 7074 696d 697a 6572 2028 6e69 6c20 -optimizer (nil │ │ │ +0000f920: 6279 7465 2d63 6f6d 7069 6c65 2d69 6e6c byte-compile-inl │ │ │ +0000f930: 696e 652d 6578 7061 6e64 2920 6572 726f ine-expand) erro │ │ │ +0000f940: 7220 2225 7320 616c 7265 6164 7920 6861 r "%s already ha │ │ │ +0000f950: 7320 6120 6279 7465 2d6f 7074 696d 697a s a byte-optimiz │ │ │ +0000f960: 6572 2c20 6361 6e27 7420 6d61 6b65 2069 er, can't make i │ │ │ +0000f970: 7420 696e 6c69 6e65 2220 7075 7420 6279 t inline" put by │ │ │ +0000f980: 7465 2d63 6f6d 7069 6c65 2d69 6e6c 696e te-compile-inlin │ │ │ +0000f990: 652d 6578 7061 6e64 5d20 3429 0a28 6465 e-expand] 4).(de │ │ │ +0000f9a0: 6661 6c69 6173 2027 6162 6f75 742d 7368 falias 'about-sh │ │ │ +0000f9b0: 6f77 2d6c 696e 6b65 642d 696e 666f 2023 ow-linked-info # │ │ │ +0000f9c0: 5b28 7768 6f29 2022 5c6e 08b7 891c 4140 [(who) "\n....A@ │ │ │ +0000f9d0: 1d0c 4141 4019 c6c7 c8c9 0d50 cacb cccd ..AA@......P.... │ │ │ +0000f9e0: cecd cf0d d05c 6e26 0d88 d10d 891e 1e47 .....\n&.......G │ │ │ +0000f9f0: 891b d259 ab83 d3aa 910b d459 ab83 d5aa ...Y.......Y.... │ │ │ +0000fa00: 890b d659 ab83 d7aa 81d8 2ad9 5c22 88da ...Y......*.\".. │ │ │ +0000fa10: 0921 88d1 db21 88dc 0c21 88d1 dd21 2b87 .!...!...!...!+. │ │ │ +0000fa20: 2220 5b78 656d 6163 732d 6861 636b 6572 " [xemacs-hacker │ │ │ +0000fa30: 7320 6164 6472 6573 7320 7768 6f20 7820 s address who x │ │ │ +0000fa40: 656e 7472 7920 6e61 6d65 2077 6964 6765 entry name widge │ │ │ +0000fa50: 742d 6372 6561 7465 206c 696e 6b20 3a68 t-create link :h │ │ │ +0000fa60: 656c 702d 6563 686f 2022 4669 6e64 206f elp-echo "Find o │ │ │ +0000fa70: 7574 206d 6f72 6520 6162 6f75 7420 2220 ut more about " │ │ │ +0000fa80: 3a61 6374 696f 6e20 6162 6f75 742d 6d61 :action about-ma │ │ │ +0000fa90: 696e 7461 696e 6572 203a 6275 7474 6f6e intainer :button │ │ │ +0000faa0: 2d70 7265 6669 7820 2222 203a 6275 7474 -prefix "" :butt │ │ │ +0000fab0: 6f6e 2d73 7566 6669 7820 3a74 6167 203a on-suffix :tag : │ │ │ +0000fac0: 7661 6c75 6520 7769 6467 6574 2d69 6e73 value widget-ins │ │ │ +0000fad0: 6572 7420 3234 2022 2022 2031 3620 2209 ert 24 " " 16 ". │ │ │ +0000fae0: 2220 3820 2209 0922 2022 0909 0922 2022 " 8 ".." "..." " │ │ │ +0000faf0: 3c22 2061 626f 7574 2d6d 6169 6c74 6f2d <" about-mailto- │ │ │ +0000fb00: 6c69 6e6b 2022 3e5c 6e22 2061 626f 7574 link ">\n" about │ │ │ +0000fb10: 2d68 6163 6b65 722d 636f 6e74 7269 6275 -hacker-contribu │ │ │ +0000fb20: 7469 6f6e 2022 5c6e 2220 7374 725d 2031 tion "\n" str] 1 │ │ │ +0000fb30: 355d 290a 2864 6566 616c 6961 7320 2761 5]).(defalias 'a │ │ │ +0000fb40: 626f 7574 2d68 6163 6b65 7273 2023 5b28 bout-hackers #[( │ │ │ +0000fb50: 2672 6573 7420 6967 6e6f 7265 2920 22c6 &rest ignore) ". │ │ │ +0000fb60: c721 3f85 6608 c81d c9ca 0d21 cb0d cc5c .!?.f......!...\ │ │ │ +0000fb70: 225c 2288 29c9 cdcb cecf 5c22 d023 88d1 "\".).....\".#.. │ │ │ +0000fb80: d20c 5c22 88c9 d3cb d4cf 5c22 d023 88d1 ..\"......\".#.. │ │ │ +0000fb90: d20b 5c22 88c9 d3cb d5cf 5c22 d023 88d1 ..\"......\".#.. │ │ │ +0000fba0: d25c 6e5c 2288 d6d7 2189 19ad 82d7 4b18 .\n\"...!.....K. │ │ │ +0000fbb0: d88e d7d9 4d88 c9da 2188 d7db dc5c 2288 ....M...!....\". │ │ │ +0000fbc0: d7dd de5c 2288 d7df e05c 2288 d7e1 e25c ...\"....\"....\ │ │ │ +0000fbd0: 2288 d7e3 e45c 2288 d7e5 e65c 2288 d7e7 "....\"....\"... │ │ │ +0000fbe0: e85c 2288 d7e9 ea5c 2288 d7eb ec5c 2288 .\"....\"....\". │ │ │ +0000fbf0: d7ed ee5c 2288 d7ef f05c 2288 d7f1 f25c ...\"....\"....\ │ │ │ +0000fc00: 2288 d7f3 f45c 2288 d7f5 f65c 2288 d7f7 "....\"....\"... │ │ │ +0000fc10: f85c 2288 d7f9 fa5c 2288 d7fb fc5c 2288 .\"....\"....\". │ │ │ +0000fc20: d7fd fe5c 2288 d7ff 8140 005c 2288 d781 ...\"....@.\"... │ │ │ +0000fc30: 4100 8142 005c 2288 d781 4300 8144 005c A..B.\"...C..D.\ │ │ │ +0000fc40: 2288 d781 4500 8146 005c 2288 d781 4700 "...E..F.\"...G. │ │ │ +0000fc50: 8148 005c 2288 d781 4900 814a 005c 2288 .H.\"...I..J.\". │ │ │ +0000fc60: d781 4b00 814c 005c 2288 d781 4d00 814e ..K..L.\"...M..N │ │ │ +0000fc70: 005c 2288 d781 4f00 8150 005c 2288 d781 .\"...O..P.\"... │ │ │ +0000fc80: 5100 8152 005c 2288 d781 5300 8154 005c Q..R.\"...S..T.\ │ │ │ +0000fc90: 2288 d781 5500 8156 005c 2288 d781 5700 "...U..V.\"...W. │ │ │ +0000fca0: 8158 005c 2288 d781 5900 815a 005c 2288 .X.\"...Y..Z.\". │ │ │ +0000fcb0: d781 5b00 815c 5c00 5c22 88d7 815d 0081 ..[..\\.\"...].. │ │ │ +0000fcc0: 5e00 5c22 88d7 815f 0081 6000 5c22 88d7 ^.\"..._..`.\".. │ │ │ +0000fcd0: 8161 0081 6200 5c22 88d7 8163 0081 6400 .a..b.\"...c..d. │ │ │ +0000fce0: 5c22 88d7 8165 0081 6600 5c22 88d7 8167 \"...e..f.\"...g │ │ │ +0000fcf0: 0081 6800 5c22 88d7 8169 0081 6a00 5c22 ..h.\"...i..j.\" │ │ │ +0000fd00: 88d7 816b 0081 6c00 5c22 88d7 816d 0081 ...k..l.\"...m.. │ │ │ +0000fd10: 6e00 5c22 88d7 816f 0081 7000 5c22 88d7 n.\"...o..p.\".. │ │ │ +0000fd20: 8171 0081 7200 5c22 88d7 8173 0081 7400 .q..r.\"...s..t. │ │ │ +0000fd30: 5c22 88d7 8175 0081 7600 5c22 88d7 8177 \"...u..v.\"...w │ │ │ +0000fd40: 0081 7800 5c22 88d7 8179 0081 7a00 5c22 ..x.\"...y..z.\" │ │ │ +0000fd50: 88d7 817b 0081 7c00 5c22 88d7 817d 0081 ...{..|.\"...}.. │ │ │ +0000fd60: 7e00 5c22 88d7 817f 0081 8000 5c22 88d7 ~.\"........\".. │ │ │ +0000fd70: 8181 0081 8200 5c22 88d7 8183 0081 8400 ......\"........ │ │ │ +0000fd80: 5c22 88d7 8185 0081 8600 5c22 88d7 8187 \"........\".... │ │ │ +0000fd90: 0081 8800 5c22 88d7 8189 0081 8a00 5c22 ....\"........\" │ │ │ +0000fda0: 88d7 818b 0081 8c00 5c22 88d7 818d 0081 ........\"...... │ │ │ +0000fdb0: 8e00 5c22 88d7 818f 0081 9000 5c22 88d7 ..\"........\".. │ │ │ +0000fdc0: 8191 0081 9200 5c22 88d7 8193 0081 9400 ......\"........ │ │ │ +0000fdd0: 5c22 88d7 8195 0081 9600 5c22 88d7 8197 \"........\".... │ │ │ +0000fde0: 0081 9800 5c22 88d7 8199 0081 9a00 5c22 ....\"........\" │ │ │ +0000fdf0: 88d7 819b 0081 9c00 5c22 88d7 819d 0081 ........\"...... │ │ │ +0000fe00: 9e00 5c22 88d7 819f 0081 a000 5c22 88d7 ..\"........\".. │ │ │ +0000fe10: 81a1 0081 a200 5c22 88d7 81a3 0081 a400 ......\"........ │ │ │ +0000fe20: 5c22 88d7 81a5 0081 a600 5c22 88d7 81a7 \"........\".... │ │ │ +0000fe30: 0081 a800 5c22 88d7 81a9 0081 aa00 5c22 ....\"........\" │ │ │ +0000fe40: 88d7 81ab 0081 ac00 5c22 88d7 81ad 0081 ........\"...... │ │ │ +0000fe50: ae00 5c22 88d7 81af 0081 b000 5c22 88d7 ..\"........\".. │ │ │ +0000fe60: 81b1 0081 b200 5c22 88d7 81b3 0081 b400 ......\"........ │ │ │ +0000fe70: 5c22 88d7 81b5 0081 b600 5c22 88d7 81b7 \"........\".... │ │ │ +0000fe80: 0081 b800 5c22 88d7 81b9 0081 ba00 5c22 ....\"........\" │ │ │ +0000fe90: 88d7 81bb 0081 bc00 5c22 88d7 81bd 0081 ........\"...... │ │ │ +0000fea0: be00 5c22 88d7 81bf 0081 c000 5c22 88d7 ..\"........\".. │ │ │ +0000feb0: 81c1 0081 c200 5c22 88d7 81c3 0081 c400 ......\"........ │ │ │ +0000fec0: 5c22 88d7 81c5 0081 c600 5c22 88d7 81c7 \"........\".... │ │ │ +0000fed0: 0081 c800 5c22 88d7 81c9 0081 ca00 5c22 ....\"........\" │ │ │ +0000fee0: 88d7 81cb 0081 cc00 5c22 88d7 81cd 0081 ........\"...... │ │ │ +0000fef0: ce00 5c22 88d7 81cf 0081 d000 5c22 88d7 ..\"........\".. │ │ │ +0000ff00: 81d1 0081 d200 5c22 88d7 81d3 0081 d400 ......\"........ │ │ │ +0000ff10: 5c22 88d7 81d5 0081 d600 5c22 88d7 81d7 \"........\".... │ │ │ +0000ff20: 0081 d800 5c22 88d7 81d9 0081 da00 5c22 ....\"........\" │ │ │ +0000ff30: 88d7 81db 0081 dc00 5c22 88d7 81dd 0081 ........\"...... │ │ │ +0000ff40: de00 5c22 88d7 81df 0081 e000 5c22 88d7 ..\"........\".. │ │ │ +0000ff50: 81e1 0081 e200 5c22 88d7 81e3 0081 e400 ......\"........ │ │ │ +0000ff60: 5c22 88d7 81e5 0081 e600 5c22 88d7 81e7 \"........\".... │ │ │ +0000ff70: 0081 e800 5c22 88d7 81e9 0081 ea00 5c22 ....\"........\" │ │ │ +0000ff80: 88d7 81eb 0081 ec00 5c22 88d7 81ed 0081 ........\"...... │ │ │ +0000ff90: ee00 5c22 88d7 81ef 0081 f000 5c22 88d7 ..\"........\".. │ │ │ +0000ffa0: 81f1 0081 f200 5c22 88d7 81f3 0081 f400 ......\"........ │ │ │ +0000ffb0: 5c22 88d7 81f5 0081 f600 5c22 88d7 81f7 \"........\".... │ │ │ +0000ffc0: 0081 f800 5c22 88d7 81f9 0081 fa00 5c22 ....\"........\" │ │ │ +0000ffd0: 88d7 81fb 0081 fc00 5c22 88d7 81fd 0081 ........\"...... │ │ │ +0000ffe0: fe00 5c22 88d7 81ff 0081 0001 5c22 88d7 ..\"........\".. │ │ │ +0000fff0: 8101 0181 0201 5c22 88d7 8103 0181 0401 ......\"........ │ │ │ +00010000: 5c22 88d7 8105 0181 0601 5c22 88d7 8107 \"........\".... │ │ │ +00010010: 0181 0801 5c22 88d7 8109 0181 5c6e 015c ....\"......\n.\ │ │ │ +00010020: 2288 d781 0b01 810c 015c 2288 d781 0d01 "........\"..... │ │ │ +00010030: 810e 015c 2288 d781 0f01 8110 015c 2288 ...\"........\". │ │ │ +00010040: d781 0101 8102 015c 2288 d781 1101 8112 .......\"....... │ │ │ +00010050: 015c 2288 d781 1301 8114 015c 2288 d781 .\"........\"... │ │ │ +00010060: 1501 8116 015c 2288 d781 1701 8118 015c .....\"........\ │ │ │ +00010070: 2288 d781 1901 811a 015c 2288 d781 1b01 "........\"..... │ │ │ +00010080: 811c 015c 2288 d781 1d01 811e 015c 2288 ...\"........\". │ │ │ +00010090: d781 1f01 8120 015c 2288 d781 2101 815c ..... .\"...!..\ │ │ │ +000100a0: 2201 5c22 88d7 8123 0181 2401 5c22 88d7 ".\"...#..$.\".. │ │ │ +000100b0: 8125 0181 2601 5c22 88d7 8127 0181 2801 .%..&.\"...'..(. │ │ │ +000100c0: 5c22 88d7 8129 0181 2a01 5c22 88d7 812b \"...)..*.\"...+ │ │ │ +000100d0: 0181 2c01 5c22 88d7 812d 0181 2e01 5c22 ..,.\"...-....\" │ │ │ +000100e0: 88d7 812f 0181 3001 5c22 88d7 8131 0181 .../..0.\"...1.. │ │ │ +000100f0: 3201 5c22 88d7 8133 0181 3401 5c22 88d7 2.\"...3..4.\".. │ │ │ +00010100: 8135 0181 3601 5c22 88d7 8137 0181 3801 .5..6.\"...7..8. │ │ │ +00010110: 5c22 88d7 8139 0181 3a01 5c22 88d7 813b \"...9..:.\"...; │ │ │ +00010120: 0181 3c01 5c22 88d7 813d 0181 3e01 5c22 ..<.\"...=..>.\" │ │ │ +00010130: 88d7 813f 0181 4001 5c22 88d7 8141 0181 ...?..@.\"...A.. │ │ │ +00010140: 4201 5c22 88d7 8143 0181 4401 5c22 88d7 B.\"...C..D.\".. │ │ │ +00010150: 8145 0181 4601 5c22 88d7 8147 0181 4801 .E..F.\"...G..H. │ │ │ +00010160: 5c22 88d7 8149 0181 4a01 5c22 88d7 814b \"...I..J.\"...K │ │ │ +00010170: 0181 4c01 5c22 88d7 814d 0181 4e01 5c22 ..L.\"...M..N.\" │ │ │ +00010180: 88d7 814f 0181 5001 5c22 88d7 8151 0181 ...O..P.\"...Q.. │ │ │ +00010190: 5201 5c22 88d7 8153 0181 5401 5c22 88d7 R.\"...S..T.\".. │ │ │ +000101a0: 8155 0181 5601 5c22 88d7 8157 0181 5801 .U..V.\"...W..X. │ │ │ +000101b0: 5c22 88d7 8159 0181 5a01 5c22 88d7 815b \"...Y..Z.\"...[ │ │ │ +000101c0: 0181 5c5c 015c 2288 d781 5d01 815e 015c ..\\.\"...]..^.\ │ │ │ +000101d0: 2288 d781 5f01 8160 015c 2288 d781 6101 "..._..`.\"...a. │ │ │ +000101e0: 8162 015c 2288 d781 6301 8164 015c 2288 .b.\"...c..d.\". │ │ │ +000101f0: d781 6501 8166 015c 2288 d781 6701 8168 ..e..f.\"...g..h │ │ │ +00010200: 015c 2288 d781 6901 816a 015c 2288 d781 .\"...i..j.\"... │ │ │ +00010210: 6b01 816c 015c 2288 d781 6d01 816e 015c k..l.\"...m..n.\ │ │ │ +00010220: 2288 d781 6f01 8170 015c 2288 d781 7101 "...o..p.\"...q. │ │ │ +00010230: 8172 015c 2288 d781 7301 8174 015c 2288 .r.\"...s..t.\". │ │ │ +00010240: d781 7501 8176 015c 2288 d781 7701 8178 ..u..v.\"...w..x │ │ │ +00010250: 015c 2288 d781 7901 817a 015c 2288 d781 .\"...y..z.\"... │ │ │ +00010260: 7b01 817c 015c 2288 d781 7d01 8178 015c {..|.\"...}..x.\ │ │ │ +00010270: 2288 d781 7e01 817f 015c 2288 d781 8001 "...~....\"..... │ │ │ +00010280: 8181 015c 2288 d781 8201 8183 015c 2288 ...\"........\". │ │ │ +00010290: d781 8401 8185 015c 2288 d781 8601 8187 .......\"....... │ │ │ +000102a0: 015c 2288 d781 8801 8189 015c 2288 d781 .\"........\"... │ │ │ +000102b0: 8a01 818b 015c 2288 d781 8c01 818d 015c .....\"........\ │ │ │ +000102c0: 2288 d781 8e01 818f 015c 2288 d781 9001 "........\"..... │ │ │ +000102d0: 8191 015c 2288 d781 9201 8193 015c 2288 ...\"........\". │ │ │ +000102e0: d781 9401 8195 015c 2288 d781 9601 8197 .......\"....... │ │ │ +000102f0: 015c 2288 d781 9801 8199 015c 2288 d781 .\"........\"... │ │ │ +00010300: 9a01 819b 015c 2288 d781 9c01 819d 015c .....\"........\ │ │ │ +00010310: 2288 d781 9e01 819f 015c 2288 d781 a001 "........\"..... │ │ │ +00010320: 81a1 015c 2288 d781 a201 81a3 015c 2288 ...\"........\". │ │ │ +00010330: d781 a401 81a5 015c 2288 d781 a601 81a7 .......\"....... │ │ │ +00010340: 015c 2288 d781 a801 81a9 015c 2288 d781 .\"........\"... │ │ │ +00010350: aa01 81ab 015c 2288 d781 ac01 81ad 015c .....\"........\ │ │ │ +00010360: 2288 d781 ae01 81af 015c 2288 d781 b001 "........\"..... │ │ │ +00010370: 81b1 015c 2288 d781 b201 81b3 015c 2288 ...\"........\". │ │ │ +00010380: d781 b401 81b5 015c 2288 d781 b601 81b7 .......\"....... │ │ │ +00010390: 015c 2288 d781 b801 81b9 015c 2288 d781 .\"........\"... │ │ │ +000103a0: ba01 81bb 015c 2288 d781 bc01 81bd 015c .....\"........\ │ │ │ +000103b0: 2288 d781 be01 81bf 015c 2288 d781 c001 "........\"..... │ │ │ +000103c0: 81c1 015c 2288 d781 c201 81c3 015c 2288 ...\"........\". │ │ │ +000103d0: d781 c401 81c5 015c 2288 d781 c601 81c7 .......\"....... │ │ │ +000103e0: 015c 2288 d781 c801 81c9 015c 2288 d781 .\"........\"... │ │ │ +000103f0: ca01 81cb 015c 2288 d781 cc01 81cd 015c .....\"........\ │ │ │ +00010400: 2288 d781 ce01 81cf 015c 2288 d781 d001 "........\"..... │ │ │ +00010410: 81d1 015c 2288 d781 d201 81d3 015c 2288 ...\"........\". │ │ │ +00010420: d781 d401 81d5 015c 2288 d781 d601 81d7 .......\"....... │ │ │ +00010430: 015c 2288 d781 d801 81d9 015c 2288 d781 .\"........\"... │ │ │ +00010440: da01 81db 015c 2288 d781 dc01 81dd 015c .....\"........\ │ │ │ +00010450: 2288 d781 de01 81df 015c 2288 d781 e001 "........\"..... │ │ │ +00010460: 81e1 015c 2288 d781 e201 81e3 015c 2288 ...\"........\". │ │ │ +00010470: d781 e401 81e5 015c 2288 d781 e601 81e7 .......\"....... │ │ │ +00010480: 015c 2288 d781 e801 81e9 015c 2288 d781 .\"........\"... │ │ │ +00010490: ea01 81eb 015c 2288 d781 ec01 81ed 015c .....\"........\ │ │ │ +000104a0: 2288 d781 ee01 81ef 015c 2288 d781 f001 "........\"..... │ │ │ +000104b0: 81f1 015c 2288 c9d3 2188 2b81 f201 2087 ...\"...!.+... . │ │ │ +000104c0: 2220 5b23 313d 233a 2d2d 6c65 7466 2d73 " [#1=#:--letf-s │ │ │ +000104d0: 6176 652d 2d33 3539 3139 2023 323d 233a ave--35919 #2=#: │ │ │ +000104e0: 2d2d 6c65 7466 2d62 6f75 6e64 2d2d 3335 --letf-bound--35 │ │ │ +000104f0: 3932 3020 6162 6f75 742d 6f6e 6365 2d61 920 about-once-a │ │ │ +00010500: 6e64 2d66 7574 7572 652d 6861 636b 6572 nd-future-hacker │ │ │ +00010510: 7320 6162 6f75 742d 6f74 6865 722d 6375 s about-other-cu │ │ │ +00010520: 7272 656e 742d 6861 636b 6572 7320 6162 rrent-hackers ab │ │ │ +00010530: 6f75 742d 6375 7272 656e 742d 7265 6c65 out-current-rele │ │ │ +00010540: 6173 652d 6d61 696e 7461 696e 6572 7320 ase-maintainers │ │ │ +00010550: 7469 746c 6520 6162 6f75 742d 6765 742d title about-get- │ │ │ +00010560: 6275 6666 6572 2022 2a41 626f 7574 2043 buffer "*About C │ │ │ +00010570: 6f6e 7472 6962 7574 6f72 732a 2220 2241 ontributors*" "A │ │ │ +00010580: 204c 6567 696f 6e20 6f66 2043 6f6e 7472 Legion of Contr │ │ │ +00010590: 6962 7574 6f72 7320 746f 2058 456d 6163 ibutors to XEmac │ │ │ +000105a0: 7322 2077 6964 6765 742d 696e 7365 7274 s" widget-insert │ │ │ +000105b0: 2061 626f 7574 2d63 656e 7465 7220 6162 about-center ab │ │ │ +000105c0: 6f75 742d 7769 7468 2d66 6163 6520 626f out-with-face bo │ │ │ +000105d0: 6c64 2022 5c6e 5c6e 4c69 6b65 206d 6f73 ld "\n\nLike mos │ │ │ +000105e0: 7420 6672 6565 2073 6f66 7477 6172 652c t free software, │ │ │ +000105f0: 2058 456d 6163 7320 6973 2061 2063 6f6c XEmacs is a col │ │ │ +00010600: 6c61 626f 7261 7469 7665 2065 6666 6f72 laborative effor │ │ │ +00010610: 742e 2020 5468 6573 6520 6172 655c 6e73 t. These are\ns │ │ │ +00010620: 6f6d 6520 6f66 2074 6865 2063 6f6e 7472 ome of the contr │ │ │ +00010630: 6962 7574 6f72 732e 2020 5765 2068 6176 ibutors. We hav │ │ │ +00010640: 6520 6e6f 2064 6f75 6274 2066 6f72 676f e no doubt forgo │ │ │ +00010650: 7474 656e 2073 6f6d 656f 6e65 3b20 7765 tten someone; we │ │ │ +00010660: 5c6e 6170 6f6c 6f67 697a 6521 2020 596f \napologize! Yo │ │ │ +00010670: 7520 6361 6e20 7365 6520 736f 6d65 206f u can see some o │ │ │ +00010680: 6620 6f75 7220 6661 6365 7320 756e 6465 f our faces unde │ │ │ +00010690: 7220 7468 6520 6c69 6e6b 732e 5c6e 5c6e r the links.\n\n │ │ │ +000106a0: 2220 2250 7269 6d61 7279 206d 6169 6e74 " "Primary maint │ │ │ +000106b0: 6169 6e65 7273 2066 6f72 2074 6869 7320 ainers for this │ │ │ +000106c0: 7265 6c65 6173 653a 2220 6162 6f75 742d release:" about- │ │ │ +000106d0: 6865 6164 6c69 6e65 2d66 6163 6520 225c headline-face "\ │ │ │ +000106e0: 6e5c 6e22 206d 6170 6320 6162 6f75 742d n\n" mapc about- │ │ │ +000106f0: 7368 6f77 2d6c 696e 6b65 642d 696e 666f show-linked-info │ │ │ +00010700: 2022 5c6e 2220 224f 7468 6572 206e 6f74 "\n" "Other not │ │ │ +00010710: 6162 6c65 2063 7572 7265 6e74 2068 6163 able current hac │ │ │ +00010720: 6b65 7273 3a22 2022 4f74 6865 7220 6e6f kers:" "Other no │ │ │ +00010730: 7461 626c 6520 6f6e 6365 2061 6e64 2066 table once and f │ │ │ +00010740: 7574 7572 6520 6861 636b 6572 733a 2220 uture hackers:" │ │ │ +00010750: 6662 6f75 6e64 7020 7072 696e 742d 7368 fboundp print-sh │ │ │ +00010760: 6f72 7420 2828 6279 7465 2d63 6f64 6520 ort ((byte-code │ │ │ +00010770: 2209 ab86 c208 4d88 aa84 c3c2 2188 c287 ".....M.....!... │ │ │ +00010780: 2220 5b23 3123 2023 3223 2070 7269 6e74 " [#1# #2# print │ │ │ +00010790: 2d73 686f 7274 2066 6d61 6b75 6e62 6f75 -short fmakunbou │ │ │ +000107a0: 6e64 5d20 3229 2920 235b 286e 616d 6520 nd] 2)) #[(name │ │ │ +000107b0: 6164 6472 2026 6f70 7469 6f6e 616c 2073 addr &optional s │ │ │ +000107c0: 686f 7274 696e 666f 2920 22c5 c60b c75c hortinfo) "....\ │ │ │ +000107d0: 220b 8919 4789 1cc8 59ab 83c9 aa91 0cca "...G...Y....... │ │ │ +000107e0: 59ab 83cb aa89 0ccc 59ab 83cd aa81 ce2a Y.......Y......* │ │ │ +000107f0: cf51 2188 d008 2188 c5d1 5c6e ab85 5c6e .Q!...!...\n..\n │ │ │ +00010800: d250 aa81 d350 2187 2220 5b61 6464 7220 .P...P!." [addr │ │ │ +00010810: 7374 7220 7368 6f72 7469 6e66 6f20 6e61 str shortinfo na │ │ │ +00010820: 6d65 2078 2077 6964 6765 742d 696e 7365 me x widget-inse │ │ │ +00010830: 7274 2061 626f 7574 2d77 6974 682d 6661 rt about-with-fa │ │ │ +00010840: 6365 2069 7461 6c69 6320 3234 2022 2022 ce italic 24 " " │ │ │ +00010850: 2031 3620 2209 2220 3820 2209 0922 2022 16 "." 8 ".." " │ │ │ +00010860: 0909 0922 2022 3c22 2061 626f 7574 2d6d ..." "<" about-m │ │ │ +00010870: 6169 6c74 6f2d 6c69 6e6b 2022 3e5c 6e22 ailto-link ">\n" │ │ │ +00010880: 2022 5c6e 2220 2222 5d20 3620 225c 6e43 "\n" ""] 6 "\nC │ │ │ +00010890: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +000108a0: 6120 6c69 7374 3a5c 6e20 2028 6c61 6d62 a list:\n (lamb │ │ │ +000108b0: 6461 204e 414d 4520 4144 4452 2026 6f70 da NAME ADDR &op │ │ │ +000108c0: 7469 6f6e 616c 2053 484f 5254 494e 464f tional SHORTINFO │ │ │ +000108d0: 295c 6e5c 6e22 5d20 225c 6e49 6e20 6164 )\n\n"] "\nIn ad │ │ │ +000108e0: 6469 7469 6f6e 2074 6f20 7468 6f73 6520 dition to those │ │ │ +000108f0: 6a75 7374 206d 656e 7469 6f6e 6564 2c20 just mentioned, │ │ │ +00010900: 7468 6520 666f 6c6c 6f77 696e 6720 7065 the following pe │ │ │ +00010910: 6f70 6c65 2068 6176 6520 7370 656e 7420 ople have spent │ │ │ +00010920: 615c 6e67 7265 6174 2064 6561 6c20 6f66 a\ngreat deal of │ │ │ +00010930: 2065 6666 6f72 7420 7072 6f76 6964 696e effort providin │ │ │ +00010940: 6720 6665 6564 6261 636b 2c20 7465 7374 g feedback, test │ │ │ +00010950: 696e 6720 6265 7461 2076 6572 7369 6f6e ing beta version │ │ │ +00010960: 7320 6f66 5c6e 5845 6d61 6373 2c20 7072 s of\nXEmacs, pr │ │ │ +00010970: 6f76 6964 696e 6720 7061 7463 6865 7320 oviding patches │ │ │ +00010980: 746f 2074 6865 2073 6f75 7263 6520 636f to the source co │ │ │ +00010990: 6465 2c20 6f72 2064 6f69 6e67 2061 6c6c de, or doing all │ │ │ +000109a0: 206f 6620 7468 655c 6e61 626f 7665 2e20 of the\nabove. │ │ │ +000109b0: 2057 6520 636f 756c 646e 2774 2068 6176 We couldn't hav │ │ │ +000109c0: 6520 646f 6e65 2069 7420 7769 7468 6f75 e done it withou │ │ │ +000109d0: 7420 7468 656d 2e5c 6e5c 6e22 2022 4e61 t them.\n\n" "Na │ │ │ +000109e0: 6769 204d 2e20 4162 6f75 6c65 6e65 696e gi M. Aboulenein │ │ │ +000109f0: 2220 2261 626f 756c 656e 6540 706f 6e64 " "aboulene@pond │ │ │ +00010a00: 6572 2e63 7363 692e 756e 742e 6564 7522 er.csci.unt.edu" │ │ │ +00010a10: 2022 5065 7220 4162 7261 6861 6d73 656e "Per Abrahamsen │ │ │ +00010a20: 2220 2261 6272 6168 616d 4064 696e 612e " "abraham@dina. │ │ │ +00010a30: 6b76 6c2e 646b 2220 2247 6172 7920 4164 kvl.dk" "Gary Ad │ │ │ +00010a40: 616d 7322 2022 6772 6140 7a65 7070 6f2e ams" "gra@zeppo. │ │ │ +00010a50: 4561 7374 2e53 756e 2e43 4f4d 2220 2247 East.Sun.COM" "G │ │ │ +00010a60: 656e 6e61 6479 2041 6772 616e 6f76 2220 ennady Agranov" │ │ │ +00010a70: 2261 6772 616e 6f76 4063 7361 2e43 532e "agranov@csa.CS. │ │ │ +00010a80: 5465 6368 6e69 6f6e 2e41 632e 494c 2220 Technion.Ac.IL" │ │ │ +00010a90: 224d 6172 6b20 416c 6c65 6e64 6572 2220 "Mark Allender" │ │ │ +00010aa0: 2261 6c6c 656e 6465 7240 766e 6574 2e49 "allender@vnet.I │ │ │ +00010ab0: 424d 2e43 4f4d 2220 2253 7465 7068 656e BM.COM" "Stephen │ │ │ +00010ac0: 2052 2e20 416e 6465 7273 6f6e 2220 2273 R. Anderson" "s │ │ │ +00010ad0: 7261 4062 6c6f 6368 2e6c 696e 672e 7961 ra@bloch.ling.ya │ │ │ +00010ae0: 6c65 2e65 6475 2220 2242 7574 6368 2041 le.edu" "Butch A │ │ │ +00010af0: 6e74 6f6e 2220 2262 7574 6368 407a 6170 nton" "butch@zap │ │ │ +00010b00: 686f 642e 7563 6869 6361 676f 2e65 6475 hod.uchicago.edu │ │ │ +00010b10: 2220 2246 7265 6420 4170 7065 6c6d 616e " "Fred Appelman │ │ │ +00010b20: 2220 2246 7265 642e 4170 7065 6c6d 616e " "Fred.Appelman │ │ │ +00010b30: 4063 762e 7275 752e 6e6c 2220 2245 7269 @cv.ruu.nl" "Eri │ │ │ +00010b40: 6b20 5c22 5468 6520 506f 7065 5c22 2041 k \"The Pope\" A │ │ │ +00010b50: 726e 6573 6f6e 2220 226c 617a 6172 7573 rneson" "lazarus │ │ │ +00010b60: 406d 696e 642e 6e65 7422 2022 546f 7220 @mind.net" "Tor │ │ │ +00010b70: 4172 6e74 7365 6e22 2022 746f 7240 7370 Arntsen" "tor@sp │ │ │ +00010b80: 6163 6574 6563 2e6e 6f22 2022 4d61 7263 acetec.no" "Marc │ │ │ +00010b90: 2041 7572 656c 2220 2234 2d74 6561 2d32 Aurel" "4-tea-2 │ │ │ +00010ba0: 4062 6f6e 672e 7361 6172 2e64 6522 2022 @bong.saar.de" " │ │ │ +00010bb0: 4c61 7272 7920 4175 746f 6e22 2022 6c64 Larry Auton" "ld │ │ │ +00010bc0: 6140 636f 6e74 726f 6c2e 6174 742e 636f a@control.att.co │ │ │ +00010bd0: 6d22 2022 4c61 7272 7920 4179 6572 7322 m" "Larry Ayers" │ │ │ +00010be0: 2022 6c61 7965 7273 406d 6172 6b74 7761 "layers@marktwa │ │ │ +00010bf0: 696e 2e6e 6574 2220 224f 7377 616c 6420 in.net" "Oswald │ │ │ +00010c00: 502e 2042 6163 6b75 7320 4956 2220 2262 P. Backus IV" "b │ │ │ +00010c10: 6163 6b75 7340 616c 7461 6772 6f75 702e ackus@altagroup. │ │ │ +00010c20: 636f 6d22 2022 4d69 6b65 2042 6174 7461 com" "Mike Batta │ │ │ +00010c30: 676c 6961 2220 226d 6261 7474 6167 6c40 glia" "mbattagl@ │ │ │ +00010c40: 6473 6363 632e 636f 6d22 2022 4e65 616c dsccc.com" "Neal │ │ │ +00010c50: 2042 6563 6b65 7222 2022 6e65 616c 4063 Becker" "neal@c │ │ │ +00010c60: 7464 2e63 6f6d 7361 742e 636f 6d22 2022 td.comsat.com" " │ │ │ +00010c70: 5061 756c 2042 6962 696c 6f22 2022 7065 Paul Bibilo" "pe │ │ │ +00010c80: 6240 6465 6c63 616d 2e63 6f6d 2220 224c b@delcam.com" "L │ │ │ +00010c90: 656f 6e61 7264 2042 6c61 6e6b 7322 2022 eonard Blanks" " │ │ │ +00010ca0: 6c74 6240 6861 7275 7370 6578 2e64 656d ltb@haruspex.dem │ │ │ +00010cb0: 6f6e 2e63 6f2e 756b 2220 224a 616e 2042 on.co.uk" "Jan B │ │ │ +00010cc0: 6f72 6368 6572 7322 2022 6a6f 6240 746b orchers" "job@tk │ │ │ +00010cd0: 2e75 6e69 2d6c 696e 7a2e 6163 2e61 7422 .uni-linz.ac.at" │ │ │ +00010ce0: 2022 4d61 726b 2042 6f72 6765 7322 2022 "Mark Borges" " │ │ │ +00010cf0: 6d64 6240 6364 632e 6e6f 6161 2e67 6f76 mdb@cdc.noaa.gov │ │ │ +00010d00: 2220 2244 6176 6964 2050 2e20 426f 7377 " "David P. Bosw │ │ │ +00010d10: 656c 6c22 2022 6461 7665 6240 7461 752e ell" "daveb@tau. │ │ │ +00010d20: 7370 6163 652e 7468 696f 6b6f 6c2e 636f space.thiokol.co │ │ │ +00010d30: 6d22 2022 5469 6d20 4272 6164 7368 6177 m" "Tim Bradshaw │ │ │ +00010d40: 2220 2274 6662 4065 6469 6e62 7572 6768 " "tfb@edinburgh │ │ │ +00010d50: 2e61 632e 756b 2220 2252 6963 6b20 4272 .ac.uk" "Rick Br │ │ │ +00010d60: 6175 6d6f 656c 6c65 7222 2022 7269 636b aumoeller" "rick │ │ │ +00010d70: 6240 6d74 692e 7367 692e 636f 6d22 2022 b@mti.sgi.com" " │ │ │ +00010d80: 4d61 7474 6865 7720 4a2e 2042 726f 776e Matthew J. Brown │ │ │ +00010d90: 2220 226d 6a62 4064 6f63 2e69 632e 6163 " "mjb@doc.ic.ac │ │ │ +00010da0: 2e75 6b22 2022 416c 6173 7461 6972 2042 .uk" "Alastair B │ │ │ +00010db0: 7572 7422 2022 6275 7274 4064 666b 692e urt" "burt@dfki. │ │ │ +00010dc0: 756e 692d 6b6c 2e64 6522 2022 4461 7669 uni-kl.de" "Davi │ │ │ +00010dd0: 6420 4275 7368 2220 2264 6176 6964 2e62 d Bush" "david.b │ │ │ +00010de0: 7573 6840 6164 6e2e 616c 6361 7465 6c2e ush@adn.alcatel. │ │ │ +00010df0: 636f 6d22 2022 5269 6368 6172 6420 4361 com" "Richard Ca │ │ │ +00010e00: 6c65 7922 2022 726a 6340 6373 7472 2e65 ley" "rjc@cstr.e │ │ │ +00010e10: 6469 6e62 7572 6768 2e61 632e 756b 2220 dinburgh.ac.uk" │ │ │ +00010e20: 2253 7465 7068 656e 2043 6172 6e65 7922 "Stephen Carney" │ │ │ +00010e30: 2022 6361 726e 6579 4067 7663 2e64 6563 "carney@gvc.dec │ │ │ +00010e40: 2e63 6f6d 2220 224c 6f72 656e 7a6f 204d .com" "Lorenzo M │ │ │ +00010e50: 2e20 4361 7475 6363 6922 2022 6c6f 7265 . Catucci" "lore │ │ │ +00010e60: 6e7a 6f40 6172 676f 6e2e 726f 6d61 322e nzo@argon.roma2. │ │ │ +00010e70: 696e 666e 2e69 7422 2022 5068 696c 6970 infn.it" "Philip │ │ │ +00010e80: 7065 2043 6861 7274 6f6e 2220 2263 6861 pe Charton" "cha │ │ │ +00010e90: 7274 6f6e 406c 6d64 2e65 6e73 2e66 7222 rton@lmd.ens.fr" │ │ │ +00010ea0: 2022 5065 7465 7220 4368 656e 6722 2022 "Peter Cheng" " │ │ │ +00010eb0: 7065 7465 722e 6368 656e 6740 7375 6e2e peter.cheng@sun. │ │ │ +00010ec0: 636f 6d22 2022 4a69 6e20 532e 2043 686f com" "Jin S. Cho │ │ │ +00010ed0: 6922 2022 6a69 6e40 6174 7970 652e 636f i" "jin@atype.co │ │ │ +00010ee0: 6d22 2022 546f 6d61 737a 204a 2e20 4368 m" "Tomasz J. Ch │ │ │ +00010ef0: 6f6c 6577 6f22 2022 746a 6368 6f6c 3031 olewo" "tjchol01 │ │ │ +00010f00: 406d 6563 6361 2e73 7064 2e6c 6f75 6973 @mecca.spd.louis │ │ │ +00010f10: 7669 6c6c 652e 6564 7522 2022 5365 7265 ville.edu" "Sere │ │ │ +00010f20: 6e65 6c6c 6120 4369 6f6e 676f 6c69 2220 nella Ciongoli" │ │ │ +00010f30: 2263 7a73 3030 406c 6164 7962 7567 2e6f "czs00@ladybug.o │ │ │ +00010f40: 6573 2e61 6d64 6168 6c2e 636f 6d22 2022 es.amdahl.com" " │ │ │ +00010f50: 476c 796e 6e20 436c 656d 656e 7473 2220 Glynn Clements" │ │ │ +00010f60: 2267 6c79 6e6e 4073 656e 7365 692e 636f "glynn@sensei.co │ │ │ +00010f70: 2e75 6b22 2022 5269 6368 6172 6420 436f .uk" "Richard Co │ │ │ +00010f80: 676e 6f74 2220 2263 6f67 6e6f 7440 656e gnot" "cognot@en │ │ │ +00010f90: 7367 2e75 2d6e 616e 6379 2e66 7222 2022 sg.u-nancy.fr" " │ │ │ +00010fa0: 416e 6479 2043 6f68 656e 2220 2263 6f68 Andy Cohen" "coh │ │ │ +00010fb0: 656e 4061 6e64 792e 6275 2e65 6475 2220 en@andy.bu.edu" │ │ │ +00010fc0: 2252 6963 6861 7264 2043 6f6c 656d 616e "Richard Coleman │ │ │ +00010fd0: 2220 2263 6f6c 656d 616e 406d 6174 682e " "coleman@math. │ │ │ +00010fe0: 6761 7465 6368 2e65 6475 2220 224d 6175 gatech.edu" "Mau │ │ │ +00010ff0: 726f 2043 6f6e 6461 7265 6c6c 6922 2022 ro Condarelli" " │ │ │ +00011000: 4d43 3536 3836 406d 636c 696e 6b2e 6974 MC5686@mclink.it │ │ │ +00011010: 2220 224e 6963 6b20 4a2e 2043 7261 6274 " "Nick J. Crabt │ │ │ +00011020: 7265 6522 2022 6e69 636b 6340 7363 6f70 ree" "nickc@scop │ │ │ +00011030: 6963 2e63 6f6d 2220 2243 6872 6973 746f ic.com" "Christo │ │ │ +00011040: 7068 6572 2044 6176 6973 2220 2263 6b64 pher Davis" "ckd │ │ │ +00011050: 406b 6569 2e63 6f6d 2220 2253 6f72 656e @kei.com" "Soren │ │ │ +00011060: 2044 6179 746f 6e22 2022 6373 6461 7974 Dayton" "csdayt │ │ │ +00011070: 6f6e 4063 732e 7563 6869 6361 676f 2e65 on@cs.uchicago.e │ │ │ +00011080: 6475 2220 2243 6872 6973 2044 6561 6e22 du" "Chris Dean" │ │ │ +00011090: 2022 6374 6465 616e 4063 6f67 6974 2e63 "ctdean@cogit.c │ │ │ +000110a0: 6f6d 2220 224d 6963 6861 656c 2044 6965 om" "Michael Die │ │ │ +000110b0: 7273 2220 226d 6469 6572 7340 6c6f 6777 rs" "mdiers@logw │ │ │ +000110c0: 6172 652e 6465 2220 2257 696c 6c69 616d are.de" "William │ │ │ +000110d0: 2047 2e20 4475 6275 7175 6522 2022 7767 G. Dubuque" "wg │ │ │ +000110e0: 6440 6d61 7274 6967 6e79 2e61 692e 6d69 d@martigny.ai.mi │ │ │ +000110f0: 742e 6564 7522 2022 5374 6576 6520 4475 t.edu" "Steve Du │ │ │ +00011100: 6e68 616d 2220 2264 756e 6861 6d40 6475 nham" "dunham@du │ │ │ +00011110: 6e68 616d 2e74 6369 6d65 742e 6e65 7422 nham.tcimet.net" │ │ │ +00011120: 2022 5361 6d75 656c 204a 2e20 4561 746f "Samuel J. Eato │ │ │ +00011130: 6e22 2022 7361 6d75 656c 6540 636f 6773 n" "samuele@cogs │ │ │ +00011140: 2e73 7573 782e 6163 2e75 6b22 2022 4361 .susx.ac.uk" "Ca │ │ │ +00011150: 726c 2045 646d 616e 2220 2263 6564 6d61 rl Edman" "cedma │ │ │ +00011160: 6e40 5072 696e 6365 746f 6e2e 4544 5522 n@Princeton.EDU" │ │ │ +00011170: 2022 4461 7665 2045 646d 6f6e 6473 6f6e "Dave Edmondson │ │ │ +00011180: 2220 2264 6176 6964 6564 4073 636f 2e63 " "davided@sco.c │ │ │ +00011190: 6f6d 2220 224a 6f6e 6174 6861 6e20 4564 om" "Jonathan Ed │ │ │ +000111a0: 7761 7264 7322 2022 6564 7761 7264 7340 wards" "edwards@ │ │ │ +000111b0: 696e 7472 616e 6574 2e63 6f6d 2220 2245 intranet.com" "E │ │ │ +000111c0: 7269 6320 4569 6465 2220 2265 6569 6465 ric Eide" "eeide │ │ │ +000111d0: 4061 7379 6c75 6d2e 6373 2e75 7461 682e @asylum.cs.utah. │ │ │ +000111e0: 6564 7522 2022 454b 5222 2022 656b 7240 edu" "EKR" "ekr@ │ │ │ +000111f0: 7465 7269 7361 2e63 6f6d 2220 2244 6176 terisa.com" "Dav │ │ │ +00011200: 6964 2046 6c65 7463 6865 7222 2022 6672 id Fletcher" "fr │ │ │ +00011210: 6f64 6f40 7473 756e 616d 692e 636f 6d22 odo@tsunami.com" │ │ │ +00011220: 2022 5061 756c 2046 6c69 6e64 6572 7322 "Paul Flinders" │ │ │ +00011230: 2022 7074 6640 6465 6c63 616d 2e63 6f2e "ptf@delcam.co. │ │ │ +00011240: 756b 2220 224a 6572 6564 204a 2046 6c6f uk" "Jered J Flo │ │ │ +00011250: 7964 2220 226a 6572 6564 406d 6974 2e65 yd" "jered@mit.e │ │ │ +00011260: 6475 2220 2247 6172 7920 442e 2046 6f73 du" "Gary D. Fos │ │ │ +00011270: 7465 7222 2022 4761 7279 2e46 6f73 7465 ter" "Gary.Foste │ │ │ +00011280: 7240 436f 7270 2e53 756e 2e43 4f4d 2220 r@Corp.Sun.COM" │ │ │ +00011290: 224a 6572 7279 2046 7261 696e 2220 226a "Jerry Frain" "j │ │ │ +000112a0: 6572 7279 4073 6e65 6666 656c 732e 7469 erry@sneffels.ti │ │ │ +000112b0: 766f 6c69 2e63 6f6d 2220 2248 6f6c 6765 voli.com" "Holge │ │ │ +000112c0: 7220 4672 616e 7a22 2022 6866 7261 6e7a r Franz" "hfranz │ │ │ +000112d0: 4070 6879 7369 6b2e 7277 7468 2d61 6163 @physik.rwth-aac │ │ │ +000112e0: 6865 6e2e 6465 2220 2242 656e 6a61 6d69 hen.de" "Benjami │ │ │ +000112f0: 6e20 4672 6965 6422 2022 6266 406d 6f72 n Fried" "bf@mor │ │ │ +00011300: 6761 6e2e 636f 6d22 2022 4261 7272 7920 gan.com" "Barry │ │ │ +00011310: 4672 6965 646d 616e 2220 2266 7269 6564 Friedman" "fried │ │ │ +00011320: 6d61 6e40 6e6f 7274 656c 2e63 6122 2022 man@nortel.ca" " │ │ │ +00011330: 4e6f 6168 2046 7269 6564 6d61 6e22 2022 Noah Friedman" " │ │ │ +00011340: 6672 6965 646d 616e 4073 706c 6f64 652e friedman@splode. │ │ │ +00011350: 636f 6d22 2022 4b61 7a75 796f 7368 6920 com" "Kazuyoshi │ │ │ +00011360: 4675 7275 7461 6b61 2220 2266 7572 7574 Furutaka" "furut │ │ │ +00011370: 616b 6140 466c 7578 2e74 6f6b 6169 2e6a aka@Flux.tokai.j │ │ │ +00011380: 6165 7269 2e67 6f2e 6a70 2220 224c 6577 aeri.go.jp" "Lew │ │ │ +00011390: 2047 6169 7465 7220 4949 4922 2022 6c65 Gaiter III" "le │ │ │ +000113a0: 7740 5374 6172 4669 7265 2e63 6f6d 2220 w@StarFire.com" │ │ │ +000113b0: 2249 7461 7920 4761 7422 2022 6974 6179 "Itay Gat" "itay │ │ │ +000113c0: 4063 732e 6875 6a69 2e61 632e 696c 2220 @cs.huji.ac.il" │ │ │ +000113d0: 2254 696d 2047 6569 736c 6572 2220 2254 "Tim Geisler" "T │ │ │ +000113e0: 696d 2e47 6569 736c 6572 4069 6e66 6f72 im.Geisler@infor │ │ │ +000113f0: 6d61 7469 6b2e 756e 692d 6d75 656e 6368 matik.uni-muench │ │ │ +00011400: 656e 2e64 6522 2022 4461 7665 2047 696c en.de" "Dave Gil │ │ │ +00011410: 6c65 7370 6965 2220 2264 6176 6567 4073 lespie" "daveg@s │ │ │ +00011420: 796e 6170 7469 6373 2e63 6f6d 2220 2243 ynaptics.com" "C │ │ │ +00011430: 6872 6973 7469 616e 2046 2e20 476f 6574 hristian F. Goet │ │ │ +00011440: 7a65 2220 2263 6740 6269 6762 6f6f 6b2e ze" "cg@bigbook. │ │ │ +00011450: 636f 6d22 2022 5975 7375 6620 476f 6f6c com" "Yusuf Gool │ │ │ +00011460: 616d 6162 6261 7322 2022 7975 7375 6667 amabbas" "yusufg │ │ │ +00011470: 4069 7373 2e6e 7573 2e73 6722 2022 576f @iss.nus.sg" "Wo │ │ │ +00011480: 6c66 6761 6e67 2047 7269 6573 6b61 6d70 lfgang Grieskamp │ │ │ +00011490: 2220 2277 6740 6373 2e74 752d 6265 726c " "wg@cs.tu-berl │ │ │ +000114a0: 696e 2e64 6522 2022 4a6f 686e 2047 7269 in.de" "John Gri │ │ │ +000114b0: 6666 6974 6822 2022 6772 6966 6669 7468 ffith" "griffith │ │ │ +000114c0: 4073 6673 2e6e 7068 696c 2e75 6e69 2d74 @sfs.nphil.uni-t │ │ │ +000114d0: 7565 6269 6e67 656e 2e64 6522 2022 4a61 uebingen.de" "Ja │ │ │ +000114e0: 6d65 7320 4772 696e 7465 7222 2022 6a72 mes Grinter" "jr │ │ │ +000114f0: 6740 6465 6d6f 6e2e 6e65 7422 2022 4265 g@demon.net" "Be │ │ │ +00011500: 6e20 4772 6f73 7322 2022 6267 726f 7373 n Gross" "bgross │ │ │ +00011510: 4075 6975 632e 6564 7522 2022 4469 726b @uiuc.edu" "Dirk │ │ │ +00011520: 2047 7275 6e77 616c 6422 2022 6772 756e Grunwald" "grun │ │ │ +00011530: 7761 6c64 4066 6f6f 6261 722e 6373 2e43 wald@foobar.cs.C │ │ │ +00011540: 6f6c 6f72 6164 6f2e 4544 5522 2022 4d69 olorado.EDU" "Mi │ │ │ +00011550: 6368 6165 6c20 4775 656e 7468 6572 2220 chael Guenther" │ │ │ +00011560: 226d 6963 6861 656c 6740 6967 6f72 2e73 "michaelg@igor.s │ │ │ +00011570: 7475 7474 6761 7274 2e6e 6574 7375 7266 tuttgart.netsurf │ │ │ +00011580: 2e64 6522 2022 4469 7061 6e6b 6172 2047 .de" "Dipankar G │ │ │ +00011590: 7570 7461 2220 2264 6740 6870 6c62 2e68 upta" "dg@hplb.h │ │ │ +000115a0: 706c 2e68 702e 636f 6d22 2022 4d61 726b pl.hp.com" "Mark │ │ │ +000115b0: 7573 2047 7574 7363 686b 6522 2022 6775 us Gutschke" "gu │ │ │ +000115c0: 7473 6368 6b40 474f 4544 454c 2e55 4e49 tschk@GOEDEL.UNI │ │ │ +000115d0: 2d4d 5545 4e53 5445 522e 4445 2220 224b -MUENSTER.DE" "K │ │ │ +000115e0: 6169 2048 6162 6572 7a65 7474 6c22 2022 ai Haberzettl" " │ │ │ +000115f0: 6b68 6162 6572 7a40 7379 6e6e 6574 2e64 khaberz@synnet.d │ │ │ +00011600: 6522 2022 4164 616d 2048 616d 6d65 7222 e" "Adam Hammer" │ │ │ +00011610: 2022 6861 6d6d 6572 4063 732e 7075 7264 "hammer@cs.purd │ │ │ +00011620: 7565 2e65 6475 2220 224d 6167 6e75 7320 ue.edu" "Magnus │ │ │ +00011630: 4861 6d6d 6572 696e 2220 226d 6167 6e75 Hammerin" "magnu │ │ │ +00011640: 7368 4065 7061 6374 2e73 6522 2022 4368 sh@epact.se" "Ch │ │ │ +00011650: 616e 6747 696c 2048 616e 2220 2263 6768 angGil Han" "cgh │ │ │ +00011660: 616e 4070 6879 7334 3031 2e70 6879 732e an@phys401.phys. │ │ │ +00011670: 7075 7361 6e2e 6163 2e6b 7222 2022 4465 pusan.ac.kr" "De │ │ │ +00011680: 7265 6b20 4861 7264 696e 6722 2022 6468 rek Harding" "dh │ │ │ +00011690: 6172 6469 6e67 406c 7373 6563 2e62 742e arding@lssec.bt. │ │ │ +000116a0: 636f 2e75 6b22 2022 4d69 6368 6165 6c20 co.uk" "Michael │ │ │ +000116b0: 4861 726e 6f69 7322 2022 6d68 6172 6e6f Harnois" "mharno │ │ │ +000116c0: 6973 4073 6274 2e6e 6574 2220 224a 6f68 is@sbt.net" "Joh │ │ │ +000116d0: 6e20 4861 7862 7922 2022 4a2e 4861 7862 n Haxby" "J.Haxb │ │ │ +000116e0: 7940 6973 6f64 652e 636f 6d22 2022 4b61 y@isode.com" "Ka │ │ │ +000116f0: 726c 204d 2e20 4865 6762 6c6f 6f6d 2220 rl M. Hegbloom" │ │ │ +00011700: 226b 6172 6c68 6567 4069 6e65 7461 7265 "karlheg@inetare │ │ │ +00011710: 6e61 2e63 6f6d 2220 2242 656e 6564 696b na.com" "Benedik │ │ │ +00011720: 7420 4865 696e 656e 2220 2262 6568 4069 t Heinen" "beh@i │ │ │ +00011730: 6365 6d61 726b 2e74 6865 6e65 742e 6368 cemark.thenet.ch │ │ │ +00011740: 2220 2253 7465 7068 616e 2048 6572 726d " "Stephan Herrm │ │ │ +00011750: 616e 6e22 2022 7368 4066 6972 7374 2e67 ann" "sh@first.g │ │ │ +00011760: 6d64 2e64 6522 2022 4175 6775 7374 2048 md.de" "August H │ │ │ +00011770: 696c 6c22 2022 6177 6869 6c6c 4069 6e6c ill" "awhill@inl │ │ │ +00011780: 696e 6b2e 636f 6d22 2022 4d69 6b65 2048 ink.com" "Mike H │ │ │ +00011790: 696c 6c22 2022 6d69 6b65 6869 6c6c 4068 ill" "mikehill@h │ │ │ +000117a0: 6765 6e67 2e63 6f6d 2220 2243 6861 726c geng.com" "Charl │ │ │ +000117b0: 6573 2048 696e 6573 2220 2263 6875 636b es Hines" "chuck │ │ │ +000117c0: 5f68 696e 6573 4056 4e45 542e 4942 4d2e _hines@VNET.IBM. │ │ │ +000117d0: 434f 4d22 2022 5368 616e 6520 486f 6c64 COM" "Shane Hold │ │ │ +000117e0: 6572 2220 2268 6f6c 6465 7240 7273 6e2e er" "holder@rsn. │ │ │ +000117f0: 6870 2e63 6f6d 2220 2243 6872 6973 2048 hp.com" "Chris H │ │ │ +00011800: 6f6c 7422 2022 7872 6973 406d 6967 7261 olt" "xris@migra │ │ │ +00011810: 696e 652e 7374 616e 666f 7264 2e65 6475 ine.stanford.edu │ │ │ +00011820: 2220 2254 6574 7375 7961 2048 4f59 414e " "Tetsuya HOYAN │ │ │ +00011830: 4f22 2022 686f 7961 6e6f 4061 7269 2e62 O" "hoyano@ari.b │ │ │ +00011840: 656b 6b6f 616d 652e 6f72 2e6a 7022 2022 ekkoame.or.jp" " │ │ │ +00011850: 4461 7669 6420 4875 6768 6573 2220 2264 David Hughes" "d │ │ │ +00011860: 6a68 4068 6172 7374 6f6e 2e63 762e 636f jh@harston.cv.co │ │ │ +00011870: 6d22 2022 5475 646f 7220 4875 6c75 6265 m" "Tudor Hulube │ │ │ +00011880: 6922 2022 7475 646f 7240 6373 2e75 6e68 i" "tudor@cs.unh │ │ │ +00011890: 2e65 6475 2220 2254 6174 7375 7961 2049 .edu" "Tatsuya I │ │ │ +000118a0: 6368 696b 6177 6122 2022 6963 6869 6b61 chikawa" "ichika │ │ │ +000118b0: 7761 4068 762e 6570 736f 6e2e 636f 2e6a wa@hv.epson.co.j │ │ │ +000118c0: 7022 2022 416e 6472 6577 2049 6e6e 6573 p" "Andrew Innes │ │ │ +000118d0: 2220 2261 6e64 7265 7769 4068 6172 6c65 " "andrewi@harle │ │ │ +000118e0: 7175 696e 2e63 6f2e 756b 2220 224d 6172 quin.co.uk" "Mar │ │ │ +000118f0: 6b6b 7520 4a61 7276 696e 656e 2220 224d kku Jarvinen" "M │ │ │ +00011900: 6172 6b6b 752e 4a61 7276 696e 656e 4073 arkku.Jarvinen@s │ │ │ +00011910: 696d 7075 6b6b 612e 6675 6e65 742e 6669 impukka.funet.fi │ │ │ +00011920: 2220 2252 6f62 696e 204a 6566 6672 6965 " "Robin Jeffrie │ │ │ +00011930: 7322 2022 726f 6269 6e2e 6a65 6666 7269 s" "robin.jeffri │ │ │ +00011940: 6573 4073 756e 2e63 6f6d 2220 2250 6869 es@sun.com" "Phi │ │ │ +00011950: 6c69 7020 4a6f 686e 736f 6e22 2022 6a6f lip Johnson" "jo │ │ │ +00011960: 686e 736f 6e40 7568 6963 732e 6963 732e hnson@uhics.ics. │ │ │ +00011970: 4861 7761 6969 2e45 6475 2220 224a 2e20 Hawaii.Edu" "J. │ │ │ +00011980: 4b65 616e 204a 6f68 6e73 746f 6e22 2022 Kean Johnston" " │ │ │ +00011990: 6a6b 6a40 7061 7261 6469 676d 2d73 612e jkj@paradigm-sa. │ │ │ +000119a0: 636f 6d22 2022 4a6f 686e 2057 2e20 4a6f com" "John W. Jo │ │ │ +000119b0: 6e65 7322 2022 6a6a 4061 7375 2e65 6475 nes" "jj@asu.edu │ │ │ +000119c0: 2220 2241 6e64 7265 6173 204b 6165 6d70 " "Andreas Kaemp │ │ │ +000119d0: 6622 2022 616e 6472 6561 7340 7363 636f f" "andreas@scco │ │ │ +000119e0: 6e2e 636f 6d22 2022 596f 7368 6961 6b69 n.com" "Yoshiaki │ │ │ +000119f0: 204b 6173 6168 6172 6122 2022 6b61 7361 Kasahara" "kasa │ │ │ +00011a00: 6861 7261 406e 632e 6b79 7573 6875 2d75 hara@nc.kyushu-u │ │ │ +00011a10: 2e61 632e 6a70 2220 2241 6d69 7220 4b61 .ac.jp" "Amir Ka │ │ │ +00011a20: 747a 2220 2261 6d69 7240 6e64 736f 6674 tz" "amir@ndsoft │ │ │ +00011a30: 2e63 6f6d 2220 2244 6f75 6720 4b65 6c6c .com" "Doug Kell │ │ │ +00011a40: 6572 2220 2264 6b65 6c6c 6572 4076 6e65 er" "dkeller@vne │ │ │ +00011a50: 742e 6962 6d2e 636f 6d22 2022 4875 6e74 t.ibm.com" "Hunt │ │ │ +00011a60: 6572 204b 656c 6c79 2220 2272 6574 6e75 er Kelly" "retnu │ │ │ +00011a70: 6840 636f 726f 6e61 2220 2247 7265 676f h@corona" "Grego │ │ │ +00011a80: 7220 4b65 6e6e 6564 7922 2022 6772 6567 r Kennedy" "greg │ │ │ +00011a90: 6f72 6b40 6461 6464 2e74 692e 636f 6d22 ork@dadd.ti.com" │ │ │ +00011aa0: 2022 4d69 6368 6165 6c20 4b69 6665 7222 "Michael Kifer" │ │ │ +00011ab0: 2022 6b69 6665 7240 6373 2e73 756e 7973 "kifer@cs.sunys │ │ │ +00011ac0: 622e 6564 7522 2022 5961 7375 6869 6b6f b.edu" "Yasuhiko │ │ │ +00011ad0: 204b 6975 6368 6922 2022 6b69 7563 6869 Kiuchi" "kiuchi │ │ │ +00011ae0: 4064 7370 2e6b 7370 2e66 756a 6978 6572 @dsp.ksp.fujixer │ │ │ +00011af0: 6f78 2e63 6f2e 6a70 2220 2247 7265 6720 ox.co.jp" "Greg │ │ │ +00011b00: 4b6c 616e 6465 726d 616e 2220 2267 7265 Klanderman" "gre │ │ │ +00011b10: 672e 6b6c 616e 6465 726d 616e 4061 6c75 g.klanderman@alu │ │ │ +00011b20: 6d2e 6d69 742e 6564 7522 2022 5661 6c64 m.mit.edu" "Vald │ │ │ +00011b30: 6973 204b 6c65 746e 6965 6b73 2220 2256 is Kletnieks" "V │ │ │ +00011b40: 616c 6469 732e 4b6c 6574 6e69 656b 7340 aldis.Kletnieks@ │ │ │ +00011b50: 7674 2e65 6475 2220 224e 6f72 6265 7274 vt.edu" "Norbert │ │ │ +00011b60: 204b 6f63 6822 2022 6e2e 6b6f 6368 4064 Koch" "n.koch@d │ │ │ +00011b70: 656c 7461 2d69 692e 6465 2220 2252 6f62 elta-ii.de" "Rob │ │ │ +00011b80: 204b 6f6f 7065 7222 2022 6b6f 6f70 6572 Kooper" "kooper │ │ │ +00011b90: 4063 632e 6761 7465 6368 2e65 6475 2220 @cc.gatech.edu" │ │ │ +00011ba0: 2250 6574 6572 2053 6b6f 7620 4b6e 7564 "Peter Skov Knud │ │ │ +00011bb0: 7365 6e22 2022 6b6e 7540 6464 652e 646b sen" "knu@dde.dk │ │ │ +00011bc0: 2220 224a 656e 7320 4b72 696e 6b65 2220 " "Jens Krinke" │ │ │ +00011bd0: 226b 7269 6e6b 6540 6970 732e 6373 2e74 "krinke@ips.cs.t │ │ │ +00011be0: 752d 6273 2e64 6522 2022 4d61 7869 6d69 u-bs.de" "Maximi │ │ │ +00011bf0: 6c69 656e 204c 696e 636f 7572 7422 2022 lien Lincourt" " │ │ │ +00011c00: 6d61 7840 746f 6f6e 626f 6f6d 2e63 6f6d max@toonboom.com │ │ │ +00011c10: 2220 224d 6174 7320 4c61 7273 736f 6e22 " "Mats Larsson" │ │ │ +00011c20: 2022 4d61 7473 2e4c 6172 7373 6f6e 4075 "Mats.Larsson@u │ │ │ +00011c30: 6162 2e65 7269 6373 736f 6e2e 7365 2220 ab.ericsson.se" │ │ │ +00011c40: 2253 696d 6f6e 204c 6569 6e65 6e22 2022 "Simon Leinen" " │ │ │ +00011c50: 7369 6d6f 6e40 696e 7374 7275 6d61 7469 simon@instrumati │ │ │ +00011c60: 632e 6368 2220 2243 6172 7374 656e 204c c.ch" "Carsten L │ │ │ +00011c70: 656f 6e68 6172 6474 2220 226c 656f 4061 eonhardt" "leo@a │ │ │ +00011c80: 7269 6f63 682e 6f63 6865 2e64 6522 2022 rioch.oche.de" " │ │ │ +00011c90: 4a61 6d65 7320 4c65 7769 734d 6f73 7322 James LewisMoss" │ │ │ +00011ca0: 2022 6d6f 7373 4063 732e 7363 2e65 6475 "moss@cs.sc.edu │ │ │ +00011cb0: 2220 224d 6174 7320 4c69 6465 6c6c 2220 " "Mats Lidell" │ │ │ +00011cc0: 226d 6174 732e 6c69 6465 6c6c 4063 6f6e "mats.lidell@con │ │ │ +00011cd0: 7461 6374 6f72 2e73 6522 2022 4d61 7474 tactor.se" "Matt │ │ │ +00011ce0: 204c 6967 6765 7474 2220 226d 6c69 6767 Liggett" "mligg │ │ │ +00011cf0: 6574 7440 7365 7665 6e2e 7563 732e 696e ett@seven.ucs.in │ │ │ +00011d00: 6469 616e 612e 6564 7522 2022 4368 7269 diana.edu" "Chri │ │ │ +00011d10: 7374 6961 6e20 4c69 6d70 6163 6822 2022 stian Limpach" " │ │ │ +00011d20: 4368 7269 7374 6961 6e2e 4c69 6d70 6163 Christian.Limpac │ │ │ +00011d30: 6840 6e69 6365 2e63 6822 2022 4d61 726b h@nice.ch" "Mark │ │ │ +00011d40: 7573 204c 696e 6e61 6c61 2220 226d 6161 us Linnala" "maa │ │ │ +00011d50: 6765 4062 3134 622e 7475 7073 752e 746f ge@b14b.tupsu.to │ │ │ +00011d60: 6e2e 7475 742e 6669 2220 2252 6f62 6572 n.tut.fi" "Rober │ │ │ +00011d70: 7420 4c69 7065 2220 2272 6f62 6572 746c t Lipe" "robertl │ │ │ +00011d80: 4061 726e 6574 2e63 6f6d 2220 2244 6572 @arnet.com" "Der │ │ │ +00011d90: 7265 6c6c 204c 6970 6d61 6e22 2022 6465 rell Lipman" "de │ │ │ +00011da0: 7272 656c 6c40 7669 732d 6176 2e63 6f6d rrell@vis-av.com │ │ │ +00011db0: 2220 2244 616d 6f6e 204c 6970 7061 7265 " "Damon Lippare │ │ │ +00011dc0: 6c6c 6922 2022 6c69 7070 4061 612e 6e65 lli" "lipp@aa.ne │ │ │ +00011dd0: 7422 2022 4861 6d69 7368 204d 6163 646f t" "Hamish Macdo │ │ │ +00011de0: 6e61 6c64 2220 2268 616d 6973 6840 626e nald" "hamish@bn │ │ │ +00011df0: 722e 6361 2220 2249 616e 204d 6163 4b69 r.ca" "Ian MacKi │ │ │ +00011e00: 6e6e 6f6e 2220 2269 6d61 636b 696e 6e6f nnon" "imackinno │ │ │ +00011e10: 6e40 7465 6c69 612e 636f 2e75 6b22 2022 n@telia.co.uk" " │ │ │ +00011e20: 5061 7472 6963 6b20 4d61 6352 6f62 6572 Patrick MacRober │ │ │ +00011e30: 7473 2220 226d 6163 726f 4068 7063 6f62 ts" "macro@hpcob │ │ │ +00011e40: 7233 302e 6375 702e 6870 2e63 6f6d 2220 r30.cup.hp.com" │ │ │ +00011e50: 2254 6f6e 6e79 204d 6164 7365 6e22 2022 "Tonny Madsen" " │ │ │ +00011e60: 546f 6e6e 792e 4d61 6473 656e 406e 6574 Tonny.Madsen@net │ │ │ +00011e70: 6d61 6e2e 646b 2220 224b 6574 696c 205a man.dk" "Ketil Z │ │ │ +00011e80: 204d 616c 6465 2220 226b 6574 696c 4069 Malde" "ketil@i │ │ │ +00011e90: 692e 7569 622e 6e6f 2220 2253 7465 7665 i.uib.no" "Steve │ │ │ +00011ea0: 204d 6172 6368 2220 2273 6d61 7263 6840 March" "smarch@ │ │ │ +00011eb0: 7175 6176 6572 2e75 7262 616e 612e 6d63 quaver.urbana.mc │ │ │ +00011ec0: 642e 6d6f 742e 636f 6d22 2022 5269 6361 d.mot.com" "Rica │ │ │ +00011ed0: 7264 6f20 4d61 7265 6b22 2022 7269 636b rdo Marek" "rick │ │ │ +00011ee0: 7940 6f72 6e65 742e 636f 2e69 6c22 2022 y@ornet.co.il" " │ │ │ +00011ef0: 5065 6b6b 6120 4d61 726a 6f6c 6122 2022 Pekka Marjola" " │ │ │ +00011f00: 7065 6d61 4069 6b69 2e66 6922 2022 5369 pema@iki.fi" "Si │ │ │ +00011f10: 6d6f 6e20 4d61 7273 6861 6c6c 2220 2273 mon Marshall" "s │ │ │ +00011f20: 696d 6f6e 4067 6e75 2e61 692e 6d69 742e imon@gnu.ai.mit. │ │ │ +00011f30: 6564 7522 2022 4461 7665 204d 6173 6f6e edu" "Dave Mason │ │ │ +00011f40: 2220 2264 6d61 736f 6e40 706c 672e 7577 " "dmason@plg.uw │ │ │ +00011f50: 6174 6572 6c6f 6f2e 6361 2220 224a 6179 aterloo.ca" "Jay │ │ │ +00011f60: 6520 4d61 7468 6973 656e 2220 226d 7263 e Mathisen" "mrc │ │ │ +00011f70: 7075 4063 6473 6e65 742e 6e65 7422 2022 pu@cdsnet.net" " │ │ │ +00011f80: 4a61 736f 6e20 4d63 4c61 7265 6e22 2022 Jason McLaren" " │ │ │ +00011f90: 6d63 6c61 7265 6e40 6d61 7468 2e6d 6367 mclaren@math.mcg │ │ │ +00011fa0: 696c 6c2e 6361 2220 224d 6963 6861 656c ill.ca" "Michael │ │ │ +00011fb0: 204d 634e 616d 6172 6122 2022 6d61 6340 McNamara" "mac@ │ │ │ +00011fc0: 7369 6c69 636f 6e2d 736f 7263 6572 792e silicon-sorcery. │ │ │ +00011fd0: 636f 6d22 2022 4d69 6368 6165 6c20 4d65 com" "Michael Me │ │ │ +00011fe0: 6973 736e 6572 2220 226d 6569 7373 6e65 issner" "meissne │ │ │ +00011ff0: 7240 6f73 662e 6f72 6722 2022 4461 7669 r@osf.org" "Davi │ │ │ +00012000: 6420 4d2e 204d 6579 6572 2220 226d 6579 d M. Meyer" "mey │ │ │ +00012010: 6572 406e 732e 756f 7265 676f 6e2e 6564 er@ns.uoregon.ed │ │ │ +00012020: 7522 2022 4a6f 686e 204d 6967 6e61 756c u" "John Mignaul │ │ │ +00012030: 7422 2022 6a62 6d40 7061 6e69 782e 636f t" "jbm@panix.co │ │ │ +00012040: 6d22 2022 4272 6164 204d 696c 6c65 7222 m" "Brad Miller" │ │ │ +00012050: 2022 626d 696c 6c65 7240 6373 2e75 6d6e "bmiller@cs.umn │ │ │ +00012060: 2e65 6475 2220 224a 6f68 6e20 4d6f 7265 .edu" "John More │ │ │ +00012070: 7922 2022 6a6d 6f72 6579 4063 726c 2e63 y" "jmorey@crl.c │ │ │ +00012080: 6f6d 2220 2252 6f62 204d 6f72 6922 2022 om" "Rob Mori" " │ │ │ +00012090: 726f 622e 6d6f 7269 4073 756e 2e63 6f6d rob.mori@sun.com │ │ │ +000120a0: 2220 2248 6569 6b6f 204d 7565 6e6b 656c " "Heiko Muenkel │ │ │ +000120b0: 2220 226d 7565 6e6b 656c 4074 6e74 2e75 " "muenkel@tnt.u │ │ │ +000120c0: 6e69 2d68 616e 6e6f 7665 722e 6465 2220 ni-hannover.de" │ │ │ +000120d0: 2241 7275 7020 4d75 6b68 6572 6a65 6522 "Arup Mukherjee" │ │ │ +000120e0: 2022 6172 7570 2b40 6373 2e63 6d75 2e65 "arup+@cs.cmu.e │ │ │ +000120f0: 6475 2220 2243 6f6c 6173 204e 6168 6162 du" "Colas Nahab │ │ │ +00012100: 6f6f 2220 2243 6f6c 6173 2e4e 6168 6162 oo" "Colas.Nahab │ │ │ +00012110: 6f6f 4073 6f70 6869 612e 696e 7269 612e oo@sophia.inria. │ │ │ +00012120: 6672 2220 224c 796e 6e20 442e 204e 6577 fr" "Lynn D. New │ │ │ +00012130: 746f 6e22 2022 6c79 6e6e 4069 7665 732e ton" "lynn@ives. │ │ │ +00012140: 7068 782e 6d63 642e 6d6f 742e 636f 6d22 phx.mcd.mot.com" │ │ │ +00012150: 2022 4361 7365 7920 4e69 656c 736f 6e22 "Casey Nielson" │ │ │ +00012160: 2022 6b6e 6965 6c73 6f6e 406a 6f75 6c65 "knielson@joule │ │ │ +00012170: 2e65 6c65 652e 6361 6c70 6f6c 792e 6564 .elee.calpoly.ed │ │ │ +00012180: 7522 2022 4765 6f72 6720 4e69 6b6f 6479 u" "Georg Nikody │ │ │ +00012190: 6d22 2022 4765 6f72 672e 4e69 6b6f 6479 m" "Georg.Nikody │ │ │ +000121a0: 6d40 6361 6e61 6461 2e73 756e 2e63 6f6d m@canada.sun.com │ │ │ +000121b0: 2220 2241 6e64 7920 4e6f 726d 616e 2220 " "Andy Norman" │ │ │ +000121c0: 2261 6e67 6540 6870 6c62 2e68 706c 2e68 "ange@hplb.hpl.h │ │ │ +000121d0: 702e 636f 6d22 2022 4a6f 6520 4e75 7370 p.com" "Joe Nusp │ │ │ +000121e0: 6c22 2022 6e75 7370 6c40 7365 7175 656e l" "nuspl@sequen │ │ │ +000121f0: 742e 636f 6d22 2022 4b69 6d20 4e79 6265 t.com" "Kim Nybe │ │ │ +00012200: 7267 2220 226b 6e79 4074 656b 6c61 2e66 rg" "kny@tekla.f │ │ │ +00012210: 6922 2022 4b65 7669 6e20 4f62 6572 6d61 i" "Kevin Oberma │ │ │ +00012220: 6e22 2022 6f62 6572 6d61 6e40 6573 2e6e n" "oberman@es.n │ │ │ +00012230: 6574 2220 2244 6176 6964 204f 6665 6c74 et" "David Ofelt │ │ │ +00012240: 2220 226f 6665 6c74 4067 6574 616c 6966 " "ofelt@getalif │ │ │ +00012250: 652e 5374 616e 666f 7264 2e45 4455 2220 e.Stanford.EDU" │ │ │ +00012260: 2241 6c65 7861 6e64 7265 204f 6c69 7661 "Alexandre Oliva │ │ │ +00012270: 2220 226f 6c69 7661 4064 6363 2e75 6e69 " "oliva@dcc.uni │ │ │ +00012280: 6361 6d70 2e62 7222 2022 546f 7265 204f camp.br" "Tore O │ │ │ +00012290: 6c73 656e 2220 2274 6f72 656f 4063 6f6c lsen" "toreo@col │ │ │ +000122a0: 6172 676f 6c2e 6964 622e 6869 7374 2e6e argol.idb.hist.n │ │ │ +000122b0: 6f22 2022 4772 6567 204f 6e75 6665 7222 o" "Greg Onufer" │ │ │ +000122c0: 2022 4772 6567 2e4f 6e75 6665 7240 656e "Greg.Onufer@en │ │ │ +000122d0: 672e 7375 6e2e 636f 6d22 2022 4163 6869 g.sun.com" "Achi │ │ │ +000122e0: 6d20 4f70 7065 6c74 2220 2261 6f70 7065 m Oppelt" "aoppe │ │ │ +000122f0: 6c74 4074 6865 6f72 6965 332e 7068 7973 lt@theorie3.phys │ │ │ +00012300: 696b 2e75 6e69 2d65 726c 616e 6765 6e2e ik.uni-erlangen. │ │ │ +00012310: 6465 2220 2252 6562 6563 6361 204f 7265 de" "Rebecca Ore │ │ │ +00012320: 2220 2272 6562 6563 6361 2e6f 7265 406f " "rebecca.ore@o │ │ │ +00012330: 702e 6e65 7422 2022 5375 6465 6570 204b p.net" "Sudeep K │ │ │ +00012340: 756d 6172 2050 616c 6174 2220 2270 616c umar Palat" "pal │ │ │ +00012350: 6174 4069 6474 2e75 6e69 742e 6e6f 2220 at@idt.unit.no" │ │ │ +00012360: 224a 6f65 6c20 5065 7465 7273 6f6e 2220 "Joel Peterson" │ │ │ +00012370: 2274 6172 7a61 6e40 616f 7369 2e63 6f6d "tarzan@aosi.com │ │ │ +00012380: 2220 2254 686f 6d61 7320 412e 2050 6574 " "Thomas A. Pet │ │ │ +00012390: 6572 736f 6e22 2022 7461 7040 7372 632e erson" "tap@src. │ │ │ +000123a0: 686f 6e65 7977 656c 6c2e 636f 6d22 2022 honeywell.com" " │ │ │ +000123b0: 5469 626f 7220 506f 6c67 6172 2220 2274 Tibor Polgar" "t │ │ │ +000123c0: 6962 6f72 4061 6c74 656f 6e2e 636f 6d22 ibor@alteon.com" │ │ │ +000123d0: 2022 4672 6564 6572 6963 2050 6f6e 6369 "Frederic Ponci │ │ │ +000123e0: 6e22 2022 6670 4069 6e66 6f2e 7563 6c2e n" "fp@info.ucl. │ │ │ +000123f0: 6163 2e62 6522 2022 452e 2052 6568 6d69 ac.be" "E. Rehmi │ │ │ +00012400: 2050 6f73 7422 2022 7265 686d 6940 6173 Post" "rehmi@as │ │ │ +00012410: 796c 756d 2e73 662e 6361 2e75 7322 2022 ylum.sf.ca.us" " │ │ │ +00012420: 4d61 7274 696e 2050 6f74 7465 6e64 6f72 Martin Pottendor │ │ │ +00012430: 6665 7222 2022 4d61 7274 696e 2e50 6f74 fer" "Martin.Pot │ │ │ +00012440: 7465 6e64 6f72 6665 7240 6175 742e 616c tendorfer@aut.al │ │ │ +00012450: 6361 7465 6c2e 6174 2220 2243 6f6c 696e catel.at" "Colin │ │ │ +00012460: 2052 6166 6665 7274 7922 2022 636f 6c69 Rafferty" "coli │ │ │ +00012470: 6e40 7865 6d61 6373 2e6f 7267 2220 2252 n@xemacs.org" "R │ │ │ +00012480: 6963 6b20 5261 6e6b 696e 2220 2252 6963 ick Rankin" "Ric │ │ │ +00012490: 6b5f 5261 6e6b 696e 2d50 3135 3235 3440 k_Rankin-P15254@ │ │ │ +000124a0: 656d 6169 6c2e 6d6f 742e 636f 6d22 2022 email.mot.com" " │ │ │ +000124b0: 5061 756c 204d 2052 6569 6c6c 7922 2022 Paul M Reilly" " │ │ │ +000124c0: 706d 7240 7061 6a61 746f 2e63 6f6d 2220 pmr@pajato.com" │ │ │ +000124d0: 224a 6163 6b20 5265 7065 6e6e 696e 6722 "Jack Repenning" │ │ │ +000124e0: 2022 6a61 636b 7240 7367 692e 636f 6d22 "jackr@sgi.com" │ │ │ +000124f0: 2022 4461 6e69 656c 2052 6963 6822 2022 "Daniel Rich" " │ │ │ +00012500: 6472 6963 6840 6369 7363 6f2e 636f 6d22 drich@cisco.com" │ │ │ +00012510: 2022 526f 6c61 6e64 2052 6965 6b65 2220 "Roland Rieke" │ │ │ +00012520: 2272 6f6c 4064 6172 6d73 7461 6474 2e67 "rol@darmstadt.g │ │ │ +00012530: 6d64 2e64 6522 2022 4172 7420 5269 6a6f md.de" "Art Rijo │ │ │ +00012540: 7322 2022 6172 742e 7269 6a6f 7340 534e s" "art.rijos@SN │ │ │ +00012550: 4554 2e63 6f6d 2220 2252 7573 7365 6c6c ET.com" "Russell │ │ │ +00012560: 2052 6974 6368 6965 2220 2272 6974 6368 Ritchie" "ritch │ │ │ +00012570: 6965 7240 6272 6974 616e 6e69 612d 6c69 ier@britannia-li │ │ │ +00012580: 6665 2e63 6f2e 756b 2220 2252 6f6c 616e fe.co.uk" "Rolan │ │ │ +00012590: 6422 2022 4d69 6b65 2052 7573 7365 6c6c d" "Mike Russell │ │ │ +000125a0: 2220 226d 6a72 7573 7340 7263 686c 616e " "mjruss@rchlan │ │ │ +000125b0: 642e 766e 6574 2e69 626d 2e63 6f6d 2220 d.vnet.ibm.com" │ │ │ +000125c0: 2248 616a 696d 6520 5361 6974 6f75 2220 "Hajime Saitou" │ │ │ +000125d0: 2268 616a 696d 6540 6a73 6b2e 742e 752d "hajime@jsk.t.u- │ │ │ +000125e0: 746f 6b79 6f2e 6163 2e6a 7022 2022 4a61 tokyo.ac.jp" "Ja │ │ │ +000125f0: 6e20 5361 6e64 7175 6973 7422 2022 6574 n Sandquist" "et │ │ │ +00012600: 7871 7569 7374 4069 7161 2e65 7269 6373 xquist@iqa.erics │ │ │ +00012610: 736f 6e2e 7365 2220 224d 6172 7479 2053 son.se" "Marty S │ │ │ +00012620: 6173 616b 6922 2022 7361 7361 6b69 4073 asaki" "sasaki@s │ │ │ +00012630: 7064 6363 2e63 6f6d 2220 2253 4154 4f20 pdcc.com" "SATO │ │ │ +00012640: 4461 6973 756b 6522 2022 6465 6e73 756b Daisuke" "densuk │ │ │ +00012650: 6540 6761 322e 736f 2d6e 6574 2e6f 722e e@ga2.so-net.or. │ │ │ +00012660: 6a70 2220 224b 656e 6a69 2053 6174 6f22 jp" "Kenji Sato" │ │ │ +00012670: 2022 6b65 6e40 6e79 2e6b 6464 2e63 6f6d "ken@ny.kdd.com │ │ │ +00012680: 2220 224d 696b 6520 5363 6865 6964 6c65 " "Mike Scheidle │ │ │ +00012690: 7222 2022 6332 336d 7473 4065 6e67 2e64 r" "c23mts@eng.d │ │ │ +000126a0: 656c 636f 656c 6563 742e 636f 6d22 2022 elcoelect.com" " │ │ │ +000126b0: 4461 6e69 656c 2053 6368 6570 6c65 7222 Daniel Schepler" │ │ │ +000126c0: 2022 6461 6e69 656c 4073 6865 7031 332e "daniel@shep13. │ │ │ +000126d0: 7775 7374 6c2e 6564 7522 2022 486f 6c67 wustl.edu" "Holg │ │ │ +000126e0: 6572 2053 6368 6175 6572 2220 2273 6368 er Schauer" "sch │ │ │ +000126f0: 6175 6572 4063 6f6c 696e 672e 756e 692d auer@coling.uni- │ │ │ +00012700: 6672 6569 6275 7267 2e64 6522 2022 4461 freiburg.de" "Da │ │ │ +00012710: 7272 656c 2053 6368 6e65 6964 6572 2220 rrel Schneider" │ │ │ +00012720: 2264 6172 7265 6c40 736c 632e 636f 6d22 "darrel@slc.com" │ │ │ +00012730: 2022 4861 7964 656e 2053 6368 756c 747a "Hayden Schultz │ │ │ +00012740: 2220 2268 6179 6465 6e73 406c 6c2e 6d69 " "haydens@ll.mi │ │ │ +00012750: 742e 6564 7522 2022 436f 7474 6f6e 2053 t.edu" "Cotton S │ │ │ +00012760: 6565 6422 2022 636f 7474 6f6e 7340 6379 eed" "cottons@cy │ │ │ +00012770: 6265 7263 6f6d 2e6e 6574 2220 2241 7865 bercom.net" "Axe │ │ │ +00012780: 6c20 5365 6962 6572 7422 2022 7365 6962 l Seibert" "seib │ │ │ +00012790: 6572 7461 4069 6e66 6f72 6d61 7469 6b2e erta@informatik. │ │ │ +000127a0: 7475 2d6d 7565 6e63 6865 6e2e 6465 2220 tu-muenchen.de" │ │ │ +000127b0: 224f 6464 2d4d 6167 6e65 2053 656b 6b69 "Odd-Magne Sekki │ │ │ +000127c0: 6e67 7374 6164 2220 226f 6464 6d73 4069 ngstad" "oddms@i │ │ │ +000127d0: 692e 7569 622e 6e6f 2220 2247 7265 676f i.uib.no" "Grego │ │ │ +000127e0: 7279 204e 6569 6c20 5368 6170 6972 6f22 ry Neil Shapiro" │ │ │ +000127f0: 2022 6773 6861 7069 726f 4073 656e 646d "gshapiro@sendm │ │ │ +00012800: 6169 6c2e 6f72 6722 2022 4a75 7374 696e ail.org" "Justin │ │ │ +00012810: 2053 6865 6568 7922 2022 6a75 7374 696e Sheehy" "justin │ │ │ +00012820: 406c 696e 7573 2e6d 6974 7265 2e6f 7267 @linus.mitre.org │ │ │ +00012830: 2220 224a 6f68 6e20 5368 656e 2220 227a " "John Shen" "z │ │ │ +00012840: 6673 3630 4063 6173 2e6f 7267 2220 224d fs60@cas.org" "M │ │ │ +00012850: 7572 6174 6120 5368 7575 6963 6869 726f urata Shuuichiro │ │ │ +00012860: 7522 2022 6d72 7440 6d69 636b 6579 2e61 u" "mrt@mickey.a │ │ │ +00012870: 692e 6b79 7574 6563 682e 6163 2e6a 7022 i.kyutech.ac.jp" │ │ │ +00012880: 2022 4d61 7474 2053 696d 6d6f 6e73 2220 "Matt Simmons" │ │ │ +00012890: 2273 696d 6d6f 6e6d 7440 6163 6d2e 6f72 "simmonmt@acm.or │ │ │ +000128a0: 6722 2022 4469 6e65 7368 2053 6f6d 6173 g" "Dinesh Somas │ │ │ +000128b0: 656b 6861 7222 2022 736f 6d61 7365 6b68 ekhar" "somasekh │ │ │ +000128c0: 4065 636e 2e70 7572 6475 652e 6564 7522 @ecn.purdue.edu" │ │ │ +000128d0: 2022 4a65 6666 7265 7920 5370 6172 6b65 "Jeffrey Sparke │ │ │ +000128e0: 7322 2022 6a73 7061 726b 6573 4062 6e72 s" "jsparkes@bnr │ │ │ +000128f0: 2e63 6122 2022 4d61 6e6f 6a20 5372 6976 .ca" "Manoj Sriv │ │ │ +00012900: 6173 7461 7661 2220 2273 7269 7661 7374 astava" "srivast │ │ │ +00012910: 6140 7069 6c67 7269 6d2e 756d 6173 732e a@pilgrim.umass. │ │ │ +00012920: 6564 7522 2022 4672 616e 636f 6973 2053 edu" "Francois S │ │ │ +00012930: 7461 6573 2220 2266 7261 6e73 406b 6977 taes" "frans@kiw │ │ │ +00012940: 692e 7569 612e 6163 2e62 6522 2022 416e i.uia.ac.be" "An │ │ │ +00012950: 6465 7273 2053 7465 6e6d 616e 2220 2273 ders Stenman" "s │ │ │ +00012960: 7465 6e6d 616e 4069 7379 2e6c 6975 2e73 tenman@isy.liu.s │ │ │ +00012970: 6522 2022 4a61 736f 6e20 5374 6577 6172 e" "Jason Stewar │ │ │ +00012980: 7422 2022 6a61 736f 6e73 4063 732e 756e t" "jasons@cs.un │ │ │ +00012990: 6d2e 6564 7522 2022 5269 636b 2054 6169 m.edu" "Rick Tai │ │ │ +000129a0: 7422 2022 7269 636b 7440 676e 752e 6169 t" "rickt@gnu.ai │ │ │ +000129b0: 2e6d 6974 2e65 6475 2220 2254 414e 414b .mit.edu" "TANAK │ │ │ +000129c0: 4120 4861 7961 7368 6922 2022 7461 6e61 A Hayashi" "tana │ │ │ +000129d0: 6b61 6840 6d78 612e 6d65 7368 2e6e 652e kah@mxa.mesh.ne. │ │ │ +000129e0: 6a70 2220 2253 616d 7565 6c20 5461 7264 jp" "Samuel Tard │ │ │ +000129f0: 6965 7522 2022 7361 6d40 696e 662e 656e ieu" "sam@inf.en │ │ │ +00012a00: 7374 2e66 7222 2022 4a61 6d65 7320 5468 st.fr" "James Th │ │ │ +00012a10: 6f6d 7073 6f6e 2220 2274 686f 6d70 736f ompson" "thompso │ │ │ +00012a20: 6e40 7767 322e 7761 6969 2e63 6f6d 2220 n@wg2.waii.com" │ │ │ +00012a30: 224e 6f62 7520 546f 6765 2220 2274 6f67 "Nobu Toge" "tog │ │ │ +00012a40: 6540 6163 6361 6431 2e6b 656b 2e6a 7022 e@accad1.kek.jp" │ │ │ +00012a50: 2022 5261 796d 6f6e 6420 4c2e 2054 6f79 "Raymond L. Toy │ │ │ +00012a60: 2220 2274 6f79 4072 7470 2e65 7269 6373 " "toy@rtp.erics │ │ │ +00012a70: 736f 6e2e 7365 2220 2252 656d 656b 2054 son.se" "Remek T │ │ │ +00012a80: 727a 6173 6b61 2220 2272 656d 656b 406e rzaska" "remek@n │ │ │ +00012a90: 7061 632e 7379 722e 6564 7522 2022 5453 pac.syr.edu" "TS │ │ │ +00012aa0: 5554 4f4d 5520 4e61 6b61 6d75 7261 2220 UTOMU Nakamura" │ │ │ +00012ab0: 2274 7375 746f 6d75 4072 732e 6b79 6f74 "tsutomu@rs.kyot │ │ │ +00012ac0: 6f2e 6f6d 726f 6e73 6f66 742e 636f 2e6a o.omronsoft.co.j │ │ │ +00012ad0: 7022 2022 5374 6566 616e 6965 2054 6575 p" "Stefanie Teu │ │ │ +00012ae0: 6665 6c22 2022 732e 7465 7566 656c 406e fel" "s.teufel@n │ │ │ +00012af0: 6468 2e6e 6574 2220 2247 6172 7920 5468 dh.net" "Gary Th │ │ │ +00012b00: 6f6d 6173 2220 2267 2e74 686f 6d61 7340 omas" "g.thomas@ │ │ │ +00012b10: 6f70 656e 6772 6f75 702e 6f72 6722 2022 opengroup.org" " │ │ │ +00012b20: 4a6f 686e 2054 7572 6e65 7222 2022 7475 John Turner" "tu │ │ │ +00012b30: 726e 6572 4078 6469 762e 6c61 6e6c 2e67 rner@xdiv.lanl.g │ │ │ +00012b40: 6f76 2220 2255 454e 4f20 4675 6d69 6869 ov" "UENO Fumihi │ │ │ +00012b50: 726f 2220 2237 6d32 7665 6a40 7269 7470 ro" "7m2vej@ritp │ │ │ +00012b60: 2e79 652e 4948 492e 434f 2e4a 5022 2022 .ye.IHI.CO.JP" " │ │ │ +00012b70: 416b 6920 5665 6874 6172 6922 2022 416b Aki Vehtari" "Ak │ │ │ +00012b80: 692e 5665 6874 6172 6940 6875 742e 6669 i.Vehtari@hut.fi │ │ │ +00012b90: 2220 224a 7561 6e20 452e 2056 696c 6c61 " "Juan E. Villa │ │ │ +00012ba0: 6369 7322 2022 6a76 696c 6c61 6369 4063 cis" "jvillaci@c │ │ │ +00012bb0: 732e 696e 6469 616e 612e 6564 7522 2022 s.indiana.edu" " │ │ │ +00012bc0: 566c 6164 696d 6972 2056 756b 6963 6576 Vladimir Vukicev │ │ │ +00012bd0: 6963 2220 2276 6c61 6469 6d69 7240 696e ic" "vladimir@in │ │ │ +00012be0: 7472 6570 6964 2e63 6f6d 2220 2244 6176 trepid.com" "Dav │ │ │ +00012bf0: 6964 2057 616c 7465 2220 2264 6a77 3138 id Walte" "djw18 │ │ │ +00012c00: 4063 6f72 6e65 6c6c 2e65 6475 2220 2250 @cornell.edu" "P │ │ │ +00012c10: 6574 6572 2057 6172 6522 2022 7761 7265 eter Ware" "ware │ │ │ +00012c20: 4063 6973 2e6f 6869 6f2d 7374 6174 652e @cis.ohio-state. │ │ │ +00012c30: 6564 7522 2022 4368 7269 7374 6f70 6820 edu" "Christoph │ │ │ +00012c40: 5765 646c 6572 2220 2277 6564 6c65 7240 Wedler" "wedler@ │ │ │ +00012c50: 666d 692e 756e 692d 7061 7373 6175 2e64 fmi.uni-passau.d │ │ │ +00012c60: 6522 2022 596f 6176 2057 6569 7373 2220 e" "Yoav Weiss" │ │ │ +00012c70: 2279 6f61 7640 7a65 7573 2e64 6174 6173 "yoav@zeus.datas │ │ │ +00012c80: 7276 2e63 6f2e 696c 2220 2250 6574 6572 rv.co.il" "Peter │ │ │ +00012c90: 2042 2e20 5765 7374 2220 2270 2e77 6573 B. West" "p.wes │ │ │ +00012ca0: 7440 7571 2e6e 6574 2e61 7522 2022 526f t@uq.net.au" "Ro │ │ │ +00012cb0: 6420 5768 6974 6279 2220 2272 7768 6974 d Whitby" "rwhit │ │ │ +00012cc0: 6279 4061 7363 2e63 6f72 702e 6d6f 742e by@asc.corp.mot. │ │ │ +00012cd0: 636f 6d22 2022 5269 6368 2057 696c 6c69 com" "Rich Willi │ │ │ +00012ce0: 616d 7322 2022 7264 7740 6870 6c62 2e68 ams" "rdw@hplb.h │ │ │ +00012cf0: 706c 2e68 702e 636f 6d22 2022 5261 796d pl.hp.com" "Raym │ │ │ +00012d00: 6f6e 6420 5769 6b65 7222 2022 7261 796d ond Wiker" "raym │ │ │ +00012d10: 6f6e 6440 6f72 696f 6e2e 6e6f 2220 2250 ond@orion.no" "P │ │ │ +00012d20: 6574 6572 2057 696e 646c 6522 2022 7065 eter Windle" "pe │ │ │ +00012d30: 7465 7277 4053 444c 2e55 472e 4544 532e terw@SDL.UG.EDS. │ │ │ +00012d40: 434f 4d22 2022 4461 7669 6420 4320 576f COM" "David C Wo │ │ │ +00012d50: 7265 6e6b 6c65 696e 2220 2264 6377 4067 renklein" "dcw@g │ │ │ +00012d60: 636d 2e63 6f6d 2220 2254 616b 6573 6869 cm.com" "Takeshi │ │ │ +00012d70: 2059 616d 6164 6122 2022 7961 6d61 6461 Yamada" "yamada │ │ │ +00012d80: 4073 796c 7669 652e 6b65 636c 2e6e 7474 @sylvie.kecl.ntt │ │ │ +00012d90: 2e6a 7022 2022 4b61 7473 756d 6920 5961 .jp" "Katsumi Ya │ │ │ +00012da0: 6d61 6f6b 6122 2022 7961 6d61 6f6b 6140 maoka" "yamaoka@ │ │ │ +00012db0: 6761 2e73 6f6e 792e 636f 2e6a 7022 2022 ga.sony.co.jp" " │ │ │ +00012dc0: 4a61 736f 6e20 5961 6e6f 7769 747a 2220 Jason Yanowitz" │ │ │ +00012dd0: 2279 616e 6f77 6974 7a40 6574 6572 6e69 "yanowitz@eterni │ │ │ +00012de0: 7479 2e63 732e 756d 6173 732e 6564 7522 ty.cs.umass.edu" │ │ │ +00012df0: 2022 4c61 204d 6f6e 7465 2059 6172 726f "La Monte Yarro │ │ │ +00012e00: 6c6c 2220 2270 6967 6779 4068 696c 6265 ll" "piggy@hilbe │ │ │ +00012e10: 7274 2e6d 6174 6873 2e75 7461 732e 6564 rt.maths.utas.ed │ │ │ +00012e20: 752e 6175 2220 2242 6c61 6972 205a 616a u.au" "Blair Zaj │ │ │ +00012e30: 6163 2220 2262 6c61 6972 406f 6c79 6d70 ac" "blair@olymp │ │ │ +00012e40: 6961 2e67 7073 2e63 616c 7465 6368 2e65 ia.gps.caltech.e │ │ │ +00012e50: 6475 2220 2256 6f6c 6b65 7220 5a65 6c6c du" "Volker Zell │ │ │ +00012e60: 2220 2264 722e 766f 6c6b 6572 2e7a 656c " "dr.volker.zel │ │ │ +00012e70: 6c40 6f72 6163 6c65 2e63 6f6d 2220 2244 l@oracle.com" "D │ │ │ +00012e80: 616e 6965 6c20 5a69 766b 6f76 6963 2220 aniel Zivkovic" │ │ │ +00012e90: 2264 616e 6965 6c40 6361 6e61 6461 2e73 "daniel@canada.s │ │ │ +00012ea0: 756e 2e63 6f6d 2220 224b 6172 656c 205a un.com" "Karel Z │ │ │ +00012eb0: 7569 6465 7276 656c 6422 2022 4b61 7265 uiderveld" "Kare │ │ │ +00012ec0: 6c2e 5a75 6964 6572 7665 6c64 4063 762e l.Zuiderveld@cv. │ │ │ +00012ed0: 7275 752e 6e6c 2220 6162 6f75 742d 6669 ruu.nl" about-fi │ │ │ +00012ee0: 6e69 7368 2d62 7566 6665 725d 2036 5d29 nish-buffer] 6]) │ │ │ +00012ef0: 0a . │ │ ├── ./usr/share/xemacs-21.4.24/lisp/alist.elc │ │ │ @@ -1,143 +1,143 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f61 1-21.4.24/lisp/a │ │ │ -00000090: 6c69 7374 2e65 6c0a 3b3b 3b20 656d 6163 list.el.;;; emac │ │ │ -000000a0: 7320 7665 7273 696f 6e20 3231 2e34 2028 s version 21.4 ( │ │ │ -000000b0: 7061 7463 6820 3234 2920 2253 7461 6e64 patch 24) "Stand │ │ │ -000000c0: 6172 6420 4322 2058 456d 6163 7320 4c75 ard C" XEmacs Lu │ │ │ -000000d0: 6369 642e 0a3b 3b3b 2062 7974 6563 6f6d cid..;;; bytecom │ │ │ -000000e0: 7020 7665 7273 696f 6e20 322e 3237 2058 p version 2.27 X │ │ │ -000000f0: 456d 6163 733b 2032 3030 302d 3039 2d31 Emacs; 2000-09-1 │ │ │ -00000100: 322e 0a3b 3b3b 206f 7074 696d 697a 6174 2..;;; optimizat │ │ │ -00000110: 696f 6e20 6973 206f 6e2e 0a3b 3b3b 2074 ion is on..;;; t │ │ │ -00000120: 6869 7320 6669 6c65 2075 7365 7320 6f70 his file uses op │ │ │ -00000130: 636f 6465 7320 7768 6963 6820 646f 206e codes which do n │ │ │ -00000140: 6f74 2065 7869 7374 2069 6e20 456d 6163 ot exist in Emac │ │ │ -00000150: 7320 3139 2e0a 0a28 6966 2028 616e 6420 s 19...(if (and │ │ │ -00000160: 2862 6f75 6e64 7020 2765 6d61 6373 2d76 (boundp 'emacs-v │ │ │ -00000170: 6572 7369 6f6e 290a 0920 286f 7220 2861 ersion).. (or (a │ │ │ -00000180: 6e64 2028 626f 756e 6470 2027 6570 6f63 nd (boundp 'epoc │ │ │ -00000190: 683a 3a76 6572 7369 6f6e 2920 6570 6f63 h::version) epoc │ │ │ -000001a0: 683a 3a76 6572 7369 6f6e 290a 0920 2020 h::version).. │ │ │ -000001b0: 2020 2873 7472 696e 672d 6c65 7373 7020 (string-lessp │ │ │ -000001c0: 656d 6163 732d 7665 7273 696f 6e20 2232 emacs-version "2 │ │ │ -000001d0: 3022 2929 290a 2020 2020 2865 7272 6f72 0"))). (error │ │ │ -000001e0: 2022 6061 6c69 7374 2e65 6c27 2077 6173 "`alist.el' was │ │ │ -000001f0: 2063 6f6d 7069 6c65 6420 666f 7220 456d compiled for Em │ │ │ -00000200: 6163 7320 3230 2229 290a 0a28 6f72 2028 acs 20"))..(or ( │ │ │ -00000210: 626f 756e 6470 2027 6375 7272 656e 742d boundp 'current- │ │ │ -00000220: 6c6f 6164 2d6c 6973 7429 2028 7365 7471 load-list) (setq │ │ │ -00000230: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ -00000240: 7374 206e 696c 2929 0a0a 0a23 4038 3320 st nil))...#@83 │ │ │ -00000250: 5365 6172 6368 2056 414c 4953 5420 666f Search VALIST fo │ │ │ -00000260: 7220 6120 7665 6374 6f72 2077 686f 7365 r a vector whose │ │ │ -00000270: 2066 6972 7374 2065 6c65 6d65 6e74 2069 first element i │ │ │ -00000280: 7320 6571 7561 6c20 746f 204b 4559 2e0a s equal to KEY.. │ │ │ -00000290: 5365 6520 616c 736f 2060 6173 736f 6327 See also `assoc' │ │ │ -000002a0: 2e1f 0a28 6465 6661 6c69 6173 2027 7661 ...(defalias 'va │ │ │ -000002b0: 7373 6f63 2023 5b28 6b65 7920 7661 6c69 ssoc #[(key vali │ │ │ -000002c0: 7374 2920 22c1 18c2 c38d 2987 2220 5b65 st) ".....)." [e │ │ │ -000002d0: 6c20 6e69 6c20 646f 6e65 2028 6279 7465 l nil done (byte │ │ │ -000002e0: 2d63 6f64 6520 2209 8941 1140 8912 ad8e -code "..A.@.... │ │ │ -000002f0: 085c 6ec3 486b ab70 c4c5 5c6e 5c22 88aa .\n.Hk.p..\n\".. │ │ │ -00000300: 6987 2220 5b6b 6579 2076 616c 6973 7420 i." [key valist │ │ │ -00000310: 656c 2030 2074 6872 6f77 2064 6f6e 655d el 0 throw done] │ │ │ -00000320: 2033 295d 2032 2028 2324 202e 2035 3932 3)] 2 (#$ . 592 │ │ │ -00000330: 295d 290a 2340 3235 3120 4d6f 6469 6679 )]).#@251 Modify │ │ │ -00000340: 2041 4c49 5354 2074 6f20 7365 7420 5641 ALIST to set VA │ │ │ -00000350: 4c55 4520 746f 2049 5445 4d2e 0a49 6620 LUE to ITEM..If │ │ │ -00000360: 7468 6572 6520 6973 2061 2070 6169 7220 there is a pair │ │ │ -00000370: 7768 6f73 6520 6361 7220 6973 2049 5445 whose car is ITE │ │ │ -00000380: 4d2c 2072 6570 6c61 6365 2069 7473 2063 M, replace its c │ │ │ -00000390: 6472 2062 7920 5641 4c55 452e 0a49 6620 dr by VALUE..If │ │ │ -000003a0: 7468 6572 6520 6973 206e 6f74 2073 7563 there is not suc │ │ │ -000003b0: 6820 7061 6972 2c20 6372 6561 7465 206e h pair, create n │ │ │ -000003c0: 6577 2070 6169 7220 2849 5445 4d20 2e20 ew pair (ITEM . │ │ │ -000003d0: 5641 4c55 4529 2061 6e64 0a72 6574 7572 VALUE) and.retur │ │ │ -000003e0: 6e20 6e65 7720 616c 6973 7420 7768 6f73 n new alist whos │ │ │ -000003f0: 6520 6361 7220 6973 2074 6865 206e 6577 e car is the new │ │ │ -00000400: 2070 6169 7220 616e 6420 6364 7220 6973 pair and cdr is │ │ │ -00000410: 2041 4c49 5354 2e0a 5b74 6f6d 6f27 7320 ALIST..[tomo's │ │ │ -00000420: 454c 4953 206c 696b 6520 6675 6e63 7469 ELIS like functi │ │ │ -00000430: 6f6e 5d1f 0a28 6465 6661 6c69 6173 2027 on]..(defalias ' │ │ │ -00000440: 7075 742d 616c 6973 7420 235b 2869 7465 put-alist #[(ite │ │ │ -00000450: 6d20 7661 6c75 6520 616c 6973 7429 2022 m value alist) " │ │ │ -00000460: c45c 6e0b 5c22 8919 ab87 0908 a188 0baa .\n.\".......... │ │ │ -00000470: 855c 6e08 420b 4229 8722 205b 7661 6c75 .\n.B.B)." [valu │ │ │ -00000480: 6520 7061 6972 2069 7465 6d20 616c 6973 e pair item alis │ │ │ -00000490: 7420 6173 736f 635d 2034 2028 2324 202e t assoc] 4 (#$ . │ │ │ -000004a0: 2038 3236 295d 290a 2340 3934 2049 6620 826)]).#@94 If │ │ │ -000004b0: 7468 6572 6520 6973 2061 2070 6169 7220 there is a pair │ │ │ -000004c0: 7768 6f73 6520 6b65 7920 6973 2049 5445 whose key is ITE │ │ │ -000004d0: 4d2c 2064 656c 6574 6520 6974 2066 726f M, delete it fro │ │ │ -000004e0: 6d20 414c 4953 542e 0a5b 746f 6d6f 2773 m ALIST..[tomo's │ │ │ -000004f0: 2045 4c49 5320 656d 756c 6174 696e 6720 ELIS emulating │ │ │ -00000500: 6675 6e63 7469 6f6e 5d1f 0a28 6465 6661 function]..(defa │ │ │ -00000510: 6c69 6173 2027 6465 6c2d 616c 6973 7420 lias 'del-alist │ │ │ -00000520: 235b 2869 7465 6d20 616c 6973 7429 2022 #[(item alist) " │ │ │ -00000530: 5c6e 0b40 406b ab83 0b41 870b 8941 1918 \n.@@k...A...A.. │ │ │ -00000540: c4c5 8d2a 8722 205b 7072 2072 2069 7465 ...*." [pr r ite │ │ │ -00000550: 6d20 616c 6973 7420 7461 6720 2862 7974 m alist tag (byt │ │ │ -00000560: 652d 636f 6465 2022 0bab 9908 0b40 406b e-code ".....@@k │ │ │ -00000570: ab8a 5c6e 0b41 a188 c4c5 095c 2288 0b12 ..\n.A.....\"... │ │ │ -00000580: 0b41 8913 ac67 0987 2220 5b69 7465 6d20 .A...g.." [item │ │ │ -00000590: 616c 6973 7420 7072 2072 2074 6872 6f77 alist pr r throw │ │ │ -000005a0: 2074 6167 5d20 3429 5d20 3220 2823 2420 tag] 4)] 2 (#$ │ │ │ -000005b0: 2e20 3131 3937 295d 290a 2340 3538 204d . 1197)]).#@58 M │ │ │ -000005c0: 6f64 6966 7920 6120 616c 6973 7420 696e odify a alist in │ │ │ -000005d0: 6469 6361 7465 6420 6279 2053 594d 424f dicated by SYMBO │ │ │ -000005e0: 4c20 746f 2073 6574 2056 414c 5545 2074 L to set VALUE t │ │ │ -000005f0: 6f20 4954 454d 2e1f 0a28 6465 6661 6c69 o ITEM...(defali │ │ │ -00000600: 6173 2027 7365 742d 616c 6973 7420 235b as 'set-alist #[ │ │ │ -00000610: 2873 796d 626f 6c20 6974 656d 2076 616c (symbol item val │ │ │ -00000620: 7565 2920 22c3 5c6e 21ac 845c 6ec4 4c88 ue) ".\n!..\n.L. │ │ │ -00000630: 5c6e c509 085c 6e4a 234c 8722 205b 7661 \n...\nJ#L." [va │ │ │ -00000640: 6c75 6520 6974 656d 2073 796d 626f 6c20 lue item symbol │ │ │ -00000650: 626f 756e 6470 206e 696c 2070 7574 2d61 boundp nil put-a │ │ │ -00000660: 6c69 7374 5d20 3520 2823 2420 2e20 3134 list] 5 (#$ . 14 │ │ │ -00000670: 3731 295d 290a 2340 3439 2052 656d 6f76 71)]).#@49 Remov │ │ │ -00000680: 6520 4954 454d 2066 726f 6d20 7468 6520 e ITEM from the │ │ │ -00000690: 616c 6973 7420 696e 6469 6361 7465 6420 alist indicated │ │ │ -000006a0: 6279 2053 594d 424f 4c2e 1f0a 2864 6566 by SYMBOL...(def │ │ │ -000006b0: 616c 6961 7320 2772 656d 6f76 652d 616c alias 'remove-al │ │ │ -000006c0: 6973 7420 235b 2873 796d 626f 6c20 6974 ist #[(symbol it │ │ │ -000006d0: 656d 2920 22c2 0921 ad87 09c3 0809 4a5c em) "..!......J\ │ │ │ -000006e0: 224c 8722 205b 6974 656d 2073 796d 626f "L." [item symbo │ │ │ -000006f0: 6c20 626f 756e 6470 2064 656c 2d61 6c69 l boundp del-ali │ │ │ -00000700: 7374 5d20 3420 2823 2420 2e20 3136 3539 st] 4 (#$ . 1659 │ │ │ -00000710: 295d 290a 2340 3433 204d 6f64 6966 7920 )]).#@43 Modify │ │ │ -00000720: 616c 6973 7420 4445 4641 554c 5420 696e alist DEFAULT in │ │ │ -00000730: 746f 2061 6c69 7374 204d 4f44 4946 4945 to alist MODIFIE │ │ │ -00000740: 522e 1f0a 2864 6566 616c 6961 7320 276d R...(defalias 'm │ │ │ -00000750: 6f64 6966 792d 616c 6973 7420 235b 286d odify-alist #[(m │ │ │ -00000760: 6f64 6966 6965 7220 6465 6661 756c 7429 odifier default) │ │ │ -00000770: 2022 c2c3 095c 2288 0887 2220 5b64 6566 "...\"..." [def │ │ │ -00000780: 6175 6c74 206d 6f64 6966 6965 7220 6d61 ault modifier ma │ │ │ -00000790: 7063 6172 2023 5b28 6173 2920 22c2 0940 pcar #[(as) "..@ │ │ │ -000007a0: 0941 0823 8910 8722 205b 6465 6661 756c .A.#..." [defaul │ │ │ -000007b0: 7420 6173 2070 7574 2d61 6c69 7374 5d20 t as put-alist] │ │ │ -000007c0: 345d 5d20 3320 2823 2420 2e20 3138 3137 4]] 3 (#$ . 1817 │ │ │ -000007d0: 295d 290a 2340 3133 3020 4d6f 6469 6679 )]).#@130 Modify │ │ │ -000007e0: 2061 2076 616c 7565 206f 6620 6120 7379 a value of a sy │ │ │ -000007f0: 6d62 6f6c 2053 594d 2069 6e74 6f20 616c mbol SYM into al │ │ │ -00000800: 6973 7420 4d4f 4449 4649 4552 2e0a 5468 ist MODIFIER..Th │ │ │ -00000810: 6520 7379 6d62 6f6c 2053 594d 2073 686f e symbol SYM sho │ │ │ -00000820: 756c 6420 6265 2061 6c69 7374 2e20 4966 uld be alist. If │ │ │ -00000830: 2069 7420 6973 206e 6f74 2062 6f75 6e64 it is not bound │ │ │ -00000840: 2c0a 6974 7320 7661 6c75 6520 7265 6761 ,.its value rega │ │ │ -00000850: 7264 2061 7320 6e69 6c2e 1f0a 2864 6566 rd as nil...(def │ │ │ -00000860: 616c 6961 7320 2773 6574 2d6d 6f64 6966 alias 'set-modif │ │ │ -00000870: 6965 642d 616c 6973 7420 235b 2873 796d ied-alist #[(sym │ │ │ -00000880: 206d 6f64 6966 6965 7229 2022 c209 21ac modifier) "..!. │ │ │ -00000890: 8409 c34c 8809 c408 c509 215c 224c 8722 ...L......!\"L." │ │ │ -000008a0: 205b 6d6f 6469 6669 6572 2073 796d 2062 [modifier sym b │ │ │ -000008b0: 6f75 6e64 7020 6e69 6c20 6d6f 6469 6679 oundp nil modify │ │ │ -000008c0: 2d61 6c69 7374 2065 7661 6c5d 2035 2028 -alist eval] 5 ( │ │ │ -000008d0: 2324 202e 2032 3031 3029 5d29 0a28 7072 #$ . 2010)]).(pr │ │ │ -000008e0: 6f76 6964 6520 2761 6c69 7374 290a ovide 'alist). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3439 2032 3032 310a 3b3b 3b20 :08:49 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f61 6c69 7374 2e65 6c0a 4/lisp/alist.el. │ │ │ +00000090: 3b3b 3b20 656d 6163 7320 7665 7273 696f ;;; emacs versio │ │ │ +000000a0: 6e20 3231 2e34 2028 7061 7463 6820 3234 n 21.4 (patch 24 │ │ │ +000000b0: 2920 2253 7461 6e64 6172 6420 4322 2058 ) "Standard C" X │ │ │ +000000c0: 456d 6163 7320 4c75 6369 642e 0a3b 3b3b Emacs Lucid..;;; │ │ │ +000000d0: 2062 7974 6563 6f6d 7020 7665 7273 696f bytecomp versio │ │ │ +000000e0: 6e20 322e 3237 2058 456d 6163 733b 2032 n 2.27 XEmacs; 2 │ │ │ +000000f0: 3030 302d 3039 2d31 322e 0a3b 3b3b 206f 000-09-12..;;; o │ │ │ +00000100: 7074 696d 697a 6174 696f 6e20 6973 206f ptimization is o │ │ │ +00000110: 6e2e 0a3b 3b3b 2074 6869 7320 6669 6c65 n..;;; this file │ │ │ +00000120: 2075 7365 7320 6f70 636f 6465 7320 7768 uses opcodes wh │ │ │ +00000130: 6963 6820 646f 206e 6f74 2065 7869 7374 ich do not exist │ │ │ +00000140: 2069 6e20 456d 6163 7320 3139 2e0a 0a28 in Emacs 19...( │ │ │ +00000150: 6966 2028 616e 6420 2862 6f75 6e64 7020 if (and (boundp │ │ │ +00000160: 2765 6d61 6373 2d76 6572 7369 6f6e 290a 'emacs-version). │ │ │ +00000170: 0920 286f 7220 2861 6e64 2028 626f 756e . (or (and (boun │ │ │ +00000180: 6470 2027 6570 6f63 683a 3a76 6572 7369 dp 'epoch::versi │ │ │ +00000190: 6f6e 2920 6570 6f63 683a 3a76 6572 7369 on) epoch::versi │ │ │ +000001a0: 6f6e 290a 0920 2020 2020 2873 7472 696e on).. (strin │ │ │ +000001b0: 672d 6c65 7373 7020 656d 6163 732d 7665 g-lessp emacs-ve │ │ │ +000001c0: 7273 696f 6e20 2232 3022 2929 290a 2020 rsion "20"))). │ │ │ +000001d0: 2020 2865 7272 6f72 2022 6061 6c69 7374 (error "`alist │ │ │ +000001e0: 2e65 6c27 2077 6173 2063 6f6d 7069 6c65 .el' was compile │ │ │ +000001f0: 6420 666f 7220 456d 6163 7320 3230 2229 d for Emacs 20") │ │ │ +00000200: 290a 0a28 6f72 2028 626f 756e 6470 2027 )..(or (boundp ' │ │ │ +00000210: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ +00000220: 7429 2028 7365 7471 2063 7572 7265 6e74 t) (setq current │ │ │ +00000230: 2d6c 6f61 642d 6c69 7374 206e 696c 2929 -load-list nil)) │ │ │ +00000240: 0a0a 0a23 4038 3320 5365 6172 6368 2056 ...#@83 Search V │ │ │ +00000250: 414c 4953 5420 666f 7220 6120 7665 6374 ALIST for a vect │ │ │ +00000260: 6f72 2077 686f 7365 2066 6972 7374 2065 or whose first e │ │ │ +00000270: 6c65 6d65 6e74 2069 7320 6571 7561 6c20 lement is equal │ │ │ +00000280: 746f 204b 4559 2e0a 5365 6520 616c 736f to KEY..See also │ │ │ +00000290: 2060 6173 736f 6327 2e1f 0a28 6465 6661 `assoc'...(defa │ │ │ +000002a0: 6c69 6173 2027 7661 7373 6f63 2023 5b28 lias 'vassoc #[( │ │ │ +000002b0: 6b65 7920 7661 6c69 7374 2920 22c1 18c2 key valist) "... │ │ │ +000002c0: c38d 2987 2220 5b65 6c20 6e69 6c20 646f ..)." [el nil do │ │ │ +000002d0: 6e65 2028 6279 7465 2d63 6f64 6520 2209 ne (byte-code ". │ │ │ +000002e0: 8941 1140 8912 ad8e 085c 6ec3 486b ab70 .A.@.....\n.Hk.p │ │ │ +000002f0: c4c5 5c6e 5c22 88aa 6987 2220 5b6b 6579 ..\n\"..i." [key │ │ │ +00000300: 2076 616c 6973 7420 656c 2030 2074 6872 valist el 0 thr │ │ │ +00000310: 6f77 2064 6f6e 655d 2033 295d 2032 2028 ow done] 3)] 2 ( │ │ │ +00000320: 2324 202e 2035 3834 295d 290a 2340 3235 #$ . 584)]).#@25 │ │ │ +00000330: 3120 4d6f 6469 6679 2041 4c49 5354 2074 1 Modify ALIST t │ │ │ +00000340: 6f20 7365 7420 5641 4c55 4520 746f 2049 o set VALUE to I │ │ │ +00000350: 5445 4d2e 0a49 6620 7468 6572 6520 6973 TEM..If there is │ │ │ +00000360: 2061 2070 6169 7220 7768 6f73 6520 6361 a pair whose ca │ │ │ +00000370: 7220 6973 2049 5445 4d2c 2072 6570 6c61 r is ITEM, repla │ │ │ +00000380: 6365 2069 7473 2063 6472 2062 7920 5641 ce its cdr by VA │ │ │ +00000390: 4c55 452e 0a49 6620 7468 6572 6520 6973 LUE..If there is │ │ │ +000003a0: 206e 6f74 2073 7563 6820 7061 6972 2c20 not such pair, │ │ │ +000003b0: 6372 6561 7465 206e 6577 2070 6169 7220 create new pair │ │ │ +000003c0: 2849 5445 4d20 2e20 5641 4c55 4529 2061 (ITEM . VALUE) a │ │ │ +000003d0: 6e64 0a72 6574 7572 6e20 6e65 7720 616c nd.return new al │ │ │ +000003e0: 6973 7420 7768 6f73 6520 6361 7220 6973 ist whose car is │ │ │ +000003f0: 2074 6865 206e 6577 2070 6169 7220 616e the new pair an │ │ │ +00000400: 6420 6364 7220 6973 2041 4c49 5354 2e0a d cdr is ALIST.. │ │ │ +00000410: 5b74 6f6d 6f27 7320 454c 4953 206c 696b [tomo's ELIS lik │ │ │ +00000420: 6520 6675 6e63 7469 6f6e 5d1f 0a28 6465 e function]..(de │ │ │ +00000430: 6661 6c69 6173 2027 7075 742d 616c 6973 falias 'put-alis │ │ │ +00000440: 7420 235b 2869 7465 6d20 7661 6c75 6520 t #[(item value │ │ │ +00000450: 616c 6973 7429 2022 c45c 6e0b 5c22 8919 alist) ".\n.\".. │ │ │ +00000460: ab87 0908 a188 0baa 855c 6e08 420b 4229 .........\n.B.B) │ │ │ +00000470: 8722 205b 7661 6c75 6520 7061 6972 2069 ." [value pair i │ │ │ +00000480: 7465 6d20 616c 6973 7420 6173 736f 635d tem alist assoc] │ │ │ +00000490: 2034 2028 2324 202e 2038 3138 295d 290a 4 (#$ . 818)]). │ │ │ +000004a0: 2340 3934 2049 6620 7468 6572 6520 6973 #@94 If there is │ │ │ +000004b0: 2061 2070 6169 7220 7768 6f73 6520 6b65 a pair whose ke │ │ │ +000004c0: 7920 6973 2049 5445 4d2c 2064 656c 6574 y is ITEM, delet │ │ │ +000004d0: 6520 6974 2066 726f 6d20 414c 4953 542e e it from ALIST. │ │ │ +000004e0: 0a5b 746f 6d6f 2773 2045 4c49 5320 656d .[tomo's ELIS em │ │ │ +000004f0: 756c 6174 696e 6720 6675 6e63 7469 6f6e ulating function │ │ │ +00000500: 5d1f 0a28 6465 6661 6c69 6173 2027 6465 ]..(defalias 'de │ │ │ +00000510: 6c2d 616c 6973 7420 235b 2869 7465 6d20 l-alist #[(item │ │ │ +00000520: 616c 6973 7429 2022 5c6e 0b40 406b ab83 alist) "\n.@@k.. │ │ │ +00000530: 0b41 870b 8941 1918 c4c5 8d2a 8722 205b .A...A.....*." [ │ │ │ +00000540: 7072 2072 2069 7465 6d20 616c 6973 7420 pr r item alist │ │ │ +00000550: 7461 6720 2862 7974 652d 636f 6465 2022 tag (byte-code " │ │ │ +00000560: 0bab 9908 0b40 406b ab8a 5c6e 0b41 a188 .....@@k..\n.A.. │ │ │ +00000570: c4c5 095c 2288 0b12 0b41 8913 ac67 0987 ...\"....A...g.. │ │ │ +00000580: 2220 5b69 7465 6d20 616c 6973 7420 7072 " [item alist pr │ │ │ +00000590: 2072 2074 6872 6f77 2074 6167 5d20 3429 r throw tag] 4) │ │ │ +000005a0: 5d20 3220 2823 2420 2e20 3131 3839 295d ] 2 (#$ . 1189)] │ │ │ +000005b0: 290a 2340 3538 204d 6f64 6966 7920 6120 ).#@58 Modify a │ │ │ +000005c0: 616c 6973 7420 696e 6469 6361 7465 6420 alist indicated │ │ │ +000005d0: 6279 2053 594d 424f 4c20 746f 2073 6574 by SYMBOL to set │ │ │ +000005e0: 2056 414c 5545 2074 6f20 4954 454d 2e1f VALUE to ITEM.. │ │ │ +000005f0: 0a28 6465 6661 6c69 6173 2027 7365 742d .(defalias 'set- │ │ │ +00000600: 616c 6973 7420 235b 2873 796d 626f 6c20 alist #[(symbol │ │ │ +00000610: 6974 656d 2076 616c 7565 2920 22c3 5c6e item value) ".\n │ │ │ +00000620: 21ac 845c 6ec4 4c88 5c6e c509 085c 6e4a !..\n.L.\n...\nJ │ │ │ +00000630: 234c 8722 205b 7661 6c75 6520 6974 656d #L." [value item │ │ │ +00000640: 2073 796d 626f 6c20 626f 756e 6470 206e symbol boundp n │ │ │ +00000650: 696c 2070 7574 2d61 6c69 7374 5d20 3520 il put-alist] 5 │ │ │ +00000660: 2823 2420 2e20 3134 3633 295d 290a 2340 (#$ . 1463)]).#@ │ │ │ +00000670: 3439 2052 656d 6f76 6520 4954 454d 2066 49 Remove ITEM f │ │ │ +00000680: 726f 6d20 7468 6520 616c 6973 7420 696e rom the alist in │ │ │ +00000690: 6469 6361 7465 6420 6279 2053 594d 424f dicated by SYMBO │ │ │ +000006a0: 4c2e 1f0a 2864 6566 616c 6961 7320 2772 L...(defalias 'r │ │ │ +000006b0: 656d 6f76 652d 616c 6973 7420 235b 2873 emove-alist #[(s │ │ │ +000006c0: 796d 626f 6c20 6974 656d 2920 22c2 0921 ymbol item) "..! │ │ │ +000006d0: ad87 09c3 0809 4a5c 224c 8722 205b 6974 ......J\"L." [it │ │ │ +000006e0: 656d 2073 796d 626f 6c20 626f 756e 6470 em symbol boundp │ │ │ +000006f0: 2064 656c 2d61 6c69 7374 5d20 3420 2823 del-alist] 4 (# │ │ │ +00000700: 2420 2e20 3136 3531 295d 290a 2340 3433 $ . 1651)]).#@43 │ │ │ +00000710: 204d 6f64 6966 7920 616c 6973 7420 4445 Modify alist DE │ │ │ +00000720: 4641 554c 5420 696e 746f 2061 6c69 7374 FAULT into alist │ │ │ +00000730: 204d 4f44 4946 4945 522e 1f0a 2864 6566 MODIFIER...(def │ │ │ +00000740: 616c 6961 7320 276d 6f64 6966 792d 616c alias 'modify-al │ │ │ +00000750: 6973 7420 235b 286d 6f64 6966 6965 7220 ist #[(modifier │ │ │ +00000760: 6465 6661 756c 7429 2022 c2c3 095c 2288 default) "...\". │ │ │ +00000770: 0887 2220 5b64 6566 6175 6c74 206d 6f64 .." [default mod │ │ │ +00000780: 6966 6965 7220 6d61 7063 6172 2023 5b28 ifier mapcar #[( │ │ │ +00000790: 6173 2920 22c2 0940 0941 0823 8910 8722 as) "..@.A.#..." │ │ │ +000007a0: 205b 6465 6661 756c 7420 6173 2070 7574 [default as put │ │ │ +000007b0: 2d61 6c69 7374 5d20 345d 5d20 3320 2823 -alist] 4]] 3 (# │ │ │ +000007c0: 2420 2e20 3138 3039 295d 290a 2340 3133 $ . 1809)]).#@13 │ │ │ +000007d0: 3020 4d6f 6469 6679 2061 2076 616c 7565 0 Modify a value │ │ │ +000007e0: 206f 6620 6120 7379 6d62 6f6c 2053 594d of a symbol SYM │ │ │ +000007f0: 2069 6e74 6f20 616c 6973 7420 4d4f 4449 into alist MODI │ │ │ +00000800: 4649 4552 2e0a 5468 6520 7379 6d62 6f6c FIER..The symbol │ │ │ +00000810: 2053 594d 2073 686f 756c 6420 6265 2061 SYM should be a │ │ │ +00000820: 6c69 7374 2e20 4966 2069 7420 6973 206e list. If it is n │ │ │ +00000830: 6f74 2062 6f75 6e64 2c0a 6974 7320 7661 ot bound,.its va │ │ │ +00000840: 6c75 6520 7265 6761 7264 2061 7320 6e69 lue regard as ni │ │ │ +00000850: 6c2e 1f0a 2864 6566 616c 6961 7320 2773 l...(defalias 's │ │ │ +00000860: 6574 2d6d 6f64 6966 6965 642d 616c 6973 et-modified-alis │ │ │ +00000870: 7420 235b 2873 796d 206d 6f64 6966 6965 t #[(sym modifie │ │ │ +00000880: 7229 2022 c209 21ac 8409 c34c 8809 c408 r) "..!....L.... │ │ │ +00000890: c509 215c 224c 8722 205b 6d6f 6469 6669 ..!\"L." [modifi │ │ │ +000008a0: 6572 2073 796d 2062 6f75 6e64 7020 6e69 er sym boundp ni │ │ │ +000008b0: 6c20 6d6f 6469 6679 2d61 6c69 7374 2065 l modify-alist e │ │ │ +000008c0: 7661 6c5d 2035 2028 2324 202e 2032 3030 val] 5 (#$ . 200 │ │ │ +000008d0: 3229 5d29 0a28 7072 6f76 6964 6520 2761 2)]).(provide 'a │ │ │ +000008e0: 6c69 7374 290a list). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/apropos.elc │ │ │ @@ -1,799 +1,799 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f61 1-21.4.24/lisp/a │ │ │ -00000090: 7072 6f70 6f73 2e65 6c0a 3b3b 3b20 656d propos.el.;;; em │ │ │ -000000a0: 6163 7320 7665 7273 696f 6e20 3231 2e34 acs version 21.4 │ │ │ -000000b0: 2028 7061 7463 6820 3234 2920 2253 7461 (patch 24) "Sta │ │ │ -000000c0: 6e64 6172 6420 4322 2058 456d 6163 7320 ndard C" XEmacs │ │ │ -000000d0: 4c75 6369 642e 0a3b 3b3b 2062 7974 6563 Lucid..;;; bytec │ │ │ -000000e0: 6f6d 7020 7665 7273 696f 6e20 322e 3237 omp version 2.27 │ │ │ -000000f0: 2058 456d 6163 733b 2032 3030 302d 3039 XEmacs; 2000-09 │ │ │ -00000100: 2d31 322e 0a3b 3b3b 206f 7074 696d 697a -12..;;; optimiz │ │ │ -00000110: 6174 696f 6e20 6973 206f 6e2e 0a3b 3b3b ation is on..;;; │ │ │ -00000120: 2074 6869 7320 6669 6c65 2075 7365 7320 this file uses │ │ │ -00000130: 6f70 636f 6465 7320 7768 6963 6820 646f opcodes which do │ │ │ -00000140: 206e 6f74 2065 7869 7374 2069 6e20 456d not exist in Em │ │ │ -00000150: 6163 7320 3139 2e0a 0a28 6966 2028 616e acs 19...(if (an │ │ │ -00000160: 6420 2862 6f75 6e64 7020 2765 6d61 6373 d (boundp 'emacs │ │ │ -00000170: 2d76 6572 7369 6f6e 290a 0920 286f 7220 -version).. (or │ │ │ -00000180: 2861 6e64 2028 626f 756e 6470 2027 6570 (and (boundp 'ep │ │ │ -00000190: 6f63 683a 3a76 6572 7369 6f6e 2920 6570 och::version) ep │ │ │ -000001a0: 6f63 683a 3a76 6572 7369 6f6e 290a 0920 och::version).. │ │ │ -000001b0: 2020 2020 2873 7472 696e 672d 6c65 7373 (string-less │ │ │ -000001c0: 7020 656d 6163 732d 7665 7273 696f 6e20 p emacs-version │ │ │ -000001d0: 2232 3022 2929 290a 2020 2020 2865 7272 "20"))). (err │ │ │ -000001e0: 6f72 2022 6061 7072 6f70 6f73 2e65 6c27 or "`apropos.el' │ │ │ -000001f0: 2077 6173 2063 6f6d 7069 6c65 6420 666f was compiled fo │ │ │ -00000200: 7220 456d 6163 7320 3230 2229 290a 0a28 r Emacs 20"))..( │ │ │ -00000210: 6f72 2028 626f 756e 6470 2027 6375 7272 or (boundp 'curr │ │ │ -00000220: 656e 742d 6c6f 6164 2d6c 6973 7429 2028 ent-load-list) ( │ │ │ -00000230: 7365 7471 2063 7572 7265 6e74 2d6c 6f61 setq current-loa │ │ │ -00000240: 642d 6c69 7374 206e 696c 2929 0a0a 0a23 d-list nil))...# │ │ │ -00000250: 4031 3233 202a 5768 6574 6865 7220 7468 @123 *Whether th │ │ │ -00000260: 6520 6170 726f 706f 7320 636f 6d6d 616e e apropos comman │ │ │ -00000270: 6473 2073 686f 756c 6420 646f 206d 6f72 ds should do mor │ │ │ -00000280: 652e 0a53 6c6f 7773 2074 6865 6d20 646f e..Slows them do │ │ │ -00000290: 776e 206d 6f72 6520 6f72 206c 6573 732e wn more or less. │ │ │ -000002a0: 2020 5365 7420 7468 6973 206e 6f6e 2d6e Set this non-n │ │ │ -000002b0: 696c 2069 6620 796f 7520 6861 7665 2061 il if you have a │ │ │ -000002c0: 2066 6173 7420 6d61 6368 696e 652e 1f0a fast machine... │ │ │ -000002d0: 2864 6566 7661 7220 6170 726f 706f 732d (defvar apropos- │ │ │ -000002e0: 646f 2d61 6c6c 206e 696c 2028 2324 202e do-all nil (#$ . │ │ │ -000002f0: 202d 3539 3729 290a 2340 3131 3120 2a46 -597)).#@111 *F │ │ │ -00000300: 6163 6520 666f 7220 7379 6d62 6f6c 206e ace for symbol n │ │ │ -00000310: 616d 6520 696e 2061 7072 6f70 6f73 206f ame in apropos o │ │ │ -00000320: 7574 7075 7420 6f72 2060 6e69 6c27 2e0a utput or `nil'.. │ │ │ -00000330: 5468 6973 206c 6f6f 6b73 2067 6f6f 642c This looks good, │ │ │ -00000340: 2062 7574 2073 6c6f 7773 2064 6f77 6e20 but slows down │ │ │ -00000350: 7468 6520 636f 6d6d 616e 6473 2073 6576 the commands sev │ │ │ -00000360: 6572 616c 2074 696d 6573 2e1f 0a28 6465 eral times...(de │ │ │ -00000370: 6676 6172 2061 7072 6f70 6f73 2d73 796d fvar apropos-sym │ │ │ -00000380: 626f 6c2d 6661 6365 2028 6279 7465 2d63 bol-face (byte-c │ │ │ -00000390: 6f64 6520 22c1 c021 ab82 0887 c287 2220 ode "..!......" │ │ │ -000003a0: 5b66 6f6e 742d 6c6f 636b 2d6b 6579 776f [font-lock-keywo │ │ │ -000003b0: 7264 2d66 6163 6520 626f 756e 6470 2062 rd-face boundp b │ │ │ -000003c0: 6f6c 645d 2032 2920 2823 2420 2e20 2d37 old] 2) (#$ . -7 │ │ │ -000003d0: 3636 2929 0a23 4031 3138 202a 4661 6365 66)).#@118 *Face │ │ │ -000003e0: 2066 6f72 206b 6579 6269 6e64 696e 6720 for keybinding │ │ │ -000003f0: 6469 7370 6c61 7920 696e 2061 7072 6f70 display in aprop │ │ │ -00000400: 6f73 206f 7574 7075 7420 6f72 2060 6e69 os output or `ni │ │ │ -00000410: 6c27 2e0a 5468 6973 206c 6f6f 6b73 2067 l'..This looks g │ │ │ -00000420: 6f6f 642c 2062 7574 2073 6c6f 7773 2064 ood, but slows d │ │ │ -00000430: 6f77 6e20 7468 6520 636f 6d6d 616e 6473 own the commands │ │ │ -00000440: 2073 6576 6572 616c 2074 696d 6573 2e1f several times.. │ │ │ -00000450: 0a28 6465 6676 6172 2061 7072 6f70 6f73 .(defvar apropos │ │ │ -00000460: 2d6b 6579 6269 6e64 696e 672d 6661 6365 -keybinding-face │ │ │ -00000470: 2028 6279 7465 2d63 6f64 6520 22c1 c021 (byte-code "..! │ │ │ -00000480: ab82 0887 c287 2220 5b66 6f6e 742d 6c6f ......" [font-lo │ │ │ -00000490: 636b 2d73 7472 696e 672d 6661 6365 2062 ck-string-face b │ │ │ -000004a0: 6f75 6e64 7020 756e 6465 726c 696e 655d oundp underline] │ │ │ -000004b0: 2032 2920 2823 2420 2e20 2d39 3837 2929 2) (#$ . -987)) │ │ │ -000004c0: 0a23 4032 3832 202a 4661 6365 2066 6f72 .#@282 *Face for │ │ │ -000004d0: 206c 6162 656c 2028 436f 6d6d 616e 642c label (Command, │ │ │ -000004e0: 2056 6172 6961 626c 6520 2e2e 2e29 2069 Variable ...) i │ │ │ -000004f0: 6e20 6170 726f 706f 7320 6f75 7470 7574 n apropos output │ │ │ -00000500: 206f 7220 606e 696c 272e 0a49 6620 7468 or `nil'..If th │ │ │ -00000510: 6973 2069 7320 606e 696c 2720 6e6f 206d is is `nil' no m │ │ │ -00000520: 6f75 7365 2068 6967 686c 6967 6874 696e ouse highlightin │ │ │ -00000530: 6720 6f63 6375 7273 2e0a 5468 6973 206c g occurs..This l │ │ │ -00000540: 6f6f 6b73 2067 6f6f 642c 2062 7574 2073 ooks good, but s │ │ │ -00000550: 6c6f 7773 2064 6f77 6e20 7468 6520 636f lows down the co │ │ │ -00000560: 6d6d 616e 6473 2073 6576 6572 616c 2074 mmands several t │ │ │ -00000570: 696d 6573 2e0a 5768 656e 2074 6869 7320 imes..When this │ │ │ -00000580: 6973 2061 2066 6163 6520 6e61 6d65 2c20 is a face name, │ │ │ -00000590: 6173 2069 7420 6973 2069 6e69 7469 616c as it is initial │ │ │ -000005a0: 6c79 2c20 6974 2067 6574 7320 7472 616e ly, it gets tran │ │ │ -000005b0: 7366 6f72 6d65 6420 746f 2061 0a74 6578 sformed to a.tex │ │ │ -000005c0: 742d 7072 6f70 6572 7479 206c 6973 7420 t-property list │ │ │ -000005d0: 666f 7220 6566 6669 6369 656e 6379 2e1f for efficiency.. │ │ │ -000005e0: 0a28 6465 6676 6172 2061 7072 6f70 6f73 .(defvar apropos │ │ │ -000005f0: 2d6c 6162 656c 2d66 6163 6520 2862 7974 -label-face (byt │ │ │ -00000600: 652d 636f 6465 2022 c1c0 21ab 8208 87c2 e-code "..!..... │ │ │ -00000610: 8722 205b 666f 6e74 2d6c 6f63 6b2d 636f ." [font-lock-co │ │ │ -00000620: 6d6d 656e 742d 6661 6365 2062 6f75 6e64 mment-face bound │ │ │ -00000630: 7020 6974 616c 6963 5d20 3229 2028 2324 p italic] 2) (#$ │ │ │ -00000640: 202e 202d 3132 3233 2929 0a23 4031 3133 . -1223)).#@113 │ │ │ -00000650: 202a 4661 6365 2066 6f72 2070 726f 7065 *Face for prope │ │ │ -00000660: 7274 7920 6e61 6d65 2069 6e20 6170 726f rty name in apro │ │ │ -00000670: 706f 7320 6f75 7470 7574 206f 7220 606e pos output or `n │ │ │ -00000680: 696c 272e 0a54 6869 7320 6c6f 6f6b 7320 il'..This looks │ │ │ -00000690: 676f 6f64 2c20 6275 7420 736c 6f77 7320 good, but slows │ │ │ -000006a0: 646f 776e 2074 6865 2063 6f6d 6d61 6e64 down the command │ │ │ -000006b0: 7320 7365 7665 7261 6c20 7469 6d65 732e s several times. │ │ │ -000006c0: 1f0a 2864 6566 7661 7220 6170 726f 706f ..(defvar apropo │ │ │ -000006d0: 732d 7072 6f70 6572 7479 2d66 6163 6520 s-property-face │ │ │ -000006e0: 2862 7974 652d 636f 6465 2022 c1c0 21ab (byte-code "..!. │ │ │ -000006f0: 8208 87c2 8722 205b 666f 6e74 2d6c 6f63 ....." [font-loc │ │ │ -00000700: 6b2d 7661 7269 6162 6c65 2d6e 616d 652d k-variable-name- │ │ │ -00000710: 6661 6365 2062 6f75 6e64 7020 626f 6c64 face boundp bold │ │ │ -00000720: 2d69 7461 6c69 635d 2032 2920 2823 2420 -italic] 2) (#$ │ │ │ -00000730: 2e20 2d31 3631 3729 290a 2340 3133 3320 . -1617)).#@133 │ │ │ -00000740: 2a46 6163 6520 666f 7220 6d61 7463 6869 *Face for matchi │ │ │ -00000750: 6e67 2070 6172 7420 696e 2061 7072 6f70 ng part in aprop │ │ │ -00000760: 6f73 2d64 6f63 756d 656e 7461 7469 6f6e os-documentation │ │ │ -00000770: 2f76 616c 7565 206f 7574 7075 7420 6f72 /value output or │ │ │ -00000780: 2060 6e69 6c27 2e0a 5468 6973 206c 6f6f `nil'..This loo │ │ │ -00000790: 6b73 2067 6f6f 642c 2062 7574 2073 6c6f ks good, but slo │ │ │ -000007a0: 7773 2064 6f77 6e20 7468 6520 636f 6d6d ws down the comm │ │ │ -000007b0: 616e 6473 2073 6576 6572 616c 2074 696d ands several tim │ │ │ -000007c0: 6573 2e1f 0a28 6465 6676 6172 2061 7072 es...(defvar apr │ │ │ -000007d0: 6f70 6f73 2d6d 6174 6368 2d66 6163 6520 opos-match-face │ │ │ -000007e0: 2773 6563 6f6e 6461 7279 2d73 656c 6563 'secondary-selec │ │ │ -000007f0: 7469 6f6e 2028 2324 202e 202d 3138 3536 tion (#$ . -1856 │ │ │ -00000800: 2929 0a23 4033 3020 4b65 796d 6170 2075 )).#@30 Keymap u │ │ │ -00000810: 7365 6420 696e 2041 7072 6f70 6f73 206d sed in Apropos m │ │ │ -00000820: 6f64 652e 1f0a 2864 6566 7661 7220 6170 ode...(defvar ap │ │ │ -00000830: 726f 706f 732d 6d6f 6465 2d6d 6170 2028 ropos-mode-map ( │ │ │ -00000840: 6279 7465 2d63 6f64 6520 22c1 2018 c208 byte-code ". ... │ │ │ -00000850: c3c4 2388 c208 c5c4 2388 c208 c6c7 2388 ..#.....#.....#. │ │ │ -00000860: c208 c8c9 2388 0829 8722 205b 6d61 7020 ....#..)." [map │ │ │ -00000870: 6d61 6b65 2d73 7061 7273 652d 6b65 796d make-sparse-keym │ │ │ -00000880: 6170 2064 6566 696e 652d 6b65 7920 5b28 ap define-key [( │ │ │ -00000890: 636f 6e74 726f 6c20 6d29 5d20 6170 726f control m)] apro │ │ │ -000008a0: 706f 732d 666f 6c6c 6f77 205b 7265 7475 pos-follow [retu │ │ │ -000008b0: 726e 5d20 5b28 6275 7474 6f6e 3275 7029 rn] [(button2up) │ │ │ -000008c0: 5d20 6170 726f 706f 732d 6d6f 7573 652d ] apropos-mouse- │ │ │ -000008d0: 666f 6c6c 6f77 205b 2862 7574 746f 6e32 follow [(button2 │ │ │ -000008e0: 295d 2075 6e64 6566 696e 6564 5d20 3429 )] undefined] 4) │ │ │ -000008f0: 2028 2324 202e 2032 3035 3629 290a 2340 (#$ . 2056)).#@ │ │ │ -00000900: 3337 2052 6567 6578 7020 7573 6564 2069 37 Regexp used i │ │ │ -00000910: 6e20 6375 7272 656e 7420 6170 726f 706f n current apropo │ │ │ -00000920: 7320 7275 6e2e 1f0a 2864 6566 7661 7220 s run...(defvar │ │ │ -00000930: 6170 726f 706f 732d 7265 6765 7870 206e apropos-regexp n │ │ │ -00000940: 696c 2028 2324 202e 2032 3330 3729 290a il (#$ . 2307)). │ │ │ -00000950: 2340 3738 204c 6973 7420 6f66 2065 6c63 #@78 List of elc │ │ │ -00000960: 2066 696c 6573 2061 6c72 6561 6479 2073 files already s │ │ │ -00000970: 6361 6e6e 6564 2069 6e20 6375 7272 656e canned in curren │ │ │ -00000980: 7420 7275 6e20 6f66 2060 6170 726f 706f t run of `apropo │ │ │ -00000990: 732d 646f 6375 6d65 6e74 6174 696f 6e27 s-documentation' │ │ │ -000009a0: 2e1f 0a28 6465 6676 6172 2061 7072 6f70 ...(defvar aprop │ │ │ -000009b0: 6f73 2d66 696c 6573 2d73 6361 6e6e 6564 os-files-scanned │ │ │ -000009c0: 206e 696c 2028 2324 202e 2032 3338 3929 nil (#$ . 2389) │ │ │ -000009d0: 290a 2340 3536 2041 6c69 7374 206f 6620 ).#@56 Alist of │ │ │ -000009e0: 7379 6d62 6f6c 7320 616c 7265 6164 7920 symbols already │ │ │ -000009f0: 666f 756e 6420 696e 2063 7572 7265 6e74 found in current │ │ │ -00000a00: 2061 7072 6f70 6f73 2072 756e 2e1f 0a28 apropos run...( │ │ │ -00000a10: 6465 6676 6172 2061 7072 6f70 6f73 2d61 defvar apropos-a │ │ │ -00000a20: 6363 756d 756c 6174 6f72 206e 696c 2028 ccumulator nil ( │ │ │ -00000a30: 2324 202e 2032 3531 3929 290a 2340 3435 #$ . 2519)).#@45 │ │ │ -00000a40: 2043 7572 7265 6e74 2069 7465 6d20 696e Current item in │ │ │ -00000a50: 206f 7220 666f 7220 6170 726f 706f 732d or for apropos- │ │ │ -00000a60: 6163 6375 6d75 6c61 746f 722e 1f0a 2864 accumulator...(d │ │ │ -00000a70: 6566 7661 7220 6170 726f 706f 732d 6974 efvar apropos-it │ │ │ -00000a80: 656d 206e 696c 2028 2324 202e 2032 3632 em nil (#$ . 262 │ │ │ -00000a90: 3529 290a 2862 7974 652d 636f 6465 2022 5)).(byte-code " │ │ │ -00000aa0: c108 4210 c2c1 21ac 85c3 c1c4 5c22 88c4 ..B...!.....\".. │ │ │ -00000ab0: 8722 205b 6375 7272 656e 742d 6c6f 6164 ." [current-load │ │ │ -00000ac0: 2d6c 6973 7420 6170 726f 706f 732d 6d6f -list apropos-mo │ │ │ -00000ad0: 6465 2d68 6f6f 6b20 6465 6661 756c 742d de-hook default- │ │ │ -00000ae0: 626f 756e 6470 2073 6574 2d64 6566 6175 boundp set-defau │ │ │ -00000af0: 6c74 206e 696c 5d20 3329 0a23 4038 3920 lt nil] 3).#@89 │ │ │ -00000b00: 4d61 6a6f 7220 6d6f 6465 2066 6f72 2066 Major mode for f │ │ │ -00000b10: 6f6c 6c6f 7769 6e67 2068 7970 6572 6c69 ollowing hyperli │ │ │ -00000b20: 6e6b 7320 696e 206f 7574 7075 7420 6f66 nks in output of │ │ │ -00000b30: 2061 7072 6f70 6f73 2063 6f6d 6d61 6e64 apropos command │ │ │ -00000b40: 732e 0a0a 5c7b 6170 726f 706f 732d 6d6f s...\{apropos-mo │ │ │ -00000b50: 6465 2d6d 6170 7d1f 0a28 6465 6661 6c69 de-map}..(defali │ │ │ -00000b60: 6173 2027 6170 726f 706f 732d 6d6f 6465 as 'apropos-mode │ │ │ -00000b70: 2023 5b6e 696c 2022 c320 88c4 5c6e 2188 #[nil ". ..\n!. │ │ │ -00000b80: c511 c610 c7c8 2187 2220 5b6d 6f64 652d ......!." [mode- │ │ │ -00000b90: 6e61 6d65 206d 616a 6f72 2d6d 6f64 6520 name major-mode │ │ │ -00000ba0: 6170 726f 706f 732d 6d6f 6465 2d6d 6170 apropos-mode-map │ │ │ -00000bb0: 206b 696c 6c2d 616c 6c2d 6c6f 6361 6c2d kill-all-local- │ │ │ -00000bc0: 7661 7269 6162 6c65 7320 7573 652d 6c6f variables use-lo │ │ │ -00000bd0: 6361 6c2d 6d61 7020 6170 726f 706f 732d cal-map apropos- │ │ │ -00000be0: 6d6f 6465 2022 4170 726f 706f 7322 2072 mode "Apropos" r │ │ │ -00000bf0: 756e 2d68 6f6f 6b73 2061 7072 6f70 6f73 un-hooks apropos │ │ │ -00000c00: 2d6d 6f64 652d 686f 6f6b 5d20 3220 2823 -mode-hook] 2 (# │ │ │ -00000c10: 2420 2e20 3238 3136 2920 6e69 6c5d 290a $ . 2816) nil]). │ │ │ -00000c20: 2866 7365 7420 2763 6f6d 6d61 6e64 2d61 (fset 'command-a │ │ │ -00000c30: 7072 6f70 6f73 2027 6170 726f 706f 732d propos 'apropos- │ │ │ -00000c40: 636f 6d6d 616e 6429 0a23 4031 3531 2053 command).#@151 S │ │ │ -00000c50: 686f 7773 2063 6f6d 6d61 6e64 7320 2869 hows commands (i │ │ │ -00000c60: 6e74 6572 6163 7469 7665 6c79 2063 616c nteractively cal │ │ │ -00000c70: 6c61 626c 6520 6675 6e63 7469 6f6e 7329 lable functions) │ │ │ -00000c80: 2074 6861 7420 6d61 7463 6820 5245 4745 that match REGE │ │ │ -00000c90: 5850 2e0a 5769 7468 206f 7074 696f 6e61 XP..With optiona │ │ │ -00000ca0: 6c20 7072 6566 6978 2041 5247 206f 7220 l prefix ARG or │ │ │ -00000cb0: 6966 2060 6170 726f 706f 732d 646f 2d61 if `apropos-do-a │ │ │ -00000cc0: 6c6c 2720 6973 206e 6f6e 2d6e 696c 2c20 ll' is non-nil, │ │ │ -00000cd0: 616c 736f 2073 686f 770a 7661 7269 6162 also show.variab │ │ │ -00000ce0: 6c65 732e 1f0a 2864 6566 616c 6961 7320 les...(defalias │ │ │ -00000cf0: 2761 7072 6f70 6f73 2d63 6f6d 6d61 6e64 'apropos-command │ │ │ -00000d00: 2023 5b28 6170 726f 706f 732d 7265 6765 #[(apropos-rege │ │ │ -00000d10: 7870 2026 6f70 7469 6f6e 616c 2064 6f2d xp &optional do- │ │ │ -00000d20: 616c 6c29 2022 0bac 825c 6e13 c409 0bab all) "...\n..... │ │ │ -00000d30: 83c5 aa81 c65c 2210 c7c8 c9ca 2387 2220 .....\".....#." │ │ │ -00000d40: 5b61 7072 6f70 6f73 2d61 6363 756d 756c [apropos-accumul │ │ │ -00000d50: 6174 6f72 2061 7072 6f70 6f73 2d72 6567 ator apropos-reg │ │ │ -00000d60: 6578 7020 6170 726f 706f 732d 646f 2d61 exp apropos-do-a │ │ │ -00000d70: 6c6c 2064 6f2d 616c 6c20 6170 726f 706f ll do-all apropo │ │ │ -00000d80: 732d 696e 7465 726e 616c 2023 5b28 7379 s-internal #[(sy │ │ │ -00000d90: 6d62 6f6c 2920 22c1 0821 ae83 c208 2187 mbol) "..!....!. │ │ │ -00000da0: 2220 5b73 796d 626f 6c20 636f 6d6d 616e " [symbol comman │ │ │ -00000db0: 6470 2075 7365 722d 7661 7269 6162 6c65 dp user-variable │ │ │ -00000dc0: 2d70 5d20 325d 2063 6f6d 6d61 6e64 7020 -p] 2] commandp │ │ │ -00000dd0: 6170 726f 706f 732d 7072 696e 7420 7420 apropos-print t │ │ │ -00000de0: 235b 2870 2920 22c4 891b 1a09 adc8 0989 #[(p) "......... │ │ │ -00000df0: 4089 13c5 0b21 ad97 c60b 21ae 84c4 c7c8 @....!....!..... │ │ │ -00000e00: 8f89 12ab 895c 6ec9 cacb 5c6e 5c22 4faa .....\n...\n\"O. │ │ │ -00000e10: 81cc 08ad 9acd 0b21 ad95 ce0b 21ae 85cf .......!....!... │ │ │ -00000e20: 0bd0 d123 8912 ad87 5c6e c9ca cb5c 6e5c ...#....\n...\n\ │ │ │ -00000e30: 224f 45a0 8809 4189 11ac 39c4 2a87 2220 "OE...A...9.*." │ │ │ -00000e40: 5b64 6f2d 616c 6c20 7020 646f 6320 7379 [do-all p doc sy │ │ │ -00000e50: 6d62 6f6c 206e 696c 2063 6f6d 6d61 6e64 mbol nil command │ │ │ -00000e60: 7020 6675 6e63 7469 6f6e 2d6f 6273 6f6c p function-obsol │ │ │ -00000e70: 6574 656e 6573 732d 646f 6320 2864 6f63 eteness-doc (doc │ │ │ -00000e80: 756d 656e 7461 7469 6f6e 2073 796d 626f umentation symbo │ │ │ -00000e90: 6c20 7429 2028 2876 6f69 642d 6675 6e63 l t) ((void-func │ │ │ -00000ea0: 7469 6f6e 2022 2861 6c69 6173 6564 2074 tion "(aliased t │ │ │ -00000eb0: 6f20 756e 6465 6669 6e65 6420 6675 6e63 o undefined func │ │ │ -00000ec0: 7469 6f6e 2922 2920 2865 7272 6f72 2022 tion)") (error " │ │ │ -00000ed0: 2875 6e65 7870 6563 7465 6420 6572 726f (unexpected erro │ │ │ -00000ee0: 7220 6672 6f6d 2060 646f 6375 6d65 6e74 r from `document │ │ │ -00000ef0: 696f 6e27 2922 2929 2030 2073 7472 696e ion')")) 0 strin │ │ │ -00000f00: 672d 6d61 7463 6820 225c 6e22 2022 286e g-match "\n" "(n │ │ │ -00000f10: 6f74 2064 6f63 756d 656e 7465 6429 2220 ot documented)" │ │ │ -00000f20: 7573 6572 2d76 6172 6961 626c 652d 7020 user-variable-p │ │ │ -00000f30: 7661 7269 6162 6c65 2d6f 6273 6f6c 6574 variable-obsolet │ │ │ -00000f40: 656e 6573 732d 646f 6320 646f 6375 6d65 eness-doc docume │ │ │ -00000f50: 6e74 6174 696f 6e2d 7072 6f70 6572 7479 ntation-property │ │ │ -00000f60: 2076 6172 6961 626c 652d 646f 6375 6d65 variable-docume │ │ │ -00000f70: 6e74 6174 696f 6e20 745d 2039 5d20 6e69 ntation t] 9] ni │ │ │ -00000f80: 6c5d 2034 2028 2324 202e 2033 3135 3129 l] 4 (#$ . 3151) │ │ │ -00000f90: 2028 6c69 7374 2028 7265 6164 2d73 7472 (list (read-str │ │ │ -00000fa0: 696e 6720 2863 6f6e 6361 7420 2241 7072 ing (concat "Apr │ │ │ -00000fb0: 6f70 6f73 2063 6f6d 6d61 6e64 2022 2028 opos command " ( │ │ │ -00000fc0: 6966 2028 6f72 2063 7572 7265 6e74 2d70 if (or current-p │ │ │ -00000fd0: 7265 6669 782d 6172 6720 6170 726f 706f refix-arg apropo │ │ │ -00000fe0: 732d 646f 2d61 6c6c 2920 226f 7220 7661 s-do-all) "or va │ │ │ -00000ff0: 7269 6162 6c65 2022 2920 2228 7265 6765 riable ") "(rege │ │ │ -00001000: 7870 293a 2022 2929 2063 7572 7265 6e74 xp): ")) current │ │ │ -00001010: 2d70 7265 6669 782d 6172 6729 5d29 0a23 -prefix-arg)]).# │ │ │ -00001020: 4032 3432 2053 686f 7720 616c 6c20 626f @242 Show all bo │ │ │ -00001030: 756e 6420 7379 6d62 6f6c 7320 7768 6f73 und symbols whos │ │ │ -00001040: 6520 6e61 6d65 7320 6d61 7463 6820 5245 e names match RE │ │ │ -00001050: 4745 5850 2e0a 5769 7468 206f 7074 696f GEXP..With optio │ │ │ -00001060: 6e61 6c20 7072 6566 6978 2041 5247 206f nal prefix ARG o │ │ │ -00001070: 7220 6966 2060 6170 726f 706f 732d 646f r if `apropos-do │ │ │ -00001080: 2d61 6c6c 2720 6973 206e 6f6e 2d6e 696c -all' is non-nil │ │ │ -00001090: 2c20 616c 736f 2073 686f 7720 756e 626f , also show unbo │ │ │ -000010a0: 756e 640a 7379 6d62 6f6c 7320 616e 6420 und.symbols and │ │ │ -000010b0: 6b65 7920 6269 6e64 696e 6773 2c20 7768 key bindings, wh │ │ │ -000010c0: 6963 6820 6973 2061 206c 6974 746c 6520 ich is a little │ │ │ -000010d0: 6d6f 7265 2074 696d 652d 636f 6e73 756d more time-consum │ │ │ -000010e0: 696e 672e 0a52 6574 7572 6e73 206c 6973 ing..Returns lis │ │ │ -000010f0: 7420 6f66 2073 796d 626f 6c73 2061 6e64 t of symbols and │ │ │ -00001100: 2064 6f63 756d 656e 7461 7469 6f6e 2066 documentation f │ │ │ -00001110: 6f75 6e64 2e1f 0a28 6465 6661 6c69 6173 ound...(defalias │ │ │ -00001120: 2027 6170 726f 706f 7320 235b 2861 7072 'apropos #[(apr │ │ │ -00001130: 6f70 6f73 2d72 6567 6578 7020 266f 7074 opos-regexp &opt │ │ │ -00001140: 696f 6e61 6c20 646f 2d61 6c6c 2920 220b ional do-all) ". │ │ │ -00001150: 47c4 56ac 84c5 c621 88c7 0b5c 6e3f ad85 G.V....!...\n?.. │ │ │ -00001160: 093f ad81 c85c 2210 c95c 6eae 8109 cacb .?...\"..\n..... │ │ │ -00001170: 2387 2220 5b61 7072 6f70 6f73 2d61 6363 #." [apropos-acc │ │ │ -00001180: 756d 756c 6174 6f72 2061 7072 6f70 6f73 umulator apropos │ │ │ -00001190: 2d64 6f2d 616c 6c20 646f 2d61 6c6c 2061 -do-all do-all a │ │ │ -000011a0: 7072 6f70 6f73 2d72 6567 6578 7020 3020 propos-regexp 0 │ │ │ -000011b0: 6572 726f 7220 224d 7573 7420 7061 7373 error "Must pass │ │ │ -000011c0: 206e 6f6e 2d65 6d70 7479 2072 6567 6578 non-empty regex │ │ │ -000011d0: 7020 746f 2060 6170 726f 706f 7327 2220 p to `apropos'" │ │ │ -000011e0: 6170 726f 706f 732d 696e 7465 726e 616c apropos-internal │ │ │ -000011f0: 2023 5b28 7379 6d62 6f6c 2920 22c1 0821 #[(symbol) "..! │ │ │ -00001200: ae8d c208 21ae 88c3 0821 ae83 c408 2187 ....!....!....!. │ │ │ -00001210: 2220 5b73 796d 626f 6c20 6662 6f75 6e64 " [symbol fbound │ │ │ -00001220: 7020 626f 756e 6470 2066 696e 642d 6661 p boundp find-fa │ │ │ -00001230: 6365 2073 796d 626f 6c2d 706c 6973 745d ce symbol-plist] │ │ │ -00001240: 2032 5d20 6170 726f 706f 732d 7072 696e 2] apropos-prin │ │ │ -00001250: 7420 235b 2870 2920 22c3 891a 1908 85b5 t #[(p) "....... │ │ │ -00001260: 0008 8940 8911 c409 21ad 97c5 0921 ae84 ...@....!....!.. │ │ │ -00001270: c3c6 c78f 8912 ab89 5c6e c8c9 ca5c 6e5c ........\n...\n\ │ │ │ -00001280: 224f aa81 cbcc 0921 ad98 cd09 21ae 85ce "O.....!....!... │ │ │ -00001290: 09cf d023 8912 ab89 5c6e c8c9 ca5c 6e5c ...#....\n...\n\ │ │ │ -000012a0: 224f aa81 cbd1 0921 8912 ad96 5c6e 47d2 "O.....!....\nG. │ │ │ -000012b0: a5d3 61ab 87d4 d55c 6e40 5c22 aa87 d4d6 ..a....\n@\".... │ │ │ -000012c0: 5c6e 47d2 a55c 2209 d74e ad93 ce09 d8d0 \nG..\"..N...... │ │ │ -000012d0: 2389 12ab 895c 6ec8 c9ca 5c6e 5c22 4faa #....\n...\n\"O. │ │ │ -000012e0: 81cb d909 21ad 91da 0921 8912 ab89 5c6e ....!....!....\n │ │ │ -000012f0: c8c9 ca5c 6e5c 224f aa81 cb09 db4e ad93 ...\n\"O.....N.. │ │ │ -00001300: ce09 dcd0 2389 12ab 895c 6ec8 c9ca 5c6e ....#....\n...\n │ │ │ -00001310: 5c22 4faa 81cb af07 a088 0841 8910 8408 \"O........A.... │ │ │ -00001320: 00c3 2a87 2220 5b70 2073 796d 626f 6c20 ..*." [p symbol │ │ │ -00001330: 646f 6320 6e69 6c20 6662 6f75 6e64 7020 doc nil fboundp │ │ │ -00001340: 6675 6e63 7469 6f6e 2d6f 6273 6f6c 6574 function-obsolet │ │ │ -00001350: 656e 6573 732d 646f 6320 2864 6f63 756d eness-doc (docum │ │ │ -00001360: 656e 7461 7469 6f6e 2073 796d 626f 6c20 entation symbol │ │ │ -00001370: 7429 2028 2876 6f69 642d 6675 6e63 7469 t) ((void-functi │ │ │ -00001380: 6f6e 2022 2861 6c69 6173 6564 2074 6f20 on "(aliased to │ │ │ -00001390: 756e 6465 6669 6e65 6420 6675 6e63 7469 undefined functi │ │ │ -000013a0: 6f6e 2922 2920 2865 7272 6f72 2022 2875 on)") (error "(u │ │ │ -000013b0: 6e65 7870 6563 7465 6420 6572 726f 7220 nexpected error │ │ │ -000013c0: 6672 6f6d 2060 646f 6375 6d65 6e74 696f from `documentio │ │ │ -000013d0: 6e27 2922 2929 2030 2073 7472 696e 672d n')")) 0 string- │ │ │ -000013e0: 6d61 7463 6820 225c 6e22 2022 286e 6f74 match "\n" "(not │ │ │ -000013f0: 2064 6f63 756d 656e 7465 6429 2220 626f documented)" bo │ │ │ -00001400: 756e 6470 2076 6172 6961 626c 652d 6f62 undp variable-ob │ │ │ -00001410: 736f 6c65 7465 6e65 7373 2d64 6f63 2064 soleteness-doc d │ │ │ -00001420: 6f63 756d 656e 7461 7469 6f6e 2d70 726f ocumentation-pro │ │ │ -00001430: 7065 7274 7920 7661 7269 6162 6c65 2d64 perty variable-d │ │ │ -00001440: 6f63 756d 656e 7461 7469 6f6e 2074 2073 ocumentation t s │ │ │ -00001450: 796d 626f 6c2d 706c 6973 7420 3220 3120 ymbol-plist 2 1 │ │ │ -00001460: 666f 726d 6174 2022 3120 7072 6f70 6572 format "1 proper │ │ │ -00001470: 7479 2028 2573 2922 2022 2564 2070 726f ty (%s)" "%d pro │ │ │ -00001480: 7065 7274 6965 7322 2077 6964 6765 742d perties" widget- │ │ │ -00001490: 7479 7065 2077 6964 6765 742d 646f 6375 type widget-docu │ │ │ -000014a0: 6d65 6e74 6174 696f 6e20 6669 6e64 2d66 mentation find-f │ │ │ -000014b0: 6163 6520 6661 6365 2d64 6f63 2d73 7472 ace face-doc-str │ │ │ -000014c0: 696e 6720 6375 7374 6f6d 2d67 726f 7570 ing custom-group │ │ │ -000014d0: 2067 726f 7570 2d64 6f63 756d 656e 7461 group-documenta │ │ │ -000014e0: 7469 6f6e 5d20 3133 5d20 6e69 6c5d 2034 tion] 13] nil] 4 │ │ │ -000014f0: 2028 2324 202e 2034 3133 3329 2022 7341 (#$ . 4133) "sA │ │ │ -00001500: 7072 6f70 6f73 2073 796d 626f 6c20 2872 propos symbol (r │ │ │ -00001510: 6567 6578 7029 3a20 5c6e 5022 5d29 0a23 egexp): \nP"]).# │ │ │ -00001520: 4032 3334 2053 686f 7720 616c 6c20 7379 @234 Show all sy │ │ │ -00001530: 6d62 6f6c 7320 7768 6f73 6520 7661 6c75 mbols whose valu │ │ │ -00001540: 6527 7320 7072 696e 7465 6420 696d 6167 e's printed imag │ │ │ -00001550: 6520 6d61 7463 6865 7320 5245 4745 5850 e matches REGEXP │ │ │ -00001560: 2e0a 5769 7468 206f 7074 696f 6e61 6c20 ..With optional │ │ │ -00001570: 7072 6566 6978 2041 5247 206f 7220 6966 prefix ARG or if │ │ │ -00001580: 2060 6170 726f 706f 732d 646f 2d61 6c6c `apropos-do-all │ │ │ -00001590: 2720 6973 206e 6f6e 2d6e 696c 2c20 616c ' is non-nil, al │ │ │ -000015a0: 736f 206c 6f6f 6b73 0a61 7420 7468 6520 so looks.at the │ │ │ -000015b0: 6675 6e63 7469 6f6e 2061 6e64 2061 7420 function and at │ │ │ -000015c0: 7468 6520 6e61 6d65 7320 616e 6420 7661 the names and va │ │ │ -000015d0: 6c75 6573 206f 6620 7072 6f70 6572 7469 lues of properti │ │ │ -000015e0: 6573 2e0a 5265 7475 726e 7320 6c69 7374 es..Returns list │ │ │ -000015f0: 206f 6620 7379 6d62 6f6c 7320 616e 6420 of symbols and │ │ │ -00001600: 7661 6c75 6573 2066 6f75 6e64 2e1f 0a28 values found...( │ │ │ -00001610: 6465 6661 6c69 6173 2027 6170 726f 706f defalias 'apropo │ │ │ -00001620: 732d 7661 6c75 6520 235b 2861 7072 6f70 s-value #[(aprop │ │ │ -00001630: 6f73 2d72 6567 6578 7020 266f 7074 696f os-regexp &optio │ │ │ -00001640: 6e61 6c20 646f 2d61 6c6c 2920 220d ac82 nal do-all) "... │ │ │ -00001650: 0c15 c689 13c6 891a 1918 c7c8 2188 2bc9 ............!.+. │ │ │ -00001660: c689 ca23 8722 205b 6620 7620 7020 6170 ...#." [f v p ap │ │ │ -00001670: 726f 706f 732d 6163 6375 6d75 6c61 746f ropos-accumulato │ │ │ -00001680: 7220 6170 726f 706f 732d 646f 2d61 6c6c r apropos-do-all │ │ │ -00001690: 2064 6f2d 616c 6c20 6e69 6c20 6d61 7061 do-all nil mapa │ │ │ -000016a0: 746f 6d73 2023 5b28 7379 6d62 6f6c 2920 toms #[(symbol) │ │ │ -000016b0: 22c6 8914 13c6 120d c773 ac86 c8c9 0dca "........s...... │ │ │ -000016c0: 2313 08ab 8cc8 cb0d cc23 14cd 0dce cf23 #........#.....# │ │ │ -000016d0: 120c ac86 0bac 835c 6ead 890d 0c0b 5c6e .......\n.....\n │ │ │ -000016e0: 4609 4289 1187 2220 5b64 6f2d 616c 6c20 F.B..." [do-all │ │ │ -000016f0: 6170 726f 706f 732d 6163 6375 6d75 6c61 apropos-accumula │ │ │ -00001700: 746f 7220 7020 7620 6620 7379 6d62 6f6c tor p v f symbol │ │ │ -00001710: 206e 696c 2028 6170 726f 706f 732d 7265 nil (apropos-re │ │ │ -00001720: 6765 7870 2064 6f2d 616c 6c20 6170 726f gexp do-all apro │ │ │ -00001730: 706f 732d 6163 6375 6d75 6c61 746f 7220 pos-accumulator │ │ │ -00001740: 7379 6d62 6f6c 2066 2076 2070 2920 6170 symbol f v p) ap │ │ │ -00001750: 726f 706f 732d 7661 6c75 652d 696e 7465 ropos-value-inte │ │ │ -00001760: 726e 616c 2062 6f75 6e64 7020 7379 6d62 rnal boundp symb │ │ │ -00001770: 6f6c 2d76 616c 7565 2066 626f 756e 6470 ol-value fboundp │ │ │ -00001780: 2073 796d 626f 6c2d 6675 6e63 7469 6f6e symbol-function │ │ │ -00001790: 2061 7072 6f70 6f73 2d66 6f72 6d61 742d apropos-format- │ │ │ -000017a0: 706c 6973 7420 225c 6e20 2020 2022 2074 plist "\n " t │ │ │ -000017b0: 5d20 355d 2061 7072 6f70 6f73 2d70 7269 ] 5] apropos-pri │ │ │ -000017c0: 6e74 2074 5d20 3520 2823 2420 2e20 3534 nt t] 5 (#$ . 54 │ │ │ -000017d0: 3133 2920 2273 4170 726f 706f 7320 7661 13) "sApropos va │ │ │ -000017e0: 6c75 6520 2872 6567 6578 7029 3a20 5c6e lue (regexp): \n │ │ │ -000017f0: 5022 5d29 0a23 4032 3632 2053 686f 7720 P"]).#@262 Show │ │ │ -00001800: 7379 6d62 6f6c 7320 7768 6f73 6520 646f symbols whose do │ │ │ -00001810: 6375 6d65 6e74 6174 696f 6e20 636f 6e74 cumentation cont │ │ │ -00001820: 6169 6e20 6d61 7463 6865 7320 666f 7220 ain matches for │ │ │ -00001830: 5245 4745 5850 2e0a 5769 7468 206f 7074 REGEXP..With opt │ │ │ -00001840: 696f 6e61 6c20 7072 6566 6978 2041 5247 ional prefix ARG │ │ │ -00001850: 206f 7220 6966 2060 6170 726f 706f 732d or if `apropos- │ │ │ -00001860: 646f 2d61 6c6c 2720 6973 206e 6f6e 2d6e do-all' is non-n │ │ │ -00001870: 696c 2c20 616c 736f 2075 7365 0a64 6f63 il, also use.doc │ │ │ -00001880: 756d 656e 7461 7469 6f6e 2074 6861 7420 umentation that │ │ │ -00001890: 6973 206e 6f74 2073 746f 7265 6420 696e is not stored in │ │ │ -000018a0: 2074 6865 2064 6f63 756d 656e 7461 7469 the documentati │ │ │ -000018b0: 6f6e 2066 696c 6520 616e 6420 7368 6f77 on file and show │ │ │ -000018c0: 206b 6579 0a62 696e 6469 6e67 732e 0a52 key.bindings..R │ │ │ -000018d0: 6574 7572 6e73 206c 6973 7420 6f66 2073 eturns list of s │ │ │ -000018e0: 796d 626f 6c73 2061 6e64 2064 6f63 756d ymbols and docum │ │ │ -000018f0: 656e 7461 7469 6f6e 2066 6f75 6e64 2e1f entation found.. │ │ │ -00001900: 0a28 6465 6661 6c69 6173 2027 6170 726f .(defalias 'apro │ │ │ -00001910: 706f 732d 646f 6375 6d65 6e74 6174 696f pos-documentatio │ │ │ -00001920: 6e20 235b 2861 7072 6f70 6f73 2d72 6567 n #[(apropos-reg │ │ │ -00001930: 6578 7020 266f 7074 696f 6e61 6c20 646f exp &optional do │ │ │ -00001940: 2d61 6c6c 2920 220d ac82 0b15 c689 1211 -all) "......... │ │ │ -00001950: c7c8 21c6 8918 1e0f 1cc9 8e8a 0c71 88ca ..!..........q.. │ │ │ -00001960: 2088 0dab 84cb cc21 88cd c689 ce23 2d87 ......!.....#-. │ │ │ -00001970: 2220 5b76 2061 7072 6f70 6f73 2d66 696c " [v apropos-fil │ │ │ -00001980: 6573 2d73 6361 6e6e 6564 2061 7072 6f70 es-scanned aprop │ │ │ -00001990: 6f73 2d61 6363 756d 756c 6174 6f72 2061 os-accumulator a │ │ │ -000019a0: 7072 6f70 6f73 2d64 6f2d 616c 6c20 7374 propos-do-all st │ │ │ -000019b0: 616e 6461 7264 2d69 6e70 7574 2064 6f2d andard-input do- │ │ │ -000019c0: 616c 6c20 6e69 6c20 6765 742d 6275 6666 all nil get-buff │ │ │ -000019d0: 6572 2d63 7265 6174 6520 2220 6170 726f er-create " apro │ │ │ -000019e0: 706f 732d 7465 6d70 2220 2828 6b69 6c6c pos-temp" ((kill │ │ │ -000019f0: 2d62 7566 6665 7220 7374 616e 6461 7264 -buffer standard │ │ │ -00001a00: 2d69 6e70 7574 2929 2061 7072 6f70 6f73 -input)) apropos │ │ │ -00001a10: 2d64 6f63 756d 656e 7461 7469 6f6e 2d63 -documentation-c │ │ │ -00001a20: 6865 636b 2d64 6f63 2d66 696c 6520 6d61 heck-doc-file ma │ │ │ -00001a30: 7061 746f 6d73 2023 5b28 7379 6d62 6f6c patoms #[(symbol │ │ │ -00001a40: 2920 22c5 5c6e 2113 5c6e c64e 8914 a8ab ) ".\n!.\n.N.... │ │ │ -00001a50: 82c7 14c8 0b21 13c8 0c21 140b ac83 0cad .....!...!...... │ │ │ -00001a60: 9f5c 6e09 b741 8910 ab8f 0bab 8408 0ba0 .\n..A.......... │ │ │ -00001a70: 880c ad8d 0841 0ca0 875c 6e0b 0c45 0942 .....A...\n..E.B │ │ │ -00001a80: 8911 8722 205b 6170 726f 706f 732d 6974 ..." [apropos-it │ │ │ -00001a90: 656d 2061 7072 6f70 6f73 2d61 6363 756d em apropos-accum │ │ │ -00001aa0: 756c 6174 6f72 2073 796d 626f 6c20 6620 ulator symbol f │ │ │ -00001ab0: 7620 6170 726f 706f 732d 7361 6665 2d64 v apropos-safe-d │ │ │ -00001ac0: 6f63 756d 656e 7461 7469 6f6e 2076 6172 ocumentation var │ │ │ -00001ad0: 6961 626c 652d 646f 6375 6d65 6e74 6174 iable-documentat │ │ │ -00001ae0: 696f 6e20 6e69 6c20 6170 726f 706f 732d ion nil apropos- │ │ │ -00001af0: 646f 6375 6d65 6e74 6174 696f 6e2d 696e documentation-in │ │ │ -00001b00: 7465 726e 616c 5d20 345d 2061 7072 6f70 ternal] 4] aprop │ │ │ -00001b10: 6f73 2d70 7269 6e74 2074 2066 5d20 3520 os-print t f] 5 │ │ │ -00001b20: 2823 2420 2e20 3631 3339 2920 2273 4170 (#$ . 6139) "sAp │ │ │ -00001b30: 726f 706f 7320 646f 6375 6d65 6e74 6174 ropos documentat │ │ │ -00001b40: 696f 6e20 2872 6567 6578 7029 3a20 5c6e ion (regexp): \n │ │ │ -00001b50: 5022 5d29 0a28 6465 6661 6c69 6173 2027 P"]).(defalias ' │ │ │ -00001b60: 6170 726f 706f 732d 7661 6c75 652d 696e apropos-value-in │ │ │ -00001b70: 7465 726e 616c 2023 5b28 7072 6564 6963 ternal #[(predic │ │ │ -00001b80: 6174 6520 7379 6d62 6f6c 2066 756e 6374 ate symbol funct │ │ │ -00001b90: 696f 6e29 2022 5c6e 0c21 ad9a c509 0c21 ion) "\n.!.....! │ │ │ -00001ba0: 2114 c608 0c5c 22ad 8e0b ab8a c7c8 94c8 !....\"......... │ │ │ -00001bb0: 95c9 0b0c 2588 0c87 2220 5b61 7072 6f70 ....%..." [aprop │ │ │ -00001bc0: 6f73 2d72 6567 6578 7020 6675 6e63 7469 os-regexp functi │ │ │ -00001bd0: 6f6e 2070 7265 6469 6361 7465 2061 7072 on predicate apr │ │ │ -00001be0: 6f70 6f73 2d6d 6174 6368 2d66 6163 6520 opos-match-face │ │ │ -00001bf0: 7379 6d62 6f6c 2070 7269 6e31 2d74 6f2d symbol prin1-to- │ │ │ -00001c00: 7374 7269 6e67 2073 7472 696e 672d 6d61 string string-ma │ │ │ -00001c10: 7463 6820 7075 742d 7465 7874 2d70 726f tch put-text-pro │ │ │ -00001c20: 7065 7274 7920 3020 6661 6365 5d20 365d perty 0 face] 6] │ │ │ -00001c30: 290a 2864 6566 616c 6961 7320 2761 7072 ).(defalias 'apr │ │ │ -00001c40: 6f70 6f73 2d64 6f63 756d 656e 7461 7469 opos-documentati │ │ │ -00001c50: 6f6e 2d69 6e74 6572 6e61 6c20 235b 2864 on-internal #[(d │ │ │ -00001c60: 6f63 2920 225c 6e3a ab85 c35c 6e40 2187 oc) "\n:...\n@!. │ │ │ -00001c70: 5c6e ad98 c408 5c6e 5c22 ad92 09ab 8ec5 \n....\n\"...... │ │ │ -00001c80: c694 c695 c709 c85c 6e21 8912 2588 5c6e .......\n!..%.\n │ │ │ -00001c90: 8722 205b 6170 726f 706f 732d 7265 6765 ." [apropos-rege │ │ │ -00001ca0: 7870 2061 7072 6f70 6f73 2d6d 6174 6368 xp apropos-match │ │ │ -00001cb0: 2d66 6163 6520 646f 6320 6170 726f 706f -face doc apropo │ │ │ -00001cc0: 732d 646f 6375 6d65 6e74 6174 696f 6e2d s-documentation- │ │ │ -00001cd0: 6368 6563 6b2d 656c 632d 6669 6c65 2073 check-elc-file s │ │ │ -00001ce0: 7472 696e 672d 6d61 7463 6820 7075 742d tring-match put- │ │ │ -00001cf0: 7465 7874 2d70 726f 7065 7274 7920 3020 text-property 0 │ │ │ -00001d00: 6661 6365 2063 6f70 792d 7365 7175 656e face copy-sequen │ │ │ -00001d10: 6365 5d20 375d 290a 2864 6566 616c 6961 ce] 7]).(defalia │ │ │ -00001d20: 7320 2761 7072 6f70 6f73 2d66 6f72 6d61 s 'apropos-forma │ │ │ -00001d30: 742d 706c 6973 7420 235b 2870 6c20 7365 t-plist #[(pl se │ │ │ -00001d40: 7020 266f 7074 696f 6e61 6c20 636f 6d70 p &optional comp │ │ │ -00001d50: 6172 6529 2022 c60d 2115 c789 1b1c 0dab are) "..!....... │ │ │ -00001d60: c9c8 c90d 400d 4140 2314 5c6e ab87 ca0e ....@.A@#.\n.... │ │ │ -00001d70: 0f0c 5c22 ab91 09ab 90cb cccd 0d40 2147 ..\".........@!G │ │ │ -00001d80: ce09 0c25 88aa 82c7 140c ab99 5c6e ab8d ...%........\n.. │ │ │ -00001d90: 08ab 8acb cc94 cc95 ce08 0c25 880b 89ad ...........%.... │ │ │ -00001da0: 820e 100c 5113 0d41 4189 15ac 370b 2a87 ....Q..AA...7.*. │ │ │ -00001db0: 2220 5b61 7072 6f70 6f73 2d6d 6174 6368 " [apropos-match │ │ │ -00001dc0: 2d66 6163 6520 6170 726f 706f 732d 7072 -face apropos-pr │ │ │ -00001dd0: 6f70 6572 7479 2d66 6163 6520 636f 6d70 operty-face comp │ │ │ -00001de0: 6172 6520 702d 6f75 7420 7020 706c 2073 are p-out p pl s │ │ │ -00001df0: 796d 626f 6c2d 706c 6973 7420 6e69 6c20 ymbol-plist nil │ │ │ -00001e00: 666f 726d 6174 2022 2573 2025 5322 2073 format "%s %S" s │ │ │ -00001e10: 7472 696e 672d 6d61 7463 6820 7075 742d tring-match put- │ │ │ -00001e20: 7465 7874 2d70 726f 7065 7274 7920 3020 text-property 0 │ │ │ -00001e30: 7379 6d62 6f6c 2d6e 616d 6520 6661 6365 symbol-name face │ │ │ -00001e40: 2061 7072 6f70 6f73 2d72 6567 6578 7020 apropos-regexp │ │ │ -00001e50: 7365 705d 2037 5d29 0a28 6465 6661 6c69 sep] 7]).(defali │ │ │ -00001e60: 6173 2027 6170 726f 706f 732d 646f 6375 as 'apropos-docu │ │ │ -00001e70: 6d65 6e74 6174 696f 6e2d 6368 6563 6b2d mentation-check- │ │ │ -00001e80: 646f 632d 6669 6c65 2023 5b6e 696c 2022 doc-file #[nil " │ │ │ -00001e90: c689 c7c6 8989 891a 1d1c 1b18 191e 15c8 ................ │ │ │ -00001ea0: 6388 c975 88ca 0e19 0e1a 5021 88c6 7588 c..u......P!..u. │ │ │ -00001eb0: 8acb cc21 136d 293f ade8 cd79 888c 600b ...!.m)?...y..`. │ │ │ -00001ec0: 537d 88ce 0e1b c6cf 2329 abd1 d094 1460 S}......#).....` │ │ │ -00001ed0: 1508 5462 8868 d161 ab83 cdaa 81c7 1615 ..Tb.h.a........ │ │ │ -00001ee0: d220 110c 605a 5314 0d60 5a53 1560 540b . ..`ZS..`ZS.`T. │ │ │ -00001ef0: 537b 1209 0e16 b789 1617 ac8c 09c6 8945 S{.............E │ │ │ -00001f00: 8916 170e 1642 1616 0e18 ab89 d30c 0dd4 .....B.......... │ │ │ -00001f10: 0e18 5c6e 2588 0e15 0e17 9b5c 6ea0 880b ..\n%......\n... │ │ │ -00001f20: 6210 aa0e 2e07 8722 205b 7365 7061 2073 b......" [sepa s │ │ │ -00001f30: 796d 626f 6c20 646f 6320 7365 7062 2073 ymbol doc sepb s │ │ │ -00001f40: 7461 7274 2065 6e64 206e 696c 2032 203f tart end nil 2 ? │ │ │ -00001f50: 5c5e 5f20 2d31 2069 6e73 6572 742d 6669 \^_ -1 insert-fi │ │ │ -00001f60: 6c65 2d63 6f6e 7465 6e74 7320 7365 6172 le-contents sear │ │ │ -00001f70: 6368 2d66 6f72 7761 7264 2022 1f22 2031 ch-forward "." 1 │ │ │ -00001f80: 2072 652d 7365 6172 6368 2d66 6f72 7761 re-search-forwa │ │ │ -00001f90: 7264 2074 2030 203f 4620 7265 6164 2070 rd t 0 ?F read p │ │ │ -00001fa0: 7574 2d74 6578 742d 7072 6f70 6572 7479 ut-text-property │ │ │ -00001fb0: 2066 6163 6520 7479 7065 2061 7072 6f70 face type aprop │ │ │ -00001fc0: 6f73 2d61 6363 756d 756c 6174 6f72 2061 os-accumulator a │ │ │ -00001fd0: 7072 6f70 6f73 2d69 7465 6d20 6170 726f propos-item apro │ │ │ -00001fe0: 706f 732d 6d61 7463 682d 6661 6365 2064 pos-match-face d │ │ │ -00001ff0: 6f63 2d64 6972 6563 746f 7279 2069 6e74 oc-directory int │ │ │ -00002000: 6572 6e61 6c2d 646f 632d 6669 6c65 2d6e ernal-doc-file-n │ │ │ -00002010: 616d 6520 6170 726f 706f 732d 7265 6765 ame apropos-rege │ │ │ -00002020: 7870 5d20 385d 290a 2864 6566 616c 6961 xp] 8]).(defalia │ │ │ -00002030: 7320 2761 7072 6f70 6f73 2d64 6f63 756d s 'apropos-docum │ │ │ -00002040: 656e 7461 7469 6f6e 2d63 6865 636b 2d65 entation-check-e │ │ │ -00002050: 6c63 2d66 696c 6520 235b 2866 696c 6529 lc-file #[(file) │ │ │ -00002060: 2022 080e 19b6 3f85 b400 c689 8989 891a "....?......... │ │ │ -00002070: 1c1b 191d 080e 1942 1619 c720 88c8 0821 .......B... ...! │ │ │ -00002080: 88c9 cac6 cb23 85b3 00cc 2014 6054 1360 .....#.... .`T.` │ │ │ -00002090: 0c5c 5c53 14c6 7588 8c0b 0c7d 88cd 0e1d .\\S..u....}.... │ │ │ -000020a0: c6cb 2329 ab5c 5c0c ce5c 5c62 880b 0c7b ..#).\\..\\b...{ │ │ │ -000020b0: 11cf 950b 5a14 cf94 0b5a 13d0 d121 12d2 ....Z....Z...!.. │ │ │ -000020c0: c677 88c6 7588 cc20 8915 3aab 850d 4140 .w..u.. ..:...A@ │ │ │ -000020d0: aa81 0d15 5c6e ab85 0dd3 4eaa 88d4 0d21 ....\n....N....! │ │ │ -000020e0: ab23 d50d 21ab 1e0d 0e1a b789 161b ac8c .#..!........... │ │ │ -000020f0: 0dc6 8945 8916 1b0e 1a42 161a 0e1c ab89 ...E.....B...... │ │ │ -00002100: d60b 0cd7 0e1c 0925 885c 6eab 83ce aa81 .......%.\n..... │ │ │ -00002110: d80e 1b9b 09a0 8882 1f00 2d87 2220 5b66 ..........-." [f │ │ │ -00002120: 696c 6520 646f 6320 7468 6973 2d69 732d ile doc this-is- │ │ │ -00002130: 612d 7661 7269 6162 6c65 2073 7461 7274 a-variable start │ │ │ -00002140: 2065 6e64 2073 796d 626f 6c20 6e69 6c20 end symbol nil │ │ │ -00002150: 6572 6173 652d 6275 6666 6572 2069 6e73 erase-buffer ins │ │ │ -00002160: 6572 742d 6669 6c65 2d63 6f6e 7465 6e74 ert-file-content │ │ │ -00002170: 7320 7365 6172 6368 2d66 6f72 7761 7264 s search-forward │ │ │ -00002180: 2022 5c6e 2340 2220 7420 7265 6164 2072 "\n#@" t read r │ │ │ -00002190: 652d 7365 6172 6368 2d66 6f72 7761 7264 e-search-forward │ │ │ -000021a0: 2032 2030 206c 6f6f 6b69 6e67 2d61 7420 2 0 looking-at │ │ │ -000021b0: 2228 6465 665c 5c28 7661 725c 5c7c 636f "(def\\(var\\|co │ │ │ -000021c0: 6e73 745c 5c29 2022 2022 2861 2d7a 2220 nst\\) " "(a-z" │ │ │ -000021d0: 7661 7269 6162 6c65 2d64 6f63 756d 656e variable-documen │ │ │ -000021e0: 7461 7469 6f6e 2066 626f 756e 6470 2061 tation fboundp a │ │ │ -000021f0: 7072 6f70 6f73 2d73 6166 652d 646f 6375 propos-safe-docu │ │ │ -00002200: 6d65 6e74 6174 696f 6e20 7075 742d 7465 mentation put-te │ │ │ -00002210: 7874 2d70 726f 7065 7274 7920 6661 6365 xt-property face │ │ │ -00002220: 2031 2061 7072 6f70 6f73 2d66 696c 6573 1 apropos-files │ │ │ -00002230: 2d73 6361 6e6e 6564 2061 7072 6f70 6f73 -scanned apropos │ │ │ -00002240: 2d61 6363 756d 756c 6174 6f72 2061 7072 -accumulator apr │ │ │ -00002250: 6f70 6f73 2d69 7465 6d20 6170 726f 706f opos-item apropo │ │ │ -00002260: 732d 6d61 7463 682d 6661 6365 2061 7072 s-match-face apr │ │ │ -00002270: 6f70 6f73 2d72 6567 6578 705d 2037 5d29 opos-regexp] 7]) │ │ │ -00002280: 0a23 4038 3920 4c69 6b65 2064 6f63 756d .#@89 Like docum │ │ │ -00002290: 656e 7461 7469 6f6e 2c20 6578 6365 7074 entation, except │ │ │ -000022a0: 2069 7420 6176 6f69 6473 2063 616c 6c69 it avoids calli │ │ │ -000022b0: 6e67 2060 6765 745f 646f 635f 7374 7269 ng `get_doc_stri │ │ │ -000022c0: 6e67 272e 0a57 696c 6c20 7265 7475 726e ng'..Will return │ │ │ -000022d0: 206e 696c 2069 6e73 7465 6164 2e1f 0a28 nil instead...( │ │ │ -000022e0: 6465 6661 6c69 6173 2027 6170 726f 706f defalias 'apropo │ │ │ -000022f0: 732d 7361 6665 2d64 6f63 756d 656e 7461 s-safe-documenta │ │ │ -00002300: 7469 6f6e 2023 5b28 6675 6e63 7469 6f6e tion #[(function │ │ │ -00002310: 2920 2208 ab8f 0839 ab8b c108 21ad 8208 ) "....9....!... │ │ │ -00002320: 4b89 10ac 7108 a2c2 61ab 8308 4110 c308 K...q...a...A... │ │ │ -00002330: 21ab 95c1 c421 ab85 c408 21aa b008 47c5 !....!....!...G. │ │ │ -00002340: 56ad aa08 c548 aaa5 08a2 c661 ab85 c708 V....H.....a.... │ │ │ -00002350: 38aa 9a08 a2c8 61ad 94c7 0838 3bab 85c7 8.....a....8;... │ │ │ -00002360: 0838 aa89 c908 383b ad83 c908 3889 10a8 .8....8;....8... │ │ │ -00002370: 3fad 8108 8722 205b 6675 6e63 7469 6f6e ?...." [function │ │ │ -00002380: 2066 626f 756e 6470 206d 6163 726f 2063 fboundp macro c │ │ │ -00002390: 6f6d 7069 6c65 642d 6675 6e63 7469 6f6e ompiled-function │ │ │ -000023a0: 2d70 2063 6f6d 7069 6c65 642d 6675 6e63 -p compiled-func │ │ │ -000023b0: 7469 6f6e 2d64 6f63 2d73 7472 696e 6720 tion-doc-string │ │ │ -000023c0: 3420 6175 746f 6c6f 6164 2032 206c 616d 4 autoload 2 lam │ │ │ -000023d0: 6264 6120 335d 2033 2028 2324 202e 2038 bda 3] 3 (#$ . 8 │ │ │ -000023e0: 3833 3829 5d29 0a23 4032 3839 204f 7574 838)]).#@289 Out │ │ │ -000023f0: 7075 7420 7265 7375 6c74 206f 6620 7661 put result of va │ │ │ -00002400: 7269 6f75 7320 6170 726f 706f 7320 636f rious apropos co │ │ │ -00002410: 6d6d 616e 6473 2077 6974 6820 6061 7072 mmands with `apr │ │ │ -00002420: 6f70 6f73 2d72 6567 6578 7027 2e0a 4150 opos-regexp'..AP │ │ │ -00002430: 524f 504f 532d 4143 4355 4d55 4c41 544f ROPOS-ACCUMULATO │ │ │ -00002440: 5220 6973 2061 206c 6973 742e 2020 4f70 R is a list. Op │ │ │ -00002450: 7469 6f6e 616c 2044 4f43 2d46 4e20 6973 tional DOC-FN is │ │ │ -00002460: 2063 616c 6c65 6420 666f 7220 6561 6368 called for each │ │ │ -00002470: 2065 6c65 6d65 6e74 0a6f 6620 6170 726f element.of apro │ │ │ -00002480: 706f 732d 6163 6375 6d75 6c61 746f 7220 pos-accumulator │ │ │ -00002490: 616e 6420 6d61 7920 6d6f 6469 6679 2069 and may modify i │ │ │ -000024a0: 7420 7265 7375 6c74 696e 6720 696e 2028 t resulting in ( │ │ │ -000024b0: 7379 6d62 6f6c 2066 6e2d 646f 630a 7661 symbol fn-doc.va │ │ │ -000024c0: 722d 646f 6320 5b70 6c69 7374 2d64 6f63 r-doc [plist-doc │ │ │ -000024d0: 5d29 2e20 2052 6574 7572 6e73 2073 6f72 ]). Returns sor │ │ │ -000024e0: 7465 6420 6c69 7374 206f 6620 7379 6d62 ted list of symb │ │ │ -000024f0: 6f6c 7320 616e 6420 646f 6375 6d65 6e74 ols and document │ │ │ -00002500: 6174 696f 6e0a 666f 756e 642e 1f0a 2864 ation.found...(d │ │ │ -00002510: 6566 616c 6961 7320 2761 7072 6f70 6f73 efalias 'apropos │ │ │ -00002520: 2d70 7269 6e74 2023 5b28 646f 2d6b 6579 -print #[(do-key │ │ │ -00002530: 7320 646f 632d 666e 2073 7061 6369 6e67 s doc-fn spacing │ │ │ -00002540: 2920 220c ac85 c5c6 5c6e 5c22 8709 ab84 ) ".....\n\".... │ │ │ -00002550: 090c 2188 c70c c85c 2214 0bab 8f0b 39ac ..!....\".....9. │ │ │ -00002560: 85c9 0b21 ab86 ca0b cb42 4213 cc18 cdce ...!.....BB..... │ │ │ -00002570: 5c6e 5c22 8829 0ccf 1487 2220 5b68 656c \n\".)...." [hel │ │ │ -00002580: 702d 6275 6666 6572 2d70 7265 6669 782d p-buffer-prefix- │ │ │ -00002590: 7374 7269 6e67 2064 6f63 2d66 6e20 6170 string doc-fn ap │ │ │ -000025a0: 726f 706f 732d 7265 6765 7870 2061 7072 ropos-regexp apr │ │ │ -000025b0: 6f70 6f73 2d6c 6162 656c 2d66 6163 6520 opos-label-face │ │ │ -000025c0: 6170 726f 706f 732d 6163 6375 6d75 6c61 apropos-accumula │ │ │ -000025d0: 746f 7220 6d65 7373 6167 6520 224e 6f20 tor message "No │ │ │ -000025e0: 6170 726f 706f 7320 6d61 7463 6865 7320 apropos matches │ │ │ -000025f0: 666f 7220 6025 7327 2220 736f 7274 2023 for `%s'" sort # │ │ │ -00002600: 5b28 6120 6229 2022 0940 0840 9987 2220 [(a b) ".@.@.." │ │ │ -00002610: 5b62 2061 5d20 325d 2066 6163 6570 2066 [b a] 2] facep f │ │ │ -00002620: 6163 6520 286d 6f75 7365 2d66 6163 6520 ace (mouse-face │ │ │ -00002630: 6869 6768 6c69 6768 7429 2022 4170 726f highlight) "Apro │ │ │ -00002640: 706f 7322 2077 6974 682d 6469 7370 6c61 pos" with-displa │ │ │ -00002650: 7969 6e67 2d68 656c 702d 6275 6666 6572 ying-help-buffer │ │ │ -00002660: 2023 5b6e 696c 2022 720e 4971 88c6 c721 #[nil "r.Iq...! │ │ │ -00002670: 880e 4a70 c889 8989 1a19 1e26 1d1e 4518 ..Jp.......&..E. │ │ │ -00002680: c90e 4621 88ca 20ab 8acb cc21 88cb cdce ..F!.. ....!.... │ │ │ -00002690: 2121 88cb cdcf 2121 8808 3a85 6801 0e4b !!....!!..:.h..K │ │ │ -000026a0: ab86 6fac 83d0 2088 0840 8916 4140 1508 ..o... ..@..A@.. │ │ │ -000026b0: 4110 6011 cb0d 2188 6012 0c83 ee00 d10d A.`...!.`....... │ │ │ -000026c0: 2183 ee00 d2d3 d45c 2283 ee00 8a0e 4571 !......\".....Eq │ │ │ -000026d0: 88d5 0d21 29c8 1e42 891e 43ab be0e 4340 ...!)..B..C...C@ │ │ │ -000026e0: d6c8 1e44 1b1e 400b 0e40 4757 ab99 d70e ...D..@..@GW.... │ │ │ -000026f0: 400b 4821 ac88 d80e 400b 4821 ab83 d916 @.H!....@.H!.... │ │ │ -00002700: 440b 5489 13aa 610e 44ac 870e 400e 4242 D.T...a.D...@.BB │ │ │ -00002710: 1642 2b0e 4341 8916 43ac 420e 4289 1626 .B+.CA..C.B.B..& │ │ │ -00002720: 2aab 8bcb dadb 0e26 dc23 2188 aaa9 cbdd *......&.#!..... │ │ │ -00002730: 2188 cbde 2188 df60 e05a 60e1 0e47 2488 !...!..`.Z`..G$. │ │ │ -00002740: cbe2 e3e4 0d21 5c22 2188 cbe5 2188 df60 .....!\"!...!..` │ │ │ -00002750: e05a 60e1 0e47 2488 d020 88df 095c 6ee6 .Z`..G$.. ...\n. │ │ │ -00002760: e7e8 0e41 4142 21ab 850e 4140 aa82 0e41 ...AAB!...A@...A │ │ │ -00002770: 2488 0e48 ab88 df09 5c6e e10e 4824 88df $..H....\n..H$.. │ │ │ -00002780: 095c 6ee9 0e46 2488 eaeb d4d1 0d21 ab83 .\n..F$......!.. │ │ │ -00002790: ecaa 89ed 0d21 ab83 eeaa 81ef 0c24 880d .....!.......$.. │ │ │ -000027a0: f04e ab89 eaf1 f2f3 0c24 88aa 87ea f4f2 .N.......$...... │ │ │ -000027b0: f50c 2488 eaf6 f7f8 0c24 88ea f9fa fb0c ..$......$...... │ │ │ -000027c0: 2488 eafc fdfe 0c24 88ea ffe0 814c 00c8 $......$.....L.. │ │ │ -000027d0: 2488 8231 002e 0787 2220 5b70 2070 6f69 $..1...." [p poi │ │ │ -000027e0: 6e74 3120 706f 696e 7432 2069 2064 6f2d nt1 point2 i do- │ │ │ -000027f0: 6b65 7973 2073 796d 626f 6c20 7275 6e2d keys symbol run- │ │ │ -00002800: 686f 6f6b 7320 6170 726f 706f 732d 6d6f hooks apropos-mo │ │ │ -00002810: 6465 2d68 6f6f 6b20 6e69 6c20 7573 652d de-hook nil use- │ │ │ -00002820: 6c6f 6361 6c2d 6d61 7020 6465 7669 6365 local-map device │ │ │ -00002830: 2d6f 6e2d 7769 6e64 6f77 2d73 7973 7465 -on-window-syste │ │ │ -00002840: 6d2d 7020 7072 696e 6320 2249 6620 796f m-p princ "If yo │ │ │ -00002850: 7520 6d6f 7665 2074 6865 206d 6f75 7365 u move the mouse │ │ │ -00002860: 206f 7665 7220 7465 7874 2074 6861 7420 over text that │ │ │ -00002870: 6368 616e 6765 7320 636f 6c6f 722c 5c6e changes color,\n │ │ │ -00002880: 2220 7375 6273 7469 7475 7465 2d63 6f6d " substitute-com │ │ │ -00002890: 6d61 6e64 2d6b 6579 7320 2279 6f75 2063 mand-keys "you c │ │ │ -000028a0: 616e 2063 6c69 636b 205c 5c5b 6170 726f an click \\[apro │ │ │ -000028b0: 706f 732d 6d6f 7573 652d 666f 6c6c 6f77 pos-mouse-follow │ │ │ -000028c0: 5d20 746f 2067 6574 206d 6f72 6520 696e ] to get more in │ │ │ -000028d0: 666f 726d 6174 696f 6e2e 5c6e 2220 2254 formation.\n" "T │ │ │ -000028e0: 7970 6520 5c5c 5b61 7072 6f70 6f73 2d66 ype \\[apropos-f │ │ │ -000028f0: 6f6c 6c6f 775d 2069 6e20 7468 6973 2062 ollow] in this b │ │ │ -00002900: 7566 6665 7220 746f 2067 6574 2066 756c uffer to get ful │ │ │ -00002910: 6c20 646f 6375 6d65 6e74 6174 696f 6e2e l documentation. │ │ │ -00002920: 5c6e 5c6e 2220 7465 7270 7269 2063 6f6d \n\n" terpri com │ │ │ -00002930: 6d61 6e64 7020 696e 6465 6e74 2d74 6f20 mandp indent-to │ │ │ -00002940: 3330 2031 2077 6865 7265 2d69 732d 696e 30 1 where-is-in │ │ │ -00002950: 7465 726e 616c 2030 2066 7261 6d65 7020 ternal 0 framep │ │ │ -00002960: 6275 6666 6572 7020 7420 6d61 7063 6f6e bufferp t mapcon │ │ │ -00002970: 6361 7420 235b 286b 6579 2920 22c2 0921 cat #[(key) "..! │ │ │ -00002980: 1108 ab89 c3c4 0947 c508 0925 8809 8722 .......G...%..." │ │ │ -00002990: 205b 6170 726f 706f 732d 6b65 7962 696e [apropos-keybin │ │ │ -000029a0: 6469 6e67 2d66 6163 6520 6b65 7920 6b65 ding-face key ke │ │ │ -000029b0: 792d 6465 7363 7269 7074 696f 6e20 7075 y-description pu │ │ │ -000029c0: 742d 7465 7874 2d70 726f 7065 7274 7920 t-text-property │ │ │ -000029d0: 3020 6661 6365 5d20 365d 2022 2c20 2220 0 face] 6] ", " │ │ │ -000029e0: 2254 7970 6520 2220 224d 2d78 2220 7075 "Type " "M-x" pu │ │ │ -000029f0: 742d 7465 7874 2d70 726f 7065 7274 7920 t-text-property │ │ │ -00002a00: 3320 6661 6365 2066 6f72 6d61 7420 2220 3 face format " │ │ │ -00002a10: 2573 2022 2073 796d 626f 6c2d 6e61 6d65 %s " symbol-name │ │ │ -00002a20: 2022 5245 5422 2069 7465 6d20 6576 616c "RET" item eval │ │ │ -00002a30: 206f 7220 6b65 796d 6170 2061 7072 6f70 or keymap aprop │ │ │ -00002a40: 6f73 2d70 7269 6e74 2d64 6f63 2064 6573 os-print-doc des │ │ │ -00002a50: 6372 6962 652d 6675 6e63 7469 6f6e 2022 cribe-function " │ │ │ -00002a60: 436f 6d6d 616e 6422 2061 7072 6f70 6f73 Command" apropos │ │ │ -00002a70: 2d6d 6163 726f 7020 224d 6163 726f 2220 -macrop "Macro" │ │ │ -00002a80: 2246 756e 6374 696f 6e22 2063 7573 746f "Function" custo │ │ │ -00002a90: 6d2d 7479 7065 2063 7573 746f 6d69 7a65 m-type customize │ │ │ -00002aa0: 2d76 6172 6961 626c 652d 6f74 6865 722d -variable-other- │ │ │ -00002ab0: 7769 6e64 6f77 2032 2022 5573 6572 204f window 2 "User O │ │ │ -00002ac0: 7074 696f 6e22 2064 6573 6372 6962 652d ption" describe- │ │ │ -00002ad0: 7661 7269 6162 6c65 2022 5661 7269 6162 variable "Variab │ │ │ -00002ae0: 6c65 2220 6375 7374 6f6d 697a 652d 6f74 le" customize-ot │ │ │ -00002af0: 6865 722d 7769 6e64 6f77 2036 2022 4772 her-window 6 "Gr │ │ │ -00002b00: 6f75 7022 2063 7573 746f 6d69 7a65 2d66 oup" customize-f │ │ │ -00002b10: 6163 652d 6f74 6865 722d 7769 6e64 6f77 ace-other-window │ │ │ -00002b20: 2035 2022 4661 6365 2220 7769 6467 6574 5 "Face" widget │ │ │ -00002b30: 2d62 726f 7773 652d 6f74 6865 722d 7769 -browse-other-wi │ │ │ -00002b40: 6e64 6f77 2034 2022 5769 6467 6574 2220 ndow 4 "Widget" │ │ │ -00002b50: 6170 726f 706f 732d 6465 7363 7269 6265 apropos-describe │ │ │ -00002b60: 2d70 6c69 7374 206b 6579 2061 7072 6f70 -plist key aprop │ │ │ -00002b70: 6f73 2d69 7465 6d20 6669 6c74 6572 6564 os-item filtered │ │ │ -00002b80: 206b 6579 7320 6c6f 7365 7220 6f6c 642d keys loser old- │ │ │ -00002b90: 6275 6666 6572 2061 7072 6f70 6f73 2d6d buffer apropos-m │ │ │ -00002ba0: 6f64 652d 6d61 7020 6170 726f 706f 732d ode-map apropos- │ │ │ -00002bb0: 6b65 7962 696e 6469 6e67 2d66 6163 6520 keybinding-face │ │ │ -00002bc0: 6170 726f 706f 732d 7379 6d62 6f6c 2d66 apropos-symbol-f │ │ │ -00002bd0: 6163 6520 7374 616e 6461 7264 2d6f 7574 ace standard-out │ │ │ -00002be0: 7075 7420 6170 726f 706f 732d 6163 6375 put apropos-accu │ │ │ -00002bf0: 6d75 6c61 746f 7220 7370 6163 696e 6720 mulator spacing │ │ │ -00002c00: 2250 6c69 7374 225d 2038 5d20 6e69 6c5d "Plist"] 8] nil] │ │ │ -00002c10: 2033 2028 2324 202e 2039 3139 3729 5d29 3 (#$ . 9197)]) │ │ │ -00002c20: 0a23 4033 3720 5265 7475 726e 2074 2069 .#@37 Return t i │ │ │ -00002c30: 6620 5359 4d42 4f4c 2069 7320 6120 4c69 f SYMBOL is a Li │ │ │ -00002c40: 7370 206d 6163 726f 2e1f 0a28 6465 6661 sp macro...(defa │ │ │ -00002c50: 6c69 6173 2027 6170 726f 706f 732d 6d61 lias 'apropos-ma │ │ │ -00002c60: 6372 6f70 2023 5b28 7379 6d62 6f6c 2920 crop #[(symbol) │ │ │ -00002c70: 22c1 0821 ad98 084b 8910 3aad 9108 40c2 "..!...K..:...@. │ │ │ -00002c80: 61ae 8b08 40c3 61ad 85c4 0838 c573 8722 a...@.a....8.s." │ │ │ -00002c90: 205b 7379 6d62 6f6c 2066 626f 756e 6470 [symbol fboundp │ │ │ -00002ca0: 206d 6163 726f 2061 7574 6f6c 6f61 6420 macro autoload │ │ │ -00002cb0: 3420 286d 6163 726f 2074 295d 2032 2028 4 (macro t)] 2 ( │ │ │ -00002cc0: 2324 202e 2031 3133 3032 295d 290a 2864 #$ . 11302)]).(d │ │ │ -00002cd0: 6566 616c 6961 7320 2761 7072 6f70 6f73 efalias 'apropos │ │ │ -00002ce0: 2d70 7269 6e74 2d64 6f63 2023 5b28 6163 -print-doc #[(ac │ │ │ -00002cf0: 7469 6f6e 2069 2073 7472 2064 6f2d 6b65 tion i str do-ke │ │ │ -00002d00: 7973 2920 2272 5c6e 7188 0d09 3889 153b ys) "r\nq...8..; │ │ │ -00002d10: adc1 c663 88c7 60c8 5a60 53c0 0824 880c ...c..`.Z`S..$.. │ │ │ -00002d20: c9b1 0288 0bab 8cca 600c 475a c85a 6053 ........`.GZ.Z`S │ │ │ -00002d30: 0b23 88ca 600c 475a c85a 6053 cb0e 0e44 .#..`.GZ.Z`S...D │ │ │ -00002d40: 2388 0e0f ab85 cc0d 21aa 810d 6388 6eae #.......!...c.n. │ │ │ -00002d50: 82cd 2029 8722 205b 6163 7469 6f6e 2061 .. )." [action a │ │ │ -00002d60: 7072 6f70 6f73 2d69 7465 6d20 7374 616e propos-item stan │ │ │ -00002d70: 6461 7264 2d6f 7574 7075 7420 6170 726f dard-output apro │ │ │ -00002d80: 706f 732d 6c61 6265 6c2d 6661 6365 2073 pos-label-face s │ │ │ -00002d90: 7472 2069 2022 2020 2220 7075 742d 7465 tr i " " put-te │ │ │ -00002da0: 7874 2d70 726f 7065 7274 7920 3220 223a xt-property 2 ": │ │ │ -00002db0: 2022 2061 6464 2d74 6578 742d 7072 6f70 " add-text-prop │ │ │ -00002dc0: 6572 7469 6573 206b 6579 6d61 7020 7375 erties keymap su │ │ │ -00002dd0: 6273 7469 7475 7465 2d63 6f6d 6d61 6e64 bstitute-command │ │ │ -00002de0: 2d6b 6579 7320 7465 7270 7269 2061 7072 -keys terpri apr │ │ │ -00002df0: 6f70 6f73 2d6d 6f64 652d 6d61 7020 646f opos-mode-map do │ │ │ -00002e00: 2d6b 6579 735d 2035 5d29 0a28 6465 6661 -keys] 5]).(defa │ │ │ -00002e10: 6c69 6173 2027 6170 726f 706f 732d 6d6f lias 'apropos-mo │ │ │ -00002e20: 7573 652d 666f 6c6c 6f77 2023 5b28 6576 use-follow #[(ev │ │ │ -00002e30: 656e 7429 2022 8ac1 0821 7188 c208 2162 ent) "...!q...!b │ │ │ -00002e40: 88c3 2029 8722 205b 6576 656e 7420 6576 .. )." [event ev │ │ │ -00002e50: 656e 742d 6275 6666 6572 2065 7665 6e74 ent-buffer event │ │ │ -00002e60: 2d63 6c6f 7365 7374 2d70 6f69 6e74 2061 -closest-point a │ │ │ -00002e70: 7072 6f70 6f73 2d66 6f6c 6c6f 775d 2032 propos-follow] 2 │ │ │ -00002e80: 206e 696c 2022 6522 5d29 0a28 6465 6661 nil "e"]).(defa │ │ │ -00002e90: 6c69 6173 2027 6170 726f 706f 732d 666f lias 'apropos-fo │ │ │ -00002ea0: 6c6c 6f77 2023 5b28 266f 7074 696f 6e61 llow #[(&optiona │ │ │ -00002eb0: 6c20 6f74 6865 7229 2022 8ac6 7988 6029 l other) "..y.`) │ │ │ -00002ec0: 1cc7 0cc5 5c22 891d 3fad 84c8 0cc5 5c22 ....\"..?.....\" │ │ │ -00002ed0: 1ac7 0cc3 5c22 891b 3fad 84c9 0cc3 5c22 ....\"..?.....\" │ │ │ -00002ee0: 190d ac89 5c6e ab86 c75c 6e53 c55c 2215 ....\n...\nS.\". │ │ │ -00002ef0: 0bac 8809 ab85 c709 c35c 2213 0dab 830b .........\"..... │ │ │ -00002f00: ac84 cacb 2188 0d3a ab86 cacc 0d40 5c22 ....!..:.....@\" │ │ │ -00002f10: 8808 ab83 0871 880b 0d21 2d87 2220 5b6f .....q...!-." [o │ │ │ -00002f20: 7468 6572 2061 6374 696f 6e2d 6174 2069 ther action-at i │ │ │ -00002f30: 7465 6d2d 6174 2061 6374 696f 6e20 626f tem-at action bo │ │ │ -00002f40: 6c20 6974 656d 2030 2067 6574 2d74 6578 l item 0 get-tex │ │ │ -00002f50: 742d 7072 6f70 6572 7479 2070 7265 7669 t-property previ │ │ │ -00002f60: 6f75 732d 7369 6e67 6c65 2d70 726f 7065 ous-single-prope │ │ │ -00002f70: 7274 792d 6368 616e 6765 206e 6578 742d rty-change next- │ │ │ -00002f80: 7369 6e67 6c65 2d70 726f 7065 7274 792d single-property- │ │ │ -00002f90: 6368 616e 6765 2065 7272 6f72 2022 5468 change error "Th │ │ │ -00002fa0: 6572 6520 6973 206e 6f74 6869 6e67 2074 ere is nothing t │ │ │ -00002fb0: 6f20 666f 6c6c 6f77 2068 6572 6522 2022 o follow here" " │ │ │ -00002fc0: 5468 6572 6520 6973 206e 6f74 6869 6e67 There is nothing │ │ │ -00002fd0: 2074 6f20 666f 6c6c 6f77 2069 6e20 6025 to follow in `% │ │ │ -00002fe0: 7327 225d 2034 206e 696c 206e 696c 5d29 s'"] 4 nil nil]) │ │ │ -00002ff0: 0a23 4034 3520 4469 7370 6c61 7920 6120 .#@45 Display a │ │ │ -00003000: 7072 6574 7479 206c 6973 7469 6e67 206f pretty listing o │ │ │ -00003010: 6620 5359 4d42 4f4c 2773 2070 6c69 7374 f SYMBOL's plist │ │ │ -00003020: 2e1f 0a28 6465 6661 6c69 6173 2027 6170 ...(defalias 'ap │ │ │ -00003030: 726f 706f 732d 6465 7363 7269 6265 2d70 ropos-describe-p │ │ │ -00003040: 6c69 7374 2023 5b28 7379 6d62 6f6c 2920 list #[(symbol) │ │ │ -00003050: 22c2 19c3 c4c5 0821 5c22 2987 2220 5b73 "......!\")." [s │ │ │ -00003060: 796d 626f 6c20 6865 6c70 2d62 7566 6665 ymbol help-buffe │ │ │ -00003070: 722d 7072 6566 6978 2d73 7472 696e 6720 r-prefix-string │ │ │ -00003080: 2241 7072 6f70 6f73 2d70 6c69 7374 2220 "Apropos-plist" │ │ │ -00003090: 7769 7468 2d64 6973 706c 6179 696e 672d with-displaying- │ │ │ -000030a0: 6865 6c70 2d62 7566 6665 7220 235b 6e69 help-buffer #[ni │ │ │ -000030b0: 6c20 22c3 c421 88c5 c621 88c7 5c6e 2188 l "..!...!..\n!. │ │ │ -000030c0: c5c8 2188 7208 7188 09ab 89c9 ca60 cb5a ..!.r.q......`.Z │ │ │ -000030d0: cc09 2488 29c5 cd5c 6ece 5c22 2188 c5cf ..$.)..\n.\"!... │ │ │ -000030e0: 2188 d020 88d1 2087 2220 5b73 7461 6e64 !.. .. ." [stand │ │ │ -000030f0: 6172 642d 6f75 7470 7574 2061 7072 6f70 ard-output aprop │ │ │ -00003100: 6f73 2d73 796d 626f 6c2d 6661 6365 2073 os-symbol-face s │ │ │ -00003110: 796d 626f 6c20 7275 6e2d 686f 6f6b 7320 ymbol run-hooks │ │ │ -00003120: 6170 726f 706f 732d 6d6f 6465 2d68 6f6f apropos-mode-hoo │ │ │ -00003130: 6b20 7072 696e 6320 2253 796d 626f 6c20 k princ "Symbol │ │ │ -00003140: 2220 7072 696e 3120 2227 7320 706c 6973 " prin1 "'s plis │ │ │ -00003150: 7420 6973 5c6e 2028 2220 7075 742d 7465 t is\n (" put-te │ │ │ -00003160: 7874 2d70 726f 7065 7274 7920 3820 3134 xt-property 8 14 │ │ │ -00003170: 2066 6163 6520 6170 726f 706f 732d 666f face apropos-fo │ │ │ -00003180: 726d 6174 2d70 6c69 7374 2022 5c6e 2020 rmat-plist "\n │ │ │ -00003190: 2220 2229 2220 7465 7270 7269 2070 7269 " ")" terpri pri │ │ │ -000031a0: 6e74 2d68 656c 702d 7265 7475 726e 2d6d nt-help-return-m │ │ │ -000031b0: 6573 7361 6765 5d20 355d 2073 796d 626f essage] 5] symbo │ │ │ -000031c0: 6c2d 6e61 6d65 5d20 3420 2823 2420 2e20 l-name] 4 (#$ . │ │ │ -000031d0: 3132 3237 3829 5d29 0a28 7072 6f76 6964 12278)]).(provid │ │ │ -000031e0: 6520 2761 7072 6f70 6f73 290a e 'apropos). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3439 2032 3032 310a 3b3b 3b20 :08:49 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f61 7072 6f70 6f73 2e65 4/lisp/apropos.e │ │ │ +00000090: 6c0a 3b3b 3b20 656d 6163 7320 7665 7273 l.;;; emacs vers │ │ │ +000000a0: 696f 6e20 3231 2e34 2028 7061 7463 6820 ion 21.4 (patch │ │ │ +000000b0: 3234 2920 2253 7461 6e64 6172 6420 4322 24) "Standard C" │ │ │ +000000c0: 2058 456d 6163 7320 4c75 6369 642e 0a3b XEmacs Lucid..; │ │ │ +000000d0: 3b3b 2062 7974 6563 6f6d 7020 7665 7273 ;; bytecomp vers │ │ │ +000000e0: 696f 6e20 322e 3237 2058 456d 6163 733b ion 2.27 XEmacs; │ │ │ +000000f0: 2032 3030 302d 3039 2d31 322e 0a3b 3b3b 2000-09-12..;;; │ │ │ +00000100: 206f 7074 696d 697a 6174 696f 6e20 6973 optimization is │ │ │ +00000110: 206f 6e2e 0a3b 3b3b 2074 6869 7320 6669 on..;;; this fi │ │ │ +00000120: 6c65 2075 7365 7320 6f70 636f 6465 7320 le uses opcodes │ │ │ +00000130: 7768 6963 6820 646f 206e 6f74 2065 7869 which do not exi │ │ │ +00000140: 7374 2069 6e20 456d 6163 7320 3139 2e0a st in Emacs 19.. │ │ │ +00000150: 0a28 6966 2028 616e 6420 2862 6f75 6e64 .(if (and (bound │ │ │ +00000160: 7020 2765 6d61 6373 2d76 6572 7369 6f6e p 'emacs-version │ │ │ +00000170: 290a 0920 286f 7220 2861 6e64 2028 626f ).. (or (and (bo │ │ │ +00000180: 756e 6470 2027 6570 6f63 683a 3a76 6572 undp 'epoch::ver │ │ │ +00000190: 7369 6f6e 2920 6570 6f63 683a 3a76 6572 sion) epoch::ver │ │ │ +000001a0: 7369 6f6e 290a 0920 2020 2020 2873 7472 sion).. (str │ │ │ +000001b0: 696e 672d 6c65 7373 7020 656d 6163 732d ing-lessp emacs- │ │ │ +000001c0: 7665 7273 696f 6e20 2232 3022 2929 290a version "20"))). │ │ │ +000001d0: 2020 2020 2865 7272 6f72 2022 6061 7072 (error "`apr │ │ │ +000001e0: 6f70 6f73 2e65 6c27 2077 6173 2063 6f6d opos.el' was com │ │ │ +000001f0: 7069 6c65 6420 666f 7220 456d 6163 7320 piled for Emacs │ │ │ +00000200: 3230 2229 290a 0a28 6f72 2028 626f 756e 20"))..(or (boun │ │ │ +00000210: 6470 2027 6375 7272 656e 742d 6c6f 6164 dp 'current-load │ │ │ +00000220: 2d6c 6973 7429 2028 7365 7471 2063 7572 -list) (setq cur │ │ │ +00000230: 7265 6e74 2d6c 6f61 642d 6c69 7374 206e rent-load-list n │ │ │ +00000240: 696c 2929 0a0a 0a23 4031 3233 202a 5768 il))...#@123 *Wh │ │ │ +00000250: 6574 6865 7220 7468 6520 6170 726f 706f ether the apropo │ │ │ +00000260: 7320 636f 6d6d 616e 6473 2073 686f 756c s commands shoul │ │ │ +00000270: 6420 646f 206d 6f72 652e 0a53 6c6f 7773 d do more..Slows │ │ │ +00000280: 2074 6865 6d20 646f 776e 206d 6f72 6520 them down more │ │ │ +00000290: 6f72 206c 6573 732e 2020 5365 7420 7468 or less. Set th │ │ │ +000002a0: 6973 206e 6f6e 2d6e 696c 2069 6620 796f is non-nil if yo │ │ │ +000002b0: 7520 6861 7665 2061 2066 6173 7420 6d61 u have a fast ma │ │ │ +000002c0: 6368 696e 652e 1f0a 2864 6566 7661 7220 chine...(defvar │ │ │ +000002d0: 6170 726f 706f 732d 646f 2d61 6c6c 206e apropos-do-all n │ │ │ +000002e0: 696c 2028 2324 202e 202d 3538 3929 290a il (#$ . -589)). │ │ │ +000002f0: 2340 3131 3120 2a46 6163 6520 666f 7220 #@111 *Face for │ │ │ +00000300: 7379 6d62 6f6c 206e 616d 6520 696e 2061 symbol name in a │ │ │ +00000310: 7072 6f70 6f73 206f 7574 7075 7420 6f72 propos output or │ │ │ +00000320: 2060 6e69 6c27 2e0a 5468 6973 206c 6f6f `nil'..This loo │ │ │ +00000330: 6b73 2067 6f6f 642c 2062 7574 2073 6c6f ks good, but slo │ │ │ +00000340: 7773 2064 6f77 6e20 7468 6520 636f 6d6d ws down the comm │ │ │ +00000350: 616e 6473 2073 6576 6572 616c 2074 696d ands several tim │ │ │ +00000360: 6573 2e1f 0a28 6465 6676 6172 2061 7072 es...(defvar apr │ │ │ +00000370: 6f70 6f73 2d73 796d 626f 6c2d 6661 6365 opos-symbol-face │ │ │ +00000380: 2028 6279 7465 2d63 6f64 6520 22c1 c021 (byte-code "..! │ │ │ +00000390: ab82 0887 c287 2220 5b66 6f6e 742d 6c6f ......" [font-lo │ │ │ +000003a0: 636b 2d6b 6579 776f 7264 2d66 6163 6520 ck-keyword-face │ │ │ +000003b0: 626f 756e 6470 2062 6f6c 645d 2032 2920 boundp bold] 2) │ │ │ +000003c0: 2823 2420 2e20 2d37 3538 2929 0a23 4031 (#$ . -758)).#@1 │ │ │ +000003d0: 3138 202a 4661 6365 2066 6f72 206b 6579 18 *Face for key │ │ │ +000003e0: 6269 6e64 696e 6720 6469 7370 6c61 7920 binding display │ │ │ +000003f0: 696e 2061 7072 6f70 6f73 206f 7574 7075 in apropos outpu │ │ │ +00000400: 7420 6f72 2060 6e69 6c27 2e0a 5468 6973 t or `nil'..This │ │ │ +00000410: 206c 6f6f 6b73 2067 6f6f 642c 2062 7574 looks good, but │ │ │ +00000420: 2073 6c6f 7773 2064 6f77 6e20 7468 6520 slows down the │ │ │ +00000430: 636f 6d6d 616e 6473 2073 6576 6572 616c commands several │ │ │ +00000440: 2074 696d 6573 2e1f 0a28 6465 6676 6172 times...(defvar │ │ │ +00000450: 2061 7072 6f70 6f73 2d6b 6579 6269 6e64 apropos-keybind │ │ │ +00000460: 696e 672d 6661 6365 2028 6279 7465 2d63 ing-face (byte-c │ │ │ +00000470: 6f64 6520 22c1 c021 ab82 0887 c287 2220 ode "..!......" │ │ │ +00000480: 5b66 6f6e 742d 6c6f 636b 2d73 7472 696e [font-lock-strin │ │ │ +00000490: 672d 6661 6365 2062 6f75 6e64 7020 756e g-face boundp un │ │ │ +000004a0: 6465 726c 696e 655d 2032 2920 2823 2420 derline] 2) (#$ │ │ │ +000004b0: 2e20 2d39 3739 2929 0a23 4032 3832 202a . -979)).#@282 * │ │ │ +000004c0: 4661 6365 2066 6f72 206c 6162 656c 2028 Face for label ( │ │ │ +000004d0: 436f 6d6d 616e 642c 2056 6172 6961 626c Command, Variabl │ │ │ +000004e0: 6520 2e2e 2e29 2069 6e20 6170 726f 706f e ...) in apropo │ │ │ +000004f0: 7320 6f75 7470 7574 206f 7220 606e 696c s output or `nil │ │ │ +00000500: 272e 0a49 6620 7468 6973 2069 7320 606e '..If this is `n │ │ │ +00000510: 696c 2720 6e6f 206d 6f75 7365 2068 6967 il' no mouse hig │ │ │ +00000520: 686c 6967 6874 696e 6720 6f63 6375 7273 hlighting occurs │ │ │ +00000530: 2e0a 5468 6973 206c 6f6f 6b73 2067 6f6f ..This looks goo │ │ │ +00000540: 642c 2062 7574 2073 6c6f 7773 2064 6f77 d, but slows dow │ │ │ +00000550: 6e20 7468 6520 636f 6d6d 616e 6473 2073 n the commands s │ │ │ +00000560: 6576 6572 616c 2074 696d 6573 2e0a 5768 everal times..Wh │ │ │ +00000570: 656e 2074 6869 7320 6973 2061 2066 6163 en this is a fac │ │ │ +00000580: 6520 6e61 6d65 2c20 6173 2069 7420 6973 e name, as it is │ │ │ +00000590: 2069 6e69 7469 616c 6c79 2c20 6974 2067 initially, it g │ │ │ +000005a0: 6574 7320 7472 616e 7366 6f72 6d65 6420 ets transformed │ │ │ +000005b0: 746f 2061 0a74 6578 742d 7072 6f70 6572 to a.text-proper │ │ │ +000005c0: 7479 206c 6973 7420 666f 7220 6566 6669 ty list for effi │ │ │ +000005d0: 6369 656e 6379 2e1f 0a28 6465 6676 6172 ciency...(defvar │ │ │ +000005e0: 2061 7072 6f70 6f73 2d6c 6162 656c 2d66 apropos-label-f │ │ │ +000005f0: 6163 6520 2862 7974 652d 636f 6465 2022 ace (byte-code " │ │ │ +00000600: c1c0 21ab 8208 87c2 8722 205b 666f 6e74 ..!......" [font │ │ │ +00000610: 2d6c 6f63 6b2d 636f 6d6d 656e 742d 6661 -lock-comment-fa │ │ │ +00000620: 6365 2062 6f75 6e64 7020 6974 616c 6963 ce boundp italic │ │ │ +00000630: 5d20 3229 2028 2324 202e 202d 3132 3135 ] 2) (#$ . -1215 │ │ │ +00000640: 2929 0a23 4031 3133 202a 4661 6365 2066 )).#@113 *Face f │ │ │ +00000650: 6f72 2070 726f 7065 7274 7920 6e61 6d65 or property name │ │ │ +00000660: 2069 6e20 6170 726f 706f 7320 6f75 7470 in apropos outp │ │ │ +00000670: 7574 206f 7220 606e 696c 272e 0a54 6869 ut or `nil'..Thi │ │ │ +00000680: 7320 6c6f 6f6b 7320 676f 6f64 2c20 6275 s looks good, bu │ │ │ +00000690: 7420 736c 6f77 7320 646f 776e 2074 6865 t slows down the │ │ │ +000006a0: 2063 6f6d 6d61 6e64 7320 7365 7665 7261 commands severa │ │ │ +000006b0: 6c20 7469 6d65 732e 1f0a 2864 6566 7661 l times...(defva │ │ │ +000006c0: 7220 6170 726f 706f 732d 7072 6f70 6572 r apropos-proper │ │ │ +000006d0: 7479 2d66 6163 6520 2862 7974 652d 636f ty-face (byte-co │ │ │ +000006e0: 6465 2022 c1c0 21ab 8208 87c2 8722 205b de "..!......" [ │ │ │ +000006f0: 666f 6e74 2d6c 6f63 6b2d 7661 7269 6162 font-lock-variab │ │ │ +00000700: 6c65 2d6e 616d 652d 6661 6365 2062 6f75 le-name-face bou │ │ │ +00000710: 6e64 7020 626f 6c64 2d69 7461 6c69 635d ndp bold-italic] │ │ │ +00000720: 2032 2920 2823 2420 2e20 2d31 3630 3929 2) (#$ . -1609) │ │ │ +00000730: 290a 2340 3133 3320 2a46 6163 6520 666f ).#@133 *Face fo │ │ │ +00000740: 7220 6d61 7463 6869 6e67 2070 6172 7420 r matching part │ │ │ +00000750: 696e 2061 7072 6f70 6f73 2d64 6f63 756d in apropos-docum │ │ │ +00000760: 656e 7461 7469 6f6e 2f76 616c 7565 206f entation/value o │ │ │ +00000770: 7574 7075 7420 6f72 2060 6e69 6c27 2e0a utput or `nil'.. │ │ │ +00000780: 5468 6973 206c 6f6f 6b73 2067 6f6f 642c This looks good, │ │ │ +00000790: 2062 7574 2073 6c6f 7773 2064 6f77 6e20 but slows down │ │ │ +000007a0: 7468 6520 636f 6d6d 616e 6473 2073 6576 the commands sev │ │ │ +000007b0: 6572 616c 2074 696d 6573 2e1f 0a28 6465 eral times...(de │ │ │ +000007c0: 6676 6172 2061 7072 6f70 6f73 2d6d 6174 fvar apropos-mat │ │ │ +000007d0: 6368 2d66 6163 6520 2773 6563 6f6e 6461 ch-face 'seconda │ │ │ +000007e0: 7279 2d73 656c 6563 7469 6f6e 2028 2324 ry-selection (#$ │ │ │ +000007f0: 202e 202d 3138 3438 2929 0a23 4033 3020 . -1848)).#@30 │ │ │ +00000800: 4b65 796d 6170 2075 7365 6420 696e 2041 Keymap used in A │ │ │ +00000810: 7072 6f70 6f73 206d 6f64 652e 1f0a 2864 propos mode...(d │ │ │ +00000820: 6566 7661 7220 6170 726f 706f 732d 6d6f efvar apropos-mo │ │ │ +00000830: 6465 2d6d 6170 2028 6279 7465 2d63 6f64 de-map (byte-cod │ │ │ +00000840: 6520 22c1 2018 c208 c3c4 2388 c208 c5c4 e ". .....#..... │ │ │ +00000850: 2388 c208 c6c7 2388 c208 c8c9 2388 0829 #.....#.....#..) │ │ │ +00000860: 8722 205b 6d61 7020 6d61 6b65 2d73 7061 ." [map make-spa │ │ │ +00000870: 7273 652d 6b65 796d 6170 2064 6566 696e rse-keymap defin │ │ │ +00000880: 652d 6b65 7920 5b28 636f 6e74 726f 6c20 e-key [(control │ │ │ +00000890: 6d29 5d20 6170 726f 706f 732d 666f 6c6c m)] apropos-foll │ │ │ +000008a0: 6f77 205b 7265 7475 726e 5d20 5b28 6275 ow [return] [(bu │ │ │ +000008b0: 7474 6f6e 3275 7029 5d20 6170 726f 706f tton2up)] apropo │ │ │ +000008c0: 732d 6d6f 7573 652d 666f 6c6c 6f77 205b s-mouse-follow [ │ │ │ +000008d0: 2862 7574 746f 6e32 295d 2075 6e64 6566 (button2)] undef │ │ │ +000008e0: 696e 6564 5d20 3429 2028 2324 202e 2032 ined] 4) (#$ . 2 │ │ │ +000008f0: 3034 3829 290a 2340 3337 2052 6567 6578 048)).#@37 Regex │ │ │ +00000900: 7020 7573 6564 2069 6e20 6375 7272 656e p used in curren │ │ │ +00000910: 7420 6170 726f 706f 7320 7275 6e2e 1f0a t apropos run... │ │ │ +00000920: 2864 6566 7661 7220 6170 726f 706f 732d (defvar apropos- │ │ │ +00000930: 7265 6765 7870 206e 696c 2028 2324 202e regexp nil (#$ . │ │ │ +00000940: 2032 3239 3929 290a 2340 3738 204c 6973 2299)).#@78 Lis │ │ │ +00000950: 7420 6f66 2065 6c63 2066 696c 6573 2061 t of elc files a │ │ │ +00000960: 6c72 6561 6479 2073 6361 6e6e 6564 2069 lready scanned i │ │ │ +00000970: 6e20 6375 7272 656e 7420 7275 6e20 6f66 n current run of │ │ │ +00000980: 2060 6170 726f 706f 732d 646f 6375 6d65 `apropos-docume │ │ │ +00000990: 6e74 6174 696f 6e27 2e1f 0a28 6465 6676 ntation'...(defv │ │ │ +000009a0: 6172 2061 7072 6f70 6f73 2d66 696c 6573 ar apropos-files │ │ │ +000009b0: 2d73 6361 6e6e 6564 206e 696c 2028 2324 -scanned nil (#$ │ │ │ +000009c0: 202e 2032 3338 3129 290a 2340 3536 2041 . 2381)).#@56 A │ │ │ +000009d0: 6c69 7374 206f 6620 7379 6d62 6f6c 7320 list of symbols │ │ │ +000009e0: 616c 7265 6164 7920 666f 756e 6420 696e already found in │ │ │ +000009f0: 2063 7572 7265 6e74 2061 7072 6f70 6f73 current apropos │ │ │ +00000a00: 2072 756e 2e1f 0a28 6465 6676 6172 2061 run...(defvar a │ │ │ +00000a10: 7072 6f70 6f73 2d61 6363 756d 756c 6174 propos-accumulat │ │ │ +00000a20: 6f72 206e 696c 2028 2324 202e 2032 3531 or nil (#$ . 251 │ │ │ +00000a30: 3129 290a 2340 3435 2043 7572 7265 6e74 1)).#@45 Current │ │ │ +00000a40: 2069 7465 6d20 696e 206f 7220 666f 7220 item in or for │ │ │ +00000a50: 6170 726f 706f 732d 6163 6375 6d75 6c61 apropos-accumula │ │ │ +00000a60: 746f 722e 1f0a 2864 6566 7661 7220 6170 tor...(defvar ap │ │ │ +00000a70: 726f 706f 732d 6974 656d 206e 696c 2028 ropos-item nil ( │ │ │ +00000a80: 2324 202e 2032 3631 3729 290a 2862 7974 #$ . 2617)).(byt │ │ │ +00000a90: 652d 636f 6465 2022 c108 4210 c2c1 21ac e-code "..B...!. │ │ │ +00000aa0: 85c3 c1c4 5c22 88c4 8722 205b 6375 7272 ....\"..." [curr │ │ │ +00000ab0: 656e 742d 6c6f 6164 2d6c 6973 7420 6170 ent-load-list ap │ │ │ +00000ac0: 726f 706f 732d 6d6f 6465 2d68 6f6f 6b20 ropos-mode-hook │ │ │ +00000ad0: 6465 6661 756c 742d 626f 756e 6470 2073 default-boundp s │ │ │ +00000ae0: 6574 2d64 6566 6175 6c74 206e 696c 5d20 et-default nil] │ │ │ +00000af0: 3329 0a23 4038 3920 4d61 6a6f 7220 6d6f 3).#@89 Major mo │ │ │ +00000b00: 6465 2066 6f72 2066 6f6c 6c6f 7769 6e67 de for following │ │ │ +00000b10: 2068 7970 6572 6c69 6e6b 7320 696e 206f hyperlinks in o │ │ │ +00000b20: 7574 7075 7420 6f66 2061 7072 6f70 6f73 utput of apropos │ │ │ +00000b30: 2063 6f6d 6d61 6e64 732e 0a0a 5c7b 6170 commands...\{ap │ │ │ +00000b40: 726f 706f 732d 6d6f 6465 2d6d 6170 7d1f ropos-mode-map}. │ │ │ +00000b50: 0a28 6465 6661 6c69 6173 2027 6170 726f .(defalias 'apro │ │ │ +00000b60: 706f 732d 6d6f 6465 2023 5b6e 696c 2022 pos-mode #[nil " │ │ │ +00000b70: c320 88c4 5c6e 2188 c511 c610 c7c8 2187 . ..\n!.......!. │ │ │ +00000b80: 2220 5b6d 6f64 652d 6e61 6d65 206d 616a " [mode-name maj │ │ │ +00000b90: 6f72 2d6d 6f64 6520 6170 726f 706f 732d or-mode apropos- │ │ │ +00000ba0: 6d6f 6465 2d6d 6170 206b 696c 6c2d 616c mode-map kill-al │ │ │ +00000bb0: 6c2d 6c6f 6361 6c2d 7661 7269 6162 6c65 l-local-variable │ │ │ +00000bc0: 7320 7573 652d 6c6f 6361 6c2d 6d61 7020 s use-local-map │ │ │ +00000bd0: 6170 726f 706f 732d 6d6f 6465 2022 4170 apropos-mode "Ap │ │ │ +00000be0: 726f 706f 7322 2072 756e 2d68 6f6f 6b73 ropos" run-hooks │ │ │ +00000bf0: 2061 7072 6f70 6f73 2d6d 6f64 652d 686f apropos-mode-ho │ │ │ +00000c00: 6f6b 5d20 3220 2823 2420 2e20 3238 3038 ok] 2 (#$ . 2808 │ │ │ +00000c10: 2920 6e69 6c5d 290a 2866 7365 7420 2763 ) nil]).(fset 'c │ │ │ +00000c20: 6f6d 6d61 6e64 2d61 7072 6f70 6f73 2027 ommand-apropos ' │ │ │ +00000c30: 6170 726f 706f 732d 636f 6d6d 616e 6429 apropos-command) │ │ │ +00000c40: 0a23 4031 3531 2053 686f 7773 2063 6f6d .#@151 Shows com │ │ │ +00000c50: 6d61 6e64 7320 2869 6e74 6572 6163 7469 mands (interacti │ │ │ +00000c60: 7665 6c79 2063 616c 6c61 626c 6520 6675 vely callable fu │ │ │ +00000c70: 6e63 7469 6f6e 7329 2074 6861 7420 6d61 nctions) that ma │ │ │ +00000c80: 7463 6820 5245 4745 5850 2e0a 5769 7468 tch REGEXP..With │ │ │ +00000c90: 206f 7074 696f 6e61 6c20 7072 6566 6978 optional prefix │ │ │ +00000ca0: 2041 5247 206f 7220 6966 2060 6170 726f ARG or if `apro │ │ │ +00000cb0: 706f 732d 646f 2d61 6c6c 2720 6973 206e pos-do-all' is n │ │ │ +00000cc0: 6f6e 2d6e 696c 2c20 616c 736f 2073 686f on-nil, also sho │ │ │ +00000cd0: 770a 7661 7269 6162 6c65 732e 1f0a 2864 w.variables...(d │ │ │ +00000ce0: 6566 616c 6961 7320 2761 7072 6f70 6f73 efalias 'apropos │ │ │ +00000cf0: 2d63 6f6d 6d61 6e64 2023 5b28 6170 726f -command #[(apro │ │ │ +00000d00: 706f 732d 7265 6765 7870 2026 6f70 7469 pos-regexp &opti │ │ │ +00000d10: 6f6e 616c 2064 6f2d 616c 6c29 2022 0bac onal do-all) ".. │ │ │ +00000d20: 825c 6e13 c409 0bab 83c5 aa81 c65c 2210 .\n..........\". │ │ │ +00000d30: c7c8 c9ca 2387 2220 5b61 7072 6f70 6f73 ....#." [apropos │ │ │ +00000d40: 2d61 6363 756d 756c 6174 6f72 2061 7072 -accumulator apr │ │ │ +00000d50: 6f70 6f73 2d72 6567 6578 7020 6170 726f opos-regexp apro │ │ │ +00000d60: 706f 732d 646f 2d61 6c6c 2064 6f2d 616c pos-do-all do-al │ │ │ +00000d70: 6c20 6170 726f 706f 732d 696e 7465 726e l apropos-intern │ │ │ +00000d80: 616c 2023 5b28 7379 6d62 6f6c 2920 22c1 al #[(symbol) ". │ │ │ +00000d90: 0821 ae83 c208 2187 2220 5b73 796d 626f .!....!." [symbo │ │ │ +00000da0: 6c20 636f 6d6d 616e 6470 2075 7365 722d l commandp user- │ │ │ +00000db0: 7661 7269 6162 6c65 2d70 5d20 325d 2063 variable-p] 2] c │ │ │ +00000dc0: 6f6d 6d61 6e64 7020 6170 726f 706f 732d ommandp apropos- │ │ │ +00000dd0: 7072 696e 7420 7420 235b 2870 2920 22c4 print t #[(p) ". │ │ │ +00000de0: 891b 1a09 adc8 0989 4089 13c5 0b21 ad97 ........@....!.. │ │ │ +00000df0: c60b 21ae 84c4 c7c8 8f89 12ab 895c 6ec9 ..!..........\n. │ │ │ +00000e00: cacb 5c6e 5c22 4faa 81cc 08ad 9acd 0b21 ..\n\"O........! │ │ │ +00000e10: ad95 ce0b 21ae 85cf 0bd0 d123 8912 ad87 ....!......#.... │ │ │ +00000e20: 5c6e c9ca cb5c 6e5c 224f 45a0 8809 4189 \n...\n\"OE...A. │ │ │ +00000e30: 11ac 39c4 2a87 2220 5b64 6f2d 616c 6c20 ..9.*." [do-all │ │ │ +00000e40: 7020 646f 6320 7379 6d62 6f6c 206e 696c p doc symbol nil │ │ │ +00000e50: 2063 6f6d 6d61 6e64 7020 6675 6e63 7469 commandp functi │ │ │ +00000e60: 6f6e 2d6f 6273 6f6c 6574 656e 6573 732d on-obsoleteness- │ │ │ +00000e70: 646f 6320 2864 6f63 756d 656e 7461 7469 doc (documentati │ │ │ +00000e80: 6f6e 2073 796d 626f 6c20 7429 2028 2876 on symbol t) ((v │ │ │ +00000e90: 6f69 642d 6675 6e63 7469 6f6e 2022 2861 oid-function "(a │ │ │ +00000ea0: 6c69 6173 6564 2074 6f20 756e 6465 6669 liased to undefi │ │ │ +00000eb0: 6e65 6420 6675 6e63 7469 6f6e 2922 2920 ned function)") │ │ │ +00000ec0: 2865 7272 6f72 2022 2875 6e65 7870 6563 (error "(unexpec │ │ │ +00000ed0: 7465 6420 6572 726f 7220 6672 6f6d 2060 ted error from ` │ │ │ +00000ee0: 646f 6375 6d65 6e74 696f 6e27 2922 2929 documention')")) │ │ │ +00000ef0: 2030 2073 7472 696e 672d 6d61 7463 6820 0 string-match │ │ │ +00000f00: 225c 6e22 2022 286e 6f74 2064 6f63 756d "\n" "(not docum │ │ │ +00000f10: 656e 7465 6429 2220 7573 6572 2d76 6172 ented)" user-var │ │ │ +00000f20: 6961 626c 652d 7020 7661 7269 6162 6c65 iable-p variable │ │ │ +00000f30: 2d6f 6273 6f6c 6574 656e 6573 732d 646f -obsoleteness-do │ │ │ +00000f40: 6320 646f 6375 6d65 6e74 6174 696f 6e2d c documentation- │ │ │ +00000f50: 7072 6f70 6572 7479 2076 6172 6961 626c property variabl │ │ │ +00000f60: 652d 646f 6375 6d65 6e74 6174 696f 6e20 e-documentation │ │ │ +00000f70: 745d 2039 5d20 6e69 6c5d 2034 2028 2324 t] 9] nil] 4 (#$ │ │ │ +00000f80: 202e 2033 3134 3329 2028 6c69 7374 2028 . 3143) (list ( │ │ │ +00000f90: 7265 6164 2d73 7472 696e 6720 2863 6f6e read-string (con │ │ │ +00000fa0: 6361 7420 2241 7072 6f70 6f73 2063 6f6d cat "Apropos com │ │ │ +00000fb0: 6d61 6e64 2022 2028 6966 2028 6f72 2063 mand " (if (or c │ │ │ +00000fc0: 7572 7265 6e74 2d70 7265 6669 782d 6172 urrent-prefix-ar │ │ │ +00000fd0: 6720 6170 726f 706f 732d 646f 2d61 6c6c g apropos-do-all │ │ │ +00000fe0: 2920 226f 7220 7661 7269 6162 6c65 2022 ) "or variable " │ │ │ +00000ff0: 2920 2228 7265 6765 7870 293a 2022 2929 ) "(regexp): ")) │ │ │ +00001000: 2063 7572 7265 6e74 2d70 7265 6669 782d current-prefix- │ │ │ +00001010: 6172 6729 5d29 0a23 4032 3432 2053 686f arg)]).#@242 Sho │ │ │ +00001020: 7720 616c 6c20 626f 756e 6420 7379 6d62 w all bound symb │ │ │ +00001030: 6f6c 7320 7768 6f73 6520 6e61 6d65 7320 ols whose names │ │ │ +00001040: 6d61 7463 6820 5245 4745 5850 2e0a 5769 match REGEXP..Wi │ │ │ +00001050: 7468 206f 7074 696f 6e61 6c20 7072 6566 th optional pref │ │ │ +00001060: 6978 2041 5247 206f 7220 6966 2060 6170 ix ARG or if `ap │ │ │ +00001070: 726f 706f 732d 646f 2d61 6c6c 2720 6973 ropos-do-all' is │ │ │ +00001080: 206e 6f6e 2d6e 696c 2c20 616c 736f 2073 non-nil, also s │ │ │ +00001090: 686f 7720 756e 626f 756e 640a 7379 6d62 how unbound.symb │ │ │ +000010a0: 6f6c 7320 616e 6420 6b65 7920 6269 6e64 ols and key bind │ │ │ +000010b0: 696e 6773 2c20 7768 6963 6820 6973 2061 ings, which is a │ │ │ +000010c0: 206c 6974 746c 6520 6d6f 7265 2074 696d little more tim │ │ │ +000010d0: 652d 636f 6e73 756d 696e 672e 0a52 6574 e-consuming..Ret │ │ │ +000010e0: 7572 6e73 206c 6973 7420 6f66 2073 796d urns list of sym │ │ │ +000010f0: 626f 6c73 2061 6e64 2064 6f63 756d 656e bols and documen │ │ │ +00001100: 7461 7469 6f6e 2066 6f75 6e64 2e1f 0a28 tation found...( │ │ │ +00001110: 6465 6661 6c69 6173 2027 6170 726f 706f defalias 'apropo │ │ │ +00001120: 7320 235b 2861 7072 6f70 6f73 2d72 6567 s #[(apropos-reg │ │ │ +00001130: 6578 7020 266f 7074 696f 6e61 6c20 646f exp &optional do │ │ │ +00001140: 2d61 6c6c 2920 220b 47c4 56ac 84c5 c621 -all) ".G.V....! │ │ │ +00001150: 88c7 0b5c 6e3f ad85 093f ad81 c85c 2210 ...\n?...?...\". │ │ │ +00001160: c95c 6eae 8109 cacb 2387 2220 5b61 7072 .\n.....#." [apr │ │ │ +00001170: 6f70 6f73 2d61 6363 756d 756c 6174 6f72 opos-accumulator │ │ │ +00001180: 2061 7072 6f70 6f73 2d64 6f2d 616c 6c20 apropos-do-all │ │ │ +00001190: 646f 2d61 6c6c 2061 7072 6f70 6f73 2d72 do-all apropos-r │ │ │ +000011a0: 6567 6578 7020 3020 6572 726f 7220 224d egexp 0 error "M │ │ │ +000011b0: 7573 7420 7061 7373 206e 6f6e 2d65 6d70 ust pass non-emp │ │ │ +000011c0: 7479 2072 6567 6578 7020 746f 2060 6170 ty regexp to `ap │ │ │ +000011d0: 726f 706f 7327 2220 6170 726f 706f 732d ropos'" apropos- │ │ │ +000011e0: 696e 7465 726e 616c 2023 5b28 7379 6d62 internal #[(symb │ │ │ +000011f0: 6f6c 2920 22c1 0821 ae8d c208 21ae 88c3 ol) "..!....!... │ │ │ +00001200: 0821 ae83 c408 2187 2220 5b73 796d 626f .!....!." [symbo │ │ │ +00001210: 6c20 6662 6f75 6e64 7020 626f 756e 6470 l fboundp boundp │ │ │ +00001220: 2066 696e 642d 6661 6365 2073 796d 626f find-face symbo │ │ │ +00001230: 6c2d 706c 6973 745d 2032 5d20 6170 726f l-plist] 2] apro │ │ │ +00001240: 706f 732d 7072 696e 7420 235b 2870 2920 pos-print #[(p) │ │ │ +00001250: 22c3 891a 1908 85b5 0008 8940 8911 c409 "..........@.... │ │ │ +00001260: 21ad 97c5 0921 ae84 c3c6 c78f 8912 ab89 !....!.......... │ │ │ +00001270: 5c6e c8c9 ca5c 6e5c 224f aa81 cbcc 0921 \n...\n\"O.....! │ │ │ +00001280: ad98 cd09 21ae 85ce 09cf d023 8912 ab89 ....!......#.... │ │ │ +00001290: 5c6e c8c9 ca5c 6e5c 224f aa81 cbd1 0921 \n...\n\"O.....! │ │ │ +000012a0: 8912 ad96 5c6e 47d2 a5d3 61ab 87d4 d55c ....\nG...a....\ │ │ │ +000012b0: 6e40 5c22 aa87 d4d6 5c6e 47d2 a55c 2209 n@\"....\nG..\". │ │ │ +000012c0: d74e ad93 ce09 d8d0 2389 12ab 895c 6ec8 .N......#....\n. │ │ │ +000012d0: c9ca 5c6e 5c22 4faa 81cb d909 21ad 91da ..\n\"O.....!... │ │ │ +000012e0: 0921 8912 ab89 5c6e c8c9 ca5c 6e5c 224f .!....\n...\n\"O │ │ │ +000012f0: aa81 cb09 db4e ad93 ce09 dcd0 2389 12ab .....N......#... │ │ │ +00001300: 895c 6ec8 c9ca 5c6e 5c22 4faa 81cb af07 .\n...\n\"O..... │ │ │ +00001310: a088 0841 8910 8408 00c3 2a87 2220 5b70 ...A......*." [p │ │ │ +00001320: 2073 796d 626f 6c20 646f 6320 6e69 6c20 symbol doc nil │ │ │ +00001330: 6662 6f75 6e64 7020 6675 6e63 7469 6f6e fboundp function │ │ │ +00001340: 2d6f 6273 6f6c 6574 656e 6573 732d 646f -obsoleteness-do │ │ │ +00001350: 6320 2864 6f63 756d 656e 7461 7469 6f6e c (documentation │ │ │ +00001360: 2073 796d 626f 6c20 7429 2028 2876 6f69 symbol t) ((voi │ │ │ +00001370: 642d 6675 6e63 7469 6f6e 2022 2861 6c69 d-function "(ali │ │ │ +00001380: 6173 6564 2074 6f20 756e 6465 6669 6e65 ased to undefine │ │ │ +00001390: 6420 6675 6e63 7469 6f6e 2922 2920 2865 d function)") (e │ │ │ +000013a0: 7272 6f72 2022 2875 6e65 7870 6563 7465 rror "(unexpecte │ │ │ +000013b0: 6420 6572 726f 7220 6672 6f6d 2060 646f d error from `do │ │ │ +000013c0: 6375 6d65 6e74 696f 6e27 2922 2929 2030 cumention')")) 0 │ │ │ +000013d0: 2073 7472 696e 672d 6d61 7463 6820 225c string-match "\ │ │ │ +000013e0: 6e22 2022 286e 6f74 2064 6f63 756d 656e n" "(not documen │ │ │ +000013f0: 7465 6429 2220 626f 756e 6470 2076 6172 ted)" boundp var │ │ │ +00001400: 6961 626c 652d 6f62 736f 6c65 7465 6e65 iable-obsoletene │ │ │ +00001410: 7373 2d64 6f63 2064 6f63 756d 656e 7461 ss-doc documenta │ │ │ +00001420: 7469 6f6e 2d70 726f 7065 7274 7920 7661 tion-property va │ │ │ +00001430: 7269 6162 6c65 2d64 6f63 756d 656e 7461 riable-documenta │ │ │ +00001440: 7469 6f6e 2074 2073 796d 626f 6c2d 706c tion t symbol-pl │ │ │ +00001450: 6973 7420 3220 3120 666f 726d 6174 2022 ist 2 1 format " │ │ │ +00001460: 3120 7072 6f70 6572 7479 2028 2573 2922 1 property (%s)" │ │ │ +00001470: 2022 2564 2070 726f 7065 7274 6965 7322 "%d properties" │ │ │ +00001480: 2077 6964 6765 742d 7479 7065 2077 6964 widget-type wid │ │ │ +00001490: 6765 742d 646f 6375 6d65 6e74 6174 696f get-documentatio │ │ │ +000014a0: 6e20 6669 6e64 2d66 6163 6520 6661 6365 n find-face face │ │ │ +000014b0: 2d64 6f63 2d73 7472 696e 6720 6375 7374 -doc-string cust │ │ │ +000014c0: 6f6d 2d67 726f 7570 2067 726f 7570 2d64 om-group group-d │ │ │ +000014d0: 6f63 756d 656e 7461 7469 6f6e 5d20 3133 ocumentation] 13 │ │ │ +000014e0: 5d20 6e69 6c5d 2034 2028 2324 202e 2034 ] nil] 4 (#$ . 4 │ │ │ +000014f0: 3132 3529 2022 7341 7072 6f70 6f73 2073 125) "sApropos s │ │ │ +00001500: 796d 626f 6c20 2872 6567 6578 7029 3a20 ymbol (regexp): │ │ │ +00001510: 5c6e 5022 5d29 0a23 4032 3334 2053 686f \nP"]).#@234 Sho │ │ │ +00001520: 7720 616c 6c20 7379 6d62 6f6c 7320 7768 w all symbols wh │ │ │ +00001530: 6f73 6520 7661 6c75 6527 7320 7072 696e ose value's prin │ │ │ +00001540: 7465 6420 696d 6167 6520 6d61 7463 6865 ted image matche │ │ │ +00001550: 7320 5245 4745 5850 2e0a 5769 7468 206f s REGEXP..With o │ │ │ +00001560: 7074 696f 6e61 6c20 7072 6566 6978 2041 ptional prefix A │ │ │ +00001570: 5247 206f 7220 6966 2060 6170 726f 706f RG or if `apropo │ │ │ +00001580: 732d 646f 2d61 6c6c 2720 6973 206e 6f6e s-do-all' is non │ │ │ +00001590: 2d6e 696c 2c20 616c 736f 206c 6f6f 6b73 -nil, also looks │ │ │ +000015a0: 0a61 7420 7468 6520 6675 6e63 7469 6f6e .at the function │ │ │ +000015b0: 2061 6e64 2061 7420 7468 6520 6e61 6d65 and at the name │ │ │ +000015c0: 7320 616e 6420 7661 6c75 6573 206f 6620 s and values of │ │ │ +000015d0: 7072 6f70 6572 7469 6573 2e0a 5265 7475 properties..Retu │ │ │ +000015e0: 726e 7320 6c69 7374 206f 6620 7379 6d62 rns list of symb │ │ │ +000015f0: 6f6c 7320 616e 6420 7661 6c75 6573 2066 ols and values f │ │ │ +00001600: 6f75 6e64 2e1f 0a28 6465 6661 6c69 6173 ound...(defalias │ │ │ +00001610: 2027 6170 726f 706f 732d 7661 6c75 6520 'apropos-value │ │ │ +00001620: 235b 2861 7072 6f70 6f73 2d72 6567 6578 #[(apropos-regex │ │ │ +00001630: 7020 266f 7074 696f 6e61 6c20 646f 2d61 p &optional do-a │ │ │ +00001640: 6c6c 2920 220d ac82 0c15 c689 13c6 891a ll) "........... │ │ │ +00001650: 1918 c7c8 2188 2bc9 c689 ca23 8722 205b ....!.+....#." [ │ │ │ +00001660: 6620 7620 7020 6170 726f 706f 732d 6163 f v p apropos-ac │ │ │ +00001670: 6375 6d75 6c61 746f 7220 6170 726f 706f cumulator apropo │ │ │ +00001680: 732d 646f 2d61 6c6c 2064 6f2d 616c 6c20 s-do-all do-all │ │ │ +00001690: 6e69 6c20 6d61 7061 746f 6d73 2023 5b28 nil mapatoms #[( │ │ │ +000016a0: 7379 6d62 6f6c 2920 22c6 8914 13c6 120d symbol) "....... │ │ │ +000016b0: c773 ac86 c8c9 0dca 2313 08ab 8cc8 cb0d .s......#....... │ │ │ +000016c0: cc23 14cd 0dce cf23 120c ac86 0bac 835c .#.....#.......\ │ │ │ +000016d0: 6ead 890d 0c0b 5c6e 4609 4289 1187 2220 n.....\nF.B..." │ │ │ +000016e0: 5b64 6f2d 616c 6c20 6170 726f 706f 732d [do-all apropos- │ │ │ +000016f0: 6163 6375 6d75 6c61 746f 7220 7020 7620 accumulator p v │ │ │ +00001700: 6620 7379 6d62 6f6c 206e 696c 2028 6170 f symbol nil (ap │ │ │ +00001710: 726f 706f 732d 7265 6765 7870 2064 6f2d ropos-regexp do- │ │ │ +00001720: 616c 6c20 6170 726f 706f 732d 6163 6375 all apropos-accu │ │ │ +00001730: 6d75 6c61 746f 7220 7379 6d62 6f6c 2066 mulator symbol f │ │ │ +00001740: 2076 2070 2920 6170 726f 706f 732d 7661 v p) apropos-va │ │ │ +00001750: 6c75 652d 696e 7465 726e 616c 2062 6f75 lue-internal bou │ │ │ +00001760: 6e64 7020 7379 6d62 6f6c 2d76 616c 7565 ndp symbol-value │ │ │ +00001770: 2066 626f 756e 6470 2073 796d 626f 6c2d fboundp symbol- │ │ │ +00001780: 6675 6e63 7469 6f6e 2061 7072 6f70 6f73 function apropos │ │ │ +00001790: 2d66 6f72 6d61 742d 706c 6973 7420 225c -format-plist "\ │ │ │ +000017a0: 6e20 2020 2022 2074 5d20 355d 2061 7072 n " t] 5] apr │ │ │ +000017b0: 6f70 6f73 2d70 7269 6e74 2074 5d20 3520 opos-print t] 5 │ │ │ +000017c0: 2823 2420 2e20 3534 3035 2920 2273 4170 (#$ . 5405) "sAp │ │ │ +000017d0: 726f 706f 7320 7661 6c75 6520 2872 6567 ropos value (reg │ │ │ +000017e0: 6578 7029 3a20 5c6e 5022 5d29 0a23 4032 exp): \nP"]).#@2 │ │ │ +000017f0: 3632 2053 686f 7720 7379 6d62 6f6c 7320 62 Show symbols │ │ │ +00001800: 7768 6f73 6520 646f 6375 6d65 6e74 6174 whose documentat │ │ │ +00001810: 696f 6e20 636f 6e74 6169 6e20 6d61 7463 ion contain matc │ │ │ +00001820: 6865 7320 666f 7220 5245 4745 5850 2e0a hes for REGEXP.. │ │ │ +00001830: 5769 7468 206f 7074 696f 6e61 6c20 7072 With optional pr │ │ │ +00001840: 6566 6978 2041 5247 206f 7220 6966 2060 efix ARG or if ` │ │ │ +00001850: 6170 726f 706f 732d 646f 2d61 6c6c 2720 apropos-do-all' │ │ │ +00001860: 6973 206e 6f6e 2d6e 696c 2c20 616c 736f is non-nil, also │ │ │ +00001870: 2075 7365 0a64 6f63 756d 656e 7461 7469 use.documentati │ │ │ +00001880: 6f6e 2074 6861 7420 6973 206e 6f74 2073 on that is not s │ │ │ +00001890: 746f 7265 6420 696e 2074 6865 2064 6f63 tored in the doc │ │ │ +000018a0: 756d 656e 7461 7469 6f6e 2066 696c 6520 umentation file │ │ │ +000018b0: 616e 6420 7368 6f77 206b 6579 0a62 696e and show key.bin │ │ │ +000018c0: 6469 6e67 732e 0a52 6574 7572 6e73 206c dings..Returns l │ │ │ +000018d0: 6973 7420 6f66 2073 796d 626f 6c73 2061 ist of symbols a │ │ │ +000018e0: 6e64 2064 6f63 756d 656e 7461 7469 6f6e nd documentation │ │ │ +000018f0: 2066 6f75 6e64 2e1f 0a28 6465 6661 6c69 found...(defali │ │ │ +00001900: 6173 2027 6170 726f 706f 732d 646f 6375 as 'apropos-docu │ │ │ +00001910: 6d65 6e74 6174 696f 6e20 235b 2861 7072 mentation #[(apr │ │ │ +00001920: 6f70 6f73 2d72 6567 6578 7020 266f 7074 opos-regexp &opt │ │ │ +00001930: 696f 6e61 6c20 646f 2d61 6c6c 2920 220d ional do-all) ". │ │ │ +00001940: ac82 0b15 c689 1211 c7c8 21c6 8918 1e0f ..........!..... │ │ │ +00001950: 1cc9 8e8a 0c71 88ca 2088 0dab 84cb cc21 .....q.. ......! │ │ │ +00001960: 88cd c689 ce23 2d87 2220 5b76 2061 7072 .....#-." [v apr │ │ │ +00001970: 6f70 6f73 2d66 696c 6573 2d73 6361 6e6e opos-files-scann │ │ │ +00001980: 6564 2061 7072 6f70 6f73 2d61 6363 756d ed apropos-accum │ │ │ +00001990: 756c 6174 6f72 2061 7072 6f70 6f73 2d64 ulator apropos-d │ │ │ +000019a0: 6f2d 616c 6c20 7374 616e 6461 7264 2d69 o-all standard-i │ │ │ +000019b0: 6e70 7574 2064 6f2d 616c 6c20 6e69 6c20 nput do-all nil │ │ │ +000019c0: 6765 742d 6275 6666 6572 2d63 7265 6174 get-buffer-creat │ │ │ +000019d0: 6520 2220 6170 726f 706f 732d 7465 6d70 e " apropos-temp │ │ │ +000019e0: 2220 2828 6b69 6c6c 2d62 7566 6665 7220 " ((kill-buffer │ │ │ +000019f0: 7374 616e 6461 7264 2d69 6e70 7574 2929 standard-input)) │ │ │ +00001a00: 2061 7072 6f70 6f73 2d64 6f63 756d 656e apropos-documen │ │ │ +00001a10: 7461 7469 6f6e 2d63 6865 636b 2d64 6f63 tation-check-doc │ │ │ +00001a20: 2d66 696c 6520 6d61 7061 746f 6d73 2023 -file mapatoms # │ │ │ +00001a30: 5b28 7379 6d62 6f6c 2920 22c5 5c6e 2113 [(symbol) ".\n!. │ │ │ +00001a40: 5c6e c64e 8914 a8ab 82c7 14c8 0b21 13c8 \n.N.........!.. │ │ │ +00001a50: 0c21 140b ac83 0cad 9f5c 6e09 b741 8910 .!.......\n..A.. │ │ │ +00001a60: ab8f 0bab 8408 0ba0 880c ad8d 0841 0ca0 .............A.. │ │ │ +00001a70: 875c 6e0b 0c45 0942 8911 8722 205b 6170 .\n..E.B..." [ap │ │ │ +00001a80: 726f 706f 732d 6974 656d 2061 7072 6f70 ropos-item aprop │ │ │ +00001a90: 6f73 2d61 6363 756d 756c 6174 6f72 2073 os-accumulator s │ │ │ +00001aa0: 796d 626f 6c20 6620 7620 6170 726f 706f ymbol f v apropo │ │ │ +00001ab0: 732d 7361 6665 2d64 6f63 756d 656e 7461 s-safe-documenta │ │ │ +00001ac0: 7469 6f6e 2076 6172 6961 626c 652d 646f tion variable-do │ │ │ +00001ad0: 6375 6d65 6e74 6174 696f 6e20 6e69 6c20 cumentation nil │ │ │ +00001ae0: 6170 726f 706f 732d 646f 6375 6d65 6e74 apropos-document │ │ │ +00001af0: 6174 696f 6e2d 696e 7465 726e 616c 5d20 ation-internal] │ │ │ +00001b00: 345d 2061 7072 6f70 6f73 2d70 7269 6e74 4] apropos-print │ │ │ +00001b10: 2074 2066 5d20 3520 2823 2420 2e20 3631 t f] 5 (#$ . 61 │ │ │ +00001b20: 3331 2920 2273 4170 726f 706f 7320 646f 31) "sApropos do │ │ │ +00001b30: 6375 6d65 6e74 6174 696f 6e20 2872 6567 cumentation (reg │ │ │ +00001b40: 6578 7029 3a20 5c6e 5022 5d29 0a28 6465 exp): \nP"]).(de │ │ │ +00001b50: 6661 6c69 6173 2027 6170 726f 706f 732d falias 'apropos- │ │ │ +00001b60: 7661 6c75 652d 696e 7465 726e 616c 2023 value-internal # │ │ │ +00001b70: 5b28 7072 6564 6963 6174 6520 7379 6d62 [(predicate symb │ │ │ +00001b80: 6f6c 2066 756e 6374 696f 6e29 2022 5c6e ol function) "\n │ │ │ +00001b90: 0c21 ad9a c509 0c21 2114 c608 0c5c 22ad .!.....!!....\". │ │ │ +00001ba0: 8e0b ab8a c7c8 94c8 95c9 0b0c 2588 0c87 ............%... │ │ │ +00001bb0: 2220 5b61 7072 6f70 6f73 2d72 6567 6578 " [apropos-regex │ │ │ +00001bc0: 7020 6675 6e63 7469 6f6e 2070 7265 6469 p function predi │ │ │ +00001bd0: 6361 7465 2061 7072 6f70 6f73 2d6d 6174 cate apropos-mat │ │ │ +00001be0: 6368 2d66 6163 6520 7379 6d62 6f6c 2070 ch-face symbol p │ │ │ +00001bf0: 7269 6e31 2d74 6f2d 7374 7269 6e67 2073 rin1-to-string s │ │ │ +00001c00: 7472 696e 672d 6d61 7463 6820 7075 742d tring-match put- │ │ │ +00001c10: 7465 7874 2d70 726f 7065 7274 7920 3020 text-property 0 │ │ │ +00001c20: 6661 6365 5d20 365d 290a 2864 6566 616c face] 6]).(defal │ │ │ +00001c30: 6961 7320 2761 7072 6f70 6f73 2d64 6f63 ias 'apropos-doc │ │ │ +00001c40: 756d 656e 7461 7469 6f6e 2d69 6e74 6572 umentation-inter │ │ │ +00001c50: 6e61 6c20 235b 2864 6f63 2920 225c 6e3a nal #[(doc) "\n: │ │ │ +00001c60: ab85 c35c 6e40 2187 5c6e ad98 c408 5c6e ...\n@!.\n....\n │ │ │ +00001c70: 5c22 ad92 09ab 8ec5 c694 c695 c709 c85c \".............\ │ │ │ +00001c80: 6e21 8912 2588 5c6e 8722 205b 6170 726f n!..%.\n." [apro │ │ │ +00001c90: 706f 732d 7265 6765 7870 2061 7072 6f70 pos-regexp aprop │ │ │ +00001ca0: 6f73 2d6d 6174 6368 2d66 6163 6520 646f os-match-face do │ │ │ +00001cb0: 6320 6170 726f 706f 732d 646f 6375 6d65 c apropos-docume │ │ │ +00001cc0: 6e74 6174 696f 6e2d 6368 6563 6b2d 656c ntation-check-el │ │ │ +00001cd0: 632d 6669 6c65 2073 7472 696e 672d 6d61 c-file string-ma │ │ │ +00001ce0: 7463 6820 7075 742d 7465 7874 2d70 726f tch put-text-pro │ │ │ +00001cf0: 7065 7274 7920 3020 6661 6365 2063 6f70 perty 0 face cop │ │ │ +00001d00: 792d 7365 7175 656e 6365 5d20 375d 290a y-sequence] 7]). │ │ │ +00001d10: 2864 6566 616c 6961 7320 2761 7072 6f70 (defalias 'aprop │ │ │ +00001d20: 6f73 2d66 6f72 6d61 742d 706c 6973 7420 os-format-plist │ │ │ +00001d30: 235b 2870 6c20 7365 7020 266f 7074 696f #[(pl sep &optio │ │ │ +00001d40: 6e61 6c20 636f 6d70 6172 6529 2022 c60d nal compare) ".. │ │ │ +00001d50: 2115 c789 1b1c 0dab c9c8 c90d 400d 4140 !...........@.A@ │ │ │ +00001d60: 2314 5c6e ab87 ca0e 0f0c 5c22 ab91 09ab #.\n......\".... │ │ │ +00001d70: 90cb cccd 0d40 2147 ce09 0c25 88aa 82c7 .....@!G...%.... │ │ │ +00001d80: 140c ab99 5c6e ab8d 08ab 8acb cc94 cc95 ....\n.......... │ │ │ +00001d90: ce08 0c25 880b 89ad 820e 100c 5113 0d41 ...%........Q..A │ │ │ +00001da0: 4189 15ac 370b 2a87 2220 5b61 7072 6f70 A...7.*." [aprop │ │ │ +00001db0: 6f73 2d6d 6174 6368 2d66 6163 6520 6170 os-match-face ap │ │ │ +00001dc0: 726f 706f 732d 7072 6f70 6572 7479 2d66 ropos-property-f │ │ │ +00001dd0: 6163 6520 636f 6d70 6172 6520 702d 6f75 ace compare p-ou │ │ │ +00001de0: 7420 7020 706c 2073 796d 626f 6c2d 706c t p pl symbol-pl │ │ │ +00001df0: 6973 7420 6e69 6c20 666f 726d 6174 2022 ist nil format " │ │ │ +00001e00: 2573 2025 5322 2073 7472 696e 672d 6d61 %s %S" string-ma │ │ │ +00001e10: 7463 6820 7075 742d 7465 7874 2d70 726f tch put-text-pro │ │ │ +00001e20: 7065 7274 7920 3020 7379 6d62 6f6c 2d6e perty 0 symbol-n │ │ │ +00001e30: 616d 6520 6661 6365 2061 7072 6f70 6f73 ame face apropos │ │ │ +00001e40: 2d72 6567 6578 7020 7365 705d 2037 5d29 -regexp sep] 7]) │ │ │ +00001e50: 0a28 6465 6661 6c69 6173 2027 6170 726f .(defalias 'apro │ │ │ +00001e60: 706f 732d 646f 6375 6d65 6e74 6174 696f pos-documentatio │ │ │ +00001e70: 6e2d 6368 6563 6b2d 646f 632d 6669 6c65 n-check-doc-file │ │ │ +00001e80: 2023 5b6e 696c 2022 c689 c7c6 8989 891a #[nil "........ │ │ │ +00001e90: 1d1c 1b18 191e 15c8 6388 c975 88ca 0e19 ........c..u.... │ │ │ +00001ea0: 0e1a 5021 88c6 7588 8acb cc21 136d 293f ..P!..u....!.m)? │ │ │ +00001eb0: ade8 cd79 888c 600b 537d 88ce 0e1b c6cf ...y..`.S}...... │ │ │ +00001ec0: 2329 abd1 d094 1460 1508 5462 8868 d161 #).....`..Tb.h.a │ │ │ +00001ed0: ab83 cdaa 81c7 1615 d220 110c 605a 5314 ......... ..`ZS. │ │ │ +00001ee0: 0d60 5a53 1560 540b 537b 1209 0e16 b789 .`ZS.`T.S{...... │ │ │ +00001ef0: 1617 ac8c 09c6 8945 8916 170e 1642 1616 .......E.....B.. │ │ │ +00001f00: 0e18 ab89 d30c 0dd4 0e18 5c6e 2588 0e15 ..........\n%... │ │ │ +00001f10: 0e17 9b5c 6ea0 880b 6210 aa0e 2e07 8722 ...\n...b......" │ │ │ +00001f20: 205b 7365 7061 2073 796d 626f 6c20 646f [sepa symbol do │ │ │ +00001f30: 6320 7365 7062 2073 7461 7274 2065 6e64 c sepb start end │ │ │ +00001f40: 206e 696c 2032 203f 5c5e 5f20 2d31 2069 nil 2 ?\^_ -1 i │ │ │ +00001f50: 6e73 6572 742d 6669 6c65 2d63 6f6e 7465 nsert-file-conte │ │ │ +00001f60: 6e74 7320 7365 6172 6368 2d66 6f72 7761 nts search-forwa │ │ │ +00001f70: 7264 2022 1f22 2031 2072 652d 7365 6172 rd "." 1 re-sear │ │ │ +00001f80: 6368 2d66 6f72 7761 7264 2074 2030 203f ch-forward t 0 ? │ │ │ +00001f90: 4620 7265 6164 2070 7574 2d74 6578 742d F read put-text- │ │ │ +00001fa0: 7072 6f70 6572 7479 2066 6163 6520 7479 property face ty │ │ │ +00001fb0: 7065 2061 7072 6f70 6f73 2d61 6363 756d pe apropos-accum │ │ │ +00001fc0: 756c 6174 6f72 2061 7072 6f70 6f73 2d69 ulator apropos-i │ │ │ +00001fd0: 7465 6d20 6170 726f 706f 732d 6d61 7463 tem apropos-matc │ │ │ +00001fe0: 682d 6661 6365 2064 6f63 2d64 6972 6563 h-face doc-direc │ │ │ +00001ff0: 746f 7279 2069 6e74 6572 6e61 6c2d 646f tory internal-do │ │ │ +00002000: 632d 6669 6c65 2d6e 616d 6520 6170 726f c-file-name apro │ │ │ +00002010: 706f 732d 7265 6765 7870 5d20 385d 290a pos-regexp] 8]). │ │ │ +00002020: 2864 6566 616c 6961 7320 2761 7072 6f70 (defalias 'aprop │ │ │ +00002030: 6f73 2d64 6f63 756d 656e 7461 7469 6f6e os-documentation │ │ │ +00002040: 2d63 6865 636b 2d65 6c63 2d66 696c 6520 -check-elc-file │ │ │ +00002050: 235b 2866 696c 6529 2022 080e 19b6 3f85 #[(file) "....?. │ │ │ +00002060: b400 c689 8989 891a 1c1b 191d 080e 1942 ...............B │ │ │ +00002070: 1619 c720 88c8 0821 88c9 cac6 cb23 85b3 ... ...!.....#.. │ │ │ +00002080: 00cc 2014 6054 1360 0c5c 5c53 14c6 7588 .. .`T.`.\\S..u. │ │ │ +00002090: 8c0b 0c7d 88cd 0e1d c6cb 2329 ab5c 5c0c ...}......#).\\. │ │ │ +000020a0: ce5c 5c62 880b 0c7b 11cf 950b 5a14 cf94 .\\b...{....Z... │ │ │ +000020b0: 0b5a 13d0 d121 12d2 c677 88c6 7588 cc20 .Z...!...w..u.. │ │ │ +000020c0: 8915 3aab 850d 4140 aa81 0d15 5c6e ab85 ..:...A@....\n.. │ │ │ +000020d0: 0dd3 4eaa 88d4 0d21 ab23 d50d 21ab 1e0d ..N....!.#..!... │ │ │ +000020e0: 0e1a b789 161b ac8c 0dc6 8945 8916 1b0e ...........E.... │ │ │ +000020f0: 1a42 161a 0e1c ab89 d60b 0cd7 0e1c 0925 .B.............% │ │ │ +00002100: 885c 6eab 83ce aa81 d80e 1b9b 09a0 8882 .\n............. │ │ │ +00002110: 1f00 2d87 2220 5b66 696c 6520 646f 6320 ..-." [file doc │ │ │ +00002120: 7468 6973 2d69 732d 612d 7661 7269 6162 this-is-a-variab │ │ │ +00002130: 6c65 2073 7461 7274 2065 6e64 2073 796d le start end sym │ │ │ +00002140: 626f 6c20 6e69 6c20 6572 6173 652d 6275 bol nil erase-bu │ │ │ +00002150: 6666 6572 2069 6e73 6572 742d 6669 6c65 ffer insert-file │ │ │ +00002160: 2d63 6f6e 7465 6e74 7320 7365 6172 6368 -contents search │ │ │ +00002170: 2d66 6f72 7761 7264 2022 5c6e 2340 2220 -forward "\n#@" │ │ │ +00002180: 7420 7265 6164 2072 652d 7365 6172 6368 t read re-search │ │ │ +00002190: 2d66 6f72 7761 7264 2032 2030 206c 6f6f -forward 2 0 loo │ │ │ +000021a0: 6b69 6e67 2d61 7420 2228 6465 665c 5c28 king-at "(def\\( │ │ │ +000021b0: 7661 725c 5c7c 636f 6e73 745c 5c29 2022 var\\|const\\) " │ │ │ +000021c0: 2022 2861 2d7a 2220 7661 7269 6162 6c65 "(a-z" variable │ │ │ +000021d0: 2d64 6f63 756d 656e 7461 7469 6f6e 2066 -documentation f │ │ │ +000021e0: 626f 756e 6470 2061 7072 6f70 6f73 2d73 boundp apropos-s │ │ │ +000021f0: 6166 652d 646f 6375 6d65 6e74 6174 696f afe-documentatio │ │ │ +00002200: 6e20 7075 742d 7465 7874 2d70 726f 7065 n put-text-prope │ │ │ +00002210: 7274 7920 6661 6365 2031 2061 7072 6f70 rty face 1 aprop │ │ │ +00002220: 6f73 2d66 696c 6573 2d73 6361 6e6e 6564 os-files-scanned │ │ │ +00002230: 2061 7072 6f70 6f73 2d61 6363 756d 756c apropos-accumul │ │ │ +00002240: 6174 6f72 2061 7072 6f70 6f73 2d69 7465 ator apropos-ite │ │ │ +00002250: 6d20 6170 726f 706f 732d 6d61 7463 682d m apropos-match- │ │ │ +00002260: 6661 6365 2061 7072 6f70 6f73 2d72 6567 face apropos-reg │ │ │ +00002270: 6578 705d 2037 5d29 0a23 4038 3920 4c69 exp] 7]).#@89 Li │ │ │ +00002280: 6b65 2064 6f63 756d 656e 7461 7469 6f6e ke documentation │ │ │ +00002290: 2c20 6578 6365 7074 2069 7420 6176 6f69 , except it avoi │ │ │ +000022a0: 6473 2063 616c 6c69 6e67 2060 6765 745f ds calling `get_ │ │ │ +000022b0: 646f 635f 7374 7269 6e67 272e 0a57 696c doc_string'..Wil │ │ │ +000022c0: 6c20 7265 7475 726e 206e 696c 2069 6e73 l return nil ins │ │ │ +000022d0: 7465 6164 2e1f 0a28 6465 6661 6c69 6173 tead...(defalias │ │ │ +000022e0: 2027 6170 726f 706f 732d 7361 6665 2d64 'apropos-safe-d │ │ │ +000022f0: 6f63 756d 656e 7461 7469 6f6e 2023 5b28 ocumentation #[( │ │ │ +00002300: 6675 6e63 7469 6f6e 2920 2208 ab8f 0839 function) "....9 │ │ │ +00002310: ab8b c108 21ad 8208 4b89 10ac 7108 a2c2 ....!...K...q... │ │ │ +00002320: 61ab 8308 4110 c308 21ab 95c1 c421 ab85 a...A...!....!.. │ │ │ +00002330: c408 21aa b008 47c5 56ad aa08 c548 aaa5 ..!...G.V....H.. │ │ │ +00002340: 08a2 c661 ab85 c708 38aa 9a08 a2c8 61ad ...a....8.....a. │ │ │ +00002350: 94c7 0838 3bab 85c7 0838 aa89 c908 383b ...8;....8....8; │ │ │ +00002360: ad83 c908 3889 10a8 3fad 8108 8722 205b ....8...?...." [ │ │ │ +00002370: 6675 6e63 7469 6f6e 2066 626f 756e 6470 function fboundp │ │ │ +00002380: 206d 6163 726f 2063 6f6d 7069 6c65 642d macro compiled- │ │ │ +00002390: 6675 6e63 7469 6f6e 2d70 2063 6f6d 7069 function-p compi │ │ │ +000023a0: 6c65 642d 6675 6e63 7469 6f6e 2d64 6f63 led-function-doc │ │ │ +000023b0: 2d73 7472 696e 6720 3420 6175 746f 6c6f -string 4 autolo │ │ │ +000023c0: 6164 2032 206c 616d 6264 6120 335d 2033 ad 2 lambda 3] 3 │ │ │ +000023d0: 2028 2324 202e 2038 3833 3029 5d29 0a23 (#$ . 8830)]).# │ │ │ +000023e0: 4032 3839 204f 7574 7075 7420 7265 7375 @289 Output resu │ │ │ +000023f0: 6c74 206f 6620 7661 7269 6f75 7320 6170 lt of various ap │ │ │ +00002400: 726f 706f 7320 636f 6d6d 616e 6473 2077 ropos commands w │ │ │ +00002410: 6974 6820 6061 7072 6f70 6f73 2d72 6567 ith `apropos-reg │ │ │ +00002420: 6578 7027 2e0a 4150 524f 504f 532d 4143 exp'..APROPOS-AC │ │ │ +00002430: 4355 4d55 4c41 544f 5220 6973 2061 206c CUMULATOR is a l │ │ │ +00002440: 6973 742e 2020 4f70 7469 6f6e 616c 2044 ist. Optional D │ │ │ +00002450: 4f43 2d46 4e20 6973 2063 616c 6c65 6420 OC-FN is called │ │ │ +00002460: 666f 7220 6561 6368 2065 6c65 6d65 6e74 for each element │ │ │ +00002470: 0a6f 6620 6170 726f 706f 732d 6163 6375 .of apropos-accu │ │ │ +00002480: 6d75 6c61 746f 7220 616e 6420 6d61 7920 mulator and may │ │ │ +00002490: 6d6f 6469 6679 2069 7420 7265 7375 6c74 modify it result │ │ │ +000024a0: 696e 6720 696e 2028 7379 6d62 6f6c 2066 ing in (symbol f │ │ │ +000024b0: 6e2d 646f 630a 7661 722d 646f 6320 5b70 n-doc.var-doc [p │ │ │ +000024c0: 6c69 7374 2d64 6f63 5d29 2e20 2052 6574 list-doc]). Ret │ │ │ +000024d0: 7572 6e73 2073 6f72 7465 6420 6c69 7374 urns sorted list │ │ │ +000024e0: 206f 6620 7379 6d62 6f6c 7320 616e 6420 of symbols and │ │ │ +000024f0: 646f 6375 6d65 6e74 6174 696f 6e0a 666f documentation.fo │ │ │ +00002500: 756e 642e 1f0a 2864 6566 616c 6961 7320 und...(defalias │ │ │ +00002510: 2761 7072 6f70 6f73 2d70 7269 6e74 2023 'apropos-print # │ │ │ +00002520: 5b28 646f 2d6b 6579 7320 646f 632d 666e [(do-keys doc-fn │ │ │ +00002530: 2073 7061 6369 6e67 2920 220c ac85 c5c6 spacing) "..... │ │ │ +00002540: 5c6e 5c22 8709 ab84 090c 2188 c70c c85c \n\"......!....\ │ │ │ +00002550: 2214 0bab 8f0b 39ac 85c9 0b21 ab86 ca0b ".....9....!.... │ │ │ +00002560: cb42 4213 cc18 cdce 5c6e 5c22 8829 0ccf .BB.....\n\".).. │ │ │ +00002570: 1487 2220 5b68 656c 702d 6275 6666 6572 .." [help-buffer │ │ │ +00002580: 2d70 7265 6669 782d 7374 7269 6e67 2064 -prefix-string d │ │ │ +00002590: 6f63 2d66 6e20 6170 726f 706f 732d 7265 oc-fn apropos-re │ │ │ +000025a0: 6765 7870 2061 7072 6f70 6f73 2d6c 6162 gexp apropos-lab │ │ │ +000025b0: 656c 2d66 6163 6520 6170 726f 706f 732d el-face apropos- │ │ │ +000025c0: 6163 6375 6d75 6c61 746f 7220 6d65 7373 accumulator mess │ │ │ +000025d0: 6167 6520 224e 6f20 6170 726f 706f 7320 age "No apropos │ │ │ +000025e0: 6d61 7463 6865 7320 666f 7220 6025 7327 matches for `%s' │ │ │ +000025f0: 2220 736f 7274 2023 5b28 6120 6229 2022 " sort #[(a b) " │ │ │ +00002600: 0940 0840 9987 2220 5b62 2061 5d20 325d .@.@.." [b a] 2] │ │ │ +00002610: 2066 6163 6570 2066 6163 6520 286d 6f75 facep face (mou │ │ │ +00002620: 7365 2d66 6163 6520 6869 6768 6c69 6768 se-face highligh │ │ │ +00002630: 7429 2022 4170 726f 706f 7322 2077 6974 t) "Apropos" wit │ │ │ +00002640: 682d 6469 7370 6c61 7969 6e67 2d68 656c h-displaying-hel │ │ │ +00002650: 702d 6275 6666 6572 2023 5b6e 696c 2022 p-buffer #[nil " │ │ │ +00002660: 720e 4971 88c6 c721 880e 4a70 c889 8989 r.Iq...!..Jp.... │ │ │ +00002670: 1a19 1e26 1d1e 4518 c90e 4621 88ca 20ab ...&..E...F!.. . │ │ │ +00002680: 8acb cc21 88cb cdce 2121 88cb cdcf 2121 ...!....!!....!! │ │ │ +00002690: 8808 3a85 6801 0e4b ab86 6fac 83d0 2088 ..:.h..K..o... . │ │ │ +000026a0: 0840 8916 4140 1508 4110 6011 cb0d 2188 .@..A@..A.`...!. │ │ │ +000026b0: 6012 0c83 ee00 d10d 2183 ee00 d2d3 d45c `.......!......\ │ │ │ +000026c0: 2283 ee00 8a0e 4571 88d5 0d21 29c8 1e42 ".....Eq...!)..B │ │ │ +000026d0: 891e 43ab be0e 4340 d6c8 1e44 1b1e 400b ..C...C@...D..@. │ │ │ +000026e0: 0e40 4757 ab99 d70e 400b 4821 ac88 d80e .@GW....@.H!.... │ │ │ +000026f0: 400b 4821 ab83 d916 440b 5489 13aa 610e @.H!....D.T...a. │ │ │ +00002700: 44ac 870e 400e 4242 1642 2b0e 4341 8916 D...@.BB.B+.CA.. │ │ │ +00002710: 43ac 420e 4289 1626 2aab 8bcb dadb 0e26 C.B.B..&*......& │ │ │ +00002720: dc23 2188 aaa9 cbdd 2188 cbde 2188 df60 .#!.....!...!..` │ │ │ +00002730: e05a 60e1 0e47 2488 cbe2 e3e4 0d21 5c22 .Z`..G$......!\" │ │ │ +00002740: 2188 cbe5 2188 df60 e05a 60e1 0e47 2488 !...!..`.Z`..G$. │ │ │ +00002750: d020 88df 095c 6ee6 e7e8 0e41 4142 21ab . ...\n....AAB!. │ │ │ +00002760: 850e 4140 aa82 0e41 2488 0e48 ab88 df09 ..A@...A$..H.... │ │ │ +00002770: 5c6e e10e 4824 88df 095c 6ee9 0e46 2488 \n..H$...\n..F$. │ │ │ +00002780: eaeb d4d1 0d21 ab83 ecaa 89ed 0d21 ab83 .....!.......!.. │ │ │ +00002790: eeaa 81ef 0c24 880d f04e ab89 eaf1 f2f3 .....$...N...... │ │ │ +000027a0: 0c24 88aa 87ea f4f2 f50c 2488 eaf6 f7f8 .$........$..... │ │ │ +000027b0: 0c24 88ea f9fa fb0c 2488 eafc fdfe 0c24 .$......$......$ │ │ │ +000027c0: 88ea ffe0 814c 00c8 2488 8231 002e 0787 .....L..$..1.... │ │ │ +000027d0: 2220 5b70 2070 6f69 6e74 3120 706f 696e " [p point1 poin │ │ │ +000027e0: 7432 2069 2064 6f2d 6b65 7973 2073 796d t2 i do-keys sym │ │ │ +000027f0: 626f 6c20 7275 6e2d 686f 6f6b 7320 6170 bol run-hooks ap │ │ │ +00002800: 726f 706f 732d 6d6f 6465 2d68 6f6f 6b20 ropos-mode-hook │ │ │ +00002810: 6e69 6c20 7573 652d 6c6f 6361 6c2d 6d61 nil use-local-ma │ │ │ +00002820: 7020 6465 7669 6365 2d6f 6e2d 7769 6e64 p device-on-wind │ │ │ +00002830: 6f77 2d73 7973 7465 6d2d 7020 7072 696e ow-system-p prin │ │ │ +00002840: 6320 2249 6620 796f 7520 6d6f 7665 2074 c "If you move t │ │ │ +00002850: 6865 206d 6f75 7365 206f 7665 7220 7465 he mouse over te │ │ │ +00002860: 7874 2074 6861 7420 6368 616e 6765 7320 xt that changes │ │ │ +00002870: 636f 6c6f 722c 5c6e 2220 7375 6273 7469 color,\n" substi │ │ │ +00002880: 7475 7465 2d63 6f6d 6d61 6e64 2d6b 6579 tute-command-key │ │ │ +00002890: 7320 2279 6f75 2063 616e 2063 6c69 636b s "you can click │ │ │ +000028a0: 205c 5c5b 6170 726f 706f 732d 6d6f 7573 \\[apropos-mous │ │ │ +000028b0: 652d 666f 6c6c 6f77 5d20 746f 2067 6574 e-follow] to get │ │ │ +000028c0: 206d 6f72 6520 696e 666f 726d 6174 696f more informatio │ │ │ +000028d0: 6e2e 5c6e 2220 2254 7970 6520 5c5c 5b61 n.\n" "Type \\[a │ │ │ +000028e0: 7072 6f70 6f73 2d66 6f6c 6c6f 775d 2069 propos-follow] i │ │ │ +000028f0: 6e20 7468 6973 2062 7566 6665 7220 746f n this buffer to │ │ │ +00002900: 2067 6574 2066 756c 6c20 646f 6375 6d65 get full docume │ │ │ +00002910: 6e74 6174 696f 6e2e 5c6e 5c6e 2220 7465 ntation.\n\n" te │ │ │ +00002920: 7270 7269 2063 6f6d 6d61 6e64 7020 696e rpri commandp in │ │ │ +00002930: 6465 6e74 2d74 6f20 3330 2031 2077 6865 dent-to 30 1 whe │ │ │ +00002940: 7265 2d69 732d 696e 7465 726e 616c 2030 re-is-internal 0 │ │ │ +00002950: 2066 7261 6d65 7020 6275 6666 6572 7020 framep bufferp │ │ │ +00002960: 7420 6d61 7063 6f6e 6361 7420 235b 286b t mapconcat #[(k │ │ │ +00002970: 6579 2920 22c2 0921 1108 ab89 c3c4 0947 ey) "..!.......G │ │ │ +00002980: c508 0925 8809 8722 205b 6170 726f 706f ...%..." [apropo │ │ │ +00002990: 732d 6b65 7962 696e 6469 6e67 2d66 6163 s-keybinding-fac │ │ │ +000029a0: 6520 6b65 7920 6b65 792d 6465 7363 7269 e key key-descri │ │ │ +000029b0: 7074 696f 6e20 7075 742d 7465 7874 2d70 ption put-text-p │ │ │ +000029c0: 726f 7065 7274 7920 3020 6661 6365 5d20 roperty 0 face] │ │ │ +000029d0: 365d 2022 2c20 2220 2254 7970 6520 2220 6] ", " "Type " │ │ │ +000029e0: 224d 2d78 2220 7075 742d 7465 7874 2d70 "M-x" put-text-p │ │ │ +000029f0: 726f 7065 7274 7920 3320 6661 6365 2066 roperty 3 face f │ │ │ +00002a00: 6f72 6d61 7420 2220 2573 2022 2073 796d ormat " %s " sym │ │ │ +00002a10: 626f 6c2d 6e61 6d65 2022 5245 5422 2069 bol-name "RET" i │ │ │ +00002a20: 7465 6d20 6576 616c 206f 7220 6b65 796d tem eval or keym │ │ │ +00002a30: 6170 2061 7072 6f70 6f73 2d70 7269 6e74 ap apropos-print │ │ │ +00002a40: 2d64 6f63 2064 6573 6372 6962 652d 6675 -doc describe-fu │ │ │ +00002a50: 6e63 7469 6f6e 2022 436f 6d6d 616e 6422 nction "Command" │ │ │ +00002a60: 2061 7072 6f70 6f73 2d6d 6163 726f 7020 apropos-macrop │ │ │ +00002a70: 224d 6163 726f 2220 2246 756e 6374 696f "Macro" "Functio │ │ │ +00002a80: 6e22 2063 7573 746f 6d2d 7479 7065 2063 n" custom-type c │ │ │ +00002a90: 7573 746f 6d69 7a65 2d76 6172 6961 626c ustomize-variabl │ │ │ +00002aa0: 652d 6f74 6865 722d 7769 6e64 6f77 2032 e-other-window 2 │ │ │ +00002ab0: 2022 5573 6572 204f 7074 696f 6e22 2064 "User Option" d │ │ │ +00002ac0: 6573 6372 6962 652d 7661 7269 6162 6c65 escribe-variable │ │ │ +00002ad0: 2022 5661 7269 6162 6c65 2220 6375 7374 "Variable" cust │ │ │ +00002ae0: 6f6d 697a 652d 6f74 6865 722d 7769 6e64 omize-other-wind │ │ │ +00002af0: 6f77 2036 2022 4772 6f75 7022 2063 7573 ow 6 "Group" cus │ │ │ +00002b00: 746f 6d69 7a65 2d66 6163 652d 6f74 6865 tomize-face-othe │ │ │ +00002b10: 722d 7769 6e64 6f77 2035 2022 4661 6365 r-window 5 "Face │ │ │ +00002b20: 2220 7769 6467 6574 2d62 726f 7773 652d " widget-browse- │ │ │ +00002b30: 6f74 6865 722d 7769 6e64 6f77 2034 2022 other-window 4 " │ │ │ +00002b40: 5769 6467 6574 2220 6170 726f 706f 732d Widget" apropos- │ │ │ +00002b50: 6465 7363 7269 6265 2d70 6c69 7374 206b describe-plist k │ │ │ +00002b60: 6579 2061 7072 6f70 6f73 2d69 7465 6d20 ey apropos-item │ │ │ +00002b70: 6669 6c74 6572 6564 206b 6579 7320 6c6f filtered keys lo │ │ │ +00002b80: 7365 7220 6f6c 642d 6275 6666 6572 2061 ser old-buffer a │ │ │ +00002b90: 7072 6f70 6f73 2d6d 6f64 652d 6d61 7020 propos-mode-map │ │ │ +00002ba0: 6170 726f 706f 732d 6b65 7962 696e 6469 apropos-keybindi │ │ │ +00002bb0: 6e67 2d66 6163 6520 6170 726f 706f 732d ng-face apropos- │ │ │ +00002bc0: 7379 6d62 6f6c 2d66 6163 6520 7374 616e symbol-face stan │ │ │ +00002bd0: 6461 7264 2d6f 7574 7075 7420 6170 726f dard-output apro │ │ │ +00002be0: 706f 732d 6163 6375 6d75 6c61 746f 7220 pos-accumulator │ │ │ +00002bf0: 7370 6163 696e 6720 2250 6c69 7374 225d spacing "Plist"] │ │ │ +00002c00: 2038 5d20 6e69 6c5d 2033 2028 2324 202e 8] nil] 3 (#$ . │ │ │ +00002c10: 2039 3138 3929 5d29 0a23 4033 3720 5265 9189)]).#@37 Re │ │ │ +00002c20: 7475 726e 2074 2069 6620 5359 4d42 4f4c turn t if SYMBOL │ │ │ +00002c30: 2069 7320 6120 4c69 7370 206d 6163 726f is a Lisp macro │ │ │ +00002c40: 2e1f 0a28 6465 6661 6c69 6173 2027 6170 ...(defalias 'ap │ │ │ +00002c50: 726f 706f 732d 6d61 6372 6f70 2023 5b28 ropos-macrop #[( │ │ │ +00002c60: 7379 6d62 6f6c 2920 22c1 0821 ad98 084b symbol) "..!...K │ │ │ +00002c70: 8910 3aad 9108 40c2 61ae 8b08 40c3 61ad ..:...@.a...@.a. │ │ │ +00002c80: 85c4 0838 c573 8722 205b 7379 6d62 6f6c ...8.s." [symbol │ │ │ +00002c90: 2066 626f 756e 6470 206d 6163 726f 2061 fboundp macro a │ │ │ +00002ca0: 7574 6f6c 6f61 6420 3420 286d 6163 726f utoload 4 (macro │ │ │ +00002cb0: 2074 295d 2032 2028 2324 202e 2031 3132 t)] 2 (#$ . 112 │ │ │ +00002cc0: 3934 295d 290a 2864 6566 616c 6961 7320 94)]).(defalias │ │ │ +00002cd0: 2761 7072 6f70 6f73 2d70 7269 6e74 2d64 'apropos-print-d │ │ │ +00002ce0: 6f63 2023 5b28 6163 7469 6f6e 2069 2073 oc #[(action i s │ │ │ +00002cf0: 7472 2064 6f2d 6b65 7973 2920 2272 5c6e tr do-keys) "r\n │ │ │ +00002d00: 7188 0d09 3889 153b adc1 c663 88c7 60c8 q...8..;...c..`. │ │ │ +00002d10: 5a60 53c0 0824 880c c9b1 0288 0bab 8cca Z`S..$.......... │ │ │ +00002d20: 600c 475a c85a 6053 0b23 88ca 600c 475a `.GZ.Z`S.#..`.GZ │ │ │ +00002d30: c85a 6053 cb0e 0e44 2388 0e0f ab85 cc0d .Z`S...D#....... │ │ │ +00002d40: 21aa 810d 6388 6eae 82cd 2029 8722 205b !...c.n... )." [ │ │ │ +00002d50: 6163 7469 6f6e 2061 7072 6f70 6f73 2d69 action apropos-i │ │ │ +00002d60: 7465 6d20 7374 616e 6461 7264 2d6f 7574 tem standard-out │ │ │ +00002d70: 7075 7420 6170 726f 706f 732d 6c61 6265 put apropos-labe │ │ │ +00002d80: 6c2d 6661 6365 2073 7472 2069 2022 2020 l-face str i " │ │ │ +00002d90: 2220 7075 742d 7465 7874 2d70 726f 7065 " put-text-prope │ │ │ +00002da0: 7274 7920 3220 223a 2022 2061 6464 2d74 rty 2 ": " add-t │ │ │ +00002db0: 6578 742d 7072 6f70 6572 7469 6573 206b ext-properties k │ │ │ +00002dc0: 6579 6d61 7020 7375 6273 7469 7475 7465 eymap substitute │ │ │ +00002dd0: 2d63 6f6d 6d61 6e64 2d6b 6579 7320 7465 -command-keys te │ │ │ +00002de0: 7270 7269 2061 7072 6f70 6f73 2d6d 6f64 rpri apropos-mod │ │ │ +00002df0: 652d 6d61 7020 646f 2d6b 6579 735d 2035 e-map do-keys] 5 │ │ │ +00002e00: 5d29 0a28 6465 6661 6c69 6173 2027 6170 ]).(defalias 'ap │ │ │ +00002e10: 726f 706f 732d 6d6f 7573 652d 666f 6c6c ropos-mouse-foll │ │ │ +00002e20: 6f77 2023 5b28 6576 656e 7429 2022 8ac1 ow #[(event) ".. │ │ │ +00002e30: 0821 7188 c208 2162 88c3 2029 8722 205b .!q...!b.. )." [ │ │ │ +00002e40: 6576 656e 7420 6576 656e 742d 6275 6666 event event-buff │ │ │ +00002e50: 6572 2065 7665 6e74 2d63 6c6f 7365 7374 er event-closest │ │ │ +00002e60: 2d70 6f69 6e74 2061 7072 6f70 6f73 2d66 -point apropos-f │ │ │ +00002e70: 6f6c 6c6f 775d 2032 206e 696c 2022 6522 ollow] 2 nil "e" │ │ │ +00002e80: 5d29 0a28 6465 6661 6c69 6173 2027 6170 ]).(defalias 'ap │ │ │ +00002e90: 726f 706f 732d 666f 6c6c 6f77 2023 5b28 ropos-follow #[( │ │ │ +00002ea0: 266f 7074 696f 6e61 6c20 6f74 6865 7229 &optional other) │ │ │ +00002eb0: 2022 8ac6 7988 6029 1cc7 0cc5 5c22 891d "..y.`)....\".. │ │ │ +00002ec0: 3fad 84c8 0cc5 5c22 1ac7 0cc3 5c22 891b ?.....\"....\".. │ │ │ +00002ed0: 3fad 84c9 0cc3 5c22 190d ac89 5c6e ab86 ?.....\"....\n.. │ │ │ +00002ee0: c75c 6e53 c55c 2215 0bac 8809 ab85 c709 .\nS.\"......... │ │ │ +00002ef0: c35c 2213 0dab 830b ac84 cacb 2188 0d3a .\".........!..: │ │ │ +00002f00: ab86 cacc 0d40 5c22 8808 ab83 0871 880b .....@\".....q.. │ │ │ +00002f10: 0d21 2d87 2220 5b6f 7468 6572 2061 6374 .!-." [other act │ │ │ +00002f20: 696f 6e2d 6174 2069 7465 6d2d 6174 2061 ion-at item-at a │ │ │ +00002f30: 6374 696f 6e20 626f 6c20 6974 656d 2030 ction bol item 0 │ │ │ +00002f40: 2067 6574 2d74 6578 742d 7072 6f70 6572 get-text-proper │ │ │ +00002f50: 7479 2070 7265 7669 6f75 732d 7369 6e67 ty previous-sing │ │ │ +00002f60: 6c65 2d70 726f 7065 7274 792d 6368 616e le-property-chan │ │ │ +00002f70: 6765 206e 6578 742d 7369 6e67 6c65 2d70 ge next-single-p │ │ │ +00002f80: 726f 7065 7274 792d 6368 616e 6765 2065 roperty-change e │ │ │ +00002f90: 7272 6f72 2022 5468 6572 6520 6973 206e rror "There is n │ │ │ +00002fa0: 6f74 6869 6e67 2074 6f20 666f 6c6c 6f77 othing to follow │ │ │ +00002fb0: 2068 6572 6522 2022 5468 6572 6520 6973 here" "There is │ │ │ +00002fc0: 206e 6f74 6869 6e67 2074 6f20 666f 6c6c nothing to foll │ │ │ +00002fd0: 6f77 2069 6e20 6025 7327 225d 2034 206e ow in `%s'"] 4 n │ │ │ +00002fe0: 696c 206e 696c 5d29 0a23 4034 3520 4469 il nil]).#@45 Di │ │ │ +00002ff0: 7370 6c61 7920 6120 7072 6574 7479 206c splay a pretty l │ │ │ +00003000: 6973 7469 6e67 206f 6620 5359 4d42 4f4c isting of SYMBOL │ │ │ +00003010: 2773 2070 6c69 7374 2e1f 0a28 6465 6661 's plist...(defa │ │ │ +00003020: 6c69 6173 2027 6170 726f 706f 732d 6465 lias 'apropos-de │ │ │ +00003030: 7363 7269 6265 2d70 6c69 7374 2023 5b28 scribe-plist #[( │ │ │ +00003040: 7379 6d62 6f6c 2920 22c2 19c3 c4c5 0821 symbol) "......! │ │ │ +00003050: 5c22 2987 2220 5b73 796d 626f 6c20 6865 \")." [symbol he │ │ │ +00003060: 6c70 2d62 7566 6665 722d 7072 6566 6978 lp-buffer-prefix │ │ │ +00003070: 2d73 7472 696e 6720 2241 7072 6f70 6f73 -string "Apropos │ │ │ +00003080: 2d70 6c69 7374 2220 7769 7468 2d64 6973 -plist" with-dis │ │ │ +00003090: 706c 6179 696e 672d 6865 6c70 2d62 7566 playing-help-buf │ │ │ +000030a0: 6665 7220 235b 6e69 6c20 22c3 c421 88c5 fer #[nil "..!.. │ │ │ +000030b0: c621 88c7 5c6e 2188 c5c8 2188 7208 7188 .!..\n!...!.r.q. │ │ │ +000030c0: 09ab 89c9 ca60 cb5a cc09 2488 29c5 cd5c .....`.Z..$.)..\ │ │ │ +000030d0: 6ece 5c22 2188 c5cf 2188 d020 88d1 2087 n.\"!...!.. .. . │ │ │ +000030e0: 2220 5b73 7461 6e64 6172 642d 6f75 7470 " [standard-outp │ │ │ +000030f0: 7574 2061 7072 6f70 6f73 2d73 796d 626f ut apropos-symbo │ │ │ +00003100: 6c2d 6661 6365 2073 796d 626f 6c20 7275 l-face symbol ru │ │ │ +00003110: 6e2d 686f 6f6b 7320 6170 726f 706f 732d n-hooks apropos- │ │ │ +00003120: 6d6f 6465 2d68 6f6f 6b20 7072 696e 6320 mode-hook princ │ │ │ +00003130: 2253 796d 626f 6c20 2220 7072 696e 3120 "Symbol " prin1 │ │ │ +00003140: 2227 7320 706c 6973 7420 6973 5c6e 2028 "'s plist is\n ( │ │ │ +00003150: 2220 7075 742d 7465 7874 2d70 726f 7065 " put-text-prope │ │ │ +00003160: 7274 7920 3820 3134 2066 6163 6520 6170 rty 8 14 face ap │ │ │ +00003170: 726f 706f 732d 666f 726d 6174 2d70 6c69 ropos-format-pli │ │ │ +00003180: 7374 2022 5c6e 2020 2220 2229 2220 7465 st "\n " ")" te │ │ │ +00003190: 7270 7269 2070 7269 6e74 2d68 656c 702d rpri print-help- │ │ │ +000031a0: 7265 7475 726e 2d6d 6573 7361 6765 5d20 return-message] │ │ │ +000031b0: 355d 2073 796d 626f 6c2d 6e61 6d65 5d20 5] symbol-name] │ │ │ +000031c0: 3420 2823 2420 2e20 3132 3237 3029 5d29 4 (#$ . 12270)]) │ │ │ +000031d0: 0a28 7072 6f76 6964 6520 2761 7072 6f70 .(provide 'aprop │ │ │ +000031e0: 6f73 290a os). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/auto-autoloads.elc │ │ │ @@ -1,6320 +1,6320 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 373a 3434 2032 eb 25 01:57:44 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f61 1-21.4.24/lisp/a │ │ │ -00000090: 7574 6f2d 6175 746f 6c6f 6164 732e 656c uto-autoloads.el │ │ │ -000000a0: 0a3b 3b3b 2065 6d61 6373 2076 6572 7369 .;;; emacs versi │ │ │ -000000b0: 6f6e 2032 312e 3420 2870 6174 6368 2032 on 21.4 (patch 2 │ │ │ -000000c0: 3429 2022 5374 616e 6461 7264 2043 2220 4) "Standard C" │ │ │ -000000d0: 5845 6d61 6373 204c 7563 6964 2e0a 3b3b XEmacs Lucid..;; │ │ │ -000000e0: 3b20 6279 7465 636f 6d70 2076 6572 7369 ; bytecomp versi │ │ │ -000000f0: 6f6e 2032 2e32 3720 5845 6d61 6373 3b20 on 2.27 XEmacs; │ │ │ -00000100: 3230 3030 2d30 392d 3132 2e0a 3b3b 3b20 2000-09-12..;;; │ │ │ -00000110: 6f70 7469 6d69 7a61 7469 6f6e 2069 7320 optimization is │ │ │ -00000120: 6f6e 2e0a 3b3b 3b20 7468 6973 2066 696c on..;;; this fil │ │ │ -00000130: 6520 7573 6573 206f 7063 6f64 6573 2077 e uses opcodes w │ │ │ -00000140: 6869 6368 2064 6f20 6e6f 7420 6578 6973 hich do not exis │ │ │ -00000150: 7420 696e 2045 6d61 6373 2031 392e 0a0a t in Emacs 19... │ │ │ -00000160: 2869 6620 2861 6e64 2028 626f 756e 6470 (if (and (boundp │ │ │ -00000170: 2027 656d 6163 732d 7665 7273 696f 6e29 'emacs-version) │ │ │ -00000180: 0a09 2028 6f72 2028 616e 6420 2862 6f75 .. (or (and (bou │ │ │ -00000190: 6e64 7020 2765 706f 6368 3a3a 7665 7273 ndp 'epoch::vers │ │ │ -000001a0: 696f 6e29 2065 706f 6368 3a3a 7665 7273 ion) epoch::vers │ │ │ -000001b0: 696f 6e29 0a09 2020 2020 2028 7374 7269 ion).. (stri │ │ │ -000001c0: 6e67 2d6c 6573 7370 2065 6d61 6373 2d76 ng-lessp emacs-v │ │ │ -000001d0: 6572 7369 6f6e 2022 3230 2229 2929 0a20 ersion "20"))). │ │ │ -000001e0: 2020 2028 6572 726f 7220 2260 6175 746f (error "`auto │ │ │ -000001f0: 2d61 7574 6f6c 6f61 6473 2e65 6c27 2077 -autoloads.el' w │ │ │ -00000200: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ -00000210: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ -00000220: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ -00000230: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ -00000240: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ -00000250: 6c69 7374 206e 696c 2929 0a0a 0a28 6279 list nil))...(by │ │ │ -00000260: 7465 2d63 6f64 6520 22c0 c121 ab84 c2c3 te-code "..!.... │ │ │ -00000270: 2188 c087 2220 5b66 6561 7475 7265 7020 !..." [featurep │ │ │ -00000280: 6c69 7370 2d61 7574 6f6c 6f61 6473 2065 lisp-autoloads e │ │ │ -00000290: 7272 6f72 2022 416c 7265 6164 7920 6c6f rror "Already lo │ │ │ -000002a0: 6164 6564 225d 2032 290a 2340 3433 2044 aded"] 2).#@43 D │ │ │ -000002b0: 6573 6372 6962 6520 7468 6520 5472 7565 escribe the True │ │ │ -000002c0: 2045 6469 746f 7220 616e 6420 6974 7320 Editor and its │ │ │ -000002d0: 6d69 6e69 6f6e 732e 1f0a 2861 7574 6f6c minions...(autol │ │ │ -000002e0: 6f61 6420 2761 626f 7574 2d78 656d 6163 oad 'about-xemac │ │ │ -000002f0: 7320 2261 626f 7574 2220 2728 2324 202e s "about" '(#$ . │ │ │ -00000300: 2036 3837 2920 7420 6e69 6c29 0a23 4038 687) t nil).#@8 │ │ │ -00000310: 3320 5365 6172 6368 2056 414c 4953 5420 3 Search VALIST │ │ │ -00000320: 666f 7220 6120 7665 6374 6f72 2077 686f for a vector who │ │ │ -00000330: 7365 2066 6972 7374 2065 6c65 6d65 6e74 se first element │ │ │ -00000340: 2069 7320 6571 7561 6c20 746f 204b 4559 is equal to KEY │ │ │ -00000350: 2e0a 5365 6520 616c 736f 2060 6173 736f ..See also `asso │ │ │ -00000360: 6327 2e1f 0a28 6175 746f 6c6f 6164 2027 c'...(autoload ' │ │ │ -00000370: 7661 7373 6f63 2022 616c 6973 7422 2027 vassoc "alist" ' │ │ │ -00000380: 2823 2420 2e20 3738 3629 206e 696c 206e (#$ . 786) nil n │ │ │ -00000390: 696c 290a 2340 3235 3120 4d6f 6469 6679 il).#@251 Modify │ │ │ -000003a0: 2041 4c49 5354 2074 6f20 7365 7420 5641 ALIST to set VA │ │ │ -000003b0: 4c55 4520 746f 2049 5445 4d2e 0a49 6620 LUE to ITEM..If │ │ │ -000003c0: 7468 6572 6520 6973 2061 2070 6169 7220 there is a pair │ │ │ -000003d0: 7768 6f73 6520 6361 7220 6973 2049 5445 whose car is ITE │ │ │ -000003e0: 4d2c 2072 6570 6c61 6365 2069 7473 2063 M, replace its c │ │ │ -000003f0: 6472 2062 7920 5641 4c55 452e 0a49 6620 dr by VALUE..If │ │ │ -00000400: 7468 6572 6520 6973 206e 6f74 2073 7563 there is not suc │ │ │ -00000410: 6820 7061 6972 2c20 6372 6561 7465 206e h pair, create n │ │ │ -00000420: 6577 2070 6169 7220 2849 5445 4d20 2e20 ew pair (ITEM . │ │ │ -00000430: 5641 4c55 4529 2061 6e64 0a72 6574 7572 VALUE) and.retur │ │ │ -00000440: 6e20 6e65 7720 616c 6973 7420 7768 6f73 n new alist whos │ │ │ -00000450: 6520 6361 7220 6973 2074 6865 206e 6577 e car is the new │ │ │ -00000460: 2070 6169 7220 616e 6420 6364 7220 6973 pair and cdr is │ │ │ -00000470: 2041 4c49 5354 2e0a 5b74 6f6d 6f27 7320 ALIST..[tomo's │ │ │ -00000480: 454c 4953 206c 696b 6520 6675 6e63 7469 ELIS like functi │ │ │ -00000490: 6f6e 5d1f 0a28 6175 746f 6c6f 6164 2027 on]..(autoload ' │ │ │ -000004a0: 7075 742d 616c 6973 7420 2261 6c69 7374 put-alist "alist │ │ │ -000004b0: 2220 2728 2324 202e 2039 3232 2920 6e69 " '(#$ . 922) ni │ │ │ -000004c0: 6c20 6e69 6c29 0a23 4039 3420 4966 2074 l nil).#@94 If t │ │ │ -000004d0: 6865 7265 2069 7320 6120 7061 6972 2077 here is a pair w │ │ │ -000004e0: 686f 7365 206b 6579 2069 7320 4954 454d hose key is ITEM │ │ │ -000004f0: 2c20 6465 6c65 7465 2069 7420 6672 6f6d , delete it from │ │ │ -00000500: 2041 4c49 5354 2e0a 5b74 6f6d 6f27 7320 ALIST..[tomo's │ │ │ -00000510: 454c 4953 2065 6d75 6c61 7469 6e67 2066 ELIS emulating f │ │ │ -00000520: 756e 6374 696f 6e5d 1f0a 2861 7574 6f6c unction]..(autol │ │ │ -00000530: 6f61 6420 2764 656c 2d61 6c69 7374 2022 oad 'del-alist " │ │ │ -00000540: 616c 6973 7422 2027 2823 2420 2e20 3132 alist" '(#$ . 12 │ │ │ -00000550: 3238 2920 6e69 6c20 6e69 6c29 0a23 4035 28) nil nil).#@5 │ │ │ -00000560: 3820 4d6f 6469 6679 2061 2061 6c69 7374 8 Modify a alist │ │ │ -00000570: 2069 6e64 6963 6174 6564 2062 7920 5359 indicated by SY │ │ │ -00000580: 4d42 4f4c 2074 6f20 7365 7420 5641 4c55 MBOL to set VALU │ │ │ -00000590: 4520 746f 2049 5445 4d2e 1f0a 2861 7574 E to ITEM...(aut │ │ │ -000005a0: 6f6c 6f61 6420 2773 6574 2d61 6c69 7374 oload 'set-alist │ │ │ -000005b0: 2022 616c 6973 7422 2027 2823 2420 2e20 "alist" '(#$ . │ │ │ -000005c0: 3133 3738 2920 6e69 6c20 6e69 6c29 0a23 1378) nil nil).# │ │ │ -000005d0: 4034 3920 5265 6d6f 7665 2049 5445 4d20 @49 Remove ITEM │ │ │ -000005e0: 6672 6f6d 2074 6865 2061 6c69 7374 2069 from the alist i │ │ │ -000005f0: 6e64 6963 6174 6564 2062 7920 5359 4d42 ndicated by SYMB │ │ │ -00000600: 4f4c 2e1f 0a28 6175 746f 6c6f 6164 2027 OL...(autoload ' │ │ │ -00000610: 7265 6d6f 7665 2d61 6c69 7374 2022 616c remove-alist "al │ │ │ -00000620: 6973 7422 2027 2823 2420 2e20 3134 3932 ist" '(#$ . 1492 │ │ │ -00000630: 2920 6e69 6c20 6e69 6c29 0a23 4034 3320 ) nil nil).#@43 │ │ │ -00000640: 4d6f 6469 6679 2061 6c69 7374 2044 4546 Modify alist DEF │ │ │ -00000650: 4155 4c54 2069 6e74 6f20 616c 6973 7420 AULT into alist │ │ │ -00000660: 4d4f 4449 4649 4552 2e1f 0a28 6175 746f MODIFIER...(auto │ │ │ -00000670: 6c6f 6164 2027 6d6f 6469 6679 2d61 6c69 load 'modify-ali │ │ │ -00000680: 7374 2022 616c 6973 7422 2027 2823 2420 st "alist" '(#$ │ │ │ -00000690: 2e20 3136 3030 2920 6e69 6c20 6e69 6c29 . 1600) nil nil) │ │ │ -000006a0: 0a23 4031 3330 204d 6f64 6966 7920 6120 .#@130 Modify a │ │ │ -000006b0: 7661 6c75 6520 6f66 2061 2073 796d 626f value of a symbo │ │ │ -000006c0: 6c20 5359 4d20 696e 746f 2061 6c69 7374 l SYM into alist │ │ │ -000006d0: 204d 4f44 4946 4945 522e 0a54 6865 2073 MODIFIER..The s │ │ │ -000006e0: 796d 626f 6c20 5359 4d20 7368 6f75 6c64 ymbol SYM should │ │ │ -000006f0: 2062 6520 616c 6973 742e 2049 6620 6974 be alist. If it │ │ │ -00000700: 2069 7320 6e6f 7420 626f 756e 642c 0a69 is not bound,.i │ │ │ -00000710: 7473 2076 616c 7565 2072 6567 6172 6420 ts value regard │ │ │ -00000720: 6173 206e 696c 2e1f 0a28 6175 746f 6c6f as nil...(autolo │ │ │ -00000730: 6164 2027 7365 742d 6d6f 6469 6669 6564 ad 'set-modified │ │ │ -00000740: 2d61 6c69 7374 2022 616c 6973 7422 2027 -alist "alist" ' │ │ │ -00000750: 2823 2420 2e20 3137 3033 2920 6e69 6c20 (#$ . 1703) nil │ │ │ -00000760: 6e69 6c29 0a28 6673 6574 2027 636f 6d6d nil).(fset 'comm │ │ │ -00000770: 616e 642d 6170 726f 706f 7320 2761 7072 and-apropos 'apr │ │ │ -00000780: 6f70 6f73 2d63 6f6d 6d61 6e64 290a 2340 opos-command).#@ │ │ │ -00000790: 3135 3120 5368 6f77 7320 636f 6d6d 616e 151 Shows comman │ │ │ -000007a0: 6473 2028 696e 7465 7261 6374 6976 656c ds (interactivel │ │ │ -000007b0: 7920 6361 6c6c 6162 6c65 2066 756e 6374 y callable funct │ │ │ -000007c0: 696f 6e73 2920 7468 6174 206d 6174 6368 ions) that match │ │ │ -000007d0: 2052 4547 4558 502e 0a57 6974 6820 6f70 REGEXP..With op │ │ │ -000007e0: 7469 6f6e 616c 2070 7265 6669 7820 4152 tional prefix AR │ │ │ -000007f0: 4720 6f72 2069 6620 6061 7072 6f70 6f73 G or if `apropos │ │ │ -00000800: 2d64 6f2d 616c 6c27 2069 7320 6e6f 6e2d -do-all' is non- │ │ │ -00000810: 6e69 6c2c 2061 6c73 6f20 7368 6f77 0a76 nil, also show.v │ │ │ -00000820: 6172 6961 626c 6573 2e1f 0a28 6175 746f ariables...(auto │ │ │ -00000830: 6c6f 6164 2027 6170 726f 706f 732d 636f load 'apropos-co │ │ │ -00000840: 6d6d 616e 6420 2261 7072 6f70 6f73 2220 mmand "apropos" │ │ │ -00000850: 2728 2324 202e 2031 3934 3029 2074 206e '(#$ . 1940) t n │ │ │ -00000860: 696c 290a 2340 3234 3220 5368 6f77 2061 il).#@242 Show a │ │ │ -00000870: 6c6c 2062 6f75 6e64 2073 796d 626f 6c73 ll bound symbols │ │ │ -00000880: 2077 686f 7365 206e 616d 6573 206d 6174 whose names mat │ │ │ -00000890: 6368 2052 4547 4558 502e 0a57 6974 6820 ch REGEXP..With │ │ │ -000008a0: 6f70 7469 6f6e 616c 2070 7265 6669 7820 optional prefix │ │ │ -000008b0: 4152 4720 6f72 2069 6620 6061 7072 6f70 ARG or if `aprop │ │ │ -000008c0: 6f73 2d64 6f2d 616c 6c27 2069 7320 6e6f os-do-all' is no │ │ │ -000008d0: 6e2d 6e69 6c2c 2061 6c73 6f20 7368 6f77 n-nil, also show │ │ │ -000008e0: 2075 6e62 6f75 6e64 0a73 796d 626f 6c73 unbound.symbols │ │ │ -000008f0: 2061 6e64 206b 6579 2062 696e 6469 6e67 and key binding │ │ │ -00000900: 732c 2077 6869 6368 2069 7320 6120 6c69 s, which is a li │ │ │ -00000910: 7474 6c65 206d 6f72 6520 7469 6d65 2d63 ttle more time-c │ │ │ -00000920: 6f6e 7375 6d69 6e67 2e0a 5265 7475 726e onsuming..Return │ │ │ -00000930: 7320 6c69 7374 206f 6620 7379 6d62 6f6c s list of symbol │ │ │ -00000940: 7320 616e 6420 646f 6375 6d65 6e74 6174 s and documentat │ │ │ -00000950: 696f 6e20 666f 756e 642e 1f0a 2861 7574 ion found...(aut │ │ │ -00000960: 6f6c 6f61 6420 2761 7072 6f70 6f73 2022 oload 'apropos " │ │ │ -00000970: 6170 726f 706f 7322 2027 2823 2420 2e20 apropos" '(#$ . │ │ │ -00000980: 3231 3534 2920 7420 6e69 6c29 0a23 4032 2154) t nil).#@2 │ │ │ -00000990: 3334 2053 686f 7720 616c 6c20 7379 6d62 34 Show all symb │ │ │ -000009a0: 6f6c 7320 7768 6f73 6520 7661 6c75 6527 ols whose value' │ │ │ -000009b0: 7320 7072 696e 7465 6420 696d 6167 6520 s printed image │ │ │ -000009c0: 6d61 7463 6865 7320 5245 4745 5850 2e0a matches REGEXP.. │ │ │ -000009d0: 5769 7468 206f 7074 696f 6e61 6c20 7072 With optional pr │ │ │ -000009e0: 6566 6978 2041 5247 206f 7220 6966 2060 efix ARG or if ` │ │ │ -000009f0: 6170 726f 706f 732d 646f 2d61 6c6c 2720 apropos-do-all' │ │ │ -00000a00: 6973 206e 6f6e 2d6e 696c 2c20 616c 736f is non-nil, also │ │ │ -00000a10: 206c 6f6f 6b73 0a61 7420 7468 6520 6675 looks.at the fu │ │ │ -00000a20: 6e63 7469 6f6e 2061 6e64 2061 7420 7468 nction and at th │ │ │ -00000a30: 6520 6e61 6d65 7320 616e 6420 7661 6c75 e names and valu │ │ │ -00000a40: 6573 206f 6620 7072 6f70 6572 7469 6573 es of properties │ │ │ -00000a50: 2e0a 5265 7475 726e 7320 6c69 7374 206f ..Returns list o │ │ │ -00000a60: 6620 7379 6d62 6f6c 7320 616e 6420 7661 f symbols and va │ │ │ -00000a70: 6c75 6573 2066 6f75 6e64 2e1f 0a28 6175 lues found...(au │ │ │ -00000a80: 746f 6c6f 6164 2027 6170 726f 706f 732d toload 'apropos- │ │ │ -00000a90: 7661 6c75 6520 2261 7072 6f70 6f73 2220 value "apropos" │ │ │ -00000aa0: 2728 2324 202e 2032 3435 3129 2074 206e '(#$ . 2451) t n │ │ │ -00000ab0: 696c 290a 2340 3236 3220 5368 6f77 2073 il).#@262 Show s │ │ │ -00000ac0: 796d 626f 6c73 2077 686f 7365 2064 6f63 ymbols whose doc │ │ │ -00000ad0: 756d 656e 7461 7469 6f6e 2063 6f6e 7461 umentation conta │ │ │ -00000ae0: 696e 206d 6174 6368 6573 2066 6f72 2052 in matches for R │ │ │ -00000af0: 4547 4558 502e 0a57 6974 6820 6f70 7469 EGEXP..With opti │ │ │ -00000b00: 6f6e 616c 2070 7265 6669 7820 4152 4720 onal prefix ARG │ │ │ -00000b10: 6f72 2069 6620 6061 7072 6f70 6f73 2d64 or if `apropos-d │ │ │ -00000b20: 6f2d 616c 6c27 2069 7320 6e6f 6e2d 6e69 o-all' is non-ni │ │ │ -00000b30: 6c2c 2061 6c73 6f20 7573 650a 646f 6375 l, also use.docu │ │ │ -00000b40: 6d65 6e74 6174 696f 6e20 7468 6174 2069 mentation that i │ │ │ -00000b50: 7320 6e6f 7420 7374 6f72 6564 2069 6e20 s not stored in │ │ │ -00000b60: 7468 6520 646f 6375 6d65 6e74 6174 696f the documentatio │ │ │ -00000b70: 6e20 6669 6c65 2061 6e64 2073 686f 7720 n file and show │ │ │ -00000b80: 6b65 790a 6269 6e64 696e 6773 2e0a 5265 key.bindings..Re │ │ │ -00000b90: 7475 726e 7320 6c69 7374 206f 6620 7379 turns list of sy │ │ │ -00000ba0: 6d62 6f6c 7320 616e 6420 646f 6375 6d65 mbols and docume │ │ │ -00000bb0: 6e74 6174 696f 6e20 666f 756e 642e 1f0a ntation found... │ │ │ -00000bc0: 2861 7574 6f6c 6f61 6420 2761 7072 6f70 (autoload 'aprop │ │ │ -00000bd0: 6f73 2d64 6f63 756d 656e 7461 7469 6f6e os-documentation │ │ │ -00000be0: 2022 6170 726f 706f 7322 2027 2823 2420 "apropos" '(#$ │ │ │ -00000bf0: 2e20 3237 3436 2920 7420 6e69 6c29 0a23 . 2746) t nil).# │ │ │ -00000c00: 4032 3337 2049 6e73 6572 7420 6174 2070 @237 Insert at p │ │ │ -00000c10: 6f69 6e74 2061 206c 6f61 6464 6566 7320 oint a loaddefs │ │ │ -00000c20: 6175 746f 6c6f 6164 2073 6563 7469 6f6e autoload section │ │ │ -00000c30: 2066 6f72 2046 494c 452e 0a61 7574 6f6c for FILE..autol │ │ │ -00000c40: 6f61 6473 2061 7265 2067 656e 6572 6174 oads are generat │ │ │ -00000c50: 6564 2066 6f72 2064 6566 756e 7320 616e ed for defuns an │ │ │ -00000c60: 6420 6465 666d 6163 726f 7320 696e 2046 d defmacros in F │ │ │ -00000c70: 494c 450a 6d61 726b 6564 2062 7920 6067 ILE.marked by `g │ │ │ -00000c80: 656e 6572 6174 652d 6175 746f 6c6f 6164 enerate-autoload │ │ │ -00000c90: 2d63 6f6f 6b69 6527 2028 7768 6963 6820 -cookie' (which │ │ │ -00000ca0: 7365 6529 2e0a 4966 2046 494c 4520 6973 see)..If FILE is │ │ │ -00000cb0: 2062 6569 6e67 2076 6973 6974 6564 2069 being visited i │ │ │ -00000cc0: 6e20 6120 6275 6666 6572 2c20 7468 6520 n a buffer, the │ │ │ -00000cd0: 636f 6e74 656e 7473 206f 6620 7468 6520 contents of the │ │ │ -00000ce0: 6275 6666 6572 0a61 7265 2075 7365 642e buffer.are used. │ │ │ -00000cf0: 1f0a 2861 7574 6f6c 6f61 6420 2767 656e ..(autoload 'gen │ │ │ -00000d00: 6572 6174 652d 6669 6c65 2d61 7574 6f6c erate-file-autol │ │ │ -00000d10: 6f61 6473 2022 6175 746f 6c6f 6164 2220 oads "autoload" │ │ │ -00000d20: 2728 2324 202e 2033 3037 3729 2074 206e '(#$ . 3077) t n │ │ │ -00000d30: 696c 290a 2340 3135 3720 5570 6461 7465 il).#@157 Update │ │ │ -00000d40: 2074 6865 2061 7574 6f6c 6f61 6473 2066 the autoloads f │ │ │ -00000d50: 6f72 2046 494c 4520 696e 2060 6765 6e65 or FILE in `gene │ │ │ -00000d60: 7261 7465 642d 6175 746f 6c6f 6164 2d66 rated-autoload-f │ │ │ -00000d70: 696c 6527 0a28 7768 6963 6820 4649 4c45 ile'.(which FILE │ │ │ -00000d80: 206d 6967 6874 2062 696e 6420 696e 2069 might bind in i │ │ │ -00000d90: 7473 206c 6f63 616c 2076 6172 6961 626c ts local variabl │ │ │ -00000da0: 6573 292e 0a54 6869 7320 6675 6e63 7469 es)..This functi │ │ │ -00000db0: 6f6e 2072 6566 7573 6573 2074 6f20 7570 on refuses to up │ │ │ -00000dc0: 6461 7465 2061 7574 6f6c 6f61 6473 2066 date autoloads f │ │ │ -00000dd0: 696c 6573 2e1f 0a28 6175 746f 6c6f 6164 iles...(autoload │ │ │ -00000de0: 2027 7570 6461 7465 2d66 696c 652d 6175 'update-file-au │ │ │ -00000df0: 746f 6c6f 6164 7320 2261 7574 6f6c 6f61 toloads "autoloa │ │ │ -00000e00: 6422 2027 2823 2420 2e20 3333 3836 2920 d" '(#$ . 3386) │ │ │ -00000e10: 7420 6e69 6c29 0a23 4037 3720 5570 6461 t nil).#@77 Upda │ │ │ -00000e20: 7465 2073 6563 7469 6f6e 7320 6f66 2074 te sections of t │ │ │ -00000e30: 6865 2063 7572 7265 6e74 2062 7566 6665 he current buffe │ │ │ -00000e40: 7220 6765 6e65 7261 7465 6420 6279 2060 r generated by ` │ │ │ -00000e50: 7570 6461 7465 2d66 696c 652d 6175 746f update-file-auto │ │ │ -00000e60: 6c6f 6164 7327 2e1f 0a28 6175 746f 6c6f loads'...(autolo │ │ │ -00000e70: 6164 2027 7570 6461 7465 2d61 7574 6f6c ad 'update-autol │ │ │ -00000e80: 6f61 6473 2d68 6572 6520 2261 7574 6f6c oads-here "autol │ │ │ -00000e90: 6f61 6422 2027 2823 2420 2e20 3336 3132 oad" '(#$ . 3612 │ │ │ -00000ea0: 2920 7420 6e69 6c29 0a23 4033 3239 2055 ) t nil).#@329 U │ │ │ -00000eb0: 7064 6174 6520 6067 656e 6572 6174 6564 pdate `generated │ │ │ -00000ec0: 2d61 7574 6f6c 6f61 642d 6669 6c65 2720 -autoload-file' │ │ │ -00000ed0: 7769 7468 2061 6c6c 2074 6865 2063 7572 with all the cur │ │ │ -00000ee0: 7265 6e74 2061 7574 6f6c 6f61 6473 2066 rent autoloads f │ │ │ -00000ef0: 726f 6d20 4449 522e 0a54 6869 7320 7275 rom DIR..This ru │ │ │ -00000f00: 6e73 2060 7570 6461 7465 2d66 696c 652d ns `update-file- │ │ │ -00000f10: 6175 746f 6c6f 6164 7327 206f 6e20 6561 autoloads' on ea │ │ │ -00000f20: 6368 202e 656c 2066 696c 6520 696e 2044 ch .el file in D │ │ │ -00000f30: 4952 2e0a 4f62 736f 6c65 7465 2061 7574 IR..Obsolete aut │ │ │ -00000f40: 6f6c 6f61 6420 656e 7472 6965 7320 666f oload entries fo │ │ │ -00000f50: 7220 6669 6c65 7320 7468 6174 206e 6f20 r files that no │ │ │ -00000f60: 6c6f 6e67 6572 2065 7869 7374 2061 7265 longer exist are │ │ │ -00000f70: 2064 656c 6574 6564 2e0a 4e6f 7465 2074 deleted..Note t │ │ │ -00000f80: 6861 742c 2069 6620 7468 6973 2066 756e hat, if this fun │ │ │ -00000f90: 6374 696f 6e20 6973 2063 616c 6c65 6420 ction is called │ │ │ -00000fa0: 6672 6f6d 2060 6261 7463 682d 7570 6461 from `batch-upda │ │ │ -00000fb0: 7465 2d64 6972 6563 746f 7279 272c 0a60 te-directory',.` │ │ │ -00000fc0: 6765 6e65 7261 7465 642d 6175 746f 6c6f generated-autolo │ │ │ -00000fd0: 6164 2d66 696c 6527 2077 6173 2072 6562 ad-file' was reb │ │ │ -00000fe0: 6f75 6e64 2069 6e20 7468 6174 2066 756e ound in that fun │ │ │ -00000ff0: 6374 696f 6e2e 1f0a 2861 7574 6f6c 6f61 ction...(autoloa │ │ │ -00001000: 6420 2775 7064 6174 652d 6175 746f 6c6f d 'update-autolo │ │ │ -00001010: 6164 732d 6672 6f6d 2d64 6972 6563 746f ads-from-directo │ │ │ -00001020: 7279 2022 6175 746f 6c6f 6164 2220 2728 ry "autoload" '( │ │ │ -00001030: 2324 202e 2033 3735 3929 2074 206e 696c #$ . 3759) t nil │ │ │ -00001040: 290a 2340 3435 3520 5570 6461 7465 2074 ).#@455 Update t │ │ │ -00001050: 6865 2061 7574 6f6c 6f61 6473 2066 6f72 he autoloads for │ │ │ -00001060: 2074 6865 2066 696c 6573 206f 7220 6469 the files or di │ │ │ -00001070: 7265 6374 6f72 6965 7320 6f6e 2074 6865 rectories on the │ │ │ -00001080: 2063 6f6d 6d61 6e64 206c 696e 652e 0a52 command line..R │ │ │ -00001090: 756e 7320 6075 7064 6174 652d 6669 6c65 uns `update-file │ │ │ -000010a0: 2d61 7574 6f6c 6f61 6473 2720 6f6e 2066 -autoloads' on f │ │ │ -000010b0: 696c 6573 2061 6e64 2060 7570 6461 7465 iles and `update │ │ │ -000010c0: 2d64 6972 6563 746f 7279 2d61 7574 6f6c -directory-autol │ │ │ -000010d0: 6f61 6473 270a 6f6e 2064 6972 6563 746f oads'.on directo │ │ │ -000010e0: 7269 6573 2e20 204d 7573 7420 6265 2075 ries. Must be u │ │ │ -000010f0: 7365 6420 6f6e 6c79 2077 6974 6820 2d62 sed only with -b │ │ │ -00001100: 6174 6368 2c20 616e 6420 6b69 6c6c 7320 atch, and kills │ │ │ -00001110: 456d 6163 7320 6f6e 2063 6f6d 706c 6574 Emacs on complet │ │ │ -00001120: 696f 6e2e 0a45 6163 6820 6669 6c65 2077 ion..Each file w │ │ │ -00001130: 696c 6c20 6265 2070 726f 6365 7373 6564 ill be processed │ │ │ -00001140: 2065 7665 6e20 6966 2061 6e20 6572 726f even if an erro │ │ │ -00001150: 7220 6f63 6375 7272 6564 2070 7265 7669 r occurred previ │ │ │ -00001160: 6f75 736c 792e 0a46 6f72 2065 7861 6d70 ously..For examp │ │ │ -00001170: 6c65 2c20 696e 766f 6b65 2060 7865 6d61 le, invoke `xema │ │ │ -00001180: 6373 202d 6261 7463 6820 2d66 2062 6174 cs -batch -f bat │ │ │ -00001190: 6368 2d75 7064 6174 652d 6175 746f 6c6f ch-update-autolo │ │ │ -000011a0: 6164 7320 2a2e 656c 272e 0a54 6865 2064 ads *.el'..The d │ │ │ -000011b0: 6972 6563 746f 7279 2074 6f20 7768 6963 irectory to whic │ │ │ -000011c0: 6820 7468 6520 6175 746f 2d61 7574 6f6c h the auto-autol │ │ │ -000011d0: 6f61 6473 2e65 6c20 6669 6c65 206d 7573 oads.el file mus │ │ │ -000011e0: 7420 6265 2074 6865 2066 6972 7374 2070 t be the first p │ │ │ -000011f0: 6172 616d 6574 6572 0a6f 6e20 7468 6520 arameter.on the │ │ │ -00001200: 636f 6d6d 616e 6420 6c69 6e65 2e1f 0a28 command line...( │ │ │ -00001210: 6175 746f 6c6f 6164 2027 6261 7463 682d autoload 'batch- │ │ │ -00001220: 7570 6461 7465 2d61 7574 6f6c 6f61 6473 update-autoloads │ │ │ -00001230: 2022 6175 746f 6c6f 6164 2220 2728 2324 "autoload" '(#$ │ │ │ -00001240: 202e 2034 3136 3829 206e 696c 206e 696c . 4168) nil nil │ │ │ -00001250: 290a 2340 3136 3420 5570 6461 7465 2074 ).#@164 Update t │ │ │ -00001260: 6865 2061 7574 6f6c 6f61 6473 2066 6f72 he autoloads for │ │ │ -00001270: 2074 6865 2064 6972 6563 746f 7269 6573 the directories │ │ │ -00001280: 206f 6e20 7468 6520 636f 6d6d 616e 6420 on the command │ │ │ -00001290: 6c69 6e65 2e0a 5275 6e73 2060 7570 6461 line..Runs `upda │ │ │ -000012a0: 7465 2d66 696c 652d 6175 746f 6c6f 6164 te-file-autoload │ │ │ -000012b0: 7327 206f 6e20 6561 6368 2066 696c 6520 s' on each file │ │ │ -000012c0: 696e 2074 6865 2067 6976 656e 2064 6972 in the given dir │ │ │ -000012d0: 6563 746f 7279 2c20 616e 6420 6d75 7374 ectory, and must │ │ │ -000012e0: 0a62 6520 7573 6564 206f 6e6c 7920 7769 .be used only wi │ │ │ -000012f0: 7468 202d 6261 7463 682e 1f0a 2861 7574 th -batch...(aut │ │ │ -00001300: 6f6c 6f61 6420 2762 6174 6368 2d75 7064 oload 'batch-upd │ │ │ -00001310: 6174 652d 6469 7265 6374 6f72 7920 2261 ate-directory "a │ │ │ -00001320: 7574 6f6c 6f61 6422 2027 2823 2420 2e20 utoload" '(#$ . │ │ │ -00001330: 3436 3936 2920 6e69 6c20 6e69 6c29 0a23 4696) nil nil).# │ │ │ -00001340: 4031 3637 2055 7064 6174 6520 7468 6520 @167 Update the │ │ │ -00001350: 6175 746f 6c6f 6164 7320 666f 7220 6120 autoloads for a │ │ │ -00001360: 7369 6e67 6c65 2064 6972 6563 746f 7279 single directory │ │ │ -00001370: 206f 6e20 7468 6520 636f 6d6d 616e 6420 on the command │ │ │ -00001380: 6c69 6e65 2e0a 5275 6e73 2060 7570 6461 line..Runs `upda │ │ │ -00001390: 7465 2d66 696c 652d 6175 746f 6c6f 6164 te-file-autoload │ │ │ -000013a0: 7327 206f 6e20 6561 6368 2066 696c 6520 s' on each file │ │ │ -000013b0: 696e 2074 6865 2067 6976 656e 2064 6972 in the given dir │ │ │ -000013c0: 6563 746f 7279 2c20 616e 6420 6d75 7374 ectory, and must │ │ │ -000013d0: 0a62 6520 7573 6564 206f 6e6c 7920 7769 .be used only wi │ │ │ -000013e0: 7468 202d 6261 7463 682e 1f0a 2861 7574 th -batch...(aut │ │ │ -000013f0: 6f6c 6f61 6420 2762 6174 6368 2d75 7064 oload 'batch-upd │ │ │ -00001400: 6174 652d 6f6e 652d 6469 7265 6374 6f72 ate-one-director │ │ │ -00001410: 7920 2261 7574 6f6c 6f61 6422 2027 2823 y "autoload" '(# │ │ │ -00001420: 2420 2e20 3439 3333 2920 6e69 6c20 6e69 $ . 4933) nil ni │ │ │ -00001430: 6c29 0a28 6279 7465 2d63 6f64 6520 22c1 l).(byte-code ". │ │ │ -00001440: 0842 10c2 c121 ac85 c3c1 c45c 2288 c5c1 .B...!.....\"... │ │ │ -00001450: 2187 2220 5b63 7572 7265 6e74 2d6c 6f61 !." [current-loa │ │ │ -00001460: 642d 6c69 7374 206c 6973 742d 6275 6666 d-list list-buff │ │ │ -00001470: 6572 732d 6469 7265 6374 6f72 7920 6465 ers-directory de │ │ │ -00001480: 6661 756c 742d 626f 756e 6470 2073 6574 fault-boundp set │ │ │ -00001490: 2d64 6566 6175 6c74 206e 696c 206d 616b -default nil mak │ │ │ -000014a0: 652d 7661 7269 6162 6c65 2d62 7566 6665 e-variable-buffe │ │ │ -000014b0: 722d 6c6f 6361 6c5d 2033 290a 2340 3739 r-local] 3).#@79 │ │ │ -000014c0: 3420 5265 706f 7274 2062 7569 6c64 2069 4 Report build i │ │ │ -000014d0: 6e66 6f72 6d61 7469 6f6e 2069 6e63 6c75 nformation inclu │ │ │ -000014e0: 6469 6e67 2049 6e73 7461 6c6c 6174 696f ding Installatio │ │ │ -000014f0: 6e20 616e 6420 6d61 6b65 206f 7574 7075 n and make outpu │ │ │ -00001500: 742e 0a0a 5072 6f6d 7074 7320 666f 7220 t...Prompts for │ │ │ -00001510: 7374 6174 7573 2028 7573 7561 6c6c 7920 status (usually │ │ │ -00001520: 2253 7563 6365 7373 2220 6f72 2022 4661 "Success" or "Fa │ │ │ -00001530: 696c 7572 6522 292e 2020 5468 656e 2075 ilure"). Then u │ │ │ -00001540: 7365 730a 6063 6f6d 706f 7365 2d6d 6169 ses.`compose-mai │ │ │ -00001550: 6c27 2074 6f20 6372 6561 7465 2061 206d l' to create a m │ │ │ -00001560: 6169 6c20 6d65 7373 6167 652e 2020 5468 ail message. Th │ │ │ -00001570: 6520 5375 626a 6563 7420 6865 6164 6572 e Subject header │ │ │ -00001580: 2063 6f6e 7461 696e 730a 7374 6174 7573 contains.status │ │ │ -00001590: 2061 6e64 2076 6572 7369 6f6e 2069 6e66 and version inf │ │ │ -000015a0: 6f72 6d61 7469 6f6e 2e20 2050 6f69 6e74 ormation. Point │ │ │ -000015b0: 2069 7320 6c65 6674 2061 7420 7468 6520 is left at the │ │ │ -000015c0: 6265 6769 6e6e 696e 6720 6f66 2074 6865 beginning of the │ │ │ -000015d0: 0a6d 6169 6c20 7465 7874 2e20 2041 6464 .mail text. Add │ │ │ -000015e0: 2073 6f6d 6520 6e6f 7465 7320 6966 2079 some notes if y │ │ │ -000015f0: 6f75 206c 696b 652c 2061 6e64 2073 656e ou like, and sen │ │ │ -00001600: 6420 7468 6520 7265 706f 7274 2e0a 0a4c d the report...L │ │ │ -00001610: 6f6f 6b73 2066 6f72 2049 6e73 7461 6c6c ooks for Install │ │ │ -00001620: 6174 696f 6e20 616e 6420 7468 6520 6d61 ation and the ma │ │ │ -00001630: 6b65 206f 7574 7075 7420 6669 6c65 2028 ke output file ( │ │ │ -00001640: 6062 6574 612e 6572 7227 2062 790a 6465 `beta.err' by.de │ │ │ -00001650: 6661 756c 742c 2063 7573 746f 6d69 7a61 fault, customiza │ │ │ -00001660: 626c 6520 7669 6120 6062 7569 6c64 2d72 ble via `build-r │ │ │ -00001670: 6570 6f72 742d 6d61 6b65 2d6f 7574 7075 eport-make-outpu │ │ │ -00001680: 742d 6669 6c65 7327 2920 696e 2074 6865 t-files') in the │ │ │ -00001690: 0a62 7569 6c64 2064 6972 6563 746f 7279 .build directory │ │ │ -000016a0: 206f 6620 7468 6520 7275 6e6e 696e 6720 of the running │ │ │ -000016b0: 5845 6d61 6373 2062 7920 6465 6661 756c XEmacs by defaul │ │ │ -000016c0: 7420 2863 7573 746f 6d69 7a61 626c 6520 t (customizable │ │ │ -000016d0: 7669 610a 6062 7569 6c64 2d72 6570 6f72 via.`build-repor │ │ │ -000016e0: 742d 6d61 6b65 2d6f 7574 7075 742d 6469 t-make-output-di │ │ │ -000016f0: 7227 292e 2020 5468 6520 6f75 7470 7574 r'). The output │ │ │ -00001700: 2066 726f 6d20 6d61 6b65 2069 7320 6669 from make is fi │ │ │ -00001710: 6c74 6572 6564 0a74 6872 6f75 6768 2060 ltered.through ` │ │ │ -00001720: 6275 696c 642d 7265 706f 7274 2d6b 6565 build-report-kee │ │ │ -00001730: 702d 7265 6765 7870 2720 616e 6420 6062 p-regexp' and `b │ │ │ -00001740: 7569 6c64 2d72 6570 6f72 742d 6465 6c65 uild-report-dele │ │ │ -00001750: 7465 2d72 6567 6578 7027 0a62 6566 6f72 te-regexp'.befor │ │ │ -00001760: 6520 696e 636c 7564 696e 6720 696e 2074 e including in t │ │ │ -00001770: 6865 206d 6573 7361 6765 2e0a 0a53 6565 he message...See │ │ │ -00001780: 2061 6c73 6f20 606d 6169 6c2d 7573 6572 also `mail-user │ │ │ -00001790: 2d61 6765 6e74 272c 2060 6275 696c 642d -agent', `build- │ │ │ -000017a0: 7265 706f 7274 2d64 6573 7469 6e61 7469 report-destinati │ │ │ -000017b0: 6f6e 272c 2061 6e64 0a60 6275 696c 642d on', and.`build- │ │ │ -000017c0: 7265 706f 7274 2d69 6e73 7461 6c6c 6174 report-installat │ │ │ -000017d0: 696f 6e2d 6669 6c65 272e 1f0a 2861 7574 ion-file'...(aut │ │ │ -000017e0: 6f6c 6f61 6420 2762 7569 6c64 2d72 6570 oload 'build-rep │ │ │ -000017f0: 6f72 7420 2262 7569 6c64 2d72 6570 6f72 ort "build-repor │ │ │ -00001800: 7422 2027 2823 2420 2e20 3533 3134 2920 t" '(#$ . 5314) │ │ │ -00001810: 7420 6e69 6c29 0a23 4031 3330 2052 6563 t nil).#@130 Rec │ │ │ -00001820: 6f6d 7069 6c65 2065 7665 7279 2060 2e65 ompile every `.e │ │ │ -00001830: 6c27 2066 696c 6520 696e 2044 4952 4543 l' file in DIREC │ │ │ -00001840: 544f 5259 2074 6861 7420 616c 7265 6164 TORY that alread │ │ │ -00001850: 7920 6861 7320 6120 602e 656c 6327 2066 y has a `.elc' f │ │ │ -00001860: 696c 652e 0a46 696c 6573 2069 6e20 7375 ile..Files in su │ │ │ -00001870: 6264 6972 6563 746f 7269 6573 206f 6620 bdirectories of │ │ │ -00001880: 4449 5245 4354 4f52 5920 6172 6520 7072 DIRECTORY are pr │ │ │ -00001890: 6f63 6573 7365 6420 616c 736f 2e1f 0a28 ocessed also...( │ │ │ -000018a0: 6175 746f 6c6f 6164 2027 6279 7465 2d66 autoload 'byte-f │ │ │ -000018b0: 6f72 6365 2d72 6563 6f6d 7069 6c65 2022 orce-recompile " │ │ │ -000018c0: 6279 7465 636f 6d70 2220 2728 2324 202e bytecomp" '(#$ . │ │ │ -000018d0: 2036 3137 3329 2074 206e 696c 290a 2340 6173) t nil).#@ │ │ │ -000018e0: 3636 3720 5265 636f 6d70 696c 6520 6576 667 Recompile ev │ │ │ -000018f0: 6572 7920 602e 656c 2720 6669 6c65 2069 ery `.el' file i │ │ │ -00001900: 6e20 4449 5245 4354 4f52 5920 7468 6174 n DIRECTORY that │ │ │ -00001910: 206e 6565 6473 2072 6563 6f6d 7069 6c61 needs recompila │ │ │ -00001920: 7469 6f6e 2e0a 5468 6973 2069 7320 6966 tion..This is if │ │ │ -00001930: 2061 2060 2e65 6c63 2720 6669 6c65 2065 a `.elc' file e │ │ │ -00001940: 7869 7374 7320 6275 7420 6973 206f 6c64 xists but is old │ │ │ -00001950: 6572 2074 6861 6e20 7468 6520 602e 656c er than the `.el │ │ │ -00001960: 2720 6669 6c65 2e0a 4669 6c65 7320 696e ' file..Files in │ │ │ -00001970: 2073 7562 6469 7265 6374 6f72 6965 7320 subdirectories │ │ │ -00001980: 6f66 2044 4952 4543 544f 5259 2061 7265 of DIRECTORY are │ │ │ -00001990: 2061 6c73 6f20 7072 6f63 6573 7365 6420 also processed │ │ │ -000019a0: 756e 6c65 7373 0a6f 7074 696f 6e61 6c20 unless.optional │ │ │ -000019b0: 6172 6775 6d65 6e74 204e 4f52 4543 5552 argument NORECUR │ │ │ -000019c0: 5349 4f4e 2069 7320 6e6f 6e2d 6e69 6c2e SION is non-nil. │ │ │ -000019d0: 0a0a 4966 2074 6865 2060 2e65 6c63 2720 ..If the `.elc' │ │ │ -000019e0: 6669 6c65 2064 6f65 7320 6e6f 7420 6578 file does not ex │ │ │ -000019f0: 6973 742c 206e 6f72 6d61 6c6c 7920 7468 ist, normally th │ │ │ -00001a00: 6520 602e 656c 2720 6669 6c65 2069 7320 e `.el' file is │ │ │ -00001a10: 2a6e 6f74 2a20 636f 6d70 696c 6564 2e0a *not* compiled.. │ │ │ -00001a20: 4275 7420 6120 7072 6566 6978 2061 7267 But a prefix arg │ │ │ -00001a30: 756d 656e 7420 286f 7074 696f 6e61 6c20 ument (optional │ │ │ -00001a40: 7365 636f 6e64 2061 7267 2920 6d65 616e second arg) mean │ │ │ -00001a50: 7320 6173 6b20 7573 6572 2c0a 666f 7220 s ask user,.for │ │ │ -00001a60: 6561 6368 2073 7563 6820 602e 656c 2720 each such `.el' │ │ │ -00001a70: 6669 6c65 2c20 7768 6574 6865 7220 746f file, whether to │ │ │ -00001a80: 2063 6f6d 7069 6c65 2069 742e 2020 5072 compile it. Pr │ │ │ -00001a90: 6566 6978 2061 7267 756d 656e 7420 3020 efix argument 0 │ │ │ -00001aa0: 6d65 616e 730a 646f 6e27 7420 6173 6b20 means.don't ask │ │ │ -00001ab0: 616e 6420 636f 6d70 696c 6520 7468 6520 and compile the │ │ │ -00001ac0: 6669 6c65 2061 6e79 7761 792e 0a0a 4120 file anyway...A │ │ │ -00001ad0: 6e6f 6e7a 6572 6f20 7072 6566 6978 2061 nonzero prefix a │ │ │ -00001ae0: 7267 756d 656e 7420 616c 736f 206d 6561 rgument also mea │ │ │ -00001af0: 6e73 2061 736b 2061 626f 7574 2065 6163 ns ask about eac │ │ │ -00001b00: 6820 7375 6264 6972 6563 746f 7279 2e0a h subdirectory.. │ │ │ -00001b10: 0a49 6620 7468 6520 666f 7572 7468 206f .If the fourth o │ │ │ -00001b20: 7074 696f 6e61 6c20 6172 6775 6d65 6e74 ptional argument │ │ │ -00001b30: 2046 4f52 4345 2069 7320 6e6f 6e2d 6e69 FORCE is non-ni │ │ │ -00001b40: 6c2c 0a72 6563 6f6d 7069 6c65 2065 7665 l,.recompile eve │ │ │ -00001b50: 7279 2060 2e65 6c27 2066 696c 6520 7468 ry `.el' file th │ │ │ -00001b60: 6174 2061 6c72 6561 6479 2068 6173 2061 at already has a │ │ │ -00001b70: 2060 2e65 6c63 2720 6669 6c65 2e1f 0a28 `.elc' file...( │ │ │ -00001b80: 6175 746f 6c6f 6164 2027 6279 7465 2d72 autoload 'byte-r │ │ │ -00001b90: 6563 6f6d 7069 6c65 2d64 6972 6563 746f ecompile-directo │ │ │ -00001ba0: 7279 2022 6279 7465 636f 6d70 2220 2728 ry "bytecomp" '( │ │ │ -00001bb0: 2324 202e 2036 3337 3229 2074 206e 696c #$ . 6372) t nil │ │ │ -00001bc0: 290a 2340 3335 3420 5265 636f 6d70 696c ).#@354 Recompil │ │ │ -00001bd0: 6520 6120 6669 6c65 206f 6620 4c69 7370 e a file of Lisp │ │ │ -00001be0: 2063 6f64 6520 6e61 6d65 6420 4649 4c45 code named FILE │ │ │ -00001bf0: 4e41 4d45 2069 6620 6974 206e 6565 6473 NAME if it needs │ │ │ -00001c00: 2072 6563 6f6d 7069 6c61 7469 6f6e 2e0a recompilation.. │ │ │ -00001c10: 5468 6973 2069 7320 6966 2074 6865 2060 This is if the ` │ │ │ -00001c20: 2e65 6c63 2720 6669 6c65 2065 7869 7374 .elc' file exist │ │ │ -00001c30: 7320 6275 7420 6973 206f 6c64 6572 2074 s but is older t │ │ │ -00001c40: 6861 6e20 7468 6520 602e 656c 2720 6669 han the `.el' fi │ │ │ -00001c50: 6c65 2e0a 0a49 6620 7468 6520 602e 656c le...If the `.el │ │ │ -00001c60: 6327 2066 696c 6520 646f 6573 206e 6f74 c' file does not │ │ │ -00001c70: 2065 7869 7374 2c20 6e6f 726d 616c 6c79 exist, normally │ │ │ -00001c80: 2074 6865 2060 2e65 6c27 2066 696c 6520 the `.el' file │ │ │ -00001c90: 6973 202a 6e6f 742a 0a63 6f6d 7069 6c65 is *not*.compile │ │ │ -00001ca0: 642e 2020 4275 7420 6120 7072 6566 6978 d. But a prefix │ │ │ -00001cb0: 2061 7267 756d 656e 7420 286f 7074 696f argument (optio │ │ │ -00001cc0: 6e61 6c20 7365 636f 6e64 2061 7267 2920 nal second arg) │ │ │ -00001cd0: 6d65 616e 7320 6173 6b20 7573 6572 0a77 means ask user.w │ │ │ -00001ce0: 6865 7468 6572 2074 6f20 636f 6d70 696c hether to compil │ │ │ -00001cf0: 6520 6974 2e20 2050 7265 6669 7820 6172 e it. Prefix ar │ │ │ -00001d00: 6775 6d65 6e74 2030 2064 6f6e 2774 2061 gument 0 don't a │ │ │ -00001d10: 736b 2061 6e64 2072 6563 6f6d 7069 6c65 sk and recompile │ │ │ -00001d20: 2061 6e79 7761 792e 1f0a 2861 7574 6f6c anyway...(autol │ │ │ -00001d30: 6f61 6420 2762 7974 652d 7265 636f 6d70 oad 'byte-recomp │ │ │ -00001d40: 696c 652d 6669 6c65 2022 6279 7465 636f ile-file "byteco │ │ │ -00001d50: 6d70 2220 2728 2324 202e 2037 3131 3229 mp" '(#$ . 7112) │ │ │ -00001d60: 2074 206e 696c 290a 2340 3231 3820 436f t nil).#@218 Co │ │ │ -00001d70: 6d70 696c 6520 6120 6669 6c65 206f 6620 mpile a file of │ │ │ -00001d80: 4c69 7370 2063 6f64 6520 6e61 6d65 6420 Lisp code named │ │ │ -00001d90: 4649 4c45 4e41 4d45 2069 6e74 6f20 6120 FILENAME into a │ │ │ -00001da0: 6669 6c65 206f 6620 6279 7465 2063 6f64 file of byte cod │ │ │ -00001db0: 652e 0a54 6865 206f 7574 7075 7420 6669 e..The output fi │ │ │ -00001dc0: 6c65 2773 206e 616d 6520 6973 206d 6164 le's name is mad │ │ │ -00001dd0: 6520 6279 2061 7070 656e 6469 6e67 2060 e by appending ` │ │ │ -00001de0: 6327 2074 6f20 7468 6520 656e 6420 6f66 c' to the end of │ │ │ -00001df0: 2046 494c 454e 414d 452e 0a57 6974 6820 FILENAME..With │ │ │ -00001e00: 7072 6566 6978 2061 7267 2028 6e6f 6e69 prefix arg (noni │ │ │ -00001e10: 6e74 6572 6163 7469 7665 6c79 3a20 326e nteractively: 2n │ │ │ -00001e20: 6420 6172 6729 2c20 6c6f 6164 2074 6865 d arg), load the │ │ │ -00001e30: 2066 696c 6520 6166 7465 7220 636f 6d70 file after comp │ │ │ -00001e40: 696c 696e 672e 1f0a 2861 7574 6f6c 6f61 iling...(autoloa │ │ │ -00001e50: 6420 2762 7974 652d 636f 6d70 696c 652d d 'byte-compile- │ │ │ -00001e60: 6669 6c65 2022 6279 7465 636f 6d70 2220 file "bytecomp" │ │ │ -00001e70: 2728 2324 202e 2037 3533 3429 2074 206e '(#$ . 7534) t n │ │ │ -00001e80: 696c 290a 2340 3136 3120 436f 6d70 696c il).#@161 Compil │ │ │ -00001e90: 6520 6120 6669 6c65 206f 6620 4c69 7370 e a file of Lisp │ │ │ -00001ea0: 2063 6f64 6520 6e61 6d65 6420 4649 4c45 code named FILE │ │ │ -00001eb0: 4e41 4d45 2069 6e74 6f20 6120 6669 6c65 NAME into a file │ │ │ -00001ec0: 206f 6620 6279 7465 2063 6f64 652c 0a61 of byte code,.a │ │ │ -00001ed0: 6e64 2074 6865 6e20 6c6f 6164 2069 742e nd then load it. │ │ │ -00001ee0: 2020 5468 6520 6f75 7470 7574 2066 696c The output fil │ │ │ -00001ef0: 6527 7320 6e61 6d65 2069 7320 6d61 6465 e's name is made │ │ │ -00001f00: 2062 7920 6170 7065 6e64 696e 6720 2263 by appending "c │ │ │ -00001f10: 2220 746f 0a74 6865 2065 6e64 206f 6620 " to.the end of │ │ │ -00001f20: 4649 4c45 4e41 4d45 2e1f 0a28 6175 746f FILENAME...(auto │ │ │ -00001f30: 6c6f 6164 2027 6279 7465 2d63 6f6d 7069 load 'byte-compi │ │ │ -00001f40: 6c65 2d61 6e64 2d6c 6f61 642d 6669 6c65 le-and-load-file │ │ │ -00001f50: 2022 6279 7465 636f 6d70 2220 2728 2324 "bytecomp" '(#$ │ │ │ -00001f60: 202e 2037 3831 3829 2074 206e 696c 290a . 7818) t nil). │ │ │ -00001f70: 2340 3737 2042 7974 652d 636f 6d70 696c #@77 Byte-compil │ │ │ -00001f80: 6520 616e 6420 6576 616c 7561 7465 2063 e and evaluate c │ │ │ -00001f90: 6f6e 7465 6e74 7320 6f66 2042 5546 4645 ontents of BUFFE │ │ │ -00001fa0: 5220 2864 6566 6175 6c74 3a20 7468 6520 R (default: the │ │ │ -00001fb0: 6375 7272 656e 7420 6275 6666 6572 292e current buffer). │ │ │ -00001fc0: 1f0a 2861 7574 6f6c 6f61 6420 2762 7974 ..(autoload 'byt │ │ │ -00001fd0: 652d 636f 6d70 696c 652d 6275 6666 6572 e-compile-buffer │ │ │ -00001fe0: 2022 6279 7465 636f 6d70 2220 2728 2324 "bytecomp" '(#$ │ │ │ -00001ff0: 202e 2038 3035 3329 2074 206e 696c 290a . 8053) t nil). │ │ │ -00002000: 2340 3134 3820 436f 6d70 696c 6520 616e #@148 Compile an │ │ │ -00002010: 6420 6576 616c 7561 7465 2074 6865 2063 d evaluate the c │ │ │ -00002020: 7572 7265 6e74 2074 6f70 2d6c 6576 656c urrent top-level │ │ │ -00002030: 2066 6f72 6d2e 0a50 7269 6e74 2074 6865 form..Print the │ │ │ -00002040: 2072 6573 756c 7420 696e 2074 6865 206d result in the m │ │ │ -00002050: 696e 6962 7566 6665 722e 0a57 6974 6820 inibuffer..With │ │ │ -00002060: 6172 6775 6d65 6e74 2c20 696e 7365 7274 argument, insert │ │ │ -00002070: 2076 616c 7565 2069 6e20 6375 7272 656e value in curren │ │ │ -00002080: 7420 6275 6666 6572 2061 6674 6572 2074 t buffer after t │ │ │ -00002090: 6865 2066 6f72 6d2e 1f0a 2861 7574 6f6c he form...(autol │ │ │ -000020a0: 6f61 6420 2763 6f6d 7069 6c65 2d64 6566 oad 'compile-def │ │ │ -000020b0: 756e 2022 6279 7465 636f 6d70 2220 2728 un "bytecomp" '( │ │ │ -000020c0: 2324 202e 2038 3139 3829 2074 206e 696c #$ . 8198) t nil │ │ │ -000020d0: 290a 2340 3132 3320 4966 2046 4f52 4d20 ).#@123 If FORM │ │ │ -000020e0: 6973 2061 2073 796d 626f 6c2c 2062 7974 is a symbol, byt │ │ │ -000020f0: 652d 636f 6d70 696c 6520 6974 7320 6675 e-compile its fu │ │ │ -00002100: 6e63 7469 6f6e 2064 6566 696e 6974 696f nction definitio │ │ │ -00002110: 6e2e 0a49 6620 464f 524d 2069 7320 6120 n..If FORM is a │ │ │ -00002120: 6c61 6d62 6461 206f 7220 6120 6d61 6372 lambda or a macr │ │ │ -00002130: 6f2c 2062 7974 652d 636f 6d70 696c 6520 o, byte-compile │ │ │ -00002140: 6974 2061 7320 6120 6675 6e63 7469 6f6e it as a function │ │ │ -00002150: 2e1f 0a28 6175 746f 6c6f 6164 2027 6279 ...(autoload 'by │ │ │ -00002160: 7465 2d63 6f6d 7069 6c65 2022 6279 7465 te-compile "byte │ │ │ -00002170: 636f 6d70 2220 2728 2324 202e 2038 3430 comp" '(#$ . 840 │ │ │ -00002180: 3829 206e 696c 206e 696c 290a 2340 3236 8) nil nil).#@26 │ │ │ -00002190: 2043 6f6d 7069 6c65 2061 6e64 2072 6574 Compile and ret │ │ │ -000021a0: 7572 6e20 5345 5850 2e1f 0a28 6175 746f urn SEXP...(auto │ │ │ -000021b0: 6c6f 6164 2027 6279 7465 2d63 6f6d 7069 load 'byte-compi │ │ │ -000021c0: 6c65 2d73 6578 7020 2262 7974 6563 6f6d le-sexp "bytecom │ │ │ -000021d0: 7022 2027 2823 2420 2e20 3835 3933 2920 p" '(#$ . 8593) │ │ │ -000021e0: 6e69 6c20 6e69 6c29 0a23 4036 3031 2044 nil nil).#@601 D │ │ │ -000021f0: 6973 706c 6179 2061 2063 616c 6c20 6772 isplay a call gr │ │ │ -00002200: 6170 6820 6f66 2061 2073 7065 6369 6669 aph of a specifi │ │ │ -00002210: 6564 2066 696c 652e 0a54 6869 7320 6c69 ed file..This li │ │ │ -00002220: 7374 7320 7768 6963 6820 6675 6e63 7469 sts which functi │ │ │ -00002230: 6f6e 7320 6861 7665 2062 6565 6e20 6361 ons have been ca │ │ │ -00002240: 6c6c 6564 2c20 7768 6174 2066 756e 6374 lled, what funct │ │ │ -00002250: 696f 6e73 2063 616c 6c65 640a 7468 656d ions called.them │ │ │ -00002260: 2c20 616e 6420 7768 6174 2066 756e 6374 , and what funct │ │ │ -00002270: 696f 6e73 2074 6865 7920 6361 6c6c 2e20 ions they call. │ │ │ -00002280: 2054 6865 206c 6973 7420 696e 636c 7564 The list includ │ │ │ -00002290: 6573 2061 6c6c 2066 756e 6374 696f 6e73 es all functions │ │ │ -000022a0: 0a77 686f 7365 2064 6566 696e 6974 696f .whose definitio │ │ │ -000022b0: 6e73 2068 6176 6520 6265 656e 2063 6f6d ns have been com │ │ │ -000022c0: 7069 6c65 6420 696e 2074 6869 7320 456d piled in this Em │ │ │ -000022d0: 6163 7320 7365 7373 696f 6e2c 2061 7320 acs session, as │ │ │ -000022e0: 7765 6c6c 2061 730a 616c 6c20 6675 6e63 well as.all func │ │ │ -000022f0: 7469 6f6e 7320 6361 6c6c 6564 2062 7920 tions called by │ │ │ -00002300: 7468 6f73 6520 6675 6e63 7469 6f6e 732e those functions. │ │ │ -00002310: 0a0a 5468 6520 6361 6c6c 2067 7261 7068 ..The call graph │ │ │ -00002320: 2064 6f65 7320 6e6f 7420 696e 636c 7564 does not includ │ │ │ -00002330: 6520 6d61 6372 6f73 2c20 696e 6c69 6e65 e macros, inline │ │ │ -00002340: 2066 756e 6374 696f 6e73 2c20 6f72 0a70 functions, or.p │ │ │ -00002350: 7269 6d69 7469 7665 7320 7468 6174 2074 rimitives that t │ │ │ -00002360: 6865 2062 7974 652d 636f 6465 2069 6e74 he byte-code int │ │ │ -00002370: 6572 7072 6574 6572 206b 6e6f 7773 2061 erpreter knows a │ │ │ -00002380: 626f 7574 2064 6972 6563 746c 7920 2865 bout directly (e │ │ │ -00002390: 712c 0a63 6f6e 732c 2065 7463 2e29 2e0a q,.cons, etc.).. │ │ │ -000023a0: 0a54 6865 2063 616c 6c20 7472 6565 2061 .The call tree a │ │ │ -000023b0: 6c73 6f20 6c69 7374 7320 7468 6f73 6520 lso lists those │ │ │ -000023c0: 6675 6e63 7469 6f6e 7320 7768 6963 6820 functions which │ │ │ -000023d0: 6172 6520 6e6f 7420 6b6e 6f77 6e20 746f are not known to │ │ │ -000023e0: 2062 6520 6361 6c6c 6564 0a28 7468 6174 be called.(that │ │ │ -000023f0: 2069 732c 2074 6f20 7768 6963 6820 6e6f is, to which no │ │ │ -00002400: 2063 616c 6c73 2068 6176 6520 6265 656e calls have been │ │ │ -00002410: 2063 6f6d 7069 6c65 6429 2c20 616e 6420 compiled), and │ │ │ -00002420: 7768 6963 6820 6361 6e6e 6f74 2062 650a which cannot be. │ │ │ -00002430: 696e 766f 6b65 6420 696e 7465 7261 6374 invoked interact │ │ │ -00002440: 6976 656c 792e 1f0a 2861 7574 6f6c 6f61 ively...(autoloa │ │ │ -00002450: 6420 2764 6973 706c 6179 2d63 616c 6c2d d 'display-call- │ │ │ -00002460: 7472 6565 2022 6279 7465 636f 6d70 2220 tree "bytecomp" │ │ │ -00002470: 2728 2324 202e 2038 3638 3729 2074 206e '(#$ . 8687) t n │ │ │ -00002480: 696c 290a 2340 3239 3020 5275 6e20 6062 il).#@290 Run `b │ │ │ -00002490: 7974 652d 636f 6d70 696c 652d 6669 6c65 yte-compile-file │ │ │ -000024a0: 2720 6f6e 2074 6865 2066 696c 6573 2072 ' on the files r │ │ │ -000024b0: 656d 6169 6e69 6e67 206f 6e20 7468 6520 emaining on the │ │ │ -000024c0: 636f 6d6d 616e 6420 6c69 6e65 2e0a 5573 command line..Us │ │ │ -000024d0: 6520 7468 6973 2066 726f 6d20 7468 6520 e this from the │ │ │ -000024e0: 636f 6d6d 616e 6420 6c69 6e65 2c20 7769 command line, wi │ │ │ -000024f0: 7468 2060 2d62 6174 6368 273b 0a69 7420 th `-batch';.it │ │ │ -00002500: 776f 6e27 7420 776f 726b 2069 6e20 616e won't work in an │ │ │ -00002510: 2069 6e74 6572 6163 7469 7665 2045 6d61 interactive Ema │ │ │ -00002520: 6373 2e0a 4561 6368 2066 696c 6520 6973 cs..Each file is │ │ │ -00002530: 2070 726f 6365 7373 6564 2065 7665 6e20 processed even │ │ │ -00002540: 6966 2061 6e20 6572 726f 7220 6f63 6375 if an error occu │ │ │ -00002550: 7272 6564 2070 7265 7669 6f75 736c 792e rred previously. │ │ │ -00002560: 0a46 6f72 2065 7861 6d70 6c65 2c20 696e .For example, in │ │ │ -00002570: 766f 6b65 2022 7865 6d61 6373 202d 6261 voke "xemacs -ba │ │ │ -00002580: 7463 6820 2d66 2062 6174 6368 2d62 7974 tch -f batch-byt │ │ │ -00002590: 652d 636f 6d70 696c 6520 2465 6d61 6373 e-compile $emacs │ │ │ -000025a0: 2f20 7e2f 2a2e 656c 222e 1f0a 2861 7574 / ~/*.el"...(aut │ │ │ -000025b0: 6f6c 6f61 6420 2762 6174 6368 2d62 7974 oload 'batch-byt │ │ │ -000025c0: 652d 636f 6d70 696c 6520 2262 7974 6563 e-compile "bytec │ │ │ -000025d0: 6f6d 7022 2027 2823 2420 2e20 3933 3534 omp" '(#$ . 9354 │ │ │ -000025e0: 2920 6e69 6c20 6e69 6c29 0a23 4031 3539 ) nil nil).#@159 │ │ │ -000025f0: 2052 756e 2060 6279 7465 2d63 6f6d 7069 Run `byte-compi │ │ │ -00002600: 6c65 2d66 696c 6527 206f 6e20 6120 7369 le-file' on a si │ │ │ -00002610: 6e67 6c65 2066 696c 6520 7265 6d61 696e ngle file remain │ │ │ -00002620: 696e 6720 6f6e 2074 6865 2063 6f6d 6d61 ing on the comma │ │ │ -00002630: 6e64 206c 696e 652e 0a55 7365 2074 6869 nd line..Use thi │ │ │ -00002640: 7320 6672 6f6d 2074 6865 2063 6f6d 6d61 s from the comma │ │ │ -00002650: 6e64 206c 696e 652c 2077 6974 6820 602d nd line, with `- │ │ │ -00002660: 6261 7463 6827 3b0a 6974 2077 6f6e 2774 batch';.it won't │ │ │ -00002670: 2077 6f72 6b20 696e 2061 6e20 696e 7465 work in an inte │ │ │ -00002680: 7261 6374 6976 6520 456d 6163 732e 1f0a ractive Emacs... │ │ │ -00002690: 2861 7574 6f6c 6f61 6420 2762 6174 6368 (autoload 'batch │ │ │ -000026a0: 2d62 7974 652d 636f 6d70 696c 652d 6f6e -byte-compile-on │ │ │ -000026b0: 652d 6669 6c65 2022 6279 7465 636f 6d70 e-file "bytecomp │ │ │ -000026c0: 2220 2728 2324 202e 2039 3731 3329 206e " '(#$ . 9713) n │ │ │ -000026d0: 696c 206e 696c 290a 2340 3635 2053 616d il nil).#@65 Sam │ │ │ -000026e0: 6520 6173 2060 6261 7463 682d 6279 7465 e as `batch-byte │ │ │ -000026f0: 2d72 6563 6f6d 7069 6c65 2d64 6972 6563 -recompile-direc │ │ │ -00002700: 746f 7279 2720 6275 7420 7769 7468 6f75 tory' but withou │ │ │ -00002710: 7420 7265 6375 7273 696f 6e2e 1f0a 2861 t recursion...(a │ │ │ -00002720: 7574 6f6c 6f61 6420 2762 6174 6368 2d62 utoload 'batch-b │ │ │ -00002730: 7974 652d 7265 636f 6d70 696c 652d 6469 yte-recompile-di │ │ │ -00002740: 7265 6374 6f72 792d 6e6f 7265 6375 7273 rectory-norecurs │ │ │ -00002750: 6520 2262 7974 6563 6f6d 7022 2027 2823 e "bytecomp" '(# │ │ │ -00002760: 2420 2e20 3939 3439 2920 6e69 6c20 6e69 $ . 9949) nil ni │ │ │ -00002770: 6c29 0a23 4032 3133 2052 756e 7320 6062 l).#@213 Runs `b │ │ │ -00002780: 7974 652d 7265 636f 6d70 696c 652d 6469 yte-recompile-di │ │ │ -00002790: 7265 6374 6f72 7927 206f 6e20 7468 6520 rectory' on the │ │ │ -000027a0: 6469 7273 2072 656d 6169 6e69 6e67 206f dirs remaining o │ │ │ -000027b0: 6e20 7468 6520 636f 6d6d 616e 6420 6c69 n the command li │ │ │ -000027c0: 6e65 2e0a 4d75 7374 2062 6520 7573 6564 ne..Must be used │ │ │ -000027d0: 206f 6e6c 7920 7769 7468 2060 2d62 6174 only with `-bat │ │ │ -000027e0: 6368 272c 2061 6e64 206b 696c 6c73 2045 ch', and kills E │ │ │ -000027f0: 6d61 6373 206f 6e20 636f 6d70 6c65 7469 macs on completi │ │ │ -00002800: 6f6e 2e0a 466f 7220 6578 616d 706c 652c on..For example, │ │ │ -00002810: 2069 6e76 6f6b 6520 6078 656d 6163 7320 invoke `xemacs │ │ │ -00002820: 2d62 6174 6368 202d 6620 6261 7463 682d -batch -f batch- │ │ │ -00002830: 6279 7465 2d72 6563 6f6d 7069 6c65 2d64 byte-recompile-d │ │ │ -00002840: 6972 6563 746f 7279 202e 272e 1f0a 2861 irectory .'...(a │ │ │ -00002850: 7574 6f6c 6f61 6420 2762 6174 6368 2d62 utoload 'batch-b │ │ │ -00002860: 7974 652d 7265 636f 6d70 696c 652d 6469 yte-recompile-di │ │ │ -00002870: 7265 6374 6f72 7920 2262 7974 6563 6f6d rectory "bytecom │ │ │ -00002880: 7022 2027 2823 2420 2e20 3130 3130 3529 p" '(#$ . 10105) │ │ │ -00002890: 206e 696c 206e 696c 290a 2862 7974 652d nil nil).(byte- │ │ │ -000028a0: 636f 6465 2022 c0c1 c2c3 8989 2587 2220 code "......%." │ │ │ -000028b0: 5b61 7574 6f6c 6f61 6420 636c 2d63 6f6d [autoload cl-com │ │ │ -000028c0: 7069 6c65 2d74 696d 652d 696e 6974 2022 pile-time-init " │ │ │ -000028d0: 636c 2d6d 6163 7322 206e 696c 5d20 3629 cl-macs" nil] 6) │ │ │ -000028e0: 0a23 4031 3939 2028 6465 6675 6e2a 204e .#@199 (defun* N │ │ │ -000028f0: 414d 4520 4152 474c 4953 5420 5b44 4f43 AME ARGLIST [DOC │ │ │ -00002900: 5354 5249 4e47 5d20 424f 4459 2e2e 2e29 STRING] BODY...) │ │ │ -00002910: 3a20 6465 6669 6e65 204e 414d 4520 6173 : define NAME as │ │ │ -00002920: 2061 2066 756e 6374 696f 6e2e 0a4c 696b a function..Lik │ │ │ -00002930: 6520 6e6f 726d 616c 2060 6465 6675 6e27 e normal `defun' │ │ │ -00002940: 2c20 6578 6365 7074 2041 5247 4c49 5354 , except ARGLIST │ │ │ -00002950: 2061 6c6c 6f77 7320 6675 6c6c 2043 6f6d allows full Com │ │ │ -00002960: 6d6f 6e20 4c69 7370 2063 6f6e 7665 6e74 mon Lisp convent │ │ │ -00002970: 696f 6e73 2c0a 616e 6420 424f 4459 2069 ions,.and BODY i │ │ │ -00002980: 7320 696d 706c 6963 6974 6c79 2073 7572 s implicitly sur │ │ │ -00002990: 726f 756e 6465 6420 6279 2028 626c 6f63 rounded by (bloc │ │ │ -000029a0: 6b20 4e41 4d45 202e 2e2e 292e 1f0a 2861 k NAME ...)...(a │ │ │ -000029b0: 7574 6f6c 6f61 6420 2764 6566 756e 2a20 utoload 'defun* │ │ │ -000029c0: 2263 6c2d 6d61 6373 2220 2728 2324 202e "cl-macs" '(#$ . │ │ │ -000029d0: 2031 3034 3731 2920 6e69 6c20 276d 6163 10471) nil 'mac │ │ │ -000029e0: 726f 290a 2340 3230 3220 2864 6566 6d61 ro).#@202 (defma │ │ │ -000029f0: 6372 6f2a 204e 414d 4520 4152 474c 4953 cro* NAME ARGLIS │ │ │ -00002a00: 5420 5b44 4f43 5354 5249 4e47 5d20 424f T [DOCSTRING] BO │ │ │ -00002a10: 4459 2e2e 2e29 3a20 6465 6669 6e65 204e DY...): define N │ │ │ -00002a20: 414d 4520 6173 2061 206d 6163 726f 2e0a AME as a macro.. │ │ │ -00002a30: 4c69 6b65 206e 6f72 6d61 6c20 6064 6566 Like normal `def │ │ │ -00002a40: 6d61 6372 6f27 2c20 6578 6365 7074 2041 macro', except A │ │ │ -00002a50: 5247 4c49 5354 2061 6c6c 6f77 7320 6675 RGLIST allows fu │ │ │ -00002a60: 6c6c 2043 6f6d 6d6f 6e20 4c69 7370 2063 ll Common Lisp c │ │ │ -00002a70: 6f6e 7665 6e74 696f 6e73 2c0a 616e 6420 onventions,.and │ │ │ -00002a80: 424f 4459 2069 7320 696d 706c 6963 6974 BODY is implicit │ │ │ -00002a90: 6c79 2073 7572 726f 756e 6465 6420 6279 ly surrounded by │ │ │ -00002aa0: 2028 626c 6f63 6b20 4e41 4d45 202e 2e2e (block NAME ... │ │ │ -00002ab0: 292e 1f0a 2861 7574 6f6c 6f61 6420 2764 )...(autoload 'd │ │ │ -00002ac0: 6566 6d61 6372 6f2a 2022 636c 2d6d 6163 efmacro* "cl-mac │ │ │ -00002ad0: 7322 2027 2823 2420 2e20 3130 3733 3029 s" '(#$ . 10730) │ │ │ -00002ae0: 206e 696c 2027 6d61 6372 6f29 0a23 4031 nil 'macro).#@1 │ │ │ -00002af0: 3638 2028 6675 6e63 7469 6f6e 2a20 5359 68 (function* SY │ │ │ -00002b00: 4d42 4f4c 2d4f 522d 4c41 4d42 4441 293a MBOL-OR-LAMBDA): │ │ │ -00002b10: 2069 6e74 726f 6475 6365 2061 2066 756e introduce a fun │ │ │ -00002b20: 6374 696f 6e2e 0a4c 696b 6520 6e6f 726d ction..Like norm │ │ │ -00002b30: 616c 2060 6675 6e63 7469 6f6e 272c 2065 al `function', e │ │ │ -00002b40: 7863 6570 7420 7468 6174 2069 6620 6172 xcept that if ar │ │ │ -00002b50: 6775 6d65 6e74 2069 7320 6120 6c61 6d62 gument is a lamb │ │ │ -00002b60: 6461 2066 6f72 6d2c 2069 7473 0a41 5247 da form, its.ARG │ │ │ -00002b70: 4c49 5354 2061 6c6c 6f77 7320 6675 6c6c LIST allows full │ │ │ -00002b80: 2043 6f6d 6d6f 6e20 4c69 7370 2063 6f6e Common Lisp con │ │ │ -00002b90: 7665 6e74 696f 6e73 2e1f 0a28 6175 746f ventions...(auto │ │ │ -00002ba0: 6c6f 6164 2027 6675 6e63 7469 6f6e 2a20 load 'function* │ │ │ -00002bb0: 2263 6c2d 6d61 6373 2220 2728 2324 202e "cl-macs" '(#$ . │ │ │ -00002bc0: 2031 3039 3935 2920 6e69 6c20 276d 6163 10995) nil 'mac │ │ │ -00002bd0: 726f 290a 2862 7974 652d 636f 6465 2022 ro).(byte-code " │ │ │ -00002be0: c0c1 c2c3 89c4 2587 2220 5b61 7574 6f6c ......%." [autol │ │ │ -00002bf0: 6f61 6420 6465 7374 7275 6374 7572 696e oad destructurin │ │ │ -00002c00: 672d 6269 6e64 2022 636c 2d6d 6163 7322 g-bind "cl-macs" │ │ │ -00002c10: 206e 696c 206d 6163 726f 5d20 3629 0a23 nil macro] 6).# │ │ │ -00002c20: 4032 3930 2028 6576 616c 2d77 6865 6e20 @290 (eval-when │ │ │ -00002c30: 2857 4845 4e2e 2e2e 2920 424f 4459 2e2e (WHEN...) BODY.. │ │ │ -00002c40: 2e29 3a20 636f 6e74 726f 6c20 7768 656e .): control when │ │ │ -00002c50: 2042 4f44 5920 6973 2065 7661 6c75 6174 BODY is evaluat │ │ │ -00002c60: 6564 2e0a 4966 2060 636f 6d70 696c 6527 ed..If `compile' │ │ │ -00002c70: 2069 7320 696e 2057 4845 4e2c 2042 4f44 is in WHEN, BOD │ │ │ -00002c80: 5920 6973 2065 7661 6c75 6174 6564 2077 Y is evaluated w │ │ │ -00002c90: 6865 6e20 636f 6d70 696c 6564 2061 7420 hen compiled at │ │ │ -00002ca0: 746f 702d 6c65 7665 6c2e 0a49 6620 606c top-level..If `l │ │ │ -00002cb0: 6f61 6427 2069 7320 696e 2057 4845 4e2c oad' is in WHEN, │ │ │ -00002cc0: 2042 4f44 5920 6973 2065 7661 6c75 6174 BODY is evaluat │ │ │ -00002cd0: 6564 2077 6865 6e20 6c6f 6164 6564 2061 ed when loaded a │ │ │ -00002ce0: 6674 6572 2074 6f70 2d6c 6576 656c 2063 fter top-level c │ │ │ -00002cf0: 6f6d 7069 6c65 2e0a 4966 2060 6576 616c ompile..If `eval │ │ │ -00002d00: 2720 6973 2069 6e20 5748 454e 2c20 424f ' is in WHEN, BO │ │ │ -00002d10: 4459 2069 7320 6576 616c 7561 7465 6420 DY is evaluated │ │ │ -00002d20: 7768 656e 2069 6e74 6572 7072 6574 6564 when interpreted │ │ │ -00002d30: 206f 7220 6174 206e 6f6e 2d74 6f70 2d6c or at non-top-l │ │ │ -00002d40: 6576 656c 2e1f 0a28 6175 746f 6c6f 6164 evel...(autoload │ │ │ -00002d50: 2027 6576 616c 2d77 6865 6e20 2263 6c2d 'eval-when "cl- │ │ │ -00002d60: 6d61 6373 2220 2728 2324 202e 2031 3133 macs" '(#$ . 113 │ │ │ -00002d70: 3031 2920 6e69 6c20 276d 6163 726f 290a 01) nil 'macro). │ │ │ -00002d80: 2340 3132 3120 4c69 6b65 2060 7072 6f67 #@121 Like `prog │ │ │ -00002d90: 6e27 2c20 6275 7420 6576 616c 7561 7465 n', but evaluate │ │ │ -00002da0: 7320 7468 6520 626f 6479 2061 7420 6c6f s the body at lo │ │ │ -00002db0: 6164 2074 696d 652e 0a54 6865 2072 6573 ad time..The res │ │ │ -00002dc0: 756c 7420 6f66 2074 6865 2062 6f64 7920 ult of the body │ │ │ -00002dd0: 6170 7065 6172 7320 746f 2074 6865 2063 appears to the c │ │ │ -00002de0: 6f6d 7069 6c65 7220 6173 2061 2071 756f ompiler as a quo │ │ │ -00002df0: 7465 6420 636f 6e73 7461 6e74 2e1f 0a28 ted constant...( │ │ │ -00002e00: 6175 746f 6c6f 6164 2027 6c6f 6164 2d74 autoload 'load-t │ │ │ -00002e10: 696d 652d 7661 6c75 6520 2263 6c2d 6d61 ime-value "cl-ma │ │ │ -00002e20: 6373 2220 2728 2324 202e 2031 3136 3534 cs" '(#$ . 11654 │ │ │ -00002e30: 2920 6e69 6c20 276d 6163 726f 290a 2340 ) nil 'macro).#@ │ │ │ -00002e40: 3436 3120 2863 6173 6520 4558 5052 2043 461 (case EXPR C │ │ │ -00002e50: 4c41 5553 4553 2e2e 2e29 3a20 6576 616c LAUSES...): eval │ │ │ -00002e60: 7320 4558 5052 2c20 6368 6f6f 7365 7320 s EXPR, chooses │ │ │ -00002e70: 6672 6f6d 2043 4c41 5553 4553 206f 6e20 from CLAUSES on │ │ │ -00002e80: 7468 6174 2076 616c 7565 2e0a 4561 6368 that value..Each │ │ │ -00002e90: 2063 6c61 7573 6520 6c6f 6f6b 7320 6c69 clause looks li │ │ │ -00002ea0: 6b65 2028 4b45 594c 4953 5420 424f 4459 ke (KEYLIST BODY │ │ │ -00002eb0: 2e2e 2e29 2e20 2045 5850 5220 6973 2065 ...). EXPR is e │ │ │ -00002ec0: 7661 6c75 6174 6564 2061 6e64 2063 6f6d valuated and com │ │ │ -00002ed0: 7061 7265 640a 6167 6169 6e73 7420 6561 pared.against ea │ │ │ -00002ee0: 6368 206b 6579 2069 6e20 6561 6368 204b ch key in each K │ │ │ -00002ef0: 4559 4c49 5354 3b20 7468 6520 636f 7272 EYLIST; the corr │ │ │ -00002f00: 6573 706f 6e64 696e 6720 424f 4459 2069 esponding BODY i │ │ │ -00002f10: 7320 6576 616c 7561 7465 642e 0a49 6620 s evaluated..If │ │ │ -00002f20: 6e6f 2063 6c61 7573 6520 7375 6363 6565 no clause succee │ │ │ -00002f30: 6473 2c20 6361 7365 2072 6574 7572 6e73 ds, case returns │ │ │ -00002f40: 206e 696c 2e20 2041 2073 696e 676c 6520 nil. A single │ │ │ -00002f50: 6174 6f6d 206d 6179 2062 6520 7573 6564 atom may be used │ │ │ -00002f60: 2069 6e0a 706c 6163 6520 6f66 2061 204b in.place of a K │ │ │ -00002f70: 4559 4c49 5354 206f 6620 6f6e 6520 6174 EYLIST of one at │ │ │ -00002f80: 6f6d 2e20 2041 204b 4559 4c49 5354 206f om. A KEYLIST o │ │ │ -00002f90: 6620 6074 2720 6f72 2060 6f74 6865 7277 f `t' or `otherw │ │ │ -00002fa0: 6973 6527 2069 730a 616c 6c6f 7765 6420 ise' is.allowed │ │ │ -00002fb0: 6f6e 6c79 2069 6e20 7468 6520 6669 6e61 only in the fina │ │ │ -00002fc0: 6c20 636c 6175 7365 2c20 616e 6420 6d61 l clause, and ma │ │ │ -00002fd0: 7463 6865 7320 6966 206e 6f20 6f74 6865 tches if no othe │ │ │ -00002fe0: 7220 6b65 7973 206d 6174 6368 2e0a 4b65 r keys match..Ke │ │ │ -00002ff0: 7920 7661 6c75 6573 2061 7265 2063 6f6d y values are com │ │ │ -00003000: 7061 7265 6420 6279 2060 6571 6c27 2e1f pared by `eql'.. │ │ │ -00003010: 0a28 6175 746f 6c6f 6164 2027 6361 7365 .(autoload 'case │ │ │ -00003020: 2022 636c 2d6d 6163 7322 2027 2823 2420 "cl-macs" '(#$ │ │ │ -00003030: 2e20 3131 3834 3429 206e 696c 2027 6d61 . 11844) nil 'ma │ │ │ -00003040: 6372 6f29 0a23 4031 3033 2028 6563 6173 cro).#@103 (ecas │ │ │ -00003050: 6520 4558 5052 2043 4c41 5553 4553 2e2e e EXPR CLAUSES.. │ │ │ -00003060: 2e29 3a20 6c69 6b65 2060 6361 7365 272c .): like `case', │ │ │ -00003070: 2062 7574 2065 7272 6f72 2069 6620 6e6f but error if no │ │ │ -00003080: 2063 6173 6520 6669 7473 2e0a 606f 7468 case fits..`oth │ │ │ -00003090: 6572 7769 7365 272d 636c 6175 7365 7320 erwise'-clauses │ │ │ -000030a0: 6172 6520 6e6f 7420 616c 6c6f 7765 642e are not allowed. │ │ │ -000030b0: 1f0a 2861 7574 6f6c 6f61 6420 2765 6361 ..(autoload 'eca │ │ │ -000030c0: 7365 2022 636c 2d6d 6163 7322 2027 2823 se "cl-macs" '(# │ │ │ -000030d0: 2420 2e20 3132 3336 3329 206e 696c 2027 $ . 12363) nil ' │ │ │ -000030e0: 6d61 6372 6f29 0a23 4033 3438 2028 7479 macro).#@348 (ty │ │ │ -000030f0: 7065 6361 7365 2045 5850 5220 434c 4155 pecase EXPR CLAU │ │ │ -00003100: 5345 532e 2e2e 293a 2065 7661 6c73 2045 SES...): evals E │ │ │ -00003110: 5850 522c 2063 686f 6f73 6573 2066 726f XPR, chooses fro │ │ │ -00003120: 6d20 434c 4155 5345 5320 6f6e 2074 6861 m CLAUSES on tha │ │ │ -00003130: 7420 7661 6c75 652e 0a45 6163 6820 636c t value..Each cl │ │ │ -00003140: 6175 7365 206c 6f6f 6b73 206c 696b 6520 ause looks like │ │ │ -00003150: 2854 5950 4520 424f 4459 2e2e 2e29 2e20 (TYPE BODY...). │ │ │ -00003160: 2045 5850 5220 6973 2065 7661 6c75 6174 EXPR is evaluat │ │ │ -00003170: 6564 2061 6e64 2c20 6966 2069 740a 7361 ed and, if it.sa │ │ │ -00003180: 7469 7366 6965 7320 5459 5045 2c20 7468 tisfies TYPE, th │ │ │ -00003190: 6520 636f 7272 6573 706f 6e64 696e 6720 e corresponding │ │ │ -000031a0: 424f 4459 2069 7320 6576 616c 7561 7465 BODY is evaluate │ │ │ -000031b0: 642e 2020 4966 206e 6f20 636c 6175 7365 d. If no clause │ │ │ -000031c0: 2073 7563 6365 6564 732c 0a74 7970 6563 succeeds,.typec │ │ │ -000031d0: 6173 6520 7265 7475 726e 7320 6e69 6c2e ase returns nil. │ │ │ -000031e0: 2020 4120 5459 5045 206f 6620 6074 2720 A TYPE of `t' │ │ │ -000031f0: 6f72 2060 6f74 6865 7277 6973 6527 2069 or `otherwise' i │ │ │ -00003200: 7320 616c 6c6f 7765 6420 6f6e 6c79 2069 s allowed only i │ │ │ -00003210: 6e20 7468 650a 6669 6e61 6c20 636c 6175 n the.final clau │ │ │ -00003220: 7365 2c20 616e 6420 6d61 7463 6865 7320 se, and matches │ │ │ -00003230: 6966 206e 6f20 6f74 6865 7220 6b65 7973 if no other keys │ │ │ -00003240: 206d 6174 6368 2e1f 0a28 6175 746f 6c6f match...(autolo │ │ │ -00003250: 6164 2027 7479 7065 6361 7365 2022 636c ad 'typecase "cl │ │ │ -00003260: 2d6d 6163 7322 2027 2823 2420 2e20 3132 -macs" '(#$ . 12 │ │ │ -00003270: 3532 3529 206e 696c 2027 6d61 6372 6f29 525) nil 'macro) │ │ │ -00003280: 0a23 4031 3131 2028 6574 7970 6563 6173 .#@111 (etypecas │ │ │ -00003290: 6520 4558 5052 2043 4c41 5553 4553 2e2e e EXPR CLAUSES.. │ │ │ -000032a0: 2e29 3a20 6c69 6b65 2060 7479 7065 6361 .): like `typeca │ │ │ -000032b0: 7365 272c 2062 7574 2065 7272 6f72 2069 se', but error i │ │ │ -000032c0: 6620 6e6f 2063 6173 6520 6669 7473 2e0a f no case fits.. │ │ │ -000032d0: 606f 7468 6572 7769 7365 272d 636c 6175 `otherwise'-clau │ │ │ -000032e0: 7365 7320 6172 6520 6e6f 7420 616c 6c6f ses are not allo │ │ │ -000032f0: 7765 642e 1f0a 2861 7574 6f6c 6f61 6420 wed...(autoload │ │ │ -00003300: 2765 7479 7065 6361 7365 2022 636c 2d6d 'etypecase "cl-m │ │ │ -00003310: 6163 7322 2027 2823 2420 2e20 3132 3933 acs" '(#$ . 1293 │ │ │ -00003320: 3529 206e 696c 2027 6d61 6372 6f29 0a23 5) nil 'macro).# │ │ │ -00003330: 4035 3236 2028 626c 6f63 6b20 4e41 4d45 @526 (block NAME │ │ │ -00003340: 2042 4f44 592e 2e2e 293a 2064 6566 696e BODY...): defin │ │ │ -00003350: 6520 6120 6c65 7869 6361 6c6c 792d 7363 e a lexically-sc │ │ │ -00003360: 6f70 6564 2062 6c6f 636b 206e 616d 6564 oped block named │ │ │ -00003370: 204e 414d 452e 0a4e 414d 4520 6d61 7920 NAME..NAME may │ │ │ -00003380: 6265 2061 6e79 2073 796d 626f 6c2e 2020 be any symbol. │ │ │ -00003390: 436f 6465 2069 6e73 6964 6520 7468 6520 Code inside the │ │ │ -000033a0: 424f 4459 2066 6f72 6d73 2063 616e 2063 BODY forms can c │ │ │ -000033b0: 616c 6c20 6072 6574 7572 6e2d 6672 6f6d all `return-from │ │ │ -000033c0: 270a 746f 206a 756d 7020 7072 656d 6174 '.to jump premat │ │ │ -000033d0: 7572 656c 7920 6f75 7420 6f66 2074 6865 urely out of the │ │ │ -000033e0: 2062 6c6f 636b 2e20 2054 6869 7320 6469 block. This di │ │ │ -000033f0: 6666 6572 7320 6672 6f6d 2060 6361 7463 ffers from `catc │ │ │ -00003400: 6827 2061 6e64 2060 7468 726f 7727 0a69 h' and `throw'.i │ │ │ -00003410: 6e20 7477 6f20 7265 7370 6563 7473 3a20 n two respects: │ │ │ -00003420: 2046 6972 7374 2c20 7468 6520 4e41 4d45 First, the NAME │ │ │ -00003430: 2069 7320 616e 2075 6e65 7661 6c75 6174 is an unevaluat │ │ │ -00003440: 6564 2073 796d 626f 6c20 7261 7468 6572 ed symbol rather │ │ │ -00003450: 2074 6861 6e20 610a 7175 6f74 6564 2073 than a.quoted s │ │ │ -00003460: 796d 626f 6c20 6f72 206f 7468 6572 2066 ymbol or other f │ │ │ -00003470: 6f72 6d3b 2061 6e64 2073 6563 6f6e 642c orm; and second, │ │ │ -00003480: 204e 414d 4520 6973 206c 6578 6963 616c NAME is lexical │ │ │ -00003490: 6c79 2072 6174 6865 7220 7468 616e 0a64 ly rather than.d │ │ │ -000034a0: 796e 616d 6963 616c 6c79 2073 636f 7065 ynamically scope │ │ │ -000034b0: 643a 2020 4f6e 6c79 2072 6566 6572 656e d: Only referen │ │ │ -000034c0: 6365 7320 746f 2069 7420 7769 7468 696e ces to it within │ │ │ -000034d0: 2042 4f44 5920 7769 6c6c 2077 6f72 6b2e BODY will work. │ │ │ -000034e0: 2020 5468 6573 650a 7265 6665 7265 6e63 These.referenc │ │ │ -000034f0: 6573 206d 6179 2061 7070 6561 7220 696e es may appear in │ │ │ -00003500: 7369 6465 206d 6163 726f 2065 7870 616e side macro expan │ │ │ -00003510: 7369 6f6e 732c 2062 7574 206e 6f74 2069 sions, but not i │ │ │ -00003520: 6e73 6964 6520 6675 6e63 7469 6f6e 730a nside functions. │ │ │ -00003530: 6361 6c6c 6564 2066 726f 6d20 424f 4459 called from BODY │ │ │ -00003540: 2e1f 0a28 6175 746f 6c6f 6164 2027 626c ...(autoload 'bl │ │ │ -00003550: 6f63 6b20 2263 6c2d 6d61 6373 2220 2728 ock "cl-macs" '( │ │ │ -00003560: 2324 202e 2031 3331 3039 2920 6e69 6c20 #$ . 13109) nil │ │ │ -00003570: 276d 6163 726f 290a 2340 3130 3320 2872 'macro).#@103 (r │ │ │ -00003580: 6574 7572 6e20 5b52 4553 554c 545d 293a eturn [RESULT]): │ │ │ -00003590: 2072 6574 7572 6e20 6672 6f6d 2074 6865 return from the │ │ │ -000035a0: 2062 6c6f 636b 206e 616d 6564 206e 696c block named nil │ │ │ -000035b0: 2e0a 5468 6973 2069 7320 6571 7569 7661 ..This is equiva │ │ │ -000035c0: 6c65 6e74 2074 6f20 6028 7265 7475 726e lent to `(return │ │ │ -000035d0: 2d66 726f 6d20 6e69 6c20 5245 5355 4c54 -from nil RESULT │ │ │ -000035e0: 2927 2e1f 0a28 6175 746f 6c6f 6164 2027 )'...(autoload ' │ │ │ -000035f0: 7265 7475 726e 2022 636c 2d6d 6163 7322 return "cl-macs" │ │ │ -00003600: 2027 2823 2420 2e20 3133 3639 3429 206e '(#$ . 13694) n │ │ │ -00003610: 696c 2027 6d61 6372 6f29 0a23 4033 3235 il 'macro).#@325 │ │ │ -00003620: 2028 7265 7475 726e 2d66 726f 6d20 4e41 (return-from NA │ │ │ -00003630: 4d45 205b 5245 5355 4c54 5d29 3a20 7265 ME [RESULT]): re │ │ │ -00003640: 7475 726e 2066 726f 6d20 7468 6520 626c turn from the bl │ │ │ -00003650: 6f63 6b20 6e61 6d65 6420 4e41 4d45 2e0a ock named NAME.. │ │ │ -00003660: 5468 6973 206a 756d 7073 206f 7574 2074 This jumps out t │ │ │ -00003670: 6f20 7468 6520 696e 6e65 726d 6f73 7420 o the innermost │ │ │ -00003680: 656e 636c 6f73 696e 6720 6028 626c 6f63 enclosing `(bloc │ │ │ -00003690: 6b20 4e41 4d45 202e 2e2e 2927 2066 6f72 k NAME ...)' for │ │ │ -000036a0: 6d2c 0a72 6574 7572 6e69 6e67 2052 4553 m,.returning RES │ │ │ -000036b0: 554c 5420 6672 6f6d 2074 6861 7420 666f ULT from that fo │ │ │ -000036c0: 726d 2028 6f72 206e 696c 2069 6620 5245 rm (or nil if RE │ │ │ -000036d0: 5355 4c54 2069 7320 6f6d 6974 7465 6429 SULT is omitted) │ │ │ -000036e0: 2e0a 5468 6973 2069 7320 636f 6d70 6174 ..This is compat │ │ │ -000036f0: 6962 6c65 2077 6974 6820 436f 6d6d 6f6e ible with Common │ │ │ -00003700: 204c 6973 702c 2062 7574 206e 6f74 6520 Lisp, but note │ │ │ -00003710: 7468 6174 2060 6465 6675 6e27 2061 6e64 that `defun' and │ │ │ -00003720: 0a60 6465 666d 6163 726f 2720 646f 206e .`defmacro' do n │ │ │ -00003730: 6f74 2063 7265 6174 6520 696d 706c 6963 ot create implic │ │ │ -00003740: 6974 2062 6c6f 636b 7320 6173 2074 6865 it blocks as the │ │ │ -00003750: 7920 646f 2069 6e20 436f 6d6d 6f6e 204c y do in Common L │ │ │ -00003760: 6973 702e 1f0a 2861 7574 6f6c 6f61 6420 isp...(autoload │ │ │ -00003770: 2772 6574 7572 6e2d 6672 6f6d 2022 636c 'return-from "cl │ │ │ -00003780: 2d6d 6163 7322 2027 2823 2420 2e20 3133 -macs" '(#$ . 13 │ │ │ -00003790: 3835 3729 206e 696c 2027 6d61 6372 6f29 857) nil 'macro) │ │ │ -000037a0: 0a23 4037 3235 2028 6c6f 6f70 2043 4c41 .#@725 (loop CLA │ │ │ -000037b0: 5553 452e 2e2e 293a 2054 6865 2043 6f6d USE...): The Com │ │ │ -000037c0: 6d6f 6e20 4c69 7370 2060 6c6f 6f70 2720 mon Lisp `loop' │ │ │ -000037d0: 6d61 6372 6f2e 0a56 616c 6964 2063 6c61 macro..Valid cla │ │ │ -000037e0: 7573 6573 2061 7265 3a0a 2020 666f 7220 uses are:. for │ │ │ -000037f0: 5641 5220 6672 6f6d 2f75 7066 726f 6d2f VAR from/upfrom/ │ │ │ -00003800: 646f 776e 6672 6f6d 204e 554d 2074 6f2f downfrom NUM to/ │ │ │ -00003810: 7570 746f 2f64 6f77 6e74 6f2f 6162 6f76 upto/downto/abov │ │ │ -00003820: 652f 6265 6c6f 7720 4e55 4d20 6279 204e e/below NUM by N │ │ │ -00003830: 554d 2c0a 2020 666f 7220 5641 5220 696e UM,. for VAR in │ │ │ -00003840: 204c 4953 5420 6279 2046 554e 432c 2066 LIST by FUNC, f │ │ │ -00003850: 6f72 2056 4152 206f 6e20 4c49 5354 2062 or VAR on LIST b │ │ │ -00003860: 7920 4655 4e43 2c20 666f 7220 5641 5220 y FUNC, for VAR │ │ │ -00003870: 3d20 494e 4954 2074 6865 6e20 4558 5052 = INIT then EXPR │ │ │ -00003880: 2c0a 2020 666f 7220 5641 5220 6163 726f ,. for VAR acro │ │ │ -00003890: 7373 2041 5252 4159 2c20 7265 7065 6174 ss ARRAY, repeat │ │ │ -000038a0: 204e 554d 2c20 7769 7468 2056 4152 203d NUM, with VAR = │ │ │ -000038b0: 2049 4e49 542c 2077 6869 6c65 2043 4f4e INIT, while CON │ │ │ -000038c0: 442c 2075 6e74 696c 2043 4f4e 442c 0a20 D, until COND,. │ │ │ -000038d0: 2061 6c77 6179 7320 434f 4e44 2c20 6e65 always COND, ne │ │ │ -000038e0: 7665 7220 434f 4e44 2c20 7468 6572 6569 ver COND, therei │ │ │ -000038f0: 7320 434f 4e44 2c20 636f 6c6c 6563 7420 s COND, collect │ │ │ -00003900: 4558 5052 2069 6e74 6f20 5641 522c 0a20 EXPR into VAR,. │ │ │ -00003910: 2061 7070 656e 6420 4558 5052 2069 6e74 append EXPR int │ │ │ -00003920: 6f20 5641 522c 206e 636f 6e63 2045 5850 o VAR, nconc EXP │ │ │ -00003930: 5220 696e 746f 2056 4152 2c20 7375 6d20 R into VAR, sum │ │ │ -00003940: 4558 5052 2069 6e74 6f20 5641 522c 0a20 EXPR into VAR,. │ │ │ -00003950: 2063 6f75 6e74 2045 5850 5220 696e 746f count EXPR into │ │ │ -00003960: 2056 4152 2c20 6d61 7869 6d69 7a65 2045 VAR, maximize E │ │ │ -00003970: 5850 5220 696e 746f 2056 4152 2c20 6d69 XPR into VAR, mi │ │ │ -00003980: 6e69 6d69 7a65 2045 5850 5220 696e 746f nimize EXPR into │ │ │ -00003990: 2056 4152 2c0a 2020 6966 2043 4f4e 4420 VAR,. if COND │ │ │ -000039a0: 434c 4155 5345 205b 616e 6420 434c 4155 CLAUSE [and CLAU │ │ │ -000039b0: 5345 5d2e 2e2e 2065 6c73 6520 434c 4155 SE]... else CLAU │ │ │ -000039c0: 5345 205b 616e 6420 434c 4155 5345 2e2e SE [and CLAUSE.. │ │ │ -000039d0: 2e5d 2c0a 2020 756e 6c65 7373 2043 4f4e .],. unless CON │ │ │ -000039e0: 4420 434c 4155 5345 205b 616e 6420 434c D CLAUSE [and CL │ │ │ -000039f0: 4155 5345 5d2e 2e2e 2065 6c73 6520 434c AUSE]... else CL │ │ │ -00003a00: 4155 5345 205b 616e 6420 434c 4155 5345 AUSE [and CLAUSE │ │ │ -00003a10: 2e2e 2e5d 2c0a 2020 646f 2045 5850 5253 ...],. do EXPRS │ │ │ -00003a20: 2e2e 2e2c 2069 6e69 7469 616c 6c79 2045 ..., initially E │ │ │ -00003a30: 5850 5253 2e2e 2e2c 2066 696e 616c 6c79 XPRS..., finally │ │ │ -00003a40: 2045 5850 5253 2e2e 2e2c 2072 6574 7572 EXPRS..., retur │ │ │ -00003a50: 6e20 4558 5052 2c0a 2020 6669 6e61 6c6c n EXPR,. finall │ │ │ -00003a60: 7920 7265 7475 726e 2045 5850 522c 206e y return EXPR, n │ │ │ -00003a70: 616d 6564 204e 414d 452e 1f0a 2861 7574 amed NAME...(aut │ │ │ -00003a80: 6f6c 6f61 6420 276c 6f6f 7020 2263 6c2d oload 'loop "cl- │ │ │ -00003a90: 6d61 6373 2220 2728 2324 202e 2031 3432 macs" '(#$ . 142 │ │ │ -00003aa0: 3437 2920 6e69 6c20 276d 6163 726f 290a 47) nil 'macro). │ │ │ -00003ab0: 2340 3938 2054 6865 2043 6f6d 6d6f 6e20 #@98 The Common │ │ │ -00003ac0: 4c69 7370 2060 646f 2720 6c6f 6f70 2e0a Lisp `do' loop.. │ │ │ -00003ad0: 466f 726d 6174 2069 733a 2028 646f 2028 Format is: (do ( │ │ │ -00003ae0: 2856 4152 2049 4e49 5420 5b53 5445 505d (VAR INIT [STEP] │ │ │ -00003af0: 292e 2e2e 2920 2845 4e44 2d54 4553 5420 )...) (END-TEST │ │ │ -00003b00: 5b52 4553 554c 542e 2e2e 5d29 2042 4f44 [RESULT...]) BOD │ │ │ -00003b10: 592e 2e2e 291f 0a28 6175 746f 6c6f 6164 Y...)..(autoload │ │ │ -00003b20: 2027 646f 2022 636c 2d6d 6163 7322 2027 'do "cl-macs" ' │ │ │ -00003b30: 2823 2420 2e20 3135 3032 3929 206e 696c (#$ . 15029) nil │ │ │ -00003b40: 2027 6d61 6372 6f29 0a23 4031 3030 2054 'macro).#@100 T │ │ │ -00003b50: 6865 2043 6f6d 6d6f 6e20 4c69 7370 2060 he Common Lisp ` │ │ │ -00003b60: 646f 2a27 206c 6f6f 702e 0a46 6f72 6d61 do*' loop..Forma │ │ │ -00003b70: 7420 6973 3a20 2864 6f2a 2028 2856 4152 t is: (do* ((VAR │ │ │ -00003b80: 2049 4e49 5420 5b53 5445 505d 292e 2e2e INIT [STEP])... │ │ │ -00003b90: 2920 2845 4e44 2d54 4553 5420 5b52 4553 ) (END-TEST [RES │ │ │ -00003ba0: 554c 542e 2e2e 5d29 2042 4f44 592e 2e2e ULT...]) BODY... │ │ │ -00003bb0: 291f 0a28 6175 746f 6c6f 6164 2027 646f )..(autoload 'do │ │ │ -00003bc0: 2a20 2263 6c2d 6d61 6373 2220 2728 2324 * "cl-macs" '(#$ │ │ │ -00003bd0: 202e 2031 3531 3833 2920 6e69 6c20 276d . 15183) nil 'm │ │ │ -00003be0: 6163 726f 290a 2340 3137 3520 2864 6f6c acro).#@175 (dol │ │ │ -00003bf0: 6973 7420 2856 4152 204c 4953 5420 5b52 ist (VAR LIST [R │ │ │ -00003c00: 4553 554c 545d 2920 424f 4459 2e2e 2e29 ESULT]) BODY...) │ │ │ -00003c10: 3a20 6c6f 6f70 206f 7665 7220 6120 6c69 : loop over a li │ │ │ -00003c20: 7374 2e0a 4576 616c 7561 7465 2042 4f44 st..Evaluate BOD │ │ │ -00003c30: 5920 7769 7468 2056 4152 2062 6f75 6e64 Y with VAR bound │ │ │ -00003c40: 2074 6f20 6561 6368 2060 6361 7227 2066 to each `car' f │ │ │ -00003c50: 726f 6d20 4c49 5354 2c20 696e 2074 7572 rom LIST, in tur │ │ │ -00003c60: 6e2e 0a54 6865 6e20 6576 616c 7561 7465 n..Then evaluate │ │ │ -00003c70: 2052 4553 554c 5420 746f 2067 6574 2072 RESULT to get r │ │ │ -00003c80: 6574 7572 6e20 7661 6c75 652c 2064 6566 eturn value, def │ │ │ -00003c90: 6175 6c74 206e 696c 2e1f 0a28 6175 746f ault nil...(auto │ │ │ -00003ca0: 6c6f 6164 2027 646f 6c69 7374 2022 636c load 'dolist "cl │ │ │ -00003cb0: 2d6d 6163 7322 2027 2823 2420 2e20 3135 -macs" '(#$ . 15 │ │ │ -00003cc0: 3334 3029 206e 696c 2027 6d61 6372 6f29 340) nil 'macro) │ │ │ -00003cd0: 0a23 4032 3231 2028 646f 7469 6d65 7320 .#@221 (dotimes │ │ │ -00003ce0: 2856 4152 2043 4f55 4e54 205b 5245 5355 (VAR COUNT [RESU │ │ │ -00003cf0: 4c54 5d29 2042 4f44 592e 2e2e 293a 206c LT]) BODY...): l │ │ │ -00003d00: 6f6f 7020 6120 6365 7274 6169 6e20 6e75 oop a certain nu │ │ │ -00003d10: 6d62 6572 206f 6620 7469 6d65 732e 0a45 mber of times..E │ │ │ -00003d20: 7661 6c75 6174 6520 424f 4459 2077 6974 valuate BODY wit │ │ │ -00003d30: 6820 5641 5220 626f 756e 6420 746f 2073 h VAR bound to s │ │ │ -00003d40: 7563 6365 7373 6976 6520 696e 7465 6765 uccessive intege │ │ │ -00003d50: 7273 2066 726f 6d20 302c 2069 6e63 6c75 rs from 0, inclu │ │ │ -00003d60: 7369 7665 2c0a 746f 2043 4f55 4e54 2c20 sive,.to COUNT, │ │ │ -00003d70: 6578 636c 7573 6976 652e 2020 5468 656e exclusive. Then │ │ │ -00003d80: 2065 7661 6c75 6174 6520 5245 5355 4c54 evaluate RESULT │ │ │ -00003d90: 2074 6f20 6765 7420 7265 7475 726e 2076 to get return v │ │ │ -00003da0: 616c 7565 2c20 6465 6661 756c 740a 6e69 alue, default.ni │ │ │ -00003db0: 6c2e 1f0a 2861 7574 6f6c 6f61 6420 2764 l...(autoload 'd │ │ │ -00003dc0: 6f74 696d 6573 2022 636c 2d6d 6163 7322 otimes "cl-macs" │ │ │ -00003dd0: 2027 2823 2420 2e20 3135 3537 3529 206e '(#$ . 15575) n │ │ │ -00003de0: 696c 2027 6d61 6372 6f29 0a23 4031 3536 il 'macro).#@156 │ │ │ -00003df0: 2028 646f 7379 6d62 6f6c 7320 2856 4152 (dosymbols (VAR │ │ │ -00003e00: 205b 4f42 4152 5241 5920 5b52 4553 554c [OBARRAY [RESUL │ │ │ -00003e10: 545d 5d29 2042 4f44 592e 2e2e 293a 206c T]]) BODY...): l │ │ │ -00003e20: 6f6f 7020 6f76 6572 2061 6c6c 2073 796d oop over all sym │ │ │ -00003e30: 626f 6c73 2e0a 4576 616c 7561 7465 2042 bols..Evaluate B │ │ │ -00003e40: 4f44 5920 7769 7468 2056 4152 2062 6f75 ODY with VAR bou │ │ │ -00003e50: 6e64 2074 6f20 6561 6368 2069 6e74 6572 nd to each inter │ │ │ -00003e60: 6e65 6420 7379 6d62 6f6c 2c20 6f72 2074 ned symbol, or t │ │ │ -00003e70: 6f20 6561 6368 2073 796d 626f 6c0a 6672 o each symbol.fr │ │ │ -00003e80: 6f6d 204f 4241 5252 4159 2e1f 0a28 6175 om OBARRAY...(au │ │ │ -00003e90: 746f 6c6f 6164 2027 646f 2d73 796d 626f toload 'do-symbo │ │ │ -00003ea0: 6c73 2022 636c 2d6d 6163 7322 2027 2823 ls "cl-macs" '(# │ │ │ -00003eb0: 2420 2e20 3135 3835 3729 206e 696c 2027 $ . 15857) nil ' │ │ │ -00003ec0: 6d61 6372 6f29 0a28 6279 7465 2d63 6f64 macro).(byte-cod │ │ │ -00003ed0: 6520 22c0 c1c2 c389 c425 8722 205b 6175 e "......%." [au │ │ │ -00003ee0: 746f 6c6f 6164 2064 6f2d 616c 6c2d 7379 toload do-all-sy │ │ │ -00003ef0: 6d62 6f6c 7320 2263 6c2d 6d61 6373 2220 mbols "cl-macs" │ │ │ -00003f00: 6e69 6c20 6d61 6372 6f5d 2036 290a 2340 nil macro] 6).#@ │ │ │ -00003f10: 3230 3520 2870 7365 7471 2053 594d 2056 205 (psetq SYM V │ │ │ -00003f20: 414c 2053 594d 2056 414c 202e 2e2e 293a AL SYM VAL ...): │ │ │ -00003f30: 2073 6574 2053 594d 7320 746f 2074 6865 set SYMs to the │ │ │ -00003f40: 2076 616c 7565 7320 5641 4c73 2069 6e20 values VALs in │ │ │ -00003f50: 7061 7261 6c6c 656c 2e0a 5468 6973 2069 parallel..This i │ │ │ -00003f60: 7320 6c69 6b65 2060 7365 7471 272c 2065 s like `setq', e │ │ │ -00003f70: 7863 6570 7420 7468 6174 2061 6c6c 2056 xcept that all V │ │ │ -00003f80: 414c 2066 6f72 6d73 2061 7265 2065 7661 AL forms are eva │ │ │ -00003f90: 6c75 6174 6564 2028 696e 206f 7264 6572 luated (in order │ │ │ -00003fa0: 290a 6265 666f 7265 2061 7373 6967 6e69 ).before assigni │ │ │ -00003fb0: 6e67 2061 6e79 2073 796d 626f 6c73 2053 ng any symbols S │ │ │ -00003fc0: 594d 2074 6f20 7468 6520 636f 7272 6573 YM to the corres │ │ │ -00003fd0: 706f 6e64 696e 6720 7661 6c75 6573 2e1f ponding values.. │ │ │ -00003fe0: 0a28 6175 746f 6c6f 6164 2027 7073 6574 .(autoload 'pset │ │ │ -00003ff0: 7120 2263 6c2d 6d61 6373 2220 2728 2324 q "cl-macs" '(#$ │ │ │ -00004000: 202e 2031 3631 3438 2920 6e69 6c20 276d . 16148) nil 'm │ │ │ -00004010: 6163 726f 290a 2340 3434 3420 2870 726f acro).#@444 (pro │ │ │ -00004020: 6776 2053 594d 424f 4c53 2056 414c 5545 gv SYMBOLS VALUE │ │ │ -00004030: 5320 424f 4459 2e2e 2e29 3a20 6269 6e64 S BODY...): bind │ │ │ -00004040: 2053 594d 424f 4c53 2074 6f20 5641 4c55 SYMBOLS to VALU │ │ │ -00004050: 4553 2064 796e 616d 6963 616c 6c79 2069 ES dynamically i │ │ │ -00004060: 6e20 424f 4459 2e0a 5468 6520 666f 726d n BODY..The form │ │ │ -00004070: 7320 5359 4d42 4f4c 5320 616e 6420 5641 s SYMBOLS and VA │ │ │ -00004080: 4c55 4553 2061 7265 2065 7661 6c75 6174 LUES are evaluat │ │ │ -00004090: 6564 2c20 616e 6420 6d75 7374 2065 7661 ed, and must eva │ │ │ -000040a0: 6c75 6174 6520 746f 206c 6973 7473 2e0a luate to lists.. │ │ │ -000040b0: 4561 6368 2053 594d 424f 4c20 696e 2074 Each SYMBOL in t │ │ │ -000040c0: 6865 2066 6972 7374 206c 6973 7420 6973 he first list is │ │ │ -000040d0: 2062 6f75 6e64 2074 6f20 7468 6520 636f bound to the co │ │ │ -000040e0: 7272 6573 706f 6e64 696e 6720 5641 4c55 rresponding VALU │ │ │ -000040f0: 4520 696e 2074 6865 0a73 6563 6f6e 6420 E in the.second │ │ │ -00004100: 6c69 7374 2028 6f72 206d 6164 6520 756e list (or made un │ │ │ -00004110: 626f 756e 6420 6966 2056 414c 5545 5320 bound if VALUES │ │ │ -00004120: 6973 2073 686f 7274 6572 2074 6861 6e20 is shorter than │ │ │ -00004130: 5359 4d42 4f4c 5329 3b20 7468 656e 2074 SYMBOLS); then t │ │ │ -00004140: 6865 0a42 4f44 5920 666f 726d 7320 6172 he.BODY forms ar │ │ │ -00004150: 6520 6578 6563 7574 6564 2061 6e64 2074 e executed and t │ │ │ -00004160: 6865 6972 2072 6573 756c 7420 6973 2072 heir result is r │ │ │ -00004170: 6574 7572 6e65 642e 2020 5468 6973 2069 eturned. This i │ │ │ -00004180: 7320 6d75 6368 206c 696b 650a 6120 606c s much like.a `l │ │ │ -00004190: 6574 2720 666f 726d 2c20 6578 6365 7074 et' form, except │ │ │ -000041a0: 2074 6861 7420 7468 6520 6c69 7374 206f that the list o │ │ │ -000041b0: 6620 7379 6d62 6f6c 7320 6361 6e20 6265 f symbols can be │ │ │ -000041c0: 2063 6f6d 7075 7465 6420 6174 2072 756e computed at run │ │ │ -000041d0: 2d74 696d 652e 1f0a 2861 7574 6f6c 6f61 -time...(autoloa │ │ │ -000041e0: 6420 2770 726f 6776 2022 636c 2d6d 6163 d 'progv "cl-mac │ │ │ -000041f0: 7322 2027 2823 2420 2e20 3136 3431 3229 s" '(#$ . 16412) │ │ │ -00004200: 206e 696c 2027 6d61 6372 6f29 0a23 4033 nil 'macro).#@3 │ │ │ -00004210: 3532 2028 666c 6574 2028 2846 554e 4320 52 (flet ((FUNC │ │ │ -00004220: 4152 474c 4953 5420 424f 4459 2e2e 2e29 ARGLIST BODY...) │ │ │ -00004230: 202e 2e2e 2920 464f 524d 2e2e 2e29 3a20 ...) FORM...): │ │ │ -00004240: 6d61 6b65 2074 656d 706f 7261 7279 2066 make temporary f │ │ │ -00004250: 756e 6374 696f 6e20 6465 666e 732e 0a54 unction defns..T │ │ │ -00004260: 6869 7320 6973 2061 6e20 616e 616c 6f67 his is an analog │ │ │ -00004270: 7565 206f 6620 606c 6574 2720 7468 6174 ue of `let' that │ │ │ -00004280: 206f 7065 7261 7465 7320 6f6e 2074 6865 operates on the │ │ │ -00004290: 2066 756e 6374 696f 6e20 6365 6c6c 206f function cell o │ │ │ -000042a0: 6620 4655 4e43 0a72 6174 6865 7220 7468 f FUNC.rather th │ │ │ -000042b0: 616e 2069 7473 2076 616c 7565 2063 656c an its value cel │ │ │ -000042c0: 6c2e 2020 5468 6520 464f 524d 7320 6172 l. The FORMs ar │ │ │ -000042d0: 6520 6576 616c 7561 7465 6420 7769 7468 e evaluated with │ │ │ -000042e0: 2074 6865 2073 7065 6369 6669 6564 0a66 the specified.f │ │ │ -000042f0: 756e 6374 696f 6e20 6465 6669 6e69 7469 unction definiti │ │ │ -00004300: 6f6e 7320 696e 2070 6c61 6365 2c20 7468 ons in place, th │ │ │ -00004310: 656e 2074 6865 2064 6566 696e 6974 696f en the definitio │ │ │ -00004320: 6e73 2061 7265 2075 6e64 6f6e 6520 2874 ns are undone (t │ │ │ -00004330: 6865 2046 554e 4373 0a67 6f20 6261 636b he FUNCs.go back │ │ │ -00004340: 2074 6f20 7468 6569 7220 7072 6576 696f to their previo │ │ │ -00004350: 7573 2064 6566 696e 6974 696f 6e73 2c20 us definitions, │ │ │ -00004360: 6f72 206c 6163 6b20 7468 6572 656f 6629 or lack thereof) │ │ │ -00004370: 2e1f 0a28 6175 746f 6c6f 6164 2027 666c ...(autoload 'fl │ │ │ -00004380: 6574 2022 636c 2d6d 6163 7322 2027 2823 et "cl-macs" '(# │ │ │ -00004390: 2420 2e20 3136 3931 3529 206e 696c 2027 $ . 16915) nil ' │ │ │ -000043a0: 6d61 6372 6f29 0a23 4032 3237 2028 6c61 macro).#@227 (la │ │ │ -000043b0: 6265 6c73 2028 2846 554e 4320 4152 474c bels ((FUNC ARGL │ │ │ -000043c0: 4953 5420 424f 4459 2e2e 2e29 202e 2e2e IST BODY...) ... │ │ │ -000043d0: 2920 464f 524d 2e2e 2e29 3a20 6d61 6b65 ) FORM...): make │ │ │ -000043e0: 2074 656d 706f 7261 7279 2066 756e 6320 temporary func │ │ │ -000043f0: 6269 6e64 696e 6773 2e0a 5468 6973 2069 bindings..This i │ │ │ -00004400: 7320 6c69 6b65 2060 666c 6574 272c 2065 s like `flet', e │ │ │ -00004410: 7863 6570 7420 7468 6520 6269 6e64 696e xcept the bindin │ │ │ -00004420: 6773 2061 7265 206c 6578 6963 616c 2069 gs are lexical i │ │ │ -00004430: 6e73 7465 6164 206f 6620 6479 6e61 6d69 nstead of dynami │ │ │ -00004440: 632e 0a55 6e6c 696b 6520 6066 6c65 7427 c..Unlike `flet' │ │ │ -00004450: 2c20 7468 6973 206d 6163 726f 2069 7320 , this macro is │ │ │ -00004460: 6675 6c6c 7920 636f 6d70 6c69 616e 7420 fully compliant │ │ │ -00004470: 7769 7468 2074 6865 2043 6f6d 6d6f 6e20 with the Common │ │ │ -00004480: 4c69 7370 2073 7461 6e64 6172 642e 1f0a Lisp standard... │ │ │ -00004490: 2861 7574 6f6c 6f61 6420 276c 6162 656c (autoload 'label │ │ │ -000044a0: 7320 2263 6c2d 6d61 6373 2220 2728 2324 s "cl-macs" '(#$ │ │ │ -000044b0: 202e 2031 3733 3235 2920 6e69 6c20 276d . 17325) nil 'm │ │ │ -000044c0: 6163 726f 290a 2340 3133 3620 286d 6163 acro).#@136 (mac │ │ │ -000044d0: 726f 6c65 7420 2828 4e41 4d45 2041 5247 rolet ((NAME ARG │ │ │ -000044e0: 4c49 5354 2042 4f44 592e 2e2e 2920 2e2e LIST BODY...) .. │ │ │ -000044f0: 2e29 2046 4f52 4d2e 2e2e 293a 206d 616b .) FORM...): mak │ │ │ -00004500: 6520 7465 6d70 6f72 6172 7920 6d61 6372 e temporary macr │ │ │ -00004510: 6f20 6465 666e 732e 0a54 6869 7320 6973 o defns..This is │ │ │ -00004520: 206c 696b 6520 6066 6c65 7427 2c20 6275 like `flet', bu │ │ │ -00004530: 7420 666f 7220 6d61 6372 6f73 2069 6e73 t for macros ins │ │ │ -00004540: 7465 6164 206f 6620 6675 6e63 7469 6f6e tead of function │ │ │ -00004550: 732e 1f0a 2861 7574 6f6c 6f61 6420 276d s...(autoload 'm │ │ │ -00004560: 6163 726f 6c65 7420 2263 6c2d 6d61 6373 acrolet "cl-macs │ │ │ -00004570: 2220 2728 2324 202e 2031 3736 3132 2920 " '(#$ . 17612) │ │ │ -00004580: 6e69 6c20 276d 6163 726f 290a 2340 3231 nil 'macro).#@21 │ │ │ -00004590: 3820 2873 796d 626f 6c2d 6d61 6372 6f6c 8 (symbol-macrol │ │ │ -000045a0: 6574 2028 284e 414d 4520 4558 5041 4e53 et ((NAME EXPANS │ │ │ -000045b0: 494f 4e29 202e 2e2e 2920 464f 524d 2e2e ION) ...) FORM.. │ │ │ -000045c0: 2e29 3a20 6d61 6b65 2073 796d 626f 6c20 .): make symbol │ │ │ -000045d0: 6d61 6372 6f20 6465 666e 732e 0a57 6974 macro defns..Wit │ │ │ -000045e0: 6869 6e20 7468 6520 626f 6479 2046 4f52 hin the body FOR │ │ │ -000045f0: 4d73 2c20 7265 6665 7265 6e63 6573 2074 Ms, references t │ │ │ -00004600: 6f20 7468 6520 7661 7269 6162 6c65 204e o the variable N │ │ │ -00004610: 414d 4520 7769 6c6c 2062 6520 7265 706c AME will be repl │ │ │ -00004620: 6163 6564 0a62 7920 4558 5041 4e53 494f aced.by EXPANSIO │ │ │ -00004630: 4e2c 2061 6e64 2028 7365 7471 204e 414d N, and (setq NAM │ │ │ -00004640: 4520 2e2e 2e29 2077 696c 6c20 6163 7420 E ...) will act │ │ │ -00004650: 6c69 6b65 2028 7365 7466 2045 5850 414e like (setf EXPAN │ │ │ -00004660: 5349 4f4e 202e 2e2e 292e 1f0a 2861 7574 SION ...)...(aut │ │ │ -00004670: 6f6c 6f61 6420 2773 796d 626f 6c2d 6d61 oload 'symbol-ma │ │ │ -00004680: 6372 6f6c 6574 2022 636c 2d6d 6163 7322 crolet "cl-macs" │ │ │ -00004690: 2027 2823 2420 2e20 3137 3831 3029 206e '(#$ . 17810) n │ │ │ -000046a0: 696c 2027 6d61 6372 6f29 0a23 4031 3731 il 'macro).#@171 │ │ │ -000046b0: 2028 6c65 7869 6361 6c2d 6c65 7420 4249 (lexical-let BI │ │ │ -000046c0: 4e44 494e 4753 2042 4f44 592e 2e2e 293a NDINGS BODY...): │ │ │ -000046d0: 206c 696b 6520 606c 6574 272c 2062 7574 like `let', but │ │ │ -000046e0: 206c 6578 6963 616c 6c79 2073 636f 7065 lexically scope │ │ │ -000046f0: 642e 0a54 6865 206d 6169 6e20 7669 7369 d..The main visi │ │ │ -00004700: 626c 6520 6469 6666 6572 656e 6365 2069 ble difference i │ │ │ -00004710: 7320 7468 6174 206c 616d 6264 6173 2069 s that lambdas i │ │ │ -00004720: 6e73 6964 6520 424f 4459 2077 696c 6c20 nside BODY will │ │ │ -00004730: 6372 6561 7465 0a6c 6578 6963 616c 2063 create.lexical c │ │ │ -00004740: 6c6f 7375 7265 7320 6173 2069 6e20 436f losures as in Co │ │ │ -00004750: 6d6d 6f6e 204c 6973 702e 1f0a 2861 7574 mmon Lisp...(aut │ │ │ -00004760: 6f6c 6f61 6420 276c 6578 6963 616c 2d6c oload 'lexical-l │ │ │ -00004770: 6574 2022 636c 2d6d 6163 7322 2027 2823 et "cl-macs" '(# │ │ │ -00004780: 2420 2e20 3138 3039 3729 206e 696c 2027 $ . 18097) nil ' │ │ │ -00004790: 6d61 6372 6f29 0a23 4031 3733 2028 6c65 macro).#@173 (le │ │ │ -000047a0: 7869 6361 6c2d 6c65 742a 2042 494e 4449 xical-let* BINDI │ │ │ -000047b0: 4e47 5320 424f 4459 2e2e 2e29 3a20 6c69 NGS BODY...): li │ │ │ -000047c0: 6b65 2060 6c65 742a 272c 2062 7574 206c ke `let*', but l │ │ │ -000047d0: 6578 6963 616c 6c79 2073 636f 7065 642e exically scoped. │ │ │ -000047e0: 0a54 6865 206d 6169 6e20 7669 7369 626c .The main visibl │ │ │ -000047f0: 6520 6469 6666 6572 656e 6365 2069 7320 e difference is │ │ │ -00004800: 7468 6174 206c 616d 6264 6173 2069 6e73 that lambdas ins │ │ │ -00004810: 6964 6520 424f 4459 2077 696c 6c20 6372 ide BODY will cr │ │ │ -00004820: 6561 7465 0a6c 6578 6963 616c 2063 6c6f eate.lexical clo │ │ │ -00004830: 7375 7265 7320 6173 2069 6e20 436f 6d6d sures as in Comm │ │ │ -00004840: 6f6e 204c 6973 702e 1f0a 2861 7574 6f6c on Lisp...(autol │ │ │ -00004850: 6f61 6420 276c 6578 6963 616c 2d6c 6574 oad 'lexical-let │ │ │ -00004860: 2a20 2263 6c2d 6d61 6373 2220 2728 2324 * "cl-macs" '(#$ │ │ │ -00004870: 202e 2031 3833 3333 2920 6e69 6c20 276d . 18333) nil 'm │ │ │ -00004880: 6163 726f 290a 2340 3431 3120 286d 756c acro).#@411 (mul │ │ │ -00004890: 7469 706c 652d 7661 6c75 652d 6269 6e64 tiple-value-bind │ │ │ -000048a0: 2028 5359 4d20 5359 4d2e 2e2e 2920 464f (SYM SYM...) FO │ │ │ -000048b0: 524d 2042 4f44 5929 3a20 636f 6c6c 6563 RM BODY): collec │ │ │ -000048c0: 7420 6d75 6c74 6970 6c65 2072 6574 7572 t multiple retur │ │ │ -000048d0: 6e20 7661 6c75 6573 2e0a 464f 524d 206d n values..FORM m │ │ │ -000048e0: 7573 7420 7265 7475 726e 2061 206c 6973 ust return a lis │ │ │ -000048f0: 743b 2074 6865 2042 4f44 5920 6973 2074 t; the BODY is t │ │ │ -00004900: 6865 6e20 6578 6563 7574 6564 2077 6974 hen executed wit │ │ │ -00004910: 6820 7468 6520 6669 7273 7420 4e20 656c h the first N el │ │ │ -00004920: 656d 656e 7473 0a6f 6620 7468 6973 206c ements.of this l │ │ │ -00004930: 6973 7420 626f 756e 6420 2860 6c65 7427 ist bound (`let' │ │ │ -00004940: 2d73 7479 6c65 2920 746f 2065 6163 6820 -style) to each │ │ │ -00004950: 6f66 2074 6865 2073 796d 626f 6c73 2053 of the symbols S │ │ │ -00004960: 594d 2069 6e20 7475 726e 2e20 2054 6869 YM in turn. Thi │ │ │ -00004970: 730a 6973 2061 6e61 6c6f 676f 7573 2074 s.is analogous t │ │ │ -00004980: 6f20 7468 6520 436f 6d6d 6f6e 204c 6973 o the Common Lis │ │ │ -00004990: 7020 606d 756c 7469 706c 652d 7661 6c75 p `multiple-valu │ │ │ -000049a0: 652d 6269 6e64 2720 6d61 6372 6f2c 2075 e-bind' macro, u │ │ │ -000049b0: 7369 6e67 206c 6973 7473 2074 6f0a 7369 sing lists to.si │ │ │ -000049c0: 6d75 6c61 7465 2074 7275 6520 6d75 6c74 mulate true mult │ │ │ -000049d0: 6970 6c65 2072 6574 7572 6e20 7661 6c75 iple return valu │ │ │ -000049e0: 6573 2e20 2046 6f72 2063 6f6d 7061 7469 es. For compati │ │ │ -000049f0: 6269 6c69 7479 2c20 2876 616c 7565 7320 bility, (values │ │ │ -00004a00: 4120 4220 4329 2069 730a 6120 7379 6e6f A B C) is.a syno │ │ │ -00004a10: 6e79 6d20 666f 7220 286c 6973 7420 4120 nym for (list A │ │ │ -00004a20: 4220 4329 2e1f 0a28 6175 746f 6c6f 6164 B C)...(autoload │ │ │ -00004a30: 2027 6d75 6c74 6970 6c65 2d76 616c 7565 'multiple-value │ │ │ -00004a40: 2d62 696e 6420 2263 6c2d 6d61 6373 2220 -bind "cl-macs" │ │ │ -00004a50: 2728 2324 202e 2031 3835 3732 2920 6e69 '(#$ . 18572) ni │ │ │ -00004a60: 6c20 276d 6163 726f 290a 2340 3336 3620 l 'macro).#@366 │ │ │ -00004a70: 286d 756c 7469 706c 652d 7661 6c75 652d (multiple-value- │ │ │ -00004a80: 7365 7471 2028 5359 4d20 5359 4d2e 2e2e setq (SYM SYM... │ │ │ -00004a90: 2920 464f 524d 293a 2063 6f6c 6c65 6374 ) FORM): collect │ │ │ -00004aa0: 206d 756c 7469 706c 6520 7265 7475 726e multiple return │ │ │ -00004ab0: 2076 616c 7565 732e 0a46 4f52 4d20 6d75 values..FORM mu │ │ │ -00004ac0: 7374 2072 6574 7572 6e20 6120 6c69 7374 st return a list │ │ │ -00004ad0: 3b20 7468 6520 6669 7273 7420 4e20 656c ; the first N el │ │ │ -00004ae0: 656d 656e 7473 206f 6620 7468 6973 206c ements of this l │ │ │ -00004af0: 6973 7420 6172 6520 7374 6f72 6564 2069 ist are stored i │ │ │ -00004b00: 6e0a 6561 6368 206f 6620 7468 6520 7379 n.each of the sy │ │ │ -00004b10: 6d62 6f6c 7320 5359 4d20 696e 2074 7572 mbols SYM in tur │ │ │ -00004b20: 6e2e 2020 5468 6973 2069 7320 616e 616c n. This is anal │ │ │ -00004b30: 6f67 6f75 7320 746f 2074 6865 2043 6f6d ogous to the Com │ │ │ -00004b40: 6d6f 6e20 4c69 7370 0a60 6d75 6c74 6970 mon Lisp.`multip │ │ │ -00004b50: 6c65 2d76 616c 7565 2d73 6574 7127 206d le-value-setq' m │ │ │ -00004b60: 6163 726f 2c20 7573 696e 6720 6c69 7374 acro, using list │ │ │ -00004b70: 7320 746f 2073 696d 756c 6174 6520 7472 s to simulate tr │ │ │ -00004b80: 7565 206d 756c 7469 706c 6520 7265 7475 ue multiple retu │ │ │ -00004b90: 726e 0a76 616c 7565 732e 2020 466f 7220 rn.values. For │ │ │ -00004ba0: 636f 6d70 6174 6962 696c 6974 792c 2028 compatibility, ( │ │ │ -00004bb0: 7661 6c75 6573 2041 2042 2043 2920 6973 values A B C) is │ │ │ -00004bc0: 2061 2073 796e 6f6e 796d 2066 6f72 2028 a synonym for ( │ │ │ -00004bd0: 6c69 7374 2041 2042 2043 292e 1f0a 2861 list A B C)...(a │ │ │ -00004be0: 7574 6f6c 6f61 6420 276d 756c 7469 706c utoload 'multipl │ │ │ -00004bf0: 652d 7661 6c75 652d 7365 7471 2022 636c e-value-setq "cl │ │ │ -00004c00: 2d6d 6163 7322 2027 2823 2420 2e20 3139 -macs" '(#$ . 19 │ │ │ -00004c10: 3035 3629 206e 696c 2027 6d61 6372 6f29 056) nil 'macro) │ │ │ -00004c20: 0a28 6279 7465 2d63 6f64 6520 22c0 c1c2 .(byte-code "... │ │ │ -00004c30: c389 c425 88c0 c5c2 c389 c425 88c0 c6c2 ...%.......%.... │ │ │ -00004c40: c389 c425 8722 205b 6175 746f 6c6f 6164 ...%." [autoload │ │ │ -00004c50: 206c 6f63 616c 6c79 2022 636c 2d6d 6163 locally "cl-mac │ │ │ -00004c60: 7322 206e 696c 206d 6163 726f 2074 6865 s" nil macro the │ │ │ -00004c70: 2064 6563 6c61 7265 5d20 3629 0a23 4035 declare] 6).#@5 │ │ │ -00004c80: 3130 2028 6465 6669 6e65 2d73 6574 662d 10 (define-setf- │ │ │ -00004c90: 6d65 7468 6f64 204e 414d 4520 4152 474c method NAME ARGL │ │ │ -00004ca0: 4953 5420 424f 4459 2e2e 2e29 3a20 6465 IST BODY...): de │ │ │ -00004cb0: 6669 6e65 2061 2060 7365 7466 2720 6d65 fine a `setf' me │ │ │ -00004cc0: 7468 6f64 2e0a 5468 6973 206d 6574 686f thod..This metho │ │ │ -00004cd0: 6420 7368 6f77 7320 686f 7720 746f 2068 d shows how to h │ │ │ -00004ce0: 616e 646c 6520 6073 6574 6627 7320 746f andle `setf's to │ │ │ -00004cf0: 2070 6c61 6365 7320 6f66 2074 6865 2066 places of the f │ │ │ -00004d00: 6f72 6d20 284e 414d 4520 4152 4753 2e2e orm (NAME ARGS.. │ │ │ -00004d10: 2e29 2e0a 5468 6520 6172 6775 6d65 6e74 .)..The argument │ │ │ -00004d20: 2066 6f72 6d73 2041 5247 5320 6172 6520 forms ARGS are │ │ │ -00004d30: 626f 756e 6420 6163 636f 7264 696e 6720 bound according │ │ │ -00004d40: 746f 2041 5247 4c49 5354 2c20 6173 2069 to ARGLIST, as i │ │ │ -00004d50: 6620 4e41 4d45 2077 6572 650a 676f 696e f NAME were.goin │ │ │ -00004d60: 6720 746f 2062 6520 6578 7061 6e64 6564 g to be expanded │ │ │ -00004d70: 2061 7320 6120 6d61 6372 6f2c 2074 6865 as a macro, the │ │ │ -00004d80: 6e20 7468 6520 424f 4459 2066 6f72 6d73 n the BODY forms │ │ │ -00004d90: 2061 7265 2065 7865 6375 7465 6420 616e are executed an │ │ │ -00004da0: 6420 6d75 7374 0a72 6574 7572 6e20 6120 d must.return a │ │ │ -00004db0: 6c69 7374 206f 6620 6669 7665 2065 6c65 list of five ele │ │ │ -00004dc0: 6d65 6e74 733a 2061 2074 656d 706f 7261 ments: a tempora │ │ │ -00004dd0: 7279 2d76 6172 6961 626c 6573 206c 6973 ry-variables lis │ │ │ -00004de0: 742c 2061 2076 616c 7565 2d66 6f72 6d73 t, a value-forms │ │ │ -00004df0: 0a6c 6973 742c 2061 2073 746f 7265 2d76 .list, a store-v │ │ │ -00004e00: 6172 6961 626c 6573 206c 6973 7420 286f ariables list (o │ │ │ -00004e10: 6620 6c65 6e67 7468 206f 6e65 292c 2061 f length one), a │ │ │ -00004e20: 2073 746f 7265 2d66 6f72 6d2c 2061 6e64 store-form, and │ │ │ -00004e30: 2061 6e20 6163 6365 7373 2d0a 666f 726d an access-.form │ │ │ -00004e40: 2e20 2053 6565 2060 6465 6673 6574 6627 . See `defsetf' │ │ │ -00004e50: 2066 6f72 2061 2073 696d 706c 6572 2077 for a simpler w │ │ │ -00004e60: 6179 2074 6f20 6465 6669 6e65 206d 6f73 ay to define mos │ │ │ -00004e70: 7420 7365 7466 2d6d 6574 686f 6473 2e1f t setf-methods.. │ │ │ -00004e80: 0a28 6175 746f 6c6f 6164 2027 6465 6669 .(autoload 'defi │ │ │ -00004e90: 6e65 2d73 6574 662d 6d65 7468 6f64 2022 ne-setf-method " │ │ │ -00004ea0: 636c 2d6d 6163 7322 2027 2823 2420 2e20 cl-macs" '(#$ . │ │ │ -00004eb0: 3139 3538 3729 206e 696c 2027 6d61 6372 19587) nil 'macr │ │ │ -00004ec0: 6f29 0a23 4038 3339 2028 6465 6673 6574 o).#@839 (defset │ │ │ -00004ed0: 6620 4e41 4d45 2046 554e 4329 3a20 6465 f NAME FUNC): de │ │ │ -00004ee0: 6669 6e65 2061 2060 7365 7466 2720 6d65 fine a `setf' me │ │ │ -00004ef0: 7468 6f64 2e0a 5468 6973 206d 6163 726f thod..This macro │ │ │ -00004f00: 2069 7320 616e 2065 6173 792d 746f 2d75 is an easy-to-u │ │ │ -00004f10: 7365 2073 7562 7374 6974 7574 6520 666f se substitute fo │ │ │ -00004f20: 7220 6064 6566 696e 652d 7365 7466 2d6d r `define-setf-m │ │ │ -00004f30: 6574 686f 6427 2074 6861 7420 776f 726b ethod' that work │ │ │ -00004f40: 730a 7765 6c6c 2066 6f72 2073 696d 706c s.well for simpl │ │ │ -00004f50: 6520 706c 6163 6520 666f 726d 732e 2020 e place forms. │ │ │ -00004f60: 496e 2074 6865 2073 696d 706c 6520 6064 In the simple `d │ │ │ -00004f70: 6566 7365 7466 2720 666f 726d 2c20 6073 efsetf' form, `s │ │ │ -00004f80: 6574 6627 7320 6f66 0a74 6865 2066 6f72 etf's of.the for │ │ │ -00004f90: 6d20 2873 6574 6620 284e 414d 4520 4152 m (setf (NAME AR │ │ │ -00004fa0: 4753 2e2e 2e29 2056 414c 2920 6172 6520 GS...) VAL) are │ │ │ -00004fb0: 7472 616e 7366 6f72 6d65 6420 746f 2066 transformed to f │ │ │ -00004fc0: 756e 6374 696f 6e20 6f72 206d 6163 726f unction or macro │ │ │ -00004fd0: 0a63 616c 6c73 206f 6620 7468 6520 666f .calls of the fo │ │ │ -00004fe0: 726d 2028 4655 4e43 2041 5247 532e 2e2e rm (FUNC ARGS... │ │ │ -00004ff0: 2056 414c 292e 2020 4578 616d 706c 653a VAL). Example: │ │ │ -00005000: 2028 6465 6673 6574 6620 6172 6566 2061 (defsetf aref a │ │ │ -00005010: 7365 7429 2e0a 416c 7465 726e 6174 6520 set)..Alternate │ │ │ -00005020: 666f 726d 3a20 2864 6566 7365 7466 204e form: (defsetf N │ │ │ -00005030: 414d 4520 4152 474c 4953 5420 2853 544f AME ARGLIST (STO │ │ │ -00005040: 5245 2920 424f 4459 2e2e 2e29 2e0a 4865 RE) BODY...)..He │ │ │ -00005050: 7265 2c20 7468 6520 6162 6f76 6520 6073 re, the above `s │ │ │ -00005060: 6574 6627 2063 616c 6c20 6973 2065 7870 etf' call is exp │ │ │ -00005070: 616e 6465 6420 6279 2062 696e 6469 6e67 anded by binding │ │ │ -00005080: 2074 6865 2061 7267 756d 656e 7420 666f the argument fo │ │ │ -00005090: 726d 7320 4152 4753 0a61 6363 6f72 6469 rms ARGS.accordi │ │ │ -000050a0: 6e67 2074 6f20 4152 474c 4953 542c 2062 ng to ARGLIST, b │ │ │ -000050b0: 696e 6469 6e67 2074 6865 2076 616c 7565 inding the value │ │ │ -000050c0: 2066 6f72 6d20 5641 4c20 746f 2053 544f form VAL to STO │ │ │ -000050d0: 5245 2c20 7468 656e 2065 7865 6375 7469 RE, then executi │ │ │ -000050e0: 6e67 0a42 4f44 592c 2077 6869 6368 206d ng.BODY, which m │ │ │ -000050f0: 7573 7420 7265 7475 726e 2061 204c 6973 ust return a Lis │ │ │ -00005100: 7020 666f 726d 2074 6861 7420 646f 6573 p form that does │ │ │ -00005110: 2074 6865 206e 6563 6573 7361 7279 2060 the necessary ` │ │ │ -00005120: 7365 7466 2720 6f70 6572 6174 696f 6e2e setf' operation. │ │ │ -00005130: 0a41 6374 7561 6c6c 792c 2041 5247 4c49 .Actually, ARGLI │ │ │ -00005140: 5354 2061 6e64 2053 544f 5245 206d 6179 ST and STORE may │ │ │ -00005150: 2062 6520 626f 756e 6420 746f 2074 656d be bound to tem │ │ │ -00005160: 706f 7261 7279 2076 6172 6961 626c 6573 porary variables │ │ │ -00005170: 2077 6869 6368 2061 7265 0a69 6e74 726f which are.intro │ │ │ -00005180: 6475 6365 6420 6175 746f 6d61 7469 6361 duced automatica │ │ │ -00005190: 6c6c 7920 746f 2070 7265 7365 7276 6520 lly to preserve │ │ │ -000051a0: 7072 6f70 6572 2065 7865 6375 7469 6f6e proper execution │ │ │ -000051b0: 206f 7264 6572 206f 6620 7468 6520 6172 order of the ar │ │ │ -000051c0: 6775 6d65 6e74 732e 0a45 7861 6d70 6c65 guments..Example │ │ │ -000051d0: 3a20 2864 6566 7365 7466 206e 7468 2028 : (defsetf nth ( │ │ │ -000051e0: 6e20 7829 2028 7629 2028 6c69 7374 2027 n x) (v) (list ' │ │ │ -000051f0: 7365 7463 6172 2028 6c69 7374 2027 6e74 setcar (list 'nt │ │ │ -00005200: 6863 6472 206e 2078 2920 7629 292e 1f0a hcdr n x) v))... │ │ │ -00005210: 2861 7574 6f6c 6f61 6420 2764 6566 7365 (autoload 'defse │ │ │ -00005220: 7466 2022 636c 2d6d 6163 7322 2027 2823 tf "cl-macs" '(# │ │ │ -00005230: 2420 2e20 3230 3136 3929 206e 696c 2027 $ . 20169) nil ' │ │ │ -00005240: 6d61 6372 6f29 0a23 4031 3638 2052 6574 macro).#@168 Ret │ │ │ -00005250: 7572 6e20 6120 6c69 7374 206f 6620 6669 urn a list of fi │ │ │ -00005260: 7665 2076 616c 7565 7320 6465 7363 7269 ve values descri │ │ │ -00005270: 6269 6e67 2074 6865 2073 6574 662d 6d65 bing the setf-me │ │ │ -00005280: 7468 6f64 2066 6f72 2050 4c41 4345 2e0a thod for PLACE.. │ │ │ -00005290: 504c 4143 4520 6d61 7920 6265 2061 6e79 PLACE may be any │ │ │ -000052a0: 204c 6973 7020 666f 726d 2077 6869 6368 Lisp form which │ │ │ -000052b0: 2063 616e 2061 7070 6561 7220 6173 2074 can appear as t │ │ │ -000052c0: 6865 2050 4c41 4345 2061 7267 756d 656e he PLACE argumen │ │ │ -000052d0: 7420 746f 0a61 206d 6163 726f 206c 696b t to.a macro lik │ │ │ -000052e0: 6520 6073 6574 6627 206f 7220 6069 6e63 e `setf' or `inc │ │ │ -000052f0: 6627 2e1f 0a28 6175 746f 6c6f 6164 2027 f'...(autoload ' │ │ │ -00005300: 6765 742d 7365 7466 2d6d 6574 686f 6420 get-setf-method │ │ │ -00005310: 2263 6c2d 6d61 6373 2220 2728 2324 202e "cl-macs" '(#$ . │ │ │ -00005320: 2032 3130 3639 2920 6e69 6c20 6e69 6c29 21069) nil nil) │ │ │ -00005330: 0a23 4033 3235 2028 7365 7466 2050 4c41 .#@325 (setf PLA │ │ │ -00005340: 4345 2056 414c 2050 4c41 4345 2056 414c CE VAL PLACE VAL │ │ │ -00005350: 202e 2e2e 293a 2073 6574 2065 6163 6820 ...): set each │ │ │ -00005360: 504c 4143 4520 746f 2074 6865 2076 616c PLACE to the val │ │ │ -00005370: 7565 206f 6620 6974 7320 5641 4c2e 0a54 ue of its VAL..T │ │ │ -00005380: 6869 7320 6973 2061 2067 656e 6572 616c his is a general │ │ │ -00005390: 697a 6564 2076 6572 7369 6f6e 206f 6620 ized version of │ │ │ -000053a0: 6073 6574 7127 3b20 7468 6520 504c 4143 `setq'; the PLAC │ │ │ -000053b0: 4573 206d 6179 2062 6520 7379 6d62 6f6c Es may be symbol │ │ │ -000053c0: 6963 0a72 6566 6572 656e 6365 7320 7375 ic.references su │ │ │ -000053d0: 6368 2061 7320 2863 6172 2078 2920 6f72 ch as (car x) or │ │ │ -000053e0: 2028 6172 6566 2078 2069 292c 2061 7320 (aref x i), as │ │ │ -000053f0: 7765 6c6c 2061 7320 706c 6169 6e20 7379 well as plain sy │ │ │ -00005400: 6d62 6f6c 732e 0a46 6f72 2065 7861 6d70 mbols..For examp │ │ │ -00005410: 6c65 2c20 2873 6574 6620 2863 6164 6172 le, (setf (cadar │ │ │ -00005420: 2078 2920 7929 2069 7320 6571 7569 7661 x) y) is equiva │ │ │ -00005430: 6c65 6e74 2074 6f20 2873 6574 6361 7220 lent to (setcar │ │ │ -00005440: 2863 6461 7220 7829 2079 292e 0a54 6865 (cdar x) y)..The │ │ │ -00005450: 2072 6574 7572 6e20 7661 6c75 6520 6973 return value is │ │ │ -00005460: 2074 6865 206c 6173 7420 5641 4c20 696e the last VAL in │ │ │ -00005470: 2074 6865 206c 6973 742e 1f0a 2861 7574 the list...(aut │ │ │ -00005480: 6f6c 6f61 6420 2773 6574 6620 2263 6c2d oload 'setf "cl- │ │ │ -00005490: 6d61 6373 2220 2728 2324 202e 2032 3133 macs" '(#$ . 213 │ │ │ -000054a0: 3033 2920 6e69 6c20 276d 6163 726f 290a 03) nil 'macro). │ │ │ -000054b0: 2340 3230 3620 2870 7365 7466 2050 4c41 #@206 (psetf PLA │ │ │ -000054c0: 4345 2056 414c 2050 4c41 4345 2056 414c CE VAL PLACE VAL │ │ │ -000054d0: 202e 2e2e 293a 2073 6574 2050 4c41 4345 ...): set PLACE │ │ │ -000054e0: 7320 746f 2074 6865 2076 616c 7565 7320 s to the values │ │ │ -000054f0: 5641 4c73 2069 6e20 7061 7261 6c6c 656c VALs in parallel │ │ │ -00005500: 2e0a 5468 6973 2069 7320 6c69 6b65 2060 ..This is like ` │ │ │ -00005510: 7365 7466 272c 2065 7863 6570 7420 7468 setf', except th │ │ │ -00005520: 6174 2061 6c6c 2056 414c 2066 6f72 6d73 at all VAL forms │ │ │ -00005530: 2061 7265 2065 7661 6c75 6174 6564 2028 are evaluated ( │ │ │ -00005540: 696e 206f 7264 6572 290a 6265 666f 7265 in order).before │ │ │ -00005550: 2061 7373 6967 6e69 6e67 2061 6e79 2050 assigning any P │ │ │ -00005560: 4c41 4345 7320 746f 2074 6865 2063 6f72 LACEs to the cor │ │ │ -00005570: 7265 7370 6f6e 6469 6e67 2076 616c 7565 responding value │ │ │ -00005580: 732e 1f0a 2861 7574 6f6c 6f61 6420 2770 s...(autoload 'p │ │ │ -00005590: 7365 7466 2022 636c 2d6d 6163 7322 2027 setf "cl-macs" ' │ │ │ -000055a0: 2823 2420 2e20 3231 3638 3629 206e 696c (#$ . 21686) nil │ │ │ -000055b0: 2027 6d61 6372 6f29 0a28 6279 7465 2d63 'macro).(byte-c │ │ │ -000055c0: 6f64 6520 22c0 c1c2 c389 8925 8722 205b ode "......%." [ │ │ │ -000055d0: 6175 746f 6c6f 6164 2063 6c2d 646f 2d70 autoload cl-do-p │ │ │ -000055e0: 6f70 2022 636c 2d6d 6163 7322 206e 696c op "cl-macs" nil │ │ │ -000055f0: 5d20 3629 0a23 4031 3933 2028 7265 6d66 ] 6).#@193 (remf │ │ │ -00005600: 2050 4c41 4345 2054 4147 293a 2072 656d PLACE TAG): rem │ │ │ -00005610: 6f76 6520 5441 4720 6672 6f6d 2070 726f ove TAG from pro │ │ │ -00005620: 7065 7274 7920 6c69 7374 2050 4c41 4345 perty list PLACE │ │ │ -00005630: 2e0a 504c 4143 4520 6d61 7920 6265 2061 ..PLACE may be a │ │ │ -00005640: 2073 796d 626f 6c2c 206f 7220 616e 7920 symbol, or any │ │ │ -00005650: 6765 6e65 7261 6c69 7a65 6420 7661 7269 generalized vari │ │ │ -00005660: 6162 6c65 2061 6c6c 6f77 6564 2062 7920 able allowed by │ │ │ -00005670: 6073 6574 6627 2e0a 5468 6520 666f 726d `setf'..The form │ │ │ -00005680: 2072 6574 7572 6e73 2074 7275 6520 6966 returns true if │ │ │ -00005690: 2054 4147 2077 6173 2066 6f75 6e64 2061 TAG was found a │ │ │ -000056a0: 6e64 2072 656d 6f76 6564 2c20 6e69 6c20 nd removed, nil │ │ │ -000056b0: 6f74 6865 7277 6973 652e 1f0a 2861 7574 otherwise...(aut │ │ │ -000056c0: 6f6c 6f61 6420 2772 656d 6620 2263 6c2d oload 'remf "cl- │ │ │ -000056d0: 6d61 6373 2220 2728 2324 202e 2032 3230 macs" '(#$ . 220 │ │ │ -000056e0: 3131 2920 6e69 6c20 276d 6163 726f 290a 11) nil 'macro). │ │ │ -000056f0: 2340 3139 3820 2873 6869 6674 6620 504c #@198 (shiftf PL │ │ │ -00005700: 4143 4520 504c 4143 452e 2e2e 2056 414c ACE PLACE... VAL │ │ │ -00005710: 293a 2073 6869 6674 206c 6566 7420 616d ): shift left am │ │ │ -00005720: 6f6e 6720 504c 4143 4573 2e0a 4578 616d ong PLACEs..Exam │ │ │ -00005730: 706c 653a 2028 7368 6966 7466 2041 2042 ple: (shiftf A B │ │ │ -00005740: 2043 2920 7365 7473 2041 2074 6f20 422c C) sets A to B, │ │ │ -00005750: 2042 2074 6f20 432c 2061 6e64 2072 6574 B to C, and ret │ │ │ -00005760: 7572 6e73 2074 6865 206f 6c64 2041 2e0a urns the old A.. │ │ │ -00005770: 4561 6368 2050 4c41 4345 206d 6179 2062 Each PLACE may b │ │ │ -00005780: 6520 6120 7379 6d62 6f6c 2c20 6f72 2061 e a symbol, or a │ │ │ -00005790: 6e79 2067 656e 6572 616c 697a 6564 2076 ny generalized v │ │ │ -000057a0: 6172 6961 626c 6520 616c 6c6f 7765 6420 ariable allowed │ │ │ -000057b0: 6279 2060 7365 7466 272e 1f0a 2861 7574 by `setf'...(aut │ │ │ -000057c0: 6f6c 6f61 6420 2773 6869 6674 6620 2263 oload 'shiftf "c │ │ │ -000057d0: 6c2d 6d61 6373 2220 2728 2324 202e 2032 l-macs" '(#$ . 2 │ │ │ -000057e0: 3232 3632 2920 6e69 6c20 276d 6163 726f 2262) nil 'macro │ │ │ -000057f0: 290a 2340 3139 3720 2872 6f74 6174 6566 ).#@197 (rotatef │ │ │ -00005800: 2050 4c41 4345 2e2e 2e29 3a20 726f 7461 PLACE...): rota │ │ │ -00005810: 7465 206c 6566 7420 616d 6f6e 6720 504c te left among PL │ │ │ -00005820: 4143 4573 2e0a 4578 616d 706c 653a 2028 ACEs..Example: ( │ │ │ -00005830: 726f 7461 7465 6620 4120 4220 4329 2073 rotatef A B C) s │ │ │ -00005840: 6574 7320 4120 746f 2042 2c20 4220 746f ets A to B, B to │ │ │ -00005850: 2043 2c20 616e 6420 4320 746f 2041 2e20 C, and C to A. │ │ │ -00005860: 2049 7420 7265 7475 726e 7320 6e69 6c2e It returns nil. │ │ │ -00005870: 0a45 6163 6820 504c 4143 4520 6d61 7920 .Each PLACE may │ │ │ -00005880: 6265 2061 2073 796d 626f 6c2c 206f 7220 be a symbol, or │ │ │ -00005890: 616e 7920 6765 6e65 7261 6c69 7a65 6420 any generalized │ │ │ -000058a0: 7661 7269 6162 6c65 2061 6c6c 6f77 6564 variable allowed │ │ │ -000058b0: 2062 7920 6073 6574 6627 2e1f 0a28 6175 by `setf'...(au │ │ │ -000058c0: 746f 6c6f 6164 2027 726f 7461 7465 6620 toload 'rotatef │ │ │ -000058d0: 2263 6c2d 6d61 6373 2220 2728 2324 202e "cl-macs" '(#$ . │ │ │ -000058e0: 2032 3235 3230 2920 6e69 6c20 276d 6163 22520) nil 'mac │ │ │ -000058f0: 726f 290a 2340 3533 3320 286c 6574 6620 ro).#@533 (letf │ │ │ -00005900: 2828 504c 4143 4520 5641 4c55 4529 202e ((PLACE VALUE) . │ │ │ -00005910: 2e2e 2920 424f 4459 2e2e 2e29 3a20 7465 ..) BODY...): te │ │ │ -00005920: 6d70 6f72 6172 696c 7920 6269 6e64 2074 mporarily bind t │ │ │ -00005930: 6f20 504c 4143 4573 2e0a 5468 6973 2069 o PLACEs..This i │ │ │ -00005940: 7320 7468 6520 616e 616c 6f67 7565 206f s the analogue o │ │ │ -00005950: 6620 606c 6574 272c 2062 7574 2077 6974 f `let', but wit │ │ │ -00005960: 6820 6765 6e65 7261 6c69 7a65 6420 7661 h generalized va │ │ │ -00005970: 7269 6162 6c65 7320 2869 6e20 7468 650a riables (in the. │ │ │ -00005980: 7365 6e73 6520 6f66 2060 7365 7466 2729 sense of `setf') │ │ │ -00005990: 2066 6f72 2074 6865 2050 4c41 4345 732e for the PLACEs. │ │ │ -000059a0: 2020 4561 6368 2050 4c41 4345 2069 7320 Each PLACE is │ │ │ -000059b0: 7365 7420 746f 2074 6865 2063 6f72 7265 set to the corre │ │ │ -000059c0: 7370 6f6e 6469 6e67 0a56 414c 5545 2c20 sponding.VALUE, │ │ │ -000059d0: 7468 656e 2074 6865 2042 4f44 5920 666f then the BODY fo │ │ │ -000059e0: 726d 7320 6172 6520 6578 6563 7574 6564 rms are executed │ │ │ -000059f0: 2e20 204f 6e20 6578 6974 2c20 6569 7468 . On exit, eith │ │ │ -00005a00: 6572 206e 6f72 6d61 6c6c 7920 6f72 0a62 er normally or.b │ │ │ -00005a10: 6563 6175 7365 206f 6620 6120 6074 6872 ecause of a `thr │ │ │ -00005a20: 6f77 2720 6f72 2065 7272 6f72 2c20 7468 ow' or error, th │ │ │ -00005a30: 6520 504c 4143 4573 2061 7265 2073 6574 e PLACEs are set │ │ │ -00005a40: 2062 6163 6b20 746f 2074 6865 6972 206f back to their o │ │ │ -00005a50: 7269 6769 6e61 6c0a 7661 6c75 6573 2e20 riginal.values. │ │ │ -00005a60: 204e 6f74 6520 7468 6174 2074 6869 7320 Note that this │ │ │ -00005a70: 6d61 6372 6f20 6973 202a 6e6f 742a 2061 macro is *not* a │ │ │ -00005a80: 7661 696c 6162 6c65 2069 6e20 436f 6d6d vailable in Comm │ │ │ -00005a90: 6f6e 204c 6973 702e 0a41 7320 6120 7370 on Lisp..As a sp │ │ │ -00005aa0: 6563 6961 6c20 6361 7365 2c20 6966 2060 ecial case, if ` │ │ │ -00005ab0: 2850 4c41 4345 2927 2069 7320 7573 6564 (PLACE)' is used │ │ │ -00005ac0: 2069 6e73 7465 6164 206f 6620 6028 504c instead of `(PL │ │ │ -00005ad0: 4143 4520 5641 4c55 4529 272c 0a74 6865 ACE VALUE)',.the │ │ │ -00005ae0: 2050 4c41 4345 2069 7320 6e6f 7420 6d6f PLACE is not mo │ │ │ -00005af0: 6469 6669 6564 2062 6566 6f72 6520 6578 dified before ex │ │ │ -00005b00: 6563 7574 696e 6720 424f 4459 2e1f 0a28 ecuting BODY...( │ │ │ -00005b10: 6175 746f 6c6f 6164 2027 6c65 7466 2022 autoload 'letf " │ │ │ -00005b20: 636c 2d6d 6163 7322 2027 2823 2420 2e20 cl-macs" '(#$ . │ │ │ -00005b30: 3232 3737 3829 206e 696c 2027 6d61 6372 22778) nil 'macr │ │ │ -00005b40: 6f29 0a23 4035 3335 2028 6c65 7466 2a20 o).#@535 (letf* │ │ │ -00005b50: 2828 504c 4143 4520 5641 4c55 4529 202e ((PLACE VALUE) . │ │ │ -00005b60: 2e2e 2920 424f 4459 2e2e 2e29 3a20 7465 ..) BODY...): te │ │ │ -00005b70: 6d70 6f72 6172 696c 7920 6269 6e64 2074 mporarily bind t │ │ │ -00005b80: 6f20 504c 4143 4573 2e0a 5468 6973 2069 o PLACEs..This i │ │ │ -00005b90: 7320 7468 6520 616e 616c 6f67 7565 206f s the analogue o │ │ │ -00005ba0: 6620 606c 6574 2a27 2c20 6275 7420 7769 f `let*', but wi │ │ │ -00005bb0: 7468 2067 656e 6572 616c 697a 6564 2076 th generalized v │ │ │ -00005bc0: 6172 6961 626c 6573 2028 696e 2074 6865 ariables (in the │ │ │ -00005bd0: 0a73 656e 7365 206f 6620 6073 6574 6627 .sense of `setf' │ │ │ -00005be0: 2920 666f 7220 7468 6520 504c 4143 4573 ) for the PLACEs │ │ │ -00005bf0: 2e20 2045 6163 6820 504c 4143 4520 6973 . Each PLACE is │ │ │ -00005c00: 2073 6574 2074 6f20 7468 6520 636f 7272 set to the corr │ │ │ -00005c10: 6573 706f 6e64 696e 670a 5641 4c55 452c esponding.VALUE, │ │ │ -00005c20: 2074 6865 6e20 7468 6520 424f 4459 2066 then the BODY f │ │ │ -00005c30: 6f72 6d73 2061 7265 2065 7865 6375 7465 orms are execute │ │ │ -00005c40: 642e 2020 4f6e 2065 7869 742c 2065 6974 d. On exit, eit │ │ │ -00005c50: 6865 7220 6e6f 726d 616c 6c79 206f 720a her normally or. │ │ │ -00005c60: 6265 6361 7573 6520 6f66 2061 2060 7468 because of a `th │ │ │ -00005c70: 726f 7727 206f 7220 6572 726f 722c 2074 row' or error, t │ │ │ -00005c80: 6865 2050 4c41 4345 7320 6172 6520 7365 he PLACEs are se │ │ │ -00005c90: 7420 6261 636b 2074 6f20 7468 6569 7220 t back to their │ │ │ -00005ca0: 6f72 6967 696e 616c 0a76 616c 7565 732e original.values. │ │ │ -00005cb0: 2020 4e6f 7465 2074 6861 7420 7468 6973 Note that this │ │ │ -00005cc0: 206d 6163 726f 2069 7320 2a6e 6f74 2a20 macro is *not* │ │ │ -00005cd0: 6176 6169 6c61 626c 6520 696e 2043 6f6d available in Com │ │ │ -00005ce0: 6d6f 6e20 4c69 7370 2e0a 4173 2061 2073 mon Lisp..As a s │ │ │ -00005cf0: 7065 6369 616c 2063 6173 652c 2069 6620 pecial case, if │ │ │ -00005d00: 6028 504c 4143 4529 2720 6973 2075 7365 `(PLACE)' is use │ │ │ -00005d10: 6420 696e 7374 6561 6420 6f66 2060 2850 d instead of `(P │ │ │ -00005d20: 4c41 4345 2056 414c 5545 2927 2c0a 7468 LACE VALUE)',.th │ │ │ -00005d30: 6520 504c 4143 4520 6973 206e 6f74 206d e PLACE is not m │ │ │ -00005d40: 6f64 6966 6965 6420 6265 666f 7265 2065 odified before e │ │ │ -00005d50: 7865 6375 7469 6e67 2042 4f44 592e 1f0a xecuting BODY... │ │ │ -00005d60: 2861 7574 6f6c 6f61 6420 276c 6574 662a (autoload 'letf* │ │ │ -00005d70: 2022 636c 2d6d 6163 7322 2027 2823 2420 "cl-macs" '(#$ │ │ │ -00005d80: 2e20 3233 3336 3929 206e 696c 2027 6d61 . 23369) nil 'ma │ │ │ -00005d90: 6372 6f29 0a23 4031 3737 2028 6361 6c6c cro).#@177 (call │ │ │ -00005da0: 6620 4655 4e43 2050 4c41 4345 2041 5247 f FUNC PLACE ARG │ │ │ -00005db0: 532e 2e2e 293a 2073 6574 2050 4c41 4345 S...): set PLACE │ │ │ -00005dc0: 2074 6f20 2846 554e 4320 504c 4143 4520 to (FUNC PLACE │ │ │ -00005dd0: 4152 4753 2e2e 2e29 2e0a 4655 4e43 2073 ARGS...)..FUNC s │ │ │ -00005de0: 686f 756c 6420 6265 2061 6e20 756e 7175 hould be an unqu │ │ │ -00005df0: 6f74 6564 2066 756e 6374 696f 6e20 6e61 oted function na │ │ │ -00005e00: 6d65 2e20 2050 4c41 4345 206d 6179 2062 me. PLACE may b │ │ │ -00005e10: 6520 6120 7379 6d62 6f6c 2c0a 6f72 2061 e a symbol,.or a │ │ │ -00005e20: 6e79 2067 656e 6572 616c 697a 6564 2076 ny generalized v │ │ │ -00005e30: 6172 6961 626c 6520 616c 6c6f 7765 6420 ariable allowed │ │ │ -00005e40: 6279 2060 7365 7466 272e 1f0a 2861 7574 by `setf'...(aut │ │ │ -00005e50: 6f6c 6f61 6420 2763 616c 6c66 2022 636c oload 'callf "cl │ │ │ -00005e60: 2d6d 6163 7322 2027 2823 2420 2e20 3233 -macs" '(#$ . 23 │ │ │ -00005e70: 3936 3329 206e 696c 2027 6d61 6372 6f29 963) nil 'macro) │ │ │ -00005e80: 0a23 4031 3436 2028 6361 6c6c 6632 2046 .#@146 (callf2 F │ │ │ -00005e90: 554e 4320 4152 4731 2050 4c41 4345 2041 UNC ARG1 PLACE A │ │ │ -00005ea0: 5247 532e 2e2e 293a 2073 6574 2050 4c41 RGS...): set PLA │ │ │ -00005eb0: 4345 2074 6f20 2846 554e 4320 4152 4731 CE to (FUNC ARG1 │ │ │ -00005ec0: 2050 4c41 4345 2041 5247 532e 2e2e 292e PLACE ARGS...). │ │ │ -00005ed0: 0a4c 696b 6520 6063 616c 6c66 272c 2062 .Like `callf', b │ │ │ -00005ee0: 7574 2050 4c41 4345 2069 7320 7468 6520 ut PLACE is the │ │ │ -00005ef0: 7365 636f 6e64 2061 7267 756d 656e 7420 second argument │ │ │ -00005f00: 6f66 2046 554e 432c 206e 6f74 2074 6865 of FUNC, not the │ │ │ -00005f10: 2066 6972 7374 2e1f 0a28 6175 746f 6c6f first...(autolo │ │ │ -00005f20: 6164 2027 6361 6c6c 6632 2022 636c 2d6d ad 'callf2 "cl-m │ │ │ -00005f30: 6163 7322 2027 2823 2420 2e20 3234 3139 acs" '(#$ . 2419 │ │ │ -00005f40: 3929 206e 696c 2027 6d61 6372 6f29 0a23 9) nil 'macro).# │ │ │ -00005f50: 4032 3234 2028 6465 6669 6e65 2d6d 6f64 @224 (define-mod │ │ │ -00005f60: 6966 792d 6d61 6372 6f20 4e41 4d45 2041 ify-macro NAME A │ │ │ -00005f70: 5247 4c49 5354 2046 554e 4329 3a20 6465 RGLIST FUNC): de │ │ │ -00005f80: 6669 6e65 2061 2060 7365 7466 272d 6c69 fine a `setf'-li │ │ │ -00005f90: 6b65 206d 6f64 6966 7920 6d61 6372 6f2e ke modify macro. │ │ │ -00005fa0: 0a49 6620 4e41 4d45 2069 7320 6361 6c6c .If NAME is call │ │ │ -00005fb0: 6564 2c20 6974 2063 6f6d 6269 6e65 7320 ed, it combines │ │ │ -00005fc0: 6974 7320 504c 4143 4520 6172 6775 6d65 its PLACE argume │ │ │ -00005fd0: 6e74 2077 6974 6820 7468 6520 6f74 6865 nt with the othe │ │ │ -00005fe0: 7220 6172 6775 6d65 6e74 730a 6672 6f6d r arguments.from │ │ │ -00005ff0: 2041 5247 4c49 5354 2075 7369 6e67 2046 ARGLIST using F │ │ │ -00006000: 554e 433a 2028 6465 6669 6e65 2d6d 6f64 UNC: (define-mod │ │ │ -00006010: 6966 792d 6d61 6372 6f20 696e 6366 2028 ify-macro incf ( │ │ │ -00006020: 266f 7074 696f 6e61 6c20 286e 2031 2929 &optional (n 1)) │ │ │ -00006030: 202b 291f 0a28 6175 746f 6c6f 6164 2027 +)..(autoload ' │ │ │ -00006040: 6465 6669 6e65 2d6d 6f64 6966 792d 6d61 define-modify-ma │ │ │ -00006050: 6372 6f20 2263 6c2d 6d61 6373 2220 2728 cro "cl-macs" '( │ │ │ -00006060: 2324 202e 2032 3434 3035 2920 6e69 6c20 #$ . 24405) nil │ │ │ -00006070: 276d 6163 726f 290a 2340 3238 3920 2864 'macro).#@289 (d │ │ │ -00006080: 6566 7374 7275 6374 2028 4e41 4d45 204f efstruct (NAME O │ │ │ -00006090: 5054 494f 4e53 2e2e 2e29 2028 534c 4f54 PTIONS...) (SLOT │ │ │ -000060a0: 2053 4c4f 542d 4f50 5453 2e2e 2e29 2e2e SLOT-OPTS...).. │ │ │ -000060b0: 2e29 3a20 6465 6669 6e65 2061 2073 7472 .): define a str │ │ │ -000060c0: 7563 7420 7479 7065 2e0a 5468 6973 206d uct type..This m │ │ │ -000060d0: 6163 726f 2064 6566 696e 6573 2061 206e acro defines a n │ │ │ -000060e0: 6577 204c 6973 7020 6461 7461 2074 7970 ew Lisp data typ │ │ │ -000060f0: 6520 6361 6c6c 6564 204e 414d 452c 2077 e called NAME, w │ │ │ -00006100: 6869 6368 2063 6f6e 7461 696e 7320 6461 hich contains da │ │ │ -00006110: 7461 0a73 746f 7265 6420 696e 2053 4c4f ta.stored in SLO │ │ │ -00006120: 5473 2e20 2054 6869 7320 6465 6669 6e65 Ts. This define │ │ │ -00006130: 7320 6120 606d 616b 652d 4e41 4d45 2720 s a `make-NAME' │ │ │ -00006140: 636f 6e73 7472 7563 746f 722c 2061 2060 constructor, a ` │ │ │ -00006150: 636f 7079 2d4e 414d 4527 0a63 6f70 6965 copy-NAME'.copie │ │ │ -00006160: 722c 2061 2060 4e41 4d45 2d70 2720 7072 r, a `NAME-p' pr │ │ │ -00006170: 6564 6963 6174 652c 2061 6e64 2073 6574 edicate, and set │ │ │ -00006180: 662d 6162 6c65 2060 4e41 4d45 2d53 4c4f f-able `NAME-SLO │ │ │ -00006190: 5427 2061 6363 6573 736f 7273 2e1f 0a28 T' accessors...( │ │ │ -000061a0: 6175 746f 6c6f 6164 2027 6465 6673 7472 autoload 'defstr │ │ │ -000061b0: 7563 7420 2263 6c2d 6d61 6373 2220 2728 uct "cl-macs" '( │ │ │ -000061c0: 2324 202e 2032 3437 3032 2920 6e69 6c20 #$ . 24702) nil │ │ │ -000061d0: 276d 6163 726f 290a 2862 7974 652d 636f 'macro).(byte-co │ │ │ -000061e0: 6465 2022 c0c1 c2c3 8989 2587 2220 5b61 de "......%." [a │ │ │ -000061f0: 7574 6f6c 6f61 6420 636c 2d73 7472 7563 utoload cl-struc │ │ │ -00006200: 742d 7365 7466 2d65 7870 616e 6465 7220 t-setf-expander │ │ │ -00006210: 2263 6c2d 6d61 6373 2220 6e69 6c5d 2036 "cl-macs" nil] 6 │ │ │ -00006220: 290a 2340 3133 3020 2864 6566 7479 7065 ).#@130 (deftype │ │ │ -00006230: 204e 414d 4520 4152 474c 4953 5420 424f NAME ARGLIST BO │ │ │ -00006240: 4459 2e2e 2e29 3a20 6465 6669 6e65 204e DY...): define N │ │ │ -00006250: 414d 4520 6173 2061 206e 6577 2064 6174 AME as a new dat │ │ │ -00006260: 6120 7479 7065 2e0a 5468 6520 7479 7065 a type..The type │ │ │ -00006270: 206e 616d 6520 6361 6e20 7468 656e 2062 name can then b │ │ │ -00006280: 6520 7573 6564 2069 6e20 6074 7970 6563 e used in `typec │ │ │ -00006290: 6173 6527 2c20 6063 6865 636b 2d74 7970 ase', `check-typ │ │ │ -000062a0: 6527 2c20 6574 632e 1f0a 2861 7574 6f6c e', etc...(autol │ │ │ -000062b0: 6f61 6420 2764 6566 7479 7065 2022 636c oad 'deftype "cl │ │ │ -000062c0: 2d6d 6163 7322 2027 2823 2420 2e20 3235 -macs" '(#$ . 25 │ │ │ -000062d0: 3132 3829 206e 696c 2027 6d61 6372 6f29 128) nil 'macro) │ │ │ -000062e0: 0a23 4038 3020 4368 6563 6b20 7468 6174 .#@80 Check that │ │ │ -000062f0: 204f 424a 4543 5420 6973 206f 6620 7479 OBJECT is of ty │ │ │ -00006300: 7065 2054 5950 452e 0a54 5950 4520 6973 pe TYPE..TYPE is │ │ │ -00006310: 2061 2043 6f6d 6d6f 6e20 4c69 7370 2d73 a Common Lisp-s │ │ │ -00006320: 7479 6c65 2074 7970 6520 7370 6563 6966 tyle type specif │ │ │ -00006330: 6965 722e 1f0a 2861 7574 6f6c 6f61 6420 ier...(autoload │ │ │ -00006340: 2774 7970 6570 2022 636c 2d6d 6163 7322 'typep "cl-macs" │ │ │ -00006350: 2027 2823 2420 2e20 3235 3331 3829 206e '(#$ . 25318) n │ │ │ -00006360: 696c 206e 696c 290a 2340 3132 3620 5665 il nil).#@126 Ve │ │ │ -00006370: 7269 6679 2074 6861 7420 504c 4143 4520 rify that PLACE │ │ │ -00006380: 6973 206f 6620 7479 7065 2054 5950 453b is of type TYPE; │ │ │ -00006390: 2073 6967 6e61 6c20 6120 636f 6e74 696e signal a contin │ │ │ -000063a0: 7561 626c 6520 6572 726f 7220 6966 206e uable error if n │ │ │ -000063b0: 6f74 2e0a 5354 5249 4e47 2069 7320 616e ot..STRING is an │ │ │ -000063c0: 206f 7074 696f 6e61 6c20 6465 7363 7269 optional descri │ │ │ -000063d0: 7074 696f 6e20 6f66 2074 6865 2064 6573 ption of the des │ │ │ -000063e0: 6972 6564 2074 7970 652e 1f0a 2861 7574 ired type...(aut │ │ │ -000063f0: 6f6c 6f61 6420 2763 6865 636b 2d74 7970 oload 'check-typ │ │ │ -00006400: 6520 2263 6c2d 6d61 6373 2220 2728 2324 e "cl-macs" '(#$ │ │ │ -00006410: 202e 2032 3534 3534 2920 6e69 6c20 276d . 25454) nil 'm │ │ │ -00006420: 6163 726f 290a 2340 3331 3720 5665 7269 acro).#@317 Veri │ │ │ -00006430: 6679 2074 6861 7420 464f 524d 2072 6574 fy that FORM ret │ │ │ -00006440: 7572 6e73 206e 6f6e 2d6e 696c 3b20 7369 urns non-nil; si │ │ │ -00006450: 676e 616c 2061 6e20 6572 726f 7220 6966 gnal an error if │ │ │ -00006460: 206e 6f74 2e0a 5365 636f 6e64 2061 7267 not..Second arg │ │ │ -00006470: 2053 484f 572d 4152 4753 206d 6561 6e73 SHOW-ARGS means │ │ │ -00006480: 2074 6f20 696e 636c 7564 6520 6172 6775 to include argu │ │ │ -00006490: 6d65 6e74 7320 6f66 2046 4f52 4d20 696e ments of FORM in │ │ │ -000064a0: 206d 6573 7361 6765 2e0a 4f74 6865 7220 message..Other │ │ │ -000064b0: 6172 6773 2053 5452 494e 4720 616e 6420 args STRING and │ │ │ -000064c0: 4152 4753 2e2e 2e20 6172 6520 6172 6775 ARGS... are argu │ │ │ -000064d0: 6d65 6e74 7320 746f 2062 6520 7061 7373 ments to be pass │ │ │ -000064e0: 6564 2074 6f20 6065 7272 6f72 272e 0a54 ed to `error'..T │ │ │ -000064f0: 6865 7920 6172 6520 6e6f 7420 6576 616c hey are not eval │ │ │ -00006500: 7561 7465 6420 756e 6c65 7373 2074 6865 uated unless the │ │ │ -00006510: 2061 7373 6572 7469 6f6e 2066 6169 6c73 assertion fails │ │ │ -00006520: 2e20 2049 6620 5354 5249 4e47 2069 730a . If STRING is. │ │ │ -00006530: 6f6d 6974 7465 642c 2061 2064 6566 6175 omitted, a defau │ │ │ -00006540: 6c74 206d 6573 7361 6765 206c 6973 7469 lt message listi │ │ │ -00006550: 6e67 2046 4f52 4d20 6974 7365 6c66 2069 ng FORM itself i │ │ │ -00006560: 7320 7573 6564 2e1f 0a28 6175 746f 6c6f s used...(autolo │ │ │ -00006570: 6164 2027 6173 7365 7274 2022 636c 2d6d ad 'assert "cl-m │ │ │ -00006580: 6163 7322 2027 2823 2420 2e20 3235 3634 acs" '(#$ . 2564 │ │ │ -00006590: 3429 206e 696c 2027 6d61 6372 6f29 0a23 4) nil 'macro).# │ │ │ -000065a0: 4038 3720 4578 6563 7574 6520 464f 524d @87 Execute FORM │ │ │ -000065b0: 533b 2069 6620 616e 2065 7272 6f72 206f S; if an error o │ │ │ -000065c0: 6363 7572 732c 2072 6574 7572 6e20 6e69 ccurs, return ni │ │ │ -000065d0: 6c2e 0a4f 7468 6572 7769 7365 2c20 7265 l..Otherwise, re │ │ │ -000065e0: 7475 726e 2072 6573 756c 7420 6f66 206c turn result of l │ │ │ -000065f0: 6173 7420 464f 524d 2e1f 0a28 6175 746f ast FORM...(auto │ │ │ -00006600: 6c6f 6164 2027 6967 6e6f 7265 2d65 7272 load 'ignore-err │ │ │ -00006610: 6f72 7320 2263 6c2d 6d61 6373 2220 2728 ors "cl-macs" '( │ │ │ -00006620: 2324 202e 2032 3630 3230 2920 6e69 6c20 #$ . 26020) nil │ │ │ -00006630: 276d 6163 726f 290a 2340 3130 3820 4578 'macro).#@108 Ex │ │ │ -00006640: 6563 7574 6520 464f 524d 533b 2069 6620 ecute FORMS; if │ │ │ -00006650: 616e 2065 7272 6f72 206f 6620 7479 7065 an error of type │ │ │ -00006660: 2060 6669 6c65 2d65 7272 6f72 2720 6f63 `file-error' oc │ │ │ -00006670: 6375 7273 2c20 7265 7475 726e 206e 696c curs, return nil │ │ │ -00006680: 2e0a 4f74 6865 7277 6973 652c 2072 6574 ..Otherwise, ret │ │ │ -00006690: 7572 6e20 7265 7375 6c74 206f 6620 6c61 urn result of la │ │ │ -000066a0: 7374 2046 4f52 4d2e 1f0a 2861 7574 6f6c st FORM...(autol │ │ │ -000066b0: 6f61 6420 2769 676e 6f72 652d 6669 6c65 oad 'ignore-file │ │ │ -000066c0: 2d65 7272 6f72 7320 2263 6c2d 6d61 6373 -errors "cl-macs │ │ │ -000066d0: 2220 2728 2324 202e 2032 3631 3734 2920 " '(#$ . 26174) │ │ │ -000066e0: 6e69 6c20 276d 6163 726f 290a 2340 3638 nil 'macro).#@68 │ │ │ -000066f0: 3420 2864 6566 696e 652d 636f 6d70 696c 4 (define-compil │ │ │ -00006700: 6572 2d6d 6163 726f 2046 554e 4320 4152 er-macro FUNC AR │ │ │ -00006710: 474c 4953 5420 424f 4459 2e2e 2e29 3a20 GLIST BODY...): │ │ │ -00006720: 4465 6669 6e65 2061 2063 6f6d 7069 6c65 Define a compile │ │ │ -00006730: 722d 6f6e 6c79 206d 6163 726f 2e0a 5468 r-only macro..Th │ │ │ -00006740: 6973 2069 7320 6c69 6b65 2060 6465 666d is is like `defm │ │ │ -00006750: 6163 726f 272c 2062 7574 206d 6163 726f acro', but macro │ │ │ -00006760: 2065 7870 616e 7369 6f6e 206f 6363 7572 expansion occur │ │ │ -00006770: 7320 6f6e 6c79 2069 6620 7468 6520 6361 s only if the ca │ │ │ -00006780: 6c6c 2074 6f0a 4655 4e43 2069 7320 636f ll to.FUNC is co │ │ │ -00006790: 6d70 696c 6564 2028 692e 652e 2c20 6e6f mpiled (i.e., no │ │ │ -000067a0: 7420 696e 7465 7270 7265 7465 6429 2e20 t interpreted). │ │ │ -000067b0: 2043 6f6d 7069 6c65 7220 6d61 6372 6f73 Compiler macros │ │ │ -000067c0: 2073 686f 756c 6420 6265 2075 7365 640a should be used. │ │ │ -000067d0: 666f 7220 6f70 7469 6d69 7a69 6e67 2074 for optimizing t │ │ │ -000067e0: 6865 2077 6179 2063 616c 6c73 2074 6f20 he way calls to │ │ │ -000067f0: 4655 4e43 2061 7265 2063 6f6d 7069 6c65 FUNC are compile │ │ │ -00006800: 643b 2074 6865 2066 6f72 6d20 7265 7475 d; the form retu │ │ │ -00006810: 726e 6564 2062 790a 424f 4459 2073 686f rned by.BODY sho │ │ │ -00006820: 756c 6420 646f 2074 6865 2073 616d 6520 uld do the same │ │ │ -00006830: 7468 696e 6720 6173 2061 2063 616c 6c20 thing as a call │ │ │ -00006840: 746f 2074 6865 206e 6f72 6d61 6c20 6675 to the normal fu │ │ │ -00006850: 6e63 7469 6f6e 2063 616c 6c65 640a 4655 nction called.FU │ │ │ -00006860: 4e43 2c20 7468 6f75 6768 2070 6f73 7369 NC, though possi │ │ │ -00006870: 626c 7920 6d6f 7265 2065 6666 6963 6965 bly more efficie │ │ │ -00006880: 6e74 6c79 2e20 204e 6f74 6520 7468 6174 ntly. Note that │ │ │ -00006890: 2c20 6c69 6b65 2072 6567 756c 6172 206d , like regular m │ │ │ -000068a0: 6163 726f 732c 0a63 6f6d 7069 6c65 7220 acros,.compiler │ │ │ -000068b0: 6d61 6372 6f73 2061 7265 2065 7870 616e macros are expan │ │ │ -000068c0: 6465 6420 7265 7065 6174 6564 6c79 2075 ded repeatedly u │ │ │ -000068d0: 6e74 696c 206e 6f20 6675 7274 6865 7220 ntil no further │ │ │ -000068e0: 6578 7061 6e73 696f 6e73 2061 7265 0a70 expansions are.p │ │ │ -000068f0: 6f73 7369 626c 652e 2020 556e 6c69 6b65 ossible. Unlike │ │ │ -00006900: 2072 6567 756c 6172 206d 6163 726f 732c regular macros, │ │ │ -00006910: 2042 4f44 5920 6361 6e20 6465 6369 6465 BODY can decide │ │ │ -00006920: 2074 6f20 2270 756e 7422 2061 6e64 206c to "punt" and l │ │ │ -00006930: 6561 7665 2074 6865 0a6f 7269 6769 6e61 eave the.origina │ │ │ -00006940: 6c20 6675 6e63 7469 6f6e 2063 616c 6c20 l function call │ │ │ -00006950: 616c 6f6e 6520 6279 2064 6563 6c61 7269 alone by declari │ │ │ -00006960: 6e67 2061 6e20 696e 6974 6961 6c20 6026 ng an initial `& │ │ │ -00006970: 7768 6f6c 6520 666f 6f27 2070 6172 616d whole foo' param │ │ │ -00006980: 6574 6572 0a61 6e64 2074 6865 6e20 7265 eter.and then re │ │ │ -00006990: 7475 726e 696e 6720 666f 6f2e 1f0a 2861 turning foo...(a │ │ │ -000069a0: 7574 6f6c 6f61 6420 2764 6566 696e 652d utoload 'define- │ │ │ -000069b0: 636f 6d70 696c 6572 2d6d 6163 726f 2022 compiler-macro " │ │ │ -000069c0: 636c 2d6d 6163 7322 2027 2823 2420 2e20 cl-macs" '(#$ . │ │ │ -000069d0: 3236 3335 3429 206e 696c 2027 6d61 6372 26354) nil 'macr │ │ │ -000069e0: 6f29 0a28 6279 7465 2d63 6f64 6520 22c0 o).(byte-code ". │ │ │ -000069f0: c1c2 c389 8925 8722 205b 6175 746f 6c6f .....%." [autolo │ │ │ -00006a00: 6164 2063 6f6d 7069 6c65 722d 6d61 6372 ad compiler-macr │ │ │ -00006a10: 6f65 7870 616e 6420 2263 6c2d 6d61 6373 oexpand "cl-macs │ │ │ -00006a20: 2220 6e69 6c5d 2036 290a 2340 3635 2052 " nil] 6).#@65 R │ │ │ -00006a30: 6574 7572 6e20 6861 7368 2074 6162 6c65 eturn hash table │ │ │ -00006a40: 206f 6620 636f 6e66 6967 7572 6174 696f of configuratio │ │ │ -00006a50: 6e20 7061 7261 6d65 7465 7273 2061 6e64 n parameters and │ │ │ -00006a60: 2074 6865 6972 2076 616c 7565 732e 1f0a their values... │ │ │ -00006a70: 2861 7574 6f6c 6f61 6420 2763 6f6e 6669 (autoload 'confi │ │ │ -00006a80: 672d 7661 6c75 652d 6861 7368 2d74 6162 g-value-hash-tab │ │ │ -00006a90: 6c65 2022 636f 6e66 6967 2220 2728 2324 le "config" '(#$ │ │ │ -00006aa0: 202e 2032 3731 3833 2920 6e69 6c20 6e69 . 27183) nil ni │ │ │ -00006ab0: 6c29 0a23 4036 3420 5265 7475 726e 2074 l).#@64 Return t │ │ │ -00006ac0: 6865 2076 616c 7565 206f 6620 7468 6520 he value of the │ │ │ -00006ad0: 636f 6e66 6967 7572 6174 696f 6e20 7061 configuration pa │ │ │ -00006ae0: 7261 6d65 7465 7220 434f 4e46 4947 5f53 rameter CONFIG_S │ │ │ -00006af0: 594d 424f 4c2e 1f0a 2861 7574 6f6c 6f61 YMBOL...(autoloa │ │ │ -00006b00: 6420 2763 6f6e 6669 672d 7661 6c75 6520 d 'config-value │ │ │ -00006b10: 2263 6f6e 6669 6722 2027 2823 2420 2e20 "config" '(#$ . │ │ │ -00006b20: 3237 3332 3029 206e 696c 206e 696c 290a 27320) nil nil). │ │ │ -00006b30: 2340 3332 3220 4578 7472 6163 7420 6375 #@322 Extract cu │ │ │ -00006b40: 7374 6f6d 2064 6570 656e 6465 6e63 6965 stom dependencie │ │ │ -00006b50: 7320 6672 6f6d 202e 656c 2066 696c 6573 s from .el files │ │ │ -00006b60: 2069 6e20 5355 4244 4952 532e 0a53 5542 in SUBDIRS..SUB │ │ │ -00006b70: 4449 5253 2069 7320 6120 6c69 7374 206f DIRS is a list o │ │ │ -00006b80: 6620 6469 7265 6374 6f72 6965 732e 2020 f directories. │ │ │ -00006b90: 4966 2069 7420 6973 206e 696c 2c20 7468 If it is nil, th │ │ │ -00006ba0: 6520 636f 6d6d 616e 642d 6c69 6e65 0a61 e command-line.a │ │ │ -00006bb0: 7267 756d 656e 7473 2061 7265 2075 7365 rguments are use │ │ │ -00006bc0: 642e 2020 4966 2069 7420 6973 2061 2073 d. If it is a s │ │ │ -00006bd0: 7472 696e 672c 206f 6e6c 7920 7468 6174 tring, only that │ │ │ -00006be0: 2064 6972 6563 746f 7279 2069 730a 7072 directory is.pr │ │ │ -00006bf0: 6f63 6573 7365 642e 2020 5468 6973 2066 ocessed. This f │ │ │ -00006c00: 756e 6374 696f 6e20 6973 2065 7370 6563 unction is espec │ │ │ -00006c10: 6961 6c6c 7920 7573 6566 756c 2069 6e20 ially useful in │ │ │ -00006c20: 6261 7463 6820 6d6f 6465 2e0a 0a42 6174 batch mode...Bat │ │ │ -00006c30: 6368 2075 7361 6765 3a20 7865 6d61 6373 ch usage: xemacs │ │ │ -00006c40: 202d 6261 7463 6820 2d6c 2063 7573 2d64 -batch -l cus-d │ │ │ -00006c50: 6570 2e65 6c20 2d66 2043 7573 746f 6d2d ep.el -f Custom- │ │ │ -00006c60: 6d61 6b65 2d64 6570 656e 6465 6e63 6965 make-dependencie │ │ │ -00006c70: 7320 4449 5253 1f0a 2861 7574 6f6c 6f61 s DIRS..(autoloa │ │ │ -00006c80: 6420 2743 7573 746f 6d2d 6d61 6b65 2d64 d 'Custom-make-d │ │ │ -00006c90: 6570 656e 6465 6e63 6965 7320 2263 7573 ependencies "cus │ │ │ -00006ca0: 2d64 6570 2220 2728 2324 202e 2032 3734 -dep" '(#$ . 274 │ │ │ -00006cb0: 3436 2920 7420 6e69 6c29 0a23 4034 3136 46) t nil).#@416 │ │ │ -00006cc0: 2053 6574 2056 4152 4941 424c 4520 746f Set VARIABLE to │ │ │ -00006cd0: 2056 414c 5545 2e20 2056 414c 5545 2069 VALUE. VALUE i │ │ │ -00006ce0: 7320 6120 4c69 7370 206f 626a 6563 742e s a Lisp object. │ │ │ -00006cf0: 0a0a 4966 2056 4152 4941 424c 4520 6861 ..If VARIABLE ha │ │ │ -00006d00: 7320 6120 6076 6172 6961 626c 652d 696e s a `variable-in │ │ │ -00006d10: 7465 7261 6374 6976 6527 2070 726f 7065 teractive' prope │ │ │ -00006d20: 7274 792c 2074 6861 7420 6973 2075 7365 rty, that is use │ │ │ -00006d30: 6420 6173 2069 660a 6974 2077 6572 6520 d as if.it were │ │ │ -00006d40: 7468 6520 6172 6720 746f 2060 696e 7465 the arg to `inte │ │ │ -00006d50: 7261 6374 6976 6527 2028 7768 6963 6820 ractive' (which │ │ │ -00006d60: 7365 6529 2074 6f20 696e 7465 7261 6374 see) to interact │ │ │ -00006d70: 6976 656c 7920 7265 6164 2074 6865 2076 ively read the v │ │ │ -00006d80: 616c 7565 2e0a 0a49 6620 5641 5249 4142 alue...If VARIAB │ │ │ -00006d90: 4c45 2068 6173 2061 2060 6375 7374 6f6d LE has a `custom │ │ │ -00006da0: 2d74 7970 6527 2070 726f 7065 7274 792c -type' property, │ │ │ -00006db0: 2069 7420 6d75 7374 2062 6520 6120 7769 it must be a wi │ │ │ -00006dc0: 6467 6574 2061 6e64 2074 6865 0a60 3a70 dget and the.`:p │ │ │ -00006dd0: 726f 6d70 742d 7661 6c75 6527 2070 726f rompt-value' pro │ │ │ -00006de0: 7065 7274 7920 6f66 2074 6861 7420 7769 perty of that wi │ │ │ -00006df0: 6467 6574 2077 696c 6c20 6265 2075 7365 dget will be use │ │ │ -00006e00: 6420 666f 7220 7265 6164 696e 6720 7468 d for reading th │ │ │ -00006e10: 6520 7661 6c75 652e 0a0a 4966 2067 6976 e value...If giv │ │ │ -00006e20: 656e 2061 2070 7265 6669 7820 286f 7220 en a prefix (or │ │ │ -00006e30: 6120 434f 4d4d 454e 5420 6172 6775 6d65 a COMMENT argume │ │ │ -00006e40: 6e74 292c 2061 6c73 6f20 7072 6f6d 7074 nt), also prompt │ │ │ -00006e50: 2066 6f72 2061 2063 6f6d 6d65 6e74 2e1f for a comment.. │ │ │ -00006e60: 0a28 6175 746f 6c6f 6164 2027 6375 7374 .(autoload 'cust │ │ │ -00006e70: 6f6d 697a 652d 7365 742d 7661 6c75 6520 omize-set-value │ │ │ -00006e80: 2263 7573 2d65 6469 7422 2027 2823 2420 "cus-edit" '(#$ │ │ │ -00006e90: 2e20 3237 3834 3129 2074 206e 696c 290a . 27841) t nil). │ │ │ -00006ea0: 2340 3636 3020 5365 7420 7468 6520 6465 #@660 Set the de │ │ │ -00006eb0: 6661 756c 7420 666f 7220 5641 5249 4142 fault for VARIAB │ │ │ -00006ec0: 4c45 2074 6f20 5641 4c55 452e 2020 5641 LE to VALUE. VA │ │ │ -00006ed0: 4c55 4520 6973 2061 6e79 204c 6973 7020 LUE is any Lisp │ │ │ -00006ee0: 6f62 6a65 6374 2e0a 0a49 6620 5641 5249 object...If VARI │ │ │ -00006ef0: 4142 4c45 2068 6173 2061 2060 6375 7374 ABLE has a `cust │ │ │ -00006f00: 6f6d 2d73 6574 2720 7072 6f70 6572 7479 om-set' property │ │ │ -00006f10: 2c20 7468 6174 2069 7320 7573 6564 2066 , that is used f │ │ │ -00006f20: 6f72 2073 6574 7469 6e67 0a56 4152 4941 or setting.VARIA │ │ │ -00006f30: 424c 452c 206f 7468 6572 7769 7365 2060 BLE, otherwise ` │ │ │ -00006f40: 7365 742d 6465 6661 756c 7427 2069 7320 set-default' is │ │ │ -00006f50: 7573 6564 2e0a 0a54 6865 2060 6375 7374 used...The `cust │ │ │ -00006f60: 6f6d 697a 6564 2d76 616c 7565 2720 7072 omized-value' pr │ │ │ -00006f70: 6f70 6572 7479 206f 6620 7468 6520 5641 operty of the VA │ │ │ -00006f80: 5249 4142 4c45 2077 696c 6c20 6265 2073 RIABLE will be s │ │ │ -00006f90: 6574 2074 6f20 6120 6c69 7374 0a77 6974 et to a list.wit │ │ │ -00006fa0: 6820 6120 7175 6f74 6564 2056 414c 5545 h a quoted VALUE │ │ │ -00006fb0: 2061 7320 6974 7320 736f 6c65 206c 6973 as its sole lis │ │ │ -00006fc0: 7420 6d65 6d62 6572 2e0a 0a49 6620 5641 t member...If VA │ │ │ -00006fd0: 5249 4142 4c45 2068 6173 2061 2060 7661 RIABLE has a `va │ │ │ -00006fe0: 7269 6162 6c65 2d69 6e74 6572 6163 7469 riable-interacti │ │ │ -00006ff0: 7665 2720 7072 6f70 6572 7479 2c20 7468 ve' property, th │ │ │ -00007000: 6174 2069 7320 7573 6564 2061 7320 6966 at is used as if │ │ │ -00007010: 0a69 7420 7765 7265 2074 6865 2061 7267 .it were the arg │ │ │ -00007020: 2074 6f20 6069 6e74 6572 6163 7469 7665 to `interactive │ │ │ -00007030: 2720 2877 6869 6368 2073 6565 2920 746f ' (which see) to │ │ │ -00007040: 2069 6e74 6572 6163 7469 7665 6c79 2072 interactively r │ │ │ -00007050: 6561 6420 7468 6520 7661 6c75 652e 0a0a ead the value... │ │ │ -00007060: 4966 2056 4152 4941 424c 4520 6861 7320 If VARIABLE has │ │ │ -00007070: 6120 6063 7573 746f 6d2d 7479 7065 2720 a `custom-type' │ │ │ -00007080: 7072 6f70 6572 7479 2c20 6974 206d 7573 property, it mus │ │ │ -00007090: 7420 6265 2061 2077 6964 6765 7420 616e t be a widget an │ │ │ -000070a0: 6420 7468 650a 603a 7072 6f6d 7074 2d76 d the.`:prompt-v │ │ │ -000070b0: 616c 7565 2720 7072 6f70 6572 7479 206f alue' property o │ │ │ -000070c0: 6620 7468 6174 2077 6964 6765 7420 7769 f that widget wi │ │ │ -000070d0: 6c6c 2062 6520 7573 6564 2066 6f72 2072 ll be used for r │ │ │ -000070e0: 6561 6469 6e67 2074 6865 2076 616c 7565 eading the value │ │ │ -000070f0: 2e0a 0a49 6620 6769 7665 6e20 6120 7072 ...If given a pr │ │ │ -00007100: 6566 6978 2028 6f72 2061 2043 4f4d 4d45 efix (or a COMME │ │ │ -00007110: 4e54 2061 7267 756d 656e 7429 2c20 616c NT argument), al │ │ │ -00007120: 736f 2070 726f 6d70 7420 666f 7220 6120 so prompt for a │ │ │ -00007130: 636f 6d6d 656e 742e 1f0a 2861 7574 6f6c comment...(autol │ │ │ -00007140: 6f61 6420 2763 7573 746f 6d69 7a65 2d73 oad 'customize-s │ │ │ -00007150: 6574 2d76 6172 6961 626c 6520 2263 7573 et-variable "cus │ │ │ -00007160: 2d65 6469 7422 2027 2823 2420 2e20 3238 -edit" '(#$ . 28 │ │ │ -00007170: 3332 3629 2074 206e 696c 290a 2340 3636 326) t nil).#@66 │ │ │ -00007180: 3520 5365 7420 7468 6520 6465 6661 756c 5 Set the defaul │ │ │ -00007190: 7420 666f 7220 5641 5249 4142 4c45 2074 t for VARIABLE t │ │ │ -000071a0: 6f20 5641 4c55 452c 2061 6e64 2073 6176 o VALUE, and sav │ │ │ -000071b0: 6520 6974 2066 6f72 2066 7574 7572 6520 e it for future │ │ │ -000071c0: 7365 7373 696f 6e73 2e0a 4966 2056 4152 sessions..If VAR │ │ │ -000071d0: 4941 424c 4520 6861 7320 6120 6063 7573 IABLE has a `cus │ │ │ -000071e0: 746f 6d2d 7365 7427 2070 726f 7065 7274 tom-set' propert │ │ │ -000071f0: 792c 2074 6861 7420 6973 2075 7365 6420 y, that is used │ │ │ -00007200: 666f 7220 7365 7474 696e 670a 5641 5249 for setting.VARI │ │ │ -00007210: 4142 4c45 2c20 6f74 6865 7277 6973 6520 ABLE, otherwise │ │ │ -00007220: 6073 6574 2d64 6566 6175 6c74 2720 6973 `set-default' is │ │ │ -00007230: 2075 7365 642e 0a0a 5468 6520 6063 7573 used...The `cus │ │ │ -00007240: 746f 6d69 7a65 642d 7661 6c75 6527 2070 tomized-value' p │ │ │ -00007250: 726f 7065 7274 7920 6f66 2074 6865 2056 roperty of the V │ │ │ -00007260: 4152 4941 424c 4520 7769 6c6c 2062 6520 ARIABLE will be │ │ │ -00007270: 7365 7420 746f 2061 206c 6973 740a 7769 set to a list.wi │ │ │ -00007280: 7468 2061 2071 756f 7465 6420 5641 4c55 th a quoted VALU │ │ │ -00007290: 4520 6173 2069 7473 2073 6f6c 6520 6c69 E as its sole li │ │ │ -000072a0: 7374 206d 656d 6265 722e 0a0a 4966 2056 st member...If V │ │ │ -000072b0: 4152 4941 424c 4520 6861 7320 6120 6076 ARIABLE has a `v │ │ │ -000072c0: 6172 6961 626c 652d 696e 7465 7261 6374 ariable-interact │ │ │ -000072d0: 6976 6527 2070 726f 7065 7274 792c 2074 ive' property, t │ │ │ -000072e0: 6861 7420 6973 2075 7365 6420 6173 2069 hat is used as i │ │ │ -000072f0: 660a 6974 2077 6572 6520 7468 6520 6172 f.it were the ar │ │ │ -00007300: 6720 746f 2060 696e 7465 7261 6374 6976 g to `interactiv │ │ │ -00007310: 6527 2028 7768 6963 6820 7365 6529 2074 e' (which see) t │ │ │ -00007320: 6f20 696e 7465 7261 6374 6976 656c 7920 o interactively │ │ │ -00007330: 7265 6164 2074 6865 2076 616c 7565 2e0a read the value.. │ │ │ -00007340: 0a49 6620 5641 5249 4142 4c45 2068 6173 .If VARIABLE has │ │ │ -00007350: 2061 2060 6375 7374 6f6d 2d74 7970 6527 a `custom-type' │ │ │ -00007360: 2070 726f 7065 7274 792c 2069 7420 6d75 property, it mu │ │ │ -00007370: 7374 2062 6520 6120 7769 6467 6574 2061 st be a widget a │ │ │ -00007380: 6e64 2074 6865 0a60 3a70 726f 6d70 742d nd the.`:prompt- │ │ │ -00007390: 7661 6c75 6527 2070 726f 7065 7274 7920 value' property │ │ │ -000073a0: 6f66 2074 6861 7420 7769 6467 6574 2077 of that widget w │ │ │ -000073b0: 696c 6c20 6265 2075 7365 6420 666f 7220 ill be used for │ │ │ -000073c0: 7265 6164 696e 6720 7468 6520 7661 6c75 reading the valu │ │ │ -000073d0: 652e 0a0a 4966 2067 6976 656e 2061 2070 e...If given a p │ │ │ -000073e0: 7265 6669 7820 286f 7220 6120 434f 4d4d refix (or a COMM │ │ │ -000073f0: 454e 5420 6172 6775 6d65 6e74 292c 2061 ENT argument), a │ │ │ -00007400: 6c73 6f20 7072 6f6d 7074 2066 6f72 2061 lso prompt for a │ │ │ -00007410: 2063 6f6d 6d65 6e74 2e1f 0a28 6175 746f comment...(auto │ │ │ -00007420: 6c6f 6164 2027 6375 7374 6f6d 697a 652d load 'customize- │ │ │ -00007430: 7361 7665 2d76 6172 6961 626c 6520 2263 save-variable "c │ │ │ -00007440: 7573 2d65 6469 7422 2027 2823 2420 2e20 us-edit" '(#$ . │ │ │ -00007450: 3239 3035 3829 2074 206e 696c 290a 2340 29058) t nil).#@ │ │ │ -00007460: 3134 3320 5365 6c65 6374 2061 2063 7573 143 Select a cus │ │ │ -00007470: 746f 6d69 7a61 7469 6f6e 2062 7566 6665 tomization buffe │ │ │ -00007480: 7220 7768 6963 6820 796f 7520 6361 6e20 r which you can │ │ │ -00007490: 7573 6520 746f 2073 6574 2075 7365 7220 use to set user │ │ │ -000074a0: 6f70 7469 6f6e 732e 0a55 7365 7220 6f70 options..User op │ │ │ -000074b0: 7469 6f6e 7320 6172 6520 7374 7275 6374 tions are struct │ │ │ -000074c0: 7572 6564 2069 6e74 6f20 2267 726f 7570 ured into "group │ │ │ -000074d0: 7322 2e0a 5468 6520 6465 6661 756c 7420 s"..The default │ │ │ -000074e0: 6772 6f75 7020 6973 2060 456d 6163 7327 group is `Emacs' │ │ │ -000074f0: 2e1f 0a28 6175 746f 6c6f 6164 2027 6375 ...(autoload 'cu │ │ │ -00007500: 7374 6f6d 697a 6520 2263 7573 2d65 6469 stomize "cus-edi │ │ │ -00007510: 7422 2027 2823 2420 2e20 3239 3739 3629 t" '(#$ . 29796) │ │ │ -00007520: 2074 206e 696c 290a 2864 6566 616c 6961 t nil).(defalia │ │ │ -00007530: 7320 2763 7573 746f 6d69 7a65 2d67 726f s 'customize-gro │ │ │ -00007540: 7570 2027 6375 7374 6f6d 697a 6529 0a23 up 'customize).# │ │ │ -00007550: 4035 3620 4375 7374 6f6d 697a 6520 5359 @56 Customize SY │ │ │ -00007560: 4d42 4f4c 2c20 7768 6963 6820 6d75 7374 MBOL, which must │ │ │ -00007570: 2062 6520 6120 6375 7374 6f6d 697a 6174 be a customizat │ │ │ -00007580: 696f 6e20 6772 6f75 702e 1f0a 2861 7574 ion group...(aut │ │ │ -00007590: 6f6c 6f61 6420 2763 7573 746f 6d69 7a65 oload 'customize │ │ │ -000075a0: 2d6f 7468 6572 2d77 696e 646f 7720 2263 -other-window "c │ │ │ -000075b0: 7573 2d65 6469 7422 2027 2823 2420 2e20 us-edit" '(#$ . │ │ │ -000075c0: 3330 3033 3629 2074 206e 696c 290a 2862 30036) t nil).(b │ │ │ -000075d0: 7974 652d 636f 6465 2022 c0c1 c25c 2288 yte-code "...\". │ │ │ -000075e0: c0c3 c45c 2287 2220 5b64 6566 616c 6961 ...\"." [defalia │ │ │ -000075f0: 7320 6375 7374 6f6d 697a 652d 6772 6f75 s customize-grou │ │ │ -00007600: 702d 6f74 6865 722d 7769 6e64 6f77 2063 p-other-window c │ │ │ -00007610: 7573 746f 6d69 7a65 2d6f 7468 6572 2d77 ustomize-other-w │ │ │ -00007620: 696e 646f 7720 6375 7374 6f6d 697a 652d indow customize- │ │ │ -00007630: 6f70 7469 6f6e 2063 7573 746f 6d69 7a65 option customize │ │ │ -00007640: 2d76 6172 6961 626c 655d 2033 290a 2340 -variable] 3).#@ │ │ │ -00007650: 3537 2043 7573 746f 6d69 7a65 2053 594d 57 Customize SYM │ │ │ -00007660: 424f 4c2c 2077 6869 6368 206d 7573 7420 BOL, which must │ │ │ -00007670: 6265 2061 2075 7365 7220 6f70 7469 6f6e be a user option │ │ │ -00007680: 2076 6172 6961 626c 652e 1f0a 2861 7574 variable...(aut │ │ │ -00007690: 6f6c 6f61 6420 2763 7573 746f 6d69 7a65 oload 'customize │ │ │ -000076a0: 2d76 6172 6961 626c 6520 2263 7573 2d65 -variable "cus-e │ │ │ -000076b0: 6469 7422 2027 2823 2420 2e20 3330 3239 dit" '(#$ . 3029 │ │ │ -000076c0: 3129 2074 206e 696c 290a 2340 3134 3920 1) t nil).#@149 │ │ │ -000076d0: 4375 7374 6f6d 697a 6520 616c 6c20 7573 Customize all us │ │ │ -000076e0: 6572 206f 7074 696f 6e20 7661 7269 6162 er option variab │ │ │ -000076f0: 6c65 7320 7768 6f73 6520 6465 6661 756c les whose defaul │ │ │ -00007700: 7420 7661 6c75 6573 2063 6861 6e67 6564 t values changed │ │ │ -00007710: 2072 6563 656e 746c 792e 0a54 6869 7320 recently..This │ │ │ -00007720: 6d65 616e 732c 2069 6e20 6f74 6865 7220 means, in other │ │ │ -00007730: 776f 7264 732c 2076 6172 6961 626c 6573 words, variables │ │ │ -00007740: 2064 6566 696e 6564 2077 6974 6820 6120 defined with a │ │ │ -00007750: 603a 7665 7273 696f 6e27 206b 6579 776f `:version' keywo │ │ │ -00007760: 7264 2e1f 0a28 6175 746f 6c6f 6164 2027 rd...(autoload ' │ │ │ -00007770: 6375 7374 6f6d 697a 652d 6368 616e 6765 customize-change │ │ │ -00007780: 642d 6f70 7469 6f6e 7320 2263 7573 2d65 d-options "cus-e │ │ │ -00007790: 6469 7422 2027 2823 2420 2e20 3330 3431 dit" '(#$ . 3041 │ │ │ -000077a0: 3629 2074 206e 696c 290a 2864 6566 616c 6) t nil).(defal │ │ │ -000077b0: 6961 7320 2763 7573 746f 6d69 7a65 2d76 ias 'customize-v │ │ │ -000077c0: 6172 6961 626c 652d 6f74 6865 722d 7769 ariable-other-wi │ │ │ -000077d0: 6e64 6f77 2027 6375 7374 6f6d 697a 652d ndow 'customize- │ │ │ -000077e0: 6f70 7469 6f6e 2d6f 7468 6572 2d77 696e option-other-win │ │ │ -000077f0: 646f 7729 0a23 4031 3133 2043 7573 746f dow).#@113 Custo │ │ │ -00007800: 6d69 7a65 2053 594d 424f 4c2c 2077 6869 mize SYMBOL, whi │ │ │ -00007810: 6368 206d 7573 7420 6265 2061 2075 7365 ch must be a use │ │ │ -00007820: 7220 6f70 7469 6f6e 2076 6172 6961 626c r option variabl │ │ │ -00007830: 652e 0a53 686f 7720 7468 6520 6275 6666 e..Show the buff │ │ │ -00007840: 6572 2069 6e20 616e 6f74 6865 7220 7769 er in another wi │ │ │ -00007850: 6e64 6f77 2c20 6275 7420 646f 6e27 7420 ndow, but don't │ │ │ -00007860: 7365 6c65 6374 2069 742e 1f0a 2861 7574 select it...(aut │ │ │ -00007870: 6f6c 6f61 6420 2763 7573 746f 6d69 7a65 oload 'customize │ │ │ -00007880: 2d6f 7074 696f 6e2d 6f74 6865 722d 7769 -option-other-wi │ │ │ -00007890: 6e64 6f77 2022 6375 732d 6564 6974 2220 ndow "cus-edit" │ │ │ -000078a0: 2728 2324 202e 2033 3037 3135 2920 7420 '(#$ . 30715) t │ │ │ -000078b0: 6e69 6c29 0a23 4039 3420 4375 7374 6f6d nil).#@94 Custom │ │ │ -000078c0: 697a 6520 5359 4d42 4f4c 2c20 7768 6963 ize SYMBOL, whic │ │ │ -000078d0: 6820 7368 6f75 6c64 2062 6520 6120 6661 h should be a fa │ │ │ -000078e0: 6365 206e 616d 6520 6f72 206e 696c 2e0a ce name or nil.. │ │ │ -000078f0: 4966 2053 594d 424f 4c20 6973 206e 696c If SYMBOL is nil │ │ │ -00007900: 2c20 6375 7374 6f6d 697a 6520 616c 6c20 , customize all │ │ │ -00007910: 6661 6365 732e 1f0a 2861 7574 6f6c 6f61 faces...(autoloa │ │ │ -00007920: 6420 2763 7573 746f 6d69 7a65 2d66 6163 d 'customize-fac │ │ │ -00007930: 6520 2263 7573 2d65 6469 7422 2027 2823 e "cus-edit" '(# │ │ │ -00007940: 2420 2e20 3330 3930 3629 2074 206e 696c $ . 30906) t nil │ │ │ -00007950: 290a 2340 3533 2053 686f 7720 6375 7374 ).#@53 Show cust │ │ │ -00007960: 6f6d 697a 6174 696f 6e20 6275 6666 6572 omization buffer │ │ │ -00007970: 2066 6f72 2046 4143 4520 696e 206f 7468 for FACE in oth │ │ │ -00007980: 6572 2077 696e 646f 772e 1f0a 2861 7574 er window...(aut │ │ │ -00007990: 6f6c 6f61 6420 2763 7573 746f 6d69 7a65 oload 'customize │ │ │ -000079a0: 2d66 6163 652d 6f74 6865 722d 7769 6e64 -face-other-wind │ │ │ -000079b0: 6f77 2022 6375 732d 6564 6974 2220 2728 ow "cus-edit" '( │ │ │ -000079c0: 2324 202e 2033 3130 3633 2920 7420 6e69 #$ . 31063) t ni │ │ │ -000079d0: 6c29 0a23 4036 3920 4375 7374 6f6d 697a l).#@69 Customiz │ │ │ -000079e0: 6520 616c 6c20 7573 6572 206f 7074 696f e all user optio │ │ │ -000079f0: 6e73 2073 6574 2073 696e 6365 2074 6865 ns set since the │ │ │ -00007a00: 206c 6173 7420 7361 7665 2069 6e20 7468 last save in th │ │ │ -00007a10: 6973 2073 6573 7369 6f6e 2e1f 0a28 6175 is session...(au │ │ │ -00007a20: 746f 6c6f 6164 2027 6375 7374 6f6d 697a toload 'customiz │ │ │ -00007a30: 652d 6375 7374 6f6d 697a 6564 2022 6375 e-customized "cu │ │ │ -00007a40: 732d 6564 6974 2220 2728 2324 202e 2033 s-edit" '(#$ . 3 │ │ │ -00007a50: 3131 3932 2920 7420 6e69 6c29 0a23 4034 1192) t nil).#@4 │ │ │ -00007a60: 3320 4375 7374 6f6d 697a 6520 616c 6c20 3 Customize all │ │ │ -00007a70: 616c 7265 6164 7920 7361 7665 6420 7573 already saved us │ │ │ -00007a80: 6572 206f 7074 696f 6e73 2e1f 0a28 6175 er options...(au │ │ │ -00007a90: 746f 6c6f 6164 2027 6375 7374 6f6d 697a toload 'customiz │ │ │ -00007aa0: 652d 7361 7665 6420 2263 7573 2d65 6469 e-saved "cus-edi │ │ │ -00007ab0: 7422 2027 2823 2420 2e20 3331 3333 3029 t" '(#$ . 31330) │ │ │ -00007ac0: 2074 206e 696c 290a 2340 3238 3820 4375 t nil).#@288 Cu │ │ │ -00007ad0: 7374 6f6d 697a 6520 616c 6c20 7573 6572 stomize all user │ │ │ -00007ae0: 206f 7074 696f 6e73 206d 6174 6368 696e options matchin │ │ │ -00007af0: 6720 5245 4745 5850 2e0a 4966 2041 4c4c g REGEXP..If ALL │ │ │ -00007b00: 2069 7320 606f 7074 696f 6e73 272c 2069 is `options', i │ │ │ -00007b10: 6e63 6c75 6465 206f 6e6c 7920 6f70 7469 nclude only opti │ │ │ -00007b20: 6f6e 732e 0a49 6620 414c 4c20 6973 2060 ons..If ALL is ` │ │ │ -00007b30: 6661 6365 7327 2c20 696e 636c 7564 6520 faces', include │ │ │ -00007b40: 6f6e 6c79 2066 6163 6573 2e0a 4966 2041 only faces..If A │ │ │ -00007b50: 4c4c 2069 7320 6067 726f 7570 7327 2c20 LL is `groups', │ │ │ -00007b60: 696e 636c 7564 6520 6f6e 6c79 2067 726f include only gro │ │ │ -00007b70: 7570 732e 0a49 6620 414c 4c20 6973 2074 ups..If ALL is t │ │ │ -00007b80: 2028 696e 7465 7261 6374 6976 656c 792c (interactively, │ │ │ -00007b90: 2077 6974 6820 7072 6566 6978 2061 7267 with prefix arg │ │ │ -00007ba0: 292c 2069 6e63 6c75 6465 206f 7074 696f ), include optio │ │ │ -00007bb0: 6e73 2077 6869 6368 2061 7265 206e 6f74 ns which are not │ │ │ -00007bc0: 0a75 7365 722d 7365 7474 6162 6c65 2c20 .user-settable, │ │ │ -00007bd0: 6173 2077 656c 6c20 6173 2066 6163 6573 as well as faces │ │ │ -00007be0: 2061 6e64 2067 726f 7570 732e 1f0a 2861 and groups...(a │ │ │ -00007bf0: 7574 6f6c 6f61 6420 2763 7573 746f 6d69 utoload 'customi │ │ │ -00007c00: 7a65 2d61 7072 6f70 6f73 2022 6375 732d ze-apropos "cus- │ │ │ -00007c10: 6564 6974 2220 2728 2324 202e 2033 3134 edit" '(#$ . 314 │ │ │ -00007c20: 3338 2920 7420 6e69 6c29 0a23 4031 3037 38) t nil).#@107 │ │ │ -00007c30: 2043 7573 746f 6d69 7a65 2061 6c6c 2075 Customize all u │ │ │ -00007c40: 7365 7220 6f70 7469 6f6e 7320 6d61 7463 ser options matc │ │ │ -00007c50: 6869 6e67 2052 4547 4558 502e 0a57 6974 hing REGEXP..Wit │ │ │ -00007c60: 6820 7072 6566 6978 2061 7267 2c20 696e h prefix arg, in │ │ │ -00007c70: 636c 7564 6520 6f70 7469 6f6e 7320 7768 clude options wh │ │ │ -00007c80: 6963 6820 6172 6520 6e6f 7420 7573 6572 ich are not user │ │ │ -00007c90: 2d73 6574 7461 626c 652e 1f0a 2861 7574 -settable...(aut │ │ │ -00007ca0: 6f6c 6f61 6420 2763 7573 746f 6d69 7a65 oload 'customize │ │ │ -00007cb0: 2d61 7072 6f70 6f73 2d6f 7074 696f 6e73 -apropos-options │ │ │ -00007cc0: 2022 6375 732d 6564 6974 2220 2728 2324 "cus-edit" '(#$ │ │ │ -00007cd0: 202e 2033 3137 3933 2920 7420 6e69 6c29 . 31793) t nil) │ │ │ -00007ce0: 0a23 4034 3320 4375 7374 6f6d 697a 6520 .#@43 Customize │ │ │ -00007cf0: 616c 6c20 7573 6572 2066 6163 6573 206d all user faces m │ │ │ -00007d00: 6174 6368 696e 6720 5245 4745 5850 2e1f atching REGEXP.. │ │ │ -00007d10: 0a28 6175 746f 6c6f 6164 2027 6375 7374 .(autoload 'cust │ │ │ -00007d20: 6f6d 697a 652d 6170 726f 706f 732d 6661 omize-apropos-fa │ │ │ -00007d30: 6365 7320 2263 7573 2d65 6469 7422 2027 ces "cus-edit" ' │ │ │ -00007d40: 2823 2420 2e20 3331 3937 3429 2074 206e (#$ . 31974) t n │ │ │ -00007d50: 696c 290a 2340 3434 2043 7573 746f 6d69 il).#@44 Customi │ │ │ -00007d60: 7a65 2061 6c6c 2075 7365 7220 6772 6f75 ze all user grou │ │ │ -00007d70: 7073 206d 6174 6368 696e 6720 5245 4745 ps matching REGE │ │ │ -00007d80: 5850 2e1f 0a28 6175 746f 6c6f 6164 2027 XP...(autoload ' │ │ │ -00007d90: 6375 7374 6f6d 697a 652d 6170 726f 706f customize-apropo │ │ │ -00007da0: 732d 6772 6f75 7073 2022 6375 732d 6564 s-groups "cus-ed │ │ │ -00007db0: 6974 2220 2728 2324 202e 2033 3230 3839 it" '(#$ . 32089 │ │ │ -00007dc0: 2920 7420 6e69 6c29 0a23 4032 3237 2043 ) t nil).#@227 C │ │ │ -00007dd0: 7265 6174 6520 6120 6275 6666 6572 2063 reate a buffer c │ │ │ -00007de0: 6f6e 7461 696e 696e 6720 4f50 5449 4f4e ontaining OPTION │ │ │ -00007df0: 532e 0a4f 7074 696f 6e61 6c20 4e41 4d45 S..Optional NAME │ │ │ -00007e00: 2069 7320 7468 6520 6e61 6d65 206f 6620 is the name of │ │ │ -00007e10: 7468 6520 6275 6666 6572 2e0a 4f50 5449 the buffer..OPTI │ │ │ -00007e20: 4f4e 5320 7368 6f75 6c64 2062 6520 616e ONS should be an │ │ │ -00007e30: 2061 6c69 7374 206f 6620 7468 6520 666f alist of the fo │ │ │ -00007e40: 726d 2028 2853 594d 424f 4c20 5749 4447 rm ((SYMBOL WIDG │ │ │ -00007e50: 4554 292e 2e2e 292c 2077 6865 7265 0a53 ET)...), where.S │ │ │ -00007e60: 594d 424f 4c20 6973 2061 2063 7573 746f YMBOL is a custo │ │ │ -00007e70: 6d69 7a61 7469 6f6e 206f 7074 696f 6e2c mization option, │ │ │ -00007e80: 2061 6e64 2057 4944 4745 5420 6973 2061 and WIDGET is a │ │ │ -00007e90: 2077 6964 6765 7420 666f 7220 6564 6974 widget for edit │ │ │ -00007ea0: 696e 670a 7468 6174 206f 7074 696f 6e2e ing.that option. │ │ │ -00007eb0: 1f0a 2861 7574 6f6c 6f61 6420 2763 7573 ..(autoload 'cus │ │ │ -00007ec0: 746f 6d2d 6275 6666 6572 2d63 7265 6174 tom-buffer-creat │ │ │ -00007ed0: 6520 2263 7573 2d65 6469 7422 2027 2823 e "cus-edit" '(# │ │ │ -00007ee0: 2420 2e20 3332 3230 3729 206e 696c 206e $ . 32207) nil n │ │ │ -00007ef0: 696c 290a 2340 3232 3720 4372 6561 7465 il).#@227 Create │ │ │ -00007f00: 2061 2062 7566 6665 7220 636f 6e74 6169 a buffer contai │ │ │ -00007f10: 6e69 6e67 204f 5054 494f 4e53 2e0a 4f70 ning OPTIONS..Op │ │ │ -00007f20: 7469 6f6e 616c 204e 414d 4520 6973 2074 tional NAME is t │ │ │ -00007f30: 6865 206e 616d 6520 6f66 2074 6865 2062 he name of the b │ │ │ -00007f40: 7566 6665 722e 0a4f 5054 494f 4e53 2073 uffer..OPTIONS s │ │ │ -00007f50: 686f 756c 6420 6265 2061 6e20 616c 6973 hould be an alis │ │ │ -00007f60: 7420 6f66 2074 6865 2066 6f72 6d20 2828 t of the form (( │ │ │ -00007f70: 5359 4d42 4f4c 2057 4944 4745 5429 2e2e SYMBOL WIDGET).. │ │ │ -00007f80: 2e29 2c20 7768 6572 650a 5359 4d42 4f4c .), where.SYMBOL │ │ │ -00007f90: 2069 7320 6120 6375 7374 6f6d 697a 6174 is a customizat │ │ │ -00007fa0: 696f 6e20 6f70 7469 6f6e 2c20 616e 6420 ion option, and │ │ │ -00007fb0: 5749 4447 4554 2069 7320 6120 7769 6467 WIDGET is a widg │ │ │ -00007fc0: 6574 2066 6f72 2065 6469 7469 6e67 0a74 et for editing.t │ │ │ -00007fd0: 6861 7420 6f70 7469 6f6e 2e1f 0a28 6175 hat option...(au │ │ │ -00007fe0: 746f 6c6f 6164 2027 6375 7374 6f6d 2d62 toload 'custom-b │ │ │ -00007ff0: 7566 6665 722d 6372 6561 7465 2d6f 7468 uffer-create-oth │ │ │ -00008000: 6572 2d77 696e 646f 7720 2263 7573 2d65 er-window "cus-e │ │ │ -00008010: 6469 7422 2027 2823 2420 2e20 3332 3530 dit" '(#$ . 3250 │ │ │ -00008020: 3629 206e 696c 206e 696c 290a 2340 3532 6) nil nil).#@52 │ │ │ -00008030: 2043 7265 6174 6520 6120 7472 6565 2062 Create a tree b │ │ │ -00008040: 726f 7773 6572 2066 6f72 2074 6865 2063 rowser for the c │ │ │ -00008050: 7573 746f 6d69 7a65 2068 6965 7261 7263 ustomize hierarc │ │ │ -00008060: 6879 2e1f 0a28 6175 746f 6c6f 6164 2027 hy...(autoload ' │ │ │ -00008070: 6375 7374 6f6d 697a 652d 6272 6f77 7365 customize-browse │ │ │ -00008080: 2022 6375 732d 6564 6974 2220 2728 2324 "cus-edit" '(#$ │ │ │ -00008090: 202e 2033 3238 3137 2920 7420 6e69 6c29 . 32817) t nil) │ │ │ -000080a0: 0a23 4036 3020 5361 7665 2061 6c6c 2075 .#@60 Save all u │ │ │ -000080b0: 7365 7220 6f70 7469 6f6e 7320 7768 6963 ser options whic │ │ │ -000080c0: 6820 6861 7665 2062 6565 6e20 7365 7420 h have been set │ │ │ -000080d0: 696e 2074 6869 7320 7365 7373 696f 6e2e in this session. │ │ │ -000080e0: 1f0a 2861 7574 6f6c 6f61 6420 2763 7573 ..(autoload 'cus │ │ │ -000080f0: 746f 6d69 7a65 2d73 6176 652d 6375 7374 tomize-save-cust │ │ │ -00008100: 6f6d 697a 6564 2022 6375 732d 6564 6974 omized "cus-edit │ │ │ -00008110: 2220 2728 2324 202e 2033 3239 3334 2920 " '(#$ . 32934) │ │ │ -00008120: 7420 6e69 6c29 0a23 4034 3320 5361 7665 t nil).#@43 Save │ │ │ -00008130: 2061 6c6c 2063 7573 746f 6d69 7a61 7469 all customizati │ │ │ -00008140: 6f6e 7320 696e 2060 6375 7374 6f6d 2d66 ons in `custom-f │ │ │ -00008150: 696c 6527 2e1f 0a28 6175 746f 6c6f 6164 ile'...(autoload │ │ │ -00008160: 2027 6375 7374 6f6d 2d73 6176 652d 616c 'custom-save-al │ │ │ -00008170: 6c20 2263 7573 2d65 6469 7422 2027 2823 l "cus-edit" '(# │ │ │ -00008180: 2420 2e20 3333 3036 3829 206e 696c 206e $ . 33068) nil n │ │ │ -00008190: 696c 290a 2340 3130 3320 4372 6561 7465 il).#@103 Create │ │ │ -000081a0: 206d 656e 7520 666f 7220 6375 7374 6f6d menu for custom │ │ │ -000081b0: 697a 6174 696f 6e20 6772 6f75 7020 5359 ization group SY │ │ │ -000081c0: 4d42 4f4c 2e0a 5468 6520 6d65 6e75 2069 MBOL..The menu i │ │ │ -000081d0: 7320 696e 2061 2066 6f72 6d61 7420 6170 s in a format ap │ │ │ -000081e0: 706c 6963 6162 6c65 2074 6f20 6065 6173 plicable to `eas │ │ │ -000081f0: 792d 6d65 6e75 2d64 6566 696e 6527 2e1f y-menu-define'.. │ │ │ -00008200: 0a28 6175 746f 6c6f 6164 2027 6375 7374 .(autoload 'cust │ │ │ -00008210: 6f6d 2d6d 656e 752d 6372 6561 7465 2022 om-menu-create " │ │ │ -00008220: 6375 732d 6564 6974 2220 2728 2324 202e cus-edit" '(#$ . │ │ │ -00008230: 2033 3331 3738 2920 6e69 6c20 6e69 6c29 33178) nil nil) │ │ │ -00008240: 0a23 4032 3230 2052 6574 7572 6e20 6120 .#@220 Return a │ │ │ -00008250: 6375 7374 6f6d 697a 6520 6d65 6e75 2066 customize menu f │ │ │ -00008260: 6f72 2063 7573 746f 6d69 7a61 7469 6f6e or customization │ │ │ -00008270: 2067 726f 7570 2053 594d 424f 4c2e 0a49 group SYMBOL..I │ │ │ -00008280: 6620 6f70 7469 6f6e 616c 204e 414d 4520 f optional NAME │ │ │ -00008290: 6973 2067 6976 656e 2c20 7573 6520 7468 is given, use th │ │ │ -000082a0: 6174 2061 7320 7468 6520 6e61 6d65 206f at as the name o │ │ │ -000082b0: 6620 7468 6520 6d65 6e75 2e0a 4f74 6865 f the menu..Othe │ │ │ -000082c0: 7277 6973 6520 7468 6520 6d65 6e75 2077 rwise the menu w │ │ │ -000082d0: 696c 6c20 6265 206e 616d 6564 2060 4375 ill be named `Cu │ │ │ -000082e0: 7374 6f6d 697a 6527 2e0a 5468 6520 666f stomize'..The fo │ │ │ -000082f0: 726d 6174 2069 7320 7375 6974 6162 6c65 rmat is suitable │ │ │ -00008300: 2066 6f72 2075 7365 2077 6974 6820 6065 for use with `e │ │ │ -00008310: 6173 792d 6d65 6e75 2d64 6566 696e 6527 asy-menu-define' │ │ │ -00008320: 2e1f 0a28 6175 746f 6c6f 6164 2027 6375 ...(autoload 'cu │ │ │ -00008330: 7374 6f6d 697a 652d 6d65 6e75 2d63 7265 stomize-menu-cre │ │ │ -00008340: 6174 6520 2263 7573 2d65 6469 7422 2027 ate "cus-edit" ' │ │ │ -00008350: 2823 2420 2e20 3333 3335 3129 206e 696c (#$ . 33351) nil │ │ │ -00008360: 206e 696c 290a 2340 3432 204d 6967 7261 nil).#@42 Migra │ │ │ -00008370: 7465 2063 7573 746f 6d20 6669 6c65 2066 te custom file f │ │ │ -00008380: 726f 6d20 686f 6d65 2064 6972 6563 746f rom home directo │ │ │ -00008390: 7279 2e1f 0a28 6175 746f 6c6f 6164 2027 ry...(autoload ' │ │ │ -000083a0: 6375 7374 6f6d 2d6d 6967 7261 7465 2d63 custom-migrate-c │ │ │ -000083b0: 7573 746f 6d2d 6669 6c65 2022 6375 732d ustom-file "cus- │ │ │ -000083c0: 6564 6974 2220 2728 2324 202e 2033 3336 edit" '(#$ . 336 │ │ │ -000083d0: 3433 2920 6e69 6c20 6e69 6c29 0a23 4036 43) nil nil).#@6 │ │ │ -000083e0: 3120 4c69 6b65 2060 6465 6666 6163 6527 1 Like `defface' │ │ │ -000083f0: 2c20 6275 7420 4641 4345 2069 7320 6576 , but FACE is ev │ │ │ -00008400: 616c 7561 7465 6420 6173 2061 206e 6f72 aluated as a nor │ │ │ -00008410: 6d61 6c20 6172 6775 6d65 6e74 2e1f 0a28 mal argument...( │ │ │ -00008420: 6175 746f 6c6f 6164 2027 6375 7374 6f6d autoload 'custom │ │ │ -00008430: 2d64 6563 6c61 7265 2d66 6163 6520 2263 -declare-face "c │ │ │ -00008440: 7573 2d66 6163 6522 2027 2823 2420 2e20 us-face" '(#$ . │ │ │ -00008450: 3333 3736 3229 206e 696c 206e 696c 290a 33762) nil nil). │ │ │ -00008460: 2340 3431 2053 6574 2074 6865 2062 6f6c #@41 Set the bol │ │ │ -00008470: 6420 7072 6f70 6572 7479 206f 6620 4641 d property of FA │ │ │ -00008480: 4345 2074 6f20 5641 4c55 452e 1f0a 2861 CE to VALUE...(a │ │ │ -00008490: 7574 6f6c 6f61 6420 2763 7573 746f 6d2d utoload 'custom- │ │ │ -000084a0: 7365 742d 6661 6365 2d62 6f6c 6420 2263 set-face-bold "c │ │ │ -000084b0: 7573 2d66 6163 6522 2027 2823 2420 2e20 us-face" '(#$ . │ │ │ -000084c0: 3333 3839 3329 206e 696c 206e 696c 290a 33893) nil nil). │ │ │ -000084d0: 2340 3935 2043 7573 746f 6d69 7a65 2074 #@95 Customize t │ │ │ -000084e0: 6865 2046 4143 4520 666f 7220 6469 7370 he FACE for disp │ │ │ -000084f0: 6c61 7920 7479 7065 7320 6d61 7463 6869 lay types matchi │ │ │ -00008500: 6e67 2044 4953 504c 4159 2c20 6d65 7267 ng DISPLAY, merg │ │ │ -00008510: 696e 670a 2020 696e 2074 6865 206e 6577 ing. in the new │ │ │ -00008520: 2069 7465 6d73 2066 726f 6d20 504c 4953 items from PLIS │ │ │ -00008530: 542e 1f0a 2861 7574 6f6c 6f61 6420 2763 T...(autoload 'c │ │ │ -00008540: 7573 746f 6d2d 7365 742d 6661 6365 2d75 ustom-set-face-u │ │ │ -00008550: 7064 6174 652d 7370 6563 2022 6375 732d pdate-spec "cus- │ │ │ -00008560: 6661 6365 2220 2728 2324 202e 2033 3430 face" '(#$ . 340 │ │ │ -00008570: 3035 2920 6e69 6c20 6e69 6c29 0a23 4033 05) nil nil).#@3 │ │ │ -00008580: 3936 2049 6e69 7469 616c 697a 6520 6661 96 Initialize fa │ │ │ -00008590: 6365 7320 6163 636f 7264 696e 6720 746f ces according to │ │ │ -000085a0: 2075 7365 7220 7072 6566 6572 656e 6365 user preference │ │ │ -000085b0: 732e 0a54 6869 7320 6173 6f63 6961 7465 s..This asociate │ │ │ -000085c0: 7320 7468 6520 7365 7474 696e 6720 7769 s the setting wi │ │ │ -000085d0: 7468 2074 6865 2055 5345 5220 7468 656d th the USER them │ │ │ -000085e0: 652e 0a54 6865 2061 7267 756d 656e 7473 e..The arguments │ │ │ -000085f0: 2073 686f 756c 6420 6265 2061 206c 6973 should be a lis │ │ │ -00008600: 7420 7768 6572 6520 6561 6368 2065 6e74 t where each ent │ │ │ -00008610: 7279 2068 6173 2074 6865 2066 6f72 6d3a ry has the form: │ │ │ -00008620: 0a0a 2020 2846 4143 4520 5350 4543 205b .. (FACE SPEC [ │ │ │ -00008630: 4e4f 5720 5b43 4f4d 4d45 4e54 5d5d 290a NOW [COMMENT]]). │ │ │ -00008640: 0a53 5045 4320 7769 6c6c 2062 6520 7374 .SPEC will be st │ │ │ -00008650: 6f72 6564 2061 7320 7468 6520 7361 7665 ored as the save │ │ │ -00008660: 6420 7661 6c75 6520 666f 7220 4641 4345 d value for FACE │ │ │ -00008670: 2e20 2049 6620 4e4f 5720 6973 2070 7265 . If NOW is pre │ │ │ -00008680: 7365 6e74 0a61 6e64 206e 6f6e 2d6e 696c sent.and non-nil │ │ │ -00008690: 2c20 4641 4345 2077 696c 6c20 616c 736f , FACE will also │ │ │ -000086a0: 2062 6520 6372 6561 7465 6420 6163 636f be created acco │ │ │ -000086b0: 7264 696e 6720 746f 2053 5045 432e 0a43 rding to SPEC..C │ │ │ -000086c0: 4f4d 4d45 4e54 2069 7320 6120 7374 7269 OMMENT is a stri │ │ │ -000086d0: 6e67 2063 6f6d 6d65 6e74 2061 626f 7574 ng comment about │ │ │ -000086e0: 2046 4143 452e 0a0a 5365 6520 6064 6566 FACE...See `def │ │ │ -000086f0: 6661 6365 2720 666f 7220 7468 6520 666f face' for the fo │ │ │ -00008700: 726d 6174 206f 6620 5350 4543 2e1f 0a28 rmat of SPEC...( │ │ │ -00008710: 6175 746f 6c6f 6164 2027 6375 7374 6f6d autoload 'custom │ │ │ -00008720: 2d73 6574 2d66 6163 6573 2022 6375 732d -set-faces "cus- │ │ │ -00008730: 6661 6365 2220 2728 2324 202e 2033 3431 face" '(#$ . 341 │ │ │ -00008740: 3739 2920 6e69 6c20 6e69 6c29 0a23 4031 79) nil nil).#@1 │ │ │ -00008750: 3638 2049 6e69 7469 616c 697a 6520 6661 68 Initialize fa │ │ │ -00008760: 6365 7320 6163 636f 7264 696e 6720 746f ces according to │ │ │ -00008770: 2073 6574 7469 6e67 7320 7370 6563 6966 settings specif │ │ │ -00008780: 6965 6420 6279 2061 7267 732e 0a52 6563 ied by args..Rec │ │ │ -00008790: 6f72 6473 2074 6865 2073 6574 7469 6e67 ords the setting │ │ │ -000087a0: 7320 6173 2062 656c 6f6e 6769 6e67 2074 s as belonging t │ │ │ -000087b0: 6f20 5448 454d 452e 0a0a 5365 6520 6063 o THEME...See `c │ │ │ -000087c0: 7573 746f 6d2d 7365 742d 6661 6365 7327 ustom-set-faces' │ │ │ -000087d0: 2066 6f72 2061 2064 6573 6372 6970 7469 for a descripti │ │ │ -000087e0: 6f6e 206f 6620 7468 6520 6172 6775 6d65 on of the argume │ │ │ -000087f0: 6e74 7320 4152 4753 2e1f 0a28 6175 746f nts ARGS...(auto │ │ │ -00008800: 6c6f 6164 2027 6375 7374 6f6d 2d74 6865 load 'custom-the │ │ │ -00008810: 6d65 2d73 6574 2d66 6163 6573 2022 6375 me-set-faces "cu │ │ │ -00008820: 732d 6661 6365 2220 2728 2324 202e 2033 s-face" '(#$ . 3 │ │ │ -00008830: 3436 3433 2920 6e69 6c20 6e69 6c29 0a23 4643) nil nil).# │ │ │ -00008840: 4037 3820 5265 7475 726e 2073 7065 6320 @78 Return spec │ │ │ -00008850: 6f66 2046 4143 4520 696e 2054 4845 4d45 of FACE in THEME │ │ │ -00008860: 2069 6620 7468 6520 5448 454d 4520 6d6f if the THEME mo │ │ │ -00008870: 6469 6669 6573 2074 6865 0a46 4143 452e difies the.FACE. │ │ │ -00008880: 2020 4e69 6c20 6f74 6865 7277 6973 652e Nil otherwise. │ │ │ -00008890: 1f0a 2861 7574 6f6c 6f61 6420 2763 7573 ..(autoload 'cus │ │ │ -000088a0: 746f 6d2d 7468 656d 652d 6661 6365 2d76 tom-theme-face-v │ │ │ -000088b0: 616c 7565 2022 6375 732d 6661 6365 2220 alue "cus-face" │ │ │ -000088c0: 2728 2324 202e 2033 3438 3834 2920 6e69 '(#$ . 34884) ni │ │ │ -000088d0: 6c20 6e69 6c29 0a28 6279 7465 2d63 6f64 l nil).(byte-cod │ │ │ -000088e0: 6520 22c0 c1c2 c389 8925 8722 205b 6175 e "......%." [au │ │ │ -000088f0: 746f 6c6f 6164 2063 7573 746f 6d2d 7468 toload custom-th │ │ │ -00008900: 656d 652d 7265 7365 742d 6661 6365 7320 eme-reset-faces │ │ │ -00008910: 2263 7573 2d66 6163 6522 206e 696c 5d20 "cus-face" nil] │ │ │ -00008920: 3629 0a23 4031 3537 2052 6573 6574 2074 6).#@157 Reset t │ │ │ -00008930: 6865 2076 616c 7565 206f 6620 7468 6520 he value of the │ │ │ -00008940: 6661 6365 2074 6f20 7661 6c75 6573 2070 face to values p │ │ │ -00008950: 7265 7669 6f75 736c 7920 6465 6669 6e65 reviously define │ │ │ -00008960: 642e 0a41 7373 6f63 6961 7465 2074 6869 d..Associate thi │ │ │ -00008970: 7320 7365 7474 696e 6720 7769 7468 2074 s setting with t │ │ │ -00008980: 6865 2027 7573 6572 2720 7468 656d 652e he 'user' theme. │ │ │ -00008990: 0a0a 4152 4753 2069 7320 6465 6669 6e65 ..ARGS is define │ │ │ -000089a0: 6420 6173 2066 6f72 2060 6375 7374 6f6d d as for `custom │ │ │ -000089b0: 2d74 6865 6d65 2d72 6573 6574 2d66 6163 -theme-reset-fac │ │ │ -000089c0: 6573 272e 1f0a 2861 7574 6f6c 6f61 6420 es'...(autoload │ │ │ -000089d0: 2763 7573 746f 6d2d 7265 7365 742d 6661 'custom-reset-fa │ │ │ -000089e0: 6365 7320 2263 7573 2d66 6163 6522 2027 ces "cus-face" ' │ │ │ -000089f0: 2823 2420 2e20 3335 3131 3329 206e 696c (#$ . 35113) nil │ │ │ -00008a00: 206e 696c 290a 2340 3538 2042 6173 6520 nil).#@58 Base │ │ │ -00008a10: 6f66 2066 696c 6520 6e61 6d65 2066 6f72 of file name for │ │ │ -00008a20: 2073 746f 7269 6e67 2063 7573 746f 6d69 storing customi │ │ │ -00008a30: 7a61 7469 6f6e 2069 6e66 6f72 6d61 7469 zation informati │ │ │ -00008a40: 6f6e 2e1f 0a28 6465 6663 6f6e 7374 2063 on...(defconst c │ │ │ -00008a50: 7573 746f 6d2d 6669 6c65 2d62 6173 6520 ustom-file-base │ │ │ -00008a60: 2263 7573 746f 6d2e 656c 2220 2823 2420 "custom.el" (#$ │ │ │ -00008a70: 2e20 3335 3333 3929 290a 2340 3135 3720 . 35339)).#@157 │ │ │ -00008a80: 4669 6c65 2075 7365 6420 666f 7220 7374 File used for st │ │ │ -00008a90: 6f72 696e 6720 6375 7374 6f6d 697a 6174 oring customizat │ │ │ -00008aa0: 696f 6e20 696e 666f 726d 6174 696f 6e2e ion information. │ │ │ -00008ab0: 0a49 6620 796f 7520 6368 616e 6765 2074 .If you change t │ │ │ -00008ac0: 6869 7320 6672 6f6d 2074 6865 2064 6566 his from the def │ │ │ -00008ad0: 6175 6c74 2079 6f75 206e 6565 6420 746f ault you need to │ │ │ -00008ae0: 0a65 7870 6c69 6369 746c 7920 6c6f 6164 .explicitly load │ │ │ -00008af0: 2074 6861 7420 6669 6c65 2066 6f72 2074 that file for t │ │ │ -00008b00: 6865 2073 6574 7469 6e67 7320 746f 2074 he settings to t │ │ │ -00008b10: 616b 6520 6566 6665 6374 2e1f 0a28 6465 ake effect...(de │ │ │ -00008b20: 6676 6172 2063 7573 746f 6d2d 6669 6c65 fvar custom-file │ │ │ -00008b30: 206e 696c 2028 2324 202e 2033 3534 3536 nil (#$ . 35456 │ │ │ -00008b40: 2929 0a23 4031 3231 2043 6f6e 7374 7275 )).#@121 Constru │ │ │ -00008b50: 6374 2074 6865 2064 6566 6175 6c74 2063 ct the default c │ │ │ -00008b60: 7573 746f 6d20 6669 6c65 206e 616d 6520 ustom file name │ │ │ -00008b70: 6672 6f6d 2074 6865 2069 6e69 7420 6669 from the init fi │ │ │ -00008b80: 6c65 206e 616d 652e 0a49 6620 464f 5243 le name..If FORC │ │ │ -00008b90: 452d 4e45 5720 6973 206e 6f6e 2d6e 696c E-NEW is non-nil │ │ │ -00008ba0: 2c20 666f 7263 6520 706f 7374 2d6d 6967 , force post-mig │ │ │ -00008bb0: 7261 7469 6f6e 206c 6f63 6174 696f 6e2e ration location. │ │ │ -00008bc0: 1f0a 2861 7574 6f6c 6f61 6420 276d 616b ..(autoload 'mak │ │ │ -00008bd0: 652d 6375 7374 6f6d 2d66 696c 652d 6e61 e-custom-file-na │ │ │ -00008be0: 6d65 2022 6375 732d 6669 6c65 2220 2728 me "cus-file" '( │ │ │ -00008bf0: 2324 202e 2033 3536 3537 2920 6e69 6c20 #$ . 35657) nil │ │ │ -00008c00: 6e69 6c29 0a23 4032 3734 2050 7269 6e74 nil).#@274 Print │ │ │ -00008c10: 2064 6973 6173 7365 6d62 6c65 6420 636f disassembled co │ │ │ -00008c20: 6465 2066 6f72 204f 424a 4543 5420 696e de for OBJECT in │ │ │ -00008c30: 2028 6f70 7469 6f6e 616c 2920 4255 4646 (optional) BUFF │ │ │ -00008c40: 4552 2e0a 4f42 4a45 4354 2063 616e 2062 ER..OBJECT can b │ │ │ -00008c50: 6520 6120 7379 6d62 6f6c 2064 6566 696e e a symbol defin │ │ │ -00008c60: 6564 2061 7320 6120 6675 6e63 7469 6f6e ed as a function │ │ │ -00008c70: 2c20 6f72 2061 2066 756e 6374 696f 6e20 , or a function │ │ │ -00008c80: 6974 7365 6c66 0a28 6120 6c61 6d62 6461 itself.(a lambda │ │ │ -00008c90: 2065 7870 7265 7373 696f 6e20 6f72 2061 expression or a │ │ │ -00008ca0: 2063 6f6d 7069 6c65 642d 6675 6e63 7469 compiled-functi │ │ │ -00008cb0: 6f6e 206f 626a 6563 7429 2e0a 4966 204f on object)..If O │ │ │ -00008cc0: 424a 4543 5420 6973 206e 6f74 2061 6c72 BJECT is not alr │ │ │ -00008cd0: 6561 6479 2063 6f6d 7069 6c65 642c 2077 eady compiled, w │ │ │ -00008ce0: 6520 636f 6d70 696c 6520 6974 2c20 6275 e compile it, bu │ │ │ -00008cf0: 7420 646f 206e 6f74 0a72 6564 6566 696e t do not.redefin │ │ │ -00008d00: 6520 4f42 4a45 4354 2069 6620 6974 2069 e OBJECT if it i │ │ │ -00008d10: 7320 6120 7379 6d62 6f6c 2e1f 0a28 6175 s a symbol...(au │ │ │ -00008d20: 746f 6c6f 6164 2027 6469 7361 7373 656d toload 'disassem │ │ │ -00008d30: 626c 6520 2264 6973 6173 7322 2027 2823 ble "disass" '(# │ │ │ -00008d40: 2420 2e20 3335 3835 3129 2074 206e 696c $ . 35851) t nil │ │ │ -00008d50: 290a 2340 3730 2044 6573 6372 6962 6520 ).#@70 Describe │ │ │ -00008d60: 7468 6520 6469 7370 6c61 7920 7461 626c the display tabl │ │ │ -00008d70: 6520 696e 2075 7365 2069 6e20 7468 6520 e in use in the │ │ │ -00008d80: 7365 6c65 6374 6564 2077 696e 646f 7720 selected window │ │ │ -00008d90: 616e 6420 6275 6666 6572 2e1f 0a28 6175 and buffer...(au │ │ │ -00008da0: 746f 6c6f 6164 2027 6465 7363 7269 6265 toload 'describe │ │ │ -00008db0: 2d63 7572 7265 6e74 2d64 6973 706c 6179 -current-display │ │ │ -00008dc0: 2d74 6162 6c65 2022 6469 7370 2d74 6162 -table "disp-tab │ │ │ -00008dd0: 6c65 2220 2728 2324 202e 2033 3631 3833 le" '(#$ . 36183 │ │ │ -00008de0: 2920 7420 6e69 6c29 0a23 4033 3620 5265 ) t nil).#@36 Re │ │ │ -00008df0: 7475 726e 2061 206e 6577 2c20 656d 7074 turn a new, empt │ │ │ -00008e00: 7920 6469 7370 6c61 7920 7461 626c 652e y display table. │ │ │ -00008e10: 1f0a 2861 7574 6f6c 6f61 6420 276d 616b ..(autoload 'mak │ │ │ -00008e20: 652d 6469 7370 6c61 792d 7461 626c 6520 e-display-table │ │ │ -00008e30: 2264 6973 702d 7461 626c 6522 2027 2823 "disp-table" '(# │ │ │ -00008e40: 2420 2e20 3336 3333 3429 206e 696c 206e $ . 36334) nil n │ │ │ -00008e50: 696c 290a 2340 3531 2044 6973 706c 6179 il).#@51 Display │ │ │ -00008e60: 2063 6861 7261 6374 6572 7320 696e 2074 characters in t │ │ │ -00008e70: 6865 2072 616e 6765 204c 2074 6f20 4820 he range L to H │ │ │ -00008e80: 6c69 7465 7261 6c6c 792e 1f0a 2861 7574 literally...(aut │ │ │ -00008e90: 6f6c 6f61 6420 2773 7461 6e64 6172 642d oload 'standard- │ │ │ -00008ea0: 6469 7370 6c61 792d 3862 6974 2022 6469 display-8bit "di │ │ │ -00008eb0: 7370 2d74 6162 6c65 2220 2728 2324 202e sp-table" '(#$ . │ │ │ -00008ec0: 2033 3634 3431 2920 6e69 6c20 6e69 6c29 36441) nil nil) │ │ │ -00008ed0: 0a23 4036 3820 4469 7370 6c61 7920 6368 .#@68 Display ch │ │ │ -00008ee0: 6172 6163 7465 7273 2069 6e20 7468 6520 aracters in the │ │ │ -00008ef0: 7261 6e67 6520 4c20 746f 2048 2075 7369 range L to H usi │ │ │ -00008f00: 6e67 2074 6865 2064 6566 6175 6c74 206e ng the default n │ │ │ -00008f10: 6f74 6174 696f 6e2e 1f0a 2861 7574 6f6c otation...(autol │ │ │ -00008f20: 6f61 6420 2773 7461 6e64 6172 642d 6469 oad 'standard-di │ │ │ -00008f30: 7370 6c61 792d 6465 6661 756c 7420 2264 splay-default "d │ │ │ -00008f40: 6973 702d 7461 626c 6522 2027 2823 2420 isp-table" '(#$ │ │ │ -00008f50: 2e20 3336 3536 3629 206e 696c 206e 696c . 36566) nil nil │ │ │ -00008f60: 290a 2340 3437 2044 6973 706c 6179 2063 ).#@47 Display c │ │ │ -00008f70: 6861 7261 6374 6572 2043 2075 7369 6e67 haracter C using │ │ │ -00008f80: 2070 7269 6e74 6162 6c65 2073 7472 696e printable strin │ │ │ -00008f90: 6720 532e 1f0a 2861 7574 6f6c 6f61 6420 g S...(autoload │ │ │ -00008fa0: 2773 7461 6e64 6172 642d 6469 7370 6c61 'standard-displa │ │ │ -00008fb0: 792d 6173 6369 6920 2264 6973 702d 7461 y-ascii "disp-ta │ │ │ -00008fc0: 626c 6522 2027 2823 2420 2e20 3336 3731 ble" '(#$ . 3671 │ │ │ -00008fd0: 3129 206e 696c 206e 696c 290a 2340 3136 1) nil nil).#@16 │ │ │ -00008fe0: 3420 4469 7370 6c61 7920 6368 6172 6163 4 Display charac │ │ │ -00008ff0: 7465 7220 4320 6173 2063 6861 7261 6374 ter C as charact │ │ │ -00009000: 6572 2053 4320 696e 2074 6865 2067 3120 er SC in the g1 │ │ │ -00009010: 6368 6172 6163 7465 7220 7365 742e 0a54 character set..T │ │ │ -00009020: 6869 7320 6675 6e63 7469 6f6e 2061 7373 his function ass │ │ │ -00009030: 756d 6573 2074 6861 7420 796f 7572 2074 umes that your t │ │ │ -00009040: 6572 6d69 6e61 6c20 7573 6573 2074 6865 erminal uses the │ │ │ -00009050: 2053 4f2f 5349 2063 6861 7261 6374 6572 SO/SI character │ │ │ -00009060: 733b 0a69 7420 6973 206d 6561 6e69 6e67 s;.it is meaning │ │ │ -00009070: 6c65 7373 2066 6f72 2061 6e20 5820 6672 less for an X fr │ │ │ -00009080: 616d 652e 1f0a 2861 7574 6f6c 6f61 6420 ame...(autoload │ │ │ -00009090: 2773 7461 6e64 6172 642d 6469 7370 6c61 'standard-displa │ │ │ -000090a0: 792d 6731 2022 6469 7370 2d74 6162 6c65 y-g1 "disp-table │ │ │ -000090b0: 2220 2728 2324 202e 2033 3638 3334 2920 " '(#$ . 36834) │ │ │ -000090c0: 6e69 6c20 6e69 6c29 0a23 4031 3436 2044 nil nil).#@146 D │ │ │ -000090d0: 6973 706c 6179 2063 6861 7261 6374 6572 isplay character │ │ │ -000090e0: 2043 2061 7320 6368 6172 6163 7465 7220 C as character │ │ │ -000090f0: 4743 2069 6e20 6772 6170 6869 6373 2063 GC in graphics c │ │ │ -00009100: 6861 7261 6374 6572 2073 6574 2e0a 5468 haracter set..Th │ │ │ -00009110: 6973 2066 756e 6374 696f 6e20 6173 7375 is function assu │ │ │ -00009120: 6d65 7320 5654 3130 302d 636f 6d70 6174 mes VT100-compat │ │ │ -00009130: 6962 6c65 2065 7363 6170 6573 3b20 6974 ible escapes; it │ │ │ -00009140: 2069 7320 6d65 616e 696e 676c 6573 7320 is meaningless │ │ │ -00009150: 666f 7220 616e 0a58 2066 7261 6d65 2e1f for an.X frame.. │ │ │ -00009160: 0a28 6175 746f 6c6f 6164 2027 7374 616e .(autoload 'stan │ │ │ -00009170: 6461 7264 2d64 6973 706c 6179 2d67 7261 dard-display-gra │ │ │ -00009180: 7068 6963 2022 6469 7370 2d74 6162 6c65 phic "disp-table │ │ │ -00009190: 2220 2728 2324 202e 2033 3730 3731 2920 " '(#$ . 37071) │ │ │ -000091a0: 6e69 6c20 6e69 6c29 0a23 4035 3520 4469 nil nil).#@55 Di │ │ │ -000091b0: 7370 6c61 7920 6368 6172 6163 7465 7220 splay character │ │ │ -000091c0: 4320 6173 2063 6861 7261 6374 6572 2055 C as character U │ │ │ -000091d0: 4320 706c 7573 2075 6e64 6572 6c69 6e69 C plus underlini │ │ │ -000091e0: 6e67 2e1f 0a28 6175 746f 6c6f 6164 2027 ng...(autoload ' │ │ │ -000091f0: 7374 616e 6461 7264 2d64 6973 706c 6179 standard-display │ │ │ -00009200: 2d75 6e64 6572 6c69 6e65 2022 6469 7370 -underline "disp │ │ │ -00009210: 2d74 6162 6c65 2220 2728 2324 202e 2033 -table" '(#$ . 3 │ │ │ -00009220: 3732 3934 2920 6e69 6c20 6e69 6c29 0a23 7294) nil nil).# │ │ │ -00009230: 4032 3439 2054 6f67 676c 6520 6469 7370 @249 Toggle disp │ │ │ -00009240: 6c61 7920 6f66 2045 7572 6f70 6561 6e20 lay of European │ │ │ -00009250: 6368 6172 6163 7465 7273 2065 6e63 6f64 characters encod │ │ │ -00009260: 6564 2077 6974 6820 4953 4f20 3838 3539 ed with ISO 8859 │ │ │ -00009270: 2e0a 5768 656e 2065 6e61 626c 6564 2c20 ..When enabled, │ │ │ -00009280: 6368 6172 6163 7465 7273 2069 6e20 7468 characters in th │ │ │ -00009290: 6520 7261 6e67 6520 6f66 2031 3630 2074 e range of 160 t │ │ │ -000092a0: 6f20 3235 3520 6469 7370 6c61 7920 6e6f o 255 display no │ │ │ -000092b0: 740a 6173 206f 6374 616c 2065 7363 6170 t.as octal escap │ │ │ -000092c0: 6573 2c20 6275 7420 6173 2061 6363 656e es, but as accen │ │ │ -000092d0: 7465 6420 6368 6172 6163 7465 7273 2e0a ted characters.. │ │ │ -000092e0: 5769 7468 2070 7265 6669 7820 6172 6775 With prefix argu │ │ │ -000092f0: 6d65 6e74 2c20 656e 6162 6c65 2045 7572 ment, enable Eur │ │ │ -00009300: 6f70 6561 6e20 6368 6172 6163 7465 7220 opean character │ │ │ -00009310: 6469 7370 6c61 7920 6966 6620 6172 6720 display iff arg │ │ │ -00009320: 6973 2070 6f73 6974 6976 652e 1f0a 2861 is positive...(a │ │ │ -00009330: 7574 6f6c 6f61 6420 2773 7461 6e64 6172 utoload 'standar │ │ │ -00009340: 642d 6469 7370 6c61 792d 6575 726f 7065 d-display-europe │ │ │ -00009350: 616e 2022 6469 7370 2d74 6162 6c65 2220 an "disp-table" │ │ │ -00009360: 2728 2324 202e 2033 3734 3239 2920 7420 '(#$ . 37429) t │ │ │ -00009370: 6e69 6c29 0a23 4032 3033 2054 656c 6c20 nil).#@203 Tell │ │ │ -00009380: 7461 6773 2063 6f6d 6d61 6e64 7320 746f tags commands to │ │ │ -00009390: 2075 7365 2074 6167 7320 7461 626c 6520 use tags table │ │ │ -000093a0: 6669 6c65 2046 494c 4520 7768 656e 2061 file FILE when a │ │ │ -000093b0: 6c6c 2065 6c73 6520 6661 696c 732e 0a46 ll else fails..F │ │ │ -000093c0: 494c 4520 7368 6f75 6c64 2062 6520 7468 ILE should be th │ │ │ -000093d0: 6520 6e61 6d65 206f 6620 6120 6669 6c65 e name of a file │ │ │ -000093e0: 2063 7265 6174 6564 2077 6974 6820 7468 created with th │ │ │ -000093f0: 6520 6065 7461 6773 2720 7072 6f67 7261 e `etags' progra │ │ │ -00009400: 6d2e 0a41 2064 6972 6563 746f 7279 206e m..A directory n │ │ │ -00009410: 616d 6520 6973 206f 6b20 746f 6f3b 2069 ame is ok too; i │ │ │ -00009420: 7420 6d65 616e 7320 6669 6c65 2054 4147 t means file TAG │ │ │ -00009430: 5320 696e 2074 6861 7420 6469 7265 6374 S in that direct │ │ │ -00009440: 6f72 792e 1f0a 2861 7574 6f6c 6f61 6420 ory...(autoload │ │ │ -00009450: 2776 6973 6974 2d74 6167 732d 7461 626c 'visit-tags-tabl │ │ │ -00009460: 6520 2265 7461 6773 2220 2728 2324 202e e "etags" '(#$ . │ │ │ -00009470: 2033 3737 3535 2920 7420 6e69 6c29 0a23 37755) t nil).# │ │ │ -00009480: 4031 3631 202a 4669 6e64 2074 6167 2077 @161 *Find tag w │ │ │ -00009490: 686f 7365 206e 616d 6520 636f 6e74 6169 hose name contai │ │ │ -000094a0: 6e73 2054 4147 4e41 4d45 2e0a 4964 656e ns TAGNAME..Iden │ │ │ -000094b0: 7469 6361 6c20 746f 2060 6669 6e64 2d74 tical to `find-t │ │ │ -000094c0: 6167 2720 6275 7420 646f 6573 206e 6f74 ag' but does not │ │ │ -000094d0: 2070 726f 6d70 7420 666f 7220 7461 6720 prompt for tag │ │ │ -000094e0: 7768 656e 2063 616c 6c65 6420 696e 7465 when called inte │ │ │ -000094f0: 7261 6374 6976 656c 793b 0a69 6e73 7465 ractively;.inste │ │ │ -00009500: 6164 2c20 7573 6573 2074 6167 2061 726f ad, uses tag aro │ │ │ -00009510: 756e 6420 6f72 2062 6566 6f72 6520 706f und or before po │ │ │ -00009520: 696e 742e 1f0a 2861 7574 6f6c 6f61 6420 int...(autoload │ │ │ -00009530: 2766 696e 642d 7461 672d 6174 2d70 6f69 'find-tag-at-poi │ │ │ -00009540: 6e74 2022 6574 6167 7322 2027 2823 2420 nt "etags" '(#$ │ │ │ -00009550: 2e20 2d33 3830 3231 2920 7420 6e69 6c29 . -38021) t nil) │ │ │ -00009560: 0a23 4039 3235 202a 4669 6e64 2074 6167 .#@925 *Find tag │ │ │ -00009570: 2077 686f 7365 206e 616d 6520 636f 6e74 whose name cont │ │ │ -00009580: 6169 6e73 2054 4147 4e41 4d45 2e0a 2053 ains TAGNAME.. S │ │ │ -00009590: 656c 6563 7473 2074 6865 2062 7566 6665 elects the buffe │ │ │ -000095a0: 7220 7468 6174 2074 6865 2074 6167 2069 r that the tag i │ │ │ -000095b0: 7320 636f 6e74 6169 6e65 6420 696e 0a61 s contained in.a │ │ │ -000095c0: 6e64 2070 7574 7320 706f 696e 7420 6174 nd puts point at │ │ │ -000095d0: 2069 7473 2064 6566 696e 6974 696f 6e2e its definition. │ │ │ -000095e0: 0a20 4966 2054 4147 4e41 4d45 2069 7320 . If TAGNAME is │ │ │ -000095f0: 6120 6e75 6c6c 2073 7472 696e 672c 2074 a null string, t │ │ │ -00009600: 6865 2065 7870 7265 7373 696f 6e20 696e he expression in │ │ │ -00009610: 2074 6865 2062 7566 6665 720a 6172 6f75 the buffer.arou │ │ │ -00009620: 6e64 206f 7220 6265 666f 7265 2070 6f69 nd or before poi │ │ │ -00009630: 6e74 2069 7320 7573 6564 2061 7320 7468 nt is used as th │ │ │ -00009640: 6520 7461 6720 6e61 6d65 2e0a 2049 6620 e tag name.. If │ │ │ -00009650: 6361 6c6c 6564 2069 6e74 6572 6163 7469 called interacti │ │ │ -00009660: 7665 6c79 2077 6974 6820 6120 6e75 6d65 vely with a nume │ │ │ -00009670: 7269 6320 6172 6775 6d65 6e74 2c20 7365 ric argument, se │ │ │ -00009680: 6172 6368 6573 2066 6f72 2074 6865 206e arches for the n │ │ │ -00009690: 6578 7420 7461 670a 696e 2074 6865 2074 ext tag.in the t │ │ │ -000096a0: 6167 2074 6162 6c65 2074 6861 7420 6d61 ag table that ma │ │ │ -000096b0: 7463 6865 7320 7468 6520 7461 676e 616d tches the tagnam │ │ │ -000096c0: 6520 7573 6564 2069 6e20 7468 6520 7072 e used in the pr │ │ │ -000096d0: 6576 696f 7573 2066 696e 642d 7461 672e evious find-tag. │ │ │ -000096e0: 0a20 4966 2073 6563 6f6e 6420 6172 6720 . If second arg │ │ │ -000096f0: 4f54 4845 522d 5749 4e44 4f57 2069 7320 OTHER-WINDOW is │ │ │ -00009700: 6e6f 6e2d 6e69 6c2c 2075 7365 7320 616e non-nil, uses an │ │ │ -00009710: 6f74 6865 7220 7769 6e64 6f77 2074 6f20 other window to │ │ │ -00009720: 6469 7370 6c61 790a 7468 6520 7461 672e display.the tag. │ │ │ -00009730: 0a0a 5468 6973 2076 6572 7369 6f6e 206f ..This version o │ │ │ -00009740: 6620 7468 6973 2066 756e 6374 696f 6e20 f this function │ │ │ -00009750: 7375 7070 6f72 7473 206d 756c 7469 706c supports multipl │ │ │ -00009760: 6520 6163 7469 7665 2074 6167 7320 7461 e active tags ta │ │ │ -00009770: 626c 6573 2c0a 616e 6420 636f 6d70 6c65 bles,.and comple │ │ │ -00009780: 7469 6f6e 2e0a 0a56 6172 6961 626c 6573 tion...Variables │ │ │ -00009790: 206f 6620 6e6f 7465 3a0a 0a20 2074 6167 of note:.. tag │ │ │ -000097a0: 2d74 6162 6c65 2d61 6c69 7374 0909 636f -table-alist..co │ │ │ -000097b0: 6e74 726f 6c73 2077 6869 6368 2074 6162 ntrols which tab │ │ │ -000097c0: 6c65 7320 6170 706c 7920 746f 2077 6869 les apply to whi │ │ │ -000097d0: 6368 2062 7566 6665 7273 0a20 2074 6167 ch buffers. tag │ │ │ -000097e0: 732d 6669 6c65 2d6e 616d 6509 0961 2064 s-file-name..a d │ │ │ -000097f0: 6566 6175 6c74 2074 6167 7320 7461 626c efault tags tabl │ │ │ -00009800: 650a 2020 7461 6773 2d62 7569 6c64 2d63 e. tags-build-c │ │ │ -00009810: 6f6d 706c 6574 696f 6e2d 7461 626c 6520 ompletion-table │ │ │ -00009820: 2020 636f 6e74 726f 6c73 2063 6f6d 706c controls compl │ │ │ -00009830: 6574 696f 6e20 6265 6861 7669 6f72 0a20 etion behavior. │ │ │ -00009840: 2062 7566 6665 722d 7461 672d 7461 626c buffer-tag-tabl │ │ │ -00009850: 6509 0961 6e6f 7468 6572 2077 6179 206f e..another way o │ │ │ -00009860: 6620 7370 6563 6966 7969 6e67 2061 2062 f specifying a b │ │ │ -00009870: 7566 6665 722d 6c6f 6361 6c20 7461 626c uffer-local tabl │ │ │ -00009880: 650a 2020 6d61 6b65 2d74 6167 732d 6669 e. make-tags-fi │ │ │ -00009890: 6c65 732d 696e 7669 7369 626c 6509 7768 les-invisible.wh │ │ │ -000098a0: 6574 6865 7220 7461 6773 2074 6162 6c65 ether tags table │ │ │ -000098b0: 7320 7368 6f75 6c64 2062 6520 7665 7279 s should be very │ │ │ -000098c0: 2068 6964 6465 6e0a 2020 7461 672d 6d61 hidden. tag-ma │ │ │ -000098d0: 726b 2d73 7461 636b 2d6d 6178 0909 686f rk-stack-max..ho │ │ │ -000098e0: 7720 6d61 6e79 2074 6167 732d 6261 7365 w many tags-base │ │ │ -000098f0: 6420 686f 7073 2074 6f20 7265 6d65 6d62 d hops to rememb │ │ │ -00009900: 6572 1f0a 2861 7574 6f6c 6f61 6420 2766 er..(autoload 'f │ │ │ -00009910: 696e 642d 7461 6720 2265 7461 6773 2220 ind-tag "etags" │ │ │ -00009920: 2728 2324 202e 202d 3338 3234 3729 2074 '(#$ . -38247) t │ │ │ -00009930: 206e 696c 290a 2340 3839 3720 2a46 696e nil).#@897 *Fin │ │ │ -00009940: 6420 7461 6720 7768 6f73 6520 6e61 6d65 d tag whose name │ │ │ -00009950: 2063 6f6e 7461 696e 7320 5441 474e 414d contains TAGNAM │ │ │ -00009960: 452c 2069 6e20 616e 6f74 6865 7220 7769 E, in another wi │ │ │ -00009970: 6e64 6f77 2e0a 2053 656c 6563 7473 2074 ndow.. Selects t │ │ │ -00009980: 6865 2062 7566 6665 7220 7468 6174 2074 he buffer that t │ │ │ -00009990: 6865 2074 6167 2069 7320 636f 6e74 6169 he tag is contai │ │ │ -000099a0: 6e65 6420 696e 2069 6e20 616e 6f74 6865 ned in in anothe │ │ │ -000099b0: 7220 7769 6e64 6f77 0a61 6e64 2070 7574 r window.and put │ │ │ -000099c0: 7320 706f 696e 7420 6174 2069 7473 2064 s point at its d │ │ │ -000099d0: 6566 696e 6974 696f 6e2e 0a20 4966 2054 efinition.. If T │ │ │ -000099e0: 4147 4e41 4d45 2069 7320 6120 6e75 6c6c AGNAME is a null │ │ │ -000099f0: 2073 7472 696e 672c 2074 6865 2065 7870 string, the exp │ │ │ -00009a00: 7265 7373 696f 6e20 696e 2074 6865 2062 ression in the b │ │ │ -00009a10: 7566 6665 720a 6172 6f75 6e64 206f 7220 uffer.around or │ │ │ -00009a20: 6265 666f 7265 2070 6f69 6e74 2069 7320 before point is │ │ │ -00009a30: 7573 6564 2061 7320 7468 6520 7461 6720 used as the tag │ │ │ -00009a40: 6e61 6d65 2e0a 2049 6620 7365 636f 6e64 name.. If second │ │ │ -00009a50: 2061 7267 204e 4558 5420 6973 206e 6f6e arg NEXT is non │ │ │ -00009a60: 2d6e 696c 2028 696e 7465 7261 6374 6976 -nil (interactiv │ │ │ -00009a70: 656c 792c 2077 6974 6820 7072 6566 6978 ely, with prefix │ │ │ -00009a80: 2061 7267 292c 0a73 6561 7263 6865 7320 arg),.searches │ │ │ -00009a90: 666f 7220 7468 6520 6e65 7874 2074 6167 for the next tag │ │ │ -00009aa0: 2069 6e20 7468 6520 7461 6720 7461 626c in the tag tabl │ │ │ -00009ab0: 650a 7468 6174 206d 6174 6368 6573 2074 e.that matches t │ │ │ -00009ac0: 6865 2074 6167 6e61 6d65 2075 7365 6420 he tagname used │ │ │ -00009ad0: 696e 2074 6865 2070 7265 7669 6f75 7320 in the previous │ │ │ -00009ae0: 6669 6e64 2d74 6167 2e0a 0a54 6869 7320 find-tag...This │ │ │ -00009af0: 7665 7273 696f 6e20 6f66 2074 6869 7320 version of this │ │ │ -00009b00: 6675 6e63 7469 6f6e 2073 7570 706f 7274 function support │ │ │ -00009b10: 7320 6d75 6c74 6970 6c65 2061 6374 6976 s multiple activ │ │ │ -00009b20: 6520 7461 6773 2074 6162 6c65 732c 0a61 e tags tables,.a │ │ │ -00009b30: 6e64 2063 6f6d 706c 6574 696f 6e2e 0a0a nd completion... │ │ │ -00009b40: 5661 7269 6162 6c65 7320 6f66 206e 6f74 Variables of not │ │ │ -00009b50: 653a 0a0a 2020 7461 672d 7461 626c 652d e:.. tag-table- │ │ │ -00009b60: 616c 6973 7409 0963 6f6e 7472 6f6c 7320 alist..controls │ │ │ -00009b70: 7768 6963 6820 7461 626c 6573 2061 7070 which tables app │ │ │ -00009b80: 6c79 2074 6f20 7768 6963 6820 6275 6666 ly to which buff │ │ │ -00009b90: 6572 730a 2020 7461 6773 2d66 696c 652d ers. tags-file- │ │ │ -00009ba0: 6e61 6d65 0909 6120 6465 6661 756c 7420 name..a default │ │ │ -00009bb0: 7461 6773 2074 6162 6c65 0a20 2074 6167 tags table. tag │ │ │ -00009bc0: 732d 6275 696c 642d 636f 6d70 6c65 7469 s-build-completi │ │ │ -00009bd0: 6f6e 2d74 6162 6c65 2020 2063 6f6e 7472 on-table contr │ │ │ -00009be0: 6f6c 7320 636f 6d70 6c65 7469 6f6e 2062 ols completion b │ │ │ -00009bf0: 6568 6176 696f 720a 2020 6275 6666 6572 ehavior. buffer │ │ │ -00009c00: 2d74 6167 2d74 6162 6c65 0909 616e 6f74 -tag-table..anot │ │ │ -00009c10: 6865 7220 7761 7920 6f66 2073 7065 6369 her way of speci │ │ │ -00009c20: 6679 696e 6720 6120 6275 6666 6572 2d6c fying a buffer-l │ │ │ -00009c30: 6f63 616c 2074 6162 6c65 0a20 206d 616b ocal table. mak │ │ │ -00009c40: 652d 7461 6773 2d66 696c 6573 2d69 6e76 e-tags-files-inv │ │ │ -00009c50: 6973 6962 6c65 0977 6865 7468 6572 2074 isible.whether t │ │ │ -00009c60: 6167 7320 7461 626c 6573 2073 686f 756c ags tables shoul │ │ │ -00009c70: 6420 6265 2076 6572 7920 6869 6464 656e d be very hidden │ │ │ -00009c80: 0a20 2074 6167 2d6d 6172 6b2d 7374 6163 . tag-mark-stac │ │ │ -00009c90: 6b2d 6d61 7809 0968 6f77 206d 616e 7920 k-max..how many │ │ │ -00009ca0: 7461 6773 2d62 6173 6564 2068 6f70 7320 tags-based hops │ │ │ -00009cb0: 746f 2072 656d 656d 6265 721f 0a28 6175 to remember..(au │ │ │ -00009cc0: 746f 6c6f 6164 2027 6669 6e64 2d74 6167 toload 'find-tag │ │ │ -00009cd0: 2d6f 7468 6572 2d77 696e 646f 7720 2265 -other-window "e │ │ │ -00009ce0: 7461 6773 2220 2728 2324 202e 202d 3339 tags" '(#$ . -39 │ │ │ -00009cf0: 3232 3829 2074 206e 696c 290a 2340 3736 228) t nil).#@76 │ │ │ -00009d00: 2054 6865 2066 756e 6374 696f 6e20 7573 The function us │ │ │ -00009d10: 6564 2074 6f20 646f 2074 6167 732d 636f ed to do tags-co │ │ │ -00009d20: 6d70 6c65 7469 6f6e 2028 7573 696e 6720 mpletion (using │ │ │ -00009d30: 2774 6167 2d63 6f6d 706c 6574 696f 6e2d 'tag-completion- │ │ │ -00009d40: 7072 6564 6963 6174 6529 2e1f 0a28 6175 predicate)...(au │ │ │ -00009d50: 746f 6c6f 6164 2027 7461 672d 636f 6d70 toload 'tag-comp │ │ │ -00009d60: 6c65 7465 2d73 796d 626f 6c20 2265 7461 lete-symbol "eta │ │ │ -00009d70: 6773 2220 2728 2324 202e 2034 3031 3933 gs" '(#$ . 40193 │ │ │ -00009d80: 2920 7420 6e69 6c29 0a23 4034 3834 2053 ) t nil).#@484 S │ │ │ -00009d90: 656c 6563 7420 6e65 7874 2066 696c 6520 elect next file │ │ │ -00009da0: 616d 6f6e 6720 6669 6c65 7320 696e 2063 among files in c │ │ │ -00009db0: 7572 7265 6e74 2074 6167 2074 6162 6c65 urrent tag table │ │ │ -00009dc0: 2873 292e 0a0a 4120 6669 7273 7420 6172 (s)...A first ar │ │ │ -00009dd0: 6775 6d65 6e74 206f 6620 7420 2870 7265 gument of t (pre │ │ │ -00009de0: 6669 7820 6172 672c 2069 6620 696e 7465 fix arg, if inte │ │ │ -00009df0: 7261 6374 6976 6529 2069 6e69 7469 616c ractive) initial │ │ │ -00009e00: 697a 6573 2074 6f20 7468 650a 6265 6769 izes to the.begi │ │ │ -00009e10: 6e6e 696e 6720 6f66 2074 6865 206c 6973 nning of the lis │ │ │ -00009e20: 7420 6f66 2066 696c 6573 2069 6e20 7468 t of files in th │ │ │ -00009e30: 6520 2866 6972 7374 2920 7461 6773 2074 e (first) tags t │ │ │ -00009e40: 6162 6c65 2e20 2049 6620 7468 6520 6172 able. If the ar │ │ │ -00009e50: 6775 6d65 6e74 0a69 7320 6e65 6974 6865 gument.is neithe │ │ │ -00009e60: 7220 6e69 6c20 6e6f 7220 742c 2069 7420 r nil nor t, it │ │ │ -00009e70: 6973 2065 7661 6c6c 6564 2074 6f20 696e is evalled to in │ │ │ -00009e80: 6974 6961 6c69 7a65 2074 6865 206c 6973 itialize the lis │ │ │ -00009e90: 7420 6f66 2066 696c 6573 2e0a 0a4e 6f6e t of files...Non │ │ │ -00009ea0: 2d6e 696c 2073 6563 6f6e 6420 6172 6775 -nil second argu │ │ │ -00009eb0: 6d65 6e74 204e 4f56 4953 4954 206d 6561 ment NOVISIT mea │ │ │ -00009ec0: 6e73 2075 7365 2061 2074 656d 706f 7261 ns use a tempora │ │ │ -00009ed0: 7279 2062 7566 6665 720a 746f 2073 6176 ry buffer.to sav │ │ │ -00009ee0: 6520 7469 6d65 2061 6e64 2061 766f 6964 e time and avoid │ │ │ -00009ef0: 2075 6e69 6e74 6572 6573 7469 6e67 2077 uninteresting w │ │ │ -00009f00: 6172 6e69 6e67 732e 0a0a 5661 6c75 6520 arnings...Value │ │ │ -00009f10: 6973 206e 696c 2069 6620 7468 6520 6669 is nil if the fi │ │ │ -00009f20: 6c65 2077 6173 2061 6c72 6561 6479 2076 le was already v │ │ │ -00009f30: 6973 6974 6564 3b0a 6966 2074 6865 2066 isited;.if the f │ │ │ -00009f40: 696c 6520 7761 7320 6e65 776c 7920 7265 ile was newly re │ │ │ -00009f50: 6164 2069 6e2c 2074 6865 2076 616c 7565 ad in, the value │ │ │ -00009f60: 2069 7320 7468 6520 6669 6c65 6e61 6d65 is the filename │ │ │ -00009f70: 2e1f 0a28 6175 746f 6c6f 6164 2027 6e65 ...(autoload 'ne │ │ │ -00009f80: 7874 2d66 696c 6520 2265 7461 6773 2220 xt-file "etags" │ │ │ -00009f90: 2728 2324 202e 2034 3033 3335 2920 7420 '(#$ . 40335) t │ │ │ -00009fa0: 6e69 6c29 0a23 4035 3136 2043 6f6e 7469 nil).#@516 Conti │ │ │ -00009fb0: 6e75 6520 6c61 7374 205c 5b74 6167 732d nue last \[tags- │ │ │ -00009fc0: 7365 6172 6368 5d20 6f72 205c 5b74 6167 search] or \[tag │ │ │ -00009fd0: 732d 7175 6572 792d 7265 706c 6163 655d s-query-replace] │ │ │ -00009fe0: 2063 6f6d 6d61 6e64 2e0a 5573 6564 206e command..Used n │ │ │ -00009ff0: 6f6e 696e 7465 7261 6374 6976 656c 7920 oninteractively │ │ │ -0000a000: 7769 7468 206e 6f6e 2d6e 696c 2061 7267 with non-nil arg │ │ │ -0000a010: 756d 656e 7420 746f 2062 6567 696e 2073 ument to begin s │ │ │ -0000a020: 7563 6820 6120 636f 6d6d 616e 6420 2874 uch a command (t │ │ │ -0000a030: 6865 0a61 7267 756d 656e 7420 6973 2070 he.argument is p │ │ │ -0000a040: 6173 7365 6420 746f 2060 6e65 7874 2d66 assed to `next-f │ │ │ -0000a050: 696c 6527 2c20 7768 6963 6820 7365 6529 ile', which see) │ │ │ -0000a060: 2e0a 5477 6f20 7661 7269 6162 6c65 7320 ..Two variables │ │ │ -0000a070: 636f 6e74 726f 6c20 7468 6520 7072 6f63 control the proc │ │ │ -0000a080: 6573 7369 6e67 2077 6520 646f 206f 6e20 essing we do on │ │ │ -0000a090: 6561 6368 2066 696c 653a 0a74 6865 2076 each file:.the v │ │ │ -0000a0a0: 616c 7565 206f 6620 6074 6167 732d 6c6f alue of `tags-lo │ │ │ -0000a0b0: 6f70 2d73 6361 6e27 2069 7320 6120 666f op-scan' is a fo │ │ │ -0000a0c0: 726d 2074 6f20 6265 2065 7865 6375 7465 rm to be execute │ │ │ -0000a0d0: 6420 6f6e 2065 6163 6820 6669 6c65 0a74 d on each file.t │ │ │ -0000a0e0: 6f20 7365 6520 6966 2069 7420 6973 2069 o see if it is i │ │ │ -0000a0f0: 6e74 6572 6573 7469 6e67 2028 6974 2072 nteresting (it r │ │ │ -0000a100: 6574 7572 6e73 206e 6f6e 2d6e 696c 2069 eturns non-nil i │ │ │ -0000a110: 6620 736f 290a 616e 6420 6074 6167 732d f so).and `tags- │ │ │ -0000a120: 6c6f 6f70 2d6f 7065 7261 7465 2720 6973 loop-operate' is │ │ │ -0000a130: 2061 2066 6f72 6d20 746f 2065 7865 6375 a form to execu │ │ │ -0000a140: 7465 2074 6f20 6f70 6572 6174 6520 6f6e te to operate on │ │ │ -0000a150: 2061 6e20 696e 7465 7265 7374 696e 6720 an interesting │ │ │ -0000a160: 6669 6c65 0a49 6620 7468 6520 6c61 7474 file.If the latt │ │ │ -0000a170: 6572 2072 6574 7572 6e73 206e 6f6e 2d6e er returns non-n │ │ │ -0000a180: 696c 2c20 7765 2065 7869 743b 206f 7468 il, we exit; oth │ │ │ -0000a190: 6572 7769 7365 2077 6520 7363 616e 2074 erwise we scan t │ │ │ -0000a1a0: 6865 206e 6578 7420 6669 6c65 2e1f 0a28 he next file...( │ │ │ -0000a1b0: 6175 746f 6c6f 6164 2027 7461 6773 2d6c autoload 'tags-l │ │ │ -0000a1c0: 6f6f 702d 636f 6e74 696e 7565 2022 6574 oop-continue "et │ │ │ -0000a1d0: 6167 7322 2027 2823 2420 2e20 3430 3837 ags" '(#$ . 4087 │ │ │ -0000a1e0: 3529 2074 206e 696c 290a 2340 3232 3120 5) t nil).#@221 │ │ │ -0000a1f0: 5365 6172 6368 2074 6872 6f75 6768 2061 Search through a │ │ │ -0000a200: 6c6c 2066 696c 6573 206c 6973 7465 6420 ll files listed │ │ │ -0000a210: 696e 2074 6167 7320 7461 626c 6520 666f in tags table fo │ │ │ -0000a220: 7220 6d61 7463 6820 666f 7220 5245 4745 r match for REGE │ │ │ -0000a230: 5850 2e0a 5374 6f70 7320 7768 656e 2061 XP..Stops when a │ │ │ -0000a240: 206d 6174 6368 2069 7320 666f 756e 642e match is found. │ │ │ -0000a250: 0a54 6f20 636f 6e74 696e 7565 2073 6561 .To continue sea │ │ │ -0000a260: 7263 6869 6e67 2066 6f72 206e 6578 7420 rching for next │ │ │ -0000a270: 6d61 7463 682c 2075 7365 2063 6f6d 6d61 match, use comma │ │ │ -0000a280: 6e64 205c 5b74 6167 732d 6c6f 6f70 2d63 nd \[tags-loop-c │ │ │ -0000a290: 6f6e 7469 6e75 655d 2e0a 0a53 6565 2064 ontinue]...See d │ │ │ -0000a2a0: 6f63 756d 656e 7461 7469 6f6e 206f 6620 ocumentation of │ │ │ -0000a2b0: 7661 7269 6162 6c65 2060 7461 672d 7461 variable `tag-ta │ │ │ -0000a2c0: 626c 652d 616c 6973 7427 2e1f 0a28 6175 ble-alist'...(au │ │ │ -0000a2d0: 746f 6c6f 6164 2027 7461 6773 2d73 6561 toload 'tags-sea │ │ │ -0000a2e0: 7263 6820 2265 7461 6773 2220 2728 2324 rch "etags" '(#$ │ │ │ -0000a2f0: 202e 2034 3134 3536 2920 7420 6e69 6c29 . 41456) t nil) │ │ │ -0000a300: 0a23 4033 3133 2051 7565 7279 2d72 6570 .#@313 Query-rep │ │ │ -0000a310: 6c61 6365 2d72 6567 6578 7020 4652 4f4d lace-regexp FROM │ │ │ -0000a320: 2077 6974 6820 544f 2074 6872 6f75 6768 with TO through │ │ │ -0000a330: 2061 6c6c 2066 696c 6573 206c 6973 7465 all files liste │ │ │ -0000a340: 6420 696e 2074 6167 7320 7461 626c 652e d in tags table. │ │ │ -0000a350: 0a54 6869 7264 2061 7267 2044 454c 494d .Third arg DELIM │ │ │ -0000a360: 4954 4544 2028 7072 6566 6978 2061 7267 ITED (prefix arg │ │ │ -0000a370: 2920 6d65 616e 7320 7265 706c 6163 6520 ) means replace │ │ │ -0000a380: 6f6e 6c79 2077 6f72 642d 6465 6c69 6d69 only word-delimi │ │ │ -0000a390: 7465 6420 6d61 7463 6865 732e 0a49 6620 ted matches..If │ │ │ -0000a3a0: 796f 7520 6578 6974 2028 5c5b 6b65 7962 you exit (\[keyb │ │ │ -0000a3b0: 6f61 7264 2d71 7569 745d 206f 7220 4553 oard-quit] or ES │ │ │ -0000a3c0: 4329 2c20 796f 7520 6361 6e20 7265 7375 C), you can resu │ │ │ -0000a3d0: 6d65 2074 6865 2071 7565 7279 2d72 6570 me the query-rep │ │ │ -0000a3e0: 6c61 6365 0a77 6974 6820 7468 6520 636f lace.with the co │ │ │ -0000a3f0: 6d6d 616e 6420 5c5b 7461 6773 2d6c 6f6f mmand \[tags-loo │ │ │ -0000a400: 702d 636f 6e74 696e 7565 5d2e 0a0a 5365 p-continue]...Se │ │ │ -0000a410: 6520 646f 6375 6d65 6e74 6174 696f 6e20 e documentation │ │ │ -0000a420: 6f66 2076 6172 6961 626c 6520 6074 6167 of variable `tag │ │ │ -0000a430: 2d74 6162 6c65 2d61 6c69 7374 272e 1f0a -table-alist'... │ │ │ -0000a440: 2861 7574 6f6c 6f61 6420 2774 6167 732d (autoload 'tags- │ │ │ -0000a450: 7175 6572 792d 7265 706c 6163 6520 2265 query-replace "e │ │ │ -0000a460: 7461 6773 2220 2728 2324 202e 2034 3137 tags" '(#$ . 417 │ │ │ -0000a470: 3335 2920 7420 6e69 6c29 0a23 4033 3120 35) t nil).#@31 │ │ │ -0000a480: 4469 7370 6c61 7920 6c69 7374 206f 6620 Display list of │ │ │ -0000a490: 7461 6773 2069 6e20 4649 4c45 2e1f 0a28 tags in FILE...( │ │ │ -0000a4a0: 6175 746f 6c6f 6164 2027 6c69 7374 2d74 autoload 'list-t │ │ │ -0000a4b0: 6167 7320 2265 7461 6773 2220 2728 2324 ags "etags" '(#$ │ │ │ -0000a4c0: 202e 2034 3231 3132 2920 7420 6e69 6c29 . 42112) t nil) │ │ │ -0000a4d0: 0a23 4035 3520 4469 7370 6c61 7920 6c69 .#@55 Display li │ │ │ -0000a4e0: 7374 206f 6620 616c 6c20 7461 6773 2069 st of all tags i │ │ │ -0000a4f0: 6e20 7461 6720 7461 626c 6520 5245 4745 n tag table REGE │ │ │ -0000a500: 5850 206d 6174 6368 6573 2e1f 0a28 6175 XP matches...(au │ │ │ -0000a510: 746f 6c6f 6164 2027 7461 6773 2d61 7072 toload 'tags-apr │ │ │ -0000a520: 6f70 6f73 2022 6574 6167 7322 2027 2823 opos "etags" '(# │ │ │ -0000a530: 2420 2e20 3432 3139 3829 2074 206e 696c $ . 42198) t nil │ │ │ -0000a540: 290a 2864 6566 696e 652d 6b65 7920 6573 ).(define-key es │ │ │ -0000a550: 632d 6d61 7020 222a 2220 2770 6f70 2d74 c-map "*" 'pop-t │ │ │ -0000a560: 6167 2d6d 6172 6b29 0a23 4031 3738 2047 ag-mark).#@178 G │ │ │ -0000a570: 6f20 746f 206c 6173 7420 7461 6720 706f o to last tag po │ │ │ -0000a580: 7369 7469 6f6e 2e0a 6066 696e 642d 7461 sition..`find-ta │ │ │ -0000a590: 6727 206d 6169 6e74 6169 6e73 2061 206d g' maintains a m │ │ │ -0000a5a0: 6172 6b2d 7374 6163 6b20 7365 7065 7261 ark-stack sepera │ │ │ -0000a5b0: 7465 2066 726f 6d20 7468 6520 5c5b 7365 te from the \[se │ │ │ -0000a5c0: 742d 6d61 726b 2d63 6f6d 6d61 6e64 5d20 t-mark-command] │ │ │ -0000a5d0: 6d61 726b 2d73 7461 636b 2e0a 5468 6973 mark-stack..This │ │ │ -0000a5e0: 2066 756e 6374 696f 6e20 706f 7073 2028 function pops ( │ │ │ -0000a5f0: 616e 6420 6d6f 7665 7320 746f 2920 7468 and moves to) th │ │ │ -0000a600: 6520 7461 6720 6174 2074 6865 2074 6f70 e tag at the top │ │ │ -0000a610: 206f 6620 7468 6973 2073 7461 636b 2e1f of this stack.. │ │ │ -0000a620: 0a28 6175 746f 6c6f 6164 2027 706f 702d .(autoload 'pop- │ │ │ -0000a630: 7461 672d 6d61 726b 2022 6574 6167 7322 tag-mark "etags" │ │ │ -0000a640: 2027 2823 2420 2e20 3432 3335 3129 2074 '(#$ . 42351) t │ │ │ -0000a650: 206e 696c 290a 2340 3130 3320 4469 7370 nil).#@103 Disp │ │ │ -0000a660: 6c61 7920 4649 4c45 2773 2063 6f6d 6d65 lay FILE's comme │ │ │ -0000a670: 6e74 6172 7920 7365 6374 696f 6e2e 0a46 ntary section..F │ │ │ -0000a680: 494c 4520 7368 6f75 6c64 2062 6520 696e ILE should be in │ │ │ -0000a690: 2061 2066 6f72 6d20 7375 6974 6162 6c65 a form suitable │ │ │ -0000a6a0: 2066 6f72 2070 6173 7369 6e67 2074 6f20 for passing to │ │ │ -0000a6b0: 606c 6f63 6174 652d 6c69 6272 6172 7927 `locate-library' │ │ │ -0000a6c0: 2e1f 0a28 6175 746f 6c6f 6164 2027 6669 ...(autoload 'fi │ │ │ -0000a6d0: 6e64 6572 2d63 6f6d 6d65 6e74 6172 7920 nder-commentary │ │ │ -0000a6e0: 2266 696e 6465 7222 2027 2823 2420 2e20 "finder" '(#$ . │ │ │ -0000a6f0: 3432 3538 3829 2074 206e 696c 290a 2340 42588) t nil).#@ │ │ │ -0000a700: 3431 2046 696e 6420 7061 636b 6167 6573 41 Find packages │ │ │ -0000a710: 206d 6174 6368 696e 6720 6120 6769 7665 matching a give │ │ │ -0000a720: 6e20 6b65 7977 6f72 642e 1f0a 2861 7574 n keyword...(aut │ │ │ -0000a730: 6f6c 6f61 6420 2766 696e 6465 722d 6279 oload 'finder-by │ │ │ -0000a740: 2d6b 6579 776f 7264 2022 6669 6e64 6572 -keyword "finder │ │ │ -0000a750: 2220 2728 2324 202e 2034 3237 3535 2920 " '(#$ . 42755) │ │ │ -0000a760: 7420 6e69 6c29 0a23 4033 3330 202a 5768 t nil).#@330 *Wh │ │ │ -0000a770: 6574 6865 7220 666f 6e74 2d6c 6f63 6b20 ether font-lock │ │ │ -0000a780: 7368 6f75 6c64 2061 7574 6f6d 6174 6963 should automatic │ │ │ -0000a790: 616c 6c79 2066 6f6e 7469 6679 2066 696c ally fontify fil │ │ │ -0000a7a0: 6573 2061 7320 7468 6579 2772 6520 6c6f es as they're lo │ │ │ -0000a7b0: 6164 6564 2e0a 5468 6973 2077 696c 6c20 aded..This will │ │ │ -0000a7c0: 6f6e 6c79 2068 6170 7065 6e20 6966 2066 only happen if f │ │ │ -0000a7d0: 6f6e 742d 6c6f 636b 2068 6173 2066 6f6e ont-lock has fon │ │ │ -0000a7e0: 7469 6679 696e 6720 6b65 7977 6f72 6473 tifying keywords │ │ │ -0000a7f0: 2066 6f72 2074 6865 206d 616a 6f72 0a6d for the major.m │ │ │ -0000a800: 6f64 6520 6f66 2074 6865 2066 696c 652e ode of the file. │ │ │ -0000a810: 2020 596f 7520 6361 6e20 6765 7420 6669 You can get fi │ │ │ -0000a820: 6e65 722d 6772 6169 6e65 6420 636f 6e74 ner-grained cont │ │ │ -0000a830: 726f 6c20 6f76 6572 2061 7574 6f2d 666f rol over auto-fo │ │ │ -0000a840: 6e74 6966 6963 6174 696f 6e0a 6279 2075 ntification.by u │ │ │ -0000a850: 7369 6e67 2074 6869 7320 7661 7269 6162 sing this variab │ │ │ -0000a860: 6c65 2069 6e20 636f 6d62 696e 6174 696f le in combinatio │ │ │ -0000a870: 6e20 7769 7468 2060 666f 6e74 2d6c 6f63 n with `font-loc │ │ │ -0000a880: 6b2d 6d6f 6465 2d65 6e61 626c 652d 6c69 k-mode-enable-li │ │ │ -0000a890: 7374 2720 6f72 0a60 666f 6e74 2d6c 6f63 st' or.`font-loc │ │ │ -0000a8a0: 6b2d 6d6f 6465 2d64 6973 6162 6c65 2d6c k-mode-disable-l │ │ │ -0000a8b0: 6973 7427 2e1f 0a28 6465 6676 6172 2066 ist'...(defvar f │ │ │ -0000a8c0: 6f6e 742d 6c6f 636b 2d61 7574 6f2d 666f ont-lock-auto-fo │ │ │ -0000a8d0: 6e74 6966 7920 7420 2823 2420 2e20 2d34 ntify t (#$ . -4 │ │ │ -0000a8e0: 3238 3631 2929 0a23 4036 3920 2a4c 6973 2861)).#@69 *Lis │ │ │ -0000a8f0: 7420 6f66 206d 6f64 6573 2074 6f20 6175 t of modes to au │ │ │ -0000a900: 746f 2d66 6f6e 7469 6679 2c20 6966 2060 to-fontify, if ` │ │ │ -0000a910: 666f 6e74 2d6c 6f63 6b2d 6175 746f 2d66 font-lock-auto-f │ │ │ -0000a920: 6f6e 7469 6679 2720 6973 206e 696c 2e1f ontify' is nil.. │ │ │ -0000a930: 0a28 6465 6676 6172 2066 6f6e 742d 6c6f .(defvar font-lo │ │ │ -0000a940: 636b 2d6d 6f64 652d 656e 6162 6c65 2d6c ck-mode-enable-l │ │ │ -0000a950: 6973 7420 6e69 6c20 2823 2420 2e20 2d34 ist nil (#$ . -4 │ │ │ -0000a960: 3332 3434 2929 0a23 4037 3120 2a4c 6973 3244)).#@71 *Lis │ │ │ -0000a970: 7420 6f66 206d 6f64 6573 206e 6f74 2074 t of modes not t │ │ │ -0000a980: 6f20 6175 746f 2d66 6f6e 7469 6679 2c20 o auto-fontify, │ │ │ -0000a990: 6966 2060 666f 6e74 2d6c 6f63 6b2d 6175 if `font-lock-au │ │ │ -0000a9a0: 746f 2d66 6f6e 7469 6679 2720 6973 2074 to-fontify' is t │ │ │ -0000a9b0: 2e1f 0a28 6465 6676 6172 2066 6f6e 742d ...(defvar font- │ │ │ -0000a9c0: 6c6f 636b 2d6d 6f64 652d 6469 7361 626c lock-mode-disabl │ │ │ -0000a9d0: 652d 6c69 7374 206e 696c 2028 2324 202e e-list nil (#$ . │ │ │ -0000a9e0: 202d 3433 3337 3229 290a 2340 3937 3920 -43372)).#@979 │ │ │ -0000a9f0: 2a53 7065 6369 6669 6361 7469 6f6e 2066 *Specification f │ │ │ -0000aa00: 6f72 2077 6865 6e20 466f 6e74 204c 6f63 or when Font Loc │ │ │ -0000aa10: 6b20 7769 6c6c 2073 6574 2075 7020 636f k will set up co │ │ │ -0000aa20: 6c6f 7220 6465 6661 756c 7473 2e0a 4e6f lor defaults..No │ │ │ -0000aa30: 726d 616c 6c79 2074 6869 7320 7368 6f75 rmally this shou │ │ │ -0000aa40: 6c64 2062 6520 2728 636f 6c6f 7229 2c20 ld be '(color), │ │ │ -0000aa50: 6d65 616e 696e 6720 7468 6174 2046 6f6e meaning that Fon │ │ │ -0000aa60: 7420 4c6f 636b 2077 696c 6c20 7365 7420 t Lock will set │ │ │ -0000aa70: 7570 0a63 6f6c 6f72 2064 6566 6175 6c74 up.color default │ │ │ -0000aa80: 7320 7468 6174 2061 7265 206f 6e6c 7920 s that are only │ │ │ -0000aa90: 7573 6564 206f 6e20 636f 6c6f 7220 6469 used on color di │ │ │ -0000aaa0: 7370 6c61 7973 2e20 2053 6574 2074 6869 splays. Set thi │ │ │ -0000aab0: 7320 746f 206e 696c 0a69 6620 796f 7520 s to nil.if you │ │ │ -0000aac0: 646f 6e27 7420 7761 6e74 2046 6f6e 7420 don't want Font │ │ │ -0000aad0: 4c6f 636b 2074 6f20 7365 7420 7570 2063 Lock to set up c │ │ │ -0000aae0: 6f6c 6f72 2064 6566 6175 6c74 7320 6174 olor defaults at │ │ │ -0000aaf0: 2061 6c6c 2e20 2054 6869 730a 7368 6f75 all. This.shou │ │ │ -0000ab00: 6c64 2062 6520 6f6e 6520 6f66 0a0a 2d2d ld be one of..-- │ │ │ -0000ab10: 2061 206c 6973 7420 6f66 2076 616c 6964 a list of valid │ │ │ -0000ab20: 2074 6167 732c 206d 6561 6e69 6e67 2074 tags, meaning t │ │ │ -0000ab30: 6861 7420 7468 6520 636f 6c6f 7220 6465 hat the color de │ │ │ -0000ab40: 6661 756c 7473 2077 696c 6c20 6265 2075 faults will be u │ │ │ -0000ab50: 7365 640a 2020 2077 6865 6e20 616c 6c20 sed. when all │ │ │ -0000ab60: 6f66 2074 6865 2074 6167 7320 6170 706c of the tags appl │ │ │ -0000ab70: 792e 2028 652e 672e 2027 2863 6f6c 6f72 y. (e.g. '(color │ │ │ -0000ab80: 2078 2929 0a2d 2d20 6120 6c69 7374 2077 x)).-- a list w │ │ │ -0000ab90: 686f 7365 2066 6972 7374 2065 6c65 6d65 hose first eleme │ │ │ -0000aba0: 6e74 2069 7320 276f 7220 616e 6420 7768 nt is 'or and wh │ │ │ -0000abb0: 6f73 6520 7265 6d61 696e 696e 6720 656c ose remaining el │ │ │ -0000abc0: 656d 656e 7473 2061 7265 0a20 2020 6c69 ements are. li │ │ │ -0000abd0: 7374 7320 6f66 2076 616c 6964 2074 6167 sts of valid tag │ │ │ -0000abe0: 732c 206d 6561 6e69 6e67 2074 6861 7420 s, meaning that │ │ │ -0000abf0: 7468 6520 6465 6661 756c 7473 2077 696c the defaults wil │ │ │ -0000ac00: 6c20 6265 2075 7365 6420 7768 656e 0a20 l be used when. │ │ │ -0000ac10: 2020 616e 7920 6f66 2074 6865 2074 6167 any of the tag │ │ │ -0000ac20: 206c 6973 7473 2061 7070 6c79 2e0a 2d2d lists apply..-- │ │ │ -0000ac30: 206e 696c 2c20 6d65 616e 696e 6720 7468 nil, meaning th │ │ │ -0000ac40: 6174 2074 6865 2064 6566 6175 6c74 7320 at the defaults │ │ │ -0000ac50: 7368 6f75 6c64 206e 6f74 2062 6520 7365 should not be se │ │ │ -0000ac60: 7420 7570 2061 7420 616c 6c2e 0a0a 2849 t up at all...(I │ │ │ -0000ac70: 6620 796f 7520 7370 6563 6966 7920 6661 f you specify fa │ │ │ -0000ac80: 6365 2076 616c 7565 7320 696e 2079 6f75 ce values in you │ │ │ -0000ac90: 7220 696e 6974 2066 696c 652c 2074 6865 r init file, the │ │ │ -0000aca0: 7920 7769 6c6c 206f 7665 7272 6964 6520 y will override │ │ │ -0000acb0: 616e 790a 7468 6174 2046 6f6e 7420 4c6f any.that Font Lo │ │ │ -0000acc0: 636b 2073 7065 6369 6669 6573 2c20 7265 ck specifies, re │ │ │ -0000acd0: 6761 7264 6c65 7373 206f 6620 7768 6574 gardless of whet │ │ │ -0000ace0: 6865 7220 796f 7520 7370 6563 6966 7920 her you specify │ │ │ -0000acf0: 7468 6520 6661 6365 0a76 616c 7565 7320 the face.values │ │ │ -0000ad00: 6265 666f 7265 206f 7220 6166 7465 7220 before or after │ │ │ -0000ad10: 6c6f 6164 696e 6720 466f 6e74 204c 6f63 loading Font Loc │ │ │ -0000ad20: 6b2e 290a 0a53 6565 2061 6c73 6f20 6066 k.)..See also `f │ │ │ -0000ad30: 6f6e 742d 6c6f 636b 2d75 7365 2d66 6f6e ont-lock-use-fon │ │ │ -0000ad40: 7473 272e 2020 4966 2079 6f75 2077 616e ts'. If you wan │ │ │ -0000ad50: 7420 6d6f 7265 2063 6f6e 7472 6f6c 206f t more control o │ │ │ -0000ad60: 7665 7220 7468 6520 6661 6365 730a 7573 ver the faces.us │ │ │ -0000ad70: 6564 2066 6f72 2066 6f6e 7469 6669 6361 ed for fontifica │ │ │ -0000ad80: 7469 6f6e 2c20 7365 6520 7468 6520 646f tion, see the do │ │ │ -0000ad90: 6375 6d65 6e74 6174 696f 6e20 6f66 2060 cumentation of ` │ │ │ -0000ada0: 666f 6e74 2d6c 6f63 6b2d 6d6f 6465 2720 font-lock-mode' │ │ │ -0000adb0: 666f 720a 686f 7720 746f 2064 6f20 6974 for.how to do it │ │ │ -0000adc0: 2e1f 0a28 6465 6676 6172 2066 6f6e 742d ...(defvar font- │ │ │ -0000add0: 6c6f 636b 2d75 7365 2d63 6f6c 6f72 7320 lock-use-colors │ │ │ -0000ade0: 2728 636f 6c6f 7229 2028 2324 202e 202d '(color) (#$ . - │ │ │ -0000adf0: 3433 3530 3429 290a 2340 3130 3336 202a 43504)).#@1036 * │ │ │ -0000ae00: 5370 6563 6966 6963 6174 696f 6e20 666f Specification fo │ │ │ -0000ae10: 7220 7768 656e 2046 6f6e 7420 4c6f 636b r when Font Lock │ │ │ -0000ae20: 2077 696c 6c20 7365 7420 7570 206e 6f6e will set up non │ │ │ -0000ae30: 2d63 6f6c 6f72 2064 6566 6175 6c74 732e -color defaults. │ │ │ -0000ae40: 0a0a 4e6f 726d 616c 6c79 2074 6869 7320 ..Normally this │ │ │ -0000ae50: 7368 6f75 6c64 2062 6520 2728 6f72 2028 should be '(or ( │ │ │ -0000ae60: 6d6f 6e6f 2920 2867 7261 7973 6361 6c65 mono) (grayscale │ │ │ -0000ae70: 2929 2c20 6d65 616e 696e 6720 7468 6174 )), meaning that │ │ │ -0000ae80: 2046 6f6e 740a 4c6f 636b 2077 696c 6c20 Font.Lock will │ │ │ -0000ae90: 7365 7420 7570 206e 6f6e 2d63 6f6c 6f72 set up non-color │ │ │ -0000aea0: 2064 6566 6175 6c74 7320 7468 6174 2061 defaults that a │ │ │ -0000aeb0: 7265 206f 6e6c 7920 7573 6564 206f 6e20 re only used on │ │ │ -0000aec0: 6569 7468 6572 206d 6f6e 6f0a 6f72 2067 either mono.or g │ │ │ -0000aed0: 7261 7973 6361 6c65 2064 6973 706c 6179 rayscale display │ │ │ -0000aee0: 732e 2020 5365 7420 7468 6973 2074 6f20 s. Set this to │ │ │ -0000aef0: 6e69 6c20 6966 2079 6f75 2064 6f6e 2774 nil if you don't │ │ │ -0000af00: 2077 616e 7420 466f 6e74 204c 6f63 6b20 want Font Lock │ │ │ -0000af10: 746f 0a73 6574 2075 7020 6e6f 6e2d 636f to.set up non-co │ │ │ -0000af20: 6c6f 7220 6465 6661 756c 7473 2061 7420 lor defaults at │ │ │ -0000af30: 616c 6c2e 2020 5468 6973 2073 686f 756c all. This shoul │ │ │ -0000af40: 6420 6265 206f 6e65 206f 660a 0a2d 2d20 d be one of..-- │ │ │ -0000af50: 6120 6c69 7374 206f 6620 7661 6c69 6420 a list of valid │ │ │ -0000af60: 7461 6773 2c20 6d65 616e 696e 6720 7468 tags, meaning th │ │ │ -0000af70: 6174 2074 6865 206e 6f6e 2d63 6f6c 6f72 at the non-color │ │ │ -0000af80: 2064 6566 6175 6c74 7320 7769 6c6c 2062 defaults will b │ │ │ -0000af90: 6520 7573 6564 0a20 2020 7768 656e 2061 e used. when a │ │ │ -0000afa0: 6c6c 206f 6620 7468 6520 7461 6773 2061 ll of the tags a │ │ │ -0000afb0: 7070 6c79 2e20 2865 2e67 2e20 2728 6772 pply. (e.g. '(gr │ │ │ -0000afc0: 6179 7363 616c 6520 7829 290a 2d2d 2061 ayscale x)).-- a │ │ │ -0000afd0: 206c 6973 7420 7768 6f73 6520 6669 7273 list whose firs │ │ │ -0000afe0: 7420 656c 656d 656e 7420 6973 2027 6f72 t element is 'or │ │ │ -0000aff0: 2061 6e64 2077 686f 7365 2072 656d 6169 and whose remai │ │ │ -0000b000: 6e69 6e67 2065 6c65 6d65 6e74 7320 6172 ning elements ar │ │ │ -0000b010: 650a 2020 206c 6973 7473 206f 6620 7661 e. lists of va │ │ │ -0000b020: 6c69 6420 7461 6773 2c20 6d65 616e 696e lid tags, meanin │ │ │ -0000b030: 6720 7468 6174 2074 6865 2064 6566 6175 g that the defau │ │ │ -0000b040: 6c74 7320 7769 6c6c 2062 6520 7573 6564 lts will be used │ │ │ -0000b050: 2077 6865 6e0a 2020 2061 6e79 206f 6620 when. any of │ │ │ -0000b060: 7468 6520 7461 6720 6c69 7374 7320 6170 the tag lists ap │ │ │ -0000b070: 706c 792e 0a2d 2d20 6e69 6c2c 206d 6561 ply..-- nil, mea │ │ │ -0000b080: 6e69 6e67 2074 6861 7420 7468 6520 6465 ning that the de │ │ │ -0000b090: 6661 756c 7473 2073 686f 756c 6420 6e6f faults should no │ │ │ -0000b0a0: 7420 6265 2073 6574 2075 7020 6174 2061 t be set up at a │ │ │ -0000b0b0: 6c6c 2e0a 0a28 4966 2079 6f75 2073 7065 ll...(If you spe │ │ │ -0000b0c0: 6369 6679 2066 6163 6520 7661 6c75 6573 cify face values │ │ │ -0000b0d0: 2069 6e20 796f 7572 2069 6e69 7420 6669 in your init fi │ │ │ -0000b0e0: 6c65 2c20 7468 6579 2077 696c 6c20 6f76 le, they will ov │ │ │ -0000b0f0: 6572 7269 6465 2061 6e79 0a74 6861 7420 erride any.that │ │ │ -0000b100: 466f 6e74 204c 6f63 6b20 7370 6563 6966 Font Lock specif │ │ │ -0000b110: 6965 732c 2072 6567 6172 646c 6573 7320 ies, regardless │ │ │ -0000b120: 6f66 2077 6865 7468 6572 2079 6f75 2073 of whether you s │ │ │ -0000b130: 7065 6369 6679 2074 6865 2066 6163 650a pecify the face. │ │ │ -0000b140: 7661 6c75 6573 2062 6566 6f72 6520 6f72 values before or │ │ │ -0000b150: 2061 6674 6572 206c 6f61 6469 6e67 2046 after loading F │ │ │ -0000b160: 6f6e 7420 4c6f 636b 2e29 0a0a 5365 6520 ont Lock.)..See │ │ │ -0000b170: 616c 736f 2060 666f 6e74 2d6c 6f63 6b2d also `font-lock- │ │ │ -0000b180: 7573 652d 636f 6c6f 7273 272e 2020 4966 use-colors'. If │ │ │ -0000b190: 2079 6f75 2077 616e 7420 6d6f 7265 2063 you want more c │ │ │ -0000b1a0: 6f6e 7472 6f6c 206f 7665 7220 7468 6520 ontrol over the │ │ │ -0000b1b0: 6661 6365 730a 7573 6564 2066 6f72 2066 faces.used for f │ │ │ -0000b1c0: 6f6e 7469 6669 6361 7469 6f6e 2c20 7365 ontification, se │ │ │ -0000b1d0: 6520 7468 6520 646f 6375 6d65 6e74 6174 e the documentat │ │ │ -0000b1e0: 696f 6e20 6f66 2060 666f 6e74 2d6c 6f63 ion of `font-loc │ │ │ -0000b1f0: 6b2d 6d6f 6465 2720 666f 720a 686f 7720 k-mode' for.how │ │ │ -0000b200: 746f 2064 6f20 6974 2e1f 0a28 6465 6676 to do it...(defv │ │ │ -0000b210: 6172 2066 6f6e 742d 6c6f 636b 2d75 7365 ar font-lock-use │ │ │ -0000b220: 2d66 6f6e 7473 2027 286f 7220 286d 6f6e -fonts '(or (mon │ │ │ -0000b230: 6f29 2028 6772 6179 7363 616c 6529 2920 o) (grayscale)) │ │ │ -0000b240: 2823 2420 2e20 2d34 3435 3433 2929 0a23 (#$ . -44543)).# │ │ │ -0000b250: 4035 3738 202a 4966 206e 6f6e 2d6e 696c @578 *If non-nil │ │ │ -0000b260: 2c20 7468 6520 6d61 7869 6d75 6d20 6465 , the maximum de │ │ │ -0000b270: 636f 7261 7469 6f6e 206c 6576 656c 2066 coration level f │ │ │ -0000b280: 6f72 2066 6f6e 7469 6679 696e 672e 0a49 or fontifying..I │ │ │ -0000b290: 6620 6e69 6c2c 2075 7365 2074 6865 206d f nil, use the m │ │ │ -0000b2a0: 696e 696d 756d 2064 6563 6f72 6174 696f inimum decoratio │ │ │ -0000b2b0: 6e20 2865 7175 6976 616c 656e 7420 746f n (equivalent to │ │ │ -0000b2c0: 206c 6576 656c 2030 292e 0a49 6620 742c level 0)..If t, │ │ │ -0000b2d0: 2075 7365 2074 6865 206d 6178 696d 756d use the maximum │ │ │ -0000b2e0: 2064 6563 6f72 6174 696f 6e20 6176 6169 decoration avai │ │ │ -0000b2f0: 6c61 626c 652e 0a49 6620 6120 6e75 6d62 lable..If a numb │ │ │ -0000b300: 6572 2c20 7573 6520 7468 6174 206c 6576 er, use that lev │ │ │ -0000b310: 656c 206f 6620 6465 636f 7261 7469 6f6e el of decoration │ │ │ -0000b320: 2028 6f72 2069 6620 6e6f 7420 6176 6169 (or if not avai │ │ │ -0000b330: 6c61 626c 6520 7468 6520 6d61 7869 6d75 lable the maximu │ │ │ -0000b340: 6d29 2e0a 4966 2061 206c 6973 742c 2065 m)..If a list, e │ │ │ -0000b350: 6163 6820 656c 656d 656e 7420 7368 6f75 ach element shou │ │ │ -0000b360: 6c64 2062 6520 6120 636f 6e73 2070 6169 ld be a cons pai │ │ │ -0000b370: 7220 6f66 2074 6865 2066 6f72 6d20 284d r of the form (M │ │ │ -0000b380: 414a 4f52 2d4d 4f44 4520 2e20 4c45 5645 AJOR-MODE . LEVE │ │ │ -0000b390: 4c29 2c0a 7768 6572 6520 4d41 4a4f 522d L),.where MAJOR- │ │ │ -0000b3a0: 4d4f 4445 2069 7320 6120 7379 6d62 6f6c MODE is a symbol │ │ │ -0000b3b0: 206f 7220 7420 286d 6561 6e69 6e67 2074 or t (meaning t │ │ │ -0000b3c0: 6865 2064 6566 6175 6c74 292e 2020 466f he default). Fo │ │ │ -0000b3d0: 7220 6578 616d 706c 653a 0a20 2828 632b r example:. ((c+ │ │ │ -0000b3e0: 2b2d 6d6f 6465 202e 2032 2920 2863 2d6d +-mode . 2) (c-m │ │ │ -0000b3f0: 6f64 6520 2e20 7429 2028 7420 2e20 3129 ode . t) (t . 1) │ │ │ -0000b400: 290a 6d65 616e 7320 7573 6520 6c65 7665 ).means use leve │ │ │ -0000b410: 6c20 3220 6465 636f 7261 7469 6f6e 2066 l 2 decoration f │ │ │ -0000b420: 6f72 2062 7566 6665 7273 2069 6e20 6063 or buffers in `c │ │ │ -0000b430: 2b2b 2d6d 6f64 6527 2c20 7468 6520 6d61 ++-mode', the ma │ │ │ -0000b440: 7869 6d75 6d20 6465 636f 7261 7469 6f6e ximum decoration │ │ │ -0000b450: 0a61 7661 696c 6162 6c65 2066 6f72 2062 .available for b │ │ │ -0000b460: 7566 6665 7273 2069 6e20 6063 2d6d 6f64 uffers in `c-mod │ │ │ -0000b470: 6527 2c20 616e 6420 6c65 7665 6c20 3120 e', and level 1 │ │ │ -0000b480: 6465 636f 7261 7469 6f6e 206f 7468 6572 decoration other │ │ │ -0000b490: 7769 7365 2e1f 0a28 6465 6676 6172 2066 wise...(defvar f │ │ │ -0000b4a0: 6f6e 742d 6c6f 636b 2d6d 6178 696d 756d ont-lock-maximum │ │ │ -0000b4b0: 2d64 6563 6f72 6174 696f 6e20 7420 2823 -decoration t (# │ │ │ -0000b4c0: 2420 2e20 2d34 3536 3533 2929 0a28 6279 $ . -45653)).(by │ │ │ -0000b4d0: 7465 2d63 6f64 6520 22c4 c51a 1bc6 0b21 te-code "......! │ │ │ -0000b4e0: ad84 c65c 6e21 3fc6 0b21 ad82 0b4a 1918 ...\n!?..!...J.. │ │ │ -0000b4f0: c70b 5c6e 5c22 88c8 0b5c 6e5c 2288 08ad ..\n\"...\n\"... │ │ │ -0000b500: 835c 6e09 4c2a 882a c487 2220 5b6e 6565 .\n.L*.*.." [nee │ │ │ -0000b510: 6473 2d73 6574 7469 6e67 2076 616c 7565 ds-setting value │ │ │ -0000b520: 206e 6577 7661 7220 6f6c 6476 6172 2066 newvar oldvar f │ │ │ -0000b530: 6f6e 742d 6c6f 636b 2d75 7365 2d6d 6178 ont-lock-use-max │ │ │ -0000b540: 696d 616c 2d64 6563 6f72 6174 696f 6e20 imal-decoration │ │ │ -0000b550: 666f 6e74 2d6c 6f63 6b2d 6d61 7869 6d75 font-lock-maximu │ │ │ -0000b560: 6d2d 6465 636f 7261 7469 6f6e 2062 6f75 m-decoration bou │ │ │ -0000b570: 6e64 7020 6465 6676 6172 616c 6961 7320 ndp defvaralias │ │ │ -0000b580: 6d61 6b65 2d6f 6273 6f6c 6574 652d 7661 make-obsolete-va │ │ │ -0000b590: 7269 6162 6c65 5d20 3329 0a23 4035 3337 riable] 3).#@537 │ │ │ -0000b5a0: 202a 4966 206e 6f6e 2d6e 696c 2c20 7468 *If non-nil, th │ │ │ -0000b5b0: 6520 6d61 7869 6d75 6d20 7369 7a65 2066 e maximum size f │ │ │ -0000b5c0: 6f72 2062 7566 6665 7273 2066 6f72 2066 or buffers for f │ │ │ -0000b5d0: 6f6e 7469 6679 696e 672e 0a4f 6e6c 7920 ontifying..Only │ │ │ -0000b5e0: 6275 6666 6572 7320 6c65 7373 2074 6861 buffers less tha │ │ │ -0000b5f0: 6e20 7468 6973 2063 616e 2062 6520 666f n this can be fo │ │ │ -0000b600: 6e74 6966 6965 6420 7768 656e 2046 6f6e ntified when Fon │ │ │ -0000b610: 7420 4c6f 636b 206d 6f64 6520 6973 2074 t Lock mode is t │ │ │ -0000b620: 7572 6e65 6420 6f6e 2e0a 4966 206e 696c urned on..If nil │ │ │ -0000b630: 2c20 6d65 616e 7320 7369 7a65 2069 7320 , means size is │ │ │ -0000b640: 6972 7265 6c65 7661 6e74 2e0a 4966 2061 irrelevant..If a │ │ │ -0000b650: 206c 6973 742c 2065 6163 6820 656c 656d list, each elem │ │ │ -0000b660: 656e 7420 7368 6f75 6c64 2062 6520 6120 ent should be a │ │ │ -0000b670: 636f 6e73 2070 6169 7220 6f66 2074 6865 cons pair of the │ │ │ -0000b680: 2066 6f72 6d20 284d 414a 4f52 2d4d 4f44 form (MAJOR-MOD │ │ │ -0000b690: 4520 2e20 5349 5a45 292c 0a77 6865 7265 E . SIZE),.where │ │ │ -0000b6a0: 204d 414a 4f52 2d4d 4f44 4520 6973 2061 MAJOR-MODE is a │ │ │ -0000b6b0: 2073 796d 626f 6c20 6f72 2074 2028 6d65 symbol or t (me │ │ │ -0000b6c0: 616e 696e 6720 7468 6520 6465 6661 756c aning the defaul │ │ │ -0000b6d0: 7429 2e20 2046 6f72 2065 7861 6d70 6c65 t). For example │ │ │ -0000b6e0: 3a0a 2028 2863 2b2b 2d6d 6f64 6520 2e20 :. ((c++-mode . │ │ │ -0000b6f0: 3235 3630 3030 2920 2863 2d6d 6f64 6520 256000) (c-mode │ │ │ -0000b700: 2e20 3235 3630 3030 2920 2872 6d61 696c . 256000) (rmail │ │ │ -0000b710: 2d6d 6f64 6520 2e20 3130 3438 3537 3629 -mode . 1048576) │ │ │ -0000b720: 290a 6d65 616e 7320 7468 6174 2074 6865 ).means that the │ │ │ -0000b730: 206d 6178 696d 756d 2073 697a 6520 6973 maximum size is │ │ │ -0000b740: 2032 3530 4b20 666f 7220 6275 6666 6572 250K for buffer │ │ │ -0000b750: 7320 696e 2060 632b 2b2d 6d6f 6465 2720 s in `c++-mode' │ │ │ -0000b760: 6f72 2060 632d 6d6f 6465 272c 206f 6e65 or `c-mode', one │ │ │ -0000b770: 0a6d 6567 6162 7974 6520 666f 7220 6275 .megabyte for bu │ │ │ -0000b780: 6666 6572 7320 696e 2060 726d 6169 6c2d ffers in `rmail- │ │ │ -0000b790: 6d6f 6465 272c 2061 6e64 2073 697a 6520 mode', and size │ │ │ -0000b7a0: 6973 2069 7272 656c 6576 616e 7420 6f74 is irrelevant ot │ │ │ -0000b7b0: 6865 7277 6973 652e 1f0a 2864 6566 7661 herwise...(defva │ │ │ -0000b7c0: 7220 666f 6e74 2d6c 6f63 6b2d 6d61 7869 r font-lock-maxi │ │ │ -0000b7d0: 6d75 6d2d 7369 7a65 2032 3536 3030 3020 mum-size 256000 │ │ │ -0000b7e0: 2823 2420 2e20 2d34 3634 3937 2929 0a23 (#$ . -46497)).# │ │ │ -0000b7f0: 4031 3033 202a 4966 206e 6f6e 2d6e 696c @103 *If non-nil │ │ │ -0000b800: 2c20 6170 706c 7920 666f 6e74 2d6c 6f63 , apply font-loc │ │ │ -0000b810: 6b2d 7374 7269 6e67 2d66 6163 6520 746f k-string-face to │ │ │ -0000b820: 2073 7472 696e 6720 6465 6c69 6d69 7465 string delimite │ │ │ -0000b830: 7273 2061 7320 7765 6c6c 2061 730a 7374 rs as well as.st │ │ │ -0000b840: 7269 6e67 2074 6578 7420 7768 656e 2066 ring text when f │ │ │ -0000b850: 6f6e 7469 6679 696e 672e 1f0a 2864 6566 ontifying...(def │ │ │ -0000b860: 7661 7220 666f 6e74 2d6c 6f63 6b2d 666f var font-lock-fo │ │ │ -0000b870: 6e74 6966 792d 7374 7269 6e67 2d64 656c ntify-string-del │ │ │ -0000b880: 696d 6974 6572 7320 6e69 6c20 2823 2420 imiters nil (#$ │ │ │ -0000b890: 2e20 2d34 3730 3933 2929 0a23 4035 3933 . -47093)).#@593 │ │ │ -0000b8a0: 3220 4120 6c69 7374 2064 6566 696e 696e 2 A list definin │ │ │ -0000b8b0: 6720 7468 6520 6b65 7977 6f72 6473 2066 g the keywords f │ │ │ -0000b8c0: 6f72 2060 666f 6e74 2d6c 6f63 6b2d 6d6f or `font-lock-mo │ │ │ -0000b8d0: 6465 2720 746f 2068 6967 686c 6967 6874 de' to highlight │ │ │ -0000b8e0: 2e0a 0a20 464f 4e54 2d4c 4f43 4b2d 4b45 ... FONT-LOCK-KE │ │ │ -0000b8f0: 5957 4f52 4453 203a 3d20 4c69 7374 206f YWORDS := List o │ │ │ -0000b900: 6620 464f 4e54 2d4c 4f43 4b2d 464f 524d f FONT-LOCK-FORM │ │ │ -0000b910: 2773 2e0a 0a20 464f 4e54 2d4c 4f43 4b2d 's... FONT-LOCK- │ │ │ -0000b920: 464f 524d 2020 2020 203a 3d3d 204d 4154 FORM :== MAT │ │ │ -0000b930: 4348 4552 0a20 2020 2020 2020 2020 2020 CHER. │ │ │ -0000b940: 2020 2020 2020 2020 2020 207c 2028 4d41 | (MA │ │ │ -0000b950: 5443 4845 5220 2e20 4d41 5443 4829 0a20 TCHER . MATCH). │ │ │ -0000b960: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000b970: 2020 2020 207c 2028 4d41 5443 4845 5220 | (MATCHER │ │ │ -0000b980: 2e20 4641 4345 2d46 4f52 4d29 0a20 2020 . FACE-FORM). │ │ │ -0000b990: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000b9a0: 2020 207c 2028 4d41 5443 4845 5220 2e20 | (MATCHER . │ │ │ -0000b9b0: 4849 4748 4c49 4748 5429 0a20 2020 2020 HIGHLIGHT). │ │ │ -0000b9c0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000b9d0: 207c 2028 4d41 5443 4845 5220 4849 4748 | (MATCHER HIGH │ │ │ -0000b9e0: 4c49 4748 5420 2e2e 2e29 0a20 2020 2020 LIGHT ...). │ │ │ -0000b9f0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000ba00: 207c 2028 6576 616c 202e 2046 4f52 4d29 | (eval . FORM) │ │ │ -0000ba10: 0a0a 204d 4154 4348 4552 2020 2020 2020 .. MATCHER │ │ │ -0000ba20: 2020 2020 2020 3a3d 3d20 4120 7374 7269 :== A stri │ │ │ -0000ba30: 6e67 2063 6f6e 7461 696e 696e 6720 6120 ng containing a │ │ │ -0000ba40: 7265 6765 7870 2e0a 2020 2020 2020 2020 regexp.. │ │ │ -0000ba50: 2020 2020 2020 2020 2020 2020 2020 7c20 | │ │ │ -0000ba60: 4120 7661 7269 6162 6c65 2063 6f6e 7461 A variable conta │ │ │ -0000ba70: 696e 696e 6720 6120 7265 6765 7870 2074 ining a regexp t │ │ │ -0000ba80: 6f20 7365 6172 6368 2066 6f72 2e0a 2020 o search for.. │ │ │ -0000ba90: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000baa0: 2020 2020 7c20 4120 6675 6e63 7469 6f6e | A function │ │ │ -0000bab0: 2074 6f20 6361 6c6c 2074 6f20 6d61 6b65 to call to make │ │ │ -0000bac0: 2074 6865 2073 6561 7263 682e 0a20 2020 the search.. │ │ │ -0000bad0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000bae0: 2020 2020 2049 7420 6973 2063 616c 6c65 It is calle │ │ │ -0000baf0: 6420 7769 7468 206f 6e65 2061 7267 2c20 d with one arg, │ │ │ -0000bb00: 7468 6520 6c69 6d69 7420 6f66 2074 6865 the limit of the │ │ │ -0000bb10: 2073 6561 7263 682c 0a20 2020 2020 2020 search,. │ │ │ -0000bb20: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000bb30: 2061 6e64 2073 686f 756c 6420 6c65 6176 and should leav │ │ │ -0000bb40: 6520 4d41 5443 4820 7265 7375 6c74 7320 e MATCH results │ │ │ -0000bb50: 696e 2074 6865 2058 456d 6163 7320 676c in the XEmacs gl │ │ │ -0000bb60: 6f62 616c 0a20 2020 2020 2020 2020 2020 obal. │ │ │ -0000bb70: 2020 2020 2020 2020 2020 2020 206d 6174 mat │ │ │ -0000bb80: 6368 2064 6174 612e 0a0a 204d 4154 4348 ch data... MATCH │ │ │ -0000bb90: 2020 2020 2020 2020 2020 2020 2020 3a3d := │ │ │ -0000bba0: 3d20 416e 2069 6e74 6567 6572 206d 6174 = An integer mat │ │ │ -0000bbb0: 6368 2073 7562 6578 7072 6573 7369 6f6e ch subexpression │ │ │ -0000bbc0: 206e 756d 6265 7220 6672 6f6d 204d 4154 number from MAT │ │ │ -0000bbd0: 4348 4552 2e0a 0a20 4641 4345 2d46 4f52 CHER... FACE-FOR │ │ │ -0000bbe0: 4d20 2020 2020 2020 2020 2020 3a3d 3d20 M :== │ │ │ -0000bbf0: 5468 6520 7379 6d62 6f6c 206e 616d 696e The symbol namin │ │ │ -0000bc00: 6720 6120 6465 6669 6e65 6420 6661 6365 g a defined face │ │ │ -0000bc10: 2e0a 2020 2020 2020 2020 2020 2020 2020 .. │ │ │ -0000bc20: 2020 2020 2020 2020 7c20 4578 7072 6573 | Expres │ │ │ -0000bc30: 7369 6f6e 2077 686f 7320 7661 6c75 6520 sion whos value │ │ │ -0000bc40: 6973 2074 6865 2066 6163 6520 6e61 6d65 is the face name │ │ │ -0000bc50: 2074 6f20 7573 652e 2020 4966 2079 6f75 to use. If you │ │ │ -0000bc60: 0a20 2020 2020 2020 2020 2020 2020 2020 . │ │ │ -0000bc70: 2020 2020 2020 2020 2077 616e 7420 4641 want FA │ │ │ -0000bc80: 4345 2d46 4f52 4d20 746f 2062 6520 6120 CE-FORM to be a │ │ │ -0000bc90: 7379 6d62 6f6c 2074 6861 7420 6576 616c symbol that eval │ │ │ -0000bca0: 7561 7465 7320 746f 2061 2066 6163 652c uates to a face, │ │ │ -0000bcb0: 0a20 2020 2020 2020 2020 2020 2020 2020 . │ │ │ -0000bcc0: 2020 2020 2020 2020 2075 7365 2061 2066 use a f │ │ │ -0000bcd0: 6f72 6d20 6c69 6b65 2022 2870 726f 676e orm like "(progn │ │ │ -0000bce0: 2073 796d 2922 2e0a 0a20 4849 4748 4c49 sym)"... HIGHLI │ │ │ -0000bcf0: 4748 5420 2020 2020 2020 2020 203a 3d3d GHT :== │ │ │ -0000bd00: 204d 4154 4348 2d48 4947 484c 4947 4854 MATCH-HIGHLIGHT │ │ │ -0000bd10: 0a20 2020 2020 2020 2020 2020 2020 2020 . │ │ │ -0000bd20: 2020 2020 2020 207c 204d 4154 4348 2d41 | MATCH-A │ │ │ -0000bd30: 4e43 484f 5245 440a 0a20 464f 524d 2020 NCHORED.. FORM │ │ │ -0000bd40: 2020 2020 2020 2020 2020 2020 203a 3d3d :== │ │ │ -0000bd50: 2045 7870 7265 7373 696f 6e20 7265 7475 Expression retu │ │ │ -0000bd60: 726e 696e 6720 6120 464f 4e54 2d4c 4f43 rning a FONT-LOC │ │ │ -0000bd70: 4b2d 464f 524d 2c20 6576 616c 7561 7465 K-FORM, evaluate │ │ │ -0000bd80: 6420 7768 656e 0a20 2020 2020 2020 2020 d when. │ │ │ -0000bd90: 2020 2020 2020 2020 2020 2020 2020 2074 t │ │ │ -0000bda0: 6865 2046 4f4e 542d 4c4f 434b 2d46 4f52 he FONT-LOCK-FOR │ │ │ -0000bdb0: 4d20 6973 2066 6972 7374 2075 7365 6420 M is first used │ │ │ -0000bdc0: 696e 2061 2062 7566 6665 722e 2020 5468 in a buffer. Th │ │ │ -0000bdd0: 6973 0a20 2020 2020 2020 2020 2020 2020 is. │ │ │ -0000bde0: 2020 2020 2020 2020 2020 2066 6561 7475 featu │ │ │ -0000bdf0: 7265 2063 616e 2062 6520 7573 6564 2074 re can be used t │ │ │ -0000be00: 6f20 7072 6f76 6964 6520 6120 464f 4e54 o provide a FONT │ │ │ -0000be10: 2d4c 4f43 4b2d 464f 524d 2074 6861 740a -LOCK-FORM that. │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a31 363a 3530 2032 3032 310a 3b3b 3b20 :16:50 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f61 7574 6f2d 6175 746f 4/lisp/auto-auto │ │ │ +00000090: 6c6f 6164 732e 656c 0a3b 3b3b 2065 6d61 loads.el.;;; ema │ │ │ +000000a0: 6373 2076 6572 7369 6f6e 2032 312e 3420 cs version 21.4 │ │ │ +000000b0: 2870 6174 6368 2032 3429 2022 5374 616e (patch 24) "Stan │ │ │ +000000c0: 6461 7264 2043 2220 5845 6d61 6373 204c dard C" XEmacs L │ │ │ +000000d0: 7563 6964 2e0a 3b3b 3b20 6279 7465 636f ucid..;;; byteco │ │ │ +000000e0: 6d70 2076 6572 7369 6f6e 2032 2e32 3720 mp version 2.27 │ │ │ +000000f0: 5845 6d61 6373 3b20 3230 3030 2d30 392d XEmacs; 2000-09- │ │ │ +00000100: 3132 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 12..;;; optimiza │ │ │ +00000110: 7469 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 tion is on..;;; │ │ │ +00000120: 7468 6973 2066 696c 6520 7573 6573 206f this file uses o │ │ │ +00000130: 7063 6f64 6573 2077 6869 6368 2064 6f20 pcodes which do │ │ │ +00000140: 6e6f 7420 6578 6973 7420 696e 2045 6d61 not exist in Ema │ │ │ +00000150: 6373 2031 392e 0a0a 2869 6620 2861 6e64 cs 19...(if (and │ │ │ +00000160: 2028 626f 756e 6470 2027 656d 6163 732d (boundp 'emacs- │ │ │ +00000170: 7665 7273 696f 6e29 0a09 2028 6f72 2028 version).. (or ( │ │ │ +00000180: 616e 6420 2862 6f75 6e64 7020 2765 706f and (boundp 'epo │ │ │ +00000190: 6368 3a3a 7665 7273 696f 6e29 2065 706f ch::version) epo │ │ │ +000001a0: 6368 3a3a 7665 7273 696f 6e29 0a09 2020 ch::version).. │ │ │ +000001b0: 2020 2028 7374 7269 6e67 2d6c 6573 7370 (string-lessp │ │ │ +000001c0: 2065 6d61 6373 2d76 6572 7369 6f6e 2022 emacs-version " │ │ │ +000001d0: 3230 2229 2929 0a20 2020 2028 6572 726f 20"))). (erro │ │ │ +000001e0: 7220 2260 6175 746f 2d61 7574 6f6c 6f61 r "`auto-autoloa │ │ │ +000001f0: 6473 2e65 6c27 2077 6173 2063 6f6d 7069 ds.el' was compi │ │ │ +00000200: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ +00000210: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ +00000220: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ +00000230: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ +00000240: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ +00000250: 2929 0a0a 0a28 6279 7465 2d63 6f64 6520 ))...(byte-code │ │ │ +00000260: 22c0 c121 ab84 c2c3 2188 c087 2220 5b66 "..!....!..." [f │ │ │ +00000270: 6561 7475 7265 7020 6c69 7370 2d61 7574 eaturep lisp-aut │ │ │ +00000280: 6f6c 6f61 6473 2065 7272 6f72 2022 416c oloads error "Al │ │ │ +00000290: 7265 6164 7920 6c6f 6164 6564 225d 2032 ready loaded"] 2 │ │ │ +000002a0: 290a 2340 3433 2044 6573 6372 6962 6520 ).#@43 Describe │ │ │ +000002b0: 7468 6520 5472 7565 2045 6469 746f 7220 the True Editor │ │ │ +000002c0: 616e 6420 6974 7320 6d69 6e69 6f6e 732e and its minions. │ │ │ +000002d0: 1f0a 2861 7574 6f6c 6f61 6420 2761 626f ..(autoload 'abo │ │ │ +000002e0: 7574 2d78 656d 6163 7320 2261 626f 7574 ut-xemacs "about │ │ │ +000002f0: 2220 2728 2324 202e 2036 3739 2920 7420 " '(#$ . 679) t │ │ │ +00000300: 6e69 6c29 0a23 4038 3320 5365 6172 6368 nil).#@83 Search │ │ │ +00000310: 2056 414c 4953 5420 666f 7220 6120 7665 VALIST for a ve │ │ │ +00000320: 6374 6f72 2077 686f 7365 2066 6972 7374 ctor whose first │ │ │ +00000330: 2065 6c65 6d65 6e74 2069 7320 6571 7561 element is equa │ │ │ +00000340: 6c20 746f 204b 4559 2e0a 5365 6520 616c l to KEY..See al │ │ │ +00000350: 736f 2060 6173 736f 6327 2e1f 0a28 6175 so `assoc'...(au │ │ │ +00000360: 746f 6c6f 6164 2027 7661 7373 6f63 2022 toload 'vassoc " │ │ │ +00000370: 616c 6973 7422 2027 2823 2420 2e20 3737 alist" '(#$ . 77 │ │ │ +00000380: 3829 206e 696c 206e 696c 290a 2340 3235 8) nil nil).#@25 │ │ │ +00000390: 3120 4d6f 6469 6679 2041 4c49 5354 2074 1 Modify ALIST t │ │ │ +000003a0: 6f20 7365 7420 5641 4c55 4520 746f 2049 o set VALUE to I │ │ │ +000003b0: 5445 4d2e 0a49 6620 7468 6572 6520 6973 TEM..If there is │ │ │ +000003c0: 2061 2070 6169 7220 7768 6f73 6520 6361 a pair whose ca │ │ │ +000003d0: 7220 6973 2049 5445 4d2c 2072 6570 6c61 r is ITEM, repla │ │ │ +000003e0: 6365 2069 7473 2063 6472 2062 7920 5641 ce its cdr by VA │ │ │ +000003f0: 4c55 452e 0a49 6620 7468 6572 6520 6973 LUE..If there is │ │ │ +00000400: 206e 6f74 2073 7563 6820 7061 6972 2c20 not such pair, │ │ │ +00000410: 6372 6561 7465 206e 6577 2070 6169 7220 create new pair │ │ │ +00000420: 2849 5445 4d20 2e20 5641 4c55 4529 2061 (ITEM . VALUE) a │ │ │ +00000430: 6e64 0a72 6574 7572 6e20 6e65 7720 616c nd.return new al │ │ │ +00000440: 6973 7420 7768 6f73 6520 6361 7220 6973 ist whose car is │ │ │ +00000450: 2074 6865 206e 6577 2070 6169 7220 616e the new pair an │ │ │ +00000460: 6420 6364 7220 6973 2041 4c49 5354 2e0a d cdr is ALIST.. │ │ │ +00000470: 5b74 6f6d 6f27 7320 454c 4953 206c 696b [tomo's ELIS lik │ │ │ +00000480: 6520 6675 6e63 7469 6f6e 5d1f 0a28 6175 e function]..(au │ │ │ +00000490: 746f 6c6f 6164 2027 7075 742d 616c 6973 toload 'put-alis │ │ │ +000004a0: 7420 2261 6c69 7374 2220 2728 2324 202e t "alist" '(#$ . │ │ │ +000004b0: 2039 3134 2920 6e69 6c20 6e69 6c29 0a23 914) nil nil).# │ │ │ +000004c0: 4039 3420 4966 2074 6865 7265 2069 7320 @94 If there is │ │ │ +000004d0: 6120 7061 6972 2077 686f 7365 206b 6579 a pair whose key │ │ │ +000004e0: 2069 7320 4954 454d 2c20 6465 6c65 7465 is ITEM, delete │ │ │ +000004f0: 2069 7420 6672 6f6d 2041 4c49 5354 2e0a it from ALIST.. │ │ │ +00000500: 5b74 6f6d 6f27 7320 454c 4953 2065 6d75 [tomo's ELIS emu │ │ │ +00000510: 6c61 7469 6e67 2066 756e 6374 696f 6e5d lating function] │ │ │ +00000520: 1f0a 2861 7574 6f6c 6f61 6420 2764 656c ..(autoload 'del │ │ │ +00000530: 2d61 6c69 7374 2022 616c 6973 7422 2027 -alist "alist" ' │ │ │ +00000540: 2823 2420 2e20 3132 3230 2920 6e69 6c20 (#$ . 1220) nil │ │ │ +00000550: 6e69 6c29 0a23 4035 3820 4d6f 6469 6679 nil).#@58 Modify │ │ │ +00000560: 2061 2061 6c69 7374 2069 6e64 6963 6174 a alist indicat │ │ │ +00000570: 6564 2062 7920 5359 4d42 4f4c 2074 6f20 ed by SYMBOL to │ │ │ +00000580: 7365 7420 5641 4c55 4520 746f 2049 5445 set VALUE to ITE │ │ │ +00000590: 4d2e 1f0a 2861 7574 6f6c 6f61 6420 2773 M...(autoload 's │ │ │ +000005a0: 6574 2d61 6c69 7374 2022 616c 6973 7422 et-alist "alist" │ │ │ +000005b0: 2027 2823 2420 2e20 3133 3730 2920 6e69 '(#$ . 1370) ni │ │ │ +000005c0: 6c20 6e69 6c29 0a23 4034 3920 5265 6d6f l nil).#@49 Remo │ │ │ +000005d0: 7665 2049 5445 4d20 6672 6f6d 2074 6865 ve ITEM from the │ │ │ +000005e0: 2061 6c69 7374 2069 6e64 6963 6174 6564 alist indicated │ │ │ +000005f0: 2062 7920 5359 4d42 4f4c 2e1f 0a28 6175 by SYMBOL...(au │ │ │ +00000600: 746f 6c6f 6164 2027 7265 6d6f 7665 2d61 toload 'remove-a │ │ │ +00000610: 6c69 7374 2022 616c 6973 7422 2027 2823 list "alist" '(# │ │ │ +00000620: 2420 2e20 3134 3834 2920 6e69 6c20 6e69 $ . 1484) nil ni │ │ │ +00000630: 6c29 0a23 4034 3320 4d6f 6469 6679 2061 l).#@43 Modify a │ │ │ +00000640: 6c69 7374 2044 4546 4155 4c54 2069 6e74 list DEFAULT int │ │ │ +00000650: 6f20 616c 6973 7420 4d4f 4449 4649 4552 o alist MODIFIER │ │ │ +00000660: 2e1f 0a28 6175 746f 6c6f 6164 2027 6d6f ...(autoload 'mo │ │ │ +00000670: 6469 6679 2d61 6c69 7374 2022 616c 6973 dify-alist "alis │ │ │ +00000680: 7422 2027 2823 2420 2e20 3135 3932 2920 t" '(#$ . 1592) │ │ │ +00000690: 6e69 6c20 6e69 6c29 0a23 4031 3330 204d nil nil).#@130 M │ │ │ +000006a0: 6f64 6966 7920 6120 7661 6c75 6520 6f66 odify a value of │ │ │ +000006b0: 2061 2073 796d 626f 6c20 5359 4d20 696e a symbol SYM in │ │ │ +000006c0: 746f 2061 6c69 7374 204d 4f44 4946 4945 to alist MODIFIE │ │ │ +000006d0: 522e 0a54 6865 2073 796d 626f 6c20 5359 R..The symbol SY │ │ │ +000006e0: 4d20 7368 6f75 6c64 2062 6520 616c 6973 M should be alis │ │ │ +000006f0: 742e 2049 6620 6974 2069 7320 6e6f 7420 t. If it is not │ │ │ +00000700: 626f 756e 642c 0a69 7473 2076 616c 7565 bound,.its value │ │ │ +00000710: 2072 6567 6172 6420 6173 206e 696c 2e1f regard as nil.. │ │ │ +00000720: 0a28 6175 746f 6c6f 6164 2027 7365 742d .(autoload 'set- │ │ │ +00000730: 6d6f 6469 6669 6564 2d61 6c69 7374 2022 modified-alist " │ │ │ +00000740: 616c 6973 7422 2027 2823 2420 2e20 3136 alist" '(#$ . 16 │ │ │ +00000750: 3935 2920 6e69 6c20 6e69 6c29 0a28 6673 95) nil nil).(fs │ │ │ +00000760: 6574 2027 636f 6d6d 616e 642d 6170 726f et 'command-apro │ │ │ +00000770: 706f 7320 2761 7072 6f70 6f73 2d63 6f6d pos 'apropos-com │ │ │ +00000780: 6d61 6e64 290a 2340 3135 3120 5368 6f77 mand).#@151 Show │ │ │ +00000790: 7320 636f 6d6d 616e 6473 2028 696e 7465 s commands (inte │ │ │ +000007a0: 7261 6374 6976 656c 7920 6361 6c6c 6162 ractively callab │ │ │ +000007b0: 6c65 2066 756e 6374 696f 6e73 2920 7468 le functions) th │ │ │ +000007c0: 6174 206d 6174 6368 2052 4547 4558 502e at match REGEXP. │ │ │ +000007d0: 0a57 6974 6820 6f70 7469 6f6e 616c 2070 .With optional p │ │ │ +000007e0: 7265 6669 7820 4152 4720 6f72 2069 6620 refix ARG or if │ │ │ +000007f0: 6061 7072 6f70 6f73 2d64 6f2d 616c 6c27 `apropos-do-all' │ │ │ +00000800: 2069 7320 6e6f 6e2d 6e69 6c2c 2061 6c73 is non-nil, als │ │ │ +00000810: 6f20 7368 6f77 0a76 6172 6961 626c 6573 o show.variables │ │ │ +00000820: 2e1f 0a28 6175 746f 6c6f 6164 2027 6170 ...(autoload 'ap │ │ │ +00000830: 726f 706f 732d 636f 6d6d 616e 6420 2261 ropos-command "a │ │ │ +00000840: 7072 6f70 6f73 2220 2728 2324 202e 2031 propos" '(#$ . 1 │ │ │ +00000850: 3933 3229 2074 206e 696c 290a 2340 3234 932) t nil).#@24 │ │ │ +00000860: 3220 5368 6f77 2061 6c6c 2062 6f75 6e64 2 Show all bound │ │ │ +00000870: 2073 796d 626f 6c73 2077 686f 7365 206e symbols whose n │ │ │ +00000880: 616d 6573 206d 6174 6368 2052 4547 4558 ames match REGEX │ │ │ +00000890: 502e 0a57 6974 6820 6f70 7469 6f6e 616c P..With optional │ │ │ +000008a0: 2070 7265 6669 7820 4152 4720 6f72 2069 prefix ARG or i │ │ │ +000008b0: 6620 6061 7072 6f70 6f73 2d64 6f2d 616c f `apropos-do-al │ │ │ +000008c0: 6c27 2069 7320 6e6f 6e2d 6e69 6c2c 2061 l' is non-nil, a │ │ │ +000008d0: 6c73 6f20 7368 6f77 2075 6e62 6f75 6e64 lso show unbound │ │ │ +000008e0: 0a73 796d 626f 6c73 2061 6e64 206b 6579 .symbols and key │ │ │ +000008f0: 2062 696e 6469 6e67 732c 2077 6869 6368 bindings, which │ │ │ +00000900: 2069 7320 6120 6c69 7474 6c65 206d 6f72 is a little mor │ │ │ +00000910: 6520 7469 6d65 2d63 6f6e 7375 6d69 6e67 e time-consuming │ │ │ +00000920: 2e0a 5265 7475 726e 7320 6c69 7374 206f ..Returns list o │ │ │ +00000930: 6620 7379 6d62 6f6c 7320 616e 6420 646f f symbols and do │ │ │ +00000940: 6375 6d65 6e74 6174 696f 6e20 666f 756e cumentation foun │ │ │ +00000950: 642e 1f0a 2861 7574 6f6c 6f61 6420 2761 d...(autoload 'a │ │ │ +00000960: 7072 6f70 6f73 2022 6170 726f 706f 7322 propos "apropos" │ │ │ +00000970: 2027 2823 2420 2e20 3231 3436 2920 7420 '(#$ . 2146) t │ │ │ +00000980: 6e69 6c29 0a23 4032 3334 2053 686f 7720 nil).#@234 Show │ │ │ +00000990: 616c 6c20 7379 6d62 6f6c 7320 7768 6f73 all symbols whos │ │ │ +000009a0: 6520 7661 6c75 6527 7320 7072 696e 7465 e value's printe │ │ │ +000009b0: 6420 696d 6167 6520 6d61 7463 6865 7320 d image matches │ │ │ +000009c0: 5245 4745 5850 2e0a 5769 7468 206f 7074 REGEXP..With opt │ │ │ +000009d0: 696f 6e61 6c20 7072 6566 6978 2041 5247 ional prefix ARG │ │ │ +000009e0: 206f 7220 6966 2060 6170 726f 706f 732d or if `apropos- │ │ │ +000009f0: 646f 2d61 6c6c 2720 6973 206e 6f6e 2d6e do-all' is non-n │ │ │ +00000a00: 696c 2c20 616c 736f 206c 6f6f 6b73 0a61 il, also looks.a │ │ │ +00000a10: 7420 7468 6520 6675 6e63 7469 6f6e 2061 t the function a │ │ │ +00000a20: 6e64 2061 7420 7468 6520 6e61 6d65 7320 nd at the names │ │ │ +00000a30: 616e 6420 7661 6c75 6573 206f 6620 7072 and values of pr │ │ │ +00000a40: 6f70 6572 7469 6573 2e0a 5265 7475 726e operties..Return │ │ │ +00000a50: 7320 6c69 7374 206f 6620 7379 6d62 6f6c s list of symbol │ │ │ +00000a60: 7320 616e 6420 7661 6c75 6573 2066 6f75 s and values fou │ │ │ +00000a70: 6e64 2e1f 0a28 6175 746f 6c6f 6164 2027 nd...(autoload ' │ │ │ +00000a80: 6170 726f 706f 732d 7661 6c75 6520 2261 apropos-value "a │ │ │ +00000a90: 7072 6f70 6f73 2220 2728 2324 202e 2032 propos" '(#$ . 2 │ │ │ +00000aa0: 3434 3329 2074 206e 696c 290a 2340 3236 443) t nil).#@26 │ │ │ +00000ab0: 3220 5368 6f77 2073 796d 626f 6c73 2077 2 Show symbols w │ │ │ +00000ac0: 686f 7365 2064 6f63 756d 656e 7461 7469 hose documentati │ │ │ +00000ad0: 6f6e 2063 6f6e 7461 696e 206d 6174 6368 on contain match │ │ │ +00000ae0: 6573 2066 6f72 2052 4547 4558 502e 0a57 es for REGEXP..W │ │ │ +00000af0: 6974 6820 6f70 7469 6f6e 616c 2070 7265 ith optional pre │ │ │ +00000b00: 6669 7820 4152 4720 6f72 2069 6620 6061 fix ARG or if `a │ │ │ +00000b10: 7072 6f70 6f73 2d64 6f2d 616c 6c27 2069 propos-do-all' i │ │ │ +00000b20: 7320 6e6f 6e2d 6e69 6c2c 2061 6c73 6f20 s non-nil, also │ │ │ +00000b30: 7573 650a 646f 6375 6d65 6e74 6174 696f use.documentatio │ │ │ +00000b40: 6e20 7468 6174 2069 7320 6e6f 7420 7374 n that is not st │ │ │ +00000b50: 6f72 6564 2069 6e20 7468 6520 646f 6375 ored in the docu │ │ │ +00000b60: 6d65 6e74 6174 696f 6e20 6669 6c65 2061 mentation file a │ │ │ +00000b70: 6e64 2073 686f 7720 6b65 790a 6269 6e64 nd show key.bind │ │ │ +00000b80: 696e 6773 2e0a 5265 7475 726e 7320 6c69 ings..Returns li │ │ │ +00000b90: 7374 206f 6620 7379 6d62 6f6c 7320 616e st of symbols an │ │ │ +00000ba0: 6420 646f 6375 6d65 6e74 6174 696f 6e20 d documentation │ │ │ +00000bb0: 666f 756e 642e 1f0a 2861 7574 6f6c 6f61 found...(autoloa │ │ │ +00000bc0: 6420 2761 7072 6f70 6f73 2d64 6f63 756d d 'apropos-docum │ │ │ +00000bd0: 656e 7461 7469 6f6e 2022 6170 726f 706f entation "apropo │ │ │ +00000be0: 7322 2027 2823 2420 2e20 3237 3338 2920 s" '(#$ . 2738) │ │ │ +00000bf0: 7420 6e69 6c29 0a23 4032 3337 2049 6e73 t nil).#@237 Ins │ │ │ +00000c00: 6572 7420 6174 2070 6f69 6e74 2061 206c ert at point a l │ │ │ +00000c10: 6f61 6464 6566 7320 6175 746f 6c6f 6164 oaddefs autoload │ │ │ +00000c20: 2073 6563 7469 6f6e 2066 6f72 2046 494c section for FIL │ │ │ +00000c30: 452e 0a61 7574 6f6c 6f61 6473 2061 7265 E..autoloads are │ │ │ +00000c40: 2067 656e 6572 6174 6564 2066 6f72 2064 generated for d │ │ │ +00000c50: 6566 756e 7320 616e 6420 6465 666d 6163 efuns and defmac │ │ │ +00000c60: 726f 7320 696e 2046 494c 450a 6d61 726b ros in FILE.mark │ │ │ +00000c70: 6564 2062 7920 6067 656e 6572 6174 652d ed by `generate- │ │ │ +00000c80: 6175 746f 6c6f 6164 2d63 6f6f 6b69 6527 autoload-cookie' │ │ │ +00000c90: 2028 7768 6963 6820 7365 6529 2e0a 4966 (which see)..If │ │ │ +00000ca0: 2046 494c 4520 6973 2062 6569 6e67 2076 FILE is being v │ │ │ +00000cb0: 6973 6974 6564 2069 6e20 6120 6275 6666 isited in a buff │ │ │ +00000cc0: 6572 2c20 7468 6520 636f 6e74 656e 7473 er, the contents │ │ │ +00000cd0: 206f 6620 7468 6520 6275 6666 6572 0a61 of the buffer.a │ │ │ +00000ce0: 7265 2075 7365 642e 1f0a 2861 7574 6f6c re used...(autol │ │ │ +00000cf0: 6f61 6420 2767 656e 6572 6174 652d 6669 oad 'generate-fi │ │ │ +00000d00: 6c65 2d61 7574 6f6c 6f61 6473 2022 6175 le-autoloads "au │ │ │ +00000d10: 746f 6c6f 6164 2220 2728 2324 202e 2033 toload" '(#$ . 3 │ │ │ +00000d20: 3036 3929 2074 206e 696c 290a 2340 3135 069) t nil).#@15 │ │ │ +00000d30: 3720 5570 6461 7465 2074 6865 2061 7574 7 Update the aut │ │ │ +00000d40: 6f6c 6f61 6473 2066 6f72 2046 494c 4520 oloads for FILE │ │ │ +00000d50: 696e 2060 6765 6e65 7261 7465 642d 6175 in `generated-au │ │ │ +00000d60: 746f 6c6f 6164 2d66 696c 6527 0a28 7768 toload-file'.(wh │ │ │ +00000d70: 6963 6820 4649 4c45 206d 6967 6874 2062 ich FILE might b │ │ │ +00000d80: 696e 6420 696e 2069 7473 206c 6f63 616c ind in its local │ │ │ +00000d90: 2076 6172 6961 626c 6573 292e 0a54 6869 variables)..Thi │ │ │ +00000da0: 7320 6675 6e63 7469 6f6e 2072 6566 7573 s function refus │ │ │ +00000db0: 6573 2074 6f20 7570 6461 7465 2061 7574 es to update aut │ │ │ +00000dc0: 6f6c 6f61 6473 2066 696c 6573 2e1f 0a28 oloads files...( │ │ │ +00000dd0: 6175 746f 6c6f 6164 2027 7570 6461 7465 autoload 'update │ │ │ +00000de0: 2d66 696c 652d 6175 746f 6c6f 6164 7320 -file-autoloads │ │ │ +00000df0: 2261 7574 6f6c 6f61 6422 2027 2823 2420 "autoload" '(#$ │ │ │ +00000e00: 2e20 3333 3738 2920 7420 6e69 6c29 0a23 . 3378) t nil).# │ │ │ +00000e10: 4037 3720 5570 6461 7465 2073 6563 7469 @77 Update secti │ │ │ +00000e20: 6f6e 7320 6f66 2074 6865 2063 7572 7265 ons of the curre │ │ │ +00000e30: 6e74 2062 7566 6665 7220 6765 6e65 7261 nt buffer genera │ │ │ +00000e40: 7465 6420 6279 2060 7570 6461 7465 2d66 ted by `update-f │ │ │ +00000e50: 696c 652d 6175 746f 6c6f 6164 7327 2e1f ile-autoloads'.. │ │ │ +00000e60: 0a28 6175 746f 6c6f 6164 2027 7570 6461 .(autoload 'upda │ │ │ +00000e70: 7465 2d61 7574 6f6c 6f61 6473 2d68 6572 te-autoloads-her │ │ │ +00000e80: 6520 2261 7574 6f6c 6f61 6422 2027 2823 e "autoload" '(# │ │ │ +00000e90: 2420 2e20 3336 3034 2920 7420 6e69 6c29 $ . 3604) t nil) │ │ │ +00000ea0: 0a23 4033 3239 2055 7064 6174 6520 6067 .#@329 Update `g │ │ │ +00000eb0: 656e 6572 6174 6564 2d61 7574 6f6c 6f61 enerated-autoloa │ │ │ +00000ec0: 642d 6669 6c65 2720 7769 7468 2061 6c6c d-file' with all │ │ │ +00000ed0: 2074 6865 2063 7572 7265 6e74 2061 7574 the current aut │ │ │ +00000ee0: 6f6c 6f61 6473 2066 726f 6d20 4449 522e oloads from DIR. │ │ │ +00000ef0: 0a54 6869 7320 7275 6e73 2060 7570 6461 .This runs `upda │ │ │ +00000f00: 7465 2d66 696c 652d 6175 746f 6c6f 6164 te-file-autoload │ │ │ +00000f10: 7327 206f 6e20 6561 6368 202e 656c 2066 s' on each .el f │ │ │ +00000f20: 696c 6520 696e 2044 4952 2e0a 4f62 736f ile in DIR..Obso │ │ │ +00000f30: 6c65 7465 2061 7574 6f6c 6f61 6420 656e lete autoload en │ │ │ +00000f40: 7472 6965 7320 666f 7220 6669 6c65 7320 tries for files │ │ │ +00000f50: 7468 6174 206e 6f20 6c6f 6e67 6572 2065 that no longer e │ │ │ +00000f60: 7869 7374 2061 7265 2064 656c 6574 6564 xist are deleted │ │ │ +00000f70: 2e0a 4e6f 7465 2074 6861 742c 2069 6620 ..Note that, if │ │ │ +00000f80: 7468 6973 2066 756e 6374 696f 6e20 6973 this function is │ │ │ +00000f90: 2063 616c 6c65 6420 6672 6f6d 2060 6261 called from `ba │ │ │ +00000fa0: 7463 682d 7570 6461 7465 2d64 6972 6563 tch-update-direc │ │ │ +00000fb0: 746f 7279 272c 0a60 6765 6e65 7261 7465 tory',.`generate │ │ │ +00000fc0: 642d 6175 746f 6c6f 6164 2d66 696c 6527 d-autoload-file' │ │ │ +00000fd0: 2077 6173 2072 6562 6f75 6e64 2069 6e20 was rebound in │ │ │ +00000fe0: 7468 6174 2066 756e 6374 696f 6e2e 1f0a that function... │ │ │ +00000ff0: 2861 7574 6f6c 6f61 6420 2775 7064 6174 (autoload 'updat │ │ │ +00001000: 652d 6175 746f 6c6f 6164 732d 6672 6f6d e-autoloads-from │ │ │ +00001010: 2d64 6972 6563 746f 7279 2022 6175 746f -directory "auto │ │ │ +00001020: 6c6f 6164 2220 2728 2324 202e 2033 3735 load" '(#$ . 375 │ │ │ +00001030: 3129 2074 206e 696c 290a 2340 3435 3520 1) t nil).#@455 │ │ │ +00001040: 5570 6461 7465 2074 6865 2061 7574 6f6c Update the autol │ │ │ +00001050: 6f61 6473 2066 6f72 2074 6865 2066 696c oads for the fil │ │ │ +00001060: 6573 206f 7220 6469 7265 6374 6f72 6965 es or directorie │ │ │ +00001070: 7320 6f6e 2074 6865 2063 6f6d 6d61 6e64 s on the command │ │ │ +00001080: 206c 696e 652e 0a52 756e 7320 6075 7064 line..Runs `upd │ │ │ +00001090: 6174 652d 6669 6c65 2d61 7574 6f6c 6f61 ate-file-autoloa │ │ │ +000010a0: 6473 2720 6f6e 2066 696c 6573 2061 6e64 ds' on files and │ │ │ +000010b0: 2060 7570 6461 7465 2d64 6972 6563 746f `update-directo │ │ │ +000010c0: 7279 2d61 7574 6f6c 6f61 6473 270a 6f6e ry-autoloads'.on │ │ │ +000010d0: 2064 6972 6563 746f 7269 6573 2e20 204d directories. M │ │ │ +000010e0: 7573 7420 6265 2075 7365 6420 6f6e 6c79 ust be used only │ │ │ +000010f0: 2077 6974 6820 2d62 6174 6368 2c20 616e with -batch, an │ │ │ +00001100: 6420 6b69 6c6c 7320 456d 6163 7320 6f6e d kills Emacs on │ │ │ +00001110: 2063 6f6d 706c 6574 696f 6e2e 0a45 6163 completion..Eac │ │ │ +00001120: 6820 6669 6c65 2077 696c 6c20 6265 2070 h file will be p │ │ │ +00001130: 726f 6365 7373 6564 2065 7665 6e20 6966 rocessed even if │ │ │ +00001140: 2061 6e20 6572 726f 7220 6f63 6375 7272 an error occurr │ │ │ +00001150: 6564 2070 7265 7669 6f75 736c 792e 0a46 ed previously..F │ │ │ +00001160: 6f72 2065 7861 6d70 6c65 2c20 696e 766f or example, invo │ │ │ +00001170: 6b65 2060 7865 6d61 6373 202d 6261 7463 ke `xemacs -batc │ │ │ +00001180: 6820 2d66 2062 6174 6368 2d75 7064 6174 h -f batch-updat │ │ │ +00001190: 652d 6175 746f 6c6f 6164 7320 2a2e 656c e-autoloads *.el │ │ │ +000011a0: 272e 0a54 6865 2064 6972 6563 746f 7279 '..The directory │ │ │ +000011b0: 2074 6f20 7768 6963 6820 7468 6520 6175 to which the au │ │ │ +000011c0: 746f 2d61 7574 6f6c 6f61 6473 2e65 6c20 to-autoloads.el │ │ │ +000011d0: 6669 6c65 206d 7573 7420 6265 2074 6865 file must be the │ │ │ +000011e0: 2066 6972 7374 2070 6172 616d 6574 6572 first parameter │ │ │ +000011f0: 0a6f 6e20 7468 6520 636f 6d6d 616e 6420 .on the command │ │ │ +00001200: 6c69 6e65 2e1f 0a28 6175 746f 6c6f 6164 line...(autoload │ │ │ +00001210: 2027 6261 7463 682d 7570 6461 7465 2d61 'batch-update-a │ │ │ +00001220: 7574 6f6c 6f61 6473 2022 6175 746f 6c6f utoloads "autolo │ │ │ +00001230: 6164 2220 2728 2324 202e 2034 3136 3029 ad" '(#$ . 4160) │ │ │ +00001240: 206e 696c 206e 696c 290a 2340 3136 3420 nil nil).#@164 │ │ │ +00001250: 5570 6461 7465 2074 6865 2061 7574 6f6c Update the autol │ │ │ +00001260: 6f61 6473 2066 6f72 2074 6865 2064 6972 oads for the dir │ │ │ +00001270: 6563 746f 7269 6573 206f 6e20 7468 6520 ectories on the │ │ │ +00001280: 636f 6d6d 616e 6420 6c69 6e65 2e0a 5275 command line..Ru │ │ │ +00001290: 6e73 2060 7570 6461 7465 2d66 696c 652d ns `update-file- │ │ │ +000012a0: 6175 746f 6c6f 6164 7327 206f 6e20 6561 autoloads' on ea │ │ │ +000012b0: 6368 2066 696c 6520 696e 2074 6865 2067 ch file in the g │ │ │ +000012c0: 6976 656e 2064 6972 6563 746f 7279 2c20 iven directory, │ │ │ +000012d0: 616e 6420 6d75 7374 0a62 6520 7573 6564 and must.be used │ │ │ +000012e0: 206f 6e6c 7920 7769 7468 202d 6261 7463 only with -batc │ │ │ +000012f0: 682e 1f0a 2861 7574 6f6c 6f61 6420 2762 h...(autoload 'b │ │ │ +00001300: 6174 6368 2d75 7064 6174 652d 6469 7265 atch-update-dire │ │ │ +00001310: 6374 6f72 7920 2261 7574 6f6c 6f61 6422 ctory "autoload" │ │ │ +00001320: 2027 2823 2420 2e20 3436 3838 2920 6e69 '(#$ . 4688) ni │ │ │ +00001330: 6c20 6e69 6c29 0a23 4031 3637 2055 7064 l nil).#@167 Upd │ │ │ +00001340: 6174 6520 7468 6520 6175 746f 6c6f 6164 ate the autoload │ │ │ +00001350: 7320 666f 7220 6120 7369 6e67 6c65 2064 s for a single d │ │ │ +00001360: 6972 6563 746f 7279 206f 6e20 7468 6520 irectory on the │ │ │ +00001370: 636f 6d6d 616e 6420 6c69 6e65 2e0a 5275 command line..Ru │ │ │ +00001380: 6e73 2060 7570 6461 7465 2d66 696c 652d ns `update-file- │ │ │ +00001390: 6175 746f 6c6f 6164 7327 206f 6e20 6561 autoloads' on ea │ │ │ +000013a0: 6368 2066 696c 6520 696e 2074 6865 2067 ch file in the g │ │ │ +000013b0: 6976 656e 2064 6972 6563 746f 7279 2c20 iven directory, │ │ │ +000013c0: 616e 6420 6d75 7374 0a62 6520 7573 6564 and must.be used │ │ │ +000013d0: 206f 6e6c 7920 7769 7468 202d 6261 7463 only with -batc │ │ │ +000013e0: 682e 1f0a 2861 7574 6f6c 6f61 6420 2762 h...(autoload 'b │ │ │ +000013f0: 6174 6368 2d75 7064 6174 652d 6f6e 652d atch-update-one- │ │ │ +00001400: 6469 7265 6374 6f72 7920 2261 7574 6f6c directory "autol │ │ │ +00001410: 6f61 6422 2027 2823 2420 2e20 3439 3235 oad" '(#$ . 4925 │ │ │ +00001420: 2920 6e69 6c20 6e69 6c29 0a28 6279 7465 ) nil nil).(byte │ │ │ +00001430: 2d63 6f64 6520 22c1 0842 10c2 c121 ac85 -code "..B...!.. │ │ │ +00001440: c3c1 c45c 2288 c5c1 2187 2220 5b63 7572 ...\"...!." [cur │ │ │ +00001450: 7265 6e74 2d6c 6f61 642d 6c69 7374 206c rent-load-list l │ │ │ +00001460: 6973 742d 6275 6666 6572 732d 6469 7265 ist-buffers-dire │ │ │ +00001470: 6374 6f72 7920 6465 6661 756c 742d 626f ctory default-bo │ │ │ +00001480: 756e 6470 2073 6574 2d64 6566 6175 6c74 undp set-default │ │ │ +00001490: 206e 696c 206d 616b 652d 7661 7269 6162 nil make-variab │ │ │ +000014a0: 6c65 2d62 7566 6665 722d 6c6f 6361 6c5d le-buffer-local] │ │ │ +000014b0: 2033 290a 2340 3739 3420 5265 706f 7274 3).#@794 Report │ │ │ +000014c0: 2062 7569 6c64 2069 6e66 6f72 6d61 7469 build informati │ │ │ +000014d0: 6f6e 2069 6e63 6c75 6469 6e67 2049 6e73 on including Ins │ │ │ +000014e0: 7461 6c6c 6174 696f 6e20 616e 6420 6d61 tallation and ma │ │ │ +000014f0: 6b65 206f 7574 7075 742e 0a0a 5072 6f6d ke output...Prom │ │ │ +00001500: 7074 7320 666f 7220 7374 6174 7573 2028 pts for status ( │ │ │ +00001510: 7573 7561 6c6c 7920 2253 7563 6365 7373 usually "Success │ │ │ +00001520: 2220 6f72 2022 4661 696c 7572 6522 292e " or "Failure"). │ │ │ +00001530: 2020 5468 656e 2075 7365 730a 6063 6f6d Then uses.`com │ │ │ +00001540: 706f 7365 2d6d 6169 6c27 2074 6f20 6372 pose-mail' to cr │ │ │ +00001550: 6561 7465 2061 206d 6169 6c20 6d65 7373 eate a mail mess │ │ │ +00001560: 6167 652e 2020 5468 6520 5375 626a 6563 age. The Subjec │ │ │ +00001570: 7420 6865 6164 6572 2063 6f6e 7461 696e t header contain │ │ │ +00001580: 730a 7374 6174 7573 2061 6e64 2076 6572 s.status and ver │ │ │ +00001590: 7369 6f6e 2069 6e66 6f72 6d61 7469 6f6e sion information │ │ │ +000015a0: 2e20 2050 6f69 6e74 2069 7320 6c65 6674 . Point is left │ │ │ +000015b0: 2061 7420 7468 6520 6265 6769 6e6e 696e at the beginnin │ │ │ +000015c0: 6720 6f66 2074 6865 0a6d 6169 6c20 7465 g of the.mail te │ │ │ +000015d0: 7874 2e20 2041 6464 2073 6f6d 6520 6e6f xt. Add some no │ │ │ +000015e0: 7465 7320 6966 2079 6f75 206c 696b 652c tes if you like, │ │ │ +000015f0: 2061 6e64 2073 656e 6420 7468 6520 7265 and send the re │ │ │ +00001600: 706f 7274 2e0a 0a4c 6f6f 6b73 2066 6f72 port...Looks for │ │ │ +00001610: 2049 6e73 7461 6c6c 6174 696f 6e20 616e Installation an │ │ │ +00001620: 6420 7468 6520 6d61 6b65 206f 7574 7075 d the make outpu │ │ │ +00001630: 7420 6669 6c65 2028 6062 6574 612e 6572 t file (`beta.er │ │ │ +00001640: 7227 2062 790a 6465 6661 756c 742c 2063 r' by.default, c │ │ │ +00001650: 7573 746f 6d69 7a61 626c 6520 7669 6120 ustomizable via │ │ │ +00001660: 6062 7569 6c64 2d72 6570 6f72 742d 6d61 `build-report-ma │ │ │ +00001670: 6b65 2d6f 7574 7075 742d 6669 6c65 7327 ke-output-files' │ │ │ +00001680: 2920 696e 2074 6865 0a62 7569 6c64 2064 ) in the.build d │ │ │ +00001690: 6972 6563 746f 7279 206f 6620 7468 6520 irectory of the │ │ │ +000016a0: 7275 6e6e 696e 6720 5845 6d61 6373 2062 running XEmacs b │ │ │ +000016b0: 7920 6465 6661 756c 7420 2863 7573 746f y default (custo │ │ │ +000016c0: 6d69 7a61 626c 6520 7669 610a 6062 7569 mizable via.`bui │ │ │ +000016d0: 6c64 2d72 6570 6f72 742d 6d61 6b65 2d6f ld-report-make-o │ │ │ +000016e0: 7574 7075 742d 6469 7227 292e 2020 5468 utput-dir'). Th │ │ │ +000016f0: 6520 6f75 7470 7574 2066 726f 6d20 6d61 e output from ma │ │ │ +00001700: 6b65 2069 7320 6669 6c74 6572 6564 0a74 ke is filtered.t │ │ │ +00001710: 6872 6f75 6768 2060 6275 696c 642d 7265 hrough `build-re │ │ │ +00001720: 706f 7274 2d6b 6565 702d 7265 6765 7870 port-keep-regexp │ │ │ +00001730: 2720 616e 6420 6062 7569 6c64 2d72 6570 ' and `build-rep │ │ │ +00001740: 6f72 742d 6465 6c65 7465 2d72 6567 6578 ort-delete-regex │ │ │ +00001750: 7027 0a62 6566 6f72 6520 696e 636c 7564 p'.before includ │ │ │ +00001760: 696e 6720 696e 2074 6865 206d 6573 7361 ing in the messa │ │ │ +00001770: 6765 2e0a 0a53 6565 2061 6c73 6f20 606d ge...See also `m │ │ │ +00001780: 6169 6c2d 7573 6572 2d61 6765 6e74 272c ail-user-agent', │ │ │ +00001790: 2060 6275 696c 642d 7265 706f 7274 2d64 `build-report-d │ │ │ +000017a0: 6573 7469 6e61 7469 6f6e 272c 2061 6e64 estination', and │ │ │ +000017b0: 0a60 6275 696c 642d 7265 706f 7274 2d69 .`build-report-i │ │ │ +000017c0: 6e73 7461 6c6c 6174 696f 6e2d 6669 6c65 nstallation-file │ │ │ +000017d0: 272e 1f0a 2861 7574 6f6c 6f61 6420 2762 '...(autoload 'b │ │ │ +000017e0: 7569 6c64 2d72 6570 6f72 7420 2262 7569 uild-report "bui │ │ │ +000017f0: 6c64 2d72 6570 6f72 7422 2027 2823 2420 ld-report" '(#$ │ │ │ +00001800: 2e20 3533 3036 2920 7420 6e69 6c29 0a23 . 5306) t nil).# │ │ │ +00001810: 4031 3330 2052 6563 6f6d 7069 6c65 2065 @130 Recompile e │ │ │ +00001820: 7665 7279 2060 2e65 6c27 2066 696c 6520 very `.el' file │ │ │ +00001830: 696e 2044 4952 4543 544f 5259 2074 6861 in DIRECTORY tha │ │ │ +00001840: 7420 616c 7265 6164 7920 6861 7320 6120 t already has a │ │ │ +00001850: 602e 656c 6327 2066 696c 652e 0a46 696c `.elc' file..Fil │ │ │ +00001860: 6573 2069 6e20 7375 6264 6972 6563 746f es in subdirecto │ │ │ +00001870: 7269 6573 206f 6620 4449 5245 4354 4f52 ries of DIRECTOR │ │ │ +00001880: 5920 6172 6520 7072 6f63 6573 7365 6420 Y are processed │ │ │ +00001890: 616c 736f 2e1f 0a28 6175 746f 6c6f 6164 also...(autoload │ │ │ +000018a0: 2027 6279 7465 2d66 6f72 6365 2d72 6563 'byte-force-rec │ │ │ +000018b0: 6f6d 7069 6c65 2022 6279 7465 636f 6d70 ompile "bytecomp │ │ │ +000018c0: 2220 2728 2324 202e 2036 3136 3529 2074 " '(#$ . 6165) t │ │ │ +000018d0: 206e 696c 290a 2340 3636 3720 5265 636f nil).#@667 Reco │ │ │ +000018e0: 6d70 696c 6520 6576 6572 7920 602e 656c mpile every `.el │ │ │ +000018f0: 2720 6669 6c65 2069 6e20 4449 5245 4354 ' file in DIRECT │ │ │ +00001900: 4f52 5920 7468 6174 206e 6565 6473 2072 ORY that needs r │ │ │ +00001910: 6563 6f6d 7069 6c61 7469 6f6e 2e0a 5468 ecompilation..Th │ │ │ +00001920: 6973 2069 7320 6966 2061 2060 2e65 6c63 is is if a `.elc │ │ │ +00001930: 2720 6669 6c65 2065 7869 7374 7320 6275 ' file exists bu │ │ │ +00001940: 7420 6973 206f 6c64 6572 2074 6861 6e20 t is older than │ │ │ +00001950: 7468 6520 602e 656c 2720 6669 6c65 2e0a the `.el' file.. │ │ │ +00001960: 4669 6c65 7320 696e 2073 7562 6469 7265 Files in subdire │ │ │ +00001970: 6374 6f72 6965 7320 6f66 2044 4952 4543 ctories of DIREC │ │ │ +00001980: 544f 5259 2061 7265 2061 6c73 6f20 7072 TORY are also pr │ │ │ +00001990: 6f63 6573 7365 6420 756e 6c65 7373 0a6f ocessed unless.o │ │ │ +000019a0: 7074 696f 6e61 6c20 6172 6775 6d65 6e74 ptional argument │ │ │ +000019b0: 204e 4f52 4543 5552 5349 4f4e 2069 7320 NORECURSION is │ │ │ +000019c0: 6e6f 6e2d 6e69 6c2e 0a0a 4966 2074 6865 non-nil...If the │ │ │ +000019d0: 2060 2e65 6c63 2720 6669 6c65 2064 6f65 `.elc' file doe │ │ │ +000019e0: 7320 6e6f 7420 6578 6973 742c 206e 6f72 s not exist, nor │ │ │ +000019f0: 6d61 6c6c 7920 7468 6520 602e 656c 2720 mally the `.el' │ │ │ +00001a00: 6669 6c65 2069 7320 2a6e 6f74 2a20 636f file is *not* co │ │ │ +00001a10: 6d70 696c 6564 2e0a 4275 7420 6120 7072 mpiled..But a pr │ │ │ +00001a20: 6566 6978 2061 7267 756d 656e 7420 286f efix argument (o │ │ │ +00001a30: 7074 696f 6e61 6c20 7365 636f 6e64 2061 ptional second a │ │ │ +00001a40: 7267 2920 6d65 616e 7320 6173 6b20 7573 rg) means ask us │ │ │ +00001a50: 6572 2c0a 666f 7220 6561 6368 2073 7563 er,.for each suc │ │ │ +00001a60: 6820 602e 656c 2720 6669 6c65 2c20 7768 h `.el' file, wh │ │ │ +00001a70: 6574 6865 7220 746f 2063 6f6d 7069 6c65 ether to compile │ │ │ +00001a80: 2069 742e 2020 5072 6566 6978 2061 7267 it. Prefix arg │ │ │ +00001a90: 756d 656e 7420 3020 6d65 616e 730a 646f ument 0 means.do │ │ │ +00001aa0: 6e27 7420 6173 6b20 616e 6420 636f 6d70 n't ask and comp │ │ │ +00001ab0: 696c 6520 7468 6520 6669 6c65 2061 6e79 ile the file any │ │ │ +00001ac0: 7761 792e 0a0a 4120 6e6f 6e7a 6572 6f20 way...A nonzero │ │ │ +00001ad0: 7072 6566 6978 2061 7267 756d 656e 7420 prefix argument │ │ │ +00001ae0: 616c 736f 206d 6561 6e73 2061 736b 2061 also means ask a │ │ │ +00001af0: 626f 7574 2065 6163 6820 7375 6264 6972 bout each subdir │ │ │ +00001b00: 6563 746f 7279 2e0a 0a49 6620 7468 6520 ectory...If the │ │ │ +00001b10: 666f 7572 7468 206f 7074 696f 6e61 6c20 fourth optional │ │ │ +00001b20: 6172 6775 6d65 6e74 2046 4f52 4345 2069 argument FORCE i │ │ │ +00001b30: 7320 6e6f 6e2d 6e69 6c2c 0a72 6563 6f6d s non-nil,.recom │ │ │ +00001b40: 7069 6c65 2065 7665 7279 2060 2e65 6c27 pile every `.el' │ │ │ +00001b50: 2066 696c 6520 7468 6174 2061 6c72 6561 file that alrea │ │ │ +00001b60: 6479 2068 6173 2061 2060 2e65 6c63 2720 dy has a `.elc' │ │ │ +00001b70: 6669 6c65 2e1f 0a28 6175 746f 6c6f 6164 file...(autoload │ │ │ +00001b80: 2027 6279 7465 2d72 6563 6f6d 7069 6c65 'byte-recompile │ │ │ +00001b90: 2d64 6972 6563 746f 7279 2022 6279 7465 -directory "byte │ │ │ +00001ba0: 636f 6d70 2220 2728 2324 202e 2036 3336 comp" '(#$ . 636 │ │ │ +00001bb0: 3429 2074 206e 696c 290a 2340 3335 3420 4) t nil).#@354 │ │ │ +00001bc0: 5265 636f 6d70 696c 6520 6120 6669 6c65 Recompile a file │ │ │ +00001bd0: 206f 6620 4c69 7370 2063 6f64 6520 6e61 of Lisp code na │ │ │ +00001be0: 6d65 6420 4649 4c45 4e41 4d45 2069 6620 med FILENAME if │ │ │ +00001bf0: 6974 206e 6565 6473 2072 6563 6f6d 7069 it needs recompi │ │ │ +00001c00: 6c61 7469 6f6e 2e0a 5468 6973 2069 7320 lation..This is │ │ │ +00001c10: 6966 2074 6865 2060 2e65 6c63 2720 6669 if the `.elc' fi │ │ │ +00001c20: 6c65 2065 7869 7374 7320 6275 7420 6973 le exists but is │ │ │ +00001c30: 206f 6c64 6572 2074 6861 6e20 7468 6520 older than the │ │ │ +00001c40: 602e 656c 2720 6669 6c65 2e0a 0a49 6620 `.el' file...If │ │ │ +00001c50: 7468 6520 602e 656c 6327 2066 696c 6520 the `.elc' file │ │ │ +00001c60: 646f 6573 206e 6f74 2065 7869 7374 2c20 does not exist, │ │ │ +00001c70: 6e6f 726d 616c 6c79 2074 6865 2060 2e65 normally the `.e │ │ │ +00001c80: 6c27 2066 696c 6520 6973 202a 6e6f 742a l' file is *not* │ │ │ +00001c90: 0a63 6f6d 7069 6c65 642e 2020 4275 7420 .compiled. But │ │ │ +00001ca0: 6120 7072 6566 6978 2061 7267 756d 656e a prefix argumen │ │ │ +00001cb0: 7420 286f 7074 696f 6e61 6c20 7365 636f t (optional seco │ │ │ +00001cc0: 6e64 2061 7267 2920 6d65 616e 7320 6173 nd arg) means as │ │ │ +00001cd0: 6b20 7573 6572 0a77 6865 7468 6572 2074 k user.whether t │ │ │ +00001ce0: 6f20 636f 6d70 696c 6520 6974 2e20 2050 o compile it. P │ │ │ +00001cf0: 7265 6669 7820 6172 6775 6d65 6e74 2030 refix argument 0 │ │ │ +00001d00: 2064 6f6e 2774 2061 736b 2061 6e64 2072 don't ask and r │ │ │ +00001d10: 6563 6f6d 7069 6c65 2061 6e79 7761 792e ecompile anyway. │ │ │ +00001d20: 1f0a 2861 7574 6f6c 6f61 6420 2762 7974 ..(autoload 'byt │ │ │ +00001d30: 652d 7265 636f 6d70 696c 652d 6669 6c65 e-recompile-file │ │ │ +00001d40: 2022 6279 7465 636f 6d70 2220 2728 2324 "bytecomp" '(#$ │ │ │ +00001d50: 202e 2037 3130 3429 2074 206e 696c 290a . 7104) t nil). │ │ │ +00001d60: 2340 3231 3820 436f 6d70 696c 6520 6120 #@218 Compile a │ │ │ +00001d70: 6669 6c65 206f 6620 4c69 7370 2063 6f64 file of Lisp cod │ │ │ +00001d80: 6520 6e61 6d65 6420 4649 4c45 4e41 4d45 e named FILENAME │ │ │ +00001d90: 2069 6e74 6f20 6120 6669 6c65 206f 6620 into a file of │ │ │ +00001da0: 6279 7465 2063 6f64 652e 0a54 6865 206f byte code..The o │ │ │ +00001db0: 7574 7075 7420 6669 6c65 2773 206e 616d utput file's nam │ │ │ +00001dc0: 6520 6973 206d 6164 6520 6279 2061 7070 e is made by app │ │ │ +00001dd0: 656e 6469 6e67 2060 6327 2074 6f20 7468 ending `c' to th │ │ │ +00001de0: 6520 656e 6420 6f66 2046 494c 454e 414d e end of FILENAM │ │ │ +00001df0: 452e 0a57 6974 6820 7072 6566 6978 2061 E..With prefix a │ │ │ +00001e00: 7267 2028 6e6f 6e69 6e74 6572 6163 7469 rg (noninteracti │ │ │ +00001e10: 7665 6c79 3a20 326e 6420 6172 6729 2c20 vely: 2nd arg), │ │ │ +00001e20: 6c6f 6164 2074 6865 2066 696c 6520 6166 load the file af │ │ │ +00001e30: 7465 7220 636f 6d70 696c 696e 672e 1f0a ter compiling... │ │ │ +00001e40: 2861 7574 6f6c 6f61 6420 2762 7974 652d (autoload 'byte- │ │ │ +00001e50: 636f 6d70 696c 652d 6669 6c65 2022 6279 compile-file "by │ │ │ +00001e60: 7465 636f 6d70 2220 2728 2324 202e 2037 tecomp" '(#$ . 7 │ │ │ +00001e70: 3532 3629 2074 206e 696c 290a 2340 3136 526) t nil).#@16 │ │ │ +00001e80: 3120 436f 6d70 696c 6520 6120 6669 6c65 1 Compile a file │ │ │ +00001e90: 206f 6620 4c69 7370 2063 6f64 6520 6e61 of Lisp code na │ │ │ +00001ea0: 6d65 6420 4649 4c45 4e41 4d45 2069 6e74 med FILENAME int │ │ │ +00001eb0: 6f20 6120 6669 6c65 206f 6620 6279 7465 o a file of byte │ │ │ +00001ec0: 2063 6f64 652c 0a61 6e64 2074 6865 6e20 code,.and then │ │ │ +00001ed0: 6c6f 6164 2069 742e 2020 5468 6520 6f75 load it. The ou │ │ │ +00001ee0: 7470 7574 2066 696c 6527 7320 6e61 6d65 tput file's name │ │ │ +00001ef0: 2069 7320 6d61 6465 2062 7920 6170 7065 is made by appe │ │ │ +00001f00: 6e64 696e 6720 2263 2220 746f 0a74 6865 nding "c" to.the │ │ │ +00001f10: 2065 6e64 206f 6620 4649 4c45 4e41 4d45 end of FILENAME │ │ │ +00001f20: 2e1f 0a28 6175 746f 6c6f 6164 2027 6279 ...(autoload 'by │ │ │ +00001f30: 7465 2d63 6f6d 7069 6c65 2d61 6e64 2d6c te-compile-and-l │ │ │ +00001f40: 6f61 642d 6669 6c65 2022 6279 7465 636f oad-file "byteco │ │ │ +00001f50: 6d70 2220 2728 2324 202e 2037 3831 3029 mp" '(#$ . 7810) │ │ │ +00001f60: 2074 206e 696c 290a 2340 3737 2042 7974 t nil).#@77 Byt │ │ │ +00001f70: 652d 636f 6d70 696c 6520 616e 6420 6576 e-compile and ev │ │ │ +00001f80: 616c 7561 7465 2063 6f6e 7465 6e74 7320 aluate contents │ │ │ +00001f90: 6f66 2042 5546 4645 5220 2864 6566 6175 of BUFFER (defau │ │ │ +00001fa0: 6c74 3a20 7468 6520 6375 7272 656e 7420 lt: the current │ │ │ +00001fb0: 6275 6666 6572 292e 1f0a 2861 7574 6f6c buffer)...(autol │ │ │ +00001fc0: 6f61 6420 2762 7974 652d 636f 6d70 696c oad 'byte-compil │ │ │ +00001fd0: 652d 6275 6666 6572 2022 6279 7465 636f e-buffer "byteco │ │ │ +00001fe0: 6d70 2220 2728 2324 202e 2038 3034 3529 mp" '(#$ . 8045) │ │ │ +00001ff0: 2074 206e 696c 290a 2340 3134 3820 436f t nil).#@148 Co │ │ │ +00002000: 6d70 696c 6520 616e 6420 6576 616c 7561 mpile and evalua │ │ │ +00002010: 7465 2074 6865 2063 7572 7265 6e74 2074 te the current t │ │ │ +00002020: 6f70 2d6c 6576 656c 2066 6f72 6d2e 0a50 op-level form..P │ │ │ +00002030: 7269 6e74 2074 6865 2072 6573 756c 7420 rint the result │ │ │ +00002040: 696e 2074 6865 206d 696e 6962 7566 6665 in the minibuffe │ │ │ +00002050: 722e 0a57 6974 6820 6172 6775 6d65 6e74 r..With argument │ │ │ +00002060: 2c20 696e 7365 7274 2076 616c 7565 2069 , insert value i │ │ │ +00002070: 6e20 6375 7272 656e 7420 6275 6666 6572 n current buffer │ │ │ +00002080: 2061 6674 6572 2074 6865 2066 6f72 6d2e after the form. │ │ │ +00002090: 1f0a 2861 7574 6f6c 6f61 6420 2763 6f6d ..(autoload 'com │ │ │ +000020a0: 7069 6c65 2d64 6566 756e 2022 6279 7465 pile-defun "byte │ │ │ +000020b0: 636f 6d70 2220 2728 2324 202e 2038 3139 comp" '(#$ . 819 │ │ │ +000020c0: 3029 2074 206e 696c 290a 2340 3132 3320 0) t nil).#@123 │ │ │ +000020d0: 4966 2046 4f52 4d20 6973 2061 2073 796d If FORM is a sym │ │ │ +000020e0: 626f 6c2c 2062 7974 652d 636f 6d70 696c bol, byte-compil │ │ │ +000020f0: 6520 6974 7320 6675 6e63 7469 6f6e 2064 e its function d │ │ │ +00002100: 6566 696e 6974 696f 6e2e 0a49 6620 464f efinition..If FO │ │ │ +00002110: 524d 2069 7320 6120 6c61 6d62 6461 206f RM is a lambda o │ │ │ +00002120: 7220 6120 6d61 6372 6f2c 2062 7974 652d r a macro, byte- │ │ │ +00002130: 636f 6d70 696c 6520 6974 2061 7320 6120 compile it as a │ │ │ +00002140: 6675 6e63 7469 6f6e 2e1f 0a28 6175 746f function...(auto │ │ │ +00002150: 6c6f 6164 2027 6279 7465 2d63 6f6d 7069 load 'byte-compi │ │ │ +00002160: 6c65 2022 6279 7465 636f 6d70 2220 2728 le "bytecomp" '( │ │ │ +00002170: 2324 202e 2038 3430 3029 206e 696c 206e #$ . 8400) nil n │ │ │ +00002180: 696c 290a 2340 3236 2043 6f6d 7069 6c65 il).#@26 Compile │ │ │ +00002190: 2061 6e64 2072 6574 7572 6e20 5345 5850 and return SEXP │ │ │ +000021a0: 2e1f 0a28 6175 746f 6c6f 6164 2027 6279 ...(autoload 'by │ │ │ +000021b0: 7465 2d63 6f6d 7069 6c65 2d73 6578 7020 te-compile-sexp │ │ │ +000021c0: 2262 7974 6563 6f6d 7022 2027 2823 2420 "bytecomp" '(#$ │ │ │ +000021d0: 2e20 3835 3835 2920 6e69 6c20 6e69 6c29 . 8585) nil nil) │ │ │ +000021e0: 0a23 4036 3031 2044 6973 706c 6179 2061 .#@601 Display a │ │ │ +000021f0: 2063 616c 6c20 6772 6170 6820 6f66 2061 call graph of a │ │ │ +00002200: 2073 7065 6369 6669 6564 2066 696c 652e specified file. │ │ │ +00002210: 0a54 6869 7320 6c69 7374 7320 7768 6963 .This lists whic │ │ │ +00002220: 6820 6675 6e63 7469 6f6e 7320 6861 7665 h functions have │ │ │ +00002230: 2062 6565 6e20 6361 6c6c 6564 2c20 7768 been called, wh │ │ │ +00002240: 6174 2066 756e 6374 696f 6e73 2063 616c at functions cal │ │ │ +00002250: 6c65 640a 7468 656d 2c20 616e 6420 7768 led.them, and wh │ │ │ +00002260: 6174 2066 756e 6374 696f 6e73 2074 6865 at functions the │ │ │ +00002270: 7920 6361 6c6c 2e20 2054 6865 206c 6973 y call. The lis │ │ │ +00002280: 7420 696e 636c 7564 6573 2061 6c6c 2066 t includes all f │ │ │ +00002290: 756e 6374 696f 6e73 0a77 686f 7365 2064 unctions.whose d │ │ │ +000022a0: 6566 696e 6974 696f 6e73 2068 6176 6520 efinitions have │ │ │ +000022b0: 6265 656e 2063 6f6d 7069 6c65 6420 696e been compiled in │ │ │ +000022c0: 2074 6869 7320 456d 6163 7320 7365 7373 this Emacs sess │ │ │ +000022d0: 696f 6e2c 2061 7320 7765 6c6c 2061 730a ion, as well as. │ │ │ +000022e0: 616c 6c20 6675 6e63 7469 6f6e 7320 6361 all functions ca │ │ │ +000022f0: 6c6c 6564 2062 7920 7468 6f73 6520 6675 lled by those fu │ │ │ +00002300: 6e63 7469 6f6e 732e 0a0a 5468 6520 6361 nctions...The ca │ │ │ +00002310: 6c6c 2067 7261 7068 2064 6f65 7320 6e6f ll graph does no │ │ │ +00002320: 7420 696e 636c 7564 6520 6d61 6372 6f73 t include macros │ │ │ +00002330: 2c20 696e 6c69 6e65 2066 756e 6374 696f , inline functio │ │ │ +00002340: 6e73 2c20 6f72 0a70 7269 6d69 7469 7665 ns, or.primitive │ │ │ +00002350: 7320 7468 6174 2074 6865 2062 7974 652d s that the byte- │ │ │ +00002360: 636f 6465 2069 6e74 6572 7072 6574 6572 code interpreter │ │ │ +00002370: 206b 6e6f 7773 2061 626f 7574 2064 6972 knows about dir │ │ │ +00002380: 6563 746c 7920 2865 712c 0a63 6f6e 732c ectly (eq,.cons, │ │ │ +00002390: 2065 7463 2e29 2e0a 0a54 6865 2063 616c etc.)...The cal │ │ │ +000023a0: 6c20 7472 6565 2061 6c73 6f20 6c69 7374 l tree also list │ │ │ +000023b0: 7320 7468 6f73 6520 6675 6e63 7469 6f6e s those function │ │ │ +000023c0: 7320 7768 6963 6820 6172 6520 6e6f 7420 s which are not │ │ │ +000023d0: 6b6e 6f77 6e20 746f 2062 6520 6361 6c6c known to be call │ │ │ +000023e0: 6564 0a28 7468 6174 2069 732c 2074 6f20 ed.(that is, to │ │ │ +000023f0: 7768 6963 6820 6e6f 2063 616c 6c73 2068 which no calls h │ │ │ +00002400: 6176 6520 6265 656e 2063 6f6d 7069 6c65 ave been compile │ │ │ +00002410: 6429 2c20 616e 6420 7768 6963 6820 6361 d), and which ca │ │ │ +00002420: 6e6e 6f74 2062 650a 696e 766f 6b65 6420 nnot be.invoked │ │ │ +00002430: 696e 7465 7261 6374 6976 656c 792e 1f0a interactively... │ │ │ +00002440: 2861 7574 6f6c 6f61 6420 2764 6973 706c (autoload 'displ │ │ │ +00002450: 6179 2d63 616c 6c2d 7472 6565 2022 6279 ay-call-tree "by │ │ │ +00002460: 7465 636f 6d70 2220 2728 2324 202e 2038 tecomp" '(#$ . 8 │ │ │ +00002470: 3637 3929 2074 206e 696c 290a 2340 3239 679) t nil).#@29 │ │ │ +00002480: 3020 5275 6e20 6062 7974 652d 636f 6d70 0 Run `byte-comp │ │ │ +00002490: 696c 652d 6669 6c65 2720 6f6e 2074 6865 ile-file' on the │ │ │ +000024a0: 2066 696c 6573 2072 656d 6169 6e69 6e67 files remaining │ │ │ +000024b0: 206f 6e20 7468 6520 636f 6d6d 616e 6420 on the command │ │ │ +000024c0: 6c69 6e65 2e0a 5573 6520 7468 6973 2066 line..Use this f │ │ │ +000024d0: 726f 6d20 7468 6520 636f 6d6d 616e 6420 rom the command │ │ │ +000024e0: 6c69 6e65 2c20 7769 7468 2060 2d62 6174 line, with `-bat │ │ │ +000024f0: 6368 273b 0a69 7420 776f 6e27 7420 776f ch';.it won't wo │ │ │ +00002500: 726b 2069 6e20 616e 2069 6e74 6572 6163 rk in an interac │ │ │ +00002510: 7469 7665 2045 6d61 6373 2e0a 4561 6368 tive Emacs..Each │ │ │ +00002520: 2066 696c 6520 6973 2070 726f 6365 7373 file is process │ │ │ +00002530: 6564 2065 7665 6e20 6966 2061 6e20 6572 ed even if an er │ │ │ +00002540: 726f 7220 6f63 6375 7272 6564 2070 7265 ror occurred pre │ │ │ +00002550: 7669 6f75 736c 792e 0a46 6f72 2065 7861 viously..For exa │ │ │ +00002560: 6d70 6c65 2c20 696e 766f 6b65 2022 7865 mple, invoke "xe │ │ │ +00002570: 6d61 6373 202d 6261 7463 6820 2d66 2062 macs -batch -f b │ │ │ +00002580: 6174 6368 2d62 7974 652d 636f 6d70 696c atch-byte-compil │ │ │ +00002590: 6520 2465 6d61 6373 2f20 7e2f 2a2e 656c e $emacs/ ~/*.el │ │ │ +000025a0: 222e 1f0a 2861 7574 6f6c 6f61 6420 2762 "...(autoload 'b │ │ │ +000025b0: 6174 6368 2d62 7974 652d 636f 6d70 696c atch-byte-compil │ │ │ +000025c0: 6520 2262 7974 6563 6f6d 7022 2027 2823 e "bytecomp" '(# │ │ │ +000025d0: 2420 2e20 3933 3436 2920 6e69 6c20 6e69 $ . 9346) nil ni │ │ │ +000025e0: 6c29 0a23 4031 3539 2052 756e 2060 6279 l).#@159 Run `by │ │ │ +000025f0: 7465 2d63 6f6d 7069 6c65 2d66 696c 6527 te-compile-file' │ │ │ +00002600: 206f 6e20 6120 7369 6e67 6c65 2066 696c on a single fil │ │ │ +00002610: 6520 7265 6d61 696e 696e 6720 6f6e 2074 e remaining on t │ │ │ +00002620: 6865 2063 6f6d 6d61 6e64 206c 696e 652e he command line. │ │ │ +00002630: 0a55 7365 2074 6869 7320 6672 6f6d 2074 .Use this from t │ │ │ +00002640: 6865 2063 6f6d 6d61 6e64 206c 696e 652c he command line, │ │ │ +00002650: 2077 6974 6820 602d 6261 7463 6827 3b0a with `-batch';. │ │ │ +00002660: 6974 2077 6f6e 2774 2077 6f72 6b20 696e it won't work in │ │ │ +00002670: 2061 6e20 696e 7465 7261 6374 6976 6520 an interactive │ │ │ +00002680: 456d 6163 732e 1f0a 2861 7574 6f6c 6f61 Emacs...(autoloa │ │ │ +00002690: 6420 2762 6174 6368 2d62 7974 652d 636f d 'batch-byte-co │ │ │ +000026a0: 6d70 696c 652d 6f6e 652d 6669 6c65 2022 mpile-one-file " │ │ │ +000026b0: 6279 7465 636f 6d70 2220 2728 2324 202e bytecomp" '(#$ . │ │ │ +000026c0: 2039 3730 3529 206e 696c 206e 696c 290a 9705) nil nil). │ │ │ +000026d0: 2340 3635 2053 616d 6520 6173 2060 6261 #@65 Same as `ba │ │ │ +000026e0: 7463 682d 6279 7465 2d72 6563 6f6d 7069 tch-byte-recompi │ │ │ +000026f0: 6c65 2d64 6972 6563 746f 7279 2720 6275 le-directory' bu │ │ │ +00002700: 7420 7769 7468 6f75 7420 7265 6375 7273 t without recurs │ │ │ +00002710: 696f 6e2e 1f0a 2861 7574 6f6c 6f61 6420 ion...(autoload │ │ │ +00002720: 2762 6174 6368 2d62 7974 652d 7265 636f 'batch-byte-reco │ │ │ +00002730: 6d70 696c 652d 6469 7265 6374 6f72 792d mpile-directory- │ │ │ +00002740: 6e6f 7265 6375 7273 6520 2262 7974 6563 norecurse "bytec │ │ │ +00002750: 6f6d 7022 2027 2823 2420 2e20 3939 3431 omp" '(#$ . 9941 │ │ │ +00002760: 2920 6e69 6c20 6e69 6c29 0a23 4032 3133 ) nil nil).#@213 │ │ │ +00002770: 2052 756e 7320 6062 7974 652d 7265 636f Runs `byte-reco │ │ │ +00002780: 6d70 696c 652d 6469 7265 6374 6f72 7927 mpile-directory' │ │ │ +00002790: 206f 6e20 7468 6520 6469 7273 2072 656d on the dirs rem │ │ │ +000027a0: 6169 6e69 6e67 206f 6e20 7468 6520 636f aining on the co │ │ │ +000027b0: 6d6d 616e 6420 6c69 6e65 2e0a 4d75 7374 mmand line..Must │ │ │ +000027c0: 2062 6520 7573 6564 206f 6e6c 7920 7769 be used only wi │ │ │ +000027d0: 7468 2060 2d62 6174 6368 272c 2061 6e64 th `-batch', and │ │ │ +000027e0: 206b 696c 6c73 2045 6d61 6373 206f 6e20 kills Emacs on │ │ │ +000027f0: 636f 6d70 6c65 7469 6f6e 2e0a 466f 7220 completion..For │ │ │ +00002800: 6578 616d 706c 652c 2069 6e76 6f6b 6520 example, invoke │ │ │ +00002810: 6078 656d 6163 7320 2d62 6174 6368 202d `xemacs -batch - │ │ │ +00002820: 6620 6261 7463 682d 6279 7465 2d72 6563 f batch-byte-rec │ │ │ +00002830: 6f6d 7069 6c65 2d64 6972 6563 746f 7279 ompile-directory │ │ │ +00002840: 202e 272e 1f0a 2861 7574 6f6c 6f61 6420 .'...(autoload │ │ │ +00002850: 2762 6174 6368 2d62 7974 652d 7265 636f 'batch-byte-reco │ │ │ +00002860: 6d70 696c 652d 6469 7265 6374 6f72 7920 mpile-directory │ │ │ +00002870: 2262 7974 6563 6f6d 7022 2027 2823 2420 "bytecomp" '(#$ │ │ │ +00002880: 2e20 3130 3039 3729 206e 696c 206e 696c . 10097) nil nil │ │ │ +00002890: 290a 2862 7974 652d 636f 6465 2022 c0c1 ).(byte-code ".. │ │ │ +000028a0: c2c3 8989 2587 2220 5b61 7574 6f6c 6f61 ....%." [autoloa │ │ │ +000028b0: 6420 636c 2d63 6f6d 7069 6c65 2d74 696d d cl-compile-tim │ │ │ +000028c0: 652d 696e 6974 2022 636c 2d6d 6163 7322 e-init "cl-macs" │ │ │ +000028d0: 206e 696c 5d20 3629 0a23 4031 3939 2028 nil] 6).#@199 ( │ │ │ +000028e0: 6465 6675 6e2a 204e 414d 4520 4152 474c defun* NAME ARGL │ │ │ +000028f0: 4953 5420 5b44 4f43 5354 5249 4e47 5d20 IST [DOCSTRING] │ │ │ +00002900: 424f 4459 2e2e 2e29 3a20 6465 6669 6e65 BODY...): define │ │ │ +00002910: 204e 414d 4520 6173 2061 2066 756e 6374 NAME as a funct │ │ │ +00002920: 696f 6e2e 0a4c 696b 6520 6e6f 726d 616c ion..Like normal │ │ │ +00002930: 2060 6465 6675 6e27 2c20 6578 6365 7074 `defun', except │ │ │ +00002940: 2041 5247 4c49 5354 2061 6c6c 6f77 7320 ARGLIST allows │ │ │ +00002950: 6675 6c6c 2043 6f6d 6d6f 6e20 4c69 7370 full Common Lisp │ │ │ +00002960: 2063 6f6e 7665 6e74 696f 6e73 2c0a 616e conventions,.an │ │ │ +00002970: 6420 424f 4459 2069 7320 696d 706c 6963 d BODY is implic │ │ │ +00002980: 6974 6c79 2073 7572 726f 756e 6465 6420 itly surrounded │ │ │ +00002990: 6279 2028 626c 6f63 6b20 4e41 4d45 202e by (block NAME . │ │ │ +000029a0: 2e2e 292e 1f0a 2861 7574 6f6c 6f61 6420 ..)...(autoload │ │ │ +000029b0: 2764 6566 756e 2a20 2263 6c2d 6d61 6373 'defun* "cl-macs │ │ │ +000029c0: 2220 2728 2324 202e 2031 3034 3633 2920 " '(#$ . 10463) │ │ │ +000029d0: 6e69 6c20 276d 6163 726f 290a 2340 3230 nil 'macro).#@20 │ │ │ +000029e0: 3220 2864 6566 6d61 6372 6f2a 204e 414d 2 (defmacro* NAM │ │ │ +000029f0: 4520 4152 474c 4953 5420 5b44 4f43 5354 E ARGLIST [DOCST │ │ │ +00002a00: 5249 4e47 5d20 424f 4459 2e2e 2e29 3a20 RING] BODY...): │ │ │ +00002a10: 6465 6669 6e65 204e 414d 4520 6173 2061 define NAME as a │ │ │ +00002a20: 206d 6163 726f 2e0a 4c69 6b65 206e 6f72 macro..Like nor │ │ │ +00002a30: 6d61 6c20 6064 6566 6d61 6372 6f27 2c20 mal `defmacro', │ │ │ +00002a40: 6578 6365 7074 2041 5247 4c49 5354 2061 except ARGLIST a │ │ │ +00002a50: 6c6c 6f77 7320 6675 6c6c 2043 6f6d 6d6f llows full Commo │ │ │ +00002a60: 6e20 4c69 7370 2063 6f6e 7665 6e74 696f n Lisp conventio │ │ │ +00002a70: 6e73 2c0a 616e 6420 424f 4459 2069 7320 ns,.and BODY is │ │ │ +00002a80: 696d 706c 6963 6974 6c79 2073 7572 726f implicitly surro │ │ │ +00002a90: 756e 6465 6420 6279 2028 626c 6f63 6b20 unded by (block │ │ │ +00002aa0: 4e41 4d45 202e 2e2e 292e 1f0a 2861 7574 NAME ...)...(aut │ │ │ +00002ab0: 6f6c 6f61 6420 2764 6566 6d61 6372 6f2a oload 'defmacro* │ │ │ +00002ac0: 2022 636c 2d6d 6163 7322 2027 2823 2420 "cl-macs" '(#$ │ │ │ +00002ad0: 2e20 3130 3732 3229 206e 696c 2027 6d61 . 10722) nil 'ma │ │ │ +00002ae0: 6372 6f29 0a23 4031 3638 2028 6675 6e63 cro).#@168 (func │ │ │ +00002af0: 7469 6f6e 2a20 5359 4d42 4f4c 2d4f 522d tion* SYMBOL-OR- │ │ │ +00002b00: 4c41 4d42 4441 293a 2069 6e74 726f 6475 LAMBDA): introdu │ │ │ +00002b10: 6365 2061 2066 756e 6374 696f 6e2e 0a4c ce a function..L │ │ │ +00002b20: 696b 6520 6e6f 726d 616c 2060 6675 6e63 ike normal `func │ │ │ +00002b30: 7469 6f6e 272c 2065 7863 6570 7420 7468 tion', except th │ │ │ +00002b40: 6174 2069 6620 6172 6775 6d65 6e74 2069 at if argument i │ │ │ +00002b50: 7320 6120 6c61 6d62 6461 2066 6f72 6d2c s a lambda form, │ │ │ +00002b60: 2069 7473 0a41 5247 4c49 5354 2061 6c6c its.ARGLIST all │ │ │ +00002b70: 6f77 7320 6675 6c6c 2043 6f6d 6d6f 6e20 ows full Common │ │ │ +00002b80: 4c69 7370 2063 6f6e 7665 6e74 696f 6e73 Lisp conventions │ │ │ +00002b90: 2e1f 0a28 6175 746f 6c6f 6164 2027 6675 ...(autoload 'fu │ │ │ +00002ba0: 6e63 7469 6f6e 2a20 2263 6c2d 6d61 6373 nction* "cl-macs │ │ │ +00002bb0: 2220 2728 2324 202e 2031 3039 3837 2920 " '(#$ . 10987) │ │ │ +00002bc0: 6e69 6c20 276d 6163 726f 290a 2862 7974 nil 'macro).(byt │ │ │ +00002bd0: 652d 636f 6465 2022 c0c1 c2c3 89c4 2587 e-code "......%. │ │ │ +00002be0: 2220 5b61 7574 6f6c 6f61 6420 6465 7374 " [autoload dest │ │ │ +00002bf0: 7275 6374 7572 696e 672d 6269 6e64 2022 ructuring-bind " │ │ │ +00002c00: 636c 2d6d 6163 7322 206e 696c 206d 6163 cl-macs" nil mac │ │ │ +00002c10: 726f 5d20 3629 0a23 4032 3930 2028 6576 ro] 6).#@290 (ev │ │ │ +00002c20: 616c 2d77 6865 6e20 2857 4845 4e2e 2e2e al-when (WHEN... │ │ │ +00002c30: 2920 424f 4459 2e2e 2e29 3a20 636f 6e74 ) BODY...): cont │ │ │ +00002c40: 726f 6c20 7768 656e 2042 4f44 5920 6973 rol when BODY is │ │ │ +00002c50: 2065 7661 6c75 6174 6564 2e0a 4966 2060 evaluated..If ` │ │ │ +00002c60: 636f 6d70 696c 6527 2069 7320 696e 2057 compile' is in W │ │ │ +00002c70: 4845 4e2c 2042 4f44 5920 6973 2065 7661 HEN, BODY is eva │ │ │ +00002c80: 6c75 6174 6564 2077 6865 6e20 636f 6d70 luated when comp │ │ │ +00002c90: 696c 6564 2061 7420 746f 702d 6c65 7665 iled at top-leve │ │ │ +00002ca0: 6c2e 0a49 6620 606c 6f61 6427 2069 7320 l..If `load' is │ │ │ +00002cb0: 696e 2057 4845 4e2c 2042 4f44 5920 6973 in WHEN, BODY is │ │ │ +00002cc0: 2065 7661 6c75 6174 6564 2077 6865 6e20 evaluated when │ │ │ +00002cd0: 6c6f 6164 6564 2061 6674 6572 2074 6f70 loaded after top │ │ │ +00002ce0: 2d6c 6576 656c 2063 6f6d 7069 6c65 2e0a -level compile.. │ │ │ +00002cf0: 4966 2060 6576 616c 2720 6973 2069 6e20 If `eval' is in │ │ │ +00002d00: 5748 454e 2c20 424f 4459 2069 7320 6576 WHEN, BODY is ev │ │ │ +00002d10: 616c 7561 7465 6420 7768 656e 2069 6e74 aluated when int │ │ │ +00002d20: 6572 7072 6574 6564 206f 7220 6174 206e erpreted or at n │ │ │ +00002d30: 6f6e 2d74 6f70 2d6c 6576 656c 2e1f 0a28 on-top-level...( │ │ │ +00002d40: 6175 746f 6c6f 6164 2027 6576 616c 2d77 autoload 'eval-w │ │ │ +00002d50: 6865 6e20 2263 6c2d 6d61 6373 2220 2728 hen "cl-macs" '( │ │ │ +00002d60: 2324 202e 2031 3132 3933 2920 6e69 6c20 #$ . 11293) nil │ │ │ +00002d70: 276d 6163 726f 290a 2340 3132 3120 4c69 'macro).#@121 Li │ │ │ +00002d80: 6b65 2060 7072 6f67 6e27 2c20 6275 7420 ke `progn', but │ │ │ +00002d90: 6576 616c 7561 7465 7320 7468 6520 626f evaluates the bo │ │ │ +00002da0: 6479 2061 7420 6c6f 6164 2074 696d 652e dy at load time. │ │ │ +00002db0: 0a54 6865 2072 6573 756c 7420 6f66 2074 .The result of t │ │ │ +00002dc0: 6865 2062 6f64 7920 6170 7065 6172 7320 he body appears │ │ │ +00002dd0: 746f 2074 6865 2063 6f6d 7069 6c65 7220 to the compiler │ │ │ +00002de0: 6173 2061 2071 756f 7465 6420 636f 6e73 as a quoted cons │ │ │ +00002df0: 7461 6e74 2e1f 0a28 6175 746f 6c6f 6164 tant...(autoload │ │ │ +00002e00: 2027 6c6f 6164 2d74 696d 652d 7661 6c75 'load-time-valu │ │ │ +00002e10: 6520 2263 6c2d 6d61 6373 2220 2728 2324 e "cl-macs" '(#$ │ │ │ +00002e20: 202e 2031 3136 3436 2920 6e69 6c20 276d . 11646) nil 'm │ │ │ +00002e30: 6163 726f 290a 2340 3436 3120 2863 6173 acro).#@461 (cas │ │ │ +00002e40: 6520 4558 5052 2043 4c41 5553 4553 2e2e e EXPR CLAUSES.. │ │ │ +00002e50: 2e29 3a20 6576 616c 7320 4558 5052 2c20 .): evals EXPR, │ │ │ +00002e60: 6368 6f6f 7365 7320 6672 6f6d 2043 4c41 chooses from CLA │ │ │ +00002e70: 5553 4553 206f 6e20 7468 6174 2076 616c USES on that val │ │ │ +00002e80: 7565 2e0a 4561 6368 2063 6c61 7573 6520 ue..Each clause │ │ │ +00002e90: 6c6f 6f6b 7320 6c69 6b65 2028 4b45 594c looks like (KEYL │ │ │ +00002ea0: 4953 5420 424f 4459 2e2e 2e29 2e20 2045 IST BODY...). E │ │ │ +00002eb0: 5850 5220 6973 2065 7661 6c75 6174 6564 XPR is evaluated │ │ │ +00002ec0: 2061 6e64 2063 6f6d 7061 7265 640a 6167 and compared.ag │ │ │ +00002ed0: 6169 6e73 7420 6561 6368 206b 6579 2069 ainst each key i │ │ │ +00002ee0: 6e20 6561 6368 204b 4559 4c49 5354 3b20 n each KEYLIST; │ │ │ +00002ef0: 7468 6520 636f 7272 6573 706f 6e64 696e the correspondin │ │ │ +00002f00: 6720 424f 4459 2069 7320 6576 616c 7561 g BODY is evalua │ │ │ +00002f10: 7465 642e 0a49 6620 6e6f 2063 6c61 7573 ted..If no claus │ │ │ +00002f20: 6520 7375 6363 6565 6473 2c20 6361 7365 e succeeds, case │ │ │ +00002f30: 2072 6574 7572 6e73 206e 696c 2e20 2041 returns nil. A │ │ │ +00002f40: 2073 696e 676c 6520 6174 6f6d 206d 6179 single atom may │ │ │ +00002f50: 2062 6520 7573 6564 2069 6e0a 706c 6163 be used in.plac │ │ │ +00002f60: 6520 6f66 2061 204b 4559 4c49 5354 206f e of a KEYLIST o │ │ │ +00002f70: 6620 6f6e 6520 6174 6f6d 2e20 2041 204b f one atom. A K │ │ │ +00002f80: 4559 4c49 5354 206f 6620 6074 2720 6f72 EYLIST of `t' or │ │ │ +00002f90: 2060 6f74 6865 7277 6973 6527 2069 730a `otherwise' is. │ │ │ +00002fa0: 616c 6c6f 7765 6420 6f6e 6c79 2069 6e20 allowed only in │ │ │ +00002fb0: 7468 6520 6669 6e61 6c20 636c 6175 7365 the final clause │ │ │ +00002fc0: 2c20 616e 6420 6d61 7463 6865 7320 6966 , and matches if │ │ │ +00002fd0: 206e 6f20 6f74 6865 7220 6b65 7973 206d no other keys m │ │ │ +00002fe0: 6174 6368 2e0a 4b65 7920 7661 6c75 6573 atch..Key values │ │ │ +00002ff0: 2061 7265 2063 6f6d 7061 7265 6420 6279 are compared by │ │ │ +00003000: 2060 6571 6c27 2e1f 0a28 6175 746f 6c6f `eql'...(autolo │ │ │ +00003010: 6164 2027 6361 7365 2022 636c 2d6d 6163 ad 'case "cl-mac │ │ │ +00003020: 7322 2027 2823 2420 2e20 3131 3833 3629 s" '(#$ . 11836) │ │ │ +00003030: 206e 696c 2027 6d61 6372 6f29 0a23 4031 nil 'macro).#@1 │ │ │ +00003040: 3033 2028 6563 6173 6520 4558 5052 2043 03 (ecase EXPR C │ │ │ +00003050: 4c41 5553 4553 2e2e 2e29 3a20 6c69 6b65 LAUSES...): like │ │ │ +00003060: 2060 6361 7365 272c 2062 7574 2065 7272 `case', but err │ │ │ +00003070: 6f72 2069 6620 6e6f 2063 6173 6520 6669 or if no case fi │ │ │ +00003080: 7473 2e0a 606f 7468 6572 7769 7365 272d ts..`otherwise'- │ │ │ +00003090: 636c 6175 7365 7320 6172 6520 6e6f 7420 clauses are not │ │ │ +000030a0: 616c 6c6f 7765 642e 1f0a 2861 7574 6f6c allowed...(autol │ │ │ +000030b0: 6f61 6420 2765 6361 7365 2022 636c 2d6d oad 'ecase "cl-m │ │ │ +000030c0: 6163 7322 2027 2823 2420 2e20 3132 3335 acs" '(#$ . 1235 │ │ │ +000030d0: 3529 206e 696c 2027 6d61 6372 6f29 0a23 5) nil 'macro).# │ │ │ +000030e0: 4033 3438 2028 7479 7065 6361 7365 2045 @348 (typecase E │ │ │ +000030f0: 5850 5220 434c 4155 5345 532e 2e2e 293a XPR CLAUSES...): │ │ │ +00003100: 2065 7661 6c73 2045 5850 522c 2063 686f evals EXPR, cho │ │ │ +00003110: 6f73 6573 2066 726f 6d20 434c 4155 5345 oses from CLAUSE │ │ │ +00003120: 5320 6f6e 2074 6861 7420 7661 6c75 652e S on that value. │ │ │ +00003130: 0a45 6163 6820 636c 6175 7365 206c 6f6f .Each clause loo │ │ │ +00003140: 6b73 206c 696b 6520 2854 5950 4520 424f ks like (TYPE BO │ │ │ +00003150: 4459 2e2e 2e29 2e20 2045 5850 5220 6973 DY...). EXPR is │ │ │ +00003160: 2065 7661 6c75 6174 6564 2061 6e64 2c20 evaluated and, │ │ │ +00003170: 6966 2069 740a 7361 7469 7366 6965 7320 if it.satisfies │ │ │ +00003180: 5459 5045 2c20 7468 6520 636f 7272 6573 TYPE, the corres │ │ │ +00003190: 706f 6e64 696e 6720 424f 4459 2069 7320 ponding BODY is │ │ │ +000031a0: 6576 616c 7561 7465 642e 2020 4966 206e evaluated. If n │ │ │ +000031b0: 6f20 636c 6175 7365 2073 7563 6365 6564 o clause succeed │ │ │ +000031c0: 732c 0a74 7970 6563 6173 6520 7265 7475 s,.typecase retu │ │ │ +000031d0: 726e 7320 6e69 6c2e 2020 4120 5459 5045 rns nil. A TYPE │ │ │ +000031e0: 206f 6620 6074 2720 6f72 2060 6f74 6865 of `t' or `othe │ │ │ +000031f0: 7277 6973 6527 2069 7320 616c 6c6f 7765 rwise' is allowe │ │ │ +00003200: 6420 6f6e 6c79 2069 6e20 7468 650a 6669 d only in the.fi │ │ │ +00003210: 6e61 6c20 636c 6175 7365 2c20 616e 6420 nal clause, and │ │ │ +00003220: 6d61 7463 6865 7320 6966 206e 6f20 6f74 matches if no ot │ │ │ +00003230: 6865 7220 6b65 7973 206d 6174 6368 2e1f her keys match.. │ │ │ +00003240: 0a28 6175 746f 6c6f 6164 2027 7479 7065 .(autoload 'type │ │ │ +00003250: 6361 7365 2022 636c 2d6d 6163 7322 2027 case "cl-macs" ' │ │ │ +00003260: 2823 2420 2e20 3132 3531 3729 206e 696c (#$ . 12517) nil │ │ │ +00003270: 2027 6d61 6372 6f29 0a23 4031 3131 2028 'macro).#@111 ( │ │ │ +00003280: 6574 7970 6563 6173 6520 4558 5052 2043 etypecase EXPR C │ │ │ +00003290: 4c41 5553 4553 2e2e 2e29 3a20 6c69 6b65 LAUSES...): like │ │ │ +000032a0: 2060 7479 7065 6361 7365 272c 2062 7574 `typecase', but │ │ │ +000032b0: 2065 7272 6f72 2069 6620 6e6f 2063 6173 error if no cas │ │ │ +000032c0: 6520 6669 7473 2e0a 606f 7468 6572 7769 e fits..`otherwi │ │ │ +000032d0: 7365 272d 636c 6175 7365 7320 6172 6520 se'-clauses are │ │ │ +000032e0: 6e6f 7420 616c 6c6f 7765 642e 1f0a 2861 not allowed...(a │ │ │ +000032f0: 7574 6f6c 6f61 6420 2765 7479 7065 6361 utoload 'etypeca │ │ │ +00003300: 7365 2022 636c 2d6d 6163 7322 2027 2823 se "cl-macs" '(# │ │ │ +00003310: 2420 2e20 3132 3932 3729 206e 696c 2027 $ . 12927) nil ' │ │ │ +00003320: 6d61 6372 6f29 0a23 4035 3236 2028 626c macro).#@526 (bl │ │ │ +00003330: 6f63 6b20 4e41 4d45 2042 4f44 592e 2e2e ock NAME BODY... │ │ │ +00003340: 293a 2064 6566 696e 6520 6120 6c65 7869 ): define a lexi │ │ │ +00003350: 6361 6c6c 792d 7363 6f70 6564 2062 6c6f cally-scoped blo │ │ │ +00003360: 636b 206e 616d 6564 204e 414d 452e 0a4e ck named NAME..N │ │ │ +00003370: 414d 4520 6d61 7920 6265 2061 6e79 2073 AME may be any s │ │ │ +00003380: 796d 626f 6c2e 2020 436f 6465 2069 6e73 ymbol. Code ins │ │ │ +00003390: 6964 6520 7468 6520 424f 4459 2066 6f72 ide the BODY for │ │ │ +000033a0: 6d73 2063 616e 2063 616c 6c20 6072 6574 ms can call `ret │ │ │ +000033b0: 7572 6e2d 6672 6f6d 270a 746f 206a 756d urn-from'.to jum │ │ │ +000033c0: 7020 7072 656d 6174 7572 656c 7920 6f75 p prematurely ou │ │ │ +000033d0: 7420 6f66 2074 6865 2062 6c6f 636b 2e20 t of the block. │ │ │ +000033e0: 2054 6869 7320 6469 6666 6572 7320 6672 This differs fr │ │ │ +000033f0: 6f6d 2060 6361 7463 6827 2061 6e64 2060 om `catch' and ` │ │ │ +00003400: 7468 726f 7727 0a69 6e20 7477 6f20 7265 throw'.in two re │ │ │ +00003410: 7370 6563 7473 3a20 2046 6972 7374 2c20 spects: First, │ │ │ +00003420: 7468 6520 4e41 4d45 2069 7320 616e 2075 the NAME is an u │ │ │ +00003430: 6e65 7661 6c75 6174 6564 2073 796d 626f nevaluated symbo │ │ │ +00003440: 6c20 7261 7468 6572 2074 6861 6e20 610a l rather than a. │ │ │ +00003450: 7175 6f74 6564 2073 796d 626f 6c20 6f72 quoted symbol or │ │ │ +00003460: 206f 7468 6572 2066 6f72 6d3b 2061 6e64 other form; and │ │ │ +00003470: 2073 6563 6f6e 642c 204e 414d 4520 6973 second, NAME is │ │ │ +00003480: 206c 6578 6963 616c 6c79 2072 6174 6865 lexically rathe │ │ │ +00003490: 7220 7468 616e 0a64 796e 616d 6963 616c r than.dynamical │ │ │ +000034a0: 6c79 2073 636f 7065 643a 2020 4f6e 6c79 ly scoped: Only │ │ │ +000034b0: 2072 6566 6572 656e 6365 7320 746f 2069 references to i │ │ │ +000034c0: 7420 7769 7468 696e 2042 4f44 5920 7769 t within BODY wi │ │ │ +000034d0: 6c6c 2077 6f72 6b2e 2020 5468 6573 650a ll work. These. │ │ │ +000034e0: 7265 6665 7265 6e63 6573 206d 6179 2061 references may a │ │ │ +000034f0: 7070 6561 7220 696e 7369 6465 206d 6163 ppear inside mac │ │ │ +00003500: 726f 2065 7870 616e 7369 6f6e 732c 2062 ro expansions, b │ │ │ +00003510: 7574 206e 6f74 2069 6e73 6964 6520 6675 ut not inside fu │ │ │ +00003520: 6e63 7469 6f6e 730a 6361 6c6c 6564 2066 nctions.called f │ │ │ +00003530: 726f 6d20 424f 4459 2e1f 0a28 6175 746f rom BODY...(auto │ │ │ +00003540: 6c6f 6164 2027 626c 6f63 6b20 2263 6c2d load 'block "cl- │ │ │ +00003550: 6d61 6373 2220 2728 2324 202e 2031 3331 macs" '(#$ . 131 │ │ │ +00003560: 3031 2920 6e69 6c20 276d 6163 726f 290a 01) nil 'macro). │ │ │ +00003570: 2340 3130 3320 2872 6574 7572 6e20 5b52 #@103 (return [R │ │ │ +00003580: 4553 554c 545d 293a 2072 6574 7572 6e20 ESULT]): return │ │ │ +00003590: 6672 6f6d 2074 6865 2062 6c6f 636b 206e from the block n │ │ │ +000035a0: 616d 6564 206e 696c 2e0a 5468 6973 2069 amed nil..This i │ │ │ +000035b0: 7320 6571 7569 7661 6c65 6e74 2074 6f20 s equivalent to │ │ │ +000035c0: 6028 7265 7475 726e 2d66 726f 6d20 6e69 `(return-from ni │ │ │ +000035d0: 6c20 5245 5355 4c54 2927 2e1f 0a28 6175 l RESULT)'...(au │ │ │ +000035e0: 746f 6c6f 6164 2027 7265 7475 726e 2022 toload 'return " │ │ │ +000035f0: 636c 2d6d 6163 7322 2027 2823 2420 2e20 cl-macs" '(#$ . │ │ │ +00003600: 3133 3638 3629 206e 696c 2027 6d61 6372 13686) nil 'macr │ │ │ +00003610: 6f29 0a23 4033 3235 2028 7265 7475 726e o).#@325 (return │ │ │ +00003620: 2d66 726f 6d20 4e41 4d45 205b 5245 5355 -from NAME [RESU │ │ │ +00003630: 4c54 5d29 3a20 7265 7475 726e 2066 726f LT]): return fro │ │ │ +00003640: 6d20 7468 6520 626c 6f63 6b20 6e61 6d65 m the block name │ │ │ +00003650: 6420 4e41 4d45 2e0a 5468 6973 206a 756d d NAME..This jum │ │ │ +00003660: 7073 206f 7574 2074 6f20 7468 6520 696e ps out to the in │ │ │ +00003670: 6e65 726d 6f73 7420 656e 636c 6f73 696e nermost enclosin │ │ │ +00003680: 6720 6028 626c 6f63 6b20 4e41 4d45 202e g `(block NAME . │ │ │ +00003690: 2e2e 2927 2066 6f72 6d2c 0a72 6574 7572 ..)' form,.retur │ │ │ +000036a0: 6e69 6e67 2052 4553 554c 5420 6672 6f6d ning RESULT from │ │ │ +000036b0: 2074 6861 7420 666f 726d 2028 6f72 206e that form (or n │ │ │ +000036c0: 696c 2069 6620 5245 5355 4c54 2069 7320 il if RESULT is │ │ │ +000036d0: 6f6d 6974 7465 6429 2e0a 5468 6973 2069 omitted)..This i │ │ │ +000036e0: 7320 636f 6d70 6174 6962 6c65 2077 6974 s compatible wit │ │ │ +000036f0: 6820 436f 6d6d 6f6e 204c 6973 702c 2062 h Common Lisp, b │ │ │ +00003700: 7574 206e 6f74 6520 7468 6174 2060 6465 ut note that `de │ │ │ +00003710: 6675 6e27 2061 6e64 0a60 6465 666d 6163 fun' and.`defmac │ │ │ +00003720: 726f 2720 646f 206e 6f74 2063 7265 6174 ro' do not creat │ │ │ +00003730: 6520 696d 706c 6963 6974 2062 6c6f 636b e implicit block │ │ │ +00003740: 7320 6173 2074 6865 7920 646f 2069 6e20 s as they do in │ │ │ +00003750: 436f 6d6d 6f6e 204c 6973 702e 1f0a 2861 Common Lisp...(a │ │ │ +00003760: 7574 6f6c 6f61 6420 2772 6574 7572 6e2d utoload 'return- │ │ │ +00003770: 6672 6f6d 2022 636c 2d6d 6163 7322 2027 from "cl-macs" ' │ │ │ +00003780: 2823 2420 2e20 3133 3834 3929 206e 696c (#$ . 13849) nil │ │ │ +00003790: 2027 6d61 6372 6f29 0a23 4037 3235 2028 'macro).#@725 ( │ │ │ +000037a0: 6c6f 6f70 2043 4c41 5553 452e 2e2e 293a loop CLAUSE...): │ │ │ +000037b0: 2054 6865 2043 6f6d 6d6f 6e20 4c69 7370 The Common Lisp │ │ │ +000037c0: 2060 6c6f 6f70 2720 6d61 6372 6f2e 0a56 `loop' macro..V │ │ │ +000037d0: 616c 6964 2063 6c61 7573 6573 2061 7265 alid clauses are │ │ │ +000037e0: 3a0a 2020 666f 7220 5641 5220 6672 6f6d :. for VAR from │ │ │ +000037f0: 2f75 7066 726f 6d2f 646f 776e 6672 6f6d /upfrom/downfrom │ │ │ +00003800: 204e 554d 2074 6f2f 7570 746f 2f64 6f77 NUM to/upto/dow │ │ │ +00003810: 6e74 6f2f 6162 6f76 652f 6265 6c6f 7720 nto/above/below │ │ │ +00003820: 4e55 4d20 6279 204e 554d 2c0a 2020 666f NUM by NUM,. fo │ │ │ +00003830: 7220 5641 5220 696e 204c 4953 5420 6279 r VAR in LIST by │ │ │ +00003840: 2046 554e 432c 2066 6f72 2056 4152 206f FUNC, for VAR o │ │ │ +00003850: 6e20 4c49 5354 2062 7920 4655 4e43 2c20 n LIST by FUNC, │ │ │ +00003860: 666f 7220 5641 5220 3d20 494e 4954 2074 for VAR = INIT t │ │ │ +00003870: 6865 6e20 4558 5052 2c0a 2020 666f 7220 hen EXPR,. for │ │ │ +00003880: 5641 5220 6163 726f 7373 2041 5252 4159 VAR across ARRAY │ │ │ +00003890: 2c20 7265 7065 6174 204e 554d 2c20 7769 , repeat NUM, wi │ │ │ +000038a0: 7468 2056 4152 203d 2049 4e49 542c 2077 th VAR = INIT, w │ │ │ +000038b0: 6869 6c65 2043 4f4e 442c 2075 6e74 696c hile COND, until │ │ │ +000038c0: 2043 4f4e 442c 0a20 2061 6c77 6179 7320 COND,. always │ │ │ +000038d0: 434f 4e44 2c20 6e65 7665 7220 434f 4e44 COND, never COND │ │ │ +000038e0: 2c20 7468 6572 6569 7320 434f 4e44 2c20 , thereis COND, │ │ │ +000038f0: 636f 6c6c 6563 7420 4558 5052 2069 6e74 collect EXPR int │ │ │ +00003900: 6f20 5641 522c 0a20 2061 7070 656e 6420 o VAR,. append │ │ │ +00003910: 4558 5052 2069 6e74 6f20 5641 522c 206e EXPR into VAR, n │ │ │ +00003920: 636f 6e63 2045 5850 5220 696e 746f 2056 conc EXPR into V │ │ │ +00003930: 4152 2c20 7375 6d20 4558 5052 2069 6e74 AR, sum EXPR int │ │ │ +00003940: 6f20 5641 522c 0a20 2063 6f75 6e74 2045 o VAR,. count E │ │ │ +00003950: 5850 5220 696e 746f 2056 4152 2c20 6d61 XPR into VAR, ma │ │ │ +00003960: 7869 6d69 7a65 2045 5850 5220 696e 746f ximize EXPR into │ │ │ +00003970: 2056 4152 2c20 6d69 6e69 6d69 7a65 2045 VAR, minimize E │ │ │ +00003980: 5850 5220 696e 746f 2056 4152 2c0a 2020 XPR into VAR,. │ │ │ +00003990: 6966 2043 4f4e 4420 434c 4155 5345 205b if COND CLAUSE [ │ │ │ +000039a0: 616e 6420 434c 4155 5345 5d2e 2e2e 2065 and CLAUSE]... e │ │ │ +000039b0: 6c73 6520 434c 4155 5345 205b 616e 6420 lse CLAUSE [and │ │ │ +000039c0: 434c 4155 5345 2e2e 2e5d 2c0a 2020 756e CLAUSE...],. un │ │ │ +000039d0: 6c65 7373 2043 4f4e 4420 434c 4155 5345 less COND CLAUSE │ │ │ +000039e0: 205b 616e 6420 434c 4155 5345 5d2e 2e2e [and CLAUSE]... │ │ │ +000039f0: 2065 6c73 6520 434c 4155 5345 205b 616e else CLAUSE [an │ │ │ +00003a00: 6420 434c 4155 5345 2e2e 2e5d 2c0a 2020 d CLAUSE...],. │ │ │ +00003a10: 646f 2045 5850 5253 2e2e 2e2c 2069 6e69 do EXPRS..., ini │ │ │ +00003a20: 7469 616c 6c79 2045 5850 5253 2e2e 2e2c tially EXPRS..., │ │ │ +00003a30: 2066 696e 616c 6c79 2045 5850 5253 2e2e finally EXPRS.. │ │ │ +00003a40: 2e2c 2072 6574 7572 6e20 4558 5052 2c0a ., return EXPR,. │ │ │ +00003a50: 2020 6669 6e61 6c6c 7920 7265 7475 726e finally return │ │ │ +00003a60: 2045 5850 522c 206e 616d 6564 204e 414d EXPR, named NAM │ │ │ +00003a70: 452e 1f0a 2861 7574 6f6c 6f61 6420 276c E...(autoload 'l │ │ │ +00003a80: 6f6f 7020 2263 6c2d 6d61 6373 2220 2728 oop "cl-macs" '( │ │ │ +00003a90: 2324 202e 2031 3432 3339 2920 6e69 6c20 #$ . 14239) nil │ │ │ +00003aa0: 276d 6163 726f 290a 2340 3938 2054 6865 'macro).#@98 The │ │ │ +00003ab0: 2043 6f6d 6d6f 6e20 4c69 7370 2060 646f Common Lisp `do │ │ │ +00003ac0: 2720 6c6f 6f70 2e0a 466f 726d 6174 2069 ' loop..Format i │ │ │ +00003ad0: 733a 2028 646f 2028 2856 4152 2049 4e49 s: (do ((VAR INI │ │ │ +00003ae0: 5420 5b53 5445 505d 292e 2e2e 2920 2845 T [STEP])...) (E │ │ │ +00003af0: 4e44 2d54 4553 5420 5b52 4553 554c 542e ND-TEST [RESULT. │ │ │ +00003b00: 2e2e 5d29 2042 4f44 592e 2e2e 291f 0a28 ..]) BODY...)..( │ │ │ +00003b10: 6175 746f 6c6f 6164 2027 646f 2022 636c autoload 'do "cl │ │ │ +00003b20: 2d6d 6163 7322 2027 2823 2420 2e20 3135 -macs" '(#$ . 15 │ │ │ +00003b30: 3032 3129 206e 696c 2027 6d61 6372 6f29 021) nil 'macro) │ │ │ +00003b40: 0a23 4031 3030 2054 6865 2043 6f6d 6d6f .#@100 The Commo │ │ │ +00003b50: 6e20 4c69 7370 2060 646f 2a27 206c 6f6f n Lisp `do*' loo │ │ │ +00003b60: 702e 0a46 6f72 6d61 7420 6973 3a20 2864 p..Format is: (d │ │ │ +00003b70: 6f2a 2028 2856 4152 2049 4e49 5420 5b53 o* ((VAR INIT [S │ │ │ +00003b80: 5445 505d 292e 2e2e 2920 2845 4e44 2d54 TEP])...) (END-T │ │ │ +00003b90: 4553 5420 5b52 4553 554c 542e 2e2e 5d29 EST [RESULT...]) │ │ │ +00003ba0: 2042 4f44 592e 2e2e 291f 0a28 6175 746f BODY...)..(auto │ │ │ +00003bb0: 6c6f 6164 2027 646f 2a20 2263 6c2d 6d61 load 'do* "cl-ma │ │ │ +00003bc0: 6373 2220 2728 2324 202e 2031 3531 3735 cs" '(#$ . 15175 │ │ │ +00003bd0: 2920 6e69 6c20 276d 6163 726f 290a 2340 ) nil 'macro).#@ │ │ │ +00003be0: 3137 3520 2864 6f6c 6973 7420 2856 4152 175 (dolist (VAR │ │ │ +00003bf0: 204c 4953 5420 5b52 4553 554c 545d 2920 LIST [RESULT]) │ │ │ +00003c00: 424f 4459 2e2e 2e29 3a20 6c6f 6f70 206f BODY...): loop o │ │ │ +00003c10: 7665 7220 6120 6c69 7374 2e0a 4576 616c ver a list..Eval │ │ │ +00003c20: 7561 7465 2042 4f44 5920 7769 7468 2056 uate BODY with V │ │ │ +00003c30: 4152 2062 6f75 6e64 2074 6f20 6561 6368 AR bound to each │ │ │ +00003c40: 2060 6361 7227 2066 726f 6d20 4c49 5354 `car' from LIST │ │ │ +00003c50: 2c20 696e 2074 7572 6e2e 0a54 6865 6e20 , in turn..Then │ │ │ +00003c60: 6576 616c 7561 7465 2052 4553 554c 5420 evaluate RESULT │ │ │ +00003c70: 746f 2067 6574 2072 6574 7572 6e20 7661 to get return va │ │ │ +00003c80: 6c75 652c 2064 6566 6175 6c74 206e 696c lue, default nil │ │ │ +00003c90: 2e1f 0a28 6175 746f 6c6f 6164 2027 646f ...(autoload 'do │ │ │ +00003ca0: 6c69 7374 2022 636c 2d6d 6163 7322 2027 list "cl-macs" ' │ │ │ +00003cb0: 2823 2420 2e20 3135 3333 3229 206e 696c (#$ . 15332) nil │ │ │ +00003cc0: 2027 6d61 6372 6f29 0a23 4032 3231 2028 'macro).#@221 ( │ │ │ +00003cd0: 646f 7469 6d65 7320 2856 4152 2043 4f55 dotimes (VAR COU │ │ │ +00003ce0: 4e54 205b 5245 5355 4c54 5d29 2042 4f44 NT [RESULT]) BOD │ │ │ +00003cf0: 592e 2e2e 293a 206c 6f6f 7020 6120 6365 Y...): loop a ce │ │ │ +00003d00: 7274 6169 6e20 6e75 6d62 6572 206f 6620 rtain number of │ │ │ +00003d10: 7469 6d65 732e 0a45 7661 6c75 6174 6520 times..Evaluate │ │ │ +00003d20: 424f 4459 2077 6974 6820 5641 5220 626f BODY with VAR bo │ │ │ +00003d30: 756e 6420 746f 2073 7563 6365 7373 6976 und to successiv │ │ │ +00003d40: 6520 696e 7465 6765 7273 2066 726f 6d20 e integers from │ │ │ +00003d50: 302c 2069 6e63 6c75 7369 7665 2c0a 746f 0, inclusive,.to │ │ │ +00003d60: 2043 4f55 4e54 2c20 6578 636c 7573 6976 COUNT, exclusiv │ │ │ +00003d70: 652e 2020 5468 656e 2065 7661 6c75 6174 e. Then evaluat │ │ │ +00003d80: 6520 5245 5355 4c54 2074 6f20 6765 7420 e RESULT to get │ │ │ +00003d90: 7265 7475 726e 2076 616c 7565 2c20 6465 return value, de │ │ │ +00003da0: 6661 756c 740a 6e69 6c2e 1f0a 2861 7574 fault.nil...(aut │ │ │ +00003db0: 6f6c 6f61 6420 2764 6f74 696d 6573 2022 oload 'dotimes " │ │ │ +00003dc0: 636c 2d6d 6163 7322 2027 2823 2420 2e20 cl-macs" '(#$ . │ │ │ +00003dd0: 3135 3536 3729 206e 696c 2027 6d61 6372 15567) nil 'macr │ │ │ +00003de0: 6f29 0a23 4031 3536 2028 646f 7379 6d62 o).#@156 (dosymb │ │ │ +00003df0: 6f6c 7320 2856 4152 205b 4f42 4152 5241 ols (VAR [OBARRA │ │ │ +00003e00: 5920 5b52 4553 554c 545d 5d29 2042 4f44 Y [RESULT]]) BOD │ │ │ +00003e10: 592e 2e2e 293a 206c 6f6f 7020 6f76 6572 Y...): loop over │ │ │ +00003e20: 2061 6c6c 2073 796d 626f 6c73 2e0a 4576 all symbols..Ev │ │ │ +00003e30: 616c 7561 7465 2042 4f44 5920 7769 7468 aluate BODY with │ │ │ +00003e40: 2056 4152 2062 6f75 6e64 2074 6f20 6561 VAR bound to ea │ │ │ +00003e50: 6368 2069 6e74 6572 6e65 6420 7379 6d62 ch interned symb │ │ │ +00003e60: 6f6c 2c20 6f72 2074 6f20 6561 6368 2073 ol, or to each s │ │ │ +00003e70: 796d 626f 6c0a 6672 6f6d 204f 4241 5252 ymbol.from OBARR │ │ │ +00003e80: 4159 2e1f 0a28 6175 746f 6c6f 6164 2027 AY...(autoload ' │ │ │ +00003e90: 646f 2d73 796d 626f 6c73 2022 636c 2d6d do-symbols "cl-m │ │ │ +00003ea0: 6163 7322 2027 2823 2420 2e20 3135 3834 acs" '(#$ . 1584 │ │ │ +00003eb0: 3929 206e 696c 2027 6d61 6372 6f29 0a28 9) nil 'macro).( │ │ │ +00003ec0: 6279 7465 2d63 6f64 6520 22c0 c1c2 c389 byte-code "..... │ │ │ +00003ed0: c425 8722 205b 6175 746f 6c6f 6164 2064 .%." [autoload d │ │ │ +00003ee0: 6f2d 616c 6c2d 7379 6d62 6f6c 7320 2263 o-all-symbols "c │ │ │ +00003ef0: 6c2d 6d61 6373 2220 6e69 6c20 6d61 6372 l-macs" nil macr │ │ │ +00003f00: 6f5d 2036 290a 2340 3230 3520 2870 7365 o] 6).#@205 (pse │ │ │ +00003f10: 7471 2053 594d 2056 414c 2053 594d 2056 tq SYM VAL SYM V │ │ │ +00003f20: 414c 202e 2e2e 293a 2073 6574 2053 594d AL ...): set SYM │ │ │ +00003f30: 7320 746f 2074 6865 2076 616c 7565 7320 s to the values │ │ │ +00003f40: 5641 4c73 2069 6e20 7061 7261 6c6c 656c VALs in parallel │ │ │ +00003f50: 2e0a 5468 6973 2069 7320 6c69 6b65 2060 ..This is like ` │ │ │ +00003f60: 7365 7471 272c 2065 7863 6570 7420 7468 setq', except th │ │ │ +00003f70: 6174 2061 6c6c 2056 414c 2066 6f72 6d73 at all VAL forms │ │ │ +00003f80: 2061 7265 2065 7661 6c75 6174 6564 2028 are evaluated ( │ │ │ +00003f90: 696e 206f 7264 6572 290a 6265 666f 7265 in order).before │ │ │ +00003fa0: 2061 7373 6967 6e69 6e67 2061 6e79 2073 assigning any s │ │ │ +00003fb0: 796d 626f 6c73 2053 594d 2074 6f20 7468 ymbols SYM to th │ │ │ +00003fc0: 6520 636f 7272 6573 706f 6e64 696e 6720 e corresponding │ │ │ +00003fd0: 7661 6c75 6573 2e1f 0a28 6175 746f 6c6f values...(autolo │ │ │ +00003fe0: 6164 2027 7073 6574 7120 2263 6c2d 6d61 ad 'psetq "cl-ma │ │ │ +00003ff0: 6373 2220 2728 2324 202e 2031 3631 3430 cs" '(#$ . 16140 │ │ │ +00004000: 2920 6e69 6c20 276d 6163 726f 290a 2340 ) nil 'macro).#@ │ │ │ +00004010: 3434 3420 2870 726f 6776 2053 594d 424f 444 (progv SYMBO │ │ │ +00004020: 4c53 2056 414c 5545 5320 424f 4459 2e2e LS VALUES BODY.. │ │ │ +00004030: 2e29 3a20 6269 6e64 2053 594d 424f 4c53 .): bind SYMBOLS │ │ │ +00004040: 2074 6f20 5641 4c55 4553 2064 796e 616d to VALUES dynam │ │ │ +00004050: 6963 616c 6c79 2069 6e20 424f 4459 2e0a ically in BODY.. │ │ │ +00004060: 5468 6520 666f 726d 7320 5359 4d42 4f4c The forms SYMBOL │ │ │ +00004070: 5320 616e 6420 5641 4c55 4553 2061 7265 S and VALUES are │ │ │ +00004080: 2065 7661 6c75 6174 6564 2c20 616e 6420 evaluated, and │ │ │ +00004090: 6d75 7374 2065 7661 6c75 6174 6520 746f must evaluate to │ │ │ +000040a0: 206c 6973 7473 2e0a 4561 6368 2053 594d lists..Each SYM │ │ │ +000040b0: 424f 4c20 696e 2074 6865 2066 6972 7374 BOL in the first │ │ │ +000040c0: 206c 6973 7420 6973 2062 6f75 6e64 2074 list is bound t │ │ │ +000040d0: 6f20 7468 6520 636f 7272 6573 706f 6e64 o the correspond │ │ │ +000040e0: 696e 6720 5641 4c55 4520 696e 2074 6865 ing VALUE in the │ │ │ +000040f0: 0a73 6563 6f6e 6420 6c69 7374 2028 6f72 .second list (or │ │ │ +00004100: 206d 6164 6520 756e 626f 756e 6420 6966 made unbound if │ │ │ +00004110: 2056 414c 5545 5320 6973 2073 686f 7274 VALUES is short │ │ │ +00004120: 6572 2074 6861 6e20 5359 4d42 4f4c 5329 er than SYMBOLS) │ │ │ +00004130: 3b20 7468 656e 2074 6865 0a42 4f44 5920 ; then the.BODY │ │ │ +00004140: 666f 726d 7320 6172 6520 6578 6563 7574 forms are execut │ │ │ +00004150: 6564 2061 6e64 2074 6865 6972 2072 6573 ed and their res │ │ │ +00004160: 756c 7420 6973 2072 6574 7572 6e65 642e ult is returned. │ │ │ +00004170: 2020 5468 6973 2069 7320 6d75 6368 206c This is much l │ │ │ +00004180: 696b 650a 6120 606c 6574 2720 666f 726d ike.a `let' form │ │ │ +00004190: 2c20 6578 6365 7074 2074 6861 7420 7468 , except that th │ │ │ +000041a0: 6520 6c69 7374 206f 6620 7379 6d62 6f6c e list of symbol │ │ │ +000041b0: 7320 6361 6e20 6265 2063 6f6d 7075 7465 s can be compute │ │ │ +000041c0: 6420 6174 2072 756e 2d74 696d 652e 1f0a d at run-time... │ │ │ +000041d0: 2861 7574 6f6c 6f61 6420 2770 726f 6776 (autoload 'progv │ │ │ +000041e0: 2022 636c 2d6d 6163 7322 2027 2823 2420 "cl-macs" '(#$ │ │ │ +000041f0: 2e20 3136 3430 3429 206e 696c 2027 6d61 . 16404) nil 'ma │ │ │ +00004200: 6372 6f29 0a23 4033 3532 2028 666c 6574 cro).#@352 (flet │ │ │ +00004210: 2028 2846 554e 4320 4152 474c 4953 5420 ((FUNC ARGLIST │ │ │ +00004220: 424f 4459 2e2e 2e29 202e 2e2e 2920 464f BODY...) ...) FO │ │ │ +00004230: 524d 2e2e 2e29 3a20 6d61 6b65 2074 656d RM...): make tem │ │ │ +00004240: 706f 7261 7279 2066 756e 6374 696f 6e20 porary function │ │ │ +00004250: 6465 666e 732e 0a54 6869 7320 6973 2061 defns..This is a │ │ │ +00004260: 6e20 616e 616c 6f67 7565 206f 6620 606c n analogue of `l │ │ │ +00004270: 6574 2720 7468 6174 206f 7065 7261 7465 et' that operate │ │ │ +00004280: 7320 6f6e 2074 6865 2066 756e 6374 696f s on the functio │ │ │ +00004290: 6e20 6365 6c6c 206f 6620 4655 4e43 0a72 n cell of FUNC.r │ │ │ +000042a0: 6174 6865 7220 7468 616e 2069 7473 2076 ather than its v │ │ │ +000042b0: 616c 7565 2063 656c 6c2e 2020 5468 6520 alue cell. The │ │ │ +000042c0: 464f 524d 7320 6172 6520 6576 616c 7561 FORMs are evalua │ │ │ +000042d0: 7465 6420 7769 7468 2074 6865 2073 7065 ted with the spe │ │ │ +000042e0: 6369 6669 6564 0a66 756e 6374 696f 6e20 cified.function │ │ │ +000042f0: 6465 6669 6e69 7469 6f6e 7320 696e 2070 definitions in p │ │ │ +00004300: 6c61 6365 2c20 7468 656e 2074 6865 2064 lace, then the d │ │ │ +00004310: 6566 696e 6974 696f 6e73 2061 7265 2075 efinitions are u │ │ │ +00004320: 6e64 6f6e 6520 2874 6865 2046 554e 4373 ndone (the FUNCs │ │ │ +00004330: 0a67 6f20 6261 636b 2074 6f20 7468 6569 .go back to thei │ │ │ +00004340: 7220 7072 6576 696f 7573 2064 6566 696e r previous defin │ │ │ +00004350: 6974 696f 6e73 2c20 6f72 206c 6163 6b20 itions, or lack │ │ │ +00004360: 7468 6572 656f 6629 2e1f 0a28 6175 746f thereof)...(auto │ │ │ +00004370: 6c6f 6164 2027 666c 6574 2022 636c 2d6d load 'flet "cl-m │ │ │ +00004380: 6163 7322 2027 2823 2420 2e20 3136 3930 acs" '(#$ . 1690 │ │ │ +00004390: 3729 206e 696c 2027 6d61 6372 6f29 0a23 7) nil 'macro).# │ │ │ +000043a0: 4032 3237 2028 6c61 6265 6c73 2028 2846 @227 (labels ((F │ │ │ +000043b0: 554e 4320 4152 474c 4953 5420 424f 4459 UNC ARGLIST BODY │ │ │ +000043c0: 2e2e 2e29 202e 2e2e 2920 464f 524d 2e2e ...) ...) FORM.. │ │ │ +000043d0: 2e29 3a20 6d61 6b65 2074 656d 706f 7261 .): make tempora │ │ │ +000043e0: 7279 2066 756e 6320 6269 6e64 696e 6773 ry func bindings │ │ │ +000043f0: 2e0a 5468 6973 2069 7320 6c69 6b65 2060 ..This is like ` │ │ │ +00004400: 666c 6574 272c 2065 7863 6570 7420 7468 flet', except th │ │ │ +00004410: 6520 6269 6e64 696e 6773 2061 7265 206c e bindings are l │ │ │ +00004420: 6578 6963 616c 2069 6e73 7465 6164 206f exical instead o │ │ │ +00004430: 6620 6479 6e61 6d69 632e 0a55 6e6c 696b f dynamic..Unlik │ │ │ +00004440: 6520 6066 6c65 7427 2c20 7468 6973 206d e `flet', this m │ │ │ +00004450: 6163 726f 2069 7320 6675 6c6c 7920 636f acro is fully co │ │ │ +00004460: 6d70 6c69 616e 7420 7769 7468 2074 6865 mpliant with the │ │ │ +00004470: 2043 6f6d 6d6f 6e20 4c69 7370 2073 7461 Common Lisp sta │ │ │ +00004480: 6e64 6172 642e 1f0a 2861 7574 6f6c 6f61 ndard...(autoloa │ │ │ +00004490: 6420 276c 6162 656c 7320 2263 6c2d 6d61 d 'labels "cl-ma │ │ │ +000044a0: 6373 2220 2728 2324 202e 2031 3733 3137 cs" '(#$ . 17317 │ │ │ +000044b0: 2920 6e69 6c20 276d 6163 726f 290a 2340 ) nil 'macro).#@ │ │ │ +000044c0: 3133 3620 286d 6163 726f 6c65 7420 2828 136 (macrolet (( │ │ │ +000044d0: 4e41 4d45 2041 5247 4c49 5354 2042 4f44 NAME ARGLIST BOD │ │ │ +000044e0: 592e 2e2e 2920 2e2e 2e29 2046 4f52 4d2e Y...) ...) FORM. │ │ │ +000044f0: 2e2e 293a 206d 616b 6520 7465 6d70 6f72 ..): make tempor │ │ │ +00004500: 6172 7920 6d61 6372 6f20 6465 666e 732e ary macro defns. │ │ │ +00004510: 0a54 6869 7320 6973 206c 696b 6520 6066 .This is like `f │ │ │ +00004520: 6c65 7427 2c20 6275 7420 666f 7220 6d61 let', but for ma │ │ │ +00004530: 6372 6f73 2069 6e73 7465 6164 206f 6620 cros instead of │ │ │ +00004540: 6675 6e63 7469 6f6e 732e 1f0a 2861 7574 functions...(aut │ │ │ +00004550: 6f6c 6f61 6420 276d 6163 726f 6c65 7420 oload 'macrolet │ │ │ +00004560: 2263 6c2d 6d61 6373 2220 2728 2324 202e "cl-macs" '(#$ . │ │ │ +00004570: 2031 3736 3034 2920 6e69 6c20 276d 6163 17604) nil 'mac │ │ │ +00004580: 726f 290a 2340 3231 3820 2873 796d 626f ro).#@218 (symbo │ │ │ +00004590: 6c2d 6d61 6372 6f6c 6574 2028 284e 414d l-macrolet ((NAM │ │ │ +000045a0: 4520 4558 5041 4e53 494f 4e29 202e 2e2e E EXPANSION) ... │ │ │ +000045b0: 2920 464f 524d 2e2e 2e29 3a20 6d61 6b65 ) FORM...): make │ │ │ +000045c0: 2073 796d 626f 6c20 6d61 6372 6f20 6465 symbol macro de │ │ │ +000045d0: 666e 732e 0a57 6974 6869 6e20 7468 6520 fns..Within the │ │ │ +000045e0: 626f 6479 2046 4f52 4d73 2c20 7265 6665 body FORMs, refe │ │ │ +000045f0: 7265 6e63 6573 2074 6f20 7468 6520 7661 rences to the va │ │ │ +00004600: 7269 6162 6c65 204e 414d 4520 7769 6c6c riable NAME will │ │ │ +00004610: 2062 6520 7265 706c 6163 6564 0a62 7920 be replaced.by │ │ │ +00004620: 4558 5041 4e53 494f 4e2c 2061 6e64 2028 EXPANSION, and ( │ │ │ +00004630: 7365 7471 204e 414d 4520 2e2e 2e29 2077 setq NAME ...) w │ │ │ +00004640: 696c 6c20 6163 7420 6c69 6b65 2028 7365 ill act like (se │ │ │ +00004650: 7466 2045 5850 414e 5349 4f4e 202e 2e2e tf EXPANSION ... │ │ │ +00004660: 292e 1f0a 2861 7574 6f6c 6f61 6420 2773 )...(autoload 's │ │ │ +00004670: 796d 626f 6c2d 6d61 6372 6f6c 6574 2022 ymbol-macrolet " │ │ │ +00004680: 636c 2d6d 6163 7322 2027 2823 2420 2e20 cl-macs" '(#$ . │ │ │ +00004690: 3137 3830 3229 206e 696c 2027 6d61 6372 17802) nil 'macr │ │ │ +000046a0: 6f29 0a23 4031 3731 2028 6c65 7869 6361 o).#@171 (lexica │ │ │ +000046b0: 6c2d 6c65 7420 4249 4e44 494e 4753 2042 l-let BINDINGS B │ │ │ +000046c0: 4f44 592e 2e2e 293a 206c 696b 6520 606c ODY...): like `l │ │ │ +000046d0: 6574 272c 2062 7574 206c 6578 6963 616c et', but lexical │ │ │ +000046e0: 6c79 2073 636f 7065 642e 0a54 6865 206d ly scoped..The m │ │ │ +000046f0: 6169 6e20 7669 7369 626c 6520 6469 6666 ain visible diff │ │ │ +00004700: 6572 656e 6365 2069 7320 7468 6174 206c erence is that l │ │ │ +00004710: 616d 6264 6173 2069 6e73 6964 6520 424f ambdas inside BO │ │ │ +00004720: 4459 2077 696c 6c20 6372 6561 7465 0a6c DY will create.l │ │ │ +00004730: 6578 6963 616c 2063 6c6f 7375 7265 7320 exical closures │ │ │ +00004740: 6173 2069 6e20 436f 6d6d 6f6e 204c 6973 as in Common Lis │ │ │ +00004750: 702e 1f0a 2861 7574 6f6c 6f61 6420 276c p...(autoload 'l │ │ │ +00004760: 6578 6963 616c 2d6c 6574 2022 636c 2d6d exical-let "cl-m │ │ │ +00004770: 6163 7322 2027 2823 2420 2e20 3138 3038 acs" '(#$ . 1808 │ │ │ +00004780: 3929 206e 696c 2027 6d61 6372 6f29 0a23 9) nil 'macro).# │ │ │ +00004790: 4031 3733 2028 6c65 7869 6361 6c2d 6c65 @173 (lexical-le │ │ │ +000047a0: 742a 2042 494e 4449 4e47 5320 424f 4459 t* BINDINGS BODY │ │ │ +000047b0: 2e2e 2e29 3a20 6c69 6b65 2060 6c65 742a ...): like `let* │ │ │ +000047c0: 272c 2062 7574 206c 6578 6963 616c 6c79 ', but lexically │ │ │ +000047d0: 2073 636f 7065 642e 0a54 6865 206d 6169 scoped..The mai │ │ │ +000047e0: 6e20 7669 7369 626c 6520 6469 6666 6572 n visible differ │ │ │ +000047f0: 656e 6365 2069 7320 7468 6174 206c 616d ence is that lam │ │ │ +00004800: 6264 6173 2069 6e73 6964 6520 424f 4459 bdas inside BODY │ │ │ +00004810: 2077 696c 6c20 6372 6561 7465 0a6c 6578 will create.lex │ │ │ +00004820: 6963 616c 2063 6c6f 7375 7265 7320 6173 ical closures as │ │ │ +00004830: 2069 6e20 436f 6d6d 6f6e 204c 6973 702e in Common Lisp. │ │ │ +00004840: 1f0a 2861 7574 6f6c 6f61 6420 276c 6578 ..(autoload 'lex │ │ │ +00004850: 6963 616c 2d6c 6574 2a20 2263 6c2d 6d61 ical-let* "cl-ma │ │ │ +00004860: 6373 2220 2728 2324 202e 2031 3833 3235 cs" '(#$ . 18325 │ │ │ +00004870: 2920 6e69 6c20 276d 6163 726f 290a 2340 ) nil 'macro).#@ │ │ │ +00004880: 3431 3120 286d 756c 7469 706c 652d 7661 411 (multiple-va │ │ │ +00004890: 6c75 652d 6269 6e64 2028 5359 4d20 5359 lue-bind (SYM SY │ │ │ +000048a0: 4d2e 2e2e 2920 464f 524d 2042 4f44 5929 M...) FORM BODY) │ │ │ +000048b0: 3a20 636f 6c6c 6563 7420 6d75 6c74 6970 : collect multip │ │ │ +000048c0: 6c65 2072 6574 7572 6e20 7661 6c75 6573 le return values │ │ │ +000048d0: 2e0a 464f 524d 206d 7573 7420 7265 7475 ..FORM must retu │ │ │ +000048e0: 726e 2061 206c 6973 743b 2074 6865 2042 rn a list; the B │ │ │ +000048f0: 4f44 5920 6973 2074 6865 6e20 6578 6563 ODY is then exec │ │ │ +00004900: 7574 6564 2077 6974 6820 7468 6520 6669 uted with the fi │ │ │ +00004910: 7273 7420 4e20 656c 656d 656e 7473 0a6f rst N elements.o │ │ │ +00004920: 6620 7468 6973 206c 6973 7420 626f 756e f this list boun │ │ │ +00004930: 6420 2860 6c65 7427 2d73 7479 6c65 2920 d (`let'-style) │ │ │ +00004940: 746f 2065 6163 6820 6f66 2074 6865 2073 to each of the s │ │ │ +00004950: 796d 626f 6c73 2053 594d 2069 6e20 7475 ymbols SYM in tu │ │ │ +00004960: 726e 2e20 2054 6869 730a 6973 2061 6e61 rn. This.is ana │ │ │ +00004970: 6c6f 676f 7573 2074 6f20 7468 6520 436f logous to the Co │ │ │ +00004980: 6d6d 6f6e 204c 6973 7020 606d 756c 7469 mmon Lisp `multi │ │ │ +00004990: 706c 652d 7661 6c75 652d 6269 6e64 2720 ple-value-bind' │ │ │ +000049a0: 6d61 6372 6f2c 2075 7369 6e67 206c 6973 macro, using lis │ │ │ +000049b0: 7473 2074 6f0a 7369 6d75 6c61 7465 2074 ts to.simulate t │ │ │ +000049c0: 7275 6520 6d75 6c74 6970 6c65 2072 6574 rue multiple ret │ │ │ +000049d0: 7572 6e20 7661 6c75 6573 2e20 2046 6f72 urn values. For │ │ │ +000049e0: 2063 6f6d 7061 7469 6269 6c69 7479 2c20 compatibility, │ │ │ +000049f0: 2876 616c 7565 7320 4120 4220 4329 2069 (values A B C) i │ │ │ +00004a00: 730a 6120 7379 6e6f 6e79 6d20 666f 7220 s.a synonym for │ │ │ +00004a10: 286c 6973 7420 4120 4220 4329 2e1f 0a28 (list A B C)...( │ │ │ +00004a20: 6175 746f 6c6f 6164 2027 6d75 6c74 6970 autoload 'multip │ │ │ +00004a30: 6c65 2d76 616c 7565 2d62 696e 6420 2263 le-value-bind "c │ │ │ +00004a40: 6c2d 6d61 6373 2220 2728 2324 202e 2031 l-macs" '(#$ . 1 │ │ │ +00004a50: 3835 3634 2920 6e69 6c20 276d 6163 726f 8564) nil 'macro │ │ │ +00004a60: 290a 2340 3336 3620 286d 756c 7469 706c ).#@366 (multipl │ │ │ +00004a70: 652d 7661 6c75 652d 7365 7471 2028 5359 e-value-setq (SY │ │ │ +00004a80: 4d20 5359 4d2e 2e2e 2920 464f 524d 293a M SYM...) FORM): │ │ │ +00004a90: 2063 6f6c 6c65 6374 206d 756c 7469 706c collect multipl │ │ │ +00004aa0: 6520 7265 7475 726e 2076 616c 7565 732e e return values. │ │ │ +00004ab0: 0a46 4f52 4d20 6d75 7374 2072 6574 7572 .FORM must retur │ │ │ +00004ac0: 6e20 6120 6c69 7374 3b20 7468 6520 6669 n a list; the fi │ │ │ +00004ad0: 7273 7420 4e20 656c 656d 656e 7473 206f rst N elements o │ │ │ +00004ae0: 6620 7468 6973 206c 6973 7420 6172 6520 f this list are │ │ │ +00004af0: 7374 6f72 6564 2069 6e0a 6561 6368 206f stored in.each o │ │ │ +00004b00: 6620 7468 6520 7379 6d62 6f6c 7320 5359 f the symbols SY │ │ │ +00004b10: 4d20 696e 2074 7572 6e2e 2020 5468 6973 M in turn. This │ │ │ +00004b20: 2069 7320 616e 616c 6f67 6f75 7320 746f is analogous to │ │ │ +00004b30: 2074 6865 2043 6f6d 6d6f 6e20 4c69 7370 the Common Lisp │ │ │ +00004b40: 0a60 6d75 6c74 6970 6c65 2d76 616c 7565 .`multiple-value │ │ │ +00004b50: 2d73 6574 7127 206d 6163 726f 2c20 7573 -setq' macro, us │ │ │ +00004b60: 696e 6720 6c69 7374 7320 746f 2073 696d ing lists to sim │ │ │ +00004b70: 756c 6174 6520 7472 7565 206d 756c 7469 ulate true multi │ │ │ +00004b80: 706c 6520 7265 7475 726e 0a76 616c 7565 ple return.value │ │ │ +00004b90: 732e 2020 466f 7220 636f 6d70 6174 6962 s. For compatib │ │ │ +00004ba0: 696c 6974 792c 2028 7661 6c75 6573 2041 ility, (values A │ │ │ +00004bb0: 2042 2043 2920 6973 2061 2073 796e 6f6e B C) is a synon │ │ │ +00004bc0: 796d 2066 6f72 2028 6c69 7374 2041 2042 ym for (list A B │ │ │ +00004bd0: 2043 292e 1f0a 2861 7574 6f6c 6f61 6420 C)...(autoload │ │ │ +00004be0: 276d 756c 7469 706c 652d 7661 6c75 652d 'multiple-value- │ │ │ +00004bf0: 7365 7471 2022 636c 2d6d 6163 7322 2027 setq "cl-macs" ' │ │ │ +00004c00: 2823 2420 2e20 3139 3034 3829 206e 696c (#$ . 19048) nil │ │ │ +00004c10: 2027 6d61 6372 6f29 0a28 6279 7465 2d63 'macro).(byte-c │ │ │ +00004c20: 6f64 6520 22c0 c1c2 c389 c425 88c0 c5c2 ode "......%.... │ │ │ +00004c30: c389 c425 88c0 c6c2 c389 c425 8722 205b ...%.......%." [ │ │ │ +00004c40: 6175 746f 6c6f 6164 206c 6f63 616c 6c79 autoload locally │ │ │ +00004c50: 2022 636c 2d6d 6163 7322 206e 696c 206d "cl-macs" nil m │ │ │ +00004c60: 6163 726f 2074 6865 2064 6563 6c61 7265 acro the declare │ │ │ +00004c70: 5d20 3629 0a23 4035 3130 2028 6465 6669 ] 6).#@510 (defi │ │ │ +00004c80: 6e65 2d73 6574 662d 6d65 7468 6f64 204e ne-setf-method N │ │ │ +00004c90: 414d 4520 4152 474c 4953 5420 424f 4459 AME ARGLIST BODY │ │ │ +00004ca0: 2e2e 2e29 3a20 6465 6669 6e65 2061 2060 ...): define a ` │ │ │ +00004cb0: 7365 7466 2720 6d65 7468 6f64 2e0a 5468 setf' method..Th │ │ │ +00004cc0: 6973 206d 6574 686f 6420 7368 6f77 7320 is method shows │ │ │ +00004cd0: 686f 7720 746f 2068 616e 646c 6520 6073 how to handle `s │ │ │ +00004ce0: 6574 6627 7320 746f 2070 6c61 6365 7320 etf's to places │ │ │ +00004cf0: 6f66 2074 6865 2066 6f72 6d20 284e 414d of the form (NAM │ │ │ +00004d00: 4520 4152 4753 2e2e 2e29 2e0a 5468 6520 E ARGS...)..The │ │ │ +00004d10: 6172 6775 6d65 6e74 2066 6f72 6d73 2041 argument forms A │ │ │ +00004d20: 5247 5320 6172 6520 626f 756e 6420 6163 RGS are bound ac │ │ │ +00004d30: 636f 7264 696e 6720 746f 2041 5247 4c49 cording to ARGLI │ │ │ +00004d40: 5354 2c20 6173 2069 6620 4e41 4d45 2077 ST, as if NAME w │ │ │ +00004d50: 6572 650a 676f 696e 6720 746f 2062 6520 ere.going to be │ │ │ +00004d60: 6578 7061 6e64 6564 2061 7320 6120 6d61 expanded as a ma │ │ │ +00004d70: 6372 6f2c 2074 6865 6e20 7468 6520 424f cro, then the BO │ │ │ +00004d80: 4459 2066 6f72 6d73 2061 7265 2065 7865 DY forms are exe │ │ │ +00004d90: 6375 7465 6420 616e 6420 6d75 7374 0a72 cuted and must.r │ │ │ +00004da0: 6574 7572 6e20 6120 6c69 7374 206f 6620 eturn a list of │ │ │ +00004db0: 6669 7665 2065 6c65 6d65 6e74 733a 2061 five elements: a │ │ │ +00004dc0: 2074 656d 706f 7261 7279 2d76 6172 6961 temporary-varia │ │ │ +00004dd0: 626c 6573 206c 6973 742c 2061 2076 616c bles list, a val │ │ │ +00004de0: 7565 2d66 6f72 6d73 0a6c 6973 742c 2061 ue-forms.list, a │ │ │ +00004df0: 2073 746f 7265 2d76 6172 6961 626c 6573 store-variables │ │ │ +00004e00: 206c 6973 7420 286f 6620 6c65 6e67 7468 list (of length │ │ │ +00004e10: 206f 6e65 292c 2061 2073 746f 7265 2d66 one), a store-f │ │ │ +00004e20: 6f72 6d2c 2061 6e64 2061 6e20 6163 6365 orm, and an acce │ │ │ +00004e30: 7373 2d0a 666f 726d 2e20 2053 6565 2060 ss-.form. See ` │ │ │ +00004e40: 6465 6673 6574 6627 2066 6f72 2061 2073 defsetf' for a s │ │ │ +00004e50: 696d 706c 6572 2077 6179 2074 6f20 6465 impler way to de │ │ │ +00004e60: 6669 6e65 206d 6f73 7420 7365 7466 2d6d fine most setf-m │ │ │ +00004e70: 6574 686f 6473 2e1f 0a28 6175 746f 6c6f ethods...(autolo │ │ │ +00004e80: 6164 2027 6465 6669 6e65 2d73 6574 662d ad 'define-setf- │ │ │ +00004e90: 6d65 7468 6f64 2022 636c 2d6d 6163 7322 method "cl-macs" │ │ │ +00004ea0: 2027 2823 2420 2e20 3139 3537 3929 206e '(#$ . 19579) n │ │ │ +00004eb0: 696c 2027 6d61 6372 6f29 0a23 4038 3339 il 'macro).#@839 │ │ │ +00004ec0: 2028 6465 6673 6574 6620 4e41 4d45 2046 (defsetf NAME F │ │ │ +00004ed0: 554e 4329 3a20 6465 6669 6e65 2061 2060 UNC): define a ` │ │ │ +00004ee0: 7365 7466 2720 6d65 7468 6f64 2e0a 5468 setf' method..Th │ │ │ +00004ef0: 6973 206d 6163 726f 2069 7320 616e 2065 is macro is an e │ │ │ +00004f00: 6173 792d 746f 2d75 7365 2073 7562 7374 asy-to-use subst │ │ │ +00004f10: 6974 7574 6520 666f 7220 6064 6566 696e itute for `defin │ │ │ +00004f20: 652d 7365 7466 2d6d 6574 686f 6427 2074 e-setf-method' t │ │ │ +00004f30: 6861 7420 776f 726b 730a 7765 6c6c 2066 hat works.well f │ │ │ +00004f40: 6f72 2073 696d 706c 6520 706c 6163 6520 or simple place │ │ │ +00004f50: 666f 726d 732e 2020 496e 2074 6865 2073 forms. In the s │ │ │ +00004f60: 696d 706c 6520 6064 6566 7365 7466 2720 imple `defsetf' │ │ │ +00004f70: 666f 726d 2c20 6073 6574 6627 7320 6f66 form, `setf's of │ │ │ +00004f80: 0a74 6865 2066 6f72 6d20 2873 6574 6620 .the form (setf │ │ │ +00004f90: 284e 414d 4520 4152 4753 2e2e 2e29 2056 (NAME ARGS...) V │ │ │ +00004fa0: 414c 2920 6172 6520 7472 616e 7366 6f72 AL) are transfor │ │ │ +00004fb0: 6d65 6420 746f 2066 756e 6374 696f 6e20 med to function │ │ │ +00004fc0: 6f72 206d 6163 726f 0a63 616c 6c73 206f or macro.calls o │ │ │ +00004fd0: 6620 7468 6520 666f 726d 2028 4655 4e43 f the form (FUNC │ │ │ +00004fe0: 2041 5247 532e 2e2e 2056 414c 292e 2020 ARGS... VAL). │ │ │ +00004ff0: 4578 616d 706c 653a 2028 6465 6673 6574 Example: (defset │ │ │ +00005000: 6620 6172 6566 2061 7365 7429 2e0a 416c f aref aset)..Al │ │ │ +00005010: 7465 726e 6174 6520 666f 726d 3a20 2864 ternate form: (d │ │ │ +00005020: 6566 7365 7466 204e 414d 4520 4152 474c efsetf NAME ARGL │ │ │ +00005030: 4953 5420 2853 544f 5245 2920 424f 4459 IST (STORE) BODY │ │ │ +00005040: 2e2e 2e29 2e0a 4865 7265 2c20 7468 6520 ...)..Here, the │ │ │ +00005050: 6162 6f76 6520 6073 6574 6627 2063 616c above `setf' cal │ │ │ +00005060: 6c20 6973 2065 7870 616e 6465 6420 6279 l is expanded by │ │ │ +00005070: 2062 696e 6469 6e67 2074 6865 2061 7267 binding the arg │ │ │ +00005080: 756d 656e 7420 666f 726d 7320 4152 4753 ument forms ARGS │ │ │ +00005090: 0a61 6363 6f72 6469 6e67 2074 6f20 4152 .according to AR │ │ │ +000050a0: 474c 4953 542c 2062 696e 6469 6e67 2074 GLIST, binding t │ │ │ +000050b0: 6865 2076 616c 7565 2066 6f72 6d20 5641 he value form VA │ │ │ +000050c0: 4c20 746f 2053 544f 5245 2c20 7468 656e L to STORE, then │ │ │ +000050d0: 2065 7865 6375 7469 6e67 0a42 4f44 592c executing.BODY, │ │ │ +000050e0: 2077 6869 6368 206d 7573 7420 7265 7475 which must retu │ │ │ +000050f0: 726e 2061 204c 6973 7020 666f 726d 2074 rn a Lisp form t │ │ │ +00005100: 6861 7420 646f 6573 2074 6865 206e 6563 hat does the nec │ │ │ +00005110: 6573 7361 7279 2060 7365 7466 2720 6f70 essary `setf' op │ │ │ +00005120: 6572 6174 696f 6e2e 0a41 6374 7561 6c6c eration..Actuall │ │ │ +00005130: 792c 2041 5247 4c49 5354 2061 6e64 2053 y, ARGLIST and S │ │ │ +00005140: 544f 5245 206d 6179 2062 6520 626f 756e TORE may be boun │ │ │ +00005150: 6420 746f 2074 656d 706f 7261 7279 2076 d to temporary v │ │ │ +00005160: 6172 6961 626c 6573 2077 6869 6368 2061 ariables which a │ │ │ +00005170: 7265 0a69 6e74 726f 6475 6365 6420 6175 re.introduced au │ │ │ +00005180: 746f 6d61 7469 6361 6c6c 7920 746f 2070 tomatically to p │ │ │ +00005190: 7265 7365 7276 6520 7072 6f70 6572 2065 reserve proper e │ │ │ +000051a0: 7865 6375 7469 6f6e 206f 7264 6572 206f xecution order o │ │ │ +000051b0: 6620 7468 6520 6172 6775 6d65 6e74 732e f the arguments. │ │ │ +000051c0: 0a45 7861 6d70 6c65 3a20 2864 6566 7365 .Example: (defse │ │ │ +000051d0: 7466 206e 7468 2028 6e20 7829 2028 7629 tf nth (n x) (v) │ │ │ +000051e0: 2028 6c69 7374 2027 7365 7463 6172 2028 (list 'setcar ( │ │ │ +000051f0: 6c69 7374 2027 6e74 6863 6472 206e 2078 list 'nthcdr n x │ │ │ +00005200: 2920 7629 292e 1f0a 2861 7574 6f6c 6f61 ) v))...(autoloa │ │ │ +00005210: 6420 2764 6566 7365 7466 2022 636c 2d6d d 'defsetf "cl-m │ │ │ +00005220: 6163 7322 2027 2823 2420 2e20 3230 3136 acs" '(#$ . 2016 │ │ │ +00005230: 3129 206e 696c 2027 6d61 6372 6f29 0a23 1) nil 'macro).# │ │ │ +00005240: 4031 3638 2052 6574 7572 6e20 6120 6c69 @168 Return a li │ │ │ +00005250: 7374 206f 6620 6669 7665 2076 616c 7565 st of five value │ │ │ +00005260: 7320 6465 7363 7269 6269 6e67 2074 6865 s describing the │ │ │ +00005270: 2073 6574 662d 6d65 7468 6f64 2066 6f72 setf-method for │ │ │ +00005280: 2050 4c41 4345 2e0a 504c 4143 4520 6d61 PLACE..PLACE ma │ │ │ +00005290: 7920 6265 2061 6e79 204c 6973 7020 666f y be any Lisp fo │ │ │ +000052a0: 726d 2077 6869 6368 2063 616e 2061 7070 rm which can app │ │ │ +000052b0: 6561 7220 6173 2074 6865 2050 4c41 4345 ear as the PLACE │ │ │ +000052c0: 2061 7267 756d 656e 7420 746f 0a61 206d argument to.a m │ │ │ +000052d0: 6163 726f 206c 696b 6520 6073 6574 6627 acro like `setf' │ │ │ +000052e0: 206f 7220 6069 6e63 6627 2e1f 0a28 6175 or `incf'...(au │ │ │ +000052f0: 746f 6c6f 6164 2027 6765 742d 7365 7466 toload 'get-setf │ │ │ +00005300: 2d6d 6574 686f 6420 2263 6c2d 6d61 6373 -method "cl-macs │ │ │ +00005310: 2220 2728 2324 202e 2032 3130 3631 2920 " '(#$ . 21061) │ │ │ +00005320: 6e69 6c20 6e69 6c29 0a23 4033 3235 2028 nil nil).#@325 ( │ │ │ +00005330: 7365 7466 2050 4c41 4345 2056 414c 2050 setf PLACE VAL P │ │ │ +00005340: 4c41 4345 2056 414c 202e 2e2e 293a 2073 LACE VAL ...): s │ │ │ +00005350: 6574 2065 6163 6820 504c 4143 4520 746f et each PLACE to │ │ │ +00005360: 2074 6865 2076 616c 7565 206f 6620 6974 the value of it │ │ │ +00005370: 7320 5641 4c2e 0a54 6869 7320 6973 2061 s VAL..This is a │ │ │ +00005380: 2067 656e 6572 616c 697a 6564 2076 6572 generalized ver │ │ │ +00005390: 7369 6f6e 206f 6620 6073 6574 7127 3b20 sion of `setq'; │ │ │ +000053a0: 7468 6520 504c 4143 4573 206d 6179 2062 the PLACEs may b │ │ │ +000053b0: 6520 7379 6d62 6f6c 6963 0a72 6566 6572 e symbolic.refer │ │ │ +000053c0: 656e 6365 7320 7375 6368 2061 7320 2863 ences such as (c │ │ │ +000053d0: 6172 2078 2920 6f72 2028 6172 6566 2078 ar x) or (aref x │ │ │ +000053e0: 2069 292c 2061 7320 7765 6c6c 2061 7320 i), as well as │ │ │ +000053f0: 706c 6169 6e20 7379 6d62 6f6c 732e 0a46 plain symbols..F │ │ │ +00005400: 6f72 2065 7861 6d70 6c65 2c20 2873 6574 or example, (set │ │ │ +00005410: 6620 2863 6164 6172 2078 2920 7929 2069 f (cadar x) y) i │ │ │ +00005420: 7320 6571 7569 7661 6c65 6e74 2074 6f20 s equivalent to │ │ │ +00005430: 2873 6574 6361 7220 2863 6461 7220 7829 (setcar (cdar x) │ │ │ +00005440: 2079 292e 0a54 6865 2072 6574 7572 6e20 y)..The return │ │ │ +00005450: 7661 6c75 6520 6973 2074 6865 206c 6173 value is the las │ │ │ +00005460: 7420 5641 4c20 696e 2074 6865 206c 6973 t VAL in the lis │ │ │ +00005470: 742e 1f0a 2861 7574 6f6c 6f61 6420 2773 t...(autoload 's │ │ │ +00005480: 6574 6620 2263 6c2d 6d61 6373 2220 2728 etf "cl-macs" '( │ │ │ +00005490: 2324 202e 2032 3132 3935 2920 6e69 6c20 #$ . 21295) nil │ │ │ +000054a0: 276d 6163 726f 290a 2340 3230 3620 2870 'macro).#@206 (p │ │ │ +000054b0: 7365 7466 2050 4c41 4345 2056 414c 2050 setf PLACE VAL P │ │ │ +000054c0: 4c41 4345 2056 414c 202e 2e2e 293a 2073 LACE VAL ...): s │ │ │ +000054d0: 6574 2050 4c41 4345 7320 746f 2074 6865 et PLACEs to the │ │ │ +000054e0: 2076 616c 7565 7320 5641 4c73 2069 6e20 values VALs in │ │ │ +000054f0: 7061 7261 6c6c 656c 2e0a 5468 6973 2069 parallel..This i │ │ │ +00005500: 7320 6c69 6b65 2060 7365 7466 272c 2065 s like `setf', e │ │ │ +00005510: 7863 6570 7420 7468 6174 2061 6c6c 2056 xcept that all V │ │ │ +00005520: 414c 2066 6f72 6d73 2061 7265 2065 7661 AL forms are eva │ │ │ +00005530: 6c75 6174 6564 2028 696e 206f 7264 6572 luated (in order │ │ │ +00005540: 290a 6265 666f 7265 2061 7373 6967 6e69 ).before assigni │ │ │ +00005550: 6e67 2061 6e79 2050 4c41 4345 7320 746f ng any PLACEs to │ │ │ +00005560: 2074 6865 2063 6f72 7265 7370 6f6e 6469 the correspondi │ │ │ +00005570: 6e67 2076 616c 7565 732e 1f0a 2861 7574 ng values...(aut │ │ │ +00005580: 6f6c 6f61 6420 2770 7365 7466 2022 636c oload 'psetf "cl │ │ │ +00005590: 2d6d 6163 7322 2027 2823 2420 2e20 3231 -macs" '(#$ . 21 │ │ │ +000055a0: 3637 3829 206e 696c 2027 6d61 6372 6f29 678) nil 'macro) │ │ │ +000055b0: 0a28 6279 7465 2d63 6f64 6520 22c0 c1c2 .(byte-code "... │ │ │ +000055c0: c389 8925 8722 205b 6175 746f 6c6f 6164 ...%." [autoload │ │ │ +000055d0: 2063 6c2d 646f 2d70 6f70 2022 636c 2d6d cl-do-pop "cl-m │ │ │ +000055e0: 6163 7322 206e 696c 5d20 3629 0a23 4031 acs" nil] 6).#@1 │ │ │ +000055f0: 3933 2028 7265 6d66 2050 4c41 4345 2054 93 (remf PLACE T │ │ │ +00005600: 4147 293a 2072 656d 6f76 6520 5441 4720 AG): remove TAG │ │ │ +00005610: 6672 6f6d 2070 726f 7065 7274 7920 6c69 from property li │ │ │ +00005620: 7374 2050 4c41 4345 2e0a 504c 4143 4520 st PLACE..PLACE │ │ │ +00005630: 6d61 7920 6265 2061 2073 796d 626f 6c2c may be a symbol, │ │ │ +00005640: 206f 7220 616e 7920 6765 6e65 7261 6c69 or any generali │ │ │ +00005650: 7a65 6420 7661 7269 6162 6c65 2061 6c6c zed variable all │ │ │ +00005660: 6f77 6564 2062 7920 6073 6574 6627 2e0a owed by `setf'.. │ │ │ +00005670: 5468 6520 666f 726d 2072 6574 7572 6e73 The form returns │ │ │ +00005680: 2074 7275 6520 6966 2054 4147 2077 6173 true if TAG was │ │ │ +00005690: 2066 6f75 6e64 2061 6e64 2072 656d 6f76 found and remov │ │ │ +000056a0: 6564 2c20 6e69 6c20 6f74 6865 7277 6973 ed, nil otherwis │ │ │ +000056b0: 652e 1f0a 2861 7574 6f6c 6f61 6420 2772 e...(autoload 'r │ │ │ +000056c0: 656d 6620 2263 6c2d 6d61 6373 2220 2728 emf "cl-macs" '( │ │ │ +000056d0: 2324 202e 2032 3230 3033 2920 6e69 6c20 #$ . 22003) nil │ │ │ +000056e0: 276d 6163 726f 290a 2340 3139 3820 2873 'macro).#@198 (s │ │ │ +000056f0: 6869 6674 6620 504c 4143 4520 504c 4143 hiftf PLACE PLAC │ │ │ +00005700: 452e 2e2e 2056 414c 293a 2073 6869 6674 E... VAL): shift │ │ │ +00005710: 206c 6566 7420 616d 6f6e 6720 504c 4143 left among PLAC │ │ │ +00005720: 4573 2e0a 4578 616d 706c 653a 2028 7368 Es..Example: (sh │ │ │ +00005730: 6966 7466 2041 2042 2043 2920 7365 7473 iftf A B C) sets │ │ │ +00005740: 2041 2074 6f20 422c 2042 2074 6f20 432c A to B, B to C, │ │ │ +00005750: 2061 6e64 2072 6574 7572 6e73 2074 6865 and returns the │ │ │ +00005760: 206f 6c64 2041 2e0a 4561 6368 2050 4c41 old A..Each PLA │ │ │ +00005770: 4345 206d 6179 2062 6520 6120 7379 6d62 CE may be a symb │ │ │ +00005780: 6f6c 2c20 6f72 2061 6e79 2067 656e 6572 ol, or any gener │ │ │ +00005790: 616c 697a 6564 2076 6172 6961 626c 6520 alized variable │ │ │ +000057a0: 616c 6c6f 7765 6420 6279 2060 7365 7466 allowed by `setf │ │ │ +000057b0: 272e 1f0a 2861 7574 6f6c 6f61 6420 2773 '...(autoload 's │ │ │ +000057c0: 6869 6674 6620 2263 6c2d 6d61 6373 2220 hiftf "cl-macs" │ │ │ +000057d0: 2728 2324 202e 2032 3232 3534 2920 6e69 '(#$ . 22254) ni │ │ │ +000057e0: 6c20 276d 6163 726f 290a 2340 3139 3720 l 'macro).#@197 │ │ │ +000057f0: 2872 6f74 6174 6566 2050 4c41 4345 2e2e (rotatef PLACE.. │ │ │ +00005800: 2e29 3a20 726f 7461 7465 206c 6566 7420 .): rotate left │ │ │ +00005810: 616d 6f6e 6720 504c 4143 4573 2e0a 4578 among PLACEs..Ex │ │ │ +00005820: 616d 706c 653a 2028 726f 7461 7465 6620 ample: (rotatef │ │ │ +00005830: 4120 4220 4329 2073 6574 7320 4120 746f A B C) sets A to │ │ │ +00005840: 2042 2c20 4220 746f 2043 2c20 616e 6420 B, B to C, and │ │ │ +00005850: 4320 746f 2041 2e20 2049 7420 7265 7475 C to A. It retu │ │ │ +00005860: 726e 7320 6e69 6c2e 0a45 6163 6820 504c rns nil..Each PL │ │ │ +00005870: 4143 4520 6d61 7920 6265 2061 2073 796d ACE may be a sym │ │ │ +00005880: 626f 6c2c 206f 7220 616e 7920 6765 6e65 bol, or any gene │ │ │ +00005890: 7261 6c69 7a65 6420 7661 7269 6162 6c65 ralized variable │ │ │ +000058a0: 2061 6c6c 6f77 6564 2062 7920 6073 6574 allowed by `set │ │ │ +000058b0: 6627 2e1f 0a28 6175 746f 6c6f 6164 2027 f'...(autoload ' │ │ │ +000058c0: 726f 7461 7465 6620 2263 6c2d 6d61 6373 rotatef "cl-macs │ │ │ +000058d0: 2220 2728 2324 202e 2032 3235 3132 2920 " '(#$ . 22512) │ │ │ +000058e0: 6e69 6c20 276d 6163 726f 290a 2340 3533 nil 'macro).#@53 │ │ │ +000058f0: 3320 286c 6574 6620 2828 504c 4143 4520 3 (letf ((PLACE │ │ │ +00005900: 5641 4c55 4529 202e 2e2e 2920 424f 4459 VALUE) ...) BODY │ │ │ +00005910: 2e2e 2e29 3a20 7465 6d70 6f72 6172 696c ...): temporaril │ │ │ +00005920: 7920 6269 6e64 2074 6f20 504c 4143 4573 y bind to PLACEs │ │ │ +00005930: 2e0a 5468 6973 2069 7320 7468 6520 616e ..This is the an │ │ │ +00005940: 616c 6f67 7565 206f 6620 606c 6574 272c alogue of `let', │ │ │ +00005950: 2062 7574 2077 6974 6820 6765 6e65 7261 but with genera │ │ │ +00005960: 6c69 7a65 6420 7661 7269 6162 6c65 7320 lized variables │ │ │ +00005970: 2869 6e20 7468 650a 7365 6e73 6520 6f66 (in the.sense of │ │ │ +00005980: 2060 7365 7466 2729 2066 6f72 2074 6865 `setf') for the │ │ │ +00005990: 2050 4c41 4345 732e 2020 4561 6368 2050 PLACEs. Each P │ │ │ +000059a0: 4c41 4345 2069 7320 7365 7420 746f 2074 LACE is set to t │ │ │ +000059b0: 6865 2063 6f72 7265 7370 6f6e 6469 6e67 he corresponding │ │ │ +000059c0: 0a56 414c 5545 2c20 7468 656e 2074 6865 .VALUE, then the │ │ │ +000059d0: 2042 4f44 5920 666f 726d 7320 6172 6520 BODY forms are │ │ │ +000059e0: 6578 6563 7574 6564 2e20 204f 6e20 6578 executed. On ex │ │ │ +000059f0: 6974 2c20 6569 7468 6572 206e 6f72 6d61 it, either norma │ │ │ +00005a00: 6c6c 7920 6f72 0a62 6563 6175 7365 206f lly or.because o │ │ │ +00005a10: 6620 6120 6074 6872 6f77 2720 6f72 2065 f a `throw' or e │ │ │ +00005a20: 7272 6f72 2c20 7468 6520 504c 4143 4573 rror, the PLACEs │ │ │ +00005a30: 2061 7265 2073 6574 2062 6163 6b20 746f are set back to │ │ │ +00005a40: 2074 6865 6972 206f 7269 6769 6e61 6c0a their original. │ │ │ +00005a50: 7661 6c75 6573 2e20 204e 6f74 6520 7468 values. Note th │ │ │ +00005a60: 6174 2074 6869 7320 6d61 6372 6f20 6973 at this macro is │ │ │ +00005a70: 202a 6e6f 742a 2061 7661 696c 6162 6c65 *not* available │ │ │ +00005a80: 2069 6e20 436f 6d6d 6f6e 204c 6973 702e in Common Lisp. │ │ │ +00005a90: 0a41 7320 6120 7370 6563 6961 6c20 6361 .As a special ca │ │ │ +00005aa0: 7365 2c20 6966 2060 2850 4c41 4345 2927 se, if `(PLACE)' │ │ │ +00005ab0: 2069 7320 7573 6564 2069 6e73 7465 6164 is used instead │ │ │ +00005ac0: 206f 6620 6028 504c 4143 4520 5641 4c55 of `(PLACE VALU │ │ │ +00005ad0: 4529 272c 0a74 6865 2050 4c41 4345 2069 E)',.the PLACE i │ │ │ +00005ae0: 7320 6e6f 7420 6d6f 6469 6669 6564 2062 s not modified b │ │ │ +00005af0: 6566 6f72 6520 6578 6563 7574 696e 6720 efore executing │ │ │ +00005b00: 424f 4459 2e1f 0a28 6175 746f 6c6f 6164 BODY...(autoload │ │ │ +00005b10: 2027 6c65 7466 2022 636c 2d6d 6163 7322 'letf "cl-macs" │ │ │ +00005b20: 2027 2823 2420 2e20 3232 3737 3029 206e '(#$ . 22770) n │ │ │ +00005b30: 696c 2027 6d61 6372 6f29 0a23 4035 3335 il 'macro).#@535 │ │ │ +00005b40: 2028 6c65 7466 2a20 2828 504c 4143 4520 (letf* ((PLACE │ │ │ +00005b50: 5641 4c55 4529 202e 2e2e 2920 424f 4459 VALUE) ...) BODY │ │ │ +00005b60: 2e2e 2e29 3a20 7465 6d70 6f72 6172 696c ...): temporaril │ │ │ +00005b70: 7920 6269 6e64 2074 6f20 504c 4143 4573 y bind to PLACEs │ │ │ +00005b80: 2e0a 5468 6973 2069 7320 7468 6520 616e ..This is the an │ │ │ +00005b90: 616c 6f67 7565 206f 6620 606c 6574 2a27 alogue of `let*' │ │ │ +00005ba0: 2c20 6275 7420 7769 7468 2067 656e 6572 , but with gener │ │ │ +00005bb0: 616c 697a 6564 2076 6172 6961 626c 6573 alized variables │ │ │ +00005bc0: 2028 696e 2074 6865 0a73 656e 7365 206f (in the.sense o │ │ │ +00005bd0: 6620 6073 6574 6627 2920 666f 7220 7468 f `setf') for th │ │ │ +00005be0: 6520 504c 4143 4573 2e20 2045 6163 6820 e PLACEs. Each │ │ │ +00005bf0: 504c 4143 4520 6973 2073 6574 2074 6f20 PLACE is set to │ │ │ +00005c00: 7468 6520 636f 7272 6573 706f 6e64 696e the correspondin │ │ │ +00005c10: 670a 5641 4c55 452c 2074 6865 6e20 7468 g.VALUE, then th │ │ │ +00005c20: 6520 424f 4459 2066 6f72 6d73 2061 7265 e BODY forms are │ │ │ +00005c30: 2065 7865 6375 7465 642e 2020 4f6e 2065 executed. On e │ │ │ +00005c40: 7869 742c 2065 6974 6865 7220 6e6f 726d xit, either norm │ │ │ +00005c50: 616c 6c79 206f 720a 6265 6361 7573 6520 ally or.because │ │ │ +00005c60: 6f66 2061 2060 7468 726f 7727 206f 7220 of a `throw' or │ │ │ +00005c70: 6572 726f 722c 2074 6865 2050 4c41 4345 error, the PLACE │ │ │ +00005c80: 7320 6172 6520 7365 7420 6261 636b 2074 s are set back t │ │ │ +00005c90: 6f20 7468 6569 7220 6f72 6967 696e 616c o their original │ │ │ +00005ca0: 0a76 616c 7565 732e 2020 4e6f 7465 2074 .values. Note t │ │ │ +00005cb0: 6861 7420 7468 6973 206d 6163 726f 2069 hat this macro i │ │ │ +00005cc0: 7320 2a6e 6f74 2a20 6176 6169 6c61 626c s *not* availabl │ │ │ +00005cd0: 6520 696e 2043 6f6d 6d6f 6e20 4c69 7370 e in Common Lisp │ │ │ +00005ce0: 2e0a 4173 2061 2073 7065 6369 616c 2063 ..As a special c │ │ │ +00005cf0: 6173 652c 2069 6620 6028 504c 4143 4529 ase, if `(PLACE) │ │ │ +00005d00: 2720 6973 2075 7365 6420 696e 7374 6561 ' is used instea │ │ │ +00005d10: 6420 6f66 2060 2850 4c41 4345 2056 414c d of `(PLACE VAL │ │ │ +00005d20: 5545 2927 2c0a 7468 6520 504c 4143 4520 UE)',.the PLACE │ │ │ +00005d30: 6973 206e 6f74 206d 6f64 6966 6965 6420 is not modified │ │ │ +00005d40: 6265 666f 7265 2065 7865 6375 7469 6e67 before executing │ │ │ +00005d50: 2042 4f44 592e 1f0a 2861 7574 6f6c 6f61 BODY...(autoloa │ │ │ +00005d60: 6420 276c 6574 662a 2022 636c 2d6d 6163 d 'letf* "cl-mac │ │ │ +00005d70: 7322 2027 2823 2420 2e20 3233 3336 3129 s" '(#$ . 23361) │ │ │ +00005d80: 206e 696c 2027 6d61 6372 6f29 0a23 4031 nil 'macro).#@1 │ │ │ +00005d90: 3737 2028 6361 6c6c 6620 4655 4e43 2050 77 (callf FUNC P │ │ │ +00005da0: 4c41 4345 2041 5247 532e 2e2e 293a 2073 LACE ARGS...): s │ │ │ +00005db0: 6574 2050 4c41 4345 2074 6f20 2846 554e et PLACE to (FUN │ │ │ +00005dc0: 4320 504c 4143 4520 4152 4753 2e2e 2e29 C PLACE ARGS...) │ │ │ +00005dd0: 2e0a 4655 4e43 2073 686f 756c 6420 6265 ..FUNC should be │ │ │ +00005de0: 2061 6e20 756e 7175 6f74 6564 2066 756e an unquoted fun │ │ │ +00005df0: 6374 696f 6e20 6e61 6d65 2e20 2050 4c41 ction name. PLA │ │ │ +00005e00: 4345 206d 6179 2062 6520 6120 7379 6d62 CE may be a symb │ │ │ +00005e10: 6f6c 2c0a 6f72 2061 6e79 2067 656e 6572 ol,.or any gener │ │ │ +00005e20: 616c 697a 6564 2076 6172 6961 626c 6520 alized variable │ │ │ +00005e30: 616c 6c6f 7765 6420 6279 2060 7365 7466 allowed by `setf │ │ │ +00005e40: 272e 1f0a 2861 7574 6f6c 6f61 6420 2763 '...(autoload 'c │ │ │ +00005e50: 616c 6c66 2022 636c 2d6d 6163 7322 2027 allf "cl-macs" ' │ │ │ +00005e60: 2823 2420 2e20 3233 3935 3529 206e 696c (#$ . 23955) nil │ │ │ +00005e70: 2027 6d61 6372 6f29 0a23 4031 3436 2028 'macro).#@146 ( │ │ │ +00005e80: 6361 6c6c 6632 2046 554e 4320 4152 4731 callf2 FUNC ARG1 │ │ │ +00005e90: 2050 4c41 4345 2041 5247 532e 2e2e 293a PLACE ARGS...): │ │ │ +00005ea0: 2073 6574 2050 4c41 4345 2074 6f20 2846 set PLACE to (F │ │ │ +00005eb0: 554e 4320 4152 4731 2050 4c41 4345 2041 UNC ARG1 PLACE A │ │ │ +00005ec0: 5247 532e 2e2e 292e 0a4c 696b 6520 6063 RGS...)..Like `c │ │ │ +00005ed0: 616c 6c66 272c 2062 7574 2050 4c41 4345 allf', but PLACE │ │ │ +00005ee0: 2069 7320 7468 6520 7365 636f 6e64 2061 is the second a │ │ │ +00005ef0: 7267 756d 656e 7420 6f66 2046 554e 432c rgument of FUNC, │ │ │ +00005f00: 206e 6f74 2074 6865 2066 6972 7374 2e1f not the first.. │ │ │ +00005f10: 0a28 6175 746f 6c6f 6164 2027 6361 6c6c .(autoload 'call │ │ │ +00005f20: 6632 2022 636c 2d6d 6163 7322 2027 2823 f2 "cl-macs" '(# │ │ │ +00005f30: 2420 2e20 3234 3139 3129 206e 696c 2027 $ . 24191) nil ' │ │ │ +00005f40: 6d61 6372 6f29 0a23 4032 3234 2028 6465 macro).#@224 (de │ │ │ +00005f50: 6669 6e65 2d6d 6f64 6966 792d 6d61 6372 fine-modify-macr │ │ │ +00005f60: 6f20 4e41 4d45 2041 5247 4c49 5354 2046 o NAME ARGLIST F │ │ │ +00005f70: 554e 4329 3a20 6465 6669 6e65 2061 2060 UNC): define a ` │ │ │ +00005f80: 7365 7466 272d 6c69 6b65 206d 6f64 6966 setf'-like modif │ │ │ +00005f90: 7920 6d61 6372 6f2e 0a49 6620 4e41 4d45 y macro..If NAME │ │ │ +00005fa0: 2069 7320 6361 6c6c 6564 2c20 6974 2063 is called, it c │ │ │ +00005fb0: 6f6d 6269 6e65 7320 6974 7320 504c 4143 ombines its PLAC │ │ │ +00005fc0: 4520 6172 6775 6d65 6e74 2077 6974 6820 E argument with │ │ │ +00005fd0: 7468 6520 6f74 6865 7220 6172 6775 6d65 the other argume │ │ │ +00005fe0: 6e74 730a 6672 6f6d 2041 5247 4c49 5354 nts.from ARGLIST │ │ │ +00005ff0: 2075 7369 6e67 2046 554e 433a 2028 6465 using FUNC: (de │ │ │ +00006000: 6669 6e65 2d6d 6f64 6966 792d 6d61 6372 fine-modify-macr │ │ │ +00006010: 6f20 696e 6366 2028 266f 7074 696f 6e61 o incf (&optiona │ │ │ +00006020: 6c20 286e 2031 2929 202b 291f 0a28 6175 l (n 1)) +)..(au │ │ │ +00006030: 746f 6c6f 6164 2027 6465 6669 6e65 2d6d toload 'define-m │ │ │ +00006040: 6f64 6966 792d 6d61 6372 6f20 2263 6c2d odify-macro "cl- │ │ │ +00006050: 6d61 6373 2220 2728 2324 202e 2032 3433 macs" '(#$ . 243 │ │ │ +00006060: 3937 2920 6e69 6c20 276d 6163 726f 290a 97) nil 'macro). │ │ │ +00006070: 2340 3238 3920 2864 6566 7374 7275 6374 #@289 (defstruct │ │ │ +00006080: 2028 4e41 4d45 204f 5054 494f 4e53 2e2e (NAME OPTIONS.. │ │ │ +00006090: 2e29 2028 534c 4f54 2053 4c4f 542d 4f50 .) (SLOT SLOT-OP │ │ │ +000060a0: 5453 2e2e 2e29 2e2e 2e29 3a20 6465 6669 TS...)...): defi │ │ │ +000060b0: 6e65 2061 2073 7472 7563 7420 7479 7065 ne a struct type │ │ │ +000060c0: 2e0a 5468 6973 206d 6163 726f 2064 6566 ..This macro def │ │ │ +000060d0: 696e 6573 2061 206e 6577 204c 6973 7020 ines a new Lisp │ │ │ +000060e0: 6461 7461 2074 7970 6520 6361 6c6c 6564 data type called │ │ │ +000060f0: 204e 414d 452c 2077 6869 6368 2063 6f6e NAME, which con │ │ │ +00006100: 7461 696e 7320 6461 7461 0a73 746f 7265 tains data.store │ │ │ +00006110: 6420 696e 2053 4c4f 5473 2e20 2054 6869 d in SLOTs. Thi │ │ │ +00006120: 7320 6465 6669 6e65 7320 6120 606d 616b s defines a `mak │ │ │ +00006130: 652d 4e41 4d45 2720 636f 6e73 7472 7563 e-NAME' construc │ │ │ +00006140: 746f 722c 2061 2060 636f 7079 2d4e 414d tor, a `copy-NAM │ │ │ +00006150: 4527 0a63 6f70 6965 722c 2061 2060 4e41 E'.copier, a `NA │ │ │ +00006160: 4d45 2d70 2720 7072 6564 6963 6174 652c ME-p' predicate, │ │ │ +00006170: 2061 6e64 2073 6574 662d 6162 6c65 2060 and setf-able ` │ │ │ +00006180: 4e41 4d45 2d53 4c4f 5427 2061 6363 6573 NAME-SLOT' acces │ │ │ +00006190: 736f 7273 2e1f 0a28 6175 746f 6c6f 6164 sors...(autoload │ │ │ +000061a0: 2027 6465 6673 7472 7563 7420 2263 6c2d 'defstruct "cl- │ │ │ +000061b0: 6d61 6373 2220 2728 2324 202e 2032 3436 macs" '(#$ . 246 │ │ │ +000061c0: 3934 2920 6e69 6c20 276d 6163 726f 290a 94) nil 'macro). │ │ │ +000061d0: 2862 7974 652d 636f 6465 2022 c0c1 c2c3 (byte-code ".... │ │ │ +000061e0: 8989 2587 2220 5b61 7574 6f6c 6f61 6420 ..%." [autoload │ │ │ +000061f0: 636c 2d73 7472 7563 742d 7365 7466 2d65 cl-struct-setf-e │ │ │ +00006200: 7870 616e 6465 7220 2263 6c2d 6d61 6373 xpander "cl-macs │ │ │ +00006210: 2220 6e69 6c5d 2036 290a 2340 3133 3020 " nil] 6).#@130 │ │ │ +00006220: 2864 6566 7479 7065 204e 414d 4520 4152 (deftype NAME AR │ │ │ +00006230: 474c 4953 5420 424f 4459 2e2e 2e29 3a20 GLIST BODY...): │ │ │ +00006240: 6465 6669 6e65 204e 414d 4520 6173 2061 define NAME as a │ │ │ +00006250: 206e 6577 2064 6174 6120 7479 7065 2e0a new data type.. │ │ │ +00006260: 5468 6520 7479 7065 206e 616d 6520 6361 The type name ca │ │ │ +00006270: 6e20 7468 656e 2062 6520 7573 6564 2069 n then be used i │ │ │ +00006280: 6e20 6074 7970 6563 6173 6527 2c20 6063 n `typecase', `c │ │ │ +00006290: 6865 636b 2d74 7970 6527 2c20 6574 632e heck-type', etc. │ │ │ +000062a0: 1f0a 2861 7574 6f6c 6f61 6420 2764 6566 ..(autoload 'def │ │ │ +000062b0: 7479 7065 2022 636c 2d6d 6163 7322 2027 type "cl-macs" ' │ │ │ +000062c0: 2823 2420 2e20 3235 3132 3029 206e 696c (#$ . 25120) nil │ │ │ +000062d0: 2027 6d61 6372 6f29 0a23 4038 3020 4368 'macro).#@80 Ch │ │ │ +000062e0: 6563 6b20 7468 6174 204f 424a 4543 5420 eck that OBJECT │ │ │ +000062f0: 6973 206f 6620 7479 7065 2054 5950 452e is of type TYPE. │ │ │ +00006300: 0a54 5950 4520 6973 2061 2043 6f6d 6d6f .TYPE is a Commo │ │ │ +00006310: 6e20 4c69 7370 2d73 7479 6c65 2074 7970 n Lisp-style typ │ │ │ +00006320: 6520 7370 6563 6966 6965 722e 1f0a 2861 e specifier...(a │ │ │ +00006330: 7574 6f6c 6f61 6420 2774 7970 6570 2022 utoload 'typep " │ │ │ +00006340: 636c 2d6d 6163 7322 2027 2823 2420 2e20 cl-macs" '(#$ . │ │ │ +00006350: 3235 3331 3029 206e 696c 206e 696c 290a 25310) nil nil). │ │ │ +00006360: 2340 3132 3620 5665 7269 6679 2074 6861 #@126 Verify tha │ │ │ +00006370: 7420 504c 4143 4520 6973 206f 6620 7479 t PLACE is of ty │ │ │ +00006380: 7065 2054 5950 453b 2073 6967 6e61 6c20 pe TYPE; signal │ │ │ +00006390: 6120 636f 6e74 696e 7561 626c 6520 6572 a continuable er │ │ │ +000063a0: 726f 7220 6966 206e 6f74 2e0a 5354 5249 ror if not..STRI │ │ │ +000063b0: 4e47 2069 7320 616e 206f 7074 696f 6e61 NG is an optiona │ │ │ +000063c0: 6c20 6465 7363 7269 7074 696f 6e20 6f66 l description of │ │ │ +000063d0: 2074 6865 2064 6573 6972 6564 2074 7970 the desired typ │ │ │ +000063e0: 652e 1f0a 2861 7574 6f6c 6f61 6420 2763 e...(autoload 'c │ │ │ +000063f0: 6865 636b 2d74 7970 6520 2263 6c2d 6d61 heck-type "cl-ma │ │ │ +00006400: 6373 2220 2728 2324 202e 2032 3534 3436 cs" '(#$ . 25446 │ │ │ +00006410: 2920 6e69 6c20 276d 6163 726f 290a 2340 ) nil 'macro).#@ │ │ │ +00006420: 3331 3720 5665 7269 6679 2074 6861 7420 317 Verify that │ │ │ +00006430: 464f 524d 2072 6574 7572 6e73 206e 6f6e FORM returns non │ │ │ +00006440: 2d6e 696c 3b20 7369 676e 616c 2061 6e20 -nil; signal an │ │ │ +00006450: 6572 726f 7220 6966 206e 6f74 2e0a 5365 error if not..Se │ │ │ +00006460: 636f 6e64 2061 7267 2053 484f 572d 4152 cond arg SHOW-AR │ │ │ +00006470: 4753 206d 6561 6e73 2074 6f20 696e 636c GS means to incl │ │ │ +00006480: 7564 6520 6172 6775 6d65 6e74 7320 6f66 ude arguments of │ │ │ +00006490: 2046 4f52 4d20 696e 206d 6573 7361 6765 FORM in message │ │ │ +000064a0: 2e0a 4f74 6865 7220 6172 6773 2053 5452 ..Other args STR │ │ │ +000064b0: 494e 4720 616e 6420 4152 4753 2e2e 2e20 ING and ARGS... │ │ │ +000064c0: 6172 6520 6172 6775 6d65 6e74 7320 746f are arguments to │ │ │ +000064d0: 2062 6520 7061 7373 6564 2074 6f20 6065 be passed to `e │ │ │ +000064e0: 7272 6f72 272e 0a54 6865 7920 6172 6520 rror'..They are │ │ │ +000064f0: 6e6f 7420 6576 616c 7561 7465 6420 756e not evaluated un │ │ │ +00006500: 6c65 7373 2074 6865 2061 7373 6572 7469 less the asserti │ │ │ +00006510: 6f6e 2066 6169 6c73 2e20 2049 6620 5354 on fails. If ST │ │ │ +00006520: 5249 4e47 2069 730a 6f6d 6974 7465 642c RING is.omitted, │ │ │ +00006530: 2061 2064 6566 6175 6c74 206d 6573 7361 a default messa │ │ │ +00006540: 6765 206c 6973 7469 6e67 2046 4f52 4d20 ge listing FORM │ │ │ +00006550: 6974 7365 6c66 2069 7320 7573 6564 2e1f itself is used.. │ │ │ +00006560: 0a28 6175 746f 6c6f 6164 2027 6173 7365 .(autoload 'asse │ │ │ +00006570: 7274 2022 636c 2d6d 6163 7322 2027 2823 rt "cl-macs" '(# │ │ │ +00006580: 2420 2e20 3235 3633 3629 206e 696c 2027 $ . 25636) nil ' │ │ │ +00006590: 6d61 6372 6f29 0a23 4038 3720 4578 6563 macro).#@87 Exec │ │ │ +000065a0: 7574 6520 464f 524d 533b 2069 6620 616e ute FORMS; if an │ │ │ +000065b0: 2065 7272 6f72 206f 6363 7572 732c 2072 error occurs, r │ │ │ +000065c0: 6574 7572 6e20 6e69 6c2e 0a4f 7468 6572 eturn nil..Other │ │ │ +000065d0: 7769 7365 2c20 7265 7475 726e 2072 6573 wise, return res │ │ │ +000065e0: 756c 7420 6f66 206c 6173 7420 464f 524d ult of last FORM │ │ │ +000065f0: 2e1f 0a28 6175 746f 6c6f 6164 2027 6967 ...(autoload 'ig │ │ │ +00006600: 6e6f 7265 2d65 7272 6f72 7320 2263 6c2d nore-errors "cl- │ │ │ +00006610: 6d61 6373 2220 2728 2324 202e 2032 3630 macs" '(#$ . 260 │ │ │ +00006620: 3132 2920 6e69 6c20 276d 6163 726f 290a 12) nil 'macro). │ │ │ +00006630: 2340 3130 3820 4578 6563 7574 6520 464f #@108 Execute FO │ │ │ +00006640: 524d 533b 2069 6620 616e 2065 7272 6f72 RMS; if an error │ │ │ +00006650: 206f 6620 7479 7065 2060 6669 6c65 2d65 of type `file-e │ │ │ +00006660: 7272 6f72 2720 6f63 6375 7273 2c20 7265 rror' occurs, re │ │ │ +00006670: 7475 726e 206e 696c 2e0a 4f74 6865 7277 turn nil..Otherw │ │ │ +00006680: 6973 652c 2072 6574 7572 6e20 7265 7375 ise, return resu │ │ │ +00006690: 6c74 206f 6620 6c61 7374 2046 4f52 4d2e lt of last FORM. │ │ │ +000066a0: 1f0a 2861 7574 6f6c 6f61 6420 2769 676e ..(autoload 'ign │ │ │ +000066b0: 6f72 652d 6669 6c65 2d65 7272 6f72 7320 ore-file-errors │ │ │ +000066c0: 2263 6c2d 6d61 6373 2220 2728 2324 202e "cl-macs" '(#$ . │ │ │ +000066d0: 2032 3631 3636 2920 6e69 6c20 276d 6163 26166) nil 'mac │ │ │ +000066e0: 726f 290a 2340 3638 3420 2864 6566 696e ro).#@684 (defin │ │ │ +000066f0: 652d 636f 6d70 696c 6572 2d6d 6163 726f e-compiler-macro │ │ │ +00006700: 2046 554e 4320 4152 474c 4953 5420 424f FUNC ARGLIST BO │ │ │ +00006710: 4459 2e2e 2e29 3a20 4465 6669 6e65 2061 DY...): Define a │ │ │ +00006720: 2063 6f6d 7069 6c65 722d 6f6e 6c79 206d compiler-only m │ │ │ +00006730: 6163 726f 2e0a 5468 6973 2069 7320 6c69 acro..This is li │ │ │ +00006740: 6b65 2060 6465 666d 6163 726f 272c 2062 ke `defmacro', b │ │ │ +00006750: 7574 206d 6163 726f 2065 7870 616e 7369 ut macro expansi │ │ │ +00006760: 6f6e 206f 6363 7572 7320 6f6e 6c79 2069 on occurs only i │ │ │ +00006770: 6620 7468 6520 6361 6c6c 2074 6f0a 4655 f the call to.FU │ │ │ +00006780: 4e43 2069 7320 636f 6d70 696c 6564 2028 NC is compiled ( │ │ │ +00006790: 692e 652e 2c20 6e6f 7420 696e 7465 7270 i.e., not interp │ │ │ +000067a0: 7265 7465 6429 2e20 2043 6f6d 7069 6c65 reted). Compile │ │ │ +000067b0: 7220 6d61 6372 6f73 2073 686f 756c 6420 r macros should │ │ │ +000067c0: 6265 2075 7365 640a 666f 7220 6f70 7469 be used.for opti │ │ │ +000067d0: 6d69 7a69 6e67 2074 6865 2077 6179 2063 mizing the way c │ │ │ +000067e0: 616c 6c73 2074 6f20 4655 4e43 2061 7265 alls to FUNC are │ │ │ +000067f0: 2063 6f6d 7069 6c65 643b 2074 6865 2066 compiled; the f │ │ │ +00006800: 6f72 6d20 7265 7475 726e 6564 2062 790a orm returned by. │ │ │ +00006810: 424f 4459 2073 686f 756c 6420 646f 2074 BODY should do t │ │ │ +00006820: 6865 2073 616d 6520 7468 696e 6720 6173 he same thing as │ │ │ +00006830: 2061 2063 616c 6c20 746f 2074 6865 206e a call to the n │ │ │ +00006840: 6f72 6d61 6c20 6675 6e63 7469 6f6e 2063 ormal function c │ │ │ +00006850: 616c 6c65 640a 4655 4e43 2c20 7468 6f75 alled.FUNC, thou │ │ │ +00006860: 6768 2070 6f73 7369 626c 7920 6d6f 7265 gh possibly more │ │ │ +00006870: 2065 6666 6963 6965 6e74 6c79 2e20 204e efficiently. N │ │ │ +00006880: 6f74 6520 7468 6174 2c20 6c69 6b65 2072 ote that, like r │ │ │ +00006890: 6567 756c 6172 206d 6163 726f 732c 0a63 egular macros,.c │ │ │ +000068a0: 6f6d 7069 6c65 7220 6d61 6372 6f73 2061 ompiler macros a │ │ │ +000068b0: 7265 2065 7870 616e 6465 6420 7265 7065 re expanded repe │ │ │ +000068c0: 6174 6564 6c79 2075 6e74 696c 206e 6f20 atedly until no │ │ │ +000068d0: 6675 7274 6865 7220 6578 7061 6e73 696f further expansio │ │ │ +000068e0: 6e73 2061 7265 0a70 6f73 7369 626c 652e ns are.possible. │ │ │ +000068f0: 2020 556e 6c69 6b65 2072 6567 756c 6172 Unlike regular │ │ │ +00006900: 206d 6163 726f 732c 2042 4f44 5920 6361 macros, BODY ca │ │ │ +00006910: 6e20 6465 6369 6465 2074 6f20 2270 756e n decide to "pun │ │ │ +00006920: 7422 2061 6e64 206c 6561 7665 2074 6865 t" and leave the │ │ │ +00006930: 0a6f 7269 6769 6e61 6c20 6675 6e63 7469 .original functi │ │ │ +00006940: 6f6e 2063 616c 6c20 616c 6f6e 6520 6279 on call alone by │ │ │ +00006950: 2064 6563 6c61 7269 6e67 2061 6e20 696e declaring an in │ │ │ +00006960: 6974 6961 6c20 6026 7768 6f6c 6520 666f itial `&whole fo │ │ │ +00006970: 6f27 2070 6172 616d 6574 6572 0a61 6e64 o' parameter.and │ │ │ +00006980: 2074 6865 6e20 7265 7475 726e 696e 6720 then returning │ │ │ +00006990: 666f 6f2e 1f0a 2861 7574 6f6c 6f61 6420 foo...(autoload │ │ │ +000069a0: 2764 6566 696e 652d 636f 6d70 696c 6572 'define-compiler │ │ │ +000069b0: 2d6d 6163 726f 2022 636c 2d6d 6163 7322 -macro "cl-macs" │ │ │ +000069c0: 2027 2823 2420 2e20 3236 3334 3629 206e '(#$ . 26346) n │ │ │ +000069d0: 696c 2027 6d61 6372 6f29 0a28 6279 7465 il 'macro).(byte │ │ │ +000069e0: 2d63 6f64 6520 22c0 c1c2 c389 8925 8722 -code "......%." │ │ │ +000069f0: 205b 6175 746f 6c6f 6164 2063 6f6d 7069 [autoload compi │ │ │ +00006a00: 6c65 722d 6d61 6372 6f65 7870 616e 6420 ler-macroexpand │ │ │ +00006a10: 2263 6c2d 6d61 6373 2220 6e69 6c5d 2036 "cl-macs" nil] 6 │ │ │ +00006a20: 290a 2340 3635 2052 6574 7572 6e20 6861 ).#@65 Return ha │ │ │ +00006a30: 7368 2074 6162 6c65 206f 6620 636f 6e66 sh table of conf │ │ │ +00006a40: 6967 7572 6174 696f 6e20 7061 7261 6d65 iguration parame │ │ │ +00006a50: 7465 7273 2061 6e64 2074 6865 6972 2076 ters and their v │ │ │ +00006a60: 616c 7565 732e 1f0a 2861 7574 6f6c 6f61 alues...(autoloa │ │ │ +00006a70: 6420 2763 6f6e 6669 672d 7661 6c75 652d d 'config-value- │ │ │ +00006a80: 6861 7368 2d74 6162 6c65 2022 636f 6e66 hash-table "conf │ │ │ +00006a90: 6967 2220 2728 2324 202e 2032 3731 3735 ig" '(#$ . 27175 │ │ │ +00006aa0: 2920 6e69 6c20 6e69 6c29 0a23 4036 3420 ) nil nil).#@64 │ │ │ +00006ab0: 5265 7475 726e 2074 6865 2076 616c 7565 Return the value │ │ │ +00006ac0: 206f 6620 7468 6520 636f 6e66 6967 7572 of the configur │ │ │ +00006ad0: 6174 696f 6e20 7061 7261 6d65 7465 7220 ation parameter │ │ │ +00006ae0: 434f 4e46 4947 5f53 594d 424f 4c2e 1f0a CONFIG_SYMBOL... │ │ │ +00006af0: 2861 7574 6f6c 6f61 6420 2763 6f6e 6669 (autoload 'confi │ │ │ +00006b00: 672d 7661 6c75 6520 2263 6f6e 6669 6722 g-value "config" │ │ │ +00006b10: 2027 2823 2420 2e20 3237 3331 3229 206e '(#$ . 27312) n │ │ │ +00006b20: 696c 206e 696c 290a 2340 3332 3220 4578 il nil).#@322 Ex │ │ │ +00006b30: 7472 6163 7420 6375 7374 6f6d 2064 6570 tract custom dep │ │ │ +00006b40: 656e 6465 6e63 6965 7320 6672 6f6d 202e endencies from . │ │ │ +00006b50: 656c 2066 696c 6573 2069 6e20 5355 4244 el files in SUBD │ │ │ +00006b60: 4952 532e 0a53 5542 4449 5253 2069 7320 IRS..SUBDIRS is │ │ │ +00006b70: 6120 6c69 7374 206f 6620 6469 7265 6374 a list of direct │ │ │ +00006b80: 6f72 6965 732e 2020 4966 2069 7420 6973 ories. If it is │ │ │ +00006b90: 206e 696c 2c20 7468 6520 636f 6d6d 616e nil, the comman │ │ │ +00006ba0: 642d 6c69 6e65 0a61 7267 756d 656e 7473 d-line.arguments │ │ │ +00006bb0: 2061 7265 2075 7365 642e 2020 4966 2069 are used. If i │ │ │ +00006bc0: 7420 6973 2061 2073 7472 696e 672c 206f t is a string, o │ │ │ +00006bd0: 6e6c 7920 7468 6174 2064 6972 6563 746f nly that directo │ │ │ +00006be0: 7279 2069 730a 7072 6f63 6573 7365 642e ry is.processed. │ │ │ +00006bf0: 2020 5468 6973 2066 756e 6374 696f 6e20 This function │ │ │ +00006c00: 6973 2065 7370 6563 6961 6c6c 7920 7573 is especially us │ │ │ +00006c10: 6566 756c 2069 6e20 6261 7463 6820 6d6f eful in batch mo │ │ │ +00006c20: 6465 2e0a 0a42 6174 6368 2075 7361 6765 de...Batch usage │ │ │ +00006c30: 3a20 7865 6d61 6373 202d 6261 7463 6820 : xemacs -batch │ │ │ +00006c40: 2d6c 2063 7573 2d64 6570 2e65 6c20 2d66 -l cus-dep.el -f │ │ │ +00006c50: 2043 7573 746f 6d2d 6d61 6b65 2d64 6570 Custom-make-dep │ │ │ +00006c60: 656e 6465 6e63 6965 7320 4449 5253 1f0a endencies DIRS.. │ │ │ +00006c70: 2861 7574 6f6c 6f61 6420 2743 7573 746f (autoload 'Custo │ │ │ +00006c80: 6d2d 6d61 6b65 2d64 6570 656e 6465 6e63 m-make-dependenc │ │ │ +00006c90: 6965 7320 2263 7573 2d64 6570 2220 2728 ies "cus-dep" '( │ │ │ +00006ca0: 2324 202e 2032 3734 3338 2920 7420 6e69 #$ . 27438) t ni │ │ │ +00006cb0: 6c29 0a23 4034 3136 2053 6574 2056 4152 l).#@416 Set VAR │ │ │ +00006cc0: 4941 424c 4520 746f 2056 414c 5545 2e20 IABLE to VALUE. │ │ │ +00006cd0: 2056 414c 5545 2069 7320 6120 4c69 7370 VALUE is a Lisp │ │ │ +00006ce0: 206f 626a 6563 742e 0a0a 4966 2056 4152 object...If VAR │ │ │ +00006cf0: 4941 424c 4520 6861 7320 6120 6076 6172 IABLE has a `var │ │ │ +00006d00: 6961 626c 652d 696e 7465 7261 6374 6976 iable-interactiv │ │ │ +00006d10: 6527 2070 726f 7065 7274 792c 2074 6861 e' property, tha │ │ │ +00006d20: 7420 6973 2075 7365 6420 6173 2069 660a t is used as if. │ │ │ +00006d30: 6974 2077 6572 6520 7468 6520 6172 6720 it were the arg │ │ │ +00006d40: 746f 2060 696e 7465 7261 6374 6976 6527 to `interactive' │ │ │ +00006d50: 2028 7768 6963 6820 7365 6529 2074 6f20 (which see) to │ │ │ +00006d60: 696e 7465 7261 6374 6976 656c 7920 7265 interactively re │ │ │ +00006d70: 6164 2074 6865 2076 616c 7565 2e0a 0a49 ad the value...I │ │ │ +00006d80: 6620 5641 5249 4142 4c45 2068 6173 2061 f VARIABLE has a │ │ │ +00006d90: 2060 6375 7374 6f6d 2d74 7970 6527 2070 `custom-type' p │ │ │ +00006da0: 726f 7065 7274 792c 2069 7420 6d75 7374 roperty, it must │ │ │ +00006db0: 2062 6520 6120 7769 6467 6574 2061 6e64 be a widget and │ │ │ +00006dc0: 2074 6865 0a60 3a70 726f 6d70 742d 7661 the.`:prompt-va │ │ │ +00006dd0: 6c75 6527 2070 726f 7065 7274 7920 6f66 lue' property of │ │ │ +00006de0: 2074 6861 7420 7769 6467 6574 2077 696c that widget wil │ │ │ +00006df0: 6c20 6265 2075 7365 6420 666f 7220 7265 l be used for re │ │ │ +00006e00: 6164 696e 6720 7468 6520 7661 6c75 652e ading the value. │ │ │ +00006e10: 0a0a 4966 2067 6976 656e 2061 2070 7265 ..If given a pre │ │ │ +00006e20: 6669 7820 286f 7220 6120 434f 4d4d 454e fix (or a COMMEN │ │ │ +00006e30: 5420 6172 6775 6d65 6e74 292c 2061 6c73 T argument), als │ │ │ +00006e40: 6f20 7072 6f6d 7074 2066 6f72 2061 2063 o prompt for a c │ │ │ +00006e50: 6f6d 6d65 6e74 2e1f 0a28 6175 746f 6c6f omment...(autolo │ │ │ +00006e60: 6164 2027 6375 7374 6f6d 697a 652d 7365 ad 'customize-se │ │ │ +00006e70: 742d 7661 6c75 6520 2263 7573 2d65 6469 t-value "cus-edi │ │ │ +00006e80: 7422 2027 2823 2420 2e20 3237 3833 3329 t" '(#$ . 27833) │ │ │ +00006e90: 2074 206e 696c 290a 2340 3636 3020 5365 t nil).#@660 Se │ │ │ +00006ea0: 7420 7468 6520 6465 6661 756c 7420 666f t the default fo │ │ │ +00006eb0: 7220 5641 5249 4142 4c45 2074 6f20 5641 r VARIABLE to VA │ │ │ +00006ec0: 4c55 452e 2020 5641 4c55 4520 6973 2061 LUE. VALUE is a │ │ │ +00006ed0: 6e79 204c 6973 7020 6f62 6a65 6374 2e0a ny Lisp object.. │ │ │ +00006ee0: 0a49 6620 5641 5249 4142 4c45 2068 6173 .If VARIABLE has │ │ │ +00006ef0: 2061 2060 6375 7374 6f6d 2d73 6574 2720 a `custom-set' │ │ │ +00006f00: 7072 6f70 6572 7479 2c20 7468 6174 2069 property, that i │ │ │ +00006f10: 7320 7573 6564 2066 6f72 2073 6574 7469 s used for setti │ │ │ +00006f20: 6e67 0a56 4152 4941 424c 452c 206f 7468 ng.VARIABLE, oth │ │ │ +00006f30: 6572 7769 7365 2060 7365 742d 6465 6661 erwise `set-defa │ │ │ +00006f40: 756c 7427 2069 7320 7573 6564 2e0a 0a54 ult' is used...T │ │ │ +00006f50: 6865 2060 6375 7374 6f6d 697a 6564 2d76 he `customized-v │ │ │ +00006f60: 616c 7565 2720 7072 6f70 6572 7479 206f alue' property o │ │ │ +00006f70: 6620 7468 6520 5641 5249 4142 4c45 2077 f the VARIABLE w │ │ │ +00006f80: 696c 6c20 6265 2073 6574 2074 6f20 6120 ill be set to a │ │ │ +00006f90: 6c69 7374 0a77 6974 6820 6120 7175 6f74 list.with a quot │ │ │ +00006fa0: 6564 2056 414c 5545 2061 7320 6974 7320 ed VALUE as its │ │ │ +00006fb0: 736f 6c65 206c 6973 7420 6d65 6d62 6572 sole list member │ │ │ +00006fc0: 2e0a 0a49 6620 5641 5249 4142 4c45 2068 ...If VARIABLE h │ │ │ +00006fd0: 6173 2061 2060 7661 7269 6162 6c65 2d69 as a `variable-i │ │ │ +00006fe0: 6e74 6572 6163 7469 7665 2720 7072 6f70 nteractive' prop │ │ │ +00006ff0: 6572 7479 2c20 7468 6174 2069 7320 7573 erty, that is us │ │ │ +00007000: 6564 2061 7320 6966 0a69 7420 7765 7265 ed as if.it were │ │ │ +00007010: 2074 6865 2061 7267 2074 6f20 6069 6e74 the arg to `int │ │ │ +00007020: 6572 6163 7469 7665 2720 2877 6869 6368 eractive' (which │ │ │ +00007030: 2073 6565 2920 746f 2069 6e74 6572 6163 see) to interac │ │ │ +00007040: 7469 7665 6c79 2072 6561 6420 7468 6520 tively read the │ │ │ +00007050: 7661 6c75 652e 0a0a 4966 2056 4152 4941 value...If VARIA │ │ │ +00007060: 424c 4520 6861 7320 6120 6063 7573 746f BLE has a `custo │ │ │ +00007070: 6d2d 7479 7065 2720 7072 6f70 6572 7479 m-type' property │ │ │ +00007080: 2c20 6974 206d 7573 7420 6265 2061 2077 , it must be a w │ │ │ +00007090: 6964 6765 7420 616e 6420 7468 650a 603a idget and the.`: │ │ │ +000070a0: 7072 6f6d 7074 2d76 616c 7565 2720 7072 prompt-value' pr │ │ │ +000070b0: 6f70 6572 7479 206f 6620 7468 6174 2077 operty of that w │ │ │ +000070c0: 6964 6765 7420 7769 6c6c 2062 6520 7573 idget will be us │ │ │ +000070d0: 6564 2066 6f72 2072 6561 6469 6e67 2074 ed for reading t │ │ │ +000070e0: 6865 2076 616c 7565 2e0a 0a49 6620 6769 he value...If gi │ │ │ +000070f0: 7665 6e20 6120 7072 6566 6978 2028 6f72 ven a prefix (or │ │ │ +00007100: 2061 2043 4f4d 4d45 4e54 2061 7267 756d a COMMENT argum │ │ │ +00007110: 656e 7429 2c20 616c 736f 2070 726f 6d70 ent), also promp │ │ │ +00007120: 7420 666f 7220 6120 636f 6d6d 656e 742e t for a comment. │ │ │ +00007130: 1f0a 2861 7574 6f6c 6f61 6420 2763 7573 ..(autoload 'cus │ │ │ +00007140: 746f 6d69 7a65 2d73 6574 2d76 6172 6961 tomize-set-varia │ │ │ +00007150: 626c 6520 2263 7573 2d65 6469 7422 2027 ble "cus-edit" ' │ │ │ +00007160: 2823 2420 2e20 3238 3331 3829 2074 206e (#$ . 28318) t n │ │ │ +00007170: 696c 290a 2340 3636 3520 5365 7420 7468 il).#@665 Set th │ │ │ +00007180: 6520 6465 6661 756c 7420 666f 7220 5641 e default for VA │ │ │ +00007190: 5249 4142 4c45 2074 6f20 5641 4c55 452c RIABLE to VALUE, │ │ │ +000071a0: 2061 6e64 2073 6176 6520 6974 2066 6f72 and save it for │ │ │ +000071b0: 2066 7574 7572 6520 7365 7373 696f 6e73 future sessions │ │ │ +000071c0: 2e0a 4966 2056 4152 4941 424c 4520 6861 ..If VARIABLE ha │ │ │ +000071d0: 7320 6120 6063 7573 746f 6d2d 7365 7427 s a `custom-set' │ │ │ +000071e0: 2070 726f 7065 7274 792c 2074 6861 7420 property, that │ │ │ +000071f0: 6973 2075 7365 6420 666f 7220 7365 7474 is used for sett │ │ │ +00007200: 696e 670a 5641 5249 4142 4c45 2c20 6f74 ing.VARIABLE, ot │ │ │ +00007210: 6865 7277 6973 6520 6073 6574 2d64 6566 herwise `set-def │ │ │ +00007220: 6175 6c74 2720 6973 2075 7365 642e 0a0a ault' is used... │ │ │ +00007230: 5468 6520 6063 7573 746f 6d69 7a65 642d The `customized- │ │ │ +00007240: 7661 6c75 6527 2070 726f 7065 7274 7920 value' property │ │ │ +00007250: 6f66 2074 6865 2056 4152 4941 424c 4520 of the VARIABLE │ │ │ +00007260: 7769 6c6c 2062 6520 7365 7420 746f 2061 will be set to a │ │ │ +00007270: 206c 6973 740a 7769 7468 2061 2071 756f list.with a quo │ │ │ +00007280: 7465 6420 5641 4c55 4520 6173 2069 7473 ted VALUE as its │ │ │ +00007290: 2073 6f6c 6520 6c69 7374 206d 656d 6265 sole list membe │ │ │ +000072a0: 722e 0a0a 4966 2056 4152 4941 424c 4520 r...If VARIABLE │ │ │ +000072b0: 6861 7320 6120 6076 6172 6961 626c 652d has a `variable- │ │ │ +000072c0: 696e 7465 7261 6374 6976 6527 2070 726f interactive' pro │ │ │ +000072d0: 7065 7274 792c 2074 6861 7420 6973 2075 perty, that is u │ │ │ +000072e0: 7365 6420 6173 2069 660a 6974 2077 6572 sed as if.it wer │ │ │ +000072f0: 6520 7468 6520 6172 6720 746f 2060 696e e the arg to `in │ │ │ +00007300: 7465 7261 6374 6976 6527 2028 7768 6963 teractive' (whic │ │ │ +00007310: 6820 7365 6529 2074 6f20 696e 7465 7261 h see) to intera │ │ │ +00007320: 6374 6976 656c 7920 7265 6164 2074 6865 ctively read the │ │ │ +00007330: 2076 616c 7565 2e0a 0a49 6620 5641 5249 value...If VARI │ │ │ +00007340: 4142 4c45 2068 6173 2061 2060 6375 7374 ABLE has a `cust │ │ │ +00007350: 6f6d 2d74 7970 6527 2070 726f 7065 7274 om-type' propert │ │ │ +00007360: 792c 2069 7420 6d75 7374 2062 6520 6120 y, it must be a │ │ │ +00007370: 7769 6467 6574 2061 6e64 2074 6865 0a60 widget and the.` │ │ │ +00007380: 3a70 726f 6d70 742d 7661 6c75 6527 2070 :prompt-value' p │ │ │ +00007390: 726f 7065 7274 7920 6f66 2074 6861 7420 roperty of that │ │ │ +000073a0: 7769 6467 6574 2077 696c 6c20 6265 2075 widget will be u │ │ │ +000073b0: 7365 6420 666f 7220 7265 6164 696e 6720 sed for reading │ │ │ +000073c0: 7468 6520 7661 6c75 652e 0a0a 4966 2067 the value...If g │ │ │ +000073d0: 6976 656e 2061 2070 7265 6669 7820 286f iven a prefix (o │ │ │ +000073e0: 7220 6120 434f 4d4d 454e 5420 6172 6775 r a COMMENT argu │ │ │ +000073f0: 6d65 6e74 292c 2061 6c73 6f20 7072 6f6d ment), also prom │ │ │ +00007400: 7074 2066 6f72 2061 2063 6f6d 6d65 6e74 pt for a comment │ │ │ +00007410: 2e1f 0a28 6175 746f 6c6f 6164 2027 6375 ...(autoload 'cu │ │ │ +00007420: 7374 6f6d 697a 652d 7361 7665 2d76 6172 stomize-save-var │ │ │ +00007430: 6961 626c 6520 2263 7573 2d65 6469 7422 iable "cus-edit" │ │ │ +00007440: 2027 2823 2420 2e20 3239 3035 3029 2074 '(#$ . 29050) t │ │ │ +00007450: 206e 696c 290a 2340 3134 3320 5365 6c65 nil).#@143 Sele │ │ │ +00007460: 6374 2061 2063 7573 746f 6d69 7a61 7469 ct a customizati │ │ │ +00007470: 6f6e 2062 7566 6665 7220 7768 6963 6820 on buffer which │ │ │ +00007480: 796f 7520 6361 6e20 7573 6520 746f 2073 you can use to s │ │ │ +00007490: 6574 2075 7365 7220 6f70 7469 6f6e 732e et user options. │ │ │ +000074a0: 0a55 7365 7220 6f70 7469 6f6e 7320 6172 .User options ar │ │ │ +000074b0: 6520 7374 7275 6374 7572 6564 2069 6e74 e structured int │ │ │ +000074c0: 6f20 2267 726f 7570 7322 2e0a 5468 6520 o "groups"..The │ │ │ +000074d0: 6465 6661 756c 7420 6772 6f75 7020 6973 default group is │ │ │ +000074e0: 2060 456d 6163 7327 2e1f 0a28 6175 746f `Emacs'...(auto │ │ │ +000074f0: 6c6f 6164 2027 6375 7374 6f6d 697a 6520 load 'customize │ │ │ +00007500: 2263 7573 2d65 6469 7422 2027 2823 2420 "cus-edit" '(#$ │ │ │ +00007510: 2e20 3239 3738 3829 2074 206e 696c 290a . 29788) t nil). │ │ │ +00007520: 2864 6566 616c 6961 7320 2763 7573 746f (defalias 'custo │ │ │ +00007530: 6d69 7a65 2d67 726f 7570 2027 6375 7374 mize-group 'cust │ │ │ +00007540: 6f6d 697a 6529 0a23 4035 3620 4375 7374 omize).#@56 Cust │ │ │ +00007550: 6f6d 697a 6520 5359 4d42 4f4c 2c20 7768 omize SYMBOL, wh │ │ │ +00007560: 6963 6820 6d75 7374 2062 6520 6120 6375 ich must be a cu │ │ │ +00007570: 7374 6f6d 697a 6174 696f 6e20 6772 6f75 stomization grou │ │ │ +00007580: 702e 1f0a 2861 7574 6f6c 6f61 6420 2763 p...(autoload 'c │ │ │ +00007590: 7573 746f 6d69 7a65 2d6f 7468 6572 2d77 ustomize-other-w │ │ │ +000075a0: 696e 646f 7720 2263 7573 2d65 6469 7422 indow "cus-edit" │ │ │ +000075b0: 2027 2823 2420 2e20 3330 3032 3829 2074 '(#$ . 30028) t │ │ │ +000075c0: 206e 696c 290a 2862 7974 652d 636f 6465 nil).(byte-code │ │ │ +000075d0: 2022 c0c1 c25c 2288 c0c3 c45c 2287 2220 "...\"....\"." │ │ │ +000075e0: 5b64 6566 616c 6961 7320 6375 7374 6f6d [defalias custom │ │ │ +000075f0: 697a 652d 6772 6f75 702d 6f74 6865 722d ize-group-other- │ │ │ +00007600: 7769 6e64 6f77 2063 7573 746f 6d69 7a65 window customize │ │ │ +00007610: 2d6f 7468 6572 2d77 696e 646f 7720 6375 -other-window cu │ │ │ +00007620: 7374 6f6d 697a 652d 6f70 7469 6f6e 2063 stomize-option c │ │ │ +00007630: 7573 746f 6d69 7a65 2d76 6172 6961 626c ustomize-variabl │ │ │ +00007640: 655d 2033 290a 2340 3537 2043 7573 746f e] 3).#@57 Custo │ │ │ +00007650: 6d69 7a65 2053 594d 424f 4c2c 2077 6869 mize SYMBOL, whi │ │ │ +00007660: 6368 206d 7573 7420 6265 2061 2075 7365 ch must be a use │ │ │ +00007670: 7220 6f70 7469 6f6e 2076 6172 6961 626c r option variabl │ │ │ +00007680: 652e 1f0a 2861 7574 6f6c 6f61 6420 2763 e...(autoload 'c │ │ │ +00007690: 7573 746f 6d69 7a65 2d76 6172 6961 626c ustomize-variabl │ │ │ +000076a0: 6520 2263 7573 2d65 6469 7422 2027 2823 e "cus-edit" '(# │ │ │ +000076b0: 2420 2e20 3330 3238 3329 2074 206e 696c $ . 30283) t nil │ │ │ +000076c0: 290a 2340 3134 3920 4375 7374 6f6d 697a ).#@149 Customiz │ │ │ +000076d0: 6520 616c 6c20 7573 6572 206f 7074 696f e all user optio │ │ │ +000076e0: 6e20 7661 7269 6162 6c65 7320 7768 6f73 n variables whos │ │ │ +000076f0: 6520 6465 6661 756c 7420 7661 6c75 6573 e default values │ │ │ +00007700: 2063 6861 6e67 6564 2072 6563 656e 746c changed recentl │ │ │ +00007710: 792e 0a54 6869 7320 6d65 616e 732c 2069 y..This means, i │ │ │ +00007720: 6e20 6f74 6865 7220 776f 7264 732c 2076 n other words, v │ │ │ +00007730: 6172 6961 626c 6573 2064 6566 696e 6564 ariables defined │ │ │ +00007740: 2077 6974 6820 6120 603a 7665 7273 696f with a `:versio │ │ │ +00007750: 6e27 206b 6579 776f 7264 2e1f 0a28 6175 n' keyword...(au │ │ │ +00007760: 746f 6c6f 6164 2027 6375 7374 6f6d 697a toload 'customiz │ │ │ +00007770: 652d 6368 616e 6765 642d 6f70 7469 6f6e e-changed-option │ │ │ +00007780: 7320 2263 7573 2d65 6469 7422 2027 2823 s "cus-edit" '(# │ │ │ +00007790: 2420 2e20 3330 3430 3829 2074 206e 696c $ . 30408) t nil │ │ │ +000077a0: 290a 2864 6566 616c 6961 7320 2763 7573 ).(defalias 'cus │ │ │ +000077b0: 746f 6d69 7a65 2d76 6172 6961 626c 652d tomize-variable- │ │ │ +000077c0: 6f74 6865 722d 7769 6e64 6f77 2027 6375 other-window 'cu │ │ │ +000077d0: 7374 6f6d 697a 652d 6f70 7469 6f6e 2d6f stomize-option-o │ │ │ +000077e0: 7468 6572 2d77 696e 646f 7729 0a23 4031 ther-window).#@1 │ │ │ +000077f0: 3133 2043 7573 746f 6d69 7a65 2053 594d 13 Customize SYM │ │ │ +00007800: 424f 4c2c 2077 6869 6368 206d 7573 7420 BOL, which must │ │ │ +00007810: 6265 2061 2075 7365 7220 6f70 7469 6f6e be a user option │ │ │ +00007820: 2076 6172 6961 626c 652e 0a53 686f 7720 variable..Show │ │ │ +00007830: 7468 6520 6275 6666 6572 2069 6e20 616e the buffer in an │ │ │ +00007840: 6f74 6865 7220 7769 6e64 6f77 2c20 6275 other window, bu │ │ │ +00007850: 7420 646f 6e27 7420 7365 6c65 6374 2069 t don't select i │ │ │ +00007860: 742e 1f0a 2861 7574 6f6c 6f61 6420 2763 t...(autoload 'c │ │ │ +00007870: 7573 746f 6d69 7a65 2d6f 7074 696f 6e2d ustomize-option- │ │ │ +00007880: 6f74 6865 722d 7769 6e64 6f77 2022 6375 other-window "cu │ │ │ +00007890: 732d 6564 6974 2220 2728 2324 202e 2033 s-edit" '(#$ . 3 │ │ │ +000078a0: 3037 3037 2920 7420 6e69 6c29 0a23 4039 0707) t nil).#@9 │ │ │ +000078b0: 3420 4375 7374 6f6d 697a 6520 5359 4d42 4 Customize SYMB │ │ │ +000078c0: 4f4c 2c20 7768 6963 6820 7368 6f75 6c64 OL, which should │ │ │ +000078d0: 2062 6520 6120 6661 6365 206e 616d 6520 be a face name │ │ │ +000078e0: 6f72 206e 696c 2e0a 4966 2053 594d 424f or nil..If SYMBO │ │ │ +000078f0: 4c20 6973 206e 696c 2c20 6375 7374 6f6d L is nil, custom │ │ │ +00007900: 697a 6520 616c 6c20 6661 6365 732e 1f0a ize all faces... │ │ │ +00007910: 2861 7574 6f6c 6f61 6420 2763 7573 746f (autoload 'custo │ │ │ +00007920: 6d69 7a65 2d66 6163 6520 2263 7573 2d65 mize-face "cus-e │ │ │ +00007930: 6469 7422 2027 2823 2420 2e20 3330 3839 dit" '(#$ . 3089 │ │ │ +00007940: 3829 2074 206e 696c 290a 2340 3533 2053 8) t nil).#@53 S │ │ │ +00007950: 686f 7720 6375 7374 6f6d 697a 6174 696f how customizatio │ │ │ +00007960: 6e20 6275 6666 6572 2066 6f72 2046 4143 n buffer for FAC │ │ │ +00007970: 4520 696e 206f 7468 6572 2077 696e 646f E in other windo │ │ │ +00007980: 772e 1f0a 2861 7574 6f6c 6f61 6420 2763 w...(autoload 'c │ │ │ +00007990: 7573 746f 6d69 7a65 2d66 6163 652d 6f74 ustomize-face-ot │ │ │ +000079a0: 6865 722d 7769 6e64 6f77 2022 6375 732d her-window "cus- │ │ │ +000079b0: 6564 6974 2220 2728 2324 202e 2033 3130 edit" '(#$ . 310 │ │ │ +000079c0: 3535 2920 7420 6e69 6c29 0a23 4036 3920 55) t nil).#@69 │ │ │ +000079d0: 4375 7374 6f6d 697a 6520 616c 6c20 7573 Customize all us │ │ │ +000079e0: 6572 206f 7074 696f 6e73 2073 6574 2073 er options set s │ │ │ +000079f0: 696e 6365 2074 6865 206c 6173 7420 7361 ince the last sa │ │ │ +00007a00: 7665 2069 6e20 7468 6973 2073 6573 7369 ve in this sessi │ │ │ +00007a10: 6f6e 2e1f 0a28 6175 746f 6c6f 6164 2027 on...(autoload ' │ │ │ +00007a20: 6375 7374 6f6d 697a 652d 6375 7374 6f6d customize-custom │ │ │ +00007a30: 697a 6564 2022 6375 732d 6564 6974 2220 ized "cus-edit" │ │ │ +00007a40: 2728 2324 202e 2033 3131 3834 2920 7420 '(#$ . 31184) t │ │ │ +00007a50: 6e69 6c29 0a23 4034 3320 4375 7374 6f6d nil).#@43 Custom │ │ │ +00007a60: 697a 6520 616c 6c20 616c 7265 6164 7920 ize all already │ │ │ +00007a70: 7361 7665 6420 7573 6572 206f 7074 696f saved user optio │ │ │ +00007a80: 6e73 2e1f 0a28 6175 746f 6c6f 6164 2027 ns...(autoload ' │ │ │ +00007a90: 6375 7374 6f6d 697a 652d 7361 7665 6420 customize-saved │ │ │ +00007aa0: 2263 7573 2d65 6469 7422 2027 2823 2420 "cus-edit" '(#$ │ │ │ +00007ab0: 2e20 3331 3332 3229 2074 206e 696c 290a . 31322) t nil). │ │ │ +00007ac0: 2340 3238 3820 4375 7374 6f6d 697a 6520 #@288 Customize │ │ │ +00007ad0: 616c 6c20 7573 6572 206f 7074 696f 6e73 all user options │ │ │ +00007ae0: 206d 6174 6368 696e 6720 5245 4745 5850 matching REGEXP │ │ │ +00007af0: 2e0a 4966 2041 4c4c 2069 7320 606f 7074 ..If ALL is `opt │ │ │ +00007b00: 696f 6e73 272c 2069 6e63 6c75 6465 206f ions', include o │ │ │ +00007b10: 6e6c 7920 6f70 7469 6f6e 732e 0a49 6620 nly options..If │ │ │ +00007b20: 414c 4c20 6973 2060 6661 6365 7327 2c20 ALL is `faces', │ │ │ +00007b30: 696e 636c 7564 6520 6f6e 6c79 2066 6163 include only fac │ │ │ +00007b40: 6573 2e0a 4966 2041 4c4c 2069 7320 6067 es..If ALL is `g │ │ │ +00007b50: 726f 7570 7327 2c20 696e 636c 7564 6520 roups', include │ │ │ +00007b60: 6f6e 6c79 2067 726f 7570 732e 0a49 6620 only groups..If │ │ │ +00007b70: 414c 4c20 6973 2074 2028 696e 7465 7261 ALL is t (intera │ │ │ +00007b80: 6374 6976 656c 792c 2077 6974 6820 7072 ctively, with pr │ │ │ +00007b90: 6566 6978 2061 7267 292c 2069 6e63 6c75 efix arg), inclu │ │ │ +00007ba0: 6465 206f 7074 696f 6e73 2077 6869 6368 de options which │ │ │ +00007bb0: 2061 7265 206e 6f74 0a75 7365 722d 7365 are not.user-se │ │ │ +00007bc0: 7474 6162 6c65 2c20 6173 2077 656c 6c20 ttable, as well │ │ │ +00007bd0: 6173 2066 6163 6573 2061 6e64 2067 726f as faces and gro │ │ │ +00007be0: 7570 732e 1f0a 2861 7574 6f6c 6f61 6420 ups...(autoload │ │ │ +00007bf0: 2763 7573 746f 6d69 7a65 2d61 7072 6f70 'customize-aprop │ │ │ +00007c00: 6f73 2022 6375 732d 6564 6974 2220 2728 os "cus-edit" '( │ │ │ +00007c10: 2324 202e 2033 3134 3330 2920 7420 6e69 #$ . 31430) t ni │ │ │ +00007c20: 6c29 0a23 4031 3037 2043 7573 746f 6d69 l).#@107 Customi │ │ │ +00007c30: 7a65 2061 6c6c 2075 7365 7220 6f70 7469 ze all user opti │ │ │ +00007c40: 6f6e 7320 6d61 7463 6869 6e67 2052 4547 ons matching REG │ │ │ +00007c50: 4558 502e 0a57 6974 6820 7072 6566 6978 EXP..With prefix │ │ │ +00007c60: 2061 7267 2c20 696e 636c 7564 6520 6f70 arg, include op │ │ │ +00007c70: 7469 6f6e 7320 7768 6963 6820 6172 6520 tions which are │ │ │ +00007c80: 6e6f 7420 7573 6572 2d73 6574 7461 626c not user-settabl │ │ │ +00007c90: 652e 1f0a 2861 7574 6f6c 6f61 6420 2763 e...(autoload 'c │ │ │ +00007ca0: 7573 746f 6d69 7a65 2d61 7072 6f70 6f73 ustomize-apropos │ │ │ +00007cb0: 2d6f 7074 696f 6e73 2022 6375 732d 6564 -options "cus-ed │ │ │ +00007cc0: 6974 2220 2728 2324 202e 2033 3137 3835 it" '(#$ . 31785 │ │ │ +00007cd0: 2920 7420 6e69 6c29 0a23 4034 3320 4375 ) t nil).#@43 Cu │ │ │ +00007ce0: 7374 6f6d 697a 6520 616c 6c20 7573 6572 stomize all user │ │ │ +00007cf0: 2066 6163 6573 206d 6174 6368 696e 6720 faces matching │ │ │ +00007d00: 5245 4745 5850 2e1f 0a28 6175 746f 6c6f REGEXP...(autolo │ │ │ +00007d10: 6164 2027 6375 7374 6f6d 697a 652d 6170 ad 'customize-ap │ │ │ +00007d20: 726f 706f 732d 6661 6365 7320 2263 7573 ropos-faces "cus │ │ │ +00007d30: 2d65 6469 7422 2027 2823 2420 2e20 3331 -edit" '(#$ . 31 │ │ │ +00007d40: 3936 3629 2074 206e 696c 290a 2340 3434 966) t nil).#@44 │ │ │ +00007d50: 2043 7573 746f 6d69 7a65 2061 6c6c 2075 Customize all u │ │ │ +00007d60: 7365 7220 6772 6f75 7073 206d 6174 6368 ser groups match │ │ │ +00007d70: 696e 6720 5245 4745 5850 2e1f 0a28 6175 ing REGEXP...(au │ │ │ +00007d80: 746f 6c6f 6164 2027 6375 7374 6f6d 697a toload 'customiz │ │ │ +00007d90: 652d 6170 726f 706f 732d 6772 6f75 7073 e-apropos-groups │ │ │ +00007da0: 2022 6375 732d 6564 6974 2220 2728 2324 "cus-edit" '(#$ │ │ │ +00007db0: 202e 2033 3230 3831 2920 7420 6e69 6c29 . 32081) t nil) │ │ │ +00007dc0: 0a23 4032 3237 2043 7265 6174 6520 6120 .#@227 Create a │ │ │ +00007dd0: 6275 6666 6572 2063 6f6e 7461 696e 696e buffer containin │ │ │ +00007de0: 6720 4f50 5449 4f4e 532e 0a4f 7074 696f g OPTIONS..Optio │ │ │ +00007df0: 6e61 6c20 4e41 4d45 2069 7320 7468 6520 nal NAME is the │ │ │ +00007e00: 6e61 6d65 206f 6620 7468 6520 6275 6666 name of the buff │ │ │ +00007e10: 6572 2e0a 4f50 5449 4f4e 5320 7368 6f75 er..OPTIONS shou │ │ │ +00007e20: 6c64 2062 6520 616e 2061 6c69 7374 206f ld be an alist o │ │ │ +00007e30: 6620 7468 6520 666f 726d 2028 2853 594d f the form ((SYM │ │ │ +00007e40: 424f 4c20 5749 4447 4554 292e 2e2e 292c BOL WIDGET)...), │ │ │ +00007e50: 2077 6865 7265 0a53 594d 424f 4c20 6973 where.SYMBOL is │ │ │ +00007e60: 2061 2063 7573 746f 6d69 7a61 7469 6f6e a customization │ │ │ +00007e70: 206f 7074 696f 6e2c 2061 6e64 2057 4944 option, and WID │ │ │ +00007e80: 4745 5420 6973 2061 2077 6964 6765 7420 GET is a widget │ │ │ +00007e90: 666f 7220 6564 6974 696e 670a 7468 6174 for editing.that │ │ │ +00007ea0: 206f 7074 696f 6e2e 1f0a 2861 7574 6f6c option...(autol │ │ │ +00007eb0: 6f61 6420 2763 7573 746f 6d2d 6275 6666 oad 'custom-buff │ │ │ +00007ec0: 6572 2d63 7265 6174 6520 2263 7573 2d65 er-create "cus-e │ │ │ +00007ed0: 6469 7422 2027 2823 2420 2e20 3332 3139 dit" '(#$ . 3219 │ │ │ +00007ee0: 3929 206e 696c 206e 696c 290a 2340 3232 9) nil nil).#@22 │ │ │ +00007ef0: 3720 4372 6561 7465 2061 2062 7566 6665 7 Create a buffe │ │ │ +00007f00: 7220 636f 6e74 6169 6e69 6e67 204f 5054 r containing OPT │ │ │ +00007f10: 494f 4e53 2e0a 4f70 7469 6f6e 616c 204e IONS..Optional N │ │ │ +00007f20: 414d 4520 6973 2074 6865 206e 616d 6520 AME is the name │ │ │ +00007f30: 6f66 2074 6865 2062 7566 6665 722e 0a4f of the buffer..O │ │ │ +00007f40: 5054 494f 4e53 2073 686f 756c 6420 6265 PTIONS should be │ │ │ +00007f50: 2061 6e20 616c 6973 7420 6f66 2074 6865 an alist of the │ │ │ +00007f60: 2066 6f72 6d20 2828 5359 4d42 4f4c 2057 form ((SYMBOL W │ │ │ +00007f70: 4944 4745 5429 2e2e 2e29 2c20 7768 6572 IDGET)...), wher │ │ │ +00007f80: 650a 5359 4d42 4f4c 2069 7320 6120 6375 e.SYMBOL is a cu │ │ │ +00007f90: 7374 6f6d 697a 6174 696f 6e20 6f70 7469 stomization opti │ │ │ +00007fa0: 6f6e 2c20 616e 6420 5749 4447 4554 2069 on, and WIDGET i │ │ │ +00007fb0: 7320 6120 7769 6467 6574 2066 6f72 2065 s a widget for e │ │ │ +00007fc0: 6469 7469 6e67 0a74 6861 7420 6f70 7469 diting.that opti │ │ │ +00007fd0: 6f6e 2e1f 0a28 6175 746f 6c6f 6164 2027 on...(autoload ' │ │ │ +00007fe0: 6375 7374 6f6d 2d62 7566 6665 722d 6372 custom-buffer-cr │ │ │ +00007ff0: 6561 7465 2d6f 7468 6572 2d77 696e 646f eate-other-windo │ │ │ +00008000: 7720 2263 7573 2d65 6469 7422 2027 2823 w "cus-edit" '(# │ │ │ +00008010: 2420 2e20 3332 3439 3829 206e 696c 206e $ . 32498) nil n │ │ │ +00008020: 696c 290a 2340 3532 2043 7265 6174 6520 il).#@52 Create │ │ │ +00008030: 6120 7472 6565 2062 726f 7773 6572 2066 a tree browser f │ │ │ +00008040: 6f72 2074 6865 2063 7573 746f 6d69 7a65 or the customize │ │ │ +00008050: 2068 6965 7261 7263 6879 2e1f 0a28 6175 hierarchy...(au │ │ │ +00008060: 746f 6c6f 6164 2027 6375 7374 6f6d 697a toload 'customiz │ │ │ +00008070: 652d 6272 6f77 7365 2022 6375 732d 6564 e-browse "cus-ed │ │ │ +00008080: 6974 2220 2728 2324 202e 2033 3238 3039 it" '(#$ . 32809 │ │ │ +00008090: 2920 7420 6e69 6c29 0a23 4036 3020 5361 ) t nil).#@60 Sa │ │ │ +000080a0: 7665 2061 6c6c 2075 7365 7220 6f70 7469 ve all user opti │ │ │ +000080b0: 6f6e 7320 7768 6963 6820 6861 7665 2062 ons which have b │ │ │ +000080c0: 6565 6e20 7365 7420 696e 2074 6869 7320 een set in this │ │ │ +000080d0: 7365 7373 696f 6e2e 1f0a 2861 7574 6f6c session...(autol │ │ │ +000080e0: 6f61 6420 2763 7573 746f 6d69 7a65 2d73 oad 'customize-s │ │ │ +000080f0: 6176 652d 6375 7374 6f6d 697a 6564 2022 ave-customized " │ │ │ +00008100: 6375 732d 6564 6974 2220 2728 2324 202e cus-edit" '(#$ . │ │ │ +00008110: 2033 3239 3236 2920 7420 6e69 6c29 0a23 32926) t nil).# │ │ │ +00008120: 4034 3320 5361 7665 2061 6c6c 2063 7573 @43 Save all cus │ │ │ +00008130: 746f 6d69 7a61 7469 6f6e 7320 696e 2060 tomizations in ` │ │ │ +00008140: 6375 7374 6f6d 2d66 696c 6527 2e1f 0a28 custom-file'...( │ │ │ +00008150: 6175 746f 6c6f 6164 2027 6375 7374 6f6d autoload 'custom │ │ │ +00008160: 2d73 6176 652d 616c 6c20 2263 7573 2d65 -save-all "cus-e │ │ │ +00008170: 6469 7422 2027 2823 2420 2e20 3333 3036 dit" '(#$ . 3306 │ │ │ +00008180: 3029 206e 696c 206e 696c 290a 2340 3130 0) nil nil).#@10 │ │ │ +00008190: 3320 4372 6561 7465 206d 656e 7520 666f 3 Create menu fo │ │ │ +000081a0: 7220 6375 7374 6f6d 697a 6174 696f 6e20 r customization │ │ │ +000081b0: 6772 6f75 7020 5359 4d42 4f4c 2e0a 5468 group SYMBOL..Th │ │ │ +000081c0: 6520 6d65 6e75 2069 7320 696e 2061 2066 e menu is in a f │ │ │ +000081d0: 6f72 6d61 7420 6170 706c 6963 6162 6c65 ormat applicable │ │ │ +000081e0: 2074 6f20 6065 6173 792d 6d65 6e75 2d64 to `easy-menu-d │ │ │ +000081f0: 6566 696e 6527 2e1f 0a28 6175 746f 6c6f efine'...(autolo │ │ │ +00008200: 6164 2027 6375 7374 6f6d 2d6d 656e 752d ad 'custom-menu- │ │ │ +00008210: 6372 6561 7465 2022 6375 732d 6564 6974 create "cus-edit │ │ │ +00008220: 2220 2728 2324 202e 2033 3331 3730 2920 " '(#$ . 33170) │ │ │ +00008230: 6e69 6c20 6e69 6c29 0a23 4032 3230 2052 nil nil).#@220 R │ │ │ +00008240: 6574 7572 6e20 6120 6375 7374 6f6d 697a eturn a customiz │ │ │ +00008250: 6520 6d65 6e75 2066 6f72 2063 7573 746f e menu for custo │ │ │ +00008260: 6d69 7a61 7469 6f6e 2067 726f 7570 2053 mization group S │ │ │ +00008270: 594d 424f 4c2e 0a49 6620 6f70 7469 6f6e YMBOL..If option │ │ │ +00008280: 616c 204e 414d 4520 6973 2067 6976 656e al NAME is given │ │ │ +00008290: 2c20 7573 6520 7468 6174 2061 7320 7468 , use that as th │ │ │ +000082a0: 6520 6e61 6d65 206f 6620 7468 6520 6d65 e name of the me │ │ │ +000082b0: 6e75 2e0a 4f74 6865 7277 6973 6520 7468 nu..Otherwise th │ │ │ +000082c0: 6520 6d65 6e75 2077 696c 6c20 6265 206e e menu will be n │ │ │ +000082d0: 616d 6564 2060 4375 7374 6f6d 697a 6527 amed `Customize' │ │ │ +000082e0: 2e0a 5468 6520 666f 726d 6174 2069 7320 ..The format is │ │ │ +000082f0: 7375 6974 6162 6c65 2066 6f72 2075 7365 suitable for use │ │ │ +00008300: 2077 6974 6820 6065 6173 792d 6d65 6e75 with `easy-menu │ │ │ +00008310: 2d64 6566 696e 6527 2e1f 0a28 6175 746f -define'...(auto │ │ │ +00008320: 6c6f 6164 2027 6375 7374 6f6d 697a 652d load 'customize- │ │ │ +00008330: 6d65 6e75 2d63 7265 6174 6520 2263 7573 menu-create "cus │ │ │ +00008340: 2d65 6469 7422 2027 2823 2420 2e20 3333 -edit" '(#$ . 33 │ │ │ +00008350: 3334 3329 206e 696c 206e 696c 290a 2340 343) nil nil).#@ │ │ │ +00008360: 3432 204d 6967 7261 7465 2063 7573 746f 42 Migrate custo │ │ │ +00008370: 6d20 6669 6c65 2066 726f 6d20 686f 6d65 m file from home │ │ │ +00008380: 2064 6972 6563 746f 7279 2e1f 0a28 6175 directory...(au │ │ │ +00008390: 746f 6c6f 6164 2027 6375 7374 6f6d 2d6d toload 'custom-m │ │ │ +000083a0: 6967 7261 7465 2d63 7573 746f 6d2d 6669 igrate-custom-fi │ │ │ +000083b0: 6c65 2022 6375 732d 6564 6974 2220 2728 le "cus-edit" '( │ │ │ +000083c0: 2324 202e 2033 3336 3335 2920 6e69 6c20 #$ . 33635) nil │ │ │ +000083d0: 6e69 6c29 0a23 4036 3120 4c69 6b65 2060 nil).#@61 Like ` │ │ │ +000083e0: 6465 6666 6163 6527 2c20 6275 7420 4641 defface', but FA │ │ │ +000083f0: 4345 2069 7320 6576 616c 7561 7465 6420 CE is evaluated │ │ │ +00008400: 6173 2061 206e 6f72 6d61 6c20 6172 6775 as a normal argu │ │ │ +00008410: 6d65 6e74 2e1f 0a28 6175 746f 6c6f 6164 ment...(autoload │ │ │ +00008420: 2027 6375 7374 6f6d 2d64 6563 6c61 7265 'custom-declare │ │ │ +00008430: 2d66 6163 6520 2263 7573 2d66 6163 6522 -face "cus-face" │ │ │ +00008440: 2027 2823 2420 2e20 3333 3735 3429 206e '(#$ . 33754) n │ │ │ +00008450: 696c 206e 696c 290a 2340 3431 2053 6574 il nil).#@41 Set │ │ │ +00008460: 2074 6865 2062 6f6c 6420 7072 6f70 6572 the bold proper │ │ │ +00008470: 7479 206f 6620 4641 4345 2074 6f20 5641 ty of FACE to VA │ │ │ +00008480: 4c55 452e 1f0a 2861 7574 6f6c 6f61 6420 LUE...(autoload │ │ │ +00008490: 2763 7573 746f 6d2d 7365 742d 6661 6365 'custom-set-face │ │ │ +000084a0: 2d62 6f6c 6420 2263 7573 2d66 6163 6522 -bold "cus-face" │ │ │ +000084b0: 2027 2823 2420 2e20 3333 3838 3529 206e '(#$ . 33885) n │ │ │ +000084c0: 696c 206e 696c 290a 2340 3935 2043 7573 il nil).#@95 Cus │ │ │ +000084d0: 746f 6d69 7a65 2074 6865 2046 4143 4520 tomize the FACE │ │ │ +000084e0: 666f 7220 6469 7370 6c61 7920 7479 7065 for display type │ │ │ +000084f0: 7320 6d61 7463 6869 6e67 2044 4953 504c s matching DISPL │ │ │ +00008500: 4159 2c20 6d65 7267 696e 670a 2020 696e AY, merging. in │ │ │ +00008510: 2074 6865 206e 6577 2069 7465 6d73 2066 the new items f │ │ │ +00008520: 726f 6d20 504c 4953 542e 1f0a 2861 7574 rom PLIST...(aut │ │ │ +00008530: 6f6c 6f61 6420 2763 7573 746f 6d2d 7365 oload 'custom-se │ │ │ +00008540: 742d 6661 6365 2d75 7064 6174 652d 7370 t-face-update-sp │ │ │ +00008550: 6563 2022 6375 732d 6661 6365 2220 2728 ec "cus-face" '( │ │ │ +00008560: 2324 202e 2033 3339 3937 2920 6e69 6c20 #$ . 33997) nil │ │ │ +00008570: 6e69 6c29 0a23 4033 3936 2049 6e69 7469 nil).#@396 Initi │ │ │ +00008580: 616c 697a 6520 6661 6365 7320 6163 636f alize faces acco │ │ │ +00008590: 7264 696e 6720 746f 2075 7365 7220 7072 rding to user pr │ │ │ +000085a0: 6566 6572 656e 6365 732e 0a54 6869 7320 eferences..This │ │ │ +000085b0: 6173 6f63 6961 7465 7320 7468 6520 7365 asociates the se │ │ │ +000085c0: 7474 696e 6720 7769 7468 2074 6865 2055 tting with the U │ │ │ +000085d0: 5345 5220 7468 656d 652e 0a54 6865 2061 SER theme..The a │ │ │ +000085e0: 7267 756d 656e 7473 2073 686f 756c 6420 rguments should │ │ │ +000085f0: 6265 2061 206c 6973 7420 7768 6572 6520 be a list where │ │ │ +00008600: 6561 6368 2065 6e74 7279 2068 6173 2074 each entry has t │ │ │ +00008610: 6865 2066 6f72 6d3a 0a0a 2020 2846 4143 he form:.. (FAC │ │ │ +00008620: 4520 5350 4543 205b 4e4f 5720 5b43 4f4d E SPEC [NOW [COM │ │ │ +00008630: 4d45 4e54 5d5d 290a 0a53 5045 4320 7769 MENT]])..SPEC wi │ │ │ +00008640: 6c6c 2062 6520 7374 6f72 6564 2061 7320 ll be stored as │ │ │ +00008650: 7468 6520 7361 7665 6420 7661 6c75 6520 the saved value │ │ │ +00008660: 666f 7220 4641 4345 2e20 2049 6620 4e4f for FACE. If NO │ │ │ +00008670: 5720 6973 2070 7265 7365 6e74 0a61 6e64 W is present.and │ │ │ +00008680: 206e 6f6e 2d6e 696c 2c20 4641 4345 2077 non-nil, FACE w │ │ │ +00008690: 696c 6c20 616c 736f 2062 6520 6372 6561 ill also be crea │ │ │ +000086a0: 7465 6420 6163 636f 7264 696e 6720 746f ted according to │ │ │ +000086b0: 2053 5045 432e 0a43 4f4d 4d45 4e54 2069 SPEC..COMMENT i │ │ │ +000086c0: 7320 6120 7374 7269 6e67 2063 6f6d 6d65 s a string comme │ │ │ +000086d0: 6e74 2061 626f 7574 2046 4143 452e 0a0a nt about FACE... │ │ │ +000086e0: 5365 6520 6064 6566 6661 6365 2720 666f See `defface' fo │ │ │ +000086f0: 7220 7468 6520 666f 726d 6174 206f 6620 r the format of │ │ │ +00008700: 5350 4543 2e1f 0a28 6175 746f 6c6f 6164 SPEC...(autoload │ │ │ +00008710: 2027 6375 7374 6f6d 2d73 6574 2d66 6163 'custom-set-fac │ │ │ +00008720: 6573 2022 6375 732d 6661 6365 2220 2728 es "cus-face" '( │ │ │ +00008730: 2324 202e 2033 3431 3731 2920 6e69 6c20 #$ . 34171) nil │ │ │ +00008740: 6e69 6c29 0a23 4031 3638 2049 6e69 7469 nil).#@168 Initi │ │ │ +00008750: 616c 697a 6520 6661 6365 7320 6163 636f alize faces acco │ │ │ +00008760: 7264 696e 6720 746f 2073 6574 7469 6e67 rding to setting │ │ │ +00008770: 7320 7370 6563 6966 6965 6420 6279 2061 s specified by a │ │ │ +00008780: 7267 732e 0a52 6563 6f72 6473 2074 6865 rgs..Records the │ │ │ +00008790: 2073 6574 7469 6e67 7320 6173 2062 656c settings as bel │ │ │ +000087a0: 6f6e 6769 6e67 2074 6f20 5448 454d 452e onging to THEME. │ │ │ +000087b0: 0a0a 5365 6520 6063 7573 746f 6d2d 7365 ..See `custom-se │ │ │ +000087c0: 742d 6661 6365 7327 2066 6f72 2061 2064 t-faces' for a d │ │ │ +000087d0: 6573 6372 6970 7469 6f6e 206f 6620 7468 escription of th │ │ │ +000087e0: 6520 6172 6775 6d65 6e74 7320 4152 4753 e arguments ARGS │ │ │ +000087f0: 2e1f 0a28 6175 746f 6c6f 6164 2027 6375 ...(autoload 'cu │ │ │ +00008800: 7374 6f6d 2d74 6865 6d65 2d73 6574 2d66 stom-theme-set-f │ │ │ +00008810: 6163 6573 2022 6375 732d 6661 6365 2220 aces "cus-face" │ │ │ +00008820: 2728 2324 202e 2033 3436 3335 2920 6e69 '(#$ . 34635) ni │ │ │ +00008830: 6c20 6e69 6c29 0a23 4037 3820 5265 7475 l nil).#@78 Retu │ │ │ +00008840: 726e 2073 7065 6320 6f66 2046 4143 4520 rn spec of FACE │ │ │ +00008850: 696e 2054 4845 4d45 2069 6620 7468 6520 in THEME if the │ │ │ +00008860: 5448 454d 4520 6d6f 6469 6669 6573 2074 THEME modifies t │ │ │ +00008870: 6865 0a46 4143 452e 2020 4e69 6c20 6f74 he.FACE. Nil ot │ │ │ +00008880: 6865 7277 6973 652e 1f0a 2861 7574 6f6c herwise...(autol │ │ │ +00008890: 6f61 6420 2763 7573 746f 6d2d 7468 656d oad 'custom-them │ │ │ +000088a0: 652d 6661 6365 2d76 616c 7565 2022 6375 e-face-value "cu │ │ │ +000088b0: 732d 6661 6365 2220 2728 2324 202e 2033 s-face" '(#$ . 3 │ │ │ +000088c0: 3438 3736 2920 6e69 6c20 6e69 6c29 0a28 4876) nil nil).( │ │ │ +000088d0: 6279 7465 2d63 6f64 6520 22c0 c1c2 c389 byte-code "..... │ │ │ +000088e0: 8925 8722 205b 6175 746f 6c6f 6164 2063 .%." [autoload c │ │ │ +000088f0: 7573 746f 6d2d 7468 656d 652d 7265 7365 ustom-theme-rese │ │ │ +00008900: 742d 6661 6365 7320 2263 7573 2d66 6163 t-faces "cus-fac │ │ │ +00008910: 6522 206e 696c 5d20 3629 0a23 4031 3537 e" nil] 6).#@157 │ │ │ +00008920: 2052 6573 6574 2074 6865 2076 616c 7565 Reset the value │ │ │ +00008930: 206f 6620 7468 6520 6661 6365 2074 6f20 of the face to │ │ │ +00008940: 7661 6c75 6573 2070 7265 7669 6f75 736c values previousl │ │ │ +00008950: 7920 6465 6669 6e65 642e 0a41 7373 6f63 y defined..Assoc │ │ │ +00008960: 6961 7465 2074 6869 7320 7365 7474 696e iate this settin │ │ │ +00008970: 6720 7769 7468 2074 6865 2027 7573 6572 g with the 'user │ │ │ +00008980: 2720 7468 656d 652e 0a0a 4152 4753 2069 ' theme...ARGS i │ │ │ +00008990: 7320 6465 6669 6e65 6420 6173 2066 6f72 s defined as for │ │ │ +000089a0: 2060 6375 7374 6f6d 2d74 6865 6d65 2d72 `custom-theme-r │ │ │ +000089b0: 6573 6574 2d66 6163 6573 272e 1f0a 2861 eset-faces'...(a │ │ │ +000089c0: 7574 6f6c 6f61 6420 2763 7573 746f 6d2d utoload 'custom- │ │ │ +000089d0: 7265 7365 742d 6661 6365 7320 2263 7573 reset-faces "cus │ │ │ +000089e0: 2d66 6163 6522 2027 2823 2420 2e20 3335 -face" '(#$ . 35 │ │ │ +000089f0: 3130 3529 206e 696c 206e 696c 290a 2340 105) nil nil).#@ │ │ │ +00008a00: 3538 2042 6173 6520 6f66 2066 696c 6520 58 Base of file │ │ │ +00008a10: 6e61 6d65 2066 6f72 2073 746f 7269 6e67 name for storing │ │ │ +00008a20: 2063 7573 746f 6d69 7a61 7469 6f6e 2069 customization i │ │ │ +00008a30: 6e66 6f72 6d61 7469 6f6e 2e1f 0a28 6465 nformation...(de │ │ │ +00008a40: 6663 6f6e 7374 2063 7573 746f 6d2d 6669 fconst custom-fi │ │ │ +00008a50: 6c65 2d62 6173 6520 2263 7573 746f 6d2e le-base "custom. │ │ │ +00008a60: 656c 2220 2823 2420 2e20 3335 3333 3129 el" (#$ . 35331) │ │ │ +00008a70: 290a 2340 3135 3720 4669 6c65 2075 7365 ).#@157 File use │ │ │ +00008a80: 6420 666f 7220 7374 6f72 696e 6720 6375 d for storing cu │ │ │ +00008a90: 7374 6f6d 697a 6174 696f 6e20 696e 666f stomization info │ │ │ +00008aa0: 726d 6174 696f 6e2e 0a49 6620 796f 7520 rmation..If you │ │ │ +00008ab0: 6368 616e 6765 2074 6869 7320 6672 6f6d change this from │ │ │ +00008ac0: 2074 6865 2064 6566 6175 6c74 2079 6f75 the default you │ │ │ +00008ad0: 206e 6565 6420 746f 0a65 7870 6c69 6369 need to.explici │ │ │ +00008ae0: 746c 7920 6c6f 6164 2074 6861 7420 6669 tly load that fi │ │ │ +00008af0: 6c65 2066 6f72 2074 6865 2073 6574 7469 le for the setti │ │ │ +00008b00: 6e67 7320 746f 2074 616b 6520 6566 6665 ngs to take effe │ │ │ +00008b10: 6374 2e1f 0a28 6465 6676 6172 2063 7573 ct...(defvar cus │ │ │ +00008b20: 746f 6d2d 6669 6c65 206e 696c 2028 2324 tom-file nil (#$ │ │ │ +00008b30: 202e 2033 3534 3438 2929 0a23 4031 3231 . 35448)).#@121 │ │ │ +00008b40: 2043 6f6e 7374 7275 6374 2074 6865 2064 Construct the d │ │ │ +00008b50: 6566 6175 6c74 2063 7573 746f 6d20 6669 efault custom fi │ │ │ +00008b60: 6c65 206e 616d 6520 6672 6f6d 2074 6865 le name from the │ │ │ +00008b70: 2069 6e69 7420 6669 6c65 206e 616d 652e init file name. │ │ │ +00008b80: 0a49 6620 464f 5243 452d 4e45 5720 6973 .If FORCE-NEW is │ │ │ +00008b90: 206e 6f6e 2d6e 696c 2c20 666f 7263 6520 non-nil, force │ │ │ +00008ba0: 706f 7374 2d6d 6967 7261 7469 6f6e 206c post-migration l │ │ │ +00008bb0: 6f63 6174 696f 6e2e 1f0a 2861 7574 6f6c ocation...(autol │ │ │ +00008bc0: 6f61 6420 276d 616b 652d 6375 7374 6f6d oad 'make-custom │ │ │ +00008bd0: 2d66 696c 652d 6e61 6d65 2022 6375 732d -file-name "cus- │ │ │ +00008be0: 6669 6c65 2220 2728 2324 202e 2033 3536 file" '(#$ . 356 │ │ │ +00008bf0: 3439 2920 6e69 6c20 6e69 6c29 0a23 4032 49) nil nil).#@2 │ │ │ +00008c00: 3734 2050 7269 6e74 2064 6973 6173 7365 74 Print disasse │ │ │ +00008c10: 6d62 6c65 6420 636f 6465 2066 6f72 204f mbled code for O │ │ │ +00008c20: 424a 4543 5420 696e 2028 6f70 7469 6f6e BJECT in (option │ │ │ +00008c30: 616c 2920 4255 4646 4552 2e0a 4f42 4a45 al) BUFFER..OBJE │ │ │ +00008c40: 4354 2063 616e 2062 6520 6120 7379 6d62 CT can be a symb │ │ │ +00008c50: 6f6c 2064 6566 696e 6564 2061 7320 6120 ol defined as a │ │ │ +00008c60: 6675 6e63 7469 6f6e 2c20 6f72 2061 2066 function, or a f │ │ │ +00008c70: 756e 6374 696f 6e20 6974 7365 6c66 0a28 unction itself.( │ │ │ +00008c80: 6120 6c61 6d62 6461 2065 7870 7265 7373 a lambda express │ │ │ +00008c90: 696f 6e20 6f72 2061 2063 6f6d 7069 6c65 ion or a compile │ │ │ +00008ca0: 642d 6675 6e63 7469 6f6e 206f 626a 6563 d-function objec │ │ │ +00008cb0: 7429 2e0a 4966 204f 424a 4543 5420 6973 t)..If OBJECT is │ │ │ +00008cc0: 206e 6f74 2061 6c72 6561 6479 2063 6f6d not already com │ │ │ +00008cd0: 7069 6c65 642c 2077 6520 636f 6d70 696c piled, we compil │ │ │ +00008ce0: 6520 6974 2c20 6275 7420 646f 206e 6f74 e it, but do not │ │ │ +00008cf0: 0a72 6564 6566 696e 6520 4f42 4a45 4354 .redefine OBJECT │ │ │ +00008d00: 2069 6620 6974 2069 7320 6120 7379 6d62 if it is a symb │ │ │ +00008d10: 6f6c 2e1f 0a28 6175 746f 6c6f 6164 2027 ol...(autoload ' │ │ │ +00008d20: 6469 7361 7373 656d 626c 6520 2264 6973 disassemble "dis │ │ │ +00008d30: 6173 7322 2027 2823 2420 2e20 3335 3834 ass" '(#$ . 3584 │ │ │ +00008d40: 3329 2074 206e 696c 290a 2340 3730 2044 3) t nil).#@70 D │ │ │ +00008d50: 6573 6372 6962 6520 7468 6520 6469 7370 escribe the disp │ │ │ +00008d60: 6c61 7920 7461 626c 6520 696e 2075 7365 lay table in use │ │ │ +00008d70: 2069 6e20 7468 6520 7365 6c65 6374 6564 in the selected │ │ │ +00008d80: 2077 696e 646f 7720 616e 6420 6275 6666 window and buff │ │ │ +00008d90: 6572 2e1f 0a28 6175 746f 6c6f 6164 2027 er...(autoload ' │ │ │ +00008da0: 6465 7363 7269 6265 2d63 7572 7265 6e74 describe-current │ │ │ +00008db0: 2d64 6973 706c 6179 2d74 6162 6c65 2022 -display-table " │ │ │ +00008dc0: 6469 7370 2d74 6162 6c65 2220 2728 2324 disp-table" '(#$ │ │ │ +00008dd0: 202e 2033 3631 3735 2920 7420 6e69 6c29 . 36175) t nil) │ │ │ +00008de0: 0a23 4033 3620 5265 7475 726e 2061 206e .#@36 Return a n │ │ │ +00008df0: 6577 2c20 656d 7074 7920 6469 7370 6c61 ew, empty displa │ │ │ +00008e00: 7920 7461 626c 652e 1f0a 2861 7574 6f6c y table...(autol │ │ │ +00008e10: 6f61 6420 276d 616b 652d 6469 7370 6c61 oad 'make-displa │ │ │ +00008e20: 792d 7461 626c 6520 2264 6973 702d 7461 y-table "disp-ta │ │ │ +00008e30: 626c 6522 2027 2823 2420 2e20 3336 3332 ble" '(#$ . 3632 │ │ │ +00008e40: 3629 206e 696c 206e 696c 290a 2340 3531 6) nil nil).#@51 │ │ │ +00008e50: 2044 6973 706c 6179 2063 6861 7261 6374 Display charact │ │ │ +00008e60: 6572 7320 696e 2074 6865 2072 616e 6765 ers in the range │ │ │ +00008e70: 204c 2074 6f20 4820 6c69 7465 7261 6c6c L to H literall │ │ │ +00008e80: 792e 1f0a 2861 7574 6f6c 6f61 6420 2773 y...(autoload 's │ │ │ +00008e90: 7461 6e64 6172 642d 6469 7370 6c61 792d tandard-display- │ │ │ +00008ea0: 3862 6974 2022 6469 7370 2d74 6162 6c65 8bit "disp-table │ │ │ +00008eb0: 2220 2728 2324 202e 2033 3634 3333 2920 " '(#$ . 36433) │ │ │ +00008ec0: 6e69 6c20 6e69 6c29 0a23 4036 3820 4469 nil nil).#@68 Di │ │ │ +00008ed0: 7370 6c61 7920 6368 6172 6163 7465 7273 splay characters │ │ │ +00008ee0: 2069 6e20 7468 6520 7261 6e67 6520 4c20 in the range L │ │ │ +00008ef0: 746f 2048 2075 7369 6e67 2074 6865 2064 to H using the d │ │ │ +00008f00: 6566 6175 6c74 206e 6f74 6174 696f 6e2e efault notation. │ │ │ +00008f10: 1f0a 2861 7574 6f6c 6f61 6420 2773 7461 ..(autoload 'sta │ │ │ +00008f20: 6e64 6172 642d 6469 7370 6c61 792d 6465 ndard-display-de │ │ │ +00008f30: 6661 756c 7420 2264 6973 702d 7461 626c fault "disp-tabl │ │ │ +00008f40: 6522 2027 2823 2420 2e20 3336 3535 3829 e" '(#$ . 36558) │ │ │ +00008f50: 206e 696c 206e 696c 290a 2340 3437 2044 nil nil).#@47 D │ │ │ +00008f60: 6973 706c 6179 2063 6861 7261 6374 6572 isplay character │ │ │ +00008f70: 2043 2075 7369 6e67 2070 7269 6e74 6162 C using printab │ │ │ +00008f80: 6c65 2073 7472 696e 6720 532e 1f0a 2861 le string S...(a │ │ │ +00008f90: 7574 6f6c 6f61 6420 2773 7461 6e64 6172 utoload 'standar │ │ │ +00008fa0: 642d 6469 7370 6c61 792d 6173 6369 6920 d-display-ascii │ │ │ +00008fb0: 2264 6973 702d 7461 626c 6522 2027 2823 "disp-table" '(# │ │ │ +00008fc0: 2420 2e20 3336 3730 3329 206e 696c 206e $ . 36703) nil n │ │ │ +00008fd0: 696c 290a 2340 3136 3420 4469 7370 6c61 il).#@164 Displa │ │ │ +00008fe0: 7920 6368 6172 6163 7465 7220 4320 6173 y character C as │ │ │ +00008ff0: 2063 6861 7261 6374 6572 2053 4320 696e character SC in │ │ │ +00009000: 2074 6865 2067 3120 6368 6172 6163 7465 the g1 characte │ │ │ +00009010: 7220 7365 742e 0a54 6869 7320 6675 6e63 r set..This func │ │ │ +00009020: 7469 6f6e 2061 7373 756d 6573 2074 6861 tion assumes tha │ │ │ +00009030: 7420 796f 7572 2074 6572 6d69 6e61 6c20 t your terminal │ │ │ +00009040: 7573 6573 2074 6865 2053 4f2f 5349 2063 uses the SO/SI c │ │ │ +00009050: 6861 7261 6374 6572 733b 0a69 7420 6973 haracters;.it is │ │ │ +00009060: 206d 6561 6e69 6e67 6c65 7373 2066 6f72 meaningless for │ │ │ +00009070: 2061 6e20 5820 6672 616d 652e 1f0a 2861 an X frame...(a │ │ │ +00009080: 7574 6f6c 6f61 6420 2773 7461 6e64 6172 utoload 'standar │ │ │ +00009090: 642d 6469 7370 6c61 792d 6731 2022 6469 d-display-g1 "di │ │ │ +000090a0: 7370 2d74 6162 6c65 2220 2728 2324 202e sp-table" '(#$ . │ │ │ +000090b0: 2033 3638 3236 2920 6e69 6c20 6e69 6c29 36826) nil nil) │ │ │ +000090c0: 0a23 4031 3436 2044 6973 706c 6179 2063 .#@146 Display c │ │ │ +000090d0: 6861 7261 6374 6572 2043 2061 7320 6368 haracter C as ch │ │ │ +000090e0: 6172 6163 7465 7220 4743 2069 6e20 6772 aracter GC in gr │ │ │ +000090f0: 6170 6869 6373 2063 6861 7261 6374 6572 aphics character │ │ │ +00009100: 2073 6574 2e0a 5468 6973 2066 756e 6374 set..This funct │ │ │ +00009110: 696f 6e20 6173 7375 6d65 7320 5654 3130 ion assumes VT10 │ │ │ +00009120: 302d 636f 6d70 6174 6962 6c65 2065 7363 0-compatible esc │ │ │ +00009130: 6170 6573 3b20 6974 2069 7320 6d65 616e apes; it is mean │ │ │ +00009140: 696e 676c 6573 7320 666f 7220 616e 0a58 ingless for an.X │ │ │ +00009150: 2066 7261 6d65 2e1f 0a28 6175 746f 6c6f frame...(autolo │ │ │ +00009160: 6164 2027 7374 616e 6461 7264 2d64 6973 ad 'standard-dis │ │ │ +00009170: 706c 6179 2d67 7261 7068 6963 2022 6469 play-graphic "di │ │ │ +00009180: 7370 2d74 6162 6c65 2220 2728 2324 202e sp-table" '(#$ . │ │ │ +00009190: 2033 3730 3633 2920 6e69 6c20 6e69 6c29 37063) nil nil) │ │ │ +000091a0: 0a23 4035 3520 4469 7370 6c61 7920 6368 .#@55 Display ch │ │ │ +000091b0: 6172 6163 7465 7220 4320 6173 2063 6861 aracter C as cha │ │ │ +000091c0: 7261 6374 6572 2055 4320 706c 7573 2075 racter UC plus u │ │ │ +000091d0: 6e64 6572 6c69 6e69 6e67 2e1f 0a28 6175 nderlining...(au │ │ │ +000091e0: 746f 6c6f 6164 2027 7374 616e 6461 7264 toload 'standard │ │ │ +000091f0: 2d64 6973 706c 6179 2d75 6e64 6572 6c69 -display-underli │ │ │ +00009200: 6e65 2022 6469 7370 2d74 6162 6c65 2220 ne "disp-table" │ │ │ +00009210: 2728 2324 202e 2033 3732 3836 2920 6e69 '(#$ . 37286) ni │ │ │ +00009220: 6c20 6e69 6c29 0a23 4032 3439 2054 6f67 l nil).#@249 Tog │ │ │ +00009230: 676c 6520 6469 7370 6c61 7920 6f66 2045 gle display of E │ │ │ +00009240: 7572 6f70 6561 6e20 6368 6172 6163 7465 uropean characte │ │ │ +00009250: 7273 2065 6e63 6f64 6564 2077 6974 6820 rs encoded with │ │ │ +00009260: 4953 4f20 3838 3539 2e0a 5768 656e 2065 ISO 8859..When e │ │ │ +00009270: 6e61 626c 6564 2c20 6368 6172 6163 7465 nabled, characte │ │ │ +00009280: 7273 2069 6e20 7468 6520 7261 6e67 6520 rs in the range │ │ │ +00009290: 6f66 2031 3630 2074 6f20 3235 3520 6469 of 160 to 255 di │ │ │ +000092a0: 7370 6c61 7920 6e6f 740a 6173 206f 6374 splay not.as oct │ │ │ +000092b0: 616c 2065 7363 6170 6573 2c20 6275 7420 al escapes, but │ │ │ +000092c0: 6173 2061 6363 656e 7465 6420 6368 6172 as accented char │ │ │ +000092d0: 6163 7465 7273 2e0a 5769 7468 2070 7265 acters..With pre │ │ │ +000092e0: 6669 7820 6172 6775 6d65 6e74 2c20 656e fix argument, en │ │ │ +000092f0: 6162 6c65 2045 7572 6f70 6561 6e20 6368 able European ch │ │ │ +00009300: 6172 6163 7465 7220 6469 7370 6c61 7920 aracter display │ │ │ +00009310: 6966 6620 6172 6720 6973 2070 6f73 6974 iff arg is posit │ │ │ +00009320: 6976 652e 1f0a 2861 7574 6f6c 6f61 6420 ive...(autoload │ │ │ +00009330: 2773 7461 6e64 6172 642d 6469 7370 6c61 'standard-displa │ │ │ +00009340: 792d 6575 726f 7065 616e 2022 6469 7370 y-european "disp │ │ │ +00009350: 2d74 6162 6c65 2220 2728 2324 202e 2033 -table" '(#$ . 3 │ │ │ +00009360: 3734 3231 2920 7420 6e69 6c29 0a23 4032 7421) t nil).#@2 │ │ │ +00009370: 3033 2054 656c 6c20 7461 6773 2063 6f6d 03 Tell tags com │ │ │ +00009380: 6d61 6e64 7320 746f 2075 7365 2074 6167 mands to use tag │ │ │ +00009390: 7320 7461 626c 6520 6669 6c65 2046 494c s table file FIL │ │ │ +000093a0: 4520 7768 656e 2061 6c6c 2065 6c73 6520 E when all else │ │ │ +000093b0: 6661 696c 732e 0a46 494c 4520 7368 6f75 fails..FILE shou │ │ │ +000093c0: 6c64 2062 6520 7468 6520 6e61 6d65 206f ld be the name o │ │ │ +000093d0: 6620 6120 6669 6c65 2063 7265 6174 6564 f a file created │ │ │ +000093e0: 2077 6974 6820 7468 6520 6065 7461 6773 with the `etags │ │ │ +000093f0: 2720 7072 6f67 7261 6d2e 0a41 2064 6972 ' program..A dir │ │ │ +00009400: 6563 746f 7279 206e 616d 6520 6973 206f ectory name is o │ │ │ +00009410: 6b20 746f 6f3b 2069 7420 6d65 616e 7320 k too; it means │ │ │ +00009420: 6669 6c65 2054 4147 5320 696e 2074 6861 file TAGS in tha │ │ │ +00009430: 7420 6469 7265 6374 6f72 792e 1f0a 2861 t directory...(a │ │ │ +00009440: 7574 6f6c 6f61 6420 2776 6973 6974 2d74 utoload 'visit-t │ │ │ +00009450: 6167 732d 7461 626c 6520 2265 7461 6773 ags-table "etags │ │ │ +00009460: 2220 2728 2324 202e 2033 3737 3437 2920 " '(#$ . 37747) │ │ │ +00009470: 7420 6e69 6c29 0a23 4031 3631 202a 4669 t nil).#@161 *Fi │ │ │ +00009480: 6e64 2074 6167 2077 686f 7365 206e 616d nd tag whose nam │ │ │ +00009490: 6520 636f 6e74 6169 6e73 2054 4147 4e41 e contains TAGNA │ │ │ +000094a0: 4d45 2e0a 4964 656e 7469 6361 6c20 746f ME..Identical to │ │ │ +000094b0: 2060 6669 6e64 2d74 6167 2720 6275 7420 `find-tag' but │ │ │ +000094c0: 646f 6573 206e 6f74 2070 726f 6d70 7420 does not prompt │ │ │ +000094d0: 666f 7220 7461 6720 7768 656e 2063 616c for tag when cal │ │ │ +000094e0: 6c65 6420 696e 7465 7261 6374 6976 656c led interactivel │ │ │ +000094f0: 793b 0a69 6e73 7465 6164 2c20 7573 6573 y;.instead, uses │ │ │ +00009500: 2074 6167 2061 726f 756e 6420 6f72 2062 tag around or b │ │ │ +00009510: 6566 6f72 6520 706f 696e 742e 1f0a 2861 efore point...(a │ │ │ +00009520: 7574 6f6c 6f61 6420 2766 696e 642d 7461 utoload 'find-ta │ │ │ +00009530: 672d 6174 2d70 6f69 6e74 2022 6574 6167 g-at-point "etag │ │ │ +00009540: 7322 2027 2823 2420 2e20 2d33 3830 3133 s" '(#$ . -38013 │ │ │ +00009550: 2920 7420 6e69 6c29 0a23 4039 3235 202a ) t nil).#@925 * │ │ │ +00009560: 4669 6e64 2074 6167 2077 686f 7365 206e Find tag whose n │ │ │ +00009570: 616d 6520 636f 6e74 6169 6e73 2054 4147 ame contains TAG │ │ │ +00009580: 4e41 4d45 2e0a 2053 656c 6563 7473 2074 NAME.. Selects t │ │ │ +00009590: 6865 2062 7566 6665 7220 7468 6174 2074 he buffer that t │ │ │ +000095a0: 6865 2074 6167 2069 7320 636f 6e74 6169 he tag is contai │ │ │ +000095b0: 6e65 6420 696e 0a61 6e64 2070 7574 7320 ned in.and puts │ │ │ +000095c0: 706f 696e 7420 6174 2069 7473 2064 6566 point at its def │ │ │ +000095d0: 696e 6974 696f 6e2e 0a20 4966 2054 4147 inition.. If TAG │ │ │ +000095e0: 4e41 4d45 2069 7320 6120 6e75 6c6c 2073 NAME is a null s │ │ │ +000095f0: 7472 696e 672c 2074 6865 2065 7870 7265 tring, the expre │ │ │ +00009600: 7373 696f 6e20 696e 2074 6865 2062 7566 ssion in the buf │ │ │ +00009610: 6665 720a 6172 6f75 6e64 206f 7220 6265 fer.around or be │ │ │ +00009620: 666f 7265 2070 6f69 6e74 2069 7320 7573 fore point is us │ │ │ +00009630: 6564 2061 7320 7468 6520 7461 6720 6e61 ed as the tag na │ │ │ +00009640: 6d65 2e0a 2049 6620 6361 6c6c 6564 2069 me.. If called i │ │ │ +00009650: 6e74 6572 6163 7469 7665 6c79 2077 6974 nteractively wit │ │ │ +00009660: 6820 6120 6e75 6d65 7269 6320 6172 6775 h a numeric argu │ │ │ +00009670: 6d65 6e74 2c20 7365 6172 6368 6573 2066 ment, searches f │ │ │ +00009680: 6f72 2074 6865 206e 6578 7420 7461 670a or the next tag. │ │ │ +00009690: 696e 2074 6865 2074 6167 2074 6162 6c65 in the tag table │ │ │ +000096a0: 2074 6861 7420 6d61 7463 6865 7320 7468 that matches th │ │ │ +000096b0: 6520 7461 676e 616d 6520 7573 6564 2069 e tagname used i │ │ │ +000096c0: 6e20 7468 6520 7072 6576 696f 7573 2066 n the previous f │ │ │ +000096d0: 696e 642d 7461 672e 0a20 4966 2073 6563 ind-tag.. If sec │ │ │ +000096e0: 6f6e 6420 6172 6720 4f54 4845 522d 5749 ond arg OTHER-WI │ │ │ +000096f0: 4e44 4f57 2069 7320 6e6f 6e2d 6e69 6c2c NDOW is non-nil, │ │ │ +00009700: 2075 7365 7320 616e 6f74 6865 7220 7769 uses another wi │ │ │ +00009710: 6e64 6f77 2074 6f20 6469 7370 6c61 790a ndow to display. │ │ │ +00009720: 7468 6520 7461 672e 0a0a 5468 6973 2076 the tag...This v │ │ │ +00009730: 6572 7369 6f6e 206f 6620 7468 6973 2066 ersion of this f │ │ │ +00009740: 756e 6374 696f 6e20 7375 7070 6f72 7473 unction supports │ │ │ +00009750: 206d 756c 7469 706c 6520 6163 7469 7665 multiple active │ │ │ +00009760: 2074 6167 7320 7461 626c 6573 2c0a 616e tags tables,.an │ │ │ +00009770: 6420 636f 6d70 6c65 7469 6f6e 2e0a 0a56 d completion...V │ │ │ +00009780: 6172 6961 626c 6573 206f 6620 6e6f 7465 ariables of note │ │ │ +00009790: 3a0a 0a20 2074 6167 2d74 6162 6c65 2d61 :.. tag-table-a │ │ │ +000097a0: 6c69 7374 0909 636f 6e74 726f 6c73 2077 list..controls w │ │ │ +000097b0: 6869 6368 2074 6162 6c65 7320 6170 706c hich tables appl │ │ │ +000097c0: 7920 746f 2077 6869 6368 2062 7566 6665 y to which buffe │ │ │ +000097d0: 7273 0a20 2074 6167 732d 6669 6c65 2d6e rs. tags-file-n │ │ │ +000097e0: 616d 6509 0961 2064 6566 6175 6c74 2074 ame..a default t │ │ │ +000097f0: 6167 7320 7461 626c 650a 2020 7461 6773 ags table. tags │ │ │ +00009800: 2d62 7569 6c64 2d63 6f6d 706c 6574 696f -build-completio │ │ │ +00009810: 6e2d 7461 626c 6520 2020 636f 6e74 726f n-table contro │ │ │ +00009820: 6c73 2063 6f6d 706c 6574 696f 6e20 6265 ls completion be │ │ │ +00009830: 6861 7669 6f72 0a20 2062 7566 6665 722d havior. buffer- │ │ │ +00009840: 7461 672d 7461 626c 6509 0961 6e6f 7468 tag-table..anoth │ │ │ +00009850: 6572 2077 6179 206f 6620 7370 6563 6966 er way of specif │ │ │ +00009860: 7969 6e67 2061 2062 7566 6665 722d 6c6f ying a buffer-lo │ │ │ +00009870: 6361 6c20 7461 626c 650a 2020 6d61 6b65 cal table. make │ │ │ +00009880: 2d74 6167 732d 6669 6c65 732d 696e 7669 -tags-files-invi │ │ │ +00009890: 7369 626c 6509 7768 6574 6865 7220 7461 sible.whether ta │ │ │ +000098a0: 6773 2074 6162 6c65 7320 7368 6f75 6c64 gs tables should │ │ │ +000098b0: 2062 6520 7665 7279 2068 6964 6465 6e0a be very hidden. │ │ │ +000098c0: 2020 7461 672d 6d61 726b 2d73 7461 636b tag-mark-stack │ │ │ +000098d0: 2d6d 6178 0909 686f 7720 6d61 6e79 2074 -max..how many t │ │ │ +000098e0: 6167 732d 6261 7365 6420 686f 7073 2074 ags-based hops t │ │ │ +000098f0: 6f20 7265 6d65 6d62 6572 1f0a 2861 7574 o remember..(aut │ │ │ +00009900: 6f6c 6f61 6420 2766 696e 642d 7461 6720 oload 'find-tag │ │ │ +00009910: 2265 7461 6773 2220 2728 2324 202e 202d "etags" '(#$ . - │ │ │ +00009920: 3338 3233 3929 2074 206e 696c 290a 2340 38239) t nil).#@ │ │ │ +00009930: 3839 3720 2a46 696e 6420 7461 6720 7768 897 *Find tag wh │ │ │ +00009940: 6f73 6520 6e61 6d65 2063 6f6e 7461 696e ose name contain │ │ │ +00009950: 7320 5441 474e 414d 452c 2069 6e20 616e s TAGNAME, in an │ │ │ +00009960: 6f74 6865 7220 7769 6e64 6f77 2e0a 2053 other window.. S │ │ │ +00009970: 656c 6563 7473 2074 6865 2062 7566 6665 elects the buffe │ │ │ +00009980: 7220 7468 6174 2074 6865 2074 6167 2069 r that the tag i │ │ │ +00009990: 7320 636f 6e74 6169 6e65 6420 696e 2069 s contained in i │ │ │ +000099a0: 6e20 616e 6f74 6865 7220 7769 6e64 6f77 n another window │ │ │ +000099b0: 0a61 6e64 2070 7574 7320 706f 696e 7420 .and puts point │ │ │ +000099c0: 6174 2069 7473 2064 6566 696e 6974 696f at its definitio │ │ │ +000099d0: 6e2e 0a20 4966 2054 4147 4e41 4d45 2069 n.. If TAGNAME i │ │ │ +000099e0: 7320 6120 6e75 6c6c 2073 7472 696e 672c s a null string, │ │ │ +000099f0: 2074 6865 2065 7870 7265 7373 696f 6e20 the expression │ │ │ +00009a00: 696e 2074 6865 2062 7566 6665 720a 6172 in the buffer.ar │ │ │ +00009a10: 6f75 6e64 206f 7220 6265 666f 7265 2070 ound or before p │ │ │ +00009a20: 6f69 6e74 2069 7320 7573 6564 2061 7320 oint is used as │ │ │ +00009a30: 7468 6520 7461 6720 6e61 6d65 2e0a 2049 the tag name.. I │ │ │ +00009a40: 6620 7365 636f 6e64 2061 7267 204e 4558 f second arg NEX │ │ │ +00009a50: 5420 6973 206e 6f6e 2d6e 696c 2028 696e T is non-nil (in │ │ │ +00009a60: 7465 7261 6374 6976 656c 792c 2077 6974 teractively, wit │ │ │ +00009a70: 6820 7072 6566 6978 2061 7267 292c 0a73 h prefix arg),.s │ │ │ +00009a80: 6561 7263 6865 7320 666f 7220 7468 6520 earches for the │ │ │ +00009a90: 6e65 7874 2074 6167 2069 6e20 7468 6520 next tag in the │ │ │ +00009aa0: 7461 6720 7461 626c 650a 7468 6174 206d tag table.that m │ │ │ +00009ab0: 6174 6368 6573 2074 6865 2074 6167 6e61 atches the tagna │ │ │ +00009ac0: 6d65 2075 7365 6420 696e 2074 6865 2070 me used in the p │ │ │ +00009ad0: 7265 7669 6f75 7320 6669 6e64 2d74 6167 revious find-tag │ │ │ +00009ae0: 2e0a 0a54 6869 7320 7665 7273 696f 6e20 ...This version │ │ │ +00009af0: 6f66 2074 6869 7320 6675 6e63 7469 6f6e of this function │ │ │ +00009b00: 2073 7570 706f 7274 7320 6d75 6c74 6970 supports multip │ │ │ +00009b10: 6c65 2061 6374 6976 6520 7461 6773 2074 le active tags t │ │ │ +00009b20: 6162 6c65 732c 0a61 6e64 2063 6f6d 706c ables,.and compl │ │ │ +00009b30: 6574 696f 6e2e 0a0a 5661 7269 6162 6c65 etion...Variable │ │ │ +00009b40: 7320 6f66 206e 6f74 653a 0a0a 2020 7461 s of note:.. ta │ │ │ +00009b50: 672d 7461 626c 652d 616c 6973 7409 0963 g-table-alist..c │ │ │ +00009b60: 6f6e 7472 6f6c 7320 7768 6963 6820 7461 ontrols which ta │ │ │ +00009b70: 626c 6573 2061 7070 6c79 2074 6f20 7768 bles apply to wh │ │ │ +00009b80: 6963 6820 6275 6666 6572 730a 2020 7461 ich buffers. ta │ │ │ +00009b90: 6773 2d66 696c 652d 6e61 6d65 0909 6120 gs-file-name..a │ │ │ +00009ba0: 6465 6661 756c 7420 7461 6773 2074 6162 default tags tab │ │ │ +00009bb0: 6c65 0a20 2074 6167 732d 6275 696c 642d le. tags-build- │ │ │ +00009bc0: 636f 6d70 6c65 7469 6f6e 2d74 6162 6c65 completion-table │ │ │ +00009bd0: 2020 2063 6f6e 7472 6f6c 7320 636f 6d70 controls comp │ │ │ +00009be0: 6c65 7469 6f6e 2062 6568 6176 696f 720a letion behavior. │ │ │ +00009bf0: 2020 6275 6666 6572 2d74 6167 2d74 6162 buffer-tag-tab │ │ │ +00009c00: 6c65 0909 616e 6f74 6865 7220 7761 7920 le..another way │ │ │ +00009c10: 6f66 2073 7065 6369 6679 696e 6720 6120 of specifying a │ │ │ +00009c20: 6275 6666 6572 2d6c 6f63 616c 2074 6162 buffer-local tab │ │ │ +00009c30: 6c65 0a20 206d 616b 652d 7461 6773 2d66 le. make-tags-f │ │ │ +00009c40: 696c 6573 2d69 6e76 6973 6962 6c65 0977 iles-invisible.w │ │ │ +00009c50: 6865 7468 6572 2074 6167 7320 7461 626c hether tags tabl │ │ │ +00009c60: 6573 2073 686f 756c 6420 6265 2076 6572 es should be ver │ │ │ +00009c70: 7920 6869 6464 656e 0a20 2074 6167 2d6d y hidden. tag-m │ │ │ +00009c80: 6172 6b2d 7374 6163 6b2d 6d61 7809 0968 ark-stack-max..h │ │ │ +00009c90: 6f77 206d 616e 7920 7461 6773 2d62 6173 ow many tags-bas │ │ │ +00009ca0: 6564 2068 6f70 7320 746f 2072 656d 656d ed hops to remem │ │ │ +00009cb0: 6265 721f 0a28 6175 746f 6c6f 6164 2027 ber..(autoload ' │ │ │ +00009cc0: 6669 6e64 2d74 6167 2d6f 7468 6572 2d77 find-tag-other-w │ │ │ +00009cd0: 696e 646f 7720 2265 7461 6773 2220 2728 indow "etags" '( │ │ │ +00009ce0: 2324 202e 202d 3339 3232 3029 2074 206e #$ . -39220) t n │ │ │ +00009cf0: 696c 290a 2340 3736 2054 6865 2066 756e il).#@76 The fun │ │ │ +00009d00: 6374 696f 6e20 7573 6564 2074 6f20 646f ction used to do │ │ │ +00009d10: 2074 6167 732d 636f 6d70 6c65 7469 6f6e tags-completion │ │ │ +00009d20: 2028 7573 696e 6720 2774 6167 2d63 6f6d (using 'tag-com │ │ │ +00009d30: 706c 6574 696f 6e2d 7072 6564 6963 6174 pletion-predicat │ │ │ +00009d40: 6529 2e1f 0a28 6175 746f 6c6f 6164 2027 e)...(autoload ' │ │ │ +00009d50: 7461 672d 636f 6d70 6c65 7465 2d73 796d tag-complete-sym │ │ │ +00009d60: 626f 6c20 2265 7461 6773 2220 2728 2324 bol "etags" '(#$ │ │ │ +00009d70: 202e 2034 3031 3835 2920 7420 6e69 6c29 . 40185) t nil) │ │ │ +00009d80: 0a23 4034 3834 2053 656c 6563 7420 6e65 .#@484 Select ne │ │ │ +00009d90: 7874 2066 696c 6520 616d 6f6e 6720 6669 xt file among fi │ │ │ +00009da0: 6c65 7320 696e 2063 7572 7265 6e74 2074 les in current t │ │ │ +00009db0: 6167 2074 6162 6c65 2873 292e 0a0a 4120 ag table(s)...A │ │ │ +00009dc0: 6669 7273 7420 6172 6775 6d65 6e74 206f first argument o │ │ │ +00009dd0: 6620 7420 2870 7265 6669 7820 6172 672c f t (prefix arg, │ │ │ +00009de0: 2069 6620 696e 7465 7261 6374 6976 6529 if interactive) │ │ │ +00009df0: 2069 6e69 7469 616c 697a 6573 2074 6f20 initializes to │ │ │ +00009e00: 7468 650a 6265 6769 6e6e 696e 6720 6f66 the.beginning of │ │ │ +00009e10: 2074 6865 206c 6973 7420 6f66 2066 696c the list of fil │ │ │ +00009e20: 6573 2069 6e20 7468 6520 2866 6972 7374 es in the (first │ │ │ +00009e30: 2920 7461 6773 2074 6162 6c65 2e20 2049 ) tags table. I │ │ │ +00009e40: 6620 7468 6520 6172 6775 6d65 6e74 0a69 f the argument.i │ │ │ +00009e50: 7320 6e65 6974 6865 7220 6e69 6c20 6e6f s neither nil no │ │ │ +00009e60: 7220 742c 2069 7420 6973 2065 7661 6c6c r t, it is evall │ │ │ +00009e70: 6564 2074 6f20 696e 6974 6961 6c69 7a65 ed to initialize │ │ │ +00009e80: 2074 6865 206c 6973 7420 6f66 2066 696c the list of fil │ │ │ +00009e90: 6573 2e0a 0a4e 6f6e 2d6e 696c 2073 6563 es...Non-nil sec │ │ │ +00009ea0: 6f6e 6420 6172 6775 6d65 6e74 204e 4f56 ond argument NOV │ │ │ +00009eb0: 4953 4954 206d 6561 6e73 2075 7365 2061 ISIT means use a │ │ │ +00009ec0: 2074 656d 706f 7261 7279 2062 7566 6665 temporary buffe │ │ │ +00009ed0: 720a 746f 2073 6176 6520 7469 6d65 2061 r.to save time a │ │ │ +00009ee0: 6e64 2061 766f 6964 2075 6e69 6e74 6572 nd avoid uninter │ │ │ +00009ef0: 6573 7469 6e67 2077 6172 6e69 6e67 732e esting warnings. │ │ │ +00009f00: 0a0a 5661 6c75 6520 6973 206e 696c 2069 ..Value is nil i │ │ │ +00009f10: 6620 7468 6520 6669 6c65 2077 6173 2061 f the file was a │ │ │ +00009f20: 6c72 6561 6479 2076 6973 6974 6564 3b0a lready visited;. │ │ │ +00009f30: 6966 2074 6865 2066 696c 6520 7761 7320 if the file was │ │ │ +00009f40: 6e65 776c 7920 7265 6164 2069 6e2c 2074 newly read in, t │ │ │ +00009f50: 6865 2076 616c 7565 2069 7320 7468 6520 he value is the │ │ │ +00009f60: 6669 6c65 6e61 6d65 2e1f 0a28 6175 746f filename...(auto │ │ │ +00009f70: 6c6f 6164 2027 6e65 7874 2d66 696c 6520 load 'next-file │ │ │ +00009f80: 2265 7461 6773 2220 2728 2324 202e 2034 "etags" '(#$ . 4 │ │ │ +00009f90: 3033 3237 2920 7420 6e69 6c29 0a23 4035 0327) t nil).#@5 │ │ │ +00009fa0: 3136 2043 6f6e 7469 6e75 6520 6c61 7374 16 Continue last │ │ │ +00009fb0: 205c 5b74 6167 732d 7365 6172 6368 5d20 \[tags-search] │ │ │ +00009fc0: 6f72 205c 5b74 6167 732d 7175 6572 792d or \[tags-query- │ │ │ +00009fd0: 7265 706c 6163 655d 2063 6f6d 6d61 6e64 replace] command │ │ │ +00009fe0: 2e0a 5573 6564 206e 6f6e 696e 7465 7261 ..Used nonintera │ │ │ +00009ff0: 6374 6976 656c 7920 7769 7468 206e 6f6e ctively with non │ │ │ +0000a000: 2d6e 696c 2061 7267 756d 656e 7420 746f -nil argument to │ │ │ +0000a010: 2062 6567 696e 2073 7563 6820 6120 636f begin such a co │ │ │ +0000a020: 6d6d 616e 6420 2874 6865 0a61 7267 756d mmand (the.argum │ │ │ +0000a030: 656e 7420 6973 2070 6173 7365 6420 746f ent is passed to │ │ │ +0000a040: 2060 6e65 7874 2d66 696c 6527 2c20 7768 `next-file', wh │ │ │ +0000a050: 6963 6820 7365 6529 2e0a 5477 6f20 7661 ich see)..Two va │ │ │ +0000a060: 7269 6162 6c65 7320 636f 6e74 726f 6c20 riables control │ │ │ +0000a070: 7468 6520 7072 6f63 6573 7369 6e67 2077 the processing w │ │ │ +0000a080: 6520 646f 206f 6e20 6561 6368 2066 696c e do on each fil │ │ │ +0000a090: 653a 0a74 6865 2076 616c 7565 206f 6620 e:.the value of │ │ │ +0000a0a0: 6074 6167 732d 6c6f 6f70 2d73 6361 6e27 `tags-loop-scan' │ │ │ +0000a0b0: 2069 7320 6120 666f 726d 2074 6f20 6265 is a form to be │ │ │ +0000a0c0: 2065 7865 6375 7465 6420 6f6e 2065 6163 executed on eac │ │ │ +0000a0d0: 6820 6669 6c65 0a74 6f20 7365 6520 6966 h file.to see if │ │ │ +0000a0e0: 2069 7420 6973 2069 6e74 6572 6573 7469 it is interesti │ │ │ +0000a0f0: 6e67 2028 6974 2072 6574 7572 6e73 206e ng (it returns n │ │ │ +0000a100: 6f6e 2d6e 696c 2069 6620 736f 290a 616e on-nil if so).an │ │ │ +0000a110: 6420 6074 6167 732d 6c6f 6f70 2d6f 7065 d `tags-loop-ope │ │ │ +0000a120: 7261 7465 2720 6973 2061 2066 6f72 6d20 rate' is a form │ │ │ +0000a130: 746f 2065 7865 6375 7465 2074 6f20 6f70 to execute to op │ │ │ +0000a140: 6572 6174 6520 6f6e 2061 6e20 696e 7465 erate on an inte │ │ │ +0000a150: 7265 7374 696e 6720 6669 6c65 0a49 6620 resting file.If │ │ │ +0000a160: 7468 6520 6c61 7474 6572 2072 6574 7572 the latter retur │ │ │ +0000a170: 6e73 206e 6f6e 2d6e 696c 2c20 7765 2065 ns non-nil, we e │ │ │ +0000a180: 7869 743b 206f 7468 6572 7769 7365 2077 xit; otherwise w │ │ │ +0000a190: 6520 7363 616e 2074 6865 206e 6578 7420 e scan the next │ │ │ +0000a1a0: 6669 6c65 2e1f 0a28 6175 746f 6c6f 6164 file...(autoload │ │ │ +0000a1b0: 2027 7461 6773 2d6c 6f6f 702d 636f 6e74 'tags-loop-cont │ │ │ +0000a1c0: 696e 7565 2022 6574 6167 7322 2027 2823 inue "etags" '(# │ │ │ +0000a1d0: 2420 2e20 3430 3836 3729 2074 206e 696c $ . 40867) t nil │ │ │ +0000a1e0: 290a 2340 3232 3120 5365 6172 6368 2074 ).#@221 Search t │ │ │ +0000a1f0: 6872 6f75 6768 2061 6c6c 2066 696c 6573 hrough all files │ │ │ +0000a200: 206c 6973 7465 6420 696e 2074 6167 7320 listed in tags │ │ │ +0000a210: 7461 626c 6520 666f 7220 6d61 7463 6820 table for match │ │ │ +0000a220: 666f 7220 5245 4745 5850 2e0a 5374 6f70 for REGEXP..Stop │ │ │ +0000a230: 7320 7768 656e 2061 206d 6174 6368 2069 s when a match i │ │ │ +0000a240: 7320 666f 756e 642e 0a54 6f20 636f 6e74 s found..To cont │ │ │ +0000a250: 696e 7565 2073 6561 7263 6869 6e67 2066 inue searching f │ │ │ +0000a260: 6f72 206e 6578 7420 6d61 7463 682c 2075 or next match, u │ │ │ +0000a270: 7365 2063 6f6d 6d61 6e64 205c 5b74 6167 se command \[tag │ │ │ +0000a280: 732d 6c6f 6f70 2d63 6f6e 7469 6e75 655d s-loop-continue] │ │ │ +0000a290: 2e0a 0a53 6565 2064 6f63 756d 656e 7461 ...See documenta │ │ │ +0000a2a0: 7469 6f6e 206f 6620 7661 7269 6162 6c65 tion of variable │ │ │ +0000a2b0: 2060 7461 672d 7461 626c 652d 616c 6973 `tag-table-alis │ │ │ +0000a2c0: 7427 2e1f 0a28 6175 746f 6c6f 6164 2027 t'...(autoload ' │ │ │ +0000a2d0: 7461 6773 2d73 6561 7263 6820 2265 7461 tags-search "eta │ │ │ +0000a2e0: 6773 2220 2728 2324 202e 2034 3134 3438 gs" '(#$ . 41448 │ │ │ +0000a2f0: 2920 7420 6e69 6c29 0a23 4033 3133 2051 ) t nil).#@313 Q │ │ │ +0000a300: 7565 7279 2d72 6570 6c61 6365 2d72 6567 uery-replace-reg │ │ │ +0000a310: 6578 7020 4652 4f4d 2077 6974 6820 544f exp FROM with TO │ │ │ +0000a320: 2074 6872 6f75 6768 2061 6c6c 2066 696c through all fil │ │ │ +0000a330: 6573 206c 6973 7465 6420 696e 2074 6167 es listed in tag │ │ │ +0000a340: 7320 7461 626c 652e 0a54 6869 7264 2061 s table..Third a │ │ │ +0000a350: 7267 2044 454c 494d 4954 4544 2028 7072 rg DELIMITED (pr │ │ │ +0000a360: 6566 6978 2061 7267 2920 6d65 616e 7320 efix arg) means │ │ │ +0000a370: 7265 706c 6163 6520 6f6e 6c79 2077 6f72 replace only wor │ │ │ +0000a380: 642d 6465 6c69 6d69 7465 6420 6d61 7463 d-delimited matc │ │ │ +0000a390: 6865 732e 0a49 6620 796f 7520 6578 6974 hes..If you exit │ │ │ +0000a3a0: 2028 5c5b 6b65 7962 6f61 7264 2d71 7569 (\[keyboard-qui │ │ │ +0000a3b0: 745d 206f 7220 4553 4329 2c20 796f 7520 t] or ESC), you │ │ │ +0000a3c0: 6361 6e20 7265 7375 6d65 2074 6865 2071 can resume the q │ │ │ +0000a3d0: 7565 7279 2d72 6570 6c61 6365 0a77 6974 uery-replace.wit │ │ │ +0000a3e0: 6820 7468 6520 636f 6d6d 616e 6420 5c5b h the command \[ │ │ │ +0000a3f0: 7461 6773 2d6c 6f6f 702d 636f 6e74 696e tags-loop-contin │ │ │ +0000a400: 7565 5d2e 0a0a 5365 6520 646f 6375 6d65 ue]...See docume │ │ │ +0000a410: 6e74 6174 696f 6e20 6f66 2076 6172 6961 ntation of varia │ │ │ +0000a420: 626c 6520 6074 6167 2d74 6162 6c65 2d61 ble `tag-table-a │ │ │ +0000a430: 6c69 7374 272e 1f0a 2861 7574 6f6c 6f61 list'...(autoloa │ │ │ +0000a440: 6420 2774 6167 732d 7175 6572 792d 7265 d 'tags-query-re │ │ │ +0000a450: 706c 6163 6520 2265 7461 6773 2220 2728 place "etags" '( │ │ │ +0000a460: 2324 202e 2034 3137 3237 2920 7420 6e69 #$ . 41727) t ni │ │ │ +0000a470: 6c29 0a23 4033 3120 4469 7370 6c61 7920 l).#@31 Display │ │ │ +0000a480: 6c69 7374 206f 6620 7461 6773 2069 6e20 list of tags in │ │ │ +0000a490: 4649 4c45 2e1f 0a28 6175 746f 6c6f 6164 FILE...(autoload │ │ │ +0000a4a0: 2027 6c69 7374 2d74 6167 7320 2265 7461 'list-tags "eta │ │ │ +0000a4b0: 6773 2220 2728 2324 202e 2034 3231 3034 gs" '(#$ . 42104 │ │ │ +0000a4c0: 2920 7420 6e69 6c29 0a23 4035 3520 4469 ) t nil).#@55 Di │ │ │ +0000a4d0: 7370 6c61 7920 6c69 7374 206f 6620 616c splay list of al │ │ │ +0000a4e0: 6c20 7461 6773 2069 6e20 7461 6720 7461 l tags in tag ta │ │ │ +0000a4f0: 626c 6520 5245 4745 5850 206d 6174 6368 ble REGEXP match │ │ │ +0000a500: 6573 2e1f 0a28 6175 746f 6c6f 6164 2027 es...(autoload ' │ │ │ +0000a510: 7461 6773 2d61 7072 6f70 6f73 2022 6574 tags-apropos "et │ │ │ +0000a520: 6167 7322 2027 2823 2420 2e20 3432 3139 ags" '(#$ . 4219 │ │ │ +0000a530: 3029 2074 206e 696c 290a 2864 6566 696e 0) t nil).(defin │ │ │ +0000a540: 652d 6b65 7920 6573 632d 6d61 7020 222a e-key esc-map "* │ │ │ +0000a550: 2220 2770 6f70 2d74 6167 2d6d 6172 6b29 " 'pop-tag-mark) │ │ │ +0000a560: 0a23 4031 3738 2047 6f20 746f 206c 6173 .#@178 Go to las │ │ │ +0000a570: 7420 7461 6720 706f 7369 7469 6f6e 2e0a t tag position.. │ │ │ +0000a580: 6066 696e 642d 7461 6727 206d 6169 6e74 `find-tag' maint │ │ │ +0000a590: 6169 6e73 2061 206d 6172 6b2d 7374 6163 ains a mark-stac │ │ │ +0000a5a0: 6b20 7365 7065 7261 7465 2066 726f 6d20 k seperate from │ │ │ +0000a5b0: 7468 6520 5c5b 7365 742d 6d61 726b 2d63 the \[set-mark-c │ │ │ +0000a5c0: 6f6d 6d61 6e64 5d20 6d61 726b 2d73 7461 ommand] mark-sta │ │ │ +0000a5d0: 636b 2e0a 5468 6973 2066 756e 6374 696f ck..This functio │ │ │ +0000a5e0: 6e20 706f 7073 2028 616e 6420 6d6f 7665 n pops (and move │ │ │ +0000a5f0: 7320 746f 2920 7468 6520 7461 6720 6174 s to) the tag at │ │ │ +0000a600: 2074 6865 2074 6f70 206f 6620 7468 6973 the top of this │ │ │ +0000a610: 2073 7461 636b 2e1f 0a28 6175 746f 6c6f stack...(autolo │ │ │ +0000a620: 6164 2027 706f 702d 7461 672d 6d61 726b ad 'pop-tag-mark │ │ │ +0000a630: 2022 6574 6167 7322 2027 2823 2420 2e20 "etags" '(#$ . │ │ │ +0000a640: 3432 3334 3329 2074 206e 696c 290a 2340 42343) t nil).#@ │ │ │ +0000a650: 3130 3320 4469 7370 6c61 7920 4649 4c45 103 Display FILE │ │ │ +0000a660: 2773 2063 6f6d 6d65 6e74 6172 7920 7365 's commentary se │ │ │ +0000a670: 6374 696f 6e2e 0a46 494c 4520 7368 6f75 ction..FILE shou │ │ │ +0000a680: 6c64 2062 6520 696e 2061 2066 6f72 6d20 ld be in a form │ │ │ +0000a690: 7375 6974 6162 6c65 2066 6f72 2070 6173 suitable for pas │ │ │ +0000a6a0: 7369 6e67 2074 6f20 606c 6f63 6174 652d sing to `locate- │ │ │ +0000a6b0: 6c69 6272 6172 7927 2e1f 0a28 6175 746f library'...(auto │ │ │ +0000a6c0: 6c6f 6164 2027 6669 6e64 6572 2d63 6f6d load 'finder-com │ │ │ +0000a6d0: 6d65 6e74 6172 7920 2266 696e 6465 7222 mentary "finder" │ │ │ +0000a6e0: 2027 2823 2420 2e20 3432 3538 3029 2074 '(#$ . 42580) t │ │ │ +0000a6f0: 206e 696c 290a 2340 3431 2046 696e 6420 nil).#@41 Find │ │ │ +0000a700: 7061 636b 6167 6573 206d 6174 6368 696e packages matchin │ │ │ +0000a710: 6720 6120 6769 7665 6e20 6b65 7977 6f72 g a given keywor │ │ │ +0000a720: 642e 1f0a 2861 7574 6f6c 6f61 6420 2766 d...(autoload 'f │ │ │ +0000a730: 696e 6465 722d 6279 2d6b 6579 776f 7264 inder-by-keyword │ │ │ +0000a740: 2022 6669 6e64 6572 2220 2728 2324 202e "finder" '(#$ . │ │ │ +0000a750: 2034 3237 3437 2920 7420 6e69 6c29 0a23 42747) t nil).# │ │ │ +0000a760: 4033 3330 202a 5768 6574 6865 7220 666f @330 *Whether fo │ │ │ +0000a770: 6e74 2d6c 6f63 6b20 7368 6f75 6c64 2061 nt-lock should a │ │ │ +0000a780: 7574 6f6d 6174 6963 616c 6c79 2066 6f6e utomatically fon │ │ │ +0000a790: 7469 6679 2066 696c 6573 2061 7320 7468 tify files as th │ │ │ +0000a7a0: 6579 2772 6520 6c6f 6164 6564 2e0a 5468 ey're loaded..Th │ │ │ +0000a7b0: 6973 2077 696c 6c20 6f6e 6c79 2068 6170 is will only hap │ │ │ +0000a7c0: 7065 6e20 6966 2066 6f6e 742d 6c6f 636b pen if font-lock │ │ │ +0000a7d0: 2068 6173 2066 6f6e 7469 6679 696e 6720 has fontifying │ │ │ +0000a7e0: 6b65 7977 6f72 6473 2066 6f72 2074 6865 keywords for the │ │ │ +0000a7f0: 206d 616a 6f72 0a6d 6f64 6520 6f66 2074 major.mode of t │ │ │ +0000a800: 6865 2066 696c 652e 2020 596f 7520 6361 he file. You ca │ │ │ +0000a810: 6e20 6765 7420 6669 6e65 722d 6772 6169 n get finer-grai │ │ │ +0000a820: 6e65 6420 636f 6e74 726f 6c20 6f76 6572 ned control over │ │ │ +0000a830: 2061 7574 6f2d 666f 6e74 6966 6963 6174 auto-fontificat │ │ │ +0000a840: 696f 6e0a 6279 2075 7369 6e67 2074 6869 ion.by using thi │ │ │ +0000a850: 7320 7661 7269 6162 6c65 2069 6e20 636f s variable in co │ │ │ +0000a860: 6d62 696e 6174 696f 6e20 7769 7468 2060 mbination with ` │ │ │ +0000a870: 666f 6e74 2d6c 6f63 6b2d 6d6f 6465 2d65 font-lock-mode-e │ │ │ +0000a880: 6e61 626c 652d 6c69 7374 2720 6f72 0a60 nable-list' or.` │ │ │ +0000a890: 666f 6e74 2d6c 6f63 6b2d 6d6f 6465 2d64 font-lock-mode-d │ │ │ +0000a8a0: 6973 6162 6c65 2d6c 6973 7427 2e1f 0a28 isable-list'...( │ │ │ +0000a8b0: 6465 6676 6172 2066 6f6e 742d 6c6f 636b defvar font-lock │ │ │ +0000a8c0: 2d61 7574 6f2d 666f 6e74 6966 7920 7420 -auto-fontify t │ │ │ +0000a8d0: 2823 2420 2e20 2d34 3238 3533 2929 0a23 (#$ . -42853)).# │ │ │ +0000a8e0: 4036 3920 2a4c 6973 7420 6f66 206d 6f64 @69 *List of mod │ │ │ +0000a8f0: 6573 2074 6f20 6175 746f 2d66 6f6e 7469 es to auto-fonti │ │ │ +0000a900: 6679 2c20 6966 2060 666f 6e74 2d6c 6f63 fy, if `font-loc │ │ │ +0000a910: 6b2d 6175 746f 2d66 6f6e 7469 6679 2720 k-auto-fontify' │ │ │ +0000a920: 6973 206e 696c 2e1f 0a28 6465 6676 6172 is nil...(defvar │ │ │ +0000a930: 2066 6f6e 742d 6c6f 636b 2d6d 6f64 652d font-lock-mode- │ │ │ +0000a940: 656e 6162 6c65 2d6c 6973 7420 6e69 6c20 enable-list nil │ │ │ +0000a950: 2823 2420 2e20 2d34 3332 3336 2929 0a23 (#$ . -43236)).# │ │ │ +0000a960: 4037 3120 2a4c 6973 7420 6f66 206d 6f64 @71 *List of mod │ │ │ +0000a970: 6573 206e 6f74 2074 6f20 6175 746f 2d66 es not to auto-f │ │ │ +0000a980: 6f6e 7469 6679 2c20 6966 2060 666f 6e74 ontify, if `font │ │ │ +0000a990: 2d6c 6f63 6b2d 6175 746f 2d66 6f6e 7469 -lock-auto-fonti │ │ │ +0000a9a0: 6679 2720 6973 2074 2e1f 0a28 6465 6676 fy' is t...(defv │ │ │ +0000a9b0: 6172 2066 6f6e 742d 6c6f 636b 2d6d 6f64 ar font-lock-mod │ │ │ +0000a9c0: 652d 6469 7361 626c 652d 6c69 7374 206e e-disable-list n │ │ │ +0000a9d0: 696c 2028 2324 202e 202d 3433 3336 3429 il (#$ . -43364) │ │ │ +0000a9e0: 290a 2340 3937 3920 2a53 7065 6369 6669 ).#@979 *Specifi │ │ │ +0000a9f0: 6361 7469 6f6e 2066 6f72 2077 6865 6e20 cation for when │ │ │ +0000aa00: 466f 6e74 204c 6f63 6b20 7769 6c6c 2073 Font Lock will s │ │ │ +0000aa10: 6574 2075 7020 636f 6c6f 7220 6465 6661 et up color defa │ │ │ +0000aa20: 756c 7473 2e0a 4e6f 726d 616c 6c79 2074 ults..Normally t │ │ │ +0000aa30: 6869 7320 7368 6f75 6c64 2062 6520 2728 his should be '( │ │ │ +0000aa40: 636f 6c6f 7229 2c20 6d65 616e 696e 6720 color), meaning │ │ │ +0000aa50: 7468 6174 2046 6f6e 7420 4c6f 636b 2077 that Font Lock w │ │ │ +0000aa60: 696c 6c20 7365 7420 7570 0a63 6f6c 6f72 ill set up.color │ │ │ +0000aa70: 2064 6566 6175 6c74 7320 7468 6174 2061 defaults that a │ │ │ +0000aa80: 7265 206f 6e6c 7920 7573 6564 206f 6e20 re only used on │ │ │ +0000aa90: 636f 6c6f 7220 6469 7370 6c61 7973 2e20 color displays. │ │ │ +0000aaa0: 2053 6574 2074 6869 7320 746f 206e 696c Set this to nil │ │ │ +0000aab0: 0a69 6620 796f 7520 646f 6e27 7420 7761 .if you don't wa │ │ │ +0000aac0: 6e74 2046 6f6e 7420 4c6f 636b 2074 6f20 nt Font Lock to │ │ │ +0000aad0: 7365 7420 7570 2063 6f6c 6f72 2064 6566 set up color def │ │ │ +0000aae0: 6175 6c74 7320 6174 2061 6c6c 2e20 2054 aults at all. T │ │ │ +0000aaf0: 6869 730a 7368 6f75 6c64 2062 6520 6f6e his.should be on │ │ │ +0000ab00: 6520 6f66 0a0a 2d2d 2061 206c 6973 7420 e of..-- a list │ │ │ +0000ab10: 6f66 2076 616c 6964 2074 6167 732c 206d of valid tags, m │ │ │ +0000ab20: 6561 6e69 6e67 2074 6861 7420 7468 6520 eaning that the │ │ │ +0000ab30: 636f 6c6f 7220 6465 6661 756c 7473 2077 color defaults w │ │ │ +0000ab40: 696c 6c20 6265 2075 7365 640a 2020 2077 ill be used. w │ │ │ +0000ab50: 6865 6e20 616c 6c20 6f66 2074 6865 2074 hen all of the t │ │ │ +0000ab60: 6167 7320 6170 706c 792e 2028 652e 672e ags apply. (e.g. │ │ │ +0000ab70: 2027 2863 6f6c 6f72 2078 2929 0a2d 2d20 '(color x)).-- │ │ │ +0000ab80: 6120 6c69 7374 2077 686f 7365 2066 6972 a list whose fir │ │ │ +0000ab90: 7374 2065 6c65 6d65 6e74 2069 7320 276f st element is 'o │ │ │ +0000aba0: 7220 616e 6420 7768 6f73 6520 7265 6d61 r and whose rema │ │ │ +0000abb0: 696e 696e 6720 656c 656d 656e 7473 2061 ining elements a │ │ │ +0000abc0: 7265 0a20 2020 6c69 7374 7320 6f66 2076 re. lists of v │ │ │ +0000abd0: 616c 6964 2074 6167 732c 206d 6561 6e69 alid tags, meani │ │ │ +0000abe0: 6e67 2074 6861 7420 7468 6520 6465 6661 ng that the defa │ │ │ +0000abf0: 756c 7473 2077 696c 6c20 6265 2075 7365 ults will be use │ │ │ +0000ac00: 6420 7768 656e 0a20 2020 616e 7920 6f66 d when. any of │ │ │ +0000ac10: 2074 6865 2074 6167 206c 6973 7473 2061 the tag lists a │ │ │ +0000ac20: 7070 6c79 2e0a 2d2d 206e 696c 2c20 6d65 pply..-- nil, me │ │ │ +0000ac30: 616e 696e 6720 7468 6174 2074 6865 2064 aning that the d │ │ │ +0000ac40: 6566 6175 6c74 7320 7368 6f75 6c64 206e efaults should n │ │ │ +0000ac50: 6f74 2062 6520 7365 7420 7570 2061 7420 ot be set up at │ │ │ +0000ac60: 616c 6c2e 0a0a 2849 6620 796f 7520 7370 all...(If you sp │ │ │ +0000ac70: 6563 6966 7920 6661 6365 2076 616c 7565 ecify face value │ │ │ +0000ac80: 7320 696e 2079 6f75 7220 696e 6974 2066 s in your init f │ │ │ +0000ac90: 696c 652c 2074 6865 7920 7769 6c6c 206f ile, they will o │ │ │ +0000aca0: 7665 7272 6964 6520 616e 790a 7468 6174 verride any.that │ │ │ +0000acb0: 2046 6f6e 7420 4c6f 636b 2073 7065 6369 Font Lock speci │ │ │ +0000acc0: 6669 6573 2c20 7265 6761 7264 6c65 7373 fies, regardless │ │ │ +0000acd0: 206f 6620 7768 6574 6865 7220 796f 7520 of whether you │ │ │ +0000ace0: 7370 6563 6966 7920 7468 6520 6661 6365 specify the face │ │ │ +0000acf0: 0a76 616c 7565 7320 6265 666f 7265 206f .values before o │ │ │ +0000ad00: 7220 6166 7465 7220 6c6f 6164 696e 6720 r after loading │ │ │ +0000ad10: 466f 6e74 204c 6f63 6b2e 290a 0a53 6565 Font Lock.)..See │ │ │ +0000ad20: 2061 6c73 6f20 6066 6f6e 742d 6c6f 636b also `font-lock │ │ │ +0000ad30: 2d75 7365 2d66 6f6e 7473 272e 2020 4966 -use-fonts'. If │ │ │ +0000ad40: 2079 6f75 2077 616e 7420 6d6f 7265 2063 you want more c │ │ │ +0000ad50: 6f6e 7472 6f6c 206f 7665 7220 7468 6520 ontrol over the │ │ │ +0000ad60: 6661 6365 730a 7573 6564 2066 6f72 2066 faces.used for f │ │ │ +0000ad70: 6f6e 7469 6669 6361 7469 6f6e 2c20 7365 ontification, se │ │ │ +0000ad80: 6520 7468 6520 646f 6375 6d65 6e74 6174 e the documentat │ │ │ +0000ad90: 696f 6e20 6f66 2060 666f 6e74 2d6c 6f63 ion of `font-loc │ │ │ +0000ada0: 6b2d 6d6f 6465 2720 666f 720a 686f 7720 k-mode' for.how │ │ │ +0000adb0: 746f 2064 6f20 6974 2e1f 0a28 6465 6676 to do it...(defv │ │ │ +0000adc0: 6172 2066 6f6e 742d 6c6f 636b 2d75 7365 ar font-lock-use │ │ │ +0000add0: 2d63 6f6c 6f72 7320 2728 636f 6c6f 7229 -colors '(color) │ │ │ +0000ade0: 2028 2324 202e 202d 3433 3439 3629 290a (#$ . -43496)). │ │ │ +0000adf0: 2340 3130 3336 202a 5370 6563 6966 6963 #@1036 *Specific │ │ │ +0000ae00: 6174 696f 6e20 666f 7220 7768 656e 2046 ation for when F │ │ │ +0000ae10: 6f6e 7420 4c6f 636b 2077 696c 6c20 7365 ont Lock will se │ │ │ +0000ae20: 7420 7570 206e 6f6e 2d63 6f6c 6f72 2064 t up non-color d │ │ │ +0000ae30: 6566 6175 6c74 732e 0a0a 4e6f 726d 616c efaults...Normal │ │ │ +0000ae40: 6c79 2074 6869 7320 7368 6f75 6c64 2062 ly this should b │ │ │ +0000ae50: 6520 2728 6f72 2028 6d6f 6e6f 2920 2867 e '(or (mono) (g │ │ │ +0000ae60: 7261 7973 6361 6c65 2929 2c20 6d65 616e rayscale)), mean │ │ │ +0000ae70: 696e 6720 7468 6174 2046 6f6e 740a 4c6f ing that Font.Lo │ │ │ +0000ae80: 636b 2077 696c 6c20 7365 7420 7570 206e ck will set up n │ │ │ +0000ae90: 6f6e 2d63 6f6c 6f72 2064 6566 6175 6c74 on-color default │ │ │ +0000aea0: 7320 7468 6174 2061 7265 206f 6e6c 7920 s that are only │ │ │ +0000aeb0: 7573 6564 206f 6e20 6569 7468 6572 206d used on either m │ │ │ +0000aec0: 6f6e 6f0a 6f72 2067 7261 7973 6361 6c65 ono.or grayscale │ │ │ +0000aed0: 2064 6973 706c 6179 732e 2020 5365 7420 displays. Set │ │ │ +0000aee0: 7468 6973 2074 6f20 6e69 6c20 6966 2079 this to nil if y │ │ │ +0000aef0: 6f75 2064 6f6e 2774 2077 616e 7420 466f ou don't want Fo │ │ │ +0000af00: 6e74 204c 6f63 6b20 746f 0a73 6574 2075 nt Lock to.set u │ │ │ +0000af10: 7020 6e6f 6e2d 636f 6c6f 7220 6465 6661 p non-color defa │ │ │ +0000af20: 756c 7473 2061 7420 616c 6c2e 2020 5468 ults at all. Th │ │ │ +0000af30: 6973 2073 686f 756c 6420 6265 206f 6e65 is should be one │ │ │ +0000af40: 206f 660a 0a2d 2d20 6120 6c69 7374 206f of..-- a list o │ │ │ +0000af50: 6620 7661 6c69 6420 7461 6773 2c20 6d65 f valid tags, me │ │ │ +0000af60: 616e 696e 6720 7468 6174 2074 6865 206e aning that the n │ │ │ +0000af70: 6f6e 2d63 6f6c 6f72 2064 6566 6175 6c74 on-color default │ │ │ +0000af80: 7320 7769 6c6c 2062 6520 7573 6564 0a20 s will be used. │ │ │ +0000af90: 2020 7768 656e 2061 6c6c 206f 6620 7468 when all of th │ │ │ +0000afa0: 6520 7461 6773 2061 7070 6c79 2e20 2865 e tags apply. (e │ │ │ +0000afb0: 2e67 2e20 2728 6772 6179 7363 616c 6520 .g. '(grayscale │ │ │ +0000afc0: 7829 290a 2d2d 2061 206c 6973 7420 7768 x)).-- a list wh │ │ │ +0000afd0: 6f73 6520 6669 7273 7420 656c 656d 656e ose first elemen │ │ │ +0000afe0: 7420 6973 2027 6f72 2061 6e64 2077 686f t is 'or and who │ │ │ +0000aff0: 7365 2072 656d 6169 6e69 6e67 2065 6c65 se remaining ele │ │ │ +0000b000: 6d65 6e74 7320 6172 650a 2020 206c 6973 ments are. lis │ │ │ +0000b010: 7473 206f 6620 7661 6c69 6420 7461 6773 ts of valid tags │ │ │ +0000b020: 2c20 6d65 616e 696e 6720 7468 6174 2074 , meaning that t │ │ │ +0000b030: 6865 2064 6566 6175 6c74 7320 7769 6c6c he defaults will │ │ │ +0000b040: 2062 6520 7573 6564 2077 6865 6e0a 2020 be used when. │ │ │ +0000b050: 2061 6e79 206f 6620 7468 6520 7461 6720 any of the tag │ │ │ +0000b060: 6c69 7374 7320 6170 706c 792e 0a2d 2d20 lists apply..-- │ │ │ +0000b070: 6e69 6c2c 206d 6561 6e69 6e67 2074 6861 nil, meaning tha │ │ │ +0000b080: 7420 7468 6520 6465 6661 756c 7473 2073 t the defaults s │ │ │ +0000b090: 686f 756c 6420 6e6f 7420 6265 2073 6574 hould not be set │ │ │ +0000b0a0: 2075 7020 6174 2061 6c6c 2e0a 0a28 4966 up at all...(If │ │ │ +0000b0b0: 2079 6f75 2073 7065 6369 6679 2066 6163 you specify fac │ │ │ +0000b0c0: 6520 7661 6c75 6573 2069 6e20 796f 7572 e values in your │ │ │ +0000b0d0: 2069 6e69 7420 6669 6c65 2c20 7468 6579 init file, they │ │ │ +0000b0e0: 2077 696c 6c20 6f76 6572 7269 6465 2061 will override a │ │ │ +0000b0f0: 6e79 0a74 6861 7420 466f 6e74 204c 6f63 ny.that Font Loc │ │ │ +0000b100: 6b20 7370 6563 6966 6965 732c 2072 6567 k specifies, reg │ │ │ +0000b110: 6172 646c 6573 7320 6f66 2077 6865 7468 ardless of wheth │ │ │ +0000b120: 6572 2079 6f75 2073 7065 6369 6679 2074 er you specify t │ │ │ +0000b130: 6865 2066 6163 650a 7661 6c75 6573 2062 he face.values b │ │ │ +0000b140: 6566 6f72 6520 6f72 2061 6674 6572 206c efore or after l │ │ │ +0000b150: 6f61 6469 6e67 2046 6f6e 7420 4c6f 636b oading Font Lock │ │ │ +0000b160: 2e29 0a0a 5365 6520 616c 736f 2060 666f .)..See also `fo │ │ │ +0000b170: 6e74 2d6c 6f63 6b2d 7573 652d 636f 6c6f nt-lock-use-colo │ │ │ +0000b180: 7273 272e 2020 4966 2079 6f75 2077 616e rs'. If you wan │ │ │ +0000b190: 7420 6d6f 7265 2063 6f6e 7472 6f6c 206f t more control o │ │ │ +0000b1a0: 7665 7220 7468 6520 6661 6365 730a 7573 ver the faces.us │ │ │ +0000b1b0: 6564 2066 6f72 2066 6f6e 7469 6669 6361 ed for fontifica │ │ │ +0000b1c0: 7469 6f6e 2c20 7365 6520 7468 6520 646f tion, see the do │ │ │ +0000b1d0: 6375 6d65 6e74 6174 696f 6e20 6f66 2060 cumentation of ` │ │ │ +0000b1e0: 666f 6e74 2d6c 6f63 6b2d 6d6f 6465 2720 font-lock-mode' │ │ │ +0000b1f0: 666f 720a 686f 7720 746f 2064 6f20 6974 for.how to do it │ │ │ +0000b200: 2e1f 0a28 6465 6676 6172 2066 6f6e 742d ...(defvar font- │ │ │ +0000b210: 6c6f 636b 2d75 7365 2d66 6f6e 7473 2027 lock-use-fonts ' │ │ │ +0000b220: 286f 7220 286d 6f6e 6f29 2028 6772 6179 (or (mono) (gray │ │ │ +0000b230: 7363 616c 6529 2920 2823 2420 2e20 2d34 scale)) (#$ . -4 │ │ │ +0000b240: 3435 3335 2929 0a23 4035 3738 202a 4966 4535)).#@578 *If │ │ │ +0000b250: 206e 6f6e 2d6e 696c 2c20 7468 6520 6d61 non-nil, the ma │ │ │ +0000b260: 7869 6d75 6d20 6465 636f 7261 7469 6f6e ximum decoration │ │ │ +0000b270: 206c 6576 656c 2066 6f72 2066 6f6e 7469 level for fonti │ │ │ +0000b280: 6679 696e 672e 0a49 6620 6e69 6c2c 2075 fying..If nil, u │ │ │ +0000b290: 7365 2074 6865 206d 696e 696d 756d 2064 se the minimum d │ │ │ +0000b2a0: 6563 6f72 6174 696f 6e20 2865 7175 6976 ecoration (equiv │ │ │ +0000b2b0: 616c 656e 7420 746f 206c 6576 656c 2030 alent to level 0 │ │ │ +0000b2c0: 292e 0a49 6620 742c 2075 7365 2074 6865 )..If t, use the │ │ │ +0000b2d0: 206d 6178 696d 756d 2064 6563 6f72 6174 maximum decorat │ │ │ +0000b2e0: 696f 6e20 6176 6169 6c61 626c 652e 0a49 ion available..I │ │ │ +0000b2f0: 6620 6120 6e75 6d62 6572 2c20 7573 6520 f a number, use │ │ │ +0000b300: 7468 6174 206c 6576 656c 206f 6620 6465 that level of de │ │ │ +0000b310: 636f 7261 7469 6f6e 2028 6f72 2069 6620 coration (or if │ │ │ +0000b320: 6e6f 7420 6176 6169 6c61 626c 6520 7468 not available th │ │ │ +0000b330: 6520 6d61 7869 6d75 6d29 2e0a 4966 2061 e maximum)..If a │ │ │ +0000b340: 206c 6973 742c 2065 6163 6820 656c 656d list, each elem │ │ │ +0000b350: 656e 7420 7368 6f75 6c64 2062 6520 6120 ent should be a │ │ │ +0000b360: 636f 6e73 2070 6169 7220 6f66 2074 6865 cons pair of the │ │ │ +0000b370: 2066 6f72 6d20 284d 414a 4f52 2d4d 4f44 form (MAJOR-MOD │ │ │ +0000b380: 4520 2e20 4c45 5645 4c29 2c0a 7768 6572 E . LEVEL),.wher │ │ │ +0000b390: 6520 4d41 4a4f 522d 4d4f 4445 2069 7320 e MAJOR-MODE is │ │ │ +0000b3a0: 6120 7379 6d62 6f6c 206f 7220 7420 286d a symbol or t (m │ │ │ +0000b3b0: 6561 6e69 6e67 2074 6865 2064 6566 6175 eaning the defau │ │ │ +0000b3c0: 6c74 292e 2020 466f 7220 6578 616d 706c lt). For exampl │ │ │ +0000b3d0: 653a 0a20 2828 632b 2b2d 6d6f 6465 202e e:. ((c++-mode . │ │ │ +0000b3e0: 2032 2920 2863 2d6d 6f64 6520 2e20 7429 2) (c-mode . t) │ │ │ +0000b3f0: 2028 7420 2e20 3129 290a 6d65 616e 7320 (t . 1)).means │ │ │ +0000b400: 7573 6520 6c65 7665 6c20 3220 6465 636f use level 2 deco │ │ │ +0000b410: 7261 7469 6f6e 2066 6f72 2062 7566 6665 ration for buffe │ │ │ +0000b420: 7273 2069 6e20 6063 2b2b 2d6d 6f64 6527 rs in `c++-mode' │ │ │ +0000b430: 2c20 7468 6520 6d61 7869 6d75 6d20 6465 , the maximum de │ │ │ +0000b440: 636f 7261 7469 6f6e 0a61 7661 696c 6162 coration.availab │ │ │ +0000b450: 6c65 2066 6f72 2062 7566 6665 7273 2069 le for buffers i │ │ │ +0000b460: 6e20 6063 2d6d 6f64 6527 2c20 616e 6420 n `c-mode', and │ │ │ +0000b470: 6c65 7665 6c20 3120 6465 636f 7261 7469 level 1 decorati │ │ │ +0000b480: 6f6e 206f 7468 6572 7769 7365 2e1f 0a28 on otherwise...( │ │ │ +0000b490: 6465 6676 6172 2066 6f6e 742d 6c6f 636b defvar font-lock │ │ │ +0000b4a0: 2d6d 6178 696d 756d 2d64 6563 6f72 6174 -maximum-decorat │ │ │ +0000b4b0: 696f 6e20 7420 2823 2420 2e20 2d34 3536 ion t (#$ . -456 │ │ │ +0000b4c0: 3435 2929 0a28 6279 7465 2d63 6f64 6520 45)).(byte-code │ │ │ +0000b4d0: 22c4 c51a 1bc6 0b21 ad84 c65c 6e21 3fc6 "......!...\n!?. │ │ │ +0000b4e0: 0b21 ad82 0b4a 1918 c70b 5c6e 5c22 88c8 .!...J....\n\".. │ │ │ +0000b4f0: 0b5c 6e5c 2288 08ad 835c 6e09 4c2a 882a .\n\"....\n.L*.* │ │ │ +0000b500: c487 2220 5b6e 6565 6473 2d73 6574 7469 .." [needs-setti │ │ │ +0000b510: 6e67 2076 616c 7565 206e 6577 7661 7220 ng value newvar │ │ │ +0000b520: 6f6c 6476 6172 2066 6f6e 742d 6c6f 636b oldvar font-lock │ │ │ +0000b530: 2d75 7365 2d6d 6178 696d 616c 2d64 6563 -use-maximal-dec │ │ │ +0000b540: 6f72 6174 696f 6e20 666f 6e74 2d6c 6f63 oration font-loc │ │ │ +0000b550: 6b2d 6d61 7869 6d75 6d2d 6465 636f 7261 k-maximum-decora │ │ │ +0000b560: 7469 6f6e 2062 6f75 6e64 7020 6465 6676 tion boundp defv │ │ │ +0000b570: 6172 616c 6961 7320 6d61 6b65 2d6f 6273 aralias make-obs │ │ │ +0000b580: 6f6c 6574 652d 7661 7269 6162 6c65 5d20 olete-variable] │ │ │ +0000b590: 3329 0a23 4035 3337 202a 4966 206e 6f6e 3).#@537 *If non │ │ │ +0000b5a0: 2d6e 696c 2c20 7468 6520 6d61 7869 6d75 -nil, the maximu │ │ │ +0000b5b0: 6d20 7369 7a65 2066 6f72 2062 7566 6665 m size for buffe │ │ │ +0000b5c0: 7273 2066 6f72 2066 6f6e 7469 6679 696e rs for fontifyin │ │ │ +0000b5d0: 672e 0a4f 6e6c 7920 6275 6666 6572 7320 g..Only buffers │ │ │ +0000b5e0: 6c65 7373 2074 6861 6e20 7468 6973 2063 less than this c │ │ │ +0000b5f0: 616e 2062 6520 666f 6e74 6966 6965 6420 an be fontified │ │ │ +0000b600: 7768 656e 2046 6f6e 7420 4c6f 636b 206d when Font Lock m │ │ │ +0000b610: 6f64 6520 6973 2074 7572 6e65 6420 6f6e ode is turned on │ │ │ +0000b620: 2e0a 4966 206e 696c 2c20 6d65 616e 7320 ..If nil, means │ │ │ +0000b630: 7369 7a65 2069 7320 6972 7265 6c65 7661 size is irreleva │ │ │ +0000b640: 6e74 2e0a 4966 2061 206c 6973 742c 2065 nt..If a list, e │ │ │ +0000b650: 6163 6820 656c 656d 656e 7420 7368 6f75 ach element shou │ │ │ +0000b660: 6c64 2062 6520 6120 636f 6e73 2070 6169 ld be a cons pai │ │ │ +0000b670: 7220 6f66 2074 6865 2066 6f72 6d20 284d r of the form (M │ │ │ +0000b680: 414a 4f52 2d4d 4f44 4520 2e20 5349 5a45 AJOR-MODE . SIZE │ │ │ +0000b690: 292c 0a77 6865 7265 204d 414a 4f52 2d4d ),.where MAJOR-M │ │ │ +0000b6a0: 4f44 4520 6973 2061 2073 796d 626f 6c20 ODE is a symbol │ │ │ +0000b6b0: 6f72 2074 2028 6d65 616e 696e 6720 7468 or t (meaning th │ │ │ +0000b6c0: 6520 6465 6661 756c 7429 2e20 2046 6f72 e default). For │ │ │ +0000b6d0: 2065 7861 6d70 6c65 3a0a 2028 2863 2b2b example:. ((c++ │ │ │ +0000b6e0: 2d6d 6f64 6520 2e20 3235 3630 3030 2920 -mode . 256000) │ │ │ +0000b6f0: 2863 2d6d 6f64 6520 2e20 3235 3630 3030 (c-mode . 256000 │ │ │ +0000b700: 2920 2872 6d61 696c 2d6d 6f64 6520 2e20 ) (rmail-mode . │ │ │ +0000b710: 3130 3438 3537 3629 290a 6d65 616e 7320 1048576)).means │ │ │ +0000b720: 7468 6174 2074 6865 206d 6178 696d 756d that the maximum │ │ │ +0000b730: 2073 697a 6520 6973 2032 3530 4b20 666f size is 250K fo │ │ │ +0000b740: 7220 6275 6666 6572 7320 696e 2060 632b r buffers in `c+ │ │ │ +0000b750: 2b2d 6d6f 6465 2720 6f72 2060 632d 6d6f +-mode' or `c-mo │ │ │ +0000b760: 6465 272c 206f 6e65 0a6d 6567 6162 7974 de', one.megabyt │ │ │ +0000b770: 6520 666f 7220 6275 6666 6572 7320 696e e for buffers in │ │ │ +0000b780: 2060 726d 6169 6c2d 6d6f 6465 272c 2061 `rmail-mode', a │ │ │ +0000b790: 6e64 2073 697a 6520 6973 2069 7272 656c nd size is irrel │ │ │ +0000b7a0: 6576 616e 7420 6f74 6865 7277 6973 652e evant otherwise. │ │ │ +0000b7b0: 1f0a 2864 6566 7661 7220 666f 6e74 2d6c ..(defvar font-l │ │ │ +0000b7c0: 6f63 6b2d 6d61 7869 6d75 6d2d 7369 7a65 ock-maximum-size │ │ │ +0000b7d0: 2032 3536 3030 3020 2823 2420 2e20 2d34 256000 (#$ . -4 │ │ │ +0000b7e0: 3634 3839 2929 0a23 4031 3033 202a 4966 6489)).#@103 *If │ │ │ +0000b7f0: 206e 6f6e 2d6e 696c 2c20 6170 706c 7920 non-nil, apply │ │ │ +0000b800: 666f 6e74 2d6c 6f63 6b2d 7374 7269 6e67 font-lock-string │ │ │ +0000b810: 2d66 6163 6520 746f 2073 7472 696e 6720 -face to string │ │ │ +0000b820: 6465 6c69 6d69 7465 7273 2061 7320 7765 delimiters as we │ │ │ +0000b830: 6c6c 2061 730a 7374 7269 6e67 2074 6578 ll as.string tex │ │ │ +0000b840: 7420 7768 656e 2066 6f6e 7469 6679 696e t when fontifyin │ │ │ +0000b850: 672e 1f0a 2864 6566 7661 7220 666f 6e74 g...(defvar font │ │ │ +0000b860: 2d6c 6f63 6b2d 666f 6e74 6966 792d 7374 -lock-fontify-st │ │ │ +0000b870: 7269 6e67 2d64 656c 696d 6974 6572 7320 ring-delimiters │ │ │ +0000b880: 6e69 6c20 2823 2420 2e20 2d34 3730 3835 nil (#$ . -47085 │ │ │ +0000b890: 2929 0a23 4035 3933 3220 4120 6c69 7374 )).#@5932 A list │ │ │ +0000b8a0: 2064 6566 696e 696e 6720 7468 6520 6b65 defining the ke │ │ │ +0000b8b0: 7977 6f72 6473 2066 6f72 2060 666f 6e74 ywords for `font │ │ │ +0000b8c0: 2d6c 6f63 6b2d 6d6f 6465 2720 746f 2068 -lock-mode' to h │ │ │ +0000b8d0: 6967 686c 6967 6874 2e0a 0a20 464f 4e54 ighlight... FONT │ │ │ +0000b8e0: 2d4c 4f43 4b2d 4b45 5957 4f52 4453 203a -LOCK-KEYWORDS : │ │ │ +0000b8f0: 3d20 4c69 7374 206f 6620 464f 4e54 2d4c = List of FONT-L │ │ │ +0000b900: 4f43 4b2d 464f 524d 2773 2e0a 0a20 464f OCK-FORM's... FO │ │ │ +0000b910: 4e54 2d4c 4f43 4b2d 464f 524d 2020 2020 NT-LOCK-FORM │ │ │ +0000b920: 203a 3d3d 204d 4154 4348 4552 0a20 2020 :== MATCHER. │ │ │ +0000b930: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000b940: 2020 207c 2028 4d41 5443 4845 5220 2e20 | (MATCHER . │ │ │ +0000b950: 4d41 5443 4829 0a20 2020 2020 2020 2020 MATCH). │ │ │ +0000b960: 2020 2020 2020 2020 2020 2020 207c 2028 | ( │ │ │ +0000b970: 4d41 5443 4845 5220 2e20 4641 4345 2d46 MATCHER . FACE-F │ │ │ +0000b980: 4f52 4d29 0a20 2020 2020 2020 2020 2020 ORM). │ │ │ +0000b990: 2020 2020 2020 2020 2020 207c 2028 4d41 | (MA │ │ │ +0000b9a0: 5443 4845 5220 2e20 4849 4748 4c49 4748 TCHER . HIGHLIGH │ │ │ +0000b9b0: 5429 0a20 2020 2020 2020 2020 2020 2020 T). │ │ │ +0000b9c0: 2020 2020 2020 2020 207c 2028 4d41 5443 | (MATC │ │ │ +0000b9d0: 4845 5220 4849 4748 4c49 4748 5420 2e2e HER HIGHLIGHT .. │ │ │ +0000b9e0: 2e29 0a20 2020 2020 2020 2020 2020 2020 .). │ │ │ +0000b9f0: 2020 2020 2020 2020 207c 2028 6576 616c | (eval │ │ │ +0000ba00: 202e 2046 4f52 4d29 0a0a 204d 4154 4348 . FORM).. MATCH │ │ │ +0000ba10: 4552 2020 2020 2020 2020 2020 2020 3a3d ER := │ │ │ +0000ba20: 3d20 4120 7374 7269 6e67 2063 6f6e 7461 = A string conta │ │ │ +0000ba30: 696e 696e 6720 6120 7265 6765 7870 2e0a ining a regexp.. │ │ │ +0000ba40: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000ba50: 2020 2020 2020 7c20 4120 7661 7269 6162 | A variab │ │ │ +0000ba60: 6c65 2063 6f6e 7461 696e 696e 6720 6120 le containing a │ │ │ +0000ba70: 7265 6765 7870 2074 6f20 7365 6172 6368 regexp to search │ │ │ +0000ba80: 2066 6f72 2e0a 2020 2020 2020 2020 2020 for.. │ │ │ +0000ba90: 2020 2020 2020 2020 2020 2020 7c20 4120 | A │ │ │ +0000baa0: 6675 6e63 7469 6f6e 2074 6f20 6361 6c6c function to call │ │ │ +0000bab0: 2074 6f20 6d61 6b65 2074 6865 2073 6561 to make the sea │ │ │ +0000bac0: 7263 682e 0a20 2020 2020 2020 2020 2020 rch.. │ │ │ +0000bad0: 2020 2020 2020 2020 2020 2020 2049 7420 It │ │ │ +0000bae0: 6973 2063 616c 6c65 6420 7769 7468 206f is called with o │ │ │ +0000baf0: 6e65 2061 7267 2c20 7468 6520 6c69 6d69 ne arg, the limi │ │ │ +0000bb00: 7420 6f66 2074 6865 2073 6561 7263 682c t of the search, │ │ │ +0000bb10: 0a20 2020 2020 2020 2020 2020 2020 2020 . │ │ │ +0000bb20: 2020 2020 2020 2020 2061 6e64 2073 686f and sho │ │ │ +0000bb30: 756c 6420 6c65 6176 6520 4d41 5443 4820 uld leave MATCH │ │ │ +0000bb40: 7265 7375 6c74 7320 696e 2074 6865 2058 results in the X │ │ │ +0000bb50: 456d 6163 7320 676c 6f62 616c 0a20 2020 Emacs global. │ │ │ +0000bb60: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000bb70: 2020 2020 206d 6174 6368 2064 6174 612e match data. │ │ │ +0000bb80: 0a0a 204d 4154 4348 2020 2020 2020 2020 .. MATCH │ │ │ +0000bb90: 2020 2020 2020 3a3d 3d20 416e 2069 6e74 :== An int │ │ │ +0000bba0: 6567 6572 206d 6174 6368 2073 7562 6578 eger match subex │ │ │ +0000bbb0: 7072 6573 7369 6f6e 206e 756d 6265 7220 pression number │ │ │ +0000bbc0: 6672 6f6d 204d 4154 4348 4552 2e0a 0a20 from MATCHER... │ │ │ +0000bbd0: 4641 4345 2d46 4f52 4d20 2020 2020 2020 FACE-FORM │ │ │ +0000bbe0: 2020 2020 3a3d 3d20 5468 6520 7379 6d62 :== The symb │ │ │ +0000bbf0: 6f6c 206e 616d 696e 6720 6120 6465 6669 ol naming a defi │ │ │ +0000bc00: 6e65 6420 6661 6365 2e0a 2020 2020 2020 ned face.. │ │ │ +0000bc10: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000bc20: 7c20 4578 7072 6573 7369 6f6e 2077 686f | Expression who │ │ │ +0000bc30: 7320 7661 6c75 6520 6973 2074 6865 2066 s value is the f │ │ │ +0000bc40: 6163 6520 6e61 6d65 2074 6f20 7573 652e ace name to use. │ │ │ +0000bc50: 2020 4966 2079 6f75 0a20 2020 2020 2020 If you. │ │ │ +0000bc60: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000bc70: 2077 616e 7420 4641 4345 2d46 4f52 4d20 want FACE-FORM │ │ │ +0000bc80: 746f 2062 6520 6120 7379 6d62 6f6c 2074 to be a symbol t │ │ │ +0000bc90: 6861 7420 6576 616c 7561 7465 7320 746f hat evaluates to │ │ │ +0000bca0: 2061 2066 6163 652c 0a20 2020 2020 2020 a face,. │ │ │ +0000bcb0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000bcc0: 2075 7365 2061 2066 6f72 6d20 6c69 6b65 use a form like │ │ │ +0000bcd0: 2022 2870 726f 676e 2073 796d 2922 2e0a "(progn sym)".. │ │ │ +0000bce0: 0a20 4849 4748 4c49 4748 5420 2020 2020 . HIGHLIGHT │ │ │ +0000bcf0: 2020 2020 203a 3d3d 204d 4154 4348 2d48 :== MATCH-H │ │ │ +0000bd00: 4947 484c 4947 4854 0a20 2020 2020 2020 IGHLIGHT. │ │ │ +0000bd10: 2020 2020 2020 2020 2020 2020 2020 207c | │ │ │ +0000bd20: 204d 4154 4348 2d41 4e43 484f 5245 440a MATCH-ANCHORED. │ │ │ +0000bd30: 0a20 464f 524d 2020 2020 2020 2020 2020 . FORM │ │ │ +0000bd40: 2020 2020 203a 3d3d 2045 7870 7265 7373 :== Express │ │ │ +0000bd50: 696f 6e20 7265 7475 726e 696e 6720 6120 ion returning a │ │ │ +0000bd60: 464f 4e54 2d4c 4f43 4b2d 464f 524d 2c20 FONT-LOCK-FORM, │ │ │ +0000bd70: 6576 616c 7561 7465 6420 7768 656e 0a20 evaluated when. │ │ │ +0000bd80: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000bd90: 2020 2020 2020 2074 6865 2046 4f4e 542d the FONT- │ │ │ +0000bda0: 4c4f 434b 2d46 4f52 4d20 6973 2066 6972 LOCK-FORM is fir │ │ │ +0000bdb0: 7374 2075 7365 6420 696e 2061 2062 7566 st used in a buf │ │ │ +0000bdc0: 6665 722e 2020 5468 6973 0a20 2020 2020 fer. This. │ │ │ +0000bdd0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000bde0: 2020 2066 6561 7475 7265 2063 616e 2062 feature can b │ │ │ +0000bdf0: 6520 7573 6564 2074 6f20 7072 6f76 6964 e used to provid │ │ │ +0000be00: 6520 6120 464f 4e54 2d4c 4f43 4b2d 464f e a FONT-LOCK-FO │ │ │ +0000be10: 524d 2074 6861 740a 2020 2020 2020 2020 RM that. │ │ │ 0000be20: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000be30: 2020 2020 2020 2020 6361 6e20 6f6e 6c79 can only │ │ │ -0000be40: 2062 6520 6765 6e65 7261 7465 6420 7768 be generated wh │ │ │ -0000be50: 656e 2046 6f6e 7420 4c6f 636b 206d 6f64 en Font Lock mod │ │ │ -0000be60: 6520 6973 2061 6374 7561 6c6c 790a 2020 e is actually. │ │ │ -0000be70: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000be80: 2020 2020 2020 7475 726e 6564 206f 6e2e turned on. │ │ │ -0000be90: 0a0a 204d 4154 4348 2d48 4947 484c 4947 .. MATCH-HIGHLIG │ │ │ -0000bea0: 4854 2020 2020 3a3d 3d20 284d 4154 4348 HT :== (MATCH │ │ │ -0000beb0: 2046 4143 452d 464f 524d 204f 5645 5252 FACE-FORM OVERR │ │ │ -0000bec0: 4944 4520 4c41 584d 4154 4348 290a 0a20 IDE LAXMATCH).. │ │ │ -0000bed0: 4f56 4552 5249 4445 2020 2020 2020 2020 OVERRIDE │ │ │ -0000bee0: 2020 203a 3d3d 2074 2020 2020 2020 2020 :== t │ │ │ -0000bef0: 2d20 6f76 6572 7772 6974 6520 6578 6973 - overwrite exis │ │ │ -0000bf00: 7469 6e67 2066 6f6e 7469 6669 6361 7469 ting fontificati │ │ │ -0000bf10: 6f6e 0a20 2020 2020 2020 2020 2020 2020 on. │ │ │ -0000bf20: 2020 2020 2020 2020 207c 2027 6b65 6570 | 'keep │ │ │ -0000bf30: 2020 2020 2d20 6f6e 6c79 2070 6172 7473 - only parts │ │ │ -0000bf40: 206e 6f74 2061 6c72 6561 6479 2066 6f6e not already fon │ │ │ -0000bf50: 7469 6669 6564 2061 7265 0a20 2020 2020 tified are. │ │ │ +0000be30: 6361 6e20 6f6e 6c79 2062 6520 6765 6e65 can only be gene │ │ │ +0000be40: 7261 7465 6420 7768 656e 2046 6f6e 7420 rated when Font │ │ │ +0000be50: 4c6f 636b 206d 6f64 6520 6973 2061 6374 Lock mode is act │ │ │ +0000be60: 7561 6c6c 790a 2020 2020 2020 2020 2020 ually. │ │ │ +0000be70: 2020 2020 2020 2020 2020 2020 2020 7475 tu │ │ │ +0000be80: 726e 6564 206f 6e2e 0a0a 204d 4154 4348 rned on... MATCH │ │ │ +0000be90: 2d48 4947 484c 4947 4854 2020 2020 3a3d -HIGHLIGHT := │ │ │ +0000bea0: 3d20 284d 4154 4348 2046 4143 452d 464f = (MATCH FACE-FO │ │ │ +0000beb0: 524d 204f 5645 5252 4944 4520 4c41 584d RM OVERRIDE LAXM │ │ │ +0000bec0: 4154 4348 290a 0a20 4f56 4552 5249 4445 ATCH).. OVERRIDE │ │ │ +0000bed0: 2020 2020 2020 2020 2020 203a 3d3d 2074 :== t │ │ │ +0000bee0: 2020 2020 2020 2020 2d20 6f76 6572 7772 - overwr │ │ │ +0000bef0: 6974 6520 6578 6973 7469 6e67 2066 6f6e ite existing fon │ │ │ +0000bf00: 7469 6669 6361 7469 6f6e 0a20 2020 2020 tification. │ │ │ +0000bf10: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000bf20: 207c 2027 6b65 6570 2020 2020 2d20 6f6e | 'keep - on │ │ │ +0000bf30: 6c79 2070 6172 7473 206e 6f74 2061 6c72 ly parts not alr │ │ │ +0000bf40: 6561 6479 2066 6f6e 7469 6669 6564 2061 eady fontified a │ │ │ +0000bf50: 7265 0a20 2020 2020 2020 2020 2020 2020 re. │ │ │ 0000bf60: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000bf70: 2020 2020 2020 2020 2020 2020 2020 6869 hi │ │ │ -0000bf80: 6768 6c69 6768 7465 642e 0a20 2020 2020 ghlighted.. │ │ │ -0000bf90: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000bfa0: 207c 2027 7072 6570 656e 6420 2d20 6d65 | 'prepend - me │ │ │ -0000bfb0: 7267 6520 6661 6365 732c 2074 6869 7320 rge faces, this │ │ │ -0000bfc0: 666f 6e74 6966 6963 6174 696f 6e20 6861 fontification ha │ │ │ -0000bfd0: 730a 2020 2020 2020 2020 2020 2020 2020 s. │ │ │ -0000bfe0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000bff0: 2020 2020 2070 7265 6365 6465 6e63 6520 precedence │ │ │ -0000c000: 6f76 6572 2065 7869 7374 696e 670a 2020 over existing. │ │ │ -0000c010: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c020: 2020 2020 7c20 2761 7070 656e 6420 202d | 'append - │ │ │ -0000c030: 206d 6572 6765 2066 6163 6573 2c20 6578 merge faces, ex │ │ │ -0000c040: 6973 7469 6e67 2066 6f6e 7469 6669 6361 isting fontifica │ │ │ -0000c050: 7469 6f6e 2068 6173 0a20 2020 2020 2020 tion has. │ │ │ +0000bf70: 2020 2020 2020 6869 6768 6c69 6768 7465 highlighte │ │ │ +0000bf80: 642e 0a20 2020 2020 2020 2020 2020 2020 d.. │ │ │ +0000bf90: 2020 2020 2020 2020 207c 2027 7072 6570 | 'prep │ │ │ +0000bfa0: 656e 6420 2d20 6d65 7267 6520 6661 6365 end - merge face │ │ │ +0000bfb0: 732c 2074 6869 7320 666f 6e74 6966 6963 s, this fontific │ │ │ +0000bfc0: 6174 696f 6e20 6861 730a 2020 2020 2020 ation has. │ │ │ +0000bfd0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000bfe0: 2020 2020 2020 2020 2020 2020 2070 7265 pre │ │ │ +0000bff0: 6365 6465 6e63 6520 6f76 6572 2065 7869 cedence over exi │ │ │ +0000c000: 7374 696e 670a 2020 2020 2020 2020 2020 sting. │ │ │ +0000c010: 2020 2020 2020 2020 2020 2020 7c20 2761 | 'a │ │ │ +0000c020: 7070 656e 6420 202d 206d 6572 6765 2066 ppend - merge f │ │ │ +0000c030: 6163 6573 2c20 6578 6973 7469 6e67 2066 aces, existing f │ │ │ +0000c040: 6f6e 7469 6669 6361 7469 6f6e 2068 6173 ontification has │ │ │ +0000c050: 0a20 2020 2020 2020 2020 2020 2020 2020 . │ │ │ 0000c060: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c070: 2020 2020 2020 2020 2020 2020 7072 6563 prec │ │ │ -0000c080: 6564 656e 6365 206f 7665 720a 2020 2020 edence over. │ │ │ +0000c070: 2020 2020 7072 6563 6564 656e 6365 206f precedence o │ │ │ +0000c080: 7665 720a 2020 2020 2020 2020 2020 2020 ver. │ │ │ 0000c090: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c0a0: 2020 2020 2020 2020 2020 2020 2020 2074 t │ │ │ -0000c0b0: 6869 7320 6661 6365 2e0a 0a20 4c41 584d his face... LAXM │ │ │ -0000c0c0: 4154 4348 2020 2020 2020 2020 2020 203a ATCH : │ │ │ -0000c0d0: 3d3d 2049 6620 6e6f 6e2d 6e69 6c2c 206e == If non-nil, n │ │ │ -0000c0e0: 6f20 6572 726f 7220 6973 2073 6967 6e61 o error is signa │ │ │ -0000c0f0: 6c6c 6564 2069 6620 7468 6572 6520 6973 lled if there is │ │ │ -0000c100: 206e 6f20 4d41 5443 480a 2020 2020 2020 no MATCH. │ │ │ -0000c110: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c120: 2020 696e 204d 4154 4348 4552 2e0a 0a20 in MATCHER... │ │ │ -0000c130: 4d41 5443 482d 414e 4348 4f52 4544 2020 MATCH-ANCHORED │ │ │ -0000c140: 2020 203a 3d3d 2028 414e 4348 4f52 2d4d :== (ANCHOR-M │ │ │ -0000c150: 4154 4348 4552 2050 5245 2d4d 4154 4348 ATCHER PRE-MATCH │ │ │ -0000c160: 2d46 4f52 4d20 5c0a 2020 2020 2020 2020 -FORM \. │ │ │ +0000c0a0: 2020 2020 2020 2074 6869 7320 6661 6365 this face │ │ │ +0000c0b0: 2e0a 0a20 4c41 584d 4154 4348 2020 2020 ... LAXMATCH │ │ │ +0000c0c0: 2020 2020 2020 203a 3d3d 2049 6620 6e6f :== If no │ │ │ +0000c0d0: 6e2d 6e69 6c2c 206e 6f20 6572 726f 7220 n-nil, no error │ │ │ +0000c0e0: 6973 2073 6967 6e61 6c6c 6564 2069 6620 is signalled if │ │ │ +0000c0f0: 7468 6572 6520 6973 206e 6f20 4d41 5443 there is no MATC │ │ │ +0000c100: 480a 2020 2020 2020 2020 2020 2020 2020 H. │ │ │ +0000c110: 2020 2020 2020 2020 2020 696e 204d 4154 in MAT │ │ │ +0000c120: 4348 4552 2e0a 0a20 4d41 5443 482d 414e CHER... MATCH-AN │ │ │ +0000c130: 4348 4f52 4544 2020 2020 203a 3d3d 2028 CHORED :== ( │ │ │ +0000c140: 414e 4348 4f52 2d4d 4154 4348 4552 2050 ANCHOR-MATCHER P │ │ │ +0000c150: 5245 2d4d 4154 4348 2d46 4f52 4d20 5c0a RE-MATCH-FORM \. │ │ │ +0000c160: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ 0000c170: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c180: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c190: 2020 504f 5354 2d4d 4154 4348 2d46 4f52 POST-MATCH-FOR │ │ │ -0000c1a0: 4d20 4d41 5443 482d 4849 4748 4c49 4748 M MATCH-HIGHLIGH │ │ │ -0000c1b0: 5420 2e2e 2e29 0a0a 2041 4e43 484f 522d T ...).. ANCHOR- │ │ │ -0000c1c0: 4d41 5443 4845 5220 2020 2020 3a3d 3d20 MATCHER :== │ │ │ -0000c1d0: 4c69 6b65 2061 204d 4154 4348 4552 2c20 Like a MATCHER, │ │ │ -0000c1e0: 6578 6365 7074 2074 6861 7420 7468 6520 except that the │ │ │ -0000c1f0: 6c69 6d69 7420 6f66 2074 6865 2073 6561 limit of the sea │ │ │ -0000c200: 7263 680a 2020 2020 2020 2020 2020 2020 rch. │ │ │ -0000c210: 2020 2020 2020 2020 2020 2020 6465 6661 defa │ │ │ -0000c220: 756c 7473 2074 6f20 7468 6520 656e 6420 ults to the end │ │ │ -0000c230: 6f66 2074 6865 206c 696e 6520 6166 7465 of the line afte │ │ │ -0000c240: 7220 5052 452d 4d41 5443 482d 464f 524d r PRE-MATCH-FORM │ │ │ -0000c250: 0a20 2020 2020 2020 2020 2020 2020 2020 . │ │ │ -0000c260: 2020 2020 2020 2020 2069 7320 6576 616c is eval │ │ │ -0000c270: 7561 7465 642e 2020 486f 7765 7665 722c uated. However, │ │ │ -0000c280: 2069 6620 5052 452d 4d41 5443 482d 464f if PRE-MATCH-FO │ │ │ -0000c290: 524d 2072 6574 7572 6e73 2061 0a20 2020 RM returns a. │ │ │ -0000c2a0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c2b0: 2020 2020 2070 6f73 6974 696f 6e20 6772 position gr │ │ │ -0000c2c0: 6561 7465 7220 7468 616e 2074 6865 2065 eater than the e │ │ │ -0000c2d0: 6e64 206f 6620 7468 6520 6c69 6e65 2c20 nd of the line, │ │ │ -0000c2e0: 7468 6174 0a20 2020 2020 2020 2020 2020 that. │ │ │ -0000c2f0: 2020 2020 2020 2020 2020 2020 2070 6f73 pos │ │ │ -0000c300: 6974 696f 6e20 6973 2075 7365 6420 6173 ition is used as │ │ │ -0000c310: 2074 6865 206c 696d 6974 206f 6620 7468 the limit of th │ │ │ -0000c320: 6520 7365 6172 6368 2e20 2049 7420 6973 e search. It is │ │ │ -0000c330: 0a20 2020 2020 2020 2020 2020 2020 2020 . │ │ │ -0000c340: 2020 2020 2020 2020 2067 656e 6572 616c general │ │ │ -0000c350: 6c79 2061 2062 6164 2069 6465 6120 746f ly a bad idea to │ │ │ -0000c360: 2072 6574 7572 6e20 6120 706f 7369 7469 return a positi │ │ │ -0000c370: 6f6e 2067 7265 6174 6572 2074 6861 6e0a on greater than. │ │ │ +0000c180: 2020 2020 2020 2020 2020 504f 5354 2d4d POST-M │ │ │ +0000c190: 4154 4348 2d46 4f52 4d20 4d41 5443 482d ATCH-FORM MATCH- │ │ │ +0000c1a0: 4849 4748 4c49 4748 5420 2e2e 2e29 0a0a HIGHLIGHT ...).. │ │ │ +0000c1b0: 2041 4e43 484f 522d 4d41 5443 4845 5220 ANCHOR-MATCHER │ │ │ +0000c1c0: 2020 2020 3a3d 3d20 4c69 6b65 2061 204d :== Like a M │ │ │ +0000c1d0: 4154 4348 4552 2c20 6578 6365 7074 2074 ATCHER, except t │ │ │ +0000c1e0: 6861 7420 7468 6520 6c69 6d69 7420 6f66 hat the limit of │ │ │ +0000c1f0: 2074 6865 2073 6561 7263 680a 2020 2020 the search. │ │ │ +0000c200: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c210: 2020 2020 6465 6661 756c 7473 2074 6f20 defaults to │ │ │ +0000c220: 7468 6520 656e 6420 6f66 2074 6865 206c the end of the l │ │ │ +0000c230: 696e 6520 6166 7465 7220 5052 452d 4d41 ine after PRE-MA │ │ │ +0000c240: 5443 482d 464f 524d 0a20 2020 2020 2020 TCH-FORM. │ │ │ +0000c250: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c260: 2069 7320 6576 616c 7561 7465 642e 2020 is evaluated. │ │ │ +0000c270: 486f 7765 7665 722c 2069 6620 5052 452d However, if PRE- │ │ │ +0000c280: 4d41 5443 482d 464f 524d 2072 6574 7572 MATCH-FORM retur │ │ │ +0000c290: 6e73 2061 0a20 2020 2020 2020 2020 2020 ns a. │ │ │ +0000c2a0: 2020 2020 2020 2020 2020 2020 2070 6f73 pos │ │ │ +0000c2b0: 6974 696f 6e20 6772 6561 7465 7220 7468 ition greater th │ │ │ +0000c2c0: 616e 2074 6865 2065 6e64 206f 6620 7468 an the end of th │ │ │ +0000c2d0: 6520 6c69 6e65 2c20 7468 6174 0a20 2020 e line, that. │ │ │ +0000c2e0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c2f0: 2020 2020 2070 6f73 6974 696f 6e20 6973 position is │ │ │ +0000c300: 2075 7365 6420 6173 2074 6865 206c 696d used as the lim │ │ │ +0000c310: 6974 206f 6620 7468 6520 7365 6172 6368 it of the search │ │ │ +0000c320: 2e20 2049 7420 6973 0a20 2020 2020 2020 . It is. │ │ │ +0000c330: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c340: 2067 656e 6572 616c 6c79 2061 2062 6164 generally a bad │ │ │ +0000c350: 2069 6465 6120 746f 2072 6574 7572 6e20 idea to return │ │ │ +0000c360: 6120 706f 7369 7469 6f6e 2067 7265 6174 a position great │ │ │ +0000c370: 6572 2074 6861 6e0a 2020 2020 2020 2020 er than. │ │ │ 0000c380: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c390: 2020 2020 2020 2020 7468 6520 656e 6420 the end │ │ │ -0000c3a0: 6f66 2074 6865 206c 696e 652c 2069 2e65 of the line, i.e │ │ │ -0000c3b0: 2e2c 2063 6175 7365 2074 6865 2041 4e43 ., cause the ANC │ │ │ -0000c3c0: 484f 522d 4d41 5443 4845 520a 2020 2020 HOR-MATCHER. │ │ │ -0000c3d0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c3e0: 2020 2020 7365 6172 6368 2074 6f20 7370 search to sp │ │ │ -0000c3f0: 616e 206c 696e 6573 2e0a 0a20 5052 452d an lines... PRE- │ │ │ -0000c400: 4d41 5443 482d 464f 524d 2020 2020 203a MATCH-FORM : │ │ │ -0000c410: 3d3d 2045 7661 6c75 6174 6564 2062 6566 == Evaluated bef │ │ │ -0000c420: 6f72 6520 7468 6520 414e 4348 4f52 2d4d ore the ANCHOR-M │ │ │ -0000c430: 4154 4348 4552 2069 7320 7573 6564 2c20 ATCHER is used, │ │ │ -0000c440: 7468 6572 6566 6f72 650a 2020 2020 2020 therefore. │ │ │ -0000c450: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c460: 2020 6361 6e20 6265 2075 7365 6420 746f can be used to │ │ │ -0000c470: 2069 6e69 7469 616c 697a 6520 6265 666f initialize befo │ │ │ -0000c480: 7265 2c20 414e 4348 4f52 2d4d 4154 4348 re, ANCHOR-MATCH │ │ │ -0000c490: 4552 2069 730a 2020 2020 2020 2020 2020 ER is. │ │ │ -0000c4a0: 2020 2020 2020 2020 2020 2020 2020 7573 us │ │ │ -0000c4b0: 6564 2e20 2054 7970 6963 616c 6c79 2c20 ed. Typically, │ │ │ -0000c4c0: 5052 452d 4d41 5443 482d 464f 524d 2069 PRE-MATCH-FORM i │ │ │ -0000c4d0: 7320 7573 6564 2074 6f20 6d6f 7665 2074 s used to move t │ │ │ -0000c4e0: 6f0a 2020 2020 2020 2020 2020 2020 2020 o. │ │ │ -0000c4f0: 2020 2020 2020 2020 2020 736f 6d65 2070 some p │ │ │ -0000c500: 6f73 6974 696f 6e20 7265 6c61 7469 7665 osition relative │ │ │ -0000c510: 2074 6f20 7468 6520 6f72 6967 696e 616c to the original │ │ │ -0000c520: 204d 4154 4348 4552 2c20 6265 666f 7265 MATCHER, before │ │ │ -0000c530: 0a20 2020 2020 2020 2020 2020 2020 2020 . │ │ │ -0000c540: 2020 2020 2020 2020 2073 7461 7274 696e startin │ │ │ -0000c550: 6720 7769 7468 2074 6865 2041 4e43 484f g with the ANCHO │ │ │ -0000c560: 522d 4d41 5443 4845 522e 0a0a 2050 4f53 R-MATCHER... POS │ │ │ -0000c570: 542d 4d41 5443 482d 464f 524d 2020 2020 T-MATCH-FORM │ │ │ -0000c580: 3a3d 3d20 4c69 6b65 2050 5245 2d4d 4154 :== Like PRE-MAT │ │ │ -0000c590: 4348 2d46 4f52 4d2c 2062 7574 2075 7365 CH-FORM, but use │ │ │ -0000c5a0: 6420 746f 2063 6c65 616e 2075 7020 6166 d to clean up af │ │ │ -0000c5b0: 7465 7220 7468 650a 2020 2020 2020 2020 ter the. │ │ │ -0000c5c0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c5d0: 414e 4348 4f52 2d4d 4154 4348 4552 2e20 ANCHOR-MATCHER. │ │ │ -0000c5e0: 2049 7420 6d69 6768 7420 6265 2075 7365 It might be use │ │ │ -0000c5f0: 6420 746f 206d 6f76 652c 2062 6566 6f72 d to move, befor │ │ │ -0000c600: 650a 2020 2020 2020 2020 2020 2020 2020 e. │ │ │ -0000c610: 2020 2020 2020 2020 2020 7265 7375 6d69 resumi │ │ │ -0000c620: 6e67 2077 6974 6820 4d41 5443 482d 414e ng with MATCH-AN │ │ │ -0000c630: 4348 4f52 4544 2773 2070 6172 656e 7427 CHORED's parent' │ │ │ -0000c640: 7320 4d41 5443 4845 522e 0a0a 466f 7220 s MATCHER...For │ │ │ -0000c650: 6578 616d 706c 652c 2061 6e20 656c 656d example, an elem │ │ │ -0000c660: 656e 7420 6f66 2074 6865 2066 6972 7374 ent of the first │ │ │ -0000c670: 2066 6f72 6d20 6869 6768 6c69 6768 7473 form highlights │ │ │ -0000c680: 2028 6966 206e 6f74 2061 6c72 6561 6479 (if not already │ │ │ -0000c690: 2068 6967 686c 6967 6874 6564 293a 0a0a highlighted):.. │ │ │ -0000c6a0: 2020 225c 5c5c 3d3c 666f 6f5c 5c5c 3d3e "\\\= │ │ │ -0000c6b0: 2220 2020 2020 2020 2020 2020 2020 2020 " │ │ │ -0000c6c0: 2020 2020 2044 6973 6372 6574 6520 6f63 Discrete oc │ │ │ -0000c6d0: 6375 7272 656e 6365 7320 6f66 2022 666f currences of "fo │ │ │ -0000c6e0: 6f22 2069 6e20 7468 6520 7661 6c75 650a o" in the value. │ │ │ +0000c390: 7468 6520 656e 6420 6f66 2074 6865 206c the end of the l │ │ │ +0000c3a0: 696e 652c 2069 2e65 2e2c 2063 6175 7365 ine, i.e., cause │ │ │ +0000c3b0: 2074 6865 2041 4e43 484f 522d 4d41 5443 the ANCHOR-MATC │ │ │ +0000c3c0: 4845 520a 2020 2020 2020 2020 2020 2020 HER. │ │ │ +0000c3d0: 2020 2020 2020 2020 2020 2020 7365 6172 sear │ │ │ +0000c3e0: 6368 2074 6f20 7370 616e 206c 696e 6573 ch to span lines │ │ │ +0000c3f0: 2e0a 0a20 5052 452d 4d41 5443 482d 464f ... PRE-MATCH-FO │ │ │ +0000c400: 524d 2020 2020 203a 3d3d 2045 7661 6c75 RM :== Evalu │ │ │ +0000c410: 6174 6564 2062 6566 6f72 6520 7468 6520 ated before the │ │ │ +0000c420: 414e 4348 4f52 2d4d 4154 4348 4552 2069 ANCHOR-MATCHER i │ │ │ +0000c430: 7320 7573 6564 2c20 7468 6572 6566 6f72 s used, therefor │ │ │ +0000c440: 650a 2020 2020 2020 2020 2020 2020 2020 e. │ │ │ +0000c450: 2020 2020 2020 2020 2020 6361 6e20 6265 can be │ │ │ +0000c460: 2075 7365 6420 746f 2069 6e69 7469 616c used to initial │ │ │ +0000c470: 697a 6520 6265 666f 7265 2c20 414e 4348 ize before, ANCH │ │ │ +0000c480: 4f52 2d4d 4154 4348 4552 2069 730a 2020 OR-MATCHER is. │ │ │ +0000c490: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c4a0: 2020 2020 2020 7573 6564 2e20 2054 7970 used. Typ │ │ │ +0000c4b0: 6963 616c 6c79 2c20 5052 452d 4d41 5443 ically, PRE-MATC │ │ │ +0000c4c0: 482d 464f 524d 2069 7320 7573 6564 2074 H-FORM is used t │ │ │ +0000c4d0: 6f20 6d6f 7665 2074 6f0a 2020 2020 2020 o move to. │ │ │ +0000c4e0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c4f0: 2020 736f 6d65 2070 6f73 6974 696f 6e20 some position │ │ │ +0000c500: 7265 6c61 7469 7665 2074 6f20 7468 6520 relative to the │ │ │ +0000c510: 6f72 6967 696e 616c 204d 4154 4348 4552 original MATCHER │ │ │ +0000c520: 2c20 6265 666f 7265 0a20 2020 2020 2020 , before. │ │ │ +0000c530: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c540: 2073 7461 7274 696e 6720 7769 7468 2074 starting with t │ │ │ +0000c550: 6865 2041 4e43 484f 522d 4d41 5443 4845 he ANCHOR-MATCHE │ │ │ +0000c560: 522e 0a0a 2050 4f53 542d 4d41 5443 482d R... POST-MATCH- │ │ │ +0000c570: 464f 524d 2020 2020 3a3d 3d20 4c69 6b65 FORM :== Like │ │ │ +0000c580: 2050 5245 2d4d 4154 4348 2d46 4f52 4d2c PRE-MATCH-FORM, │ │ │ +0000c590: 2062 7574 2075 7365 6420 746f 2063 6c65 but used to cle │ │ │ +0000c5a0: 616e 2075 7020 6166 7465 7220 7468 650a an up after the. │ │ │ +0000c5b0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c5c0: 2020 2020 2020 2020 414e 4348 4f52 2d4d ANCHOR-M │ │ │ +0000c5d0: 4154 4348 4552 2e20 2049 7420 6d69 6768 ATCHER. It migh │ │ │ +0000c5e0: 7420 6265 2075 7365 6420 746f 206d 6f76 t be used to mov │ │ │ +0000c5f0: 652c 2062 6566 6f72 650a 2020 2020 2020 e, before. │ │ │ +0000c600: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c610: 2020 7265 7375 6d69 6e67 2077 6974 6820 resuming with │ │ │ +0000c620: 4d41 5443 482d 414e 4348 4f52 4544 2773 MATCH-ANCHORED's │ │ │ +0000c630: 2070 6172 656e 7427 7320 4d41 5443 4845 parent's MATCHE │ │ │ +0000c640: 522e 0a0a 466f 7220 6578 616d 706c 652c R...For example, │ │ │ +0000c650: 2061 6e20 656c 656d 656e 7420 6f66 2074 an element of t │ │ │ +0000c660: 6865 2066 6972 7374 2066 6f72 6d20 6869 he first form hi │ │ │ +0000c670: 6768 6c69 6768 7473 2028 6966 206e 6f74 ghlights (if not │ │ │ +0000c680: 2061 6c72 6561 6479 2068 6967 686c 6967 already highlig │ │ │ +0000c690: 6874 6564 293a 0a0a 2020 225c 5c5c 3d3c hted):.. "\\\=< │ │ │ +0000c6a0: 666f 6f5c 5c5c 3d3e 2220 2020 2020 2020 foo\\\=>" │ │ │ +0000c6b0: 2020 2020 2020 2020 2020 2020 2044 6973 Dis │ │ │ +0000c6c0: 6372 6574 6520 6f63 6375 7272 656e 6365 crete occurrence │ │ │ +0000c6d0: 7320 6f66 2022 666f 6f22 2069 6e20 7468 s of "foo" in th │ │ │ +0000c6e0: 6520 7661 6c75 650a 2020 2020 2020 2020 e value. │ │ │ 0000c6f0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c700: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c710: 206f 6620 7468 6520 7661 7269 6162 6c65 of the variable │ │ │ -0000c720: 2060 666f 6e74 2d6c 6f63 6b2d 6b65 7977 `font-lock-keyw │ │ │ -0000c730: 6f72 642d 6661 6365 272e 0a0a 2020 2822 ord-face'... (" │ │ │ -0000c740: 6675 5c5c 2862 6172 5c5c 2922 202e 2031 fu\\(bar\\)" . 1 │ │ │ -0000c750: 2920 2020 2020 2020 2020 2020 2053 7562 ) Sub │ │ │ -0000c760: 7374 7269 6e67 2022 6261 7222 2077 6974 string "bar" wit │ │ │ -0000c770: 6869 6e20 616c 6c20 6f63 6375 7272 656e hin all occurren │ │ │ -0000c780: 6365 7320 6f66 0a20 2020 2020 2020 2020 ces of. │ │ │ +0000c700: 2020 2020 2020 2020 206f 6620 7468 6520 of the │ │ │ +0000c710: 7661 7269 6162 6c65 2060 666f 6e74 2d6c variable `font-l │ │ │ +0000c720: 6f63 6b2d 6b65 7977 6f72 642d 6661 6365 ock-keyword-face │ │ │ +0000c730: 272e 0a0a 2020 2822 6675 5c5c 2862 6172 '... ("fu\\(bar │ │ │ +0000c740: 5c5c 2922 202e 2031 2920 2020 2020 2020 \\)" . 1) │ │ │ +0000c750: 2020 2020 2053 7562 7374 7269 6e67 2022 Substring " │ │ │ +0000c760: 6261 7222 2077 6974 6869 6e20 616c 6c20 bar" within all │ │ │ +0000c770: 6f63 6375 7272 656e 6365 7320 6f66 0a20 occurrences of. │ │ │ +0000c780: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ 0000c790: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c7a0: 2020 2020 2020 2020 2266 7562 6172 2220 "fubar" │ │ │ -0000c7b0: 696e 2074 6865 2076 616c 7565 206f 660a in the value of. │ │ │ +0000c7a0: 2266 7562 6172 2220 696e 2074 6865 2076 "fubar" in the v │ │ │ +0000c7b0: 616c 7565 206f 660a 2020 2020 2020 2020 alue of. │ │ │ 0000c7c0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c7d0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c7e0: 2060 666f 6e74 2d6c 6f63 6b2d 6b65 7977 `font-lock-keyw │ │ │ -0000c7f0: 6f72 642d 6661 6365 272e 0a0a 2020 2822 ord-face'... (" │ │ │ -0000c800: 6675 6261 7222 202e 2066 7562 6172 2d66 fubar" . fubar-f │ │ │ -0000c810: 6163 6529 2020 2020 2020 2020 204f 6363 ace) Occ │ │ │ -0000c820: 7572 7265 6e63 6573 206f 6620 2266 7562 urrences of "fub │ │ │ -0000c830: 6172 2220 696e 2074 6865 2076 616c 7565 ar" in the value │ │ │ -0000c840: 206f 660a 2020 2020 2020 2020 2020 2020 of. │ │ │ -0000c850: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c860: 2020 2020 2060 6675 6261 722d 6661 6365 `fubar-face │ │ │ -0000c870: 272e 0a0a 2020 2822 666f 6f5c 5c7c 6261 '... ("foo\\|ba │ │ │ -0000c880: 7222 2030 2066 6f6f 2d62 6172 2d66 6163 r" 0 foo-bar-fac │ │ │ -0000c890: 6520 7429 204f 6363 7572 7265 6e63 6573 e t) Occurrences │ │ │ -0000c8a0: 206f 6620 6569 7468 6572 2022 666f 6f22 of either "foo" │ │ │ -0000c8b0: 206f 7220 2262 6172 2220 696e 2074 6865 or "bar" in the │ │ │ -0000c8c0: 0a20 2020 2020 2020 2020 2020 2020 2020 . │ │ │ -0000c8d0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c8e0: 2020 7661 6c75 6520 6f66 2060 666f 6f2d value of `foo- │ │ │ -0000c8f0: 6261 722d 6661 6365 272c 2065 7665 6e20 bar-face', even │ │ │ -0000c900: 6966 2061 6c72 6561 6479 0a20 2020 2020 if already. │ │ │ +0000c7d0: 2020 2020 2020 2020 2060 666f 6e74 2d6c `font-l │ │ │ +0000c7e0: 6f63 6b2d 6b65 7977 6f72 642d 6661 6365 ock-keyword-face │ │ │ +0000c7f0: 272e 0a0a 2020 2822 6675 6261 7222 202e '... ("fubar" . │ │ │ +0000c800: 2066 7562 6172 2d66 6163 6529 2020 2020 fubar-face) │ │ │ +0000c810: 2020 2020 204f 6363 7572 7265 6e63 6573 Occurrences │ │ │ +0000c820: 206f 6620 2266 7562 6172 2220 696e 2074 of "fubar" in t │ │ │ +0000c830: 6865 2076 616c 7565 206f 660a 2020 2020 he value of. │ │ │ +0000c840: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c850: 2020 2020 2020 2020 2020 2020 2060 6675 `fu │ │ │ +0000c860: 6261 722d 6661 6365 272e 0a0a 2020 2822 bar-face'... (" │ │ │ +0000c870: 666f 6f5c 5c7c 6261 7222 2030 2066 6f6f foo\\|bar" 0 foo │ │ │ +0000c880: 2d62 6172 2d66 6163 6520 7429 204f 6363 -bar-face t) Occ │ │ │ +0000c890: 7572 7265 6e63 6573 206f 6620 6569 7468 urrences of eith │ │ │ +0000c8a0: 6572 2022 666f 6f22 206f 7220 2262 6172 er "foo" or "bar │ │ │ +0000c8b0: 2220 696e 2074 6865 0a20 2020 2020 2020 " in the. │ │ │ +0000c8c0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c8d0: 2020 2020 2020 2020 2020 7661 6c75 6520 value │ │ │ +0000c8e0: 6f66 2060 666f 6f2d 6261 722d 6661 6365 of `foo-bar-face │ │ │ +0000c8f0: 272c 2065 7665 6e20 6966 2061 6c72 6561 ', even if alrea │ │ │ +0000c900: 6479 0a20 2020 2020 2020 2020 2020 2020 dy. │ │ │ 0000c910: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c920: 2020 2020 2020 2020 2020 2020 6869 6768 high │ │ │ -0000c930: 6c69 6768 7465 642e 0a0a 2020 2866 7562 lighted... (fub │ │ │ -0000c940: 6172 2d6d 6174 6368 2031 2066 7562 6172 ar-match 1 fubar │ │ │ -0000c950: 2d66 6163 6529 2020 2020 2054 6865 2066 -face) The f │ │ │ -0000c960: 6972 7374 2073 7562 6578 7072 6573 7369 irst subexpressi │ │ │ -0000c970: 6f6e 2077 6974 6869 6e20 616c 6c0a 2020 on within all. │ │ │ +0000c920: 2020 2020 6869 6768 6c69 6768 7465 642e highlighted. │ │ │ +0000c930: 0a0a 2020 2866 7562 6172 2d6d 6174 6368 .. (fubar-match │ │ │ +0000c940: 2031 2066 7562 6172 2d66 6163 6529 2020 1 fubar-face) │ │ │ +0000c950: 2020 2054 6865 2066 6972 7374 2073 7562 The first sub │ │ │ +0000c960: 6578 7072 6573 7369 6f6e 2077 6974 6869 expression withi │ │ │ +0000c970: 6e20 616c 6c0a 2020 2020 2020 2020 2020 n all. │ │ │ 0000c980: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c990: 2020 2020 2020 2020 2020 2020 2020 206f o │ │ │ -0000c9a0: 6363 7572 7265 6e63 6573 206f 6620 7768 ccurrences of wh │ │ │ -0000c9b0: 6174 6576 6572 2074 6865 2066 756e 6374 atever the funct │ │ │ -0000c9c0: 696f 6e0a 2020 2020 2020 2020 2020 2020 ion. │ │ │ -0000c9d0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000c9e0: 2020 2020 2060 6675 6261 722d 6d61 7463 `fubar-matc │ │ │ -0000c9f0: 6827 2066 696e 6473 2061 6e64 206d 6174 h' finds and mat │ │ │ -0000ca00: 6368 6573 2069 6e20 7468 6520 7661 6c75 ches in the valu │ │ │ -0000ca10: 650a 2020 2020 2020 2020 2020 2020 2020 e. │ │ │ -0000ca20: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000ca30: 2020 206f 6620 6066 7562 6172 2d66 6163 of `fubar-fac │ │ │ -0000ca40: 6527 2e0a 0a20 2028 225c 5c5c 3d3c 616e e'... ("\\\=" (0 an │ │ │ -0000ca60: 6368 6f72 2d66 6163 6529 2028 225c 5c5c chor-face) ("\\\ │ │ │ -0000ca70: 3d3c 6974 656d 5c5c 5c3d 3e22 206e 696c =" nil │ │ │ -0000ca80: 206e 696c 2028 3020 6974 656d 2d66 6163 nil (0 item-fac │ │ │ -0000ca90: 6529 2929 0a20 2020 2d2d 2d2d 2d2d 2d2d e))). -------- │ │ │ -0000caa0: 2d2d 2d2d 2d2d 202d 2d2d 2d2d 2d2d 2d2d ------ --------- │ │ │ -0000cab0: 2d2d 2d2d 2d2d 2020 2d2d 2d2d 2d2d 2d2d ------ -------- │ │ │ -0000cac0: 2d2d 2d2d 202d 2d2d 202d 2d2d 202d 2d2d ---- --- --- --- │ │ │ -0000cad0: 2d2d 2d2d 2d2d 2d2d 2d2d 0a20 2020 2020 ----------. │ │ │ -0000cae0: 2020 7c20 2020 2020 2020 2020 2020 207c | | │ │ │ -0000caf0: 2020 2020 2020 2020 2020 2020 2020 207c | │ │ │ -0000cb00: 2020 2020 2020 2020 2020 2020 7c20 2020 | │ │ │ -0000cb10: 7c20 2020 2020 2020 2020 207c 0a20 2020 | |. │ │ │ -0000cb20: 4d41 5443 4845 5220 2020 2020 2020 2020 MATCHER │ │ │ -0000cb30: 207c 2020 2020 2020 2020 2041 4e43 484f | ANCHO │ │ │ -0000cb40: 522d 4d41 5443 4845 5220 2020 2020 7c20 R-MATCHER | │ │ │ -0000cb50: 2020 2b2d 2d2d 2d2d 2d2b 204d 4154 4348 +------+ MATCH │ │ │ -0000cb60: 2d48 4947 484c 4947 4854 0a20 2020 2020 -HIGHLIGHT. │ │ │ -0000cb70: 2020 2020 2020 2020 4d41 5443 482d 4849 MATCH-HI │ │ │ -0000cb80: 4748 4c49 4748 5420 2020 2020 2020 2020 GHLIGHT │ │ │ -0000cb90: 2020 2020 2020 2020 5052 452d 4d41 5443 PRE-MATC │ │ │ -0000cba0: 482d 464f 524d 207c 0a20 2020 2020 2020 H-FORM |. │ │ │ +0000c990: 2020 2020 2020 206f 6363 7572 7265 6e63 occurrenc │ │ │ +0000c9a0: 6573 206f 6620 7768 6174 6576 6572 2074 es of whatever t │ │ │ +0000c9b0: 6865 2066 756e 6374 696f 6e0a 2020 2020 he function. │ │ │ +0000c9c0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000c9d0: 2020 2020 2020 2020 2020 2020 2060 6675 `fu │ │ │ +0000c9e0: 6261 722d 6d61 7463 6827 2066 696e 6473 bar-match' finds │ │ │ +0000c9f0: 2061 6e64 206d 6174 6368 6573 2069 6e20 and matches in │ │ │ +0000ca00: 7468 6520 7661 6c75 650a 2020 2020 2020 the value. │ │ │ +0000ca10: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000ca20: 2020 2020 2020 2020 2020 206f 6620 6066 of `f │ │ │ +0000ca30: 7562 6172 2d66 6163 6527 2e0a 0a20 2028 ubar-face'... ( │ │ │ +0000ca40: 225c 5c5c 3d3c 616e 6368 6f72 5c5c 5c3d "\\\=" (0 anchor-fac │ │ │ +0000ca60: 6529 2028 225c 5c5c 3d3c 6974 656d 5c5c e) ("\\\=" nil nil (0 │ │ │ +0000ca80: 6974 656d 2d66 6163 6529 2929 0a20 2020 item-face))). │ │ │ +0000ca90: 2d2d 2d2d 2d2d 2d2d 2d2d 2d2d 2d2d 202d -------------- - │ │ │ +0000caa0: 2d2d 2d2d 2d2d 2d2d 2d2d 2d2d 2d2d 2020 -------------- │ │ │ +0000cab0: 2d2d 2d2d 2d2d 2d2d 2d2d 2d2d 202d 2d2d ------------ --- │ │ │ +0000cac0: 202d 2d2d 202d 2d2d 2d2d 2d2d 2d2d 2d2d --- ----------- │ │ │ +0000cad0: 2d2d 0a20 2020 2020 2020 7c20 2020 2020 --. | │ │ │ +0000cae0: 2020 2020 2020 207c 2020 2020 2020 2020 | │ │ │ +0000caf0: 2020 2020 2020 207c 2020 2020 2020 2020 | │ │ │ +0000cb00: 2020 2020 7c20 2020 7c20 2020 2020 2020 | | │ │ │ +0000cb10: 2020 207c 0a20 2020 4d41 5443 4845 5220 |. MATCHER │ │ │ +0000cb20: 2020 2020 2020 2020 207c 2020 2020 2020 | │ │ │ +0000cb30: 2020 2041 4e43 484f 522d 4d41 5443 4845 ANCHOR-MATCHE │ │ │ +0000cb40: 5220 2020 2020 7c20 2020 2b2d 2d2d 2d2d R | +----- │ │ │ +0000cb50: 2d2b 204d 4154 4348 2d48 4947 484c 4947 -+ MATCH-HIGHLIG │ │ │ +0000cb60: 4854 0a20 2020 2020 2020 2020 2020 2020 HT. │ │ │ +0000cb70: 4d41 5443 482d 4849 4748 4c49 4748 5420 MATCH-HIGHLIGHT │ │ │ +0000cb80: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +0000cb90: 5052 452d 4d41 5443 482d 464f 524d 207c PRE-MATCH-FORM | │ │ │ +0000cba0: 0a20 2020 2020 2020 2020 2020 2020 2020 . │ │ │ 0000cbb0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ 0000cbc0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000cbd0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ -0000cbe0: 2020 2020 504f 5354 2d4d 4154 4348 2d46 POST-MATCH-F │ │ │ -0000cbf0: 4f52 4d0a 0a20 2044 6973 6372 6574 6520 ORM.. Discrete │ │ │ -0000cc00: 6f63 6375 7272 656e 6365 7320 6f66 2022 occurrences of " │ │ │ -0000cc10: 616e 6368 6f72 2220 696e 2074 6865 2076 anchor" in the v │ │ │ -0000cc20: 616c 7565 206f 6620 6061 6e63 686f 722d alue of `anchor- │ │ │ -0000cc30: 6661 6365 272c 2061 6e64 0a20 2073 7562 face', and. sub │ │ │ -0000cc40: 7365 7175 656e 7420 6469 7363 7265 7465 sequent discrete │ │ │ -0000cc50: 206f 6363 7572 7265 6e63 6573 206f 6620 occurrences of │ │ │ -0000cc60: 2269 7465 6d22 2028 6f6e 2074 6865 2073 "item" (on the s │ │ │ -0000cc70: 616d 6520 6c69 6e65 2920 696e 2074 6865 ame line) in the │ │ │ -0000cc80: 2076 616c 7565 0a20 206f 6620 6069 7465 value. of `ite │ │ │ -0000cc90: 6d2d 6661 6365 272e 2020 2848 6572 6520 m-face'. (Here │ │ │ -0000cca0: 5052 452d 4d41 5443 482d 464f 524d 2061 PRE-MATCH-FORM a │ │ │ -0000ccb0: 6e64 2050 4f53 542d 4d41 5443 482d 464f nd POST-MATCH-FO │ │ │ -0000ccc0: 524d 2061 7265 206e 696c 2e0a 2020 5468 RM are nil.. Th │ │ │ -0000ccd0: 6572 6566 6f72 6520 2269 7465 6d22 2069 erefore "item" i │ │ │ -0000cce0: 7320 696e 6974 6961 6c6c 7920 7365 6172 s initially sear │ │ │ -0000ccf0: 6368 6564 2066 6f72 2073 7461 7274 696e ched for startin │ │ │ -0000cd00: 6720 6672 6f6d 2074 6865 2065 6e64 206f g from the end o │ │ │ -0000cd10: 6620 7468 650a 2020 6d61 7463 6820 6f66 f the. match of │ │ │ -0000cd20: 2022 616e 6368 6f72 222c 2061 6e64 2073 "anchor", and s │ │ │ -0000cd30: 6561 7263 6869 6e67 2066 6f72 2073 7562 earching for sub │ │ │ -0000cd40: 7365 7175 656e 7420 696e 7374 616e 6365 sequent instance │ │ │ -0000cd50: 206f 6620 2261 6e63 686f 7222 0a20 2072 of "anchor". r │ │ │ -0000cd60: 6573 756d 6573 2066 726f 6d20 7768 6572 esumes from wher │ │ │ -0000cd70: 6520 7365 6172 6368 696e 6720 666f 7220 e searching for │ │ │ -0000cd80: 2269 7465 6d22 2063 6f6e 636c 7564 6564 "item" concluded │ │ │ -0000cd90: 2e29 0a0a 466f 7220 6869 6768 6c69 6768 .)..For highligh │ │ │ -0000cda0: 7469 6e67 2073 696e 676c 6520 6974 656d ting single item │ │ │ -0000cdb0: 732c 2074 7970 6963 616c 6c79 206f 6e6c s, typically onl │ │ │ -0000cdc0: 7920 4d41 5443 482d 4849 4748 4c49 4748 y MATCH-HIGHLIGH │ │ │ -0000cdd0: 5420 6973 2072 6571 7569 7265 642e 0a48 T is required..H │ │ │ -0000cde0: 6f77 6576 6572 2c20 6966 2061 6e20 6974 owever, if an it │ │ │ -0000cdf0: 656d 206f 7220 2874 7970 6963 616c 6c79 em or (typically │ │ │ -0000ce00: 2920 7365 7665 7261 6c20 6974 656d 7320 ) several items │ │ │ -0000ce10: 6172 6520 746f 2062 6520 6869 6768 6c69 are to be highli │ │ │ -0000ce20: 6768 7465 640a 666f 6c6c 6f77 696e 6720 ghted.following │ │ │ -0000ce30: 7468 6520 696e 7374 616e 6365 206f 6620 the instance of │ │ │ -0000ce40: 616e 6f74 6865 7220 6974 656d 2028 7468 another item (th │ │ │ -0000ce50: 6520 616e 6368 6f72 2920 7468 656e 204d e anchor) then M │ │ │ -0000ce60: 4154 4348 2d41 4e43 484f 5245 4420 6d61 ATCH-ANCHORED ma │ │ │ -0000ce70: 7920 6265 0a72 6571 7569 7265 642e 0a0a y be.required... │ │ │ -0000ce80: 5468 6573 6520 7265 6775 6c61 7220 6578 These regular ex │ │ │ -0000ce90: 7072 6573 7369 6f6e 7320 7368 6f75 6c64 pressions should │ │ │ -0000cea0: 206e 6f74 206d 6174 6368 2074 6578 7420 not match text │ │ │ -0000ceb0: 7768 6963 6820 7370 616e 7320 6c69 6e65 which spans line │ │ │ -0000cec0: 732e 2020 5768 696c 650a 5c5b 666f 6e74 s. While.\[font │ │ │ -0000ced0: 2d6c 6f63 6b2d 666f 6e74 6966 792d 6275 -lock-fontify-bu │ │ │ -0000cee0: 6666 6572 5d20 6861 6e64 6c65 7320 6d75 ffer] handles mu │ │ │ -0000cef0: 6c74 692d 6c69 6e65 2070 6174 7465 726e lti-line pattern │ │ │ -0000cf00: 7320 636f 7272 6563 746c 792c 2075 7064 s correctly, upd │ │ │ -0000cf10: 6174 696e 6720 7768 656e 2079 6f75 0a65 ating when you.e │ │ │ -0000cf20: 6469 7420 7468 6520 6275 6666 6572 2064 dit the buffer d │ │ │ -0000cf30: 6f65 7320 6e6f 742c 2073 696e 6365 2069 oes not, since i │ │ │ -0000cf40: 7420 636f 6e73 6964 6572 7320 7465 7874 t considers text │ │ │ -0000cf50: 206f 6e65 206c 696e 6520 6174 2061 2074 one line at a t │ │ │ -0000cf60: 696d 652e 0a0a 4265 2076 6572 7920 6361 ime...Be very ca │ │ │ -0000cf70: 7265 6675 6c20 636f 6d70 6f73 696e 6720 reful composing │ │ │ -0000cf80: 7265 6765 7870 7320 666f 7220 7468 6973 regexps for this │ │ │ -0000cf90: 206c 6973 743b 2074 6865 2077 726f 6e67 list; the wrong │ │ │ -0000cfa0: 2070 6174 7465 726e 2063 616e 0a64 7261 pattern can.dra │ │ │ -0000cfb0: 6d61 7469 6361 6c6c 7920 736c 6f77 2074 matically slow t │ │ │ -0000cfc0: 6869 6e67 7320 646f 776e 210a 1f0a 2864 hings down!...(d │ │ │ -0000cfd0: 6566 7661 7220 666f 6e74 2d6c 6f63 6b2d efvar font-lock- │ │ │ -0000cfe0: 6b65 7977 6f72 6473 206e 696c 2028 2324 keywords nil (#$ │ │ │ -0000cff0: 202e 2034 3732 3636 2929 0a28 6d61 6b65 . 47266)).(make │ │ │ -0000d000: 2d76 6172 6961 626c 652d 6275 6666 6572 -variable-buffer │ │ │ -0000d010: 2d6c 6f63 616c 2027 666f 6e74 2d6c 6f63 -local 'font-loc │ │ │ -0000d020: 6b2d 6b65 7977 6f72 6473 290a 2340 3134 k-keywords).#@14 │ │ │ -0000d030: 3735 2041 206c 6973 7420 6f66 2074 6865 75 A list of the │ │ │ -0000d040: 2073 796e 7461 6374 6963 206b 6579 776f syntactic keywo │ │ │ -0000d050: 7264 7320 746f 2068 6967 686c 6967 6874 rds to highlight │ │ │ -0000d060: 2e0a 4361 6e20 6265 2074 6865 206c 6973 ..Can be the lis │ │ │ -0000d070: 7420 6f72 2074 6865 206e 616d 6520 6f66 t or the name of │ │ │ -0000d080: 2061 2066 756e 6374 696f 6e20 6f72 2076 a function or v │ │ │ -0000d090: 6172 6961 626c 6520 7768 6f73 6520 7661 ariable whose va │ │ │ -0000d0a0: 6c75 6520 6973 2074 6865 206c 6973 742e lue is the list. │ │ │ -0000d0b0: 0a53 6565 2060 666f 6e74 2d6c 6f63 6b2d .See `font-lock- │ │ │ -0000d0c0: 6b65 7977 6f72 6473 2720 666f 7220 6120 keywords' for a │ │ │ -0000d0d0: 6465 7363 7269 7074 696f 6e20 6f66 2074 description of t │ │ │ -0000d0e0: 6865 2066 6f72 6d20 6f66 2074 6869 7320 he form of this │ │ │ -0000d0f0: 6c69 7374 3b0a 7468 6520 6469 6666 6572 list;.the differ │ │ │ -0000d100: 656e 6365 7320 6172 6520 6c69 7374 6564 ences are listed │ │ │ -0000d110: 2062 656c 6f77 2e20 204d 4154 4348 2d48 below. MATCH-H │ │ │ -0000d120: 4947 484c 4947 4854 2073 686f 756c 6420 IGHLIGHT should │ │ │ -0000d130: 6265 206f 6620 7468 6520 666f 726d 3a0a be of the form:. │ │ │ -0000d140: 0a20 284d 4154 4348 2053 594e 5441 5820 . (MATCH SYNTAX │ │ │ -0000d150: 4f56 4552 5249 4445 204c 4158 4d41 5443 OVERRIDE LAXMATC │ │ │ -0000d160: 4829 0a0a 7768 6572 6520 5359 4e54 4158 H)..where SYNTAX │ │ │ -0000d170: 2063 616e 2062 6520 6f66 2074 6865 2066 can be of the f │ │ │ -0000d180: 6f72 6d20 2853 594e 5441 582d 434f 4445 orm (SYNTAX-CODE │ │ │ -0000d190: 202e 204d 4154 4348 494e 472d 4348 4152 . MATCHING-CHAR │ │ │ -0000d1a0: 292c 2074 6865 206e 616d 6520 6f66 2061 ), the name of a │ │ │ -0000d1b0: 0a73 796e 7461 7820 7461 626c 652c 206f .syntax table, o │ │ │ -0000d1c0: 7220 616e 2065 7870 7265 7373 696f 6e20 r an expression │ │ │ -0000d1d0: 7768 6f73 6520 7661 6c75 6520 6973 2073 whose value is s │ │ │ -0000d1e0: 7563 6820 6120 666f 726d 206f 7220 6120 uch a form or a │ │ │ -0000d1f0: 7379 6e74 6178 2074 6162 6c65 2e0a 4f56 syntax table..OV │ │ │ -0000d200: 4552 5249 4445 2063 616e 6e6f 7420 6265 ERRIDE cannot be │ │ │ -0000d210: 2060 7072 6570 656e 6427 206f 7220 6061 `prepend' or `a │ │ │ -0000d220: 7070 656e 6427 2e0a 0a46 6f72 2065 7861 ppend'...For exa │ │ │ -0000d230: 6d70 6c65 2c20 616e 2065 6c65 6d65 6e74 mple, an element │ │ │ -0000d240: 206f 6620 7468 6520 666f 726d 2068 6967 of the form hig │ │ │ -0000d250: 686c 6967 6874 7320 7379 6e74 6163 7469 hlights syntacti │ │ │ -0000d260: 6361 6c6c 793a 0a0a 2028 225c 5c24 5c5c cally:.. ("\\$\\ │ │ │ -0000d270: 2823 5c5c 2922 2031 2028 3120 2e20 6e69 (#\\)" 1 (1 . ni │ │ │ -0000d280: 6c29 290a 0a20 6120 6861 7368 2063 6861 l)).. a hash cha │ │ │ -0000d290: 7261 6374 6572 2077 6865 6e20 666f 6c6c racter when foll │ │ │ -0000d2a0: 6f77 696e 6720 6120 646f 6c6c 6172 2063 owing a dollar c │ │ │ -0000d2b0: 6861 7261 6374 6572 2c20 7769 7468 2061 haracter, with a │ │ │ -0000d2c0: 2053 594e 5441 582d 434f 4445 206f 660a SYNTAX-CODE of. │ │ │ -0000d2d0: 2031 2028 6d65 616e 696e 6720 7075 6e63 1 (meaning punc │ │ │ -0000d2e0: 7475 6174 696f 6e20 7379 6e74 6178 292e tuation syntax). │ │ │ -0000d2f0: 2020 4173 7375 6d69 6e67 2074 6861 7420 Assuming that │ │ │ -0000d300: 7468 6520 6275 6666 6572 2073 796e 7461 the buffer synta │ │ │ -0000d310: 7820 7461 626c 6520 646f 6573 0a20 7370 x table does. sp │ │ │ -0000d320: 6563 6966 7920 6861 7368 2063 6861 7261 ecify hash chara │ │ │ -0000d330: 6374 6572 7320 746f 2068 6176 6520 636f cters to have co │ │ │ -0000d340: 6d6d 656e 7420 7374 6172 7420 7379 6e74 mment start synt │ │ │ -0000d350: 6178 2c20 7468 6520 656c 656d 656e 7420 ax, the element │ │ │ -0000d360: 7769 6c6c 206f 6e6c 790a 2068 6967 686c will only. highl │ │ │ -0000d370: 6967 6874 2068 6173 6820 6368 6172 6163 ight hash charac │ │ │ -0000d380: 7465 7273 2074 6861 7420 646f 206e 6f74 ters that do not │ │ │ -0000d390: 2066 6f6c 6c6f 7720 646f 6c6c 6172 2063 follow dollar c │ │ │ -0000d3a0: 6861 7261 6374 6572 7320 6173 2063 6f6d haracters as com │ │ │ -0000d3b0: 6d65 6e74 730a 2073 796e 7461 6374 6963 ments. syntactic │ │ │ -0000d3c0: 616c 6c79 2e0a 0a20 2822 5c5c 2827 5c5c ally... ("\\('\\ │ │ │ -0000d3d0: 292e 5c5c 2827 5c5c 2922 0a20 2028 3120 ).\\('\\)". (1 │ │ │ -0000d3e0: 2837 202e 203f 2729 290a 2020 2832 2028 (7 . ?')). (2 ( │ │ │ -0000d3f0: 3720 2e20 3f27 2929 290a 0a20 626f 7468 7 . ?'))).. both │ │ │ -0000d400: 2073 696e 676c 6520 7175 6f74 6573 2077 single quotes w │ │ │ -0000d410: 6869 6368 2073 7572 726f 756e 6420 6120 hich surround a │ │ │ -0000d420: 7369 6e67 6c65 2063 6861 7261 6374 6572 single character │ │ │ -0000d430: 2c20 7769 7468 2061 2053 594e 5441 582d , with a SYNTAX- │ │ │ -0000d440: 434f 4445 206f 660a 2037 2028 6d65 616e CODE of. 7 (mean │ │ │ -0000d450: 696e 6720 7374 7269 6e67 2071 756f 7465 ing string quote │ │ │ -0000d460: 2073 796e 7461 7829 2061 6e64 2061 204d syntax) and a M │ │ │ -0000d470: 4154 4348 494e 472d 4348 4152 206f 6620 ATCHING-CHAR of │ │ │ -0000d480: 6120 7369 6e67 6c65 2071 756f 7465 2028 a single quote ( │ │ │ -0000d490: 6d65 616e 696e 670a 2061 2073 696e 676c meaning. a singl │ │ │ -0000d4a0: 6520 7175 6f74 6520 6d61 7463 6865 7320 e quote matches │ │ │ -0000d4b0: 6120 7369 6e67 6c65 2071 756f 7465 292e a single quote). │ │ │ -0000d4c0: 2020 4173 7375 6d69 6e67 2074 6861 7420 Assuming that │ │ │ -0000d4d0: 7468 6520 6275 6666 6572 2073 796e 7461 the buffer synta │ │ │ -0000d4e0: 7820 7461 626c 650a 2064 6f65 7320 6e6f x table. does no │ │ │ -0000d4f0: 7420 7370 6563 6966 7920 7369 6e67 6c65 t specify single │ │ │ -0000d500: 2071 756f 7465 7320 746f 2068 6176 6520 quotes to have │ │ │ -0000d510: 7175 6f74 6520 7379 6e74 6178 2c20 7468 quote syntax, th │ │ │ -0000d520: 6520 656c 656d 656e 7420 7769 6c6c 206f e element will o │ │ │ -0000d530: 6e6c 790a 2068 6967 686c 6967 6874 2073 nly. highlight s │ │ │ -0000d540: 696e 676c 6520 7175 6f74 6573 206f 6620 ingle quotes of │ │ │ -0000d550: 7468 6520 666f 726d 2027 6327 2061 7320 the form 'c' as │ │ │ -0000d560: 7374 7269 6e67 7320 7379 6e74 6163 7469 strings syntacti │ │ │ -0000d570: 6361 6c6c 792e 0a20 4f74 6865 7220 666f cally.. Other fo │ │ │ -0000d580: 726d 732c 2073 7563 6820 6173 2066 6f6f rms, such as foo │ │ │ -0000d590: 2762 6172 206f 7220 2766 7562 6172 272c 'bar or 'fubar', │ │ │ -0000d5a0: 2077 696c 6c20 6e6f 7420 6265 2068 6967 will not be hig │ │ │ -0000d5b0: 686c 6967 6874 6564 2061 7320 7374 7269 hlighted as stri │ │ │ -0000d5c0: 6e67 732e 0a0a 5468 6973 2069 7320 6e6f ngs...This is no │ │ │ -0000d5d0: 726d 616c 6c79 2073 6574 2076 6961 2060 rmally set via ` │ │ │ -0000d5e0: 666f 6e74 2d6c 6f63 6b2d 6465 6661 756c font-lock-defaul │ │ │ -0000d5f0: 7473 272e 1f0a 2864 6566 7661 7220 666f ts'...(defvar fo │ │ │ -0000d600: 6e74 2d6c 6f63 6b2d 7379 6e74 6163 7469 nt-lock-syntacti │ │ │ -0000d610: 632d 6b65 7977 6f72 6473 206e 696c 2028 c-keywords nil ( │ │ │ -0000d620: 2324 202e 2035 3332 3939 2929 0a28 6d61 #$ . 53299)).(ma │ │ │ -0000d630: 6b65 2d76 6172 6961 626c 652d 6275 6666 ke-variable-buff │ │ │ -0000d640: 6572 2d6c 6f63 616c 2027 666f 6e74 2d6c er-local 'font-l │ │ │ -0000d650: 6f63 6b2d 7379 6e74 6163 7469 632d 6b65 ock-syntactic-ke │ │ │ -0000d660: 7977 6f72 6473 290a 2340 3338 204e 6f6e ywords).#@38 Non │ │ │ -0000d670: 206e 696c 206d 6561 6e73 2060 666f 6e74 nil means `font │ │ │ -0000d680: 2d6c 6f63 6b2d 6d6f 6465 2720 6973 206f -lock-mode' is o │ │ │ -0000d690: 6e1f 0a28 6465 6676 6172 2066 6f6e 742d n..(defvar font- │ │ │ -0000d6a0: 6c6f 636b 2d6d 6f64 6520 6e69 6c20 2823 lock-mode nil (# │ │ │ -0000d6b0: 2420 2e20 3534 3839 3329 290a 2862 7974 $ . 54893)).(byt │ │ │ -0000d6c0: 652d 636f 6465 2022 c0c1 c2c3 2388 c4c2 e-code "....#... │ │ │ -0000d6d0: c15c 2287 2220 5b63 7573 746f 6d2d 6164 .\"." [custom-ad │ │ │ -0000d6e0: 642d 746f 2d67 726f 7570 2066 6f6e 742d d-to-group font- │ │ │ -0000d6f0: 6c6f 636b 2066 6f6e 742d 6c6f 636b 2d6d lock font-lock-m │ │ │ -0000d700: 6f64 6520 6375 7374 6f6d 2d76 6172 6961 ode custom-varia │ │ │ -0000d710: 626c 6520 6375 7374 6f6d 2d61 6464 2d6c ble custom-add-l │ │ │ -0000d720: 6f61 645d 2034 290a 2340 3538 2046 756e oad] 4).#@58 Fun │ │ │ -0000d730: 6374 696f 6e20 6f72 2066 756e 6374 696f ction or functio │ │ │ -0000d740: 6e73 2074 6f20 7275 6e20 6f6e 2065 6e74 ns to run on ent │ │ │ -0000d750: 7279 2074 6f20 666f 6e74 2d6c 6f63 6b2d ry to font-lock- │ │ │ -0000d760: 6d6f 6465 2e1f 0a28 6465 6676 6172 2066 mode...(defvar f │ │ │ -0000d770: 6f6e 742d 6c6f 636b 2d6d 6f64 652d 686f ont-lock-mode-ho │ │ │ -0000d780: 6f6b 206e 696c 2028 2324 202e 2035 3530 ok nil (#$ . 550 │ │ │ -0000d790: 3835 2929 0a23 4031 3530 3020 546f 6767 85)).#@1500 Togg │ │ │ -0000d7a0: 6c65 2046 6f6e 7420 4c6f 636b 204d 6f64 le Font Lock Mod │ │ │ -0000d7b0: 652e 0a57 6974 6820 6172 672c 2074 7572 e..With arg, tur │ │ │ -0000d7c0: 6e20 666f 6e74 2d6c 6f63 6b20 6d6f 6465 n font-lock mode │ │ │ -0000d7d0: 206f 6e20 6966 2061 6e64 206f 6e6c 7920 on if and only │ │ │ -0000d7e0: 6966 2061 7267 2069 7320 706f 7369 7469 if arg is positi │ │ │ -0000d7f0: 7665 2e0a 0a57 6865 6e20 466f 6e74 204c ve...When Font L │ │ │ -0000d800: 6f63 6b20 6d6f 6465 2069 7320 656e 6162 ock mode is enab │ │ │ -0000d810: 6c65 642c 2074 6578 7420 6973 2066 6f6e led, text is fon │ │ │ -0000d820: 7469 6669 6564 2061 7320 796f 7520 7479 tified as you ty │ │ │ -0000d830: 7065 2069 743a 0a0a 202d 2043 6f6d 6d65 pe it:.. - Comme │ │ │ -0000d840: 6e74 7320 6172 6520 6469 7370 6c61 7965 nts are displaye │ │ │ -0000d850: 6420 696e 2060 666f 6e74 2d6c 6f63 6b2d d in `font-lock- │ │ │ -0000d860: 636f 6d6d 656e 742d 6661 6365 273b 0a20 comment-face';. │ │ │ -0000d870: 2d20 5374 7269 6e67 7320 6172 6520 6469 - Strings are di │ │ │ -0000d880: 7370 6c61 7965 6420 696e 2060 666f 6e74 splayed in `font │ │ │ -0000d890: 2d6c 6f63 6b2d 7374 7269 6e67 2d66 6163 -lock-string-fac │ │ │ -0000d8a0: 6527 3b0a 202d 2044 6f63 756d 656e 7461 e';. - Documenta │ │ │ -0000d8b0: 7469 6f6e 2073 7472 696e 6773 2028 696e tion strings (in │ │ │ -0000d8c0: 204c 6973 702d 6c69 6b65 206c 616e 6775 Lisp-like langu │ │ │ -0000d8d0: 6167 6573 2920 6172 6520 6469 7370 6c61 ages) are displa │ │ │ -0000d8e0: 7965 6420 696e 0a20 2020 6066 6f6e 742d yed in. `font- │ │ │ -0000d8f0: 6c6f 636b 2d64 6f63 2d73 7472 696e 672d lock-doc-string- │ │ │ -0000d900: 6661 6365 273b 0a20 2d20 4c61 6e67 7561 face';. - Langua │ │ │ -0000d910: 6765 206b 6579 776f 7264 7320 2822 7265 ge keywords ("re │ │ │ -0000d920: 7365 7276 6564 2077 6f72 6473 2229 2061 served words") a │ │ │ -0000d930: 7265 2064 6973 706c 6179 6564 2069 6e0a re displayed in. │ │ │ -0000d940: 2020 2060 666f 6e74 2d6c 6f63 6b2d 6b65 `font-lock-ke │ │ │ -0000d950: 7977 6f72 642d 6661 6365 273b 0a20 2d20 yword-face';. - │ │ │ -0000d960: 4675 6e63 7469 6f6e 206e 616d 6573 2069 Function names i │ │ │ -0000d970: 6e20 7468 6569 7220 6465 6669 6e69 6e67 n their defining │ │ │ -0000d980: 2066 6f72 6d20 6172 6520 6469 7370 6c61 form are displa │ │ │ -0000d990: 7965 6420 696e 0a20 2020 6066 6f6e 742d yed in. `font- │ │ │ -0000d9a0: 6c6f 636b 2d66 756e 6374 696f 6e2d 6e61 lock-function-na │ │ │ -0000d9b0: 6d65 2d66 6163 6527 3b0a 202d 2056 6172 me-face';. - Var │ │ │ -0000d9c0: 6961 626c 6520 6e61 6d65 7320 696e 2074 iable names in t │ │ │ -0000d9d0: 6865 6972 2064 6566 696e 696e 6720 666f heir defining fo │ │ │ -0000d9e0: 726d 2061 7265 2064 6973 706c 6179 6564 rm are displayed │ │ │ -0000d9f0: 2069 6e0a 2020 2060 666f 6e74 2d6c 6f63 in. `font-loc │ │ │ -0000da00: 6b2d 7661 7269 6162 6c65 2d6e 616d 652d k-variable-name- │ │ │ -0000da10: 6661 6365 273b 0a20 2d20 5479 7065 206e face';. - Type n │ │ │ -0000da20: 616d 6573 2061 7265 2064 6973 706c 6179 ames are display │ │ │ -0000da30: 6564 2069 6e20 6066 6f6e 742d 6c6f 636b ed in `font-lock │ │ │ -0000da40: 2d74 7970 652d 6661 6365 273b 0a20 2d20 -type-face';. - │ │ │ -0000da50: 5265 6665 7265 6e63 6573 2061 7070 6561 References appea │ │ │ -0000da60: 7269 6e67 2069 6e20 6865 6c70 2066 696c ring in help fil │ │ │ -0000da70: 6573 2061 6e64 2074 6865 206c 696b 6520 es and the like │ │ │ -0000da80: 6172 6520 6469 7370 6c61 7965 640a 2020 are displayed. │ │ │ -0000da90: 2069 6e20 6066 6f6e 742d 6c6f 636b 2d72 in `font-lock-r │ │ │ -0000daa0: 6566 6572 656e 6365 2d66 6163 6527 3b0a eference-face';. │ │ │ -0000dab0: 202d 2050 7265 7072 6f63 6573 736f 7220 - Preprocessor │ │ │ -0000dac0: 6465 636c 6172 6174 696f 6e73 2061 7265 declarations are │ │ │ -0000dad0: 2064 6973 706c 6179 6564 2069 6e0a 2020 displayed in. │ │ │ -0000dae0: 6066 6f6e 742d 6c6f 636b 2d70 7265 7072 `font-lock-prepr │ │ │ -0000daf0: 6f63 6573 736f 722d 6661 6365 273b 0a0a ocessor-face';.. │ │ │ -0000db00: 2020 2061 6e64 0a0a 202d 2043 6572 7461 and.. - Certa │ │ │ -0000db10: 696e 206f 7468 6572 2065 7870 7265 7373 in other express │ │ │ -0000db20: 696f 6e73 2061 7265 2064 6973 706c 6179 ions are display │ │ │ -0000db30: 6564 2069 6e20 6f74 6865 7220 6661 6365 ed in other face │ │ │ -0000db40: 7320 6163 636f 7264 696e 670a 2020 2074 s according. t │ │ │ -0000db50: 6f20 7468 6520 7661 6c75 6520 6f66 2074 o the value of t │ │ │ -0000db60: 6865 2076 6172 6961 626c 6520 6066 6f6e he variable `fon │ │ │ -0000db70: 742d 6c6f 636b 2d6b 6579 776f 7264 7327 t-lock-keywords' │ │ │ -0000db80: 2e0a 0a57 6865 7265 206d 6f64 6573 2073 ...Where modes s │ │ │ -0000db90: 7570 706f 7274 2064 6966 6665 7265 6e74 upport different │ │ │ -0000dba0: 206c 6576 656c 7320 6f66 2066 6f6e 7469 levels of fonti │ │ │ -0000dbb0: 6669 6361 7469 6f6e 2c20 796f 7520 6361 fication, you ca │ │ │ -0000dbc0: 6e20 7573 6520 7468 6520 7661 7269 6162 n use the variab │ │ │ -0000dbd0: 6c65 0a60 666f 6e74 2d6c 6f63 6b2d 6d61 le.`font-lock-ma │ │ │ -0000dbe0: 7869 6d75 6d2d 6465 636f 7261 7469 6f6e ximum-decoration │ │ │ -0000dbf0: 2720 746f 2073 7065 6369 6679 2077 6869 ' to specify whi │ │ │ -0000dc00: 6368 206c 6576 656c 2079 6f75 2067 656e ch level you gen │ │ │ -0000dc10: 6572 616c 6c79 2070 7265 6665 722e 0a57 erally prefer..W │ │ │ -0000dc20: 6865 6e20 796f 7520 7475 726e 2046 6f6e hen you turn Fon │ │ │ -0000dc30: 7420 4c6f 636b 206d 6f64 6520 6f6e 2f6f t Lock mode on/o │ │ │ -0000dc40: 6666 2074 6865 2062 7566 6665 7220 6973 ff the buffer is │ │ │ -0000dc50: 2066 6f6e 7469 6669 6564 2f64 6566 6f6e fontified/defon │ │ │ -0000dc60: 7469 6669 6564 2c20 7468 6f75 6768 0a66 tified, though.f │ │ │ -0000dc70: 6f6e 7469 6669 6361 7469 6f6e 206f 6363 ontification occ │ │ │ -0000dc80: 7572 7320 6f6e 6c79 2069 6620 7468 6520 urs only if the │ │ │ -0000dc90: 6275 6666 6572 2069 7320 6c65 7373 2074 buffer is less t │ │ │ -0000dca0: 6861 6e20 6066 6f6e 742d 6c6f 636b 2d6d han `font-lock-m │ │ │ -0000dcb0: 6178 696d 756d 2d73 697a 6527 2e0a 546f aximum-size'..To │ │ │ -0000dcc0: 2066 6f6e 7469 6679 2061 2062 7566 6665 fontify a buffe │ │ │ -0000dcd0: 7220 7769 7468 6f75 7420 7475 726e 696e r without turnin │ │ │ -0000dce0: 6720 6f6e 2046 6f6e 7420 4c6f 636b 206d g on Font Lock m │ │ │ -0000dcf0: 6f64 652c 2061 6e64 2072 6567 6172 646c ode, and regardl │ │ │ -0000dd00: 6573 7320 6f66 2062 7566 6665 720a 7369 ess of buffer.si │ │ │ -0000dd10: 7a65 2c20 796f 7520 6361 6e20 7573 6520 ze, you can use │ │ │ -0000dd20: 5c5b 666f 6e74 2d6c 6f63 6b2d 666f 6e74 \[font-lock-font │ │ │ -0000dd30: 6966 792d 6275 6666 6572 5d2e 0a0a 5365 ify-buffer]...Se │ │ │ -0000dd40: 6520 7468 6520 7661 7269 6162 6c65 2060 e the variable ` │ │ │ -0000dd50: 666f 6e74 2d6c 6f63 6b2d 6b65 7977 6f72 font-lock-keywor │ │ │ -0000dd60: 6473 2720 666f 7220 6375 7374 6f6d 697a ds' for customiz │ │ │ -0000dd70: 6174 696f 6e2e 1f0a 2861 7574 6f6c 6f61 ation...(autoloa │ │ │ -0000dd80: 6420 2766 6f6e 742d 6c6f 636b 2d6d 6f64 d 'font-lock-mod │ │ │ -0000dd90: 6520 2266 6f6e 742d 6c6f 636b 2220 2728 e "font-lock" '( │ │ │ -0000dda0: 2324 202e 2035 3531 3936 2920 7420 6e69 #$ . 55196) t ni │ │ │ -0000ddb0: 6c29 0a23 4034 3120 556e 636f 6e64 6974 l).#@41 Uncondit │ │ │ -0000ddc0: 696f 6e61 6c6c 7920 7475 726e 206f 6e20 ionally turn on │ │ │ -0000ddd0: 466f 6e74 204c 6f63 6b20 6d6f 6465 2e1f Font Lock mode.. │ │ │ -0000dde0: 0a28 6175 746f 6c6f 6164 2027 7475 726e .(autoload 'turn │ │ │ -0000ddf0: 2d6f 6e2d 666f 6e74 2d6c 6f63 6b20 2266 -on-font-lock "f │ │ │ -0000de00: 6f6e 742d 6c6f 636b 2220 2728 2324 202e ont-lock" '(#$ . │ │ │ -0000de10: 2035 3637 3630 2920 7420 6e69 6c29 0a23 56760) t nil).# │ │ │ -0000de20: 4034 3220 556e 636f 6e64 6974 696f 6e61 @42 Unconditiona │ │ │ -0000de30: 6c6c 7920 7475 726e 206f 6666 2046 6f6e lly turn off Fon │ │ │ -0000de40: 7420 4c6f 636b 206d 6f64 652e 1f0a 2861 t Lock mode...(a │ │ │ -0000de50: 7574 6f6c 6f61 6420 2774 7572 6e2d 6f66 utoload 'turn-of │ │ │ -0000de60: 662d 666f 6e74 2d6c 6f63 6b20 2266 6f6e f-font-lock "fon │ │ │ -0000de70: 742d 6c6f 636b 2220 2728 2324 202e 2035 t-lock" '(#$ . 5 │ │ │ -0000de80: 3638 3638 2920 7420 6e69 6c29 0a23 4031 6868) t nil).#@1 │ │ │ -0000de90: 3336 2046 6f6e 7469 6679 2074 6865 2063 36 Fontify the c │ │ │ -0000dea0: 7572 7265 6e74 2062 7566 6665 7220 7468 urrent buffer th │ │ │ -0000deb0: 6520 7761 7920 6066 6f6e 742d 6c6f 636b e way `font-lock │ │ │ -0000dec0: 2d6d 6f64 6527 2077 6f75 6c64 2e0a 5365 -mode' would..Se │ │ │ -0000ded0: 6520 6066 6f6e 742d 6c6f 636b 2d6d 6f64 e `font-lock-mod │ │ │ -0000dee0: 6527 2066 6f72 2064 6574 6169 6c73 2e0a e' for details.. │ │ │ -0000def0: 0a54 6869 7320 6361 6e20 7461 6b65 2061 .This can take a │ │ │ -0000df00: 2077 6869 6c65 2066 6f72 206c 6172 6765 while for large │ │ │ -0000df10: 2062 7566 6665 7273 2e1f 0a28 6175 746f buffers...(auto │ │ │ -0000df20: 6c6f 6164 2027 666f 6e74 2d6c 6f63 6b2d load 'font-lock- │ │ │ -0000df30: 666f 6e74 6966 792d 6275 6666 6572 2022 fontify-buffer " │ │ │ -0000df40: 666f 6e74 2d6c 6f63 6b22 2027 2823 2420 font-lock" '(#$ │ │ │ -0000df50: 2e20 3536 3937 3929 2074 206e 696c 290a . 56979) t nil). │ │ │ -0000df60: 2862 7974 652d 636f 6465 2022 c0c1 c2c3 (byte-code ".... │ │ │ -0000df70: 8989 2588 c4c5 c65c 2287 2220 5b61 7574 ..%....\"." [aut │ │ │ -0000df80: 6f6c 6f61 6420 666f 6e74 2d6c 6f63 6b2d oload font-lock- │ │ │ -0000df90: 7365 742d 6465 6661 756c 7473 2d31 2022 set-defaults-1 " │ │ │ -0000dfa0: 666f 6e74 2d6c 6f63 6b22 206e 696c 2061 font-lock" nil a │ │ │ -0000dfb0: 6464 2d6d 696e 6f72 2d6d 6f64 6520 666f dd-minor-mode fo │ │ │ -0000dfc0: 6e74 2d6c 6f63 6b2d 6d6f 6465 2022 2046 nt-lock-mode " F │ │ │ -0000dfd0: 6f6e 7422 5d20 3629 0a23 4036 3920 2a49 ont"] 6).#@69 *I │ │ │ -0000dfe0: 6620 6e6f 6e2d 6e69 6c2c 2074 6865 6e20 f non-nil, then │ │ │ -0000dff0: 7468 6520 666f 6e74 206d 656e 7520 7769 the font menu wi │ │ │ -0000e000: 6c6c 2074 7279 2074 6f20 7368 6f77 206f ll try to show o │ │ │ -0000e010: 6e6c 7920 6269 746d 6170 2066 6f6e 7473 nly bitmap fonts │ │ │ -0000e020: 2e1f 0a28 6465 6676 6172 2066 6f6e 742d ...(defvar font- │ │ │ -0000e030: 6d65 6e75 2d69 676e 6f72 652d 7363 616c menu-ignore-scal │ │ │ -0000e040: 6564 2d66 6f6e 7473 206e 696c 2028 2324 ed-fonts nil (#$ │ │ │ -0000e050: 202e 202d 3537 3331 3029 290a 2340 3131 . -57310)).#@11 │ │ │ -0000e060: 3420 2a49 6620 6e6f 6e2d 6e69 6c2c 2074 4 *If non-nil, t │ │ │ -0000e070: 6865 6e20 6368 616e 6769 6e67 2074 6865 hen changing the │ │ │ -0000e080: 2064 6566 6175 6c74 2066 6f6e 7420 6672 default font fr │ │ │ -0000e090: 6f6d 2074 6865 2066 6f6e 7420 6d65 6e75 om the font menu │ │ │ -0000e0a0: 2077 696c 6c20 6f6e 6c79 0a61 6666 6563 will only.affec │ │ │ -0000e0b0: 7420 6f6e 6520 6672 616d 6520 696e 7374 t one frame inst │ │ │ -0000e0c0: 6561 6420 6f66 2061 6c6c 2066 7261 6d65 ead of all frame │ │ │ -0000e0d0: 732e 1f0a 2864 6566 7661 7220 666f 6e74 s...(defvar font │ │ │ -0000e0e0: 2d6d 656e 752d 7468 6973 2d66 7261 6d65 -menu-this-frame │ │ │ -0000e0f0: 2d6f 6e6c 792d 7020 6e69 6c20 2823 2420 -only-p nil (#$ │ │ │ -0000e100: 2e20 2d35 3734 3432 2929 0a28 6673 6574 . -57442)).(fset │ │ │ -0000e110: 2027 696e 7374 616c 6c2d 666f 6e74 2d6d 'install-font-m │ │ │ -0000e120: 656e 7573 2027 7265 7365 742d 6465 7669 enus 'reset-devi │ │ │ -0000e130: 6365 2d66 6f6e 742d 6d65 6e75 7329 0a23 ce-font-menus).# │ │ │ -0000e140: 4034 3532 2047 656e 6572 6174 6573 2074 @452 Generates t │ │ │ -0000e150: 6865 2060 466f 6e74 272c 2060 5369 7a65 he `Font', `Size │ │ │ -0000e160: 272c 2061 6e64 2060 5765 6967 6874 2720 ', and `Weight' │ │ │ -0000e170: 7375 626d 656e 7573 2066 6f72 2074 6865 submenus for the │ │ │ -0000e180: 204f 7074 696f 6e73 206d 656e 752e 0a54 Options menu..T │ │ │ -0000e190: 6869 7320 6973 2072 756e 2074 6865 2066 his is run the f │ │ │ -0000e1a0: 6972 7374 2074 696d 6520 7468 6174 2061 irst time that a │ │ │ -0000e1b0: 2066 6f6e 742d 6d65 6e75 2069 7320 6e65 font-menu is ne │ │ │ -0000e1c0: 6564 6564 2066 6f72 2065 6163 6820 6465 eded for each de │ │ │ -0000e1d0: 7669 6365 2e0a 4966 2079 6f75 2064 6f6e vice..If you don │ │ │ -0000e1e0: 2774 206c 696b 6520 7468 6520 6c61 7a79 't like the lazy │ │ │ -0000e1f0: 2069 6e76 6f63 6174 696f 6e20 6f66 2074 invocation of t │ │ │ -0000e200: 6869 7320 6675 6e63 7469 6f6e 2c20 796f his function, yo │ │ │ -0000e210: 7520 6361 6e20 6164 6420 6974 2074 6f0a u can add it to. │ │ │ -0000e220: 6063 7265 6174 652d 6465 7669 6365 2d68 `create-device-h │ │ │ -0000e230: 6f6f 6b27 2061 6e64 2074 6861 7420 7769 ook' and that wi │ │ │ -0000e240: 6c6c 206d 616b 6520 7468 6520 666f 6e74 ll make the font │ │ │ -0000e250: 206d 656e 7573 2072 6573 706f 6e64 206d menus respond m │ │ │ -0000e260: 6f72 6520 7175 6963 6b6c 790a 7768 656e ore quickly.when │ │ │ -0000e270: 2074 6865 7920 6172 6520 7365 6c65 6374 they are select │ │ │ -0000e280: 6564 2066 6f72 2074 6865 2066 6972 7374 ed for the first │ │ │ -0000e290: 2074 696d 652e 2020 4966 2079 6f75 2061 time. If you a │ │ │ -0000e2a0: 6464 2066 6f6e 7473 2074 6f20 796f 7572 dd fonts to your │ │ │ -0000e2b0: 2073 7973 7465 6d2c 0a6f 7220 6966 2079 system,.or if y │ │ │ -0000e2c0: 6f75 2063 6861 6e67 6520 796f 7572 2066 ou change your f │ │ │ -0000e2d0: 6f6e 7420 7061 7468 2c20 796f 7520 6361 ont path, you ca │ │ │ -0000e2e0: 6e20 6361 6c6c 2074 6869 7320 746f 2072 n call this to r │ │ │ -0000e2f0: 652d 696e 6974 6961 6c69 7a65 2074 6865 e-initialize the │ │ │ -0000e300: 206d 656e 7573 2e1f 0a28 6175 746f 6c6f menus...(autolo │ │ │ -0000e310: 6164 2027 7265 7365 742d 6465 7669 6365 ad 'reset-device │ │ │ -0000e320: 2d66 6f6e 742d 6d65 6e75 7320 2266 6f6e -font-menus "fon │ │ │ -0000e330: 742d 6d65 6e75 2220 2728 2324 202e 2035 t-menu" '(#$ . 5 │ │ │ -0000e340: 3736 3639 2920 6e69 6c20 6e69 6c29 0a28 7669) nil nil).( │ │ │ -0000e350: 6279 7465 2d63 6f64 6520 22c0 c1c2 c389 byte-code "..... │ │ │ -0000e360: 8925 88c0 c4c2 c389 8925 88c0 c5c2 c389 .%.......%...... │ │ │ -0000e370: 8925 8722 205b 6175 746f 6c6f 6164 2066 .%." [autoload f │ │ │ -0000e380: 6f6e 742d 6d65 6e75 2d66 616d 696c 792d ont-menu-family- │ │ │ -0000e390: 636f 6e73 7472 7563 746f 7220 2266 6f6e constructor "fon │ │ │ -0000e3a0: 742d 6d65 6e75 2220 6e69 6c20 666f 6e74 t-menu" nil font │ │ │ -0000e3b0: 2d6d 656e 752d 7369 7a65 2d63 6f6e 7374 -menu-size-const │ │ │ -0000e3c0: 7275 6374 6f72 2066 6f6e 742d 6d65 6e75 ructor font-menu │ │ │ -0000e3d0: 2d77 6569 6768 742d 636f 6e73 7472 7563 -weight-construc │ │ │ -0000e3e0: 746f 725d 2036 290a 2340 3731 2052 6574 tor] 6).#@71 Ret │ │ │ -0000e3f0: 7572 6e20 6120 666f 6e74 2064 6573 6372 urn a font descr │ │ │ -0000e400: 6970 746f 7220 6f62 6a65 6374 2066 6f72 iptor object for │ │ │ -0000e410: 2046 4f4e 544e 414d 452c 2061 7070 726f FONTNAME, appro │ │ │ -0000e420: 7072 6961 7465 2066 6f72 2044 4556 4943 priate for DEVIC │ │ │ -0000e430: 452e 1f0a 2861 7574 6f6c 6f61 6420 2766 E...(autoload 'f │ │ │ -0000e440: 6f6e 742d 6372 6561 7465 2d6f 626a 6563 ont-create-objec │ │ │ -0000e450: 7420 2266 6f6e 7422 2027 2823 2420 2e20 t "font" '(#$ . │ │ │ -0000e460: 3538 3334 3929 206e 696c 206e 696c 290a 58349) nil nil). │ │ │ -0000e470: 2862 7974 652d 636f 6465 2022 c0c1 c2c3 (byte-code ".... │ │ │ -0000e480: 8989 2588 c0c4 c2c3 8989 2588 c0c5 c2c3 ..%.......%..... │ │ │ -0000e490: 8989 2588 c0c6 c2c3 8989 2588 c0c7 c2c3 ..%.......%..... │ │ │ -0000e4a0: 8989 2588 c0c8 c2c3 8989 2588 c0c9 c2c3 ..%.......%..... │ │ │ -0000e4b0: 8989 2587 2220 5b61 7574 6f6c 6f61 6420 ..%." [autoload │ │ │ -0000e4c0: 666f 6e74 2d64 6566 6175 6c74 2d66 6f6e font-default-fon │ │ │ -0000e4d0: 742d 666f 722d 6465 7669 6365 2022 666f t-for-device "fo │ │ │ -0000e4e0: 6e74 2220 6e69 6c20 666f 6e74 2d64 6566 nt" nil font-def │ │ │ -0000e4f0: 6175 6c74 2d6f 626a 6563 742d 666f 722d ault-object-for- │ │ │ -0000e500: 6465 7669 6365 2066 6f6e 742d 6465 6661 device font-defa │ │ │ -0000e510: 756c 742d 6661 6d69 6c79 2d66 6f72 2d64 ult-family-for-d │ │ │ -0000e520: 6576 6963 6520 666f 6e74 2d64 6566 6175 evice font-defau │ │ │ -0000e530: 6c74 2d72 6567 6973 7472 792d 666f 722d lt-registry-for- │ │ │ -0000e540: 6465 7669 6365 2066 6f6e 742d 6465 6661 device font-defa │ │ │ -0000e550: 756c 742d 656e 636f 6469 6e67 2d66 6f72 ult-encoding-for │ │ │ -0000e560: 2d64 6576 6963 6520 666f 6e74 2d64 6566 -device font-def │ │ │ -0000e570: 6175 6c74 2d73 697a 652d 666f 722d 6465 ault-size-for-de │ │ │ -0000e580: 7669 6365 2078 2d66 6f6e 742d 6275 696c vice x-font-buil │ │ │ -0000e590: 642d 6361 6368 655d 2036 290a 2340 3131 d-cache] 6).#@11 │ │ │ -0000e5a0: 3620 2a53 7472 696e 6720 746f 2064 6973 6 *String to dis │ │ │ -0000e5b0: 706c 6179 2069 6e20 7468 6520 6d6f 6465 play in the mode │ │ │ -0000e5c0: 6c69 6e65 2077 6865 6e20 476e 7573 6572 line when Gnuser │ │ │ -0000e5d0: 7620 6973 2061 6374 6976 652e 0a53 6574 v is active..Set │ │ │ -0000e5e0: 2074 6869 7320 746f 206e 696c 2069 6620 this to nil if │ │ │ -0000e5f0: 796f 7520 646f 6e27 7420 7761 6e74 2061 you don't want a │ │ │ -0000e600: 206d 6f64 656c 696e 6520 696e 6469 6361 modeline indica │ │ │ -0000e610: 746f 722e 1f0a 2864 6566 7661 7220 676e tor...(defvar gn │ │ │ -0000e620: 7573 6572 762d 6d6f 6465 2d6c 696e 652d userv-mode-line- │ │ │ -0000e630: 7374 7269 6e67 2022 2053 6572 7665 7222 string " Server" │ │ │ -0000e640: 2028 2324 202e 202d 3538 3738 3629 290a (#$ . -58786)). │ │ │ -0000e650: 2340 3330 3420 2a54 6865 2066 7261 6d65 #@304 *The frame │ │ │ -0000e660: 2074 6f20 6265 2075 7365 6420 746f 2064 to be used to d │ │ │ -0000e670: 6973 706c 6179 2061 6c6c 2065 6469 7465 isplay all edite │ │ │ -0000e680: 6420 6669 6c65 732e 0a49 6620 6e69 6c2c d files..If nil, │ │ │ -0000e690: 2074 6865 6e20 6120 6e65 7720 6672 616d then a new fram │ │ │ -0000e6a0: 6520 6973 2063 7265 6174 6564 2066 6f72 e is created for │ │ │ -0000e6b0: 2065 6163 6820 6669 6c65 2065 6469 7465 each file edite │ │ │ -0000e6c0: 642e 0a49 6620 742c 2074 6865 6e20 7468 d..If t, then th │ │ │ -0000e6d0: 6520 6375 7272 656e 746c 7920 7365 6c65 e currently sele │ │ │ -0000e6e0: 6374 6564 2066 7261 6d65 2077 696c 6c20 cted frame will │ │ │ -0000e6f0: 6265 2075 7365 642e 0a49 6620 6120 6675 be used..If a fu │ │ │ -0000e700: 6e63 7469 6f6e 2c20 7468 656e 2074 6869 nction, then thi │ │ │ -0000e710: 7320 7769 6c6c 2062 6520 6361 6c6c 6564 s will be called │ │ │ -0000e720: 2077 6974 6820 6120 7379 6d62 6f6c 2060 with a symbol ` │ │ │ -0000e730: 7827 206f 7220 6074 7479 2720 6173 2074 x' or `tty' as t │ │ │ -0000e740: 6865 0a6f 6e6c 7920 6172 6775 6d65 6e74 he.only argument │ │ │ -0000e750: 2c20 616e 6420 6974 7320 7265 7475 726e , and its return │ │ │ -0000e760: 2076 616c 7565 2077 696c 6c20 6265 2069 value will be i │ │ │ -0000e770: 6e74 6572 7072 6574 6564 2061 7320 6162 nterpreted as ab │ │ │ -0000e780: 6f76 652e 1f0a 2864 6566 7661 7220 676e ove...(defvar gn │ │ │ -0000e790: 7573 6572 762d 6672 616d 6520 6e69 6c20 userv-frame nil │ │ │ -0000e7a0: 2823 2420 2e20 2d35 3839 3636 2929 0a23 (#$ . -58966)).# │ │ │ -0000e7b0: 4037 3420 5265 7475 726e 206e 6f6e 2d6e @74 Return non-n │ │ │ -0000e7c0: 696c 2069 6620 6120 676e 7573 6572 7620 il if a gnuserv │ │ │ -0000e7d0: 7072 6f63 6573 7320 6973 2072 756e 6e69 process is runni │ │ │ -0000e7e0: 6e67 2066 726f 6d20 7468 6973 2058 456d ng from this XEm │ │ │ -0000e7f0: 6163 7320 7365 7373 696f 6e2e 1f0a 2861 acs session...(a │ │ │ -0000e800: 7574 6f6c 6f61 6420 2767 6e75 7365 7276 utoload 'gnuserv │ │ │ -0000e810: 2d72 756e 6e69 6e67 2d70 2022 676e 7573 -running-p "gnus │ │ │ -0000e820: 6572 7622 2027 2823 2420 2e20 3539 3331 erv" '(#$ . 5931 │ │ │ -0000e830: 3629 206e 696c 206e 696c 290a 2340 3333 6) nil nil).#@33 │ │ │ -0000e840: 3620 416c 6c6f 7720 7468 6973 2045 6d61 6 Allow this Ema │ │ │ -0000e850: 6373 2070 726f 6365 7373 2074 6f20 6265 cs process to be │ │ │ -0000e860: 2061 2073 6572 7665 7220 666f 7220 636c a server for cl │ │ │ -0000e870: 6965 6e74 2070 726f 6365 7373 6573 2e0a ient processes.. │ │ │ -0000e880: 5468 6973 2073 7461 7274 7320 6120 676e This starts a gn │ │ │ -0000e890: 7573 6572 7620 636f 6d6d 756e 6963 6174 userv communicat │ │ │ -0000e8a0: 696f 6e73 2073 7562 7072 6f63 6573 7320 ions subprocess │ │ │ -0000e8b0: 7468 726f 7567 6820 7768 6963 680a 636c through which.cl │ │ │ -0000e8c0: 6965 6e74 2022 6564 6974 6f72 7322 2028 ient "editors" ( │ │ │ -0000e8d0: 676e 7563 6c69 656e 7420 616e 6420 676e gnuclient and gn │ │ │ -0000e8e0: 7564 6f69 7429 2063 616e 2073 656e 6420 udoit) can send │ │ │ -0000e8f0: 6564 6974 696e 6720 636f 6d6d 616e 6473 editing commands │ │ │ -0000e900: 2074 6f0a 7468 6973 2045 6d61 6373 206a to.this Emacs j │ │ │ -0000e910: 6f62 2e20 2053 6565 2074 6865 2067 6e75 ob. See the gnu │ │ │ -0000e920: 7365 7276 2831 2920 6d61 6e75 616c 2070 serv(1) manual p │ │ │ -0000e930: 6167 6520 666f 7220 6d6f 7265 2064 6574 age for more det │ │ │ -0000e940: 6169 6c73 2e0a 0a50 7265 6669 7820 6172 ails...Prefix ar │ │ │ -0000e950: 6720 6d65 616e 7320 6a75 7374 206b 696c g means just kil │ │ │ -0000e960: 6c20 616e 7920 6578 6973 7469 6e67 2073 l any existing s │ │ │ -0000e970: 6572 7665 7220 636f 6d6d 756e 6963 6174 erver communicat │ │ │ -0000e980: 696f 6e73 2073 7562 7072 6f63 6573 732e ions subprocess. │ │ │ -0000e990: 1f0a 2861 7574 6f6c 6f61 6420 2767 6e75 ..(autoload 'gnu │ │ │ -0000e9a0: 7365 7276 2d73 7461 7274 2022 676e 7573 serv-start "gnus │ │ │ -0000e9b0: 6572 7622 2027 2823 2420 2e20 3539 3435 erv" '(#$ . 5945 │ │ │ -0000e9c0: 3829 2074 206e 696c 290a 2340 3435 3320 8) t nil).#@453 │ │ │ -0000e9d0: 4765 6e65 7261 7465 7320 7468 6520 6046 Generates the `F │ │ │ -0000e9e0: 6f6e 7427 2c20 6053 697a 6527 2c20 616e ont', `Size', an │ │ │ -0000e9f0: 6420 6057 6569 6768 7427 2073 7562 6d65 d `Weight' subme │ │ │ -0000ea00: 6e75 7320 666f 7220 7468 6520 4f70 7469 nus for the Opti │ │ │ -0000ea10: 6f6e 7320 6d65 6e75 2e0a 5468 6973 2069 ons menu..This i │ │ │ -0000ea20: 7320 7275 6e20 7468 6520 6669 7273 7420 s run the first │ │ │ -0000ea30: 7469 6d65 2074 6861 7420 6120 666f 6e74 time that a font │ │ │ -0000ea40: 2d6d 656e 7520 6973 206e 6565 6465 6420 -menu is needed │ │ │ -0000ea50: 666f 7220 6561 6368 2064 6576 6963 652e for each device. │ │ │ -0000ea60: 0a49 6620 796f 7520 646f 6e27 7420 6c69 .If you don't li │ │ │ -0000ea70: 6b65 2074 6865 206c 617a 7920 696e 766f ke the lazy invo │ │ │ -0000ea80: 6361 7469 6f6e 206f 6620 7468 6973 2066 cation of this f │ │ │ -0000ea90: 756e 6374 696f 6e2c 2079 6f75 2063 616e unction, you can │ │ │ -0000eaa0: 2061 6464 2069 7420 746f 0a60 6372 6561 add it to.`crea │ │ │ -0000eab0: 7465 2d64 6576 6963 652d 686f 6f6b 2720 te-device-hook' │ │ │ -0000eac0: 616e 6420 7468 6174 2077 696c 6c20 6d61 and that will ma │ │ │ -0000ead0: 6b65 2074 6865 2066 6f6e 7420 6d65 6e75 ke the font menu │ │ │ -0000eae0: 7320 7265 7370 6f6e 6420 6d6f 7265 2071 s respond more q │ │ │ -0000eaf0: 7569 636b 6c79 0a77 6865 6e20 7468 6579 uickly.when they │ │ │ -0000eb00: 2061 7265 2073 656c 6563 7465 6420 666f are selected fo │ │ │ -0000eb10: 7220 7468 6520 6669 7273 7420 7469 6d65 r the first time │ │ │ -0000eb20: 2e20 2049 6620 796f 7520 6164 6420 666f . If you add fo │ │ │ -0000eb30: 6e74 7320 746f 2079 6f75 7220 7379 7374 nts to your syst │ │ │ -0000eb40: 656d 2c20 0a6f 7220 6966 2079 6f75 2063 em, .or if you c │ │ │ -0000eb50: 6861 6e67 6520 796f 7572 2066 6f6e 7420 hange your font │ │ │ -0000eb60: 7061 7468 2c20 796f 7520 6361 6e20 6361 path, you can ca │ │ │ -0000eb70: 6c6c 2074 6869 7320 746f 2072 652d 696e ll this to re-in │ │ │ -0000eb80: 6974 6961 6c69 7a65 2074 6865 206d 656e itialize the men │ │ │ -0000eb90: 7573 2e1f 0a28 6175 746f 6c6f 6164 2027 us...(autoload ' │ │ │ -0000eba0: 6774 6b2d 7265 7365 742d 6465 7669 6365 gtk-reset-device │ │ │ -0000ebb0: 2d66 6f6e 742d 6d65 6e75 7320 2267 746b -font-menus "gtk │ │ │ -0000ebc0: 2d66 6f6e 742d 6d65 6e75 2220 2728 2324 -font-menu" '(#$ │ │ │ -0000ebd0: 202e 2035 3938 3536 2920 6e69 6c20 6e69 . 59856) nil ni │ │ │ -0000ebe0: 6c29 0a28 6279 7465 2d63 6f64 6520 22c0 l).(byte-code ". │ │ │ -0000ebf0: c1c2 c389 8925 8722 205b 6175 746f 6c6f .....%." [autolo │ │ │ -0000ec00: 6164 2067 746b 2d66 6f6e 742d 6d65 6e75 ad gtk-font-menu │ │ │ -0000ec10: 2d66 6f6e 742d 6461 7461 2022 6774 6b2d -font-data "gtk- │ │ │ -0000ec20: 666f 6e74 2d6d 656e 7522 206e 696c 5d20 font-menu" nil] │ │ │ -0000ec30: 3629 0a23 4032 3937 202a 4e6f 6e2d 6e69 6).#@297 *Non-ni │ │ │ -0000ec40: 6c20 6d65 616e 7320 6769 7665 206d 6f72 l means give mor │ │ │ -0000ec50: 6520 696e 666f 2061 626f 7574 2048 656c e info about Hel │ │ │ -0000ec60: 7020 636f 6d6d 616e 6420 696e 2074 6872 p command in thr │ │ │ -0000ec70: 6565 2073 7465 7073 2e0a 5468 6520 7468 ee steps..The th │ │ │ -0000ec80: 7265 6520 7374 6570 7320 6172 6520 7369 ree steps are si │ │ │ -0000ec90: 6d70 6c65 2070 726f 6d70 742c 2070 726f mple prompt, pro │ │ │ -0000eca0: 6d70 7420 7769 7468 2061 6c6c 206f 7074 mpt with all opt │ │ │ -0000ecb0: 696f 6e73 2c0a 616e 6420 7769 6e64 6f77 ions,.and window │ │ │ -0000ecc0: 206c 6973 7469 6e67 2061 6e64 2064 6573 listing and des │ │ │ -0000ecd0: 6372 6962 696e 6720 7468 6520 6f70 7469 cribing the opti │ │ │ -0000ece0: 6f6e 732e 0a41 2076 616c 7565 206f 6620 ons..A value of │ │ │ -0000ecf0: 6e69 6c20 6d65 616e 7320 736b 6970 2074 nil means skip t │ │ │ -0000ed00: 6865 206d 6964 646c 6520 7374 6570 2c20 he middle step, │ │ │ -0000ed10: 736f 2074 6861 740a 5c5b 6865 6c70 2d63 so that.\[help-c │ │ │ -0000ed20: 6f6d 6d61 6e64 5d20 5c5b 6865 6c70 2d63 ommand] \[help-c │ │ │ -0000ed30: 6f6d 6d61 6e64 5d20 6769 7665 7320 7468 ommand] gives th │ │ │ -0000ed40: 6520 7769 6e64 6f77 2074 6861 7420 6c69 e window that li │ │ │ -0000ed50: 7374 7320 7468 6520 6f70 7469 6f6e 732e sts the options. │ │ │ -0000ed60: 1f0a 2864 6566 7661 7220 7468 7265 652d ..(defvar three- │ │ │ -0000ed70: 7374 6570 2d68 656c 7020 7420 2823 2420 step-help t (#$ │ │ │ -0000ed80: 2e20 2d36 3034 3733 2929 0a23 4032 3334 . -60473)).#@234 │ │ │ -0000ed90: 2044 6973 706c 6179 206c 6973 7473 206f Display lists o │ │ │ -0000eda0: 6620 6675 6e63 7469 6f6e 7320 616e 6420 f functions and │ │ │ -0000edb0: 7661 7269 6162 6c65 7320 6d61 7463 6869 variables matchi │ │ │ -0000edc0: 6e67 2052 4547 4558 500a 696e 2062 7566 ng REGEXP.in buf │ │ │ -0000edd0: 6665 7220 222a 4879 7065 7220 4170 726f fer "*Hyper Apro │ │ │ -0000ede0: 706f 732a 222e 2020 4966 206f 7074 696f pos*". If optio │ │ │ -0000edf0: 6e61 6c20 7072 6566 6978 2061 7267 2069 nal prefix arg i │ │ │ -0000ee00: 7320 6769 7665 6e2c 2074 6865 6e20 7468 s given, then th │ │ │ -0000ee10: 650a 7661 6c75 6520 6f66 2060 6879 7065 e.value of `hype │ │ │ -0000ee20: 722d 6170 726f 706f 732d 7072 6f67 7261 r-apropos-progra │ │ │ -0000ee30: 6d6d 696e 672d 6170 726f 706f 7327 2069 mming-apropos' i │ │ │ -0000ee40: 7320 746f 6767 6c65 6420 666f 7220 7468 s toggled for th │ │ │ -0000ee50: 6973 2073 6561 7263 682e 0a53 6565 2061 is search..See a │ │ │ -0000ee60: 6c73 6f20 6068 7970 6572 2d61 7072 6f70 lso `hyper-aprop │ │ │ -0000ee70: 6f73 2d6d 6f64 6527 2e1f 0a28 6175 746f os-mode'...(auto │ │ │ -0000ee80: 6c6f 6164 2027 6879 7065 722d 6170 726f load 'hyper-apro │ │ │ -0000ee90: 706f 7320 2268 7970 6572 2d61 7072 6f70 pos "hyper-aprop │ │ │ -0000eea0: 6f73 2220 2728 2324 202e 2036 3038 3137 os" '(#$ . 60817 │ │ │ -0000eeb0: 2920 7420 6e69 6c29 0a28 6279 7465 2d63 ) t nil).(byte-c │ │ │ -0000eec0: 6f64 6520 22c0 c1c2 c3c4 c325 88c0 c5c2 ode "......%.... │ │ │ -0000eed0: c3c4 c325 8722 205b 6175 746f 6c6f 6164 ...%." [autoload │ │ │ -0000eee0: 2068 7970 6572 2d64 6573 6372 6962 652d hyper-describe- │ │ │ -0000eef0: 6b65 7920 2268 7970 6572 2d61 7072 6f70 key "hyper-aprop │ │ │ -0000ef00: 6f73 2220 6e69 6c20 7420 6879 7065 722d os" nil t hyper- │ │ │ -0000ef10: 6465 7363 7269 6265 2d6b 6579 2d62 7269 describe-key-bri │ │ │ -0000ef20: 6566 6c79 5d20 3629 0a23 4037 3320 4465 efly] 6).#@73 De │ │ │ -0000ef30: 7363 7269 6265 2066 6163 652e 2e0a 5365 scribe face...Se │ │ │ -0000ef40: 6520 616c 736f 2060 6879 7065 722d 6170 e also `hyper-ap │ │ │ -0000ef50: 726f 706f 7327 2061 6e64 2060 6879 7065 ropos' and `hype │ │ │ -0000ef60: 722d 6465 7363 7269 6265 2d66 756e 6374 r-describe-funct │ │ │ -0000ef70: 696f 6e27 2e1f 0a28 6175 746f 6c6f 6164 ion'...(autoload │ │ │ -0000ef80: 2027 6879 7065 722d 6465 7363 7269 6265 'hyper-describe │ │ │ -0000ef90: 2d66 6163 6520 2268 7970 6572 2d61 7072 -face "hyper-apr │ │ │ -0000efa0: 6f70 6f73 2220 2728 2324 202e 2036 3132 opos" '(#$ . 612 │ │ │ -0000efb0: 3330 2920 7420 6e69 6c29 0a23 4031 3132 30) t nil).#@112 │ │ │ -0000efc0: 2048 7970 6572 7465 7874 2064 726f 702d Hypertext drop- │ │ │ -0000efd0: 696e 2072 6570 6c61 6365 6d65 6e74 2066 in replacement f │ │ │ -0000efe0: 6f72 2060 6465 7363 7269 6265 2d76 6172 or `describe-var │ │ │ -0000eff0: 6961 626c 6527 2e0a 5365 6520 616c 736f iable'..See also │ │ │ -0000f000: 2060 6879 7065 722d 6170 726f 706f 7327 `hyper-apropos' │ │ │ -0000f010: 2061 6e64 2060 6879 7065 722d 6465 7363 and `hyper-desc │ │ │ -0000f020: 7269 6265 2d66 756e 6374 696f 6e27 2e1f ribe-function'.. │ │ │ -0000f030: 0a28 6175 746f 6c6f 6164 2027 6879 7065 .(autoload 'hype │ │ │ -0000f040: 722d 6465 7363 7269 6265 2d76 6172 6961 r-describe-varia │ │ │ -0000f050: 626c 6520 2268 7970 6572 2d61 7072 6f70 ble "hyper-aprop │ │ │ -0000f060: 6f73 2220 2728 2324 202e 2036 3133 3737 os" '(#$ . 61377 │ │ │ -0000f070: 2920 7420 6e69 6c29 0a23 4036 3820 5072 ) t nil).#@68 Pr │ │ │ -0000f080: 696e 7420 6d65 7373 6167 6520 6c69 7374 int message list │ │ │ -0000f090: 696e 6720 6b65 7920 7365 7175 656e 6365 ing key sequence │ │ │ -0000f0a0: 7320 7468 6174 2069 6e76 6f6b 6520 7370 s that invoke sp │ │ │ -0000f0b0: 6563 6966 6965 6420 636f 6d6d 616e 642e ecified command. │ │ │ -0000f0c0: 1f0a 2861 7574 6f6c 6f61 6420 2768 7970 ..(autoload 'hyp │ │ │ -0000f0d0: 6572 2d77 6865 7265 2d69 7320 2268 7970 er-where-is "hyp │ │ │ -0000f0e0: 6572 2d61 7072 6f70 6f73 2220 2728 2324 er-apropos" '(#$ │ │ │ -0000f0f0: 202e 2036 3135 3636 2920 7420 6e69 6c29 . 61566) t nil) │ │ │ -0000f100: 0a23 4032 3034 2048 7970 6572 7465 7874 .#@204 Hypertext │ │ │ -0000f110: 2072 6570 6c61 6365 6d65 6e74 2066 6f72 replacement for │ │ │ -0000f120: 2060 6465 7363 7269 6265 2d66 756e 6374 `describe-funct │ │ │ -0000f130: 696f 6e27 2e20 2055 6e6c 696b 6520 6064 ion'. Unlike `d │ │ │ -0000f140: 6573 6372 6962 652d 6675 6e63 7469 6f6e escribe-function │ │ │ -0000f150: 270a 696e 2074 6861 7420 7468 6520 7379 '.in that the sy │ │ │ -0000f160: 6d62 6f6c 2075 6e64 6572 2074 6865 2063 mbol under the c │ │ │ -0000f170: 7572 736f 7220 6973 2074 6865 2064 6566 ursor is the def │ │ │ -0000f180: 6175 6c74 2069 6620 6974 2069 7320 6120 ault if it is a │ │ │ -0000f190: 6675 6e63 7469 6f6e 2e0a 5365 6520 616c function..See al │ │ │ -0000f1a0: 736f 2060 6879 7065 722d 6170 726f 706f so `hyper-apropo │ │ │ -0000f1b0: 7327 2061 6e64 2060 6879 7065 722d 6465 s' and `hyper-de │ │ │ -0000f1c0: 7363 7269 6265 2d76 6172 6961 626c 6527 scribe-variable' │ │ │ -0000f1d0: 2e1f 0a28 6175 746f 6c6f 6164 2027 6879 ...(autoload 'hy │ │ │ -0000f1e0: 7065 722d 6465 7363 7269 6265 2d66 756e per-describe-fun │ │ │ -0000f1f0: 6374 696f 6e20 2268 7970 6572 2d61 7072 ction "hyper-apr │ │ │ -0000f200: 6f70 6f73 2220 2728 2324 202e 2036 3137 opos" '(#$ . 617 │ │ │ -0000f210: 3033 2920 7420 6e69 6c29 0a23 4031 3132 03) t nil).#@112 │ │ │ -0000f220: 2048 7970 6572 7465 7874 2064 726f 702d Hypertext drop- │ │ │ -0000f230: 696e 2072 6570 6c61 6365 6d65 6e74 2066 in replacement f │ │ │ -0000f240: 6f72 2060 6465 7363 7269 6265 2d76 6172 or `describe-var │ │ │ -0000f250: 6961 626c 6527 2e0a 5365 6520 616c 736f iable'..See also │ │ │ -0000f260: 2060 6879 7065 722d 6170 726f 706f 7327 `hyper-apropos' │ │ │ -0000f270: 2061 6e64 2060 6879 7065 722d 6465 7363 and `hyper-desc │ │ │ -0000f280: 7269 6265 2d66 756e 6374 696f 6e27 2e1f ribe-function'.. │ │ │ -0000f290: 0a28 6175 746f 6c6f 6164 2027 6879 7065 .(autoload 'hype │ │ │ -0000f2a0: 722d 6170 726f 706f 732d 7265 6164 2d76 r-apropos-read-v │ │ │ -0000f2b0: 6172 6961 626c 652d 7379 6d62 6f6c 2022 ariable-symbol " │ │ │ -0000f2c0: 6879 7065 722d 6170 726f 706f 7322 2027 hyper-apropos" ' │ │ │ -0000f2d0: 2823 2420 2e20 3631 3938 3529 206e 696c (#$ . 61985) nil │ │ │ -0000f2e0: 206e 696c 290a 2862 7974 652d 636f 6465 nil).(byte-code │ │ │ -0000f2f0: 2022 c2c3 1918 c408 095c 2288 c508 095c ".......\"....\ │ │ │ -0000f300: 2288 2ac6 c719 18c4 0809 5c22 88c5 0809 ".*.......\".... │ │ │ -0000f310: 5c22 882a c8c9 cacb cccb 2587 2220 5b6f \".*......%." [o │ │ │ -0000f320: 6c64 6675 6e20 6e65 7766 756e 2068 7970 ldfun newfun hyp │ │ │ -0000f330: 726f 706f 732d 7265 6164 2d76 6172 6961 ropos-read-varia │ │ │ -0000f340: 626c 652d 7379 6d62 6f6c 2068 7970 6572 ble-symbol hyper │ │ │ -0000f350: 2d61 7072 6f70 6f73 2d72 6561 642d 7661 -apropos-read-va │ │ │ -0000f360: 7269 6162 6c65 2d73 796d 626f 6c20 6465 riable-symbol de │ │ │ -0000f370: 6669 6e65 2d66 756e 6374 696f 6e20 6d61 fine-function ma │ │ │ -0000f380: 6b65 2d6f 6273 6f6c 6574 6520 6879 7072 ke-obsolete hypr │ │ │ -0000f390: 6f70 6f73 2d67 6574 2d64 6f63 2068 7970 opos-get-doc hyp │ │ │ -0000f3a0: 6572 2d61 7072 6f70 6f73 2d67 6574 2d64 er-apropos-get-d │ │ │ -0000f3b0: 6f63 2061 7574 6f6c 6f61 6420 6879 7065 oc autoload hype │ │ │ -0000f3c0: 722d 7365 742d 7661 7269 6162 6c65 2022 r-set-variable " │ │ │ -0000f3d0: 6879 7065 722d 6170 726f 706f 7322 206e hyper-apropos" n │ │ │ -0000f3e0: 696c 2074 5d20 3629 0a23 4035 3320 496e il t] 6).#@53 In │ │ │ -0000f3f0: 7465 7261 6374 6976 656c 7920 7365 7420 teractively set │ │ │ -0000f400: 7468 6520 7661 7269 6162 6c65 206f 6e20 the variable on │ │ │ -0000f410: 7468 6520 6375 7272 656e 7420 6c69 6e65 the current line │ │ │ -0000f420: 2e1f 0a28 6175 746f 6c6f 6164 2027 6879 ...(autoload 'hy │ │ │ -0000f430: 7065 722d 6170 726f 706f 732d 7365 742d per-apropos-set- │ │ │ -0000f440: 7661 7269 6162 6c65 2022 6879 7065 722d variable "hyper- │ │ │ -0000f450: 6170 726f 706f 7322 2027 2823 2420 2e20 apropos" '(#$ . │ │ │ -0000f460: 3632 3434 3629 2074 206e 696c 290a 2862 62446) t nil).(b │ │ │ -0000f470: 7974 652d 636f 6465 2022 c2c3 1918 c408 yte-code "...... │ │ │ -0000f480: 095c 2288 c508 095c 2288 2ac6 c7c8 c9ca .\"....\".*..... │ │ │ -0000f490: c925 88cb c719 18c4 0809 5c22 88c5 0809 .%........\".... │ │ │ -0000f4a0: 5c22 882a c987 2220 5b6f 6c64 6675 6e20 \".*.." [oldfun │ │ │ -0000f4b0: 6e65 7766 756e 2068 7970 726f 706f 732d newfun hypropos- │ │ │ -0000f4c0: 7365 742d 7661 7269 6162 6c65 2068 7970 set-variable hyp │ │ │ -0000f4d0: 6572 2d61 7072 6f70 6f73 2d73 6574 2d76 er-apropos-set-v │ │ │ -0000f4e0: 6172 6961 626c 6520 6465 6669 6e65 2d66 ariable define-f │ │ │ -0000f4f0: 756e 6374 696f 6e20 6d61 6b65 2d6f 6273 unction make-obs │ │ │ -0000f500: 6f6c 6574 6520 6175 746f 6c6f 6164 2068 olete autoload h │ │ │ -0000f510: 7970 6572 2d61 7072 6f70 6f73 2d70 6f70 yper-apropos-pop │ │ │ -0000f520: 7570 2d6d 656e 7520 2268 7970 6572 2d61 up-menu "hyper-a │ │ │ -0000f530: 7072 6f70 6f73 2220 6e69 6c20 7420 6879 propos" nil t hy │ │ │ -0000f540: 7072 6f70 6f73 2d70 6f70 7570 2d6d 656e propos-popup-men │ │ │ -0000f550: 755d 2036 290a 2340 3535 3620 4c69 7374 u] 6).#@556 List │ │ │ -0000f560: 206f 6620 6469 7265 6374 6f72 6965 7320 of directories │ │ │ -0000f570: 746f 2073 6561 7263 6820 666f 7220 496e to search for In │ │ │ -0000f580: 666f 2064 6f63 756d 656e 7461 7469 6f6e fo documentation │ │ │ -0000f590: 2066 696c 6573 2e0a 0a54 6865 2066 6972 files...The fir │ │ │ -0000f5a0: 7374 2064 6972 6563 746f 7279 2069 6e20 st directory in │ │ │ -0000f5b0: 7468 6973 206c 6973 742c 2074 6865 2022 this list, the " │ │ │ -0000f5c0: 6469 7222 2066 696c 6520 7468 6572 6520 dir" file there │ │ │ -0000f5d0: 7769 6c6c 2062 6563 6f6d 650a 7468 6520 will become.the │ │ │ -0000f5e0: 2864 6972 2954 6f70 206e 6f64 6520 6f66 (dir)Top node of │ │ │ -0000f5f0: 2074 6865 2049 6e66 6f20 646f 6375 6d65 the Info docume │ │ │ -0000f600: 6e74 6174 696f 6e20 7472 6565 2e0a 0a4e ntation tree...N │ │ │ -0000f610: 6f74 653a 2044 4f20 4e4f 5420 7573 6520 ote: DO NOT use │ │ │ -0000f620: 7468 6520 6063 7573 746f 6d69 7a65 2720 the `customize' │ │ │ -0000f630: 696e 7465 7266 6163 6520 746f 2063 6861 interface to cha │ │ │ -0000f640: 6e67 6520 7468 6520 7661 6c75 6520 6f66 nge the value of │ │ │ -0000f650: 2074 6869 730a 7661 7269 6162 6c65 2e20 this.variable. │ │ │ -0000f660: 2049 7473 2076 616c 7565 2069 7320 6372 Its value is cr │ │ │ -0000f670: 6561 7465 6420 6479 6e61 6d69 6361 6c6c eated dynamicall │ │ │ -0000f680: 7920 6f6e 2065 6163 6820 7374 6172 7475 y on each startu │ │ │ -0000f690: 702c 2064 6570 656e 6469 6e67 0a6f 6e20 p, depending.on │ │ │ -0000f6a0: 5845 6d61 6373 2070 6163 6b61 6765 7320 XEmacs packages │ │ │ -0000f6b0: 696e 7374 616c 6c65 6420 6f6e 2074 6865 installed on the │ │ │ -0000f6c0: 2073 7973 7465 6d2e 2020 4966 2079 6f75 system. If you │ │ │ -0000f6d0: 2077 616e 7420 746f 2063 6861 6e67 6520 want to change │ │ │ -0000f6e0: 7468 650a 7365 6172 6368 2070 6174 682c the.search path, │ │ │ -0000f6f0: 206d 616b 6520 7468 6520 6e65 6564 6564 make the needed │ │ │ -0000f700: 206d 6f64 6966 6963 6174 696f 6e73 206f modifications o │ │ │ -0000f710: 6e20 7468 6520 7661 7269 6162 6c65 2773 n the variable's │ │ │ -0000f720: 2076 616c 7565 0a66 726f 6d20 2e65 6d61 value.from .ema │ │ │ -0000f730: 6373 2e20 2046 6f72 2069 6e73 7461 6e63 cs. For instanc │ │ │ -0000f740: 653a 0a0a 2020 2020 2873 6574 7120 496e e:.. (setq In │ │ │ -0000f750: 666f 2d64 6972 6563 746f 7279 2d6c 6973 fo-directory-lis │ │ │ -0000f760: 7420 2863 6f6e 7320 227e 2f69 6e66 6f22 t (cons "~/info" │ │ │ -0000f770: 2049 6e66 6f2d 6469 7265 6374 6f72 792d Info-directory- │ │ │ -0000f780: 6c69 7374 2929 1f0a 2864 6566 7661 7220 list))..(defvar │ │ │ -0000f790: 496e 666f 2d64 6972 6563 746f 7279 2d6c Info-directory-l │ │ │ -0000f7a0: 6973 7420 6e69 6c20 2823 2420 2e20 3632 ist nil (#$ . 62 │ │ │ -0000f7b0: 3831 3229 290a 2340 3234 3320 456e 7465 812)).#@243 Ente │ │ │ -0000f7c0: 7220 496e 666f 2c20 7468 6520 646f 6375 r Info, the docu │ │ │ -0000f7d0: 6d65 6e74 6174 696f 6e20 6272 6f77 7365 mentation browse │ │ │ -0000f7e0: 722e 0a4f 7074 696f 6e61 6c20 6172 6775 r..Optional argu │ │ │ -0000f7f0: 6d65 6e74 2046 494c 4520 7370 6563 6966 ment FILE specif │ │ │ -0000f800: 6965 7320 7468 6520 6669 6c65 2074 6f20 ies the file to │ │ │ -0000f810: 6578 616d 696e 653b 0a74 6865 2064 6566 examine;.the def │ │ │ -0000f820: 6175 6c74 2069 7320 7468 6520 746f 702d ault is the top- │ │ │ -0000f830: 6c65 7665 6c20 6469 7265 6374 6f72 7920 level directory │ │ │ -0000f840: 6f66 2049 6e66 6f2e 0a0a 496e 2069 6e74 of Info...In int │ │ │ -0000f850: 6572 6163 7469 7665 2075 7365 2c20 6120 eractive use, a │ │ │ -0000f860: 7072 6566 6978 2061 7267 756d 656e 7420 prefix argument │ │ │ -0000f870: 6469 7265 6374 7320 7468 6973 2063 6f6d directs this com │ │ │ -0000f880: 6d61 6e64 0a74 6f20 7265 6164 2061 2066 mand.to read a f │ │ │ -0000f890: 696c 6520 6e61 6d65 2066 726f 6d20 7468 ile name from th │ │ │ -0000f8a0: 6520 6d69 6e69 6275 6666 6572 2e1f 0a28 e minibuffer...( │ │ │ -0000f8b0: 6175 746f 6c6f 6164 2027 696e 666f 2022 autoload 'info " │ │ │ -0000f8c0: 696e 666f 2220 2728 2324 202e 2036 3334 info" '(#$ . 634 │ │ │ -0000f8d0: 3230 2920 7420 6e69 6c29 0a23 4037 3120 20) t nil).#@71 │ │ │ -0000f8e0: 456e 7465 7220 496e 666f 2c20 7468 6520 Enter Info, the │ │ │ -0000f8f0: 646f 6375 6d65 6e74 6174 696f 6e20 6272 documentation br │ │ │ -0000f900: 6f77 7365 722e 2020 5072 6f6d 7074 2066 owser. Prompt f │ │ │ -0000f910: 6f72 206e 616d 6520 6f66 2049 6e66 6f20 or name of Info │ │ │ -0000f920: 6669 6c65 2e1f 0a28 6175 746f 6c6f 6164 file...(autoload │ │ │ -0000f930: 2027 496e 666f 2d71 7565 7279 2022 696e 'Info-query "in │ │ │ -0000f940: 666f 2220 2728 2324 202e 2036 3337 3132 fo" '(#$ . 63712 │ │ │ -0000f950: 2920 7420 6e69 6c29 0a23 4033 3134 2047 ) t nil).#@314 G │ │ │ -0000f960: 6f20 746f 2061 6e20 696e 666f 206e 6f64 o to an info nod │ │ │ -0000f970: 6520 7370 6563 6966 6965 6420 6173 2073 e specified as s │ │ │ -0000f980: 6570 6172 6174 6520 4649 4c45 4e41 4d45 eparate FILENAME │ │ │ -0000f990: 2061 6e64 204e 4f44 454e 414d 452e 0a4c and NODENAME..L │ │ │ -0000f9a0: 6f6f 6b20 666f 7220 6120 706c 6175 7369 ook for a plausi │ │ │ -0000f9b0: 626c 6520 6669 6c65 6e61 6d65 2c20 6f72 ble filename, or │ │ │ -0000f9c0: 2069 6620 6e6f 7420 666f 756e 6420 7468 if not found th │ │ │ -0000f9d0: 656e 206c 6f6f 6b20 666f 7220 5552 4c27 en look for URL' │ │ │ -0000f9e0: 7320 616e 640a 6469 7370 6174 6368 2074 s and.dispatch t │ │ │ -0000f9f0: 6f20 7468 6520 6170 7072 6f70 7269 6174 o the appropriat │ │ │ -0000fa00: 6520 666e 2e20 204e 4f2d 474f 494e 472d e fn. NO-GOING- │ │ │ -0000fa10: 4241 434b 2069 7320 6e6f 6e2d 6e69 6c20 BACK is non-nil │ │ │ -0000fa20: 6966 0a72 6563 6f76 6572 696e 6720 6672 if.recovering fr │ │ │ -0000fa30: 6f6d 2061 6e20 6572 726f 7220 696e 2074 om an error in t │ │ │ -0000fa40: 6869 7320 6675 6e63 7469 6f6e 3b20 6974 his function; it │ │ │ -0000fa50: 2073 6179 7320 646f 206e 6f74 2061 7474 says do not att │ │ │ -0000fa60: 656d 7074 0a66 7572 7468 6572 2028 7265 empt.further (re │ │ │ -0000fa70: 6375 7273 6976 6529 2065 7272 6f72 2072 cursive) error r │ │ │ -0000fa80: 6563 6f76 6572 792e 2020 5452 5946 494c ecovery. TRYFIL │ │ │ -0000fa90: 4520 6973 203f 3f1f 0a28 6175 746f 6c6f E is ??..(autolo │ │ │ -0000faa0: 6164 2027 496e 666f 2d66 696e 642d 6e6f ad 'Info-find-no │ │ │ -0000fab0: 6465 2022 696e 666f 2220 2728 2324 202e de "info" '(#$ . │ │ │ -0000fac0: 2036 3338 3339 2920 6e69 6c20 6e69 6c29 63839) nil nil) │ │ │ -0000fad0: 0a23 4033 3031 2028 5265 2962 7569 6c64 .#@301 (Re)build │ │ │ -0000fae0: 2060 6469 7227 2066 696c 6573 2069 6e20 `dir' files in │ │ │ -0000faf0: 7468 6520 6469 7265 6374 6f72 6965 7320 the directories │ │ │ -0000fb00: 7265 6d61 696e 696e 6720 6f6e 2074 6865 remaining on the │ │ │ -0000fb10: 2063 6f6d 6d61 6e64 206c 696e 652e 0a55 command line..U │ │ │ -0000fb20: 7365 2074 6869 7320 6672 6f6d 2074 6865 se this from the │ │ │ -0000fb30: 2063 6f6d 6d61 6e64 206c 696e 652c 2077 command line, w │ │ │ -0000fb40: 6974 6820 602d 6261 7463 6827 2c20 6974 ith `-batch', it │ │ │ -0000fb50: 2077 6f6e 2774 2077 6f72 6b20 696e 2061 won't work in a │ │ │ -0000fb60: 6e0a 696e 7465 7261 6374 6976 6520 5845 n.interactive XE │ │ │ -0000fb70: 6d61 6373 2e0a 0a45 6163 6820 6669 6c65 macs...Each file │ │ │ -0000fb80: 2069 7320 7072 6f63 6573 7365 6420 6576 is processed ev │ │ │ -0000fb90: 656e 2069 6620 616e 2065 7272 6f72 206f en if an error o │ │ │ -0000fba0: 6363 7572 7265 6420 7072 6576 696f 7573 ccurred previous │ │ │ -0000fbb0: 6c79 2e20 466f 7220 6578 616d 706c 652c ly. For example, │ │ │ -0000fbc0: 0a69 6e76 6f6b 6520 2278 656d 6163 7320 .invoke "xemacs │ │ │ -0000fbd0: 2d62 6174 6368 202d 6620 496e 666f 2d62 -batch -f Info-b │ │ │ -0000fbe0: 6174 6368 2d72 6562 7569 6c64 2d64 6972 atch-rebuild-dir │ │ │ -0000fbf0: 202f 7573 722f 6c6f 6361 6c2f 696e 666f /usr/local/info │ │ │ -0000fc00: 222e 1f0a 2861 7574 6f6c 6f61 6420 2749 "...(autoload 'I │ │ │ -0000fc10: 6e66 6f2d 6261 7463 682d 7265 6275 696c nfo-batch-rebuil │ │ │ -0000fc20: 642d 6469 7220 2269 6e66 6f22 2027 2823 d-dir "info" '(# │ │ │ -0000fc30: 2420 2e20 3634 3231 3529 206e 696c 206e $ . 64215) nil n │ │ │ -0000fc40: 696c 290a 2340 3433 3620 476f 2074 6f20 il).#@436 Go to │ │ │ -0000fc50: 696e 666f 206e 6f64 6520 6e61 6d65 6420 info node named │ │ │ -0000fc60: 4e41 4d45 2e20 2047 6976 6520 6a75 7374 NAME. Give just │ │ │ -0000fc70: 204e 4f44 454e 414d 4520 6f72 2028 4649 NODENAME or (FI │ │ │ -0000fc80: 4c45 4e41 4d45 294e 4f44 454e 414d 452e LENAME)NODENAME. │ │ │ -0000fc90: 0a41 6374 7561 6c6c 792c 2074 6865 2066 .Actually, the f │ │ │ -0000fca0: 6f6c 6c6f 7769 6e67 2069 6e74 6572 7072 ollowing interpr │ │ │ -0000fcb0: 6574 6174 696f 6e73 206f 6620 4e41 4d45 etations of NAME │ │ │ -0000fcc0: 2061 7265 2074 7269 6564 2069 6e20 6f72 are tried in or │ │ │ -0000fcd0: 6465 723a 0a20 2020 2028 4649 4c45 4e41 der:. (FILENA │ │ │ -0000fce0: 4d45 294e 4f44 454e 414d 450a 2020 2020 ME)NODENAME. │ │ │ -0000fcf0: 2846 494c 454e 414d 4529 2020 2020 2028 (FILENAME) ( │ │ │ -0000fd00: 7573 696e 6720 546f 7020 6e6f 6465 290a using Top node). │ │ │ -0000fd10: 2020 2020 4e4f 4445 4e41 4d45 2020 2020 NODENAME │ │ │ -0000fd20: 2020 2028 696e 2063 7572 7265 6e74 2066 (in current f │ │ │ -0000fd30: 696c 6529 0a20 2020 2054 4147 4e41 4d45 ile). TAGNAME │ │ │ -0000fd40: 2020 2020 2020 2020 2873 6565 2062 656c (see bel │ │ │ -0000fd50: 6f77 290a 2020 2020 4649 4c45 4e41 4d45 ow). FILENAME │ │ │ -0000fd60: 2020 2020 2020 2028 7573 696e 6720 546f (using To │ │ │ -0000fd70: 7020 6e6f 6465 290a 7768 6572 6520 5441 p node).where TA │ │ │ -0000fd80: 474e 414d 4520 6973 2061 2073 7472 696e GNAME is a strin │ │ │ -0000fd90: 6720 7468 6174 2061 7070 6561 7273 2069 g that appears i │ │ │ -0000fda0: 6e20 7175 6f74 6573 3a20 2254 4147 4e41 n quotes: "TAGNA │ │ │ -0000fdb0: 4d45 222c 2069 6e20 616e 0a61 6e6e 6f74 ME", in an.annot │ │ │ -0000fdc0: 6174 696f 6e20 666f 7220 616e 7920 6e6f ation for any no │ │ │ -0000fdd0: 6465 206f 6620 616e 7920 6669 6c65 2e20 de of any file. │ │ │ -0000fde0: 2028 5365 6520 6061 2720 616e 6420 6078 (See `a' and `x │ │ │ -0000fdf0: 2720 636f 6d6d 616e 6473 2e29 1f0a 2861 ' commands.)..(a │ │ │ -0000fe00: 7574 6f6c 6f61 6420 2749 6e66 6f2d 676f utoload 'Info-go │ │ │ -0000fe10: 746f 2d6e 6f64 6520 2269 6e66 6f22 2027 to-node "info" ' │ │ │ -0000fe20: 2823 2420 2e20 3634 3538 3629 2074 206e (#$ . 64586) t n │ │ │ -0000fe30: 696c 290a 2340 3330 2044 6972 6563 746c il).#@30 Directl │ │ │ -0000fe40: 7920 7669 7369 7420 616e 2069 6e66 6f20 y visit an info │ │ │ -0000fe50: 6669 6c65 2e1f 0a28 6175 746f 6c6f 6164 file...(autoload │ │ │ -0000fe60: 2027 496e 666f 2d76 6973 6974 2d66 696c 'Info-visit-fil │ │ │ -0000fe70: 6520 2269 6e66 6f22 2027 2823 2420 2e20 e "info" '(#$ . │ │ │ -0000fe80: 3635 3038 3129 2074 206e 696c 290a 2340 65081) t nil).#@ │ │ │ -0000fe90: 3732 2053 6561 7263 6820 666f 7220 5245 72 Search for RE │ │ │ -0000fea0: 4745 5850 2c20 7374 6172 7469 6e67 2066 GEXP, starting f │ │ │ -0000feb0: 726f 6d20 706f 696e 742c 2061 6e64 2073 rom point, and s │ │ │ -0000fec0: 656c 6563 7420 6e6f 6465 2069 7427 7320 elect node it's │ │ │ -0000fed0: 666f 756e 6420 696e 2e1f 0a28 6175 746f found in...(auto │ │ │ -0000fee0: 6c6f 6164 2027 496e 666f 2d73 6561 7263 load 'Info-searc │ │ │ -0000fef0: 6820 2269 6e66 6f22 2027 2823 2420 2e20 h "info" '(#$ . │ │ │ -0000ff00: 3635 3137 3129 2074 206e 696c 290a 2340 65171) t nil).#@ │ │ │ -0000ff10: 3134 3220 4c6f 6f6b 2075 7020 616e 2045 142 Look up an E │ │ │ -0000ff20: 6d61 6373 2063 6f6d 6d61 6e64 2069 6e20 macs command in │ │ │ -0000ff30: 7468 6520 456d 6163 7320 6d61 6e75 616c the Emacs manual │ │ │ -0000ff40: 2069 6e20 7468 6520 496e 666f 2073 7973 in the Info sys │ │ │ -0000ff50: 7465 6d2e 0a54 6869 7320 636f 6d6d 616e tem..This comman │ │ │ -0000ff60: 6420 6973 2064 6573 6967 6e65 6420 746f d is designed to │ │ │ -0000ff70: 2062 6520 7573 6564 2077 6865 7468 6572 be used whether │ │ │ -0000ff80: 2079 6f75 2061 7265 2061 6c72 6561 6479 you are already │ │ │ -0000ff90: 2069 6e20 496e 666f 206f 7220 6e6f 742e in Info or not. │ │ │ -0000ffa0: 1f0a 2861 7574 6f6c 6f61 6420 2749 6e66 ..(autoload 'Inf │ │ │ -0000ffb0: 6f2d 656d 6163 732d 636f 6d6d 616e 6420 o-emacs-command │ │ │ -0000ffc0: 2269 6e66 6f22 2027 2823 2420 2e20 3635 "info" '(#$ . 65 │ │ │ -0000ffd0: 3330 3029 2074 206e 696c 290a 2340 3134 300) t nil).#@14 │ │ │ -0000ffe0: 3220 4c6f 6f6b 2075 7020 616e 2045 6d61 2 Look up an Ema │ │ │ -0000fff0: 6373 2063 6f6d 6d61 6e64 2069 6e20 7468 cs command in th │ │ │ -00010000: 6520 456d 6163 7320 6d61 6e75 616c 2069 e Emacs manual i │ │ │ -00010010: 6e20 7468 6520 496e 666f 2073 7973 7465 n the Info syste │ │ │ -00010020: 6d2e 0a54 6869 7320 636f 6d6d 616e 6420 m..This command │ │ │ -00010030: 6973 2064 6573 6967 6e65 6420 746f 2062 is designed to b │ │ │ -00010040: 6520 7573 6564 2077 6865 7468 6572 2079 e used whether y │ │ │ -00010050: 6f75 2061 7265 2061 6c72 6561 6479 2069 ou are already i │ │ │ -00010060: 6e20 496e 666f 206f 7220 6e6f 742e 1f0a n Info or not... │ │ │ -00010070: 2861 7574 6f6c 6f61 6420 2749 6e66 6f2d (autoload 'Info- │ │ │ -00010080: 676f 746f 2d65 6d61 6373 2d63 6f6d 6d61 goto-emacs-comma │ │ │ -00010090: 6e64 2d6e 6f64 6520 2269 6e66 6f22 2027 nd-node "info" ' │ │ │ -000100a0: 2823 2420 2e20 3635 3530 3629 2074 206e (#$ . 65506) t n │ │ │ -000100b0: 696c 290a 2340 3134 3720 4c6f 6f6b 2075 il).#@147 Look u │ │ │ -000100c0: 7020 616e 2045 6d61 6373 206b 6579 2073 p an Emacs key s │ │ │ -000100d0: 6571 7565 6e63 6520 696e 2074 6865 2045 equence in the E │ │ │ -000100e0: 6d61 6373 206d 616e 7561 6c20 696e 2074 macs manual in t │ │ │ -000100f0: 6865 2049 6e66 6f20 7379 7374 656d 2e0a he Info system.. │ │ │ -00010100: 5468 6973 2063 6f6d 6d61 6e64 2069 7320 This command is │ │ │ -00010110: 6465 7369 676e 6564 2074 6f20 6265 2075 designed to be u │ │ │ -00010120: 7365 6420 7768 6574 6865 7220 796f 7520 sed whether you │ │ │ -00010130: 6172 6520 616c 7265 6164 7920 696e 2049 are already in I │ │ │ -00010140: 6e66 6f20 6f72 206e 6f74 2e1f 0a28 6175 nfo or not...(au │ │ │ -00010150: 746f 6c6f 6164 2027 496e 666f 2d67 6f74 toload 'Info-got │ │ │ -00010160: 6f2d 656d 6163 732d 6b65 792d 636f 6d6d o-emacs-key-comm │ │ │ -00010170: 616e 642d 6e6f 6465 2022 696e 666f 2220 and-node "info" │ │ │ -00010180: 2728 2324 202e 2036 3537 3232 2920 7420 '(#$ . 65722) t │ │ │ -00010190: 6e69 6c29 0a23 4031 3437 204c 6f6f 6b20 nil).#@147 Look │ │ │ -000101a0: 7570 2061 6e20 456d 6163 7320 6b65 7920 up an Emacs key │ │ │ -000101b0: 7365 7175 656e 6365 2069 6e20 7468 6520 sequence in the │ │ │ -000101c0: 456d 6163 7320 6d61 6e75 616c 2069 6e20 Emacs manual in │ │ │ -000101d0: 7468 6520 496e 666f 2073 7973 7465 6d2e the Info system. │ │ │ -000101e0: 0a54 6869 7320 636f 6d6d 616e 6420 6973 .This command is │ │ │ -000101f0: 2064 6573 6967 6e65 6420 746f 2062 6520 designed to be │ │ │ -00010200: 7573 6564 2077 6865 7468 6572 2079 6f75 used whether you │ │ │ -00010210: 2061 7265 2061 6c72 6561 6479 2069 6e20 are already in │ │ │ -00010220: 496e 666f 206f 7220 6e6f 742e 1f0a 2861 Info or not...(a │ │ │ -00010230: 7574 6f6c 6f61 6420 2749 6e66 6f2d 656d utoload 'Info-em │ │ │ -00010240: 6163 732d 6b65 7920 2269 6e66 6f22 2027 acs-key "info" ' │ │ │ -00010250: 2823 2420 2e20 3635 3934 3729 2074 206e (#$ . 65947) t n │ │ │ -00010260: 696c 290a 2340 3134 3820 4c6f 6f6b 2075 il).#@148 Look u │ │ │ -00010270: 7020 616e 2045 6d61 6373 204c 6973 7020 p an Emacs Lisp │ │ │ -00010280: 6675 6e63 7469 6f6e 2069 6e20 7468 6520 function in the │ │ │ -00010290: 456c 6973 7020 6d61 6e75 616c 2069 6e20 Elisp manual in │ │ │ -000102a0: 7468 6520 496e 666f 2073 7973 7465 6d2e the Info system. │ │ │ -000102b0: 0a54 6869 7320 636f 6d6d 616e 6420 6973 .This command is │ │ │ -000102c0: 2064 6573 6967 6e65 6420 746f 2062 6520 designed to be │ │ │ -000102d0: 7573 6564 2077 6865 7468 6572 2079 6f75 used whether you │ │ │ -000102e0: 2061 7265 2061 6c72 6561 6479 2069 6e20 are already in │ │ │ -000102f0: 496e 666f 206f 7220 6e6f 742e 1f0a 2861 Info or not...(a │ │ │ -00010300: 7574 6f6c 6f61 6420 2749 6e66 6f2d 656c utoload 'Info-el │ │ │ -00010310: 6973 702d 7265 6620 2269 6e66 6f22 2027 isp-ref "info" ' │ │ │ -00010320: 2823 2420 2e20 3636 3135 3429 2074 206e (#$ . 66154) t n │ │ │ -00010330: 696c 290a 2340 3435 3320 4765 6e65 7261 il).#@453 Genera │ │ │ -00010340: 7465 7320 7468 6520 6046 6f6e 7427 2c20 tes the `Font', │ │ │ -00010350: 6053 697a 6527 2c20 616e 6420 6057 6569 `Size', and `Wei │ │ │ -00010360: 6768 7427 2073 7562 6d65 6e75 7320 666f ght' submenus fo │ │ │ -00010370: 7220 7468 6520 4f70 7469 6f6e 7320 6d65 r the Options me │ │ │ -00010380: 6e75 2e0a 5468 6973 2069 7320 7275 6e20 nu..This is run │ │ │ -00010390: 7468 6520 6669 7273 7420 7469 6d65 2074 the first time t │ │ │ -000103a0: 6861 7420 6120 666f 6e74 2d6d 656e 7520 hat a font-menu │ │ │ -000103b0: 6973 206e 6565 6465 6420 666f 7220 6561 is needed for ea │ │ │ -000103c0: 6368 2064 6576 6963 652e 0a49 6620 796f ch device..If yo │ │ │ -000103d0: 7520 646f 6e27 7420 6c69 6b65 2074 6865 u don't like the │ │ │ -000103e0: 206c 617a 7920 696e 766f 6361 7469 6f6e lazy invocation │ │ │ -000103f0: 206f 6620 7468 6973 2066 756e 6374 696f of this functio │ │ │ -00010400: 6e2c 2079 6f75 2063 616e 2061 6464 2069 n, you can add i │ │ │ -00010410: 7420 746f 0a60 6372 6561 7465 2d64 6576 t to.`create-dev │ │ │ -00010420: 6963 652d 686f 6f6b 2720 616e 6420 7468 ice-hook' and th │ │ │ -00010430: 6174 2077 696c 6c20 6d61 6b65 2074 6865 at will make the │ │ │ -00010440: 2066 6f6e 7420 6d65 6e75 7320 7265 7370 font menus resp │ │ │ -00010450: 6f6e 6420 6d6f 7265 2071 7569 636b 6c79 ond more quickly │ │ │ -00010460: 0a77 6865 6e20 7468 6579 2061 7265 2073 .when they are s │ │ │ -00010470: 656c 6563 7465 6420 666f 7220 7468 6520 elected for the │ │ │ -00010480: 6669 7273 7420 7469 6d65 2e20 2049 6620 first time. If │ │ │ -00010490: 796f 7520 6164 6420 666f 6e74 7320 746f you add fonts to │ │ │ -000104a0: 2079 6f75 7220 7379 7374 656d 2c20 0a6f your system, .o │ │ │ -000104b0: 7220 6966 2079 6f75 2063 6861 6e67 6520 r if you change │ │ │ -000104c0: 796f 7572 2066 6f6e 7420 7061 7468 2c20 your font path, │ │ │ -000104d0: 796f 7520 6361 6e20 6361 6c6c 2074 6869 you can call thi │ │ │ -000104e0: 7320 746f 2072 652d 696e 6974 6961 6c69 s to re-initiali │ │ │ -000104f0: 7a65 2074 6865 206d 656e 7573 2e1f 0a28 ze the menus...( │ │ │ -00010500: 6175 746f 6c6f 6164 2027 6d73 7769 6e64 autoload 'mswind │ │ │ -00010510: 6f77 732d 7265 7365 742d 6465 7669 6365 ows-reset-device │ │ │ -00010520: 2d66 6f6e 742d 6d65 6e75 7320 226d 7377 -font-menus "msw │ │ │ -00010530: 2d66 6f6e 742d 6d65 6e75 2220 2728 2324 -font-menu" '(#$ │ │ │ -00010540: 202e 2036 3633 3632 2920 6e69 6c20 6e69 . 66362) nil ni │ │ │ -00010550: 6c29 0a28 6279 7465 2d63 6f64 6520 22c0 l).(byte-code ". │ │ │ -00010560: c1c2 c389 8925 8722 205b 6175 746f 6c6f .....%." [autolo │ │ │ -00010570: 6164 206d 7377 696e 646f 7773 2d66 6f6e ad mswindows-fon │ │ │ -00010580: 742d 6d65 6e75 2d66 6f6e 742d 6461 7461 t-menu-font-data │ │ │ -00010590: 2022 6d73 772d 666f 6e74 2d6d 656e 7522 "msw-font-menu" │ │ │ -000105a0: 206e 696c 5d20 3629 0a23 4032 3920 456e nil] 6).#@29 En │ │ │ -000105b0: 6162 6c65 206d 6f75 7365 2077 6865 656c able mouse wheel │ │ │ -000105c0: 2073 7570 706f 7274 2e1f 0a28 6175 746f support...(auto │ │ │ -000105d0: 6c6f 6164 2027 6d77 6865 656c 2d69 6e73 load 'mwheel-ins │ │ │ -000105e0: 7461 6c6c 2022 6d77 6865 656c 2220 2728 tall "mwheel" '( │ │ │ -000105f0: 2324 202e 2036 3639 3930 2920 7420 6e69 #$ . 66990) t ni │ │ │ -00010600: 6c29 0a23 4036 3720 496e 7374 616c 6c20 l).#@67 Install │ │ │ -00010610: 6120 7072 652d 6279 7465 636f 6d70 696c a pre-bytecompil │ │ │ -00010620: 6564 2058 456d 6163 7320 7061 636b 6167 ed XEmacs packag │ │ │ -00010630: 6520 696e 746f 2070 6163 6b61 6765 2068 e into package h │ │ │ -00010640: 6965 7261 7263 6879 2e1f 0a28 6175 746f ierarchy...(auto │ │ │ -00010650: 6c6f 6164 2027 7061 636b 6167 652d 6164 load 'package-ad │ │ │ -00010660: 6d69 6e2d 6164 642d 6269 6e61 7279 2d70 min-add-binary-p │ │ │ -00010670: 6163 6b61 6765 2022 7061 636b 6167 652d ackage "package- │ │ │ -00010680: 6164 6d69 6e22 2027 2823 2420 2e20 3637 admin" '(#$ . 67 │ │ │ -00010690: 3038 3029 2074 206e 696c 290a 2340 3133 080) t nil).#@13 │ │ │ -000106a0: 3139 204c 6973 7420 6f66 2070 6163 6b61 19 List of packa │ │ │ -000106b0: 6765 7320 7468 6174 2061 7265 2069 6e73 ges that are ins │ │ │ -000106c0: 7461 6c6c 6564 2061 7420 7468 6973 2073 talled at this s │ │ │ -000106d0: 6974 652e 0a46 6f72 2065 6163 6820 656c ite..For each el │ │ │ -000106e0: 656d 656e 7420 696e 2074 6865 2061 6c69 ement in the ali │ │ │ -000106f0: 7374 2c20 2063 6172 2069 7320 7468 6520 st, car is the │ │ │ -00010700: 7061 636b 6167 6520 6e61 6d65 2061 6e64 package name and │ │ │ -00010710: 2074 6865 2063 6472 2069 730a 6120 706c the cdr is.a pl │ │ │ -00010720: 6973 7420 636f 6e74 6169 6e69 6e67 2069 ist containing i │ │ │ -00010730: 6e66 6f72 6d61 7469 6f6e 2061 626f 7574 nformation about │ │ │ -00010740: 2074 6865 2070 6163 6b61 6765 2e20 2020 the package. │ │ │ -00010750: 5479 7069 6361 6c20 6669 656c 6473 0a6b Typical fields.k │ │ │ -00010760: 6570 7420 696e 2074 6865 2070 6c69 7374 ept in the plist │ │ │ -00010770: 2061 7265 3a0a 0a76 6572 7369 6f6e 0909 are:..version.. │ │ │ -00010780: 2d20 7665 7273 696f 6e20 6f66 2074 6869 - version of thi │ │ │ -00010790: 7320 7061 636b 6167 650a 7072 6f76 6964 s package.provid │ │ │ -000107a0: 6573 092d 206c 6973 7420 6f66 2073 796d es.- list of sym │ │ │ -000107b0: 626f 6c73 2070 726f 7669 6465 640a 7265 bols provided.re │ │ │ -000107c0: 7175 6972 6573 092d 206c 6973 7420 6f66 quires.- list of │ │ │ -000107d0: 2073 796d 626f 6c73 2074 6861 7420 6172 symbols that ar │ │ │ -000107e0: 6520 7265 7175 6972 6564 2e0a 0909 2020 e required.... │ │ │ -000107f0: 5468 6573 6520 696e 2074 7572 6e20 6172 These in turn ar │ │ │ -00010800: 6520 7072 6f76 6964 6564 2062 7920 6f74 e provided by ot │ │ │ -00010810: 6865 7220 7061 636b 6167 6573 2e0a 6669 her packages..fi │ │ │ -00010820: 6c65 6e61 6d65 092d 206e 616d 6520 6f66 lename.- name of │ │ │ -00010830: 2074 6865 2066 696c 652e 0a73 697a 6509 the file..size. │ │ │ -00010840: 092d 2073 697a 6520 6f66 2074 6865 2066 .- size of the f │ │ │ -00010850: 696c 6520 2861 6b61 2074 6865 2062 756e ile (aka the bun │ │ │ -00010860: 646c 6564 2070 6163 6b61 6765 290a 6d64 dled package).md │ │ │ -00010870: 3573 756d 0909 2d20 636f 6d70 7574 6564 5sum..- computed │ │ │ -00010880: 206d 6435 2063 6865 636b 7375 6d0a 6465 md5 checksum.de │ │ │ -00010890: 7363 7269 7074 696f 6e09 2d20 5768 6174 scription.- What │ │ │ -000108a0: 2074 6869 7320 7061 636b 6167 6520 6973 this package is │ │ │ -000108b0: 2066 6f72 2e0a 7479 7065 0909 2d20 5768 for..type..- Wh │ │ │ -000108c0: 6574 6865 7220 7468 6973 2069 7320 6120 ether this is a │ │ │ -000108d0: 2762 696e 6172 7920 2864 6566 6175 6c74 'binary (default │ │ │ -000108e0: 2920 6f72 2027 7369 6e67 6c65 2066 696c ) or 'single fil │ │ │ -000108f0: 6520 7061 636b 6167 650a 0a4d 6f72 6520 e package..More │ │ │ -00010900: 6669 656c 6473 206d 6179 2062 6520 6164 fields may be ad │ │ │ -00010910: 6465 6420 6173 206e 6565 6465 642e 2020 ded as needed. │ │ │ -00010920: 416e 2065 7861 6d70 6c65 3a0a 0a27 280a An example:..'(. │ │ │ -00010930: 2028 6e61 6d65 0a20 2028 7665 7273 696f (name. (versio │ │ │ -00010940: 6e20 223c 7665 7273 696f 6e20 323e 220a n "". │ │ │ -00010950: 2020 2066 696c 6520 2266 696c 656e 616d file "filenam │ │ │ -00010960: 6522 0a20 2020 6465 7363 7269 7074 696f e". descriptio │ │ │ -00010970: 6e20 2277 6861 7420 7468 6973 2070 6163 n "what this pac │ │ │ -00010980: 6b61 6765 2069 7320 6162 6f75 742e 220a kage is about.". │ │ │ -00010990: 2020 2070 726f 7669 6465 7320 283c 6c69 provides (
  • ). requires │ │ │ -000109b0: 2028 3c6c 6973 743e 290a 2020 2073 697a (). siz │ │ │ -000109c0: 6520 3c69 6e74 6567 6572 2d62 7974 6573 e . md5sum "". file "fi │ │ │ -00010a20: 6c65 6e61 6d65 220a 2020 2064 6573 6372 lename". descr │ │ │ -00010a30: 6970 7469 6f6e 2022 7768 6174 2074 6869 iption "what thi │ │ │ -00010a40: 7320 7061 636b 6167 6520 6973 2061 626f s package is abo │ │ │ -00010a50: 7574 2e22 0a20 2020 7072 6f76 6964 6573 ut.". provides │ │ │ -00010a60: 2028 3c6c 6973 743e 290a 2020 2072 6571 (). req │ │ │ -00010a70: 7569 7265 7320 283c 6c69 7374 3e29 0a20 uires (). │ │ │ -00010a80: 2020 7369 7a65 203c 696e 7465 6765 722d size . md5sum │ │ │ -00010aa0: 2022 3c63 6865 636b 7375 6d22 0a20 2020 ". Mov │ │ │ -00014ea0: 6520 7269 6768 7420 6166 7465 7220 696e e right after in │ │ │ -00014eb0: 7365 7274 696f 6e2e 0a20 2043 2d63 205e sertion.. C-c ^ │ │ │ -00014ec0: 0920 204d 6f76 6520 7570 2061 6674 6572 . Move up after │ │ │ -00014ed0: 2069 6e73 6572 7469 6f6e 2e0a 2020 432d insertion.. C- │ │ │ -00014ee0: 6320 2e09 2020 4d6f 7665 2064 6f77 6e20 c .. Move down │ │ │ -00014ef0: 6166 7465 7220 696e 7365 7274 696f 6e2e after insertion. │ │ │ -00014f00: 0a20 2043 2d63 2060 0920 204d 6f76 6520 . C-c `. Move │ │ │ -00014f10: 6e6f 7274 6877 6573 7420 286e 7729 2061 northwest (nw) a │ │ │ -00014f20: 6674 6572 2069 6e73 6572 7469 6f6e 2e0a fter insertion.. │ │ │ -00014f30: 2020 432d 6320 2709 2020 4d6f 7665 206e C-c '. Move n │ │ │ -00014f40: 6f72 7468 6561 7374 2028 6e65 2920 6166 ortheast (ne) af │ │ │ -00014f50: 7465 7220 696e 7365 7274 696f 6e2e 0a20 ter insertion.. │ │ │ -00014f60: 2043 2d63 202f 0920 204d 6f76 6520 736f C-c /. Move so │ │ │ -00014f70: 7574 6877 6573 7420 2873 7729 2061 6674 uthwest (sw) aft │ │ │ -00014f80: 6572 2069 6e73 6572 7469 6f6e 2e0a 2020 er insertion.. │ │ │ -00014f90: 432d 6320 5c20 2020 4d6f 7665 2073 6f75 C-c \ Move sou │ │ │ -00014fa0: 7468 6561 7374 2028 7365 2920 6166 7465 theast (se) afte │ │ │ -00014fb0: 7220 696e 7365 7274 696f 6e2e 0a54 6865 r insertion..The │ │ │ -00014fc0: 2063 7572 7265 6e74 2064 6972 6563 7469 current directi │ │ │ -00014fd0: 6f6e 2069 7320 6469 7370 6c61 7965 6420 on is displayed │ │ │ -00014fe0: 696e 2074 6865 206d 6f64 656c 696e 652e in the modeline. │ │ │ -00014ff0: 2020 5468 6520 696e 6974 6961 6c0a 6469 The initial.di │ │ │ -00015000: 7265 6374 696f 6e20 6973 2072 6967 6874 rection is right │ │ │ -00015010: 2e20 2057 6869 7465 7370 6163 6520 6973 . Whitespace is │ │ │ -00015020: 2069 6e73 6572 7465 6420 616e 6420 7461 inserted and ta │ │ │ -00015030: 6273 2061 7265 2063 6861 6e67 6564 2074 bs are changed t │ │ │ -00015040: 6f0a 7370 6163 6573 2077 6865 6e20 7265 o.spaces when re │ │ │ -00015050: 7175 6972 6564 2062 7920 6d6f 7665 6d65 quired by moveme │ │ │ -00015060: 6e74 2e20 2059 6f75 2063 616e 206d 6f76 nt. You can mov │ │ │ -00015070: 6520 6172 6f75 6e64 2069 6e20 7468 6520 e around in the │ │ │ -00015080: 6275 6666 6572 0a77 6974 6820 7468 6573 buffer.with thes │ │ │ -00015090: 6520 636f 6d6d 616e 6473 3a0a 2020 5c5b e commands:. \[ │ │ │ -000150a0: 7069 6374 7572 652d 6d6f 7665 2d64 6f77 picture-move-dow │ │ │ -000150b0: 6e5d 0920 204d 6f76 6520 7665 7274 6963 n]. Move vertic │ │ │ -000150c0: 616c 6c79 2074 6f20 5341 4d45 2063 6f6c ally to SAME col │ │ │ -000150d0: 756d 6e20 696e 2070 7265 7669 6f75 7320 umn in previous │ │ │ -000150e0: 6c69 6e65 2e0a 2020 5c5b 7069 6374 7572 line.. \[pictur │ │ │ -000150f0: 652d 6d6f 7665 2d75 705d 0920 204d 6f76 e-move-up]. Mov │ │ │ -00015100: 6520 7665 7274 6963 616c 6c79 2074 6f20 e vertically to │ │ │ -00015110: 5341 4d45 2063 6f6c 756d 6e20 696e 206e SAME column in n │ │ │ -00015120: 6578 7420 6c69 6e65 2e0a 2020 5c5b 7069 ext line.. \[pi │ │ │ -00015130: 6374 7572 652d 656e 642d 6f66 2d6c 696e cture-end-of-lin │ │ │ -00015140: 655d 0920 204d 6f76 6520 746f 2063 6f6c e]. Move to col │ │ │ -00015150: 756d 6e20 666f 6c6c 6f77 696e 6720 6c61 umn following la │ │ │ -00015160: 7374 206e 6f6e 2d77 6869 7465 7370 6163 st non-whitespac │ │ │ -00015170: 6520 6368 6172 6163 7465 722e 0a20 205c e character.. \ │ │ │ -00015180: 5b70 6963 7475 7265 2d66 6f72 7761 7264 [picture-forward │ │ │ -00015190: 2d63 6f6c 756d 6e5d 0920 204d 6f76 6520 -column]. Move │ │ │ -000151a0: 7269 6768 7420 696e 7365 7274 696e 6720 right inserting │ │ │ -000151b0: 7370 6163 6573 2069 6620 7265 7175 6972 spaces if requir │ │ │ -000151c0: 6564 2e0a 2020 5c5b 7069 6374 7572 652d ed.. \[picture- │ │ │ -000151d0: 6261 636b 7761 7264 2d63 6f6c 756d 6e5d backward-column] │ │ │ -000151e0: 0920 204d 6f76 6520 6c65 6674 2063 6861 . Move left cha │ │ │ -000151f0: 6e67 696e 6720 7461 6273 2074 6f20 7370 nging tabs to sp │ │ │ -00015200: 6163 6573 2069 6620 7265 7175 6972 6564 aces if required │ │ │ -00015210: 2e0a 2020 432d 6320 432d 6620 4d6f 7665 .. C-c C-f Move │ │ │ -00015220: 2069 6e20 6469 7265 6374 696f 6e20 6f66 in direction of │ │ │ -00015230: 2063 7572 7265 6e74 2070 6963 7475 7265 current picture │ │ │ -00015240: 206d 6f74 696f 6e2e 0a20 2043 2d63 2043 motion.. C-c C │ │ │ -00015250: 2d62 204d 6f76 6520 696e 206f 7070 6f73 -b Move in oppos │ │ │ -00015260: 6974 6520 6469 7265 6374 696f 6e20 6f66 ite direction of │ │ │ -00015270: 2063 7572 7265 6e74 2070 6963 7475 7265 current picture │ │ │ -00015280: 206d 6f74 696f 6e2e 0a20 2052 6574 7572 motion.. Retur │ │ │ -00015290: 6e20 204d 6f76 6520 746f 2062 6567 696e n Move to begin │ │ │ -000152a0: 6e69 6e67 206f 6620 6e65 7874 206c 696e ning of next lin │ │ │ -000152b0: 652e 0a59 6f75 2063 616e 2065 6469 7420 e..You can edit │ │ │ -000152c0: 7461 6275 6c61 7220 7465 7874 2077 6974 tabular text wit │ │ │ -000152d0: 6820 7468 6573 6520 636f 6d6d 616e 6473 h these commands │ │ │ -000152e0: 3a0a 2020 4d2d 5461 6209 2020 4d6f 7665 :. M-Tab. Move │ │ │ -000152f0: 2074 6f20 636f 6c75 6d6e 2062 656e 6561 to column benea │ │ │ -00015300: 7468 2028 6f72 2061 7429 206e 6578 7420 th (or at) next │ │ │ -00015310: 696e 7465 7265 7374 696e 6720 6368 6172 interesting char │ │ │ -00015320: 6163 7465 722e 0a09 2020 2020 6049 6e64 acter... `Ind │ │ │ -00015330: 656e 7473 2720 7265 6c61 7469 7665 2074 ents' relative t │ │ │ -00015340: 6f20 6120 7072 6576 696f 7573 206c 696e o a previous lin │ │ │ -00015350: 652e 0a20 2054 6162 0920 204d 6f76 6520 e.. Tab. Move │ │ │ -00015360: 746f 206e 6578 7420 7374 6f70 2069 6e20 to next stop in │ │ │ -00015370: 7461 6220 7374 6f70 206c 6973 742e 0a20 tab stop list.. │ │ │ -00015380: 2043 2d63 2054 6162 2053 6574 2074 6162 C-c Tab Set tab │ │ │ -00015390: 2073 746f 7073 2061 6363 6f72 6469 6e67 stops according │ │ │ -000153a0: 2074 6f20 636f 6e74 6578 7420 6f66 2074 to context of t │ │ │ -000153b0: 6869 7320 6c69 6e65 2e0a 0920 2020 2057 his line... W │ │ │ -000153c0: 6974 6820 4152 4720 7265 7365 7473 2074 ith ARG resets t │ │ │ -000153d0: 6162 2073 746f 7073 2074 6f20 6465 6661 ab stops to defa │ │ │ -000153e0: 756c 7420 2867 6c6f 6261 6c29 2076 616c ult (global) val │ │ │ -000153f0: 7565 2e0a 0920 2020 2053 6565 2061 6c73 ue... See als │ │ │ -00015400: 6f20 646f 6375 6d65 6e74 6174 696f 6e20 o documentation │ │ │ -00015410: 6f66 2076 6172 6961 626c 6509 7069 6374 of variable.pict │ │ │ -00015420: 7572 652d 7461 622d 6368 6172 730a 0920 ure-tab-chars.. │ │ │ -00015430: 2020 2077 6869 6368 2064 6566 696e 6573 which defines │ │ │ -00015440: 2022 696e 7465 7265 7374 696e 6720 6368 "interesting ch │ │ │ -00015450: 6172 6163 7465 7222 2e20 2059 6f75 2063 aracter". You c │ │ │ -00015460: 616e 206d 616e 7561 6c6c 790a 0920 2020 an manually.. │ │ │ -00015470: 2063 6861 6e67 6520 7468 6520 7461 6220 change the tab │ │ │ -00015480: 7374 6f70 206c 6973 7420 7769 7468 2063 stop list with c │ │ │ -00015490: 6f6d 6d61 6e64 205c 5b65 6469 742d 7461 ommand \[edit-ta │ │ │ -000154a0: 622d 7374 6f70 735d 2e0a 596f 7520 6361 b-stops]..You ca │ │ │ -000154b0: 6e20 6d61 6e69 7075 6c61 7465 2074 6578 n manipulate tex │ │ │ -000154c0: 7420 7769 7468 2074 6865 7365 2063 6f6d t with these com │ │ │ -000154d0: 6d61 6e64 733a 0a20 2043 2d64 0920 2043 mands:. C-d. C │ │ │ -000154e0: 6c65 6172 2028 7265 706c 6163 6529 2041 lear (replace) A │ │ │ -000154f0: 5247 2063 6f6c 756d 6e73 2061 6674 6572 RG columns after │ │ │ -00015500: 2070 6f69 6e74 2077 6974 686f 7574 206d point without m │ │ │ -00015510: 6f76 696e 672e 0a20 2043 2d63 2043 2d64 oving.. C-c C-d │ │ │ -00015520: 2044 656c 6574 6520 6368 6172 2061 7420 Delete char at │ │ │ -00015530: 706f 696e 7420 2d20 7468 6520 636f 6d6d point - the comm │ │ │ -00015540: 616e 6420 6e6f 726d 616c 6c79 2061 7373 and normally ass │ │ │ -00015550: 6967 6e65 6420 746f 2043 2d64 2e0a 2020 igned to C-d.. │ │ │ -00015560: 5c5b 7069 6374 7572 652d 6261 636b 7761 \[picture-backwa │ │ │ -00015570: 7264 2d63 6c65 6172 2d63 6f6c 756d 6e5d rd-clear-column] │ │ │ -00015580: 2020 436c 6561 7220 2872 6570 6c61 6365 Clear (replace │ │ │ -00015590: 2920 4152 4720 636f 6c75 6d6e 7320 6265 ) ARG columns be │ │ │ -000155a0: 666f 7265 2070 6f69 6e74 2c20 6d6f 7669 fore point, movi │ │ │ -000155b0: 6e67 2062 6163 6b20 6f76 6572 2074 6865 ng back over the │ │ │ -000155c0: 6d2e 0a20 205c 5b70 6963 7475 7265 2d63 m.. \[picture-c │ │ │ -000155d0: 6c65 6172 2d6c 696e 655d 0920 2043 6c65 lear-line]. Cle │ │ │ -000155e0: 6172 2041 5247 206c 696e 6573 2c20 6164 ar ARG lines, ad │ │ │ -000155f0: 7661 6e63 696e 6720 6f76 6572 2074 6865 vancing over the │ │ │ -00015600: 6d2e 0920 5468 6520 636c 6561 7265 640a m.. The cleared. │ │ │ -00015610: 0920 2020 2074 6578 7420 6973 2073 6176 . text is sav │ │ │ -00015620: 6564 2069 6e20 7468 6520 6b69 6c6c 2072 ed in the kill r │ │ │ -00015630: 696e 672e 0a20 205c 5b70 6963 7475 7265 ing.. \[picture │ │ │ -00015640: 2d6f 7065 6e2d 6c69 6e65 5d09 2020 4f70 -open-line]. Op │ │ │ -00015650: 656e 2062 6c61 6e6b 206c 696e 6528 7329 en blank line(s) │ │ │ -00015660: 2062 656e 6561 7468 2063 7572 7265 6e74 beneath current │ │ │ -00015670: 206c 696e 652e 0a59 6f75 2063 616e 206d line..You can m │ │ │ -00015680: 616e 6970 756c 6174 6520 7265 6374 616e anipulate rectan │ │ │ -00015690: 676c 6573 2077 6974 6820 7468 6573 6520 gles with these │ │ │ -000156a0: 636f 6d6d 616e 6473 3a0a 2020 432d 6320 commands:. C-c │ │ │ -000156b0: 432d 6b20 436c 6561 7220 286f 7220 6b69 C-k Clear (or ki │ │ │ -000156c0: 6c6c 2920 6120 7265 6374 616e 676c 6520 ll) a rectangle │ │ │ -000156d0: 616e 6420 7361 7665 2069 742e 0a20 2043 and save it.. C │ │ │ -000156e0: 2d63 2043 2d77 204c 696b 6520 432d 6320 -c C-w Like C-c │ │ │ -000156f0: 432d 6b20 6578 6365 7074 2072 6563 7461 C-k except recta │ │ │ -00015700: 6e67 6c65 2069 7320 7361 7665 6420 696e ngle is saved in │ │ │ -00015710: 206e 616d 6564 2072 6567 6973 7465 722e named register. │ │ │ -00015720: 0a20 2043 2d63 2043 2d79 204f 7665 726c . C-c C-y Overl │ │ │ -00015730: 6179 2028 6f72 2069 6e73 6572 7429 2063 ay (or insert) c │ │ │ -00015740: 7572 7265 6e74 6c79 2073 6176 6564 2072 urrently saved r │ │ │ -00015750: 6563 7461 6e67 6c65 2061 7420 706f 696e ectangle at poin │ │ │ -00015760: 742e 0a20 2043 2d63 2043 2d78 204c 696b t.. C-c C-x Lik │ │ │ -00015770: 6520 432d 6320 432d 7920 6578 6365 7074 e C-c C-y except │ │ │ -00015780: 2072 6563 7461 6e67 6c65 2069 7320 7461 rectangle is ta │ │ │ -00015790: 6b65 6e20 6672 6f6d 206e 616d 6564 2072 ken from named r │ │ │ -000157a0: 6567 6973 7465 722e 0a20 205c 5b63 6f70 egister.. \[cop │ │ │ -000157b0: 792d 7265 6374 616e 676c 652d 746f 2d72 y-rectangle-to-r │ │ │ -000157c0: 6567 6973 7465 725d 2020 2043 6f70 6965 egister] Copie │ │ │ -000157d0: 7320 6120 7265 6374 616e 676c 6520 746f s a rectangle to │ │ │ -000157e0: 2061 2072 6567 6973 7465 722e 0a20 205c a register.. \ │ │ │ -000157f0: 5b61 6476 6572 7469 7365 642d 756e 646f [advertised-undo │ │ │ -00015800: 5d20 2020 4361 6e20 756e 646f 2065 6666 ] Can undo eff │ │ │ -00015810: 6563 7473 206f 6620 7265 6374 616e 676c ects of rectangl │ │ │ -00015820: 6520 6f76 6572 6c61 7920 636f 6d6d 616e e overlay comman │ │ │ -00015830: 6473 0a09 2020 2020 636f 6d6d 616e 6473 ds.. commands │ │ │ -00015840: 2069 6620 696e 766f 6b65 6420 736f 6f6e if invoked soon │ │ │ -00015850: 2065 6e6f 7567 682e 0a59 6f75 2063 616e enough..You can │ │ │ -00015860: 2072 6574 7572 6e20 746f 2074 6865 2070 return to the p │ │ │ -00015870: 7265 7669 6f75 7320 6d6f 6465 2077 6974 revious mode wit │ │ │ -00015880: 683a 0a20 2043 2d63 2043 2d63 2057 6869 h:. C-c C-c Whi │ │ │ -00015890: 6368 2061 6c73 6f20 7374 7269 7073 2074 ch also strips t │ │ │ -000158a0: 7261 696c 696e 6720 7768 6974 6573 7061 railing whitespa │ │ │ -000158b0: 6365 2066 726f 6d20 6576 6572 7920 6c69 ce from every li │ │ │ -000158c0: 6e65 2e0a 0920 2020 2053 7472 6970 7069 ne... Strippi │ │ │ -000158d0: 6e67 2069 7320 7375 7070 7265 7373 6564 ng is suppressed │ │ │ -000158e0: 2062 7920 7375 7070 6c79 696e 6720 616e by supplying an │ │ │ -000158f0: 2061 7267 756d 656e 742e 0a0a 456e 7472 argument...Entr │ │ │ -00015900: 7920 746f 2074 6869 7320 6d6f 6465 2063 y to this mode c │ │ │ -00015910: 616c 6c73 2074 6865 2076 616c 7565 206f alls the value o │ │ │ -00015920: 6620 2070 6963 7475 7265 2d6d 6f64 652d f picture-mode- │ │ │ -00015930: 686f 6f6b 2020 6966 206e 6f6e 2d6e 696c hook if non-nil │ │ │ -00015940: 2e0a 0a4e 6f74 6520 7468 6174 2050 6963 ...Note that Pic │ │ │ -00015950: 7475 7265 206d 6f64 6520 636f 6d6d 616e ture mode comman │ │ │ -00015960: 6473 2077 696c 6c20 776f 726b 206f 7574 ds will work out │ │ │ -00015970: 7369 6465 206f 6620 5069 6374 7572 6520 side of Picture │ │ │ -00015980: 6d6f 6465 2c20 6275 740a 7468 6579 2061 mode, but.they a │ │ │ -00015990: 7265 206e 6f74 2064 6566 6175 6c74 6c79 re not defaultly │ │ │ -000159a0: 2061 7373 6967 6e65 6420 746f 206b 6579 assigned to key │ │ │ -000159b0: 732e 1f0a 2861 7574 6f6c 6f61 6420 2770 s...(autoload 'p │ │ │ -000159c0: 6963 7475 7265 2d6d 6f64 6520 2270 6963 icture-mode "pic │ │ │ -000159d0: 7475 7265 2220 2728 2324 202e 2038 3534 ture" '(#$ . 854 │ │ │ -000159e0: 3332 2920 7420 6e69 6c29 0a28 6465 6661 32) t nil).(defa │ │ │ -000159f0: 6c69 6173 2027 6564 6974 2d70 6963 7475 lias 'edit-pictu │ │ │ -00015a00: 7265 2027 7069 6374 7572 652d 6d6f 6465 re 'picture-mode │ │ │ -00015a10: 290a 2340 3336 3020 4465 6c65 7465 2074 ).#@360 Delete t │ │ │ -00015a20: 6865 2074 6578 7420 696e 2074 6865 2072 he text in the r │ │ │ -00015a30: 6567 696f 6e2d 7265 6374 616e 676c 6520 egion-rectangle │ │ │ -00015a40: 7769 7468 6f75 7420 7361 7669 6e67 2069 without saving i │ │ │ -00015a50: 742e 0a54 6865 2073 616d 6520 7261 6e67 t..The same rang │ │ │ -00015a60: 6520 6f66 2063 6f6c 756d 6e73 2069 7320 e of columns is │ │ │ -00015a70: 6465 6c65 7465 6420 696e 2065 6163 6820 deleted in each │ │ │ -00015a80: 6c69 6e65 2073 7461 7274 696e 6720 7769 line starting wi │ │ │ -00015a90: 7468 2074 6865 206c 696e 650a 7768 6572 th the line.wher │ │ │ -00015aa0: 6520 7468 6520 7265 6769 6f6e 2062 6567 e the region beg │ │ │ -00015ab0: 696e 7320 616e 6420 656e 6469 6e67 2077 ins and ending w │ │ │ -00015ac0: 6974 6820 7468 6520 6c69 6e65 2077 6865 ith the line whe │ │ │ -00015ad0: 7265 2074 6865 2072 6567 696f 6e20 656e re the region en │ │ │ -00015ae0: 6473 2e0a 0a57 6865 6e20 6361 6c6c 6564 ds...When called │ │ │ -00015af0: 2066 726f 6d20 6120 7072 6f67 7261 6d2c from a program, │ │ │ -00015b00: 2074 6865 2072 6563 7461 6e67 6c65 2773 the rectangle's │ │ │ -00015b10: 2063 6f72 6e65 7273 2061 7265 2053 5441 corners are STA │ │ │ -00015b20: 5254 2061 6e64 2045 4e44 2e0a 5769 7468 RT and END..With │ │ │ -00015b30: 2061 2070 7265 6669 7820 286f 7220 4649 a prefix (or FI │ │ │ -00015b40: 4c4c 2920 6172 6775 6d65 6e74 2c20 616c LL) argument, al │ │ │ -00015b50: 736f 2066 696c 6c20 6c69 6e65 7320 7768 so fill lines wh │ │ │ -00015b60: 6572 6520 6e6f 7468 696e 6720 6861 7320 ere nothing has │ │ │ -00015b70: 746f 2062 650a 6465 6c65 7465 642e 1f0a to be.deleted... │ │ │ -00015b80: 2861 7574 6f6c 6f61 6420 2764 656c 6574 (autoload 'delet │ │ │ -00015b90: 652d 7265 6374 616e 676c 6520 2272 6563 e-rectangle "rec │ │ │ -00015ba0: 7422 2027 2823 2420 2e20 3838 3630 3029 t" '(#$ . 88600) │ │ │ -00015bb0: 2074 206e 696c 290a 2340 3232 3320 4465 t nil).#@223 De │ │ │ -00015bc0: 6c65 7465 2074 6865 2063 6f6e 7465 6e74 lete the content │ │ │ -00015bd0: 7320 6f66 2074 6865 2072 6563 7461 6e67 s of the rectang │ │ │ -00015be0: 6c65 2077 6974 6820 636f 726e 6572 7320 le with corners │ │ │ -00015bf0: 6174 2053 5441 5254 2061 6e64 2045 4e44 at START and END │ │ │ -00015c00: 2c20 616e 640a 7265 7475 726e 2069 7420 , and.return it │ │ │ -00015c10: 6173 2061 206c 6973 7420 6f66 2073 7472 as a list of str │ │ │ -00015c20: 696e 6773 2c20 6f6e 6520 666f 7220 6561 ings, one for ea │ │ │ -00015c30: 6368 206c 696e 6520 6f66 2074 6865 2072 ch line of the r │ │ │ -00015c40: 6563 7461 6e67 6c65 2e0a 0a57 6974 6820 ectangle...With │ │ │ -00015c50: 616e 206f 7074 696f 6e61 6c20 4649 4c4c an optional FILL │ │ │ -00015c60: 2061 7267 756d 656e 742c 2061 6c73 6f20 argument, also │ │ │ -00015c70: 6669 6c6c 206c 696e 6573 2077 6865 7265 fill lines where │ │ │ -00015c80: 206e 6f74 6869 6e67 2068 6173 2074 6f20 nothing has to │ │ │ -00015c90: 6265 0a64 656c 6574 6564 2e1f 0a28 6175 be.deleted...(au │ │ │ -00015ca0: 746f 6c6f 6164 2027 6465 6c65 7465 2d65 toload 'delete-e │ │ │ -00015cb0: 7874 7261 6374 2d72 6563 7461 6e67 6c65 xtract-rectangle │ │ │ -00015cc0: 2022 7265 6374 2220 2728 2324 202e 2038 "rect" '(#$ . 8 │ │ │ -00015cd0: 3930 3232 2920 6e69 6c20 6e69 6c29 0a23 9022) nil nil).# │ │ │ -00015ce0: 4031 3237 2052 6574 7572 6e20 7468 6520 @127 Return the │ │ │ -00015cf0: 636f 6e74 656e 7473 206f 6620 7468 6520 contents of the │ │ │ -00015d00: 7265 6374 616e 676c 6520 7769 7468 2063 rectangle with c │ │ │ -00015d10: 6f72 6e65 7273 2061 7420 5354 4152 5420 orners at START │ │ │ -00015d20: 616e 6420 454e 442c 0a61 7320 6120 6c69 and END,.as a li │ │ │ -00015d30: 7374 206f 6620 7374 7269 6e67 732c 206f st of strings, o │ │ │ -00015d40: 6e65 2066 6f72 2065 6163 6820 6c69 6e65 ne for each line │ │ │ -00015d50: 206f 6620 7468 6520 7265 6374 616e 676c of the rectangl │ │ │ -00015d60: 652e 1f0a 2861 7574 6f6c 6f61 6420 2765 e...(autoload 'e │ │ │ -00015d70: 7874 7261 6374 2d72 6563 7461 6e67 6c65 xtract-rectangle │ │ │ -00015d80: 2022 7265 6374 2220 2728 2324 202e 2038 "rect" '(#$ . 8 │ │ │ -00015d90: 3933 3137 2920 6e69 6c20 6e69 6c29 0a23 9317) nil nil).# │ │ │ -00015da0: 4034 3320 5265 6374 616e 676c 6520 666f @43 Rectangle fo │ │ │ -00015db0: 7220 6079 616e 6b2d 7265 6374 616e 676c r `yank-rectangl │ │ │ -00015dc0: 6527 2074 6f20 696e 7365 7274 2e1f 0a28 e' to insert...( │ │ │ -00015dd0: 6465 6676 6172 206b 696c 6c65 642d 7265 defvar killed-re │ │ │ -00015de0: 6374 616e 676c 6520 6e69 6c20 2823 2420 ctangle nil (#$ │ │ │ -00015df0: 2e20 3839 3530 3829 290a 2340 3238 3720 . 89508)).#@287 │ │ │ -00015e00: 4465 6c65 7465 2074 6865 2072 6567 696f Delete the regio │ │ │ -00015e10: 6e2d 7265 6374 616e 676c 6520 616e 6420 n-rectangle and │ │ │ -00015e20: 7361 7665 2069 7420 6173 2074 6865 206c save it as the l │ │ │ -00015e30: 6173 7420 6b69 6c6c 6564 206f 6e65 2e0a ast killed one.. │ │ │ -00015e40: 596f 7520 6d69 6768 7420 7072 6566 6572 You might prefer │ │ │ -00015e50: 2074 6f20 7573 6520 6064 656c 6574 652d to use `delete- │ │ │ -00015e60: 6578 7472 6163 742d 7265 6374 616e 676c extract-rectangl │ │ │ -00015e70: 6527 2066 726f 6d20 6120 7072 6f67 7261 e' from a progra │ │ │ -00015e80: 6d2e 0a0a 5768 656e 2063 616c 6c65 6420 m...When called │ │ │ -00015e90: 6672 6f6d 2061 2070 726f 6772 616d 2c20 from a program, │ │ │ -00015ea0: 7468 6520 7265 6374 616e 676c 6527 7320 the rectangle's │ │ │ -00015eb0: 636f 726e 6572 7320 6172 6520 5354 4152 corners are STAR │ │ │ -00015ec0: 5420 616e 6420 454e 442e 0a57 6974 6820 T and END..With │ │ │ -00015ed0: 6120 7072 6566 6978 2028 6f72 2046 494c a prefix (or FIL │ │ │ -00015ee0: 4c29 2061 7267 756d 656e 742c 2061 6c73 L) argument, als │ │ │ -00015ef0: 6f20 6669 6c6c 206c 696e 6573 2077 6865 o fill lines whe │ │ │ -00015f00: 7265 206e 6f74 6869 6e67 2068 6173 2074 re nothing has t │ │ │ -00015f10: 6f20 6265 0a64 656c 6574 6564 2e1f 0a28 o be.deleted...( │ │ │ -00015f20: 6175 746f 6c6f 6164 2027 6b69 6c6c 2d72 autoload 'kill-r │ │ │ -00015f30: 6563 7461 6e67 6c65 2022 7265 6374 2220 ectangle "rect" │ │ │ -00015f40: 2728 2324 202e 2038 3936 3030 2920 7420 '(#$ . 89600) t │ │ │ -00015f50: 6e69 6c29 0a23 4036 3520 5961 6e6b 2074 nil).#@65 Yank t │ │ │ -00015f60: 6865 206c 6173 7420 6b69 6c6c 6564 2072 he last killed r │ │ │ -00015f70: 6563 7461 6e67 6c65 2077 6974 6820 7570 ectangle with up │ │ │ -00015f80: 7065 7220 6c65 6674 2063 6f72 6e65 7220 per left corner │ │ │ -00015f90: 6174 2070 6f69 6e74 2e1f 0a28 6175 746f at point...(auto │ │ │ -00015fa0: 6c6f 6164 2027 7961 6e6b 2d72 6563 7461 load 'yank-recta │ │ │ -00015fb0: 6e67 6c65 2022 7265 6374 2220 2728 2324 ngle "rect" '(#$ │ │ │ -00015fc0: 202e 2038 3939 3436 2920 7420 6e69 6c29 . 89946) t nil) │ │ │ -00015fd0: 0a23 4033 3038 2049 6e73 6572 7420 7465 .#@308 Insert te │ │ │ -00015fe0: 7874 206f 6620 5245 4354 414e 474c 4520 xt of RECTANGLE │ │ │ -00015ff0: 7769 7468 2075 7070 6572 206c 6566 7420 with upper left │ │ │ -00016000: 636f 726e 6572 2061 7420 706f 696e 742e corner at point. │ │ │ -00016010: 0a52 4543 5441 4e47 4c45 2773 2066 6972 .RECTANGLE's fir │ │ │ -00016020: 7374 206c 696e 6520 6973 2069 6e73 6572 st line is inser │ │ │ -00016030: 7465 6420 6174 2070 6f69 6e74 2c20 6974 ted at point, it │ │ │ -00016040: 7320 7365 636f 6e64 0a6c 696e 6520 6973 s second.line is │ │ │ -00016050: 2069 6e73 6572 7465 6420 6174 2061 2070 inserted at a p │ │ │ -00016060: 6f69 6e74 2076 6572 7469 6361 6c6c 7920 oint vertically │ │ │ -00016070: 756e 6465 7220 706f 696e 742c 2065 7463 under point, etc │ │ │ -00016080: 2e0a 5245 4354 414e 474c 4520 7368 6f75 ..RECTANGLE shou │ │ │ -00016090: 6c64 2062 6520 6120 6c69 7374 206f 6620 ld be a list of │ │ │ -000160a0: 7374 7269 6e67 732e 0a41 6674 6572 2074 strings..After t │ │ │ -000160b0: 6869 7320 636f 6d6d 616e 642c 2074 6865 his command, the │ │ │ -000160c0: 206d 6172 6b20 6973 2061 7420 7468 6520 mark is at the │ │ │ -000160d0: 7570 7065 7220 6c65 6674 2063 6f72 6e65 upper left corne │ │ │ -000160e0: 720a 616e 6420 706f 696e 7420 6973 2061 r.and point is a │ │ │ -000160f0: 7420 7468 6520 6c6f 7765 7220 7269 6768 t the lower righ │ │ │ -00016100: 7420 636f 726e 6572 2e1f 0a28 6175 746f t corner...(auto │ │ │ -00016110: 6c6f 6164 2027 696e 7365 7274 2d72 6563 load 'insert-rec │ │ │ -00016120: 7461 6e67 6c65 2022 7265 6374 2220 2728 tangle "rect" '( │ │ │ -00016130: 2324 202e 2039 3030 3731 2920 6e69 6c20 #$ . 90071) nil │ │ │ -00016140: 6e69 6c29 0a23 4032 3338 2042 6c61 6e6b nil).#@238 Blank │ │ │ -00016150: 206f 7574 2074 6865 2072 6567 696f 6e2d out the region- │ │ │ -00016160: 7265 6374 616e 676c 652c 2073 6869 6674 rectangle, shift │ │ │ -00016170: 696e 6720 7465 7874 2072 6967 6874 2e0a ing text right.. │ │ │ -00016180: 0a57 6865 6e20 6361 6c6c 6564 2066 726f .When called fro │ │ │ -00016190: 6d20 6120 7072 6f67 7261 6d2c 2074 6865 m a program, the │ │ │ -000161a0: 2072 6563 7461 6e67 6c65 2773 2063 6f72 rectangle's cor │ │ │ -000161b0: 6e65 7273 2061 7265 2053 5441 5254 2061 ners are START a │ │ │ -000161c0: 6e64 2045 4e44 2e0a 5769 7468 2061 2070 nd END..With a p │ │ │ -000161d0: 7265 6669 7820 286f 7220 4649 4c4c 2920 refix (or FILL) │ │ │ -000161e0: 6172 6775 6d65 6e74 2c20 6669 6c6c 2077 argument, fill w │ │ │ -000161f0: 6974 6820 626c 616e 6b73 2065 7665 6e20 ith blanks even │ │ │ -00016200: 6966 2074 6865 7265 2069 7320 6e6f 2074 if there is no t │ │ │ -00016210: 6578 740a 6f6e 2074 6865 2072 6967 6874 ext.on the right │ │ │ -00016220: 2073 6964 6520 6f66 2074 6865 2072 6563 side of the rec │ │ │ -00016230: 7461 6e67 6c65 2e1f 0a28 6175 746f 6c6f tangle...(autolo │ │ │ -00016240: 6164 2027 6f70 656e 2d72 6563 7461 6e67 ad 'open-rectang │ │ │ -00016250: 6c65 2022 7265 6374 2220 2728 2324 202e le "rect" '(#$ . │ │ │ -00016260: 2039 3034 3433 2920 7420 6e69 6c29 0a23 90443) t nil).# │ │ │ -00016270: 4033 3531 2049 6e73 6572 7420 5354 5249 @351 Insert STRI │ │ │ -00016280: 4e47 206f 6e20 6561 6368 206c 696e 6520 NG on each line │ │ │ -00016290: 6f66 2074 6865 2072 6567 696f 6e2d 7265 of the region-re │ │ │ -000162a0: 6374 616e 676c 652c 2073 6869 6674 696e ctangle, shiftin │ │ │ -000162b0: 6720 7465 7874 2072 6967 6874 2e0a 5468 g text right..Th │ │ │ -000162c0: 6520 6c65 6674 2065 6467 6520 6f66 2074 e left edge of t │ │ │ -000162d0: 6865 2072 6563 7461 6e67 6c65 2073 7065 he rectangle spe │ │ │ -000162e0: 6369 6669 6573 2074 6865 2063 6f6c 756d cifies the colum │ │ │ -000162f0: 6e20 666f 7220 696e 7365 7274 696f 6e2e n for insertion. │ │ │ -00016300: 0a0a 4966 2060 7065 6e64 696e 672d 6465 ..If `pending-de │ │ │ -00016310: 6c65 7465 2d6d 6f64 6527 2069 7320 6163 lete-mode' is ac │ │ │ -00016320: 7469 7665 2074 6865 2073 7472 696e 6720 tive the string │ │ │ -00016330: 7265 706c 6163 6520 7468 6520 7265 6769 replace the regi │ │ │ -00016340: 6f6e 2e0a 4f74 6865 7277 6973 6520 7468 on..Otherwise th │ │ │ -00016350: 6973 2063 6f6d 6d61 6e64 2064 6f65 7320 is command does │ │ │ -00016360: 6e6f 7420 6465 6c65 7465 206f 7220 6f76 not delete or ov │ │ │ -00016370: 6572 7772 6974 6520 616e 7920 6578 6973 erwrite any exis │ │ │ -00016380: 7469 6e67 2074 6578 742e 0a0a 5768 656e ting text...When │ │ │ -00016390: 2063 616c 6c65 6420 6672 6f6d 2061 2070 called from a p │ │ │ -000163a0: 726f 6772 616d 2c20 7468 6520 7265 6374 rogram, the rect │ │ │ -000163b0: 616e 676c 6527 7320 636f 726e 6572 7320 angle's corners │ │ │ -000163c0: 6172 6520 5354 4152 5420 616e 6420 454e are START and EN │ │ │ -000163d0: 442e 1f0a 2861 7574 6f6c 6f61 6420 2773 D...(autoload 's │ │ │ -000163e0: 7472 696e 672d 7265 6374 616e 676c 6520 tring-rectangle │ │ │ -000163f0: 2272 6563 7422 2027 2823 2420 2e20 3930 "rect" '(#$ . 90 │ │ │ -00016400: 3734 3129 2074 206e 696c 290a 2340 3131 741) t nil).#@11 │ │ │ -00016410: 3620 4c69 6b65 2060 7374 7269 6e67 2d72 6 Like `string-r │ │ │ -00016420: 6563 7461 6e67 6c65 272c 2062 7574 2075 ectangle', but u │ │ │ -00016430: 6e63 6f6e 6469 7469 6f6e 616c 6c79 2072 nconditionally r │ │ │ -00016440: 6570 6c61 6365 2074 6865 206f 7269 6769 eplace the origi │ │ │ -00016450: 6e61 6c20 7265 6769 6f6e 2c0a 6173 2069 nal region,.as i │ │ │ -00016460: 6620 6070 656e 6469 6e67 2d64 656c 6574 f `pending-delet │ │ │ -00016470: 652d 6d6f 6465 2720 7765 7265 2061 6374 e-mode' were act │ │ │ -00016480: 6976 652e 1f0a 2861 7574 6f6c 6f61 6420 ive...(autoload │ │ │ -00016490: 2772 6570 6c61 6365 2d72 6563 7461 6e67 'replace-rectang │ │ │ -000164a0: 6c65 2022 7265 6374 2220 2728 2324 202e le "rect" '(#$ . │ │ │ -000164b0: 2039 3131 3534 2920 7420 6e69 6c29 0a23 91154) t nil).# │ │ │ -000164c0: 4032 3638 2042 6c61 6e6b 206f 7574 2074 @268 Blank out t │ │ │ -000164d0: 6865 2072 6567 696f 6e2d 7265 6374 616e he region-rectan │ │ │ -000164e0: 676c 652e 0a54 6865 2074 6578 7420 7072 gle..The text pr │ │ │ -000164f0: 6576 696f 7573 6c79 2069 6e20 7468 6520 eviously in the │ │ │ -00016500: 7265 6769 6f6e 2069 7320 6f76 6572 7772 region is overwr │ │ │ -00016510: 6974 7465 6e20 7769 7468 2062 6c61 6e6b itten with blank │ │ │ -00016520: 732e 0a0a 5768 656e 2063 616c 6c65 6420 s...When called │ │ │ -00016530: 6672 6f6d 2061 2070 726f 6772 616d 2c20 from a program, │ │ │ -00016540: 7468 6520 7265 6374 616e 676c 6527 7320 the rectangle's │ │ │ -00016550: 636f 726e 6572 7320 6172 6520 5354 4152 corners are STAR │ │ │ -00016560: 5420 616e 6420 454e 442e 0a57 6974 6820 T and END..With │ │ │ -00016570: 6120 7072 6566 6978 2028 6f72 2046 494c a prefix (or FIL │ │ │ -00016580: 4c29 2061 7267 756d 656e 742c 2061 6c73 L) argument, als │ │ │ -00016590: 6f20 6669 6c6c 2077 6974 6820 626c 616e o fill with blan │ │ │ -000165a0: 6b73 2074 6865 2070 6172 7473 206f 6620 ks the parts of │ │ │ -000165b0: 7468 650a 7265 6374 616e 676c 6520 7768 the.rectangle wh │ │ │ -000165c0: 6963 6820 7765 7265 2065 6d70 7479 2e1f ich were empty.. │ │ │ -000165d0: 0a28 6175 746f 6c6f 6164 2027 636c 6561 .(autoload 'clea │ │ │ -000165e0: 722d 7265 6374 616e 676c 6520 2272 6563 r-rectangle "rec │ │ │ -000165f0: 7422 2027 2823 2420 2e20 3931 3333 3329 t" '(#$ . 91333) │ │ │ -00016600: 2074 206e 696c 290a 2340 3137 3737 2044 t nil).#@1777 D │ │ │ -00016610: 6973 706c 6179 2061 206c 6973 7420 6f66 isplay a list of │ │ │ -00016620: 2045 6d61 6373 204c 6973 7020 6669 6c65 Emacs Lisp file │ │ │ -00016630: 7320 7468 6174 2073 6861 646f 7720 6f74 s that shadow ot │ │ │ -00016640: 6865 7220 6669 6c65 732e 0a0a 5468 6973 her files...This │ │ │ -00016650: 2066 756e 6374 696f 6e20 6c69 7374 7320 function lists │ │ │ -00016660: 706f 7465 6e74 6961 6c20 6c6f 6164 2d70 potential load-p │ │ │ -00016670: 6174 6820 7072 6f62 6c65 6d73 2e20 2044 ath problems. D │ │ │ -00016680: 6972 6563 746f 7269 6573 2069 6e20 7468 irectories in th │ │ │ -00016690: 650a 606c 6f61 642d 7061 7468 2720 7661 e.`load-path' va │ │ │ -000166a0: 7269 6162 6c65 2061 7265 2073 6561 7263 riable are searc │ │ │ -000166b0: 6865 642c 2069 6e20 6f72 6465 722c 2066 hed, in order, f │ │ │ -000166c0: 6f72 2045 6d61 6373 204c 6973 700a 6669 or Emacs Lisp.fi │ │ │ -000166d0: 6c65 732e 2020 5768 656e 2061 2070 7265 les. When a pre │ │ │ -000166e0: 7669 6f75 736c 7920 656e 636f 756e 7465 viously encounte │ │ │ -000166f0: 7265 6420 6669 6c65 206e 616d 6520 6973 red file name is │ │ │ -00016700: 2066 6f75 6e64 2061 6761 696e 2c20 610a found again, a. │ │ │ -00016710: 6d65 7373 6167 6520 6973 2064 6973 706c message is displ │ │ │ -00016720: 6179 6564 2069 6e64 6963 6174 696e 6720 ayed indicating │ │ │ -00016730: 7468 6174 2074 6865 206c 6174 6572 2066 that the later f │ │ │ -00016740: 696c 6520 6973 2022 6869 6464 656e 2220 ile is "hidden" │ │ │ -00016750: 6279 0a74 6865 2065 6172 6c69 6572 2e0a by.the earlier.. │ │ │ -00016760: 0a46 6f72 2065 7861 6d70 6c65 2c20 7375 .For example, su │ │ │ -00016770: 7070 6f73 6520 606c 6f61 642d 7061 7468 ppose `load-path │ │ │ -00016780: 2720 6973 2073 6574 2074 6f0a 0a28 222f ' is set to..("/ │ │ │ -00016790: 7573 722f 676e 752f 656d 6163 732f 7369 usr/gnu/emacs/si │ │ │ -000167a0: 7465 2d6c 6973 7022 2022 2f75 7372 2f67 te-lisp" "/usr/g │ │ │ -000167b0: 6e75 2f65 6d61 6373 2f73 6861 7265 2f65 nu/emacs/share/e │ │ │ -000167c0: 6d61 6373 2f31 392e 3330 2f6c 6973 7022 macs/19.30/lisp" │ │ │ -000167d0: 290a 0a61 6e64 2074 6861 7420 6561 6368 )..and that each │ │ │ -000167e0: 206f 6620 7468 6573 6520 6469 7265 6374 of these direct │ │ │ -000167f0: 6f72 6965 7320 636f 6e74 6169 6e73 2061 ories contains a │ │ │ -00016800: 2066 696c 6520 6361 6c6c 6564 2058 5858 file called XXX │ │ │ -00016810: 2e65 6c2e 2020 5468 656e 0a58 5858 2e65 .el. Then.XXX.e │ │ │ -00016820: 6c20 696e 2074 6865 2073 6974 652d 6c69 l in the site-li │ │ │ -00016830: 7370 2064 6972 6563 746f 7279 2069 7320 sp directory is │ │ │ -00016840: 7265 6665 7272 6564 2074 6f20 6279 2061 referred to by a │ │ │ -00016850: 6c6c 206f 663a 0a28 7265 7175 6972 6520 ll of:.(require │ │ │ -00016860: 2758 5858 292c 2028 6175 746f 6c6f 6164 'XXX), (autoload │ │ │ -00016870: 202e 2e2e 2e20 2258 5858 2229 2c20 286c .... "XXX"), (l │ │ │ -00016880: 6f61 642d 6c69 6272 6172 7920 2258 5858 oad-library "XXX │ │ │ -00016890: 2229 2065 7463 2e0a 0a54 6865 2066 6972 ") etc...The fir │ │ │ -000168a0: 7374 2058 5858 2e65 6c20 6669 6c65 2070 st XXX.el file p │ │ │ -000168b0: 7265 7665 6e74 7320 656d 6163 7320 6672 revents emacs fr │ │ │ -000168c0: 6f6d 2073 6565 696e 6720 7468 6520 7365 om seeing the se │ │ │ -000168d0: 636f 6e64 2028 756e 6c65 7373 0a74 6865 cond (unless.the │ │ │ -000168e0: 2073 6563 6f6e 6420 6973 206c 6f61 6465 second is loade │ │ │ -000168f0: 6420 6578 706c 6963 6974 6c79 2076 6961 d explicitly via │ │ │ -00016900: 206c 6f61 642d 6669 6c65 292e 0a0a 5768 load-file)...Wh │ │ │ -00016910: 656e 206e 6f74 2069 6e74 656e 6465 642c en not intended, │ │ │ -00016920: 2073 7563 6820 7368 6164 6f77 696e 6773 such shadowings │ │ │ -00016930: 2063 616e 2062 6520 7468 6520 736f 7572 can be the sour │ │ │ -00016940: 6365 206f 6620 7375 6274 6c65 0a70 726f ce of subtle.pro │ │ │ -00016950: 626c 656d 732e 2020 466f 7220 6578 616d blems. For exam │ │ │ -00016960: 706c 652c 2074 6865 2061 626f 7665 2073 ple, the above s │ │ │ -00016970: 6974 7561 7469 6f6e 206d 6179 2068 6176 ituation may hav │ │ │ -00016980: 6520 6172 6973 656e 2062 6563 6175 7365 e arisen because │ │ │ -00016990: 2074 6865 0a58 5858 2070 6163 6b61 6765 the.XXX package │ │ │ -000169a0: 2077 6173 206e 6f74 2064 6973 7472 6962 was not distrib │ │ │ -000169b0: 7574 6564 2077 6974 6820 7665 7273 696f uted with versio │ │ │ -000169c0: 6e73 206f 6620 656d 6163 7320 7072 696f ns of emacs prio │ │ │ -000169d0: 7220 746f 0a31 392e 3330 2e20 2041 6e20 r to.19.30. An │ │ │ -000169e0: 656d 6163 7320 6d61 696e 7461 696e 6572 emacs maintainer │ │ │ -000169f0: 2064 6f77 6e6c 6f61 6465 6420 5858 5820 downloaded XXX │ │ │ -00016a00: 6672 6f6d 2065 6c73 6577 6865 7265 2061 from elsewhere a │ │ │ -00016a10: 6e64 2069 6e73 7461 6c6c 6564 0a69 742e nd installed.it. │ │ │ -00016a20: 2020 4c61 7465 722c 2058 5858 2077 6173 Later, XXX was │ │ │ -00016a30: 2075 7064 6174 6564 2061 6e64 2069 6e63 updated and inc │ │ │ -00016a40: 6c75 6465 6420 696e 2074 6865 2065 6d61 luded in the ema │ │ │ -00016a50: 6373 2064 6973 7472 6962 7574 696f 6e2e cs distribution. │ │ │ -00016a60: 0a55 6e6c 6573 7320 7468 6520 656d 6163 .Unless the emac │ │ │ -00016a70: 7320 6d61 696e 7461 696e 6572 2063 6865 s maintainer che │ │ │ -00016a80: 636b 7320 666f 7220 7468 6973 2c20 7468 cks for this, th │ │ │ -00016a90: 6520 6e65 7720 7665 7273 696f 6e20 6f66 e new version of │ │ │ -00016aa0: 2058 5858 0a77 696c 6c20 6265 2068 6964 XXX.will be hid │ │ │ -00016ab0: 6465 6e20 6265 6869 6e64 2074 6865 206f den behind the o │ │ │ -00016ac0: 6c64 2028 7768 6963 6820 6d61 7920 6e6f ld (which may no │ │ │ -00016ad0: 206c 6f6e 6765 7220 776f 726b 2077 6974 longer work wit │ │ │ -00016ae0: 6820 7468 6520 6e65 770a 656d 6163 7320 h the new.emacs │ │ │ -00016af0: 7665 7273 696f 6e29 2e0a 0a54 6869 7320 version)...This │ │ │ -00016b00: 6675 6e63 7469 6f6e 2070 6572 666f 726d function perform │ │ │ -00016b10: 7320 7468 6573 6520 6368 6563 6b73 2061 s these checks a │ │ │ -00016b20: 6e64 2066 6c61 6773 2061 6c6c 2070 6f73 nd flags all pos │ │ │ -00016b30: 7369 626c 650a 7368 6164 6f77 696e 6773 sible.shadowings │ │ │ -00016b40: 2e20 2042 6563 6175 7365 2061 202e 656c . Because a .el │ │ │ -00016b50: 2066 696c 6520 6d61 7920 6578 6973 7420 file may exist │ │ │ -00016b60: 7769 7468 6f75 7420 6120 636f 7272 6573 without a corres │ │ │ -00016b70: 706f 6e64 696e 6720 2e65 6c63 0a28 6f72 ponding .elc.(or │ │ │ -00016b80: 2076 6963 652d 7665 7273 6129 2c20 7468 vice-versa), th │ │ │ -00016b90: 6573 6520 7375 6666 6978 6573 2061 7265 ese suffixes are │ │ │ -00016ba0: 2065 7373 656e 7469 616c 6c79 2069 676e essentially ign │ │ │ -00016bb0: 6f72 6564 2e20 2041 2066 696c 650a 5858 ored. A file.XX │ │ │ -00016bc0: 582e 656c 6320 696e 2061 6e20 6561 726c X.elc in an earl │ │ │ -00016bd0: 7920 6469 7265 6374 6f72 7920 2874 6861 y directory (tha │ │ │ -00016be0: 7420 646f 6573 206e 6f74 2063 6f6e 7461 t does not conta │ │ │ -00016bf0: 696e 2058 5858 2e65 6c29 2069 730a 636f in XXX.el) is.co │ │ │ -00016c00: 6e73 6964 6572 6564 2074 6f20 7368 6164 nsidered to shad │ │ │ -00016c10: 6f77 2061 206c 6174 6572 2066 696c 6520 ow a later file │ │ │ -00016c20: 5858 582e 656c 2c20 616e 6420 7669 6365 XXX.el, and vice │ │ │ -00016c30: 2d76 6572 7361 2e0a 0a57 6865 6e20 7275 -versa...When ru │ │ │ -00016c40: 6e20 696e 7465 7261 6374 6976 656c 792c n interactively, │ │ │ -00016c50: 2074 6865 2073 6861 646f 7769 6e67 7320 the shadowings │ │ │ -00016c60: 2869 6620 616e 7929 2061 7265 2064 6973 (if any) are dis │ │ │ -00016c70: 706c 6179 6564 2069 6e20 610a 6275 6666 played in a.buff │ │ │ -00016c80: 6572 2063 616c 6c65 6420 602a 5368 6164 er called `*Shad │ │ │ -00016c90: 6f77 732a 272e 2020 5368 6164 6f77 696e ows*'. Shadowin │ │ │ -00016ca0: 6773 2061 7265 206c 6f63 6174 6564 2062 gs are located b │ │ │ -00016cb0: 7920 6361 6c6c 696e 6720 7468 650a 286e y calling the.(n │ │ │ -00016cc0: 6f6e 2d69 6e74 6572 6163 7469 7665 2920 on-interactive) │ │ │ -00016cd0: 636f 6d70 616e 696f 6e20 6675 6e63 7469 companion functi │ │ │ -00016ce0: 6f6e 2c20 6066 696e 642d 656d 6163 732d on, `find-emacs- │ │ │ -00016cf0: 6c69 7370 2d73 6861 646f 7773 272e 1f0a lisp-shadows'... │ │ │ -00016d00: 2861 7574 6f6c 6f61 6420 276c 6973 742d (autoload 'list- │ │ │ -00016d10: 6c6f 6164 2d70 6174 682d 7368 6164 6f77 load-path-shadow │ │ │ -00016d20: 7320 2273 6861 646f 7722 2027 2823 2420 s "shadow" '(#$ │ │ │ -00016d30: 2e20 3931 3636 3329 2074 206e 696c 290a . 91663) t nil). │ │ │ -00016d40: 2862 7974 652d 636f 6465 2022 08ac 82c1 (byte-code ".... │ │ │ -00016d50: 10c2 8722 205b 736f 756e 642d 616c 6973 ..." [sound-alis │ │ │ -00016d60: 7420 2828 7265 6164 7920 6e69 6c29 2028 t ((ready nil) ( │ │ │ -00016d70: 7761 7270 206e 696c 2929 206e 696c 5d20 warp nil)) nil] │ │ │ -00016d80: 3129 0a23 4036 3435 2052 6561 6420 696e 1).#@645 Read in │ │ │ -00016d90: 2061 6e20 6175 6469 6f2d 6669 6c65 2061 an audio-file a │ │ │ -00016da0: 6e64 2061 6464 2069 7420 746f 2074 6865 nd add it to the │ │ │ -00016db0: 2073 6f75 6e64 2d61 6c69 7374 2e0a 0a46 sound-alist...F │ │ │ -00016dc0: 494c 454e 414d 4520 6361 6e20 6569 7468 ILENAME can eith │ │ │ -00016dd0: 6572 2062 6520 6162 736f 6c75 7465 206f er be absolute o │ │ │ -00016de0: 7220 7265 6c61 7469 7665 2c20 696e 2077 r relative, in w │ │ │ -00016df0: 6869 6368 2063 6173 6520 7468 6520 6669 hich case the fi │ │ │ -00016e00: 6c65 2077 696c 6c0a 6265 2073 6561 7263 le will.be searc │ │ │ -00016e10: 6865 6420 696e 2074 6865 2064 6972 6563 hed in the direc │ │ │ -00016e20: 746f 7269 6573 2067 6976 656e 2062 7920 tories given by │ │ │ -00016e30: 6064 6566 6175 6c74 2d73 6f75 6e64 2d64 `default-sound-d │ │ │ -00016e40: 6972 6563 746f 7279 2d6c 6973 7427 2e0a irectory-list'.. │ │ │ -00016e50: 5768 656e 206c 6f6f 6b69 6e67 2066 6f72 When looking for │ │ │ -00016e60: 2074 6865 2066 696c 652c 2074 6865 2065 the file, the e │ │ │ -00016e70: 7874 656e 7369 6f6e 7320 6769 7665 6e20 xtensions given │ │ │ -00016e80: 6279 2060 736f 756e 642d 6578 7465 6e73 by `sound-extens │ │ │ -00016e90: 696f 6e2d 6c69 7374 2720 6172 650a 616c ion-list' are.al │ │ │ -00016ea0: 736f 2074 7269 6564 2069 6e20 7468 6520 so tried in the │ │ │ -00016eb0: 6769 7665 6e20 6f72 6465 722e 0a0a 596f given order...Yo │ │ │ -00016ec0: 7520 6361 6e20 6f6e 6c79 2070 6c61 7920 u can only play │ │ │ -00016ed0: 736f 756e 6420 6669 6c65 7320 6966 2079 sound files if y │ │ │ -00016ee0: 6f75 2061 7265 2072 756e 6e69 6e67 206f ou are running o │ │ │ -00016ef0: 6e20 6469 7370 6c61 7920 3020 6f66 2074 n display 0 of t │ │ │ -00016f00: 6865 0a63 6f6e 736f 6c65 206f 6620 6120 he.console of a │ │ │ -00016f10: 6d61 6368 696e 6520 7769 7468 206e 6174 machine with nat │ │ │ -00016f20: 6976 6520 736f 756e 6420 7375 7070 6f72 ive sound suppor │ │ │ -00016f30: 7420 6f72 2072 756e 6e69 6e67 2061 204e t or running a N │ │ │ -00016f40: 6574 4175 6469 6f0a 7365 7276 6572 2061 etAudio.server a │ │ │ -00016f50: 6e64 2058 456d 6163 7320 6861 7320 7468 nd XEmacs has th │ │ │ -00016f60: 6520 6e65 6365 7373 6172 7920 736f 756e e necessary soun │ │ │ -00016f70: 6420 7375 7070 6f72 7420 636f 6d70 696c d support compil │ │ │ -00016f80: 6564 2069 6e2e 0a0a 5468 6520 736f 756e ed in...The soun │ │ │ -00016f90: 6420 6669 6c65 206d 7573 7420 6265 2069 d file must be i │ │ │ -00016fa0: 6e20 7468 6520 5375 6e2f 4e65 5854 2055 n the Sun/NeXT U │ │ │ -00016fb0: 2d4c 4157 2066 6f72 6d61 742c 2065 7863 -LAW format, exc │ │ │ -00016fc0: 6570 7420 6f6e 204c 696e 7578 2c0a 7768 ept on Linux,.wh │ │ │ -00016fd0: 6572 6520 2e77 6176 2066 696c 6573 2061 ere .wav files a │ │ │ -00016fe0: 7265 2061 6c73 6f20 7375 7070 6f72 7465 re also supporte │ │ │ -00016ff0: 6420 6279 2074 6865 2073 6f75 6e64 2063 d by the sound c │ │ │ -00017000: 6172 6420 6472 6976 6572 732e 1f0a 2861 ard drivers...(a │ │ │ -00017010: 7574 6f6c 6f61 6420 276c 6f61 642d 736f utoload 'load-so │ │ │ -00017020: 756e 642d 6669 6c65 2022 736f 756e 6422 und-file "sound" │ │ │ -00017030: 2027 2823 2420 2e20 3933 3537 3729 2074 '(#$ . 93577) t │ │ │ -00017040: 206e 696c 290a 2340 3235 3420 4c6f 6164 nil).#@254 Load │ │ │ -00017050: 2061 6e64 2069 6e73 7461 6c6c 2073 6f6d and install som │ │ │ -00017060: 6520 736f 756e 6420 6669 6c65 7320 6173 e sound files as │ │ │ -00017070: 2062 6565 702d 7479 7065 732c 2075 7369 beep-types, usi │ │ │ -00017080: 6e67 0a60 6c6f 6164 2d73 6f75 6e64 2d66 ng.`load-sound-f │ │ │ -00017090: 696c 6527 2e20 2054 6869 7320 6f6e 6c79 ile'. This only │ │ │ -000170a0: 2077 6f72 6b73 2069 6620 796f 7527 7265 works if you're │ │ │ -000170b0: 206f 6e20 6469 7370 6c61 7920 3020 6f66 on display 0 of │ │ │ -000170c0: 2074 6865 0a63 6f6e 736f 6c65 206f 6620 the.console of │ │ │ -000170d0: 6120 6d61 6368 696e 6520 7769 7468 206e a machine with n │ │ │ -000170e0: 6174 6976 6520 736f 756e 6420 7375 7070 ative sound supp │ │ │ -000170f0: 6f72 7420 6f72 2072 756e 6e69 6e67 2061 ort or running a │ │ │ -00017100: 204e 6574 4175 6469 6f0a 7365 7276 6572 NetAudio.server │ │ │ -00017110: 2061 6e64 2058 456d 6163 7320 6861 7320 and XEmacs has │ │ │ -00017120: 7468 6520 6e65 6365 7373 6172 7920 736f the necessary so │ │ │ -00017130: 756e 6420 7375 7070 6f72 7420 636f 6d70 und support comp │ │ │ -00017140: 696c 6564 2069 6e2e 1f0a 2861 7574 6f6c iled in...(autol │ │ │ -00017150: 6f61 6420 276c 6f61 642d 6465 6661 756c oad 'load-defaul │ │ │ -00017160: 742d 736f 756e 6473 2022 736f 756e 6422 t-sounds "sound" │ │ │ -00017170: 2027 2823 2420 2e20 3934 3238 3429 2074 '(#$ . 94284) t │ │ │ -00017180: 206e 696c 290a 2340 3338 3020 4173 6b20 nil).#@380 Ask │ │ │ -00017190: 7573 6572 2077 616e 7469 6e67 2074 6f20 user wanting to │ │ │ -000171a0: 6564 6974 2046 494c 454e 414d 452c 206c edit FILENAME, l │ │ │ -000171b0: 6f63 6b65 6420 6279 204f 5448 4552 2d55 ocked by OTHER-U │ │ │ -000171c0: 5345 522c 2077 6861 7420 746f 2064 6f2e SER, what to do. │ │ │ -000171d0: 0a54 6869 7320 6675 6e63 7469 6f6e 2068 .This function h │ │ │ -000171e0: 6173 2061 2063 686f 6963 6520 6f66 2074 as a choice of t │ │ │ -000171f0: 6872 6565 2074 6869 6e67 7320 746f 2064 hree things to d │ │ │ -00017200: 6f3a 0a20 2064 6f20 2873 6967 6e61 6c20 o:. do (signal │ │ │ -00017210: 2766 696c 652d 6c6f 636b 6564 2028 6c69 'file-locked (li │ │ │ -00017220: 7374 2046 494c 454e 414d 4520 4f54 4845 st FILENAME OTHE │ │ │ -00017230: 522d 5553 4552 2929 0a20 2020 2074 6f20 R-USER)). to │ │ │ -00017240: 7265 6672 6169 6e20 6672 6f6d 2065 6469 refrain from edi │ │ │ -00017250: 7469 6e67 2074 6865 2066 696c 650a 2020 ting the file. │ │ │ -00017260: 7265 7475 726e 2074 2028 6772 6162 2074 return t (grab t │ │ │ -00017270: 6865 206c 6f63 6b20 6f6e 2074 6865 2066 he lock on the f │ │ │ -00017280: 696c 6529 0a20 2072 6574 7572 6e20 6e69 ile). return ni │ │ │ -00017290: 6c20 2865 6469 7420 7468 6520 6669 6c65 l (edit the file │ │ │ -000172a0: 2065 7665 6e20 7468 6f75 6768 2069 7420 even though it │ │ │ -000172b0: 6973 206c 6f63 6b65 6429 2e0a 596f 7520 is locked)..You │ │ │ -000172c0: 6361 6e20 7265 7772 6974 6520 6974 2074 can rewrite it t │ │ │ -000172d0: 6f20 7573 6520 616e 7920 6372 6974 6572 o use any criter │ │ │ -000172e0: 6961 2079 6f75 206c 696b 6520 746f 2063 ia you like to c │ │ │ -000172f0: 686f 6f73 6520 7768 6963 6820 6f6e 6520 hoose which one │ │ │ -00017300: 746f 2064 6f2e 1f0a 2861 7574 6f6c 6f61 to do...(autoloa │ │ │ -00017310: 6420 2761 736b 2d75 7365 722d 6162 6f75 d 'ask-user-abou │ │ │ -00017320: 742d 6c6f 636b 2022 7573 6572 6c6f 636b t-lock "userlock │ │ │ -00017330: 2220 2728 2324 202e 2039 3436 3034 2920 " '(#$ . 94604) │ │ │ -00017340: 6e69 6c20 6e69 6c29 0a23 4034 3236 2041 nil nil).#@426 A │ │ │ -00017350: 736b 2075 7365 7220 7768 6f20 6973 2061 sk user who is a │ │ │ -00017360: 626f 7574 2074 6f20 6d6f 6469 6679 2061 bout to modify a │ │ │ -00017370: 6e20 6f62 736f 6c65 7465 2062 7566 6665 n obsolete buffe │ │ │ -00017380: 7220 7768 6174 2074 6f20 646f 2e0a 5468 r what to do..Th │ │ │ -00017390: 6973 2066 756e 6374 696f 6e20 6861 7320 is function has │ │ │ -000173a0: 7477 6f20 6368 6f69 6365 733a 2069 7420 two choices: it │ │ │ -000173b0: 6361 6e20 7265 7475 726e 2c20 696e 2077 can return, in w │ │ │ -000173c0: 6869 6368 2063 6173 6520 7468 6520 6d6f hich case the mo │ │ │ -000173d0: 6469 6669 6361 7469 6f6e 0a6f 6620 7468 dification.of th │ │ │ -000173e0: 6520 6275 6666 6572 2077 696c 6c20 7072 e buffer will pr │ │ │ -000173f0: 6f63 6565 642c 206f 7220 6974 2063 616e oceed, or it can │ │ │ -00017400: 2028 7369 676e 616c 2027 6669 6c65 2d73 (signal 'file-s │ │ │ -00017410: 7570 6572 7365 7373 696f 6e20 2846 494c upersession (FIL │ │ │ -00017420: 454e 414d 4529 292c 0a69 6e20 7768 6963 ENAME)),.in whic │ │ │ -00017430: 6820 6361 7365 2074 6865 2070 726f 706f h case the propo │ │ │ -00017440: 7365 6420 6275 6666 6572 206d 6f64 6966 sed buffer modif │ │ │ -00017450: 6963 6174 696f 6e20 7769 6c6c 206e 6f74 ication will not │ │ │ -00017460: 2062 6520 6d61 6465 2e0a 0a59 6f75 2063 be made...You c │ │ │ -00017470: 616e 2072 6577 7269 7465 2074 6869 7320 an rewrite this │ │ │ -00017480: 746f 2075 7365 2061 6e79 2063 7269 7465 to use any crite │ │ │ -00017490: 7269 6120 796f 7520 6c69 6b65 2074 6f20 ria you like to │ │ │ -000174a0: 6368 6f6f 7365 2077 6869 6368 206f 6e65 choose which one │ │ │ -000174b0: 2074 6f20 646f 2e0a 5468 6520 6275 6666 to do..The buff │ │ │ -000174c0: 6572 2069 6e20 7175 6573 7469 6f6e 2069 er in question i │ │ │ -000174d0: 7320 6375 7272 656e 7420 7768 656e 2074 s current when t │ │ │ -000174e0: 6869 7320 6675 6e63 7469 6f6e 2069 7320 his function is │ │ │ -000174f0: 6361 6c6c 6564 2e1f 0a28 6175 746f 6c6f called...(autolo │ │ │ -00017500: 6164 2027 6173 6b2d 7573 6572 2d61 626f ad 'ask-user-abo │ │ │ -00017510: 7574 2d73 7570 6572 7365 7373 696f 6e2d ut-supersession- │ │ │ -00017520: 7468 7265 6174 2022 7573 6572 6c6f 636b threat "userlock │ │ │ -00017530: 2220 2728 2324 202e 2039 3530 3535 2920 " '(#$ . 95055) │ │ │ -00017540: 6e69 6c20 6e69 6c29 0a28 6279 7465 2d63 nil nil).(byte-c │ │ │ -00017550: 6f64 6520 22c0 0942 11c3 c021 8414 01c4 ode "..B...!.... │ │ │ -00017560: c0c5 201a c65c 6ec0 5c22 88c7 5c6e 2188 .. ..\n.\"..\n!. │ │ │ -00017570: c85c 6ec9 ca23 88c8 5c6e cbcc 2388 c85c .\n..#..\n..#..\ │ │ │ -00017580: 6ecd cc23 88c8 5c6e cecf 2388 c85c 6ed0 n..#..\n..#..\n. │ │ │ -00017590: cf23 88c8 5c6e d1cf 2388 c85c 6ed2 d323 .#..\n..#..\n..# │ │ │ -000175a0: 88c8 5c6e d4d3 2388 c85c 6ed5 d323 88c8 ..\n..#..\n..#.. │ │ │ -000175b0: 5c6e d6d3 2388 c85c 6ed7 d823 88c8 5c6e \n..#..\n..#..\n │ │ │ -000175c0: d9d8 2388 c85c 6eda db23 88c8 5c6e dcdd ..#..\n..#..\n.. │ │ │ -000175d0: 2388 c85c 6ede df23 88c8 5c6e e0e1 2388 #..\n..#..\n..#. │ │ │ -000175e0: c85c 6ee2 e323 88c8 5c6e e4e5 2388 c85c .\n..#..\n..#..\ │ │ │ -000175f0: 6ee6 e323 88c8 5c6e e7e8 2388 c85c 6ee9 n..#..\n..#..\n. │ │ │ -00017600: ea23 88c8 5c6e ebec 2388 c85c 6eed ee23 .#..\n..#..\n..# │ │ │ -00017610: 88c8 5c6e eff0 2388 c85c 6ef1 f223 88c8 ..\n..#..\n..#.. │ │ │ -00017620: 5c6e f3f2 2388 c85c 6ef4 f523 88c8 5c6e \n..#..\n..#..\n │ │ │ -00017630: f6ee 2388 c85c 6ef7 f823 88c8 5c6e f9fa ..#..\n..#..\n.. │ │ │ -00017640: 2388 c85c 6efb fc23 88c8 5c6e fdfc 2388 #..\n..#..\n..#. │ │ │ -00017650: c85c 6efe ff23 88c8 5c6e 8140 0081 4100 .\n..#..\n.@..A. │ │ │ -00017660: 2388 c85c 6e81 4200 8143 0023 88c8 5c6e #..\n.B..C.#..\n │ │ │ -00017670: 8144 0081 4500 2388 c85c 6e81 4600 8147 .D..E.#..\n.F..G │ │ │ -00017680: 0023 88c8 5c6e 8148 0081 4500 2388 5c6e .#..\n.H..E.#.\n │ │ │ -00017690: 295c 2288 8149 0009 4211 c381 4900 21ac )\"..I..B...I.!. │ │ │ -000176a0: 95c4 8149 0081 4a00 0821 1ac6 5c6e 8149 ...I..J..!..\n.I │ │ │ -000176b0: 005c 2288 5c6e 295c 2288 c087 2220 5b76 .\".\n)\"..." [v │ │ │ -000176c0: 6965 772d 6d69 6e6f 722d 6d6f 6465 2d6d iew-minor-mode-m │ │ │ -000176d0: 6170 2063 7572 7265 6e74 2d6c 6f61 642d ap current-load- │ │ │ -000176e0: 6c69 7374 206d 6170 2064 6566 6175 6c74 list map default │ │ │ -000176f0: 2d62 6f75 6e64 7020 7365 742d 6465 6661 -boundp set-defa │ │ │ -00017700: 756c 7420 6d61 6b65 2d6b 6579 6d61 7020 ult make-keymap │ │ │ -00017710: 7365 742d 6b65 796d 6170 2d6e 616d 6520 set-keymap-name │ │ │ -00017720: 7375 7070 7265 7373 2d6b 6579 6d61 7020 suppress-keymap │ │ │ -00017730: 6465 6669 6e65 2d6b 6579 2022 2d22 206e define-key "-" n │ │ │ -00017740: 6567 6174 6976 652d 6172 6775 6d65 6e74 egative-argument │ │ │ -00017750: 2022 2022 2073 6372 6f6c 6c2d 7570 2022 " " scroll-up " │ │ │ -00017760: 6622 2022 6222 2073 6372 6f6c 6c2d 646f f" "b" scroll-do │ │ │ -00017770: 776e 2062 6163 6b73 7061 6365 2064 656c wn backspace del │ │ │ -00017780: 6574 6520 220d 2220 7669 6577 2d73 6372 ete "." view-scr │ │ │ -00017790: 6f6c 6c2d 6c69 6e65 732d 7570 2022 5c6e oll-lines-up "\n │ │ │ -000177a0: 2220 2265 2220 226a 2220 2279 2220 7669 " "e" "j" "y" vi │ │ │ -000177b0: 6577 2d73 6372 6f6c 6c2d 6c69 6e65 732d ew-scroll-lines- │ │ │ -000177c0: 646f 776e 2022 6b22 2022 6422 2076 6965 down "k" "d" vie │ │ │ -000177d0: 772d 7363 726f 6c6c 2d73 6f6d 652d 6c69 w-scroll-some-li │ │ │ -000177e0: 6e65 732d 7570 2022 7522 2076 6965 772d nes-up "u" view- │ │ │ -000177f0: 7363 726f 6c6c 2d73 6f6d 652d 6c69 6e65 scroll-some-line │ │ │ -00017800: 732d 646f 776e 2022 7222 2072 6563 656e s-down "r" recen │ │ │ -00017810: 7465 7220 2274 2220 746f 6767 6c65 2d74 ter "t" toggle-t │ │ │ -00017820: 7275 6e63 6174 652d 6c69 6e65 7320 224e runcate-lines "N │ │ │ -00017830: 2220 7669 6577 2d62 7566 6665 7220 2245 " view-buffer "E │ │ │ -00017840: 2220 7669 6577 2d66 696c 6520 2250 2220 " view-file "P" │ │ │ -00017850: 2221 2220 7368 656c 6c2d 636f 6d6d 616e "!" shell-comman │ │ │ -00017860: 6420 227c 2220 7368 656c 6c2d 636f 6d6d d "|" shell-comm │ │ │ -00017870: 616e 642d 6f6e 2d72 6567 696f 6e20 223d and-on-region "= │ │ │ -00017880: 2220 7768 6174 2d6c 696e 6520 223f 2220 " what-line "?" │ │ │ -00017890: 7669 6577 2d73 6561 7263 682d 6261 636b view-search-back │ │ │ -000178a0: 7761 7264 2022 6822 2076 6965 772d 6d6f ward "h" view-mo │ │ │ -000178b0: 6465 2d64 6573 6372 6962 6520 2273 2220 de-describe "s" │ │ │ -000178c0: 7669 6577 2d72 6570 6561 742d 7365 6172 view-repeat-sear │ │ │ -000178d0: 6368 2022 6e22 2022 2f22 2076 6965 772d ch "n" "/" view- │ │ │ -000178e0: 7365 6172 6368 2d66 6f72 7761 7264 2022 search-forward " │ │ │ -000178f0: 5c5c 2220 2267 2220 7669 6577 2d67 6f74 \\" "g" view-got │ │ │ -00017900: 6f2d 6c69 6e65 2022 4722 2076 6965 772d o-line "G" view- │ │ │ -00017910: 6c61 7374 2d77 696e 646f 7766 756c 2022 last-windowful " │ │ │ -00017920: 2522 2076 6965 772d 676f 746f 2d70 6572 %" view-goto-per │ │ │ -00017930: 6365 6e74 2022 7022 2022 6d22 2070 6f69 cent "p" "m" poi │ │ │ -00017940: 6e74 2d74 6f2d 7265 6769 7374 6572 2022 nt-to-register " │ │ │ -00017950: 2722 2072 6567 6973 7465 722d 746f 2d70 '" register-to-p │ │ │ -00017960: 6f69 6e74 2022 4322 2076 6965 772d 636c oint "C" view-cl │ │ │ -00017970: 6561 6e75 702d 6261 636b 7370 6163 6573 eanup-backspaces │ │ │ -00017980: 2022 0303 2220 7669 6577 2d71 7569 7420 ".." view-quit │ │ │ -00017990: 2218 1122 2076 6965 772d 7175 6974 2d74 ".." view-quit-t │ │ │ -000179a0: 6f67 676c 652d 726f 2022 7122 2076 6965 oggle-ro "q" vie │ │ │ -000179b0: 772d 6d6f 6465 2d6d 6170 2063 6f70 792d w-mode-map copy- │ │ │ -000179c0: 6b65 796d 6170 5d20 3629 0a23 4038 3420 keymap] 6).#@84 │ │ │ -000179d0: 4669 6e64 2046 494c 454e 414d 452c 2065 Find FILENAME, e │ │ │ -000179e0: 6e74 6572 2076 6965 7720 6d6f 6465 2e20 nter view mode. │ │ │ -000179f0: 2057 6974 6820 7072 6566 6978 2061 7267 With prefix arg │ │ │ -00017a00: 204f 5448 4552 2d57 494e 444f 572d 502c OTHER-WINDOW-P, │ │ │ -00017a10: 2075 7365 206f 7468 6572 2077 696e 646f use other windo │ │ │ -00017a20: 772e 1f0a 2861 7574 6f6c 6f61 6420 2776 w...(autoload 'v │ │ │ -00017a30: 6965 772d 6669 6c65 2022 7669 6577 2d6c iew-file "view-l │ │ │ -00017a40: 6573 7322 2027 2823 2420 2e20 3936 3732 ess" '(#$ . 9672 │ │ │ -00017a50: 3029 2074 206e 696c 290a 2340 3731 2053 0) t nil).#@71 S │ │ │ -00017a60: 7769 7463 6820 746f 2042 5546 4645 522c witch to BUFFER, │ │ │ -00017a70: 2065 6e74 6572 2076 6965 7720 6d6f 6465 enter view mode │ │ │ -00017a80: 2e20 2057 6974 6820 7072 6566 6978 2061 . With prefix a │ │ │ -00017a90: 7267 2075 7365 206f 7468 6572 2077 696e rg use other win │ │ │ -00017aa0: 646f 772e 1f0a 2861 7574 6f6c 6f61 6420 dow...(autoload │ │ │ -00017ab0: 2776 6965 772d 6275 6666 6572 2022 7669 'view-buffer "vi │ │ │ -00017ac0: 6577 2d6c 6573 7322 2027 2823 2420 2e20 ew-less" '(#$ . │ │ │ -00017ad0: 3936 3836 3329 2074 206e 696c 290a 2340 96863) t nil).#@ │ │ │ -00017ae0: 3533 2046 696e 6420 4649 4c45 4e41 4d45 53 Find FILENAME │ │ │ -00017af0: 2069 6e20 6f74 6865 7220 7769 6e64 6f77 in other window │ │ │ -00017b00: 2c20 616e 6420 656e 7465 7220 7669 6577 , and enter view │ │ │ -00017b10: 206d 6f64 652e 1f0a 2861 7574 6f6c 6f61 mode...(autoloa │ │ │ -00017b20: 6420 2776 6965 772d 6669 6c65 2d6f 7468 d 'view-file-oth │ │ │ -00017b30: 6572 2d77 696e 646f 7720 2276 6965 772d er-window "view- │ │ │ -00017b40: 6c65 7373 2220 2728 2324 202e 2039 3639 less" '(#$ . 969 │ │ │ -00017b50: 3935 2920 7420 6e69 6c29 0a23 4035 3820 95) t nil).#@58 │ │ │ -00017b60: 5377 6974 6368 2074 6f20 4255 4646 4552 Switch to BUFFER │ │ │ -00017b70: 2069 6e20 616e 6f74 6865 7220 7769 6e64 in another wind │ │ │ -00017b80: 6f77 2c20 616e 6420 656e 7465 7220 7669 ow, and enter vi │ │ │ -00017b90: 6577 206d 6f64 652e 1f0a 2861 7574 6f6c ew mode...(autol │ │ │ -00017ba0: 6f61 6420 2776 6965 772d 6275 6666 6572 oad 'view-buffer │ │ │ -00017bb0: 2d6f 7468 6572 2d77 696e 646f 7720 2276 -other-window "v │ │ │ -00017bc0: 6965 772d 6c65 7373 2220 2728 2324 202e iew-less" '(#$ . │ │ │ -00017bd0: 2039 3731 3230 2920 7420 6e69 6c29 0a23 97120) t nil).# │ │ │ -00017be0: 4031 3336 3720 4d69 6e6f 7220 6d6f 6465 @1367 Minor mode │ │ │ -00017bf0: 2066 6f72 2076 6965 7769 6e67 2074 6578 for viewing tex │ │ │ -00017c00: 742c 2077 6974 6820 6269 6e64 696e 6773 t, with bindings │ │ │ -00017c10: 206c 696b 6520 606c 6573 7327 2e0a 436f like `less'..Co │ │ │ -00017c20: 6d6d 616e 6473 2061 7265 3a0a 5c3c 7669 mmands are:.\.0..9.prefix a │ │ │ -00017c50: 7267 730a 2d09 7072 6566 6978 206d 696e rgs.-.prefix min │ │ │ -00017c60: 7573 0a5c 5b73 6372 6f6c 6c2d 7570 5d09 us.\[scroll-up]. │ │ │ -00017c70: 7061 6765 2066 6f72 7761 7264 0a5c 5b73 page forward.\[s │ │ │ -00017c80: 6372 6f6c 6c2d 646f 776e 5d09 7061 6765 croll-down].page │ │ │ -00017c90: 2062 6163 6b0a 5c5b 7669 6577 2d73 6372 back.\[view-scr │ │ │ -00017ca0: 6f6c 6c2d 6c69 6e65 732d 7570 5d09 7363 oll-lines-up].sc │ │ │ -00017cb0: 726f 6c6c 2070 7265 6669 782d 6172 6720 roll prefix-arg │ │ │ -00017cc0: 6c69 6e65 7320 666f 7277 6172 642c 2064 lines forward, d │ │ │ -00017cd0: 6566 6175 6c74 2031 2e0a 5c5b 7669 6577 efault 1..\[view │ │ │ -00017ce0: 2d73 6372 6f6c 6c2d 6c69 6e65 732d 646f -scroll-lines-do │ │ │ -00017cf0: 776e 5d09 7363 726f 6c6c 2070 7265 6669 wn].scroll prefi │ │ │ -00017d00: 782d 6172 6720 6c69 6e65 7320 6261 636b x-arg lines back │ │ │ -00017d10: 7761 7264 2c20 6465 6661 756c 7420 312e ward, default 1. │ │ │ -00017d20: 0a5c 5b76 6965 772d 7363 726f 6c6c 2d73 .\[view-scroll-s │ │ │ -00017d30: 6f6d 652d 6c69 6e65 732d 646f 776e 5d09 ome-lines-down]. │ │ │ -00017d40: 7363 726f 6c6c 2070 7265 6669 782d 6172 scroll prefix-ar │ │ │ -00017d50: 6720 6c69 6e65 7320 6261 636b 7761 7264 g lines backward │ │ │ -00017d60: 2c20 6465 6661 756c 7420 3130 2e0a 5c5b , default 10..\[ │ │ │ -00017d70: 7669 6577 2d73 6372 6f6c 6c2d 736f 6d65 view-scroll-some │ │ │ -00017d80: 2d6c 696e 6573 2d75 705d 0973 6372 6f6c -lines-up].scrol │ │ │ -00017d90: 6c20 7072 6566 6978 2d61 7267 206c 696e l prefix-arg lin │ │ │ -00017da0: 6573 2066 6f72 7761 7264 2c20 6465 6661 es forward, defa │ │ │ -00017db0: 756c 7420 3130 2e0a 5c5b 7768 6174 2d6c ult 10..\[what-l │ │ │ -00017dc0: 696e 655d 0970 7269 6e74 206c 696e 6520 ine].print line │ │ │ -00017dd0: 6e75 6d62 6572 0a5c 5b76 6965 772d 6d6f number.\[view-mo │ │ │ -00017de0: 6465 2d64 6573 6372 6962 655d 0970 7269 de-describe].pri │ │ │ -00017df0: 6e74 2074 6869 7320 6865 6c70 206d 6573 nt this help mes │ │ │ -00017e00: 7361 6765 0a5c 5b76 6965 772d 7365 6172 sage.\[view-sear │ │ │ -00017e10: 6368 2d66 6f72 7761 7264 5d09 7265 6765 ch-forward].rege │ │ │ -00017e20: 7870 2073 6561 7263 682c 2075 7365 7320 xp search, uses │ │ │ -00017e30: 7072 6576 696f 7573 2073 7472 696e 6720 previous string │ │ │ -00017e40: 6966 2079 6f75 206a 7573 7420 6869 7420 if you just hit │ │ │ -00017e50: 5245 540a 5c5b 7669 6577 2d73 6561 7263 RET.\[view-searc │ │ │ -00017e60: 682d 6261 636b 7761 7264 5d09 6173 2061 h-backward].as a │ │ │ -00017e70: 626f 7665 2062 7574 2073 6561 7263 6865 bove but searche │ │ │ -00017e80: 7320 6261 636b 7761 7264 0a5c 5b76 6965 s backward.\[vie │ │ │ -00017e90: 772d 7265 7065 6174 2d73 6561 7263 685d w-repeat-search] │ │ │ -00017ea0: 0972 6570 6561 7420 6c61 7374 2073 6561 .repeat last sea │ │ │ -00017eb0: 7263 680a 5c5b 7669 6577 2d67 6f74 6f2d rch.\[view-goto- │ │ │ -00017ec0: 6c69 6e65 5d09 676f 746f 206c 696e 6520 line].goto line │ │ │ -00017ed0: 7072 6566 6978 2d61 7267 2c20 6465 6661 prefix-arg, defa │ │ │ -00017ee0: 756c 7420 310a 5c5b 7669 6577 2d6c 6173 ult 1.\[view-las │ │ │ -00017ef0: 742d 7769 6e64 6f77 6675 6c5d 0967 6f74 t-windowful].got │ │ │ -00017f00: 6f20 6c69 6e65 2070 7265 6669 782d 6172 o line prefix-ar │ │ │ -00017f10: 672c 2064 6566 6175 6c74 206c 6173 7420 g, default last │ │ │ -00017f20: 6c69 6e65 0a5c 5b76 6965 772d 676f 746f line.\[view-goto │ │ │ -00017f30: 2d70 6572 6365 6e74 5d09 676f 746f 2061 -percent].goto a │ │ │ -00017f40: 2070 6f73 6974 696f 6e20 6279 2070 6572 position by per │ │ │ -00017f50: 6365 6e74 6167 650a 5c5b 746f 6767 6c65 centage.\[toggle │ │ │ -00017f60: 2d74 7275 6e63 6174 652d 6c69 6e65 735d -truncate-lines] │ │ │ -00017f70: 0974 6f67 676c 6520 7472 756e 6361 7465 .toggle truncate │ │ │ -00017f80: 2d6c 696e 6573 0a5c 5b76 6965 772d 6669 -lines.\[view-fi │ │ │ -00017f90: 6c65 5d09 7669 6577 2061 6e6f 7468 6572 le].view another │ │ │ -00017fa0: 2066 696c 650a 5c5b 7669 6577 2d62 7566 file.\[view-buf │ │ │ -00017fb0: 6665 725d 0976 6965 7720 616e 6f74 6865 fer].view anothe │ │ │ -00017fc0: 7220 6275 6666 6572 0a5c 5b76 6965 772d r buffer.\[view- │ │ │ -00017fd0: 636c 6561 6e75 702d 6261 636b 7370 6163 cleanup-backspac │ │ │ -00017fe0: 6573 5d09 636c 6561 6e75 7020 6261 636b es].cleanup back │ │ │ -00017ff0: 7370 6163 6520 636f 6e73 7472 7563 7469 space constructi │ │ │ -00018000: 6f6e 730a 5c5b 7368 656c 6c2d 636f 6d6d ons.\[shell-comm │ │ │ -00018010: 616e 645d 0965 7865 6375 7465 2061 2073 and].execute a s │ │ │ -00018020: 6865 6c6c 2063 6f6d 6d61 6e64 0a5c 5b73 hell command.\[s │ │ │ -00018030: 6865 6c6c 2d63 6f6d 6d61 6e64 2d6f 6e2d hell-command-on- │ │ │ -00018040: 7265 6769 6f6e 5d09 6578 6563 7574 6520 region].execute │ │ │ -00018050: 6120 7368 656c 6c20 636f 6d6d 616e 6420 a shell command │ │ │ -00018060: 7769 7468 2074 6865 2072 6567 696f 6e20 with the region │ │ │ -00018070: 6173 2069 6e70 7574 0a5c 5b76 6965 772d as input.\[view- │ │ │ -00018080: 7175 6974 5d09 6578 6974 2076 6965 772d quit].exit view- │ │ │ -00018090: 6d6f 6465 2c20 616e 6420 6275 7279 2074 mode, and bury t │ │ │ -000180a0: 6865 2063 7572 7265 6e74 2062 7566 6665 he current buffe │ │ │ -000180b0: 722e 0a0a 4966 2069 6e76 6f6b 6564 2077 r...If invoked w │ │ │ -000180c0: 6974 6820 7468 6520 6f70 7469 6f6e 616c ith the optional │ │ │ -000180d0: 2028 7072 6566 6978 2920 6172 6720 6e6f (prefix) arg no │ │ │ -000180e0: 6e2d 6e69 6c2c 2076 6965 772d 6d6f 6465 n-nil, view-mode │ │ │ -000180f0: 2063 6c65 616e 7320 7570 0a62 6163 6b73 cleans up.backs │ │ │ -00018100: 7061 6365 2063 6f6e 7374 7275 6374 696f pace constructio │ │ │ -00018110: 6e73 2e0a 0a4d 6f72 6520 7072 6563 6973 ns...More precis │ │ │ -00018120: 656c 793a 0a5c 7b76 6965 772d 6d69 6e6f ely:.\{view-mino │ │ │ -00018130: 722d 6d6f 6465 2d6d 6170 7d1f 0a28 6175 r-mode-map}..(au │ │ │ -00018140: 746f 6c6f 6164 2027 7669 6577 2d6d 696e toload 'view-min │ │ │ -00018150: 6f72 2d6d 6f64 6520 2276 6965 772d 6c65 or-mode "view-le │ │ │ -00018160: 7373 2220 2728 2324 202e 2039 3732 3534 ss" '(#$ . 97254 │ │ │ -00018170: 2920 7420 6e69 6c29 0a23 4031 3731 2056 ) t nil).#@171 V │ │ │ -00018180: 6965 7720 7468 6520 6375 7272 656e 7420 iew the current │ │ │ -00018190: 6275 6666 6572 2075 7369 6e67 2076 6965 buffer using vie │ │ │ -000181a0: 772d 6d69 6e6f 722d 6d6f 6465 2e20 2054 w-minor-mode. T │ │ │ -000181b0: 6869 7320 6578 6973 7473 2074 6f20 6265 his exists to be │ │ │ -000181c0: 2039 392e 3925 0a63 6f6d 7061 7469 626c 99.9%.compatibl │ │ │ -000181d0: 6520 7769 7468 2074 6865 2069 6d70 6c65 e with the imple │ │ │ -000181e0: 6d65 6e74 6174 696f 6e73 206f 6620 6076 mentations of `v │ │ │ -000181f0: 6965 772d 6d6f 6465 2720 696e 2076 6965 iew-mode' in vie │ │ │ -00018200: 772e 656c 2061 6e64 206f 6c64 6572 0a76 w.el and older.v │ │ │ -00018210: 6572 7369 6f6e 7320 6f66 2076 6965 772d ersions of view- │ │ │ -00018220: 6c65 7373 2e65 6c2e 1f0a 2861 7574 6f6c less.el...(autol │ │ │ -00018230: 6f61 6420 2776 6965 772d 6d6f 6465 2022 oad 'view-mode " │ │ │ -00018240: 7669 6577 2d6c 6573 7322 2027 2823 2420 view-less" '(#$ │ │ │ -00018250: 2e20 3938 3638 3729 2074 206e 696c 290a . 98687) t nil). │ │ │ -00018260: 2340 3137 3720 5669 6577 2074 6865 2063 #@177 View the c │ │ │ -00018270: 7572 7265 6e74 2062 7566 6665 7220 7573 urrent buffer us │ │ │ -00018280: 696e 6720 7669 6577 2d6d 6f64 652c 2061 ing view-mode, a │ │ │ -00018290: 7320 6120 6d61 6a6f 7220 6d6f 6465 2e0a s a major mode.. │ │ │ -000182a0: 5468 6973 2066 756e 6374 696f 6e20 6861 This function ha │ │ │ -000182b0: 7320 6120 6e6f 6e73 7461 6e64 6172 6420 s a nonstandard │ │ │ -000182c0: 6e61 6d65 2062 6563 6175 7365 2060 7669 name because `vi │ │ │ -000182d0: 6577 2d6d 6f64 6527 2069 7320 7772 6f6e ew-mode' is wron │ │ │ -000182e0: 676c 790a 6e61 6d65 6420 6275 7420 6973 gly.named but is │ │ │ -000182f0: 206c 696b 6520 7468 6973 2066 6f72 2063 like this for c │ │ │ -00018300: 6f6d 7061 7469 6269 6c69 7479 2072 6561 ompatibility rea │ │ │ -00018310: 736f 6e73 2e1f 0a28 6175 746f 6c6f 6164 sons...(autoload │ │ │ -00018320: 2027 7669 6577 2d6d 616a 6f72 2d6d 6f64 'view-major-mod │ │ │ -00018330: 6520 2276 6965 772d 6c65 7373 2220 2728 e "view-less" '( │ │ │ -00018340: 2324 202e 2039 3839 3138 2920 7420 6e69 #$ . 98918) t ni │ │ │ -00018350: 6c29 0a23 4031 3136 2049 6620 7468 6520 l).#@116 If the │ │ │ -00018360: 6669 6c65 206f 6620 7468 6520 6375 7272 file of the curr │ │ │ -00018370: 656e 7420 6275 6666 6572 2069 7320 6e6f ent buffer is no │ │ │ -00018380: 7420 7772 6974 6162 6c65 2c20 6361 6c6c t writable, call │ │ │ -00018390: 2076 6965 772d 6d6f 6465 2e0a 5468 6973 view-mode..This │ │ │ -000183a0: 2069 7320 6d65 616e 7420 746f 2062 6520 is meant to be │ │ │ -000183b0: 6164 6465 6420 746f 2060 6669 6e64 2d66 added to `find-f │ │ │ -000183c0: 696c 652d 686f 6f6b 7327 2e1f 0a28 6175 ile-hooks'...(au │ │ │ -000183d0: 746f 6c6f 6164 2027 6175 746f 2d76 6965 toload 'auto-vie │ │ │ -000183e0: 772d 6d6f 6465 2022 7669 6577 2d6c 6573 w-mode "view-les │ │ │ -000183f0: 7322 2027 2823 2420 2e20 3939 3136 3129 s" '(#$ . 99161) │ │ │ -00018400: 206e 696c 206e 696c 290a 2340 3834 2054 nil nil).#@84 T │ │ │ -00018410: 6f67 676c 6573 2074 6865 2076 616c 7565 oggles the value │ │ │ -00018420: 7320 6f66 2074 7275 6e63 6174 652d 6c69 s of truncate-li │ │ │ -00018430: 6e65 732e 0a50 6f73 6974 6976 6520 7072 nes..Positive pr │ │ │ -00018440: 6566 6978 2061 7267 2073 6574 732c 206e efix arg sets, n │ │ │ -00018450: 6567 6174 6976 6520 6469 7361 626c 6573 egative disables │ │ │ -00018460: 2e1f 0a28 6175 746f 6c6f 6164 2027 746f ...(autoload 'to │ │ │ -00018470: 6767 6c65 2d74 7275 6e63 6174 652d 6c69 ggle-truncate-li │ │ │ -00018480: 6e65 7320 2276 6965 772d 6c65 7373 2220 nes "view-less" │ │ │ -00018490: 2728 2324 202e 2039 3933 3433 2920 7420 '(#$ . 99343) t │ │ │ -000184a0: 6e69 6c29 0a23 4033 3220 4272 6f77 7365 nil).#@32 Browse │ │ │ -000184b0: 2074 6865 2077 6964 6765 7420 756e 6465 the widget unde │ │ │ -000184c0: 7220 706f 696e 742e 1f0a 2861 7574 6f6c r point...(autol │ │ │ -000184d0: 6f61 6420 2777 6964 6765 742d 6272 6f77 oad 'widget-brow │ │ │ -000184e0: 7365 2d61 7420 2277 6964 2d62 726f 7773 se-at "wid-brows │ │ │ -000184f0: 6522 2027 2823 2420 2e20 3939 3439 3829 e" '(#$ . 99498) │ │ │ -00018500: 2074 206e 696c 290a 2340 3337 2043 7265 t nil).#@37 Cre │ │ │ -00018510: 6174 6520 6120 7769 6467 6574 2062 726f ate a widget bro │ │ │ -00018520: 7773 6572 2066 6f72 2057 4944 4745 542e wser for WIDGET. │ │ │ -00018530: 1f0a 2861 7574 6f6c 6f61 6420 2777 6964 ..(autoload 'wid │ │ │ -00018540: 6765 742d 6272 6f77 7365 2022 7769 642d get-browse "wid- │ │ │ -00018550: 6272 6f77 7365 2220 2728 2324 202e 2039 browse" '(#$ . 9 │ │ │ -00018560: 3935 3937 2920 7420 6e69 6c29 0a23 4034 9597) t nil).#@4 │ │ │ -00018570: 3920 5368 6f77 2077 6964 6765 7420 6272 9 Show widget br │ │ │ -00018580: 6f77 7365 7220 666f 7220 5749 4447 4554 owser for WIDGET │ │ │ -00018590: 2069 6e20 6f74 6865 7220 7769 6e64 6f77 in other window │ │ │ -000185a0: 2e1f 0a28 6175 746f 6c6f 6164 2027 7769 ...(autoload 'wi │ │ │ -000185b0: 6467 6574 2d62 726f 7773 652d 6f74 6865 dget-browse-othe │ │ │ -000185c0: 722d 7769 6e64 6f77 2022 7769 642d 6272 r-window "wid-br │ │ │ -000185d0: 6f77 7365 2220 2728 2324 202e 2039 3936 owse" '(#$ . 996 │ │ │ -000185e0: 3938 2920 7420 6e69 6c29 0a23 4031 3034 98) t nil).#@104 │ │ │ -000185f0: 2054 6f67 6c65 206d 696e 6f72 206d 6f64 Togle minor mod │ │ │ -00018600: 6520 666f 7220 7472 6176 6572 7369 6e67 e for traversing │ │ │ -00018610: 2077 6964 6765 7473 2e0a 5769 7468 2061 widgets..With a │ │ │ -00018620: 7267 2c20 7475 726e 2077 6964 6765 7420 rg, turn widget │ │ │ -00018630: 6d6f 6465 206f 6e20 6966 2061 6e64 206f mode on if and o │ │ │ -00018640: 6e6c 7920 6966 2061 7267 2069 7320 706f nly if arg is po │ │ │ -00018650: 7369 7469 7665 2e1f 0a28 6175 746f 6c6f sitive...(autolo │ │ │ -00018660: 6164 2027 7769 6467 6574 2d6d 696e 6f72 ad 'widget-minor │ │ │ -00018670: 2d6d 6f64 6520 2277 6964 2d62 726f 7773 -mode "wid-brows │ │ │ -00018680: 6522 2027 2823 2420 2e20 3939 3832 3529 e" '(#$ . 99825) │ │ │ -00018690: 2074 206e 696c 290a 2340 3132 3020 5072 t nil).#@120 Pr │ │ │ -000186a0: 6f6d 7074 2066 6f72 2061 2076 616c 7565 ompt for a value │ │ │ -000186b0: 206d 6174 6368 696e 6720 5749 4447 4554 matching WIDGET │ │ │ -000186c0: 2c20 7573 696e 6720 5052 4f4d 5054 2e0a , using PROMPT.. │ │ │ -000186d0: 5468 6520 6375 7272 656e 7420 7661 6c75 The current valu │ │ │ -000186e0: 6520 6973 2061 7373 756d 6564 2074 6f20 e is assumed to │ │ │ -000186f0: 6265 2056 414c 5545 2c20 756e 6c65 7373 be VALUE, unless │ │ │ -00018700: 2055 4e42 4f55 4e44 2069 7320 6e6f 6e2d UNBOUND is non- │ │ │ -00018710: 6e69 6c2e 1f0a 2861 7574 6f6c 6f61 6420 nil...(autoload │ │ │ -00018720: 2777 6964 6765 742d 7072 6f6d 7074 2d76 'widget-prompt-v │ │ │ -00018730: 616c 7565 2022 7769 642d 6564 6974 2220 alue "wid-edit" │ │ │ -00018740: 2728 2324 202e 2039 3939 3938 2920 6e69 '(#$ . 99998) ni │ │ │ -00018750: 6c20 6e69 6c29 0a23 4037 3620 4372 6561 l nil).#@76 Crea │ │ │ -00018760: 7465 2077 6964 6765 7420 6f66 2054 5950 te widget of TYP │ │ │ -00018770: 452e 0a54 6865 206f 7074 696f 6e61 6c20 E..The optional │ │ │ -00018780: 4152 4753 2061 7265 2061 6464 6974 696f ARGS are additio │ │ │ -00018790: 6e61 6c20 6b65 7977 6f72 6420 6172 6775 nal keyword argu │ │ │ -000187a0: 6d65 6e74 732e 1f0a 2861 7574 6f6c 6f61 ments...(autoloa │ │ │ -000187b0: 6420 2777 6964 6765 742d 6372 6561 7465 d 'widget-create │ │ │ -000187c0: 2022 7769 642d 6564 6974 2220 2728 2324 "wid-edit" '(#$ │ │ │ -000187d0: 202e 2031 3030 3138 3829 206e 696c 206e . 100188) nil n │ │ │ -000187e0: 696c 290a 2340 3136 2044 656c 6574 6520 il).#@16 Delete │ │ │ -000187f0: 5749 4447 4554 2e1f 0a28 6175 746f 6c6f WIDGET...(autolo │ │ │ -00018800: 6164 2027 7769 6467 6574 2d64 656c 6574 ad 'widget-delet │ │ │ -00018810: 6520 2277 6964 2d65 6469 7422 2027 2823 e "wid-edit" '(# │ │ │ -00018820: 2420 2e20 3130 3033 3239 2920 6e69 6c20 $ . 100329) nil │ │ │ -00018830: 6e69 6c29 0a23 4034 3533 2047 656e 6572 nil).#@453 Gener │ │ │ -00018840: 6174 6573 2074 6865 2060 466f 6e74 272c ates the `Font', │ │ │ -00018850: 2060 5369 7a65 272c 2061 6e64 2060 5765 `Size', and `We │ │ │ -00018860: 6967 6874 2720 7375 626d 656e 7573 2066 ight' submenus f │ │ │ -00018870: 6f72 2074 6865 204f 7074 696f 6e73 206d or the Options m │ │ │ -00018880: 656e 752e 0a54 6869 7320 6973 2072 756e enu..This is run │ │ │ -00018890: 2074 6865 2066 6972 7374 2074 696d 6520 the first time │ │ │ -000188a0: 7468 6174 2061 2066 6f6e 742d 6d65 6e75 that a font-menu │ │ │ -000188b0: 2069 7320 6e65 6564 6564 2066 6f72 2065 is needed for e │ │ │ -000188c0: 6163 6820 6465 7669 6365 2e0a 4966 2079 ach device..If y │ │ │ -000188d0: 6f75 2064 6f6e 2774 206c 696b 6520 7468 ou don't like th │ │ │ -000188e0: 6520 6c61 7a79 2069 6e76 6f63 6174 696f e lazy invocatio │ │ │ -000188f0: 6e20 6f66 2074 6869 7320 6675 6e63 7469 n of this functi │ │ │ -00018900: 6f6e 2c20 796f 7520 6361 6e20 6164 6420 on, you can add │ │ │ -00018910: 6974 2074 6f0a 6063 7265 6174 652d 6465 it to.`create-de │ │ │ -00018920: 7669 6365 2d68 6f6f 6b27 2061 6e64 2074 vice-hook' and t │ │ │ -00018930: 6861 7420 7769 6c6c 206d 616b 6520 7468 hat will make th │ │ │ -00018940: 6520 666f 6e74 206d 656e 7573 2072 6573 e font menus res │ │ │ -00018950: 706f 6e64 206d 6f72 6520 7175 6963 6b6c pond more quickl │ │ │ -00018960: 790a 7768 656e 2074 6865 7920 6172 6520 y.when they are │ │ │ -00018970: 7365 6c65 6374 6564 2066 6f72 2074 6865 selected for the │ │ │ -00018980: 2066 6972 7374 2074 696d 652e 2020 4966 first time. If │ │ │ -00018990: 2079 6f75 2061 6464 2066 6f6e 7473 2074 you add fonts t │ │ │ -000189a0: 6f20 796f 7572 2073 7973 7465 6d2c 200a o your system, . │ │ │ -000189b0: 6f72 2069 6620 796f 7520 6368 616e 6765 or if you change │ │ │ -000189c0: 2079 6f75 7220 666f 6e74 2070 6174 682c your font path, │ │ │ -000189d0: 2079 6f75 2063 616e 2063 616c 6c20 7468 you can call th │ │ │ -000189e0: 6973 2074 6f20 7265 2d69 6e69 7469 616c is to re-initial │ │ │ -000189f0: 697a 6520 7468 6520 6d65 6e75 732e 1f0a ize the menus... │ │ │ -00018a00: 2861 7574 6f6c 6f61 6420 2778 2d72 6573 (autoload 'x-res │ │ │ -00018a10: 6574 2d64 6576 6963 652d 666f 6e74 2d6d et-device-font-m │ │ │ -00018a20: 656e 7573 2022 782d 666f 6e74 2d6d 656e enus "x-font-men │ │ │ -00018a30: 7522 2027 2823 2420 2e20 3130 3034 3131 u" '(#$ . 100411 │ │ │ -00018a40: 2920 6e69 6c20 6e69 6c29 0a28 6279 7465 ) nil nil).(byte │ │ │ -00018a50: 2d63 6f64 6520 22c0 c1c2 c389 8925 88c0 -code "......%.. │ │ │ -00018a60: c4c5 c389 8925 88c0 c6c7 c389 8925 88c8 .....%.......%.. │ │ │ -00018a70: c921 8722 205b 6175 746f 6c6f 6164 2078 .!." [autoload x │ │ │ -00018a80: 2d66 6f6e 742d 6d65 6e75 2d66 6f6e 742d -font-menu-font- │ │ │ -00018a90: 6461 7461 2022 782d 666f 6e74 2d6d 656e data "x-font-men │ │ │ -00018aa0: 7522 206e 696c 2078 2d77 696e 2d69 6e69 u" nil x-win-ini │ │ │ -00018ab0: 742d 7375 6e20 2278 2d77 696e 2d73 756e t-sun "x-win-sun │ │ │ -00018ac0: 2220 782d 7769 6e2d 696e 6974 2d78 6672 " x-win-init-xfr │ │ │ -00018ad0: 6565 3836 2022 782d 7769 6e2d 7866 7265 ee86 "x-win-xfre │ │ │ -00018ae0: 6538 3622 2070 726f 7669 6465 206c 6973 e86" provide lis │ │ │ -00018af0: 702d 6175 746f 6c6f 6164 735d 2036 290a p-autoloads] 6). │ │ │ +0000cbd0: 2020 2020 2020 2020 2020 2020 504f 5354 POST │ │ │ +0000cbe0: 2d4d 4154 4348 2d46 4f52 4d0a 0a20 2044 -MATCH-FORM.. D │ │ │ +0000cbf0: 6973 6372 6574 6520 6f63 6375 7272 656e iscrete occurren │ │ │ +0000cc00: 6365 7320 6f66 2022 616e 6368 6f72 2220 ces of "anchor" │ │ │ +0000cc10: 696e 2074 6865 2076 616c 7565 206f 6620 in the value of │ │ │ +0000cc20: 6061 6e63 686f 722d 6661 6365 272c 2061 `anchor-face', a │ │ │ +0000cc30: 6e64 0a20 2073 7562 7365 7175 656e 7420 nd. subsequent │ │ │ +0000cc40: 6469 7363 7265 7465 206f 6363 7572 7265 discrete occurre │ │ │ +0000cc50: 6e63 6573 206f 6620 2269 7465 6d22 2028 nces of "item" ( │ │ │ +0000cc60: 6f6e 2074 6865 2073 616d 6520 6c69 6e65 on the same line │ │ │ +0000cc70: 2920 696e 2074 6865 2076 616c 7565 0a20 ) in the value. │ │ │ +0000cc80: 206f 6620 6069 7465 6d2d 6661 6365 272e of `item-face'. │ │ │ +0000cc90: 2020 2848 6572 6520 5052 452d 4d41 5443 (Here PRE-MATC │ │ │ +0000cca0: 482d 464f 524d 2061 6e64 2050 4f53 542d H-FORM and POST- │ │ │ +0000ccb0: 4d41 5443 482d 464f 524d 2061 7265 206e MATCH-FORM are n │ │ │ +0000ccc0: 696c 2e0a 2020 5468 6572 6566 6f72 6520 il.. Therefore │ │ │ +0000ccd0: 2269 7465 6d22 2069 7320 696e 6974 6961 "item" is initia │ │ │ +0000cce0: 6c6c 7920 7365 6172 6368 6564 2066 6f72 lly searched for │ │ │ +0000ccf0: 2073 7461 7274 696e 6720 6672 6f6d 2074 starting from t │ │ │ +0000cd00: 6865 2065 6e64 206f 6620 7468 650a 2020 he end of the. │ │ │ +0000cd10: 6d61 7463 6820 6f66 2022 616e 6368 6f72 match of "anchor │ │ │ +0000cd20: 222c 2061 6e64 2073 6561 7263 6869 6e67 ", and searching │ │ │ +0000cd30: 2066 6f72 2073 7562 7365 7175 656e 7420 for subsequent │ │ │ +0000cd40: 696e 7374 616e 6365 206f 6620 2261 6e63 instance of "anc │ │ │ +0000cd50: 686f 7222 0a20 2072 6573 756d 6573 2066 hor". resumes f │ │ │ +0000cd60: 726f 6d20 7768 6572 6520 7365 6172 6368 rom where search │ │ │ +0000cd70: 696e 6720 666f 7220 2269 7465 6d22 2063 ing for "item" c │ │ │ +0000cd80: 6f6e 636c 7564 6564 2e29 0a0a 466f 7220 oncluded.)..For │ │ │ +0000cd90: 6869 6768 6c69 6768 7469 6e67 2073 696e highlighting sin │ │ │ +0000cda0: 676c 6520 6974 656d 732c 2074 7970 6963 gle items, typic │ │ │ +0000cdb0: 616c 6c79 206f 6e6c 7920 4d41 5443 482d ally only MATCH- │ │ │ +0000cdc0: 4849 4748 4c49 4748 5420 6973 2072 6571 HIGHLIGHT is req │ │ │ +0000cdd0: 7569 7265 642e 0a48 6f77 6576 6572 2c20 uired..However, │ │ │ +0000cde0: 6966 2061 6e20 6974 656d 206f 7220 2874 if an item or (t │ │ │ +0000cdf0: 7970 6963 616c 6c79 2920 7365 7665 7261 ypically) severa │ │ │ +0000ce00: 6c20 6974 656d 7320 6172 6520 746f 2062 l items are to b │ │ │ +0000ce10: 6520 6869 6768 6c69 6768 7465 640a 666f e highlighted.fo │ │ │ +0000ce20: 6c6c 6f77 696e 6720 7468 6520 696e 7374 llowing the inst │ │ │ +0000ce30: 616e 6365 206f 6620 616e 6f74 6865 7220 ance of another │ │ │ +0000ce40: 6974 656d 2028 7468 6520 616e 6368 6f72 item (the anchor │ │ │ +0000ce50: 2920 7468 656e 204d 4154 4348 2d41 4e43 ) then MATCH-ANC │ │ │ +0000ce60: 484f 5245 4420 6d61 7920 6265 0a72 6571 HORED may be.req │ │ │ +0000ce70: 7569 7265 642e 0a0a 5468 6573 6520 7265 uired...These re │ │ │ +0000ce80: 6775 6c61 7220 6578 7072 6573 7369 6f6e gular expression │ │ │ +0000ce90: 7320 7368 6f75 6c64 206e 6f74 206d 6174 s should not mat │ │ │ +0000cea0: 6368 2074 6578 7420 7768 6963 6820 7370 ch text which sp │ │ │ +0000ceb0: 616e 7320 6c69 6e65 732e 2020 5768 696c ans lines. Whil │ │ │ +0000cec0: 650a 5c5b 666f 6e74 2d6c 6f63 6b2d 666f e.\[font-lock-fo │ │ │ +0000ced0: 6e74 6966 792d 6275 6666 6572 5d20 6861 ntify-buffer] ha │ │ │ +0000cee0: 6e64 6c65 7320 6d75 6c74 692d 6c69 6e65 ndles multi-line │ │ │ +0000cef0: 2070 6174 7465 726e 7320 636f 7272 6563 patterns correc │ │ │ +0000cf00: 746c 792c 2075 7064 6174 696e 6720 7768 tly, updating wh │ │ │ +0000cf10: 656e 2079 6f75 0a65 6469 7420 7468 6520 en you.edit the │ │ │ +0000cf20: 6275 6666 6572 2064 6f65 7320 6e6f 742c buffer does not, │ │ │ +0000cf30: 2073 696e 6365 2069 7420 636f 6e73 6964 since it consid │ │ │ +0000cf40: 6572 7320 7465 7874 206f 6e65 206c 696e ers text one lin │ │ │ +0000cf50: 6520 6174 2061 2074 696d 652e 0a0a 4265 e at a time...Be │ │ │ +0000cf60: 2076 6572 7920 6361 7265 6675 6c20 636f very careful co │ │ │ +0000cf70: 6d70 6f73 696e 6720 7265 6765 7870 7320 mposing regexps │ │ │ +0000cf80: 666f 7220 7468 6973 206c 6973 743b 2074 for this list; t │ │ │ +0000cf90: 6865 2077 726f 6e67 2070 6174 7465 726e he wrong pattern │ │ │ +0000cfa0: 2063 616e 0a64 7261 6d61 7469 6361 6c6c can.dramaticall │ │ │ +0000cfb0: 7920 736c 6f77 2074 6869 6e67 7320 646f y slow things do │ │ │ +0000cfc0: 776e 210a 1f0a 2864 6566 7661 7220 666f wn!...(defvar fo │ │ │ +0000cfd0: 6e74 2d6c 6f63 6b2d 6b65 7977 6f72 6473 nt-lock-keywords │ │ │ +0000cfe0: 206e 696c 2028 2324 202e 2034 3732 3538 nil (#$ . 47258 │ │ │ +0000cff0: 2929 0a28 6d61 6b65 2d76 6172 6961 626c )).(make-variabl │ │ │ +0000d000: 652d 6275 6666 6572 2d6c 6f63 616c 2027 e-buffer-local ' │ │ │ +0000d010: 666f 6e74 2d6c 6f63 6b2d 6b65 7977 6f72 font-lock-keywor │ │ │ +0000d020: 6473 290a 2340 3134 3735 2041 206c 6973 ds).#@1475 A lis │ │ │ +0000d030: 7420 6f66 2074 6865 2073 796e 7461 6374 t of the syntact │ │ │ +0000d040: 6963 206b 6579 776f 7264 7320 746f 2068 ic keywords to h │ │ │ +0000d050: 6967 686c 6967 6874 2e0a 4361 6e20 6265 ighlight..Can be │ │ │ +0000d060: 2074 6865 206c 6973 7420 6f72 2074 6865 the list or the │ │ │ +0000d070: 206e 616d 6520 6f66 2061 2066 756e 6374 name of a funct │ │ │ +0000d080: 696f 6e20 6f72 2076 6172 6961 626c 6520 ion or variable │ │ │ +0000d090: 7768 6f73 6520 7661 6c75 6520 6973 2074 whose value is t │ │ │ +0000d0a0: 6865 206c 6973 742e 0a53 6565 2060 666f he list..See `fo │ │ │ +0000d0b0: 6e74 2d6c 6f63 6b2d 6b65 7977 6f72 6473 nt-lock-keywords │ │ │ +0000d0c0: 2720 666f 7220 6120 6465 7363 7269 7074 ' for a descript │ │ │ +0000d0d0: 696f 6e20 6f66 2074 6865 2066 6f72 6d20 ion of the form │ │ │ +0000d0e0: 6f66 2074 6869 7320 6c69 7374 3b0a 7468 of this list;.th │ │ │ +0000d0f0: 6520 6469 6666 6572 656e 6365 7320 6172 e differences ar │ │ │ +0000d100: 6520 6c69 7374 6564 2062 656c 6f77 2e20 e listed below. │ │ │ +0000d110: 204d 4154 4348 2d48 4947 484c 4947 4854 MATCH-HIGHLIGHT │ │ │ +0000d120: 2073 686f 756c 6420 6265 206f 6620 7468 should be of th │ │ │ +0000d130: 6520 666f 726d 3a0a 0a20 284d 4154 4348 e form:.. (MATCH │ │ │ +0000d140: 2053 594e 5441 5820 4f56 4552 5249 4445 SYNTAX OVERRIDE │ │ │ +0000d150: 204c 4158 4d41 5443 4829 0a0a 7768 6572 LAXMATCH)..wher │ │ │ +0000d160: 6520 5359 4e54 4158 2063 616e 2062 6520 e SYNTAX can be │ │ │ +0000d170: 6f66 2074 6865 2066 6f72 6d20 2853 594e of the form (SYN │ │ │ +0000d180: 5441 582d 434f 4445 202e 204d 4154 4348 TAX-CODE . MATCH │ │ │ +0000d190: 494e 472d 4348 4152 292c 2074 6865 206e ING-CHAR), the n │ │ │ +0000d1a0: 616d 6520 6f66 2061 0a73 796e 7461 7820 ame of a.syntax │ │ │ +0000d1b0: 7461 626c 652c 206f 7220 616e 2065 7870 table, or an exp │ │ │ +0000d1c0: 7265 7373 696f 6e20 7768 6f73 6520 7661 ression whose va │ │ │ +0000d1d0: 6c75 6520 6973 2073 7563 6820 6120 666f lue is such a fo │ │ │ +0000d1e0: 726d 206f 7220 6120 7379 6e74 6178 2074 rm or a syntax t │ │ │ +0000d1f0: 6162 6c65 2e0a 4f56 4552 5249 4445 2063 able..OVERRIDE c │ │ │ +0000d200: 616e 6e6f 7420 6265 2060 7072 6570 656e annot be `prepen │ │ │ +0000d210: 6427 206f 7220 6061 7070 656e 6427 2e0a d' or `append'.. │ │ │ +0000d220: 0a46 6f72 2065 7861 6d70 6c65 2c20 616e .For example, an │ │ │ +0000d230: 2065 6c65 6d65 6e74 206f 6620 7468 6520 element of the │ │ │ +0000d240: 666f 726d 2068 6967 686c 6967 6874 7320 form highlights │ │ │ +0000d250: 7379 6e74 6163 7469 6361 6c6c 793a 0a0a syntactically:.. │ │ │ +0000d260: 2028 225c 5c24 5c5c 2823 5c5c 2922 2031 ("\\$\\(#\\)" 1 │ │ │ +0000d270: 2028 3120 2e20 6e69 6c29 290a 0a20 6120 (1 . nil)).. a │ │ │ +0000d280: 6861 7368 2063 6861 7261 6374 6572 2077 hash character w │ │ │ +0000d290: 6865 6e20 666f 6c6c 6f77 696e 6720 6120 hen following a │ │ │ +0000d2a0: 646f 6c6c 6172 2063 6861 7261 6374 6572 dollar character │ │ │ +0000d2b0: 2c20 7769 7468 2061 2053 594e 5441 582d , with a SYNTAX- │ │ │ +0000d2c0: 434f 4445 206f 660a 2031 2028 6d65 616e CODE of. 1 (mean │ │ │ +0000d2d0: 696e 6720 7075 6e63 7475 6174 696f 6e20 ing punctuation │ │ │ +0000d2e0: 7379 6e74 6178 292e 2020 4173 7375 6d69 syntax). Assumi │ │ │ +0000d2f0: 6e67 2074 6861 7420 7468 6520 6275 6666 ng that the buff │ │ │ +0000d300: 6572 2073 796e 7461 7820 7461 626c 6520 er syntax table │ │ │ +0000d310: 646f 6573 0a20 7370 6563 6966 7920 6861 does. specify ha │ │ │ +0000d320: 7368 2063 6861 7261 6374 6572 7320 746f sh characters to │ │ │ +0000d330: 2068 6176 6520 636f 6d6d 656e 7420 7374 have comment st │ │ │ +0000d340: 6172 7420 7379 6e74 6178 2c20 7468 6520 art syntax, the │ │ │ +0000d350: 656c 656d 656e 7420 7769 6c6c 206f 6e6c element will onl │ │ │ +0000d360: 790a 2068 6967 686c 6967 6874 2068 6173 y. highlight has │ │ │ +0000d370: 6820 6368 6172 6163 7465 7273 2074 6861 h characters tha │ │ │ +0000d380: 7420 646f 206e 6f74 2066 6f6c 6c6f 7720 t do not follow │ │ │ +0000d390: 646f 6c6c 6172 2063 6861 7261 6374 6572 dollar character │ │ │ +0000d3a0: 7320 6173 2063 6f6d 6d65 6e74 730a 2073 s as comments. s │ │ │ +0000d3b0: 796e 7461 6374 6963 616c 6c79 2e0a 0a20 yntactically... │ │ │ +0000d3c0: 2822 5c5c 2827 5c5c 292e 5c5c 2827 5c5c ("\\('\\).\\('\\ │ │ │ +0000d3d0: 2922 0a20 2028 3120 2837 202e 203f 2729 )". (1 (7 . ?') │ │ │ +0000d3e0: 290a 2020 2832 2028 3720 2e20 3f27 2929 ). (2 (7 . ?')) │ │ │ +0000d3f0: 290a 0a20 626f 7468 2073 696e 676c 6520 ).. both single │ │ │ +0000d400: 7175 6f74 6573 2077 6869 6368 2073 7572 quotes which sur │ │ │ +0000d410: 726f 756e 6420 6120 7369 6e67 6c65 2063 round a single c │ │ │ +0000d420: 6861 7261 6374 6572 2c20 7769 7468 2061 haracter, with a │ │ │ +0000d430: 2053 594e 5441 582d 434f 4445 206f 660a SYNTAX-CODE of. │ │ │ +0000d440: 2037 2028 6d65 616e 696e 6720 7374 7269 7 (meaning stri │ │ │ +0000d450: 6e67 2071 756f 7465 2073 796e 7461 7829 ng quote syntax) │ │ │ +0000d460: 2061 6e64 2061 204d 4154 4348 494e 472d and a MATCHING- │ │ │ +0000d470: 4348 4152 206f 6620 6120 7369 6e67 6c65 CHAR of a single │ │ │ +0000d480: 2071 756f 7465 2028 6d65 616e 696e 670a quote (meaning. │ │ │ +0000d490: 2061 2073 696e 676c 6520 7175 6f74 6520 a single quote │ │ │ +0000d4a0: 6d61 7463 6865 7320 6120 7369 6e67 6c65 matches a single │ │ │ +0000d4b0: 2071 756f 7465 292e 2020 4173 7375 6d69 quote). Assumi │ │ │ +0000d4c0: 6e67 2074 6861 7420 7468 6520 6275 6666 ng that the buff │ │ │ +0000d4d0: 6572 2073 796e 7461 7820 7461 626c 650a er syntax table. │ │ │ +0000d4e0: 2064 6f65 7320 6e6f 7420 7370 6563 6966 does not specif │ │ │ +0000d4f0: 7920 7369 6e67 6c65 2071 756f 7465 7320 y single quotes │ │ │ +0000d500: 746f 2068 6176 6520 7175 6f74 6520 7379 to have quote sy │ │ │ +0000d510: 6e74 6178 2c20 7468 6520 656c 656d 656e ntax, the elemen │ │ │ +0000d520: 7420 7769 6c6c 206f 6e6c 790a 2068 6967 t will only. hig │ │ │ +0000d530: 686c 6967 6874 2073 696e 676c 6520 7175 hlight single qu │ │ │ +0000d540: 6f74 6573 206f 6620 7468 6520 666f 726d otes of the form │ │ │ +0000d550: 2027 6327 2061 7320 7374 7269 6e67 7320 'c' as strings │ │ │ +0000d560: 7379 6e74 6163 7469 6361 6c6c 792e 0a20 syntactically.. │ │ │ +0000d570: 4f74 6865 7220 666f 726d 732c 2073 7563 Other forms, suc │ │ │ +0000d580: 6820 6173 2066 6f6f 2762 6172 206f 7220 h as foo'bar or │ │ │ +0000d590: 2766 7562 6172 272c 2077 696c 6c20 6e6f 'fubar', will no │ │ │ +0000d5a0: 7420 6265 2068 6967 686c 6967 6874 6564 t be highlighted │ │ │ +0000d5b0: 2061 7320 7374 7269 6e67 732e 0a0a 5468 as strings...Th │ │ │ +0000d5c0: 6973 2069 7320 6e6f 726d 616c 6c79 2073 is is normally s │ │ │ +0000d5d0: 6574 2076 6961 2060 666f 6e74 2d6c 6f63 et via `font-loc │ │ │ +0000d5e0: 6b2d 6465 6661 756c 7473 272e 1f0a 2864 k-defaults'...(d │ │ │ +0000d5f0: 6566 7661 7220 666f 6e74 2d6c 6f63 6b2d efvar font-lock- │ │ │ +0000d600: 7379 6e74 6163 7469 632d 6b65 7977 6f72 syntactic-keywor │ │ │ +0000d610: 6473 206e 696c 2028 2324 202e 2035 3332 ds nil (#$ . 532 │ │ │ +0000d620: 3931 2929 0a28 6d61 6b65 2d76 6172 6961 91)).(make-varia │ │ │ +0000d630: 626c 652d 6275 6666 6572 2d6c 6f63 616c ble-buffer-local │ │ │ +0000d640: 2027 666f 6e74 2d6c 6f63 6b2d 7379 6e74 'font-lock-synt │ │ │ +0000d650: 6163 7469 632d 6b65 7977 6f72 6473 290a actic-keywords). │ │ │ +0000d660: 2340 3338 204e 6f6e 206e 696c 206d 6561 #@38 Non nil mea │ │ │ +0000d670: 6e73 2060 666f 6e74 2d6c 6f63 6b2d 6d6f ns `font-lock-mo │ │ │ +0000d680: 6465 2720 6973 206f 6e1f 0a28 6465 6676 de' is on..(defv │ │ │ +0000d690: 6172 2066 6f6e 742d 6c6f 636b 2d6d 6f64 ar font-lock-mod │ │ │ +0000d6a0: 6520 6e69 6c20 2823 2420 2e20 3534 3838 e nil (#$ . 5488 │ │ │ +0000d6b0: 3529 290a 2862 7974 652d 636f 6465 2022 5)).(byte-code " │ │ │ +0000d6c0: c0c1 c2c3 2388 c4c2 c15c 2287 2220 5b63 ....#....\"." [c │ │ │ +0000d6d0: 7573 746f 6d2d 6164 642d 746f 2d67 726f ustom-add-to-gro │ │ │ +0000d6e0: 7570 2066 6f6e 742d 6c6f 636b 2066 6f6e up font-lock fon │ │ │ +0000d6f0: 742d 6c6f 636b 2d6d 6f64 6520 6375 7374 t-lock-mode cust │ │ │ +0000d700: 6f6d 2d76 6172 6961 626c 6520 6375 7374 om-variable cust │ │ │ +0000d710: 6f6d 2d61 6464 2d6c 6f61 645d 2034 290a om-add-load] 4). │ │ │ +0000d720: 2340 3538 2046 756e 6374 696f 6e20 6f72 #@58 Function or │ │ │ +0000d730: 2066 756e 6374 696f 6e73 2074 6f20 7275 functions to ru │ │ │ +0000d740: 6e20 6f6e 2065 6e74 7279 2074 6f20 666f n on entry to fo │ │ │ +0000d750: 6e74 2d6c 6f63 6b2d 6d6f 6465 2e1f 0a28 nt-lock-mode...( │ │ │ +0000d760: 6465 6676 6172 2066 6f6e 742d 6c6f 636b defvar font-lock │ │ │ +0000d770: 2d6d 6f64 652d 686f 6f6b 206e 696c 2028 -mode-hook nil ( │ │ │ +0000d780: 2324 202e 2035 3530 3737 2929 0a23 4031 #$ . 55077)).#@1 │ │ │ +0000d790: 3530 3020 546f 6767 6c65 2046 6f6e 7420 500 Toggle Font │ │ │ +0000d7a0: 4c6f 636b 204d 6f64 652e 0a57 6974 6820 Lock Mode..With │ │ │ +0000d7b0: 6172 672c 2074 7572 6e20 666f 6e74 2d6c arg, turn font-l │ │ │ +0000d7c0: 6f63 6b20 6d6f 6465 206f 6e20 6966 2061 ock mode on if a │ │ │ +0000d7d0: 6e64 206f 6e6c 7920 6966 2061 7267 2069 nd only if arg i │ │ │ +0000d7e0: 7320 706f 7369 7469 7665 2e0a 0a57 6865 s positive...Whe │ │ │ +0000d7f0: 6e20 466f 6e74 204c 6f63 6b20 6d6f 6465 n Font Lock mode │ │ │ +0000d800: 2069 7320 656e 6162 6c65 642c 2074 6578 is enabled, tex │ │ │ +0000d810: 7420 6973 2066 6f6e 7469 6669 6564 2061 t is fontified a │ │ │ +0000d820: 7320 796f 7520 7479 7065 2069 743a 0a0a s you type it:.. │ │ │ +0000d830: 202d 2043 6f6d 6d65 6e74 7320 6172 6520 - Comments are │ │ │ +0000d840: 6469 7370 6c61 7965 6420 696e 2060 666f displayed in `fo │ │ │ +0000d850: 6e74 2d6c 6f63 6b2d 636f 6d6d 656e 742d nt-lock-comment- │ │ │ +0000d860: 6661 6365 273b 0a20 2d20 5374 7269 6e67 face';. - String │ │ │ +0000d870: 7320 6172 6520 6469 7370 6c61 7965 6420 s are displayed │ │ │ +0000d880: 696e 2060 666f 6e74 2d6c 6f63 6b2d 7374 in `font-lock-st │ │ │ +0000d890: 7269 6e67 2d66 6163 6527 3b0a 202d 2044 ring-face';. - D │ │ │ +0000d8a0: 6f63 756d 656e 7461 7469 6f6e 2073 7472 ocumentation str │ │ │ +0000d8b0: 696e 6773 2028 696e 204c 6973 702d 6c69 ings (in Lisp-li │ │ │ +0000d8c0: 6b65 206c 616e 6775 6167 6573 2920 6172 ke languages) ar │ │ │ +0000d8d0: 6520 6469 7370 6c61 7965 6420 696e 0a20 e displayed in. │ │ │ +0000d8e0: 2020 6066 6f6e 742d 6c6f 636b 2d64 6f63 `font-lock-doc │ │ │ +0000d8f0: 2d73 7472 696e 672d 6661 6365 273b 0a20 -string-face';. │ │ │ +0000d900: 2d20 4c61 6e67 7561 6765 206b 6579 776f - Language keywo │ │ │ +0000d910: 7264 7320 2822 7265 7365 7276 6564 2077 rds ("reserved w │ │ │ +0000d920: 6f72 6473 2229 2061 7265 2064 6973 706c ords") are displ │ │ │ +0000d930: 6179 6564 2069 6e0a 2020 2060 666f 6e74 ayed in. `font │ │ │ +0000d940: 2d6c 6f63 6b2d 6b65 7977 6f72 642d 6661 -lock-keyword-fa │ │ │ +0000d950: 6365 273b 0a20 2d20 4675 6e63 7469 6f6e ce';. - Function │ │ │ +0000d960: 206e 616d 6573 2069 6e20 7468 6569 7220 names in their │ │ │ +0000d970: 6465 6669 6e69 6e67 2066 6f72 6d20 6172 defining form ar │ │ │ +0000d980: 6520 6469 7370 6c61 7965 6420 696e 0a20 e displayed in. │ │ │ +0000d990: 2020 6066 6f6e 742d 6c6f 636b 2d66 756e `font-lock-fun │ │ │ +0000d9a0: 6374 696f 6e2d 6e61 6d65 2d66 6163 6527 ction-name-face' │ │ │ +0000d9b0: 3b0a 202d 2056 6172 6961 626c 6520 6e61 ;. - Variable na │ │ │ +0000d9c0: 6d65 7320 696e 2074 6865 6972 2064 6566 mes in their def │ │ │ +0000d9d0: 696e 696e 6720 666f 726d 2061 7265 2064 ining form are d │ │ │ +0000d9e0: 6973 706c 6179 6564 2069 6e0a 2020 2060 isplayed in. ` │ │ │ +0000d9f0: 666f 6e74 2d6c 6f63 6b2d 7661 7269 6162 font-lock-variab │ │ │ +0000da00: 6c65 2d6e 616d 652d 6661 6365 273b 0a20 le-name-face';. │ │ │ +0000da10: 2d20 5479 7065 206e 616d 6573 2061 7265 - Type names are │ │ │ +0000da20: 2064 6973 706c 6179 6564 2069 6e20 6066 displayed in `f │ │ │ +0000da30: 6f6e 742d 6c6f 636b 2d74 7970 652d 6661 ont-lock-type-fa │ │ │ +0000da40: 6365 273b 0a20 2d20 5265 6665 7265 6e63 ce';. - Referenc │ │ │ +0000da50: 6573 2061 7070 6561 7269 6e67 2069 6e20 es appearing in │ │ │ +0000da60: 6865 6c70 2066 696c 6573 2061 6e64 2074 help files and t │ │ │ +0000da70: 6865 206c 696b 6520 6172 6520 6469 7370 he like are disp │ │ │ +0000da80: 6c61 7965 640a 2020 2069 6e20 6066 6f6e layed. in `fon │ │ │ +0000da90: 742d 6c6f 636b 2d72 6566 6572 656e 6365 t-lock-reference │ │ │ +0000daa0: 2d66 6163 6527 3b0a 202d 2050 7265 7072 -face';. - Prepr │ │ │ +0000dab0: 6f63 6573 736f 7220 6465 636c 6172 6174 ocessor declarat │ │ │ +0000dac0: 696f 6e73 2061 7265 2064 6973 706c 6179 ions are display │ │ │ +0000dad0: 6564 2069 6e0a 2020 6066 6f6e 742d 6c6f ed in. `font-lo │ │ │ +0000dae0: 636b 2d70 7265 7072 6f63 6573 736f 722d ck-preprocessor- │ │ │ +0000daf0: 6661 6365 273b 0a0a 2020 2061 6e64 0a0a face';.. and.. │ │ │ +0000db00: 202d 2043 6572 7461 696e 206f 7468 6572 - Certain other │ │ │ +0000db10: 2065 7870 7265 7373 696f 6e73 2061 7265 expressions are │ │ │ +0000db20: 2064 6973 706c 6179 6564 2069 6e20 6f74 displayed in ot │ │ │ +0000db30: 6865 7220 6661 6365 7320 6163 636f 7264 her faces accord │ │ │ +0000db40: 696e 670a 2020 2074 6f20 7468 6520 7661 ing. to the va │ │ │ +0000db50: 6c75 6520 6f66 2074 6865 2076 6172 6961 lue of the varia │ │ │ +0000db60: 626c 6520 6066 6f6e 742d 6c6f 636b 2d6b ble `font-lock-k │ │ │ +0000db70: 6579 776f 7264 7327 2e0a 0a57 6865 7265 eywords'...Where │ │ │ +0000db80: 206d 6f64 6573 2073 7570 706f 7274 2064 modes support d │ │ │ +0000db90: 6966 6665 7265 6e74 206c 6576 656c 7320 ifferent levels │ │ │ +0000dba0: 6f66 2066 6f6e 7469 6669 6361 7469 6f6e of fontification │ │ │ +0000dbb0: 2c20 796f 7520 6361 6e20 7573 6520 7468 , you can use th │ │ │ +0000dbc0: 6520 7661 7269 6162 6c65 0a60 666f 6e74 e variable.`font │ │ │ +0000dbd0: 2d6c 6f63 6b2d 6d61 7869 6d75 6d2d 6465 -lock-maximum-de │ │ │ +0000dbe0: 636f 7261 7469 6f6e 2720 746f 2073 7065 coration' to spe │ │ │ +0000dbf0: 6369 6679 2077 6869 6368 206c 6576 656c cify which level │ │ │ +0000dc00: 2079 6f75 2067 656e 6572 616c 6c79 2070 you generally p │ │ │ +0000dc10: 7265 6665 722e 0a57 6865 6e20 796f 7520 refer..When you │ │ │ +0000dc20: 7475 726e 2046 6f6e 7420 4c6f 636b 206d turn Font Lock m │ │ │ +0000dc30: 6f64 6520 6f6e 2f6f 6666 2074 6865 2062 ode on/off the b │ │ │ +0000dc40: 7566 6665 7220 6973 2066 6f6e 7469 6669 uffer is fontifi │ │ │ +0000dc50: 6564 2f64 6566 6f6e 7469 6669 6564 2c20 ed/defontified, │ │ │ +0000dc60: 7468 6f75 6768 0a66 6f6e 7469 6669 6361 though.fontifica │ │ │ +0000dc70: 7469 6f6e 206f 6363 7572 7320 6f6e 6c79 tion occurs only │ │ │ +0000dc80: 2069 6620 7468 6520 6275 6666 6572 2069 if the buffer i │ │ │ +0000dc90: 7320 6c65 7373 2074 6861 6e20 6066 6f6e s less than `fon │ │ │ +0000dca0: 742d 6c6f 636b 2d6d 6178 696d 756d 2d73 t-lock-maximum-s │ │ │ +0000dcb0: 697a 6527 2e0a 546f 2066 6f6e 7469 6679 ize'..To fontify │ │ │ +0000dcc0: 2061 2062 7566 6665 7220 7769 7468 6f75 a buffer withou │ │ │ +0000dcd0: 7420 7475 726e 696e 6720 6f6e 2046 6f6e t turning on Fon │ │ │ +0000dce0: 7420 4c6f 636b 206d 6f64 652c 2061 6e64 t Lock mode, and │ │ │ +0000dcf0: 2072 6567 6172 646c 6573 7320 6f66 2062 regardless of b │ │ │ +0000dd00: 7566 6665 720a 7369 7a65 2c20 796f 7520 uffer.size, you │ │ │ +0000dd10: 6361 6e20 7573 6520 5c5b 666f 6e74 2d6c can use \[font-l │ │ │ +0000dd20: 6f63 6b2d 666f 6e74 6966 792d 6275 6666 ock-fontify-buff │ │ │ +0000dd30: 6572 5d2e 0a0a 5365 6520 7468 6520 7661 er]...See the va │ │ │ +0000dd40: 7269 6162 6c65 2060 666f 6e74 2d6c 6f63 riable `font-loc │ │ │ +0000dd50: 6b2d 6b65 7977 6f72 6473 2720 666f 7220 k-keywords' for │ │ │ +0000dd60: 6375 7374 6f6d 697a 6174 696f 6e2e 1f0a customization... │ │ │ +0000dd70: 2861 7574 6f6c 6f61 6420 2766 6f6e 742d (autoload 'font- │ │ │ +0000dd80: 6c6f 636b 2d6d 6f64 6520 2266 6f6e 742d lock-mode "font- │ │ │ +0000dd90: 6c6f 636b 2220 2728 2324 202e 2035 3531 lock" '(#$ . 551 │ │ │ +0000dda0: 3838 2920 7420 6e69 6c29 0a23 4034 3120 88) t nil).#@41 │ │ │ +0000ddb0: 556e 636f 6e64 6974 696f 6e61 6c6c 7920 Unconditionally │ │ │ +0000ddc0: 7475 726e 206f 6e20 466f 6e74 204c 6f63 turn on Font Loc │ │ │ +0000ddd0: 6b20 6d6f 6465 2e1f 0a28 6175 746f 6c6f k mode...(autolo │ │ │ +0000dde0: 6164 2027 7475 726e 2d6f 6e2d 666f 6e74 ad 'turn-on-font │ │ │ +0000ddf0: 2d6c 6f63 6b20 2266 6f6e 742d 6c6f 636b -lock "font-lock │ │ │ +0000de00: 2220 2728 2324 202e 2035 3637 3532 2920 " '(#$ . 56752) │ │ │ +0000de10: 7420 6e69 6c29 0a23 4034 3220 556e 636f t nil).#@42 Unco │ │ │ +0000de20: 6e64 6974 696f 6e61 6c6c 7920 7475 726e nditionally turn │ │ │ +0000de30: 206f 6666 2046 6f6e 7420 4c6f 636b 206d off Font Lock m │ │ │ +0000de40: 6f64 652e 1f0a 2861 7574 6f6c 6f61 6420 ode...(autoload │ │ │ +0000de50: 2774 7572 6e2d 6f66 662d 666f 6e74 2d6c 'turn-off-font-l │ │ │ +0000de60: 6f63 6b20 2266 6f6e 742d 6c6f 636b 2220 ock "font-lock" │ │ │ +0000de70: 2728 2324 202e 2035 3638 3630 2920 7420 '(#$ . 56860) t │ │ │ +0000de80: 6e69 6c29 0a23 4031 3336 2046 6f6e 7469 nil).#@136 Fonti │ │ │ +0000de90: 6679 2074 6865 2063 7572 7265 6e74 2062 fy the current b │ │ │ +0000dea0: 7566 6665 7220 7468 6520 7761 7920 6066 uffer the way `f │ │ │ +0000deb0: 6f6e 742d 6c6f 636b 2d6d 6f64 6527 2077 ont-lock-mode' w │ │ │ +0000dec0: 6f75 6c64 2e0a 5365 6520 6066 6f6e 742d ould..See `font- │ │ │ +0000ded0: 6c6f 636b 2d6d 6f64 6527 2066 6f72 2064 lock-mode' for d │ │ │ +0000dee0: 6574 6169 6c73 2e0a 0a54 6869 7320 6361 etails...This ca │ │ │ +0000def0: 6e20 7461 6b65 2061 2077 6869 6c65 2066 n take a while f │ │ │ +0000df00: 6f72 206c 6172 6765 2062 7566 6665 7273 or large buffers │ │ │ +0000df10: 2e1f 0a28 6175 746f 6c6f 6164 2027 666f ...(autoload 'fo │ │ │ +0000df20: 6e74 2d6c 6f63 6b2d 666f 6e74 6966 792d nt-lock-fontify- │ │ │ +0000df30: 6275 6666 6572 2022 666f 6e74 2d6c 6f63 buffer "font-loc │ │ │ +0000df40: 6b22 2027 2823 2420 2e20 3536 3937 3129 k" '(#$ . 56971) │ │ │ +0000df50: 2074 206e 696c 290a 2862 7974 652d 636f t nil).(byte-co │ │ │ +0000df60: 6465 2022 c0c1 c2c3 8989 2588 c4c5 c65c de "......%....\ │ │ │ +0000df70: 2287 2220 5b61 7574 6f6c 6f61 6420 666f "." [autoload fo │ │ │ +0000df80: 6e74 2d6c 6f63 6b2d 7365 742d 6465 6661 nt-lock-set-defa │ │ │ +0000df90: 756c 7473 2d31 2022 666f 6e74 2d6c 6f63 ults-1 "font-loc │ │ │ +0000dfa0: 6b22 206e 696c 2061 6464 2d6d 696e 6f72 k" nil add-minor │ │ │ +0000dfb0: 2d6d 6f64 6520 666f 6e74 2d6c 6f63 6b2d -mode font-lock- │ │ │ +0000dfc0: 6d6f 6465 2022 2046 6f6e 7422 5d20 3629 mode " Font"] 6) │ │ │ +0000dfd0: 0a23 4036 3920 2a49 6620 6e6f 6e2d 6e69 .#@69 *If non-ni │ │ │ +0000dfe0: 6c2c 2074 6865 6e20 7468 6520 666f 6e74 l, then the font │ │ │ +0000dff0: 206d 656e 7520 7769 6c6c 2074 7279 2074 menu will try t │ │ │ +0000e000: 6f20 7368 6f77 206f 6e6c 7920 6269 746d o show only bitm │ │ │ +0000e010: 6170 2066 6f6e 7473 2e1f 0a28 6465 6676 ap fonts...(defv │ │ │ +0000e020: 6172 2066 6f6e 742d 6d65 6e75 2d69 676e ar font-menu-ign │ │ │ +0000e030: 6f72 652d 7363 616c 6564 2d66 6f6e 7473 ore-scaled-fonts │ │ │ +0000e040: 206e 696c 2028 2324 202e 202d 3537 3330 nil (#$ . -5730 │ │ │ +0000e050: 3229 290a 2340 3131 3420 2a49 6620 6e6f 2)).#@114 *If no │ │ │ +0000e060: 6e2d 6e69 6c2c 2074 6865 6e20 6368 616e n-nil, then chan │ │ │ +0000e070: 6769 6e67 2074 6865 2064 6566 6175 6c74 ging the default │ │ │ +0000e080: 2066 6f6e 7420 6672 6f6d 2074 6865 2066 font from the f │ │ │ +0000e090: 6f6e 7420 6d65 6e75 2077 696c 6c20 6f6e ont menu will on │ │ │ +0000e0a0: 6c79 0a61 6666 6563 7420 6f6e 6520 6672 ly.affect one fr │ │ │ +0000e0b0: 616d 6520 696e 7374 6561 6420 6f66 2061 ame instead of a │ │ │ +0000e0c0: 6c6c 2066 7261 6d65 732e 1f0a 2864 6566 ll frames...(def │ │ │ +0000e0d0: 7661 7220 666f 6e74 2d6d 656e 752d 7468 var font-menu-th │ │ │ +0000e0e0: 6973 2d66 7261 6d65 2d6f 6e6c 792d 7020 is-frame-only-p │ │ │ +0000e0f0: 6e69 6c20 2823 2420 2e20 2d35 3734 3334 nil (#$ . -57434 │ │ │ +0000e100: 2929 0a28 6673 6574 2027 696e 7374 616c )).(fset 'instal │ │ │ +0000e110: 6c2d 666f 6e74 2d6d 656e 7573 2027 7265 l-font-menus 're │ │ │ +0000e120: 7365 742d 6465 7669 6365 2d66 6f6e 742d set-device-font- │ │ │ +0000e130: 6d65 6e75 7329 0a23 4034 3532 2047 656e menus).#@452 Gen │ │ │ +0000e140: 6572 6174 6573 2074 6865 2060 466f 6e74 erates the `Font │ │ │ +0000e150: 272c 2060 5369 7a65 272c 2061 6e64 2060 ', `Size', and ` │ │ │ +0000e160: 5765 6967 6874 2720 7375 626d 656e 7573 Weight' submenus │ │ │ +0000e170: 2066 6f72 2074 6865 204f 7074 696f 6e73 for the Options │ │ │ +0000e180: 206d 656e 752e 0a54 6869 7320 6973 2072 menu..This is r │ │ │ +0000e190: 756e 2074 6865 2066 6972 7374 2074 696d un the first tim │ │ │ +0000e1a0: 6520 7468 6174 2061 2066 6f6e 742d 6d65 e that a font-me │ │ │ +0000e1b0: 6e75 2069 7320 6e65 6564 6564 2066 6f72 nu is needed for │ │ │ +0000e1c0: 2065 6163 6820 6465 7669 6365 2e0a 4966 each device..If │ │ │ +0000e1d0: 2079 6f75 2064 6f6e 2774 206c 696b 6520 you don't like │ │ │ +0000e1e0: 7468 6520 6c61 7a79 2069 6e76 6f63 6174 the lazy invocat │ │ │ +0000e1f0: 696f 6e20 6f66 2074 6869 7320 6675 6e63 ion of this func │ │ │ +0000e200: 7469 6f6e 2c20 796f 7520 6361 6e20 6164 tion, you can ad │ │ │ +0000e210: 6420 6974 2074 6f0a 6063 7265 6174 652d d it to.`create- │ │ │ +0000e220: 6465 7669 6365 2d68 6f6f 6b27 2061 6e64 device-hook' and │ │ │ +0000e230: 2074 6861 7420 7769 6c6c 206d 616b 6520 that will make │ │ │ +0000e240: 7468 6520 666f 6e74 206d 656e 7573 2072 the font menus r │ │ │ +0000e250: 6573 706f 6e64 206d 6f72 6520 7175 6963 espond more quic │ │ │ +0000e260: 6b6c 790a 7768 656e 2074 6865 7920 6172 kly.when they ar │ │ │ +0000e270: 6520 7365 6c65 6374 6564 2066 6f72 2074 e selected for t │ │ │ +0000e280: 6865 2066 6972 7374 2074 696d 652e 2020 he first time. │ │ │ +0000e290: 4966 2079 6f75 2061 6464 2066 6f6e 7473 If you add fonts │ │ │ +0000e2a0: 2074 6f20 796f 7572 2073 7973 7465 6d2c to your system, │ │ │ +0000e2b0: 0a6f 7220 6966 2079 6f75 2063 6861 6e67 .or if you chang │ │ │ +0000e2c0: 6520 796f 7572 2066 6f6e 7420 7061 7468 e your font path │ │ │ +0000e2d0: 2c20 796f 7520 6361 6e20 6361 6c6c 2074 , you can call t │ │ │ +0000e2e0: 6869 7320 746f 2072 652d 696e 6974 6961 his to re-initia │ │ │ +0000e2f0: 6c69 7a65 2074 6865 206d 656e 7573 2e1f lize the menus.. │ │ │ +0000e300: 0a28 6175 746f 6c6f 6164 2027 7265 7365 .(autoload 'rese │ │ │ +0000e310: 742d 6465 7669 6365 2d66 6f6e 742d 6d65 t-device-font-me │ │ │ +0000e320: 6e75 7320 2266 6f6e 742d 6d65 6e75 2220 nus "font-menu" │ │ │ +0000e330: 2728 2324 202e 2035 3736 3631 2920 6e69 '(#$ . 57661) ni │ │ │ +0000e340: 6c20 6e69 6c29 0a28 6279 7465 2d63 6f64 l nil).(byte-cod │ │ │ +0000e350: 6520 22c0 c1c2 c389 8925 88c0 c4c2 c389 e "......%...... │ │ │ +0000e360: 8925 88c0 c5c2 c389 8925 8722 205b 6175 .%.......%." [au │ │ │ +0000e370: 746f 6c6f 6164 2066 6f6e 742d 6d65 6e75 toload font-menu │ │ │ +0000e380: 2d66 616d 696c 792d 636f 6e73 7472 7563 -family-construc │ │ │ +0000e390: 746f 7220 2266 6f6e 742d 6d65 6e75 2220 tor "font-menu" │ │ │ +0000e3a0: 6e69 6c20 666f 6e74 2d6d 656e 752d 7369 nil font-menu-si │ │ │ +0000e3b0: 7a65 2d63 6f6e 7374 7275 6374 6f72 2066 ze-constructor f │ │ │ +0000e3c0: 6f6e 742d 6d65 6e75 2d77 6569 6768 742d ont-menu-weight- │ │ │ +0000e3d0: 636f 6e73 7472 7563 746f 725d 2036 290a constructor] 6). │ │ │ +0000e3e0: 2340 3731 2052 6574 7572 6e20 6120 666f #@71 Return a fo │ │ │ +0000e3f0: 6e74 2064 6573 6372 6970 746f 7220 6f62 nt descriptor ob │ │ │ +0000e400: 6a65 6374 2066 6f72 2046 4f4e 544e 414d ject for FONTNAM │ │ │ +0000e410: 452c 2061 7070 726f 7072 6961 7465 2066 E, appropriate f │ │ │ +0000e420: 6f72 2044 4556 4943 452e 1f0a 2861 7574 or DEVICE...(aut │ │ │ +0000e430: 6f6c 6f61 6420 2766 6f6e 742d 6372 6561 oload 'font-crea │ │ │ +0000e440: 7465 2d6f 626a 6563 7420 2266 6f6e 7422 te-object "font" │ │ │ +0000e450: 2027 2823 2420 2e20 3538 3334 3129 206e '(#$ . 58341) n │ │ │ +0000e460: 696c 206e 696c 290a 2862 7974 652d 636f il nil).(byte-co │ │ │ +0000e470: 6465 2022 c0c1 c2c3 8989 2588 c0c4 c2c3 de "......%..... │ │ │ +0000e480: 8989 2588 c0c5 c2c3 8989 2588 c0c6 c2c3 ..%.......%..... │ │ │ +0000e490: 8989 2588 c0c7 c2c3 8989 2588 c0c8 c2c3 ..%.......%..... │ │ │ +0000e4a0: 8989 2588 c0c9 c2c3 8989 2587 2220 5b61 ..%.......%." [a │ │ │ +0000e4b0: 7574 6f6c 6f61 6420 666f 6e74 2d64 6566 utoload font-def │ │ │ +0000e4c0: 6175 6c74 2d66 6f6e 742d 666f 722d 6465 ault-font-for-de │ │ │ +0000e4d0: 7669 6365 2022 666f 6e74 2220 6e69 6c20 vice "font" nil │ │ │ +0000e4e0: 666f 6e74 2d64 6566 6175 6c74 2d6f 626a font-default-obj │ │ │ +0000e4f0: 6563 742d 666f 722d 6465 7669 6365 2066 ect-for-device f │ │ │ +0000e500: 6f6e 742d 6465 6661 756c 742d 6661 6d69 ont-default-fami │ │ │ +0000e510: 6c79 2d66 6f72 2d64 6576 6963 6520 666f ly-for-device fo │ │ │ +0000e520: 6e74 2d64 6566 6175 6c74 2d72 6567 6973 nt-default-regis │ │ │ +0000e530: 7472 792d 666f 722d 6465 7669 6365 2066 try-for-device f │ │ │ +0000e540: 6f6e 742d 6465 6661 756c 742d 656e 636f ont-default-enco │ │ │ +0000e550: 6469 6e67 2d66 6f72 2d64 6576 6963 6520 ding-for-device │ │ │ +0000e560: 666f 6e74 2d64 6566 6175 6c74 2d73 697a font-default-siz │ │ │ +0000e570: 652d 666f 722d 6465 7669 6365 2078 2d66 e-for-device x-f │ │ │ +0000e580: 6f6e 742d 6275 696c 642d 6361 6368 655d ont-build-cache] │ │ │ +0000e590: 2036 290a 2340 3131 3620 2a53 7472 696e 6).#@116 *Strin │ │ │ +0000e5a0: 6720 746f 2064 6973 706c 6179 2069 6e20 g to display in │ │ │ +0000e5b0: 7468 6520 6d6f 6465 6c69 6e65 2077 6865 the modeline whe │ │ │ +0000e5c0: 6e20 476e 7573 6572 7620 6973 2061 6374 n Gnuserv is act │ │ │ +0000e5d0: 6976 652e 0a53 6574 2074 6869 7320 746f ive..Set this to │ │ │ +0000e5e0: 206e 696c 2069 6620 796f 7520 646f 6e27 nil if you don' │ │ │ +0000e5f0: 7420 7761 6e74 2061 206d 6f64 656c 696e t want a modelin │ │ │ +0000e600: 6520 696e 6469 6361 746f 722e 1f0a 2864 e indicator...(d │ │ │ +0000e610: 6566 7661 7220 676e 7573 6572 762d 6d6f efvar gnuserv-mo │ │ │ +0000e620: 6465 2d6c 696e 652d 7374 7269 6e67 2022 de-line-string " │ │ │ +0000e630: 2053 6572 7665 7222 2028 2324 202e 202d Server" (#$ . - │ │ │ +0000e640: 3538 3737 3829 290a 2340 3330 3420 2a54 58778)).#@304 *T │ │ │ +0000e650: 6865 2066 7261 6d65 2074 6f20 6265 2075 he frame to be u │ │ │ +0000e660: 7365 6420 746f 2064 6973 706c 6179 2061 sed to display a │ │ │ +0000e670: 6c6c 2065 6469 7465 6420 6669 6c65 732e ll edited files. │ │ │ +0000e680: 0a49 6620 6e69 6c2c 2074 6865 6e20 6120 .If nil, then a │ │ │ +0000e690: 6e65 7720 6672 616d 6520 6973 2063 7265 new frame is cre │ │ │ +0000e6a0: 6174 6564 2066 6f72 2065 6163 6820 6669 ated for each fi │ │ │ +0000e6b0: 6c65 2065 6469 7465 642e 0a49 6620 742c le edited..If t, │ │ │ +0000e6c0: 2074 6865 6e20 7468 6520 6375 7272 656e then the curren │ │ │ +0000e6d0: 746c 7920 7365 6c65 6374 6564 2066 7261 tly selected fra │ │ │ +0000e6e0: 6d65 2077 696c 6c20 6265 2075 7365 642e me will be used. │ │ │ +0000e6f0: 0a49 6620 6120 6675 6e63 7469 6f6e 2c20 .If a function, │ │ │ +0000e700: 7468 656e 2074 6869 7320 7769 6c6c 2062 then this will b │ │ │ +0000e710: 6520 6361 6c6c 6564 2077 6974 6820 6120 e called with a │ │ │ +0000e720: 7379 6d62 6f6c 2060 7827 206f 7220 6074 symbol `x' or `t │ │ │ +0000e730: 7479 2720 6173 2074 6865 0a6f 6e6c 7920 ty' as the.only │ │ │ +0000e740: 6172 6775 6d65 6e74 2c20 616e 6420 6974 argument, and it │ │ │ +0000e750: 7320 7265 7475 726e 2076 616c 7565 2077 s return value w │ │ │ +0000e760: 696c 6c20 6265 2069 6e74 6572 7072 6574 ill be interpret │ │ │ +0000e770: 6564 2061 7320 6162 6f76 652e 1f0a 2864 ed as above...(d │ │ │ +0000e780: 6566 7661 7220 676e 7573 6572 762d 6672 efvar gnuserv-fr │ │ │ +0000e790: 616d 6520 6e69 6c20 2823 2420 2e20 2d35 ame nil (#$ . -5 │ │ │ +0000e7a0: 3839 3538 2929 0a23 4037 3420 5265 7475 8958)).#@74 Retu │ │ │ +0000e7b0: 726e 206e 6f6e 2d6e 696c 2069 6620 6120 rn non-nil if a │ │ │ +0000e7c0: 676e 7573 6572 7620 7072 6f63 6573 7320 gnuserv process │ │ │ +0000e7d0: 6973 2072 756e 6e69 6e67 2066 726f 6d20 is running from │ │ │ +0000e7e0: 7468 6973 2058 456d 6163 7320 7365 7373 this XEmacs sess │ │ │ +0000e7f0: 696f 6e2e 1f0a 2861 7574 6f6c 6f61 6420 ion...(autoload │ │ │ +0000e800: 2767 6e75 7365 7276 2d72 756e 6e69 6e67 'gnuserv-running │ │ │ +0000e810: 2d70 2022 676e 7573 6572 7622 2027 2823 -p "gnuserv" '(# │ │ │ +0000e820: 2420 2e20 3539 3330 3829 206e 696c 206e $ . 59308) nil n │ │ │ +0000e830: 696c 290a 2340 3333 3620 416c 6c6f 7720 il).#@336 Allow │ │ │ +0000e840: 7468 6973 2045 6d61 6373 2070 726f 6365 this Emacs proce │ │ │ +0000e850: 7373 2074 6f20 6265 2061 2073 6572 7665 ss to be a serve │ │ │ +0000e860: 7220 666f 7220 636c 6965 6e74 2070 726f r for client pro │ │ │ +0000e870: 6365 7373 6573 2e0a 5468 6973 2073 7461 cesses..This sta │ │ │ +0000e880: 7274 7320 6120 676e 7573 6572 7620 636f rts a gnuserv co │ │ │ +0000e890: 6d6d 756e 6963 6174 696f 6e73 2073 7562 mmunications sub │ │ │ +0000e8a0: 7072 6f63 6573 7320 7468 726f 7567 6820 process through │ │ │ +0000e8b0: 7768 6963 680a 636c 6965 6e74 2022 6564 which.client "ed │ │ │ +0000e8c0: 6974 6f72 7322 2028 676e 7563 6c69 656e itors" (gnuclien │ │ │ +0000e8d0: 7420 616e 6420 676e 7564 6f69 7429 2063 t and gnudoit) c │ │ │ +0000e8e0: 616e 2073 656e 6420 6564 6974 696e 6720 an send editing │ │ │ +0000e8f0: 636f 6d6d 616e 6473 2074 6f0a 7468 6973 commands to.this │ │ │ +0000e900: 2045 6d61 6373 206a 6f62 2e20 2053 6565 Emacs job. See │ │ │ +0000e910: 2074 6865 2067 6e75 7365 7276 2831 2920 the gnuserv(1) │ │ │ +0000e920: 6d61 6e75 616c 2070 6167 6520 666f 7220 manual page for │ │ │ +0000e930: 6d6f 7265 2064 6574 6169 6c73 2e0a 0a50 more details...P │ │ │ +0000e940: 7265 6669 7820 6172 6720 6d65 616e 7320 refix arg means │ │ │ +0000e950: 6a75 7374 206b 696c 6c20 616e 7920 6578 just kill any ex │ │ │ +0000e960: 6973 7469 6e67 2073 6572 7665 7220 636f isting server co │ │ │ +0000e970: 6d6d 756e 6963 6174 696f 6e73 2073 7562 mmunications sub │ │ │ +0000e980: 7072 6f63 6573 732e 1f0a 2861 7574 6f6c process...(autol │ │ │ +0000e990: 6f61 6420 2767 6e75 7365 7276 2d73 7461 oad 'gnuserv-sta │ │ │ +0000e9a0: 7274 2022 676e 7573 6572 7622 2027 2823 rt "gnuserv" '(# │ │ │ +0000e9b0: 2420 2e20 3539 3435 3029 2074 206e 696c $ . 59450) t nil │ │ │ +0000e9c0: 290a 2340 3435 3320 4765 6e65 7261 7465 ).#@453 Generate │ │ │ +0000e9d0: 7320 7468 6520 6046 6f6e 7427 2c20 6053 s the `Font', `S │ │ │ +0000e9e0: 697a 6527 2c20 616e 6420 6057 6569 6768 ize', and `Weigh │ │ │ +0000e9f0: 7427 2073 7562 6d65 6e75 7320 666f 7220 t' submenus for │ │ │ +0000ea00: 7468 6520 4f70 7469 6f6e 7320 6d65 6e75 the Options menu │ │ │ +0000ea10: 2e0a 5468 6973 2069 7320 7275 6e20 7468 ..This is run th │ │ │ +0000ea20: 6520 6669 7273 7420 7469 6d65 2074 6861 e first time tha │ │ │ +0000ea30: 7420 6120 666f 6e74 2d6d 656e 7520 6973 t a font-menu is │ │ │ +0000ea40: 206e 6565 6465 6420 666f 7220 6561 6368 needed for each │ │ │ +0000ea50: 2064 6576 6963 652e 0a49 6620 796f 7520 device..If you │ │ │ +0000ea60: 646f 6e27 7420 6c69 6b65 2074 6865 206c don't like the l │ │ │ +0000ea70: 617a 7920 696e 766f 6361 7469 6f6e 206f azy invocation o │ │ │ +0000ea80: 6620 7468 6973 2066 756e 6374 696f 6e2c f this function, │ │ │ +0000ea90: 2079 6f75 2063 616e 2061 6464 2069 7420 you can add it │ │ │ +0000eaa0: 746f 0a60 6372 6561 7465 2d64 6576 6963 to.`create-devic │ │ │ +0000eab0: 652d 686f 6f6b 2720 616e 6420 7468 6174 e-hook' and that │ │ │ +0000eac0: 2077 696c 6c20 6d61 6b65 2074 6865 2066 will make the f │ │ │ +0000ead0: 6f6e 7420 6d65 6e75 7320 7265 7370 6f6e ont menus respon │ │ │ +0000eae0: 6420 6d6f 7265 2071 7569 636b 6c79 0a77 d more quickly.w │ │ │ +0000eaf0: 6865 6e20 7468 6579 2061 7265 2073 656c hen they are sel │ │ │ +0000eb00: 6563 7465 6420 666f 7220 7468 6520 6669 ected for the fi │ │ │ +0000eb10: 7273 7420 7469 6d65 2e20 2049 6620 796f rst time. If yo │ │ │ +0000eb20: 7520 6164 6420 666f 6e74 7320 746f 2079 u add fonts to y │ │ │ +0000eb30: 6f75 7220 7379 7374 656d 2c20 0a6f 7220 our system, .or │ │ │ +0000eb40: 6966 2079 6f75 2063 6861 6e67 6520 796f if you change yo │ │ │ +0000eb50: 7572 2066 6f6e 7420 7061 7468 2c20 796f ur font path, yo │ │ │ +0000eb60: 7520 6361 6e20 6361 6c6c 2074 6869 7320 u can call this │ │ │ +0000eb70: 746f 2072 652d 696e 6974 6961 6c69 7a65 to re-initialize │ │ │ +0000eb80: 2074 6865 206d 656e 7573 2e1f 0a28 6175 the menus...(au │ │ │ +0000eb90: 746f 6c6f 6164 2027 6774 6b2d 7265 7365 toload 'gtk-rese │ │ │ +0000eba0: 742d 6465 7669 6365 2d66 6f6e 742d 6d65 t-device-font-me │ │ │ +0000ebb0: 6e75 7320 2267 746b 2d66 6f6e 742d 6d65 nus "gtk-font-me │ │ │ +0000ebc0: 6e75 2220 2728 2324 202e 2035 3938 3438 nu" '(#$ . 59848 │ │ │ +0000ebd0: 2920 6e69 6c20 6e69 6c29 0a28 6279 7465 ) nil nil).(byte │ │ │ +0000ebe0: 2d63 6f64 6520 22c0 c1c2 c389 8925 8722 -code "......%." │ │ │ +0000ebf0: 205b 6175 746f 6c6f 6164 2067 746b 2d66 [autoload gtk-f │ │ │ +0000ec00: 6f6e 742d 6d65 6e75 2d66 6f6e 742d 6461 ont-menu-font-da │ │ │ +0000ec10: 7461 2022 6774 6b2d 666f 6e74 2d6d 656e ta "gtk-font-men │ │ │ +0000ec20: 7522 206e 696c 5d20 3629 0a23 4032 3937 u" nil] 6).#@297 │ │ │ +0000ec30: 202a 4e6f 6e2d 6e69 6c20 6d65 616e 7320 *Non-nil means │ │ │ +0000ec40: 6769 7665 206d 6f72 6520 696e 666f 2061 give more info a │ │ │ +0000ec50: 626f 7574 2048 656c 7020 636f 6d6d 616e bout Help comman │ │ │ +0000ec60: 6420 696e 2074 6872 6565 2073 7465 7073 d in three steps │ │ │ +0000ec70: 2e0a 5468 6520 7468 7265 6520 7374 6570 ..The three step │ │ │ +0000ec80: 7320 6172 6520 7369 6d70 6c65 2070 726f s are simple pro │ │ │ +0000ec90: 6d70 742c 2070 726f 6d70 7420 7769 7468 mpt, prompt with │ │ │ +0000eca0: 2061 6c6c 206f 7074 696f 6e73 2c0a 616e all options,.an │ │ │ +0000ecb0: 6420 7769 6e64 6f77 206c 6973 7469 6e67 d window listing │ │ │ +0000ecc0: 2061 6e64 2064 6573 6372 6962 696e 6720 and describing │ │ │ +0000ecd0: 7468 6520 6f70 7469 6f6e 732e 0a41 2076 the options..A v │ │ │ +0000ece0: 616c 7565 206f 6620 6e69 6c20 6d65 616e alue of nil mean │ │ │ +0000ecf0: 7320 736b 6970 2074 6865 206d 6964 646c s skip the middl │ │ │ +0000ed00: 6520 7374 6570 2c20 736f 2074 6861 740a e step, so that. │ │ │ +0000ed10: 5c5b 6865 6c70 2d63 6f6d 6d61 6e64 5d20 \[help-command] │ │ │ +0000ed20: 5c5b 6865 6c70 2d63 6f6d 6d61 6e64 5d20 \[help-command] │ │ │ +0000ed30: 6769 7665 7320 7468 6520 7769 6e64 6f77 gives the window │ │ │ +0000ed40: 2074 6861 7420 6c69 7374 7320 7468 6520 that lists the │ │ │ +0000ed50: 6f70 7469 6f6e 732e 1f0a 2864 6566 7661 options...(defva │ │ │ +0000ed60: 7220 7468 7265 652d 7374 6570 2d68 656c r three-step-hel │ │ │ +0000ed70: 7020 7420 2823 2420 2e20 2d36 3034 3635 p t (#$ . -60465 │ │ │ +0000ed80: 2929 0a23 4032 3334 2044 6973 706c 6179 )).#@234 Display │ │ │ +0000ed90: 206c 6973 7473 206f 6620 6675 6e63 7469 lists of functi │ │ │ +0000eda0: 6f6e 7320 616e 6420 7661 7269 6162 6c65 ons and variable │ │ │ +0000edb0: 7320 6d61 7463 6869 6e67 2052 4547 4558 s matching REGEX │ │ │ +0000edc0: 500a 696e 2062 7566 6665 7220 222a 4879 P.in buffer "*Hy │ │ │ +0000edd0: 7065 7220 4170 726f 706f 732a 222e 2020 per Apropos*". │ │ │ +0000ede0: 4966 206f 7074 696f 6e61 6c20 7072 6566 If optional pref │ │ │ +0000edf0: 6978 2061 7267 2069 7320 6769 7665 6e2c ix arg is given, │ │ │ +0000ee00: 2074 6865 6e20 7468 650a 7661 6c75 6520 then the.value │ │ │ +0000ee10: 6f66 2060 6879 7065 722d 6170 726f 706f of `hyper-apropo │ │ │ +0000ee20: 732d 7072 6f67 7261 6d6d 696e 672d 6170 s-programming-ap │ │ │ +0000ee30: 726f 706f 7327 2069 7320 746f 6767 6c65 ropos' is toggle │ │ │ +0000ee40: 6420 666f 7220 7468 6973 2073 6561 7263 d for this searc │ │ │ +0000ee50: 682e 0a53 6565 2061 6c73 6f20 6068 7970 h..See also `hyp │ │ │ +0000ee60: 6572 2d61 7072 6f70 6f73 2d6d 6f64 6527 er-apropos-mode' │ │ │ +0000ee70: 2e1f 0a28 6175 746f 6c6f 6164 2027 6879 ...(autoload 'hy │ │ │ +0000ee80: 7065 722d 6170 726f 706f 7320 2268 7970 per-apropos "hyp │ │ │ +0000ee90: 6572 2d61 7072 6f70 6f73 2220 2728 2324 er-apropos" '(#$ │ │ │ +0000eea0: 202e 2036 3038 3039 2920 7420 6e69 6c29 . 60809) t nil) │ │ │ +0000eeb0: 0a28 6279 7465 2d63 6f64 6520 22c0 c1c2 .(byte-code "... │ │ │ +0000eec0: c3c4 c325 88c0 c5c2 c3c4 c325 8722 205b ...%.......%." [ │ │ │ +0000eed0: 6175 746f 6c6f 6164 2068 7970 6572 2d64 autoload hyper-d │ │ │ +0000eee0: 6573 6372 6962 652d 6b65 7920 2268 7970 escribe-key "hyp │ │ │ +0000eef0: 6572 2d61 7072 6f70 6f73 2220 6e69 6c20 er-apropos" nil │ │ │ +0000ef00: 7420 6879 7065 722d 6465 7363 7269 6265 t hyper-describe │ │ │ +0000ef10: 2d6b 6579 2d62 7269 6566 6c79 5d20 3629 -key-briefly] 6) │ │ │ +0000ef20: 0a23 4037 3320 4465 7363 7269 6265 2066 .#@73 Describe f │ │ │ +0000ef30: 6163 652e 2e0a 5365 6520 616c 736f 2060 ace...See also ` │ │ │ +0000ef40: 6879 7065 722d 6170 726f 706f 7327 2061 hyper-apropos' a │ │ │ +0000ef50: 6e64 2060 6879 7065 722d 6465 7363 7269 nd `hyper-descri │ │ │ +0000ef60: 6265 2d66 756e 6374 696f 6e27 2e1f 0a28 be-function'...( │ │ │ +0000ef70: 6175 746f 6c6f 6164 2027 6879 7065 722d autoload 'hyper- │ │ │ +0000ef80: 6465 7363 7269 6265 2d66 6163 6520 2268 describe-face "h │ │ │ +0000ef90: 7970 6572 2d61 7072 6f70 6f73 2220 2728 yper-apropos" '( │ │ │ +0000efa0: 2324 202e 2036 3132 3232 2920 7420 6e69 #$ . 61222) t ni │ │ │ +0000efb0: 6c29 0a23 4031 3132 2048 7970 6572 7465 l).#@112 Hyperte │ │ │ +0000efc0: 7874 2064 726f 702d 696e 2072 6570 6c61 xt drop-in repla │ │ │ +0000efd0: 6365 6d65 6e74 2066 6f72 2060 6465 7363 cement for `desc │ │ │ +0000efe0: 7269 6265 2d76 6172 6961 626c 6527 2e0a ribe-variable'.. │ │ │ +0000eff0: 5365 6520 616c 736f 2060 6879 7065 722d See also `hyper- │ │ │ +0000f000: 6170 726f 706f 7327 2061 6e64 2060 6879 apropos' and `hy │ │ │ +0000f010: 7065 722d 6465 7363 7269 6265 2d66 756e per-describe-fun │ │ │ +0000f020: 6374 696f 6e27 2e1f 0a28 6175 746f 6c6f ction'...(autolo │ │ │ +0000f030: 6164 2027 6879 7065 722d 6465 7363 7269 ad 'hyper-descri │ │ │ +0000f040: 6265 2d76 6172 6961 626c 6520 2268 7970 be-variable "hyp │ │ │ +0000f050: 6572 2d61 7072 6f70 6f73 2220 2728 2324 er-apropos" '(#$ │ │ │ +0000f060: 202e 2036 3133 3639 2920 7420 6e69 6c29 . 61369) t nil) │ │ │ +0000f070: 0a23 4036 3820 5072 696e 7420 6d65 7373 .#@68 Print mess │ │ │ +0000f080: 6167 6520 6c69 7374 696e 6720 6b65 7920 age listing key │ │ │ +0000f090: 7365 7175 656e 6365 7320 7468 6174 2069 sequences that i │ │ │ +0000f0a0: 6e76 6f6b 6520 7370 6563 6966 6965 6420 nvoke specified │ │ │ +0000f0b0: 636f 6d6d 616e 642e 1f0a 2861 7574 6f6c command...(autol │ │ │ +0000f0c0: 6f61 6420 2768 7970 6572 2d77 6865 7265 oad 'hyper-where │ │ │ +0000f0d0: 2d69 7320 2268 7970 6572 2d61 7072 6f70 -is "hyper-aprop │ │ │ +0000f0e0: 6f73 2220 2728 2324 202e 2036 3135 3538 os" '(#$ . 61558 │ │ │ +0000f0f0: 2920 7420 6e69 6c29 0a23 4032 3034 2048 ) t nil).#@204 H │ │ │ +0000f100: 7970 6572 7465 7874 2072 6570 6c61 6365 ypertext replace │ │ │ +0000f110: 6d65 6e74 2066 6f72 2060 6465 7363 7269 ment for `descri │ │ │ +0000f120: 6265 2d66 756e 6374 696f 6e27 2e20 2055 be-function'. U │ │ │ +0000f130: 6e6c 696b 6520 6064 6573 6372 6962 652d nlike `describe- │ │ │ +0000f140: 6675 6e63 7469 6f6e 270a 696e 2074 6861 function'.in tha │ │ │ +0000f150: 7420 7468 6520 7379 6d62 6f6c 2075 6e64 t the symbol und │ │ │ +0000f160: 6572 2074 6865 2063 7572 736f 7220 6973 er the cursor is │ │ │ +0000f170: 2074 6865 2064 6566 6175 6c74 2069 6620 the default if │ │ │ +0000f180: 6974 2069 7320 6120 6675 6e63 7469 6f6e it is a function │ │ │ +0000f190: 2e0a 5365 6520 616c 736f 2060 6879 7065 ..See also `hype │ │ │ +0000f1a0: 722d 6170 726f 706f 7327 2061 6e64 2060 r-apropos' and ` │ │ │ +0000f1b0: 6879 7065 722d 6465 7363 7269 6265 2d76 hyper-describe-v │ │ │ +0000f1c0: 6172 6961 626c 6527 2e1f 0a28 6175 746f ariable'...(auto │ │ │ +0000f1d0: 6c6f 6164 2027 6879 7065 722d 6465 7363 load 'hyper-desc │ │ │ +0000f1e0: 7269 6265 2d66 756e 6374 696f 6e20 2268 ribe-function "h │ │ │ +0000f1f0: 7970 6572 2d61 7072 6f70 6f73 2220 2728 yper-apropos" '( │ │ │ +0000f200: 2324 202e 2036 3136 3935 2920 7420 6e69 #$ . 61695) t ni │ │ │ +0000f210: 6c29 0a23 4031 3132 2048 7970 6572 7465 l).#@112 Hyperte │ │ │ +0000f220: 7874 2064 726f 702d 696e 2072 6570 6c61 xt drop-in repla │ │ │ +0000f230: 6365 6d65 6e74 2066 6f72 2060 6465 7363 cement for `desc │ │ │ +0000f240: 7269 6265 2d76 6172 6961 626c 6527 2e0a ribe-variable'.. │ │ │ +0000f250: 5365 6520 616c 736f 2060 6879 7065 722d See also `hyper- │ │ │ +0000f260: 6170 726f 706f 7327 2061 6e64 2060 6879 apropos' and `hy │ │ │ +0000f270: 7065 722d 6465 7363 7269 6265 2d66 756e per-describe-fun │ │ │ +0000f280: 6374 696f 6e27 2e1f 0a28 6175 746f 6c6f ction'...(autolo │ │ │ +0000f290: 6164 2027 6879 7065 722d 6170 726f 706f ad 'hyper-apropo │ │ │ +0000f2a0: 732d 7265 6164 2d76 6172 6961 626c 652d s-read-variable- │ │ │ +0000f2b0: 7379 6d62 6f6c 2022 6879 7065 722d 6170 symbol "hyper-ap │ │ │ +0000f2c0: 726f 706f 7322 2027 2823 2420 2e20 3631 ropos" '(#$ . 61 │ │ │ +0000f2d0: 3937 3729 206e 696c 206e 696c 290a 2862 977) nil nil).(b │ │ │ +0000f2e0: 7974 652d 636f 6465 2022 c2c3 1918 c408 yte-code "...... │ │ │ +0000f2f0: 095c 2288 c508 095c 2288 2ac6 c719 18c4 .\"....\".*..... │ │ │ +0000f300: 0809 5c22 88c5 0809 5c22 882a c8c9 cacb ..\"....\".*.... │ │ │ +0000f310: cccb 2587 2220 5b6f 6c64 6675 6e20 6e65 ..%." [oldfun ne │ │ │ +0000f320: 7766 756e 2068 7970 726f 706f 732d 7265 wfun hypropos-re │ │ │ +0000f330: 6164 2d76 6172 6961 626c 652d 7379 6d62 ad-variable-symb │ │ │ +0000f340: 6f6c 2068 7970 6572 2d61 7072 6f70 6f73 ol hyper-apropos │ │ │ +0000f350: 2d72 6561 642d 7661 7269 6162 6c65 2d73 -read-variable-s │ │ │ +0000f360: 796d 626f 6c20 6465 6669 6e65 2d66 756e ymbol define-fun │ │ │ +0000f370: 6374 696f 6e20 6d61 6b65 2d6f 6273 6f6c ction make-obsol │ │ │ +0000f380: 6574 6520 6879 7072 6f70 6f73 2d67 6574 ete hypropos-get │ │ │ +0000f390: 2d64 6f63 2068 7970 6572 2d61 7072 6f70 -doc hyper-aprop │ │ │ +0000f3a0: 6f73 2d67 6574 2d64 6f63 2061 7574 6f6c os-get-doc autol │ │ │ +0000f3b0: 6f61 6420 6879 7065 722d 7365 742d 7661 oad hyper-set-va │ │ │ +0000f3c0: 7269 6162 6c65 2022 6879 7065 722d 6170 riable "hyper-ap │ │ │ +0000f3d0: 726f 706f 7322 206e 696c 2074 5d20 3629 ropos" nil t] 6) │ │ │ +0000f3e0: 0a23 4035 3320 496e 7465 7261 6374 6976 .#@53 Interactiv │ │ │ +0000f3f0: 656c 7920 7365 7420 7468 6520 7661 7269 ely set the vari │ │ │ +0000f400: 6162 6c65 206f 6e20 7468 6520 6375 7272 able on the curr │ │ │ +0000f410: 656e 7420 6c69 6e65 2e1f 0a28 6175 746f ent line...(auto │ │ │ +0000f420: 6c6f 6164 2027 6879 7065 722d 6170 726f load 'hyper-apro │ │ │ +0000f430: 706f 732d 7365 742d 7661 7269 6162 6c65 pos-set-variable │ │ │ +0000f440: 2022 6879 7065 722d 6170 726f 706f 7322 "hyper-apropos" │ │ │ +0000f450: 2027 2823 2420 2e20 3632 3433 3829 2074 '(#$ . 62438) t │ │ │ +0000f460: 206e 696c 290a 2862 7974 652d 636f 6465 nil).(byte-code │ │ │ +0000f470: 2022 c2c3 1918 c408 095c 2288 c508 095c ".......\"....\ │ │ │ +0000f480: 2288 2ac6 c7c8 c9ca c925 88cb c719 18c4 ".*......%...... │ │ │ +0000f490: 0809 5c22 88c5 0809 5c22 882a c987 2220 ..\"....\".*.." │ │ │ +0000f4a0: 5b6f 6c64 6675 6e20 6e65 7766 756e 2068 [oldfun newfun h │ │ │ +0000f4b0: 7970 726f 706f 732d 7365 742d 7661 7269 ypropos-set-vari │ │ │ +0000f4c0: 6162 6c65 2068 7970 6572 2d61 7072 6f70 able hyper-aprop │ │ │ +0000f4d0: 6f73 2d73 6574 2d76 6172 6961 626c 6520 os-set-variable │ │ │ +0000f4e0: 6465 6669 6e65 2d66 756e 6374 696f 6e20 define-function │ │ │ +0000f4f0: 6d61 6b65 2d6f 6273 6f6c 6574 6520 6175 make-obsolete au │ │ │ +0000f500: 746f 6c6f 6164 2068 7970 6572 2d61 7072 toload hyper-apr │ │ │ +0000f510: 6f70 6f73 2d70 6f70 7570 2d6d 656e 7520 opos-popup-menu │ │ │ +0000f520: 2268 7970 6572 2d61 7072 6f70 6f73 2220 "hyper-apropos" │ │ │ +0000f530: 6e69 6c20 7420 6879 7072 6f70 6f73 2d70 nil t hypropos-p │ │ │ +0000f540: 6f70 7570 2d6d 656e 755d 2036 290a 2340 opup-menu] 6).#@ │ │ │ +0000f550: 3535 3620 4c69 7374 206f 6620 6469 7265 556 List of dire │ │ │ +0000f560: 6374 6f72 6965 7320 746f 2073 6561 7263 ctories to searc │ │ │ +0000f570: 6820 666f 7220 496e 666f 2064 6f63 756d h for Info docum │ │ │ +0000f580: 656e 7461 7469 6f6e 2066 696c 6573 2e0a entation files.. │ │ │ +0000f590: 0a54 6865 2066 6972 7374 2064 6972 6563 .The first direc │ │ │ +0000f5a0: 746f 7279 2069 6e20 7468 6973 206c 6973 tory in this lis │ │ │ +0000f5b0: 742c 2074 6865 2022 6469 7222 2066 696c t, the "dir" fil │ │ │ +0000f5c0: 6520 7468 6572 6520 7769 6c6c 2062 6563 e there will bec │ │ │ +0000f5d0: 6f6d 650a 7468 6520 2864 6972 2954 6f70 ome.the (dir)Top │ │ │ +0000f5e0: 206e 6f64 6520 6f66 2074 6865 2049 6e66 node of the Inf │ │ │ +0000f5f0: 6f20 646f 6375 6d65 6e74 6174 696f 6e20 o documentation │ │ │ +0000f600: 7472 6565 2e0a 0a4e 6f74 653a 2044 4f20 tree...Note: DO │ │ │ +0000f610: 4e4f 5420 7573 6520 7468 6520 6063 7573 NOT use the `cus │ │ │ +0000f620: 746f 6d69 7a65 2720 696e 7465 7266 6163 tomize' interfac │ │ │ +0000f630: 6520 746f 2063 6861 6e67 6520 7468 6520 e to change the │ │ │ +0000f640: 7661 6c75 6520 6f66 2074 6869 730a 7661 value of this.va │ │ │ +0000f650: 7269 6162 6c65 2e20 2049 7473 2076 616c riable. Its val │ │ │ +0000f660: 7565 2069 7320 6372 6561 7465 6420 6479 ue is created dy │ │ │ +0000f670: 6e61 6d69 6361 6c6c 7920 6f6e 2065 6163 namically on eac │ │ │ +0000f680: 6820 7374 6172 7475 702c 2064 6570 656e h startup, depen │ │ │ +0000f690: 6469 6e67 0a6f 6e20 5845 6d61 6373 2070 ding.on XEmacs p │ │ │ +0000f6a0: 6163 6b61 6765 7320 696e 7374 616c 6c65 ackages installe │ │ │ +0000f6b0: 6420 6f6e 2074 6865 2073 7973 7465 6d2e d on the system. │ │ │ +0000f6c0: 2020 4966 2079 6f75 2077 616e 7420 746f If you want to │ │ │ +0000f6d0: 2063 6861 6e67 6520 7468 650a 7365 6172 change the.sear │ │ │ +0000f6e0: 6368 2070 6174 682c 206d 616b 6520 7468 ch path, make th │ │ │ +0000f6f0: 6520 6e65 6564 6564 206d 6f64 6966 6963 e needed modific │ │ │ +0000f700: 6174 696f 6e73 206f 6e20 7468 6520 7661 ations on the va │ │ │ +0000f710: 7269 6162 6c65 2773 2076 616c 7565 0a66 riable's value.f │ │ │ +0000f720: 726f 6d20 2e65 6d61 6373 2e20 2046 6f72 rom .emacs. For │ │ │ +0000f730: 2069 6e73 7461 6e63 653a 0a0a 2020 2020 instance:.. │ │ │ +0000f740: 2873 6574 7120 496e 666f 2d64 6972 6563 (setq Info-direc │ │ │ +0000f750: 746f 7279 2d6c 6973 7420 2863 6f6e 7320 tory-list (cons │ │ │ +0000f760: 227e 2f69 6e66 6f22 2049 6e66 6f2d 6469 "~/info" Info-di │ │ │ +0000f770: 7265 6374 6f72 792d 6c69 7374 2929 1f0a rectory-list)).. │ │ │ +0000f780: 2864 6566 7661 7220 496e 666f 2d64 6972 (defvar Info-dir │ │ │ +0000f790: 6563 746f 7279 2d6c 6973 7420 6e69 6c20 ectory-list nil │ │ │ +0000f7a0: 2823 2420 2e20 3632 3830 3429 290a 2340 (#$ . 62804)).#@ │ │ │ +0000f7b0: 3234 3320 456e 7465 7220 496e 666f 2c20 243 Enter Info, │ │ │ +0000f7c0: 7468 6520 646f 6375 6d65 6e74 6174 696f the documentatio │ │ │ +0000f7d0: 6e20 6272 6f77 7365 722e 0a4f 7074 696f n browser..Optio │ │ │ +0000f7e0: 6e61 6c20 6172 6775 6d65 6e74 2046 494c nal argument FIL │ │ │ +0000f7f0: 4520 7370 6563 6966 6965 7320 7468 6520 E specifies the │ │ │ +0000f800: 6669 6c65 2074 6f20 6578 616d 696e 653b file to examine; │ │ │ +0000f810: 0a74 6865 2064 6566 6175 6c74 2069 7320 .the default is │ │ │ +0000f820: 7468 6520 746f 702d 6c65 7665 6c20 6469 the top-level di │ │ │ +0000f830: 7265 6374 6f72 7920 6f66 2049 6e66 6f2e rectory of Info. │ │ │ +0000f840: 0a0a 496e 2069 6e74 6572 6163 7469 7665 ..In interactive │ │ │ +0000f850: 2075 7365 2c20 6120 7072 6566 6978 2061 use, a prefix a │ │ │ +0000f860: 7267 756d 656e 7420 6469 7265 6374 7320 rgument directs │ │ │ +0000f870: 7468 6973 2063 6f6d 6d61 6e64 0a74 6f20 this command.to │ │ │ +0000f880: 7265 6164 2061 2066 696c 6520 6e61 6d65 read a file name │ │ │ +0000f890: 2066 726f 6d20 7468 6520 6d69 6e69 6275 from the minibu │ │ │ +0000f8a0: 6666 6572 2e1f 0a28 6175 746f 6c6f 6164 ffer...(autoload │ │ │ +0000f8b0: 2027 696e 666f 2022 696e 666f 2220 2728 'info "info" '( │ │ │ +0000f8c0: 2324 202e 2036 3334 3132 2920 7420 6e69 #$ . 63412) t ni │ │ │ +0000f8d0: 6c29 0a23 4037 3120 456e 7465 7220 496e l).#@71 Enter In │ │ │ +0000f8e0: 666f 2c20 7468 6520 646f 6375 6d65 6e74 fo, the document │ │ │ +0000f8f0: 6174 696f 6e20 6272 6f77 7365 722e 2020 ation browser. │ │ │ +0000f900: 5072 6f6d 7074 2066 6f72 206e 616d 6520 Prompt for name │ │ │ +0000f910: 6f66 2049 6e66 6f20 6669 6c65 2e1f 0a28 of Info file...( │ │ │ +0000f920: 6175 746f 6c6f 6164 2027 496e 666f 2d71 autoload 'Info-q │ │ │ +0000f930: 7565 7279 2022 696e 666f 2220 2728 2324 uery "info" '(#$ │ │ │ +0000f940: 202e 2036 3337 3034 2920 7420 6e69 6c29 . 63704) t nil) │ │ │ +0000f950: 0a23 4033 3134 2047 6f20 746f 2061 6e20 .#@314 Go to an │ │ │ +0000f960: 696e 666f 206e 6f64 6520 7370 6563 6966 info node specif │ │ │ +0000f970: 6965 6420 6173 2073 6570 6172 6174 6520 ied as separate │ │ │ +0000f980: 4649 4c45 4e41 4d45 2061 6e64 204e 4f44 FILENAME and NOD │ │ │ +0000f990: 454e 414d 452e 0a4c 6f6f 6b20 666f 7220 ENAME..Look for │ │ │ +0000f9a0: 6120 706c 6175 7369 626c 6520 6669 6c65 a plausible file │ │ │ +0000f9b0: 6e61 6d65 2c20 6f72 2069 6620 6e6f 7420 name, or if not │ │ │ +0000f9c0: 666f 756e 6420 7468 656e 206c 6f6f 6b20 found then look │ │ │ +0000f9d0: 666f 7220 5552 4c27 7320 616e 640a 6469 for URL's and.di │ │ │ +0000f9e0: 7370 6174 6368 2074 6f20 7468 6520 6170 spatch to the ap │ │ │ +0000f9f0: 7072 6f70 7269 6174 6520 666e 2e20 204e propriate fn. N │ │ │ +0000fa00: 4f2d 474f 494e 472d 4241 434b 2069 7320 O-GOING-BACK is │ │ │ +0000fa10: 6e6f 6e2d 6e69 6c20 6966 0a72 6563 6f76 non-nil if.recov │ │ │ +0000fa20: 6572 696e 6720 6672 6f6d 2061 6e20 6572 ering from an er │ │ │ +0000fa30: 726f 7220 696e 2074 6869 7320 6675 6e63 ror in this func │ │ │ +0000fa40: 7469 6f6e 3b20 6974 2073 6179 7320 646f tion; it says do │ │ │ +0000fa50: 206e 6f74 2061 7474 656d 7074 0a66 7572 not attempt.fur │ │ │ +0000fa60: 7468 6572 2028 7265 6375 7273 6976 6529 ther (recursive) │ │ │ +0000fa70: 2065 7272 6f72 2072 6563 6f76 6572 792e error recovery. │ │ │ +0000fa80: 2020 5452 5946 494c 4520 6973 203f 3f1f TRYFILE is ??. │ │ │ +0000fa90: 0a28 6175 746f 6c6f 6164 2027 496e 666f .(autoload 'Info │ │ │ +0000faa0: 2d66 696e 642d 6e6f 6465 2022 696e 666f -find-node "info │ │ │ +0000fab0: 2220 2728 2324 202e 2036 3338 3331 2920 " '(#$ . 63831) │ │ │ +0000fac0: 6e69 6c20 6e69 6c29 0a23 4033 3031 2028 nil nil).#@301 ( │ │ │ +0000fad0: 5265 2962 7569 6c64 2060 6469 7227 2066 Re)build `dir' f │ │ │ +0000fae0: 696c 6573 2069 6e20 7468 6520 6469 7265 iles in the dire │ │ │ +0000faf0: 6374 6f72 6965 7320 7265 6d61 696e 696e ctories remainin │ │ │ +0000fb00: 6720 6f6e 2074 6865 2063 6f6d 6d61 6e64 g on the command │ │ │ +0000fb10: 206c 696e 652e 0a55 7365 2074 6869 7320 line..Use this │ │ │ +0000fb20: 6672 6f6d 2074 6865 2063 6f6d 6d61 6e64 from the command │ │ │ +0000fb30: 206c 696e 652c 2077 6974 6820 602d 6261 line, with `-ba │ │ │ +0000fb40: 7463 6827 2c20 6974 2077 6f6e 2774 2077 tch', it won't w │ │ │ +0000fb50: 6f72 6b20 696e 2061 6e0a 696e 7465 7261 ork in an.intera │ │ │ +0000fb60: 6374 6976 6520 5845 6d61 6373 2e0a 0a45 ctive XEmacs...E │ │ │ +0000fb70: 6163 6820 6669 6c65 2069 7320 7072 6f63 ach file is proc │ │ │ +0000fb80: 6573 7365 6420 6576 656e 2069 6620 616e essed even if an │ │ │ +0000fb90: 2065 7272 6f72 206f 6363 7572 7265 6420 error occurred │ │ │ +0000fba0: 7072 6576 696f 7573 6c79 2e20 466f 7220 previously. For │ │ │ +0000fbb0: 6578 616d 706c 652c 0a69 6e76 6f6b 6520 example,.invoke │ │ │ +0000fbc0: 2278 656d 6163 7320 2d62 6174 6368 202d "xemacs -batch - │ │ │ +0000fbd0: 6620 496e 666f 2d62 6174 6368 2d72 6562 f Info-batch-reb │ │ │ +0000fbe0: 7569 6c64 2d64 6972 202f 7573 722f 6c6f uild-dir /usr/lo │ │ │ +0000fbf0: 6361 6c2f 696e 666f 222e 1f0a 2861 7574 cal/info"...(aut │ │ │ +0000fc00: 6f6c 6f61 6420 2749 6e66 6f2d 6261 7463 oload 'Info-batc │ │ │ +0000fc10: 682d 7265 6275 696c 642d 6469 7220 2269 h-rebuild-dir "i │ │ │ +0000fc20: 6e66 6f22 2027 2823 2420 2e20 3634 3230 nfo" '(#$ . 6420 │ │ │ +0000fc30: 3729 206e 696c 206e 696c 290a 2340 3433 7) nil nil).#@43 │ │ │ +0000fc40: 3620 476f 2074 6f20 696e 666f 206e 6f64 6 Go to info nod │ │ │ +0000fc50: 6520 6e61 6d65 6420 4e41 4d45 2e20 2047 e named NAME. G │ │ │ +0000fc60: 6976 6520 6a75 7374 204e 4f44 454e 414d ive just NODENAM │ │ │ +0000fc70: 4520 6f72 2028 4649 4c45 4e41 4d45 294e E or (FILENAME)N │ │ │ +0000fc80: 4f44 454e 414d 452e 0a41 6374 7561 6c6c ODENAME..Actuall │ │ │ +0000fc90: 792c 2074 6865 2066 6f6c 6c6f 7769 6e67 y, the following │ │ │ +0000fca0: 2069 6e74 6572 7072 6574 6174 696f 6e73 interpretations │ │ │ +0000fcb0: 206f 6620 4e41 4d45 2061 7265 2074 7269 of NAME are tri │ │ │ +0000fcc0: 6564 2069 6e20 6f72 6465 723a 0a20 2020 ed in order:. │ │ │ +0000fcd0: 2028 4649 4c45 4e41 4d45 294e 4f44 454e (FILENAME)NODEN │ │ │ +0000fce0: 414d 450a 2020 2020 2846 494c 454e 414d AME. (FILENAM │ │ │ +0000fcf0: 4529 2020 2020 2028 7573 696e 6720 546f E) (using To │ │ │ +0000fd00: 7020 6e6f 6465 290a 2020 2020 4e4f 4445 p node). NODE │ │ │ +0000fd10: 4e41 4d45 2020 2020 2020 2028 696e 2063 NAME (in c │ │ │ +0000fd20: 7572 7265 6e74 2066 696c 6529 0a20 2020 urrent file). │ │ │ +0000fd30: 2054 4147 4e41 4d45 2020 2020 2020 2020 TAGNAME │ │ │ +0000fd40: 2873 6565 2062 656c 6f77 290a 2020 2020 (see below). │ │ │ +0000fd50: 4649 4c45 4e41 4d45 2020 2020 2020 2028 FILENAME ( │ │ │ +0000fd60: 7573 696e 6720 546f 7020 6e6f 6465 290a using Top node). │ │ │ +0000fd70: 7768 6572 6520 5441 474e 414d 4520 6973 where TAGNAME is │ │ │ +0000fd80: 2061 2073 7472 696e 6720 7468 6174 2061 a string that a │ │ │ +0000fd90: 7070 6561 7273 2069 6e20 7175 6f74 6573 ppears in quotes │ │ │ +0000fda0: 3a20 2254 4147 4e41 4d45 222c 2069 6e20 : "TAGNAME", in │ │ │ +0000fdb0: 616e 0a61 6e6e 6f74 6174 696f 6e20 666f an.annotation fo │ │ │ +0000fdc0: 7220 616e 7920 6e6f 6465 206f 6620 616e r any node of an │ │ │ +0000fdd0: 7920 6669 6c65 2e20 2028 5365 6520 6061 y file. (See `a │ │ │ +0000fde0: 2720 616e 6420 6078 2720 636f 6d6d 616e ' and `x' comman │ │ │ +0000fdf0: 6473 2e29 1f0a 2861 7574 6f6c 6f61 6420 ds.)..(autoload │ │ │ +0000fe00: 2749 6e66 6f2d 676f 746f 2d6e 6f64 6520 'Info-goto-node │ │ │ +0000fe10: 2269 6e66 6f22 2027 2823 2420 2e20 3634 "info" '(#$ . 64 │ │ │ +0000fe20: 3537 3829 2074 206e 696c 290a 2340 3330 578) t nil).#@30 │ │ │ +0000fe30: 2044 6972 6563 746c 7920 7669 7369 7420 Directly visit │ │ │ +0000fe40: 616e 2069 6e66 6f20 6669 6c65 2e1f 0a28 an info file...( │ │ │ +0000fe50: 6175 746f 6c6f 6164 2027 496e 666f 2d76 autoload 'Info-v │ │ │ +0000fe60: 6973 6974 2d66 696c 6520 2269 6e66 6f22 isit-file "info" │ │ │ +0000fe70: 2027 2823 2420 2e20 3635 3037 3329 2074 '(#$ . 65073) t │ │ │ +0000fe80: 206e 696c 290a 2340 3732 2053 6561 7263 nil).#@72 Searc │ │ │ +0000fe90: 6820 666f 7220 5245 4745 5850 2c20 7374 h for REGEXP, st │ │ │ +0000fea0: 6172 7469 6e67 2066 726f 6d20 706f 696e arting from poin │ │ │ +0000feb0: 742c 2061 6e64 2073 656c 6563 7420 6e6f t, and select no │ │ │ +0000fec0: 6465 2069 7427 7320 666f 756e 6420 696e de it's found in │ │ │ +0000fed0: 2e1f 0a28 6175 746f 6c6f 6164 2027 496e ...(autoload 'In │ │ │ +0000fee0: 666f 2d73 6561 7263 6820 2269 6e66 6f22 fo-search "info" │ │ │ +0000fef0: 2027 2823 2420 2e20 3635 3136 3329 2074 '(#$ . 65163) t │ │ │ +0000ff00: 206e 696c 290a 2340 3134 3220 4c6f 6f6b nil).#@142 Look │ │ │ +0000ff10: 2075 7020 616e 2045 6d61 6373 2063 6f6d up an Emacs com │ │ │ +0000ff20: 6d61 6e64 2069 6e20 7468 6520 456d 6163 mand in the Emac │ │ │ +0000ff30: 7320 6d61 6e75 616c 2069 6e20 7468 6520 s manual in the │ │ │ +0000ff40: 496e 666f 2073 7973 7465 6d2e 0a54 6869 Info system..Thi │ │ │ +0000ff50: 7320 636f 6d6d 616e 6420 6973 2064 6573 s command is des │ │ │ +0000ff60: 6967 6e65 6420 746f 2062 6520 7573 6564 igned to be used │ │ │ +0000ff70: 2077 6865 7468 6572 2079 6f75 2061 7265 whether you are │ │ │ +0000ff80: 2061 6c72 6561 6479 2069 6e20 496e 666f already in Info │ │ │ +0000ff90: 206f 7220 6e6f 742e 1f0a 2861 7574 6f6c or not...(autol │ │ │ +0000ffa0: 6f61 6420 2749 6e66 6f2d 656d 6163 732d oad 'Info-emacs- │ │ │ +0000ffb0: 636f 6d6d 616e 6420 2269 6e66 6f22 2027 command "info" ' │ │ │ +0000ffc0: 2823 2420 2e20 3635 3239 3229 2074 206e (#$ . 65292) t n │ │ │ +0000ffd0: 696c 290a 2340 3134 3220 4c6f 6f6b 2075 il).#@142 Look u │ │ │ +0000ffe0: 7020 616e 2045 6d61 6373 2063 6f6d 6d61 p an Emacs comma │ │ │ +0000fff0: 6e64 2069 6e20 7468 6520 456d 6163 7320 nd in the Emacs │ │ │ +00010000: 6d61 6e75 616c 2069 6e20 7468 6520 496e manual in the In │ │ │ +00010010: 666f 2073 7973 7465 6d2e 0a54 6869 7320 fo system..This │ │ │ +00010020: 636f 6d6d 616e 6420 6973 2064 6573 6967 command is desig │ │ │ +00010030: 6e65 6420 746f 2062 6520 7573 6564 2077 ned to be used w │ │ │ +00010040: 6865 7468 6572 2079 6f75 2061 7265 2061 hether you are a │ │ │ +00010050: 6c72 6561 6479 2069 6e20 496e 666f 206f lready in Info o │ │ │ +00010060: 7220 6e6f 742e 1f0a 2861 7574 6f6c 6f61 r not...(autoloa │ │ │ +00010070: 6420 2749 6e66 6f2d 676f 746f 2d65 6d61 d 'Info-goto-ema │ │ │ +00010080: 6373 2d63 6f6d 6d61 6e64 2d6e 6f64 6520 cs-command-node │ │ │ +00010090: 2269 6e66 6f22 2027 2823 2420 2e20 3635 "info" '(#$ . 65 │ │ │ +000100a0: 3439 3829 2074 206e 696c 290a 2340 3134 498) t nil).#@14 │ │ │ +000100b0: 3720 4c6f 6f6b 2075 7020 616e 2045 6d61 7 Look up an Ema │ │ │ +000100c0: 6373 206b 6579 2073 6571 7565 6e63 6520 cs key sequence │ │ │ +000100d0: 696e 2074 6865 2045 6d61 6373 206d 616e in the Emacs man │ │ │ +000100e0: 7561 6c20 696e 2074 6865 2049 6e66 6f20 ual in the Info │ │ │ +000100f0: 7379 7374 656d 2e0a 5468 6973 2063 6f6d system..This com │ │ │ +00010100: 6d61 6e64 2069 7320 6465 7369 676e 6564 mand is designed │ │ │ +00010110: 2074 6f20 6265 2075 7365 6420 7768 6574 to be used whet │ │ │ +00010120: 6865 7220 796f 7520 6172 6520 616c 7265 her you are alre │ │ │ +00010130: 6164 7920 696e 2049 6e66 6f20 6f72 206e ady in Info or n │ │ │ +00010140: 6f74 2e1f 0a28 6175 746f 6c6f 6164 2027 ot...(autoload ' │ │ │ +00010150: 496e 666f 2d67 6f74 6f2d 656d 6163 732d Info-goto-emacs- │ │ │ +00010160: 6b65 792d 636f 6d6d 616e 642d 6e6f 6465 key-command-node │ │ │ +00010170: 2022 696e 666f 2220 2728 2324 202e 2036 "info" '(#$ . 6 │ │ │ +00010180: 3537 3134 2920 7420 6e69 6c29 0a23 4031 5714) t nil).#@1 │ │ │ +00010190: 3437 204c 6f6f 6b20 7570 2061 6e20 456d 47 Look up an Em │ │ │ +000101a0: 6163 7320 6b65 7920 7365 7175 656e 6365 acs key sequence │ │ │ +000101b0: 2069 6e20 7468 6520 456d 6163 7320 6d61 in the Emacs ma │ │ │ +000101c0: 6e75 616c 2069 6e20 7468 6520 496e 666f nual in the Info │ │ │ +000101d0: 2073 7973 7465 6d2e 0a54 6869 7320 636f system..This co │ │ │ +000101e0: 6d6d 616e 6420 6973 2064 6573 6967 6e65 mmand is designe │ │ │ +000101f0: 6420 746f 2062 6520 7573 6564 2077 6865 d to be used whe │ │ │ +00010200: 7468 6572 2079 6f75 2061 7265 2061 6c72 ther you are alr │ │ │ +00010210: 6561 6479 2069 6e20 496e 666f 206f 7220 eady in Info or │ │ │ +00010220: 6e6f 742e 1f0a 2861 7574 6f6c 6f61 6420 not...(autoload │ │ │ +00010230: 2749 6e66 6f2d 656d 6163 732d 6b65 7920 'Info-emacs-key │ │ │ +00010240: 2269 6e66 6f22 2027 2823 2420 2e20 3635 "info" '(#$ . 65 │ │ │ +00010250: 3933 3929 2074 206e 696c 290a 2340 3134 939) t nil).#@14 │ │ │ +00010260: 3820 4c6f 6f6b 2075 7020 616e 2045 6d61 8 Look up an Ema │ │ │ +00010270: 6373 204c 6973 7020 6675 6e63 7469 6f6e cs Lisp function │ │ │ +00010280: 2069 6e20 7468 6520 456c 6973 7020 6d61 in the Elisp ma │ │ │ +00010290: 6e75 616c 2069 6e20 7468 6520 496e 666f nual in the Info │ │ │ +000102a0: 2073 7973 7465 6d2e 0a54 6869 7320 636f system..This co │ │ │ +000102b0: 6d6d 616e 6420 6973 2064 6573 6967 6e65 mmand is designe │ │ │ +000102c0: 6420 746f 2062 6520 7573 6564 2077 6865 d to be used whe │ │ │ +000102d0: 7468 6572 2079 6f75 2061 7265 2061 6c72 ther you are alr │ │ │ +000102e0: 6561 6479 2069 6e20 496e 666f 206f 7220 eady in Info or │ │ │ +000102f0: 6e6f 742e 1f0a 2861 7574 6f6c 6f61 6420 not...(autoload │ │ │ +00010300: 2749 6e66 6f2d 656c 6973 702d 7265 6620 'Info-elisp-ref │ │ │ +00010310: 2269 6e66 6f22 2027 2823 2420 2e20 3636 "info" '(#$ . 66 │ │ │ +00010320: 3134 3629 2074 206e 696c 290a 2340 3435 146) t nil).#@45 │ │ │ +00010330: 3320 4765 6e65 7261 7465 7320 7468 6520 3 Generates the │ │ │ +00010340: 6046 6f6e 7427 2c20 6053 697a 6527 2c20 `Font', `Size', │ │ │ +00010350: 616e 6420 6057 6569 6768 7427 2073 7562 and `Weight' sub │ │ │ +00010360: 6d65 6e75 7320 666f 7220 7468 6520 4f70 menus for the Op │ │ │ +00010370: 7469 6f6e 7320 6d65 6e75 2e0a 5468 6973 tions menu..This │ │ │ +00010380: 2069 7320 7275 6e20 7468 6520 6669 7273 is run the firs │ │ │ +00010390: 7420 7469 6d65 2074 6861 7420 6120 666f t time that a fo │ │ │ +000103a0: 6e74 2d6d 656e 7520 6973 206e 6565 6465 nt-menu is neede │ │ │ +000103b0: 6420 666f 7220 6561 6368 2064 6576 6963 d for each devic │ │ │ +000103c0: 652e 0a49 6620 796f 7520 646f 6e27 7420 e..If you don't │ │ │ +000103d0: 6c69 6b65 2074 6865 206c 617a 7920 696e like the lazy in │ │ │ +000103e0: 766f 6361 7469 6f6e 206f 6620 7468 6973 vocation of this │ │ │ +000103f0: 2066 756e 6374 696f 6e2c 2079 6f75 2063 function, you c │ │ │ +00010400: 616e 2061 6464 2069 7420 746f 0a60 6372 an add it to.`cr │ │ │ +00010410: 6561 7465 2d64 6576 6963 652d 686f 6f6b eate-device-hook │ │ │ +00010420: 2720 616e 6420 7468 6174 2077 696c 6c20 ' and that will │ │ │ +00010430: 6d61 6b65 2074 6865 2066 6f6e 7420 6d65 make the font me │ │ │ +00010440: 6e75 7320 7265 7370 6f6e 6420 6d6f 7265 nus respond more │ │ │ +00010450: 2071 7569 636b 6c79 0a77 6865 6e20 7468 quickly.when th │ │ │ +00010460: 6579 2061 7265 2073 656c 6563 7465 6420 ey are selected │ │ │ +00010470: 666f 7220 7468 6520 6669 7273 7420 7469 for the first ti │ │ │ +00010480: 6d65 2e20 2049 6620 796f 7520 6164 6420 me. If you add │ │ │ +00010490: 666f 6e74 7320 746f 2079 6f75 7220 7379 fonts to your sy │ │ │ +000104a0: 7374 656d 2c20 0a6f 7220 6966 2079 6f75 stem, .or if you │ │ │ +000104b0: 2063 6861 6e67 6520 796f 7572 2066 6f6e change your fon │ │ │ +000104c0: 7420 7061 7468 2c20 796f 7520 6361 6e20 t path, you can │ │ │ +000104d0: 6361 6c6c 2074 6869 7320 746f 2072 652d call this to re- │ │ │ +000104e0: 696e 6974 6961 6c69 7a65 2074 6865 206d initialize the m │ │ │ +000104f0: 656e 7573 2e1f 0a28 6175 746f 6c6f 6164 enus...(autoload │ │ │ +00010500: 2027 6d73 7769 6e64 6f77 732d 7265 7365 'mswindows-rese │ │ │ +00010510: 742d 6465 7669 6365 2d66 6f6e 742d 6d65 t-device-font-me │ │ │ +00010520: 6e75 7320 226d 7377 2d66 6f6e 742d 6d65 nus "msw-font-me │ │ │ +00010530: 6e75 2220 2728 2324 202e 2036 3633 3534 nu" '(#$ . 66354 │ │ │ +00010540: 2920 6e69 6c20 6e69 6c29 0a28 6279 7465 ) nil nil).(byte │ │ │ +00010550: 2d63 6f64 6520 22c0 c1c2 c389 8925 8722 -code "......%." │ │ │ +00010560: 205b 6175 746f 6c6f 6164 206d 7377 696e [autoload mswin │ │ │ +00010570: 646f 7773 2d66 6f6e 742d 6d65 6e75 2d66 dows-font-menu-f │ │ │ +00010580: 6f6e 742d 6461 7461 2022 6d73 772d 666f ont-data "msw-fo │ │ │ +00010590: 6e74 2d6d 656e 7522 206e 696c 5d20 3629 nt-menu" nil] 6) │ │ │ +000105a0: 0a23 4032 3920 456e 6162 6c65 206d 6f75 .#@29 Enable mou │ │ │ +000105b0: 7365 2077 6865 656c 2073 7570 706f 7274 se wheel support │ │ │ +000105c0: 2e1f 0a28 6175 746f 6c6f 6164 2027 6d77 ...(autoload 'mw │ │ │ +000105d0: 6865 656c 2d69 6e73 7461 6c6c 2022 6d77 heel-install "mw │ │ │ +000105e0: 6865 656c 2220 2728 2324 202e 2036 3639 heel" '(#$ . 669 │ │ │ +000105f0: 3832 2920 7420 6e69 6c29 0a23 4036 3720 82) t nil).#@67 │ │ │ +00010600: 496e 7374 616c 6c20 6120 7072 652d 6279 Install a pre-by │ │ │ +00010610: 7465 636f 6d70 696c 6564 2058 456d 6163 tecompiled XEmac │ │ │ +00010620: 7320 7061 636b 6167 6520 696e 746f 2070 s package into p │ │ │ +00010630: 6163 6b61 6765 2068 6965 7261 7263 6879 ackage hierarchy │ │ │ +00010640: 2e1f 0a28 6175 746f 6c6f 6164 2027 7061 ...(autoload 'pa │ │ │ +00010650: 636b 6167 652d 6164 6d69 6e2d 6164 642d ckage-admin-add- │ │ │ +00010660: 6269 6e61 7279 2d70 6163 6b61 6765 2022 binary-package " │ │ │ +00010670: 7061 636b 6167 652d 6164 6d69 6e22 2027 package-admin" ' │ │ │ +00010680: 2823 2420 2e20 3637 3037 3229 2074 206e (#$ . 67072) t n │ │ │ +00010690: 696c 290a 2340 3133 3139 204c 6973 7420 il).#@1319 List │ │ │ +000106a0: 6f66 2070 6163 6b61 6765 7320 7468 6174 of packages that │ │ │ +000106b0: 2061 7265 2069 6e73 7461 6c6c 6564 2061 are installed a │ │ │ +000106c0: 7420 7468 6973 2073 6974 652e 0a46 6f72 t this site..For │ │ │ +000106d0: 2065 6163 6820 656c 656d 656e 7420 696e each element in │ │ │ +000106e0: 2074 6865 2061 6c69 7374 2c20 2063 6172 the alist, car │ │ │ +000106f0: 2069 7320 7468 6520 7061 636b 6167 6520 is the package │ │ │ +00010700: 6e61 6d65 2061 6e64 2074 6865 2063 6472 name and the cdr │ │ │ +00010710: 2069 730a 6120 706c 6973 7420 636f 6e74 is.a plist cont │ │ │ +00010720: 6169 6e69 6e67 2069 6e66 6f72 6d61 7469 aining informati │ │ │ +00010730: 6f6e 2061 626f 7574 2074 6865 2070 6163 on about the pac │ │ │ +00010740: 6b61 6765 2e20 2020 5479 7069 6361 6c20 kage. Typical │ │ │ +00010750: 6669 656c 6473 0a6b 6570 7420 696e 2074 fields.kept in t │ │ │ +00010760: 6865 2070 6c69 7374 2061 7265 3a0a 0a76 he plist are:..v │ │ │ +00010770: 6572 7369 6f6e 0909 2d20 7665 7273 696f ersion..- versio │ │ │ +00010780: 6e20 6f66 2074 6869 7320 7061 636b 6167 n of this packag │ │ │ +00010790: 650a 7072 6f76 6964 6573 092d 206c 6973 e.provides.- lis │ │ │ +000107a0: 7420 6f66 2073 796d 626f 6c73 2070 726f t of symbols pro │ │ │ +000107b0: 7669 6465 640a 7265 7175 6972 6573 092d vided.requires.- │ │ │ +000107c0: 206c 6973 7420 6f66 2073 796d 626f 6c73 list of symbols │ │ │ +000107d0: 2074 6861 7420 6172 6520 7265 7175 6972 that are requir │ │ │ +000107e0: 6564 2e0a 0909 2020 5468 6573 6520 696e ed.... These in │ │ │ +000107f0: 2074 7572 6e20 6172 6520 7072 6f76 6964 turn are provid │ │ │ +00010800: 6564 2062 7920 6f74 6865 7220 7061 636b ed by other pack │ │ │ +00010810: 6167 6573 2e0a 6669 6c65 6e61 6d65 092d ages..filename.- │ │ │ +00010820: 206e 616d 6520 6f66 2074 6865 2066 696c name of the fil │ │ │ +00010830: 652e 0a73 697a 6509 092d 2073 697a 6520 e..size..- size │ │ │ +00010840: 6f66 2074 6865 2066 696c 6520 2861 6b61 of the file (aka │ │ │ +00010850: 2074 6865 2062 756e 646c 6564 2070 6163 the bundled pac │ │ │ +00010860: 6b61 6765 290a 6d64 3573 756d 0909 2d20 kage).md5sum..- │ │ │ +00010870: 636f 6d70 7574 6564 206d 6435 2063 6865 computed md5 che │ │ │ +00010880: 636b 7375 6d0a 6465 7363 7269 7074 696f cksum.descriptio │ │ │ +00010890: 6e09 2d20 5768 6174 2074 6869 7320 7061 n.- What this pa │ │ │ +000108a0: 636b 6167 6520 6973 2066 6f72 2e0a 7479 ckage is for..ty │ │ │ +000108b0: 7065 0909 2d20 5768 6574 6865 7220 7468 pe..- Whether th │ │ │ +000108c0: 6973 2069 7320 6120 2762 696e 6172 7920 is is a 'binary │ │ │ +000108d0: 2864 6566 6175 6c74 2920 6f72 2027 7369 (default) or 'si │ │ │ +000108e0: 6e67 6c65 2066 696c 6520 7061 636b 6167 ngle file packag │ │ │ +000108f0: 650a 0a4d 6f72 6520 6669 656c 6473 206d e..More fields m │ │ │ +00010900: 6179 2062 6520 6164 6465 6420 6173 206e ay be added as n │ │ │ +00010910: 6565 6465 642e 2020 416e 2065 7861 6d70 eeded. An examp │ │ │ +00010920: 6c65 3a0a 0a27 280a 2028 6e61 6d65 0a20 le:..'(. (name. │ │ │ +00010930: 2028 7665 7273 696f 6e20 223c 7665 7273 (version "". file │ │ │ +00010950: 2266 696c 656e 616d 6522 0a20 2020 6465 "filename". de │ │ │ +00010960: 7363 7269 7074 696f 6e20 2277 6861 7420 scription "what │ │ │ +00010970: 7468 6973 2070 6163 6b61 6765 2069 7320 this package is │ │ │ +00010980: 6162 6f75 742e 220a 2020 2070 726f 7669 about.". provi │ │ │ +00010990: 6465 7320 283c 6c69 7374 3e29 0a20 2020 des (). │ │ │ +000109a0: 7265 7175 6972 6573 2028 3c6c 6973 743e requires ( │ │ │ +000109b0: 290a 2020 2073 697a 6520 3c69 6e74 6567 ). size . md5 │ │ │ +000109d0: 7375 6d20 223c 6368 6563 6b73 756d 220a sum "". │ │ │ +00010a10: 6669 6c65 2022 6669 6c65 6e61 6d65 220a file "filename". │ │ │ +00010a20: 2020 2064 6573 6372 6970 7469 6f6e 2022 description " │ │ │ +00010a30: 7768 6174 2074 6869 7320 7061 636b 6167 what this packag │ │ │ +00010a40: 6520 6973 2061 626f 7574 2e22 0a20 2020 e is about.". │ │ │ +00010a50: 7072 6f76 6964 6573 2028 3c6c 6973 743e provides ( │ │ │ +00010a60: 290a 2020 2072 6571 7569 7265 7320 283c ). requires (< │ │ │ +00010a70: 6c69 7374 3e29 0a20 2020 7369 7a65 203c list>). size < │ │ │ +00010a80: 696e 7465 6765 722d 6279 7465 733e 0a20 integer-bytes>. │ │ │ +00010a90: 2020 6d64 3573 756d 2022 3c63 6865 636b md5sum ". Move right │ │ │ +00014ea0: 6166 7465 7220 696e 7365 7274 696f 6e2e after insertion. │ │ │ +00014eb0: 0a20 2043 2d63 205e 0920 204d 6f76 6520 . C-c ^. Move │ │ │ +00014ec0: 7570 2061 6674 6572 2069 6e73 6572 7469 up after inserti │ │ │ +00014ed0: 6f6e 2e0a 2020 432d 6320 2e09 2020 4d6f on.. C-c .. Mo │ │ │ +00014ee0: 7665 2064 6f77 6e20 6166 7465 7220 696e ve down after in │ │ │ +00014ef0: 7365 7274 696f 6e2e 0a20 2043 2d63 2060 sertion.. C-c ` │ │ │ +00014f00: 0920 204d 6f76 6520 6e6f 7274 6877 6573 . Move northwes │ │ │ +00014f10: 7420 286e 7729 2061 6674 6572 2069 6e73 t (nw) after ins │ │ │ +00014f20: 6572 7469 6f6e 2e0a 2020 432d 6320 2709 ertion.. C-c '. │ │ │ +00014f30: 2020 4d6f 7665 206e 6f72 7468 6561 7374 Move northeast │ │ │ +00014f40: 2028 6e65 2920 6166 7465 7220 696e 7365 (ne) after inse │ │ │ +00014f50: 7274 696f 6e2e 0a20 2043 2d63 202f 0920 rtion.. C-c /. │ │ │ +00014f60: 204d 6f76 6520 736f 7574 6877 6573 7420 Move southwest │ │ │ +00014f70: 2873 7729 2061 6674 6572 2069 6e73 6572 (sw) after inser │ │ │ +00014f80: 7469 6f6e 2e0a 2020 432d 6320 5c20 2020 tion.. C-c \ │ │ │ +00014f90: 4d6f 7665 2073 6f75 7468 6561 7374 2028 Move southeast ( │ │ │ +00014fa0: 7365 2920 6166 7465 7220 696e 7365 7274 se) after insert │ │ │ +00014fb0: 696f 6e2e 0a54 6865 2063 7572 7265 6e74 ion..The current │ │ │ +00014fc0: 2064 6972 6563 7469 6f6e 2069 7320 6469 direction is di │ │ │ +00014fd0: 7370 6c61 7965 6420 696e 2074 6865 206d splayed in the m │ │ │ +00014fe0: 6f64 656c 696e 652e 2020 5468 6520 696e odeline. The in │ │ │ +00014ff0: 6974 6961 6c0a 6469 7265 6374 696f 6e20 itial.direction │ │ │ +00015000: 6973 2072 6967 6874 2e20 2057 6869 7465 is right. White │ │ │ +00015010: 7370 6163 6520 6973 2069 6e73 6572 7465 space is inserte │ │ │ +00015020: 6420 616e 6420 7461 6273 2061 7265 2063 d and tabs are c │ │ │ +00015030: 6861 6e67 6564 2074 6f0a 7370 6163 6573 hanged to.spaces │ │ │ +00015040: 2077 6865 6e20 7265 7175 6972 6564 2062 when required b │ │ │ +00015050: 7920 6d6f 7665 6d65 6e74 2e20 2059 6f75 y movement. You │ │ │ +00015060: 2063 616e 206d 6f76 6520 6172 6f75 6e64 can move around │ │ │ +00015070: 2069 6e20 7468 6520 6275 6666 6572 0a77 in the buffer.w │ │ │ +00015080: 6974 6820 7468 6573 6520 636f 6d6d 616e ith these comman │ │ │ +00015090: 6473 3a0a 2020 5c5b 7069 6374 7572 652d ds:. \[picture- │ │ │ +000150a0: 6d6f 7665 2d64 6f77 6e5d 0920 204d 6f76 move-down]. Mov │ │ │ +000150b0: 6520 7665 7274 6963 616c 6c79 2074 6f20 e vertically to │ │ │ +000150c0: 5341 4d45 2063 6f6c 756d 6e20 696e 2070 SAME column in p │ │ │ +000150d0: 7265 7669 6f75 7320 6c69 6e65 2e0a 2020 revious line.. │ │ │ +000150e0: 5c5b 7069 6374 7572 652d 6d6f 7665 2d75 \[picture-move-u │ │ │ +000150f0: 705d 0920 204d 6f76 6520 7665 7274 6963 p]. Move vertic │ │ │ +00015100: 616c 6c79 2074 6f20 5341 4d45 2063 6f6c ally to SAME col │ │ │ +00015110: 756d 6e20 696e 206e 6578 7420 6c69 6e65 umn in next line │ │ │ +00015120: 2e0a 2020 5c5b 7069 6374 7572 652d 656e .. \[picture-en │ │ │ +00015130: 642d 6f66 2d6c 696e 655d 0920 204d 6f76 d-of-line]. Mov │ │ │ +00015140: 6520 746f 2063 6f6c 756d 6e20 666f 6c6c e to column foll │ │ │ +00015150: 6f77 696e 6720 6c61 7374 206e 6f6e 2d77 owing last non-w │ │ │ +00015160: 6869 7465 7370 6163 6520 6368 6172 6163 hitespace charac │ │ │ +00015170: 7465 722e 0a20 205c 5b70 6963 7475 7265 ter.. \[picture │ │ │ +00015180: 2d66 6f72 7761 7264 2d63 6f6c 756d 6e5d -forward-column] │ │ │ +00015190: 0920 204d 6f76 6520 7269 6768 7420 696e . Move right in │ │ │ +000151a0: 7365 7274 696e 6720 7370 6163 6573 2069 serting spaces i │ │ │ +000151b0: 6620 7265 7175 6972 6564 2e0a 2020 5c5b f required.. \[ │ │ │ +000151c0: 7069 6374 7572 652d 6261 636b 7761 7264 picture-backward │ │ │ +000151d0: 2d63 6f6c 756d 6e5d 0920 204d 6f76 6520 -column]. Move │ │ │ +000151e0: 6c65 6674 2063 6861 6e67 696e 6720 7461 left changing ta │ │ │ +000151f0: 6273 2074 6f20 7370 6163 6573 2069 6620 bs to spaces if │ │ │ +00015200: 7265 7175 6972 6564 2e0a 2020 432d 6320 required.. C-c │ │ │ +00015210: 432d 6620 4d6f 7665 2069 6e20 6469 7265 C-f Move in dire │ │ │ +00015220: 6374 696f 6e20 6f66 2063 7572 7265 6e74 ction of current │ │ │ +00015230: 2070 6963 7475 7265 206d 6f74 696f 6e2e picture motion. │ │ │ +00015240: 0a20 2043 2d63 2043 2d62 204d 6f76 6520 . C-c C-b Move │ │ │ +00015250: 696e 206f 7070 6f73 6974 6520 6469 7265 in opposite dire │ │ │ +00015260: 6374 696f 6e20 6f66 2063 7572 7265 6e74 ction of current │ │ │ +00015270: 2070 6963 7475 7265 206d 6f74 696f 6e2e picture motion. │ │ │ +00015280: 0a20 2052 6574 7572 6e20 204d 6f76 6520 . Return Move │ │ │ +00015290: 746f 2062 6567 696e 6e69 6e67 206f 6620 to beginning of │ │ │ +000152a0: 6e65 7874 206c 696e 652e 0a59 6f75 2063 next line..You c │ │ │ +000152b0: 616e 2065 6469 7420 7461 6275 6c61 7220 an edit tabular │ │ │ +000152c0: 7465 7874 2077 6974 6820 7468 6573 6520 text with these │ │ │ +000152d0: 636f 6d6d 616e 6473 3a0a 2020 4d2d 5461 commands:. M-Ta │ │ │ +000152e0: 6209 2020 4d6f 7665 2074 6f20 636f 6c75 b. Move to colu │ │ │ +000152f0: 6d6e 2062 656e 6561 7468 2028 6f72 2061 mn beneath (or a │ │ │ +00015300: 7429 206e 6578 7420 696e 7465 7265 7374 t) next interest │ │ │ +00015310: 696e 6720 6368 6172 6163 7465 722e 0a09 ing character... │ │ │ +00015320: 2020 2020 6049 6e64 656e 7473 2720 7265 `Indents' re │ │ │ +00015330: 6c61 7469 7665 2074 6f20 6120 7072 6576 lative to a prev │ │ │ +00015340: 696f 7573 206c 696e 652e 0a20 2054 6162 ious line.. Tab │ │ │ +00015350: 0920 204d 6f76 6520 746f 206e 6578 7420 . Move to next │ │ │ +00015360: 7374 6f70 2069 6e20 7461 6220 7374 6f70 stop in tab stop │ │ │ +00015370: 206c 6973 742e 0a20 2043 2d63 2054 6162 list.. C-c Tab │ │ │ +00015380: 2053 6574 2074 6162 2073 746f 7073 2061 Set tab stops a │ │ │ +00015390: 6363 6f72 6469 6e67 2074 6f20 636f 6e74 ccording to cont │ │ │ +000153a0: 6578 7420 6f66 2074 6869 7320 6c69 6e65 ext of this line │ │ │ +000153b0: 2e0a 0920 2020 2057 6974 6820 4152 4720 ... With ARG │ │ │ +000153c0: 7265 7365 7473 2074 6162 2073 746f 7073 resets tab stops │ │ │ +000153d0: 2074 6f20 6465 6661 756c 7420 2867 6c6f to default (glo │ │ │ +000153e0: 6261 6c29 2076 616c 7565 2e0a 0920 2020 bal) value... │ │ │ +000153f0: 2053 6565 2061 6c73 6f20 646f 6375 6d65 See also docume │ │ │ +00015400: 6e74 6174 696f 6e20 6f66 2076 6172 6961 ntation of varia │ │ │ +00015410: 626c 6509 7069 6374 7572 652d 7461 622d ble.picture-tab- │ │ │ +00015420: 6368 6172 730a 0920 2020 2077 6869 6368 chars.. which │ │ │ +00015430: 2064 6566 696e 6573 2022 696e 7465 7265 defines "intere │ │ │ +00015440: 7374 696e 6720 6368 6172 6163 7465 7222 sting character" │ │ │ +00015450: 2e20 2059 6f75 2063 616e 206d 616e 7561 . You can manua │ │ │ +00015460: 6c6c 790a 0920 2020 2063 6861 6e67 6520 lly.. change │ │ │ +00015470: 7468 6520 7461 6220 7374 6f70 206c 6973 the tab stop lis │ │ │ +00015480: 7420 7769 7468 2063 6f6d 6d61 6e64 205c t with command \ │ │ │ +00015490: 5b65 6469 742d 7461 622d 7374 6f70 735d [edit-tab-stops] │ │ │ +000154a0: 2e0a 596f 7520 6361 6e20 6d61 6e69 7075 ..You can manipu │ │ │ +000154b0: 6c61 7465 2074 6578 7420 7769 7468 2074 late text with t │ │ │ +000154c0: 6865 7365 2063 6f6d 6d61 6e64 733a 0a20 hese commands:. │ │ │ +000154d0: 2043 2d64 0920 2043 6c65 6172 2028 7265 C-d. Clear (re │ │ │ +000154e0: 706c 6163 6529 2041 5247 2063 6f6c 756d place) ARG colum │ │ │ +000154f0: 6e73 2061 6674 6572 2070 6f69 6e74 2077 ns after point w │ │ │ +00015500: 6974 686f 7574 206d 6f76 696e 672e 0a20 ithout moving.. │ │ │ +00015510: 2043 2d63 2043 2d64 2044 656c 6574 6520 C-c C-d Delete │ │ │ +00015520: 6368 6172 2061 7420 706f 696e 7420 2d20 char at point - │ │ │ +00015530: 7468 6520 636f 6d6d 616e 6420 6e6f 726d the command norm │ │ │ +00015540: 616c 6c79 2061 7373 6967 6e65 6420 746f ally assigned to │ │ │ +00015550: 2043 2d64 2e0a 2020 5c5b 7069 6374 7572 C-d.. \[pictur │ │ │ +00015560: 652d 6261 636b 7761 7264 2d63 6c65 6172 e-backward-clear │ │ │ +00015570: 2d63 6f6c 756d 6e5d 2020 436c 6561 7220 -column] Clear │ │ │ +00015580: 2872 6570 6c61 6365 2920 4152 4720 636f (replace) ARG co │ │ │ +00015590: 6c75 6d6e 7320 6265 666f 7265 2070 6f69 lumns before poi │ │ │ +000155a0: 6e74 2c20 6d6f 7669 6e67 2062 6163 6b20 nt, moving back │ │ │ +000155b0: 6f76 6572 2074 6865 6d2e 0a20 205c 5b70 over them.. \[p │ │ │ +000155c0: 6963 7475 7265 2d63 6c65 6172 2d6c 696e icture-clear-lin │ │ │ +000155d0: 655d 0920 2043 6c65 6172 2041 5247 206c e]. Clear ARG l │ │ │ +000155e0: 696e 6573 2c20 6164 7661 6e63 696e 6720 ines, advancing │ │ │ +000155f0: 6f76 6572 2074 6865 6d2e 0920 5468 6520 over them.. The │ │ │ +00015600: 636c 6561 7265 640a 0920 2020 2074 6578 cleared.. tex │ │ │ +00015610: 7420 6973 2073 6176 6564 2069 6e20 7468 t is saved in th │ │ │ +00015620: 6520 6b69 6c6c 2072 696e 672e 0a20 205c e kill ring.. \ │ │ │ +00015630: 5b70 6963 7475 7265 2d6f 7065 6e2d 6c69 [picture-open-li │ │ │ +00015640: 6e65 5d09 2020 4f70 656e 2062 6c61 6e6b ne]. Open blank │ │ │ +00015650: 206c 696e 6528 7329 2062 656e 6561 7468 line(s) beneath │ │ │ +00015660: 2063 7572 7265 6e74 206c 696e 652e 0a59 current line..Y │ │ │ +00015670: 6f75 2063 616e 206d 616e 6970 756c 6174 ou can manipulat │ │ │ +00015680: 6520 7265 6374 616e 676c 6573 2077 6974 e rectangles wit │ │ │ +00015690: 6820 7468 6573 6520 636f 6d6d 616e 6473 h these commands │ │ │ +000156a0: 3a0a 2020 432d 6320 432d 6b20 436c 6561 :. C-c C-k Clea │ │ │ +000156b0: 7220 286f 7220 6b69 6c6c 2920 6120 7265 r (or kill) a re │ │ │ +000156c0: 6374 616e 676c 6520 616e 6420 7361 7665 ctangle and save │ │ │ +000156d0: 2069 742e 0a20 2043 2d63 2043 2d77 204c it.. C-c C-w L │ │ │ +000156e0: 696b 6520 432d 6320 432d 6b20 6578 6365 ike C-c C-k exce │ │ │ +000156f0: 7074 2072 6563 7461 6e67 6c65 2069 7320 pt rectangle is │ │ │ +00015700: 7361 7665 6420 696e 206e 616d 6564 2072 saved in named r │ │ │ +00015710: 6567 6973 7465 722e 0a20 2043 2d63 2043 egister.. C-c C │ │ │ +00015720: 2d79 204f 7665 726c 6179 2028 6f72 2069 -y Overlay (or i │ │ │ +00015730: 6e73 6572 7429 2063 7572 7265 6e74 6c79 nsert) currently │ │ │ +00015740: 2073 6176 6564 2072 6563 7461 6e67 6c65 saved rectangle │ │ │ +00015750: 2061 7420 706f 696e 742e 0a20 2043 2d63 at point.. C-c │ │ │ +00015760: 2043 2d78 204c 696b 6520 432d 6320 432d C-x Like C-c C- │ │ │ +00015770: 7920 6578 6365 7074 2072 6563 7461 6e67 y except rectang │ │ │ +00015780: 6c65 2069 7320 7461 6b65 6e20 6672 6f6d le is taken from │ │ │ +00015790: 206e 616d 6564 2072 6567 6973 7465 722e named register. │ │ │ +000157a0: 0a20 205c 5b63 6f70 792d 7265 6374 616e . \[copy-rectan │ │ │ +000157b0: 676c 652d 746f 2d72 6567 6973 7465 725d gle-to-register] │ │ │ +000157c0: 2020 2043 6f70 6965 7320 6120 7265 6374 Copies a rect │ │ │ +000157d0: 616e 676c 6520 746f 2061 2072 6567 6973 angle to a regis │ │ │ +000157e0: 7465 722e 0a20 205c 5b61 6476 6572 7469 ter.. \[adverti │ │ │ +000157f0: 7365 642d 756e 646f 5d20 2020 4361 6e20 sed-undo] Can │ │ │ +00015800: 756e 646f 2065 6666 6563 7473 206f 6620 undo effects of │ │ │ +00015810: 7265 6374 616e 676c 6520 6f76 6572 6c61 rectangle overla │ │ │ +00015820: 7920 636f 6d6d 616e 6473 0a09 2020 2020 y commands.. │ │ │ +00015830: 636f 6d6d 616e 6473 2069 6620 696e 766f commands if invo │ │ │ +00015840: 6b65 6420 736f 6f6e 2065 6e6f 7567 682e ked soon enough. │ │ │ +00015850: 0a59 6f75 2063 616e 2072 6574 7572 6e20 .You can return │ │ │ +00015860: 746f 2074 6865 2070 7265 7669 6f75 7320 to the previous │ │ │ +00015870: 6d6f 6465 2077 6974 683a 0a20 2043 2d63 mode with:. C-c │ │ │ +00015880: 2043 2d63 2057 6869 6368 2061 6c73 6f20 C-c Which also │ │ │ +00015890: 7374 7269 7073 2074 7261 696c 696e 6720 strips trailing │ │ │ +000158a0: 7768 6974 6573 7061 6365 2066 726f 6d20 whitespace from │ │ │ +000158b0: 6576 6572 7920 6c69 6e65 2e0a 0920 2020 every line... │ │ │ +000158c0: 2053 7472 6970 7069 6e67 2069 7320 7375 Stripping is su │ │ │ +000158d0: 7070 7265 7373 6564 2062 7920 7375 7070 ppressed by supp │ │ │ +000158e0: 6c79 696e 6720 616e 2061 7267 756d 656e lying an argumen │ │ │ +000158f0: 742e 0a0a 456e 7472 7920 746f 2074 6869 t...Entry to thi │ │ │ +00015900: 7320 6d6f 6465 2063 616c 6c73 2074 6865 s mode calls the │ │ │ +00015910: 2076 616c 7565 206f 6620 2070 6963 7475 value of pictu │ │ │ +00015920: 7265 2d6d 6f64 652d 686f 6f6b 2020 6966 re-mode-hook if │ │ │ +00015930: 206e 6f6e 2d6e 696c 2e0a 0a4e 6f74 6520 non-nil...Note │ │ │ +00015940: 7468 6174 2050 6963 7475 7265 206d 6f64 that Picture mod │ │ │ +00015950: 6520 636f 6d6d 616e 6473 2077 696c 6c20 e commands will │ │ │ +00015960: 776f 726b 206f 7574 7369 6465 206f 6620 work outside of │ │ │ +00015970: 5069 6374 7572 6520 6d6f 6465 2c20 6275 Picture mode, bu │ │ │ +00015980: 740a 7468 6579 2061 7265 206e 6f74 2064 t.they are not d │ │ │ +00015990: 6566 6175 6c74 6c79 2061 7373 6967 6e65 efaultly assigne │ │ │ +000159a0: 6420 746f 206b 6579 732e 1f0a 2861 7574 d to keys...(aut │ │ │ +000159b0: 6f6c 6f61 6420 2770 6963 7475 7265 2d6d oload 'picture-m │ │ │ +000159c0: 6f64 6520 2270 6963 7475 7265 2220 2728 ode "picture" '( │ │ │ +000159d0: 2324 202e 2038 3534 3234 2920 7420 6e69 #$ . 85424) t ni │ │ │ +000159e0: 6c29 0a28 6465 6661 6c69 6173 2027 6564 l).(defalias 'ed │ │ │ +000159f0: 6974 2d70 6963 7475 7265 2027 7069 6374 it-picture 'pict │ │ │ +00015a00: 7572 652d 6d6f 6465 290a 2340 3336 3020 ure-mode).#@360 │ │ │ +00015a10: 4465 6c65 7465 2074 6865 2074 6578 7420 Delete the text │ │ │ +00015a20: 696e 2074 6865 2072 6567 696f 6e2d 7265 in the region-re │ │ │ +00015a30: 6374 616e 676c 6520 7769 7468 6f75 7420 ctangle without │ │ │ +00015a40: 7361 7669 6e67 2069 742e 0a54 6865 2073 saving it..The s │ │ │ +00015a50: 616d 6520 7261 6e67 6520 6f66 2063 6f6c ame range of col │ │ │ +00015a60: 756d 6e73 2069 7320 6465 6c65 7465 6420 umns is deleted │ │ │ +00015a70: 696e 2065 6163 6820 6c69 6e65 2073 7461 in each line sta │ │ │ +00015a80: 7274 696e 6720 7769 7468 2074 6865 206c rting with the l │ │ │ +00015a90: 696e 650a 7768 6572 6520 7468 6520 7265 ine.where the re │ │ │ +00015aa0: 6769 6f6e 2062 6567 696e 7320 616e 6420 gion begins and │ │ │ +00015ab0: 656e 6469 6e67 2077 6974 6820 7468 6520 ending with the │ │ │ +00015ac0: 6c69 6e65 2077 6865 7265 2074 6865 2072 line where the r │ │ │ +00015ad0: 6567 696f 6e20 656e 6473 2e0a 0a57 6865 egion ends...Whe │ │ │ +00015ae0: 6e20 6361 6c6c 6564 2066 726f 6d20 6120 n called from a │ │ │ +00015af0: 7072 6f67 7261 6d2c 2074 6865 2072 6563 program, the rec │ │ │ +00015b00: 7461 6e67 6c65 2773 2063 6f72 6e65 7273 tangle's corners │ │ │ +00015b10: 2061 7265 2053 5441 5254 2061 6e64 2045 are START and E │ │ │ +00015b20: 4e44 2e0a 5769 7468 2061 2070 7265 6669 ND..With a prefi │ │ │ +00015b30: 7820 286f 7220 4649 4c4c 2920 6172 6775 x (or FILL) argu │ │ │ +00015b40: 6d65 6e74 2c20 616c 736f 2066 696c 6c20 ment, also fill │ │ │ +00015b50: 6c69 6e65 7320 7768 6572 6520 6e6f 7468 lines where noth │ │ │ +00015b60: 696e 6720 6861 7320 746f 2062 650a 6465 ing has to be.de │ │ │ +00015b70: 6c65 7465 642e 1f0a 2861 7574 6f6c 6f61 leted...(autoloa │ │ │ +00015b80: 6420 2764 656c 6574 652d 7265 6374 616e d 'delete-rectan │ │ │ +00015b90: 676c 6520 2272 6563 7422 2027 2823 2420 gle "rect" '(#$ │ │ │ +00015ba0: 2e20 3838 3539 3229 2074 206e 696c 290a . 88592) t nil). │ │ │ +00015bb0: 2340 3232 3320 4465 6c65 7465 2074 6865 #@223 Delete the │ │ │ +00015bc0: 2063 6f6e 7465 6e74 7320 6f66 2074 6865 contents of the │ │ │ +00015bd0: 2072 6563 7461 6e67 6c65 2077 6974 6820 rectangle with │ │ │ +00015be0: 636f 726e 6572 7320 6174 2053 5441 5254 corners at START │ │ │ +00015bf0: 2061 6e64 2045 4e44 2c20 616e 640a 7265 and END, and.re │ │ │ +00015c00: 7475 726e 2069 7420 6173 2061 206c 6973 turn it as a lis │ │ │ +00015c10: 7420 6f66 2073 7472 696e 6773 2c20 6f6e t of strings, on │ │ │ +00015c20: 6520 666f 7220 6561 6368 206c 696e 6520 e for each line │ │ │ +00015c30: 6f66 2074 6865 2072 6563 7461 6e67 6c65 of the rectangle │ │ │ +00015c40: 2e0a 0a57 6974 6820 616e 206f 7074 696f ...With an optio │ │ │ +00015c50: 6e61 6c20 4649 4c4c 2061 7267 756d 656e nal FILL argumen │ │ │ +00015c60: 742c 2061 6c73 6f20 6669 6c6c 206c 696e t, also fill lin │ │ │ +00015c70: 6573 2077 6865 7265 206e 6f74 6869 6e67 es where nothing │ │ │ +00015c80: 2068 6173 2074 6f20 6265 0a64 656c 6574 has to be.delet │ │ │ +00015c90: 6564 2e1f 0a28 6175 746f 6c6f 6164 2027 ed...(autoload ' │ │ │ +00015ca0: 6465 6c65 7465 2d65 7874 7261 6374 2d72 delete-extract-r │ │ │ +00015cb0: 6563 7461 6e67 6c65 2022 7265 6374 2220 ectangle "rect" │ │ │ +00015cc0: 2728 2324 202e 2038 3930 3134 2920 6e69 '(#$ . 89014) ni │ │ │ +00015cd0: 6c20 6e69 6c29 0a23 4031 3237 2052 6574 l nil).#@127 Ret │ │ │ +00015ce0: 7572 6e20 7468 6520 636f 6e74 656e 7473 urn the contents │ │ │ +00015cf0: 206f 6620 7468 6520 7265 6374 616e 676c of the rectangl │ │ │ +00015d00: 6520 7769 7468 2063 6f72 6e65 7273 2061 e with corners a │ │ │ +00015d10: 7420 5354 4152 5420 616e 6420 454e 442c t START and END, │ │ │ +00015d20: 0a61 7320 6120 6c69 7374 206f 6620 7374 .as a list of st │ │ │ +00015d30: 7269 6e67 732c 206f 6e65 2066 6f72 2065 rings, one for e │ │ │ +00015d40: 6163 6820 6c69 6e65 206f 6620 7468 6520 ach line of the │ │ │ +00015d50: 7265 6374 616e 676c 652e 1f0a 2861 7574 rectangle...(aut │ │ │ +00015d60: 6f6c 6f61 6420 2765 7874 7261 6374 2d72 oload 'extract-r │ │ │ +00015d70: 6563 7461 6e67 6c65 2022 7265 6374 2220 ectangle "rect" │ │ │ +00015d80: 2728 2324 202e 2038 3933 3039 2920 6e69 '(#$ . 89309) ni │ │ │ +00015d90: 6c20 6e69 6c29 0a23 4034 3320 5265 6374 l nil).#@43 Rect │ │ │ +00015da0: 616e 676c 6520 666f 7220 6079 616e 6b2d angle for `yank- │ │ │ +00015db0: 7265 6374 616e 676c 6527 2074 6f20 696e rectangle' to in │ │ │ +00015dc0: 7365 7274 2e1f 0a28 6465 6676 6172 206b sert...(defvar k │ │ │ +00015dd0: 696c 6c65 642d 7265 6374 616e 676c 6520 illed-rectangle │ │ │ +00015de0: 6e69 6c20 2823 2420 2e20 3839 3530 3029 nil (#$ . 89500) │ │ │ +00015df0: 290a 2340 3238 3720 4465 6c65 7465 2074 ).#@287 Delete t │ │ │ +00015e00: 6865 2072 6567 696f 6e2d 7265 6374 616e he region-rectan │ │ │ +00015e10: 676c 6520 616e 6420 7361 7665 2069 7420 gle and save it │ │ │ +00015e20: 6173 2074 6865 206c 6173 7420 6b69 6c6c as the last kill │ │ │ +00015e30: 6564 206f 6e65 2e0a 596f 7520 6d69 6768 ed one..You migh │ │ │ +00015e40: 7420 7072 6566 6572 2074 6f20 7573 6520 t prefer to use │ │ │ +00015e50: 6064 656c 6574 652d 6578 7472 6163 742d `delete-extract- │ │ │ +00015e60: 7265 6374 616e 676c 6527 2066 726f 6d20 rectangle' from │ │ │ +00015e70: 6120 7072 6f67 7261 6d2e 0a0a 5768 656e a program...When │ │ │ +00015e80: 2063 616c 6c65 6420 6672 6f6d 2061 2070 called from a p │ │ │ +00015e90: 726f 6772 616d 2c20 7468 6520 7265 6374 rogram, the rect │ │ │ +00015ea0: 616e 676c 6527 7320 636f 726e 6572 7320 angle's corners │ │ │ +00015eb0: 6172 6520 5354 4152 5420 616e 6420 454e are START and EN │ │ │ +00015ec0: 442e 0a57 6974 6820 6120 7072 6566 6978 D..With a prefix │ │ │ +00015ed0: 2028 6f72 2046 494c 4c29 2061 7267 756d (or FILL) argum │ │ │ +00015ee0: 656e 742c 2061 6c73 6f20 6669 6c6c 206c ent, also fill l │ │ │ +00015ef0: 696e 6573 2077 6865 7265 206e 6f74 6869 ines where nothi │ │ │ +00015f00: 6e67 2068 6173 2074 6f20 6265 0a64 656c ng has to be.del │ │ │ +00015f10: 6574 6564 2e1f 0a28 6175 746f 6c6f 6164 eted...(autoload │ │ │ +00015f20: 2027 6b69 6c6c 2d72 6563 7461 6e67 6c65 'kill-rectangle │ │ │ +00015f30: 2022 7265 6374 2220 2728 2324 202e 2038 "rect" '(#$ . 8 │ │ │ +00015f40: 3935 3932 2920 7420 6e69 6c29 0a23 4036 9592) t nil).#@6 │ │ │ +00015f50: 3520 5961 6e6b 2074 6865 206c 6173 7420 5 Yank the last │ │ │ +00015f60: 6b69 6c6c 6564 2072 6563 7461 6e67 6c65 killed rectangle │ │ │ +00015f70: 2077 6974 6820 7570 7065 7220 6c65 6674 with upper left │ │ │ +00015f80: 2063 6f72 6e65 7220 6174 2070 6f69 6e74 corner at point │ │ │ +00015f90: 2e1f 0a28 6175 746f 6c6f 6164 2027 7961 ...(autoload 'ya │ │ │ +00015fa0: 6e6b 2d72 6563 7461 6e67 6c65 2022 7265 nk-rectangle "re │ │ │ +00015fb0: 6374 2220 2728 2324 202e 2038 3939 3338 ct" '(#$ . 89938 │ │ │ +00015fc0: 2920 7420 6e69 6c29 0a23 4033 3038 2049 ) t nil).#@308 I │ │ │ +00015fd0: 6e73 6572 7420 7465 7874 206f 6620 5245 nsert text of RE │ │ │ +00015fe0: 4354 414e 474c 4520 7769 7468 2075 7070 CTANGLE with upp │ │ │ +00015ff0: 6572 206c 6566 7420 636f 726e 6572 2061 er left corner a │ │ │ +00016000: 7420 706f 696e 742e 0a52 4543 5441 4e47 t point..RECTANG │ │ │ +00016010: 4c45 2773 2066 6972 7374 206c 696e 6520 LE's first line │ │ │ +00016020: 6973 2069 6e73 6572 7465 6420 6174 2070 is inserted at p │ │ │ +00016030: 6f69 6e74 2c20 6974 7320 7365 636f 6e64 oint, its second │ │ │ +00016040: 0a6c 696e 6520 6973 2069 6e73 6572 7465 .line is inserte │ │ │ +00016050: 6420 6174 2061 2070 6f69 6e74 2076 6572 d at a point ver │ │ │ +00016060: 7469 6361 6c6c 7920 756e 6465 7220 706f tically under po │ │ │ +00016070: 696e 742c 2065 7463 2e0a 5245 4354 414e int, etc..RECTAN │ │ │ +00016080: 474c 4520 7368 6f75 6c64 2062 6520 6120 GLE should be a │ │ │ +00016090: 6c69 7374 206f 6620 7374 7269 6e67 732e list of strings. │ │ │ +000160a0: 0a41 6674 6572 2074 6869 7320 636f 6d6d .After this comm │ │ │ +000160b0: 616e 642c 2074 6865 206d 6172 6b20 6973 and, the mark is │ │ │ +000160c0: 2061 7420 7468 6520 7570 7065 7220 6c65 at the upper le │ │ │ +000160d0: 6674 2063 6f72 6e65 720a 616e 6420 706f ft corner.and po │ │ │ +000160e0: 696e 7420 6973 2061 7420 7468 6520 6c6f int is at the lo │ │ │ +000160f0: 7765 7220 7269 6768 7420 636f 726e 6572 wer right corner │ │ │ +00016100: 2e1f 0a28 6175 746f 6c6f 6164 2027 696e ...(autoload 'in │ │ │ +00016110: 7365 7274 2d72 6563 7461 6e67 6c65 2022 sert-rectangle " │ │ │ +00016120: 7265 6374 2220 2728 2324 202e 2039 3030 rect" '(#$ . 900 │ │ │ +00016130: 3633 2920 6e69 6c20 6e69 6c29 0a23 4032 63) nil nil).#@2 │ │ │ +00016140: 3338 2042 6c61 6e6b 206f 7574 2074 6865 38 Blank out the │ │ │ +00016150: 2072 6567 696f 6e2d 7265 6374 616e 676c region-rectangl │ │ │ +00016160: 652c 2073 6869 6674 696e 6720 7465 7874 e, shifting text │ │ │ +00016170: 2072 6967 6874 2e0a 0a57 6865 6e20 6361 right...When ca │ │ │ +00016180: 6c6c 6564 2066 726f 6d20 6120 7072 6f67 lled from a prog │ │ │ +00016190: 7261 6d2c 2074 6865 2072 6563 7461 6e67 ram, the rectang │ │ │ +000161a0: 6c65 2773 2063 6f72 6e65 7273 2061 7265 le's corners are │ │ │ +000161b0: 2053 5441 5254 2061 6e64 2045 4e44 2e0a START and END.. │ │ │ +000161c0: 5769 7468 2061 2070 7265 6669 7820 286f With a prefix (o │ │ │ +000161d0: 7220 4649 4c4c 2920 6172 6775 6d65 6e74 r FILL) argument │ │ │ +000161e0: 2c20 6669 6c6c 2077 6974 6820 626c 616e , fill with blan │ │ │ +000161f0: 6b73 2065 7665 6e20 6966 2074 6865 7265 ks even if there │ │ │ +00016200: 2069 7320 6e6f 2074 6578 740a 6f6e 2074 is no text.on t │ │ │ +00016210: 6865 2072 6967 6874 2073 6964 6520 6f66 he right side of │ │ │ +00016220: 2074 6865 2072 6563 7461 6e67 6c65 2e1f the rectangle.. │ │ │ +00016230: 0a28 6175 746f 6c6f 6164 2027 6f70 656e .(autoload 'open │ │ │ +00016240: 2d72 6563 7461 6e67 6c65 2022 7265 6374 -rectangle "rect │ │ │ +00016250: 2220 2728 2324 202e 2039 3034 3335 2920 " '(#$ . 90435) │ │ │ +00016260: 7420 6e69 6c29 0a23 4033 3531 2049 6e73 t nil).#@351 Ins │ │ │ +00016270: 6572 7420 5354 5249 4e47 206f 6e20 6561 ert STRING on ea │ │ │ +00016280: 6368 206c 696e 6520 6f66 2074 6865 2072 ch line of the r │ │ │ +00016290: 6567 696f 6e2d 7265 6374 616e 676c 652c egion-rectangle, │ │ │ +000162a0: 2073 6869 6674 696e 6720 7465 7874 2072 shifting text r │ │ │ +000162b0: 6967 6874 2e0a 5468 6520 6c65 6674 2065 ight..The left e │ │ │ +000162c0: 6467 6520 6f66 2074 6865 2072 6563 7461 dge of the recta │ │ │ +000162d0: 6e67 6c65 2073 7065 6369 6669 6573 2074 ngle specifies t │ │ │ +000162e0: 6865 2063 6f6c 756d 6e20 666f 7220 696e he column for in │ │ │ +000162f0: 7365 7274 696f 6e2e 0a0a 4966 2060 7065 sertion...If `pe │ │ │ +00016300: 6e64 696e 672d 6465 6c65 7465 2d6d 6f64 nding-delete-mod │ │ │ +00016310: 6527 2069 7320 6163 7469 7665 2074 6865 e' is active the │ │ │ +00016320: 2073 7472 696e 6720 7265 706c 6163 6520 string replace │ │ │ +00016330: 7468 6520 7265 6769 6f6e 2e0a 4f74 6865 the region..Othe │ │ │ +00016340: 7277 6973 6520 7468 6973 2063 6f6d 6d61 rwise this comma │ │ │ +00016350: 6e64 2064 6f65 7320 6e6f 7420 6465 6c65 nd does not dele │ │ │ +00016360: 7465 206f 7220 6f76 6572 7772 6974 6520 te or overwrite │ │ │ +00016370: 616e 7920 6578 6973 7469 6e67 2074 6578 any existing tex │ │ │ +00016380: 742e 0a0a 5768 656e 2063 616c 6c65 6420 t...When called │ │ │ +00016390: 6672 6f6d 2061 2070 726f 6772 616d 2c20 from a program, │ │ │ +000163a0: 7468 6520 7265 6374 616e 676c 6527 7320 the rectangle's │ │ │ +000163b0: 636f 726e 6572 7320 6172 6520 5354 4152 corners are STAR │ │ │ +000163c0: 5420 616e 6420 454e 442e 1f0a 2861 7574 T and END...(aut │ │ │ +000163d0: 6f6c 6f61 6420 2773 7472 696e 672d 7265 oload 'string-re │ │ │ +000163e0: 6374 616e 676c 6520 2272 6563 7422 2027 ctangle "rect" ' │ │ │ +000163f0: 2823 2420 2e20 3930 3733 3329 2074 206e (#$ . 90733) t n │ │ │ +00016400: 696c 290a 2340 3131 3620 4c69 6b65 2060 il).#@116 Like ` │ │ │ +00016410: 7374 7269 6e67 2d72 6563 7461 6e67 6c65 string-rectangle │ │ │ +00016420: 272c 2062 7574 2075 6e63 6f6e 6469 7469 ', but unconditi │ │ │ +00016430: 6f6e 616c 6c79 2072 6570 6c61 6365 2074 onally replace t │ │ │ +00016440: 6865 206f 7269 6769 6e61 6c20 7265 6769 he original regi │ │ │ +00016450: 6f6e 2c0a 6173 2069 6620 6070 656e 6469 on,.as if `pendi │ │ │ +00016460: 6e67 2d64 656c 6574 652d 6d6f 6465 2720 ng-delete-mode' │ │ │ +00016470: 7765 7265 2061 6374 6976 652e 1f0a 2861 were active...(a │ │ │ +00016480: 7574 6f6c 6f61 6420 2772 6570 6c61 6365 utoload 'replace │ │ │ +00016490: 2d72 6563 7461 6e67 6c65 2022 7265 6374 -rectangle "rect │ │ │ +000164a0: 2220 2728 2324 202e 2039 3131 3436 2920 " '(#$ . 91146) │ │ │ +000164b0: 7420 6e69 6c29 0a23 4032 3638 2042 6c61 t nil).#@268 Bla │ │ │ +000164c0: 6e6b 206f 7574 2074 6865 2072 6567 696f nk out the regio │ │ │ +000164d0: 6e2d 7265 6374 616e 676c 652e 0a54 6865 n-rectangle..The │ │ │ +000164e0: 2074 6578 7420 7072 6576 696f 7573 6c79 text previously │ │ │ +000164f0: 2069 6e20 7468 6520 7265 6769 6f6e 2069 in the region i │ │ │ +00016500: 7320 6f76 6572 7772 6974 7465 6e20 7769 s overwritten wi │ │ │ +00016510: 7468 2062 6c61 6e6b 732e 0a0a 5768 656e th blanks...When │ │ │ +00016520: 2063 616c 6c65 6420 6672 6f6d 2061 2070 called from a p │ │ │ +00016530: 726f 6772 616d 2c20 7468 6520 7265 6374 rogram, the rect │ │ │ +00016540: 616e 676c 6527 7320 636f 726e 6572 7320 angle's corners │ │ │ +00016550: 6172 6520 5354 4152 5420 616e 6420 454e are START and EN │ │ │ +00016560: 442e 0a57 6974 6820 6120 7072 6566 6978 D..With a prefix │ │ │ +00016570: 2028 6f72 2046 494c 4c29 2061 7267 756d (or FILL) argum │ │ │ +00016580: 656e 742c 2061 6c73 6f20 6669 6c6c 2077 ent, also fill w │ │ │ +00016590: 6974 6820 626c 616e 6b73 2074 6865 2070 ith blanks the p │ │ │ +000165a0: 6172 7473 206f 6620 7468 650a 7265 6374 arts of the.rect │ │ │ +000165b0: 616e 676c 6520 7768 6963 6820 7765 7265 angle which were │ │ │ +000165c0: 2065 6d70 7479 2e1f 0a28 6175 746f 6c6f empty...(autolo │ │ │ +000165d0: 6164 2027 636c 6561 722d 7265 6374 616e ad 'clear-rectan │ │ │ +000165e0: 676c 6520 2272 6563 7422 2027 2823 2420 gle "rect" '(#$ │ │ │ +000165f0: 2e20 3931 3332 3529 2074 206e 696c 290a . 91325) t nil). │ │ │ +00016600: 2340 3137 3737 2044 6973 706c 6179 2061 #@1777 Display a │ │ │ +00016610: 206c 6973 7420 6f66 2045 6d61 6373 204c list of Emacs L │ │ │ +00016620: 6973 7020 6669 6c65 7320 7468 6174 2073 isp files that s │ │ │ +00016630: 6861 646f 7720 6f74 6865 7220 6669 6c65 hadow other file │ │ │ +00016640: 732e 0a0a 5468 6973 2066 756e 6374 696f s...This functio │ │ │ +00016650: 6e20 6c69 7374 7320 706f 7465 6e74 6961 n lists potentia │ │ │ +00016660: 6c20 6c6f 6164 2d70 6174 6820 7072 6f62 l load-path prob │ │ │ +00016670: 6c65 6d73 2e20 2044 6972 6563 746f 7269 lems. Directori │ │ │ +00016680: 6573 2069 6e20 7468 650a 606c 6f61 642d es in the.`load- │ │ │ +00016690: 7061 7468 2720 7661 7269 6162 6c65 2061 path' variable a │ │ │ +000166a0: 7265 2073 6561 7263 6865 642c 2069 6e20 re searched, in │ │ │ +000166b0: 6f72 6465 722c 2066 6f72 2045 6d61 6373 order, for Emacs │ │ │ +000166c0: 204c 6973 700a 6669 6c65 732e 2020 5768 Lisp.files. Wh │ │ │ +000166d0: 656e 2061 2070 7265 7669 6f75 736c 7920 en a previously │ │ │ +000166e0: 656e 636f 756e 7465 7265 6420 6669 6c65 encountered file │ │ │ +000166f0: 206e 616d 6520 6973 2066 6f75 6e64 2061 name is found a │ │ │ +00016700: 6761 696e 2c20 610a 6d65 7373 6167 6520 gain, a.message │ │ │ +00016710: 6973 2064 6973 706c 6179 6564 2069 6e64 is displayed ind │ │ │ +00016720: 6963 6174 696e 6720 7468 6174 2074 6865 icating that the │ │ │ +00016730: 206c 6174 6572 2066 696c 6520 6973 2022 later file is " │ │ │ +00016740: 6869 6464 656e 2220 6279 0a74 6865 2065 hidden" by.the e │ │ │ +00016750: 6172 6c69 6572 2e0a 0a46 6f72 2065 7861 arlier...For exa │ │ │ +00016760: 6d70 6c65 2c20 7375 7070 6f73 6520 606c mple, suppose `l │ │ │ +00016770: 6f61 642d 7061 7468 2720 6973 2073 6574 oad-path' is set │ │ │ +00016780: 2074 6f0a 0a28 222f 7573 722f 676e 752f to..("/usr/gnu/ │ │ │ +00016790: 656d 6163 732f 7369 7465 2d6c 6973 7022 emacs/site-lisp" │ │ │ +000167a0: 2022 2f75 7372 2f67 6e75 2f65 6d61 6373 "/usr/gnu/emacs │ │ │ +000167b0: 2f73 6861 7265 2f65 6d61 6373 2f31 392e /share/emacs/19. │ │ │ +000167c0: 3330 2f6c 6973 7022 290a 0a61 6e64 2074 30/lisp")..and t │ │ │ +000167d0: 6861 7420 6561 6368 206f 6620 7468 6573 hat each of thes │ │ │ +000167e0: 6520 6469 7265 6374 6f72 6965 7320 636f e directories co │ │ │ +000167f0: 6e74 6169 6e73 2061 2066 696c 6520 6361 ntains a file ca │ │ │ +00016800: 6c6c 6564 2058 5858 2e65 6c2e 2020 5468 lled XXX.el. Th │ │ │ +00016810: 656e 0a58 5858 2e65 6c20 696e 2074 6865 en.XXX.el in the │ │ │ +00016820: 2073 6974 652d 6c69 7370 2064 6972 6563 site-lisp direc │ │ │ +00016830: 746f 7279 2069 7320 7265 6665 7272 6564 tory is referred │ │ │ +00016840: 2074 6f20 6279 2061 6c6c 206f 663a 0a28 to by all of:.( │ │ │ +00016850: 7265 7175 6972 6520 2758 5858 292c 2028 require 'XXX), ( │ │ │ +00016860: 6175 746f 6c6f 6164 202e 2e2e 2e20 2258 autoload .... "X │ │ │ +00016870: 5858 2229 2c20 286c 6f61 642d 6c69 6272 XX"), (load-libr │ │ │ +00016880: 6172 7920 2258 5858 2229 2065 7463 2e0a ary "XXX") etc.. │ │ │ +00016890: 0a54 6865 2066 6972 7374 2058 5858 2e65 .The first XXX.e │ │ │ +000168a0: 6c20 6669 6c65 2070 7265 7665 6e74 7320 l file prevents │ │ │ +000168b0: 656d 6163 7320 6672 6f6d 2073 6565 696e emacs from seein │ │ │ +000168c0: 6720 7468 6520 7365 636f 6e64 2028 756e g the second (un │ │ │ +000168d0: 6c65 7373 0a74 6865 2073 6563 6f6e 6420 less.the second │ │ │ +000168e0: 6973 206c 6f61 6465 6420 6578 706c 6963 is loaded explic │ │ │ +000168f0: 6974 6c79 2076 6961 206c 6f61 642d 6669 itly via load-fi │ │ │ +00016900: 6c65 292e 0a0a 5768 656e 206e 6f74 2069 le)...When not i │ │ │ +00016910: 6e74 656e 6465 642c 2073 7563 6820 7368 ntended, such sh │ │ │ +00016920: 6164 6f77 696e 6773 2063 616e 2062 6520 adowings can be │ │ │ +00016930: 7468 6520 736f 7572 6365 206f 6620 7375 the source of su │ │ │ +00016940: 6274 6c65 0a70 726f 626c 656d 732e 2020 btle.problems. │ │ │ +00016950: 466f 7220 6578 616d 706c 652c 2074 6865 For example, the │ │ │ +00016960: 2061 626f 7665 2073 6974 7561 7469 6f6e above situation │ │ │ +00016970: 206d 6179 2068 6176 6520 6172 6973 656e may have arisen │ │ │ +00016980: 2062 6563 6175 7365 2074 6865 0a58 5858 because the.XXX │ │ │ +00016990: 2070 6163 6b61 6765 2077 6173 206e 6f74 package was not │ │ │ +000169a0: 2064 6973 7472 6962 7574 6564 2077 6974 distributed wit │ │ │ +000169b0: 6820 7665 7273 696f 6e73 206f 6620 656d h versions of em │ │ │ +000169c0: 6163 7320 7072 696f 7220 746f 0a31 392e acs prior to.19. │ │ │ +000169d0: 3330 2e20 2041 6e20 656d 6163 7320 6d61 30. An emacs ma │ │ │ +000169e0: 696e 7461 696e 6572 2064 6f77 6e6c 6f61 intainer downloa │ │ │ +000169f0: 6465 6420 5858 5820 6672 6f6d 2065 6c73 ded XXX from els │ │ │ +00016a00: 6577 6865 7265 2061 6e64 2069 6e73 7461 ewhere and insta │ │ │ +00016a10: 6c6c 6564 0a69 742e 2020 4c61 7465 722c lled.it. Later, │ │ │ +00016a20: 2058 5858 2077 6173 2075 7064 6174 6564 XXX was updated │ │ │ +00016a30: 2061 6e64 2069 6e63 6c75 6465 6420 696e and included in │ │ │ +00016a40: 2074 6865 2065 6d61 6373 2064 6973 7472 the emacs distr │ │ │ +00016a50: 6962 7574 696f 6e2e 0a55 6e6c 6573 7320 ibution..Unless │ │ │ +00016a60: 7468 6520 656d 6163 7320 6d61 696e 7461 the emacs mainta │ │ │ +00016a70: 696e 6572 2063 6865 636b 7320 666f 7220 iner checks for │ │ │ +00016a80: 7468 6973 2c20 7468 6520 6e65 7720 7665 this, the new ve │ │ │ +00016a90: 7273 696f 6e20 6f66 2058 5858 0a77 696c rsion of XXX.wil │ │ │ +00016aa0: 6c20 6265 2068 6964 6465 6e20 6265 6869 l be hidden behi │ │ │ +00016ab0: 6e64 2074 6865 206f 6c64 2028 7768 6963 nd the old (whic │ │ │ +00016ac0: 6820 6d61 7920 6e6f 206c 6f6e 6765 7220 h may no longer │ │ │ +00016ad0: 776f 726b 2077 6974 6820 7468 6520 6e65 work with the ne │ │ │ +00016ae0: 770a 656d 6163 7320 7665 7273 696f 6e29 w.emacs version) │ │ │ +00016af0: 2e0a 0a54 6869 7320 6675 6e63 7469 6f6e ...This function │ │ │ +00016b00: 2070 6572 666f 726d 7320 7468 6573 6520 performs these │ │ │ +00016b10: 6368 6563 6b73 2061 6e64 2066 6c61 6773 checks and flags │ │ │ +00016b20: 2061 6c6c 2070 6f73 7369 626c 650a 7368 all possible.sh │ │ │ +00016b30: 6164 6f77 696e 6773 2e20 2042 6563 6175 adowings. Becau │ │ │ +00016b40: 7365 2061 202e 656c 2066 696c 6520 6d61 se a .el file ma │ │ │ +00016b50: 7920 6578 6973 7420 7769 7468 6f75 7420 y exist without │ │ │ +00016b60: 6120 636f 7272 6573 706f 6e64 696e 6720 a corresponding │ │ │ +00016b70: 2e65 6c63 0a28 6f72 2076 6963 652d 7665 .elc.(or vice-ve │ │ │ +00016b80: 7273 6129 2c20 7468 6573 6520 7375 6666 rsa), these suff │ │ │ +00016b90: 6978 6573 2061 7265 2065 7373 656e 7469 ixes are essenti │ │ │ +00016ba0: 616c 6c79 2069 676e 6f72 6564 2e20 2041 ally ignored. A │ │ │ +00016bb0: 2066 696c 650a 5858 582e 656c 6320 696e file.XXX.elc in │ │ │ +00016bc0: 2061 6e20 6561 726c 7920 6469 7265 6374 an early direct │ │ │ +00016bd0: 6f72 7920 2874 6861 7420 646f 6573 206e ory (that does n │ │ │ +00016be0: 6f74 2063 6f6e 7461 696e 2058 5858 2e65 ot contain XXX.e │ │ │ +00016bf0: 6c29 2069 730a 636f 6e73 6964 6572 6564 l) is.considered │ │ │ +00016c00: 2074 6f20 7368 6164 6f77 2061 206c 6174 to shadow a lat │ │ │ +00016c10: 6572 2066 696c 6520 5858 582e 656c 2c20 er file XXX.el, │ │ │ +00016c20: 616e 6420 7669 6365 2d76 6572 7361 2e0a and vice-versa.. │ │ │ +00016c30: 0a57 6865 6e20 7275 6e20 696e 7465 7261 .When run intera │ │ │ +00016c40: 6374 6976 656c 792c 2074 6865 2073 6861 ctively, the sha │ │ │ +00016c50: 646f 7769 6e67 7320 2869 6620 616e 7929 dowings (if any) │ │ │ +00016c60: 2061 7265 2064 6973 706c 6179 6564 2069 are displayed i │ │ │ +00016c70: 6e20 610a 6275 6666 6572 2063 616c 6c65 n a.buffer calle │ │ │ +00016c80: 6420 602a 5368 6164 6f77 732a 272e 2020 d `*Shadows*'. │ │ │ +00016c90: 5368 6164 6f77 696e 6773 2061 7265 206c Shadowings are l │ │ │ +00016ca0: 6f63 6174 6564 2062 7920 6361 6c6c 696e ocated by callin │ │ │ +00016cb0: 6720 7468 650a 286e 6f6e 2d69 6e74 6572 g the.(non-inter │ │ │ +00016cc0: 6163 7469 7665 2920 636f 6d70 616e 696f active) companio │ │ │ +00016cd0: 6e20 6675 6e63 7469 6f6e 2c20 6066 696e n function, `fin │ │ │ +00016ce0: 642d 656d 6163 732d 6c69 7370 2d73 6861 d-emacs-lisp-sha │ │ │ +00016cf0: 646f 7773 272e 1f0a 2861 7574 6f6c 6f61 dows'...(autoloa │ │ │ +00016d00: 6420 276c 6973 742d 6c6f 6164 2d70 6174 d 'list-load-pat │ │ │ +00016d10: 682d 7368 6164 6f77 7320 2273 6861 646f h-shadows "shado │ │ │ +00016d20: 7722 2027 2823 2420 2e20 3931 3635 3529 w" '(#$ . 91655) │ │ │ +00016d30: 2074 206e 696c 290a 2862 7974 652d 636f t nil).(byte-co │ │ │ +00016d40: 6465 2022 08ac 82c1 10c2 8722 205b 736f de "......." [so │ │ │ +00016d50: 756e 642d 616c 6973 7420 2828 7265 6164 und-alist ((read │ │ │ +00016d60: 7920 6e69 6c29 2028 7761 7270 206e 696c y nil) (warp nil │ │ │ +00016d70: 2929 206e 696c 5d20 3129 0a23 4036 3435 )) nil] 1).#@645 │ │ │ +00016d80: 2052 6561 6420 696e 2061 6e20 6175 6469 Read in an audi │ │ │ +00016d90: 6f2d 6669 6c65 2061 6e64 2061 6464 2069 o-file and add i │ │ │ +00016da0: 7420 746f 2074 6865 2073 6f75 6e64 2d61 t to the sound-a │ │ │ +00016db0: 6c69 7374 2e0a 0a46 494c 454e 414d 4520 list...FILENAME │ │ │ +00016dc0: 6361 6e20 6569 7468 6572 2062 6520 6162 can either be ab │ │ │ +00016dd0: 736f 6c75 7465 206f 7220 7265 6c61 7469 solute or relati │ │ │ +00016de0: 7665 2c20 696e 2077 6869 6368 2063 6173 ve, in which cas │ │ │ +00016df0: 6520 7468 6520 6669 6c65 2077 696c 6c0a e the file will. │ │ │ +00016e00: 6265 2073 6561 7263 6865 6420 696e 2074 be searched in t │ │ │ +00016e10: 6865 2064 6972 6563 746f 7269 6573 2067 he directories g │ │ │ +00016e20: 6976 656e 2062 7920 6064 6566 6175 6c74 iven by `default │ │ │ +00016e30: 2d73 6f75 6e64 2d64 6972 6563 746f 7279 -sound-directory │ │ │ +00016e40: 2d6c 6973 7427 2e0a 5768 656e 206c 6f6f -list'..When loo │ │ │ +00016e50: 6b69 6e67 2066 6f72 2074 6865 2066 696c king for the fil │ │ │ +00016e60: 652c 2074 6865 2065 7874 656e 7369 6f6e e, the extension │ │ │ +00016e70: 7320 6769 7665 6e20 6279 2060 736f 756e s given by `soun │ │ │ +00016e80: 642d 6578 7465 6e73 696f 6e2d 6c69 7374 d-extension-list │ │ │ +00016e90: 2720 6172 650a 616c 736f 2074 7269 6564 ' are.also tried │ │ │ +00016ea0: 2069 6e20 7468 6520 6769 7665 6e20 6f72 in the given or │ │ │ +00016eb0: 6465 722e 0a0a 596f 7520 6361 6e20 6f6e der...You can on │ │ │ +00016ec0: 6c79 2070 6c61 7920 736f 756e 6420 6669 ly play sound fi │ │ │ +00016ed0: 6c65 7320 6966 2079 6f75 2061 7265 2072 les if you are r │ │ │ +00016ee0: 756e 6e69 6e67 206f 6e20 6469 7370 6c61 unning on displa │ │ │ +00016ef0: 7920 3020 6f66 2074 6865 0a63 6f6e 736f y 0 of the.conso │ │ │ +00016f00: 6c65 206f 6620 6120 6d61 6368 696e 6520 le of a machine │ │ │ +00016f10: 7769 7468 206e 6174 6976 6520 736f 756e with native soun │ │ │ +00016f20: 6420 7375 7070 6f72 7420 6f72 2072 756e d support or run │ │ │ +00016f30: 6e69 6e67 2061 204e 6574 4175 6469 6f0a ning a NetAudio. │ │ │ +00016f40: 7365 7276 6572 2061 6e64 2058 456d 6163 server and XEmac │ │ │ +00016f50: 7320 6861 7320 7468 6520 6e65 6365 7373 s has the necess │ │ │ +00016f60: 6172 7920 736f 756e 6420 7375 7070 6f72 ary sound suppor │ │ │ +00016f70: 7420 636f 6d70 696c 6564 2069 6e2e 0a0a t compiled in... │ │ │ +00016f80: 5468 6520 736f 756e 6420 6669 6c65 206d The sound file m │ │ │ +00016f90: 7573 7420 6265 2069 6e20 7468 6520 5375 ust be in the Su │ │ │ +00016fa0: 6e2f 4e65 5854 2055 2d4c 4157 2066 6f72 n/NeXT U-LAW for │ │ │ +00016fb0: 6d61 742c 2065 7863 6570 7420 6f6e 204c mat, except on L │ │ │ +00016fc0: 696e 7578 2c0a 7768 6572 6520 2e77 6176 inux,.where .wav │ │ │ +00016fd0: 2066 696c 6573 2061 7265 2061 6c73 6f20 files are also │ │ │ +00016fe0: 7375 7070 6f72 7465 6420 6279 2074 6865 supported by the │ │ │ +00016ff0: 2073 6f75 6e64 2063 6172 6420 6472 6976 sound card driv │ │ │ +00017000: 6572 732e 1f0a 2861 7574 6f6c 6f61 6420 ers...(autoload │ │ │ +00017010: 276c 6f61 642d 736f 756e 642d 6669 6c65 'load-sound-file │ │ │ +00017020: 2022 736f 756e 6422 2027 2823 2420 2e20 "sound" '(#$ . │ │ │ +00017030: 3933 3536 3929 2074 206e 696c 290a 2340 93569) t nil).#@ │ │ │ +00017040: 3235 3420 4c6f 6164 2061 6e64 2069 6e73 254 Load and ins │ │ │ +00017050: 7461 6c6c 2073 6f6d 6520 736f 756e 6420 tall some sound │ │ │ +00017060: 6669 6c65 7320 6173 2062 6565 702d 7479 files as beep-ty │ │ │ +00017070: 7065 732c 2075 7369 6e67 0a60 6c6f 6164 pes, using.`load │ │ │ +00017080: 2d73 6f75 6e64 2d66 696c 6527 2e20 2054 -sound-file'. T │ │ │ +00017090: 6869 7320 6f6e 6c79 2077 6f72 6b73 2069 his only works i │ │ │ +000170a0: 6620 796f 7527 7265 206f 6e20 6469 7370 f you're on disp │ │ │ +000170b0: 6c61 7920 3020 6f66 2074 6865 0a63 6f6e lay 0 of the.con │ │ │ +000170c0: 736f 6c65 206f 6620 6120 6d61 6368 696e sole of a machin │ │ │ +000170d0: 6520 7769 7468 206e 6174 6976 6520 736f e with native so │ │ │ +000170e0: 756e 6420 7375 7070 6f72 7420 6f72 2072 und support or r │ │ │ +000170f0: 756e 6e69 6e67 2061 204e 6574 4175 6469 unning a NetAudi │ │ │ +00017100: 6f0a 7365 7276 6572 2061 6e64 2058 456d o.server and XEm │ │ │ +00017110: 6163 7320 6861 7320 7468 6520 6e65 6365 acs has the nece │ │ │ +00017120: 7373 6172 7920 736f 756e 6420 7375 7070 ssary sound supp │ │ │ +00017130: 6f72 7420 636f 6d70 696c 6564 2069 6e2e ort compiled in. │ │ │ +00017140: 1f0a 2861 7574 6f6c 6f61 6420 276c 6f61 ..(autoload 'loa │ │ │ +00017150: 642d 6465 6661 756c 742d 736f 756e 6473 d-default-sounds │ │ │ +00017160: 2022 736f 756e 6422 2027 2823 2420 2e20 "sound" '(#$ . │ │ │ +00017170: 3934 3237 3629 2074 206e 696c 290a 2340 94276) t nil).#@ │ │ │ +00017180: 3338 3020 4173 6b20 7573 6572 2077 616e 380 Ask user wan │ │ │ +00017190: 7469 6e67 2074 6f20 6564 6974 2046 494c ting to edit FIL │ │ │ +000171a0: 454e 414d 452c 206c 6f63 6b65 6420 6279 ENAME, locked by │ │ │ +000171b0: 204f 5448 4552 2d55 5345 522c 2077 6861 OTHER-USER, wha │ │ │ +000171c0: 7420 746f 2064 6f2e 0a54 6869 7320 6675 t to do..This fu │ │ │ +000171d0: 6e63 7469 6f6e 2068 6173 2061 2063 686f nction has a cho │ │ │ +000171e0: 6963 6520 6f66 2074 6872 6565 2074 6869 ice of three thi │ │ │ +000171f0: 6e67 7320 746f 2064 6f3a 0a20 2064 6f20 ngs to do:. do │ │ │ +00017200: 2873 6967 6e61 6c20 2766 696c 652d 6c6f (signal 'file-lo │ │ │ +00017210: 636b 6564 2028 6c69 7374 2046 494c 454e cked (list FILEN │ │ │ +00017220: 414d 4520 4f54 4845 522d 5553 4552 2929 AME OTHER-USER)) │ │ │ +00017230: 0a20 2020 2074 6f20 7265 6672 6169 6e20 . to refrain │ │ │ +00017240: 6672 6f6d 2065 6469 7469 6e67 2074 6865 from editing the │ │ │ +00017250: 2066 696c 650a 2020 7265 7475 726e 2074 file. return t │ │ │ +00017260: 2028 6772 6162 2074 6865 206c 6f63 6b20 (grab the lock │ │ │ +00017270: 6f6e 2074 6865 2066 696c 6529 0a20 2072 on the file). r │ │ │ +00017280: 6574 7572 6e20 6e69 6c20 2865 6469 7420 eturn nil (edit │ │ │ +00017290: 7468 6520 6669 6c65 2065 7665 6e20 7468 the file even th │ │ │ +000172a0: 6f75 6768 2069 7420 6973 206c 6f63 6b65 ough it is locke │ │ │ +000172b0: 6429 2e0a 596f 7520 6361 6e20 7265 7772 d)..You can rewr │ │ │ +000172c0: 6974 6520 6974 2074 6f20 7573 6520 616e ite it to use an │ │ │ +000172d0: 7920 6372 6974 6572 6961 2079 6f75 206c y criteria you l │ │ │ +000172e0: 696b 6520 746f 2063 686f 6f73 6520 7768 ike to choose wh │ │ │ +000172f0: 6963 6820 6f6e 6520 746f 2064 6f2e 1f0a ich one to do... │ │ │ +00017300: 2861 7574 6f6c 6f61 6420 2761 736b 2d75 (autoload 'ask-u │ │ │ +00017310: 7365 722d 6162 6f75 742d 6c6f 636b 2022 ser-about-lock " │ │ │ +00017320: 7573 6572 6c6f 636b 2220 2728 2324 202e userlock" '(#$ . │ │ │ +00017330: 2039 3435 3936 2920 6e69 6c20 6e69 6c29 94596) nil nil) │ │ │ +00017340: 0a23 4034 3236 2041 736b 2075 7365 7220 .#@426 Ask user │ │ │ +00017350: 7768 6f20 6973 2061 626f 7574 2074 6f20 who is about to │ │ │ +00017360: 6d6f 6469 6679 2061 6e20 6f62 736f 6c65 modify an obsole │ │ │ +00017370: 7465 2062 7566 6665 7220 7768 6174 2074 te buffer what t │ │ │ +00017380: 6f20 646f 2e0a 5468 6973 2066 756e 6374 o do..This funct │ │ │ +00017390: 696f 6e20 6861 7320 7477 6f20 6368 6f69 ion has two choi │ │ │ +000173a0: 6365 733a 2069 7420 6361 6e20 7265 7475 ces: it can retu │ │ │ +000173b0: 726e 2c20 696e 2077 6869 6368 2063 6173 rn, in which cas │ │ │ +000173c0: 6520 7468 6520 6d6f 6469 6669 6361 7469 e the modificati │ │ │ +000173d0: 6f6e 0a6f 6620 7468 6520 6275 6666 6572 on.of the buffer │ │ │ +000173e0: 2077 696c 6c20 7072 6f63 6565 642c 206f will proceed, o │ │ │ +000173f0: 7220 6974 2063 616e 2028 7369 676e 616c r it can (signal │ │ │ +00017400: 2027 6669 6c65 2d73 7570 6572 7365 7373 'file-supersess │ │ │ +00017410: 696f 6e20 2846 494c 454e 414d 4529 292c ion (FILENAME)), │ │ │ +00017420: 0a69 6e20 7768 6963 6820 6361 7365 2074 .in which case t │ │ │ +00017430: 6865 2070 726f 706f 7365 6420 6275 6666 he proposed buff │ │ │ +00017440: 6572 206d 6f64 6966 6963 6174 696f 6e20 er modification │ │ │ +00017450: 7769 6c6c 206e 6f74 2062 6520 6d61 6465 will not be made │ │ │ +00017460: 2e0a 0a59 6f75 2063 616e 2072 6577 7269 ...You can rewri │ │ │ +00017470: 7465 2074 6869 7320 746f 2075 7365 2061 te this to use a │ │ │ +00017480: 6e79 2063 7269 7465 7269 6120 796f 7520 ny criteria you │ │ │ +00017490: 6c69 6b65 2074 6f20 6368 6f6f 7365 2077 like to choose w │ │ │ +000174a0: 6869 6368 206f 6e65 2074 6f20 646f 2e0a hich one to do.. │ │ │ +000174b0: 5468 6520 6275 6666 6572 2069 6e20 7175 The buffer in qu │ │ │ +000174c0: 6573 7469 6f6e 2069 7320 6375 7272 656e estion is curren │ │ │ +000174d0: 7420 7768 656e 2074 6869 7320 6675 6e63 t when this func │ │ │ +000174e0: 7469 6f6e 2069 7320 6361 6c6c 6564 2e1f tion is called.. │ │ │ +000174f0: 0a28 6175 746f 6c6f 6164 2027 6173 6b2d .(autoload 'ask- │ │ │ +00017500: 7573 6572 2d61 626f 7574 2d73 7570 6572 user-about-super │ │ │ +00017510: 7365 7373 696f 6e2d 7468 7265 6174 2022 session-threat " │ │ │ +00017520: 7573 6572 6c6f 636b 2220 2728 2324 202e userlock" '(#$ . │ │ │ +00017530: 2039 3530 3437 2920 6e69 6c20 6e69 6c29 95047) nil nil) │ │ │ +00017540: 0a28 6279 7465 2d63 6f64 6520 22c0 0942 .(byte-code "..B │ │ │ +00017550: 11c3 c021 8414 01c4 c0c5 201a c65c 6ec0 ...!...... ..\n. │ │ │ +00017560: 5c22 88c7 5c6e 2188 c85c 6ec9 ca23 88c8 \"..\n!..\n..#.. │ │ │ +00017570: 5c6e cbcc 2388 c85c 6ecd cc23 88c8 5c6e \n..#..\n..#..\n │ │ │ +00017580: cecf 2388 c85c 6ed0 cf23 88c8 5c6e d1cf ..#..\n..#..\n.. │ │ │ +00017590: 2388 c85c 6ed2 d323 88c8 5c6e d4d3 2388 #..\n..#..\n..#. │ │ │ +000175a0: c85c 6ed5 d323 88c8 5c6e d6d3 2388 c85c .\n..#..\n..#..\ │ │ │ +000175b0: 6ed7 d823 88c8 5c6e d9d8 2388 c85c 6eda n..#..\n..#..\n. │ │ │ +000175c0: db23 88c8 5c6e dcdd 2388 c85c 6ede df23 .#..\n..#..\n..# │ │ │ +000175d0: 88c8 5c6e e0e1 2388 c85c 6ee2 e323 88c8 ..\n..#..\n..#.. │ │ │ +000175e0: 5c6e e4e5 2388 c85c 6ee6 e323 88c8 5c6e \n..#..\n..#..\n │ │ │ +000175f0: e7e8 2388 c85c 6ee9 ea23 88c8 5c6e ebec ..#..\n..#..\n.. │ │ │ +00017600: 2388 c85c 6eed ee23 88c8 5c6e eff0 2388 #..\n..#..\n..#. │ │ │ +00017610: c85c 6ef1 f223 88c8 5c6e f3f2 2388 c85c .\n..#..\n..#..\ │ │ │ +00017620: 6ef4 f523 88c8 5c6e f6ee 2388 c85c 6ef7 n..#..\n..#..\n. │ │ │ +00017630: f823 88c8 5c6e f9fa 2388 c85c 6efb fc23 .#..\n..#..\n..# │ │ │ +00017640: 88c8 5c6e fdfc 2388 c85c 6efe ff23 88c8 ..\n..#..\n..#.. │ │ │ +00017650: 5c6e 8140 0081 4100 2388 c85c 6e81 4200 \n.@..A.#..\n.B. │ │ │ +00017660: 8143 0023 88c8 5c6e 8144 0081 4500 2388 .C.#..\n.D..E.#. │ │ │ +00017670: c85c 6e81 4600 8147 0023 88c8 5c6e 8148 .\n.F..G.#..\n.H │ │ │ +00017680: 0081 4500 2388 5c6e 295c 2288 8149 0009 ..E.#.\n)\"..I.. │ │ │ +00017690: 4211 c381 4900 21ac 95c4 8149 0081 4a00 B...I.!....I..J. │ │ │ +000176a0: 0821 1ac6 5c6e 8149 005c 2288 5c6e 295c .!..\n.I.\".\n)\ │ │ │ +000176b0: 2288 c087 2220 5b76 6965 772d 6d69 6e6f "..." [view-mino │ │ │ +000176c0: 722d 6d6f 6465 2d6d 6170 2063 7572 7265 r-mode-map curre │ │ │ +000176d0: 6e74 2d6c 6f61 642d 6c69 7374 206d 6170 nt-load-list map │ │ │ +000176e0: 2064 6566 6175 6c74 2d62 6f75 6e64 7020 default-boundp │ │ │ +000176f0: 7365 742d 6465 6661 756c 7420 6d61 6b65 set-default make │ │ │ +00017700: 2d6b 6579 6d61 7020 7365 742d 6b65 796d -keymap set-keym │ │ │ +00017710: 6170 2d6e 616d 6520 7375 7070 7265 7373 ap-name suppress │ │ │ +00017720: 2d6b 6579 6d61 7020 6465 6669 6e65 2d6b -keymap define-k │ │ │ +00017730: 6579 2022 2d22 206e 6567 6174 6976 652d ey "-" negative- │ │ │ +00017740: 6172 6775 6d65 6e74 2022 2022 2073 6372 argument " " scr │ │ │ +00017750: 6f6c 6c2d 7570 2022 6622 2022 6222 2073 oll-up "f" "b" s │ │ │ +00017760: 6372 6f6c 6c2d 646f 776e 2062 6163 6b73 croll-down backs │ │ │ +00017770: 7061 6365 2064 656c 6574 6520 220d 2220 pace delete "." │ │ │ +00017780: 7669 6577 2d73 6372 6f6c 6c2d 6c69 6e65 view-scroll-line │ │ │ +00017790: 732d 7570 2022 5c6e 2220 2265 2220 226a s-up "\n" "e" "j │ │ │ +000177a0: 2220 2279 2220 7669 6577 2d73 6372 6f6c " "y" view-scrol │ │ │ +000177b0: 6c2d 6c69 6e65 732d 646f 776e 2022 6b22 l-lines-down "k" │ │ │ +000177c0: 2022 6422 2076 6965 772d 7363 726f 6c6c "d" view-scroll │ │ │ +000177d0: 2d73 6f6d 652d 6c69 6e65 732d 7570 2022 -some-lines-up " │ │ │ +000177e0: 7522 2076 6965 772d 7363 726f 6c6c 2d73 u" view-scroll-s │ │ │ +000177f0: 6f6d 652d 6c69 6e65 732d 646f 776e 2022 ome-lines-down " │ │ │ +00017800: 7222 2072 6563 656e 7465 7220 2274 2220 r" recenter "t" │ │ │ +00017810: 746f 6767 6c65 2d74 7275 6e63 6174 652d toggle-truncate- │ │ │ +00017820: 6c69 6e65 7320 224e 2220 7669 6577 2d62 lines "N" view-b │ │ │ +00017830: 7566 6665 7220 2245 2220 7669 6577 2d66 uffer "E" view-f │ │ │ +00017840: 696c 6520 2250 2220 2221 2220 7368 656c ile "P" "!" shel │ │ │ +00017850: 6c2d 636f 6d6d 616e 6420 227c 2220 7368 l-command "|" sh │ │ │ +00017860: 656c 6c2d 636f 6d6d 616e 642d 6f6e 2d72 ell-command-on-r │ │ │ +00017870: 6567 696f 6e20 223d 2220 7768 6174 2d6c egion "=" what-l │ │ │ +00017880: 696e 6520 223f 2220 7669 6577 2d73 6561 ine "?" view-sea │ │ │ +00017890: 7263 682d 6261 636b 7761 7264 2022 6822 rch-backward "h" │ │ │ +000178a0: 2076 6965 772d 6d6f 6465 2d64 6573 6372 view-mode-descr │ │ │ +000178b0: 6962 6520 2273 2220 7669 6577 2d72 6570 ibe "s" view-rep │ │ │ +000178c0: 6561 742d 7365 6172 6368 2022 6e22 2022 eat-search "n" " │ │ │ +000178d0: 2f22 2076 6965 772d 7365 6172 6368 2d66 /" view-search-f │ │ │ +000178e0: 6f72 7761 7264 2022 5c5c 2220 2267 2220 orward "\\" "g" │ │ │ +000178f0: 7669 6577 2d67 6f74 6f2d 6c69 6e65 2022 view-goto-line " │ │ │ +00017900: 4722 2076 6965 772d 6c61 7374 2d77 696e G" view-last-win │ │ │ +00017910: 646f 7766 756c 2022 2522 2076 6965 772d dowful "%" view- │ │ │ +00017920: 676f 746f 2d70 6572 6365 6e74 2022 7022 goto-percent "p" │ │ │ +00017930: 2022 6d22 2070 6f69 6e74 2d74 6f2d 7265 "m" point-to-re │ │ │ +00017940: 6769 7374 6572 2022 2722 2072 6567 6973 gister "'" regis │ │ │ +00017950: 7465 722d 746f 2d70 6f69 6e74 2022 4322 ter-to-point "C" │ │ │ +00017960: 2076 6965 772d 636c 6561 6e75 702d 6261 view-cleanup-ba │ │ │ +00017970: 636b 7370 6163 6573 2022 0303 2220 7669 ckspaces ".." vi │ │ │ +00017980: 6577 2d71 7569 7420 2218 1122 2076 6965 ew-quit ".." vie │ │ │ +00017990: 772d 7175 6974 2d74 6f67 676c 652d 726f w-quit-toggle-ro │ │ │ +000179a0: 2022 7122 2076 6965 772d 6d6f 6465 2d6d "q" view-mode-m │ │ │ +000179b0: 6170 2063 6f70 792d 6b65 796d 6170 5d20 ap copy-keymap] │ │ │ +000179c0: 3629 0a23 4038 3420 4669 6e64 2046 494c 6).#@84 Find FIL │ │ │ +000179d0: 454e 414d 452c 2065 6e74 6572 2076 6965 ENAME, enter vie │ │ │ +000179e0: 7720 6d6f 6465 2e20 2057 6974 6820 7072 w mode. With pr │ │ │ +000179f0: 6566 6978 2061 7267 204f 5448 4552 2d57 efix arg OTHER-W │ │ │ +00017a00: 494e 444f 572d 502c 2075 7365 206f 7468 INDOW-P, use oth │ │ │ +00017a10: 6572 2077 696e 646f 772e 1f0a 2861 7574 er window...(aut │ │ │ +00017a20: 6f6c 6f61 6420 2776 6965 772d 6669 6c65 oload 'view-file │ │ │ +00017a30: 2022 7669 6577 2d6c 6573 7322 2027 2823 "view-less" '(# │ │ │ +00017a40: 2420 2e20 3936 3731 3229 2074 206e 696c $ . 96712) t nil │ │ │ +00017a50: 290a 2340 3731 2053 7769 7463 6820 746f ).#@71 Switch to │ │ │ +00017a60: 2042 5546 4645 522c 2065 6e74 6572 2076 BUFFER, enter v │ │ │ +00017a70: 6965 7720 6d6f 6465 2e20 2057 6974 6820 iew mode. With │ │ │ +00017a80: 7072 6566 6978 2061 7267 2075 7365 206f prefix arg use o │ │ │ +00017a90: 7468 6572 2077 696e 646f 772e 1f0a 2861 ther window...(a │ │ │ +00017aa0: 7574 6f6c 6f61 6420 2776 6965 772d 6275 utoload 'view-bu │ │ │ +00017ab0: 6666 6572 2022 7669 6577 2d6c 6573 7322 ffer "view-less" │ │ │ +00017ac0: 2027 2823 2420 2e20 3936 3835 3529 2074 '(#$ . 96855) t │ │ │ +00017ad0: 206e 696c 290a 2340 3533 2046 696e 6420 nil).#@53 Find │ │ │ +00017ae0: 4649 4c45 4e41 4d45 2069 6e20 6f74 6865 FILENAME in othe │ │ │ +00017af0: 7220 7769 6e64 6f77 2c20 616e 6420 656e r window, and en │ │ │ +00017b00: 7465 7220 7669 6577 206d 6f64 652e 1f0a ter view mode... │ │ │ +00017b10: 2861 7574 6f6c 6f61 6420 2776 6965 772d (autoload 'view- │ │ │ +00017b20: 6669 6c65 2d6f 7468 6572 2d77 696e 646f file-other-windo │ │ │ +00017b30: 7720 2276 6965 772d 6c65 7373 2220 2728 w "view-less" '( │ │ │ +00017b40: 2324 202e 2039 3639 3837 2920 7420 6e69 #$ . 96987) t ni │ │ │ +00017b50: 6c29 0a23 4035 3820 5377 6974 6368 2074 l).#@58 Switch t │ │ │ +00017b60: 6f20 4255 4646 4552 2069 6e20 616e 6f74 o BUFFER in anot │ │ │ +00017b70: 6865 7220 7769 6e64 6f77 2c20 616e 6420 her window, and │ │ │ +00017b80: 656e 7465 7220 7669 6577 206d 6f64 652e enter view mode. │ │ │ +00017b90: 1f0a 2861 7574 6f6c 6f61 6420 2776 6965 ..(autoload 'vie │ │ │ +00017ba0: 772d 6275 6666 6572 2d6f 7468 6572 2d77 w-buffer-other-w │ │ │ +00017bb0: 696e 646f 7720 2276 6965 772d 6c65 7373 indow "view-less │ │ │ +00017bc0: 2220 2728 2324 202e 2039 3731 3132 2920 " '(#$ . 97112) │ │ │ +00017bd0: 7420 6e69 6c29 0a23 4031 3336 3720 4d69 t nil).#@1367 Mi │ │ │ +00017be0: 6e6f 7220 6d6f 6465 2066 6f72 2076 6965 nor mode for vie │ │ │ +00017bf0: 7769 6e67 2074 6578 742c 2077 6974 6820 wing text, with │ │ │ +00017c00: 6269 6e64 696e 6773 206c 696b 6520 606c bindings like `l │ │ │ +00017c10: 6573 7327 2e0a 436f 6d6d 616e 6473 2061 ess'..Commands a │ │ │ +00017c20: 7265 3a0a 5c3c 7669 6577 2d6d 696e 6f72 re:.\.0..9. │ │ │ +00017c40: 7072 6566 6978 2061 7267 730a 2d09 7072 prefix args.-.pr │ │ │ +00017c50: 6566 6978 206d 696e 7573 0a5c 5b73 6372 efix minus.\[scr │ │ │ +00017c60: 6f6c 6c2d 7570 5d09 7061 6765 2066 6f72 oll-up].page for │ │ │ +00017c70: 7761 7264 0a5c 5b73 6372 6f6c 6c2d 646f ward.\[scroll-do │ │ │ +00017c80: 776e 5d09 7061 6765 2062 6163 6b0a 5c5b wn].page back.\[ │ │ │ +00017c90: 7669 6577 2d73 6372 6f6c 6c2d 6c69 6e65 view-scroll-line │ │ │ +00017ca0: 732d 7570 5d09 7363 726f 6c6c 2070 7265 s-up].scroll pre │ │ │ +00017cb0: 6669 782d 6172 6720 6c69 6e65 7320 666f fix-arg lines fo │ │ │ +00017cc0: 7277 6172 642c 2064 6566 6175 6c74 2031 rward, default 1 │ │ │ +00017cd0: 2e0a 5c5b 7669 6577 2d73 6372 6f6c 6c2d ..\[view-scroll- │ │ │ +00017ce0: 6c69 6e65 732d 646f 776e 5d09 7363 726f lines-down].scro │ │ │ +00017cf0: 6c6c 2070 7265 6669 782d 6172 6720 6c69 ll prefix-arg li │ │ │ +00017d00: 6e65 7320 6261 636b 7761 7264 2c20 6465 nes backward, de │ │ │ +00017d10: 6661 756c 7420 312e 0a5c 5b76 6965 772d fault 1..\[view- │ │ │ +00017d20: 7363 726f 6c6c 2d73 6f6d 652d 6c69 6e65 scroll-some-line │ │ │ +00017d30: 732d 646f 776e 5d09 7363 726f 6c6c 2070 s-down].scroll p │ │ │ +00017d40: 7265 6669 782d 6172 6720 6c69 6e65 7320 refix-arg lines │ │ │ +00017d50: 6261 636b 7761 7264 2c20 6465 6661 756c backward, defaul │ │ │ +00017d60: 7420 3130 2e0a 5c5b 7669 6577 2d73 6372 t 10..\[view-scr │ │ │ +00017d70: 6f6c 6c2d 736f 6d65 2d6c 696e 6573 2d75 oll-some-lines-u │ │ │ +00017d80: 705d 0973 6372 6f6c 6c20 7072 6566 6978 p].scroll prefix │ │ │ +00017d90: 2d61 7267 206c 696e 6573 2066 6f72 7761 -arg lines forwa │ │ │ +00017da0: 7264 2c20 6465 6661 756c 7420 3130 2e0a rd, default 10.. │ │ │ +00017db0: 5c5b 7768 6174 2d6c 696e 655d 0970 7269 \[what-line].pri │ │ │ +00017dc0: 6e74 206c 696e 6520 6e75 6d62 6572 0a5c nt line number.\ │ │ │ +00017dd0: 5b76 6965 772d 6d6f 6465 2d64 6573 6372 [view-mode-descr │ │ │ +00017de0: 6962 655d 0970 7269 6e74 2074 6869 7320 ibe].print this │ │ │ +00017df0: 6865 6c70 206d 6573 7361 6765 0a5c 5b76 help message.\[v │ │ │ +00017e00: 6965 772d 7365 6172 6368 2d66 6f72 7761 iew-search-forwa │ │ │ +00017e10: 7264 5d09 7265 6765 7870 2073 6561 7263 rd].regexp searc │ │ │ +00017e20: 682c 2075 7365 7320 7072 6576 696f 7573 h, uses previous │ │ │ +00017e30: 2073 7472 696e 6720 6966 2079 6f75 206a string if you j │ │ │ +00017e40: 7573 7420 6869 7420 5245 540a 5c5b 7669 ust hit RET.\[vi │ │ │ +00017e50: 6577 2d73 6561 7263 682d 6261 636b 7761 ew-search-backwa │ │ │ +00017e60: 7264 5d09 6173 2061 626f 7665 2062 7574 rd].as above but │ │ │ +00017e70: 2073 6561 7263 6865 7320 6261 636b 7761 searches backwa │ │ │ +00017e80: 7264 0a5c 5b76 6965 772d 7265 7065 6174 rd.\[view-repeat │ │ │ +00017e90: 2d73 6561 7263 685d 0972 6570 6561 7420 -search].repeat │ │ │ +00017ea0: 6c61 7374 2073 6561 7263 680a 5c5b 7669 last search.\[vi │ │ │ +00017eb0: 6577 2d67 6f74 6f2d 6c69 6e65 5d09 676f ew-goto-line].go │ │ │ +00017ec0: 746f 206c 696e 6520 7072 6566 6978 2d61 to line prefix-a │ │ │ +00017ed0: 7267 2c20 6465 6661 756c 7420 310a 5c5b rg, default 1.\[ │ │ │ +00017ee0: 7669 6577 2d6c 6173 742d 7769 6e64 6f77 view-last-window │ │ │ +00017ef0: 6675 6c5d 0967 6f74 6f20 6c69 6e65 2070 ful].goto line p │ │ │ +00017f00: 7265 6669 782d 6172 672c 2064 6566 6175 refix-arg, defau │ │ │ +00017f10: 6c74 206c 6173 7420 6c69 6e65 0a5c 5b76 lt last line.\[v │ │ │ +00017f20: 6965 772d 676f 746f 2d70 6572 6365 6e74 iew-goto-percent │ │ │ +00017f30: 5d09 676f 746f 2061 2070 6f73 6974 696f ].goto a positio │ │ │ +00017f40: 6e20 6279 2070 6572 6365 6e74 6167 650a n by percentage. │ │ │ +00017f50: 5c5b 746f 6767 6c65 2d74 7275 6e63 6174 \[toggle-truncat │ │ │ +00017f60: 652d 6c69 6e65 735d 0974 6f67 676c 6520 e-lines].toggle │ │ │ +00017f70: 7472 756e 6361 7465 2d6c 696e 6573 0a5c truncate-lines.\ │ │ │ +00017f80: 5b76 6965 772d 6669 6c65 5d09 7669 6577 [view-file].view │ │ │ +00017f90: 2061 6e6f 7468 6572 2066 696c 650a 5c5b another file.\[ │ │ │ +00017fa0: 7669 6577 2d62 7566 6665 725d 0976 6965 view-buffer].vie │ │ │ +00017fb0: 7720 616e 6f74 6865 7220 6275 6666 6572 w another buffer │ │ │ +00017fc0: 0a5c 5b76 6965 772d 636c 6561 6e75 702d .\[view-cleanup- │ │ │ +00017fd0: 6261 636b 7370 6163 6573 5d09 636c 6561 backspaces].clea │ │ │ +00017fe0: 6e75 7020 6261 636b 7370 6163 6520 636f nup backspace co │ │ │ +00017ff0: 6e73 7472 7563 7469 6f6e 730a 5c5b 7368 nstructions.\[sh │ │ │ +00018000: 656c 6c2d 636f 6d6d 616e 645d 0965 7865 ell-command].exe │ │ │ +00018010: 6375 7465 2061 2073 6865 6c6c 2063 6f6d cute a shell com │ │ │ +00018020: 6d61 6e64 0a5c 5b73 6865 6c6c 2d63 6f6d mand.\[shell-com │ │ │ +00018030: 6d61 6e64 2d6f 6e2d 7265 6769 6f6e 5d09 mand-on-region]. │ │ │ +00018040: 6578 6563 7574 6520 6120 7368 656c 6c20 execute a shell │ │ │ +00018050: 636f 6d6d 616e 6420 7769 7468 2074 6865 command with the │ │ │ +00018060: 2072 6567 696f 6e20 6173 2069 6e70 7574 region as input │ │ │ +00018070: 0a5c 5b76 6965 772d 7175 6974 5d09 6578 .\[view-quit].ex │ │ │ +00018080: 6974 2076 6965 772d 6d6f 6465 2c20 616e it view-mode, an │ │ │ +00018090: 6420 6275 7279 2074 6865 2063 7572 7265 d bury the curre │ │ │ +000180a0: 6e74 2062 7566 6665 722e 0a0a 4966 2069 nt buffer...If i │ │ │ +000180b0: 6e76 6f6b 6564 2077 6974 6820 7468 6520 nvoked with the │ │ │ +000180c0: 6f70 7469 6f6e 616c 2028 7072 6566 6978 optional (prefix │ │ │ +000180d0: 2920 6172 6720 6e6f 6e2d 6e69 6c2c 2076 ) arg non-nil, v │ │ │ +000180e0: 6965 772d 6d6f 6465 2063 6c65 616e 7320 iew-mode cleans │ │ │ +000180f0: 7570 0a62 6163 6b73 7061 6365 2063 6f6e up.backspace con │ │ │ +00018100: 7374 7275 6374 696f 6e73 2e0a 0a4d 6f72 structions...Mor │ │ │ +00018110: 6520 7072 6563 6973 656c 793a 0a5c 7b76 e precisely:.\{v │ │ │ +00018120: 6965 772d 6d69 6e6f 722d 6d6f 6465 2d6d iew-minor-mode-m │ │ │ +00018130: 6170 7d1f 0a28 6175 746f 6c6f 6164 2027 ap}..(autoload ' │ │ │ +00018140: 7669 6577 2d6d 696e 6f72 2d6d 6f64 6520 view-minor-mode │ │ │ +00018150: 2276 6965 772d 6c65 7373 2220 2728 2324 "view-less" '(#$ │ │ │ +00018160: 202e 2039 3732 3436 2920 7420 6e69 6c29 . 97246) t nil) │ │ │ +00018170: 0a23 4031 3731 2056 6965 7720 7468 6520 .#@171 View the │ │ │ +00018180: 6375 7272 656e 7420 6275 6666 6572 2075 current buffer u │ │ │ +00018190: 7369 6e67 2076 6965 772d 6d69 6e6f 722d sing view-minor- │ │ │ +000181a0: 6d6f 6465 2e20 2054 6869 7320 6578 6973 mode. This exis │ │ │ +000181b0: 7473 2074 6f20 6265 2039 392e 3925 0a63 ts to be 99.9%.c │ │ │ +000181c0: 6f6d 7061 7469 626c 6520 7769 7468 2074 ompatible with t │ │ │ +000181d0: 6865 2069 6d70 6c65 6d65 6e74 6174 696f he implementatio │ │ │ +000181e0: 6e73 206f 6620 6076 6965 772d 6d6f 6465 ns of `view-mode │ │ │ +000181f0: 2720 696e 2076 6965 772e 656c 2061 6e64 ' in view.el and │ │ │ +00018200: 206f 6c64 6572 0a76 6572 7369 6f6e 7320 older.versions │ │ │ +00018210: 6f66 2076 6965 772d 6c65 7373 2e65 6c2e of view-less.el. │ │ │ +00018220: 1f0a 2861 7574 6f6c 6f61 6420 2776 6965 ..(autoload 'vie │ │ │ +00018230: 772d 6d6f 6465 2022 7669 6577 2d6c 6573 w-mode "view-les │ │ │ +00018240: 7322 2027 2823 2420 2e20 3938 3637 3929 s" '(#$ . 98679) │ │ │ +00018250: 2074 206e 696c 290a 2340 3137 3720 5669 t nil).#@177 Vi │ │ │ +00018260: 6577 2074 6865 2063 7572 7265 6e74 2062 ew the current b │ │ │ +00018270: 7566 6665 7220 7573 696e 6720 7669 6577 uffer using view │ │ │ +00018280: 2d6d 6f64 652c 2061 7320 6120 6d61 6a6f -mode, as a majo │ │ │ +00018290: 7220 6d6f 6465 2e0a 5468 6973 2066 756e r mode..This fun │ │ │ +000182a0: 6374 696f 6e20 6861 7320 6120 6e6f 6e73 ction has a nons │ │ │ +000182b0: 7461 6e64 6172 6420 6e61 6d65 2062 6563 tandard name bec │ │ │ +000182c0: 6175 7365 2060 7669 6577 2d6d 6f64 6527 ause `view-mode' │ │ │ +000182d0: 2069 7320 7772 6f6e 676c 790a 6e61 6d65 is wrongly.name │ │ │ +000182e0: 6420 6275 7420 6973 206c 696b 6520 7468 d but is like th │ │ │ +000182f0: 6973 2066 6f72 2063 6f6d 7061 7469 6269 is for compatibi │ │ │ +00018300: 6c69 7479 2072 6561 736f 6e73 2e1f 0a28 lity reasons...( │ │ │ +00018310: 6175 746f 6c6f 6164 2027 7669 6577 2d6d autoload 'view-m │ │ │ +00018320: 616a 6f72 2d6d 6f64 6520 2276 6965 772d ajor-mode "view- │ │ │ +00018330: 6c65 7373 2220 2728 2324 202e 2039 3839 less" '(#$ . 989 │ │ │ +00018340: 3130 2920 7420 6e69 6c29 0a23 4031 3136 10) t nil).#@116 │ │ │ +00018350: 2049 6620 7468 6520 6669 6c65 206f 6620 If the file of │ │ │ +00018360: 7468 6520 6375 7272 656e 7420 6275 6666 the current buff │ │ │ +00018370: 6572 2069 7320 6e6f 7420 7772 6974 6162 er is not writab │ │ │ +00018380: 6c65 2c20 6361 6c6c 2076 6965 772d 6d6f le, call view-mo │ │ │ +00018390: 6465 2e0a 5468 6973 2069 7320 6d65 616e de..This is mean │ │ │ +000183a0: 7420 746f 2062 6520 6164 6465 6420 746f t to be added to │ │ │ +000183b0: 2060 6669 6e64 2d66 696c 652d 686f 6f6b `find-file-hook │ │ │ +000183c0: 7327 2e1f 0a28 6175 746f 6c6f 6164 2027 s'...(autoload ' │ │ │ +000183d0: 6175 746f 2d76 6965 772d 6d6f 6465 2022 auto-view-mode " │ │ │ +000183e0: 7669 6577 2d6c 6573 7322 2027 2823 2420 view-less" '(#$ │ │ │ +000183f0: 2e20 3939 3135 3329 206e 696c 206e 696c . 99153) nil nil │ │ │ +00018400: 290a 2340 3834 2054 6f67 676c 6573 2074 ).#@84 Toggles t │ │ │ +00018410: 6865 2076 616c 7565 7320 6f66 2074 7275 he values of tru │ │ │ +00018420: 6e63 6174 652d 6c69 6e65 732e 0a50 6f73 ncate-lines..Pos │ │ │ +00018430: 6974 6976 6520 7072 6566 6978 2061 7267 itive prefix arg │ │ │ +00018440: 2073 6574 732c 206e 6567 6174 6976 6520 sets, negative │ │ │ +00018450: 6469 7361 626c 6573 2e1f 0a28 6175 746f disables...(auto │ │ │ +00018460: 6c6f 6164 2027 746f 6767 6c65 2d74 7275 load 'toggle-tru │ │ │ +00018470: 6e63 6174 652d 6c69 6e65 7320 2276 6965 ncate-lines "vie │ │ │ +00018480: 772d 6c65 7373 2220 2728 2324 202e 2039 w-less" '(#$ . 9 │ │ │ +00018490: 3933 3335 2920 7420 6e69 6c29 0a23 4033 9335) t nil).#@3 │ │ │ +000184a0: 3220 4272 6f77 7365 2074 6865 2077 6964 2 Browse the wid │ │ │ +000184b0: 6765 7420 756e 6465 7220 706f 696e 742e get under point. │ │ │ +000184c0: 1f0a 2861 7574 6f6c 6f61 6420 2777 6964 ..(autoload 'wid │ │ │ +000184d0: 6765 742d 6272 6f77 7365 2d61 7420 2277 get-browse-at "w │ │ │ +000184e0: 6964 2d62 726f 7773 6522 2027 2823 2420 id-browse" '(#$ │ │ │ +000184f0: 2e20 3939 3439 3029 2074 206e 696c 290a . 99490) t nil). │ │ │ +00018500: 2340 3337 2043 7265 6174 6520 6120 7769 #@37 Create a wi │ │ │ +00018510: 6467 6574 2062 726f 7773 6572 2066 6f72 dget browser for │ │ │ +00018520: 2057 4944 4745 542e 1f0a 2861 7574 6f6c WIDGET...(autol │ │ │ +00018530: 6f61 6420 2777 6964 6765 742d 6272 6f77 oad 'widget-brow │ │ │ +00018540: 7365 2022 7769 642d 6272 6f77 7365 2220 se "wid-browse" │ │ │ +00018550: 2728 2324 202e 2039 3935 3839 2920 7420 '(#$ . 99589) t │ │ │ +00018560: 6e69 6c29 0a23 4034 3920 5368 6f77 2077 nil).#@49 Show w │ │ │ +00018570: 6964 6765 7420 6272 6f77 7365 7220 666f idget browser fo │ │ │ +00018580: 7220 5749 4447 4554 2069 6e20 6f74 6865 r WIDGET in othe │ │ │ +00018590: 7220 7769 6e64 6f77 2e1f 0a28 6175 746f r window...(auto │ │ │ +000185a0: 6c6f 6164 2027 7769 6467 6574 2d62 726f load 'widget-bro │ │ │ +000185b0: 7773 652d 6f74 6865 722d 7769 6e64 6f77 wse-other-window │ │ │ +000185c0: 2022 7769 642d 6272 6f77 7365 2220 2728 "wid-browse" '( │ │ │ +000185d0: 2324 202e 2039 3936 3930 2920 7420 6e69 #$ . 99690) t ni │ │ │ +000185e0: 6c29 0a23 4031 3034 2054 6f67 6c65 206d l).#@104 Togle m │ │ │ +000185f0: 696e 6f72 206d 6f64 6520 666f 7220 7472 inor mode for tr │ │ │ +00018600: 6176 6572 7369 6e67 2077 6964 6765 7473 aversing widgets │ │ │ +00018610: 2e0a 5769 7468 2061 7267 2c20 7475 726e ..With arg, turn │ │ │ +00018620: 2077 6964 6765 7420 6d6f 6465 206f 6e20 widget mode on │ │ │ +00018630: 6966 2061 6e64 206f 6e6c 7920 6966 2061 if and only if a │ │ │ +00018640: 7267 2069 7320 706f 7369 7469 7665 2e1f rg is positive.. │ │ │ +00018650: 0a28 6175 746f 6c6f 6164 2027 7769 6467 .(autoload 'widg │ │ │ +00018660: 6574 2d6d 696e 6f72 2d6d 6f64 6520 2277 et-minor-mode "w │ │ │ +00018670: 6964 2d62 726f 7773 6522 2027 2823 2420 id-browse" '(#$ │ │ │ +00018680: 2e20 3939 3831 3729 2074 206e 696c 290a . 99817) t nil). │ │ │ +00018690: 2340 3132 3020 5072 6f6d 7074 2066 6f72 #@120 Prompt for │ │ │ +000186a0: 2061 2076 616c 7565 206d 6174 6368 696e a value matchin │ │ │ +000186b0: 6720 5749 4447 4554 2c20 7573 696e 6720 g WIDGET, using │ │ │ +000186c0: 5052 4f4d 5054 2e0a 5468 6520 6375 7272 PROMPT..The curr │ │ │ +000186d0: 656e 7420 7661 6c75 6520 6973 2061 7373 ent value is ass │ │ │ +000186e0: 756d 6564 2074 6f20 6265 2056 414c 5545 umed to be VALUE │ │ │ +000186f0: 2c20 756e 6c65 7373 2055 4e42 4f55 4e44 , unless UNBOUND │ │ │ +00018700: 2069 7320 6e6f 6e2d 6e69 6c2e 1f0a 2861 is non-nil...(a │ │ │ +00018710: 7574 6f6c 6f61 6420 2777 6964 6765 742d utoload 'widget- │ │ │ +00018720: 7072 6f6d 7074 2d76 616c 7565 2022 7769 prompt-value "wi │ │ │ +00018730: 642d 6564 6974 2220 2728 2324 202e 2039 d-edit" '(#$ . 9 │ │ │ +00018740: 3939 3930 2920 6e69 6c20 6e69 6c29 0a23 9990) nil nil).# │ │ │ +00018750: 4037 3620 4372 6561 7465 2077 6964 6765 @76 Create widge │ │ │ +00018760: 7420 6f66 2054 5950 452e 0a54 6865 206f t of TYPE..The o │ │ │ +00018770: 7074 696f 6e61 6c20 4152 4753 2061 7265 ptional ARGS are │ │ │ +00018780: 2061 6464 6974 696f 6e61 6c20 6b65 7977 additional keyw │ │ │ +00018790: 6f72 6420 6172 6775 6d65 6e74 732e 1f0a ord arguments... │ │ │ +000187a0: 2861 7574 6f6c 6f61 6420 2777 6964 6765 (autoload 'widge │ │ │ +000187b0: 742d 6372 6561 7465 2022 7769 642d 6564 t-create "wid-ed │ │ │ +000187c0: 6974 2220 2728 2324 202e 2031 3030 3138 it" '(#$ . 10018 │ │ │ +000187d0: 3029 206e 696c 206e 696c 290a 2340 3136 0) nil nil).#@16 │ │ │ +000187e0: 2044 656c 6574 6520 5749 4447 4554 2e1f Delete WIDGET.. │ │ │ +000187f0: 0a28 6175 746f 6c6f 6164 2027 7769 6467 .(autoload 'widg │ │ │ +00018800: 6574 2d64 656c 6574 6520 2277 6964 2d65 et-delete "wid-e │ │ │ +00018810: 6469 7422 2027 2823 2420 2e20 3130 3033 dit" '(#$ . 1003 │ │ │ +00018820: 3231 2920 6e69 6c20 6e69 6c29 0a23 4034 21) nil nil).#@4 │ │ │ +00018830: 3533 2047 656e 6572 6174 6573 2074 6865 53 Generates the │ │ │ +00018840: 2060 466f 6e74 272c 2060 5369 7a65 272c `Font', `Size', │ │ │ +00018850: 2061 6e64 2060 5765 6967 6874 2720 7375 and `Weight' su │ │ │ +00018860: 626d 656e 7573 2066 6f72 2074 6865 204f bmenus for the O │ │ │ +00018870: 7074 696f 6e73 206d 656e 752e 0a54 6869 ptions menu..Thi │ │ │ +00018880: 7320 6973 2072 756e 2074 6865 2066 6972 s is run the fir │ │ │ +00018890: 7374 2074 696d 6520 7468 6174 2061 2066 st time that a f │ │ │ +000188a0: 6f6e 742d 6d65 6e75 2069 7320 6e65 6564 ont-menu is need │ │ │ +000188b0: 6564 2066 6f72 2065 6163 6820 6465 7669 ed for each devi │ │ │ +000188c0: 6365 2e0a 4966 2079 6f75 2064 6f6e 2774 ce..If you don't │ │ │ +000188d0: 206c 696b 6520 7468 6520 6c61 7a79 2069 like the lazy i │ │ │ +000188e0: 6e76 6f63 6174 696f 6e20 6f66 2074 6869 nvocation of thi │ │ │ +000188f0: 7320 6675 6e63 7469 6f6e 2c20 796f 7520 s function, you │ │ │ +00018900: 6361 6e20 6164 6420 6974 2074 6f0a 6063 can add it to.`c │ │ │ +00018910: 7265 6174 652d 6465 7669 6365 2d68 6f6f reate-device-hoo │ │ │ +00018920: 6b27 2061 6e64 2074 6861 7420 7769 6c6c k' and that will │ │ │ +00018930: 206d 616b 6520 7468 6520 666f 6e74 206d make the font m │ │ │ +00018940: 656e 7573 2072 6573 706f 6e64 206d 6f72 enus respond mor │ │ │ +00018950: 6520 7175 6963 6b6c 790a 7768 656e 2074 e quickly.when t │ │ │ +00018960: 6865 7920 6172 6520 7365 6c65 6374 6564 hey are selected │ │ │ +00018970: 2066 6f72 2074 6865 2066 6972 7374 2074 for the first t │ │ │ +00018980: 696d 652e 2020 4966 2079 6f75 2061 6464 ime. If you add │ │ │ +00018990: 2066 6f6e 7473 2074 6f20 796f 7572 2073 fonts to your s │ │ │ +000189a0: 7973 7465 6d2c 200a 6f72 2069 6620 796f ystem, .or if yo │ │ │ +000189b0: 7520 6368 616e 6765 2079 6f75 7220 666f u change your fo │ │ │ +000189c0: 6e74 2070 6174 682c 2079 6f75 2063 616e nt path, you can │ │ │ +000189d0: 2063 616c 6c20 7468 6973 2074 6f20 7265 call this to re │ │ │ +000189e0: 2d69 6e69 7469 616c 697a 6520 7468 6520 -initialize the │ │ │ +000189f0: 6d65 6e75 732e 1f0a 2861 7574 6f6c 6f61 menus...(autoloa │ │ │ +00018a00: 6420 2778 2d72 6573 6574 2d64 6576 6963 d 'x-reset-devic │ │ │ +00018a10: 652d 666f 6e74 2d6d 656e 7573 2022 782d e-font-menus "x- │ │ │ +00018a20: 666f 6e74 2d6d 656e 7522 2027 2823 2420 font-menu" '(#$ │ │ │ +00018a30: 2e20 3130 3034 3033 2920 6e69 6c20 6e69 . 100403) nil ni │ │ │ +00018a40: 6c29 0a28 6279 7465 2d63 6f64 6520 22c0 l).(byte-code ". │ │ │ +00018a50: c1c2 c389 8925 88c0 c4c5 c389 8925 88c0 .....%.......%.. │ │ │ +00018a60: c6c7 c389 8925 88c8 c921 8722 205b 6175 .....%...!." [au │ │ │ +00018a70: 746f 6c6f 6164 2078 2d66 6f6e 742d 6d65 toload x-font-me │ │ │ +00018a80: 6e75 2d66 6f6e 742d 6461 7461 2022 782d nu-font-data "x- │ │ │ +00018a90: 666f 6e74 2d6d 656e 7522 206e 696c 2078 font-menu" nil x │ │ │ +00018aa0: 2d77 696e 2d69 6e69 742d 7375 6e20 2278 -win-init-sun "x │ │ │ +00018ab0: 2d77 696e 2d73 756e 2220 782d 7769 6e2d -win-sun" x-win- │ │ │ +00018ac0: 696e 6974 2d78 6672 6565 3836 2022 782d init-xfree86 "x- │ │ │ +00018ad0: 7769 6e2d 7866 7265 6538 3622 2070 726f win-xfree86" pro │ │ │ +00018ae0: 7669 6465 206c 6973 702d 6175 746f 6c6f vide lisp-autolo │ │ │ +00018af0: 6164 735d 2036 290a ads] 6). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/auto-save.elc │ │ │ @@ -1,667 +1,667 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3533 2032 eb 25 01:53:53 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f61 1-21.4.24/lisp/a │ │ │ -00000090: 7574 6f2d 7361 7665 2e65 6c0a 3b3b 3b20 uto-save.el.;;; │ │ │ -000000a0: 656d 6163 7320 7665 7273 696f 6e20 3231 emacs version 21 │ │ │ -000000b0: 2e34 2028 7061 7463 6820 3234 2920 2253 .4 (patch 24) "S │ │ │ -000000c0: 7461 6e64 6172 6420 4322 2058 456d 6163 tandard C" XEmac │ │ │ -000000d0: 7320 4c75 6369 642e 0a3b 3b3b 2062 7974 s Lucid..;;; byt │ │ │ -000000e0: 6563 6f6d 7020 7665 7273 696f 6e20 322e ecomp version 2. │ │ │ -000000f0: 3237 2058 456d 6163 733b 2032 3030 302d 27 XEmacs; 2000- │ │ │ -00000100: 3039 2d31 322e 0a3b 3b3b 206f 7074 696d 09-12..;;; optim │ │ │ -00000110: 697a 6174 696f 6e20 6973 206f 6e2e 0a3b ization is on..; │ │ │ -00000120: 3b3b 2074 6869 7320 6669 6c65 2075 7365 ;; this file use │ │ │ -00000130: 7320 6f70 636f 6465 7320 7768 6963 6820 s opcodes which │ │ │ -00000140: 646f 206e 6f74 2065 7869 7374 2069 6e20 do not exist in │ │ │ -00000150: 456d 6163 7320 3139 2e0a 0a28 6966 2028 Emacs 19...(if ( │ │ │ -00000160: 616e 6420 2862 6f75 6e64 7020 2765 6d61 and (boundp 'ema │ │ │ -00000170: 6373 2d76 6572 7369 6f6e 290a 0920 286f cs-version).. (o │ │ │ -00000180: 7220 2861 6e64 2028 626f 756e 6470 2027 r (and (boundp ' │ │ │ -00000190: 6570 6f63 683a 3a76 6572 7369 6f6e 2920 epoch::version) │ │ │ -000001a0: 6570 6f63 683a 3a76 6572 7369 6f6e 290a epoch::version). │ │ │ -000001b0: 0920 2020 2020 2873 7472 696e 672d 6c65 . (string-le │ │ │ -000001c0: 7373 7020 656d 6163 732d 7665 7273 696f ssp emacs-versio │ │ │ -000001d0: 6e20 2232 3022 2929 290a 2020 2020 2865 n "20"))). (e │ │ │ -000001e0: 7272 6f72 2022 6061 7574 6f2d 7361 7665 rror "`auto-save │ │ │ -000001f0: 2e65 6c27 2077 6173 2063 6f6d 7069 6c65 .el' was compile │ │ │ -00000200: 6420 666f 7220 456d 6163 7320 3230 2229 d for Emacs 20") │ │ │ -00000210: 290a 0a28 6f72 2028 626f 756e 6470 2027 )..(or (boundp ' │ │ │ -00000220: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ -00000230: 7429 2028 7365 7471 2063 7572 7265 6e74 t) (setq current │ │ │ -00000240: 2d6c 6f61 642d 6c69 7374 206e 696c 2929 -load-list nil)) │ │ │ -00000250: 0a0a 0a23 4033 3020 5665 7273 696f 6e20 ...#@30 Version │ │ │ -00000260: 6e75 6d62 6572 206f 6620 6175 746f 2d73 number of auto-s │ │ │ -00000270: 6176 652e 1f0a 2864 6566 636f 6e73 7420 ave...(defconst │ │ │ -00000280: 6175 746f 2d73 6176 652d 7665 7273 696f auto-save-versio │ │ │ -00000290: 6e20 2231 2e32 3622 2028 2324 202e 2036 n "1.26" (#$ . 6 │ │ │ -000002a0: 3030 2929 0a28 6279 7465 2d63 6f64 6520 00)).(byte-code │ │ │ -000002b0: 22c0 c121 88c2 c1c3 c4c5 c625 88c7 c8c9 "..!.......%.... │ │ │ -000002c0: ca23 88c7 c8cb cc23 88cd c1c8 ce23 8722 .#.....#.....#." │ │ │ -000002d0: 205b 7072 6f76 6964 6520 6175 746f 2d73 [provide auto-s │ │ │ -000002e0: 6176 6520 6375 7374 6f6d 2d64 6563 6c61 ave custom-decla │ │ │ -000002f0: 7265 2d67 726f 7570 206e 696c 2022 4175 re-group nil "Au │ │ │ -00000300: 746f 7361 7669 6e67 2077 6974 6820 7375 tosaving with su │ │ │ -00000310: 7070 6f72 7420 666f 7220 6566 7320 616e pport for efs an │ │ │ -00000320: 6420 2f74 6d70 2e22 203a 6772 6f75 7020 d /tmp." :group │ │ │ -00000330: 6461 7461 2070 7574 2061 7574 6f2d 7361 data put auto-sa │ │ │ -00000340: 7665 2d69 6e74 6572 7661 6c20 6375 7374 ve-interval cust │ │ │ -00000350: 6f6d 2d74 7970 6520 696e 7465 6765 7220 om-type integer │ │ │ -00000360: 6661 6374 6f72 792d 7661 6c75 6520 2833 factory-value (3 │ │ │ -00000370: 3030 2920 6375 7374 6f6d 2d61 6464 2d74 00) custom-add-t │ │ │ -00000380: 6f2d 6772 6f75 7020 6375 7374 6f6d 2d76 o-group custom-v │ │ │ -00000390: 6172 6961 626c 655d 2036 290a 2863 7573 ariable] 6).(cus │ │ │ -000003a0: 746f 6d2d 6465 636c 6172 652d 7661 7269 tom-declare-vari │ │ │ -000003b0: 6162 6c65 2027 6175 746f 2d73 6176 652d able 'auto-save- │ │ │ -000003c0: 6469 7265 6374 6f72 7920 276e 696c 2022 directory 'nil " │ │ │ -000003d0: 4966 206e 6f6e 2d6e 696c 2c20 6669 7865 If non-nil, fixe │ │ │ -000003e0: 6420 6469 7265 6374 6f72 7920 666f 7220 d directory for │ │ │ -000003f0: 6175 746f 7361 7669 6e67 3a20 616c 6c20 autosaving: all │ │ │ -00000400: 6175 746f 7361 7665 2066 696c 6573 2067 autosave files g │ │ │ -00000410: 6f5c 6e74 6865 7265 2e20 2049 6620 7468 o\nthere. If th │ │ │ -00000420: 6973 2064 6972 6563 746f 7279 2064 6f65 is directory doe │ │ │ -00000430: 7320 6e6f 7420 7965 7420 6578 6973 7420 s not yet exist │ │ │ -00000440: 6174 206c 6f61 6420 7469 6d65 2c20 6974 at load time, it │ │ │ -00000450: 2069 735c 6e63 7265 6174 6564 2061 6e64 is\ncreated and │ │ │ -00000460: 2069 7473 206d 6f64 6520 6973 2073 6574 its mode is set │ │ │ -00000470: 2074 6f20 3037 3030 2073 6f20 7468 6174 to 0700 so that │ │ │ -00000480: 206e 6f62 6f64 7920 656c 7365 2063 616e nobody else can │ │ │ -00000490: 2072 6561 6420 796f 7572 5c6e 6175 746f read your\nauto │ │ │ -000004a0: 7361 7665 2066 696c 6573 2e5c 6e5c 6e49 save files.\n\nI │ │ │ -000004b0: 6620 6e69 6c2c 2065 6163 6820 6175 746f f nil, each auto │ │ │ -000004c0: 7361 7665 2066 696c 6573 2067 6f65 7320 save files goes │ │ │ -000004d0: 696e 746f 2074 6865 2073 616d 6520 6469 into the same di │ │ │ -000004e0: 7265 6374 6f72 7920 6173 2069 7473 5c6e rectory as its\n │ │ │ -000004f0: 636f 7272 6573 706f 6e64 696e 6720 7669 corresponding vi │ │ │ -00000500: 7369 7465 6420 6669 6c65 2e5c 6e5c 6e41 sited file.\n\nA │ │ │ -00000510: 206e 6f6e 2d6e 696c 2060 6175 746f 2d73 non-nil `auto-s │ │ │ -00000520: 6176 652d 6469 7265 6374 6f72 7927 2063 ave-directory' c │ │ │ -00000530: 6f75 6c64 2062 6520 6f6e 2061 206c 6f63 ould be on a loc │ │ │ -00000540: 616c 2064 6973 6b20 7375 6368 2061 7320 al disk such as │ │ │ -00000550: 696e 5c6e 2f74 6d70 2c20 7468 656e 2061 in\n/tmp, then a │ │ │ -00000560: 7574 6f2d 7361 7665 7320 7769 6c6c 2061 uto-saves will a │ │ │ -00000570: 6c77 6179 7320 6265 2066 6173 742c 2065 lways be fast, e │ │ │ -00000580: 7665 6e20 6966 204e 4653 206f 7220 7468 ven if NFS or th │ │ │ -00000590: 655c 6e61 7574 6f6d 6f75 6e74 6572 2069 e\nautomounter i │ │ │ -000005a0: 7320 736c 6f77 2e20 2049 6e20 7468 6520 s slow. In the │ │ │ -000005b0: 7573 7561 6c20 6361 7365 206f 6620 2f74 usual case of /t │ │ │ -000005c0: 6d70 2062 6569 6e67 206c 6f63 616c 6c79 mp being locally │ │ │ -000005d0: 206d 6f75 6e74 6564 2c5c 6e6e 6f74 6520 mounted,\nnote │ │ │ -000005e0: 7468 6174 2069 6620 796f 7520 7275 6e20 that if you run │ │ │ -000005f0: 656d 6163 7320 6f6e 2074 776f 2064 6966 emacs on two dif │ │ │ -00000600: 6665 7265 6e74 206d 6163 6869 6e65 732c ferent machines, │ │ │ -00000610: 2074 6865 7920 7769 6c6c 206e 6f74 5c6e they will not\n │ │ │ -00000620: 7365 6520 6561 6368 206f 7468 6572 2773 see each other's │ │ │ -00000630: 2061 7574 6f2d 7361 7665 2066 696c 6573 auto-save files │ │ │ -00000640: 2e5c 6e5c 6e54 6865 2076 616c 7565 2028 .\n\nThe value ( │ │ │ -00000650: 6578 7061 6e64 2d66 696c 652d 6e61 6d65 expand-file-name │ │ │ -00000660: 205c 227e 2f2e 6175 746f 7361 7665 2f5c \"~/.autosave/\ │ │ │ -00000670: 2229 206d 6967 6874 2062 6520 6265 7474 ") might be bett │ │ │ -00000680: 6572 2069 6620 2f74 6d70 5c6e 6973 206d er if /tmp\nis m │ │ │ -00000690: 6f75 6e74 6564 2066 726f 6d20 7377 6170 ounted from swap │ │ │ -000006a0: 2028 706f 7373 6962 6c65 2069 6e20 5375 (possible in Su │ │ │ -000006b0: 6e4f 532c 2074 7970 6520 6064 6620 2f74 nOS, type `df /t │ │ │ -000006c0: 6d70 2720 746f 2066 696e 6420 6f75 7429 mp' to find out) │ │ │ -000006d0: 5c6e 616e 6420 7468 7573 2076 616e 6973 \nand thus vanis │ │ │ -000006e0: 6865 7320 6166 7465 7220 6120 7265 626f hes after a rebo │ │ │ -000006f0: 6f74 2c20 6f72 2069 6620 796f 7572 2073 ot, or if your s │ │ │ -00000700: 7973 7465 6d20 6973 2070 6172 7469 6375 ystem is particu │ │ │ -00000710: 6c61 726c 795c 6e74 686f 726f 7567 6820 larly\nthorough │ │ │ -00000720: 7768 656e 2063 6c65 616e 696e 6720 7570 when cleaning up │ │ │ -00000730: 202f 746d 702c 2063 6c65 6172 696e 6720 /tmp, clearing │ │ │ -00000740: 6576 656e 206e 6f6e 2d65 6d70 7479 2073 even non-empty s │ │ │ -00000750: 7562 6469 7265 6374 6f72 6965 732e 5c6e ubdirectories.\n │ │ │ -00000760: 5c6e 4974 2073 686f 756c 6420 6e65 7665 \nIt should neve │ │ │ -00000770: 7220 6265 2061 6e20 6566 7320 7265 6d6f r be an efs remo │ │ │ -00000780: 7465 2066 696c 656e 616d 6520 6265 6361 te filename beca │ │ │ -00000790: 7573 6520 7468 6174 2077 6f75 6c64 5c6e use that would\n │ │ │ -000007a0: 6465 6665 6174 2060 6566 732d 6175 746f defeat `efs-auto │ │ │ -000007b0: 2d73 6176 652d 7265 6d6f 7465 6c79 272e -save-remotely'. │ │ │ -000007c0: 5c6e 5c6e 556e 6c65 7373 2079 6f75 2073 \n\nUnless you s │ │ │ -000007d0: 6574 2060 6175 746f 2d73 6176 652d 6861 et `auto-save-ha │ │ │ -000007e0: 7368 2d70 272c 2079 6f75 2073 686f 756c sh-p', you shoul │ │ │ -000007f0: 646e 2774 2073 6574 2074 6869 7320 746f dn't set this to │ │ │ -00000800: 2061 5c6e 6469 7265 6374 6f72 7920 696e a\ndirectory in │ │ │ -00000810: 2061 2066 696c 6573 7973 7465 6d20 7468 a filesystem th │ │ │ -00000820: 6174 2064 6f65 7320 6e6f 7420 7375 7070 at does not supp │ │ │ -00000830: 6f72 7420 6c6f 6e67 2066 696c 656e 616d ort long filenam │ │ │ -00000840: 6573 2c20 7369 6e63 655c 6e61 2066 696c es, since\na fil │ │ │ -00000850: 6520 6e61 6d65 645c 6e5c 6e20 2020 202f e named\n\n / │ │ │ -00000860: 686f 6d65 2f73 6b2f 6c69 622f 656d 6163 home/sk/lib/emac │ │ │ -00000870: 732f 6c69 7370 2f61 7574 6f2d 7361 7665 s/lisp/auto-save │ │ │ -00000880: 2e65 6c5c 6e5c 6e77 696c 6c20 6861 7665 .el\n\nwill have │ │ │ -00000890: 2061 206c 6f6e 6769 7368 2066 696c 656e a longish filen │ │ │ -000008a0: 616d 6520 6c69 6b65 5c6e 5c6e 2020 2020 ame like\n\n │ │ │ -000008b0: 4155 544f 2d53 4156 452d 4449 5245 4354 AUTO-SAVE-DIRECT │ │ │ -000008c0: 4f52 592f 233d 3246 686f 6d65 3d32 4673 ORY/#=2Fhome=2Fs │ │ │ -000008d0: 6b3d 3246 6c69 623d 3246 656d 6163 733d k=2Flib=2Femacs= │ │ │ -000008e0: 3246 6c69 7370 3d32 4661 7574 6f2d 7361 2Flisp=2Fauto-sa │ │ │ -000008f0: 7665 2e65 6c23 5c6e 5c6e 6173 2061 7574 ve.el#\n\nas aut │ │ │ -00000900: 6f20 7361 7665 2066 696c 652e 5c6e 5c6e o save file.\n\n │ │ │ -00000910: 5365 6520 616c 736f 2076 6172 6961 626c See also variabl │ │ │ -00000920: 6573 2060 6175 746f 2d73 6176 652d 6469 es `auto-save-di │ │ │ -00000930: 7265 6374 6f72 792d 6661 6c6c 6261 636b rectory-fallback │ │ │ -00000940: 272c 5c6e 6065 6673 2d61 7574 6f2d 7361 ',\n`efs-auto-sa │ │ │ -00000950: 7665 2720 616e 6420 6065 6673 2d61 7574 ve' and `efs-aut │ │ │ -00000960: 6f2d 7361 7665 2d72 656d 6f74 656c 7927 o-save-remotely' │ │ │ -00000970: 2e22 203a 7479 7065 2027 2863 686f 6963 ." :type '(choic │ │ │ -00000980: 6520 2863 6f6e 7374 203a 7461 6720 2253 e (const :tag "S │ │ │ -00000990: 616d 6520 6173 2066 696c 6522 206e 696c ame as file" nil │ │ │ -000009a0: 2920 6469 7265 6374 6f72 7929 203a 6772 ) directory) :gr │ │ │ -000009b0: 6f75 7020 2761 7574 6f2d 7361 7665 290a oup 'auto-save). │ │ │ -000009c0: 2863 7573 746f 6d2d 6465 636c 6172 652d (custom-declare- │ │ │ -000009d0: 7661 7269 6162 6c65 2027 6175 746f 2d73 variable 'auto-s │ │ │ -000009e0: 6176 652d 6861 7368 2d70 2027 6e69 6c20 ave-hash-p 'nil │ │ │ -000009f0: 2249 6620 6e6f 6e2d 6e69 6c2c 2068 6173 "If non-nil, has │ │ │ -00000a00: 6865 6420 6175 746f 7361 7665 206e 616d hed autosave nam │ │ │ -00000a10: 6573 206f 6620 6c65 6e67 7468 2031 3420 es of length 14 │ │ │ -00000a20: 6172 6520 7573 6564 2e5c 6e54 6869 7320 are used.\nThis │ │ │ -00000a30: 6973 2074 6f20 6176 6f69 6420 6175 746f is to avoid auto │ │ │ -00000a40: 7361 7665 2066 696c 656e 616d 6573 206c save filenames l │ │ │ -00000a50: 6f6e 6765 7220 7468 616e 2031 3420 6368 onger than 14 ch │ │ │ -00000a60: 6172 6163 7465 7273 2e5c 6e54 6865 2064 aracters.\nThe d │ │ │ -00000a70: 6972 6563 746f 7279 2075 7365 6420 6973 irectory used is │ │ │ -00000a80: 2060 6175 746f 2d73 6176 652d 6861 7368 `auto-save-hash │ │ │ -00000a90: 2d64 6972 6563 746f 7279 2720 7265 6761 -directory' rega │ │ │ -00000aa0: 7264 6c65 7373 206f 665c 6e60 6175 746f rdless of\n`auto │ │ │ -00000ab0: 2d73 6176 652d 6469 7265 6374 6f72 7927 -save-directory' │ │ │ -00000ac0: 2e5c 6e48 6173 6869 6e67 2064 6566 6561 .\nHashing defea │ │ │ -00000ad0: 7473 2060 7265 636f 7665 722d 616c 6c2d ts `recover-all- │ │ │ -00000ae0: 6669 6c65 7327 2c20 796f 7520 6861 7665 files', you have │ │ │ -00000af0: 2074 6f20 7265 636f 7665 7220 6669 6c65 to recover file │ │ │ -00000b00: 735c 6e69 6e64 6976 6964 7561 6c6c 7920 s\nindividually │ │ │ -00000b10: 6279 2064 6f69 6e67 2060 7265 636f 7665 by doing `recove │ │ │ -00000b20: 722d 6669 6c65 272e 2220 3a74 7970 6520 r-file'." :type │ │ │ -00000b30: 2762 6f6f 6c65 616e 203a 6772 6f75 7020 'boolean :group │ │ │ -00000b40: 2761 7574 6f2d 7361 7665 290a 2862 7974 'auto-save).(byt │ │ │ -00000b50: 652d 636f 6465 2022 c1c2 21ac 8ec2 0842 e-code "..!....B │ │ │ -00000b60: 10c3 c221 ac85 c4c2 c55c 2288 c1c6 21ac ...!.....\"...!. │ │ │ -00000b70: 8ec6 0842 10c3 c621 ac85 c4c6 c75c 2288 ...B...!.....\". │ │ │ -00000b80: c787 2220 5b63 7572 7265 6e74 2d6c 6f61 .." [current-loa │ │ │ -00000b90: 642d 6c69 7374 2062 6f75 6e64 7020 6566 d-list boundp ef │ │ │ -00000ba0: 732d 6175 746f 2d73 6176 6520 6465 6661 s-auto-save defa │ │ │ -00000bb0: 756c 742d 626f 756e 6470 2073 6574 2d64 ult-boundp set-d │ │ │ -00000bc0: 6566 6175 6c74 2030 2065 6673 2d61 7574 efault 0 efs-aut │ │ │ -00000bd0: 6f2d 7361 7665 2d72 656d 6f74 656c 7920 o-save-remotely │ │ │ -00000be0: 6e69 6c5d 2033 290a 2863 7573 746f 6d2d nil] 3).(custom- │ │ │ -00000bf0: 6465 636c 6172 652d 7661 7269 6162 6c65 declare-variable │ │ │ -00000c00: 2027 6175 746f 2d73 6176 652d 6f66 6665 'auto-save-offe │ │ │ -00000c10: 722d 6465 6c65 7465 2027 6e69 6c20 222a r-delete 'nil "* │ │ │ -00000c20: 4966 206e 6f6e 2d6e 696c 2c20 6072 6563 If non-nil, `rec │ │ │ -00000c30: 6f76 6572 2d61 6c6c 2d66 696c 6573 2720 over-all-files' │ │ │ -00000c40: 6f66 6665 7273 2074 6f20 6465 6c65 7465 offers to delete │ │ │ -00000c50: 2061 7574 6f73 6176 6520 6669 6c65 735c autosave files\ │ │ │ -00000c60: 6e74 6861 7420 6172 6520 6f75 7420 6f66 nthat are out of │ │ │ -00000c70: 2064 6174 6520 6f72 2077 6572 6520 6469 date or were di │ │ │ -00000c80: 736d 6973 7365 6420 666f 7220 7265 636f smissed for reco │ │ │ -00000c90: 7665 7269 6e67 2e5c 6e53 7065 6369 616c vering.\nSpecial │ │ │ -00000ca0: 2076 616c 7565 2027 616c 7761 7973 2064 value 'always d │ │ │ -00000cb0: 656c 6574 6573 2074 686f 7365 2066 696c eletes those fil │ │ │ -00000cc0: 6573 2073 696c 656e 746c 792e 2220 3a74 es silently." :t │ │ │ -00000cd0: 7970 6520 2728 6368 6f69 6365 2028 636f ype '(choice (co │ │ │ -00000ce0: 6e73 7420 3a74 6167 2022 6f6e 2220 7429 nst :tag "on" t) │ │ │ -00000cf0: 2028 636f 6e73 7420 3a74 6167 2022 6f66 (const :tag "of │ │ │ -00000d00: 6622 206e 696c 2920 2863 6f6e 7374 203a f" nil) (const : │ │ │ -00000d10: 7461 6720 2244 656c 6574 6520 7369 6c65 tag "Delete sile │ │ │ -00000d20: 6e74 6c79 2220 616c 7761 7973 2929 203a ntly" always)) : │ │ │ -00000d30: 6772 6f75 7020 2761 7574 6f2d 7361 7665 group 'auto-save │ │ │ -00000d40: 290a 2340 3239 3020 4469 7265 6374 6f72 ).#@290 Director │ │ │ -00000d50: 7920 7573 6564 2066 6f72 206c 6f63 616c y used for local │ │ │ -00000d60: 2061 7574 6f73 6176 696e 6720 6f66 2072 autosaving of r │ │ │ -00000d70: 656d 6f74 6520 6669 6c65 7320 6966 0a62 emote files if.b │ │ │ -00000d80: 6f74 6820 6061 7574 6f2d 7361 7665 2d64 oth `auto-save-d │ │ │ -00000d90: 6972 6563 746f 7279 2720 616e 6420 6065 irectory' and `e │ │ │ -00000da0: 6673 2d61 7574 6f2d 7361 7665 2d72 656d fs-auto-save-rem │ │ │ -00000db0: 6f74 656c 7927 2061 7265 206e 696c 2e0a otely' are nil.. │ │ │ -00000dc0: 416c 736f 2075 7365 6420 6966 2061 2077 Also used if a w │ │ │ -00000dd0: 6f72 6b69 6e67 2064 6972 6563 746f 7279 orking directory │ │ │ -00000de0: 2074 6f20 6265 2075 7365 6420 666f 7220 to be used for │ │ │ -00000df0: 6175 746f 7361 7669 6e67 2069 7320 6e6f autosaving is no │ │ │ -00000e00: 7420 7772 6974 6162 6c65 2e0a 5468 6973 t writable..This │ │ │ -00000e10: 202a 6d75 7374 2a20 616c 7761 7973 2062 *must* always b │ │ │ -00000e20: 6520 7468 6520 6e61 6d65 206f 6620 6469 e the name of di │ │ │ -00000e30: 7265 6374 6f72 7920 7468 6174 2065 7869 rectory that exi │ │ │ -00000e40: 7374 7320 6f72 2063 616e 2062 650a 6372 sts or can be.cr │ │ │ -00000e50: 6561 7465 6420 6279 2079 6f75 2c20 6e65 eated by you, ne │ │ │ -00000e60: 7665 7220 6e69 6c2e 1f0a 2864 6566 7661 ver nil...(defva │ │ │ -00000e70: 7220 6175 746f 2d73 6176 652d 6469 7265 r auto-save-dire │ │ │ -00000e80: 6374 6f72 792d 6661 6c6c 6261 636b 2022 ctory-fallback " │ │ │ -00000e90: 7e2f 2e61 7574 6f73 6176 652f 2220 2823 ~/.autosave/" (# │ │ │ -00000ea0: 2420 2e20 3334 3030 2929 0a23 4035 3920 $ . 3400)).#@59 │ │ │ -00000eb0: 4966 206e 6f6e 2d6e 696c 2c20 6469 7265 If non-nil, dire │ │ │ -00000ec0: 6374 6f72 7920 7573 6564 2066 6f72 2068 ctory used for h │ │ │ -00000ed0: 6173 6865 6420 6175 746f 7361 7665 2066 ashed autosave f │ │ │ -00000ee0: 696c 656e 616d 6573 2e1f 0a28 6465 6676 ilenames...(defv │ │ │ -00000ef0: 6172 2061 7574 6f2d 7361 7665 2d68 6173 ar auto-save-has │ │ │ -00000f00: 682d 6469 7265 6374 6f72 7920 2862 7974 h-directory (byt │ │ │ -00000f10: 652d 636f 6465 2022 c2c3 09ae 8108 5c22 e-code "......\" │ │ │ -00000f20: 8722 205b 6175 746f 2d73 6176 652d 6469 ." [auto-save-di │ │ │ -00000f30: 7265 6374 6f72 792d 6661 6c6c 6261 636b rectory-fallback │ │ │ -00000f40: 2061 7574 6f2d 7361 7665 2d64 6972 6563 auto-save-direc │ │ │ -00000f50: 746f 7279 2065 7870 616e 642d 6669 6c65 tory expand-file │ │ │ -00000f60: 2d6e 616d 6520 2268 6173 682f 225d 2033 -name "hash/"] 3 │ │ │ -00000f70: 2920 2823 2420 2e20 3337 3630 2929 0a23 ) (#$ . 3760)).# │ │ │ -00000f80: 4037 3120 4d61 6b65 2073 7572 6520 7468 @71 Make sure th │ │ │ -00000f90: 6520 6469 7265 6374 6f72 7920 4449 5220 e directory DIR │ │ │ -00000fa0: 6578 6973 7473 2061 6e64 2072 6574 7572 exists and retur │ │ │ -00000fb0: 6e20 6974 2065 7870 616e 6465 6420 6966 n it expanded if │ │ │ -00000fc0: 206e 6f6e 2d6e 696c 2e1f 0a28 6465 6661 non-nil...(defa │ │ │ -00000fd0: 6c69 6173 2027 6175 746f 2d73 6176 652d lias 'auto-save- │ │ │ -00000fe0: 6368 6563 6b65 642d 6469 7265 6374 6f72 checked-director │ │ │ -00000ff0: 7920 235b 2864 6972 2920 2208 ad97 c108 y #[(dir) "..... │ │ │ -00001000: 2110 c208 21ac 8dc3 0821 10c4 0821 88c5 !...!....!...!.. │ │ │ -00001010: 08c6 5c22 8808 8722 205b 6469 7220 6578 ..\"..." [dir ex │ │ │ -00001020: 7061 6e64 2d66 696c 652d 6e61 6d65 2066 pand-file-name f │ │ │ -00001030: 696c 652d 6469 7265 6374 6f72 792d 7020 ile-directory-p │ │ │ -00001040: 6469 7265 6374 6f72 792d 6669 6c65 2d6e directory-file-n │ │ │ -00001050: 616d 6520 6d61 6b65 2d64 6972 6563 746f ame make-directo │ │ │ -00001060: 7279 2073 6574 2d66 696c 652d 6d6f 6465 ry set-file-mode │ │ │ -00001070: 7320 3434 385d 2033 2028 2324 202e 2033 s 448] 3 (#$ . 3 │ │ │ -00001080: 3937 3229 5d29 0a23 4039 3232 2052 6574 972)]).#@922 Ret │ │ │ -00001090: 7572 6e20 6669 6c65 206e 616d 6520 746f urn file name to │ │ │ -000010a0: 2075 7365 2066 6f72 2061 7574 6f2d 7361 use for auto-sa │ │ │ -000010b0: 7665 7320 6f66 2063 7572 7265 6e74 2062 ves of current b │ │ │ -000010c0: 7566 6665 722e 0a44 6f65 7320 6e6f 7420 uffer..Does not │ │ │ -000010d0: 636f 6e73 6964 6572 2060 6175 746f 2d73 consider `auto-s │ │ │ -000010e0: 6176 652d 7669 7369 7465 642d 6669 6c65 ave-visited-file │ │ │ -000010f0: 2d6e 616d 6527 3b20 7468 6174 2069 7320 -name'; that is │ │ │ -00001100: 6368 6563 6b65 640a 6265 666f 7265 2063 checked.before c │ │ │ -00001110: 616c 6c69 6e67 2074 6869 7320 6675 6e63 alling this func │ │ │ -00001120: 7469 6f6e 2e0a 0a4f 6666 6572 7320 746f tion...Offers to │ │ │ -00001130: 2061 7574 6f73 6176 6520 616c 6c20 6669 autosave all fi │ │ │ -00001140: 6c65 7320 696e 2074 6865 2073 616d 6520 les in the same │ │ │ -00001150: 6061 7574 6f2d 7361 7665 2d64 6972 6563 `auto-save-direc │ │ │ -00001160: 746f 7279 272e 2020 416c 6c0a 6175 746f tory'. All.auto │ │ │ -00001170: 7361 7665 2066 696c 6573 2063 616e 2074 save files can t │ │ │ -00001180: 6865 6e20 6265 2072 6563 6f76 6572 6564 hen be recovered │ │ │ -00001190: 2061 7420 6f6e 6365 2077 6974 6820 6675 at once with fu │ │ │ -000011a0: 6e63 7469 6f6e 0a60 7265 636f 7665 722d nction.`recover- │ │ │ -000011b0: 616c 6c2d 6669 6c65 7327 2e0a 0a54 616b all-files'...Tak │ │ │ -000011c0: 6573 2063 6172 6520 746f 206d 616b 6520 es care to make │ │ │ -000011d0: 6175 746f 7361 7665 2066 696c 6573 2066 autosave files f │ │ │ -000011e0: 6f72 2066 696c 6573 2061 6363 6573 7365 or files accesse │ │ │ -000011f0: 6420 7468 726f 7567 6820 6566 730a 6265 d through efs.be │ │ │ -00001200: 206c 6f63 616c 2066 696c 6573 2069 6620 local files if │ │ │ -00001210: 7661 7269 6162 6c65 2060 6566 732d 6175 variable `efs-au │ │ │ -00001220: 746f 2d73 6176 652d 7265 6d6f 7465 6c79 to-save-remotely │ │ │ -00001230: 2720 6973 206e 696c 2e0a 0a54 616b 6573 ' is nil...Takes │ │ │ -00001240: 2063 6172 6520 6f66 2073 6c61 7368 6573 care of slashes │ │ │ -00001250: 2069 6e20 6275 6666 6572 206e 616d 6573 in buffer names │ │ │ -00001260: 2074 6f20 7072 6576 656e 7420 6175 746f to prevent auto │ │ │ -00001270: 7361 7665 2065 7272 6f72 732e 0a0a 5461 save errors...Ta │ │ │ -00001280: 6b65 7320 6361 7265 2074 6861 7420 6175 kes care that au │ │ │ -00001290: 746f 7361 7665 2066 696c 6573 2066 6f72 tosave files for │ │ │ -000012a0: 2062 7566 6665 7273 206e 6f74 2076 6973 buffers not vis │ │ │ -000012b0: 6974 696e 6720 616e 7920 6669 6c65 2028 iting any file ( │ │ │ -000012c0: 7375 6368 0a61 7320 602a 6d61 696c 2a27 such.as `*mail*' │ │ │ -000012d0: 2920 6672 6f6d 2074 776f 2073 696d 756c ) from two simul │ │ │ -000012e0: 7461 6e65 6f75 7320 456d 6163 7365 7320 taneous Emacses │ │ │ -000012f0: 646f 6e27 7420 636f 6c6c 6964 6520 6279 don't collide by │ │ │ -00001300: 2070 7265 7065 6e64 696e 670a 7468 6520 prepending.the │ │ │ -00001310: 456d 6163 7320 7069 642e 0a0a 5573 6573 Emacs pid...Uses │ │ │ -00001320: 2031 3420 6368 6172 6163 7465 7220 6175 14 character au │ │ │ -00001330: 746f 7361 7665 206e 616d 6573 2069 6620 tosave names if │ │ │ -00001340: 6061 7574 6f2d 7361 7665 2d68 6173 682d `auto-save-hash- │ │ │ -00001350: 7027 2069 7320 7472 7565 2e0a 0a41 7574 p' is true...Aut │ │ │ -00001360: 6f73 6176 6573 2065 7665 6e20 6966 2074 osaves even if t │ │ │ -00001370: 6865 2063 7572 7265 6e74 2064 6972 6563 he current direc │ │ │ -00001380: 746f 7279 2069 7320 6e6f 7420 7772 6974 tory is not writ │ │ │ -00001390: 6162 6c65 2c20 7573 696e 670a 6469 7265 able, using.dire │ │ │ -000013a0: 6374 6f72 7920 6061 7574 6f2d 7361 7665 ctory `auto-save │ │ │ -000013b0: 2d64 6972 6563 746f 7279 2d66 616c 6c62 -directory-fallb │ │ │ -000013c0: 6163 6b27 2e0a 0a59 6f75 2063 616e 2072 ack'...You can r │ │ │ -000013d0: 6564 6566 696e 6520 7468 6973 2066 6f72 edefine this for │ │ │ -000013e0: 2063 7573 746f 6d69 7a61 7469 6f6e 2028 customization ( │ │ │ -000013f0: 6865 2068 6520 3a2d 292e 0a53 6565 2061 he he :-)..See a │ │ │ -00001400: 6c73 6f20 6675 6e63 7469 6f6e 2060 6175 lso function `au │ │ │ -00001410: 746f 2d73 6176 652d 6669 6c65 2d6e 616d to-save-file-nam │ │ │ -00001420: 652d 7027 2e1f 0a28 6465 6661 6c69 6173 e-p'...(defalias │ │ │ -00001430: 2027 6d61 6b65 2d61 7574 6f2d 7361 7665 'make-auto-save │ │ │ -00001440: 2d66 696c 652d 6e61 6d65 2023 5b28 266f -file-name #[(&o │ │ │ -00001450: 7074 696f 6e61 6c20 6669 6c65 2d6e 616d ptional file-nam │ │ │ -00001460: 6529 2022 5c6e ae89 08ae 8609 ad83 c309 e) "\n.......... │ │ │ -00001470: 2112 c4c5 c68f 8722 205b 6275 6666 6572 !......" [buffer │ │ │ -00001480: 2d66 696c 652d 7472 7565 6e61 6d65 2062 -file-truename b │ │ │ -00001490: 7566 6665 722d 6669 6c65 2d6e 616d 6520 uffer-file-name │ │ │ -000014a0: 6669 6c65 2d6e 616d 6520 6578 7061 6e64 file-name expand │ │ │ -000014b0: 2d66 696c 652d 6e61 6d65 2065 7272 6f72 -file-name error │ │ │ -000014c0: 2d64 6174 6120 2862 7974 652d 636f 6465 -data (byte-code │ │ │ -000014d0: 2022 0c3f ad81 c60c ae84 c7c8 2021 0c3b ".?........ !.; │ │ │ -000014e0: ad88 c9ca 21ad 83ca 0c21 1a1d 1bcb 5c6e ....!....!....\n │ │ │ -000014f0: ab8d 09ab 85cc 0d21 aa96 cd0d 21aa 9108 .......!....!... │ │ │ -00001500: ac84 0e0e ab86 cd0d 0b5c 22aa 84cc 0d0b .........\"..... │ │ │ -00001510: 5c22 212b 8722 205b 6175 746f 2d73 6176 \"!+." [auto-sav │ │ │ -00001520: 652d 6469 7265 6374 6f72 7920 6566 732d e-directory efs- │ │ │ -00001530: 6175 746f 2d73 6176 652d 7265 6d6f 7465 auto-save-remote │ │ │ -00001540: 6c79 2072 656d 6f74 652d 7020 6e61 6d65 ly remote-p name │ │ │ -00001550: 2d70 7265 6669 7820 6669 6c65 2d6e 616d -prefix file-nam │ │ │ -00001560: 6520 7361 7665 2d6e 616d 6520 2223 2522 e save-name "#%" │ │ │ -00001570: 2061 7574 6f2d 7361 7665 2d65 7363 6170 auto-save-escap │ │ │ -00001580: 652d 6e61 6d65 2062 7566 6665 722d 6e61 e-name buffer-na │ │ │ -00001590: 6d65 2066 626f 756e 6470 2065 6673 2d66 me fboundp efs-f │ │ │ -000015a0: 7470 2d70 6174 6820 6578 7061 6e64 2d66 tp-path expand-f │ │ │ -000015b0: 696c 652d 6e61 6d65 2061 7574 6f2d 7361 ile-name auto-sa │ │ │ -000015c0: 7665 2d6e 616d 652d 696e 2d73 616d 652d ve-name-in-same- │ │ │ -000015d0: 6469 7265 6374 6f72 7920 6175 746f 2d73 directory auto-s │ │ │ -000015e0: 6176 652d 6e61 6d65 2d69 6e2d 6669 7865 ave-name-in-fixe │ │ │ -000015f0: 642d 6469 7265 6374 6f72 7920 6175 746f d-directory auto │ │ │ -00001600: 2d73 6176 652d 6861 7368 2d70 5d20 3429 -save-hash-p] 4) │ │ │ -00001610: 2028 2865 7272 6f72 2028 6279 7465 2d63 ((error (byte-c │ │ │ -00001620: 6f64 6520 22c3 c4c5 0821 5c22 8809 ab8b ode "....!\".... │ │ │ -00001630: c609 21c7 c809 21c7 52aa 89c9 cacb cc20 ..!...!.R...... │ │ │ -00001640: 21c7 5121 1acd 5c6e 21ac 85ce 5c6e 21ab !.Q!..\n!...\n!. │ │ │ -00001650: 835c 6eaa 87c9 cfc8 5c6e 2150 2129 8722 .\n.....\n!P!)." │ │ │ -00001660: 205b 6572 726f 722d 6461 7461 2066 696c [error-data fil │ │ │ -00001670: 652d 6e61 6d65 2066 6e61 6d65 2077 6172 e-name fname war │ │ │ -00001680: 6e20 2245 7272 6f72 2063 6175 6768 7420 n "Error caught │ │ │ -00001690: 696e 2060 6d61 6b65 2d61 7574 6f2d 7361 in `make-auto-sa │ │ │ -000016a0: 7665 2d66 696c 652d 6e61 6d65 273a 5c6e ve-file-name':\n │ │ │ -000016b0: 2573 2220 6572 726f 722d 6d65 7373 6167 %s" error-messag │ │ │ -000016c0: 652d 7374 7269 6e67 2066 696c 652d 6e61 e-string file-na │ │ │ -000016d0: 6d65 2d64 6972 6563 746f 7279 2022 2322 me-directory "#" │ │ │ -000016e0: 2066 696c 652d 6e61 6d65 2d6e 6f6e 6469 file-name-nondi │ │ │ -000016f0: 7265 6374 6f72 7920 6578 7061 6e64 2d66 rectory expand-f │ │ │ -00001700: 696c 652d 6e61 6d65 2022 2325 2220 6175 ile-name "#%" au │ │ │ -00001710: 746f 2d73 6176 652d 6573 6361 7065 2d6e to-save-escape-n │ │ │ -00001720: 616d 6520 6275 6666 6572 2d6e 616d 6520 ame buffer-name │ │ │ -00001730: 6669 6c65 2d77 7269 7461 626c 652d 7020 file-writable-p │ │ │ -00001740: 6669 6c65 2d65 7869 7374 732d 7020 227e file-exists-p "~ │ │ │ -00001750: 2f22 5d20 3429 2929 5d20 3320 2823 2420 /"] 4)))] 3 (#$ │ │ │ -00001760: 2e20 3432 3337 295d 290a 2340 3134 3520 . 4237)]).#@145 │ │ │ -00001770: 5265 7475 726e 206e 6f6e 2d6e 696c 2069 Return non-nil i │ │ │ -00001780: 6620 4649 4c45 4e41 4d45 2063 616e 2062 f FILENAME can b │ │ │ -00001790: 6520 7969 656c 6465 6420 6279 2060 6d61 e yielded by `ma │ │ │ -000017a0: 6b65 2d61 7574 6f2d 7361 7665 2d66 696c ke-auto-save-fil │ │ │ -000017b0: 652d 6e61 6d65 272e 0a46 494c 454e 414d e-name'..FILENAM │ │ │ -000017c0: 4520 7368 6f75 6c64 206c 6163 6b20 736c E should lack sl │ │ │ -000017d0: 6173 6865 732e 0a59 6f75 2063 616e 2072 ashes..You can r │ │ │ -000017e0: 6564 6566 696e 6520 7468 6973 2066 6f72 edefine this for │ │ │ -000017f0: 2063 7573 746f 6d69 7a61 7469 6f6e 2e1f customization.. │ │ │ -00001800: 0a28 6465 6661 6c69 6173 2027 6175 746f .(defalias 'auto │ │ │ -00001810: 2d73 6176 652d 6669 6c65 2d6e 616d 652d -save-file-name- │ │ │ -00001820: 7020 235b 2866 696c 656e 616d 6529 2022 p #[(filename) " │ │ │ -00001830: c1c2 085c 2287 2220 5b66 696c 656e 616d ...\"." [filenam │ │ │ -00001840: 6520 7374 7269 6e67 2d6d 6174 6368 2022 e string-match " │ │ │ -00001850: 5c5c 6023 2e2a 235c 5c27 225d 2033 2028 \\`#.*#\\'"] 3 ( │ │ │ -00001860: 2324 202e 2036 3030 3029 5d29 0a23 4032 #$ . 6000)]).#@2 │ │ │ -00001870: 3532 2052 6576 6572 7365 206f 6620 606d 52 Reverse of `m │ │ │ -00001880: 616b 652d 6175 746f 2d73 6176 652d 6669 ake-auto-save-fi │ │ │ -00001890: 6c65 2d6e 616d 6527 2e0a 5265 7475 726e le-name'..Return │ │ │ -000018a0: 7320 6e69 6c20 6966 2053 4156 454e 414d s nil if SAVENAM │ │ │ -000018b0: 4520 7761 7320 6e6f 7420 6173 736f 6369 E was not associ │ │ │ -000018c0: 6174 6564 2077 6974 6820 6120 6669 6c65 ated with a file │ │ │ -000018d0: 2028 652e 672e 2c20 6974 2063 616d 650a (e.g., it came. │ │ │ -000018e0: 6672 6f6d 2061 6e20 6175 746f 7361 7665 from an autosave │ │ │ -000018f0: 6420 602a 6d61 696c 2a27 2062 7566 6665 d `*mail*' buffe │ │ │ -00001900: 7229 206f 7220 646f 6573 206e 6f74 2061 r) or does not a │ │ │ -00001910: 7070 6561 7220 746f 2062 6520 616e 0a61 ppear to be an.a │ │ │ -00001920: 7574 6f73 6176 6520 6669 6c65 2061 7420 utosave file at │ │ │ -00001930: 616c 6c2e 0a48 6173 6865 6420 6669 6c65 all..Hashed file │ │ │ -00001940: 7320 6172 6520 6e6f 7420 756e 6465 7273 s are not unders │ │ │ -00001950: 746f 6f64 2c20 7365 6520 6061 7574 6f2d tood, see `auto- │ │ │ -00001960: 7361 7665 2d68 6173 682d 7027 2e1f 0a28 save-hash-p'...( │ │ │ -00001970: 6465 6661 6c69 6173 2027 6175 746f 2d73 defalias 'auto-s │ │ │ -00001980: 6176 652d 6f72 6967 696e 616c 2d6e 616d ave-original-nam │ │ │ -00001990: 6520 235b 2873 6176 656e 616d 6529 2022 e #[(savename) " │ │ │ -000019a0: c55c 6e21 c65c 6e21 1b1c c70c 213f ae84 .\n!.\n!....!?.. │ │ │ -000019b0: c8c9 0c5c 223f ad9f 0b09 ad83 ca09 216b ...\"?........!k │ │ │ -000019c0: ac87 0bca 0821 6bab 88cb 0ccc cd4f 21aa .....!k......O!. │ │ │ -000019d0: 860b 0ccc cd4f 502a 8722 205b 6175 746f .....OP*." [auto │ │ │ -000019e0: 2d73 6176 652d 6469 7265 6374 6f72 792d -save-directory- │ │ │ -000019f0: 6661 6c6c 6261 636b 2061 7574 6f2d 7361 fallback auto-sa │ │ │ -00001a00: 7665 2d64 6972 6563 746f 7279 2073 6176 ve-directory sav │ │ │ -00001a10: 656e 616d 6520 7361 7665 6469 7220 6261 ename savedir ba │ │ │ -00001a20: 7365 6e61 6d65 2066 696c 652d 6e61 6d65 sename file-name │ │ │ -00001a30: 2d6e 6f6e 6469 7265 6374 6f72 7920 6669 -nondirectory fi │ │ │ -00001a40: 6c65 2d6e 616d 652d 6469 7265 6374 6f72 le-name-director │ │ │ -00001a50: 7920 6175 746f 2d73 6176 652d 6669 6c65 y auto-save-file │ │ │ -00001a60: 2d6e 616d 652d 7020 7374 7269 6e67 2d6d -name-p string-m │ │ │ -00001a70: 6174 6368 2022 5e23 2522 2065 7870 616e atch "^#%" expan │ │ │ -00001a80: 642d 6669 6c65 2d6e 616d 6520 6175 746f d-file-name auto │ │ │ -00001a90: 2d73 6176 652d 756e 6573 6361 7065 2d6e -save-unescape-n │ │ │ -00001aa0: 616d 6520 3120 2d31 5d20 3420 2823 2420 ame 1 -1] 4 (#$ │ │ │ -00001ab0: 2e20 3632 3539 295d 290a 2864 6566 616c . 6259)]).(defal │ │ │ -00001ac0: 6961 7320 2761 7574 6f2d 7361 7665 2d6e ias 'auto-save-n │ │ │ -00001ad0: 616d 652d 696e 2d66 6978 6564 2d64 6972 ame-in-fixed-dir │ │ │ -00001ae0: 6563 746f 7279 2023 5b28 6669 6c65 6e61 ectory #[(filena │ │ │ -00001af0: 6d65 2026 6f70 7469 6f6e 616c 2070 7265 me &optional pre │ │ │ -00001b00: 6669 7829 2022 5c6e ae81 c6c7 0c21 c651 fix) "\n.....!.Q │ │ │ -00001b10: 1d09 ab93 0bab 900d 47c8 56ab 8ac9 ca0c ........G.V..... │ │ │ -00001b20: 21cb 0b21 5c22 aa8a c90d cb08 ae82 0e0c !..!\".......... │ │ │ -00001b30: 215c 2229 8722 205b 6175 746f 2d73 6176 !\")." [auto-sav │ │ │ -00001b40: 652d 6469 7265 6374 6f72 7920 6175 746f e-directory auto │ │ │ -00001b50: 2d73 6176 652d 6861 7368 2d70 2070 7265 -save-hash-p pre │ │ │ -00001b60: 6669 7820 6175 746f 2d73 6176 652d 6861 fix auto-save-ha │ │ │ -00001b70: 7368 2d64 6972 6563 746f 7279 2066 696c sh-directory fil │ │ │ -00001b80: 656e 616d 6520 6261 7365 2d6e 616d 6520 ename base-name │ │ │ -00001b90: 2223 2220 6175 746f 2d73 6176 652d 6573 "#" auto-save-es │ │ │ -00001ba0: 6361 7065 2d6e 616d 6520 3134 2065 7870 cape-name 14 exp │ │ │ -00001bb0: 616e 642d 6669 6c65 2d6e 616d 6520 6175 and-file-name au │ │ │ -00001bc0: 746f 2d73 6176 652d 6379 636c 6963 2d68 to-save-cyclic-h │ │ │ -00001bd0: 6173 682d 3134 2061 7574 6f2d 7361 7665 ash-14 auto-save │ │ │ -00001be0: 2d63 6865 636b 6564 2d64 6972 6563 746f -checked-directo │ │ │ -00001bf0: 7279 2061 7574 6f2d 7361 7665 2d64 6972 ry auto-save-dir │ │ │ -00001c00: 6563 746f 7279 2d66 616c 6c62 6163 6b5d ectory-fallback] │ │ │ -00001c10: 2034 5d29 0a28 6465 6661 6c69 6173 2027 4]).(defalias ' │ │ │ -00001c20: 6175 746f 2d73 6176 652d 6e61 6d65 2d69 auto-save-name-i │ │ │ -00001c30: 6e2d 7361 6d65 2d64 6972 6563 746f 7279 n-same-directory │ │ │ -00001c40: 2023 5b28 6669 6c65 6e61 6d65 2026 6f70 #[(filename &op │ │ │ -00001c50: 7469 6f6e 616c 2070 7265 6669 7829 2022 tional prefix) " │ │ │ -00001c60: c45c 6e21 891b ab89 c50b 21ac 84c6 0921 .\n!......!....! │ │ │ -00001c70: 130b 08ae 81c7 c85c 6e21 c752 2987 2220 .......\n!.R)." │ │ │ -00001c80: 5b70 7265 6669 7820 6175 746f 2d73 6176 [prefix auto-sav │ │ │ -00001c90: 652d 6469 7265 6374 6f72 792d 6661 6c6c e-directory-fall │ │ │ -00001ca0: 6261 636b 2066 696c 656e 616d 6520 6469 back filename di │ │ │ -00001cb0: 7265 6374 6f72 7920 6669 6c65 2d6e 616d rectory file-nam │ │ │ -00001cc0: 652d 6469 7265 6374 6f72 7920 6669 6c65 e-directory file │ │ │ -00001cd0: 2d77 7269 7461 626c 652d 7020 6175 746f -writable-p auto │ │ │ -00001ce0: 2d73 6176 652d 6368 6563 6b65 642d 6469 -save-checked-di │ │ │ -00001cf0: 7265 6374 6f72 7920 2223 2220 6669 6c65 rectory "#" file │ │ │ -00001d00: 2d6e 616d 652d 6e6f 6e64 6972 6563 746f -name-nondirecto │ │ │ -00001d10: 7279 5d20 355d 290a 2340 3134 3820 4c69 ry] 5]).#@148 Li │ │ │ -00001d20: 7374 206f 6620 6368 6172 6163 7465 7273 st of characters │ │ │ -00001d30: 2064 6973 616c 6c6f 7765 6420 286f 7220 disallowed (or │ │ │ -00001d40: 706f 7465 6e74 6961 6c6c 7920 6469 7361 potentially disa │ │ │ -00001d50: 6c6c 6f77 6564 2920 696e 2066 696c 656e llowed) in filen │ │ │ -00001d60: 616d 6573 2e0a 496e 636c 7564 6573 2065 ames..Includes e │ │ │ -00001d70: 7665 7279 7468 696e 6720 7468 6174 2063 verything that c │ │ │ -00001d80: 616e 2067 6574 2075 7320 696e 746f 2074 an get us into t │ │ │ -00001d90: 726f 7562 6c65 2075 6e64 6572 204d 5320 rouble under MS │ │ │ -00001da0: 5769 6e64 6f77 7320 6f72 2055 6e69 782e Windows or Unix. │ │ │ -00001db0: 1f0a 2864 6566 636f 6e73 7420 6175 746f ..(defconst auto │ │ │ -00001dc0: 2d73 6176 652d 7265 7365 7276 6564 2d63 -save-reserved-c │ │ │ -00001dd0: 6861 7273 2027 283f 5c5e 4020 3f5c 5e41 hars '(?\^@ ?\^A │ │ │ -00001de0: 203f 5c5e 4220 3f5c 5e43 203f 5c5e 4420 ?\^B ?\^C ?\^D │ │ │ -00001df0: 3f5c 5e45 203f 5c5e 4620 3f5c 5e47 203f ?\^E ?\^F ?\^G ? │ │ │ -00001e00: 5c5e 4820 3f5c 7420 3f5c 6e20 3f5c 5e4b \^H ?\t ?\n ?\^K │ │ │ -00001e10: 203f 5c5e 4c20 3f5c 7220 3f5c 5e4e 203f ?\^L ?\r ?\^N ? │ │ │ -00001e20: 5c5e 4f20 3f5c 5e50 203f 5c5e 5120 3f5c \^O ?\^P ?\^Q ?\ │ │ │ -00001e30: 5e52 203f 5c5e 5320 3f5c 5e54 203f 5c5e ^R ?\^S ?\^T ?\^ │ │ │ -00001e40: 5520 3f5c 5e56 203f 5c5e 5720 3f5c 5e58 U ?\^V ?\^W ?\^X │ │ │ -00001e50: 203f 5c5e 5920 3f5c 5e5a 203f 5c5e 5b20 ?\^Y ?\^Z ?\^[ │ │ │ -00001e60: 3f5c 5e5c 5c20 3f5c 5e5d 203f 5c5e 5e20 ?\^\\ ?\^] ?\^^ │ │ │ -00001e70: 3f5c 5e5f 203f 5c20 203f 5c3f 203f 2a20 ?\^_ ?\ ?\? ?* │ │ │ -00001e80: 3f3a 203f 3c20 3f3e 203f 7c20 3f2f 203f ?: ?< ?> ?| ?/ ? │ │ │ -00001e90: 5c5c 203f 2620 3f5e 203f 2520 3f3d 203f \\ ?& ?^ ?% ?= ? │ │ │ -00001ea0: 5c22 2920 2823 2420 2e20 3734 3534 2929 \") (#$ . 7454)) │ │ │ -00001eb0: 0a23 4032 3335 2045 7363 6170 6520 616e .#@235 Escape an │ │ │ -00001ec0: 7920 6576 696c 206e 6173 7479 2063 6861 y evil nasty cha │ │ │ -00001ed0: 7261 6374 6572 7320 696e 2061 2070 6f74 racters in a pot │ │ │ -00001ee0: 656e 7469 616c 2066 696c 656e 616d 652e ential filename. │ │ │ -00001ef0: 0a55 7365 7320 7175 6f74 6564 2d70 7269 .Uses quoted-pri │ │ │ -00001f00: 6e74 6162 6c65 2d73 7479 6c65 2065 7363 ntable-style esc │ │ │ -00001f10: 6170 696e 6720 2d2d 2065 2e67 2e20 7468 aping -- e.g. th │ │ │ -00001f20: 6520 6472 6561 6465 6420 3d33 442e 0a44 e dreaded =3D..D │ │ │ -00001f30: 6f65 7320 6e6f 7420 7573 6520 5552 4c20 oes not use URL │ │ │ -00001f40: 6573 6361 7069 6e67 2028 7769 7468 2025 escaping (with % │ │ │ -00001f50: 2920 6265 6361 7573 6520 6669 6c65 6e61 ) because filena │ │ │ -00001f60: 6d65 7320 6265 6769 6e6e 696e 6720 7769 mes beginning wi │ │ │ -00001f70: 7468 2023 2520 6172 650a 6120 7370 6563 th #% are.a spec │ │ │ -00001f80: 6961 6c20 7369 676e 616c 2066 6f72 206e ial signal for n │ │ │ -00001f90: 6f6e 2d66 696c 6520 6275 6666 6572 732e on-file buffers. │ │ │ -00001fa0: 1f0a 2864 6566 616c 6961 7320 2761 7574 ..(defalias 'aut │ │ │ -00001fb0: 6f2d 7361 7665 2d65 7363 6170 652d 6e61 o-save-escape-na │ │ │ -00001fc0: 6d65 2023 5b28 7374 7229 2022 c1c2 08c3 me #[(str) ".... │ │ │ -00001fd0: 2387 2220 5b73 7472 206d 6170 636f 6e63 #." [str mapconc │ │ │ -00001fe0: 6174 2023 5b28 6368 6172 2920 2209 0873 at #[(char) "..s │ │ │ -00001ff0: ab91 09c2 57ab 86c3 c409 5c22 9687 c3c5 ....W.....\".... │ │ │ -00002000: 095c 2296 87c6 0921 8722 205b 6175 746f .\"....!." [auto │ │ │ -00002010: 2d73 6176 652d 7265 7365 7276 6564 2d63 -save-reserved-c │ │ │ -00002020: 6861 7273 2063 6861 7220 3136 2066 6f72 hars char 16 for │ │ │ -00002030: 6d61 7420 223d 3025 7822 2022 3d25 7822 mat "=0%x" "=%x" │ │ │ -00002040: 2063 6861 722d 746f 2d73 7472 696e 675d char-to-string] │ │ │ -00002050: 2033 5d20 2222 5d20 3420 2823 2420 2e20 3] ""] 4 (#$ . │ │ │ -00002060: 3738 3633 295d 290a 2864 6566 616c 6961 7863)]).(defalia │ │ │ -00002070: 7320 2761 7574 6f2d 7361 7665 2d75 6e68 s 'auto-save-unh │ │ │ -00002080: 6578 2023 5b28 7829 2022 08c1 56ab 9108 ex #[(x) "..V... │ │ │ -00002090: c259 ab86 08c2 5ac3 5c5c 8708 c45a c35c .Y....Z.\\...Z.\ │ │ │ -000020a0: 5c87 08c5 5a87 2220 5b78 203f 3920 3f61 \...Z." [x ?9 ?a │ │ │ -000020b0: 2031 3020 3f41 203f 305d 2032 5d29 0a23 10 ?A ?0] 2]).# │ │ │ -000020c0: 4038 3920 556e 646f 2061 6e79 2065 7363 @89 Undo any esc │ │ │ -000020d0: 6170 696e 6720 6f66 2065 7669 6c20 6e61 aping of evil na │ │ │ -000020e0: 7374 7920 6368 6172 6163 7465 7273 2069 sty characters i │ │ │ -000020f0: 6e20 6120 6669 6c65 206e 616d 652e 0a53 n a file name..S │ │ │ -00002100: 6565 2060 6175 746f 2d73 6176 652d 6573 ee `auto-save-es │ │ │ -00002110: 6361 7065 2d6e 616d 6527 2e1f 0a28 6465 cape-name'...(de │ │ │ -00002120: 6661 6c69 6173 2027 6175 746f 2d73 6176 falias 'auto-sav │ │ │ -00002130: 652d 756e 6573 6361 7065 2d6e 616d 6520 e-unescape-name │ │ │ -00002140: 235b 2873 7472 2920 220d ae81 c615 c6c7 #[(str) "....... │ │ │ -00002150: 191c c8c9 0d5c 22ab a9ca 941b cb0d 0b54 .....\"........T │ │ │ -00002160: 9c21 8918 cc5f cb0d 0bcd 5c5c 9c21 5c5c .!..._....\\.!\\ │ │ │ -00002170: 1a0c 0dca 0b4f ce5c 6e21 5114 0dca 95cf .....O.\n!Q..... │ │ │ -00002180: 4f15 2baa 510c 0d50 8914 2a87 2220 5b63 O.+.Q..P..*." [c │ │ │ -00002190: 6831 2063 6173 652d 666f 6c64 2d73 6561 h1 case-fold-sea │ │ │ -000021a0: 7263 6820 636f 6465 2073 7461 7274 2074 rch code start t │ │ │ -000021b0: 6d70 2073 7472 2022 2220 7420 7374 7269 mp str "" t stri │ │ │ -000021c0: 6e67 2d6d 6174 6368 2022 3d5b 302d 3961 ng-match "=[0-9a │ │ │ -000021d0: 2d66 5d5b 302d 3961 2d66 5d22 2030 2061 -f][0-9a-f]" 0 a │ │ │ -000021e0: 7574 6f2d 7361 7665 2d75 6e68 6578 2031 uto-save-unhex 1 │ │ │ -000021f0: 3620 3220 6368 6172 2d74 6f2d 7374 7269 6 2 char-to-stri │ │ │ -00002200: 6e67 206e 696c 5d20 3620 2823 2420 2e20 ng nil] 6 (#$ . │ │ │ -00002210: 3833 3838 295d 290a 2864 6566 616c 6961 8388)]).(defalia │ │ │ -00002220: 7320 2761 7574 6f2d 7361 7665 2d63 7963 s 'auto-save-cyc │ │ │ -00002230: 6c69 632d 6861 7368 2d31 3420 235b 2873 lic-hash-14 #[(s │ │ │ -00002240: 2920 22c2 c3c4 5c22 19c5 c608 5c22 88c7 ) "...\"....\".. │ │ │ -00002250: c8c9 09ca 48cb 5c22 c909 cc48 cb5c 22c9 ....H.\"...H.\". │ │ │ -00002260: 09cd 48cb 5c22 c909 ce48 cb5c 22c9 09cf ..H.\"...H.\"... │ │ │ -00002270: 48cb 5c22 c909 d048 cb5c 22c9 09d1 48cb H.\"...H.\"...H. │ │ │ -00002280: 5c22 2608 2987 2220 5b73 2063 7263 206d \"&.)." [s crc m │ │ │ -00002290: 616b 652d 7665 6374 6f72 2037 203f 5c5e ake-vector 7 ?\^ │ │ │ -000022a0: 4020 6d61 7063 2023 5b28 6e65 7729 2022 @ mapc #[(new) " │ │ │ -000022b0: 0809 c248 5c5c 1009 c209 c348 085c 5c49 ...H\\.....H.\\I │ │ │ -000022c0: 8809 c309 c448 4988 09c4 09c5 4849 8809 .....HI.....HI.. │ │ │ -000022d0: c509 c648 085c 5c49 8809 c609 c748 4988 ...H.\\I.....HI. │ │ │ -000022e0: 09c7 09c8 4849 8809 c808 4987 2220 5b6e ....HI....I." [n │ │ │ -000022f0: 6577 2063 7263 2036 2035 2034 2033 2032 ew crc 6 5 4 3 2 │ │ │ -00002300: 2031 2030 5d20 345d 2066 6f72 6d61 7420 1 0] 4] format │ │ │ -00002310: 2225 3032 7825 3032 7825 3032 7825 3032 "%02x%02x%02x%02 │ │ │ -00002320: 7825 3032 7825 3032 7825 3032 7822 206c x%02x%02x%02x" l │ │ │ -00002330: 6f67 616e 6420 3020 3235 3520 3120 3220 ogand 0 255 1 2 │ │ │ -00002340: 3320 3420 3520 365d 2031 315d 290a 2340 3 4 5 6] 11]).#@ │ │ │ -00002350: 3437 3020 446f 2072 6563 6f76 6572 2d66 470 Do recover-f │ │ │ -00002360: 696c 6520 666f 7220 616c 6c20 6175 746f ile for all auto │ │ │ -00002370: 7361 7665 2066 696c 6573 2077 6869 6368 save files which │ │ │ -00002380: 2061 7265 2063 7572 7265 6e74 2e0a 4f6e are current..On │ │ │ -00002390: 6c79 2077 6f72 6b73 2069 6620 796f 7520 ly works if you │ │ │ -000023a0: 6861 7665 2061 206e 6f6e 2d6e 696c 2060 have a non-nil ` │ │ │ -000023b0: 6175 746f 2d73 6176 652d 6469 7265 6374 auto-save-direct │ │ │ -000023c0: 6f72 7927 2e0a 0a4f 7074 696f 6e61 6c20 ory'...Optional │ │ │ -000023d0: 7072 6566 6978 2061 7267 756d 656e 7420 prefix argument │ │ │ -000023e0: 5349 4c45 4e54 206d 6561 6e73 2074 6f20 SILENT means to │ │ │ -000023f0: 6265 2073 696c 656e 7420 6162 6f75 7420 be silent about │ │ │ -00002400: 6e6f 6e2d 6375 7272 656e 740a 6175 746f non-current.auto │ │ │ -00002410: 7361 7665 2066 696c 6573 2e20 2054 6869 save files. Thi │ │ │ -00002420: 7320 6973 2075 7365 6675 6c20 6966 2069 s is useful if i │ │ │ -00002430: 6e76 6f6b 6564 2061 7574 6f6d 6174 6963 nvoked automatic │ │ │ -00002440: 616c 6c79 2061 7420 456d 6163 730a 7374 ally at Emacs.st │ │ │ -00002450: 6172 7475 702e 0a0a 4966 2060 6175 746f artup...If `auto │ │ │ -00002460: 2d73 6176 652d 6f66 6665 722d 6465 6c65 -save-offer-dele │ │ │ -00002470: 7465 2720 6973 2074 2c20 7468 6973 2066 te' is t, this f │ │ │ -00002480: 756e 6374 696f 6e20 7769 6c6c 206f 6666 unction will off │ │ │ -00002490: 6572 2074 6f20 6465 6c65 7465 0a6f 6c64 er to delete.old │ │ │ -000024a0: 206f 7220 7265 6a65 6374 6564 2061 7574 or rejected aut │ │ │ -000024b0: 6f73 6176 6520 6669 6c65 732e 0a0a 4861 osave files...Ha │ │ │ -000024c0: 7368 6564 2066 696c 6573 2028 7365 6520 shed files (see │ │ │ -000024d0: 6061 7574 6f2d 7361 7665 2d68 6173 682d `auto-save-hash- │ │ │ -000024e0: 7027 2920 6172 6520 6e6f 7420 756e 6465 p') are not unde │ │ │ -000024f0: 7273 746f 6f64 2c20 7573 650a 6072 6563 rstood, use.`rec │ │ │ -00002500: 6f76 6572 2d66 696c 6527 2074 6f20 7265 over-file' to re │ │ │ -00002510: 636f 7665 7220 7468 656d 2069 6e64 6976 cover them indiv │ │ │ -00002520: 6964 7561 6c6c 792e 1f0a 2864 6566 616c idually...(defal │ │ │ -00002530: 6961 7320 2772 6563 6f76 6572 2d61 6c6c ias 'recover-all │ │ │ -00002540: 2d66 696c 6573 2023 5b28 266f 7074 696f -files #[(&optio │ │ │ -00002550: 6e61 6c20 7369 6c65 6e74 2920 22c6 08c7 nal silent) "... │ │ │ -00002560: c8c9 c725 c989 ca89 1a19 1d1c 1bcb 0821 ...%...........! │ │ │ -00002570: cb0e 2e21 6bac 8b0b c60e 2ec7 c8c9 c725 ...!k..........% │ │ │ -00002580: a413 0b83 c900 0b40 14cc 0c21 150b 4113 .......@...!..A. │ │ │ -00002590: 0dab 8dcd 0c0d 5c22 ac87 cecf 0c5c 2288 ......\".....\". │ │ │ -000025a0: aa62 0954 11d0 90d1 0e32 2188 8ad0 7188 .b.T.....2!...q. │ │ │ -000025b0: d20c 2116 2fd3 0cd4 5c22 880d ad89 d20d ..!./...\"...... │ │ │ -000025c0: 2116 2fd3 0dd4 5c22 2991 88d5 d6d7 0dae !./...\")....... │ │ │ -000025d0: 81d8 5c22 21ab b970 1e30 0dab 86d9 0dc7 ..\"!..p.0...... │ │ │ -000025e0: 5c22 aa83 dadb 2171 88c9 1633 dc20 88dd \"....!q...3. .. │ │ │ -000025f0: 0cc9 5c22 88c9 dedf 8f88 c916 345c 6e54 ..\"........4\nT │ │ │ -00002600: 12e0 e1e2 205c 2288 0e30 7188 e3e4 2188 .... \"..0q...!. │ │ │ -00002610: 2982 2500 0e31 8325 000e 31e5 61ac 89d5 ).%..1.%..1.a... │ │ │ -00002620: d6e6 0d5c 2221 8325 00e7 0c21 8882 2500 ...\"!.%...!..%. │ │ │ -00002630: 09ca 55ab 8a0e 35ac 95e0 e821 88aa 8fe0 ..U...5....!.... │ │ │ -00002640: e95c 6e09 5c6e e455 ab83 eaaa 81eb 2488 .\n.\n.U......$. │ │ │ -00002650: 2dec d021 ad83 edd0 2187 2220 5b61 7574 -..!....!." [aut │ │ │ -00002660: 6f2d 7361 7665 2d64 6972 6563 746f 7279 o-save-directory │ │ │ -00002670: 2074 6f74 616c 2063 6f75 6e74 2073 6176 total count sav │ │ │ -00002680: 6566 696c 6573 2061 6669 6c65 2066 696c efiles afile fil │ │ │ -00002690: 6520 6469 7265 6374 6f72 792d 6669 6c65 e directory-file │ │ │ -000026a0: 7320 7420 225c 5c60 2322 206e 696c 2030 s t "\\`#" nil 0 │ │ │ -000026b0: 2065 7870 616e 642d 6669 6c65 2d6e 616d expand-file-nam │ │ │ -000026c0: 6520 6175 746f 2d73 6176 652d 6f72 6967 e auto-save-orig │ │ │ -000026d0: 696e 616c 2d6e 616d 6520 6669 6c65 2d6e inal-name file-n │ │ │ -000026e0: 6577 6572 2d74 6861 6e2d 6669 6c65 2d70 ewer-than-file-p │ │ │ -000026f0: 2077 6172 6e20 2241 7574 6f73 6176 6520 warn "Autosave │ │ │ -00002700: 6669 6c65 205c 2225 735c 2220 6973 206e file \"%s\" is n │ │ │ -00002710: 6f74 2063 7572 7265 6e74 2e22 2022 2a44 ot current." "*D │ │ │ -00002720: 6972 6563 746f 7279 2a22 2062 7566 6665 irectory*" buffe │ │ │ -00002730: 722d 6469 7361 626c 652d 756e 646f 2066 r-disable-undo f │ │ │ -00002740: 696c 652d 6e61 6d65 2d64 6972 6563 746f ile-name-directo │ │ │ -00002750: 7279 2069 6e73 6572 742d 6469 7265 6374 ry insert-direct │ │ │ -00002760: 6f72 7920 222d 6c22 2079 6573 2d6f 722d ory "-l" yes-or- │ │ │ -00002770: 6e6f 2d70 2066 6f72 6d61 7420 2252 6563 no-p format "Rec │ │ │ -00002780: 6f76 6572 2025 7320 6672 6f6d 2061 7574 over %s from aut │ │ │ -00002790: 6f20 7361 7665 2066 696c 653f 2022 2022 o save file? " " │ │ │ -000027a0: 6e6f 6e2d 6669 6c65 2062 7566 6665 7222 non-file buffer" │ │ │ -000027b0: 2066 696e 642d 6669 6c65 2d6e 6f73 656c find-file-nosel │ │ │ -000027c0: 6563 7420 6765 6e65 7261 7465 2d6e 6577 ect generate-new │ │ │ -000027d0: 2d62 7566 6665 7220 222a 7265 636f 7665 -buffer "*recove │ │ │ -000027e0: 7265 642a 2220 6572 6173 652d 6275 6666 red*" erase-buff │ │ │ -000027f0: 6572 2069 6e73 6572 742d 6669 6c65 2d63 er insert-file-c │ │ │ -00002800: 6f6e 7465 6e74 7320 2861 6674 6572 2d66 ontents (after-f │ │ │ -00002810: 696e 642d 6669 6c65 206e 696c 2920 2828 ind-file nil) (( │ │ │ -00002820: 6572 726f 7229 2920 6d65 7373 6167 6520 error)) message │ │ │ -00002830: 2241 7574 6f2d 7361 7665 206f 6666 2069 "Auto-save off i │ │ │ -00002840: 6e20 6275 6666 6572 205c 2225 735c 2220 n buffer \"%s\" │ │ │ -00002850: 7469 6c6c 2079 6f75 2064 6f20 4d2d 7820 till you do M-x │ │ │ -00002860: 6175 746f 2d73 6176 652d 6d6f 6465 2e22 auto-save-mode." │ │ │ -00002870: 2062 7566 6665 722d 6e61 6d65 2073 6974 buffer-name sit │ │ │ -00002880: 2d66 6f72 2031 2061 6c77 6179 7320 2244 -for 1 always "D │ │ │ -00002890: 656c 6574 6520 6175 746f 7361 7665 2066 elete autosave f │ │ │ -000028a0: 696c 6520 666f 7220 6025 7327 3f20 2220 ile for `%s'? " │ │ │ -000028b0: 6465 6c65 7465 2d66 696c 6520 224e 6f74 delete-file "Not │ │ │ -000028c0: 6869 6e67 2074 6f20 7265 636f 7665 722e hing to recover. │ │ │ -000028d0: 2220 2225 642f 2564 2066 696c 6525 7320 " "%d/%d file%s │ │ │ -000028e0: 7265 636f 7665 7265 642e 2220 2222 2022 recovered." "" " │ │ │ -000028f0: 7322 2067 6574 2d62 7566 6665 7220 6b69 s" get-buffer ki │ │ │ -00002900: 6c6c 2d62 7566 6665 7220 6175 746f 2d73 ll-buffer auto-s │ │ │ -00002910: 6176 652d 6469 7265 6374 6f72 792d 6661 ave-directory-fa │ │ │ -00002920: 6c6c 6261 636b 2064 6566 6175 6c74 2d64 llback default-d │ │ │ -00002930: 6972 6563 746f 7279 206f 6275 6620 6175 irectory obuf au │ │ │ -00002940: 746f 2d73 6176 652d 6f66 6665 722d 6465 to-save-offer-de │ │ │ -00002950: 6c65 7465 2073 7461 6e64 6172 642d 6f75 lete standard-ou │ │ │ -00002960: 7470 7574 2062 7566 6665 722d 7265 6164 tput buffer-read │ │ │ -00002970: 2d6f 6e6c 7920 6275 6666 6572 2d61 7574 -only buffer-aut │ │ │ -00002980: 6f2d 7361 7665 2d66 696c 652d 6e61 6d65 o-save-file-name │ │ │ -00002990: 2073 696c 656e 745d 2037 2028 2324 202e silent] 7 (#$ . │ │ │ -000029a0: 2039 3034 3429 2022 5022 5d29 0a 9044) "P"]). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3239 2032 3032 310a 3b3b 3b20 :08:29 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f61 7574 6f2d 7361 7665 4/lisp/auto-save │ │ │ +00000090: 2e65 6c0a 3b3b 3b20 656d 6163 7320 7665 .el.;;; emacs ve │ │ │ +000000a0: 7273 696f 6e20 3231 2e34 2028 7061 7463 rsion 21.4 (patc │ │ │ +000000b0: 6820 3234 2920 2253 7461 6e64 6172 6420 h 24) "Standard │ │ │ +000000c0: 4322 2058 456d 6163 7320 4c75 6369 642e C" XEmacs Lucid. │ │ │ +000000d0: 0a3b 3b3b 2062 7974 6563 6f6d 7020 7665 .;;; bytecomp ve │ │ │ +000000e0: 7273 696f 6e20 322e 3237 2058 456d 6163 rsion 2.27 XEmac │ │ │ +000000f0: 733b 2032 3030 302d 3039 2d31 322e 0a3b s; 2000-09-12..; │ │ │ +00000100: 3b3b 206f 7074 696d 697a 6174 696f 6e20 ;; optimization │ │ │ +00000110: 6973 206f 6e2e 0a3b 3b3b 2074 6869 7320 is on..;;; this │ │ │ +00000120: 6669 6c65 2075 7365 7320 6f70 636f 6465 file uses opcode │ │ │ +00000130: 7320 7768 6963 6820 646f 206e 6f74 2065 s which do not e │ │ │ +00000140: 7869 7374 2069 6e20 456d 6163 7320 3139 xist in Emacs 19 │ │ │ +00000150: 2e0a 0a28 6966 2028 616e 6420 2862 6f75 ...(if (and (bou │ │ │ +00000160: 6e64 7020 2765 6d61 6373 2d76 6572 7369 ndp 'emacs-versi │ │ │ +00000170: 6f6e 290a 0920 286f 7220 2861 6e64 2028 on).. (or (and ( │ │ │ +00000180: 626f 756e 6470 2027 6570 6f63 683a 3a76 boundp 'epoch::v │ │ │ +00000190: 6572 7369 6f6e 2920 6570 6f63 683a 3a76 ersion) epoch::v │ │ │ +000001a0: 6572 7369 6f6e 290a 0920 2020 2020 2873 ersion).. (s │ │ │ +000001b0: 7472 696e 672d 6c65 7373 7020 656d 6163 tring-lessp emac │ │ │ +000001c0: 732d 7665 7273 696f 6e20 2232 3022 2929 s-version "20")) │ │ │ +000001d0: 290a 2020 2020 2865 7272 6f72 2022 6061 ). (error "`a │ │ │ +000001e0: 7574 6f2d 7361 7665 2e65 6c27 2077 6173 uto-save.el' was │ │ │ +000001f0: 2063 6f6d 7069 6c65 6420 666f 7220 456d compiled for Em │ │ │ +00000200: 6163 7320 3230 2229 290a 0a28 6f72 2028 acs 20"))..(or ( │ │ │ +00000210: 626f 756e 6470 2027 6375 7272 656e 742d boundp 'current- │ │ │ +00000220: 6c6f 6164 2d6c 6973 7429 2028 7365 7471 load-list) (setq │ │ │ +00000230: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ +00000240: 7374 206e 696c 2929 0a0a 0a23 4033 3020 st nil))...#@30 │ │ │ +00000250: 5665 7273 696f 6e20 6e75 6d62 6572 206f Version number o │ │ │ +00000260: 6620 6175 746f 2d73 6176 652e 1f0a 2864 f auto-save...(d │ │ │ +00000270: 6566 636f 6e73 7420 6175 746f 2d73 6176 efconst auto-sav │ │ │ +00000280: 652d 7665 7273 696f 6e20 2231 2e32 3622 e-version "1.26" │ │ │ +00000290: 2028 2324 202e 2035 3932 2929 0a28 6279 (#$ . 592)).(by │ │ │ +000002a0: 7465 2d63 6f64 6520 22c0 c121 88c2 c1c3 te-code "..!.... │ │ │ +000002b0: c4c5 c625 88c7 c8c9 ca23 88c7 c8cb cc23 ...%.....#.....# │ │ │ +000002c0: 88cd c1c8 ce23 8722 205b 7072 6f76 6964 .....#." [provid │ │ │ +000002d0: 6520 6175 746f 2d73 6176 6520 6375 7374 e auto-save cust │ │ │ +000002e0: 6f6d 2d64 6563 6c61 7265 2d67 726f 7570 om-declare-group │ │ │ +000002f0: 206e 696c 2022 4175 746f 7361 7669 6e67 nil "Autosaving │ │ │ +00000300: 2077 6974 6820 7375 7070 6f72 7420 666f with support fo │ │ │ +00000310: 7220 6566 7320 616e 6420 2f74 6d70 2e22 r efs and /tmp." │ │ │ +00000320: 203a 6772 6f75 7020 6461 7461 2070 7574 :group data put │ │ │ +00000330: 2061 7574 6f2d 7361 7665 2d69 6e74 6572 auto-save-inter │ │ │ +00000340: 7661 6c20 6375 7374 6f6d 2d74 7970 6520 val custom-type │ │ │ +00000350: 696e 7465 6765 7220 6661 6374 6f72 792d integer factory- │ │ │ +00000360: 7661 6c75 6520 2833 3030 2920 6375 7374 value (300) cust │ │ │ +00000370: 6f6d 2d61 6464 2d74 6f2d 6772 6f75 7020 om-add-to-group │ │ │ +00000380: 6375 7374 6f6d 2d76 6172 6961 626c 655d custom-variable] │ │ │ +00000390: 2036 290a 2863 7573 746f 6d2d 6465 636c 6).(custom-decl │ │ │ +000003a0: 6172 652d 7661 7269 6162 6c65 2027 6175 are-variable 'au │ │ │ +000003b0: 746f 2d73 6176 652d 6469 7265 6374 6f72 to-save-director │ │ │ +000003c0: 7920 276e 696c 2022 4966 206e 6f6e 2d6e y 'nil "If non-n │ │ │ +000003d0: 696c 2c20 6669 7865 6420 6469 7265 6374 il, fixed direct │ │ │ +000003e0: 6f72 7920 666f 7220 6175 746f 7361 7669 ory for autosavi │ │ │ +000003f0: 6e67 3a20 616c 6c20 6175 746f 7361 7665 ng: all autosave │ │ │ +00000400: 2066 696c 6573 2067 6f5c 6e74 6865 7265 files go\nthere │ │ │ +00000410: 2e20 2049 6620 7468 6973 2064 6972 6563 . If this direc │ │ │ +00000420: 746f 7279 2064 6f65 7320 6e6f 7420 7965 tory does not ye │ │ │ +00000430: 7420 6578 6973 7420 6174 206c 6f61 6420 t exist at load │ │ │ +00000440: 7469 6d65 2c20 6974 2069 735c 6e63 7265 time, it is\ncre │ │ │ +00000450: 6174 6564 2061 6e64 2069 7473 206d 6f64 ated and its mod │ │ │ +00000460: 6520 6973 2073 6574 2074 6f20 3037 3030 e is set to 0700 │ │ │ +00000470: 2073 6f20 7468 6174 206e 6f62 6f64 7920 so that nobody │ │ │ +00000480: 656c 7365 2063 616e 2072 6561 6420 796f else can read yo │ │ │ +00000490: 7572 5c6e 6175 746f 7361 7665 2066 696c ur\nautosave fil │ │ │ +000004a0: 6573 2e5c 6e5c 6e49 6620 6e69 6c2c 2065 es.\n\nIf nil, e │ │ │ +000004b0: 6163 6820 6175 746f 7361 7665 2066 696c ach autosave fil │ │ │ +000004c0: 6573 2067 6f65 7320 696e 746f 2074 6865 es goes into the │ │ │ +000004d0: 2073 616d 6520 6469 7265 6374 6f72 7920 same directory │ │ │ +000004e0: 6173 2069 7473 5c6e 636f 7272 6573 706f as its\ncorrespo │ │ │ +000004f0: 6e64 696e 6720 7669 7369 7465 6420 6669 nding visited fi │ │ │ +00000500: 6c65 2e5c 6e5c 6e41 206e 6f6e 2d6e 696c le.\n\nA non-nil │ │ │ +00000510: 2060 6175 746f 2d73 6176 652d 6469 7265 `auto-save-dire │ │ │ +00000520: 6374 6f72 7927 2063 6f75 6c64 2062 6520 ctory' could be │ │ │ +00000530: 6f6e 2061 206c 6f63 616c 2064 6973 6b20 on a local disk │ │ │ +00000540: 7375 6368 2061 7320 696e 5c6e 2f74 6d70 such as in\n/tmp │ │ │ +00000550: 2c20 7468 656e 2061 7574 6f2d 7361 7665 , then auto-save │ │ │ +00000560: 7320 7769 6c6c 2061 6c77 6179 7320 6265 s will always be │ │ │ +00000570: 2066 6173 742c 2065 7665 6e20 6966 204e fast, even if N │ │ │ +00000580: 4653 206f 7220 7468 655c 6e61 7574 6f6d FS or the\nautom │ │ │ +00000590: 6f75 6e74 6572 2069 7320 736c 6f77 2e20 ounter is slow. │ │ │ +000005a0: 2049 6e20 7468 6520 7573 7561 6c20 6361 In the usual ca │ │ │ +000005b0: 7365 206f 6620 2f74 6d70 2062 6569 6e67 se of /tmp being │ │ │ +000005c0: 206c 6f63 616c 6c79 206d 6f75 6e74 6564 locally mounted │ │ │ +000005d0: 2c5c 6e6e 6f74 6520 7468 6174 2069 6620 ,\nnote that if │ │ │ +000005e0: 796f 7520 7275 6e20 656d 6163 7320 6f6e you run emacs on │ │ │ +000005f0: 2074 776f 2064 6966 6665 7265 6e74 206d two different m │ │ │ +00000600: 6163 6869 6e65 732c 2074 6865 7920 7769 achines, they wi │ │ │ +00000610: 6c6c 206e 6f74 5c6e 7365 6520 6561 6368 ll not\nsee each │ │ │ +00000620: 206f 7468 6572 2773 2061 7574 6f2d 7361 other's auto-sa │ │ │ +00000630: 7665 2066 696c 6573 2e5c 6e5c 6e54 6865 ve files.\n\nThe │ │ │ +00000640: 2076 616c 7565 2028 6578 7061 6e64 2d66 value (expand-f │ │ │ +00000650: 696c 652d 6e61 6d65 205c 227e 2f2e 6175 ile-name \"~/.au │ │ │ +00000660: 746f 7361 7665 2f5c 2229 206d 6967 6874 tosave/\") might │ │ │ +00000670: 2062 6520 6265 7474 6572 2069 6620 2f74 be better if /t │ │ │ +00000680: 6d70 5c6e 6973 206d 6f75 6e74 6564 2066 mp\nis mounted f │ │ │ +00000690: 726f 6d20 7377 6170 2028 706f 7373 6962 rom swap (possib │ │ │ +000006a0: 6c65 2069 6e20 5375 6e4f 532c 2074 7970 le in SunOS, typ │ │ │ +000006b0: 6520 6064 6620 2f74 6d70 2720 746f 2066 e `df /tmp' to f │ │ │ +000006c0: 696e 6420 6f75 7429 5c6e 616e 6420 7468 ind out)\nand th │ │ │ +000006d0: 7573 2076 616e 6973 6865 7320 6166 7465 us vanishes afte │ │ │ +000006e0: 7220 6120 7265 626f 6f74 2c20 6f72 2069 r a reboot, or i │ │ │ +000006f0: 6620 796f 7572 2073 7973 7465 6d20 6973 f your system is │ │ │ +00000700: 2070 6172 7469 6375 6c61 726c 795c 6e74 particularly\nt │ │ │ +00000710: 686f 726f 7567 6820 7768 656e 2063 6c65 horough when cle │ │ │ +00000720: 616e 696e 6720 7570 202f 746d 702c 2063 aning up /tmp, c │ │ │ +00000730: 6c65 6172 696e 6720 6576 656e 206e 6f6e learing even non │ │ │ +00000740: 2d65 6d70 7479 2073 7562 6469 7265 6374 -empty subdirect │ │ │ +00000750: 6f72 6965 732e 5c6e 5c6e 4974 2073 686f ories.\n\nIt sho │ │ │ +00000760: 756c 6420 6e65 7665 7220 6265 2061 6e20 uld never be an │ │ │ +00000770: 6566 7320 7265 6d6f 7465 2066 696c 656e efs remote filen │ │ │ +00000780: 616d 6520 6265 6361 7573 6520 7468 6174 ame because that │ │ │ +00000790: 2077 6f75 6c64 5c6e 6465 6665 6174 2060 would\ndefeat ` │ │ │ +000007a0: 6566 732d 6175 746f 2d73 6176 652d 7265 efs-auto-save-re │ │ │ +000007b0: 6d6f 7465 6c79 272e 5c6e 5c6e 556e 6c65 motely'.\n\nUnle │ │ │ +000007c0: 7373 2079 6f75 2073 6574 2060 6175 746f ss you set `auto │ │ │ +000007d0: 2d73 6176 652d 6861 7368 2d70 272c 2079 -save-hash-p', y │ │ │ +000007e0: 6f75 2073 686f 756c 646e 2774 2073 6574 ou shouldn't set │ │ │ +000007f0: 2074 6869 7320 746f 2061 5c6e 6469 7265 this to a\ndire │ │ │ +00000800: 6374 6f72 7920 696e 2061 2066 696c 6573 ctory in a files │ │ │ +00000810: 7973 7465 6d20 7468 6174 2064 6f65 7320 ystem that does │ │ │ +00000820: 6e6f 7420 7375 7070 6f72 7420 6c6f 6e67 not support long │ │ │ +00000830: 2066 696c 656e 616d 6573 2c20 7369 6e63 filenames, sinc │ │ │ +00000840: 655c 6e61 2066 696c 6520 6e61 6d65 645c e\na file named\ │ │ │ +00000850: 6e5c 6e20 2020 202f 686f 6d65 2f73 6b2f n\n /home/sk/ │ │ │ +00000860: 6c69 622f 656d 6163 732f 6c69 7370 2f61 lib/emacs/lisp/a │ │ │ +00000870: 7574 6f2d 7361 7665 2e65 6c5c 6e5c 6e77 uto-save.el\n\nw │ │ │ +00000880: 696c 6c20 6861 7665 2061 206c 6f6e 6769 ill have a longi │ │ │ +00000890: 7368 2066 696c 656e 616d 6520 6c69 6b65 sh filename like │ │ │ +000008a0: 5c6e 5c6e 2020 2020 4155 544f 2d53 4156 \n\n AUTO-SAV │ │ │ +000008b0: 452d 4449 5245 4354 4f52 592f 233d 3246 E-DIRECTORY/#=2F │ │ │ +000008c0: 686f 6d65 3d32 4673 6b3d 3246 6c69 623d home=2Fsk=2Flib= │ │ │ +000008d0: 3246 656d 6163 733d 3246 6c69 7370 3d32 2Femacs=2Flisp=2 │ │ │ +000008e0: 4661 7574 6f2d 7361 7665 2e65 6c23 5c6e Fauto-save.el#\n │ │ │ +000008f0: 5c6e 6173 2061 7574 6f20 7361 7665 2066 \nas auto save f │ │ │ +00000900: 696c 652e 5c6e 5c6e 5365 6520 616c 736f ile.\n\nSee also │ │ │ +00000910: 2076 6172 6961 626c 6573 2060 6175 746f variables `auto │ │ │ +00000920: 2d73 6176 652d 6469 7265 6374 6f72 792d -save-directory- │ │ │ +00000930: 6661 6c6c 6261 636b 272c 5c6e 6065 6673 fallback',\n`efs │ │ │ +00000940: 2d61 7574 6f2d 7361 7665 2720 616e 6420 -auto-save' and │ │ │ +00000950: 6065 6673 2d61 7574 6f2d 7361 7665 2d72 `efs-auto-save-r │ │ │ +00000960: 656d 6f74 656c 7927 2e22 203a 7479 7065 emotely'." :type │ │ │ +00000970: 2027 2863 686f 6963 6520 2863 6f6e 7374 '(choice (const │ │ │ +00000980: 203a 7461 6720 2253 616d 6520 6173 2066 :tag "Same as f │ │ │ +00000990: 696c 6522 206e 696c 2920 6469 7265 6374 ile" nil) direct │ │ │ +000009a0: 6f72 7929 203a 6772 6f75 7020 2761 7574 ory) :group 'aut │ │ │ +000009b0: 6f2d 7361 7665 290a 2863 7573 746f 6d2d o-save).(custom- │ │ │ +000009c0: 6465 636c 6172 652d 7661 7269 6162 6c65 declare-variable │ │ │ +000009d0: 2027 6175 746f 2d73 6176 652d 6861 7368 'auto-save-hash │ │ │ +000009e0: 2d70 2027 6e69 6c20 2249 6620 6e6f 6e2d -p 'nil "If non- │ │ │ +000009f0: 6e69 6c2c 2068 6173 6865 6420 6175 746f nil, hashed auto │ │ │ +00000a00: 7361 7665 206e 616d 6573 206f 6620 6c65 save names of le │ │ │ +00000a10: 6e67 7468 2031 3420 6172 6520 7573 6564 ngth 14 are used │ │ │ +00000a20: 2e5c 6e54 6869 7320 6973 2074 6f20 6176 .\nThis is to av │ │ │ +00000a30: 6f69 6420 6175 746f 7361 7665 2066 696c oid autosave fil │ │ │ +00000a40: 656e 616d 6573 206c 6f6e 6765 7220 7468 enames longer th │ │ │ +00000a50: 616e 2031 3420 6368 6172 6163 7465 7273 an 14 characters │ │ │ +00000a60: 2e5c 6e54 6865 2064 6972 6563 746f 7279 .\nThe directory │ │ │ +00000a70: 2075 7365 6420 6973 2060 6175 746f 2d73 used is `auto-s │ │ │ +00000a80: 6176 652d 6861 7368 2d64 6972 6563 746f ave-hash-directo │ │ │ +00000a90: 7279 2720 7265 6761 7264 6c65 7373 206f ry' regardless o │ │ │ +00000aa0: 665c 6e60 6175 746f 2d73 6176 652d 6469 f\n`auto-save-di │ │ │ +00000ab0: 7265 6374 6f72 7927 2e5c 6e48 6173 6869 rectory'.\nHashi │ │ │ +00000ac0: 6e67 2064 6566 6561 7473 2060 7265 636f ng defeats `reco │ │ │ +00000ad0: 7665 722d 616c 6c2d 6669 6c65 7327 2c20 ver-all-files', │ │ │ +00000ae0: 796f 7520 6861 7665 2074 6f20 7265 636f you have to reco │ │ │ +00000af0: 7665 7220 6669 6c65 735c 6e69 6e64 6976 ver files\nindiv │ │ │ +00000b00: 6964 7561 6c6c 7920 6279 2064 6f69 6e67 idually by doing │ │ │ +00000b10: 2060 7265 636f 7665 722d 6669 6c65 272e `recover-file'. │ │ │ +00000b20: 2220 3a74 7970 6520 2762 6f6f 6c65 616e " :type 'boolean │ │ │ +00000b30: 203a 6772 6f75 7020 2761 7574 6f2d 7361 :group 'auto-sa │ │ │ +00000b40: 7665 290a 2862 7974 652d 636f 6465 2022 ve).(byte-code " │ │ │ +00000b50: c1c2 21ac 8ec2 0842 10c3 c221 ac85 c4c2 ..!....B...!.... │ │ │ +00000b60: c55c 2288 c1c6 21ac 8ec6 0842 10c3 c621 .\"...!....B...! │ │ │ +00000b70: ac85 c4c6 c75c 2288 c787 2220 5b63 7572 .....\"..." [cur │ │ │ +00000b80: 7265 6e74 2d6c 6f61 642d 6c69 7374 2062 rent-load-list b │ │ │ +00000b90: 6f75 6e64 7020 6566 732d 6175 746f 2d73 oundp efs-auto-s │ │ │ +00000ba0: 6176 6520 6465 6661 756c 742d 626f 756e ave default-boun │ │ │ +00000bb0: 6470 2073 6574 2d64 6566 6175 6c74 2030 dp set-default 0 │ │ │ +00000bc0: 2065 6673 2d61 7574 6f2d 7361 7665 2d72 efs-auto-save-r │ │ │ +00000bd0: 656d 6f74 656c 7920 6e69 6c5d 2033 290a emotely nil] 3). │ │ │ +00000be0: 2863 7573 746f 6d2d 6465 636c 6172 652d (custom-declare- │ │ │ +00000bf0: 7661 7269 6162 6c65 2027 6175 746f 2d73 variable 'auto-s │ │ │ +00000c00: 6176 652d 6f66 6665 722d 6465 6c65 7465 ave-offer-delete │ │ │ +00000c10: 2027 6e69 6c20 222a 4966 206e 6f6e 2d6e 'nil "*If non-n │ │ │ +00000c20: 696c 2c20 6072 6563 6f76 6572 2d61 6c6c il, `recover-all │ │ │ +00000c30: 2d66 696c 6573 2720 6f66 6665 7273 2074 -files' offers t │ │ │ +00000c40: 6f20 6465 6c65 7465 2061 7574 6f73 6176 o delete autosav │ │ │ +00000c50: 6520 6669 6c65 735c 6e74 6861 7420 6172 e files\nthat ar │ │ │ +00000c60: 6520 6f75 7420 6f66 2064 6174 6520 6f72 e out of date or │ │ │ +00000c70: 2077 6572 6520 6469 736d 6973 7365 6420 were dismissed │ │ │ +00000c80: 666f 7220 7265 636f 7665 7269 6e67 2e5c for recovering.\ │ │ │ +00000c90: 6e53 7065 6369 616c 2076 616c 7565 2027 nSpecial value ' │ │ │ +00000ca0: 616c 7761 7973 2064 656c 6574 6573 2074 always deletes t │ │ │ +00000cb0: 686f 7365 2066 696c 6573 2073 696c 656e hose files silen │ │ │ +00000cc0: 746c 792e 2220 3a74 7970 6520 2728 6368 tly." :type '(ch │ │ │ +00000cd0: 6f69 6365 2028 636f 6e73 7420 3a74 6167 oice (const :tag │ │ │ +00000ce0: 2022 6f6e 2220 7429 2028 636f 6e73 7420 "on" t) (const │ │ │ +00000cf0: 3a74 6167 2022 6f66 6622 206e 696c 2920 :tag "off" nil) │ │ │ +00000d00: 2863 6f6e 7374 203a 7461 6720 2244 656c (const :tag "Del │ │ │ +00000d10: 6574 6520 7369 6c65 6e74 6c79 2220 616c ete silently" al │ │ │ +00000d20: 7761 7973 2929 203a 6772 6f75 7020 2761 ways)) :group 'a │ │ │ +00000d30: 7574 6f2d 7361 7665 290a 2340 3239 3020 uto-save).#@290 │ │ │ +00000d40: 4469 7265 6374 6f72 7920 7573 6564 2066 Directory used f │ │ │ +00000d50: 6f72 206c 6f63 616c 2061 7574 6f73 6176 or local autosav │ │ │ +00000d60: 696e 6720 6f66 2072 656d 6f74 6520 6669 ing of remote fi │ │ │ +00000d70: 6c65 7320 6966 0a62 6f74 6820 6061 7574 les if.both `aut │ │ │ +00000d80: 6f2d 7361 7665 2d64 6972 6563 746f 7279 o-save-directory │ │ │ +00000d90: 2720 616e 6420 6065 6673 2d61 7574 6f2d ' and `efs-auto- │ │ │ +00000da0: 7361 7665 2d72 656d 6f74 656c 7927 2061 save-remotely' a │ │ │ +00000db0: 7265 206e 696c 2e0a 416c 736f 2075 7365 re nil..Also use │ │ │ +00000dc0: 6420 6966 2061 2077 6f72 6b69 6e67 2064 d if a working d │ │ │ +00000dd0: 6972 6563 746f 7279 2074 6f20 6265 2075 irectory to be u │ │ │ +00000de0: 7365 6420 666f 7220 6175 746f 7361 7669 sed for autosavi │ │ │ +00000df0: 6e67 2069 7320 6e6f 7420 7772 6974 6162 ng is not writab │ │ │ +00000e00: 6c65 2e0a 5468 6973 202a 6d75 7374 2a20 le..This *must* │ │ │ +00000e10: 616c 7761 7973 2062 6520 7468 6520 6e61 always be the na │ │ │ +00000e20: 6d65 206f 6620 6469 7265 6374 6f72 7920 me of directory │ │ │ +00000e30: 7468 6174 2065 7869 7374 7320 6f72 2063 that exists or c │ │ │ +00000e40: 616e 2062 650a 6372 6561 7465 6420 6279 an be.created by │ │ │ +00000e50: 2079 6f75 2c20 6e65 7665 7220 6e69 6c2e you, never nil. │ │ │ +00000e60: 1f0a 2864 6566 7661 7220 6175 746f 2d73 ..(defvar auto-s │ │ │ +00000e70: 6176 652d 6469 7265 6374 6f72 792d 6661 ave-directory-fa │ │ │ +00000e80: 6c6c 6261 636b 2022 7e2f 2e61 7574 6f73 llback "~/.autos │ │ │ +00000e90: 6176 652f 2220 2823 2420 2e20 3333 3932 ave/" (#$ . 3392 │ │ │ +00000ea0: 2929 0a23 4035 3920 4966 206e 6f6e 2d6e )).#@59 If non-n │ │ │ +00000eb0: 696c 2c20 6469 7265 6374 6f72 7920 7573 il, directory us │ │ │ +00000ec0: 6564 2066 6f72 2068 6173 6865 6420 6175 ed for hashed au │ │ │ +00000ed0: 746f 7361 7665 2066 696c 656e 616d 6573 tosave filenames │ │ │ +00000ee0: 2e1f 0a28 6465 6676 6172 2061 7574 6f2d ...(defvar auto- │ │ │ +00000ef0: 7361 7665 2d68 6173 682d 6469 7265 6374 save-hash-direct │ │ │ +00000f00: 6f72 7920 2862 7974 652d 636f 6465 2022 ory (byte-code " │ │ │ +00000f10: c2c3 09ae 8108 5c22 8722 205b 6175 746f ......\"." [auto │ │ │ +00000f20: 2d73 6176 652d 6469 7265 6374 6f72 792d -save-directory- │ │ │ +00000f30: 6661 6c6c 6261 636b 2061 7574 6f2d 7361 fallback auto-sa │ │ │ +00000f40: 7665 2d64 6972 6563 746f 7279 2065 7870 ve-directory exp │ │ │ +00000f50: 616e 642d 6669 6c65 2d6e 616d 6520 2268 and-file-name "h │ │ │ +00000f60: 6173 682f 225d 2033 2920 2823 2420 2e20 ash/"] 3) (#$ . │ │ │ +00000f70: 3337 3532 2929 0a23 4037 3120 4d61 6b65 3752)).#@71 Make │ │ │ +00000f80: 2073 7572 6520 7468 6520 6469 7265 6374 sure the direct │ │ │ +00000f90: 6f72 7920 4449 5220 6578 6973 7473 2061 ory DIR exists a │ │ │ +00000fa0: 6e64 2072 6574 7572 6e20 6974 2065 7870 nd return it exp │ │ │ +00000fb0: 616e 6465 6420 6966 206e 6f6e 2d6e 696c anded if non-nil │ │ │ +00000fc0: 2e1f 0a28 6465 6661 6c69 6173 2027 6175 ...(defalias 'au │ │ │ +00000fd0: 746f 2d73 6176 652d 6368 6563 6b65 642d to-save-checked- │ │ │ +00000fe0: 6469 7265 6374 6f72 7920 235b 2864 6972 directory #[(dir │ │ │ +00000ff0: 2920 2208 ad97 c108 2110 c208 21ac 8dc3 ) ".....!...!... │ │ │ +00001000: 0821 10c4 0821 88c5 08c6 5c22 8808 8722 .!...!....\"..." │ │ │ +00001010: 205b 6469 7220 6578 7061 6e64 2d66 696c [dir expand-fil │ │ │ +00001020: 652d 6e61 6d65 2066 696c 652d 6469 7265 e-name file-dire │ │ │ +00001030: 6374 6f72 792d 7020 6469 7265 6374 6f72 ctory-p director │ │ │ +00001040: 792d 6669 6c65 2d6e 616d 6520 6d61 6b65 y-file-name make │ │ │ +00001050: 2d64 6972 6563 746f 7279 2073 6574 2d66 -directory set-f │ │ │ +00001060: 696c 652d 6d6f 6465 7320 3434 385d 2033 ile-modes 448] 3 │ │ │ +00001070: 2028 2324 202e 2033 3936 3429 5d29 0a23 (#$ . 3964)]).# │ │ │ +00001080: 4039 3232 2052 6574 7572 6e20 6669 6c65 @922 Return file │ │ │ +00001090: 206e 616d 6520 746f 2075 7365 2066 6f72 name to use for │ │ │ +000010a0: 2061 7574 6f2d 7361 7665 7320 6f66 2063 auto-saves of c │ │ │ +000010b0: 7572 7265 6e74 2062 7566 6665 722e 0a44 urrent buffer..D │ │ │ +000010c0: 6f65 7320 6e6f 7420 636f 6e73 6964 6572 oes not consider │ │ │ +000010d0: 2060 6175 746f 2d73 6176 652d 7669 7369 `auto-save-visi │ │ │ +000010e0: 7465 642d 6669 6c65 2d6e 616d 6527 3b20 ted-file-name'; │ │ │ +000010f0: 7468 6174 2069 7320 6368 6563 6b65 640a that is checked. │ │ │ +00001100: 6265 666f 7265 2063 616c 6c69 6e67 2074 before calling t │ │ │ +00001110: 6869 7320 6675 6e63 7469 6f6e 2e0a 0a4f his function...O │ │ │ +00001120: 6666 6572 7320 746f 2061 7574 6f73 6176 ffers to autosav │ │ │ +00001130: 6520 616c 6c20 6669 6c65 7320 696e 2074 e all files in t │ │ │ +00001140: 6865 2073 616d 6520 6061 7574 6f2d 7361 he same `auto-sa │ │ │ +00001150: 7665 2d64 6972 6563 746f 7279 272e 2020 ve-directory'. │ │ │ +00001160: 416c 6c0a 6175 746f 7361 7665 2066 696c All.autosave fil │ │ │ +00001170: 6573 2063 616e 2074 6865 6e20 6265 2072 es can then be r │ │ │ +00001180: 6563 6f76 6572 6564 2061 7420 6f6e 6365 ecovered at once │ │ │ +00001190: 2077 6974 6820 6675 6e63 7469 6f6e 0a60 with function.` │ │ │ +000011a0: 7265 636f 7665 722d 616c 6c2d 6669 6c65 recover-all-file │ │ │ +000011b0: 7327 2e0a 0a54 616b 6573 2063 6172 6520 s'...Takes care │ │ │ +000011c0: 746f 206d 616b 6520 6175 746f 7361 7665 to make autosave │ │ │ +000011d0: 2066 696c 6573 2066 6f72 2066 696c 6573 files for files │ │ │ +000011e0: 2061 6363 6573 7365 6420 7468 726f 7567 accessed throug │ │ │ +000011f0: 6820 6566 730a 6265 206c 6f63 616c 2066 h efs.be local f │ │ │ +00001200: 696c 6573 2069 6620 7661 7269 6162 6c65 iles if variable │ │ │ +00001210: 2060 6566 732d 6175 746f 2d73 6176 652d `efs-auto-save- │ │ │ +00001220: 7265 6d6f 7465 6c79 2720 6973 206e 696c remotely' is nil │ │ │ +00001230: 2e0a 0a54 616b 6573 2063 6172 6520 6f66 ...Takes care of │ │ │ +00001240: 2073 6c61 7368 6573 2069 6e20 6275 6666 slashes in buff │ │ │ +00001250: 6572 206e 616d 6573 2074 6f20 7072 6576 er names to prev │ │ │ +00001260: 656e 7420 6175 746f 7361 7665 2065 7272 ent autosave err │ │ │ +00001270: 6f72 732e 0a0a 5461 6b65 7320 6361 7265 ors...Takes care │ │ │ +00001280: 2074 6861 7420 6175 746f 7361 7665 2066 that autosave f │ │ │ +00001290: 696c 6573 2066 6f72 2062 7566 6665 7273 iles for buffers │ │ │ +000012a0: 206e 6f74 2076 6973 6974 696e 6720 616e not visiting an │ │ │ +000012b0: 7920 6669 6c65 2028 7375 6368 0a61 7320 y file (such.as │ │ │ +000012c0: 602a 6d61 696c 2a27 2920 6672 6f6d 2074 `*mail*') from t │ │ │ +000012d0: 776f 2073 696d 756c 7461 6e65 6f75 7320 wo simultaneous │ │ │ +000012e0: 456d 6163 7365 7320 646f 6e27 7420 636f Emacses don't co │ │ │ +000012f0: 6c6c 6964 6520 6279 2070 7265 7065 6e64 llide by prepend │ │ │ +00001300: 696e 670a 7468 6520 456d 6163 7320 7069 ing.the Emacs pi │ │ │ +00001310: 642e 0a0a 5573 6573 2031 3420 6368 6172 d...Uses 14 char │ │ │ +00001320: 6163 7465 7220 6175 746f 7361 7665 206e acter autosave n │ │ │ +00001330: 616d 6573 2069 6620 6061 7574 6f2d 7361 ames if `auto-sa │ │ │ +00001340: 7665 2d68 6173 682d 7027 2069 7320 7472 ve-hash-p' is tr │ │ │ +00001350: 7565 2e0a 0a41 7574 6f73 6176 6573 2065 ue...Autosaves e │ │ │ +00001360: 7665 6e20 6966 2074 6865 2063 7572 7265 ven if the curre │ │ │ +00001370: 6e74 2064 6972 6563 746f 7279 2069 7320 nt directory is │ │ │ +00001380: 6e6f 7420 7772 6974 6162 6c65 2c20 7573 not writable, us │ │ │ +00001390: 696e 670a 6469 7265 6374 6f72 7920 6061 ing.directory `a │ │ │ +000013a0: 7574 6f2d 7361 7665 2d64 6972 6563 746f uto-save-directo │ │ │ +000013b0: 7279 2d66 616c 6c62 6163 6b27 2e0a 0a59 ry-fallback'...Y │ │ │ +000013c0: 6f75 2063 616e 2072 6564 6566 696e 6520 ou can redefine │ │ │ +000013d0: 7468 6973 2066 6f72 2063 7573 746f 6d69 this for customi │ │ │ +000013e0: 7a61 7469 6f6e 2028 6865 2068 6520 3a2d zation (he he :- │ │ │ +000013f0: 292e 0a53 6565 2061 6c73 6f20 6675 6e63 )..See also func │ │ │ +00001400: 7469 6f6e 2060 6175 746f 2d73 6176 652d tion `auto-save- │ │ │ +00001410: 6669 6c65 2d6e 616d 652d 7027 2e1f 0a28 file-name-p'...( │ │ │ +00001420: 6465 6661 6c69 6173 2027 6d61 6b65 2d61 defalias 'make-a │ │ │ +00001430: 7574 6f2d 7361 7665 2d66 696c 652d 6e61 uto-save-file-na │ │ │ +00001440: 6d65 2023 5b28 266f 7074 696f 6e61 6c20 me #[(&optional │ │ │ +00001450: 6669 6c65 2d6e 616d 6529 2022 5c6e ae89 file-name) "\n.. │ │ │ +00001460: 08ae 8609 ad83 c309 2112 c4c5 c68f 8722 ........!......" │ │ │ +00001470: 205b 6275 6666 6572 2d66 696c 652d 7472 [buffer-file-tr │ │ │ +00001480: 7565 6e61 6d65 2062 7566 6665 722d 6669 uename buffer-fi │ │ │ +00001490: 6c65 2d6e 616d 6520 6669 6c65 2d6e 616d le-name file-nam │ │ │ +000014a0: 6520 6578 7061 6e64 2d66 696c 652d 6e61 e expand-file-na │ │ │ +000014b0: 6d65 2065 7272 6f72 2d64 6174 6120 2862 me error-data (b │ │ │ +000014c0: 7974 652d 636f 6465 2022 0c3f ad81 c60c yte-code ".?.... │ │ │ +000014d0: ae84 c7c8 2021 0c3b ad88 c9ca 21ad 83ca .... !.;....!... │ │ │ +000014e0: 0c21 1a1d 1bcb 5c6e ab8d 09ab 85cc 0d21 .!....\n.......! │ │ │ +000014f0: aa96 cd0d 21aa 9108 ac84 0e0e ab86 cd0d ....!........... │ │ │ +00001500: 0b5c 22aa 84cc 0d0b 5c22 212b 8722 205b .\".....\"!+." [ │ │ │ +00001510: 6175 746f 2d73 6176 652d 6469 7265 6374 auto-save-direct │ │ │ +00001520: 6f72 7920 6566 732d 6175 746f 2d73 6176 ory efs-auto-sav │ │ │ +00001530: 652d 7265 6d6f 7465 6c79 2072 656d 6f74 e-remotely remot │ │ │ +00001540: 652d 7020 6e61 6d65 2d70 7265 6669 7820 e-p name-prefix │ │ │ +00001550: 6669 6c65 2d6e 616d 6520 7361 7665 2d6e file-name save-n │ │ │ +00001560: 616d 6520 2223 2522 2061 7574 6f2d 7361 ame "#%" auto-sa │ │ │ +00001570: 7665 2d65 7363 6170 652d 6e61 6d65 2062 ve-escape-name b │ │ │ +00001580: 7566 6665 722d 6e61 6d65 2066 626f 756e uffer-name fboun │ │ │ +00001590: 6470 2065 6673 2d66 7470 2d70 6174 6820 dp efs-ftp-path │ │ │ +000015a0: 6578 7061 6e64 2d66 696c 652d 6e61 6d65 expand-file-name │ │ │ +000015b0: 2061 7574 6f2d 7361 7665 2d6e 616d 652d auto-save-name- │ │ │ +000015c0: 696e 2d73 616d 652d 6469 7265 6374 6f72 in-same-director │ │ │ +000015d0: 7920 6175 746f 2d73 6176 652d 6e61 6d65 y auto-save-name │ │ │ +000015e0: 2d69 6e2d 6669 7865 642d 6469 7265 6374 -in-fixed-direct │ │ │ +000015f0: 6f72 7920 6175 746f 2d73 6176 652d 6861 ory auto-save-ha │ │ │ +00001600: 7368 2d70 5d20 3429 2028 2865 7272 6f72 sh-p] 4) ((error │ │ │ +00001610: 2028 6279 7465 2d63 6f64 6520 22c3 c4c5 (byte-code "... │ │ │ +00001620: 0821 5c22 8809 ab8b c609 21c7 c809 21c7 .!\"......!...!. │ │ │ +00001630: 52aa 89c9 cacb cc20 21c7 5121 1acd 5c6e R...... !.Q!..\n │ │ │ +00001640: 21ac 85ce 5c6e 21ab 835c 6eaa 87c9 cfc8 !...\n!..\n..... │ │ │ +00001650: 5c6e 2150 2129 8722 205b 6572 726f 722d \n!P!)." [error- │ │ │ +00001660: 6461 7461 2066 696c 652d 6e61 6d65 2066 data file-name f │ │ │ +00001670: 6e61 6d65 2077 6172 6e20 2245 7272 6f72 name warn "Error │ │ │ +00001680: 2063 6175 6768 7420 696e 2060 6d61 6b65 caught in `make │ │ │ +00001690: 2d61 7574 6f2d 7361 7665 2d66 696c 652d -auto-save-file- │ │ │ +000016a0: 6e61 6d65 273a 5c6e 2573 2220 6572 726f name':\n%s" erro │ │ │ +000016b0: 722d 6d65 7373 6167 652d 7374 7269 6e67 r-message-string │ │ │ +000016c0: 2066 696c 652d 6e61 6d65 2d64 6972 6563 file-name-direc │ │ │ +000016d0: 746f 7279 2022 2322 2066 696c 652d 6e61 tory "#" file-na │ │ │ +000016e0: 6d65 2d6e 6f6e 6469 7265 6374 6f72 7920 me-nondirectory │ │ │ +000016f0: 6578 7061 6e64 2d66 696c 652d 6e61 6d65 expand-file-name │ │ │ +00001700: 2022 2325 2220 6175 746f 2d73 6176 652d "#%" auto-save- │ │ │ +00001710: 6573 6361 7065 2d6e 616d 6520 6275 6666 escape-name buff │ │ │ +00001720: 6572 2d6e 616d 6520 6669 6c65 2d77 7269 er-name file-wri │ │ │ +00001730: 7461 626c 652d 7020 6669 6c65 2d65 7869 table-p file-exi │ │ │ +00001740: 7374 732d 7020 227e 2f22 5d20 3429 2929 sts-p "~/"] 4))) │ │ │ +00001750: 5d20 3320 2823 2420 2e20 3432 3239 295d ] 3 (#$ . 4229)] │ │ │ +00001760: 290a 2340 3134 3520 5265 7475 726e 206e ).#@145 Return n │ │ │ +00001770: 6f6e 2d6e 696c 2069 6620 4649 4c45 4e41 on-nil if FILENA │ │ │ +00001780: 4d45 2063 616e 2062 6520 7969 656c 6465 ME can be yielde │ │ │ +00001790: 6420 6279 2060 6d61 6b65 2d61 7574 6f2d d by `make-auto- │ │ │ +000017a0: 7361 7665 2d66 696c 652d 6e61 6d65 272e save-file-name'. │ │ │ +000017b0: 0a46 494c 454e 414d 4520 7368 6f75 6c64 .FILENAME should │ │ │ +000017c0: 206c 6163 6b20 736c 6173 6865 732e 0a59 lack slashes..Y │ │ │ +000017d0: 6f75 2063 616e 2072 6564 6566 696e 6520 ou can redefine │ │ │ +000017e0: 7468 6973 2066 6f72 2063 7573 746f 6d69 this for customi │ │ │ +000017f0: 7a61 7469 6f6e 2e1f 0a28 6465 6661 6c69 zation...(defali │ │ │ +00001800: 6173 2027 6175 746f 2d73 6176 652d 6669 as 'auto-save-fi │ │ │ +00001810: 6c65 2d6e 616d 652d 7020 235b 2866 696c le-name-p #[(fil │ │ │ +00001820: 656e 616d 6529 2022 c1c2 085c 2287 2220 ename) "...\"." │ │ │ +00001830: 5b66 696c 656e 616d 6520 7374 7269 6e67 [filename string │ │ │ +00001840: 2d6d 6174 6368 2022 5c5c 6023 2e2a 235c -match "\\`#.*#\ │ │ │ +00001850: 5c27 225d 2033 2028 2324 202e 2035 3939 \'"] 3 (#$ . 599 │ │ │ +00001860: 3229 5d29 0a23 4032 3532 2052 6576 6572 2)]).#@252 Rever │ │ │ +00001870: 7365 206f 6620 606d 616b 652d 6175 746f se of `make-auto │ │ │ +00001880: 2d73 6176 652d 6669 6c65 2d6e 616d 6527 -save-file-name' │ │ │ +00001890: 2e0a 5265 7475 726e 7320 6e69 6c20 6966 ..Returns nil if │ │ │ +000018a0: 2053 4156 454e 414d 4520 7761 7320 6e6f SAVENAME was no │ │ │ +000018b0: 7420 6173 736f 6369 6174 6564 2077 6974 t associated wit │ │ │ +000018c0: 6820 6120 6669 6c65 2028 652e 672e 2c20 h a file (e.g., │ │ │ +000018d0: 6974 2063 616d 650a 6672 6f6d 2061 6e20 it came.from an │ │ │ +000018e0: 6175 746f 7361 7665 6420 602a 6d61 696c autosaved `*mail │ │ │ +000018f0: 2a27 2062 7566 6665 7229 206f 7220 646f *' buffer) or do │ │ │ +00001900: 6573 206e 6f74 2061 7070 6561 7220 746f es not appear to │ │ │ +00001910: 2062 6520 616e 0a61 7574 6f73 6176 6520 be an.autosave │ │ │ +00001920: 6669 6c65 2061 7420 616c 6c2e 0a48 6173 file at all..Has │ │ │ +00001930: 6865 6420 6669 6c65 7320 6172 6520 6e6f hed files are no │ │ │ +00001940: 7420 756e 6465 7273 746f 6f64 2c20 7365 t understood, se │ │ │ +00001950: 6520 6061 7574 6f2d 7361 7665 2d68 6173 e `auto-save-has │ │ │ +00001960: 682d 7027 2e1f 0a28 6465 6661 6c69 6173 h-p'...(defalias │ │ │ +00001970: 2027 6175 746f 2d73 6176 652d 6f72 6967 'auto-save-orig │ │ │ +00001980: 696e 616c 2d6e 616d 6520 235b 2873 6176 inal-name #[(sav │ │ │ +00001990: 656e 616d 6529 2022 c55c 6e21 c65c 6e21 ename) ".\n!.\n! │ │ │ +000019a0: 1b1c c70c 213f ae84 c8c9 0c5c 223f ad9f ....!?.....\"?.. │ │ │ +000019b0: 0b09 ad83 ca09 216b ac87 0bca 0821 6bab ......!k.....!k. │ │ │ +000019c0: 88cb 0ccc cd4f 21aa 860b 0ccc cd4f 502a .....O!......OP* │ │ │ +000019d0: 8722 205b 6175 746f 2d73 6176 652d 6469 ." [auto-save-di │ │ │ +000019e0: 7265 6374 6f72 792d 6661 6c6c 6261 636b rectory-fallback │ │ │ +000019f0: 2061 7574 6f2d 7361 7665 2d64 6972 6563 auto-save-direc │ │ │ +00001a00: 746f 7279 2073 6176 656e 616d 6520 7361 tory savename sa │ │ │ +00001a10: 7665 6469 7220 6261 7365 6e61 6d65 2066 vedir basename f │ │ │ +00001a20: 696c 652d 6e61 6d65 2d6e 6f6e 6469 7265 ile-name-nondire │ │ │ +00001a30: 6374 6f72 7920 6669 6c65 2d6e 616d 652d ctory file-name- │ │ │ +00001a40: 6469 7265 6374 6f72 7920 6175 746f 2d73 directory auto-s │ │ │ +00001a50: 6176 652d 6669 6c65 2d6e 616d 652d 7020 ave-file-name-p │ │ │ +00001a60: 7374 7269 6e67 2d6d 6174 6368 2022 5e23 string-match "^# │ │ │ +00001a70: 2522 2065 7870 616e 642d 6669 6c65 2d6e %" expand-file-n │ │ │ +00001a80: 616d 6520 6175 746f 2d73 6176 652d 756e ame auto-save-un │ │ │ +00001a90: 6573 6361 7065 2d6e 616d 6520 3120 2d31 escape-name 1 -1 │ │ │ +00001aa0: 5d20 3420 2823 2420 2e20 3632 3531 295d ] 4 (#$ . 6251)] │ │ │ +00001ab0: 290a 2864 6566 616c 6961 7320 2761 7574 ).(defalias 'aut │ │ │ +00001ac0: 6f2d 7361 7665 2d6e 616d 652d 696e 2d66 o-save-name-in-f │ │ │ +00001ad0: 6978 6564 2d64 6972 6563 746f 7279 2023 ixed-directory # │ │ │ +00001ae0: 5b28 6669 6c65 6e61 6d65 2026 6f70 7469 [(filename &opti │ │ │ +00001af0: 6f6e 616c 2070 7265 6669 7829 2022 5c6e onal prefix) "\n │ │ │ +00001b00: ae81 c6c7 0c21 c651 1d09 ab93 0bab 900d .....!.Q........ │ │ │ +00001b10: 47c8 56ab 8ac9 ca0c 21cb 0b21 5c22 aa8a G.V.....!..!\".. │ │ │ +00001b20: c90d cb08 ae82 0e0c 215c 2229 8722 205b ........!\")." [ │ │ │ +00001b30: 6175 746f 2d73 6176 652d 6469 7265 6374 auto-save-direct │ │ │ +00001b40: 6f72 7920 6175 746f 2d73 6176 652d 6861 ory auto-save-ha │ │ │ +00001b50: 7368 2d70 2070 7265 6669 7820 6175 746f sh-p prefix auto │ │ │ +00001b60: 2d73 6176 652d 6861 7368 2d64 6972 6563 -save-hash-direc │ │ │ +00001b70: 746f 7279 2066 696c 656e 616d 6520 6261 tory filename ba │ │ │ +00001b80: 7365 2d6e 616d 6520 2223 2220 6175 746f se-name "#" auto │ │ │ +00001b90: 2d73 6176 652d 6573 6361 7065 2d6e 616d -save-escape-nam │ │ │ +00001ba0: 6520 3134 2065 7870 616e 642d 6669 6c65 e 14 expand-file │ │ │ +00001bb0: 2d6e 616d 6520 6175 746f 2d73 6176 652d -name auto-save- │ │ │ +00001bc0: 6379 636c 6963 2d68 6173 682d 3134 2061 cyclic-hash-14 a │ │ │ +00001bd0: 7574 6f2d 7361 7665 2d63 6865 636b 6564 uto-save-checked │ │ │ +00001be0: 2d64 6972 6563 746f 7279 2061 7574 6f2d -directory auto- │ │ │ +00001bf0: 7361 7665 2d64 6972 6563 746f 7279 2d66 save-directory-f │ │ │ +00001c00: 616c 6c62 6163 6b5d 2034 5d29 0a28 6465 allback] 4]).(de │ │ │ +00001c10: 6661 6c69 6173 2027 6175 746f 2d73 6176 falias 'auto-sav │ │ │ +00001c20: 652d 6e61 6d65 2d69 6e2d 7361 6d65 2d64 e-name-in-same-d │ │ │ +00001c30: 6972 6563 746f 7279 2023 5b28 6669 6c65 irectory #[(file │ │ │ +00001c40: 6e61 6d65 2026 6f70 7469 6f6e 616c 2070 name &optional p │ │ │ +00001c50: 7265 6669 7829 2022 c45c 6e21 891b ab89 refix) ".\n!.... │ │ │ +00001c60: c50b 21ac 84c6 0921 130b 08ae 81c7 c85c ..!....!.......\ │ │ │ +00001c70: 6e21 c752 2987 2220 5b70 7265 6669 7820 n!.R)." [prefix │ │ │ +00001c80: 6175 746f 2d73 6176 652d 6469 7265 6374 auto-save-direct │ │ │ +00001c90: 6f72 792d 6661 6c6c 6261 636b 2066 696c ory-fallback fil │ │ │ +00001ca0: 656e 616d 6520 6469 7265 6374 6f72 7920 ename directory │ │ │ +00001cb0: 6669 6c65 2d6e 616d 652d 6469 7265 6374 file-name-direct │ │ │ +00001cc0: 6f72 7920 6669 6c65 2d77 7269 7461 626c ory file-writabl │ │ │ +00001cd0: 652d 7020 6175 746f 2d73 6176 652d 6368 e-p auto-save-ch │ │ │ +00001ce0: 6563 6b65 642d 6469 7265 6374 6f72 7920 ecked-directory │ │ │ +00001cf0: 2223 2220 6669 6c65 2d6e 616d 652d 6e6f "#" file-name-no │ │ │ +00001d00: 6e64 6972 6563 746f 7279 5d20 355d 290a ndirectory] 5]). │ │ │ +00001d10: 2340 3134 3820 4c69 7374 206f 6620 6368 #@148 List of ch │ │ │ +00001d20: 6172 6163 7465 7273 2064 6973 616c 6c6f aracters disallo │ │ │ +00001d30: 7765 6420 286f 7220 706f 7465 6e74 6961 wed (or potentia │ │ │ +00001d40: 6c6c 7920 6469 7361 6c6c 6f77 6564 2920 lly disallowed) │ │ │ +00001d50: 696e 2066 696c 656e 616d 6573 2e0a 496e in filenames..In │ │ │ +00001d60: 636c 7564 6573 2065 7665 7279 7468 696e cludes everythin │ │ │ +00001d70: 6720 7468 6174 2063 616e 2067 6574 2075 g that can get u │ │ │ +00001d80: 7320 696e 746f 2074 726f 7562 6c65 2075 s into trouble u │ │ │ +00001d90: 6e64 6572 204d 5320 5769 6e64 6f77 7320 nder MS Windows │ │ │ +00001da0: 6f72 2055 6e69 782e 1f0a 2864 6566 636f or Unix...(defco │ │ │ +00001db0: 6e73 7420 6175 746f 2d73 6176 652d 7265 nst auto-save-re │ │ │ +00001dc0: 7365 7276 6564 2d63 6861 7273 2027 283f served-chars '(? │ │ │ +00001dd0: 5c5e 4020 3f5c 5e41 203f 5c5e 4220 3f5c \^@ ?\^A ?\^B ?\ │ │ │ +00001de0: 5e43 203f 5c5e 4420 3f5c 5e45 203f 5c5e ^C ?\^D ?\^E ?\^ │ │ │ +00001df0: 4620 3f5c 5e47 203f 5c5e 4820 3f5c 7420 F ?\^G ?\^H ?\t │ │ │ +00001e00: 3f5c 6e20 3f5c 5e4b 203f 5c5e 4c20 3f5c ?\n ?\^K ?\^L ?\ │ │ │ +00001e10: 7220 3f5c 5e4e 203f 5c5e 4f20 3f5c 5e50 r ?\^N ?\^O ?\^P │ │ │ +00001e20: 203f 5c5e 5120 3f5c 5e52 203f 5c5e 5320 ?\^Q ?\^R ?\^S │ │ │ +00001e30: 3f5c 5e54 203f 5c5e 5520 3f5c 5e56 203f ?\^T ?\^U ?\^V ? │ │ │ +00001e40: 5c5e 5720 3f5c 5e58 203f 5c5e 5920 3f5c \^W ?\^X ?\^Y ?\ │ │ │ +00001e50: 5e5a 203f 5c5e 5b20 3f5c 5e5c 5c20 3f5c ^Z ?\^[ ?\^\\ ?\ │ │ │ +00001e60: 5e5d 203f 5c5e 5e20 3f5c 5e5f 203f 5c20 ^] ?\^^ ?\^_ ?\ │ │ │ +00001e70: 203f 5c3f 203f 2a20 3f3a 203f 3c20 3f3e ?\? ?* ?: ?< ?> │ │ │ +00001e80: 203f 7c20 3f2f 203f 5c5c 203f 2620 3f5e ?| ?/ ?\\ ?& ?^ │ │ │ +00001e90: 203f 2520 3f3d 203f 5c22 2920 2823 2420 ?% ?= ?\") (#$ │ │ │ +00001ea0: 2e20 3734 3436 2929 0a23 4032 3335 2045 . 7446)).#@235 E │ │ │ +00001eb0: 7363 6170 6520 616e 7920 6576 696c 206e scape any evil n │ │ │ +00001ec0: 6173 7479 2063 6861 7261 6374 6572 7320 asty characters │ │ │ +00001ed0: 696e 2061 2070 6f74 656e 7469 616c 2066 in a potential f │ │ │ +00001ee0: 696c 656e 616d 652e 0a55 7365 7320 7175 ilename..Uses qu │ │ │ +00001ef0: 6f74 6564 2d70 7269 6e74 6162 6c65 2d73 oted-printable-s │ │ │ +00001f00: 7479 6c65 2065 7363 6170 696e 6720 2d2d tyle escaping -- │ │ │ +00001f10: 2065 2e67 2e20 7468 6520 6472 6561 6465 e.g. the dreade │ │ │ +00001f20: 6420 3d33 442e 0a44 6f65 7320 6e6f 7420 d =3D..Does not │ │ │ +00001f30: 7573 6520 5552 4c20 6573 6361 7069 6e67 use URL escaping │ │ │ +00001f40: 2028 7769 7468 2025 2920 6265 6361 7573 (with %) becaus │ │ │ +00001f50: 6520 6669 6c65 6e61 6d65 7320 6265 6769 e filenames begi │ │ │ +00001f60: 6e6e 696e 6720 7769 7468 2023 2520 6172 nning with #% ar │ │ │ +00001f70: 650a 6120 7370 6563 6961 6c20 7369 676e e.a special sign │ │ │ +00001f80: 616c 2066 6f72 206e 6f6e 2d66 696c 6520 al for non-file │ │ │ +00001f90: 6275 6666 6572 732e 1f0a 2864 6566 616c buffers...(defal │ │ │ +00001fa0: 6961 7320 2761 7574 6f2d 7361 7665 2d65 ias 'auto-save-e │ │ │ +00001fb0: 7363 6170 652d 6e61 6d65 2023 5b28 7374 scape-name #[(st │ │ │ +00001fc0: 7229 2022 c1c2 08c3 2387 2220 5b73 7472 r) "....#." [str │ │ │ +00001fd0: 206d 6170 636f 6e63 6174 2023 5b28 6368 mapconcat #[(ch │ │ │ +00001fe0: 6172 2920 2209 0873 ab91 09c2 57ab 86c3 ar) "..s....W... │ │ │ +00001ff0: c409 5c22 9687 c3c5 095c 2296 87c6 0921 ..\".....\"....! │ │ │ +00002000: 8722 205b 6175 746f 2d73 6176 652d 7265 ." [auto-save-re │ │ │ +00002010: 7365 7276 6564 2d63 6861 7273 2063 6861 served-chars cha │ │ │ +00002020: 7220 3136 2066 6f72 6d61 7420 223d 3025 r 16 format "=0% │ │ │ +00002030: 7822 2022 3d25 7822 2063 6861 722d 746f x" "=%x" char-to │ │ │ +00002040: 2d73 7472 696e 675d 2033 5d20 2222 5d20 -string] 3] ""] │ │ │ +00002050: 3420 2823 2420 2e20 3738 3535 295d 290a 4 (#$ . 7855)]). │ │ │ +00002060: 2864 6566 616c 6961 7320 2761 7574 6f2d (defalias 'auto- │ │ │ +00002070: 7361 7665 2d75 6e68 6578 2023 5b28 7829 save-unhex #[(x) │ │ │ +00002080: 2022 08c1 56ab 9108 c259 ab86 08c2 5ac3 "..V....Y....Z. │ │ │ +00002090: 5c5c 8708 c45a c35c 5c87 08c5 5a87 2220 \\...Z.\\...Z." │ │ │ +000020a0: 5b78 203f 3920 3f61 2031 3020 3f41 203f [x ?9 ?a 10 ?A ? │ │ │ +000020b0: 305d 2032 5d29 0a23 4038 3920 556e 646f 0] 2]).#@89 Undo │ │ │ +000020c0: 2061 6e79 2065 7363 6170 696e 6720 6f66 any escaping of │ │ │ +000020d0: 2065 7669 6c20 6e61 7374 7920 6368 6172 evil nasty char │ │ │ +000020e0: 6163 7465 7273 2069 6e20 6120 6669 6c65 acters in a file │ │ │ +000020f0: 206e 616d 652e 0a53 6565 2060 6175 746f name..See `auto │ │ │ +00002100: 2d73 6176 652d 6573 6361 7065 2d6e 616d -save-escape-nam │ │ │ +00002110: 6527 2e1f 0a28 6465 6661 6c69 6173 2027 e'...(defalias ' │ │ │ +00002120: 6175 746f 2d73 6176 652d 756e 6573 6361 auto-save-unesca │ │ │ +00002130: 7065 2d6e 616d 6520 235b 2873 7472 2920 pe-name #[(str) │ │ │ +00002140: 220d ae81 c615 c6c7 191c c8c9 0d5c 22ab "............\". │ │ │ +00002150: a9ca 941b cb0d 0b54 9c21 8918 cc5f cb0d .......T.!..._.. │ │ │ +00002160: 0bcd 5c5c 9c21 5c5c 1a0c 0dca 0b4f ce5c ..\\.!\\.....O.\ │ │ │ +00002170: 6e21 5114 0dca 95cf 4f15 2baa 510c 0d50 n!Q.....O.+.Q..P │ │ │ +00002180: 8914 2a87 2220 5b63 6831 2063 6173 652d ..*." [ch1 case- │ │ │ +00002190: 666f 6c64 2d73 6561 7263 6820 636f 6465 fold-search code │ │ │ +000021a0: 2073 7461 7274 2074 6d70 2073 7472 2022 start tmp str " │ │ │ +000021b0: 2220 7420 7374 7269 6e67 2d6d 6174 6368 " t string-match │ │ │ +000021c0: 2022 3d5b 302d 3961 2d66 5d5b 302d 3961 "=[0-9a-f][0-9a │ │ │ +000021d0: 2d66 5d22 2030 2061 7574 6f2d 7361 7665 -f]" 0 auto-save │ │ │ +000021e0: 2d75 6e68 6578 2031 3620 3220 6368 6172 -unhex 16 2 char │ │ │ +000021f0: 2d74 6f2d 7374 7269 6e67 206e 696c 5d20 -to-string nil] │ │ │ +00002200: 3620 2823 2420 2e20 3833 3830 295d 290a 6 (#$ . 8380)]). │ │ │ +00002210: 2864 6566 616c 6961 7320 2761 7574 6f2d (defalias 'auto- │ │ │ +00002220: 7361 7665 2d63 7963 6c69 632d 6861 7368 save-cyclic-hash │ │ │ +00002230: 2d31 3420 235b 2873 2920 22c2 c3c4 5c22 -14 #[(s) "...\" │ │ │ +00002240: 19c5 c608 5c22 88c7 c8c9 09ca 48cb 5c22 ....\"......H.\" │ │ │ +00002250: c909 cc48 cb5c 22c9 09cd 48cb 5c22 c909 ...H.\"...H.\".. │ │ │ +00002260: ce48 cb5c 22c9 09cf 48cb 5c22 c909 d048 .H.\"...H.\"...H │ │ │ +00002270: cb5c 22c9 09d1 48cb 5c22 2608 2987 2220 .\"...H.\"&.)." │ │ │ +00002280: 5b73 2063 7263 206d 616b 652d 7665 6374 [s crc make-vect │ │ │ +00002290: 6f72 2037 203f 5c5e 4020 6d61 7063 2023 or 7 ?\^@ mapc # │ │ │ +000022a0: 5b28 6e65 7729 2022 0809 c248 5c5c 1009 [(new) "...H\\.. │ │ │ +000022b0: c209 c348 085c 5c49 8809 c309 c448 4988 ...H.\\I.....HI. │ │ │ +000022c0: 09c4 09c5 4849 8809 c509 c648 085c 5c49 ....HI.....H.\\I │ │ │ +000022d0: 8809 c609 c748 4988 09c7 09c8 4849 8809 .....HI.....HI.. │ │ │ +000022e0: c808 4987 2220 5b6e 6577 2063 7263 2036 ..I." [new crc 6 │ │ │ +000022f0: 2035 2034 2033 2032 2031 2030 5d20 345d 5 4 3 2 1 0] 4] │ │ │ +00002300: 2066 6f72 6d61 7420 2225 3032 7825 3032 format "%02x%02 │ │ │ +00002310: 7825 3032 7825 3032 7825 3032 7825 3032 x%02x%02x%02x%02 │ │ │ +00002320: 7825 3032 7822 206c 6f67 616e 6420 3020 x%02x" logand 0 │ │ │ +00002330: 3235 3520 3120 3220 3320 3420 3520 365d 255 1 2 3 4 5 6] │ │ │ +00002340: 2031 315d 290a 2340 3437 3020 446f 2072 11]).#@470 Do r │ │ │ +00002350: 6563 6f76 6572 2d66 696c 6520 666f 7220 ecover-file for │ │ │ +00002360: 616c 6c20 6175 746f 7361 7665 2066 696c all autosave fil │ │ │ +00002370: 6573 2077 6869 6368 2061 7265 2063 7572 es which are cur │ │ │ +00002380: 7265 6e74 2e0a 4f6e 6c79 2077 6f72 6b73 rent..Only works │ │ │ +00002390: 2069 6620 796f 7520 6861 7665 2061 206e if you have a n │ │ │ +000023a0: 6f6e 2d6e 696c 2060 6175 746f 2d73 6176 on-nil `auto-sav │ │ │ +000023b0: 652d 6469 7265 6374 6f72 7927 2e0a 0a4f e-directory'...O │ │ │ +000023c0: 7074 696f 6e61 6c20 7072 6566 6978 2061 ptional prefix a │ │ │ +000023d0: 7267 756d 656e 7420 5349 4c45 4e54 206d rgument SILENT m │ │ │ +000023e0: 6561 6e73 2074 6f20 6265 2073 696c 656e eans to be silen │ │ │ +000023f0: 7420 6162 6f75 7420 6e6f 6e2d 6375 7272 t about non-curr │ │ │ +00002400: 656e 740a 6175 746f 7361 7665 2066 696c ent.autosave fil │ │ │ +00002410: 6573 2e20 2054 6869 7320 6973 2075 7365 es. This is use │ │ │ +00002420: 6675 6c20 6966 2069 6e76 6f6b 6564 2061 ful if invoked a │ │ │ +00002430: 7574 6f6d 6174 6963 616c 6c79 2061 7420 utomatically at │ │ │ +00002440: 456d 6163 730a 7374 6172 7475 702e 0a0a Emacs.startup... │ │ │ +00002450: 4966 2060 6175 746f 2d73 6176 652d 6f66 If `auto-save-of │ │ │ +00002460: 6665 722d 6465 6c65 7465 2720 6973 2074 fer-delete' is t │ │ │ +00002470: 2c20 7468 6973 2066 756e 6374 696f 6e20 , this function │ │ │ +00002480: 7769 6c6c 206f 6666 6572 2074 6f20 6465 will offer to de │ │ │ +00002490: 6c65 7465 0a6f 6c64 206f 7220 7265 6a65 lete.old or reje │ │ │ +000024a0: 6374 6564 2061 7574 6f73 6176 6520 6669 cted autosave fi │ │ │ +000024b0: 6c65 732e 0a0a 4861 7368 6564 2066 696c les...Hashed fil │ │ │ +000024c0: 6573 2028 7365 6520 6061 7574 6f2d 7361 es (see `auto-sa │ │ │ +000024d0: 7665 2d68 6173 682d 7027 2920 6172 6520 ve-hash-p') are │ │ │ +000024e0: 6e6f 7420 756e 6465 7273 746f 6f64 2c20 not understood, │ │ │ +000024f0: 7573 650a 6072 6563 6f76 6572 2d66 696c use.`recover-fil │ │ │ +00002500: 6527 2074 6f20 7265 636f 7665 7220 7468 e' to recover th │ │ │ +00002510: 656d 2069 6e64 6976 6964 7561 6c6c 792e em individually. │ │ │ +00002520: 1f0a 2864 6566 616c 6961 7320 2772 6563 ..(defalias 'rec │ │ │ +00002530: 6f76 6572 2d61 6c6c 2d66 696c 6573 2023 over-all-files # │ │ │ +00002540: 5b28 266f 7074 696f 6e61 6c20 7369 6c65 [(&optional sile │ │ │ +00002550: 6e74 2920 22c6 08c7 c8c9 c725 c989 ca89 nt) "......%.... │ │ │ +00002560: 1a19 1d1c 1bcb 0821 cb0e 2e21 6bac 8b0b .......!...!k... │ │ │ +00002570: c60e 2ec7 c8c9 c725 a413 0b83 c900 0b40 .......%.......@ │ │ │ +00002580: 14cc 0c21 150b 4113 0dab 8dcd 0c0d 5c22 ...!..A.......\" │ │ │ +00002590: ac87 cecf 0c5c 2288 aa62 0954 11d0 90d1 .....\"..b.T.... │ │ │ +000025a0: 0e32 2188 8ad0 7188 d20c 2116 2fd3 0cd4 .2!...q...!./... │ │ │ +000025b0: 5c22 880d ad89 d20d 2116 2fd3 0dd4 5c22 \"......!./...\" │ │ │ +000025c0: 2991 88d5 d6d7 0dae 81d8 5c22 21ab b970 ).........\"!..p │ │ │ +000025d0: 1e30 0dab 86d9 0dc7 5c22 aa83 dadb 2171 .0......\"....!q │ │ │ +000025e0: 88c9 1633 dc20 88dd 0cc9 5c22 88c9 dedf ...3. ....\".... │ │ │ +000025f0: 8f88 c916 345c 6e54 12e0 e1e2 205c 2288 ....4\nT.... \". │ │ │ +00002600: 0e30 7188 e3e4 2188 2982 2500 0e31 8325 .0q...!.).%..1.% │ │ │ +00002610: 000e 31e5 61ac 89d5 d6e6 0d5c 2221 8325 ..1.a......\"!.% │ │ │ +00002620: 00e7 0c21 8882 2500 09ca 55ab 8a0e 35ac ...!..%...U...5. │ │ │ +00002630: 95e0 e821 88aa 8fe0 e95c 6e09 5c6e e455 ...!.....\n.\n.U │ │ │ +00002640: ab83 eaaa 81eb 2488 2dec d021 ad83 edd0 ......$.-..!.... │ │ │ +00002650: 2187 2220 5b61 7574 6f2d 7361 7665 2d64 !." [auto-save-d │ │ │ +00002660: 6972 6563 746f 7279 2074 6f74 616c 2063 irectory total c │ │ │ +00002670: 6f75 6e74 2073 6176 6566 696c 6573 2061 ount savefiles a │ │ │ +00002680: 6669 6c65 2066 696c 6520 6469 7265 6374 file file direct │ │ │ +00002690: 6f72 792d 6669 6c65 7320 7420 225c 5c60 ory-files t "\\` │ │ │ +000026a0: 2322 206e 696c 2030 2065 7870 616e 642d #" nil 0 expand- │ │ │ +000026b0: 6669 6c65 2d6e 616d 6520 6175 746f 2d73 file-name auto-s │ │ │ +000026c0: 6176 652d 6f72 6967 696e 616c 2d6e 616d ave-original-nam │ │ │ +000026d0: 6520 6669 6c65 2d6e 6577 6572 2d74 6861 e file-newer-tha │ │ │ +000026e0: 6e2d 6669 6c65 2d70 2077 6172 6e20 2241 n-file-p warn "A │ │ │ +000026f0: 7574 6f73 6176 6520 6669 6c65 205c 2225 utosave file \"% │ │ │ +00002700: 735c 2220 6973 206e 6f74 2063 7572 7265 s\" is not curre │ │ │ +00002710: 6e74 2e22 2022 2a44 6972 6563 746f 7279 nt." "*Directory │ │ │ +00002720: 2a22 2062 7566 6665 722d 6469 7361 626c *" buffer-disabl │ │ │ +00002730: 652d 756e 646f 2066 696c 652d 6e61 6d65 e-undo file-name │ │ │ +00002740: 2d64 6972 6563 746f 7279 2069 6e73 6572 -directory inser │ │ │ +00002750: 742d 6469 7265 6374 6f72 7920 222d 6c22 t-directory "-l" │ │ │ +00002760: 2079 6573 2d6f 722d 6e6f 2d70 2066 6f72 yes-or-no-p for │ │ │ +00002770: 6d61 7420 2252 6563 6f76 6572 2025 7320 mat "Recover %s │ │ │ +00002780: 6672 6f6d 2061 7574 6f20 7361 7665 2066 from auto save f │ │ │ +00002790: 696c 653f 2022 2022 6e6f 6e2d 6669 6c65 ile? " "non-file │ │ │ +000027a0: 2062 7566 6665 7222 2066 696e 642d 6669 buffer" find-fi │ │ │ +000027b0: 6c65 2d6e 6f73 656c 6563 7420 6765 6e65 le-noselect gene │ │ │ +000027c0: 7261 7465 2d6e 6577 2d62 7566 6665 7220 rate-new-buffer │ │ │ +000027d0: 222a 7265 636f 7665 7265 642a 2220 6572 "*recovered*" er │ │ │ +000027e0: 6173 652d 6275 6666 6572 2069 6e73 6572 ase-buffer inser │ │ │ +000027f0: 742d 6669 6c65 2d63 6f6e 7465 6e74 7320 t-file-contents │ │ │ +00002800: 2861 6674 6572 2d66 696e 642d 6669 6c65 (after-find-file │ │ │ +00002810: 206e 696c 2920 2828 6572 726f 7229 2920 nil) ((error)) │ │ │ +00002820: 6d65 7373 6167 6520 2241 7574 6f2d 7361 message "Auto-sa │ │ │ +00002830: 7665 206f 6666 2069 6e20 6275 6666 6572 ve off in buffer │ │ │ +00002840: 205c 2225 735c 2220 7469 6c6c 2079 6f75 \"%s\" till you │ │ │ +00002850: 2064 6f20 4d2d 7820 6175 746f 2d73 6176 do M-x auto-sav │ │ │ +00002860: 652d 6d6f 6465 2e22 2062 7566 6665 722d e-mode." buffer- │ │ │ +00002870: 6e61 6d65 2073 6974 2d66 6f72 2031 2061 name sit-for 1 a │ │ │ +00002880: 6c77 6179 7320 2244 656c 6574 6520 6175 lways "Delete au │ │ │ +00002890: 746f 7361 7665 2066 696c 6520 666f 7220 tosave file for │ │ │ +000028a0: 6025 7327 3f20 2220 6465 6c65 7465 2d66 `%s'? " delete-f │ │ │ +000028b0: 696c 6520 224e 6f74 6869 6e67 2074 6f20 ile "Nothing to │ │ │ +000028c0: 7265 636f 7665 722e 2220 2225 642f 2564 recover." "%d/%d │ │ │ +000028d0: 2066 696c 6525 7320 7265 636f 7665 7265 file%s recovere │ │ │ +000028e0: 642e 2220 2222 2022 7322 2067 6574 2d62 d." "" "s" get-b │ │ │ +000028f0: 7566 6665 7220 6b69 6c6c 2d62 7566 6665 uffer kill-buffe │ │ │ +00002900: 7220 6175 746f 2d73 6176 652d 6469 7265 r auto-save-dire │ │ │ +00002910: 6374 6f72 792d 6661 6c6c 6261 636b 2064 ctory-fallback d │ │ │ +00002920: 6566 6175 6c74 2d64 6972 6563 746f 7279 efault-directory │ │ │ +00002930: 206f 6275 6620 6175 746f 2d73 6176 652d obuf auto-save- │ │ │ +00002940: 6f66 6665 722d 6465 6c65 7465 2073 7461 offer-delete sta │ │ │ +00002950: 6e64 6172 642d 6f75 7470 7574 2062 7566 ndard-output buf │ │ │ +00002960: 6665 722d 7265 6164 2d6f 6e6c 7920 6275 fer-read-only bu │ │ │ +00002970: 6666 6572 2d61 7574 6f2d 7361 7665 2d66 ffer-auto-save-f │ │ │ +00002980: 696c 652d 6e61 6d65 2073 696c 656e 745d ile-name silent] │ │ │ +00002990: 2037 2028 2324 202e 2039 3033 3629 2022 7 (#$ . 9036) " │ │ │ +000029a0: 5022 5d29 0a P"]). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/auto-show.elc │ │ │ @@ -1,236 +1,235 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3537 2032 eb 25 01:53:57 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f61 1-21.4.24/lisp/a │ │ │ -00000090: 7574 6f2d 7368 6f77 2e65 6c0a 3b3b 3b20 uto-show.el.;;; │ │ │ -000000a0: 656d 6163 7320 7665 7273 696f 6e20 3231 emacs version 21 │ │ │ -000000b0: 2e34 2028 7061 7463 6820 3234 2920 2253 .4 (patch 24) "S │ │ │ -000000c0: 7461 6e64 6172 6420 4322 2058 456d 6163 tandard C" XEmac │ │ │ -000000d0: 7320 4c75 6369 642e 0a3b 3b3b 2062 7974 s Lucid..;;; byt │ │ │ -000000e0: 6563 6f6d 7020 7665 7273 696f 6e20 322e ecomp version 2. │ │ │ -000000f0: 3237 2058 456d 6163 733b 2032 3030 302d 27 XEmacs; 2000- │ │ │ -00000100: 3039 2d31 322e 0a3b 3b3b 206f 7074 696d 09-12..;;; optim │ │ │ -00000110: 697a 6174 696f 6e20 6973 206f 6e2e 0a3b ization is on..; │ │ │ -00000120: 3b3b 2074 6869 7320 6669 6c65 2075 7365 ;; this file use │ │ │ -00000130: 7320 6f70 636f 6465 7320 7768 6963 6820 s opcodes which │ │ │ -00000140: 646f 206e 6f74 2065 7869 7374 2069 6e20 do not exist in │ │ │ -00000150: 456d 6163 7320 3139 2e0a 0a28 6966 2028 Emacs 19...(if ( │ │ │ -00000160: 616e 6420 2862 6f75 6e64 7020 2765 6d61 and (boundp 'ema │ │ │ -00000170: 6373 2d76 6572 7369 6f6e 290a 0920 286f cs-version).. (o │ │ │ -00000180: 7220 2861 6e64 2028 626f 756e 6470 2027 r (and (boundp ' │ │ │ -00000190: 6570 6f63 683a 3a76 6572 7369 6f6e 2920 epoch::version) │ │ │ -000001a0: 6570 6f63 683a 3a76 6572 7369 6f6e 290a epoch::version). │ │ │ -000001b0: 0920 2020 2020 2873 7472 696e 672d 6c65 . (string-le │ │ │ -000001c0: 7373 7020 656d 6163 732d 7665 7273 696f ssp emacs-versio │ │ │ -000001d0: 6e20 2232 3022 2929 290a 2020 2020 2865 n "20"))). (e │ │ │ -000001e0: 7272 6f72 2022 6061 7574 6f2d 7368 6f77 rror "`auto-show │ │ │ -000001f0: 2e65 6c27 2077 6173 2063 6f6d 7069 6c65 .el' was compile │ │ │ -00000200: 6420 666f 7220 456d 6163 7320 3230 2229 d for Emacs 20") │ │ │ -00000210: 290a 0a28 6f72 2028 626f 756e 6470 2027 )..(or (boundp ' │ │ │ -00000220: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ -00000230: 7429 2028 7365 7471 2063 7572 7265 6e74 t) (setq current │ │ │ -00000240: 2d6c 6f61 642d 6c69 7374 206e 696c 2929 -load-list nil)) │ │ │ -00000250: 0a0a 0a28 6375 7374 6f6d 2d64 6563 6c61 ...(custom-decla │ │ │ -00000260: 7265 2d67 726f 7570 2027 6175 746f 2d73 re-group 'auto-s │ │ │ -00000270: 686f 7720 6e69 6c20 2250 6572 666f 726d how nil "Perform │ │ │ -00000280: 2061 7574 6f6d 6174 6963 2068 6f72 697a automatic horiz │ │ │ -00000290: 6f6e 7461 6c20 7363 726f 6c6c 696e 6720 ontal scrolling │ │ │ -000002a0: 6173 2070 6f69 6e74 206d 6f76 6573 2e22 as point moves." │ │ │ -000002b0: 203a 6772 6f75 7020 2764 6973 706c 6179 :group 'display │ │ │ -000002c0: 203a 6772 6f75 7020 2765 7874 656e 7369 :group 'extensi │ │ │ -000002d0: 6f6e 7329 0a28 6375 7374 6f6d 2d64 6563 ons).(custom-dec │ │ │ -000002e0: 6c61 7265 2d76 6172 6961 626c 6520 2761 lare-variable 'a │ │ │ -000002f0: 7574 6f2d 7368 6f77 2d6d 6f64 6520 2774 uto-show-mode 't │ │ │ -00000300: 2022 2a4e 6f6e 2d6e 696c 2065 6e61 626c "*Non-nil enabl │ │ │ -00000310: 6573 2061 7574 6f6d 6174 6963 2068 6f72 es automatic hor │ │ │ -00000320: 697a 6f6e 7461 6c20 7363 726f 6c6c 696e izontal scrollin │ │ │ -00000330: 672c 2077 6865 6e20 6c69 6e65 7320 6172 g, when lines ar │ │ │ -00000340: 6520 7472 756e 6361 7465 642e 5c6e 5468 e truncated.\nTh │ │ │ -00000350: 6520 6465 6661 756c 7420 7661 6c75 6520 e default value │ │ │ -00000360: 6973 2074 2e20 2054 6f20 6368 616e 6765 is t. To change │ │ │ -00000370: 2074 6865 2064 6566 6175 6c74 2c20 646f the default, do │ │ │ -00000380: 2074 6869 733a 5c6e 0928 7365 742d 6465 this:\n.(set-de │ │ │ -00000390: 6661 756c 7420 2761 7574 6f2d 7368 6f77 fault 'auto-show │ │ │ -000003a0: 2d6d 6f64 6520 6e69 6c29 5c6e 5365 6520 -mode nil)\nSee │ │ │ -000003b0: 616c 736f 2063 6f6d 6d61 6e64 2060 6175 also command `au │ │ │ -000003c0: 746f 2d73 686f 772d 6d6f 6465 272e 5c6e to-show-mode'.\n │ │ │ -000003d0: 5468 6973 2076 6172 6961 626c 6520 6861 This variable ha │ │ │ -000003e0: 7320 6e6f 2065 6666 6563 7420 7768 656e s no effect when │ │ │ -000003f0: 206c 696e 6573 2061 7265 206e 6f74 2062 lines are not b │ │ │ -00000400: 6569 6e67 2074 7275 6e63 6174 6564 2e5c eing truncated.\ │ │ │ -00000410: 6e54 6869 7320 7661 7269 6162 6c65 2069 nThis variable i │ │ │ -00000420: 7320 6175 746f 6d61 7469 6361 6c6c 7920 s automatically │ │ │ -00000430: 6c6f 6361 6c20 696e 2065 6163 6820 6275 local in each bu │ │ │ -00000440: 6666 6572 2077 6865 7265 2069 7420 6973 ffer where it is │ │ │ -00000450: 2073 6574 2e22 203a 7479 7065 2027 626f set." :type 'bo │ │ │ -00000460: 6f6c 6561 6e20 3a67 726f 7570 2027 6175 olean :group 'au │ │ │ -00000470: 746f 2d73 686f 7729 0a28 6d61 6b65 2d76 to-show).(make-v │ │ │ -00000480: 6172 6961 626c 652d 6275 6666 6572 2d6c ariable-buffer-l │ │ │ -00000490: 6f63 616c 2027 6175 746f 2d73 686f 772d ocal 'auto-show- │ │ │ -000004a0: 6d6f 6465 290a 2863 7573 746f 6d2d 6465 mode).(custom-de │ │ │ -000004b0: 636c 6172 652d 7661 7269 6162 6c65 2027 clare-variable ' │ │ │ -000004c0: 6175 746f 2d73 686f 772d 7368 6966 742d auto-show-shift- │ │ │ -000004d0: 616d 6f75 6e74 2027 3820 222a 4578 7472 amount '8 "*Extr │ │ │ -000004e0: 6120 636f 6c75 6d6e 7320 746f 2073 6372 a columns to scr │ │ │ -000004f0: 6f6c 6c2e 2066 6f72 2061 7574 6f6d 6174 oll. for automat │ │ │ -00000500: 6963 2068 6f72 697a 6f6e 7461 6c20 7363 ic horizontal sc │ │ │ -00000510: 726f 6c6c 696e 672e 2220 3a74 7970 6520 rolling." :type │ │ │ -00000520: 2769 6e74 6567 6572 203a 6772 6f75 7020 'integer :group │ │ │ -00000530: 2761 7574 6f2d 7368 6f77 290a 2863 7573 'auto-show).(cus │ │ │ -00000540: 746f 6d2d 6465 636c 6172 652d 7661 7269 tom-declare-vari │ │ │ -00000550: 6162 6c65 2027 6175 746f 2d73 686f 772d able 'auto-show- │ │ │ -00000560: 7368 6f77 2d6c 6566 742d 6d61 7267 696e show-left-margin │ │ │ -00000570: 2d74 6872 6573 686f 6c64 2027 3530 2022 -threshold '50 " │ │ │ -00000580: 2a54 6872 6573 686f 6c64 2063 6f6c 756d *Threshold colum │ │ │ -00000590: 6e20 666f 7220 6175 746f 6d61 7469 6320 n for automatic │ │ │ -000005a0: 686f 7269 7a6f 6e74 616c 2073 6372 6f6c horizontal scrol │ │ │ -000005b0: 6c69 6e67 2074 6f20 7468 6520 7269 6768 ling to the righ │ │ │ -000005c0: 742e 5c6e 4966 2070 6f69 6e74 2069 7320 t.\nIf point is │ │ │ -000005d0: 6265 666f 7265 2074 6869 7320 636f 6c75 before this colu │ │ │ -000005e0: 6d6e 2c20 7765 2074 7279 2074 6f20 7363 mn, we try to sc │ │ │ -000005f0: 726f 6c6c 2074 6f20 6d61 6b65 2074 6865 roll to make the │ │ │ -00000600: 206c 6566 7420 6d61 7267 696e 5c6e 7669 left margin\nvi │ │ │ -00000610: 7369 626c 652e 2020 5365 7474 696e 6720 sible. Setting │ │ │ -00000620: 7468 6973 2074 6f20 3020 6469 7361 626c this to 0 disabl │ │ │ -00000630: 6573 2074 6869 7320 6665 6174 7572 652e es this feature. │ │ │ -00000640: 2220 3a74 7970 6520 276e 756d 6265 7220 " :type 'number │ │ │ -00000650: 3a67 726f 7570 2027 6175 746f 2d73 686f :group 'auto-sho │ │ │ -00000660: 7729 0a23 4032 3336 2054 7572 6e20 6175 w).#@236 Turn au │ │ │ -00000670: 746f 6d61 7469 6320 686f 7269 7a6f 6e74 tomatic horizont │ │ │ -00000680: 616c 2073 6372 6f6c 6c20 6d6f 6465 206f al scroll mode o │ │ │ -00000690: 6e20 6f72 206f 6666 2e0a 5769 7468 2061 n or off..With a │ │ │ -000006a0: 7267 2c20 7475 726e 2061 7574 6f20 7363 rg, turn auto sc │ │ │ -000006b0: 726f 6c6c 696e 6720 6f6e 2069 6620 6172 rolling on if ar │ │ │ -000006c0: 6720 6973 2070 6f73 6974 6976 652c 206f g is positive, o │ │ │ -000006d0: 6666 206f 7468 6572 7769 7365 2e0a 5468 ff otherwise..Th │ │ │ -000006e0: 6973 206d 6f64 6520 6973 2065 6e61 626c is mode is enabl │ │ │ -000006f0: 6564 206f 7220 6469 7361 626c 6564 2066 ed or disabled f │ │ │ -00000700: 6f72 2065 6163 6820 6275 6666 6572 2069 or each buffer i │ │ │ -00000710: 6e64 6976 6964 7561 6c6c 792e 0a49 7420 ndividually..It │ │ │ -00000720: 7461 6b65 7320 6566 6665 6374 206f 6e6c takes effect onl │ │ │ -00000730: 7920 7768 656e 2060 7472 756e 6361 7465 y when `truncate │ │ │ -00000740: 2d6c 696e 6573 2720 6973 206e 6f6e 2d6e -lines' is non-n │ │ │ -00000750: 696c 2e1f 0a28 6465 6661 6c69 6173 2027 il...(defalias ' │ │ │ -00000760: 6175 746f 2d73 686f 772d 6d6f 6465 2023 auto-show-mode # │ │ │ -00000770: 5b28 6172 6729 2022 09ac 8408 3faa 85c2 [(arg) "....?... │ │ │ -00000780: 0921 c356 8910 8722 205b 6175 746f 2d73 .!.V..." [auto-s │ │ │ -00000790: 686f 772d 6d6f 6465 2061 7267 2070 7265 how-mode arg pre │ │ │ -000007a0: 6669 782d 6e75 6d65 7269 632d 7661 6c75 fix-numeric-valu │ │ │ -000007b0: 6520 305d 2032 2028 2324 202e 2031 3634 e 0] 2 (#$ . 164 │ │ │ -000007c0: 3129 2022 5022 5d29 0a23 4031 3031 2043 1) "P"]).#@101 C │ │ │ -000007d0: 6f6d 6d61 6e64 7320 7468 6174 2069 6e68 ommands that inh │ │ │ -000007e0: 6962 6974 2061 7574 6f2d 7368 6f77 2062 ibit auto-show b │ │ │ -000007f0: 6568 6176 696f 722e 0a54 6869 7320 6e6f ehavior..This no │ │ │ -00000800: 726d 616c 6c79 2069 6e63 6c75 6465 7320 rmally includes │ │ │ -00000810: 7468 6520 686f 7269 7a6f 6e74 616c 2073 the horizontal s │ │ │ -00000820: 6372 6f6c 6c62 6172 2063 6f6d 6d61 6e64 crollbar command │ │ │ -00000830: 732e 1f0a 2864 6566 7661 7220 6175 746f s...(defvar auto │ │ │ -00000840: 2d73 686f 772d 696e 6869 6269 7469 6e67 -show-inhibiting │ │ │ -00000850: 2d63 6f6d 6d61 6e64 7320 2728 7363 726f -commands '(scro │ │ │ -00000860: 6c6c 6261 722d 6368 6172 2d6c 6566 7420 llbar-char-left │ │ │ -00000870: 7363 726f 6c6c 6261 722d 6368 6172 2d72 scrollbar-char-r │ │ │ -00000880: 6967 6874 2073 6372 6f6c 6c62 6172 2d70 ight scrollbar-p │ │ │ -00000890: 6167 652d 6c65 6674 2073 6372 6f6c 6c62 age-left scrollb │ │ │ -000008a0: 6172 2d70 6167 652d 7269 6768 7420 7363 ar-page-right sc │ │ │ -000008b0: 726f 6c6c 6261 722d 746f 2d6c 6566 7420 rollbar-to-left │ │ │ -000008c0: 7363 726f 6c6c 6261 722d 746f 2d72 6967 scrollbar-to-rig │ │ │ -000008d0: 6874 2073 6372 6f6c 6c62 6172 2d68 6f72 ht scrollbar-hor │ │ │ -000008e0: 697a 6f6e 7461 6c2d 6472 6167 2920 2823 izontal-drag) (# │ │ │ -000008f0: 2420 2e20 3139 3939 2929 0a28 6465 6661 $ . 1999)).(defa │ │ │ -00000900: 6c69 6173 2027 6175 746f 2d73 686f 772d lias 'auto-show- │ │ │ -00000910: 7368 6f75 6c64 2d74 616b 652d 6163 7469 should-take-acti │ │ │ -00000920: 6f6e 2d70 2023 5b6e 696c 2022 5c6e ad8e on-p #[nil "\n.. │ │ │ -00000930: c320 ad8a c420 706b ad84 0908 733f 8722 . ... pk....s?." │ │ │ -00000940: 205b 6175 746f 2d73 686f 772d 696e 6869 [auto-show-inhi │ │ │ -00000950: 6269 7469 6e67 2d63 6f6d 6d61 6e64 7320 biting-commands │ │ │ -00000960: 7468 6973 2d63 6f6d 6d61 6e64 2061 7574 this-command aut │ │ │ -00000970: 6f2d 7368 6f77 2d6d 6f64 6520 7769 6e64 o-show-mode wind │ │ │ -00000980: 6f77 2d74 7275 6e63 6174 6564 2d70 2077 ow-truncated-p w │ │ │ -00000990: 696e 646f 772d 6275 6666 6572 5d20 325d indow-buffer] 2] │ │ │ -000009a0: 290a 2340 3332 3720 4d6f 7665 2070 6f69 ).#@327 Move poi │ │ │ -000009b0: 6e74 2069 6e20 7375 6368 2061 2077 6179 nt in such a way │ │ │ -000009c0: 2074 6861 7420 7468 6520 7265 6769 6f6e that the region │ │ │ -000009d0: 2028 5354 4152 542c 2045 4e44 2920 6973 (START, END) is │ │ │ -000009e0: 2076 6973 6962 6c65 2e0a 5468 6973 206f visible..This o │ │ │ -000009f0: 6e6c 7920 646f 6573 2061 6e79 7468 696e nly does anythin │ │ │ -00000a00: 6720 6966 2061 7574 6f2d 7368 6f77 2d6d g if auto-show-m │ │ │ -00000a10: 6f64 6520 6973 2065 6e61 626c 6564 2c20 ode is enabled, │ │ │ -00000a20: 616e 6420 6974 2064 6f65 736e 2774 0a61 and it doesn't.a │ │ │ -00000a30: 6374 7561 6c6c 7920 646f 2061 6e79 2068 ctually do any h │ │ │ -00000a40: 6f72 697a 6f6e 7461 6c20 7363 726f 6c6c orizontal scroll │ │ │ -00000a50: 696e 673b 2072 6174 6865 722c 2069 7420 ing; rather, it │ │ │ -00000a60: 6a75 7374 2073 6574 7320 7468 696e 6773 just sets things │ │ │ -00000a70: 2075 7020 736f 0a74 6861 7420 7468 6520 up so.that the │ │ │ -00000a80: 7265 6769 6f6e 2077 696c 6c20 6265 2076 region will be v │ │ │ -00000a90: 6973 6962 6c65 2077 6865 6e20 6061 7574 isible when `aut │ │ │ -00000aa0: 6f2d 7368 6f77 2d6d 616b 652d 706f 696e o-show-make-poin │ │ │ -00000ab0: 742d 7669 7369 626c 6527 0a69 7320 6e65 t-visible'.is ne │ │ │ -00000ac0: 7874 2063 616c 6c65 6420 2874 6869 7320 xt called (this │ │ │ -00000ad0: 6861 7070 656e 7320 6166 7465 7220 6576 happens after ev │ │ │ -00000ae0: 6572 7920 636f 6d6d 616e 6429 2e1f 0a28 ery command)...( │ │ │ -00000af0: 6465 6661 6c69 6173 2027 6175 746f 2d73 defalias 'auto-s │ │ │ -00000b00: 686f 772d 6d61 6b65 2d72 6567 696f 6e2d how-make-region- │ │ │ -00000b10: 7669 7369 626c 6520 235b 2873 7461 7274 visible #[(start │ │ │ -00000b20: 2065 6e64 2920 22c6 20ad c0c7 201d c820 end) ". ... .. │ │ │ -00000b30: 0dc9 56ab 83ca aa81 cb5a 190d 095c 5c1b ..V......Z...\\. │ │ │ -00000b40: 8a08 6288 6929 1c8a 0e0e 6288 6929 1a0c ..b.i)....b.i).. │ │ │ -00000b50: 0d59 ad83 5c6e 0b58 3fad 910c 0d57 ab87 .Y..\n.X?....W.. │ │ │ -00000b60: cc0d 0c5a 21aa 85cd 5c6e 0b5a 212d 8722 ...Z!...\n.Z!-." │ │ │ -00000b70: 205b 7374 6172 7420 772d 7769 6474 6820 [start w-width │ │ │ -00000b80: 656e 642d 636f 6c20 7269 6768 742d 636f end-col right-co │ │ │ -00000b90: 6c20 7374 6172 742d 636f 6c20 7363 726f l start-col scro │ │ │ -00000ba0: 6c6c 2061 7574 6f2d 7368 6f77 2d73 686f ll auto-show-sho │ │ │ -00000bb0: 756c 642d 7461 6b65 2d61 6374 696f 6e2d uld-take-action- │ │ │ -00000bc0: 7020 7769 6e64 6f77 2d68 7363 726f 6c6c p window-hscroll │ │ │ -00000bd0: 2077 696e 646f 772d 7769 6474 6820 3020 window-width 0 │ │ │ -00000be0: 3220 3120 7363 726f 6c6c 2d72 6967 6874 2 1 scroll-right │ │ │ -00000bf0: 2073 6372 6f6c 6c2d 6c65 6674 2065 6e64 scroll-left end │ │ │ -00000c00: 5d20 3320 2823 2420 2e20 3234 3732 295d ] 3 (#$ . 2472)] │ │ │ -00000c10: 290a 2340 3232 3620 5363 726f 6c6c 2068 ).#@226 Scroll h │ │ │ -00000c20: 6f72 697a 6f6e 7461 6c6c 7920 746f 206d orizontally to m │ │ │ -00000c30: 616b 6520 706f 696e 7420 7669 7369 626c ake point visibl │ │ │ -00000c40: 652c 2069 6620 7468 6174 2069 7320 656e e, if that is en │ │ │ -00000c50: 6162 6c65 642e 0a54 6869 7320 6675 6e63 abled..This func │ │ │ -00000c60: 7469 6f6e 206f 6e6c 7920 646f 6573 2073 tion only does s │ │ │ -00000c70: 6f6d 6574 6869 6e67 2069 6620 6061 7574 omething if `aut │ │ │ -00000c80: 6f2d 7368 6f77 2d6d 6f64 6527 2069 7320 o-show-mode' is │ │ │ -00000c90: 6e6f 6e2d 6e69 6c0a 616e 6420 6c6f 6e67 non-nil.and long │ │ │ -00000ca0: 6c69 6e65 7320 6172 6520 6265 696e 6720 lines are being │ │ │ -00000cb0: 7472 756e 6361 7465 6420 696e 2074 6865 truncated in the │ │ │ -00000cc0: 2073 656c 6563 7465 6420 7769 6e64 6f77 selected window │ │ │ -00000cd0: 2e0a 5365 6520 616c 736f 2074 6865 2063 ..See also the c │ │ │ -00000ce0: 6f6d 6d61 6e64 2060 6175 746f 2d73 686f ommand `auto-sho │ │ │ -00000cf0: 772d 6d6f 6465 272e 1f0a 2864 6566 616c w-mode'...(defal │ │ │ -00000d00: 6961 7320 2761 7574 6f2d 7368 6f77 2d6d ias 'auto-show-m │ │ │ -00000d10: 616b 652d 706f 696e 742d 7669 7369 626c ake-point-visibl │ │ │ -00000d20: 6520 235b 2826 6f70 7469 6f6e 616c 2069 e #[(&optional i │ │ │ -00000d30: 676e 6f72 652d 6172 6729 2022 c620 add1 gnore-arg) ". .. │ │ │ -00000d40: 691d c720 1cc8 200c c956 ab83 caaa 81cb i.. .. ..V...... │ │ │ -00000d50: 5a1b 0c0b 5c5c 1a0d 0857 ab90 0dc8 2057 Z...\\...W.... W │ │ │ -00000d60: ab8a 0cc9 56ab 85cc 0c21 aaa5 0d0c 57ab ....V....!....W. │ │ │ -00000d70: 89cc 0c0d 5a09 5c5c 21aa 970d 5c6e 56ac ....Z.\\!...\nV. │ │ │ -00000d80: 890d 5c6e 55ad 8d6c 3fad 89cd 090d 0c0b ..\nU..l?....... │ │ │ -00000d90: 5c5c 5a5c 5c21 2c87 2220 5b61 7574 6f2d \\Z\\!,." [auto- │ │ │ -00000da0: 7368 6f77 2d73 686f 772d 6c65 6674 2d6d show-show-left-m │ │ │ -00000db0: 6172 6769 6e2d 7468 7265 7368 6f6c 6420 argin-threshold │ │ │ -00000dc0: 6175 746f 2d73 686f 772d 7368 6966 742d auto-show-shift- │ │ │ -00000dd0: 616d 6f75 6e74 2072 6967 6874 2d63 6f6c amount right-col │ │ │ -00000de0: 2077 2d77 6964 7468 2073 6372 6f6c 6c20 w-width scroll │ │ │ -00000df0: 636f 6c20 6175 746f 2d73 686f 772d 7368 col auto-show-sh │ │ │ -00000e00: 6f75 6c64 2d74 616b 652d 6163 7469 6f6e ould-take-action │ │ │ -00000e10: 2d70 2077 696e 646f 772d 6873 6372 6f6c -p window-hscrol │ │ │ -00000e20: 6c20 7769 6e64 6f77 2d77 6964 7468 2030 l window-width 0 │ │ │ -00000e30: 2032 2031 2073 6372 6f6c 6c2d 7269 6768 2 1 scroll-righ │ │ │ -00000e40: 7420 7363 726f 6c6c 2d6c 6566 745d 2035 t scroll-left] 5 │ │ │ -00000e50: 2028 2324 202e 2033 3039 3629 206e 696c (#$ . 3096) nil │ │ │ -00000e60: 5d29 0a28 6279 7465 2d63 6f64 6520 22c0 ]).(byte-code ". │ │ │ -00000e70: c121 ab84 c2c3 2188 c4c5 2187 2220 5b62 .!....!...!." [b │ │ │ -00000e80: 6f75 6e64 7020 7075 7265 6c6f 6164 2061 oundp pureload a │ │ │ -00000e90: 7574 6f2d 7368 6f77 2d6d 6f64 6520 3120 uto-show-mode 1 │ │ │ -00000ea0: 7072 6f76 6964 6520 6175 746f 2d73 686f provide auto-sho │ │ │ -00000eb0: 775d 2032 290a w] 2). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3430 2032 3032 310a 3b3b 3b20 :08:40 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f61 7574 6f2d 7368 6f77 4/lisp/auto-show │ │ │ +00000090: 2e65 6c0a 3b3b 3b20 656d 6163 7320 7665 .el.;;; emacs ve │ │ │ +000000a0: 7273 696f 6e20 3231 2e34 2028 7061 7463 rsion 21.4 (patc │ │ │ +000000b0: 6820 3234 2920 2253 7461 6e64 6172 6420 h 24) "Standard │ │ │ +000000c0: 4322 2058 456d 6163 7320 4c75 6369 642e C" XEmacs Lucid. │ │ │ +000000d0: 0a3b 3b3b 2062 7974 6563 6f6d 7020 7665 .;;; bytecomp ve │ │ │ +000000e0: 7273 696f 6e20 322e 3237 2058 456d 6163 rsion 2.27 XEmac │ │ │ +000000f0: 733b 2032 3030 302d 3039 2d31 322e 0a3b s; 2000-09-12..; │ │ │ +00000100: 3b3b 206f 7074 696d 697a 6174 696f 6e20 ;; optimization │ │ │ +00000110: 6973 206f 6e2e 0a3b 3b3b 2074 6869 7320 is on..;;; this │ │ │ +00000120: 6669 6c65 2075 7365 7320 6f70 636f 6465 file uses opcode │ │ │ +00000130: 7320 7768 6963 6820 646f 206e 6f74 2065 s which do not e │ │ │ +00000140: 7869 7374 2069 6e20 456d 6163 7320 3139 xist in Emacs 19 │ │ │ +00000150: 2e0a 0a28 6966 2028 616e 6420 2862 6f75 ...(if (and (bou │ │ │ +00000160: 6e64 7020 2765 6d61 6373 2d76 6572 7369 ndp 'emacs-versi │ │ │ +00000170: 6f6e 290a 0920 286f 7220 2861 6e64 2028 on).. (or (and ( │ │ │ +00000180: 626f 756e 6470 2027 6570 6f63 683a 3a76 boundp 'epoch::v │ │ │ +00000190: 6572 7369 6f6e 2920 6570 6f63 683a 3a76 ersion) epoch::v │ │ │ +000001a0: 6572 7369 6f6e 290a 0920 2020 2020 2873 ersion).. (s │ │ │ +000001b0: 7472 696e 672d 6c65 7373 7020 656d 6163 tring-lessp emac │ │ │ +000001c0: 732d 7665 7273 696f 6e20 2232 3022 2929 s-version "20")) │ │ │ +000001d0: 290a 2020 2020 2865 7272 6f72 2022 6061 ). (error "`a │ │ │ +000001e0: 7574 6f2d 7368 6f77 2e65 6c27 2077 6173 uto-show.el' was │ │ │ +000001f0: 2063 6f6d 7069 6c65 6420 666f 7220 456d compiled for Em │ │ │ +00000200: 6163 7320 3230 2229 290a 0a28 6f72 2028 acs 20"))..(or ( │ │ │ +00000210: 626f 756e 6470 2027 6375 7272 656e 742d boundp 'current- │ │ │ +00000220: 6c6f 6164 2d6c 6973 7429 2028 7365 7471 load-list) (setq │ │ │ +00000230: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ +00000240: 7374 206e 696c 2929 0a0a 0a28 6375 7374 st nil))...(cust │ │ │ +00000250: 6f6d 2d64 6563 6c61 7265 2d67 726f 7570 om-declare-group │ │ │ +00000260: 2027 6175 746f 2d73 686f 7720 6e69 6c20 'auto-show nil │ │ │ +00000270: 2250 6572 666f 726d 2061 7574 6f6d 6174 "Perform automat │ │ │ +00000280: 6963 2068 6f72 697a 6f6e 7461 6c20 7363 ic horizontal sc │ │ │ +00000290: 726f 6c6c 696e 6720 6173 2070 6f69 6e74 rolling as point │ │ │ +000002a0: 206d 6f76 6573 2e22 203a 6772 6f75 7020 moves." :group │ │ │ +000002b0: 2764 6973 706c 6179 203a 6772 6f75 7020 'display :group │ │ │ +000002c0: 2765 7874 656e 7369 6f6e 7329 0a28 6375 'extensions).(cu │ │ │ +000002d0: 7374 6f6d 2d64 6563 6c61 7265 2d76 6172 stom-declare-var │ │ │ +000002e0: 6961 626c 6520 2761 7574 6f2d 7368 6f77 iable 'auto-show │ │ │ +000002f0: 2d6d 6f64 6520 2774 2022 2a4e 6f6e 2d6e -mode 't "*Non-n │ │ │ +00000300: 696c 2065 6e61 626c 6573 2061 7574 6f6d il enables autom │ │ │ +00000310: 6174 6963 2068 6f72 697a 6f6e 7461 6c20 atic horizontal │ │ │ +00000320: 7363 726f 6c6c 696e 672c 2077 6865 6e20 scrolling, when │ │ │ +00000330: 6c69 6e65 7320 6172 6520 7472 756e 6361 lines are trunca │ │ │ +00000340: 7465 642e 5c6e 5468 6520 6465 6661 756c ted.\nThe defaul │ │ │ +00000350: 7420 7661 6c75 6520 6973 2074 2e20 2054 t value is t. T │ │ │ +00000360: 6f20 6368 616e 6765 2074 6865 2064 6566 o change the def │ │ │ +00000370: 6175 6c74 2c20 646f 2074 6869 733a 5c6e ault, do this:\n │ │ │ +00000380: 0928 7365 742d 6465 6661 756c 7420 2761 .(set-default 'a │ │ │ +00000390: 7574 6f2d 7368 6f77 2d6d 6f64 6520 6e69 uto-show-mode ni │ │ │ +000003a0: 6c29 5c6e 5365 6520 616c 736f 2063 6f6d l)\nSee also com │ │ │ +000003b0: 6d61 6e64 2060 6175 746f 2d73 686f 772d mand `auto-show- │ │ │ +000003c0: 6d6f 6465 272e 5c6e 5468 6973 2076 6172 mode'.\nThis var │ │ │ +000003d0: 6961 626c 6520 6861 7320 6e6f 2065 6666 iable has no eff │ │ │ +000003e0: 6563 7420 7768 656e 206c 696e 6573 2061 ect when lines a │ │ │ +000003f0: 7265 206e 6f74 2062 6569 6e67 2074 7275 re not being tru │ │ │ +00000400: 6e63 6174 6564 2e5c 6e54 6869 7320 7661 ncated.\nThis va │ │ │ +00000410: 7269 6162 6c65 2069 7320 6175 746f 6d61 riable is automa │ │ │ +00000420: 7469 6361 6c6c 7920 6c6f 6361 6c20 696e tically local in │ │ │ +00000430: 2065 6163 6820 6275 6666 6572 2077 6865 each buffer whe │ │ │ +00000440: 7265 2069 7420 6973 2073 6574 2e22 203a re it is set." : │ │ │ +00000450: 7479 7065 2027 626f 6f6c 6561 6e20 3a67 type 'boolean :g │ │ │ +00000460: 726f 7570 2027 6175 746f 2d73 686f 7729 roup 'auto-show) │ │ │ +00000470: 0a28 6d61 6b65 2d76 6172 6961 626c 652d .(make-variable- │ │ │ +00000480: 6275 6666 6572 2d6c 6f63 616c 2027 6175 buffer-local 'au │ │ │ +00000490: 746f 2d73 686f 772d 6d6f 6465 290a 2863 to-show-mode).(c │ │ │ +000004a0: 7573 746f 6d2d 6465 636c 6172 652d 7661 ustom-declare-va │ │ │ +000004b0: 7269 6162 6c65 2027 6175 746f 2d73 686f riable 'auto-sho │ │ │ +000004c0: 772d 7368 6966 742d 616d 6f75 6e74 2027 w-shift-amount ' │ │ │ +000004d0: 3820 222a 4578 7472 6120 636f 6c75 6d6e 8 "*Extra column │ │ │ +000004e0: 7320 746f 2073 6372 6f6c 6c2e 2066 6f72 s to scroll. for │ │ │ +000004f0: 2061 7574 6f6d 6174 6963 2068 6f72 697a automatic horiz │ │ │ +00000500: 6f6e 7461 6c20 7363 726f 6c6c 696e 672e ontal scrolling. │ │ │ +00000510: 2220 3a74 7970 6520 2769 6e74 6567 6572 " :type 'integer │ │ │ +00000520: 203a 6772 6f75 7020 2761 7574 6f2d 7368 :group 'auto-sh │ │ │ +00000530: 6f77 290a 2863 7573 746f 6d2d 6465 636c ow).(custom-decl │ │ │ +00000540: 6172 652d 7661 7269 6162 6c65 2027 6175 are-variable 'au │ │ │ +00000550: 746f 2d73 686f 772d 7368 6f77 2d6c 6566 to-show-show-lef │ │ │ +00000560: 742d 6d61 7267 696e 2d74 6872 6573 686f t-margin-thresho │ │ │ +00000570: 6c64 2027 3530 2022 2a54 6872 6573 686f ld '50 "*Thresho │ │ │ +00000580: 6c64 2063 6f6c 756d 6e20 666f 7220 6175 ld column for au │ │ │ +00000590: 746f 6d61 7469 6320 686f 7269 7a6f 6e74 tomatic horizont │ │ │ +000005a0: 616c 2073 6372 6f6c 6c69 6e67 2074 6f20 al scrolling to │ │ │ +000005b0: 7468 6520 7269 6768 742e 5c6e 4966 2070 the right.\nIf p │ │ │ +000005c0: 6f69 6e74 2069 7320 6265 666f 7265 2074 oint is before t │ │ │ +000005d0: 6869 7320 636f 6c75 6d6e 2c20 7765 2074 his column, we t │ │ │ +000005e0: 7279 2074 6f20 7363 726f 6c6c 2074 6f20 ry to scroll to │ │ │ +000005f0: 6d61 6b65 2074 6865 206c 6566 7420 6d61 make the left ma │ │ │ +00000600: 7267 696e 5c6e 7669 7369 626c 652e 2020 rgin\nvisible. │ │ │ +00000610: 5365 7474 696e 6720 7468 6973 2074 6f20 Setting this to │ │ │ +00000620: 3020 6469 7361 626c 6573 2074 6869 7320 0 disables this │ │ │ +00000630: 6665 6174 7572 652e 2220 3a74 7970 6520 feature." :type │ │ │ +00000640: 276e 756d 6265 7220 3a67 726f 7570 2027 'number :group ' │ │ │ +00000650: 6175 746f 2d73 686f 7729 0a23 4032 3336 auto-show).#@236 │ │ │ +00000660: 2054 7572 6e20 6175 746f 6d61 7469 6320 Turn automatic │ │ │ +00000670: 686f 7269 7a6f 6e74 616c 2073 6372 6f6c horizontal scrol │ │ │ +00000680: 6c20 6d6f 6465 206f 6e20 6f72 206f 6666 l mode on or off │ │ │ +00000690: 2e0a 5769 7468 2061 7267 2c20 7475 726e ..With arg, turn │ │ │ +000006a0: 2061 7574 6f20 7363 726f 6c6c 696e 6720 auto scrolling │ │ │ +000006b0: 6f6e 2069 6620 6172 6720 6973 2070 6f73 on if arg is pos │ │ │ +000006c0: 6974 6976 652c 206f 6666 206f 7468 6572 itive, off other │ │ │ +000006d0: 7769 7365 2e0a 5468 6973 206d 6f64 6520 wise..This mode │ │ │ +000006e0: 6973 2065 6e61 626c 6564 206f 7220 6469 is enabled or di │ │ │ +000006f0: 7361 626c 6564 2066 6f72 2065 6163 6820 sabled for each │ │ │ +00000700: 6275 6666 6572 2069 6e64 6976 6964 7561 buffer individua │ │ │ +00000710: 6c6c 792e 0a49 7420 7461 6b65 7320 6566 lly..It takes ef │ │ │ +00000720: 6665 6374 206f 6e6c 7920 7768 656e 2060 fect only when ` │ │ │ +00000730: 7472 756e 6361 7465 2d6c 696e 6573 2720 truncate-lines' │ │ │ +00000740: 6973 206e 6f6e 2d6e 696c 2e1f 0a28 6465 is non-nil...(de │ │ │ +00000750: 6661 6c69 6173 2027 6175 746f 2d73 686f falias 'auto-sho │ │ │ +00000760: 772d 6d6f 6465 2023 5b28 6172 6729 2022 w-mode #[(arg) " │ │ │ +00000770: 09ac 8408 3faa 85c2 0921 c356 8910 8722 ....?....!.V..." │ │ │ +00000780: 205b 6175 746f 2d73 686f 772d 6d6f 6465 [auto-show-mode │ │ │ +00000790: 2061 7267 2070 7265 6669 782d 6e75 6d65 arg prefix-nume │ │ │ +000007a0: 7269 632d 7661 6c75 6520 305d 2032 2028 ric-value 0] 2 ( │ │ │ +000007b0: 2324 202e 2031 3633 3329 2022 5022 5d29 #$ . 1633) "P"]) │ │ │ +000007c0: 0a23 4031 3031 2043 6f6d 6d61 6e64 7320 .#@101 Commands │ │ │ +000007d0: 7468 6174 2069 6e68 6962 6974 2061 7574 that inhibit aut │ │ │ +000007e0: 6f2d 7368 6f77 2062 6568 6176 696f 722e o-show behavior. │ │ │ +000007f0: 0a54 6869 7320 6e6f 726d 616c 6c79 2069 .This normally i │ │ │ +00000800: 6e63 6c75 6465 7320 7468 6520 686f 7269 ncludes the hori │ │ │ +00000810: 7a6f 6e74 616c 2073 6372 6f6c 6c62 6172 zontal scrollbar │ │ │ +00000820: 2063 6f6d 6d61 6e64 732e 1f0a 2864 6566 commands...(def │ │ │ +00000830: 7661 7220 6175 746f 2d73 686f 772d 696e var auto-show-in │ │ │ +00000840: 6869 6269 7469 6e67 2d63 6f6d 6d61 6e64 hibiting-command │ │ │ +00000850: 7320 2728 7363 726f 6c6c 6261 722d 6368 s '(scrollbar-ch │ │ │ +00000860: 6172 2d6c 6566 7420 7363 726f 6c6c 6261 ar-left scrollba │ │ │ +00000870: 722d 6368 6172 2d72 6967 6874 2073 6372 r-char-right scr │ │ │ +00000880: 6f6c 6c62 6172 2d70 6167 652d 6c65 6674 ollbar-page-left │ │ │ +00000890: 2073 6372 6f6c 6c62 6172 2d70 6167 652d scrollbar-page- │ │ │ +000008a0: 7269 6768 7420 7363 726f 6c6c 6261 722d right scrollbar- │ │ │ +000008b0: 746f 2d6c 6566 7420 7363 726f 6c6c 6261 to-left scrollba │ │ │ +000008c0: 722d 746f 2d72 6967 6874 2073 6372 6f6c r-to-right scrol │ │ │ +000008d0: 6c62 6172 2d68 6f72 697a 6f6e 7461 6c2d lbar-horizontal- │ │ │ +000008e0: 6472 6167 2920 2823 2420 2e20 3139 3931 drag) (#$ . 1991 │ │ │ +000008f0: 2929 0a28 6465 6661 6c69 6173 2027 6175 )).(defalias 'au │ │ │ +00000900: 746f 2d73 686f 772d 7368 6f75 6c64 2d74 to-show-should-t │ │ │ +00000910: 616b 652d 6163 7469 6f6e 2d70 2023 5b6e ake-action-p #[n │ │ │ +00000920: 696c 2022 5c6e ad8e c320 ad8a c420 706b il "\n... ... pk │ │ │ +00000930: ad84 0908 733f 8722 205b 6175 746f 2d73 ....s?." [auto-s │ │ │ +00000940: 686f 772d 696e 6869 6269 7469 6e67 2d63 how-inhibiting-c │ │ │ +00000950: 6f6d 6d61 6e64 7320 7468 6973 2d63 6f6d ommands this-com │ │ │ +00000960: 6d61 6e64 2061 7574 6f2d 7368 6f77 2d6d mand auto-show-m │ │ │ +00000970: 6f64 6520 7769 6e64 6f77 2d74 7275 6e63 ode window-trunc │ │ │ +00000980: 6174 6564 2d70 2077 696e 646f 772d 6275 ated-p window-bu │ │ │ +00000990: 6666 6572 5d20 325d 290a 2340 3332 3720 ffer] 2]).#@327 │ │ │ +000009a0: 4d6f 7665 2070 6f69 6e74 2069 6e20 7375 Move point in su │ │ │ +000009b0: 6368 2061 2077 6179 2074 6861 7420 7468 ch a way that th │ │ │ +000009c0: 6520 7265 6769 6f6e 2028 5354 4152 542c e region (START, │ │ │ +000009d0: 2045 4e44 2920 6973 2076 6973 6962 6c65 END) is visible │ │ │ +000009e0: 2e0a 5468 6973 206f 6e6c 7920 646f 6573 ..This only does │ │ │ +000009f0: 2061 6e79 7468 696e 6720 6966 2061 7574 anything if aut │ │ │ +00000a00: 6f2d 7368 6f77 2d6d 6f64 6520 6973 2065 o-show-mode is e │ │ │ +00000a10: 6e61 626c 6564 2c20 616e 6420 6974 2064 nabled, and it d │ │ │ +00000a20: 6f65 736e 2774 0a61 6374 7561 6c6c 7920 oesn't.actually │ │ │ +00000a30: 646f 2061 6e79 2068 6f72 697a 6f6e 7461 do any horizonta │ │ │ +00000a40: 6c20 7363 726f 6c6c 696e 673b 2072 6174 l scrolling; rat │ │ │ +00000a50: 6865 722c 2069 7420 6a75 7374 2073 6574 her, it just set │ │ │ +00000a60: 7320 7468 696e 6773 2075 7020 736f 0a74 s things up so.t │ │ │ +00000a70: 6861 7420 7468 6520 7265 6769 6f6e 2077 hat the region w │ │ │ +00000a80: 696c 6c20 6265 2076 6973 6962 6c65 2077 ill be visible w │ │ │ +00000a90: 6865 6e20 6061 7574 6f2d 7368 6f77 2d6d hen `auto-show-m │ │ │ +00000aa0: 616b 652d 706f 696e 742d 7669 7369 626c ake-point-visibl │ │ │ +00000ab0: 6527 0a69 7320 6e65 7874 2063 616c 6c65 e'.is next calle │ │ │ +00000ac0: 6420 2874 6869 7320 6861 7070 656e 7320 d (this happens │ │ │ +00000ad0: 6166 7465 7220 6576 6572 7920 636f 6d6d after every comm │ │ │ +00000ae0: 616e 6429 2e1f 0a28 6465 6661 6c69 6173 and)...(defalias │ │ │ +00000af0: 2027 6175 746f 2d73 686f 772d 6d61 6b65 'auto-show-make │ │ │ +00000b00: 2d72 6567 696f 6e2d 7669 7369 626c 6520 -region-visible │ │ │ +00000b10: 235b 2873 7461 7274 2065 6e64 2920 22c6 #[(start end) ". │ │ │ +00000b20: 20ad c0c7 201d c820 0dc9 56ab 83ca aa81 ... .. ..V..... │ │ │ +00000b30: cb5a 190d 095c 5c1b 8a08 6288 6929 1c8a .Z...\\...b.i).. │ │ │ +00000b40: 0e0e 6288 6929 1a0c 0d59 ad83 5c6e 0b58 ..b.i)...Y..\n.X │ │ │ +00000b50: 3fad 910c 0d57 ab87 cc0d 0c5a 21aa 85cd ?....W.....Z!... │ │ │ +00000b60: 5c6e 0b5a 212d 8722 205b 7374 6172 7420 \n.Z!-." [start │ │ │ +00000b70: 772d 7769 6474 6820 656e 642d 636f 6c20 w-width end-col │ │ │ +00000b80: 7269 6768 742d 636f 6c20 7374 6172 742d right-col start- │ │ │ +00000b90: 636f 6c20 7363 726f 6c6c 2061 7574 6f2d col scroll auto- │ │ │ +00000ba0: 7368 6f77 2d73 686f 756c 642d 7461 6b65 show-should-take │ │ │ +00000bb0: 2d61 6374 696f 6e2d 7020 7769 6e64 6f77 -action-p window │ │ │ +00000bc0: 2d68 7363 726f 6c6c 2077 696e 646f 772d -hscroll window- │ │ │ +00000bd0: 7769 6474 6820 3020 3220 3120 7363 726f width 0 2 1 scro │ │ │ +00000be0: 6c6c 2d72 6967 6874 2073 6372 6f6c 6c2d ll-right scroll- │ │ │ +00000bf0: 6c65 6674 2065 6e64 5d20 3320 2823 2420 left end] 3 (#$ │ │ │ +00000c00: 2e20 3234 3634 295d 290a 2340 3232 3620 . 2464)]).#@226 │ │ │ +00000c10: 5363 726f 6c6c 2068 6f72 697a 6f6e 7461 Scroll horizonta │ │ │ +00000c20: 6c6c 7920 746f 206d 616b 6520 706f 696e lly to make poin │ │ │ +00000c30: 7420 7669 7369 626c 652c 2069 6620 7468 t visible, if th │ │ │ +00000c40: 6174 2069 7320 656e 6162 6c65 642e 0a54 at is enabled..T │ │ │ +00000c50: 6869 7320 6675 6e63 7469 6f6e 206f 6e6c his function onl │ │ │ +00000c60: 7920 646f 6573 2073 6f6d 6574 6869 6e67 y does something │ │ │ +00000c70: 2069 6620 6061 7574 6f2d 7368 6f77 2d6d if `auto-show-m │ │ │ +00000c80: 6f64 6527 2069 7320 6e6f 6e2d 6e69 6c0a ode' is non-nil. │ │ │ +00000c90: 616e 6420 6c6f 6e67 6c69 6e65 7320 6172 and longlines ar │ │ │ +00000ca0: 6520 6265 696e 6720 7472 756e 6361 7465 e being truncate │ │ │ +00000cb0: 6420 696e 2074 6865 2073 656c 6563 7465 d in the selecte │ │ │ +00000cc0: 6420 7769 6e64 6f77 2e0a 5365 6520 616c d window..See al │ │ │ +00000cd0: 736f 2074 6865 2063 6f6d 6d61 6e64 2060 so the command ` │ │ │ +00000ce0: 6175 746f 2d73 686f 772d 6d6f 6465 272e auto-show-mode'. │ │ │ +00000cf0: 1f0a 2864 6566 616c 6961 7320 2761 7574 ..(defalias 'aut │ │ │ +00000d00: 6f2d 7368 6f77 2d6d 616b 652d 706f 696e o-show-make-poin │ │ │ +00000d10: 742d 7669 7369 626c 6520 235b 2826 6f70 t-visible #[(&op │ │ │ +00000d20: 7469 6f6e 616c 2069 676e 6f72 652d 6172 tional ignore-ar │ │ │ +00000d30: 6729 2022 c620 add1 691d c720 1cc8 200c g) ". ..i.. .. . │ │ │ +00000d40: c956 ab83 caaa 81cb 5a1b 0c0b 5c5c 1a0d .V......Z...\\.. │ │ │ +00000d50: 0857 ab90 0dc8 2057 ab8a 0cc9 56ab 85cc .W.... W....V... │ │ │ +00000d60: 0c21 aaa5 0d0c 57ab 89cc 0c0d 5a09 5c5c .!....W.....Z.\\ │ │ │ +00000d70: 21aa 970d 5c6e 56ac 890d 5c6e 55ad 8d6c !...\nV...\nU..l │ │ │ +00000d80: 3fad 89cd 090d 0c0b 5c5c 5a5c 5c21 2c87 ?.......\\Z\\!,. │ │ │ +00000d90: 2220 5b61 7574 6f2d 7368 6f77 2d73 686f " [auto-show-sho │ │ │ +00000da0: 772d 6c65 6674 2d6d 6172 6769 6e2d 7468 w-left-margin-th │ │ │ +00000db0: 7265 7368 6f6c 6420 6175 746f 2d73 686f reshold auto-sho │ │ │ +00000dc0: 772d 7368 6966 742d 616d 6f75 6e74 2072 w-shift-amount r │ │ │ +00000dd0: 6967 6874 2d63 6f6c 2077 2d77 6964 7468 ight-col w-width │ │ │ +00000de0: 2073 6372 6f6c 6c20 636f 6c20 6175 746f scroll col auto │ │ │ +00000df0: 2d73 686f 772d 7368 6f75 6c64 2d74 616b -show-should-tak │ │ │ +00000e00: 652d 6163 7469 6f6e 2d70 2077 696e 646f e-action-p windo │ │ │ +00000e10: 772d 6873 6372 6f6c 6c20 7769 6e64 6f77 w-hscroll window │ │ │ +00000e20: 2d77 6964 7468 2030 2032 2031 2073 6372 -width 0 2 1 scr │ │ │ +00000e30: 6f6c 6c2d 7269 6768 7420 7363 726f 6c6c oll-right scroll │ │ │ +00000e40: 2d6c 6566 745d 2035 2028 2324 202e 2033 -left] 5 (#$ . 3 │ │ │ +00000e50: 3038 3829 206e 696c 5d29 0a28 6279 7465 088) nil]).(byte │ │ │ +00000e60: 2d63 6f64 6520 22c0 c121 ab84 c2c3 2188 -code "..!....!. │ │ │ +00000e70: c4c5 2187 2220 5b62 6f75 6e64 7020 7075 ..!." [boundp pu │ │ │ +00000e80: 7265 6c6f 6164 2061 7574 6f2d 7368 6f77 reload auto-show │ │ │ +00000e90: 2d6d 6f64 6520 3120 7072 6f76 6964 6520 -mode 1 provide │ │ │ +00000ea0: 6175 746f 2d73 686f 775d 2032 290a auto-show] 2). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/autoload.elc │ │ │ @@ -1,851 +1,851 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f61 1-21.4.24/lisp/a │ │ │ -00000090: 7574 6f6c 6f61 642e 656c 0a3b 3b3b 2065 utoload.el.;;; e │ │ │ -000000a0: 6d61 6373 2076 6572 7369 6f6e 2032 312e macs version 21. │ │ │ -000000b0: 3420 2870 6174 6368 2032 3429 2022 5374 4 (patch 24) "St │ │ │ -000000c0: 616e 6461 7264 2043 2220 5845 6d61 6373 andard C" XEmacs │ │ │ -000000d0: 204c 7563 6964 2e0a 3b3b 3b20 6279 7465 Lucid..;;; byte │ │ │ -000000e0: 636f 6d70 2076 6572 7369 6f6e 2032 2e32 comp version 2.2 │ │ │ -000000f0: 3720 5845 6d61 6373 3b20 3230 3030 2d30 7 XEmacs; 2000-0 │ │ │ -00000100: 392d 3132 2e0a 3b3b 3b20 6f70 7469 6d69 9-12..;;; optimi │ │ │ -00000110: 7a61 7469 6f6e 2069 7320 6f6e 2e0a 3b3b zation is on..;; │ │ │ -00000120: 3b20 7468 6973 2066 696c 6520 7573 6573 ; this file uses │ │ │ -00000130: 206f 7063 6f64 6573 2077 6869 6368 2064 opcodes which d │ │ │ -00000140: 6f20 6e6f 7420 6578 6973 7420 696e 2045 o not exist in E │ │ │ -00000150: 6d61 6373 2031 392e 0a0a 2869 6620 2861 macs 19...(if (a │ │ │ -00000160: 6e64 2028 626f 756e 6470 2027 656d 6163 nd (boundp 'emac │ │ │ -00000170: 732d 7665 7273 696f 6e29 0a09 2028 6f72 s-version).. (or │ │ │ -00000180: 2028 616e 6420 2862 6f75 6e64 7020 2765 (and (boundp 'e │ │ │ -00000190: 706f 6368 3a3a 7665 7273 696f 6e29 2065 poch::version) e │ │ │ -000001a0: 706f 6368 3a3a 7665 7273 696f 6e29 0a09 poch::version).. │ │ │ -000001b0: 2020 2020 2028 7374 7269 6e67 2d6c 6573 (string-les │ │ │ -000001c0: 7370 2065 6d61 6373 2d76 6572 7369 6f6e sp emacs-version │ │ │ -000001d0: 2022 3230 2229 2929 0a20 2020 2028 6572 "20"))). (er │ │ │ -000001e0: 726f 7220 2260 6175 746f 6c6f 6164 2e65 ror "`autoload.e │ │ │ -000001f0: 6c27 2077 6173 2063 6f6d 7069 6c65 6420 l' was compiled │ │ │ -00000200: 666f 7220 456d 6163 7320 3230 2229 290a for Emacs 20")). │ │ │ -00000210: 0a28 6f72 2028 626f 756e 6470 2027 6375 .(or (boundp 'cu │ │ │ -00000220: 7272 656e 742d 6c6f 6164 2d6c 6973 7429 rrent-load-list) │ │ │ -00000230: 2028 7365 7471 2063 7572 7265 6e74 2d6c (setq current-l │ │ │ -00000240: 6f61 642d 6c69 7374 206e 696c 2929 0a0a oad-list nil)).. │ │ │ -00000250: 0a28 6279 7465 2d63 6f64 6520 22c1 c221 .(byte-code "..! │ │ │ -00000260: 88c3 c4c5 8f88 c6c7 2184 9100 c708 4210 ........!.....B. │ │ │ -00000270: c8c7 c9ca 2388 cbc7 21ac 85cc c7cd 5c22 ....#...!.....\" │ │ │ -00000280: 88ce 0842 10c8 cec9 cf23 88cb ce21 ac85 ...B.....#...!.. │ │ │ -00000290: ccce d05c 2288 c8d1 d2d3 2388 c8d4 d2d3 ...\".....#..... │ │ │ -000002a0: 2388 c8d5 d2d3 2388 c8d6 d2d3 2388 c8d7 #.....#.....#... │ │ │ -000002b0: d2d3 2388 c8d8 d2d3 2388 c8d9 d2d3 2388 ..#.....#.....#. │ │ │ -000002c0: c8da d2d3 2388 c8db d2d3 2388 c8dc d2dd ....#.....#..... │ │ │ -000002d0: 2388 c8de d2df 2388 c8e0 d2dd 2388 c8e1 #.....#.....#... │ │ │ -000002e0: d2dd 2388 c8e2 d2e3 2388 c8e4 d2e5 2388 ..#.....#.....#. │ │ │ -000002f0: c387 2220 5b63 7572 7265 6e74 2d6c 6f61 .." [current-loa │ │ │ -00000300: 642d 6c69 7374 2072 6571 7569 7265 2065 d-list require e │ │ │ -00000310: 6173 792d 6d6d 6f64 6520 6e69 6c20 2862 asy-mmode nil (b │ │ │ -00000320: 7974 652d 636f 6465 2022 c0c1 2187 2220 yte-code "..!." │ │ │ -00000330: 5b72 6571 7569 7265 2061 7574 6f6c 6f61 [require autoloa │ │ │ -00000340: 642d 6f70 6572 6174 6f72 735d 2032 2920 d-operators] 2) │ │ │ -00000350: 2828 6572 726f 7229 2920 626f 756e 6470 ((error)) boundp │ │ │ -00000360: 2061 7574 6f6c 6f61 642d 6d61 6b65 2d61 autoload-make-a │ │ │ -00000370: 7574 6f6c 6f61 642d 6f70 6572 6174 6f72 utoload-operator │ │ │ -00000380: 7320 7075 7420 7661 7269 6162 6c65 2d64 s put variable-d │ │ │ -00000390: 6f63 756d 656e 7461 7469 6f6e 2022 6064 ocumentation "`d │ │ │ -000003a0: 6566 756e 272d 6c69 6b65 206f 7065 7261 efun'-like opera │ │ │ -000003b0: 746f 7273 2074 6861 7420 7573 6520 6061 tors that use `a │ │ │ -000003c0: 7574 6f6c 6f61 6427 2074 6f20 6c6f 6164 utoload' to load │ │ │ -000003d0: 2074 6865 206c 6962 7261 7279 2e22 2064 the library." d │ │ │ -000003e0: 6566 6175 6c74 2d62 6f75 6e64 7020 7365 efault-boundp se │ │ │ -000003f0: 742d 6465 6661 756c 7420 2864 6566 756e t-default (defun │ │ │ -00000400: 2064 6566 696e 652d 736b 656c 6574 6f6e define-skeleton │ │ │ -00000410: 2064 6566 6d61 6372 6f20 6465 6669 6e65 defmacro define │ │ │ -00000420: 2d64 6572 6976 6564 2d6d 6f64 6520 6465 -derived-mode de │ │ │ -00000430: 6669 6e65 2d67 656e 6572 6963 2d6d 6f64 fine-generic-mod │ │ │ -00000440: 6520 6561 7379 2d6d 6d6f 6465 2d64 6566 e easy-mmode-def │ │ │ -00000450: 696e 652d 6d69 6e6f 722d 6d6f 6465 2065 ine-minor-mode e │ │ │ -00000460: 6173 792d 6d6d 6f64 652d 6465 6669 6e65 asy-mmode-define │ │ │ -00000470: 2d67 6c6f 6261 6c2d 6d6f 6465 2064 6566 -global-mode def │ │ │ -00000480: 696e 652d 6d69 6e6f 722d 6d6f 6465 2064 ine-minor-mode d │ │ │ -00000490: 6566 756e 2a20 6465 666d 6163 726f 2a29 efun* defmacro*) │ │ │ -000004a0: 2061 7574 6f6c 6f61 642d 6d61 6b65 2d61 autoload-make-a │ │ │ -000004b0: 7574 6f6c 6f61 642d 636f 6d70 6c65 782d utoload-complex- │ │ │ -000004c0: 6f70 6572 6174 6f72 7320 2260 6465 6675 operators "`defu │ │ │ -000004d0: 6e27 2d6c 696b 6520 6f70 6572 6174 6f72 n'-like operator │ │ │ -000004e0: 7320 746f 206d 6163 726f 6578 7061 6e64 s to macroexpand │ │ │ -000004f0: 2062 6566 6f72 6520 7573 696e 6720 6061 before using `a │ │ │ -00000500: 7574 6f6c 6f61 6427 2e22 2028 6561 7379 utoload'." (easy │ │ │ -00000510: 2d6d 6d6f 6465 2d64 6566 696e 652d 6d69 -mmode-define-mi │ │ │ -00000520: 6e6f 722d 6d6f 6465 2065 6173 792d 6d6d nor-mode easy-mm │ │ │ -00000530: 6f64 652d 6465 6669 6e65 2d67 6c6f 6261 ode-define-globa │ │ │ -00000540: 6c2d 6d6f 6465 2064 6566 696e 652d 6d69 l-mode define-mi │ │ │ -00000550: 6e6f 722d 6d6f 6465 2920 6175 746f 6c6f nor-mode) autolo │ │ │ -00000560: 6164 2064 6f63 2d73 7472 696e 672d 656c ad doc-string-el │ │ │ -00000570: 7420 3320 6465 6675 6e20 6465 6675 6e2a t 3 defun defun* │ │ │ -00000580: 2064 6566 7661 7220 6465 6663 7573 746f defvar defcusto │ │ │ -00000590: 6d20 6465 6663 6f6e 7374 2064 6566 6d61 m defconst defma │ │ │ -000005a0: 6372 6f20 6465 666d 6163 726f 2a20 6465 cro defmacro* de │ │ │ -000005b0: 6673 7562 7374 2064 6566 696e 652d 736b fsubst define-sk │ │ │ -000005c0: 656c 6574 6f6e 2032 2064 6566 696e 652d eleton 2 define- │ │ │ -000005d0: 6465 7269 7665 642d 6d6f 6465 2034 2065 derived-mode 4 e │ │ │ -000005e0: 6173 792d 6d6d 6f64 652d 6465 6669 6e65 asy-mmode-define │ │ │ -000005f0: 2d6d 696e 6f72 2d6d 6f64 6520 6465 6669 -minor-mode defi │ │ │ -00000600: 6e65 2d6d 696e 6f72 2d6d 6f64 6520 6465 ne-minor-mode de │ │ │ -00000610: 6669 6e65 2d67 656e 6572 6963 2d6d 6f64 fine-generic-mod │ │ │ -00000620: 6520 3720 6561 7379 2d6d 6d6f 6465 2d64 e 7 easy-mmode-d │ │ │ -00000630: 6566 696e 652d 676c 6f62 616c 2d6d 6f64 efine-global-mod │ │ │ -00000640: 6520 3130 3030 5d20 3429 0a23 4031 3736 e 1000] 4).#@176 │ │ │ -00000650: 2054 7572 6e20 464f 524d 2069 6e74 6f20 Turn FORM into │ │ │ -00000660: 616e 2061 7574 6f6c 6f61 6420 6f72 2064 an autoload or d │ │ │ -00000670: 6566 7661 7220 666f 7220 736f 7572 6365 efvar for source │ │ │ -00000680: 2066 696c 6520 4649 4c45 2e0a 5265 7475 file FILE..Retu │ │ │ -00000690: 726e 7320 6e69 6c20 6966 2046 4f52 4d20 rns nil if FORM │ │ │ -000006a0: 6973 206e 6f74 2061 2073 7065 6369 616c is not a special │ │ │ -000006b0: 2061 7574 6f6c 6f61 6420 666f 726d 2028 autoload form ( │ │ │ -000006c0: 692e 652e 2061 2066 756e 6374 696f 6e20 i.e. a function │ │ │ -000006d0: 6465 6669 6e69 7469 6f6e 0a6f 7220 6d61 definition.or ma │ │ │ -000006e0: 6372 6f20 6465 6669 6e69 7469 6f6e 206f cro definition o │ │ │ -000006f0: 7220 6120 6465 6663 7573 746f 6d29 2e1f r a defcustom).. │ │ │ -00000700: 0a28 6465 6661 6c69 6173 2027 6d61 6b65 .(defalias 'make │ │ │ -00000710: 2d61 7574 6f6c 6f61 6420 235b 2866 6f72 -autoload #[(for │ │ │ -00000720: 6d20 6669 6c65 2920 220d a2c6 1b89 1c0e m file) "....... │ │ │ -00000730: 2473 abab 0e21 1e25 c70d 2129 8913 ab9f $s...!.%..!).... │ │ │ -00000740: 0b40 c861 ab99 c90b 73ab 94c9 0b73 891e .@.a....s....s.. │ │ │ -00000750: 26c6 a188 c8ca cb0b 415c 2229 4282 de00 &.......A\")B... │ │ │ -00000760: 0c0e 2773 abc5 0ccc 731e 230d 4140 180c ..'s....s.#.A@.. │ │ │ -00000770: cd4e 0d9b 891e 1f40 3bad 870e 1f89 4116 .N.....@;.....A. │ │ │ -00000780: 1f40 1ace 083c ab83 08aa 83cf 0844 0e21 .@...<.......D.! │ │ │ -00000790: 5c6e 0cd0 73ab 83d1 aa86 0e1f 40a2 d261 \n..s.......@..a │ │ │ -000007a0: 0e23 ad83 cfd3 44af 062c aadd 0cd4 61ab .#....D..,....a. │ │ │ -000007b0: c80d a3a2 0da3 a3a2 0da3 a3a3 a20d a3a3 ................ │ │ │ -000007c0: a3a3 1e20 1a1e 5c22 19d5 0e20 d65c 22ac ... ..\"... .\". │ │ │ -000007d0: 88d7 090e 5c22 5c6e 46aa 9fc8 d709 0e5c ....\"\nF......\ │ │ │ -000007e0: 225c 6e46 d8d5 0e20 d95c 22cf 0944 da42 "\nF... .\"..D.B │ │ │ -000007f0: 4242 dbcf 0944 d50e 20d6 5c22 4546 2caa BB...D.. .\"EF,. │ │ │ -00000800: 900c dc73 ad8b dd0d 4140 cfde 0e21 4444 ...s....A@...!DD │ │ │ -00000810: 452a 8722 205b 6e61 6d65 2076 6172 6e61 E*." [name varna │ │ │ -00000820: 6d65 2064 6f63 2065 7870 616e 6420 6361 me doc expand ca │ │ │ -00000830: 7220 666f 726d 206e 696c 206d 6163 726f r form nil macro │ │ │ -00000840: 6578 7061 6e64 2070 726f 676e 203a 6175 expand progn :au │ │ │ -00000850: 746f 6c6f 6164 2d65 6e64 206d 6170 6361 toload-end mapca │ │ │ -00000860: 7220 235b 2866 6f72 6d29 2022 c209 085c r #[(form) "...\ │ │ │ -00000870: 2287 2220 5b66 696c 6520 666f 726d 206d "." [file form m │ │ │ -00000880: 616b 652d 6175 746f 6c6f 6164 5d20 335d ake-autoload] 3] │ │ │ -00000890: 2028 6465 666d 6163 726f 2064 6566 6d61 (defmacro defma │ │ │ -000008a0: 6372 6f2a 2920 646f 632d 7374 7269 6e67 cro*) doc-string │ │ │ -000008b0: 2d65 6c74 2061 7574 6f6c 6f61 6420 7175 -elt autoload qu │ │ │ -000008c0: 6f74 6520 2864 6566 696e 652d 736b 656c ote (define-skel │ │ │ -000008d0: 6574 6f6e 2064 6566 696e 652d 6465 7269 eton define-deri │ │ │ -000008e0: 7665 642d 6d6f 6465 2064 6566 696e 652d ved-mode define- │ │ │ -000008f0: 6765 6e65 7269 632d 6d6f 6465 2065 6173 generic-mode eas │ │ │ -00000900: 792d 6d6d 6f64 652d 6465 6669 6e65 2d67 y-mmode-define-g │ │ │ -00000910: 6c6f 6261 6c2d 6d6f 6465 2065 6173 792d lobal-mode easy- │ │ │ -00000920: 6d6d 6f64 652d 6465 6669 6e65 2d6d 696e mmode-define-min │ │ │ -00000930: 6f72 2d6d 6f64 6520 6465 6669 6e65 2d6d or-mode define-m │ │ │ -00000940: 696e 6f72 2d6d 6f64 6529 2074 2069 6e74 inor-mode) t int │ │ │ -00000950: 6572 6163 7469 7665 206d 6163 726f 2064 eractive macro d │ │ │ -00000960: 6566 6375 7374 6f6d 2070 6c69 7374 2d67 efcustom plist-g │ │ │ -00000970: 6574 203a 7265 7175 6972 6520 6465 6676 et :require defv │ │ │ -00000980: 6172 2063 7573 746f 6d2d 6164 642d 746f ar custom-add-to │ │ │ -00000990: 2d67 726f 7570 203a 6772 6f75 7020 2827 -group :group (' │ │ │ -000009a0: 6375 7374 6f6d 2d76 6172 6961 626c 6529 custom-variable) │ │ │ -000009b0: 2063 7573 746f 6d2d 6164 642d 6c6f 6164 custom-add-load │ │ │ -000009c0: 2028 6d61 6b65 2d63 6f64 696e 672d 7379 (make-coding-sy │ │ │ -000009d0: 7374 656d 206d 616b 652d 382d 6269 742d stem make-8-bit- │ │ │ -000009e0: 636f 6469 6e67 2d73 7973 7465 6d29 2061 coding-system) a │ │ │ -000009f0: 7574 6f6c 6f61 642d 636f 6469 6e67 2d73 utoload-coding-s │ │ │ -00000a00: 7973 7465 6d20 6c6f 6164 2062 6f64 7920 ystem load body │ │ │ -00000a10: 7265 7374 2066 696c 6520 696e 6974 206d rest file init m │ │ │ -00000a20: 6163 726f 7020 6175 746f 6c6f 6164 2d6d acrop autoload-m │ │ │ -00000a30: 616b 652d 6175 746f 6c6f 6164 2d63 6f6d ake-autoload-com │ │ │ -00000a40: 706c 6578 2d6f 7065 7261 746f 7273 206c plex-operators l │ │ │ -00000a50: 6f61 642d 6669 6c65 2d6e 616d 6520 656e oad-file-name en │ │ │ -00000a60: 6420 6175 746f 6c6f 6164 2d6d 616b 652d d autoload-make- │ │ │ -00000a70: 6175 746f 6c6f 6164 2d6f 7065 7261 746f autoload-operato │ │ │ -00000a80: 7273 5d20 3920 2823 2420 2e20 3136 3137 rs] 9 (#$ . 1617 │ │ │ -00000a90: 295d 290a 2340 3535 3320 4d61 6769 6320 )]).#@553 Magic │ │ │ -00000aa0: 636f 6d6d 656e 7420 696e 6469 6361 7469 comment indicati │ │ │ -00000ab0: 6e67 2074 6865 2066 6f6c 6c6f 7769 6e67 ng the following │ │ │ -00000ac0: 2066 6f72 6d20 7368 6f75 6c64 2062 6520 form should be │ │ │ -00000ad0: 6175 746f 6c6f 6164 6564 2e0a 5573 6564 autoloaded..Used │ │ │ -00000ae0: 2062 7920 6075 7064 6174 652d 6669 6c65 by `update-file │ │ │ -00000af0: 2d61 7574 6f6c 6f61 6473 272e 2020 5468 -autoloads'. Th │ │ │ -00000b00: 6973 2073 7472 696e 6720 7368 6f75 6c64 is string should │ │ │ -00000b10: 2062 650a 6d65 616e 696e 676c 6573 7320 be.meaningless │ │ │ -00000b20: 746f 204c 6973 7020 2865 2e67 2e2c 2061 to Lisp (e.g., a │ │ │ -00000b30: 2063 6f6d 6d65 6e74 292e 0a0a 5468 6973 comment)...This │ │ │ -00000b40: 2073 7472 696e 6720 6973 2075 7365 643a string is used: │ │ │ -00000b50: 0a0a 3b3b 3b23 2323 6175 746f 6c6f 6164 ..;;;###autoload │ │ │ -00000b60: 0a28 6465 6675 6e20 6675 6e63 7469 6f6e .(defun function │ │ │ -00000b70: 2d74 6f2d 6265 2d61 7574 6f6c 6f61 6465 -to-be-autoloade │ │ │ -00000b80: 6420 2829 202e 2e2e 290a 0a49 6620 7468 d () ...)..If th │ │ │ -00000b90: 6973 2073 7472 696e 6720 6170 7065 6172 is string appear │ │ │ -00000ba0: 7320 616c 6f6e 6520 6f6e 2061 206c 696e s alone on a lin │ │ │ -00000bb0: 652c 2074 6865 2066 6f6c 6c6f 7769 6e67 e, the following │ │ │ -00000bc0: 2066 6f72 6d20 7769 6c6c 2062 650a 7265 form will be.re │ │ │ -00000bd0: 6164 2061 6e64 2061 6e20 6175 746f 6c6f ad and an autolo │ │ │ -00000be0: 6164 206d 6164 6520 666f 7220 6974 2e20 ad made for it. │ │ │ -00000bf0: 2049 6620 6974 2069 7320 666f 6c6c 6f77 If it is follow │ │ │ -00000c00: 6564 2062 7920 7468 6520 7374 7269 6e67 ed by the string │ │ │ -00000c10: 0a22 696d 6d65 6469 6174 6522 2c20 7468 ."immediate", th │ │ │ -00000c20: 656e 2074 6865 2066 6f72 6d20 6f6e 2074 en the form on t │ │ │ -00000c30: 6865 2066 6f6c 6c6f 7769 6e67 206c 696e he following lin │ │ │ -00000c40: 6520 7769 6c6c 2062 6520 636f 7069 6564 e will be copied │ │ │ -00000c50: 0a76 6572 6261 7469 6d2e 2020 4966 2074 .verbatim. If t │ │ │ -00000c60: 6865 7265 2069 7320 6675 7274 6865 7220 here is further │ │ │ -00000c70: 7465 7874 206f 6e20 7468 6520 6c69 6e65 text on the line │ │ │ -00000c80: 2c20 7468 6174 2074 6578 7420 7769 6c6c , that text will │ │ │ -00000c90: 2062 650a 636f 7069 6564 2076 6572 6261 be.copied verba │ │ │ -00000ca0: 7469 6d20 746f 2060 6765 6e65 7261 7465 tim to `generate │ │ │ -00000cb0: 642d 6175 746f 6c6f 6164 2d66 696c 6527 d-autoload-file' │ │ │ -00000cc0: 2e1f 0a28 6465 6676 6172 2067 656e 6572 ...(defvar gener │ │ │ -00000cd0: 6174 652d 6175 746f 6c6f 6164 2d63 6f6f ate-autoload-coo │ │ │ -00000ce0: 6b69 6520 223b 3b3b 2323 2361 7574 6f6c kie ";;;###autol │ │ │ -00000cf0: 6f61 6422 2028 2324 202e 2032 3731 3429 oad" (#$ . 2714) │ │ │ -00000d00: 290a 2340 3832 2053 7472 696e 6720 696e ).#@82 String in │ │ │ -00000d10: 7365 7274 6564 2062 6566 6f72 6520 7468 serted before th │ │ │ -00000d20: 6520 666f 726d 2069 6465 6e74 6966 7969 e form identifyi │ │ │ -00000d30: 6e67 0a74 6865 2073 6563 7469 6f6e 206f ng.the section o │ │ │ -00000d40: 6620 6175 746f 6c6f 6164 7320 666f 7220 f autoloads for │ │ │ -00000d50: 6120 6669 6c65 2e1f 0a28 6465 6676 6172 a file...(defvar │ │ │ -00000d60: 2067 656e 6572 6174 652d 6175 746f 6c6f generate-autolo │ │ │ -00000d70: 6164 2d73 6563 7469 6f6e 2d68 6561 6465 ad-section-heade │ │ │ -00000d80: 7220 220c 5c6e 3b3b 3b23 2323 2022 2028 r ".\n;;;### " ( │ │ │ -00000d90: 2324 202e 2033 3333 3529 290a 2340 3732 #$ . 3335)).#@72 │ │ │ -00000da0: 2053 7472 696e 6720 7768 6963 6820 696e String which in │ │ │ -00000db0: 6469 6361 7465 7320 7468 6520 656e 6420 dicates the end │ │ │ -00000dc0: 6f66 2074 6865 2073 6563 7469 6f6e 206f of the section o │ │ │ -00000dd0: 6620 6175 746f 6c6f 6164 7320 666f 7220 f autoloads for │ │ │ -00000de0: 6120 6669 6c65 2e1f 0a28 6465 6676 6172 a file...(defvar │ │ │ -00000df0: 2067 656e 6572 6174 652d 6175 746f 6c6f generate-autolo │ │ │ -00000e00: 6164 2d73 6563 7469 6f6e 2d74 7261 696c ad-section-trail │ │ │ -00000e10: 6572 2022 5c6e 3b3b 3b2a 2a2a 5c6e 2220 er "\n;;;***\n" │ │ │ -00000e20: 2823 2420 2e20 3334 3839 2929 0a28 6279 (#$ . 3489)).(by │ │ │ -00000e30: 7465 2d63 6f64 6520 22c1 0842 10c2 c121 te-code "..B...! │ │ │ -00000e40: ac85 c3c1 c45c 2288 c487 2220 5b63 7572 .....\"..." [cur │ │ │ -00000e50: 7265 6e74 2d6c 6f61 642d 6c69 7374 2061 rent-load-list a │ │ │ -00000e60: 7574 6f6c 6f61 642d 7061 636b 6167 652d utoload-package- │ │ │ -00000e70: 6e61 6d65 2064 6566 6175 6c74 2d62 6f75 name default-bou │ │ │ -00000e80: 6e64 7020 7365 742d 6465 6661 756c 7420 ndp set-default │ │ │ -00000e90: 6e69 6c5d 2033 290a 2340 3637 2052 6574 nil] 3).#@67 Ret │ │ │ -00000ea0: 7572 6e73 2061 2072 656c 6174 6976 6520 urns a relative │ │ │ -00000eb0: 7061 7468 6e61 6d65 206f 6620 4649 4c45 pathname of FILE │ │ │ -00000ec0: 2069 6e63 6c75 6469 6e67 2074 6865 206c including the l │ │ │ -00000ed0: 6173 7420 6469 7265 6374 6f72 792e 1f0a ast directory... │ │ │ -00000ee0: 2864 6566 616c 6961 7320 2761 7574 6f6c (defalias 'autol │ │ │ -00000ef0: 6f61 642d 7472 696d 2d66 696c 652d 6e61 oad-trim-file-na │ │ │ -00000f00: 6d65 2023 5b28 6669 6c65 2920 22c1 0821 me #[(file) "..! │ │ │ -00000f10: 10c2 c308 c4c5 c408 2121 215c 22c6 c723 ........!!!\"..# │ │ │ -00000f20: 8722 205b 6669 6c65 2065 7870 616e 642d ." [file expand- │ │ │ -00000f30: 6669 6c65 2d6e 616d 6520 7265 706c 6163 file-name replac │ │ │ -00000f40: 652d 696e 2d73 7472 696e 6720 6669 6c65 e-in-string file │ │ │ -00000f50: 2d72 656c 6174 6976 652d 6e61 6d65 2066 -relative-name f │ │ │ -00000f60: 696c 652d 6e61 6d65 2d64 6972 6563 746f ile-name-directo │ │ │ -00000f70: 7279 2064 6972 6563 746f 7279 2d66 696c ry directory-fil │ │ │ -00000f80: 652d 6e61 6d65 2022 5c5c 5c5c 2220 222f e-name "\\\\" "/ │ │ │ -00000f90: 225d 2037 2028 2324 202e 2033 3734 3129 "] 7 (#$ . 3741) │ │ │ -00000fa0: 5d29 0a23 4032 3337 2049 6e73 6572 7420 ]).#@237 Insert │ │ │ -00000fb0: 6174 2070 6f69 6e74 2061 206c 6f61 6464 at point a loadd │ │ │ -00000fc0: 6566 7320 6175 746f 6c6f 6164 2073 6563 efs autoload sec │ │ │ -00000fd0: 7469 6f6e 2066 6f72 2046 494c 452e 0a61 tion for FILE..a │ │ │ -00000fe0: 7574 6f6c 6f61 6473 2061 7265 2067 656e utoloads are gen │ │ │ -00000ff0: 6572 6174 6564 2066 6f72 2064 6566 756e erated for defun │ │ │ -00001000: 7320 616e 6420 6465 666d 6163 726f 7320 s and defmacros │ │ │ -00001010: 696e 2046 494c 450a 6d61 726b 6564 2062 in FILE.marked b │ │ │ -00001020: 7920 6067 656e 6572 6174 652d 6175 746f y `generate-auto │ │ │ -00001030: 6c6f 6164 2d63 6f6f 6b69 6527 2028 7768 load-cookie' (wh │ │ │ -00001040: 6963 6820 7365 6529 2e0a 4966 2046 494c ich see)..If FIL │ │ │ -00001050: 4520 6973 2062 6569 6e67 2076 6973 6974 E is being visit │ │ │ -00001060: 6564 2069 6e20 6120 6275 6666 6572 2c20 ed in a buffer, │ │ │ -00001070: 7468 6520 636f 6e74 656e 7473 206f 6620 the contents of │ │ │ -00001080: 7468 6520 6275 6666 6572 0a61 7265 2075 the buffer.are u │ │ │ -00001090: 7365 642e 1f0a 2864 6566 616c 6961 7320 sed...(defalias │ │ │ -000010a0: 2767 656e 6572 6174 652d 6669 6c65 2d61 'generate-file-a │ │ │ -000010b0: 7574 6f6c 6f61 6473 2023 5b28 6669 6c65 utoloads #[(file │ │ │ -000010c0: 2026 6f70 7469 6f6e 616c 2066 756e 6c69 &optional funli │ │ │ -000010d0: 7374 2920 22c2 0908 5c22 8722 205b 6675 st) "...\"." [fu │ │ │ -000010e0: 6e6c 6973 7420 6669 6c65 2067 656e 6572 nlist file gener │ │ │ -000010f0: 6174 652d 6669 6c65 2d61 7574 6f6c 6f61 ate-file-autoloa │ │ │ -00001100: 6473 2d31 5d20 3320 2823 2420 2e20 3430 ds-1] 3 (#$ . 40 │ │ │ -00001110: 3039 2920 2266 4765 6e65 7261 7465 2061 09) "fGenerate a │ │ │ -00001120: 7574 6f6c 6f61 6473 2066 6f72 2066 696c utoloads for fil │ │ │ -00001130: 653a 2022 5d29 0a23 4033 3037 2049 6e73 e: "]).#@307 Ins │ │ │ -00001140: 6572 7420 6174 2070 6f69 6e74 2061 206c ert at point a l │ │ │ -00001150: 6f61 6464 6566 7320 6175 746f 6c6f 6164 oaddefs autoload │ │ │ -00001160: 2073 6563 7469 6f6e 2066 6f72 2046 494c section for FIL │ │ │ -00001170: 452e 0a61 7574 6f6c 6f61 6473 2061 7265 E..autoloads are │ │ │ -00001180: 2067 656e 6572 6174 6564 2066 6f72 2064 generated for d │ │ │ -00001190: 6566 756e 7320 616e 6420 6465 666d 6163 efuns and defmac │ │ │ -000011a0: 726f 7320 696e 2046 494c 450a 6d61 726b ros in FILE.mark │ │ │ -000011b0: 6564 2062 7920 6067 656e 6572 6174 652d ed by `generate- │ │ │ -000011c0: 6175 746f 6c6f 6164 2d63 6f6f 6b69 6527 autoload-cookie' │ │ │ -000011d0: 2028 7768 6963 6820 7365 6529 2e0a 4966 (which see)..If │ │ │ -000011e0: 2046 494c 4520 6973 2062 6569 6e67 2076 FILE is being v │ │ │ -000011f0: 6973 6974 6564 2069 6e20 6120 6275 6666 isited in a buff │ │ │ -00001200: 6572 2c20 7468 6520 636f 6e74 656e 7473 er, the contents │ │ │ -00001210: 206f 6620 7468 6520 6275 6666 6572 0a61 of the buffer.a │ │ │ -00001220: 7265 2075 7365 642e 0a43 6f6d 6d6f 6e20 re used..Common │ │ │ -00001230: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ -00001240: 3a0a 2020 2867 656e 6572 6174 652d 6669 :. (generate-fi │ │ │ -00001250: 6c65 2d61 7574 6f6c 6f61 6473 2d31 2046 le-autoloads-1 F │ │ │ -00001260: 494c 4520 4655 4e4c 4953 5429 0a0a 1f0a ILE FUNLIST).... │ │ │ -00001270: 2864 6566 616c 6961 7320 2767 656e 6572 (defalias 'gener │ │ │ -00001280: 6174 652d 6669 6c65 2d61 7574 6f6c 6f61 ate-file-autoloa │ │ │ -00001290: 6473 2d31 2023 5b28 6669 6c65 2066 756e ds-1 #[(file fun │ │ │ -000012a0: 6c69 7374 2920 22c0 c18d 8722 205b 2d2d list) "...." [-- │ │ │ -000012b0: 636c 2d62 6c6f 636b 2d67 656e 6572 6174 cl-block-generat │ │ │ -000012c0: 652d 6669 6c65 2d61 7574 6f6c 6f61 6473 e-file-autoloads │ │ │ -000012d0: 2d31 2d2d 2028 6279 7465 2d63 6f64 6520 -1-- (byte-code │ │ │ -000012e0: 2270 c6c7 c80b 21c9 ca23 cb0b 210e 3f3f "p....!..#..!.?? │ │ │ -000012f0: 3fc6 ccc6 cd0b 21c6 1e40 1e48 1e4a 1e4b ?.....!..@.H.J.K │ │ │ -00001300: 1e4c 1a1e 431e 461e 441d ce0b 2113 8acf .L..C.F.D...!... │ │ │ -00001310: 8ec6 891e 4d1e 4e0e 48ae 83d0 0b21 7188 ....M.N.H....!q. │ │ │ -00001320: d10e 4f21 882a 8a8c 7e88 6562 88d2 0e47 ..O!.*..~.eb...G │ │ │ -00001330: c6cc 23ac 8bd3 d40e 435c 2288 d5d6 c65c ..#.....C\"....\ │ │ │ -00001340: 2288 d3d7 0e43 5c22 8865 6288 5c6e ab84 "....C\".eb.\n.. │ │ │ -00001350: 0e3f aa82 6d3f 83fd 015c 6eac 86d8 c677 .?..m?...\n....w │ │ │ -00001360: 88aa 9465 6288 d9da dbdc 0e3f 4021 21dd ...eb......?@!!. │ │ │ -00001370: 5121 88de 9462 885c 6eac 89df db0e 4721 Q!...b.\n.....G! │ │ │ -00001380: 2183 e001 5c6e ac89 d20e 4721 88e0 c677 !...\n....G!...w │ │ │ -00001390: 885c 6eac 846c 83bc 01e1 7021 6eac 83e2 .\n..l....p!n... │ │ │ -000013a0: 7988 1e41 e30e 410e 465c 2219 0e41 a2e4 y..A..A.F\"..A.. │ │ │ -000013b0: 4e1e 2409 ab8b 0e41 4140 0e44 4216 44aa N.$....AA@.DB.D. │ │ │ -000013c0: 830e 4111 0e24 8383 010e 2409 383b 8383 ..A..$....$.8;.. │ │ │ -000013d0: 010e 2453 099b 8918 411e 4508 c6a1 88e5 ..$S....A.E..... │ │ │ -000013e0: e60d 5c22 88cc 8a0d 7188 6029 c61c 181e ..\"....q.`).... │ │ │ -000013f0: 49e7 e809 5c22 888a 0d71 88e9 2014 0862 I...\"...q.. ..b │ │ │ -00001400: 88ea 201e 50eb 8ed2 ec0c cc23 ab89 edee .. .P......#.... │ │ │ -00001410: 2188 ef63 88aa 702a 0c62 882c e5f0 0d5c !..c..p*.b.,...\ │ │ │ -00001420: 2288 8a0d 7188 6029 1e42 e5f1 0e45 4021 "...q.`).B...E@! │ │ │ -00001430: e2c6 4f0d 5c22 888a 0d71 888a f2e6 0e42 ..O.\"...q.....B │ │ │ -00001440: cc23 ab88 e275 88f3 6388 aa70 2a0e 4541 .#...u..c..p*.EA │ │ │ -00001450: ac87 e5f4 0d5c 2288 aa91 e5f5 0d5c 2288 .....\"......\". │ │ │ -00001460: e5f1 0e45 4121 e2c6 4f0d 5c22 88f6 0d21 ...EA!..O.\"...! │ │ │ -00001470: 882b aab6 8a0d 7188 6029 ccc6 1c1e 4918 .+....q.`)....I. │ │ │ -00001480: f709 0d5c 2288 8a0d 7188 e920 1408 6288 ...\"...q.. ..b. │ │ │ -00001490: ea20 1e51 f88e d2ec 0ccc 23ab 89ed ee21 . .Q......#....! │ │ │ -000014a0: 88ef 6388 aa70 2a0c 6288 2c2b aab5 601e ..c..p*.b.,+..`. │ │ │ -000014b0: 42df f921 ab8e e279 8860 1642 fa20 88e2 B..!...y.`.B. .. │ │ │ -000014c0: 7988 aa83 e279 88e5 0e42 607b 0d5c 2288 y....y...B`{.\". │ │ │ -000014d0: 29aa 91df fb21 ab85 e279 88aa 87fa e221 )....!...y.....! │ │ │ -000014e0: 88e2 7988 5c6e 8368 000e 3f41 163f 8268 ..y.\n.h..?A.?.h │ │ │ -000014f0: 002c 0e52 6388 fcfd 0e44 0e46 0e43 460d .,.Rc....D.F.CF. │ │ │ -00001500: 5c22 88f6 0d21 880e 4060 57ab 84e9 2016 \"...!..@`W... . │ │ │ -00001510: 4060 0e40 57ab 88c6 7f88 e279 88aa 720e @`.@W......y..r. │ │ │ -00001520: 4062 880e 5363 880e 54ae 84d3 fe0b 5c22 @b..Sc..T.....\" │ │ │ -00001530: 2e5c 6e87 2220 5b70 2061 7574 6f6c 6f61 .\n." [p autoloa │ │ │ -00001540: 6420 646f 6669 6c65 7320 6669 6c65 2070 d dofiles file p │ │ │ -00001550: 3220 6f75 7462 7566 206e 696c 2072 6570 2 outbuf nil rep │ │ │ -00001560: 6c61 6365 2d69 6e2d 7374 7269 6e67 2066 lace-in-string f │ │ │ -00001570: 696c 652d 6e61 6d65 2d6e 6f6e 6469 7265 ile-name-nondire │ │ │ -00001580: 6374 6f72 7920 225c 5c2e 656c 633f 2422 ctory "\\.elc?$" │ │ │ -00001590: 2022 2220 6175 746f 6c6f 6164 2d74 7269 "" autoload-tri │ │ │ -000015a0: 6d2d 6669 6c65 2d6e 616d 6520 7420 6765 m-file-name t ge │ │ │ -000015b0: 742d 6669 6c65 2d62 7566 6665 7220 6578 t-file-buffer ex │ │ │ -000015c0: 7061 6e64 2d66 696c 652d 6e61 6d65 2028 pand-file-name ( │ │ │ -000015d0: 2862 7974 652d 636f 6465 2022 5c6e ac84 (byte-code "\n.. │ │ │ -000015e0: c370 2188 0971 88c4 2010 c387 2220 5b6f .p!..q.. ..." [o │ │ │ -000015f0: 7574 7075 742d 656e 6420 6f75 7462 7566 utput-end outbuf │ │ │ -00001600: 2076 6973 6974 6564 206b 696c 6c2d 6275 visited kill-bu │ │ │ -00001610: 6666 6572 2070 6f69 6e74 2d6d 6172 6b65 ffer point-marke │ │ │ -00001620: 725d 2032 2929 2066 696e 642d 6669 6c65 r] 2)) find-file │ │ │ -00001630: 2d6e 6f73 656c 6563 7420 7365 742d 7379 -noselect set-sy │ │ │ -00001640: 6e74 6178 2d74 6162 6c65 2073 6561 7263 ntax-table searc │ │ │ -00001650: 682d 666f 7277 6172 6420 6d65 7373 6167 h-forward messag │ │ │ -00001660: 6520 224e 6f20 6175 746f 6c6f 6164 7320 e "No autoloads │ │ │ -00001670: 666f 756e 6420 696e 2025 7322 2074 6872 found in %s" thr │ │ │ -00001680: 6f77 202d 2d63 6c2d 626c 6f63 6b2d 6765 ow --cl-block-ge │ │ │ -00001690: 6e65 7261 7465 2d66 696c 652d 6175 746f nerate-file-auto │ │ │ -000016a0: 6c6f 6164 732d 312d 2d20 2247 656e 6572 loads-1-- "Gener │ │ │ -000016b0: 6174 696e 6720 6175 746f 6c6f 6164 7320 ating autoloads │ │ │ -000016c0: 666f 7220 2573 2e2e 2e22 2022 2009 5c6e for %s..." " .\n │ │ │ -000016d0: 0c22 2072 652d 7365 6172 6368 2d66 6f72 ." re-search-for │ │ │ -000016e0: 7761 7264 2022 2864 6566 5c5c 2875 6e5c ward "(def\\(un\ │ │ │ -000016f0: 5c7c 7661 725c 5c7c 636f 6e73 745c 5c7c \|var\\|const\\| │ │ │ -00001700: 6d61 6372 6f5c 5c29 2022 2072 6567 6578 macro\\) " regex │ │ │ -00001710: 702d 7175 6f74 6520 7379 6d62 6f6c 2d6e p-quote symbol-n │ │ │ -00001720: 616d 6520 225c 5c73 2022 2030 206c 6f6f ame "\\s " 0 loo │ │ │ -00001730: 6b69 6e67 2d61 7420 2220 0922 2072 6561 king-at " ." rea │ │ │ -00001740: 6420 3120 6d61 6b65 2d61 7574 6f6c 6f61 d 1 make-autoloa │ │ │ -00001750: 6420 646f 632d 7374 7269 6e67 2d65 6c74 d doc-string-elt │ │ │ -00001760: 2070 7269 6e63 2022 5c6e 2822 206d 6170 princ "\n(" map │ │ │ -00001770: 6361 7220 235b 2865 6c74 2920 22c2 0809 car #[(elt) "... │ │ │ -00001780: 5c22 88c3 c409 5c22 8722 205b 656c 7420 \"....\"." [elt │ │ │ -00001790: 6f75 7462 7566 2070 7269 6e31 2070 7269 outbuf prin1 pri │ │ │ -000017a0: 6e63 2022 2022 5d20 335d 2070 6f69 6e74 nc " "] 3] point │ │ │ -000017b0: 2d6d 6172 6b65 7220 6d61 7463 682d 6461 -marker match-da │ │ │ -000017c0: 7461 2028 2873 746f 7265 2d6d 6174 6368 ta ((store-match │ │ │ -000017d0: 2d64 6174 6120 2331 3d23 3a6d 6174 6368 -data #1=#:match │ │ │ -000017e0: 2d64 6174 6129 2920 220c 2220 6465 6c65 -data)) "." dele │ │ │ -000017f0: 7465 2d63 6861 7220 2d31 2022 5c5c 5e4c te-char -1 "\\^L │ │ │ -00001800: 2220 225c 225c 5c5c 6e22 2070 7269 6e31 " "\"\\\n" prin1 │ │ │ -00001810: 2d74 6f2d 7374 7269 6e67 2073 6561 7263 -to-string searc │ │ │ -00001820: 682d 6261 636b 7761 7264 2022 5c5c 2220 h-backward "\\" │ │ │ -00001830: 2229 2220 2220 2220 7465 7270 7269 2070 ")" " " terpri p │ │ │ -00001840: 7269 6e74 2028 2873 746f 7265 2d6d 6174 rint ((store-mat │ │ │ -00001850: 6368 2d64 6174 6120 2332 3d23 3a6d 6174 ch-data #2=#:mat │ │ │ -00001860: 6368 2d64 6174 6129 2920 2269 6d6d 6564 ch-data)) "immed │ │ │ -00001870: 6961 7465 5c5c 7320 2a24 2220 666f 7277 iate\\s *$" forw │ │ │ -00001880: 6172 642d 7365 7870 2022 3b22 2070 7269 ard-sexp ";" pri │ │ │ -00001890: 6e31 2061 7574 6f6c 6f61 6473 2022 4765 n1 autoloads "Ge │ │ │ -000018a0: 6e65 7261 7469 6e67 2061 7574 6f6c 6f61 nerating autoloa │ │ │ -000018b0: 6473 2066 6f72 2025 732e 2e2e 646f 6e65 ds for %s...done │ │ │ -000018c0: 2220 6675 6e6c 6973 7420 6f75 7470 7574 " funlist output │ │ │ -000018d0: 2d65 6e64 2066 6f72 6d20 6265 6769 6e20 -end form begin │ │ │ -000018e0: 7472 696d 2d6e 616d 6520 6175 746f 6c6f trim-name autolo │ │ │ -000018f0: 6164 732d 646f 6e65 2065 6c74 206c 6f61 ads-done elt loa │ │ │ -00001900: 642d 6e61 6d65 2067 656e 6572 6174 652d d-name generate- │ │ │ -00001910: 6175 746f 6c6f 6164 2d63 6f6f 6b69 6520 autoload-cookie │ │ │ -00001920: 7669 7369 7465 6420 7072 696e 742d 6573 visited print-es │ │ │ -00001930: 6361 7065 2d6e 6577 6c69 6e65 7320 666c cape-newlines fl │ │ │ -00001940: 6f61 742d 6f75 7470 7574 2d66 6f72 6d61 oat-output-forma │ │ │ -00001950: 7420 7072 696e 742d 7265 6164 6162 6c79 t print-readably │ │ │ -00001960: 2070 7269 6e74 2d6c 656e 6774 6820 656e print-length en │ │ │ -00001970: 6162 6c65 2d6c 6f63 616c 2d76 6172 6961 able-local-varia │ │ │ -00001980: 626c 6573 2066 696e 642d 6669 6c65 2d68 bles find-file-h │ │ │ -00001990: 6f6f 6b73 2065 6d61 6373 2d6c 6973 702d ooks emacs-lisp- │ │ │ -000019a0: 6d6f 6465 2d73 796e 7461 782d 7461 626c mode-syntax-tabl │ │ │ -000019b0: 6520 2331 2320 2332 2320 6765 6e65 7261 e #1# #2# genera │ │ │ -000019c0: 7465 2d61 7574 6f6c 6f61 642d 7365 6374 te-autoload-sect │ │ │ -000019d0: 696f 6e2d 6865 6164 6572 2067 656e 6572 ion-header gener │ │ │ -000019e0: 6174 652d 6175 746f 6c6f 6164 2d73 6563 ate-autoload-sec │ │ │ -000019f0: 7469 6f6e 2d74 7261 696c 6572 206e 6f6e tion-trailer non │ │ │ -00001a00: 696e 7465 7261 6374 6976 655d 2031 3129 interactive] 11) │ │ │ -00001a10: 5d20 3220 2823 2420 2e20 3434 3133 295d ] 2 (#$ . 4413)] │ │ │ -00001a20: 290a 2340 3131 3620 4765 6e65 7269 6320 ).#@116 Generic │ │ │ -00001a30: 6669 6c65 6e61 6d65 2074 6f20 7075 7420 filename to put │ │ │ -00001a40: 6175 746f 6c6f 6164 7320 696e 746f 2e0a autoloads into.. │ │ │ -00001a50: 556e 6c65 7373 2079 6f75 2061 7265 2061 Unless you are a │ │ │ -00001a60: 6e20 5845 6d61 6373 206d 6169 6e74 6169 n XEmacs maintai │ │ │ -00001a70: 6e65 722c 2069 7420 6973 2070 726f 6261 ner, it is proba │ │ │ -00001a80: 626c 7920 756e 7769 7365 2074 6f20 6368 bly unwise to ch │ │ │ -00001a90: 616e 6765 2074 6869 732e 1f0a 2864 6566 ange this...(def │ │ │ -00001aa0: 636f 6e73 7420 6175 746f 6c6f 6164 2d66 const autoload-f │ │ │ -00001ab0: 696c 652d 6e61 6d65 2022 6175 746f 2d61 ile-name "auto-a │ │ │ -00001ac0: 7574 6f6c 6f61 6473 2e65 6c22 2028 2324 utoloads.el" (#$ │ │ │ -00001ad0: 202e 2036 3639 3629 290a 2340 3130 3720 . 6696)).#@107 │ │ │ -00001ae0: 4469 7265 6374 6f72 7920 746f 2070 7574 Directory to put │ │ │ -00001af0: 2061 7574 6f6c 6f61 6420 6465 636c 6172 autoload declar │ │ │ -00001b00: 6174 696f 6e20 6669 6c65 2069 6e74 6f2e ation file into. │ │ │ -00001b10: 0a55 6e6c 6573 7320 796f 7520 6b6e 6f77 .Unless you know │ │ │ -00001b20: 2077 6861 7420 796f 7527 7265 2064 6f69 what you're doi │ │ │ -00001b30: 6e67 2c20 646f 6e27 7420 6d65 7373 2077 ng, don't mess w │ │ │ -00001b40: 6974 6820 7468 6973 2e1f 0a28 6465 6676 ith this...(defv │ │ │ -00001b50: 6172 2061 7574 6f6c 6f61 642d 7461 7267 ar autoload-targ │ │ │ -00001b60: 6574 2d64 6972 6563 746f 7279 2022 2e2e et-directory ".. │ │ │ -00001b70: 2f6c 6973 702f 2220 2823 2420 2e20 3638 /lisp/" (#$ . 68 │ │ │ -00001b80: 3830 2929 0a23 4033 3030 202a 4669 6c65 80)).#@300 *File │ │ │ -00001b90: 2060 7570 6461 7465 2d66 696c 652d 6175 `update-file-au │ │ │ -00001ba0: 746f 6c6f 6164 7327 2070 7574 7320 6175 toloads' puts au │ │ │ -00001bb0: 746f 6c6f 6164 7320 696e 746f 2e0a 4120 toloads into..A │ │ │ -00001bc0: 2e65 6c20 6669 6c65 2063 616e 2073 6574 .el file can set │ │ │ -00001bd0: 2074 6869 7320 696e 2069 7473 206c 6f63 this in its loc │ │ │ -00001be0: 616c 2076 6172 6961 626c 6573 2073 6563 al variables sec │ │ │ -00001bf0: 7469 6f6e 2074 6f20 6d61 6b65 2069 7473 tion to make its │ │ │ -00001c00: 0a61 7574 6f6c 6f61 6473 2067 6f20 736f .autoloads go so │ │ │ -00001c10: 6d65 7768 6572 6520 656c 7365 2e0a 0a4e mewhere else...N │ │ │ -00001c20: 6f74 6520 7468 6174 2060 6261 7463 682d ote that `batch- │ │ │ -00001c30: 7570 6461 7465 2d64 6972 6563 746f 7279 update-directory │ │ │ -00001c40: 2720 6269 6e64 7320 7468 6973 2076 6172 ' binds this var │ │ │ -00001c50: 6961 626c 6520 746f 2069 7473 206f 776e iable to its own │ │ │ -00001c60: 2076 616c 7565 2c0a 6765 6e65 7261 6c6c value,.generall │ │ │ -00001c70: 7920 7468 6520 6669 6c65 206e 616d 6564 y the file named │ │ │ -00001c80: 2060 6175 746f 6c6f 6164 2d66 696c 652d `autoload-file- │ │ │ -00001c90: 6e61 6d65 2720 696e 2074 6865 2064 6972 name' in the dir │ │ │ -00001ca0: 6563 746f 7279 2062 6569 6e67 0a75 7064 ectory being.upd │ │ │ -00001cb0: 6174 6564 2e1f 0a28 6465 6676 6172 2067 ated...(defvar g │ │ │ -00001cc0: 656e 6572 6174 6564 2d61 7574 6f6c 6f61 enerated-autoloa │ │ │ -00001cd0: 642d 6669 6c65 2028 6279 7465 2d63 6f64 d-file (byte-cod │ │ │ -00001ce0: 6520 22c3 5c6e 0950 085c 2287 2220 5b64 e ".\n.P.\"." [d │ │ │ -00001cf0: 6174 612d 6469 7265 6374 6f72 7920 6175 ata-directory au │ │ │ -00001d00: 746f 6c6f 6164 2d66 696c 652d 6e61 6d65 toload-file-name │ │ │ -00001d10: 2061 7574 6f6c 6f61 642d 7461 7267 6574 autoload-target │ │ │ -00001d20: 2d64 6972 6563 746f 7279 2065 7870 616e -directory expan │ │ │ -00001d30: 642d 6669 6c65 2d6e 616d 655d 2033 2920 d-file-name] 3) │ │ │ -00001d40: 2823 2420 2e20 2d37 3035 3129 290a 2340 (#$ . -7051)).#@ │ │ │ -00001d50: 3131 3920 4765 6e65 7269 6320 6669 6c65 119 Generic file │ │ │ -00001d60: 6e61 6d65 2074 6f20 7075 7420 6375 7374 name to put cust │ │ │ -00001d70: 6f6d 206c 6f61 6473 2069 6e74 6f2e 0a55 om loads into..U │ │ │ -00001d80: 6e6c 6573 7320 796f 7520 6172 6520 616e nless you are an │ │ │ -00001d90: 2058 456d 6163 7320 6d61 696e 7461 696e XEmacs maintain │ │ │ -00001da0: 6572 2c20 6974 2069 7320 7072 6f62 6162 er, it is probab │ │ │ -00001db0: 6c79 2075 6e77 6973 6520 746f 2063 6861 ly unwise to cha │ │ │ -00001dc0: 6e67 6520 7468 6973 2e1f 0a28 6465 6663 nge this...(defc │ │ │ -00001dd0: 6f6e 7374 2063 7573 6c6f 6164 2d66 696c onst cusload-fil │ │ │ -00001de0: 652d 6e61 6d65 2022 6375 7374 6f6d 2d6c e-name "custom-l │ │ │ -00001df0: 6f61 642e 656c 2220 2823 2420 2e20 3735 oad.el" (#$ . 75 │ │ │ -00001e00: 3038 2929 0a23 4031 3537 2055 7064 6174 08)).#@157 Updat │ │ │ -00001e10: 6520 7468 6520 6175 746f 6c6f 6164 7320 e the autoloads │ │ │ -00001e20: 666f 7220 4649 4c45 2069 6e20 6067 656e for FILE in `gen │ │ │ -00001e30: 6572 6174 6564 2d61 7574 6f6c 6f61 642d erated-autoload- │ │ │ -00001e40: 6669 6c65 270a 2877 6869 6368 2046 494c file'.(which FIL │ │ │ -00001e50: 4520 6d69 6768 7420 6269 6e64 2069 6e20 E might bind in │ │ │ -00001e60: 6974 7320 6c6f 6361 6c20 7661 7269 6162 its local variab │ │ │ -00001e70: 6c65 7329 2e0a 5468 6973 2066 756e 6374 les)..This funct │ │ │ -00001e80: 696f 6e20 7265 6675 7365 7320 746f 2075 ion refuses to u │ │ │ -00001e90: 7064 6174 6520 6175 746f 6c6f 6164 7320 pdate autoloads │ │ │ -00001ea0: 6669 6c65 732e 1f0a 2864 6566 616c 6961 files...(defalia │ │ │ -00001eb0: 7320 2775 7064 6174 652d 6669 6c65 2d61 s 'update-file-a │ │ │ -00001ec0: 7574 6f6c 6f61 6473 2023 5b28 6669 6c65 utoloads #[(file │ │ │ -00001ed0: 2920 22c6 0d21 15c7 0d0c 5c22 addf c80d ) "..!....\".... │ │ │ -00001ee0: 2108 43b6 3fad d6c9 c80d 21ca cb23 cc0d !.C.?.....!..#.. │ │ │ -00001ef0: 21cd 891b 1a1e 1919 8acd 1e1a ce0c 21ae !.............!. │ │ │ -00001f00: 83cf 0c21 7188 29cd 161b 6562 88d0 0e1c ...!q.)...eb.... │ │ │ -00001f10: cdd1 23ab 99d2 9412 d370 2113 d40b 3809 ..#......p!...8. │ │ │ -00001f20: 98ab 6ad0 0e1d 2188 5c6e 607c 88aa 5fd5 ..j...!.\n`|.._. │ │ │ -00001f30: d68d 88d7 0d21 8829 74ad 82d8 202c 8722 .....!.)t... ,." │ │ │ -00001f40: 205b 6175 746f 6c6f 6164 2d66 696c 652d [autoload-file- │ │ │ -00001f50: 6e61 6d65 206c 6f61 642d 6e61 6d65 2073 name load-name s │ │ │ -00001f60: 6563 7469 6f6e 2d62 6567 696e 2066 6f72 ection-begin for │ │ │ -00001f70: 6d20 6765 6e65 7261 7465 642d 6175 746f m generated-auto │ │ │ -00001f80: 6c6f 6164 2d66 696c 6520 6669 6c65 2065 load-file file e │ │ │ -00001f90: 7870 616e 642d 6669 6c65 2d6e 616d 6520 xpand-file-name │ │ │ -00001fa0: 6669 6c65 2d6e 6577 6572 2d74 6861 6e2d file-newer-than- │ │ │ -00001fb0: 6669 6c65 2d70 2066 696c 652d 6e61 6d65 file-p file-name │ │ │ -00001fc0: 2d6e 6f6e 6469 7265 6374 6f72 7920 7265 -nondirectory re │ │ │ -00001fd0: 706c 6163 652d 696e 2d73 7472 696e 6720 place-in-string │ │ │ -00001fe0: 225c 5c2e 656c 633f 2422 2022 2220 6175 "\\.elc?$" "" au │ │ │ -00001ff0: 746f 6c6f 6164 2d74 7269 6d2d 6669 6c65 toload-trim-file │ │ │ -00002000: 2d6e 616d 6520 6e69 6c20 6765 742d 6669 -name nil get-fi │ │ │ -00002010: 6c65 2d62 7566 6665 7220 6669 6e64 2d66 le-buffer find-f │ │ │ -00002020: 696c 652d 6e6f 7365 6c65 6374 2073 6561 ile-noselect sea │ │ │ -00002030: 7263 682d 666f 7277 6172 6420 7420 3020 rch-forward t 0 │ │ │ -00002040: 7265 6164 2032 202d 2d63 6c2d 626c 6f63 read 2 --cl-bloc │ │ │ -00002050: 6b2d 6669 6e64 2d69 6e73 6572 7469 6f6e k-find-insertion │ │ │ -00002060: 2d70 6f69 6e74 2d2d 2028 6279 7465 2d63 -point-- (byte-c │ │ │ -00002070: 6f64 6520 2265 6288 c45c 6ec5 c623 ab9a ode "eb..\n..#.. │ │ │ -00002080: c770 2113 09c8 0b38 99ab 89c9 9462 88ca .p!....8.....b.. │ │ │ -00002090: cbc5 5c22 88c4 0821 88aa 5f60 6561 ad82 ..\"...!.._`ea.. │ │ │ -000020a0: 6462 8722 205b 6765 6e65 7261 7465 2d61 db." [generate-a │ │ │ -000020b0: 7574 6f6c 6f61 642d 7365 6374 696f 6e2d utoload-section- │ │ │ -000020c0: 7472 6169 6c65 7220 7472 696d 2d6e 616d trailer trim-nam │ │ │ -000020d0: 6520 6765 6e65 7261 7465 2d61 7574 6f6c e generate-autol │ │ │ -000020e0: 6f61 642d 7365 6374 696f 6e2d 6865 6164 oad-section-head │ │ │ -000020f0: 6572 2066 6f72 6d20 7365 6172 6368 2d66 er form search-f │ │ │ -00002100: 6f72 7761 7264 206e 696c 2074 2072 6561 orward nil t rea │ │ │ -00002110: 6420 3320 3020 7468 726f 7720 2d2d 636c d 3 0 throw --cl │ │ │ -00002120: 2d62 6c6f 636b 2d66 696e 642d 696e 7365 -block-find-inse │ │ │ -00002130: 7274 696f 6e2d 706f 696e 742d 2d5d 2034 rtion-point--] 4 │ │ │ -00002140: 2920 6765 6e65 7261 7465 2d66 696c 652d ) generate-file- │ │ │ -00002150: 6175 746f 6c6f 6164 7320 7361 7665 2d62 autoloads save-b │ │ │ -00002160: 7566 6665 7220 7472 696d 2d6e 616d 6520 uffer trim-name │ │ │ -00002170: 6669 6e64 2d66 696c 652d 686f 6f6b 7320 find-file-hooks │ │ │ -00002180: 6275 6666 6572 2d72 6561 642d 6f6e 6c79 buffer-read-only │ │ │ -00002190: 2067 656e 6572 6174 652d 6175 746f 6c6f generate-autolo │ │ │ -000021a0: 6164 2d73 6563 7469 6f6e 2d68 6561 6465 ad-section-heade │ │ │ -000021b0: 7220 6765 6e65 7261 7465 2d61 7574 6f6c r generate-autol │ │ │ -000021c0: 6f61 642d 7365 6374 696f 6e2d 7472 6169 oad-section-trai │ │ │ -000021d0: 6c65 725d 2034 2028 2324 202e 2037 3639 ler] 4 (#$ . 769 │ │ │ -000021e0: 3129 2022 6655 7064 6174 6520 6175 746f 1) "fUpdate auto │ │ │ -000021f0: 6c6f 6164 7320 666f 7220 6669 6c65 3a20 loads for file: │ │ │ -00002200: 225d 290a 2340 3737 2055 7064 6174 6520 "]).#@77 Update │ │ │ -00002210: 7365 6374 696f 6e73 206f 6620 7468 6520 sections of the │ │ │ -00002220: 6375 7272 656e 7420 6275 6666 6572 2067 current buffer g │ │ │ -00002230: 656e 6572 6174 6564 2062 7920 6075 7064 enerated by `upd │ │ │ -00002240: 6174 652d 6669 6c65 2d61 7574 6f6c 6f61 ate-file-autoloa │ │ │ -00002250: 6473 272e 1f0a 2864 6566 616c 6961 7320 ds'...(defalias │ │ │ -00002260: 2775 7064 6174 652d 6175 746f 6c6f 6164 'update-autoload │ │ │ -00002270: 732d 6865 7265 2023 5b6e 696c 2022 c620 s-here #[nil ". │ │ │ -00002280: 198a 6562 88c7 08c8 c923 adf1 c8ca cb8f ..eb.....#...... │ │ │ -00002290: 1bcc 0b38 891d 3bab 8acd 0d21 acc4 ce0d ...8..;....!.... │ │ │ -000022a0: 21ac bf0d 3bab a8cf 201e 1ed0 8ed1 d20d !...;... ....... │ │ │ -000022b0: 210e 1f5c 2289 1cad 94d3 d40c 21d5 5c22 !..\".......!.\" │ │ │ -000022c0: 14cd 0c21 ac85 ce0c 21ad 830c 8915 2bac ...!....!.....+. │ │ │ -000022d0: 93d6 d7d8 d90b 380d 2321 ab83 c9aa 84c8 ......8.#!...... │ │ │ -000022e0: dadb 8f15 0dab 8ddc 941a c70e 2021 885c ............ !.\ │ │ │ -000022f0: 6e60 7c88 290d 3bab 84dd 0d21 882a aa08 n`|.).;....!.*.. │ │ │ -00002300: 2a87 2220 5b67 656e 6572 6174 652d 6175 *." [generate-au │ │ │ -00002310: 746f 6c6f 6164 2d73 6563 7469 6f6e 2d68 toload-section-h │ │ │ -00002320: 6561 6465 7220 6765 6e65 7261 7465 642d eader generated- │ │ │ -00002330: 6175 746f 6c6f 6164 2d66 696c 6520 6265 autoload-file be │ │ │ -00002340: 6769 6e20 666f 726d 206c 6f63 2066 696c gin form loc fil │ │ │ -00002350: 6520 6275 6666 6572 2d66 696c 652d 6e61 e buffer-file-na │ │ │ -00002360: 6d65 2073 6561 7263 682d 666f 7277 6172 me search-forwar │ │ │ -00002370: 6420 6e69 6c20 7420 2862 7974 652d 636f d nil t (byte-co │ │ │ -00002380: 6465 2022 c070 2187 2220 5b72 6561 645d de ".p!." [read] │ │ │ -00002390: 2032 2920 2828 656e 642d 6f66 2d66 696c 2) ((end-of-fil │ │ │ -000023a0: 6529 2920 3320 6765 742d 6669 6c65 2d62 e)) 3 get-file-b │ │ │ -000023b0: 7566 6665 7220 6669 6c65 2d65 7869 7374 uffer file-exist │ │ │ -000023c0: 732d 7020 6d61 7463 682d 6461 7461 2028 s-p match-data ( │ │ │ -000023d0: 2873 746f 7265 2d6d 6174 6368 2d64 6174 (store-match-dat │ │ │ -000023e0: 6120 2331 3d23 3a6d 6174 6368 2d64 6174 a #1=#:match-dat │ │ │ -000023f0: 6129 2920 6c6f 6361 7465 2d66 696c 6520 a)) locate-file │ │ │ -00002400: 6669 6c65 2d6e 616d 652d 6e6f 6e64 6972 file-name-nondir │ │ │ -00002410: 6563 746f 7279 2065 7870 616e 642d 6669 ectory expand-fi │ │ │ -00002420: 6c65 2d6e 616d 6520 6175 746f 6c6f 6164 le-name autoload │ │ │ -00002430: 2d74 7269 6d2d 6669 6c65 2d6e 616d 6520 -trim-file-name │ │ │ -00002440: 222e 2e22 2079 2d6f 722d 6e2d 7020 666f ".." y-or-n-p fo │ │ │ -00002450: 726d 6174 2022 4361 6e27 7420 6669 6e64 rmat "Can't find │ │ │ -00002460: 206c 6962 7261 7279 2060 2573 273b 2072 library `%s'; r │ │ │ -00002470: 656d 6f76 6520 6974 7320 6175 746f 6c6f emove its autolo │ │ │ -00002480: 6164 733f 2022 2032 2028 6279 7465 2d63 ads? " 2 (byte-c │ │ │ -00002490: 6f64 6520 22c1 c2c3 c408 385c 22c5 89c6 ode ".....8\"... │ │ │ -000024a0: 2487 2220 5b66 6f72 6d20 7265 6164 2d66 $." [form read-f │ │ │ -000024b0: 696c 652d 6e61 6d65 2066 6f72 6d61 7420 ile-name format │ │ │ -000024c0: 2246 696e 6420 6025 7327 206c 6f61 6420 "Find `%s' load │ │ │ -000024d0: 6669 6c65 3a20 2220 3220 6e69 6c20 745d file: " 2 nil t] │ │ │ -000024e0: 2035 2920 2828 7175 6974 2929 2030 2067 5) ((quit)) 0 g │ │ │ -000024f0: 656e 6572 6174 652d 6669 6c65 2d61 7574 enerate-file-aut │ │ │ -00002500: 6f6c 6f61 6473 2023 3123 206c 6f61 642d oloads #1# load- │ │ │ -00002510: 7061 7468 2067 656e 6572 6174 652d 6175 path generate-au │ │ │ -00002520: 746f 6c6f 6164 2d73 6563 7469 6f6e 2d74 toload-section-t │ │ │ -00002530: 7261 696c 6572 5d20 3620 2823 2420 2e20 railer] 6 (#$ . │ │ │ -00002540: 3837 3133 2920 6e69 6c5d 290a 2340 3332 8713) nil]).#@32 │ │ │ -00002550: 3920 5570 6461 7465 2060 6765 6e65 7261 9 Update `genera │ │ │ -00002560: 7465 642d 6175 746f 6c6f 6164 2d66 696c ted-autoload-fil │ │ │ -00002570: 6527 2077 6974 6820 616c 6c20 7468 6520 e' with all the │ │ │ -00002580: 6375 7272 656e 7420 6175 746f 6c6f 6164 current autoload │ │ │ -00002590: 7320 6672 6f6d 2044 4952 2e0a 5468 6973 s from DIR..This │ │ │ -000025a0: 2072 756e 7320 6075 7064 6174 652d 6669 runs `update-fi │ │ │ -000025b0: 6c65 2d61 7574 6f6c 6f61 6473 2720 6f6e le-autoloads' on │ │ │ -000025c0: 2065 6163 6820 2e65 6c20 6669 6c65 2069 each .el file i │ │ │ -000025d0: 6e20 4449 522e 0a4f 6273 6f6c 6574 6520 n DIR..Obsolete │ │ │ -000025e0: 6175 746f 6c6f 6164 2065 6e74 7269 6573 autoload entries │ │ │ -000025f0: 2066 6f72 2066 696c 6573 2074 6861 7420 for files that │ │ │ -00002600: 6e6f 206c 6f6e 6765 7220 6578 6973 7420 no longer exist │ │ │ -00002610: 6172 6520 6465 6c65 7465 642e 0a4e 6f74 are deleted..Not │ │ │ -00002620: 6520 7468 6174 2c20 6966 2074 6869 7320 e that, if this │ │ │ -00002630: 6675 6e63 7469 6f6e 2069 7320 6361 6c6c function is call │ │ │ -00002640: 6564 2066 726f 6d20 6062 6174 6368 2d75 ed from `batch-u │ │ │ -00002650: 7064 6174 652d 6469 7265 6374 6f72 7927 pdate-directory' │ │ │ -00002660: 2c0a 6067 656e 6572 6174 6564 2d61 7574 ,.`generated-aut │ │ │ -00002670: 6f6c 6f61 642d 6669 6c65 2720 7761 7320 oload-file' was │ │ │ -00002680: 7265 626f 756e 6420 696e 2074 6861 7420 rebound in that │ │ │ -00002690: 6675 6e63 7469 6f6e 2e1f 0a28 6465 6661 function...(defa │ │ │ -000026a0: 6c69 6173 2027 7570 6461 7465 2d61 7574 lias 'update-aut │ │ │ -000026b0: 6f6c 6f61 6473 2d66 726f 6d2d 6469 7265 oloads-from-dire │ │ │ -000026c0: 6374 6f72 7920 235b 2864 6972 2920 22c6 ctory #[(dir) ". │ │ │ -000026d0: 0d21 15c7 c8c9 0d21 2121 ca18 1b8a ca1e .!.....!!!...... │ │ │ -000026e0: 19cb 0e1a 2171 8829 6562 88cc 0e1b cacd ....!q.)eb...... │ │ │ -000026f0: 23ab adce 941a cacf d08f 19d1 0938 891c #............8.. │ │ │ -00002700: 3bab 9ad2 0c21 0b98 ab93 d3c6 c80c 210d ;....!........!. │ │ │ -00002710: 5c22 21ac 89cc 0e1c 2188 5c6e 607c 882b \"!.....!.\n`|.+ │ │ │ -00002720: aa4b d4d5 d60d cdd7 235c 2288 0e1d 3fad .K......#\"...?. │ │ │ -00002730: 82d8 202b 8722 205b 656e 6162 6c65 2d6c .. +." [enable-l │ │ │ -00002740: 6f63 616c 2d65 7661 6c20 666f 726d 2062 ocal-eval form b │ │ │ -00002750: 6567 696e 2073 696d 706c 652d 6469 7220 egin simple-dir │ │ │ -00002760: 6669 6c65 2064 6972 2065 7870 616e 642d file dir expand- │ │ │ -00002770: 6669 6c65 2d6e 616d 6520 6669 6c65 2d6e file-name file-n │ │ │ -00002780: 616d 652d 6173 2d64 6972 6563 746f 7279 ame-as-directory │ │ │ -00002790: 2066 696c 652d 6e61 6d65 2d6e 6f6e 6469 file-name-nondi │ │ │ -000027a0: 7265 6374 6f72 7920 6469 7265 6374 6f72 rectory director │ │ │ -000027b0: 792d 6669 6c65 2d6e 616d 6520 6e69 6c20 y-file-name nil │ │ │ -000027c0: 6669 6e64 2d66 696c 652d 6e6f 7365 6c65 find-file-nosele │ │ │ -000027d0: 6374 2073 6561 7263 682d 666f 7277 6172 ct search-forwar │ │ │ -000027e0: 6420 7420 3020 2862 7974 652d 636f 6465 d t 0 (byte-code │ │ │ -000027f0: 2022 c070 2187 2220 5b72 6561 645d 2032 ".p!." [read] 2 │ │ │ -00002800: 2920 2828 656e 642d 6f66 2d66 696c 6529 ) ((end-of-file) │ │ │ -00002810: 2920 3320 6669 6c65 2d6e 616d 652d 6469 ) 3 file-name-di │ │ │ -00002820: 7265 6374 6f72 7920 6669 6c65 2d65 7869 rectory file-exi │ │ │ -00002830: 7374 732d 7020 6d61 7063 6172 2075 7064 sts-p mapcar upd │ │ │ -00002840: 6174 652d 6669 6c65 2d61 7574 6f6c 6f61 ate-file-autoloa │ │ │ -00002850: 6473 2064 6972 6563 746f 7279 2d66 696c ds directory-fil │ │ │ -00002860: 6573 2022 5e5b 5e3d 5d2e 2a5c 5c2e 656c es "^[^=].*\\.el │ │ │ -00002870: 2422 2073 6176 652d 6275 6666 6572 2066 $" save-buffer f │ │ │ -00002880: 696e 642d 6669 6c65 2d68 6f6f 6b73 2067 ind-file-hooks g │ │ │ -00002890: 656e 6572 6174 6564 2d61 7574 6f6c 6f61 enerated-autoloa │ │ │ -000028a0: 642d 6669 6c65 2067 656e 6572 6174 652d d-file generate- │ │ │ -000028b0: 6175 746f 6c6f 6164 2d73 6563 7469 6f6e autoload-section │ │ │ -000028c0: 2d68 6561 6465 7220 6765 6e65 7261 7465 -header generate │ │ │ -000028d0: 2d61 7574 6f6c 6f61 642d 7365 6374 696f -autoload-sectio │ │ │ -000028e0: 6e2d 7472 6169 6c65 7220 6e6f 6e69 6e74 n-trailer nonint │ │ │ -000028f0: 6572 6163 7469 7665 5d20 3720 2823 2420 eractive] 7 (#$ │ │ │ -00002900: 2e20 3935 3534 2920 2244 5570 6461 7465 . 9554) "DUpdate │ │ │ -00002910: 2061 7574 6f6c 6f61 6473 2066 6f72 2064 autoloads for d │ │ │ -00002920: 6972 6563 746f 7279 3a20 225d 290a 2340 irectory: "]).#@ │ │ │ -00002930: 3435 3520 5570 6461 7465 2074 6865 2061 455 Update the a │ │ │ -00002940: 7574 6f6c 6f61 6473 2066 6f72 2074 6865 utoloads for the │ │ │ -00002950: 2066 696c 6573 206f 7220 6469 7265 6374 files or direct │ │ │ -00002960: 6f72 6965 7320 6f6e 2074 6865 2063 6f6d ories on the com │ │ │ -00002970: 6d61 6e64 206c 696e 652e 0a52 756e 7320 mand line..Runs │ │ │ -00002980: 6075 7064 6174 652d 6669 6c65 2d61 7574 `update-file-aut │ │ │ -00002990: 6f6c 6f61 6473 2720 6f6e 2066 696c 6573 oloads' on files │ │ │ -000029a0: 2061 6e64 2060 7570 6461 7465 2d64 6972 and `update-dir │ │ │ -000029b0: 6563 746f 7279 2d61 7574 6f6c 6f61 6473 ectory-autoloads │ │ │ -000029c0: 270a 6f6e 2064 6972 6563 746f 7269 6573 '.on directories │ │ │ -000029d0: 2e20 204d 7573 7420 6265 2075 7365 6420 . Must be used │ │ │ -000029e0: 6f6e 6c79 2077 6974 6820 2d62 6174 6368 only with -batch │ │ │ -000029f0: 2c20 616e 6420 6b69 6c6c 7320 456d 6163 , and kills Emac │ │ │ -00002a00: 7320 6f6e 2063 6f6d 706c 6574 696f 6e2e s on completion. │ │ │ -00002a10: 0a45 6163 6820 6669 6c65 2077 696c 6c20 .Each file will │ │ │ -00002a20: 6265 2070 726f 6365 7373 6564 2065 7665 be processed eve │ │ │ -00002a30: 6e20 6966 2061 6e20 6572 726f 7220 6f63 n if an error oc │ │ │ -00002a40: 6375 7272 6564 2070 7265 7669 6f75 736c curred previousl │ │ │ -00002a50: 792e 0a46 6f72 2065 7861 6d70 6c65 2c20 y..For example, │ │ │ -00002a60: 696e 766f 6b65 2060 7865 6d61 6373 202d invoke `xemacs - │ │ │ -00002a70: 6261 7463 6820 2d66 2062 6174 6368 2d75 batch -f batch-u │ │ │ -00002a80: 7064 6174 652d 6175 746f 6c6f 6164 7320 pdate-autoloads │ │ │ -00002a90: 2a2e 656c 272e 0a54 6865 2064 6972 6563 *.el'..The direc │ │ │ -00002aa0: 746f 7279 2074 6f20 7768 6963 6820 7468 tory to which th │ │ │ -00002ab0: 6520 6175 746f 2d61 7574 6f6c 6f61 6473 e auto-autoloads │ │ │ -00002ac0: 2e65 6c20 6669 6c65 206d 7573 7420 6265 .el file must be │ │ │ -00002ad0: 2074 6865 2066 6972 7374 2070 6172 616d the first param │ │ │ -00002ae0: 6574 6572 0a6f 6e20 7468 6520 636f 6d6d eter.on the comm │ │ │ -00002af0: 616e 6420 6c69 6e65 2e1f 0a28 6465 6661 and line...(defa │ │ │ -00002b00: 6c69 6173 2027 6261 7463 682d 7570 6461 lias 'batch-upda │ │ │ -00002b10: 7465 2d61 7574 6f6c 6f61 6473 2023 5b6e te-autoloads #[n │ │ │ -00002b20: 696c 2022 09ac 84c6 c721 88c8 0821 c91e il ".....!...!.. │ │ │ -00002b30: 191b 0e1a c91d 891c abae 0c40 15ca 0d0b ...........@.... │ │ │ -00002b40: 5c22 15cb 0d21 ab8b cccd 0d5c 2288 ce0d \"...!.....\"... │ │ │ -00002b50: 2188 aa90 cf0d 21ab 86d0 0d21 88aa 85c6 !.....!....!.... │ │ │ -00002b60: d10d 5c22 880c 4189 14ac 522a d25c 6eab ..\"..A...R*.\n. │ │ │ -00002b70: 835c 6eaa 83d3 0b21 d450 2188 d5d6 2188 .\n....!.P!...!. │ │ │ -00002b80: d7d8 212a 8722 205b 6465 6661 756c 742d ..!*." [default- │ │ │ -00002b90: 6469 7265 6374 6f72 7920 6e6f 6e69 6e74 directory nonint │ │ │ -00002ba0: 6572 6163 7469 7665 2061 7574 6f6c 6f61 eractive autoloa │ │ │ -00002bb0: 642d 7061 636b 6167 652d 6e61 6d65 2064 d-package-name d │ │ │ -00002bc0: 6566 6469 7220 2331 3d23 3a2d 2d64 6f6c efdir #1=#:--dol │ │ │ -00002bd0: 6973 742d 7465 6d70 2d2d 3931 3532 3120 ist-temp--91521 │ │ │ -00002be0: 6172 6720 6572 726f 7220 2262 6174 6368 arg error "batch │ │ │ -00002bf0: 2d75 7064 6174 652d 6175 746f 6c6f 6164 -update-autoload │ │ │ -00002c00: 7320 6973 2074 6f20 6265 2075 7365 6420 s is to be used │ │ │ -00002c10: 6f6e 6c79 2077 6974 6820 2d62 6174 6368 only with -batch │ │ │ -00002c20: 2220 6469 7265 6374 6f72 792d 6669 6c65 " directory-file │ │ │ -00002c30: 2d6e 616d 6520 6e69 6c20 6578 7061 6e64 -name nil expand │ │ │ -00002c40: 2d66 696c 652d 6e61 6d65 2066 696c 652d -file-name file- │ │ │ -00002c50: 6469 7265 6374 6f72 792d 7020 6d65 7373 directory-p mess │ │ │ -00002c60: 6167 6520 2255 7064 6174 696e 6720 6175 age "Updating au │ │ │ -00002c70: 746f 6c6f 6164 7320 666f 7220 6469 7265 toloads for dire │ │ │ -00002c80: 6374 6f72 7920 2573 2e2e 2e22 2075 7064 ctory %s..." upd │ │ │ -00002c90: 6174 652d 6175 746f 6c6f 6164 732d 6672 ate-autoloads-fr │ │ │ -00002ca0: 6f6d 2d64 6972 6563 746f 7279 2066 696c om-directory fil │ │ │ -00002cb0: 652d 6578 6973 7473 2d70 2075 7064 6174 e-exists-p updat │ │ │ -00002cc0: 652d 6669 6c65 2d61 7574 6f6c 6f61 6473 e-file-autoloads │ │ │ -00002cd0: 2022 4e6f 2073 7563 6820 6669 6c65 206f "No such file o │ │ │ -00002ce0: 7220 6469 7265 6374 6f72 793a 2025 7322 r directory: %s" │ │ │ -00002cf0: 2066 6978 7570 2d61 7574 6f6c 6f61 642d fixup-autoload- │ │ │ -00002d00: 6275 6666 6572 2066 696c 652d 6e61 6d65 buffer file-name │ │ │ -00002d10: 2d6e 6f6e 6469 7265 6374 6f72 7920 222d -nondirectory "- │ │ │ -00002d20: 6175 746f 6c6f 6164 7322 2073 6176 652d autoloads" save- │ │ │ -00002d30: 736f 6d65 2d62 7566 6665 7273 2074 206b some-buffers t k │ │ │ -00002d40: 696c 6c2d 656d 6163 7320 3020 656e 6162 ill-emacs 0 enab │ │ │ -00002d50: 6c65 2d6c 6f63 616c 2d65 7661 6c20 636f le-local-eval co │ │ │ -00002d60: 6d6d 616e 642d 6c69 6e65 2d61 7267 732d mmand-line-args- │ │ │ -00002d70: 6c65 6674 5d20 3420 2823 2420 2e20 3130 left] 4 (#$ . 10 │ │ │ -00002d80: 3534 3829 5d29 0a28 6465 6661 6c69 6173 548)]).(defalias │ │ │ -00002d90: 2027 6669 7875 702d 6175 746f 6c6f 6164 'fixup-autoload │ │ │ -00002da0: 2d62 7566 6665 7220 235b 2873 796d 2920 -buffer #[(sym) │ │ │ -00002db0: 228a c208 2171 8865 6288 6564 553f ad9a "...!q.eb.edU?.. │ │ │ -00002dc0: c3c4 213f ad94 c563 88c6 09c7 b103 88c8 ..!?...c........ │ │ │ -00002dd0: 6388 6462 88c9 09ca b103 2987 2220 5b67 c.db......)." [g │ │ │ -00002de0: 656e 6572 6174 6564 2d61 7574 6f6c 6f61 enerated-autoloa │ │ │ -00002df0: 642d 6669 6c65 2073 796d 2066 696e 642d d-file sym find- │ │ │ -00002e00: 6669 6c65 2d6e 6f73 656c 6563 7420 6c6f file-noselect lo │ │ │ -00002e10: 6f6b 696e 672d 6174 2022 3b3b 3b20 444f oking-at ";;; DO │ │ │ -00002e20: 204e 4f54 204d 4f44 4946 5920 5448 4953 NOT MODIFY THIS │ │ │ -00002e30: 2046 494c 4522 2022 3b3b 3b20 444f 204e FILE" ";;; DO N │ │ │ -00002e40: 4f54 204d 4f44 4946 5920 5448 4953 2046 OT MODIFY THIS F │ │ │ -00002e50: 494c 455c 6e22 2022 2869 6620 2866 6561 ILE\n" "(if (fea │ │ │ -00002e60: 7475 7265 7020 2722 2022 2922 2022 2028 turep '" ")" " ( │ │ │ -00002e70: 6572 726f 7220 5c22 416c 7265 6164 7920 error \"Already │ │ │ -00002e80: 6c6f 6164 6564 5c22 2929 5c6e 2220 225c loaded\"))\n" "\ │ │ │ -00002e90: 6e28 7072 6f76 6964 6520 2722 2022 295c n(provide '" ")\ │ │ │ -00002ea0: 6e22 5d20 335d 290a 2862 7974 652d 636f n"] 3]).(byte-co │ │ │ -00002eb0: 6465 2022 c108 4210 c2c1 21ac 85c3 c1c4 de "..B...!..... │ │ │ -00002ec0: 5c22 88c4 8722 205b 6375 7272 656e 742d \"..." [current- │ │ │ -00002ed0: 6c6f 6164 2d6c 6973 7420 6175 746f 6c6f load-list autolo │ │ │ -00002ee0: 6164 2d70 6163 6b61 6765 2d6e 616d 6520 ad-package-name │ │ │ -00002ef0: 6465 6661 756c 742d 626f 756e 6470 2073 default-boundp s │ │ │ -00002f00: 6574 2d64 6566 6175 6c74 206e 696c 5d20 et-default nil] │ │ │ -00002f10: 3329 0a23 4031 3634 2055 7064 6174 6520 3).#@164 Update │ │ │ -00002f20: 7468 6520 6175 746f 6c6f 6164 7320 666f the autoloads fo │ │ │ -00002f30: 7220 7468 6520 6469 7265 6374 6f72 6965 r the directorie │ │ │ -00002f40: 7320 6f6e 2074 6865 2063 6f6d 6d61 6e64 s on the command │ │ │ -00002f50: 206c 696e 652e 0a52 756e 7320 6075 7064 line..Runs `upd │ │ │ -00002f60: 6174 652d 6669 6c65 2d61 7574 6f6c 6f61 ate-file-autoloa │ │ │ -00002f70: 6473 2720 6f6e 2065 6163 6820 6669 6c65 ds' on each file │ │ │ -00002f80: 2069 6e20 7468 6520 6769 7665 6e20 6469 in the given di │ │ │ -00002f90: 7265 6374 6f72 792c 2061 6e64 206d 7573 rectory, and mus │ │ │ -00002fa0: 740a 6265 2075 7365 6420 6f6e 6c79 2077 t.be used only w │ │ │ -00002fb0: 6974 6820 2d62 6174 6368 2e1f 0a28 6465 ith -batch...(de │ │ │ -00002fc0: 6661 6c69 6173 2027 6261 7463 682d 7570 falias 'batch-up │ │ │ -00002fd0: 6461 7465 2d64 6972 6563 746f 7279 2023 date-directory # │ │ │ -00002fe0: 5b6e 696c 2022 08ac 84c6 c721 880e 14c8 [nil ".....!.... │ │ │ -00002ff0: 1e15 1b5c 6ec8 1d89 1cab bd0c 4015 c90d ...\n.......@... │ │ │ -00003000: 0b5c 2215 c90e 160d 5c22 1e17 ca0d 21ab .\".....\"....!. │ │ │ -00003010: 8bcb cc0d 5c22 88cd 0d21 88aa 85c6 ce0d ....\"...!...... │ │ │ -00003020: 5c22 88cf 09ab 8309 aa83 d00d 21d1 5021 \"..........!.P! │ │ │ -00003030: 88d2 d321 8829 0c41 8914 ac43 2ac8 8912 ...!.).A...C*... │ │ │ -00003040: 2a87 2220 5b6e 6f6e 696e 7465 7261 6374 *." [noninteract │ │ │ -00003050: 6976 6520 6175 746f 6c6f 6164 2d70 6163 ive autoload-pac │ │ │ -00003060: 6b61 6765 2d6e 616d 6520 636f 6d6d 616e kage-name comman │ │ │ -00003070: 642d 6c69 6e65 2d61 7267 732d 6c65 6674 d-line-args-left │ │ │ -00003080: 2064 6566 6469 7220 2331 3d23 3a2d 2d64 defdir #1=#:--d │ │ │ -00003090: 6f6c 6973 742d 7465 6d70 2d2d 3931 3532 olist-temp--9152 │ │ │ -000030a0: 3220 6172 6720 6572 726f 7220 2262 6174 2 arg error "bat │ │ │ -000030b0: 6368 2d75 7064 6174 652d 6469 7265 6374 ch-update-direct │ │ │ -000030c0: 6f72 7920 6973 2074 6f20 6265 2075 7365 ory is to be use │ │ │ -000030d0: 6420 6f6e 6c79 2077 6974 6820 2d62 6174 d only with -bat │ │ │ -000030e0: 6368 2220 6e69 6c20 6578 7061 6e64 2d66 ch" nil expand-f │ │ │ -000030f0: 696c 652d 6e61 6d65 2066 696c 652d 6469 ile-name file-di │ │ │ -00003100: 7265 6374 6f72 792d 7020 6d65 7373 6167 rectory-p messag │ │ │ -00003110: 6520 2255 7064 6174 696e 6720 6175 746f e "Updating auto │ │ │ -00003120: 6c6f 6164 7320 696e 2064 6972 6563 746f loads in directo │ │ │ -00003130: 7279 2025 732e 2e2e 2220 7570 6461 7465 ry %s..." update │ │ │ -00003140: 2d61 7574 6f6c 6f61 6473 2d66 726f 6d2d -autoloads-from- │ │ │ -00003150: 6469 7265 6374 6f72 7920 224e 6f20 7375 directory "No su │ │ │ -00003160: 6368 2066 696c 6520 6f72 2064 6972 6563 ch file or direc │ │ │ -00003170: 746f 7279 3a20 2573 2220 6669 7875 702d tory: %s" fixup- │ │ │ -00003180: 6175 746f 6c6f 6164 2d62 7566 6665 7220 autoload-buffer │ │ │ -00003190: 6669 6c65 2d6e 616d 652d 6e6f 6e64 6972 file-name-nondir │ │ │ -000031a0: 6563 746f 7279 2022 2d61 7574 6f6c 6f61 ectory "-autoloa │ │ │ -000031b0: 6473 2220 7361 7665 2d73 6f6d 652d 6275 ds" save-some-bu │ │ │ -000031c0: 6666 6572 7320 7420 6465 6661 756c 742d ffers t default- │ │ │ -000031d0: 6469 7265 6374 6f72 7920 656e 6162 6c65 directory enable │ │ │ -000031e0: 2d6c 6f63 616c 2d65 7661 6c20 6175 746f -local-eval auto │ │ │ -000031f0: 6c6f 6164 2d66 696c 652d 6e61 6d65 2067 load-file-name g │ │ │ -00003200: 656e 6572 6174 6564 2d61 7574 6f6c 6f61 enerated-autoloa │ │ │ -00003210: 642d 6669 6c65 5d20 3420 2823 2420 2e20 d-file] 4 (#$ . │ │ │ -00003220: 3132 3035 3729 5d29 0a23 4031 3637 2055 12057)]).#@167 U │ │ │ -00003230: 7064 6174 6520 7468 6520 6175 746f 6c6f pdate the autolo │ │ │ -00003240: 6164 7320 666f 7220 6120 7369 6e67 6c65 ads for a single │ │ │ -00003250: 2064 6972 6563 746f 7279 206f 6e20 7468 directory on th │ │ │ -00003260: 6520 636f 6d6d 616e 6420 6c69 6e65 2e0a e command line.. │ │ │ -00003270: 5275 6e73 2060 7570 6461 7465 2d66 696c Runs `update-fil │ │ │ -00003280: 652d 6175 746f 6c6f 6164 7327 206f 6e20 e-autoloads' on │ │ │ -00003290: 6561 6368 2066 696c 6520 696e 2074 6865 each file in the │ │ │ -000032a0: 2067 6976 656e 2064 6972 6563 746f 7279 given directory │ │ │ -000032b0: 2c20 616e 6420 6d75 7374 0a62 6520 7573 , and must.be us │ │ │ -000032c0: 6564 206f 6e6c 7920 7769 7468 202d 6261 ed only with -ba │ │ │ -000032d0: 7463 682e 1f0a 2864 6566 616c 6961 7320 tch...(defalias │ │ │ -000032e0: 2762 6174 6368 2d75 7064 6174 652d 6f6e 'batch-update-on │ │ │ -000032f0: 652d 6469 7265 6374 6f72 7920 235b 6e69 e-directory #[ni │ │ │ -00003300: 6c20 2209 ac84 c6c7 2188 08c8 1e14 1b0c l ".....!....... │ │ │ -00003310: 401d 0c41 14c9 0d0b 5c22 15c9 0e15 0d5c @..A....\".....\ │ │ │ -00003320: 221e 16ca 0d21 ab8b cbcc 0d5c 2288 cd0d "....!.....\"... │ │ │ -00003330: 2188 aa85 c6ce 0d5c 2288 cf5c 6eab 835c !......\"..\n..\ │ │ │ -00003340: 6eaa 83d0 0d21 d150 2188 d2d3 212c 8722 n....!.P!...!,." │ │ │ -00003350: 205b 6465 6661 756c 742d 6469 7265 6374 [default-direct │ │ │ -00003360: 6f72 7920 6e6f 6e69 6e74 6572 6163 7469 ory noninteracti │ │ │ -00003370: 7665 2061 7574 6f6c 6f61 642d 7061 636b ve autoload-pack │ │ │ -00003380: 6167 652d 6e61 6d65 2064 6566 6469 7220 age-name defdir │ │ │ -00003390: 636f 6d6d 616e 642d 6c69 6e65 2d61 7267 command-line-arg │ │ │ -000033a0: 732d 6c65 6674 2061 7267 2065 7272 6f72 s-left arg error │ │ │ -000033b0: 2022 6261 7463 682d 7570 6461 7465 2d64 "batch-update-d │ │ │ -000033c0: 6972 6563 746f 7279 2069 7320 746f 2062 irectory is to b │ │ │ -000033d0: 6520 7573 6564 206f 6e6c 7920 7769 7468 e used only with │ │ │ -000033e0: 202d 6261 7463 6822 206e 696c 2065 7870 -batch" nil exp │ │ │ -000033f0: 616e 642d 6669 6c65 2d6e 616d 6520 6669 and-file-name fi │ │ │ -00003400: 6c65 2d64 6972 6563 746f 7279 2d70 206d le-directory-p m │ │ │ -00003410: 6573 7361 6765 2022 5570 6461 7469 6e67 essage "Updating │ │ │ -00003420: 2061 7574 6f6c 6f61 6473 2069 6e20 6469 autoloads in di │ │ │ -00003430: 7265 6374 6f72 7920 2573 2e2e 2e22 2075 rectory %s..." u │ │ │ -00003440: 7064 6174 652d 6175 746f 6c6f 6164 732d pdate-autoloads- │ │ │ -00003450: 6672 6f6d 2d64 6972 6563 746f 7279 2022 from-directory " │ │ │ -00003460: 4e6f 2073 7563 6820 6669 6c65 206f 7220 No such file or │ │ │ -00003470: 6469 7265 6374 6f72 793a 2025 7322 2066 directory: %s" f │ │ │ -00003480: 6978 7570 2d61 7574 6f6c 6f61 642d 6275 ixup-autoload-bu │ │ │ -00003490: 6666 6572 2066 696c 652d 6e61 6d65 2d6e ffer file-name-n │ │ │ -000034a0: 6f6e 6469 7265 6374 6f72 7920 222d 6175 ondirectory "-au │ │ │ -000034b0: 746f 6c6f 6164 7322 2073 6176 652d 736f toloads" save-so │ │ │ -000034c0: 6d65 2d62 7566 6665 7273 2074 2065 6e61 me-buffers t ena │ │ │ -000034d0: 626c 652d 6c6f 6361 6c2d 6576 616c 2061 ble-local-eval a │ │ │ -000034e0: 7574 6f6c 6f61 642d 6669 6c65 2d6e 616d utoload-file-nam │ │ │ -000034f0: 6520 6765 6e65 7261 7465 642d 6175 746f e generated-auto │ │ │ -00003500: 6c6f 6164 2d66 696c 655d 2033 2028 2324 load-file] 3 (#$ │ │ │ -00003510: 202e 2031 3238 3437 295d 290a 2870 726f . 12847)]).(pro │ │ │ -00003520: 7669 6465 2027 6175 746f 6c6f 6164 290a vide 'autoload). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3439 2032 3032 310a 3b3b 3b20 :08:49 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f61 7574 6f6c 6f61 642e 4/lisp/autoload. │ │ │ +00000090: 656c 0a3b 3b3b 2065 6d61 6373 2076 6572 el.;;; emacs ver │ │ │ +000000a0: 7369 6f6e 2032 312e 3420 2870 6174 6368 sion 21.4 (patch │ │ │ +000000b0: 2032 3429 2022 5374 616e 6461 7264 2043 24) "Standard C │ │ │ +000000c0: 2220 5845 6d61 6373 204c 7563 6964 2e0a " XEmacs Lucid.. │ │ │ +000000d0: 3b3b 3b20 6279 7465 636f 6d70 2076 6572 ;;; bytecomp ver │ │ │ +000000e0: 7369 6f6e 2032 2e32 3720 5845 6d61 6373 sion 2.27 XEmacs │ │ │ +000000f0: 3b20 3230 3030 2d30 392d 3132 2e0a 3b3b ; 2000-09-12..;; │ │ │ +00000100: 3b20 6f70 7469 6d69 7a61 7469 6f6e 2069 ; optimization i │ │ │ +00000110: 7320 6f6e 2e0a 3b3b 3b20 7468 6973 2066 s on..;;; this f │ │ │ +00000120: 696c 6520 7573 6573 206f 7063 6f64 6573 ile uses opcodes │ │ │ +00000130: 2077 6869 6368 2064 6f20 6e6f 7420 6578 which do not ex │ │ │ +00000140: 6973 7420 696e 2045 6d61 6373 2031 392e ist in Emacs 19. │ │ │ +00000150: 0a0a 2869 6620 2861 6e64 2028 626f 756e ..(if (and (boun │ │ │ +00000160: 6470 2027 656d 6163 732d 7665 7273 696f dp 'emacs-versio │ │ │ +00000170: 6e29 0a09 2028 6f72 2028 616e 6420 2862 n).. (or (and (b │ │ │ +00000180: 6f75 6e64 7020 2765 706f 6368 3a3a 7665 oundp 'epoch::ve │ │ │ +00000190: 7273 696f 6e29 2065 706f 6368 3a3a 7665 rsion) epoch::ve │ │ │ +000001a0: 7273 696f 6e29 0a09 2020 2020 2028 7374 rsion).. (st │ │ │ +000001b0: 7269 6e67 2d6c 6573 7370 2065 6d61 6373 ring-lessp emacs │ │ │ +000001c0: 2d76 6572 7369 6f6e 2022 3230 2229 2929 -version "20"))) │ │ │ +000001d0: 0a20 2020 2028 6572 726f 7220 2260 6175 . (error "`au │ │ │ +000001e0: 746f 6c6f 6164 2e65 6c27 2077 6173 2063 toload.el' was c │ │ │ +000001f0: 6f6d 7069 6c65 6420 666f 7220 456d 6163 ompiled for Emac │ │ │ +00000200: 7320 3230 2229 290a 0a28 6f72 2028 626f s 20"))..(or (bo │ │ │ +00000210: 756e 6470 2027 6375 7272 656e 742d 6c6f undp 'current-lo │ │ │ +00000220: 6164 2d6c 6973 7429 2028 7365 7471 2063 ad-list) (setq c │ │ │ +00000230: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ +00000240: 206e 696c 2929 0a0a 0a28 6279 7465 2d63 nil))...(byte-c │ │ │ +00000250: 6f64 6520 22c1 c221 88c3 c4c5 8f88 c6c7 ode "..!........ │ │ │ +00000260: 2184 9100 c708 4210 c8c7 c9ca 2388 cbc7 !.....B.....#... │ │ │ +00000270: 21ac 85cc c7cd 5c22 88ce 0842 10c8 cec9 !.....\"...B.... │ │ │ +00000280: cf23 88cb ce21 ac85 ccce d05c 2288 c8d1 .#...!.....\"... │ │ │ +00000290: d2d3 2388 c8d4 d2d3 2388 c8d5 d2d3 2388 ..#.....#.....#. │ │ │ +000002a0: c8d6 d2d3 2388 c8d7 d2d3 2388 c8d8 d2d3 ....#.....#..... │ │ │ +000002b0: 2388 c8d9 d2d3 2388 c8da d2d3 2388 c8db #.....#.....#... │ │ │ +000002c0: d2d3 2388 c8dc d2dd 2388 c8de d2df 2388 ..#.....#.....#. │ │ │ +000002d0: c8e0 d2dd 2388 c8e1 d2dd 2388 c8e2 d2e3 ....#.....#..... │ │ │ +000002e0: 2388 c8e4 d2e5 2388 c387 2220 5b63 7572 #.....#..." [cur │ │ │ +000002f0: 7265 6e74 2d6c 6f61 642d 6c69 7374 2072 rent-load-list r │ │ │ +00000300: 6571 7569 7265 2065 6173 792d 6d6d 6f64 equire easy-mmod │ │ │ +00000310: 6520 6e69 6c20 2862 7974 652d 636f 6465 e nil (byte-code │ │ │ +00000320: 2022 c0c1 2187 2220 5b72 6571 7569 7265 "..!." [require │ │ │ +00000330: 2061 7574 6f6c 6f61 642d 6f70 6572 6174 autoload-operat │ │ │ +00000340: 6f72 735d 2032 2920 2828 6572 726f 7229 ors] 2) ((error) │ │ │ +00000350: 2920 626f 756e 6470 2061 7574 6f6c 6f61 ) boundp autoloa │ │ │ +00000360: 642d 6d61 6b65 2d61 7574 6f6c 6f61 642d d-make-autoload- │ │ │ +00000370: 6f70 6572 6174 6f72 7320 7075 7420 7661 operators put va │ │ │ +00000380: 7269 6162 6c65 2d64 6f63 756d 656e 7461 riable-documenta │ │ │ +00000390: 7469 6f6e 2022 6064 6566 756e 272d 6c69 tion "`defun'-li │ │ │ +000003a0: 6b65 206f 7065 7261 746f 7273 2074 6861 ke operators tha │ │ │ +000003b0: 7420 7573 6520 6061 7574 6f6c 6f61 6427 t use `autoload' │ │ │ +000003c0: 2074 6f20 6c6f 6164 2074 6865 206c 6962 to load the lib │ │ │ +000003d0: 7261 7279 2e22 2064 6566 6175 6c74 2d62 rary." default-b │ │ │ +000003e0: 6f75 6e64 7020 7365 742d 6465 6661 756c oundp set-defaul │ │ │ +000003f0: 7420 2864 6566 756e 2064 6566 696e 652d t (defun define- │ │ │ +00000400: 736b 656c 6574 6f6e 2064 6566 6d61 6372 skeleton defmacr │ │ │ +00000410: 6f20 6465 6669 6e65 2d64 6572 6976 6564 o define-derived │ │ │ +00000420: 2d6d 6f64 6520 6465 6669 6e65 2d67 656e -mode define-gen │ │ │ +00000430: 6572 6963 2d6d 6f64 6520 6561 7379 2d6d eric-mode easy-m │ │ │ +00000440: 6d6f 6465 2d64 6566 696e 652d 6d69 6e6f mode-define-mino │ │ │ +00000450: 722d 6d6f 6465 2065 6173 792d 6d6d 6f64 r-mode easy-mmod │ │ │ +00000460: 652d 6465 6669 6e65 2d67 6c6f 6261 6c2d e-define-global- │ │ │ +00000470: 6d6f 6465 2064 6566 696e 652d 6d69 6e6f mode define-mino │ │ │ +00000480: 722d 6d6f 6465 2064 6566 756e 2a20 6465 r-mode defun* de │ │ │ +00000490: 666d 6163 726f 2a29 2061 7574 6f6c 6f61 fmacro*) autoloa │ │ │ +000004a0: 642d 6d61 6b65 2d61 7574 6f6c 6f61 642d d-make-autoload- │ │ │ +000004b0: 636f 6d70 6c65 782d 6f70 6572 6174 6f72 complex-operator │ │ │ +000004c0: 7320 2260 6465 6675 6e27 2d6c 696b 6520 s "`defun'-like │ │ │ +000004d0: 6f70 6572 6174 6f72 7320 746f 206d 6163 operators to mac │ │ │ +000004e0: 726f 6578 7061 6e64 2062 6566 6f72 6520 roexpand before │ │ │ +000004f0: 7573 696e 6720 6061 7574 6f6c 6f61 6427 using `autoload' │ │ │ +00000500: 2e22 2028 6561 7379 2d6d 6d6f 6465 2d64 ." (easy-mmode-d │ │ │ +00000510: 6566 696e 652d 6d69 6e6f 722d 6d6f 6465 efine-minor-mode │ │ │ +00000520: 2065 6173 792d 6d6d 6f64 652d 6465 6669 easy-mmode-defi │ │ │ +00000530: 6e65 2d67 6c6f 6261 6c2d 6d6f 6465 2064 ne-global-mode d │ │ │ +00000540: 6566 696e 652d 6d69 6e6f 722d 6d6f 6465 efine-minor-mode │ │ │ +00000550: 2920 6175 746f 6c6f 6164 2064 6f63 2d73 ) autoload doc-s │ │ │ +00000560: 7472 696e 672d 656c 7420 3320 6465 6675 tring-elt 3 defu │ │ │ +00000570: 6e20 6465 6675 6e2a 2064 6566 7661 7220 n defun* defvar │ │ │ +00000580: 6465 6663 7573 746f 6d20 6465 6663 6f6e defcustom defcon │ │ │ +00000590: 7374 2064 6566 6d61 6372 6f20 6465 666d st defmacro defm │ │ │ +000005a0: 6163 726f 2a20 6465 6673 7562 7374 2064 acro* defsubst d │ │ │ +000005b0: 6566 696e 652d 736b 656c 6574 6f6e 2032 efine-skeleton 2 │ │ │ +000005c0: 2064 6566 696e 652d 6465 7269 7665 642d define-derived- │ │ │ +000005d0: 6d6f 6465 2034 2065 6173 792d 6d6d 6f64 mode 4 easy-mmod │ │ │ +000005e0: 652d 6465 6669 6e65 2d6d 696e 6f72 2d6d e-define-minor-m │ │ │ +000005f0: 6f64 6520 6465 6669 6e65 2d6d 696e 6f72 ode define-minor │ │ │ +00000600: 2d6d 6f64 6520 6465 6669 6e65 2d67 656e -mode define-gen │ │ │ +00000610: 6572 6963 2d6d 6f64 6520 3720 6561 7379 eric-mode 7 easy │ │ │ +00000620: 2d6d 6d6f 6465 2d64 6566 696e 652d 676c -mmode-define-gl │ │ │ +00000630: 6f62 616c 2d6d 6f64 6520 3130 3030 5d20 obal-mode 1000] │ │ │ +00000640: 3429 0a23 4031 3736 2054 7572 6e20 464f 4).#@176 Turn FO │ │ │ +00000650: 524d 2069 6e74 6f20 616e 2061 7574 6f6c RM into an autol │ │ │ +00000660: 6f61 6420 6f72 2064 6566 7661 7220 666f oad or defvar fo │ │ │ +00000670: 7220 736f 7572 6365 2066 696c 6520 4649 r source file FI │ │ │ +00000680: 4c45 2e0a 5265 7475 726e 7320 6e69 6c20 LE..Returns nil │ │ │ +00000690: 6966 2046 4f52 4d20 6973 206e 6f74 2061 if FORM is not a │ │ │ +000006a0: 2073 7065 6369 616c 2061 7574 6f6c 6f61 special autoloa │ │ │ +000006b0: 6420 666f 726d 2028 692e 652e 2061 2066 d form (i.e. a f │ │ │ +000006c0: 756e 6374 696f 6e20 6465 6669 6e69 7469 unction definiti │ │ │ +000006d0: 6f6e 0a6f 7220 6d61 6372 6f20 6465 6669 on.or macro defi │ │ │ +000006e0: 6e69 7469 6f6e 206f 7220 6120 6465 6663 nition or a defc │ │ │ +000006f0: 7573 746f 6d29 2e1f 0a28 6465 6661 6c69 ustom)...(defali │ │ │ +00000700: 6173 2027 6d61 6b65 2d61 7574 6f6c 6f61 as 'make-autoloa │ │ │ +00000710: 6420 235b 2866 6f72 6d20 6669 6c65 2920 d #[(form file) │ │ │ +00000720: 220d a2c6 1b89 1c0e 2473 abab 0e21 1e25 ".......$s...!.% │ │ │ +00000730: c70d 2129 8913 ab9f 0b40 c861 ab99 c90b ..!).....@.a.... │ │ │ +00000740: 73ab 94c9 0b73 891e 26c6 a188 c8ca cb0b s....s..&....... │ │ │ +00000750: 415c 2229 4282 de00 0c0e 2773 abc5 0ccc A\")B.....'s.... │ │ │ +00000760: 731e 230d 4140 180c cd4e 0d9b 891e 1f40 s.#.A@...N.....@ │ │ │ +00000770: 3bad 870e 1f89 4116 1f40 1ace 083c ab83 ;.....A..@...<.. │ │ │ +00000780: 08aa 83cf 0844 0e21 5c6e 0cd0 73ab 83d1 .....D.!\n..s... │ │ │ +00000790: aa86 0e1f 40a2 d261 0e23 ad83 cfd3 44af ....@..a.#....D. │ │ │ +000007a0: 062c aadd 0cd4 61ab c80d a3a2 0da3 a3a2 .,....a......... │ │ │ +000007b0: 0da3 a3a3 a20d a3a3 a3a3 1e20 1a1e 5c22 ........... ..\" │ │ │ +000007c0: 19d5 0e20 d65c 22ac 88d7 090e 5c22 5c6e ... .\".....\"\n │ │ │ +000007d0: 46aa 9fc8 d709 0e5c 225c 6e46 d8d5 0e20 F......\"\nF... │ │ │ +000007e0: d95c 22cf 0944 da42 4242 dbcf 0944 d50e .\"..D.BBB...D.. │ │ │ +000007f0: 20d6 5c22 4546 2caa 900c dc73 ad8b dd0d .\"EF,....s.... │ │ │ +00000800: 4140 cfde 0e21 4444 452a 8722 205b 6e61 A@...!DDE*." [na │ │ │ +00000810: 6d65 2076 6172 6e61 6d65 2064 6f63 2065 me varname doc e │ │ │ +00000820: 7870 616e 6420 6361 7220 666f 726d 206e xpand car form n │ │ │ +00000830: 696c 206d 6163 726f 6578 7061 6e64 2070 il macroexpand p │ │ │ +00000840: 726f 676e 203a 6175 746f 6c6f 6164 2d65 rogn :autoload-e │ │ │ +00000850: 6e64 206d 6170 6361 7220 235b 2866 6f72 nd mapcar #[(for │ │ │ +00000860: 6d29 2022 c209 085c 2287 2220 5b66 696c m) "...\"." [fil │ │ │ +00000870: 6520 666f 726d 206d 616b 652d 6175 746f e form make-auto │ │ │ +00000880: 6c6f 6164 5d20 335d 2028 6465 666d 6163 load] 3] (defmac │ │ │ +00000890: 726f 2064 6566 6d61 6372 6f2a 2920 646f ro defmacro*) do │ │ │ +000008a0: 632d 7374 7269 6e67 2d65 6c74 2061 7574 c-string-elt aut │ │ │ +000008b0: 6f6c 6f61 6420 7175 6f74 6520 2864 6566 oload quote (def │ │ │ +000008c0: 696e 652d 736b 656c 6574 6f6e 2064 6566 ine-skeleton def │ │ │ +000008d0: 696e 652d 6465 7269 7665 642d 6d6f 6465 ine-derived-mode │ │ │ +000008e0: 2064 6566 696e 652d 6765 6e65 7269 632d define-generic- │ │ │ +000008f0: 6d6f 6465 2065 6173 792d 6d6d 6f64 652d mode easy-mmode- │ │ │ +00000900: 6465 6669 6e65 2d67 6c6f 6261 6c2d 6d6f define-global-mo │ │ │ +00000910: 6465 2065 6173 792d 6d6d 6f64 652d 6465 de easy-mmode-de │ │ │ +00000920: 6669 6e65 2d6d 696e 6f72 2d6d 6f64 6520 fine-minor-mode │ │ │ +00000930: 6465 6669 6e65 2d6d 696e 6f72 2d6d 6f64 define-minor-mod │ │ │ +00000940: 6529 2074 2069 6e74 6572 6163 7469 7665 e) t interactive │ │ │ +00000950: 206d 6163 726f 2064 6566 6375 7374 6f6d macro defcustom │ │ │ +00000960: 2070 6c69 7374 2d67 6574 203a 7265 7175 plist-get :requ │ │ │ +00000970: 6972 6520 6465 6676 6172 2063 7573 746f ire defvar custo │ │ │ +00000980: 6d2d 6164 642d 746f 2d67 726f 7570 203a m-add-to-group : │ │ │ +00000990: 6772 6f75 7020 2827 6375 7374 6f6d 2d76 group ('custom-v │ │ │ +000009a0: 6172 6961 626c 6529 2063 7573 746f 6d2d ariable) custom- │ │ │ +000009b0: 6164 642d 6c6f 6164 2028 6d61 6b65 2d63 add-load (make-c │ │ │ +000009c0: 6f64 696e 672d 7379 7374 656d 206d 616b oding-system mak │ │ │ +000009d0: 652d 382d 6269 742d 636f 6469 6e67 2d73 e-8-bit-coding-s │ │ │ +000009e0: 7973 7465 6d29 2061 7574 6f6c 6f61 642d ystem) autoload- │ │ │ +000009f0: 636f 6469 6e67 2d73 7973 7465 6d20 6c6f coding-system lo │ │ │ +00000a00: 6164 2062 6f64 7920 7265 7374 2066 696c ad body rest fil │ │ │ +00000a10: 6520 696e 6974 206d 6163 726f 7020 6175 e init macrop au │ │ │ +00000a20: 746f 6c6f 6164 2d6d 616b 652d 6175 746f toload-make-auto │ │ │ +00000a30: 6c6f 6164 2d63 6f6d 706c 6578 2d6f 7065 load-complex-ope │ │ │ +00000a40: 7261 746f 7273 206c 6f61 642d 6669 6c65 rators load-file │ │ │ +00000a50: 2d6e 616d 6520 656e 6420 6175 746f 6c6f -name end autolo │ │ │ +00000a60: 6164 2d6d 616b 652d 6175 746f 6c6f 6164 ad-make-autoload │ │ │ +00000a70: 2d6f 7065 7261 746f 7273 5d20 3920 2823 -operators] 9 (# │ │ │ +00000a80: 2420 2e20 3136 3039 295d 290a 2340 3535 $ . 1609)]).#@55 │ │ │ +00000a90: 3320 4d61 6769 6320 636f 6d6d 656e 7420 3 Magic comment │ │ │ +00000aa0: 696e 6469 6361 7469 6e67 2074 6865 2066 indicating the f │ │ │ +00000ab0: 6f6c 6c6f 7769 6e67 2066 6f72 6d20 7368 ollowing form sh │ │ │ +00000ac0: 6f75 6c64 2062 6520 6175 746f 6c6f 6164 ould be autoload │ │ │ +00000ad0: 6564 2e0a 5573 6564 2062 7920 6075 7064 ed..Used by `upd │ │ │ +00000ae0: 6174 652d 6669 6c65 2d61 7574 6f6c 6f61 ate-file-autoloa │ │ │ +00000af0: 6473 272e 2020 5468 6973 2073 7472 696e ds'. This strin │ │ │ +00000b00: 6720 7368 6f75 6c64 2062 650a 6d65 616e g should be.mean │ │ │ +00000b10: 696e 676c 6573 7320 746f 204c 6973 7020 ingless to Lisp │ │ │ +00000b20: 2865 2e67 2e2c 2061 2063 6f6d 6d65 6e74 (e.g., a comment │ │ │ +00000b30: 292e 0a0a 5468 6973 2073 7472 696e 6720 )...This string │ │ │ +00000b40: 6973 2075 7365 643a 0a0a 3b3b 3b23 2323 is used:..;;;### │ │ │ +00000b50: 6175 746f 6c6f 6164 0a28 6465 6675 6e20 autoload.(defun │ │ │ +00000b60: 6675 6e63 7469 6f6e 2d74 6f2d 6265 2d61 function-to-be-a │ │ │ +00000b70: 7574 6f6c 6f61 6465 6420 2829 202e 2e2e utoloaded () ... │ │ │ +00000b80: 290a 0a49 6620 7468 6973 2073 7472 696e )..If this strin │ │ │ +00000b90: 6720 6170 7065 6172 7320 616c 6f6e 6520 g appears alone │ │ │ +00000ba0: 6f6e 2061 206c 696e 652c 2074 6865 2066 on a line, the f │ │ │ +00000bb0: 6f6c 6c6f 7769 6e67 2066 6f72 6d20 7769 ollowing form wi │ │ │ +00000bc0: 6c6c 2062 650a 7265 6164 2061 6e64 2061 ll be.read and a │ │ │ +00000bd0: 6e20 6175 746f 6c6f 6164 206d 6164 6520 n autoload made │ │ │ +00000be0: 666f 7220 6974 2e20 2049 6620 6974 2069 for it. If it i │ │ │ +00000bf0: 7320 666f 6c6c 6f77 6564 2062 7920 7468 s followed by th │ │ │ +00000c00: 6520 7374 7269 6e67 0a22 696d 6d65 6469 e string."immedi │ │ │ +00000c10: 6174 6522 2c20 7468 656e 2074 6865 2066 ate", then the f │ │ │ +00000c20: 6f72 6d20 6f6e 2074 6865 2066 6f6c 6c6f orm on the follo │ │ │ +00000c30: 7769 6e67 206c 696e 6520 7769 6c6c 2062 wing line will b │ │ │ +00000c40: 6520 636f 7069 6564 0a76 6572 6261 7469 e copied.verbati │ │ │ +00000c50: 6d2e 2020 4966 2074 6865 7265 2069 7320 m. If there is │ │ │ +00000c60: 6675 7274 6865 7220 7465 7874 206f 6e20 further text on │ │ │ +00000c70: 7468 6520 6c69 6e65 2c20 7468 6174 2074 the line, that t │ │ │ +00000c80: 6578 7420 7769 6c6c 2062 650a 636f 7069 ext will be.copi │ │ │ +00000c90: 6564 2076 6572 6261 7469 6d20 746f 2060 ed verbatim to ` │ │ │ +00000ca0: 6765 6e65 7261 7465 642d 6175 746f 6c6f generated-autolo │ │ │ +00000cb0: 6164 2d66 696c 6527 2e1f 0a28 6465 6676 ad-file'...(defv │ │ │ +00000cc0: 6172 2067 656e 6572 6174 652d 6175 746f ar generate-auto │ │ │ +00000cd0: 6c6f 6164 2d63 6f6f 6b69 6520 223b 3b3b load-cookie ";;; │ │ │ +00000ce0: 2323 2361 7574 6f6c 6f61 6422 2028 2324 ###autoload" (#$ │ │ │ +00000cf0: 202e 2032 3730 3629 290a 2340 3832 2053 . 2706)).#@82 S │ │ │ +00000d00: 7472 696e 6720 696e 7365 7274 6564 2062 tring inserted b │ │ │ +00000d10: 6566 6f72 6520 7468 6520 666f 726d 2069 efore the form i │ │ │ +00000d20: 6465 6e74 6966 7969 6e67 0a74 6865 2073 dentifying.the s │ │ │ +00000d30: 6563 7469 6f6e 206f 6620 6175 746f 6c6f ection of autolo │ │ │ +00000d40: 6164 7320 666f 7220 6120 6669 6c65 2e1f ads for a file.. │ │ │ +00000d50: 0a28 6465 6676 6172 2067 656e 6572 6174 .(defvar generat │ │ │ +00000d60: 652d 6175 746f 6c6f 6164 2d73 6563 7469 e-autoload-secti │ │ │ +00000d70: 6f6e 2d68 6561 6465 7220 220c 5c6e 3b3b on-header ".\n;; │ │ │ +00000d80: 3b23 2323 2022 2028 2324 202e 2033 3332 ;### " (#$ . 332 │ │ │ +00000d90: 3729 290a 2340 3732 2053 7472 696e 6720 7)).#@72 String │ │ │ +00000da0: 7768 6963 6820 696e 6469 6361 7465 7320 which indicates │ │ │ +00000db0: 7468 6520 656e 6420 6f66 2074 6865 2073 the end of the s │ │ │ +00000dc0: 6563 7469 6f6e 206f 6620 6175 746f 6c6f ection of autolo │ │ │ +00000dd0: 6164 7320 666f 7220 6120 6669 6c65 2e1f ads for a file.. │ │ │ +00000de0: 0a28 6465 6676 6172 2067 656e 6572 6174 .(defvar generat │ │ │ +00000df0: 652d 6175 746f 6c6f 6164 2d73 6563 7469 e-autoload-secti │ │ │ +00000e00: 6f6e 2d74 7261 696c 6572 2022 5c6e 3b3b on-trailer "\n;; │ │ │ +00000e10: 3b2a 2a2a 5c6e 2220 2823 2420 2e20 3334 ;***\n" (#$ . 34 │ │ │ +00000e20: 3831 2929 0a28 6279 7465 2d63 6f64 6520 81)).(byte-code │ │ │ +00000e30: 22c1 0842 10c2 c121 ac85 c3c1 c45c 2288 "..B...!.....\". │ │ │ +00000e40: c487 2220 5b63 7572 7265 6e74 2d6c 6f61 .." [current-loa │ │ │ +00000e50: 642d 6c69 7374 2061 7574 6f6c 6f61 642d d-list autoload- │ │ │ +00000e60: 7061 636b 6167 652d 6e61 6d65 2064 6566 package-name def │ │ │ +00000e70: 6175 6c74 2d62 6f75 6e64 7020 7365 742d ault-boundp set- │ │ │ +00000e80: 6465 6661 756c 7420 6e69 6c5d 2033 290a default nil] 3). │ │ │ +00000e90: 2340 3637 2052 6574 7572 6e73 2061 2072 #@67 Returns a r │ │ │ +00000ea0: 656c 6174 6976 6520 7061 7468 6e61 6d65 elative pathname │ │ │ +00000eb0: 206f 6620 4649 4c45 2069 6e63 6c75 6469 of FILE includi │ │ │ +00000ec0: 6e67 2074 6865 206c 6173 7420 6469 7265 ng the last dire │ │ │ +00000ed0: 6374 6f72 792e 1f0a 2864 6566 616c 6961 ctory...(defalia │ │ │ +00000ee0: 7320 2761 7574 6f6c 6f61 642d 7472 696d s 'autoload-trim │ │ │ +00000ef0: 2d66 696c 652d 6e61 6d65 2023 5b28 6669 -file-name #[(fi │ │ │ +00000f00: 6c65 2920 22c1 0821 10c2 c308 c4c5 c408 le) "..!........ │ │ │ +00000f10: 2121 215c 22c6 c723 8722 205b 6669 6c65 !!!\"..#." [file │ │ │ +00000f20: 2065 7870 616e 642d 6669 6c65 2d6e 616d expand-file-nam │ │ │ +00000f30: 6520 7265 706c 6163 652d 696e 2d73 7472 e replace-in-str │ │ │ +00000f40: 696e 6720 6669 6c65 2d72 656c 6174 6976 ing file-relativ │ │ │ +00000f50: 652d 6e61 6d65 2066 696c 652d 6e61 6d65 e-name file-name │ │ │ +00000f60: 2d64 6972 6563 746f 7279 2064 6972 6563 -directory direc │ │ │ +00000f70: 746f 7279 2d66 696c 652d 6e61 6d65 2022 tory-file-name " │ │ │ +00000f80: 5c5c 5c5c 2220 222f 225d 2037 2028 2324 \\\\" "/"] 7 (#$ │ │ │ +00000f90: 202e 2033 3733 3329 5d29 0a23 4032 3337 . 3733)]).#@237 │ │ │ +00000fa0: 2049 6e73 6572 7420 6174 2070 6f69 6e74 Insert at point │ │ │ +00000fb0: 2061 206c 6f61 6464 6566 7320 6175 746f a loaddefs auto │ │ │ +00000fc0: 6c6f 6164 2073 6563 7469 6f6e 2066 6f72 load section for │ │ │ +00000fd0: 2046 494c 452e 0a61 7574 6f6c 6f61 6473 FILE..autoloads │ │ │ +00000fe0: 2061 7265 2067 656e 6572 6174 6564 2066 are generated f │ │ │ +00000ff0: 6f72 2064 6566 756e 7320 616e 6420 6465 or defuns and de │ │ │ +00001000: 666d 6163 726f 7320 696e 2046 494c 450a fmacros in FILE. │ │ │ +00001010: 6d61 726b 6564 2062 7920 6067 656e 6572 marked by `gener │ │ │ +00001020: 6174 652d 6175 746f 6c6f 6164 2d63 6f6f ate-autoload-coo │ │ │ +00001030: 6b69 6527 2028 7768 6963 6820 7365 6529 kie' (which see) │ │ │ +00001040: 2e0a 4966 2046 494c 4520 6973 2062 6569 ..If FILE is bei │ │ │ +00001050: 6e67 2076 6973 6974 6564 2069 6e20 6120 ng visited in a │ │ │ +00001060: 6275 6666 6572 2c20 7468 6520 636f 6e74 buffer, the cont │ │ │ +00001070: 656e 7473 206f 6620 7468 6520 6275 6666 ents of the buff │ │ │ +00001080: 6572 0a61 7265 2075 7365 642e 1f0a 2864 er.are used...(d │ │ │ +00001090: 6566 616c 6961 7320 2767 656e 6572 6174 efalias 'generat │ │ │ +000010a0: 652d 6669 6c65 2d61 7574 6f6c 6f61 6473 e-file-autoloads │ │ │ +000010b0: 2023 5b28 6669 6c65 2026 6f70 7469 6f6e #[(file &option │ │ │ +000010c0: 616c 2066 756e 6c69 7374 2920 22c2 0908 al funlist) "... │ │ │ +000010d0: 5c22 8722 205b 6675 6e6c 6973 7420 6669 \"." [funlist fi │ │ │ +000010e0: 6c65 2067 656e 6572 6174 652d 6669 6c65 le generate-file │ │ │ +000010f0: 2d61 7574 6f6c 6f61 6473 2d31 5d20 3320 -autoloads-1] 3 │ │ │ +00001100: 2823 2420 2e20 3430 3031 2920 2266 4765 (#$ . 4001) "fGe │ │ │ +00001110: 6e65 7261 7465 2061 7574 6f6c 6f61 6473 nerate autoloads │ │ │ +00001120: 2066 6f72 2066 696c 653a 2022 5d29 0a23 for file: "]).# │ │ │ +00001130: 4033 3037 2049 6e73 6572 7420 6174 2070 @307 Insert at p │ │ │ +00001140: 6f69 6e74 2061 206c 6f61 6464 6566 7320 oint a loaddefs │ │ │ +00001150: 6175 746f 6c6f 6164 2073 6563 7469 6f6e autoload section │ │ │ +00001160: 2066 6f72 2046 494c 452e 0a61 7574 6f6c for FILE..autol │ │ │ +00001170: 6f61 6473 2061 7265 2067 656e 6572 6174 oads are generat │ │ │ +00001180: 6564 2066 6f72 2064 6566 756e 7320 616e ed for defuns an │ │ │ +00001190: 6420 6465 666d 6163 726f 7320 696e 2046 d defmacros in F │ │ │ +000011a0: 494c 450a 6d61 726b 6564 2062 7920 6067 ILE.marked by `g │ │ │ +000011b0: 656e 6572 6174 652d 6175 746f 6c6f 6164 enerate-autoload │ │ │ +000011c0: 2d63 6f6f 6b69 6527 2028 7768 6963 6820 -cookie' (which │ │ │ +000011d0: 7365 6529 2e0a 4966 2046 494c 4520 6973 see)..If FILE is │ │ │ +000011e0: 2062 6569 6e67 2076 6973 6974 6564 2069 being visited i │ │ │ +000011f0: 6e20 6120 6275 6666 6572 2c20 7468 6520 n a buffer, the │ │ │ +00001200: 636f 6e74 656e 7473 206f 6620 7468 6520 contents of the │ │ │ +00001210: 6275 6666 6572 0a61 7265 2075 7365 642e buffer.are used. │ │ │ +00001220: 0a43 6f6d 6d6f 6e20 4c69 7370 206c 616d .Common Lisp lam │ │ │ +00001230: 6264 6120 6c69 7374 3a0a 2020 2867 656e bda list:. (gen │ │ │ +00001240: 6572 6174 652d 6669 6c65 2d61 7574 6f6c erate-file-autol │ │ │ +00001250: 6f61 6473 2d31 2046 494c 4520 4655 4e4c oads-1 FILE FUNL │ │ │ +00001260: 4953 5429 0a0a 1f0a 2864 6566 616c 6961 IST)....(defalia │ │ │ +00001270: 7320 2767 656e 6572 6174 652d 6669 6c65 s 'generate-file │ │ │ +00001280: 2d61 7574 6f6c 6f61 6473 2d31 2023 5b28 -autoloads-1 #[( │ │ │ +00001290: 6669 6c65 2066 756e 6c69 7374 2920 22c0 file funlist) ". │ │ │ +000012a0: c18d 8722 205b 2d2d 636c 2d62 6c6f 636b ..." [--cl-block │ │ │ +000012b0: 2d67 656e 6572 6174 652d 6669 6c65 2d61 -generate-file-a │ │ │ +000012c0: 7574 6f6c 6f61 6473 2d31 2d2d 2028 6279 utoloads-1-- (by │ │ │ +000012d0: 7465 2d63 6f64 6520 2270 c6c7 c80b 21c9 te-code "p....!. │ │ │ +000012e0: ca23 cb0b 210e 3f3f 3fc6 ccc6 cd0b 21c6 .#..!.???.....!. │ │ │ +000012f0: 1e40 1e48 1e4a 1e4b 1e4c 1a1e 431e 461e .@.H.J.K.L..C.F. │ │ │ +00001300: 441d ce0b 2113 8acf 8ec6 891e 4d1e 4e0e D...!.......M.N. │ │ │ +00001310: 48ae 83d0 0b21 7188 d10e 4f21 882a 8a8c H....!q...O!.*.. │ │ │ +00001320: 7e88 6562 88d2 0e47 c6cc 23ac 8bd3 d40e ~.eb...G..#..... │ │ │ +00001330: 435c 2288 d5d6 c65c 2288 d3d7 0e43 5c22 C\"....\"....C\" │ │ │ +00001340: 8865 6288 5c6e ab84 0e3f aa82 6d3f 83fd .eb.\n...?..m?.. │ │ │ +00001350: 015c 6eac 86d8 c677 88aa 9465 6288 d9da .\n....w...eb... │ │ │ +00001360: dbdc 0e3f 4021 21dd 5121 88de 9462 885c ...?@!!.Q!...b.\ │ │ │ +00001370: 6eac 89df db0e 4721 2183 e001 5c6e ac89 n.....G!!...\n.. │ │ │ +00001380: d20e 4721 88e0 c677 885c 6eac 846c 83bc ..G!...w.\n..l.. │ │ │ +00001390: 01e1 7021 6eac 83e2 7988 1e41 e30e 410e ..p!n...y..A..A. │ │ │ +000013a0: 465c 2219 0e41 a2e4 4e1e 2409 ab8b 0e41 F\"..A..N.$....A │ │ │ +000013b0: 4140 0e44 4216 44aa 830e 4111 0e24 8383 A@.DB.D...A..$.. │ │ │ +000013c0: 010e 2409 383b 8383 010e 2453 099b 8918 ..$.8;....$S.... │ │ │ +000013d0: 411e 4508 c6a1 88e5 e60d 5c22 88cc 8a0d A.E.......\".... │ │ │ +000013e0: 7188 6029 c61c 181e 49e7 e809 5c22 888a q.`)....I...\".. │ │ │ +000013f0: 0d71 88e9 2014 0862 88ea 201e 50eb 8ed2 .q.. ..b.. .P... │ │ │ +00001400: ec0c cc23 ab89 edee 2188 ef63 88aa 702a ...#....!..c..p* │ │ │ +00001410: 0c62 882c e5f0 0d5c 2288 8a0d 7188 6029 .b.,...\"...q.`) │ │ │ +00001420: 1e42 e5f1 0e45 4021 e2c6 4f0d 5c22 888a .B...E@!..O.\".. │ │ │ +00001430: 0d71 888a f2e6 0e42 cc23 ab88 e275 88f3 .q.....B.#...u.. │ │ │ +00001440: 6388 aa70 2a0e 4541 ac87 e5f4 0d5c 2288 c..p*.EA.....\". │ │ │ +00001450: aa91 e5f5 0d5c 2288 e5f1 0e45 4121 e2c6 .....\"....EA!.. │ │ │ +00001460: 4f0d 5c22 88f6 0d21 882b aab6 8a0d 7188 O.\"...!.+....q. │ │ │ +00001470: 6029 ccc6 1c1e 4918 f709 0d5c 2288 8a0d `)....I....\"... │ │ │ +00001480: 7188 e920 1408 6288 ea20 1e51 f88e d2ec q.. ..b.. .Q.... │ │ │ +00001490: 0ccc 23ab 89ed ee21 88ef 6388 aa70 2a0c ..#....!..c..p*. │ │ │ +000014a0: 6288 2c2b aab5 601e 42df f921 ab8e e279 b.,+..`.B..!...y │ │ │ +000014b0: 8860 1642 fa20 88e2 7988 aa83 e279 88e5 .`.B. ..y....y.. │ │ │ +000014c0: 0e42 607b 0d5c 2288 29aa 91df fb21 ab85 .B`{.\".)....!.. │ │ │ +000014d0: e279 88aa 87fa e221 88e2 7988 5c6e 8368 .y.....!..y.\n.h │ │ │ +000014e0: 000e 3f41 163f 8268 002c 0e52 6388 fcfd ..?A.?.h.,.Rc... │ │ │ +000014f0: 0e44 0e46 0e43 460d 5c22 88f6 0d21 880e .D.F.CF.\"...!.. │ │ │ +00001500: 4060 57ab 84e9 2016 4060 0e40 57ab 88c6 @`W... .@`.@W... │ │ │ +00001510: 7f88 e279 88aa 720e 4062 880e 5363 880e ...y..r.@b..Sc.. │ │ │ +00001520: 54ae 84d3 fe0b 5c22 2e5c 6e87 2220 5b70 T.....\".\n." [p │ │ │ +00001530: 2061 7574 6f6c 6f61 6420 646f 6669 6c65 autoload dofile │ │ │ +00001540: 7320 6669 6c65 2070 3220 6f75 7462 7566 s file p2 outbuf │ │ │ +00001550: 206e 696c 2072 6570 6c61 6365 2d69 6e2d nil replace-in- │ │ │ +00001560: 7374 7269 6e67 2066 696c 652d 6e61 6d65 string file-name │ │ │ +00001570: 2d6e 6f6e 6469 7265 6374 6f72 7920 225c -nondirectory "\ │ │ │ +00001580: 5c2e 656c 633f 2422 2022 2220 6175 746f \.elc?$" "" auto │ │ │ +00001590: 6c6f 6164 2d74 7269 6d2d 6669 6c65 2d6e load-trim-file-n │ │ │ +000015a0: 616d 6520 7420 6765 742d 6669 6c65 2d62 ame t get-file-b │ │ │ +000015b0: 7566 6665 7220 6578 7061 6e64 2d66 696c uffer expand-fil │ │ │ +000015c0: 652d 6e61 6d65 2028 2862 7974 652d 636f e-name ((byte-co │ │ │ +000015d0: 6465 2022 5c6e ac84 c370 2188 0971 88c4 de "\n...p!..q.. │ │ │ +000015e0: 2010 c387 2220 5b6f 7574 7075 742d 656e ..." [output-en │ │ │ +000015f0: 6420 6f75 7462 7566 2076 6973 6974 6564 d outbuf visited │ │ │ +00001600: 206b 696c 6c2d 6275 6666 6572 2070 6f69 kill-buffer poi │ │ │ +00001610: 6e74 2d6d 6172 6b65 725d 2032 2929 2066 nt-marker] 2)) f │ │ │ +00001620: 696e 642d 6669 6c65 2d6e 6f73 656c 6563 ind-file-noselec │ │ │ +00001630: 7420 7365 742d 7379 6e74 6178 2d74 6162 t set-syntax-tab │ │ │ +00001640: 6c65 2073 6561 7263 682d 666f 7277 6172 le search-forwar │ │ │ +00001650: 6420 6d65 7373 6167 6520 224e 6f20 6175 d message "No au │ │ │ +00001660: 746f 6c6f 6164 7320 666f 756e 6420 696e toloads found in │ │ │ +00001670: 2025 7322 2074 6872 6f77 202d 2d63 6c2d %s" throw --cl- │ │ │ +00001680: 626c 6f63 6b2d 6765 6e65 7261 7465 2d66 block-generate-f │ │ │ +00001690: 696c 652d 6175 746f 6c6f 6164 732d 312d ile-autoloads-1- │ │ │ +000016a0: 2d20 2247 656e 6572 6174 696e 6720 6175 - "Generating au │ │ │ +000016b0: 746f 6c6f 6164 7320 666f 7220 2573 2e2e toloads for %s.. │ │ │ +000016c0: 2e22 2022 2009 5c6e 0c22 2072 652d 7365 ." " .\n." re-se │ │ │ +000016d0: 6172 6368 2d66 6f72 7761 7264 2022 2864 arch-forward "(d │ │ │ +000016e0: 6566 5c5c 2875 6e5c 5c7c 7661 725c 5c7c ef\\(un\\|var\\| │ │ │ +000016f0: 636f 6e73 745c 5c7c 6d61 6372 6f5c 5c29 const\\|macro\\) │ │ │ +00001700: 2022 2072 6567 6578 702d 7175 6f74 6520 " regexp-quote │ │ │ +00001710: 7379 6d62 6f6c 2d6e 616d 6520 225c 5c73 symbol-name "\\s │ │ │ +00001720: 2022 2030 206c 6f6f 6b69 6e67 2d61 7420 " 0 looking-at │ │ │ +00001730: 2220 0922 2072 6561 6420 3120 6d61 6b65 " ." read 1 make │ │ │ +00001740: 2d61 7574 6f6c 6f61 6420 646f 632d 7374 -autoload doc-st │ │ │ +00001750: 7269 6e67 2d65 6c74 2070 7269 6e63 2022 ring-elt princ " │ │ │ +00001760: 5c6e 2822 206d 6170 6361 7220 235b 2865 \n(" mapcar #[(e │ │ │ +00001770: 6c74 2920 22c2 0809 5c22 88c3 c409 5c22 lt) "...\"....\" │ │ │ +00001780: 8722 205b 656c 7420 6f75 7462 7566 2070 ." [elt outbuf p │ │ │ +00001790: 7269 6e31 2070 7269 6e63 2022 2022 5d20 rin1 princ " "] │ │ │ +000017a0: 335d 2070 6f69 6e74 2d6d 6172 6b65 7220 3] point-marker │ │ │ +000017b0: 6d61 7463 682d 6461 7461 2028 2873 746f match-data ((sto │ │ │ +000017c0: 7265 2d6d 6174 6368 2d64 6174 6120 2331 re-match-data #1 │ │ │ +000017d0: 3d23 3a6d 6174 6368 2d64 6174 6129 2920 =#:match-data)) │ │ │ +000017e0: 220c 2220 6465 6c65 7465 2d63 6861 7220 "." delete-char │ │ │ +000017f0: 2d31 2022 5c5c 5e4c 2220 225c 225c 5c5c -1 "\\^L" "\"\\\ │ │ │ +00001800: 6e22 2070 7269 6e31 2d74 6f2d 7374 7269 n" prin1-to-stri │ │ │ +00001810: 6e67 2073 6561 7263 682d 6261 636b 7761 ng search-backwa │ │ │ +00001820: 7264 2022 5c5c 2220 2229 2220 2220 2220 rd "\\" ")" " " │ │ │ +00001830: 7465 7270 7269 2070 7269 6e74 2028 2873 terpri print ((s │ │ │ +00001840: 746f 7265 2d6d 6174 6368 2d64 6174 6120 tore-match-data │ │ │ +00001850: 2332 3d23 3a6d 6174 6368 2d64 6174 6129 #2=#:match-data) │ │ │ +00001860: 2920 2269 6d6d 6564 6961 7465 5c5c 7320 ) "immediate\\s │ │ │ +00001870: 2a24 2220 666f 7277 6172 642d 7365 7870 *$" forward-sexp │ │ │ +00001880: 2022 3b22 2070 7269 6e31 2061 7574 6f6c ";" prin1 autol │ │ │ +00001890: 6f61 6473 2022 4765 6e65 7261 7469 6e67 oads "Generating │ │ │ +000018a0: 2061 7574 6f6c 6f61 6473 2066 6f72 2025 autoloads for % │ │ │ +000018b0: 732e 2e2e 646f 6e65 2220 6675 6e6c 6973 s...done" funlis │ │ │ +000018c0: 7420 6f75 7470 7574 2d65 6e64 2066 6f72 t output-end for │ │ │ +000018d0: 6d20 6265 6769 6e20 7472 696d 2d6e 616d m begin trim-nam │ │ │ +000018e0: 6520 6175 746f 6c6f 6164 732d 646f 6e65 e autoloads-done │ │ │ +000018f0: 2065 6c74 206c 6f61 642d 6e61 6d65 2067 elt load-name g │ │ │ +00001900: 656e 6572 6174 652d 6175 746f 6c6f 6164 enerate-autoload │ │ │ +00001910: 2d63 6f6f 6b69 6520 7669 7369 7465 6420 -cookie visited │ │ │ +00001920: 7072 696e 742d 6573 6361 7065 2d6e 6577 print-escape-new │ │ │ +00001930: 6c69 6e65 7320 666c 6f61 742d 6f75 7470 lines float-outp │ │ │ +00001940: 7574 2d66 6f72 6d61 7420 7072 696e 742d ut-format print- │ │ │ +00001950: 7265 6164 6162 6c79 2070 7269 6e74 2d6c readably print-l │ │ │ +00001960: 656e 6774 6820 656e 6162 6c65 2d6c 6f63 ength enable-loc │ │ │ +00001970: 616c 2d76 6172 6961 626c 6573 2066 696e al-variables fin │ │ │ +00001980: 642d 6669 6c65 2d68 6f6f 6b73 2065 6d61 d-file-hooks ema │ │ │ +00001990: 6373 2d6c 6973 702d 6d6f 6465 2d73 796e cs-lisp-mode-syn │ │ │ +000019a0: 7461 782d 7461 626c 6520 2331 2320 2332 tax-table #1# #2 │ │ │ +000019b0: 2320 6765 6e65 7261 7465 2d61 7574 6f6c # generate-autol │ │ │ +000019c0: 6f61 642d 7365 6374 696f 6e2d 6865 6164 oad-section-head │ │ │ +000019d0: 6572 2067 656e 6572 6174 652d 6175 746f er generate-auto │ │ │ +000019e0: 6c6f 6164 2d73 6563 7469 6f6e 2d74 7261 load-section-tra │ │ │ +000019f0: 696c 6572 206e 6f6e 696e 7465 7261 6374 iler noninteract │ │ │ +00001a00: 6976 655d 2031 3129 5d20 3220 2823 2420 ive] 11)] 2 (#$ │ │ │ +00001a10: 2e20 3434 3035 295d 290a 2340 3131 3620 . 4405)]).#@116 │ │ │ +00001a20: 4765 6e65 7269 6320 6669 6c65 6e61 6d65 Generic filename │ │ │ +00001a30: 2074 6f20 7075 7420 6175 746f 6c6f 6164 to put autoload │ │ │ +00001a40: 7320 696e 746f 2e0a 556e 6c65 7373 2079 s into..Unless y │ │ │ +00001a50: 6f75 2061 7265 2061 6e20 5845 6d61 6373 ou are an XEmacs │ │ │ +00001a60: 206d 6169 6e74 6169 6e65 722c 2069 7420 maintainer, it │ │ │ +00001a70: 6973 2070 726f 6261 626c 7920 756e 7769 is probably unwi │ │ │ +00001a80: 7365 2074 6f20 6368 616e 6765 2074 6869 se to change thi │ │ │ +00001a90: 732e 1f0a 2864 6566 636f 6e73 7420 6175 s...(defconst au │ │ │ +00001aa0: 746f 6c6f 6164 2d66 696c 652d 6e61 6d65 toload-file-name │ │ │ +00001ab0: 2022 6175 746f 2d61 7574 6f6c 6f61 6473 "auto-autoloads │ │ │ +00001ac0: 2e65 6c22 2028 2324 202e 2036 3638 3829 .el" (#$ . 6688) │ │ │ +00001ad0: 290a 2340 3130 3720 4469 7265 6374 6f72 ).#@107 Director │ │ │ +00001ae0: 7920 746f 2070 7574 2061 7574 6f6c 6f61 y to put autoloa │ │ │ +00001af0: 6420 6465 636c 6172 6174 696f 6e20 6669 d declaration fi │ │ │ +00001b00: 6c65 2069 6e74 6f2e 0a55 6e6c 6573 7320 le into..Unless │ │ │ +00001b10: 796f 7520 6b6e 6f77 2077 6861 7420 796f you know what yo │ │ │ +00001b20: 7527 7265 2064 6f69 6e67 2c20 646f 6e27 u're doing, don' │ │ │ +00001b30: 7420 6d65 7373 2077 6974 6820 7468 6973 t mess with this │ │ │ +00001b40: 2e1f 0a28 6465 6676 6172 2061 7574 6f6c ...(defvar autol │ │ │ +00001b50: 6f61 642d 7461 7267 6574 2d64 6972 6563 oad-target-direc │ │ │ +00001b60: 746f 7279 2022 2e2e 2f6c 6973 702f 2220 tory "../lisp/" │ │ │ +00001b70: 2823 2420 2e20 3638 3732 2929 0a23 4033 (#$ . 6872)).#@3 │ │ │ +00001b80: 3030 202a 4669 6c65 2060 7570 6461 7465 00 *File `update │ │ │ +00001b90: 2d66 696c 652d 6175 746f 6c6f 6164 7327 -file-autoloads' │ │ │ +00001ba0: 2070 7574 7320 6175 746f 6c6f 6164 7320 puts autoloads │ │ │ +00001bb0: 696e 746f 2e0a 4120 2e65 6c20 6669 6c65 into..A .el file │ │ │ +00001bc0: 2063 616e 2073 6574 2074 6869 7320 696e can set this in │ │ │ +00001bd0: 2069 7473 206c 6f63 616c 2076 6172 6961 its local varia │ │ │ +00001be0: 626c 6573 2073 6563 7469 6f6e 2074 6f20 bles section to │ │ │ +00001bf0: 6d61 6b65 2069 7473 0a61 7574 6f6c 6f61 make its.autoloa │ │ │ +00001c00: 6473 2067 6f20 736f 6d65 7768 6572 6520 ds go somewhere │ │ │ +00001c10: 656c 7365 2e0a 0a4e 6f74 6520 7468 6174 else...Note that │ │ │ +00001c20: 2060 6261 7463 682d 7570 6461 7465 2d64 `batch-update-d │ │ │ +00001c30: 6972 6563 746f 7279 2720 6269 6e64 7320 irectory' binds │ │ │ +00001c40: 7468 6973 2076 6172 6961 626c 6520 746f this variable to │ │ │ +00001c50: 2069 7473 206f 776e 2076 616c 7565 2c0a its own value,. │ │ │ +00001c60: 6765 6e65 7261 6c6c 7920 7468 6520 6669 generally the fi │ │ │ +00001c70: 6c65 206e 616d 6564 2060 6175 746f 6c6f le named `autolo │ │ │ +00001c80: 6164 2d66 696c 652d 6e61 6d65 2720 696e ad-file-name' in │ │ │ +00001c90: 2074 6865 2064 6972 6563 746f 7279 2062 the directory b │ │ │ +00001ca0: 6569 6e67 0a75 7064 6174 6564 2e1f 0a28 eing.updated...( │ │ │ +00001cb0: 6465 6676 6172 2067 656e 6572 6174 6564 defvar generated │ │ │ +00001cc0: 2d61 7574 6f6c 6f61 642d 6669 6c65 2028 -autoload-file ( │ │ │ +00001cd0: 6279 7465 2d63 6f64 6520 22c3 5c6e 0950 byte-code ".\n.P │ │ │ +00001ce0: 085c 2287 2220 5b64 6174 612d 6469 7265 .\"." [data-dire │ │ │ +00001cf0: 6374 6f72 7920 6175 746f 6c6f 6164 2d66 ctory autoload-f │ │ │ +00001d00: 696c 652d 6e61 6d65 2061 7574 6f6c 6f61 ile-name autoloa │ │ │ +00001d10: 642d 7461 7267 6574 2d64 6972 6563 746f d-target-directo │ │ │ +00001d20: 7279 2065 7870 616e 642d 6669 6c65 2d6e ry expand-file-n │ │ │ +00001d30: 616d 655d 2033 2920 2823 2420 2e20 2d37 ame] 3) (#$ . -7 │ │ │ +00001d40: 3034 3329 290a 2340 3131 3920 4765 6e65 043)).#@119 Gene │ │ │ +00001d50: 7269 6320 6669 6c65 6e61 6d65 2074 6f20 ric filename to │ │ │ +00001d60: 7075 7420 6375 7374 6f6d 206c 6f61 6473 put custom loads │ │ │ +00001d70: 2069 6e74 6f2e 0a55 6e6c 6573 7320 796f into..Unless yo │ │ │ +00001d80: 7520 6172 6520 616e 2058 456d 6163 7320 u are an XEmacs │ │ │ +00001d90: 6d61 696e 7461 696e 6572 2c20 6974 2069 maintainer, it i │ │ │ +00001da0: 7320 7072 6f62 6162 6c79 2075 6e77 6973 s probably unwis │ │ │ +00001db0: 6520 746f 2063 6861 6e67 6520 7468 6973 e to change this │ │ │ +00001dc0: 2e1f 0a28 6465 6663 6f6e 7374 2063 7573 ...(defconst cus │ │ │ +00001dd0: 6c6f 6164 2d66 696c 652d 6e61 6d65 2022 load-file-name " │ │ │ +00001de0: 6375 7374 6f6d 2d6c 6f61 642e 656c 2220 custom-load.el" │ │ │ +00001df0: 2823 2420 2e20 3735 3030 2929 0a23 4031 (#$ . 7500)).#@1 │ │ │ +00001e00: 3537 2055 7064 6174 6520 7468 6520 6175 57 Update the au │ │ │ +00001e10: 746f 6c6f 6164 7320 666f 7220 4649 4c45 toloads for FILE │ │ │ +00001e20: 2069 6e20 6067 656e 6572 6174 6564 2d61 in `generated-a │ │ │ +00001e30: 7574 6f6c 6f61 642d 6669 6c65 270a 2877 utoload-file'.(w │ │ │ +00001e40: 6869 6368 2046 494c 4520 6d69 6768 7420 hich FILE might │ │ │ +00001e50: 6269 6e64 2069 6e20 6974 7320 6c6f 6361 bind in its loca │ │ │ +00001e60: 6c20 7661 7269 6162 6c65 7329 2e0a 5468 l variables)..Th │ │ │ +00001e70: 6973 2066 756e 6374 696f 6e20 7265 6675 is function refu │ │ │ +00001e80: 7365 7320 746f 2075 7064 6174 6520 6175 ses to update au │ │ │ +00001e90: 746f 6c6f 6164 7320 6669 6c65 732e 1f0a toloads files... │ │ │ +00001ea0: 2864 6566 616c 6961 7320 2775 7064 6174 (defalias 'updat │ │ │ +00001eb0: 652d 6669 6c65 2d61 7574 6f6c 6f61 6473 e-file-autoloads │ │ │ +00001ec0: 2023 5b28 6669 6c65 2920 22c6 0d21 15c7 #[(file) "..!.. │ │ │ +00001ed0: 0d0c 5c22 addf c80d 2108 43b6 3fad d6c9 ..\"....!.C.?... │ │ │ +00001ee0: c80d 21ca cb23 cc0d 21cd 891b 1a1e 1919 ..!..#..!....... │ │ │ +00001ef0: 8acd 1e1a ce0c 21ae 83cf 0c21 7188 29cd ......!....!q.). │ │ │ +00001f00: 161b 6562 88d0 0e1c cdd1 23ab 99d2 9412 ..eb......#..... │ │ │ +00001f10: d370 2113 d40b 3809 98ab 6ad0 0e1d 2188 .p!...8...j...!. │ │ │ +00001f20: 5c6e 607c 88aa 5fd5 d68d 88d7 0d21 8829 \n`|.._......!.) │ │ │ +00001f30: 74ad 82d8 202c 8722 205b 6175 746f 6c6f t... ,." [autolo │ │ │ +00001f40: 6164 2d66 696c 652d 6e61 6d65 206c 6f61 ad-file-name loa │ │ │ +00001f50: 642d 6e61 6d65 2073 6563 7469 6f6e 2d62 d-name section-b │ │ │ +00001f60: 6567 696e 2066 6f72 6d20 6765 6e65 7261 egin form genera │ │ │ +00001f70: 7465 642d 6175 746f 6c6f 6164 2d66 696c ted-autoload-fil │ │ │ +00001f80: 6520 6669 6c65 2065 7870 616e 642d 6669 e file expand-fi │ │ │ +00001f90: 6c65 2d6e 616d 6520 6669 6c65 2d6e 6577 le-name file-new │ │ │ +00001fa0: 6572 2d74 6861 6e2d 6669 6c65 2d70 2066 er-than-file-p f │ │ │ +00001fb0: 696c 652d 6e61 6d65 2d6e 6f6e 6469 7265 ile-name-nondire │ │ │ +00001fc0: 6374 6f72 7920 7265 706c 6163 652d 696e ctory replace-in │ │ │ +00001fd0: 2d73 7472 696e 6720 225c 5c2e 656c 633f -string "\\.elc? │ │ │ +00001fe0: 2422 2022 2220 6175 746f 6c6f 6164 2d74 $" "" autoload-t │ │ │ +00001ff0: 7269 6d2d 6669 6c65 2d6e 616d 6520 6e69 rim-file-name ni │ │ │ +00002000: 6c20 6765 742d 6669 6c65 2d62 7566 6665 l get-file-buffe │ │ │ +00002010: 7220 6669 6e64 2d66 696c 652d 6e6f 7365 r find-file-nose │ │ │ +00002020: 6c65 6374 2073 6561 7263 682d 666f 7277 lect search-forw │ │ │ +00002030: 6172 6420 7420 3020 7265 6164 2032 202d ard t 0 read 2 - │ │ │ +00002040: 2d63 6c2d 626c 6f63 6b2d 6669 6e64 2d69 -cl-block-find-i │ │ │ +00002050: 6e73 6572 7469 6f6e 2d70 6f69 6e74 2d2d nsertion-point-- │ │ │ +00002060: 2028 6279 7465 2d63 6f64 6520 2265 6288 (byte-code "eb. │ │ │ +00002070: c45c 6ec5 c623 ab9a c770 2113 09c8 0b38 .\n..#...p!....8 │ │ │ +00002080: 99ab 89c9 9462 88ca cbc5 5c22 88c4 0821 .....b....\"...! │ │ │ +00002090: 88aa 5f60 6561 ad82 6462 8722 205b 6765 .._`ea..db." [ge │ │ │ +000020a0: 6e65 7261 7465 2d61 7574 6f6c 6f61 642d nerate-autoload- │ │ │ +000020b0: 7365 6374 696f 6e2d 7472 6169 6c65 7220 section-trailer │ │ │ +000020c0: 7472 696d 2d6e 616d 6520 6765 6e65 7261 trim-name genera │ │ │ +000020d0: 7465 2d61 7574 6f6c 6f61 642d 7365 6374 te-autoload-sect │ │ │ +000020e0: 696f 6e2d 6865 6164 6572 2066 6f72 6d20 ion-header form │ │ │ +000020f0: 7365 6172 6368 2d66 6f72 7761 7264 206e search-forward n │ │ │ +00002100: 696c 2074 2072 6561 6420 3320 3020 7468 il t read 3 0 th │ │ │ +00002110: 726f 7720 2d2d 636c 2d62 6c6f 636b 2d66 row --cl-block-f │ │ │ +00002120: 696e 642d 696e 7365 7274 696f 6e2d 706f ind-insertion-po │ │ │ +00002130: 696e 742d 2d5d 2034 2920 6765 6e65 7261 int--] 4) genera │ │ │ +00002140: 7465 2d66 696c 652d 6175 746f 6c6f 6164 te-file-autoload │ │ │ +00002150: 7320 7361 7665 2d62 7566 6665 7220 7472 s save-buffer tr │ │ │ +00002160: 696d 2d6e 616d 6520 6669 6e64 2d66 696c im-name find-fil │ │ │ +00002170: 652d 686f 6f6b 7320 6275 6666 6572 2d72 e-hooks buffer-r │ │ │ +00002180: 6561 642d 6f6e 6c79 2067 656e 6572 6174 ead-only generat │ │ │ +00002190: 652d 6175 746f 6c6f 6164 2d73 6563 7469 e-autoload-secti │ │ │ +000021a0: 6f6e 2d68 6561 6465 7220 6765 6e65 7261 on-header genera │ │ │ +000021b0: 7465 2d61 7574 6f6c 6f61 642d 7365 6374 te-autoload-sect │ │ │ +000021c0: 696f 6e2d 7472 6169 6c65 725d 2034 2028 ion-trailer] 4 ( │ │ │ +000021d0: 2324 202e 2037 3638 3329 2022 6655 7064 #$ . 7683) "fUpd │ │ │ +000021e0: 6174 6520 6175 746f 6c6f 6164 7320 666f ate autoloads fo │ │ │ +000021f0: 7220 6669 6c65 3a20 225d 290a 2340 3737 r file: "]).#@77 │ │ │ +00002200: 2055 7064 6174 6520 7365 6374 696f 6e73 Update sections │ │ │ +00002210: 206f 6620 7468 6520 6375 7272 656e 7420 of the current │ │ │ +00002220: 6275 6666 6572 2067 656e 6572 6174 6564 buffer generated │ │ │ +00002230: 2062 7920 6075 7064 6174 652d 6669 6c65 by `update-file │ │ │ +00002240: 2d61 7574 6f6c 6f61 6473 272e 1f0a 2864 -autoloads'...(d │ │ │ +00002250: 6566 616c 6961 7320 2775 7064 6174 652d efalias 'update- │ │ │ +00002260: 6175 746f 6c6f 6164 732d 6865 7265 2023 autoloads-here # │ │ │ +00002270: 5b6e 696c 2022 c620 198a 6562 88c7 08c8 [nil ". ..eb.... │ │ │ +00002280: c923 adf1 c8ca cb8f 1bcc 0b38 891d 3bab .#.........8..;. │ │ │ +00002290: 8acd 0d21 acc4 ce0d 21ac bf0d 3bab a8cf ...!....!...;... │ │ │ +000022a0: 201e 1ed0 8ed1 d20d 210e 1f5c 2289 1cad .......!..\"... │ │ │ +000022b0: 94d3 d40c 21d5 5c22 14cd 0c21 ac85 ce0c ....!.\"...!.... │ │ │ +000022c0: 21ad 830c 8915 2bac 93d6 d7d8 d90b 380d !.....+.......8. │ │ │ +000022d0: 2321 ab83 c9aa 84c8 dadb 8f15 0dab 8ddc #!.............. │ │ │ +000022e0: 941a c70e 2021 885c 6e60 7c88 290d 3bab .... !.\n`|.).;. │ │ │ +000022f0: 84dd 0d21 882a aa08 2a87 2220 5b67 656e ...!.*..*." [gen │ │ │ +00002300: 6572 6174 652d 6175 746f 6c6f 6164 2d73 erate-autoload-s │ │ │ +00002310: 6563 7469 6f6e 2d68 6561 6465 7220 6765 ection-header ge │ │ │ +00002320: 6e65 7261 7465 642d 6175 746f 6c6f 6164 nerated-autoload │ │ │ +00002330: 2d66 696c 6520 6265 6769 6e20 666f 726d -file begin form │ │ │ +00002340: 206c 6f63 2066 696c 6520 6275 6666 6572 loc file buffer │ │ │ +00002350: 2d66 696c 652d 6e61 6d65 2073 6561 7263 -file-name searc │ │ │ +00002360: 682d 666f 7277 6172 6420 6e69 6c20 7420 h-forward nil t │ │ │ +00002370: 2862 7974 652d 636f 6465 2022 c070 2187 (byte-code ".p!. │ │ │ +00002380: 2220 5b72 6561 645d 2032 2920 2828 656e " [read] 2) ((en │ │ │ +00002390: 642d 6f66 2d66 696c 6529 2920 3320 6765 d-of-file)) 3 ge │ │ │ +000023a0: 742d 6669 6c65 2d62 7566 6665 7220 6669 t-file-buffer fi │ │ │ +000023b0: 6c65 2d65 7869 7374 732d 7020 6d61 7463 le-exists-p matc │ │ │ +000023c0: 682d 6461 7461 2028 2873 746f 7265 2d6d h-data ((store-m │ │ │ +000023d0: 6174 6368 2d64 6174 6120 2331 3d23 3a6d atch-data #1=#:m │ │ │ +000023e0: 6174 6368 2d64 6174 6129 2920 6c6f 6361 atch-data)) loca │ │ │ +000023f0: 7465 2d66 696c 6520 6669 6c65 2d6e 616d te-file file-nam │ │ │ +00002400: 652d 6e6f 6e64 6972 6563 746f 7279 2065 e-nondirectory e │ │ │ +00002410: 7870 616e 642d 6669 6c65 2d6e 616d 6520 xpand-file-name │ │ │ +00002420: 6175 746f 6c6f 6164 2d74 7269 6d2d 6669 autoload-trim-fi │ │ │ +00002430: 6c65 2d6e 616d 6520 222e 2e22 2079 2d6f le-name ".." y-o │ │ │ +00002440: 722d 6e2d 7020 666f 726d 6174 2022 4361 r-n-p format "Ca │ │ │ +00002450: 6e27 7420 6669 6e64 206c 6962 7261 7279 n't find library │ │ │ +00002460: 2060 2573 273b 2072 656d 6f76 6520 6974 `%s'; remove it │ │ │ +00002470: 7320 6175 746f 6c6f 6164 733f 2022 2032 s autoloads? " 2 │ │ │ +00002480: 2028 6279 7465 2d63 6f64 6520 22c1 c2c3 (byte-code "... │ │ │ +00002490: c408 385c 22c5 89c6 2487 2220 5b66 6f72 ..8\"...$." [for │ │ │ +000024a0: 6d20 7265 6164 2d66 696c 652d 6e61 6d65 m read-file-name │ │ │ +000024b0: 2066 6f72 6d61 7420 2246 696e 6420 6025 format "Find `% │ │ │ +000024c0: 7327 206c 6f61 6420 6669 6c65 3a20 2220 s' load file: " │ │ │ +000024d0: 3220 6e69 6c20 745d 2035 2920 2828 7175 2 nil t] 5) ((qu │ │ │ +000024e0: 6974 2929 2030 2067 656e 6572 6174 652d it)) 0 generate- │ │ │ +000024f0: 6669 6c65 2d61 7574 6f6c 6f61 6473 2023 file-autoloads # │ │ │ +00002500: 3123 206c 6f61 642d 7061 7468 2067 656e 1# load-path gen │ │ │ +00002510: 6572 6174 652d 6175 746f 6c6f 6164 2d73 erate-autoload-s │ │ │ +00002520: 6563 7469 6f6e 2d74 7261 696c 6572 5d20 ection-trailer] │ │ │ +00002530: 3620 2823 2420 2e20 3837 3035 2920 6e69 6 (#$ . 8705) ni │ │ │ +00002540: 6c5d 290a 2340 3332 3920 5570 6461 7465 l]).#@329 Update │ │ │ +00002550: 2060 6765 6e65 7261 7465 642d 6175 746f `generated-auto │ │ │ +00002560: 6c6f 6164 2d66 696c 6527 2077 6974 6820 load-file' with │ │ │ +00002570: 616c 6c20 7468 6520 6375 7272 656e 7420 all the current │ │ │ +00002580: 6175 746f 6c6f 6164 7320 6672 6f6d 2044 autoloads from D │ │ │ +00002590: 4952 2e0a 5468 6973 2072 756e 7320 6075 IR..This runs `u │ │ │ +000025a0: 7064 6174 652d 6669 6c65 2d61 7574 6f6c pdate-file-autol │ │ │ +000025b0: 6f61 6473 2720 6f6e 2065 6163 6820 2e65 oads' on each .e │ │ │ +000025c0: 6c20 6669 6c65 2069 6e20 4449 522e 0a4f l file in DIR..O │ │ │ +000025d0: 6273 6f6c 6574 6520 6175 746f 6c6f 6164 bsolete autoload │ │ │ +000025e0: 2065 6e74 7269 6573 2066 6f72 2066 696c entries for fil │ │ │ +000025f0: 6573 2074 6861 7420 6e6f 206c 6f6e 6765 es that no longe │ │ │ +00002600: 7220 6578 6973 7420 6172 6520 6465 6c65 r exist are dele │ │ │ +00002610: 7465 642e 0a4e 6f74 6520 7468 6174 2c20 ted..Note that, │ │ │ +00002620: 6966 2074 6869 7320 6675 6e63 7469 6f6e if this function │ │ │ +00002630: 2069 7320 6361 6c6c 6564 2066 726f 6d20 is called from │ │ │ +00002640: 6062 6174 6368 2d75 7064 6174 652d 6469 `batch-update-di │ │ │ +00002650: 7265 6374 6f72 7927 2c0a 6067 656e 6572 rectory',.`gener │ │ │ +00002660: 6174 6564 2d61 7574 6f6c 6f61 642d 6669 ated-autoload-fi │ │ │ +00002670: 6c65 2720 7761 7320 7265 626f 756e 6420 le' was rebound │ │ │ +00002680: 696e 2074 6861 7420 6675 6e63 7469 6f6e in that function │ │ │ +00002690: 2e1f 0a28 6465 6661 6c69 6173 2027 7570 ...(defalias 'up │ │ │ +000026a0: 6461 7465 2d61 7574 6f6c 6f61 6473 2d66 date-autoloads-f │ │ │ +000026b0: 726f 6d2d 6469 7265 6374 6f72 7920 235b rom-directory #[ │ │ │ +000026c0: 2864 6972 2920 22c6 0d21 15c7 c8c9 0d21 (dir) "..!.....! │ │ │ +000026d0: 2121 ca18 1b8a ca1e 19cb 0e1a 2171 8829 !!..........!q.) │ │ │ +000026e0: 6562 88cc 0e1b cacd 23ab adce 941a cacf eb......#....... │ │ │ +000026f0: d08f 19d1 0938 891c 3bab 9ad2 0c21 0b98 .....8..;....!.. │ │ │ +00002700: ab93 d3c6 c80c 210d 5c22 21ac 89cc 0e1c ......!.\"!..... │ │ │ +00002710: 2188 5c6e 607c 882b aa4b d4d5 d60d cdd7 !.\n`|.+.K...... │ │ │ +00002720: 235c 2288 0e1d 3fad 82d8 202b 8722 205b #\"...?... +." [ │ │ │ +00002730: 656e 6162 6c65 2d6c 6f63 616c 2d65 7661 enable-local-eva │ │ │ +00002740: 6c20 666f 726d 2062 6567 696e 2073 696d l form begin sim │ │ │ +00002750: 706c 652d 6469 7220 6669 6c65 2064 6972 ple-dir file dir │ │ │ +00002760: 2065 7870 616e 642d 6669 6c65 2d6e 616d expand-file-nam │ │ │ +00002770: 6520 6669 6c65 2d6e 616d 652d 6173 2d64 e file-name-as-d │ │ │ +00002780: 6972 6563 746f 7279 2066 696c 652d 6e61 irectory file-na │ │ │ +00002790: 6d65 2d6e 6f6e 6469 7265 6374 6f72 7920 me-nondirectory │ │ │ +000027a0: 6469 7265 6374 6f72 792d 6669 6c65 2d6e directory-file-n │ │ │ +000027b0: 616d 6520 6e69 6c20 6669 6e64 2d66 696c ame nil find-fil │ │ │ +000027c0: 652d 6e6f 7365 6c65 6374 2073 6561 7263 e-noselect searc │ │ │ +000027d0: 682d 666f 7277 6172 6420 7420 3020 2862 h-forward t 0 (b │ │ │ +000027e0: 7974 652d 636f 6465 2022 c070 2187 2220 yte-code ".p!." │ │ │ +000027f0: 5b72 6561 645d 2032 2920 2828 656e 642d [read] 2) ((end- │ │ │ +00002800: 6f66 2d66 696c 6529 2920 3320 6669 6c65 of-file)) 3 file │ │ │ +00002810: 2d6e 616d 652d 6469 7265 6374 6f72 7920 -name-directory │ │ │ +00002820: 6669 6c65 2d65 7869 7374 732d 7020 6d61 file-exists-p ma │ │ │ +00002830: 7063 6172 2075 7064 6174 652d 6669 6c65 pcar update-file │ │ │ +00002840: 2d61 7574 6f6c 6f61 6473 2064 6972 6563 -autoloads direc │ │ │ +00002850: 746f 7279 2d66 696c 6573 2022 5e5b 5e3d tory-files "^[^= │ │ │ +00002860: 5d2e 2a5c 5c2e 656c 2422 2073 6176 652d ].*\\.el$" save- │ │ │ +00002870: 6275 6666 6572 2066 696e 642d 6669 6c65 buffer find-file │ │ │ +00002880: 2d68 6f6f 6b73 2067 656e 6572 6174 6564 -hooks generated │ │ │ +00002890: 2d61 7574 6f6c 6f61 642d 6669 6c65 2067 -autoload-file g │ │ │ +000028a0: 656e 6572 6174 652d 6175 746f 6c6f 6164 enerate-autoload │ │ │ +000028b0: 2d73 6563 7469 6f6e 2d68 6561 6465 7220 -section-header │ │ │ +000028c0: 6765 6e65 7261 7465 2d61 7574 6f6c 6f61 generate-autoloa │ │ │ +000028d0: 642d 7365 6374 696f 6e2d 7472 6169 6c65 d-section-traile │ │ │ +000028e0: 7220 6e6f 6e69 6e74 6572 6163 7469 7665 r noninteractive │ │ │ +000028f0: 5d20 3720 2823 2420 2e20 3935 3436 2920 ] 7 (#$ . 9546) │ │ │ +00002900: 2244 5570 6461 7465 2061 7574 6f6c 6f61 "DUpdate autoloa │ │ │ +00002910: 6473 2066 6f72 2064 6972 6563 746f 7279 ds for directory │ │ │ +00002920: 3a20 225d 290a 2340 3435 3520 5570 6461 : "]).#@455 Upda │ │ │ +00002930: 7465 2074 6865 2061 7574 6f6c 6f61 6473 te the autoloads │ │ │ +00002940: 2066 6f72 2074 6865 2066 696c 6573 206f for the files o │ │ │ +00002950: 7220 6469 7265 6374 6f72 6965 7320 6f6e r directories on │ │ │ +00002960: 2074 6865 2063 6f6d 6d61 6e64 206c 696e the command lin │ │ │ +00002970: 652e 0a52 756e 7320 6075 7064 6174 652d e..Runs `update- │ │ │ +00002980: 6669 6c65 2d61 7574 6f6c 6f61 6473 2720 file-autoloads' │ │ │ +00002990: 6f6e 2066 696c 6573 2061 6e64 2060 7570 on files and `up │ │ │ +000029a0: 6461 7465 2d64 6972 6563 746f 7279 2d61 date-directory-a │ │ │ +000029b0: 7574 6f6c 6f61 6473 270a 6f6e 2064 6972 utoloads'.on dir │ │ │ +000029c0: 6563 746f 7269 6573 2e20 204d 7573 7420 ectories. Must │ │ │ +000029d0: 6265 2075 7365 6420 6f6e 6c79 2077 6974 be used only wit │ │ │ +000029e0: 6820 2d62 6174 6368 2c20 616e 6420 6b69 h -batch, and ki │ │ │ +000029f0: 6c6c 7320 456d 6163 7320 6f6e 2063 6f6d lls Emacs on com │ │ │ +00002a00: 706c 6574 696f 6e2e 0a45 6163 6820 6669 pletion..Each fi │ │ │ +00002a10: 6c65 2077 696c 6c20 6265 2070 726f 6365 le will be proce │ │ │ +00002a20: 7373 6564 2065 7665 6e20 6966 2061 6e20 ssed even if an │ │ │ +00002a30: 6572 726f 7220 6f63 6375 7272 6564 2070 error occurred p │ │ │ +00002a40: 7265 7669 6f75 736c 792e 0a46 6f72 2065 reviously..For e │ │ │ +00002a50: 7861 6d70 6c65 2c20 696e 766f 6b65 2060 xample, invoke ` │ │ │ +00002a60: 7865 6d61 6373 202d 6261 7463 6820 2d66 xemacs -batch -f │ │ │ +00002a70: 2062 6174 6368 2d75 7064 6174 652d 6175 batch-update-au │ │ │ +00002a80: 746f 6c6f 6164 7320 2a2e 656c 272e 0a54 toloads *.el'..T │ │ │ +00002a90: 6865 2064 6972 6563 746f 7279 2074 6f20 he directory to │ │ │ +00002aa0: 7768 6963 6820 7468 6520 6175 746f 2d61 which the auto-a │ │ │ +00002ab0: 7574 6f6c 6f61 6473 2e65 6c20 6669 6c65 utoloads.el file │ │ │ +00002ac0: 206d 7573 7420 6265 2074 6865 2066 6972 must be the fir │ │ │ +00002ad0: 7374 2070 6172 616d 6574 6572 0a6f 6e20 st parameter.on │ │ │ +00002ae0: 7468 6520 636f 6d6d 616e 6420 6c69 6e65 the command line │ │ │ +00002af0: 2e1f 0a28 6465 6661 6c69 6173 2027 6261 ...(defalias 'ba │ │ │ +00002b00: 7463 682d 7570 6461 7465 2d61 7574 6f6c tch-update-autol │ │ │ +00002b10: 6f61 6473 2023 5b6e 696c 2022 09ac 84c6 oads #[nil ".... │ │ │ +00002b20: c721 88c8 0821 c91e 191b 0e1a c91d 891c .!...!.......... │ │ │ +00002b30: abae 0c40 15ca 0d0b 5c22 15cb 0d21 ab8b ...@....\"...!.. │ │ │ +00002b40: cccd 0d5c 2288 ce0d 2188 aa90 cf0d 21ab ...\"...!.....!. │ │ │ +00002b50: 86d0 0d21 88aa 85c6 d10d 5c22 880c 4189 ...!......\"..A. │ │ │ +00002b60: 14ac 522a d25c 6eab 835c 6eaa 83d3 0b21 ..R*.\n..\n....! │ │ │ +00002b70: d450 2188 d5d6 2188 d7d8 212a 8722 205b .P!...!...!*." [ │ │ │ +00002b80: 6465 6661 756c 742d 6469 7265 6374 6f72 default-director │ │ │ +00002b90: 7920 6e6f 6e69 6e74 6572 6163 7469 7665 y noninteractive │ │ │ +00002ba0: 2061 7574 6f6c 6f61 642d 7061 636b 6167 autoload-packag │ │ │ +00002bb0: 652d 6e61 6d65 2064 6566 6469 7220 2331 e-name defdir #1 │ │ │ +00002bc0: 3d23 3a2d 2d64 6f6c 6973 742d 7465 6d70 =#:--dolist-temp │ │ │ +00002bd0: 2d2d 3335 3932 3120 6172 6720 6572 726f --35921 arg erro │ │ │ +00002be0: 7220 2262 6174 6368 2d75 7064 6174 652d r "batch-update- │ │ │ +00002bf0: 6175 746f 6c6f 6164 7320 6973 2074 6f20 autoloads is to │ │ │ +00002c00: 6265 2075 7365 6420 6f6e 6c79 2077 6974 be used only wit │ │ │ +00002c10: 6820 2d62 6174 6368 2220 6469 7265 6374 h -batch" direct │ │ │ +00002c20: 6f72 792d 6669 6c65 2d6e 616d 6520 6e69 ory-file-name ni │ │ │ +00002c30: 6c20 6578 7061 6e64 2d66 696c 652d 6e61 l expand-file-na │ │ │ +00002c40: 6d65 2066 696c 652d 6469 7265 6374 6f72 me file-director │ │ │ +00002c50: 792d 7020 6d65 7373 6167 6520 2255 7064 y-p message "Upd │ │ │ +00002c60: 6174 696e 6720 6175 746f 6c6f 6164 7320 ating autoloads │ │ │ +00002c70: 666f 7220 6469 7265 6374 6f72 7920 2573 for directory %s │ │ │ +00002c80: 2e2e 2e22 2075 7064 6174 652d 6175 746f ..." update-auto │ │ │ +00002c90: 6c6f 6164 732d 6672 6f6d 2d64 6972 6563 loads-from-direc │ │ │ +00002ca0: 746f 7279 2066 696c 652d 6578 6973 7473 tory file-exists │ │ │ +00002cb0: 2d70 2075 7064 6174 652d 6669 6c65 2d61 -p update-file-a │ │ │ +00002cc0: 7574 6f6c 6f61 6473 2022 4e6f 2073 7563 utoloads "No suc │ │ │ +00002cd0: 6820 6669 6c65 206f 7220 6469 7265 6374 h file or direct │ │ │ +00002ce0: 6f72 793a 2025 7322 2066 6978 7570 2d61 ory: %s" fixup-a │ │ │ +00002cf0: 7574 6f6c 6f61 642d 6275 6666 6572 2066 utoload-buffer f │ │ │ +00002d00: 696c 652d 6e61 6d65 2d6e 6f6e 6469 7265 ile-name-nondire │ │ │ +00002d10: 6374 6f72 7920 222d 6175 746f 6c6f 6164 ctory "-autoload │ │ │ +00002d20: 7322 2073 6176 652d 736f 6d65 2d62 7566 s" save-some-buf │ │ │ +00002d30: 6665 7273 2074 206b 696c 6c2d 656d 6163 fers t kill-emac │ │ │ +00002d40: 7320 3020 656e 6162 6c65 2d6c 6f63 616c s 0 enable-local │ │ │ +00002d50: 2d65 7661 6c20 636f 6d6d 616e 642d 6c69 -eval command-li │ │ │ +00002d60: 6e65 2d61 7267 732d 6c65 6674 5d20 3420 ne-args-left] 4 │ │ │ +00002d70: 2823 2420 2e20 3130 3534 3029 5d29 0a28 (#$ . 10540)]).( │ │ │ +00002d80: 6465 6661 6c69 6173 2027 6669 7875 702d defalias 'fixup- │ │ │ +00002d90: 6175 746f 6c6f 6164 2d62 7566 6665 7220 autoload-buffer │ │ │ +00002da0: 235b 2873 796d 2920 228a c208 2171 8865 #[(sym) "...!q.e │ │ │ +00002db0: 6288 6564 553f ad9a c3c4 213f ad94 c563 b.edU?....!?...c │ │ │ +00002dc0: 88c6 09c7 b103 88c8 6388 6462 88c9 09ca ........c.db.... │ │ │ +00002dd0: b103 2987 2220 5b67 656e 6572 6174 6564 ..)." [generated │ │ │ +00002de0: 2d61 7574 6f6c 6f61 642d 6669 6c65 2073 -autoload-file s │ │ │ +00002df0: 796d 2066 696e 642d 6669 6c65 2d6e 6f73 ym find-file-nos │ │ │ +00002e00: 656c 6563 7420 6c6f 6f6b 696e 672d 6174 elect looking-at │ │ │ +00002e10: 2022 3b3b 3b20 444f 204e 4f54 204d 4f44 ";;; DO NOT MOD │ │ │ +00002e20: 4946 5920 5448 4953 2046 494c 4522 2022 IFY THIS FILE" " │ │ │ +00002e30: 3b3b 3b20 444f 204e 4f54 204d 4f44 4946 ;;; DO NOT MODIF │ │ │ +00002e40: 5920 5448 4953 2046 494c 455c 6e22 2022 Y THIS FILE\n" " │ │ │ +00002e50: 2869 6620 2866 6561 7475 7265 7020 2722 (if (featurep '" │ │ │ +00002e60: 2022 2922 2022 2028 6572 726f 7220 5c22 ")" " (error \" │ │ │ +00002e70: 416c 7265 6164 7920 6c6f 6164 6564 5c22 Already loaded\" │ │ │ +00002e80: 2929 5c6e 2220 225c 6e28 7072 6f76 6964 ))\n" "\n(provid │ │ │ +00002e90: 6520 2722 2022 295c 6e22 5d20 335d 290a e '" ")\n"] 3]). │ │ │ +00002ea0: 2862 7974 652d 636f 6465 2022 c108 4210 (byte-code "..B. │ │ │ +00002eb0: c2c1 21ac 85c3 c1c4 5c22 88c4 8722 205b ..!.....\"..." [ │ │ │ +00002ec0: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ +00002ed0: 7420 6175 746f 6c6f 6164 2d70 6163 6b61 t autoload-packa │ │ │ +00002ee0: 6765 2d6e 616d 6520 6465 6661 756c 742d ge-name default- │ │ │ +00002ef0: 626f 756e 6470 2073 6574 2d64 6566 6175 boundp set-defau │ │ │ +00002f00: 6c74 206e 696c 5d20 3329 0a23 4031 3634 lt nil] 3).#@164 │ │ │ +00002f10: 2055 7064 6174 6520 7468 6520 6175 746f Update the auto │ │ │ +00002f20: 6c6f 6164 7320 666f 7220 7468 6520 6469 loads for the di │ │ │ +00002f30: 7265 6374 6f72 6965 7320 6f6e 2074 6865 rectories on the │ │ │ +00002f40: 2063 6f6d 6d61 6e64 206c 696e 652e 0a52 command line..R │ │ │ +00002f50: 756e 7320 6075 7064 6174 652d 6669 6c65 uns `update-file │ │ │ +00002f60: 2d61 7574 6f6c 6f61 6473 2720 6f6e 2065 -autoloads' on e │ │ │ +00002f70: 6163 6820 6669 6c65 2069 6e20 7468 6520 ach file in the │ │ │ +00002f80: 6769 7665 6e20 6469 7265 6374 6f72 792c given directory, │ │ │ +00002f90: 2061 6e64 206d 7573 740a 6265 2075 7365 and must.be use │ │ │ +00002fa0: 6420 6f6e 6c79 2077 6974 6820 2d62 6174 d only with -bat │ │ │ +00002fb0: 6368 2e1f 0a28 6465 6661 6c69 6173 2027 ch...(defalias ' │ │ │ +00002fc0: 6261 7463 682d 7570 6461 7465 2d64 6972 batch-update-dir │ │ │ +00002fd0: 6563 746f 7279 2023 5b6e 696c 2022 08ac ectory #[nil ".. │ │ │ +00002fe0: 84c6 c721 880e 14c8 1e15 1b5c 6ec8 1d89 ...!.......\n... │ │ │ +00002ff0: 1cab bd0c 4015 c90d 0b5c 2215 c90e 160d ....@....\"..... │ │ │ +00003000: 5c22 1e17 ca0d 21ab 8bcb cc0d 5c22 88cd \"....!.....\".. │ │ │ +00003010: 0d21 88aa 85c6 ce0d 5c22 88cf 09ab 8309 .!......\"...... │ │ │ +00003020: aa83 d00d 21d1 5021 88d2 d321 8829 0c41 ....!.P!...!.).A │ │ │ +00003030: 8914 ac43 2ac8 8912 2a87 2220 5b6e 6f6e ...C*...*." [non │ │ │ +00003040: 696e 7465 7261 6374 6976 6520 6175 746f interactive auto │ │ │ +00003050: 6c6f 6164 2d70 6163 6b61 6765 2d6e 616d load-package-nam │ │ │ +00003060: 6520 636f 6d6d 616e 642d 6c69 6e65 2d61 e command-line-a │ │ │ +00003070: 7267 732d 6c65 6674 2064 6566 6469 7220 rgs-left defdir │ │ │ +00003080: 2331 3d23 3a2d 2d64 6f6c 6973 742d 7465 #1=#:--dolist-te │ │ │ +00003090: 6d70 2d2d 3335 3932 3220 6172 6720 6572 mp--35922 arg er │ │ │ +000030a0: 726f 7220 2262 6174 6368 2d75 7064 6174 ror "batch-updat │ │ │ +000030b0: 652d 6469 7265 6374 6f72 7920 6973 2074 e-directory is t │ │ │ +000030c0: 6f20 6265 2075 7365 6420 6f6e 6c79 2077 o be used only w │ │ │ +000030d0: 6974 6820 2d62 6174 6368 2220 6e69 6c20 ith -batch" nil │ │ │ +000030e0: 6578 7061 6e64 2d66 696c 652d 6e61 6d65 expand-file-name │ │ │ +000030f0: 2066 696c 652d 6469 7265 6374 6f72 792d file-directory- │ │ │ +00003100: 7020 6d65 7373 6167 6520 2255 7064 6174 p message "Updat │ │ │ +00003110: 696e 6720 6175 746f 6c6f 6164 7320 696e ing autoloads in │ │ │ +00003120: 2064 6972 6563 746f 7279 2025 732e 2e2e directory %s... │ │ │ +00003130: 2220 7570 6461 7465 2d61 7574 6f6c 6f61 " update-autoloa │ │ │ +00003140: 6473 2d66 726f 6d2d 6469 7265 6374 6f72 ds-from-director │ │ │ +00003150: 7920 224e 6f20 7375 6368 2066 696c 6520 y "No such file │ │ │ +00003160: 6f72 2064 6972 6563 746f 7279 3a20 2573 or directory: %s │ │ │ +00003170: 2220 6669 7875 702d 6175 746f 6c6f 6164 " fixup-autoload │ │ │ +00003180: 2d62 7566 6665 7220 6669 6c65 2d6e 616d -buffer file-nam │ │ │ +00003190: 652d 6e6f 6e64 6972 6563 746f 7279 2022 e-nondirectory " │ │ │ +000031a0: 2d61 7574 6f6c 6f61 6473 2220 7361 7665 -autoloads" save │ │ │ +000031b0: 2d73 6f6d 652d 6275 6666 6572 7320 7420 -some-buffers t │ │ │ +000031c0: 6465 6661 756c 742d 6469 7265 6374 6f72 default-director │ │ │ +000031d0: 7920 656e 6162 6c65 2d6c 6f63 616c 2d65 y enable-local-e │ │ │ +000031e0: 7661 6c20 6175 746f 6c6f 6164 2d66 696c val autoload-fil │ │ │ +000031f0: 652d 6e61 6d65 2067 656e 6572 6174 6564 e-name generated │ │ │ +00003200: 2d61 7574 6f6c 6f61 642d 6669 6c65 5d20 -autoload-file] │ │ │ +00003210: 3420 2823 2420 2e20 3132 3034 3929 5d29 4 (#$ . 12049)]) │ │ │ +00003220: 0a23 4031 3637 2055 7064 6174 6520 7468 .#@167 Update th │ │ │ +00003230: 6520 6175 746f 6c6f 6164 7320 666f 7220 e autoloads for │ │ │ +00003240: 6120 7369 6e67 6c65 2064 6972 6563 746f a single directo │ │ │ +00003250: 7279 206f 6e20 7468 6520 636f 6d6d 616e ry on the comman │ │ │ +00003260: 6420 6c69 6e65 2e0a 5275 6e73 2060 7570 d line..Runs `up │ │ │ +00003270: 6461 7465 2d66 696c 652d 6175 746f 6c6f date-file-autolo │ │ │ +00003280: 6164 7327 206f 6e20 6561 6368 2066 696c ads' on each fil │ │ │ +00003290: 6520 696e 2074 6865 2067 6976 656e 2064 e in the given d │ │ │ +000032a0: 6972 6563 746f 7279 2c20 616e 6420 6d75 irectory, and mu │ │ │ +000032b0: 7374 0a62 6520 7573 6564 206f 6e6c 7920 st.be used only │ │ │ +000032c0: 7769 7468 202d 6261 7463 682e 1f0a 2864 with -batch...(d │ │ │ +000032d0: 6566 616c 6961 7320 2762 6174 6368 2d75 efalias 'batch-u │ │ │ +000032e0: 7064 6174 652d 6f6e 652d 6469 7265 6374 pdate-one-direct │ │ │ +000032f0: 6f72 7920 235b 6e69 6c20 2209 ac84 c6c7 ory #[nil "..... │ │ │ +00003300: 2188 08c8 1e14 1b0c 401d 0c41 14c9 0d0b !.......@..A.... │ │ │ +00003310: 5c22 15c9 0e15 0d5c 221e 16ca 0d21 ab8b \".....\"....!.. │ │ │ +00003320: cbcc 0d5c 2288 cd0d 2188 aa85 c6ce 0d5c ...\"...!......\ │ │ │ +00003330: 2288 cf5c 6eab 835c 6eaa 83d0 0d21 d150 "..\n..\n....!.P │ │ │ +00003340: 2188 d2d3 212c 8722 205b 6465 6661 756c !...!,." [defaul │ │ │ +00003350: 742d 6469 7265 6374 6f72 7920 6e6f 6e69 t-directory noni │ │ │ +00003360: 6e74 6572 6163 7469 7665 2061 7574 6f6c nteractive autol │ │ │ +00003370: 6f61 642d 7061 636b 6167 652d 6e61 6d65 oad-package-name │ │ │ +00003380: 2064 6566 6469 7220 636f 6d6d 616e 642d defdir command- │ │ │ +00003390: 6c69 6e65 2d61 7267 732d 6c65 6674 2061 line-args-left a │ │ │ +000033a0: 7267 2065 7272 6f72 2022 6261 7463 682d rg error "batch- │ │ │ +000033b0: 7570 6461 7465 2d64 6972 6563 746f 7279 update-directory │ │ │ +000033c0: 2069 7320 746f 2062 6520 7573 6564 206f is to be used o │ │ │ +000033d0: 6e6c 7920 7769 7468 202d 6261 7463 6822 nly with -batch" │ │ │ +000033e0: 206e 696c 2065 7870 616e 642d 6669 6c65 nil expand-file │ │ │ +000033f0: 2d6e 616d 6520 6669 6c65 2d64 6972 6563 -name file-direc │ │ │ +00003400: 746f 7279 2d70 206d 6573 7361 6765 2022 tory-p message " │ │ │ +00003410: 5570 6461 7469 6e67 2061 7574 6f6c 6f61 Updating autoloa │ │ │ +00003420: 6473 2069 6e20 6469 7265 6374 6f72 7920 ds in directory │ │ │ +00003430: 2573 2e2e 2e22 2075 7064 6174 652d 6175 %s..." update-au │ │ │ +00003440: 746f 6c6f 6164 732d 6672 6f6d 2d64 6972 toloads-from-dir │ │ │ +00003450: 6563 746f 7279 2022 4e6f 2073 7563 6820 ectory "No such │ │ │ +00003460: 6669 6c65 206f 7220 6469 7265 6374 6f72 file or director │ │ │ +00003470: 793a 2025 7322 2066 6978 7570 2d61 7574 y: %s" fixup-aut │ │ │ +00003480: 6f6c 6f61 642d 6275 6666 6572 2066 696c oload-buffer fil │ │ │ +00003490: 652d 6e61 6d65 2d6e 6f6e 6469 7265 6374 e-name-nondirect │ │ │ +000034a0: 6f72 7920 222d 6175 746f 6c6f 6164 7322 ory "-autoloads" │ │ │ +000034b0: 2073 6176 652d 736f 6d65 2d62 7566 6665 save-some-buffe │ │ │ +000034c0: 7273 2074 2065 6e61 626c 652d 6c6f 6361 rs t enable-loca │ │ │ +000034d0: 6c2d 6576 616c 2061 7574 6f6c 6f61 642d l-eval autoload- │ │ │ +000034e0: 6669 6c65 2d6e 616d 6520 6765 6e65 7261 file-name genera │ │ │ +000034f0: 7465 642d 6175 746f 6c6f 6164 2d66 696c ted-autoload-fil │ │ │ +00003500: 655d 2033 2028 2324 202e 2031 3238 3339 e] 3 (#$ . 12839 │ │ │ +00003510: 295d 290a 2870 726f 7669 6465 2027 6175 )]).(provide 'au │ │ │ +00003520: 746f 6c6f 6164 290a toload). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/backquote.elc │ │ │ @@ -1,332 +1,332 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3433 2032 eb 25 01:53:43 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f62 1-21.4.24/lisp/b │ │ │ -00000090: 6163 6b71 756f 7465 2e65 6c0a 3b3b 3b20 ackquote.el.;;; │ │ │ -000000a0: 656d 6163 7320 7665 7273 696f 6e20 3231 emacs version 21 │ │ │ -000000b0: 2e34 2028 7061 7463 6820 3234 2920 2253 .4 (patch 24) "S │ │ │ -000000c0: 7461 6e64 6172 6420 4322 2058 456d 6163 tandard C" XEmac │ │ │ -000000d0: 7320 4c75 6369 642e 0a3b 3b3b 2062 7974 s Lucid..;;; byt │ │ │ -000000e0: 6563 6f6d 7020 7665 7273 696f 6e20 322e ecomp version 2. │ │ │ -000000f0: 3237 2058 456d 6163 733b 2032 3030 302d 27 XEmacs; 2000- │ │ │ -00000100: 3039 2d31 322e 0a3b 3b3b 206f 7074 696d 09-12..;;; optim │ │ │ -00000110: 697a 6174 696f 6e20 6973 206f 6e2e 0a3b ization is on..; │ │ │ -00000120: 3b3b 2074 6869 7320 6669 6c65 2075 7365 ;; this file use │ │ │ -00000130: 7320 6f70 636f 6465 7320 7768 6963 6820 s opcodes which │ │ │ -00000140: 646f 206e 6f74 2065 7869 7374 2069 6e20 do not exist in │ │ │ -00000150: 456d 6163 7320 3139 2e0a 0a28 6966 2028 Emacs 19...(if ( │ │ │ -00000160: 616e 6420 2862 6f75 6e64 7020 2765 6d61 and (boundp 'ema │ │ │ -00000170: 6373 2d76 6572 7369 6f6e 290a 0920 286f cs-version).. (o │ │ │ -00000180: 7220 2861 6e64 2028 626f 756e 6470 2027 r (and (boundp ' │ │ │ -00000190: 6570 6f63 683a 3a76 6572 7369 6f6e 2920 epoch::version) │ │ │ -000001a0: 6570 6f63 683a 3a76 6572 7369 6f6e 290a epoch::version). │ │ │ -000001b0: 0920 2020 2020 2873 7472 696e 672d 6c65 . (string-le │ │ │ -000001c0: 7373 7020 656d 6163 732d 7665 7273 696f ssp emacs-versio │ │ │ -000001d0: 6e20 2232 3022 2929 290a 2020 2020 2865 n "20"))). (e │ │ │ -000001e0: 7272 6f72 2022 6062 6163 6b71 756f 7465 rror "`backquote │ │ │ -000001f0: 2e65 6c27 2077 6173 2063 6f6d 7069 6c65 .el' was compile │ │ │ -00000200: 6420 666f 7220 456d 6163 7320 3230 2229 d for Emacs 20") │ │ │ -00000210: 290a 0a28 6f72 2028 626f 756e 6470 2027 )..(or (boundp ' │ │ │ -00000220: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ -00000230: 7429 2028 7365 7471 2063 7572 7265 6e74 t) (setq current │ │ │ -00000240: 2d6c 6f61 642d 6c69 7374 206e 696c 2929 -load-list nil)) │ │ │ -00000250: 0a0a 0a28 6279 7465 2d63 6f64 6520 22c4 ...(byte-code ". │ │ │ -00000260: 0d42 15c6 14c3 0d42 15c7 13c2 0d42 15c8 .B.....B.....B.. │ │ │ -00000270: 12c1 0d42 15c9 11c0 0d42 15ca 10c7 c64d ...B.....B.....M │ │ │ -00000280: 8722 205b 6271 2d64 6f74 2d6d 6172 6b65 ." [bq-dot-marke │ │ │ -00000290: 7220 6271 2d61 742d 6d61 726b 6572 2062 r bq-at-marker b │ │ │ -000002a0: 712d 636f 6d6d 612d 6d61 726b 6572 2062 q-comma-marker b │ │ │ -000002b0: 712d 6261 636b 7469 636b 2d6d 6172 6b65 q-backtick-marke │ │ │ -000002c0: 7220 6271 2d62 6163 6b71 756f 7465 2d6d r bq-backquote-m │ │ │ -000002d0: 6172 6b65 7220 6375 7272 656e 742d 6c6f arker current-lo │ │ │ -000002e0: 6164 2d6c 6973 7420 6261 636b 7175 6f74 ad-list backquot │ │ │ -000002f0: 6520 5c60 205c 2c20 5c2c 4020 5c2c 5c2e e \` \, \,@ \,\. │ │ │ -00000300: 5d20 3229 0a23 4032 3633 3820 4578 7061 ] 2).#@2638 Expa │ │ │ -00000310: 6e64 2074 6865 2069 6e74 6572 6e61 6c20 nd the internal │ │ │ -00000320: 7265 7072 6573 656e 7461 7469 6f6e 206f representation o │ │ │ -00000330: 6620 6120 6261 636b 7175 6f74 6564 2054 f a backquoted T │ │ │ -00000340: 454d 504c 4154 4520 696e 746f 2061 206c EMPLATE into a l │ │ │ -00000350: 6973 7020 666f 726d 2e0a 0a54 6865 2062 isp form...The b │ │ │ -00000360: 6163 6b71 756f 7465 2063 6861 7261 6374 ackquote charact │ │ │ -00000370: 6572 2069 7320 6c69 6b65 2074 6865 2071 er is like the q │ │ │ -00000380: 756f 7465 2063 6861 7261 6374 6572 2069 uote character i │ │ │ -00000390: 6e20 7468 6174 2069 7420 7072 6576 656e n that it preven │ │ │ -000003a0: 7473 2074 6865 0a74 656d 706c 6174 6520 ts the.template │ │ │ -000003b0: 7768 6963 6820 666f 6c6c 6f77 7320 6974 which follows it │ │ │ -000003c0: 2066 726f 6d20 6265 696e 6720 6576 616c from being eval │ │ │ -000003d0: 7561 7465 642c 2065 7863 6570 7420 7468 uated, except th │ │ │ -000003e0: 6174 2062 6163 6b71 756f 7465 0a70 6572 at backquote.per │ │ │ -000003f0: 6d69 7473 2079 6f75 2074 6f20 6576 616c mits you to eval │ │ │ -00000400: 7561 7465 2070 6f72 7469 6f6e 7320 6f66 uate portions of │ │ │ -00000410: 2074 6865 2071 756f 7465 6420 7465 6d70 the quoted temp │ │ │ -00000420: 6c61 7465 2e20 2041 2063 6f6d 6d61 2063 late. A comma c │ │ │ -00000430: 6861 7261 6374 6572 0a69 6e73 6964 6520 haracter.inside │ │ │ -00000440: 5445 4d50 4c41 5445 2069 6e64 6963 6174 TEMPLATE indicat │ │ │ -00000450: 6573 2074 6861 7420 7468 6520 666f 6c6c es that the foll │ │ │ -00000460: 6f77 696e 6720 6974 656d 2073 686f 756c owing item shoul │ │ │ -00000470: 6420 6265 2065 7661 6c75 6174 6564 2e20 d be evaluated. │ │ │ -00000480: 2041 0a63 6f6d 6d61 2063 6861 7261 6374 A.comma charact │ │ │ -00000490: 6572 206d 6179 2062 6520 666f 6c6c 6f77 er may be follow │ │ │ -000004a0: 6564 2062 7920 616e 2061 742d 7369 676e ed by an at-sign │ │ │ -000004b0: 2c20 7768 6963 6820 696e 6469 6361 7465 , which indicate │ │ │ -000004c0: 7320 7468 6174 2074 6865 2066 6f72 6d0a s that the form. │ │ │ -000004d0: 7768 6963 6820 666f 6c6c 6f77 7320 7368 which follows sh │ │ │ -000004e0: 6f75 6c64 2062 6520 6576 616c 7561 7465 ould be evaluate │ │ │ -000004f0: 6420 616e 6420 696e 7365 7274 6564 2061 d and inserted a │ │ │ -00000500: 6e64 2022 7370 6c69 6365 6422 2069 6e74 nd "spliced" int │ │ │ -00000510: 6f20 7468 650a 7465 6d70 6c61 7465 2e20 o the.template. │ │ │ -00000520: 2046 6f72 6d73 2066 6f6c 6c6f 7769 6e67 Forms following │ │ │ -00000530: 202c 4020 6d75 7374 2065 7661 6c75 6174 ,@ must evaluat │ │ │ -00000540: 6520 746f 206c 6973 7473 2e0a 0a48 6572 e to lists...Her │ │ │ -00000550: 6520 6973 2068 6f77 2074 6f20 7573 6520 e is how to use │ │ │ -00000560: 6261 636b 7175 6f74 6573 3a0a 2020 2873 backquotes:. (s │ │ │ -00000570: 6574 7120 7020 2762 0a20 2020 2020 2020 etq p 'b. │ │ │ -00000580: 2071 2027 2863 2064 2065 2929 0a20 2060 q '(c d e)). ` │ │ │ -00000590: 2861 202c 7020 2c40 7129 2020 202d 3e20 (a ,p ,@q) -> │ │ │ -000005a0: 2861 2062 2063 2064 2065 290a 2020 6028 (a b c d e). `( │ │ │ -000005b0: 6120 2e20 6229 2020 2020 2020 2d3e 2028 a . b) -> ( │ │ │ -000005c0: 6120 2e20 6229 0a20 2060 2861 202e 202c a . b). `(a . , │ │ │ -000005d0: 7029 2020 2020 202d 3e20 2861 202e 2062 p) -> (a . b │ │ │ -000005e0: 290a 0a54 6865 2058 456d 6163 7320 6c69 )..The XEmacs li │ │ │ -000005f0: 7370 2072 6561 6465 7220 6578 7061 6e64 sp reader expand │ │ │ -00000600: 7320 6c69 7370 2062 6163 6b71 756f 7465 s lisp backquote │ │ │ -00000610: 7320 6173 2069 7420 7265 6164 7320 7468 s as it reads th │ │ │ -00000620: 656d 2e0a 4578 616d 706c 6573 3a0a 2020 em..Examples:. │ │ │ -00000630: 6061 746f 6d20 2020 2020 2020 2020 2020 `atom │ │ │ -00000640: 2020 6973 2072 6561 6420 6173 2028 6261 is read as (ba │ │ │ -00000650: 636b 7175 6f74 6520 6174 6f6d 290a 2020 ckquote atom). │ │ │ -00000660: 6028 6120 2c62 202c 4028 6320 6420 6529 `(a ,b ,@(c d e) │ │ │ -00000670: 2920 6973 2072 6561 6420 6173 2028 6261 ) is read as (ba │ │ │ -00000680: 636b 7175 6f74 6520 2861 2028 5c2c 2062 ckquote (a (\, b │ │ │ -00000690: 2920 285c 2c5c 4020 2863 2064 2065 2929 ) (\,\@ (c d e)) │ │ │ -000006a0: 2929 0a20 2060 2861 202e 202c 7029 2020 )). `(a . ,p) │ │ │ -000006b0: 2020 2020 2020 2069 7320 7265 6164 2061 is read a │ │ │ -000006c0: 7320 2862 6163 6b71 756f 7465 2028 6120 s (backquote (a │ │ │ -000006d0: 5c2c 2070 2929 0a0a 2862 6163 6b71 756f \, p))..(backquo │ │ │ -000006e0: 7465 2054 454d 504c 4154 4529 2069 7320 te TEMPLATE) is │ │ │ -000006f0: 6120 6d61 6372 6f20 7468 6174 2070 726f a macro that pro │ │ │ -00000700: 6475 6365 7320 636f 6465 2074 6f20 636f duces code to co │ │ │ -00000710: 6e73 7472 7563 7420 5445 4d50 4c41 5445 nstruct TEMPLATE │ │ │ -00000720: 2e0a 4e6f 7465 2074 6861 7420 7468 6973 ..Note that this │ │ │ -00000730: 2069 7320 7665 7279 2073 6c6f 7720 696e is very slow in │ │ │ -00000740: 2069 6e74 6572 7072 6574 6564 2063 6f64 interpreted cod │ │ │ -00000750: 652c 2062 7574 2066 6173 7420 6966 2079 e, but fast if y │ │ │ -00000760: 6f75 2063 6f6d 7069 6c65 2e0a 5445 4d50 ou compile..TEMP │ │ │ -00000770: 4c41 5445 2069 7320 6f6e 6520 6f72 206d LATE is one or m │ │ │ -00000780: 6f72 6520 6e65 7374 6564 206c 6973 7473 ore nested lists │ │ │ -00000790: 206f 7220 7665 6374 6f72 732c 2077 6869 or vectors, whi │ │ │ -000007a0: 6368 2061 7265 2060 616c 6d6f 7374 2071 ch are `almost q │ │ │ -000007b0: 756f 7465 6427 2e0a 5468 6579 2061 7265 uoted'..They are │ │ │ -000007c0: 2063 6f70 6965 6420 7265 6375 7273 6976 copied recursiv │ │ │ -000007d0: 656c 792c 2077 6974 6820 656c 656d 656e ely, with elemen │ │ │ -000007e0: 7473 2070 7265 6365 6465 6420 6279 2063 ts preceded by c │ │ │ -000007f0: 6f6d 6d61 2065 7661 6c75 6174 6564 2e0a omma evaluated.. │ │ │ -00000800: 2028 6261 636b 7175 6f74 6520 2861 2062 (backquote (a b │ │ │ -00000810: 2929 2020 2020 203d 3d20 286c 6973 7420 )) == (list │ │ │ -00000820: 2761 2027 6229 0a20 2862 6163 6b71 756f 'a 'b). (backquo │ │ │ -00000830: 7465 2028 6120 5b62 2063 5d29 2920 3d3d te (a [b c])) == │ │ │ -00000840: 2028 6c69 7374 2027 6120 2876 6563 746f (list 'a (vecto │ │ │ -00000850: 7220 2762 2027 6329 290a 0a48 6f77 6576 r 'b 'c))..Howev │ │ │ -00000860: 6572 2c20 6365 7274 6169 6e20 7370 6563 er, certain spec │ │ │ -00000870: 6961 6c20 6c69 7374 7320 6172 6520 6e6f ial lists are no │ │ │ -00000880: 7420 636f 7069 6564 2e20 2054 6865 7920 t copied. They │ │ │ -00000890: 7370 6563 6966 7920 7375 6273 7469 7475 specify substitu │ │ │ -000008a0: 7469 6f6e 2e0a 4c69 7374 7320 7468 6174 tion..Lists that │ │ │ -000008b0: 206c 6f6f 6b20 6c69 6b65 2028 5c2c 2045 look like (\, E │ │ │ -000008c0: 5850 2920 6172 6520 6576 616c 7561 7465 XP) are evaluate │ │ │ -000008d0: 6420 616e 6420 7468 6520 7265 7375 6c74 d and the result │ │ │ -000008e0: 2069 7320 7375 6273 7469 7475 7465 642e is substituted. │ │ │ -000008f0: 0a20 2862 6163 6b71 756f 7465 2028 6120 . (backquote (a │ │ │ -00000900: 285c 2c20 282b 2078 2035 2929 2929 203d (\, (+ x 5)))) = │ │ │ -00000910: 3d20 286c 6973 7420 2761 2028 2b20 7820 = (list 'a (+ x │ │ │ -00000920: 3529 290a 0a45 6c65 6d65 6e74 7320 6f66 5))..Elements of │ │ │ -00000930: 2074 6865 2066 6f72 6d20 285c 2c5c 4020 the form (\,\@ │ │ │ -00000940: 4558 5029 2061 7265 2065 7661 6c75 6174 EXP) are evaluat │ │ │ -00000950: 6564 2061 6e64 2074 6865 6e20 616c 6c20 ed and then all │ │ │ -00000960: 7468 6520 656c 656d 656e 7473 0a6f 6620 the elements.of │ │ │ -00000970: 7468 6520 7265 7375 6c74 2061 7265 2073 the result are s │ │ │ -00000980: 7562 7374 6974 7574 6564 2e20 2054 6869 ubstituted. Thi │ │ │ -00000990: 7320 7265 7375 6c74 206d 7573 7420 6265 s result must be │ │ │ -000009a0: 2061 206c 6973 743b 2069 7420 6d61 790a a list; it may. │ │ │ -000009b0: 6265 2060 6e69 6c27 2e0a 0a45 6c65 6d65 be `nil'...Eleme │ │ │ -000009c0: 6e74 7320 6f66 2074 6865 2066 6f72 6d20 nts of the form │ │ │ -000009d0: 285c 2c5c 2e20 4558 5029 2061 7265 2065 (\,\. EXP) are e │ │ │ -000009e0: 7661 6c75 6174 6564 2061 6e64 2074 6865 valuated and the │ │ │ -000009f0: 6e20 616c 6c20 7468 6520 656c 656d 656e n all the elemen │ │ │ -00000a00: 7473 0a6f 6620 7468 6520 7265 7375 6c74 ts.of the result │ │ │ -00000a10: 2061 7265 2063 6f6e 6361 7465 6e61 7465 are concatenate │ │ │ -00000a20: 6420 746f 2074 6865 206c 6973 7420 6f66 d to the list of │ │ │ -00000a30: 2070 7265 6365 6469 6e67 2065 6c65 6d65 preceding eleme │ │ │ -00000a40: 6e74 7320 696e 2074 6865 206c 6973 742e nts in the list. │ │ │ -00000a50: 0a54 6865 7920 6d75 7374 206f 6363 7572 .They must occur │ │ │ -00000a60: 2061 7320 7468 6520 6c61 7374 2065 6c65 as the last ele │ │ │ -00000a70: 6d65 6e74 206f 6620 6120 6c69 7374 2028 ment of a list ( │ │ │ -00000a80: 6e6f 7420 6120 7665 6374 6f72 292e 0a45 not a vector)..E │ │ │ -00000a90: 5850 206d 6179 2065 7661 6c75 6174 6520 XP may evaluate │ │ │ -00000aa0: 746f 206e 696c 2e0a 0a41 7320 616e 2065 to nil...As an e │ │ │ -00000ab0: 7861 6d70 6c65 2c20 6120 7369 6d70 6c65 xample, a simple │ │ │ -00000ac0: 206d 6163 726f 2060 7075 7368 2720 636f macro `push' co │ │ │ -00000ad0: 756c 6420 6265 2077 7269 7474 656e 3a0a uld be written:. │ │ │ -00000ae0: 2020 2028 6465 666d 6163 726f 2070 7573 (defmacro pus │ │ │ -00000af0: 6820 2876 206c 290a 2020 2020 2060 2873 h (v l). `(s │ │ │ -00000b00: 6574 7120 2c6c 2028 636f 6e73 202c 4028 etq ,l (cons ,@( │ │ │ -00000b10: 6c69 7374 2076 206c 2929 2929 0a6f 7220 list v l)))).or │ │ │ -00000b20: 6173 0a20 2020 2864 6566 6d61 6372 6f20 as. (defmacro │ │ │ -00000b30: 7075 7368 2028 7620 6c29 0a20 2020 2020 push (v l). │ │ │ -00000b40: 6028 7365 7471 202c 6c20 2863 6f6e 7320 `(setq ,l (cons │ │ │ -00000b50: 2c76 202c 6c29 2929 0a0a 466f 7220 6261 ,v ,l)))..For ba │ │ │ -00000b60: 636b 7761 7264 7320 636f 6d70 6174 6962 ckwards compatib │ │ │ -00000b70: 696c 6974 792c 206f 6c64 2d73 7479 6c65 ility, old-style │ │ │ -00000b80: 2065 6d61 6373 2d6c 6973 7020 6261 636b emacs-lisp back │ │ │ -00000b90: 7175 6f74 6573 2061 7265 2073 7469 6c6c quotes are still │ │ │ -00000ba0: 2072 6561 642e 0a20 2020 2020 4f4c 4420 read.. OLD │ │ │ -00000bb0: 5354 594c 4520 2020 2020 2020 2020 2020 STYLE │ │ │ -00000bc0: 2020 2020 2020 2020 2020 2020 204e 4557 NEW │ │ │ -00000bd0: 2053 5459 4c45 0a20 2020 2020 2860 2028 STYLE. (` ( │ │ │ -00000be0: 666f 6f20 282c 2062 6172 2920 282c 4020 foo (, bar) (,@ │ │ │ -00000bf0: 6269 6e67 2929 2920 2020 2020 2060 2866 bing))) `(f │ │ │ -00000c00: 6f6f 202c 6261 7220 2c40 6269 6e67 290a oo ,bar ,@bing). │ │ │ -00000c10: 0a42 6563 6175 7365 206f 6620 7468 6520 .Because of the │ │ │ -00000c20: 6f6c 642d 7374 796c 6520 6261 636b 7175 old-style backqu │ │ │ -00000c30: 6f74 6520 7375 7070 6f72 742c 2079 6f75 ote support, you │ │ │ -00000c40: 2063 616e 6e6f 7420 7573 6520 6120 6e65 cannot use a ne │ │ │ -00000c50: 772d 7374 796c 650a 6261 636b 7175 6f74 w-style.backquot │ │ │ -00000c60: 6564 2066 6f72 6d20 6173 2074 6865 2066 ed form as the f │ │ │ -00000c70: 6972 7374 2065 6c65 6d65 6e74 206f 6620 irst element of │ │ │ -00000c80: 6120 6c69 7374 2e20 2050 6572 6861 7073 a list. Perhaps │ │ │ -00000c90: 2073 6f6d 6520 6461 7920 7468 6973 0a72 some day this.r │ │ │ -00000ca0: 6573 7472 6963 7469 6f6e 2077 696c 6c20 estriction will │ │ │ -00000cb0: 676f 2061 7761 792c 2062 7574 2066 6f72 go away, but for │ │ │ -00000cc0: 206e 6f77 2079 6f75 2073 686f 756c 6420 now you should │ │ │ -00000cd0: 6265 2077 6172 7920 6f66 2069 743a 0a20 be wary of it:. │ │ │ -00000ce0: 2020 2028 6028 7468 6973 202c 7769 6c6c (`(this ,will │ │ │ -00000cf0: 202c 4066 6169 6c29 290a 2020 2020 2828 ,@fail)). (( │ │ │ -00000d00: 6020 2862 7574 2028 2c20 7468 6973 2920 ` (but (, this) │ │ │ -00000d10: 7769 6c6c 2028 2c40 2077 6f72 6b29 2929 will (,@ work))) │ │ │ -00000d20: 290a 5468 6973 2069 7320 616e 2065 7874 ).This is an ext │ │ │ -00000d30: 7265 6d65 6c79 2072 6172 6520 7468 696e remely rare thin │ │ │ -00000d40: 6720 746f 206e 6565 6420 746f 2064 6f20 g to need to do │ │ │ -00000d50: 696e 206c 6973 702e 1f0a 2864 6566 616c in lisp...(defal │ │ │ -00000d60: 6961 7320 2762 6163 6b71 756f 7465 2027 ias 'backquote ' │ │ │ -00000d70: 286d 6163 726f 202e 2023 5b28 7465 6d70 (macro . #[(temp │ │ │ -00000d80: 6c61 7465 2920 22c1 0821 8722 205b 7465 late) "..!." [te │ │ │ -00000d90: 6d70 6c61 7465 2062 712d 7072 6f63 6573 mplate bq-proces │ │ │ -00000da0: 735d 2032 2028 2324 202e 2037 3830 295d s] 2 (#$ . 780)] │ │ │ -00000db0: 2929 0a28 6279 7465 2d63 6f64 6520 22c2 )).(byte-code ". │ │ │ -00000dc0: 0b42 13c4 12c1 0b42 13c5 11c0 0b42 13c6 .B.....B.....B.. │ │ │ -00000dd0: 10c2 8722 205b 6271 2d64 6f74 2d66 6c61 ..." [bq-dot-fla │ │ │ -00000de0: 6720 6271 2d61 742d 666c 6167 2062 712d g bq-at-flag bq- │ │ │ -00000df0: 636f 6d6d 612d 666c 6167 2063 7572 7265 comma-flag curre │ │ │ -00000e00: 6e74 2d6c 6f61 642d 6c69 7374 2075 6e71 nt-load-list unq │ │ │ -00000e10: 756f 7465 2075 6e71 756f 7465 2d73 706c uote unquote-spl │ │ │ -00000e20: 6963 696e 6720 756e 7175 6f74 652d 6e63 icing unquote-nc │ │ │ -00000e30: 6f6e 632d 7370 6c69 6369 6e67 5d20 3229 onc-splicing] 2) │ │ │ -00000e40: 0a28 6465 6661 6c69 6173 2027 6271 2d70 .(defalias 'bq-p │ │ │ -00000e50: 726f 6365 7373 2023 5b28 666f 726d 2920 rocess #[(form) │ │ │ -00000e60: 22c6 0c21 891b 401d 0b41 1a0d 0961 ab86 "..!..@..A...a.. │ │ │ -00000e70: c7c8 0c5c 22aa 8f0d 0861 ab86 c7c9 0c5c ...\"....a.....\ │ │ │ -00000e80: 22aa 84ca 0d5c 6e5c 222b 8722 205b 6271 "....\n\"+." [bq │ │ │ -00000e90: 2d64 6f74 2d66 6c61 6720 6271 2d61 742d -dot-flag bq-at- │ │ │ -00000ea0: 666c 6167 2072 6573 756c 7420 666c 6167 flag result flag │ │ │ -00000eb0: 2d72 6573 756c 7420 666f 726d 2066 6c61 -result form fla │ │ │ -00000ec0: 6720 6271 2d70 726f 6365 7373 2d32 2065 g bq-process-2 e │ │ │ -00000ed0: 7272 6f72 2022 2c40 2061 6674 6572 2060 rror ",@ after ` │ │ │ -00000ee0: 2069 6e20 666f 726d 3a20 2573 2220 222c in form: %s" ", │ │ │ -00000ef0: 2e20 6166 7465 7220 6020 696e 2066 6f72 . after ` in for │ │ │ -00000f00: 6d3a 2025 7322 2062 712d 7072 6f63 6573 m: %s" bq-proces │ │ │ -00000f10: 732d 315d 2034 5d29 0a28 6465 6661 6c69 s-1] 4]).(defali │ │ │ -00000f20: 6173 2027 6271 2d76 6563 746f 722d 636f as 'bq-vector-co │ │ │ -00000f30: 6e74 656e 7473 2023 5b28 7665 6329 2022 ntents #[(vec) " │ │ │ -00000f40: c308 471a 195c 6ec4 56ab 8b5c 6e53 1208 ..G..\n.V..\nS.. │ │ │ -00000f50: 5c6e 4809 4211 aa70 092a 8722 205b 7665 \nH.B..p.*." [ve │ │ │ -00000f60: 6320 636f 6e74 656e 7473 206e 206e 696c c contents n nil │ │ │ -00000f70: 2030 5d20 325d 290a 2864 6566 616c 6961 0] 2]).(defalia │ │ │ -00000f80: 7320 2762 712d 7072 6f63 6573 732d 3220 s 'bq-process-2 │ │ │ -00000f90: 235b 2863 6f64 6529 2022 c60d 21ab 90c7 #[(code) "..!... │ │ │ -00000fa0: c80d 2121 18c9 ca08 4008 415c 2229 4287 ..!!....@.A\")B. │ │ │ -00000fb0: 0d3a ac98 0dac 84cb 8942 870d a7ac 850d .:.......B...... │ │ │ -00000fc0: cc61 ab84 cc0d 4287 cd0d 4287 0d40 0e1e .a....B...B..@.. │ │ │ -00000fd0: 61ab 870e 1b0d 4140 4287 0d40 0e1f 61ab a.....A@B..@..a. │ │ │ -00000fe0: 870e 1c0d 4140 4287 0d40 0e20 61ab 86ce ....A@B..@. a... │ │ │ -00000ff0: 0d41 4021 870d 400e 2161 ac87 0d40 0e5c .A@!..@.!a...@.\ │ │ │ -00001000: 2261 ab88 c7cf 0d41 4021 2187 c70d 4021 "a.....A@!!...@! │ │ │ -00001010: 891e 1d40 190e 1d41 1cc7 0d41 2189 1840 ...@...A...A!..@ │ │ │ -00001020: 1b08 411a 0b0e 1b61 ab85 d0d1 0d5c 2288 ..A....a.....\". │ │ │ -00001030: 0b0e 1c61 ab85 d0d2 0d5c 2288 090e 1b61 ...a.....\"....a │ │ │ -00001040: ab9d 0bac 86ce 0c21 8231 01d3 0bd3 61ab .......!.1....a. │ │ │ -00001050: 850c 5c6e 42aa 860c ca0b 5c6e 5c22 4442 ..\nB.....\n\"DB │ │ │ -00001060: aaf0 090e 1c61 ab9c 0bac 85ce 0c21 aae2 .....a.......!.. │ │ │ -00001070: d40b d461 ab85 0c5c 6e42 aa86 0cca 0b5c ...a...\nB.....\ │ │ │ -00001080: 6e5c 2244 42aa ce0b ac94 09d5 73ab 86cd n\"DB.......s... │ │ │ -00001090: 0c43 42aa c0d6 ca09 0c5c 2243 42aa b70b .CB......\"CB... │ │ │ -000010a0: d773 ab99 09d8 73ab 87cd 0c5c 6e42 42aa .s....s....\nBB. │ │ │ -000010b0: a6d9 ca09 0c5c 22ca 0b5c 6e5c 2244 42aa .....\"..\n\"DB. │ │ │ -000010c0: 99ca 090c 5c22 140b da73 ab87 0b0c 5c6e ....\"...s....\n │ │ │ -000010d0: 4242 aa88 d90c ca0b 5c6e 5c22 4442 2e06 BB......\n\"DB.. │ │ │ -000010e0: 8722 205b 6466 6c61 672d 6420 6166 6c61 ." [dflag-d afla │ │ │ -000010f0: 6720 6420 6466 6c61 6720 6120 636f 6465 g d dflag a code │ │ │ -00001100: 2076 6563 746f 7270 2062 712d 7072 6f63 vectorp bq-proc │ │ │ -00001110: 6573 732d 3220 6271 2d76 6563 746f 722d ess-2 bq-vector- │ │ │ -00001120: 636f 6e74 656e 7473 2076 6563 746f 7220 contents vector │ │ │ -00001130: 6271 2d70 726f 6365 7373 2d31 206e 696c bq-process-1 nil │ │ │ -00001140: 2074 2071 756f 7465 2062 712d 636f 6d6d t quote bq-comm │ │ │ -00001150: 6120 6271 2d70 726f 6365 7373 2065 7272 a bq-process err │ │ │ -00001160: 6f72 2022 2c40 2061 6674 6572 2064 6f74 or ",@ after dot │ │ │ -00001170: 2069 6e20 2573 2220 222c 2e20 6166 7465 in %s" ",. afte │ │ │ -00001180: 7220 646f 7420 696e 2025 7322 2061 7070 r dot in %s" app │ │ │ -00001190: 656e 6420 6e63 6f6e 6320 2871 756f 7465 end nconc (quote │ │ │ -000011a0: 2074 206e 696c 2920 6c69 7374 2027 7420 t nil) list 't │ │ │ -000011b0: 2871 756f 7465 2074 206e 696c 2920 6c69 (quote t nil) li │ │ │ -000011c0: 7374 2a20 286c 6973 7420 6c69 7374 2a29 st* (list list*) │ │ │ -000011d0: 2062 712d 6174 2d66 6c61 6720 6271 2d64 bq-at-flag bq-d │ │ │ -000011e0: 6f74 2d66 6c61 6720 6166 6c61 672d 6120 ot-flag aflag-a │ │ │ -000011f0: 6271 2d61 742d 6d61 726b 6572 2062 712d bq-at-marker bq- │ │ │ -00001200: 646f 742d 6d61 726b 6572 2062 712d 636f dot-marker bq-co │ │ │ -00001210: 6d6d 612d 6d61 726b 6572 2062 712d 6261 mma-marker bq-ba │ │ │ -00001220: 636b 7175 6f74 652d 6d61 726b 6572 2062 ckquote-marker b │ │ │ -00001230: 712d 6261 636b 7469 636b 2d6d 6172 6b65 q-backtick-marke │ │ │ -00001240: 725d 2036 5d29 0a28 6465 6661 6c69 6173 r] 6]).(defalias │ │ │ -00001250: 2027 6271 2d63 6f6d 6d61 2023 5b28 636f 'bq-comma #[(co │ │ │ -00001260: 6465 2920 2209 3aac 9809 ac84 c289 4287 de) ".:.......B. │ │ │ -00001270: 09a7 ac85 09c3 61ab 84c3 0942 8708 0942 ......a....B...B │ │ │ -00001280: 8709 40c4 61ab 8709 4009 4140 4287 0940 ..@.a...@.A@B..@ │ │ │ -00001290: c573 ab86 0940 0941 4287 0940 c661 ab85 .s...@.AB..@.a.. │ │ │ -000012a0: c709 4142 8708 0942 8722 205b 6271 2d63 ..AB...B." [bq-c │ │ │ -000012b0: 6f6d 6d61 2d66 6c61 6720 636f 6465 206e omma-flag code n │ │ │ -000012c0: 696c 2074 2071 756f 7465 2028 6170 7065 il t quote (appe │ │ │ -000012d0: 6e64 206c 6973 7420 6c69 7374 2a20 6e63 nd list list* nc │ │ │ -000012e0: 6f6e 6329 2063 6f6e 7320 6c69 7374 2a5d onc) cons list*] │ │ │ -000012f0: 2032 5d29 0a28 6465 6661 6c69 6173 2027 2]).(defalias ' │ │ │ -00001300: 6271 2d70 726f 6365 7373 2d31 2023 5b28 bq-process-1 #[( │ │ │ -00001310: 666c 6167 2074 6869 6e67 2920 225c 6e08 flag thing) "\n. │ │ │ -00001320: 61ac 855c 6ec3 73ab 8209 875c 6ec4 61ab a..\n.s....\n.a. │ │ │ -00001330: 84c4 0944 875c 6ec5 61ab 85c6 c709 4587 ...D.\n.a.....E. │ │ │ -00001340: 5c6e c8b7 4109 4287 2220 5b62 712d 636f \n..A.B." [bq-co │ │ │ -00001350: 6d6d 612d 666c 6167 2074 6869 6e67 2066 mma-flag thing f │ │ │ -00001360: 6c61 6720 2874 206e 696c 2920 7175 6f74 lag (t nil) quot │ │ │ -00001370: 6520 7665 6374 6f72 2061 7070 6c79 2028 e vector apply ( │ │ │ -00001380: 6675 6e63 7469 6f6e 2076 6563 746f 7229 function vector) │ │ │ -00001390: 2028 2863 6f6e 7320 2e20 636f 6e73 2920 ((cons . cons) │ │ │ -000013a0: 286c 6973 742a 202e 2062 712d 6c69 7374 (list* . bq-list │ │ │ -000013b0: 2a29 2028 6c69 7374 202e 206c 6973 7429 *) (list . list) │ │ │ -000013c0: 2028 6170 7065 6e64 202e 2061 7070 656e (append . appen │ │ │ -000013d0: 6429 2028 6e63 6f6e 6320 2e20 6e63 6f6e d) (nconc . ncon │ │ │ -000013e0: 6329 295d 2033 5d29 0a23 4036 3220 5265 c))] 3]).#@62 Re │ │ │ -000013f0: 7475 726e 2061 206c 6973 7420 6f66 2069 turn a list of i │ │ │ -00001400: 7473 2061 7267 756d 656e 7473 2077 6974 ts arguments wit │ │ │ -00001410: 6820 6c61 7374 2063 6f6e 7320 6120 646f h last cons a do │ │ │ -00001420: 7474 6564 2070 6169 722e 1f0a 2864 6566 tted pair...(def │ │ │ -00001430: 616c 6961 7320 2762 712d 6c69 7374 2a20 alias 'bq-list* │ │ │ -00001440: 2728 6d61 6372 6f20 2e20 235b 2826 7265 '(macro . #[(&re │ │ │ -00001450: 7374 2061 7267 7329 2022 c209 2189 1140 st args) "..!..@ │ │ │ -00001460: 1809 4189 11ab 8cc3 0940 0845 1009 4189 ..A......@.E..A. │ │ │ -00001470: 11ac 7408 2987 2220 5b72 6573 756c 7420 ..t.)." [result │ │ │ -00001480: 6172 6773 2072 6576 6572 7365 2063 6f6e args reverse con │ │ │ -00001490: 735d 2034 2028 2324 202e 2035 3130 3229 s] 4 (#$ . 5102) │ │ │ -000014a0: 5d29 290a 2870 726f 7669 6465 2027 6261 ])).(provide 'ba │ │ │ -000014b0: 636b 7175 6f74 6529 0a ckquote). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3036 2032 3032 310a 3b3b 3b20 :08:06 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f62 6163 6b71 756f 7465 4/lisp/backquote │ │ │ +00000090: 2e65 6c0a 3b3b 3b20 656d 6163 7320 7665 .el.;;; emacs ve │ │ │ +000000a0: 7273 696f 6e20 3231 2e34 2028 7061 7463 rsion 21.4 (patc │ │ │ +000000b0: 6820 3234 2920 2253 7461 6e64 6172 6420 h 24) "Standard │ │ │ +000000c0: 4322 2058 456d 6163 7320 4c75 6369 642e C" XEmacs Lucid. │ │ │ +000000d0: 0a3b 3b3b 2062 7974 6563 6f6d 7020 7665 .;;; bytecomp ve │ │ │ +000000e0: 7273 696f 6e20 322e 3237 2058 456d 6163 rsion 2.27 XEmac │ │ │ +000000f0: 733b 2032 3030 302d 3039 2d31 322e 0a3b s; 2000-09-12..; │ │ │ +00000100: 3b3b 206f 7074 696d 697a 6174 696f 6e20 ;; optimization │ │ │ +00000110: 6973 206f 6e2e 0a3b 3b3b 2074 6869 7320 is on..;;; this │ │ │ +00000120: 6669 6c65 2075 7365 7320 6f70 636f 6465 file uses opcode │ │ │ +00000130: 7320 7768 6963 6820 646f 206e 6f74 2065 s which do not e │ │ │ +00000140: 7869 7374 2069 6e20 456d 6163 7320 3139 xist in Emacs 19 │ │ │ +00000150: 2e0a 0a28 6966 2028 616e 6420 2862 6f75 ...(if (and (bou │ │ │ +00000160: 6e64 7020 2765 6d61 6373 2d76 6572 7369 ndp 'emacs-versi │ │ │ +00000170: 6f6e 290a 0920 286f 7220 2861 6e64 2028 on).. (or (and ( │ │ │ +00000180: 626f 756e 6470 2027 6570 6f63 683a 3a76 boundp 'epoch::v │ │ │ +00000190: 6572 7369 6f6e 2920 6570 6f63 683a 3a76 ersion) epoch::v │ │ │ +000001a0: 6572 7369 6f6e 290a 0920 2020 2020 2873 ersion).. (s │ │ │ +000001b0: 7472 696e 672d 6c65 7373 7020 656d 6163 tring-lessp emac │ │ │ +000001c0: 732d 7665 7273 696f 6e20 2232 3022 2929 s-version "20")) │ │ │ +000001d0: 290a 2020 2020 2865 7272 6f72 2022 6062 ). (error "`b │ │ │ +000001e0: 6163 6b71 756f 7465 2e65 6c27 2077 6173 ackquote.el' was │ │ │ +000001f0: 2063 6f6d 7069 6c65 6420 666f 7220 456d compiled for Em │ │ │ +00000200: 6163 7320 3230 2229 290a 0a28 6f72 2028 acs 20"))..(or ( │ │ │ +00000210: 626f 756e 6470 2027 6375 7272 656e 742d boundp 'current- │ │ │ +00000220: 6c6f 6164 2d6c 6973 7429 2028 7365 7471 load-list) (setq │ │ │ +00000230: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ +00000240: 7374 206e 696c 2929 0a0a 0a28 6279 7465 st nil))...(byte │ │ │ +00000250: 2d63 6f64 6520 22c4 0d42 15c6 14c3 0d42 -code "..B.....B │ │ │ +00000260: 15c7 13c2 0d42 15c8 12c1 0d42 15c9 11c0 .....B.....B.... │ │ │ +00000270: 0d42 15ca 10c7 c64d 8722 205b 6271 2d64 .B.....M." [bq-d │ │ │ +00000280: 6f74 2d6d 6172 6b65 7220 6271 2d61 742d ot-marker bq-at- │ │ │ +00000290: 6d61 726b 6572 2062 712d 636f 6d6d 612d marker bq-comma- │ │ │ +000002a0: 6d61 726b 6572 2062 712d 6261 636b 7469 marker bq-backti │ │ │ +000002b0: 636b 2d6d 6172 6b65 7220 6271 2d62 6163 ck-marker bq-bac │ │ │ +000002c0: 6b71 756f 7465 2d6d 6172 6b65 7220 6375 kquote-marker cu │ │ │ +000002d0: 7272 656e 742d 6c6f 6164 2d6c 6973 7420 rrent-load-list │ │ │ +000002e0: 6261 636b 7175 6f74 6520 5c60 205c 2c20 backquote \` \, │ │ │ +000002f0: 5c2c 4020 5c2c 5c2e 5d20 3229 0a23 4032 \,@ \,\.] 2).#@2 │ │ │ +00000300: 3633 3820 4578 7061 6e64 2074 6865 2069 638 Expand the i │ │ │ +00000310: 6e74 6572 6e61 6c20 7265 7072 6573 656e nternal represen │ │ │ +00000320: 7461 7469 6f6e 206f 6620 6120 6261 636b tation of a back │ │ │ +00000330: 7175 6f74 6564 2054 454d 504c 4154 4520 quoted TEMPLATE │ │ │ +00000340: 696e 746f 2061 206c 6973 7020 666f 726d into a lisp form │ │ │ +00000350: 2e0a 0a54 6865 2062 6163 6b71 756f 7465 ...The backquote │ │ │ +00000360: 2063 6861 7261 6374 6572 2069 7320 6c69 character is li │ │ │ +00000370: 6b65 2074 6865 2071 756f 7465 2063 6861 ke the quote cha │ │ │ +00000380: 7261 6374 6572 2069 6e20 7468 6174 2069 racter in that i │ │ │ +00000390: 7420 7072 6576 656e 7473 2074 6865 0a74 t prevents the.t │ │ │ +000003a0: 656d 706c 6174 6520 7768 6963 6820 666f emplate which fo │ │ │ +000003b0: 6c6c 6f77 7320 6974 2066 726f 6d20 6265 llows it from be │ │ │ +000003c0: 696e 6720 6576 616c 7561 7465 642c 2065 ing evaluated, e │ │ │ +000003d0: 7863 6570 7420 7468 6174 2062 6163 6b71 xcept that backq │ │ │ +000003e0: 756f 7465 0a70 6572 6d69 7473 2079 6f75 uote.permits you │ │ │ +000003f0: 2074 6f20 6576 616c 7561 7465 2070 6f72 to evaluate por │ │ │ +00000400: 7469 6f6e 7320 6f66 2074 6865 2071 756f tions of the quo │ │ │ +00000410: 7465 6420 7465 6d70 6c61 7465 2e20 2041 ted template. A │ │ │ +00000420: 2063 6f6d 6d61 2063 6861 7261 6374 6572 comma character │ │ │ +00000430: 0a69 6e73 6964 6520 5445 4d50 4c41 5445 .inside TEMPLATE │ │ │ +00000440: 2069 6e64 6963 6174 6573 2074 6861 7420 indicates that │ │ │ +00000450: 7468 6520 666f 6c6c 6f77 696e 6720 6974 the following it │ │ │ +00000460: 656d 2073 686f 756c 6420 6265 2065 7661 em should be eva │ │ │ +00000470: 6c75 6174 6564 2e20 2041 0a63 6f6d 6d61 luated. A.comma │ │ │ +00000480: 2063 6861 7261 6374 6572 206d 6179 2062 character may b │ │ │ +00000490: 6520 666f 6c6c 6f77 6564 2062 7920 616e e followed by an │ │ │ +000004a0: 2061 742d 7369 676e 2c20 7768 6963 6820 at-sign, which │ │ │ +000004b0: 696e 6469 6361 7465 7320 7468 6174 2074 indicates that t │ │ │ +000004c0: 6865 2066 6f72 6d0a 7768 6963 6820 666f he form.which fo │ │ │ +000004d0: 6c6c 6f77 7320 7368 6f75 6c64 2062 6520 llows should be │ │ │ +000004e0: 6576 616c 7561 7465 6420 616e 6420 696e evaluated and in │ │ │ +000004f0: 7365 7274 6564 2061 6e64 2022 7370 6c69 serted and "spli │ │ │ +00000500: 6365 6422 2069 6e74 6f20 7468 650a 7465 ced" into the.te │ │ │ +00000510: 6d70 6c61 7465 2e20 2046 6f72 6d73 2066 mplate. Forms f │ │ │ +00000520: 6f6c 6c6f 7769 6e67 202c 4020 6d75 7374 ollowing ,@ must │ │ │ +00000530: 2065 7661 6c75 6174 6520 746f 206c 6973 evaluate to lis │ │ │ +00000540: 7473 2e0a 0a48 6572 6520 6973 2068 6f77 ts...Here is how │ │ │ +00000550: 2074 6f20 7573 6520 6261 636b 7175 6f74 to use backquot │ │ │ +00000560: 6573 3a0a 2020 2873 6574 7120 7020 2762 es:. (setq p 'b │ │ │ +00000570: 0a20 2020 2020 2020 2071 2027 2863 2064 . q '(c d │ │ │ +00000580: 2065 2929 0a20 2060 2861 202c 7020 2c40 e)). `(a ,p ,@ │ │ │ +00000590: 7129 2020 202d 3e20 2861 2062 2063 2064 q) -> (a b c d │ │ │ +000005a0: 2065 290a 2020 6028 6120 2e20 6229 2020 e). `(a . b) │ │ │ +000005b0: 2020 2020 2d3e 2028 6120 2e20 6229 0a20 -> (a . b). │ │ │ +000005c0: 2060 2861 202e 202c 7029 2020 2020 202d `(a . ,p) - │ │ │ +000005d0: 3e20 2861 202e 2062 290a 0a54 6865 2058 > (a . b)..The X │ │ │ +000005e0: 456d 6163 7320 6c69 7370 2072 6561 6465 Emacs lisp reade │ │ │ +000005f0: 7220 6578 7061 6e64 7320 6c69 7370 2062 r expands lisp b │ │ │ +00000600: 6163 6b71 756f 7465 7320 6173 2069 7420 ackquotes as it │ │ │ +00000610: 7265 6164 7320 7468 656d 2e0a 4578 616d reads them..Exam │ │ │ +00000620: 706c 6573 3a0a 2020 6061 746f 6d20 2020 ples:. `atom │ │ │ +00000630: 2020 2020 2020 2020 2020 6973 2072 6561 is rea │ │ │ +00000640: 6420 6173 2028 6261 636b 7175 6f74 6520 d as (backquote │ │ │ +00000650: 6174 6f6d 290a 2020 6028 6120 2c62 202c atom). `(a ,b , │ │ │ +00000660: 4028 6320 6420 6529 2920 6973 2072 6561 @(c d e)) is rea │ │ │ +00000670: 6420 6173 2028 6261 636b 7175 6f74 6520 d as (backquote │ │ │ +00000680: 2861 2028 5c2c 2062 2920 285c 2c5c 4020 (a (\, b) (\,\@ │ │ │ +00000690: 2863 2064 2065 2929 2929 0a20 2060 2861 (c d e)))). `(a │ │ │ +000006a0: 202e 202c 7029 2020 2020 2020 2020 2069 . ,p) i │ │ │ +000006b0: 7320 7265 6164 2061 7320 2862 6163 6b71 s read as (backq │ │ │ +000006c0: 756f 7465 2028 6120 5c2c 2070 2929 0a0a uote (a \, p)).. │ │ │ +000006d0: 2862 6163 6b71 756f 7465 2054 454d 504c (backquote TEMPL │ │ │ +000006e0: 4154 4529 2069 7320 6120 6d61 6372 6f20 ATE) is a macro │ │ │ +000006f0: 7468 6174 2070 726f 6475 6365 7320 636f that produces co │ │ │ +00000700: 6465 2074 6f20 636f 6e73 7472 7563 7420 de to construct │ │ │ +00000710: 5445 4d50 4c41 5445 2e0a 4e6f 7465 2074 TEMPLATE..Note t │ │ │ +00000720: 6861 7420 7468 6973 2069 7320 7665 7279 hat this is very │ │ │ +00000730: 2073 6c6f 7720 696e 2069 6e74 6572 7072 slow in interpr │ │ │ +00000740: 6574 6564 2063 6f64 652c 2062 7574 2066 eted code, but f │ │ │ +00000750: 6173 7420 6966 2079 6f75 2063 6f6d 7069 ast if you compi │ │ │ +00000760: 6c65 2e0a 5445 4d50 4c41 5445 2069 7320 le..TEMPLATE is │ │ │ +00000770: 6f6e 6520 6f72 206d 6f72 6520 6e65 7374 one or more nest │ │ │ +00000780: 6564 206c 6973 7473 206f 7220 7665 6374 ed lists or vect │ │ │ +00000790: 6f72 732c 2077 6869 6368 2061 7265 2060 ors, which are ` │ │ │ +000007a0: 616c 6d6f 7374 2071 756f 7465 6427 2e0a almost quoted'.. │ │ │ +000007b0: 5468 6579 2061 7265 2063 6f70 6965 6420 They are copied │ │ │ +000007c0: 7265 6375 7273 6976 656c 792c 2077 6974 recursively, wit │ │ │ +000007d0: 6820 656c 656d 656e 7473 2070 7265 6365 h elements prece │ │ │ +000007e0: 6465 6420 6279 2063 6f6d 6d61 2065 7661 ded by comma eva │ │ │ +000007f0: 6c75 6174 6564 2e0a 2028 6261 636b 7175 luated.. (backqu │ │ │ +00000800: 6f74 6520 2861 2062 2929 2020 2020 203d ote (a b)) = │ │ │ +00000810: 3d20 286c 6973 7420 2761 2027 6229 0a20 = (list 'a 'b). │ │ │ +00000820: 2862 6163 6b71 756f 7465 2028 6120 5b62 (backquote (a [b │ │ │ +00000830: 2063 5d29 2920 3d3d 2028 6c69 7374 2027 c])) == (list ' │ │ │ +00000840: 6120 2876 6563 746f 7220 2762 2027 6329 a (vector 'b 'c) │ │ │ +00000850: 290a 0a48 6f77 6576 6572 2c20 6365 7274 )..However, cert │ │ │ +00000860: 6169 6e20 7370 6563 6961 6c20 6c69 7374 ain special list │ │ │ +00000870: 7320 6172 6520 6e6f 7420 636f 7069 6564 s are not copied │ │ │ +00000880: 2e20 2054 6865 7920 7370 6563 6966 7920 . They specify │ │ │ +00000890: 7375 6273 7469 7475 7469 6f6e 2e0a 4c69 substitution..Li │ │ │ +000008a0: 7374 7320 7468 6174 206c 6f6f 6b20 6c69 sts that look li │ │ │ +000008b0: 6b65 2028 5c2c 2045 5850 2920 6172 6520 ke (\, EXP) are │ │ │ +000008c0: 6576 616c 7561 7465 6420 616e 6420 7468 evaluated and th │ │ │ +000008d0: 6520 7265 7375 6c74 2069 7320 7375 6273 e result is subs │ │ │ +000008e0: 7469 7475 7465 642e 0a20 2862 6163 6b71 tituted.. (backq │ │ │ +000008f0: 756f 7465 2028 6120 285c 2c20 282b 2078 uote (a (\, (+ x │ │ │ +00000900: 2035 2929 2929 203d 3d20 286c 6973 7420 5)))) == (list │ │ │ +00000910: 2761 2028 2b20 7820 3529 290a 0a45 6c65 'a (+ x 5))..Ele │ │ │ +00000920: 6d65 6e74 7320 6f66 2074 6865 2066 6f72 ments of the for │ │ │ +00000930: 6d20 285c 2c5c 4020 4558 5029 2061 7265 m (\,\@ EXP) are │ │ │ +00000940: 2065 7661 6c75 6174 6564 2061 6e64 2074 evaluated and t │ │ │ +00000950: 6865 6e20 616c 6c20 7468 6520 656c 656d hen all the elem │ │ │ +00000960: 656e 7473 0a6f 6620 7468 6520 7265 7375 ents.of the resu │ │ │ +00000970: 6c74 2061 7265 2073 7562 7374 6974 7574 lt are substitut │ │ │ +00000980: 6564 2e20 2054 6869 7320 7265 7375 6c74 ed. This result │ │ │ +00000990: 206d 7573 7420 6265 2061 206c 6973 743b must be a list; │ │ │ +000009a0: 2069 7420 6d61 790a 6265 2060 6e69 6c27 it may.be `nil' │ │ │ +000009b0: 2e0a 0a45 6c65 6d65 6e74 7320 6f66 2074 ...Elements of t │ │ │ +000009c0: 6865 2066 6f72 6d20 285c 2c5c 2e20 4558 he form (\,\. EX │ │ │ +000009d0: 5029 2061 7265 2065 7661 6c75 6174 6564 P) are evaluated │ │ │ +000009e0: 2061 6e64 2074 6865 6e20 616c 6c20 7468 and then all th │ │ │ +000009f0: 6520 656c 656d 656e 7473 0a6f 6620 7468 e elements.of th │ │ │ +00000a00: 6520 7265 7375 6c74 2061 7265 2063 6f6e e result are con │ │ │ +00000a10: 6361 7465 6e61 7465 6420 746f 2074 6865 catenated to the │ │ │ +00000a20: 206c 6973 7420 6f66 2070 7265 6365 6469 list of precedi │ │ │ +00000a30: 6e67 2065 6c65 6d65 6e74 7320 696e 2074 ng elements in t │ │ │ +00000a40: 6865 206c 6973 742e 0a54 6865 7920 6d75 he list..They mu │ │ │ +00000a50: 7374 206f 6363 7572 2061 7320 7468 6520 st occur as the │ │ │ +00000a60: 6c61 7374 2065 6c65 6d65 6e74 206f 6620 last element of │ │ │ +00000a70: 6120 6c69 7374 2028 6e6f 7420 6120 7665 a list (not a ve │ │ │ +00000a80: 6374 6f72 292e 0a45 5850 206d 6179 2065 ctor)..EXP may e │ │ │ +00000a90: 7661 6c75 6174 6520 746f 206e 696c 2e0a valuate to nil.. │ │ │ +00000aa0: 0a41 7320 616e 2065 7861 6d70 6c65 2c20 .As an example, │ │ │ +00000ab0: 6120 7369 6d70 6c65 206d 6163 726f 2060 a simple macro ` │ │ │ +00000ac0: 7075 7368 2720 636f 756c 6420 6265 2077 push' could be w │ │ │ +00000ad0: 7269 7474 656e 3a0a 2020 2028 6465 666d ritten:. (defm │ │ │ +00000ae0: 6163 726f 2070 7573 6820 2876 206c 290a acro push (v l). │ │ │ +00000af0: 2020 2020 2060 2873 6574 7120 2c6c 2028 `(setq ,l ( │ │ │ +00000b00: 636f 6e73 202c 4028 6c69 7374 2076 206c cons ,@(list v l │ │ │ +00000b10: 2929 2929 0a6f 7220 6173 0a20 2020 2864 )))).or as. (d │ │ │ +00000b20: 6566 6d61 6372 6f20 7075 7368 2028 7620 efmacro push (v │ │ │ +00000b30: 6c29 0a20 2020 2020 6028 7365 7471 202c l). `(setq , │ │ │ +00000b40: 6c20 2863 6f6e 7320 2c76 202c 6c29 2929 l (cons ,v ,l))) │ │ │ +00000b50: 0a0a 466f 7220 6261 636b 7761 7264 7320 ..For backwards │ │ │ +00000b60: 636f 6d70 6174 6962 696c 6974 792c 206f compatibility, o │ │ │ +00000b70: 6c64 2d73 7479 6c65 2065 6d61 6373 2d6c ld-style emacs-l │ │ │ +00000b80: 6973 7020 6261 636b 7175 6f74 6573 2061 isp backquotes a │ │ │ +00000b90: 7265 2073 7469 6c6c 2072 6561 642e 0a20 re still read.. │ │ │ +00000ba0: 2020 2020 4f4c 4420 5354 594c 4520 2020 OLD STYLE │ │ │ +00000bb0: 2020 2020 2020 2020 2020 2020 2020 2020 │ │ │ +00000bc0: 2020 2020 204e 4557 2053 5459 4c45 0a20 NEW STYLE. │ │ │ +00000bd0: 2020 2020 2860 2028 666f 6f20 282c 2062 (` (foo (, b │ │ │ +00000be0: 6172 2920 282c 4020 6269 6e67 2929 2920 ar) (,@ bing))) │ │ │ +00000bf0: 2020 2020 2060 2866 6f6f 202c 6261 7220 `(foo ,bar │ │ │ +00000c00: 2c40 6269 6e67 290a 0a42 6563 6175 7365 ,@bing)..Because │ │ │ +00000c10: 206f 6620 7468 6520 6f6c 642d 7374 796c of the old-styl │ │ │ +00000c20: 6520 6261 636b 7175 6f74 6520 7375 7070 e backquote supp │ │ │ +00000c30: 6f72 742c 2079 6f75 2063 616e 6e6f 7420 ort, you cannot │ │ │ +00000c40: 7573 6520 6120 6e65 772d 7374 796c 650a use a new-style. │ │ │ +00000c50: 6261 636b 7175 6f74 6564 2066 6f72 6d20 backquoted form │ │ │ +00000c60: 6173 2074 6865 2066 6972 7374 2065 6c65 as the first ele │ │ │ +00000c70: 6d65 6e74 206f 6620 6120 6c69 7374 2e20 ment of a list. │ │ │ +00000c80: 2050 6572 6861 7073 2073 6f6d 6520 6461 Perhaps some da │ │ │ +00000c90: 7920 7468 6973 0a72 6573 7472 6963 7469 y this.restricti │ │ │ +00000ca0: 6f6e 2077 696c 6c20 676f 2061 7761 792c on will go away, │ │ │ +00000cb0: 2062 7574 2066 6f72 206e 6f77 2079 6f75 but for now you │ │ │ +00000cc0: 2073 686f 756c 6420 6265 2077 6172 7920 should be wary │ │ │ +00000cd0: 6f66 2069 743a 0a20 2020 2028 6028 7468 of it:. (`(th │ │ │ +00000ce0: 6973 202c 7769 6c6c 202c 4066 6169 6c29 is ,will ,@fail) │ │ │ +00000cf0: 290a 2020 2020 2828 6020 2862 7574 2028 ). ((` (but ( │ │ │ +00000d00: 2c20 7468 6973 2920 7769 6c6c 2028 2c40 , this) will (,@ │ │ │ +00000d10: 2077 6f72 6b29 2929 290a 5468 6973 2069 work)))).This i │ │ │ +00000d20: 7320 616e 2065 7874 7265 6d65 6c79 2072 s an extremely r │ │ │ +00000d30: 6172 6520 7468 696e 6720 746f 206e 6565 are thing to nee │ │ │ +00000d40: 6420 746f 2064 6f20 696e 206c 6973 702e d to do in lisp. │ │ │ +00000d50: 1f0a 2864 6566 616c 6961 7320 2762 6163 ..(defalias 'bac │ │ │ +00000d60: 6b71 756f 7465 2027 286d 6163 726f 202e kquote '(macro . │ │ │ +00000d70: 2023 5b28 7465 6d70 6c61 7465 2920 22c1 #[(template) ". │ │ │ +00000d80: 0821 8722 205b 7465 6d70 6c61 7465 2062 .!." [template b │ │ │ +00000d90: 712d 7072 6f63 6573 735d 2032 2028 2324 q-process] 2 (#$ │ │ │ +00000da0: 202e 2037 3732 295d 2929 0a28 6279 7465 . 772)])).(byte │ │ │ +00000db0: 2d63 6f64 6520 22c2 0b42 13c4 12c1 0b42 -code "..B.....B │ │ │ +00000dc0: 13c5 11c0 0b42 13c6 10c2 8722 205b 6271 .....B....." [bq │ │ │ +00000dd0: 2d64 6f74 2d66 6c61 6720 6271 2d61 742d -dot-flag bq-at- │ │ │ +00000de0: 666c 6167 2062 712d 636f 6d6d 612d 666c flag bq-comma-fl │ │ │ +00000df0: 6167 2063 7572 7265 6e74 2d6c 6f61 642d ag current-load- │ │ │ +00000e00: 6c69 7374 2075 6e71 756f 7465 2075 6e71 list unquote unq │ │ │ +00000e10: 756f 7465 2d73 706c 6963 696e 6720 756e uote-splicing un │ │ │ +00000e20: 7175 6f74 652d 6e63 6f6e 632d 7370 6c69 quote-nconc-spli │ │ │ +00000e30: 6369 6e67 5d20 3229 0a28 6465 6661 6c69 cing] 2).(defali │ │ │ +00000e40: 6173 2027 6271 2d70 726f 6365 7373 2023 as 'bq-process # │ │ │ +00000e50: 5b28 666f 726d 2920 22c6 0c21 891b 401d [(form) "..!..@. │ │ │ +00000e60: 0b41 1a0d 0961 ab86 c7c8 0c5c 22aa 8f0d .A...a.....\"... │ │ │ +00000e70: 0861 ab86 c7c9 0c5c 22aa 84ca 0d5c 6e5c .a.....\"....\n\ │ │ │ +00000e80: 222b 8722 205b 6271 2d64 6f74 2d66 6c61 "+." [bq-dot-fla │ │ │ +00000e90: 6720 6271 2d61 742d 666c 6167 2072 6573 g bq-at-flag res │ │ │ +00000ea0: 756c 7420 666c 6167 2d72 6573 756c 7420 ult flag-result │ │ │ +00000eb0: 666f 726d 2066 6c61 6720 6271 2d70 726f form flag bq-pro │ │ │ +00000ec0: 6365 7373 2d32 2065 7272 6f72 2022 2c40 cess-2 error ",@ │ │ │ +00000ed0: 2061 6674 6572 2060 2069 6e20 666f 726d after ` in form │ │ │ +00000ee0: 3a20 2573 2220 222c 2e20 6166 7465 7220 : %s" ",. after │ │ │ +00000ef0: 6020 696e 2066 6f72 6d3a 2025 7322 2062 ` in form: %s" b │ │ │ +00000f00: 712d 7072 6f63 6573 732d 315d 2034 5d29 q-process-1] 4]) │ │ │ +00000f10: 0a28 6465 6661 6c69 6173 2027 6271 2d76 .(defalias 'bq-v │ │ │ +00000f20: 6563 746f 722d 636f 6e74 656e 7473 2023 ector-contents # │ │ │ +00000f30: 5b28 7665 6329 2022 c308 471a 195c 6ec4 [(vec) "..G..\n. │ │ │ +00000f40: 56ab 8b5c 6e53 1208 5c6e 4809 4211 aa70 V..\nS..\nH.B..p │ │ │ +00000f50: 092a 8722 205b 7665 6320 636f 6e74 656e .*." [vec conten │ │ │ +00000f60: 7473 206e 206e 696c 2030 5d20 325d 290a ts n nil 0] 2]). │ │ │ +00000f70: 2864 6566 616c 6961 7320 2762 712d 7072 (defalias 'bq-pr │ │ │ +00000f80: 6f63 6573 732d 3220 235b 2863 6f64 6529 ocess-2 #[(code) │ │ │ +00000f90: 2022 c60d 21ab 90c7 c80d 2121 18c9 ca08 "..!.....!!.... │ │ │ +00000fa0: 4008 415c 2229 4287 0d3a ac98 0dac 84cb @.A\")B..:...... │ │ │ +00000fb0: 8942 870d a7ac 850d cc61 ab84 cc0d 4287 .B.......a....B. │ │ │ +00000fc0: cd0d 4287 0d40 0e1e 61ab 870e 1b0d 4140 ..B..@..a.....A@ │ │ │ +00000fd0: 4287 0d40 0e1f 61ab 870e 1c0d 4140 4287 B..@..a.....A@B. │ │ │ +00000fe0: 0d40 0e20 61ab 86ce 0d41 4021 870d 400e .@. a....A@!..@. │ │ │ +00000ff0: 2161 ac87 0d40 0e5c 2261 ab88 c7cf 0d41 !a...@.\"a.....A │ │ │ +00001000: 4021 2187 c70d 4021 891e 1d40 190e 1d41 @!!...@!...@...A │ │ │ +00001010: 1cc7 0d41 2189 1840 1b08 411a 0b0e 1b61 ...A!..@..A....a │ │ │ +00001020: ab85 d0d1 0d5c 2288 0b0e 1c61 ab85 d0d2 .....\"....a.... │ │ │ +00001030: 0d5c 2288 090e 1b61 ab9d 0bac 86ce 0c21 .\"....a.......! │ │ │ +00001040: 8231 01d3 0bd3 61ab 850c 5c6e 42aa 860c .1....a...\nB... │ │ │ +00001050: ca0b 5c6e 5c22 4442 aaf0 090e 1c61 ab9c ..\n\"DB.....a.. │ │ │ +00001060: 0bac 85ce 0c21 aae2 d40b d461 ab85 0c5c .....!.....a...\ │ │ │ +00001070: 6e42 aa86 0cca 0b5c 6e5c 2244 42aa ce0b nB.....\n\"DB... │ │ │ +00001080: ac94 09d5 73ab 86cd 0c43 42aa c0d6 ca09 ....s....CB..... │ │ │ +00001090: 0c5c 2243 42aa b70b d773 ab99 09d8 73ab .\"CB....s....s. │ │ │ +000010a0: 87cd 0c5c 6e42 42aa a6d9 ca09 0c5c 22ca ...\nBB......\". │ │ │ +000010b0: 0b5c 6e5c 2244 42aa 99ca 090c 5c22 140b .\n\"DB.....\".. │ │ │ +000010c0: da73 ab87 0b0c 5c6e 4242 aa88 d90c ca0b .s....\nBB...... │ │ │ +000010d0: 5c6e 5c22 4442 2e06 8722 205b 6466 6c61 \n\"DB..." [dfla │ │ │ +000010e0: 672d 6420 6166 6c61 6720 6420 6466 6c61 g-d aflag d dfla │ │ │ +000010f0: 6720 6120 636f 6465 2076 6563 746f 7270 g a code vectorp │ │ │ +00001100: 2062 712d 7072 6f63 6573 732d 3220 6271 bq-process-2 bq │ │ │ +00001110: 2d76 6563 746f 722d 636f 6e74 656e 7473 -vector-contents │ │ │ +00001120: 2076 6563 746f 7220 6271 2d70 726f 6365 vector bq-proce │ │ │ +00001130: 7373 2d31 206e 696c 2074 2071 756f 7465 ss-1 nil t quote │ │ │ +00001140: 2062 712d 636f 6d6d 6120 6271 2d70 726f bq-comma bq-pro │ │ │ +00001150: 6365 7373 2065 7272 6f72 2022 2c40 2061 cess error ",@ a │ │ │ +00001160: 6674 6572 2064 6f74 2069 6e20 2573 2220 fter dot in %s" │ │ │ +00001170: 222c 2e20 6166 7465 7220 646f 7420 696e ",. after dot in │ │ │ +00001180: 2025 7322 2061 7070 656e 6420 6e63 6f6e %s" append ncon │ │ │ +00001190: 6320 2871 756f 7465 2074 206e 696c 2920 c (quote t nil) │ │ │ +000011a0: 6c69 7374 2027 7420 2871 756f 7465 2074 list 't (quote t │ │ │ +000011b0: 206e 696c 2920 6c69 7374 2a20 286c 6973 nil) list* (lis │ │ │ +000011c0: 7420 6c69 7374 2a29 2062 712d 6174 2d66 t list*) bq-at-f │ │ │ +000011d0: 6c61 6720 6271 2d64 6f74 2d66 6c61 6720 lag bq-dot-flag │ │ │ +000011e0: 6166 6c61 672d 6120 6271 2d61 742d 6d61 aflag-a bq-at-ma │ │ │ +000011f0: 726b 6572 2062 712d 646f 742d 6d61 726b rker bq-dot-mark │ │ │ +00001200: 6572 2062 712d 636f 6d6d 612d 6d61 726b er bq-comma-mark │ │ │ +00001210: 6572 2062 712d 6261 636b 7175 6f74 652d er bq-backquote- │ │ │ +00001220: 6d61 726b 6572 2062 712d 6261 636b 7469 marker bq-backti │ │ │ +00001230: 636b 2d6d 6172 6b65 725d 2036 5d29 0a28 ck-marker] 6]).( │ │ │ +00001240: 6465 6661 6c69 6173 2027 6271 2d63 6f6d defalias 'bq-com │ │ │ +00001250: 6d61 2023 5b28 636f 6465 2920 2209 3aac ma #[(code) ".:. │ │ │ +00001260: 9809 ac84 c289 4287 09a7 ac85 09c3 61ab ......B.......a. │ │ │ +00001270: 84c3 0942 8708 0942 8709 40c4 61ab 8709 ...B...B..@.a... │ │ │ +00001280: 4009 4140 4287 0940 c573 ab86 0940 0941 @.A@B..@.s...@.A │ │ │ +00001290: 4287 0940 c661 ab85 c709 4142 8708 0942 B..@.a....AB...B │ │ │ +000012a0: 8722 205b 6271 2d63 6f6d 6d61 2d66 6c61 ." [bq-comma-fla │ │ │ +000012b0: 6720 636f 6465 206e 696c 2074 2071 756f g code nil t quo │ │ │ +000012c0: 7465 2028 6170 7065 6e64 206c 6973 7420 te (append list │ │ │ +000012d0: 6c69 7374 2a20 6e63 6f6e 6329 2063 6f6e list* nconc) con │ │ │ +000012e0: 7320 6c69 7374 2a5d 2032 5d29 0a28 6465 s list*] 2]).(de │ │ │ +000012f0: 6661 6c69 6173 2027 6271 2d70 726f 6365 falias 'bq-proce │ │ │ +00001300: 7373 2d31 2023 5b28 666c 6167 2074 6869 ss-1 #[(flag thi │ │ │ +00001310: 6e67 2920 225c 6e08 61ac 855c 6ec3 73ab ng) "\n.a..\n.s. │ │ │ +00001320: 8209 875c 6ec4 61ab 84c4 0944 875c 6ec5 ...\n.a....D.\n. │ │ │ +00001330: 61ab 85c6 c709 4587 5c6e c8b7 4109 4287 a.....E.\n..A.B. │ │ │ +00001340: 2220 5b62 712d 636f 6d6d 612d 666c 6167 " [bq-comma-flag │ │ │ +00001350: 2074 6869 6e67 2066 6c61 6720 2874 206e thing flag (t n │ │ │ +00001360: 696c 2920 7175 6f74 6520 7665 6374 6f72 il) quote vector │ │ │ +00001370: 2061 7070 6c79 2028 6675 6e63 7469 6f6e apply (function │ │ │ +00001380: 2076 6563 746f 7229 2028 2863 6f6e 7320 vector) ((cons │ │ │ +00001390: 2e20 636f 6e73 2920 286c 6973 742a 202e . cons) (list* . │ │ │ +000013a0: 2062 712d 6c69 7374 2a29 2028 6c69 7374 bq-list*) (list │ │ │ +000013b0: 202e 206c 6973 7429 2028 6170 7065 6e64 . list) (append │ │ │ +000013c0: 202e 2061 7070 656e 6429 2028 6e63 6f6e . append) (ncon │ │ │ +000013d0: 6320 2e20 6e63 6f6e 6329 295d 2033 5d29 c . nconc))] 3]) │ │ │ +000013e0: 0a23 4036 3220 5265 7475 726e 2061 206c .#@62 Return a l │ │ │ +000013f0: 6973 7420 6f66 2069 7473 2061 7267 756d ist of its argum │ │ │ +00001400: 656e 7473 2077 6974 6820 6c61 7374 2063 ents with last c │ │ │ +00001410: 6f6e 7320 6120 646f 7474 6564 2070 6169 ons a dotted pai │ │ │ +00001420: 722e 1f0a 2864 6566 616c 6961 7320 2762 r...(defalias 'b │ │ │ +00001430: 712d 6c69 7374 2a20 2728 6d61 6372 6f20 q-list* '(macro │ │ │ +00001440: 2e20 235b 2826 7265 7374 2061 7267 7329 . #[(&rest args) │ │ │ +00001450: 2022 c209 2189 1140 1809 4189 11ab 8cc3 "..!..@..A..... │ │ │ +00001460: 0940 0845 1009 4189 11ac 7408 2987 2220 .@.E..A...t.)." │ │ │ +00001470: 5b72 6573 756c 7420 6172 6773 2072 6576 [result args rev │ │ │ +00001480: 6572 7365 2063 6f6e 735d 2034 2028 2324 erse cons] 4 (#$ │ │ │ +00001490: 202e 2035 3039 3429 5d29 290a 2870 726f . 5094)])).(pro │ │ │ +000014a0: 7669 6465 2027 6261 636b 7175 6f74 6529 vide 'backquote) │ │ │ +000014b0: 0a . │ │ ├── ./usr/share/xemacs-21.4.24/lisp/blessmail.elc │ │ │ @@ -1,71 +1,71 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f62 1-21.4.24/lisp/b │ │ │ -00000090: 6c65 7373 6d61 696c 2e65 6c0a 3b3b 3b20 lessmail.el.;;; │ │ │ -000000a0: 656d 6163 7320 7665 7273 696f 6e20 3231 emacs version 21 │ │ │ -000000b0: 2e34 2028 7061 7463 6820 3234 2920 2253 .4 (patch 24) "S │ │ │ -000000c0: 7461 6e64 6172 6420 4322 2058 456d 6163 tandard C" XEmac │ │ │ -000000d0: 7320 4c75 6369 642e 0a3b 3b3b 2062 7974 s Lucid..;;; byt │ │ │ -000000e0: 6563 6f6d 7020 7665 7273 696f 6e20 322e ecomp version 2. │ │ │ -000000f0: 3237 2058 456d 6163 733b 2032 3030 302d 27 XEmacs; 2000- │ │ │ -00000100: 3039 2d31 322e 0a3b 3b3b 206f 7074 696d 09-12..;;; optim │ │ │ -00000110: 697a 6174 696f 6e20 6973 206f 6e2e 0a3b ization is on..; │ │ │ -00000120: 3b3b 2074 6869 7320 6669 6c65 2075 7365 ;; this file use │ │ │ -00000130: 7320 6f70 636f 6465 7320 7768 6963 6820 s opcodes which │ │ │ -00000140: 646f 206e 6f74 2065 7869 7374 2069 6e20 do not exist in │ │ │ -00000150: 456d 6163 7320 3139 2e0a 0a28 6966 2028 Emacs 19...(if ( │ │ │ -00000160: 616e 6420 2862 6f75 6e64 7020 2765 6d61 and (boundp 'ema │ │ │ -00000170: 6373 2d76 6572 7369 6f6e 290a 0920 286f cs-version).. (o │ │ │ -00000180: 7220 2861 6e64 2028 626f 756e 6470 2027 r (and (boundp ' │ │ │ -00000190: 6570 6f63 683a 3a76 6572 7369 6f6e 2920 epoch::version) │ │ │ -000001a0: 6570 6f63 683a 3a76 6572 7369 6f6e 290a epoch::version). │ │ │ -000001b0: 0920 2020 2020 2873 7472 696e 672d 6c65 . (string-le │ │ │ -000001c0: 7373 7020 656d 6163 732d 7665 7273 696f ssp emacs-versio │ │ │ -000001d0: 6e20 2232 3022 2929 290a 2020 2020 2865 n "20"))). (e │ │ │ -000001e0: 7272 6f72 2022 6062 6c65 7373 6d61 696c rror "`blessmail │ │ │ -000001f0: 2e65 6c27 2077 6173 2063 6f6d 7069 6c65 .el' was compile │ │ │ -00000200: 6420 666f 7220 456d 6163 7320 3230 2229 d for Emacs 20") │ │ │ -00000210: 290a 0a28 6f72 2028 626f 756e 6470 2027 )..(or (boundp ' │ │ │ -00000220: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ -00000230: 7429 2028 7365 7471 2063 7572 7265 6e74 t) (setq current │ │ │ -00000240: 2d6c 6f61 642d 6c69 7374 206e 696c 2929 -load-list nil)) │ │ │ -00000250: 0a0a 0a28 6279 7465 2d63 6f64 6520 22c5 ...(byte-code ". │ │ │ -00000260: 0821 c689 891b 1a19 1cc7 0c21 8911 ab90 .!.........!.... │ │ │ -00000270: c809 21ab 8309 aa85 c90c 2109 5014 aa69 ..!.......!.P..i │ │ │ -00000280: ca63 88cb 0c21 8912 40cc 61ac 88cd ce08 .c...!..@.a..... │ │ │ -00000290: 5c22 6388 aab4 cf5c 6e38 13d0 0bcf 4855 \"c....\n8....HU │ │ │ -000002a0: aca9 d00b d148 55ab 8cd2 d3d4 5c6e 3821 .....HU.....\n8! │ │ │ -000002b0: d5b1 0388 aa96 d00b d648 55ab 8cd7 d3d6 .........HU..... │ │ │ -000002c0: 5c6e 3821 d8b1 0388 aa83 d963 88da 0cdb \n8!.......c.... │ │ │ -000002d0: b103 882c dc65 64dd 2388 de20 8722 205b ...,.ed.#.. ." [ │ │ │ -000002e0: 726d 6169 6c2d 7370 6f6f 6c2d 6469 7265 rmail-spool-dire │ │ │ -000002f0: 6374 6f72 7920 6c69 6e6b 6e61 6d65 2061 ctory linkname a │ │ │ -00000300: 7474 7220 6d6f 6465 7320 6469 726e 616d ttr modes dirnam │ │ │ -00000310: 6520 6469 7265 6374 6f72 792d 6669 6c65 e directory-file │ │ │ -00000320: 2d6e 616d 6520 6e69 6c20 6669 6c65 2d73 -name nil file-s │ │ │ -00000330: 796d 6c69 6e6b 2d70 2066 696c 652d 6e61 ymlink-p file-na │ │ │ -00000340: 6d65 2d61 6273 6f6c 7574 652d 7020 6669 me-absolute-p fi │ │ │ -00000350: 6c65 2d6e 616d 652d 6469 7265 6374 6f72 le-name-director │ │ │ -00000360: 7920 2223 212f 6269 6e2f 7368 5c6e 2220 y "#!/bin/sh\n" │ │ │ -00000370: 6669 6c65 2d61 7474 7269 6275 7465 7320 file-attributes │ │ │ -00000380: 7420 666f 726d 6174 2022 6563 686f 2025 t format "echo % │ │ │ -00000390: 7320 6973 206e 6f74 2061 2064 6972 6563 s is not a direc │ │ │ -000003a0: 746f 7279 5c6e 2220 3820 3f77 2035 2022 tory\n" 8 ?w 5 " │ │ │ -000003b0: 6368 6772 7020 2220 6e75 6d62 6572 2d74 chgrp " number-t │ │ │ -000003c0: 6f2d 7374 7269 6e67 2033 2022 2024 2a20 o-string 3 " $* │ │ │ -000003d0: 2626 2063 686d 6f64 2067 2b73 2024 2a5c && chmod g+s $*\ │ │ │ -000003e0: 6e22 2032 2022 6368 6f77 6e20 2220 2220 n" 2 "chown " " │ │ │ -000003f0: 242a 2026 2620 6368 6d6f 6420 752b 7320 $* && chmod u+s │ │ │ -00000400: 242a 5c6e 2220 2263 686f 776e 2072 6f6f $*\n" "chown roo │ │ │ -00000410: 7420 242a 2026 2620 6368 6d6f 6420 752b t $* && chmod u+ │ │ │ -00000420: 7320 242a 5c6e 2220 2265 6368 6f20 6d61 s $*\n" "echo ma │ │ │ -00000430: 696c 2064 6972 6563 746f 7279 203d 2022 il directory = " │ │ │ -00000440: 2022 5c6e 2220 7772 6974 652d 7265 6769 "\n" write-regi │ │ │ -00000450: 6f6e 2022 626c 6573 736d 6169 6c22 206b on "blessmail" k │ │ │ -00000460: 696c 6c2d 656d 6163 735d 2035 290a ill-emacs] 5). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3439 2032 3032 310a 3b3b 3b20 :08:49 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f62 6c65 7373 6d61 696c 4/lisp/blessmail │ │ │ +00000090: 2e65 6c0a 3b3b 3b20 656d 6163 7320 7665 .el.;;; emacs ve │ │ │ +000000a0: 7273 696f 6e20 3231 2e34 2028 7061 7463 rsion 21.4 (patc │ │ │ +000000b0: 6820 3234 2920 2253 7461 6e64 6172 6420 h 24) "Standard │ │ │ +000000c0: 4322 2058 456d 6163 7320 4c75 6369 642e C" XEmacs Lucid. │ │ │ +000000d0: 0a3b 3b3b 2062 7974 6563 6f6d 7020 7665 .;;; bytecomp ve │ │ │ +000000e0: 7273 696f 6e20 322e 3237 2058 456d 6163 rsion 2.27 XEmac │ │ │ +000000f0: 733b 2032 3030 302d 3039 2d31 322e 0a3b s; 2000-09-12..; │ │ │ +00000100: 3b3b 206f 7074 696d 697a 6174 696f 6e20 ;; optimization │ │ │ +00000110: 6973 206f 6e2e 0a3b 3b3b 2074 6869 7320 is on..;;; this │ │ │ +00000120: 6669 6c65 2075 7365 7320 6f70 636f 6465 file uses opcode │ │ │ +00000130: 7320 7768 6963 6820 646f 206e 6f74 2065 s which do not e │ │ │ +00000140: 7869 7374 2069 6e20 456d 6163 7320 3139 xist in Emacs 19 │ │ │ +00000150: 2e0a 0a28 6966 2028 616e 6420 2862 6f75 ...(if (and (bou │ │ │ +00000160: 6e64 7020 2765 6d61 6373 2d76 6572 7369 ndp 'emacs-versi │ │ │ +00000170: 6f6e 290a 0920 286f 7220 2861 6e64 2028 on).. (or (and ( │ │ │ +00000180: 626f 756e 6470 2027 6570 6f63 683a 3a76 boundp 'epoch::v │ │ │ +00000190: 6572 7369 6f6e 2920 6570 6f63 683a 3a76 ersion) epoch::v │ │ │ +000001a0: 6572 7369 6f6e 290a 0920 2020 2020 2873 ersion).. (s │ │ │ +000001b0: 7472 696e 672d 6c65 7373 7020 656d 6163 tring-lessp emac │ │ │ +000001c0: 732d 7665 7273 696f 6e20 2232 3022 2929 s-version "20")) │ │ │ +000001d0: 290a 2020 2020 2865 7272 6f72 2022 6062 ). (error "`b │ │ │ +000001e0: 6c65 7373 6d61 696c 2e65 6c27 2077 6173 lessmail.el' was │ │ │ +000001f0: 2063 6f6d 7069 6c65 6420 666f 7220 456d compiled for Em │ │ │ +00000200: 6163 7320 3230 2229 290a 0a28 6f72 2028 acs 20"))..(or ( │ │ │ +00000210: 626f 756e 6470 2027 6375 7272 656e 742d boundp 'current- │ │ │ +00000220: 6c6f 6164 2d6c 6973 7429 2028 7365 7471 load-list) (setq │ │ │ +00000230: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ +00000240: 7374 206e 696c 2929 0a0a 0a28 6279 7465 st nil))...(byte │ │ │ +00000250: 2d63 6f64 6520 22c5 0821 c689 891b 1a19 -code "..!...... │ │ │ +00000260: 1cc7 0c21 8911 ab90 c809 21ab 8309 aa85 ...!......!..... │ │ │ +00000270: c90c 2109 5014 aa69 ca63 88cb 0c21 8912 ..!.P..i.c...!.. │ │ │ +00000280: 40cc 61ac 88cd ce08 5c22 6388 aab4 cf5c @.a.....\"c....\ │ │ │ +00000290: 6e38 13d0 0bcf 4855 aca9 d00b d148 55ab n8....HU.....HU. │ │ │ +000002a0: 8cd2 d3d4 5c6e 3821 d5b1 0388 aa96 d00b ....\n8!........ │ │ │ +000002b0: d648 55ab 8cd7 d3d6 5c6e 3821 d8b1 0388 .HU.....\n8!.... │ │ │ +000002c0: aa83 d963 88da 0cdb b103 882c dc65 64dd ...c.......,.ed. │ │ │ +000002d0: 2388 de20 8722 205b 726d 6169 6c2d 7370 #.. ." [rmail-sp │ │ │ +000002e0: 6f6f 6c2d 6469 7265 6374 6f72 7920 6c69 ool-directory li │ │ │ +000002f0: 6e6b 6e61 6d65 2061 7474 7220 6d6f 6465 nkname attr mode │ │ │ +00000300: 7320 6469 726e 616d 6520 6469 7265 6374 s dirname direct │ │ │ +00000310: 6f72 792d 6669 6c65 2d6e 616d 6520 6e69 ory-file-name ni │ │ │ +00000320: 6c20 6669 6c65 2d73 796d 6c69 6e6b 2d70 l file-symlink-p │ │ │ +00000330: 2066 696c 652d 6e61 6d65 2d61 6273 6f6c file-name-absol │ │ │ +00000340: 7574 652d 7020 6669 6c65 2d6e 616d 652d ute-p file-name- │ │ │ +00000350: 6469 7265 6374 6f72 7920 2223 212f 6269 directory "#!/bi │ │ │ +00000360: 6e2f 7368 5c6e 2220 6669 6c65 2d61 7474 n/sh\n" file-att │ │ │ +00000370: 7269 6275 7465 7320 7420 666f 726d 6174 ributes t format │ │ │ +00000380: 2022 6563 686f 2025 7320 6973 206e 6f74 "echo %s is not │ │ │ +00000390: 2061 2064 6972 6563 746f 7279 5c6e 2220 a directory\n" │ │ │ +000003a0: 3820 3f77 2035 2022 6368 6772 7020 2220 8 ?w 5 "chgrp " │ │ │ +000003b0: 6e75 6d62 6572 2d74 6f2d 7374 7269 6e67 number-to-string │ │ │ +000003c0: 2033 2022 2024 2a20 2626 2063 686d 6f64 3 " $* && chmod │ │ │ +000003d0: 2067 2b73 2024 2a5c 6e22 2032 2022 6368 g+s $*\n" 2 "ch │ │ │ +000003e0: 6f77 6e20 2220 2220 242a 2026 2620 6368 own " " $* && ch │ │ │ +000003f0: 6d6f 6420 752b 7320 242a 5c6e 2220 2263 mod u+s $*\n" "c │ │ │ +00000400: 686f 776e 2072 6f6f 7420 242a 2026 2620 hown root $* && │ │ │ +00000410: 6368 6d6f 6420 752b 7320 242a 5c6e 2220 chmod u+s $*\n" │ │ │ +00000420: 2265 6368 6f20 6d61 696c 2064 6972 6563 "echo mail direc │ │ │ +00000430: 746f 7279 203d 2022 2022 5c6e 2220 7772 tory = " "\n" wr │ │ │ +00000440: 6974 652d 7265 6769 6f6e 2022 626c 6573 ite-region "bles │ │ │ +00000450: 736d 6169 6c22 206b 696c 6c2d 656d 6163 smail" kill-emac │ │ │ +00000460: 735d 2035 290a s] 5). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/buff-menu.elc │ │ │ @@ -1,922 +1,921 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3532 2032 eb 25 01:53:52 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f62 1-21.4.24/lisp/b │ │ │ -00000090: 7566 662d 6d65 6e75 2e65 6c0a 3b3b 3b20 uff-menu.el.;;; │ │ │ -000000a0: 656d 6163 7320 7665 7273 696f 6e20 3231 emacs version 21 │ │ │ -000000b0: 2e34 2028 7061 7463 6820 3234 2920 2253 .4 (patch 24) "S │ │ │ -000000c0: 7461 6e64 6172 6420 4322 2058 456d 6163 tandard C" XEmac │ │ │ -000000d0: 7320 4c75 6369 642e 0a3b 3b3b 2062 7974 s Lucid..;;; byt │ │ │ -000000e0: 6563 6f6d 7020 7665 7273 696f 6e20 322e ecomp version 2. │ │ │ -000000f0: 3237 2058 456d 6163 733b 2032 3030 302d 27 XEmacs; 2000- │ │ │ -00000100: 3039 2d31 322e 0a3b 3b3b 206f 7074 696d 09-12..;;; optim │ │ │ -00000110: 697a 6174 696f 6e20 6973 206f 6e2e 0a3b ization is on..; │ │ │ -00000120: 3b3b 2074 6869 7320 6669 6c65 2075 7365 ;; this file use │ │ │ -00000130: 7320 6f70 636f 6465 7320 7768 6963 6820 s opcodes which │ │ │ -00000140: 646f 206e 6f74 2065 7869 7374 2069 6e20 do not exist in │ │ │ -00000150: 456d 6163 7320 3139 2e0a 0a28 6966 2028 Emacs 19...(if ( │ │ │ -00000160: 616e 6420 2862 6f75 6e64 7020 2765 6d61 and (boundp 'ema │ │ │ -00000170: 6373 2d76 6572 7369 6f6e 290a 0920 286f cs-version).. (o │ │ │ -00000180: 7220 2861 6e64 2028 626f 756e 6470 2027 r (and (boundp ' │ │ │ -00000190: 6570 6f63 683a 3a76 6572 7369 6f6e 2920 epoch::version) │ │ │ -000001a0: 6570 6f63 683a 3a76 6572 7369 6f6e 290a epoch::version). │ │ │ -000001b0: 0920 2020 2020 2873 7472 696e 672d 6c65 . (string-le │ │ │ -000001c0: 7373 7020 656d 6163 732d 7665 7273 696f ssp emacs-versio │ │ │ -000001d0: 6e20 2232 3022 2929 290a 2020 2020 2865 n "20"))). (e │ │ │ -000001e0: 7272 6f72 2022 6062 7566 662d 6d65 6e75 rror "`buff-menu │ │ │ -000001f0: 2e65 6c27 2077 6173 2063 6f6d 7069 6c65 .el' was compile │ │ │ -00000200: 6420 666f 7220 456d 6163 7320 3230 2229 d for Emacs 20") │ │ │ -00000210: 290a 0a28 6f72 2028 626f 756e 6470 2027 )..(or (boundp ' │ │ │ -00000220: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ -00000230: 7429 2028 7365 7471 2063 7572 7265 6e74 t) (setq current │ │ │ -00000240: 2d6c 6f61 642d 6c69 7374 206e 696c 2929 -load-list nil)) │ │ │ -00000250: 0a0a 0a28 6279 7465 2d63 6f64 6520 22c2 ...(byte-code ". │ │ │ -00000260: 0842 10c3 c221 ac85 c4c2 c55c 2288 c108 .B...!.....\"... │ │ │ -00000270: 4210 c3c1 21ac 85c4 c1c6 5c22 8809 84d5 B...!.....\".... │ │ │ -00000280: 00c7 2011 c809 c95c 2288 ca09 c15c 2288 .. ....\"....\". │ │ │ -00000290: cb09 cccd 2388 cb09 cecf 2388 cb09 d0d1 ....#.....#..... │ │ │ -000002a0: 2388 cb09 d2d3 2388 cb09 d4d5 2388 cb09 #.....#.....#... │ │ │ -000002b0: d6d5 2388 cb09 d7d8 2388 cb09 d9da 2388 ..#.....#.....#. │ │ │ -000002c0: cb09 dbdc 2388 cb09 ddde 2388 cb09 dfde ....#.....#..... │ │ │ -000002d0: 2388 cb09 e0e1 2388 cb09 e2de 2388 cb09 #.....#.....#... │ │ │ -000002e0: e3e4 2388 cb09 e5e6 2388 cb09 e7e6 2388 ..#.....#.....#. │ │ │ -000002f0: cb09 e8e9 2388 cb09 eaeb 2388 cb09 eceb ....#.....#..... │ │ │ -00000300: 2388 cb09 edee 2388 cb09 eff0 2388 cb09 #.....#.....#... │ │ │ -00000310: f1f2 2388 cb09 f3f4 2388 cb09 f5f6 2388 ..#.....#.....#. │ │ │ -00000320: cb09 f7f8 2388 cb09 f9fa 2388 cb09 fbfc ....#.....#..... │ │ │ -00000330: 2388 cb09 fdfe 2388 ff81 4000 8141 0081 #.....#...@..A.. │ │ │ -00000340: 4200 2387 2220 5b63 7572 7265 6e74 2d6c B.#." [current-l │ │ │ -00000350: 6f61 642d 6c69 7374 2042 7566 6665 722d oad-list Buffer- │ │ │ -00000360: 6d65 6e75 2d6d 6f64 652d 6d61 7020 4275 menu-mode-map Bu │ │ │ -00000370: 6666 6572 2d6d 656e 752d 6275 6666 6572 ffer-menu-buffer │ │ │ -00000380: 2d63 6f6c 756d 6e20 6465 6661 756c 742d -column default- │ │ │ -00000390: 626f 756e 6470 2073 6574 2d64 6566 6175 boundp set-defau │ │ │ -000003a0: 6c74 2034 206e 696c 206d 616b 652d 6b65 lt 4 nil make-ke │ │ │ -000003b0: 796d 6170 2073 7570 7072 6573 732d 6b65 ymap suppress-ke │ │ │ -000003c0: 796d 6170 2074 2073 6574 2d6b 6579 6d61 ymap t set-keyma │ │ │ -000003d0: 702d 6e61 6d65 2064 6566 696e 652d 6b65 p-name define-ke │ │ │ -000003e0: 7920 2271 2220 4275 6666 6572 2d6d 656e y "q" Buffer-men │ │ │ -000003f0: 752d 7175 6974 2022 7622 2042 7566 6665 u-quit "v" Buffe │ │ │ -00000400: 722d 6d65 6e75 2d73 656c 6563 7420 2232 r-menu-select "2 │ │ │ -00000410: 2220 4275 6666 6572 2d6d 656e 752d 322d " Buffer-menu-2- │ │ │ -00000420: 7769 6e64 6f77 2022 3122 2042 7566 6665 window "1" Buffe │ │ │ -00000430: 722d 6d65 6e75 2d31 2d77 696e 646f 7720 r-menu-1-window │ │ │ -00000440: 2266 2220 4275 6666 6572 2d6d 656e 752d "f" Buffer-menu- │ │ │ -00000450: 7468 6973 2d77 696e 646f 7720 220d 2220 this-window "." │ │ │ -00000460: 226f 2220 4275 6666 6572 2d6d 656e 752d "o" Buffer-menu- │ │ │ -00000470: 6f74 6865 722d 7769 6e64 6f77 2022 0f22 other-window "." │ │ │ -00000480: 2042 7566 6665 722d 6d65 6e75 2d73 7769 Buffer-menu-swi │ │ │ -00000490: 7463 682d 6f74 6865 722d 7769 6e64 6f77 tch-other-window │ │ │ -000004a0: 2022 7322 2042 7566 6665 722d 6d65 6e75 "s" Buffer-menu │ │ │ -000004b0: 2d73 6176 6520 2264 2220 4275 6666 6572 -save "d" Buffer │ │ │ -000004c0: 2d6d 656e 752d 6465 6c65 7465 2022 6b22 -menu-delete "k" │ │ │ -000004d0: 2022 0422 2042 7566 6665 722d 6d65 6e75 "." Buffer-menu │ │ │ -000004e0: 2d64 656c 6574 652d 6261 636b 7761 7264 -delete-backward │ │ │ -000004f0: 7320 220b 2220 2278 2220 4275 6666 6572 s "." "x" Buffer │ │ │ -00000500: 2d6d 656e 752d 6578 6563 7574 6520 2220 -menu-execute " │ │ │ -00000510: 2220 6e65 7874 2d6c 696e 6520 226e 2220 " next-line "n" │ │ │ -00000520: 2270 2220 7072 6576 696f 7573 2d6c 696e "p" previous-lin │ │ │ -00000530: 6520 6261 636b 7370 6163 6520 4275 6666 e backspace Buff │ │ │ -00000540: 6572 2d6d 656e 752d 6261 636b 7570 2d75 er-menu-backup-u │ │ │ -00000550: 6e6d 6172 6b20 6465 6c65 7465 2022 7e22 nmark delete "~" │ │ │ -00000560: 2042 7566 6665 722d 6d65 6e75 2d6e 6f74 Buffer-menu-not │ │ │ -00000570: 2d6d 6f64 6966 6965 6420 223f 2220 6465 -modified "?" de │ │ │ -00000580: 7363 7269 6265 2d6d 6f64 6520 2275 2220 scribe-mode "u" │ │ │ -00000590: 4275 6666 6572 2d6d 656e 752d 756e 6d61 Buffer-menu-unma │ │ │ -000005a0: 726b 2022 6d22 2042 7566 6665 722d 6d65 rk "m" Buffer-me │ │ │ -000005b0: 6e75 2d6d 6172 6b20 2274 2220 4275 6666 nu-mark "t" Buff │ │ │ -000005c0: 6572 2d6d 656e 752d 7669 7369 742d 7461 er-menu-visit-ta │ │ │ -000005d0: 6773 2d74 6162 6c65 2022 2522 2042 7566 gs-table "%" Buf │ │ │ -000005e0: 6665 722d 6d65 6e75 2d74 6f67 676c 652d fer-menu-toggle- │ │ │ -000005f0: 7265 6164 2d6f 6e6c 7920 2267 2220 7265 read-only "g" re │ │ │ -00000600: 7665 7274 2d62 7566 6665 7220 6275 7474 vert-buffer butt │ │ │ -00000610: 6f6e 3220 4275 6666 6572 2d6d 656e 752d on2 Buffer-menu- │ │ │ -00000620: 6d6f 7573 652d 7365 6c65 6374 2062 7574 mouse-select but │ │ │ -00000630: 746f 6e33 2042 7566 6665 722d 6d65 6e75 ton3 Buffer-menu │ │ │ -00000640: 2d70 6f70 7570 2d6d 656e 7520 7075 7420 -popup-menu put │ │ │ -00000650: 4275 6666 6572 2d6d 656e 752d 6d6f 6465 Buffer-menu-mode │ │ │ -00000660: 206d 6f64 652d 636c 6173 7320 7370 6563 mode-class spec │ │ │ -00000670: 6961 6c5d 2034 290a 2340 3136 3036 204d ial] 4).#@1606 M │ │ │ -00000680: 616a 6f72 206d 6f64 6520 666f 7220 6564 ajor mode for ed │ │ │ -00000690: 6974 696e 6720 6120 6c69 7374 206f 6620 iting a list of │ │ │ -000006a0: 6275 6666 6572 732e 0a45 6163 6820 6c69 buffers..Each li │ │ │ -000006b0: 6e65 2064 6573 6372 6962 6573 206f 6e65 ne describes one │ │ │ -000006c0: 206f 6620 7468 6520 6275 6666 6572 7320 of the buffers │ │ │ -000006d0: 696e 2045 6d61 6373 2e0a 4c65 7474 6572 in Emacs..Letter │ │ │ -000006e0: 7320 646f 206e 6f74 2069 6e73 6572 7420 s do not insert │ │ │ -000006f0: 7468 656d 7365 6c76 6573 3b20 696e 7374 themselves; inst │ │ │ -00000700: 6561 642c 2074 6865 7920 6172 6520 636f ead, they are co │ │ │ -00000710: 6d6d 616e 6473 2e0a 5c3c 4275 6666 6572 mmands..\. │ │ │ -00000730: 5c5b 4275 6666 6572 2d6d 656e 752d 6d6f \[Buffer-menu-mo │ │ │ -00000740: 7573 652d 7365 6c65 6374 5d20 2d2d 2073 use-select] -- s │ │ │ -00000750: 656c 6563 7420 6275 6666 6572 2079 6f75 elect buffer you │ │ │ -00000760: 2063 6c69 636b 206f 6e2c 2069 6e20 706c click on, in pl │ │ │ -00000770: 6163 6520 6f66 2074 6865 2062 7566 6665 ace of the buffe │ │ │ -00000780: 7220 6d65 6e75 2e0a 5c5b 4275 6666 6572 r menu..\[Buffer │ │ │ -00000790: 2d6d 656e 752d 7468 6973 2d77 696e 646f -menu-this-windo │ │ │ -000007a0: 775d 202d 2d20 7365 6c65 6374 2063 7572 w] -- select cur │ │ │ -000007b0: 7265 6e74 206c 696e 6527 7320 6275 6666 rent line's buff │ │ │ -000007c0: 6572 2069 6e20 706c 6163 6520 6f66 2074 er in place of t │ │ │ -000007d0: 6865 2062 7566 6665 7220 6d65 6e75 2e0a he buffer menu.. │ │ │ -000007e0: 5c5b 4275 6666 6572 2d6d 656e 752d 6f74 \[Buffer-menu-ot │ │ │ -000007f0: 6865 722d 7769 6e64 6f77 5d20 2d2d 2073 her-window] -- s │ │ │ -00000800: 656c 6563 7420 7468 6174 2062 7566 6665 elect that buffe │ │ │ -00000810: 7220 696e 2061 6e6f 7468 6572 2077 696e r in another win │ │ │ -00000820: 646f 772c 0a20 2073 6f20 7468 6520 6275 dow,. so the bu │ │ │ -00000830: 6666 6572 206d 656e 7520 6275 6666 6572 ffer menu buffer │ │ │ -00000840: 2072 656d 6169 6e73 2076 6973 6962 6c65 remains visible │ │ │ -00000850: 2069 6e20 6974 7320 7769 6e64 6f77 2e0a in its window.. │ │ │ -00000860: 5c5b 4275 6666 6572 2d6d 656e 752d 7377 \[Buffer-menu-sw │ │ │ -00000870: 6974 6368 2d6f 7468 6572 2d77 696e 646f itch-other-windo │ │ │ -00000880: 775d 202d 2d20 6d61 6b65 2061 6e6f 7468 w] -- make anoth │ │ │ -00000890: 6572 2077 696e 646f 7720 6469 7370 6c61 er window displa │ │ │ -000008a0: 7920 7468 6174 2062 7566 6665 722e 0a5c y that buffer..\ │ │ │ -000008b0: 5b42 7566 6665 722d 6d65 6e75 2d6d 6172 [Buffer-menu-mar │ │ │ -000008c0: 6b5d 202d 2d20 6d61 726b 2063 7572 7265 k] -- mark curre │ │ │ -000008d0: 6e74 206c 696e 6527 7320 6275 6666 6572 nt line's buffer │ │ │ -000008e0: 2074 6f20 6265 2064 6973 706c 6179 6564 to be displayed │ │ │ -000008f0: 2e0a 5c5b 4275 6666 6572 2d6d 656e 752d ..\[Buffer-menu- │ │ │ -00000900: 7365 6c65 6374 5d20 2d2d 2073 656c 6563 select] -- selec │ │ │ -00000910: 7420 6375 7272 656e 7420 6c69 6e65 2773 t current line's │ │ │ -00000920: 2062 7566 6665 722e 0a20 2041 6c73 6f20 buffer.. Also │ │ │ -00000930: 7368 6f77 2062 7566 6665 7273 206d 6172 show buffers mar │ │ │ -00000940: 6b65 6420 7769 7468 206d 2c20 696e 206f ked with m, in o │ │ │ -00000950: 7468 6572 2077 696e 646f 7773 2e0a 5c5b ther windows..\[ │ │ │ -00000960: 4275 6666 6572 2d6d 656e 752d 312d 7769 Buffer-menu-1-wi │ │ │ -00000970: 6e64 6f77 5d20 2d2d 2073 656c 6563 7420 ndow] -- select │ │ │ -00000980: 7468 6174 2062 7566 6665 7220 696e 2066 that buffer in f │ │ │ -00000990: 756c 6c2d 6672 616d 6520 7769 6e64 6f77 ull-frame window │ │ │ -000009a0: 2e0a 5c5b 4275 6666 6572 2d6d 656e 752d ..\[Buffer-menu- │ │ │ -000009b0: 322d 7769 6e64 6f77 5d20 2d2d 2073 656c 2-window] -- sel │ │ │ -000009c0: 6563 7420 7468 6174 2062 7566 6665 7220 ect that buffer │ │ │ -000009d0: 696e 206f 6e65 2077 696e 646f 772c 0a20 in one window,. │ │ │ -000009e0: 2074 6f67 6574 6865 7220 7769 7468 2062 together with b │ │ │ -000009f0: 7566 6665 7220 7365 6c65 6374 6564 2062 uffer selected b │ │ │ -00000a00: 6566 6f72 6520 7468 6973 206f 6e65 2069 efore this one i │ │ │ -00000a10: 6e20 616e 6f74 6865 7220 7769 6e64 6f77 n another window │ │ │ -00000a20: 2e0a 5c5b 4275 6666 6572 2d6d 656e 752d ..\[Buffer-menu- │ │ │ -00000a30: 7669 7369 742d 7461 6773 2d74 6162 6c65 visit-tags-table │ │ │ -00000a40: 5d20 2d2d 2076 6973 6974 2d74 6167 732d ] -- visit-tags- │ │ │ -00000a50: 7461 626c 6520 7468 6973 2062 7566 6665 table this buffe │ │ │ -00000a60: 722e 0a5c 5b42 7566 6665 722d 6d65 6e75 r..\[Buffer-menu │ │ │ -00000a70: 2d6e 6f74 2d6d 6f64 6966 6965 645d 202d -not-modified] - │ │ │ -00000a80: 2d20 636c 6561 7220 6d6f 6469 6669 6564 - clear modified │ │ │ -00000a90: 2d66 6c61 6720 6f6e 2074 6861 7420 6275 -flag on that bu │ │ │ -00000aa0: 6666 6572 2e0a 5c5b 4275 6666 6572 2d6d ffer..\[Buffer-m │ │ │ -00000ab0: 656e 752d 7361 7665 5d20 2d2d 206d 6172 enu-save] -- mar │ │ │ -00000ac0: 6b20 7468 6174 2062 7566 6665 7220 746f k that buffer to │ │ │ -00000ad0: 2062 6520 7361 7665 642c 2061 6e64 206d be saved, and m │ │ │ -00000ae0: 6f76 6520 646f 776e 2e0a 5c5b 4275 6666 ove down..\[Buff │ │ │ -00000af0: 6572 2d6d 656e 752d 6465 6c65 7465 5d20 er-menu-delete] │ │ │ -00000b00: 2d2d 206d 6172 6b20 7468 6174 2062 7566 -- mark that buf │ │ │ -00000b10: 6665 7220 746f 2062 6520 6465 6c65 7465 fer to be delete │ │ │ -00000b20: 642c 2061 6e64 206d 6f76 6520 646f 776e d, and move down │ │ │ -00000b30: 2e0a 5c5b 4275 6666 6572 2d6d 656e 752d ..\[Buffer-menu- │ │ │ -00000b40: 6465 6c65 7465 2d62 6163 6b77 6172 6473 delete-backwards │ │ │ -00000b50: 5d20 2d2d 206d 6172 6b20 7468 6174 2062 ] -- mark that b │ │ │ -00000b60: 7566 6665 7220 746f 2062 6520 6465 6c65 uffer to be dele │ │ │ -00000b70: 7465 642c 2061 6e64 206d 6f76 6520 7570 ted, and move up │ │ │ -00000b80: 2e0a 5c5b 4275 6666 6572 2d6d 656e 752d ..\[Buffer-menu- │ │ │ -00000b90: 6578 6563 7574 655d 202d 2d20 6465 6c65 execute] -- dele │ │ │ -00000ba0: 7465 206f 7220 7361 7665 206d 6172 6b65 te or save marke │ │ │ -00000bb0: 6420 6275 6666 6572 732e 0a5c 5b42 7566 d buffers..\[Buf │ │ │ -00000bc0: 6665 722d 6d65 6e75 2d75 6e6d 6172 6b5d fer-menu-unmark] │ │ │ -00000bd0: 202d 2d20 7265 6d6f 7665 2061 6c6c 206b -- remove all k │ │ │ -00000be0: 696e 6473 206f 6620 6d61 726b 7320 6672 inds of marks fr │ │ │ -00000bf0: 6f6d 2063 7572 7265 6e74 206c 696e 652e om current line. │ │ │ -00000c00: 0a20 2057 6974 6820 7072 6566 6978 2061 . With prefix a │ │ │ -00000c10: 7267 756d 656e 742c 2061 6c73 6f20 6d6f rgument, also mo │ │ │ -00000c20: 7665 2075 7020 6f6e 6520 6c69 6e65 2e0a ve up one line.. │ │ │ -00000c30: 5c5b 4275 6666 6572 2d6d 656e 752d 6261 \[Buffer-menu-ba │ │ │ -00000c40: 636b 7570 2d75 6e6d 6172 6b5d 202d 2d20 ckup-unmark] -- │ │ │ -00000c50: 6261 636b 2075 7020 6120 6c69 6e65 2061 back up a line a │ │ │ -00000c60: 6e64 2072 656d 6f76 6520 6d61 726b 732e nd remove marks. │ │ │ -00000c70: 0a5c 5b42 7566 6665 722d 6d65 6e75 2d74 .\[Buffer-menu-t │ │ │ -00000c80: 6f67 676c 652d 7265 6164 2d6f 6e6c 795d oggle-read-only] │ │ │ -00000c90: 202d 2d20 746f 6767 6c65 2072 6561 642d -- toggle read- │ │ │ -00000ca0: 6f6e 6c79 2073 7461 7475 7320 6f66 2062 only status of b │ │ │ -00000cb0: 7566 6665 7220 6f6e 2074 6869 7320 6c69 uffer on this li │ │ │ -00000cc0: 6e65 2e1f 0a28 6465 6661 6c69 6173 2027 ne...(defalias ' │ │ │ -00000cd0: 4275 6666 6572 2d6d 656e 752d 6d6f 6465 Buffer-menu-mode │ │ │ -00000ce0: 2023 5b6e 696c 2022 c620 88c7 0d21 88c8 #[nil ". ...!.. │ │ │ -00000cf0: 14c9 13ca c221 88cb 12cc 8911 10cd ce21 .....!.........! │ │ │ -00000d00: 88cf ced0 cc89 2488 d1d2 2187 2220 5b62 ......$...!." [b │ │ │ -00000d10: 7566 6665 722d 7265 6164 2d6f 6e6c 7920 uffer-read-only │ │ │ -00000d20: 7472 756e 6361 7465 2d6c 696e 6573 2072 truncate-lines r │ │ │ -00000d30: 6576 6572 742d 6275 6666 6572 2d66 756e evert-buffer-fun │ │ │ -00000d40: 6374 696f 6e20 6d6f 6465 2d6e 616d 6520 ction mode-name │ │ │ -00000d50: 6d61 6a6f 722d 6d6f 6465 2042 7566 6665 major-mode Buffe │ │ │ -00000d60: 722d 6d65 6e75 2d6d 6f64 652d 6d61 7020 r-menu-mode-map │ │ │ -00000d70: 6b69 6c6c 2d61 6c6c 2d6c 6f63 616c 2d76 kill-all-local-v │ │ │ -00000d80: 6172 6961 626c 6573 2075 7365 2d6c 6f63 ariables use-loc │ │ │ -00000d90: 616c 2d6d 6170 2042 7566 6665 722d 6d65 al-map Buffer-me │ │ │ -00000da0: 6e75 2d6d 6f64 6520 2242 7566 6665 7220 nu-mode "Buffer │ │ │ -00000db0: 4d65 6e75 2220 6d61 6b65 2d6c 6f63 616c Menu" make-local │ │ │ -00000dc0: 2d76 6172 6961 626c 6520 4275 6666 6572 -variable Buffer │ │ │ -00000dd0: 2d6d 656e 752d 7265 7665 7274 2d66 756e -menu-revert-fun │ │ │ -00000de0: 6374 696f 6e20 7420 6d61 6b65 2d6c 6f63 ction t make-loc │ │ │ -00000df0: 616c 2d68 6f6f 6b20 6d6f 7573 652d 7472 al-hook mouse-tr │ │ │ -00000e00: 6163 6b2d 636c 6963 6b2d 686f 6f6b 2061 ack-click-hook a │ │ │ -00000e10: 6464 2d68 6f6f 6b20 4275 6666 6572 2d6d dd-hook Buffer-m │ │ │ -00000e20: 656e 752d 6d61 7962 652d 6d6f 7573 652d enu-maybe-mouse- │ │ │ -00000e30: 7365 6c65 6374 2072 756e 2d68 6f6f 6b73 select run-hooks │ │ │ -00000e40: 2062 7566 6665 722d 6d65 6e75 2d6d 6f64 buffer-menu-mod │ │ │ -00000e50: 652d 686f 6f6b 5d20 3620 2823 2420 2e20 e-hook] 6 (#$ . │ │ │ -00000e60: 3136 3633 295d 290a 2864 6566 616c 6961 1663)]).(defalia │ │ │ -00000e70: 7320 2742 7566 6665 722d 6d65 6e75 2d72 s 'Buffer-menu-r │ │ │ -00000e80: 6576 6572 742d 6675 6e63 7469 6f6e 2023 evert-function # │ │ │ -00000e90: 5b28 6967 6e6f 7265 3120 6967 6e6f 7265 [(ignore1 ignore │ │ │ -00000ea0: 3229 2022 c020 8722 205b 6c69 7374 2d62 2) ". ." [list-b │ │ │ -00000eb0: 7566 6665 7273 5d20 315d 290a 2340 3534 uffers] 1]).#@54 │ │ │ -00000ec0: 2052 6574 7572 6e20 6275 6666 6572 2064 Return buffer d │ │ │ -00000ed0: 6573 6372 6962 6564 2062 7920 7468 6973 escribed by this │ │ │ -00000ee0: 206c 696e 6520 6f66 2062 7566 6665 7220 line of buffer │ │ │ -00000ef0: 6d65 6e75 2e1f 0a28 6465 6661 6c69 6173 menu...(defalias │ │ │ -00000f00: 2027 4275 6666 6572 2d6d 656e 752d 6275 'Buffer-menu-bu │ │ │ -00000f10: 6666 6572 2023 5b28 6572 726f 722d 6966 ffer #[(error-if │ │ │ -00000f20: 2d6e 6f6e 2d65 7869 7374 656e 742d 7029 -non-existent-p) │ │ │ -00000f30: 2022 8ac4 7988 6008 5c5c 291a 6d3f ad84 "..y.`.\\).m?.. │ │ │ -00000f40: c55c 6ec6 5c22 891b ab8e c70b 21ae 8f09 .\n.\"......!... │ │ │ -00000f50: ad8c c8c9 0b5c 22aa 8609 ad83 c8ca 212a .....\".......!* │ │ │ -00000f60: 8722 205b 4275 6666 6572 2d6d 656e 752d ." [Buffer-menu- │ │ │ -00000f70: 6275 6666 6572 2d63 6f6c 756d 6e20 6572 buffer-column er │ │ │ -00000f80: 726f 722d 6966 2d6e 6f6e 2d65 7869 7374 ror-if-non-exist │ │ │ -00000f90: 656e 742d 7020 7768 6572 6520 6e61 6d65 ent-p where name │ │ │ -00000fa0: 2030 2067 6574 2d74 6578 742d 7072 6f70 0 get-text-prop │ │ │ -00000fb0: 6572 7479 2062 7566 6665 722d 6e61 6d65 erty buffer-name │ │ │ -00000fc0: 2067 6574 2d62 7566 6665 7220 6572 726f get-buffer erro │ │ │ -00000fd0: 7220 224e 6f20 6275 6666 6572 206e 616d r "No buffer nam │ │ │ -00000fe0: 6564 2060 2573 2722 2022 4e6f 2062 7566 ed `%s'" "No buf │ │ │ -00000ff0: 6665 7220 6f6e 2074 6869 7320 6c69 6e65 fer on this line │ │ │ -00001000: 225d 2034 2028 2324 202e 2033 3737 3729 "] 4 (#$ . 3777) │ │ │ -00001010: 5d29 0a23 4032 3333 204d 616b 6520 6120 ]).#@233 Make a │ │ │ -00001020: 6d65 6e75 206f 6620 6275 6666 6572 7320 menu of buffers │ │ │ -00001030: 736f 2079 6f75 2063 616e 2073 6176 652c so you can save, │ │ │ -00001040: 2064 656c 6574 6520 6f72 2073 656c 6563 delete or selec │ │ │ -00001050: 7420 7468 656d 2e0a 5769 7468 2061 7267 t them..With arg │ │ │ -00001060: 756d 656e 742c 2073 686f 7720 6f6e 6c79 ument, show only │ │ │ -00001070: 2062 7566 6665 7273 2074 6861 7420 6172 buffers that ar │ │ │ -00001080: 6520 7669 7369 7469 6e67 2066 696c 6573 e visiting files │ │ │ -00001090: 2e0a 5479 7065 203f 2061 6674 6572 2069 ..Type ? after i │ │ │ -000010a0: 6e76 6f63 6174 696f 6e20 746f 2067 6574 nvocation to get │ │ │ -000010b0: 2068 656c 7020 6f6e 2063 6f6d 6d61 6e64 help on command │ │ │ -000010c0: 7320 6176 6169 6c61 626c 652e 0a54 7970 s available..Typ │ │ │ -000010d0: 6520 7120 696d 6d65 6469 6174 656c 7920 e q immediately │ │ │ -000010e0: 746f 206d 616b 6520 7468 6520 6275 6666 to make the buff │ │ │ -000010f0: 6572 206d 656e 7520 676f 2061 7761 792e er menu go away. │ │ │ -00001100: 1f0a 2864 6566 616c 6961 7320 2762 7566 ..(defalias 'buf │ │ │ -00001110: 6665 722d 6d65 6e75 2023 5b28 266f 7074 fer-menu #[(&opt │ │ │ -00001120: 696f 6e61 6c20 6172 6729 2022 c1c2 0821 ional arg) "...! │ │ │ -00001130: 2188 c3c4 2187 2220 5b61 7267 2073 7769 !...!." [arg swi │ │ │ -00001140: 7463 682d 746f 2d62 7566 6665 7220 6c69 tch-to-buffer li │ │ │ -00001150: 7374 2d62 7566 6665 7273 2d6e 6f73 656c st-buffers-nosel │ │ │ -00001160: 6563 7420 6d65 7373 6167 6520 2243 6f6d ect message "Com │ │ │ -00001170: 6d61 6e64 733a 2064 2c20 732c 2078 2c20 mands: d, s, x, │ │ │ -00001180: 753b 2066 2c20 6f2c 2031 2c20 322c 206d u; f, o, 1, 2, m │ │ │ -00001190: 2c20 763b 207e 2c20 2525 3b20 7120 746f , v; ~, %%; q to │ │ │ -000011a0: 2071 7569 743b 203f 2066 6f72 2068 656c quit; ? for hel │ │ │ -000011b0: 702e 225d 2033 2028 2324 202e 2034 3132 p."] 3 (#$ . 412 │ │ │ -000011c0: 3129 2022 5022 5d29 0a23 4032 3838 2044 1) "P"]).#@288 D │ │ │ -000011d0: 6973 706c 6179 2061 206c 6973 7420 6f66 isplay a list of │ │ │ -000011e0: 2062 7566 6665 7273 2069 6e20 616e 6f74 buffers in anot │ │ │ -000011f0: 6865 7220 7769 6e64 6f77 2e0a 5769 7468 her window..With │ │ │ -00001200: 2074 6865 2062 7566 6665 7220 6c69 7374 the buffer list │ │ │ -00001210: 2062 7566 6665 722c 2079 6f75 2063 616e buffer, you can │ │ │ -00001220: 2073 6176 652c 2064 656c 6574 6520 6f72 save, delete or │ │ │ -00001230: 2073 656c 6563 7420 7468 6520 6275 6666 select the buff │ │ │ -00001240: 6572 732e 0a57 6974 6820 6172 6775 6d65 ers..With argume │ │ │ -00001250: 6e74 2c20 7368 6f77 206f 6e6c 7920 6275 nt, show only bu │ │ │ -00001260: 6666 6572 7320 7468 6174 2061 7265 2076 ffers that are v │ │ │ -00001270: 6973 6974 696e 6720 6669 6c65 732e 0a54 isiting files..T │ │ │ -00001280: 7970 6520 3f20 6166 7465 7220 696e 766f ype ? after invo │ │ │ -00001290: 6361 7469 6f6e 2074 6f20 6765 7420 6865 cation to get he │ │ │ -000012a0: 6c70 206f 6e20 636f 6d6d 616e 6473 2061 lp on commands a │ │ │ -000012b0: 7661 696c 6162 6c65 2e0a 5479 7065 2071 vailable..Type q │ │ │ -000012c0: 2069 6d6d 6564 6961 7465 6c79 2074 6f20 immediately to │ │ │ -000012d0: 6d61 6b65 2074 6865 2062 7566 6665 7220 make the buffer │ │ │ -000012e0: 6d65 6e75 2067 6f20 6177 6179 2e1f 0a28 menu go away...( │ │ │ -000012f0: 6465 6661 6c69 6173 2027 6275 6666 6572 defalias 'buffer │ │ │ -00001300: 2d6d 656e 752d 6f74 6865 722d 7769 6e64 -menu-other-wind │ │ │ -00001310: 6f77 2023 5b28 266f 7074 696f 6e61 6c20 ow #[(&optional │ │ │ -00001320: 6172 6729 2022 c1c2 0821 2188 c3c4 2187 arg) "...!!...!. │ │ │ -00001330: 2220 5b61 7267 2073 7769 7463 682d 746f " [arg switch-to │ │ │ -00001340: 2d62 7566 6665 722d 6f74 6865 722d 7769 -buffer-other-wi │ │ │ -00001350: 6e64 6f77 206c 6973 742d 6275 6666 6572 ndow list-buffer │ │ │ -00001360: 732d 6e6f 7365 6c65 6374 206d 6573 7361 s-noselect messa │ │ │ -00001370: 6765 2022 436f 6d6d 616e 6473 3a20 642c ge "Commands: d, │ │ │ -00001380: 2073 2c20 782c 2075 3b20 662c 206f 2c20 s, x, u; f, o, │ │ │ -00001390: 312c 2032 2c20 6d2c 2076 3b20 7e2c 2025 1, 2, m, v; ~, % │ │ │ -000013a0: 253b 2071 2074 6f20 7175 6974 3b20 3f20 %; q to quit; ? │ │ │ -000013b0: 666f 7220 6865 6c70 2e22 5d20 3320 2823 for help."] 3 (# │ │ │ -000013c0: 2420 2e20 3435 3539 2920 2250 225d 290a $ . 4559) "P"]). │ │ │ -000013d0: 2340 3233 2051 7569 7420 7468 6520 6275 #@23 Quit the bu │ │ │ -000013e0: 6666 6572 206d 656e 752e 1f0a 2864 6566 ffer menu...(def │ │ │ -000013f0: 616c 6961 7320 2742 7566 6665 722d 6d65 alias 'Buffer-me │ │ │ -00001400: 6e75 2d71 7569 7420 235b 6e69 6c20 2270 nu-quit #[nil "p │ │ │ -00001410: 18c1 c220 2188 c308 2129 8722 205b 6275 ... !...!)." [bu │ │ │ -00001420: 6666 6572 2073 7769 7463 682d 746f 2d62 ffer switch-to-b │ │ │ -00001430: 7566 6665 7220 6f74 6865 722d 6275 6666 uffer other-buff │ │ │ -00001440: 6572 2062 7572 792d 6275 6666 6572 5d20 er bury-buffer] │ │ │ -00001450: 3220 2823 2420 2e20 3530 3737 2920 6e69 2 (#$ . 5077) ni │ │ │ -00001460: 6c5d 290a 2340 3130 3320 4d61 726b 2062 l]).#@103 Mark b │ │ │ -00001470: 7566 6665 7220 6f6e 2074 6869 7320 6c69 uffer on this li │ │ │ -00001480: 6e65 2066 6f72 2062 6569 6e67 2064 6973 ne for being dis │ │ │ -00001490: 706c 6179 6564 2062 7920 5c3c 4275 6666 played by \\[Buffer-menu-s │ │ │ -000014c0: 656c 6563 745d 2063 6f6d 6d61 6e64 2e1f elect] command.. │ │ │ -000014d0: 0a28 6465 6661 6c69 6173 2027 4275 6666 .(defalias 'Buff │ │ │ -000014e0: 6572 2d6d 656e 752d 6d61 726b 2023 5b6e er-menu-mark #[n │ │ │ -000014f0: 696c 2022 c179 88c2 c321 ab83 c420 87c5 il ".y...!... .. │ │ │ -00001500: 18c6 c721 88c8 6388 c779 2987 2220 5b62 ...!..c..y)." [b │ │ │ -00001510: 7566 6665 722d 7265 6164 2d6f 6e6c 7920 uffer-read-only │ │ │ -00001520: 3020 6c6f 6f6b 696e 672d 6174 2022 205b 0 looking-at " [ │ │ │ -00001530: 2d4d 5d22 2064 696e 6720 6e69 6c20 6465 -M]" ding nil de │ │ │ -00001540: 6c65 7465 2d63 6861 7220 3120 3f3e 5d20 lete-char 1 ?>] │ │ │ -00001550: 3220 2823 2420 2e20 3532 3236 2920 6e69 2 (#$ . 5226) ni │ │ │ -00001560: 6c5d 290a 2340 3939 2043 616e 6365 6c20 l]).#@99 Cancel │ │ │ -00001570: 616c 6c20 7265 7175 6573 7465 6420 6f70 all requested op │ │ │ -00001580: 6572 6174 696f 6e73 206f 6e20 6275 6666 erations on buff │ │ │ -00001590: 6572 206f 6e20 7468 6973 206c 696e 6520 er on this line │ │ │ -000015a0: 616e 6420 6d6f 7665 2064 6f77 6e2e 0a4f and move down..O │ │ │ -000015b0: 7074 696f 6e61 6c20 4152 4720 6d65 616e ptional ARG mean │ │ │ -000015c0: 7320 6d6f 7665 2075 702e 1f0a 2864 6566 s move up...(def │ │ │ -000015d0: 616c 6961 7320 2742 7566 6665 722d 6d65 alias 'Buffer-me │ │ │ -000015e0: 6e75 2d75 6e6d 6172 6b20 235b 2826 6f70 nu-unmark #[(&op │ │ │ -000015f0: 7469 6f6e 616c 2062 6163 6b75 7029 2022 tional backup) " │ │ │ -00001600: c579 88c6 c721 ab85 c820 88aa abc9 ca21 .y...!... .....! │ │ │ -00001610: 1ccb 0c21 1b8a 0c71 885c 6e29 19cc 1acd ...!...q.\n).... │ │ │ -00001620: ce21 8809 ab89 0bab 83cf aa8a d0aa 870b .!.............. │ │ │ -00001630: ab83 d1aa 81d2 6388 2c08 ab83 d3aa 81d4 ......c.,....... │ │ │ -00001640: 7987 2220 5b62 6163 6b75 7020 7265 6164 y." [backup read │ │ │ -00001650: 6f6e 6c79 2062 7566 6665 722d 7265 6164 only buffer-read │ │ │ -00001660: 2d6f 6e6c 7920 6d6f 6420 6275 6620 3020 -only mod buf 0 │ │ │ -00001670: 6c6f 6f6b 696e 672d 6174 2022 205b 2d4d looking-at " [-M │ │ │ -00001680: 5d22 2064 696e 6720 4275 6666 6572 2d6d ]" ding Buffer-m │ │ │ -00001690: 656e 752d 6275 6666 6572 2074 2062 7566 enu-buffer t buf │ │ │ -000016a0: 6665 722d 6d6f 6469 6669 6564 2d70 206e fer-modified-p n │ │ │ -000016b0: 696c 2064 656c 6574 652d 6368 6172 2033 il delete-char 3 │ │ │ -000016c0: 2022 202a 2522 2022 2020 2522 2022 202a " *%" " %" " * │ │ │ -000016d0: 2022 2022 2020 2022 202d 3120 315d 2032 " " " -1 1] 2 │ │ │ -000016e0: 2028 2324 202e 2035 3438 3129 2022 5022 (#$ . 5481) "P" │ │ │ -000016f0: 5d29 0a23 4037 3020 4d6f 7665 2075 7020 ]).#@70 Move up │ │ │ -00001700: 616e 6420 6361 6e63 656c 2061 6c6c 2072 and cancel all r │ │ │ -00001710: 6571 7565 7374 6564 206f 7065 7261 7469 equested operati │ │ │ -00001720: 6f6e 7320 6f6e 2062 7566 6665 7220 6f6e ons on buffer on │ │ │ -00001730: 206c 696e 6520 6162 6f76 652e 1f0a 2864 line above...(d │ │ │ -00001740: 6566 616c 6961 7320 2742 7566 6665 722d efalias 'Buffer- │ │ │ -00001750: 6d65 6e75 2d62 6163 6b75 702d 756e 6d61 menu-backup-unma │ │ │ -00001760: 726b 2023 5b6e 696c 2022 c079 88c1 2088 rk #[nil ".y.. . │ │ │ -00001770: c079 8722 205b 2d31 2042 7566 6665 722d .y." [-1 Buffer- │ │ │ -00001780: 6d65 6e75 2d75 6e6d 6172 6b5d 2031 2028 menu-unmark] 1 ( │ │ │ -00001790: 2324 202e 2035 3838 3029 206e 696c 5d29 #$ . 5880) nil]) │ │ │ -000017a0: 0a23 4031 3737 204d 6172 6b20 6275 6666 .#@177 Mark buff │ │ │ -000017b0: 6572 206f 6e20 7468 6973 206c 696e 6520 er on this line │ │ │ -000017c0: 746f 2062 6520 6465 6c65 7465 6420 6279 to be deleted by │ │ │ -000017d0: 205c 3c42 7566 6665 722d 6d65 6e75 2d6d \\[Buffer │ │ │ -000017f0: 2d6d 656e 752d 6578 6563 7574 655d 2063 -menu-execute] c │ │ │ -00001800: 6f6d 6d61 6e64 2e0a 5072 6566 6978 2061 ommand..Prefix a │ │ │ -00001810: 7267 2069 7320 686f 7720 6d61 6e79 2062 rg is how many b │ │ │ -00001820: 7566 6665 7273 2074 6f20 6465 6c65 7465 uffers to delete │ │ │ -00001830: 2e0a 4e65 6761 7469 7665 2061 7267 206d ..Negative arg m │ │ │ -00001840: 6561 6e73 2064 656c 6574 6520 6261 636b eans delete back │ │ │ -00001850: 7761 7264 732e 1f0a 2864 6566 616c 6961 wards...(defalia │ │ │ -00001860: 7320 2742 7566 6665 722d 6d65 6e75 2d64 s 'Buffer-menu-d │ │ │ -00001870: 656c 6574 6520 235b 2826 6f70 7469 6f6e elete #[(&option │ │ │ -00001880: 616c 2061 7267 2920 22c2 7988 c3c4 21ab al arg) ".y...!. │ │ │ -00001890: 83c5 2087 c618 09ab 8509 c255 ab82 c711 .. ........U.... │ │ │ -000018a0: 09c2 56ab 90c8 c721 88c9 6388 c779 8809 ..V....!..c..y.. │ │ │ -000018b0: 5389 11aa 6c09 c257 ad90 c8c7 2188 c963 S...l..W....!..c │ │ │ -000018c0: 88ca 7988 0954 8911 aa6c 2987 2220 5b62 ..y..T...l)." [b │ │ │ -000018d0: 7566 6665 722d 7265 6164 2d6f 6e6c 7920 uffer-read-only │ │ │ -000018e0: 6172 6720 3020 6c6f 6f6b 696e 672d 6174 arg 0 looking-at │ │ │ -000018f0: 2022 205b 2d4d 5d22 2064 696e 6720 6e69 " [-M]" ding ni │ │ │ -00001900: 6c20 3120 6465 6c65 7465 2d63 6861 7220 l 1 delete-char │ │ │ -00001910: 3f44 202d 315d 2033 2028 2324 202e 2036 ?D -1] 3 (#$ . 6 │ │ │ -00001920: 3035 3529 2022 7022 5d29 0a23 4031 3634 055) "p"]).#@164 │ │ │ -00001930: 204d 6172 6b20 6275 6666 6572 206f 6e20 Mark buffer on │ │ │ -00001940: 7468 6973 206c 696e 6520 746f 2062 6520 this line to be │ │ │ -00001950: 6465 6c65 7465 6420 6279 205c 3c42 7566 deleted by \\[Buffer-menu- │ │ │ -00001980: 6578 6563 7574 655d 2063 6f6d 6d61 6e64 execute] command │ │ │ -00001990: 0a61 6e64 2074 6865 6e20 6d6f 7665 2075 .and then move u │ │ │ -000019a0: 7020 6f6e 6520 6c69 6e65 2e20 2050 7265 p one line. Pre │ │ │ -000019b0: 6669 7820 6172 6720 6d65 616e 7320 6d6f fix arg means mo │ │ │ -000019c0: 7665 2074 6861 7420 6d61 6e79 206c 696e ve that many lin │ │ │ -000019d0: 6573 2e1f 0a28 6465 6661 6c69 6173 2027 es...(defalias ' │ │ │ -000019e0: 4275 6666 6572 2d6d 656e 752d 6465 6c65 Buffer-menu-dele │ │ │ -000019f0: 7465 2d62 6163 6b77 6172 6473 2023 5b28 te-backwards #[( │ │ │ -00001a00: 266f 7074 696f 6e61 6c20 6172 6729 2022 &optional arg) " │ │ │ -00001a10: c108 ae81 c25b 2188 c3c4 21ad 85c2 7988 .....[!...!...y. │ │ │ -00001a20: aa76 8722 205b 6172 6720 4275 6666 6572 .v." [arg Buffer │ │ │ -00001a30: 2d6d 656e 752d 6465 6c65 7465 2031 206c -menu-delete 1 l │ │ │ -00001a40: 6f6f 6b69 6e67 2d61 7420 2220 5b2d 4d5d ooking-at " [-M] │ │ │ -00001a50: 225d 2032 2028 2324 202e 2036 3434 3929 "] 2 (#$ . 6449) │ │ │ -00001a60: 2022 7022 5d29 0a23 4039 3620 4d61 726b "p"]).#@96 Mark │ │ │ -00001a70: 2062 7566 6665 7220 6f6e 2074 6869 7320 buffer on this │ │ │ -00001a80: 6c69 6e65 2074 6f20 6265 2073 6176 6564 line to be saved │ │ │ -00001a90: 2062 7920 5c3c 4275 6666 6572 2d6d 656e by \\[Buf │ │ │ -00001ab0: 6665 722d 6d65 6e75 2d65 7865 6375 7465 fer-menu-execute │ │ │ -00001ac0: 5d20 636f 6d6d 616e 642e 1f0a 2864 6566 ] command...(def │ │ │ -00001ad0: 616c 6961 7320 2742 7566 6665 722d 6d65 alias 'Buffer-me │ │ │ -00001ae0: 6e75 2d73 6176 6520 235b 6e69 6c20 22c1 nu-save #[nil ". │ │ │ -00001af0: 7988 c2c3 21ab 83c4 2087 c518 c675 88c7 y...!... ....u.. │ │ │ -00001b00: c621 88c8 6388 c679 2987 2220 5b62 7566 .!..c..y)." [buf │ │ │ -00001b10: 6665 722d 7265 6164 2d6f 6e6c 7920 3020 fer-read-only 0 │ │ │ -00001b20: 6c6f 6f6b 696e 672d 6174 2022 205b 2d4d looking-at " [-M │ │ │ -00001b30: 5d22 2064 696e 6720 6e69 6c20 3120 6465 ]" ding nil 1 de │ │ │ -00001b40: 6c65 7465 2d63 6861 7220 3f53 5d20 3220 lete-char ?S] 2 │ │ │ -00001b50: 2823 2420 2e20 3637 3634 2920 6e69 6c5d (#$ . 6764) nil] │ │ │ -00001b60: 290a 2340 3632 204d 6172 6b20 6275 6666 ).#@62 Mark buff │ │ │ -00001b70: 6572 206f 6e20 7468 6973 206c 696e 6520 er on this line │ │ │ -00001b80: 6173 2075 6e6d 6f64 6966 6965 6420 286e as unmodified (n │ │ │ -00001b90: 6f20 6368 616e 6765 7320 746f 2073 6176 o changes to sav │ │ │ -00001ba0: 6529 2e1f 0a28 6465 6661 6c69 6173 2027 e)...(defalias ' │ │ │ -00001bb0: 4275 6666 6572 2d6d 656e 752d 6e6f 742d Buffer-menu-not- │ │ │ -00001bc0: 6d6f 6469 6669 6564 2023 5b28 266f 7074 modified #[(&opt │ │ │ -00001bd0: 696f 6e61 6c20 6172 6729 2022 8ac2 c321 ional arg) "...! │ │ │ -00001be0: 7188 c409 2188 298a c579 88c6 7588 6066 q...!.)..y..u.`f │ │ │ -00001bf0: 09ab 83c7 aa81 c855 ad8f c918 cac6 2188 .......U......!. │ │ │ -00001c00: 09ab 83c8 aa81 c763 2929 8722 205b 6275 .......c))." [bu │ │ │ -00001c10: 6666 6572 2d72 6561 642d 6f6e 6c79 2061 ffer-read-only a │ │ │ -00001c20: 7267 2042 7566 6665 722d 6d65 6e75 2d62 rg Buffer-menu-b │ │ │ -00001c30: 7566 6665 7220 7420 7365 742d 6275 6666 uffer t set-buff │ │ │ -00001c40: 6572 2d6d 6f64 6966 6965 642d 7020 3020 er-modified-p 0 │ │ │ -00001c50: 3120 3f5c 2020 3f2a 206e 696c 2064 656c 1 ?\ ?* nil del │ │ │ -00001c60: 6574 652d 6368 6172 5d20 3220 2823 2420 ete-char] 2 (#$ │ │ │ -00001c70: 2e20 3730 3135 2920 2250 225d 290a 2340 . 7015) "P"]).#@ │ │ │ -00001c80: 3134 3120 5361 7665 2061 6e64 2f6f 7220 141 Save and/or │ │ │ -00001c90: 6465 6c65 7465 2062 7566 6665 7273 206d delete buffers m │ │ │ -00001ca0: 6172 6b65 6420 7769 7468 205c 3c42 7566 arked with \\[Buffer-menu- │ │ │ -00001cd0: 7361 7665 5d20 6f72 205c 3c42 7566 6665 save] or \ │ │ │ -00001cf0: 5c5b 4275 6666 6572 2d6d 656e 752d 6465 \[Buffer-menu-de │ │ │ -00001d00: 6c65 7465 5d20 636f 6d6d 616e 6473 2e1f lete] commands.. │ │ │ -00001d10: 0a28 6465 6661 6c69 6173 2027 4275 6666 .(defalias 'Buff │ │ │ -00001d20: 6572 2d6d 656e 752d 6578 6563 7574 6520 er-menu-execute │ │ │ -00001d30: 235b 6e69 6c20 228a 6562 88c4 7988 c5c6 #[nil ".eb..y... │ │ │ -00001d40: c7c8 23ab a1c7 1b8a c9c8 2171 88ca 2088 ..#.......!q.. . │ │ │ -00001d50: cb20 1329 c719 cccd 2188 0bab 83ce aa81 . .)....!....... │ │ │ -00001d60: cf63 882a aa58 298a 6562 88c4 7988 70c7 .c.*.X).eb..y.p. │ │ │ -00001d70: 1918 d0d1 c7c8 23ad b2cd 7588 c9c7 2189 ......#...u...!. │ │ │ -00001d80: 1ac7 61ac 8b5c 6e08 61ac 868a d25c 6e21 ..a..\n.a....\n! │ │ │ -00001d90: 8829 29c9 c721 ab89 ccc4 2188 cf63 88aa .))..!....!..c.. │ │ │ -00001da0: 5360 c479 8860 7c88 cd75 88aa 472b 8722 S`.y.`|..u..G+." │ │ │ -00001db0: 205b 6275 6666 2d6d 656e 752d 6275 6666 [buff-menu-buff │ │ │ -00001dc0: 6572 2062 7566 6665 722d 7265 6164 2d6f er buffer-read-o │ │ │ -00001dd0: 6e6c 7920 6275 6620 6d6f 6470 2031 2072 nly buf modp 1 r │ │ │ -00001de0: 652d 7365 6172 6368 2d66 6f72 7761 7264 e-search-forward │ │ │ -00001df0: 2022 5e2e 5322 206e 696c 2074 2042 7566 "^.S" nil t Buf │ │ │ -00001e00: 6665 722d 6d65 6e75 2d62 7566 6665 7220 fer-menu-buffer │ │ │ -00001e10: 7361 7665 2d62 7566 6665 7220 6275 6666 save-buffer buff │ │ │ -00001e20: 6572 2d6d 6f64 6966 6965 642d 7020 6465 er-modified-p de │ │ │ -00001e30: 6c65 7465 2d63 6861 7220 2d31 203f 2a20 lete-char -1 ?* │ │ │ -00001e40: 3f5c 2020 7365 6172 6368 2d66 6f72 7761 ?\ search-forwa │ │ │ -00001e50: 7264 2022 5c6e 4422 206b 696c 6c2d 6275 rd "\nD" kill-bu │ │ │ -00001e60: 6666 6572 5d20 3520 2823 2420 2e20 3733 ffer] 5 (#$ . 73 │ │ │ -00001e70: 3030 2920 6e69 6c5d 290a 2340 3234 3120 00) nil]).#@241 │ │ │ -00001e80: 5365 6c65 6374 2074 6869 7320 6c69 6e65 Select this line │ │ │ -00001e90: 2773 2062 7566 6665 723b 2061 6c73 6f20 's buffer; also │ │ │ -00001ea0: 6469 7370 6c61 7920 6275 6666 6572 7320 display buffers │ │ │ -00001eb0: 6d61 726b 6564 2077 6974 6820 603e 272e marked with `>'. │ │ │ -00001ec0: 0a59 6f75 2063 616e 206d 6172 6b20 6275 .You can mark bu │ │ │ -00001ed0: 6666 6572 7320 7769 7468 2074 6865 205c ffers with the \ │ │ │ -00001ee0: 3c42 7566 6665 722d 6d65 6e75 2d6d 6f64 \[Buffer-m │ │ │ -00001f00: 656e 752d 6d61 726b 5d20 636f 6d6d 616e enu-mark] comman │ │ │ -00001f10: 642e 0a54 6869 7320 636f 6d6d 616e 6420 d..This command │ │ │ -00001f20: 6465 6c65 7465 7320 616e 6420 7265 706c deletes and repl │ │ │ -00001f30: 6163 6573 2061 6c6c 2074 6865 2070 7265 aces all the pre │ │ │ -00001f40: 7669 6f75 736c 7920 6578 6973 7469 6e67 viously existing │ │ │ -00001f50: 2077 696e 646f 7773 0a69 6e20 7468 6520 windows.in the │ │ │ -00001f60: 7365 6c65 6374 6564 2066 7261 6d65 2e1f selected frame.. │ │ │ -00001f70: 0a28 6465 6661 6c69 6173 2027 4275 6666 .(defalias 'Buff │ │ │ -00001f80: 6572 2d6d 656e 752d 7365 6c65 6374 2023 er-menu-select # │ │ │ -00001f90: 5b6e 696c 2022 c5c6 2170 c789 1b1c 191a [nil "..!p...... │ │ │ -00001fa0: 6562 88c8 c9c7 c623 ab9e c5c6 2113 c718 eb.....#....!... │ │ │ -00001fb0: cacb 2188 cc63 8829 0b5c 6e61 ac66 0b0c ..!..c.).\na.f.. │ │ │ -00001fc0: 73ac 610b 0c42 14aa 5b0c 9f14 cd20 530c s.a..B..[.... S. │ │ │ -00001fd0: 4754 a513 ce20 88cf 5c6e 2188 095c 6e61 GT... ..\n!..\na │ │ │ -00001fe0: ac84 d009 2188 0c47 d16b ab85 cf5c 6e21 ....!..G.k...\n! │ │ │ -00001ff0: aa9a 0cab 94d2 c70b 5c22 88d3 d421 88cf ........\"...!.. │ │ │ -00002000: 0c40 2188 0c41 8914 ac6c d3d4 212c 8722 .@!..A...l..!,." │ │ │ -00002010: 205b 6275 6666 6572 2d72 6561 642d 6f6e [buffer-read-on │ │ │ -00002020: 6c79 206d 656e 7520 6275 6666 2074 656d ly menu buff tem │ │ │ -00002030: 206f 7468 6572 7320 4275 6666 6572 2d6d others Buffer-m │ │ │ -00002040: 656e 752d 6275 6666 6572 2074 206e 696c enu-buffer t nil │ │ │ -00002050: 2073 6561 7263 682d 666f 7277 6172 6420 search-forward │ │ │ -00002060: 225c 6e3e 2220 6465 6c65 7465 2d63 6861 "\n>" delete-cha │ │ │ -00002070: 7220 2d31 203f 5c20 2066 7261 6d65 2d68 r -1 ?\ frame-h │ │ │ -00002080: 6569 6768 7420 6465 6c65 7465 2d6f 7468 eight delete-oth │ │ │ -00002090: 6572 2d77 696e 646f 7773 2073 7769 7463 er-windows switc │ │ │ -000020a0: 682d 746f 2d62 7566 6665 7220 6275 7279 h-to-buffer bury │ │ │ -000020b0: 2d62 7566 6665 7220 3020 7370 6c69 742d -buffer 0 split- │ │ │ -000020c0: 7769 6e64 6f77 206f 7468 6572 2d77 696e window other-win │ │ │ -000020d0: 646f 7720 315d 2035 2028 2324 202e 2037 dow 1] 5 (#$ . 7 │ │ │ -000020e0: 3830 3829 206e 696c 5d29 0a23 4037 3520 808) nil]).#@75 │ │ │ -000020f0: 5669 7369 7420 7468 6520 7461 6773 2074 Visit the tags t │ │ │ -00002100: 6162 6c65 2069 6e20 7468 6520 6275 6666 able in the buff │ │ │ -00002110: 6572 206f 6e20 7468 6973 206c 696e 652e er on this line. │ │ │ -00002120: 2020 5365 6520 6076 6973 6974 2d74 6167 See `visit-tag │ │ │ -00002130: 732d 7461 626c 6527 2e1f 0a28 6465 6661 s-table'...(defa │ │ │ -00002140: 6c69 6173 2027 4275 6666 6572 2d6d 656e lias 'Buffer-men │ │ │ -00002150: 752d 7669 7369 742d 7461 6773 2d74 6162 u-visit-tags-tab │ │ │ -00002160: 6c65 2023 5b6e 696c 2022 c1c2 c321 2189 le #[nil "...!!. │ │ │ -00002170: 18ab 85c4 0821 aa83 c5c6 2129 8722 205b .....!....!)." [ │ │ │ -00002180: 6669 6c65 2062 7566 6665 722d 6669 6c65 file buffer-file │ │ │ -00002190: 2d6e 616d 6520 4275 6666 6572 2d6d 656e -name Buffer-men │ │ │ -000021a0: 752d 6275 6666 6572 2074 2076 6973 6974 u-buffer t visit │ │ │ -000021b0: 2d74 6167 732d 7461 626c 6520 6572 726f -tags-table erro │ │ │ -000021c0: 7220 2253 7065 6369 6669 6564 2062 7566 r "Specified buf │ │ │ -000021d0: 6665 7220 6861 7320 6e6f 2066 696c 6522 fer has no file" │ │ │ -000021e0: 5d20 3420 2823 2420 2e20 3834 3332 2920 ] 4 (#$ . 8432) │ │ │ -000021f0: 6e69 6c5d 290a 2340 3530 2053 656c 6563 nil]).#@50 Selec │ │ │ -00002200: 7420 7468 6973 206c 696e 6527 7320 6275 t this line's bu │ │ │ -00002210: 6666 6572 2c20 616c 6f6e 652c 2069 6e20 ffer, alone, in │ │ │ -00002220: 6675 6c6c 2066 7261 6d65 2e1f 0a28 6465 full frame...(de │ │ │ -00002230: 6661 6c69 6173 2027 4275 6666 6572 2d6d falias 'Buffer-m │ │ │ -00002240: 656e 752d 312d 7769 6e64 6f77 2023 5b6e enu-1-window #[n │ │ │ -00002250: 696c 2022 c0c1 c221 2188 c3c4 2021 88c5 il "...!!... !.. │ │ │ -00002260: 2088 c6c7 2070 5c22 8722 205b 7377 6974 ... p\"." [swit │ │ │ -00002270: 6368 2d74 6f2d 6275 6666 6572 2042 7566 ch-to-buffer Buf │ │ │ -00002280: 6665 722d 6d65 6e75 2d62 7566 6665 7220 fer-menu-buffer │ │ │ -00002290: 7420 6275 7279 2d62 7566 6665 7220 6f74 t bury-buffer ot │ │ │ -000022a0: 6865 722d 6275 6666 6572 2064 656c 6574 her-buffer delet │ │ │ -000022b0: 652d 6f74 6865 722d 7769 6e64 6f77 7320 e-other-windows │ │ │ -000022c0: 7365 742d 7769 6e64 6f77 2d62 7566 6665 set-window-buffe │ │ │ -000022d0: 7220 7365 6c65 6374 6564 2d77 696e 646f r selected-windo │ │ │ -000022e0: 775d 2033 2028 2324 202e 2038 3639 3929 w] 3 (#$ . 8699) │ │ │ -000022f0: 206e 696c 5d29 0a23 4034 3420 5365 6c65 nil]).#@44 Sele │ │ │ -00002300: 6374 2074 6865 2062 7566 6665 7220 7768 ct the buffer wh │ │ │ -00002310: 6f73 6520 6c69 6e65 2079 6f75 2063 6c69 ose line you cli │ │ │ -00002320: 636b 206f 6e2e 1f0a 2864 6566 616c 6961 ck on...(defalia │ │ │ -00002330: 7320 2742 7566 6665 722d 6d65 6e75 2d6d s 'Buffer-menu-m │ │ │ -00002340: 6f75 7365 2d73 656c 6563 7420 235b 2865 ouse-select #[(e │ │ │ -00002350: 7665 6e74 2920 22c2 198a c308 2171 888a vent) ".....!q.. │ │ │ -00002360: c408 2162 88c5 c621 112a c7c8 0821 2188 ..!b...!.*...!!. │ │ │ -00002370: c9ca 2021 ab8c ca20 cb20 61ab 85cc 0921 .. !... . a....! │ │ │ -00002380: aa83 cd09 2129 8722 205b 6576 656e 7420 ....!)." [event │ │ │ -00002390: 6275 6666 6572 206e 696c 2065 7665 6e74 buffer nil event │ │ │ -000023a0: 2d62 7566 6665 7220 6576 656e 742d 706f -buffer event-po │ │ │ -000023b0: 696e 7420 4275 6666 6572 2d6d 656e 752d int Buffer-menu- │ │ │ -000023c0: 6275 6666 6572 2074 2073 656c 6563 742d buffer t select- │ │ │ -000023d0: 7769 6e64 6f77 2065 7665 6e74 2d77 696e window event-win │ │ │ -000023e0: 646f 7720 7769 6e64 6f77 2d64 6564 6963 dow window-dedic │ │ │ -000023f0: 6174 6564 2d70 2073 656c 6563 7465 642d ated-p selected- │ │ │ -00002400: 7769 6e64 6f77 2066 7261 6d65 2d72 6f6f window frame-roo │ │ │ -00002410: 742d 7769 6e64 6f77 2073 7769 7463 682d t-window switch- │ │ │ -00002420: 746f 2d62 7566 6665 722d 6f74 6865 722d to-buffer-other- │ │ │ -00002430: 6672 616d 6520 7377 6974 6368 2d74 6f2d frame switch-to- │ │ │ -00002440: 6275 6666 6572 5d20 3320 2823 2420 2e20 buffer] 3 (#$ . │ │ │ -00002450: 3839 3536 2920 2265 225d 290a 2864 6566 8956) "e"]).(def │ │ │ -00002460: 616c 6961 7320 2742 7566 6665 722d 6d65 alias 'Buffer-me │ │ │ -00002470: 6e75 2d6d 6179 6265 2d6d 6f75 7365 2d73 nu-maybe-mouse-s │ │ │ -00002480: 656c 6563 7420 235b 2865 7665 6e74 2026 elect #[(event & │ │ │ -00002490: 6f70 7469 6f6e 616c 2063 6c69 636b 2d63 optional click-c │ │ │ -000024a0: 6f75 6e74 2920 220b c459 ad8c 7060 c520 ount) "..Y..p`. │ │ │ -000024b0: 1a19 18c6 c7c8 8f2b 8722 205b 6275 6666 .......+." [buff │ │ │ -000024c0: 6572 2070 6f69 6e74 2063 6f6e 6669 6720 er point config │ │ │ -000024d0: 636c 6963 6b2d 636f 756e 7420 3220 6375 click-count 2 cu │ │ │ -000024e0: 7272 656e 742d 7769 6e64 6f77 2d63 6f6e rrent-window-con │ │ │ -000024f0: 6669 6775 7261 7469 6f6e 206e 696c 2028 figuration nil ( │ │ │ -00002500: 6279 7465 2d63 6f64 6520 22c1 0821 88c2 byte-code "..!.. │ │ │ -00002510: 8722 205b 6576 656e 7420 4275 6666 6572 ." [event Buffer │ │ │ -00002520: 2d6d 656e 752d 6d6f 7573 652d 7365 6c65 -menu-mouse-sele │ │ │ -00002530: 6374 2074 5d20 3229 2028 2865 7272 6f72 ct t] 2) ((error │ │ │ -00002540: 2028 6279 7465 2d63 6f64 6520 22c3 5c6e (byte-code ".\n │ │ │ -00002550: 2188 0971 8808 6288 c487 2220 5b70 6f69 !..q..b..." [poi │ │ │ -00002560: 6e74 2062 7566 6665 7220 636f 6e66 6967 nt buffer config │ │ │ -00002570: 2073 6574 2d77 696e 646f 772d 636f 6e66 set-window-conf │ │ │ -00002580: 6967 7572 6174 696f 6e20 6e69 6c5d 2032 iguration nil] 2 │ │ │ -00002590: 2929 295d 2033 206e 696c 2022 6522 5d29 )))] 3 nil "e"]) │ │ │ -000025a0: 0a23 4034 3320 5365 6c65 6374 2074 6869 .#@43 Select thi │ │ │ -000025b0: 7320 6c69 6e65 2773 2062 7566 6665 7220 s line's buffer │ │ │ -000025c0: 696e 2074 6869 7320 7769 6e64 6f77 2e1f in this window.. │ │ │ -000025d0: 0a28 6465 6661 6c69 6173 2027 4275 6666 .(defalias 'Buff │ │ │ -000025e0: 6572 2d6d 656e 752d 7468 6973 2d77 696e er-menu-this-win │ │ │ -000025f0: 646f 7720 235b 6e69 6c20 22c0 c1c2 2121 dow #[nil "...!! │ │ │ -00002600: 8722 205b 7377 6974 6368 2d74 6f2d 6275 ." [switch-to-bu │ │ │ -00002610: 6666 6572 2042 7566 6665 722d 6d65 6e75 ffer Buffer-menu │ │ │ -00002620: 2d62 7566 6665 7220 745d 2033 2028 2324 -buffer t] 3 (#$ │ │ │ -00002630: 202e 2039 3633 3829 206e 696c 5d29 0a23 . 9638) nil]).# │ │ │ -00002640: 4037 3320 5365 6c65 6374 2074 6869 7320 @73 Select this │ │ │ -00002650: 6c69 6e65 2773 2062 7566 6665 7220 696e line's buffer in │ │ │ -00002660: 206f 7468 6572 2077 696e 646f 772c 206c other window, l │ │ │ -00002670: 6561 7669 6e67 2062 7566 6665 7220 6d65 eaving buffer me │ │ │ -00002680: 6e75 2076 6973 6962 6c65 2e1f 0a28 6465 nu visible...(de │ │ │ -00002690: 6661 6c69 6173 2027 4275 6666 6572 2d6d falias 'Buffer-m │ │ │ -000026a0: 656e 752d 6f74 6865 722d 7769 6e64 6f77 enu-other-window │ │ │ -000026b0: 2023 5b6e 696c 2022 c0c1 c221 2187 2220 #[nil "...!!." │ │ │ -000026c0: 5b73 7769 7463 682d 746f 2d62 7566 6665 [switch-to-buffe │ │ │ -000026d0: 722d 6f74 6865 722d 7769 6e64 6f77 2042 r-other-window B │ │ │ -000026e0: 7566 6665 722d 6d65 6e75 2d62 7566 6665 uffer-menu-buffe │ │ │ -000026f0: 7220 745d 2033 2028 2324 202e 2039 3739 r t] 3 (#$ . 979 │ │ │ -00002700: 3629 206e 696c 5d29 0a23 4038 3720 4d61 6) nil]).#@87 Ma │ │ │ -00002710: 6b65 2074 6865 206f 7468 6572 2077 696e ke the other win │ │ │ -00002720: 646f 7720 7365 6c65 6374 2074 6869 7320 dow select this │ │ │ -00002730: 6c69 6e65 2773 2062 7566 6665 722e 0a54 line's buffer..T │ │ │ -00002740: 6865 2063 7572 7265 6e74 2077 696e 646f he current windo │ │ │ -00002750: 7720 7265 6d61 696e 7320 7365 6c65 6374 w remains select │ │ │ -00002760: 6564 2e1f 0a28 6465 6661 6c69 6173 2027 ed...(defalias ' │ │ │ -00002770: 4275 6666 6572 2d6d 656e 752d 7377 6974 Buffer-menu-swit │ │ │ -00002780: 6368 2d6f 7468 6572 2d77 696e 646f 7720 ch-other-window │ │ │ -00002790: 235b 6e69 6c20 22c0 c1c2 2121 8722 205b #[nil "...!!." [ │ │ │ -000027a0: 6469 7370 6c61 792d 6275 6666 6572 2042 display-buffer B │ │ │ -000027b0: 7566 6665 722d 6d65 6e75 2d62 7566 6665 uffer-menu-buffe │ │ │ -000027c0: 7220 745d 2033 2028 2324 202e 2039 3939 r t] 3 (#$ . 999 │ │ │ -000027d0: 3829 206e 696c 5d29 0a23 4036 3720 5365 8) nil]).#@67 Se │ │ │ -000027e0: 6c65 6374 2074 6869 7320 6c69 6e65 2773 lect this line's │ │ │ -000027f0: 2062 7566 6665 722c 2077 6974 6820 7072 buffer, with pr │ │ │ -00002800: 6576 696f 7573 2062 7566 6665 7220 696e evious buffer in │ │ │ -00002810: 2073 6563 6f6e 6420 7769 6e64 6f77 2e1f second window.. │ │ │ -00002820: 0a28 6465 6661 6c69 6173 2027 4275 6666 .(defalias 'Buff │ │ │ -00002830: 6572 2d6d 656e 752d 322d 7769 6e64 6f77 er-menu-2-window │ │ │ -00002840: 2023 5b6e 696c 2022 c3c4 2170 c418 1a19 #[nil "..!p.... │ │ │ -00002850: c520 88c6 c720 2188 c809 2188 c95c 6e21 . ... !...!..\n! │ │ │ -00002860: 2b87 2220 5b70 6f70 2d75 702d 7769 6e64 +." [pop-up-wind │ │ │ -00002870: 6f77 7320 6275 6666 206d 656e 7520 4275 ows buff menu Bu │ │ │ -00002880: 6666 6572 2d6d 656e 752d 6275 6666 6572 ffer-menu-buffer │ │ │ -00002890: 2074 2064 656c 6574 652d 6f74 6865 722d t delete-other- │ │ │ -000028a0: 7769 6e64 6f77 7320 7377 6974 6368 2d74 windows switch-t │ │ │ -000028b0: 6f2d 6275 6666 6572 206f 7468 6572 2d62 o-buffer other-b │ │ │ -000028c0: 7566 6665 7220 706f 702d 746f 2d62 7566 uffer pop-to-buf │ │ │ -000028d0: 6665 7220 6275 7279 2d62 7566 6665 725d fer bury-buffer] │ │ │ -000028e0: 2033 2028 2324 202e 2031 3032 3036 2920 3 (#$ . 10206) │ │ │ -000028f0: 6e69 6c5d 290a 2340 3738 2054 6f67 676c nil]).#@78 Toggl │ │ │ -00002900: 6520 7265 6164 2d6f 6e6c 7920 7374 6174 e read-only stat │ │ │ -00002910: 7573 206f 6620 6275 6666 6572 206f 6e20 us of buffer on │ │ │ -00002920: 7468 6973 206c 696e 652c 2070 6572 6861 this line, perha │ │ │ -00002930: 7073 2076 6961 2076 6572 7369 6f6e 2063 ps via version c │ │ │ -00002940: 6f6e 7472 6f6c 2e1f 0a28 6465 6661 6c69 ontrol...(defali │ │ │ -00002950: 6173 2027 4275 6666 6572 2d6d 656e 752d as 'Buffer-menu- │ │ │ -00002960: 746f 6767 6c65 2d72 6561 642d 6f6e 6c79 toggle-read-only │ │ │ -00002970: 2023 5b6e 696c 2022 c219 8ac3 c421 7188 #[nil ".....!q. │ │ │ -00002980: c520 8808 ab83 c6aa 81c7 1129 8ac8 7988 . .........)..y. │ │ │ -00002990: c975 8867 0955 3fad 89c2 18ca cb21 8809 .u.g.U?......!.. │ │ │ -000029a0: 6329 2a87 2220 5b62 7566 6665 722d 7265 c)*." [buffer-re │ │ │ -000029b0: 6164 2d6f 6e6c 7920 6368 6172 206e 696c ad-only char nil │ │ │ -000029c0: 2042 7566 6665 722d 6d65 6e75 2d62 7566 Buffer-menu-buf │ │ │ -000029d0: 6665 7220 7420 6d6f 6465 6c69 6e65 2d74 fer t modeline-t │ │ │ -000029e0: 6f67 676c 652d 7265 6164 2d6f 6e6c 7920 oggle-read-only │ │ │ -000029f0: 3f25 203f 5c20 2030 2032 2064 656c 6574 ?% ?\ 0 2 delet │ │ │ -00002a00: 652d 6368 6172 2031 5d20 3220 2823 2420 e-char 1] 2 (#$ │ │ │ -00002a10: 2e20 3130 3439 3129 206e 696c 5d29 0a28 . 10491) nil]).( │ │ │ -00002a20: 6279 7465 2d63 6f64 6520 22c1 0842 10c2 byte-code "..B.. │ │ │ -00002a30: c121 ac85 c3c1 c45c 2288 c187 2220 5b63 .!.....\"..." [c │ │ │ -00002a40: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ -00002a50: 2042 7566 6665 722d 6d65 6e75 2d70 6f70 Buffer-menu-pop │ │ │ -00002a60: 7570 2d6d 656e 7520 6465 6661 756c 742d up-menu default- │ │ │ -00002a70: 626f 756e 6470 2073 6574 2d64 6566 6175 boundp set-defau │ │ │ -00002a80: 6c74 2028 2242 7566 6665 7220 436f 6d6d lt ("Buffer Comm │ │ │ -00002a90: 616e 6473 2220 5b22 5365 6c65 6374 2042 ands" ["Select B │ │ │ -00002aa0: 7566 6665 7222 2042 7566 6665 722d 6d65 uffer" Buffer-me │ │ │ -00002ab0: 6e75 2d73 656c 6563 7420 745d 205b 2253 nu-select t] ["S │ │ │ -00002ac0: 656c 6563 7420 6275 6666 6572 204f 7468 elect buffer Oth │ │ │ -00002ad0: 6572 2057 696e 646f 7722 2042 7566 6665 er Window" Buffe │ │ │ -00002ae0: 722d 6d65 6e75 2d6f 7468 6572 2d77 696e r-menu-other-win │ │ │ -00002af0: 646f 7720 745d 205b 2243 6c65 6172 2042 dow t] ["Clear B │ │ │ -00002b00: 7566 6665 7220 4d6f 6469 6669 6361 7469 uffer Modificati │ │ │ -00002b10: 6f6e 2046 6c61 6722 2042 7566 6665 722d on Flag" Buffer- │ │ │ -00002b20: 6d65 6e75 2d6e 6f74 2d6d 6f64 6966 6965 menu-not-modifie │ │ │ -00002b30: 6420 745d 2022 2d2d 2d2d 2220 5b22 4d61 d t] "----" ["Ma │ │ │ -00002b40: 726b 2042 7566 6665 7220 666f 7220 5365 rk Buffer for Se │ │ │ -00002b50: 6c65 6374 696f 6e22 2042 7566 6665 722d lection" Buffer- │ │ │ -00002b60: 6d65 6e75 2d6d 6172 6b20 745d 205b 224d menu-mark t] ["M │ │ │ -00002b70: 6172 6b20 4275 6666 6572 2066 6f72 2053 ark Buffer for S │ │ │ -00002b80: 6176 6522 2042 7566 6665 722d 6d65 6e75 ave" Buffer-menu │ │ │ -00002b90: 2d73 6176 6520 745d 205b 224d 6172 6b20 -save t] ["Mark │ │ │ -00002ba0: 4275 6666 6572 2066 6f72 2044 656c 6574 Buffer for Delet │ │ │ -00002bb0: 696f 6e22 2042 7566 6665 722d 6d65 6e75 ion" Buffer-menu │ │ │ -00002bc0: 2d64 656c 6574 6520 745d 205b 2255 6e6d -delete t] ["Unm │ │ │ -00002bd0: 6172 6b20 4275 6666 6572 2220 4275 6666 ark Buffer" Buff │ │ │ -00002be0: 6572 2d6d 656e 752d 756e 6d61 726b 2074 er-menu-unmark t │ │ │ -00002bf0: 5d20 222d 2d2d 2d22 205b 2244 656c 6574 ] "----" ["Delet │ │ │ -00002c00: 652f 5361 7665 204d 6172 6b65 6420 4275 e/Save Marked Bu │ │ │ -00002c10: 6666 6572 7322 2042 7566 6665 722d 6d65 ffers" Buffer-me │ │ │ -00002c20: 6e75 2d65 7865 6375 7465 2074 5d29 5d20 nu-execute t])] │ │ │ -00002c30: 3329 0a28 6465 6661 6c69 6173 2027 4275 3).(defalias 'Bu │ │ │ -00002c40: 6666 6572 2d6d 656e 752d 706f 7075 702d ffer-menu-popup- │ │ │ -00002c50: 6d65 6e75 2023 5b28 6576 656e 7429 2022 menu #[(event) " │ │ │ -00002c60: c308 2188 c479 88c5 c621 891a ab91 c709 ..!..y...!...... │ │ │ -00002c70: 40c8 c95c 6e21 ca51 cb45 0941 a421 aa83 @..\n!.Q.E.A.!.. │ │ │ -00002c80: cccd 2129 8722 205b 6576 656e 7420 4275 ..!)." [event Bu │ │ │ -00002c90: 6666 6572 2d6d 656e 752d 706f 7075 702d ffer-menu-popup- │ │ │ -00002ca0: 6d65 6e75 2062 7566 6665 7220 6d6f 7573 menu buffer mous │ │ │ -00002cb0: 652d 7365 742d 706f 696e 7420 3020 4275 e-set-point 0 Bu │ │ │ -00002cc0: 6666 6572 2d6d 656e 752d 6275 6666 6572 ffer-menu-buffer │ │ │ -00002cd0: 206e 696c 2070 6f70 7570 2d6d 656e 7520 nil popup-menu │ │ │ -00002ce0: 2243 6f6d 6d61 6e64 7320 6f6e 2062 7566 "Commands on buf │ │ │ -00002cf0: 6665 7220 5c22 2220 6275 6666 6572 2d6e fer \"" buffer-n │ │ │ -00002d00: 616d 6520 225c 223a 2220 222d 2d2d 2d22 ame "\":" "----" │ │ │ -00002d10: 2065 7272 6f72 2022 6e6f 2062 7566 6665 error "no buffe │ │ │ -00002d20: 7220 6f6e 2074 6869 7320 6c69 6e65 225d r on this line"] │ │ │ -00002d30: 2036 206e 696c 2022 6522 5d29 0a28 6279 6 nil "e"]).(by │ │ │ -00002d40: 7465 2d63 6f64 6520 22c1 0842 10c2 c121 te-code "..B...! │ │ │ -00002d50: ac85 c3c1 c45c 2288 c187 2220 5b63 7572 .....\"..." [cur │ │ │ -00002d60: 7265 6e74 2d6c 6f61 642d 6c69 7374 206c rent-load-list l │ │ │ -00002d70: 6973 742d 6275 6666 6572 732d 6865 6164 ist-buffers-head │ │ │ -00002d80: 6572 2d6c 696e 6520 6465 6661 756c 742d er-line default- │ │ │ -00002d90: 626f 756e 6470 2073 6574 2d64 6566 6175 boundp set-defau │ │ │ -00002da0: 6c74 2022 204d 5220 4275 6666 6572 2020 lt " MR Buffer │ │ │ -00002db0: 2020 2020 2020 2020 2053 697a 6520 204d Size M │ │ │ -00002dc0: 6f64 6520 2020 2020 2020 2020 4669 6c65 ode File │ │ │ -00002dd0: 5c6e 202d 2d20 2d2d 2d2d 2d2d 2020 2020 \n -- ------ │ │ │ -00002de0: 2020 2020 2020 202d 2d2d 2d20 202d 2d2d ---- --- │ │ │ -00002df0: 2d20 2020 2020 2020 2020 2d2d 2d2d 5c6e - ----\n │ │ │ -00002e00: 225d 2033 290a 2340 3133 3420 5374 7269 "] 3).#@134 Stri │ │ │ -00002e10: 6e67 2075 7365 6420 746f 2069 6465 6e74 ng used to ident │ │ │ -00002e20: 6966 7920 7468 6973 2062 7566 6665 722c ify this buffer, │ │ │ -00002e30: 206f 7220 6120 6675 6e63 7469 6f6e 206f or a function o │ │ │ -00002e40: 6620 6f6e 6520 6172 6775 6d65 6e74 0a74 f one argument.t │ │ │ -00002e50: 6f20 6765 6e65 7261 7465 2073 7563 6820 o generate such │ │ │ -00002e60: 6120 7374 7269 6e67 2e20 2054 6869 7320 a string. This │ │ │ -00002e70: 7661 7269 6162 6c65 2069 7320 616c 7761 variable is alwa │ │ │ -00002e80: 7973 2062 7566 6665 722d 6c6f 6361 6c2e ys buffer-local. │ │ │ -00002e90: 1f0a 2864 6566 7661 7220 6c69 7374 2d62 ..(defvar list-b │ │ │ -00002ea0: 7566 6665 7273 2d69 6465 6e74 6966 6963 uffers-identific │ │ │ -00002eb0: 6174 696f 6e20 2764 6566 6175 6c74 2d6c ation 'default-l │ │ │ -00002ec0: 6973 742d 6275 6666 6572 732d 6964 656e ist-buffers-iden │ │ │ -00002ed0: 7469 6669 6361 7469 6f6e 2028 2324 202e tification (#$ . │ │ │ -00002ee0: 2031 3137 3838 2929 0a28 6279 7465 2d63 11788)).(byte-c │ │ │ -00002ef0: 6f64 6520 22c1 c221 88c3 0842 10c4 c321 ode "..!...B...! │ │ │ -00002f00: ac85 c5c3 c65c 2288 c1c3 2187 2220 5b63 .....\"...!." [c │ │ │ -00002f10: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ -00002f20: 206d 616b 652d 7661 7269 6162 6c65 2d62 make-variable-b │ │ │ -00002f30: 7566 6665 722d 6c6f 6361 6c20 6c69 7374 uffer-local list │ │ │ -00002f40: 2d62 7566 6665 7273 2d69 6465 6e74 6966 -buffers-identif │ │ │ -00002f50: 6963 6174 696f 6e20 6c69 7374 2d62 7566 ication list-buf │ │ │ -00002f60: 6665 7273 2d64 6972 6563 746f 7279 2064 fers-directory d │ │ │ -00002f70: 6566 6175 6c74 2d62 6f75 6e64 7020 7365 efault-boundp se │ │ │ -00002f80: 742d 6465 6661 756c 7420 6e69 6c5d 2033 t-default nil] 3 │ │ │ -00002f90: 290a 2864 6566 616c 6961 7320 2764 6566 ).(defalias 'def │ │ │ -00002fa0: 6175 6c74 2d6c 6973 742d 6275 6666 6572 ault-list-buffer │ │ │ -00002fb0: 732d 6964 656e 7469 6669 6361 7469 6f6e s-identification │ │ │ -00002fc0: 2023 5b28 6f75 7470 7574 2920 228a c670 #[(output) "..p │ │ │ -00002fd0: 21ae 87c7 c821 ad82 0e08 c920 0e1a ca89 !....!..... .... │ │ │ -00002fe0: 8989 1b1d 1a1c 181e 1819 0e19 7188 ca7f ............q... │ │ │ -00002ff0: 8860 14cb 0e18 0e19 5c22 8860 12cc cdce .`......\".`.... │ │ │ -00003000: 5c22 8860 130c 0b56 ab83 0c62 88cf 5c6e \".`...V...b..\n │ │ │ -00003010: 0b5a 5a89 15d0 56ab 89d1 6388 0d53 8915 .ZZ...V...c..S.. │ │ │ -00003020: aa73 ca7f 88d2 d3d4 5c22 8808 6388 09ad .s......\"..c... │ │ │ -00003030: 98d0 d569 5a89 1556 ab88 d60d 0c60 5a5d ...iZ..V.....`Z] │ │ │ -00003040: 2188 d2d7 d45c 2288 0963 2e08 8722 205b !....\"..c..." [ │ │ │ -00003050: 6d6f 6465 2066 696c 6520 7020 636f 6c20 mode file p col │ │ │ -00003060: 656f 6220 7320 6275 6666 6572 2d66 696c eob s buffer-fil │ │ │ -00003070: 652d 6e61 6d65 2062 6f75 6e64 7020 6c69 e-name boundp li │ │ │ -00003080: 7374 2d62 7566 6665 7273 2d64 6972 6563 st-buffers-direc │ │ │ -00003090: 746f 7279 2062 7566 6665 722d 7369 7a65 tory buffer-size │ │ │ -000030a0: 206e 696c 2070 7269 6e31 206d 6f76 652d nil prin1 move- │ │ │ -000030b0: 746f 2d63 6f6c 756d 6e20 3139 2074 2036 to-column 19 t 6 │ │ │ -000030c0: 2030 203f 5c20 2069 6e64 656e 742d 746f 0 ?\ indent-to │ │ │ -000030d0: 2032 3720 3120 3339 2064 656c 6574 652d 27 1 39 delete- │ │ │ -000030e0: 6368 6172 2034 3020 7369 7a65 206f 7574 char 40 size out │ │ │ -000030f0: 7075 7420 6d6f 6465 2d6e 616d 655d 2038 put mode-name] 8 │ │ │ -00003100: 5d29 0a28 6465 6661 6c69 6173 2027 6c69 ]).(defalias 'li │ │ │ -00003110: 7374 2d62 7566 6665 7273 2d69 6e74 6572 st-buffers-inter │ │ │ -00003120: 6e61 6c20 235b 286f 7574 7075 7420 266f nal #[(output &o │ │ │ -00003130: 7074 696f 6e61 6c20 7072 6564 6963 6174 ptional predicat │ │ │ -00003140: 6529 2022 70c6 201b 1a8a 0971 88c7 1621 e) "p. ....q...! │ │ │ -00003150: c820 88c9 0921 880e 2463 880b 83c5 00ca . ...!..$c...... │ │ │ -00003160: 1e5c 220b 401d cb0d 211c c718 0b41 130c .\".@...!....A.. │ │ │ -00003170: 83c1 000e 1fab 920e 1f3b ab87 cc0e 1f0c .........;...... │ │ │ -00003180: 5c22 aa84 0e1f 0d21 abfd 0d71 880e 210e \".....!...q..!. │ │ │ -00003190: 251e 201e 2309 7188 6010 0d5c 6e61 ab85 %. .#.q.`..\na.. │ │ │ -000031a0: 6012 cdaa 81ce 6388 cf0d 21ab 83d0 aa81 `.....c...!..... │ │ │ -000031b0: ce63 880e 23ab 83d1 aa81 ce63 88cc d20c .c..#......c.... │ │ │ -000031c0: 5c22 ab8b d31e 26d4 0c09 5c22 8829 aa85 \"....&...\".).. │ │ │ -000031d0: ce0c b102 88d5 0e5c 22d6 5c22 880e 203b .......\".\".. ; │ │ │ -000031e0: ab86 0e20 6388 aa92 0e20 ab8e 0d71 88d7 ... c.... ...q.. │ │ │ -000031f0: d8d9 8f88 0971 8864 6288 2ada 0860 cb0c .....q.db.*..`.. │ │ │ -00003200: 2488 da08 60db d324 88dc 6388 2c82 1700 $...`..$..c.,... │ │ │ -00003210: dd20 88de 5c6e 213f ad82 5c6e 622b 8722 . ..\n!?..\nb+." │ │ │ -00003220: 205b 7468 6973 2d62 7566 6665 722d 6c69 [this-buffer-li │ │ │ -00003230: 6e65 2d73 7461 7274 206f 7574 7075 7420 ne-start output │ │ │ -00003240: 6375 7272 656e 7420 6275 6666 6572 7320 current buffers │ │ │ -00003250: 6e61 6d65 2062 7566 6665 7220 6275 6666 name buffer buff │ │ │ -00003260: 6572 2d6c 6973 7420 6e69 6c20 6572 6173 er-list nil eras │ │ │ -00003270: 652d 6275 6666 6572 2062 7566 6665 722d e-buffer buffer- │ │ │ -00003280: 6469 7361 626c 652d 756e 646f 2031 3920 disable-undo 19 │ │ │ -00003290: 6275 6666 6572 2d6e 616d 6520 7374 7269 buffer-name stri │ │ │ -000032a0: 6e67 2d6d 6174 6368 203f 5c2e 203f 5c20 ng-match ?\. ?\ │ │ │ -000032b0: 2062 7566 6665 722d 6d6f 6469 6669 6564 buffer-modified │ │ │ -000032c0: 2d70 203f 2a20 3f25 2022 5b5c 6e5c 225c -p ?* ?% "[\n\"\ │ │ │ -000032d0: 5c20 095d 2220 7420 7072 696e 3120 696e \ .]" t prin1 in │ │ │ -000032e0: 6465 6e74 2d74 6f20 3120 6520 2866 756e dent-to 1 e (fun │ │ │ -000032f0: 6361 6c6c 2069 6420 6f75 7470 7574 2920 call id output) │ │ │ -00003300: 2828 6572 726f 7220 2862 7974 652d 636f ((error (byte-co │ │ │ -00003310: 6465 2022 c2c3 095c 2288 c408 095c 2287 de "...\"....\". │ │ │ -00003320: 2220 5b65 206f 7574 7075 7420 7072 696e " [e output prin │ │ │ -00003330: 6320 222a 2a2a 2220 7072 696e 315d 2033 c "***" prin1] 3 │ │ │ -00003340: 2929 2920 7075 742d 6e6f 6e64 7570 6c69 ))) put-nondupli │ │ │ -00003350: 6361 626c 652d 7465 7874 2d70 726f 7065 cable-text-prope │ │ │ -00003360: 7274 7920 6869 6768 6c69 6768 7420 3f5c rty highlight ?\ │ │ │ -00003370: 6e20 4275 6666 6572 2d6d 656e 752d 6d6f n Buffer-menu-mo │ │ │ -00003380: 6465 2062 7566 6665 7270 2070 7265 6469 de bufferp predi │ │ │ -00003390: 6361 7465 2069 6420 6275 6666 6572 2d72 cate id buffer-r │ │ │ -000033a0: 6561 642d 6f6e 6c79 2063 6f6c 3120 726f ead-only col1 ro │ │ │ -000033b0: 206c 6973 742d 6275 6666 6572 732d 6865 list-buffers-he │ │ │ -000033c0: 6164 6572 2d6c 696e 6520 6c69 7374 2d62 ader-line list-b │ │ │ -000033d0: 7566 6665 7273 2d69 6465 6e74 6966 6963 uffers-identific │ │ │ -000033e0: 6174 696f 6e20 7072 696e 742d 6573 6361 ation print-esca │ │ │ -000033f0: 7065 2d6e 6577 6c69 6e65 735d 2035 5d29 pe-newlines] 5]) │ │ │ -00003400: 0a23 4033 3437 2044 6973 706c 6179 2061 .#@347 Display a │ │ │ -00003410: 206c 6973 7420 6f66 206e 616d 6573 206f list of names o │ │ │ -00003420: 6620 6578 6973 7469 6e67 2062 7566 6665 f existing buffe │ │ │ -00003430: 7273 2e0a 5468 6520 6c69 7374 2069 7320 rs..The list is │ │ │ -00003440: 6469 7370 6c61 7965 6420 696e 2061 2062 displayed in a b │ │ │ -00003450: 7566 6665 7220 6e61 6d65 6420 602a 4275 uffer named `*Bu │ │ │ -00003460: 6666 6572 204c 6973 742a 272e 0a4e 6f74 ffer List*'..Not │ │ │ -00003470: 6520 7468 6174 2062 7566 6665 7273 2077 e that buffers w │ │ │ -00003480: 6974 6820 6e61 6d65 7320 7374 6172 7469 ith names starti │ │ │ -00003490: 6e67 2077 6974 6820 7370 6163 6573 2061 ng with spaces a │ │ │ -000034a0: 7265 206f 6d69 7474 6564 2e0a 4e6f 6e2d re omitted..Non- │ │ │ -000034b0: 6e69 6c20 6f70 7469 6f6e 616c 2061 7267 nil optional arg │ │ │ -000034c0: 2046 494c 4553 2d4f 4e4c 5920 6d65 616e FILES-ONLY mean │ │ │ -000034d0: 7320 6d65 6e74 696f 6e20 6f6e 6c79 2066 s mention only f │ │ │ -000034e0: 696c 6520 6275 6666 6572 732e 0a0a 5468 ile buffers...Th │ │ │ -000034f0: 6520 4d20 636f 6c75 6d6e 2063 6f6e 7461 e M column conta │ │ │ -00003500: 696e 7320 6120 2a20 666f 7220 6275 6666 ins a * for buff │ │ │ -00003510: 6572 7320 7468 6174 2061 7265 206d 6f64 ers that are mod │ │ │ -00003520: 6966 6965 642e 0a54 6865 2052 2063 6f6c ified..The R col │ │ │ -00003530: 756d 6e20 636f 6e74 6169 6e73 2061 2025 umn contains a % │ │ │ -00003540: 2066 6f72 2062 7566 6665 7273 2074 6861 for buffers tha │ │ │ -00003550: 7420 6172 6520 7265 6164 2d6f 6e6c 792e t are read-only. │ │ │ -00003560: 1f0a 2864 6566 616c 6961 7320 276c 6973 ..(defalias 'lis │ │ │ -00003570: 742d 6275 6666 6572 7320 235b 2826 6f70 t-buffers #[(&op │ │ │ -00003580: 7469 6f6e 616c 2066 696c 6573 2d6f 6e6c tional files-onl │ │ │ -00003590: 7929 2022 c1c2 0821 2187 2220 5b66 696c y) "...!!." [fil │ │ │ -000035a0: 6573 2d6f 6e6c 7920 6469 7370 6c61 792d es-only display- │ │ │ -000035b0: 6275 6666 6572 206c 6973 742d 6275 6666 buffer list-buff │ │ │ -000035c0: 6572 732d 6e6f 7365 6c65 6374 5d20 3320 ers-noselect] 3 │ │ │ -000035d0: 2823 2420 2e20 3133 3331 3929 2028 6c69 (#$ . 13319) (li │ │ │ -000035e0: 7374 2028 6966 2063 7572 7265 6e74 2d70 st (if current-p │ │ │ -000035f0: 7265 6669 782d 6172 6720 7420 6e69 6c29 refix-arg t nil) │ │ │ -00003600: 295d 290a 2340 3335 3120 4372 6561 7465 )]).#@351 Create │ │ │ -00003610: 2061 6e64 2072 6574 7572 6e20 6120 6275 and return a bu │ │ │ -00003620: 6666 6572 2077 6974 6820 6120 6c69 7374 ffer with a list │ │ │ -00003630: 206f 6620 6e61 6d65 7320 6f66 2065 7869 of names of exi │ │ │ -00003640: 7374 696e 6720 6275 6666 6572 732e 0a54 sting buffers..T │ │ │ -00003650: 6865 2062 7566 6665 7220 6973 206e 616d he buffer is nam │ │ │ -00003660: 6564 2060 2a42 7566 6665 7220 4c69 7374 ed `*Buffer List │ │ │ -00003670: 2a27 2e0a 4e6f 7465 2074 6861 7420 6275 *'..Note that bu │ │ │ -00003680: 6666 6572 7320 7769 7468 206e 616d 6573 ffers with names │ │ │ -00003690: 2073 7461 7274 696e 6720 7769 7468 2073 starting with s │ │ │ -000036a0: 7061 6365 7320 6172 6520 6f6d 6974 7465 paces are omitte │ │ │ -000036b0: 642e 0a4e 6f6e 2d6e 696c 206f 7074 696f d..Non-nil optio │ │ │ -000036c0: 6e61 6c20 6172 6720 4649 4c45 532d 4f4e nal arg FILES-ON │ │ │ -000036d0: 4c59 206d 6561 6e73 206d 656e 7469 6f6e LY means mention │ │ │ -000036e0: 206f 6e6c 7920 6669 6c65 2062 7566 6665 only file buffe │ │ │ -000036f0: 7273 2e0a 0a54 6865 204d 2063 6f6c 756d rs...The M colum │ │ │ -00003700: 6e20 636f 6e74 6169 6e73 2061 202a 2066 n contains a * f │ │ │ -00003710: 6f72 2062 7566 6665 7273 2074 6861 7420 or buffers that │ │ │ -00003720: 6172 6520 6d6f 6469 6669 6564 2e0a 5468 are modified..Th │ │ │ -00003730: 6520 5220 636f 6c75 6d6e 2063 6f6e 7461 e R column conta │ │ │ -00003740: 696e 7320 6120 2520 666f 7220 6275 6666 ins a % for buff │ │ │ -00003750: 6572 7320 7468 6174 2061 7265 2072 6561 ers that are rea │ │ │ -00003760: 642d 6f6e 6c79 2e1f 0a28 6465 6661 6c69 d-only...(defali │ │ │ -00003770: 6173 2027 6c69 7374 2d62 7566 6665 7273 as 'list-buffers │ │ │ -00003780: 2d6e 6f73 656c 6563 7420 235b 2826 6f70 -noselect #[(&op │ │ │ -00003790: 7469 6f6e 616c 2066 696c 6573 2d6f 6e6c tional files-onl │ │ │ -000037a0: 7929 2022 c2c3 2119 c409 08c5 73ab 83c6 y) "..!.....s... │ │ │ -000037b0: aa81 085c 2288 0929 8722 205b 6669 6c65 ...\"..)." [file │ │ │ -000037c0: 732d 6f6e 6c79 2062 7566 6665 7220 6765 s-only buffer ge │ │ │ -000037d0: 742d 6275 6666 6572 2d63 7265 6174 6520 t-buffer-create │ │ │ -000037e0: 222a 4275 6666 6572 204c 6973 742a 2220 "*Buffer List*" │ │ │ -000037f0: 6c69 7374 2d62 7566 6665 7273 2d69 6e74 list-buffers-int │ │ │ -00003800: 6572 6e61 6c20 2874 206e 696c 2920 235b ernal (t nil) #[ │ │ │ -00003810: 2862 2920 22c3 0921 1ac4 5c6e 4755 3fad (b) "..!..\nGU?. │ │ │ -00003820: 855c 6ec4 48c5 553f ad89 08ab 85c6 0921 .\n.H.U?.......! │ │ │ -00003830: aa81 c729 8722 205b 6669 6c65 732d 6f6e ...)." [files-on │ │ │ -00003840: 6c79 2062 206e 2062 7566 6665 722d 6e61 ly b n buffer-na │ │ │ -00003850: 6d65 2030 203f 5c20 2062 7566 6665 722d me 0 ?\ buffer- │ │ │ -00003860: 6669 6c65 2d6e 616d 6520 745d 2032 5d5d file-name t] 2]] │ │ │ -00003870: 2034 2028 2324 202e 2031 3338 3334 295d 4 (#$ . 13834)] │ │ │ -00003880: 290a 2340 3132 3620 466f 7220 7573 6520 ).#@126 For use │ │ │ -00003890: 6173 2061 2076 616c 7565 206f 6620 6062 as a value of `b │ │ │ -000038a0: 7566 6665 7273 2d6d 656e 752d 6f6d 6974 uffers-menu-omit │ │ │ -000038b0: 2d66 756e 6374 696f 6e27 2e0a 4f6d 6974 -function'..Omit │ │ │ -000038c0: 7320 6e6f 726d 616c 6c79 2069 6e76 6973 s normally invis │ │ │ -000038d0: 6962 6c65 2062 7566 6665 7273 2028 7468 ible buffers (th │ │ │ -000038e0: 6f73 6520 7768 6f73 6520 6e61 6d65 2062 ose whose name b │ │ │ -000038f0: 6567 696e 7320 7769 7468 2061 2073 7061 egins with a spa │ │ │ -00003900: 6365 292e 1f0a 2864 6566 616c 6961 7320 ce)...(defalias │ │ │ -00003910: 2762 7566 6665 7273 2d6d 656e 752d 6f6d 'buffers-menu-om │ │ │ -00003920: 6974 2d69 6e76 6973 6962 6c65 2d62 7566 it-invisible-buf │ │ │ -00003930: 6665 7273 2023 5b28 6275 6629 2022 c1c2 fers #[(buf) ".. │ │ │ -00003940: c308 215c 223f 3f87 2220 5b62 7566 2073 ..!\"??." [buf s │ │ │ -00003950: 7472 696e 672d 6d61 7463 6820 225c 5c60 tring-match "\\` │ │ │ -00003960: 2022 2062 7566 6665 722d 6e61 6d65 5d20 " buffer-name] │ │ │ -00003970: 3420 2823 2420 2e20 3134 3437 3229 5d29 4 (#$ . 14472)]) │ │ │ -00003980: 0a28 7072 6f76 6964 6520 2762 7566 662d .(provide 'buff- │ │ │ -00003990: 6d65 6e75 290a menu). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3235 2032 3032 310a 3b3b 3b20 :08:25 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f62 7566 662d 6d65 6e75 4/lisp/buff-menu │ │ │ +00000090: 2e65 6c0a 3b3b 3b20 656d 6163 7320 7665 .el.;;; emacs ve │ │ │ +000000a0: 7273 696f 6e20 3231 2e34 2028 7061 7463 rsion 21.4 (patc │ │ │ +000000b0: 6820 3234 2920 2253 7461 6e64 6172 6420 h 24) "Standard │ │ │ +000000c0: 4322 2058 456d 6163 7320 4c75 6369 642e C" XEmacs Lucid. │ │ │ +000000d0: 0a3b 3b3b 2062 7974 6563 6f6d 7020 7665 .;;; bytecomp ve │ │ │ +000000e0: 7273 696f 6e20 322e 3237 2058 456d 6163 rsion 2.27 XEmac │ │ │ +000000f0: 733b 2032 3030 302d 3039 2d31 322e 0a3b s; 2000-09-12..; │ │ │ +00000100: 3b3b 206f 7074 696d 697a 6174 696f 6e20 ;; optimization │ │ │ +00000110: 6973 206f 6e2e 0a3b 3b3b 2074 6869 7320 is on..;;; this │ │ │ +00000120: 6669 6c65 2075 7365 7320 6f70 636f 6465 file uses opcode │ │ │ +00000130: 7320 7768 6963 6820 646f 206e 6f74 2065 s which do not e │ │ │ +00000140: 7869 7374 2069 6e20 456d 6163 7320 3139 xist in Emacs 19 │ │ │ +00000150: 2e0a 0a28 6966 2028 616e 6420 2862 6f75 ...(if (and (bou │ │ │ +00000160: 6e64 7020 2765 6d61 6373 2d76 6572 7369 ndp 'emacs-versi │ │ │ +00000170: 6f6e 290a 0920 286f 7220 2861 6e64 2028 on).. (or (and ( │ │ │ +00000180: 626f 756e 6470 2027 6570 6f63 683a 3a76 boundp 'epoch::v │ │ │ +00000190: 6572 7369 6f6e 2920 6570 6f63 683a 3a76 ersion) epoch::v │ │ │ +000001a0: 6572 7369 6f6e 290a 0920 2020 2020 2873 ersion).. (s │ │ │ +000001b0: 7472 696e 672d 6c65 7373 7020 656d 6163 tring-lessp emac │ │ │ +000001c0: 732d 7665 7273 696f 6e20 2232 3022 2929 s-version "20")) │ │ │ +000001d0: 290a 2020 2020 2865 7272 6f72 2022 6062 ). (error "`b │ │ │ +000001e0: 7566 662d 6d65 6e75 2e65 6c27 2077 6173 uff-menu.el' was │ │ │ +000001f0: 2063 6f6d 7069 6c65 6420 666f 7220 456d compiled for Em │ │ │ +00000200: 6163 7320 3230 2229 290a 0a28 6f72 2028 acs 20"))..(or ( │ │ │ +00000210: 626f 756e 6470 2027 6375 7272 656e 742d boundp 'current- │ │ │ +00000220: 6c6f 6164 2d6c 6973 7429 2028 7365 7471 load-list) (setq │ │ │ +00000230: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ +00000240: 7374 206e 696c 2929 0a0a 0a28 6279 7465 st nil))...(byte │ │ │ +00000250: 2d63 6f64 6520 22c2 0842 10c3 c221 ac85 -code "..B...!.. │ │ │ +00000260: c4c2 c55c 2288 c108 4210 c3c1 21ac 85c4 ...\"...B...!... │ │ │ +00000270: c1c6 5c22 8809 84d5 00c7 2011 c809 c95c ..\"...... ....\ │ │ │ +00000280: 2288 ca09 c15c 2288 cb09 cccd 2388 cb09 "....\".....#... │ │ │ +00000290: cecf 2388 cb09 d0d1 2388 cb09 d2d3 2388 ..#.....#.....#. │ │ │ +000002a0: cb09 d4d5 2388 cb09 d6d5 2388 cb09 d7d8 ....#.....#..... │ │ │ +000002b0: 2388 cb09 d9da 2388 cb09 dbdc 2388 cb09 #.....#.....#... │ │ │ +000002c0: ddde 2388 cb09 dfde 2388 cb09 e0e1 2388 ..#.....#.....#. │ │ │ +000002d0: cb09 e2de 2388 cb09 e3e4 2388 cb09 e5e6 ....#.....#..... │ │ │ +000002e0: 2388 cb09 e7e6 2388 cb09 e8e9 2388 cb09 #.....#.....#... │ │ │ +000002f0: eaeb 2388 cb09 eceb 2388 cb09 edee 2388 ..#.....#.....#. │ │ │ +00000300: cb09 eff0 2388 cb09 f1f2 2388 cb09 f3f4 ....#.....#..... │ │ │ +00000310: 2388 cb09 f5f6 2388 cb09 f7f8 2388 cb09 #.....#.....#... │ │ │ +00000320: f9fa 2388 cb09 fbfc 2388 cb09 fdfe 2388 ..#.....#.....#. │ │ │ +00000330: ff81 4000 8141 0081 4200 2387 2220 5b63 ..@..A..B.#." [c │ │ │ +00000340: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ +00000350: 2042 7566 6665 722d 6d65 6e75 2d6d 6f64 Buffer-menu-mod │ │ │ +00000360: 652d 6d61 7020 4275 6666 6572 2d6d 656e e-map Buffer-men │ │ │ +00000370: 752d 6275 6666 6572 2d63 6f6c 756d 6e20 u-buffer-column │ │ │ +00000380: 6465 6661 756c 742d 626f 756e 6470 2073 default-boundp s │ │ │ +00000390: 6574 2d64 6566 6175 6c74 2034 206e 696c et-default 4 nil │ │ │ +000003a0: 206d 616b 652d 6b65 796d 6170 2073 7570 make-keymap sup │ │ │ +000003b0: 7072 6573 732d 6b65 796d 6170 2074 2073 press-keymap t s │ │ │ +000003c0: 6574 2d6b 6579 6d61 702d 6e61 6d65 2064 et-keymap-name d │ │ │ +000003d0: 6566 696e 652d 6b65 7920 2271 2220 4275 efine-key "q" Bu │ │ │ +000003e0: 6666 6572 2d6d 656e 752d 7175 6974 2022 ffer-menu-quit " │ │ │ +000003f0: 7622 2042 7566 6665 722d 6d65 6e75 2d73 v" Buffer-menu-s │ │ │ +00000400: 656c 6563 7420 2232 2220 4275 6666 6572 elect "2" Buffer │ │ │ +00000410: 2d6d 656e 752d 322d 7769 6e64 6f77 2022 -menu-2-window " │ │ │ +00000420: 3122 2042 7566 6665 722d 6d65 6e75 2d31 1" Buffer-menu-1 │ │ │ +00000430: 2d77 696e 646f 7720 2266 2220 4275 6666 -window "f" Buff │ │ │ +00000440: 6572 2d6d 656e 752d 7468 6973 2d77 696e er-menu-this-win │ │ │ +00000450: 646f 7720 220d 2220 226f 2220 4275 6666 dow "." "o" Buff │ │ │ +00000460: 6572 2d6d 656e 752d 6f74 6865 722d 7769 er-menu-other-wi │ │ │ +00000470: 6e64 6f77 2022 0f22 2042 7566 6665 722d ndow "." Buffer- │ │ │ +00000480: 6d65 6e75 2d73 7769 7463 682d 6f74 6865 menu-switch-othe │ │ │ +00000490: 722d 7769 6e64 6f77 2022 7322 2042 7566 r-window "s" Buf │ │ │ +000004a0: 6665 722d 6d65 6e75 2d73 6176 6520 2264 fer-menu-save "d │ │ │ +000004b0: 2220 4275 6666 6572 2d6d 656e 752d 6465 " Buffer-menu-de │ │ │ +000004c0: 6c65 7465 2022 6b22 2022 0422 2042 7566 lete "k" "." Buf │ │ │ +000004d0: 6665 722d 6d65 6e75 2d64 656c 6574 652d fer-menu-delete- │ │ │ +000004e0: 6261 636b 7761 7264 7320 220b 2220 2278 backwards "." "x │ │ │ +000004f0: 2220 4275 6666 6572 2d6d 656e 752d 6578 " Buffer-menu-ex │ │ │ +00000500: 6563 7574 6520 2220 2220 6e65 7874 2d6c ecute " " next-l │ │ │ +00000510: 696e 6520 226e 2220 2270 2220 7072 6576 ine "n" "p" prev │ │ │ +00000520: 696f 7573 2d6c 696e 6520 6261 636b 7370 ious-line backsp │ │ │ +00000530: 6163 6520 4275 6666 6572 2d6d 656e 752d ace Buffer-menu- │ │ │ +00000540: 6261 636b 7570 2d75 6e6d 6172 6b20 6465 backup-unmark de │ │ │ +00000550: 6c65 7465 2022 7e22 2042 7566 6665 722d lete "~" Buffer- │ │ │ +00000560: 6d65 6e75 2d6e 6f74 2d6d 6f64 6966 6965 menu-not-modifie │ │ │ +00000570: 6420 223f 2220 6465 7363 7269 6265 2d6d d "?" describe-m │ │ │ +00000580: 6f64 6520 2275 2220 4275 6666 6572 2d6d ode "u" Buffer-m │ │ │ +00000590: 656e 752d 756e 6d61 726b 2022 6d22 2042 enu-unmark "m" B │ │ │ +000005a0: 7566 6665 722d 6d65 6e75 2d6d 6172 6b20 uffer-menu-mark │ │ │ +000005b0: 2274 2220 4275 6666 6572 2d6d 656e 752d "t" Buffer-menu- │ │ │ +000005c0: 7669 7369 742d 7461 6773 2d74 6162 6c65 visit-tags-table │ │ │ +000005d0: 2022 2522 2042 7566 6665 722d 6d65 6e75 "%" Buffer-menu │ │ │ +000005e0: 2d74 6f67 676c 652d 7265 6164 2d6f 6e6c -toggle-read-onl │ │ │ +000005f0: 7920 2267 2220 7265 7665 7274 2d62 7566 y "g" revert-buf │ │ │ +00000600: 6665 7220 6275 7474 6f6e 3220 4275 6666 fer button2 Buff │ │ │ +00000610: 6572 2d6d 656e 752d 6d6f 7573 652d 7365 er-menu-mouse-se │ │ │ +00000620: 6c65 6374 2062 7574 746f 6e33 2042 7566 lect button3 Buf │ │ │ +00000630: 6665 722d 6d65 6e75 2d70 6f70 7570 2d6d fer-menu-popup-m │ │ │ +00000640: 656e 7520 7075 7420 4275 6666 6572 2d6d enu put Buffer-m │ │ │ +00000650: 656e 752d 6d6f 6465 206d 6f64 652d 636c enu-mode mode-cl │ │ │ +00000660: 6173 7320 7370 6563 6961 6c5d 2034 290a ass special] 4). │ │ │ +00000670: 2340 3136 3036 204d 616a 6f72 206d 6f64 #@1606 Major mod │ │ │ +00000680: 6520 666f 7220 6564 6974 696e 6720 6120 e for editing a │ │ │ +00000690: 6c69 7374 206f 6620 6275 6666 6572 732e list of buffers. │ │ │ +000006a0: 0a45 6163 6820 6c69 6e65 2064 6573 6372 .Each line descr │ │ │ +000006b0: 6962 6573 206f 6e65 206f 6620 7468 6520 ibes one of the │ │ │ +000006c0: 6275 6666 6572 7320 696e 2045 6d61 6373 buffers in Emacs │ │ │ +000006d0: 2e0a 4c65 7474 6572 7320 646f 206e 6f74 ..Letters do not │ │ │ +000006e0: 2069 6e73 6572 7420 7468 656d 7365 6c76 insert themselv │ │ │ +000006f0: 6573 3b20 696e 7374 6561 642c 2074 6865 es; instead, the │ │ │ +00000700: 7920 6172 6520 636f 6d6d 616e 6473 2e0a y are commands.. │ │ │ +00000710: 5c3c 4275 6666 6572 2d6d 656e 752d 6d6f \.\[Buffer │ │ │ +00000730: 2d6d 656e 752d 6d6f 7573 652d 7365 6c65 -menu-mouse-sele │ │ │ +00000740: 6374 5d20 2d2d 2073 656c 6563 7420 6275 ct] -- select bu │ │ │ +00000750: 6666 6572 2079 6f75 2063 6c69 636b 206f ffer you click o │ │ │ +00000760: 6e2c 2069 6e20 706c 6163 6520 6f66 2074 n, in place of t │ │ │ +00000770: 6865 2062 7566 6665 7220 6d65 6e75 2e0a he buffer menu.. │ │ │ +00000780: 5c5b 4275 6666 6572 2d6d 656e 752d 7468 \[Buffer-menu-th │ │ │ +00000790: 6973 2d77 696e 646f 775d 202d 2d20 7365 is-window] -- se │ │ │ +000007a0: 6c65 6374 2063 7572 7265 6e74 206c 696e lect current lin │ │ │ +000007b0: 6527 7320 6275 6666 6572 2069 6e20 706c e's buffer in pl │ │ │ +000007c0: 6163 6520 6f66 2074 6865 2062 7566 6665 ace of the buffe │ │ │ +000007d0: 7220 6d65 6e75 2e0a 5c5b 4275 6666 6572 r menu..\[Buffer │ │ │ +000007e0: 2d6d 656e 752d 6f74 6865 722d 7769 6e64 -menu-other-wind │ │ │ +000007f0: 6f77 5d20 2d2d 2073 656c 6563 7420 7468 ow] -- select th │ │ │ +00000800: 6174 2062 7566 6665 7220 696e 2061 6e6f at buffer in ano │ │ │ +00000810: 7468 6572 2077 696e 646f 772c 0a20 2073 ther window,. s │ │ │ +00000820: 6f20 7468 6520 6275 6666 6572 206d 656e o the buffer men │ │ │ +00000830: 7520 6275 6666 6572 2072 656d 6169 6e73 u buffer remains │ │ │ +00000840: 2076 6973 6962 6c65 2069 6e20 6974 7320 visible in its │ │ │ +00000850: 7769 6e64 6f77 2e0a 5c5b 4275 6666 6572 window..\[Buffer │ │ │ +00000860: 2d6d 656e 752d 7377 6974 6368 2d6f 7468 -menu-switch-oth │ │ │ +00000870: 6572 2d77 696e 646f 775d 202d 2d20 6d61 er-window] -- ma │ │ │ +00000880: 6b65 2061 6e6f 7468 6572 2077 696e 646f ke another windo │ │ │ +00000890: 7720 6469 7370 6c61 7920 7468 6174 2062 w display that b │ │ │ +000008a0: 7566 6665 722e 0a5c 5b42 7566 6665 722d uffer..\[Buffer- │ │ │ +000008b0: 6d65 6e75 2d6d 6172 6b5d 202d 2d20 6d61 menu-mark] -- ma │ │ │ +000008c0: 726b 2063 7572 7265 6e74 206c 696e 6527 rk current line' │ │ │ +000008d0: 7320 6275 6666 6572 2074 6f20 6265 2064 s buffer to be d │ │ │ +000008e0: 6973 706c 6179 6564 2e0a 5c5b 4275 6666 isplayed..\[Buff │ │ │ +000008f0: 6572 2d6d 656e 752d 7365 6c65 6374 5d20 er-menu-select] │ │ │ +00000900: 2d2d 2073 656c 6563 7420 6375 7272 656e -- select curren │ │ │ +00000910: 7420 6c69 6e65 2773 2062 7566 6665 722e t line's buffer. │ │ │ +00000920: 0a20 2041 6c73 6f20 7368 6f77 2062 7566 . Also show buf │ │ │ +00000930: 6665 7273 206d 6172 6b65 6420 7769 7468 fers marked with │ │ │ +00000940: 206d 2c20 696e 206f 7468 6572 2077 696e m, in other win │ │ │ +00000950: 646f 7773 2e0a 5c5b 4275 6666 6572 2d6d dows..\[Buffer-m │ │ │ +00000960: 656e 752d 312d 7769 6e64 6f77 5d20 2d2d enu-1-window] -- │ │ │ +00000970: 2073 656c 6563 7420 7468 6174 2062 7566 select that buf │ │ │ +00000980: 6665 7220 696e 2066 756c 6c2d 6672 616d fer in full-fram │ │ │ +00000990: 6520 7769 6e64 6f77 2e0a 5c5b 4275 6666 e window..\[Buff │ │ │ +000009a0: 6572 2d6d 656e 752d 322d 7769 6e64 6f77 er-menu-2-window │ │ │ +000009b0: 5d20 2d2d 2073 656c 6563 7420 7468 6174 ] -- select that │ │ │ +000009c0: 2062 7566 6665 7220 696e 206f 6e65 2077 buffer in one w │ │ │ +000009d0: 696e 646f 772c 0a20 2074 6f67 6574 6865 indow,. togethe │ │ │ +000009e0: 7220 7769 7468 2062 7566 6665 7220 7365 r with buffer se │ │ │ +000009f0: 6c65 6374 6564 2062 6566 6f72 6520 7468 lected before th │ │ │ +00000a00: 6973 206f 6e65 2069 6e20 616e 6f74 6865 is one in anothe │ │ │ +00000a10: 7220 7769 6e64 6f77 2e0a 5c5b 4275 6666 r window..\[Buff │ │ │ +00000a20: 6572 2d6d 656e 752d 7669 7369 742d 7461 er-menu-visit-ta │ │ │ +00000a30: 6773 2d74 6162 6c65 5d20 2d2d 2076 6973 gs-table] -- vis │ │ │ +00000a40: 6974 2d74 6167 732d 7461 626c 6520 7468 it-tags-table th │ │ │ +00000a50: 6973 2062 7566 6665 722e 0a5c 5b42 7566 is buffer..\[Buf │ │ │ +00000a60: 6665 722d 6d65 6e75 2d6e 6f74 2d6d 6f64 fer-menu-not-mod │ │ │ +00000a70: 6966 6965 645d 202d 2d20 636c 6561 7220 ified] -- clear │ │ │ +00000a80: 6d6f 6469 6669 6564 2d66 6c61 6720 6f6e modified-flag on │ │ │ +00000a90: 2074 6861 7420 6275 6666 6572 2e0a 5c5b that buffer..\[ │ │ │ +00000aa0: 4275 6666 6572 2d6d 656e 752d 7361 7665 Buffer-menu-save │ │ │ +00000ab0: 5d20 2d2d 206d 6172 6b20 7468 6174 2062 ] -- mark that b │ │ │ +00000ac0: 7566 6665 7220 746f 2062 6520 7361 7665 uffer to be save │ │ │ +00000ad0: 642c 2061 6e64 206d 6f76 6520 646f 776e d, and move down │ │ │ +00000ae0: 2e0a 5c5b 4275 6666 6572 2d6d 656e 752d ..\[Buffer-menu- │ │ │ +00000af0: 6465 6c65 7465 5d20 2d2d 206d 6172 6b20 delete] -- mark │ │ │ +00000b00: 7468 6174 2062 7566 6665 7220 746f 2062 that buffer to b │ │ │ +00000b10: 6520 6465 6c65 7465 642c 2061 6e64 206d e deleted, and m │ │ │ +00000b20: 6f76 6520 646f 776e 2e0a 5c5b 4275 6666 ove down..\[Buff │ │ │ +00000b30: 6572 2d6d 656e 752d 6465 6c65 7465 2d62 er-menu-delete-b │ │ │ +00000b40: 6163 6b77 6172 6473 5d20 2d2d 206d 6172 ackwards] -- mar │ │ │ +00000b50: 6b20 7468 6174 2062 7566 6665 7220 746f k that buffer to │ │ │ +00000b60: 2062 6520 6465 6c65 7465 642c 2061 6e64 be deleted, and │ │ │ +00000b70: 206d 6f76 6520 7570 2e0a 5c5b 4275 6666 move up..\[Buff │ │ │ +00000b80: 6572 2d6d 656e 752d 6578 6563 7574 655d er-menu-execute] │ │ │ +00000b90: 202d 2d20 6465 6c65 7465 206f 7220 7361 -- delete or sa │ │ │ +00000ba0: 7665 206d 6172 6b65 6420 6275 6666 6572 ve marked buffer │ │ │ +00000bb0: 732e 0a5c 5b42 7566 6665 722d 6d65 6e75 s..\[Buffer-menu │ │ │ +00000bc0: 2d75 6e6d 6172 6b5d 202d 2d20 7265 6d6f -unmark] -- remo │ │ │ +00000bd0: 7665 2061 6c6c 206b 696e 6473 206f 6620 ve all kinds of │ │ │ +00000be0: 6d61 726b 7320 6672 6f6d 2063 7572 7265 marks from curre │ │ │ +00000bf0: 6e74 206c 696e 652e 0a20 2057 6974 6820 nt line.. With │ │ │ +00000c00: 7072 6566 6978 2061 7267 756d 656e 742c prefix argument, │ │ │ +00000c10: 2061 6c73 6f20 6d6f 7665 2075 7020 6f6e also move up on │ │ │ +00000c20: 6520 6c69 6e65 2e0a 5c5b 4275 6666 6572 e line..\[Buffer │ │ │ +00000c30: 2d6d 656e 752d 6261 636b 7570 2d75 6e6d -menu-backup-unm │ │ │ +00000c40: 6172 6b5d 202d 2d20 6261 636b 2075 7020 ark] -- back up │ │ │ +00000c50: 6120 6c69 6e65 2061 6e64 2072 656d 6f76 a line and remov │ │ │ +00000c60: 6520 6d61 726b 732e 0a5c 5b42 7566 6665 e marks..\[Buffe │ │ │ +00000c70: 722d 6d65 6e75 2d74 6f67 676c 652d 7265 r-menu-toggle-re │ │ │ +00000c80: 6164 2d6f 6e6c 795d 202d 2d20 746f 6767 ad-only] -- togg │ │ │ +00000c90: 6c65 2072 6561 642d 6f6e 6c79 2073 7461 le read-only sta │ │ │ +00000ca0: 7475 7320 6f66 2062 7566 6665 7220 6f6e tus of buffer on │ │ │ +00000cb0: 2074 6869 7320 6c69 6e65 2e1f 0a28 6465 this line...(de │ │ │ +00000cc0: 6661 6c69 6173 2027 4275 6666 6572 2d6d falias 'Buffer-m │ │ │ +00000cd0: 656e 752d 6d6f 6465 2023 5b6e 696c 2022 enu-mode #[nil " │ │ │ +00000ce0: c620 88c7 0d21 88c8 14c9 13ca c221 88cb . ...!.......!.. │ │ │ +00000cf0: 12cc 8911 10cd ce21 88cf ced0 cc89 2488 .......!......$. │ │ │ +00000d00: d1d2 2187 2220 5b62 7566 6665 722d 7265 ..!." [buffer-re │ │ │ +00000d10: 6164 2d6f 6e6c 7920 7472 756e 6361 7465 ad-only truncate │ │ │ +00000d20: 2d6c 696e 6573 2072 6576 6572 742d 6275 -lines revert-bu │ │ │ +00000d30: 6666 6572 2d66 756e 6374 696f 6e20 6d6f ffer-function mo │ │ │ +00000d40: 6465 2d6e 616d 6520 6d61 6a6f 722d 6d6f de-name major-mo │ │ │ +00000d50: 6465 2042 7566 6665 722d 6d65 6e75 2d6d de Buffer-menu-m │ │ │ +00000d60: 6f64 652d 6d61 7020 6b69 6c6c 2d61 6c6c ode-map kill-all │ │ │ +00000d70: 2d6c 6f63 616c 2d76 6172 6961 626c 6573 -local-variables │ │ │ +00000d80: 2075 7365 2d6c 6f63 616c 2d6d 6170 2042 use-local-map B │ │ │ +00000d90: 7566 6665 722d 6d65 6e75 2d6d 6f64 6520 uffer-menu-mode │ │ │ +00000da0: 2242 7566 6665 7220 4d65 6e75 2220 6d61 "Buffer Menu" ma │ │ │ +00000db0: 6b65 2d6c 6f63 616c 2d76 6172 6961 626c ke-local-variabl │ │ │ +00000dc0: 6520 4275 6666 6572 2d6d 656e 752d 7265 e Buffer-menu-re │ │ │ +00000dd0: 7665 7274 2d66 756e 6374 696f 6e20 7420 vert-function t │ │ │ +00000de0: 6d61 6b65 2d6c 6f63 616c 2d68 6f6f 6b20 make-local-hook │ │ │ +00000df0: 6d6f 7573 652d 7472 6163 6b2d 636c 6963 mouse-track-clic │ │ │ +00000e00: 6b2d 686f 6f6b 2061 6464 2d68 6f6f 6b20 k-hook add-hook │ │ │ +00000e10: 4275 6666 6572 2d6d 656e 752d 6d61 7962 Buffer-menu-mayb │ │ │ +00000e20: 652d 6d6f 7573 652d 7365 6c65 6374 2072 e-mouse-select r │ │ │ +00000e30: 756e 2d68 6f6f 6b73 2062 7566 6665 722d un-hooks buffer- │ │ │ +00000e40: 6d65 6e75 2d6d 6f64 652d 686f 6f6b 5d20 menu-mode-hook] │ │ │ +00000e50: 3620 2823 2420 2e20 3136 3535 295d 290a 6 (#$ . 1655)]). │ │ │ +00000e60: 2864 6566 616c 6961 7320 2742 7566 6665 (defalias 'Buffe │ │ │ +00000e70: 722d 6d65 6e75 2d72 6576 6572 742d 6675 r-menu-revert-fu │ │ │ +00000e80: 6e63 7469 6f6e 2023 5b28 6967 6e6f 7265 nction #[(ignore │ │ │ +00000e90: 3120 6967 6e6f 7265 3229 2022 c020 8722 1 ignore2) ". ." │ │ │ +00000ea0: 205b 6c69 7374 2d62 7566 6665 7273 5d20 [list-buffers] │ │ │ +00000eb0: 315d 290a 2340 3534 2052 6574 7572 6e20 1]).#@54 Return │ │ │ +00000ec0: 6275 6666 6572 2064 6573 6372 6962 6564 buffer described │ │ │ +00000ed0: 2062 7920 7468 6973 206c 696e 6520 6f66 by this line of │ │ │ +00000ee0: 2062 7566 6665 7220 6d65 6e75 2e1f 0a28 buffer menu...( │ │ │ +00000ef0: 6465 6661 6c69 6173 2027 4275 6666 6572 defalias 'Buffer │ │ │ +00000f00: 2d6d 656e 752d 6275 6666 6572 2023 5b28 -menu-buffer #[( │ │ │ +00000f10: 6572 726f 722d 6966 2d6e 6f6e 2d65 7869 error-if-non-exi │ │ │ +00000f20: 7374 656e 742d 7029 2022 8ac4 7988 6008 stent-p) "..y.`. │ │ │ +00000f30: 5c5c 291a 6d3f ad84 c55c 6ec6 5c22 891b \\).m?...\n.\".. │ │ │ +00000f40: ab8e c70b 21ae 8f09 ad8c c8c9 0b5c 22aa ....!........\". │ │ │ +00000f50: 8609 ad83 c8ca 212a 8722 205b 4275 6666 ......!*." [Buff │ │ │ +00000f60: 6572 2d6d 656e 752d 6275 6666 6572 2d63 er-menu-buffer-c │ │ │ +00000f70: 6f6c 756d 6e20 6572 726f 722d 6966 2d6e olumn error-if-n │ │ │ +00000f80: 6f6e 2d65 7869 7374 656e 742d 7020 7768 on-existent-p wh │ │ │ +00000f90: 6572 6520 6e61 6d65 2030 2067 6574 2d74 ere name 0 get-t │ │ │ +00000fa0: 6578 742d 7072 6f70 6572 7479 2062 7566 ext-property buf │ │ │ +00000fb0: 6665 722d 6e61 6d65 2067 6574 2d62 7566 fer-name get-buf │ │ │ +00000fc0: 6665 7220 6572 726f 7220 224e 6f20 6275 fer error "No bu │ │ │ +00000fd0: 6666 6572 206e 616d 6564 2060 2573 2722 ffer named `%s'" │ │ │ +00000fe0: 2022 4e6f 2062 7566 6665 7220 6f6e 2074 "No buffer on t │ │ │ +00000ff0: 6869 7320 6c69 6e65 225d 2034 2028 2324 his line"] 4 (#$ │ │ │ +00001000: 202e 2033 3736 3929 5d29 0a23 4032 3333 . 3769)]).#@233 │ │ │ +00001010: 204d 616b 6520 6120 6d65 6e75 206f 6620 Make a menu of │ │ │ +00001020: 6275 6666 6572 7320 736f 2079 6f75 2063 buffers so you c │ │ │ +00001030: 616e 2073 6176 652c 2064 656c 6574 6520 an save, delete │ │ │ +00001040: 6f72 2073 656c 6563 7420 7468 656d 2e0a or select them.. │ │ │ +00001050: 5769 7468 2061 7267 756d 656e 742c 2073 With argument, s │ │ │ +00001060: 686f 7720 6f6e 6c79 2062 7566 6665 7273 how only buffers │ │ │ +00001070: 2074 6861 7420 6172 6520 7669 7369 7469 that are visiti │ │ │ +00001080: 6e67 2066 696c 6573 2e0a 5479 7065 203f ng files..Type ? │ │ │ +00001090: 2061 6674 6572 2069 6e76 6f63 6174 696f after invocatio │ │ │ +000010a0: 6e20 746f 2067 6574 2068 656c 7020 6f6e n to get help on │ │ │ +000010b0: 2063 6f6d 6d61 6e64 7320 6176 6169 6c61 commands availa │ │ │ +000010c0: 626c 652e 0a54 7970 6520 7120 696d 6d65 ble..Type q imme │ │ │ +000010d0: 6469 6174 656c 7920 746f 206d 616b 6520 diately to make │ │ │ +000010e0: 7468 6520 6275 6666 6572 206d 656e 7520 the buffer menu │ │ │ +000010f0: 676f 2061 7761 792e 1f0a 2864 6566 616c go away...(defal │ │ │ +00001100: 6961 7320 2762 7566 6665 722d 6d65 6e75 ias 'buffer-menu │ │ │ +00001110: 2023 5b28 266f 7074 696f 6e61 6c20 6172 #[(&optional ar │ │ │ +00001120: 6729 2022 c1c2 0821 2188 c3c4 2187 2220 g) "...!!...!." │ │ │ +00001130: 5b61 7267 2073 7769 7463 682d 746f 2d62 [arg switch-to-b │ │ │ +00001140: 7566 6665 7220 6c69 7374 2d62 7566 6665 uffer list-buffe │ │ │ +00001150: 7273 2d6e 6f73 656c 6563 7420 6d65 7373 rs-noselect mess │ │ │ +00001160: 6167 6520 2243 6f6d 6d61 6e64 733a 2064 age "Commands: d │ │ │ +00001170: 2c20 732c 2078 2c20 753b 2066 2c20 6f2c , s, x, u; f, o, │ │ │ +00001180: 2031 2c20 322c 206d 2c20 763b 207e 2c20 1, 2, m, v; ~, │ │ │ +00001190: 2525 3b20 7120 746f 2071 7569 743b 203f %%; q to quit; ? │ │ │ +000011a0: 2066 6f72 2068 656c 702e 225d 2033 2028 for help."] 3 ( │ │ │ +000011b0: 2324 202e 2034 3131 3329 2022 5022 5d29 #$ . 4113) "P"]) │ │ │ +000011c0: 0a23 4032 3838 2044 6973 706c 6179 2061 .#@288 Display a │ │ │ +000011d0: 206c 6973 7420 6f66 2062 7566 6665 7273 list of buffers │ │ │ +000011e0: 2069 6e20 616e 6f74 6865 7220 7769 6e64 in another wind │ │ │ +000011f0: 6f77 2e0a 5769 7468 2074 6865 2062 7566 ow..With the buf │ │ │ +00001200: 6665 7220 6c69 7374 2062 7566 6665 722c fer list buffer, │ │ │ +00001210: 2079 6f75 2063 616e 2073 6176 652c 2064 you can save, d │ │ │ +00001220: 656c 6574 6520 6f72 2073 656c 6563 7420 elete or select │ │ │ +00001230: 7468 6520 6275 6666 6572 732e 0a57 6974 the buffers..Wit │ │ │ +00001240: 6820 6172 6775 6d65 6e74 2c20 7368 6f77 h argument, show │ │ │ +00001250: 206f 6e6c 7920 6275 6666 6572 7320 7468 only buffers th │ │ │ +00001260: 6174 2061 7265 2076 6973 6974 696e 6720 at are visiting │ │ │ +00001270: 6669 6c65 732e 0a54 7970 6520 3f20 6166 files..Type ? af │ │ │ +00001280: 7465 7220 696e 766f 6361 7469 6f6e 2074 ter invocation t │ │ │ +00001290: 6f20 6765 7420 6865 6c70 206f 6e20 636f o get help on co │ │ │ +000012a0: 6d6d 616e 6473 2061 7661 696c 6162 6c65 mmands available │ │ │ +000012b0: 2e0a 5479 7065 2071 2069 6d6d 6564 6961 ..Type q immedia │ │ │ +000012c0: 7465 6c79 2074 6f20 6d61 6b65 2074 6865 tely to make the │ │ │ +000012d0: 2062 7566 6665 7220 6d65 6e75 2067 6f20 buffer menu go │ │ │ +000012e0: 6177 6179 2e1f 0a28 6465 6661 6c69 6173 away...(defalias │ │ │ +000012f0: 2027 6275 6666 6572 2d6d 656e 752d 6f74 'buffer-menu-ot │ │ │ +00001300: 6865 722d 7769 6e64 6f77 2023 5b28 266f her-window #[(&o │ │ │ +00001310: 7074 696f 6e61 6c20 6172 6729 2022 c1c2 ptional arg) ".. │ │ │ +00001320: 0821 2188 c3c4 2187 2220 5b61 7267 2073 .!!...!." [arg s │ │ │ +00001330: 7769 7463 682d 746f 2d62 7566 6665 722d witch-to-buffer- │ │ │ +00001340: 6f74 6865 722d 7769 6e64 6f77 206c 6973 other-window lis │ │ │ +00001350: 742d 6275 6666 6572 732d 6e6f 7365 6c65 t-buffers-nosele │ │ │ +00001360: 6374 206d 6573 7361 6765 2022 436f 6d6d ct message "Comm │ │ │ +00001370: 616e 6473 3a20 642c 2073 2c20 782c 2075 ands: d, s, x, u │ │ │ +00001380: 3b20 662c 206f 2c20 312c 2032 2c20 6d2c ; f, o, 1, 2, m, │ │ │ +00001390: 2076 3b20 7e2c 2025 253b 2071 2074 6f20 v; ~, %%; q to │ │ │ +000013a0: 7175 6974 3b20 3f20 666f 7220 6865 6c70 quit; ? for help │ │ │ +000013b0: 2e22 5d20 3320 2823 2420 2e20 3435 3531 ."] 3 (#$ . 4551 │ │ │ +000013c0: 2920 2250 225d 290a 2340 3233 2051 7569 ) "P"]).#@23 Qui │ │ │ +000013d0: 7420 7468 6520 6275 6666 6572 206d 656e t the buffer men │ │ │ +000013e0: 752e 1f0a 2864 6566 616c 6961 7320 2742 u...(defalias 'B │ │ │ +000013f0: 7566 6665 722d 6d65 6e75 2d71 7569 7420 uffer-menu-quit │ │ │ +00001400: 235b 6e69 6c20 2270 18c1 c220 2188 c308 #[nil "p... !... │ │ │ +00001410: 2129 8722 205b 6275 6666 6572 2073 7769 !)." [buffer swi │ │ │ +00001420: 7463 682d 746f 2d62 7566 6665 7220 6f74 tch-to-buffer ot │ │ │ +00001430: 6865 722d 6275 6666 6572 2062 7572 792d her-buffer bury- │ │ │ +00001440: 6275 6666 6572 5d20 3220 2823 2420 2e20 buffer] 2 (#$ . │ │ │ +00001450: 3530 3639 2920 6e69 6c5d 290a 2340 3130 5069) nil]).#@10 │ │ │ +00001460: 3320 4d61 726b 2062 7566 6665 7220 6f6e 3 Mark buffer on │ │ │ +00001470: 2074 6869 7320 6c69 6e65 2066 6f72 2062 this line for b │ │ │ +00001480: 6569 6e67 2064 6973 706c 6179 6564 2062 eing displayed b │ │ │ +00001490: 7920 5c3c 4275 6666 6572 2d6d 656e 752d y \\[Buffe │ │ │ +000014b0: 722d 6d65 6e75 2d73 656c 6563 745d 2063 r-menu-select] c │ │ │ +000014c0: 6f6d 6d61 6e64 2e1f 0a28 6465 6661 6c69 ommand...(defali │ │ │ +000014d0: 6173 2027 4275 6666 6572 2d6d 656e 752d as 'Buffer-menu- │ │ │ +000014e0: 6d61 726b 2023 5b6e 696c 2022 c179 88c2 mark #[nil ".y.. │ │ │ +000014f0: c321 ab83 c420 87c5 18c6 c721 88c8 6388 .!... .....!..c. │ │ │ +00001500: c779 2987 2220 5b62 7566 6665 722d 7265 .y)." [buffer-re │ │ │ +00001510: 6164 2d6f 6e6c 7920 3020 6c6f 6f6b 696e ad-only 0 lookin │ │ │ +00001520: 672d 6174 2022 205b 2d4d 5d22 2064 696e g-at " [-M]" din │ │ │ +00001530: 6720 6e69 6c20 6465 6c65 7465 2d63 6861 g nil delete-cha │ │ │ +00001540: 7220 3120 3f3e 5d20 3220 2823 2420 2e20 r 1 ?>] 2 (#$ . │ │ │ +00001550: 3532 3138 2920 6e69 6c5d 290a 2340 3939 5218) nil]).#@99 │ │ │ +00001560: 2043 616e 6365 6c20 616c 6c20 7265 7175 Cancel all requ │ │ │ +00001570: 6573 7465 6420 6f70 6572 6174 696f 6e73 ested operations │ │ │ +00001580: 206f 6e20 6275 6666 6572 206f 6e20 7468 on buffer on th │ │ │ +00001590: 6973 206c 696e 6520 616e 6420 6d6f 7665 is line and move │ │ │ +000015a0: 2064 6f77 6e2e 0a4f 7074 696f 6e61 6c20 down..Optional │ │ │ +000015b0: 4152 4720 6d65 616e 7320 6d6f 7665 2075 ARG means move u │ │ │ +000015c0: 702e 1f0a 2864 6566 616c 6961 7320 2742 p...(defalias 'B │ │ │ +000015d0: 7566 6665 722d 6d65 6e75 2d75 6e6d 6172 uffer-menu-unmar │ │ │ +000015e0: 6b20 235b 2826 6f70 7469 6f6e 616c 2062 k #[(&optional b │ │ │ +000015f0: 6163 6b75 7029 2022 c579 88c6 c721 ab85 ackup) ".y...!.. │ │ │ +00001600: c820 88aa abc9 ca21 1ccb 0c21 1b8a 0c71 . .....!...!...q │ │ │ +00001610: 885c 6e29 19cc 1acd ce21 8809 ab89 0bab .\n).....!...... │ │ │ +00001620: 83cf aa8a d0aa 870b ab83 d1aa 81d2 6388 ..............c. │ │ │ +00001630: 2c08 ab83 d3aa 81d4 7987 2220 5b62 6163 ,.......y." [bac │ │ │ +00001640: 6b75 7020 7265 6164 6f6e 6c79 2062 7566 kup readonly buf │ │ │ +00001650: 6665 722d 7265 6164 2d6f 6e6c 7920 6d6f fer-read-only mo │ │ │ +00001660: 6420 6275 6620 3020 6c6f 6f6b 696e 672d d buf 0 looking- │ │ │ +00001670: 6174 2022 205b 2d4d 5d22 2064 696e 6720 at " [-M]" ding │ │ │ +00001680: 4275 6666 6572 2d6d 656e 752d 6275 6666 Buffer-menu-buff │ │ │ +00001690: 6572 2074 2062 7566 6665 722d 6d6f 6469 er t buffer-modi │ │ │ +000016a0: 6669 6564 2d70 206e 696c 2064 656c 6574 fied-p nil delet │ │ │ +000016b0: 652d 6368 6172 2033 2022 202a 2522 2022 e-char 3 " *%" " │ │ │ +000016c0: 2020 2522 2022 202a 2022 2022 2020 2022 %" " * " " " │ │ │ +000016d0: 202d 3120 315d 2032 2028 2324 202e 2035 -1 1] 2 (#$ . 5 │ │ │ +000016e0: 3437 3329 2022 5022 5d29 0a23 4037 3020 473) "P"]).#@70 │ │ │ +000016f0: 4d6f 7665 2075 7020 616e 6420 6361 6e63 Move up and canc │ │ │ +00001700: 656c 2061 6c6c 2072 6571 7565 7374 6564 el all requested │ │ │ +00001710: 206f 7065 7261 7469 6f6e 7320 6f6e 2062 operations on b │ │ │ +00001720: 7566 6665 7220 6f6e 206c 696e 6520 6162 uffer on line ab │ │ │ +00001730: 6f76 652e 1f0a 2864 6566 616c 6961 7320 ove...(defalias │ │ │ +00001740: 2742 7566 6665 722d 6d65 6e75 2d62 6163 'Buffer-menu-bac │ │ │ +00001750: 6b75 702d 756e 6d61 726b 2023 5b6e 696c kup-unmark #[nil │ │ │ +00001760: 2022 c079 88c1 2088 c079 8722 205b 2d31 ".y.. ..y." [-1 │ │ │ +00001770: 2042 7566 6665 722d 6d65 6e75 2d75 6e6d Buffer-menu-unm │ │ │ +00001780: 6172 6b5d 2031 2028 2324 202e 2035 3837 ark] 1 (#$ . 587 │ │ │ +00001790: 3229 206e 696c 5d29 0a23 4031 3737 204d 2) nil]).#@177 M │ │ │ +000017a0: 6172 6b20 6275 6666 6572 206f 6e20 7468 ark buffer on th │ │ │ +000017b0: 6973 206c 696e 6520 746f 2062 6520 6465 is line to be de │ │ │ +000017c0: 6c65 7465 6420 6279 205c 3c42 7566 6665 leted by \ │ │ │ +000017e0: 5c5b 4275 6666 6572 2d6d 656e 752d 6578 \[Buffer-menu-ex │ │ │ +000017f0: 6563 7574 655d 2063 6f6d 6d61 6e64 2e0a ecute] command.. │ │ │ +00001800: 5072 6566 6978 2061 7267 2069 7320 686f Prefix arg is ho │ │ │ +00001810: 7720 6d61 6e79 2062 7566 6665 7273 2074 w many buffers t │ │ │ +00001820: 6f20 6465 6c65 7465 2e0a 4e65 6761 7469 o delete..Negati │ │ │ +00001830: 7665 2061 7267 206d 6561 6e73 2064 656c ve arg means del │ │ │ +00001840: 6574 6520 6261 636b 7761 7264 732e 1f0a ete backwards... │ │ │ +00001850: 2864 6566 616c 6961 7320 2742 7566 6665 (defalias 'Buffe │ │ │ +00001860: 722d 6d65 6e75 2d64 656c 6574 6520 235b r-menu-delete #[ │ │ │ +00001870: 2826 6f70 7469 6f6e 616c 2061 7267 2920 (&optional arg) │ │ │ +00001880: 22c2 7988 c3c4 21ab 83c5 2087 c618 09ab ".y...!... ..... │ │ │ +00001890: 8509 c255 ab82 c711 09c2 56ab 90c8 c721 ...U......V....! │ │ │ +000018a0: 88c9 6388 c779 8809 5389 11aa 6c09 c257 ..c..y..S...l..W │ │ │ +000018b0: ad90 c8c7 2188 c963 88ca 7988 0954 8911 ....!..c..y..T.. │ │ │ +000018c0: aa6c 2987 2220 5b62 7566 6665 722d 7265 .l)." [buffer-re │ │ │ +000018d0: 6164 2d6f 6e6c 7920 6172 6720 3020 6c6f ad-only arg 0 lo │ │ │ +000018e0: 6f6b 696e 672d 6174 2022 205b 2d4d 5d22 oking-at " [-M]" │ │ │ +000018f0: 2064 696e 6720 6e69 6c20 3120 6465 6c65 ding nil 1 dele │ │ │ +00001900: 7465 2d63 6861 7220 3f44 202d 315d 2033 te-char ?D -1] 3 │ │ │ +00001910: 2028 2324 202e 2036 3034 3729 2022 7022 (#$ . 6047) "p" │ │ │ +00001920: 5d29 0a23 4031 3634 204d 6172 6b20 6275 ]).#@164 Mark bu │ │ │ +00001930: 6666 6572 206f 6e20 7468 6973 206c 696e ffer on this lin │ │ │ +00001940: 6520 746f 2062 6520 6465 6c65 7465 6420 e to be deleted │ │ │ +00001950: 6279 205c 3c42 7566 6665 722d 6d65 6e75 by \\[Buff │ │ │ +00001970: 6572 2d6d 656e 752d 6578 6563 7574 655d er-menu-execute] │ │ │ +00001980: 2063 6f6d 6d61 6e64 0a61 6e64 2074 6865 command.and the │ │ │ +00001990: 6e20 6d6f 7665 2075 7020 6f6e 6520 6c69 n move up one li │ │ │ +000019a0: 6e65 2e20 2050 7265 6669 7820 6172 6720 ne. Prefix arg │ │ │ +000019b0: 6d65 616e 7320 6d6f 7665 2074 6861 7420 means move that │ │ │ +000019c0: 6d61 6e79 206c 696e 6573 2e1f 0a28 6465 many lines...(de │ │ │ +000019d0: 6661 6c69 6173 2027 4275 6666 6572 2d6d falias 'Buffer-m │ │ │ +000019e0: 656e 752d 6465 6c65 7465 2d62 6163 6b77 enu-delete-backw │ │ │ +000019f0: 6172 6473 2023 5b28 266f 7074 696f 6e61 ards #[(&optiona │ │ │ +00001a00: 6c20 6172 6729 2022 c108 ae81 c25b 2188 l arg) ".....[!. │ │ │ +00001a10: c3c4 21ad 85c2 7988 aa76 8722 205b 6172 ..!...y..v." [ar │ │ │ +00001a20: 6720 4275 6666 6572 2d6d 656e 752d 6465 g Buffer-menu-de │ │ │ +00001a30: 6c65 7465 2031 206c 6f6f 6b69 6e67 2d61 lete 1 looking-a │ │ │ +00001a40: 7420 2220 5b2d 4d5d 225d 2032 2028 2324 t " [-M]"] 2 (#$ │ │ │ +00001a50: 202e 2036 3434 3129 2022 7022 5d29 0a23 . 6441) "p"]).# │ │ │ +00001a60: 4039 3620 4d61 726b 2062 7566 6665 7220 @96 Mark buffer │ │ │ +00001a70: 6f6e 2074 6869 7320 6c69 6e65 2074 6f20 on this line to │ │ │ +00001a80: 6265 2073 6176 6564 2062 7920 5c3c 4275 be saved by \\[Buffer-menu │ │ │ +00001ab0: 2d65 7865 6375 7465 5d20 636f 6d6d 616e -execute] comman │ │ │ +00001ac0: 642e 1f0a 2864 6566 616c 6961 7320 2742 d...(defalias 'B │ │ │ +00001ad0: 7566 6665 722d 6d65 6e75 2d73 6176 6520 uffer-menu-save │ │ │ +00001ae0: 235b 6e69 6c20 22c1 7988 c2c3 21ab 83c4 #[nil ".y...!... │ │ │ +00001af0: 2087 c518 c675 88c7 c621 88c8 6388 c679 ....u...!..c..y │ │ │ +00001b00: 2987 2220 5b62 7566 6665 722d 7265 6164 )." [buffer-read │ │ │ +00001b10: 2d6f 6e6c 7920 3020 6c6f 6f6b 696e 672d -only 0 looking- │ │ │ +00001b20: 6174 2022 205b 2d4d 5d22 2064 696e 6720 at " [-M]" ding │ │ │ +00001b30: 6e69 6c20 3120 6465 6c65 7465 2d63 6861 nil 1 delete-cha │ │ │ +00001b40: 7220 3f53 5d20 3220 2823 2420 2e20 3637 r ?S] 2 (#$ . 67 │ │ │ +00001b50: 3536 2920 6e69 6c5d 290a 2340 3632 204d 56) nil]).#@62 M │ │ │ +00001b60: 6172 6b20 6275 6666 6572 206f 6e20 7468 ark buffer on th │ │ │ +00001b70: 6973 206c 696e 6520 6173 2075 6e6d 6f64 is line as unmod │ │ │ +00001b80: 6966 6965 6420 286e 6f20 6368 616e 6765 ified (no change │ │ │ +00001b90: 7320 746f 2073 6176 6529 2e1f 0a28 6465 s to save)...(de │ │ │ +00001ba0: 6661 6c69 6173 2027 4275 6666 6572 2d6d falias 'Buffer-m │ │ │ +00001bb0: 656e 752d 6e6f 742d 6d6f 6469 6669 6564 enu-not-modified │ │ │ +00001bc0: 2023 5b28 266f 7074 696f 6e61 6c20 6172 #[(&optional ar │ │ │ +00001bd0: 6729 2022 8ac2 c321 7188 c409 2188 298a g) "...!q...!.). │ │ │ +00001be0: c579 88c6 7588 6066 09ab 83c7 aa81 c855 .y..u.`f.......U │ │ │ +00001bf0: ad8f c918 cac6 2188 09ab 83c8 aa81 c763 ......!........c │ │ │ +00001c00: 2929 8722 205b 6275 6666 6572 2d72 6561 ))." [buffer-rea │ │ │ +00001c10: 642d 6f6e 6c79 2061 7267 2042 7566 6665 d-only arg Buffe │ │ │ +00001c20: 722d 6d65 6e75 2d62 7566 6665 7220 7420 r-menu-buffer t │ │ │ +00001c30: 7365 742d 6275 6666 6572 2d6d 6f64 6966 set-buffer-modif │ │ │ +00001c40: 6965 642d 7020 3020 3120 3f5c 2020 3f2a ied-p 0 1 ?\ ?* │ │ │ +00001c50: 206e 696c 2064 656c 6574 652d 6368 6172 nil delete-char │ │ │ +00001c60: 5d20 3220 2823 2420 2e20 3730 3037 2920 ] 2 (#$ . 7007) │ │ │ +00001c70: 2250 225d 290a 2340 3134 3120 5361 7665 "P"]).#@141 Save │ │ │ +00001c80: 2061 6e64 2f6f 7220 6465 6c65 7465 2062 and/or delete b │ │ │ +00001c90: 7566 6665 7273 206d 6172 6b65 6420 7769 uffers marked wi │ │ │ +00001ca0: 7468 205c 3c42 7566 6665 722d 6d65 6e75 th \\[Buff │ │ │ +00001cc0: 6572 2d6d 656e 752d 7361 7665 5d20 6f72 er-menu-save] or │ │ │ +00001cd0: 205c 3c42 7566 6665 722d 6d65 6e75 2d6d \\[Buffer │ │ │ +00001cf0: 2d6d 656e 752d 6465 6c65 7465 5d20 636f -menu-delete] co │ │ │ +00001d00: 6d6d 616e 6473 2e1f 0a28 6465 6661 6c69 mmands...(defali │ │ │ +00001d10: 6173 2027 4275 6666 6572 2d6d 656e 752d as 'Buffer-menu- │ │ │ +00001d20: 6578 6563 7574 6520 235b 6e69 6c20 228a execute #[nil ". │ │ │ +00001d30: 6562 88c4 7988 c5c6 c7c8 23ab a1c7 1b8a eb..y.....#..... │ │ │ +00001d40: c9c8 2171 88ca 2088 cb20 1329 c719 cccd ..!q.. .. .).... │ │ │ +00001d50: 2188 0bab 83ce aa81 cf63 882a aa58 298a !........c.*.X). │ │ │ +00001d60: 6562 88c4 7988 70c7 1918 d0d1 c7c8 23ad eb..y.p.......#. │ │ │ +00001d70: b2cd 7588 c9c7 2189 1ac7 61ac 8b5c 6e08 ..u...!...a..\n. │ │ │ +00001d80: 61ac 868a d25c 6e21 8829 29c9 c721 ab89 a....\n!.))..!.. │ │ │ +00001d90: ccc4 2188 cf63 88aa 5360 c479 8860 7c88 ..!..c..S`.y.`|. │ │ │ +00001da0: cd75 88aa 472b 8722 205b 6275 6666 2d6d .u..G+." [buff-m │ │ │ +00001db0: 656e 752d 6275 6666 6572 2062 7566 6665 enu-buffer buffe │ │ │ +00001dc0: 722d 7265 6164 2d6f 6e6c 7920 6275 6620 r-read-only buf │ │ │ +00001dd0: 6d6f 6470 2031 2072 652d 7365 6172 6368 modp 1 re-search │ │ │ +00001de0: 2d66 6f72 7761 7264 2022 5e2e 5322 206e -forward "^.S" n │ │ │ +00001df0: 696c 2074 2042 7566 6665 722d 6d65 6e75 il t Buffer-menu │ │ │ +00001e00: 2d62 7566 6665 7220 7361 7665 2d62 7566 -buffer save-buf │ │ │ +00001e10: 6665 7220 6275 6666 6572 2d6d 6f64 6966 fer buffer-modif │ │ │ +00001e20: 6965 642d 7020 6465 6c65 7465 2d63 6861 ied-p delete-cha │ │ │ +00001e30: 7220 2d31 203f 2a20 3f5c 2020 7365 6172 r -1 ?* ?\ sear │ │ │ +00001e40: 6368 2d66 6f72 7761 7264 2022 5c6e 4422 ch-forward "\nD" │ │ │ +00001e50: 206b 696c 6c2d 6275 6666 6572 5d20 3520 kill-buffer] 5 │ │ │ +00001e60: 2823 2420 2e20 3732 3932 2920 6e69 6c5d (#$ . 7292) nil] │ │ │ +00001e70: 290a 2340 3234 3120 5365 6c65 6374 2074 ).#@241 Select t │ │ │ +00001e80: 6869 7320 6c69 6e65 2773 2062 7566 6665 his line's buffe │ │ │ +00001e90: 723b 2061 6c73 6f20 6469 7370 6c61 7920 r; also display │ │ │ +00001ea0: 6275 6666 6572 7320 6d61 726b 6564 2077 buffers marked w │ │ │ +00001eb0: 6974 6820 603e 272e 0a59 6f75 2063 616e ith `>'..You can │ │ │ +00001ec0: 206d 6172 6b20 6275 6666 6572 7320 7769 mark buffers wi │ │ │ +00001ed0: 7468 2074 6865 205c 3c42 7566 6665 722d th the \\[ │ │ │ +00001ef0: 4275 6666 6572 2d6d 656e 752d 6d61 726b Buffer-menu-mark │ │ │ +00001f00: 5d20 636f 6d6d 616e 642e 0a54 6869 7320 ] command..This │ │ │ +00001f10: 636f 6d6d 616e 6420 6465 6c65 7465 7320 command deletes │ │ │ +00001f20: 616e 6420 7265 706c 6163 6573 2061 6c6c and replaces all │ │ │ +00001f30: 2074 6865 2070 7265 7669 6f75 736c 7920 the previously │ │ │ +00001f40: 6578 6973 7469 6e67 2077 696e 646f 7773 existing windows │ │ │ +00001f50: 0a69 6e20 7468 6520 7365 6c65 6374 6564 .in the selected │ │ │ +00001f60: 2066 7261 6d65 2e1f 0a28 6465 6661 6c69 frame...(defali │ │ │ +00001f70: 6173 2027 4275 6666 6572 2d6d 656e 752d as 'Buffer-menu- │ │ │ +00001f80: 7365 6c65 6374 2023 5b6e 696c 2022 c5c6 select #[nil ".. │ │ │ +00001f90: 2170 c789 1b1c 191a 6562 88c8 c9c7 c623 !p......eb.....# │ │ │ +00001fa0: ab9e c5c6 2113 c718 cacb 2188 cc63 8829 ....!.....!..c.) │ │ │ +00001fb0: 0b5c 6e61 ac66 0b0c 73ac 610b 0c42 14aa .\na.f..s.a..B.. │ │ │ +00001fc0: 5b0c 9f14 cd20 530c 4754 a513 ce20 88cf [.... S.GT... .. │ │ │ +00001fd0: 5c6e 2188 095c 6e61 ac84 d009 2188 0c47 \n!..\na....!..G │ │ │ +00001fe0: d16b ab85 cf5c 6e21 aa9a 0cab 94d2 c70b .k...\n!........ │ │ │ +00001ff0: 5c22 88d3 d421 88cf 0c40 2188 0c41 8914 \"...!...@!..A.. │ │ │ +00002000: ac6c d3d4 212c 8722 205b 6275 6666 6572 .l..!,." [buffer │ │ │ +00002010: 2d72 6561 642d 6f6e 6c79 206d 656e 7520 -read-only menu │ │ │ +00002020: 6275 6666 2074 656d 206f 7468 6572 7320 buff tem others │ │ │ +00002030: 4275 6666 6572 2d6d 656e 752d 6275 6666 Buffer-menu-buff │ │ │ +00002040: 6572 2074 206e 696c 2073 6561 7263 682d er t nil search- │ │ │ +00002050: 666f 7277 6172 6420 225c 6e3e 2220 6465 forward "\n>" de │ │ │ +00002060: 6c65 7465 2d63 6861 7220 2d31 203f 5c20 lete-char -1 ?\ │ │ │ +00002070: 2066 7261 6d65 2d68 6569 6768 7420 6465 frame-height de │ │ │ +00002080: 6c65 7465 2d6f 7468 6572 2d77 696e 646f lete-other-windo │ │ │ +00002090: 7773 2073 7769 7463 682d 746f 2d62 7566 ws switch-to-buf │ │ │ +000020a0: 6665 7220 6275 7279 2d62 7566 6665 7220 fer bury-buffer │ │ │ +000020b0: 3020 7370 6c69 742d 7769 6e64 6f77 206f 0 split-window o │ │ │ +000020c0: 7468 6572 2d77 696e 646f 7720 315d 2035 ther-window 1] 5 │ │ │ +000020d0: 2028 2324 202e 2037 3830 3029 206e 696c (#$ . 7800) nil │ │ │ +000020e0: 5d29 0a23 4037 3520 5669 7369 7420 7468 ]).#@75 Visit th │ │ │ +000020f0: 6520 7461 6773 2074 6162 6c65 2069 6e20 e tags table in │ │ │ +00002100: 7468 6520 6275 6666 6572 206f 6e20 7468 the buffer on th │ │ │ +00002110: 6973 206c 696e 652e 2020 5365 6520 6076 is line. See `v │ │ │ +00002120: 6973 6974 2d74 6167 732d 7461 626c 6527 isit-tags-table' │ │ │ +00002130: 2e1f 0a28 6465 6661 6c69 6173 2027 4275 ...(defalias 'Bu │ │ │ +00002140: 6666 6572 2d6d 656e 752d 7669 7369 742d ffer-menu-visit- │ │ │ +00002150: 7461 6773 2d74 6162 6c65 2023 5b6e 696c tags-table #[nil │ │ │ +00002160: 2022 c1c2 c321 2189 18ab 85c4 0821 aa83 "...!!......!.. │ │ │ +00002170: c5c6 2129 8722 205b 6669 6c65 2062 7566 ..!)." [file buf │ │ │ +00002180: 6665 722d 6669 6c65 2d6e 616d 6520 4275 fer-file-name Bu │ │ │ +00002190: 6666 6572 2d6d 656e 752d 6275 6666 6572 ffer-menu-buffer │ │ │ +000021a0: 2074 2076 6973 6974 2d74 6167 732d 7461 t visit-tags-ta │ │ │ +000021b0: 626c 6520 6572 726f 7220 2253 7065 6369 ble error "Speci │ │ │ +000021c0: 6669 6564 2062 7566 6665 7220 6861 7320 fied buffer has │ │ │ +000021d0: 6e6f 2066 696c 6522 5d20 3420 2823 2420 no file"] 4 (#$ │ │ │ +000021e0: 2e20 3834 3234 2920 6e69 6c5d 290a 2340 . 8424) nil]).#@ │ │ │ +000021f0: 3530 2053 656c 6563 7420 7468 6973 206c 50 Select this l │ │ │ +00002200: 696e 6527 7320 6275 6666 6572 2c20 616c ine's buffer, al │ │ │ +00002210: 6f6e 652c 2069 6e20 6675 6c6c 2066 7261 one, in full fra │ │ │ +00002220: 6d65 2e1f 0a28 6465 6661 6c69 6173 2027 me...(defalias ' │ │ │ +00002230: 4275 6666 6572 2d6d 656e 752d 312d 7769 Buffer-menu-1-wi │ │ │ +00002240: 6e64 6f77 2023 5b6e 696c 2022 c0c1 c221 ndow #[nil "...! │ │ │ +00002250: 2188 c3c4 2021 88c5 2088 c6c7 2070 5c22 !... !.. ... p\" │ │ │ +00002260: 8722 205b 7377 6974 6368 2d74 6f2d 6275 ." [switch-to-bu │ │ │ +00002270: 6666 6572 2042 7566 6665 722d 6d65 6e75 ffer Buffer-menu │ │ │ +00002280: 2d62 7566 6665 7220 7420 6275 7279 2d62 -buffer t bury-b │ │ │ +00002290: 7566 6665 7220 6f74 6865 722d 6275 6666 uffer other-buff │ │ │ +000022a0: 6572 2064 656c 6574 652d 6f74 6865 722d er delete-other- │ │ │ +000022b0: 7769 6e64 6f77 7320 7365 742d 7769 6e64 windows set-wind │ │ │ +000022c0: 6f77 2d62 7566 6665 7220 7365 6c65 6374 ow-buffer select │ │ │ +000022d0: 6564 2d77 696e 646f 775d 2033 2028 2324 ed-window] 3 (#$ │ │ │ +000022e0: 202e 2038 3639 3129 206e 696c 5d29 0a23 . 8691) nil]).# │ │ │ +000022f0: 4034 3420 5365 6c65 6374 2074 6865 2062 @44 Select the b │ │ │ +00002300: 7566 6665 7220 7768 6f73 6520 6c69 6e65 uffer whose line │ │ │ +00002310: 2079 6f75 2063 6c69 636b 206f 6e2e 1f0a you click on... │ │ │ +00002320: 2864 6566 616c 6961 7320 2742 7566 6665 (defalias 'Buffe │ │ │ +00002330: 722d 6d65 6e75 2d6d 6f75 7365 2d73 656c r-menu-mouse-sel │ │ │ +00002340: 6563 7420 235b 2865 7665 6e74 2920 22c2 ect #[(event) ". │ │ │ +00002350: 198a c308 2171 888a c408 2162 88c5 c621 ....!q....!b...! │ │ │ +00002360: 112a c7c8 0821 2188 c9ca 2021 ab8c ca20 .*...!!... !... │ │ │ +00002370: cb20 61ab 85cc 0921 aa83 cd09 2129 8722 . a....!....!)." │ │ │ +00002380: 205b 6576 656e 7420 6275 6666 6572 206e [event buffer n │ │ │ +00002390: 696c 2065 7665 6e74 2d62 7566 6665 7220 il event-buffer │ │ │ +000023a0: 6576 656e 742d 706f 696e 7420 4275 6666 event-point Buff │ │ │ +000023b0: 6572 2d6d 656e 752d 6275 6666 6572 2074 er-menu-buffer t │ │ │ +000023c0: 2073 656c 6563 742d 7769 6e64 6f77 2065 select-window e │ │ │ +000023d0: 7665 6e74 2d77 696e 646f 7720 7769 6e64 vent-window wind │ │ │ +000023e0: 6f77 2d64 6564 6963 6174 6564 2d70 2073 ow-dedicated-p s │ │ │ +000023f0: 656c 6563 7465 642d 7769 6e64 6f77 2066 elected-window f │ │ │ +00002400: 7261 6d65 2d72 6f6f 742d 7769 6e64 6f77 rame-root-window │ │ │ +00002410: 2073 7769 7463 682d 746f 2d62 7566 6665 switch-to-buffe │ │ │ +00002420: 722d 6f74 6865 722d 6672 616d 6520 7377 r-other-frame sw │ │ │ +00002430: 6974 6368 2d74 6f2d 6275 6666 6572 5d20 itch-to-buffer] │ │ │ +00002440: 3320 2823 2420 2e20 3839 3438 2920 2265 3 (#$ . 8948) "e │ │ │ +00002450: 225d 290a 2864 6566 616c 6961 7320 2742 "]).(defalias 'B │ │ │ +00002460: 7566 6665 722d 6d65 6e75 2d6d 6179 6265 uffer-menu-maybe │ │ │ +00002470: 2d6d 6f75 7365 2d73 656c 6563 7420 235b -mouse-select #[ │ │ │ +00002480: 2865 7665 6e74 2026 6f70 7469 6f6e 616c (event &optional │ │ │ +00002490: 2063 6c69 636b 2d63 6f75 6e74 2920 220b click-count) ". │ │ │ +000024a0: c459 ad8c 7060 c520 1a19 18c6 c7c8 8f2b .Y..p`. .......+ │ │ │ +000024b0: 8722 205b 6275 6666 6572 2070 6f69 6e74 ." [buffer point │ │ │ +000024c0: 2063 6f6e 6669 6720 636c 6963 6b2d 636f config click-co │ │ │ +000024d0: 756e 7420 3220 6375 7272 656e 742d 7769 unt 2 current-wi │ │ │ +000024e0: 6e64 6f77 2d63 6f6e 6669 6775 7261 7469 ndow-configurati │ │ │ +000024f0: 6f6e 206e 696c 2028 6279 7465 2d63 6f64 on nil (byte-cod │ │ │ +00002500: 6520 22c1 0821 88c2 8722 205b 6576 656e e "..!..." [even │ │ │ +00002510: 7420 4275 6666 6572 2d6d 656e 752d 6d6f t Buffer-menu-mo │ │ │ +00002520: 7573 652d 7365 6c65 6374 2074 5d20 3229 use-select t] 2) │ │ │ +00002530: 2028 2865 7272 6f72 2028 6279 7465 2d63 ((error (byte-c │ │ │ +00002540: 6f64 6520 22c3 5c6e 2188 0971 8808 6288 ode ".\n!..q..b. │ │ │ +00002550: c487 2220 5b70 6f69 6e74 2062 7566 6665 .." [point buffe │ │ │ +00002560: 7220 636f 6e66 6967 2073 6574 2d77 696e r config set-win │ │ │ +00002570: 646f 772d 636f 6e66 6967 7572 6174 696f dow-configuratio │ │ │ +00002580: 6e20 6e69 6c5d 2032 2929 295d 2033 206e n nil] 2)))] 3 n │ │ │ +00002590: 696c 2022 6522 5d29 0a23 4034 3320 5365 il "e"]).#@43 Se │ │ │ +000025a0: 6c65 6374 2074 6869 7320 6c69 6e65 2773 lect this line's │ │ │ +000025b0: 2062 7566 6665 7220 696e 2074 6869 7320 buffer in this │ │ │ +000025c0: 7769 6e64 6f77 2e1f 0a28 6465 6661 6c69 window...(defali │ │ │ +000025d0: 6173 2027 4275 6666 6572 2d6d 656e 752d as 'Buffer-menu- │ │ │ +000025e0: 7468 6973 2d77 696e 646f 7720 235b 6e69 this-window #[ni │ │ │ +000025f0: 6c20 22c0 c1c2 2121 8722 205b 7377 6974 l "...!!." [swit │ │ │ +00002600: 6368 2d74 6f2d 6275 6666 6572 2042 7566 ch-to-buffer Buf │ │ │ +00002610: 6665 722d 6d65 6e75 2d62 7566 6665 7220 fer-menu-buffer │ │ │ +00002620: 745d 2033 2028 2324 202e 2039 3633 3029 t] 3 (#$ . 9630) │ │ │ +00002630: 206e 696c 5d29 0a23 4037 3320 5365 6c65 nil]).#@73 Sele │ │ │ +00002640: 6374 2074 6869 7320 6c69 6e65 2773 2062 ct this line's b │ │ │ +00002650: 7566 6665 7220 696e 206f 7468 6572 2077 uffer in other w │ │ │ +00002660: 696e 646f 772c 206c 6561 7669 6e67 2062 indow, leaving b │ │ │ +00002670: 7566 6665 7220 6d65 6e75 2076 6973 6962 uffer menu visib │ │ │ +00002680: 6c65 2e1f 0a28 6465 6661 6c69 6173 2027 le...(defalias ' │ │ │ +00002690: 4275 6666 6572 2d6d 656e 752d 6f74 6865 Buffer-menu-othe │ │ │ +000026a0: 722d 7769 6e64 6f77 2023 5b6e 696c 2022 r-window #[nil " │ │ │ +000026b0: c0c1 c221 2187 2220 5b73 7769 7463 682d ...!!." [switch- │ │ │ +000026c0: 746f 2d62 7566 6665 722d 6f74 6865 722d to-buffer-other- │ │ │ +000026d0: 7769 6e64 6f77 2042 7566 6665 722d 6d65 window Buffer-me │ │ │ +000026e0: 6e75 2d62 7566 6665 7220 745d 2033 2028 nu-buffer t] 3 ( │ │ │ +000026f0: 2324 202e 2039 3738 3829 206e 696c 5d29 #$ . 9788) nil]) │ │ │ +00002700: 0a23 4038 3720 4d61 6b65 2074 6865 206f .#@87 Make the o │ │ │ +00002710: 7468 6572 2077 696e 646f 7720 7365 6c65 ther window sele │ │ │ +00002720: 6374 2074 6869 7320 6c69 6e65 2773 2062 ct this line's b │ │ │ +00002730: 7566 6665 722e 0a54 6865 2063 7572 7265 uffer..The curre │ │ │ +00002740: 6e74 2077 696e 646f 7720 7265 6d61 696e nt window remain │ │ │ +00002750: 7320 7365 6c65 6374 6564 2e1f 0a28 6465 s selected...(de │ │ │ +00002760: 6661 6c69 6173 2027 4275 6666 6572 2d6d falias 'Buffer-m │ │ │ +00002770: 656e 752d 7377 6974 6368 2d6f 7468 6572 enu-switch-other │ │ │ +00002780: 2d77 696e 646f 7720 235b 6e69 6c20 22c0 -window #[nil ". │ │ │ +00002790: c1c2 2121 8722 205b 6469 7370 6c61 792d ..!!." [display- │ │ │ +000027a0: 6275 6666 6572 2042 7566 6665 722d 6d65 buffer Buffer-me │ │ │ +000027b0: 6e75 2d62 7566 6665 7220 745d 2033 2028 nu-buffer t] 3 ( │ │ │ +000027c0: 2324 202e 2039 3939 3029 206e 696c 5d29 #$ . 9990) nil]) │ │ │ +000027d0: 0a23 4036 3720 5365 6c65 6374 2074 6869 .#@67 Select thi │ │ │ +000027e0: 7320 6c69 6e65 2773 2062 7566 6665 722c s line's buffer, │ │ │ +000027f0: 2077 6974 6820 7072 6576 696f 7573 2062 with previous b │ │ │ +00002800: 7566 6665 7220 696e 2073 6563 6f6e 6420 uffer in second │ │ │ +00002810: 7769 6e64 6f77 2e1f 0a28 6465 6661 6c69 window...(defali │ │ │ +00002820: 6173 2027 4275 6666 6572 2d6d 656e 752d as 'Buffer-menu- │ │ │ +00002830: 322d 7769 6e64 6f77 2023 5b6e 696c 2022 2-window #[nil " │ │ │ +00002840: c3c4 2170 c418 1a19 c520 88c6 c720 2188 ..!p..... ... !. │ │ │ +00002850: c809 2188 c95c 6e21 2b87 2220 5b70 6f70 ..!..\n!+." [pop │ │ │ +00002860: 2d75 702d 7769 6e64 6f77 7320 6275 6666 -up-windows buff │ │ │ +00002870: 206d 656e 7520 4275 6666 6572 2d6d 656e menu Buffer-men │ │ │ +00002880: 752d 6275 6666 6572 2074 2064 656c 6574 u-buffer t delet │ │ │ +00002890: 652d 6f74 6865 722d 7769 6e64 6f77 7320 e-other-windows │ │ │ +000028a0: 7377 6974 6368 2d74 6f2d 6275 6666 6572 switch-to-buffer │ │ │ +000028b0: 206f 7468 6572 2d62 7566 6665 7220 706f other-buffer po │ │ │ +000028c0: 702d 746f 2d62 7566 6665 7220 6275 7279 p-to-buffer bury │ │ │ +000028d0: 2d62 7566 6665 725d 2033 2028 2324 202e -buffer] 3 (#$ . │ │ │ +000028e0: 2031 3031 3938 2920 6e69 6c5d 290a 2340 10198) nil]).#@ │ │ │ +000028f0: 3738 2054 6f67 676c 6520 7265 6164 2d6f 78 Toggle read-o │ │ │ +00002900: 6e6c 7920 7374 6174 7573 206f 6620 6275 nly status of bu │ │ │ +00002910: 6666 6572 206f 6e20 7468 6973 206c 696e ffer on this lin │ │ │ +00002920: 652c 2070 6572 6861 7073 2076 6961 2076 e, perhaps via v │ │ │ +00002930: 6572 7369 6f6e 2063 6f6e 7472 6f6c 2e1f ersion control.. │ │ │ +00002940: 0a28 6465 6661 6c69 6173 2027 4275 6666 .(defalias 'Buff │ │ │ +00002950: 6572 2d6d 656e 752d 746f 6767 6c65 2d72 er-menu-toggle-r │ │ │ +00002960: 6561 642d 6f6e 6c79 2023 5b6e 696c 2022 ead-only #[nil " │ │ │ +00002970: c219 8ac3 c421 7188 c520 8808 ab83 c6aa .....!q.. ...... │ │ │ +00002980: 81c7 1129 8ac8 7988 c975 8867 0955 3fad ...)..y..u.g.U?. │ │ │ +00002990: 89c2 18ca cb21 8809 6329 2a87 2220 5b62 .....!..c)*." [b │ │ │ +000029a0: 7566 6665 722d 7265 6164 2d6f 6e6c 7920 uffer-read-only │ │ │ +000029b0: 6368 6172 206e 696c 2042 7566 6665 722d char nil Buffer- │ │ │ +000029c0: 6d65 6e75 2d62 7566 6665 7220 7420 6d6f menu-buffer t mo │ │ │ +000029d0: 6465 6c69 6e65 2d74 6f67 676c 652d 7265 deline-toggle-re │ │ │ +000029e0: 6164 2d6f 6e6c 7920 3f25 203f 5c20 2030 ad-only ?% ?\ 0 │ │ │ +000029f0: 2032 2064 656c 6574 652d 6368 6172 2031 2 delete-char 1 │ │ │ +00002a00: 5d20 3220 2823 2420 2e20 3130 3438 3329 ] 2 (#$ . 10483) │ │ │ +00002a10: 206e 696c 5d29 0a28 6279 7465 2d63 6f64 nil]).(byte-cod │ │ │ +00002a20: 6520 22c1 0842 10c2 c121 ac85 c3c1 c45c e "..B...!.....\ │ │ │ +00002a30: 2288 c187 2220 5b63 7572 7265 6e74 2d6c "..." [current-l │ │ │ +00002a40: 6f61 642d 6c69 7374 2042 7566 6665 722d oad-list Buffer- │ │ │ +00002a50: 6d65 6e75 2d70 6f70 7570 2d6d 656e 7520 menu-popup-menu │ │ │ +00002a60: 6465 6661 756c 742d 626f 756e 6470 2073 default-boundp s │ │ │ +00002a70: 6574 2d64 6566 6175 6c74 2028 2242 7566 et-default ("Buf │ │ │ +00002a80: 6665 7220 436f 6d6d 616e 6473 2220 5b22 fer Commands" [" │ │ │ +00002a90: 5365 6c65 6374 2042 7566 6665 7222 2042 Select Buffer" B │ │ │ +00002aa0: 7566 6665 722d 6d65 6e75 2d73 656c 6563 uffer-menu-selec │ │ │ +00002ab0: 7420 745d 205b 2253 656c 6563 7420 6275 t t] ["Select bu │ │ │ +00002ac0: 6666 6572 204f 7468 6572 2057 696e 646f ffer Other Windo │ │ │ +00002ad0: 7722 2042 7566 6665 722d 6d65 6e75 2d6f w" Buffer-menu-o │ │ │ +00002ae0: 7468 6572 2d77 696e 646f 7720 745d 205b ther-window t] [ │ │ │ +00002af0: 2243 6c65 6172 2042 7566 6665 7220 4d6f "Clear Buffer Mo │ │ │ +00002b00: 6469 6669 6361 7469 6f6e 2046 6c61 6722 dification Flag" │ │ │ +00002b10: 2042 7566 6665 722d 6d65 6e75 2d6e 6f74 Buffer-menu-not │ │ │ +00002b20: 2d6d 6f64 6966 6965 6420 745d 2022 2d2d -modified t] "-- │ │ │ +00002b30: 2d2d 2220 5b22 4d61 726b 2042 7566 6665 --" ["Mark Buffe │ │ │ +00002b40: 7220 666f 7220 5365 6c65 6374 696f 6e22 r for Selection" │ │ │ +00002b50: 2042 7566 6665 722d 6d65 6e75 2d6d 6172 Buffer-menu-mar │ │ │ +00002b60: 6b20 745d 205b 224d 6172 6b20 4275 6666 k t] ["Mark Buff │ │ │ +00002b70: 6572 2066 6f72 2053 6176 6522 2042 7566 er for Save" Buf │ │ │ +00002b80: 6665 722d 6d65 6e75 2d73 6176 6520 745d fer-menu-save t] │ │ │ +00002b90: 205b 224d 6172 6b20 4275 6666 6572 2066 ["Mark Buffer f │ │ │ +00002ba0: 6f72 2044 656c 6574 696f 6e22 2042 7566 or Deletion" Buf │ │ │ +00002bb0: 6665 722d 6d65 6e75 2d64 656c 6574 6520 fer-menu-delete │ │ │ +00002bc0: 745d 205b 2255 6e6d 6172 6b20 4275 6666 t] ["Unmark Buff │ │ │ +00002bd0: 6572 2220 4275 6666 6572 2d6d 656e 752d er" Buffer-menu- │ │ │ +00002be0: 756e 6d61 726b 2074 5d20 222d 2d2d 2d22 unmark t] "----" │ │ │ +00002bf0: 205b 2244 656c 6574 652f 5361 7665 204d ["Delete/Save M │ │ │ +00002c00: 6172 6b65 6420 4275 6666 6572 7322 2042 arked Buffers" B │ │ │ +00002c10: 7566 6665 722d 6d65 6e75 2d65 7865 6375 uffer-menu-execu │ │ │ +00002c20: 7465 2074 5d29 5d20 3329 0a28 6465 6661 te t])] 3).(defa │ │ │ +00002c30: 6c69 6173 2027 4275 6666 6572 2d6d 656e lias 'Buffer-men │ │ │ +00002c40: 752d 706f 7075 702d 6d65 6e75 2023 5b28 u-popup-menu #[( │ │ │ +00002c50: 6576 656e 7429 2022 c308 2188 c479 88c5 event) "..!..y.. │ │ │ +00002c60: c621 891a ab91 c709 40c8 c95c 6e21 ca51 .!......@..\n!.Q │ │ │ +00002c70: cb45 0941 a421 aa83 cccd 2129 8722 205b .E.A.!....!)." [ │ │ │ +00002c80: 6576 656e 7420 4275 6666 6572 2d6d 656e event Buffer-men │ │ │ +00002c90: 752d 706f 7075 702d 6d65 6e75 2062 7566 u-popup-menu buf │ │ │ +00002ca0: 6665 7220 6d6f 7573 652d 7365 742d 706f fer mouse-set-po │ │ │ +00002cb0: 696e 7420 3020 4275 6666 6572 2d6d 656e int 0 Buffer-men │ │ │ +00002cc0: 752d 6275 6666 6572 206e 696c 2070 6f70 u-buffer nil pop │ │ │ +00002cd0: 7570 2d6d 656e 7520 2243 6f6d 6d61 6e64 up-menu "Command │ │ │ +00002ce0: 7320 6f6e 2062 7566 6665 7220 5c22 2220 s on buffer \"" │ │ │ +00002cf0: 6275 6666 6572 2d6e 616d 6520 225c 223a buffer-name "\": │ │ │ +00002d00: 2220 222d 2d2d 2d22 2065 7272 6f72 2022 " "----" error " │ │ │ +00002d10: 6e6f 2062 7566 6665 7220 6f6e 2074 6869 no buffer on thi │ │ │ +00002d20: 7320 6c69 6e65 225d 2036 206e 696c 2022 s line"] 6 nil " │ │ │ +00002d30: 6522 5d29 0a28 6279 7465 2d63 6f64 6520 e"]).(byte-code │ │ │ +00002d40: 22c1 0842 10c2 c121 ac85 c3c1 c45c 2288 "..B...!.....\". │ │ │ +00002d50: c187 2220 5b63 7572 7265 6e74 2d6c 6f61 .." [current-loa │ │ │ +00002d60: 642d 6c69 7374 206c 6973 742d 6275 6666 d-list list-buff │ │ │ +00002d70: 6572 732d 6865 6164 6572 2d6c 696e 6520 ers-header-line │ │ │ +00002d80: 6465 6661 756c 742d 626f 756e 6470 2073 default-boundp s │ │ │ +00002d90: 6574 2d64 6566 6175 6c74 2022 204d 5220 et-default " MR │ │ │ +00002da0: 4275 6666 6572 2020 2020 2020 2020 2020 Buffer │ │ │ +00002db0: 2053 697a 6520 204d 6f64 6520 2020 2020 Size Mode │ │ │ +00002dc0: 2020 2020 4669 6c65 5c6e 202d 2d20 2d2d File\n -- -- │ │ │ +00002dd0: 2d2d 2d2d 2020 2020 2020 2020 2020 202d ---- - │ │ │ +00002de0: 2d2d 2d20 202d 2d2d 2d20 2020 2020 2020 --- ---- │ │ │ +00002df0: 2020 2d2d 2d2d 5c6e 225d 2033 290a 2340 ----\n"] 3).#@ │ │ │ +00002e00: 3133 3420 5374 7269 6e67 2075 7365 6420 134 String used │ │ │ +00002e10: 746f 2069 6465 6e74 6966 7920 7468 6973 to identify this │ │ │ +00002e20: 2062 7566 6665 722c 206f 7220 6120 6675 buffer, or a fu │ │ │ +00002e30: 6e63 7469 6f6e 206f 6620 6f6e 6520 6172 nction of one ar │ │ │ +00002e40: 6775 6d65 6e74 0a74 6f20 6765 6e65 7261 gument.to genera │ │ │ +00002e50: 7465 2073 7563 6820 6120 7374 7269 6e67 te such a string │ │ │ +00002e60: 2e20 2054 6869 7320 7661 7269 6162 6c65 . This variable │ │ │ +00002e70: 2069 7320 616c 7761 7973 2062 7566 6665 is always buffe │ │ │ +00002e80: 722d 6c6f 6361 6c2e 1f0a 2864 6566 7661 r-local...(defva │ │ │ +00002e90: 7220 6c69 7374 2d62 7566 6665 7273 2d69 r list-buffers-i │ │ │ +00002ea0: 6465 6e74 6966 6963 6174 696f 6e20 2764 dentification 'd │ │ │ +00002eb0: 6566 6175 6c74 2d6c 6973 742d 6275 6666 efault-list-buff │ │ │ +00002ec0: 6572 732d 6964 656e 7469 6669 6361 7469 ers-identificati │ │ │ +00002ed0: 6f6e 2028 2324 202e 2031 3137 3830 2929 on (#$ . 11780)) │ │ │ +00002ee0: 0a28 6279 7465 2d63 6f64 6520 22c1 c221 .(byte-code "..! │ │ │ +00002ef0: 88c3 0842 10c4 c321 ac85 c5c3 c65c 2288 ...B...!.....\". │ │ │ +00002f00: c1c3 2187 2220 5b63 7572 7265 6e74 2d6c ..!." [current-l │ │ │ +00002f10: 6f61 642d 6c69 7374 206d 616b 652d 7661 oad-list make-va │ │ │ +00002f20: 7269 6162 6c65 2d62 7566 6665 722d 6c6f riable-buffer-lo │ │ │ +00002f30: 6361 6c20 6c69 7374 2d62 7566 6665 7273 cal list-buffers │ │ │ +00002f40: 2d69 6465 6e74 6966 6963 6174 696f 6e20 -identification │ │ │ +00002f50: 6c69 7374 2d62 7566 6665 7273 2d64 6972 list-buffers-dir │ │ │ +00002f60: 6563 746f 7279 2064 6566 6175 6c74 2d62 ectory default-b │ │ │ +00002f70: 6f75 6e64 7020 7365 742d 6465 6661 756c oundp set-defaul │ │ │ +00002f80: 7420 6e69 6c5d 2033 290a 2864 6566 616c t nil] 3).(defal │ │ │ +00002f90: 6961 7320 2764 6566 6175 6c74 2d6c 6973 ias 'default-lis │ │ │ +00002fa0: 742d 6275 6666 6572 732d 6964 656e 7469 t-buffers-identi │ │ │ +00002fb0: 6669 6361 7469 6f6e 2023 5b28 6f75 7470 fication #[(outp │ │ │ +00002fc0: 7574 2920 228a c670 21ae 87c7 c821 ad82 ut) "..p!....!.. │ │ │ +00002fd0: 0e08 c920 0e1a ca89 8989 1b1d 1a1c 181e ... ............ │ │ │ +00002fe0: 1819 0e19 7188 ca7f 8860 14cb 0e18 0e19 ....q....`...... │ │ │ +00002ff0: 5c22 8860 12cc cdce 5c22 8860 130c 0b56 \".`....\".`...V │ │ │ +00003000: ab83 0c62 88cf 5c6e 0b5a 5a89 15d0 56ab ...b..\n.ZZ...V. │ │ │ +00003010: 89d1 6388 0d53 8915 aa73 ca7f 88d2 d3d4 ..c..S...s...... │ │ │ +00003020: 5c22 8808 6388 09ad 98d0 d569 5a89 1556 \"..c......iZ..V │ │ │ +00003030: ab88 d60d 0c60 5a5d 2188 d2d7 d45c 2288 .....`Z]!....\". │ │ │ +00003040: 0963 2e08 8722 205b 6d6f 6465 2066 696c .c..." [mode fil │ │ │ +00003050: 6520 7020 636f 6c20 656f 6220 7320 6275 e p col eob s bu │ │ │ +00003060: 6666 6572 2d66 696c 652d 6e61 6d65 2062 ffer-file-name b │ │ │ +00003070: 6f75 6e64 7020 6c69 7374 2d62 7566 6665 oundp list-buffe │ │ │ +00003080: 7273 2d64 6972 6563 746f 7279 2062 7566 rs-directory buf │ │ │ +00003090: 6665 722d 7369 7a65 206e 696c 2070 7269 fer-size nil pri │ │ │ +000030a0: 6e31 206d 6f76 652d 746f 2d63 6f6c 756d n1 move-to-colum │ │ │ +000030b0: 6e20 3139 2074 2036 2030 203f 5c20 2069 n 19 t 6 0 ?\ i │ │ │ +000030c0: 6e64 656e 742d 746f 2032 3720 3120 3339 ndent-to 27 1 39 │ │ │ +000030d0: 2064 656c 6574 652d 6368 6172 2034 3020 delete-char 40 │ │ │ +000030e0: 7369 7a65 206f 7574 7075 7420 6d6f 6465 size output mode │ │ │ +000030f0: 2d6e 616d 655d 2038 5d29 0a28 6465 6661 -name] 8]).(defa │ │ │ +00003100: 6c69 6173 2027 6c69 7374 2d62 7566 6665 lias 'list-buffe │ │ │ +00003110: 7273 2d69 6e74 6572 6e61 6c20 235b 286f rs-internal #[(o │ │ │ +00003120: 7574 7075 7420 266f 7074 696f 6e61 6c20 utput &optional │ │ │ +00003130: 7072 6564 6963 6174 6529 2022 70c6 201b predicate) "p. . │ │ │ +00003140: 1a8a 0971 88c7 1621 c820 88c9 0921 880e ...q...!. ...!.. │ │ │ +00003150: 2463 880b 83c5 00ca 1e5c 220b 401d cb0d $c.......\".@... │ │ │ +00003160: 211c c718 0b41 130c 83c1 000e 1fab 920e !....A.......... │ │ │ +00003170: 1f3b ab87 cc0e 1f0c 5c22 aa84 0e1f 0d21 .;......\".....! │ │ │ +00003180: abfd 0d71 880e 210e 251e 201e 2309 7188 ...q..!.%. .#.q. │ │ │ +00003190: 6010 0d5c 6e61 ab85 6012 cdaa 81ce 6388 `..\na..`.....c. │ │ │ +000031a0: cf0d 21ab 83d0 aa81 ce63 880e 23ab 83d1 ..!......c..#... │ │ │ +000031b0: aa81 ce63 88cc d20c 5c22 ab8b d31e 26d4 ...c....\"....&. │ │ │ +000031c0: 0c09 5c22 8829 aa85 ce0c b102 88d5 0e5c ..\".).........\ │ │ │ +000031d0: 22d6 5c22 880e 203b ab86 0e20 6388 aa92 ".\".. ;... c... │ │ │ +000031e0: 0e20 ab8e 0d71 88d7 d8d9 8f88 0971 8864 . ...q.......q.d │ │ │ +000031f0: 6288 2ada 0860 cb0c 2488 da08 60db d324 b.*..`..$...`..$ │ │ │ +00003200: 88dc 6388 2c82 1700 dd20 88de 5c6e 213f ..c.,.... ..\n!? │ │ │ +00003210: ad82 5c6e 622b 8722 205b 7468 6973 2d62 ..\nb+." [this-b │ │ │ +00003220: 7566 6665 722d 6c69 6e65 2d73 7461 7274 uffer-line-start │ │ │ +00003230: 206f 7574 7075 7420 6375 7272 656e 7420 output current │ │ │ +00003240: 6275 6666 6572 7320 6e61 6d65 2062 7566 buffers name buf │ │ │ +00003250: 6665 7220 6275 6666 6572 2d6c 6973 7420 fer buffer-list │ │ │ +00003260: 6e69 6c20 6572 6173 652d 6275 6666 6572 nil erase-buffer │ │ │ +00003270: 2062 7566 6665 722d 6469 7361 626c 652d buffer-disable- │ │ │ +00003280: 756e 646f 2031 3920 6275 6666 6572 2d6e undo 19 buffer-n │ │ │ +00003290: 616d 6520 7374 7269 6e67 2d6d 6174 6368 ame string-match │ │ │ +000032a0: 203f 5c2e 203f 5c20 2062 7566 6665 722d ?\. ?\ buffer- │ │ │ +000032b0: 6d6f 6469 6669 6564 2d70 203f 2a20 3f25 modified-p ?* ?% │ │ │ +000032c0: 2022 5b5c 6e5c 225c 5c20 095d 2220 7420 "[\n\"\\ .]" t │ │ │ +000032d0: 7072 696e 3120 696e 6465 6e74 2d74 6f20 prin1 indent-to │ │ │ +000032e0: 3120 6520 2866 756e 6361 6c6c 2069 6420 1 e (funcall id │ │ │ +000032f0: 6f75 7470 7574 2920 2828 6572 726f 7220 output) ((error │ │ │ +00003300: 2862 7974 652d 636f 6465 2022 c2c3 095c (byte-code "...\ │ │ │ +00003310: 2288 c408 095c 2287 2220 5b65 206f 7574 "....\"." [e out │ │ │ +00003320: 7075 7420 7072 696e 6320 222a 2a2a 2220 put princ "***" │ │ │ +00003330: 7072 696e 315d 2033 2929 2920 7075 742d prin1] 3))) put- │ │ │ +00003340: 6e6f 6e64 7570 6c69 6361 626c 652d 7465 nonduplicable-te │ │ │ +00003350: 7874 2d70 726f 7065 7274 7920 6869 6768 xt-property high │ │ │ +00003360: 6c69 6768 7420 3f5c 6e20 4275 6666 6572 light ?\n Buffer │ │ │ +00003370: 2d6d 656e 752d 6d6f 6465 2062 7566 6665 -menu-mode buffe │ │ │ +00003380: 7270 2070 7265 6469 6361 7465 2069 6420 rp predicate id │ │ │ +00003390: 6275 6666 6572 2d72 6561 642d 6f6e 6c79 buffer-read-only │ │ │ +000033a0: 2063 6f6c 3120 726f 206c 6973 742d 6275 col1 ro list-bu │ │ │ +000033b0: 6666 6572 732d 6865 6164 6572 2d6c 696e ffers-header-lin │ │ │ +000033c0: 6520 6c69 7374 2d62 7566 6665 7273 2d69 e list-buffers-i │ │ │ +000033d0: 6465 6e74 6966 6963 6174 696f 6e20 7072 dentification pr │ │ │ +000033e0: 696e 742d 6573 6361 7065 2d6e 6577 6c69 int-escape-newli │ │ │ +000033f0: 6e65 735d 2035 5d29 0a23 4033 3437 2044 nes] 5]).#@347 D │ │ │ +00003400: 6973 706c 6179 2061 206c 6973 7420 6f66 isplay a list of │ │ │ +00003410: 206e 616d 6573 206f 6620 6578 6973 7469 names of existi │ │ │ +00003420: 6e67 2062 7566 6665 7273 2e0a 5468 6520 ng buffers..The │ │ │ +00003430: 6c69 7374 2069 7320 6469 7370 6c61 7965 list is displaye │ │ │ +00003440: 6420 696e 2061 2062 7566 6665 7220 6e61 d in a buffer na │ │ │ +00003450: 6d65 6420 602a 4275 6666 6572 204c 6973 med `*Buffer Lis │ │ │ +00003460: 742a 272e 0a4e 6f74 6520 7468 6174 2062 t*'..Note that b │ │ │ +00003470: 7566 6665 7273 2077 6974 6820 6e61 6d65 uffers with name │ │ │ +00003480: 7320 7374 6172 7469 6e67 2077 6974 6820 s starting with │ │ │ +00003490: 7370 6163 6573 2061 7265 206f 6d69 7474 spaces are omitt │ │ │ +000034a0: 6564 2e0a 4e6f 6e2d 6e69 6c20 6f70 7469 ed..Non-nil opti │ │ │ +000034b0: 6f6e 616c 2061 7267 2046 494c 4553 2d4f onal arg FILES-O │ │ │ +000034c0: 4e4c 5920 6d65 616e 7320 6d65 6e74 696f NLY means mentio │ │ │ +000034d0: 6e20 6f6e 6c79 2066 696c 6520 6275 6666 n only file buff │ │ │ +000034e0: 6572 732e 0a0a 5468 6520 4d20 636f 6c75 ers...The M colu │ │ │ +000034f0: 6d6e 2063 6f6e 7461 696e 7320 6120 2a20 mn contains a * │ │ │ +00003500: 666f 7220 6275 6666 6572 7320 7468 6174 for buffers that │ │ │ +00003510: 2061 7265 206d 6f64 6966 6965 642e 0a54 are modified..T │ │ │ +00003520: 6865 2052 2063 6f6c 756d 6e20 636f 6e74 he R column cont │ │ │ +00003530: 6169 6e73 2061 2025 2066 6f72 2062 7566 ains a % for buf │ │ │ +00003540: 6665 7273 2074 6861 7420 6172 6520 7265 fers that are re │ │ │ +00003550: 6164 2d6f 6e6c 792e 1f0a 2864 6566 616c ad-only...(defal │ │ │ +00003560: 6961 7320 276c 6973 742d 6275 6666 6572 ias 'list-buffer │ │ │ +00003570: 7320 235b 2826 6f70 7469 6f6e 616c 2066 s #[(&optional f │ │ │ +00003580: 696c 6573 2d6f 6e6c 7929 2022 c1c2 0821 iles-only) "...! │ │ │ +00003590: 2187 2220 5b66 696c 6573 2d6f 6e6c 7920 !." [files-only │ │ │ +000035a0: 6469 7370 6c61 792d 6275 6666 6572 206c display-buffer l │ │ │ +000035b0: 6973 742d 6275 6666 6572 732d 6e6f 7365 ist-buffers-nose │ │ │ +000035c0: 6c65 6374 5d20 3320 2823 2420 2e20 3133 lect] 3 (#$ . 13 │ │ │ +000035d0: 3331 3129 2028 6c69 7374 2028 6966 2063 311) (list (if c │ │ │ +000035e0: 7572 7265 6e74 2d70 7265 6669 782d 6172 urrent-prefix-ar │ │ │ +000035f0: 6720 7420 6e69 6c29 295d 290a 2340 3335 g t nil))]).#@35 │ │ │ +00003600: 3120 4372 6561 7465 2061 6e64 2072 6574 1 Create and ret │ │ │ +00003610: 7572 6e20 6120 6275 6666 6572 2077 6974 urn a buffer wit │ │ │ +00003620: 6820 6120 6c69 7374 206f 6620 6e61 6d65 h a list of name │ │ │ +00003630: 7320 6f66 2065 7869 7374 696e 6720 6275 s of existing bu │ │ │ +00003640: 6666 6572 732e 0a54 6865 2062 7566 6665 ffers..The buffe │ │ │ +00003650: 7220 6973 206e 616d 6564 2060 2a42 7566 r is named `*Buf │ │ │ +00003660: 6665 7220 4c69 7374 2a27 2e0a 4e6f 7465 fer List*'..Note │ │ │ +00003670: 2074 6861 7420 6275 6666 6572 7320 7769 that buffers wi │ │ │ +00003680: 7468 206e 616d 6573 2073 7461 7274 696e th names startin │ │ │ +00003690: 6720 7769 7468 2073 7061 6365 7320 6172 g with spaces ar │ │ │ +000036a0: 6520 6f6d 6974 7465 642e 0a4e 6f6e 2d6e e omitted..Non-n │ │ │ +000036b0: 696c 206f 7074 696f 6e61 6c20 6172 6720 il optional arg │ │ │ +000036c0: 4649 4c45 532d 4f4e 4c59 206d 6561 6e73 FILES-ONLY means │ │ │ +000036d0: 206d 656e 7469 6f6e 206f 6e6c 7920 6669 mention only fi │ │ │ +000036e0: 6c65 2062 7566 6665 7273 2e0a 0a54 6865 le buffers...The │ │ │ +000036f0: 204d 2063 6f6c 756d 6e20 636f 6e74 6169 M column contai │ │ │ +00003700: 6e73 2061 202a 2066 6f72 2062 7566 6665 ns a * for buffe │ │ │ +00003710: 7273 2074 6861 7420 6172 6520 6d6f 6469 rs that are modi │ │ │ +00003720: 6669 6564 2e0a 5468 6520 5220 636f 6c75 fied..The R colu │ │ │ +00003730: 6d6e 2063 6f6e 7461 696e 7320 6120 2520 mn contains a % │ │ │ +00003740: 666f 7220 6275 6666 6572 7320 7468 6174 for buffers that │ │ │ +00003750: 2061 7265 2072 6561 642d 6f6e 6c79 2e1f are read-only.. │ │ │ +00003760: 0a28 6465 6661 6c69 6173 2027 6c69 7374 .(defalias 'list │ │ │ +00003770: 2d62 7566 6665 7273 2d6e 6f73 656c 6563 -buffers-noselec │ │ │ +00003780: 7420 235b 2826 6f70 7469 6f6e 616c 2066 t #[(&optional f │ │ │ +00003790: 696c 6573 2d6f 6e6c 7929 2022 c2c3 2119 iles-only) "..!. │ │ │ +000037a0: c409 08c5 73ab 83c6 aa81 085c 2288 0929 ....s......\"..) │ │ │ +000037b0: 8722 205b 6669 6c65 732d 6f6e 6c79 2062 ." [files-only b │ │ │ +000037c0: 7566 6665 7220 6765 742d 6275 6666 6572 uffer get-buffer │ │ │ +000037d0: 2d63 7265 6174 6520 222a 4275 6666 6572 -create "*Buffer │ │ │ +000037e0: 204c 6973 742a 2220 6c69 7374 2d62 7566 List*" list-buf │ │ │ +000037f0: 6665 7273 2d69 6e74 6572 6e61 6c20 2874 fers-internal (t │ │ │ +00003800: 206e 696c 2920 235b 2862 2920 22c3 0921 nil) #[(b) "..! │ │ │ +00003810: 1ac4 5c6e 4755 3fad 855c 6ec4 48c5 553f ..\nGU?..\n.H.U? │ │ │ +00003820: ad89 08ab 85c6 0921 aa81 c729 8722 205b .......!...)." [ │ │ │ +00003830: 6669 6c65 732d 6f6e 6c79 2062 206e 2062 files-only b n b │ │ │ +00003840: 7566 6665 722d 6e61 6d65 2030 203f 5c20 uffer-name 0 ?\ │ │ │ +00003850: 2062 7566 6665 722d 6669 6c65 2d6e 616d buffer-file-nam │ │ │ +00003860: 6520 745d 2032 5d5d 2034 2028 2324 202e e t] 2]] 4 (#$ . │ │ │ +00003870: 2031 3338 3236 295d 290a 2340 3132 3620 13826)]).#@126 │ │ │ +00003880: 466f 7220 7573 6520 6173 2061 2076 616c For use as a val │ │ │ +00003890: 7565 206f 6620 6062 7566 6665 7273 2d6d ue of `buffers-m │ │ │ +000038a0: 656e 752d 6f6d 6974 2d66 756e 6374 696f enu-omit-functio │ │ │ +000038b0: 6e27 2e0a 4f6d 6974 7320 6e6f 726d 616c n'..Omits normal │ │ │ +000038c0: 6c79 2069 6e76 6973 6962 6c65 2062 7566 ly invisible buf │ │ │ +000038d0: 6665 7273 2028 7468 6f73 6520 7768 6f73 fers (those whos │ │ │ +000038e0: 6520 6e61 6d65 2062 6567 696e 7320 7769 e name begins wi │ │ │ +000038f0: 7468 2061 2073 7061 6365 292e 1f0a 2864 th a space)...(d │ │ │ +00003900: 6566 616c 6961 7320 2762 7566 6665 7273 efalias 'buffers │ │ │ +00003910: 2d6d 656e 752d 6f6d 6974 2d69 6e76 6973 -menu-omit-invis │ │ │ +00003920: 6962 6c65 2d62 7566 6665 7273 2023 5b28 ible-buffers #[( │ │ │ +00003930: 6275 6629 2022 c1c2 c308 215c 223f 3f87 buf) "....!\"??. │ │ │ +00003940: 2220 5b62 7566 2073 7472 696e 672d 6d61 " [buf string-ma │ │ │ +00003950: 7463 6820 225c 5c60 2022 2062 7566 6665 tch "\\` " buffe │ │ │ +00003960: 722d 6e61 6d65 5d20 3420 2823 2420 2e20 r-name] 4 (#$ . │ │ │ +00003970: 3134 3436 3429 5d29 0a28 7072 6f76 6964 14464)]).(provid │ │ │ +00003980: 6520 2762 7566 662d 6d65 6e75 290a e 'buff-menu). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/buffer.elc │ │ │ @@ -1,167 +1,167 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3532 2032 eb 25 01:53:52 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f62 1-21.4.24/lisp/b │ │ │ -00000090: 7566 6665 722e 656c 0a3b 3b3b 2065 6d61 uffer.el.;;; ema │ │ │ -000000a0: 6373 2076 6572 7369 6f6e 2032 312e 3420 cs version 21.4 │ │ │ -000000b0: 2870 6174 6368 2032 3429 2022 5374 616e (patch 24) "Stan │ │ │ -000000c0: 6461 7264 2043 2220 5845 6d61 6373 204c dard C" XEmacs L │ │ │ -000000d0: 7563 6964 2e0a 3b3b 3b20 6279 7465 636f ucid..;;; byteco │ │ │ -000000e0: 6d70 2076 6572 7369 6f6e 2032 2e32 3720 mp version 2.27 │ │ │ -000000f0: 5845 6d61 6373 3b20 3230 3030 2d30 392d XEmacs; 2000-09- │ │ │ -00000100: 3132 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 12..;;; optimiza │ │ │ -00000110: 7469 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 tion is on..;;; │ │ │ -00000120: 7468 6973 2066 696c 6520 7573 6573 206f this file uses o │ │ │ -00000130: 7063 6f64 6573 2077 6869 6368 2064 6f20 pcodes which do │ │ │ -00000140: 6e6f 7420 6578 6973 7420 696e 2045 6d61 not exist in Ema │ │ │ -00000150: 6373 2031 392e 0a0a 2869 6620 2861 6e64 cs 19...(if (and │ │ │ -00000160: 2028 626f 756e 6470 2027 656d 6163 732d (boundp 'emacs- │ │ │ -00000170: 7665 7273 696f 6e29 0a09 2028 6f72 2028 version).. (or ( │ │ │ -00000180: 616e 6420 2862 6f75 6e64 7020 2765 706f and (boundp 'epo │ │ │ -00000190: 6368 3a3a 7665 7273 696f 6e29 2065 706f ch::version) epo │ │ │ -000001a0: 6368 3a3a 7665 7273 696f 6e29 0a09 2020 ch::version).. │ │ │ -000001b0: 2020 2028 7374 7269 6e67 2d6c 6573 7370 (string-lessp │ │ │ -000001c0: 2065 6d61 6373 2d76 6572 7369 6f6e 2022 emacs-version " │ │ │ -000001d0: 3230 2229 2929 0a20 2020 2028 6572 726f 20"))). (erro │ │ │ -000001e0: 7220 2260 6275 6666 6572 2e65 6c27 2077 r "`buffer.el' w │ │ │ -000001f0: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ -00000200: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ -00000210: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ -00000220: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ -00000230: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ -00000240: 6c69 7374 206e 696c 2929 0a0a 0a23 4034 list nil))...#@4 │ │ │ -00000250: 3230 2053 656c 6563 7420 6275 6666 6572 20 Select buffer │ │ │ -00000260: 2042 5546 4e41 4d45 2069 6e20 7468 6520 BUFNAME in the │ │ │ -00000270: 6375 7272 656e 7420 7769 6e64 6f77 2e0a current window.. │ │ │ -00000280: 4255 464e 414d 4520 6d61 7920 6265 2061 BUFNAME may be a │ │ │ -00000290: 2062 7566 6665 7220 6f72 2061 2062 7566 buffer or a buf │ │ │ -000002a0: 6665 7220 6e61 6d65 2061 6e64 2069 7320 fer name and is │ │ │ -000002b0: 6372 6561 7465 6420 6966 2069 7420 6469 created if it di │ │ │ -000002c0: 6420 6e6f 7420 6578 6973 742e 0a4f 7074 d not exist..Opt │ │ │ -000002d0: 696f 6e61 6c20 7365 636f 6e64 2061 7267 ional second arg │ │ │ -000002e0: 204e 4f52 4543 4f52 4420 6e6f 6e2d 6e69 NORECORD non-ni │ │ │ -000002f0: 6c20 6d65 616e 7320 646f 206e 6f74 2070 l means do not p │ │ │ -00000300: 7574 2074 6869 7320 6275 6666 6572 2061 ut this buffer a │ │ │ -00000310: 7420 7468 650a 6672 6f6e 7420 6f66 2074 t the.front of t │ │ │ -00000320: 6865 206c 6973 7420 6f66 2072 6563 656e he list of recen │ │ │ -00000330: 746c 7920 7365 6c65 6374 6564 206f 6e65 tly selected one │ │ │ -00000340: 732e 0a0a 5741 524e 494e 473a 2054 6869 s...WARNING: Thi │ │ │ -00000350: 7320 6973 204e 4f54 2074 6865 2077 6179 s is NOT the way │ │ │ -00000360: 2074 6f20 776f 726b 206f 6e20 616e 6f74 to work on anot │ │ │ -00000370: 6865 7220 6275 6666 6572 2074 656d 706f her buffer tempo │ │ │ -00000380: 7261 7269 6c79 0a77 6974 6869 6e20 6120 rarily.within a │ │ │ -00000390: 4c69 7370 2070 726f 6772 616d 2120 2055 Lisp program! U │ │ │ -000003a0: 7365 2060 7365 742d 6275 6666 6572 2720 se `set-buffer' │ │ │ -000003b0: 696e 7374 6561 642e 2020 5468 6174 2061 instead. That a │ │ │ -000003c0: 766f 6964 7320 6d65 7373 696e 6720 7769 voids messing wi │ │ │ -000003d0: 7468 0a74 6865 2077 696e 646f 772d 6275 th.the window-bu │ │ │ -000003e0: 6666 6572 2063 6f72 7265 7370 6f6e 6465 ffer corresponde │ │ │ -000003f0: 6e63 6573 2e1f 0a28 6465 6661 6c69 6173 nces...(defalias │ │ │ -00000400: 2027 7377 6974 6368 2d74 6f2d 6275 6666 'switch-to-buff │ │ │ -00000410: 6572 2023 5b28 6275 666e 616d 6520 266f er #[(bufname &o │ │ │ -00000420: 7074 696f 6e61 6c20 6e6f 7265 636f 7264 ptional norecord │ │ │ -00000430: 2920 22c3 20c4 2061 ab84 c5c6 2188 c7c4 ) ". . a....!... │ │ │ -00000440: 2021 ab84 c5c8 2188 c91a 09ac 86ca 7021 !....!.......p! │ │ │ -00000450: 12aa 8fcb 0921 8912 ac88 cc09 2112 cd5c .....!......!..\ │ │ │ -00000460: 6e21 88ce 2088 5c6e 7188 cfd0 205c 6e08 n!.. .\nq... \n. │ │ │ -00000470: 2388 5c6e 2987 2220 5b6e 6f72 6563 6f72 #.\n)." [norecor │ │ │ -00000480: 6420 6275 666e 616d 6520 6275 6620 6d69 d bufname buf mi │ │ │ -00000490: 6e69 6275 6666 6572 2d77 696e 646f 7720 nibuffer-window │ │ │ -000004a0: 7365 6c65 6374 6564 2d77 696e 646f 7720 selected-window │ │ │ -000004b0: 6572 726f 7220 2243 616e 6e6f 7420 7377 error "Cannot sw │ │ │ -000004c0: 6974 6368 2062 7566 6665 7273 2069 6e20 itch buffers in │ │ │ -000004d0: 6d69 6e69 6275 6666 6572 2077 696e 646f minibuffer windo │ │ │ -000004e0: 7722 2077 696e 646f 772d 6465 6469 6361 w" window-dedica │ │ │ -000004f0: 7465 642d 7020 2243 616e 6e6f 7420 7377 ted-p "Cannot sw │ │ │ -00000500: 6974 6368 2062 7566 6665 7273 2069 6e20 itch buffers in │ │ │ -00000510: 6120 6465 6469 6361 7465 6420 7769 6e64 a dedicated wind │ │ │ -00000520: 6f77 2220 6e69 6c20 6f74 6865 722d 6275 ow" nil other-bu │ │ │ -00000530: 6666 6572 2067 6574 2d62 7566 6665 7220 ffer get-buffer │ │ │ -00000540: 6765 742d 6275 6666 6572 2d63 7265 6174 get-buffer-creat │ │ │ -00000550: 6520 7365 742d 6275 6666 6572 2d6d 616a e set-buffer-maj │ │ │ -00000560: 6f72 2d6d 6f64 6520 7075 7368 2d77 696e or-mode push-win │ │ │ -00000570: 646f 772d 636f 6e66 6967 7572 6174 696f dow-configuratio │ │ │ -00000580: 6e20 7365 742d 7769 6e64 6f77 2d62 7566 n set-window-buf │ │ │ -00000590: 6665 7220 6c61 7374 2d6e 6f6e 6d69 6e69 fer last-nonmini │ │ │ -000005a0: 6275 662d 7769 6e64 6f77 5d20 3520 2823 buf-window] 5 (# │ │ │ -000005b0: 2420 2e20 3539 3529 2022 4253 7769 7463 $ . 595) "BSwitc │ │ │ -000005c0: 6820 746f 2062 7566 6665 723a 2022 5d29 h to buffer: "]) │ │ │ -000005d0: 0a23 4037 3239 2053 656c 6563 7420 6275 .#@729 Select bu │ │ │ -000005e0: 6666 6572 2042 5546 4e41 4d45 2069 6e20 ffer BUFNAME in │ │ │ -000005f0: 736f 6d65 2077 696e 646f 772c 2070 7265 some window, pre │ │ │ -00000600: 6665 7261 626c 7920 6120 6469 6666 6572 ferably a differ │ │ │ -00000610: 656e 7420 6f6e 652e 0a49 6620 4255 464e ent one..If BUFN │ │ │ -00000620: 414d 4520 6973 206e 696c 2c20 7468 656e AME is nil, then │ │ │ -00000630: 2073 6f6d 6520 6f74 6865 7220 6275 6666 some other buff │ │ │ -00000640: 6572 2069 7320 6368 6f73 656e 2e0a 4966 er is chosen..If │ │ │ -00000650: 2060 706f 702d 7570 2d77 696e 646f 7773 `pop-up-windows │ │ │ -00000660: 2720 6973 206e 6f6e 2d6e 696c 2c20 7769 ' is non-nil, wi │ │ │ -00000670: 6e64 6f77 7320 6361 6e20 6265 2073 706c ndows can be spl │ │ │ -00000680: 6974 2074 6f20 646f 2074 6869 732e 0a49 it to do this..I │ │ │ -00000690: 6620 6f70 7469 6f6e 616c 2073 6563 6f6e f optional secon │ │ │ -000006a0: 6420 6172 6720 4e4f 542d 5448 4953 2d57 d arg NOT-THIS-W │ │ │ -000006b0: 494e 444f 572d 5020 6973 206e 6f6e 2d6e INDOW-P is non-n │ │ │ -000006c0: 696c 2c20 696e 7369 7374 206f 6e20 6669 il, insist on fi │ │ │ -000006d0: 6e64 696e 670a 616e 6f74 6865 7220 7769 nding.another wi │ │ │ -000006e0: 6e64 6f77 2065 7665 6e20 6966 2042 5546 ndow even if BUF │ │ │ -000006f0: 4e41 4d45 2069 7320 616c 7265 6164 7920 NAME is already │ │ │ -00000700: 7669 7369 626c 6520 696e 2074 6865 2073 visible in the s │ │ │ -00000710: 656c 6563 7465 6420 7769 6e64 6f77 2e0a elected window.. │ │ │ -00000720: 4966 206f 7074 696f 6e61 6c20 7468 6972 If optional thir │ │ │ -00000730: 6420 6172 6720 6973 206e 6f6e 2d6e 696c d arg is non-nil │ │ │ -00000740: 2c20 6974 2069 7320 7468 6520 6672 616d , it is the fram │ │ │ -00000750: 6520 746f 2070 6f70 2074 6f20 7468 6973 e to pop to this │ │ │ -00000760: 0a62 7566 6665 7220 6f6e 2e0a 4966 2060 .buffer on..If ` │ │ │ -00000770: 666f 6375 732d 666f 6c6c 6f77 732d 6d6f focus-follows-mo │ │ │ -00000780: 7573 6527 2069 7320 6e6f 6e2d 6e69 6c2c use' is non-nil, │ │ │ -00000790: 206b 6579 626f 6172 6420 666f 6375 7320 keyboard focus │ │ │ -000007a0: 6973 206c 6566 7420 756e 6368 616e 6765 is left unchange │ │ │ -000007b0: 642e 0a0a 4275 6666 6572 7320 7769 7468 d...Buffers with │ │ │ -000007c0: 206e 616d 6573 2074 6861 7420 6172 6520 names that are │ │ │ -000007d0: 6d65 6d62 6572 7320 6f66 2074 6865 2060 members of the ` │ │ │ -000007e0: 7361 6d65 2d77 696e 646f 772d 6275 6666 same-window-buff │ │ │ -000007f0: 6572 2d6e 616d 6573 270a 6c69 7374 2c20 er-names'.list, │ │ │ -00000800: 6f72 2074 6861 7420 6d61 7463 6820 616e or that match an │ │ │ -00000810: 2065 6c65 6d65 6e74 206f 6620 7468 6520 element of the │ │ │ -00000820: 6073 616d 652d 7769 6e64 6f77 2d72 6567 `same-window-reg │ │ │ -00000830: 6578 7073 2720 6c69 7374 2061 7265 0a74 exps' list are.t │ │ │ -00000840: 7265 6174 6564 2073 7065 6369 616c 6c79 reated specially │ │ │ -00000850: 2062 7920 7468 6973 2066 756e 6374 696f by this functio │ │ │ -00000860: 6e2d 2d74 6865 7920 6172 6520 616c 7761 n--they are alwa │ │ │ -00000870: 7973 2073 656c 6563 7465 6420 696e 2074 ys selected in t │ │ │ -00000880: 6865 0a73 616d 6520 7769 6e64 6f77 2072 he.same window r │ │ │ -00000890: 6174 6865 7220 7468 616e 2069 6e20 6120 ather than in a │ │ │ -000008a0: 6469 6666 6572 656e 7420 6f6e 652e 1f0a different one... │ │ │ -000008b0: 2864 6566 616c 6961 7320 2770 6f70 2d74 (defalias 'pop-t │ │ │ -000008c0: 6f2d 6275 6666 6572 2023 5b28 6275 666e o-buffer #[(bufn │ │ │ -000008d0: 616d 6520 266f 7074 696f 6e61 6c20 6e6f ame &optional no │ │ │ -000008e0: 742d 7468 6973 2d77 696e 646f 772d 7020 t-this-window-p │ │ │ -000008f0: 6f6e 2d66 7261 6d65 2920 2270 c689 891c on-frame) "p.... │ │ │ -00000900: 1b1d 185c 6eac 86c7 7021 15aa 8fc8 5c6e ...\n...p!....\n │ │ │ -00000910: 2189 15ac 88c9 5c6e 2115 ca0d 2188 cb20 !.....\n!...!.. │ │ │ -00000920: 880d 7188 cc0d 0e13 0923 13cd 0b21 140e ..q......#...!.. │ │ │ -00000930: 12ac 8a0c ce20 61ac 84cf 0c21 88d0 0d21 ..... a....!...! │ │ │ -00000940: 880e 12ab 8e09 ab8b 09ce 2061 ac85 0871 .......... a...q │ │ │ -00000950: 88aa 84d1 0b21 880d 2c87 2220 5b6f 6c64 .....!..,." [old │ │ │ -00000960: 6275 6620 6f6e 2d66 7261 6d65 2062 7566 buf on-frame buf │ │ │ -00000970: 6e61 6d65 2077 696e 646f 7720 6672 616d name window fram │ │ │ -00000980: 6520 6275 6620 6e69 6c20 6f74 6865 722d e buf nil other- │ │ │ -00000990: 6275 6666 6572 2067 6574 2d62 7566 6665 buffer get-buffe │ │ │ -000009a0: 7220 6765 742d 6275 6666 6572 2d63 7265 r get-buffer-cre │ │ │ -000009b0: 6174 6520 7365 742d 6275 6666 6572 2d6d ate set-buffer-m │ │ │ -000009c0: 616a 6f72 2d6d 6f64 6520 7075 7368 2d77 ajor-mode push-w │ │ │ -000009d0: 696e 646f 772d 636f 6e66 6967 7572 6174 indow-configurat │ │ │ -000009e0: 696f 6e20 6469 7370 6c61 792d 6275 6666 ion display-buff │ │ │ -000009f0: 6572 2077 696e 646f 772d 6672 616d 6520 er window-frame │ │ │ -00000a00: 7365 6c65 6374 6564 2d66 7261 6d65 2073 selected-frame s │ │ │ -00000a10: 656c 6563 742d 6672 616d 6520 7265 636f elect-frame reco │ │ │ -00000a20: 7264 2d62 7566 6665 7220 7365 6c65 6374 rd-buffer select │ │ │ -00000a30: 2d77 696e 646f 7720 666f 6375 732d 666f -window focus-fo │ │ │ -00000a40: 6c6c 6f77 732d 6d6f 7573 6520 6e6f 742d llows-mouse not- │ │ │ -00000a50: 7468 6973 2d77 696e 646f 772d 705d 2035 this-window-p] 5 │ │ │ -00000a60: 2028 2324 202e 2031 3439 3529 5d29 0a (#$ . 1495)]). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3235 2032 3032 310a 3b3b 3b20 :08:25 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f62 7566 6665 722e 656c 4/lisp/buffer.el │ │ │ +00000090: 0a3b 3b3b 2065 6d61 6373 2076 6572 7369 .;;; emacs versi │ │ │ +000000a0: 6f6e 2032 312e 3420 2870 6174 6368 2032 on 21.4 (patch 2 │ │ │ +000000b0: 3429 2022 5374 616e 6461 7264 2043 2220 4) "Standard C" │ │ │ +000000c0: 5845 6d61 6373 204c 7563 6964 2e0a 3b3b XEmacs Lucid..;; │ │ │ +000000d0: 3b20 6279 7465 636f 6d70 2076 6572 7369 ; bytecomp versi │ │ │ +000000e0: 6f6e 2032 2e32 3720 5845 6d61 6373 3b20 on 2.27 XEmacs; │ │ │ +000000f0: 3230 3030 2d30 392d 3132 2e0a 3b3b 3b20 2000-09-12..;;; │ │ │ +00000100: 6f70 7469 6d69 7a61 7469 6f6e 2069 7320 optimization is │ │ │ +00000110: 6f6e 2e0a 3b3b 3b20 7468 6973 2066 696c on..;;; this fil │ │ │ +00000120: 6520 7573 6573 206f 7063 6f64 6573 2077 e uses opcodes w │ │ │ +00000130: 6869 6368 2064 6f20 6e6f 7420 6578 6973 hich do not exis │ │ │ +00000140: 7420 696e 2045 6d61 6373 2031 392e 0a0a t in Emacs 19... │ │ │ +00000150: 2869 6620 2861 6e64 2028 626f 756e 6470 (if (and (boundp │ │ │ +00000160: 2027 656d 6163 732d 7665 7273 696f 6e29 'emacs-version) │ │ │ +00000170: 0a09 2028 6f72 2028 616e 6420 2862 6f75 .. (or (and (bou │ │ │ +00000180: 6e64 7020 2765 706f 6368 3a3a 7665 7273 ndp 'epoch::vers │ │ │ +00000190: 696f 6e29 2065 706f 6368 3a3a 7665 7273 ion) epoch::vers │ │ │ +000001a0: 696f 6e29 0a09 2020 2020 2028 7374 7269 ion).. (stri │ │ │ +000001b0: 6e67 2d6c 6573 7370 2065 6d61 6373 2d76 ng-lessp emacs-v │ │ │ +000001c0: 6572 7369 6f6e 2022 3230 2229 2929 0a20 ersion "20"))). │ │ │ +000001d0: 2020 2028 6572 726f 7220 2260 6275 6666 (error "`buff │ │ │ +000001e0: 6572 2e65 6c27 2077 6173 2063 6f6d 7069 er.el' was compi │ │ │ +000001f0: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ +00000200: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ +00000210: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ +00000220: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ +00000230: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ +00000240: 2929 0a0a 0a23 4034 3230 2053 656c 6563 ))...#@420 Selec │ │ │ +00000250: 7420 6275 6666 6572 2042 5546 4e41 4d45 t buffer BUFNAME │ │ │ +00000260: 2069 6e20 7468 6520 6375 7272 656e 7420 in the current │ │ │ +00000270: 7769 6e64 6f77 2e0a 4255 464e 414d 4520 window..BUFNAME │ │ │ +00000280: 6d61 7920 6265 2061 2062 7566 6665 7220 may be a buffer │ │ │ +00000290: 6f72 2061 2062 7566 6665 7220 6e61 6d65 or a buffer name │ │ │ +000002a0: 2061 6e64 2069 7320 6372 6561 7465 6420 and is created │ │ │ +000002b0: 6966 2069 7420 6469 6420 6e6f 7420 6578 if it did not ex │ │ │ +000002c0: 6973 742e 0a4f 7074 696f 6e61 6c20 7365 ist..Optional se │ │ │ +000002d0: 636f 6e64 2061 7267 204e 4f52 4543 4f52 cond arg NORECOR │ │ │ +000002e0: 4420 6e6f 6e2d 6e69 6c20 6d65 616e 7320 D non-nil means │ │ │ +000002f0: 646f 206e 6f74 2070 7574 2074 6869 7320 do not put this │ │ │ +00000300: 6275 6666 6572 2061 7420 7468 650a 6672 buffer at the.fr │ │ │ +00000310: 6f6e 7420 6f66 2074 6865 206c 6973 7420 ont of the list │ │ │ +00000320: 6f66 2072 6563 656e 746c 7920 7365 6c65 of recently sele │ │ │ +00000330: 6374 6564 206f 6e65 732e 0a0a 5741 524e cted ones...WARN │ │ │ +00000340: 494e 473a 2054 6869 7320 6973 204e 4f54 ING: This is NOT │ │ │ +00000350: 2074 6865 2077 6179 2074 6f20 776f 726b the way to work │ │ │ +00000360: 206f 6e20 616e 6f74 6865 7220 6275 6666 on another buff │ │ │ +00000370: 6572 2074 656d 706f 7261 7269 6c79 0a77 er temporarily.w │ │ │ +00000380: 6974 6869 6e20 6120 4c69 7370 2070 726f ithin a Lisp pro │ │ │ +00000390: 6772 616d 2120 2055 7365 2060 7365 742d gram! Use `set- │ │ │ +000003a0: 6275 6666 6572 2720 696e 7374 6561 642e buffer' instead. │ │ │ +000003b0: 2020 5468 6174 2061 766f 6964 7320 6d65 That avoids me │ │ │ +000003c0: 7373 696e 6720 7769 7468 0a74 6865 2077 ssing with.the w │ │ │ +000003d0: 696e 646f 772d 6275 6666 6572 2063 6f72 indow-buffer cor │ │ │ +000003e0: 7265 7370 6f6e 6465 6e63 6573 2e1f 0a28 respondences...( │ │ │ +000003f0: 6465 6661 6c69 6173 2027 7377 6974 6368 defalias 'switch │ │ │ +00000400: 2d74 6f2d 6275 6666 6572 2023 5b28 6275 -to-buffer #[(bu │ │ │ +00000410: 666e 616d 6520 266f 7074 696f 6e61 6c20 fname &optional │ │ │ +00000420: 6e6f 7265 636f 7264 2920 22c3 20c4 2061 norecord) ". . a │ │ │ +00000430: ab84 c5c6 2188 c7c4 2021 ab84 c5c8 2188 ....!... !....!. │ │ │ +00000440: c91a 09ac 86ca 7021 12aa 8fcb 0921 8912 ......p!.....!.. │ │ │ +00000450: ac88 cc09 2112 cd5c 6e21 88ce 2088 5c6e ....!..\n!.. .\n │ │ │ +00000460: 7188 cfd0 205c 6e08 2388 5c6e 2987 2220 q... \n.#.\n)." │ │ │ +00000470: 5b6e 6f72 6563 6f72 6420 6275 666e 616d [norecord bufnam │ │ │ +00000480: 6520 6275 6620 6d69 6e69 6275 6666 6572 e buf minibuffer │ │ │ +00000490: 2d77 696e 646f 7720 7365 6c65 6374 6564 -window selected │ │ │ +000004a0: 2d77 696e 646f 7720 6572 726f 7220 2243 -window error "C │ │ │ +000004b0: 616e 6e6f 7420 7377 6974 6368 2062 7566 annot switch buf │ │ │ +000004c0: 6665 7273 2069 6e20 6d69 6e69 6275 6666 fers in minibuff │ │ │ +000004d0: 6572 2077 696e 646f 7722 2077 696e 646f er window" windo │ │ │ +000004e0: 772d 6465 6469 6361 7465 642d 7020 2243 w-dedicated-p "C │ │ │ +000004f0: 616e 6e6f 7420 7377 6974 6368 2062 7566 annot switch buf │ │ │ +00000500: 6665 7273 2069 6e20 6120 6465 6469 6361 fers in a dedica │ │ │ +00000510: 7465 6420 7769 6e64 6f77 2220 6e69 6c20 ted window" nil │ │ │ +00000520: 6f74 6865 722d 6275 6666 6572 2067 6574 other-buffer get │ │ │ +00000530: 2d62 7566 6665 7220 6765 742d 6275 6666 -buffer get-buff │ │ │ +00000540: 6572 2d63 7265 6174 6520 7365 742d 6275 er-create set-bu │ │ │ +00000550: 6666 6572 2d6d 616a 6f72 2d6d 6f64 6520 ffer-major-mode │ │ │ +00000560: 7075 7368 2d77 696e 646f 772d 636f 6e66 push-window-conf │ │ │ +00000570: 6967 7572 6174 696f 6e20 7365 742d 7769 iguration set-wi │ │ │ +00000580: 6e64 6f77 2d62 7566 6665 7220 6c61 7374 ndow-buffer last │ │ │ +00000590: 2d6e 6f6e 6d69 6e69 6275 662d 7769 6e64 -nonminibuf-wind │ │ │ +000005a0: 6f77 5d20 3520 2823 2420 2e20 3538 3729 ow] 5 (#$ . 587) │ │ │ +000005b0: 2022 4253 7769 7463 6820 746f 2062 7566 "BSwitch to buf │ │ │ +000005c0: 6665 723a 2022 5d29 0a23 4037 3239 2053 fer: "]).#@729 S │ │ │ +000005d0: 656c 6563 7420 6275 6666 6572 2042 5546 elect buffer BUF │ │ │ +000005e0: 4e41 4d45 2069 6e20 736f 6d65 2077 696e NAME in some win │ │ │ +000005f0: 646f 772c 2070 7265 6665 7261 626c 7920 dow, preferably │ │ │ +00000600: 6120 6469 6666 6572 656e 7420 6f6e 652e a different one. │ │ │ +00000610: 0a49 6620 4255 464e 414d 4520 6973 206e .If BUFNAME is n │ │ │ +00000620: 696c 2c20 7468 656e 2073 6f6d 6520 6f74 il, then some ot │ │ │ +00000630: 6865 7220 6275 6666 6572 2069 7320 6368 her buffer is ch │ │ │ +00000640: 6f73 656e 2e0a 4966 2060 706f 702d 7570 osen..If `pop-up │ │ │ +00000650: 2d77 696e 646f 7773 2720 6973 206e 6f6e -windows' is non │ │ │ +00000660: 2d6e 696c 2c20 7769 6e64 6f77 7320 6361 -nil, windows ca │ │ │ +00000670: 6e20 6265 2073 706c 6974 2074 6f20 646f n be split to do │ │ │ +00000680: 2074 6869 732e 0a49 6620 6f70 7469 6f6e this..If option │ │ │ +00000690: 616c 2073 6563 6f6e 6420 6172 6720 4e4f al second arg NO │ │ │ +000006a0: 542d 5448 4953 2d57 494e 444f 572d 5020 T-THIS-WINDOW-P │ │ │ +000006b0: 6973 206e 6f6e 2d6e 696c 2c20 696e 7369 is non-nil, insi │ │ │ +000006c0: 7374 206f 6e20 6669 6e64 696e 670a 616e st on finding.an │ │ │ +000006d0: 6f74 6865 7220 7769 6e64 6f77 2065 7665 other window eve │ │ │ +000006e0: 6e20 6966 2042 5546 4e41 4d45 2069 7320 n if BUFNAME is │ │ │ +000006f0: 616c 7265 6164 7920 7669 7369 626c 6520 already visible │ │ │ +00000700: 696e 2074 6865 2073 656c 6563 7465 6420 in the selected │ │ │ +00000710: 7769 6e64 6f77 2e0a 4966 206f 7074 696f window..If optio │ │ │ +00000720: 6e61 6c20 7468 6972 6420 6172 6720 6973 nal third arg is │ │ │ +00000730: 206e 6f6e 2d6e 696c 2c20 6974 2069 7320 non-nil, it is │ │ │ +00000740: 7468 6520 6672 616d 6520 746f 2070 6f70 the frame to pop │ │ │ +00000750: 2074 6f20 7468 6973 0a62 7566 6665 7220 to this.buffer │ │ │ +00000760: 6f6e 2e0a 4966 2060 666f 6375 732d 666f on..If `focus-fo │ │ │ +00000770: 6c6c 6f77 732d 6d6f 7573 6527 2069 7320 llows-mouse' is │ │ │ +00000780: 6e6f 6e2d 6e69 6c2c 206b 6579 626f 6172 non-nil, keyboar │ │ │ +00000790: 6420 666f 6375 7320 6973 206c 6566 7420 d focus is left │ │ │ +000007a0: 756e 6368 616e 6765 642e 0a0a 4275 6666 unchanged...Buff │ │ │ +000007b0: 6572 7320 7769 7468 206e 616d 6573 2074 ers with names t │ │ │ +000007c0: 6861 7420 6172 6520 6d65 6d62 6572 7320 hat are members │ │ │ +000007d0: 6f66 2074 6865 2060 7361 6d65 2d77 696e of the `same-win │ │ │ +000007e0: 646f 772d 6275 6666 6572 2d6e 616d 6573 dow-buffer-names │ │ │ +000007f0: 270a 6c69 7374 2c20 6f72 2074 6861 7420 '.list, or that │ │ │ +00000800: 6d61 7463 6820 616e 2065 6c65 6d65 6e74 match an element │ │ │ +00000810: 206f 6620 7468 6520 6073 616d 652d 7769 of the `same-wi │ │ │ +00000820: 6e64 6f77 2d72 6567 6578 7073 2720 6c69 ndow-regexps' li │ │ │ +00000830: 7374 2061 7265 0a74 7265 6174 6564 2073 st are.treated s │ │ │ +00000840: 7065 6369 616c 6c79 2062 7920 7468 6973 pecially by this │ │ │ +00000850: 2066 756e 6374 696f 6e2d 2d74 6865 7920 function--they │ │ │ +00000860: 6172 6520 616c 7761 7973 2073 656c 6563 are always selec │ │ │ +00000870: 7465 6420 696e 2074 6865 0a73 616d 6520 ted in the.same │ │ │ +00000880: 7769 6e64 6f77 2072 6174 6865 7220 7468 window rather th │ │ │ +00000890: 616e 2069 6e20 6120 6469 6666 6572 656e an in a differen │ │ │ +000008a0: 7420 6f6e 652e 1f0a 2864 6566 616c 6961 t one...(defalia │ │ │ +000008b0: 7320 2770 6f70 2d74 6f2d 6275 6666 6572 s 'pop-to-buffer │ │ │ +000008c0: 2023 5b28 6275 666e 616d 6520 266f 7074 #[(bufname &opt │ │ │ +000008d0: 696f 6e61 6c20 6e6f 742d 7468 6973 2d77 ional not-this-w │ │ │ +000008e0: 696e 646f 772d 7020 6f6e 2d66 7261 6d65 indow-p on-frame │ │ │ +000008f0: 2920 2270 c689 891c 1b1d 185c 6eac 86c7 ) "p.......\n... │ │ │ +00000900: 7021 15aa 8fc8 5c6e 2189 15ac 88c9 5c6e p!....\n!.....\n │ │ │ +00000910: 2115 ca0d 2188 cb20 880d 7188 cc0d 0e13 !...!.. ..q..... │ │ │ +00000920: 0923 13cd 0b21 140e 12ac 8a0c ce20 61ac .#...!....... a. │ │ │ +00000930: 84cf 0c21 88d0 0d21 880e 12ab 8e09 ab8b ...!...!........ │ │ │ +00000940: 09ce 2061 ac85 0871 88aa 84d1 0b21 880d .. a...q.....!.. │ │ │ +00000950: 2c87 2220 5b6f 6c64 6275 6620 6f6e 2d66 ,." [oldbuf on-f │ │ │ +00000960: 7261 6d65 2062 7566 6e61 6d65 2077 696e rame bufname win │ │ │ +00000970: 646f 7720 6672 616d 6520 6275 6620 6e69 dow frame buf ni │ │ │ +00000980: 6c20 6f74 6865 722d 6275 6666 6572 2067 l other-buffer g │ │ │ +00000990: 6574 2d62 7566 6665 7220 6765 742d 6275 et-buffer get-bu │ │ │ +000009a0: 6666 6572 2d63 7265 6174 6520 7365 742d ffer-create set- │ │ │ +000009b0: 6275 6666 6572 2d6d 616a 6f72 2d6d 6f64 buffer-major-mod │ │ │ +000009c0: 6520 7075 7368 2d77 696e 646f 772d 636f e push-window-co │ │ │ +000009d0: 6e66 6967 7572 6174 696f 6e20 6469 7370 nfiguration disp │ │ │ +000009e0: 6c61 792d 6275 6666 6572 2077 696e 646f lay-buffer windo │ │ │ +000009f0: 772d 6672 616d 6520 7365 6c65 6374 6564 w-frame selected │ │ │ +00000a00: 2d66 7261 6d65 2073 656c 6563 742d 6672 -frame select-fr │ │ │ +00000a10: 616d 6520 7265 636f 7264 2d62 7566 6665 ame record-buffe │ │ │ +00000a20: 7220 7365 6c65 6374 2d77 696e 646f 7720 r select-window │ │ │ +00000a30: 666f 6375 732d 666f 6c6c 6f77 732d 6d6f focus-follows-mo │ │ │ +00000a40: 7573 6520 6e6f 742d 7468 6973 2d77 696e use not-this-win │ │ │ +00000a50: 646f 772d 705d 2035 2028 2324 202e 2031 dow-p] 5 (#$ . 1 │ │ │ +00000a60: 3438 3729 5d29 0a 487)]). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/build-report.elc │ │ │ @@ -1,801 +1,801 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f62 1-21.4.24/lisp/b │ │ │ -00000090: 7569 6c64 2d72 6570 6f72 742e 656c 0a3b uild-report.el.; │ │ │ -000000a0: 3b3b 2065 6d61 6373 2076 6572 7369 6f6e ;; emacs version │ │ │ -000000b0: 2032 312e 3420 2870 6174 6368 2032 3429 21.4 (patch 24) │ │ │ -000000c0: 2022 5374 616e 6461 7264 2043 2220 5845 "Standard C" XE │ │ │ -000000d0: 6d61 6373 204c 7563 6964 2e0a 3b3b 3b20 macs Lucid..;;; │ │ │ -000000e0: 6279 7465 636f 6d70 2076 6572 7369 6f6e bytecomp version │ │ │ -000000f0: 2032 2e32 3720 5845 6d61 6373 3b20 3230 2.27 XEmacs; 20 │ │ │ -00000100: 3030 2d30 392d 3132 2e0a 3b3b 3b20 6f70 00-09-12..;;; op │ │ │ -00000110: 7469 6d69 7a61 7469 6f6e 2069 7320 6f6e timization is on │ │ │ -00000120: 2e0a 3b3b 3b20 7468 6973 2066 696c 6520 ..;;; this file │ │ │ -00000130: 7573 6573 206f 7063 6f64 6573 2077 6869 uses opcodes whi │ │ │ -00000140: 6368 2064 6f20 6e6f 7420 6578 6973 7420 ch do not exist │ │ │ -00000150: 696e 2045 6d61 6373 2031 392e 0a0a 2869 in Emacs 19...(i │ │ │ -00000160: 6620 2861 6e64 2028 626f 756e 6470 2027 f (and (boundp ' │ │ │ -00000170: 656d 6163 732d 7665 7273 696f 6e29 0a09 emacs-version).. │ │ │ -00000180: 2028 6f72 2028 616e 6420 2862 6f75 6e64 (or (and (bound │ │ │ -00000190: 7020 2765 706f 6368 3a3a 7665 7273 696f p 'epoch::versio │ │ │ -000001a0: 6e29 2065 706f 6368 3a3a 7665 7273 696f n) epoch::versio │ │ │ -000001b0: 6e29 0a09 2020 2020 2028 7374 7269 6e67 n).. (string │ │ │ -000001c0: 2d6c 6573 7370 2065 6d61 6373 2d76 6572 -lessp emacs-ver │ │ │ -000001d0: 7369 6f6e 2022 3230 2229 2929 0a20 2020 sion "20"))). │ │ │ -000001e0: 2028 6572 726f 7220 2260 6275 696c 642d (error "`build- │ │ │ -000001f0: 7265 706f 7274 2e65 6c27 2077 6173 2063 report.el' was c │ │ │ -00000200: 6f6d 7069 6c65 6420 666f 7220 456d 6163 ompiled for Emac │ │ │ -00000210: 7320 3230 2229 290a 0a28 6f72 2028 626f s 20"))..(or (bo │ │ │ -00000220: 756e 6470 2027 6375 7272 656e 742d 6c6f undp 'current-lo │ │ │ -00000230: 6164 2d6c 6973 7429 2028 7365 7471 2063 ad-list) (setq c │ │ │ -00000240: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ -00000250: 206e 696c 2929 0a0a 0a28 6279 7465 2d63 nil))...(byte-c │ │ │ -00000260: 6f64 6520 22c0 c121 88c0 c221 88c0 c321 ode "..!...!...! │ │ │ -00000270: 88c4 c521 8722 205b 7265 7175 6972 6520 ...!." [require │ │ │ -00000280: 636f 6e66 6967 2063 7573 746f 6d20 636c config custom cl │ │ │ -00000290: 2070 726f 7669 6465 2062 7569 6c64 2d72 provide build-r │ │ │ -000002a0: 6570 6f72 745d 2032 290a 2340 3134 3720 eport] 2).#@147 │ │ │ -000002b0: 2a52 4547 4558 5020 6d61 7463 6869 6e67 *REGEXP matching │ │ │ -000002c0: 2058 456d 6163 7320 4265 7461 2056 6572 XEmacs Beta Ver │ │ │ -000002d0: 7369 6f6e 2073 7472 696e 6720 696e 0a60 sion string in.` │ │ │ -000002e0: 6275 696c 642d 7265 706f 7274 2d69 6e73 build-report-ins │ │ │ -000002f0: 7461 6c6c 6174 696f 6e2d 6669 6c65 2720 tallation-file' │ │ │ -00000300: 6669 6c65 2e20 2054 6869 7320 7661 7269 file. This vari │ │ │ -00000310: 6162 6c65 2069 7320 7573 6564 2062 790a able is used by. │ │ │ -00000320: 6062 7569 6c64 2d72 6570 6f72 742d 696e `build-report-in │ │ │ -00000330: 7374 616c 6c61 7469 6f6e 2d64 6174 6127 stallation-data' │ │ │ -00000340: 2e1f 0a28 6465 6663 6f6e 7374 2062 7569 ...(defconst bui │ │ │ -00000350: 6c64 2d72 6570 6f72 742d 696e 7374 616c ld-report-instal │ │ │ -00000360: 6c61 7469 6f6e 2d76 6572 7369 6f6e 2d72 lation-version-r │ │ │ -00000370: 6567 6578 7020 2258 456d 6163 735c 5c73 egexp "XEmacs\\s │ │ │ -00000380: 2d2b 5c5c 285b 302d 395d 2b5c 5c29 5c5c -+\\([0-9]+\\)\\ │ │ │ -00000390: 2e5c 5c28 5b30 2d39 5d2b 5c5c 295c 5c28 .\\([0-9]+\\)\\( │ │ │ -000003a0: 5c5c 282d 625c 5c7c 5c5c 2e5c 5c29 5c5c \\(-b\\|\\.\\)\\ │ │ │ -000003b0: 285b 302d 395d 2b5c 5c29 5c5c 293f 5c5c ([0-9]+\\)\\)?\\ │ │ │ -000003c0: 732d 2b5c 5c5c 5c3f 5c22 5c5c 285b 5e5c s-+\\\\?\"\\([^\ │ │ │ -000003d0: 5c5c 225d 2b5c 5c29 5c5c 5c5c 3f5c 225c \\"]+\\)\\\\?\"\ │ │ │ -000003e0: 5c73 2d2b 636f 6e66 6967 7572 6564 5c5c \s-+configured\\ │ │ │ -000003f0: 732d 2b66 6f72 5c5c 732d 2b60 5c5c 282e s-+for\\s-+`\\(. │ │ │ -00000400: 2b5c 5c29 275c 5c2e 2220 2823 2420 2e20 +\\)'\\." (#$ . │ │ │ -00000410: 2d36 3838 2929 0a23 4031 3536 202a 5245 -688)).#@156 *RE │ │ │ -00000420: 4745 5850 206d 6174 6368 696e 6720 5845 GEXP matching XE │ │ │ -00000430: 6d61 6373 2042 6574 6120 5665 7273 696f macs Beta Versio │ │ │ -00000440: 6e20 7661 7269 6162 6c65 2061 7373 6967 n variable assig │ │ │ -00000450: 6e6d 656e 7473 2069 6e0a 6062 7569 6c64 nments in.`build │ │ │ -00000460: 2d72 6570 6f72 742d 7665 7273 696f 6e2d -report-version- │ │ │ -00000470: 6669 6c65 2720 6669 6c65 2e20 2054 6869 file' file. Thi │ │ │ -00000480: 7320 7661 7269 6162 6c65 2069 7320 7573 s variable is us │ │ │ -00000490: 6564 2062 790a 6062 7569 6c64 2d72 6570 ed by.`build-rep │ │ │ -000004a0: 6f72 742d 7665 7273 696f 6e2d 6669 6c65 ort-version-file │ │ │ -000004b0: 2d64 6174 6127 2e1f 0a28 6465 6663 6f6e -data'...(defcon │ │ │ -000004c0: 7374 2062 7569 6c64 2d72 6570 6f72 742d st build-report- │ │ │ -000004d0: 7665 7273 696f 6e2d 6669 6c65 2d72 6567 version-file-reg │ │ │ -000004e0: 6578 7020 2265 6d61 6373 5f6d 616a 6f72 exp "emacs_major │ │ │ -000004f0: 5f76 6572 7369 6f6e 5c5c 732d 2a3d 5c5c _version\\s-*=\\ │ │ │ -00000500: 732d 2a5c 5c28 5b30 2d39 5d2b 5c5c 295c s-*\\([0-9]+\\)\ │ │ │ -00000510: 6e65 6d61 6373 5f6d 696e 6f72 5f76 6572 nemacs_minor_ver │ │ │ -00000520: 7369 6f6e 5c5c 732d 2a3d 5c5c 732d 2a5c sion\\s-*=\\s-*\ │ │ │ -00000530: 5c28 5b30 2d39 5d2b 5c5c 295c 6e65 6d61 \([0-9]+\\)\nema │ │ │ -00000540: 6373 5f62 6574 615f 7665 7273 696f 6e5c cs_beta_version\ │ │ │ -00000550: 5c73 2d2a 3d5c 5c73 2d2a 5c5c 285b 302d \s-*=\\s-*\\([0- │ │ │ -00000560: 395d 2b5c 5c29 3f5c 6e78 656d 6163 735f 9]+\\)?\nxemacs_ │ │ │ -00000570: 636f 6465 6e61 6d65 5c5c 732d 2a3d 5c5c codename\\s-*=\\ │ │ │ -00000580: 732d 2a5c 225c 5c28 5b5e 5c22 5d2b 5c5c s-*\"\\([^\"]+\\ │ │ │ -00000590: 295c 2222 2028 2324 202e 202d 3130 3533 )\"" (#$ . -1053 │ │ │ -000005a0: 2929 0a23 4031 3637 2052 4547 4558 5020 )).#@167 REGEXP │ │ │ -000005b0: 6d61 7463 6869 6e67 2058 456d 6163 7320 matching XEmacs │ │ │ -000005c0: 4265 7461 2073 7263 6469 7220 6173 2074 Beta srcdir as t │ │ │ -000005d0: 6865 2066 6972 7374 2073 7562 7374 7269 he first substri │ │ │ -000005e0: 6e67 206d 6174 6368 2069 6e0a 6062 7569 ng match in.`bui │ │ │ -000005f0: 6c64 2d72 6570 6f72 742d 696e 7374 616c ld-report-instal │ │ │ -00000600: 6c61 7469 6f6e 2d66 696c 6527 2066 696c lation-file' fil │ │ │ -00000610: 652e 2020 5468 6973 2076 6172 6961 626c e. This variabl │ │ │ -00000620: 6520 6973 2075 7365 6420 6279 0a60 6275 e is used by.`bu │ │ │ -00000630: 696c 642d 7265 706f 7274 2d69 6e73 7461 ild-report-insta │ │ │ -00000640: 6c6c 6174 696f 6e2d 6461 7461 272e 1f0a llation-data'... │ │ │ -00000650: 2864 6566 636f 6e73 7420 6275 696c 642d (defconst build- │ │ │ -00000660: 7265 706f 7274 2d69 6e73 7461 6c6c 6174 report-installat │ │ │ -00000670: 696f 6e2d 7372 6364 6972 2d72 6567 6578 ion-srcdir-regex │ │ │ -00000680: 7020 225c 5c73 2d2a 5768 6572 6520 7368 p "\\s-*Where sh │ │ │ -00000690: 6f75 6c64 2074 6865 2062 7569 6c64 2070 ould the build p │ │ │ -000006a0: 726f 6365 7373 2066 696e 6420 7468 6520 rocess find the │ │ │ -000006b0: 736f 7572 6365 2063 6f64 655c 5c3f 5c5c source code\\?\\ │ │ │ -000006c0: 732d 2a5c 5c28 2e2a 5c5c 2924 2220 2823 s-*\\(.*\\)$" (# │ │ │ -000006d0: 2420 2e20 3134 3439 2929 0a28 6375 7374 $ . 1449)).(cust │ │ │ -000006e0: 6f6d 2d64 6563 6c61 7265 2d67 726f 7570 om-declare-group │ │ │ -000006f0: 2027 6275 696c 642d 7265 706f 7274 206e 'build-report n │ │ │ -00000700: 696c 2022 5374 616e 6461 7264 697a 6573 il "Standardizes │ │ │ -00000710: 2074 6865 2043 7265 6174 696f 6e20 6f66 the Creation of │ │ │ -00000720: 2058 456d 6163 7320 4275 696c 6420 5265 XEmacs Build Re │ │ │ -00000730: 706f 7274 732e 2220 3a6c 6f61 6420 2762 ports." :load 'b │ │ │ -00000740: 7569 6c64 2d72 6570 6f72 7420 3a67 726f uild-report :gro │ │ │ -00000750: 7570 2027 6275 696c 6429 0a28 6375 7374 up 'build).(cust │ │ │ -00000760: 6f6d 2d64 6563 6c61 7265 2d76 6172 6961 om-declare-varia │ │ │ -00000770: 626c 6520 2762 7569 6c64 2d72 6570 6f72 ble 'build-repor │ │ │ -00000780: 742d 6465 7374 696e 6174 696f 6e20 2728 t-destination '( │ │ │ -00000790: 6c69 7374 2022 5845 6d61 6373 2042 7569 list "XEmacs Bui │ │ │ -000007a0: 6c64 2052 6570 6f72 7473 204c 6973 7420 ld Reports List │ │ │ -000007b0: 3c78 656d 6163 732d 6275 696c 6472 6570 │ │ │ -000007d0: 2220 2258 456d 6163 7320 4265 7461 204c " "XEmacs Beta L │ │ │ -000007e0: 6973 7420 3c78 656d 6163 732d 6265 7461 ist ") " │ │ │ -00000800: 2a54 6865 206c 6973 7420 6f66 206d 6169 *The list of mai │ │ │ -00000810: 6c20 6164 6472 6573 7365 7320 5845 6d61 l addresses XEma │ │ │ -00000820: 6373 2042 7569 6c64 2052 6570 6f72 7473 cs Build Reports │ │ │ -00000830: 2073 686f 756c 6420 6d6f 7374 206c 696b should most lik │ │ │ -00000840: 656c 795c 6e67 6f20 746f 2e22 203a 7479 ely\ngo to." :ty │ │ │ -00000850: 7065 2027 2872 6570 6561 7420 3a63 7573 pe '(repeat :cus │ │ │ -00000860: 746f 6d2d 7368 6f77 2074 203a 646f 6375 tom-show t :docu │ │ │ -00000870: 6d65 6e74 6174 696f 6e2d 7368 6f77 6e20 mentation-shown │ │ │ -00000880: 7420 7374 7269 6e67 2920 3a67 726f 7570 t string) :group │ │ │ -00000890: 2027 6275 696c 642d 7265 706f 7274 290a 'build-report). │ │ │ -000008a0: 2863 7573 746f 6d2d 6465 636c 6172 652d (custom-declare- │ │ │ -000008b0: 7661 7269 6162 6c65 2027 6275 696c 642d variable 'build- │ │ │ -000008c0: 7265 706f 7274 2d6b 6565 702d 7265 6765 report-keep-rege │ │ │ -000008d0: 7870 2027 286c 6973 7420 225e 5c5c 2863 xp '(list "^\\(c │ │ │ -000008e0: 645c 5c7c 6e3f 6d61 6b65 5c5c 295c 5c73 d\\|n?make\\)\\s │ │ │ -000008f0: 2d22 2022 6572 726f 7273 3f22 2022 7761 -" "errors?" "wa │ │ │ -00000900: 726e 696e 6773 3f22 2022 7075 7265 2e2a rnings?" "pure.* │ │ │ -00000910: 5c5c 2873 7061 6365 5c5c 7c73 697a 655c \\(space\\|size\ │ │ │ -00000920: 5c29 2220 2268 6964 6573 5c5c 6222 2022 \)" "hides\\b" " │ │ │ -00000930: 7374 7261 6e67 6522 2022 7368 6164 6f77 strange" "shadow │ │ │ -00000940: 696e 6773 2220 225e 436f 6d70 696c 5c5c ings" "^Compil\\ │ │ │ -00000950: 2869 6e67 5c5c 732d 2b69 6e5c 5c7c 6174 (ing\\s-+in\\|at │ │ │ -00000960: 696f 6e5c 5c29 2220 225e 5573 696e 6722 ion\\)" "^Using" │ │ │ -00000970: 2022 6e6f 745c 5c73 2d2b 666f 756e 6422 "not\\s-+found" │ │ │ -00000980: 2022 5e57 6869 6c65 5c5c 732d 2b63 6f6d "^While\\s-+com │ │ │ -00000990: 7069 6c69 6e67 2e2a 5c5c 285c 6e5c 5c73 piling.*\\(\n\\s │ │ │ -000009a0: 2d2b 2e2b 5c5c 292a 2220 225e 4e6f 7465 -+.+\\)*" "^Note │ │ │ -000009b0: 3a22 2022 496e 7374 616c 6c69 6e67 2220 :" "Installing" │ │ │ -000009c0: 225b 4666 5d69 6c65 2873 2920 636f 7069 "[Ff]ile(s) copi │ │ │ -000009d0: 6564 2220 225c 5c73 2d2b 7465 7374 735c ed" "\\s-+tests\ │ │ │ -000009e0: 5c73 2d2b 2229 2022 2a52 6567 6578 7020 \s-+") "*Regexp │ │ │ -000009f0: 6f66 206d 616b 6520 7072 6f63 6573 7320 of make process │ │ │ -00000a00: 6f75 7470 7574 206c 696e 6573 2074 6f20 output lines to │ │ │ -00000a10: 6b65 6570 2069 6e20 7468 6520 7265 706f keep in the repo │ │ │ -00000a20: 7274 2e22 203a 7479 7065 2027 2872 6570 rt." :type '(rep │ │ │ -00000a30: 6561 7420 3a63 7573 746f 6d2d 7368 6f77 eat :custom-show │ │ │ -00000a40: 2074 203a 646f 6375 6d65 6e74 6174 696f t :documentatio │ │ │ -00000a50: 6e2d 7368 6f77 6e20 7420 7265 6765 7870 n-shown t regexp │ │ │ -00000a60: 2920 3a67 726f 7570 2027 6275 696c 642d ) :group 'build- │ │ │ -00000a70: 7265 706f 7274 290a 2863 7573 746f 6d2d report).(custom- │ │ │ -00000a80: 6465 636c 6172 652d 7661 7269 6162 6c65 declare-variable │ │ │ -00000a90: 2027 6275 696c 642d 7265 706f 7274 2d64 'build-report-d │ │ │ -00000aa0: 656c 6574 652d 7265 6765 7870 2027 286c elete-regexp '(l │ │ │ -00000ab0: 6973 7420 2263 6f6e 666c 2e2a 7769 7468 ist "confl.*with │ │ │ -00000ac0: 2e2a 6175 746f 2d69 6e6c 696e 696e 6722 .*auto-inlining" │ │ │ -00000ad0: 2022 5e46 6f72 6d61 7474 696e 673a 2220 "^Formatting:" │ │ │ -00000ae0: 2228 3130 3025 2920 7465 7374 7320 7375 "(100%) tests su │ │ │ -00000af0: 6363 6573 7366 756c 2229 2022 2a52 6567 ccessful") "*Reg │ │ │ -00000b00: 6578 7020 6f66 206d 616b 6520 7072 6f63 exp of make proc │ │ │ -00000b10: 6573 7320 6f75 7470 7574 206c 696e 6573 ess output lines │ │ │ -00000b20: 2074 6f20 6465 6c65 7465 2066 726f 6d20 to delete from │ │ │ -00000b30: 7468 6520 7265 706f 7274 2e22 203a 7479 the report." :ty │ │ │ -00000b40: 7065 2027 2872 6570 6561 7420 3a63 7573 pe '(repeat :cus │ │ │ -00000b50: 746f 6d2d 7368 6f77 2074 203a 646f 6375 tom-show t :docu │ │ │ -00000b60: 6d65 6e74 6174 696f 6e2d 7368 6f77 6e20 mentation-shown │ │ │ -00000b70: 7420 7265 6765 7870 2920 3a67 726f 7570 t regexp) :group │ │ │ -00000b80: 2027 6275 696c 642d 7265 706f 7274 290a 'build-report). │ │ │ -00000b90: 2863 7573 746f 6d2d 6465 636c 6172 652d (custom-declare- │ │ │ -00000ba0: 7661 7269 6162 6c65 2027 6275 696c 642d variable 'build- │ │ │ -00000bb0: 7265 706f 7274 2d6d 616b 652d 6f75 7470 report-make-outp │ │ │ -00000bc0: 7574 2d64 6972 2027 2863 6f6e 6420 2828 ut-dir '(cond (( │ │ │ -00000bd0: 6571 7561 6c20 7379 7374 656d 2d74 7970 equal system-typ │ │ │ -00000be0: 6520 2777 696e 646f 7773 2d6e 7429 2028 e 'windows-nt) ( │ │ │ -00000bf0: 6578 7061 6e64 2d66 696c 652d 6e61 6d65 expand-file-name │ │ │ -00000c00: 2022 6e74 2220 2867 6574 6861 7368 2027 "nt" (gethash ' │ │ │ -00000c10: 626c 6464 6972 2028 636f 6e66 6967 2d76 blddir (config-v │ │ │ -00000c20: 616c 7565 2d68 6173 682d 7461 626c 6529 alue-hash-table) │ │ │ -00000c30: 2929 2920 2874 2028 6765 7468 6173 6820 ))) (t (gethash │ │ │ -00000c40: 2762 6c64 6469 7220 2863 6f6e 6669 672d 'blddir (config- │ │ │ -00000c50: 7661 6c75 652d 6861 7368 2d74 6162 6c65 value-hash-table │ │ │ -00000c60: 2929 2929 2022 2a44 6972 6563 746f 7279 )))) "*Directory │ │ │ -00000c70: 2077 6865 7265 2074 6865 2062 7569 6c64 where the build │ │ │ -00000c80: 2072 6570 6f72 7420 6669 6c65 2069 7320 report file is │ │ │ -00000c90: 666f 756e 642e 5c6e 2020 4966 2074 6869 found.\n If thi │ │ │ -00000ca0: 7320 6973 2065 6d70 7479 206f 7220 6e69 s is empty or ni │ │ │ -00000cb0: 6c2c 2074 6865 2064 6566 6175 6c74 2c20 l, the default, │ │ │ -00000cc0: 6974 2069 7320 7265 706c 6163 6564 2062 it is replaced b │ │ │ -00000cd0: 7920 7468 6520 7661 6c75 6520 6f66 5c6e y the value of\n │ │ │ -00000ce0: 2020 7468 6520 5845 6d61 6373 2062 7569 the XEmacs bui │ │ │ -00000cf0: 6c64 2064 6972 6563 746f 7279 2e22 203a ld directory." : │ │ │ -00000d00: 7479 7065 2027 2864 6972 6563 746f 7279 type '(directory │ │ │ -00000d10: 203a 6375 7374 6f6d 2d73 686f 7720 7420 :custom-show t │ │ │ -00000d20: 3a64 6f63 756d 656e 7461 7469 6f6e 2d73 :documentation-s │ │ │ -00000d30: 686f 776e 2074 2920 3a67 726f 7570 2027 hown t) :group ' │ │ │ -00000d40: 6275 696c 642d 7265 706f 7274 290a 2863 build-report).(c │ │ │ -00000d50: 7573 746f 6d2d 6465 636c 6172 652d 7661 ustom-declare-va │ │ │ -00000d60: 7269 6162 6c65 2027 6275 696c 642d 7265 riable 'build-re │ │ │ -00000d70: 706f 7274 2d6d 616b 652d 6f75 7470 7574 port-make-output │ │ │ -00000d80: 2d66 696c 6573 2027 286c 6973 7420 2262 -files '(list "b │ │ │ -00000d90: 6574 612e 6572 7222 2022 7865 6d61 6373 eta.err" "xemacs │ │ │ -00000da0: 2d6d 616b 652d 616c 6c2e 6572 7222 2022 -make-all.err" " │ │ │ -00000db0: 7865 6d61 6373 2d6d 616b 652d 6368 6563 xemacs-make-chec │ │ │ -00000dc0: 6b2d 7465 6d61 6373 2e65 7272 2220 2278 k-temacs.err" "x │ │ │ -00000dd0: 656d 6163 732d 6d61 6b65 2d63 6865 636b emacs-make-check │ │ │ -00000de0: 2e65 7272 2220 2278 656d 6163 732d 6d61 .err" "xemacs-ma │ │ │ -00000df0: 6b65 2d69 6e73 7461 6c6c 2e65 7272 2229 ke-install.err") │ │ │ -00000e00: 2022 2a4c 6973 7420 6f66 2046 696c 656e "*List of Filen │ │ │ -00000e10: 616d 6573 2077 6865 7265 2073 7464 6f75 ames where stdou │ │ │ -00000e20: 7420 616e 6420 7374 6465 7272 206f 6620 t and stderr of │ │ │ -00000e30: 5845 6d61 6373 206d 616b 6520 7072 6f63 XEmacs make proc │ │ │ -00000e40: 6573 735c 6e68 6176 6520 6265 656e 2073 ess\nhave been s │ │ │ -00000e50: 746f 7265 642e 2020 5468 6573 6520 6172 tored. These ar │ │ │ -00000e60: 6520 7265 6c61 7469 7665 2074 6f5c 6e60 e relative to\n` │ │ │ -00000e70: 6275 696c 642d 7265 706f 7274 2d6d 616b build-report-mak │ │ │ -00000e80: 652d 6f75 7470 7574 2d64 6972 602e 2020 e-output-dir`. │ │ │ -00000e90: 596f 7527 6c6c 2068 6176 6520 746f 2072 You'll have to r │ │ │ -00000ea0: 756e 206d 616b 6520 7769 7468 206f 7574 un make with out │ │ │ -00000eb0: 7075 745c 6e72 6564 6972 6563 7469 6f6e put\nredirection │ │ │ -00000ec0: 206f 7220 7573 6520 7468 6520 6062 7569 or use the `bui │ │ │ -00000ed0: 6c64 2720 5845 6d61 6373 2070 6163 6b61 ld' XEmacs packa │ │ │ -00000ee0: 6765 2074 6f20 7361 7665 2074 6869 7320 ge to save this │ │ │ -00000ef0: 6f75 7470 7574 2e20 596f 755c 6e6d 6179 output. You\nmay │ │ │ -00000f00: 2075 7365 2066 6f6c 6c6f 7769 6e67 2061 use following a │ │ │ -00000f10: 6c69 6173 5c6e 5c6e 616c 6961 7320 6d6b lias\n\nalias mk │ │ │ -00000f20: 2027 6d61 6b65 2021 2a20 3e3e 2621 2021 'make !* >>&! ! │ │ │ -00000f30: 242e 6572 7220 2627 5c6e 5c6e 756e 6465 $.err &'\n\nunde │ │ │ -00000f40: 7220 6373 682c 2073 6f20 7468 6174 2079 r csh, so that y │ │ │ -00000f50: 6f75 2067 6574 2062 6574 612e 6572 7220 ou get beta.err │ │ │ -00000f60: 7768 656e 2079 6f75 2072 756e 2060 6d6b when you run `mk │ │ │ -00000f70: 2062 6574 6127 2e22 203a 7479 7065 2027 beta'." :type ' │ │ │ -00000f80: 2872 6570 6561 7420 3a63 7573 746f 6d2d (repeat :custom- │ │ │ -00000f90: 7368 6f77 2074 203a 646f 6375 6d65 6e74 show t :document │ │ │ -00000fa0: 6174 696f 6e2d 7368 6f77 6e20 7420 6669 ation-shown t fi │ │ │ -00000fb0: 6c65 2920 3a67 726f 7570 2027 6275 696c le) :group 'buil │ │ │ -00000fc0: 642d 7265 706f 7274 290a 2863 7573 746f d-report).(custo │ │ │ -00000fd0: 6d2d 6465 636c 6172 652d 7661 7269 6162 m-declare-variab │ │ │ -00000fe0: 6c65 2027 6275 696c 642d 7265 706f 7274 le 'build-report │ │ │ -00000ff0: 2d69 6e73 7461 6c6c 6174 696f 6e2d 6669 -installation-fi │ │ │ -00001000: 6c65 2027 2865 7870 616e 642d 6669 6c65 le '(expand-file │ │ │ -00001010: 2d6e 616d 6520 2249 6e73 7461 6c6c 6174 -name "Installat │ │ │ -00001020: 696f 6e22 2028 6765 7468 6173 6820 2762 ion" (gethash 'b │ │ │ -00001030: 6c64 6469 7220 2863 6f6e 6669 672d 7661 lddir (config-va │ │ │ -00001040: 6c75 652d 6861 7368 2d74 6162 6c65 2929 lue-hash-table)) │ │ │ -00001050: 2920 222a 496e 7374 616c 6c61 7469 6f6e ) "*Installation │ │ │ -00001060: 2066 696c 6520 7072 6f64 7563 6564 2062 file produced b │ │ │ -00001070: 7920 5845 6d61 6373 2063 6f6e 6669 6775 y XEmacs configu │ │ │ -00001080: 7265 2070 726f 6365 7373 2e22 203a 7479 re process." :ty │ │ │ -00001090: 7065 2027 2866 696c 6520 3a63 7573 746f pe '(file :custo │ │ │ -000010a0: 6d2d 7368 6f77 2074 203a 646f 6375 6d65 m-show t :docume │ │ │ -000010b0: 6e74 6174 696f 6e2d 7368 6f77 6e20 7429 ntation-shown t) │ │ │ -000010c0: 203a 6772 6f75 7020 2762 7569 6c64 2d72 :group 'build-r │ │ │ -000010d0: 6570 6f72 7429 0a28 6375 7374 6f6d 2d64 eport).(custom-d │ │ │ -000010e0: 6563 6c61 7265 2d76 6172 6961 626c 6520 eclare-variable │ │ │ -000010f0: 2762 7569 6c64 2d72 6570 6f72 742d 7665 'build-report-ve │ │ │ -00001100: 7273 696f 6e2d 6669 6c65 2027 2865 7870 rsion-file '(exp │ │ │ -00001110: 616e 642d 6669 6c65 2d6e 616d 6520 2276 and-file-name "v │ │ │ -00001120: 6572 7369 6f6e 2e73 6822 2028 6765 7468 ersion.sh" (geth │ │ │ -00001130: 6173 6820 2762 6c64 6469 7220 2863 6f6e ash 'blddir (con │ │ │ -00001140: 6669 672d 7661 6c75 652d 6861 7368 2d74 fig-value-hash-t │ │ │ -00001150: 6162 6c65 2929 2920 222a 7665 7273 696f able))) "*versio │ │ │ -00001160: 6e2e 7368 2066 696c 6520 6964 656e 7469 n.sh file identi │ │ │ -00001170: 6679 696e 6720 5845 6d61 6373 2028 4265 fying XEmacs (Be │ │ │ -00001180: 7461 2920 4469 7374 7269 6275 7469 6f6e ta) Distribution │ │ │ -00001190: 2e22 203a 7479 7065 2027 2866 696c 6520 ." :type '(file │ │ │ -000011a0: 3a63 7573 746f 6d2d 7368 6f77 2074 203a :custom-show t : │ │ │ -000011b0: 646f 6375 6d65 6e74 6174 696f 6e2d 7368 documentation-sh │ │ │ -000011c0: 6f77 6e20 7429 203a 6772 6f75 7020 2762 own t) :group 'b │ │ │ -000011d0: 7569 6c64 2d72 6570 6f72 7429 0a28 6375 uild-report).(cu │ │ │ -000011e0: 7374 6f6d 2d64 6563 6c61 7265 2d76 6172 stom-declare-var │ │ │ -000011f0: 6961 626c 6520 2762 7569 6c64 2d72 6570 iable 'build-rep │ │ │ -00001200: 6f72 742d 696e 7374 616c 6c61 7469 6f6e ort-installation │ │ │ -00001210: 2d69 6e73 6572 742d 616c 6c20 276e 696c -insert-all 'nil │ │ │ -00001220: 2022 2a54 656c 6c20 6275 696c 642d 7265 "*Tell build-re │ │ │ -00001230: 706f 7274 2074 6f20 696e 7365 7274 2074 port to insert t │ │ │ -00001240: 6865 2077 686f 6c65 2049 6e73 7461 6c6c he whole Install │ │ │ -00001250: 6174 696f 6e20 6669 6c65 5c6e 2020 696e ation file\n in │ │ │ -00001260: 7374 6561 6420 6f66 206a 7573 7420 7468 stead of just th │ │ │ -00001270: 6520 6c61 7374 2072 6570 6f72 742e 2220 e last report." │ │ │ -00001280: 3a74 7970 6520 2762 6f6f 6c65 616e 203a :type 'boolean : │ │ │ -00001290: 6772 6f75 7020 2762 7569 6c64 2d72 6570 group 'build-rep │ │ │ -000012a0: 6f72 7429 0a28 6375 7374 6f6d 2d64 6563 ort).(custom-dec │ │ │ -000012b0: 6c61 7265 2d76 6172 6961 626c 6520 2762 lare-variable 'b │ │ │ -000012c0: 7569 6c64 2d72 6570 6f72 742d 7375 626a uild-report-subj │ │ │ -000012d0: 6563 7420 2728 636f 6e63 6174 2022 5b25 ect '(concat "[% │ │ │ -000012e0: 735d 2022 2065 6d61 6373 2d76 6572 7369 s] " emacs-versi │ │ │ -000012f0: 6f6e 2022 206f 6e20 2220 7379 7374 656d on " on " system │ │ │ -00001300: 2d63 6f6e 6669 6775 7261 7469 6f6e 2920 -configuration) │ │ │ -00001310: 222a 5845 6d61 6373 2042 7569 6c64 2052 "*XEmacs Build R │ │ │ -00001320: 6570 6f72 7420 5375 626a 6563 7420 4c69 eport Subject Li │ │ │ -00001330: 6e65 2e20 2573 2d73 6571 7565 6e63 6573 ne. %s-sequences │ │ │ -00001340: 2077 696c 6c20 6265 2073 7562 7374 6974 will be substit │ │ │ -00001350: 7574 6564 5c6e 2020 7769 7468 2075 7365 uted\n with use │ │ │ -00001360: 7220 696e 7075 7420 7468 726f 7567 6820 r input through │ │ │ -00001370: 6062 7569 6c64 2d72 6570 6f72 7427 2061 `build-report' a │ │ │ -00001380: 6363 6f72 6469 6e67 2074 6f5c 6e20 2060 ccording to\n ` │ │ │ -00001390: 6275 696c 642d 7265 706f 7274 2d70 726f build-report-pro │ │ │ -000013a0: 6d70 7473 2720 7573 696e 6720 6066 6f72 mpts' using `for │ │ │ -000013b0: 6d61 7427 2e22 203a 7479 7065 2027 2873 mat'." :type '(s │ │ │ -000013c0: 7472 696e 6720 3a63 7573 746f 6d2d 7368 tring :custom-sh │ │ │ -000013d0: 6f77 2074 203a 646f 6375 6d65 6e74 6174 ow t :documentat │ │ │ -000013e0: 696f 6e2d 7368 6f77 6e20 7429 203a 6772 ion-shown t) :gr │ │ │ -000013f0: 6f75 7020 2762 7569 6c64 2d72 6570 6f72 oup 'build-repor │ │ │ -00001400: 7429 0a28 6375 7374 6f6d 2d64 6563 6c61 t).(custom-decla │ │ │ -00001410: 7265 2d76 6172 6961 626c 6520 2762 7569 re-variable 'bui │ │ │ -00001420: 6c64 2d72 6570 6f72 742d 7072 6f6d 7074 ld-report-prompt │ │ │ -00001430: 7320 2727 2828 2253 7461 7475 733f 3a20 s ''(("Status?: │ │ │ -00001440: 2220 2822 5375 6363 6573 7322 2022 4661 " ("Success" "Fa │ │ │ -00001450: 696c 7572 6522 2929 2920 222a 5845 6d61 ilure"))) "*XEma │ │ │ -00001460: 6373 2042 7569 6c64 2052 6570 6f72 7420 cs Build Report │ │ │ -00001470: 5072 6f6d 7074 2873 292e 2054 6869 7320 Prompt(s). This │ │ │ -00001480: 6973 2061 206c 6973 7420 6f66 2070 726f is a list of pro │ │ │ -00001490: 6d70 742d 7374 7269 6e67 5c6e 2020 6c69 mpt-string\n li │ │ │ -000014a0: 7374 7320 7573 6564 2062 7920 6062 7569 sts used by `bui │ │ │ -000014b0: 6c64 2d72 6570 6f72 7427 2069 6e20 636f ld-report' in co │ │ │ -000014c0: 6e6a 756e 6374 696f 6e20 7769 7468 5c6e njunction with\n │ │ │ -000014d0: 2020 6062 7569 6c64 2d72 6570 6f72 742d `build-report- │ │ │ -000014e0: 7375 626a 6563 7427 2e20 4561 6368 206c subject'. Each l │ │ │ -000014f0: 6973 7420 636f 6e73 6973 7473 206f 6620 ist consists of │ │ │ -00001500: 6120 7072 6f6d 7074 2073 7472 696e 675c a prompt string\ │ │ │ -00001510: 6e20 2066 6f6c 6c6f 7765 6420 6279 2061 n followed by a │ │ │ -00001520: 6e79 206e 756d 6265 7220 6f66 2073 7472 ny number of str │ │ │ -00001530: 696e 6773 2077 6869 6368 2063 616e 2062 ings which can b │ │ │ -00001540: 6520 6368 6f73 656e 2076 6961 2074 6865 e chosen via the │ │ │ -00001550: 2068 6973 746f 7279 5c6e 2020 6d65 6368 history\n mech │ │ │ -00001560: 616e 6973 6d2e 2220 3a74 7970 6520 2728 anism." :type '( │ │ │ -00001570: 7265 7065 6174 203a 6375 7374 6f6d 2d73 repeat :custom-s │ │ │ -00001580: 686f 7720 7420 3a64 6f63 756d 656e 7461 how t :documenta │ │ │ -00001590: 7469 6f6e 2d73 686f 776e 2074 2028 6c69 tion-shown t (li │ │ │ -000015a0: 7374 203a 7461 6720 2250 726f 6d70 7422 st :tag "Prompt" │ │ │ -000015b0: 2073 7472 696e 6720 2872 6570 6561 7420 string (repeat │ │ │ -000015c0: 3a74 6167 2022 5661 6c75 6573 2220 7374 :tag "Values" st │ │ │ -000015d0: 7269 6e67 2929 2920 3a67 726f 7570 2027 ring))) :group ' │ │ │ -000015e0: 6275 696c 642d 7265 706f 7274 290a 2863 build-report).(c │ │ │ -000015f0: 7573 746f 6d2d 6465 636c 6172 652d 7661 ustom-declare-va │ │ │ -00001600: 7269 6162 6c65 2027 6275 696c 642d 7265 riable 'build-re │ │ │ -00001610: 706f 7274 2d66 696c 652d 656e 636f 6469 port-file-encodi │ │ │ -00001620: 6e67 2027 2237 6269 7422 2022 2a58 456d ng '"7bit" "*XEm │ │ │ -00001630: 6163 7320 4275 696c 6420 5265 706f 7274 acs Build Report │ │ │ -00001640: 2046 696c 6520 456e 636f 6469 6e67 2074 File Encoding t │ │ │ -00001650: 6f20 6265 2075 7365 6420 7768 656e 204d o be used when M │ │ │ -00001660: 494d 4520 7375 7070 6f72 7420 6973 5c6e IME support is\n │ │ │ -00001670: 2020 6176 6169 6c61 626c 652e 2220 3a67 available." :g │ │ │ -00001680: 726f 7570 2027 6275 696c 642d 7265 706f roup 'build-repo │ │ │ -00001690: 7274 290a 2862 7974 652d 636f 6465 2022 rt).(byte-code " │ │ │ -000016a0: c0c1 21ab 9ec2 c321 ac85 c4c3 c55c 2288 ..!....!.....\". │ │ │ -000016b0: c2c6 21ac 85c4 c6c7 5c22 88c2 c821 ac85 ..!.....\"...!.. │ │ │ -000016c0: c4c8 c95c 2288 c087 2220 5b66 6561 7475 ...\"..." [featu │ │ │ -000016d0: 7265 7020 6d69 6d65 2d73 6574 7570 2066 rep mime-setup f │ │ │ -000016e0: 626f 756e 6470 206d 696d 652d 6564 6974 boundp mime-edit │ │ │ -000016f0: 2d63 6f6e 7465 6e74 2d62 6567 696e 6e69 -content-beginni │ │ │ -00001700: 6e67 2064 6566 616c 6961 7320 6d69 6d65 ng defalias mime │ │ │ -00001710: 2d65 6469 746f 722f 636f 6e74 656e 742d -editor/content- │ │ │ -00001720: 6265 6769 6e6e 696e 6720 6d69 6d65 2d65 beginning mime-e │ │ │ -00001730: 6469 742d 696e 7365 7274 2d74 6167 206d dit-insert-tag m │ │ │ -00001740: 696d 652d 6564 6974 6f72 2f69 6e73 6572 ime-editor/inser │ │ │ -00001750: 742d 7461 6720 6d69 6d65 2d65 6469 742d t-tag mime-edit- │ │ │ -00001760: 696e 7365 7274 2d62 696e 6172 792d 6669 insert-binary-fi │ │ │ -00001770: 6c65 206d 696d 652d 6564 6974 6f72 2f69 le mime-editor/i │ │ │ -00001780: 6e73 6572 742d 6269 6e61 7279 2d66 696c nsert-binary-fil │ │ │ -00001790: 655d 2033 290a 2340 3538 2052 6574 7572 e] 3).#@58 Retur │ │ │ -000017a0: 6e73 2074 6865 2066 696c 656e 616d 6520 ns the filename │ │ │ -000017b0: 7468 6520 5845 6d61 6373 206d 616b 6520 the XEmacs make │ │ │ -000017c0: 6f75 7470 7574 2069 7320 7361 7665 6420 output is saved │ │ │ -000017d0: 696e 2e1f 0a28 6465 6661 6c69 6173 2027 in...(defalias ' │ │ │ -000017e0: 6275 696c 642d 7265 706f 7274 2d6d 616b build-report-mak │ │ │ -000017f0: 652d 6f75 7470 7574 2d67 6574 2023 5b6e e-output-get #[n │ │ │ -00001800: 696c 2022 09c2 98ac 8309 ac85 c3c4 085c il "...........\ │ │ │ -00001810: 2287 c3c5 085c 2287 2220 5b62 7569 6c64 "....\"." [build │ │ │ -00001820: 2d72 6570 6f72 742d 6d61 6b65 2d6f 7574 -report-make-out │ │ │ -00001830: 7075 742d 6669 6c65 7320 6275 696c 642d put-files build- │ │ │ -00001840: 7265 706f 7274 2d6d 616b 652d 6f75 7470 report-make-outp │ │ │ -00001850: 7574 2d64 6972 2022 2220 6d61 7063 6172 ut-dir "" mapcar │ │ │ -00001860: 2023 5b28 6629 2022 c108 c2c3 c4c5 205c #[(f) "...... \ │ │ │ -00001870: 2221 5c22 8722 205b 6620 6578 7061 6e64 "!\"." [f expand │ │ │ -00001880: 2d66 696c 652d 6e61 6d65 2066 696c 652d -file-name file- │ │ │ -00001890: 6e61 6d65 2d61 732d 6469 7265 6374 6f72 name-as-director │ │ │ -000018a0: 7920 6765 7468 6173 6820 626c 6464 6972 y gethash blddir │ │ │ -000018b0: 2063 6f6e 6669 672d 7661 6c75 652d 6861 config-value-ha │ │ │ -000018c0: 7368 2d74 6162 6c65 5d20 365d 2023 5b28 sh-table] 6] #[( │ │ │ -000018d0: 6629 2022 c209 c308 215c 2287 2220 5b62 f) "....!\"." [b │ │ │ -000018e0: 7569 6c64 2d72 6570 6f72 742d 6d61 6b65 uild-report-make │ │ │ -000018f0: 2d6f 7574 7075 742d 6469 7220 6620 6578 -output-dir f ex │ │ │ -00001900: 7061 6e64 2d66 696c 652d 6e61 6d65 2066 pand-file-name f │ │ │ -00001910: 696c 652d 6e61 6d65 2d61 732d 6469 7265 ile-name-as-dire │ │ │ -00001920: 6374 6f72 795d 2034 5d5d 2033 2028 2324 ctory] 4]] 3 (#$ │ │ │ -00001930: 202e 2036 3034 3329 206e 696c 5d29 0a23 . 6043) nil]).# │ │ │ -00001940: 4037 3934 2052 6570 6f72 7420 6275 696c @794 Report buil │ │ │ -00001950: 6420 696e 666f 726d 6174 696f 6e20 696e d information in │ │ │ -00001960: 636c 7564 696e 6720 496e 7374 616c 6c61 cluding Installa │ │ │ -00001970: 7469 6f6e 2061 6e64 206d 616b 6520 6f75 tion and make ou │ │ │ -00001980: 7470 7574 2e0a 0a50 726f 6d70 7473 2066 tput...Prompts f │ │ │ -00001990: 6f72 2073 7461 7475 7320 2875 7375 616c or status (usual │ │ │ -000019a0: 6c79 2022 5375 6363 6573 7322 206f 7220 ly "Success" or │ │ │ -000019b0: 2246 6169 6c75 7265 2229 2e20 2054 6865 "Failure"). The │ │ │ -000019c0: 6e20 7573 6573 0a60 636f 6d70 6f73 652d n uses.`compose- │ │ │ -000019d0: 6d61 696c 2720 746f 2063 7265 6174 6520 mail' to create │ │ │ -000019e0: 6120 6d61 696c 206d 6573 7361 6765 2e20 a mail message. │ │ │ -000019f0: 2054 6865 2053 7562 6a65 6374 2068 6561 The Subject hea │ │ │ -00001a00: 6465 7220 636f 6e74 6169 6e73 0a73 7461 der contains.sta │ │ │ -00001a10: 7475 7320 616e 6420 7665 7273 696f 6e20 tus and version │ │ │ -00001a20: 696e 666f 726d 6174 696f 6e2e 2020 506f information. Po │ │ │ -00001a30: 696e 7420 6973 206c 6566 7420 6174 2074 int is left at t │ │ │ -00001a40: 6865 2062 6567 696e 6e69 6e67 206f 6620 he beginning of │ │ │ -00001a50: 7468 650a 6d61 696c 2074 6578 742e 2020 the.mail text. │ │ │ -00001a60: 4164 6420 736f 6d65 206e 6f74 6573 2069 Add some notes i │ │ │ -00001a70: 6620 796f 7520 6c69 6b65 2c20 616e 6420 f you like, and │ │ │ -00001a80: 7365 6e64 2074 6865 2072 6570 6f72 742e send the report. │ │ │ -00001a90: 0a0a 4c6f 6f6b 7320 666f 7220 496e 7374 ..Looks for Inst │ │ │ -00001aa0: 616c 6c61 7469 6f6e 2061 6e64 2074 6865 allation and the │ │ │ -00001ab0: 206d 616b 6520 6f75 7470 7574 2066 696c make output fil │ │ │ -00001ac0: 6520 2860 6265 7461 2e65 7272 2720 6279 e (`beta.err' by │ │ │ -00001ad0: 0a64 6566 6175 6c74 2c20 6375 7374 6f6d .default, custom │ │ │ -00001ae0: 697a 6162 6c65 2076 6961 2060 6275 696c izable via `buil │ │ │ -00001af0: 642d 7265 706f 7274 2d6d 616b 652d 6f75 d-report-make-ou │ │ │ -00001b00: 7470 7574 2d66 696c 6573 2729 2069 6e20 tput-files') in │ │ │ -00001b10: 7468 650a 6275 696c 6420 6469 7265 6374 the.build direct │ │ │ -00001b20: 6f72 7920 6f66 2074 6865 2072 756e 6e69 ory of the runni │ │ │ -00001b30: 6e67 2058 456d 6163 7320 6279 2064 6566 ng XEmacs by def │ │ │ -00001b40: 6175 6c74 2028 6375 7374 6f6d 697a 6162 ault (customizab │ │ │ -00001b50: 6c65 2076 6961 0a60 6275 696c 642d 7265 le via.`build-re │ │ │ -00001b60: 706f 7274 2d6d 616b 652d 6f75 7470 7574 port-make-output │ │ │ -00001b70: 2d64 6972 2729 2e20 2054 6865 206f 7574 -dir'). The out │ │ │ -00001b80: 7075 7420 6672 6f6d 206d 616b 6520 6973 put from make is │ │ │ -00001b90: 2066 696c 7465 7265 640a 7468 726f 7567 filtered.throug │ │ │ -00001ba0: 6820 6062 7569 6c64 2d72 6570 6f72 742d h `build-report- │ │ │ -00001bb0: 6b65 6570 2d72 6567 6578 7027 2061 6e64 keep-regexp' and │ │ │ -00001bc0: 2060 6275 696c 642d 7265 706f 7274 2d64 `build-report-d │ │ │ -00001bd0: 656c 6574 652d 7265 6765 7870 270a 6265 elete-regexp'.be │ │ │ -00001be0: 666f 7265 2069 6e63 6c75 6469 6e67 2069 fore including i │ │ │ -00001bf0: 6e20 7468 6520 6d65 7373 6167 652e 0a0a n the message... │ │ │ -00001c00: 5365 6520 616c 736f 2060 6d61 696c 2d75 See also `mail-u │ │ │ -00001c10: 7365 722d 6167 656e 7427 2c20 6062 7569 ser-agent', `bui │ │ │ -00001c20: 6c64 2d72 6570 6f72 742d 6465 7374 696e ld-report-destin │ │ │ -00001c30: 6174 696f 6e27 2c20 616e 640a 6062 7569 ation', and.`bui │ │ │ -00001c40: 6c64 2d72 6570 6f72 742d 696e 7374 616c ld-report-instal │ │ │ -00001c50: 6c61 7469 6f6e 2d66 696c 6527 2e1f 0a28 lation-file'...( │ │ │ -00001c60: 6465 6661 6c69 6173 2027 6275 696c 642d defalias 'build- │ │ │ -00001c70: 7265 706f 7274 2023 5b28 2672 6573 7420 report #[(&rest │ │ │ -00001c80: 6172 6773 2920 228a c65c 6e21 abac c75c args) "..\n!...\ │ │ │ -00001c90: 6e21 891d 4019 0d41 4018 c80d 381e 1bc9 n!..@..A@...8... │ │ │ -00001ca0: 0d38 1e1c ca0d 381e 20cb cc09 080e 1b0e .8....8. ....... │ │ │ -00001cb0: 1c0e 2026 0616 1e2e 06aa a9cd 0e21 2189 .. &.........!!. │ │ │ -00001cc0: 1e1d 4019 0e1d 4140 18c8 0e1d 381e 1bc9 ..@...A@....8... │ │ │ -00001cd0: 0e1d 381e 1ccb cc09 080e 1b0e 1c0e 5c22 ..8...........\" │ │ │ -00001ce0: 2606 161e 2dce 0e11 3cab 89cf d00e 1140 &...-...<......@ │ │ │ -00001cf0: d123 aa85 cfd0 0e11 5c22 d2cb 0e1e 0e23 .#......\".....# │ │ │ -00001d00: 23d3 8989 8989 2607 8860 1cd4 d520 2189 #.....&..`... !. │ │ │ -00001d10: 1e1f 4089 1bab a1c6 0b21 ab88 d60c 0b5c ..@......!.....\ │ │ │ -00001d20: 2263 88aa 86cb d70b 5c22 6388 d863 880e "c......\"c..c.. │ │ │ -00001d30: 1f41 8916 1f40 8913 ac5f c65c 6e21 ab89 .A...@..._.\n!.. │ │ │ -00001d40: d90c 0e24 5c22 6388 aa86 cbd7 5c6e 5c22 ...$\"c.....\n\" │ │ │ -00001d50: 6388 d863 88da 0c21 6388 0c62 2c87 2220 c..c...!c..b,." │ │ │ -00001d60: 5b6d 696e 6f72 206d 616a 6f72 2062 7569 [minor major bui │ │ │ -00001d70: 6c64 2d72 6570 6f72 742d 696e 7374 616c ld-report-instal │ │ │ -00001d80: 6c61 7469 6f6e 2d66 696c 6520 6669 6c65 lation-file file │ │ │ -00001d90: 2072 6570 6f72 742d 6265 6769 6e20 2331 report-begin #1 │ │ │ -00001da0: 3d23 3a47 3931 3532 3320 6669 6c65 2d65 =#:G91523 file-e │ │ │ -00001db0: 7869 7374 732d 7020 6275 696c 642d 7265 xists-p build-re │ │ │ -00001dc0: 706f 7274 2d69 6e73 7461 6c6c 6174 696f port-installatio │ │ │ -00001dd0: 6e2d 6461 7461 2032 2033 2034 2066 6f72 n-data 2 3 4 for │ │ │ -00001de0: 6d61 7420 225b 2525 735d 2058 456d 6163 mat "[%%s] XEmac │ │ │ -00001df0: 7320 2573 2e25 7325 7320 5c22 2573 5c22 s %s.%s%s \"%s\" │ │ │ -00001e00: 2c20 2573 2220 6275 696c 642d 7265 706f , %s" build-repo │ │ │ -00001e10: 7274 2d76 6572 7369 6f6e 2d66 696c 652d rt-version-file- │ │ │ -00001e20: 6461 7461 2063 6f6d 706f 7365 2d6d 6169 data compose-mai │ │ │ -00001e30: 6c20 7265 6164 2d73 7472 696e 6720 2242 l read-string "B │ │ │ -00001e40: 7569 6c64 2052 6570 6f72 7420 4465 7374 uild Report Dest │ │ │ -00001e50: 696e 6174 696f 6e3a 2022 2062 7569 6c64 ination: " build │ │ │ -00001e60: 2d72 6570 6f72 742d 6465 7374 696e 6174 -report-destinat │ │ │ -00001e70: 696f 6e20 6170 706c 7920 6e69 6c20 7265 ion apply nil re │ │ │ -00001e80: 7665 7273 6520 6275 696c 642d 7265 706f verse build-repo │ │ │ -00001e90: 7274 2d6d 616b 652d 6f75 7470 7574 2d67 rt-make-output-g │ │ │ -00001ea0: 6574 2062 7569 6c64 2d72 6570 6f72 742d et build-report- │ │ │ -00001eb0: 696e 7365 7274 2d6d 616b 652d 6f75 7470 insert-make-outp │ │ │ -00001ec0: 7574 2022 2573 206e 6f74 2066 6f75 6e64 ut "%s not found │ │ │ -00001ed0: 215c 6e22 2022 5c6e 2220 6275 696c 642d !\n" "\n" build- │ │ │ -00001ee0: 7265 706f 7274 2d69 6e73 6572 742d 696e report-insert-in │ │ │ -00001ef0: 7374 616c 6c61 7469 6f6e 2d66 696c 6520 stallation-file │ │ │ -00001f00: 6275 696c 642d 7265 706f 7274 2d69 6e73 build-report-ins │ │ │ -00001f10: 6572 742d 6865 6164 6572 2062 6574 6120 ert-header beta │ │ │ -00001f20: 636f 6465 6e61 6d65 2023 323d 233a 4739 codename #2=#:G9 │ │ │ -00001f30: 3135 3234 2062 7569 6c64 2d72 6570 6f72 1524 build-repor │ │ │ -00001f40: 742d 7375 626a 6563 7420 6669 6c65 7320 t-subject files │ │ │ -00001f50: 636f 6e66 6967 7572 6174 696f 6e20 6275 configuration bu │ │ │ -00001f60: 696c 642d 7265 706f 7274 2d76 6572 7369 ild-report-versi │ │ │ -00001f70: 6f6e 2d66 696c 6520 7379 7374 656d 2d63 on-file system-c │ │ │ -00001f80: 6f6e 6669 6775 7261 7469 6f6e 2061 7267 onfiguration arg │ │ │ -00001f90: 7320 6275 696c 642d 7265 706f 7274 2d69 s build-report-i │ │ │ -00001fa0: 6e73 7461 6c6c 6174 696f 6e2d 696e 7365 nstallation-inse │ │ │ -00001fb0: 7274 2d61 6c6c 5d20 3920 2823 2420 2e20 rt-all] 9 (#$ . │ │ │ -00001fc0: 3634 3639 2920 2862 7974 652d 636f 6465 6469) (byte-code │ │ │ -00001fd0: 2022 c589 8908 1c1b 1a19 0cab 9d0c 4040 "............@@ │ │ │ -00001fe0: 110c 4041 8912 403c ab83 5c6e 4012 0c41 ..@A..@<..\n@..A │ │ │ -00001ff0: 14c6 09c7 c223 0b42 13aa 600b 2c87 2220 .....#.B..`.,." │ │ │ -00002000: 5b62 7569 6c64 2d72 6570 6f72 742d 7072 [build-report-pr │ │ │ -00002010: 6f6d 7074 7320 7072 6f6d 7074 2068 6973 ompts prompt his │ │ │ -00002020: 7420 6172 6720 7072 6f6d 7074 7320 6e69 t arg prompts ni │ │ │ -00002030: 6c20 7265 6164 2d73 7472 696e 6720 2222 l read-string "" │ │ │ -00002040: 5d20 3529 5d29 0a23 4036 3820 496e 7365 ] 5)]).#@68 Inse │ │ │ -00002050: 7274 7320 7468 6520 6275 696c 642d 7265 rts the build-re │ │ │ -00002060: 706f 7274 2d68 6561 6465 7220 6174 2074 port-header at t │ │ │ -00002070: 6865 2070 6f69 6e74 2073 7065 6369 6669 he point specifi │ │ │ -00002080: 6564 2062 7920 6077 6865 7265 272e 1f0a ed by `where'... │ │ │ -00002090: 2864 6566 616c 6961 7320 2762 7569 6c64 (defalias 'build │ │ │ -000020a0: 2d72 6570 6f72 742d 696e 7365 7274 2d68 -report-insert-h │ │ │ -000020b0: 6561 6465 7220 235b 2877 6865 7265 2920 eader #[(where) │ │ │ -000020c0: 225c 6e62 88c4 c5c6 2121 1bc7 8e72 0b71 "\nb....!!...r.q │ │ │ -000020d0: 88c8 c909 0823 6388 ca20 2b87 2220 5b73 .....#c.. +." [s │ │ │ -000020e0: 7973 7465 6d2d 636f 6e66 6967 7572 6174 ystem-configurat │ │ │ -000020f0: 696f 6e20 656d 6163 732d 7665 7273 696f ion emacs-versio │ │ │ -00002100: 6e20 7768 6572 6520 2331 3d23 3a74 656d n where #1=#:tem │ │ │ -00002110: 702d 6275 6666 6572 2067 6574 2d62 7566 p-buffer get-buf │ │ │ -00002120: 6665 722d 6372 6561 7465 2067 656e 6572 fer-create gener │ │ │ -00002130: 6174 652d 6e65 772d 6275 6666 6572 2d6e ate-new-buffer-n │ │ │ -00002140: 616d 6520 2220 2a74 656d 702a 2220 2828 ame " *temp*" (( │ │ │ -00002150: 6279 7465 2d63 6f64 6520 22c1 0821 ab84 byte-code "..!.. │ │ │ -00002160: c208 2188 c187 2220 5b23 3123 2062 7566 ..!..." [#1# buf │ │ │ -00002170: 6665 722d 6e61 6d65 206b 696c 6c2d 6275 fer-name kill-bu │ │ │ -00002180: 6666 6572 5d20 3229 2920 666f 726d 6174 ffer] 2)) format │ │ │ -00002190: 2022 5c6e 3e20 5845 6d61 6373 2042 7569 "\n> XEmacs Bui │ │ │ -000021a0: 6c64 2052 6570 6f72 7420 6765 6e65 7261 ld Report genera │ │ │ -000021b0: 7465 6420 6279 2065 6d61 6373 2d76 6572 ted by emacs-ver │ │ │ -000021c0: 7369 6f6e 5c6e 3e20 2573 5c6e 3e20 7769 sion\n> %s\n> wi │ │ │ -000021d0: 7468 2073 7973 7465 6d2d 636f 6e66 6967 th system-config │ │ │ -000021e0: 7572 6174 696f 6e5c 6e3e 2025 735c 6e3e uration\n> %s\n> │ │ │ -000021f0: 2066 6f6c 6c6f 7773 3a5c 6e5c 6e22 2062 follows:\n\n" b │ │ │ -00002200: 7566 6665 722d 7374 7269 6e67 5d20 3420 uffer-string] 4 │ │ │ -00002210: 2823 2420 2e20 3832 3638 295d 290a 2340 (#$ . 8268)]).#@ │ │ │ -00002220: 3230 3320 496e 7365 7274 7320 7468 6520 203 Inserts the │ │ │ -00002230: 6f75 7470 7574 206f 6620 7468 6520 5845 output of the XE │ │ │ -00002240: 6d61 6373 2042 6574 6120 6d61 6b65 2072 macs Beta make r │ │ │ -00002250: 756e 2069 6e20 7468 650a 6375 7272 656e un in the.curren │ │ │ -00002260: 7420 6275 6666 6572 2061 7420 706f 7369 t buffer at posi │ │ │ -00002270: 7469 6f6e 2057 4845 5245 2e0a 5468 6520 tion WHERE..The │ │ │ -00002280: 6d61 6b65 2070 726f 6365 7373 206f 7574 make process out │ │ │ -00002290: 7075 7420 6d75 7374 2068 6176 6520 6265 put must have be │ │ │ -000022a0: 656e 2073 6176 6564 2069 6e0a 6062 7569 en saved in.`bui │ │ │ -000022b0: 6c64 2d72 6570 6f72 742d 6d61 6b65 2d6f ld-report-make-o │ │ │ -000022c0: 7574 7075 742d 6669 6c65 7327 2064 7572 utput-files' dur │ │ │ -000022d0: 696e 6720 7468 6520 5845 6d61 6373 2042 ing the XEmacs B │ │ │ -000022e0: 6574 6120 6275 696c 6469 6e67 2e1f 0a28 eta building...( │ │ │ -000022f0: 6465 6661 6c69 6173 2027 6275 696c 642d defalias 'build- │ │ │ -00002300: 7265 706f 7274 2d69 6e73 6572 742d 6d61 report-insert-ma │ │ │ -00002310: 6b65 2d6f 7574 7075 7420 235b 2877 6865 ke-output #[(whe │ │ │ -00002320: 7265 2066 696c 6529 2022 0962 88c6 c7c8 re file) ".b.... │ │ │ -00002330: 2121 1bc9 8e72 0b71 88ca 0d21 abde cbcc !!...r.q...!.... │ │ │ -00002340: 21ab 93cd cecf d0d1 d20d 21d3 5223 88d4 !.........!.R#.. │ │ │ -00002350: 0d08 5c22 88aa 84d5 0d21 880c ab88 6562 ..\".....!....eb │ │ │ -00002360: 88d6 d720 2188 5c6e ab88 6562 88d8 d920 ... !.\n..eb... │ │ │ -00002370: 2188 6562 880c ab87 dadb d720 5c22 6388 !.eb....... \"c. │ │ │ -00002380: 5c6e ab8e dadc 0cab 83dd aa81 ded9 2023 \n............ # │ │ │ -00002390: 6388 df63 8865 6288 dae0 0d5c 2263 88aa c..c.eb....\"c.. │ │ │ -000023a0: 86e1 0de2 b103 88e3 202b 8722 205b 6275 ........ +." [bu │ │ │ -000023b0: 696c 642d 7265 706f 7274 2d66 696c 652d ild-report-file- │ │ │ -000023c0: 656e 636f 6469 6e67 2077 6865 7265 2062 encoding where b │ │ │ -000023d0: 7569 6c64 2d72 6570 6f72 742d 6465 6c65 uild-report-dele │ │ │ -000023e0: 7465 2d72 6567 6578 7020 2331 3d23 3a74 te-regexp #1=#:t │ │ │ -000023f0: 656d 702d 6275 6666 6572 2062 7569 6c64 emp-buffer build │ │ │ -00002400: 2d72 6570 6f72 742d 6b65 6570 2d72 6567 -report-keep-reg │ │ │ -00002410: 6578 7020 6669 6c65 2067 6574 2d62 7566 exp file get-buf │ │ │ -00002420: 6665 722d 6372 6561 7465 2067 656e 6572 fer-create gener │ │ │ -00002430: 6174 652d 6e65 772d 6275 6666 6572 2d6e ate-new-buffer-n │ │ │ -00002440: 616d 6520 2220 2a74 656d 702a 2220 2828 ame " *temp*" (( │ │ │ -00002450: 6279 7465 2d63 6f64 6520 22c1 0821 ab84 byte-code "..!.. │ │ │ -00002460: c208 2188 c187 2220 5b23 3123 2062 7566 ..!..." [#1# buf │ │ │ -00002470: 6665 722d 6e61 6d65 206b 696c 6c2d 6275 fer-name kill-bu │ │ │ -00002480: 6666 6572 5d20 3229 2920 6669 6c65 2d65 ffer] 2)) file-e │ │ │ -00002490: 7869 7374 732d 7020 6665 6174 7572 6570 xists-p featurep │ │ │ -000024a0: 206d 696d 652d 7365 7475 7020 6d69 6d65 mime-setup mime │ │ │ -000024b0: 2d65 6469 742d 696e 7365 7274 2d74 6167 -edit-insert-tag │ │ │ -000024c0: 2022 7465 7874 2220 2270 6c61 696e 2220 "text" "plain" │ │ │ -000024d0: 225c 6e43 6f6e 7465 6e74 2d44 6973 706f "\nContent-Dispo │ │ │ -000024e0: 7369 7469 6f6e 3a20 6174 7461 6368 6d65 sition: attachme │ │ │ -000024f0: 6e74 3b22 2022 2066 696c 656e 616d 653d nt;" " filename= │ │ │ -00002500: 5c22 2220 6669 6c65 2d6e 616d 652d 6e6f \"" file-name-no │ │ │ -00002510: 6e64 6972 6563 746f 7279 2022 5c22 2220 ndirectory "\"" │ │ │ -00002520: 6d69 6d65 2d65 6469 742d 696e 7365 7274 mime-edit-insert │ │ │ -00002530: 2d62 696e 6172 792d 6669 6c65 2069 6e73 -binary-file ins │ │ │ -00002540: 6572 742d 6669 6c65 2d63 6f6e 7465 6e74 ert-file-content │ │ │ -00002550: 7320 6465 6c65 7465 2d6e 6f6e 2d6d 6174 s delete-non-mat │ │ │ -00002560: 6368 696e 672d 6c69 6e65 7320 6275 696c ching-lines buil │ │ │ -00002570: 642d 7265 706f 7274 2d6b 6565 7020 6465 d-report-keep de │ │ │ -00002580: 6c65 7465 2d6d 6174 6368 696e 672d 6c69 lete-matching-li │ │ │ -00002590: 6e65 7320 6275 696c 642d 7265 706f 7274 nes build-report │ │ │ -000025a0: 2d64 656c 6574 6520 666f 726d 6174 2022 -delete format " │ │ │ -000025b0: 3e20 6b65 6570 696e 6720 6c69 6e65 7320 > keeping lines │ │ │ -000025c0: 6d61 7463 6869 6e67 5c6e 3e20 5c22 2573 matching\n> \"%s │ │ │ -000025d0: 5c22 5c6e 2220 223e 2025 7364 656c 6574 \"\n" "> %sdelet │ │ │ -000025e0: 696e 6720 6c69 6e65 7320 6d61 7463 6869 ing lines matchi │ │ │ -000025f0: 6e67 5c6e 3e20 5c22 2573 5c22 5c6e 2220 ng\n> \"%s\"\n" │ │ │ -00002600: 2261 6e64 2074 6865 6e20 2220 2222 2022 "and then " "" " │ │ │ -00002610: 5c6e 2220 223e 2043 6f6e 7465 6e74 7320 \n" "> Contents │ │ │ -00002620: 6f66 2025 735c 6e22 2022 3e20 2220 2220 of %s\n" "> " " │ │ │ -00002630: 646f 6573 206e 6f74 2065 7869 7374 215c does not exist!\ │ │ │ -00002640: 6e5c 6e22 2062 7566 6665 722d 7374 7269 n\n" buffer-stri │ │ │ -00002650: 6e67 5d20 3720 2823 2420 2e20 3837 3430 ng] 7 (#$ . 8740 │ │ │ -00002660: 295d 290a 2340 3130 3820 496e 7365 7274 )]).#@108 Insert │ │ │ -00002670: 7320 7468 6520 636f 6e74 656e 7473 206f s the contents o │ │ │ -00002680: 6620 7468 6520 6062 7569 6c64 2d72 6570 f the `build-rep │ │ │ -00002690: 6f72 742d 696e 7374 616c 6c61 7469 6f6e ort-installation │ │ │ -000026a0: 2d66 696c 6527 0a63 7265 6174 6564 2062 -file'.created b │ │ │ -000026b0: 7920 7468 6520 5845 6d61 6373 2042 6574 y the XEmacs Bet │ │ │ -000026c0: 6120 636f 6e66 6967 7572 6520 7072 6f63 a configure proc │ │ │ -000026d0: 6573 732e 1f0a 2864 6566 616c 6961 7320 ess...(defalias │ │ │ -000026e0: 2762 7569 6c64 2d72 6570 6f72 742d 696e 'build-report-in │ │ │ -000026f0: 7365 7274 2d69 6e73 7461 6c6c 6174 696f sert-installatio │ │ │ -00002700: 6e2d 6669 6c65 2023 5b28 7768 6572 6520 n-file #[(where │ │ │ -00002710: 616c 6c29 2022 0862 88c6 c7c8 2121 1ac9 all) ".b....!!.. │ │ │ -00002720: 8e72 5c6e 7188 ca0d 21ab cecb 891b 1ccc .r\nq...!....... │ │ │ -00002730: 0dcd b103 88ce cf09 ab83 d0aa 81d1 5c22 ..............\" │ │ │ -00002740: 6388 d2d3 21ab 97d4 d5d6 d7d8 d90d 21da c...!.........!. │ │ │ -00002750: 5223 88db 0d0e 245c 2288 dc20 14aa 8660 R#....$\".. ...` │ │ │ -00002760: 14dd 0d21 8809 ac90 dedf 0ce0 2313 0cab ...!........#... │ │ │ -00002770: 870b ab84 0c0b 7c88 2aaa 86e1 0de2 b103 ......|.*....... │ │ │ -00002780: 88e3 202b 8722 205b 7768 6572 6520 616c .. +." [where al │ │ │ -00002790: 6c20 2331 3d23 3a74 656d 702d 6275 6666 l #1=#:temp-buff │ │ │ -000027a0: 6572 206c 6173 742d 636f 6e66 6967 7572 er last-configur │ │ │ -000027b0: 6520 6669 6c65 2d62 6567 696e 2062 7569 e file-begin bui │ │ │ -000027c0: 6c64 2d72 6570 6f72 742d 696e 7374 616c ld-report-instal │ │ │ -000027d0: 6c61 7469 6f6e 2d66 696c 6520 6765 742d lation-file get- │ │ │ -000027e0: 6275 6666 6572 2d63 7265 6174 6520 6765 buffer-create ge │ │ │ -000027f0: 6e65 7261 7465 2d6e 6577 2d62 7566 6665 nerate-new-buffe │ │ │ -00002800: 722d 6e61 6d65 2022 202a 7465 6d70 2a22 r-name " *temp*" │ │ │ -00002810: 2028 2862 7974 652d 636f 6465 2022 c108 ((byte-code ".. │ │ │ -00002820: 21ab 84c2 0821 88c1 8722 205b 2331 2320 !....!..." [#1# │ │ │ -00002830: 6275 6666 6572 2d6e 616d 6520 6b69 6c6c buffer-name kill │ │ │ -00002840: 2d62 7566 6665 725d 2032 2929 2066 696c -buffer] 2)) fil │ │ │ -00002850: 652d 6578 6973 7473 2d70 206e 696c 2022 e-exists-p nil " │ │ │ -00002860: 3e20 436f 6e74 656e 7473 206f 6620 2220 > Contents of " │ │ │ -00002870: 223a 5c6e 2220 666f 726d 6174 2022 3e20 ":\n" format "> │ │ │ -00002880: 284f 7574 7075 7420 6672 6f6d 2025 7320 (Output from %s │ │ │ -00002890: 6f66 202e 2f63 6f6e 6669 6775 7265 295c of ./configure)\ │ │ │ -000028a0: 6e5c 6e22 2022 616c 6c20 7275 6e73 2220 n\n" "all runs" │ │ │ -000028b0: 226d 6f73 7420 7265 6365 6e74 2072 756e "most recent run │ │ │ -000028c0: 2220 6665 6174 7572 6570 206d 696d 652d " featurep mime- │ │ │ -000028d0: 7365 7475 7020 6d69 6d65 2d65 6469 742d setup mime-edit- │ │ │ -000028e0: 696e 7365 7274 2d74 6167 2022 7465 7874 insert-tag "text │ │ │ -000028f0: 2220 2270 6c61 696e 2220 225c 6e43 6f6e " "plain" "\nCon │ │ │ -00002900: 7465 6e74 2d44 6973 706f 7369 7469 6f6e tent-Disposition │ │ │ -00002910: 3a20 6174 7461 6368 6d65 6e74 3b22 2022 : attachment;" " │ │ │ -00002920: 2066 696c 656e 616d 653d 5c22 2220 6669 filename=\"" fi │ │ │ -00002930: 6c65 2d6e 616d 652d 6e6f 6e64 6972 6563 le-name-nondirec │ │ │ -00002940: 746f 7279 2022 5c22 2220 6d69 6d65 2d65 tory "\"" mime-e │ │ │ -00002950: 6469 742d 696e 7365 7274 2d62 696e 6172 dit-insert-binar │ │ │ -00002960: 792d 6669 6c65 206d 696d 652d 6564 6974 y-file mime-edit │ │ │ -00002970: 2d63 6f6e 7465 6e74 2d62 6567 696e 6e69 -content-beginni │ │ │ -00002980: 6e67 2069 6e73 6572 742d 6669 6c65 2d63 ng insert-file-c │ │ │ -00002990: 6f6e 7465 6e74 7320 7365 6172 6368 2d62 ontents search-b │ │ │ -000029a0: 6163 6b77 6172 642d 7265 6765 7870 2022 ackward-regexp " │ │ │ -000029b0: 5e5c 5c28 756e 616d 652e 2a5c 5c7c 6f73 ^\\(uname.*\\|os │ │ │ -000029c0: 7665 7273 696f 6e5c 5c7c 4f53 5c5c 293a version\\|OS\\): │ │ │ -000029d0: 5c5c 732d 2b22 2074 2022 3e20 2220 2220 \\s-+" t "> " " │ │ │ -000029e0: 646f 6573 206e 6f74 2065 7869 7374 215c does not exist!\ │ │ │ -000029f0: 6e5c 6e22 2062 7566 6665 722d 7374 7269 n\n" buffer-stri │ │ │ -00002a00: 6e67 2062 7569 6c64 2d72 6570 6f72 742d ng build-report- │ │ │ -00002a10: 6669 6c65 2d65 6e63 6f64 696e 675d 2037 file-encoding] 7 │ │ │ -00002a20: 2028 2324 202e 2039 3833 3429 5d29 0a23 (#$ . 9834)]).# │ │ │ -00002a30: 4032 3035 2043 6f6e 6361 7465 6e61 7465 @205 Concatenate │ │ │ -00002a40: 2065 6c65 6d65 6e74 7320 6f66 2060 6275 elements of `bu │ │ │ -00002a50: 696c 642d 7265 706f 7274 2d6b 6565 702d ild-report-keep- │ │ │ -00002a60: 7265 6765 7870 2720 616e 6420 6120 6765 regexp' and a ge │ │ │ -00002a70: 6e65 7261 6c0a 4d49 4d45 2074 6167 2052 neral.MIME tag R │ │ │ -00002a80: 4547 4558 502e 2020 5468 6520 7265 7375 EGEXP. The resu │ │ │ -00002a90: 6c74 2069 7320 6120 5245 4745 5850 2073 lt is a REGEXP s │ │ │ -00002aa0: 7472 696e 6720 6d61 7463 6869 6e67 2065 tring matching e │ │ │ -00002ab0: 6974 6865 7220 6f66 2074 6865 0a52 4547 ither of the.REG │ │ │ -00002ac0: 4558 5073 2069 6e20 6062 7569 6c64 2d72 EXPs in `build-r │ │ │ -00002ad0: 6570 6f72 742d 6b65 6570 2d72 6567 6578 eport-keep-regex │ │ │ -00002ae0: 7027 206f 7220 6120 6765 6e65 7261 6c20 p' or a general │ │ │ -00002af0: 4d49 4d45 2074 6167 2052 4547 4558 502e MIME tag REGEXP. │ │ │ -00002b00: 1f0a 2864 6566 616c 6961 7320 2762 7569 ..(defalias 'bui │ │ │ -00002b10: 6c64 2d72 6570 6f72 742d 6b65 6570 2023 ld-report-keep # │ │ │ -00002b20: 5b6e 696c 2022 c1c2 c308 42c4 2387 2220 [nil "....B.#." │ │ │ -00002b30: 5b62 7569 6c64 2d72 6570 6f72 742d 6b65 [build-report-ke │ │ │ -00002b40: 6570 2d72 6567 6578 7020 6d61 7063 6f6e ep-regexp mapcon │ │ │ -00002b50: 6361 7420 6964 656e 7469 7479 2022 5e2d cat identity "^- │ │ │ -00002b60: 2d5c 5c5b 5c5c 5b5c 5c7c 5c5c 5d5c 5c5d -\\[\\[\\|\\]\\] │ │ │ -00002b70: 2422 2022 5c5c 7c22 5d20 3420 2823 2420 $" "\\|"] 4 (#$ │ │ │ -00002b80: 2e20 3130 3830 3529 5d29 0a23 4032 3039 . 10805)]).#@209 │ │ │ -00002b90: 2043 6f6e 6361 7465 6e61 7465 2065 6c65 Concatenate ele │ │ │ -00002ba0: 6d65 6e74 7320 6f66 2060 6275 696c 642d ments of `build- │ │ │ -00002bb0: 7265 706f 7274 2d64 656c 6574 652d 7265 report-delete-re │ │ │ -00002bc0: 6765 7870 2720 616e 6420 6120 6765 6e65 gexp' and a gene │ │ │ -00002bd0: 7261 6c0a 4d49 4d45 2074 6167 2052 4547 ral.MIME tag REG │ │ │ -00002be0: 4558 502e 2020 5468 6520 7265 7375 6c74 EXP. The result │ │ │ -00002bf0: 2069 7320 6120 5245 4745 5850 2073 7472 is a REGEXP str │ │ │ -00002c00: 696e 6720 6d61 7463 6869 6e67 2065 6974 ing matching eit │ │ │ -00002c10: 6865 7220 6f66 2074 6865 0a52 4547 4558 her of the.REGEX │ │ │ -00002c20: 5073 2069 6e20 6062 7569 6c64 2d72 6570 Ps in `build-rep │ │ │ -00002c30: 6f72 742d 6465 6c65 7465 2d72 6567 6578 ort-delete-regex │ │ │ -00002c40: 7027 206f 7220 6120 6765 6e65 7261 6c20 p' or a general │ │ │ -00002c50: 4d49 4d45 2074 6167 2052 4547 4558 502e MIME tag REGEXP. │ │ │ -00002c60: 1f0a 2864 6566 616c 6961 7320 2762 7569 ..(defalias 'bui │ │ │ -00002c70: 6c64 2d72 6570 6f72 742d 6465 6c65 7465 ld-report-delete │ │ │ -00002c80: 2023 5b6e 696c 2022 c1c2 08c3 2387 2220 #[nil "....#." │ │ │ -00002c90: 5b62 7569 6c64 2d72 6570 6f72 742d 6465 [build-report-de │ │ │ -00002ca0: 6c65 7465 2d72 6567 6578 7020 6d61 7063 lete-regexp mapc │ │ │ -00002cb0: 6f6e 6361 7420 235b 2869 7465 6d29 2022 oncat #[(item) " │ │ │ -00002cc0: 0887 2220 5b69 7465 6d5d 2031 5d20 225c .." [item] 1] "\ │ │ │ -00002cd0: 5c7c 225d 2034 2028 2324 202e 2031 3131 \|"] 4 (#$ . 111 │ │ │ -00002ce0: 3533 295d 290a 2340 3138 3520 5265 7475 53)]).#@185 Retu │ │ │ -00002cf0: 726e 2061 206c 6973 7420 6f66 2058 456d rn a list of XEm │ │ │ -00002d00: 6163 7320 696e 7374 616c 6c61 7469 6f6e acs installation │ │ │ -00002d10: 2064 6174 6120 636f 6e74 6169 6e69 6e67 data containing │ │ │ -00002d20: 204d 414a 4f52 5f4e 554d 4245 520a 4d49 MAJOR_NUMBER.MI │ │ │ -00002d30: 4e4f 525f 4e55 4d42 4552 2042 4554 415f NOR_NUMBER BETA_ │ │ │ -00002d40: 5354 5249 4e47 2043 4f44 454e 414d 4520 STRING CODENAME │ │ │ -00002d50: 434f 4e46 4947 5552 4154 494f 4e20 5352 CONFIGURATION SR │ │ │ -00002d60: 4344 4952 2066 726f 6d20 4649 4c45 2c0a CDIR from FILE,. │ │ │ -00002d70: 7768 6963 6820 6465 6661 756c 7473 2074 which defaults t │ │ │ -00002d80: 6f20 6062 7569 6c64 2d72 6570 6f72 742d o `build-report- │ │ │ -00002d90: 696e 7374 616c 6c61 7469 6f6e 2d66 696c installation-fil │ │ │ -00002da0: 6527 2e1f 0a28 6465 6661 6c69 6173 2027 e'...(defalias ' │ │ │ -00002db0: 6275 696c 642d 7265 706f 7274 2d69 6e73 build-report-ins │ │ │ -00002dc0: 7461 6c6c 6174 696f 6e2d 6461 7461 2023 tallation-data # │ │ │ -00002dd0: 5b28 266f 7074 696f 6e61 6c20 6669 6c65 [(&optional file │ │ │ -00002de0: 2920 220d ac82 0c15 c689 8989 8989 1b1a ) "............. │ │ │ -00002df0: 1918 1e08 1e09 c78b 2e06 8722 205b 6265 ..........." [be │ │ │ -00002e00: 7461 2063 6f64 656e 616d 6520 636f 6e66 ta codename conf │ │ │ -00002e10: 6967 7572 6174 696f 6e20 7372 6364 6972 iguration srcdir │ │ │ -00002e20: 2062 7569 6c64 2d72 6570 6f72 742d 696e build-report-in │ │ │ -00002e30: 7374 616c 6c61 7469 6f6e 2d66 696c 6520 stallation-file │ │ │ -00002e40: 6669 6c65 206e 696c 2028 2862 7974 652d file nil ((byte- │ │ │ -00002e50: 636f 6465 2022 c60e 1321 8865 6288 6064 code "...!.eb.`d │ │ │ -00002e60: 57ab c6c7 0e14 21ab 9ac8 9562 88c9 ca21 W.....!....b...! │ │ │ -00002e70: 15c9 cb21 14c9 cc21 13c9 cd21 12c9 ce21 ...!...!...!...! │ │ │ -00002e80: 11aa 5bc7 0e15 21ab 8ac8 9562 88c9 ca21 ..[...!....b...! │ │ │ -00002e90: 10aa 4bc7 cf21 ab86 c895 6288 aa40 c7d0 ..K..!....b..@.. │ │ │ -00002ea0: 21ab 3bc8 9562 88aa 35d1 0d0c 0bae 81d2 !.;..b..5....... │ │ │ -00002eb0: 5c6e 0908 2606 8722 205b 7372 6364 6972 \n..&.." [srcdir │ │ │ -00002ec0: 2063 6f6e 6669 6775 7261 7469 6f6e 2063 configuration c │ │ │ -00002ed0: 6f64 656e 616d 6520 6265 7461 206d 696e odename beta min │ │ │ -00002ee0: 6f72 206d 616a 6f72 2066 696e 642d 6669 or major find-fi │ │ │ -00002ef0: 6c65 2d72 6561 642d 6f6e 6c79 206c 6f6f le-read-only loo │ │ │ -00002f00: 6b69 6e67 2d61 7420 3020 6d61 7463 682d king-at 0 match- │ │ │ -00002f10: 7374 7269 6e67 2031 2032 2033 2036 2037 string 1 2 3 6 7 │ │ │ -00002f20: 2022 5e2e 2b24 2220 225c 6e22 2076 616c "^.+$" "\n" val │ │ │ -00002f30: 7565 7320 2222 2066 696c 6520 6275 696c ues "" file buil │ │ │ -00002f40: 642d 7265 706f 7274 2d69 6e73 7461 6c6c d-report-install │ │ │ -00002f50: 6174 696f 6e2d 7665 7273 696f 6e2d 7265 ation-version-re │ │ │ -00002f60: 6765 7870 2062 7569 6c64 2d72 6570 6f72 gexp build-repor │ │ │ -00002f70: 742d 696e 7374 616c 6c61 7469 6f6e 2d73 t-installation-s │ │ │ -00002f80: 7263 6469 722d 7265 6765 7870 5d20 3729 rcdir-regexp] 7) │ │ │ -00002f90: 2920 6d69 6e6f 7220 6d61 6a6f 725d 2036 ) minor major] 6 │ │ │ -00002fa0: 2028 2324 202e 2031 3135 3030 2920 2266 (#$ . 11500) "f │ │ │ -00002fb0: 496e 7374 616c 6c61 7469 6f6e 2066 696c Installation fil │ │ │ -00002fc0: 653a 2022 5d29 0a23 4031 3631 2052 6574 e: "]).#@161 Ret │ │ │ -00002fd0: 7572 6e20 6120 6c69 7374 206f 6620 5845 urn a list of XE │ │ │ -00002fe0: 6d61 6373 2076 6572 7369 6f6e 2069 6e66 macs version inf │ │ │ -00002ff0: 6f72 6d61 7469 6f6e 2063 6f6e 7461 696e ormation contain │ │ │ -00003000: 696e 670a 4d41 4a4f 525f 4e55 4d42 4552 ing.MAJOR_NUMBER │ │ │ -00003010: 204d 494e 4f52 5f4e 554d 4245 5220 4245 MINOR_NUMBER BE │ │ │ -00003020: 5441 5f53 5452 494e 4720 434f 4445 4e41 TA_STRING CODENA │ │ │ -00003030: 4d45 2066 726f 6d20 4649 4c45 2c20 7768 ME from FILE, wh │ │ │ -00003040: 6963 680a 6465 6661 756c 7473 2074 6f20 ich.defaults to │ │ │ -00003050: 6062 7569 6c64 2d72 6570 6f72 742d 7665 `build-report-ve │ │ │ -00003060: 7273 696f 6e2d 6669 6c65 272e 1f0a 2864 rsion-file'...(d │ │ │ -00003070: 6566 616c 6961 7320 2762 7569 6c64 2d72 efalias 'build-r │ │ │ -00003080: 6570 6f72 742d 7665 7273 696f 6e2d 6669 eport-version-fi │ │ │ -00003090: 6c65 2d64 6174 6120 235b 2826 6f70 7469 le-data #[(&opti │ │ │ -000030a0: 6f6e 616c 2066 696c 6529 2022 0dac 820c onal file) ".... │ │ │ -000030b0: 15c6 8989 891b 1a19 18c7 8b2c 8722 205b ...........,." [ │ │ │ -000030c0: 6d61 6a6f 7220 6d69 6e6f 7220 6265 7461 major minor beta │ │ │ -000030d0: 2063 6f64 656e 616d 6520 6275 696c 642d codename build- │ │ │ -000030e0: 7265 706f 7274 2d76 6572 7369 6f6e 2d66 report-version-f │ │ │ -000030f0: 696c 6520 6669 6c65 206e 696c 2028 2862 ile file nil ((b │ │ │ -00003100: 7974 652d 636f 6465 2022 c609 2188 6562 yte-code "..!.eb │ │ │ -00003110: 8860 6457 abb1 c708 21ab 96c8 9562 88c9 .`dW....!....b.. │ │ │ -00003120: ca21 15c9 cb21 14c9 cc21 13c9 cd21 12aa .!...!...!...!.. │ │ │ -00003130: 60c7 ce21 ab86 c895 6288 aa55 c7cf 21ab `..!....b..U..!. │ │ │ -00003140: 50c8 9562 88aa 4ad0 0d0c 0bae 81d1 5c6e P..b..J.......\n │ │ │ -00003150: 2487 2220 5b62 7569 6c64 2d72 6570 6f72 $." [build-repor │ │ │ -00003160: 742d 7665 7273 696f 6e2d 6669 6c65 2d72 t-version-file-r │ │ │ -00003170: 6567 6578 7020 6669 6c65 2063 6f64 656e egexp file coden │ │ │ -00003180: 616d 6520 6265 7461 206d 696e 6f72 206d ame beta minor m │ │ │ -00003190: 616a 6f72 2066 696e 642d 6669 6c65 2d72 ajor find-file-r │ │ │ -000031a0: 6561 642d 6f6e 6c79 206c 6f6f 6b69 6e67 ead-only looking │ │ │ -000031b0: 2d61 7420 3020 6d61 7463 682d 7374 7269 -at 0 match-stri │ │ │ -000031c0: 6e67 2031 2032 2033 2034 2022 5e2e 2b24 ng 1 2 3 4 "^.+$ │ │ │ -000031d0: 2220 225c 6e22 2076 616c 7565 7320 2222 " "\n" values "" │ │ │ -000031e0: 5d20 3529 295d 2034 2028 2324 202e 2031 ] 5))] 4 (#$ . 1 │ │ │ -000031f0: 3232 3337 2920 2266 7665 7273 696f 6e2e 2237) "fversion. │ │ │ -00003200: 7368 2066 696c 653a 2022 5d29 0a sh file: "]). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3439 2032 3032 310a 3b3b 3b20 :08:49 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f62 7569 6c64 2d72 6570 4/lisp/build-rep │ │ │ +00000090: 6f72 742e 656c 0a3b 3b3b 2065 6d61 6373 ort.el.;;; emacs │ │ │ +000000a0: 2076 6572 7369 6f6e 2032 312e 3420 2870 version 21.4 (p │ │ │ +000000b0: 6174 6368 2032 3429 2022 5374 616e 6461 atch 24) "Standa │ │ │ +000000c0: 7264 2043 2220 5845 6d61 6373 204c 7563 rd C" XEmacs Luc │ │ │ +000000d0: 6964 2e0a 3b3b 3b20 6279 7465 636f 6d70 id..;;; bytecomp │ │ │ +000000e0: 2076 6572 7369 6f6e 2032 2e32 3720 5845 version 2.27 XE │ │ │ +000000f0: 6d61 6373 3b20 3230 3030 2d30 392d 3132 macs; 2000-09-12 │ │ │ +00000100: 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 7469 ..;;; optimizati │ │ │ +00000110: 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 7468 on is on..;;; th │ │ │ +00000120: 6973 2066 696c 6520 7573 6573 206f 7063 is file uses opc │ │ │ +00000130: 6f64 6573 2077 6869 6368 2064 6f20 6e6f odes which do no │ │ │ +00000140: 7420 6578 6973 7420 696e 2045 6d61 6373 t exist in Emacs │ │ │ +00000150: 2031 392e 0a0a 2869 6620 2861 6e64 2028 19...(if (and ( │ │ │ +00000160: 626f 756e 6470 2027 656d 6163 732d 7665 boundp 'emacs-ve │ │ │ +00000170: 7273 696f 6e29 0a09 2028 6f72 2028 616e rsion).. (or (an │ │ │ +00000180: 6420 2862 6f75 6e64 7020 2765 706f 6368 d (boundp 'epoch │ │ │ +00000190: 3a3a 7665 7273 696f 6e29 2065 706f 6368 ::version) epoch │ │ │ +000001a0: 3a3a 7665 7273 696f 6e29 0a09 2020 2020 ::version).. │ │ │ +000001b0: 2028 7374 7269 6e67 2d6c 6573 7370 2065 (string-lessp e │ │ │ +000001c0: 6d61 6373 2d76 6572 7369 6f6e 2022 3230 macs-version "20 │ │ │ +000001d0: 2229 2929 0a20 2020 2028 6572 726f 7220 "))). (error │ │ │ +000001e0: 2260 6275 696c 642d 7265 706f 7274 2e65 "`build-report.e │ │ │ +000001f0: 6c27 2077 6173 2063 6f6d 7069 6c65 6420 l' was compiled │ │ │ +00000200: 666f 7220 456d 6163 7320 3230 2229 290a for Emacs 20")). │ │ │ +00000210: 0a28 6f72 2028 626f 756e 6470 2027 6375 .(or (boundp 'cu │ │ │ +00000220: 7272 656e 742d 6c6f 6164 2d6c 6973 7429 rrent-load-list) │ │ │ +00000230: 2028 7365 7471 2063 7572 7265 6e74 2d6c (setq current-l │ │ │ +00000240: 6f61 642d 6c69 7374 206e 696c 2929 0a0a oad-list nil)).. │ │ │ +00000250: 0a28 6279 7465 2d63 6f64 6520 22c0 c121 .(byte-code "..! │ │ │ +00000260: 88c0 c221 88c0 c321 88c4 c521 8722 205b ...!...!...!." [ │ │ │ +00000270: 7265 7175 6972 6520 636f 6e66 6967 2063 require config c │ │ │ +00000280: 7573 746f 6d20 636c 2070 726f 7669 6465 ustom cl provide │ │ │ +00000290: 2062 7569 6c64 2d72 6570 6f72 745d 2032 build-report] 2 │ │ │ +000002a0: 290a 2340 3134 3720 2a52 4547 4558 5020 ).#@147 *REGEXP │ │ │ +000002b0: 6d61 7463 6869 6e67 2058 456d 6163 7320 matching XEmacs │ │ │ +000002c0: 4265 7461 2056 6572 7369 6f6e 2073 7472 Beta Version str │ │ │ +000002d0: 696e 6720 696e 0a60 6275 696c 642d 7265 ing in.`build-re │ │ │ +000002e0: 706f 7274 2d69 6e73 7461 6c6c 6174 696f port-installatio │ │ │ +000002f0: 6e2d 6669 6c65 2720 6669 6c65 2e20 2054 n-file' file. T │ │ │ +00000300: 6869 7320 7661 7269 6162 6c65 2069 7320 his variable is │ │ │ +00000310: 7573 6564 2062 790a 6062 7569 6c64 2d72 used by.`build-r │ │ │ +00000320: 6570 6f72 742d 696e 7374 616c 6c61 7469 eport-installati │ │ │ +00000330: 6f6e 2d64 6174 6127 2e1f 0a28 6465 6663 on-data'...(defc │ │ │ +00000340: 6f6e 7374 2062 7569 6c64 2d72 6570 6f72 onst build-repor │ │ │ +00000350: 742d 696e 7374 616c 6c61 7469 6f6e 2d76 t-installation-v │ │ │ +00000360: 6572 7369 6f6e 2d72 6567 6578 7020 2258 ersion-regexp "X │ │ │ +00000370: 456d 6163 735c 5c73 2d2b 5c5c 285b 302d Emacs\\s-+\\([0- │ │ │ +00000380: 395d 2b5c 5c29 5c5c 2e5c 5c28 5b30 2d39 9]+\\)\\.\\([0-9 │ │ │ +00000390: 5d2b 5c5c 295c 5c28 5c5c 282d 625c 5c7c ]+\\)\\(\\(-b\\| │ │ │ +000003a0: 5c5c 2e5c 5c29 5c5c 285b 302d 395d 2b5c \\.\\)\\([0-9]+\ │ │ │ +000003b0: 5c29 5c5c 293f 5c5c 732d 2b5c 5c5c 5c3f \)\\)?\\s-+\\\\? │ │ │ +000003c0: 5c22 5c5c 285b 5e5c 5c5c 225d 2b5c 5c29 \"\\([^\\\"]+\\) │ │ │ +000003d0: 5c5c 5c5c 3f5c 225c 5c73 2d2b 636f 6e66 \\\\?\"\\s-+conf │ │ │ +000003e0: 6967 7572 6564 5c5c 732d 2b66 6f72 5c5c igured\\s-+for\\ │ │ │ +000003f0: 732d 2b60 5c5c 282e 2b5c 5c29 275c 5c2e s-+`\\(.+\\)'\\. │ │ │ +00000400: 2220 2823 2420 2e20 2d36 3830 2929 0a23 " (#$ . -680)).# │ │ │ +00000410: 4031 3536 202a 5245 4745 5850 206d 6174 @156 *REGEXP mat │ │ │ +00000420: 6368 696e 6720 5845 6d61 6373 2042 6574 ching XEmacs Bet │ │ │ +00000430: 6120 5665 7273 696f 6e20 7661 7269 6162 a Version variab │ │ │ +00000440: 6c65 2061 7373 6967 6e6d 656e 7473 2069 le assignments i │ │ │ +00000450: 6e0a 6062 7569 6c64 2d72 6570 6f72 742d n.`build-report- │ │ │ +00000460: 7665 7273 696f 6e2d 6669 6c65 2720 6669 version-file' fi │ │ │ +00000470: 6c65 2e20 2054 6869 7320 7661 7269 6162 le. This variab │ │ │ +00000480: 6c65 2069 7320 7573 6564 2062 790a 6062 le is used by.`b │ │ │ +00000490: 7569 6c64 2d72 6570 6f72 742d 7665 7273 uild-report-vers │ │ │ +000004a0: 696f 6e2d 6669 6c65 2d64 6174 6127 2e1f ion-file-data'.. │ │ │ +000004b0: 0a28 6465 6663 6f6e 7374 2062 7569 6c64 .(defconst build │ │ │ +000004c0: 2d72 6570 6f72 742d 7665 7273 696f 6e2d -report-version- │ │ │ +000004d0: 6669 6c65 2d72 6567 6578 7020 2265 6d61 file-regexp "ema │ │ │ +000004e0: 6373 5f6d 616a 6f72 5f76 6572 7369 6f6e cs_major_version │ │ │ +000004f0: 5c5c 732d 2a3d 5c5c 732d 2a5c 5c28 5b30 \\s-*=\\s-*\\([0 │ │ │ +00000500: 2d39 5d2b 5c5c 295c 6e65 6d61 6373 5f6d -9]+\\)\nemacs_m │ │ │ +00000510: 696e 6f72 5f76 6572 7369 6f6e 5c5c 732d inor_version\\s- │ │ │ +00000520: 2a3d 5c5c 732d 2a5c 5c28 5b30 2d39 5d2b *=\\s-*\\([0-9]+ │ │ │ +00000530: 5c5c 295c 6e65 6d61 6373 5f62 6574 615f \\)\nemacs_beta_ │ │ │ +00000540: 7665 7273 696f 6e5c 5c73 2d2a 3d5c 5c73 version\\s-*=\\s │ │ │ +00000550: 2d2a 5c5c 285b 302d 395d 2b5c 5c29 3f5c -*\\([0-9]+\\)?\ │ │ │ +00000560: 6e78 656d 6163 735f 636f 6465 6e61 6d65 nxemacs_codename │ │ │ +00000570: 5c5c 732d 2a3d 5c5c 732d 2a5c 225c 5c28 \\s-*=\\s-*\"\\( │ │ │ +00000580: 5b5e 5c22 5d2b 5c5c 295c 2222 2028 2324 [^\"]+\\)\"" (#$ │ │ │ +00000590: 202e 202d 3130 3435 2929 0a23 4031 3637 . -1045)).#@167 │ │ │ +000005a0: 2052 4547 4558 5020 6d61 7463 6869 6e67 REGEXP matching │ │ │ +000005b0: 2058 456d 6163 7320 4265 7461 2073 7263 XEmacs Beta src │ │ │ +000005c0: 6469 7220 6173 2074 6865 2066 6972 7374 dir as the first │ │ │ +000005d0: 2073 7562 7374 7269 6e67 206d 6174 6368 substring match │ │ │ +000005e0: 2069 6e0a 6062 7569 6c64 2d72 6570 6f72 in.`build-repor │ │ │ +000005f0: 742d 696e 7374 616c 6c61 7469 6f6e 2d66 t-installation-f │ │ │ +00000600: 696c 6527 2066 696c 652e 2020 5468 6973 ile' file. This │ │ │ +00000610: 2076 6172 6961 626c 6520 6973 2075 7365 variable is use │ │ │ +00000620: 6420 6279 0a60 6275 696c 642d 7265 706f d by.`build-repo │ │ │ +00000630: 7274 2d69 6e73 7461 6c6c 6174 696f 6e2d rt-installation- │ │ │ +00000640: 6461 7461 272e 1f0a 2864 6566 636f 6e73 data'...(defcons │ │ │ +00000650: 7420 6275 696c 642d 7265 706f 7274 2d69 t build-report-i │ │ │ +00000660: 6e73 7461 6c6c 6174 696f 6e2d 7372 6364 nstallation-srcd │ │ │ +00000670: 6972 2d72 6567 6578 7020 225c 5c73 2d2a ir-regexp "\\s-* │ │ │ +00000680: 5768 6572 6520 7368 6f75 6c64 2074 6865 Where should the │ │ │ +00000690: 2062 7569 6c64 2070 726f 6365 7373 2066 build process f │ │ │ +000006a0: 696e 6420 7468 6520 736f 7572 6365 2063 ind the source c │ │ │ +000006b0: 6f64 655c 5c3f 5c5c 732d 2a5c 5c28 2e2a ode\\?\\s-*\\(.* │ │ │ +000006c0: 5c5c 2924 2220 2823 2420 2e20 3134 3431 \\)$" (#$ . 1441 │ │ │ +000006d0: 2929 0a28 6375 7374 6f6d 2d64 6563 6c61 )).(custom-decla │ │ │ +000006e0: 7265 2d67 726f 7570 2027 6275 696c 642d re-group 'build- │ │ │ +000006f0: 7265 706f 7274 206e 696c 2022 5374 616e report nil "Stan │ │ │ +00000700: 6461 7264 697a 6573 2074 6865 2043 7265 dardizes the Cre │ │ │ +00000710: 6174 696f 6e20 6f66 2058 456d 6163 7320 ation of XEmacs │ │ │ +00000720: 4275 696c 6420 5265 706f 7274 732e 2220 Build Reports." │ │ │ +00000730: 3a6c 6f61 6420 2762 7569 6c64 2d72 6570 :load 'build-rep │ │ │ +00000740: 6f72 7420 3a67 726f 7570 2027 6275 696c ort :group 'buil │ │ │ +00000750: 6429 0a28 6375 7374 6f6d 2d64 6563 6c61 d).(custom-decla │ │ │ +00000760: 7265 2d76 6172 6961 626c 6520 2762 7569 re-variable 'bui │ │ │ +00000770: 6c64 2d72 6570 6f72 742d 6465 7374 696e ld-report-destin │ │ │ +00000780: 6174 696f 6e20 2728 6c69 7374 2022 5845 ation '(list "XE │ │ │ +00000790: 6d61 6373 2042 7569 6c64 2052 6570 6f72 macs Build Repor │ │ │ +000007a0: 7473 204c 6973 7420 3c78 656d 6163 732d ts List " "XEmac │ │ │ +000007d0: 7320 4265 7461 204c 6973 7420 3c78 656d s Beta List ") "*The lis │ │ │ +00000800: 7420 6f66 206d 6169 6c20 6164 6472 6573 t of mail addres │ │ │ +00000810: 7365 7320 5845 6d61 6373 2042 7569 6c64 ses XEmacs Build │ │ │ +00000820: 2052 6570 6f72 7473 2073 686f 756c 6420 Reports should │ │ │ +00000830: 6d6f 7374 206c 696b 656c 795c 6e67 6f20 most likely\ngo │ │ │ +00000840: 746f 2e22 203a 7479 7065 2027 2872 6570 to." :type '(rep │ │ │ +00000850: 6561 7420 3a63 7573 746f 6d2d 7368 6f77 eat :custom-show │ │ │ +00000860: 2074 203a 646f 6375 6d65 6e74 6174 696f t :documentatio │ │ │ +00000870: 6e2d 7368 6f77 6e20 7420 7374 7269 6e67 n-shown t string │ │ │ +00000880: 2920 3a67 726f 7570 2027 6275 696c 642d ) :group 'build- │ │ │ +00000890: 7265 706f 7274 290a 2863 7573 746f 6d2d report).(custom- │ │ │ +000008a0: 6465 636c 6172 652d 7661 7269 6162 6c65 declare-variable │ │ │ +000008b0: 2027 6275 696c 642d 7265 706f 7274 2d6b 'build-report-k │ │ │ +000008c0: 6565 702d 7265 6765 7870 2027 286c 6973 eep-regexp '(lis │ │ │ +000008d0: 7420 225e 5c5c 2863 645c 5c7c 6e3f 6d61 t "^\\(cd\\|n?ma │ │ │ +000008e0: 6b65 5c5c 295c 5c73 2d22 2022 6572 726f ke\\)\\s-" "erro │ │ │ +000008f0: 7273 3f22 2022 7761 726e 696e 6773 3f22 rs?" "warnings?" │ │ │ +00000900: 2022 7075 7265 2e2a 5c5c 2873 7061 6365 "pure.*\\(space │ │ │ +00000910: 5c5c 7c73 697a 655c 5c29 2220 2268 6964 \\|size\\)" "hid │ │ │ +00000920: 6573 5c5c 6222 2022 7374 7261 6e67 6522 es\\b" "strange" │ │ │ +00000930: 2022 7368 6164 6f77 696e 6773 2220 225e "shadowings" "^ │ │ │ +00000940: 436f 6d70 696c 5c5c 2869 6e67 5c5c 732d Compil\\(ing\\s- │ │ │ +00000950: 2b69 6e5c 5c7c 6174 696f 6e5c 5c29 2220 +in\\|ation\\)" │ │ │ +00000960: 225e 5573 696e 6722 2022 6e6f 745c 5c73 "^Using" "not\\s │ │ │ +00000970: 2d2b 666f 756e 6422 2022 5e57 6869 6c65 -+found" "^While │ │ │ +00000980: 5c5c 732d 2b63 6f6d 7069 6c69 6e67 2e2a \\s-+compiling.* │ │ │ +00000990: 5c5c 285c 6e5c 5c73 2d2b 2e2b 5c5c 292a \\(\n\\s-+.+\\)* │ │ │ +000009a0: 2220 225e 4e6f 7465 3a22 2022 496e 7374 " "^Note:" "Inst │ │ │ +000009b0: 616c 6c69 6e67 2220 225b 4666 5d69 6c65 alling" "[Ff]ile │ │ │ +000009c0: 2873 2920 636f 7069 6564 2220 225c 5c73 (s) copied" "\\s │ │ │ +000009d0: 2d2b 7465 7374 735c 5c73 2d2b 2229 2022 -+tests\\s-+") " │ │ │ +000009e0: 2a52 6567 6578 7020 6f66 206d 616b 6520 *Regexp of make │ │ │ +000009f0: 7072 6f63 6573 7320 6f75 7470 7574 206c process output l │ │ │ +00000a00: 696e 6573 2074 6f20 6b65 6570 2069 6e20 ines to keep in │ │ │ +00000a10: 7468 6520 7265 706f 7274 2e22 203a 7479 the report." :ty │ │ │ +00000a20: 7065 2027 2872 6570 6561 7420 3a63 7573 pe '(repeat :cus │ │ │ +00000a30: 746f 6d2d 7368 6f77 2074 203a 646f 6375 tom-show t :docu │ │ │ +00000a40: 6d65 6e74 6174 696f 6e2d 7368 6f77 6e20 mentation-shown │ │ │ +00000a50: 7420 7265 6765 7870 2920 3a67 726f 7570 t regexp) :group │ │ │ +00000a60: 2027 6275 696c 642d 7265 706f 7274 290a 'build-report). │ │ │ +00000a70: 2863 7573 746f 6d2d 6465 636c 6172 652d (custom-declare- │ │ │ +00000a80: 7661 7269 6162 6c65 2027 6275 696c 642d variable 'build- │ │ │ +00000a90: 7265 706f 7274 2d64 656c 6574 652d 7265 report-delete-re │ │ │ +00000aa0: 6765 7870 2027 286c 6973 7420 2263 6f6e gexp '(list "con │ │ │ +00000ab0: 666c 2e2a 7769 7468 2e2a 6175 746f 2d69 fl.*with.*auto-i │ │ │ +00000ac0: 6e6c 696e 696e 6722 2022 5e46 6f72 6d61 nlining" "^Forma │ │ │ +00000ad0: 7474 696e 673a 2220 2228 3130 3025 2920 tting:" "(100%) │ │ │ +00000ae0: 7465 7374 7320 7375 6363 6573 7366 756c tests successful │ │ │ +00000af0: 2229 2022 2a52 6567 6578 7020 6f66 206d ") "*Regexp of m │ │ │ +00000b00: 616b 6520 7072 6f63 6573 7320 6f75 7470 ake process outp │ │ │ +00000b10: 7574 206c 696e 6573 2074 6f20 6465 6c65 ut lines to dele │ │ │ +00000b20: 7465 2066 726f 6d20 7468 6520 7265 706f te from the repo │ │ │ +00000b30: 7274 2e22 203a 7479 7065 2027 2872 6570 rt." :type '(rep │ │ │ +00000b40: 6561 7420 3a63 7573 746f 6d2d 7368 6f77 eat :custom-show │ │ │ +00000b50: 2074 203a 646f 6375 6d65 6e74 6174 696f t :documentatio │ │ │ +00000b60: 6e2d 7368 6f77 6e20 7420 7265 6765 7870 n-shown t regexp │ │ │ +00000b70: 2920 3a67 726f 7570 2027 6275 696c 642d ) :group 'build- │ │ │ +00000b80: 7265 706f 7274 290a 2863 7573 746f 6d2d report).(custom- │ │ │ +00000b90: 6465 636c 6172 652d 7661 7269 6162 6c65 declare-variable │ │ │ +00000ba0: 2027 6275 696c 642d 7265 706f 7274 2d6d 'build-report-m │ │ │ +00000bb0: 616b 652d 6f75 7470 7574 2d64 6972 2027 ake-output-dir ' │ │ │ +00000bc0: 2863 6f6e 6420 2828 6571 7561 6c20 7379 (cond ((equal sy │ │ │ +00000bd0: 7374 656d 2d74 7970 6520 2777 696e 646f stem-type 'windo │ │ │ +00000be0: 7773 2d6e 7429 2028 6578 7061 6e64 2d66 ws-nt) (expand-f │ │ │ +00000bf0: 696c 652d 6e61 6d65 2022 6e74 2220 2867 ile-name "nt" (g │ │ │ +00000c00: 6574 6861 7368 2027 626c 6464 6972 2028 ethash 'blddir ( │ │ │ +00000c10: 636f 6e66 6967 2d76 616c 7565 2d68 6173 config-value-has │ │ │ +00000c20: 682d 7461 626c 6529 2929 2920 2874 2028 h-table)))) (t ( │ │ │ +00000c30: 6765 7468 6173 6820 2762 6c64 6469 7220 gethash 'blddir │ │ │ +00000c40: 2863 6f6e 6669 672d 7661 6c75 652d 6861 (config-value-ha │ │ │ +00000c50: 7368 2d74 6162 6c65 2929 2929 2022 2a44 sh-table)))) "*D │ │ │ +00000c60: 6972 6563 746f 7279 2077 6865 7265 2074 irectory where t │ │ │ +00000c70: 6865 2062 7569 6c64 2072 6570 6f72 7420 he build report │ │ │ +00000c80: 6669 6c65 2069 7320 666f 756e 642e 5c6e file is found.\n │ │ │ +00000c90: 2020 4966 2074 6869 7320 6973 2065 6d70 If this is emp │ │ │ +00000ca0: 7479 206f 7220 6e69 6c2c 2074 6865 2064 ty or nil, the d │ │ │ +00000cb0: 6566 6175 6c74 2c20 6974 2069 7320 7265 efault, it is re │ │ │ +00000cc0: 706c 6163 6564 2062 7920 7468 6520 7661 placed by the va │ │ │ +00000cd0: 6c75 6520 6f66 5c6e 2020 7468 6520 5845 lue of\n the XE │ │ │ +00000ce0: 6d61 6373 2062 7569 6c64 2064 6972 6563 macs build direc │ │ │ +00000cf0: 746f 7279 2e22 203a 7479 7065 2027 2864 tory." :type '(d │ │ │ +00000d00: 6972 6563 746f 7279 203a 6375 7374 6f6d irectory :custom │ │ │ +00000d10: 2d73 686f 7720 7420 3a64 6f63 756d 656e -show t :documen │ │ │ +00000d20: 7461 7469 6f6e 2d73 686f 776e 2074 2920 tation-shown t) │ │ │ +00000d30: 3a67 726f 7570 2027 6275 696c 642d 7265 :group 'build-re │ │ │ +00000d40: 706f 7274 290a 2863 7573 746f 6d2d 6465 port).(custom-de │ │ │ +00000d50: 636c 6172 652d 7661 7269 6162 6c65 2027 clare-variable ' │ │ │ +00000d60: 6275 696c 642d 7265 706f 7274 2d6d 616b build-report-mak │ │ │ +00000d70: 652d 6f75 7470 7574 2d66 696c 6573 2027 e-output-files ' │ │ │ +00000d80: 286c 6973 7420 2262 6574 612e 6572 7222 (list "beta.err" │ │ │ +00000d90: 2022 7865 6d61 6373 2d6d 616b 652d 616c "xemacs-make-al │ │ │ +00000da0: 6c2e 6572 7222 2022 7865 6d61 6373 2d6d l.err" "xemacs-m │ │ │ +00000db0: 616b 652d 6368 6563 6b2d 7465 6d61 6373 ake-check-temacs │ │ │ +00000dc0: 2e65 7272 2220 2278 656d 6163 732d 6d61 .err" "xemacs-ma │ │ │ +00000dd0: 6b65 2d63 6865 636b 2e65 7272 2220 2278 ke-check.err" "x │ │ │ +00000de0: 656d 6163 732d 6d61 6b65 2d69 6e73 7461 emacs-make-insta │ │ │ +00000df0: 6c6c 2e65 7272 2229 2022 2a4c 6973 7420 ll.err") "*List │ │ │ +00000e00: 6f66 2046 696c 656e 616d 6573 2077 6865 of Filenames whe │ │ │ +00000e10: 7265 2073 7464 6f75 7420 616e 6420 7374 re stdout and st │ │ │ +00000e20: 6465 7272 206f 6620 5845 6d61 6373 206d derr of XEmacs m │ │ │ +00000e30: 616b 6520 7072 6f63 6573 735c 6e68 6176 ake process\nhav │ │ │ +00000e40: 6520 6265 656e 2073 746f 7265 642e 2020 e been stored. │ │ │ +00000e50: 5468 6573 6520 6172 6520 7265 6c61 7469 These are relati │ │ │ +00000e60: 7665 2074 6f5c 6e60 6275 696c 642d 7265 ve to\n`build-re │ │ │ +00000e70: 706f 7274 2d6d 616b 652d 6f75 7470 7574 port-make-output │ │ │ +00000e80: 2d64 6972 602e 2020 596f 7527 6c6c 2068 -dir`. You'll h │ │ │ +00000e90: 6176 6520 746f 2072 756e 206d 616b 6520 ave to run make │ │ │ +00000ea0: 7769 7468 206f 7574 7075 745c 6e72 6564 with output\nred │ │ │ +00000eb0: 6972 6563 7469 6f6e 206f 7220 7573 6520 irection or use │ │ │ +00000ec0: 7468 6520 6062 7569 6c64 2720 5845 6d61 the `build' XEma │ │ │ +00000ed0: 6373 2070 6163 6b61 6765 2074 6f20 7361 cs package to sa │ │ │ +00000ee0: 7665 2074 6869 7320 6f75 7470 7574 2e20 ve this output. │ │ │ +00000ef0: 596f 755c 6e6d 6179 2075 7365 2066 6f6c You\nmay use fol │ │ │ +00000f00: 6c6f 7769 6e67 2061 6c69 6173 5c6e 5c6e lowing alias\n\n │ │ │ +00000f10: 616c 6961 7320 6d6b 2027 6d61 6b65 2021 alias mk 'make ! │ │ │ +00000f20: 2a20 3e3e 2621 2021 242e 6572 7220 2627 * >>&! !$.err &' │ │ │ +00000f30: 5c6e 5c6e 756e 6465 7220 6373 682c 2073 \n\nunder csh, s │ │ │ +00000f40: 6f20 7468 6174 2079 6f75 2067 6574 2062 o that you get b │ │ │ +00000f50: 6574 612e 6572 7220 7768 656e 2079 6f75 eta.err when you │ │ │ +00000f60: 2072 756e 2060 6d6b 2062 6574 6127 2e22 run `mk beta'." │ │ │ +00000f70: 203a 7479 7065 2027 2872 6570 6561 7420 :type '(repeat │ │ │ +00000f80: 3a63 7573 746f 6d2d 7368 6f77 2074 203a :custom-show t : │ │ │ +00000f90: 646f 6375 6d65 6e74 6174 696f 6e2d 7368 documentation-sh │ │ │ +00000fa0: 6f77 6e20 7420 6669 6c65 2920 3a67 726f own t file) :gro │ │ │ +00000fb0: 7570 2027 6275 696c 642d 7265 706f 7274 up 'build-report │ │ │ +00000fc0: 290a 2863 7573 746f 6d2d 6465 636c 6172 ).(custom-declar │ │ │ +00000fd0: 652d 7661 7269 6162 6c65 2027 6275 696c e-variable 'buil │ │ │ +00000fe0: 642d 7265 706f 7274 2d69 6e73 7461 6c6c d-report-install │ │ │ +00000ff0: 6174 696f 6e2d 6669 6c65 2027 2865 7870 ation-file '(exp │ │ │ +00001000: 616e 642d 6669 6c65 2d6e 616d 6520 2249 and-file-name "I │ │ │ +00001010: 6e73 7461 6c6c 6174 696f 6e22 2028 6765 nstallation" (ge │ │ │ +00001020: 7468 6173 6820 2762 6c64 6469 7220 2863 thash 'blddir (c │ │ │ +00001030: 6f6e 6669 672d 7661 6c75 652d 6861 7368 onfig-value-hash │ │ │ +00001040: 2d74 6162 6c65 2929 2920 222a 496e 7374 -table))) "*Inst │ │ │ +00001050: 616c 6c61 7469 6f6e 2066 696c 6520 7072 allation file pr │ │ │ +00001060: 6f64 7563 6564 2062 7920 5845 6d61 6373 oduced by XEmacs │ │ │ +00001070: 2063 6f6e 6669 6775 7265 2070 726f 6365 configure proce │ │ │ +00001080: 7373 2e22 203a 7479 7065 2027 2866 696c ss." :type '(fil │ │ │ +00001090: 6520 3a63 7573 746f 6d2d 7368 6f77 2074 e :custom-show t │ │ │ +000010a0: 203a 646f 6375 6d65 6e74 6174 696f 6e2d :documentation- │ │ │ +000010b0: 7368 6f77 6e20 7429 203a 6772 6f75 7020 shown t) :group │ │ │ +000010c0: 2762 7569 6c64 2d72 6570 6f72 7429 0a28 'build-report).( │ │ │ +000010d0: 6375 7374 6f6d 2d64 6563 6c61 7265 2d76 custom-declare-v │ │ │ +000010e0: 6172 6961 626c 6520 2762 7569 6c64 2d72 ariable 'build-r │ │ │ +000010f0: 6570 6f72 742d 7665 7273 696f 6e2d 6669 eport-version-fi │ │ │ +00001100: 6c65 2027 2865 7870 616e 642d 6669 6c65 le '(expand-file │ │ │ +00001110: 2d6e 616d 6520 2276 6572 7369 6f6e 2e73 -name "version.s │ │ │ +00001120: 6822 2028 6765 7468 6173 6820 2762 6c64 h" (gethash 'bld │ │ │ +00001130: 6469 7220 2863 6f6e 6669 672d 7661 6c75 dir (config-valu │ │ │ +00001140: 652d 6861 7368 2d74 6162 6c65 2929 2920 e-hash-table))) │ │ │ +00001150: 222a 7665 7273 696f 6e2e 7368 2066 696c "*version.sh fil │ │ │ +00001160: 6520 6964 656e 7469 6679 696e 6720 5845 e identifying XE │ │ │ +00001170: 6d61 6373 2028 4265 7461 2920 4469 7374 macs (Beta) Dist │ │ │ +00001180: 7269 6275 7469 6f6e 2e22 203a 7479 7065 ribution." :type │ │ │ +00001190: 2027 2866 696c 6520 3a63 7573 746f 6d2d '(file :custom- │ │ │ +000011a0: 7368 6f77 2074 203a 646f 6375 6d65 6e74 show t :document │ │ │ +000011b0: 6174 696f 6e2d 7368 6f77 6e20 7429 203a ation-shown t) : │ │ │ +000011c0: 6772 6f75 7020 2762 7569 6c64 2d72 6570 group 'build-rep │ │ │ +000011d0: 6f72 7429 0a28 6375 7374 6f6d 2d64 6563 ort).(custom-dec │ │ │ +000011e0: 6c61 7265 2d76 6172 6961 626c 6520 2762 lare-variable 'b │ │ │ +000011f0: 7569 6c64 2d72 6570 6f72 742d 696e 7374 uild-report-inst │ │ │ +00001200: 616c 6c61 7469 6f6e 2d69 6e73 6572 742d allation-insert- │ │ │ +00001210: 616c 6c20 276e 696c 2022 2a54 656c 6c20 all 'nil "*Tell │ │ │ +00001220: 6275 696c 642d 7265 706f 7274 2074 6f20 build-report to │ │ │ +00001230: 696e 7365 7274 2074 6865 2077 686f 6c65 insert the whole │ │ │ +00001240: 2049 6e73 7461 6c6c 6174 696f 6e20 6669 Installation fi │ │ │ +00001250: 6c65 5c6e 2020 696e 7374 6561 6420 6f66 le\n instead of │ │ │ +00001260: 206a 7573 7420 7468 6520 6c61 7374 2072 just the last r │ │ │ +00001270: 6570 6f72 742e 2220 3a74 7970 6520 2762 eport." :type 'b │ │ │ +00001280: 6f6f 6c65 616e 203a 6772 6f75 7020 2762 oolean :group 'b │ │ │ +00001290: 7569 6c64 2d72 6570 6f72 7429 0a28 6375 uild-report).(cu │ │ │ +000012a0: 7374 6f6d 2d64 6563 6c61 7265 2d76 6172 stom-declare-var │ │ │ +000012b0: 6961 626c 6520 2762 7569 6c64 2d72 6570 iable 'build-rep │ │ │ +000012c0: 6f72 742d 7375 626a 6563 7420 2728 636f ort-subject '(co │ │ │ +000012d0: 6e63 6174 2022 5b25 735d 2022 2065 6d61 ncat "[%s] " ema │ │ │ +000012e0: 6373 2d76 6572 7369 6f6e 2022 206f 6e20 cs-version " on │ │ │ +000012f0: 2220 7379 7374 656d 2d63 6f6e 6669 6775 " system-configu │ │ │ +00001300: 7261 7469 6f6e 2920 222a 5845 6d61 6373 ration) "*XEmacs │ │ │ +00001310: 2042 7569 6c64 2052 6570 6f72 7420 5375 Build Report Su │ │ │ +00001320: 626a 6563 7420 4c69 6e65 2e20 2573 2d73 bject Line. %s-s │ │ │ +00001330: 6571 7565 6e63 6573 2077 696c 6c20 6265 equences will be │ │ │ +00001340: 2073 7562 7374 6974 7574 6564 5c6e 2020 substituted\n │ │ │ +00001350: 7769 7468 2075 7365 7220 696e 7075 7420 with user input │ │ │ +00001360: 7468 726f 7567 6820 6062 7569 6c64 2d72 through `build-r │ │ │ +00001370: 6570 6f72 7427 2061 6363 6f72 6469 6e67 eport' according │ │ │ +00001380: 2074 6f5c 6e20 2060 6275 696c 642d 7265 to\n `build-re │ │ │ +00001390: 706f 7274 2d70 726f 6d70 7473 2720 7573 port-prompts' us │ │ │ +000013a0: 696e 6720 6066 6f72 6d61 7427 2e22 203a ing `format'." : │ │ │ +000013b0: 7479 7065 2027 2873 7472 696e 6720 3a63 type '(string :c │ │ │ +000013c0: 7573 746f 6d2d 7368 6f77 2074 203a 646f ustom-show t :do │ │ │ +000013d0: 6375 6d65 6e74 6174 696f 6e2d 7368 6f77 cumentation-show │ │ │ +000013e0: 6e20 7429 203a 6772 6f75 7020 2762 7569 n t) :group 'bui │ │ │ +000013f0: 6c64 2d72 6570 6f72 7429 0a28 6375 7374 ld-report).(cust │ │ │ +00001400: 6f6d 2d64 6563 6c61 7265 2d76 6172 6961 om-declare-varia │ │ │ +00001410: 626c 6520 2762 7569 6c64 2d72 6570 6f72 ble 'build-repor │ │ │ +00001420: 742d 7072 6f6d 7074 7320 2727 2828 2253 t-prompts ''(("S │ │ │ +00001430: 7461 7475 733f 3a20 2220 2822 5375 6363 tatus?: " ("Succ │ │ │ +00001440: 6573 7322 2022 4661 696c 7572 6522 2929 ess" "Failure")) │ │ │ +00001450: 2920 222a 5845 6d61 6373 2042 7569 6c64 ) "*XEmacs Build │ │ │ +00001460: 2052 6570 6f72 7420 5072 6f6d 7074 2873 Report Prompt(s │ │ │ +00001470: 292e 2054 6869 7320 6973 2061 206c 6973 ). This is a lis │ │ │ +00001480: 7420 6f66 2070 726f 6d70 742d 7374 7269 t of prompt-stri │ │ │ +00001490: 6e67 5c6e 2020 6c69 7374 7320 7573 6564 ng\n lists used │ │ │ +000014a0: 2062 7920 6062 7569 6c64 2d72 6570 6f72 by `build-repor │ │ │ +000014b0: 7427 2069 6e20 636f 6e6a 756e 6374 696f t' in conjunctio │ │ │ +000014c0: 6e20 7769 7468 5c6e 2020 6062 7569 6c64 n with\n `build │ │ │ +000014d0: 2d72 6570 6f72 742d 7375 626a 6563 7427 -report-subject' │ │ │ +000014e0: 2e20 4561 6368 206c 6973 7420 636f 6e73 . Each list cons │ │ │ +000014f0: 6973 7473 206f 6620 6120 7072 6f6d 7074 ists of a prompt │ │ │ +00001500: 2073 7472 696e 675c 6e20 2066 6f6c 6c6f string\n follo │ │ │ +00001510: 7765 6420 6279 2061 6e79 206e 756d 6265 wed by any numbe │ │ │ +00001520: 7220 6f66 2073 7472 696e 6773 2077 6869 r of strings whi │ │ │ +00001530: 6368 2063 616e 2062 6520 6368 6f73 656e ch can be chosen │ │ │ +00001540: 2076 6961 2074 6865 2068 6973 746f 7279 via the history │ │ │ +00001550: 5c6e 2020 6d65 6368 616e 6973 6d2e 2220 \n mechanism." │ │ │ +00001560: 3a74 7970 6520 2728 7265 7065 6174 203a :type '(repeat : │ │ │ +00001570: 6375 7374 6f6d 2d73 686f 7720 7420 3a64 custom-show t :d │ │ │ +00001580: 6f63 756d 656e 7461 7469 6f6e 2d73 686f ocumentation-sho │ │ │ +00001590: 776e 2074 2028 6c69 7374 203a 7461 6720 wn t (list :tag │ │ │ +000015a0: 2250 726f 6d70 7422 2073 7472 696e 6720 "Prompt" string │ │ │ +000015b0: 2872 6570 6561 7420 3a74 6167 2022 5661 (repeat :tag "Va │ │ │ +000015c0: 6c75 6573 2220 7374 7269 6e67 2929 2920 lues" string))) │ │ │ +000015d0: 3a67 726f 7570 2027 6275 696c 642d 7265 :group 'build-re │ │ │ +000015e0: 706f 7274 290a 2863 7573 746f 6d2d 6465 port).(custom-de │ │ │ +000015f0: 636c 6172 652d 7661 7269 6162 6c65 2027 clare-variable ' │ │ │ +00001600: 6275 696c 642d 7265 706f 7274 2d66 696c build-report-fil │ │ │ +00001610: 652d 656e 636f 6469 6e67 2027 2237 6269 e-encoding '"7bi │ │ │ +00001620: 7422 2022 2a58 456d 6163 7320 4275 696c t" "*XEmacs Buil │ │ │ +00001630: 6420 5265 706f 7274 2046 696c 6520 456e d Report File En │ │ │ +00001640: 636f 6469 6e67 2074 6f20 6265 2075 7365 coding to be use │ │ │ +00001650: 6420 7768 656e 204d 494d 4520 7375 7070 d when MIME supp │ │ │ +00001660: 6f72 7420 6973 5c6e 2020 6176 6169 6c61 ort is\n availa │ │ │ +00001670: 626c 652e 2220 3a67 726f 7570 2027 6275 ble." :group 'bu │ │ │ +00001680: 696c 642d 7265 706f 7274 290a 2862 7974 ild-report).(byt │ │ │ +00001690: 652d 636f 6465 2022 c0c1 21ab 9ec2 c321 e-code "..!....! │ │ │ +000016a0: ac85 c4c3 c55c 2288 c2c6 21ac 85c4 c6c7 .....\"...!..... │ │ │ +000016b0: 5c22 88c2 c821 ac85 c4c8 c95c 2288 c087 \"...!.....\"... │ │ │ +000016c0: 2220 5b66 6561 7475 7265 7020 6d69 6d65 " [featurep mime │ │ │ +000016d0: 2d73 6574 7570 2066 626f 756e 6470 206d -setup fboundp m │ │ │ +000016e0: 696d 652d 6564 6974 2d63 6f6e 7465 6e74 ime-edit-content │ │ │ +000016f0: 2d62 6567 696e 6e69 6e67 2064 6566 616c -beginning defal │ │ │ +00001700: 6961 7320 6d69 6d65 2d65 6469 746f 722f ias mime-editor/ │ │ │ +00001710: 636f 6e74 656e 742d 6265 6769 6e6e 696e content-beginnin │ │ │ +00001720: 6720 6d69 6d65 2d65 6469 742d 696e 7365 g mime-edit-inse │ │ │ +00001730: 7274 2d74 6167 206d 696d 652d 6564 6974 rt-tag mime-edit │ │ │ +00001740: 6f72 2f69 6e73 6572 742d 7461 6720 6d69 or/insert-tag mi │ │ │ +00001750: 6d65 2d65 6469 742d 696e 7365 7274 2d62 me-edit-insert-b │ │ │ +00001760: 696e 6172 792d 6669 6c65 206d 696d 652d inary-file mime- │ │ │ +00001770: 6564 6974 6f72 2f69 6e73 6572 742d 6269 editor/insert-bi │ │ │ +00001780: 6e61 7279 2d66 696c 655d 2033 290a 2340 nary-file] 3).#@ │ │ │ +00001790: 3538 2052 6574 7572 6e73 2074 6865 2066 58 Returns the f │ │ │ +000017a0: 696c 656e 616d 6520 7468 6520 5845 6d61 ilename the XEma │ │ │ +000017b0: 6373 206d 616b 6520 6f75 7470 7574 2069 cs make output i │ │ │ +000017c0: 7320 7361 7665 6420 696e 2e1f 0a28 6465 s saved in...(de │ │ │ +000017d0: 6661 6c69 6173 2027 6275 696c 642d 7265 falias 'build-re │ │ │ +000017e0: 706f 7274 2d6d 616b 652d 6f75 7470 7574 port-make-output │ │ │ +000017f0: 2d67 6574 2023 5b6e 696c 2022 09c2 98ac -get #[nil ".... │ │ │ +00001800: 8309 ac85 c3c4 085c 2287 c3c5 085c 2287 .......\"....\". │ │ │ +00001810: 2220 5b62 7569 6c64 2d72 6570 6f72 742d " [build-report- │ │ │ +00001820: 6d61 6b65 2d6f 7574 7075 742d 6669 6c65 make-output-file │ │ │ +00001830: 7320 6275 696c 642d 7265 706f 7274 2d6d s build-report-m │ │ │ +00001840: 616b 652d 6f75 7470 7574 2d64 6972 2022 ake-output-dir " │ │ │ +00001850: 2220 6d61 7063 6172 2023 5b28 6629 2022 " mapcar #[(f) " │ │ │ +00001860: c108 c2c3 c4c5 205c 2221 5c22 8722 205b ...... \"!\"." [ │ │ │ +00001870: 6620 6578 7061 6e64 2d66 696c 652d 6e61 f expand-file-na │ │ │ +00001880: 6d65 2066 696c 652d 6e61 6d65 2d61 732d me file-name-as- │ │ │ +00001890: 6469 7265 6374 6f72 7920 6765 7468 6173 directory gethas │ │ │ +000018a0: 6820 626c 6464 6972 2063 6f6e 6669 672d h blddir config- │ │ │ +000018b0: 7661 6c75 652d 6861 7368 2d74 6162 6c65 value-hash-table │ │ │ +000018c0: 5d20 365d 2023 5b28 6629 2022 c209 c308 ] 6] #[(f) ".... │ │ │ +000018d0: 215c 2287 2220 5b62 7569 6c64 2d72 6570 !\"." [build-rep │ │ │ +000018e0: 6f72 742d 6d61 6b65 2d6f 7574 7075 742d ort-make-output- │ │ │ +000018f0: 6469 7220 6620 6578 7061 6e64 2d66 696c dir f expand-fil │ │ │ +00001900: 652d 6e61 6d65 2066 696c 652d 6e61 6d65 e-name file-name │ │ │ +00001910: 2d61 732d 6469 7265 6374 6f72 795d 2034 -as-directory] 4 │ │ │ +00001920: 5d5d 2033 2028 2324 202e 2036 3033 3529 ]] 3 (#$ . 6035) │ │ │ +00001930: 206e 696c 5d29 0a23 4037 3934 2052 6570 nil]).#@794 Rep │ │ │ +00001940: 6f72 7420 6275 696c 6420 696e 666f 726d ort build inform │ │ │ +00001950: 6174 696f 6e20 696e 636c 7564 696e 6720 ation including │ │ │ +00001960: 496e 7374 616c 6c61 7469 6f6e 2061 6e64 Installation and │ │ │ +00001970: 206d 616b 6520 6f75 7470 7574 2e0a 0a50 make output...P │ │ │ +00001980: 726f 6d70 7473 2066 6f72 2073 7461 7475 rompts for statu │ │ │ +00001990: 7320 2875 7375 616c 6c79 2022 5375 6363 s (usually "Succ │ │ │ +000019a0: 6573 7322 206f 7220 2246 6169 6c75 7265 ess" or "Failure │ │ │ +000019b0: 2229 2e20 2054 6865 6e20 7573 6573 0a60 "). Then uses.` │ │ │ +000019c0: 636f 6d70 6f73 652d 6d61 696c 2720 746f compose-mail' to │ │ │ +000019d0: 2063 7265 6174 6520 6120 6d61 696c 206d create a mail m │ │ │ +000019e0: 6573 7361 6765 2e20 2054 6865 2053 7562 essage. The Sub │ │ │ +000019f0: 6a65 6374 2068 6561 6465 7220 636f 6e74 ject header cont │ │ │ +00001a00: 6169 6e73 0a73 7461 7475 7320 616e 6420 ains.status and │ │ │ +00001a10: 7665 7273 696f 6e20 696e 666f 726d 6174 version informat │ │ │ +00001a20: 696f 6e2e 2020 506f 696e 7420 6973 206c ion. Point is l │ │ │ +00001a30: 6566 7420 6174 2074 6865 2062 6567 696e eft at the begin │ │ │ +00001a40: 6e69 6e67 206f 6620 7468 650a 6d61 696c ning of the.mail │ │ │ +00001a50: 2074 6578 742e 2020 4164 6420 736f 6d65 text. Add some │ │ │ +00001a60: 206e 6f74 6573 2069 6620 796f 7520 6c69 notes if you li │ │ │ +00001a70: 6b65 2c20 616e 6420 7365 6e64 2074 6865 ke, and send the │ │ │ +00001a80: 2072 6570 6f72 742e 0a0a 4c6f 6f6b 7320 report...Looks │ │ │ +00001a90: 666f 7220 496e 7374 616c 6c61 7469 6f6e for Installation │ │ │ +00001aa0: 2061 6e64 2074 6865 206d 616b 6520 6f75 and the make ou │ │ │ +00001ab0: 7470 7574 2066 696c 6520 2860 6265 7461 tput file (`beta │ │ │ +00001ac0: 2e65 7272 2720 6279 0a64 6566 6175 6c74 .err' by.default │ │ │ +00001ad0: 2c20 6375 7374 6f6d 697a 6162 6c65 2076 , customizable v │ │ │ +00001ae0: 6961 2060 6275 696c 642d 7265 706f 7274 ia `build-report │ │ │ +00001af0: 2d6d 616b 652d 6f75 7470 7574 2d66 696c -make-output-fil │ │ │ +00001b00: 6573 2729 2069 6e20 7468 650a 6275 696c es') in the.buil │ │ │ +00001b10: 6420 6469 7265 6374 6f72 7920 6f66 2074 d directory of t │ │ │ +00001b20: 6865 2072 756e 6e69 6e67 2058 456d 6163 he running XEmac │ │ │ +00001b30: 7320 6279 2064 6566 6175 6c74 2028 6375 s by default (cu │ │ │ +00001b40: 7374 6f6d 697a 6162 6c65 2076 6961 0a60 stomizable via.` │ │ │ +00001b50: 6275 696c 642d 7265 706f 7274 2d6d 616b build-report-mak │ │ │ +00001b60: 652d 6f75 7470 7574 2d64 6972 2729 2e20 e-output-dir'). │ │ │ +00001b70: 2054 6865 206f 7574 7075 7420 6672 6f6d The output from │ │ │ +00001b80: 206d 616b 6520 6973 2066 696c 7465 7265 make is filtere │ │ │ +00001b90: 640a 7468 726f 7567 6820 6062 7569 6c64 d.through `build │ │ │ +00001ba0: 2d72 6570 6f72 742d 6b65 6570 2d72 6567 -report-keep-reg │ │ │ +00001bb0: 6578 7027 2061 6e64 2060 6275 696c 642d exp' and `build- │ │ │ +00001bc0: 7265 706f 7274 2d64 656c 6574 652d 7265 report-delete-re │ │ │ +00001bd0: 6765 7870 270a 6265 666f 7265 2069 6e63 gexp'.before inc │ │ │ +00001be0: 6c75 6469 6e67 2069 6e20 7468 6520 6d65 luding in the me │ │ │ +00001bf0: 7373 6167 652e 0a0a 5365 6520 616c 736f ssage...See also │ │ │ +00001c00: 2060 6d61 696c 2d75 7365 722d 6167 656e `mail-user-agen │ │ │ +00001c10: 7427 2c20 6062 7569 6c64 2d72 6570 6f72 t', `build-repor │ │ │ +00001c20: 742d 6465 7374 696e 6174 696f 6e27 2c20 t-destination', │ │ │ +00001c30: 616e 640a 6062 7569 6c64 2d72 6570 6f72 and.`build-repor │ │ │ +00001c40: 742d 696e 7374 616c 6c61 7469 6f6e 2d66 t-installation-f │ │ │ +00001c50: 696c 6527 2e1f 0a28 6465 6661 6c69 6173 ile'...(defalias │ │ │ +00001c60: 2027 6275 696c 642d 7265 706f 7274 2023 'build-report # │ │ │ +00001c70: 5b28 2672 6573 7420 6172 6773 2920 228a [(&rest args) ". │ │ │ +00001c80: c65c 6e21 abac c75c 6e21 891d 4019 0d41 .\n!...\n!..@..A │ │ │ +00001c90: 4018 c80d 381e 1bc9 0d38 1e1c ca0d 381e @...8....8....8. │ │ │ +00001ca0: 20cb cc09 080e 1b0e 1c0e 2026 0616 1e2e ......... &.... │ │ │ +00001cb0: 06aa a9cd 0e21 2189 1e1d 4019 0e1d 4140 .....!!...@...A@ │ │ │ +00001cc0: 18c8 0e1d 381e 1bc9 0e1d 381e 1ccb cc09 ....8.....8..... │ │ │ +00001cd0: 080e 1b0e 1c0e 5c22 2606 161e 2dce 0e11 ......\"&...-... │ │ │ +00001ce0: 3cab 89cf d00e 1140 d123 aa85 cfd0 0e11 <......@.#...... │ │ │ +00001cf0: 5c22 d2cb 0e1e 0e23 23d3 8989 8989 2607 \".....##.....&. │ │ │ +00001d00: 8860 1cd4 d520 2189 1e1f 4089 1bab a1c6 .`... !...@..... │ │ │ +00001d10: 0b21 ab88 d60c 0b5c 2263 88aa 86cb d70b .!.....\"c...... │ │ │ +00001d20: 5c22 6388 d863 880e 1f41 8916 1f40 8913 \"c..c...A...@.. │ │ │ +00001d30: ac5f c65c 6e21 ab89 d90c 0e24 5c22 6388 ._.\n!.....$\"c. │ │ │ +00001d40: aa86 cbd7 5c6e 5c22 6388 d863 88da 0c21 ....\n\"c..c...! │ │ │ +00001d50: 6388 0c62 2c87 2220 5b6d 696e 6f72 206d c..b,." [minor m │ │ │ +00001d60: 616a 6f72 2062 7569 6c64 2d72 6570 6f72 ajor build-repor │ │ │ +00001d70: 742d 696e 7374 616c 6c61 7469 6f6e 2d66 t-installation-f │ │ │ +00001d80: 696c 6520 6669 6c65 2072 6570 6f72 742d ile file report- │ │ │ +00001d90: 6265 6769 6e20 2331 3d23 3a47 3335 3932 begin #1=#:G3592 │ │ │ +00001da0: 3320 6669 6c65 2d65 7869 7374 732d 7020 3 file-exists-p │ │ │ +00001db0: 6275 696c 642d 7265 706f 7274 2d69 6e73 build-report-ins │ │ │ +00001dc0: 7461 6c6c 6174 696f 6e2d 6461 7461 2032 tallation-data 2 │ │ │ +00001dd0: 2033 2034 2066 6f72 6d61 7420 225b 2525 3 4 format "[%% │ │ │ +00001de0: 735d 2058 456d 6163 7320 2573 2e25 7325 s] XEmacs %s.%s% │ │ │ +00001df0: 7320 5c22 2573 5c22 2c20 2573 2220 6275 s \"%s\", %s" bu │ │ │ +00001e00: 696c 642d 7265 706f 7274 2d76 6572 7369 ild-report-versi │ │ │ +00001e10: 6f6e 2d66 696c 652d 6461 7461 2063 6f6d on-file-data com │ │ │ +00001e20: 706f 7365 2d6d 6169 6c20 7265 6164 2d73 pose-mail read-s │ │ │ +00001e30: 7472 696e 6720 2242 7569 6c64 2052 6570 tring "Build Rep │ │ │ +00001e40: 6f72 7420 4465 7374 696e 6174 696f 6e3a ort Destination: │ │ │ +00001e50: 2022 2062 7569 6c64 2d72 6570 6f72 742d " build-report- │ │ │ +00001e60: 6465 7374 696e 6174 696f 6e20 6170 706c destination appl │ │ │ +00001e70: 7920 6e69 6c20 7265 7665 7273 6520 6275 y nil reverse bu │ │ │ +00001e80: 696c 642d 7265 706f 7274 2d6d 616b 652d ild-report-make- │ │ │ +00001e90: 6f75 7470 7574 2d67 6574 2062 7569 6c64 output-get build │ │ │ +00001ea0: 2d72 6570 6f72 742d 696e 7365 7274 2d6d -report-insert-m │ │ │ +00001eb0: 616b 652d 6f75 7470 7574 2022 2573 206e ake-output "%s n │ │ │ +00001ec0: 6f74 2066 6f75 6e64 215c 6e22 2022 5c6e ot found!\n" "\n │ │ │ +00001ed0: 2220 6275 696c 642d 7265 706f 7274 2d69 " build-report-i │ │ │ +00001ee0: 6e73 6572 742d 696e 7374 616c 6c61 7469 nsert-installati │ │ │ +00001ef0: 6f6e 2d66 696c 6520 6275 696c 642d 7265 on-file build-re │ │ │ +00001f00: 706f 7274 2d69 6e73 6572 742d 6865 6164 port-insert-head │ │ │ +00001f10: 6572 2062 6574 6120 636f 6465 6e61 6d65 er beta codename │ │ │ +00001f20: 2023 323d 233a 4733 3539 3234 2062 7569 #2=#:G35924 bui │ │ │ +00001f30: 6c64 2d72 6570 6f72 742d 7375 626a 6563 ld-report-subjec │ │ │ +00001f40: 7420 6669 6c65 7320 636f 6e66 6967 7572 t files configur │ │ │ +00001f50: 6174 696f 6e20 6275 696c 642d 7265 706f ation build-repo │ │ │ +00001f60: 7274 2d76 6572 7369 6f6e 2d66 696c 6520 rt-version-file │ │ │ +00001f70: 7379 7374 656d 2d63 6f6e 6669 6775 7261 system-configura │ │ │ +00001f80: 7469 6f6e 2061 7267 7320 6275 696c 642d tion args build- │ │ │ +00001f90: 7265 706f 7274 2d69 6e73 7461 6c6c 6174 report-installat │ │ │ +00001fa0: 696f 6e2d 696e 7365 7274 2d61 6c6c 5d20 ion-insert-all] │ │ │ +00001fb0: 3920 2823 2420 2e20 3634 3631 2920 2862 9 (#$ . 6461) (b │ │ │ +00001fc0: 7974 652d 636f 6465 2022 c589 8908 1c1b yte-code "...... │ │ │ +00001fd0: 1a19 0cab 9d0c 4040 110c 4041 8912 403c ......@@..@A..@< │ │ │ +00001fe0: ab83 5c6e 4012 0c41 14c6 09c7 c223 0b42 ..\n@..A.....#.B │ │ │ +00001ff0: 13aa 600b 2c87 2220 5b62 7569 6c64 2d72 ..`.,." [build-r │ │ │ +00002000: 6570 6f72 742d 7072 6f6d 7074 7320 7072 eport-prompts pr │ │ │ +00002010: 6f6d 7074 2068 6973 7420 6172 6720 7072 ompt hist arg pr │ │ │ +00002020: 6f6d 7074 7320 6e69 6c20 7265 6164 2d73 ompts nil read-s │ │ │ +00002030: 7472 696e 6720 2222 5d20 3529 5d29 0a23 tring ""] 5)]).# │ │ │ +00002040: 4036 3820 496e 7365 7274 7320 7468 6520 @68 Inserts the │ │ │ +00002050: 6275 696c 642d 7265 706f 7274 2d68 6561 build-report-hea │ │ │ +00002060: 6465 7220 6174 2074 6865 2070 6f69 6e74 der at the point │ │ │ +00002070: 2073 7065 6369 6669 6564 2062 7920 6077 specified by `w │ │ │ +00002080: 6865 7265 272e 1f0a 2864 6566 616c 6961 here'...(defalia │ │ │ +00002090: 7320 2762 7569 6c64 2d72 6570 6f72 742d s 'build-report- │ │ │ +000020a0: 696e 7365 7274 2d68 6561 6465 7220 235b insert-header #[ │ │ │ +000020b0: 2877 6865 7265 2920 225c 6e62 88c4 c5c6 (where) "\nb.... │ │ │ +000020c0: 2121 1bc7 8e72 0b71 88c8 c909 0823 6388 !!...r.q.....#c. │ │ │ +000020d0: ca20 2b87 2220 5b73 7973 7465 6d2d 636f . +." [system-co │ │ │ +000020e0: 6e66 6967 7572 6174 696f 6e20 656d 6163 nfiguration emac │ │ │ +000020f0: 732d 7665 7273 696f 6e20 7768 6572 6520 s-version where │ │ │ +00002100: 2331 3d23 3a74 656d 702d 6275 6666 6572 #1=#:temp-buffer │ │ │ +00002110: 2067 6574 2d62 7566 6665 722d 6372 6561 get-buffer-crea │ │ │ +00002120: 7465 2067 656e 6572 6174 652d 6e65 772d te generate-new- │ │ │ +00002130: 6275 6666 6572 2d6e 616d 6520 2220 2a74 buffer-name " *t │ │ │ +00002140: 656d 702a 2220 2828 6279 7465 2d63 6f64 emp*" ((byte-cod │ │ │ +00002150: 6520 22c1 0821 ab84 c208 2188 c187 2220 e "..!....!..." │ │ │ +00002160: 5b23 3123 2062 7566 6665 722d 6e61 6d65 [#1# buffer-name │ │ │ +00002170: 206b 696c 6c2d 6275 6666 6572 5d20 3229 kill-buffer] 2) │ │ │ +00002180: 2920 666f 726d 6174 2022 5c6e 3e20 5845 ) format "\n> XE │ │ │ +00002190: 6d61 6373 2042 7569 6c64 2052 6570 6f72 macs Build Repor │ │ │ +000021a0: 7420 6765 6e65 7261 7465 6420 6279 2065 t generated by e │ │ │ +000021b0: 6d61 6373 2d76 6572 7369 6f6e 5c6e 3e20 macs-version\n> │ │ │ +000021c0: 2573 5c6e 3e20 7769 7468 2073 7973 7465 %s\n> with syste │ │ │ +000021d0: 6d2d 636f 6e66 6967 7572 6174 696f 6e5c m-configuration\ │ │ │ +000021e0: 6e3e 2025 735c 6e3e 2066 6f6c 6c6f 7773 n> %s\n> follows │ │ │ +000021f0: 3a5c 6e5c 6e22 2062 7566 6665 722d 7374 :\n\n" buffer-st │ │ │ +00002200: 7269 6e67 5d20 3420 2823 2420 2e20 3832 ring] 4 (#$ . 82 │ │ │ +00002210: 3630 295d 290a 2340 3230 3320 496e 7365 60)]).#@203 Inse │ │ │ +00002220: 7274 7320 7468 6520 6f75 7470 7574 206f rts the output o │ │ │ +00002230: 6620 7468 6520 5845 6d61 6373 2042 6574 f the XEmacs Bet │ │ │ +00002240: 6120 6d61 6b65 2072 756e 2069 6e20 7468 a make run in th │ │ │ +00002250: 650a 6375 7272 656e 7420 6275 6666 6572 e.current buffer │ │ │ +00002260: 2061 7420 706f 7369 7469 6f6e 2057 4845 at position WHE │ │ │ +00002270: 5245 2e0a 5468 6520 6d61 6b65 2070 726f RE..The make pro │ │ │ +00002280: 6365 7373 206f 7574 7075 7420 6d75 7374 cess output must │ │ │ +00002290: 2068 6176 6520 6265 656e 2073 6176 6564 have been saved │ │ │ +000022a0: 2069 6e0a 6062 7569 6c64 2d72 6570 6f72 in.`build-repor │ │ │ +000022b0: 742d 6d61 6b65 2d6f 7574 7075 742d 6669 t-make-output-fi │ │ │ +000022c0: 6c65 7327 2064 7572 696e 6720 7468 6520 les' during the │ │ │ +000022d0: 5845 6d61 6373 2042 6574 6120 6275 696c XEmacs Beta buil │ │ │ +000022e0: 6469 6e67 2e1f 0a28 6465 6661 6c69 6173 ding...(defalias │ │ │ +000022f0: 2027 6275 696c 642d 7265 706f 7274 2d69 'build-report-i │ │ │ +00002300: 6e73 6572 742d 6d61 6b65 2d6f 7574 7075 nsert-make-outpu │ │ │ +00002310: 7420 235b 2877 6865 7265 2066 696c 6529 t #[(where file) │ │ │ +00002320: 2022 0962 88c6 c7c8 2121 1bc9 8e72 0b71 ".b....!!...r.q │ │ │ +00002330: 88ca 0d21 abde cbcc 21ab 93cd cecf d0d1 ...!....!....... │ │ │ +00002340: d20d 21d3 5223 88d4 0d08 5c22 88aa 84d5 ..!.R#....\".... │ │ │ +00002350: 0d21 880c ab88 6562 88d6 d720 2188 5c6e .!....eb... !.\n │ │ │ +00002360: ab88 6562 88d8 d920 2188 6562 880c ab87 ..eb... !.eb.... │ │ │ +00002370: dadb d720 5c22 6388 5c6e ab8e dadc 0cab ... \"c.\n...... │ │ │ +00002380: 83dd aa81 ded9 2023 6388 df63 8865 6288 ...... #c..c.eb. │ │ │ +00002390: dae0 0d5c 2263 88aa 86e1 0de2 b103 88e3 ...\"c.......... │ │ │ +000023a0: 202b 8722 205b 6275 696c 642d 7265 706f +." [build-repo │ │ │ +000023b0: 7274 2d66 696c 652d 656e 636f 6469 6e67 rt-file-encoding │ │ │ +000023c0: 2077 6865 7265 2062 7569 6c64 2d72 6570 where build-rep │ │ │ +000023d0: 6f72 742d 6465 6c65 7465 2d72 6567 6578 ort-delete-regex │ │ │ +000023e0: 7020 2331 3d23 3a74 656d 702d 6275 6666 p #1=#:temp-buff │ │ │ +000023f0: 6572 2062 7569 6c64 2d72 6570 6f72 742d er build-report- │ │ │ +00002400: 6b65 6570 2d72 6567 6578 7020 6669 6c65 keep-regexp file │ │ │ +00002410: 2067 6574 2d62 7566 6665 722d 6372 6561 get-buffer-crea │ │ │ +00002420: 7465 2067 656e 6572 6174 652d 6e65 772d te generate-new- │ │ │ +00002430: 6275 6666 6572 2d6e 616d 6520 2220 2a74 buffer-name " *t │ │ │ +00002440: 656d 702a 2220 2828 6279 7465 2d63 6f64 emp*" ((byte-cod │ │ │ +00002450: 6520 22c1 0821 ab84 c208 2188 c187 2220 e "..!....!..." │ │ │ +00002460: 5b23 3123 2062 7566 6665 722d 6e61 6d65 [#1# buffer-name │ │ │ +00002470: 206b 696c 6c2d 6275 6666 6572 5d20 3229 kill-buffer] 2) │ │ │ +00002480: 2920 6669 6c65 2d65 7869 7374 732d 7020 ) file-exists-p │ │ │ +00002490: 6665 6174 7572 6570 206d 696d 652d 7365 featurep mime-se │ │ │ +000024a0: 7475 7020 6d69 6d65 2d65 6469 742d 696e tup mime-edit-in │ │ │ +000024b0: 7365 7274 2d74 6167 2022 7465 7874 2220 sert-tag "text" │ │ │ +000024c0: 2270 6c61 696e 2220 225c 6e43 6f6e 7465 "plain" "\nConte │ │ │ +000024d0: 6e74 2d44 6973 706f 7369 7469 6f6e 3a20 nt-Disposition: │ │ │ +000024e0: 6174 7461 6368 6d65 6e74 3b22 2022 2066 attachment;" " f │ │ │ +000024f0: 696c 656e 616d 653d 5c22 2220 6669 6c65 ilename=\"" file │ │ │ +00002500: 2d6e 616d 652d 6e6f 6e64 6972 6563 746f -name-nondirecto │ │ │ +00002510: 7279 2022 5c22 2220 6d69 6d65 2d65 6469 ry "\"" mime-edi │ │ │ +00002520: 742d 696e 7365 7274 2d62 696e 6172 792d t-insert-binary- │ │ │ +00002530: 6669 6c65 2069 6e73 6572 742d 6669 6c65 file insert-file │ │ │ +00002540: 2d63 6f6e 7465 6e74 7320 6465 6c65 7465 -contents delete │ │ │ +00002550: 2d6e 6f6e 2d6d 6174 6368 696e 672d 6c69 -non-matching-li │ │ │ +00002560: 6e65 7320 6275 696c 642d 7265 706f 7274 nes build-report │ │ │ +00002570: 2d6b 6565 7020 6465 6c65 7465 2d6d 6174 -keep delete-mat │ │ │ +00002580: 6368 696e 672d 6c69 6e65 7320 6275 696c ching-lines buil │ │ │ +00002590: 642d 7265 706f 7274 2d64 656c 6574 6520 d-report-delete │ │ │ +000025a0: 666f 726d 6174 2022 3e20 6b65 6570 696e format "> keepin │ │ │ +000025b0: 6720 6c69 6e65 7320 6d61 7463 6869 6e67 g lines matching │ │ │ +000025c0: 5c6e 3e20 5c22 2573 5c22 5c6e 2220 223e \n> \"%s\"\n" "> │ │ │ +000025d0: 2025 7364 656c 6574 696e 6720 6c69 6e65 %sdeleting line │ │ │ +000025e0: 7320 6d61 7463 6869 6e67 5c6e 3e20 5c22 s matching\n> \" │ │ │ +000025f0: 2573 5c22 5c6e 2220 2261 6e64 2074 6865 %s\"\n" "and the │ │ │ +00002600: 6e20 2220 2222 2022 5c6e 2220 223e 2043 n " "" "\n" "> C │ │ │ +00002610: 6f6e 7465 6e74 7320 6f66 2025 735c 6e22 ontents of %s\n" │ │ │ +00002620: 2022 3e20 2220 2220 646f 6573 206e 6f74 "> " " does not │ │ │ +00002630: 2065 7869 7374 215c 6e5c 6e22 2062 7566 exist!\n\n" buf │ │ │ +00002640: 6665 722d 7374 7269 6e67 5d20 3720 2823 fer-string] 7 (# │ │ │ +00002650: 2420 2e20 3837 3332 295d 290a 2340 3130 $ . 8732)]).#@10 │ │ │ +00002660: 3820 496e 7365 7274 7320 7468 6520 636f 8 Inserts the co │ │ │ +00002670: 6e74 656e 7473 206f 6620 7468 6520 6062 ntents of the `b │ │ │ +00002680: 7569 6c64 2d72 6570 6f72 742d 696e 7374 uild-report-inst │ │ │ +00002690: 616c 6c61 7469 6f6e 2d66 696c 6527 0a63 allation-file'.c │ │ │ +000026a0: 7265 6174 6564 2062 7920 7468 6520 5845 reated by the XE │ │ │ +000026b0: 6d61 6373 2042 6574 6120 636f 6e66 6967 macs Beta config │ │ │ +000026c0: 7572 6520 7072 6f63 6573 732e 1f0a 2864 ure process...(d │ │ │ +000026d0: 6566 616c 6961 7320 2762 7569 6c64 2d72 efalias 'build-r │ │ │ +000026e0: 6570 6f72 742d 696e 7365 7274 2d69 6e73 eport-insert-ins │ │ │ +000026f0: 7461 6c6c 6174 696f 6e2d 6669 6c65 2023 tallation-file # │ │ │ +00002700: 5b28 7768 6572 6520 616c 6c29 2022 0862 [(where all) ".b │ │ │ +00002710: 88c6 c7c8 2121 1ac9 8e72 5c6e 7188 ca0d ....!!...r\nq... │ │ │ +00002720: 21ab cecb 891b 1ccc 0dcd b103 88ce cf09 !............... │ │ │ +00002730: ab83 d0aa 81d1 5c22 6388 d2d3 21ab 97d4 ......\"c...!... │ │ │ +00002740: d5d6 d7d8 d90d 21da 5223 88db 0d0e 245c ......!.R#....$\ │ │ │ +00002750: 2288 dc20 14aa 8660 14dd 0d21 8809 ac90 ".. ...`...!.... │ │ │ +00002760: dedf 0ce0 2313 0cab 870b ab84 0c0b 7c88 ....#.........|. │ │ │ +00002770: 2aaa 86e1 0de2 b103 88e3 202b 8722 205b *......... +." [ │ │ │ +00002780: 7768 6572 6520 616c 6c20 2331 3d23 3a74 where all #1=#:t │ │ │ +00002790: 656d 702d 6275 6666 6572 206c 6173 742d emp-buffer last- │ │ │ +000027a0: 636f 6e66 6967 7572 6520 6669 6c65 2d62 configure file-b │ │ │ +000027b0: 6567 696e 2062 7569 6c64 2d72 6570 6f72 egin build-repor │ │ │ +000027c0: 742d 696e 7374 616c 6c61 7469 6f6e 2d66 t-installation-f │ │ │ +000027d0: 696c 6520 6765 742d 6275 6666 6572 2d63 ile get-buffer-c │ │ │ +000027e0: 7265 6174 6520 6765 6e65 7261 7465 2d6e reate generate-n │ │ │ +000027f0: 6577 2d62 7566 6665 722d 6e61 6d65 2022 ew-buffer-name " │ │ │ +00002800: 202a 7465 6d70 2a22 2028 2862 7974 652d *temp*" ((byte- │ │ │ +00002810: 636f 6465 2022 c108 21ab 84c2 0821 88c1 code "..!....!.. │ │ │ +00002820: 8722 205b 2331 2320 6275 6666 6572 2d6e ." [#1# buffer-n │ │ │ +00002830: 616d 6520 6b69 6c6c 2d62 7566 6665 725d ame kill-buffer] │ │ │ +00002840: 2032 2929 2066 696c 652d 6578 6973 7473 2)) file-exists │ │ │ +00002850: 2d70 206e 696c 2022 3e20 436f 6e74 656e -p nil "> Conten │ │ │ +00002860: 7473 206f 6620 2220 223a 5c6e 2220 666f ts of " ":\n" fo │ │ │ +00002870: 726d 6174 2022 3e20 284f 7574 7075 7420 rmat "> (Output │ │ │ +00002880: 6672 6f6d 2025 7320 6f66 202e 2f63 6f6e from %s of ./con │ │ │ +00002890: 6669 6775 7265 295c 6e5c 6e22 2022 616c figure)\n\n" "al │ │ │ +000028a0: 6c20 7275 6e73 2220 226d 6f73 7420 7265 l runs" "most re │ │ │ +000028b0: 6365 6e74 2072 756e 2220 6665 6174 7572 cent run" featur │ │ │ +000028c0: 6570 206d 696d 652d 7365 7475 7020 6d69 ep mime-setup mi │ │ │ +000028d0: 6d65 2d65 6469 742d 696e 7365 7274 2d74 me-edit-insert-t │ │ │ +000028e0: 6167 2022 7465 7874 2220 2270 6c61 696e ag "text" "plain │ │ │ +000028f0: 2220 225c 6e43 6f6e 7465 6e74 2d44 6973 " "\nContent-Dis │ │ │ +00002900: 706f 7369 7469 6f6e 3a20 6174 7461 6368 position: attach │ │ │ +00002910: 6d65 6e74 3b22 2022 2066 696c 656e 616d ment;" " filenam │ │ │ +00002920: 653d 5c22 2220 6669 6c65 2d6e 616d 652d e=\"" file-name- │ │ │ +00002930: 6e6f 6e64 6972 6563 746f 7279 2022 5c22 nondirectory "\" │ │ │ +00002940: 2220 6d69 6d65 2d65 6469 742d 696e 7365 " mime-edit-inse │ │ │ +00002950: 7274 2d62 696e 6172 792d 6669 6c65 206d rt-binary-file m │ │ │ +00002960: 696d 652d 6564 6974 2d63 6f6e 7465 6e74 ime-edit-content │ │ │ +00002970: 2d62 6567 696e 6e69 6e67 2069 6e73 6572 -beginning inser │ │ │ +00002980: 742d 6669 6c65 2d63 6f6e 7465 6e74 7320 t-file-contents │ │ │ +00002990: 7365 6172 6368 2d62 6163 6b77 6172 642d search-backward- │ │ │ +000029a0: 7265 6765 7870 2022 5e5c 5c28 756e 616d regexp "^\\(unam │ │ │ +000029b0: 652e 2a5c 5c7c 6f73 7665 7273 696f 6e5c e.*\\|osversion\ │ │ │ +000029c0: 5c7c 4f53 5c5c 293a 5c5c 732d 2b22 2074 \|OS\\):\\s-+" t │ │ │ +000029d0: 2022 3e20 2220 2220 646f 6573 206e 6f74 "> " " does not │ │ │ +000029e0: 2065 7869 7374 215c 6e5c 6e22 2062 7566 exist!\n\n" buf │ │ │ +000029f0: 6665 722d 7374 7269 6e67 2062 7569 6c64 fer-string build │ │ │ +00002a00: 2d72 6570 6f72 742d 6669 6c65 2d65 6e63 -report-file-enc │ │ │ +00002a10: 6f64 696e 675d 2037 2028 2324 202e 2039 oding] 7 (#$ . 9 │ │ │ +00002a20: 3832 3629 5d29 0a23 4032 3035 2043 6f6e 826)]).#@205 Con │ │ │ +00002a30: 6361 7465 6e61 7465 2065 6c65 6d65 6e74 catenate element │ │ │ +00002a40: 7320 6f66 2060 6275 696c 642d 7265 706f s of `build-repo │ │ │ +00002a50: 7274 2d6b 6565 702d 7265 6765 7870 2720 rt-keep-regexp' │ │ │ +00002a60: 616e 6420 6120 6765 6e65 7261 6c0a 4d49 and a general.MI │ │ │ +00002a70: 4d45 2074 6167 2052 4547 4558 502e 2020 ME tag REGEXP. │ │ │ +00002a80: 5468 6520 7265 7375 6c74 2069 7320 6120 The result is a │ │ │ +00002a90: 5245 4745 5850 2073 7472 696e 6720 6d61 REGEXP string ma │ │ │ +00002aa0: 7463 6869 6e67 2065 6974 6865 7220 6f66 tching either of │ │ │ +00002ab0: 2074 6865 0a52 4547 4558 5073 2069 6e20 the.REGEXPs in │ │ │ +00002ac0: 6062 7569 6c64 2d72 6570 6f72 742d 6b65 `build-report-ke │ │ │ +00002ad0: 6570 2d72 6567 6578 7027 206f 7220 6120 ep-regexp' or a │ │ │ +00002ae0: 6765 6e65 7261 6c20 4d49 4d45 2074 6167 general MIME tag │ │ │ +00002af0: 2052 4547 4558 502e 1f0a 2864 6566 616c REGEXP...(defal │ │ │ +00002b00: 6961 7320 2762 7569 6c64 2d72 6570 6f72 ias 'build-repor │ │ │ +00002b10: 742d 6b65 6570 2023 5b6e 696c 2022 c1c2 t-keep #[nil ".. │ │ │ +00002b20: c308 42c4 2387 2220 5b62 7569 6c64 2d72 ..B.#." [build-r │ │ │ +00002b30: 6570 6f72 742d 6b65 6570 2d72 6567 6578 eport-keep-regex │ │ │ +00002b40: 7020 6d61 7063 6f6e 6361 7420 6964 656e p mapconcat iden │ │ │ +00002b50: 7469 7479 2022 5e2d 2d5c 5c5b 5c5c 5b5c tity "^--\\[\\[\ │ │ │ +00002b60: 5c7c 5c5c 5d5c 5c5d 2422 2022 5c5c 7c22 \|\\]\\]$" "\\|" │ │ │ +00002b70: 5d20 3420 2823 2420 2e20 3130 3739 3729 ] 4 (#$ . 10797) │ │ │ +00002b80: 5d29 0a23 4032 3039 2043 6f6e 6361 7465 ]).#@209 Concate │ │ │ +00002b90: 6e61 7465 2065 6c65 6d65 6e74 7320 6f66 nate elements of │ │ │ +00002ba0: 2060 6275 696c 642d 7265 706f 7274 2d64 `build-report-d │ │ │ +00002bb0: 656c 6574 652d 7265 6765 7870 2720 616e elete-regexp' an │ │ │ +00002bc0: 6420 6120 6765 6e65 7261 6c0a 4d49 4d45 d a general.MIME │ │ │ +00002bd0: 2074 6167 2052 4547 4558 502e 2020 5468 tag REGEXP. Th │ │ │ +00002be0: 6520 7265 7375 6c74 2069 7320 6120 5245 e result is a RE │ │ │ +00002bf0: 4745 5850 2073 7472 696e 6720 6d61 7463 GEXP string matc │ │ │ +00002c00: 6869 6e67 2065 6974 6865 7220 6f66 2074 hing either of t │ │ │ +00002c10: 6865 0a52 4547 4558 5073 2069 6e20 6062 he.REGEXPs in `b │ │ │ +00002c20: 7569 6c64 2d72 6570 6f72 742d 6465 6c65 uild-report-dele │ │ │ +00002c30: 7465 2d72 6567 6578 7027 206f 7220 6120 te-regexp' or a │ │ │ +00002c40: 6765 6e65 7261 6c20 4d49 4d45 2074 6167 general MIME tag │ │ │ +00002c50: 2052 4547 4558 502e 1f0a 2864 6566 616c REGEXP...(defal │ │ │ +00002c60: 6961 7320 2762 7569 6c64 2d72 6570 6f72 ias 'build-repor │ │ │ +00002c70: 742d 6465 6c65 7465 2023 5b6e 696c 2022 t-delete #[nil " │ │ │ +00002c80: c1c2 08c3 2387 2220 5b62 7569 6c64 2d72 ....#." [build-r │ │ │ +00002c90: 6570 6f72 742d 6465 6c65 7465 2d72 6567 eport-delete-reg │ │ │ +00002ca0: 6578 7020 6d61 7063 6f6e 6361 7420 235b exp mapconcat #[ │ │ │ +00002cb0: 2869 7465 6d29 2022 0887 2220 5b69 7465 (item) ".." [ite │ │ │ +00002cc0: 6d5d 2031 5d20 225c 5c7c 225d 2034 2028 m] 1] "\\|"] 4 ( │ │ │ +00002cd0: 2324 202e 2031 3131 3435 295d 290a 2340 #$ . 11145)]).#@ │ │ │ +00002ce0: 3138 3520 5265 7475 726e 2061 206c 6973 185 Return a lis │ │ │ +00002cf0: 7420 6f66 2058 456d 6163 7320 696e 7374 t of XEmacs inst │ │ │ +00002d00: 616c 6c61 7469 6f6e 2064 6174 6120 636f allation data co │ │ │ +00002d10: 6e74 6169 6e69 6e67 204d 414a 4f52 5f4e ntaining MAJOR_N │ │ │ +00002d20: 554d 4245 520a 4d49 4e4f 525f 4e55 4d42 UMBER.MINOR_NUMB │ │ │ +00002d30: 4552 2042 4554 415f 5354 5249 4e47 2043 ER BETA_STRING C │ │ │ +00002d40: 4f44 454e 414d 4520 434f 4e46 4947 5552 ODENAME CONFIGUR │ │ │ +00002d50: 4154 494f 4e20 5352 4344 4952 2066 726f ATION SRCDIR fro │ │ │ +00002d60: 6d20 4649 4c45 2c0a 7768 6963 6820 6465 m FILE,.which de │ │ │ +00002d70: 6661 756c 7473 2074 6f20 6062 7569 6c64 faults to `build │ │ │ +00002d80: 2d72 6570 6f72 742d 696e 7374 616c 6c61 -report-installa │ │ │ +00002d90: 7469 6f6e 2d66 696c 6527 2e1f 0a28 6465 tion-file'...(de │ │ │ +00002da0: 6661 6c69 6173 2027 6275 696c 642d 7265 falias 'build-re │ │ │ +00002db0: 706f 7274 2d69 6e73 7461 6c6c 6174 696f port-installatio │ │ │ +00002dc0: 6e2d 6461 7461 2023 5b28 266f 7074 696f n-data #[(&optio │ │ │ +00002dd0: 6e61 6c20 6669 6c65 2920 220d ac82 0c15 nal file) "..... │ │ │ +00002de0: c689 8989 8989 1b1a 1918 1e08 1e09 c78b ................ │ │ │ +00002df0: 2e06 8722 205b 6265 7461 2063 6f64 656e ..." [beta coden │ │ │ +00002e00: 616d 6520 636f 6e66 6967 7572 6174 696f ame configuratio │ │ │ +00002e10: 6e20 7372 6364 6972 2062 7569 6c64 2d72 n srcdir build-r │ │ │ +00002e20: 6570 6f72 742d 696e 7374 616c 6c61 7469 eport-installati │ │ │ +00002e30: 6f6e 2d66 696c 6520 6669 6c65 206e 696c on-file file nil │ │ │ +00002e40: 2028 2862 7974 652d 636f 6465 2022 c60e ((byte-code ".. │ │ │ +00002e50: 1321 8865 6288 6064 57ab c6c7 0e14 21ab .!.eb.`dW.....!. │ │ │ +00002e60: 9ac8 9562 88c9 ca21 15c9 cb21 14c9 cc21 ...b...!...!...! │ │ │ +00002e70: 13c9 cd21 12c9 ce21 11aa 5bc7 0e15 21ab ...!...!..[...!. │ │ │ +00002e80: 8ac8 9562 88c9 ca21 10aa 4bc7 cf21 ab86 ...b...!..K..!.. │ │ │ +00002e90: c895 6288 aa40 c7d0 21ab 3bc8 9562 88aa ..b..@..!.;..b.. │ │ │ +00002ea0: 35d1 0d0c 0bae 81d2 5c6e 0908 2606 8722 5.......\n..&.." │ │ │ +00002eb0: 205b 7372 6364 6972 2063 6f6e 6669 6775 [srcdir configu │ │ │ +00002ec0: 7261 7469 6f6e 2063 6f64 656e 616d 6520 ration codename │ │ │ +00002ed0: 6265 7461 206d 696e 6f72 206d 616a 6f72 beta minor major │ │ │ +00002ee0: 2066 696e 642d 6669 6c65 2d72 6561 642d find-file-read- │ │ │ +00002ef0: 6f6e 6c79 206c 6f6f 6b69 6e67 2d61 7420 only looking-at │ │ │ +00002f00: 3020 6d61 7463 682d 7374 7269 6e67 2031 0 match-string 1 │ │ │ +00002f10: 2032 2033 2036 2037 2022 5e2e 2b24 2220 2 3 6 7 "^.+$" │ │ │ +00002f20: 225c 6e22 2076 616c 7565 7320 2222 2066 "\n" values "" f │ │ │ +00002f30: 696c 6520 6275 696c 642d 7265 706f 7274 ile build-report │ │ │ +00002f40: 2d69 6e73 7461 6c6c 6174 696f 6e2d 7665 -installation-ve │ │ │ +00002f50: 7273 696f 6e2d 7265 6765 7870 2062 7569 rsion-regexp bui │ │ │ +00002f60: 6c64 2d72 6570 6f72 742d 696e 7374 616c ld-report-instal │ │ │ +00002f70: 6c61 7469 6f6e 2d73 7263 6469 722d 7265 lation-srcdir-re │ │ │ +00002f80: 6765 7870 5d20 3729 2920 6d69 6e6f 7220 gexp] 7)) minor │ │ │ +00002f90: 6d61 6a6f 725d 2036 2028 2324 202e 2031 major] 6 (#$ . 1 │ │ │ +00002fa0: 3134 3932 2920 2266 496e 7374 616c 6c61 1492) "fInstalla │ │ │ +00002fb0: 7469 6f6e 2066 696c 653a 2022 5d29 0a23 tion file: "]).# │ │ │ +00002fc0: 4031 3631 2052 6574 7572 6e20 6120 6c69 @161 Return a li │ │ │ +00002fd0: 7374 206f 6620 5845 6d61 6373 2076 6572 st of XEmacs ver │ │ │ +00002fe0: 7369 6f6e 2069 6e66 6f72 6d61 7469 6f6e sion information │ │ │ +00002ff0: 2063 6f6e 7461 696e 696e 670a 4d41 4a4f containing.MAJO │ │ │ +00003000: 525f 4e55 4d42 4552 204d 494e 4f52 5f4e R_NUMBER MINOR_N │ │ │ +00003010: 554d 4245 5220 4245 5441 5f53 5452 494e UMBER BETA_STRIN │ │ │ +00003020: 4720 434f 4445 4e41 4d45 2066 726f 6d20 G CODENAME from │ │ │ +00003030: 4649 4c45 2c20 7768 6963 680a 6465 6661 FILE, which.defa │ │ │ +00003040: 756c 7473 2074 6f20 6062 7569 6c64 2d72 ults to `build-r │ │ │ +00003050: 6570 6f72 742d 7665 7273 696f 6e2d 6669 eport-version-fi │ │ │ +00003060: 6c65 272e 1f0a 2864 6566 616c 6961 7320 le'...(defalias │ │ │ +00003070: 2762 7569 6c64 2d72 6570 6f72 742d 7665 'build-report-ve │ │ │ +00003080: 7273 696f 6e2d 6669 6c65 2d64 6174 6120 rsion-file-data │ │ │ +00003090: 235b 2826 6f70 7469 6f6e 616c 2066 696c #[(&optional fil │ │ │ +000030a0: 6529 2022 0dac 820c 15c6 8989 891b 1a19 e) "............ │ │ │ +000030b0: 18c7 8b2c 8722 205b 6d61 6a6f 7220 6d69 ...,." [major mi │ │ │ +000030c0: 6e6f 7220 6265 7461 2063 6f64 656e 616d nor beta codenam │ │ │ +000030d0: 6520 6275 696c 642d 7265 706f 7274 2d76 e build-report-v │ │ │ +000030e0: 6572 7369 6f6e 2d66 696c 6520 6669 6c65 ersion-file file │ │ │ +000030f0: 206e 696c 2028 2862 7974 652d 636f 6465 nil ((byte-code │ │ │ +00003100: 2022 c609 2188 6562 8860 6457 abb1 c708 "..!.eb.`dW.... │ │ │ +00003110: 21ab 96c8 9562 88c9 ca21 15c9 cb21 14c9 !....b...!...!.. │ │ │ +00003120: cc21 13c9 cd21 12aa 60c7 ce21 ab86 c895 .!...!..`..!.... │ │ │ +00003130: 6288 aa55 c7cf 21ab 50c8 9562 88aa 4ad0 b..U..!.P..b..J. │ │ │ +00003140: 0d0c 0bae 81d1 5c6e 2487 2220 5b62 7569 ......\n$." [bui │ │ │ +00003150: 6c64 2d72 6570 6f72 742d 7665 7273 696f ld-report-versio │ │ │ +00003160: 6e2d 6669 6c65 2d72 6567 6578 7020 6669 n-file-regexp fi │ │ │ +00003170: 6c65 2063 6f64 656e 616d 6520 6265 7461 le codename beta │ │ │ +00003180: 206d 696e 6f72 206d 616a 6f72 2066 696e minor major fin │ │ │ +00003190: 642d 6669 6c65 2d72 6561 642d 6f6e 6c79 d-file-read-only │ │ │ +000031a0: 206c 6f6f 6b69 6e67 2d61 7420 3020 6d61 looking-at 0 ma │ │ │ +000031b0: 7463 682d 7374 7269 6e67 2031 2032 2033 tch-string 1 2 3 │ │ │ +000031c0: 2034 2022 5e2e 2b24 2220 225c 6e22 2076 4 "^.+$" "\n" v │ │ │ +000031d0: 616c 7565 7320 2222 5d20 3529 295d 2034 alues ""] 5))] 4 │ │ │ +000031e0: 2028 2324 202e 2031 3232 3239 2920 2266 (#$ . 12229) "f │ │ │ +000031f0: 7665 7273 696f 6e2e 7368 2066 696c 653a version.sh file: │ │ │ +00003200: 2022 5d29 0a "]). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/byte-optimize.elc │ │ │ @@ -1,1542 +1,1542 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f62 1-21.4.24/lisp/b │ │ │ -00000090: 7974 652d 6f70 7469 6d69 7a65 2e65 6c0a yte-optimize.el. │ │ │ -000000a0: 3b3b 3b20 656d 6163 7320 7665 7273 696f ;;; emacs versio │ │ │ -000000b0: 6e20 3231 2e34 2028 7061 7463 6820 3234 n 21.4 (patch 24 │ │ │ -000000c0: 2920 2253 7461 6e64 6172 6420 4322 2058 ) "Standard C" X │ │ │ -000000d0: 456d 6163 7320 4c75 6369 642e 0a3b 3b3b Emacs Lucid..;;; │ │ │ -000000e0: 2062 7974 6563 6f6d 7020 7665 7273 696f bytecomp versio │ │ │ -000000f0: 6e20 322e 3237 2058 456d 6163 733b 2032 n 2.27 XEmacs; 2 │ │ │ -00000100: 3030 302d 3039 2d31 322e 0a3b 3b3b 206f 000-09-12..;;; o │ │ │ -00000110: 7074 696d 697a 6174 696f 6e20 6973 206f ptimization is o │ │ │ -00000120: 6e2e 0a3b 3b3b 2074 6869 7320 6669 6c65 n..;;; this file │ │ │ -00000130: 2075 7365 7320 6f70 636f 6465 7320 7768 uses opcodes wh │ │ │ -00000140: 6963 6820 646f 206e 6f74 2065 7869 7374 ich do not exist │ │ │ -00000150: 2069 6e20 456d 6163 7320 3139 2e0a 0a28 in Emacs 19...( │ │ │ -00000160: 6966 2028 616e 6420 2862 6f75 6e64 7020 if (and (boundp │ │ │ -00000170: 2765 6d61 6373 2d76 6572 7369 6f6e 290a 'emacs-version). │ │ │ -00000180: 0920 286f 7220 2861 6e64 2028 626f 756e . (or (and (boun │ │ │ -00000190: 6470 2027 6570 6f63 683a 3a76 6572 7369 dp 'epoch::versi │ │ │ -000001a0: 6f6e 2920 6570 6f63 683a 3a76 6572 7369 on) epoch::versi │ │ │ -000001b0: 6f6e 290a 0920 2020 2020 2873 7472 696e on).. (strin │ │ │ -000001c0: 672d 6c65 7373 7020 656d 6163 732d 7665 g-lessp emacs-ve │ │ │ -000001d0: 7273 696f 6e20 2232 3022 2929 290a 2020 rsion "20"))). │ │ │ -000001e0: 2020 2865 7272 6f72 2022 6062 7974 652d (error "`byte- │ │ │ -000001f0: 6f70 7469 6d69 7a65 2e65 6c27 2077 6173 optimize.el' was │ │ │ -00000200: 2063 6f6d 7069 6c65 6420 666f 7220 456d compiled for Em │ │ │ -00000210: 6163 7320 3230 2229 290a 0a28 6f72 2028 acs 20"))..(or ( │ │ │ -00000220: 626f 756e 6470 2027 6375 7272 656e 742d boundp 'current- │ │ │ -00000230: 6c6f 6164 2d6c 6973 7429 2028 7365 7471 load-list) (setq │ │ │ -00000240: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ -00000250: 7374 206e 696c 2929 0a0a 0a28 7265 7175 st nil))...(requ │ │ │ -00000260: 6972 6520 2762 7974 652d 636f 6d70 696c ire 'byte-compil │ │ │ -00000270: 6520 2262 7974 6563 6f6d 7022 290a 2864 e "bytecomp").(d │ │ │ -00000280: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ -00000290: 6d70 696c 652d 6c6f 672d 6c61 702d 3120 mpile-log-lap-1 │ │ │ -000002a0: 235b 2866 6f72 6d61 7420 2672 6573 7420 #[(format &rest │ │ │ -000002b0: 6172 6773 2920 220c c548 ab84 c6c7 2188 args) "..H....!. │ │ │ -000002c0: c8c9 c30b ca89 1a19 cbcc 085c 222a 2321 ...........\"*#! │ │ │ -000002d0: 8722 205b 6172 6773 2063 2061 2066 6f72 ." [args c a for │ │ │ -000002e0: 6d61 7420 6279 7465 2d63 6f64 652d 7665 mat byte-code-ve │ │ │ -000002f0: 6374 6f72 2030 2065 7272 6f72 2022 5468 ctor 0 error "Th │ │ │ -00000300: 6520 6f6c 6420 7665 7273 696f 6e20 6f66 e old version of │ │ │ -00000310: 2074 6865 2064 6973 6173 7365 6d62 6c65 the disassemble │ │ │ -00000320: 7220 6973 206c 6f61 6465 642e 2020 5265 r is loaded. Re │ │ │ -00000330: 6c6f 6164 206e 6577 2d62 7974 6563 6f6d load new-bytecom │ │ │ -00000340: 7020 6173 2077 656c 6c2e 2220 6279 7465 p as well." byte │ │ │ -00000350: 2d63 6f6d 7069 6c65 2d6c 6f67 2d31 2061 -compile-log-1 a │ │ │ -00000360: 7070 6c79 206e 696c 206d 6170 6361 7220 pply nil mapcar │ │ │ -00000370: 235b 2861 7267 2920 220b 3aac 970b 39ab #[(arg) ".:...9. │ │ │ -00000380: 91c5 c6c7 0b21 5c22 ab89 c8c7 0b21 c9ca .....!\".....!.. │ │ │ -00000390: 4f21 870b 870b 4089 14a8 ab85 cbcc 0c5c O!....@........\ │ │ │ -000003a0: 2288 0ccd 61ab 840b 14aa a90c 0973 ab86 "...a........s.. │ │ │ -000003b0: 0b41 4140 aa8c 0c08 73ab 850b 4140 aa82 .AA@....s...A@.. │ │ │ -000003c0: 0b41 12c7 0c21 14c5 ce0c 5c22 ab87 c80c .A...!....\".... │ │ │ -000003d0: c9ca 4f21 140c cf61 ab82 d014 0b41 d161 ..O!...a.....A.a │ │ │ -000003e0: ab87 0cd2 73ac 820c 87d3 d40c 5c6e 2387 ....s.......\n#. │ │ │ -000003f0: 2220 5b62 7974 652d 636f 6e73 7472 6566 " [byte-constref │ │ │ -00000400: 2d6f 7073 2062 7974 652d 676f 746f 2d6f -ops byte-goto-o │ │ │ -00000410: 7073 2061 2061 7267 2063 2073 7472 696e ps a arg c strin │ │ │ -00000420: 672d 6d61 7463 6820 225e 6279 7465 2d22 g-match "^byte-" │ │ │ -00000430: 2073 796d 626f 6c2d 6e61 6d65 2069 6e74 symbol-name int │ │ │ -00000440: 6572 6e20 3520 6e69 6c20 6572 726f 7220 ern 5 nil error │ │ │ -00000450: 226e 6f6e 2d73 796d 626f 6c69 6320 6279 "non-symbolic by │ │ │ -00000460: 7465 2d6f 7020 2573 2220 5441 4720 225e te-op %s" TAG "^ │ │ │ -00000470: 6279 7465 2d2e 2220 636f 6e73 7461 6e74 byte-." constant │ │ │ -00000480: 2063 6f6e 7374 2030 2028 756e 6269 6e64 const 0 (unbind │ │ │ -00000490: 2063 616c 6c20 636f 6e73 7429 2066 6f72 call const) for │ │ │ -000004a0: 6d61 7420 2228 2573 2025 7329 225d 2034 mat "(%s %s)"] 4 │ │ │ -000004b0: 5d5d 2037 5d29 0a28 6465 6661 6c69 6173 ]] 7]).(defalias │ │ │ -000004c0: 2027 6279 7465 2d63 6f6d 7069 6c65 2d6c 'byte-compile-l │ │ │ -000004d0: 6f67 2d6c 6170 2027 286d 6163 726f 202e og-lap '(macro . │ │ │ -000004e0: 2023 5b28 666f 726d 6174 2d73 7472 696e #[(format-strin │ │ │ -000004f0: 6720 2672 6573 7420 6172 6773 2920 22c2 g &rest args) ". │ │ │ -00000500: c3c4 0908 4242 4587 2220 5b61 7267 7320 ....BBE." [args │ │ │ -00000510: 666f 726d 6174 2d73 7472 696e 6720 616e format-string an │ │ │ -00000520: 6420 286d 656d 7120 6279 7465 2d6f 7074 d (memq byte-opt │ │ │ -00000530: 696d 697a 652d 6c6f 6720 2728 7420 6279 imize-log '(t by │ │ │ -00000540: 7465 2929 2062 7974 652d 636f 6d70 696c te)) byte-compil │ │ │ -00000550: 652d 6c6f 672d 6c61 702d 315d 2035 5d29 e-log-lap-1] 5]) │ │ │ -00000560: 290a 2870 7574 2027 696e 6c69 6e65 2027 ).(put 'inline ' │ │ │ -00000570: 6279 7465 2d6f 7074 696d 697a 6572 2027 byte-optimizer ' │ │ │ -00000580: 6279 7465 2d6f 7074 696d 697a 652d 696e byte-optimize-in │ │ │ -00000590: 6c69 6e65 2d68 616e 646c 6572 290a 2340 line-handler).#@ │ │ │ -000005a0: 3534 2062 7974 652d 6f70 7469 6d69 7a65 54 byte-optimize │ │ │ -000005b0: 2d68 616e 646c 6572 2066 6f72 2074 6865 -handler for the │ │ │ -000005c0: 2060 696e 6c69 6e65 2720 7370 6563 6961 `inline' specia │ │ │ -000005d0: 6c2d 666f 726d 2e1f 0a28 6465 6661 6c69 l-form...(defali │ │ │ -000005e0: 6173 2027 6279 7465 2d6f 7074 696d 697a as 'byte-optimiz │ │ │ -000005f0: 652d 696e 6c69 6e65 2d68 616e 646c 6572 e-inline-handler │ │ │ -00000600: 2023 5b28 666f 726d 2920 22c1 c2c3 0841 #[(form) "....A │ │ │ -00000610: 5c22 4287 2220 5b66 6f72 6d20 7072 6f67 \"B." [form prog │ │ │ -00000620: 6e20 6d61 7063 6172 2023 5b28 7365 7870 n mapcar #[(sexp │ │ │ -00000630: 2920 225c 6ea2 891b 39ab a80b 09b7 41ac ) "\n...9.....A. │ │ │ -00000640: 9dc4 0b21 ab9d 0b08 b741 ac97 0b4b 8913 ...!.....A...K.. │ │ │ -00000650: 3aab 860b 40c5 61ac 8ac6 0b21 ac85 c75c :...@.a....!...\ │ │ │ -00000660: 6e21 aa81 5c6e 2987 2220 5b62 7974 652d n!..\n)." [byte- │ │ │ -00000670: 636f 6d70 696c 652d 6d61 6372 6f2d 656e compile-macro-en │ │ │ -00000680: 7669 726f 6e6d 656e 7420 6279 7465 2d63 vironment byte-c │ │ │ -00000690: 6f6d 7069 6c65 2d66 756e 6374 696f 6e2d ompile-function- │ │ │ -000006a0: 656e 7669 726f 6e6d 656e 7420 7365 7870 environment sexp │ │ │ -000006b0: 2066 6e20 6662 6f75 6e64 7020 6d61 6372 fn fboundp macr │ │ │ -000006c0: 6f20 7375 6272 7020 6279 7465 2d63 6f6d o subrp byte-com │ │ │ -000006d0: 7069 6c65 2d69 6e6c 696e 652d 6578 7061 pile-inline-expa │ │ │ -000006e0: 6e64 5d20 335d 5d20 3420 2823 2420 2e20 nd] 3]] 4 (#$ . │ │ │ -000006f0: 3134 3433 295d 290a 2864 6566 616c 6961 1443)]).(defalia │ │ │ -00000700: 7320 2762 7974 652d 696e 6c69 6e65 2d6c s 'byte-inline-l │ │ │ -00000710: 6170 636f 6465 2023 5b28 6c61 7029 2022 apcode #[(lap) " │ │ │ -00000720: 089f 09a4 8911 8722 205b 6c61 7020 6279 ......." [lap by │ │ │ -00000730: 7465 2d63 6f6d 7069 6c65 2d6f 7574 7075 te-compile-outpu │ │ │ -00000740: 745d 2032 5d29 0a28 6465 6661 6c69 6173 t] 2]).(defalias │ │ │ -00000750: 2027 6279 7465 2d63 6f6d 7069 6c65 2d69 'byte-compile-i │ │ │ -00000760: 6e6c 696e 652d 6578 7061 6e64 2023 5b28 nline-expand #[( │ │ │ -00000770: 666f 726d 2920 2209 4089 1a08 b741 ae87 form) ".@....A.. │ │ │ -00000780: c45c 6e21 ad82 5c6e 4b89 1bac 88c5 c65c .\n!..\nK......\ │ │ │ -00000790: 6e5c 2288 09aa e70b 3aab 9a0b 40c7 61ab n\".....:...@.a. │ │ │ -000007a0: 94c8 0b41 4021 885c 6e08 b741 ae87 c45c ...A@!.\n..A...\ │ │ │ -000007b0: 6e21 ad82 5c6e 4b13 0b3a ab8e 0b40 c761 n!..\nK..:...@.a │ │ │ -000007c0: ab88 c9ca 0b41 405c 6e23 880b 39ab 88cb .....A@\n#..9... │ │ │ -000007d0: 0b09 4142 21aa abcc 0b21 ab99 cd0b 2188 ..AB!....!....!. │ │ │ -000007e0: cecf 0b21 d0d1 0b21 d20b 21d3 0b21 4645 ...!...!..!..!FE │ │ │ -000007f0: 0941 42aa 8d0b a2ce 61ab 860b 0941 42aa .AB.....a....AB. │ │ │ -00000800: 8109 2a87 2220 5b62 7974 652d 636f 6d70 ..*." [byte-comp │ │ │ -00000810: 696c 652d 6675 6e63 7469 6f6e 2d65 6e76 ile-function-env │ │ │ -00000820: 6972 6f6e 6d65 6e74 2066 6f72 6d20 6e61 ironment form na │ │ │ -00000830: 6d65 2066 6e20 6662 6f75 6e64 7020 6279 me fn fboundp by │ │ │ -00000840: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e20 te-compile-warn │ │ │ -00000850: 2261 7474 656d 7074 2074 6f20 696e 6c69 "attempt to inli │ │ │ -00000860: 6e65 2025 7320 6265 666f 7265 2069 7420 ne %s before it │ │ │ -00000870: 7761 7320 6465 6669 6e65 6422 2061 7574 was defined" aut │ │ │ -00000880: 6f6c 6f61 6420 6c6f 6164 2065 7272 6f72 oload load error │ │ │ -00000890: 2022 6669 6c65 205c 2225 735c 2220 6469 "file \"%s\" di │ │ │ -000008a0: 646e 2774 2064 6566 696e 6520 5c22 2573 dn't define \"%s │ │ │ -000008b0: 5c22 2220 6279 7465 2d63 6f6d 7069 6c65 \"" byte-compile │ │ │ -000008c0: 2d69 6e6c 696e 652d 6578 7061 6e64 2063 -inline-expand c │ │ │ -000008d0: 6f6d 7069 6c65 642d 6675 6e63 7469 6f6e ompiled-function │ │ │ -000008e0: 2d70 2066 6574 6368 2d62 7974 6563 6f64 -p fetch-bytecod │ │ │ -000008f0: 6520 6c61 6d62 6461 2063 6f6d 7069 6c65 e lambda compile │ │ │ -00000900: 642d 6675 6e63 7469 6f6e 2d61 7267 6c69 d-function-argli │ │ │ -00000910: 7374 2062 7974 652d 636f 6465 2063 6f6d st byte-code com │ │ │ -00000920: 7069 6c65 642d 6675 6e63 7469 6f6e 2d69 piled-function-i │ │ │ -00000930: 6e73 7472 7563 7469 6f6e 7320 636f 6d70 nstructions comp │ │ │ -00000940: 696c 6564 2d66 756e 6374 696f 6e2d 636f iled-function-co │ │ │ -00000950: 6e73 7461 6e74 7320 636f 6d70 696c 6564 nstants compiled │ │ │ -00000960: 2d66 756e 6374 696f 6e2d 7374 6163 6b2d -function-stack- │ │ │ -00000970: 6465 7074 685d 2038 5d29 0a28 6465 6661 depth] 8]).(defa │ │ │ -00000980: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ -00000990: 6c65 2d75 6e66 6f6c 642d 6c61 6d62 6461 le-unfold-lambda │ │ │ -000009a0: 2023 5b28 666f 726d 2026 6f70 7469 6f6e #[(form &option │ │ │ -000009b0: 616c 206e 616d 6529 2022 09ac 82c6 110e al name) "...... │ │ │ -000009c0: 2340 0e23 411c 1ac7 5c6e 21ab 91c2 c85c #@.#A...\n!....\ │ │ │ -000009d0: 6e21 c9ca 5c6e 21cb 5c6e 21cc 5c6e 2146 n!..\n!.\n!.\n!F │ │ │ -000009e0: 4512 5c6e 4140 5c6e 4141 cd89 8918 1e24 E.\nA@\nAA.....$ │ │ │ -000009f0: 1e25 1b1d 0b40 3bab 870b 41ab 830b 4113 .%...@;...A...A. │ │ │ -00000a00: 0b40 3aab 8a0b 4040 ce61 ab83 0b41 130d .@:...@@.a...A.. │ │ │ -00000a10: abf2 0d40 cf61 ab97 0e24 ab85 d0d1 095c ...@.a...$.....\ │ │ │ -00000a20: 2288 0d41 ac85 d0d2 095c 2288 d316 25aa "..A.....\"...%. │ │ │ -00000a30: cf0d 40d4 61ab 980d 41ac 85d0 d509 5c22 ..@.a...A.....\" │ │ │ -00000a40: 880d 4141 ab85 d0d6 095c 2288 d316 24aa ..AA.....\"...$. │ │ │ -00000a50: b10e 24ab 900d 400c ad83 d70c 4244 0842 ..$...@.....BD.B │ │ │ -00000a60: 10cd 14aa 9d0e 25ac 8e0c ac8b d8d9 095c ......%........\ │ │ │ -00000a70: 2288 cd15 da14 aa8b 0d40 0c40 4408 4210 "........@.@D.B. │ │ │ -00000a80: 0c41 140d 4189 15ac 0e0c ab8e 0cda 61ac .A..A.........a. │ │ │ -00000a90: 85d8 db09 5c22 880e 23aa b108 ab88 dc08 ....\"..#....... │ │ │ -00000aa0: 9f0b 4242 aa83 dd0b 421e 260e 27ab 9a0e ..BB....B.&.'... │ │ │ -00000ab0: 28de 73ab 94d3 df89 1e29 1e2a 1e2b e0e1 (.s......).*.+.. │ │ │ -00000ac0: e20e 230e 2623 2188 2b0e 2629 2e07 8722 ..#.&#!.+.&)..." │ │ │ -00000ad0: 205b 6269 6e64 696e 6773 206e 616d 6520 [bindings name │ │ │ -00000ae0: 6c61 6d62 6461 2062 6f64 7920 7661 6c75 lambda body valu │ │ │ -00000af0: 6573 2061 7267 6c69 7374 2022 616e 6f6e es arglist "anon │ │ │ -00000b00: 796d 6f75 7320 6c61 6d62 6461 2220 636f ymous lambda" co │ │ │ -00000b10: 6d70 696c 6564 2d66 756e 6374 696f 6e2d mpiled-function- │ │ │ -00000b20: 7020 636f 6d70 696c 6564 2d66 756e 6374 p compiled-funct │ │ │ -00000b30: 696f 6e2d 6172 676c 6973 7420 6279 7465 ion-arglist byte │ │ │ -00000b40: 2d63 6f64 6520 636f 6d70 696c 6564 2d66 -code compiled-f │ │ │ -00000b50: 756e 6374 696f 6e2d 696e 7374 7275 6374 unction-instruct │ │ │ -00000b60: 696f 6e73 2063 6f6d 7069 6c65 642d 6675 ions compiled-fu │ │ │ -00000b70: 6e63 7469 6f6e 2d63 6f6e 7374 616e 7473 nction-constants │ │ │ -00000b80: 2063 6f6d 7069 6c65 642d 6675 6e63 7469 compiled-functi │ │ │ -00000b90: 6f6e 2d73 7461 636b 2d64 6570 7468 206e on-stack-depth n │ │ │ -00000ba0: 696c 2069 6e74 6572 6163 7469 7665 2026 il interactive & │ │ │ -00000bb0: 6f70 7469 6f6e 616c 2065 7272 6f72 2022 optional error " │ │ │ -00000bc0: 266f 7074 696f 6e61 6c20 666f 756e 6420 &optional found │ │ │ -00000bd0: 6166 7465 7220 2672 6573 7420 696e 2025 after &rest in % │ │ │ -00000be0: 7322 2022 6e6f 7468 696e 6720 6166 7465 s" "nothing afte │ │ │ -00000bf0: 7220 266f 7074 696f 6e61 6c20 696e 2025 r &optional in % │ │ │ -00000c00: 7322 2074 2026 7265 7374 2022 6e6f 7468 s" t &rest "noth │ │ │ -00000c10: 696e 6720 6166 7465 7220 2672 6573 7420 ing after &rest │ │ │ -00000c20: 696e 2025 7322 2022 6d75 6c74 6970 6c65 in %s" "multiple │ │ │ -00000c30: 2076 6172 7320 6166 7465 7220 2672 6573 vars after &res │ │ │ -00000c40: 7420 696e 2025 7322 206c 6973 7420 6279 t in %s" list by │ │ │ -00000c50: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e20 te-compile-warn │ │ │ -00000c60: 2261 7474 656d 7074 2074 6f20 6f70 656e "attempt to open │ │ │ -00000c70: 2d63 6f64 6520 2573 2077 6974 6820 746f -code %s with to │ │ │ -00000c80: 6f20 6665 7720 6172 6775 6d65 6e74 7322 o few arguments" │ │ │ -00000c90: 2074 6f6f 2d66 6577 2022 6174 7465 6d70 too-few "attemp │ │ │ -00000ca0: 7420 746f 206f 7065 6e2d 636f 6465 2025 t to open-code % │ │ │ -00000cb0: 7320 7769 7468 2074 6f6f 206d 616e 7920 s with too many │ │ │ -00000cc0: 6172 6775 6d65 6e74 7322 206c 6574 2070 arguments" let p │ │ │ -00000cd0: 726f 676e 2028 7420 736f 7572 6365 2920 rogn (t source) │ │ │ -00000ce0: 3420 6279 7465 2d63 6f6d 7069 6c65 2d6c 4 byte-compile-l │ │ │ -00000cf0: 6f67 2d31 2066 6f72 6d61 7420 2220 2025 og-1 format " % │ │ │ -00000d00: 7309 3d3d 3e09 2573 2220 666f 726d 2072 s.==>.%s" form r │ │ │ -00000d10: 6573 7470 206f 7074 696f 6e61 6c70 206e estp optionalp n │ │ │ -00000d20: 6577 666f 726d 2062 7974 652d 6f70 7469 ewform byte-opti │ │ │ -00000d30: 6d69 7a65 2062 7974 652d 6f70 7469 6d69 mize byte-optimi │ │ │ -00000d40: 7a65 2d6c 6f67 2070 7269 6e74 2d6c 656e ze-log print-len │ │ │ -00000d50: 6774 6820 7072 696e 742d 6c65 7665 6c20 gth print-level │ │ │ -00000d60: 7072 696e 742d 6573 6361 7065 2d6e 6577 print-escape-new │ │ │ -00000d70: 6c69 6e65 735d 2038 5d29 0a28 6465 6661 lines] 8]).(defa │ │ │ -00000d80: 6c69 6173 2027 6279 7465 2d6f 7074 696d lias 'byte-optim │ │ │ -00000d90: 697a 652d 666f 726d 2d63 6f64 652d 7761 ize-form-code-wa │ │ │ -00000da0: 6c6b 6572 2023 5b28 666f 726d 2066 6f72 lker #[(form for │ │ │ -00000db0: 2d65 6666 6563 7429 2022 0da2 c619 1c0d -effect) "...... │ │ │ -00000dc0: 3aac 960b ad8b 08ae 880d 393f ae83 0dc7 :.........9?.... │ │ │ -00000dd0: 613f 8552 020d 8252 020c c861 ab9b 0d41 a?.R...R...a...A │ │ │ -00000de0: 41ab 87c9 cacb 0d21 5c22 880d 4140 8552 A......!\"..A@.R │ │ │ -00000df0: 020b 3f85 5202 0d82 5202 cc0c 21ac 860c ..?.R...R...!... │ │ │ -00000e00: a2cd 61ab 86ce 0d21 8252 020c cf73 ab92 ..a....!.R...s.. │ │ │ -00000e10: 0cd0 d10d 4140 5c22 d20d 4141 0b5c 2242 ....A@\"..AA.\"B │ │ │ -00000e20: 4282 5202 0cd3 61ab 8a0c d0d4 0d41 5c22 B.R...a......A\" │ │ │ -00000e30: 4282 5202 0cd5 61ab a30d 4141 ab95 d20d B.R...a...AA.... │ │ │ -00000e40: 410b 5c22 8911 41ab 86d5 0942 8252 0209 A.\"..A....B.R.. │ │ │ -00000e50: 4082 5202 d60d 4140 0b5c 2282 5202 0cd7 @.R...A@.\".R... │ │ │ -00000e60: 61ab a00d 4141 ab92 d7d6 0d41 400b 5c22 a...AA.....A@.\" │ │ │ -00000e70: d20d 4141 c75c 2242 4282 5202 d60d 4140 ..AA.\"BB.R...A@ │ │ │ -00000e80: 0b5c 2282 5202 0cd8 61ab 9ad8 d60d 4140 .\".R...a.....A@ │ │ │ -00000e90: c75c 22d6 d90d 380b 5c22 d20d 4141 41c7 .\"...8.\"..AAA. │ │ │ -00000ea0: 5c22 4242 4282 5202 0cda 73ab 8a0c d20d \"BBB.R...s..... │ │ │ -00000eb0: 410b 5c22 4282 5202 0cdb 61ab 920c d60d A.\"B.R...a..... │ │ │ -00000ec0: 4140 c65c 22d2 0d41 410b 5c22 4242 8252 A@.\"..AA.\"BB.R │ │ │ -00000ed0: 020c dc61 ab99 0cd6 0d41 40c6 5c22 d6d9 ...a.....A@.\".. │ │ │ -00000ee0: 0d38 0b5c 22d2 dd0d 9b0b 5c22 4242 4282 .8.\".....\"BBB. │ │ │ -00000ef0: 5202 0cde 73ab d90b abcc df0d 4121 891a R...s.......A!.. │ │ │ -00000f00: ab8f 5c6e d65c 6e40 0b5c 22a0 ac86 5c6e ..\n.\n@.\"...\n │ │ │ -00000f10: 4189 12ac 710d 41ab 9e5c 6eac 9b0e 36ab A...q.A..\n...6. │ │ │ -00000f20: 970e 37e0 73ab 91c7 e189 1e38 1e39 1e3a ..7.s......8.9.: │ │ │ -00000f30: e2e3 e40d 5c22 2188 2b5c 6eab 885c 6ed0 ....\"!.+\n..\n. │ │ │ -00000f40: d65c 6e41 5c22 a188 0c5c 6e9f 2942 8252 .\nA\"...\n.)B.R │ │ │ -00000f50: 020c d0d6 0d41 5c22 4282 5202 0ce5 61ab .....A\"B.R...a. │ │ │ -00000f60: 8bc9 e6cb 0d21 5c22 88c6 8252 020c e773 .....!\"...R...s │ │ │ -00000f70: ab84 0d82 5202 0ce8 61ab 8f0c d60d 4140 ....R...a.....A@ │ │ │ -00000f80: 0b5c 220d 4141 4242 8252 020c e961 ab8f .\".AABB.R...a.. │ │ │ -00000f90: 0cd6 0d41 40c6 5c22 0d41 4142 4282 5202 ...A@.\".AABB.R. │ │ │ -00000fa0: 0dea 0d0e 3b5c 2289 1561 ac86 d60d 0b5c ....;\"..a.....\ │ │ │ -00000fb0: 22aa fceb ec21 ab9a 0da2 39ab 950d a2ed "....!....9..... │ │ │ -00000fc0: 4eab 8f0d ec0d 2189 1561 ac86 d60d 0b5c N.....!..a.....\ │ │ │ -00000fd0: 22aa dd0c 39ac 900c a2ee 61ac 87c9 efcb "...9.....a..... │ │ │ -00000fe0: 0c21 5c22 880d aac9 0bab bf0c f04e 8911 .!\".........N.. │ │ │ -00000ff0: abb8 08ac 8e09 f161 ac89 c9f2 cb0d 215c .......a......!\ │ │ │ -00001000: 2288 aaa7 0e36 ab97 0e37 e073 ab91 c7e1 "....6...7.s.... │ │ │ -00001010: 891e 381e 391e 3ae2 e3f3 0c5c 2221 882b ..8.9.:....\"!.+ │ │ │ -00001020: d6d5 f40d 41f5 5c22 42c7 5c22 aa87 0cd0 ....A.\"B.\".... │ │ │ -00001030: d60d 415c 2242 2a87 2220 5b62 7974 652d ..A\"B*." [byte- │ │ │ -00001040: 636f 6d70 696c 652d 6465 6c65 7465 2d65 compile-delete-e │ │ │ -00001050: 7272 6f72 7320 746d 7020 6261 636b 7761 rrors tmp backwa │ │ │ -00001060: 7264 7320 666f 722d 6566 6665 6374 2066 rds for-effect f │ │ │ -00001070: 6e20 666f 726d 206e 696c 2074 2071 756f n form nil t quo │ │ │ -00001080: 7465 2062 7974 652d 636f 6d70 696c 652d te byte-compile- │ │ │ -00001090: 7761 726e 2022 6d61 6c66 6f72 6d65 6420 warn "malformed │ │ │ -000010a0: 7175 6f74 6520 666f 726d 3a20 2573 2220 quote form: %s" │ │ │ -000010b0: 7072 696e 312d 746f 2d73 7472 696e 6720 prin1-to-string │ │ │ -000010c0: 636f 6d70 696c 6564 2d66 756e 6374 696f compiled-functio │ │ │ -000010d0: 6e2d 7020 6c61 6d62 6461 2062 7974 652d n-p lambda byte- │ │ │ -000010e0: 636f 6d70 696c 652d 756e 666f 6c64 2d6c compile-unfold-l │ │ │ -000010f0: 616d 6264 6120 286c 6574 206c 6574 2a29 ambda (let let*) │ │ │ -00001100: 206d 6170 6361 7220 235b 2862 696e 6469 mapcar #[(bindi │ │ │ -00001110: 6e67 2920 2208 39ab 8208 8708 4141 ab87 ng) ".9.....AA.. │ │ │ -00001120: c1c2 c308 215c 2288 0840 c408 4140 c55c ....!\"..@..A@.\ │ │ │ -00001130: 2244 8722 205b 6269 6e64 696e 6720 6279 "D." [binding by │ │ │ -00001140: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e20 te-compile-warn │ │ │ -00001150: 226d 616c 666f 726d 6564 206c 6574 2062 "malformed let b │ │ │ -00001160: 696e 6469 6e67 3a20 2573 2220 7072 696e inding: %s" prin │ │ │ -00001170: 312d 746f 2d73 7472 696e 6720 6279 7465 1-to-string byte │ │ │ -00001180: 2d6f 7074 696d 697a 652d 666f 726d 206e -optimize-form n │ │ │ -00001190: 696c 5d20 345d 2062 7974 652d 6f70 7469 il] 4] byte-opti │ │ │ -000011a0: 6d69 7a65 2d62 6f64 7920 636f 6e64 2023 mize-body cond # │ │ │ -000011b0: 5b28 636c 6175 7365 2920 2209 3aab 8cc2 [(clause) ".:... │ │ │ -000011c0: 0940 c35c 22c4 0941 085c 2242 87c5 c6c7 .@.\"..A.\"B.... │ │ │ -000011d0: 0921 5c22 8809 8722 205b 666f 722d 6566 .!\"..." [for-ef │ │ │ -000011e0: 6665 6374 2063 6c61 7573 6520 6279 7465 fect clause byte │ │ │ -000011f0: 2d6f 7074 696d 697a 652d 666f 726d 206e -optimize-form n │ │ │ -00001200: 696c 2062 7974 652d 6f70 7469 6d69 7a65 il byte-optimize │ │ │ -00001210: 2d62 6f64 7920 6279 7465 2d63 6f6d 7069 -body byte-compi │ │ │ -00001220: 6c65 2d77 6172 6e20 226d 616c 666f 726d le-warn "malform │ │ │ -00001230: 6564 2063 6f6e 6420 666f 726d 3a20 2573 ed cond form: %s │ │ │ -00001240: 2220 7072 696e 312d 746f 2d73 7472 696e " prin1-to-strin │ │ │ -00001250: 675d 2034 5d20 7072 6f67 6e20 6279 7465 g] 4] progn byte │ │ │ -00001260: 2d6f 7074 696d 697a 652d 666f 726d 2070 -optimize-form p │ │ │ -00001270: 726f 6731 2070 726f 6732 2032 2028 7361 rog1 prog2 2 (sa │ │ │ -00001280: 7665 2d65 7863 7572 7369 6f6e 2073 6176 ve-excursion sav │ │ │ -00001290: 652d 7265 7374 7269 6374 696f 6e20 7361 e-restriction sa │ │ │ -000012a0: 7665 2d63 7572 7265 6e74 2d62 7566 6665 ve-current-buffe │ │ │ -000012b0: 7229 2077 6974 682d 6f75 7470 7574 2d74 r) with-output-t │ │ │ -000012c0: 6f2d 7465 6d70 2d62 7566 6665 7220 6966 o-temp-buffer if │ │ │ -000012d0: 2033 2028 616e 6420 6f72 2920 7265 7665 3 (and or) reve │ │ │ -000012e0: 7273 6520 2874 2073 6f75 7263 6529 2034 rse (t source) 4 │ │ │ -000012f0: 2062 7974 652d 636f 6d70 696c 652d 6c6f byte-compile-lo │ │ │ -00001300: 672d 3120 666f 726d 6174 2022 2020 616c g-1 format " al │ │ │ -00001310: 6c20 7375 6266 6f72 6d73 206f 6620 2573 l subforms of %s │ │ │ -00001320: 2063 616c 6c65 6420 666f 7220 6566 6665 called for effe │ │ │ -00001330: 6374 3b20 6465 6c65 7465 6422 2069 6e74 ct; deleted" int │ │ │ -00001340: 6572 6163 7469 7665 2022 6d69 7370 6c61 eractive "mispla │ │ │ -00001350: 6365 6420 696e 7465 7261 6374 6976 6520 ced interactive │ │ │ -00001360: 7370 6563 3a20 2573 2220 2864 6566 756e spec: %s" (defun │ │ │ -00001370: 2064 6566 6d61 6372 6f20 6675 6e63 7469 defmacro functi │ │ │ -00001380: 6f6e 2063 6f6e 6469 7469 6f6e 2d63 6173 on condition-cas │ │ │ -00001390: 6520 7361 7665 2d77 696e 646f 772d 6578 e save-window-ex │ │ │ -000013a0: 6375 7273 696f 6e29 2075 6e77 696e 642d cursion) unwind- │ │ │ -000013b0: 7072 6f74 6563 7420 6361 7463 6820 6d61 protect catch ma │ │ │ -000013c0: 6372 6f65 7870 616e 6420 6662 6f75 6e64 croexpand fbound │ │ │ -000013d0: 7020 636f 6d70 696c 6572 2d6d 6163 726f p compiler-macro │ │ │ -000013e0: 6578 7061 6e64 2063 6c2d 636f 6d70 696c expand cl-compil │ │ │ -000013f0: 6572 2d6d 6163 726f 206d 6f63 6b6c 6973 er-macro mocklis │ │ │ -00001400: 7020 2225 7320 6973 2061 206d 616c 666f p "%s is a malfo │ │ │ -00001410: 726d 6564 2066 756e 6374 696f 6e22 2073 rmed function" s │ │ │ -00001420: 6964 652d 6566 6665 6374 2d66 7265 6520 ide-effect-free │ │ │ -00001430: 6572 726f 722d 6672 6565 2022 2573 2063 error-free "%s c │ │ │ -00001440: 616c 6c65 6420 666f 7220 6566 6665 6374 alled for effect │ │ │ -00001450: 2220 2220 2025 7320 6361 6c6c 6564 2066 " " %s called f │ │ │ -00001460: 6f72 2065 6666 6563 743b 2064 656c 6574 or effect; delet │ │ │ -00001470: 6564 2220 6170 7065 6e64 2028 6e69 6c29 ed" append (nil) │ │ │ -00001480: 2062 7974 652d 6f70 7469 6d69 7a65 2062 byte-optimize b │ │ │ -00001490: 7974 652d 6f70 7469 6d69 7a65 2d6c 6f67 yte-optimize-log │ │ │ -000014a0: 2070 7269 6e74 2d6c 656e 6774 6820 7072 print-length pr │ │ │ -000014b0: 696e 742d 6c65 7665 6c20 7072 696e 742d int-level print- │ │ │ -000014c0: 6573 6361 7065 2d6e 6577 6c69 6e65 7320 escape-newlines │ │ │ -000014d0: 6279 7465 2d63 6f6d 7069 6c65 2d6d 6163 byte-compile-mac │ │ │ -000014e0: 726f 2d65 6e76 6972 6f6e 6d65 6e74 5d20 ro-environment] │ │ │ -000014f0: 375d 290a 2340 3431 2054 6865 2073 6f75 7]).#@41 The sou │ │ │ -00001500: 7263 652d 6c65 7665 6c20 7061 7373 206f rce-level pass o │ │ │ -00001510: 6620 7468 6520 6f70 7469 6d69 7a65 722e f the optimizer. │ │ │ -00001520: 1f0a 2864 6566 616c 6961 7320 2762 7974 ..(defalias 'byt │ │ │ -00001530: 652d 6f70 7469 6d69 7a65 2d66 6f72 6d20 e-optimize-form │ │ │ -00001540: 235b 2866 6f72 6d20 266f 7074 696f 6e61 #[(form &optiona │ │ │ -00001550: 6c20 666f 722d 6566 6665 6374 2920 22c6 l for-effect) ". │ │ │ -00001560: 0d5c 6e5c 2215 c789 1c1b 0d3a abc3 0d40 .\n\"......:...@ │ │ │ -00001570: 39ab be5c 6eab 880d 40c8 4e89 13ac 880d 9..\n...@.N..... │ │ │ -00001580: 40c9 4e89 13ab ab0d 0b0d 2189 1461 aca2 @.N.......!..a.. │ │ │ -00001590: 09ab 9708 ca73 ab92 cbcc 891e 111e 121e .....s.......... │ │ │ -000015a0: 13cd cecf 0d0c 2321 882b d00c 5c6e 5c22 ......#!.+..\n\" │ │ │ -000015b0: 8914 aa81 0d2a 8722 205b 6279 7465 2d6f .....*." [byte-o │ │ │ -000015c0: 7074 696d 697a 652d 6c6f 6720 6279 7465 ptimize-log byte │ │ │ -000015d0: 2d6f 7074 696d 697a 6520 666f 722d 6566 -optimize for-ef │ │ │ -000015e0: 6665 6374 206f 7074 206e 6577 2066 6f72 fect opt new for │ │ │ -000015f0: 6d20 6279 7465 2d6f 7074 696d 697a 652d m byte-optimize- │ │ │ -00001600: 666f 726d 2d63 6f64 652d 7761 6c6b 6572 form-code-walker │ │ │ -00001610: 206e 696c 2062 7974 652d 666f 722d 6566 nil byte-for-ef │ │ │ -00001620: 6665 6374 2d6f 7074 696d 697a 6572 2062 fect-optimizer b │ │ │ -00001630: 7974 652d 6f70 7469 6d69 7a65 7220 2874 yte-optimizer (t │ │ │ -00001640: 2073 6f75 7263 6529 2074 2034 2062 7974 source) t 4 byt │ │ │ -00001650: 652d 636f 6d70 696c 652d 6c6f 672d 3120 e-compile-log-1 │ │ │ -00001660: 666f 726d 6174 2022 2020 2573 093d 3d3e format " %s.==> │ │ │ -00001670: 0925 7322 2062 7974 652d 6f70 7469 6d69 .%s" byte-optimi │ │ │ -00001680: 7a65 2d66 6f72 6d20 7072 696e 742d 6c65 ze-form print-le │ │ │ -00001690: 6e67 7468 2070 7269 6e74 2d6c 6576 656c ngth print-level │ │ │ -000016a0: 2070 7269 6e74 2d65 7363 6170 652d 6e65 print-escape-ne │ │ │ -000016b0: 776c 696e 6573 5d20 3620 2823 2420 2e20 wlines] 6 (#$ . │ │ │ -000016c0: 3533 3639 295d 290a 2864 6566 616c 6961 5369)]).(defalia │ │ │ -000016d0: 7320 2762 7974 652d 6f70 7469 6d69 7a65 s 'byte-optimize │ │ │ -000016e0: 2d62 6f64 7920 235b 2866 6f72 6d73 2061 -body #[(forms a │ │ │ -000016f0: 6c6c 2d66 6f72 2d65 6666 6563 7429 2022 ll-for-effect) " │ │ │ -00001700: 09c6 8989 1a1c 1b89 1dab a008 ae82 0d41 ...............A │ │ │ -00001710: 140d 40ad 85c7 0d40 0c5c 2289 12ac 830c ..@....@.\"..... │ │ │ -00001720: ac84 5c6e 0b42 130d 4189 15ac 600b 9f2c ..\n.B..A...`.., │ │ │ -00001730: 8722 205b 616c 6c2d 666f 722d 6566 6665 ." [all-for-effe │ │ │ -00001740: 6374 2066 6f72 6d73 206e 6577 2072 6573 ct forms new res │ │ │ -00001750: 756c 7420 6665 2072 6573 7420 6e69 6c20 ult fe rest nil │ │ │ -00001760: 6279 7465 2d6f 7074 696d 697a 652d 666f byte-optimize-fo │ │ │ -00001770: 726d 5d20 355d 290a 2864 6566 616c 6961 rm] 5]).(defalia │ │ │ -00001780: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ -00001790: 7472 7565 636f 6e73 7470 2027 286d 6163 trueconstp '(mac │ │ │ -000017a0: 726f 202e 2023 5b28 666f 726d 2920 22c1 ro . #[(form) ". │ │ │ -000017b0: c208 44c3 c408 44c5 4242 44c6 c708 4444 ..D...D.BBD...DD │ │ │ -000017c0: 43c3 08c8 4242 43c9 0844 43af 0587 2220 C...BBC..DC..." │ │ │ -000017d0: 5b66 6f72 6d20 636f 6e64 2063 6f6e 7370 [form cond consp │ │ │ -000017e0: 2065 7120 6361 7220 2827 7175 6f74 6529 eq car ('quote) │ │ │ -000017f0: 206e 6f74 2073 796d 626f 6c70 2028 7429 not symbolp (t) │ │ │ -00001800: 206b 6579 776f 7264 705d 2036 5d29 290a keywordp] 6])). │ │ │ -00001810: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -00001820: 6f70 7469 6d69 7a65 2d61 7373 6f63 6961 optimize-associa │ │ │ -00001830: 7469 7665 2d6d 6174 6820 235b 2866 6f72 tive-math #[(for │ │ │ -00001840: 6d29 2022 c489 0941 1b18 1a0b ab97 0b40 m) "...A.......@ │ │ │ -00001850: a7ab 870b 4008 4210 aa85 0b40 5c6e 4212 ....@.B....@\nB. │ │ │ -00001860: 0b41 8913 ac69 0841 aba1 5c6e ab97 0940 .A...i.A..\n...@ │ │ │ -00001870: c509 4008 5c22 5c6e 41ab 8709 405c 6e9f ..@.\"\nA...@\n. │ │ │ -00001880: 42aa 825c 6e40 45aa 88c5 0940 085c 22aa B..\n@E....@.\". │ │ │ -00001890: 8109 2b87 2220 5b63 6f6e 7374 616e 7473 ..+." [constants │ │ │ -000018a0: 2066 6f72 6d20 6172 6773 2072 6573 7420 form args rest │ │ │ -000018b0: 6e69 6c20 6170 706c 795d 2035 5d29 0a28 nil apply] 5]).( │ │ │ -000018c0: 6465 6661 6c69 6173 2027 6279 7465 2d6f defalias 'byte-o │ │ │ -000018d0: 7074 696d 697a 652d 6e6f 6e61 7373 6f63 ptimize-nonassoc │ │ │ -000018e0: 6961 7469 7665 2d6d 6174 6820 235b 2866 iative-math #[(f │ │ │ -000018f0: 6f72 6d29 2022 5c6e 4140 a7ab 875c 6e41 orm) "\nA@...\nA │ │ │ -00001900: 4140 a7ac 825c 6e87 5c6e 4140 5c6e 4141 A@...\n.\nA@\nAA │ │ │ -00001910: 1918 0940 a7ab 8d5c 6e40 0809 405c 2210 ...@...\n@..@\". │ │ │ -00001920: 0941 8911 aa6f 09ab 885c 6e40 0809 4242 .A...o...\n@..BB │ │ │ -00001930: aa81 082a 8722 205b 636f 6e73 7461 6e74 ...*." [constant │ │ │ -00001940: 2072 6573 7420 666f 726d 5d20 345d 290a rest form] 4]). │ │ │ -00001950: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -00001960: 6f70 7469 6d69 7a65 2d61 7070 726f 782d optimize-approx- │ │ │ -00001970: 6571 7561 6c20 235b 2878 2079 2920 22c2 equal #[(x y) ". │ │ │ -00001980: 0908 5a21 c35f c209 085c 5c21 5887 2220 ..Z!._...\\!X." │ │ │ -00001990: 5b79 2078 2061 6273 2031 3030 5d20 345d [y x abs 100] 4] │ │ │ -000019a0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -000019b0: 652d 6f70 7469 6d69 7a65 2d64 656c 6179 e-optimize-delay │ │ │ -000019c0: 2d63 6f6e 7374 616e 7473 2d6d 6174 6820 -constants-math │ │ │ -000019d0: 235b 2866 6f72 6d20 7374 6172 7420 6675 #[(form start fu │ │ │ -000019e0: 6e29 2022 0953 0c9b 0c5c 6ec6 7318 1e0e n) ".S...\n.s... │ │ │ -000019f0: 1d0d 4189 1541 abce 0d40 a8ab 74c7 1bc8 ..A..A...@..t... │ │ │ -00001a00: 0c21 1409 530c 9b15 0d41 8915 ab90 0d40 .!..S....A.....@ │ │ │ -00001a10: a8ab 750d 400b 4213 0dc7 a088 aa6a 08ab ..u.@.B......j.. │ │ │ -00001a20: 96c9 ca5c 6ecb cc0b 5c22 5c22 ccca 5c6e ...\n...\"\"..\n │ │ │ -00001a30: 0b5c 2221 5c22 ac85 0e0e 14aa 8ccd c70c .\"!\".......... │ │ │ -00001a40: 5c22 ca5c 6e0b 9f5c 2243 a414 29aa 2b0c \".\n..\"C..).+. │ │ │ -00001a50: 2b87 2220 5b6f 7665 7266 6c6f 7720 7374 +." [overflow st │ │ │ -00001a60: 6172 7420 6675 6e20 636f 6e73 7461 6e74 art fun constant │ │ │ -00001a70: 7320 666f 726d 2072 6573 7420 282b 202a s form rest (+ * │ │ │ -00001a80: 2920 6e69 6c20 636f 7079 2d73 6571 7565 ) nil copy-seque │ │ │ -00001a90: 6e63 6520 6279 7465 2d6f 7074 696d 697a nce byte-optimiz │ │ │ -00001aa0: 652d 6170 7072 6f78 2d65 7175 616c 2061 e-approx-equal a │ │ │ -00001ab0: 7070 6c79 206d 6170 6361 7220 666c 6f61 pply mapcar floa │ │ │ -00001ac0: 7420 6465 6c71 206f 7269 675d 2036 5d29 t delq orig] 6]) │ │ │ -00001ad0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -00001ae0: 2d6f 7074 696d 697a 652d 706c 7573 2023 -optimize-plus # │ │ │ -00001af0: 5b28 666f 726d 2920 22c1 c208 c3c4 2321 [(form) ".....#! │ │ │ -00001b00: 8722 205b 666f 726d 2062 7974 652d 6f70 ." [form byte-op │ │ │ -00001b10: 7469 6d69 7a65 2d70 7265 6469 6361 7465 timize-predicate │ │ │ -00001b20: 2062 7974 652d 6f70 7469 6d69 7a65 2d64 byte-optimize-d │ │ │ -00001b30: 656c 6179 2d63 6f6e 7374 616e 7473 2d6d elay-constants-m │ │ │ -00001b40: 6174 6820 3120 2b5d 2035 5d29 0a28 6465 ath 1 +] 5]).(de │ │ │ -00001b50: 6661 6c69 6173 2027 6279 7465 2d6f 7074 falias 'byte-opt │ │ │ -00001b60: 696d 697a 652d 6d75 6c74 6970 6c79 2023 imize-multiply # │ │ │ -00001b70: 5b28 666f 726d 2920 22c1 08c2 c323 10c4 [(form) "....#.. │ │ │ -00001b80: 0821 40c5 61ab 85c6 0841 4287 c708 2187 .!@.a....AB...!. │ │ │ -00001b90: 2220 5b66 6f72 6d20 6279 7465 2d6f 7074 " [form byte-opt │ │ │ -00001ba0: 696d 697a 652d 6465 6c61 792d 636f 6e73 imize-delay-cons │ │ │ -00001bb0: 7461 6e74 732d 6d61 7468 2031 202a 206c tants-math 1 * l │ │ │ -00001bc0: 6173 7420 3020 7072 6f67 6e20 6279 7465 ast 0 progn byte │ │ │ -00001bd0: 2d6f 7074 696d 697a 652d 7072 6564 6963 -optimize-predic │ │ │ -00001be0: 6174 655d 2034 5d29 0a28 6465 6661 6c69 ate] 4]).(defali │ │ │ -00001bf0: 6173 2027 6279 7465 2d6f 7074 696d 697a as 'byte-optimiz │ │ │ -00001c00: 652d 6d69 6e75 7320 235b 2866 6f72 6d29 e-minus #[(form) │ │ │ -00001c10: 2022 c209 c3c4 2311 c0c5 099b 2140 1809 "....#.....!@.. │ │ │ -00001c20: 4140 a7ab 9208 a7ab 8e09 4109 4140 085a A@........A.A@.Z │ │ │ -00001c30: a088 c609 21aa ad09 4140 c761 aba3 0947 ....!...A@.a...G │ │ │ -00001c40: c361 ab83 c7aa 9d09 47c5 61ab 87c8 c309 .a......G.a..... │ │ │ -00001c50: 3844 aa90 c889 c309 3844 c509 9b42 42aa 8D......8D...BB. │ │ │ -00001c60: 83c9 0921 2987 2220 5b6c 6173 7420 666f ...!)." [last fo │ │ │ -00001c70: 726d 2062 7974 652d 6f70 7469 6d69 7a65 rm byte-optimize │ │ │ -00001c80: 2d64 656c 6179 2d63 6f6e 7374 616e 7473 -delay-constants │ │ │ -00001c90: 2d6d 6174 6820 3220 2b20 3320 6275 746c -math 2 + 3 butl │ │ │ -00001ca0: 6173 7420 3020 2d20 6279 7465 2d6f 7074 ast 0 - byte-opt │ │ │ -00001cb0: 696d 697a 652d 7072 6564 6963 6174 655d imize-predicate] │ │ │ -00001cc0: 2034 5d29 0a28 6465 6661 6c69 6173 2027 4]).(defalias ' │ │ │ -00001cd0: 6279 7465 2d6f 7074 696d 697a 652d 6469 byte-optimize-di │ │ │ -00001ce0: 7669 6465 2023 5b28 666f 726d 2920 22c2 vide #[(form) ". │ │ │ -00001cf0: 09c3 c423 11c0 c509 9b21 4018 0941 40a7 ...#.....!@..A@. │ │ │ -00001d00: ab8a 08a7 ab86 c6c7 c88f aa93 0941 40c9 .............A@. │ │ │ -00001d10: 61ab 89ca cb09 4141 cc23 aa83 cd09 2129 a.....AA.#....!) │ │ │ -00001d20: 8722 205b 6c61 7374 2066 6f72 6d20 6279 ." [last form by │ │ │ -00001d30: 7465 2d6f 7074 696d 697a 652d 6465 6c61 te-optimize-dela │ │ │ -00001d40: 792d 636f 6e73 7461 6e74 732d 6d61 7468 y-constants-math │ │ │ -00001d50: 2032 202a 2033 206e 696c 2028 6279 7465 2 * 3 nil (byte │ │ │ -00001d60: 2d63 6f64 6520 2209 4009 4140 08a5 c209 -code ".@.A@.... │ │ │ -00001d70: 4141 2142 4287 2220 5b6c 6173 7420 666f AA!BB." [last fo │ │ │ -00001d80: 726d 2062 7574 6c61 7374 5d20 3429 2028 rm butlast] 4) ( │ │ │ -00001d90: 2865 7272 6f72 2066 6f72 6d29 2920 3020 (error form)) 0 │ │ │ -00001da0: 6170 7065 6e64 2028 7072 6f67 6e29 2028 append (progn) ( │ │ │ -00001db0: 3029 2062 7974 652d 6f70 7469 6d69 7a65 0) byte-optimize │ │ │ -00001dc0: 2d70 7265 6469 6361 7465 5d20 345d 290a -predicate] 4]). │ │ │ -00001dd0: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -00001de0: 6f70 7469 6d69 7a65 2d6c 6f67 6d75 6d62 optimize-logmumb │ │ │ -00001df0: 6c65 2023 5b28 666f 726d 2920 22c1 08c2 le #[(form) "... │ │ │ -00001e00: 0840 2310 c3c4 0873 ab96 0840 c561 ab86 .@#....s...@.a.. │ │ │ -00001e10: c608 4142 aa86 c7c4 c808 215c 2289 10aa ..AB......!\"... │ │ │ -00001e20: 9208 a2c9 61ab 8bca 0873 ab86 c608 4142 ....a....s....AB │ │ │ -00001e30: aa81 0821 8722 205b 666f 726d 2062 7974 ...!." [form byt │ │ │ -00001e40: 652d 6f70 7469 6d69 7a65 2d64 656c 6179 e-optimize-delay │ │ │ -00001e50: 2d63 6f6e 7374 616e 7473 2d6d 6174 6820 -constants-math │ │ │ -00001e60: 3120 6279 7465 2d6f 7074 696d 697a 652d 1 byte-optimize- │ │ │ -00001e70: 7072 6564 6963 6174 6520 3020 6c6f 6761 predicate 0 loga │ │ │ -00001e80: 6e64 2070 726f 676e 2064 656c 7120 636f nd progn delq co │ │ │ -00001e90: 7079 2d73 6571 7565 6e63 6520 6c6f 6769 py-sequence logi │ │ │ -00001ea0: 6f72 202d 315d 2035 5d29 0a28 6465 6661 or -1] 5]).(defa │ │ │ -00001eb0: 6c69 6173 2027 6279 7465 2d6f 7074 696d lias 'byte-optim │ │ │ -00001ec0: 697a 652d 6269 6e61 7279 2d70 7265 6469 ize-binary-predi │ │ │ -00001ed0: 6361 7465 2023 5b28 666f 726d 2920 2208 cate #[(form) ". │ │ │ -00001ee0: 4140 3aab 8808 4140 40c1 61aa 9508 4140 A@:...A@@.a...A@ │ │ │ -00001ef0: 39ab 8ec2 0841 4021 ac8a 0841 40c3 73aa 9....A@!...A@.s. │ │ │ -00001f00: 81c4 abb4 c508 383a ab88 c508 3840 c161 ......8:....8@.a │ │ │ -00001f10: aa95 c508 3839 ab8e c2c5 0838 21ac 8ac5 ....89.....8!... │ │ │ -00001f20: 0838 c373 aa81 c4ab 85c6 c7c8 8f87 0840 .8.s...........@ │ │ │ -00001f30: c508 3808 4140 4587 0887 2220 5b66 6f72 ..8.A@E..." [for │ │ │ -00001f40: 6d20 7175 6f74 6520 6b65 7977 6f72 6470 m quote keywordp │ │ │ -00001f50: 2028 6e69 6c20 7429 2074 2032 206e 696c (nil t) t 2 nil │ │ │ -00001f60: 2028 6279 7465 2d63 6f64 6520 22c1 c208 (byte-code "... │ │ │ -00001f70: 2144 8722 205b 666f 726d 2071 756f 7465 !D." [form quote │ │ │ -00001f80: 2065 7661 6c5d 2033 2920 2828 6572 726f eval] 3) ((erro │ │ │ -00001f90: 7220 666f 726d 2929 5d20 335d 290a 2864 r form))] 3]).(d │ │ │ -00001fa0: 6566 616c 6961 7320 2762 7974 652d 6f70 efalias 'byte-op │ │ │ -00001fb0: 7469 6d69 7a65 2d70 7265 6469 6361 7465 timize-predicate │ │ │ -00001fc0: 2023 5b28 666f 726d 2920 22c3 0841 1a19 #[(form) "..A.. │ │ │ -00001fd0: 5c6e aba8 09ab a55c 6e40 3aab 875c 6e40 \n.....\n@:..\n@ │ │ │ -00001fe0: 40c4 61aa 925c 6e40 39ab 8cc5 5c6e 4021 @.a..\n@9...\n@! │ │ │ -00001ff0: ae87 5c6e 40c6 73aa 81c3 115c 6e41 8912 ..\n@.s....\nA.. │ │ │ -00002000: ac58 09ab 86c7 c8c9 8faa 8108 2a87 2220 .X..........*." │ │ │ -00002010: 5b66 6f72 6d20 6f6b 2072 6573 7420 7420 [form ok rest t │ │ │ -00002020: 7175 6f74 6520 6b65 7977 6f72 6470 2028 quote keywordp ( │ │ │ -00002030: 6e69 6c20 7429 2065 7272 2028 6279 7465 nil t) err (byte │ │ │ -00002040: 2d63 6f64 6520 22c1 c208 2144 8722 205b -code "...!D." [ │ │ │ -00002050: 666f 726d 2071 756f 7465 2065 7661 6c5d form quote eval] │ │ │ -00002060: 2033 2920 2828 6572 726f 7220 2862 7974 3) ((error (byt │ │ │ -00002070: 652d 636f 6d70 696c 652d 7761 726e 2022 e-compile-warn " │ │ │ -00002080: 6576 616c 7561 7469 6e67 2025 733a 2025 evaluating %s: % │ │ │ -00002090: 7322 2066 6f72 6d20 6572 7229 2066 6f72 s" form err) for │ │ │ -000020a0: 6d29 295d 2034 5d29 0a28 6465 6661 6c69 m))] 4]).(defali │ │ │ -000020b0: 6173 2027 6279 7465 2d6f 7074 696d 697a as 'byte-optimiz │ │ │ -000020c0: 652d 6964 656e 7469 7479 2023 5b28 666f e-identity #[(fo │ │ │ -000020d0: 726d 2920 2208 41ab 8908 4141 ac84 0841 rm) ".A...AA...A │ │ │ -000020e0: 4087 c1c2 0841 47c3 0841 4755 ab83 c4aa @....AG..AGU.... │ │ │ -000020f0: 81c5 2388 0887 2220 5b66 6f72 6d20 6279 ..#..." [form by │ │ │ -00002100: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e20 te-compile-warn │ │ │ -00002110: 2269 6465 6e74 6974 7920 6361 6c6c 6564 "identity called │ │ │ -00002120: 2077 6974 6820 2564 2061 7267 2573 2c20 with %d arg%s, │ │ │ -00002130: 6275 7420 7265 7175 6972 6573 2031 2220 but requires 1" │ │ │ -00002140: 3120 2222 2022 7322 5d20 355d 290a 2864 1 "" "s"] 5]).(d │ │ │ -00002150: 6566 616c 6961 7320 2762 7974 652d 6f70 efalias 'byte-op │ │ │ -00002160: 7469 6d69 7a65 2d63 6172 2023 5b28 666f timize-car #[(fo │ │ │ -00002170: 726d 2920 2208 4140 8919 3aab 8609 40c2 rm) ".A@..:...@. │ │ │ -00002180: 61aa 8c09 39ab 8a09 c361 ac85 c409 21ab a...9....a....!. │ │ │ -00002190: 9809 3aab 8c09 40c2 61ab 8609 4140 3cac ..:...@.a...A@<. │ │ │ -000021a0: 88c5 c609 5c22 8808 aaa5 09a2 c761 ab90 ....\".......a.. │ │ │ -000021b0: 0947 c861 ab8a c909 4140 ca09 3845 aa8f .G.a....A@..8E.. │ │ │ -000021c0: 09a2 cb61 ab86 c909 4142 aa83 cc08 2129 ...a....AB....!) │ │ │ -000021d0: 8722 205b 666f 726d 2061 7267 2071 756f ." [form arg quo │ │ │ -000021e0: 7465 2074 206b 6579 776f 7264 7020 6279 te t keywordp by │ │ │ -000021f0: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e20 te-compile-warn │ │ │ -00002200: 2274 616b 696e 6720 6361 7220 6f66 2061 "taking car of a │ │ │ -00002210: 2063 6f6e 7374 616e 743a 2025 7322 2063 constant: %s" c │ │ │ -00002220: 6f6e 7320 3320 7072 6f67 3120 3220 6c69 ons 3 prog1 2 li │ │ │ -00002230: 7374 2062 7974 652d 6f70 7469 6d69 7a65 st byte-optimize │ │ │ -00002240: 2d70 7265 6469 6361 7465 5d20 355d 290a -predicate] 5]). │ │ │ -00002250: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -00002260: 6f70 7469 6d69 7a65 2d63 6472 2023 5b28 optimize-cdr #[( │ │ │ -00002270: 666f 726d 2920 2208 4140 8919 3aab 8609 form) ".A@..:... │ │ │ -00002280: 40c2 61aa 8c09 39ab 8a09 c361 ac85 c409 @.a...9....a.... │ │ │ -00002290: 21ab 9809 3aab 8c09 40c2 61ab 8609 4140 !...:...@.a...A@ │ │ │ -000022a0: 3cac 88c5 c609 5c22 8808 aab6 09a2 c761 <.....\".......a │ │ │ -000022b0: ab90 0947 c861 ab8a c909 4140 ca09 3845 ...G.a....A@..8E │ │ │ -000022c0: aaa0 09a2 cb61 ab97 0947 ca56 ab8c c909 .....a...G.V.... │ │ │ -000022d0: 4140 cb09 4141 4245 aa88 0941 40aa 83cc A@..AABE...A@... │ │ │ -000022e0: 0821 2987 2220 5b66 6f72 6d20 6172 6720 .!)." [form arg │ │ │ -000022f0: 7175 6f74 6520 7420 6b65 7977 6f72 6470 quote t keywordp │ │ │ -00002300: 2062 7974 652d 636f 6d70 696c 652d 7761 byte-compile-wa │ │ │ -00002310: 726e 2022 7461 6b69 6e67 2063 6472 206f rn "taking cdr o │ │ │ -00002320: 6620 6120 636f 6e73 7461 6e74 3a20 2573 f a constant: %s │ │ │ -00002330: 2220 636f 6e73 2033 2070 726f 676e 2032 " cons 3 progn 2 │ │ │ -00002340: 206c 6973 7420 6279 7465 2d6f 7074 696d list byte-optim │ │ │ -00002350: 697a 652d 7072 6564 6963 6174 655d 2035 ize-predicate] 5 │ │ │ -00002360: 5d29 0a28 6279 7465 2d63 6f64 6520 22c0 ]).(byte-code ". │ │ │ -00002370: c1c2 c323 88c0 c4c2 c523 88c0 c6c2 c723 ...#.....#.....# │ │ │ -00002380: 88c0 c8c2 c923 88c0 cac2 cb23 88c0 ccc2 .....#.....#.... │ │ │ -00002390: cd23 88c0 cec2 cf23 88c0 d0c2 cf23 88c0 .#.....#.....#.. │ │ │ -000023a0: d1c2 d223 88c0 d3c2 d223 88c0 d4c2 d223 ...#.....#.....# │ │ │ -000023b0: 88c0 d5c2 d223 88c0 d6c2 d223 88c0 d7c2 .....#.....#.... │ │ │ -000023c0: cd23 88c0 d8c2 cd23 88c0 d9c2 cd23 88c0 .#.....#.....#.. │ │ │ -000023d0: dac2 cd23 88c0 dbc2 cd23 88c0 dcc2 cd23 ...#.....#.....# │ │ │ -000023e0: 88c0 ddc2 cd23 88c0 dec2 cd23 88c0 dfc2 .....#.....#.... │ │ │ -000023f0: cd23 88c0 e0c2 cd23 88c0 e1c2 cd23 88c0 .#.....#.....#.. │ │ │ -00002400: e2c2 cd23 88c0 e3c2 cd23 88c0 e4c2 cd23 ...#.....#.....# │ │ │ -00002410: 88c0 e5c2 cd23 88c0 e6c2 cd23 88c0 e7c2 .....#.....#.... │ │ │ -00002420: cd23 88c0 e8c2 e923 88c0 eac2 e923 88c0 .#.....#.....#.. │ │ │ -00002430: ebc2 e923 88c0 ecc2 cd23 88c0 edc2 ee23 ...#.....#.....# │ │ │ -00002440: 88c0 efc2 f023 88c0 f1c2 cd23 88c0 f2c2 .....#.....#.... │ │ │ -00002450: cd23 88c0 f3c2 f423 8722 205b 7075 7420 .#.....#." [put │ │ │ -00002460: 6964 656e 7469 7479 2062 7974 652d 6f70 identity byte-op │ │ │ -00002470: 7469 6d69 7a65 7220 6279 7465 2d6f 7074 timizer byte-opt │ │ │ -00002480: 696d 697a 652d 6964 656e 7469 7479 202b imize-identity + │ │ │ -00002490: 2062 7974 652d 6f70 7469 6d69 7a65 2d70 byte-optimize-p │ │ │ -000024a0: 6c75 7320 2a20 6279 7465 2d6f 7074 696d lus * byte-optim │ │ │ -000024b0: 697a 652d 6d75 6c74 6970 6c79 202d 2062 ize-multiply - b │ │ │ -000024c0: 7974 652d 6f70 7469 6d69 7a65 2d6d 696e yte-optimize-min │ │ │ -000024d0: 7573 202f 2062 7974 652d 6f70 7469 6d69 us / byte-optimi │ │ │ -000024e0: 7a65 2d64 6976 6964 6520 2520 6279 7465 ze-divide % byte │ │ │ -000024f0: 2d6f 7074 696d 697a 652d 7072 6564 6963 -optimize-predic │ │ │ -00002500: 6174 6520 6d61 7820 6279 7465 2d6f 7074 ate max byte-opt │ │ │ -00002510: 696d 697a 652d 6173 736f 6369 6174 6976 imize-associativ │ │ │ -00002520: 652d 6d61 7468 206d 696e 2065 7120 6279 e-math min eq by │ │ │ -00002530: 7465 2d6f 7074 696d 697a 652d 6269 6e61 te-optimize-bina │ │ │ -00002540: 7279 2d70 7265 6469 6361 7465 2065 716c ry-predicate eql │ │ │ -00002550: 2065 7175 616c 2073 7472 696e 673d 2073 equal string= s │ │ │ -00002560: 7472 696e 672d 6571 7561 6c20 3d20 3c20 tring-equal = < │ │ │ -00002570: 3e20 3c3d 203e 3d20 312b 2031 2d20 6e6f > <= >= 1+ 1- no │ │ │ -00002580: 7420 6e75 6c6c 206d 656d 7120 636f 6e73 t null memq cons │ │ │ -00002590: 7020 6c69 7374 7020 7379 6d62 6f6c 7020 p listp symbolp │ │ │ -000025a0: 7374 7269 6e67 7020 7374 7269 6e67 3c20 stringp string< │ │ │ -000025b0: 7374 7269 6e67 2d6c 6573 7370 206c 656e string-lessp len │ │ │ -000025c0: 6774 6820 6c6f 6761 6e64 2062 7974 652d gth logand byte- │ │ │ -000025d0: 6f70 7469 6d69 7a65 2d6c 6f67 6d75 6d62 optimize-logmumb │ │ │ -000025e0: 6c65 206c 6f67 696f 7220 6c6f 6778 6f72 le logior logxor │ │ │ -000025f0: 206c 6f67 6e6f 7420 6361 7220 6279 7465 lognot car byte │ │ │ -00002600: 2d6f 7074 696d 697a 652d 6361 7220 6364 -optimize-car cd │ │ │ -00002610: 7220 6279 7465 2d6f 7074 696d 697a 652d r byte-optimize- │ │ │ -00002620: 6364 7220 6361 722d 7361 6665 2063 6472 cdr car-safe cdr │ │ │ -00002630: 2d73 6166 6520 7175 6f74 6520 6279 7465 -safe quote byte │ │ │ -00002640: 2d6f 7074 696d 697a 652d 7175 6f74 655d -optimize-quote] │ │ │ -00002650: 2034 290a 2864 6566 616c 6961 7320 2762 4).(defalias 'b │ │ │ -00002660: 7974 652d 6f70 7469 6d69 7a65 2d71 756f yte-optimize-quo │ │ │ -00002670: 7465 2023 5b28 666f 726d 2920 2208 4140 te #[(form) ".A@ │ │ │ -00002680: 3aac 9408 4140 39ab 90c1 0841 4021 ac89 :...A@9....A@!.. │ │ │ -00002690: 0841 40c2 73ac 8208 8708 4140 8722 205b .A@.s.....A@." [ │ │ │ -000026a0: 666f 726d 206b 6579 776f 7264 7020 286e form keywordp (n │ │ │ -000026b0: 696c 2074 295d 2032 5d29 0a28 6465 6661 il t)] 2]).(defa │ │ │ -000026c0: 6c69 6173 2027 6279 7465 2d6f 7074 696d lias 'byte-optim │ │ │ -000026d0: 697a 652d 7a65 726f 7020 235b 2866 6f72 ize-zerop #[(for │ │ │ -000026e0: 6d29 2022 0941 40a7 ab84 c209 2187 08ab m) ".A@.....!... │ │ │ -000026f0: 87c3 0941 40c4 4587 0987 2220 5b62 7974 ...A@.E..." [byt │ │ │ -00002700: 652d 636f 6d70 696c 652d 6465 6c65 7465 e-compile-delete │ │ │ -00002710: 2d65 7272 6f72 7320 666f 726d 2065 7661 -errors form eva │ │ │ -00002720: 6c20 3d20 305d 2033 5d29 0a28 7075 7420 l = 0] 3]).(put │ │ │ -00002730: 277a 6572 6f70 2027 6279 7465 2d6f 7074 'zerop 'byte-opt │ │ │ -00002740: 696d 697a 6572 2027 6279 7465 2d6f 7074 imizer 'byte-opt │ │ │ -00002750: 696d 697a 652d 7a65 726f 7029 0a28 6465 imize-zerop).(de │ │ │ -00002760: 6661 6c69 6173 2027 6279 7465 2d6f 7074 falias 'byte-opt │ │ │ -00002770: 696d 697a 652d 616e 6420 235b 2866 6f72 imize-and #[(for │ │ │ -00002780: 6d29 2022 0841 3fae abc1 0873 ab9a c2c3 m) ".A?....s.... │ │ │ -00002790: c408 2189 1089 4140 ab86 0841 8910 aa76 ..!...A@...A...v │ │ │ -000027a0: 08c1 a188 21c1 4587 0841 41ac 8408 4140 ....!.E..AA...A@ │ │ │ -000027b0: 87c5 0821 8722 205b 666f 726d 206e 696c ...!." [form nil │ │ │ -000027c0: 2070 726f 676e 2062 7974 652d 6f70 7469 progn byte-opti │ │ │ -000027d0: 6d69 7a65 2d61 6e64 2063 6f70 792d 7365 mize-and copy-se │ │ │ -000027e0: 7175 656e 6365 2062 7974 652d 6f70 7469 quence byte-opti │ │ │ -000027f0: 6d69 7a65 2d70 7265 6469 6361 7465 5d20 mize-predicate] │ │ │ -00002800: 365d 290a 2864 6566 616c 6961 7320 2762 6]).(defalias 'b │ │ │ -00002810: 7974 652d 6f70 7469 6d69 7a65 2d6f 7220 yte-optimize-or │ │ │ -00002820: 235b 2866 6f72 6d29 2022 c209 73ab 87c3 #[(form) "..s... │ │ │ -00002830: c2c4 0921 5c22 1109 1808 4189 1041 abab ...!\"....A..A.. │ │ │ -00002840: 0840 3aab 8708 4040 c561 aa8f 0840 39ab .@:...@@.a...@9. │ │ │ -00002850: 8c08 40c6 61ac 86c7 0840 21ab 5c5c c409 ..@.a....@!.\\.. │ │ │ -00002860: 2111 0840 0973 c2a1 8910 aa4f 0941 41ab !..@.s.....O.AA. │ │ │ -00002870: 85c8 0921 aa83 0941 4029 8722 205b 7265 ...!...A@)." [re │ │ │ -00002880: 7374 2066 6f72 6d20 6e69 6c20 6465 6c71 st form nil delq │ │ │ -00002890: 2063 6f70 792d 7365 7175 656e 6365 2071 copy-sequence q │ │ │ -000028a0: 756f 7465 2074 206b 6579 776f 7264 7020 uote t keywordp │ │ │ -000028b0: 6279 7465 2d6f 7074 696d 697a 652d 7072 byte-optimize-pr │ │ │ -000028c0: 6564 6963 6174 655d 2035 5d29 0a28 6465 edicate] 5]).(de │ │ │ -000028d0: 6661 6c69 6173 2027 6279 7465 2d6f 7074 falias 'byte-opt │ │ │ -000028e0: 696d 697a 652d 636f 6e64 2023 5b28 666f imize-cond #[(fo │ │ │ -000028f0: 726d 2920 22c1 0841 2187 2220 5b66 6f72 rm) "..A!." [for │ │ │ -00002900: 6d20 6279 7465 2d6f 7074 696d 697a 652d m byte-optimize- │ │ │ -00002910: 636f 6e64 2d31 5d20 325d 290a 2864 6566 cond-1] 2]).(def │ │ │ -00002920: 616c 6961 7320 2762 7974 652d 6f70 7469 alias 'byte-opti │ │ │ -00002930: 6d69 7a65 2d63 6f6e 642d 3120 235b 2863 mize-cond-1 #[(c │ │ │ -00002940: 6c61 7573 6573 2920 2208 adbf 0840 3aab lauses) "....@:. │ │ │ -00002950: b508 4047 c161 ab87 c208 4040 44aa 9c08 ..@G.a....@@D... │ │ │ -00002960: 4047 c361 ab8b c408 4040 0840 4140 45aa @G.a....@@.@A@E. │ │ │ -00002970: 8ac4 0840 40c5 0840 4142 4508 41ad 85c6 ...@@..@ABE.A... │ │ │ -00002980: 0841 2143 a487 c7c8 0840 5c22 8722 205b .A!C.....@\"." [ │ │ │ -00002990: 636c 6175 7365 7320 3120 6f72 2032 2069 clauses 1 or 2 i │ │ │ -000029a0: 6620 7072 6f67 6e20 6279 7465 2d6f 7074 f progn byte-opt │ │ │ -000029b0: 696d 697a 652d 636f 6e64 2d31 2065 7272 imize-cond-1 err │ │ │ -000029c0: 6f72 2022 6d61 6c66 6f72 6d65 6420 636f or "malformed co │ │ │ -000029d0: 6e64 2063 6c61 7573 6520 2573 225d 2034 nd clause %s"] 4 │ │ │ -000029e0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -000029f0: 7465 2d6f 7074 696d 697a 652d 6966 2023 te-optimize-if # │ │ │ -00002a00: 5b28 666f 726d 2920 2209 4140 8918 3aab [(form) ".A@..:. │ │ │ -00002a10: 8608 40c2 61aa 8c08 39ab 8a08 c361 ac85 ..@.a...9....a.. │ │ │ -00002a20: c408 21ab 85c5 0938 aae4 08ac 91c6 099b ..!....8........ │ │ │ -00002a30: ab87 c7c8 099b 42aa d5c8 0938 aad0 c509 ......B....8.... │ │ │ -00002a40: 38ab 92c8 099b c96b ab88 ca08 c509 3845 8......k......8E │ │ │ -00002a50: aabc 09aa b9c8 0938 ac85 c609 9bab abca .......8........ │ │ │ -00002a60: 083a ab91 0840 cb73 ab8b 0847 c555 ab85 .:...@.s...G.U.. │ │ │ -00002a70: 0841 40aa 83cc 0844 c609 9bab 87c7 c809 .A@....D........ │ │ │ -00002a80: 9b42 aa83 c809 3845 aa84 c708 cd45 2987 .B....8E.....E). │ │ │ -00002a90: 2220 5b63 6c61 7573 6520 666f 726d 2071 " [clause form q │ │ │ -00002aa0: 756f 7465 2074 206b 6579 776f 7264 7020 uote t keywordp │ │ │ -00002ab0: 3220 3420 7072 6f67 6e20 3320 286e 696c 2 4 progn 3 (nil │ │ │ -00002ac0: 2920 6966 2028 6e6f 7420 6e75 6c6c 2920 ) if (not null) │ │ │ -00002ad0: 6e6f 7420 6e69 6c5d 2036 5d29 0a28 6465 not nil] 6]).(de │ │ │ -00002ae0: 6661 6c69 6173 2027 6279 7465 2d6f 7074 falias 'byte-opt │ │ │ -00002af0: 696d 697a 652d 7768 696c 6520 235b 2866 imize-while #[(f │ │ │ -00002b00: 6f72 6d29 2022 0841 40ad 8108 8722 205b orm) ".A@...." [ │ │ │ -00002b10: 666f 726d 5d20 315d 290a 2862 7974 652d form] 1]).(byte- │ │ │ -00002b20: 636f 6465 2022 c0c1 c2c3 2388 c0c4 c2c5 code "....#..... │ │ │ -00002b30: 2388 c0c6 c2c7 2388 c0c8 c2c9 2388 c0ca #.....#.....#... │ │ │ -00002b40: c2cb 2388 c0cc c2cd 2387 2220 5b70 7574 ..#.....#." [put │ │ │ -00002b50: 2061 6e64 2062 7974 652d 6f70 7469 6d69 and byte-optimi │ │ │ -00002b60: 7a65 7220 6279 7465 2d6f 7074 696d 697a zer byte-optimiz │ │ │ -00002b70: 652d 616e 6420 6f72 2062 7974 652d 6f70 e-and or byte-op │ │ │ -00002b80: 7469 6d69 7a65 2d6f 7220 636f 6e64 2062 timize-or cond b │ │ │ -00002b90: 7974 652d 6f70 7469 6d69 7a65 2d63 6f6e yte-optimize-con │ │ │ -00002ba0: 6420 6966 2062 7974 652d 6f70 7469 6d69 d if byte-optimi │ │ │ -00002bb0: 7a65 2d69 6620 7768 696c 6520 6279 7465 ze-if while byte │ │ │ -00002bc0: 2d6f 7074 696d 697a 652d 7768 696c 6520 -optimize-while │ │ │ -00002bd0: 6368 6172 2d62 6566 6f72 6520 6279 7465 char-before byte │ │ │ -00002be0: 2d6f 7074 696d 697a 652d 6368 6172 2d62 -optimize-char-b │ │ │ -00002bf0: 6566 6f72 655d 2034 290a 2864 6566 616c efore] 4).(defal │ │ │ -00002c00: 6961 7320 2762 7974 652d 6f70 7469 6d69 ias 'byte-optimi │ │ │ -00002c10: 7a65 2d63 6861 722d 6265 666f 7265 2023 ze-char-before # │ │ │ -00002c20: 5b28 666f 726d 2920 22c1 0841 40ac 83c2 [(form) "..A@... │ │ │ -00002c30: aa93 0841 40c3 6bab 83c4 aa89 c5c6 0841 ...A@.k........A │ │ │ -00002c40: 40c7 4242 4408 4141 4242 8722 205b 666f @.BBD.AABB." [fo │ │ │ -00002c50: 726d 2063 6861 722d 6166 7465 7220 2831 rm char-after (1 │ │ │ -00002c60: 2d20 2870 6f69 6e74 2929 2028 706f 696e - (point)) (poin │ │ │ -00002c70: 7429 2028 312d 2028 706f 696e 7429 2920 t) (1- (point)) │ │ │ -00002c80: 312d 206f 7220 2828 706f 696e 7429 295d 1- or ((point))] │ │ │ -00002c90: 2035 5d29 0a28 7075 7420 2762 6163 6b77 5]).(put 'backw │ │ │ -00002ca0: 6172 642d 6368 6172 2027 6279 7465 2d6f ard-char 'byte-o │ │ │ -00002cb0: 7074 696d 697a 6572 2027 6279 7465 2d6f ptimizer 'byte-o │ │ │ -00002cc0: 7074 696d 697a 652d 6261 636b 7761 7264 ptimize-backward │ │ │ -00002cd0: 2d63 6861 7229 0a28 6465 6661 6c69 6173 -char).(defalias │ │ │ -00002ce0: 2027 6279 7465 2d6f 7074 696d 697a 652d 'byte-optimize- │ │ │ -00002cf0: 6261 636b 7761 7264 2d63 6861 7220 235b backward-char #[ │ │ │ -00002d00: 2866 6f72 6d29 2022 c108 4140 ac83 c2aa (form) "..A@.... │ │ │ -00002d10: 9508 4140 a8ab 8608 4140 5baa 89c3 c408 ..A@....A@[..... │ │ │ -00002d20: 4140 c542 4244 0841 4142 4287 2220 5b66 A@.BBD.AABB." [f │ │ │ -00002d30: 6f72 6d20 666f 7277 6172 642d 6368 6172 orm forward-char │ │ │ -00002d40: 202d 3120 2d20 6f72 2028 3129 5d20 355d -1 - or (1)] 5] │ │ │ -00002d50: 290a 2870 7574 2027 6261 636b 7761 7264 ).(put 'backward │ │ │ -00002d60: 2d77 6f72 6420 2762 7974 652d 6f70 7469 -word 'byte-opti │ │ │ -00002d70: 6d69 7a65 7220 2762 7974 652d 6f70 7469 mizer 'byte-opti │ │ │ -00002d80: 6d69 7a65 2d62 6163 6b77 6172 642d 776f mize-backward-wo │ │ │ -00002d90: 7264 290a 2864 6566 616c 6961 7320 2762 rd).(defalias 'b │ │ │ -00002da0: 7974 652d 6f70 7469 6d69 7a65 2d62 6163 yte-optimize-bac │ │ │ -00002db0: 6b77 6172 642d 776f 7264 2023 5b28 666f kward-word #[(fo │ │ │ -00002dc0: 726d 2920 22c1 0841 40ac 83c2 aa95 0841 rm) "..A@......A │ │ │ -00002dd0: 40a8 ab86 0841 405b aa89 c3c4 0841 40c5 @....A@[.....A@. │ │ │ -00002de0: 4242 4408 4141 4242 8722 205b 666f 726d BBD.AABB." [form │ │ │ -00002df0: 2066 6f72 7761 7264 2d77 6f72 6420 2d31 forward-word -1 │ │ │ -00002e00: 202d 206f 7220 2831 295d 2035 5d29 0a28 - or (1)] 5]).( │ │ │ -00002e10: 6279 7465 2d63 6f64 6520 22c0 c1c2 c323 byte-code "....# │ │ │ -00002e20: 88c0 c4c2 c323 8722 205b 7075 7420 6174 .....#." [put at │ │ │ -00002e30: 6f6d 2062 7974 652d 6f70 7469 6d69 7a65 om byte-optimize │ │ │ -00002e40: 7220 6279 7465 2d63 6f6d 7069 6c65 2d6e r byte-compile-n │ │ │ -00002e50: 6567 6174 696f 6e2d 6f70 7469 6d69 7a65 egation-optimize │ │ │ -00002e60: 7220 6e6c 6973 7470 5d20 3429 0a28 6465 r nlistp] 4).(de │ │ │ -00002e70: 6661 6c69 6173 2027 6279 7465 2d6f 7074 falias 'byte-opt │ │ │ -00002e80: 696d 697a 652d 6675 6e63 616c 6c20 235b imize-funcall #[ │ │ │ -00002e90: 2866 6f72 6d29 2022 0941 4089 18a2 c273 (form) ".A@....s │ │ │ -00002ea0: ab89 0841 4009 4141 42aa 8109 2987 2220 ...A@.AAB...)." │ │ │ -00002eb0: 5b66 6e20 666f 726d 2027 6675 6e63 7469 [fn form 'functi │ │ │ -00002ec0: 6f6e 5d20 335d 290a 2864 6566 616c 6961 on] 3]).(defalia │ │ │ -00002ed0: 7320 2762 7974 652d 6f70 7469 6d69 7a65 s 'byte-optimize │ │ │ -00002ee0: 2d61 7070 6c79 2023 5b28 666f 726d 2920 -apply #[(form) │ │ │ -00002ef0: 225c 6e41 405c 6e47 535c 6e38 1b19 0bab "\nA@\nGS\n8.... │ │ │ -00002f00: 860b a2c4 61ab a70b 4140 3cab 97c5 5c6e ....a...A@<...\n │ │ │ -00002f10: 4141 2141 9f18 c609 4408 a4c7 c80b 4140 AA!A....D.....A@ │ │ │ -00002f20: 5c22 a429 aa88 c9ca cb0b 215c 2288 ccae \".)......!\"... │ │ │ -00002f30: 815c 6e2a 8722 205b 6275 746c 6173 7420 .\n*." [butlast │ │ │ -00002f40: 666e 2066 6f72 6d20 6c61 7374 2071 756f fn form last quo │ │ │ -00002f50: 7465 2072 6576 6572 7365 2066 756e 6361 te reverse funca │ │ │ -00002f60: 6c6c 206d 6170 6361 7220 235b 2878 2920 ll mapcar #[(x) │ │ │ -00002f70: 22c1 0844 8722 205b 7820 7175 6f74 655d "..D." [x quote] │ │ │ -00002f80: 2032 5d20 6279 7465 2d63 6f6d 7069 6c65 2] byte-compile │ │ │ -00002f90: 2d77 6172 6e20 226c 6173 7420 6172 6720 -warn "last arg │ │ │ -00002fa0: 746f 2061 7070 6c79 2063 616e 2774 2062 to apply can't b │ │ │ -00002fb0: 6520 6120 6c69 7465 7261 6c20 6174 6f6d e a literal atom │ │ │ -00002fc0: 3a20 2573 2220 7072 696e 312d 746f 2d73 : %s" prin1-to-s │ │ │ -00002fd0: 7472 696e 6720 6e69 6c5d 2034 5d29 0a28 tring nil] 4]).( │ │ │ -00002fe0: 6279 7465 2d63 6f64 6520 22c0 c1c2 c323 byte-code "....# │ │ │ -00002ff0: 88c0 c4c2 c523 88c0 c6c2 c723 88c0 c8c2 .....#.....#.... │ │ │ -00003000: c723 8722 205b 7075 7420 6675 6e63 616c .#." [put funcal │ │ │ -00003010: 6c20 6279 7465 2d6f 7074 696d 697a 6572 l byte-optimizer │ │ │ -00003020: 2062 7974 652d 6f70 7469 6d69 7a65 2d66 byte-optimize-f │ │ │ -00003030: 756e 6361 6c6c 2061 7070 6c79 2062 7974 uncall apply byt │ │ │ -00003040: 652d 6f70 7469 6d69 7a65 2d61 7070 6c79 e-optimize-apply │ │ │ -00003050: 206c 6574 2062 7974 652d 6f70 7469 6d69 let byte-optimi │ │ │ -00003060: 7a65 2d6c 6574 5820 6c65 742a 5d20 3429 ze-letX let*] 4) │ │ │ -00003070: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -00003080: 2d6f 7074 696d 697a 652d 6c65 7458 2023 -optimize-letX # │ │ │ -00003090: 5b28 666f 726d 2920 2209 4140 ac86 c209 [(form) ".A@.... │ │ │ -000030a0: 4141 4287 c309 38ac 85c4 099b ab82 0987 AAB...8......... │ │ │ -000030b0: 0940 c561 ab8e c6c7 c8c9 c8ca 0941 405c .@.a.........A@\ │ │ │ -000030c0: 225c 22cb 2387 cc09 4140 2118 cdcc 0841 "\".#...A@!....A │ │ │ -000030d0: 2108 4041 40ce 4629 8722 205b 6269 6e64 !.@A@.F)." [bind │ │ │ -000030e0: 7320 666f 726d 2070 726f 676e 2032 2033 s form progn 2 3 │ │ │ -000030f0: 206c 6574 2061 7070 656e 6420 2870 726f let append (pro │ │ │ -00003100: 676e 2920 6d61 7063 6172 2063 6172 2d73 gn) mapcar car-s │ │ │ -00003110: 6166 6520 6364 722d 7361 6665 2028 6e69 afe cdr-safe (ni │ │ │ -00003120: 6c29 2072 6576 6572 7365 206c 6574 2a20 l) reverse let* │ │ │ -00003130: 6e69 6c5d 2037 5d29 0a28 7075 7420 276e nil] 7]).(put 'n │ │ │ -00003140: 7468 2027 6279 7465 2d6f 7074 696d 697a th 'byte-optimiz │ │ │ -00003150: 6572 2027 6279 7465 2d6f 7074 696d 697a er 'byte-optimiz │ │ │ -00003160: 652d 6e74 6829 0a28 6465 6661 6c69 6173 e-nth).(defalias │ │ │ -00003170: 2027 6279 7465 2d6f 7074 696d 697a 652d 'byte-optimize- │ │ │ -00003180: 6e74 6820 235b 2866 6f72 6d29 2022 c108 nth #[(form) ".. │ │ │ -00003190: 21c2 55ab 9b08 4140 c373 ab94 c408 4140 !.U...A@.s....A@ │ │ │ -000031a0: c555 ab85 c608 38aa 85c7 c608 3844 4487 .U....8.....8DD. │ │ │ -000031b0: c808 2187 2220 5b66 6f72 6d20 7361 6665 ..!." [form safe │ │ │ -000031c0: 2d6c 656e 6774 6820 3320 2830 2031 2920 -length 3 (0 1) │ │ │ -000031d0: 6361 7220 3020 3220 6364 7220 6279 7465 car 0 2 cdr byte │ │ │ -000031e0: 2d6f 7074 696d 697a 652d 7072 6564 6963 -optimize-predic │ │ │ -000031f0: 6174 655d 2034 5d29 0a28 7075 7420 276e ate] 4]).(put 'n │ │ │ -00003200: 7468 6364 7220 2762 7974 652d 6f70 7469 thcdr 'byte-opti │ │ │ -00003210: 6d69 7a65 7220 2762 7974 652d 6f70 7469 mizer 'byte-opti │ │ │ -00003220: 6d69 7a65 2d6e 7468 6364 7229 0a28 6465 mize-nthcdr).(de │ │ │ -00003230: 6661 6c69 6173 2027 6279 7465 2d6f 7074 falias 'byte-opt │ │ │ -00003240: 696d 697a 652d 6e74 6863 6472 2023 5b28 imize-nthcdr #[( │ │ │ -00003250: 666f 726d 2920 22c2 0921 c355 ab8b 0941 form) "..!.U...A │ │ │ -00003260: 40c4 73ac 84c5 0921 8709 4140 18c6 0938 @.s....!..A@...8 │ │ │ -00003270: 1108 5389 10c7 59ab 86c8 0944 11aa 7209 ..S...Y....D..r. │ │ │ -00003280: 2987 2220 5b63 6f75 6e74 2066 6f72 6d20 )." [count form │ │ │ -00003290: 7361 6665 2d6c 656e 6774 6820 3320 2830 safe-length 3 (0 │ │ │ -000032a0: 2031 2032 2920 6279 7465 2d6f 7074 696d 1 2) byte-optim │ │ │ -000032b0: 697a 652d 7072 6564 6963 6174 6520 3220 ize-predicate 2 │ │ │ -000032c0: 3020 6364 725d 2032 5d29 0a28 7075 7420 0 cdr] 2]).(put │ │ │ -000032d0: 2763 6f6e 6361 7420 2762 7974 652d 6f70 'concat 'byte-op │ │ │ -000032e0: 7469 6d69 7a65 7220 2762 7974 652d 6f70 timizer 'byte-op │ │ │ -000032f0: 7469 6d69 7a65 2d63 6f6e 6361 7429 0a28 timize-concat).( │ │ │ -00003300: 6465 6661 6c69 6173 2027 6279 7465 2d6f defalias 'byte-o │ │ │ -00003310: 7074 696d 697a 652d 636f 6e63 6174 2023 ptimize-concat # │ │ │ -00003320: 5b28 666f 726d 2920 2208 41c3 1989 1aab [(form) ".A..... │ │ │ -00003330: ab09 aba8 5c6e 403a ab87 5c6e 4040 c461 ....\n@:..\n@@.a │ │ │ -00003340: aa92 5c6e 4039 ab8c c55c 6e40 21ac 8b5c ..\n@9...\n@!..\ │ │ │ -00003350: 6e40 c673 aa81 c3ac 82c7 115c 6e41 8912 n@.s.......\nA.. │ │ │ -00003360: ac55 09ab 85c8 0821 aa81 082a 8722 205b .U.....!...*." [ │ │ │ -00003370: 666f 726d 2063 6f6e 7374 616e 7420 6172 form constant ar │ │ │ -00003380: 6773 2074 2071 756f 7465 206b 6579 776f gs t quote keywo │ │ │ -00003390: 7264 7020 286e 696c 2074 2920 6e69 6c20 rdp (nil t) nil │ │ │ -000033a0: 6576 616c 5d20 335d 290a 2862 7974 652d eval] 3]).(byte- │ │ │ -000033b0: 636f 6465 2022 c5c6 1989 18c7 1c89 1bab code ".......... │ │ │ -000033c0: 8f0b 4014 c80c c9ca 2388 0b41 8913 ac71 ..@.....#..A...q │ │ │ -000033d0: 2a09 c71c 891a ab8f 5c6e 4014 c80c c9cb *.......\n@..... │ │ │ -000033e0: 2388 5c6e 4189 12ac 712c c787 2220 5b73 #.\nA...q,.." [s │ │ │ -000033f0: 6964 652d 6566 6665 6374 2d66 7265 652d ide-effect-free- │ │ │ -00003400: 666e 7320 7369 6465 2d65 6666 6563 742d fns side-effect- │ │ │ -00003410: 616e 642d 6572 726f 722d 6672 6565 2d66 and-error-free-f │ │ │ -00003420: 6e73 2023 313d 233a 2d2d 646f 6c69 7374 ns #1=#:--dolist │ │ │ -00003430: 2d74 656d 702d 2d39 3135 3239 2023 323d -temp--91529 #2= │ │ │ -00003440: 233a 2d2d 646f 6c69 7374 2d74 656d 702d #:--dolist-temp- │ │ │ -00003450: 2d39 3135 3238 2066 6e20 2825 202a 202b -91528 fn (% * + │ │ │ -00003460: 202d 202f 202f 3d20 312b 2031 2d20 3c20 - / /= 1+ 1- < │ │ │ -00003470: 3c3d 203d 203e 203e 3d20 6162 7320 6163 <= = > >= abs ac │ │ │ -00003480: 6f73 2061 7070 656e 6420 6172 6566 2061 os append aref a │ │ │ -00003490: 7368 2061 7369 6e20 6174 616e 2061 7373 sh asin atan ass │ │ │ -000034a0: 6f63 2061 7373 7120 626f 756e 6470 2062 oc assq boundp b │ │ │ -000034b0: 7566 6665 722d 6669 6c65 2d6e 616d 6520 uffer-file-name │ │ │ -000034c0: 6275 6666 6572 2d6c 6f63 616c 2d76 6172 buffer-local-var │ │ │ -000034d0: 6961 626c 6573 2062 7566 6665 722d 6d6f iables buffer-mo │ │ │ -000034e0: 6469 6669 6564 2d70 2062 7566 6665 722d dified-p buffer- │ │ │ -000034f0: 7375 6273 7472 696e 6720 6361 7069 7461 substring capita │ │ │ -00003500: 6c69 7a65 2063 6172 2d6c 6573 732d 7468 lize car-less-th │ │ │ -00003510: 616e 2d63 6172 2063 6172 2063 6472 2063 an-car car cdr c │ │ │ -00003520: 6569 6c69 6e67 2063 6f6e 6361 7420 636f eiling concat co │ │ │ -00003530: 7079 2d6d 6172 6b65 7220 636f 7320 636f py-marker cos co │ │ │ -00003540: 756e 742d 6c69 6e65 7320 6465 6661 756c unt-lines defaul │ │ │ -00003550: 742d 626f 756e 6470 2064 6566 6175 6c74 t-boundp default │ │ │ -00003560: 2d76 616c 7565 2064 6f63 756d 656e 7461 -value documenta │ │ │ -00003570: 7469 6f6e 2064 6f77 6e63 6173 6520 656c tion downcase el │ │ │ -00003580: 7420 6578 7020 6578 7074 2066 626f 756e t exp expt fboun │ │ │ -00003590: 6470 2066 6561 7475 7265 7020 6669 6c65 dp featurep file │ │ │ -000035a0: 2d64 6972 6563 746f 7279 2d70 2066 696c -directory-p fil │ │ │ -000035b0: 652d 6578 6973 7473 2d70 2066 696c 652d e-exists-p file- │ │ │ -000035c0: 6c6f 636b 6564 2d70 2066 696c 652d 6e61 locked-p file-na │ │ │ -000035d0: 6d65 2d61 6273 6f6c 7574 652d 7020 6669 me-absolute-p fi │ │ │ -000035e0: 6c65 2d6e 6577 6572 2d74 6861 6e2d 6669 le-newer-than-fi │ │ │ -000035f0: 6c65 2d70 2066 696c 652d 7265 6164 6162 le-p file-readab │ │ │ -00003600: 6c65 2d70 2066 696c 652d 7379 6d6c 696e le-p file-symlin │ │ │ -00003610: 6b2d 7020 6669 6c65 2d77 7269 7461 626c k-p file-writabl │ │ │ -00003620: 652d 7020 666c 6f61 7420 666c 6f6f 7220 e-p float floor │ │ │ -00003630: 666f 726d 6174 2067 6574 2067 6574 2d62 format get get-b │ │ │ -00003640: 7566 6665 7220 6765 742d 6275 6666 6572 uffer get-buffer │ │ │ -00003650: 2d77 696e 646f 7720 6765 7465 6e76 2067 -window getenv g │ │ │ -00003660: 6574 2d66 696c 652d 6275 6666 6572 206d et-file-buffer m │ │ │ -00003670: 616b 652d 6861 7368 2d74 6162 6c65 2063 ake-hash-table c │ │ │ -00003680: 6f70 792d 6861 7368 2d74 6162 6c65 2067 opy-hash-table g │ │ │ -00003690: 6574 6861 7368 2068 6173 682d 7461 626c ethash hash-tabl │ │ │ -000036a0: 652d 636f 756e 7420 6861 7368 2d74 6162 e-count hash-tab │ │ │ -000036b0: 6c65 2d72 6568 6173 682d 7369 7a65 2068 le-rehash-size h │ │ │ -000036c0: 6173 682d 7461 626c 652d 7265 6861 7368 ash-table-rehash │ │ │ -000036d0: 2d74 6872 6573 686f 6c64 2068 6173 682d -threshold hash- │ │ │ -000036e0: 7461 626c 652d 7369 7a65 2068 6173 682d table-size hash- │ │ │ -000036f0: 7461 626c 652d 7465 7374 2068 6173 682d table-test hash- │ │ │ -00003700: 7461 626c 652d 7479 7065 2069 6e74 2d74 table-type int-t │ │ │ -00003710: 6f2d 7374 7269 6e67 206c 656e 6774 6820 o-string length │ │ │ -00003720: 6c6f 6720 6c6f 6731 3020 6c6f 6761 6e64 log log10 logand │ │ │ -00003730: 206c 6f67 6220 6c6f 6769 6f72 206c 6f67 logb logior log │ │ │ -00003740: 6e6f 7420 6c6f 6778 6f72 206c 7368 206d not logxor lsh m │ │ │ -00003750: 6172 6b65 722d 6275 6666 6572 206d 6178 arker-buffer max │ │ │ -00003760: 206d 656d 6265 7220 6d65 6d71 206d 696e member memq min │ │ │ -00003770: 206d 6f64 206e 6578 742d 7769 6e64 6f77 mod next-window │ │ │ -00003780: 206e 7468 206e 7468 6364 7220 6e75 6d62 nth nthcdr numb │ │ │ -00003790: 6572 2d74 6f2d 7374 7269 6e67 2070 6172 er-to-string par │ │ │ -000037a0: 7365 2d63 6f6c 6f6e 2d70 6174 6820 706c se-colon-path pl │ │ │ -000037b0: 6973 742d 6765 7420 7072 6576 696f 7573 ist-get previous │ │ │ -000037c0: 2d77 696e 646f 7720 7261 6469 616e 732d -window radians- │ │ │ -000037d0: 746f 2d64 6567 7265 6573 2072 6173 7371 to-degrees rassq │ │ │ -000037e0: 2072 6567 6578 702d 7175 6f74 6520 7265 regexp-quote re │ │ │ -000037f0: 7665 7273 6520 726f 756e 6420 7369 6e20 verse round sin │ │ │ -00003800: 7371 7274 2073 7472 696e 673c 2073 7472 sqrt string< str │ │ │ -00003810: 696e 673d 2073 7472 696e 672d 6571 7561 ing= string-equa │ │ │ -00003820: 6c20 7374 7269 6e67 2d6c 6573 7370 2073 l string-lessp s │ │ │ -00003830: 7472 696e 672d 746f 2d63 6861 7220 7374 tring-to-char st │ │ │ -00003840: 7269 6e67 2d74 6f2d 696e 7420 7374 7269 ring-to-int stri │ │ │ -00003850: 6e67 2d74 6f2d 6e75 6d62 6572 2073 7562 ng-to-number sub │ │ │ -00003860: 7374 7269 6e67 2073 796d 626f 6c2d 706c string symbol-pl │ │ │ -00003870: 6973 7420 7461 6e20 7570 6361 7365 2075 ist tan upcase u │ │ │ -00003880: 7365 722d 7661 7269 6162 6c65 2d70 2076 ser-variable-p v │ │ │ -00003890: 636f 6e63 6174 2077 696e 646f 772d 6275 concat window-bu │ │ │ -000038a0: 6666 6572 2077 696e 646f 772d 6465 6469 ffer window-dedi │ │ │ -000038b0: 6361 7465 642d 7020 7769 6e64 6f77 2d70 cated-p window-p │ │ │ -000038c0: 6978 656c 2d65 6467 6573 2077 696e 646f ixel-edges windo │ │ │ -000038d0: 772d 6865 6967 6874 2077 696e 646f 772d w-height window- │ │ │ -000038e0: 6873 6372 6f6c 6c20 7769 6e64 6f77 2d6d hscroll window-m │ │ │ -000038f0: 696e 6962 7566 6665 722d 7020 7769 6e64 inibuffer-p wind │ │ │ -00003900: 6f77 2d77 6964 7468 207a 6572 6f70 206f ow-width zerop o │ │ │ -00003910: 6464 7020 6576 656e 7020 706c 7573 7020 ddp evenp plusp │ │ │ -00003920: 6d69 6e75 7370 2061 6273 2065 7870 7420 minusp abs expt │ │ │ -00003930: 7369 676e 756d 206c 6173 7420 6275 746c signum last butl │ │ │ -00003940: 6173 7420 6c64 6966 6620 7061 6972 6c69 ast ldiff pairli │ │ │ -00003950: 7320 6763 6420 6c63 6d20 6973 7172 7420 s gcd lcm isqrt │ │ │ -00003960: 666c 6f6f 722a 2063 6569 6c69 6e67 2a20 floor* ceiling* │ │ │ -00003970: 7472 756e 6361 7465 2a20 726f 756e 642a truncate* round* │ │ │ -00003980: 206d 6f64 2a20 7265 6d2a 2073 7562 7365 mod* rem* subse │ │ │ -00003990: 7120 6c69 7374 2d6c 656e 6774 6820 6765 q list-length ge │ │ │ -000039a0: 7466 2920 2861 7272 6179 7020 6174 6f6d tf) (arrayp atom │ │ │ -000039b0: 2062 6f62 7020 626f 6c70 2062 7566 6665 bobp bolp buffe │ │ │ -000039c0: 722d 656e 6420 6275 6666 6572 2d6c 6973 r-end buffer-lis │ │ │ -000039d0: 7420 6275 6666 6572 2d73 697a 6520 6275 t buffer-size bu │ │ │ -000039e0: 6666 6572 2d73 7472 696e 6720 6275 6666 ffer-string buff │ │ │ -000039f0: 6572 7020 6361 722d 7361 6665 2063 6173 erp car-safe cas │ │ │ -00003a00: 652d 7461 626c 652d 7020 6364 722d 7361 e-table-p cdr-sa │ │ │ -00003a10: 6665 2063 6861 722d 6f72 2d73 7472 696e fe char-or-strin │ │ │ -00003a20: 672d 7020 6368 6172 2d74 6162 6c65 2d70 g-p char-table-p │ │ │ -00003a30: 2063 6861 7261 6374 6572 7020 636f 6d6d characterp comm │ │ │ -00003a40: 616e 6470 2063 6f6e 7320 636f 6e73 6f6c andp cons consol │ │ │ -00003a50: 6570 2063 6f6e 736f 6c65 2d6c 6976 652d ep console-live- │ │ │ -00003a60: 7020 636f 6e73 7020 6375 7272 656e 742d p consp current- │ │ │ -00003a70: 6275 6666 6572 2064 6576 6963 6570 2064 buffer devicep d │ │ │ -00003a80: 6576 6963 652d 6c69 7665 2d70 2064 6f74 evice-live-p dot │ │ │ -00003a90: 2064 6f74 2d6d 6172 6b65 7220 656f 6270 dot-marker eobp │ │ │ -00003aa0: 2065 6f6c 7020 6571 2065 716c 2065 7175 eolp eq eql equ │ │ │ -00003ab0: 616c 2065 7665 6e74 7020 6578 7465 6e74 al eventp extent │ │ │ -00003ac0: 7020 6578 7465 6e74 2d6c 6976 652d 7020 p extent-live-p │ │ │ -00003ad0: 666c 6f61 7470 2066 7261 6d65 7020 6672 floatp framep fr │ │ │ -00003ae0: 616d 652d 6c69 7665 2d70 2067 6574 2d6c ame-live-p get-l │ │ │ -00003af0: 6172 6765 7374 2d77 696e 646f 7720 6765 argest-window ge │ │ │ -00003b00: 742d 6c72 752d 7769 6e64 6f77 2068 6173 t-lru-window has │ │ │ -00003b10: 682d 7461 626c 652d 7020 6964 656e 7469 h-table-p identi │ │ │ -00003b20: 7479 2069 676e 6f72 6520 696e 7465 6765 ty ignore intege │ │ │ -00003b30: 7270 2069 6e74 6567 6572 2d6f 722d 6d61 rp integer-or-ma │ │ │ -00003b40: 726b 6572 2d70 2069 6e74 6572 6163 7469 rker-p interacti │ │ │ -00003b50: 7665 2d70 2069 6e76 6f63 6174 696f 6e2d ve-p invocation- │ │ │ -00003b60: 6469 7265 6374 6f72 7920 696e 766f 6361 directory invoca │ │ │ -00003b70: 7469 6f6e 2d6e 616d 6520 6b65 796d 6170 tion-name keymap │ │ │ -00003b80: 7020 6c69 7374 206c 6973 7470 206d 616b p list listp mak │ │ │ -00003b90: 652d 6d61 726b 6572 206d 6172 6b20 6d61 e-marker mark ma │ │ │ -00003ba0: 726b 2d6d 6172 6b65 7220 6d61 726b 6572 rk-marker marker │ │ │ -00003bb0: 7020 6d65 6d6f 7279 2d6c 696d 6974 206d p memory-limit m │ │ │ -00003bc0: 696e 6962 7566 6665 722d 7769 6e64 6f77 inibuffer-window │ │ │ -00003bd0: 206e 6174 6e75 6d70 206e 6c69 7374 7020 natnump nlistp │ │ │ -00003be0: 6e6f 7420 6e75 6c6c 206e 756d 6265 722d not null number- │ │ │ -00003bf0: 6f72 2d6d 6172 6b65 722d 7020 6e75 6d62 or-marker-p numb │ │ │ -00003c00: 6572 7020 6f6e 652d 7769 6e64 6f77 2d70 erp one-window-p │ │ │ -00003c10: 2070 6f69 6e74 2070 6f69 6e74 2d6d 6172 point point-mar │ │ │ -00003c20: 6b65 7220 706f 696e 742d 6d69 6e20 706f ker point-min po │ │ │ -00003c30: 696e 742d 6d61 7820 7072 6f63 6573 7370 int-max processp │ │ │ -00003c40: 2072 616e 6765 2d74 6162 6c65 2d70 2073 range-table-p s │ │ │ -00003c50: 656c 6563 7465 642d 7769 6e64 6f77 2073 elected-window s │ │ │ -00003c60: 6571 7565 6e63 6570 2073 7472 696e 6770 equencep stringp │ │ │ -00003c70: 2073 7562 7270 2073 796d 626f 6c70 2073 subrp symbolp s │ │ │ -00003c80: 796e 7461 782d 7461 626c 652d 7020 7573 yntax-table-p us │ │ │ -00003c90: 6572 2d66 756c 6c2d 6e61 6d65 2075 7365 er-full-name use │ │ │ -00003ca0: 722d 6c6f 6769 6e2d 6e61 6d65 2075 7365 r-login-name use │ │ │ -00003cb0: 722d 6f72 6967 696e 616c 2d6c 6f67 696e r-original-login │ │ │ -00003cc0: 2d6e 616d 6520 7573 6572 2d72 6561 6c2d -name user-real- │ │ │ -00003cd0: 6c6f 6769 6e2d 6e61 6d65 2075 7365 722d login-name user- │ │ │ -00003ce0: 7265 616c 2d75 6964 2075 7365 722d 7569 real-uid user-ui │ │ │ -00003cf0: 6420 7665 6374 6f72 2076 6563 746f 7270 d vector vectorp │ │ │ -00003d00: 2077 696e 646f 772d 636f 6e66 6967 7572 window-configur │ │ │ -00003d10: 6174 696f 6e2d 7020 7769 6e64 6f77 2d6c ation-p window-l │ │ │ -00003d20: 6976 652d 7020 7769 6e64 6f77 7020 6571 ive-p windowp eq │ │ │ -00003d30: 6c20 666c 6f61 7470 2d73 6166 6520 6c69 l floatp-safe li │ │ │ -00003d40: 7374 2a20 7375 6273 7420 6163 6f6e 7320 st* subst acons │ │ │ -00003d50: 6571 7561 6c70 2072 616e 646f 6d2d 7374 equalp random-st │ │ │ -00003d60: 6174 652d 7020 636f 7079 2d74 7265 6520 ate-p copy-tree │ │ │ -00003d70: 7375 626c 6973 2920 6e69 6c20 7075 7420 sublis) nil put │ │ │ -00003d80: 7369 6465 2d65 6666 6563 742d 6672 6565 side-effect-free │ │ │ -00003d90: 2074 2065 7272 6f72 2d66 7265 655d 2036 t error-free] 6 │ │ │ -00003da0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -00003db0: 652d 636f 6d70 696c 652d 7370 6c69 6365 e-compile-splice │ │ │ -00003dc0: 2d69 6e2d 616c 7265 6164 792d 636f 6d70 -in-already-comp │ │ │ -00003dd0: 696c 6564 2d63 6f64 6520 235b 2866 6f72 iled-code #[(for │ │ │ -00003de0: 6d29 2022 08c4 73ac 84c5 0b21 87c6 c70b m) "..s....!.... │ │ │ -00003df0: 4140 c80b 38c9 2321 885c 6eca 0b38 5c5c A@..8.#!.\n..8\\ │ │ │ -00003e00: 095d 115c 6e54 8912 8722 205b 6279 7465 .].\nT..." [byte │ │ │ -00003e10: 2d6f 7074 696d 697a 6520 6279 7465 2d63 -optimize byte-c │ │ │ -00003e20: 6f6d 7069 6c65 2d6d 6178 6465 7074 6820 ompile-maxdepth │ │ │ -00003e30: 6279 7465 2d63 6f6d 7069 6c65 2d64 6570 byte-compile-dep │ │ │ -00003e40: 7468 2066 6f72 6d20 2874 2062 7974 6529 th form (t byte) │ │ │ -00003e50: 2062 7974 652d 636f 6d70 696c 652d 6e6f byte-compile-no │ │ │ -00003e60: 726d 616c 2d63 616c 6c20 6279 7465 2d69 rmal-call byte-i │ │ │ -00003e70: 6e6c 696e 652d 6c61 7063 6f64 6520 6279 nline-lapcode by │ │ │ -00003e80: 7465 2d64 6563 6f6d 7069 6c65 2d62 7974 te-decompile-byt │ │ │ -00003e90: 6563 6f64 652d 3120 3220 7420 335d 2035 ecode-1 2 t 3] 5 │ │ │ -00003ea0: 5d29 0a28 6279 7465 2d63 6f64 6520 22c2 ]).(byte-code ". │ │ │ -00003eb0: c3c4 c523 88c0 0942 11c6 10c2 8722 205b ...#...B....." [ │ │ │ -00003ec0: 6279 7465 2d63 6f6e 7374 7265 662d 6f70 byte-constref-op │ │ │ -00003ed0: 7320 6375 7272 656e 742d 6c6f 6164 2d6c s current-load-l │ │ │ -00003ee0: 6973 7420 7075 7420 6279 7465 2d63 6f64 ist put byte-cod │ │ │ -00003ef0: 6520 6279 7465 2d63 6f6d 7069 6c65 2062 e byte-compile b │ │ │ -00003f00: 7974 652d 636f 6d70 696c 652d 7370 6c69 yte-compile-spli │ │ │ -00003f10: 6365 2d69 6e2d 616c 7265 6164 792d 636f ce-in-already-co │ │ │ -00003f20: 6d70 696c 6564 2d63 6f64 6520 2862 7974 mpiled-code (byt │ │ │ -00003f30: 652d 636f 6e73 7461 6e74 2062 7974 652d e-constant byte- │ │ │ -00003f40: 636f 6e73 7461 6e74 3220 6279 7465 2d76 constant2 byte-v │ │ │ -00003f50: 6172 7265 6620 6279 7465 2d76 6172 7365 arref byte-varse │ │ │ -00003f60: 7420 6279 7465 2d76 6172 6269 6e64 295d t byte-varbind)] │ │ │ -00003f70: 2034 290a 2340 3138 2044 6f6e 2774 2063 4).#@18 Don't c │ │ │ -00003f80: 616c 6c20 7468 6973 211f 0a28 6465 6661 all this!..(defa │ │ │ -00003f90: 6c69 6173 2027 6469 7361 7373 656d 626c lias 'disassembl │ │ │ -00003fa0: 652d 6f66 6673 6574 2023 5b6e 696c 2022 e-offset #[nil " │ │ │ -00003fb0: 0c08 57ab b3c6 0cc7 5c22 1ac6 0cc8 5c22 ..W.....\"....\" │ │ │ -00003fc0: 145c 6ec9 61ab 8a0d 5415 ca0b 0d48 21aa .\n.a...T....H!. │ │ │ -00003fd0: 985c 6ec7 61ab 920d 5415 0b0d 480d 5415 .\n.a...T...H.T. │ │ │ -00003fe0: cb0b 0d48 cc5c 225c 5caa 815c 6e29 870c ...H.\"\\..\n).. │ │ │ -00003ff0: 0959 ab86 0c09 5a09 1487 0c0e 0d59 ab97 .Y....Z......Y.. │ │ │ -00004000: 0c0e 0e58 ab91 0d54 150b 0d48 0d54 15cb ...X...T...H.T.. │ │ │ -00004010: 0b0d 48cc 5c22 5c5c 870c 0e0f 59ad 8e0c ..H.\"\\....Y... │ │ │ -00004020: 0e10 58ad 880d 5415 ca0b 0d48 2187 2220 ..X...T....H!." │ │ │ -00004030: 5b62 7974 652d 6e74 6820 6279 7465 2d63 [byte-nth byte-c │ │ │ -00004040: 6f6e 7374 616e 7420 7465 6d20 6279 7465 onstant tem byte │ │ │ -00004050: 7320 6f70 2070 7472 206c 6f67 616e 6420 s op ptr logand │ │ │ -00004060: 3720 3234 3820 3620 6368 6172 2d74 6f2d 7 248 6 char-to- │ │ │ -00004070: 696e 7420 6c73 6820 3820 6279 7465 2d63 int lsh 8 byte-c │ │ │ -00004080: 6f6e 7374 616e 7432 2062 7974 652d 676f onstant2 byte-go │ │ │ -00004090: 746f 2d69 662d 6e6f 742d 6e69 6c2d 656c to-if-not-nil-el │ │ │ -000040a0: 7365 2d70 6f70 2062 7974 652d 7265 6c2d se-pop byte-rel- │ │ │ -000040b0: 676f 746f 2062 7974 652d 696e 7365 7274 goto byte-insert │ │ │ -000040c0: 4e5d 2034 2028 2324 202e 2031 3632 3439 N] 4 (#$ . 16249 │ │ │ -000040d0: 295d 290a 2340 3533 2054 7572 6e73 2042 )]).#@53 Turns B │ │ │ -000040e0: 5954 4543 4f44 4520 696e 746f 206c 6170 YTECODE into lap │ │ │ -000040f0: 636f 6465 2c20 7265 6665 7272 696e 6720 code, referring │ │ │ -00004100: 746f 2043 4f4e 5354 5645 432e 1f0a 2864 to CONSTVEC...(d │ │ │ -00004110: 6566 616c 6961 7320 2762 7974 652d 6465 efalias 'byte-de │ │ │ -00004120: 636f 6d70 696c 652d 6279 7465 636f 6465 compile-bytecode │ │ │ -00004130: 2023 5b28 6279 7465 7320 636f 6e73 7476 #[(bytes constv │ │ │ -00004140: 6563 2920 22c5 89c6 1c1b 1ac7 0908 5c22 ec) ".........\" │ │ │ -00004150: 2b87 2220 5b63 6f6e 7374 7665 6320 6279 +." [constvec by │ │ │ -00004160: 7465 7320 6279 7465 2d63 6f6d 7069 6c65 tes byte-compile │ │ │ -00004170: 2d63 6f6e 7374 616e 7473 2062 7974 652d -constants byte- │ │ │ -00004180: 636f 6d70 696c 652d 7661 7269 6162 6c65 compile-variable │ │ │ -00004190: 7320 6279 7465 2d63 6f6d 7069 6c65 2d74 s byte-compile-t │ │ │ -000041a0: 6167 2d6e 756d 6265 7220 6e69 6c20 3020 ag-number nil 0 │ │ │ -000041b0: 6279 7465 2d64 6563 6f6d 7069 6c65 2d62 byte-decompile-b │ │ │ -000041c0: 7974 6563 6f64 652d 315d 2033 2028 2324 ytecode-1] 3 (#$ │ │ │ -000041d0: 202e 2031 3636 3031 295d 290a 2864 6566 . 16601)]).(def │ │ │ -000041e0: 616c 6961 7320 2762 7974 652d 6465 636f alias 'byte-deco │ │ │ -000041f0: 6d70 696c 652d 6279 7465 636f 6465 2d31 mpile-bytecode-1 │ │ │ -00004200: 2023 5b28 6279 7465 7320 636f 6e73 7476 #[(bytes constv │ │ │ -00004210: 6563 2026 6f70 7469 6f6e 616c 206d 616b ec &optional mak │ │ │ -00004220: 652d 7370 6c69 6365 6162 6c65 2920 220e e-spliceable) ". │ │ │ -00004230: 1c47 c6c7 8989 8989 8989 1e17 1a1b 1c1d .G.............. │ │ │ -00004240: 191e 1918 1e1a 080e 1a55 84ec 000e 1dac .........U...... │ │ │ -00004250: 8408 0b42 130e 1c08 4815 0816 19c8 2014 ...B....H..... . │ │ │ -00004260: 0e1e 0d48 8915 0e20 73ac 980d 0e21 73ab ...H... s....!s. │ │ │ -00004270: a40e 1e0d 4a0e 5c22 0e10 5a5a 4815 080c ....J.\"..ZZH... │ │ │ -00004280: c95a 5c5c 140c 09b7 ae89 0cca 2042 0942 .Z\\........ B.B │ │ │ -00004290: 8911 4041 14aa f30d cb61 ab84 cc15 aa86 ..@A.....a...... │ │ │ -000042a0: 0d0e 2373 abc4 0c0e 1f47 59ab 85cd 0c44 ..#s.....GY....D │ │ │ -000042b0: aa84 0e1f 0c48 120d cc61 ab9c 5c6e 3bab .....H...a..\n;. │ │ │ -000042c0: 87ce 5c6e 0e18 5c22 aa84 5c6e 0e18 b7ae ..\n..\"..\n.... │ │ │ -000042d0: 9a5c 6e43 0e18 4289 1618 40aa 8f5c 6e0e .\nC..B...@..\n. │ │ │ -000042e0: 1bb7 ae89 5c6e 430e 1b42 8916 1b40 14aa ....\nC..B...@.. │ │ │ -000042f0: a00e 1dab 9c0d cf61 ab97 080e 1a53 55ab .......a.....SU. │ │ │ -00004300: 84c7 15aa 8c0e 17ae 85ca 2089 1617 14d0 .......... ..... │ │ │ -00004310: 150e 190d 0cae 81c6 4242 0b42 1308 5489 ........BB.B..T. │ │ │ -00004320: 1082 1800 0b89 1e16 abae 0e16 40a7 aca0 ............@... │ │ │ -00004330: 0e16 4040 09b7 8912 ab96 0e16 c75c 6e41 ..@@.........\nA │ │ │ -00004340: 420e 1641 42a1 88d1 5c6e 095c 2211 0e16 B..AB...\n.\"... │ │ │ -00004350: 4116 160e 1641 8916 16ac 5229 09ab 85d2 A....A....R).... │ │ │ -00004360: d309 5c22 880b 4041 40ac 830b 4113 0e17 ..\"..@A@...A... │ │ │ -00004370: ab87 c70e 1742 0b42 13d4 d50b 9f5c 222e .....B.B.....\". │ │ │ -00004380: 0987 2220 5b70 7472 2074 6167 7320 746d .." [ptr tags tm │ │ │ -00004390: 7020 6c61 7020 6f66 6673 6574 206f 7020 p lap offset op │ │ │ -000043a0: 3020 6e69 6c20 6469 7361 7373 656d 626c 0 nil disassembl │ │ │ -000043b0: 652d 6f66 6673 6574 2031 3237 2062 7974 e-offset 127 byt │ │ │ -000043c0: 652d 636f 6d70 696c 652d 6d61 6b65 2d74 e-compile-make-t │ │ │ -000043d0: 6167 2062 7974 652d 636f 6e73 7461 6e74 ag byte-constant │ │ │ -000043e0: 3220 6279 7465 2d63 6f6e 7374 616e 7420 2 byte-constant │ │ │ -000043f0: 6f75 742d 6f66 2d72 616e 6765 2061 7373 out-of-range ass │ │ │ -00004400: 6f63 2062 7974 652d 7265 7475 726e 2062 oc byte-return b │ │ │ -00004410: 7974 652d 676f 746f 2064 656c 7120 6572 yte-goto delq er │ │ │ -00004420: 726f 7220 226f 7074 696d 697a 6572 2065 ror "optimizer e │ │ │ -00004430: 7272 6f72 3a20 6d69 7373 6564 2074 6167 rror: missed tag │ │ │ -00004440: 7320 2573 2220 6d61 7063 6172 2023 5b28 s %s" mapcar #[( │ │ │ -00004450: 656c 7429 2022 08a7 ab82 0887 0841 8722 elt) ".......A." │ │ │ -00004460: 205b 656c 745d 2031 5d20 7265 7374 2065 [elt] 1] rest e │ │ │ -00004470: 6e64 7461 6720 6279 7465 2d63 6f6d 7069 ndtag byte-compi │ │ │ -00004480: 6c65 2d63 6f6e 7374 616e 7473 206f 7074 le-constants opt │ │ │ -00004490: 7220 6c65 6e67 7468 2062 7974 652d 636f r length byte-co │ │ │ -000044a0: 6d70 696c 652d 7661 7269 6162 6c65 7320 mpile-variables │ │ │ -000044b0: 6279 7465 7320 6d61 6b65 2d73 706c 6963 bytes make-splic │ │ │ -000044c0: 6561 626c 6520 6279 7465 2d63 6f64 652d eable byte-code- │ │ │ -000044d0: 7665 6374 6f72 2063 6f6e 7374 7665 6320 vector constvec │ │ │ -000044e0: 6279 7465 2d67 6f74 6f2d 6f70 7320 6279 byte-goto-ops by │ │ │ -000044f0: 7465 2d72 656c 2d67 6f74 6f2d 6f70 7320 te-rel-goto-ops │ │ │ -00004500: 6279 7465 2d72 656c 2d67 6f74 6f20 6279 byte-rel-goto by │ │ │ -00004510: 7465 2d63 6f6e 7374 7265 662d 6f70 735d te-constref-ops] │ │ │ -00004520: 2031 305d 290a 2862 7974 652d 636f 6465 10]).(byte-code │ │ │ -00004530: 2022 c10b 4213 c45c 6e42 11c0 0b42 13c5 "..B..\nB...B.. │ │ │ -00004540: 10c1 8722 205b 6279 7465 2d63 6f6e 6469 ..." [byte-condi │ │ │ -00004550: 7469 6f6e 616c 2d6f 7073 2062 7974 652d tional-ops byte- │ │ │ -00004560: 7461 6772 6566 2d6f 7073 2062 7974 652d tagref-ops byte- │ │ │ -00004570: 676f 746f 2d6f 7073 2063 7572 7265 6e74 goto-ops current │ │ │ -00004580: 2d6c 6f61 642d 6c69 7374 2054 4147 2028 -load-list TAG ( │ │ │ -00004590: 6279 7465 2d67 6f74 6f2d 6966 2d6e 696c byte-goto-if-nil │ │ │ -000045a0: 2062 7974 652d 676f 746f 2d69 662d 6e6f byte-goto-if-no │ │ │ -000045b0: 742d 6e69 6c20 6279 7465 2d67 6f74 6f2d t-nil byte-goto- │ │ │ -000045c0: 6966 2d6e 696c 2d65 6c73 652d 706f 7020 if-nil-else-pop │ │ │ -000045d0: 6279 7465 2d67 6f74 6f2d 6966 2d6e 6f74 byte-goto-if-not │ │ │ -000045e0: 2d6e 696c 2d65 6c73 652d 706f 7029 5d20 -nil-else-pop)] │ │ │ -000045f0: 3229 0a23 4034 3620 4279 7465 2d63 6f64 2).#@46 Byte-cod │ │ │ -00004600: 6573 2074 6861 7420 6361 6e20 6265 206d es that can be m │ │ │ -00004610: 6f76 6564 2070 6173 7420 616e 2075 6e62 oved past an unb │ │ │ -00004620: 696e 642e 1f0a 2864 6566 636f 6e73 7420 ind...(defconst │ │ │ -00004630: 6279 7465 2d61 6674 6572 2d75 6e62 696e byte-after-unbin │ │ │ -00004640: 642d 6f70 7320 2728 6279 7465 2d63 6f6e d-ops '(byte-con │ │ │ -00004650: 7374 616e 7420 6279 7465 2d64 7570 2062 stant byte-dup b │ │ │ -00004660: 7974 652d 7379 6d62 6f6c 7020 6279 7465 yte-symbolp byte │ │ │ -00004670: 2d63 6f6e 7370 2062 7974 652d 7374 7269 -consp byte-stri │ │ │ -00004680: 6e67 7020 6279 7465 2d6c 6973 7470 2062 ngp byte-listp b │ │ │ -00004690: 7974 652d 6e75 6d62 6572 7020 6279 7465 yte-numberp byte │ │ │ -000046a0: 2d69 6e74 6567 6572 7020 6279 7465 2d65 -integerp byte-e │ │ │ -000046b0: 7120 6279 7465 2d6e 6f74 2062 7974 652d q byte-not byte- │ │ │ -000046c0: 636f 6e73 2062 7974 652d 6c69 7374 3120 cons byte-list1 │ │ │ -000046d0: 6279 7465 2d6c 6973 7432 2062 7974 652d byte-list2 byte- │ │ │ -000046e0: 696e 7465 7261 6374 6976 652d 7029 2028 interactive-p) ( │ │ │ -000046f0: 2324 202e 2031 3739 3132 2929 0a28 6279 #$ . 17912)).(by │ │ │ -00004700: 7465 2d63 6f64 6520 22c1 5c6e 4212 c311 te-code ".\nB... │ │ │ -00004710: c05c 6e42 12c4 09a4 10c1 8722 205b 6279 .\nB......." [by │ │ │ -00004720: 7465 2d63 6f6d 7069 6c65 2d73 6964 652d te-compile-side- │ │ │ -00004730: 6566 6665 6374 2d66 7265 652d 6f70 7320 effect-free-ops │ │ │ -00004740: 6279 7465 2d63 6f6d 7069 6c65 2d73 6964 byte-compile-sid │ │ │ -00004750: 652d 6566 6665 6374 2d61 6e64 2d65 7272 e-effect-and-err │ │ │ -00004760: 6f72 2d66 7265 652d 6f70 7320 6375 7272 or-free-ops curr │ │ │ -00004770: 656e 742d 6c6f 6164 2d6c 6973 7420 2862 ent-load-list (b │ │ │ -00004780: 7974 652d 636f 6e73 7461 6e74 2062 7974 yte-constant byt │ │ │ -00004790: 652d 6475 7020 6279 7465 2d73 796d 626f e-dup byte-symbo │ │ │ -000047a0: 6c70 2062 7974 652d 636f 6e73 7020 6279 lp byte-consp by │ │ │ -000047b0: 7465 2d73 7472 696e 6770 2062 7974 652d te-stringp byte- │ │ │ -000047c0: 6c69 7374 7020 6279 7465 2d69 6e74 6567 listp byte-integ │ │ │ -000047d0: 6572 7020 6279 7465 2d6e 756d 6265 7270 erp byte-numberp │ │ │ -000047e0: 2062 7974 652d 6571 2062 7974 652d 6571 byte-eq byte-eq │ │ │ -000047f0: 7561 6c20 6279 7465 2d6e 6f74 2062 7974 ual byte-not byt │ │ │ -00004800: 652d 6361 722d 7361 6665 2062 7974 652d e-car-safe byte- │ │ │ -00004810: 6364 722d 7361 6665 2062 7974 652d 636f cdr-safe byte-co │ │ │ -00004820: 6e73 2062 7974 652d 6c69 7374 3120 6279 ns byte-list1 by │ │ │ -00004830: 7465 2d6c 6973 7432 2062 7974 652d 706f te-list2 byte-po │ │ │ -00004840: 696e 7420 6279 7465 2d70 6f69 6e74 2d6d int byte-point-m │ │ │ -00004850: 6178 2062 7974 652d 706f 696e 742d 6d69 ax byte-point-mi │ │ │ -00004860: 6e20 6279 7465 2d66 6f6c 6c6f 7769 6e67 n byte-following │ │ │ -00004870: 2d63 6861 7220 6279 7465 2d70 7265 6365 -char byte-prece │ │ │ -00004880: 6469 6e67 2d63 6861 7220 6279 7465 2d63 ding-char byte-c │ │ │ -00004890: 7572 7265 6e74 2d63 6f6c 756d 6e20 6279 urrent-column by │ │ │ -000048a0: 7465 2d65 6f6c 7020 6279 7465 2d65 6f62 te-eolp byte-eob │ │ │ -000048b0: 7020 6279 7465 2d62 6f6c 7020 6279 7465 p byte-bolp byte │ │ │ -000048c0: 2d62 6f62 7020 6279 7465 2d63 7572 7265 -bobp byte-curre │ │ │ -000048d0: 6e74 2d62 7566 6665 7220 6279 7465 2d69 nt-buffer byte-i │ │ │ -000048e0: 6e74 6572 6163 7469 7665 2d70 2920 2862 nteractive-p) (b │ │ │ -000048f0: 7974 652d 7661 7272 6566 2062 7974 652d yte-varref byte- │ │ │ -00004900: 6e74 6820 6279 7465 2d6d 656d 7120 6279 nth byte-memq by │ │ │ -00004910: 7465 2d63 6172 2062 7974 652d 6364 7220 te-car byte-cdr │ │ │ -00004920: 6279 7465 2d6c 656e 6774 6820 6279 7465 byte-length byte │ │ │ -00004930: 2d61 7265 6620 6279 7465 2d73 796d 626f -aref byte-symbo │ │ │ -00004940: 6c2d 7661 6c75 6520 6279 7465 2d67 6574 l-value byte-get │ │ │ -00004950: 2062 7974 652d 636f 6e63 6174 3220 6279 byte-concat2 by │ │ │ -00004960: 7465 2d63 6f6e 6361 7433 2062 7974 652d te-concat3 byte- │ │ │ -00004970: 7375 6231 2062 7974 652d 6164 6431 2062 sub1 byte-add1 b │ │ │ -00004980: 7974 652d 6571 6c73 6967 6e20 6279 7465 yte-eqlsign byte │ │ │ -00004990: 2d67 7472 2062 7974 652d 6c73 7320 6279 -gtr byte-lss by │ │ │ -000049a0: 7465 2d6c 6571 2062 7974 652d 6765 7120 te-leq byte-geq │ │ │ -000049b0: 6279 7465 2d64 6966 6620 6279 7465 2d6e byte-diff byte-n │ │ │ -000049c0: 6567 6174 6520 6279 7465 2d70 6c75 7320 egate byte-plus │ │ │ -000049d0: 6279 7465 2d6d 6178 2062 7974 652d 6d69 byte-max byte-mi │ │ │ -000049e0: 6e20 6279 7465 2d6d 756c 7420 6279 7465 n byte-mult byte │ │ │ -000049f0: 2d63 6861 722d 6166 7465 7220 6279 7465 -char-after byte │ │ │ -00004a00: 2d63 6861 722d 7379 6e74 6178 2062 7974 -char-syntax byt │ │ │ -00004a10: 652d 6275 6666 6572 2d73 7562 7374 7269 e-buffer-substri │ │ │ -00004a20: 6e67 2062 7974 652d 7374 7269 6e67 3d20 ng byte-string= │ │ │ -00004a30: 6279 7465 2d73 7472 696e 673c 2062 7974 byte-string< byt │ │ │ -00004a40: 652d 6e74 6863 6472 2062 7974 652d 656c e-nthcdr byte-el │ │ │ -00004a50: 7420 6279 7465 2d6d 656d 6265 7220 6279 t byte-member by │ │ │ -00004a60: 7465 2d61 7373 7120 6279 7465 2d71 756f te-assq byte-quo │ │ │ -00004a70: 2062 7974 652d 7265 6d29 5d20 3229 0a23 byte-rem)] 2).# │ │ │ -00004a80: 4036 3420 5369 6d70 6c65 2070 6565 7068 @64 Simple peeph │ │ │ -00004a90: 6f6c 6520 6f70 7469 6d69 7a65 722e 2020 ole optimizer. │ │ │ -00004aa0: 4c41 5020 6973 2062 6f74 6820 6d6f 6469 LAP is both modi │ │ │ -00004ab0: 6669 6564 2061 6e64 2072 6574 7572 6e65 fied and returne │ │ │ -00004ac0: 642e 1f0a 2864 6566 616c 6961 7320 2762 d...(defalias 'b │ │ │ -00004ad0: 7974 652d 6f70 7469 6d69 7a65 2d6c 6170 yte-optimize-lap │ │ │ -00004ae0: 636f 6465 2023 5b28 6c61 7020 266f 7074 code #[(lap &opt │ │ │ -00004af0: 696f 6e61 6c20 666f 722d 6566 6665 6374 ional for-effect │ │ │ -00004b00: 2920 22c6 8989 89c7 c8c6 8989 890e 58ab ) "...........X. │ │ │ -00004b10: 840e 59aa 820e 5a1e 531e 441e 401b 1a1e ..Y...Z.S.D.@... │ │ │ -00004b20: 481e 411e 4b1e 421c 1d0e 4183 9a07 0e41 H.A.K.B...A....A │ │ │ -00004b30: c761 ac89 08c9 73ab 84ca cb21 8809 12c6 .a....s....!.... │ │ │ -00004b40: 1641 5c6e ab64 5c6e 4015 5c6e 4140 14cc .A\n.d\n@.\nA@.. │ │ │ -00004b50: 5c6e 3816 420c 40cd 61ab e60d 400e 5373 \n8.B.@.a...@.Ss │ │ │ -00004b60: abdf ce16 410e 5b0d 404a 4813 5c6e 4112 ....A.[.@JH.\nA. │ │ │ -00004b70: 0bcf 55ab 9508 c973 ab85 cad0 0d5c 2288 ..U....s.....\". │ │ │ -00004b80: d10d d10c 095c 225c 2211 8293 070b c855 .....\"\"......U │ │ │ -00004b90: ab92 08c9 73ab 85ca d20d 5c22 88d1 0d09 ....s.....\".... │ │ │ -00004ba0: 5c22 1182 9307 0bd3 55ab 9508 c973 ab85 \"......U....s.. │ │ │ -00004bb0: cad4 0d5c 2288 0dcd a088 0dc8 a188 8293 ...\"........... │ │ │ -00004bc0: 07d5 d621 8882 9307 0d40 0e54 73ab dd0d ...!.....@.Ts... │ │ │ -00004bd0: 410c 61ab d70d 40d7 61ab 89d1 0d09 5c22 A.a...@.a.....\" │ │ │ -00004be0: 11d8 13aa 9a0d 400e 5573 ab8c 0dcd 8913 ......@.Us...... │ │ │ -00004bf0: a088 0dc8 a188 aa87 d5d9 cc0d 385c 2288 ............8\". │ │ │ -00004c00: 08da 73ab a30e 4dab 9f08 db73 ab9a cedc ..s...M....s.... │ │ │ -00004c10: 891e 4e1e 4f1e 50dd dedf 0c41 400c 4140 ..N.O.P....A@.A@ │ │ │ -00004c20: 0b0c 4140 2521 882b ce16 4182 9307 0e42 ..A@%!.+..A....B │ │ │ -00004c30: 40e0 6183 b201 0c41 0e42 4161 83b2 010c @.a....A.BAa.... │ │ │ -00004c40: 40e1 73ab fde2 0e42 4140 21e3 6189 13ab @.s....BA@!.a... │ │ │ -00004c50: 870d 40e4 6183 9307 ce16 410d 40e5 73ab ..@.a.....A.@.s. │ │ │ -00004c60: c00b ab87 0d41 40e6 73ab 840d 41aa 8fce .....A@.s...A... │ │ │ -00004c70: 0e43 b7ae 89ce 430e 4342 8916 4340 1308 .C....C.CB..C@.. │ │ │ -00004c80: c973 ab8f cae7 0d0c 0e42 0d0c 0d40 0b42 .s.......B...@.B │ │ │ -00004c90: 2607 880e 420d 40a0 880e 420b a188 8293 &...B.@...B..... │ │ │ -00004ca0: 0708 c973 ab88 cae8 0c0e 420c 2488 0e42 ...s......B.$..B │ │ │ -00004cb0: 0c40 a088 0ce9 a088 0cc8 a188 cf16 4882 .@............H. │ │ │ -00004cc0: 9307 0d40 e961 abaa 0e42 40cd 61ab a30c ...@.a...B@.a... │ │ │ -00004cd0: 40ea 73ab 9d08 c973 ab86 caeb 0c89 2388 @.s....s......#. │ │ │ -00004ce0: ce16 415c 6e41 12d1 0dd1 0e42 095c 225c ..A\nA.....B.\"\ │ │ │ -00004cf0: 2211 8293 070d 40ec 61ab bb0c 40ed 61ac ".....@.a...@.a. │ │ │ -00004d00: 860c 40ee 61ab af08 c973 ab92 caef 0c89 ..@.a....s...... │ │ │ -00004d10: 40ed 61ab 83ee aa81 ed0c 4142 2388 0c89 @.a.......AB#... │ │ │ -00004d20: 40ed 61ab 83ee aa81 eda0 88d1 0d09 5c22 @.a...........\" │ │ │ -00004d30: 11ce 1641 8293 070d 40ed 61ac 860d 40ee ...A....@.a...@. │ │ │ -00004d40: 61ab bf0c 40d7 61ab b90d 410e 4261 abb2 a...@.a...A.Ba.. │ │ │ -00004d50: 0d40 ed61 ab83 eeaa 81ed 1e51 08c9 73ab .@.a.......Q..s. │ │ │ -00004d60: 90ca f00d 0c0e 420e 510c 4142 0e42 2606 ......B.Q.AB.B&. │ │ │ -00004d70: 88d1 0d09 5c22 110c 0e51 a088 ce16 4129 ....\"...Q....A) │ │ │ -00004d80: 8293 070d 40e4 61ab ec0c 400e 5c5c 73ab ....@.a...@.\\s. │ │ │ -00004d90: e50c 40ed 61ac 860c 40f1 61ab 850d 4140 ..@.a...@.a...A@ │ │ │ -00004da0: aa84 0d41 403f ab98 08c9 73ab 86ca f20d ...A@?....s..... │ │ │ -00004db0: 0c23 885c 6e41 12d1 0dd1 0c09 5c22 5c22 .#.\nA......\"\" │ │ │ -00004dc0: 11aa b00c 400e 5573 ab96 08c9 73ab 8aca ....@.Us....s... │ │ │ -00004dd0: f30d 0cd7 0c41 4224 88d1 0d09 5c22 11aa .....AB$....\".. │ │ │ -00004de0: 8f08 c973 ab8a caf3 0d0c d70c 4142 2488 ...s........AB$. │ │ │ -00004df0: 0cd7 a088 ce16 4182 9307 0d40 e061 abe2 ......A....@.a.. │ │ │ -00004e00: 5c6e 4189 1340 40e9 61ab 860b 4189 13aa \nA..@@.a...A... │ │ │ -00004e10: 740d 410b 4041 61ab ca0b 4040 e061 abc3 t.A.@Aa...@@.a.. │ │ │ -00004e20: 08f4 73ab acf5 1e45 5c6e 4116 400b 0e40 ..s....E\nA.@..@ │ │ │ -00004e30: 61ac 8d0e 4041 1640 0e45 f650 1645 aa6d a...@A.@.E.P.E.m │ │ │ -00004e40: 08c9 73ab 8cca f70d 0e45 0d89 0e45 2606 ..s......E...E&. │ │ │ -00004e50: 8829 ce16 410b 40e9 a088 0b40 c8a1 880b .)..A.@....@.... │ │ │ -00004e60: 1282 9307 0d40 f861 abd1 0c40 f861 abcb .....@.a...@.a.. │ │ │ -00004e70: 08f9 73ab 9f0e 4dab 9b08 db73 ab96 cedc ..s...M....s.... │ │ │ -00004e80: 891e 4e1e 4f1e 50dd defa 0c41 400d 4140 ..N.O.P....A@.A@ │ │ │ -00004e90: 2321 882b 0916 44fb 0d0e 445c 2289 1640 #!.+..D...D\"..@ │ │ │ -00004ea0: ab8f 0e40 0ca1 880e 400e 4473 4116 44aa ...@....@.DsA.D. │ │ │ -00004eb0: 67d1 0d09 5c22 11ce 1641 8293 070d 40f8 g...\"...A....@. │ │ │ -00004ec0: 61ab b2fb 0d09 5c22 acac 08fc 73ab 9c0e a.....\"....s... │ │ │ -00004ed0: 4dab 9808 db73 ab93 cedc 891e 4e1e 4f1e M....s......N.O. │ │ │ -00004ee0: 50dd defd 0d41 405c 2221 882b d10d 095c P....A@\"!.+...\ │ │ │ -00004ef0: 2211 ce16 4182 9307 0d40 fe73 838a 040c "...A....@.s.... │ │ │ -00004f00: 40ff 7384 8a04 5c6e 13c8 0881 5f00 73c6 @.s...\n...._.s. │ │ │ -00004f10: 891e 4c1e 451e 521e 490b 4189 13ab a10b ..L.E.R.I.A..... │ │ │ -00004f20: 4040 f861 ac9a 0e52 ab6f 0b40 0e4c 4216 @@.a...R.o.@.LB. │ │ │ -00004f30: 4c0e 4581 6000 5016 450e 4954 1649 aa59 L.E.`.P.E.IT.I.Y │ │ │ -00004f40: 0e52 abdd 0b40 40f8 61ab 8bde 8161 000b .R...@@.a....a.. │ │ │ -00004f50: 4041 405c 22aa 850b 40ae 81f5 1e4a 0e49 @A@\"...@....J.I │ │ │ -00004f60: 8162 0057 ab9c 8163 00ca 8164 000e 4581 .b.W...c...d..E. │ │ │ -00004f70: 6500 510d 0e4c 9f0e 4a0d 0e4a 45a4 2488 e.Q..L..J..JE.$. │ │ │ -00004f80: aa9f 08c9 73ab 9aca 8166 000d 0e49 89cf ....s....f...I.. │ │ │ -00004f90: 55ab 83f5 aa83 8167 000e 4a0d 0e4a 2607 U......g..J..J&. │ │ │ -00004fa0: 8829 5c6e 0ba1 882c ce16 4182 9307 0c40 .)\n...,..A....@ │ │ │ -00004fb0: 8168 0061 aba5 0d40 0e5d 73ab 9e08 c973 .h.a...@.]s....s │ │ │ -00004fc0: ab8a ca81 6900 0d0c 890d 2588 5c6e 0ca0 ....i.....%.\n.. │ │ │ -00004fd0: 885c 6e41 0da0 88ce 1641 8293 070c 4081 .\nA.....A....@. │ │ │ -00004fe0: 6800 61ab ec0d 4081 6a00 73ab e4c8 0c41 h.a...@.j.s....A │ │ │ -00004ff0: 57ab de0c 8941 53a1 c855 ab85 d10c 5c6e W....AS..U....\n │ │ │ -00005000: 5c22 880d 4081 6b00 61ab 885c 6ecd c842 \"..@.k.a..\n..B │ │ │ -00005010: a088 aa85 d10d 095c 2211 08c9 73ab b0ca .......\"...s... │ │ │ -00005020: 8169 000d 0c40 0c41 5442 0d40 816b 0061 .i...@.ATB.@.k.a │ │ │ -00005030: ab84 5c6e 40aa 835c 6e41 40c8 0c41 55ac ..\n@..\nA@..AU. │ │ │ -00005040: 8d0d 4081 6b00 61ab 855c 6e41 40aa 81f5 ..@.k.a..\nA@... │ │ │ -00005050: 2588 ce16 4182 9307 0d40 0e54 73ab ca0d %...A....@.Ts... │ │ │ -00005060: 4109 7341 4089 1340 816c 0073 abbb 0b0d A.sA@..@.l.s.... │ │ │ -00005070: 6184 9307 0d40 d761 ac87 0b40 d761 8393 a....@.a...@.a.. │ │ │ -00005080: 0708 c973 ab8a ca81 6d00 0d40 0b89 2488 ...s....m..@..$. │ │ │ -00005090: 0b40 816e 0061 ab86 0d81 6e00 a088 0d0b .@.n.a....n..... │ │ │ -000050a0: 41a1 88ce 1641 8293 070d 4081 6f00 73ab A....A....@.o.s. │ │ │ -000050b0: ff0d 4109 7341 8913 4040 8170 0073 abf0 ..A.sA..@@.p.s.. │ │ │ -000050c0: 0d0b 4061 acea 0b40 1640 0d40 8171 00b7 ..@a...@.@.@.q.. │ │ │ -000050d0: 1644 0e40 400e 4473 ab9e 0d0e 4040 a088 .D.@@.Ds....@@.. │ │ │ -000050e0: 0d0e 4041 a188 08c9 73ab bfca 8172 000d ..@A....s....r.. │ │ │ -000050f0: 400e 400d 2488 aab2 0b41 4040 f861 ac8a @.@.$....A@@.a.. │ │ │ -00005100: 0b81 7300 200b 4142 a188 08c9 73ab 8eca ..s. .AB....s... │ │ │ -00005110: 8174 000d 400e 400e 4441 4024 880d 0e44 .t..@.@.DA@$...D │ │ │ -00005120: 4140 a088 0d0b 4140 a188 ce16 4182 9307 A@....A@....A... │ │ │ -00005130: 0d40 e461 838f 060c 40d7 61ab ff0c 4109 .@.a....@.a...A. │ │ │ -00005140: 7341 8913 4040 8175 0073 abf0 0c0b 4061 sA..@@.u.s....@a │ │ │ -00005150: acea 0b40 8916 4040 0d41 40ac 8581 7600 ...@..@@.A@...v. │ │ │ -00005160: aa83 8177 0073 aba3 08c9 73ab 8cca 8178 ...w.s....s....x │ │ │ -00005170: 000d 0e40 0d0e 4025 880c 0e40 40a0 880c ...@..@%...@@... │ │ │ -00005180: 0e40 41a1 88c6 5c6e 4212 aaab 08c9 73ab .@A...\nB.....s. │ │ │ -00005190: 89ca 8179 000d 0e40 2388 0b41 4040 f861 ...y...@#..A@@.a │ │ │ -000051a0: ac8a 0b81 7300 200b 4142 a188 0c0b 4140 ....s. .AB....A@ │ │ │ -000051b0: a188 d10d 095c 2211 ce16 4182 9307 0c40 .....\"...A....@ │ │ │ -000051c0: 817a 0061 abf7 0e42 40d7 61ab f00e 4241 .z.a...B@.a...BA │ │ │ -000051d0: 5c6e 73ac e90e 4241 0973 4189 1340 40e0 \ns...BA.sA..@@. │ │ │ -000051e0: 61ab db0b 4041 0c41 61ab d3e2 0c41 4021 a...@A.Aa....A@! │ │ │ -000051f0: e361 acca 8173 0020 1e47 08c9 73ab a1ca .a...s. .G..s... │ │ │ -00005200: 817b 000e 4241 4140 0b40 0c0e 4289 4141 .{..BAA@.@..B.AA │ │ │ -00005210: 400b 400e 4741 40e9 0cd7 0e47 4226 0b88 @.@.GA@....GB&.. │ │ │ -00005220: 5c6e e9c8 425c 6e41 42a1 880b 0e42 0e47 \n..B\nAB....B.G │ │ │ -00005230: a10b 4142 a188 29cf 1648 ce16 4182 9307 ..AB..)..H..A... │ │ │ -00005240: 0d40 d761 abff 0c40 f861 abf9 0c0d 4109 .@.a...@.a....A. │ │ │ -00005250: 7341 8913 4041 61ab ec0b 4040 817c 0073 sA..@Aa...@@.|.s │ │ │ -00005260: abe3 8173 0020 1e47 08c9 73ab a0ca 817d ...s. .G..s....} │ │ │ -00005270: 000d 0c41 400d 4141 400b 400b 4040 817e ...A@.AA@.@.@@.~ │ │ │ -00005280: 00b7 410e 4742 0e47 4140 2607 880b 0d0e ..A.GB.GA@&..... │ │ │ -00005290: 47a1 0b41 42a1 880b 4040 f161 ab97 5c6e G..AB...@@.a..\n │ │ │ -000052a0: e4c6 0e43 b7ae 89c6 430e 4342 8916 4340 ...C....C.CB..C@ │ │ │ -000052b0: 425c 6e41 42a1 880d 0b40 4081 7f00 7341 B\nAB....@@...sA │ │ │ -000052c0: 40a0 8829 ce16 415c 6e41 8912 8240 00c6 @..)..A\nA...@.. │ │ │ -000052d0: 8916 4316 4681 8000 8181 0081 8200 5c22 ..C.F.........\" │ │ │ -000052e0: 164b 0989 1283 be08 5c6e 4015 5c6e 4140 .K......\n@.\nA@ │ │ │ -000052f0: 140d 400e 5e73 abb7 0d40 e461 aca3 8183 ..@.^s...@.a.... │ │ │ -00005300: 000d 4181 8400 0d41 0e4b c823 540e 4b23 ..A....A.K.#T.K# │ │ │ -00005310: 880d 410e 4673 ac97 0d41 0e46 4216 46aa ..A.Fs...A.FB.F. │ │ │ -00005320: 8e0d 410e 4373 ac87 0d41 0e43 4216 430d ..A.Cs...A.CB.C. │ │ │ -00005330: 40e4 61ab c0cc 5c6e 3840 e461 abb8 0d41 @.a...\n8@.a...A │ │ │ -00005340: cc5c 6e38 4161 abaf 0c40 8185 0073 aba7 .\n8Aa...@...s.. │ │ │ -00005350: 08c9 73ab 8cca 8186 000d 0c0d 890c 2606 ..s...........&. │ │ │ -00005360: 885c 6e41 410c 400c 4142 a088 5c6e 41e9 .\nAA.@.AB..\nA. │ │ │ -00005370: c842 a088 cf16 48aa fa0d 4081 8700 73ab .B....H...@...s. │ │ │ -00005380: be5c 6e13 c616 400b 4189 1340 40e9 61ac .\n...@.A..@@.a. │ │ │ -00005390: 760d 410b 4041 61ab 930d 400b 4040 61ab v.A.@Aa...@.@@a. │ │ │ -000053a0: 8b0b e9c8 42a0 88ce 1640 aa5b 0e40 abc4 ....B....@.[.@.. │ │ │ -000053b0: 08c9 73ab bfca 8188 000d 8989 2488 aab4 ..s.........$... │ │ │ -000053c0: 0d40 8168 0061 abac 0c40 8168 0061 aba4 .@.h.a...@.h.a.. │ │ │ -000053d0: 08c9 73ab 8fca f30d 0c81 6800 0d41 0c41 ..s.......h..A.A │ │ │ -000053e0: 5c5c 4224 88ce 1641 d10d 095c 2211 0c89 \\B$...A...\"... │ │ │ -000053f0: 410d 415c 5ca1 885c 6e41 8912 84b2 0781 A.A\\..\nA...... │ │ │ -00005400: 8900 0e46 818a 005c 2216 4681 8b00 0e46 ...F...\".F....F │ │ │ -00005410: 8162 005c 221e 5681 8c00 818d 000e 4681 .b.\".V.......F. │ │ │ -00005420: 6200 5c22 0e56 9f5c 2216 4629 0e57 0e48 b.\".V.\".F).W.H │ │ │ -00005430: 5c5c 1657 2e0b 0987 2220 5b62 7974 652d \\.W...." [byte- │ │ │ -00005440: 6f70 7469 6d69 7a65 2d6c 6f67 206c 6170 optimize-log lap │ │ │ -00005450: 2072 6573 7420 746d 7020 6c61 7031 206c rest tmp lap1 l │ │ │ -00005460: 6170 3020 6e69 6c20 6669 7273 742d 7469 ap0 nil first-ti │ │ │ -00005470: 6d65 2030 2028 7420 6279 7465 2920 6279 me 0 (t byte) by │ │ │ -00005480: 7465 2d63 6f6d 7069 6c65 2d6c 6f67 2d6c te-compile-log-l │ │ │ -00005490: 6170 2d31 2022 2020 2d2d 2d2d 206e 6578 ap-1 " ---- nex │ │ │ -000054a0: 7420 7061 7373 2220 3220 6279 7465 2d64 t pass" 2 byte-d │ │ │ -000054b0: 6973 6361 7264 2074 2031 2022 2020 2573 iscard t 1 " %s │ │ │ -000054c0: 2064 6973 6361 7264 092d 2d3e 093c 6465 discard.-->." delq " │ │ │ -000054e0: 2573 2064 6973 6361 7264 092d 2d3e 093c %s discard.-->.< │ │ │ -000054f0: 6465 6c65 7465 643e 2064 6973 6361 7264 deleted> discard │ │ │ -00005500: 2220 2d31 2022 2020 2573 2064 6973 6361 " -1 " %s disca │ │ │ -00005510: 7264 092d 2d3e 0964 6973 6361 7264 2064 rd.-->.discard d │ │ │ -00005520: 6973 6361 7264 2220 6572 726f 7220 224f iscard" error "O │ │ │ -00005530: 7074 696d 697a 6572 2065 7272 6f72 3a20 ptimizer error: │ │ │ -00005540: 746f 6f20 6d75 6368 206f 6e20 7468 6520 too much on the │ │ │ -00005550: 7374 6163 6b22 2062 7974 652d 676f 746f stack" byte-goto │ │ │ -00005560: 2022 3c64 656c 6574 6564 3e22 2022 4465 "" "De │ │ │ -00005570: 7074 6820 636f 6e66 6c69 6374 2061 7420 pth conflict at │ │ │ -00005580: 7461 6720 2564 2220 2874 2062 7974 6529 tag %d" (t byte) │ │ │ -00005590: 2028 7420 736f 7572 6365 2920 3420 6279 (t source) 4 by │ │ │ -000055a0: 7465 2d63 6f6d 7069 6c65 2d6c 6f67 2d31 te-compile-log-1 │ │ │ -000055b0: 2066 6f72 6d61 7420 2220 2028 676f 746f format " (goto │ │ │ -000055c0: 2025 7329 2025 733a 092d 2d3e 0925 7320 %s) %s:.-->.%s │ │ │ -000055d0: 2573 3a22 2062 7974 652d 7661 7272 6566 %s:" byte-varref │ │ │ -000055e0: 2028 6279 7465 2d76 6172 7365 7420 6279 (byte-varset by │ │ │ -000055f0: 7465 2d76 6172 6269 6e64 2920 6275 696c te-varbind) buil │ │ │ -00005600: 742d 696e 2d76 6172 6961 626c 652d 7479 t-in-variable-ty │ │ │ -00005610: 7065 2062 6f6f 6c65 616e 2062 7974 652d pe boolean byte- │ │ │ -00005620: 636f 6e73 7461 6e74 2028 6279 7465 2d63 constant (byte-c │ │ │ -00005630: 6f6e 7374 616e 7420 6279 7465 2d64 7570 onstant byte-dup │ │ │ -00005640: 2920 286e 696c 2074 2920 2220 2025 7320 ) (nil t) " %s │ │ │ -00005650: 2573 2025 7309 2d2d 3e09 2573 2025 7320 %s %s.-->.%s %s │ │ │ -00005660: 2573 2220 2220 2025 7320 2573 092d 2d3e %s" " %s %s.--> │ │ │ -00005670: 0964 7570 2025 7322 2062 7974 652d 6475 .dup %s" byte-du │ │ │ -00005680: 7020 2862 7974 652d 7661 7273 6574 2062 p (byte-varset b │ │ │ -00005690: 7974 652d 7661 7262 696e 6429 2022 2020 yte-varbind) " │ │ │ -000056a0: 6475 7020 2573 2064 6973 6361 7264 092d dup %s discard.- │ │ │ -000056b0: 2d3e 0925 7322 2062 7974 652d 6e6f 7420 ->.%s" byte-not │ │ │ -000056c0: 6279 7465 2d67 6f74 6f2d 6966 2d6e 696c byte-goto-if-nil │ │ │ -000056d0: 2062 7974 652d 676f 746f 2d69 662d 6e6f byte-goto-if-no │ │ │ -000056e0: 742d 6e69 6c20 2220 206e 6f74 2025 7309 t-nil " not %s. │ │ │ -000056f0: 2d2d 3e09 2573 2220 2220 2025 7320 2573 -->.%s" " %s %s │ │ │ -00005700: 2025 733a 092d 2d3e 0925 7320 2573 3a22 %s:.-->.%s %s:" │ │ │ -00005710: 2062 7974 652d 676f 746f 2d69 662d 6e69 byte-goto-if-ni │ │ │ -00005720: 6c2d 656c 7365 2d70 6f70 2022 2020 2573 l-else-pop " %s │ │ │ -00005730: 2025 7309 2d2d 3e09 3c64 656c 6574 6564 %s.-->." " %s %s.-->. │ │ │ -00005750: 2573 2220 2874 2062 7974 6529 2022 2220 %s" (t byte) "" │ │ │ -00005760: 2220 6475 7022 2022 2020 2573 2573 2025 " dup" " %s%s % │ │ │ -00005770: 7309 2d2d 3e09 2573 2573 2064 7570 2220 s.-->.%s%s dup" │ │ │ -00005780: 5441 4720 2874 2062 7974 6529 2022 2020 TAG (t byte) " │ │ │ -00005790: 6164 6a61 6365 6e74 2074 6167 7320 2564 adjacent tags %d │ │ │ -000057a0: 2061 6e64 2025 6420 6d65 7267 6564 2220 and %d merged" │ │ │ -000057b0: 7261 7373 7120 2874 2062 7974 6529 2022 rassq (t byte) " │ │ │ -000057c0: 2020 756e 7573 6564 2074 6167 2025 6420 unused tag %d │ │ │ -000057d0: 7265 6d6f 7665 6422 2028 6279 7465 2d67 removed" (byte-g │ │ │ -000057e0: 6f74 6f20 6279 7465 2d72 6574 7572 6e29 oto byte-return) │ │ │ -000057f0: 2028 5441 4720 6e69 6c29 2074 6d70 3220 (TAG nil) tmp2 │ │ │ -00005800: 6b65 6570 2d67 6f69 6e67 206c 6170 3220 keep-going lap2 │ │ │ -00005810: 6279 7465 2d63 6f6d 7069 6c65 2d63 6f6e byte-compile-con │ │ │ -00005820: 7374 616e 7473 2074 6d70 3320 7374 7220 stants tmp3 str │ │ │ -00005830: 6279 7465 2d63 6f6d 7069 6c65 2d76 6172 byte-compile-var │ │ │ -00005840: 6961 626c 6573 206e 6577 7461 6720 6164 iables newtag ad │ │ │ -00005850: 642d 6465 7074 6820 6920 7461 6773 7472 d-depth i tagstr │ │ │ -00005860: 2076 6172 6961 626c 652d 6672 6571 7565 variable-freque │ │ │ -00005870: 6e63 7920 6465 6c65 7465 6420 6279 7465 ncy deleted byte │ │ │ -00005880: 2d6f 7074 696d 697a 6520 7072 696e 742d -optimize print- │ │ │ -00005890: 6c65 6e67 7468 2070 7269 6e74 2d6c 6576 length print-lev │ │ │ -000058a0: 656c 2070 7269 6e74 2d65 7363 6170 652d el print-escape- │ │ │ -000058b0: 6e65 776c 696e 6573 2069 6e76 6572 7365 newlines inverse │ │ │ -000058c0: 206f 7074 2d70 2073 6964 652d 6566 6665 opt-p side-effe │ │ │ -000058d0: 6374 2d66 7265 6520 6279 7465 2d67 6f74 ct-free byte-got │ │ │ -000058e0: 6f2d 6f70 7320 6279 7465 2d67 6f74 6f2d o-ops byte-goto- │ │ │ -000058f0: 616c 7761 7973 2d70 6f70 2d6f 7073 2074 always-pop-ops t │ │ │ -00005900: 6169 6c20 6279 7465 2d63 6f6d 7069 6c65 ail byte-compile │ │ │ -00005910: 2d6d 6178 6465 7074 6820 6279 7465 2d63 -maxdepth byte-c │ │ │ -00005920: 6f6d 7069 6c65 2d64 656c 6574 652d 6572 ompile-delete-er │ │ │ -00005930: 726f 7273 2062 7974 652d 636f 6d70 696c rors byte-compil │ │ │ -00005940: 652d 7369 6465 2d65 6666 6563 742d 6672 e-side-effect-fr │ │ │ -00005950: 6565 2d6f 7073 2062 7974 652d 636f 6d70 ee-ops byte-comp │ │ │ -00005960: 696c 652d 7369 6465 2d65 6666 6563 742d ile-side-effect- │ │ │ -00005970: 616e 642d 6572 726f 722d 6672 6565 2d6f and-error-free-o │ │ │ -00005980: 7073 2062 7974 652d 7374 6163 6b2b 2d69 ps byte-stack+-i │ │ │ -00005990: 6e66 6f20 6279 7465 2d63 6f6e 6469 7469 nfo byte-conditi │ │ │ -000059a0: 6f6e 616c 2d6f 7073 2062 7974 652d 6166 onal-ops byte-af │ │ │ -000059b0: 7465 722d 756e 6269 6e64 2d6f 7073 2062 ter-unbind-ops b │ │ │ -000059c0: 7974 652d 636f 6e73 7472 6566 2d6f 7073 yte-constref-ops │ │ │ -000059d0: 2028 7420 6c61 7029 2022 2025 7322 2022 (t lap) " %s" " │ │ │ -000059e0: 2564 3a22 2036 2061 7070 6c79 2022 2020 %d:" 6 apply " │ │ │ -000059f0: 2573 2220 2220 2573 092d 2d3e 0925 7320 %s" " %s.-->.%s │ │ │ -00005a00: 3c64 656c 6574 6564 3e20 2573 2220 2220 %s" " │ │ │ -00005a10: 2025 7320 3c25 6420 756e 7265 6163 6861 %s <%d unreacha │ │ │ -00005a20: 626c 6520 6f70 2573 3e20 2573 092d 2d3e ble op%s> %s.--> │ │ │ -00005a30: 0925 7320 3c64 656c 6574 6564 3e20 2573 .%s %s │ │ │ -00005a40: 2220 2273 2220 6279 7465 2d75 6e62 696e " "s" byte-unbin │ │ │ -00005a50: 6420 2220 2025 7320 2573 092d 2d3e 0925 d " %s %s.-->.% │ │ │ -00005a60: 7320 2573 2220 2862 7974 652d 7661 7262 s %s" (byte-varb │ │ │ -00005a70: 696e 6420 6279 7465 2d73 6176 652d 6578 ind byte-save-ex │ │ │ -00005a80: 6375 7273 696f 6e20 6279 7465 2d73 6176 cursion byte-sav │ │ │ -00005a90: 652d 7265 7374 7269 6374 696f 6e29 2062 e-restriction) b │ │ │ -00005aa0: 7974 652d 7661 7262 696e 6420 2862 7974 yte-varbind (byt │ │ │ -00005ab0: 652d 676f 746f 2062 7974 652d 7265 7475 e-goto byte-retu │ │ │ -00005ac0: 726e 2920 2220 2025 7320 5b25 735d 092d rn) " %s [%s].- │ │ │ -00005ad0: 2d3e 0925 7322 2062 7974 652d 7265 7475 ->.%s" byte-retu │ │ │ -00005ae0: 726e 2028 6279 7465 2d67 6f74 6f2d 6966 rn (byte-goto-if │ │ │ -00005af0: 2d6e 696c 2d65 6c73 652d 706f 7020 6279 -nil-else-pop by │ │ │ -00005b00: 7465 2d67 6f74 6f2d 6966 2d6e 6f74 2d6e te-goto-if-not-n │ │ │ -00005b10: 696c 2d65 6c73 652d 706f 7029 2028 6279 il-else-pop) (by │ │ │ -00005b20: 7465 2d64 6973 6361 7264 2062 7974 652d te-discard byte- │ │ │ -00005b30: 676f 746f 2d69 662d 6e69 6c20 6279 7465 goto-if-nil byte │ │ │ -00005b40: 2d67 6f74 6f2d 6966 2d6e 6f74 2d6e 696c -goto-if-not-nil │ │ │ -00005b50: 2062 7974 652d 676f 746f 2d69 662d 6e69 byte-goto-if-ni │ │ │ -00005b60: 6c2d 656c 7365 2d70 6f70 2062 7974 652d l-else-pop byte- │ │ │ -00005b70: 676f 746f 2d69 662d 6e6f 742d 6e69 6c2d goto-if-not-nil- │ │ │ -00005b80: 656c 7365 2d70 6f70 2920 2828 6279 7465 else-pop) ((byte │ │ │ -00005b90: 2d67 6f74 6f2d 6966 2d6e 696c 2d65 6c73 -goto-if-nil-els │ │ │ -00005ba0: 652d 706f 7020 6279 7465 2d67 6f74 6f2d e-pop byte-goto- │ │ │ -00005bb0: 6966 2d6e 696c 2920 2862 7974 652d 676f if-nil) (byte-go │ │ │ -00005bc0: 746f 2d69 662d 6e6f 742d 6e69 6c2d 656c to-if-not-nil-el │ │ │ -00005bd0: 7365 2d70 6f70 2062 7974 652d 676f 746f se-pop byte-goto │ │ │ -00005be0: 2d69 662d 6e6f 742d 6e69 6c29 2920 2220 -if-not-nil)) " │ │ │ -00005bf0: 2025 732d 656c 7365 2d70 6f70 205b 2573 %s-else-pop [%s │ │ │ -00005c00: 5d09 2d2d 3e09 2573 2220 6279 7465 2d63 ].-->.%s" byte-c │ │ │ -00005c10: 6f6d 7069 6c65 2d6d 616b 652d 7461 6720 ompile-make-tag │ │ │ -00005c20: 2220 2025 7320 5b25 735d 092d 2d3e 0925 " %s [%s].-->.% │ │ │ -00005c30: 7320 3c73 6b69 703e 2220 2862 7974 652d s " (byte- │ │ │ -00005c40: 6469 7363 6172 6420 6279 7465 2d67 6f74 discard byte-got │ │ │ -00005c50: 6f2d 6966 2d6e 696c 2062 7974 652d 676f o-if-nil byte-go │ │ │ -00005c60: 746f 2d69 662d 6e6f 742d 6e69 6c20 6279 to-if-not-nil by │ │ │ -00005c70: 7465 2d67 6f74 6f2d 6966 2d6e 696c 2d65 te-goto-if-nil-e │ │ │ -00005c80: 6c73 652d 706f 7020 6279 7465 2d67 6f74 lse-pop byte-got │ │ │ -00005c90: 6f2d 6966 2d6e 6f74 2d6e 696c 2d65 6c73 o-if-not-nil-els │ │ │ -00005ca0: 652d 706f 7029 2028 6279 7465 2d67 6f74 e-pop) (byte-got │ │ │ -00005cb0: 6f2d 6966 2d6e 696c 2062 7974 652d 676f o-if-nil byte-go │ │ │ -00005cc0: 746f 2d69 662d 6e69 6c2d 656c 7365 2d70 to-if-nil-else-p │ │ │ -00005cd0: 6f70 2920 2862 7974 652d 676f 746f 2d69 op) (byte-goto-i │ │ │ -00005ce0: 662d 6e6f 742d 6e69 6c20 6279 7465 2d67 f-not-nil byte-g │ │ │ -00005cf0: 6f74 6f2d 6966 2d6e 6f74 2d6e 696c 2d65 oto-if-not-nil-e │ │ │ -00005d00: 6c73 652d 706f 7029 2022 2020 2573 2067 lse-pop) " %s g │ │ │ -00005d10: 6f74 6f20 5b25 735d 092d 2d3e 0925 7320 oto [%s].-->.%s │ │ │ -00005d20: 2573 2220 2220 2025 7320 676f 746f 205b %s" " %s goto [ │ │ │ -00005d30: 2573 5d09 2d2d 3e09 3c64 656c 6574 6564 %s].-->. goto " b │ │ │ -00005d50: 7974 652d 7661 7273 6574 2022 2020 2573 yte-varset " %s │ │ │ -00005d60: 3a20 2573 202e 2e2e 2025 7320 2573 092d : %s ... %s %s.- │ │ │ -00005d70: 2d3e 0925 733a 2025 7320 2573 3a20 2e2e ->.%s: %s %s: .. │ │ │ -00005d80: 2e20 2573 2025 7320 2573 2220 2862 7974 . %s %s %s" (byt │ │ │ -00005d90: 652d 676f 746f 2062 7974 652d 676f 746f e-goto byte-goto │ │ │ -00005da0: 2d69 662d 6e69 6c20 6279 7465 2d67 6f74 -if-nil byte-got │ │ │ -00005db0: 6f2d 6966 2d6e 6f74 2d6e 696c 2062 7974 o-if-not-nil byt │ │ │ -00005dc0: 652d 676f 746f 2d69 662d 6e69 6c2d 656c e-goto-if-nil-el │ │ │ -00005dd0: 7365 2d70 6f70 2920 2225 7320 2573 3a20 se-pop) "%s %s: │ │ │ -00005de0: 2e2e 2e20 2573 3a20 2573 092d 2d3e 0925 ... %s: %s.-->.% │ │ │ -00005df0: 7320 2e2e 2e20 2573 3a22 2028 2862 7974 s ... %s:" ((byt │ │ │ -00005e00: 652d 676f 746f 2d69 662d 6e69 6c20 2e20 e-goto-if-nil . │ │ │ -00005e10: 6279 7465 2d67 6f74 6f2d 6966 2d6e 6f74 byte-goto-if-not │ │ │ -00005e20: 2d6e 696c 2920 2862 7974 652d 676f 746f -nil) (byte-goto │ │ │ -00005e30: 2d69 662d 6e6f 742d 6e69 6c20 2e20 6279 -if-not-nil . by │ │ │ -00005e40: 7465 2d67 6f74 6f2d 6966 2d6e 696c 2920 te-goto-if-nil) │ │ │ -00005e50: 2862 7974 652d 676f 746f 2d69 662d 6e69 (byte-goto-if-ni │ │ │ -00005e60: 6c2d 656c 7365 2d70 6f70 202e 2062 7974 l-else-pop . byt │ │ │ -00005e70: 652d 676f 746f 2d69 662d 6e6f 742d 6e69 e-goto-if-not-ni │ │ │ -00005e80: 6c2d 656c 7365 2d70 6f70 2920 2862 7974 l-else-pop) (byt │ │ │ -00005e90: 652d 676f 746f 2d69 662d 6e6f 742d 6e69 e-goto-if-not-ni │ │ │ -00005ea0: 6c2d 656c 7365 2d70 6f70 202e 2062 7974 l-else-pop . byt │ │ │ -00005eb0: 652d 676f 746f 2d69 662d 6e69 6c2d 656c e-goto-if-nil-el │ │ │ -00005ec0: 7365 2d70 6f70 2929 2028 6279 7465 2d67 se-pop)) (byte-g │ │ │ -00005ed0: 6f74 6f2d 6966 2d6e 696c 2d65 6c73 652d oto-if-nil-else- │ │ │ -00005ee0: 706f 7020 6279 7465 2d67 6f74 6f2d 6966 pop byte-goto-if │ │ │ -00005ef0: 2d6e 6f74 2d6e 696c 2062 7974 652d 676f -not-nil byte-go │ │ │ -00005f00: 746f 2d69 662d 6e69 6c20 6279 7465 2d67 to-if-nil byte-g │ │ │ -00005f10: 6f74 6f2d 6966 2d6e 6f74 2d6e 696c 2062 oto-if-not-nil b │ │ │ -00005f20: 7974 652d 676f 746f 2062 7974 652d 676f yte-goto byte-go │ │ │ -00005f30: 746f 2920 6d61 6b65 2d68 6173 682d 7461 to) make-hash-ta │ │ │ -00005f40: 626c 6520 3a74 6573 7420 6571 2063 6c2d ble :test eq cl- │ │ │ -00005f50: 7075 7468 6173 6820 6765 7468 6173 6820 puthash gethash │ │ │ -00005f60: 2862 7974 652d 7661 7262 696e 6420 6279 (byte-varbind by │ │ │ -00005f70: 7465 2d76 6172 7365 7429 2022 2020 2573 te-varset) " %s │ │ │ -00005f80: 2025 7320 2573 092d 2d3e 0925 7320 6475 %s %s.-->.%s du │ │ │ -00005f90: 7020 2573 2220 2862 7974 652d 636f 6e73 p %s" (byte-cons │ │ │ -00005fa0: 7461 6e74 2062 7974 652d 7661 7272 6566 tant byte-varref │ │ │ -00005fb0: 2920 2220 2025 7320 5b64 7570 2f25 735d ) " %s [dup/%s] │ │ │ -00005fc0: 2e2e 2e09 2d2d 3e09 2573 2064 7570 2e2e ....-->.%s dup.. │ │ │ -00005fd0: 2e22 2073 6f72 7420 235b 2876 3120 7632 ." sort #[(v1 v2 │ │ │ -00005fe0: 2920 22c3 095c 6e5c 22c3 085c 6e5c 2257 ) "..\n\"..\n\"W │ │ │ -00005ff0: 8722 205b 7632 2076 3120 7661 7269 6162 ." [v2 v1 variab │ │ │ -00006000: 6c65 2d66 7265 7175 656e 6379 2067 6574 le-frequency get │ │ │ -00006010: 6861 7368 5d20 345d 206c 6173 7420 6170 hash] 4] last ap │ │ │ -00006020: 7065 6e64 206e 6275 746c 6173 745d 2031 pend nbutlast] 1 │ │ │ -00006030: 3420 2823 2420 2e20 3139 3037 3629 5d29 4 (#$ . 19076)]) │ │ │ -00006040: 0a28 7072 6f76 6964 6520 2762 7974 652d .(provide 'byte- │ │ │ -00006050: 6f70 7469 6d69 7a65 290a optimize). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3439 2032 3032 310a 3b3b 3b20 :08:49 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f62 7974 652d 6f70 7469 4/lisp/byte-opti │ │ │ +00000090: 6d69 7a65 2e65 6c0a 3b3b 3b20 656d 6163 mize.el.;;; emac │ │ │ +000000a0: 7320 7665 7273 696f 6e20 3231 2e34 2028 s version 21.4 ( │ │ │ +000000b0: 7061 7463 6820 3234 2920 2253 7461 6e64 patch 24) "Stand │ │ │ +000000c0: 6172 6420 4322 2058 456d 6163 7320 4c75 ard C" XEmacs Lu │ │ │ +000000d0: 6369 642e 0a3b 3b3b 2062 7974 6563 6f6d cid..;;; bytecom │ │ │ +000000e0: 7020 7665 7273 696f 6e20 322e 3237 2058 p version 2.27 X │ │ │ +000000f0: 456d 6163 733b 2032 3030 302d 3039 2d31 Emacs; 2000-09-1 │ │ │ +00000100: 322e 0a3b 3b3b 206f 7074 696d 697a 6174 2..;;; optimizat │ │ │ +00000110: 696f 6e20 6973 206f 6e2e 0a3b 3b3b 2074 ion is on..;;; t │ │ │ +00000120: 6869 7320 6669 6c65 2075 7365 7320 6f70 his file uses op │ │ │ +00000130: 636f 6465 7320 7768 6963 6820 646f 206e codes which do n │ │ │ +00000140: 6f74 2065 7869 7374 2069 6e20 456d 6163 ot exist in Emac │ │ │ +00000150: 7320 3139 2e0a 0a28 6966 2028 616e 6420 s 19...(if (and │ │ │ +00000160: 2862 6f75 6e64 7020 2765 6d61 6373 2d76 (boundp 'emacs-v │ │ │ +00000170: 6572 7369 6f6e 290a 0920 286f 7220 2861 ersion).. (or (a │ │ │ +00000180: 6e64 2028 626f 756e 6470 2027 6570 6f63 nd (boundp 'epoc │ │ │ +00000190: 683a 3a76 6572 7369 6f6e 2920 6570 6f63 h::version) epoc │ │ │ +000001a0: 683a 3a76 6572 7369 6f6e 290a 0920 2020 h::version).. │ │ │ +000001b0: 2020 2873 7472 696e 672d 6c65 7373 7020 (string-lessp │ │ │ +000001c0: 656d 6163 732d 7665 7273 696f 6e20 2232 emacs-version "2 │ │ │ +000001d0: 3022 2929 290a 2020 2020 2865 7272 6f72 0"))). (error │ │ │ +000001e0: 2022 6062 7974 652d 6f70 7469 6d69 7a65 "`byte-optimize │ │ │ +000001f0: 2e65 6c27 2077 6173 2063 6f6d 7069 6c65 .el' was compile │ │ │ +00000200: 6420 666f 7220 456d 6163 7320 3230 2229 d for Emacs 20") │ │ │ +00000210: 290a 0a28 6f72 2028 626f 756e 6470 2027 )..(or (boundp ' │ │ │ +00000220: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ +00000230: 7429 2028 7365 7471 2063 7572 7265 6e74 t) (setq current │ │ │ +00000240: 2d6c 6f61 642d 6c69 7374 206e 696c 2929 -load-list nil)) │ │ │ +00000250: 0a0a 0a28 7265 7175 6972 6520 2762 7974 ...(require 'byt │ │ │ +00000260: 652d 636f 6d70 696c 6520 2262 7974 6563 e-compile "bytec │ │ │ +00000270: 6f6d 7022 290a 2864 6566 616c 6961 7320 omp").(defalias │ │ │ +00000280: 2762 7974 652d 636f 6d70 696c 652d 6c6f 'byte-compile-lo │ │ │ +00000290: 672d 6c61 702d 3120 235b 2866 6f72 6d61 g-lap-1 #[(forma │ │ │ +000002a0: 7420 2672 6573 7420 6172 6773 2920 220c t &rest args) ". │ │ │ +000002b0: c548 ab84 c6c7 2188 c8c9 c30b ca89 1a19 .H....!......... │ │ │ +000002c0: cbcc 085c 222a 2321 8722 205b 6172 6773 ...\"*#!." [args │ │ │ +000002d0: 2063 2061 2066 6f72 6d61 7420 6279 7465 c a format byte │ │ │ +000002e0: 2d63 6f64 652d 7665 6374 6f72 2030 2065 -code-vector 0 e │ │ │ +000002f0: 7272 6f72 2022 5468 6520 6f6c 6420 7665 rror "The old ve │ │ │ +00000300: 7273 696f 6e20 6f66 2074 6865 2064 6973 rsion of the dis │ │ │ +00000310: 6173 7365 6d62 6c65 7220 6973 206c 6f61 assembler is loa │ │ │ +00000320: 6465 642e 2020 5265 6c6f 6164 206e 6577 ded. Reload new │ │ │ +00000330: 2d62 7974 6563 6f6d 7020 6173 2077 656c -bytecomp as wel │ │ │ +00000340: 6c2e 2220 6279 7465 2d63 6f6d 7069 6c65 l." byte-compile │ │ │ +00000350: 2d6c 6f67 2d31 2061 7070 6c79 206e 696c -log-1 apply nil │ │ │ +00000360: 206d 6170 6361 7220 235b 2861 7267 2920 mapcar #[(arg) │ │ │ +00000370: 220b 3aac 970b 39ab 91c5 c6c7 0b21 5c22 ".:...9......!\" │ │ │ +00000380: ab89 c8c7 0b21 c9ca 4f21 870b 870b 4089 .....!..O!....@. │ │ │ +00000390: 14a8 ab85 cbcc 0c5c 2288 0ccd 61ab 840b .......\"...a... │ │ │ +000003a0: 14aa a90c 0973 ab86 0b41 4140 aa8c 0c08 .....s...AA@.... │ │ │ +000003b0: 73ab 850b 4140 aa82 0b41 12c7 0c21 14c5 s...A@...A...!.. │ │ │ +000003c0: ce0c 5c22 ab87 c80c c9ca 4f21 140c cf61 ..\"......O!...a │ │ │ +000003d0: ab82 d014 0b41 d161 ab87 0cd2 73ac 820c .....A.a....s... │ │ │ +000003e0: 87d3 d40c 5c6e 2387 2220 5b62 7974 652d ....\n#." [byte- │ │ │ +000003f0: 636f 6e73 7472 6566 2d6f 7073 2062 7974 constref-ops byt │ │ │ +00000400: 652d 676f 746f 2d6f 7073 2061 2061 7267 e-goto-ops a arg │ │ │ +00000410: 2063 2073 7472 696e 672d 6d61 7463 6820 c string-match │ │ │ +00000420: 225e 6279 7465 2d22 2073 796d 626f 6c2d "^byte-" symbol- │ │ │ +00000430: 6e61 6d65 2069 6e74 6572 6e20 3520 6e69 name intern 5 ni │ │ │ +00000440: 6c20 6572 726f 7220 226e 6f6e 2d73 796d l error "non-sym │ │ │ +00000450: 626f 6c69 6320 6279 7465 2d6f 7020 2573 bolic byte-op %s │ │ │ +00000460: 2220 5441 4720 225e 6279 7465 2d2e 2220 " TAG "^byte-." │ │ │ +00000470: 636f 6e73 7461 6e74 2063 6f6e 7374 2030 constant const 0 │ │ │ +00000480: 2028 756e 6269 6e64 2063 616c 6c20 636f (unbind call co │ │ │ +00000490: 6e73 7429 2066 6f72 6d61 7420 2228 2573 nst) format "(%s │ │ │ +000004a0: 2025 7329 225d 2034 5d5d 2037 5d29 0a28 %s)"] 4]] 7]).( │ │ │ +000004b0: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ +000004c0: 6f6d 7069 6c65 2d6c 6f67 2d6c 6170 2027 ompile-log-lap ' │ │ │ +000004d0: 286d 6163 726f 202e 2023 5b28 666f 726d (macro . #[(form │ │ │ +000004e0: 6174 2d73 7472 696e 6720 2672 6573 7420 at-string &rest │ │ │ +000004f0: 6172 6773 2920 22c2 c3c4 0908 4242 4587 args) ".....BBE. │ │ │ +00000500: 2220 5b61 7267 7320 666f 726d 6174 2d73 " [args format-s │ │ │ +00000510: 7472 696e 6720 616e 6420 286d 656d 7120 tring and (memq │ │ │ +00000520: 6279 7465 2d6f 7074 696d 697a 652d 6c6f byte-optimize-lo │ │ │ +00000530: 6720 2728 7420 6279 7465 2929 2062 7974 g '(t byte)) byt │ │ │ +00000540: 652d 636f 6d70 696c 652d 6c6f 672d 6c61 e-compile-log-la │ │ │ +00000550: 702d 315d 2035 5d29 290a 2870 7574 2027 p-1] 5])).(put ' │ │ │ +00000560: 696e 6c69 6e65 2027 6279 7465 2d6f 7074 inline 'byte-opt │ │ │ +00000570: 696d 697a 6572 2027 6279 7465 2d6f 7074 imizer 'byte-opt │ │ │ +00000580: 696d 697a 652d 696e 6c69 6e65 2d68 616e imize-inline-han │ │ │ +00000590: 646c 6572 290a 2340 3534 2062 7974 652d dler).#@54 byte- │ │ │ +000005a0: 6f70 7469 6d69 7a65 2d68 616e 646c 6572 optimize-handler │ │ │ +000005b0: 2066 6f72 2074 6865 2060 696e 6c69 6e65 for the `inline │ │ │ +000005c0: 2720 7370 6563 6961 6c2d 666f 726d 2e1f ' special-form.. │ │ │ +000005d0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +000005e0: 2d6f 7074 696d 697a 652d 696e 6c69 6e65 -optimize-inline │ │ │ +000005f0: 2d68 616e 646c 6572 2023 5b28 666f 726d -handler #[(form │ │ │ +00000600: 2920 22c1 c2c3 0841 5c22 4287 2220 5b66 ) "....A\"B." [f │ │ │ +00000610: 6f72 6d20 7072 6f67 6e20 6d61 7063 6172 orm progn mapcar │ │ │ +00000620: 2023 5b28 7365 7870 2920 225c 6ea2 891b #[(sexp) "\n... │ │ │ +00000630: 39ab a80b 09b7 41ac 9dc4 0b21 ab9d 0b08 9.....A....!.... │ │ │ +00000640: b741 ac97 0b4b 8913 3aab 860b 40c5 61ac .A...K..:...@.a. │ │ │ +00000650: 8ac6 0b21 ac85 c75c 6e21 aa81 5c6e 2987 ...!...\n!..\n). │ │ │ +00000660: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ +00000670: 6d61 6372 6f2d 656e 7669 726f 6e6d 656e macro-environmen │ │ │ +00000680: 7420 6279 7465 2d63 6f6d 7069 6c65 2d66 t byte-compile-f │ │ │ +00000690: 756e 6374 696f 6e2d 656e 7669 726f 6e6d unction-environm │ │ │ +000006a0: 656e 7420 7365 7870 2066 6e20 6662 6f75 ent sexp fn fbou │ │ │ +000006b0: 6e64 7020 6d61 6372 6f20 7375 6272 7020 ndp macro subrp │ │ │ +000006c0: 6279 7465 2d63 6f6d 7069 6c65 2d69 6e6c byte-compile-inl │ │ │ +000006d0: 696e 652d 6578 7061 6e64 5d20 335d 5d20 ine-expand] 3]] │ │ │ +000006e0: 3420 2823 2420 2e20 3134 3335 295d 290a 4 (#$ . 1435)]). │ │ │ +000006f0: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +00000700: 696e 6c69 6e65 2d6c 6170 636f 6465 2023 inline-lapcode # │ │ │ +00000710: 5b28 6c61 7029 2022 089f 09a4 8911 8722 [(lap) "......." │ │ │ +00000720: 205b 6c61 7020 6279 7465 2d63 6f6d 7069 [lap byte-compi │ │ │ +00000730: 6c65 2d6f 7574 7075 745d 2032 5d29 0a28 le-output] 2]).( │ │ │ +00000740: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ +00000750: 6f6d 7069 6c65 2d69 6e6c 696e 652d 6578 ompile-inline-ex │ │ │ +00000760: 7061 6e64 2023 5b28 666f 726d 2920 2209 pand #[(form) ". │ │ │ +00000770: 4089 1a08 b741 ae87 c45c 6e21 ad82 5c6e @....A...\n!..\n │ │ │ +00000780: 4b89 1bac 88c5 c65c 6e5c 2288 09aa e70b K......\n\"..... │ │ │ +00000790: 3aab 9a0b 40c7 61ab 94c8 0b41 4021 885c :...@.a....A@!.\ │ │ │ +000007a0: 6e08 b741 ae87 c45c 6e21 ad82 5c6e 4b13 n..A...\n!..\nK. │ │ │ +000007b0: 0b3a ab8e 0b40 c761 ab88 c9ca 0b41 405c .:...@.a.....A@\ │ │ │ +000007c0: 6e23 880b 39ab 88cb 0b09 4142 21aa abcc n#..9.....AB!... │ │ │ +000007d0: 0b21 ab99 cd0b 2188 cecf 0b21 d0d1 0b21 .!....!....!...! │ │ │ +000007e0: d20b 21d3 0b21 4645 0941 42aa 8d0b a2ce ..!..!FE.AB..... │ │ │ +000007f0: 61ab 860b 0941 42aa 8109 2a87 2220 5b62 a....AB...*." [b │ │ │ +00000800: 7974 652d 636f 6d70 696c 652d 6675 6e63 yte-compile-func │ │ │ +00000810: 7469 6f6e 2d65 6e76 6972 6f6e 6d65 6e74 tion-environment │ │ │ +00000820: 2066 6f72 6d20 6e61 6d65 2066 6e20 6662 form name fn fb │ │ │ +00000830: 6f75 6e64 7020 6279 7465 2d63 6f6d 7069 oundp byte-compi │ │ │ +00000840: 6c65 2d77 6172 6e20 2261 7474 656d 7074 le-warn "attempt │ │ │ +00000850: 2074 6f20 696e 6c69 6e65 2025 7320 6265 to inline %s be │ │ │ +00000860: 666f 7265 2069 7420 7761 7320 6465 6669 fore it was defi │ │ │ +00000870: 6e65 6422 2061 7574 6f6c 6f61 6420 6c6f ned" autoload lo │ │ │ +00000880: 6164 2065 7272 6f72 2022 6669 6c65 205c ad error "file \ │ │ │ +00000890: 2225 735c 2220 6469 646e 2774 2064 6566 "%s\" didn't def │ │ │ +000008a0: 696e 6520 5c22 2573 5c22 2220 6279 7465 ine \"%s\"" byte │ │ │ +000008b0: 2d63 6f6d 7069 6c65 2d69 6e6c 696e 652d -compile-inline- │ │ │ +000008c0: 6578 7061 6e64 2063 6f6d 7069 6c65 642d expand compiled- │ │ │ +000008d0: 6675 6e63 7469 6f6e 2d70 2066 6574 6368 function-p fetch │ │ │ +000008e0: 2d62 7974 6563 6f64 6520 6c61 6d62 6461 -bytecode lambda │ │ │ +000008f0: 2063 6f6d 7069 6c65 642d 6675 6e63 7469 compiled-functi │ │ │ +00000900: 6f6e 2d61 7267 6c69 7374 2062 7974 652d on-arglist byte- │ │ │ +00000910: 636f 6465 2063 6f6d 7069 6c65 642d 6675 code compiled-fu │ │ │ +00000920: 6e63 7469 6f6e 2d69 6e73 7472 7563 7469 nction-instructi │ │ │ +00000930: 6f6e 7320 636f 6d70 696c 6564 2d66 756e ons compiled-fun │ │ │ +00000940: 6374 696f 6e2d 636f 6e73 7461 6e74 7320 ction-constants │ │ │ +00000950: 636f 6d70 696c 6564 2d66 756e 6374 696f compiled-functio │ │ │ +00000960: 6e2d 7374 6163 6b2d 6465 7074 685d 2038 n-stack-depth] 8 │ │ │ +00000970: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +00000980: 7465 2d63 6f6d 7069 6c65 2d75 6e66 6f6c te-compile-unfol │ │ │ +00000990: 642d 6c61 6d62 6461 2023 5b28 666f 726d d-lambda #[(form │ │ │ +000009a0: 2026 6f70 7469 6f6e 616c 206e 616d 6529 &optional name) │ │ │ +000009b0: 2022 09ac 82c6 110e 2340 0e23 411c 1ac7 "......#@.#A... │ │ │ +000009c0: 5c6e 21ab 91c2 c85c 6e21 c9ca 5c6e 21cb \n!....\n!..\n!. │ │ │ +000009d0: 5c6e 21cc 5c6e 2146 4512 5c6e 4140 5c6e \n!.\n!FE.\nA@\n │ │ │ +000009e0: 4141 cd89 8918 1e24 1e25 1b1d 0b40 3bab AA.....$.%...@;. │ │ │ +000009f0: 870b 41ab 830b 4113 0b40 3aab 8a0b 4040 ..A...A..@:...@@ │ │ │ +00000a00: ce61 ab83 0b41 130d abf2 0d40 cf61 ab97 .a...A.....@.a.. │ │ │ +00000a10: 0e24 ab85 d0d1 095c 2288 0d41 ac85 d0d2 .$.....\"..A.... │ │ │ +00000a20: 095c 2288 d316 25aa cf0d 40d4 61ab 980d .\"...%...@.a... │ │ │ +00000a30: 41ac 85d0 d509 5c22 880d 4141 ab85 d0d6 A.....\"..AA.... │ │ │ +00000a40: 095c 2288 d316 24aa b10e 24ab 900d 400c .\"...$...$...@. │ │ │ +00000a50: ad83 d70c 4244 0842 10cd 14aa 9d0e 25ac ....BD.B......%. │ │ │ +00000a60: 8e0c ac8b d8d9 095c 2288 cd15 da14 aa8b .......\"....... │ │ │ +00000a70: 0d40 0c40 4408 4210 0c41 140d 4189 15ac .@.@D.B..A..A... │ │ │ +00000a80: 0e0c ab8e 0cda 61ac 85d8 db09 5c22 880e ......a.....\".. │ │ │ +00000a90: 23aa b108 ab88 dc08 9f0b 4242 aa83 dd0b #.........BB.... │ │ │ +00000aa0: 421e 260e 27ab 9a0e 28de 73ab 94d3 df89 B.&.'...(.s..... │ │ │ +00000ab0: 1e29 1e2a 1e2b e0e1 e20e 230e 2623 2188 .).*.+....#.&#!. │ │ │ +00000ac0: 2b0e 2629 2e07 8722 205b 6269 6e64 696e +.&)..." [bindin │ │ │ +00000ad0: 6773 206e 616d 6520 6c61 6d62 6461 2062 gs name lambda b │ │ │ +00000ae0: 6f64 7920 7661 6c75 6573 2061 7267 6c69 ody values argli │ │ │ +00000af0: 7374 2022 616e 6f6e 796d 6f75 7320 6c61 st "anonymous la │ │ │ +00000b00: 6d62 6461 2220 636f 6d70 696c 6564 2d66 mbda" compiled-f │ │ │ +00000b10: 756e 6374 696f 6e2d 7020 636f 6d70 696c unction-p compil │ │ │ +00000b20: 6564 2d66 756e 6374 696f 6e2d 6172 676c ed-function-argl │ │ │ +00000b30: 6973 7420 6279 7465 2d63 6f64 6520 636f ist byte-code co │ │ │ +00000b40: 6d70 696c 6564 2d66 756e 6374 696f 6e2d mpiled-function- │ │ │ +00000b50: 696e 7374 7275 6374 696f 6e73 2063 6f6d instructions com │ │ │ +00000b60: 7069 6c65 642d 6675 6e63 7469 6f6e 2d63 piled-function-c │ │ │ +00000b70: 6f6e 7374 616e 7473 2063 6f6d 7069 6c65 onstants compile │ │ │ +00000b80: 642d 6675 6e63 7469 6f6e 2d73 7461 636b d-function-stack │ │ │ +00000b90: 2d64 6570 7468 206e 696c 2069 6e74 6572 -depth nil inter │ │ │ +00000ba0: 6163 7469 7665 2026 6f70 7469 6f6e 616c active &optional │ │ │ +00000bb0: 2065 7272 6f72 2022 266f 7074 696f 6e61 error "&optiona │ │ │ +00000bc0: 6c20 666f 756e 6420 6166 7465 7220 2672 l found after &r │ │ │ +00000bd0: 6573 7420 696e 2025 7322 2022 6e6f 7468 est in %s" "noth │ │ │ +00000be0: 696e 6720 6166 7465 7220 266f 7074 696f ing after &optio │ │ │ +00000bf0: 6e61 6c20 696e 2025 7322 2074 2026 7265 nal in %s" t &re │ │ │ +00000c00: 7374 2022 6e6f 7468 696e 6720 6166 7465 st "nothing afte │ │ │ +00000c10: 7220 2672 6573 7420 696e 2025 7322 2022 r &rest in %s" " │ │ │ +00000c20: 6d75 6c74 6970 6c65 2076 6172 7320 6166 multiple vars af │ │ │ +00000c30: 7465 7220 2672 6573 7420 696e 2025 7322 ter &rest in %s" │ │ │ +00000c40: 206c 6973 7420 6279 7465 2d63 6f6d 7069 list byte-compi │ │ │ +00000c50: 6c65 2d77 6172 6e20 2261 7474 656d 7074 le-warn "attempt │ │ │ +00000c60: 2074 6f20 6f70 656e 2d63 6f64 6520 2573 to open-code %s │ │ │ +00000c70: 2077 6974 6820 746f 6f20 6665 7720 6172 with too few ar │ │ │ +00000c80: 6775 6d65 6e74 7322 2074 6f6f 2d66 6577 guments" too-few │ │ │ +00000c90: 2022 6174 7465 6d70 7420 746f 206f 7065 "attempt to ope │ │ │ +00000ca0: 6e2d 636f 6465 2025 7320 7769 7468 2074 n-code %s with t │ │ │ +00000cb0: 6f6f 206d 616e 7920 6172 6775 6d65 6e74 oo many argument │ │ │ +00000cc0: 7322 206c 6574 2070 726f 676e 2028 7420 s" let progn (t │ │ │ +00000cd0: 736f 7572 6365 2920 3420 6279 7465 2d63 source) 4 byte-c │ │ │ +00000ce0: 6f6d 7069 6c65 2d6c 6f67 2d31 2066 6f72 ompile-log-1 for │ │ │ +00000cf0: 6d61 7420 2220 2025 7309 3d3d 3e09 2573 mat " %s.==>.%s │ │ │ +00000d00: 2220 666f 726d 2072 6573 7470 206f 7074 " form restp opt │ │ │ +00000d10: 696f 6e61 6c70 206e 6577 666f 726d 2062 ionalp newform b │ │ │ +00000d20: 7974 652d 6f70 7469 6d69 7a65 2062 7974 yte-optimize byt │ │ │ +00000d30: 652d 6f70 7469 6d69 7a65 2d6c 6f67 2070 e-optimize-log p │ │ │ +00000d40: 7269 6e74 2d6c 656e 6774 6820 7072 696e rint-length prin │ │ │ +00000d50: 742d 6c65 7665 6c20 7072 696e 742d 6573 t-level print-es │ │ │ +00000d60: 6361 7065 2d6e 6577 6c69 6e65 735d 2038 cape-newlines] 8 │ │ │ +00000d70: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +00000d80: 7465 2d6f 7074 696d 697a 652d 666f 726d te-optimize-form │ │ │ +00000d90: 2d63 6f64 652d 7761 6c6b 6572 2023 5b28 -code-walker #[( │ │ │ +00000da0: 666f 726d 2066 6f72 2d65 6666 6563 7429 form for-effect) │ │ │ +00000db0: 2022 0da2 c619 1c0d 3aac 960b ad8b 08ae "......:....... │ │ │ +00000dc0: 880d 393f ae83 0dc7 613f 8552 020d 8252 ..9?....a?.R...R │ │ │ +00000dd0: 020c c861 ab9b 0d41 41ab 87c9 cacb 0d21 ...a...AA......! │ │ │ +00000de0: 5c22 880d 4140 8552 020b 3f85 5202 0d82 \"..A@.R..?.R... │ │ │ +00000df0: 5202 cc0c 21ac 860c a2cd 61ab 86ce 0d21 R...!.....a....! │ │ │ +00000e00: 8252 020c cf73 ab92 0cd0 d10d 4140 5c22 .R...s......A@\" │ │ │ +00000e10: d20d 4141 0b5c 2242 4282 5202 0cd3 61ab ..AA.\"BB.R...a. │ │ │ +00000e20: 8a0c d0d4 0d41 5c22 4282 5202 0cd5 61ab .....A\"B.R...a. │ │ │ +00000e30: a30d 4141 ab95 d20d 410b 5c22 8911 41ab ..AA....A.\"..A. │ │ │ +00000e40: 86d5 0942 8252 0209 4082 5202 d60d 4140 ...B.R..@.R...A@ │ │ │ +00000e50: 0b5c 2282 5202 0cd7 61ab a00d 4141 ab92 .\".R...a...AA.. │ │ │ +00000e60: d7d6 0d41 400b 5c22 d20d 4141 c75c 2242 ...A@.\"..AA.\"B │ │ │ +00000e70: 4282 5202 d60d 4140 0b5c 2282 5202 0cd8 B.R...A@.\".R... │ │ │ +00000e80: 61ab 9ad8 d60d 4140 c75c 22d6 d90d 380b a.....A@.\"...8. │ │ │ +00000e90: 5c22 d20d 4141 41c7 5c22 4242 4282 5202 \"..AAA.\"BBB.R. │ │ │ +00000ea0: 0cda 73ab 8a0c d20d 410b 5c22 4282 5202 ..s.....A.\"B.R. │ │ │ +00000eb0: 0cdb 61ab 920c d60d 4140 c65c 22d2 0d41 ..a.....A@.\"..A │ │ │ +00000ec0: 410b 5c22 4242 8252 020c dc61 ab99 0cd6 A.\"BB.R...a.... │ │ │ +00000ed0: 0d41 40c6 5c22 d6d9 0d38 0b5c 22d2 dd0d .A@.\"...8.\"... │ │ │ +00000ee0: 9b0b 5c22 4242 4282 5202 0cde 73ab d90b ..\"BBB.R...s... │ │ │ +00000ef0: abcc df0d 4121 891a ab8f 5c6e d65c 6e40 ....A!....\n.\n@ │ │ │ +00000f00: 0b5c 22a0 ac86 5c6e 4189 12ac 710d 41ab .\"...\nA...q.A. │ │ │ +00000f10: 9e5c 6eac 9b0e 36ab 970e 37e0 73ab 91c7 .\n...6...7.s... │ │ │ +00000f20: e189 1e38 1e39 1e3a e2e3 e40d 5c22 2188 ...8.9.:....\"!. │ │ │ +00000f30: 2b5c 6eab 885c 6ed0 d65c 6e41 5c22 a188 +\n..\n..\nA\".. │ │ │ +00000f40: 0c5c 6e9f 2942 8252 020c d0d6 0d41 5c22 .\n.)B.R.....A\" │ │ │ +00000f50: 4282 5202 0ce5 61ab 8bc9 e6cb 0d21 5c22 B.R...a......!\" │ │ │ +00000f60: 88c6 8252 020c e773 ab84 0d82 5202 0ce8 ...R...s....R... │ │ │ +00000f70: 61ab 8f0c d60d 4140 0b5c 220d 4141 4242 a.....A@.\".AABB │ │ │ +00000f80: 8252 020c e961 ab8f 0cd6 0d41 40c6 5c22 .R...a.....A@.\" │ │ │ +00000f90: 0d41 4142 4282 5202 0dea 0d0e 3b5c 2289 .AABB.R.....;\". │ │ │ +00000fa0: 1561 ac86 d60d 0b5c 22aa fceb ec21 ab9a .a.....\"....!.. │ │ │ +00000fb0: 0da2 39ab 950d a2ed 4eab 8f0d ec0d 2189 ..9.....N.....!. │ │ │ +00000fc0: 1561 ac86 d60d 0b5c 22aa dd0c 39ac 900c .a.....\"...9... │ │ │ +00000fd0: a2ee 61ac 87c9 efcb 0c21 5c22 880d aac9 ..a......!\".... │ │ │ +00000fe0: 0bab bf0c f04e 8911 abb8 08ac 8e09 f161 .....N.........a │ │ │ +00000ff0: ac89 c9f2 cb0d 215c 2288 aaa7 0e36 ab97 ......!\"....6.. │ │ │ +00001000: 0e37 e073 ab91 c7e1 891e 381e 391e 3ae2 .7.s......8.9.:. │ │ │ +00001010: e3f3 0c5c 2221 882b d6d5 f40d 41f5 5c22 ...\"!.+....A.\" │ │ │ +00001020: 42c7 5c22 aa87 0cd0 d60d 415c 2242 2a87 B.\"......A\"B*. │ │ │ +00001030: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ +00001040: 6465 6c65 7465 2d65 7272 6f72 7320 746d delete-errors tm │ │ │ +00001050: 7020 6261 636b 7761 7264 7320 666f 722d p backwards for- │ │ │ +00001060: 6566 6665 6374 2066 6e20 666f 726d 206e effect fn form n │ │ │ +00001070: 696c 2074 2071 756f 7465 2062 7974 652d il t quote byte- │ │ │ +00001080: 636f 6d70 696c 652d 7761 726e 2022 6d61 compile-warn "ma │ │ │ +00001090: 6c66 6f72 6d65 6420 7175 6f74 6520 666f lformed quote fo │ │ │ +000010a0: 726d 3a20 2573 2220 7072 696e 312d 746f rm: %s" prin1-to │ │ │ +000010b0: 2d73 7472 696e 6720 636f 6d70 696c 6564 -string compiled │ │ │ +000010c0: 2d66 756e 6374 696f 6e2d 7020 6c61 6d62 -function-p lamb │ │ │ +000010d0: 6461 2062 7974 652d 636f 6d70 696c 652d da byte-compile- │ │ │ +000010e0: 756e 666f 6c64 2d6c 616d 6264 6120 286c unfold-lambda (l │ │ │ +000010f0: 6574 206c 6574 2a29 206d 6170 6361 7220 et let*) mapcar │ │ │ +00001100: 235b 2862 696e 6469 6e67 2920 2208 39ab #[(binding) ".9. │ │ │ +00001110: 8208 8708 4141 ab87 c1c2 c308 215c 2288 ....AA......!\". │ │ │ +00001120: 0840 c408 4140 c55c 2244 8722 205b 6269 .@..A@.\"D." [bi │ │ │ +00001130: 6e64 696e 6720 6279 7465 2d63 6f6d 7069 nding byte-compi │ │ │ +00001140: 6c65 2d77 6172 6e20 226d 616c 666f 726d le-warn "malform │ │ │ +00001150: 6564 206c 6574 2062 696e 6469 6e67 3a20 ed let binding: │ │ │ +00001160: 2573 2220 7072 696e 312d 746f 2d73 7472 %s" prin1-to-str │ │ │ +00001170: 696e 6720 6279 7465 2d6f 7074 696d 697a ing byte-optimiz │ │ │ +00001180: 652d 666f 726d 206e 696c 5d20 345d 2062 e-form nil] 4] b │ │ │ +00001190: 7974 652d 6f70 7469 6d69 7a65 2d62 6f64 yte-optimize-bod │ │ │ +000011a0: 7920 636f 6e64 2023 5b28 636c 6175 7365 y cond #[(clause │ │ │ +000011b0: 2920 2209 3aab 8cc2 0940 c35c 22c4 0941 ) ".:....@.\"..A │ │ │ +000011c0: 085c 2242 87c5 c6c7 0921 5c22 8809 8722 .\"B.....!\"..." │ │ │ +000011d0: 205b 666f 722d 6566 6665 6374 2063 6c61 [for-effect cla │ │ │ +000011e0: 7573 6520 6279 7465 2d6f 7074 696d 697a use byte-optimiz │ │ │ +000011f0: 652d 666f 726d 206e 696c 2062 7974 652d e-form nil byte- │ │ │ +00001200: 6f70 7469 6d69 7a65 2d62 6f64 7920 6279 optimize-body by │ │ │ +00001210: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e20 te-compile-warn │ │ │ +00001220: 226d 616c 666f 726d 6564 2063 6f6e 6420 "malformed cond │ │ │ +00001230: 666f 726d 3a20 2573 2220 7072 696e 312d form: %s" prin1- │ │ │ +00001240: 746f 2d73 7472 696e 675d 2034 5d20 7072 to-string] 4] pr │ │ │ +00001250: 6f67 6e20 6279 7465 2d6f 7074 696d 697a ogn byte-optimiz │ │ │ +00001260: 652d 666f 726d 2070 726f 6731 2070 726f e-form prog1 pro │ │ │ +00001270: 6732 2032 2028 7361 7665 2d65 7863 7572 g2 2 (save-excur │ │ │ +00001280: 7369 6f6e 2073 6176 652d 7265 7374 7269 sion save-restri │ │ │ +00001290: 6374 696f 6e20 7361 7665 2d63 7572 7265 ction save-curre │ │ │ +000012a0: 6e74 2d62 7566 6665 7229 2077 6974 682d nt-buffer) with- │ │ │ +000012b0: 6f75 7470 7574 2d74 6f2d 7465 6d70 2d62 output-to-temp-b │ │ │ +000012c0: 7566 6665 7220 6966 2033 2028 616e 6420 uffer if 3 (and │ │ │ +000012d0: 6f72 2920 7265 7665 7273 6520 2874 2073 or) reverse (t s │ │ │ +000012e0: 6f75 7263 6529 2034 2062 7974 652d 636f ource) 4 byte-co │ │ │ +000012f0: 6d70 696c 652d 6c6f 672d 3120 666f 726d mpile-log-1 form │ │ │ +00001300: 6174 2022 2020 616c 6c20 7375 6266 6f72 at " all subfor │ │ │ +00001310: 6d73 206f 6620 2573 2063 616c 6c65 6420 ms of %s called │ │ │ +00001320: 666f 7220 6566 6665 6374 3b20 6465 6c65 for effect; dele │ │ │ +00001330: 7465 6422 2069 6e74 6572 6163 7469 7665 ted" interactive │ │ │ +00001340: 2022 6d69 7370 6c61 6365 6420 696e 7465 "misplaced inte │ │ │ +00001350: 7261 6374 6976 6520 7370 6563 3a20 2573 ractive spec: %s │ │ │ +00001360: 2220 2864 6566 756e 2064 6566 6d61 6372 " (defun defmacr │ │ │ +00001370: 6f20 6675 6e63 7469 6f6e 2063 6f6e 6469 o function condi │ │ │ +00001380: 7469 6f6e 2d63 6173 6520 7361 7665 2d77 tion-case save-w │ │ │ +00001390: 696e 646f 772d 6578 6375 7273 696f 6e29 indow-excursion) │ │ │ +000013a0: 2075 6e77 696e 642d 7072 6f74 6563 7420 unwind-protect │ │ │ +000013b0: 6361 7463 6820 6d61 6372 6f65 7870 616e catch macroexpan │ │ │ +000013c0: 6420 6662 6f75 6e64 7020 636f 6d70 696c d fboundp compil │ │ │ +000013d0: 6572 2d6d 6163 726f 6578 7061 6e64 2063 er-macroexpand c │ │ │ +000013e0: 6c2d 636f 6d70 696c 6572 2d6d 6163 726f l-compiler-macro │ │ │ +000013f0: 206d 6f63 6b6c 6973 7020 2225 7320 6973 mocklisp "%s is │ │ │ +00001400: 2061 206d 616c 666f 726d 6564 2066 756e a malformed fun │ │ │ +00001410: 6374 696f 6e22 2073 6964 652d 6566 6665 ction" side-effe │ │ │ +00001420: 6374 2d66 7265 6520 6572 726f 722d 6672 ct-free error-fr │ │ │ +00001430: 6565 2022 2573 2063 616c 6c65 6420 666f ee "%s called fo │ │ │ +00001440: 7220 6566 6665 6374 2220 2220 2025 7320 r effect" " %s │ │ │ +00001450: 6361 6c6c 6564 2066 6f72 2065 6666 6563 called for effec │ │ │ +00001460: 743b 2064 656c 6574 6564 2220 6170 7065 t; deleted" appe │ │ │ +00001470: 6e64 2028 6e69 6c29 2062 7974 652d 6f70 nd (nil) byte-op │ │ │ +00001480: 7469 6d69 7a65 2062 7974 652d 6f70 7469 timize byte-opti │ │ │ +00001490: 6d69 7a65 2d6c 6f67 2070 7269 6e74 2d6c mize-log print-l │ │ │ +000014a0: 656e 6774 6820 7072 696e 742d 6c65 7665 ength print-leve │ │ │ +000014b0: 6c20 7072 696e 742d 6573 6361 7065 2d6e l print-escape-n │ │ │ +000014c0: 6577 6c69 6e65 7320 6279 7465 2d63 6f6d ewlines byte-com │ │ │ +000014d0: 7069 6c65 2d6d 6163 726f 2d65 6e76 6972 pile-macro-envir │ │ │ +000014e0: 6f6e 6d65 6e74 5d20 375d 290a 2340 3431 onment] 7]).#@41 │ │ │ +000014f0: 2054 6865 2073 6f75 7263 652d 6c65 7665 The source-leve │ │ │ +00001500: 6c20 7061 7373 206f 6620 7468 6520 6f70 l pass of the op │ │ │ +00001510: 7469 6d69 7a65 722e 1f0a 2864 6566 616c timizer...(defal │ │ │ +00001520: 6961 7320 2762 7974 652d 6f70 7469 6d69 ias 'byte-optimi │ │ │ +00001530: 7a65 2d66 6f72 6d20 235b 2866 6f72 6d20 ze-form #[(form │ │ │ +00001540: 266f 7074 696f 6e61 6c20 666f 722d 6566 &optional for-ef │ │ │ +00001550: 6665 6374 2920 22c6 0d5c 6e5c 2215 c789 fect) "..\n\"... │ │ │ +00001560: 1c1b 0d3a abc3 0d40 39ab be5c 6eab 880d ...:...@9..\n... │ │ │ +00001570: 40c8 4e89 13ac 880d 40c9 4e89 13ab ab0d @.N.....@.N..... │ │ │ +00001580: 0b0d 2189 1461 aca2 09ab 9708 ca73 ab92 ..!..a.......s.. │ │ │ +00001590: cbcc 891e 111e 121e 13cd cecf 0d0c 2321 ..............#! │ │ │ +000015a0: 882b d00c 5c6e 5c22 8914 aa81 0d2a 8722 .+..\n\".....*." │ │ │ +000015b0: 205b 6279 7465 2d6f 7074 696d 697a 652d [byte-optimize- │ │ │ +000015c0: 6c6f 6720 6279 7465 2d6f 7074 696d 697a log byte-optimiz │ │ │ +000015d0: 6520 666f 722d 6566 6665 6374 206f 7074 e for-effect opt │ │ │ +000015e0: 206e 6577 2066 6f72 6d20 6279 7465 2d6f new form byte-o │ │ │ +000015f0: 7074 696d 697a 652d 666f 726d 2d63 6f64 ptimize-form-cod │ │ │ +00001600: 652d 7761 6c6b 6572 206e 696c 2062 7974 e-walker nil byt │ │ │ +00001610: 652d 666f 722d 6566 6665 6374 2d6f 7074 e-for-effect-opt │ │ │ +00001620: 696d 697a 6572 2062 7974 652d 6f70 7469 imizer byte-opti │ │ │ +00001630: 6d69 7a65 7220 2874 2073 6f75 7263 6529 mizer (t source) │ │ │ +00001640: 2074 2034 2062 7974 652d 636f 6d70 696c t 4 byte-compil │ │ │ +00001650: 652d 6c6f 672d 3120 666f 726d 6174 2022 e-log-1 format " │ │ │ +00001660: 2020 2573 093d 3d3e 0925 7322 2062 7974 %s.==>.%s" byt │ │ │ +00001670: 652d 6f70 7469 6d69 7a65 2d66 6f72 6d20 e-optimize-form │ │ │ +00001680: 7072 696e 742d 6c65 6e67 7468 2070 7269 print-length pri │ │ │ +00001690: 6e74 2d6c 6576 656c 2070 7269 6e74 2d65 nt-level print-e │ │ │ +000016a0: 7363 6170 652d 6e65 776c 696e 6573 5d20 scape-newlines] │ │ │ +000016b0: 3620 2823 2420 2e20 3533 3631 295d 290a 6 (#$ . 5361)]). │ │ │ +000016c0: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +000016d0: 6f70 7469 6d69 7a65 2d62 6f64 7920 235b optimize-body #[ │ │ │ +000016e0: 2866 6f72 6d73 2061 6c6c 2d66 6f72 2d65 (forms all-for-e │ │ │ +000016f0: 6666 6563 7429 2022 09c6 8989 1a1c 1b89 ffect) "........ │ │ │ +00001700: 1dab a008 ae82 0d41 140d 40ad 85c7 0d40 .......A..@....@ │ │ │ +00001710: 0c5c 2289 12ac 830c ac84 5c6e 0b42 130d .\".......\n.B.. │ │ │ +00001720: 4189 15ac 600b 9f2c 8722 205b 616c 6c2d A...`..,." [all- │ │ │ +00001730: 666f 722d 6566 6665 6374 2066 6f72 6d73 for-effect forms │ │ │ +00001740: 206e 6577 2072 6573 756c 7420 6665 2072 new result fe r │ │ │ +00001750: 6573 7420 6e69 6c20 6279 7465 2d6f 7074 est nil byte-opt │ │ │ +00001760: 696d 697a 652d 666f 726d 5d20 355d 290a imize-form] 5]). │ │ │ +00001770: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +00001780: 636f 6d70 696c 652d 7472 7565 636f 6e73 compile-truecons │ │ │ +00001790: 7470 2027 286d 6163 726f 202e 2023 5b28 tp '(macro . #[( │ │ │ +000017a0: 666f 726d 2920 22c1 c208 44c3 c408 44c5 form) "...D...D. │ │ │ +000017b0: 4242 44c6 c708 4444 43c3 08c8 4242 43c9 BBD...DDC...BBC. │ │ │ +000017c0: 0844 43af 0587 2220 5b66 6f72 6d20 636f .DC..." [form co │ │ │ +000017d0: 6e64 2063 6f6e 7370 2065 7120 6361 7220 nd consp eq car │ │ │ +000017e0: 2827 7175 6f74 6529 206e 6f74 2073 796d ('quote) not sym │ │ │ +000017f0: 626f 6c70 2028 7429 206b 6579 776f 7264 bolp (t) keyword │ │ │ +00001800: 705d 2036 5d29 290a 2864 6566 616c 6961 p] 6])).(defalia │ │ │ +00001810: 7320 2762 7974 652d 6f70 7469 6d69 7a65 s 'byte-optimize │ │ │ +00001820: 2d61 7373 6f63 6961 7469 7665 2d6d 6174 -associative-mat │ │ │ +00001830: 6820 235b 2866 6f72 6d29 2022 c489 0941 h #[(form) "...A │ │ │ +00001840: 1b18 1a0b ab97 0b40 a7ab 870b 4008 4210 .......@....@.B. │ │ │ +00001850: aa85 0b40 5c6e 4212 0b41 8913 ac69 0841 ...@\nB..A...i.A │ │ │ +00001860: aba1 5c6e ab97 0940 c509 4008 5c22 5c6e ..\n...@..@.\"\n │ │ │ +00001870: 41ab 8709 405c 6e9f 42aa 825c 6e40 45aa A...@\n.B..\n@E. │ │ │ +00001880: 88c5 0940 085c 22aa 8109 2b87 2220 5b63 ...@.\"...+." [c │ │ │ +00001890: 6f6e 7374 616e 7473 2066 6f72 6d20 6172 onstants form ar │ │ │ +000018a0: 6773 2072 6573 7420 6e69 6c20 6170 706c gs rest nil appl │ │ │ +000018b0: 795d 2035 5d29 0a28 6465 6661 6c69 6173 y] 5]).(defalias │ │ │ +000018c0: 2027 6279 7465 2d6f 7074 696d 697a 652d 'byte-optimize- │ │ │ +000018d0: 6e6f 6e61 7373 6f63 6961 7469 7665 2d6d nonassociative-m │ │ │ +000018e0: 6174 6820 235b 2866 6f72 6d29 2022 5c6e ath #[(form) "\n │ │ │ +000018f0: 4140 a7ab 875c 6e41 4140 a7ac 825c 6e87 A@...\nAA@...\n. │ │ │ +00001900: 5c6e 4140 5c6e 4141 1918 0940 a7ab 8d5c \nA@\nAA...@...\ │ │ │ +00001910: 6e40 0809 405c 2210 0941 8911 aa6f 09ab n@..@\"..A...o.. │ │ │ +00001920: 885c 6e40 0809 4242 aa81 082a 8722 205b .\n@..BB...*." [ │ │ │ +00001930: 636f 6e73 7461 6e74 2072 6573 7420 666f constant rest fo │ │ │ +00001940: 726d 5d20 345d 290a 2864 6566 616c 6961 rm] 4]).(defalia │ │ │ +00001950: 7320 2762 7974 652d 6f70 7469 6d69 7a65 s 'byte-optimize │ │ │ +00001960: 2d61 7070 726f 782d 6571 7561 6c20 235b -approx-equal #[ │ │ │ +00001970: 2878 2079 2920 22c2 0908 5a21 c35f c209 (x y) "...Z!._.. │ │ │ +00001980: 085c 5c21 5887 2220 5b79 2078 2061 6273 .\\!X." [y x abs │ │ │ +00001990: 2031 3030 5d20 345d 290a 2864 6566 616c 100] 4]).(defal │ │ │ +000019a0: 6961 7320 2762 7974 652d 6f70 7469 6d69 ias 'byte-optimi │ │ │ +000019b0: 7a65 2d64 656c 6179 2d63 6f6e 7374 616e ze-delay-constan │ │ │ +000019c0: 7473 2d6d 6174 6820 235b 2866 6f72 6d20 ts-math #[(form │ │ │ +000019d0: 7374 6172 7420 6675 6e29 2022 0953 0c9b start fun) ".S.. │ │ │ +000019e0: 0c5c 6ec6 7318 1e0e 1d0d 4189 1541 abce .\n.s.....A..A.. │ │ │ +000019f0: 0d40 a8ab 74c7 1bc8 0c21 1409 530c 9b15 .@..t....!..S... │ │ │ +00001a00: 0d41 8915 ab90 0d40 a8ab 750d 400b 4213 .A.....@..u.@.B. │ │ │ +00001a10: 0dc7 a088 aa6a 08ab 96c9 ca5c 6ecb cc0b .....j.....\n... │ │ │ +00001a20: 5c22 5c22 ccca 5c6e 0b5c 2221 5c22 ac85 \"\"..\n.\"!\".. │ │ │ +00001a30: 0e0e 14aa 8ccd c70c 5c22 ca5c 6e0b 9f5c ........\".\n..\ │ │ │ +00001a40: 2243 a414 29aa 2b0c 2b87 2220 5b6f 7665 "C..).+.+." [ove │ │ │ +00001a50: 7266 6c6f 7720 7374 6172 7420 6675 6e20 rflow start fun │ │ │ +00001a60: 636f 6e73 7461 6e74 7320 666f 726d 2072 constants form r │ │ │ +00001a70: 6573 7420 282b 202a 2920 6e69 6c20 636f est (+ *) nil co │ │ │ +00001a80: 7079 2d73 6571 7565 6e63 6520 6279 7465 py-sequence byte │ │ │ +00001a90: 2d6f 7074 696d 697a 652d 6170 7072 6f78 -optimize-approx │ │ │ +00001aa0: 2d65 7175 616c 2061 7070 6c79 206d 6170 -equal apply map │ │ │ +00001ab0: 6361 7220 666c 6f61 7420 6465 6c71 206f car float delq o │ │ │ +00001ac0: 7269 675d 2036 5d29 0a28 6465 6661 6c69 rig] 6]).(defali │ │ │ +00001ad0: 6173 2027 6279 7465 2d6f 7074 696d 697a as 'byte-optimiz │ │ │ +00001ae0: 652d 706c 7573 2023 5b28 666f 726d 2920 e-plus #[(form) │ │ │ +00001af0: 22c1 c208 c3c4 2321 8722 205b 666f 726d ".....#!." [form │ │ │ +00001b00: 2062 7974 652d 6f70 7469 6d69 7a65 2d70 byte-optimize-p │ │ │ +00001b10: 7265 6469 6361 7465 2062 7974 652d 6f70 redicate byte-op │ │ │ +00001b20: 7469 6d69 7a65 2d64 656c 6179 2d63 6f6e timize-delay-con │ │ │ +00001b30: 7374 616e 7473 2d6d 6174 6820 3120 2b5d stants-math 1 +] │ │ │ +00001b40: 2035 5d29 0a28 6465 6661 6c69 6173 2027 5]).(defalias ' │ │ │ +00001b50: 6279 7465 2d6f 7074 696d 697a 652d 6d75 byte-optimize-mu │ │ │ +00001b60: 6c74 6970 6c79 2023 5b28 666f 726d 2920 ltiply #[(form) │ │ │ +00001b70: 22c1 08c2 c323 10c4 0821 40c5 61ab 85c6 "....#...!@.a... │ │ │ +00001b80: 0841 4287 c708 2187 2220 5b66 6f72 6d20 .AB...!." [form │ │ │ +00001b90: 6279 7465 2d6f 7074 696d 697a 652d 6465 byte-optimize-de │ │ │ +00001ba0: 6c61 792d 636f 6e73 7461 6e74 732d 6d61 lay-constants-ma │ │ │ +00001bb0: 7468 2031 202a 206c 6173 7420 3020 7072 th 1 * last 0 pr │ │ │ +00001bc0: 6f67 6e20 6279 7465 2d6f 7074 696d 697a ogn byte-optimiz │ │ │ +00001bd0: 652d 7072 6564 6963 6174 655d 2034 5d29 e-predicate] 4]) │ │ │ +00001be0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +00001bf0: 2d6f 7074 696d 697a 652d 6d69 6e75 7320 -optimize-minus │ │ │ +00001c00: 235b 2866 6f72 6d29 2022 c209 c3c4 2311 #[(form) "....#. │ │ │ +00001c10: c0c5 099b 2140 1809 4140 a7ab 9208 a7ab ....!@..A@...... │ │ │ +00001c20: 8e09 4109 4140 085a a088 c609 21aa ad09 ..A.A@.Z....!... │ │ │ +00001c30: 4140 c761 aba3 0947 c361 ab83 c7aa 9d09 A@.a...G.a...... │ │ │ +00001c40: 47c5 61ab 87c8 c309 3844 aa90 c889 c309 G.a.....8D...... │ │ │ +00001c50: 3844 c509 9b42 42aa 83c9 0921 2987 2220 8D...BB....!)." │ │ │ +00001c60: 5b6c 6173 7420 666f 726d 2062 7974 652d [last form byte- │ │ │ +00001c70: 6f70 7469 6d69 7a65 2d64 656c 6179 2d63 optimize-delay-c │ │ │ +00001c80: 6f6e 7374 616e 7473 2d6d 6174 6820 3220 onstants-math 2 │ │ │ +00001c90: 2b20 3320 6275 746c 6173 7420 3020 2d20 + 3 butlast 0 - │ │ │ +00001ca0: 6279 7465 2d6f 7074 696d 697a 652d 7072 byte-optimize-pr │ │ │ +00001cb0: 6564 6963 6174 655d 2034 5d29 0a28 6465 edicate] 4]).(de │ │ │ +00001cc0: 6661 6c69 6173 2027 6279 7465 2d6f 7074 falias 'byte-opt │ │ │ +00001cd0: 696d 697a 652d 6469 7669 6465 2023 5b28 imize-divide #[( │ │ │ +00001ce0: 666f 726d 2920 22c2 09c3 c423 11c0 c509 form) "....#.... │ │ │ +00001cf0: 9b21 4018 0941 40a7 ab8a 08a7 ab86 c6c7 .!@..A@......... │ │ │ +00001d00: c88f aa93 0941 40c9 61ab 89ca cb09 4141 .....A@.a.....AA │ │ │ +00001d10: cc23 aa83 cd09 2129 8722 205b 6c61 7374 .#....!)." [last │ │ │ +00001d20: 2066 6f72 6d20 6279 7465 2d6f 7074 696d form byte-optim │ │ │ +00001d30: 697a 652d 6465 6c61 792d 636f 6e73 7461 ize-delay-consta │ │ │ +00001d40: 6e74 732d 6d61 7468 2032 202a 2033 206e nts-math 2 * 3 n │ │ │ +00001d50: 696c 2028 6279 7465 2d63 6f64 6520 2209 il (byte-code ". │ │ │ +00001d60: 4009 4140 08a5 c209 4141 2142 4287 2220 @.A@....AA!BB." │ │ │ +00001d70: 5b6c 6173 7420 666f 726d 2062 7574 6c61 [last form butla │ │ │ +00001d80: 7374 5d20 3429 2028 2865 7272 6f72 2066 st] 4) ((error f │ │ │ +00001d90: 6f72 6d29 2920 3020 6170 7065 6e64 2028 orm)) 0 append ( │ │ │ +00001da0: 7072 6f67 6e29 2028 3029 2062 7974 652d progn) (0) byte- │ │ │ +00001db0: 6f70 7469 6d69 7a65 2d70 7265 6469 6361 optimize-predica │ │ │ +00001dc0: 7465 5d20 345d 290a 2864 6566 616c 6961 te] 4]).(defalia │ │ │ +00001dd0: 7320 2762 7974 652d 6f70 7469 6d69 7a65 s 'byte-optimize │ │ │ +00001de0: 2d6c 6f67 6d75 6d62 6c65 2023 5b28 666f -logmumble #[(fo │ │ │ +00001df0: 726d 2920 22c1 08c2 0840 2310 c3c4 0873 rm) "....@#....s │ │ │ +00001e00: ab96 0840 c561 ab86 c608 4142 aa86 c7c4 ...@.a....AB.... │ │ │ +00001e10: c808 215c 2289 10aa 9208 a2c9 61ab 8bca ..!\".......a... │ │ │ +00001e20: 0873 ab86 c608 4142 aa81 0821 8722 205b .s....AB...!." [ │ │ │ +00001e30: 666f 726d 2062 7974 652d 6f70 7469 6d69 form byte-optimi │ │ │ +00001e40: 7a65 2d64 656c 6179 2d63 6f6e 7374 616e ze-delay-constan │ │ │ +00001e50: 7473 2d6d 6174 6820 3120 6279 7465 2d6f ts-math 1 byte-o │ │ │ +00001e60: 7074 696d 697a 652d 7072 6564 6963 6174 ptimize-predicat │ │ │ +00001e70: 6520 3020 6c6f 6761 6e64 2070 726f 676e e 0 logand progn │ │ │ +00001e80: 2064 656c 7120 636f 7079 2d73 6571 7565 delq copy-seque │ │ │ +00001e90: 6e63 6520 6c6f 6769 6f72 202d 315d 2035 nce logior -1] 5 │ │ │ +00001ea0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +00001eb0: 7465 2d6f 7074 696d 697a 652d 6269 6e61 te-optimize-bina │ │ │ +00001ec0: 7279 2d70 7265 6469 6361 7465 2023 5b28 ry-predicate #[( │ │ │ +00001ed0: 666f 726d 2920 2208 4140 3aab 8808 4140 form) ".A@:...A@ │ │ │ +00001ee0: 40c1 61aa 9508 4140 39ab 8ec2 0841 4021 @.a...A@9....A@! │ │ │ +00001ef0: ac8a 0841 40c3 73aa 81c4 abb4 c508 383a ...A@.s.......8: │ │ │ +00001f00: ab88 c508 3840 c161 aa95 c508 3839 ab8e ....8@.a....89.. │ │ │ +00001f10: c2c5 0838 21ac 8ac5 0838 c373 aa81 c4ab ...8!....8.s.... │ │ │ +00001f20: 85c6 c7c8 8f87 0840 c508 3808 4140 4587 .......@..8.A@E. │ │ │ +00001f30: 0887 2220 5b66 6f72 6d20 7175 6f74 6520 .." [form quote │ │ │ +00001f40: 6b65 7977 6f72 6470 2028 6e69 6c20 7429 keywordp (nil t) │ │ │ +00001f50: 2074 2032 206e 696c 2028 6279 7465 2d63 t 2 nil (byte-c │ │ │ +00001f60: 6f64 6520 22c1 c208 2144 8722 205b 666f ode "...!D." [fo │ │ │ +00001f70: 726d 2071 756f 7465 2065 7661 6c5d 2033 rm quote eval] 3 │ │ │ +00001f80: 2920 2828 6572 726f 7220 666f 726d 2929 ) ((error form)) │ │ │ +00001f90: 5d20 335d 290a 2864 6566 616c 6961 7320 ] 3]).(defalias │ │ │ +00001fa0: 2762 7974 652d 6f70 7469 6d69 7a65 2d70 'byte-optimize-p │ │ │ +00001fb0: 7265 6469 6361 7465 2023 5b28 666f 726d redicate #[(form │ │ │ +00001fc0: 2920 22c3 0841 1a19 5c6e aba8 09ab a55c ) "..A..\n.....\ │ │ │ +00001fd0: 6e40 3aab 875c 6e40 40c4 61aa 925c 6e40 n@:..\n@@.a..\n@ │ │ │ +00001fe0: 39ab 8cc5 5c6e 4021 ae87 5c6e 40c6 73aa 9...\n@!..\n@.s. │ │ │ +00001ff0: 81c3 115c 6e41 8912 ac58 09ab 86c7 c8c9 ...\nA...X...... │ │ │ +00002000: 8faa 8108 2a87 2220 5b66 6f72 6d20 6f6b ....*." [form ok │ │ │ +00002010: 2072 6573 7420 7420 7175 6f74 6520 6b65 rest t quote ke │ │ │ +00002020: 7977 6f72 6470 2028 6e69 6c20 7429 2065 ywordp (nil t) e │ │ │ +00002030: 7272 2028 6279 7465 2d63 6f64 6520 22c1 rr (byte-code ". │ │ │ +00002040: c208 2144 8722 205b 666f 726d 2071 756f ..!D." [form quo │ │ │ +00002050: 7465 2065 7661 6c5d 2033 2920 2828 6572 te eval] 3) ((er │ │ │ +00002060: 726f 7220 2862 7974 652d 636f 6d70 696c ror (byte-compil │ │ │ +00002070: 652d 7761 726e 2022 6576 616c 7561 7469 e-warn "evaluati │ │ │ +00002080: 6e67 2025 733a 2025 7322 2066 6f72 6d20 ng %s: %s" form │ │ │ +00002090: 6572 7229 2066 6f72 6d29 295d 2034 5d29 err) form))] 4]) │ │ │ +000020a0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +000020b0: 2d6f 7074 696d 697a 652d 6964 656e 7469 -optimize-identi │ │ │ +000020c0: 7479 2023 5b28 666f 726d 2920 2208 41ab ty #[(form) ".A. │ │ │ +000020d0: 8908 4141 ac84 0841 4087 c1c2 0841 47c3 ..AA...A@....AG. │ │ │ +000020e0: 0841 4755 ab83 c4aa 81c5 2388 0887 2220 .AGU......#..." │ │ │ +000020f0: 5b66 6f72 6d20 6279 7465 2d63 6f6d 7069 [form byte-compi │ │ │ +00002100: 6c65 2d77 6172 6e20 2269 6465 6e74 6974 le-warn "identit │ │ │ +00002110: 7920 6361 6c6c 6564 2077 6974 6820 2564 y called with %d │ │ │ +00002120: 2061 7267 2573 2c20 6275 7420 7265 7175 arg%s, but requ │ │ │ +00002130: 6972 6573 2031 2220 3120 2222 2022 7322 ires 1" 1 "" "s" │ │ │ +00002140: 5d20 355d 290a 2864 6566 616c 6961 7320 ] 5]).(defalias │ │ │ +00002150: 2762 7974 652d 6f70 7469 6d69 7a65 2d63 'byte-optimize-c │ │ │ +00002160: 6172 2023 5b28 666f 726d 2920 2208 4140 ar #[(form) ".A@ │ │ │ +00002170: 8919 3aab 8609 40c2 61aa 8c09 39ab 8a09 ..:...@.a...9... │ │ │ +00002180: c361 ac85 c409 21ab 9809 3aab 8c09 40c2 .a....!...:...@. │ │ │ +00002190: 61ab 8609 4140 3cac 88c5 c609 5c22 8808 a...A@<.....\".. │ │ │ +000021a0: aaa5 09a2 c761 ab90 0947 c861 ab8a c909 .....a...G.a.... │ │ │ +000021b0: 4140 ca09 3845 aa8f 09a2 cb61 ab86 c909 A@..8E.....a.... │ │ │ +000021c0: 4142 aa83 cc08 2129 8722 205b 666f 726d AB....!)." [form │ │ │ +000021d0: 2061 7267 2071 756f 7465 2074 206b 6579 arg quote t key │ │ │ +000021e0: 776f 7264 7020 6279 7465 2d63 6f6d 7069 wordp byte-compi │ │ │ +000021f0: 6c65 2d77 6172 6e20 2274 616b 696e 6720 le-warn "taking │ │ │ +00002200: 6361 7220 6f66 2061 2063 6f6e 7374 616e car of a constan │ │ │ +00002210: 743a 2025 7322 2063 6f6e 7320 3320 7072 t: %s" cons 3 pr │ │ │ +00002220: 6f67 3120 3220 6c69 7374 2062 7974 652d og1 2 list byte- │ │ │ +00002230: 6f70 7469 6d69 7a65 2d70 7265 6469 6361 optimize-predica │ │ │ +00002240: 7465 5d20 355d 290a 2864 6566 616c 6961 te] 5]).(defalia │ │ │ +00002250: 7320 2762 7974 652d 6f70 7469 6d69 7a65 s 'byte-optimize │ │ │ +00002260: 2d63 6472 2023 5b28 666f 726d 2920 2208 -cdr #[(form) ". │ │ │ +00002270: 4140 8919 3aab 8609 40c2 61aa 8c09 39ab A@..:...@.a...9. │ │ │ +00002280: 8a09 c361 ac85 c409 21ab 9809 3aab 8c09 ...a....!...:... │ │ │ +00002290: 40c2 61ab 8609 4140 3cac 88c5 c609 5c22 @.a...A@<.....\" │ │ │ +000022a0: 8808 aab6 09a2 c761 ab90 0947 c861 ab8a .......a...G.a.. │ │ │ +000022b0: c909 4140 ca09 3845 aaa0 09a2 cb61 ab97 ..A@..8E.....a.. │ │ │ +000022c0: 0947 ca56 ab8c c909 4140 cb09 4141 4245 .G.V....A@..AABE │ │ │ +000022d0: aa88 0941 40aa 83cc 0821 2987 2220 5b66 ...A@....!)." [f │ │ │ +000022e0: 6f72 6d20 6172 6720 7175 6f74 6520 7420 orm arg quote t │ │ │ +000022f0: 6b65 7977 6f72 6470 2062 7974 652d 636f keywordp byte-co │ │ │ +00002300: 6d70 696c 652d 7761 726e 2022 7461 6b69 mpile-warn "taki │ │ │ +00002310: 6e67 2063 6472 206f 6620 6120 636f 6e73 ng cdr of a cons │ │ │ +00002320: 7461 6e74 3a20 2573 2220 636f 6e73 2033 tant: %s" cons 3 │ │ │ +00002330: 2070 726f 676e 2032 206c 6973 7420 6279 progn 2 list by │ │ │ +00002340: 7465 2d6f 7074 696d 697a 652d 7072 6564 te-optimize-pred │ │ │ +00002350: 6963 6174 655d 2035 5d29 0a28 6279 7465 icate] 5]).(byte │ │ │ +00002360: 2d63 6f64 6520 22c0 c1c2 c323 88c0 c4c2 -code "....#.... │ │ │ +00002370: c523 88c0 c6c2 c723 88c0 c8c2 c923 88c0 .#.....#.....#.. │ │ │ +00002380: cac2 cb23 88c0 ccc2 cd23 88c0 cec2 cf23 ...#.....#.....# │ │ │ +00002390: 88c0 d0c2 cf23 88c0 d1c2 d223 88c0 d3c2 .....#.....#.... │ │ │ +000023a0: d223 88c0 d4c2 d223 88c0 d5c2 d223 88c0 .#.....#.....#.. │ │ │ +000023b0: d6c2 d223 88c0 d7c2 cd23 88c0 d8c2 cd23 ...#.....#.....# │ │ │ +000023c0: 88c0 d9c2 cd23 88c0 dac2 cd23 88c0 dbc2 .....#.....#.... │ │ │ +000023d0: cd23 88c0 dcc2 cd23 88c0 ddc2 cd23 88c0 .#.....#.....#.. │ │ │ +000023e0: dec2 cd23 88c0 dfc2 cd23 88c0 e0c2 cd23 ...#.....#.....# │ │ │ +000023f0: 88c0 e1c2 cd23 88c0 e2c2 cd23 88c0 e3c2 .....#.....#.... │ │ │ +00002400: cd23 88c0 e4c2 cd23 88c0 e5c2 cd23 88c0 .#.....#.....#.. │ │ │ +00002410: e6c2 cd23 88c0 e7c2 cd23 88c0 e8c2 e923 ...#.....#.....# │ │ │ +00002420: 88c0 eac2 e923 88c0 ebc2 e923 88c0 ecc2 .....#.....#.... │ │ │ +00002430: cd23 88c0 edc2 ee23 88c0 efc2 f023 88c0 .#.....#.....#.. │ │ │ +00002440: f1c2 cd23 88c0 f2c2 cd23 88c0 f3c2 f423 ...#.....#.....# │ │ │ +00002450: 8722 205b 7075 7420 6964 656e 7469 7479 ." [put identity │ │ │ +00002460: 2062 7974 652d 6f70 7469 6d69 7a65 7220 byte-optimizer │ │ │ +00002470: 6279 7465 2d6f 7074 696d 697a 652d 6964 byte-optimize-id │ │ │ +00002480: 656e 7469 7479 202b 2062 7974 652d 6f70 entity + byte-op │ │ │ +00002490: 7469 6d69 7a65 2d70 6c75 7320 2a20 6279 timize-plus * by │ │ │ +000024a0: 7465 2d6f 7074 696d 697a 652d 6d75 6c74 te-optimize-mult │ │ │ +000024b0: 6970 6c79 202d 2062 7974 652d 6f70 7469 iply - byte-opti │ │ │ +000024c0: 6d69 7a65 2d6d 696e 7573 202f 2062 7974 mize-minus / byt │ │ │ +000024d0: 652d 6f70 7469 6d69 7a65 2d64 6976 6964 e-optimize-divid │ │ │ +000024e0: 6520 2520 6279 7465 2d6f 7074 696d 697a e % byte-optimiz │ │ │ +000024f0: 652d 7072 6564 6963 6174 6520 6d61 7820 e-predicate max │ │ │ +00002500: 6279 7465 2d6f 7074 696d 697a 652d 6173 byte-optimize-as │ │ │ +00002510: 736f 6369 6174 6976 652d 6d61 7468 206d sociative-math m │ │ │ +00002520: 696e 2065 7120 6279 7465 2d6f 7074 696d in eq byte-optim │ │ │ +00002530: 697a 652d 6269 6e61 7279 2d70 7265 6469 ize-binary-predi │ │ │ +00002540: 6361 7465 2065 716c 2065 7175 616c 2073 cate eql equal s │ │ │ +00002550: 7472 696e 673d 2073 7472 696e 672d 6571 tring= string-eq │ │ │ +00002560: 7561 6c20 3d20 3c20 3e20 3c3d 203e 3d20 ual = < > <= >= │ │ │ +00002570: 312b 2031 2d20 6e6f 7420 6e75 6c6c 206d 1+ 1- not null m │ │ │ +00002580: 656d 7120 636f 6e73 7020 6c69 7374 7020 emq consp listp │ │ │ +00002590: 7379 6d62 6f6c 7020 7374 7269 6e67 7020 symbolp stringp │ │ │ +000025a0: 7374 7269 6e67 3c20 7374 7269 6e67 2d6c string< string-l │ │ │ +000025b0: 6573 7370 206c 656e 6774 6820 6c6f 6761 essp length loga │ │ │ +000025c0: 6e64 2062 7974 652d 6f70 7469 6d69 7a65 nd byte-optimize │ │ │ +000025d0: 2d6c 6f67 6d75 6d62 6c65 206c 6f67 696f -logmumble logio │ │ │ +000025e0: 7220 6c6f 6778 6f72 206c 6f67 6e6f 7420 r logxor lognot │ │ │ +000025f0: 6361 7220 6279 7465 2d6f 7074 696d 697a car byte-optimiz │ │ │ +00002600: 652d 6361 7220 6364 7220 6279 7465 2d6f e-car cdr byte-o │ │ │ +00002610: 7074 696d 697a 652d 6364 7220 6361 722d ptimize-cdr car- │ │ │ +00002620: 7361 6665 2063 6472 2d73 6166 6520 7175 safe cdr-safe qu │ │ │ +00002630: 6f74 6520 6279 7465 2d6f 7074 696d 697a ote byte-optimiz │ │ │ +00002640: 652d 7175 6f74 655d 2034 290a 2864 6566 e-quote] 4).(def │ │ │ +00002650: 616c 6961 7320 2762 7974 652d 6f70 7469 alias 'byte-opti │ │ │ +00002660: 6d69 7a65 2d71 756f 7465 2023 5b28 666f mize-quote #[(fo │ │ │ +00002670: 726d 2920 2208 4140 3aac 9408 4140 39ab rm) ".A@:...A@9. │ │ │ +00002680: 90c1 0841 4021 ac89 0841 40c2 73ac 8208 ...A@!...A@.s... │ │ │ +00002690: 8708 4140 8722 205b 666f 726d 206b 6579 ..A@." [form key │ │ │ +000026a0: 776f 7264 7020 286e 696c 2074 295d 2032 wordp (nil t)] 2 │ │ │ +000026b0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +000026c0: 7465 2d6f 7074 696d 697a 652d 7a65 726f te-optimize-zero │ │ │ +000026d0: 7020 235b 2866 6f72 6d29 2022 0941 40a7 p #[(form) ".A@. │ │ │ +000026e0: ab84 c209 2187 08ab 87c3 0941 40c4 4587 ....!......A@.E. │ │ │ +000026f0: 0987 2220 5b62 7974 652d 636f 6d70 696c .." [byte-compil │ │ │ +00002700: 652d 6465 6c65 7465 2d65 7272 6f72 7320 e-delete-errors │ │ │ +00002710: 666f 726d 2065 7661 6c20 3d20 305d 2033 form eval = 0] 3 │ │ │ +00002720: 5d29 0a28 7075 7420 277a 6572 6f70 2027 ]).(put 'zerop ' │ │ │ +00002730: 6279 7465 2d6f 7074 696d 697a 6572 2027 byte-optimizer ' │ │ │ +00002740: 6279 7465 2d6f 7074 696d 697a 652d 7a65 byte-optimize-ze │ │ │ +00002750: 726f 7029 0a28 6465 6661 6c69 6173 2027 rop).(defalias ' │ │ │ +00002760: 6279 7465 2d6f 7074 696d 697a 652d 616e byte-optimize-an │ │ │ +00002770: 6420 235b 2866 6f72 6d29 2022 0841 3fae d #[(form) ".A?. │ │ │ +00002780: abc1 0873 ab9a c2c3 c408 2189 1089 4140 ...s......!...A@ │ │ │ +00002790: ab86 0841 8910 aa76 08c1 a188 21c1 4587 ...A...v....!.E. │ │ │ +000027a0: 0841 41ac 8408 4140 87c5 0821 8722 205b .AA...A@...!." [ │ │ │ +000027b0: 666f 726d 206e 696c 2070 726f 676e 2062 form nil progn b │ │ │ +000027c0: 7974 652d 6f70 7469 6d69 7a65 2d61 6e64 yte-optimize-and │ │ │ +000027d0: 2063 6f70 792d 7365 7175 656e 6365 2062 copy-sequence b │ │ │ +000027e0: 7974 652d 6f70 7469 6d69 7a65 2d70 7265 yte-optimize-pre │ │ │ +000027f0: 6469 6361 7465 5d20 365d 290a 2864 6566 dicate] 6]).(def │ │ │ +00002800: 616c 6961 7320 2762 7974 652d 6f70 7469 alias 'byte-opti │ │ │ +00002810: 6d69 7a65 2d6f 7220 235b 2866 6f72 6d29 mize-or #[(form) │ │ │ +00002820: 2022 c209 73ab 87c3 c2c4 0921 5c22 1109 "..s......!\".. │ │ │ +00002830: 1808 4189 1041 abab 0840 3aab 8708 4040 ..A..A...@:...@@ │ │ │ +00002840: c561 aa8f 0840 39ab 8c08 40c6 61ac 86c7 .a...@9...@.a... │ │ │ +00002850: 0840 21ab 5c5c c409 2111 0840 0973 c2a1 .@!.\\..!..@.s.. │ │ │ +00002860: 8910 aa4f 0941 41ab 85c8 0921 aa83 0941 ...O.AA....!...A │ │ │ +00002870: 4029 8722 205b 7265 7374 2066 6f72 6d20 @)." [rest form │ │ │ +00002880: 6e69 6c20 6465 6c71 2063 6f70 792d 7365 nil delq copy-se │ │ │ +00002890: 7175 656e 6365 2071 756f 7465 2074 206b quence quote t k │ │ │ +000028a0: 6579 776f 7264 7020 6279 7465 2d6f 7074 eywordp byte-opt │ │ │ +000028b0: 696d 697a 652d 7072 6564 6963 6174 655d imize-predicate] │ │ │ +000028c0: 2035 5d29 0a28 6465 6661 6c69 6173 2027 5]).(defalias ' │ │ │ +000028d0: 6279 7465 2d6f 7074 696d 697a 652d 636f byte-optimize-co │ │ │ +000028e0: 6e64 2023 5b28 666f 726d 2920 22c1 0841 nd #[(form) "..A │ │ │ +000028f0: 2187 2220 5b66 6f72 6d20 6279 7465 2d6f !." [form byte-o │ │ │ +00002900: 7074 696d 697a 652d 636f 6e64 2d31 5d20 ptimize-cond-1] │ │ │ +00002910: 325d 290a 2864 6566 616c 6961 7320 2762 2]).(defalias 'b │ │ │ +00002920: 7974 652d 6f70 7469 6d69 7a65 2d63 6f6e yte-optimize-con │ │ │ +00002930: 642d 3120 235b 2863 6c61 7573 6573 2920 d-1 #[(clauses) │ │ │ +00002940: 2208 adbf 0840 3aab b508 4047 c161 ab87 "....@:...@G.a.. │ │ │ +00002950: c208 4040 44aa 9c08 4047 c361 ab8b c408 ..@@D...@G.a.... │ │ │ +00002960: 4040 0840 4140 45aa 8ac4 0840 40c5 0840 @@.@A@E....@@..@ │ │ │ +00002970: 4142 4508 41ad 85c6 0841 2143 a487 c7c8 ABE.A....A!C.... │ │ │ +00002980: 0840 5c22 8722 205b 636c 6175 7365 7320 .@\"." [clauses │ │ │ +00002990: 3120 6f72 2032 2069 6620 7072 6f67 6e20 1 or 2 if progn │ │ │ +000029a0: 6279 7465 2d6f 7074 696d 697a 652d 636f byte-optimize-co │ │ │ +000029b0: 6e64 2d31 2065 7272 6f72 2022 6d61 6c66 nd-1 error "malf │ │ │ +000029c0: 6f72 6d65 6420 636f 6e64 2063 6c61 7573 ormed cond claus │ │ │ +000029d0: 6520 2573 225d 2034 5d29 0a28 6465 6661 e %s"] 4]).(defa │ │ │ +000029e0: 6c69 6173 2027 6279 7465 2d6f 7074 696d lias 'byte-optim │ │ │ +000029f0: 697a 652d 6966 2023 5b28 666f 726d 2920 ize-if #[(form) │ │ │ +00002a00: 2209 4140 8918 3aab 8608 40c2 61aa 8c08 ".A@..:...@.a... │ │ │ +00002a10: 39ab 8a08 c361 ac85 c408 21ab 85c5 0938 9....a....!....8 │ │ │ +00002a20: aae4 08ac 91c6 099b ab87 c7c8 099b 42aa ..............B. │ │ │ +00002a30: d5c8 0938 aad0 c509 38ab 92c8 099b c96b ...8....8......k │ │ │ +00002a40: ab88 ca08 c509 3845 aabc 09aa b9c8 0938 ......8E.......8 │ │ │ +00002a50: ac85 c609 9bab abca 083a ab91 0840 cb73 .........:...@.s │ │ │ +00002a60: ab8b 0847 c555 ab85 0841 40aa 83cc 0844 ...G.U...A@....D │ │ │ +00002a70: c609 9bab 87c7 c809 9b42 aa83 c809 3845 .........B....8E │ │ │ +00002a80: aa84 c708 cd45 2987 2220 5b63 6c61 7573 .....E)." [claus │ │ │ +00002a90: 6520 666f 726d 2071 756f 7465 2074 206b e form quote t k │ │ │ +00002aa0: 6579 776f 7264 7020 3220 3420 7072 6f67 eywordp 2 4 prog │ │ │ +00002ab0: 6e20 3320 286e 696c 2920 6966 2028 6e6f n 3 (nil) if (no │ │ │ +00002ac0: 7420 6e75 6c6c 2920 6e6f 7420 6e69 6c5d t null) not nil] │ │ │ +00002ad0: 2036 5d29 0a28 6465 6661 6c69 6173 2027 6]).(defalias ' │ │ │ +00002ae0: 6279 7465 2d6f 7074 696d 697a 652d 7768 byte-optimize-wh │ │ │ +00002af0: 696c 6520 235b 2866 6f72 6d29 2022 0841 ile #[(form) ".A │ │ │ +00002b00: 40ad 8108 8722 205b 666f 726d 5d20 315d @...." [form] 1] │ │ │ +00002b10: 290a 2862 7974 652d 636f 6465 2022 c0c1 ).(byte-code ".. │ │ │ +00002b20: c2c3 2388 c0c4 c2c5 2388 c0c6 c2c7 2388 ..#.....#.....#. │ │ │ +00002b30: c0c8 c2c9 2388 c0ca c2cb 2388 c0cc c2cd ....#.....#..... │ │ │ +00002b40: 2387 2220 5b70 7574 2061 6e64 2062 7974 #." [put and byt │ │ │ +00002b50: 652d 6f70 7469 6d69 7a65 7220 6279 7465 e-optimizer byte │ │ │ +00002b60: 2d6f 7074 696d 697a 652d 616e 6420 6f72 -optimize-and or │ │ │ +00002b70: 2062 7974 652d 6f70 7469 6d69 7a65 2d6f byte-optimize-o │ │ │ +00002b80: 7220 636f 6e64 2062 7974 652d 6f70 7469 r cond byte-opti │ │ │ +00002b90: 6d69 7a65 2d63 6f6e 6420 6966 2062 7974 mize-cond if byt │ │ │ +00002ba0: 652d 6f70 7469 6d69 7a65 2d69 6620 7768 e-optimize-if wh │ │ │ +00002bb0: 696c 6520 6279 7465 2d6f 7074 696d 697a ile byte-optimiz │ │ │ +00002bc0: 652d 7768 696c 6520 6368 6172 2d62 6566 e-while char-bef │ │ │ +00002bd0: 6f72 6520 6279 7465 2d6f 7074 696d 697a ore byte-optimiz │ │ │ +00002be0: 652d 6368 6172 2d62 6566 6f72 655d 2034 e-char-before] 4 │ │ │ +00002bf0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ +00002c00: 652d 6f70 7469 6d69 7a65 2d63 6861 722d e-optimize-char- │ │ │ +00002c10: 6265 666f 7265 2023 5b28 666f 726d 2920 before #[(form) │ │ │ +00002c20: 22c1 0841 40ac 83c2 aa93 0841 40c3 6bab "..A@......A@.k. │ │ │ +00002c30: 83c4 aa89 c5c6 0841 40c7 4242 4408 4141 .......A@.BBD.AA │ │ │ +00002c40: 4242 8722 205b 666f 726d 2063 6861 722d BB." [form char- │ │ │ +00002c50: 6166 7465 7220 2831 2d20 2870 6f69 6e74 after (1- (point │ │ │ +00002c60: 2929 2028 706f 696e 7429 2028 312d 2028 )) (point) (1- ( │ │ │ +00002c70: 706f 696e 7429 2920 312d 206f 7220 2828 point)) 1- or (( │ │ │ +00002c80: 706f 696e 7429 295d 2035 5d29 0a28 7075 point))] 5]).(pu │ │ │ +00002c90: 7420 2762 6163 6b77 6172 642d 6368 6172 t 'backward-char │ │ │ +00002ca0: 2027 6279 7465 2d6f 7074 696d 697a 6572 'byte-optimizer │ │ │ +00002cb0: 2027 6279 7465 2d6f 7074 696d 697a 652d 'byte-optimize- │ │ │ +00002cc0: 6261 636b 7761 7264 2d63 6861 7229 0a28 backward-char).( │ │ │ +00002cd0: 6465 6661 6c69 6173 2027 6279 7465 2d6f defalias 'byte-o │ │ │ +00002ce0: 7074 696d 697a 652d 6261 636b 7761 7264 ptimize-backward │ │ │ +00002cf0: 2d63 6861 7220 235b 2866 6f72 6d29 2022 -char #[(form) " │ │ │ +00002d00: c108 4140 ac83 c2aa 9508 4140 a8ab 8608 ..A@......A@.... │ │ │ +00002d10: 4140 5baa 89c3 c408 4140 c542 4244 0841 A@[.....A@.BBD.A │ │ │ +00002d20: 4142 4287 2220 5b66 6f72 6d20 666f 7277 ABB." [form forw │ │ │ +00002d30: 6172 642d 6368 6172 202d 3120 2d20 6f72 ard-char -1 - or │ │ │ +00002d40: 2028 3129 5d20 355d 290a 2870 7574 2027 (1)] 5]).(put ' │ │ │ +00002d50: 6261 636b 7761 7264 2d77 6f72 6420 2762 backward-word 'b │ │ │ +00002d60: 7974 652d 6f70 7469 6d69 7a65 7220 2762 yte-optimizer 'b │ │ │ +00002d70: 7974 652d 6f70 7469 6d69 7a65 2d62 6163 yte-optimize-bac │ │ │ +00002d80: 6b77 6172 642d 776f 7264 290a 2864 6566 kward-word).(def │ │ │ +00002d90: 616c 6961 7320 2762 7974 652d 6f70 7469 alias 'byte-opti │ │ │ +00002da0: 6d69 7a65 2d62 6163 6b77 6172 642d 776f mize-backward-wo │ │ │ +00002db0: 7264 2023 5b28 666f 726d 2920 22c1 0841 rd #[(form) "..A │ │ │ +00002dc0: 40ac 83c2 aa95 0841 40a8 ab86 0841 405b @......A@....A@[ │ │ │ +00002dd0: aa89 c3c4 0841 40c5 4242 4408 4141 4242 .....A@.BBD.AABB │ │ │ +00002de0: 8722 205b 666f 726d 2066 6f72 7761 7264 ." [form forward │ │ │ +00002df0: 2d77 6f72 6420 2d31 202d 206f 7220 2831 -word -1 - or (1 │ │ │ +00002e00: 295d 2035 5d29 0a28 6279 7465 2d63 6f64 )] 5]).(byte-cod │ │ │ +00002e10: 6520 22c0 c1c2 c323 88c0 c4c2 c323 8722 e "....#.....#." │ │ │ +00002e20: 205b 7075 7420 6174 6f6d 2062 7974 652d [put atom byte- │ │ │ +00002e30: 6f70 7469 6d69 7a65 7220 6279 7465 2d63 optimizer byte-c │ │ │ +00002e40: 6f6d 7069 6c65 2d6e 6567 6174 696f 6e2d ompile-negation- │ │ │ +00002e50: 6f70 7469 6d69 7a65 7220 6e6c 6973 7470 optimizer nlistp │ │ │ +00002e60: 5d20 3429 0a28 6465 6661 6c69 6173 2027 ] 4).(defalias ' │ │ │ +00002e70: 6279 7465 2d6f 7074 696d 697a 652d 6675 byte-optimize-fu │ │ │ +00002e80: 6e63 616c 6c20 235b 2866 6f72 6d29 2022 ncall #[(form) " │ │ │ +00002e90: 0941 4089 18a2 c273 ab89 0841 4009 4141 .A@....s...A@.AA │ │ │ +00002ea0: 42aa 8109 2987 2220 5b66 6e20 666f 726d B...)." [fn form │ │ │ +00002eb0: 2027 6675 6e63 7469 6f6e 5d20 335d 290a 'function] 3]). │ │ │ +00002ec0: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +00002ed0: 6f70 7469 6d69 7a65 2d61 7070 6c79 2023 optimize-apply # │ │ │ +00002ee0: 5b28 666f 726d 2920 225c 6e41 405c 6e47 [(form) "\nA@\nG │ │ │ +00002ef0: 535c 6e38 1b19 0bab 860b a2c4 61ab a70b S\n8........a... │ │ │ +00002f00: 4140 3cab 97c5 5c6e 4141 2141 9f18 c609 A@<...\nAA!A.... │ │ │ +00002f10: 4408 a4c7 c80b 4140 5c22 a429 aa88 c9ca D.....A@\".).... │ │ │ +00002f20: cb0b 215c 2288 ccae 815c 6e2a 8722 205b ..!\"....\n*." [ │ │ │ +00002f30: 6275 746c 6173 7420 666e 2066 6f72 6d20 butlast fn form │ │ │ +00002f40: 6c61 7374 2071 756f 7465 2072 6576 6572 last quote rever │ │ │ +00002f50: 7365 2066 756e 6361 6c6c 206d 6170 6361 se funcall mapca │ │ │ +00002f60: 7220 235b 2878 2920 22c1 0844 8722 205b r #[(x) "..D." [ │ │ │ +00002f70: 7820 7175 6f74 655d 2032 5d20 6279 7465 x quote] 2] byte │ │ │ +00002f80: 2d63 6f6d 7069 6c65 2d77 6172 6e20 226c -compile-warn "l │ │ │ +00002f90: 6173 7420 6172 6720 746f 2061 7070 6c79 ast arg to apply │ │ │ +00002fa0: 2063 616e 2774 2062 6520 6120 6c69 7465 can't be a lite │ │ │ +00002fb0: 7261 6c20 6174 6f6d 3a20 2573 2220 7072 ral atom: %s" pr │ │ │ +00002fc0: 696e 312d 746f 2d73 7472 696e 6720 6e69 in1-to-string ni │ │ │ +00002fd0: 6c5d 2034 5d29 0a28 6279 7465 2d63 6f64 l] 4]).(byte-cod │ │ │ +00002fe0: 6520 22c0 c1c2 c323 88c0 c4c2 c523 88c0 e "....#.....#.. │ │ │ +00002ff0: c6c2 c723 88c0 c8c2 c723 8722 205b 7075 ...#.....#." [pu │ │ │ +00003000: 7420 6675 6e63 616c 6c20 6279 7465 2d6f t funcall byte-o │ │ │ +00003010: 7074 696d 697a 6572 2062 7974 652d 6f70 ptimizer byte-op │ │ │ +00003020: 7469 6d69 7a65 2d66 756e 6361 6c6c 2061 timize-funcall a │ │ │ +00003030: 7070 6c79 2062 7974 652d 6f70 7469 6d69 pply byte-optimi │ │ │ +00003040: 7a65 2d61 7070 6c79 206c 6574 2062 7974 ze-apply let byt │ │ │ +00003050: 652d 6f70 7469 6d69 7a65 2d6c 6574 5820 e-optimize-letX │ │ │ +00003060: 6c65 742a 5d20 3429 0a28 6465 6661 6c69 let*] 4).(defali │ │ │ +00003070: 6173 2027 6279 7465 2d6f 7074 696d 697a as 'byte-optimiz │ │ │ +00003080: 652d 6c65 7458 2023 5b28 666f 726d 2920 e-letX #[(form) │ │ │ +00003090: 2209 4140 ac86 c209 4141 4287 c309 38ac ".A@....AAB...8. │ │ │ +000030a0: 85c4 099b ab82 0987 0940 c561 ab8e c6c7 .........@.a.... │ │ │ +000030b0: c8c9 c8ca 0941 405c 225c 22cb 2387 cc09 .....A@\"\".#... │ │ │ +000030c0: 4140 2118 cdcc 0841 2108 4041 40ce 4629 A@!....A!.@A@.F) │ │ │ +000030d0: 8722 205b 6269 6e64 7320 666f 726d 2070 ." [binds form p │ │ │ +000030e0: 726f 676e 2032 2033 206c 6574 2061 7070 rogn 2 3 let app │ │ │ +000030f0: 656e 6420 2870 726f 676e 2920 6d61 7063 end (progn) mapc │ │ │ +00003100: 6172 2063 6172 2d73 6166 6520 6364 722d ar car-safe cdr- │ │ │ +00003110: 7361 6665 2028 6e69 6c29 2072 6576 6572 safe (nil) rever │ │ │ +00003120: 7365 206c 6574 2a20 6e69 6c5d 2037 5d29 se let* nil] 7]) │ │ │ +00003130: 0a28 7075 7420 276e 7468 2027 6279 7465 .(put 'nth 'byte │ │ │ +00003140: 2d6f 7074 696d 697a 6572 2027 6279 7465 -optimizer 'byte │ │ │ +00003150: 2d6f 7074 696d 697a 652d 6e74 6829 0a28 -optimize-nth).( │ │ │ +00003160: 6465 6661 6c69 6173 2027 6279 7465 2d6f defalias 'byte-o │ │ │ +00003170: 7074 696d 697a 652d 6e74 6820 235b 2866 ptimize-nth #[(f │ │ │ +00003180: 6f72 6d29 2022 c108 21c2 55ab 9b08 4140 orm) "..!.U...A@ │ │ │ +00003190: c373 ab94 c408 4140 c555 ab85 c608 38aa .s....A@.U....8. │ │ │ +000031a0: 85c7 c608 3844 4487 c808 2187 2220 5b66 ....8DD...!." [f │ │ │ +000031b0: 6f72 6d20 7361 6665 2d6c 656e 6774 6820 orm safe-length │ │ │ +000031c0: 3320 2830 2031 2920 6361 7220 3020 3220 3 (0 1) car 0 2 │ │ │ +000031d0: 6364 7220 6279 7465 2d6f 7074 696d 697a cdr byte-optimiz │ │ │ +000031e0: 652d 7072 6564 6963 6174 655d 2034 5d29 e-predicate] 4]) │ │ │ +000031f0: 0a28 7075 7420 276e 7468 6364 7220 2762 .(put 'nthcdr 'b │ │ │ +00003200: 7974 652d 6f70 7469 6d69 7a65 7220 2762 yte-optimizer 'b │ │ │ +00003210: 7974 652d 6f70 7469 6d69 7a65 2d6e 7468 yte-optimize-nth │ │ │ +00003220: 6364 7229 0a28 6465 6661 6c69 6173 2027 cdr).(defalias ' │ │ │ +00003230: 6279 7465 2d6f 7074 696d 697a 652d 6e74 byte-optimize-nt │ │ │ +00003240: 6863 6472 2023 5b28 666f 726d 2920 22c2 hcdr #[(form) ". │ │ │ +00003250: 0921 c355 ab8b 0941 40c4 73ac 84c5 0921 .!.U...A@.s....! │ │ │ +00003260: 8709 4140 18c6 0938 1108 5389 10c7 59ab ..A@...8..S...Y. │ │ │ +00003270: 86c8 0944 11aa 7209 2987 2220 5b63 6f75 ...D..r.)." [cou │ │ │ +00003280: 6e74 2066 6f72 6d20 7361 6665 2d6c 656e nt form safe-len │ │ │ +00003290: 6774 6820 3320 2830 2031 2032 2920 6279 gth 3 (0 1 2) by │ │ │ +000032a0: 7465 2d6f 7074 696d 697a 652d 7072 6564 te-optimize-pred │ │ │ +000032b0: 6963 6174 6520 3220 3020 6364 725d 2032 icate 2 0 cdr] 2 │ │ │ +000032c0: 5d29 0a28 7075 7420 2763 6f6e 6361 7420 ]).(put 'concat │ │ │ +000032d0: 2762 7974 652d 6f70 7469 6d69 7a65 7220 'byte-optimizer │ │ │ +000032e0: 2762 7974 652d 6f70 7469 6d69 7a65 2d63 'byte-optimize-c │ │ │ +000032f0: 6f6e 6361 7429 0a28 6465 6661 6c69 6173 oncat).(defalias │ │ │ +00003300: 2027 6279 7465 2d6f 7074 696d 697a 652d 'byte-optimize- │ │ │ +00003310: 636f 6e63 6174 2023 5b28 666f 726d 2920 concat #[(form) │ │ │ +00003320: 2208 41c3 1989 1aab ab09 aba8 5c6e 403a ".A.........\n@: │ │ │ +00003330: ab87 5c6e 4040 c461 aa92 5c6e 4039 ab8c ..\n@@.a..\n@9.. │ │ │ +00003340: c55c 6e40 21ac 8b5c 6e40 c673 aa81 c3ac .\n@!..\n@.s.... │ │ │ +00003350: 82c7 115c 6e41 8912 ac55 09ab 85c8 0821 ...\nA...U.....! │ │ │ +00003360: aa81 082a 8722 205b 666f 726d 2063 6f6e ...*." [form con │ │ │ +00003370: 7374 616e 7420 6172 6773 2074 2071 756f stant args t quo │ │ │ +00003380: 7465 206b 6579 776f 7264 7020 286e 696c te keywordp (nil │ │ │ +00003390: 2074 2920 6e69 6c20 6576 616c 5d20 335d t) nil eval] 3] │ │ │ +000033a0: 290a 2862 7974 652d 636f 6465 2022 c5c6 ).(byte-code ".. │ │ │ +000033b0: 1989 18c7 1c89 1bab 8f0b 4014 c80c c9ca ..........@..... │ │ │ +000033c0: 2388 0b41 8913 ac71 2a09 c71c 891a ab8f #..A...q*....... │ │ │ +000033d0: 5c6e 4014 c80c c9cb 2388 5c6e 4189 12ac \n@.....#.\nA... │ │ │ +000033e0: 712c c787 2220 5b73 6964 652d 6566 6665 q,.." [side-effe │ │ │ +000033f0: 6374 2d66 7265 652d 666e 7320 7369 6465 ct-free-fns side │ │ │ +00003400: 2d65 6666 6563 742d 616e 642d 6572 726f -effect-and-erro │ │ │ +00003410: 722d 6672 6565 2d66 6e73 2023 313d 233a r-free-fns #1=#: │ │ │ +00003420: 2d2d 646f 6c69 7374 2d74 656d 702d 2d33 --dolist-temp--3 │ │ │ +00003430: 3539 3239 2023 323d 233a 2d2d 646f 6c69 5929 #2=#:--doli │ │ │ +00003440: 7374 2d74 656d 702d 2d33 3539 3238 2066 st-temp--35928 f │ │ │ +00003450: 6e20 2825 202a 202b 202d 202f 202f 3d20 n (% * + - / /= │ │ │ +00003460: 312b 2031 2d20 3c20 3c3d 203d 203e 203e 1+ 1- < <= = > > │ │ │ +00003470: 3d20 6162 7320 6163 6f73 2061 7070 656e = abs acos appen │ │ │ +00003480: 6420 6172 6566 2061 7368 2061 7369 6e20 d aref ash asin │ │ │ +00003490: 6174 616e 2061 7373 6f63 2061 7373 7120 atan assoc assq │ │ │ +000034a0: 626f 756e 6470 2062 7566 6665 722d 6669 boundp buffer-fi │ │ │ +000034b0: 6c65 2d6e 616d 6520 6275 6666 6572 2d6c le-name buffer-l │ │ │ +000034c0: 6f63 616c 2d76 6172 6961 626c 6573 2062 ocal-variables b │ │ │ +000034d0: 7566 6665 722d 6d6f 6469 6669 6564 2d70 uffer-modified-p │ │ │ +000034e0: 2062 7566 6665 722d 7375 6273 7472 696e buffer-substrin │ │ │ +000034f0: 6720 6361 7069 7461 6c69 7a65 2063 6172 g capitalize car │ │ │ +00003500: 2d6c 6573 732d 7468 616e 2d63 6172 2063 -less-than-car c │ │ │ +00003510: 6172 2063 6472 2063 6569 6c69 6e67 2063 ar cdr ceiling c │ │ │ +00003520: 6f6e 6361 7420 636f 7079 2d6d 6172 6b65 oncat copy-marke │ │ │ +00003530: 7220 636f 7320 636f 756e 742d 6c69 6e65 r cos count-line │ │ │ +00003540: 7320 6465 6661 756c 742d 626f 756e 6470 s default-boundp │ │ │ +00003550: 2064 6566 6175 6c74 2d76 616c 7565 2064 default-value d │ │ │ +00003560: 6f63 756d 656e 7461 7469 6f6e 2064 6f77 ocumentation dow │ │ │ +00003570: 6e63 6173 6520 656c 7420 6578 7020 6578 ncase elt exp ex │ │ │ +00003580: 7074 2066 626f 756e 6470 2066 6561 7475 pt fboundp featu │ │ │ +00003590: 7265 7020 6669 6c65 2d64 6972 6563 746f rep file-directo │ │ │ +000035a0: 7279 2d70 2066 696c 652d 6578 6973 7473 ry-p file-exists │ │ │ +000035b0: 2d70 2066 696c 652d 6c6f 636b 6564 2d70 -p file-locked-p │ │ │ +000035c0: 2066 696c 652d 6e61 6d65 2d61 6273 6f6c file-name-absol │ │ │ +000035d0: 7574 652d 7020 6669 6c65 2d6e 6577 6572 ute-p file-newer │ │ │ +000035e0: 2d74 6861 6e2d 6669 6c65 2d70 2066 696c -than-file-p fil │ │ │ +000035f0: 652d 7265 6164 6162 6c65 2d70 2066 696c e-readable-p fil │ │ │ +00003600: 652d 7379 6d6c 696e 6b2d 7020 6669 6c65 e-symlink-p file │ │ │ +00003610: 2d77 7269 7461 626c 652d 7020 666c 6f61 -writable-p floa │ │ │ +00003620: 7420 666c 6f6f 7220 666f 726d 6174 2067 t floor format g │ │ │ +00003630: 6574 2067 6574 2d62 7566 6665 7220 6765 et get-buffer ge │ │ │ +00003640: 742d 6275 6666 6572 2d77 696e 646f 7720 t-buffer-window │ │ │ +00003650: 6765 7465 6e76 2067 6574 2d66 696c 652d getenv get-file- │ │ │ +00003660: 6275 6666 6572 206d 616b 652d 6861 7368 buffer make-hash │ │ │ +00003670: 2d74 6162 6c65 2063 6f70 792d 6861 7368 -table copy-hash │ │ │ +00003680: 2d74 6162 6c65 2067 6574 6861 7368 2068 -table gethash h │ │ │ +00003690: 6173 682d 7461 626c 652d 636f 756e 7420 ash-table-count │ │ │ +000036a0: 6861 7368 2d74 6162 6c65 2d72 6568 6173 hash-table-rehas │ │ │ +000036b0: 682d 7369 7a65 2068 6173 682d 7461 626c h-size hash-tabl │ │ │ +000036c0: 652d 7265 6861 7368 2d74 6872 6573 686f e-rehash-thresho │ │ │ +000036d0: 6c64 2068 6173 682d 7461 626c 652d 7369 ld hash-table-si │ │ │ +000036e0: 7a65 2068 6173 682d 7461 626c 652d 7465 ze hash-table-te │ │ │ +000036f0: 7374 2068 6173 682d 7461 626c 652d 7479 st hash-table-ty │ │ │ +00003700: 7065 2069 6e74 2d74 6f2d 7374 7269 6e67 pe int-to-string │ │ │ +00003710: 206c 656e 6774 6820 6c6f 6720 6c6f 6731 length log log1 │ │ │ +00003720: 3020 6c6f 6761 6e64 206c 6f67 6220 6c6f 0 logand logb lo │ │ │ +00003730: 6769 6f72 206c 6f67 6e6f 7420 6c6f 6778 gior lognot logx │ │ │ +00003740: 6f72 206c 7368 206d 6172 6b65 722d 6275 or lsh marker-bu │ │ │ +00003750: 6666 6572 206d 6178 206d 656d 6265 7220 ffer max member │ │ │ +00003760: 6d65 6d71 206d 696e 206d 6f64 206e 6578 memq min mod nex │ │ │ +00003770: 742d 7769 6e64 6f77 206e 7468 206e 7468 t-window nth nth │ │ │ +00003780: 6364 7220 6e75 6d62 6572 2d74 6f2d 7374 cdr number-to-st │ │ │ +00003790: 7269 6e67 2070 6172 7365 2d63 6f6c 6f6e ring parse-colon │ │ │ +000037a0: 2d70 6174 6820 706c 6973 742d 6765 7420 -path plist-get │ │ │ +000037b0: 7072 6576 696f 7573 2d77 696e 646f 7720 previous-window │ │ │ +000037c0: 7261 6469 616e 732d 746f 2d64 6567 7265 radians-to-degre │ │ │ +000037d0: 6573 2072 6173 7371 2072 6567 6578 702d es rassq regexp- │ │ │ +000037e0: 7175 6f74 6520 7265 7665 7273 6520 726f quote reverse ro │ │ │ +000037f0: 756e 6420 7369 6e20 7371 7274 2073 7472 und sin sqrt str │ │ │ +00003800: 696e 673c 2073 7472 696e 673d 2073 7472 ing< string= str │ │ │ +00003810: 696e 672d 6571 7561 6c20 7374 7269 6e67 ing-equal string │ │ │ +00003820: 2d6c 6573 7370 2073 7472 696e 672d 746f -lessp string-to │ │ │ +00003830: 2d63 6861 7220 7374 7269 6e67 2d74 6f2d -char string-to- │ │ │ +00003840: 696e 7420 7374 7269 6e67 2d74 6f2d 6e75 int string-to-nu │ │ │ +00003850: 6d62 6572 2073 7562 7374 7269 6e67 2073 mber substring s │ │ │ +00003860: 796d 626f 6c2d 706c 6973 7420 7461 6e20 ymbol-plist tan │ │ │ +00003870: 7570 6361 7365 2075 7365 722d 7661 7269 upcase user-vari │ │ │ +00003880: 6162 6c65 2d70 2076 636f 6e63 6174 2077 able-p vconcat w │ │ │ +00003890: 696e 646f 772d 6275 6666 6572 2077 696e indow-buffer win │ │ │ +000038a0: 646f 772d 6465 6469 6361 7465 642d 7020 dow-dedicated-p │ │ │ +000038b0: 7769 6e64 6f77 2d70 6978 656c 2d65 6467 window-pixel-edg │ │ │ +000038c0: 6573 2077 696e 646f 772d 6865 6967 6874 es window-height │ │ │ +000038d0: 2077 696e 646f 772d 6873 6372 6f6c 6c20 window-hscroll │ │ │ +000038e0: 7769 6e64 6f77 2d6d 696e 6962 7566 6665 window-minibuffe │ │ │ +000038f0: 722d 7020 7769 6e64 6f77 2d77 6964 7468 r-p window-width │ │ │ +00003900: 207a 6572 6f70 206f 6464 7020 6576 656e zerop oddp even │ │ │ +00003910: 7020 706c 7573 7020 6d69 6e75 7370 2061 p plusp minusp a │ │ │ +00003920: 6273 2065 7870 7420 7369 676e 756d 206c bs expt signum l │ │ │ +00003930: 6173 7420 6275 746c 6173 7420 6c64 6966 ast butlast ldif │ │ │ +00003940: 6620 7061 6972 6c69 7320 6763 6420 6c63 f pairlis gcd lc │ │ │ +00003950: 6d20 6973 7172 7420 666c 6f6f 722a 2063 m isqrt floor* c │ │ │ +00003960: 6569 6c69 6e67 2a20 7472 756e 6361 7465 eiling* truncate │ │ │ +00003970: 2a20 726f 756e 642a 206d 6f64 2a20 7265 * round* mod* re │ │ │ +00003980: 6d2a 2073 7562 7365 7120 6c69 7374 2d6c m* subseq list-l │ │ │ +00003990: 656e 6774 6820 6765 7466 2920 2861 7272 ength getf) (arr │ │ │ +000039a0: 6179 7020 6174 6f6d 2062 6f62 7020 626f ayp atom bobp bo │ │ │ +000039b0: 6c70 2062 7566 6665 722d 656e 6420 6275 lp buffer-end bu │ │ │ +000039c0: 6666 6572 2d6c 6973 7420 6275 6666 6572 ffer-list buffer │ │ │ +000039d0: 2d73 697a 6520 6275 6666 6572 2d73 7472 -size buffer-str │ │ │ +000039e0: 696e 6720 6275 6666 6572 7020 6361 722d ing bufferp car- │ │ │ +000039f0: 7361 6665 2063 6173 652d 7461 626c 652d safe case-table- │ │ │ +00003a00: 7020 6364 722d 7361 6665 2063 6861 722d p cdr-safe char- │ │ │ +00003a10: 6f72 2d73 7472 696e 672d 7020 6368 6172 or-string-p char │ │ │ +00003a20: 2d74 6162 6c65 2d70 2063 6861 7261 6374 -table-p charact │ │ │ +00003a30: 6572 7020 636f 6d6d 616e 6470 2063 6f6e erp commandp con │ │ │ +00003a40: 7320 636f 6e73 6f6c 6570 2063 6f6e 736f s consolep conso │ │ │ +00003a50: 6c65 2d6c 6976 652d 7020 636f 6e73 7020 le-live-p consp │ │ │ +00003a60: 6375 7272 656e 742d 6275 6666 6572 2064 current-buffer d │ │ │ +00003a70: 6576 6963 6570 2064 6576 6963 652d 6c69 evicep device-li │ │ │ +00003a80: 7665 2d70 2064 6f74 2064 6f74 2d6d 6172 ve-p dot dot-mar │ │ │ +00003a90: 6b65 7220 656f 6270 2065 6f6c 7020 6571 ker eobp eolp eq │ │ │ +00003aa0: 2065 716c 2065 7175 616c 2065 7665 6e74 eql equal event │ │ │ +00003ab0: 7020 6578 7465 6e74 7020 6578 7465 6e74 p extentp extent │ │ │ +00003ac0: 2d6c 6976 652d 7020 666c 6f61 7470 2066 -live-p floatp f │ │ │ +00003ad0: 7261 6d65 7020 6672 616d 652d 6c69 7665 ramep frame-live │ │ │ +00003ae0: 2d70 2067 6574 2d6c 6172 6765 7374 2d77 -p get-largest-w │ │ │ +00003af0: 696e 646f 7720 6765 742d 6c72 752d 7769 indow get-lru-wi │ │ │ +00003b00: 6e64 6f77 2068 6173 682d 7461 626c 652d ndow hash-table- │ │ │ +00003b10: 7020 6964 656e 7469 7479 2069 676e 6f72 p identity ignor │ │ │ +00003b20: 6520 696e 7465 6765 7270 2069 6e74 6567 e integerp integ │ │ │ +00003b30: 6572 2d6f 722d 6d61 726b 6572 2d70 2069 er-or-marker-p i │ │ │ +00003b40: 6e74 6572 6163 7469 7665 2d70 2069 6e76 nteractive-p inv │ │ │ +00003b50: 6f63 6174 696f 6e2d 6469 7265 6374 6f72 ocation-director │ │ │ +00003b60: 7920 696e 766f 6361 7469 6f6e 2d6e 616d y invocation-nam │ │ │ +00003b70: 6520 6b65 796d 6170 7020 6c69 7374 206c e keymapp list l │ │ │ +00003b80: 6973 7470 206d 616b 652d 6d61 726b 6572 istp make-marker │ │ │ +00003b90: 206d 6172 6b20 6d61 726b 2d6d 6172 6b65 mark mark-marke │ │ │ +00003ba0: 7220 6d61 726b 6572 7020 6d65 6d6f 7279 r markerp memory │ │ │ +00003bb0: 2d6c 696d 6974 206d 696e 6962 7566 6665 -limit minibuffe │ │ │ +00003bc0: 722d 7769 6e64 6f77 206e 6174 6e75 6d70 r-window natnump │ │ │ +00003bd0: 206e 6c69 7374 7020 6e6f 7420 6e75 6c6c nlistp not null │ │ │ +00003be0: 206e 756d 6265 722d 6f72 2d6d 6172 6b65 number-or-marke │ │ │ +00003bf0: 722d 7020 6e75 6d62 6572 7020 6f6e 652d r-p numberp one- │ │ │ +00003c00: 7769 6e64 6f77 2d70 2070 6f69 6e74 2070 window-p point p │ │ │ +00003c10: 6f69 6e74 2d6d 6172 6b65 7220 706f 696e oint-marker poin │ │ │ +00003c20: 742d 6d69 6e20 706f 696e 742d 6d61 7820 t-min point-max │ │ │ +00003c30: 7072 6f63 6573 7370 2072 616e 6765 2d74 processp range-t │ │ │ +00003c40: 6162 6c65 2d70 2073 656c 6563 7465 642d able-p selected- │ │ │ +00003c50: 7769 6e64 6f77 2073 6571 7565 6e63 6570 window sequencep │ │ │ +00003c60: 2073 7472 696e 6770 2073 7562 7270 2073 stringp subrp s │ │ │ +00003c70: 796d 626f 6c70 2073 796e 7461 782d 7461 ymbolp syntax-ta │ │ │ +00003c80: 626c 652d 7020 7573 6572 2d66 756c 6c2d ble-p user-full- │ │ │ +00003c90: 6e61 6d65 2075 7365 722d 6c6f 6769 6e2d name user-login- │ │ │ +00003ca0: 6e61 6d65 2075 7365 722d 6f72 6967 696e name user-origin │ │ │ +00003cb0: 616c 2d6c 6f67 696e 2d6e 616d 6520 7573 al-login-name us │ │ │ +00003cc0: 6572 2d72 6561 6c2d 6c6f 6769 6e2d 6e61 er-real-login-na │ │ │ +00003cd0: 6d65 2075 7365 722d 7265 616c 2d75 6964 me user-real-uid │ │ │ +00003ce0: 2075 7365 722d 7569 6420 7665 6374 6f72 user-uid vector │ │ │ +00003cf0: 2076 6563 746f 7270 2077 696e 646f 772d vectorp window- │ │ │ +00003d00: 636f 6e66 6967 7572 6174 696f 6e2d 7020 configuration-p │ │ │ +00003d10: 7769 6e64 6f77 2d6c 6976 652d 7020 7769 window-live-p wi │ │ │ +00003d20: 6e64 6f77 7020 6571 6c20 666c 6f61 7470 ndowp eql floatp │ │ │ +00003d30: 2d73 6166 6520 6c69 7374 2a20 7375 6273 -safe list* subs │ │ │ +00003d40: 7420 6163 6f6e 7320 6571 7561 6c70 2072 t acons equalp r │ │ │ +00003d50: 616e 646f 6d2d 7374 6174 652d 7020 636f andom-state-p co │ │ │ +00003d60: 7079 2d74 7265 6520 7375 626c 6973 2920 py-tree sublis) │ │ │ +00003d70: 6e69 6c20 7075 7420 7369 6465 2d65 6666 nil put side-eff │ │ │ +00003d80: 6563 742d 6672 6565 2074 2065 7272 6f72 ect-free t error │ │ │ +00003d90: 2d66 7265 655d 2036 290a 2864 6566 616c -free] 6).(defal │ │ │ +00003da0: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00003db0: 652d 7370 6c69 6365 2d69 6e2d 616c 7265 e-splice-in-alre │ │ │ +00003dc0: 6164 792d 636f 6d70 696c 6564 2d63 6f64 ady-compiled-cod │ │ │ +00003dd0: 6520 235b 2866 6f72 6d29 2022 08c4 73ac e #[(form) "..s. │ │ │ +00003de0: 84c5 0b21 87c6 c70b 4140 c80b 38c9 2321 ...!....A@..8.#! │ │ │ +00003df0: 885c 6eca 0b38 5c5c 095d 115c 6e54 8912 .\n..8\\.].\nT.. │ │ │ +00003e00: 8722 205b 6279 7465 2d6f 7074 696d 697a ." [byte-optimiz │ │ │ +00003e10: 6520 6279 7465 2d63 6f6d 7069 6c65 2d6d e byte-compile-m │ │ │ +00003e20: 6178 6465 7074 6820 6279 7465 2d63 6f6d axdepth byte-com │ │ │ +00003e30: 7069 6c65 2d64 6570 7468 2066 6f72 6d20 pile-depth form │ │ │ +00003e40: 2874 2062 7974 6529 2062 7974 652d 636f (t byte) byte-co │ │ │ +00003e50: 6d70 696c 652d 6e6f 726d 616c 2d63 616c mpile-normal-cal │ │ │ +00003e60: 6c20 6279 7465 2d69 6e6c 696e 652d 6c61 l byte-inline-la │ │ │ +00003e70: 7063 6f64 6520 6279 7465 2d64 6563 6f6d pcode byte-decom │ │ │ +00003e80: 7069 6c65 2d62 7974 6563 6f64 652d 3120 pile-bytecode-1 │ │ │ +00003e90: 3220 7420 335d 2035 5d29 0a28 6279 7465 2 t 3] 5]).(byte │ │ │ +00003ea0: 2d63 6f64 6520 22c2 c3c4 c523 88c0 0942 -code "....#...B │ │ │ +00003eb0: 11c6 10c2 8722 205b 6279 7465 2d63 6f6e ....." [byte-con │ │ │ +00003ec0: 7374 7265 662d 6f70 7320 6375 7272 656e stref-ops curren │ │ │ +00003ed0: 742d 6c6f 6164 2d6c 6973 7420 7075 7420 t-load-list put │ │ │ +00003ee0: 6279 7465 2d63 6f64 6520 6279 7465 2d63 byte-code byte-c │ │ │ +00003ef0: 6f6d 7069 6c65 2062 7974 652d 636f 6d70 ompile byte-comp │ │ │ +00003f00: 696c 652d 7370 6c69 6365 2d69 6e2d 616c ile-splice-in-al │ │ │ +00003f10: 7265 6164 792d 636f 6d70 696c 6564 2d63 ready-compiled-c │ │ │ +00003f20: 6f64 6520 2862 7974 652d 636f 6e73 7461 ode (byte-consta │ │ │ +00003f30: 6e74 2062 7974 652d 636f 6e73 7461 6e74 nt byte-constant │ │ │ +00003f40: 3220 6279 7465 2d76 6172 7265 6620 6279 2 byte-varref by │ │ │ +00003f50: 7465 2d76 6172 7365 7420 6279 7465 2d76 te-varset byte-v │ │ │ +00003f60: 6172 6269 6e64 295d 2034 290a 2340 3138 arbind)] 4).#@18 │ │ │ +00003f70: 2044 6f6e 2774 2063 616c 6c20 7468 6973 Don't call this │ │ │ +00003f80: 211f 0a28 6465 6661 6c69 6173 2027 6469 !..(defalias 'di │ │ │ +00003f90: 7361 7373 656d 626c 652d 6f66 6673 6574 sassemble-offset │ │ │ +00003fa0: 2023 5b6e 696c 2022 0c08 57ab b3c6 0cc7 #[nil "..W..... │ │ │ +00003fb0: 5c22 1ac6 0cc8 5c22 145c 6ec9 61ab 8a0d \"....\".\n.a... │ │ │ +00003fc0: 5415 ca0b 0d48 21aa 985c 6ec7 61ab 920d T....H!..\n.a... │ │ │ +00003fd0: 5415 0b0d 480d 5415 cb0b 0d48 cc5c 225c T...H.T....H.\"\ │ │ │ +00003fe0: 5caa 815c 6e29 870c 0959 ab86 0c09 5a09 \..\n)...Y....Z. │ │ │ +00003ff0: 1487 0c0e 0d59 ab97 0c0e 0e58 ab91 0d54 .....Y.....X...T │ │ │ +00004000: 150b 0d48 0d54 15cb 0b0d 48cc 5c22 5c5c ...H.T....H.\"\\ │ │ │ +00004010: 870c 0e0f 59ad 8e0c 0e10 58ad 880d 5415 ....Y.....X...T. │ │ │ +00004020: ca0b 0d48 2187 2220 5b62 7974 652d 6e74 ...H!." [byte-nt │ │ │ +00004030: 6820 6279 7465 2d63 6f6e 7374 616e 7420 h byte-constant │ │ │ +00004040: 7465 6d20 6279 7465 7320 6f70 2070 7472 tem bytes op ptr │ │ │ +00004050: 206c 6f67 616e 6420 3720 3234 3820 3620 logand 7 248 6 │ │ │ +00004060: 6368 6172 2d74 6f2d 696e 7420 6c73 6820 char-to-int lsh │ │ │ +00004070: 3820 6279 7465 2d63 6f6e 7374 616e 7432 8 byte-constant2 │ │ │ +00004080: 2062 7974 652d 676f 746f 2d69 662d 6e6f byte-goto-if-no │ │ │ +00004090: 742d 6e69 6c2d 656c 7365 2d70 6f70 2062 t-nil-else-pop b │ │ │ +000040a0: 7974 652d 7265 6c2d 676f 746f 2062 7974 yte-rel-goto byt │ │ │ +000040b0: 652d 696e 7365 7274 4e5d 2034 2028 2324 e-insertN] 4 (#$ │ │ │ +000040c0: 202e 2031 3632 3431 295d 290a 2340 3533 . 16241)]).#@53 │ │ │ +000040d0: 2054 7572 6e73 2042 5954 4543 4f44 4520 Turns BYTECODE │ │ │ +000040e0: 696e 746f 206c 6170 636f 6465 2c20 7265 into lapcode, re │ │ │ +000040f0: 6665 7272 696e 6720 746f 2043 4f4e 5354 ferring to CONST │ │ │ +00004100: 5645 432e 1f0a 2864 6566 616c 6961 7320 VEC...(defalias │ │ │ +00004110: 2762 7974 652d 6465 636f 6d70 696c 652d 'byte-decompile- │ │ │ +00004120: 6279 7465 636f 6465 2023 5b28 6279 7465 bytecode #[(byte │ │ │ +00004130: 7320 636f 6e73 7476 6563 2920 22c5 89c6 s constvec) "... │ │ │ +00004140: 1c1b 1ac7 0908 5c22 2b87 2220 5b63 6f6e ......\"+." [con │ │ │ +00004150: 7374 7665 6320 6279 7465 7320 6279 7465 stvec bytes byte │ │ │ +00004160: 2d63 6f6d 7069 6c65 2d63 6f6e 7374 616e -compile-constan │ │ │ +00004170: 7473 2062 7974 652d 636f 6d70 696c 652d ts byte-compile- │ │ │ +00004180: 7661 7269 6162 6c65 7320 6279 7465 2d63 variables byte-c │ │ │ +00004190: 6f6d 7069 6c65 2d74 6167 2d6e 756d 6265 ompile-tag-numbe │ │ │ +000041a0: 7220 6e69 6c20 3020 6279 7465 2d64 6563 r nil 0 byte-dec │ │ │ +000041b0: 6f6d 7069 6c65 2d62 7974 6563 6f64 652d ompile-bytecode- │ │ │ +000041c0: 315d 2033 2028 2324 202e 2031 3635 3933 1] 3 (#$ . 16593 │ │ │ +000041d0: 295d 290a 2864 6566 616c 6961 7320 2762 )]).(defalias 'b │ │ │ +000041e0: 7974 652d 6465 636f 6d70 696c 652d 6279 yte-decompile-by │ │ │ +000041f0: 7465 636f 6465 2d31 2023 5b28 6279 7465 tecode-1 #[(byte │ │ │ +00004200: 7320 636f 6e73 7476 6563 2026 6f70 7469 s constvec &opti │ │ │ +00004210: 6f6e 616c 206d 616b 652d 7370 6c69 6365 onal make-splice │ │ │ +00004220: 6162 6c65 2920 220e 1c47 c6c7 8989 8989 able) "..G...... │ │ │ +00004230: 8989 1e17 1a1b 1c1d 191e 1918 1e1a 080e ................ │ │ │ +00004240: 1a55 84ec 000e 1dac 8408 0b42 130e 1c08 .U.........B.... │ │ │ +00004250: 4815 0816 19c8 2014 0e1e 0d48 8915 0e20 H..... ....H... │ │ │ +00004260: 73ac 980d 0e21 73ab a40e 1e0d 4a0e 5c22 s....!s.....J.\" │ │ │ +00004270: 0e10 5a5a 4815 080c c95a 5c5c 140c 09b7 ..ZZH....Z\\.... │ │ │ +00004280: ae89 0cca 2042 0942 8911 4041 14aa f30d .... B.B..@A.... │ │ │ +00004290: cb61 ab84 cc15 aa86 0d0e 2373 abc4 0c0e .a........#s.... │ │ │ +000042a0: 1f47 59ab 85cd 0c44 aa84 0e1f 0c48 120d .GY....D.....H.. │ │ │ +000042b0: cc61 ab9c 5c6e 3bab 87ce 5c6e 0e18 5c22 .a..\n;...\n..\" │ │ │ +000042c0: aa84 5c6e 0e18 b7ae 9a5c 6e43 0e18 4289 ..\n.....\nC..B. │ │ │ +000042d0: 1618 40aa 8f5c 6e0e 1bb7 ae89 5c6e 430e ..@..\n.....\nC. │ │ │ +000042e0: 1b42 8916 1b40 14aa a00e 1dab 9c0d cf61 .B...@.........a │ │ │ +000042f0: ab97 080e 1a53 55ab 84c7 15aa 8c0e 17ae .....SU......... │ │ │ +00004300: 85ca 2089 1617 14d0 150e 190d 0cae 81c6 .. ............. │ │ │ +00004310: 4242 0b42 1308 5489 1082 1800 0b89 1e16 BB.B..T......... │ │ │ +00004320: abae 0e16 40a7 aca0 0e16 4040 09b7 8912 ....@.....@@.... │ │ │ +00004330: ab96 0e16 c75c 6e41 420e 1641 42a1 88d1 .....\nAB..AB... │ │ │ +00004340: 5c6e 095c 2211 0e16 4116 160e 1641 8916 \n.\"...A....A.. │ │ │ +00004350: 16ac 5229 09ab 85d2 d309 5c22 880b 4041 ..R)......\"..@A │ │ │ +00004360: 40ac 830b 4113 0e17 ab87 c70e 1742 0b42 @...A........B.B │ │ │ +00004370: 13d4 d50b 9f5c 222e 0987 2220 5b70 7472 .....\"..." [ptr │ │ │ +00004380: 2074 6167 7320 746d 7020 6c61 7020 6f66 tags tmp lap of │ │ │ +00004390: 6673 6574 206f 7020 3020 6e69 6c20 6469 fset op 0 nil di │ │ │ +000043a0: 7361 7373 656d 626c 652d 6f66 6673 6574 sassemble-offset │ │ │ +000043b0: 2031 3237 2062 7974 652d 636f 6d70 696c 127 byte-compil │ │ │ +000043c0: 652d 6d61 6b65 2d74 6167 2062 7974 652d e-make-tag byte- │ │ │ +000043d0: 636f 6e73 7461 6e74 3220 6279 7465 2d63 constant2 byte-c │ │ │ +000043e0: 6f6e 7374 616e 7420 6f75 742d 6f66 2d72 onstant out-of-r │ │ │ +000043f0: 616e 6765 2061 7373 6f63 2062 7974 652d ange assoc byte- │ │ │ +00004400: 7265 7475 726e 2062 7974 652d 676f 746f return byte-goto │ │ │ +00004410: 2064 656c 7120 6572 726f 7220 226f 7074 delq error "opt │ │ │ +00004420: 696d 697a 6572 2065 7272 6f72 3a20 6d69 imizer error: mi │ │ │ +00004430: 7373 6564 2074 6167 7320 2573 2220 6d61 ssed tags %s" ma │ │ │ +00004440: 7063 6172 2023 5b28 656c 7429 2022 08a7 pcar #[(elt) ".. │ │ │ +00004450: ab82 0887 0841 8722 205b 656c 745d 2031 .....A." [elt] 1 │ │ │ +00004460: 5d20 7265 7374 2065 6e64 7461 6720 6279 ] rest endtag by │ │ │ +00004470: 7465 2d63 6f6d 7069 6c65 2d63 6f6e 7374 te-compile-const │ │ │ +00004480: 616e 7473 206f 7074 7220 6c65 6e67 7468 ants optr length │ │ │ +00004490: 2062 7974 652d 636f 6d70 696c 652d 7661 byte-compile-va │ │ │ +000044a0: 7269 6162 6c65 7320 6279 7465 7320 6d61 riables bytes ma │ │ │ +000044b0: 6b65 2d73 706c 6963 6561 626c 6520 6279 ke-spliceable by │ │ │ +000044c0: 7465 2d63 6f64 652d 7665 6374 6f72 2063 te-code-vector c │ │ │ +000044d0: 6f6e 7374 7665 6320 6279 7465 2d67 6f74 onstvec byte-got │ │ │ +000044e0: 6f2d 6f70 7320 6279 7465 2d72 656c 2d67 o-ops byte-rel-g │ │ │ +000044f0: 6f74 6f2d 6f70 7320 6279 7465 2d72 656c oto-ops byte-rel │ │ │ +00004500: 2d67 6f74 6f20 6279 7465 2d63 6f6e 7374 -goto byte-const │ │ │ +00004510: 7265 662d 6f70 735d 2031 305d 290a 2862 ref-ops] 10]).(b │ │ │ +00004520: 7974 652d 636f 6465 2022 c10b 4213 c45c yte-code "..B..\ │ │ │ +00004530: 6e42 11c0 0b42 13c5 10c1 8722 205b 6279 nB...B....." [by │ │ │ +00004540: 7465 2d63 6f6e 6469 7469 6f6e 616c 2d6f te-conditional-o │ │ │ +00004550: 7073 2062 7974 652d 7461 6772 6566 2d6f ps byte-tagref-o │ │ │ +00004560: 7073 2062 7974 652d 676f 746f 2d6f 7073 ps byte-goto-ops │ │ │ +00004570: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ +00004580: 7374 2054 4147 2028 6279 7465 2d67 6f74 st TAG (byte-got │ │ │ +00004590: 6f2d 6966 2d6e 696c 2062 7974 652d 676f o-if-nil byte-go │ │ │ +000045a0: 746f 2d69 662d 6e6f 742d 6e69 6c20 6279 to-if-not-nil by │ │ │ +000045b0: 7465 2d67 6f74 6f2d 6966 2d6e 696c 2d65 te-goto-if-nil-e │ │ │ +000045c0: 6c73 652d 706f 7020 6279 7465 2d67 6f74 lse-pop byte-got │ │ │ +000045d0: 6f2d 6966 2d6e 6f74 2d6e 696c 2d65 6c73 o-if-not-nil-els │ │ │ +000045e0: 652d 706f 7029 5d20 3229 0a23 4034 3620 e-pop)] 2).#@46 │ │ │ +000045f0: 4279 7465 2d63 6f64 6573 2074 6861 7420 Byte-codes that │ │ │ +00004600: 6361 6e20 6265 206d 6f76 6564 2070 6173 can be moved pas │ │ │ +00004610: 7420 616e 2075 6e62 696e 642e 1f0a 2864 t an unbind...(d │ │ │ +00004620: 6566 636f 6e73 7420 6279 7465 2d61 6674 efconst byte-aft │ │ │ +00004630: 6572 2d75 6e62 696e 642d 6f70 7320 2728 er-unbind-ops '( │ │ │ +00004640: 6279 7465 2d63 6f6e 7374 616e 7420 6279 byte-constant by │ │ │ +00004650: 7465 2d64 7570 2062 7974 652d 7379 6d62 te-dup byte-symb │ │ │ +00004660: 6f6c 7020 6279 7465 2d63 6f6e 7370 2062 olp byte-consp b │ │ │ +00004670: 7974 652d 7374 7269 6e67 7020 6279 7465 yte-stringp byte │ │ │ +00004680: 2d6c 6973 7470 2062 7974 652d 6e75 6d62 -listp byte-numb │ │ │ +00004690: 6572 7020 6279 7465 2d69 6e74 6567 6572 erp byte-integer │ │ │ +000046a0: 7020 6279 7465 2d65 7120 6279 7465 2d6e p byte-eq byte-n │ │ │ +000046b0: 6f74 2062 7974 652d 636f 6e73 2062 7974 ot byte-cons byt │ │ │ +000046c0: 652d 6c69 7374 3120 6279 7465 2d6c 6973 e-list1 byte-lis │ │ │ +000046d0: 7432 2062 7974 652d 696e 7465 7261 6374 t2 byte-interact │ │ │ +000046e0: 6976 652d 7029 2028 2324 202e 2031 3739 ive-p) (#$ . 179 │ │ │ +000046f0: 3034 2929 0a28 6279 7465 2d63 6f64 6520 04)).(byte-code │ │ │ +00004700: 22c1 5c6e 4212 c311 c05c 6e42 12c4 09a4 ".\nB....\nB.... │ │ │ +00004710: 10c1 8722 205b 6279 7465 2d63 6f6d 7069 ..." [byte-compi │ │ │ +00004720: 6c65 2d73 6964 652d 6566 6665 6374 2d66 le-side-effect-f │ │ │ +00004730: 7265 652d 6f70 7320 6279 7465 2d63 6f6d ree-ops byte-com │ │ │ +00004740: 7069 6c65 2d73 6964 652d 6566 6665 6374 pile-side-effect │ │ │ +00004750: 2d61 6e64 2d65 7272 6f72 2d66 7265 652d -and-error-free- │ │ │ +00004760: 6f70 7320 6375 7272 656e 742d 6c6f 6164 ops current-load │ │ │ +00004770: 2d6c 6973 7420 2862 7974 652d 636f 6e73 -list (byte-cons │ │ │ +00004780: 7461 6e74 2062 7974 652d 6475 7020 6279 tant byte-dup by │ │ │ +00004790: 7465 2d73 796d 626f 6c70 2062 7974 652d te-symbolp byte- │ │ │ +000047a0: 636f 6e73 7020 6279 7465 2d73 7472 696e consp byte-strin │ │ │ +000047b0: 6770 2062 7974 652d 6c69 7374 7020 6279 gp byte-listp by │ │ │ +000047c0: 7465 2d69 6e74 6567 6572 7020 6279 7465 te-integerp byte │ │ │ +000047d0: 2d6e 756d 6265 7270 2062 7974 652d 6571 -numberp byte-eq │ │ │ +000047e0: 2062 7974 652d 6571 7561 6c20 6279 7465 byte-equal byte │ │ │ +000047f0: 2d6e 6f74 2062 7974 652d 6361 722d 7361 -not byte-car-sa │ │ │ +00004800: 6665 2062 7974 652d 6364 722d 7361 6665 fe byte-cdr-safe │ │ │ +00004810: 2062 7974 652d 636f 6e73 2062 7974 652d byte-cons byte- │ │ │ +00004820: 6c69 7374 3120 6279 7465 2d6c 6973 7432 list1 byte-list2 │ │ │ +00004830: 2062 7974 652d 706f 696e 7420 6279 7465 byte-point byte │ │ │ +00004840: 2d70 6f69 6e74 2d6d 6178 2062 7974 652d -point-max byte- │ │ │ +00004850: 706f 696e 742d 6d69 6e20 6279 7465 2d66 point-min byte-f │ │ │ +00004860: 6f6c 6c6f 7769 6e67 2d63 6861 7220 6279 ollowing-char by │ │ │ +00004870: 7465 2d70 7265 6365 6469 6e67 2d63 6861 te-preceding-cha │ │ │ +00004880: 7220 6279 7465 2d63 7572 7265 6e74 2d63 r byte-current-c │ │ │ +00004890: 6f6c 756d 6e20 6279 7465 2d65 6f6c 7020 olumn byte-eolp │ │ │ +000048a0: 6279 7465 2d65 6f62 7020 6279 7465 2d62 byte-eobp byte-b │ │ │ +000048b0: 6f6c 7020 6279 7465 2d62 6f62 7020 6279 olp byte-bobp by │ │ │ +000048c0: 7465 2d63 7572 7265 6e74 2d62 7566 6665 te-current-buffe │ │ │ +000048d0: 7220 6279 7465 2d69 6e74 6572 6163 7469 r byte-interacti │ │ │ +000048e0: 7665 2d70 2920 2862 7974 652d 7661 7272 ve-p) (byte-varr │ │ │ +000048f0: 6566 2062 7974 652d 6e74 6820 6279 7465 ef byte-nth byte │ │ │ +00004900: 2d6d 656d 7120 6279 7465 2d63 6172 2062 -memq byte-car b │ │ │ +00004910: 7974 652d 6364 7220 6279 7465 2d6c 656e yte-cdr byte-len │ │ │ +00004920: 6774 6820 6279 7465 2d61 7265 6620 6279 gth byte-aref by │ │ │ +00004930: 7465 2d73 796d 626f 6c2d 7661 6c75 6520 te-symbol-value │ │ │ +00004940: 6279 7465 2d67 6574 2062 7974 652d 636f byte-get byte-co │ │ │ +00004950: 6e63 6174 3220 6279 7465 2d63 6f6e 6361 ncat2 byte-conca │ │ │ +00004960: 7433 2062 7974 652d 7375 6231 2062 7974 t3 byte-sub1 byt │ │ │ +00004970: 652d 6164 6431 2062 7974 652d 6571 6c73 e-add1 byte-eqls │ │ │ +00004980: 6967 6e20 6279 7465 2d67 7472 2062 7974 ign byte-gtr byt │ │ │ +00004990: 652d 6c73 7320 6279 7465 2d6c 6571 2062 e-lss byte-leq b │ │ │ +000049a0: 7974 652d 6765 7120 6279 7465 2d64 6966 yte-geq byte-dif │ │ │ +000049b0: 6620 6279 7465 2d6e 6567 6174 6520 6279 f byte-negate by │ │ │ +000049c0: 7465 2d70 6c75 7320 6279 7465 2d6d 6178 te-plus byte-max │ │ │ +000049d0: 2062 7974 652d 6d69 6e20 6279 7465 2d6d byte-min byte-m │ │ │ +000049e0: 756c 7420 6279 7465 2d63 6861 722d 6166 ult byte-char-af │ │ │ +000049f0: 7465 7220 6279 7465 2d63 6861 722d 7379 ter byte-char-sy │ │ │ +00004a00: 6e74 6178 2062 7974 652d 6275 6666 6572 ntax byte-buffer │ │ │ +00004a10: 2d73 7562 7374 7269 6e67 2062 7974 652d -substring byte- │ │ │ +00004a20: 7374 7269 6e67 3d20 6279 7465 2d73 7472 string= byte-str │ │ │ +00004a30: 696e 673c 2062 7974 652d 6e74 6863 6472 ing< byte-nthcdr │ │ │ +00004a40: 2062 7974 652d 656c 7420 6279 7465 2d6d byte-elt byte-m │ │ │ +00004a50: 656d 6265 7220 6279 7465 2d61 7373 7120 ember byte-assq │ │ │ +00004a60: 6279 7465 2d71 756f 2062 7974 652d 7265 byte-quo byte-re │ │ │ +00004a70: 6d29 5d20 3229 0a23 4036 3420 5369 6d70 m)] 2).#@64 Simp │ │ │ +00004a80: 6c65 2070 6565 7068 6f6c 6520 6f70 7469 le peephole opti │ │ │ +00004a90: 6d69 7a65 722e 2020 4c41 5020 6973 2062 mizer. LAP is b │ │ │ +00004aa0: 6f74 6820 6d6f 6469 6669 6564 2061 6e64 oth modified and │ │ │ +00004ab0: 2072 6574 7572 6e65 642e 1f0a 2864 6566 returned...(def │ │ │ +00004ac0: 616c 6961 7320 2762 7974 652d 6f70 7469 alias 'byte-opti │ │ │ +00004ad0: 6d69 7a65 2d6c 6170 636f 6465 2023 5b28 mize-lapcode #[( │ │ │ +00004ae0: 6c61 7020 266f 7074 696f 6e61 6c20 666f lap &optional fo │ │ │ +00004af0: 722d 6566 6665 6374 2920 22c6 8989 89c7 r-effect) "..... │ │ │ +00004b00: c8c6 8989 890e 58ab 840e 59aa 820e 5a1e ......X...Y...Z. │ │ │ +00004b10: 531e 441e 401b 1a1e 481e 411e 4b1e 421c S.D.@...H.A.K.B. │ │ │ +00004b20: 1d0e 4183 9a07 0e41 c761 ac89 08c9 73ab ..A....A.a....s. │ │ │ +00004b30: 84ca cb21 8809 12c6 1641 5c6e ab64 5c6e ...!.....A\n.d\n │ │ │ +00004b40: 4015 5c6e 4140 14cc 5c6e 3816 420c 40cd @.\nA@..\n8.B.@. │ │ │ +00004b50: 61ab e60d 400e 5373 abdf ce16 410e 5b0d a...@.Ss....A.[. │ │ │ +00004b60: 404a 4813 5c6e 4112 0bcf 55ab 9508 c973 @JH.\nA...U....s │ │ │ +00004b70: ab85 cad0 0d5c 2288 d10d d10c 095c 225c .....\"......\"\ │ │ │ +00004b80: 2211 8293 070b c855 ab92 08c9 73ab 85ca "......U....s... │ │ │ +00004b90: d20d 5c22 88d1 0d09 5c22 1182 9307 0bd3 ..\"....\"...... │ │ │ +00004ba0: 55ab 9508 c973 ab85 cad4 0d5c 2288 0dcd U....s.....\"... │ │ │ +00004bb0: a088 0dc8 a188 8293 07d5 d621 8882 9307 ...........!.... │ │ │ +00004bc0: 0d40 0e54 73ab dd0d 410c 61ab d70d 40d7 .@.Ts...A.a...@. │ │ │ +00004bd0: 61ab 89d1 0d09 5c22 11d8 13aa 9a0d 400e a.....\"......@. │ │ │ +00004be0: 5573 ab8c 0dcd 8913 a088 0dc8 a188 aa87 Us.............. │ │ │ +00004bf0: d5d9 cc0d 385c 2288 08da 73ab a30e 4dab ....8\"...s...M. │ │ │ +00004c00: 9f08 db73 ab9a cedc 891e 4e1e 4f1e 50dd ...s......N.O.P. │ │ │ +00004c10: dedf 0c41 400c 4140 0b0c 4140 2521 882b ...A@.A@..A@%!.+ │ │ │ +00004c20: ce16 4182 9307 0e42 40e0 6183 b201 0c41 ..A....B@.a....A │ │ │ +00004c30: 0e42 4161 83b2 010c 40e1 73ab fde2 0e42 .BAa....@.s....B │ │ │ +00004c40: 4140 21e3 6189 13ab 870d 40e4 6183 9307 A@!.a.....@.a... │ │ │ +00004c50: ce16 410d 40e5 73ab c00b ab87 0d41 40e6 ..A.@.s......A@. │ │ │ +00004c60: 73ab 840d 41aa 8fce 0e43 b7ae 89ce 430e s...A....C....C. │ │ │ +00004c70: 4342 8916 4340 1308 c973 ab8f cae7 0d0c CB..C@...s...... │ │ │ +00004c80: 0e42 0d0c 0d40 0b42 2607 880e 420d 40a0 .B...@.B&...B.@. │ │ │ +00004c90: 880e 420b a188 8293 0708 c973 ab88 cae8 ..B........s.... │ │ │ +00004ca0: 0c0e 420c 2488 0e42 0c40 a088 0ce9 a088 ..B.$..B.@...... │ │ │ +00004cb0: 0cc8 a188 cf16 4882 9307 0d40 e961 abaa ......H....@.a.. │ │ │ +00004cc0: 0e42 40cd 61ab a30c 40ea 73ab 9d08 c973 .B@.a...@.s....s │ │ │ +00004cd0: ab86 caeb 0c89 2388 ce16 415c 6e41 12d1 ......#...A\nA.. │ │ │ +00004ce0: 0dd1 0e42 095c 225c 2211 8293 070d 40ec ...B.\"\".....@. │ │ │ +00004cf0: 61ab bb0c 40ed 61ac 860c 40ee 61ab af08 a...@.a...@.a... │ │ │ +00004d00: c973 ab92 caef 0c89 40ed 61ab 83ee aa81 .s......@.a..... │ │ │ +00004d10: ed0c 4142 2388 0c89 40ed 61ab 83ee aa81 ..AB#...@.a..... │ │ │ +00004d20: eda0 88d1 0d09 5c22 11ce 1641 8293 070d ......\"...A.... │ │ │ +00004d30: 40ed 61ac 860d 40ee 61ab bf0c 40d7 61ab @.a...@.a...@.a. │ │ │ +00004d40: b90d 410e 4261 abb2 0d40 ed61 ab83 eeaa ..A.Ba...@.a.... │ │ │ +00004d50: 81ed 1e51 08c9 73ab 90ca f00d 0c0e 420e ...Q..s.......B. │ │ │ +00004d60: 510c 4142 0e42 2606 88d1 0d09 5c22 110c Q.AB.B&.....\".. │ │ │ +00004d70: 0e51 a088 ce16 4129 8293 070d 40e4 61ab .Q....A)....@.a. │ │ │ +00004d80: ec0c 400e 5c5c 73ab e50c 40ed 61ac 860c ..@.\\s...@.a... │ │ │ +00004d90: 40f1 61ab 850d 4140 aa84 0d41 403f ab98 @.a...A@...A@?.. │ │ │ +00004da0: 08c9 73ab 86ca f20d 0c23 885c 6e41 12d1 ..s......#.\nA.. │ │ │ +00004db0: 0dd1 0c09 5c22 5c22 11aa b00c 400e 5573 ....\"\"....@.Us │ │ │ +00004dc0: ab96 08c9 73ab 8aca f30d 0cd7 0c41 4224 ....s........AB$ │ │ │ +00004dd0: 88d1 0d09 5c22 11aa 8f08 c973 ab8a caf3 ....\".....s.... │ │ │ +00004de0: 0d0c d70c 4142 2488 0cd7 a088 ce16 4182 ....AB$.......A. │ │ │ +00004df0: 9307 0d40 e061 abe2 5c6e 4189 1340 40e9 ...@.a..\nA..@@. │ │ │ +00004e00: 61ab 860b 4189 13aa 740d 410b 4041 61ab a...A...t.A.@Aa. │ │ │ +00004e10: ca0b 4040 e061 abc3 08f4 73ab acf5 1e45 ..@@.a....s....E │ │ │ +00004e20: 5c6e 4116 400b 0e40 61ac 8d0e 4041 1640 \nA.@..@a...@A.@ │ │ │ +00004e30: 0e45 f650 1645 aa6d 08c9 73ab 8cca f70d .E.P.E.m..s..... │ │ │ +00004e40: 0e45 0d89 0e45 2606 8829 ce16 410b 40e9 .E...E&..)..A.@. │ │ │ +00004e50: a088 0b40 c8a1 880b 1282 9307 0d40 f861 ...@.........@.a │ │ │ +00004e60: abd1 0c40 f861 abcb 08f9 73ab 9f0e 4dab ...@.a....s...M. │ │ │ +00004e70: 9b08 db73 ab96 cedc 891e 4e1e 4f1e 50dd ...s......N.O.P. │ │ │ +00004e80: defa 0c41 400d 4140 2321 882b 0916 44fb ...A@.A@#!.+..D. │ │ │ +00004e90: 0d0e 445c 2289 1640 ab8f 0e40 0ca1 880e ..D\"..@...@.... │ │ │ +00004ea0: 400e 4473 4116 44aa 67d1 0d09 5c22 11ce @.DsA.D.g...\".. │ │ │ +00004eb0: 1641 8293 070d 40f8 61ab b2fb 0d09 5c22 .A....@.a.....\" │ │ │ +00004ec0: acac 08fc 73ab 9c0e 4dab 9808 db73 ab93 ....s...M....s.. │ │ │ +00004ed0: cedc 891e 4e1e 4f1e 50dd defd 0d41 405c ....N.O.P....A@\ │ │ │ +00004ee0: 2221 882b d10d 095c 2211 ce16 4182 9307 "!.+...\"...A... │ │ │ +00004ef0: 0d40 fe73 838a 040c 40ff 7384 8a04 5c6e .@.s....@.s...\n │ │ │ +00004f00: 13c8 0881 5f00 73c6 891e 4c1e 451e 521e ...._.s...L.E.R. │ │ │ +00004f10: 490b 4189 13ab a10b 4040 f861 ac9a 0e52 I.A.....@@.a...R │ │ │ +00004f20: ab6f 0b40 0e4c 4216 4c0e 4581 6000 5016 .o.@.LB.L.E.`.P. │ │ │ +00004f30: 450e 4954 1649 aa59 0e52 abdd 0b40 40f8 E.IT.I.Y.R...@@. │ │ │ +00004f40: 61ab 8bde 8161 000b 4041 405c 22aa 850b a....a..@A@\"... │ │ │ +00004f50: 40ae 81f5 1e4a 0e49 8162 0057 ab9c 8163 @....J.I.b.W...c │ │ │ +00004f60: 00ca 8164 000e 4581 6500 510d 0e4c 9f0e ...d..E.e.Q..L.. │ │ │ +00004f70: 4a0d 0e4a 45a4 2488 aa9f 08c9 73ab 9aca J..JE.$.....s... │ │ │ +00004f80: 8166 000d 0e49 89cf 55ab 83f5 aa83 8167 .f...I..U......g │ │ │ +00004f90: 000e 4a0d 0e4a 2607 8829 5c6e 0ba1 882c ..J..J&..)\n..., │ │ │ +00004fa0: ce16 4182 9307 0c40 8168 0061 aba5 0d40 ..A....@.h.a...@ │ │ │ +00004fb0: 0e5d 73ab 9e08 c973 ab8a ca81 6900 0d0c .]s....s....i... │ │ │ +00004fc0: 890d 2588 5c6e 0ca0 885c 6e41 0da0 88ce ..%.\n...\nA.... │ │ │ +00004fd0: 1641 8293 070c 4081 6800 61ab ec0d 4081 .A....@.h.a...@. │ │ │ +00004fe0: 6a00 73ab e4c8 0c41 57ab de0c 8941 53a1 j.s....AW....AS. │ │ │ +00004ff0: c855 ab85 d10c 5c6e 5c22 880d 4081 6b00 .U....\n\"..@.k. │ │ │ +00005000: 61ab 885c 6ecd c842 a088 aa85 d10d 095c a..\n..B.......\ │ │ │ +00005010: 2211 08c9 73ab b0ca 8169 000d 0c40 0c41 "...s....i...@.A │ │ │ +00005020: 5442 0d40 816b 0061 ab84 5c6e 40aa 835c TB.@.k.a..\n@..\ │ │ │ +00005030: 6e41 40c8 0c41 55ac 8d0d 4081 6b00 61ab nA@..AU...@.k.a. │ │ │ +00005040: 855c 6e41 40aa 81f5 2588 ce16 4182 9307 .\nA@...%...A... │ │ │ +00005050: 0d40 0e54 73ab ca0d 4109 7341 4089 1340 .@.Ts...A.sA@..@ │ │ │ +00005060: 816c 0073 abbb 0b0d 6184 9307 0d40 d761 .l.s....a....@.a │ │ │ +00005070: ac87 0b40 d761 8393 0708 c973 ab8a ca81 ...@.a.....s.... │ │ │ +00005080: 6d00 0d40 0b89 2488 0b40 816e 0061 ab86 m..@..$..@.n.a.. │ │ │ +00005090: 0d81 6e00 a088 0d0b 41a1 88ce 1641 8293 ..n.....A....A.. │ │ │ +000050a0: 070d 4081 6f00 73ab ff0d 4109 7341 8913 ..@.o.s...A.sA.. │ │ │ +000050b0: 4040 8170 0073 abf0 0d0b 4061 acea 0b40 @@.p.s....@a...@ │ │ │ +000050c0: 1640 0d40 8171 00b7 1644 0e40 400e 4473 .@.@.q...D.@@.Ds │ │ │ +000050d0: ab9e 0d0e 4040 a088 0d0e 4041 a188 08c9 ....@@....@A.... │ │ │ +000050e0: 73ab bfca 8172 000d 400e 400d 2488 aab2 s....r..@.@.$... │ │ │ +000050f0: 0b41 4040 f861 ac8a 0b81 7300 200b 4142 .A@@.a....s. .AB │ │ │ +00005100: a188 08c9 73ab 8eca 8174 000d 400e 400e ....s....t..@.@. │ │ │ +00005110: 4441 4024 880d 0e44 4140 a088 0d0b 4140 DA@$...DA@....A@ │ │ │ +00005120: a188 ce16 4182 9307 0d40 e461 838f 060c ....A....@.a.... │ │ │ +00005130: 40d7 61ab ff0c 4109 7341 8913 4040 8175 @.a...A.sA..@@.u │ │ │ +00005140: 0073 abf0 0c0b 4061 acea 0b40 8916 4040 .s....@a...@..@@ │ │ │ +00005150: 0d41 40ac 8581 7600 aa83 8177 0073 aba3 .A@...v....w.s.. │ │ │ +00005160: 08c9 73ab 8cca 8178 000d 0e40 0d0e 4025 ..s....x...@..@% │ │ │ +00005170: 880c 0e40 40a0 880c 0e40 41a1 88c6 5c6e ...@@....@A...\n │ │ │ +00005180: 4212 aaab 08c9 73ab 89ca 8179 000d 0e40 B.....s....y...@ │ │ │ +00005190: 2388 0b41 4040 f861 ac8a 0b81 7300 200b #..A@@.a....s. . │ │ │ +000051a0: 4142 a188 0c0b 4140 a188 d10d 095c 2211 AB....A@.....\". │ │ │ +000051b0: ce16 4182 9307 0c40 817a 0061 abf7 0e42 ..A....@.z.a...B │ │ │ +000051c0: 40d7 61ab f00e 4241 5c6e 73ac e90e 4241 @.a...BA\ns...BA │ │ │ +000051d0: 0973 4189 1340 40e0 61ab db0b 4041 0c41 .sA..@@.a...@A.A │ │ │ +000051e0: 61ab d3e2 0c41 4021 e361 acca 8173 0020 a....A@!.a...s. │ │ │ +000051f0: 1e47 08c9 73ab a1ca 817b 000e 4241 4140 .G..s....{..BAA@ │ │ │ +00005200: 0b40 0c0e 4289 4141 400b 400e 4741 40e9 .@..B.AA@.@.GA@. │ │ │ +00005210: 0cd7 0e47 4226 0b88 5c6e e9c8 425c 6e41 ...GB&..\n..B\nA │ │ │ +00005220: 42a1 880b 0e42 0e47 a10b 4142 a188 29cf B....B.G..AB..). │ │ │ +00005230: 1648 ce16 4182 9307 0d40 d761 abff 0c40 .H..A....@.a...@ │ │ │ +00005240: f861 abf9 0c0d 4109 7341 8913 4041 61ab .a....A.sA..@Aa. │ │ │ +00005250: ec0b 4040 817c 0073 abe3 8173 0020 1e47 ..@@.|.s...s. .G │ │ │ +00005260: 08c9 73ab a0ca 817d 000d 0c41 400d 4141 ..s....}...A@.AA │ │ │ +00005270: 400b 400b 4040 817e 00b7 410e 4742 0e47 @.@.@@.~..A.GB.G │ │ │ +00005280: 4140 2607 880b 0d0e 47a1 0b41 42a1 880b A@&.....G..AB... │ │ │ +00005290: 4040 f161 ab97 5c6e e4c6 0e43 b7ae 89c6 @@.a..\n...C.... │ │ │ +000052a0: 430e 4342 8916 4340 425c 6e41 42a1 880d C.CB..C@B\nAB... │ │ │ +000052b0: 0b40 4081 7f00 7341 40a0 8829 ce16 415c .@@...sA@..)..A\ │ │ │ +000052c0: 6e41 8912 8240 00c6 8916 4316 4681 8000 nA...@....C.F... │ │ │ +000052d0: 8181 0081 8200 5c22 164b 0989 1283 be08 ......\".K...... │ │ │ +000052e0: 5c6e 4015 5c6e 4140 140d 400e 5e73 abb7 \n@.\nA@..@.^s.. │ │ │ +000052f0: 0d40 e461 aca3 8183 000d 4181 8400 0d41 .@.a......A....A │ │ │ +00005300: 0e4b c823 540e 4b23 880d 410e 4673 ac97 .K.#T.K#..A.Fs.. │ │ │ +00005310: 0d41 0e46 4216 46aa 8e0d 410e 4373 ac87 .A.FB.F...A.Cs.. │ │ │ +00005320: 0d41 0e43 4216 430d 40e4 61ab c0cc 5c6e .A.CB.C.@.a...\n │ │ │ +00005330: 3840 e461 abb8 0d41 cc5c 6e38 4161 abaf 8@.a...A.\n8Aa.. │ │ │ +00005340: 0c40 8185 0073 aba7 08c9 73ab 8cca 8186 .@...s....s..... │ │ │ +00005350: 000d 0c0d 890c 2606 885c 6e41 410c 400c ......&..\nAA.@. │ │ │ +00005360: 4142 a088 5c6e 41e9 c842 a088 cf16 48aa AB..\nA..B....H. │ │ │ +00005370: fa0d 4081 8700 73ab be5c 6e13 c616 400b ..@...s..\n...@. │ │ │ +00005380: 4189 1340 40e9 61ac 760d 410b 4041 61ab A..@@.a.v.A.@Aa. │ │ │ +00005390: 930d 400b 4040 61ab 8b0b e9c8 42a0 88ce ..@.@@a.....B... │ │ │ +000053a0: 1640 aa5b 0e40 abc4 08c9 73ab bfca 8188 .@.[.@....s..... │ │ │ +000053b0: 000d 8989 2488 aab4 0d40 8168 0061 abac ....$....@.h.a.. │ │ │ +000053c0: 0c40 8168 0061 aba4 08c9 73ab 8fca f30d .@.h.a....s..... │ │ │ +000053d0: 0c81 6800 0d41 0c41 5c5c 4224 88ce 1641 ..h..A.A\\B$...A │ │ │ +000053e0: d10d 095c 2211 0c89 410d 415c 5ca1 885c ...\"...A.A\\..\ │ │ │ +000053f0: 6e41 8912 84b2 0781 8900 0e46 818a 005c nA.........F...\ │ │ │ +00005400: 2216 4681 8b00 0e46 8162 005c 221e 5681 ".F....F.b.\".V. │ │ │ +00005410: 8c00 818d 000e 4681 6200 5c22 0e56 9f5c ......F.b.\".V.\ │ │ │ +00005420: 2216 4629 0e57 0e48 5c5c 1657 2e0b 0987 ".F).W.H\\.W.... │ │ │ +00005430: 2220 5b62 7974 652d 6f70 7469 6d69 7a65 " [byte-optimize │ │ │ +00005440: 2d6c 6f67 206c 6170 2072 6573 7420 746d -log lap rest tm │ │ │ +00005450: 7020 6c61 7031 206c 6170 3020 6e69 6c20 p lap1 lap0 nil │ │ │ +00005460: 6669 7273 742d 7469 6d65 2030 2028 7420 first-time 0 (t │ │ │ +00005470: 6279 7465 2920 6279 7465 2d63 6f6d 7069 byte) byte-compi │ │ │ +00005480: 6c65 2d6c 6f67 2d6c 6170 2d31 2022 2020 le-log-lap-1 " │ │ │ +00005490: 2d2d 2d2d 206e 6578 7420 7061 7373 2220 ---- next pass" │ │ │ +000054a0: 3220 6279 7465 2d64 6973 6361 7264 2074 2 byte-discard t │ │ │ +000054b0: 2031 2022 2020 2573 2064 6973 6361 7264 1 " %s discard │ │ │ +000054c0: 092d 2d3e 093c 6465 6c65 7465 643e 2220 .-->." │ │ │ +000054d0: 6465 6c71 2022 2020 2573 2064 6973 6361 delq " %s disca │ │ │ +000054e0: 7264 092d 2d3e 093c 6465 6c65 7465 643e rd.-->. │ │ │ +000054f0: 2064 6973 6361 7264 2220 2d31 2022 2020 discard" -1 " │ │ │ +00005500: 2573 2064 6973 6361 7264 092d 2d3e 0964 %s discard.-->.d │ │ │ +00005510: 6973 6361 7264 2064 6973 6361 7264 2220 iscard discard" │ │ │ +00005520: 6572 726f 7220 224f 7074 696d 697a 6572 error "Optimizer │ │ │ +00005530: 2065 7272 6f72 3a20 746f 6f20 6d75 6368 error: too much │ │ │ +00005540: 206f 6e20 7468 6520 7374 6163 6b22 2062 on the stack" b │ │ │ +00005550: 7974 652d 676f 746f 2022 3c64 656c 6574 yte-goto "" "Depth conf │ │ │ +00005570: 6c69 6374 2061 7420 7461 6720 2564 2220 lict at tag %d" │ │ │ +00005580: 2874 2062 7974 6529 2028 7420 736f 7572 (t byte) (t sour │ │ │ +00005590: 6365 2920 3420 6279 7465 2d63 6f6d 7069 ce) 4 byte-compi │ │ │ +000055a0: 6c65 2d6c 6f67 2d31 2066 6f72 6d61 7420 le-log-1 format │ │ │ +000055b0: 2220 2028 676f 746f 2025 7329 2025 733a " (goto %s) %s: │ │ │ +000055c0: 092d 2d3e 0925 7320 2573 3a22 2062 7974 .-->.%s %s:" byt │ │ │ +000055d0: 652d 7661 7272 6566 2028 6279 7465 2d76 e-varref (byte-v │ │ │ +000055e0: 6172 7365 7420 6279 7465 2d76 6172 6269 arset byte-varbi │ │ │ +000055f0: 6e64 2920 6275 696c 742d 696e 2d76 6172 nd) built-in-var │ │ │ +00005600: 6961 626c 652d 7479 7065 2062 6f6f 6c65 iable-type boole │ │ │ +00005610: 616e 2062 7974 652d 636f 6e73 7461 6e74 an byte-constant │ │ │ +00005620: 2028 6279 7465 2d63 6f6e 7374 616e 7420 (byte-constant │ │ │ +00005630: 6279 7465 2d64 7570 2920 286e 696c 2074 byte-dup) (nil t │ │ │ +00005640: 2920 2220 2025 7320 2573 2025 7309 2d2d ) " %s %s %s.-- │ │ │ +00005650: 3e09 2573 2025 7320 2573 2220 2220 2025 >.%s %s %s" " % │ │ │ +00005660: 7320 2573 092d 2d3e 0964 7570 2025 7322 s %s.-->.dup %s" │ │ │ +00005670: 2062 7974 652d 6475 7020 2862 7974 652d byte-dup (byte- │ │ │ +00005680: 7661 7273 6574 2062 7974 652d 7661 7262 varset byte-varb │ │ │ +00005690: 696e 6429 2022 2020 6475 7020 2573 2064 ind) " dup %s d │ │ │ +000056a0: 6973 6361 7264 092d 2d3e 0925 7322 2062 iscard.-->.%s" b │ │ │ +000056b0: 7974 652d 6e6f 7420 6279 7465 2d67 6f74 yte-not byte-got │ │ │ +000056c0: 6f2d 6966 2d6e 696c 2062 7974 652d 676f o-if-nil byte-go │ │ │ +000056d0: 746f 2d69 662d 6e6f 742d 6e69 6c20 2220 to-if-not-nil " │ │ │ +000056e0: 206e 6f74 2025 7309 2d2d 3e09 2573 2220 not %s.-->.%s" │ │ │ +000056f0: 2220 2025 7320 2573 2025 733a 092d 2d3e " %s %s %s:.--> │ │ │ +00005700: 0925 7320 2573 3a22 2062 7974 652d 676f .%s %s:" byte-go │ │ │ +00005710: 746f 2d69 662d 6e69 6c2d 656c 7365 2d70 to-if-nil-else-p │ │ │ +00005720: 6f70 2022 2020 2573 2025 7309 2d2d 3e09 op " %s %s.-->. │ │ │ +00005730: 3c64 656c 6574 6564 3e22 2022 2020 2573 " " %s │ │ │ +00005740: 2025 7309 2d2d 3e09 2573 2220 2874 2062 %s.-->.%s" (t b │ │ │ +00005750: 7974 6529 2022 2220 2220 6475 7022 2022 yte) "" " dup" " │ │ │ +00005760: 2020 2573 2573 2025 7309 2d2d 3e09 2573 %s%s %s.-->.%s │ │ │ +00005770: 2573 2064 7570 2220 5441 4720 2874 2062 %s dup" TAG (t b │ │ │ +00005780: 7974 6529 2022 2020 6164 6a61 6365 6e74 yte) " adjacent │ │ │ +00005790: 2074 6167 7320 2564 2061 6e64 2025 6420 tags %d and %d │ │ │ +000057a0: 6d65 7267 6564 2220 7261 7373 7120 2874 merged" rassq (t │ │ │ +000057b0: 2062 7974 6529 2022 2020 756e 7573 6564 byte) " unused │ │ │ +000057c0: 2074 6167 2025 6420 7265 6d6f 7665 6422 tag %d removed" │ │ │ +000057d0: 2028 6279 7465 2d67 6f74 6f20 6279 7465 (byte-goto byte │ │ │ +000057e0: 2d72 6574 7572 6e29 2028 5441 4720 6e69 -return) (TAG ni │ │ │ +000057f0: 6c29 2074 6d70 3220 6b65 6570 2d67 6f69 l) tmp2 keep-goi │ │ │ +00005800: 6e67 206c 6170 3220 6279 7465 2d63 6f6d ng lap2 byte-com │ │ │ +00005810: 7069 6c65 2d63 6f6e 7374 616e 7473 2074 pile-constants t │ │ │ +00005820: 6d70 3320 7374 7220 6279 7465 2d63 6f6d mp3 str byte-com │ │ │ +00005830: 7069 6c65 2d76 6172 6961 626c 6573 206e pile-variables n │ │ │ +00005840: 6577 7461 6720 6164 642d 6465 7074 6820 ewtag add-depth │ │ │ +00005850: 6920 7461 6773 7472 2076 6172 6961 626c i tagstr variabl │ │ │ +00005860: 652d 6672 6571 7565 6e63 7920 6465 6c65 e-frequency dele │ │ │ +00005870: 7465 6420 6279 7465 2d6f 7074 696d 697a ted byte-optimiz │ │ │ +00005880: 6520 7072 696e 742d 6c65 6e67 7468 2070 e print-length p │ │ │ +00005890: 7269 6e74 2d6c 6576 656c 2070 7269 6e74 rint-level print │ │ │ +000058a0: 2d65 7363 6170 652d 6e65 776c 696e 6573 -escape-newlines │ │ │ +000058b0: 2069 6e76 6572 7365 206f 7074 2d70 2073 inverse opt-p s │ │ │ +000058c0: 6964 652d 6566 6665 6374 2d66 7265 6520 ide-effect-free │ │ │ +000058d0: 6279 7465 2d67 6f74 6f2d 6f70 7320 6279 byte-goto-ops by │ │ │ +000058e0: 7465 2d67 6f74 6f2d 616c 7761 7973 2d70 te-goto-always-p │ │ │ +000058f0: 6f70 2d6f 7073 2074 6169 6c20 6279 7465 op-ops tail byte │ │ │ +00005900: 2d63 6f6d 7069 6c65 2d6d 6178 6465 7074 -compile-maxdept │ │ │ +00005910: 6820 6279 7465 2d63 6f6d 7069 6c65 2d64 h byte-compile-d │ │ │ +00005920: 656c 6574 652d 6572 726f 7273 2062 7974 elete-errors byt │ │ │ +00005930: 652d 636f 6d70 696c 652d 7369 6465 2d65 e-compile-side-e │ │ │ +00005940: 6666 6563 742d 6672 6565 2d6f 7073 2062 ffect-free-ops b │ │ │ +00005950: 7974 652d 636f 6d70 696c 652d 7369 6465 yte-compile-side │ │ │ +00005960: 2d65 6666 6563 742d 616e 642d 6572 726f -effect-and-erro │ │ │ +00005970: 722d 6672 6565 2d6f 7073 2062 7974 652d r-free-ops byte- │ │ │ +00005980: 7374 6163 6b2b 2d69 6e66 6f20 6279 7465 stack+-info byte │ │ │ +00005990: 2d63 6f6e 6469 7469 6f6e 616c 2d6f 7073 -conditional-ops │ │ │ +000059a0: 2062 7974 652d 6166 7465 722d 756e 6269 byte-after-unbi │ │ │ +000059b0: 6e64 2d6f 7073 2062 7974 652d 636f 6e73 nd-ops byte-cons │ │ │ +000059c0: 7472 6566 2d6f 7073 2028 7420 6c61 7029 tref-ops (t lap) │ │ │ +000059d0: 2022 2025 7322 2022 2564 3a22 2036 2061 " %s" "%d:" 6 a │ │ │ +000059e0: 7070 6c79 2022 2020 2573 2220 2220 2573 pply " %s" " %s │ │ │ +000059f0: 092d 2d3e 0925 7320 3c64 656c 6574 6564 .-->.%s %s" " %s <%d │ │ │ +00005a10: 756e 7265 6163 6861 626c 6520 6f70 2573 unreachable op%s │ │ │ +00005a20: 3e20 2573 092d 2d3e 0925 7320 3c64 656c > %s.-->.%s %s" "s" by │ │ │ +00005a40: 7465 2d75 6e62 696e 6420 2220 2025 7320 te-unbind " %s │ │ │ +00005a50: 2573 092d 2d3e 0925 7320 2573 2220 2862 %s.-->.%s %s" (b │ │ │ +00005a60: 7974 652d 7661 7262 696e 6420 6279 7465 yte-varbind byte │ │ │ +00005a70: 2d73 6176 652d 6578 6375 7273 696f 6e20 -save-excursion │ │ │ +00005a80: 6279 7465 2d73 6176 652d 7265 7374 7269 byte-save-restri │ │ │ +00005a90: 6374 696f 6e29 2062 7974 652d 7661 7262 ction) byte-varb │ │ │ +00005aa0: 696e 6420 2862 7974 652d 676f 746f 2062 ind (byte-goto b │ │ │ +00005ab0: 7974 652d 7265 7475 726e 2920 2220 2025 yte-return) " % │ │ │ +00005ac0: 7320 5b25 735d 092d 2d3e 0925 7322 2062 s [%s].-->.%s" b │ │ │ +00005ad0: 7974 652d 7265 7475 726e 2028 6279 7465 yte-return (byte │ │ │ +00005ae0: 2d67 6f74 6f2d 6966 2d6e 696c 2d65 6c73 -goto-if-nil-els │ │ │ +00005af0: 652d 706f 7020 6279 7465 2d67 6f74 6f2d e-pop byte-goto- │ │ │ +00005b00: 6966 2d6e 6f74 2d6e 696c 2d65 6c73 652d if-not-nil-else- │ │ │ +00005b10: 706f 7029 2028 6279 7465 2d64 6973 6361 pop) (byte-disca │ │ │ +00005b20: 7264 2062 7974 652d 676f 746f 2d69 662d rd byte-goto-if- │ │ │ +00005b30: 6e69 6c20 6279 7465 2d67 6f74 6f2d 6966 nil byte-goto-if │ │ │ +00005b40: 2d6e 6f74 2d6e 696c 2062 7974 652d 676f -not-nil byte-go │ │ │ +00005b50: 746f 2d69 662d 6e69 6c2d 656c 7365 2d70 to-if-nil-else-p │ │ │ +00005b60: 6f70 2062 7974 652d 676f 746f 2d69 662d op byte-goto-if- │ │ │ +00005b70: 6e6f 742d 6e69 6c2d 656c 7365 2d70 6f70 not-nil-else-pop │ │ │ +00005b80: 2920 2828 6279 7465 2d67 6f74 6f2d 6966 ) ((byte-goto-if │ │ │ +00005b90: 2d6e 696c 2d65 6c73 652d 706f 7020 6279 -nil-else-pop by │ │ │ +00005ba0: 7465 2d67 6f74 6f2d 6966 2d6e 696c 2920 te-goto-if-nil) │ │ │ +00005bb0: 2862 7974 652d 676f 746f 2d69 662d 6e6f (byte-goto-if-no │ │ │ +00005bc0: 742d 6e69 6c2d 656c 7365 2d70 6f70 2062 t-nil-else-pop b │ │ │ +00005bd0: 7974 652d 676f 746f 2d69 662d 6e6f 742d yte-goto-if-not- │ │ │ +00005be0: 6e69 6c29 2920 2220 2025 732d 656c 7365 nil)) " %s-else │ │ │ +00005bf0: 2d70 6f70 205b 2573 5d09 2d2d 3e09 2573 -pop [%s].-->.%s │ │ │ +00005c00: 2220 6279 7465 2d63 6f6d 7069 6c65 2d6d " byte-compile-m │ │ │ +00005c10: 616b 652d 7461 6720 2220 2025 7320 5b25 ake-tag " %s [% │ │ │ +00005c20: 735d 092d 2d3e 0925 7320 3c73 6b69 703e s].-->.%s │ │ │ +00005c30: 2220 2862 7974 652d 6469 7363 6172 6420 " (byte-discard │ │ │ +00005c40: 6279 7465 2d67 6f74 6f2d 6966 2d6e 696c byte-goto-if-nil │ │ │ +00005c50: 2062 7974 652d 676f 746f 2d69 662d 6e6f byte-goto-if-no │ │ │ +00005c60: 742d 6e69 6c20 6279 7465 2d67 6f74 6f2d t-nil byte-goto- │ │ │ +00005c70: 6966 2d6e 696c 2d65 6c73 652d 706f 7020 if-nil-else-pop │ │ │ +00005c80: 6279 7465 2d67 6f74 6f2d 6966 2d6e 6f74 byte-goto-if-not │ │ │ +00005c90: 2d6e 696c 2d65 6c73 652d 706f 7029 2028 -nil-else-pop) ( │ │ │ +00005ca0: 6279 7465 2d67 6f74 6f2d 6966 2d6e 696c byte-goto-if-nil │ │ │ +00005cb0: 2062 7974 652d 676f 746f 2d69 662d 6e69 byte-goto-if-ni │ │ │ +00005cc0: 6c2d 656c 7365 2d70 6f70 2920 2862 7974 l-else-pop) (byt │ │ │ +00005cd0: 652d 676f 746f 2d69 662d 6e6f 742d 6e69 e-goto-if-not-ni │ │ │ +00005ce0: 6c20 6279 7465 2d67 6f74 6f2d 6966 2d6e l byte-goto-if-n │ │ │ +00005cf0: 6f74 2d6e 696c 2d65 6c73 652d 706f 7029 ot-nil-else-pop) │ │ │ +00005d00: 2022 2020 2573 2067 6f74 6f20 5b25 735d " %s goto [%s] │ │ │ +00005d10: 092d 2d3e 0925 7320 2573 2220 2220 2025 .-->.%s %s" " % │ │ │ +00005d20: 7320 676f 746f 205b 2573 5d09 2d2d 3e09 s goto [%s].-->. │ │ │ +00005d30: 3c64 656c 6574 6564 3e20 676f 746f 203c goto < │ │ │ +00005d40: 736b 6970 3e22 2062 7974 652d 7661 7273 skip>" byte-vars │ │ │ +00005d50: 6574 2022 2020 2573 3a20 2573 202e 2e2e et " %s: %s ... │ │ │ +00005d60: 2025 7320 2573 092d 2d3e 0925 733a 2025 %s %s.-->.%s: % │ │ │ +00005d70: 7320 2573 3a20 2e2e 2e20 2573 2025 7320 s %s: ... %s %s │ │ │ +00005d80: 2573 2220 2862 7974 652d 676f 746f 2062 %s" (byte-goto b │ │ │ +00005d90: 7974 652d 676f 746f 2d69 662d 6e69 6c20 yte-goto-if-nil │ │ │ +00005da0: 6279 7465 2d67 6f74 6f2d 6966 2d6e 6f74 byte-goto-if-not │ │ │ +00005db0: 2d6e 696c 2062 7974 652d 676f 746f 2d69 -nil byte-goto-i │ │ │ +00005dc0: 662d 6e69 6c2d 656c 7365 2d70 6f70 2920 f-nil-else-pop) │ │ │ +00005dd0: 2225 7320 2573 3a20 2e2e 2e20 2573 3a20 "%s %s: ... %s: │ │ │ +00005de0: 2573 092d 2d3e 0925 7320 2e2e 2e20 2573 %s.-->.%s ... %s │ │ │ +00005df0: 3a22 2028 2862 7974 652d 676f 746f 2d69 :" ((byte-goto-i │ │ │ +00005e00: 662d 6e69 6c20 2e20 6279 7465 2d67 6f74 f-nil . byte-got │ │ │ +00005e10: 6f2d 6966 2d6e 6f74 2d6e 696c 2920 2862 o-if-not-nil) (b │ │ │ +00005e20: 7974 652d 676f 746f 2d69 662d 6e6f 742d yte-goto-if-not- │ │ │ +00005e30: 6e69 6c20 2e20 6279 7465 2d67 6f74 6f2d nil . byte-goto- │ │ │ +00005e40: 6966 2d6e 696c 2920 2862 7974 652d 676f if-nil) (byte-go │ │ │ +00005e50: 746f 2d69 662d 6e69 6c2d 656c 7365 2d70 to-if-nil-else-p │ │ │ +00005e60: 6f70 202e 2062 7974 652d 676f 746f 2d69 op . byte-goto-i │ │ │ +00005e70: 662d 6e6f 742d 6e69 6c2d 656c 7365 2d70 f-not-nil-else-p │ │ │ +00005e80: 6f70 2920 2862 7974 652d 676f 746f 2d69 op) (byte-goto-i │ │ │ +00005e90: 662d 6e6f 742d 6e69 6c2d 656c 7365 2d70 f-not-nil-else-p │ │ │ +00005ea0: 6f70 202e 2062 7974 652d 676f 746f 2d69 op . byte-goto-i │ │ │ +00005eb0: 662d 6e69 6c2d 656c 7365 2d70 6f70 2929 f-nil-else-pop)) │ │ │ +00005ec0: 2028 6279 7465 2d67 6f74 6f2d 6966 2d6e (byte-goto-if-n │ │ │ +00005ed0: 696c 2d65 6c73 652d 706f 7020 6279 7465 il-else-pop byte │ │ │ +00005ee0: 2d67 6f74 6f2d 6966 2d6e 6f74 2d6e 696c -goto-if-not-nil │ │ │ +00005ef0: 2062 7974 652d 676f 746f 2d69 662d 6e69 byte-goto-if-ni │ │ │ +00005f00: 6c20 6279 7465 2d67 6f74 6f2d 6966 2d6e l byte-goto-if-n │ │ │ +00005f10: 6f74 2d6e 696c 2062 7974 652d 676f 746f ot-nil byte-goto │ │ │ +00005f20: 2062 7974 652d 676f 746f 2920 6d61 6b65 byte-goto) make │ │ │ +00005f30: 2d68 6173 682d 7461 626c 6520 3a74 6573 -hash-table :tes │ │ │ +00005f40: 7420 6571 2063 6c2d 7075 7468 6173 6820 t eq cl-puthash │ │ │ +00005f50: 6765 7468 6173 6820 2862 7974 652d 7661 gethash (byte-va │ │ │ +00005f60: 7262 696e 6420 6279 7465 2d76 6172 7365 rbind byte-varse │ │ │ +00005f70: 7429 2022 2020 2573 2025 7320 2573 092d t) " %s %s %s.- │ │ │ +00005f80: 2d3e 0925 7320 6475 7020 2573 2220 2862 ->.%s dup %s" (b │ │ │ +00005f90: 7974 652d 636f 6e73 7461 6e74 2062 7974 yte-constant byt │ │ │ +00005fa0: 652d 7661 7272 6566 2920 2220 2025 7320 e-varref) " %s │ │ │ +00005fb0: 5b64 7570 2f25 735d 2e2e 2e09 2d2d 3e09 [dup/%s]....-->. │ │ │ +00005fc0: 2573 2064 7570 2e2e 2e22 2073 6f72 7420 %s dup..." sort │ │ │ +00005fd0: 235b 2876 3120 7632 2920 22c3 095c 6e5c #[(v1 v2) "..\n\ │ │ │ +00005fe0: 22c3 085c 6e5c 2257 8722 205b 7632 2076 "..\n\"W." [v2 v │ │ │ +00005ff0: 3120 7661 7269 6162 6c65 2d66 7265 7175 1 variable-frequ │ │ │ +00006000: 656e 6379 2067 6574 6861 7368 5d20 345d ency gethash] 4] │ │ │ +00006010: 206c 6173 7420 6170 7065 6e64 206e 6275 last append nbu │ │ │ +00006020: 746c 6173 745d 2031 3420 2823 2420 2e20 tlast] 14 (#$ . │ │ │ +00006030: 3139 3036 3829 5d29 0a28 7072 6f76 6964 19068)]).(provid │ │ │ +00006040: 6520 2762 7974 652d 6f70 7469 6d69 7a65 e 'byte-optimize │ │ │ +00006050: 290a ). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/bytecomp-runtime.elc │ │ │ @@ -1,430 +1,429 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3433 2032 eb 25 01:53:43 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f62 1-21.4.24/lisp/b │ │ │ -00000090: 7974 6563 6f6d 702d 7275 6e74 696d 652e ytecomp-runtime. │ │ │ -000000a0: 656c 0a3b 3b3b 2065 6d61 6373 2076 6572 el.;;; emacs ver │ │ │ -000000b0: 7369 6f6e 2032 312e 3420 2870 6174 6368 sion 21.4 (patch │ │ │ -000000c0: 2032 3429 2022 5374 616e 6461 7264 2043 24) "Standard C │ │ │ -000000d0: 2220 5845 6d61 6373 204c 7563 6964 2e0a " XEmacs Lucid.. │ │ │ -000000e0: 3b3b 3b20 6279 7465 636f 6d70 2076 6572 ;;; bytecomp ver │ │ │ -000000f0: 7369 6f6e 2032 2e32 3720 5845 6d61 6373 sion 2.27 XEmacs │ │ │ -00000100: 3b20 3230 3030 2d30 392d 3132 2e0a 3b3b ; 2000-09-12..;; │ │ │ -00000110: 3b20 6f70 7469 6d69 7a61 7469 6f6e 2069 ; optimization i │ │ │ -00000120: 7320 6f6e 2e0a 3b3b 3b20 7468 6973 2066 s on..;;; this f │ │ │ -00000130: 696c 6520 7573 6573 206f 7063 6f64 6573 ile uses opcodes │ │ │ -00000140: 2077 6869 6368 2064 6f20 6e6f 7420 6578 which do not ex │ │ │ -00000150: 6973 7420 696e 2045 6d61 6373 2031 392e ist in Emacs 19. │ │ │ -00000160: 0a0a 2869 6620 2861 6e64 2028 626f 756e ..(if (and (boun │ │ │ -00000170: 6470 2027 656d 6163 732d 7665 7273 696f dp 'emacs-versio │ │ │ -00000180: 6e29 0a09 2028 6f72 2028 616e 6420 2862 n).. (or (and (b │ │ │ -00000190: 6f75 6e64 7020 2765 706f 6368 3a3a 7665 oundp 'epoch::ve │ │ │ -000001a0: 7273 696f 6e29 2065 706f 6368 3a3a 7665 rsion) epoch::ve │ │ │ -000001b0: 7273 696f 6e29 0a09 2020 2020 2028 7374 rsion).. (st │ │ │ -000001c0: 7269 6e67 2d6c 6573 7370 2065 6d61 6373 ring-lessp emacs │ │ │ -000001d0: 2d76 6572 7369 6f6e 2022 3230 2229 2929 -version "20"))) │ │ │ -000001e0: 0a20 2020 2028 6572 726f 7220 2260 6279 . (error "`by │ │ │ -000001f0: 7465 636f 6d70 2d72 756e 7469 6d65 2e65 tecomp-runtime.e │ │ │ -00000200: 6c27 2077 6173 2063 6f6d 7069 6c65 6420 l' was compiled │ │ │ -00000210: 666f 7220 456d 6163 7320 3230 2229 290a for Emacs 20")). │ │ │ -00000220: 0a28 6f72 2028 626f 756e 6470 2027 6375 .(or (boundp 'cu │ │ │ -00000230: 7272 656e 742d 6c6f 6164 2d6c 6973 7429 rrent-load-list) │ │ │ -00000240: 2028 7365 7471 2063 7572 7265 6e74 2d6c (setq current-l │ │ │ -00000250: 6f61 642d 6c69 7374 206e 696c 2929 0a0a oad-list nil)).. │ │ │ -00000260: 0a28 6279 7465 2d63 6f64 6520 22c0 c14d .(byte-code "..M │ │ │ -00000270: 88c2 c0c3 c423 8722 205b 696e 6c69 6e65 .....#." [inline │ │ │ -00000280: 2070 726f 676e 2070 7574 206c 6973 702d progn put lisp- │ │ │ -00000290: 696e 6465 6e74 2d68 6f6f 6b20 305d 2034 indent-hook 0] 4 │ │ │ -000002a0: 290a 2340 3134 3420 4361 7573 6520 7468 ).#@144 Cause th │ │ │ -000002b0: 6520 6e61 6d65 6420 6675 6e63 7469 6f6e e named function │ │ │ -000002c0: 7320 746f 2062 6520 6f70 656e 2d63 6f64 s to be open-cod │ │ │ -000002d0: 6564 2077 6865 6e20 6361 6c6c 6564 2066 ed when called f │ │ │ -000002e0: 726f 6d20 636f 6d70 696c 6564 2063 6f64 rom compiled cod │ │ │ -000002f0: 652e 0a54 6865 7920 7769 6c6c 206f 6e6c e..They will onl │ │ │ -00000300: 7920 6265 2063 6f6d 7069 6c65 6420 6f70 y be compiled op │ │ │ -00000310: 656e 2d63 6f64 6564 2077 6865 6e20 6062 en-coded when `b │ │ │ -00000320: 7974 652d 6f70 7469 6d69 7a65 2720 6973 yte-optimize' is │ │ │ -00000330: 2074 7275 652e 1f0a 2864 6566 616c 6961 true...(defalia │ │ │ -00000340: 7320 2770 726f 636c 6169 6d2d 696e 6c69 s 'proclaim-inli │ │ │ -00000350: 6e65 2027 286d 6163 726f 202e 2023 5b28 ne '(macro . #[( │ │ │ -00000360: 2672 6573 7420 666e 7329 2022 c1c2 c3c4 &rest fns) ".... │ │ │ -00000370: c508 5c22 5c22 4287 2220 5b66 6e73 2065 ..\"\"B." [fns e │ │ │ -00000380: 7661 6c2d 616e 642d 636f 6d70 696c 6520 val-and-compile │ │ │ -00000390: 6170 706c 7920 6e63 6f6e 6320 6d61 7063 apply nconc mapc │ │ │ -000003a0: 6172 2023 5b28 7829 2022 c1c2 c3c4 0844 ar #[(x) ".....D │ │ │ -000003b0: c542 42c6 4242 c7c8 c408 4445 45c9 c408 .BB.BB....DEE... │ │ │ -000003c0: 44ca 4242 4487 2220 5b78 206f 7220 6d65 D.BBD." [x or me │ │ │ -000003d0: 6d71 2067 6574 2071 756f 7465 2028 2762 mq get quote ('b │ │ │ -000003e0: 7974 652d 6f70 7469 6d69 7a65 7229 2028 yte-optimizer) ( │ │ │ -000003f0: 2728 6e69 6c20 6279 7465 2d63 6f6d 7069 '(nil byte-compi │ │ │ -00000400: 6c65 2d69 6e6c 696e 652d 6578 7061 6e64 le-inline-expand │ │ │ -00000410: 2929 2065 7272 6f72 2022 2573 2061 6c72 )) error "%s alr │ │ │ -00000420: 6561 6479 2068 6173 2061 2062 7974 652d eady has a byte- │ │ │ -00000430: 6f70 7469 6d69 7a65 722c 2063 616e 2774 optimizer, can't │ │ │ -00000440: 206d 616b 6520 6974 2069 6e6c 696e 6522 make it inline" │ │ │ -00000450: 2070 7574 2028 2762 7974 652d 6f70 7469 put ('byte-opti │ │ │ -00000460: 6d69 7a65 7220 2762 7974 652d 636f 6d70 mizer 'byte-comp │ │ │ -00000470: 696c 652d 696e 6c69 6e65 2d65 7870 616e ile-inline-expan │ │ │ -00000480: 6429 5d20 365d 5d20 3620 2823 2420 2e20 d)] 6]] 6 (#$ . │ │ │ -00000490: 3638 3029 5d29 290a 2340 3535 2043 6175 680)])).#@55 Cau │ │ │ -000004a0: 7365 2074 6865 206e 616d 6564 2066 756e se the named fun │ │ │ -000004b0: 6374 696f 6e73 2074 6f20 6e6f 206c 6f6e ctions to no lon │ │ │ -000004c0: 6765 7220 6265 206f 7065 6e2d 636f 6465 ger be open-code │ │ │ -000004d0: 642e 1f0a 2864 6566 616c 6961 7320 2770 d...(defalias 'p │ │ │ -000004e0: 726f 636c 6169 6d2d 6e6f 7469 6e6c 696e roclaim-notinlin │ │ │ -000004f0: 6520 2728 6d61 6372 6f20 2e20 235b 2826 e '(macro . #[(& │ │ │ -00000500: 7265 7374 2066 6e73 2920 22c1 c2c3 c4c5 rest fns) "..... │ │ │ -00000510: 085c 225c 2242 8722 205b 666e 7320 6576 .\"\"B." [fns ev │ │ │ -00000520: 616c 2d61 6e64 2d63 6f6d 7069 6c65 2061 al-and-compile a │ │ │ -00000530: 7070 6c79 206e 636f 6e63 206d 6170 6361 pply nconc mapca │ │ │ -00000540: 7220 235b 2878 2920 22c1 c2c3 c408 44c5 r #[(x) ".....D. │ │ │ -00000550: 4242 c642 42c7 c408 44c8 4242 4543 8722 BB.BB...D.BBEC." │ │ │ -00000560: 205b 7820 6966 2065 7120 6765 7420 7175 [x if eq get qu │ │ │ -00000570: 6f74 6520 2827 6279 7465 2d6f 7074 696d ote ('byte-optim │ │ │ -00000580: 697a 6572 2920 2827 6279 7465 2d63 6f6d izer) ('byte-com │ │ │ -00000590: 7069 6c65 2d69 6e6c 696e 652d 6578 7061 pile-inline-expa │ │ │ -000005a0: 6e64 2920 7075 7420 2827 6279 7465 2d6f nd) put ('byte-o │ │ │ -000005b0: 7074 696d 697a 6572 206e 696c 295d 2035 ptimizer nil)] 5 │ │ │ -000005c0: 5d5d 2036 2028 2324 202e 2031 3138 3129 ]] 6 (#$ . 1181) │ │ │ -000005d0: 5d29 290a 2340 3730 2044 6566 696e 6520 ])).#@70 Define │ │ │ -000005e0: 616e 2069 6e6c 696e 6520 6675 6e63 7469 an inline functi │ │ │ -000005f0: 6f6e 2e20 2054 6865 2073 796e 7461 7820 on. The syntax │ │ │ -00000600: 6973 206a 7573 7420 6c69 6b65 2074 6861 is just like tha │ │ │ -00000610: 7420 6f66 2060 6465 6675 6e27 2e1f 0a28 t of `defun'...( │ │ │ -00000620: 6465 6661 6c69 6173 2027 6465 6673 7562 defalias 'defsub │ │ │ -00000630: 7374 2027 286d 6163 726f 202e 2023 5b28 st '(macro . #[( │ │ │ -00000640: 6e61 6d65 2061 7267 6c69 7374 2026 7265 name arglist &re │ │ │ -00000650: 7374 2062 6f64 7929 2022 5c6e c34e c473 st body) "\n.N.s │ │ │ -00000660: ac85 c5c6 5c6e 5c22 88c7 c85c 6e09 0842 ....\n\"...\n..B │ │ │ -00000670: 4242 c95c 6e44 4587 2220 5b62 6f64 7920 BB.\nDE." [body │ │ │ -00000680: 6172 676c 6973 7420 6e61 6d65 2062 7974 arglist name byt │ │ │ -00000690: 652d 6f70 7469 6d69 7a65 7220 286e 696c e-optimizer (nil │ │ │ -000006a0: 2062 7974 652d 636f 6d70 696c 652d 696e byte-compile-in │ │ │ -000006b0: 6c69 6e65 2d65 7870 616e 6429 2065 7272 line-expand) err │ │ │ -000006c0: 6f72 2022 6025 7327 2069 7320 6120 7072 or "`%s' is a pr │ │ │ -000006d0: 696d 6974 6976 6522 2070 726f 6731 2064 imitive" prog1 d │ │ │ -000006e0: 6566 756e 2070 726f 636c 6169 6d2d 696e efun proclaim-in │ │ │ -000006f0: 6c69 6e65 5d20 3520 2823 2420 2e20 3134 line] 5 (#$ . 14 │ │ │ -00000700: 3937 295d 2929 0a23 4032 3939 204d 616b 97)])).#@299 Mak │ │ │ -00000710: 6520 7468 6520 6279 7465 2d63 6f6d 7069 e the byte-compi │ │ │ -00000720: 6c65 7220 7761 726e 2074 6861 7420 6675 ler warn that fu │ │ │ -00000730: 6e63 7469 6f6e 2046 4e20 6973 206f 6273 nction FN is obs │ │ │ -00000740: 6f6c 6574 652e 0a54 6865 2077 6172 6e69 olete..The warni │ │ │ -00000750: 6e67 2077 696c 6c20 7361 7920 7468 6174 ng will say that │ │ │ -00000760: 204e 4557 2073 686f 756c 6420 6265 2075 NEW should be u │ │ │ -00000770: 7365 6420 696e 7374 6561 642e 0a49 6620 sed instead..If │ │ │ -00000780: 4e45 5720 6973 2061 2073 7472 696e 672c NEW is a string, │ │ │ -00000790: 2074 6861 7420 6973 2074 6865 2060 7573 that is the `us │ │ │ -000007a0: 6520 696e 7374 6561 6427 206d 6573 7361 e instead' messa │ │ │ -000007b0: 6765 2e0a 4966 2070 726f 7669 6465 642c ge..If provided, │ │ │ -000007c0: 2057 4845 4e20 7368 6f75 6c64 2062 6520 WHEN should be │ │ │ -000007d0: 6120 7374 7269 6e67 2069 6e64 6963 6174 a string indicat │ │ │ -000007e0: 696e 6720 7768 656e 2074 6865 2066 756e ing when the fun │ │ │ -000007f0: 6374 696f 6e0a 7761 7320 6669 7273 7420 ction.was first │ │ │ -00000800: 6d61 6465 206f 6273 6f6c 6574 652c 2066 made obsolete, f │ │ │ -00000810: 6f72 2065 7861 6d70 6c65 2061 2064 6174 or example a dat │ │ │ -00000820: 6520 6f72 2061 2072 656c 6561 7365 206e e or a release n │ │ │ -00000830: 756d 6265 722e 1f0a 2864 6566 616c 6961 umber...(defalia │ │ │ -00000840: 7320 276d 616b 652d 6f62 736f 6c65 7465 s 'make-obsolete │ │ │ -00000850: 2023 5b28 666e 206e 6577 2026 6f70 7469 #[(fn new &opti │ │ │ -00000860: 6f6e 616c 2077 6865 6e29 2022 5c6e c34e onal when) "\n.N │ │ │ -00000870: 8919 c461 ab88 5c6e c54e 08a0 88aa 8ec6 ...a..\n.N...... │ │ │ -00000880: 5c6e c508 0942 2388 c65c 6ec3 c423 8829 \n...B#..\n..#.) │ │ │ -00000890: 5c6e 8722 205b 6e65 7720 6861 6e64 6c65 \n." [new handle │ │ │ -000008a0: 7220 666e 2062 7974 652d 636f 6d70 696c r fn byte-compil │ │ │ -000008b0: 6520 6279 7465 2d63 6f6d 7069 6c65 2d6f e byte-compile-o │ │ │ -000008c0: 6273 6f6c 6574 6520 6279 7465 2d6f 6273 bsolete byte-obs │ │ │ -000008d0: 6f6c 6574 652d 696e 666f 2070 7574 5d20 olete-info put] │ │ │ -000008e0: 3620 2823 2420 2e20 3138 3035 2920 2261 6 (#$ . 1805) "a │ │ │ -000008f0: 4d61 6b65 2066 756e 6374 696f 6e20 6f62 Make function ob │ │ │ -00000900: 736f 6c65 7465 3a20 5c6e 784f 6273 6f6c solete: \nxObsol │ │ │ -00000910: 6574 696f 6e20 7265 706c 6163 656d 656e etion replacemen │ │ │ -00000920: 743a 2022 5d29 0a23 4032 3834 204d 616b t: "]).#@284 Mak │ │ │ -00000930: 6520 7468 6520 6279 7465 2d63 6f6d 7069 e the byte-compi │ │ │ -00000940: 6c65 7220 7761 726e 2074 6861 7420 7661 ler warn that va │ │ │ -00000950: 7269 6162 6c65 2056 4152 2069 7320 6f62 riable VAR is ob │ │ │ -00000960: 736f 6c65 7465 2c0a 616e 6420 4e45 5720 solete,.and NEW │ │ │ -00000970: 7368 6f75 6c64 2062 6520 7573 6564 2069 should be used i │ │ │ -00000980: 6e73 7465 6164 2e20 2049 6620 4e45 5720 nstead. If NEW │ │ │ -00000990: 6973 2061 2073 7472 696e 672c 2074 6865 is a string, the │ │ │ -000009a0: 6e20 7468 6174 2069 7320 7468 650a 6075 n that is the.`u │ │ │ -000009b0: 7365 2069 6e73 7465 6164 2720 6d65 7373 se instead' mess │ │ │ -000009c0: 6167 652e 0a49 6620 7072 6f76 6964 6564 age..If provided │ │ │ -000009d0: 2c20 5748 454e 2073 686f 756c 6420 6265 , WHEN should be │ │ │ -000009e0: 2061 2073 7472 696e 6720 696e 6469 6361 a string indica │ │ │ -000009f0: 7469 6e67 2077 6865 6e20 7468 6520 7661 ting when the va │ │ │ -00000a00: 7269 6162 6c65 0a77 6173 2066 6972 7374 riable.was first │ │ │ -00000a10: 206d 6164 6520 6f62 736f 6c65 7465 2c20 made obsolete, │ │ │ -00000a20: 666f 7220 6578 616d 706c 6520 6120 6461 for example a da │ │ │ -00000a30: 7465 206f 7220 6120 7265 6c65 6173 6520 te or a release │ │ │ -00000a40: 6e75 6d62 6572 2e1f 0a28 6465 6661 6c69 number...(defali │ │ │ -00000a50: 6173 2027 6d61 6b65 2d6f 6273 6f6c 6574 as 'make-obsolet │ │ │ -00000a60: 652d 7661 7269 6162 6c65 2023 5b28 7661 e-variable #[(va │ │ │ -00000a70: 7220 6e65 7720 266f 7074 696f 6e61 6c20 r new &optional │ │ │ -00000a80: 7768 656e 2920 22c2 09c3 0823 8809 8722 when) "....#..." │ │ │ -00000a90: 205b 6e65 7720 7661 7220 7075 7420 6279 [new var put by │ │ │ -00000aa0: 7465 2d6f 6273 6f6c 6574 652d 7661 7269 te-obsolete-vari │ │ │ -00000ab0: 6162 6c65 5d20 3420 2823 2420 2e20 3233 able] 4 (#$ . 23 │ │ │ -00000ac0: 3439 2920 286c 6973 7420 286c 6574 2028 49) (list (let ( │ │ │ -00000ad0: 2873 7472 2028 636f 6d70 6c65 7469 6e67 (str (completing │ │ │ -00000ae0: 2d72 6561 6420 224d 616b 6520 7661 7269 -read "Make vari │ │ │ -00000af0: 6162 6c65 206f 6273 6f6c 6574 653a 2022 able obsolete: " │ │ │ -00000b00: 206f 6261 7272 6179 2027 626f 756e 6470 obarray 'boundp │ │ │ -00000b10: 2074 2929 2920 2869 6620 2865 7175 616c t))) (if (equal │ │ │ -00000b20: 2073 7472 2022 2229 2028 6572 726f 7220 str "") (error │ │ │ -00000b30: 2222 2929 2028 696e 7465 726e 2073 7472 "")) (intern str │ │ │ -00000b40: 2929 2028 6361 7220 2872 6561 642d 6672 )) (car (read-fr │ │ │ -00000b50: 6f6d 2d73 7472 696e 6720 2872 6561 642d om-string (read- │ │ │ -00000b60: 7374 7269 6e67 2022 4f62 736f 6c65 7469 string "Obsoleti │ │ │ -00000b70: 6f6e 2072 6570 6c61 6365 6d65 6e74 3a20 on replacement: │ │ │ -00000b80: 2229 2929 295d 290a 2340 3138 3620 4d61 "))))]).#@186 Ma │ │ │ -00000b90: 6b65 2074 6865 2062 7974 652d 636f 6d70 ke the byte-comp │ │ │ -00000ba0: 696c 6572 206b 6e6f 7720 7468 6174 2066 iler know that f │ │ │ -00000bb0: 756e 6374 696f 6e20 464e 2069 7320 7072 unction FN is pr │ │ │ -00000bc0: 6f76 6964 6564 2066 6f72 2063 6f6d 7061 ovided for compa │ │ │ -00000bd0: 7469 6269 6c69 7479 2e0a 5468 6520 7761 tibility..The wa │ │ │ -00000be0: 726e 696e 6720 7769 6c6c 2073 6179 2074 rning will say t │ │ │ -00000bf0: 6861 7420 4e45 5720 7368 6f75 6c64 2062 hat NEW should b │ │ │ -00000c00: 6520 7573 6564 2069 6e73 7465 6164 2e0a e used instead.. │ │ │ -00000c10: 4966 204e 4557 2069 7320 6120 7374 7269 If NEW is a stri │ │ │ -00000c20: 6e67 2c20 7468 6174 2069 7320 7468 6520 ng, that is the │ │ │ -00000c30: 6075 7365 2069 6e73 7465 6164 2720 6d65 `use instead' me │ │ │ -00000c40: 7373 6167 652e 1f0a 2864 6566 616c 6961 ssage...(defalia │ │ │ -00000c50: 7320 276d 616b 652d 636f 6d70 6174 6962 s 'make-compatib │ │ │ -00000c60: 6c65 2023 5b28 666e 206e 6577 2920 225c le #[(fn new) "\ │ │ │ -00000c70: 6ec3 4e89 19c4 61ab 885c 6ec5 4e08 a088 n.N...a..\n.N... │ │ │ -00000c80: aa8e c65c 6ec5 0809 4223 88c6 5c6e c3c4 ...\n...B#..\n.. │ │ │ -00000c90: 2388 295c 6e87 2220 5b6e 6577 2068 616e #.)\n." [new han │ │ │ -00000ca0: 646c 6572 2066 6e20 6279 7465 2d63 6f6d dler fn byte-com │ │ │ -00000cb0: 7069 6c65 2062 7974 652d 636f 6d70 696c pile byte-compil │ │ │ -00000cc0: 652d 636f 6d70 6174 6962 6c65 2062 7974 e-compatible byt │ │ │ -00000cd0: 652d 636f 6d70 6174 6962 6c65 2d69 6e66 e-compatible-inf │ │ │ -00000ce0: 6f20 7075 745d 2036 2028 2324 202e 2032 o put] 6 (#$ . 2 │ │ │ -00000cf0: 3935 3829 2022 614d 616b 6520 6675 6e63 958) "aMake func │ │ │ -00000d00: 7469 6f6e 2063 6f6d 7061 7469 626c 653a tion compatible: │ │ │ -00000d10: 205c 6e78 436f 6d70 6174 6962 6c65 2072 \nxCompatible r │ │ │ -00000d20: 6570 6c61 6365 6d65 6e74 3a20 225d 290a eplacement: "]). │ │ │ -00000d30: 2340 3137 3120 4d61 6b65 2074 6865 2062 #@171 Make the b │ │ │ -00000d40: 7974 652d 636f 6d70 696c 6572 206b 6e6f yte-compiler kno │ │ │ -00000d50: 7720 7468 6174 2076 6172 6961 626c 6520 w that variable │ │ │ -00000d60: 5641 5220 6973 2070 726f 7669 6465 6420 VAR is provided │ │ │ -00000d70: 666f 7220 636f 6d70 6174 6962 696c 6974 for compatibilit │ │ │ -00000d80: 792c 0a61 6e64 204e 4557 2073 686f 756c y,.and NEW shoul │ │ │ -00000d90: 6420 6265 2075 7365 6420 696e 7374 6561 d be used instea │ │ │ -00000da0: 642e 2020 4966 204e 4557 2069 7320 6120 d. If NEW is a │ │ │ -00000db0: 7374 7269 6e67 2c20 7468 656e 2074 6861 string, then tha │ │ │ -00000dc0: 7420 6973 2074 6865 0a60 7573 6520 696e t is the.`use in │ │ │ -00000dd0: 7374 6561 6427 206d 6573 7361 6765 2e1f stead' message.. │ │ │ -00000de0: 0a28 6465 6661 6c69 6173 2027 6d61 6b65 .(defalias 'make │ │ │ -00000df0: 2d63 6f6d 7061 7469 626c 652d 7661 7269 -compatible-vari │ │ │ -00000e00: 6162 6c65 2023 5b28 7661 7220 6e65 7729 able #[(var new) │ │ │ -00000e10: 2022 c209 c308 2388 0987 2220 5b6e 6577 "....#..." [new │ │ │ -00000e20: 2076 6172 2070 7574 2062 7974 652d 636f var put byte-co │ │ │ -00000e30: 6d70 6174 6962 6c65 2d76 6172 6961 626c mpatible-variabl │ │ │ -00000e40: 655d 2034 2028 2324 202e 2033 3338 3229 e] 4 (#$ . 3382) │ │ │ -00000e50: 2028 6c69 7374 2028 6c65 7420 2828 7374 (list (let ((st │ │ │ -00000e60: 7220 2863 6f6d 706c 6574 696e 672d 7265 r (completing-re │ │ │ -00000e70: 6164 2022 4d61 6b65 2076 6172 6961 626c ad "Make variabl │ │ │ -00000e80: 6520 636f 6d70 6174 6962 6c65 3a20 2220 e compatible: " │ │ │ -00000e90: 6f62 6172 7261 7920 2762 6f75 6e64 7020 obarray 'boundp │ │ │ -00000ea0: 7429 2929 2028 6966 2028 6571 7561 6c20 t))) (if (equal │ │ │ -00000eb0: 7374 7220 2222 2920 2865 7272 6f72 2022 str "") (error " │ │ │ -00000ec0: 2229 2920 2869 6e74 6572 6e20 7374 7229 ")) (intern str) │ │ │ -00000ed0: 2920 2863 6172 2028 7265 6164 2d66 726f ) (car (read-fro │ │ │ -00000ee0: 6d2d 7374 7269 6e67 2028 7265 6164 2d73 m-string (read-s │ │ │ -00000ef0: 7472 696e 6720 2243 6f6d 7061 7469 626c tring "Compatibl │ │ │ -00000f00: 6520 7265 706c 6163 656d 656e 743a 2022 e replacement: " │ │ │ -00000f10: 2929 2929 5d29 0a28 7075 7420 2764 6f6e ))))]).(put 'don │ │ │ -00000f20: 742d 636f 6d70 696c 6520 276c 6973 702d t-compile 'lisp- │ │ │ -00000f30: 696e 6465 6e74 2d68 6f6f 6b20 3029 0a23 indent-hook 0).# │ │ │ -00000f40: 4031 3430 204c 696b 6520 6070 726f 676e @140 Like `progn │ │ │ -00000f50: 272c 2062 7574 2074 6865 2062 6f64 7920 ', but the body │ │ │ -00000f60: 616c 7761 7973 2072 756e 7320 696e 7465 always runs inte │ │ │ -00000f70: 7270 7265 7465 6420 286e 6f74 2063 6f6d rpreted (not com │ │ │ -00000f80: 7069 6c65 6429 2e0a 4966 2079 6f75 2074 piled)..If you t │ │ │ -00000f90: 6869 6e6b 2079 6f75 206e 6565 6420 7468 hink you need th │ │ │ -00000fa0: 6973 2c20 796f 7527 7265 2070 726f 6261 is, you're proba │ │ │ -00000fb0: 626c 7920 6d61 6b69 6e67 2061 206d 6973 bly making a mis │ │ │ -00000fc0: 7461 6b65 2073 6f6d 6577 6865 7265 2e1f take somewhere.. │ │ │ -00000fd0: 0a28 6465 6661 6c69 6173 2027 646f 6e74 .(defalias 'dont │ │ │ -00000fe0: 2d63 6f6d 7069 6c65 2027 286d 6163 726f -compile '(macro │ │ │ -00000ff0: 202e 2023 5b28 2672 6573 7420 626f 6479 . #[(&rest body │ │ │ -00001000: 2920 22c1 c208 41ab 85c3 0842 aa82 0840 ) "...A....B...@ │ │ │ -00001010: 4444 8722 205b 626f 6479 2065 7661 6c20 DD." [body eval │ │ │ -00001020: 7175 6f74 6520 7072 6f67 6e5d 2034 2028 quote progn] 4 ( │ │ │ -00001030: 2324 202e 2033 3930 3929 5d29 290a 2870 #$ . 3909)])).(p │ │ │ -00001040: 7574 2027 6576 616c 2d77 6865 6e2d 636f ut 'eval-when-co │ │ │ -00001050: 6d70 696c 6520 276c 6973 702d 696e 6465 mpile 'lisp-inde │ │ │ -00001060: 6e74 2d68 6f6f 6b20 3029 0a23 4031 3234 nt-hook 0).#@124 │ │ │ -00001070: 204c 696b 6520 6070 726f 676e 272c 2062 Like `progn', b │ │ │ -00001080: 7574 2065 7661 6c75 6174 6573 2074 6865 ut evaluates the │ │ │ -00001090: 2062 6f64 7920 6174 2063 6f6d 7069 6c65 body at compile │ │ │ -000010a0: 2074 696d 652e 0a54 6865 2072 6573 756c time..The resul │ │ │ -000010b0: 7420 6f66 2074 6865 2062 6f64 7920 6170 t of the body ap │ │ │ -000010c0: 7065 6172 7320 746f 2074 6865 2063 6f6d pears to the com │ │ │ -000010d0: 7069 6c65 7220 6173 2061 2071 756f 7465 piler as a quote │ │ │ -000010e0: 6420 636f 6e73 7461 6e74 2e1f 0a28 6465 d constant...(de │ │ │ -000010f0: 6661 6c69 6173 2027 6576 616c 2d77 6865 falias 'eval-whe │ │ │ -00001100: 6e2d 636f 6d70 696c 6520 2728 6d61 6372 n-compile '(macr │ │ │ -00001110: 6f20 2e20 235b 2826 7265 7374 2062 6f64 o . #[(&rest bod │ │ │ -00001120: 7929 2022 c108 4287 2220 5b62 6f64 7920 y) "..B." [body │ │ │ -00001130: 7072 6f67 6e5d 2032 2028 2324 202e 2034 progn] 2 (#$ . 4 │ │ │ -00001140: 3230 3929 5d29 290a 2870 7574 2027 6576 209)])).(put 'ev │ │ │ -00001150: 616c 2d61 6e64 2d63 6f6d 7069 6c65 2027 al-and-compile ' │ │ │ -00001160: 6c69 7370 2d69 6e64 656e 742d 686f 6f6b lisp-indent-hook │ │ │ -00001170: 2030 290a 2340 3732 204c 696b 6520 6070 0).#@72 Like `p │ │ │ -00001180: 726f 676e 272c 2062 7574 2065 7661 6c75 rogn', but evalu │ │ │ -00001190: 6174 6573 2074 6865 2062 6f64 7920 6174 ates the body at │ │ │ -000011a0: 2063 6f6d 7069 6c65 2074 696d 6520 616e compile time an │ │ │ -000011b0: 6420 6174 206c 6f61 6420 7469 6d65 2e1f d at load time.. │ │ │ -000011c0: 0a28 6465 6661 6c69 6173 2027 6576 616c .(defalias 'eval │ │ │ -000011d0: 2d61 6e64 2d63 6f6d 7069 6c65 2027 286d -and-compile '(m │ │ │ -000011e0: 6163 726f 202e 2023 5b28 2672 6573 7420 acro . #[(&rest │ │ │ -000011f0: 626f 6479 2920 22c1 0842 8722 205b 626f body) "..B." [bo │ │ │ -00001200: 6479 2070 726f 676e 5d20 3220 2823 2420 dy progn] 2 (#$ │ │ │ -00001210: 2e20 3434 3733 295d 2929 0a28 7075 7420 . 4473)])).(put │ │ │ -00001220: 2765 7661 6c2d 7768 656e 2d66 6561 7475 'eval-when-featu │ │ │ -00001230: 7265 2027 6c69 7370 2d69 6e64 656e 742d re 'lisp-indent- │ │ │ -00001240: 686f 6f6b 2031 290a 2340 3236 3820 5275 hook 1).#@268 Ru │ │ │ -00001250: 6e20 7468 6520 626f 6479 2066 6f72 6d73 n the body forms │ │ │ -00001260: 2077 6865 6e20 4645 4154 5552 4520 6973 when FEATURE is │ │ │ -00001270: 2066 6561 7475 7265 702c 2062 6520 6974 featurep, be it │ │ │ -00001280: 206e 6f77 206f 7220 6c61 7465 722e 0a43 now or later..C │ │ │ -00001290: 616c 6c65 6420 2865 7661 6c2d 7768 656e alled (eval-when │ │ │ -000012a0: 2d66 6561 7475 7265 2028 4645 4154 5552 -feature (FEATUR │ │ │ -000012b0: 4520 5b2e 2046 494c 454e 414d 455d 2920 E [. FILENAME]) │ │ │ -000012c0: 424f 4459 464f 524d 532e 2e2e 292e 0a49 BODYFORMS...)..I │ │ │ -000012d0: 6620 2866 6561 7475 7265 7020 2746 4541 f (featurep 'FEA │ │ │ -000012e0: 5455 5245 292c 2065 7661 6c73 206e 6f77 TURE), evals now │ │ │ -000012f0: 3b20 6f74 6865 7277 6973 6520 6164 6473 ; otherwise adds │ │ │ -00001300: 2061 6e20 656c 7420 746f 0a60 6166 7465 an elt to.`afte │ │ │ -00001310: 722d 6c6f 6164 2d61 6c69 7374 2720 2877 r-load-alist' (w │ │ │ -00001320: 6869 6368 2073 6565 292c 2075 7369 6e67 hich see), using │ │ │ -00001330: 2046 4541 5455 5245 2061 7320 6669 6c65 FEATURE as file │ │ │ -00001340: 6e61 6d65 2069 6620 4649 4c45 4e41 4d45 name if FILENAME │ │ │ -00001350: 2069 7320 6e69 6c2e 1f0a 2864 6566 616c is nil...(defal │ │ │ -00001360: 6961 7320 2765 7661 6c2d 7768 656e 2d66 ias 'eval-when-f │ │ │ -00001370: 6561 7475 7265 2027 286d 6163 726f 202e eature '(macro . │ │ │ -00001380: 2023 5b28 6665 6174 7572 6520 2672 6573 #[(feature &res │ │ │ -00001390: 7420 626f 6479 2920 225c 6e41 ae84 c35c t body) "\nA...\ │ │ │ -000013a0: 6e40 2119 c4c5 c6c7 c808 4242 4444 43c9 n@!.......BBDDC. │ │ │ -000013b0: cacb 5c6e 4044 44cc cdce cfcb 09d0 4244 ..\n@DD.......BD │ │ │ -000013c0: d142 4245 4645 2987 2220 5b62 6f64 7920 .BBEFE)." [body │ │ │ -000013d0: 6669 6c65 2066 6561 7475 7265 2073 796d file feature sym │ │ │ -000013e0: 626f 6c2d 6e61 6d65 206c 6574 2062 6f64 bol-name let bod │ │ │ -000013f0: 7974 6875 6e6b 2066 756e 6374 696f 6e20 ythunk function │ │ │ -00001400: 6c61 6d62 6461 206e 696c 2069 6620 6665 lambda nil if fe │ │ │ -00001410: 6174 7572 6570 2071 756f 7465 2028 6675 aturep quote (fu │ │ │ -00001420: 6e63 616c 6c20 626f 6479 7468 756e 6b29 ncall bodythunk) │ │ │ -00001430: 2073 6574 7120 6166 7465 722d 6c6f 6164 setq after-load │ │ │ -00001440: 2d61 6c69 7374 2063 6f6e 7320 286c 6973 -alist cons (lis │ │ │ -00001450: 7420 276c 616d 6264 6120 276e 696c 2062 t 'lambda 'nil b │ │ │ -00001460: 6f64 7974 6875 6e6b 2920 2861 6674 6572 odythunk) (after │ │ │ -00001470: 2d6c 6f61 642d 616c 6973 7429 5d20 3131 -load-alist)] 11 │ │ │ -00001480: 2028 2324 202e 2034 3638 3629 5d29 290a (#$ . 4686)])). │ │ │ -00001490: 2870 7574 2027 6279 7465 2d63 6f6d 7069 (put 'byte-compi │ │ │ -000014a0: 6c65 722d 6f70 7469 6f6e 7320 276c 6973 ler-options 'lis │ │ │ -000014b0: 702d 696e 6465 6e74 2d68 6f6f 6b20 3029 p-indent-hook 0) │ │ │ -000014c0: 0a23 4031 3436 3120 5365 7420 736f 6d65 .#@1461 Set some │ │ │ -000014d0: 2063 6f6d 7069 6c61 7469 6f6e 2d70 6172 compilation-par │ │ │ -000014e0: 616d 6574 6572 7320 666f 7220 7468 6973 ameters for this │ │ │ -000014f0: 2066 696c 652e 2020 0a54 6869 7320 7769 file. .This wi │ │ │ -00001500: 6c6c 2061 6666 6563 7420 6f6e 6c79 2074 ll affect only t │ │ │ -00001510: 6865 2066 696c 6520 696e 2077 6869 6368 he file in which │ │ │ -00001520: 2069 7420 6170 7065 6172 733b 2074 6869 it appears; thi │ │ │ -00001530: 7320 646f 6573 206e 6f74 6869 6e67 2077 s does nothing w │ │ │ -00001540: 6865 6e0a 6576 616c 7561 7465 642c 206f hen.evaluated, o │ │ │ -00001550: 7220 7768 656e 206c 6f61 6465 6420 6672 r when loaded fr │ │ │ -00001560: 6f6d 2061 202e 656c 2066 696c 652e 0a0a om a .el file... │ │ │ -00001570: 4561 6368 2061 7267 756d 656e 7420 746f Each argument to │ │ │ -00001580: 2074 6869 7320 6d61 6372 6f20 6d75 7374 this macro must │ │ │ -00001590: 2062 6520 6120 6c69 7374 206f 6620 6120 be a list of a │ │ │ -000015a0: 6b65 7920 616e 6420 6120 7661 6c75 652e key and a value. │ │ │ -000015b0: 0a0a 2020 4b65 7973 3a09 0920 2056 616c .. Keys:.. Val │ │ │ -000015c0: 7565 733a 0909 436f 7272 6573 706f 6e64 ues:..Correspond │ │ │ -000015d0: 696e 6720 7661 7269 6162 6c65 3a0a 0a20 ing variable:.. │ │ │ -000015e0: 2076 6572 626f 7365 0920 2074 2c20 6e69 verbose. t, ni │ │ │ -000015f0: 6c09 0962 7974 652d 636f 6d70 696c 652d l..byte-compile- │ │ │ -00001600: 7665 7262 6f73 650a 2020 6f70 7469 6d69 verbose. optimi │ │ │ -00001610: 7a65 0920 2074 2c20 6e69 6c2c 2073 6f75 ze. t, nil, sou │ │ │ -00001620: 7263 652c 2062 7974 6509 6279 7465 2d6f rce, byte.byte-o │ │ │ -00001630: 7074 696d 697a 650a 2020 7761 726e 696e ptimize. warnin │ │ │ -00001640: 6773 0920 206c 6973 7420 6f66 2077 6172 gs. list of war │ │ │ -00001650: 6e69 6e67 7309 6279 7465 2d63 6f6d 7069 nings.byte-compi │ │ │ -00001660: 6c65 2d77 6172 6e69 6e67 730a 2020 6669 le-warnings. fi │ │ │ -00001670: 6c65 2d66 6f72 6d61 7409 2020 656d 6163 le-format. emac │ │ │ -00001680: 7331 392c 2065 6d61 6373 3230 0962 7974 s19, emacs20.byt │ │ │ -00001690: 652d 636f 6d70 696c 652d 656d 6163 7331 e-compile-emacs1 │ │ │ -000016a0: 392d 636f 6d70 6174 6962 696c 6974 790a 9-compatibility. │ │ │ -000016b0: 0a54 6865 2076 616c 7565 2073 7065 6369 .The value speci │ │ │ -000016c0: 6669 6564 2077 6974 6820 7468 6520 6077 fied with the `w │ │ │ -000016d0: 6172 6e69 6e67 7327 206f 7074 696f 6e20 arnings' option │ │ │ -000016e0: 6d75 7374 2062 6520 6120 6c69 7374 2c20 must be a list, │ │ │ -000016f0: 636f 6e74 6169 6e69 6e67 0a73 6f6d 6520 containing.some │ │ │ -00001700: 7375 6273 6574 206f 6620 7468 6520 666f subset of the fo │ │ │ -00001710: 6c6c 6f77 696e 6720 666c 6167 733a 0a0a llowing flags:.. │ │ │ -00001720: 2020 6672 6565 2d76 6172 7309 7265 6665 free-vars.refe │ │ │ -00001730: 7265 6e63 6573 2074 6f20 7661 7269 6162 rences to variab │ │ │ -00001740: 6c65 7320 6e6f 7420 696e 2074 6865 2063 les not in the c │ │ │ -00001750: 7572 7265 6e74 206c 6578 6963 616c 2073 urrent lexical s │ │ │ -00001760: 636f 7065 2e0a 2020 756e 7573 6564 2d76 cope.. unused-v │ │ │ -00001770: 6172 7309 7265 6665 7265 6e63 6573 2074 ars.references t │ │ │ -00001780: 6f20 6e6f 6e2d 676c 6f62 616c 2076 6172 o non-global var │ │ │ -00001790: 6961 626c 6573 2062 6f75 6e64 2062 7574 iables bound but │ │ │ -000017a0: 206e 6f74 2072 6566 6572 656e 6365 642e not referenced. │ │ │ -000017b0: 0a20 2075 6e72 6573 6f6c 7665 6409 6361 . unresolved.ca │ │ │ -000017c0: 6c6c 7320 746f 2075 6e6b 6e6f 776e 2066 lls to unknown f │ │ │ -000017d0: 756e 6374 696f 6e73 2e0a 2020 6361 6c6c unctions.. call │ │ │ -000017e0: 6172 6773 096c 616d 6264 6120 6361 6c6c args.lambda call │ │ │ -000017f0: 7320 7769 7468 2061 7267 7320 7468 6174 s with args that │ │ │ -00001800: 2064 6f6e 2774 206d 6174 6368 2074 6865 don't match the │ │ │ -00001810: 2064 6566 696e 6974 696f 6e2e 0a20 2072 definition.. r │ │ │ -00001820: 6564 6566 696e 6509 6675 6e63 7469 6f6e edefine.function │ │ │ -00001830: 2063 656c 6c20 7265 6465 6669 6e65 6420 cell redefined │ │ │ -00001840: 6672 6f6d 2061 206d 6163 726f 2074 6f20 from a macro to │ │ │ -00001850: 6120 6c61 6d62 6461 206f 7220 7669 6365 a lambda or vice │ │ │ -00001860: 0a09 0976 6572 7361 2c20 6f72 2072 6564 ...versa, or red │ │ │ -00001870: 6566 696e 6564 2074 6f20 7461 6b65 2061 efined to take a │ │ │ -00001880: 2064 6966 6665 7265 6e74 206e 756d 6265 different numbe │ │ │ -00001890: 7220 6f66 2061 7267 756d 656e 7473 2e0a r of arguments.. │ │ │ -000018a0: 0a49 6620 7468 6520 6669 7273 7420 656c .If the first el │ │ │ -000018b0: 656d 656e 7420 6966 2074 6865 206c 6973 ement if the lis │ │ │ -000018c0: 7420 6973 2060 2b27 206f 7220 602d 2720 t is `+' or `-' │ │ │ -000018d0: 7468 656e 2074 6865 2073 7065 6369 6669 then the specifi │ │ │ -000018e0: 6564 2065 6c65 6d65 6e74 7320 0a61 7265 ed elements .are │ │ │ -000018f0: 2061 6464 6564 2074 6f20 6f72 2072 656d added to or rem │ │ │ -00001900: 6f76 6564 2066 726f 6d20 7468 6520 6375 oved from the cu │ │ │ -00001910: 7272 656e 7420 7365 7420 6f66 2077 6172 rrent set of war │ │ │ -00001920: 6e69 6e67 732c 2069 6e73 7465 6164 206f nings, instead o │ │ │ -00001930: 6620 7468 650a 656e 7469 7265 2073 6574 f the.entire set │ │ │ -00001940: 206f 6620 7761 726e 696e 6773 2062 6569 of warnings bei │ │ │ -00001950: 6e67 206f 7665 7277 7269 7474 656e 2e0a ng overwritten.. │ │ │ -00001960: 0a46 6f72 2065 7861 6d70 6c65 2c20 736f .For example, so │ │ │ -00001970: 6d65 7468 696e 6720 6c69 6b65 2074 6869 mething like thi │ │ │ -00001980: 7320 6d69 6768 7420 6170 7065 6172 2061 s might appear a │ │ │ -00001990: 7420 7468 6520 746f 7020 6f66 2061 2073 t the top of a s │ │ │ -000019a0: 6f75 7263 6520 6669 6c65 3a0a 0a20 2020 ource file:.. │ │ │ -000019b0: 2028 6279 7465 2d63 6f6d 7069 6c65 722d (byte-compiler- │ │ │ -000019c0: 6f70 7469 6f6e 730a 2020 2020 2020 286f options. (o │ │ │ -000019d0: 7074 696d 697a 6520 7429 0a20 2020 2020 ptimize t). │ │ │ -000019e0: 2028 7761 726e 696e 6773 2028 2d20 6361 (warnings (- ca │ │ │ -000019f0: 6c6c 6172 6773 2929 0909 3b20 446f 6e27 llargs))..; Don' │ │ │ -00001a00: 7420 7761 726e 2061 626f 7574 2061 7267 t warn about arg │ │ │ -00001a10: 6c69 7374 206d 6973 6d61 7463 680a 2020 list mismatch. │ │ │ -00001a20: 2020 2020 2877 6172 6e69 6e67 7320 282b (warnings (+ │ │ │ -00001a30: 2075 6e75 7365 642d 7661 7273 2929 093b unused-vars)).; │ │ │ -00001a40: 2044 6f20 7761 726e 2061 626f 7574 2075 Do warn about u │ │ │ -00001a50: 6e75 7365 6420 6269 6e64 696e 6773 0a20 nused bindings. │ │ │ -00001a60: 2020 2020 2028 6669 6c65 2d66 6f72 6d61 (file-forma │ │ │ -00001a70: 7420 656d 6163 7331 3929 291f 0a28 6465 t emacs19))..(de │ │ │ -00001a80: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -00001a90: 7069 6c65 722d 6f70 7469 6f6e 7320 2728 piler-options '( │ │ │ -00001aa0: 6d61 6372 6f20 2e20 235b 2826 7265 7374 macro . #[(&rest │ │ │ -00001ab0: 2061 7267 7329 2022 c087 2220 5b6e 696c args) ".." [nil │ │ │ -00001ac0: 5d20 3120 2823 2420 2e20 3533 3230 295d ] 1 (#$ . 5320)] │ │ │ -00001ad0: 2929 0a )). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3037 2032 3032 310a 3b3b 3b20 :08:07 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f62 7974 6563 6f6d 702d 4/lisp/bytecomp- │ │ │ +00000090: 7275 6e74 696d 652e 656c 0a3b 3b3b 2065 runtime.el.;;; e │ │ │ +000000a0: 6d61 6373 2076 6572 7369 6f6e 2032 312e macs version 21. │ │ │ +000000b0: 3420 2870 6174 6368 2032 3429 2022 5374 4 (patch 24) "St │ │ │ +000000c0: 616e 6461 7264 2043 2220 5845 6d61 6373 andard C" XEmacs │ │ │ +000000d0: 204c 7563 6964 2e0a 3b3b 3b20 6279 7465 Lucid..;;; byte │ │ │ +000000e0: 636f 6d70 2076 6572 7369 6f6e 2032 2e32 comp version 2.2 │ │ │ +000000f0: 3720 5845 6d61 6373 3b20 3230 3030 2d30 7 XEmacs; 2000-0 │ │ │ +00000100: 392d 3132 2e0a 3b3b 3b20 6f70 7469 6d69 9-12..;;; optimi │ │ │ +00000110: 7a61 7469 6f6e 2069 7320 6f6e 2e0a 3b3b zation is on..;; │ │ │ +00000120: 3b20 7468 6973 2066 696c 6520 7573 6573 ; this file uses │ │ │ +00000130: 206f 7063 6f64 6573 2077 6869 6368 2064 opcodes which d │ │ │ +00000140: 6f20 6e6f 7420 6578 6973 7420 696e 2045 o not exist in E │ │ │ +00000150: 6d61 6373 2031 392e 0a0a 2869 6620 2861 macs 19...(if (a │ │ │ +00000160: 6e64 2028 626f 756e 6470 2027 656d 6163 nd (boundp 'emac │ │ │ +00000170: 732d 7665 7273 696f 6e29 0a09 2028 6f72 s-version).. (or │ │ │ +00000180: 2028 616e 6420 2862 6f75 6e64 7020 2765 (and (boundp 'e │ │ │ +00000190: 706f 6368 3a3a 7665 7273 696f 6e29 2065 poch::version) e │ │ │ +000001a0: 706f 6368 3a3a 7665 7273 696f 6e29 0a09 poch::version).. │ │ │ +000001b0: 2020 2020 2028 7374 7269 6e67 2d6c 6573 (string-les │ │ │ +000001c0: 7370 2065 6d61 6373 2d76 6572 7369 6f6e sp emacs-version │ │ │ +000001d0: 2022 3230 2229 2929 0a20 2020 2028 6572 "20"))). (er │ │ │ +000001e0: 726f 7220 2260 6279 7465 636f 6d70 2d72 ror "`bytecomp-r │ │ │ +000001f0: 756e 7469 6d65 2e65 6c27 2077 6173 2063 untime.el' was c │ │ │ +00000200: 6f6d 7069 6c65 6420 666f 7220 456d 6163 ompiled for Emac │ │ │ +00000210: 7320 3230 2229 290a 0a28 6f72 2028 626f s 20"))..(or (bo │ │ │ +00000220: 756e 6470 2027 6375 7272 656e 742d 6c6f undp 'current-lo │ │ │ +00000230: 6164 2d6c 6973 7429 2028 7365 7471 2063 ad-list) (setq c │ │ │ +00000240: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ +00000250: 206e 696c 2929 0a0a 0a28 6279 7465 2d63 nil))...(byte-c │ │ │ +00000260: 6f64 6520 22c0 c14d 88c2 c0c3 c423 8722 ode "..M.....#." │ │ │ +00000270: 205b 696e 6c69 6e65 2070 726f 676e 2070 [inline progn p │ │ │ +00000280: 7574 206c 6973 702d 696e 6465 6e74 2d68 ut lisp-indent-h │ │ │ +00000290: 6f6f 6b20 305d 2034 290a 2340 3134 3420 ook 0] 4).#@144 │ │ │ +000002a0: 4361 7573 6520 7468 6520 6e61 6d65 6420 Cause the named │ │ │ +000002b0: 6675 6e63 7469 6f6e 7320 746f 2062 6520 functions to be │ │ │ +000002c0: 6f70 656e 2d63 6f64 6564 2077 6865 6e20 open-coded when │ │ │ +000002d0: 6361 6c6c 6564 2066 726f 6d20 636f 6d70 called from comp │ │ │ +000002e0: 696c 6564 2063 6f64 652e 0a54 6865 7920 iled code..They │ │ │ +000002f0: 7769 6c6c 206f 6e6c 7920 6265 2063 6f6d will only be com │ │ │ +00000300: 7069 6c65 6420 6f70 656e 2d63 6f64 6564 piled open-coded │ │ │ +00000310: 2077 6865 6e20 6062 7974 652d 6f70 7469 when `byte-opti │ │ │ +00000320: 6d69 7a65 2720 6973 2074 7275 652e 1f0a mize' is true... │ │ │ +00000330: 2864 6566 616c 6961 7320 2770 726f 636c (defalias 'procl │ │ │ +00000340: 6169 6d2d 696e 6c69 6e65 2027 286d 6163 aim-inline '(mac │ │ │ +00000350: 726f 202e 2023 5b28 2672 6573 7420 666e ro . #[(&rest fn │ │ │ +00000360: 7329 2022 c1c2 c3c4 c508 5c22 5c22 4287 s) "......\"\"B. │ │ │ +00000370: 2220 5b66 6e73 2065 7661 6c2d 616e 642d " [fns eval-and- │ │ │ +00000380: 636f 6d70 696c 6520 6170 706c 7920 6e63 compile apply nc │ │ │ +00000390: 6f6e 6320 6d61 7063 6172 2023 5b28 7829 onc mapcar #[(x) │ │ │ +000003a0: 2022 c1c2 c3c4 0844 c542 42c6 4242 c7c8 ".....D.BB.BB.. │ │ │ +000003b0: c408 4445 45c9 c408 44ca 4242 4487 2220 ..DEE...D.BBD." │ │ │ +000003c0: 5b78 206f 7220 6d65 6d71 2067 6574 2071 [x or memq get q │ │ │ +000003d0: 756f 7465 2028 2762 7974 652d 6f70 7469 uote ('byte-opti │ │ │ +000003e0: 6d69 7a65 7229 2028 2728 6e69 6c20 6279 mizer) ('(nil by │ │ │ +000003f0: 7465 2d63 6f6d 7069 6c65 2d69 6e6c 696e te-compile-inlin │ │ │ +00000400: 652d 6578 7061 6e64 2929 2065 7272 6f72 e-expand)) error │ │ │ +00000410: 2022 2573 2061 6c72 6561 6479 2068 6173 "%s already has │ │ │ +00000420: 2061 2062 7974 652d 6f70 7469 6d69 7a65 a byte-optimize │ │ │ +00000430: 722c 2063 616e 2774 206d 616b 6520 6974 r, can't make it │ │ │ +00000440: 2069 6e6c 696e 6522 2070 7574 2028 2762 inline" put ('b │ │ │ +00000450: 7974 652d 6f70 7469 6d69 7a65 7220 2762 yte-optimizer 'b │ │ │ +00000460: 7974 652d 636f 6d70 696c 652d 696e 6c69 yte-compile-inli │ │ │ +00000470: 6e65 2d65 7870 616e 6429 5d20 365d 5d20 ne-expand)] 6]] │ │ │ +00000480: 3620 2823 2420 2e20 3637 3229 5d29 290a 6 (#$ . 672)])). │ │ │ +00000490: 2340 3535 2043 6175 7365 2074 6865 206e #@55 Cause the n │ │ │ +000004a0: 616d 6564 2066 756e 6374 696f 6e73 2074 amed functions t │ │ │ +000004b0: 6f20 6e6f 206c 6f6e 6765 7220 6265 206f o no longer be o │ │ │ +000004c0: 7065 6e2d 636f 6465 642e 1f0a 2864 6566 pen-coded...(def │ │ │ +000004d0: 616c 6961 7320 2770 726f 636c 6169 6d2d alias 'proclaim- │ │ │ +000004e0: 6e6f 7469 6e6c 696e 6520 2728 6d61 6372 notinline '(macr │ │ │ +000004f0: 6f20 2e20 235b 2826 7265 7374 2066 6e73 o . #[(&rest fns │ │ │ +00000500: 2920 22c1 c2c3 c4c5 085c 225c 2242 8722 ) "......\"\"B." │ │ │ +00000510: 205b 666e 7320 6576 616c 2d61 6e64 2d63 [fns eval-and-c │ │ │ +00000520: 6f6d 7069 6c65 2061 7070 6c79 206e 636f ompile apply nco │ │ │ +00000530: 6e63 206d 6170 6361 7220 235b 2878 2920 nc mapcar #[(x) │ │ │ +00000540: 22c1 c2c3 c408 44c5 4242 c642 42c7 c408 ".....D.BB.BB... │ │ │ +00000550: 44c8 4242 4543 8722 205b 7820 6966 2065 D.BBEC." [x if e │ │ │ +00000560: 7120 6765 7420 7175 6f74 6520 2827 6279 q get quote ('by │ │ │ +00000570: 7465 2d6f 7074 696d 697a 6572 2920 2827 te-optimizer) (' │ │ │ +00000580: 6279 7465 2d63 6f6d 7069 6c65 2d69 6e6c byte-compile-inl │ │ │ +00000590: 696e 652d 6578 7061 6e64 2920 7075 7420 ine-expand) put │ │ │ +000005a0: 2827 6279 7465 2d6f 7074 696d 697a 6572 ('byte-optimizer │ │ │ +000005b0: 206e 696c 295d 2035 5d5d 2036 2028 2324 nil)] 5]] 6 (#$ │ │ │ +000005c0: 202e 2031 3137 3329 5d29 290a 2340 3730 . 1173)])).#@70 │ │ │ +000005d0: 2044 6566 696e 6520 616e 2069 6e6c 696e Define an inlin │ │ │ +000005e0: 6520 6675 6e63 7469 6f6e 2e20 2054 6865 e function. The │ │ │ +000005f0: 2073 796e 7461 7820 6973 206a 7573 7420 syntax is just │ │ │ +00000600: 6c69 6b65 2074 6861 7420 6f66 2060 6465 like that of `de │ │ │ +00000610: 6675 6e27 2e1f 0a28 6465 6661 6c69 6173 fun'...(defalias │ │ │ +00000620: 2027 6465 6673 7562 7374 2027 286d 6163 'defsubst '(mac │ │ │ +00000630: 726f 202e 2023 5b28 6e61 6d65 2061 7267 ro . #[(name arg │ │ │ +00000640: 6c69 7374 2026 7265 7374 2062 6f64 7929 list &rest body) │ │ │ +00000650: 2022 5c6e c34e c473 ac85 c5c6 5c6e 5c22 "\n.N.s....\n\" │ │ │ +00000660: 88c7 c85c 6e09 0842 4242 c95c 6e44 4587 ...\n..BBB.\nDE. │ │ │ +00000670: 2220 5b62 6f64 7920 6172 676c 6973 7420 " [body arglist │ │ │ +00000680: 6e61 6d65 2062 7974 652d 6f70 7469 6d69 name byte-optimi │ │ │ +00000690: 7a65 7220 286e 696c 2062 7974 652d 636f zer (nil byte-co │ │ │ +000006a0: 6d70 696c 652d 696e 6c69 6e65 2d65 7870 mpile-inline-exp │ │ │ +000006b0: 616e 6429 2065 7272 6f72 2022 6025 7327 and) error "`%s' │ │ │ +000006c0: 2069 7320 6120 7072 696d 6974 6976 6522 is a primitive" │ │ │ +000006d0: 2070 726f 6731 2064 6566 756e 2070 726f prog1 defun pro │ │ │ +000006e0: 636c 6169 6d2d 696e 6c69 6e65 5d20 3520 claim-inline] 5 │ │ │ +000006f0: 2823 2420 2e20 3134 3839 295d 2929 0a23 (#$ . 1489)])).# │ │ │ +00000700: 4032 3939 204d 616b 6520 7468 6520 6279 @299 Make the by │ │ │ +00000710: 7465 2d63 6f6d 7069 6c65 7220 7761 726e te-compiler warn │ │ │ +00000720: 2074 6861 7420 6675 6e63 7469 6f6e 2046 that function F │ │ │ +00000730: 4e20 6973 206f 6273 6f6c 6574 652e 0a54 N is obsolete..T │ │ │ +00000740: 6865 2077 6172 6e69 6e67 2077 696c 6c20 he warning will │ │ │ +00000750: 7361 7920 7468 6174 204e 4557 2073 686f say that NEW sho │ │ │ +00000760: 756c 6420 6265 2075 7365 6420 696e 7374 uld be used inst │ │ │ +00000770: 6561 642e 0a49 6620 4e45 5720 6973 2061 ead..If NEW is a │ │ │ +00000780: 2073 7472 696e 672c 2074 6861 7420 6973 string, that is │ │ │ +00000790: 2074 6865 2060 7573 6520 696e 7374 6561 the `use instea │ │ │ +000007a0: 6427 206d 6573 7361 6765 2e0a 4966 2070 d' message..If p │ │ │ +000007b0: 726f 7669 6465 642c 2057 4845 4e20 7368 rovided, WHEN sh │ │ │ +000007c0: 6f75 6c64 2062 6520 6120 7374 7269 6e67 ould be a string │ │ │ +000007d0: 2069 6e64 6963 6174 696e 6720 7768 656e indicating when │ │ │ +000007e0: 2074 6865 2066 756e 6374 696f 6e0a 7761 the function.wa │ │ │ +000007f0: 7320 6669 7273 7420 6d61 6465 206f 6273 s first made obs │ │ │ +00000800: 6f6c 6574 652c 2066 6f72 2065 7861 6d70 olete, for examp │ │ │ +00000810: 6c65 2061 2064 6174 6520 6f72 2061 2072 le a date or a r │ │ │ +00000820: 656c 6561 7365 206e 756d 6265 722e 1f0a elease number... │ │ │ +00000830: 2864 6566 616c 6961 7320 276d 616b 652d (defalias 'make- │ │ │ +00000840: 6f62 736f 6c65 7465 2023 5b28 666e 206e obsolete #[(fn n │ │ │ +00000850: 6577 2026 6f70 7469 6f6e 616c 2077 6865 ew &optional whe │ │ │ +00000860: 6e29 2022 5c6e c34e 8919 c461 ab88 5c6e n) "\n.N...a..\n │ │ │ +00000870: c54e 08a0 88aa 8ec6 5c6e c508 0942 2388 .N......\n...B#. │ │ │ +00000880: c65c 6ec3 c423 8829 5c6e 8722 205b 6e65 .\n..#.)\n." [ne │ │ │ +00000890: 7720 6861 6e64 6c65 7220 666e 2062 7974 w handler fn byt │ │ │ +000008a0: 652d 636f 6d70 696c 6520 6279 7465 2d63 e-compile byte-c │ │ │ +000008b0: 6f6d 7069 6c65 2d6f 6273 6f6c 6574 6520 ompile-obsolete │ │ │ +000008c0: 6279 7465 2d6f 6273 6f6c 6574 652d 696e byte-obsolete-in │ │ │ +000008d0: 666f 2070 7574 5d20 3620 2823 2420 2e20 fo put] 6 (#$ . │ │ │ +000008e0: 3137 3937 2920 2261 4d61 6b65 2066 756e 1797) "aMake fun │ │ │ +000008f0: 6374 696f 6e20 6f62 736f 6c65 7465 3a20 ction obsolete: │ │ │ +00000900: 5c6e 784f 6273 6f6c 6574 696f 6e20 7265 \nxObsoletion re │ │ │ +00000910: 706c 6163 656d 656e 743a 2022 5d29 0a23 placement: "]).# │ │ │ +00000920: 4032 3834 204d 616b 6520 7468 6520 6279 @284 Make the by │ │ │ +00000930: 7465 2d63 6f6d 7069 6c65 7220 7761 726e te-compiler warn │ │ │ +00000940: 2074 6861 7420 7661 7269 6162 6c65 2056 that variable V │ │ │ +00000950: 4152 2069 7320 6f62 736f 6c65 7465 2c0a AR is obsolete,. │ │ │ +00000960: 616e 6420 4e45 5720 7368 6f75 6c64 2062 and NEW should b │ │ │ +00000970: 6520 7573 6564 2069 6e73 7465 6164 2e20 e used instead. │ │ │ +00000980: 2049 6620 4e45 5720 6973 2061 2073 7472 If NEW is a str │ │ │ +00000990: 696e 672c 2074 6865 6e20 7468 6174 2069 ing, then that i │ │ │ +000009a0: 7320 7468 650a 6075 7365 2069 6e73 7465 s the.`use inste │ │ │ +000009b0: 6164 2720 6d65 7373 6167 652e 0a49 6620 ad' message..If │ │ │ +000009c0: 7072 6f76 6964 6564 2c20 5748 454e 2073 provided, WHEN s │ │ │ +000009d0: 686f 756c 6420 6265 2061 2073 7472 696e hould be a strin │ │ │ +000009e0: 6720 696e 6469 6361 7469 6e67 2077 6865 g indicating whe │ │ │ +000009f0: 6e20 7468 6520 7661 7269 6162 6c65 0a77 n the variable.w │ │ │ +00000a00: 6173 2066 6972 7374 206d 6164 6520 6f62 as first made ob │ │ │ +00000a10: 736f 6c65 7465 2c20 666f 7220 6578 616d solete, for exam │ │ │ +00000a20: 706c 6520 6120 6461 7465 206f 7220 6120 ple a date or a │ │ │ +00000a30: 7265 6c65 6173 6520 6e75 6d62 6572 2e1f release number.. │ │ │ +00000a40: 0a28 6465 6661 6c69 6173 2027 6d61 6b65 .(defalias 'make │ │ │ +00000a50: 2d6f 6273 6f6c 6574 652d 7661 7269 6162 -obsolete-variab │ │ │ +00000a60: 6c65 2023 5b28 7661 7220 6e65 7720 266f le #[(var new &o │ │ │ +00000a70: 7074 696f 6e61 6c20 7768 656e 2920 22c2 ptional when) ". │ │ │ +00000a80: 09c3 0823 8809 8722 205b 6e65 7720 7661 ...#..." [new va │ │ │ +00000a90: 7220 7075 7420 6279 7465 2d6f 6273 6f6c r put byte-obsol │ │ │ +00000aa0: 6574 652d 7661 7269 6162 6c65 5d20 3420 ete-variable] 4 │ │ │ +00000ab0: 2823 2420 2e20 3233 3431 2920 286c 6973 (#$ . 2341) (lis │ │ │ +00000ac0: 7420 286c 6574 2028 2873 7472 2028 636f t (let ((str (co │ │ │ +00000ad0: 6d70 6c65 7469 6e67 2d72 6561 6420 224d mpleting-read "M │ │ │ +00000ae0: 616b 6520 7661 7269 6162 6c65 206f 6273 ake variable obs │ │ │ +00000af0: 6f6c 6574 653a 2022 206f 6261 7272 6179 olete: " obarray │ │ │ +00000b00: 2027 626f 756e 6470 2074 2929 2920 2869 'boundp t))) (i │ │ │ +00000b10: 6620 2865 7175 616c 2073 7472 2022 2229 f (equal str "") │ │ │ +00000b20: 2028 6572 726f 7220 2222 2929 2028 696e (error "")) (in │ │ │ +00000b30: 7465 726e 2073 7472 2929 2028 6361 7220 tern str)) (car │ │ │ +00000b40: 2872 6561 642d 6672 6f6d 2d73 7472 696e (read-from-strin │ │ │ +00000b50: 6720 2872 6561 642d 7374 7269 6e67 2022 g (read-string " │ │ │ +00000b60: 4f62 736f 6c65 7469 6f6e 2072 6570 6c61 Obsoletion repla │ │ │ +00000b70: 6365 6d65 6e74 3a20 2229 2929 295d 290a cement: "))))]). │ │ │ +00000b80: 2340 3138 3620 4d61 6b65 2074 6865 2062 #@186 Make the b │ │ │ +00000b90: 7974 652d 636f 6d70 696c 6572 206b 6e6f yte-compiler kno │ │ │ +00000ba0: 7720 7468 6174 2066 756e 6374 696f 6e20 w that function │ │ │ +00000bb0: 464e 2069 7320 7072 6f76 6964 6564 2066 FN is provided f │ │ │ +00000bc0: 6f72 2063 6f6d 7061 7469 6269 6c69 7479 or compatibility │ │ │ +00000bd0: 2e0a 5468 6520 7761 726e 696e 6720 7769 ..The warning wi │ │ │ +00000be0: 6c6c 2073 6179 2074 6861 7420 4e45 5720 ll say that NEW │ │ │ +00000bf0: 7368 6f75 6c64 2062 6520 7573 6564 2069 should be used i │ │ │ +00000c00: 6e73 7465 6164 2e0a 4966 204e 4557 2069 nstead..If NEW i │ │ │ +00000c10: 7320 6120 7374 7269 6e67 2c20 7468 6174 s a string, that │ │ │ +00000c20: 2069 7320 7468 6520 6075 7365 2069 6e73 is the `use ins │ │ │ +00000c30: 7465 6164 2720 6d65 7373 6167 652e 1f0a tead' message... │ │ │ +00000c40: 2864 6566 616c 6961 7320 276d 616b 652d (defalias 'make- │ │ │ +00000c50: 636f 6d70 6174 6962 6c65 2023 5b28 666e compatible #[(fn │ │ │ +00000c60: 206e 6577 2920 225c 6ec3 4e89 19c4 61ab new) "\n.N...a. │ │ │ +00000c70: 885c 6ec5 4e08 a088 aa8e c65c 6ec5 0809 .\n.N......\n... │ │ │ +00000c80: 4223 88c6 5c6e c3c4 2388 295c 6e87 2220 B#..\n..#.)\n." │ │ │ +00000c90: 5b6e 6577 2068 616e 646c 6572 2066 6e20 [new handler fn │ │ │ +00000ca0: 6279 7465 2d63 6f6d 7069 6c65 2062 7974 byte-compile byt │ │ │ +00000cb0: 652d 636f 6d70 696c 652d 636f 6d70 6174 e-compile-compat │ │ │ +00000cc0: 6962 6c65 2062 7974 652d 636f 6d70 6174 ible byte-compat │ │ │ +00000cd0: 6962 6c65 2d69 6e66 6f20 7075 745d 2036 ible-info put] 6 │ │ │ +00000ce0: 2028 2324 202e 2032 3935 3029 2022 614d (#$ . 2950) "aM │ │ │ +00000cf0: 616b 6520 6675 6e63 7469 6f6e 2063 6f6d ake function com │ │ │ +00000d00: 7061 7469 626c 653a 205c 6e78 436f 6d70 patible: \nxComp │ │ │ +00000d10: 6174 6962 6c65 2072 6570 6c61 6365 6d65 atible replaceme │ │ │ +00000d20: 6e74 3a20 225d 290a 2340 3137 3120 4d61 nt: "]).#@171 Ma │ │ │ +00000d30: 6b65 2074 6865 2062 7974 652d 636f 6d70 ke the byte-comp │ │ │ +00000d40: 696c 6572 206b 6e6f 7720 7468 6174 2076 iler know that v │ │ │ +00000d50: 6172 6961 626c 6520 5641 5220 6973 2070 ariable VAR is p │ │ │ +00000d60: 726f 7669 6465 6420 666f 7220 636f 6d70 rovided for comp │ │ │ +00000d70: 6174 6962 696c 6974 792c 0a61 6e64 204e atibility,.and N │ │ │ +00000d80: 4557 2073 686f 756c 6420 6265 2075 7365 EW should be use │ │ │ +00000d90: 6420 696e 7374 6561 642e 2020 4966 204e d instead. If N │ │ │ +00000da0: 4557 2069 7320 6120 7374 7269 6e67 2c20 EW is a string, │ │ │ +00000db0: 7468 656e 2074 6861 7420 6973 2074 6865 then that is the │ │ │ +00000dc0: 0a60 7573 6520 696e 7374 6561 6427 206d .`use instead' m │ │ │ +00000dd0: 6573 7361 6765 2e1f 0a28 6465 6661 6c69 essage...(defali │ │ │ +00000de0: 6173 2027 6d61 6b65 2d63 6f6d 7061 7469 as 'make-compati │ │ │ +00000df0: 626c 652d 7661 7269 6162 6c65 2023 5b28 ble-variable #[( │ │ │ +00000e00: 7661 7220 6e65 7729 2022 c209 c308 2388 var new) "....#. │ │ │ +00000e10: 0987 2220 5b6e 6577 2076 6172 2070 7574 .." [new var put │ │ │ +00000e20: 2062 7974 652d 636f 6d70 6174 6962 6c65 byte-compatible │ │ │ +00000e30: 2d76 6172 6961 626c 655d 2034 2028 2324 -variable] 4 (#$ │ │ │ +00000e40: 202e 2033 3337 3429 2028 6c69 7374 2028 . 3374) (list ( │ │ │ +00000e50: 6c65 7420 2828 7374 7220 2863 6f6d 706c let ((str (compl │ │ │ +00000e60: 6574 696e 672d 7265 6164 2022 4d61 6b65 eting-read "Make │ │ │ +00000e70: 2076 6172 6961 626c 6520 636f 6d70 6174 variable compat │ │ │ +00000e80: 6962 6c65 3a20 2220 6f62 6172 7261 7920 ible: " obarray │ │ │ +00000e90: 2762 6f75 6e64 7020 7429 2929 2028 6966 'boundp t))) (if │ │ │ +00000ea0: 2028 6571 7561 6c20 7374 7220 2222 2920 (equal str "") │ │ │ +00000eb0: 2865 7272 6f72 2022 2229 2920 2869 6e74 (error "")) (int │ │ │ +00000ec0: 6572 6e20 7374 7229 2920 2863 6172 2028 ern str)) (car ( │ │ │ +00000ed0: 7265 6164 2d66 726f 6d2d 7374 7269 6e67 read-from-string │ │ │ +00000ee0: 2028 7265 6164 2d73 7472 696e 6720 2243 (read-string "C │ │ │ +00000ef0: 6f6d 7061 7469 626c 6520 7265 706c 6163 ompatible replac │ │ │ +00000f00: 656d 656e 743a 2022 2929 2929 5d29 0a28 ement: "))))]).( │ │ │ +00000f10: 7075 7420 2764 6f6e 742d 636f 6d70 696c put 'dont-compil │ │ │ +00000f20: 6520 276c 6973 702d 696e 6465 6e74 2d68 e 'lisp-indent-h │ │ │ +00000f30: 6f6f 6b20 3029 0a23 4031 3430 204c 696b ook 0).#@140 Lik │ │ │ +00000f40: 6520 6070 726f 676e 272c 2062 7574 2074 e `progn', but t │ │ │ +00000f50: 6865 2062 6f64 7920 616c 7761 7973 2072 he body always r │ │ │ +00000f60: 756e 7320 696e 7465 7270 7265 7465 6420 uns interpreted │ │ │ +00000f70: 286e 6f74 2063 6f6d 7069 6c65 6429 2e0a (not compiled).. │ │ │ +00000f80: 4966 2079 6f75 2074 6869 6e6b 2079 6f75 If you think you │ │ │ +00000f90: 206e 6565 6420 7468 6973 2c20 796f 7527 need this, you' │ │ │ +00000fa0: 7265 2070 726f 6261 626c 7920 6d61 6b69 re probably maki │ │ │ +00000fb0: 6e67 2061 206d 6973 7461 6b65 2073 6f6d ng a mistake som │ │ │ +00000fc0: 6577 6865 7265 2e1f 0a28 6465 6661 6c69 ewhere...(defali │ │ │ +00000fd0: 6173 2027 646f 6e74 2d63 6f6d 7069 6c65 as 'dont-compile │ │ │ +00000fe0: 2027 286d 6163 726f 202e 2023 5b28 2672 '(macro . #[(&r │ │ │ +00000ff0: 6573 7420 626f 6479 2920 22c1 c208 41ab est body) "...A. │ │ │ +00001000: 85c3 0842 aa82 0840 4444 8722 205b 626f ...B...@DD." [bo │ │ │ +00001010: 6479 2065 7661 6c20 7175 6f74 6520 7072 dy eval quote pr │ │ │ +00001020: 6f67 6e5d 2034 2028 2324 202e 2033 3930 ogn] 4 (#$ . 390 │ │ │ +00001030: 3129 5d29 290a 2870 7574 2027 6576 616c 1)])).(put 'eval │ │ │ +00001040: 2d77 6865 6e2d 636f 6d70 696c 6520 276c -when-compile 'l │ │ │ +00001050: 6973 702d 696e 6465 6e74 2d68 6f6f 6b20 isp-indent-hook │ │ │ +00001060: 3029 0a23 4031 3234 204c 696b 6520 6070 0).#@124 Like `p │ │ │ +00001070: 726f 676e 272c 2062 7574 2065 7661 6c75 rogn', but evalu │ │ │ +00001080: 6174 6573 2074 6865 2062 6f64 7920 6174 ates the body at │ │ │ +00001090: 2063 6f6d 7069 6c65 2074 696d 652e 0a54 compile time..T │ │ │ +000010a0: 6865 2072 6573 756c 7420 6f66 2074 6865 he result of the │ │ │ +000010b0: 2062 6f64 7920 6170 7065 6172 7320 746f body appears to │ │ │ +000010c0: 2074 6865 2063 6f6d 7069 6c65 7220 6173 the compiler as │ │ │ +000010d0: 2061 2071 756f 7465 6420 636f 6e73 7461 a quoted consta │ │ │ +000010e0: 6e74 2e1f 0a28 6465 6661 6c69 6173 2027 nt...(defalias ' │ │ │ +000010f0: 6576 616c 2d77 6865 6e2d 636f 6d70 696c eval-when-compil │ │ │ +00001100: 6520 2728 6d61 6372 6f20 2e20 235b 2826 e '(macro . #[(& │ │ │ +00001110: 7265 7374 2062 6f64 7929 2022 c108 4287 rest body) "..B. │ │ │ +00001120: 2220 5b62 6f64 7920 7072 6f67 6e5d 2032 " [body progn] 2 │ │ │ +00001130: 2028 2324 202e 2034 3230 3129 5d29 290a (#$ . 4201)])). │ │ │ +00001140: 2870 7574 2027 6576 616c 2d61 6e64 2d63 (put 'eval-and-c │ │ │ +00001150: 6f6d 7069 6c65 2027 6c69 7370 2d69 6e64 ompile 'lisp-ind │ │ │ +00001160: 656e 742d 686f 6f6b 2030 290a 2340 3732 ent-hook 0).#@72 │ │ │ +00001170: 204c 696b 6520 6070 726f 676e 272c 2062 Like `progn', b │ │ │ +00001180: 7574 2065 7661 6c75 6174 6573 2074 6865 ut evaluates the │ │ │ +00001190: 2062 6f64 7920 6174 2063 6f6d 7069 6c65 body at compile │ │ │ +000011a0: 2074 696d 6520 616e 6420 6174 206c 6f61 time and at loa │ │ │ +000011b0: 6420 7469 6d65 2e1f 0a28 6465 6661 6c69 d time...(defali │ │ │ +000011c0: 6173 2027 6576 616c 2d61 6e64 2d63 6f6d as 'eval-and-com │ │ │ +000011d0: 7069 6c65 2027 286d 6163 726f 202e 2023 pile '(macro . # │ │ │ +000011e0: 5b28 2672 6573 7420 626f 6479 2920 22c1 [(&rest body) ". │ │ │ +000011f0: 0842 8722 205b 626f 6479 2070 726f 676e .B." [body progn │ │ │ +00001200: 5d20 3220 2823 2420 2e20 3434 3635 295d ] 2 (#$ . 4465)] │ │ │ +00001210: 2929 0a28 7075 7420 2765 7661 6c2d 7768 )).(put 'eval-wh │ │ │ +00001220: 656e 2d66 6561 7475 7265 2027 6c69 7370 en-feature 'lisp │ │ │ +00001230: 2d69 6e64 656e 742d 686f 6f6b 2031 290a -indent-hook 1). │ │ │ +00001240: 2340 3236 3820 5275 6e20 7468 6520 626f #@268 Run the bo │ │ │ +00001250: 6479 2066 6f72 6d73 2077 6865 6e20 4645 dy forms when FE │ │ │ +00001260: 4154 5552 4520 6973 2066 6561 7475 7265 ATURE is feature │ │ │ +00001270: 702c 2062 6520 6974 206e 6f77 206f 7220 p, be it now or │ │ │ +00001280: 6c61 7465 722e 0a43 616c 6c65 6420 2865 later..Called (e │ │ │ +00001290: 7661 6c2d 7768 656e 2d66 6561 7475 7265 val-when-feature │ │ │ +000012a0: 2028 4645 4154 5552 4520 5b2e 2046 494c (FEATURE [. FIL │ │ │ +000012b0: 454e 414d 455d 2920 424f 4459 464f 524d ENAME]) BODYFORM │ │ │ +000012c0: 532e 2e2e 292e 0a49 6620 2866 6561 7475 S...)..If (featu │ │ │ +000012d0: 7265 7020 2746 4541 5455 5245 292c 2065 rep 'FEATURE), e │ │ │ +000012e0: 7661 6c73 206e 6f77 3b20 6f74 6865 7277 vals now; otherw │ │ │ +000012f0: 6973 6520 6164 6473 2061 6e20 656c 7420 ise adds an elt │ │ │ +00001300: 746f 0a60 6166 7465 722d 6c6f 6164 2d61 to.`after-load-a │ │ │ +00001310: 6c69 7374 2720 2877 6869 6368 2073 6565 list' (which see │ │ │ +00001320: 292c 2075 7369 6e67 2046 4541 5455 5245 ), using FEATURE │ │ │ +00001330: 2061 7320 6669 6c65 6e61 6d65 2069 6620 as filename if │ │ │ +00001340: 4649 4c45 4e41 4d45 2069 7320 6e69 6c2e FILENAME is nil. │ │ │ +00001350: 1f0a 2864 6566 616c 6961 7320 2765 7661 ..(defalias 'eva │ │ │ +00001360: 6c2d 7768 656e 2d66 6561 7475 7265 2027 l-when-feature ' │ │ │ +00001370: 286d 6163 726f 202e 2023 5b28 6665 6174 (macro . #[(feat │ │ │ +00001380: 7572 6520 2672 6573 7420 626f 6479 2920 ure &rest body) │ │ │ +00001390: 225c 6e41 ae84 c35c 6e40 2119 c4c5 c6c7 "\nA...\n@!..... │ │ │ +000013a0: c808 4242 4444 43c9 cacb 5c6e 4044 44cc ..BBDDC...\n@DD. │ │ │ +000013b0: cdce cfcb 09d0 4244 d142 4245 4645 2987 ......BD.BBEFE). │ │ │ +000013c0: 2220 5b62 6f64 7920 6669 6c65 2066 6561 " [body file fea │ │ │ +000013d0: 7475 7265 2073 796d 626f 6c2d 6e61 6d65 ture symbol-name │ │ │ +000013e0: 206c 6574 2062 6f64 7974 6875 6e6b 2066 let bodythunk f │ │ │ +000013f0: 756e 6374 696f 6e20 6c61 6d62 6461 206e unction lambda n │ │ │ +00001400: 696c 2069 6620 6665 6174 7572 6570 2071 il if featurep q │ │ │ +00001410: 756f 7465 2028 6675 6e63 616c 6c20 626f uote (funcall bo │ │ │ +00001420: 6479 7468 756e 6b29 2073 6574 7120 6166 dythunk) setq af │ │ │ +00001430: 7465 722d 6c6f 6164 2d61 6c69 7374 2063 ter-load-alist c │ │ │ +00001440: 6f6e 7320 286c 6973 7420 276c 616d 6264 ons (list 'lambd │ │ │ +00001450: 6120 276e 696c 2062 6f64 7974 6875 6e6b a 'nil bodythunk │ │ │ +00001460: 2920 2861 6674 6572 2d6c 6f61 642d 616c ) (after-load-al │ │ │ +00001470: 6973 7429 5d20 3131 2028 2324 202e 2034 ist)] 11 (#$ . 4 │ │ │ +00001480: 3637 3829 5d29 290a 2870 7574 2027 6279 678)])).(put 'by │ │ │ +00001490: 7465 2d63 6f6d 7069 6c65 722d 6f70 7469 te-compiler-opti │ │ │ +000014a0: 6f6e 7320 276c 6973 702d 696e 6465 6e74 ons 'lisp-indent │ │ │ +000014b0: 2d68 6f6f 6b20 3029 0a23 4031 3436 3120 -hook 0).#@1461 │ │ │ +000014c0: 5365 7420 736f 6d65 2063 6f6d 7069 6c61 Set some compila │ │ │ +000014d0: 7469 6f6e 2d70 6172 616d 6574 6572 7320 tion-parameters │ │ │ +000014e0: 666f 7220 7468 6973 2066 696c 652e 2020 for this file. │ │ │ +000014f0: 0a54 6869 7320 7769 6c6c 2061 6666 6563 .This will affec │ │ │ +00001500: 7420 6f6e 6c79 2074 6865 2066 696c 6520 t only the file │ │ │ +00001510: 696e 2077 6869 6368 2069 7420 6170 7065 in which it appe │ │ │ +00001520: 6172 733b 2074 6869 7320 646f 6573 206e ars; this does n │ │ │ +00001530: 6f74 6869 6e67 2077 6865 6e0a 6576 616c othing when.eval │ │ │ +00001540: 7561 7465 642c 206f 7220 7768 656e 206c uated, or when l │ │ │ +00001550: 6f61 6465 6420 6672 6f6d 2061 202e 656c oaded from a .el │ │ │ +00001560: 2066 696c 652e 0a0a 4561 6368 2061 7267 file...Each arg │ │ │ +00001570: 756d 656e 7420 746f 2074 6869 7320 6d61 ument to this ma │ │ │ +00001580: 6372 6f20 6d75 7374 2062 6520 6120 6c69 cro must be a li │ │ │ +00001590: 7374 206f 6620 6120 6b65 7920 616e 6420 st of a key and │ │ │ +000015a0: 6120 7661 6c75 652e 0a0a 2020 4b65 7973 a value... Keys │ │ │ +000015b0: 3a09 0920 2056 616c 7565 733a 0909 436f :.. Values:..Co │ │ │ +000015c0: 7272 6573 706f 6e64 696e 6720 7661 7269 rresponding vari │ │ │ +000015d0: 6162 6c65 3a0a 0a20 2076 6572 626f 7365 able:.. verbose │ │ │ +000015e0: 0920 2074 2c20 6e69 6c09 0962 7974 652d . t, nil..byte- │ │ │ +000015f0: 636f 6d70 696c 652d 7665 7262 6f73 650a compile-verbose. │ │ │ +00001600: 2020 6f70 7469 6d69 7a65 0920 2074 2c20 optimize. t, │ │ │ +00001610: 6e69 6c2c 2073 6f75 7263 652c 2062 7974 nil, source, byt │ │ │ +00001620: 6509 6279 7465 2d6f 7074 696d 697a 650a e.byte-optimize. │ │ │ +00001630: 2020 7761 726e 696e 6773 0920 206c 6973 warnings. lis │ │ │ +00001640: 7420 6f66 2077 6172 6e69 6e67 7309 6279 t of warnings.by │ │ │ +00001650: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e69 te-compile-warni │ │ │ +00001660: 6e67 730a 2020 6669 6c65 2d66 6f72 6d61 ngs. file-forma │ │ │ +00001670: 7409 2020 656d 6163 7331 392c 2065 6d61 t. emacs19, ema │ │ │ +00001680: 6373 3230 0962 7974 652d 636f 6d70 696c cs20.byte-compil │ │ │ +00001690: 652d 656d 6163 7331 392d 636f 6d70 6174 e-emacs19-compat │ │ │ +000016a0: 6962 696c 6974 790a 0a54 6865 2076 616c ibility..The val │ │ │ +000016b0: 7565 2073 7065 6369 6669 6564 2077 6974 ue specified wit │ │ │ +000016c0: 6820 7468 6520 6077 6172 6e69 6e67 7327 h the `warnings' │ │ │ +000016d0: 206f 7074 696f 6e20 6d75 7374 2062 6520 option must be │ │ │ +000016e0: 6120 6c69 7374 2c20 636f 6e74 6169 6e69 a list, containi │ │ │ +000016f0: 6e67 0a73 6f6d 6520 7375 6273 6574 206f ng.some subset o │ │ │ +00001700: 6620 7468 6520 666f 6c6c 6f77 696e 6720 f the following │ │ │ +00001710: 666c 6167 733a 0a0a 2020 6672 6565 2d76 flags:.. free-v │ │ │ +00001720: 6172 7309 7265 6665 7265 6e63 6573 2074 ars.references t │ │ │ +00001730: 6f20 7661 7269 6162 6c65 7320 6e6f 7420 o variables not │ │ │ +00001740: 696e 2074 6865 2063 7572 7265 6e74 206c in the current l │ │ │ +00001750: 6578 6963 616c 2073 636f 7065 2e0a 2020 exical scope.. │ │ │ +00001760: 756e 7573 6564 2d76 6172 7309 7265 6665 unused-vars.refe │ │ │ +00001770: 7265 6e63 6573 2074 6f20 6e6f 6e2d 676c rences to non-gl │ │ │ +00001780: 6f62 616c 2076 6172 6961 626c 6573 2062 obal variables b │ │ │ +00001790: 6f75 6e64 2062 7574 206e 6f74 2072 6566 ound but not ref │ │ │ +000017a0: 6572 656e 6365 642e 0a20 2075 6e72 6573 erenced.. unres │ │ │ +000017b0: 6f6c 7665 6409 6361 6c6c 7320 746f 2075 olved.calls to u │ │ │ +000017c0: 6e6b 6e6f 776e 2066 756e 6374 696f 6e73 nknown functions │ │ │ +000017d0: 2e0a 2020 6361 6c6c 6172 6773 096c 616d .. callargs.lam │ │ │ +000017e0: 6264 6120 6361 6c6c 7320 7769 7468 2061 bda calls with a │ │ │ +000017f0: 7267 7320 7468 6174 2064 6f6e 2774 206d rgs that don't m │ │ │ +00001800: 6174 6368 2074 6865 2064 6566 696e 6974 atch the definit │ │ │ +00001810: 696f 6e2e 0a20 2072 6564 6566 696e 6509 ion.. redefine. │ │ │ +00001820: 6675 6e63 7469 6f6e 2063 656c 6c20 7265 function cell re │ │ │ +00001830: 6465 6669 6e65 6420 6672 6f6d 2061 206d defined from a m │ │ │ +00001840: 6163 726f 2074 6f20 6120 6c61 6d62 6461 acro to a lambda │ │ │ +00001850: 206f 7220 7669 6365 0a09 0976 6572 7361 or vice...versa │ │ │ +00001860: 2c20 6f72 2072 6564 6566 696e 6564 2074 , or redefined t │ │ │ +00001870: 6f20 7461 6b65 2061 2064 6966 6665 7265 o take a differe │ │ │ +00001880: 6e74 206e 756d 6265 7220 6f66 2061 7267 nt number of arg │ │ │ +00001890: 756d 656e 7473 2e0a 0a49 6620 7468 6520 uments...If the │ │ │ +000018a0: 6669 7273 7420 656c 656d 656e 7420 6966 first element if │ │ │ +000018b0: 2074 6865 206c 6973 7420 6973 2060 2b27 the list is `+' │ │ │ +000018c0: 206f 7220 602d 2720 7468 656e 2074 6865 or `-' then the │ │ │ +000018d0: 2073 7065 6369 6669 6564 2065 6c65 6d65 specified eleme │ │ │ +000018e0: 6e74 7320 0a61 7265 2061 6464 6564 2074 nts .are added t │ │ │ +000018f0: 6f20 6f72 2072 656d 6f76 6564 2066 726f o or removed fro │ │ │ +00001900: 6d20 7468 6520 6375 7272 656e 7420 7365 m the current se │ │ │ +00001910: 7420 6f66 2077 6172 6e69 6e67 732c 2069 t of warnings, i │ │ │ +00001920: 6e73 7465 6164 206f 6620 7468 650a 656e nstead of the.en │ │ │ +00001930: 7469 7265 2073 6574 206f 6620 7761 726e tire set of warn │ │ │ +00001940: 696e 6773 2062 6569 6e67 206f 7665 7277 ings being overw │ │ │ +00001950: 7269 7474 656e 2e0a 0a46 6f72 2065 7861 ritten...For exa │ │ │ +00001960: 6d70 6c65 2c20 736f 6d65 7468 696e 6720 mple, something │ │ │ +00001970: 6c69 6b65 2074 6869 7320 6d69 6768 7420 like this might │ │ │ +00001980: 6170 7065 6172 2061 7420 7468 6520 746f appear at the to │ │ │ +00001990: 7020 6f66 2061 2073 6f75 7263 6520 6669 p of a source fi │ │ │ +000019a0: 6c65 3a0a 0a20 2020 2028 6279 7465 2d63 le:.. (byte-c │ │ │ +000019b0: 6f6d 7069 6c65 722d 6f70 7469 6f6e 730a ompiler-options. │ │ │ +000019c0: 2020 2020 2020 286f 7074 696d 697a 6520 (optimize │ │ │ +000019d0: 7429 0a20 2020 2020 2028 7761 726e 696e t). (warnin │ │ │ +000019e0: 6773 2028 2d20 6361 6c6c 6172 6773 2929 gs (- callargs)) │ │ │ +000019f0: 0909 3b20 446f 6e27 7420 7761 726e 2061 ..; Don't warn a │ │ │ +00001a00: 626f 7574 2061 7267 6c69 7374 206d 6973 bout arglist mis │ │ │ +00001a10: 6d61 7463 680a 2020 2020 2020 2877 6172 match. (war │ │ │ +00001a20: 6e69 6e67 7320 282b 2075 6e75 7365 642d nings (+ unused- │ │ │ +00001a30: 7661 7273 2929 093b 2044 6f20 7761 726e vars)).; Do warn │ │ │ +00001a40: 2061 626f 7574 2075 6e75 7365 6420 6269 about unused bi │ │ │ +00001a50: 6e64 696e 6773 0a20 2020 2020 2028 6669 ndings. (fi │ │ │ +00001a60: 6c65 2d66 6f72 6d61 7420 656d 6163 7331 le-format emacs1 │ │ │ +00001a70: 3929 291f 0a28 6465 6661 6c69 6173 2027 9))..(defalias ' │ │ │ +00001a80: 6279 7465 2d63 6f6d 7069 6c65 722d 6f70 byte-compiler-op │ │ │ +00001a90: 7469 6f6e 7320 2728 6d61 6372 6f20 2e20 tions '(macro . │ │ │ +00001aa0: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ +00001ab0: c087 2220 5b6e 696c 5d20 3120 2823 2420 .." [nil] 1 (#$ │ │ │ +00001ac0: 2e20 3533 3132 295d 2929 0a . 5312)])). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/bytecomp.elc │ │ │ @@ -1,1223 +1,1223 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3537 2032 eb 25 01:53:57 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f62 1-21.4.24/lisp/b │ │ │ -00000090: 7974 6563 6f6d 702e 656c 0a3b 3b3b 2065 ytecomp.el.;;; e │ │ │ -000000a0: 6d61 6373 2076 6572 7369 6f6e 2032 312e macs version 21. │ │ │ -000000b0: 3420 2870 6174 6368 2032 3429 2022 5374 4 (patch 24) "St │ │ │ -000000c0: 616e 6461 7264 2043 2220 5845 6d61 6373 andard C" XEmacs │ │ │ -000000d0: 204c 7563 6964 2e0a 3b3b 3b20 6279 7465 Lucid..;;; byte │ │ │ -000000e0: 636f 6d70 2076 6572 7369 6f6e 2032 2e32 comp version 2.2 │ │ │ -000000f0: 3720 5845 6d61 6373 3b20 3230 3030 2d30 7 XEmacs; 2000-0 │ │ │ -00000100: 392d 3132 2e0a 3b3b 3b20 6f70 7469 6d69 9-12..;;; optimi │ │ │ -00000110: 7a61 7469 6f6e 2069 7320 6f6e 2e0a 3b3b zation is on..;; │ │ │ -00000120: 3b20 7468 6973 2066 696c 6520 7573 6573 ; this file uses │ │ │ -00000130: 206f 7063 6f64 6573 2077 6869 6368 2064 opcodes which d │ │ │ -00000140: 6f20 6e6f 7420 6578 6973 7420 696e 2045 o not exist in E │ │ │ -00000150: 6d61 6373 2031 392e 0a0a 2869 6620 2861 macs 19...(if (a │ │ │ -00000160: 6e64 2028 626f 756e 6470 2027 656d 6163 nd (boundp 'emac │ │ │ -00000170: 732d 7665 7273 696f 6e29 0a09 2028 6f72 s-version).. (or │ │ │ -00000180: 2028 616e 6420 2862 6f75 6e64 7020 2765 (and (boundp 'e │ │ │ -00000190: 706f 6368 3a3a 7665 7273 696f 6e29 2065 poch::version) e │ │ │ -000001a0: 706f 6368 3a3a 7665 7273 696f 6e29 0a09 poch::version).. │ │ │ -000001b0: 2020 2020 2028 7374 7269 6e67 2d6c 6573 (string-les │ │ │ -000001c0: 7370 2065 6d61 6373 2d76 6572 7369 6f6e sp emacs-version │ │ │ -000001d0: 2022 3230 2229 2929 0a20 2020 2028 6572 "20"))). (er │ │ │ -000001e0: 726f 7220 2260 6279 7465 636f 6d70 2e65 ror "`bytecomp.e │ │ │ -000001f0: 6c27 2077 6173 2063 6f6d 7069 6c65 6420 l' was compiled │ │ │ -00000200: 666f 7220 456d 6163 7320 3230 2229 290a for Emacs 20")). │ │ │ -00000210: 0a28 6f72 2028 626f 756e 6470 2027 6375 .(or (boundp 'cu │ │ │ -00000220: 7272 656e 742d 6c6f 6164 2d6c 6973 7429 rrent-load-list) │ │ │ -00000230: 2028 7365 7471 2063 7572 7265 6e74 2d6c (setq current-l │ │ │ -00000240: 6f61 642d 6c69 7374 206e 696c 2929 0a0a oad-list nil)).. │ │ │ -00000250: 0a28 6279 7465 2d63 6f64 6520 22c0 0942 .(byte-code "..B │ │ │ -00000260: 11c2 10c3 c421 88c5 c621 ac84 c7c8 2188 .....!...!....!. │ │ │ -00000270: c087 2220 5b62 7974 652d 636f 6d70 696c .." [byte-compil │ │ │ -00000280: 652d 7665 7273 696f 6e20 6375 7272 656e e-version curren │ │ │ -00000290: 742d 6c6f 6164 2d6c 6973 7420 2232 2e32 t-load-list "2.2 │ │ │ -000002a0: 3720 5845 6d61 6373 3b20 3230 3030 2d30 7 XEmacs; 2000-0 │ │ │ -000002b0: 392d 3132 2e22 2072 6571 7569 7265 2062 9-12." require b │ │ │ -000002c0: 6163 6b71 756f 7465 2066 626f 756e 6470 ackquote fboundp │ │ │ -000002d0: 2064 6566 7375 6273 7420 6c6f 6164 2d6c defsubst load-l │ │ │ -000002e0: 6962 7261 7279 2022 6279 7465 636f 6d70 ibrary "bytecomp │ │ │ -000002f0: 2d72 756e 7469 6d65 225d 2032 290a 2340 -runtime"] 2).#@ │ │ │ -00000300: 3131 3820 2a52 6567 6578 7020 7768 6963 118 *Regexp whic │ │ │ -00000310: 6820 6d61 7463 6865 7320 456d 6163 7320 h matches Emacs │ │ │ -00000320: 4c69 7370 2073 6f75 7263 6520 6669 6c65 Lisp source file │ │ │ -00000330: 732e 0a59 6f75 206d 6179 2077 616e 7420 s..You may want │ │ │ -00000340: 746f 2072 6564 6566 696e 6520 6062 7974 to redefine `byt │ │ │ -00000350: 652d 636f 6d70 696c 652d 6465 7374 2d66 e-compile-dest-f │ │ │ -00000360: 696c 6527 2069 6620 796f 7520 6368 616e ile' if you chan │ │ │ -00000370: 6765 2074 6869 732e 1f0a 2864 6566 7661 ge this...(defva │ │ │ -00000380: 7220 656d 6163 732d 6c69 7370 2d66 696c r emacs-lisp-fil │ │ │ -00000390: 652d 7265 6765 7870 2022 5c5c 2e65 6c24 e-regexp "\\.el$ │ │ │ -000003a0: 2220 2823 2420 2e20 2d37 3732 2929 0a28 " (#$ . -772)).( │ │ │ -000003b0: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ -000003c0: 6f6d 7069 6c65 722d 6261 7365 2d66 696c ompiler-base-fil │ │ │ -000003d0: 652d 6e61 6d65 2023 5b28 6669 6c65 6e61 e-name #[(filena │ │ │ -000003e0: 6d65 2920 22c2 09c3 5c22 8918 ab86 08c3 me) "...\"...... │ │ │ -000003f0: 095c 22aa 8109 2987 2220 5b68 616e 646c .\"...)." [handl │ │ │ -00000400: 6572 2066 696c 656e 616d 6520 6669 6e64 er filename find │ │ │ -00000410: 2d66 696c 652d 6e61 6d65 2d68 616e 646c -file-name-handl │ │ │ -00000420: 6572 2062 7974 652d 636f 6d70 696c 6572 er byte-compiler │ │ │ -00000430: 2d62 6173 652d 6669 6c65 2d6e 616d 655d -base-file-name] │ │ │ -00000440: 2034 5d29 0a28 6279 7465 2d63 6f64 6520 4]).(byte-code │ │ │ -00000450: 22c0 c121 ac84 c1c2 4d88 c3c4 c55c 2288 "..!....M....\". │ │ │ -00000460: c3c6 c55c 2288 c3c7 c55c 2288 c3c8 c55c ...\"....\"....\ │ │ │ -00000470: 2288 c3c9 c55c 2287 2220 5b66 626f 756e "....\"." [fboun │ │ │ -00000480: 6470 2062 7974 652d 636f 6d70 696c 652d dp byte-compile- │ │ │ -00000490: 6465 7374 2d66 696c 6520 235b 2866 696c dest-file #[(fil │ │ │ -000004a0: 656e 616d 6529 2022 c209 2111 c309 2111 ename) "..!...!. │ │ │ -000004b0: c408 095c 22ab 8809 c589 944f c650 8709 ...\"......O.P.. │ │ │ -000004c0: c650 8722 205b 656d 6163 732d 6c69 7370 .P." [emacs-lisp │ │ │ -000004d0: 2d66 696c 652d 7265 6765 7870 2066 696c -file-regexp fil │ │ │ -000004e0: 656e 616d 6520 6279 7465 2d63 6f6d 7069 ename byte-compi │ │ │ -000004f0: 6c65 722d 6261 7365 2d66 696c 652d 6e61 ler-base-file-na │ │ │ -00000500: 6d65 2066 696c 652d 6e61 6d65 2d73 616e me file-name-san │ │ │ -00000510: 732d 7665 7273 696f 6e73 2073 7472 696e s-versions strin │ │ │ -00000520: 672d 6d61 7463 6820 3020 222e 656c 6322 g-match 0 ".elc" │ │ │ -00000530: 5d20 3320 2243 6f6e 7665 7274 2061 6e20 ] 3 "Convert an │ │ │ -00000540: 456d 6163 7320 4c69 7370 2073 6f75 7263 Emacs Lisp sourc │ │ │ -00000550: 6520 6669 6c65 206e 616d 6520 746f 2061 e file name to a │ │ │ -00000560: 2063 6f6d 7069 6c65 6420 6669 6c65 206e compiled file n │ │ │ -00000570: 616d 652e 225d 2061 7574 6f6c 6f61 6420 ame."] autoload │ │ │ -00000580: 6279 7465 2d63 6f6d 7069 6c65 2d69 6e6c byte-compile-inl │ │ │ -00000590: 696e 652d 6578 7061 6e64 2022 6279 7465 ine-expand "byte │ │ │ -000005a0: 2d6f 7074 696d 697a 6522 2062 7974 652d -optimize" byte- │ │ │ -000005b0: 6f70 7469 6d69 7a65 2d66 6f72 6d20 6279 optimize-form by │ │ │ -000005c0: 7465 2d6f 7074 696d 697a 652d 6c61 7063 te-optimize-lapc │ │ │ -000005d0: 6f64 6520 6279 7465 2d63 6f6d 7069 6c65 ode byte-compile │ │ │ -000005e0: 2d75 6e66 6f6c 642d 6c61 6d62 6461 2062 -unfold-lambda b │ │ │ -000005f0: 7974 652d 6465 636f 6d70 696c 652d 6279 yte-decompile-by │ │ │ -00000600: 7465 636f 6465 5d20 3329 0a23 4036 3920 tecode] 3).#@69 │ │ │ -00000610: 2a4e 6f6e 2d6e 696c 206d 6561 6e73 2070 *Non-nil means p │ │ │ -00000620: 7269 6e74 206d 6573 7361 6765 7320 6465 rint messages de │ │ │ -00000630: 7363 7269 6269 6e67 2070 726f 6772 6573 scribing progres │ │ │ -00000640: 7320 6f66 2062 7974 652d 636f 6d70 696c s of byte-compil │ │ │ -00000650: 6572 2e1f 0a28 6465 6676 6172 2062 7974 er...(defvar byt │ │ │ -00000660: 652d 636f 6d70 696c 652d 7665 7262 6f73 e-compile-verbos │ │ │ -00000670: 6520 2862 7974 652d 636f 6465 2022 093f e (byte-code ".? │ │ │ -00000680: ad84 c220 0856 8722 205b 7365 6172 6368 ... .V." [search │ │ │ -00000690: 2d73 6c6f 772d 7370 6565 6420 6e6f 6e69 -slow-speed noni │ │ │ -000006a0: 6e74 6572 6163 7469 7665 2064 6576 6963 nteractive devic │ │ │ -000006b0: 652d 6261 7564 2d72 6174 655d 2032 2920 e-baud-rate] 2) │ │ │ -000006c0: 2823 2420 2e20 2d31 3535 3229 290a 2340 (#$ . -1552)).#@ │ │ │ -000006d0: 3538 202a 4e6f 6e2d 6e69 6c20 6d65 616e 58 *Non-nil mean │ │ │ -000006e0: 7320 6765 6e65 7261 7465 206f 7574 7075 s generate outpu │ │ │ -000006f0: 7420 7468 6174 2063 616e 2072 756e 2069 t that can run i │ │ │ -00000700: 6e20 456d 6163 7320 3139 2e1f 0a28 6465 n Emacs 19...(de │ │ │ -00000710: 6676 6172 2062 7974 652d 636f 6d70 696c fvar byte-compil │ │ │ -00000720: 652d 656d 6163 7331 392d 636f 6d70 6174 e-emacs19-compat │ │ │ -00000730: 6962 696c 6974 7920 2862 7974 652d 636f ibility (byte-co │ │ │ -00000740: 6465 2022 c0c1 213f 8722 205b 656d 6163 de "..!?." [emac │ │ │ -00000750: 732d 7665 7273 696f 6e3e 3d20 3230 5d20 s-version>= 20] │ │ │ -00000760: 3229 2028 2324 202e 202d 3137 3437 2929 2) (#$ . -1747)) │ │ │ -00000770: 0a23 4034 3133 202a 4e6f 6e2d 6e69 6c20 .#@413 *Non-nil │ │ │ -00000780: 6d65 616e 7320 6765 6e65 7261 7465 2063 means generate c │ │ │ -00000790: 6f64 6520 7468 6174 2063 7265 6174 6573 ode that creates │ │ │ -000007a0: 2075 6e69 7175 6520 7379 6d62 6f6c 7320 unique symbols │ │ │ -000007b0: 6174 2072 756e 2d74 696d 652e 0a54 6869 at run-time..Thi │ │ │ -000007c0: 7320 6973 2061 6368 6965 7665 6420 6279 s is achieved by │ │ │ -000007d0: 2070 7269 6e74 696e 6720 756e 696e 7465 printing uninte │ │ │ -000007e0: 726e 6564 2073 796d 626f 6c73 2075 7369 rned symbols usi │ │ │ -000007f0: 6e67 2074 6865 2060 233a 5359 4d42 4f4c ng the `#:SYMBOL │ │ │ -00000800: 270a 6e6f 7461 7469 6f6e 2c20 736f 2074 '.notation, so t │ │ │ -00000810: 6861 7420 7468 6579 2077 696c 6c20 6265 hat they will be │ │ │ -00000820: 2072 6561 6420 756e 696e 7465 726e 6564 read uninterned │ │ │ -00000830: 2077 6865 6e20 7275 6e2e 0a0a 5769 7468 when run...With │ │ │ -00000840: 2074 6869 7320 6665 6174 7572 652c 2063 this feature, c │ │ │ -00000850: 6f64 6520 7468 6174 2075 7365 7320 756e ode that uses un │ │ │ -00000860: 696e 7465 726e 6564 2073 796d 626f 6c73 interned symbols │ │ │ -00000870: 2069 6e20 6d61 6372 6f73 2077 696c 6c0a in macros will. │ │ │ -00000880: 6e6f 7420 6265 2072 756e 6e61 626c 6520 not be runnable │ │ │ -00000890: 756e 6465 7220 7072 652d 3231 2e30 2058 under pre-21.0 X │ │ │ -000008a0: 456d 6163 7365 6e2e 0a0a 5768 656e 2060 Emacsen...When ` │ │ │ -000008b0: 6279 7465 2d63 6f6d 7069 6c65 2d65 6d61 byte-compile-ema │ │ │ -000008c0: 6373 3139 2d63 6f6d 7061 7469 6269 6c69 cs19-compatibili │ │ │ -000008d0: 7479 2720 6973 206e 6f6e 2d6e 696c 2c20 ty' is non-nil, │ │ │ -000008e0: 7468 6973 2076 6172 6961 626c 6520 6973 this variable is │ │ │ -000008f0: 0a69 676e 6f72 6564 2061 6e64 2063 6f6e .ignored and con │ │ │ -00000900: 7369 6465 7265 6420 746f 2062 6520 6e69 sidered to be ni │ │ │ -00000910: 6c2e 1f0a 2864 6566 7661 7220 6279 7465 l...(defvar byte │ │ │ -00000920: 2d63 6f6d 7069 6c65 2d70 7269 6e74 2d67 -compile-print-g │ │ │ -00000930: 656e 7379 6d20 7420 2823 2420 2e20 2d31 ensym t (#$ . -1 │ │ │ -00000940: 3931 3129 290a 2340 3231 3020 2a45 6e61 911)).#@210 *Ena │ │ │ -00000950: 626c 6573 206f 7074 696d 697a 6174 696f bles optimizatio │ │ │ -00000960: 6e20 696e 2074 6865 2062 7974 6520 636f n in the byte co │ │ │ -00000970: 6d70 696c 6572 2e0a 6e69 6c20 6d65 616e mpiler..nil mean │ │ │ -00000980: 7320 646f 6e27 7420 646f 2061 6e79 206f s don't do any o │ │ │ -00000990: 7074 696d 697a 6174 696f 6e2e 0a74 206d ptimization..t m │ │ │ -000009a0: 6561 6e73 2064 6f20 616c 6c20 6f70 7469 eans do all opti │ │ │ -000009b0: 6d69 7a61 7469 6f6e 732e 0a60 736f 7572 mizations..`sour │ │ │ -000009c0: 6365 2720 6d65 616e 7320 646f 2073 6f75 ce' means do sou │ │ │ -000009d0: 7263 652d 6c65 7665 6c20 6f70 7469 6d69 rce-level optimi │ │ │ -000009e0: 7a61 7469 6f6e 7320 6f6e 6c79 2e0a 6062 zations only..`b │ │ │ -000009f0: 7974 6527 206d 6561 6e73 2064 6f20 636f yte' means do co │ │ │ -00000a00: 6465 2d6c 6576 656c 206f 7074 696d 697a de-level optimiz │ │ │ -00000a10: 6174 696f 6e73 206f 6e6c 792e 1f0a 2864 ations only...(d │ │ │ -00000a20: 6566 7661 7220 6279 7465 2d6f 7074 696d efvar byte-optim │ │ │ -00000a30: 697a 6520 7420 2823 2420 2e20 2d32 3338 ize t (#$ . -238 │ │ │ -00000a40: 3029 290a 2340 3134 3320 2a49 6620 6e6f 0)).#@143 *If no │ │ │ -00000a50: 6e2d 6e69 6c2c 2074 6865 206f 7074 696d n-nil, the optim │ │ │ -00000a60: 697a 6572 206d 6179 2064 656c 6574 6520 izer may delete │ │ │ -00000a70: 666f 726d 7320 7468 6174 206d 6179 2073 forms that may s │ │ │ -00000a80: 6967 6e61 6c20 616e 2065 7272 6f72 2e0a ignal an error.. │ │ │ -00000a90: 5468 6973 2069 6e63 6c75 6465 7320 7661 This includes va │ │ │ -00000aa0: 7269 6162 6c65 2072 6566 6572 656e 6365 riable reference │ │ │ -00000ab0: 7320 616e 6420 6361 6c6c 7320 746f 2066 s and calls to f │ │ │ -00000ac0: 756e 6374 696f 6e73 2073 7563 6820 6173 unctions such as │ │ │ -00000ad0: 2060 6361 7227 2e1f 0a28 6465 6676 6172 `car'...(defvar │ │ │ -00000ae0: 2062 7974 652d 636f 6d70 696c 652d 6465 byte-compile-de │ │ │ -00000af0: 6c65 7465 2d65 7272 6f72 7320 7420 2823 lete-errors t (# │ │ │ -00000b00: 2420 2e20 2d32 3633 3429 290a 2340 3737 $ . -2634)).#@77 │ │ │ -00000b10: 2054 6869 7320 6973 2063 6f6d 706c 6574 This is complet │ │ │ -00000b20: 656c 7920 6967 6e6f 7265 642e 2020 4974 ely ignored. It │ │ │ -00000b30: 2069 7320 6f6e 6c79 2061 726f 756e 6420 is only around │ │ │ -00000b40: 666f 7220 6261 636b 7761 7264 730a 636f for backwards.co │ │ │ -00000b50: 6d70 6174 6962 696c 6974 792e 1f0a 2864 mpatibility...(d │ │ │ -00000b60: 6566 7661 7220 6279 7465 2d63 6f6d 7069 efvar byte-compi │ │ │ -00000b70: 6c65 2d6e 6577 2d62 7974 6563 6f64 6573 le-new-bytecodes │ │ │ -00000b80: 206e 696c 2028 2324 202e 2032 3833 3329 nil (#$ . 2833) │ │ │ -00000b90: 290a 2340 3434 3820 2a49 6620 6e6f 6e2d ).#@448 *If non- │ │ │ -00000ba0: 6e69 6c2c 2063 6f6d 7069 6c65 2066 756e nil, compile fun │ │ │ -00000bb0: 6374 696f 6e20 626f 6469 6573 2073 6f20 ction bodies so │ │ │ -00000bc0: 7468 6579 206c 6f61 6420 6c61 7a69 6c79 they load lazily │ │ │ -00000bd0: 2e0a 5468 6579 2061 7265 2068 6964 6465 ..They are hidde │ │ │ -00000be0: 6e20 636f 6d6d 656e 7473 2069 6e20 7468 n comments in th │ │ │ -00000bf0: 6520 636f 6d70 696c 6564 2066 696c 652c e compiled file, │ │ │ -00000c00: 2061 6e64 2062 726f 7567 6874 2069 6e74 and brought int │ │ │ -00000c10: 6f20 636f 7265 2077 6865 6e20 7468 650a o core when the. │ │ │ -00000c20: 6675 6e63 7469 6f6e 2069 7320 6361 6c6c function is call │ │ │ -00000c30: 6564 2e0a 0a54 6f20 656e 6162 6c65 2074 ed...To enable t │ │ │ -00000c40: 6869 7320 6f70 7469 6f6e 2c20 6d61 6b65 his option, make │ │ │ -00000c50: 2069 7420 6120 6669 6c65 2d6c 6f63 616c it a file-local │ │ │ -00000c60: 2076 6172 6961 626c 650a 696e 2074 6865 variable.in the │ │ │ -00000c70: 2073 6f75 7263 6520 6669 6c65 2079 6f75 source file you │ │ │ -00000c80: 2077 616e 7420 6974 2074 6f20 6170 706c want it to appl │ │ │ -00000c90: 7920 746f 2e0a 466f 7220 6578 616d 706c y to..For exampl │ │ │ -00000ca0: 652c 2061 6464 2020 2d2a 2d62 7974 652d e, add -*-byte- │ │ │ -00000cb0: 636f 6d70 696c 652d 6479 6e61 6d69 633a compile-dynamic: │ │ │ -00000cc0: 2074 3b2d 2a2d 206f 6e20 7468 6520 6669 t;-*- on the fi │ │ │ -00000cd0: 7273 7420 6c69 6e65 2e0a 0a57 6865 6e20 rst line...When │ │ │ -00000ce0: 7468 6973 206f 7074 696f 6e20 6973 2074 this option is t │ │ │ -00000cf0: 7275 652c 2069 6620 796f 7520 6c6f 6164 rue, if you load │ │ │ -00000d00: 2074 6865 2063 6f6d 7069 6c65 6420 6669 the compiled fi │ │ │ -00000d10: 6c65 2061 6e64 2074 6865 6e20 6d6f 7665 le and then move │ │ │ -00000d20: 2069 742c 0a74 6865 2066 756e 6374 696f it,.the functio │ │ │ -00000d30: 6e73 2079 6f75 206c 6f61 6465 6420 7769 ns you loaded wi │ │ │ -00000d40: 6c6c 206e 6f74 2062 6520 6162 6c65 2074 ll not be able t │ │ │ -00000d50: 6f20 7275 6e2e 1f0a 2864 6566 7661 7220 o run...(defvar │ │ │ -00000d60: 6279 7465 2d63 6f6d 7069 6c65 2d64 796e byte-compile-dyn │ │ │ -00000d70: 616d 6963 206e 696c 2028 2324 202e 202d amic nil (#$ . - │ │ │ -00000d80: 3239 3638 2929 0a23 4036 3332 202a 4966 2968)).#@632 *If │ │ │ -00000d90: 206e 6f6e 2d6e 696c 2c20 636f 6d70 696c non-nil, compil │ │ │ -00000da0: 6520 646f 6320 7374 7269 6e67 7320 666f e doc strings fo │ │ │ -00000db0: 7220 6c61 7a79 2061 6363 6573 732e 0a57 r lazy access..W │ │ │ -00000dc0: 6520 6275 7279 2074 6865 2064 6f63 2073 e bury the doc s │ │ │ -00000dd0: 7472 696e 6773 206f 6620 6675 6e63 7469 trings of functi │ │ │ -00000de0: 6f6e 7320 616e 6420 7661 7269 6162 6c65 ons and variable │ │ │ -00000df0: 730a 696e 7369 6465 2063 6f6d 6d65 6e74 s.inside comment │ │ │ -00000e00: 7320 696e 2074 6865 2066 696c 652c 2061 s in the file, a │ │ │ -00000e10: 6e64 2062 7269 6e67 2074 6865 6d20 696e nd bring them in │ │ │ -00000e20: 746f 2063 6f72 6520 6f6e 6c79 2077 6865 to core only whe │ │ │ -00000e30: 6e20 7468 6579 0a61 7265 2061 6374 7561 n they.are actua │ │ │ -00000e40: 6c6c 7920 6e65 6564 6564 2e0a 0a57 6865 lly needed...Whe │ │ │ -00000e50: 6e20 7468 6973 206f 7074 696f 6e20 6973 n this option is │ │ │ -00000e60: 2074 7275 652c 2069 6620 796f 7520 6c6f true, if you lo │ │ │ -00000e70: 6164 2074 6865 2063 6f6d 7069 6c65 6420 ad the compiled │ │ │ -00000e80: 6669 6c65 2061 6e64 2074 6865 6e20 6d6f file and then mo │ │ │ -00000e90: 7665 2069 742c 0a79 6f75 2077 6f6e 2774 ve it,.you won't │ │ │ -00000ea0: 2062 6520 6162 6c65 2074 6f20 6669 6e64 be able to find │ │ │ -00000eb0: 2074 6865 2064 6f63 756d 656e 7461 7469 the documentati │ │ │ -00000ec0: 6f6e 206f 6620 616e 7974 6869 6e67 2069 on of anything i │ │ │ -00000ed0: 6e20 7468 6174 2066 696c 652e 0a0a 546f n that file...To │ │ │ -00000ee0: 2064 6973 6162 6c65 2074 6869 7320 6f70 disable this op │ │ │ -00000ef0: 7469 6f6e 2066 6f72 2061 2063 6572 7461 tion for a certa │ │ │ -00000f00: 696e 2066 696c 652c 206d 616b 6520 6974 in file, make it │ │ │ -00000f10: 2061 2066 696c 652d 6c6f 6361 6c20 7661 a file-local va │ │ │ -00000f20: 7269 6162 6c65 0a69 6e20 7468 6520 736f riable.in the so │ │ │ -00000f30: 7572 6365 2066 696c 652e 2020 466f 7220 urce file. For │ │ │ -00000f40: 6578 616d 706c 652c 2061 6464 2074 6869 example, add thi │ │ │ -00000f50: 7320 746f 2074 6865 2066 6972 7374 206c s to the first l │ │ │ -00000f60: 696e 653a 0a20 202d 2a2d 6279 7465 2d63 ine:. -*-byte-c │ │ │ -00000f70: 6f6d 7069 6c65 2d64 796e 616d 6963 2d64 ompile-dynamic-d │ │ │ -00000f80: 6f63 7374 7269 6e67 733a 6e69 6c3b 2d2a ocstrings:nil;-* │ │ │ -00000f90: 2d0a 596f 7520 6361 6e20 616c 736f 2073 -.You can also s │ │ │ -00000fa0: 6574 2074 6865 2076 6172 6961 626c 6520 et the variable │ │ │ -00000fb0: 676c 6f62 616c 6c79 2e0a 0a54 6869 7320 globally...This │ │ │ -00000fc0: 6f70 7469 6f6e 2069 7320 656e 6162 6c65 option is enable │ │ │ -00000fd0: 6420 6279 2064 6566 6175 6c74 2062 6563 d by default bec │ │ │ -00000fe0: 6175 7365 2069 7420 7265 6475 6365 7320 ause it reduces │ │ │ -00000ff0: 456d 6163 7320 6d65 6d6f 7279 2075 7361 Emacs memory usa │ │ │ -00001000: 6765 2e1f 0a28 6465 6676 6172 2062 7974 ge...(defvar byt │ │ │ -00001010: 652d 636f 6d70 696c 652d 6479 6e61 6d69 e-compile-dynami │ │ │ -00001020: 632d 646f 6373 7472 696e 6773 2028 656d c-docstrings (em │ │ │ -00001030: 6163 732d 7665 7273 696f 6e3e 3d20 3230 acs-version>= 20 │ │ │ -00001040: 2920 2823 2420 2e20 2d33 3436 3929 290a ) (#$ . -3469)). │ │ │ -00001050: 2340 3231 3620 2a49 6620 7472 7565 2c20 #@216 *If true, │ │ │ -00001060: 7468 6520 6279 7465 2d63 6f6d 7069 6c65 the byte-compile │ │ │ -00001070: 7220 7769 6c6c 206c 6f67 2069 7473 206f r will log its o │ │ │ -00001080: 7074 696d 697a 6174 696f 6e73 2069 6e74 ptimizations int │ │ │ -00001090: 6f20 2a43 6f6d 7069 6c65 2d4c 6f67 2a2e o *Compile-Log*. │ │ │ -000010a0: 0a49 6620 7468 6973 2069 7320 2773 6f75 .If this is 'sou │ │ │ -000010b0: 7263 652c 2074 6865 6e20 6f6e 6c79 2073 rce, then only s │ │ │ -000010c0: 6f75 7263 652d 6c65 7665 6c20 6f70 7469 ource-level opti │ │ │ -000010d0: 6d69 7a61 7469 6f6e 7320 7769 6c6c 2062 mizations will b │ │ │ -000010e0: 6520 6c6f 6767 6564 2e0a 4966 2069 7420 e logged..If it │ │ │ -000010f0: 6973 2027 6279 7465 2c20 7468 656e 206f is 'byte, then o │ │ │ -00001100: 6e6c 7920 6279 7465 2d6c 6576 656c 206f nly byte-level o │ │ │ -00001110: 7074 696d 697a 6174 696f 6e73 2077 696c ptimizations wil │ │ │ -00001120: 6c20 6265 206c 6f67 6765 642e 1f0a 2864 l be logged...(d │ │ │ -00001130: 6566 7661 7220 6279 7465 2d6f 7074 696d efvar byte-optim │ │ │ -00001140: 697a 652d 6c6f 6720 6e69 6c20 2823 2420 ize-log nil (#$ │ │ │ -00001150: 2e20 2d34 3138 3229 290a 2340 3630 202a . -4182)).#@60 * │ │ │ -00001160: 4966 2074 7275 652c 2074 6865 2062 7974 If true, the byt │ │ │ -00001170: 652d 636f 6d70 696c 6572 2072 6570 6f72 e-compiler repor │ │ │ -00001180: 7473 2077 6172 6e69 6e67 7320 7769 7468 ts warnings with │ │ │ -00001190: 2060 6572 726f 7227 2e1f 0a28 6465 6676 `error'...(defv │ │ │ -000011a0: 6172 2062 7974 652d 636f 6d70 696c 652d ar byte-compile- │ │ │ -000011b0: 6572 726f 722d 6f6e 2d77 6172 6e20 6e69 error-on-warn ni │ │ │ -000011c0: 6c20 2823 2420 2e20 2d34 3434 3729 290a l (#$ . -4447)). │ │ │ -000011d0: 2340 3533 202a 5468 6520 7761 726e 696e #@53 *The warnin │ │ │ -000011e0: 6773 2075 7365 6420 7768 656e 2062 7974 gs used when byt │ │ │ -000011f0: 652d 636f 6d70 696c 652d 7761 726e 696e e-compile-warnin │ │ │ -00001200: 6773 2069 7320 742e 1f0a 2864 6566 7661 gs is t...(defva │ │ │ -00001210: 7220 6279 7465 2d63 6f6d 7069 6c65 2d64 r byte-compile-d │ │ │ -00001220: 6566 6175 6c74 2d77 6172 6e69 6e67 7320 efault-warnings │ │ │ -00001230: 2728 7265 6465 6669 6e65 2063 616c 6c61 '(redefine calla │ │ │ -00001240: 7267 7320 7375 6272 2d63 616c 6c61 7267 rgs subr-callarg │ │ │ -00001250: 7320 6672 6565 2d76 6172 7320 756e 7265 s free-vars unre │ │ │ -00001260: 736f 6c76 6564 2075 6e75 7365 642d 7661 solved unused-va │ │ │ -00001270: 7273 206f 6273 6f6c 6574 6529 2028 2324 rs obsolete) (#$ │ │ │ -00001280: 202e 202d 3435 3635 2929 0a23 4038 3139 . -4565)).#@819 │ │ │ -00001290: 202a 4c69 7374 206f 6620 7761 726e 696e *List of warnin │ │ │ -000012a0: 6773 2074 6861 7420 7468 6520 636f 6d70 gs that the comp │ │ │ -000012b0: 696c 6572 2073 686f 756c 6420 6973 7375 iler should issu │ │ │ -000012c0: 6520 2874 2066 6f72 2074 6865 2064 6566 e (t for the def │ │ │ -000012d0: 6175 6c74 2073 6574 292e 0a45 6c65 6d65 ault set)..Eleme │ │ │ -000012e0: 6e74 7320 6f66 2074 6865 206c 6973 7420 nts of the list │ │ │ -000012f0: 6d61 7920 6265 3a0a 0a20 2066 7265 652d may be:.. free- │ │ │ -00001300: 7661 7273 0972 6566 6572 656e 6365 7320 vars.references │ │ │ -00001310: 746f 2076 6172 6961 626c 6573 206e 6f74 to variables not │ │ │ -00001320: 2069 6e20 7468 6520 6375 7272 656e 7420 in the current │ │ │ -00001330: 6c65 7869 6361 6c20 7363 6f70 652e 0a20 lexical scope.. │ │ │ -00001340: 2075 6e75 7365 642d 7661 7273 0972 6566 unused-vars.ref │ │ │ -00001350: 6572 656e 6365 7320 746f 206e 6f6e 2d67 erences to non-g │ │ │ -00001360: 6c6f 6261 6c20 7661 7269 6162 6c65 7320 lobal variables │ │ │ -00001370: 626f 756e 6420 6275 7420 6e6f 7420 7265 bound but not re │ │ │ -00001380: 6665 7265 6e63 6564 2e0a 2020 756e 7265 ferenced.. unre │ │ │ -00001390: 736f 6c76 6564 0963 616c 6c73 2074 6f20 solved.calls to │ │ │ -000013a0: 756e 6b6e 6f77 6e20 6675 6e63 7469 6f6e unknown function │ │ │ -000013b0: 732e 0a20 2063 616c 6c61 7267 7309 6c61 s.. callargs.la │ │ │ -000013c0: 6d62 6461 2063 616c 6c73 2077 6974 6820 mbda calls with │ │ │ -000013d0: 6172 6773 2074 6861 7420 646f 6e27 7420 args that don't │ │ │ -000013e0: 6d61 7463 6820 7468 6520 6465 6669 6e69 match the defini │ │ │ -000013f0: 7469 6f6e 2e0a 2020 7375 6272 2d63 616c tion.. subr-cal │ │ │ -00001400: 6c61 7267 7309 6361 6c6c 7320 746f 2073 largs.calls to s │ │ │ -00001410: 7562 7273 2077 6974 6820 6172 6773 2074 ubrs with args t │ │ │ -00001420: 6861 7420 646f 6e27 7420 6d61 7463 6820 hat don't match │ │ │ -00001430: 7468 6520 6465 6669 6e69 7469 6f6e 2e0a the definition.. │ │ │ -00001440: 2020 7265 6465 6669 6e65 0966 756e 6374 redefine.funct │ │ │ -00001450: 696f 6e20 6365 6c6c 2072 6564 6566 696e ion cell redefin │ │ │ -00001460: 6564 2066 726f 6d20 6120 6d61 6372 6f20 ed from a macro │ │ │ -00001470: 746f 2061 206c 616d 6264 6120 6f72 2076 to a lambda or v │ │ │ -00001480: 6963 650a 0909 7665 7273 612c 206f 7220 ice...versa, or │ │ │ -00001490: 7265 6465 6669 6e65 6420 746f 2074 616b redefined to tak │ │ │ -000014a0: 6520 6120 6469 6666 6572 656e 7420 6e75 e a different nu │ │ │ -000014b0: 6d62 6572 206f 6620 6172 6775 6d65 6e74 mber of argument │ │ │ -000014c0: 732e 0a20 206f 6273 6f6c 6574 6509 7573 s.. obsolete.us │ │ │ -000014d0: 6520 6f66 2061 6e20 6f62 736f 6c65 7465 e of an obsolete │ │ │ -000014e0: 2066 756e 6374 696f 6e20 6f72 2076 6172 function or var │ │ │ -000014f0: 6961 626c 652e 0a20 2070 6564 616e 7469 iable.. pedanti │ │ │ -00001500: 6309 7761 726e 206f 6620 7573 6520 6f66 c.warn of use of │ │ │ -00001510: 2063 6f6d 7061 7469 626c 6520 7379 6d62 compatible symb │ │ │ -00001520: 6f6c 732e 0a0a 5468 6520 6465 6661 756c ols...The defaul │ │ │ -00001530: 7420 7365 7420 6973 2073 7065 6369 6669 t set is specifi │ │ │ -00001540: 6564 2062 7920 6062 7974 652d 636f 6d70 ed by `byte-comp │ │ │ -00001550: 696c 652d 6465 6661 756c 742d 7761 726e ile-default-warn │ │ │ -00001560: 696e 6773 2720 616e 640a 6e6f 726d 616c ings' and.normal │ │ │ -00001570: 6c79 2065 6e63 6f6d 7061 7373 6573 2061 ly encompasses a │ │ │ -00001580: 6c6c 2070 6f73 7369 626c 6520 7761 726e ll possible warn │ │ │ -00001590: 696e 6773 2e0a 0a53 6565 2061 6c73 6f20 ings...See also │ │ │ -000015a0: 7468 6520 6d61 6372 6f20 6062 7974 652d the macro `byte- │ │ │ -000015b0: 636f 6d70 696c 6572 2d6f 7074 696f 6e73 compiler-options │ │ │ -000015c0: 272e 1f0a 2864 6566 7661 7220 6279 7465 '...(defvar byte │ │ │ -000015d0: 2d63 6f6d 7069 6c65 2d77 6172 6e69 6e67 -compile-warning │ │ │ -000015e0: 7320 7420 2823 2420 2e20 2d34 3735 3329 s t (#$ . -4753) │ │ │ -000015f0: 290a 2340 3634 3220 2a4e 6f6e 2d6e 696c ).#@642 *Non-nil │ │ │ -00001600: 206d 6561 6e73 2063 6f6c 6c65 6374 2063 means collect c │ │ │ -00001610: 616c 6c2d 6772 6170 6820 696e 666f 726d all-graph inform │ │ │ -00001620: 6174 696f 6e20 7768 656e 2063 6f6d 7069 ation when compi │ │ │ -00001630: 6c69 6e67 2e0a 5468 6973 2072 6563 6f72 ling..This recor │ │ │ -00001640: 6473 2066 756e 6374 696f 6e73 2074 6861 ds functions tha │ │ │ -00001650: 7420 7765 7265 2063 616c 6c65 6420 616e t were called an │ │ │ -00001660: 6420 6672 6f6d 2077 6865 7265 2e0a 4966 d from where..If │ │ │ -00001670: 2074 6865 2076 616c 7565 2069 7320 742c the value is t, │ │ │ -00001680: 2063 6f6d 7069 6c61 7469 6f6e 2064 6973 compilation dis │ │ │ -00001690: 706c 6179 7320 7468 6520 6361 6c6c 2067 plays the call g │ │ │ -000016a0: 7261 7068 2077 6865 6e20 6974 2066 696e raph when it fin │ │ │ -000016b0: 6973 6865 732e 0a49 6620 7468 6520 7661 ishes..If the va │ │ │ -000016c0: 6c75 6520 6973 206e 6569 7468 6572 2074 lue is neither t │ │ │ -000016d0: 206e 6f72 206e 696c 2c20 636f 6d70 696c nor nil, compil │ │ │ -000016e0: 6174 696f 6e20 6173 6b73 2079 6f75 2077 ation asks you w │ │ │ -000016f0: 6865 7468 6572 2074 6f20 6469 7370 6c61 hether to displa │ │ │ -00001700: 790a 7468 6520 6772 6170 682e 0a0a 5468 y.the graph...Th │ │ │ -00001710: 6520 6361 6c6c 2074 7265 6520 6f6e 6c79 e call tree only │ │ │ -00001720: 206c 6973 7473 2066 756e 6374 696f 6e73 lists functions │ │ │ -00001730: 2063 616c 6c65 642c 206e 6f74 206d 6163 called, not mac │ │ │ -00001740: 726f 7320 7573 6564 2e20 5468 6f73 6520 ros used. Those │ │ │ -00001750: 6675 6e63 7469 6f6e 730a 7768 6963 6820 functions.which │ │ │ -00001760: 7468 6520 6279 7465 2d63 6f64 6520 696e the byte-code in │ │ │ -00001770: 7465 7270 7265 7465 7220 6b6e 6f77 7320 terpreter knows │ │ │ -00001780: 6162 6f75 7420 6469 7265 6374 6c79 2028 about directly ( │ │ │ -00001790: 6571 2c20 636f 6e73 2c20 6574 632e 2920 eq, cons, etc.) │ │ │ -000017a0: 6172 650a 6e6f 7420 7265 706f 7274 6564 are.not reported │ │ │ -000017b0: 2e0a 0a54 6865 2063 616c 6c20 7472 6565 ...The call tree │ │ │ -000017c0: 2061 6c73 6f20 6c69 7374 7320 7468 6f73 also lists thos │ │ │ -000017d0: 6520 6675 6e63 7469 6f6e 7320 7768 6963 e functions whic │ │ │ -000017e0: 6820 6172 6520 6e6f 7420 6b6e 6f77 6e20 h are not known │ │ │ -000017f0: 746f 2062 6520 6361 6c6c 6564 0a28 7468 to be called.(th │ │ │ -00001800: 6174 2069 732c 2074 6f20 7768 6963 6820 at is, to which │ │ │ -00001810: 6e6f 2063 616c 6c73 2068 6176 6520 6265 no calls have be │ │ │ -00001820: 656e 2063 6f6d 7069 6c65 6429 2e20 2046 en compiled). F │ │ │ -00001830: 756e 6374 696f 6e73 2077 6869 6368 2063 unctions which c │ │ │ -00001840: 616e 2062 650a 696e 766f 6b65 6420 696e an be.invoked in │ │ │ -00001850: 7465 7261 6374 6976 656c 7920 6172 6520 teractively are │ │ │ -00001860: 6578 636c 7564 6564 2066 726f 6d20 7468 excluded from th │ │ │ -00001870: 6973 206c 6973 742e 1f0a 2864 6566 7661 is list...(defva │ │ │ -00001880: 7220 6279 7465 2d63 6f6d 7069 6c65 2d67 r byte-compile-g │ │ │ -00001890: 656e 6572 6174 652d 6361 6c6c 2d74 7265 enerate-call-tre │ │ │ -000018a0: 6520 6e69 6c20 2823 2420 2e20 2d35 3632 e nil (#$ . -562 │ │ │ -000018b0: 3429 290a 2340 3234 3120 416c 6973 7420 4)).#@241 Alist │ │ │ -000018c0: 6f66 2066 756e 6374 696f 6e73 2061 6e64 of functions and │ │ │ -000018d0: 2074 6865 6972 2063 616c 6c20 7472 6565 their call tree │ │ │ -000018e0: 2e0a 4561 6368 2065 6c65 6d65 6e74 206c ..Each element l │ │ │ -000018f0: 6f6f 6b73 206c 696b 650a 0a20 2028 4655 ooks like.. (FU │ │ │ -00001900: 4e43 5449 4f4e 2043 414c 4c45 5253 2043 NCTION CALLERS C │ │ │ -00001910: 414c 4c53 290a 0a77 6865 7265 2043 414c ALLS)..where CAL │ │ │ -00001920: 4c45 5253 2069 7320 6120 6c69 7374 206f LERS is a list o │ │ │ -00001930: 6620 6675 6e63 7469 6f6e 7320 7468 6174 f functions that │ │ │ -00001940: 2063 616c 6c20 4655 4e43 5449 4f4e 2c20 call FUNCTION, │ │ │ -00001950: 616e 6420 4341 4c4c 530a 6973 2061 206c and CALLS.is a l │ │ │ -00001960: 6973 7420 6f66 2066 756e 6374 696f 6e73 ist of functions │ │ │ -00001970: 2066 6f72 2077 6869 6368 2063 616c 6c73 for which calls │ │ │ -00001980: 2077 6572 6520 6765 6e65 7261 7465 6420 were generated │ │ │ -00001990: 7768 696c 6520 636f 6d70 696c 696e 670a while compiling. │ │ │ -000019a0: 4655 4e43 5449 4f4e 2e1f 0a28 6465 6663 FUNCTION...(defc │ │ │ -000019b0: 6f6e 7374 2062 7974 652d 636f 6d70 696c onst byte-compil │ │ │ -000019c0: 652d 6361 6c6c 2d74 7265 6520 6e69 6c20 e-call-tree nil │ │ │ -000019d0: 2823 2420 2e20 3633 3330 2929 0a23 4031 (#$ . 6330)).#@1 │ │ │ -000019e0: 3236 202a 4966 206e 6f6e 2d6e 696c 2c20 26 *If non-nil, │ │ │ -000019f0: 736f 7274 2074 6865 2063 616c 6c20 7472 sort the call tr │ │ │ -00001a00: 6565 2e0a 5468 6520 7661 6c75 6573 2060 ee..The values ` │ │ │ -00001a10: 6e61 6d65 272c 2060 6361 6c6c 6572 7327 name', `callers' │ │ │ -00001a20: 2c20 6063 616c 6c73 272c 2060 6361 6c6c , `calls', `call │ │ │ -00001a30: 732b 6361 6c6c 6572 7327 0a73 7065 6369 s+callers'.speci │ │ │ -00001a40: 6679 2064 6966 6665 7265 6e74 2066 6965 fy different fie │ │ │ -00001a50: 6c64 7320 746f 2073 6f72 7420 6f6e 2e1f lds to sort on.. │ │ │ -00001a60: 0a28 6465 6676 6172 2062 7974 652d 636f .(defvar byte-co │ │ │ -00001a70: 6d70 696c 652d 6361 6c6c 2d74 7265 652d mpile-call-tree- │ │ │ -00001a80: 736f 7274 2027 6e61 6d65 2028 2324 202e sort 'name (#$ . │ │ │ -00001a90: 202d 3636 3237 2929 0a23 4034 3034 2049 -6627)).#@404 I │ │ │ -00001aa0: 6620 6e69 6c2c 206f 6c64 202e 656c 6320 f nil, old .elc │ │ │ -00001ab0: 6669 6c65 7320 6172 6520 6465 6c65 7465 files are delete │ │ │ -00001ac0: 6420 6265 666f 7265 2074 6865 206e 6577 d before the new │ │ │ -00001ad0: 2069 7320 7361 7665 642c 2061 6e64 202e is saved, and . │ │ │ -00001ae0: 656c 630a 6669 6c65 7320 7769 6c6c 2068 elc.files will h │ │ │ -00001af0: 6176 6520 7468 6520 7361 6d65 206d 6f64 ave the same mod │ │ │ -00001b00: 6573 2061 7320 7468 6520 636f 7272 6573 es as the corres │ │ │ -00001b10: 706f 6e64 696e 6720 2e65 6c20 6669 6c65 ponding .el file │ │ │ -00001b20: 2e20 204f 7468 6572 7769 7365 2c0a 6578 . Otherwise,.ex │ │ │ -00001b30: 6973 7469 6e67 202e 656c 6320 6669 6c65 isting .elc file │ │ │ -00001b40: 7320 7769 6c6c 2073 696d 706c 7920 6265 s will simply be │ │ │ -00001b50: 206f 7665 7277 7269 7474 656e 2c20 616e overwritten, an │ │ │ -00001b60: 6420 7468 6520 6578 6973 7469 6e67 206d d the existing m │ │ │ -00001b70: 6f64 6573 0a77 696c 6c20 6e6f 7420 6265 odes.will not be │ │ │ -00001b80: 2063 6861 6e67 6564 2e20 2049 6620 7468 changed. If th │ │ │ -00001b90: 6973 2076 6172 6961 626c 6520 6973 206e is variable is n │ │ │ -00001ba0: 696c 2c20 7468 656e 2061 6e20 2e65 6c63 il, then an .elc │ │ │ -00001bb0: 2066 696c 6520 7768 6963 680a 6973 2061 file which.is a │ │ │ -00001bc0: 2073 796d 626f 6c69 6320 6c69 6e6b 2077 symbolic link w │ │ │ -00001bd0: 696c 6c20 6265 2074 7572 6e65 6420 696e ill be turned in │ │ │ -00001be0: 746f 2061 206e 6f72 6d61 6c20 6669 6c65 to a normal file │ │ │ -00001bf0: 2c20 696e 7374 6561 6420 6f66 2074 6865 , instead of the │ │ │ -00001c00: 2066 696c 650a 7768 6963 6820 7468 6520 file.which the │ │ │ -00001c10: 6c69 6e6b 2070 6f69 6e74 7320 746f 2062 link points to b │ │ │ -00001c20: 6569 6e67 206f 7665 7277 7269 7474 656e eing overwritten │ │ │ -00001c30: 2e1f 0a28 6465 6676 6172 2062 7974 652d ...(defvar byte- │ │ │ -00001c40: 636f 6d70 696c 652d 6f76 6572 7772 6974 compile-overwrit │ │ │ -00001c50: 652d 6669 6c65 2074 2028 2324 202e 2036 e-file t (#$ . 6 │ │ │ -00001c60: 3831 3529 290a 2340 3136 3020 4966 2074 815)).#@160 If t │ │ │ -00001c70: 7275 652c 2074 6865 6e20 6062 7974 652d rue, then `byte- │ │ │ -00001c80: 7265 636f 6d70 696c 652d 6469 7265 6374 recompile-direct │ │ │ -00001c90: 6f72 7927 2077 696c 6c20 636f 6e74 696e ory' will contin │ │ │ -00001ca0: 7565 2063 6f6d 7069 6c69 6e67 2065 7665 ue compiling eve │ │ │ -00001cb0: 6e0a 7768 656e 2061 6e20 6572 726f 7220 n.when an error │ │ │ -00001cc0: 6f63 6375 7273 2069 6e20 6120 6669 6c65 occurs in a file │ │ │ -00001cd0: 2e20 2054 6869 7320 6973 2062 6f75 6e64 . This is bound │ │ │ -00001ce0: 2074 6f20 7420 6279 0a60 6261 7463 682d to t by.`batch- │ │ │ -00001cf0: 6279 7465 2d72 6563 6f6d 7069 6c65 2d64 byte-recompile-d │ │ │ -00001d00: 6972 6563 746f 7279 272e 1f0a 2864 6566 irectory'...(def │ │ │ -00001d10: 7661 7220 6279 7465 2d72 6563 6f6d 7069 var byte-recompi │ │ │ -00001d20: 6c65 2d64 6972 6563 746f 7279 2d69 676e le-directory-ign │ │ │ -00001d30: 6f72 652d 6572 726f 7273 2d70 206e 696c ore-errors-p nil │ │ │ -00001d40: 2028 2324 202e 2037 3237 3629 290a 2340 (#$ . 7276)).#@ │ │ │ -00001d50: 3735 202a 4966 2074 7275 652c 2074 6865 75 *If true, the │ │ │ -00001d60: 6e20 6062 7974 652d 7265 636f 6d70 696c n `byte-recompil │ │ │ -00001d70: 652d 6469 7265 6374 6f72 7927 2077 696c e-directory' wil │ │ │ -00001d80: 6c20 7265 6375 7273 6520 6f6e 2073 7562 l recurse on sub │ │ │ -00001d90: 6469 7265 6374 6f72 6965 732e 1f0a 2864 directories...(d │ │ │ -00001da0: 6566 7661 7220 6279 7465 2d72 6563 6f6d efvar byte-recom │ │ │ -00001db0: 7069 6c65 2d64 6972 6563 746f 7279 2d72 pile-directory-r │ │ │ -00001dc0: 6563 7572 7369 7665 6c79 2074 2028 2324 ecursively t (#$ │ │ │ -00001dd0: 202e 202d 3735 3037 2929 0a23 4036 3720 . -7507)).#@67 │ │ │ -00001de0: 6c69 7374 206f 6620 616c 6c20 636f 6e73 list of all cons │ │ │ -00001df0: 7461 6e74 7320 656e 636f 756e 7465 7265 tants encountere │ │ │ -00001e00: 6420 6475 7269 6e67 2063 6f6d 7069 6c61 d during compila │ │ │ -00001e10: 7469 6f6e 206f 6620 7468 6973 2066 6f72 tion of this for │ │ │ -00001e20: 6d1f 0a28 6465 6676 6172 2062 7974 652d m..(defvar byte- │ │ │ -00001e30: 636f 6d70 696c 652d 636f 6e73 7461 6e74 compile-constant │ │ │ -00001e40: 7320 6e69 6c20 2823 2420 2e20 3736 3438 s nil (#$ . 7648 │ │ │ -00001e50: 2929 0a23 4036 3720 6c69 7374 206f 6620 )).#@67 list of │ │ │ -00001e60: 616c 6c20 7661 7269 6162 6c65 7320 656e all variables en │ │ │ -00001e70: 636f 756e 7465 7265 6420 6475 7269 6e67 countered during │ │ │ -00001e80: 2063 6f6d 7069 6c61 7469 6f6e 206f 6620 compilation of │ │ │ -00001e90: 7468 6973 2066 6f72 6d1f 0a28 6465 6676 this form..(defv │ │ │ -00001ea0: 6172 2062 7974 652d 636f 6d70 696c 652d ar byte-compile- │ │ │ -00001eb0: 7661 7269 6162 6c65 7320 6e69 6c20 2823 variables nil (# │ │ │ -00001ec0: 2420 2e20 3737 3638 2929 0a23 4031 3936 $ . 7768)).#@196 │ │ │ -00001ed0: 2041 6c69 7374 206f 6620 7661 7269 6162 Alist of variab │ │ │ -00001ee0: 6c65 7320 626f 756e 6420 696e 2074 6865 les bound in the │ │ │ -00001ef0: 2063 6f6e 7465 7874 206f 6620 7468 6520 context of the │ │ │ -00001f00: 6375 7272 656e 7420 666f 726d 2c0a 7468 current form,.th │ │ │ -00001f10: 6174 2069 732c 2074 6865 2063 7572 7265 at is, the curre │ │ │ -00001f20: 6e74 206c 6578 6963 616c 2065 6e76 6972 nt lexical envir │ │ │ -00001f30: 6f6e 6d65 6e74 2e20 2054 6869 7320 6c69 onment. This li │ │ │ -00001f40: 7374 206c 6976 6573 2070 6172 746c 790a st lives partly. │ │ │ -00001f50: 6f6e 2074 6865 2073 7065 6362 696e 6420 on the specbind │ │ │ -00001f60: 7374 6163 6b2e 2020 5468 6520 6364 7220 stack. The cdr │ │ │ -00001f70: 6f66 2065 6163 6820 6365 6c6c 2069 7320 of each cell is │ │ │ -00001f80: 616e 2069 6e74 6567 6572 2062 6974 6d61 an integer bitma │ │ │ -00001f90: 736b 2e1f 0a28 6465 6676 6172 2062 7974 sk...(defvar byt │ │ │ -00001fa0: 652d 636f 6d70 696c 652d 626f 756e 642d e-compile-bound- │ │ │ -00001fb0: 7661 7269 6162 6c65 7320 6e69 6c20 2823 variables nil (# │ │ │ -00001fc0: 2420 2e20 3738 3839 2929 0a28 6279 7465 $ . 7889)).(byte │ │ │ -00001fd0: 2d63 6f64 6520 22c3 0c42 14c5 13c2 0c42 -code "..B.....B │ │ │ -00001fe0: 14c6 12c1 0c42 14c7 11c0 0c42 14c8 10c3 .....B.....B.... │ │ │ -00001ff0: 8722 205b 6279 7465 2d63 6f6d 7069 6c65 ." [byte-compile │ │ │ -00002000: 2d67 6c6f 6261 6c2d 6269 7420 6279 7465 -global-bit byte │ │ │ -00002010: 2d63 6f6d 7069 6c65 2d61 7267 6c69 7374 -compile-arglist │ │ │ -00002020: 2d62 6974 2062 7974 652d 636f 6d70 696c -bit byte-compil │ │ │ -00002030: 652d 6173 7369 676e 6564 2d62 6974 2062 e-assigned-bit b │ │ │ -00002040: 7974 652d 636f 6d70 696c 652d 7265 6665 yte-compile-refe │ │ │ -00002050: 7265 6e63 6564 2d62 6974 2063 7572 7265 renced-bit curre │ │ │ -00002060: 6e74 2d6c 6f61 642d 6c69 7374 2031 2032 nt-load-list 1 2 │ │ │ -00002070: 2034 2038 5d20 3229 0a28 6465 6661 6c69 4 8] 2).(defali │ │ │ -00002080: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ -00002090: 2d65 7661 6c20 235b 2866 6f72 6d29 2022 -eval #[(form) " │ │ │ -000020a0: c61a c78e 091c c689 1b1d 0c3a aba4 0c40 ...........:...@ │ │ │ -000020b0: 8913 8941 1340 15c8 0d21 ab86 0d89 4b42 ...A.@...!....KB │ │ │ -000020c0: aa81 0d5c 6e42 120d c90b 424d 880c 4189 ...\nB....BM..A. │ │ │ -000020d0: 14aa 59ca 0821 2d87 2220 5b66 6f72 6d20 ..Y..!-." [form │ │ │ -000020e0: 6279 7465 2d63 6f6d 7069 6c65 2d6d 6163 byte-compile-mac │ │ │ -000020f0: 726f 2d65 6e76 6972 6f6e 6d65 6e74 2073 ro-environment s │ │ │ -00002100: 6176 652d 6d61 6372 6f2d 656e 7669 726f ave-macro-enviro │ │ │ -00002110: 6e6d 656e 7420 6465 6620 2331 3d23 3a47 nment def #1=#:G │ │ │ -00002120: 3234 3539 3620 7379 6d20 6e69 6c20 2828 24596 sym nil (( │ │ │ -00002130: 6279 7465 2d63 6f64 6520 2208 c31a 8919 byte-code "..... │ │ │ -00002140: ab99 0940 8912 39ab 86c4 5c6e 2188 aa86 ...@..9...\n!... │ │ │ -00002150: 5c6e 405c 6e41 4d88 0941 8911 ac67 2ac3 \n@\nAM..A...g*. │ │ │ -00002160: 8722 205b 7361 7665 2d6d 6163 726f 2d65 ." [save-macro-e │ │ │ -00002170: 6e76 6972 6f6e 6d65 6e74 2023 323d 233a nvironment #2=#: │ │ │ -00002180: 2d2d 646f 6c69 7374 2d74 656d 702d 2d32 --dolist-temp--2 │ │ │ -00002190: 3435 3937 2065 6c74 206e 696c 2066 6d61 4597 elt nil fma │ │ │ -000021a0: 6b75 6e62 6f75 6e64 5d20 3329 2920 6662 kunbound] 3)) fb │ │ │ -000021b0: 6f75 6e64 7020 6d61 6372 6f20 6576 616c oundp macro eval │ │ │ -000021c0: 5d20 345d 290a 2340 3230 3520 5468 6520 ] 4]).#@205 The │ │ │ -000021d0: 6465 6661 756c 7420 6d61 6372 6f2d 656e default macro-en │ │ │ -000021e0: 7669 726f 6e6d 656e 7420 7061 7373 6564 vironment passed │ │ │ -000021f0: 2074 6f20 6d61 6372 6f65 7870 616e 6420 to macroexpand │ │ │ -00002200: 6279 2074 6865 2063 6f6d 7069 6c65 722e by the compiler. │ │ │ -00002210: 0a50 6c61 6369 6e67 2061 206d 6163 726f .Placing a macro │ │ │ -00002220: 2068 6572 6520 7769 6c6c 2063 6175 7365 here will cause │ │ │ -00002230: 2061 206d 6163 726f 2074 6f20 6861 7665 a macro to have │ │ │ -00002240: 2064 6966 6665 7265 6e74 2073 656d 616e different seman │ │ │ -00002250: 7469 6373 2077 6865 6e0a 6578 7061 6e64 tics when.expand │ │ │ -00002260: 6564 2062 7920 7468 6520 636f 6d70 696c ed by the compil │ │ │ -00002270: 6572 2061 7320 7768 656e 2065 7870 616e er as when expan │ │ │ -00002280: 6465 6420 6279 2074 6865 2069 6e74 6572 ded by the inter │ │ │ -00002290: 7072 6574 6572 2e1f 0a28 6465 6663 6f6e preter...(defcon │ │ │ -000022a0: 7374 2062 7974 652d 636f 6d70 696c 652d st byte-compile- │ │ │ -000022b0: 696e 6974 6961 6c2d 6d61 6372 6f2d 656e initial-macro-en │ │ │ -000022c0: 7669 726f 6e6d 656e 7420 2728 2862 7974 vironment '((byt │ │ │ -000022d0: 652d 636f 6d70 696c 6572 2d6f 7074 696f e-compiler-optio │ │ │ -000022e0: 6e73 206c 616d 6264 6120 2826 7265 7374 ns lambda (&rest │ │ │ -000022f0: 2066 6f72 6d73 2920 2861 7070 6c79 2027 forms) (apply ' │ │ │ -00002300: 6279 7465 2d63 6f6d 7069 6c65 722d 6f70 byte-compiler-op │ │ │ -00002310: 7469 6f6e 732d 6861 6e64 6c65 7220 666f tions-handler fo │ │ │ -00002320: 726d 7329 2920 2865 7661 6c2d 7768 656e rms)) (eval-when │ │ │ -00002330: 2d63 6f6d 7069 6c65 206c 616d 6264 6120 -compile lambda │ │ │ -00002340: 2826 7265 7374 2062 6f64 7929 2028 6c69 (&rest body) (li │ │ │ -00002350: 7374 2027 7175 6f74 6520 2862 7974 652d st 'quote (byte- │ │ │ -00002360: 636f 6d70 696c 652d 6576 616c 2028 636f compile-eval (co │ │ │ -00002370: 6e73 2027 7072 6f67 6e20 626f 6479 2929 ns 'progn body)) │ │ │ -00002380: 2929 2028 6576 616c 2d61 6e64 2d63 6f6d )) (eval-and-com │ │ │ -00002390: 7069 6c65 206c 616d 6264 6120 2826 7265 pile lambda (&re │ │ │ -000023a0: 7374 2062 6f64 7929 2028 6279 7465 2d63 st body) (byte-c │ │ │ -000023b0: 6f6d 7069 6c65 2d65 7661 6c20 2863 6f6e ompile-eval (con │ │ │ -000023c0: 7320 2770 726f 676e 2062 6f64 7929 2920 s 'progn body)) │ │ │ -000023d0: 2863 6f6e 7320 2770 726f 676e 2062 6f64 (cons 'progn bod │ │ │ -000023e0: 7929 2929 2028 2324 202e 2038 3635 3229 y))) (#$ . 8652) │ │ │ -000023f0: 290a 2340 3136 3920 416c 6973 7420 6f66 ).#@169 Alist of │ │ │ -00002400: 206d 6163 726f 7320 6465 6669 6e65 6420 macros defined │ │ │ -00002410: 696e 2074 6865 2066 696c 6520 6265 696e in the file bein │ │ │ -00002420: 6720 636f 6d70 696c 6564 2e0a 4561 6368 g compiled..Each │ │ │ -00002430: 2065 6c65 6d65 6e74 206c 6f6f 6b73 206c element looks l │ │ │ -00002440: 696b 6520 284d 4143 524f 4e41 4d45 202e ike (MACRONAME . │ │ │ -00002450: 2044 4546 494e 4954 494f 4e29 2e20 2049 DEFINITION). I │ │ │ -00002460: 7420 6973 0a28 4d41 4352 4f4e 414d 4520 t is.(MACRONAME │ │ │ -00002470: 2e20 6e69 6c29 2077 6865 6e20 6120 6d61 . nil) when a ma │ │ │ -00002480: 6372 6f20 6973 2072 6564 6566 696e 6564 cro is redefined │ │ │ -00002490: 2061 7320 6120 6675 6e63 7469 6f6e 2e1f as a function.. │ │ │ -000024a0: 0a28 6465 6676 6172 2062 7974 652d 636f .(defvar byte-co │ │ │ -000024b0: 6d70 696c 652d 6d61 6372 6f2d 656e 7669 mpile-macro-envi │ │ │ -000024c0: 726f 6e6d 656e 7420 6279 7465 2d63 6f6d ronment byte-com │ │ │ -000024d0: 7069 6c65 2d69 6e69 7469 616c 2d6d 6163 pile-initial-mac │ │ │ -000024e0: 726f 2d65 6e76 6972 6f6e 6d65 6e74 2028 ro-environment ( │ │ │ -000024f0: 2324 202e 2039 3230 3829 290a 2340 3232 #$ . 9208)).#@22 │ │ │ -00002500: 3420 416c 6973 7420 6f66 2066 756e 6374 4 Alist of funct │ │ │ -00002510: 696f 6e73 2064 6566 696e 6564 2069 6e20 ions defined in │ │ │ -00002520: 7468 6520 6669 6c65 2062 6569 6e67 2063 the file being c │ │ │ -00002530: 6f6d 7069 6c65 642e 0a54 6869 7320 6973 ompiled..This is │ │ │ -00002540: 2073 6f20 7765 2063 616e 2069 6e6c 696e so we can inlin │ │ │ -00002550: 6520 7468 656d 2077 6865 6e20 6e65 6365 e them when nece │ │ │ -00002560: 7373 6172 792e 0a45 6163 6820 656c 656d ssary..Each elem │ │ │ -00002570: 656e 7420 6c6f 6f6b 7320 6c69 6b65 2028 ent looks like ( │ │ │ -00002580: 4655 4e43 5449 4f4e 4e41 4d45 202e 2044 FUNCTIONNAME . D │ │ │ -00002590: 4546 494e 4954 494f 4e29 2e20 2049 7420 EFINITION). It │ │ │ -000025a0: 6973 0a28 4655 4e43 5449 4f4e 4e41 4d45 is.(FUNCTIONNAME │ │ │ -000025b0: 202e 206e 696c 2920 7768 656e 2061 2066 . nil) when a f │ │ │ -000025c0: 756e 6374 696f 6e20 6973 2072 6564 6566 unction is redef │ │ │ -000025d0: 696e 6564 2061 7320 6120 6d61 6372 6f2e ined as a macro. │ │ │ -000025e0: 1f0a 2864 6566 7661 7220 6279 7465 2d63 ..(defvar byte-c │ │ │ -000025f0: 6f6d 7069 6c65 2d66 756e 6374 696f 6e2d ompile-function- │ │ │ -00002600: 656e 7669 726f 6e6d 656e 7420 6e69 6c20 environment nil │ │ │ -00002610: 2823 2420 2e20 3934 3734 2929 0a23 4032 (#$ . 9474)).#@2 │ │ │ -00002620: 3535 2041 6c69 7374 206f 6620 6675 6e63 55 Alist of func │ │ │ -00002630: 7469 6f6e 7320 616e 6420 6d61 6372 6f73 tions and macros │ │ │ -00002640: 2064 6566 696e 6564 2062 7920 6175 746f defined by auto │ │ │ -00002650: 6c6f 6164 2069 6e20 7468 6520 6669 6c65 load in the file │ │ │ -00002660: 2062 6569 6e67 2063 6f6d 7069 6c65 642e being compiled. │ │ │ -00002670: 0a54 6869 7320 6973 2073 6f20 7765 2063 .This is so we c │ │ │ -00002680: 616e 2073 7570 7072 6573 7320 7761 726e an suppress warn │ │ │ -00002690: 696e 6773 2061 626f 7574 2063 616c 6c73 ings about calls │ │ │ -000026a0: 2074 6f20 7468 6573 6520 6675 6e63 7469 to these functi │ │ │ -000026b0: 6f6e 732c 2065 7665 6e20 7468 6f75 6768 ons, even though │ │ │ -000026c0: 0a74 6865 7920 646f 206e 6f74 2068 6176 .they do not hav │ │ │ -000026d0: 6520 6072 6561 6c27 2064 6566 696e 6974 e `real' definit │ │ │ -000026e0: 696f 6e73 2e0a 4561 6368 2065 6c65 6d65 ions..Each eleme │ │ │ -000026f0: 6e74 206c 6f6f 6b73 206c 696b 6520 2846 nt looks like (F │ │ │ -00002700: 554e 4354 494f 4e4e 414d 4520 2e20 4341 UNCTIONNAME . CA │ │ │ -00002710: 4c4c 2d54 4f2d 4155 544f 4c4f 4144 292e LL-TO-AUTOLOAD). │ │ │ -00002720: 1f0a 2864 6566 7661 7220 6279 7465 2d63 ..(defvar byte-c │ │ │ -00002730: 6f6d 7069 6c65 2d61 7574 6f6c 6f61 642d ompile-autoload- │ │ │ -00002740: 656e 7669 726f 6e6d 656e 7420 6e69 6c20 environment nil │ │ │ -00002750: 2823 2420 2e20 3937 3633 2929 0a23 4031 (#$ . 9763)).#@1 │ │ │ -00002760: 3430 2041 6c69 7374 206f 6620 756e 6465 40 Alist of unde │ │ │ -00002770: 6669 6e65 6420 6675 6e63 7469 6f6e 7320 fined functions │ │ │ -00002780: 746f 2077 6869 6368 2063 616c 6c73 2068 to which calls h │ │ │ -00002790: 6176 6520 6265 656e 2063 6f6d 7069 6c65 ave been compile │ │ │ -000027a0: 6420 2875 7365 6420 666f 720a 7761 726e d (used for.warn │ │ │ -000027b0: 696e 6773 2077 6865 6e20 7468 6520 6675 ings when the fu │ │ │ -000027c0: 6e63 7469 6f6e 2069 7320 6c61 7465 7220 nction is later │ │ │ -000027d0: 6465 6669 6e65 6420 7769 7468 2069 6e63 defined with inc │ │ │ -000027e0: 6f72 7265 6374 2061 7267 7329 2e1f 0a28 orrect args)...( │ │ │ -000027f0: 6465 6676 6172 2062 7974 652d 636f 6d70 defvar byte-comp │ │ │ -00002800: 696c 652d 756e 7265 736f 6c76 6564 2d66 ile-unresolved-f │ │ │ -00002810: 756e 6374 696f 6e73 206e 696c 2028 2324 unctions nil (#$ │ │ │ -00002820: 202e 2031 3030 3833 2929 0a28 6279 7465 . 10083)).(byte │ │ │ -00002830: 2d63 6f64 6520 22c1 0842 10c2 c121 ac85 -code "..B...!.. │ │ │ -00002840: c3c1 c45c 2288 c187 2220 5b63 7572 7265 ...\"..." [curre │ │ │ -00002850: 6e74 2d6c 6f61 642d 6c69 7374 2062 7974 nt-load-list byt │ │ │ -00002860: 652d 636f 6d70 696c 652d 7461 672d 6e75 e-compile-tag-nu │ │ │ -00002870: 6d62 6572 2064 6566 6175 6c74 2d62 6f75 mber default-bou │ │ │ -00002880: 6e64 7020 7365 742d 6465 6661 756c 7420 ndp set-default │ │ │ -00002890: 305d 2033 290a 2340 3837 2041 6c69 7374 0] 3).#@87 Alist │ │ │ -000028a0: 2064 6573 6372 6962 696e 6720 636f 6e74 describing cont │ │ │ -000028b0: 656e 7473 2074 6f20 7075 7420 696e 2062 ents to put in b │ │ │ -000028c0: 7974 6520 636f 6465 2073 7472 696e 672e yte code string. │ │ │ -000028d0: 0a45 6163 6820 656c 656d 656e 7420 6973 .Each element is │ │ │ -000028e0: 2028 494e 4445 5820 2e20 5641 4c55 4529 (INDEX . VALUE) │ │ │ -000028f0: 1f0a 2864 6566 7661 7220 6279 7465 2d63 ..(defvar byte-c │ │ │ -00002900: 6f6d 7069 6c65 2d6f 7574 7075 7420 6e69 ompile-output ni │ │ │ -00002910: 6c20 2823 2420 2e20 3130 3339 3529 290a l (#$ . 10395)). │ │ │ -00002920: 2340 3335 2043 7572 7265 6e74 2064 6570 #@35 Current dep │ │ │ -00002930: 7468 206f 6620 6578 6563 7574 696f 6e20 th of execution │ │ │ -00002940: 7374 6163 6b2e 1f0a 2864 6566 7661 7220 stack...(defvar │ │ │ -00002950: 6279 7465 2d63 6f6d 7069 6c65 2d64 6570 byte-compile-dep │ │ │ -00002960: 7468 2030 2028 2324 202e 2031 3035 3333 th 0 (#$ . 10533 │ │ │ -00002970: 2929 0a23 4033 3520 4d61 7869 6d75 6d20 )).#@35 Maximum │ │ │ -00002980: 6465 7074 6820 6f66 2065 7865 6375 7469 depth of executi │ │ │ -00002990: 6f6e 2073 7461 636b 2e1f 0a28 6465 6676 on stack...(defv │ │ │ -000029a0: 6172 2062 7974 652d 636f 6d70 696c 652d ar byte-compile- │ │ │ -000029b0: 6d61 7864 6570 7468 2030 2028 2324 202e maxdepth 0 (#$ . │ │ │ -000029c0: 2031 3036 3136 2929 0a23 4036 3620 416e 10616)).#@66 An │ │ │ -000029d0: 2061 7272 6179 2063 6f6e 7461 696e 696e array containin │ │ │ -000029e0: 6720 6279 7465 2d63 6f64 6520 6e61 6d65 g byte-code name │ │ │ -000029f0: 7320 696e 6465 7865 6420 6279 2062 7974 s indexed by byt │ │ │ -00002a00: 652d 636f 6465 2076 616c 7565 732e 1f0a e-code values... │ │ │ -00002a10: 2864 6566 636f 6e73 7420 6279 7465 2d63 (defconst byte-c │ │ │ -00002a20: 6f64 652d 7665 6374 6f72 206e 696c 2028 ode-vector nil ( │ │ │ -00002a30: 2324 202e 2031 3037 3032 2929 0a23 4035 #$ . 10702)).#@5 │ │ │ -00002a40: 3620 416e 2061 7272 6179 2077 6974 6820 6 An array with │ │ │ -00002a50: 7468 6520 7374 6163 6b20 6164 6a75 7374 the stack adjust │ │ │ -00002a60: 6d65 6e74 2066 6f72 2065 6163 6820 6279 ment for each by │ │ │ -00002a70: 7465 2d63 6f64 652e 1f0a 2864 6566 636f te-code...(defco │ │ │ -00002a80: 6e73 7420 6279 7465 2d73 7461 636b 2b2d nst byte-stack+- │ │ │ -00002a90: 696e 666f 206e 696c 2028 2324 202e 2031 info nil (#$ . 1 │ │ │ -00002aa0: 3038 3138 2929 0a28 6465 6661 6c69 6173 0818)).(defalias │ │ │ -00002ab0: 2027 6279 7465 2d64 6566 6f70 2027 286d 'byte-defop '(m │ │ │ -00002ac0: 6163 726f 202e 2023 5b28 6f70 636f 6465 acro . #[(opcode │ │ │ -00002ad0: 2073 7461 636b 2d61 646a 7573 7420 6f70 stack-adjust op │ │ │ -00002ae0: 6e61 6d65 2026 6f70 7469 6f6e 616c 2064 name &optional d │ │ │ -00002af0: 6f63 7374 7269 6e67 2920 22c6 c74e ae88 ocstring) "..N.. │ │ │ -00002b00: c8c6 c7c9 cacb 5c22 23cc c74e ae88 c8cc ......\"#..N.... │ │ │ -00002b10: c7c9 cacb 5c22 231b 8919 0d0c 4988 0b0d ....\"#.....I... │ │ │ -00002b20: 0849 882a 5c6e ab89 cd0c 0dce 5c6e cf51 .I.*\n......\n.Q │ │ │ -00002b30: 4687 cd0c 0d45 8722 205b 7374 6163 6b2d F....E." [stack- │ │ │ -00002b40: 6164 6a75 7374 2076 3120 646f 6373 7472 adjust v1 docstr │ │ │ -00002b50: 696e 6720 7632 206f 706e 616d 6520 6f70 ing v2 opname op │ │ │ -00002b60: 636f 6465 2062 7974 652d 636f 6465 2d76 code byte-code-v │ │ │ -00002b70: 6563 746f 7220 746d 702d 636f 6d70 696c ector tmp-compil │ │ │ -00002b80: 652d 7469 6d65 2d76 616c 7565 2070 7574 e-time-value put │ │ │ -00002b90: 206d 616b 652d 7665 6374 6f72 2032 3536 make-vector 256 │ │ │ -00002ba0: 206e 696c 2062 7974 652d 7374 6163 6b2b nil byte-stack+ │ │ │ -00002bb0: 2d69 6e66 6f20 6465 6663 6f6e 7374 2022 -info defconst " │ │ │ -00002bc0: 4279 7465 2063 6f64 6520 6f70 636f 6465 Byte code opcode │ │ │ -00002bd0: 2022 2022 2e22 5d20 385d 2929 0a28 6465 " "."] 8])).(de │ │ │ -00002be0: 6661 6c69 6173 2027 6279 7465 2d65 7874 falias 'byte-ext │ │ │ -00002bf0: 7275 6465 2d62 7974 652d 636f 6465 2d76 rude-byte-code-v │ │ │ -00002c00: 6563 746f 7273 2027 286d 6163 726f 202e ectors '(macro . │ │ │ -00002c10: 2023 5b6e 696c 2022 c0c1 89c2 4ec3 89c2 #[nil "....N... │ │ │ -00002c20: 4eaf 05c4 c1c2 5c22 88c4 c3c2 5c22 8887 N.....\"....\".. │ │ │ -00002c30: 2220 5b73 6574 7120 6279 7465 2d63 6f64 " [setq byte-cod │ │ │ -00002c40: 652d 7665 6374 6f72 2074 6d70 2d63 6f6d e-vector tmp-com │ │ │ -00002c50: 7069 6c65 2d74 696d 652d 7661 6c75 6520 pile-time-value │ │ │ -00002c60: 6279 7465 2d73 7461 636b 2b2d 696e 666f byte-stack+-info │ │ │ -00002c70: 2072 656d 7072 6f70 5d20 365d 2929 0a23 remprop] 6])).# │ │ │ -00002c80: 4034 3220 4279 7465 2063 6f64 6520 6f70 @42 Byte code op │ │ │ -00002c90: 636f 6465 2066 6f72 2076 6172 6961 626c code for variabl │ │ │ -00002ca0: 6520 7265 6665 7265 6e63 652e 1f0a 2864 e reference...(d │ │ │ -00002cb0: 6566 636f 6e73 7420 6279 7465 2d76 6172 efconst byte-var │ │ │ -00002cc0: 7265 6620 3820 2823 2420 2e20 3131 3339 ref 8 (#$ . 1139 │ │ │ -00002cd0: 3629 290a 2340 3432 2042 7974 6520 636f 6)).#@42 Byte co │ │ │ -00002ce0: 6465 206f 7063 6f64 6520 666f 7220 7365 de opcode for se │ │ │ -00002cf0: 7474 696e 6720 6120 7661 7269 6162 6c65 tting a variable │ │ │ -00002d00: 2e1f 0a28 6465 6663 6f6e 7374 2062 7974 ...(defconst byt │ │ │ -00002d10: 652d 7661 7273 6574 2031 3620 2823 2420 e-varset 16 (#$ │ │ │ -00002d20: 2e20 3131 3438 3129 290a 2340 3432 2042 . 11481)).#@42 B │ │ │ -00002d30: 7974 6520 636f 6465 206f 7063 6f64 6520 yte code opcode │ │ │ -00002d40: 666f 7220 6269 6e64 696e 6720 6120 7661 for binding a va │ │ │ -00002d50: 7269 6162 6c65 2e1f 0a28 6465 6663 6f6e riable...(defcon │ │ │ -00002d60: 7374 2062 7974 652d 7661 7262 696e 6420 st byte-varbind │ │ │ -00002d70: 3234 2028 2324 202e 2031 3135 3637 2929 24 (#$ . 11567)) │ │ │ -00002d80: 0a23 4034 3220 4279 7465 2063 6f64 6520 .#@42 Byte code │ │ │ -00002d90: 6f70 636f 6465 2066 6f72 2063 616c 6c69 opcode for calli │ │ │ -00002da0: 6e67 2061 2066 756e 6374 696f 6e2e 1f0a ng a function... │ │ │ -00002db0: 2864 6566 636f 6e73 7420 6279 7465 2d63 (defconst byte-c │ │ │ -00002dc0: 616c 6c20 3332 2028 2324 202e 2031 3136 all 32 (#$ . 116 │ │ │ -00002dd0: 3534 2929 0a23 4035 3020 4279 7465 2063 54)).#@50 Byte c │ │ │ -00002de0: 6f64 6520 6f70 636f 6465 2066 6f72 2075 ode opcode for u │ │ │ -00002df0: 6e62 696e 6469 6e67 2073 7065 6369 616c nbinding special │ │ │ -00002e00: 2062 696e 6469 6e67 732e 1f0a 2864 6566 bindings...(def │ │ │ -00002e10: 636f 6e73 7420 6279 7465 2d75 6e62 696e const byte-unbin │ │ │ -00002e20: 6420 3430 2028 2324 202e 2031 3137 3338 d 40 (#$ . 11738 │ │ │ -00002e30: 2929 0a28 6279 7465 2d63 6f64 6520 22c4 )).(byte-code ". │ │ │ -00002e40: 0d42 15c6 14c3 0d42 15c7 13c2 0d42 15c8 .B.....B.....B.. │ │ │ -00002e50: 12c1 0d42 15c9 11c0 0d42 15ca 10cb 0d42 ...B.....B.....B │ │ │ -00002e60: 15cc 160b cd0d 4215 ce16 0dcf 0d42 15d0 ......B......B.. │ │ │ -00002e70: 160f d10d 4215 d216 11d3 0d42 15d4 1613 ....B......B.... │ │ │ -00002e80: d50d 4215 d616 15d7 0d42 15d8 1617 d90d ..B......B...... │ │ │ -00002e90: 4215 da16 19db 0d42 15dc 161b dd0d 4215 B......B......B. │ │ │ -00002ea0: de16 1ddf 0d42 15e0 161f e10d 4215 e216 .....B......B... │ │ │ -00002eb0: 21e3 0d42 15e4 1623 e50d 4215 e616 25e7 !..B...#..B...%. │ │ │ -00002ec0: 0d42 15e8 1627 e90d 4215 ea16 29eb 0d42 .B...'..B...)..B │ │ │ -00002ed0: 15ec 162b ed0d 4215 ee16 2def 0d42 15f0 ...+..B...-..B.. │ │ │ -00002ee0: 162f f10d 4215 f216 31f3 0d42 15f4 1633 ./..B...1..B...3 │ │ │ -00002ef0: f50d 4215 f616 35f7 0d42 15f8 1637 f90d ..B...5..B...7.. │ │ │ -00002f00: 4215 fa16 39fb 0d42 15fc 163b fd0d 4215 B...9..B...;..B. │ │ │ -00002f10: fe16 3dff 0d42 1581 5a00 163f 8140 000d ..=..B..Z..?.@.. │ │ │ -00002f20: 4215 815b 0016 4081 4100 0d42 1581 5c5c B..[..@.A..B..\\ │ │ │ -00002f30: 0016 4181 4200 0d42 1581 5d00 1642 8143 ..A.B..B..]..B.C │ │ │ -00002f40: 000d 4215 815e 0016 4381 4400 0d42 1581 ..B..^..C.D..B.. │ │ │ -00002f50: 5f00 1644 8145 000d 4215 8160 0016 4581 _..D.E..B..`..E. │ │ │ -00002f60: 4600 0d42 1581 6100 1646 8147 000d 4215 F..B..a..F.G..B. │ │ │ -00002f70: 8162 0016 4781 4800 0d42 1581 6300 1648 .b..G.H..B..c..H │ │ │ -00002f80: 8149 000d 4215 8164 0016 4981 4a00 0d42 .I..B..d..I.J..B │ │ │ -00002f90: 1581 6500 164a 814b 000d 4215 8166 0016 ..e..J.K..B..f.. │ │ │ -00002fa0: 4b81 4c00 0d42 1581 6700 164c 814d 000d K.L..B..g..L.M.. │ │ │ -00002fb0: 4215 8168 0016 4d81 4e00 0d42 1581 6900 B..h..M.N..B..i. │ │ │ -00002fc0: 164e 814f 000d 4215 816a 0016 4f81 5000 .N.O..B..j..O.P. │ │ │ -00002fd0: 0d42 1581 6b00 1650 8151 000d 4215 816c .B..k..P.Q..B..l │ │ │ -00002fe0: 0016 5181 5200 0d42 1581 6d00 1652 8153 ..Q.R..B..m..R.S │ │ │ -00002ff0: 000d 4215 816e 0016 5381 5400 0d42 1581 ..B..n..S.T..B.. │ │ │ -00003000: 6f00 1654 8155 000d 4215 8170 0016 5581 o..T.U..B..p..U. │ │ │ -00003010: 5600 0d42 1581 7100 1656 8157 000d 4215 V..B..q..V.W..B. │ │ │ -00003020: 8172 0016 5781 5800 0d42 1581 7300 1658 .r..W.X..B..s..X │ │ │ -00003030: 8159 000d 4215 8174 0016 59c4 8722 205b .Y..B..t..Y.." [ │ │ │ -00003040: 6279 7465 2d6c 6973 7470 2062 7974 652d byte-listp byte- │ │ │ -00003050: 7374 7269 6e67 7020 6279 7465 2d63 6f6e stringp byte-con │ │ │ -00003060: 7370 2062 7974 652d 7379 6d62 6f6c 7020 sp byte-symbolp │ │ │ -00003070: 6279 7465 2d6e 7468 2063 7572 7265 6e74 byte-nth current │ │ │ -00003080: 2d6c 6f61 642d 6c69 7374 2035 3620 3537 -load-list 56 57 │ │ │ -00003090: 2035 3820 3539 2036 3020 6279 7465 2d6f 58 59 60 byte-o │ │ │ -000030a0: 6c64 2d65 7120 3631 2062 7974 652d 6f6c ld-eq 61 byte-ol │ │ │ -000030b0: 642d 6d65 6d71 2036 3220 6279 7465 2d6e d-memq 62 byte-n │ │ │ -000030c0: 6f74 2036 3320 6279 7465 2d63 6172 2036 ot 63 byte-car 6 │ │ │ -000030d0: 3420 6279 7465 2d63 6472 2036 3520 6279 4 byte-cdr 65 by │ │ │ -000030e0: 7465 2d63 6f6e 7320 3636 2062 7974 652d te-cons 66 byte- │ │ │ -000030f0: 6c69 7374 3120 3637 2062 7974 652d 6c69 list1 67 byte-li │ │ │ -00003100: 7374 3220 3638 2062 7974 652d 6c69 7374 st2 68 byte-list │ │ │ -00003110: 3320 3639 2062 7974 652d 6c69 7374 3420 3 69 byte-list4 │ │ │ -00003120: 3730 2062 7974 652d 6c65 6e67 7468 2037 70 byte-length 7 │ │ │ -00003130: 3120 6279 7465 2d61 7265 6620 3732 2062 1 byte-aref 72 b │ │ │ -00003140: 7974 652d 6173 6574 2037 3320 6279 7465 yte-aset 73 byte │ │ │ -00003150: 2d73 796d 626f 6c2d 7661 6c75 6520 3734 -symbol-value 74 │ │ │ -00003160: 2062 7974 652d 7379 6d62 6f6c 2d66 756e byte-symbol-fun │ │ │ -00003170: 6374 696f 6e20 3735 2062 7974 652d 7365 ction 75 byte-se │ │ │ -00003180: 7420 3736 2062 7974 652d 6673 6574 2037 t 76 byte-fset 7 │ │ │ -00003190: 3720 6279 7465 2d67 6574 2037 3820 6279 7 byte-get 78 by │ │ │ -000031a0: 7465 2d73 7562 7374 7269 6e67 2037 3920 te-substring 79 │ │ │ -000031b0: 6279 7465 2d63 6f6e 6361 7432 2038 3020 byte-concat2 80 │ │ │ -000031c0: 6279 7465 2d63 6f6e 6361 7433 2038 3120 byte-concat3 81 │ │ │ -000031d0: 6279 7465 2d63 6f6e 6361 7434 2038 3220 byte-concat4 82 │ │ │ -000031e0: 6279 7465 2d73 7562 3120 3833 2062 7974 byte-sub1 83 byt │ │ │ -000031f0: 652d 6164 6431 2038 3420 6279 7465 2d65 e-add1 84 byte-e │ │ │ -00003200: 716c 7369 676e 2038 3520 6279 7465 2d67 qlsign 85 byte-g │ │ │ -00003210: 7472 2038 3620 6279 7465 2d6c 7373 2062 tr 86 byte-lss b │ │ │ -00003220: 7974 652d 6c65 7120 6279 7465 2d67 6571 yte-leq byte-geq │ │ │ -00003230: 2062 7974 652d 6469 6666 2062 7974 652d byte-diff byte- │ │ │ -00003240: 6e65 6761 7465 2062 7974 652d 706c 7573 negate byte-plus │ │ │ -00003250: 2062 7974 652d 6d61 7820 6279 7465 2d6d byte-max byte-m │ │ │ -00003260: 696e 2062 7974 652d 6d75 6c74 2062 7974 in byte-mult byt │ │ │ -00003270: 652d 706f 696e 7420 6279 7465 2d65 7120 e-point byte-eq │ │ │ -00003280: 6279 7465 2d67 6f74 6f2d 6368 6172 2062 byte-goto-char b │ │ │ -00003290: 7974 652d 696e 7365 7274 2062 7974 652d yte-insert byte- │ │ │ -000032a0: 706f 696e 742d 6d61 7820 6279 7465 2d70 point-max byte-p │ │ │ -000032b0: 6f69 6e74 2d6d 696e 2062 7974 652d 6368 oint-min byte-ch │ │ │ -000032c0: 6172 2d61 6674 6572 2062 7974 652d 666f ar-after byte-fo │ │ │ -000032d0: 6c6c 6f77 696e 672d 6368 6172 2062 7974 llowing-char byt │ │ │ -000032e0: 652d 7072 6563 6564 696e 672d 6368 6172 e-preceding-char │ │ │ -000032f0: 2062 7974 652d 6375 7272 656e 742d 636f byte-current-co │ │ │ -00003300: 6c75 6d6e 2062 7974 652d 696e 6465 6e74 lumn byte-indent │ │ │ -00003310: 2d74 6f20 6279 7465 2d65 7175 616c 2062 -to byte-equal b │ │ │ -00003320: 7974 652d 656f 6c70 2062 7974 652d 656f yte-eolp byte-eo │ │ │ -00003330: 6270 2062 7974 652d 626f 6c70 2062 7974 bp byte-bolp byt │ │ │ -00003340: 652d 626f 6270 2062 7974 652d 6375 7272 e-bobp byte-curr │ │ │ -00003350: 656e 742d 6275 6666 6572 2062 7974 652d ent-buffer byte- │ │ │ -00003360: 7365 742d 6275 6666 6572 2038 3720 3838 set-buffer 87 88 │ │ │ -00003370: 2038 3920 3930 2039 3120 3932 2039 3320 89 90 91 92 93 │ │ │ -00003380: 3934 2039 3520 3936 2039 3720 3938 2039 94 95 96 97 98 9 │ │ │ -00003390: 3920 3130 3020 3130 3120 3130 3220 3130 9 100 101 102 10 │ │ │ -000033a0: 3320 3130 3420 3130 3520 3130 3620 3130 3 104 105 106 10 │ │ │ -000033b0: 3720 3130 3820 3130 3920 3131 3020 3131 7 108 109 110 11 │ │ │ -000033c0: 3120 3131 3220 3131 335d 2032 290a 2340 1 112 113] 2).#@ │ │ │ -000033d0: 3637 2042 7974 6520 636f 6465 206f 7063 67 Byte code opc │ │ │ -000033e0: 6f64 6520 546f 206d 616b 6520 6120 6269 ode To make a bi │ │ │ -000033f0: 6e64 696e 6720 746f 2072 6563 6f72 6420 nding to record │ │ │ -00003400: 7468 6520 6375 7272 656e 7420 6275 6666 the current buff │ │ │ -00003410: 6572 2e2e 1f0a 2864 6566 636f 6e73 7420 er....(defconst │ │ │ -00003420: 6279 7465 2d73 6176 652d 6375 7272 656e byte-save-curren │ │ │ -00003430: 742d 6275 6666 6572 2031 3134 2028 2324 t-buffer 114 (#$ │ │ │ -00003440: 202e 2031 3332 3637 2929 0a28 6279 7465 . 13267)).(byte │ │ │ -00003450: 2d63 6f64 6520 22c4 0d42 15c6 14c3 0d42 -code "..B.....B │ │ │ -00003460: 15c7 13c2 0d42 15c8 12c1 0d42 15c9 11c0 .....B.....B.... │ │ │ -00003470: 0d42 15ca 10cb 0d42 15cc 160b cd0d 4215 .B.....B......B. │ │ │ -00003480: ce16 0dcf 0d42 15d0 160f d10d 4215 d216 .....B......B... │ │ │ -00003490: 11d3 0d42 15d4 1613 d50d 4215 d616 15d7 ...B......B..... │ │ │ -000034a0: 0d42 15d8 1617 d90d 4215 da16 19c4 8722 .B......B......" │ │ │ -000034b0: 205b 6279 7465 2d73 6b69 702d 6368 6172 [byte-skip-char │ │ │ -000034c0: 732d 666f 7277 6172 6420 6279 7465 2d66 s-forward byte-f │ │ │ -000034d0: 6f72 7761 7264 2d77 6f72 6420 6279 7465 orward-word byte │ │ │ -000034e0: 2d66 6f72 7761 7264 2d63 6861 7220 6279 -forward-char by │ │ │ -000034f0: 7465 2d69 6e74 6572 6163 7469 7665 2d70 te-interactive-p │ │ │ -00003500: 2062 7974 652d 6d65 6d71 2063 7572 7265 byte-memq curre │ │ │ -00003510: 6e74 2d6c 6f61 642d 6c69 7374 2031 3135 nt-load-list 115 │ │ │ -00003520: 2031 3136 2031 3137 2031 3138 2031 3139 116 117 118 119 │ │ │ -00003530: 2062 7974 652d 736b 6970 2d63 6861 7273 byte-skip-chars │ │ │ -00003540: 2d62 6163 6b77 6172 6420 3132 3020 6279 -backward 120 by │ │ │ -00003550: 7465 2d66 6f72 7761 7264 2d6c 696e 6520 te-forward-line │ │ │ -00003560: 3132 3120 6279 7465 2d63 6861 722d 7379 121 byte-char-sy │ │ │ -00003570: 6e74 6178 2031 3232 2062 7974 652d 6275 ntax 122 byte-bu │ │ │ -00003580: 6666 6572 2d73 7562 7374 7269 6e67 2031 ffer-substring 1 │ │ │ -00003590: 3233 2062 7974 652d 6465 6c65 7465 2d72 23 byte-delete-r │ │ │ -000035a0: 6567 696f 6e20 3132 3420 6279 7465 2d6e egion 124 byte-n │ │ │ -000035b0: 6172 726f 772d 746f 2d72 6567 696f 6e20 arrow-to-region │ │ │ -000035c0: 3132 3520 6279 7465 2d77 6964 656e 2031 125 byte-widen 1 │ │ │ -000035d0: 3236 2062 7974 652d 656e 642d 6f66 2d6c 26 byte-end-of-l │ │ │ -000035e0: 696e 6520 3132 375d 2032 290a 2340 3838 ine 127] 2).#@88 │ │ │ -000035f0: 2042 7974 6520 636f 6465 206f 7063 6f64 Byte code opcod │ │ │ -00003600: 6520 666f 7220 7265 6665 7265 6e63 6520 e for reference │ │ │ -00003610: 746f 2061 2063 6f6e 7374 616e 7420 7769 to a constant wi │ │ │ -00003620: 7468 2076 6563 746f 7220 696e 6465 7820 th vector index │ │ │ -00003630: 3e3d 2062 7974 652d 636f 6e73 7461 6e74 >= byte-constant │ │ │ -00003640: 2d6c 696d 6974 2e1f 0a28 6465 6663 6f6e -limit...(defcon │ │ │ -00003650: 7374 2062 7974 652d 636f 6e73 7461 6e74 st byte-constant │ │ │ -00003660: 3220 3132 3920 2823 2420 2e20 3133 3830 2 129 (#$ . 1380 │ │ │ -00003670: 3929 290a 2340 3432 2042 7974 6520 636f 9)).#@42 Byte co │ │ │ -00003680: 6465 206f 7063 6f64 6520 666f 7220 756e de opcode for un │ │ │ -00003690: 636f 6e64 6974 696f 6e61 6c20 6a75 6d70 conditional jump │ │ │ -000036a0: 2e1f 0a28 6465 6663 6f6e 7374 2062 7974 ...(defconst byt │ │ │ -000036b0: 652d 676f 746f 2031 3330 2028 2324 202e e-goto 130 (#$ . │ │ │ -000036c0: 2031 3339 3435 2929 0a23 4035 3320 4279 13945)).#@53 By │ │ │ -000036d0: 7465 2063 6f64 6520 6f70 636f 6465 2074 te code opcode t │ │ │ -000036e0: 6f20 706f 7020 7661 6c75 6520 616e 6420 o pop value and │ │ │ -000036f0: 6a75 6d70 2069 6620 6974 2773 206e 696c jump if it's nil │ │ │ -00003700: 2e1f 0a28 6465 6663 6f6e 7374 2062 7974 ...(defconst byt │ │ │ -00003710: 652d 676f 746f 2d69 662d 6e69 6c20 3133 e-goto-if-nil 13 │ │ │ -00003720: 3120 2823 2420 2e20 3134 3033 3029 290a 1 (#$ . 14030)). │ │ │ -00003730: 2340 3537 2042 7974 6520 636f 6465 206f #@57 Byte code o │ │ │ -00003740: 7063 6f64 6520 746f 2070 6f70 2076 616c pcode to pop val │ │ │ -00003750: 7565 2061 6e64 206a 756d 7020 6966 2069 ue and jump if i │ │ │ -00003760: 7427 7320 6e6f 7420 6e69 6c2e 1f0a 2864 t's not nil...(d │ │ │ -00003770: 6566 636f 6e73 7420 6279 7465 2d67 6f74 efconst byte-got │ │ │ -00003780: 6f2d 6966 2d6e 6f74 2d6e 696c 2031 3332 o-if-not-nil 132 │ │ │ -00003790: 2028 2324 202e 2031 3431 3333 2929 0a23 (#$ . 14133)).# │ │ │ -000037a0: 4039 3620 4279 7465 2063 6f64 6520 6f70 @96 Byte code op │ │ │ -000037b0: 636f 6465 2074 6f20 6578 616d 696e 6520 code to examine │ │ │ -000037c0: 746f 702d 6f66 2d73 7461 636b 2c20 6a75 top-of-stack, ju │ │ │ -000037d0: 6d70 2061 6e64 2064 6f6e 2774 2070 6f70 mp and don't pop │ │ │ -000037e0: 2069 7420 6966 2069 7427 7320 6e69 6c2c it if it's nil, │ │ │ -000037f0: 0a6f 7468 6572 7769 7365 2070 6f70 2069 .otherwise pop i │ │ │ -00003800: 742e 1f0a 2864 6566 636f 6e73 7420 6279 t...(defconst by │ │ │ -00003810: 7465 2d67 6f74 6f2d 6966 2d6e 696c 2d65 te-goto-if-nil-e │ │ │ -00003820: 6c73 652d 706f 7020 3133 3320 2823 2420 lse-pop 133 (#$ │ │ │ -00003830: 2e20 3134 3234 3429 290a 2340 3130 3020 . 14244)).#@100 │ │ │ -00003840: 4279 7465 2063 6f64 6520 6f70 636f 6465 Byte code opcode │ │ │ -00003850: 2074 6f20 6578 616d 696e 6520 746f 702d to examine top- │ │ │ -00003860: 6f66 2d73 7461 636b 2c20 6a75 6d70 2061 of-stack, jump a │ │ │ -00003870: 6e64 2064 6f6e 2774 2070 6f70 2069 7420 nd don't pop it │ │ │ -00003880: 6966 2069 7427 7320 6e6f 6e2d 6e69 6c2c if it's non-nil, │ │ │ -00003890: 0a6f 7468 6572 7769 7365 2070 6f70 2069 .otherwise pop i │ │ │ -000038a0: 742e 1f0a 2864 6566 636f 6e73 7420 6279 t...(defconst by │ │ │ -000038b0: 7465 2d67 6f74 6f2d 6966 2d6e 6f74 2d6e te-goto-if-not-n │ │ │ -000038c0: 696c 2d65 6c73 652d 706f 7020 3133 3420 il-else-pop 134 │ │ │ -000038d0: 2823 2420 2e20 3134 3430 3029 290a 2340 (#$ . 14400)).#@ │ │ │ -000038e0: 3635 2042 7974 6520 636f 6465 206f 7063 65 Byte code opc │ │ │ -000038f0: 6f64 6520 746f 2070 6f70 2061 2076 616c ode to pop a val │ │ │ -00003900: 7565 2061 6e64 2072 6574 7572 6e20 6974 ue and return it │ │ │ -00003910: 2066 726f 6d20 6062 7974 652d 636f 6465 from `byte-code │ │ │ -00003920: 272e 1f0a 2864 6566 636f 6e73 7420 6279 '...(defconst by │ │ │ -00003930: 7465 2d72 6574 7572 6e20 3133 3520 2823 te-return 135 (# │ │ │ -00003940: 2420 2e20 3134 3536 3329 290a 2340 3531 $ . 14563)).#@51 │ │ │ -00003950: 2042 7974 6520 636f 6465 206f 7063 6f64 Byte code opcod │ │ │ -00003960: 6520 746f 2064 6973 6361 7264 206f 6e65 e to discard one │ │ │ -00003970: 2076 616c 7565 2066 726f 6d20 7374 6163 value from stac │ │ │ -00003980: 6b2e 1f0a 2864 6566 636f 6e73 7420 6279 k...(defconst by │ │ │ -00003990: 7465 2d64 6973 6361 7264 2031 3336 2028 te-discard 136 ( │ │ │ -000039a0: 2324 202e 2031 3436 3733 2929 0a23 4035 #$ . 14673)).#@5 │ │ │ -000039b0: 3320 4279 7465 2063 6f64 6520 6f70 636f 3 Byte code opco │ │ │ -000039c0: 6465 2074 6f20 6475 706c 6963 6174 6520 de to duplicate │ │ │ -000039d0: 7468 6520 746f 7020 6f66 2074 6865 2073 the top of the s │ │ │ -000039e0: 7461 636b 2e1f 0a28 6465 6663 6f6e 7374 tack...(defconst │ │ │ -000039f0: 2062 7974 652d 6475 7020 3133 3720 2823 byte-dup 137 (# │ │ │ -00003a00: 2420 2e20 3134 3737 3029 290a 2340 3734 $ . 14770)).#@74 │ │ │ -00003a10: 2042 7974 6520 636f 6465 206f 7063 6f64 Byte code opcod │ │ │ -00003a20: 6520 746f 206d 616b 6520 6120 6269 6e64 e to make a bind │ │ │ -00003a30: 696e 6720 746f 2072 6563 6f72 6420 7468 ing to record th │ │ │ -00003a40: 6520 6275 6666 6572 2c20 706f 696e 7420 e buffer, point │ │ │ -00003a50: 616e 6420 6d61 726b 2e1f 0a28 6465 6663 and mark...(defc │ │ │ -00003a60: 6f6e 7374 2062 7974 652d 7361 7665 2d65 onst byte-save-e │ │ │ -00003a70: 7863 7572 7369 6f6e 2031 3338 2028 2324 xcursion 138 (#$ │ │ │ -00003a80: 202e 2031 3438 3635 2929 0a23 4037 3520 . 14865)).#@75 │ │ │ -00003a90: 4279 7465 2063 6f64 6520 6f70 636f 6465 Byte code opcode │ │ │ -00003aa0: 2074 6f20 6d61 6b65 2061 2062 696e 6469 to make a bindi │ │ │ -00003ab0: 6e67 2074 6f20 7265 636f 7264 2065 6e74 ng to record ent │ │ │ -00003ac0: 6972 6520 7769 6e64 6f77 2063 6f6e 6669 ire window confi │ │ │ -00003ad0: 6775 7261 7469 6f6e 2e1f 0a28 6465 6663 guration...(defc │ │ │ -00003ae0: 6f6e 7374 2062 7974 652d 7361 7665 2d77 onst byte-save-w │ │ │ -00003af0: 696e 646f 772d 6578 6375 7273 696f 6e20 indow-excursion │ │ │ -00003b00: 3133 3920 2823 2420 2e20 3134 3939 3229 139 (#$ . 14992) │ │ │ -00003b10: 290a 2340 3838 2042 7974 6520 636f 6465 ).#@88 Byte code │ │ │ -00003b20: 206f 7063 6f64 6520 746f 206d 616b 6520 opcode to make │ │ │ -00003b30: 6120 6269 6e64 696e 6720 746f 2072 6563 a binding to rec │ │ │ -00003b40: 6f72 6420 7468 6520 6375 7272 656e 7420 ord the current │ │ │ -00003b50: 6275 6666 6572 2063 6c69 7070 696e 6720 buffer clipping │ │ │ -00003b60: 7265 7374 7269 6374 696f 6e73 2e1f 0a28 restrictions...( │ │ │ -00003b70: 6465 6663 6f6e 7374 2062 7974 652d 7361 defconst byte-sa │ │ │ -00003b80: 7665 2d72 6573 7472 6963 7469 6f6e 2031 ve-restriction 1 │ │ │ -00003b90: 3430 2028 2324 202e 2031 3531 3237 2929 40 (#$ . 15127)) │ │ │ -00003ba0: 0a23 4038 3720 4279 7465 2063 6f64 6520 .#@87 Byte code │ │ │ -00003bb0: 6f70 636f 6465 2066 6f72 2063 6174 6368 opcode for catch │ │ │ -00003bc0: 2e20 2054 616b 6573 2c20 6f6e 2073 7461 . Takes, on sta │ │ │ -00003bd0: 636b 2c20 7468 6520 7461 6720 616e 6420 ck, the tag and │ │ │ -00003be0: 616e 2065 7870 7265 7373 696f 6e20 666f an expression fo │ │ │ -00003bf0: 7220 7468 6520 626f 6479 2e1f 0a28 6465 r the body...(de │ │ │ -00003c00: 6663 6f6e 7374 2062 7974 652d 6361 7463 fconst byte-catc │ │ │ -00003c10: 6820 3134 3120 2823 2420 2e20 3135 3237 h 141 (#$ . 1527 │ │ │ -00003c20: 3029 290a 2340 3933 2042 7974 6520 636f 0)).#@93 Byte co │ │ │ -00003c30: 6465 206f 7063 6f64 6520 666f 7220 756e de opcode for un │ │ │ -00003c40: 7769 6e64 2d70 726f 7465 6374 2e20 2054 wind-protect. T │ │ │ -00003c50: 616b 6573 2c20 6f6e 2073 7461 636b 2c20 akes, on stack, │ │ │ -00003c60: 616e 2065 7870 7265 7373 696f 6e20 666f an expression fo │ │ │ -00003c70: 7220 7468 6520 756e 7769 6e64 2d61 6374 r the unwind-act │ │ │ -00003c80: 696f 6e2e 1f0a 2864 6566 636f 6e73 7420 ion...(defconst │ │ │ -00003c90: 6279 7465 2d75 6e77 696e 642d 7072 6f74 byte-unwind-prot │ │ │ -00003ca0: 6563 7420 3134 3220 2823 2420 2e20 3135 ect 142 (#$ . 15 │ │ │ -00003cb0: 3430 3129 290a 2862 7974 652d 636f 6465 401)).(byte-code │ │ │ -00003cc0: 2022 c40d 4215 c614 c30d 4215 c713 c20d "..B.....B..... │ │ │ -00003cd0: 4215 c812 c10d 4215 c911 c00d 4215 ca10 B.....B.....B... │ │ │ -00003ce0: cb0d 4215 cc16 0bcd 0d42 15ce 160d cf0d ..B......B...... │ │ │ -00003cf0: 4215 d016 0fd1 0d42 15d2 1611 d30d 4215 B......B......B. │ │ │ -00003d00: d416 13d5 0d42 15d6 1615 d70d 4215 d816 .....B......B... │ │ │ -00003d10: 17d9 0d42 15da 1619 db0d 4215 dc16 1bdd ...B......B..... │ │ │ -00003d20: 0d42 15de 161d df0d 4215 e016 1fe1 0d42 .B......B......B │ │ │ -00003d30: 15e2 1621 e30d 4215 e416 23e5 0d42 15e6 ...!..B...#..B.. │ │ │ -00003d40: 1625 e70d 4215 e816 27e9 0d42 15ea 1629 .%..B...'..B...) │ │ │ -00003d50: eb0d 4215 ec16 2bed 0d42 15ee 162d ef0d ..B...+..B...-.. │ │ │ -00003d60: 4215 f016 2ff1 0d42 15f2 1631 f30d 4215 B.../..B...1..B. │ │ │ -00003d70: f416 33f5 0d42 15f6 1635 f70d 4215 f816 ..3..B...5..B... │ │ │ -00003d80: 37f9 0d42 15fa 1639 fb0d 4215 fc16 3bfd 7..B...9..B...;. │ │ │ -00003d90: 0d42 15fe 163d ff0d 4215 8144 0016 3f81 .B...=..B..D..?. │ │ │ -00003da0: 4000 0d42 1581 4500 1640 8141 000d 4215 @..B..E..@.A..B. │ │ │ -00003db0: 8146 0016 4181 4200 0d42 1581 4700 1642 .F..A.B..B..G..B │ │ │ -00003dc0: 8143 000d 4215 8148 0016 43c4 8722 205b .C..B..H..C.." [ │ │ │ -00003dd0: 6279 7465 2d73 6574 2d6d 6172 6b65 7220 byte-set-marker │ │ │ -00003de0: 6279 7465 2d75 6e62 696e 642d 616c 6c20 byte-unbind-all │ │ │ -00003df0: 6279 7465 2d74 656d 702d 6f75 7470 7574 byte-temp-output │ │ │ -00003e00: 2d62 7566 6665 722d 7368 6f77 2062 7974 -buffer-show byt │ │ │ -00003e10: 652d 7465 6d70 2d6f 7574 7075 742d 6275 e-temp-output-bu │ │ │ -00003e20: 6666 6572 2d73 6574 7570 2062 7974 652d ffer-setup byte- │ │ │ -00003e30: 636f 6e64 6974 696f 6e2d 6361 7365 2063 condition-case c │ │ │ -00003e40: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ -00003e50: 2031 3433 2031 3434 2031 3435 2031 3436 143 144 145 146 │ │ │ -00003e60: 2031 3437 2062 7974 652d 6d61 7463 682d 147 byte-match- │ │ │ -00003e70: 6265 6769 6e6e 696e 6720 3134 3820 6279 beginning 148 by │ │ │ -00003e80: 7465 2d6d 6174 6368 2d65 6e64 2031 3439 te-match-end 149 │ │ │ -00003e90: 2062 7974 652d 7570 6361 7365 2031 3530 byte-upcase 150 │ │ │ -00003ea0: 2062 7974 652d 646f 776e 6361 7365 2031 byte-downcase 1 │ │ │ -00003eb0: 3531 2062 7974 652d 7374 7269 6e67 3d20 51 byte-string= │ │ │ -00003ec0: 3135 3220 6279 7465 2d73 7472 696e 673c 152 byte-string< │ │ │ -00003ed0: 2031 3533 2062 7974 652d 6f6c 642d 6571 153 byte-old-eq │ │ │ -00003ee0: 7561 6c20 3135 3420 6279 7465 2d6e 7468 ual 154 byte-nth │ │ │ -00003ef0: 6364 7220 3135 3520 6279 7465 2d65 6c74 cdr 155 byte-elt │ │ │ -00003f00: 2031 3536 2062 7974 652d 6f6c 642d 6d65 156 byte-old-me │ │ │ -00003f10: 6d62 6572 2031 3537 2062 7974 652d 6f6c mber 157 byte-ol │ │ │ -00003f20: 642d 6173 7371 2031 3538 2062 7974 652d d-assq 158 byte- │ │ │ -00003f30: 6e72 6576 6572 7365 2031 3539 2062 7974 nreverse 159 byt │ │ │ -00003f40: 652d 7365 7463 6172 2031 3630 2062 7974 e-setcar 160 byt │ │ │ -00003f50: 652d 7365 7463 6472 2031 3631 2062 7974 e-setcdr 161 byt │ │ │ -00003f60: 652d 6361 722d 7361 6665 2031 3632 2062 e-car-safe 162 b │ │ │ -00003f70: 7974 652d 6364 722d 7361 6665 2031 3633 yte-cdr-safe 163 │ │ │ -00003f80: 2062 7974 652d 6e63 6f6e 6320 3136 3420 byte-nconc 164 │ │ │ -00003f90: 6279 7465 2d71 756f 2031 3635 2062 7974 byte-quo 165 byt │ │ │ -00003fa0: 652d 7265 6d20 3136 3620 6279 7465 2d6e e-rem 166 byte-n │ │ │ -00003fb0: 756d 6265 7270 2031 3637 2062 7974 652d umberp 167 byte- │ │ │ -00003fc0: 696e 7465 6765 7270 2031 3638 2062 7974 integerp 168 byt │ │ │ -00003fd0: 652d 7265 6c2d 676f 746f 2031 3730 2062 e-rel-goto 170 b │ │ │ -00003fe0: 7974 652d 7265 6c2d 676f 746f 2d69 662d yte-rel-goto-if- │ │ │ -00003ff0: 6e69 6c20 3137 3120 6279 7465 2d72 656c nil 171 byte-rel │ │ │ -00004000: 2d67 6f74 6f2d 6966 2d6e 6f74 2d6e 696c -goto-if-not-nil │ │ │ -00004010: 2031 3732 2062 7974 652d 7265 6c2d 676f 172 byte-rel-go │ │ │ -00004020: 746f 2d69 662d 6e69 6c2d 656c 7365 2d70 to-if-nil-else-p │ │ │ -00004030: 6f70 2031 3733 2062 7974 652d 7265 6c2d op 173 byte-rel- │ │ │ -00004040: 676f 746f 2d69 662d 6e6f 742d 6e69 6c2d goto-if-not-nil- │ │ │ -00004050: 656c 7365 2d70 6f70 2031 3734 2062 7974 else-pop 174 byt │ │ │ -00004060: 652d 6c69 7374 4e20 6279 7465 2d63 6f6e e-listN byte-con │ │ │ -00004070: 6361 744e 2062 7974 652d 696e 7365 7274 catN byte-insert │ │ │ -00004080: 4e20 6279 7465 2d6d 656d 6265 7220 6279 N byte-member by │ │ │ -00004090: 7465 2d61 7373 7120 3137 3520 3137 3620 te-assq 175 176 │ │ │ -000040a0: 3137 3720 3138 3220 3138 335d 2032 290a 177 182 183] 2). │ │ │ -000040b0: 2340 3437 2042 7974 6520 636f 6465 206f #@47 Byte code o │ │ │ -000040c0: 7063 6f64 6520 666f 7220 7265 6665 7265 pcode for refere │ │ │ -000040d0: 6e63 6520 746f 2061 2063 6f6e 7374 616e nce to a constan │ │ │ -000040e0: 742e 1f0a 2864 6566 636f 6e73 7420 6279 t...(defconst by │ │ │ -000040f0: 7465 2d63 6f6e 7374 616e 7420 3139 3220 te-constant 192 │ │ │ -00004100: 2823 2420 2e20 3136 3536 3529 290a 2340 (#$ . 16565)).#@ │ │ │ -00004110: 3633 2045 7863 6c75 7369 7665 206d 6178 63 Exclusive max │ │ │ -00004120: 696d 756d 2069 6e64 6578 2075 7361 626c imum index usabl │ │ │ -00004130: 6520 696e 2074 6865 2060 6279 7465 2d63 e in the `byte-c │ │ │ -00004140: 6f6e 7374 616e 7427 206f 7063 6f64 652e onstant' opcode. │ │ │ -00004150: 1f0a 2864 6566 636f 6e73 7420 6279 7465 ..(defconst byte │ │ │ -00004160: 2d63 6f6e 7374 616e 742d 6c69 6d69 7420 -constant-limit │ │ │ -00004170: 3634 2028 2324 202e 2031 3636 3539 2929 64 (#$ . 16659)) │ │ │ -00004180: 0a23 4034 3220 4c69 7374 206f 6620 6279 .#@42 List of by │ │ │ -00004190: 7465 2d63 6f64 6573 2077 686f 7365 206f te-codes whose o │ │ │ -000041a0: 6666 7365 7420 6973 2061 2070 632e 1f0a ffset is a pc... │ │ │ -000041b0: 2864 6566 636f 6e73 7420 6279 7465 2d67 (defconst byte-g │ │ │ -000041c0: 6f74 6f2d 6f70 7320 2728 6279 7465 2d67 oto-ops '(byte-g │ │ │ -000041d0: 6f74 6f20 6279 7465 2d67 6f74 6f2d 6966 oto byte-goto-if │ │ │ -000041e0: 2d6e 696c 2062 7974 652d 676f 746f 2d69 -nil byte-goto-i │ │ │ -000041f0: 662d 6e6f 742d 6e69 6c20 6279 7465 2d67 f-not-nil byte-g │ │ │ -00004200: 6f74 6f2d 6966 2d6e 696c 2d65 6c73 652d oto-if-nil-else- │ │ │ -00004210: 706f 7020 6279 7465 2d67 6f74 6f2d 6966 pop byte-goto-if │ │ │ -00004220: 2d6e 6f74 2d6e 696c 2d65 6c73 652d 706f -not-nil-else-po │ │ │ -00004230: 7029 2028 2324 202e 2031 3637 3734 2929 p) (#$ . 16774)) │ │ │ -00004240: 0a28 6279 7465 2d63 6f64 6520 22c0 0942 .(byte-code "..B │ │ │ -00004250: 11c2 10c0 8722 205b 6279 7465 2d67 6f74 ....." [byte-got │ │ │ -00004260: 6f2d 616c 7761 7973 2d70 6f70 2d6f 7073 o-always-pop-ops │ │ │ -00004270: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ -00004280: 7374 2028 6279 7465 2d67 6f74 6f2d 6966 st (byte-goto-if │ │ │ -00004290: 2d6e 696c 2062 7974 652d 676f 746f 2d69 -nil byte-goto-i │ │ │ -000042a0: 662d 6e6f 742d 6e69 6c29 5d20 3229 0a23 f-not-nil)] 2).# │ │ │ -000042b0: 4033 3220 6279 7465 2d63 6f64 6573 2066 @32 byte-codes f │ │ │ -000042c0: 6f72 2072 656c 6174 6976 6520 6a75 6d70 or relative jump │ │ │ -000042d0: 732e 1f0a 2864 6566 636f 6e73 7420 6279 s...(defconst by │ │ │ -000042e0: 7465 2d72 656c 2d67 6f74 6f2d 6f70 7320 te-rel-goto-ops │ │ │ -000042f0: 2728 6279 7465 2d72 656c 2d67 6f74 6f20 '(byte-rel-goto │ │ │ -00004300: 6279 7465 2d72 656c 2d67 6f74 6f2d 6966 byte-rel-goto-if │ │ │ -00004310: 2d6e 696c 2062 7974 652d 7265 6c2d 676f -nil byte-rel-go │ │ │ -00004320: 746f 2d69 662d 6e6f 742d 6e69 6c20 6279 to-if-not-nil by │ │ │ -00004330: 7465 2d72 656c 2d67 6f74 6f2d 6966 2d6e te-rel-goto-if-n │ │ │ -00004340: 696c 2d65 6c73 652d 706f 7020 6279 7465 il-else-pop byte │ │ │ -00004350: 2d72 656c 2d67 6f74 6f2d 6966 2d6e 6f74 -rel-goto-if-not │ │ │ -00004360: 2d6e 696c 2d65 6c73 652d 706f 7029 2028 -nil-else-pop) ( │ │ │ -00004370: 2324 202e 2031 3730 3736 2929 0a28 6279 #$ . 17076)).(by │ │ │ -00004380: 7465 2d63 6f64 6520 22c2 11c3 10c4 8722 te-code "......" │ │ │ -00004390: 205b 6279 7465 2d73 7461 636b 2b2d 696e [byte-stack+-in │ │ │ -000043a0: 666f 2062 7974 652d 636f 6465 2d76 6563 fo byte-code-vec │ │ │ -000043b0: 746f 7220 5b6e 696c 206e 696c 206e 696c tor [nil nil nil │ │ │ -000043c0: 206e 696c 206e 696c 206e 696c 206e 696c nil nil nil nil │ │ │ -000043d0: 206e 696c 2062 7974 652d 7661 7272 6566 nil byte-varref │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3430 2032 3032 310a 3b3b 3b20 :08:40 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f62 7974 6563 6f6d 702e 4/lisp/bytecomp. │ │ │ +00000090: 656c 0a3b 3b3b 2065 6d61 6373 2076 6572 el.;;; emacs ver │ │ │ +000000a0: 7369 6f6e 2032 312e 3420 2870 6174 6368 sion 21.4 (patch │ │ │ +000000b0: 2032 3429 2022 5374 616e 6461 7264 2043 24) "Standard C │ │ │ +000000c0: 2220 5845 6d61 6373 204c 7563 6964 2e0a " XEmacs Lucid.. │ │ │ +000000d0: 3b3b 3b20 6279 7465 636f 6d70 2076 6572 ;;; bytecomp ver │ │ │ +000000e0: 7369 6f6e 2032 2e32 3720 5845 6d61 6373 sion 2.27 XEmacs │ │ │ +000000f0: 3b20 3230 3030 2d30 392d 3132 2e0a 3b3b ; 2000-09-12..;; │ │ │ +00000100: 3b20 6f70 7469 6d69 7a61 7469 6f6e 2069 ; optimization i │ │ │ +00000110: 7320 6f6e 2e0a 3b3b 3b20 7468 6973 2066 s on..;;; this f │ │ │ +00000120: 696c 6520 7573 6573 206f 7063 6f64 6573 ile uses opcodes │ │ │ +00000130: 2077 6869 6368 2064 6f20 6e6f 7420 6578 which do not ex │ │ │ +00000140: 6973 7420 696e 2045 6d61 6373 2031 392e ist in Emacs 19. │ │ │ +00000150: 0a0a 2869 6620 2861 6e64 2028 626f 756e ..(if (and (boun │ │ │ +00000160: 6470 2027 656d 6163 732d 7665 7273 696f dp 'emacs-versio │ │ │ +00000170: 6e29 0a09 2028 6f72 2028 616e 6420 2862 n).. (or (and (b │ │ │ +00000180: 6f75 6e64 7020 2765 706f 6368 3a3a 7665 oundp 'epoch::ve │ │ │ +00000190: 7273 696f 6e29 2065 706f 6368 3a3a 7665 rsion) epoch::ve │ │ │ +000001a0: 7273 696f 6e29 0a09 2020 2020 2028 7374 rsion).. (st │ │ │ +000001b0: 7269 6e67 2d6c 6573 7370 2065 6d61 6373 ring-lessp emacs │ │ │ +000001c0: 2d76 6572 7369 6f6e 2022 3230 2229 2929 -version "20"))) │ │ │ +000001d0: 0a20 2020 2028 6572 726f 7220 2260 6279 . (error "`by │ │ │ +000001e0: 7465 636f 6d70 2e65 6c27 2077 6173 2063 tecomp.el' was c │ │ │ +000001f0: 6f6d 7069 6c65 6420 666f 7220 456d 6163 ompiled for Emac │ │ │ +00000200: 7320 3230 2229 290a 0a28 6f72 2028 626f s 20"))..(or (bo │ │ │ +00000210: 756e 6470 2027 6375 7272 656e 742d 6c6f undp 'current-lo │ │ │ +00000220: 6164 2d6c 6973 7429 2028 7365 7471 2063 ad-list) (setq c │ │ │ +00000230: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ +00000240: 206e 696c 2929 0a0a 0a28 6279 7465 2d63 nil))...(byte-c │ │ │ +00000250: 6f64 6520 22c0 0942 11c2 10c3 c421 88c5 ode "..B.....!.. │ │ │ +00000260: c621 ac84 c7c8 2188 c087 2220 5b62 7974 .!....!..." [byt │ │ │ +00000270: 652d 636f 6d70 696c 652d 7665 7273 696f e-compile-versio │ │ │ +00000280: 6e20 6375 7272 656e 742d 6c6f 6164 2d6c n current-load-l │ │ │ +00000290: 6973 7420 2232 2e32 3720 5845 6d61 6373 ist "2.27 XEmacs │ │ │ +000002a0: 3b20 3230 3030 2d30 392d 3132 2e22 2072 ; 2000-09-12." r │ │ │ +000002b0: 6571 7569 7265 2062 6163 6b71 756f 7465 equire backquote │ │ │ +000002c0: 2066 626f 756e 6470 2064 6566 7375 6273 fboundp defsubs │ │ │ +000002d0: 7420 6c6f 6164 2d6c 6962 7261 7279 2022 t load-library " │ │ │ +000002e0: 6279 7465 636f 6d70 2d72 756e 7469 6d65 bytecomp-runtime │ │ │ +000002f0: 225d 2032 290a 2340 3131 3820 2a52 6567 "] 2).#@118 *Reg │ │ │ +00000300: 6578 7020 7768 6963 6820 6d61 7463 6865 exp which matche │ │ │ +00000310: 7320 456d 6163 7320 4c69 7370 2073 6f75 s Emacs Lisp sou │ │ │ +00000320: 7263 6520 6669 6c65 732e 0a59 6f75 206d rce files..You m │ │ │ +00000330: 6179 2077 616e 7420 746f 2072 6564 6566 ay want to redef │ │ │ +00000340: 696e 6520 6062 7974 652d 636f 6d70 696c ine `byte-compil │ │ │ +00000350: 652d 6465 7374 2d66 696c 6527 2069 6620 e-dest-file' if │ │ │ +00000360: 796f 7520 6368 616e 6765 2074 6869 732e you change this. │ │ │ +00000370: 1f0a 2864 6566 7661 7220 656d 6163 732d ..(defvar emacs- │ │ │ +00000380: 6c69 7370 2d66 696c 652d 7265 6765 7870 lisp-file-regexp │ │ │ +00000390: 2022 5c5c 2e65 6c24 2220 2823 2420 2e20 "\\.el$" (#$ . │ │ │ +000003a0: 2d37 3634 2929 0a28 6465 6661 6c69 6173 -764)).(defalias │ │ │ +000003b0: 2027 6279 7465 2d63 6f6d 7069 6c65 722d 'byte-compiler- │ │ │ +000003c0: 6261 7365 2d66 696c 652d 6e61 6d65 2023 base-file-name # │ │ │ +000003d0: 5b28 6669 6c65 6e61 6d65 2920 22c2 09c3 [(filename) "... │ │ │ +000003e0: 5c22 8918 ab86 08c3 095c 22aa 8109 2987 \".......\"...). │ │ │ +000003f0: 2220 5b68 616e 646c 6572 2066 696c 656e " [handler filen │ │ │ +00000400: 616d 6520 6669 6e64 2d66 696c 652d 6e61 ame find-file-na │ │ │ +00000410: 6d65 2d68 616e 646c 6572 2062 7974 652d me-handler byte- │ │ │ +00000420: 636f 6d70 696c 6572 2d62 6173 652d 6669 compiler-base-fi │ │ │ +00000430: 6c65 2d6e 616d 655d 2034 5d29 0a28 6279 le-name] 4]).(by │ │ │ +00000440: 7465 2d63 6f64 6520 22c0 c121 ac84 c1c2 te-code "..!.... │ │ │ +00000450: 4d88 c3c4 c55c 2288 c3c6 c55c 2288 c3c7 M....\"....\"... │ │ │ +00000460: c55c 2288 c3c8 c55c 2288 c3c9 c55c 2287 .\"....\"....\". │ │ │ +00000470: 2220 5b66 626f 756e 6470 2062 7974 652d " [fboundp byte- │ │ │ +00000480: 636f 6d70 696c 652d 6465 7374 2d66 696c compile-dest-fil │ │ │ +00000490: 6520 235b 2866 696c 656e 616d 6529 2022 e #[(filename) " │ │ │ +000004a0: c209 2111 c309 2111 c408 095c 22ab 8809 ..!...!....\"... │ │ │ +000004b0: c589 944f c650 8709 c650 8722 205b 656d ...O.P...P." [em │ │ │ +000004c0: 6163 732d 6c69 7370 2d66 696c 652d 7265 acs-lisp-file-re │ │ │ +000004d0: 6765 7870 2066 696c 656e 616d 6520 6279 gexp filename by │ │ │ +000004e0: 7465 2d63 6f6d 7069 6c65 722d 6261 7365 te-compiler-base │ │ │ +000004f0: 2d66 696c 652d 6e61 6d65 2066 696c 652d -file-name file- │ │ │ +00000500: 6e61 6d65 2d73 616e 732d 7665 7273 696f name-sans-versio │ │ │ +00000510: 6e73 2073 7472 696e 672d 6d61 7463 6820 ns string-match │ │ │ +00000520: 3020 222e 656c 6322 5d20 3320 2243 6f6e 0 ".elc"] 3 "Con │ │ │ +00000530: 7665 7274 2061 6e20 456d 6163 7320 4c69 vert an Emacs Li │ │ │ +00000540: 7370 2073 6f75 7263 6520 6669 6c65 206e sp source file n │ │ │ +00000550: 616d 6520 746f 2061 2063 6f6d 7069 6c65 ame to a compile │ │ │ +00000560: 6420 6669 6c65 206e 616d 652e 225d 2061 d file name."] a │ │ │ +00000570: 7574 6f6c 6f61 6420 6279 7465 2d63 6f6d utoload byte-com │ │ │ +00000580: 7069 6c65 2d69 6e6c 696e 652d 6578 7061 pile-inline-expa │ │ │ +00000590: 6e64 2022 6279 7465 2d6f 7074 696d 697a nd "byte-optimiz │ │ │ +000005a0: 6522 2062 7974 652d 6f70 7469 6d69 7a65 e" byte-optimize │ │ │ +000005b0: 2d66 6f72 6d20 6279 7465 2d6f 7074 696d -form byte-optim │ │ │ +000005c0: 697a 652d 6c61 7063 6f64 6520 6279 7465 ize-lapcode byte │ │ │ +000005d0: 2d63 6f6d 7069 6c65 2d75 6e66 6f6c 642d -compile-unfold- │ │ │ +000005e0: 6c61 6d62 6461 2062 7974 652d 6465 636f lambda byte-deco │ │ │ +000005f0: 6d70 696c 652d 6279 7465 636f 6465 5d20 mpile-bytecode] │ │ │ +00000600: 3329 0a23 4036 3920 2a4e 6f6e 2d6e 696c 3).#@69 *Non-nil │ │ │ +00000610: 206d 6561 6e73 2070 7269 6e74 206d 6573 means print mes │ │ │ +00000620: 7361 6765 7320 6465 7363 7269 6269 6e67 sages describing │ │ │ +00000630: 2070 726f 6772 6573 7320 6f66 2062 7974 progress of byt │ │ │ +00000640: 652d 636f 6d70 696c 6572 2e1f 0a28 6465 e-compiler...(de │ │ │ +00000650: 6676 6172 2062 7974 652d 636f 6d70 696c fvar byte-compil │ │ │ +00000660: 652d 7665 7262 6f73 6520 2862 7974 652d e-verbose (byte- │ │ │ +00000670: 636f 6465 2022 093f ad84 c220 0856 8722 code ".?... .V." │ │ │ +00000680: 205b 7365 6172 6368 2d73 6c6f 772d 7370 [search-slow-sp │ │ │ +00000690: 6565 6420 6e6f 6e69 6e74 6572 6163 7469 eed noninteracti │ │ │ +000006a0: 7665 2064 6576 6963 652d 6261 7564 2d72 ve device-baud-r │ │ │ +000006b0: 6174 655d 2032 2920 2823 2420 2e20 2d31 ate] 2) (#$ . -1 │ │ │ +000006c0: 3534 3429 290a 2340 3538 202a 4e6f 6e2d 544)).#@58 *Non- │ │ │ +000006d0: 6e69 6c20 6d65 616e 7320 6765 6e65 7261 nil means genera │ │ │ +000006e0: 7465 206f 7574 7075 7420 7468 6174 2063 te output that c │ │ │ +000006f0: 616e 2072 756e 2069 6e20 456d 6163 7320 an run in Emacs │ │ │ +00000700: 3139 2e1f 0a28 6465 6676 6172 2062 7974 19...(defvar byt │ │ │ +00000710: 652d 636f 6d70 696c 652d 656d 6163 7331 e-compile-emacs1 │ │ │ +00000720: 392d 636f 6d70 6174 6962 696c 6974 7920 9-compatibility │ │ │ +00000730: 2862 7974 652d 636f 6465 2022 c0c1 213f (byte-code "..!? │ │ │ +00000740: 8722 205b 656d 6163 732d 7665 7273 696f ." [emacs-versio │ │ │ +00000750: 6e3e 3d20 3230 5d20 3229 2028 2324 202e n>= 20] 2) (#$ . │ │ │ +00000760: 202d 3137 3339 2929 0a23 4034 3133 202a -1739)).#@413 * │ │ │ +00000770: 4e6f 6e2d 6e69 6c20 6d65 616e 7320 6765 Non-nil means ge │ │ │ +00000780: 6e65 7261 7465 2063 6f64 6520 7468 6174 nerate code that │ │ │ +00000790: 2063 7265 6174 6573 2075 6e69 7175 6520 creates unique │ │ │ +000007a0: 7379 6d62 6f6c 7320 6174 2072 756e 2d74 symbols at run-t │ │ │ +000007b0: 696d 652e 0a54 6869 7320 6973 2061 6368 ime..This is ach │ │ │ +000007c0: 6965 7665 6420 6279 2070 7269 6e74 696e ieved by printin │ │ │ +000007d0: 6720 756e 696e 7465 726e 6564 2073 796d g uninterned sym │ │ │ +000007e0: 626f 6c73 2075 7369 6e67 2074 6865 2060 bols using the ` │ │ │ +000007f0: 233a 5359 4d42 4f4c 270a 6e6f 7461 7469 #:SYMBOL'.notati │ │ │ +00000800: 6f6e 2c20 736f 2074 6861 7420 7468 6579 on, so that they │ │ │ +00000810: 2077 696c 6c20 6265 2072 6561 6420 756e will be read un │ │ │ +00000820: 696e 7465 726e 6564 2077 6865 6e20 7275 interned when ru │ │ │ +00000830: 6e2e 0a0a 5769 7468 2074 6869 7320 6665 n...With this fe │ │ │ +00000840: 6174 7572 652c 2063 6f64 6520 7468 6174 ature, code that │ │ │ +00000850: 2075 7365 7320 756e 696e 7465 726e 6564 uses uninterned │ │ │ +00000860: 2073 796d 626f 6c73 2069 6e20 6d61 6372 symbols in macr │ │ │ +00000870: 6f73 2077 696c 6c0a 6e6f 7420 6265 2072 os will.not be r │ │ │ +00000880: 756e 6e61 626c 6520 756e 6465 7220 7072 unnable under pr │ │ │ +00000890: 652d 3231 2e30 2058 456d 6163 7365 6e2e e-21.0 XEmacsen. │ │ │ +000008a0: 0a0a 5768 656e 2060 6279 7465 2d63 6f6d ..When `byte-com │ │ │ +000008b0: 7069 6c65 2d65 6d61 6373 3139 2d63 6f6d pile-emacs19-com │ │ │ +000008c0: 7061 7469 6269 6c69 7479 2720 6973 206e patibility' is n │ │ │ +000008d0: 6f6e 2d6e 696c 2c20 7468 6973 2076 6172 on-nil, this var │ │ │ +000008e0: 6961 626c 6520 6973 0a69 676e 6f72 6564 iable is.ignored │ │ │ +000008f0: 2061 6e64 2063 6f6e 7369 6465 7265 6420 and considered │ │ │ +00000900: 746f 2062 6520 6e69 6c2e 1f0a 2864 6566 to be nil...(def │ │ │ +00000910: 7661 7220 6279 7465 2d63 6f6d 7069 6c65 var byte-compile │ │ │ +00000920: 2d70 7269 6e74 2d67 656e 7379 6d20 7420 -print-gensym t │ │ │ +00000930: 2823 2420 2e20 2d31 3930 3329 290a 2340 (#$ . -1903)).#@ │ │ │ +00000940: 3231 3020 2a45 6e61 626c 6573 206f 7074 210 *Enables opt │ │ │ +00000950: 696d 697a 6174 696f 6e20 696e 2074 6865 imization in the │ │ │ +00000960: 2062 7974 6520 636f 6d70 696c 6572 2e0a byte compiler.. │ │ │ +00000970: 6e69 6c20 6d65 616e 7320 646f 6e27 7420 nil means don't │ │ │ +00000980: 646f 2061 6e79 206f 7074 696d 697a 6174 do any optimizat │ │ │ +00000990: 696f 6e2e 0a74 206d 6561 6e73 2064 6f20 ion..t means do │ │ │ +000009a0: 616c 6c20 6f70 7469 6d69 7a61 7469 6f6e all optimization │ │ │ +000009b0: 732e 0a60 736f 7572 6365 2720 6d65 616e s..`source' mean │ │ │ +000009c0: 7320 646f 2073 6f75 7263 652d 6c65 7665 s do source-leve │ │ │ +000009d0: 6c20 6f70 7469 6d69 7a61 7469 6f6e 7320 l optimizations │ │ │ +000009e0: 6f6e 6c79 2e0a 6062 7974 6527 206d 6561 only..`byte' mea │ │ │ +000009f0: 6e73 2064 6f20 636f 6465 2d6c 6576 656c ns do code-level │ │ │ +00000a00: 206f 7074 696d 697a 6174 696f 6e73 206f optimizations o │ │ │ +00000a10: 6e6c 792e 1f0a 2864 6566 7661 7220 6279 nly...(defvar by │ │ │ +00000a20: 7465 2d6f 7074 696d 697a 6520 7420 2823 te-optimize t (# │ │ │ +00000a30: 2420 2e20 2d32 3337 3229 290a 2340 3134 $ . -2372)).#@14 │ │ │ +00000a40: 3320 2a49 6620 6e6f 6e2d 6e69 6c2c 2074 3 *If non-nil, t │ │ │ +00000a50: 6865 206f 7074 696d 697a 6572 206d 6179 he optimizer may │ │ │ +00000a60: 2064 656c 6574 6520 666f 726d 7320 7468 delete forms th │ │ │ +00000a70: 6174 206d 6179 2073 6967 6e61 6c20 616e at may signal an │ │ │ +00000a80: 2065 7272 6f72 2e0a 5468 6973 2069 6e63 error..This inc │ │ │ +00000a90: 6c75 6465 7320 7661 7269 6162 6c65 2072 ludes variable r │ │ │ +00000aa0: 6566 6572 656e 6365 7320 616e 6420 6361 eferences and ca │ │ │ +00000ab0: 6c6c 7320 746f 2066 756e 6374 696f 6e73 lls to functions │ │ │ +00000ac0: 2073 7563 6820 6173 2060 6361 7227 2e1f such as `car'.. │ │ │ +00000ad0: 0a28 6465 6676 6172 2062 7974 652d 636f .(defvar byte-co │ │ │ +00000ae0: 6d70 696c 652d 6465 6c65 7465 2d65 7272 mpile-delete-err │ │ │ +00000af0: 6f72 7320 7420 2823 2420 2e20 2d32 3632 ors t (#$ . -262 │ │ │ +00000b00: 3629 290a 2340 3737 2054 6869 7320 6973 6)).#@77 This is │ │ │ +00000b10: 2063 6f6d 706c 6574 656c 7920 6967 6e6f completely igno │ │ │ +00000b20: 7265 642e 2020 4974 2069 7320 6f6e 6c79 red. It is only │ │ │ +00000b30: 2061 726f 756e 6420 666f 7220 6261 636b around for back │ │ │ +00000b40: 7761 7264 730a 636f 6d70 6174 6962 696c wards.compatibil │ │ │ +00000b50: 6974 792e 1f0a 2864 6566 7661 7220 6279 ity...(defvar by │ │ │ +00000b60: 7465 2d63 6f6d 7069 6c65 2d6e 6577 2d62 te-compile-new-b │ │ │ +00000b70: 7974 6563 6f64 6573 206e 696c 2028 2324 ytecodes nil (#$ │ │ │ +00000b80: 202e 2032 3832 3529 290a 2340 3434 3820 . 2825)).#@448 │ │ │ +00000b90: 2a49 6620 6e6f 6e2d 6e69 6c2c 2063 6f6d *If non-nil, com │ │ │ +00000ba0: 7069 6c65 2066 756e 6374 696f 6e20 626f pile function bo │ │ │ +00000bb0: 6469 6573 2073 6f20 7468 6579 206c 6f61 dies so they loa │ │ │ +00000bc0: 6420 6c61 7a69 6c79 2e0a 5468 6579 2061 d lazily..They a │ │ │ +00000bd0: 7265 2068 6964 6465 6e20 636f 6d6d 656e re hidden commen │ │ │ +00000be0: 7473 2069 6e20 7468 6520 636f 6d70 696c ts in the compil │ │ │ +00000bf0: 6564 2066 696c 652c 2061 6e64 2062 726f ed file, and bro │ │ │ +00000c00: 7567 6874 2069 6e74 6f20 636f 7265 2077 ught into core w │ │ │ +00000c10: 6865 6e20 7468 650a 6675 6e63 7469 6f6e hen the.function │ │ │ +00000c20: 2069 7320 6361 6c6c 6564 2e0a 0a54 6f20 is called...To │ │ │ +00000c30: 656e 6162 6c65 2074 6869 7320 6f70 7469 enable this opti │ │ │ +00000c40: 6f6e 2c20 6d61 6b65 2069 7420 6120 6669 on, make it a fi │ │ │ +00000c50: 6c65 2d6c 6f63 616c 2076 6172 6961 626c le-local variabl │ │ │ +00000c60: 650a 696e 2074 6865 2073 6f75 7263 6520 e.in the source │ │ │ +00000c70: 6669 6c65 2079 6f75 2077 616e 7420 6974 file you want it │ │ │ +00000c80: 2074 6f20 6170 706c 7920 746f 2e0a 466f to apply to..Fo │ │ │ +00000c90: 7220 6578 616d 706c 652c 2061 6464 2020 r example, add │ │ │ +00000ca0: 2d2a 2d62 7974 652d 636f 6d70 696c 652d -*-byte-compile- │ │ │ +00000cb0: 6479 6e61 6d69 633a 2074 3b2d 2a2d 206f dynamic: t;-*- o │ │ │ +00000cc0: 6e20 7468 6520 6669 7273 7420 6c69 6e65 n the first line │ │ │ +00000cd0: 2e0a 0a57 6865 6e20 7468 6973 206f 7074 ...When this opt │ │ │ +00000ce0: 696f 6e20 6973 2074 7275 652c 2069 6620 ion is true, if │ │ │ +00000cf0: 796f 7520 6c6f 6164 2074 6865 2063 6f6d you load the com │ │ │ +00000d00: 7069 6c65 6420 6669 6c65 2061 6e64 2074 piled file and t │ │ │ +00000d10: 6865 6e20 6d6f 7665 2069 742c 0a74 6865 hen move it,.the │ │ │ +00000d20: 2066 756e 6374 696f 6e73 2079 6f75 206c functions you l │ │ │ +00000d30: 6f61 6465 6420 7769 6c6c 206e 6f74 2062 oaded will not b │ │ │ +00000d40: 6520 6162 6c65 2074 6f20 7275 6e2e 1f0a e able to run... │ │ │ +00000d50: 2864 6566 7661 7220 6279 7465 2d63 6f6d (defvar byte-com │ │ │ +00000d60: 7069 6c65 2d64 796e 616d 6963 206e 696c pile-dynamic nil │ │ │ +00000d70: 2028 2324 202e 202d 3239 3630 2929 0a23 (#$ . -2960)).# │ │ │ +00000d80: 4036 3332 202a 4966 206e 6f6e 2d6e 696c @632 *If non-nil │ │ │ +00000d90: 2c20 636f 6d70 696c 6520 646f 6320 7374 , compile doc st │ │ │ +00000da0: 7269 6e67 7320 666f 7220 6c61 7a79 2061 rings for lazy a │ │ │ +00000db0: 6363 6573 732e 0a57 6520 6275 7279 2074 ccess..We bury t │ │ │ +00000dc0: 6865 2064 6f63 2073 7472 696e 6773 206f he doc strings o │ │ │ +00000dd0: 6620 6675 6e63 7469 6f6e 7320 616e 6420 f functions and │ │ │ +00000de0: 7661 7269 6162 6c65 730a 696e 7369 6465 variables.inside │ │ │ +00000df0: 2063 6f6d 6d65 6e74 7320 696e 2074 6865 comments in the │ │ │ +00000e00: 2066 696c 652c 2061 6e64 2062 7269 6e67 file, and bring │ │ │ +00000e10: 2074 6865 6d20 696e 746f 2063 6f72 6520 them into core │ │ │ +00000e20: 6f6e 6c79 2077 6865 6e20 7468 6579 0a61 only when they.a │ │ │ +00000e30: 7265 2061 6374 7561 6c6c 7920 6e65 6564 re actually need │ │ │ +00000e40: 6564 2e0a 0a57 6865 6e20 7468 6973 206f ed...When this o │ │ │ +00000e50: 7074 696f 6e20 6973 2074 7275 652c 2069 ption is true, i │ │ │ +00000e60: 6620 796f 7520 6c6f 6164 2074 6865 2063 f you load the c │ │ │ +00000e70: 6f6d 7069 6c65 6420 6669 6c65 2061 6e64 ompiled file and │ │ │ +00000e80: 2074 6865 6e20 6d6f 7665 2069 742c 0a79 then move it,.y │ │ │ +00000e90: 6f75 2077 6f6e 2774 2062 6520 6162 6c65 ou won't be able │ │ │ +00000ea0: 2074 6f20 6669 6e64 2074 6865 2064 6f63 to find the doc │ │ │ +00000eb0: 756d 656e 7461 7469 6f6e 206f 6620 616e umentation of an │ │ │ +00000ec0: 7974 6869 6e67 2069 6e20 7468 6174 2066 ything in that f │ │ │ +00000ed0: 696c 652e 0a0a 546f 2064 6973 6162 6c65 ile...To disable │ │ │ +00000ee0: 2074 6869 7320 6f70 7469 6f6e 2066 6f72 this option for │ │ │ +00000ef0: 2061 2063 6572 7461 696e 2066 696c 652c a certain file, │ │ │ +00000f00: 206d 616b 6520 6974 2061 2066 696c 652d make it a file- │ │ │ +00000f10: 6c6f 6361 6c20 7661 7269 6162 6c65 0a69 local variable.i │ │ │ +00000f20: 6e20 7468 6520 736f 7572 6365 2066 696c n the source fil │ │ │ +00000f30: 652e 2020 466f 7220 6578 616d 706c 652c e. For example, │ │ │ +00000f40: 2061 6464 2074 6869 7320 746f 2074 6865 add this to the │ │ │ +00000f50: 2066 6972 7374 206c 696e 653a 0a20 202d first line:. - │ │ │ +00000f60: 2a2d 6279 7465 2d63 6f6d 7069 6c65 2d64 *-byte-compile-d │ │ │ +00000f70: 796e 616d 6963 2d64 6f63 7374 7269 6e67 ynamic-docstring │ │ │ +00000f80: 733a 6e69 6c3b 2d2a 2d0a 596f 7520 6361 s:nil;-*-.You ca │ │ │ +00000f90: 6e20 616c 736f 2073 6574 2074 6865 2076 n also set the v │ │ │ +00000fa0: 6172 6961 626c 6520 676c 6f62 616c 6c79 ariable globally │ │ │ +00000fb0: 2e0a 0a54 6869 7320 6f70 7469 6f6e 2069 ...This option i │ │ │ +00000fc0: 7320 656e 6162 6c65 6420 6279 2064 6566 s enabled by def │ │ │ +00000fd0: 6175 6c74 2062 6563 6175 7365 2069 7420 ault because it │ │ │ +00000fe0: 7265 6475 6365 7320 456d 6163 7320 6d65 reduces Emacs me │ │ │ +00000ff0: 6d6f 7279 2075 7361 6765 2e1f 0a28 6465 mory usage...(de │ │ │ +00001000: 6676 6172 2062 7974 652d 636f 6d70 696c fvar byte-compil │ │ │ +00001010: 652d 6479 6e61 6d69 632d 646f 6373 7472 e-dynamic-docstr │ │ │ +00001020: 696e 6773 2028 656d 6163 732d 7665 7273 ings (emacs-vers │ │ │ +00001030: 696f 6e3e 3d20 3230 2920 2823 2420 2e20 ion>= 20) (#$ . │ │ │ +00001040: 2d33 3436 3129 290a 2340 3231 3620 2a49 -3461)).#@216 *I │ │ │ +00001050: 6620 7472 7565 2c20 7468 6520 6279 7465 f true, the byte │ │ │ +00001060: 2d63 6f6d 7069 6c65 7220 7769 6c6c 206c -compiler will l │ │ │ +00001070: 6f67 2069 7473 206f 7074 696d 697a 6174 og its optimizat │ │ │ +00001080: 696f 6e73 2069 6e74 6f20 2a43 6f6d 7069 ions into *Compi │ │ │ +00001090: 6c65 2d4c 6f67 2a2e 0a49 6620 7468 6973 le-Log*..If this │ │ │ +000010a0: 2069 7320 2773 6f75 7263 652c 2074 6865 is 'source, the │ │ │ +000010b0: 6e20 6f6e 6c79 2073 6f75 7263 652d 6c65 n only source-le │ │ │ +000010c0: 7665 6c20 6f70 7469 6d69 7a61 7469 6f6e vel optimization │ │ │ +000010d0: 7320 7769 6c6c 2062 6520 6c6f 6767 6564 s will be logged │ │ │ +000010e0: 2e0a 4966 2069 7420 6973 2027 6279 7465 ..If it is 'byte │ │ │ +000010f0: 2c20 7468 656e 206f 6e6c 7920 6279 7465 , then only byte │ │ │ +00001100: 2d6c 6576 656c 206f 7074 696d 697a 6174 -level optimizat │ │ │ +00001110: 696f 6e73 2077 696c 6c20 6265 206c 6f67 ions will be log │ │ │ +00001120: 6765 642e 1f0a 2864 6566 7661 7220 6279 ged...(defvar by │ │ │ +00001130: 7465 2d6f 7074 696d 697a 652d 6c6f 6720 te-optimize-log │ │ │ +00001140: 6e69 6c20 2823 2420 2e20 2d34 3137 3429 nil (#$ . -4174) │ │ │ +00001150: 290a 2340 3630 202a 4966 2074 7275 652c ).#@60 *If true, │ │ │ +00001160: 2074 6865 2062 7974 652d 636f 6d70 696c the byte-compil │ │ │ +00001170: 6572 2072 6570 6f72 7473 2077 6172 6e69 er reports warni │ │ │ +00001180: 6e67 7320 7769 7468 2060 6572 726f 7227 ngs with `error' │ │ │ +00001190: 2e1f 0a28 6465 6676 6172 2062 7974 652d ...(defvar byte- │ │ │ +000011a0: 636f 6d70 696c 652d 6572 726f 722d 6f6e compile-error-on │ │ │ +000011b0: 2d77 6172 6e20 6e69 6c20 2823 2420 2e20 -warn nil (#$ . │ │ │ +000011c0: 2d34 3433 3929 290a 2340 3533 202a 5468 -4439)).#@53 *Th │ │ │ +000011d0: 6520 7761 726e 696e 6773 2075 7365 6420 e warnings used │ │ │ +000011e0: 7768 656e 2062 7974 652d 636f 6d70 696c when byte-compil │ │ │ +000011f0: 652d 7761 726e 696e 6773 2069 7320 742e e-warnings is t. │ │ │ +00001200: 1f0a 2864 6566 7661 7220 6279 7465 2d63 ..(defvar byte-c │ │ │ +00001210: 6f6d 7069 6c65 2d64 6566 6175 6c74 2d77 ompile-default-w │ │ │ +00001220: 6172 6e69 6e67 7320 2728 7265 6465 6669 arnings '(redefi │ │ │ +00001230: 6e65 2063 616c 6c61 7267 7320 7375 6272 ne callargs subr │ │ │ +00001240: 2d63 616c 6c61 7267 7320 6672 6565 2d76 -callargs free-v │ │ │ +00001250: 6172 7320 756e 7265 736f 6c76 6564 2075 ars unresolved u │ │ │ +00001260: 6e75 7365 642d 7661 7273 206f 6273 6f6c nused-vars obsol │ │ │ +00001270: 6574 6529 2028 2324 202e 202d 3435 3537 ete) (#$ . -4557 │ │ │ +00001280: 2929 0a23 4038 3139 202a 4c69 7374 206f )).#@819 *List o │ │ │ +00001290: 6620 7761 726e 696e 6773 2074 6861 7420 f warnings that │ │ │ +000012a0: 7468 6520 636f 6d70 696c 6572 2073 686f the compiler sho │ │ │ +000012b0: 756c 6420 6973 7375 6520 2874 2066 6f72 uld issue (t for │ │ │ +000012c0: 2074 6865 2064 6566 6175 6c74 2073 6574 the default set │ │ │ +000012d0: 292e 0a45 6c65 6d65 6e74 7320 6f66 2074 )..Elements of t │ │ │ +000012e0: 6865 206c 6973 7420 6d61 7920 6265 3a0a he list may be:. │ │ │ +000012f0: 0a20 2066 7265 652d 7661 7273 0972 6566 . free-vars.ref │ │ │ +00001300: 6572 656e 6365 7320 746f 2076 6172 6961 erences to varia │ │ │ +00001310: 626c 6573 206e 6f74 2069 6e20 7468 6520 bles not in the │ │ │ +00001320: 6375 7272 656e 7420 6c65 7869 6361 6c20 current lexical │ │ │ +00001330: 7363 6f70 652e 0a20 2075 6e75 7365 642d scope.. unused- │ │ │ +00001340: 7661 7273 0972 6566 6572 656e 6365 7320 vars.references │ │ │ +00001350: 746f 206e 6f6e 2d67 6c6f 6261 6c20 7661 to non-global va │ │ │ +00001360: 7269 6162 6c65 7320 626f 756e 6420 6275 riables bound bu │ │ │ +00001370: 7420 6e6f 7420 7265 6665 7265 6e63 6564 t not referenced │ │ │ +00001380: 2e0a 2020 756e 7265 736f 6c76 6564 0963 .. unresolved.c │ │ │ +00001390: 616c 6c73 2074 6f20 756e 6b6e 6f77 6e20 alls to unknown │ │ │ +000013a0: 6675 6e63 7469 6f6e 732e 0a20 2063 616c functions.. cal │ │ │ +000013b0: 6c61 7267 7309 6c61 6d62 6461 2063 616c largs.lambda cal │ │ │ +000013c0: 6c73 2077 6974 6820 6172 6773 2074 6861 ls with args tha │ │ │ +000013d0: 7420 646f 6e27 7420 6d61 7463 6820 7468 t don't match th │ │ │ +000013e0: 6520 6465 6669 6e69 7469 6f6e 2e0a 2020 e definition.. │ │ │ +000013f0: 7375 6272 2d63 616c 6c61 7267 7309 6361 subr-callargs.ca │ │ │ +00001400: 6c6c 7320 746f 2073 7562 7273 2077 6974 lls to subrs wit │ │ │ +00001410: 6820 6172 6773 2074 6861 7420 646f 6e27 h args that don' │ │ │ +00001420: 7420 6d61 7463 6820 7468 6520 6465 6669 t match the defi │ │ │ +00001430: 6e69 7469 6f6e 2e0a 2020 7265 6465 6669 nition.. redefi │ │ │ +00001440: 6e65 0966 756e 6374 696f 6e20 6365 6c6c ne.function cell │ │ │ +00001450: 2072 6564 6566 696e 6564 2066 726f 6d20 redefined from │ │ │ +00001460: 6120 6d61 6372 6f20 746f 2061 206c 616d a macro to a lam │ │ │ +00001470: 6264 6120 6f72 2076 6963 650a 0909 7665 bda or vice...ve │ │ │ +00001480: 7273 612c 206f 7220 7265 6465 6669 6e65 rsa, or redefine │ │ │ +00001490: 6420 746f 2074 616b 6520 6120 6469 6666 d to take a diff │ │ │ +000014a0: 6572 656e 7420 6e75 6d62 6572 206f 6620 erent number of │ │ │ +000014b0: 6172 6775 6d65 6e74 732e 0a20 206f 6273 arguments.. obs │ │ │ +000014c0: 6f6c 6574 6509 7573 6520 6f66 2061 6e20 olete.use of an │ │ │ +000014d0: 6f62 736f 6c65 7465 2066 756e 6374 696f obsolete functio │ │ │ +000014e0: 6e20 6f72 2076 6172 6961 626c 652e 0a20 n or variable.. │ │ │ +000014f0: 2070 6564 616e 7469 6309 7761 726e 206f pedantic.warn o │ │ │ +00001500: 6620 7573 6520 6f66 2063 6f6d 7061 7469 f use of compati │ │ │ +00001510: 626c 6520 7379 6d62 6f6c 732e 0a0a 5468 ble symbols...Th │ │ │ +00001520: 6520 6465 6661 756c 7420 7365 7420 6973 e default set is │ │ │ +00001530: 2073 7065 6369 6669 6564 2062 7920 6062 specified by `b │ │ │ +00001540: 7974 652d 636f 6d70 696c 652d 6465 6661 yte-compile-defa │ │ │ +00001550: 756c 742d 7761 726e 696e 6773 2720 616e ult-warnings' an │ │ │ +00001560: 640a 6e6f 726d 616c 6c79 2065 6e63 6f6d d.normally encom │ │ │ +00001570: 7061 7373 6573 2061 6c6c 2070 6f73 7369 passes all possi │ │ │ +00001580: 626c 6520 7761 726e 696e 6773 2e0a 0a53 ble warnings...S │ │ │ +00001590: 6565 2061 6c73 6f20 7468 6520 6d61 6372 ee also the macr │ │ │ +000015a0: 6f20 6062 7974 652d 636f 6d70 696c 6572 o `byte-compiler │ │ │ +000015b0: 2d6f 7074 696f 6e73 272e 1f0a 2864 6566 -options'...(def │ │ │ +000015c0: 7661 7220 6279 7465 2d63 6f6d 7069 6c65 var byte-compile │ │ │ +000015d0: 2d77 6172 6e69 6e67 7320 7420 2823 2420 -warnings t (#$ │ │ │ +000015e0: 2e20 2d34 3734 3529 290a 2340 3634 3220 . -4745)).#@642 │ │ │ +000015f0: 2a4e 6f6e 2d6e 696c 206d 6561 6e73 2063 *Non-nil means c │ │ │ +00001600: 6f6c 6c65 6374 2063 616c 6c2d 6772 6170 ollect call-grap │ │ │ +00001610: 6820 696e 666f 726d 6174 696f 6e20 7768 h information wh │ │ │ +00001620: 656e 2063 6f6d 7069 6c69 6e67 2e0a 5468 en compiling..Th │ │ │ +00001630: 6973 2072 6563 6f72 6473 2066 756e 6374 is records funct │ │ │ +00001640: 696f 6e73 2074 6861 7420 7765 7265 2063 ions that were c │ │ │ +00001650: 616c 6c65 6420 616e 6420 6672 6f6d 2077 alled and from w │ │ │ +00001660: 6865 7265 2e0a 4966 2074 6865 2076 616c here..If the val │ │ │ +00001670: 7565 2069 7320 742c 2063 6f6d 7069 6c61 ue is t, compila │ │ │ +00001680: 7469 6f6e 2064 6973 706c 6179 7320 7468 tion displays th │ │ │ +00001690: 6520 6361 6c6c 2067 7261 7068 2077 6865 e call graph whe │ │ │ +000016a0: 6e20 6974 2066 696e 6973 6865 732e 0a49 n it finishes..I │ │ │ +000016b0: 6620 7468 6520 7661 6c75 6520 6973 206e f the value is n │ │ │ +000016c0: 6569 7468 6572 2074 206e 6f72 206e 696c either t nor nil │ │ │ +000016d0: 2c20 636f 6d70 696c 6174 696f 6e20 6173 , compilation as │ │ │ +000016e0: 6b73 2079 6f75 2077 6865 7468 6572 2074 ks you whether t │ │ │ +000016f0: 6f20 6469 7370 6c61 790a 7468 6520 6772 o display.the gr │ │ │ +00001700: 6170 682e 0a0a 5468 6520 6361 6c6c 2074 aph...The call t │ │ │ +00001710: 7265 6520 6f6e 6c79 206c 6973 7473 2066 ree only lists f │ │ │ +00001720: 756e 6374 696f 6e73 2063 616c 6c65 642c unctions called, │ │ │ +00001730: 206e 6f74 206d 6163 726f 7320 7573 6564 not macros used │ │ │ +00001740: 2e20 5468 6f73 6520 6675 6e63 7469 6f6e . Those function │ │ │ +00001750: 730a 7768 6963 6820 7468 6520 6279 7465 s.which the byte │ │ │ +00001760: 2d63 6f64 6520 696e 7465 7270 7265 7465 -code interprete │ │ │ +00001770: 7220 6b6e 6f77 7320 6162 6f75 7420 6469 r knows about di │ │ │ +00001780: 7265 6374 6c79 2028 6571 2c20 636f 6e73 rectly (eq, cons │ │ │ +00001790: 2c20 6574 632e 2920 6172 650a 6e6f 7420 , etc.) are.not │ │ │ +000017a0: 7265 706f 7274 6564 2e0a 0a54 6865 2063 reported...The c │ │ │ +000017b0: 616c 6c20 7472 6565 2061 6c73 6f20 6c69 all tree also li │ │ │ +000017c0: 7374 7320 7468 6f73 6520 6675 6e63 7469 sts those functi │ │ │ +000017d0: 6f6e 7320 7768 6963 6820 6172 6520 6e6f ons which are no │ │ │ +000017e0: 7420 6b6e 6f77 6e20 746f 2062 6520 6361 t known to be ca │ │ │ +000017f0: 6c6c 6564 0a28 7468 6174 2069 732c 2074 lled.(that is, t │ │ │ +00001800: 6f20 7768 6963 6820 6e6f 2063 616c 6c73 o which no calls │ │ │ +00001810: 2068 6176 6520 6265 656e 2063 6f6d 7069 have been compi │ │ │ +00001820: 6c65 6429 2e20 2046 756e 6374 696f 6e73 led). Functions │ │ │ +00001830: 2077 6869 6368 2063 616e 2062 650a 696e which can be.in │ │ │ +00001840: 766f 6b65 6420 696e 7465 7261 6374 6976 voked interactiv │ │ │ +00001850: 656c 7920 6172 6520 6578 636c 7564 6564 ely are excluded │ │ │ +00001860: 2066 726f 6d20 7468 6973 206c 6973 742e from this list. │ │ │ +00001870: 1f0a 2864 6566 7661 7220 6279 7465 2d63 ..(defvar byte-c │ │ │ +00001880: 6f6d 7069 6c65 2d67 656e 6572 6174 652d ompile-generate- │ │ │ +00001890: 6361 6c6c 2d74 7265 6520 6e69 6c20 2823 call-tree nil (# │ │ │ +000018a0: 2420 2e20 2d35 3631 3629 290a 2340 3234 $ . -5616)).#@24 │ │ │ +000018b0: 3120 416c 6973 7420 6f66 2066 756e 6374 1 Alist of funct │ │ │ +000018c0: 696f 6e73 2061 6e64 2074 6865 6972 2063 ions and their c │ │ │ +000018d0: 616c 6c20 7472 6565 2e0a 4561 6368 2065 all tree..Each e │ │ │ +000018e0: 6c65 6d65 6e74 206c 6f6f 6b73 206c 696b lement looks lik │ │ │ +000018f0: 650a 0a20 2028 4655 4e43 5449 4f4e 2043 e.. (FUNCTION C │ │ │ +00001900: 414c 4c45 5253 2043 414c 4c53 290a 0a77 ALLERS CALLS)..w │ │ │ +00001910: 6865 7265 2043 414c 4c45 5253 2069 7320 here CALLERS is │ │ │ +00001920: 6120 6c69 7374 206f 6620 6675 6e63 7469 a list of functi │ │ │ +00001930: 6f6e 7320 7468 6174 2063 616c 6c20 4655 ons that call FU │ │ │ +00001940: 4e43 5449 4f4e 2c20 616e 6420 4341 4c4c NCTION, and CALL │ │ │ +00001950: 530a 6973 2061 206c 6973 7420 6f66 2066 S.is a list of f │ │ │ +00001960: 756e 6374 696f 6e73 2066 6f72 2077 6869 unctions for whi │ │ │ +00001970: 6368 2063 616c 6c73 2077 6572 6520 6765 ch calls were ge │ │ │ +00001980: 6e65 7261 7465 6420 7768 696c 6520 636f nerated while co │ │ │ +00001990: 6d70 696c 696e 670a 4655 4e43 5449 4f4e mpiling.FUNCTION │ │ │ +000019a0: 2e1f 0a28 6465 6663 6f6e 7374 2062 7974 ...(defconst byt │ │ │ +000019b0: 652d 636f 6d70 696c 652d 6361 6c6c 2d74 e-compile-call-t │ │ │ +000019c0: 7265 6520 6e69 6c20 2823 2420 2e20 3633 ree nil (#$ . 63 │ │ │ +000019d0: 3232 2929 0a23 4031 3236 202a 4966 206e 22)).#@126 *If n │ │ │ +000019e0: 6f6e 2d6e 696c 2c20 736f 7274 2074 6865 on-nil, sort the │ │ │ +000019f0: 2063 616c 6c20 7472 6565 2e0a 5468 6520 call tree..The │ │ │ +00001a00: 7661 6c75 6573 2060 6e61 6d65 272c 2060 values `name', ` │ │ │ +00001a10: 6361 6c6c 6572 7327 2c20 6063 616c 6c73 callers', `calls │ │ │ +00001a20: 272c 2060 6361 6c6c 732b 6361 6c6c 6572 ', `calls+caller │ │ │ +00001a30: 7327 0a73 7065 6369 6679 2064 6966 6665 s'.specify diffe │ │ │ +00001a40: 7265 6e74 2066 6965 6c64 7320 746f 2073 rent fields to s │ │ │ +00001a50: 6f72 7420 6f6e 2e1f 0a28 6465 6676 6172 ort on...(defvar │ │ │ +00001a60: 2062 7974 652d 636f 6d70 696c 652d 6361 byte-compile-ca │ │ │ +00001a70: 6c6c 2d74 7265 652d 736f 7274 2027 6e61 ll-tree-sort 'na │ │ │ +00001a80: 6d65 2028 2324 202e 202d 3636 3139 2929 me (#$ . -6619)) │ │ │ +00001a90: 0a23 4034 3034 2049 6620 6e69 6c2c 206f .#@404 If nil, o │ │ │ +00001aa0: 6c64 202e 656c 6320 6669 6c65 7320 6172 ld .elc files ar │ │ │ +00001ab0: 6520 6465 6c65 7465 6420 6265 666f 7265 e deleted before │ │ │ +00001ac0: 2074 6865 206e 6577 2069 7320 7361 7665 the new is save │ │ │ +00001ad0: 642c 2061 6e64 202e 656c 630a 6669 6c65 d, and .elc.file │ │ │ +00001ae0: 7320 7769 6c6c 2068 6176 6520 7468 6520 s will have the │ │ │ +00001af0: 7361 6d65 206d 6f64 6573 2061 7320 7468 same modes as th │ │ │ +00001b00: 6520 636f 7272 6573 706f 6e64 696e 6720 e corresponding │ │ │ +00001b10: 2e65 6c20 6669 6c65 2e20 204f 7468 6572 .el file. Other │ │ │ +00001b20: 7769 7365 2c0a 6578 6973 7469 6e67 202e wise,.existing . │ │ │ +00001b30: 656c 6320 6669 6c65 7320 7769 6c6c 2073 elc files will s │ │ │ +00001b40: 696d 706c 7920 6265 206f 7665 7277 7269 imply be overwri │ │ │ +00001b50: 7474 656e 2c20 616e 6420 7468 6520 6578 tten, and the ex │ │ │ +00001b60: 6973 7469 6e67 206d 6f64 6573 0a77 696c isting modes.wil │ │ │ +00001b70: 6c20 6e6f 7420 6265 2063 6861 6e67 6564 l not be changed │ │ │ +00001b80: 2e20 2049 6620 7468 6973 2076 6172 6961 . If this varia │ │ │ +00001b90: 626c 6520 6973 206e 696c 2c20 7468 656e ble is nil, then │ │ │ +00001ba0: 2061 6e20 2e65 6c63 2066 696c 6520 7768 an .elc file wh │ │ │ +00001bb0: 6963 680a 6973 2061 2073 796d 626f 6c69 ich.is a symboli │ │ │ +00001bc0: 6320 6c69 6e6b 2077 696c 6c20 6265 2074 c link will be t │ │ │ +00001bd0: 7572 6e65 6420 696e 746f 2061 206e 6f72 urned into a nor │ │ │ +00001be0: 6d61 6c20 6669 6c65 2c20 696e 7374 6561 mal file, instea │ │ │ +00001bf0: 6420 6f66 2074 6865 2066 696c 650a 7768 d of the file.wh │ │ │ +00001c00: 6963 6820 7468 6520 6c69 6e6b 2070 6f69 ich the link poi │ │ │ +00001c10: 6e74 7320 746f 2062 6569 6e67 206f 7665 nts to being ove │ │ │ +00001c20: 7277 7269 7474 656e 2e1f 0a28 6465 6676 rwritten...(defv │ │ │ +00001c30: 6172 2062 7974 652d 636f 6d70 696c 652d ar byte-compile- │ │ │ +00001c40: 6f76 6572 7772 6974 652d 6669 6c65 2074 overwrite-file t │ │ │ +00001c50: 2028 2324 202e 2036 3830 3729 290a 2340 (#$ . 6807)).#@ │ │ │ +00001c60: 3136 3020 4966 2074 7275 652c 2074 6865 160 If true, the │ │ │ +00001c70: 6e20 6062 7974 652d 7265 636f 6d70 696c n `byte-recompil │ │ │ +00001c80: 652d 6469 7265 6374 6f72 7927 2077 696c e-directory' wil │ │ │ +00001c90: 6c20 636f 6e74 696e 7565 2063 6f6d 7069 l continue compi │ │ │ +00001ca0: 6c69 6e67 2065 7665 6e0a 7768 656e 2061 ling even.when a │ │ │ +00001cb0: 6e20 6572 726f 7220 6f63 6375 7273 2069 n error occurs i │ │ │ +00001cc0: 6e20 6120 6669 6c65 2e20 2054 6869 7320 n a file. This │ │ │ +00001cd0: 6973 2062 6f75 6e64 2074 6f20 7420 6279 is bound to t by │ │ │ +00001ce0: 0a60 6261 7463 682d 6279 7465 2d72 6563 .`batch-byte-rec │ │ │ +00001cf0: 6f6d 7069 6c65 2d64 6972 6563 746f 7279 ompile-directory │ │ │ +00001d00: 272e 1f0a 2864 6566 7661 7220 6279 7465 '...(defvar byte │ │ │ +00001d10: 2d72 6563 6f6d 7069 6c65 2d64 6972 6563 -recompile-direc │ │ │ +00001d20: 746f 7279 2d69 676e 6f72 652d 6572 726f tory-ignore-erro │ │ │ +00001d30: 7273 2d70 206e 696c 2028 2324 202e 2037 rs-p nil (#$ . 7 │ │ │ +00001d40: 3236 3829 290a 2340 3735 202a 4966 2074 268)).#@75 *If t │ │ │ +00001d50: 7275 652c 2074 6865 6e20 6062 7974 652d rue, then `byte- │ │ │ +00001d60: 7265 636f 6d70 696c 652d 6469 7265 6374 recompile-direct │ │ │ +00001d70: 6f72 7927 2077 696c 6c20 7265 6375 7273 ory' will recurs │ │ │ +00001d80: 6520 6f6e 2073 7562 6469 7265 6374 6f72 e on subdirector │ │ │ +00001d90: 6965 732e 1f0a 2864 6566 7661 7220 6279 ies...(defvar by │ │ │ +00001da0: 7465 2d72 6563 6f6d 7069 6c65 2d64 6972 te-recompile-dir │ │ │ +00001db0: 6563 746f 7279 2d72 6563 7572 7369 7665 ectory-recursive │ │ │ +00001dc0: 6c79 2074 2028 2324 202e 202d 3734 3939 ly t (#$ . -7499 │ │ │ +00001dd0: 2929 0a23 4036 3720 6c69 7374 206f 6620 )).#@67 list of │ │ │ +00001de0: 616c 6c20 636f 6e73 7461 6e74 7320 656e all constants en │ │ │ +00001df0: 636f 756e 7465 7265 6420 6475 7269 6e67 countered during │ │ │ +00001e00: 2063 6f6d 7069 6c61 7469 6f6e 206f 6620 compilation of │ │ │ +00001e10: 7468 6973 2066 6f72 6d1f 0a28 6465 6676 this form..(defv │ │ │ +00001e20: 6172 2062 7974 652d 636f 6d70 696c 652d ar byte-compile- │ │ │ +00001e30: 636f 6e73 7461 6e74 7320 6e69 6c20 2823 constants nil (# │ │ │ +00001e40: 2420 2e20 3736 3430 2929 0a23 4036 3720 $ . 7640)).#@67 │ │ │ +00001e50: 6c69 7374 206f 6620 616c 6c20 7661 7269 list of all vari │ │ │ +00001e60: 6162 6c65 7320 656e 636f 756e 7465 7265 ables encountere │ │ │ +00001e70: 6420 6475 7269 6e67 2063 6f6d 7069 6c61 d during compila │ │ │ +00001e80: 7469 6f6e 206f 6620 7468 6973 2066 6f72 tion of this for │ │ │ +00001e90: 6d1f 0a28 6465 6676 6172 2062 7974 652d m..(defvar byte- │ │ │ +00001ea0: 636f 6d70 696c 652d 7661 7269 6162 6c65 compile-variable │ │ │ +00001eb0: 7320 6e69 6c20 2823 2420 2e20 3737 3630 s nil (#$ . 7760 │ │ │ +00001ec0: 2929 0a23 4031 3936 2041 6c69 7374 206f )).#@196 Alist o │ │ │ +00001ed0: 6620 7661 7269 6162 6c65 7320 626f 756e f variables boun │ │ │ +00001ee0: 6420 696e 2074 6865 2063 6f6e 7465 7874 d in the context │ │ │ +00001ef0: 206f 6620 7468 6520 6375 7272 656e 7420 of the current │ │ │ +00001f00: 666f 726d 2c0a 7468 6174 2069 732c 2074 form,.that is, t │ │ │ +00001f10: 6865 2063 7572 7265 6e74 206c 6578 6963 he current lexic │ │ │ +00001f20: 616c 2065 6e76 6972 6f6e 6d65 6e74 2e20 al environment. │ │ │ +00001f30: 2054 6869 7320 6c69 7374 206c 6976 6573 This list lives │ │ │ +00001f40: 2070 6172 746c 790a 6f6e 2074 6865 2073 partly.on the s │ │ │ +00001f50: 7065 6362 696e 6420 7374 6163 6b2e 2020 pecbind stack. │ │ │ +00001f60: 5468 6520 6364 7220 6f66 2065 6163 6820 The cdr of each │ │ │ +00001f70: 6365 6c6c 2069 7320 616e 2069 6e74 6567 cell is an integ │ │ │ +00001f80: 6572 2062 6974 6d61 736b 2e1f 0a28 6465 er bitmask...(de │ │ │ +00001f90: 6676 6172 2062 7974 652d 636f 6d70 696c fvar byte-compil │ │ │ +00001fa0: 652d 626f 756e 642d 7661 7269 6162 6c65 e-bound-variable │ │ │ +00001fb0: 7320 6e69 6c20 2823 2420 2e20 3738 3831 s nil (#$ . 7881 │ │ │ +00001fc0: 2929 0a28 6279 7465 2d63 6f64 6520 22c3 )).(byte-code ". │ │ │ +00001fd0: 0c42 14c5 13c2 0c42 14c6 12c1 0c42 14c7 .B.....B.....B.. │ │ │ +00001fe0: 11c0 0c42 14c8 10c3 8722 205b 6279 7465 ...B....." [byte │ │ │ +00001ff0: 2d63 6f6d 7069 6c65 2d67 6c6f 6261 6c2d -compile-global- │ │ │ +00002000: 6269 7420 6279 7465 2d63 6f6d 7069 6c65 bit byte-compile │ │ │ +00002010: 2d61 7267 6c69 7374 2d62 6974 2062 7974 -arglist-bit byt │ │ │ +00002020: 652d 636f 6d70 696c 652d 6173 7369 676e e-compile-assign │ │ │ +00002030: 6564 2d62 6974 2062 7974 652d 636f 6d70 ed-bit byte-comp │ │ │ +00002040: 696c 652d 7265 6665 7265 6e63 6564 2d62 ile-referenced-b │ │ │ +00002050: 6974 2063 7572 7265 6e74 2d6c 6f61 642d it current-load- │ │ │ +00002060: 6c69 7374 2031 2032 2034 2038 5d20 3229 list 1 2 4 8] 2) │ │ │ +00002070: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +00002080: 2d63 6f6d 7069 6c65 2d65 7661 6c20 235b -compile-eval #[ │ │ │ +00002090: 2866 6f72 6d29 2022 c61a c78e 091c c689 (form) "........ │ │ │ +000020a0: 1b1d 0c3a aba4 0c40 8913 8941 1340 15c8 ...:...@...A.@.. │ │ │ +000020b0: 0d21 ab86 0d89 4b42 aa81 0d5c 6e42 120d .!....KB...\nB.. │ │ │ +000020c0: c90b 424d 880c 4189 14aa 59ca 0821 2d87 ..BM..A...Y..!-. │ │ │ +000020d0: 2220 5b66 6f72 6d20 6279 7465 2d63 6f6d " [form byte-com │ │ │ +000020e0: 7069 6c65 2d6d 6163 726f 2d65 6e76 6972 pile-macro-envir │ │ │ +000020f0: 6f6e 6d65 6e74 2073 6176 652d 6d61 6372 onment save-macr │ │ │ +00002100: 6f2d 656e 7669 726f 6e6d 656e 7420 6465 o-environment de │ │ │ +00002110: 6620 2331 3d23 3a47 3331 3039 3620 7379 f #1=#:G31096 sy │ │ │ +00002120: 6d20 6e69 6c20 2828 6279 7465 2d63 6f64 m nil ((byte-cod │ │ │ +00002130: 6520 2208 c31a 8919 ab99 0940 8912 39ab e "........@..9. │ │ │ +00002140: 86c4 5c6e 2188 aa86 5c6e 405c 6e41 4d88 ..\n!...\n@\nAM. │ │ │ +00002150: 0941 8911 ac67 2ac3 8722 205b 7361 7665 .A...g*.." [save │ │ │ +00002160: 2d6d 6163 726f 2d65 6e76 6972 6f6e 6d65 -macro-environme │ │ │ +00002170: 6e74 2023 323d 233a 2d2d 646f 6c69 7374 nt #2=#:--dolist │ │ │ +00002180: 2d74 656d 702d 2d33 3130 3937 2065 6c74 -temp--31097 elt │ │ │ +00002190: 206e 696c 2066 6d61 6b75 6e62 6f75 6e64 nil fmakunbound │ │ │ +000021a0: 5d20 3329 2920 6662 6f75 6e64 7020 6d61 ] 3)) fboundp ma │ │ │ +000021b0: 6372 6f20 6576 616c 5d20 345d 290a 2340 cro eval] 4]).#@ │ │ │ +000021c0: 3230 3520 5468 6520 6465 6661 756c 7420 205 The default │ │ │ +000021d0: 6d61 6372 6f2d 656e 7669 726f 6e6d 656e macro-environmen │ │ │ +000021e0: 7420 7061 7373 6564 2074 6f20 6d61 6372 t passed to macr │ │ │ +000021f0: 6f65 7870 616e 6420 6279 2074 6865 2063 oexpand by the c │ │ │ +00002200: 6f6d 7069 6c65 722e 0a50 6c61 6369 6e67 ompiler..Placing │ │ │ +00002210: 2061 206d 6163 726f 2068 6572 6520 7769 a macro here wi │ │ │ +00002220: 6c6c 2063 6175 7365 2061 206d 6163 726f ll cause a macro │ │ │ +00002230: 2074 6f20 6861 7665 2064 6966 6665 7265 to have differe │ │ │ +00002240: 6e74 2073 656d 616e 7469 6373 2077 6865 nt semantics whe │ │ │ +00002250: 6e0a 6578 7061 6e64 6564 2062 7920 7468 n.expanded by th │ │ │ +00002260: 6520 636f 6d70 696c 6572 2061 7320 7768 e compiler as wh │ │ │ +00002270: 656e 2065 7870 616e 6465 6420 6279 2074 en expanded by t │ │ │ +00002280: 6865 2069 6e74 6572 7072 6574 6572 2e1f he interpreter.. │ │ │ +00002290: 0a28 6465 6663 6f6e 7374 2062 7974 652d .(defconst byte- │ │ │ +000022a0: 636f 6d70 696c 652d 696e 6974 6961 6c2d compile-initial- │ │ │ +000022b0: 6d61 6372 6f2d 656e 7669 726f 6e6d 656e macro-environmen │ │ │ +000022c0: 7420 2728 2862 7974 652d 636f 6d70 696c t '((byte-compil │ │ │ +000022d0: 6572 2d6f 7074 696f 6e73 206c 616d 6264 er-options lambd │ │ │ +000022e0: 6120 2826 7265 7374 2066 6f72 6d73 2920 a (&rest forms) │ │ │ +000022f0: 2861 7070 6c79 2027 6279 7465 2d63 6f6d (apply 'byte-com │ │ │ +00002300: 7069 6c65 722d 6f70 7469 6f6e 732d 6861 piler-options-ha │ │ │ +00002310: 6e64 6c65 7220 666f 726d 7329 2920 2865 ndler forms)) (e │ │ │ +00002320: 7661 6c2d 7768 656e 2d63 6f6d 7069 6c65 val-when-compile │ │ │ +00002330: 206c 616d 6264 6120 2826 7265 7374 2062 lambda (&rest b │ │ │ +00002340: 6f64 7929 2028 6c69 7374 2027 7175 6f74 ody) (list 'quot │ │ │ +00002350: 6520 2862 7974 652d 636f 6d70 696c 652d e (byte-compile- │ │ │ +00002360: 6576 616c 2028 636f 6e73 2027 7072 6f67 eval (cons 'prog │ │ │ +00002370: 6e20 626f 6479 2929 2929 2028 6576 616c n body)))) (eval │ │ │ +00002380: 2d61 6e64 2d63 6f6d 7069 6c65 206c 616d -and-compile lam │ │ │ +00002390: 6264 6120 2826 7265 7374 2062 6f64 7929 bda (&rest body) │ │ │ +000023a0: 2028 6279 7465 2d63 6f6d 7069 6c65 2d65 (byte-compile-e │ │ │ +000023b0: 7661 6c20 2863 6f6e 7320 2770 726f 676e val (cons 'progn │ │ │ +000023c0: 2062 6f64 7929 2920 2863 6f6e 7320 2770 body)) (cons 'p │ │ │ +000023d0: 726f 676e 2062 6f64 7929 2929 2028 2324 rogn body))) (#$ │ │ │ +000023e0: 202e 2038 3634 3429 290a 2340 3136 3920 . 8644)).#@169 │ │ │ +000023f0: 416c 6973 7420 6f66 206d 6163 726f 7320 Alist of macros │ │ │ +00002400: 6465 6669 6e65 6420 696e 2074 6865 2066 defined in the f │ │ │ +00002410: 696c 6520 6265 696e 6720 636f 6d70 696c ile being compil │ │ │ +00002420: 6564 2e0a 4561 6368 2065 6c65 6d65 6e74 ed..Each element │ │ │ +00002430: 206c 6f6f 6b73 206c 696b 6520 284d 4143 looks like (MAC │ │ │ +00002440: 524f 4e41 4d45 202e 2044 4546 494e 4954 RONAME . DEFINIT │ │ │ +00002450: 494f 4e29 2e20 2049 7420 6973 0a28 4d41 ION). It is.(MA │ │ │ +00002460: 4352 4f4e 414d 4520 2e20 6e69 6c29 2077 CRONAME . nil) w │ │ │ +00002470: 6865 6e20 6120 6d61 6372 6f20 6973 2072 hen a macro is r │ │ │ +00002480: 6564 6566 696e 6564 2061 7320 6120 6675 edefined as a fu │ │ │ +00002490: 6e63 7469 6f6e 2e1f 0a28 6465 6676 6172 nction...(defvar │ │ │ +000024a0: 2062 7974 652d 636f 6d70 696c 652d 6d61 byte-compile-ma │ │ │ +000024b0: 6372 6f2d 656e 7669 726f 6e6d 656e 7420 cro-environment │ │ │ +000024c0: 6279 7465 2d63 6f6d 7069 6c65 2d69 6e69 byte-compile-ini │ │ │ +000024d0: 7469 616c 2d6d 6163 726f 2d65 6e76 6972 tial-macro-envir │ │ │ +000024e0: 6f6e 6d65 6e74 2028 2324 202e 2039 3230 onment (#$ . 920 │ │ │ +000024f0: 3029 290a 2340 3232 3420 416c 6973 7420 0)).#@224 Alist │ │ │ +00002500: 6f66 2066 756e 6374 696f 6e73 2064 6566 of functions def │ │ │ +00002510: 696e 6564 2069 6e20 7468 6520 6669 6c65 ined in the file │ │ │ +00002520: 2062 6569 6e67 2063 6f6d 7069 6c65 642e being compiled. │ │ │ +00002530: 0a54 6869 7320 6973 2073 6f20 7765 2063 .This is so we c │ │ │ +00002540: 616e 2069 6e6c 696e 6520 7468 656d 2077 an inline them w │ │ │ +00002550: 6865 6e20 6e65 6365 7373 6172 792e 0a45 hen necessary..E │ │ │ +00002560: 6163 6820 656c 656d 656e 7420 6c6f 6f6b ach element look │ │ │ +00002570: 7320 6c69 6b65 2028 4655 4e43 5449 4f4e s like (FUNCTION │ │ │ +00002580: 4e41 4d45 202e 2044 4546 494e 4954 494f NAME . DEFINITIO │ │ │ +00002590: 4e29 2e20 2049 7420 6973 0a28 4655 4e43 N). It is.(FUNC │ │ │ +000025a0: 5449 4f4e 4e41 4d45 202e 206e 696c 2920 TIONNAME . nil) │ │ │ +000025b0: 7768 656e 2061 2066 756e 6374 696f 6e20 when a function │ │ │ +000025c0: 6973 2072 6564 6566 696e 6564 2061 7320 is redefined as │ │ │ +000025d0: 6120 6d61 6372 6f2e 1f0a 2864 6566 7661 a macro...(defva │ │ │ +000025e0: 7220 6279 7465 2d63 6f6d 7069 6c65 2d66 r byte-compile-f │ │ │ +000025f0: 756e 6374 696f 6e2d 656e 7669 726f 6e6d unction-environm │ │ │ +00002600: 656e 7420 6e69 6c20 2823 2420 2e20 3934 ent nil (#$ . 94 │ │ │ +00002610: 3636 2929 0a23 4032 3535 2041 6c69 7374 66)).#@255 Alist │ │ │ +00002620: 206f 6620 6675 6e63 7469 6f6e 7320 616e of functions an │ │ │ +00002630: 6420 6d61 6372 6f73 2064 6566 696e 6564 d macros defined │ │ │ +00002640: 2062 7920 6175 746f 6c6f 6164 2069 6e20 by autoload in │ │ │ +00002650: 7468 6520 6669 6c65 2062 6569 6e67 2063 the file being c │ │ │ +00002660: 6f6d 7069 6c65 642e 0a54 6869 7320 6973 ompiled..This is │ │ │ +00002670: 2073 6f20 7765 2063 616e 2073 7570 7072 so we can suppr │ │ │ +00002680: 6573 7320 7761 726e 696e 6773 2061 626f ess warnings abo │ │ │ +00002690: 7574 2063 616c 6c73 2074 6f20 7468 6573 ut calls to thes │ │ │ +000026a0: 6520 6675 6e63 7469 6f6e 732c 2065 7665 e functions, eve │ │ │ +000026b0: 6e20 7468 6f75 6768 0a74 6865 7920 646f n though.they do │ │ │ +000026c0: 206e 6f74 2068 6176 6520 6072 6561 6c27 not have `real' │ │ │ +000026d0: 2064 6566 696e 6974 696f 6e73 2e0a 4561 definitions..Ea │ │ │ +000026e0: 6368 2065 6c65 6d65 6e74 206c 6f6f 6b73 ch element looks │ │ │ +000026f0: 206c 696b 6520 2846 554e 4354 494f 4e4e like (FUNCTIONN │ │ │ +00002700: 414d 4520 2e20 4341 4c4c 2d54 4f2d 4155 AME . CALL-TO-AU │ │ │ +00002710: 544f 4c4f 4144 292e 1f0a 2864 6566 7661 TOLOAD)...(defva │ │ │ +00002720: 7220 6279 7465 2d63 6f6d 7069 6c65 2d61 r byte-compile-a │ │ │ +00002730: 7574 6f6c 6f61 642d 656e 7669 726f 6e6d utoload-environm │ │ │ +00002740: 656e 7420 6e69 6c20 2823 2420 2e20 3937 ent nil (#$ . 97 │ │ │ +00002750: 3535 2929 0a23 4031 3430 2041 6c69 7374 55)).#@140 Alist │ │ │ +00002760: 206f 6620 756e 6465 6669 6e65 6420 6675 of undefined fu │ │ │ +00002770: 6e63 7469 6f6e 7320 746f 2077 6869 6368 nctions to which │ │ │ +00002780: 2063 616c 6c73 2068 6176 6520 6265 656e calls have been │ │ │ +00002790: 2063 6f6d 7069 6c65 6420 2875 7365 6420 compiled (used │ │ │ +000027a0: 666f 720a 7761 726e 696e 6773 2077 6865 for.warnings whe │ │ │ +000027b0: 6e20 7468 6520 6675 6e63 7469 6f6e 2069 n the function i │ │ │ +000027c0: 7320 6c61 7465 7220 6465 6669 6e65 6420 s later defined │ │ │ +000027d0: 7769 7468 2069 6e63 6f72 7265 6374 2061 with incorrect a │ │ │ +000027e0: 7267 7329 2e1f 0a28 6465 6676 6172 2062 rgs)...(defvar b │ │ │ +000027f0: 7974 652d 636f 6d70 696c 652d 756e 7265 yte-compile-unre │ │ │ +00002800: 736f 6c76 6564 2d66 756e 6374 696f 6e73 solved-functions │ │ │ +00002810: 206e 696c 2028 2324 202e 2031 3030 3735 nil (#$ . 10075 │ │ │ +00002820: 2929 0a28 6279 7465 2d63 6f64 6520 22c1 )).(byte-code ". │ │ │ +00002830: 0842 10c2 c121 ac85 c3c1 c45c 2288 c187 .B...!.....\"... │ │ │ +00002840: 2220 5b63 7572 7265 6e74 2d6c 6f61 642d " [current-load- │ │ │ +00002850: 6c69 7374 2062 7974 652d 636f 6d70 696c list byte-compil │ │ │ +00002860: 652d 7461 672d 6e75 6d62 6572 2064 6566 e-tag-number def │ │ │ +00002870: 6175 6c74 2d62 6f75 6e64 7020 7365 742d ault-boundp set- │ │ │ +00002880: 6465 6661 756c 7420 305d 2033 290a 2340 default 0] 3).#@ │ │ │ +00002890: 3837 2041 6c69 7374 2064 6573 6372 6962 87 Alist describ │ │ │ +000028a0: 696e 6720 636f 6e74 656e 7473 2074 6f20 ing contents to │ │ │ +000028b0: 7075 7420 696e 2062 7974 6520 636f 6465 put in byte code │ │ │ +000028c0: 2073 7472 696e 672e 0a45 6163 6820 656c string..Each el │ │ │ +000028d0: 656d 656e 7420 6973 2028 494e 4445 5820 ement is (INDEX │ │ │ +000028e0: 2e20 5641 4c55 4529 1f0a 2864 6566 7661 . VALUE)..(defva │ │ │ +000028f0: 7220 6279 7465 2d63 6f6d 7069 6c65 2d6f r byte-compile-o │ │ │ +00002900: 7574 7075 7420 6e69 6c20 2823 2420 2e20 utput nil (#$ . │ │ │ +00002910: 3130 3338 3729 290a 2340 3335 2043 7572 10387)).#@35 Cur │ │ │ +00002920: 7265 6e74 2064 6570 7468 206f 6620 6578 rent depth of ex │ │ │ +00002930: 6563 7574 696f 6e20 7374 6163 6b2e 1f0a ecution stack... │ │ │ +00002940: 2864 6566 7661 7220 6279 7465 2d63 6f6d (defvar byte-com │ │ │ +00002950: 7069 6c65 2d64 6570 7468 2030 2028 2324 pile-depth 0 (#$ │ │ │ +00002960: 202e 2031 3035 3235 2929 0a23 4033 3520 . 10525)).#@35 │ │ │ +00002970: 4d61 7869 6d75 6d20 6465 7074 6820 6f66 Maximum depth of │ │ │ +00002980: 2065 7865 6375 7469 6f6e 2073 7461 636b execution stack │ │ │ +00002990: 2e1f 0a28 6465 6676 6172 2062 7974 652d ...(defvar byte- │ │ │ +000029a0: 636f 6d70 696c 652d 6d61 7864 6570 7468 compile-maxdepth │ │ │ +000029b0: 2030 2028 2324 202e 2031 3036 3038 2929 0 (#$ . 10608)) │ │ │ +000029c0: 0a23 4036 3620 416e 2061 7272 6179 2063 .#@66 An array c │ │ │ +000029d0: 6f6e 7461 696e 696e 6720 6279 7465 2d63 ontaining byte-c │ │ │ +000029e0: 6f64 6520 6e61 6d65 7320 696e 6465 7865 ode names indexe │ │ │ +000029f0: 6420 6279 2062 7974 652d 636f 6465 2076 d by byte-code v │ │ │ +00002a00: 616c 7565 732e 1f0a 2864 6566 636f 6e73 alues...(defcons │ │ │ +00002a10: 7420 6279 7465 2d63 6f64 652d 7665 6374 t byte-code-vect │ │ │ +00002a20: 6f72 206e 696c 2028 2324 202e 2031 3036 or nil (#$ . 106 │ │ │ +00002a30: 3934 2929 0a23 4035 3620 416e 2061 7272 94)).#@56 An arr │ │ │ +00002a40: 6179 2077 6974 6820 7468 6520 7374 6163 ay with the stac │ │ │ +00002a50: 6b20 6164 6a75 7374 6d65 6e74 2066 6f72 k adjustment for │ │ │ +00002a60: 2065 6163 6820 6279 7465 2d63 6f64 652e each byte-code. │ │ │ +00002a70: 1f0a 2864 6566 636f 6e73 7420 6279 7465 ..(defconst byte │ │ │ +00002a80: 2d73 7461 636b 2b2d 696e 666f 206e 696c -stack+-info nil │ │ │ +00002a90: 2028 2324 202e 2031 3038 3130 2929 0a28 (#$ . 10810)).( │ │ │ +00002aa0: 6465 6661 6c69 6173 2027 6279 7465 2d64 defalias 'byte-d │ │ │ +00002ab0: 6566 6f70 2027 286d 6163 726f 202e 2023 efop '(macro . # │ │ │ +00002ac0: 5b28 6f70 636f 6465 2073 7461 636b 2d61 [(opcode stack-a │ │ │ +00002ad0: 646a 7573 7420 6f70 6e61 6d65 2026 6f70 djust opname &op │ │ │ +00002ae0: 7469 6f6e 616c 2064 6f63 7374 7269 6e67 tional docstring │ │ │ +00002af0: 2920 22c6 c74e ae88 c8c6 c7c9 cacb 5c22 ) "..N........\" │ │ │ +00002b00: 23cc c74e ae88 c8cc c7c9 cacb 5c22 231b #..N........\"#. │ │ │ +00002b10: 8919 0d0c 4988 0b0d 0849 882a 5c6e ab89 ....I....I.*\n.. │ │ │ +00002b20: cd0c 0dce 5c6e cf51 4687 cd0c 0d45 8722 ....\n.QF....E." │ │ │ +00002b30: 205b 7374 6163 6b2d 6164 6a75 7374 2076 [stack-adjust v │ │ │ +00002b40: 3120 646f 6373 7472 696e 6720 7632 206f 1 docstring v2 o │ │ │ +00002b50: 706e 616d 6520 6f70 636f 6465 2062 7974 pname opcode byt │ │ │ +00002b60: 652d 636f 6465 2d76 6563 746f 7220 746d e-code-vector tm │ │ │ +00002b70: 702d 636f 6d70 696c 652d 7469 6d65 2d76 p-compile-time-v │ │ │ +00002b80: 616c 7565 2070 7574 206d 616b 652d 7665 alue put make-ve │ │ │ +00002b90: 6374 6f72 2032 3536 206e 696c 2062 7974 ctor 256 nil byt │ │ │ +00002ba0: 652d 7374 6163 6b2b 2d69 6e66 6f20 6465 e-stack+-info de │ │ │ +00002bb0: 6663 6f6e 7374 2022 4279 7465 2063 6f64 fconst "Byte cod │ │ │ +00002bc0: 6520 6f70 636f 6465 2022 2022 2e22 5d20 e opcode " "."] │ │ │ +00002bd0: 385d 2929 0a28 6465 6661 6c69 6173 2027 8])).(defalias ' │ │ │ +00002be0: 6279 7465 2d65 7874 7275 6465 2d62 7974 byte-extrude-byt │ │ │ +00002bf0: 652d 636f 6465 2d76 6563 746f 7273 2027 e-code-vectors ' │ │ │ +00002c00: 286d 6163 726f 202e 2023 5b6e 696c 2022 (macro . #[nil " │ │ │ +00002c10: c0c1 89c2 4ec3 89c2 4eaf 05c4 c1c2 5c22 ....N...N.....\" │ │ │ +00002c20: 88c4 c3c2 5c22 8887 2220 5b73 6574 7120 ....\".." [setq │ │ │ +00002c30: 6279 7465 2d63 6f64 652d 7665 6374 6f72 byte-code-vector │ │ │ +00002c40: 2074 6d70 2d63 6f6d 7069 6c65 2d74 696d tmp-compile-tim │ │ │ +00002c50: 652d 7661 6c75 6520 6279 7465 2d73 7461 e-value byte-sta │ │ │ +00002c60: 636b 2b2d 696e 666f 2072 656d 7072 6f70 ck+-info remprop │ │ │ +00002c70: 5d20 365d 2929 0a23 4034 3220 4279 7465 ] 6])).#@42 Byte │ │ │ +00002c80: 2063 6f64 6520 6f70 636f 6465 2066 6f72 code opcode for │ │ │ +00002c90: 2076 6172 6961 626c 6520 7265 6665 7265 variable refere │ │ │ +00002ca0: 6e63 652e 1f0a 2864 6566 636f 6e73 7420 nce...(defconst │ │ │ +00002cb0: 6279 7465 2d76 6172 7265 6620 3820 2823 byte-varref 8 (# │ │ │ +00002cc0: 2420 2e20 3131 3338 3829 290a 2340 3432 $ . 11388)).#@42 │ │ │ +00002cd0: 2042 7974 6520 636f 6465 206f 7063 6f64 Byte code opcod │ │ │ +00002ce0: 6520 666f 7220 7365 7474 696e 6720 6120 e for setting a │ │ │ +00002cf0: 7661 7269 6162 6c65 2e1f 0a28 6465 6663 variable...(defc │ │ │ +00002d00: 6f6e 7374 2062 7974 652d 7661 7273 6574 onst byte-varset │ │ │ +00002d10: 2031 3620 2823 2420 2e20 3131 3437 3329 16 (#$ . 11473) │ │ │ +00002d20: 290a 2340 3432 2042 7974 6520 636f 6465 ).#@42 Byte code │ │ │ +00002d30: 206f 7063 6f64 6520 666f 7220 6269 6e64 opcode for bind │ │ │ +00002d40: 696e 6720 6120 7661 7269 6162 6c65 2e1f ing a variable.. │ │ │ +00002d50: 0a28 6465 6663 6f6e 7374 2062 7974 652d .(defconst byte- │ │ │ +00002d60: 7661 7262 696e 6420 3234 2028 2324 202e varbind 24 (#$ . │ │ │ +00002d70: 2031 3135 3539 2929 0a23 4034 3220 4279 11559)).#@42 By │ │ │ +00002d80: 7465 2063 6f64 6520 6f70 636f 6465 2066 te code opcode f │ │ │ +00002d90: 6f72 2063 616c 6c69 6e67 2061 2066 756e or calling a fun │ │ │ +00002da0: 6374 696f 6e2e 1f0a 2864 6566 636f 6e73 ction...(defcons │ │ │ +00002db0: 7420 6279 7465 2d63 616c 6c20 3332 2028 t byte-call 32 ( │ │ │ +00002dc0: 2324 202e 2031 3136 3436 2929 0a23 4035 #$ . 11646)).#@5 │ │ │ +00002dd0: 3020 4279 7465 2063 6f64 6520 6f70 636f 0 Byte code opco │ │ │ +00002de0: 6465 2066 6f72 2075 6e62 696e 6469 6e67 de for unbinding │ │ │ +00002df0: 2073 7065 6369 616c 2062 696e 6469 6e67 special binding │ │ │ +00002e00: 732e 1f0a 2864 6566 636f 6e73 7420 6279 s...(defconst by │ │ │ +00002e10: 7465 2d75 6e62 696e 6420 3430 2028 2324 te-unbind 40 (#$ │ │ │ +00002e20: 202e 2031 3137 3330 2929 0a28 6279 7465 . 11730)).(byte │ │ │ +00002e30: 2d63 6f64 6520 22c4 0d42 15c6 14c3 0d42 -code "..B.....B │ │ │ +00002e40: 15c7 13c2 0d42 15c8 12c1 0d42 15c9 11c0 .....B.....B.... │ │ │ +00002e50: 0d42 15ca 10cb 0d42 15cc 160b cd0d 4215 .B.....B......B. │ │ │ +00002e60: ce16 0dcf 0d42 15d0 160f d10d 4215 d216 .....B......B... │ │ │ +00002e70: 11d3 0d42 15d4 1613 d50d 4215 d616 15d7 ...B......B..... │ │ │ +00002e80: 0d42 15d8 1617 d90d 4215 da16 19db 0d42 .B......B......B │ │ │ +00002e90: 15dc 161b dd0d 4215 de16 1ddf 0d42 15e0 ......B......B.. │ │ │ +00002ea0: 161f e10d 4215 e216 21e3 0d42 15e4 1623 ....B...!..B...# │ │ │ +00002eb0: e50d 4215 e616 25e7 0d42 15e8 1627 e90d ..B...%..B...'.. │ │ │ +00002ec0: 4215 ea16 29eb 0d42 15ec 162b ed0d 4215 B...)..B...+..B. │ │ │ +00002ed0: ee16 2def 0d42 15f0 162f f10d 4215 f216 ..-..B.../..B... │ │ │ +00002ee0: 31f3 0d42 15f4 1633 f50d 4215 f616 35f7 1..B...3..B...5. │ │ │ +00002ef0: 0d42 15f8 1637 f90d 4215 fa16 39fb 0d42 .B...7..B...9..B │ │ │ +00002f00: 15fc 163b fd0d 4215 fe16 3dff 0d42 1581 ...;..B...=..B.. │ │ │ +00002f10: 5a00 163f 8140 000d 4215 815b 0016 4081 Z..?.@..B..[..@. │ │ │ +00002f20: 4100 0d42 1581 5c5c 0016 4181 4200 0d42 A..B..\\..A.B..B │ │ │ +00002f30: 1581 5d00 1642 8143 000d 4215 815e 0016 ..]..B.C..B..^.. │ │ │ +00002f40: 4381 4400 0d42 1581 5f00 1644 8145 000d C.D..B.._..D.E.. │ │ │ +00002f50: 4215 8160 0016 4581 4600 0d42 1581 6100 B..`..E.F..B..a. │ │ │ +00002f60: 1646 8147 000d 4215 8162 0016 4781 4800 .F.G..B..b..G.H. │ │ │ +00002f70: 0d42 1581 6300 1648 8149 000d 4215 8164 .B..c..H.I..B..d │ │ │ +00002f80: 0016 4981 4a00 0d42 1581 6500 164a 814b ..I.J..B..e..J.K │ │ │ +00002f90: 000d 4215 8166 0016 4b81 4c00 0d42 1581 ..B..f..K.L..B.. │ │ │ +00002fa0: 6700 164c 814d 000d 4215 8168 0016 4d81 g..L.M..B..h..M. │ │ │ +00002fb0: 4e00 0d42 1581 6900 164e 814f 000d 4215 N..B..i..N.O..B. │ │ │ +00002fc0: 816a 0016 4f81 5000 0d42 1581 6b00 1650 .j..O.P..B..k..P │ │ │ +00002fd0: 8151 000d 4215 816c 0016 5181 5200 0d42 .Q..B..l..Q.R..B │ │ │ +00002fe0: 1581 6d00 1652 8153 000d 4215 816e 0016 ..m..R.S..B..n.. │ │ │ +00002ff0: 5381 5400 0d42 1581 6f00 1654 8155 000d S.T..B..o..T.U.. │ │ │ +00003000: 4215 8170 0016 5581 5600 0d42 1581 7100 B..p..U.V..B..q. │ │ │ +00003010: 1656 8157 000d 4215 8172 0016 5781 5800 .V.W..B..r..W.X. │ │ │ +00003020: 0d42 1581 7300 1658 8159 000d 4215 8174 .B..s..X.Y..B..t │ │ │ +00003030: 0016 59c4 8722 205b 6279 7465 2d6c 6973 ..Y.." [byte-lis │ │ │ +00003040: 7470 2062 7974 652d 7374 7269 6e67 7020 tp byte-stringp │ │ │ +00003050: 6279 7465 2d63 6f6e 7370 2062 7974 652d byte-consp byte- │ │ │ +00003060: 7379 6d62 6f6c 7020 6279 7465 2d6e 7468 symbolp byte-nth │ │ │ +00003070: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ +00003080: 7374 2035 3620 3537 2035 3820 3539 2036 st 56 57 58 59 6 │ │ │ +00003090: 3020 6279 7465 2d6f 6c64 2d65 7120 3631 0 byte-old-eq 61 │ │ │ +000030a0: 2062 7974 652d 6f6c 642d 6d65 6d71 2036 byte-old-memq 6 │ │ │ +000030b0: 3220 6279 7465 2d6e 6f74 2036 3320 6279 2 byte-not 63 by │ │ │ +000030c0: 7465 2d63 6172 2036 3420 6279 7465 2d63 te-car 64 byte-c │ │ │ +000030d0: 6472 2036 3520 6279 7465 2d63 6f6e 7320 dr 65 byte-cons │ │ │ +000030e0: 3636 2062 7974 652d 6c69 7374 3120 3637 66 byte-list1 67 │ │ │ +000030f0: 2062 7974 652d 6c69 7374 3220 3638 2062 byte-list2 68 b │ │ │ +00003100: 7974 652d 6c69 7374 3320 3639 2062 7974 yte-list3 69 byt │ │ │ +00003110: 652d 6c69 7374 3420 3730 2062 7974 652d e-list4 70 byte- │ │ │ +00003120: 6c65 6e67 7468 2037 3120 6279 7465 2d61 length 71 byte-a │ │ │ +00003130: 7265 6620 3732 2062 7974 652d 6173 6574 ref 72 byte-aset │ │ │ +00003140: 2037 3320 6279 7465 2d73 796d 626f 6c2d 73 byte-symbol- │ │ │ +00003150: 7661 6c75 6520 3734 2062 7974 652d 7379 value 74 byte-sy │ │ │ +00003160: 6d62 6f6c 2d66 756e 6374 696f 6e20 3735 mbol-function 75 │ │ │ +00003170: 2062 7974 652d 7365 7420 3736 2062 7974 byte-set 76 byt │ │ │ +00003180: 652d 6673 6574 2037 3720 6279 7465 2d67 e-fset 77 byte-g │ │ │ +00003190: 6574 2037 3820 6279 7465 2d73 7562 7374 et 78 byte-subst │ │ │ +000031a0: 7269 6e67 2037 3920 6279 7465 2d63 6f6e ring 79 byte-con │ │ │ +000031b0: 6361 7432 2038 3020 6279 7465 2d63 6f6e cat2 80 byte-con │ │ │ +000031c0: 6361 7433 2038 3120 6279 7465 2d63 6f6e cat3 81 byte-con │ │ │ +000031d0: 6361 7434 2038 3220 6279 7465 2d73 7562 cat4 82 byte-sub │ │ │ +000031e0: 3120 3833 2062 7974 652d 6164 6431 2038 1 83 byte-add1 8 │ │ │ +000031f0: 3420 6279 7465 2d65 716c 7369 676e 2038 4 byte-eqlsign 8 │ │ │ +00003200: 3520 6279 7465 2d67 7472 2038 3620 6279 5 byte-gtr 86 by │ │ │ +00003210: 7465 2d6c 7373 2062 7974 652d 6c65 7120 te-lss byte-leq │ │ │ +00003220: 6279 7465 2d67 6571 2062 7974 652d 6469 byte-geq byte-di │ │ │ +00003230: 6666 2062 7974 652d 6e65 6761 7465 2062 ff byte-negate b │ │ │ +00003240: 7974 652d 706c 7573 2062 7974 652d 6d61 yte-plus byte-ma │ │ │ +00003250: 7820 6279 7465 2d6d 696e 2062 7974 652d x byte-min byte- │ │ │ +00003260: 6d75 6c74 2062 7974 652d 706f 696e 7420 mult byte-point │ │ │ +00003270: 6279 7465 2d65 7120 6279 7465 2d67 6f74 byte-eq byte-got │ │ │ +00003280: 6f2d 6368 6172 2062 7974 652d 696e 7365 o-char byte-inse │ │ │ +00003290: 7274 2062 7974 652d 706f 696e 742d 6d61 rt byte-point-ma │ │ │ +000032a0: 7820 6279 7465 2d70 6f69 6e74 2d6d 696e x byte-point-min │ │ │ +000032b0: 2062 7974 652d 6368 6172 2d61 6674 6572 byte-char-after │ │ │ +000032c0: 2062 7974 652d 666f 6c6c 6f77 696e 672d byte-following- │ │ │ +000032d0: 6368 6172 2062 7974 652d 7072 6563 6564 char byte-preced │ │ │ +000032e0: 696e 672d 6368 6172 2062 7974 652d 6375 ing-char byte-cu │ │ │ +000032f0: 7272 656e 742d 636f 6c75 6d6e 2062 7974 rrent-column byt │ │ │ +00003300: 652d 696e 6465 6e74 2d74 6f20 6279 7465 e-indent-to byte │ │ │ +00003310: 2d65 7175 616c 2062 7974 652d 656f 6c70 -equal byte-eolp │ │ │ +00003320: 2062 7974 652d 656f 6270 2062 7974 652d byte-eobp byte- │ │ │ +00003330: 626f 6c70 2062 7974 652d 626f 6270 2062 bolp byte-bobp b │ │ │ +00003340: 7974 652d 6375 7272 656e 742d 6275 6666 yte-current-buff │ │ │ +00003350: 6572 2062 7974 652d 7365 742d 6275 6666 er byte-set-buff │ │ │ +00003360: 6572 2038 3720 3838 2038 3920 3930 2039 er 87 88 89 90 9 │ │ │ +00003370: 3120 3932 2039 3320 3934 2039 3520 3936 1 92 93 94 95 96 │ │ │ +00003380: 2039 3720 3938 2039 3920 3130 3020 3130 97 98 99 100 10 │ │ │ +00003390: 3120 3130 3220 3130 3320 3130 3420 3130 1 102 103 104 10 │ │ │ +000033a0: 3520 3130 3620 3130 3720 3130 3820 3130 5 106 107 108 10 │ │ │ +000033b0: 3920 3131 3020 3131 3120 3131 3220 3131 9 110 111 112 11 │ │ │ +000033c0: 335d 2032 290a 2340 3637 2042 7974 6520 3] 2).#@67 Byte │ │ │ +000033d0: 636f 6465 206f 7063 6f64 6520 546f 206d code opcode To m │ │ │ +000033e0: 616b 6520 6120 6269 6e64 696e 6720 746f ake a binding to │ │ │ +000033f0: 2072 6563 6f72 6420 7468 6520 6375 7272 record the curr │ │ │ +00003400: 656e 7420 6275 6666 6572 2e2e 1f0a 2864 ent buffer....(d │ │ │ +00003410: 6566 636f 6e73 7420 6279 7465 2d73 6176 efconst byte-sav │ │ │ +00003420: 652d 6375 7272 656e 742d 6275 6666 6572 e-current-buffer │ │ │ +00003430: 2031 3134 2028 2324 202e 2031 3332 3539 114 (#$ . 13259 │ │ │ +00003440: 2929 0a28 6279 7465 2d63 6f64 6520 22c4 )).(byte-code ". │ │ │ +00003450: 0d42 15c6 14c3 0d42 15c7 13c2 0d42 15c8 .B.....B.....B.. │ │ │ +00003460: 12c1 0d42 15c9 11c0 0d42 15ca 10cb 0d42 ...B.....B.....B │ │ │ +00003470: 15cc 160b cd0d 4215 ce16 0dcf 0d42 15d0 ......B......B.. │ │ │ +00003480: 160f d10d 4215 d216 11d3 0d42 15d4 1613 ....B......B.... │ │ │ +00003490: d50d 4215 d616 15d7 0d42 15d8 1617 d90d ..B......B...... │ │ │ +000034a0: 4215 da16 19c4 8722 205b 6279 7465 2d73 B......" [byte-s │ │ │ +000034b0: 6b69 702d 6368 6172 732d 666f 7277 6172 kip-chars-forwar │ │ │ +000034c0: 6420 6279 7465 2d66 6f72 7761 7264 2d77 d byte-forward-w │ │ │ +000034d0: 6f72 6420 6279 7465 2d66 6f72 7761 7264 ord byte-forward │ │ │ +000034e0: 2d63 6861 7220 6279 7465 2d69 6e74 6572 -char byte-inter │ │ │ +000034f0: 6163 7469 7665 2d70 2062 7974 652d 6d65 active-p byte-me │ │ │ +00003500: 6d71 2063 7572 7265 6e74 2d6c 6f61 642d mq current-load- │ │ │ +00003510: 6c69 7374 2031 3135 2031 3136 2031 3137 list 115 116 117 │ │ │ +00003520: 2031 3138 2031 3139 2062 7974 652d 736b 118 119 byte-sk │ │ │ +00003530: 6970 2d63 6861 7273 2d62 6163 6b77 6172 ip-chars-backwar │ │ │ +00003540: 6420 3132 3020 6279 7465 2d66 6f72 7761 d 120 byte-forwa │ │ │ +00003550: 7264 2d6c 696e 6520 3132 3120 6279 7465 rd-line 121 byte │ │ │ +00003560: 2d63 6861 722d 7379 6e74 6178 2031 3232 -char-syntax 122 │ │ │ +00003570: 2062 7974 652d 6275 6666 6572 2d73 7562 byte-buffer-sub │ │ │ +00003580: 7374 7269 6e67 2031 3233 2062 7974 652d string 123 byte- │ │ │ +00003590: 6465 6c65 7465 2d72 6567 696f 6e20 3132 delete-region 12 │ │ │ +000035a0: 3420 6279 7465 2d6e 6172 726f 772d 746f 4 byte-narrow-to │ │ │ +000035b0: 2d72 6567 696f 6e20 3132 3520 6279 7465 -region 125 byte │ │ │ +000035c0: 2d77 6964 656e 2031 3236 2062 7974 652d -widen 126 byte- │ │ │ +000035d0: 656e 642d 6f66 2d6c 696e 6520 3132 375d end-of-line 127] │ │ │ +000035e0: 2032 290a 2340 3838 2042 7974 6520 636f 2).#@88 Byte co │ │ │ +000035f0: 6465 206f 7063 6f64 6520 666f 7220 7265 de opcode for re │ │ │ +00003600: 6665 7265 6e63 6520 746f 2061 2063 6f6e ference to a con │ │ │ +00003610: 7374 616e 7420 7769 7468 2076 6563 746f stant with vecto │ │ │ +00003620: 7220 696e 6465 7820 3e3d 2062 7974 652d r index >= byte- │ │ │ +00003630: 636f 6e73 7461 6e74 2d6c 696d 6974 2e1f constant-limit.. │ │ │ +00003640: 0a28 6465 6663 6f6e 7374 2062 7974 652d .(defconst byte- │ │ │ +00003650: 636f 6e73 7461 6e74 3220 3132 3920 2823 constant2 129 (# │ │ │ +00003660: 2420 2e20 3133 3830 3129 290a 2340 3432 $ . 13801)).#@42 │ │ │ +00003670: 2042 7974 6520 636f 6465 206f 7063 6f64 Byte code opcod │ │ │ +00003680: 6520 666f 7220 756e 636f 6e64 6974 696f e for unconditio │ │ │ +00003690: 6e61 6c20 6a75 6d70 2e1f 0a28 6465 6663 nal jump...(defc │ │ │ +000036a0: 6f6e 7374 2062 7974 652d 676f 746f 2031 onst byte-goto 1 │ │ │ +000036b0: 3330 2028 2324 202e 2031 3339 3337 2929 30 (#$ . 13937)) │ │ │ +000036c0: 0a23 4035 3320 4279 7465 2063 6f64 6520 .#@53 Byte code │ │ │ +000036d0: 6f70 636f 6465 2074 6f20 706f 7020 7661 opcode to pop va │ │ │ +000036e0: 6c75 6520 616e 6420 6a75 6d70 2069 6620 lue and jump if │ │ │ +000036f0: 6974 2773 206e 696c 2e1f 0a28 6465 6663 it's nil...(defc │ │ │ +00003700: 6f6e 7374 2062 7974 652d 676f 746f 2d69 onst byte-goto-i │ │ │ +00003710: 662d 6e69 6c20 3133 3120 2823 2420 2e20 f-nil 131 (#$ . │ │ │ +00003720: 3134 3032 3229 290a 2340 3537 2042 7974 14022)).#@57 Byt │ │ │ +00003730: 6520 636f 6465 206f 7063 6f64 6520 746f e code opcode to │ │ │ +00003740: 2070 6f70 2076 616c 7565 2061 6e64 206a pop value and j │ │ │ +00003750: 756d 7020 6966 2069 7427 7320 6e6f 7420 ump if it's not │ │ │ +00003760: 6e69 6c2e 1f0a 2864 6566 636f 6e73 7420 nil...(defconst │ │ │ +00003770: 6279 7465 2d67 6f74 6f2d 6966 2d6e 6f74 byte-goto-if-not │ │ │ +00003780: 2d6e 696c 2031 3332 2028 2324 202e 2031 -nil 132 (#$ . 1 │ │ │ +00003790: 3431 3235 2929 0a23 4039 3620 4279 7465 4125)).#@96 Byte │ │ │ +000037a0: 2063 6f64 6520 6f70 636f 6465 2074 6f20 code opcode to │ │ │ +000037b0: 6578 616d 696e 6520 746f 702d 6f66 2d73 examine top-of-s │ │ │ +000037c0: 7461 636b 2c20 6a75 6d70 2061 6e64 2064 tack, jump and d │ │ │ +000037d0: 6f6e 2774 2070 6f70 2069 7420 6966 2069 on't pop it if i │ │ │ +000037e0: 7427 7320 6e69 6c2c 0a6f 7468 6572 7769 t's nil,.otherwi │ │ │ +000037f0: 7365 2070 6f70 2069 742e 1f0a 2864 6566 se pop it...(def │ │ │ +00003800: 636f 6e73 7420 6279 7465 2d67 6f74 6f2d const byte-goto- │ │ │ +00003810: 6966 2d6e 696c 2d65 6c73 652d 706f 7020 if-nil-else-pop │ │ │ +00003820: 3133 3320 2823 2420 2e20 3134 3233 3629 133 (#$ . 14236) │ │ │ +00003830: 290a 2340 3130 3020 4279 7465 2063 6f64 ).#@100 Byte cod │ │ │ +00003840: 6520 6f70 636f 6465 2074 6f20 6578 616d e opcode to exam │ │ │ +00003850: 696e 6520 746f 702d 6f66 2d73 7461 636b ine top-of-stack │ │ │ +00003860: 2c20 6a75 6d70 2061 6e64 2064 6f6e 2774 , jump and don't │ │ │ +00003870: 2070 6f70 2069 7420 6966 2069 7427 7320 pop it if it's │ │ │ +00003880: 6e6f 6e2d 6e69 6c2c 0a6f 7468 6572 7769 non-nil,.otherwi │ │ │ +00003890: 7365 2070 6f70 2069 742e 1f0a 2864 6566 se pop it...(def │ │ │ +000038a0: 636f 6e73 7420 6279 7465 2d67 6f74 6f2d const byte-goto- │ │ │ +000038b0: 6966 2d6e 6f74 2d6e 696c 2d65 6c73 652d if-not-nil-else- │ │ │ +000038c0: 706f 7020 3133 3420 2823 2420 2e20 3134 pop 134 (#$ . 14 │ │ │ +000038d0: 3339 3229 290a 2340 3635 2042 7974 6520 392)).#@65 Byte │ │ │ +000038e0: 636f 6465 206f 7063 6f64 6520 746f 2070 code opcode to p │ │ │ +000038f0: 6f70 2061 2076 616c 7565 2061 6e64 2072 op a value and r │ │ │ +00003900: 6574 7572 6e20 6974 2066 726f 6d20 6062 eturn it from `b │ │ │ +00003910: 7974 652d 636f 6465 272e 1f0a 2864 6566 yte-code'...(def │ │ │ +00003920: 636f 6e73 7420 6279 7465 2d72 6574 7572 const byte-retur │ │ │ +00003930: 6e20 3133 3520 2823 2420 2e20 3134 3535 n 135 (#$ . 1455 │ │ │ +00003940: 3529 290a 2340 3531 2042 7974 6520 636f 5)).#@51 Byte co │ │ │ +00003950: 6465 206f 7063 6f64 6520 746f 2064 6973 de opcode to dis │ │ │ +00003960: 6361 7264 206f 6e65 2076 616c 7565 2066 card one value f │ │ │ +00003970: 726f 6d20 7374 6163 6b2e 1f0a 2864 6566 rom stack...(def │ │ │ +00003980: 636f 6e73 7420 6279 7465 2d64 6973 6361 const byte-disca │ │ │ +00003990: 7264 2031 3336 2028 2324 202e 2031 3436 rd 136 (#$ . 146 │ │ │ +000039a0: 3635 2929 0a23 4035 3320 4279 7465 2063 65)).#@53 Byte c │ │ │ +000039b0: 6f64 6520 6f70 636f 6465 2074 6f20 6475 ode opcode to du │ │ │ +000039c0: 706c 6963 6174 6520 7468 6520 746f 7020 plicate the top │ │ │ +000039d0: 6f66 2074 6865 2073 7461 636b 2e1f 0a28 of the stack...( │ │ │ +000039e0: 6465 6663 6f6e 7374 2062 7974 652d 6475 defconst byte-du │ │ │ +000039f0: 7020 3133 3720 2823 2420 2e20 3134 3736 p 137 (#$ . 1476 │ │ │ +00003a00: 3229 290a 2340 3734 2042 7974 6520 636f 2)).#@74 Byte co │ │ │ +00003a10: 6465 206f 7063 6f64 6520 746f 206d 616b de opcode to mak │ │ │ +00003a20: 6520 6120 6269 6e64 696e 6720 746f 2072 e a binding to r │ │ │ +00003a30: 6563 6f72 6420 7468 6520 6275 6666 6572 ecord the buffer │ │ │ +00003a40: 2c20 706f 696e 7420 616e 6420 6d61 726b , point and mark │ │ │ +00003a50: 2e1f 0a28 6465 6663 6f6e 7374 2062 7974 ...(defconst byt │ │ │ +00003a60: 652d 7361 7665 2d65 7863 7572 7369 6f6e e-save-excursion │ │ │ +00003a70: 2031 3338 2028 2324 202e 2031 3438 3537 138 (#$ . 14857 │ │ │ +00003a80: 2929 0a23 4037 3520 4279 7465 2063 6f64 )).#@75 Byte cod │ │ │ +00003a90: 6520 6f70 636f 6465 2074 6f20 6d61 6b65 e opcode to make │ │ │ +00003aa0: 2061 2062 696e 6469 6e67 2074 6f20 7265 a binding to re │ │ │ +00003ab0: 636f 7264 2065 6e74 6972 6520 7769 6e64 cord entire wind │ │ │ +00003ac0: 6f77 2063 6f6e 6669 6775 7261 7469 6f6e ow configuration │ │ │ +00003ad0: 2e1f 0a28 6465 6663 6f6e 7374 2062 7974 ...(defconst byt │ │ │ +00003ae0: 652d 7361 7665 2d77 696e 646f 772d 6578 e-save-window-ex │ │ │ +00003af0: 6375 7273 696f 6e20 3133 3920 2823 2420 cursion 139 (#$ │ │ │ +00003b00: 2e20 3134 3938 3429 290a 2340 3838 2042 . 14984)).#@88 B │ │ │ +00003b10: 7974 6520 636f 6465 206f 7063 6f64 6520 yte code opcode │ │ │ +00003b20: 746f 206d 616b 6520 6120 6269 6e64 696e to make a bindin │ │ │ +00003b30: 6720 746f 2072 6563 6f72 6420 7468 6520 g to record the │ │ │ +00003b40: 6375 7272 656e 7420 6275 6666 6572 2063 current buffer c │ │ │ +00003b50: 6c69 7070 696e 6720 7265 7374 7269 6374 lipping restrict │ │ │ +00003b60: 696f 6e73 2e1f 0a28 6465 6663 6f6e 7374 ions...(defconst │ │ │ +00003b70: 2062 7974 652d 7361 7665 2d72 6573 7472 byte-save-restr │ │ │ +00003b80: 6963 7469 6f6e 2031 3430 2028 2324 202e iction 140 (#$ . │ │ │ +00003b90: 2031 3531 3139 2929 0a23 4038 3720 4279 15119)).#@87 By │ │ │ +00003ba0: 7465 2063 6f64 6520 6f70 636f 6465 2066 te code opcode f │ │ │ +00003bb0: 6f72 2063 6174 6368 2e20 2054 616b 6573 or catch. Takes │ │ │ +00003bc0: 2c20 6f6e 2073 7461 636b 2c20 7468 6520 , on stack, the │ │ │ +00003bd0: 7461 6720 616e 6420 616e 2065 7870 7265 tag and an expre │ │ │ +00003be0: 7373 696f 6e20 666f 7220 7468 6520 626f ssion for the bo │ │ │ +00003bf0: 6479 2e1f 0a28 6465 6663 6f6e 7374 2062 dy...(defconst b │ │ │ +00003c00: 7974 652d 6361 7463 6820 3134 3120 2823 yte-catch 141 (# │ │ │ +00003c10: 2420 2e20 3135 3236 3229 290a 2340 3933 $ . 15262)).#@93 │ │ │ +00003c20: 2042 7974 6520 636f 6465 206f 7063 6f64 Byte code opcod │ │ │ +00003c30: 6520 666f 7220 756e 7769 6e64 2d70 726f e for unwind-pro │ │ │ +00003c40: 7465 6374 2e20 2054 616b 6573 2c20 6f6e tect. Takes, on │ │ │ +00003c50: 2073 7461 636b 2c20 616e 2065 7870 7265 stack, an expre │ │ │ +00003c60: 7373 696f 6e20 666f 7220 7468 6520 756e ssion for the un │ │ │ +00003c70: 7769 6e64 2d61 6374 696f 6e2e 1f0a 2864 wind-action...(d │ │ │ +00003c80: 6566 636f 6e73 7420 6279 7465 2d75 6e77 efconst byte-unw │ │ │ +00003c90: 696e 642d 7072 6f74 6563 7420 3134 3220 ind-protect 142 │ │ │ +00003ca0: 2823 2420 2e20 3135 3339 3329 290a 2862 (#$ . 15393)).(b │ │ │ +00003cb0: 7974 652d 636f 6465 2022 c40d 4215 c614 yte-code "..B... │ │ │ +00003cc0: c30d 4215 c713 c20d 4215 c812 c10d 4215 ..B.....B.....B. │ │ │ +00003cd0: c911 c00d 4215 ca10 cb0d 4215 cc16 0bcd ....B.....B..... │ │ │ +00003ce0: 0d42 15ce 160d cf0d 4215 d016 0fd1 0d42 .B......B......B │ │ │ +00003cf0: 15d2 1611 d30d 4215 d416 13d5 0d42 15d6 ......B......B.. │ │ │ +00003d00: 1615 d70d 4215 d816 17d9 0d42 15da 1619 ....B......B.... │ │ │ +00003d10: db0d 4215 dc16 1bdd 0d42 15de 161d df0d ..B......B...... │ │ │ +00003d20: 4215 e016 1fe1 0d42 15e2 1621 e30d 4215 B......B...!..B. │ │ │ +00003d30: e416 23e5 0d42 15e6 1625 e70d 4215 e816 ..#..B...%..B... │ │ │ +00003d40: 27e9 0d42 15ea 1629 eb0d 4215 ec16 2bed '..B...)..B...+. │ │ │ +00003d50: 0d42 15ee 162d ef0d 4215 f016 2ff1 0d42 .B...-..B.../..B │ │ │ +00003d60: 15f2 1631 f30d 4215 f416 33f5 0d42 15f6 ...1..B...3..B.. │ │ │ +00003d70: 1635 f70d 4215 f816 37f9 0d42 15fa 1639 .5..B...7..B...9 │ │ │ +00003d80: fb0d 4215 fc16 3bfd 0d42 15fe 163d ff0d ..B...;..B...=.. │ │ │ +00003d90: 4215 8144 0016 3f81 4000 0d42 1581 4500 B..D..?.@..B..E. │ │ │ +00003da0: 1640 8141 000d 4215 8146 0016 4181 4200 .@.A..B..F..A.B. │ │ │ +00003db0: 0d42 1581 4700 1642 8143 000d 4215 8148 .B..G..B.C..B..H │ │ │ +00003dc0: 0016 43c4 8722 205b 6279 7465 2d73 6574 ..C.." [byte-set │ │ │ +00003dd0: 2d6d 6172 6b65 7220 6279 7465 2d75 6e62 -marker byte-unb │ │ │ +00003de0: 696e 642d 616c 6c20 6279 7465 2d74 656d ind-all byte-tem │ │ │ +00003df0: 702d 6f75 7470 7574 2d62 7566 6665 722d p-output-buffer- │ │ │ +00003e00: 7368 6f77 2062 7974 652d 7465 6d70 2d6f show byte-temp-o │ │ │ +00003e10: 7574 7075 742d 6275 6666 6572 2d73 6574 utput-buffer-set │ │ │ +00003e20: 7570 2062 7974 652d 636f 6e64 6974 696f up byte-conditio │ │ │ +00003e30: 6e2d 6361 7365 2063 7572 7265 6e74 2d6c n-case current-l │ │ │ +00003e40: 6f61 642d 6c69 7374 2031 3433 2031 3434 oad-list 143 144 │ │ │ +00003e50: 2031 3435 2031 3436 2031 3437 2062 7974 145 146 147 byt │ │ │ +00003e60: 652d 6d61 7463 682d 6265 6769 6e6e 696e e-match-beginnin │ │ │ +00003e70: 6720 3134 3820 6279 7465 2d6d 6174 6368 g 148 byte-match │ │ │ +00003e80: 2d65 6e64 2031 3439 2062 7974 652d 7570 -end 149 byte-up │ │ │ +00003e90: 6361 7365 2031 3530 2062 7974 652d 646f case 150 byte-do │ │ │ +00003ea0: 776e 6361 7365 2031 3531 2062 7974 652d wncase 151 byte- │ │ │ +00003eb0: 7374 7269 6e67 3d20 3135 3220 6279 7465 string= 152 byte │ │ │ +00003ec0: 2d73 7472 696e 673c 2031 3533 2062 7974 -string< 153 byt │ │ │ +00003ed0: 652d 6f6c 642d 6571 7561 6c20 3135 3420 e-old-equal 154 │ │ │ +00003ee0: 6279 7465 2d6e 7468 6364 7220 3135 3520 byte-nthcdr 155 │ │ │ +00003ef0: 6279 7465 2d65 6c74 2031 3536 2062 7974 byte-elt 156 byt │ │ │ +00003f00: 652d 6f6c 642d 6d65 6d62 6572 2031 3537 e-old-member 157 │ │ │ +00003f10: 2062 7974 652d 6f6c 642d 6173 7371 2031 byte-old-assq 1 │ │ │ +00003f20: 3538 2062 7974 652d 6e72 6576 6572 7365 58 byte-nreverse │ │ │ +00003f30: 2031 3539 2062 7974 652d 7365 7463 6172 159 byte-setcar │ │ │ +00003f40: 2031 3630 2062 7974 652d 7365 7463 6472 160 byte-setcdr │ │ │ +00003f50: 2031 3631 2062 7974 652d 6361 722d 7361 161 byte-car-sa │ │ │ +00003f60: 6665 2031 3632 2062 7974 652d 6364 722d fe 162 byte-cdr- │ │ │ +00003f70: 7361 6665 2031 3633 2062 7974 652d 6e63 safe 163 byte-nc │ │ │ +00003f80: 6f6e 6320 3136 3420 6279 7465 2d71 756f onc 164 byte-quo │ │ │ +00003f90: 2031 3635 2062 7974 652d 7265 6d20 3136 165 byte-rem 16 │ │ │ +00003fa0: 3620 6279 7465 2d6e 756d 6265 7270 2031 6 byte-numberp 1 │ │ │ +00003fb0: 3637 2062 7974 652d 696e 7465 6765 7270 67 byte-integerp │ │ │ +00003fc0: 2031 3638 2062 7974 652d 7265 6c2d 676f 168 byte-rel-go │ │ │ +00003fd0: 746f 2031 3730 2062 7974 652d 7265 6c2d to 170 byte-rel- │ │ │ +00003fe0: 676f 746f 2d69 662d 6e69 6c20 3137 3120 goto-if-nil 171 │ │ │ +00003ff0: 6279 7465 2d72 656c 2d67 6f74 6f2d 6966 byte-rel-goto-if │ │ │ +00004000: 2d6e 6f74 2d6e 696c 2031 3732 2062 7974 -not-nil 172 byt │ │ │ +00004010: 652d 7265 6c2d 676f 746f 2d69 662d 6e69 e-rel-goto-if-ni │ │ │ +00004020: 6c2d 656c 7365 2d70 6f70 2031 3733 2062 l-else-pop 173 b │ │ │ +00004030: 7974 652d 7265 6c2d 676f 746f 2d69 662d yte-rel-goto-if- │ │ │ +00004040: 6e6f 742d 6e69 6c2d 656c 7365 2d70 6f70 not-nil-else-pop │ │ │ +00004050: 2031 3734 2062 7974 652d 6c69 7374 4e20 174 byte-listN │ │ │ +00004060: 6279 7465 2d63 6f6e 6361 744e 2062 7974 byte-concatN byt │ │ │ +00004070: 652d 696e 7365 7274 4e20 6279 7465 2d6d e-insertN byte-m │ │ │ +00004080: 656d 6265 7220 6279 7465 2d61 7373 7120 ember byte-assq │ │ │ +00004090: 3137 3520 3137 3620 3137 3720 3138 3220 175 176 177 182 │ │ │ +000040a0: 3138 335d 2032 290a 2340 3437 2042 7974 183] 2).#@47 Byt │ │ │ +000040b0: 6520 636f 6465 206f 7063 6f64 6520 666f e code opcode fo │ │ │ +000040c0: 7220 7265 6665 7265 6e63 6520 746f 2061 r reference to a │ │ │ +000040d0: 2063 6f6e 7374 616e 742e 1f0a 2864 6566 constant...(def │ │ │ +000040e0: 636f 6e73 7420 6279 7465 2d63 6f6e 7374 const byte-const │ │ │ +000040f0: 616e 7420 3139 3220 2823 2420 2e20 3136 ant 192 (#$ . 16 │ │ │ +00004100: 3535 3729 290a 2340 3633 2045 7863 6c75 557)).#@63 Exclu │ │ │ +00004110: 7369 7665 206d 6178 696d 756d 2069 6e64 sive maximum ind │ │ │ +00004120: 6578 2075 7361 626c 6520 696e 2074 6865 ex usable in the │ │ │ +00004130: 2060 6279 7465 2d63 6f6e 7374 616e 7427 `byte-constant' │ │ │ +00004140: 206f 7063 6f64 652e 1f0a 2864 6566 636f opcode...(defco │ │ │ +00004150: 6e73 7420 6279 7465 2d63 6f6e 7374 616e nst byte-constan │ │ │ +00004160: 742d 6c69 6d69 7420 3634 2028 2324 202e t-limit 64 (#$ . │ │ │ +00004170: 2031 3636 3531 2929 0a23 4034 3220 4c69 16651)).#@42 Li │ │ │ +00004180: 7374 206f 6620 6279 7465 2d63 6f64 6573 st of byte-codes │ │ │ +00004190: 2077 686f 7365 206f 6666 7365 7420 6973 whose offset is │ │ │ +000041a0: 2061 2070 632e 1f0a 2864 6566 636f 6e73 a pc...(defcons │ │ │ +000041b0: 7420 6279 7465 2d67 6f74 6f2d 6f70 7320 t byte-goto-ops │ │ │ +000041c0: 2728 6279 7465 2d67 6f74 6f20 6279 7465 '(byte-goto byte │ │ │ +000041d0: 2d67 6f74 6f2d 6966 2d6e 696c 2062 7974 -goto-if-nil byt │ │ │ +000041e0: 652d 676f 746f 2d69 662d 6e6f 742d 6e69 e-goto-if-not-ni │ │ │ +000041f0: 6c20 6279 7465 2d67 6f74 6f2d 6966 2d6e l byte-goto-if-n │ │ │ +00004200: 696c 2d65 6c73 652d 706f 7020 6279 7465 il-else-pop byte │ │ │ +00004210: 2d67 6f74 6f2d 6966 2d6e 6f74 2d6e 696c -goto-if-not-nil │ │ │ +00004220: 2d65 6c73 652d 706f 7029 2028 2324 202e -else-pop) (#$ . │ │ │ +00004230: 2031 3637 3636 2929 0a28 6279 7465 2d63 16766)).(byte-c │ │ │ +00004240: 6f64 6520 22c0 0942 11c2 10c0 8722 205b ode "..B....." [ │ │ │ +00004250: 6279 7465 2d67 6f74 6f2d 616c 7761 7973 byte-goto-always │ │ │ +00004260: 2d70 6f70 2d6f 7073 2063 7572 7265 6e74 -pop-ops current │ │ │ +00004270: 2d6c 6f61 642d 6c69 7374 2028 6279 7465 -load-list (byte │ │ │ +00004280: 2d67 6f74 6f2d 6966 2d6e 696c 2062 7974 -goto-if-nil byt │ │ │ +00004290: 652d 676f 746f 2d69 662d 6e6f 742d 6e69 e-goto-if-not-ni │ │ │ +000042a0: 6c29 5d20 3229 0a23 4033 3220 6279 7465 l)] 2).#@32 byte │ │ │ +000042b0: 2d63 6f64 6573 2066 6f72 2072 656c 6174 -codes for relat │ │ │ +000042c0: 6976 6520 6a75 6d70 732e 1f0a 2864 6566 ive jumps...(def │ │ │ +000042d0: 636f 6e73 7420 6279 7465 2d72 656c 2d67 const byte-rel-g │ │ │ +000042e0: 6f74 6f2d 6f70 7320 2728 6279 7465 2d72 oto-ops '(byte-r │ │ │ +000042f0: 656c 2d67 6f74 6f20 6279 7465 2d72 656c el-goto byte-rel │ │ │ +00004300: 2d67 6f74 6f2d 6966 2d6e 696c 2062 7974 -goto-if-nil byt │ │ │ +00004310: 652d 7265 6c2d 676f 746f 2d69 662d 6e6f e-rel-goto-if-no │ │ │ +00004320: 742d 6e69 6c20 6279 7465 2d72 656c 2d67 t-nil byte-rel-g │ │ │ +00004330: 6f74 6f2d 6966 2d6e 696c 2d65 6c73 652d oto-if-nil-else- │ │ │ +00004340: 706f 7020 6279 7465 2d72 656c 2d67 6f74 pop byte-rel-got │ │ │ +00004350: 6f2d 6966 2d6e 6f74 2d6e 696c 2d65 6c73 o-if-not-nil-els │ │ │ +00004360: 652d 706f 7029 2028 2324 202e 2031 3730 e-pop) (#$ . 170 │ │ │ +00004370: 3638 2929 0a28 6279 7465 2d63 6f64 6520 68)).(byte-code │ │ │ +00004380: 22c2 11c3 10c4 8722 205b 6279 7465 2d73 "......" [byte-s │ │ │ +00004390: 7461 636b 2b2d 696e 666f 2062 7974 652d tack+-info byte- │ │ │ +000043a0: 636f 6465 2d76 6563 746f 7220 5b6e 696c code-vector [nil │ │ │ +000043b0: 206e 696c 206e 696c 206e 696c 206e 696c nil nil nil nil │ │ │ +000043c0: 206e 696c 206e 696c 206e 696c 2062 7974 nil nil nil byt │ │ │ +000043d0: 652d 7661 7272 6566 206e 696c 206e 696c e-varref nil nil │ │ │ 000043e0: 206e 696c 206e 696c 206e 696c 206e 696c nil nil nil nil │ │ │ -000043f0: 206e 696c 206e 696c 206e 696c 2062 7974 nil nil nil byt │ │ │ -00004400: 652d 7661 7273 6574 206e 696c 206e 696c e-varset nil nil │ │ │ -00004410: 206e 696c 206e 696c 206e 696c 206e 696c nil nil nil nil │ │ │ -00004420: 206e 696c 2062 7974 652d 7661 7262 696e nil byte-varbin │ │ │ -00004430: 6420 6e69 6c20 6e69 6c20 6e69 6c20 6e69 d nil nil nil ni │ │ │ -00004440: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6279 l nil nil nil by │ │ │ -00004450: 7465 2d63 616c 6c20 6e69 6c20 6e69 6c20 te-call nil nil │ │ │ -00004460: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ -00004470: 6e69 6c20 6279 7465 2d75 6e62 696e 6420 nil byte-unbind │ │ │ +000043f0: 206e 696c 2062 7974 652d 7661 7273 6574 nil byte-varset │ │ │ +00004400: 206e 696c 206e 696c 206e 696c 206e 696c nil nil nil nil │ │ │ +00004410: 206e 696c 206e 696c 206e 696c 2062 7974 nil nil nil byt │ │ │ +00004420: 652d 7661 7262 696e 6420 6e69 6c20 6e69 e-varbind nil ni │ │ │ +00004430: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ +00004440: 6c20 6e69 6c20 6279 7465 2d63 616c 6c20 l nil byte-call │ │ │ +00004450: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ +00004460: 6e69 6c20 6e69 6c20 6e69 6c20 6279 7465 nil nil nil byte │ │ │ +00004470: 2d75 6e62 696e 6420 6e69 6c20 6e69 6c20 -unbind nil nil │ │ │ 00004480: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ 00004490: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ 000044a0: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ -000044b0: 6e69 6c20 6e69 6c20 6e69 6c20 6279 7465 nil nil nil byte │ │ │ -000044c0: 2d6e 7468 2062 7974 652d 7379 6d62 6f6c -nth byte-symbol │ │ │ -000044d0: 7020 6279 7465 2d63 6f6e 7370 2062 7974 p byte-consp byt │ │ │ -000044e0: 652d 7374 7269 6e67 7020 6279 7465 2d6c e-stringp byte-l │ │ │ -000044f0: 6973 7470 2062 7974 652d 6f6c 642d 6571 istp byte-old-eq │ │ │ -00004500: 2062 7974 652d 6f6c 642d 6d65 6d71 2062 byte-old-memq b │ │ │ -00004510: 7974 652d 6e6f 7420 6279 7465 2d63 6172 yte-not byte-car │ │ │ -00004520: 2062 7974 652d 6364 7220 6279 7465 2d63 byte-cdr byte-c │ │ │ -00004530: 6f6e 7320 6279 7465 2d6c 6973 7431 2062 ons byte-list1 b │ │ │ -00004540: 7974 652d 6c69 7374 3220 6279 7465 2d6c yte-list2 byte-l │ │ │ -00004550: 6973 7433 2062 7974 652d 6c69 7374 3420 ist3 byte-list4 │ │ │ -00004560: 6279 7465 2d6c 656e 6774 6820 6279 7465 byte-length byte │ │ │ -00004570: 2d61 7265 6620 6279 7465 2d61 7365 7420 -aref byte-aset │ │ │ -00004580: 6279 7465 2d73 796d 626f 6c2d 7661 6c75 byte-symbol-valu │ │ │ -00004590: 6520 6279 7465 2d73 796d 626f 6c2d 6675 e byte-symbol-fu │ │ │ -000045a0: 6e63 7469 6f6e 2062 7974 652d 7365 7420 nction byte-set │ │ │ -000045b0: 6279 7465 2d66 7365 7420 6279 7465 2d67 byte-fset byte-g │ │ │ -000045c0: 6574 2062 7974 652d 7375 6273 7472 696e et byte-substrin │ │ │ -000045d0: 6720 6279 7465 2d63 6f6e 6361 7432 2062 g byte-concat2 b │ │ │ -000045e0: 7974 652d 636f 6e63 6174 3320 6279 7465 yte-concat3 byte │ │ │ -000045f0: 2d63 6f6e 6361 7434 2062 7974 652d 7375 -concat4 byte-su │ │ │ -00004600: 6231 2062 7974 652d 6164 6431 2062 7974 b1 byte-add1 byt │ │ │ -00004610: 652d 6571 6c73 6967 6e20 6279 7465 2d67 e-eqlsign byte-g │ │ │ -00004620: 7472 2062 7974 652d 6c73 7320 6279 7465 tr byte-lss byte │ │ │ -00004630: 2d6c 6571 2062 7974 652d 6765 7120 6279 -leq byte-geq by │ │ │ -00004640: 7465 2d64 6966 6620 6279 7465 2d6e 6567 te-diff byte-neg │ │ │ -00004650: 6174 6520 6279 7465 2d70 6c75 7320 6279 ate byte-plus by │ │ │ -00004660: 7465 2d6d 6178 2062 7974 652d 6d69 6e20 te-max byte-min │ │ │ -00004670: 6279 7465 2d6d 756c 7420 6279 7465 2d70 byte-mult byte-p │ │ │ -00004680: 6f69 6e74 2062 7974 652d 6571 2062 7974 oint byte-eq byt │ │ │ -00004690: 652d 676f 746f 2d63 6861 7220 6279 7465 e-goto-char byte │ │ │ -000046a0: 2d69 6e73 6572 7420 6279 7465 2d70 6f69 -insert byte-poi │ │ │ -000046b0: 6e74 2d6d 6178 2062 7974 652d 706f 696e nt-max byte-poin │ │ │ -000046c0: 742d 6d69 6e20 6279 7465 2d63 6861 722d t-min byte-char- │ │ │ -000046d0: 6166 7465 7220 6279 7465 2d66 6f6c 6c6f after byte-follo │ │ │ -000046e0: 7769 6e67 2d63 6861 7220 6279 7465 2d70 wing-char byte-p │ │ │ -000046f0: 7265 6365 6469 6e67 2d63 6861 7220 6279 receding-char by │ │ │ -00004700: 7465 2d63 7572 7265 6e74 2d63 6f6c 756d te-current-colum │ │ │ -00004710: 6e20 6279 7465 2d69 6e64 656e 742d 746f n byte-indent-to │ │ │ -00004720: 2062 7974 652d 6571 7561 6c20 6279 7465 byte-equal byte │ │ │ -00004730: 2d65 6f6c 7020 6279 7465 2d65 6f62 7020 -eolp byte-eobp │ │ │ -00004740: 6279 7465 2d62 6f6c 7020 6279 7465 2d62 byte-bolp byte-b │ │ │ -00004750: 6f62 7020 6279 7465 2d63 7572 7265 6e74 obp byte-current │ │ │ -00004760: 2d62 7566 6665 7220 6279 7465 2d73 6574 -buffer byte-set │ │ │ -00004770: 2d62 7566 6665 7220 6279 7465 2d73 6176 -buffer byte-sav │ │ │ -00004780: 652d 6375 7272 656e 742d 6275 6666 6572 e-current-buffer │ │ │ -00004790: 2062 7974 652d 6d65 6d71 2062 7974 652d byte-memq byte- │ │ │ -000047a0: 696e 7465 7261 6374 6976 652d 7020 6279 interactive-p by │ │ │ -000047b0: 7465 2d66 6f72 7761 7264 2d63 6861 7220 te-forward-char │ │ │ -000047c0: 6279 7465 2d66 6f72 7761 7264 2d77 6f72 byte-forward-wor │ │ │ -000047d0: 6420 6279 7465 2d73 6b69 702d 6368 6172 d byte-skip-char │ │ │ -000047e0: 732d 666f 7277 6172 6420 6279 7465 2d73 s-forward byte-s │ │ │ -000047f0: 6b69 702d 6368 6172 732d 6261 636b 7761 kip-chars-backwa │ │ │ -00004800: 7264 2062 7974 652d 666f 7277 6172 642d rd byte-forward- │ │ │ -00004810: 6c69 6e65 2062 7974 652d 6368 6172 2d73 line byte-char-s │ │ │ -00004820: 796e 7461 7820 6279 7465 2d62 7566 6665 yntax byte-buffe │ │ │ -00004830: 722d 7375 6273 7472 696e 6720 6279 7465 r-substring byte │ │ │ -00004840: 2d64 656c 6574 652d 7265 6769 6f6e 2062 -delete-region b │ │ │ -00004850: 7974 652d 6e61 7272 6f77 2d74 6f2d 7265 yte-narrow-to-re │ │ │ -00004860: 6769 6f6e 2062 7974 652d 7769 6465 6e20 gion byte-widen │ │ │ -00004870: 6279 7465 2d65 6e64 2d6f 662d 6c69 6e65 byte-end-of-line │ │ │ -00004880: 206e 696c 2062 7974 652d 636f 6e73 7461 nil byte-consta │ │ │ -00004890: 6e74 3220 6279 7465 2d67 6f74 6f20 6279 nt2 byte-goto by │ │ │ -000048a0: 7465 2d67 6f74 6f2d 6966 2d6e 696c 2062 te-goto-if-nil b │ │ │ -000048b0: 7974 652d 676f 746f 2d69 662d 6e6f 742d yte-goto-if-not- │ │ │ -000048c0: 6e69 6c20 6279 7465 2d67 6f74 6f2d 6966 nil byte-goto-if │ │ │ -000048d0: 2d6e 696c 2d65 6c73 652d 706f 7020 6279 -nil-else-pop by │ │ │ -000048e0: 7465 2d67 6f74 6f2d 6966 2d6e 6f74 2d6e te-goto-if-not-n │ │ │ -000048f0: 696c 2d65 6c73 652d 706f 7020 6279 7465 il-else-pop byte │ │ │ -00004900: 2d72 6574 7572 6e20 6279 7465 2d64 6973 -return byte-dis │ │ │ -00004910: 6361 7264 2062 7974 652d 6475 7020 6279 card byte-dup by │ │ │ -00004920: 7465 2d73 6176 652d 6578 6375 7273 696f te-save-excursio │ │ │ -00004930: 6e20 6279 7465 2d73 6176 652d 7769 6e64 n byte-save-wind │ │ │ -00004940: 6f77 2d65 7863 7572 7369 6f6e 2062 7974 ow-excursion byt │ │ │ -00004950: 652d 7361 7665 2d72 6573 7472 6963 7469 e-save-restricti │ │ │ -00004960: 6f6e 2062 7974 652d 6361 7463 6820 6279 on byte-catch by │ │ │ -00004970: 7465 2d75 6e77 696e 642d 7072 6f74 6563 te-unwind-protec │ │ │ -00004980: 7420 6279 7465 2d63 6f6e 6469 7469 6f6e t byte-condition │ │ │ -00004990: 2d63 6173 6520 6279 7465 2d74 656d 702d -case byte-temp- │ │ │ -000049a0: 6f75 7470 7574 2d62 7566 6665 722d 7365 output-buffer-se │ │ │ -000049b0: 7475 7020 6279 7465 2d74 656d 702d 6f75 tup byte-temp-ou │ │ │ -000049c0: 7470 7574 2d62 7566 6665 722d 7368 6f77 tput-buffer-show │ │ │ -000049d0: 2062 7974 652d 756e 6269 6e64 2d61 6c6c byte-unbind-all │ │ │ -000049e0: 2062 7974 652d 7365 742d 6d61 726b 6572 byte-set-marker │ │ │ -000049f0: 2062 7974 652d 6d61 7463 682d 6265 6769 byte-match-begi │ │ │ -00004a00: 6e6e 696e 6720 6279 7465 2d6d 6174 6368 nning byte-match │ │ │ -00004a10: 2d65 6e64 2062 7974 652d 7570 6361 7365 -end byte-upcase │ │ │ -00004a20: 2062 7974 652d 646f 776e 6361 7365 2062 byte-downcase b │ │ │ -00004a30: 7974 652d 7374 7269 6e67 3d20 6279 7465 yte-string= byte │ │ │ -00004a40: 2d73 7472 696e 673c 2062 7974 652d 6f6c -string< byte-ol │ │ │ -00004a50: 642d 6571 7561 6c20 6279 7465 2d6e 7468 d-equal byte-nth │ │ │ -00004a60: 6364 7220 6279 7465 2d65 6c74 2062 7974 cdr byte-elt byt │ │ │ -00004a70: 652d 6f6c 642d 6d65 6d62 6572 2062 7974 e-old-member byt │ │ │ -00004a80: 652d 6f6c 642d 6173 7371 2062 7974 652d e-old-assq byte- │ │ │ -00004a90: 6e72 6576 6572 7365 2062 7974 652d 7365 nreverse byte-se │ │ │ -00004aa0: 7463 6172 2062 7974 652d 7365 7463 6472 tcar byte-setcdr │ │ │ -00004ab0: 2062 7974 652d 6361 722d 7361 6665 2062 byte-car-safe b │ │ │ -00004ac0: 7974 652d 6364 722d 7361 6665 2062 7974 yte-cdr-safe byt │ │ │ -00004ad0: 652d 6e63 6f6e 6320 6279 7465 2d71 756f e-nconc byte-quo │ │ │ -00004ae0: 2062 7974 652d 7265 6d20 6279 7465 2d6e byte-rem byte-n │ │ │ -00004af0: 756d 6265 7270 2062 7974 652d 696e 7465 umberp byte-inte │ │ │ -00004b00: 6765 7270 206e 696c 2062 7974 652d 7265 gerp nil byte-re │ │ │ -00004b10: 6c2d 676f 746f 2062 7974 652d 7265 6c2d l-goto byte-rel- │ │ │ -00004b20: 676f 746f 2d69 662d 6e69 6c20 6279 7465 goto-if-nil byte │ │ │ -00004b30: 2d72 656c 2d67 6f74 6f2d 6966 2d6e 6f74 -rel-goto-if-not │ │ │ -00004b40: 2d6e 696c 2062 7974 652d 7265 6c2d 676f -nil byte-rel-go │ │ │ -00004b50: 746f 2d69 662d 6e69 6c2d 656c 7365 2d70 to-if-nil-else-p │ │ │ -00004b60: 6f70 2062 7974 652d 7265 6c2d 676f 746f op byte-rel-goto │ │ │ -00004b70: 2d69 662d 6e6f 742d 6e69 6c2d 656c 7365 -if-not-nil-else │ │ │ -00004b80: 2d70 6f70 2062 7974 652d 6c69 7374 4e20 -pop byte-listN │ │ │ -00004b90: 6279 7465 2d63 6f6e 6361 744e 2062 7974 byte-concatN byt │ │ │ -00004ba0: 652d 696e 7365 7274 4e20 6e69 6c20 6e69 e-insertN nil ni │ │ │ -00004bb0: 6c20 6e69 6c20 6e69 6c20 6279 7465 2d6d l nil nil byte-m │ │ │ -00004bc0: 656d 6265 7220 6279 7465 2d61 7373 7120 ember byte-assq │ │ │ +000044b0: 6e69 6c20 6279 7465 2d6e 7468 2062 7974 nil byte-nth byt │ │ │ +000044c0: 652d 7379 6d62 6f6c 7020 6279 7465 2d63 e-symbolp byte-c │ │ │ +000044d0: 6f6e 7370 2062 7974 652d 7374 7269 6e67 onsp byte-string │ │ │ +000044e0: 7020 6279 7465 2d6c 6973 7470 2062 7974 p byte-listp byt │ │ │ +000044f0: 652d 6f6c 642d 6571 2062 7974 652d 6f6c e-old-eq byte-ol │ │ │ +00004500: 642d 6d65 6d71 2062 7974 652d 6e6f 7420 d-memq byte-not │ │ │ +00004510: 6279 7465 2d63 6172 2062 7974 652d 6364 byte-car byte-cd │ │ │ +00004520: 7220 6279 7465 2d63 6f6e 7320 6279 7465 r byte-cons byte │ │ │ +00004530: 2d6c 6973 7431 2062 7974 652d 6c69 7374 -list1 byte-list │ │ │ +00004540: 3220 6279 7465 2d6c 6973 7433 2062 7974 2 byte-list3 byt │ │ │ +00004550: 652d 6c69 7374 3420 6279 7465 2d6c 656e e-list4 byte-len │ │ │ +00004560: 6774 6820 6279 7465 2d61 7265 6620 6279 gth byte-aref by │ │ │ +00004570: 7465 2d61 7365 7420 6279 7465 2d73 796d te-aset byte-sym │ │ │ +00004580: 626f 6c2d 7661 6c75 6520 6279 7465 2d73 bol-value byte-s │ │ │ +00004590: 796d 626f 6c2d 6675 6e63 7469 6f6e 2062 ymbol-function b │ │ │ +000045a0: 7974 652d 7365 7420 6279 7465 2d66 7365 yte-set byte-fse │ │ │ +000045b0: 7420 6279 7465 2d67 6574 2062 7974 652d t byte-get byte- │ │ │ +000045c0: 7375 6273 7472 696e 6720 6279 7465 2d63 substring byte-c │ │ │ +000045d0: 6f6e 6361 7432 2062 7974 652d 636f 6e63 oncat2 byte-conc │ │ │ +000045e0: 6174 3320 6279 7465 2d63 6f6e 6361 7434 at3 byte-concat4 │ │ │ +000045f0: 2062 7974 652d 7375 6231 2062 7974 652d byte-sub1 byte- │ │ │ +00004600: 6164 6431 2062 7974 652d 6571 6c73 6967 add1 byte-eqlsig │ │ │ +00004610: 6e20 6279 7465 2d67 7472 2062 7974 652d n byte-gtr byte- │ │ │ +00004620: 6c73 7320 6279 7465 2d6c 6571 2062 7974 lss byte-leq byt │ │ │ +00004630: 652d 6765 7120 6279 7465 2d64 6966 6620 e-geq byte-diff │ │ │ +00004640: 6279 7465 2d6e 6567 6174 6520 6279 7465 byte-negate byte │ │ │ +00004650: 2d70 6c75 7320 6279 7465 2d6d 6178 2062 -plus byte-max b │ │ │ +00004660: 7974 652d 6d69 6e20 6279 7465 2d6d 756c yte-min byte-mul │ │ │ +00004670: 7420 6279 7465 2d70 6f69 6e74 2062 7974 t byte-point byt │ │ │ +00004680: 652d 6571 2062 7974 652d 676f 746f 2d63 e-eq byte-goto-c │ │ │ +00004690: 6861 7220 6279 7465 2d69 6e73 6572 7420 har byte-insert │ │ │ +000046a0: 6279 7465 2d70 6f69 6e74 2d6d 6178 2062 byte-point-max b │ │ │ +000046b0: 7974 652d 706f 696e 742d 6d69 6e20 6279 yte-point-min by │ │ │ +000046c0: 7465 2d63 6861 722d 6166 7465 7220 6279 te-char-after by │ │ │ +000046d0: 7465 2d66 6f6c 6c6f 7769 6e67 2d63 6861 te-following-cha │ │ │ +000046e0: 7220 6279 7465 2d70 7265 6365 6469 6e67 r byte-preceding │ │ │ +000046f0: 2d63 6861 7220 6279 7465 2d63 7572 7265 -char byte-curre │ │ │ +00004700: 6e74 2d63 6f6c 756d 6e20 6279 7465 2d69 nt-column byte-i │ │ │ +00004710: 6e64 656e 742d 746f 2062 7974 652d 6571 ndent-to byte-eq │ │ │ +00004720: 7561 6c20 6279 7465 2d65 6f6c 7020 6279 ual byte-eolp by │ │ │ +00004730: 7465 2d65 6f62 7020 6279 7465 2d62 6f6c te-eobp byte-bol │ │ │ +00004740: 7020 6279 7465 2d62 6f62 7020 6279 7465 p byte-bobp byte │ │ │ +00004750: 2d63 7572 7265 6e74 2d62 7566 6665 7220 -current-buffer │ │ │ +00004760: 6279 7465 2d73 6574 2d62 7566 6665 7220 byte-set-buffer │ │ │ +00004770: 6279 7465 2d73 6176 652d 6375 7272 656e byte-save-curren │ │ │ +00004780: 742d 6275 6666 6572 2062 7974 652d 6d65 t-buffer byte-me │ │ │ +00004790: 6d71 2062 7974 652d 696e 7465 7261 6374 mq byte-interact │ │ │ +000047a0: 6976 652d 7020 6279 7465 2d66 6f72 7761 ive-p byte-forwa │ │ │ +000047b0: 7264 2d63 6861 7220 6279 7465 2d66 6f72 rd-char byte-for │ │ │ +000047c0: 7761 7264 2d77 6f72 6420 6279 7465 2d73 ward-word byte-s │ │ │ +000047d0: 6b69 702d 6368 6172 732d 666f 7277 6172 kip-chars-forwar │ │ │ +000047e0: 6420 6279 7465 2d73 6b69 702d 6368 6172 d byte-skip-char │ │ │ +000047f0: 732d 6261 636b 7761 7264 2062 7974 652d s-backward byte- │ │ │ +00004800: 666f 7277 6172 642d 6c69 6e65 2062 7974 forward-line byt │ │ │ +00004810: 652d 6368 6172 2d73 796e 7461 7820 6279 e-char-syntax by │ │ │ +00004820: 7465 2d62 7566 6665 722d 7375 6273 7472 te-buffer-substr │ │ │ +00004830: 696e 6720 6279 7465 2d64 656c 6574 652d ing byte-delete- │ │ │ +00004840: 7265 6769 6f6e 2062 7974 652d 6e61 7272 region byte-narr │ │ │ +00004850: 6f77 2d74 6f2d 7265 6769 6f6e 2062 7974 ow-to-region byt │ │ │ +00004860: 652d 7769 6465 6e20 6279 7465 2d65 6e64 e-widen byte-end │ │ │ +00004870: 2d6f 662d 6c69 6e65 206e 696c 2062 7974 -of-line nil byt │ │ │ +00004880: 652d 636f 6e73 7461 6e74 3220 6279 7465 e-constant2 byte │ │ │ +00004890: 2d67 6f74 6f20 6279 7465 2d67 6f74 6f2d -goto byte-goto- │ │ │ +000048a0: 6966 2d6e 696c 2062 7974 652d 676f 746f if-nil byte-goto │ │ │ +000048b0: 2d69 662d 6e6f 742d 6e69 6c20 6279 7465 -if-not-nil byte │ │ │ +000048c0: 2d67 6f74 6f2d 6966 2d6e 696c 2d65 6c73 -goto-if-nil-els │ │ │ +000048d0: 652d 706f 7020 6279 7465 2d67 6f74 6f2d e-pop byte-goto- │ │ │ +000048e0: 6966 2d6e 6f74 2d6e 696c 2d65 6c73 652d if-not-nil-else- │ │ │ +000048f0: 706f 7020 6279 7465 2d72 6574 7572 6e20 pop byte-return │ │ │ +00004900: 6279 7465 2d64 6973 6361 7264 2062 7974 byte-discard byt │ │ │ +00004910: 652d 6475 7020 6279 7465 2d73 6176 652d e-dup byte-save- │ │ │ +00004920: 6578 6375 7273 696f 6e20 6279 7465 2d73 excursion byte-s │ │ │ +00004930: 6176 652d 7769 6e64 6f77 2d65 7863 7572 ave-window-excur │ │ │ +00004940: 7369 6f6e 2062 7974 652d 7361 7665 2d72 sion byte-save-r │ │ │ +00004950: 6573 7472 6963 7469 6f6e 2062 7974 652d estriction byte- │ │ │ +00004960: 6361 7463 6820 6279 7465 2d75 6e77 696e catch byte-unwin │ │ │ +00004970: 642d 7072 6f74 6563 7420 6279 7465 2d63 d-protect byte-c │ │ │ +00004980: 6f6e 6469 7469 6f6e 2d63 6173 6520 6279 ondition-case by │ │ │ +00004990: 7465 2d74 656d 702d 6f75 7470 7574 2d62 te-temp-output-b │ │ │ +000049a0: 7566 6665 722d 7365 7475 7020 6279 7465 uffer-setup byte │ │ │ +000049b0: 2d74 656d 702d 6f75 7470 7574 2d62 7566 -temp-output-buf │ │ │ +000049c0: 6665 722d 7368 6f77 2062 7974 652d 756e fer-show byte-un │ │ │ +000049d0: 6269 6e64 2d61 6c6c 2062 7974 652d 7365 bind-all byte-se │ │ │ +000049e0: 742d 6d61 726b 6572 2062 7974 652d 6d61 t-marker byte-ma │ │ │ +000049f0: 7463 682d 6265 6769 6e6e 696e 6720 6279 tch-beginning by │ │ │ +00004a00: 7465 2d6d 6174 6368 2d65 6e64 2062 7974 te-match-end byt │ │ │ +00004a10: 652d 7570 6361 7365 2062 7974 652d 646f e-upcase byte-do │ │ │ +00004a20: 776e 6361 7365 2062 7974 652d 7374 7269 wncase byte-stri │ │ │ +00004a30: 6e67 3d20 6279 7465 2d73 7472 696e 673c ng= byte-string< │ │ │ +00004a40: 2062 7974 652d 6f6c 642d 6571 7561 6c20 byte-old-equal │ │ │ +00004a50: 6279 7465 2d6e 7468 6364 7220 6279 7465 byte-nthcdr byte │ │ │ +00004a60: 2d65 6c74 2062 7974 652d 6f6c 642d 6d65 -elt byte-old-me │ │ │ +00004a70: 6d62 6572 2062 7974 652d 6f6c 642d 6173 mber byte-old-as │ │ │ +00004a80: 7371 2062 7974 652d 6e72 6576 6572 7365 sq byte-nreverse │ │ │ +00004a90: 2062 7974 652d 7365 7463 6172 2062 7974 byte-setcar byt │ │ │ +00004aa0: 652d 7365 7463 6472 2062 7974 652d 6361 e-setcdr byte-ca │ │ │ +00004ab0: 722d 7361 6665 2062 7974 652d 6364 722d r-safe byte-cdr- │ │ │ +00004ac0: 7361 6665 2062 7974 652d 6e63 6f6e 6320 safe byte-nconc │ │ │ +00004ad0: 6279 7465 2d71 756f 2062 7974 652d 7265 byte-quo byte-re │ │ │ +00004ae0: 6d20 6279 7465 2d6e 756d 6265 7270 2062 m byte-numberp b │ │ │ +00004af0: 7974 652d 696e 7465 6765 7270 206e 696c yte-integerp nil │ │ │ +00004b00: 2062 7974 652d 7265 6c2d 676f 746f 2062 byte-rel-goto b │ │ │ +00004b10: 7974 652d 7265 6c2d 676f 746f 2d69 662d yte-rel-goto-if- │ │ │ +00004b20: 6e69 6c20 6279 7465 2d72 656c 2d67 6f74 nil byte-rel-got │ │ │ +00004b30: 6f2d 6966 2d6e 6f74 2d6e 696c 2062 7974 o-if-not-nil byt │ │ │ +00004b40: 652d 7265 6c2d 676f 746f 2d69 662d 6e69 e-rel-goto-if-ni │ │ │ +00004b50: 6c2d 656c 7365 2d70 6f70 2062 7974 652d l-else-pop byte- │ │ │ +00004b60: 7265 6c2d 676f 746f 2d69 662d 6e6f 742d rel-goto-if-not- │ │ │ +00004b70: 6e69 6c2d 656c 7365 2d70 6f70 2062 7974 nil-else-pop byt │ │ │ +00004b80: 652d 6c69 7374 4e20 6279 7465 2d63 6f6e e-listN byte-con │ │ │ +00004b90: 6361 744e 2062 7974 652d 696e 7365 7274 catN byte-insert │ │ │ +00004ba0: 4e20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 N nil nil nil ni │ │ │ +00004bb0: 6c20 6279 7465 2d6d 656d 6265 7220 6279 l byte-member by │ │ │ +00004bc0: 7465 2d61 7373 7120 6e69 6c20 6e69 6c20 te-assq nil nil │ │ │ 00004bd0: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ -00004be0: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ -00004bf0: 6279 7465 2d63 6f6e 7374 616e 7420 6e69 byte-constant ni │ │ │ +00004be0: 6e69 6c20 6e69 6c20 6279 7465 2d63 6f6e nil nil byte-con │ │ │ +00004bf0: 7374 616e 7420 6e69 6c20 6e69 6c20 6e69 stant nil nil ni │ │ │ 00004c00: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004c10: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004c20: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004c30: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004c40: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004c50: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004c60: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ @@ -1225,4587 +1225,4587 @@ │ │ │ 00004c80: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004c90: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004ca0: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004cb0: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004cc0: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004cd0: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ 00004ce0: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ -00004cf0: 6c20 6e69 6c20 6e69 6c5d 205b 6e69 6c20 l nil nil] [nil │ │ │ +00004cf0: 6c5d 205b 6e69 6c20 6e69 6c20 6e69 6c20 l] [nil nil nil │ │ │ 00004d00: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ -00004d10: 6e69 6c20 6e69 6c20 6e69 6c20 3120 6e69 nil nil nil 1 ni │ │ │ +00004d10: 6e69 6c20 3120 6e69 6c20 6e69 6c20 6e69 nil 1 nil nil ni │ │ │ 00004d20: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ -00004d30: 6c20 6e69 6c20 6e69 6c20 2d31 206e 696c l nil nil -1 nil │ │ │ +00004d30: 6c20 2d31 206e 696c 206e 696c 206e 696c l -1 nil nil nil │ │ │ 00004d40: 206e 696c 206e 696c 206e 696c 206e 696c nil nil nil nil │ │ │ -00004d50: 206e 696c 206e 696c 202d 3120 6e69 6c20 nil nil -1 nil │ │ │ +00004d50: 202d 3120 6e69 6c20 6e69 6c20 6e69 6c20 -1 nil nil nil │ │ │ 00004d60: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ -00004d70: 6e69 6c20 6e69 6c20 3020 6e69 6c20 6e69 nil nil 0 nil ni │ │ │ -00004d80: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 6e69 l nil nil nil ni │ │ │ -00004d90: 6c20 6e69 6c20 3020 6e69 6c20 6e69 6c20 l nil 0 nil nil │ │ │ +00004d70: 3020 6e69 6c20 6e69 6c20 6e69 6c20 6e69 0 nil nil nil ni │ │ │ +00004d80: 6c20 6e69 6c20 6e69 6c20 6e69 6c20 3020 l nil nil nil 0 │ │ │ +00004d90: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ 00004da0: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ 00004db0: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ -00004dc0: 6e69 6c20 6e69 6c20 6e69 6c20 6e69 6c20 nil nil nil nil │ │ │ -00004dd0: 6e69 6c20 2d31 2030 2030 2030 2030 202d nil -1 0 0 0 0 - │ │ │ -00004de0: 3120 2d31 2030 2030 2030 202d 3120 3020 1 -1 0 0 0 -1 0 │ │ │ -00004df0: 2d31 202d 3220 2d33 2030 202d 3120 2d32 -1 -2 -3 0 -1 -2 │ │ │ -00004e00: 2030 2030 202d 3120 2d31 202d 3120 2d32 0 0 -1 -1 -1 -2 │ │ │ -00004e10: 202d 3120 2d32 202d 3320 3020 3020 2d31 -1 -2 -3 0 0 -1 │ │ │ -00004e20: 202d 3120 2d31 202d 3120 2d31 202d 3120 -1 -1 -1 -1 -1 │ │ │ -00004e30: 3020 2d31 202d 3120 2d31 202d 3120 3120 0 -1 -1 -1 -1 1 │ │ │ -00004e40: 2d31 2030 2030 2031 2031 2030 2031 2031 -1 0 0 1 1 0 1 1 │ │ │ -00004e50: 2031 2030 202d 3120 3120 3120 3120 3120 1 0 -1 1 1 1 1 │ │ │ -00004e60: 3120 3020 3020 2d31 2031 2030 2030 202d 1 0 0 -1 1 0 0 - │ │ │ -00004e70: 3120 2d31 2030 2030 202d 3120 2d31 202d 1 -1 0 0 -1 -1 - │ │ │ -00004e80: 3120 3120 3020 6e69 6c20 3120 3020 2d31 1 1 0 nil 1 0 -1 │ │ │ -00004e90: 202d 3120 2d31 202d 3120 2d31 202d 3120 -1 -1 -1 -1 -1 │ │ │ -00004ea0: 3120 3020 3020 3020 2d31 202d 3120 2d32 1 0 0 0 -1 -1 -2 │ │ │ -00004eb0: 2030 202d 3120 3020 2d32 2030 2030 2030 0 -1 0 -2 0 0 0 │ │ │ -00004ec0: 2030 202d 3120 2d31 202d 3120 2d31 202d 0 -1 -1 -1 -1 - │ │ │ -00004ed0: 3120 2d31 202d 3120 3020 2d31 202d 3120 1 -1 -1 0 -1 -1 │ │ │ -00004ee0: 3020 3020 2d31 202d 3120 2d31 2030 2030 0 0 -1 -1 -1 0 0 │ │ │ -00004ef0: 206e 696c 2030 202d 3120 2d31 202d 3120 nil 0 -1 -1 -1 │ │ │ -00004f00: 2d31 206e 696c 206e 696c 206e 696c 206e -1 nil nil nil n │ │ │ -00004f10: 696c 206e 696c 206e 696c 206e 696c 202d il nil nil nil - │ │ │ -00004f20: 3120 2d31 206e 696c 206e 696c 206e 696c 1 -1 nil nil nil │ │ │ -00004f30: 206e 696c 206e 696c 206e 696c 206e 696c nil nil nil nil │ │ │ -00004f40: 206e 696c 2031 206e 696c 206e 696c 206e nil 1 nil nil n │ │ │ +00004dc0: 6e69 6c20 6e69 6c20 6e69 6c20 2d31 2030 nil nil nil -1 0 │ │ │ +00004dd0: 2030 2030 2030 202d 3120 2d31 2030 2030 0 0 0 -1 -1 0 0 │ │ │ +00004de0: 2030 202d 3120 3020 2d31 202d 3220 2d33 0 -1 0 -1 -2 -3 │ │ │ +00004df0: 2030 202d 3120 2d32 2030 2030 202d 3120 0 -1 -2 0 0 -1 │ │ │ +00004e00: 2d31 202d 3120 2d32 202d 3120 2d32 202d -1 -1 -2 -1 -2 - │ │ │ +00004e10: 3320 3020 3020 2d31 202d 3120 2d31 202d 3 0 0 -1 -1 -1 - │ │ │ +00004e20: 3120 2d31 202d 3120 3020 2d31 202d 3120 1 -1 -1 0 -1 -1 │ │ │ +00004e30: 2d31 202d 3120 3120 2d31 2030 2030 2031 -1 -1 1 -1 0 0 1 │ │ │ +00004e40: 2031 2030 2031 2031 2031 2030 202d 3120 1 0 1 1 1 0 -1 │ │ │ +00004e50: 3120 3120 3120 3120 3120 3020 3020 2d31 1 1 1 1 1 0 0 -1 │ │ │ +00004e60: 2031 2030 2030 202d 3120 2d31 2030 2030 1 0 0 -1 -1 0 0 │ │ │ +00004e70: 202d 3120 2d31 202d 3120 3120 3020 6e69 -1 -1 -1 1 0 ni │ │ │ +00004e80: 6c20 3120 3020 2d31 202d 3120 2d31 202d l 1 0 -1 -1 -1 - │ │ │ +00004e90: 3120 2d31 202d 3120 3120 3020 3020 3020 1 -1 -1 1 0 0 0 │ │ │ +00004ea0: 2d31 202d 3120 2d32 2030 202d 3120 3020 -1 -1 -2 0 -1 0 │ │ │ +00004eb0: 2d32 2030 2030 2030 2030 202d 3120 2d31 -2 0 0 0 0 -1 -1 │ │ │ +00004ec0: 202d 3120 2d31 202d 3120 2d31 202d 3120 -1 -1 -1 -1 -1 │ │ │ +00004ed0: 3020 2d31 202d 3120 3020 3020 2d31 202d 0 -1 -1 0 0 -1 - │ │ │ +00004ee0: 3120 2d31 2030 2030 206e 696c 2030 202d 1 -1 0 0 nil 0 - │ │ │ +00004ef0: 3120 2d31 202d 3120 2d31 206e 696c 206e 1 -1 -1 -1 nil n │ │ │ +00004f00: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ +00004f10: 696c 206e 696c 202d 3120 2d31 206e 696c il nil -1 -1 nil │ │ │ +00004f20: 206e 696c 206e 696c 206e 696c 206e 696c nil nil nil nil │ │ │ +00004f30: 206e 696c 206e 696c 206e 696c 2031 206e nil nil nil 1 n │ │ │ +00004f40: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004f50: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004f60: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004f70: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004f80: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004f90: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004fa0: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004fb0: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004fc0: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004fd0: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004fe0: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00004ff0: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00005000: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00005010: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ 00005020: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ -00005030: 696c 206e 696c 206e 696c 206e 696c 206e il nil nil nil n │ │ │ -00005040: 696c 5d20 6e69 6c5d 2031 290a 2340 3537 il] nil] 1).#@57 │ │ │ -00005050: 2054 7572 6e73 206c 6170 636f 6465 2069 Turns lapcode i │ │ │ -00005060: 6e74 6f20 6279 7465 636f 6465 2e20 2054 nto bytecode. T │ │ │ -00005070: 6865 206c 6170 636f 6465 2069 7320 6465 he lapcode is de │ │ │ -00005080: 7374 726f 7965 642e 1f0a 2864 6566 616c stroyed...(defal │ │ │ -00005090: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ -000050a0: 652d 6c61 7063 6f64 6520 235b 286c 6170 e-lapcode #[(lap │ │ │ -000050b0: 2920 22c6 c789 8989 8989 891e 171e 1918 ) "............. │ │ │ -000050c0: 191c 1d1a 1b0e 1883 e600 0e18 4040 120e ............@@.. │ │ │ -000050d0: 1840 4115 5c6e 39ac 88c8 c95c 6e5c 2288 .@A.\n9....\n\". │ │ │ -000050e0: 82dd 005c 6eca 61ab 8b0d 0ba0 880d 0942 ...\n.a........B │ │ │ -000050f0: 1182 dd00 5c6e 0e1a 73ab 970b cb5c 5c89 ....\n..s....\\. │ │ │ -00005100: 130d 4142 c75c 6e4a 0c42 4242 8914 0942 ..AB.\nJ.BBB...B │ │ │ -00005110: 1182 dd00 0d3a abad 0d41 155c 6ecc 61ab .....:...A.\n.a. │ │ │ -00005120: a50d 0e1b 57ab 8b0b 5413 0e0c 0d5c 5c0c ....W...T....\\. │ │ │ -00005130: 42aa e50b cb5c 5c13 cd0d ce5c 22cf 0dd0 B....\\....\"... │ │ │ -00005140: 5c22 0e1c 0c42 4242 aad1 0e1d 5c6e 4a58 \"...BBB....\nJX │ │ │ -00005150: ab93 5c6e 4a0e 1e58 ab8c 0bd1 5c5c 130d ..\nJ..X....\\.. │ │ │ -00005160: 5c6e 4a0c 4242 aab7 0dd2 57ab 8b0b 5413 \nJ.BB....W...T. │ │ │ -00005170: 5c6e 4a0d 5c5c 0c42 aaa7 0dd3 57ab 8e0b \nJ.\\.B....W... │ │ │ -00005180: d15c 5c13 0d5c 6e4a d25c 5c0c 4242 aa94 .\\..\nJ.\\.BB.. │ │ │ -00005190: 0bcb 5c5c 13cd 0dce 5c22 cf0d d05c 225c ..\\....\"...\"\ │ │ │ -000051a0: 6e4a d45c 5c0c 4242 4214 0e18 4189 1618 nJ.\\.BBB...A... │ │ │ -000051b0: 8417 0009 9f11 c615 0989 10ab d308 4089 ..............@. │ │ │ -000051c0: 1617 403a abbc 0e17 4140 3f0e 1740 1617 ..@:....A@?..@.. │ │ │ -000051d0: abb0 0e17 4140 0e17 405a 1619 d50e 1958 ....A@..@Z.....X │ │ │ -000051e0: aba0 0e19 d657 ab9a 0840 0840 4141 a188 .....W...@.@AA.. │ │ │ -000051f0: 0840 4108 4041 400e 1f0e 205a 5c5c a088 .@A.@A@... Z\\.. │ │ │ -00005200: 0d53 150e 1789 400d 5c5c a088 0841 8910 .S....@.\\...A.. │ │ │ -00005210: ac2d 0e21 ab85 0dc6 55ab 1dc7 1c09 abb6 .-.!....U....... │ │ │ -00005220: 0940 8914 403a aba8 0c41 40ab 8f0c 8940 .@..@:...A@....@ │ │ │ -00005230: 4140 0c40 405a d65c 5ca0 88aa 940c 4041 A@.@@Z.\\.....@A │ │ │ -00005240: 4013 0c41 cf0b d05c 22a0 880c cd0b ce5c @..A...\"......\ │ │ │ -00005250: 22a0 8809 4189 11ac 4a29 0c9f b001 2e08 "...A...J)...... │ │ │ -00005260: 8722 205b 7265 7374 2070 6174 6368 6c69 ." [rest patchli │ │ │ -00005270: 7374 206f 7020 7063 2062 7974 6573 206f st op pc bytes o │ │ │ -00005280: 6666 2030 206e 696c 2065 7272 6f72 2022 ff 0 nil error " │ │ │ -00005290: 4e6f 6e2d 7379 6d62 6f6c 6963 206f 7063 Non-symbolic opc │ │ │ -000052a0: 6f64 6520 6025 7327 2220 5441 4720 3320 ode `%s'" TAG 3 │ │ │ -000052b0: 6279 7465 2d63 6f6e 7374 616e 7420 6c73 byte-constant ls │ │ │ -000052c0: 6820 2d38 206c 6f67 616e 6420 3235 3520 h -8 logand 255 │ │ │ -000052d0: 3220 3620 3235 3620 3720 2d31 3239 2031 2 6 256 7 -129 1 │ │ │ -000052e0: 3238 2074 6d70 206c 6170 2072 656c 2062 28 tmp lap rel b │ │ │ -000052f0: 7974 652d 676f 746f 2d6f 7073 2062 7974 yte-goto-ops byt │ │ │ -00005300: 652d 636f 6e73 7461 6e74 2d6c 696d 6974 e-constant-limit │ │ │ -00005310: 2062 7974 652d 636f 6e73 7461 6e74 3220 byte-constant2 │ │ │ -00005320: 6279 7465 2d6c 6973 744e 2062 7974 652d byte-listN byte- │ │ │ -00005330: 696e 7365 7274 4e20 6279 7465 2d72 656c insertN byte-rel │ │ │ -00005340: 2d67 6f74 6f20 6279 7465 2d67 6f74 6f20 -goto byte-goto │ │ │ -00005350: 6279 7465 2d6f 7074 696d 697a 655d 2039 byte-optimize] 9 │ │ │ -00005360: 2028 2324 202e 2032 3035 3631 295d 290a (#$ . 20561)]). │ │ │ -00005370: 2862 7974 652d 636f 6465 2022 c108 4210 (byte-code "..B. │ │ │ -00005380: c2c1 21ac 85c3 c1c4 5c22 88c5 0842 10c2 ..!.....\"...B.. │ │ │ -00005390: c521 ac85 c3c5 c45c 2288 c608 4210 c2c6 .!.....\"...B... │ │ │ -000053a0: 21ac 85c3 c6c4 5c22 88c4 8722 205b 6375 !.....\"..." [cu │ │ │ -000053b0: 7272 656e 742d 6c6f 6164 2d6c 6973 7420 rrent-load-list │ │ │ -000053c0: 6279 7465 2d63 6f6d 7069 6c65 2d63 7572 byte-compile-cur │ │ │ -000053d0: 7265 6e74 2d66 6f72 6d20 6465 6661 756c rent-form defaul │ │ │ -000053e0: 742d 626f 756e 6470 2073 6574 2d64 6566 t-boundp set-def │ │ │ -000053f0: 6175 6c74 206e 696c 2062 7974 652d 636f ault nil byte-co │ │ │ -00005400: 6d70 696c 652d 6375 7272 656e 742d 6669 mpile-current-fi │ │ │ -00005410: 6c65 2062 7974 652d 636f 6d70 696c 652d le byte-compile- │ │ │ -00005420: 6465 7374 2d66 696c 655d 2033 290a 2864 dest-file] 3).(d │ │ │ -00005430: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ -00005440: 6d70 696c 652d 6c6f 6720 2728 6d61 6372 mpile-log '(macr │ │ │ -00005450: 6f20 2e20 235b 2866 6f72 6d61 742d 7374 o . #[(format-st │ │ │ -00005460: 7269 6e67 2026 7265 7374 2061 7267 7329 ring &rest args) │ │ │ -00005470: 2022 c2c3 c4c5 c6c7 0908 4242 4445 4587 "........BBDEE. │ │ │ -00005480: 2220 5b61 7267 7320 666f 726d 6174 2d73 " [args format-s │ │ │ -00005490: 7472 696e 6720 7768 656e 2028 616e 6420 tring when (and │ │ │ -000054a0: 6279 7465 2d6f 7074 696d 697a 6520 286d byte-optimize (m │ │ │ -000054b0: 656d 7120 6279 7465 2d6f 7074 696d 697a emq byte-optimiz │ │ │ -000054c0: 652d 6c6f 6720 2728 7420 736f 7572 6365 e-log '(t source │ │ │ -000054d0: 2929 2920 6c65 7420 2828 7072 696e 742d ))) let ((print- │ │ │ -000054e0: 6573 6361 7065 2d6e 6577 6c69 6e65 7320 escape-newlines │ │ │ -000054f0: 7429 2028 7072 696e 742d 6c65 7665 6c20 t) (print-level │ │ │ -00005500: 3429 2028 7072 696e 742d 6c65 6e67 7468 4) (print-length │ │ │ -00005510: 2034 2929 2062 7974 652d 636f 6d70 696c 4)) byte-compil │ │ │ -00005520: 652d 6c6f 672d 3120 666f 726d 6174 5d20 e-log-1 format] │ │ │ -00005530: 385d 2929 0a28 6279 7465 2d63 6f64 6520 8])).(byte-code │ │ │ -00005540: 22c0 0942 11c2 10c0 8722 205b 6279 7465 "..B....." [byte │ │ │ -00005550: 2d63 6f6d 7069 6c65 2d6c 6173 742d 7761 -compile-last-wa │ │ │ -00005560: 726e 6564 2d66 6f72 6d20 6375 7272 656e rned-form curren │ │ │ -00005570: 742d 6c6f 6164 2d6c 6973 7420 6e6f 7468 t-load-list noth │ │ │ -00005580: 696e 675d 2032 290a 2864 6566 616c 6961 ing] 2).(defalia │ │ │ -00005590: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ -000055a0: 6c6f 672d 3120 235b 2873 7472 696e 6720 log-1 #[(string │ │ │ -000055b0: 266f 7074 696f 6e61 6c20 6669 6c6c 2920 &optional fill) │ │ │ -000055c0: 2208 ae81 c61b 0dac 860b 0961 3fad 9ac7 "..........a?... │ │ │ -000055d0: c80b 0d3b ab85 c90d 50aa 8dca 0d21 ab87 ...;....P....!.. │ │ │ -000055e0: cbcc 0d21 50aa 81cd 231c 0e1c ab8f 0cab ...!P...#....... │ │ │ -000055f0: 85ce cf0c 5c22 88ce d05c 6e5c 2288 aabe ....\"...\n\"... │ │ │ -00005600: 72d1 d221 7188 6462 880d ab8e 6465 56ab r..!q.db....deV. │ │ │ -00005610: 83d3 6388 d420 d5b1 0288 0cab 850c d5b1 ..c.. .......... │ │ │ -00005620: 0288 d65c 6ed5 b103 880e 1dab 91d7 d55c ...\n..........\ │ │ │ -00005630: 6e5c 22ac 8bd8 d91e 1e1e 1fda db21 882a n\"..........!.* │ │ │ -00005640: 29db 150b 8911 2a87 2220 5b62 7974 652d ).....*." [byte- │ │ │ -00005650: 636f 6d70 696c 652d 6375 7272 656e 742d compile-current- │ │ │ -00005660: 666f 726d 2062 7974 652d 636f 6d70 696c form byte-compil │ │ │ -00005670: 652d 6c61 7374 2d77 6172 6e65 642d 666f e-last-warned-fo │ │ │ -00005680: 726d 2073 7472 696e 6720 7468 6973 2d66 rm string this-f │ │ │ -00005690: 6f72 6d20 7768 696c 652d 636f 6d70 696c orm while-compil │ │ │ -000056a0: 696e 672d 6d73 6720 6279 7465 2d63 6f6d ing-msg byte-com │ │ │ -000056b0: 7069 6c65 2d63 7572 7265 6e74 2d66 696c pile-current-fil │ │ │ -000056c0: 6520 2274 6f70 6c65 7665 6c20 666f 726d e "toplevel form │ │ │ -000056d0: 7322 2066 6f72 6d61 7420 2257 6869 6c65 s" format "While │ │ │ -000056e0: 2063 6f6d 7069 6c69 6e67 2025 7325 733a compiling %s%s: │ │ │ -000056f0: 2220 2220 696e 2066 696c 6520 2220 6275 " " in file " bu │ │ │ -00005700: 6666 6572 7020 2220 696e 2062 7566 6665 fferp " in buffe │ │ │ -00005710: 7220 2220 6275 6666 6572 2d6e 616d 6520 r " buffer-name │ │ │ -00005720: 2222 206d 6573 7361 6765 2022 2573 2220 "" message "%s" │ │ │ -00005730: 2220 2025 7322 2067 6574 2d62 7566 6665 " %s" get-buffe │ │ │ -00005740: 722d 6372 6561 7465 2022 2a43 6f6d 7069 r-create "*Compi │ │ │ -00005750: 6c65 2d4c 6f67 2a22 2022 5c6e 0c5c 6e22 le-Log*" "\n.\n" │ │ │ -00005760: 2063 7572 7265 6e74 2d74 696d 652d 7374 current-time-st │ │ │ -00005770: 7269 6e67 2022 5c6e 2220 2220 2022 2073 ring "\n" " " s │ │ │ -00005780: 7472 696e 672d 6d61 7463 6820 2220 2020 tring-match " │ │ │ -00005790: 2020 2220 3738 2066 696c 6c2d 7061 7261 " 78 fill-para │ │ │ -000057a0: 6772 6170 6820 6e69 6c20 6e6f 6e69 6e74 graph nil nonint │ │ │ -000057b0: 6572 6163 7469 7665 2066 696c 6c20 6669 eractive fill fi │ │ │ -000057c0: 6c6c 2d63 6f6c 756d 6e20 6669 6c6c 2d70 ll-column fill-p │ │ │ -000057d0: 7265 6669 785d 2036 5d29 0a28 6465 6661 refix] 6]).(defa │ │ │ -000057e0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ -000057f0: 6c65 2d6c 6f67 2d66 696c 6520 235b 6e69 le-log-file #[ni │ │ │ -00005800: 6c20 2209 adaf 083f adab 72c2 c321 7188 l "....?..r..!q. │ │ │ -00005810: 6465 56ab 8664 6288 c463 88c5 093b ab85 deV..db..c...;.. │ │ │ -00005820: c609 50aa 85c7 c809 2150 c9ca 20cb b105 ..P.....!P.. ... │ │ │ -00005830: 88cc 8911 2987 2220 5b6e 6f6e 696e 7465 ....)." [noninte │ │ │ -00005840: 7261 6374 6976 6520 6279 7465 2d63 6f6d ractive byte-com │ │ │ -00005850: 7069 6c65 2d63 7572 7265 6e74 2d66 696c pile-current-fil │ │ │ -00005860: 6520 6765 742d 6275 6666 6572 2d63 7265 e get-buffer-cre │ │ │ -00005870: 6174 6520 222a 436f 6d70 696c 652d 4c6f ate "*Compile-Lo │ │ │ -00005880: 672a 2220 225c 6e0c 5c6e 2220 2243 6f6d g*" "\n.\n" "Com │ │ │ -00005890: 7069 6c69 6e67 2022 2022 6669 6c65 2022 piling " "file " │ │ │ -000058a0: 2022 6275 6666 6572 2022 2062 7566 6665 "buffer " buffe │ │ │ -000058b0: 722d 6e61 6d65 2022 2061 7420 2220 6375 r-name " at " cu │ │ │ -000058c0: 7272 656e 742d 7469 6d65 2d73 7472 696e rrent-time-strin │ │ │ -000058d0: 6720 225c 6e22 206e 696c 5d20 355d 290a g "\n" nil] 5]). │ │ │ -000058e0: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -000058f0: 636f 6d70 696c 652d 7761 726e 2023 5b28 compile-warn #[( │ │ │ -00005900: 666f 726d 6174 2026 7265 7374 2061 7267 format &rest arg │ │ │ -00005910: 7329 2022 c4c3 0b5c 6e23 1309 ab85 c5c6 s) "...\n#...... │ │ │ -00005920: 0b5c 2287 c7c8 0b50 c95c 2288 08ae 84ca .\"....P.\"..... │ │ │ -00005930: cb0b 5c22 8722 205b 6e6f 6e69 6e74 6572 ..\"." [noninter │ │ │ -00005940: 6163 7469 7665 2062 7974 652d 636f 6d70 active byte-comp │ │ │ -00005950: 696c 652d 6572 726f 722d 6f6e 2d77 6172 ile-error-on-war │ │ │ -00005960: 6e20 6172 6773 2066 6f72 6d61 7420 6170 n args format ap │ │ │ -00005970: 706c 7920 6572 726f 7220 2225 7322 2062 ply error "%s" b │ │ │ -00005980: 7974 652d 636f 6d70 696c 652d 6c6f 672d yte-compile-log- │ │ │ -00005990: 3120 222a 2a20 2220 7420 6d65 7373 6167 1 "** " t messag │ │ │ -000059a0: 6520 2257 6172 6e69 6e67 3a20 2573 225d e "Warning: %s"] │ │ │ -000059b0: 2034 5d29 0a28 6465 6661 6c69 6173 2027 4]).(defalias ' │ │ │ -000059c0: 6279 7465 2d63 6f6d 7069 6c65 2d72 6570 byte-compile-rep │ │ │ -000059d0: 6f72 742d 6572 726f 7220 235b 2865 7272 ort-error #[(err │ │ │ -000059e0: 6f72 2d69 6e66 6f29 2022 c311 c4c5 c65c or-info) ".....\ │ │ │ -000059f0: 6e41 ab83 c7aa 81c8 5c6e 40c9 4eca 5c6e nA......\n@.N.\n │ │ │ -00005a00: 4121 2350 2188 08ad 84cb ccc3 5c22 8722 A!#P!.......\"." │ │ │ -00005a10: 205b 7374 6163 6b2d 7472 6163 652d 6f6e [stack-trace-on │ │ │ -00005a20: 2d65 7272 6f72 2062 7974 652d 636f 6d70 -error byte-comp │ │ │ -00005a30: 696c 6572 2d65 7272 6f72 2d66 6c61 6720 iler-error-flag │ │ │ -00005a40: 6572 726f 722d 696e 666f 2074 2062 7974 error-info t byt │ │ │ -00005a50: 652d 636f 6d70 696c 652d 6c6f 672d 3120 e-compile-log-1 │ │ │ -00005a60: 2221 2120 2220 666f 726d 6174 2022 2573 "!! " format "%s │ │ │ -00005a70: 2028 2573 2922 2022 2573 2220 6572 726f (%s)" "%s" erro │ │ │ -00005a80: 722d 6d65 7373 6167 6520 7072 696e 312d r-message prin1- │ │ │ -00005a90: 746f 2d73 7472 696e 6720 6261 636b 7472 to-string backtr │ │ │ -00005aa0: 6163 6520 6e69 6c5d 2037 5d29 0a28 6465 ace nil] 7]).(de │ │ │ -00005ab0: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -00005ac0: 7069 6c65 2d6f 6273 6f6c 6574 6520 235b pile-obsolete #[ │ │ │ -00005ad0: 2866 6f72 6d29 2022 0940 c34e 1ac4 0873 (form) ".@.N...s │ │ │ -00005ae0: ab94 c5c6 0940 5c6e 403b ab84 5c6e 40aa .....@\n@;..\n@. │ │ │ -00005af0: 85c7 c85c 6e40 5c22 2388 5c6e 41ae 81c9 ...\n@\"#.\nA... │ │ │ -00005b00: 0921 2987 2220 5b62 7974 652d 636f 6d70 .!)." [byte-comp │ │ │ -00005b10: 696c 652d 7761 726e 696e 6773 2066 6f72 ile-warnings for │ │ │ -00005b20: 6d20 6e65 7720 6279 7465 2d6f 6273 6f6c m new byte-obsol │ │ │ -00005b30: 6574 652d 696e 666f 206f 6273 6f6c 6574 ete-info obsolet │ │ │ -00005b40: 6520 6279 7465 2d63 6f6d 7069 6c65 2d77 e byte-compile-w │ │ │ -00005b50: 6172 6e20 2225 7320 6973 2061 6e20 6f62 arn "%s is an ob │ │ │ -00005b60: 736f 6c65 7465 2066 756e 6374 696f 6e3b solete function; │ │ │ -00005b70: 2025 7322 2066 6f72 6d61 7420 2275 7365 %s" format "use │ │ │ -00005b80: 2025 7320 696e 7374 6561 642e 2220 6279 %s instead." by │ │ │ -00005b90: 7465 2d63 6f6d 7069 6c65 2d6e 6f72 6d61 te-compile-norma │ │ │ -00005ba0: 6c2d 6361 6c6c 5d20 365d 290a 2864 6566 l-call] 6]).(def │ │ │ -00005bb0: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ -00005bc0: 696c 652d 636f 6d70 6174 6962 6c65 2023 ile-compatible # │ │ │ -00005bd0: 5b28 666f 726d 2920 2209 40c3 4e1a c408 [(form) ".@.N... │ │ │ -00005be0: 73ab 94c5 c609 405c 6e40 3bab 845c 6e40 s.....@\n@;..\n@ │ │ │ -00005bf0: aa85 c7c8 5c6e 405c 2223 885c 6e41 ae81 ....\n@\"#.\nA.. │ │ │ -00005c00: c909 2129 8722 205b 6279 7465 2d63 6f6d ..!)." [byte-com │ │ │ -00005c10: 7069 6c65 2d77 6172 6e69 6e67 7320 666f pile-warnings fo │ │ │ -00005c20: 726d 206e 6577 2062 7974 652d 636f 6d70 rm new byte-comp │ │ │ -00005c30: 6174 6962 6c65 2d69 6e66 6f20 7065 6461 atible-info peda │ │ │ -00005c40: 6e74 6963 2062 7974 652d 636f 6d70 696c ntic byte-compil │ │ │ -00005c50: 652d 7761 726e 2022 2573 2069 7320 7072 e-warn "%s is pr │ │ │ -00005c60: 6f76 6964 6564 2066 6f72 2063 6f6d 7061 ovided for compa │ │ │ -00005c70: 7469 6269 6c69 7479 3b20 2573 2220 666f tibility; %s" fo │ │ │ -00005c80: 726d 6174 2022 7573 6520 2573 2069 6e73 rmat "use %s ins │ │ │ -00005c90: 7465 6164 2e22 2062 7974 652d 636f 6d70 tead." byte-comp │ │ │ -00005ca0: 696c 652d 6e6f 726d 616c 2d63 616c 6c5d ile-normal-call] │ │ │ -00005cb0: 2036 5d29 0a28 6279 7465 2d63 6f64 6520 6]).(byte-code │ │ │ -00005cc0: 22c1 5c6e 4212 c311 c05c 6e42 12c4 1009 ".\nB....\nB.... │ │ │ -00005cd0: 11c1 8722 205b 6279 7465 2d63 6f6d 7069 ..." [byte-compi │ │ │ -00005ce0: 6c65 722d 6f62 736f 6c65 7465 2d6f 7074 ler-obsolete-opt │ │ │ -00005cf0: 696f 6e73 2062 7974 652d 636f 6d70 696c ions byte-compil │ │ │ -00005d00: 6572 2d6c 6567 616c 2d6f 7074 696f 6e73 er-legal-options │ │ │ -00005d10: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ -00005d20: 7374 2028 286f 7074 696d 697a 6520 6279 st ((optimize by │ │ │ -00005d30: 7465 2d6f 7074 696d 697a 6520 2874 206e te-optimize (t n │ │ │ -00005d40: 696c 2073 6f75 7263 6520 6279 7465 2920 il source byte) │ │ │ -00005d50: 7661 6c29 2028 6669 6c65 2d66 6f72 6d61 val) (file-forma │ │ │ -00005d60: 7420 6279 7465 2d63 6f6d 7069 6c65 2d65 t byte-compile-e │ │ │ -00005d70: 6d61 6373 3139 2d63 6f6d 7061 7469 6269 macs19-compatibi │ │ │ -00005d80: 6c69 7479 2028 656d 6163 7331 3920 656d lity (emacs19 em │ │ │ -00005d90: 6163 7332 3029 2028 6571 2076 616c 2027 acs20) (eq val ' │ │ │ -00005da0: 656d 6163 7331 3929 2920 2864 656c 6574 emacs19)) (delet │ │ │ -00005db0: 652d 6572 726f 7273 2062 7974 652d 636f e-errors byte-co │ │ │ -00005dc0: 6d70 696c 652d 6465 6c65 7465 2d65 7272 mpile-delete-err │ │ │ -00005dd0: 6f72 7320 2874 206e 696c 2920 7661 6c29 ors (t nil) val) │ │ │ -00005de0: 2028 7665 7262 6f73 6520 6279 7465 2d63 (verbose byte-c │ │ │ -00005df0: 6f6d 7069 6c65 2d76 6572 626f 7365 2028 ompile-verbose ( │ │ │ -00005e00: 7420 6e69 6c29 2076 616c 2920 286e 6577 t nil) val) (new │ │ │ -00005e10: 2d62 7974 6563 6f64 6573 2062 7974 652d -bytecodes byte- │ │ │ -00005e20: 636f 6d70 696c 652d 6e65 772d 6279 7465 compile-new-byte │ │ │ -00005e30: 636f 6465 7320 2874 206e 696c 2920 7661 codes (t nil) va │ │ │ -00005e40: 6c29 2028 7761 726e 696e 6773 2062 7974 l) (warnings byt │ │ │ -00005e50: 652d 636f 6d70 696c 652d 7761 726e 696e e-compile-warnin │ │ │ -00005e60: 6773 2028 2863 616c 6c61 7267 7320 7375 gs ((callargs su │ │ │ -00005e70: 6272 2d63 616c 6c61 7267 7320 7265 6465 br-callargs rede │ │ │ -00005e80: 6669 6e65 2066 7265 652d 7661 7273 2075 fine free-vars u │ │ │ -00005e90: 6e75 7365 642d 7661 7273 2075 6e72 6573 nused-vars unres │ │ │ -00005ea0: 6f6c 7665 6429 2920 7661 6c29 2920 2828 olved)) val)) (( │ │ │ -00005eb0: 6e65 772d 6279 7465 636f 6465 7320 7429 new-bytecodes t) │ │ │ -00005ec0: 295d 2032 290a 2864 6566 616c 6961 7320 )] 2).(defalias │ │ │ -00005ed0: 2762 7974 652d 636f 6d70 696c 6572 2d6f 'byte-compiler-o │ │ │ -00005ee0: 7074 696f 6e73 2d68 616e 646c 6572 2023 ptions-handler # │ │ │ -00005ef0: 5b28 2672 6573 7420 6172 6773 2920 22c6 [(&rest args) ". │ │ │ -00005f00: 8989 891d 191b 1a0c 83cc 000c 403a ab8b ............@:.. │ │ │ -00005f10: 0c40 4141 ac85 0c40 41ac 86c7 c80c 405c .@AA...@A.....@\ │ │ │ -00005f20: 2288 0c40 4012 0c40 4140 135c 6e0e 1bb7 "..@@..@A@.\n... │ │ │ -00005f30: 8911 ac85 c7c9 5c6e 5c22 885c 6e0e 1cb7 ......\n\".\n... │ │ │ -00005f40: ab85 cacb 5c6e 5c22 88cc 0938 8915 403a ....\n\"...8..@: │ │ │ -00005f50: abe4 c618 cd1e 1809 4140 1e1a 0b40 ce73 ........A@...@.s │ │ │ -00005f60: ad90 cf0e 1a4a d061 ab84 0d40 aa83 0e1a .....J.a...@.... │ │ │ -00005f70: 4a21 1e19 0d40 150b abb2 0b40 8910 0d73 J!...@.....@...s │ │ │ -00005f80: ab8a 0e18 080e 195c 2216 19aa 9a08 d161 .......\"......a │ │ │ -00005f90: ab85 cd16 18aa 9008 d261 ab85 d316 18aa .........a...... │ │ │ -00005fa0: 86c7 d45c 6e0d 2388 0b41 8913 ac4e 0941 ...\n.#..A...N.A │ │ │ -00005fb0: 400e 194c 882c aa95 0b0d 73ac 86c7 d55c @..L.,....s....\ │ │ │ -00005fc0: 6e0d 2388 0941 40d6 d709 3821 4c88 0c41 n.#..A@...8!L..A │ │ │ -00005fd0: 8914 840c 002c c687 2220 5b74 6869 7320 .....,.." [this │ │ │ -00005fe0: 6465 7363 206b 6579 2076 616c 2061 7267 desc key val arg │ │ │ -00005ff0: 7320 6368 6f69 6365 7320 6e69 6c20 6572 s choices nil er │ │ │ -00006000: 726f 7220 226d 616c 666f 726d 6564 2062 ror "malformed b │ │ │ -00006010: 7974 652d 636f 6d70 696c 6572 2d6f 7074 yte-compiler-opt │ │ │ -00006020: 696f 6e20 2573 2220 2275 6e6b 6e6f 776e ion %s" "unknown │ │ │ -00006030: 2062 7974 652d 636f 6d70 696c 6572 206f byte-compiler o │ │ │ -00006040: 7074 696f 6e20 2573 2220 6279 7465 2d63 ption %s" byte-c │ │ │ -00006050: 6f6d 7069 6c65 2d77 6172 6e20 2225 7320 ompile-warn "%s │ │ │ -00006060: 6973 2061 6e20 6f62 736f 6c65 7465 2062 is an obsolete b │ │ │ -00006070: 7974 652d 636f 6d70 696c 6572 206f 7074 yte-compiler opt │ │ │ -00006080: 696f 6e2e 2220 3220 636f 6e73 2028 2b20 ion." 2 cons (+ │ │ │ -00006090: 2d29 2063 6f70 792d 7365 7175 656e 6365 -) copy-sequence │ │ │ -000060a0: 2074 202b 202d 2064 656c 7120 2225 7320 t + - delq "%s │ │ │ -000060b0: 6f6e 6c79 2061 6363 6570 7473 2025 732e only accepts %s. │ │ │ -000060c0: 2220 2225 7320 6d75 7374 2062 6520 6f6e " "%s must be on │ │ │ -000060d0: 6520 6f66 2025 732e 2220 6576 616c 2033 e of %s." eval 3 │ │ │ -000060e0: 2068 616e 646c 6572 2072 6574 2076 6172 handler ret var │ │ │ -000060f0: 2062 7974 652d 636f 6d70 696c 6572 2d6c byte-compiler-l │ │ │ -00006100: 6567 616c 2d6f 7074 696f 6e73 2062 7974 egal-options byt │ │ │ -00006110: 652d 636f 6d70 696c 6572 2d6f 6273 6f6c e-compiler-obsol │ │ │ -00006120: 6574 652d 6f70 7469 6f6e 735d 2035 5d29 ete-options] 5]) │ │ │ -00006130: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -00006140: 2d63 6f6d 7069 6c65 2d66 6465 6669 6e69 -compile-fdefini │ │ │ -00006150: 7469 6f6e 2023 5b28 6e61 6d65 206d 6163 tion #[(name mac │ │ │ -00006160: 726f 2d70 2920 220c c673 ab83 09aa 8108 ro-p) "..s...... │ │ │ -00006170: 1b5c 6e0b b741 891e 0dae e45c 6e89 1d39 .\n..A.....\n..9 │ │ │ -00006180: aba8 c70d 21ab a30d 4b39 ac98 0d4b 3aac ....!...K9...K:. │ │ │ -00006190: 930c ac86 c80d 4b21 ac8a 0cc9 61ab 8bca ......K!....a... │ │ │ -000061a0: 0d21 ab86 0d4b 8915 aa55 0cac 85c8 0d21 .!...K...U.....! │ │ │ -000061b0: ac8a 0cc9 61ab 88ca 0d21 ab83 0daa a00d ....a....!...... │ │ │ -000061c0: 3aad 9c0c c961 3fad 960d 40cb 61ab 840d :....a?...@.a... │ │ │ -000061d0: 41aa 8c0c 3fad 880d 40cc 613f ad81 0d29 A...?...@.a?...) │ │ │ -000061e0: 2a87 2220 5b62 7974 652d 636f 6d70 696c *." [byte-compil │ │ │ -000061f0: 652d 6d61 6372 6f2d 656e 7669 726f 6e6d e-macro-environm │ │ │ -00006200: 656e 7420 6279 7465 2d63 6f6d 7069 6c65 ent byte-compile │ │ │ -00006210: 2d66 756e 6374 696f 6e2d 656e 7669 726f -function-enviro │ │ │ -00006220: 6e6d 656e 7420 6e61 6d65 206c 6973 7420 nment name list │ │ │ -00006230: 6d61 6372 6f2d 7020 666e 2028 6e69 6c20 macro-p fn (nil │ │ │ -00006240: 7375 6272 2920 6662 6f75 6e64 7020 636f subr) fboundp co │ │ │ -00006250: 6d70 696c 6564 2d66 756e 6374 696f 6e2d mpiled-function- │ │ │ -00006260: 7020 7375 6272 2073 7562 7270 206d 6163 p subr subrp mac │ │ │ -00006270: 726f 2061 7574 6f6c 6f61 6420 656e 765d ro autoload env] │ │ │ -00006280: 2033 5d29 0a28 6465 6661 6c69 6173 2027 3]).(defalias ' │ │ │ -00006290: 6279 7465 2d63 6f6d 7069 6c65 2d61 7267 byte-compile-arg │ │ │ -000062a0: 6c69 7374 2d73 6967 6e61 7475 7265 2023 list-signature # │ │ │ -000062b0: 5b28 6172 676c 6973 7429 2022 c4c5 8918 [(arglist) ".... │ │ │ -000062c0: 1b19 5c6e abae 5c6e 40c6 61ab 870b ac9f ..\n..\n@.a..... │ │ │ -000062d0: c413 aa9b 5c6e 40c7 61ab 8a5c 6e41 ab91 ....\n@.a..\nA.. │ │ │ -000062e0: c810 c512 aa8b 0bab 850b 5413 aa83 0954 ..........T....T │ │ │ -000062f0: 115c 6e41 8912 ac52 0908 3fad 890b ab85 .\nA...R..?..... │ │ │ -00006300: 090b 5c5c aa81 092b 4287 2220 5b72 6573 ..\\...+B." [res │ │ │ -00006310: 7470 2061 7267 7320 6172 676c 6973 7420 tp args arglist │ │ │ -00006320: 6f70 7473 2030 206e 696c 2026 6f70 7469 opts 0 nil &opti │ │ │ -00006330: 6f6e 616c 2026 7265 7374 2074 5d20 345d onal &rest t] 4] │ │ │ -00006340: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -00006350: 652d 636f 6d70 696c 652d 6172 676c 6973 e-compile-arglis │ │ │ -00006360: 742d 7369 676e 6174 7572 6573 2d63 6f6e t-signatures-con │ │ │ -00006370: 6772 7565 6e74 2d70 2023 5b28 6f6c 6420 gruent-p #[(old │ │ │ -00006380: 6e65 7729 2022 0940 0840 56ae 9508 41ac new) ".@.@V...A. │ │ │ -00006390: 8409 41ae 8d09 41ad 8908 41ad 8509 4108 ..A...A...A...A. │ │ │ -000063a0: 4157 3f87 2220 5b6f 6c64 206e 6577 5d20 AW?." [old new] │ │ │ -000063b0: 325d 290a 2864 6566 616c 6961 7320 2762 2]).(defalias 'b │ │ │ -000063c0: 7974 652d 636f 6d70 696c 652d 6172 676c yte-compile-argl │ │ │ -000063d0: 6973 742d 7369 676e 6174 7572 652d 7374 ist-signature-st │ │ │ -000063e0: 7269 6e67 2023 5b28 7369 676e 6174 7572 ring #[(signatur │ │ │ -000063f0: 6529 2022 0841 ac86 c1c2 0840 5c22 8708 e) ".A.....@\".. │ │ │ -00006400: 4008 4155 ab86 c1c3 0840 5c22 87c1 c408 @.AU.....@\".... │ │ │ -00006410: 4008 4123 8722 205b 7369 676e 6174 7572 @.A#." [signatur │ │ │ -00006420: 6520 666f 726d 6174 2022 2564 2b22 2022 e format "%d+" " │ │ │ -00006430: 2564 2220 2225 642d 2564 225d 2034 5d29 %d" "%d-%d"] 4]) │ │ │ -00006440: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -00006450: 2d63 6f6d 7069 6c65 2d63 616c 6c61 7267 -compile-callarg │ │ │ -00006460: 732d 7761 726e 2023 5b28 666f 726d 2920 s-warn #[(form) │ │ │ -00006470: 22c6 0d40 c75c 22ae 85c6 0d40 c85c 2289 "..@.\"....@.\". │ │ │ -00006480: 1cad 98c9 0ca2 ca61 ab85 0c41 40aa 8bcb .......a...A@... │ │ │ -00006490: 0c21 ab85 cc0c 21aa 81cd 211b 0d41 471a .!....!...!..AG. │ │ │ -000064a0: 0cac 96ce cf21 ab91 c60d 40d0 5c22 8914 .....!....@.\".. │ │ │ -000064b0: ab88 cf0c 21d1 0c21 4213 0bab af5c 6e0b ....!..!B....\n. │ │ │ -000064c0: 4057 ac8a 0b41 add8 5c6e 0b41 56ad d2d2 @W...A..\n.AV... │ │ │ -000064d0: d30d 405c 6ed4 5c6e 55ab 83d5 aa81 d65c ..@\n.\nU......\ │ │ │ -000064e0: 6e0b 4057 ab83 d7aa 81d8 d90b 2126 06aa n.@W........!&.. │ │ │ -000064f0: b3ce 0d40 21ae ad0d 400e 1b61 aea6 0d40 ...@!...@..a...@ │ │ │ -00006500: 0e1a b70d 4147 1989 18ab 8e09 0841 73ae ....AG.......As. │ │ │ -00006510: 9208 0908 4142 a1aa 8a0d 4009 440e 1a42 ....AB....@.D..B │ │ │ -00006520: 8916 1a2a 2b87 2220 5b63 6f6e 7320 6e20 ...*+." [cons n │ │ │ -00006530: 6e63 616c 6c20 7369 6720 6465 6620 666f ncall sig def fo │ │ │ -00006540: 726d 2062 7974 652d 636f 6d70 696c 652d rm byte-compile- │ │ │ -00006550: 6664 6566 696e 6974 696f 6e20 6e69 6c20 fdefinition nil │ │ │ -00006560: 7420 6279 7465 2d63 6f6d 7069 6c65 2d61 t byte-compile-a │ │ │ -00006570: 7267 6c69 7374 2d73 6967 6e61 7475 7265 rglist-signature │ │ │ -00006580: 206c 616d 6264 6120 636f 6d70 696c 6564 lambda compiled │ │ │ -00006590: 2d66 756e 6374 696f 6e2d 7020 636f 6d70 -function-p comp │ │ │ -000065a0: 696c 6564 2d66 756e 6374 696f 6e2d 6172 iled-function-ar │ │ │ -000065b0: 676c 6973 7420 2826 7265 7374 2064 6566 glist (&rest def │ │ │ -000065c0: 2920 6662 6f75 6e64 7020 7375 6272 2d6d ) fboundp subr-m │ │ │ -000065d0: 696e 2d61 7267 7320 7375 6272 2073 7562 in-args subr sub │ │ │ -000065e0: 722d 6d61 782d 6172 6773 2062 7974 652d r-max-args byte- │ │ │ -000065f0: 636f 6d70 696c 652d 7761 726e 2022 2573 compile-warn "%s │ │ │ -00006600: 2063 616c 6c65 6420 7769 7468 2025 6420 called with %d │ │ │ -00006610: 6172 6775 6d65 6e74 2573 2c20 6275 7420 argument%s, but │ │ │ -00006620: 2573 2025 7322 2031 2022 2220 2273 2220 %s %s" 1 "" "s" │ │ │ -00006630: 2272 6571 7569 7265 7322 2022 6163 6365 "requires" "acce │ │ │ -00006640: 7074 7320 6f6e 6c79 2220 6279 7465 2d63 pts only" byte-c │ │ │ -00006650: 6f6d 7069 6c65 2d61 7267 6c69 7374 2d73 ompile-arglist-s │ │ │ -00006660: 6967 6e61 7475 7265 2d73 7472 696e 6720 ignature-string │ │ │ -00006670: 6279 7465 2d63 6f6d 7069 6c65 2d75 6e72 byte-compile-unr │ │ │ -00006680: 6573 6f6c 7665 642d 6675 6e63 7469 6f6e esolved-function │ │ │ -00006690: 7320 6279 7465 2d63 6f6d 7069 6c65 2d63 s byte-compile-c │ │ │ -000066a0: 7572 7265 6e74 2d66 6f72 6d5d 2039 5d29 urrent-form] 9]) │ │ │ -000066b0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -000066c0: 2d63 6f6d 7069 6c65 2d61 7267 6c69 7374 -compile-arglist │ │ │ -000066d0: 2d77 6172 6e20 235b 2866 6f72 6d20 6d61 -warn #[(form ma │ │ │ -000066e0: 6372 6f70 2920 22c6 0d41 400e 245c 2289 crop) "..A@.$\". │ │ │ -000066f0: 1bab cbc7 0ba2 c861 ab85 0b41 40aa 8bc9 .......a...A@... │ │ │ -00006700: 0b21 ab85 ca0b 21aa 81cb 21c7 cc0d 3821 .!....!...!...8! │ │ │ -00006710: 1e20 1acd 5c6e 0e20 5c22 aea1 cecf 0d40 . ..\n. \".....@ │ │ │ -00006720: d061 ab83 d1aa 81d2 0d41 40d3 5c6e 215c .a.......A@.\n!\ │ │ │ -00006730: 6ed4 6bab 83d5 aa81 d6d3 0e20 2126 062a n.k........ !&.* │ │ │ -00006740: aade 0d41 400e 21b7 d789 8989 1918 1c1e ...A@.!......... │ │ │ -00006750: 5c22 891e 23ad c9c7 cc0d 3821 14d8 d90e \"..#.....8!.... │ │ │ -00006760: 2341 21da 5c22 8916 5c22 4010 0e5c 229f #A!.\"..\"@..\". │ │ │ -00006770: 4011 080c 4057 ac8a 0c41 ab9e 090c 4156 @...@W...A....AV │ │ │ -00006780: ab98 cedb 0d41 40d3 0c21 0cdc 6bab 83dd .....A@..!..k... │ │ │ -00006790: aa81 ded3 0809 4221 2588 df0e 230e 215c ......B!%...#.!\ │ │ │ -000067a0: 2289 1621 2d29 8722 205b 6d69 6e20 6d61 "..!-)." [min ma │ │ │ -000067b0: 7820 7369 6731 206f 6c64 2073 6967 2066 x sig1 old sig f │ │ │ -000067c0: 6f72 6d20 6279 7465 2d63 6f6d 7069 6c65 orm byte-compile │ │ │ -000067d0: 2d66 6465 6669 6e69 7469 6f6e 2062 7974 -fdefinition byt │ │ │ -000067e0: 652d 636f 6d70 696c 652d 6172 676c 6973 e-compile-arglis │ │ │ -000067f0: 742d 7369 676e 6174 7572 6520 6c61 6d62 t-signature lamb │ │ │ -00006800: 6461 2063 6f6d 7069 6c65 642d 6675 6e63 da compiled-func │ │ │ -00006810: 7469 6f6e 2d70 2063 6f6d 7069 6c65 642d tion-p compiled- │ │ │ -00006820: 6675 6e63 7469 6f6e 2d61 7267 6c69 7374 function-arglist │ │ │ -00006830: 2028 2672 6573 7420 6465 6629 2032 2062 (&rest def) 2 b │ │ │ -00006840: 7974 652d 636f 6d70 696c 652d 6172 676c yte-compile-argl │ │ │ -00006850: 6973 742d 7369 676e 6174 7572 6573 2d63 ist-signatures-c │ │ │ -00006860: 6f6e 6772 7565 6e74 2d70 2062 7974 652d ongruent-p byte- │ │ │ -00006870: 636f 6d70 696c 652d 7761 726e 2022 2573 compile-warn "%s │ │ │ -00006880: 2025 7320 7573 6564 2074 6f20 7461 6b65 %s used to take │ │ │ -00006890: 2025 7320 2573 2c20 6e6f 7720 7461 6b65 %s %s, now take │ │ │ -000068a0: 7320 2573 2220 6465 6675 6e20 2266 756e s %s" defun "fun │ │ │ -000068b0: 6374 696f 6e22 2022 6d61 6372 6f22 2062 ction" "macro" b │ │ │ -000068c0: 7974 652d 636f 6d70 696c 652d 6172 676c yte-compile-argl │ │ │ -000068d0: 6973 742d 7369 676e 6174 7572 652d 7374 ist-signature-st │ │ │ -000068e0: 7269 6e67 2028 3120 2e20 3129 2022 6172 ring (1 . 1) "ar │ │ │ -000068f0: 6775 6d65 6e74 2220 2261 7267 756d 656e gument" "argumen │ │ │ -00006900: 7473 2220 6e69 6c20 736f 7274 2063 6f70 ts" nil sort cop │ │ │ -00006910: 792d 7365 7175 656e 6365 203c 2022 2573 y-sequence < "%s │ │ │ -00006920: 2062 6569 6e67 2064 6566 696e 6564 2074 being defined t │ │ │ -00006930: 6f20 7461 6b65 2025 7325 732c 2062 7574 o take %s%s, but │ │ │ -00006940: 2077 6173 2070 7265 7669 6f75 736c 7920 was previously │ │ │ -00006950: 6361 6c6c 6564 2077 6974 6820 2573 2220 called with %s" │ │ │ -00006960: 2831 202e 2031 2920 2220 6172 6722 2022 (1 . 1) " arg" " │ │ │ -00006970: 2061 7267 7322 2064 656c 7120 7369 6732 args" delq sig2 │ │ │ -00006980: 2062 7974 652d 636f 6d70 696c 652d 756e byte-compile-un │ │ │ -00006990: 7265 736f 6c76 6564 2d66 756e 6374 696f resolved-functio │ │ │ -000069a0: 6e73 206e 756d 7320 6361 6c6c 7320 6d61 ns nums calls ma │ │ │ -000069b0: 6372 6f70 5d20 395d 290a 2864 6566 616c crop] 9]).(defal │ │ │ -000069c0: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ -000069d0: 652d 7761 726e 2d61 626f 7574 2d75 6e72 e-warn-about-unr │ │ │ -000069e0: 6573 6f6c 7665 642d 6675 6e63 7469 6f6e esolved-function │ │ │ -000069f0: 7320 235b 2826 6f70 7469 6f6e 616c 206d s #[(&optional m │ │ │ -00006a00: 7367 2920 22c6 0e16 73ab fc0e 17ae 81c7 sg) "...s....... │ │ │ -00006a10: 1e18 08ab 990c 891d ab93 0d40 4008 b7ab ...........@@... │ │ │ -00006a20: 86c8 0d40 0c5c 2214 0d41 8915 ac6d 290c ...@.\"..A...m). │ │ │ -00006a30: 41ab cac9 891b 47ca 5c5c 19cb 0c21 1dcc A.....G.\\...!.. │ │ │ -00006a40: 1a0d abb2 cd0d 4040 2112 095c 6e47 5c5c ......@@!..\nG\\ │ │ │ -00006a50: ce5c 5c11 0d41 1509 0e19 5358 ab8b 0bcf .\\..A....SX.... │ │ │ -00006a60: 5c6e 0dad 81d0 5213 aa5b 0bd1 5c6e 0dad \n....R..[..\n.. │ │ │ -00006a70: 81d0 5213 5c6e 47d2 5c5c 11aa 4bd3 d40b ..R.\nG.\\..K... │ │ │ -00006a80: 5c22 882c aa8a 0cab 87d3 d50c 4040 5c22 \".,........@@\" │ │ │ -00006a90: 8829 cc87 2220 5b62 7974 652d 636f 6d70 .).." [byte-comp │ │ │ -00006aa0: 696c 652d 6175 746f 6c6f 6164 2d65 6e76 ile-autoload-env │ │ │ -00006ab0: 6972 6f6e 6d65 6e74 204c 2073 2073 7472 ironment L s str │ │ │ -00006ac0: 2062 7974 652d 636f 6d70 696c 652d 756e byte-compile-un │ │ │ -00006ad0: 7265 736f 6c76 6564 2d66 756e 6374 696f resolved-functio │ │ │ -00006ae0: 6e73 2072 6573 7420 756e 7265 736f 6c76 ns rest unresolv │ │ │ -00006af0: 6564 2022 7468 6520 656e 6420 6f66 2074 ed "the end of t │ │ │ -00006b00: 6865 2064 6174 6122 2064 656c 7120 2254 he data" delq "T │ │ │ -00006b10: 6865 2066 6f6c 6c6f 7769 6e67 2066 756e he following fun │ │ │ -00006b20: 6374 696f 6e73 2061 7265 206e 6f74 206b ctions are not k │ │ │ -00006b30: 6e6f 776e 2074 6f20 6265 2064 6566 696e nown to be defin │ │ │ -00006b40: 6564 3a20 2220 3520 7265 7665 7273 6520 ed: " 5 reverse │ │ │ -00006b50: 6e69 6c20 7379 6d62 6f6c 2d6e 616d 6520 nil symbol-name │ │ │ -00006b60: 3220 2220 2220 222c 2220 225c 6e20 2020 2 " " "," "\n │ │ │ -00006b70: 2022 2034 2062 7974 652d 636f 6d70 696c " 4 byte-compil │ │ │ -00006b80: 652d 7761 726e 2022 2573 2220 2274 6865 e-warn "%s" "the │ │ │ -00006b90: 2066 756e 6374 696f 6e20 2573 2069 7320 function %s is │ │ │ -00006ba0: 6e6f 7420 6b6e 6f77 6e20 746f 2062 6520 not known to be │ │ │ -00006bb0: 6465 6669 6e65 642e 2220 6279 7465 2d63 defined." byte-c │ │ │ -00006bc0: 6f6d 7069 6c65 2d77 6172 6e69 6e67 7320 ompile-warnings │ │ │ -00006bd0: 6d73 6720 6279 7465 2d63 6f6d 7069 6c65 msg byte-compile │ │ │ -00006be0: 2d63 7572 7265 6e74 2d66 6f72 6d20 6669 -current-form fi │ │ │ -00006bf0: 6c6c 2d63 6f6c 756d 6e5d 2035 5d29 0a28 ll-column] 5]).( │ │ │ -00006c00: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ -00006c10: 6f6d 7069 6c65 2d64 6566 7661 722d 7020 ompile-defvar-p │ │ │ -00006c20: 235b 2876 6172 2920 22c5 0c21 aeae 5c6e #[(var) "..!..\n │ │ │ -00006c30: 891b ab9c 0cab 990c 0b40 a261 ab8c c6c7 .........@.a.... │ │ │ -00006c40: 0b40 4109 5c22 55ac 82c8 140b 4189 13ac .@A.\"U.....A... │ │ │ -00006c50: 640c 293f ae88 c9c0 21ad 830c 0873 8722 d.)?....!....s." │ │ │ -00006c60: 205b 6375 7272 656e 742d 6c6f 6164 2d6c [current-load-l │ │ │ -00006c70: 6973 7420 6279 7465 2d63 6f6d 7069 6c65 ist byte-compile │ │ │ -00006c80: 2d67 6c6f 6261 6c2d 6269 7420 6279 7465 -global-bit byte │ │ │ -00006c90: 2d63 6f6d 7069 6c65 2d62 6f75 6e64 2d76 -compile-bound-v │ │ │ -00006ca0: 6172 6961 626c 6573 2072 6573 7420 7661 ariables rest va │ │ │ -00006cb0: 7220 676c 6f62 616c 6c79 2d62 6f75 6e64 r globally-bound │ │ │ -00006cc0: 7020 3020 6c6f 6761 6e64 206e 696c 2062 p 0 logand nil b │ │ │ -00006cd0: 6f75 6e64 705d 2035 5d29 0a28 6465 6661 oundp] 5]).(defa │ │ │ -00006ce0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ -00006cf0: 6c65 2d77 6172 6e2d 6162 6f75 742d 756e le-warn-about-un │ │ │ -00006d00: 7573 6564 2d76 6172 6961 626c 6573 2023 used-variables # │ │ │ -00006d10: 5b6e 696c 2022 5c6e c689 1c1d 891b abac [nil "\n........ │ │ │ -00006d20: 0b40 c761 aca6 0b40 14c8 c909 0c41 5c22 .@.a...@.....A\" │ │ │ -00006d30: 55ab 94c8 c908 0c41 5c22 55ab 8bca 0c40 U......A\"U....@ │ │ │ -00006d40: 21ac 850c 400d 4215 0b41 8913 ac54 0d9f !...@.B..A...T.. │ │ │ -00006d50: 8915 ad8d cbcc 0d40 5c22 880d 4189 15ac .......@\"..A... │ │ │ -00006d60: 74c6 2b87 2220 5b62 7974 652d 636f 6d70 t.+." [byte-comp │ │ │ -00006d70: 696c 652d 6172 676c 6973 742d 6269 7420 ile-arglist-bit │ │ │ -00006d80: 6279 7465 2d63 6f6d 7069 6c65 2d72 6566 byte-compile-ref │ │ │ -00006d90: 6572 656e 6365 642d 6269 7420 6279 7465 erenced-bit byte │ │ │ -00006da0: 2d63 6f6d 7069 6c65 2d62 6f75 6e64 2d76 -compile-bound-v │ │ │ -00006db0: 6172 6961 626c 6573 2072 6573 7420 6365 ariables rest ce │ │ │ -00006dc0: 6c6c 2075 6e72 6566 6572 656e 6365 6420 ll unreferenced │ │ │ -00006dd0: 6e69 6c20 6e65 772d 7363 6f70 6520 3020 nil new-scope 0 │ │ │ -00006de0: 6c6f 6761 6e64 2062 7974 652d 636f 6d70 logand byte-comp │ │ │ -00006df0: 696c 652d 6465 6676 6172 2d70 2062 7974 ile-defvar-p byt │ │ │ -00006e00: 652d 636f 6d70 696c 652d 7761 726e 2022 e-compile-warn " │ │ │ -00006e10: 7661 7269 6162 6c65 2025 7320 626f 756e variable %s boun │ │ │ -00006e20: 6420 6275 7420 6e6f 7420 7265 6665 7265 d but not refere │ │ │ -00006e30: 6e63 6564 225d 2035 5d29 0a28 6465 6661 nced"] 5]).(defa │ │ │ -00006e40: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ -00006e50: 6c65 2d63 6f6e 7374 616e 742d 7379 6d62 le-constant-symb │ │ │ -00006e60: 6f6c 2d70 2027 286d 6163 726f 202e 2023 ol-p '(macro . # │ │ │ -00006e70: 5b28 7379 6d62 6f6c 2920 22c1 c208 44c3 [(symbol) "...D. │ │ │ -00006e80: 08c4 4242 4587 2220 5b73 796d 626f 6c20 ..BBE." [symbol │ │ │ -00006e90: 6f72 206b 6579 776f 7264 7020 6d65 6d71 or keywordp memq │ │ │ -00006ea0: 2028 2728 6e69 6c20 7429 295d 2035 5d29 ('(nil t))] 5]) │ │ │ -00006eb0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -00006ec0: 652d 636f 6d70 696c 652d 636f 6e73 7470 e-compile-constp │ │ │ -00006ed0: 2027 286d 6163 726f 202e 2023 5b28 666f '(macro . #[(fo │ │ │ -00006ee0: 726d 2920 22c1 c208 44c3 c408 44c5 4242 rm) "...D...D.BB │ │ │ -00006ef0: 44c6 0844 c708 4444 c842 4242 8722 205b D..D..DD.BBB." [ │ │ │ -00006f00: 666f 726d 2063 6f6e 6420 636f 6e73 7020 form cond consp │ │ │ -00006f10: 6571 2063 6172 2028 2771 756f 7465 2920 eq car ('quote) │ │ │ -00006f20: 7379 6d62 6f6c 7020 6279 7465 2d63 6f6d symbolp byte-com │ │ │ -00006f30: 7069 6c65 2d63 6f6e 7374 616e 742d 7379 pile-constant-sy │ │ │ -00006f40: 6d62 6f6c 2d70 2028 2874 2929 5d20 355d mbol-p ((t))] 5] │ │ │ -00006f50: 2929 0a28 6465 6661 6c69 6173 2027 6279 )).(defalias 'by │ │ │ -00006f60: 7465 2d63 6f6d 7069 6c65 2d63 6c6f 7365 te-compile-close │ │ │ -00006f70: 2d76 6172 6961 626c 6573 2027 286d 6163 -variables '(mac │ │ │ -00006f80: 726f 202e 2023 5b28 2672 6573 7420 626f ro . #[(&rest bo │ │ │ -00006f90: 6479 2920 22c1 c2c3 c408 42c5 4242 4587 dy) ".....B.BBE. │ │ │ -00006fa0: 2220 5b62 6f64 7920 6c65 7420 2828 6279 " [body let ((by │ │ │ -00006fb0: 7465 2d63 6f6d 7069 6c65 2d6d 6163 726f te-compile-macro │ │ │ -00006fc0: 2d65 6e76 6972 6f6e 6d65 6e74 2028 636f -environment (co │ │ │ -00006fd0: 7079 2d61 6c69 7374 2062 7974 652d 636f py-alist byte-co │ │ │ -00006fe0: 6d70 696c 652d 696e 6974 6961 6c2d 6d61 mpile-initial-ma │ │ │ -00006ff0: 6372 6f2d 656e 7669 726f 6e6d 656e 7429 cro-environment) │ │ │ -00007000: 2920 2862 7974 652d 636f 6d70 696c 652d ) (byte-compile- │ │ │ -00007010: 6675 6e63 7469 6f6e 2d65 6e76 6972 6f6e function-environ │ │ │ -00007020: 6d65 6e74 206e 696c 2920 2862 7974 652d ment nil) (byte- │ │ │ -00007030: 636f 6d70 696c 652d 6175 746f 6c6f 6164 compile-autoload │ │ │ -00007040: 2d65 6e76 6972 6f6e 6d65 6e74 206e 696c -environment nil │ │ │ -00007050: 2920 2862 7974 652d 636f 6d70 696c 652d ) (byte-compile- │ │ │ -00007060: 756e 7265 736f 6c76 6564 2d66 756e 6374 unresolved-funct │ │ │ -00007070: 696f 6e73 206e 696c 2920 2862 7974 652d ions nil) (byte- │ │ │ -00007080: 636f 6d70 696c 652d 626f 756e 642d 7661 compile-bound-va │ │ │ -00007090: 7269 6162 6c65 7320 6e69 6c29 2028 6279 riables nil) (by │ │ │ -000070a0: 7465 2d63 6f6d 7069 6c65 2d66 7265 652d te-compile-free- │ │ │ -000070b0: 7265 6665 7265 6e63 6573 206e 696c 2920 references nil) │ │ │ -000070c0: 2862 7974 652d 636f 6d70 696c 652d 6672 (byte-compile-fr │ │ │ -000070d0: 6565 2d61 7373 6967 6e6d 656e 7473 206e ee-assignments n │ │ │ -000070e0: 696c 2920 2862 7974 652d 636f 6d70 696c il) (byte-compil │ │ │ -000070f0: 652d 7665 7262 6f73 6520 6279 7465 2d63 e-verbose byte-c │ │ │ -00007100: 6f6d 7069 6c65 2d76 6572 626f 7365 2920 ompile-verbose) │ │ │ -00007110: 2862 7974 652d 6f70 7469 6d69 7a65 2062 (byte-optimize b │ │ │ -00007120: 7974 652d 6f70 7469 6d69 7a65 2920 2862 yte-optimize) (b │ │ │ -00007130: 7974 652d 636f 6d70 696c 652d 656d 6163 yte-compile-emac │ │ │ -00007140: 7331 392d 636f 6d70 6174 6962 696c 6974 s19-compatibilit │ │ │ -00007150: 7920 6279 7465 2d63 6f6d 7069 6c65 2d65 y byte-compile-e │ │ │ -00007160: 6d61 6373 3139 2d63 6f6d 7061 7469 6269 macs19-compatibi │ │ │ -00007170: 6c69 7479 2920 2862 7974 652d 636f 6d70 lity) (byte-comp │ │ │ -00007180: 696c 652d 6479 6e61 6d69 6320 6279 7465 ile-dynamic byte │ │ │ -00007190: 2d63 6f6d 7069 6c65 2d64 796e 616d 6963 -compile-dynamic │ │ │ -000071a0: 2920 2862 7974 652d 636f 6d70 696c 652d ) (byte-compile- │ │ │ -000071b0: 6479 6e61 6d69 632d 646f 6373 7472 696e dynamic-docstrin │ │ │ -000071c0: 6773 2062 7974 652d 636f 6d70 696c 652d gs byte-compile- │ │ │ -000071d0: 6479 6e61 6d69 632d 646f 6373 7472 696e dynamic-docstrin │ │ │ -000071e0: 6773 2920 2862 7974 652d 636f 6d70 696c gs) (byte-compil │ │ │ -000071f0: 652d 7761 726e 696e 6773 2028 6966 2028 e-warnings (if ( │ │ │ -00007200: 6571 2062 7974 652d 636f 6d70 696c 652d eq byte-compile- │ │ │ -00007210: 7761 726e 696e 6773 2074 2920 6279 7465 warnings t) byte │ │ │ -00007220: 2d63 6f6d 7069 6c65 2d64 6566 6175 6c74 -compile-default │ │ │ -00007230: 2d77 6172 6e69 6e67 7320 6279 7465 2d63 -warnings byte-c │ │ │ -00007240: 6f6d 7069 6c65 2d77 6172 6e69 6e67 7329 ompile-warnings) │ │ │ -00007250: 2920 2862 7974 652d 636f 6d70 696c 652d ) (byte-compile- │ │ │ -00007260: 6669 6c65 2d64 6f6d 6169 6e20 6e69 6c29 file-domain nil) │ │ │ -00007270: 2920 7072 6f67 3120 7072 6f67 6e20 2828 ) prog1 progn (( │ │ │ -00007280: 6966 2028 6d65 6d71 2027 756e 7573 6564 if (memq 'unused │ │ │ -00007290: 2d76 6172 7320 6279 7465 2d63 6f6d 7069 -vars byte-compi │ │ │ -000072a0: 6c65 2d77 6172 6e69 6e67 7329 2028 6279 le-warnings) (by │ │ │ -000072b0: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e2d te-compile-warn- │ │ │ -000072c0: 6162 6f75 742d 756e 7573 6564 2d76 6172 about-unused-var │ │ │ -000072d0: 6961 626c 6573 2929 295d 2035 5d29 290a iables)))] 5])). │ │ │ -000072e0: 2864 6566 616c 6961 7320 2764 6973 706c (defalias 'displ │ │ │ -000072f0: 6179 696e 672d 6279 7465 2d63 6f6d 7069 aying-byte-compi │ │ │ -00007300: 6c65 2d77 6172 6e69 6e67 7320 2728 6d61 le-warnings '(ma │ │ │ -00007310: 6372 6f20 2e20 235b 2826 7265 7374 2062 cro . #[(&rest b │ │ │ -00007320: 6f64 7929 2022 c1c2 c3c4 c5c6 c7c8 c9ca ody) ".......... │ │ │ -00007330: cbcc cd08 4245 4445 ce42 4245 af05 8722 ....BEDE.BBE..." │ │ │ -00007340: 205b 626f 6479 206c 6574 2a20 2828 6279 [body let* ((by │ │ │ -00007350: 7465 2d63 6f6d 7069 6c65 2d6c 6f67 2d62 te-compile-log-b │ │ │ -00007360: 7566 6665 7220 2867 6574 2d62 7566 6665 uffer (get-buffe │ │ │ -00007370: 722d 6372 6561 7465 2022 2a43 6f6d 7069 r-create "*Compi │ │ │ -00007380: 6c65 2d4c 6f67 2a22 2929 2028 6279 7465 le-Log*")) (byte │ │ │ -00007390: 2d63 6f6d 7069 6c65 2d70 6f69 6e74 2d6d -compile-point-m │ │ │ -000073a0: 6178 2d70 7265 7620 2870 6f69 6e74 2d6d ax-prev (point-m │ │ │ -000073b0: 6178 2062 7974 652d 636f 6d70 696c 652d ax byte-compile- │ │ │ -000073c0: 6c6f 672d 6275 6666 6572 2929 2920 2862 log-buffer))) (b │ │ │ -000073d0: 7974 652d 636f 6d70 696c 652d 6c6f 672d yte-compile-log- │ │ │ -000073e0: 6669 6c65 2920 2864 6566 7661 7220 6279 file) (defvar by │ │ │ -000073f0: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e69 te-compile-warni │ │ │ -00007400: 6e67 732d 6265 6769 6e6e 696e 6729 206c ngs-beginning) l │ │ │ -00007410: 6574 2028 2862 7974 652d 636f 6d70 696c et ((byte-compil │ │ │ -00007420: 652d 7761 726e 696e 6773 2d62 6567 696e e-warnings-begin │ │ │ -00007430: 6e69 6e67 2028 6966 2028 626f 756e 6470 ning (if (boundp │ │ │ -00007440: 2027 6279 7465 2d63 6f6d 7069 6c65 2d77 'byte-compile-w │ │ │ -00007450: 6172 6e69 6e67 732d 6265 6769 6e6e 696e arnings-beginnin │ │ │ -00007460: 6729 2062 7974 652d 636f 6d70 696c 652d g) byte-compile- │ │ │ -00007470: 7761 726e 696e 6773 2d62 6567 696e 6e69 warnings-beginni │ │ │ -00007480: 6e67 2028 706f 696e 742d 6d61 7820 6279 ng (point-max by │ │ │ -00007490: 7465 2d63 6f6d 7069 6c65 2d6c 6f67 2d62 te-compile-log-b │ │ │ -000074a0: 7566 6665 7229 2929 2920 756e 7769 6e64 uffer)))) unwind │ │ │ -000074b0: 2d70 726f 7465 6374 2063 616c 6c2d 7769 -protect call-wi │ │ │ -000074c0: 7468 2d63 6f6e 6469 7469 6f6e 2d68 616e th-condition-han │ │ │ -000074d0: 646c 6572 2028 6675 6e63 7469 6f6e 2028 dler (function ( │ │ │ -000074e0: 6c61 6d62 6461 2028 6572 726f 722d 696e lambda (error-in │ │ │ -000074f0: 666f 2920 2862 7974 652d 636f 6d70 696c fo) (byte-compil │ │ │ -00007500: 652d 7265 706f 7274 2d65 7272 6f72 2065 e-report-error e │ │ │ -00007510: 7272 6f72 2d69 6e66 6f29 2929 2066 756e rror-info))) fun │ │ │ -00007520: 6374 696f 6e20 6c61 6d62 6461 206e 696c ction lambda nil │ │ │ -00007530: 2070 726f 676e 2028 2877 6974 682d 6375 progn ((with-cu │ │ │ -00007540: 7272 656e 742d 6275 6666 6572 2062 7974 rrent-buffer byt │ │ │ -00007550: 652d 636f 6d70 696c 652d 6c6f 672d 6275 e-compile-log-bu │ │ │ -00007560: 6666 6572 2028 6c65 7420 2828 7368 6f77 ffer (let ((show │ │ │ -00007570: 2d62 6567 696e 2028 7072 6f67 6e20 2867 -begin (progn (g │ │ │ -00007580: 6f74 6f2d 6368 6172 2062 7974 652d 636f oto-char byte-co │ │ │ -00007590: 6d70 696c 652d 706f 696e 742d 6d61 782d mpile-point-max- │ │ │ -000075a0: 7072 6576 2920 2873 6b69 702d 6368 6172 prev) (skip-char │ │ │ -000075b0: 732d 666f 7277 6172 6420 220c 5c6e 2229 s-forward ".\n") │ │ │ -000075c0: 2028 706f 696e 7429 2929 2920 2869 6620 (point)))) (if │ │ │ -000075d0: 7465 6d70 2d62 7566 6665 722d 7368 6f77 temp-buffer-show │ │ │ -000075e0: 2d66 756e 6374 696f 6e20 286c 6574 2028 -function (let ( │ │ │ -000075f0: 2873 686f 772d 6275 6666 6572 2028 6765 (show-buffer (ge │ │ │ -00007600: 742d 6275 6666 6572 2d63 7265 6174 6520 t-buffer-create │ │ │ -00007610: 222a 436f 6d70 696c 652d 4c6f 672d 5368 "*Compile-Log-Sh │ │ │ -00007620: 6f77 2a22 2929 2920 2877 6974 682d 6375 ow*"))) (with-cu │ │ │ -00007630: 7272 656e 742d 6275 6666 6572 2073 686f rrent-buffer sho │ │ │ -00007640: 772d 6275 6666 6572 2028 7365 7471 2062 w-buffer (setq b │ │ │ -00007650: 7566 6665 722d 7265 6164 2d6f 6e6c 7920 uffer-read-only │ │ │ -00007660: 6e69 6c29 2028 6572 6173 652d 6275 6666 nil) (erase-buff │ │ │ -00007670: 6572 2929 2028 636f 7079 2d74 6f2d 6275 er)) (copy-to-bu │ │ │ -00007680: 6666 6572 2073 686f 772d 6275 6666 6572 ffer show-buffer │ │ │ -00007690: 2073 686f 772d 6265 6769 6e20 2870 6f69 show-begin (poi │ │ │ -000076a0: 6e74 2d6d 6178 2929 2028 7768 656e 2028 nt-max)) (when ( │ │ │ -000076b0: 3c20 6279 7465 2d63 6f6d 7069 6c65 2d77 < byte-compile-w │ │ │ -000076c0: 6172 6e69 6e67 732d 6265 6769 6e6e 696e arnings-beginnin │ │ │ -000076d0: 6720 2870 6f69 6e74 2d6d 6178 2929 2028 g (point-max)) ( │ │ │ -000076e0: 6675 6e63 616c 6c20 7465 6d70 2d62 7566 funcall temp-buf │ │ │ -000076f0: 6665 722d 7368 6f77 2d66 756e 6374 696f fer-show-functio │ │ │ -00007700: 6e20 7368 6f77 2d62 7566 6665 7229 2929 n show-buffer))) │ │ │ -00007710: 2028 7768 656e 2028 3c20 6279 7465 2d63 (when (< byte-c │ │ │ -00007720: 6f6d 7069 6c65 2d77 6172 6e69 6e67 732d ompile-warnings- │ │ │ -00007730: 6265 6769 6e6e 696e 6720 2870 6f69 6e74 beginning (point │ │ │ -00007740: 2d6d 6178 2929 2028 7365 6c65 6374 2d77 -max)) (select-w │ │ │ -00007750: 696e 646f 7720 2870 726f 6731 2028 7365 indow (prog1 (se │ │ │ -00007760: 6c65 6374 6564 2d77 696e 646f 7729 2028 lected-window) ( │ │ │ -00007770: 7365 6c65 6374 2d77 696e 646f 7720 2864 select-window (d │ │ │ -00007780: 6973 706c 6179 2d62 7566 6665 7220 2863 isplay-buffer (c │ │ │ -00007790: 7572 7265 6e74 2d62 7566 6665 7229 2929 urrent-buffer))) │ │ │ -000077a0: 2028 676f 746f 2d63 6861 7220 7368 6f77 (goto-char show │ │ │ -000077b0: 2d62 6567 696e 2920 2872 6563 656e 7465 -begin) (recente │ │ │ -000077c0: 7220 3129 2929 2929 2929 295d 2031 345d r 1))))))))] 14] │ │ │ -000077d0: 2929 0a23 4031 3330 2052 6563 6f6d 7069 )).#@130 Recompi │ │ │ -000077e0: 6c65 2065 7665 7279 2060 2e65 6c27 2066 le every `.el' f │ │ │ -000077f0: 696c 6520 696e 2044 4952 4543 544f 5259 ile in DIRECTORY │ │ │ -00007800: 2074 6861 7420 616c 7265 6164 7920 6861 that already ha │ │ │ -00007810: 7320 6120 602e 656c 6327 2066 696c 652e s a `.elc' file. │ │ │ -00007820: 0a46 696c 6573 2069 6e20 7375 6264 6972 .Files in subdir │ │ │ -00007830: 6563 746f 7269 6573 206f 6620 4449 5245 ectories of DIRE │ │ │ -00007840: 4354 4f52 5920 6172 6520 7072 6f63 6573 CTORY are proces │ │ │ -00007850: 7365 6420 616c 736f 2e1f 0a28 6465 6661 sed also...(defa │ │ │ -00007860: 6c69 6173 2027 6279 7465 2d66 6f72 6365 lias 'byte-force │ │ │ -00007870: 2d72 6563 6f6d 7069 6c65 2023 5b28 6469 -recompile #[(di │ │ │ -00007880: 7265 6374 6f72 7929 2022 c108 c289 c324 rectory) ".....$ │ │ │ -00007890: 8722 205b 6469 7265 6374 6f72 7920 6279 ." [directory by │ │ │ -000078a0: 7465 2d72 6563 6f6d 7069 6c65 2d64 6972 te-recompile-dir │ │ │ -000078b0: 6563 746f 7279 206e 696c 2074 5d20 3520 ectory nil t] 5 │ │ │ -000078c0: 2823 2420 2e20 3330 3638 3129 2022 4442 (#$ . 30681) "DB │ │ │ -000078d0: 7974 6520 666f 7263 6520 7265 636f 6d70 yte force recomp │ │ │ -000078e0: 696c 6520 2864 6972 6563 746f 7279 293a ile (directory): │ │ │ -000078f0: 2022 5d29 0a23 4036 3637 2052 6563 6f6d "]).#@667 Recom │ │ │ -00007900: 7069 6c65 2065 7665 7279 2060 2e65 6c27 pile every `.el' │ │ │ -00007910: 2066 696c 6520 696e 2044 4952 4543 544f file in DIRECTO │ │ │ -00007920: 5259 2074 6861 7420 6e65 6564 7320 7265 RY that needs re │ │ │ -00007930: 636f 6d70 696c 6174 696f 6e2e 0a54 6869 compilation..Thi │ │ │ -00007940: 7320 6973 2069 6620 6120 602e 656c 6327 s is if a `.elc' │ │ │ -00007950: 2066 696c 6520 6578 6973 7473 2062 7574 file exists but │ │ │ -00007960: 2069 7320 6f6c 6465 7220 7468 616e 2074 is older than t │ │ │ -00007970: 6865 2060 2e65 6c27 2066 696c 652e 0a46 he `.el' file..F │ │ │ -00007980: 696c 6573 2069 6e20 7375 6264 6972 6563 iles in subdirec │ │ │ -00007990: 746f 7269 6573 206f 6620 4449 5245 4354 tories of DIRECT │ │ │ -000079a0: 4f52 5920 6172 6520 616c 736f 2070 726f ORY are also pro │ │ │ -000079b0: 6365 7373 6564 2075 6e6c 6573 730a 6f70 cessed unless.op │ │ │ -000079c0: 7469 6f6e 616c 2061 7267 756d 656e 7420 tional argument │ │ │ -000079d0: 4e4f 5245 4355 5253 494f 4e20 6973 206e NORECURSION is n │ │ │ -000079e0: 6f6e 2d6e 696c 2e0a 0a49 6620 7468 6520 on-nil...If the │ │ │ -000079f0: 602e 656c 6327 2066 696c 6520 646f 6573 `.elc' file does │ │ │ -00007a00: 206e 6f74 2065 7869 7374 2c20 6e6f 726d not exist, norm │ │ │ -00007a10: 616c 6c79 2074 6865 2060 2e65 6c27 2066 ally the `.el' f │ │ │ -00007a20: 696c 6520 6973 202a 6e6f 742a 2063 6f6d ile is *not* com │ │ │ -00007a30: 7069 6c65 642e 0a42 7574 2061 2070 7265 piled..But a pre │ │ │ -00007a40: 6669 7820 6172 6775 6d65 6e74 2028 6f70 fix argument (op │ │ │ -00007a50: 7469 6f6e 616c 2073 6563 6f6e 6420 6172 tional second ar │ │ │ -00007a60: 6729 206d 6561 6e73 2061 736b 2075 7365 g) means ask use │ │ │ -00007a70: 722c 0a66 6f72 2065 6163 6820 7375 6368 r,.for each such │ │ │ -00007a80: 2060 2e65 6c27 2066 696c 652c 2077 6865 `.el' file, whe │ │ │ -00007a90: 7468 6572 2074 6f20 636f 6d70 696c 6520 ther to compile │ │ │ -00007aa0: 6974 2e20 2050 7265 6669 7820 6172 6775 it. Prefix argu │ │ │ -00007ab0: 6d65 6e74 2030 206d 6561 6e73 0a64 6f6e ment 0 means.don │ │ │ -00007ac0: 2774 2061 736b 2061 6e64 2063 6f6d 7069 't ask and compi │ │ │ -00007ad0: 6c65 2074 6865 2066 696c 6520 616e 7977 le the file anyw │ │ │ -00007ae0: 6179 2e0a 0a41 206e 6f6e 7a65 726f 2070 ay...A nonzero p │ │ │ -00007af0: 7265 6669 7820 6172 6775 6d65 6e74 2061 refix argument a │ │ │ -00007b00: 6c73 6f20 6d65 616e 7320 6173 6b20 6162 lso means ask ab │ │ │ -00007b10: 6f75 7420 6561 6368 2073 7562 6469 7265 out each subdire │ │ │ -00007b20: 6374 6f72 792e 0a0a 4966 2074 6865 2066 ctory...If the f │ │ │ -00007b30: 6f75 7274 6820 6f70 7469 6f6e 616c 2061 ourth optional a │ │ │ -00007b40: 7267 756d 656e 7420 464f 5243 4520 6973 rgument FORCE is │ │ │ -00007b50: 206e 6f6e 2d6e 696c 2c0a 7265 636f 6d70 non-nil,.recomp │ │ │ -00007b60: 696c 6520 6576 6572 7920 602e 656c 2720 ile every `.el' │ │ │ -00007b70: 6669 6c65 2074 6861 7420 616c 7265 6164 file that alread │ │ │ -00007b80: 7920 6861 7320 6120 602e 656c 6327 2066 y has a `.elc' f │ │ │ -00007b90: 696c 652e 1f0a 2864 6566 616c 6961 7320 ile...(defalias │ │ │ -00007ba0: 2762 7974 652d 7265 636f 6d70 696c 652d 'byte-recompile- │ │ │ -00007bb0: 6469 7265 6374 6f72 7920 235b 2864 6972 directory #[(dir │ │ │ -00007bc0: 6563 746f 7279 2026 6f70 7469 6f6e 616c ectory &optional │ │ │ -00007bd0: 2061 7267 206e 6f72 6563 7572 7369 6f6e arg norecursion │ │ │ -00007be0: 2066 6f72 6365 2920 220d ab84 c60d 2115 force) ".....!. │ │ │ -00007bf0: 08ac 86c7 2088 c820 88c9 0e1c 2143 ca89 .... .. ....!C.. │ │ │ -00007c00: cb1e 1d1c 1a1e 1ecc cd21 1bce 0b21 1e1f .........!...!.. │ │ │ -00007c10: cf20 88d0 c121 ab83 09aa 83ce 0b21 19d1 . ...!.......!.. │ │ │ -00007c20: 8ed2 d3d4 5c22 882c d5d6 5c6e 89d7 55ab ....\".,..\n..U. │ │ │ -00007c30: 83d8 aa81 d90c d756 ab86 dadb 0c5c 22aa .......V.....\". │ │ │ -00007c40: 81d8 242c 8722 205b 6e6f 6e69 6e74 6572 ..$,." [noninter │ │ │ -00007c50: 6163 7469 7665 2062 7974 652d 636f 6d70 active byte-comp │ │ │ -00007c60: 696c 652d 7761 726e 696e 6773 2d62 6567 ile-warnings-beg │ │ │ -00007c70: 696e 6e69 6e67 2066 696c 652d 636f 756e inning file-coun │ │ │ -00007c80: 7420 6279 7465 2d63 6f6d 7069 6c65 2d6c t byte-compile-l │ │ │ -00007c90: 6f67 2d62 7566 6665 7220 6469 722d 636f og-buffer dir-co │ │ │ -00007ca0: 756e 7420 6172 6720 7072 6566 6978 2d6e unt arg prefix-n │ │ │ -00007cb0: 756d 6572 6963 2d76 616c 7565 2073 6176 umeric-value sav │ │ │ -00007cc0: 652d 736f 6d65 2d62 7566 6665 7273 2072 e-some-buffers r │ │ │ -00007cd0: 6564 7261 772d 6d6f 6465 6c69 6e65 2065 edraw-modeline e │ │ │ -00007ce0: 7870 616e 642d 6669 6c65 2d6e 616d 6520 xpand-file-name │ │ │ -00007cf0: 3020 6e69 6c20 6765 742d 6275 6666 6572 0 nil get-buffer │ │ │ -00007d00: 2d63 7265 6174 6520 222a 436f 6d70 696c -create "*Compil │ │ │ -00007d10: 652d 4c6f 672a 2220 706f 696e 742d 6d61 e-Log*" point-ma │ │ │ -00007d20: 7820 6279 7465 2d63 6f6d 7069 6c65 2d6c x byte-compile-l │ │ │ -00007d30: 6f67 2d66 696c 6520 626f 756e 6470 2028 og-file boundp ( │ │ │ -00007d40: 2862 7974 652d 636f 6465 2022 7209 7188 (byte-code "r.q. │ │ │ -00007d50: 0862 88c6 c777 8860 1c0b aba1 c8c9 211d .b...w.`......!. │ │ │ -00007d60: 720d 7188 c716 11ca 2088 29cb 0d0c 6423 r.q..... .)...d# │ │ │ -00007d70: 885c 6e64 57ab 840b 0d21 8829 aa97 5c6e .\ndW....!.)..\n │ │ │ -00007d80: 6457 ab92 cccd 20cc ce70 2121 880c 6288 dW.... ..p!!..b. │ │ │ -00007d90: cfd0 2188 2188 2ac7 8722 205b 6279 7465 ..!.!.*.." [byte │ │ │ -00007da0: 2d63 6f6d 7069 6c65 2d70 6f69 6e74 2d6d -compile-point-m │ │ │ -00007db0: 6178 2d70 7265 7620 6279 7465 2d63 6f6d ax-prev byte-com │ │ │ -00007dc0: 7069 6c65 2d6c 6f67 2d62 7566 6665 7220 pile-log-buffer │ │ │ -00007dd0: 6279 7465 2d63 6f6d 7069 6c65 2d77 6172 byte-compile-war │ │ │ -00007de0: 6e69 6e67 732d 6265 6769 6e6e 696e 6720 nings-beginning │ │ │ -00007df0: 7465 6d70 2d62 7566 6665 722d 7368 6f77 temp-buffer-show │ │ │ -00007e00: 2d66 756e 6374 696f 6e20 7368 6f77 2d62 -function show-b │ │ │ -00007e10: 6567 696e 2073 686f 772d 6275 6666 6572 egin show-buffer │ │ │ -00007e20: 2022 0c5c 6e22 206e 696c 2067 6574 2d62 ".\n" nil get-b │ │ │ -00007e30: 7566 6665 722d 6372 6561 7465 2022 2a43 uffer-create "*C │ │ │ -00007e40: 6f6d 7069 6c65 2d4c 6f67 2d53 686f 772a ompile-Log-Show* │ │ │ -00007e50: 2220 6572 6173 652d 6275 6666 6572 2063 " erase-buffer c │ │ │ -00007e60: 6f70 792d 746f 2d62 7566 6665 7220 7365 opy-to-buffer se │ │ │ -00007e70: 6c65 6374 2d77 696e 646f 7720 7365 6c65 lect-window sele │ │ │ -00007e80: 6374 6564 2d77 696e 646f 7720 6469 7370 cted-window disp │ │ │ -00007e90: 6c61 792d 6275 6666 6572 2072 6563 656e lay-buffer recen │ │ │ -00007ea0: 7465 7220 3120 6275 6666 6572 2d72 6561 ter 1 buffer-rea │ │ │ -00007eb0: 642d 6f6e 6c79 5d20 3529 2920 6361 6c6c d-only] 5)) call │ │ │ -00007ec0: 2d77 6974 682d 636f 6e64 6974 696f 6e2d -with-condition- │ │ │ -00007ed0: 6861 6e64 6c65 7220 235b 2865 7272 6f72 handler #[(error │ │ │ -00007ee0: 2d69 6e66 6f29 2022 c108 2187 2220 5b65 -info) "..!." [e │ │ │ -00007ef0: 7272 6f72 2d69 6e66 6f20 6279 7465 2d63 rror-info byte-c │ │ │ -00007f00: 6f6d 7069 6c65 2d72 6570 6f72 742d 6572 ompile-report-er │ │ │ -00007f10: 726f 725d 2032 5d20 235b 6e69 6c20 220b ror] 2] #[nil ". │ │ │ -00007f20: 85bb 00c6 0b40 2114 0e1b ac85 c7c8 0c5c .....@!........\ │ │ │ -00007f30: 2288 c90c 21ca 8919 1d89 1a83 b200 cb5c "...!..........\ │ │ │ -00007f40: 6e40 0c5c 2215 5c6e 40cc b6ac a5cd 0d21 n@.\".\n@......! │ │ │ -00007f50: aca0 ce0d 21ab 9b0e 1fab 9708 ab8d 08cf ....!........... │ │ │ -00007f60: 61ac 88d0 d10d d251 21ab e30b 0d43 a413 a......Q!....C.. │ │ │ -00007f70: aadc d30e 200d 5c22 abd5 d40d 21ac d0d5 .... .\"....!... │ │ │ -00007f80: 0d21 8911 abc9 d609 21ab 8a0e 21ac 96d7 .!......!...!... │ │ │ -00007f90: 0d09 5c22 aa8e 08ab b708 cf61 ac88 d0d8 ..\".......a.... │ │ │ -00007fa0: 0dd2 5121 abaa 0e5c 22ab 86d9 0d21 88aa ..Q!...\"....!.. │ │ │ -00007fb0: 84da 0d21 880e 1bac 85c7 c80c 5c22 880e ...!........\".. │ │ │ -00007fc0: 1c54 161c 0e1d 0c61 ac88 0c16 1d0e 1e54 .T.....a.......T │ │ │ -00007fd0: 161e 5c6e 4189 1284 1e00 2b0b 4189 1384 ..\nA.....+.A... │ │ │ -00007fe0: 0400 ca87 2220 5b61 7267 2064 6573 7420 ...." [arg dest │ │ │ -00007ff0: 6669 6c65 7320 6469 7265 6374 6f72 6965 files directorie │ │ │ -00008000: 7320 6469 7265 6374 6f72 7920 736f 7572 s directory sour │ │ │ -00008010: 6365 2066 696c 652d 6e61 6d65 2d61 732d ce file-name-as- │ │ │ -00008020: 6469 7265 6374 6f72 7920 6d65 7373 6167 directory messag │ │ │ -00008030: 6520 2243 6865 636b 696e 6720 2573 2e2e e "Checking %s.. │ │ │ -00008040: 2e22 2064 6972 6563 746f 7279 2d66 696c ." directory-fil │ │ │ -00008050: 6573 206e 696c 2065 7870 616e 642d 6669 es nil expand-fi │ │ │ -00008060: 6c65 2d6e 616d 6520 2822 2e22 2022 2e2e le-name ("." ".. │ │ │ -00008070: 2220 2252 4353 2220 2243 5653 2220 2253 " "RCS" "CVS" "S │ │ │ -00008080: 4343 5322 2920 6669 6c65 2d73 796d 6c69 CCS") file-symli │ │ │ -00008090: 6e6b 2d70 2066 696c 652d 6469 7265 6374 nk-p file-direct │ │ │ -000080a0: 6f72 792d 7020 3020 792d 6f72 2d6e 2d70 ory-p 0 y-or-n-p │ │ │ -000080b0: 2022 4368 6563 6b20 2220 223f 2022 2073 "Check " "? " s │ │ │ -000080c0: 7472 696e 672d 6d61 7463 6820 6175 746f tring-match auto │ │ │ -000080d0: 2d73 6176 652d 6669 6c65 2d6e 616d 652d -save-file-name- │ │ │ -000080e0: 7020 6279 7465 2d63 6f6d 7069 6c65 2d64 p byte-compile-d │ │ │ -000080f0: 6573 742d 6669 6c65 2066 696c 652d 6578 est-file file-ex │ │ │ -00008100: 6973 7473 2d70 2066 696c 652d 6e65 7765 ists-p file-newe │ │ │ -00008110: 722d 7468 616e 2d66 696c 652d 7020 2243 r-than-file-p "C │ │ │ -00008120: 6f6d 7069 6c65 2022 2062 6174 6368 2d62 ompile " batch-b │ │ │ -00008130: 7974 652d 636f 6d70 696c 652d 3120 6279 yte-compile-1 by │ │ │ -00008140: 7465 2d63 6f6d 7069 6c65 2d66 696c 6520 te-compile-file │ │ │ -00008150: 6e6f 6e69 6e74 6572 6163 7469 7665 2066 noninteractive f │ │ │ -00008160: 696c 652d 636f 756e 7420 6c61 7374 2d64 ile-count last-d │ │ │ -00008170: 6972 2064 6972 2d63 6f75 6e74 2062 7974 ir dir-count byt │ │ │ -00008180: 652d 7265 636f 6d70 696c 652d 6469 7265 e-recompile-dire │ │ │ -00008190: 6374 6f72 792d 7265 6375 7273 6976 656c ctory-recursivel │ │ │ -000081a0: 7920 656d 6163 732d 6c69 7370 2d66 696c y emacs-lisp-fil │ │ │ -000081b0: 652d 7265 6765 7870 2066 6f72 6365 2062 e-regexp force b │ │ │ -000081c0: 7974 652d 7265 636f 6d70 696c 652d 6469 yte-recompile-di │ │ │ -000081d0: 7265 6374 6f72 792d 6967 6e6f 7265 2d65 rectory-ignore-e │ │ │ -000081e0: 7272 6f72 732d 705d 2035 5d20 6d65 7373 rrors-p] 5] mess │ │ │ -000081f0: 6167 6520 2244 6f6e 6520 2854 6f74 616c age "Done (Total │ │ │ -00008200: 206f 6620 2564 2066 696c 6525 7320 636f of %d file%s co │ │ │ -00008210: 6d70 696c 6564 2573 2922 2031 2022 2220 mpiled%s)" 1 "" │ │ │ -00008220: 2273 2220 666f 726d 6174 2022 2069 6e20 "s" format " in │ │ │ -00008230: 2564 2064 6972 6563 746f 7269 6573 2220 %d directories" │ │ │ -00008240: 6469 7265 6374 6f72 7920 6c61 7374 2d64 directory last-d │ │ │ -00008250: 6972 2064 6972 6563 746f 7269 6573 2062 ir directories b │ │ │ -00008260: 7974 652d 636f 6d70 696c 652d 706f 696e yte-compile-poin │ │ │ -00008270: 742d 6d61 782d 7072 6576 5d20 3720 2823 t-max-prev] 7 (# │ │ │ -00008280: 2420 2e20 3330 3937 3129 2022 4442 7974 $ . 30971) "DByt │ │ │ -00008290: 6520 7265 636f 6d70 696c 6520 6469 7265 e recompile dire │ │ │ -000082a0: 6374 6f72 793a 205c 6e50 225d 290a 2340 ctory: \nP"]).#@ │ │ │ -000082b0: 3335 3420 5265 636f 6d70 696c 6520 6120 354 Recompile a │ │ │ -000082c0: 6669 6c65 206f 6620 4c69 7370 2063 6f64 file of Lisp cod │ │ │ -000082d0: 6520 6e61 6d65 6420 4649 4c45 4e41 4d45 e named FILENAME │ │ │ -000082e0: 2069 6620 6974 206e 6565 6473 2072 6563 if it needs rec │ │ │ -000082f0: 6f6d 7069 6c61 7469 6f6e 2e0a 5468 6973 ompilation..This │ │ │ -00008300: 2069 7320 6966 2074 6865 2060 2e65 6c63 is if the `.elc │ │ │ -00008310: 2720 6669 6c65 2065 7869 7374 7320 6275 ' file exists bu │ │ │ -00008320: 7420 6973 206f 6c64 6572 2074 6861 6e20 t is older than │ │ │ -00008330: 7468 6520 602e 656c 2720 6669 6c65 2e0a the `.el' file.. │ │ │ -00008340: 0a49 6620 7468 6520 602e 656c 6327 2066 .If the `.elc' f │ │ │ -00008350: 696c 6520 646f 6573 206e 6f74 2065 7869 ile does not exi │ │ │ -00008360: 7374 2c20 6e6f 726d 616c 6c79 2074 6865 st, normally the │ │ │ -00008370: 2060 2e65 6c27 2066 696c 6520 6973 202a `.el' file is * │ │ │ -00008380: 6e6f 742a 0a63 6f6d 7069 6c65 642e 2020 not*.compiled. │ │ │ -00008390: 4275 7420 6120 7072 6566 6978 2061 7267 But a prefix arg │ │ │ -000083a0: 756d 656e 7420 286f 7074 696f 6e61 6c20 ument (optional │ │ │ -000083b0: 7365 636f 6e64 2061 7267 2920 6d65 616e second arg) mean │ │ │ -000083c0: 7320 6173 6b20 7573 6572 0a77 6865 7468 s ask user.wheth │ │ │ -000083d0: 6572 2074 6f20 636f 6d70 696c 6520 6974 er to compile it │ │ │ -000083e0: 2e20 2050 7265 6669 7820 6172 6775 6d65 . Prefix argume │ │ │ -000083f0: 6e74 2030 2064 6f6e 2774 2061 736b 2061 nt 0 don't ask a │ │ │ -00008400: 6e64 2072 6563 6f6d 7069 6c65 2061 6e79 nd recompile any │ │ │ -00008410: 7761 792e 1f0a 2864 6566 616c 6961 7320 way...(defalias │ │ │ -00008420: 2762 7974 652d 7265 636f 6d70 696c 652d 'byte-recompile- │ │ │ -00008430: 6669 6c65 2023 5b28 6669 6c65 6e61 6d65 file #[(filename │ │ │ -00008440: 2026 6f70 7469 6f6e 616c 2066 6f72 6365 &optional force │ │ │ -00008450: 2920 22c4 1ac5 080b 5c22 adab c60b 213f ) ".....\"....!? │ │ │ -00008460: ada5 c70b 2189 12ad 9ec8 5c6e 21ab 86c9 ....!.....\n!... │ │ │ -00008470: 0b5c 6e5c 22aa 8e09 ad90 09ca 61ac 88cb .\n\".......a... │ │ │ -00008480: cc0b cd51 21ad 83ce 0b21 2987 2220 5b65 ...Q!....!)." [e │ │ │ -00008490: 6d61 6373 2d6c 6973 702d 6669 6c65 2d72 macs-lisp-file-r │ │ │ -000084a0: 6567 6578 7020 666f 7263 6520 6465 7374 egexp force dest │ │ │ -000084b0: 2066 696c 656e 616d 6520 6e69 6c20 7374 filename nil st │ │ │ -000084c0: 7269 6e67 2d6d 6174 6368 2061 7574 6f2d ring-match auto- │ │ │ -000084d0: 7361 7665 2d66 696c 652d 6e61 6d65 2d70 save-file-name-p │ │ │ -000084e0: 2062 7974 652d 636f 6d70 696c 652d 6465 byte-compile-de │ │ │ -000084f0: 7374 2d66 696c 6520 6669 6c65 2d65 7869 st-file file-exi │ │ │ -00008500: 7374 732d 7020 6669 6c65 2d6e 6577 6572 sts-p file-newer │ │ │ -00008510: 2d74 6861 6e2d 6669 6c65 2d70 2030 2079 -than-file-p 0 y │ │ │ -00008520: 2d6f 722d 6e2d 7020 2243 6f6d 7069 6c65 -or-n-p "Compile │ │ │ -00008530: 2022 2022 3f20 2220 6279 7465 2d63 6f6d " "? " byte-com │ │ │ -00008540: 7069 6c65 2d66 696c 655d 2034 2028 2324 pile-file] 4 (#$ │ │ │ -00008550: 202e 2033 3334 3630 2920 2266 4279 7465 . 33460) "fByte │ │ │ -00008560: 2072 6563 6f6d 7069 6c65 2066 696c 653a recompile file: │ │ │ -00008570: 205c 6e50 225d 290a 2340 3231 3820 436f \nP"]).#@218 Co │ │ │ -00008580: 6d70 696c 6520 6120 6669 6c65 206f 6620 mpile a file of │ │ │ -00008590: 4c69 7370 2063 6f64 6520 6e61 6d65 6420 Lisp code named │ │ │ -000085a0: 4649 4c45 4e41 4d45 2069 6e74 6f20 6120 FILENAME into a │ │ │ -000085b0: 6669 6c65 206f 6620 6279 7465 2063 6f64 file of byte cod │ │ │ -000085c0: 652e 0a54 6865 206f 7574 7075 7420 6669 e..The output fi │ │ │ -000085d0: 6c65 2773 206e 616d 6520 6973 206d 6164 le's name is mad │ │ │ -000085e0: 6520 6279 2061 7070 656e 6469 6e67 2060 e by appending ` │ │ │ -000085f0: 6327 2074 6f20 7468 6520 656e 6420 6f66 c' to the end of │ │ │ -00008600: 2046 494c 454e 414d 452e 0a57 6974 6820 FILENAME..With │ │ │ -00008610: 7072 6566 6978 2061 7267 2028 6e6f 6e69 prefix arg (noni │ │ │ -00008620: 6e74 6572 6163 7469 7665 6c79 3a20 326e nteractively: 2n │ │ │ -00008630: 6420 6172 6729 2c20 6c6f 6164 2074 6865 d arg), load the │ │ │ -00008640: 2066 696c 6520 6166 7465 7220 636f 6d70 file after comp │ │ │ -00008650: 696c 696e 672e 1f0a 2864 6566 616c 6961 iling...(defalia │ │ │ -00008660: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ -00008670: 6669 6c65 2023 5b28 6669 6c65 6e61 6d65 file #[(filename │ │ │ -00008680: 2026 6f70 7469 6f6e 616c 206c 6f61 6429 &optional load) │ │ │ -00008690: 2022 c60d 2115 08ac a1c7 c60d 2121 891b "..!.......!!.. │ │ │ -000086a0: ab97 c80b 21ab 92c9 cacb cc0b 215c 2221 ....!.......!\"! │ │ │ -000086b0: ab88 8a0b 7188 cd20 8829 2908 ac84 0e2d ....q.. .))....- │ │ │ -000086c0: ab85 cecf 0d5c 2288 0dd0 8989 891e 1119 .....\"......... │ │ │ -000086d0: 1a1c 1e32 d10d 2189 1416 118a d2d3 2189 ...2..!.......!. │ │ │ -000086e0: 1271 88d4 2088 d50d 2188 0dd6 d01e 331e .q.. ...!.....3. │ │ │ -000086f0: 341e 2ed7 2088 0e2e 152c d016 2fd8 5c6e 4... ....,../.\n │ │ │ -00008700: 0d5c 2211 0e2f 3fad f00e 2dab 85ce d90d .\"../?...-..... │ │ │ -00008710: 5c22 88da 5c6e 2188 8a09 7188 6462 88db \"..\n!...q.db.. │ │ │ -00008720: 6388 d10d 2114 0e30 ac85 d0dc dd8f 88de c...!..0........ │ │ │ -00008730: 0c21 ab88 dfe0 640c 2388 aa90 e1e2 e3e4 .!....d.#....... │ │ │ -00008740: 0c21 ab83 e5aa 81e6 0c45 5c22 880e 30ac .!.......E\"..0. │ │ │ -00008750: 85d0 e7e8 8f88 da70 2188 290e 31ab 940e .......p!.).1... │ │ │ -00008760: 31e9 61ac 88c9 caea 0d5c 2221 ab86 8aeb 1.a......\"!.... │ │ │ -00008770: 0d21 8829 0e2c ab84 ec0c 2188 e92d 8722 .!.).,....!..-." │ │ │ -00008780: 205b 6e6f 6e69 6e74 6572 6163 7469 7665 [noninteractive │ │ │ -00008790: 206f 7574 7075 742d 6275 6666 6572 2069 output-buffer i │ │ │ -000087a0: 6e70 7574 2d62 7566 6665 7220 6220 7461 nput-buffer b ta │ │ │ -000087b0: 7267 6574 2d66 696c 6520 6669 6c65 6e61 rget-file filena │ │ │ -000087c0: 6d65 2065 7870 616e 642d 6669 6c65 2d6e me expand-file-n │ │ │ -000087d0: 616d 6520 6765 742d 6669 6c65 2d62 7566 ame get-file-buf │ │ │ -000087e0: 6665 7220 6275 6666 6572 2d6d 6f64 6966 fer buffer-modif │ │ │ -000087f0: 6965 642d 7020 792d 6f72 2d6e 2d70 2066 ied-p y-or-n-p f │ │ │ -00008800: 6f72 6d61 7420 2273 6176 6520 6275 6666 ormat "save buff │ │ │ -00008810: 6572 2025 7320 6669 7273 743f 2022 2062 er %s first? " b │ │ │ -00008820: 7566 6665 722d 6e61 6d65 2073 6176 652d uffer-name save- │ │ │ -00008830: 6275 6666 6572 206d 6573 7361 6765 2022 buffer message " │ │ │ -00008840: 436f 6d70 696c 696e 6720 2573 2e2e 2e22 Compiling %s..." │ │ │ -00008850: 206e 696c 2062 7974 652d 636f 6d70 696c nil byte-compil │ │ │ -00008860: 652d 6465 7374 2d66 696c 6520 6765 742d e-dest-file get- │ │ │ -00008870: 6275 6666 6572 2d63 7265 6174 6520 2220 buffer-create " │ │ │ -00008880: 2a43 6f6d 7069 6c65 7220 496e 7075 742a *Compiler Input* │ │ │ -00008890: 2220 6572 6173 652d 6275 6666 6572 2069 " erase-buffer i │ │ │ -000088a0: 6e73 6572 742d 6669 6c65 2d63 6f6e 7465 nsert-file-conte │ │ │ -000088b0: 6e74 7320 656d 6163 732d 6c69 7370 2d6d nts emacs-lisp-m │ │ │ -000088c0: 6f64 6520 6e6f 726d 616c 2d6d 6f64 6520 ode normal-mode │ │ │ -000088d0: 6279 7465 2d63 6f6d 7069 6c65 2d66 726f byte-compile-fro │ │ │ -000088e0: 6d2d 6275 6666 6572 2022 436f 6d70 696c m-buffer "Compil │ │ │ -000088f0: 696e 6720 2573 2e2e 2e64 6f6e 6522 206b ing %s...done" k │ │ │ -00008900: 696c 6c2d 6275 6666 6572 2022 5c6e 2220 ill-buffer "\n" │ │ │ -00008910: 2864 656c 6574 652d 6669 6c65 2074 6172 (delete-file tar │ │ │ -00008920: 6765 742d 6669 6c65 2920 2828 6669 6c65 get-file) ((file │ │ │ -00008930: 2d65 7272 6f72 2929 2066 696c 652d 7772 -error)) file-wr │ │ │ -00008940: 6974 6162 6c65 2d70 2077 7269 7465 2d72 itable-p write-r │ │ │ -00008950: 6567 696f 6e20 3120 7369 676e 616c 2066 egion 1 signal f │ │ │ -00008960: 696c 652d 6572 726f 7220 224f 7065 6e69 ile-error "Openi │ │ │ -00008970: 6e67 206f 7574 7075 7420 6669 6c65 2220 ng output file" │ │ │ -00008980: 6669 6c65 2d65 7869 7374 732d 7020 2263 file-exists-p "c │ │ │ -00008990: 616e 6e6f 7420 6f76 6572 7772 6974 6520 annot overwrite │ │ │ -000089a0: 6669 6c65 2220 2264 6972 6563 746f 7279 file" "directory │ │ │ -000089b0: 206e 6f74 2077 7269 7461 626c 6520 6f72 not writable or │ │ │ -000089c0: 206e 6f6e 6578 6973 7465 6e74 2220 2862 nonexistent" (b │ │ │ -000089d0: 7974 652d 636f 6465 2022 c209 c308 215c yte-code "....!\ │ │ │ -000089e0: 2287 2220 5b66 696c 656e 616d 6520 7461 "." [filename ta │ │ │ -000089f0: 7267 6574 2d66 696c 6520 7365 742d 6669 rget-file set-fi │ │ │ -00008a00: 6c65 2d6d 6f64 6573 2066 696c 652d 6d6f le-modes file-mo │ │ │ -00008a10: 6465 735d 2034 2920 2828 6572 726f 7229 des] 4) ((error) │ │ │ -00008a20: 2920 7420 2252 6570 6f72 7420 6361 6c6c ) t "Report call │ │ │ -00008a30: 2074 7265 6520 666f 7220 2573 3f20 2220 tree for %s? " │ │ │ -00008a40: 6469 7370 6c61 792d 6361 6c6c 2d74 7265 display-call-tre │ │ │ -00008a50: 6520 6c6f 6164 2062 7974 652d 636f 6d70 e load byte-comp │ │ │ -00008a60: 696c 652d 7665 7262 6f73 6520 6275 6666 ile-verbose buff │ │ │ -00008a70: 6572 2d66 696c 652d 6e61 6d65 2062 7974 er-file-name byt │ │ │ -00008a80: 652d 636f 6d70 696c 6572 2d65 7272 6f72 e-compiler-error │ │ │ -00008a90: 2d66 6c61 6720 6279 7465 2d63 6f6d 7069 -flag byte-compi │ │ │ -00008aa0: 6c65 2d6f 7665 7277 7269 7465 2d66 696c le-overwrite-fil │ │ │ -00008ab0: 6520 6279 7465 2d63 6f6d 7069 6c65 2d67 e byte-compile-g │ │ │ -00008ac0: 656e 6572 6174 652d 6361 6c6c 2d74 7265 enerate-call-tre │ │ │ -00008ad0: 6520 6279 7465 2d63 6f6d 7069 6c65 2d63 e byte-compile-c │ │ │ -00008ae0: 7572 7265 6e74 2d66 696c 6520 656e 6162 urrent-file enab │ │ │ -00008af0: 6c65 2d6c 6f63 616c 2d65 7661 6c20 6465 le-local-eval de │ │ │ -00008b00: 6661 756c 742d 6d61 6a6f 722d 6d6f 6465 fault-major-mode │ │ │ -00008b10: 5d20 3620 2823 2420 2e20 3334 3137 3429 ] 6 (#$ . 34174) │ │ │ -00008b20: 2028 6c65 7420 2828 6669 6c65 2062 7566 (let ((file buf │ │ │ -00008b30: 6665 722d 6669 6c65 2d6e 616d 6529 2028 fer-file-name) ( │ │ │ -00008b40: 6669 6c65 2d6e 616d 6520 6e69 6c29 2028 file-name nil) ( │ │ │ -00008b50: 6669 6c65 2d64 6972 206e 696c 2929 2028 file-dir nil)) ( │ │ │ -00008b60: 616e 6420 6669 6c65 2028 6571 2028 6364 and file (eq (cd │ │ │ -00008b70: 7220 2861 7373 7120 276d 616a 6f72 2d6d r (assq 'major-m │ │ │ -00008b80: 6f64 6520 2862 7566 6665 722d 6c6f 6361 ode (buffer-loca │ │ │ -00008b90: 6c2d 7661 7269 6162 6c65 7329 2929 2027 l-variables))) ' │ │ │ -00008ba0: 656d 6163 732d 6c69 7370 2d6d 6f64 6529 emacs-lisp-mode) │ │ │ -00008bb0: 2028 7365 7471 2066 696c 652d 6e61 6d65 (setq file-name │ │ │ -00008bc0: 2028 6669 6c65 2d6e 616d 652d 6e6f 6e64 (file-name-nond │ │ │ -00008bd0: 6972 6563 746f 7279 2066 696c 6529 2066 irectory file) f │ │ │ -00008be0: 696c 652d 6469 7220 2866 696c 652d 6e61 ile-dir (file-na │ │ │ -00008bf0: 6d65 2d64 6972 6563 746f 7279 2066 696c me-directory fil │ │ │ -00008c00: 6529 2929 2028 6c69 7374 2028 7265 6164 e))) (list (read │ │ │ -00008c10: 2d66 696c 652d 6e61 6d65 2028 6966 2063 -file-name (if c │ │ │ -00008c20: 7572 7265 6e74 2d70 7265 6669 782d 6172 urrent-prefix-ar │ │ │ -00008c30: 6720 2242 7974 6520 636f 6d70 696c 6520 g "Byte compile │ │ │ -00008c40: 616e 6420 6c6f 6164 2066 696c 653a 2022 and load file: " │ │ │ -00008c50: 2022 4279 7465 2063 6f6d 7069 6c65 2066 "Byte compile f │ │ │ -00008c60: 696c 653a 2022 2920 6669 6c65 2d64 6972 ile: ") file-dir │ │ │ -00008c70: 206e 696c 206e 696c 2066 696c 652d 6e61 nil nil file-na │ │ │ -00008c80: 6d65 2920 6375 7272 656e 742d 7072 6566 me) current-pref │ │ │ -00008c90: 6978 2d61 7267 2929 5d29 0a23 4031 3631 ix-arg))]).#@161 │ │ │ -00008ca0: 2043 6f6d 7069 6c65 2061 2066 696c 6520 Compile a file │ │ │ -00008cb0: 6f66 204c 6973 7020 636f 6465 206e 616d of Lisp code nam │ │ │ -00008cc0: 6564 2046 494c 454e 414d 4520 696e 746f ed FILENAME into │ │ │ -00008cd0: 2061 2066 696c 6520 6f66 2062 7974 6520 a file of byte │ │ │ -00008ce0: 636f 6465 2c0a 616e 6420 7468 656e 206c code,.and then l │ │ │ -00008cf0: 6f61 6420 6974 2e20 2054 6865 206f 7574 oad it. The out │ │ │ -00008d00: 7075 7420 6669 6c65 2773 206e 616d 6520 put file's name │ │ │ -00008d10: 6973 206d 6164 6520 6279 2061 7070 656e is made by appen │ │ │ -00008d20: 6469 6e67 2022 6322 2074 6f0a 7468 6520 ding "c" to.the │ │ │ -00008d30: 656e 6420 6f66 2046 494c 454e 414d 452e end of FILENAME. │ │ │ -00008d40: 1f0a 2864 6566 616c 6961 7320 2762 7974 ..(defalias 'byt │ │ │ -00008d50: 652d 636f 6d70 696c 652d 616e 642d 6c6f e-compile-and-lo │ │ │ -00008d60: 6164 2d66 696c 6520 235b 2826 6f70 7469 ad-file #[(&opti │ │ │ -00008d70: 6f6e 616c 2066 696c 656e 616d 6529 2022 onal filename) " │ │ │ -00008d80: 09ab 85c2 09c3 5c22 87c4 18c5 c221 2987 ......\".....!). │ │ │ -00008d90: 2220 5b63 7572 7265 6e74 2d70 7265 6669 " [current-prefi │ │ │ -00008da0: 782d 6172 6720 6669 6c65 6e61 6d65 2062 x-arg filename b │ │ │ -00008db0: 7974 652d 636f 6d70 696c 652d 6669 6c65 yte-compile-file │ │ │ -00008dc0: 2074 2028 3429 2063 616c 6c2d 696e 7465 t (4) call-inte │ │ │ -00008dd0: 7261 6374 6976 656c 795d 2033 2028 2324 ractively] 3 (#$ │ │ │ -00008de0: 202e 2033 3630 3031 2920 6e69 6c5d 290a . 36001) nil]). │ │ │ -00008df0: 2340 3737 2042 7974 652d 636f 6d70 696c #@77 Byte-compil │ │ │ -00008e00: 6520 616e 6420 6576 616c 7561 7465 2063 e and evaluate c │ │ │ -00008e10: 6f6e 7465 6e74 7320 6f66 2042 5546 4645 ontents of BUFFE │ │ │ -00008e20: 5220 2864 6566 6175 6c74 3a20 7468 6520 R (default: the │ │ │ -00008e30: 6375 7272 656e 7420 6275 6666 6572 292e current buffer). │ │ │ -00008e40: 1f0a 2864 6566 616c 6961 7320 2762 7974 ..(defalias 'byt │ │ │ -00008e50: 652d 636f 6d70 696c 652d 6275 6666 6572 e-compile-buffer │ │ │ -00008e60: 2023 5b28 266f 7074 696f 6e61 6c20 6275 #[(&optional bu │ │ │ -00008e70: 6666 6572 2920 225c 6eab 85c3 5c6e 21aa ffer) "\n...\n!. │ │ │ -00008e80: 8170 12c4 c55c 6e5c 2288 c65c 6e21 ae83 .p...\n\"..\n!.. │ │ │ -00008e90: c75c 6e21 195c 6e18 c85c 6e09 c923 882a .\n!.\n..\n..#.* │ │ │ -00008ea0: c4ca 5c6e 5c22 88c9 8722 205b 6279 7465 ..\n\"..." [byte │ │ │ -00008eb0: 2d63 6f6d 7069 6c65 2d63 7572 7265 6e74 -compile-current │ │ │ -00008ec0: 2d66 696c 6520 6669 6c65 6e61 6d65 2062 -file filename b │ │ │ -00008ed0: 7566 6665 7220 6765 742d 6275 6666 6572 uffer get-buffer │ │ │ -00008ee0: 206d 6573 7361 6765 2022 436f 6d70 696c message "Compil │ │ │ -00008ef0: 696e 6720 2573 2e2e 2e22 2062 7566 6665 ing %s..." buffe │ │ │ -00008f00: 722d 6669 6c65 2d6e 616d 6520 7072 696e r-file-name prin │ │ │ -00008f10: 312d 746f 2d73 7472 696e 6720 6279 7465 1-to-string byte │ │ │ -00008f20: 2d63 6f6d 7069 6c65 2d66 726f 6d2d 6275 -compile-from-bu │ │ │ -00008f30: 6666 6572 2074 2022 436f 6d70 696c 696e ffer t "Compilin │ │ │ -00008f40: 6720 2573 2e2e 2e64 6f6e 6522 5d20 3420 g %s...done"] 4 │ │ │ -00008f50: 2823 2420 2e20 3336 3334 3129 2022 6242 (#$ . 36341) "bB │ │ │ -00008f60: 7974 6520 636f 6d70 696c 6520 6275 6666 yte compile buff │ │ │ -00008f70: 6572 3a20 225d 290a 2340 3134 3820 436f er: "]).#@148 Co │ │ │ -00008f80: 6d70 696c 6520 616e 6420 6576 616c 7561 mpile and evalua │ │ │ -00008f90: 7465 2074 6865 2063 7572 7265 6e74 2074 te the current t │ │ │ -00008fa0: 6f70 2d6c 6576 656c 2066 6f72 6d2e 0a50 op-level form..P │ │ │ -00008fb0: 7269 6e74 2074 6865 2072 6573 756c 7420 rint the result │ │ │ -00008fc0: 696e 2074 6865 206d 696e 6962 7566 6665 in the minibuffe │ │ │ -00008fd0: 722e 0a57 6974 6820 6172 6775 6d65 6e74 r..With argument │ │ │ -00008fe0: 2c20 696e 7365 7274 2076 616c 7565 2069 , insert value i │ │ │ -00008ff0: 6e20 6375 7272 656e 7420 6275 6666 6572 n current buffer │ │ │ -00009000: 2061 6674 6572 2074 6865 2066 6f72 6d2e after the form. │ │ │ -00009010: 1f0a 2864 6566 616c 6961 7320 2763 6f6d ..(defalias 'com │ │ │ -00009020: 7069 6c65 2d64 6566 756e 2023 5b28 266f pile-defun #[(&o │ │ │ -00009030: 7074 696f 6e61 6c20 6172 6729 2022 8ac6 ptional arg) ".. │ │ │ -00009040: 2088 c720 88c8 201a c820 19c9 18ca cbcc .. .. .. ...... │ │ │ -00009050: 211d cd0d 211e 1ace 2088 cfc3 21ab 830b !...!... ...!... │ │ │ -00009060: aa83 cd0d 211b d08e d1d2 d35c 222c 211c ....!......\",!. │ │ │ -00009070: 0e1b ab8d d4d5 2188 d60c 705c 2288 d763 ......!...p\"..c │ │ │ -00009080: aa86 d4d8 d90c 215c 222d 8722 205b 6279 ......!\"-." [by │ │ │ -00009090: 7465 2d63 6f6d 7069 6c65 2d6c 6173 742d te-compile-last- │ │ │ -000090a0: 7761 726e 6564 2d66 6f72 6d20 6c6f 6164 warned-form load │ │ │ -000090b0: 2d66 696c 652d 6e61 6d65 2062 7974 652d -file-name byte- │ │ │ -000090c0: 636f 6d70 696c 652d 6375 7272 656e 742d compile-current- │ │ │ -000090d0: 6669 6c65 2062 7974 652d 636f 6d70 696c file byte-compil │ │ │ -000090e0: 652d 7761 726e 696e 6773 2d62 6567 696e e-warnings-begin │ │ │ -000090f0: 6e69 6e67 2076 616c 7565 2062 7974 652d ning value byte- │ │ │ -00009100: 636f 6d70 696c 652d 6c6f 672d 6275 6666 compile-log-buff │ │ │ -00009110: 6572 2065 6e64 2d6f 662d 6465 6675 6e20 er end-of-defun │ │ │ -00009120: 6265 6769 6e6e 696e 672d 6f66 2d64 6566 beginning-of-def │ │ │ -00009130: 756e 2062 7566 6665 722d 6669 6c65 2d6e un buffer-file-n │ │ │ -00009140: 616d 6520 6e6f 7468 696e 6720 6576 616c ame nothing eval │ │ │ -00009150: 2067 6574 2d62 7566 6665 722d 6372 6561 get-buffer-crea │ │ │ -00009160: 7465 2022 2a43 6f6d 7069 6c65 2d4c 6f67 te "*Compile-Log │ │ │ -00009170: 2a22 2070 6f69 6e74 2d6d 6178 2062 7974 *" point-max byt │ │ │ -00009180: 652d 636f 6d70 696c 652d 6c6f 672d 6669 e-compile-log-fi │ │ │ -00009190: 6c65 2062 6f75 6e64 7020 2828 6279 7465 le boundp ((byte │ │ │ -000091a0: 2d63 6f64 6520 2272 0971 8808 6288 c6c7 -code "r.q..b... │ │ │ -000091b0: 7788 601c 0bab a1c8 c921 1d72 0d71 88c7 w.`......!.r.q.. │ │ │ -000091c0: 1611 ca20 8829 cb0d 0c64 2388 5c6e 6457 ... .)...d#.\ndW │ │ │ -000091d0: ab84 0b0d 2188 29aa 975c 6e64 57ab 92cc ....!.)..\ndW... │ │ │ -000091e0: cd20 ccce 7021 2188 0c62 88cf d021 8821 . ..p!!..b...!.! │ │ │ -000091f0: 882a c787 2220 5b62 7974 652d 636f 6d70 .*.." [byte-comp │ │ │ -00009200: 696c 652d 706f 696e 742d 6d61 782d 7072 ile-point-max-pr │ │ │ -00009210: 6576 2062 7974 652d 636f 6d70 696c 652d ev byte-compile- │ │ │ -00009220: 6c6f 672d 6275 6666 6572 2062 7974 652d log-buffer byte- │ │ │ -00009230: 636f 6d70 696c 652d 7761 726e 696e 6773 compile-warnings │ │ │ -00009240: 2d62 6567 696e 6e69 6e67 2074 656d 702d -beginning temp- │ │ │ -00009250: 6275 6666 6572 2d73 686f 772d 6675 6e63 buffer-show-func │ │ │ -00009260: 7469 6f6e 2073 686f 772d 6265 6769 6e20 tion show-begin │ │ │ -00009270: 7368 6f77 2d62 7566 6665 7220 220c 5c6e show-buffer ".\n │ │ │ -00009280: 2220 6e69 6c20 6765 742d 6275 6666 6572 " nil get-buffer │ │ │ -00009290: 2d63 7265 6174 6520 222a 436f 6d70 696c -create "*Compil │ │ │ -000092a0: 652d 4c6f 672d 5368 6f77 2a22 2065 7261 e-Log-Show*" era │ │ │ -000092b0: 7365 2d62 7566 6665 7220 636f 7079 2d74 se-buffer copy-t │ │ │ -000092c0: 6f2d 6275 6666 6572 2073 656c 6563 742d o-buffer select- │ │ │ -000092d0: 7769 6e64 6f77 2073 656c 6563 7465 642d window selected- │ │ │ -000092e0: 7769 6e64 6f77 2064 6973 706c 6179 2d62 window display-b │ │ │ -000092f0: 7566 6665 7220 7265 6365 6e74 6572 2031 uffer recenter 1 │ │ │ -00009300: 2062 7566 6665 722d 7265 6164 2d6f 6e6c buffer-read-onl │ │ │ -00009310: 795d 2035 2929 2063 616c 6c2d 7769 7468 y] 5)) call-with │ │ │ -00009320: 2d63 6f6e 6469 7469 6f6e 2d68 616e 646c -condition-handl │ │ │ -00009330: 6572 2023 5b28 6572 726f 722d 696e 666f er #[(error-info │ │ │ -00009340: 2920 22c1 0821 8722 205b 6572 726f 722d ) "..!." [error- │ │ │ -00009350: 696e 666f 2062 7974 652d 636f 6d70 696c info byte-compil │ │ │ -00009360: 652d 7265 706f 7274 2d65 7272 6f72 5d20 e-report-error] │ │ │ -00009370: 325d 2023 5b6e 696c 2022 c0c1 7021 c25c 2] #[nil "..p!.\ │ │ │ -00009380: 2287 2220 5b62 7974 652d 636f 6d70 696c "." [byte-compil │ │ │ -00009390: 652d 7365 7870 2072 6561 6420 2274 6f70 e-sexp read "top │ │ │ -000093a0: 6c65 7665 6c20 666f 726d 7322 5d20 335d level forms"] 3] │ │ │ -000093b0: 206d 6573 7361 6765 2022 436f 6d70 696c message "Compil │ │ │ -000093c0: 696e 6720 6672 6f6d 2062 7566 6665 722e ing from buffer. │ │ │ -000093d0: 2e2e 2064 6f6e 652e 2220 7072 696e 3120 .. done." prin1 │ │ │ -000093e0: 225c 6e22 2022 2573 2220 7072 696e 312d "\n" "%s" prin1- │ │ │ -000093f0: 746f 2d73 7472 696e 6720 6279 7465 2d63 to-string byte-c │ │ │ -00009400: 6f6d 7069 6c65 2d70 6f69 6e74 2d6d 6178 ompile-point-max │ │ │ -00009410: 2d70 7265 7620 6172 675d 2034 2028 2324 -prev arg] 4 (#$ │ │ │ -00009420: 202e 2033 3637 3334 2920 2250 225d 290a . 36734) "P"]). │ │ │ -00009430: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -00009440: 636f 6d70 696c 652d 6672 6f6d 2d62 7566 compile-from-buf │ │ │ -00009450: 6665 7220 235b 2862 7974 652d 636f 6d70 fer #[(byte-comp │ │ │ -00009460: 696c 652d 696e 6275 6666 6572 2066 696c ile-inbuffer fil │ │ │ -00009470: 656e 616d 6520 266f 7074 696f 6e61 6c20 ename &optional │ │ │ -00009480: 6576 616c 2920 22c6 8989 8989 8989 c789 eval) "......... │ │ │ -00009490: 89c6 1e23 1e24 1e25 1e26 1e27 1e28 1e29 ...#.$.%.&.'.(.) │ │ │ -000094a0: 1e2a 1a1e 2b1d c80e 2c21 c689 8989 8989 .*..+...,!...... │ │ │ -000094b0: 0908 0e1e 0e1f 0e20 0cc9 61ab 840e 2daa ....... ..a...-. │ │ │ -000094c0: 810c c61e 2e1c 1e20 1e1f 1e1e 1819 1e2f ....... ......./ │ │ │ -000094d0: 1e30 1e31 1e32 1e33 1e34 1e35 8aca cb21 .0.1.2.3.4.5...! │ │ │ -000094e0: 7115 cc20 88c6 120e 21ab 8c0e 1cac 88cd q.. ....!....... │ │ │ -000094f0: 0e21 0e36 0d23 88ce 1637 29ca cf21 1bd0 .!.6.#...7)..!.. │ │ │ -00009500: 0b21 1e38 d120 88d2 d321 ab84 0e13 aa83 .!.8. ...!...... │ │ │ -00009510: d00b 211e 13d4 8ed5 d6d7 5c22 882c 8a0d ..!.......\".,.. │ │ │ -00009520: 7188 6562 8829 d80c 73ab 83d9 2088 2e0e q.eb.)..s... ... │ │ │ -00009530: 0e1c ac83 0daa 96c6 1e5c 22c6 dadb 8fab .........\"..... │ │ │ -00009540: 87dc 0e5c 2221 88aa 7329 dd0d 2188 c62e ...\"!..s)..!... │ │ │ -00009550: 0b87 2220 5b62 7974 652d 6f70 7469 6d69 .." [byte-optimi │ │ │ -00009560: 7a65 2062 7974 652d 636f 6d70 696c 652d ze byte-compile- │ │ │ -00009570: 7665 7262 6f73 6520 6361 7365 2d66 6f6c verbose case-fol │ │ │ -00009580: 642d 7365 6172 6368 2062 7974 652d 636f d-search byte-co │ │ │ -00009590: 6d70 696c 652d 6c6f 672d 6275 6666 6572 mpile-log-buffer │ │ │ -000095a0: 2062 7974 652d 636f 6d70 696c 652d 7761 byte-compile-wa │ │ │ -000095b0: 726e 696e 6773 2062 7974 652d 636f 6d70 rnings byte-comp │ │ │ -000095c0: 696c 652d 6f75 7462 7566 6665 7220 6e69 ile-outbuffer ni │ │ │ -000095d0: 6c20 3020 636f 7079 2d61 6c69 7374 2074 l 0 copy-alist t │ │ │ -000095e0: 2067 6574 2d62 7566 6665 722d 6372 6561 get-buffer-crea │ │ │ -000095f0: 7465 2022 202a 436f 6d70 696c 6572 204f te " *Compiler O │ │ │ -00009600: 7574 7075 742a 2220 6572 6173 652d 6275 utput*" erase-bu │ │ │ -00009610: 6666 6572 2062 7974 652d 636f 6d70 696c ffer byte-compil │ │ │ -00009620: 652d 696e 7365 7274 2d68 6561 6465 7220 e-insert-header │ │ │ -00009630: 6f76 6572 7772 6974 652d 6d6f 6465 2d62 overwrite-mode-b │ │ │ -00009640: 696e 6172 7920 222a 436f 6d70 696c 652d inary "*Compile- │ │ │ -00009650: 4c6f 672a 2220 706f 696e 742d 6d61 7820 Log*" point-max │ │ │ -00009660: 6279 7465 2d63 6f6d 7069 6c65 2d6c 6f67 byte-compile-log │ │ │ -00009670: 2d66 696c 6520 626f 756e 6470 2062 7974 -file boundp byt │ │ │ -00009680: 652d 636f 6d70 696c 652d 7761 726e 696e e-compile-warnin │ │ │ -00009690: 6773 2d62 6567 696e 6e69 6e67 2028 2862 gs-beginning ((b │ │ │ -000096a0: 7974 652d 636f 6465 2022 7209 7188 0862 yte-code "r.q..b │ │ │ -000096b0: 88c6 c777 8860 1c0b aba1 c8c9 211d 720d ...w.`......!.r. │ │ │ -000096c0: 7188 c716 11ca 2088 29cb 0d0c 6423 885c q..... .)...d#.\ │ │ │ -000096d0: 6e64 57ab 840b 0d21 8829 aa97 5c6e 6457 ndW....!.)..\ndW │ │ │ -000096e0: ab92 cccd 20cc ce70 2121 880c 6288 cfd0 .... ..p!!..b... │ │ │ -000096f0: 2188 2188 2ac7 8722 205b 6279 7465 2d63 !.!.*.." [byte-c │ │ │ -00009700: 6f6d 7069 6c65 2d70 6f69 6e74 2d6d 6178 ompile-point-max │ │ │ -00009710: 2d70 7265 7620 6279 7465 2d63 6f6d 7069 -prev byte-compi │ │ │ -00009720: 6c65 2d6c 6f67 2d62 7566 6665 7220 6279 le-log-buffer by │ │ │ -00009730: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e69 te-compile-warni │ │ │ -00009740: 6e67 732d 6265 6769 6e6e 696e 6720 7465 ngs-beginning te │ │ │ -00009750: 6d70 2d62 7566 6665 722d 7368 6f77 2d66 mp-buffer-show-f │ │ │ -00009760: 756e 6374 696f 6e20 7368 6f77 2d62 6567 unction show-beg │ │ │ -00009770: 696e 2073 686f 772d 6275 6666 6572 2022 in show-buffer " │ │ │ -00009780: 0c5c 6e22 206e 696c 2067 6574 2d62 7566 .\n" nil get-buf │ │ │ -00009790: 6665 722d 6372 6561 7465 2022 2a43 6f6d fer-create "*Com │ │ │ -000097a0: 7069 6c65 2d4c 6f67 2d53 686f 772a 2220 pile-Log-Show*" │ │ │ -000097b0: 6572 6173 652d 6275 6666 6572 2063 6f70 erase-buffer cop │ │ │ -000097c0: 792d 746f 2d62 7566 6665 7220 7365 6c65 y-to-buffer sele │ │ │ -000097d0: 6374 2d77 696e 646f 7720 7365 6c65 6374 ct-window select │ │ │ -000097e0: 6564 2d77 696e 646f 7720 6469 7370 6c61 ed-window displa │ │ │ -000097f0: 792d 6275 6666 6572 2072 6563 656e 7465 y-buffer recente │ │ │ -00009800: 7220 3120 6275 6666 6572 2d72 6561 642d r 1 buffer-read- │ │ │ -00009810: 6f6e 6c79 5d20 3529 2920 6361 6c6c 2d77 only] 5)) call-w │ │ │ -00009820: 6974 682d 636f 6e64 6974 696f 6e2d 6861 ith-condition-ha │ │ │ -00009830: 6e64 6c65 7220 235b 2865 7272 6f72 2d69 ndler #[(error-i │ │ │ -00009840: 6e66 6f29 2022 c108 2187 2220 5b65 7272 nfo) "..!." [err │ │ │ -00009850: 6f72 2d69 6e66 6f20 6279 7465 2d63 6f6d or-info byte-com │ │ │ -00009860: 7069 6c65 2d72 6570 6f72 742d 6572 726f pile-report-erro │ │ │ -00009870: 725d 2032 5d20 235b 6e69 6c20 228a 0971 r] 2] #[nil "..q │ │ │ -00009880: 88c2 6288 c3c4 7788 c5c6 21ab 85c2 7988 ..b...w...!...y. │ │ │ -00009890: aa72 6dac 88c7 c809 2121 88aa 67c9 2088 .rm.....!!..g. . │ │ │ -000098a0: ca20 88c4 8910 2987 2220 5b62 7974 652d . ....)." [byte- │ │ │ -000098b0: 636f 6d70 696c 652d 756e 7265 736f 6c76 compile-unresolv │ │ │ -000098c0: 6564 2d66 756e 6374 696f 6e73 2062 7974 ed-functions byt │ │ │ -000098d0: 652d 636f 6d70 696c 652d 696e 6275 6666 e-compile-inbuff │ │ │ -000098e0: 6572 2031 2022 2009 5c6e 0c22 206e 696c er 1 " .\n." nil │ │ │ -000098f0: 206c 6f6f 6b69 6e67 2d61 7420 223b 2220 looking-at ";" │ │ │ -00009900: 6279 7465 2d63 6f6d 7069 6c65 2d66 696c byte-compile-fil │ │ │ -00009910: 652d 666f 726d 2072 6561 6420 6279 7465 e-form read byte │ │ │ -00009920: 2d63 6f6d 7069 6c65 2d66 6c75 7368 2d70 -compile-flush-p │ │ │ -00009930: 656e 6469 6e67 2062 7974 652d 636f 6d70 ending byte-comp │ │ │ -00009940: 696c 652d 7761 726e 2d61 626f 7574 2d75 ile-warn-about-u │ │ │ -00009950: 6e72 6573 6f6c 7665 642d 6675 6e63 7469 nresolved-functi │ │ │ -00009960: 6f6e 735d 2033 5d20 756e 7573 6564 2d76 ons] 3] unused-v │ │ │ -00009970: 6172 7320 6279 7465 2d63 6f6d 7069 6c65 ars byte-compile │ │ │ -00009980: 2d77 6172 6e2d 6162 6f75 742d 756e 7573 -warn-about-unus │ │ │ -00009990: 6564 2d76 6172 6961 626c 6573 2028 6279 ed-variables (by │ │ │ -000099a0: 7465 2d63 6f64 6520 22c2 0921 10c3 8722 te-code "..!..." │ │ │ -000099b0: 205b 666f 726d 2062 7974 652d 636f 6d70 [form byte-comp │ │ │ -000099c0: 696c 652d 6f75 7462 7566 6665 7220 7265 ile-outbuffer re │ │ │ -000099d0: 6164 2074 5d20 3229 2028 2865 6e64 2d6f ad t] 2) ((end-o │ │ │ -000099e0: 662d 6669 6c65 2929 2065 7661 6c20 6b69 f-file)) eval ki │ │ │ -000099f0: 6c6c 2d62 7566 6665 7220 6279 7465 2d63 ll-buffer byte-c │ │ │ -00009a00: 6f6d 7069 6c65 2d65 6d61 6373 3139 2d63 ompile-emacs19-c │ │ │ -00009a10: 6f6d 7061 7469 6269 6c69 7479 2062 7974 ompatibility byt │ │ │ -00009a20: 652d 636f 6d70 696c 652d 6479 6e61 6d69 e-compile-dynami │ │ │ -00009a30: 6320 6279 7465 2d63 6f6d 7069 6c65 2d64 c byte-compile-d │ │ │ -00009a40: 796e 616d 6963 2d64 6f63 7374 7269 6e67 ynamic-docstring │ │ │ -00009a50: 7320 6669 6c65 6e61 6d65 2066 6f72 6d20 s filename form │ │ │ -00009a60: 6279 7465 2d63 6f6d 7069 6c65 2d6f 7574 byte-compile-out │ │ │ -00009a70: 7075 7420 6279 7465 2d63 6f6d 7069 6c65 put byte-compile │ │ │ -00009a80: 2d6d 6178 6465 7074 6820 6279 7465 2d63 -maxdepth byte-c │ │ │ -00009a90: 6f6d 7069 6c65 2d64 6570 7468 2062 7974 ompile-depth byt │ │ │ -00009aa0: 652d 636f 6d70 696c 652d 7461 672d 6e75 e-compile-tag-nu │ │ │ -00009ab0: 6d62 6572 2062 7974 652d 636f 6d70 696c mber byte-compil │ │ │ -00009ac0: 652d 7661 7269 6162 6c65 7320 6279 7465 e-variables byte │ │ │ -00009ad0: 2d63 6f6d 7069 6c65 2d63 6f6e 7374 616e -compile-constan │ │ │ -00009ae0: 7473 2070 7269 6e74 2d6c 6576 656c 2070 ts print-level p │ │ │ -00009af0: 7269 6e74 2d6c 656e 6774 6820 666c 6f61 rint-length floa │ │ │ -00009b00: 742d 6f75 7470 7574 2d66 6f72 6d61 7420 t-output-format │ │ │ -00009b10: 6279 7465 2d63 6f6d 7069 6c65 2d69 6e69 byte-compile-ini │ │ │ -00009b20: 7469 616c 2d6d 6163 726f 2d65 6e76 6972 tial-macro-envir │ │ │ -00009b30: 6f6e 6d65 6e74 2062 7974 652d 636f 6d70 onment byte-comp │ │ │ -00009b40: 696c 652d 6465 6661 756c 742d 7761 726e ile-default-warn │ │ │ -00009b50: 696e 6773 2062 7974 652d 636f 6d70 696c ings byte-compil │ │ │ -00009b60: 652d 6669 6c65 2d64 6f6d 6169 6e20 6279 e-file-domain by │ │ │ -00009b70: 7465 2d63 6f6d 7069 6c65 2d66 7265 652d te-compile-free- │ │ │ -00009b80: 6173 7369 676e 6d65 6e74 7320 6279 7465 assignments byte │ │ │ -00009b90: 2d63 6f6d 7069 6c65 2d66 7265 652d 7265 -compile-free-re │ │ │ -00009ba0: 6665 7265 6e63 6573 2062 7974 652d 636f ferences byte-co │ │ │ -00009bb0: 6d70 696c 652d 626f 756e 642d 7661 7269 mpile-bound-vari │ │ │ -00009bc0: 6162 6c65 7320 6279 7465 2d63 6f6d 7069 ables byte-compi │ │ │ -00009bd0: 6c65 2d75 6e72 6573 6f6c 7665 642d 6675 le-unresolved-fu │ │ │ -00009be0: 6e63 7469 6f6e 7320 6279 7465 2d63 6f6d nctions byte-com │ │ │ -00009bf0: 7069 6c65 2d61 7574 6f6c 6f61 642d 656e pile-autoload-en │ │ │ -00009c00: 7669 726f 6e6d 656e 7420 6279 7465 2d63 vironment byte-c │ │ │ -00009c10: 6f6d 7069 6c65 2d66 756e 6374 696f 6e2d ompile-function- │ │ │ -00009c20: 656e 7669 726f 6e6d 656e 7420 6279 7465 environment byte │ │ │ -00009c30: 2d63 6f6d 7069 6c65 2d6d 6163 726f 2d65 -compile-macro-e │ │ │ -00009c40: 6e76 6972 6f6e 6d65 6e74 2062 7974 652d nvironment byte- │ │ │ -00009c50: 636f 6d70 696c 652d 696e 6275 6666 6572 compile-inbuffer │ │ │ -00009c60: 206f 7665 7277 7269 7465 2d6d 6f64 6520 overwrite-mode │ │ │ -00009c70: 6279 7465 2d63 6f6d 7069 6c65 2d70 6f69 byte-compile-poi │ │ │ -00009c80: 6e74 2d6d 6178 2d70 7265 765d 2031 345d nt-max-prev] 14] │ │ │ -00009c90: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -00009ca0: 652d 636f 6d70 696c 652d 696e 7365 7274 e-compile-insert │ │ │ -00009cb0: 2d68 6561 6465 7220 235b 2866 696c 656e -header #[(filen │ │ │ -00009cc0: 616d 6520 6279 7465 2d63 6f6d 7069 6c65 ame byte-compile │ │ │ -00009cd0: 2d69 6e62 7566 6665 7220 6279 7465 2d63 -inbuffer byte-c │ │ │ -00009ce0: 6f6d 7069 6c65 2d6f 7574 6275 6666 6572 ompile-outbuffer │ │ │ -00009cf0: 2920 220c 7188 0918 0e3c 7188 c662 88c7 ) ".q.....\ │ │ │ -00009d30: 6ed9 61ab 83da aa8f 5c6e db61 ab83 dcaa n.a.....\n.a.... │ │ │ -00009d40: 875c 6eab 83dd aa81 de0d ab83 dfaa 81d6 .\n............. │ │ │ -00009d50: b105 880d ac91 e0e1 e2e3 e4e5 e60b 2121 ..............!! │ │ │ -00009d60: c6e7 4fe8 b107 88e9 d4b1 0288 0dab 9708 ..O............. │ │ │ -00009d70: ab94 eaeb e1e2 eced eee4 e5e6 0b21 21c6 .............!!. │ │ │ -00009d80: e74f efb1 5c6e 8829 f0f1 21ad b3f0 f221 .O..\n.)..!....! │ │ │ -00009d90: ac98 8a0c 7188 6562 88f3 f421 f5f3 f621 ....q.eb...!...! │ │ │ -00009da0: 51f7 7788 6064 2961 ab85 f889 163b 87f9 Q.w.`d)a.....;.. │ │ │ -00009db0: 6388 fa16 3b8a 0c71 88f7 8916 3f89 1129 c...;..q....?..) │ │ │ -00009dc0: 8722 205b 6479 6e61 6d69 632d 646f 6373 ." [dynamic-docs │ │ │ -00009dd0: 7472 696e 6773 2062 7974 652d 636f 6d70 trings byte-comp │ │ │ -00009de0: 696c 652d 6479 6e61 6d69 632d 646f 6373 ile-dynamic-docs │ │ │ -00009df0: 7472 696e 6773 2062 7974 652d 6f70 7469 trings byte-opti │ │ │ -00009e00: 6d69 7a65 2066 696c 656e 616d 6520 6279 mize filename by │ │ │ -00009e10: 7465 2d63 6f6d 7069 6c65 2d69 6e62 7566 te-compile-inbuf │ │ │ -00009e20: 6665 7220 6279 7465 2d63 6f6d 7069 6c65 fer byte-compile │ │ │ -00009e30: 2d65 6d61 6373 3139 2d63 6f6d 7061 7469 -emacs19-compati │ │ │ -00009e40: 6269 6c69 7479 2031 2022 3b45 4c43 2220 bility 1 ";ELC" │ │ │ -00009e50: 3139 2032 3020 2200 0000 5c6e 2220 223b 19 20 "...\n" "; │ │ │ -00009e60: 3b3b 2063 6f6d 7069 6c65 6420 6279 2022 ;; compiled by " │ │ │ -00009e70: 2062 6f75 6e64 7020 7573 6572 2d6d 6169 boundp user-mai │ │ │ -00009e80: 6c2d 6164 6472 6573 7320 7573 6572 2d6c l-address user-l │ │ │ -00009e90: 6f67 696e 2d6e 616d 6520 2240 2220 7379 ogin-name "@" sy │ │ │ -00009ea0: 7374 656d 2d6e 616d 6520 2220 6f6e 2022 stem-name " on " │ │ │ -00009eb0: 2063 7572 7265 6e74 2d74 696d 652d 7374 current-time-st │ │ │ -00009ec0: 7269 6e67 2022 5c6e 3b3b 3b20 6672 6f6d ring "\n;;; from │ │ │ -00009ed0: 2066 696c 6520 2220 225c 6e22 2022 3b3b file " "\n" ";; │ │ │ -00009ee0: 3b20 656d 6163 7320 7665 7273 696f 6e20 ; emacs version │ │ │ -00009ef0: 2220 222e 5c6e 2220 223b 3b3b 2062 7974 " ".\n" ";;; byt │ │ │ -00009f00: 6563 6f6d 7020 7665 7273 696f 6e20 2220 ecomp version " │ │ │ -00009f10: 225c 6e3b 3b3b 2022 2073 6f75 7263 6520 "\n;;; " source │ │ │ -00009f20: 2273 6f75 7263 652d 6c65 7665 6c20 6f70 "source-level op │ │ │ -00009f30: 7469 6d69 7a61 7469 6f6e 206f 6e6c 7922 timization only" │ │ │ -00009f40: 2062 7974 6520 2262 7974 652d 6c65 7665 byte "byte-leve │ │ │ -00009f50: 6c20 6f70 7469 6d69 7a61 7469 6f6e 206f l optimization o │ │ │ -00009f60: 6e6c 7922 2022 6f70 7469 6d69 7a61 7469 nly" "optimizati │ │ │ -00009f70: 6f6e 2069 7320 6f6e 2220 226f 7074 696d on is on" "optim │ │ │ -00009f80: 697a 6174 696f 6e20 6973 206f 6666 2220 ization is off" │ │ │ -00009f90: 223b 2063 6f6d 7069 6c65 6420 7769 7468 "; compiled with │ │ │ -00009fa0: 2045 6d61 6373 2031 3920 636f 6d70 6174 Emacs 19 compat │ │ │ -00009fb0: 6962 696c 6974 792e 5c6e 2220 223b 3b3b ibility.\n" ";;; │ │ │ -00009fc0: 2074 6869 7320 6669 6c65 2075 7365 7320 this file uses │ │ │ -00009fd0: 6f70 636f 6465 7320 7768 6963 6820 646f opcodes which do │ │ │ -00009fe0: 206e 6f74 2065 7869 7374 2069 6e20 456d not exist in Em │ │ │ -00009ff0: 6163 7320 3139 2e5c 6e22 2022 5c6e 2869 acs 19.\n" "\n(i │ │ │ -0000a000: 6620 2861 6e64 2028 626f 756e 6470 2027 f (and (boundp ' │ │ │ -0000a010: 656d 6163 732d 7665 7273 696f 6e29 5c6e emacs-version)\n │ │ │ -0000a020: 2220 2209 2028 6f72 2028 616e 6420 2862 " ". (or (and (b │ │ │ -0000a030: 6f75 6e64 7020 2765 706f 6368 3a3a 7665 oundp 'epoch::ve │ │ │ -0000a040: 7273 696f 6e29 2065 706f 6368 3a3a 7665 rsion) epoch::ve │ │ │ -0000a050: 7273 696f 6e29 5c6e 2220 2209 2020 2020 rsion)\n" ". │ │ │ -0000a060: 2028 7374 7269 6e67 2d6c 6573 7370 2065 (string-lessp e │ │ │ -0000a070: 6d61 6373 2d76 6572 7369 6f6e 205c 2232 macs-version \"2 │ │ │ -0000a080: 305c 2229 2929 5c6e 2220 2220 2020 2028 0\")))\n" " ( │ │ │ -0000a090: 6572 726f 7220 5c22 6022 2070 7269 6e31 error \"`" prin1 │ │ │ -0000a0a0: 2d74 6f2d 7374 7269 6e67 2066 696c 652d -to-string file- │ │ │ -0000a0b0: 6e61 6d65 2d6e 6f6e 6469 7265 6374 6f72 name-nondirector │ │ │ -0000a0c0: 7920 2d31 2022 2720 7761 7320 636f 6d70 y -1 "' was comp │ │ │ -0000a0d0: 696c 6564 2066 6f72 2045 6d61 6373 2032 iled for Emacs 2 │ │ │ -0000a0e0: 305c 2229 295c 6e5c 6e22 2022 286f 7220 0\"))\n\n" "(or │ │ │ -0000a0f0: 2862 6f75 6e64 7020 2763 7572 7265 6e74 (boundp 'current │ │ │ -0000a100: 2d6c 6f61 642d 6c69 7374 2920 2873 6574 -load-list) (set │ │ │ -0000a110: 7120 6375 7272 656e 742d 6c6f 6164 2d6c q current-load-l │ │ │ -0000a120: 6973 7420 6e69 6c29 295c 6e22 2022 3b3b ist nil))\n" ";; │ │ │ -0000a130: 3b20 7468 6973 2066 696c 6520 7573 6573 ; this file uses │ │ │ -0000a140: 206f 7063 6f64 6573 2077 6869 6368 2064 opcodes which d │ │ │ -0000a150: 6f20 6e6f 7420 6578 6973 7420 7072 696f o not exist prio │ │ │ -0000a160: 7220 746f 5c6e 2220 223b 3b3b 2058 456d r to\n" ";;; XEm │ │ │ -0000a170: 6163 7320 3139 2e31 342f 474e 5520 456d acs 19.14/GNU Em │ │ │ -0000a180: 6163 7320 3139 2e32 3920 6f72 206c 6174 acs 19.29 or lat │ │ │ -0000a190: 6572 2e22 2022 0920 2020 2020 2861 6e64 er." ". (and │ │ │ -0000a1a0: 2028 6e6f 7420 2873 7472 696e 672d 6d61 (not (string-ma │ │ │ -0000a1b0: 7463 6820 5c22 5845 6d61 6373 5c22 2065 tch \"XEmacs\" e │ │ │ -0000a1c0: 6d61 6373 2d76 6572 7369 6f6e 2929 5c6e macs-version))\n │ │ │ -0000a1d0: 2220 2209 2020 2020 2020 2020 2020 2873 " ". (s │ │ │ -0000a1e0: 7472 696e 672d 6c65 7373 7020 656d 6163 tring-lessp emac │ │ │ -0000a1f0: 732d 7665 7273 696f 6e20 5c22 3139 2e32 s-version \"19.2 │ │ │ -0000a200: 395c 2229 295c 6e22 2022 0920 2020 2020 9\"))\n" ". │ │ │ -0000a210: 2873 7472 696e 672d 6c65 7373 7020 656d (string-lessp em │ │ │ -0000a220: 6163 732d 7665 7273 696f 6e20 5c22 3139 acs-version \"19 │ │ │ -0000a230: 2e31 345c 2229 2929 5c6e 2220 2227 2077 .14\")))\n" "' w │ │ │ -0000a240: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ -0000a250: 5845 6d61 6373 2031 392e 3134 2f45 6d61 XEmacs 19.14/Ema │ │ │ -0000a260: 6373 2031 392e 3239 206f 7220 6c61 7465 cs 19.29 or late │ │ │ -0000a270: 725c 2229 295c 6e5c 6e22 2066 6561 7475 r\"))\n\n" featu │ │ │ -0000a280: 7265 7020 286f 7220 6d75 6c65 2066 696c rep (or mule fil │ │ │ -0000a290: 652d 636f 6469 6e67 2920 286e 6f74 206d e-coding) (not m │ │ │ -0000a2a0: 756c 6529 2063 6861 722d 746f 2d73 7472 ule) char-to-str │ │ │ -0000a2b0: 696e 6720 3020 222d 2220 3235 3520 6e69 ing 0 "-" 255 ni │ │ │ -0000a2c0: 6c20 7261 772d 7465 7874 2d75 6e69 7820 l raw-text-unix │ │ │ -0000a2d0: 2228 7265 7175 6972 6520 276d 756c 6529 "(require 'mule) │ │ │ -0000a2e0: 5c6e 3b3b 3b23 2323 636f 6469 6e67 2073 \n;;;###coding s │ │ │ -0000a2f0: 7973 7465 6d3a 2065 7363 6170 652d 7175 ystem: escape-qu │ │ │ -0000a300: 6f74 6564 5c6e 2220 6573 6361 7065 2d71 oted\n" escape-q │ │ │ -0000a310: 756f 7465 6420 6275 6666 6572 2d66 696c uoted buffer-fil │ │ │ -0000a320: 652d 636f 6469 6e67 2d73 7973 7465 6d20 e-coding-system │ │ │ -0000a330: 6279 7465 2d63 6f6d 7069 6c65 2d6f 7574 byte-compile-out │ │ │ -0000a340: 6275 6666 6572 2065 6d61 6373 2d76 6572 buffer emacs-ver │ │ │ -0000a350: 7369 6f6e 2062 7974 652d 636f 6d70 696c sion byte-compil │ │ │ -0000a360: 652d 7665 7273 696f 6e20 6279 7465 2d63 e-version byte-c │ │ │ -0000a370: 6f6d 7069 6c65 2d64 796e 616d 6963 5d20 ompile-dynamic] │ │ │ -0000a380: 3132 5d29 0a28 6465 6661 6c69 6173 2027 12]).(defalias ' │ │ │ -0000a390: 6279 7465 2d63 6f6d 7069 6c65 2d6f 7574 byte-compile-out │ │ │ -0000a3a0: 7075 742d 6669 6c65 2d66 6f72 6d20 235b put-file-form #[ │ │ │ -0000a3b0: 2866 6f72 6d29 2022 0da2 c673 ab93 c70d (form) "...s.... │ │ │ -0000a3c0: 383b ab8d c8c9 89ca 0dc9 0d40 cb61 2606 8;.........@.a&. │ │ │ -0000a3d0: 87cc c989 cc0b ad85 5c6e 3fad 81cc 1918 ........\n?..... │ │ │ -0000a3e0: 1e10 1e11 1e12 cdce 0c5c 2288 cf0d 0c5c .........\"....\ │ │ │ -0000a3f0: 2288 2dc9 8722 205b 7072 696e 742d 7265 ".-.." [print-re │ │ │ -0000a400: 6164 6162 6c79 2070 7269 6e74 2d67 656e adably print-gen │ │ │ -0000a410: 7379 6d20 6279 7465 2d63 6f6d 7069 6c65 sym byte-compile │ │ │ -0000a420: 2d65 6d61 6373 3139 2d63 6f6d 7061 7469 -emacs19-compati │ │ │ -0000a430: 6269 6c69 7479 2062 7974 652d 636f 6d70 bility byte-comp │ │ │ -0000a440: 696c 652d 7072 696e 742d 6765 6e73 796d ile-print-gensym │ │ │ -0000a450: 2062 7974 652d 636f 6d70 696c 652d 6f75 byte-compile-ou │ │ │ -0000a460: 7462 7566 6665 7220 666f 726d 2028 6465 tbuffer form (de │ │ │ -0000a470: 6675 6e20 6465 666d 6163 726f 2064 6566 fun defmacro def │ │ │ -0000a480: 7661 7220 6465 6663 6f6e 7374 2061 7574 var defconst aut │ │ │ -0000a490: 6f6c 6f61 6429 2033 2062 7974 652d 636f oload) 3 byte-co │ │ │ -0000a4a0: 6d70 696c 652d 6f75 7470 7574 2d64 6f63 mpile-output-doc │ │ │ -0000a4b0: 666f 726d 206e 696c 2028 225c 6e28 2220 form nil ("\n(" │ │ │ -0000a4c0: 3320 2229 2229 2061 7574 6f6c 6f61 6420 3 ")") autoload │ │ │ -0000a4d0: 7420 7072 696e 6320 225c 6e22 2070 7269 t princ "\n" pri │ │ │ -0000a4e0: 6e31 2070 7269 6e74 2d6c 6576 656c 2070 n1 print-level p │ │ │ -0000a4f0: 7269 6e74 2d6c 656e 6774 6820 7072 696e rint-length prin │ │ │ -0000a500: 742d 6573 6361 7065 2d6e 6577 6c69 6e65 t-escape-newline │ │ │ -0000a510: 735d 2038 5d29 0a23 4034 3935 2050 7269 s] 8]).#@495 Pri │ │ │ -0000a520: 6e74 2061 2066 6f72 6d20 7769 7468 2061 nt a form with a │ │ │ -0000a530: 2064 6f63 2073 7472 696e 672e 2020 494e doc string. IN │ │ │ -0000a540: 464f 2069 7320 2870 7265 6669 7820 646f FO is (prefix do │ │ │ -0000a550: 632d 696e 6465 7820 706f 7374 6669 7829 c-index postfix) │ │ │ -0000a560: 2e0a 4966 2050 5245 4641 4345 2061 6e64 ..If PREFACE and │ │ │ -0000a570: 204e 414d 4520 6172 6520 6e6f 6e2d 6e69 NAME are non-ni │ │ │ -0000a580: 6c2c 2070 7269 6e74 2074 6865 6d20 746f l, print them to │ │ │ -0000a590: 6f2c 0a62 6566 6f72 6520 494e 464f 2061 o,.before INFO a │ │ │ -0000a5a0: 6e64 2074 6865 2046 4f52 4d20 6275 7420 nd the FORM but │ │ │ -0000a5b0: 6166 7465 7220 7468 6520 646f 6320 7374 after the doc st │ │ │ -0000a5c0: 7269 6e67 2069 7473 656c 662e 0a49 6620 ring itself..If │ │ │ -0000a5d0: 5350 4543 494e 4445 5820 6973 206e 6f6e SPECINDEX is non │ │ │ -0000a5e0: 2d6e 696c 2c20 6974 2069 7320 7468 6520 -nil, it is the │ │ │ -0000a5f0: 696e 6465 7820 696e 2046 4f52 4d0a 6f66 index in FORM.of │ │ │ -0000a600: 2074 6865 2066 756e 6374 696f 6e20 6279 the function by │ │ │ -0000a610: 7465 636f 6465 2073 7472 696e 672e 2020 tecode string. │ │ │ -0000a620: 496e 2074 6861 7420 6361 7365 2c0a 7765 In that case,.we │ │ │ -0000a630: 206f 7574 7075 7420 7468 6174 2061 7267 output that arg │ │ │ -0000a640: 756d 656e 7420 616e 6420 7468 6520 666f ument and the fo │ │ │ -0000a650: 6c6c 6f77 696e 6720 6172 6775 6d65 6e74 llowing argument │ │ │ -0000a660: 2028 7468 6520 636f 6e73 7461 6e74 7320 (the constants │ │ │ -0000a670: 7665 6374 6f72 290a 746f 6765 7468 6572 vector).together │ │ │ -0000a680: 2c20 666f 7220 6c61 7a79 206c 6f61 6469 , for lazy loadi │ │ │ -0000a690: 6e67 2e0a 5155 4f54 4544 2073 6179 7320 ng..QUOTED says │ │ │ -0000a6a0: 7468 6174 2077 6520 6861 7665 2074 6f20 that we have to │ │ │ -0000a6b0: 7075 7420 6120 7175 6f74 6520 6265 666f put a quote befo │ │ │ -0000a6c0: 7265 2074 6865 0a6c 6973 7420 7468 6174 re the.list that │ │ │ -0000a6d0: 2072 6570 7265 7365 6e74 7320 6120 646f represents a do │ │ │ -0000a6e0: 6320 7374 7269 6e67 2072 6566 6572 656e c string referen │ │ │ -0000a6f0: 6365 2e0a 6061 7574 6f6c 6f61 6427 206e ce..`autoload' n │ │ │ -0000a700: 6565 6473 2074 6861 742e 1f0a 2864 6566 eeds that...(def │ │ │ -0000a710: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ -0000a720: 696c 652d 6f75 7470 7574 2d64 6f63 666f ile-output-docfo │ │ │ -0000a730: 726d 2023 5b28 7072 6566 6163 6520 6e61 rm #[(preface na │ │ │ -0000a740: 6d65 2069 6e66 6f20 666f 726d 2073 7065 me info form spe │ │ │ -0000a750: 6369 6e64 6578 2071 756f 7465 6429 2022 cindex quoted) " │ │ │ -0000a760: 0e1a 1870 5c6e 7188 c61c 0b41 40c7 59ab ...p\nq....A@.Y. │ │ │ -0000a770: b008 abad c863 88c9 0b41 400d 38c6 5c22 .....c...A@.8.\" │ │ │ -0000a780: 140b 4140 0d38 3bab 990b 4140 0d38 47c7 ..A@.8;...A@.8G. │ │ │ -0000a790: 56ab 8fca 0b41 400d 38c7 48cb 5c22 ab83 V....A@.8.H.\".. │ │ │ -0000a7a0: 0c5b 140e 17ab 8a0e 1763 88cc 0e1b 5c6e .[.......c....\n │ │ │ -0000a7b0: 5c22 880b 4063 88cd 890e 1cad 860e 1d3f \"..@c.........? │ │ │ -0000a7c0: ad81 cec6 c719 1e1e 1e1f 1e20 1e18 cc0d ........... .... │ │ │ -0000a7d0: 405c 6e5c 2288 0d41 8915 abe5 0954 11cf @\n\"..A.....T.. │ │ │ -0000a7e0: 6388 0e19 a7ab a109 0e19 55ab 9bc9 0d40 c.........U....@ │ │ │ -0000a7f0: 0d41 4042 cd5c 221c d0d1 d20c 5c22 5c6e .A@B.\".....\"\n │ │ │ -0000a800: 5c22 880d 4115 0954 1129 aa4e 090b 4140 \"..A..T.).N..A@ │ │ │ -0000a810: 55ab aa0c ab91 d0d1 0e21 ab83 d3aa 81d4 U........!...... │ │ │ -0000a820: 0c5c 225c 6e5c 2288 aa33 c61e 1860 54cc .\"\n\"..3...`T. │ │ │ -0000a830: 0d40 5c6e 5c22 8862 88d5 6388 6462 8829 .@\n\".b..c.db.) │ │ │ -0000a840: aa1d cc0d 405c 6e5c 2288 aa15 2dd6 0b38 ....@\n\"...-..8 │ │ │ -0000a850: 6388 2971 8829 c687 2220 5b64 796e 616d c.)q.).." [dynam │ │ │ -0000a860: 6963 2d64 6f63 7374 7269 6e67 7320 696e ic-docstrings in │ │ │ -0000a870: 6465 7820 6279 7465 2d63 6f6d 7069 6c65 dex byte-compile │ │ │ -0000a880: 2d6f 7574 6275 6666 6572 2069 6e66 6f20 -outbuffer info │ │ │ -0000a890: 706f 7369 7469 6f6e 2066 6f72 6d20 6e69 position form ni │ │ │ -0000a8a0: 6c20 3020 225c 6e22 2062 7974 652d 636f l 0 "\n" byte-co │ │ │ -0000a8b0: 6d70 696c 652d 6f75 7470 7574 2d61 732d mpile-output-as- │ │ │ -0000a8c0: 636f 6d6d 656e 7420 6368 6172 3d20 3f2a comment char= ?* │ │ │ -0000a8d0: 2070 7269 6e31 2074 2028 7429 2022 2022 prin1 t (t) " " │ │ │ -0000a8e0: 2070 7269 6e63 2066 6f72 6d61 7420 2228 princ format "( │ │ │ -0000a8f0: 2324 202e 2025 6429 206e 696c 2220 2227 #$ . %d) nil" "' │ │ │ -0000a900: 2823 2420 2e20 2564 2922 2022 2823 2420 (#$ . %d)" "(#$ │ │ │ -0000a910: 2e20 2564 2922 2022 5c5c 5c6e 2220 3220 . %d)" "\\\n" 2 │ │ │ -0000a920: 7072 6566 6163 6520 7072 696e 742d 6573 preface print-es │ │ │ -0000a930: 6361 7065 2d6e 6577 6c69 6e65 7320 7370 cape-newlines sp │ │ │ -0000a940: 6563 696e 6465 7820 6279 7465 2d63 6f6d ecindex byte-com │ │ │ -0000a950: 7069 6c65 2d64 796e 616d 6963 2d64 6f63 pile-dynamic-doc │ │ │ -0000a960: 7374 7269 6e67 7320 6e61 6d65 2062 7974 strings name byt │ │ │ -0000a970: 652d 636f 6d70 696c 652d 7072 696e 742d e-compile-print- │ │ │ -0000a980: 6765 6e73 796d 2062 7974 652d 636f 6d70 gensym byte-comp │ │ │ -0000a990: 696c 652d 656d 6163 7331 392d 636f 6d70 ile-emacs19-comp │ │ │ -0000a9a0: 6174 6962 696c 6974 7920 7072 696e 742d atibility print- │ │ │ -0000a9b0: 6765 6e73 796d 2d61 6c69 7374 2070 7269 gensym-alist pri │ │ │ -0000a9c0: 6e74 2d67 656e 7379 6d20 7072 696e 742d nt-gensym print- │ │ │ -0000a9d0: 7265 6164 6162 6c79 2071 756f 7465 645d readably quoted] │ │ │ -0000a9e0: 2036 2028 2324 202e 2034 3232 3639 295d 6 (#$ . 42269)] │ │ │ -0000a9f0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -0000aa00: 652d 636f 6d70 696c 652d 6b65 6570 2d70 e-compile-keep-p │ │ │ -0000aa10: 656e 6469 6e67 2023 5b28 666f 726d 2026 ending #[(form & │ │ │ -0000aa20: 6f70 7469 6f6e 616c 2068 616e 646c 6572 optional handler │ │ │ -0000aa30: 2920 2209 c573 ab85 c60c c75c 2214 0bab ) "..s.....\"... │ │ │ -0000aa40: 9dc7 1a0c a2c8 73ab 88c9 089b ab83 ca20 ......s........ │ │ │ -0000aa50: 880b 0c21 885c 6eab 83cb 2088 29aa 85cc ...!.\n... .)... │ │ │ -0000aa60: 0cc7 5c22 88cd 8722 205b 6279 7465 2d63 ..\"..." [byte-c │ │ │ -0000aa70: 6f6d 7069 6c65 2d6f 7574 7075 7420 6279 ompile-output by │ │ │ -0000aa80: 7465 2d6f 7074 696d 697a 6520 666f 722d te-optimize for- │ │ │ -0000aa90: 6566 6665 6374 2068 616e 646c 6572 2066 effect handler f │ │ │ -0000aaa0: 6f72 6d20 2874 2073 6f75 7263 6529 2062 orm (t source) b │ │ │ -0000aab0: 7974 652d 6f70 7469 6d69 7a65 2d66 6f72 yte-optimize-for │ │ │ -0000aac0: 6d20 7420 2866 7365 7420 6465 6661 6c69 m t (fset defali │ │ │ -0000aad0: 6173 2064 6566 696e 652d 6675 6e63 7469 as define-functi │ │ │ -0000aae0: 6f6e 2920 3330 3020 6279 7465 2d63 6f6d on) 300 byte-com │ │ │ -0000aaf0: 7069 6c65 2d66 6c75 7368 2d70 656e 6469 pile-flush-pendi │ │ │ -0000ab00: 6e67 2062 7974 652d 636f 6d70 696c 652d ng byte-compile- │ │ │ -0000ab10: 6469 7363 6172 6420 6279 7465 2d63 6f6d discard byte-com │ │ │ -0000ab20: 7069 6c65 2d66 6f72 6d20 6e69 6c5d 2033 pile-form nil] 3 │ │ │ -0000ab30: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -0000ab40: 7465 2d63 6f6d 7069 6c65 2d66 6c75 7368 te-compile-flush │ │ │ -0000ab50: 2d70 656e 6469 6e67 2023 5b6e 696c 2022 -pending #[nil " │ │ │ -0000ab60: 0cad a6c6 c7c8 5c22 891d a2c9 61ab 88ca ......\"....a... │ │ │ -0000ab70: cb0d 415c 2288 aa87 0dab 84cb 0d21 88cc ..A\"........!.. │ │ │ -0000ab80: 8913 12cd 8911 10cc 8914 2987 2220 5b62 ..........)." [b │ │ │ -0000ab90: 7974 652d 636f 6d70 696c 652d 6d61 7864 yte-compile-maxd │ │ │ -0000aba0: 6570 7468 2062 7974 652d 636f 6d70 696c epth byte-compil │ │ │ -0000abb0: 652d 6465 7074 6820 6279 7465 2d63 6f6d e-depth byte-com │ │ │ -0000abc0: 7069 6c65 2d76 6172 6961 626c 6573 2062 pile-variables b │ │ │ -0000abd0: 7974 652d 636f 6d70 696c 652d 636f 6e73 yte-compile-cons │ │ │ -0000abe0: 7461 6e74 7320 6279 7465 2d63 6f6d 7069 tants byte-compi │ │ │ -0000abf0: 6c65 2d6f 7574 7075 7420 666f 726d 2062 le-output form b │ │ │ -0000ac00: 7974 652d 636f 6d70 696c 652d 6f75 742d yte-compile-out- │ │ │ -0000ac10: 746f 706c 6576 656c 2074 2066 696c 6520 toplevel t file │ │ │ -0000ac20: 7072 6f67 6e20 6d61 7063 6172 2062 7974 progn mapcar byt │ │ │ -0000ac30: 652d 636f 6d70 696c 652d 6f75 7470 7574 e-compile-output │ │ │ -0000ac40: 2d66 696c 652d 666f 726d 206e 696c 2030 -file-form nil 0 │ │ │ -0000ac50: 5d20 345d 290a 2864 6566 616c 6961 7320 ] 4]).(defalias │ │ │ -0000ac60: 2762 7974 652d 636f 6d70 696c 652d 6669 'byte-compile-fi │ │ │ -0000ac70: 6c65 2d66 6f72 6d20 235b 2866 6f72 6d29 le-form #[(form) │ │ │ -0000ac80: 2022 c489 1a19 0b3a ac85 c50b 21aa ae0b ".....:....!... │ │ │ -0000ac90: 4039 ab97 0b40 c64e 8912 ab8f 5c6e 0b21 @9...@.N....\n.! │ │ │ -0000aca0: 8913 ad9a c720 88c8 0b21 aa92 0bc9 0b08 ..... ...!...... │ │ │ -0000acb0: 5c22 8913 61ab 85c5 0b21 aa83 ca0b 212a \"..a....!....!* │ │ │ -0000acc0: 8722 205b 6279 7465 2d63 6f6d 7069 6c65 ." [byte-compile │ │ │ -0000acd0: 2d6d 6163 726f 2d65 6e76 6972 6f6e 6d65 -macro-environme │ │ │ -0000ace0: 6e74 2062 7974 652d 636f 6d70 696c 652d nt byte-compile- │ │ │ -0000acf0: 6375 7272 656e 742d 666f 726d 2068 616e current-form han │ │ │ -0000ad00: 646c 6572 2066 6f72 6d20 6e69 6c20 6279 dler form nil by │ │ │ -0000ad10: 7465 2d63 6f6d 7069 6c65 2d6b 6565 702d te-compile-keep- │ │ │ -0000ad20: 7065 6e64 696e 6720 6279 7465 2d68 756e pending byte-hun │ │ │ -0000ad30: 6b2d 6861 6e64 6c65 7220 6279 7465 2d63 k-handler byte-c │ │ │ -0000ad40: 6f6d 7069 6c65 2d66 6c75 7368 2d70 656e ompile-flush-pen │ │ │ -0000ad50: 6469 6e67 2062 7974 652d 636f 6d70 696c ding byte-compil │ │ │ -0000ad60: 652d 6f75 7470 7574 2d66 696c 652d 666f e-output-file-fo │ │ │ -0000ad70: 726d 206d 6163 726f 6578 7061 6e64 2062 rm macroexpand b │ │ │ -0000ad80: 7974 652d 636f 6d70 696c 652d 6669 6c65 yte-compile-file │ │ │ -0000ad90: 2d66 6f72 6d5d 2034 5d29 0a28 7075 7420 -form] 4]).(put │ │ │ -0000ada0: 2764 6566 7375 6273 7420 2762 7974 652d 'defsubst 'byte- │ │ │ -0000adb0: 6875 6e6b 2d68 616e 646c 6572 2027 6279 hunk-handler 'by │ │ │ -0000adc0: 7465 2d63 6f6d 7069 6c65 2d66 696c 652d te-compile-file- │ │ │ -0000add0: 666f 726d 2d64 6566 7375 6273 7429 0a28 form-defsubst).( │ │ │ -0000ade0: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ -0000adf0: 6f6d 7069 6c65 2d66 696c 652d 666f 726d ompile-file-form │ │ │ -0000ae00: 2d64 6566 7375 6273 7420 235b 2866 6f72 -defsubst #[(for │ │ │ -0000ae10: 6d29 2022 0b41 405c 6eb7 ab8b 0b41 4011 m) ".A@\n....A@. │ │ │ -0000ae20: c4c5 0b41 405c 2288 c6c7 0b08 5c22 2188 ...A@\".....\"!. │ │ │ -0000ae30: c887 2220 5b62 7974 652d 636f 6d70 696c .." [byte-compil │ │ │ -0000ae40: 652d 6d61 6372 6f2d 656e 7669 726f 6e6d e-macro-environm │ │ │ -0000ae50: 656e 7420 6279 7465 2d63 6f6d 7069 6c65 ent byte-compile │ │ │ -0000ae60: 2d63 7572 7265 6e74 2d66 6f72 6d20 6279 -current-form by │ │ │ -0000ae70: 7465 2d63 6f6d 7069 6c65 2d75 6e72 6573 te-compile-unres │ │ │ -0000ae80: 6f6c 7665 642d 6675 6e63 7469 6f6e 7320 olved-functions │ │ │ -0000ae90: 666f 726d 2062 7974 652d 636f 6d70 696c form byte-compil │ │ │ -0000aea0: 652d 7761 726e 2022 6465 6673 7562 7374 e-warn "defsubst │ │ │ -0000aeb0: 2025 7320 7761 7320 7573 6564 2062 6566 %s was used bef │ │ │ -0000aec0: 6f72 6520 6974 2077 6173 2064 6566 696e ore it was defin │ │ │ -0000aed0: 6564 2220 6279 7465 2d63 6f6d 7069 6c65 ed" byte-compile │ │ │ -0000aee0: 2d66 696c 652d 666f 726d 206d 6163 726f -file-form macro │ │ │ -0000aef0: 6578 7061 6e64 206e 696c 5d20 345d 290a expand nil] 4]). │ │ │ -0000af00: 2870 7574 2027 6175 746f 6c6f 6164 2027 (put 'autoload ' │ │ │ -0000af10: 6279 7465 2d68 756e 6b2d 6861 6e64 6c65 byte-hunk-handle │ │ │ -0000af20: 7220 2762 7974 652d 636f 6d70 696c 652d r 'byte-compile- │ │ │ -0000af30: 6669 6c65 2d66 6f72 6d2d 6175 746f 6c6f file-form-autolo │ │ │ -0000af40: 6164 290a 2864 6566 616c 6961 7320 2762 ad).(defalias 'b │ │ │ -0000af50: 7974 652d 636f 6d70 696c 652d 6669 6c65 yte-compile-file │ │ │ -0000af60: 2d66 6f72 6d2d 6175 746f 6c6f 6164 2023 -form-autoload # │ │ │ -0000af70: 5b28 666f 726d 2920 220d 4140 3aab 880d [(form) ".A@:... │ │ │ -0000af80: 4140 40c6 61aa 950d 4140 39ab 8ec7 0d41 A@@.a...A@9....A │ │ │ -0000af90: 4021 ac8a 0d41 40c8 73aa 81c9 ad85 ca0d @!...A@.s....... │ │ │ -0000afa0: 4140 211c cb0d 383a ab88 cb0d 3840 c661 A@!...8:....8@.a │ │ │ -0000afb0: aa95 cb0d 3839 ab8e c7cb 0d38 21ac 8acb ....89.....8!... │ │ │ -0000afc0: 0d38 c873 aa81 c9ad 87ca cb0d 3821 cc73 .8.s........8!.s │ │ │ -0000afd0: 8919 abb0 0d1d 0d41 8915 aba0 0d40 3aab .......A.....@:. │ │ │ -0000afe0: 870d 4040 c661 aa92 0d40 39ab 8cc7 0d40 ..@@.a...@9....@ │ │ │ -0000aff0: 21ac 630d 40c8 73aa 81c9 ac5a 0d29 ac84 !.c.@.s....Z.).. │ │ │ -0000b000: ca0d 2188 0cab 9e0c 0bb7 891a ab90 cd08 ..!............. │ │ │ -0000b010: 73ab 85ce cf0c 5c22 885c 6e0d a188 aa86 s.....\".\n..... │ │ │ -0000b020: 0c0d 420b 4213 292a d00d 383b ab82 0d87 ..B.B.)*..8;.... │ │ │ -0000b030: d10d d25c 2287 2220 5b62 7974 652d 636f ...\"." [byte-co │ │ │ -0000b040: 6d70 696c 652d 7761 726e 696e 6773 206d mpile-warnings m │ │ │ -0000b050: 6163 726f 7020 6f6c 6420 6279 7465 2d63 acrop old byte-c │ │ │ -0000b060: 6f6d 7069 6c65 2d61 7574 6f6c 6f61 642d ompile-autoload- │ │ │ -0000b070: 656e 7669 726f 6e6d 656e 7420 6e61 6d65 environment name │ │ │ -0000b080: 2066 6f72 6d20 7175 6f74 6520 6b65 7977 form quote keyw │ │ │ -0000b090: 6f72 6470 2028 6e69 6c20 7429 2074 2065 ordp (nil t) t e │ │ │ -0000b0a0: 7661 6c20 3520 2874 206d 6163 726f 2920 val 5 (t macro) │ │ │ -0000b0b0: 7265 6465 6669 6e65 2062 7974 652d 636f redefine byte-co │ │ │ -0000b0c0: 6d70 696c 652d 7761 726e 2022 6d75 6c74 mpile-warn "mult │ │ │ -0000b0d0: 6970 6c65 2061 7574 6f6c 6f61 6473 2066 iple autoloads f │ │ │ -0000b0e0: 6f72 2025 7322 2033 2062 7974 652d 636f or %s" 3 byte-co │ │ │ -0000b0f0: 6d70 696c 652d 6b65 6570 2d70 656e 6469 mpile-keep-pendi │ │ │ -0000b100: 6e67 2062 7974 652d 636f 6d70 696c 652d ng byte-compile- │ │ │ -0000b110: 6e6f 726d 616c 2d63 616c 6c5d 2034 5d29 normal-call] 4]) │ │ │ -0000b120: 0a28 6279 7465 2d63 6f64 6520 22c0 c1c2 .(byte-code "... │ │ │ -0000b130: c323 88c0 c4c2 c323 8722 205b 7075 7420 .#.....#." [put │ │ │ -0000b140: 6465 6676 6172 2062 7974 652d 6875 6e6b defvar byte-hunk │ │ │ -0000b150: 2d68 616e 646c 6572 2062 7974 652d 636f -handler byte-co │ │ │ -0000b160: 6d70 696c 652d 6669 6c65 2d66 6f72 6d2d mpile-file-form- │ │ │ -0000b170: 6465 6676 6172 2d6f 722d 6465 6663 6f6e defvar-or-defcon │ │ │ -0000b180: 7374 2064 6566 636f 6e73 745d 2034 290a st defconst] 4). │ │ │ -0000b190: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -0000b1a0: 636f 6d70 696c 652d 6669 6c65 2d66 6f72 compile-file-for │ │ │ -0000b1b0: 6d2d 6465 6676 6172 2d6f 722d 6465 6663 m-defvar-or-defc │ │ │ -0000b1c0: 6f6e 7374 2023 5b28 666f 726d 2920 220b onst #[(form) ". │ │ │ -0000b1d0: 47c4 56ab 8dc5 c60b 400b 4140 0b41 47c7 G.V.....@.A@.AG. │ │ │ -0000b1e0: 2588 0b47 c756 ab92 c70b 383b ac8c c5c8 %..G.V....8;.... │ │ │ -0000b1f0: 0b40 0b41 40c7 0b38 2488 c70b 38ac 84c9 .@.A@..8$...8... │ │ │ -0000b200: 0b21 87ca 0973 ab88 0b41 4008 425c 6e42 .!...s...A@.B\nB │ │ │ -0000b210: 12cb 0b38 3aab 90cc 0b21 8913 4141 cdcb ...8:....!..AA.. │ │ │ -0000b220: 0b38 cecf 23a0 880b 8722 205b 6279 7465 .8..#...." [byte │ │ │ -0000b230: 2d63 6f6d 7069 6c65 2d67 6c6f 6261 6c2d -compile-global- │ │ │ -0000b240: 6269 7420 6279 7465 2d63 6f6d 7069 6c65 bit byte-compile │ │ │ -0000b250: 2d77 6172 6e69 6e67 7320 6279 7465 2d63 -warnings byte-c │ │ │ -0000b260: 6f6d 7069 6c65 2d62 6f75 6e64 2d76 6172 ompile-bound-var │ │ │ -0000b270: 6961 626c 6573 2066 6f72 6d20 3420 6279 iables form 4 by │ │ │ -0000b280: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e20 te-compile-warn │ │ │ -0000b290: 2225 7320 2573 2063 616c 6c65 6420 7769 "%s %s called wi │ │ │ -0000b2a0: 7468 2025 6420 6172 6775 6d65 6e74 732c th %d arguments, │ │ │ -0000b2b0: 2062 7574 2061 6363 6570 7473 206f 6e6c but accepts onl │ │ │ -0000b2c0: 7920 2573 2220 3320 2254 6869 7264 2061 y %s" 3 "Third a │ │ │ -0000b2d0: 7267 2074 6f20 2573 2025 7320 6973 206e rg to %s %s is n │ │ │ -0000b2e0: 6f74 2061 2073 7472 696e 673a 2025 7322 ot a string: %s" │ │ │ -0000b2f0: 2062 7974 652d 636f 6d70 696c 652d 6b65 byte-compile-ke │ │ │ -0000b300: 6570 2d70 656e 6469 6e67 2066 7265 652d ep-pending free- │ │ │ -0000b310: 7661 7273 2032 2063 6f70 792d 7365 7175 vars 2 copy-sequ │ │ │ -0000b320: 656e 6365 2062 7974 652d 636f 6d70 696c ence byte-compil │ │ │ -0000b330: 652d 746f 702d 6c65 7665 6c20 6e69 6c20 e-top-level nil │ │ │ -0000b340: 6669 6c65 5d20 375d 290a 2870 7574 2027 file] 7]).(put ' │ │ │ -0000b350: 7265 7175 6972 6520 2762 7974 652d 6875 require 'byte-hu │ │ │ -0000b360: 6e6b 2d68 616e 646c 6572 2027 6279 7465 nk-handler 'byte │ │ │ -0000b370: 2d63 6f6d 7069 6c65 2d66 696c 652d 666f -compile-file-fo │ │ │ -0000b380: 726d 2d65 7661 6c2d 626f 756e 6461 7279 rm-eval-boundary │ │ │ -0000b390: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -0000b3a0: 652d 636f 6d70 696c 652d 6669 6c65 2d66 e-compile-file-f │ │ │ -0000b3b0: 6f72 6d2d 6576 616c 2d62 6f75 6e64 6172 orm-eval-boundar │ │ │ -0000b3c0: 7920 235b 2866 6f72 6d29 2022 c108 2188 y #[(form) "..!. │ │ │ -0000b3d0: c208 c35c 2287 2220 5b66 6f72 6d20 6576 ...\"." [form ev │ │ │ -0000b3e0: 616c 2062 7974 652d 636f 6d70 696c 652d al byte-compile- │ │ │ -0000b3f0: 6b65 6570 2d70 656e 6469 6e67 2062 7974 keep-pending byt │ │ │ -0000b400: 652d 636f 6d70 696c 652d 6e6f 726d 616c e-compile-normal │ │ │ -0000b410: 2d63 616c 6c5d 2033 5d29 0a28 6279 7465 -call] 3]).(byte │ │ │ -0000b420: 2d63 6f64 6520 22c0 c1c2 c323 88c0 c4c2 -code "....#.... │ │ │ -0000b430: c323 88c0 c5c2 c323 8722 205b 7075 7420 .#.....#." [put │ │ │ -0000b440: 7072 6f67 6e20 6279 7465 2d68 756e 6b2d progn byte-hunk- │ │ │ -0000b450: 6861 6e64 6c65 7220 6279 7465 2d63 6f6d handler byte-com │ │ │ -0000b460: 7069 6c65 2d66 696c 652d 666f 726d 2d70 pile-file-form-p │ │ │ -0000b470: 726f 676e 2070 726f 6731 2070 726f 6732 rogn prog1 prog2 │ │ │ -0000b480: 5d20 3429 0a28 6465 6661 6c69 6173 2027 ] 4).(defalias ' │ │ │ -0000b490: 6279 7465 2d63 6f6d 7069 6c65 2d66 696c byte-compile-fil │ │ │ -0000b4a0: 652d 666f 726d 2d70 726f 676e 2023 5b28 e-form-progn #[( │ │ │ -0000b4b0: 666f 726d 2920 22c1 c208 415c 2288 c387 form) "...A\"... │ │ │ -0000b4c0: 2220 5b66 6f72 6d20 6d61 7063 6172 2062 " [form mapcar b │ │ │ -0000b4d0: 7974 652d 636f 6d70 696c 652d 6669 6c65 yte-compile-file │ │ │ -0000b4e0: 2d66 6f72 6d20 6e69 6c5d 2033 5d29 0a28 -form nil] 3]).( │ │ │ -0000b4f0: 7075 7420 2765 7661 6c20 2762 7974 652d put 'eval 'byte- │ │ │ -0000b500: 6875 6e6b 2d68 616e 646c 6572 2027 6279 hunk-handler 'by │ │ │ -0000b510: 7465 2d63 6f6d 7069 6c65 2d66 696c 652d te-compile-file- │ │ │ -0000b520: 666f 726d 2d65 7661 6c29 0a28 6465 6661 form-eval).(defa │ │ │ -0000b530: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ -0000b540: 6c65 2d66 696c 652d 666f 726d 2d65 7661 le-file-form-eva │ │ │ -0000b550: 6c20 235b 2866 6f72 6d29 2022 0841 40a2 l #[(form) ".A@. │ │ │ -0000b560: c161 ab86 0841 4041 4087 c208 2187 2220 .a...A@A@...!." │ │ │ -0000b570: 5b66 6f72 6d20 7175 6f74 6520 6279 7465 [form quote byte │ │ │ -0000b580: 2d63 6f6d 7069 6c65 2d6b 6565 702d 7065 -compile-keep-pe │ │ │ -0000b590: 6e64 696e 675d 2032 5d29 0a28 7075 7420 nding] 2]).(put │ │ │ -0000b5a0: 2764 6566 756e 2027 6279 7465 2d68 756e 'defun 'byte-hun │ │ │ -0000b5b0: 6b2d 6861 6e64 6c65 7220 2762 7974 652d k-handler 'byte- │ │ │ -0000b5c0: 636f 6d70 696c 652d 6669 6c65 2d66 6f72 compile-file-for │ │ │ -0000b5d0: 6d2d 6465 6675 6e29 0a28 6465 6661 6c69 m-defun).(defali │ │ │ -0000b5e0: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ -0000b5f0: 2d66 696c 652d 666f 726d 2d64 6566 756e -file-form-defun │ │ │ -0000b600: 2023 5b28 666f 726d 2920 22c1 08c2 5c22 #[(form) "...\" │ │ │ -0000b610: 8722 205b 666f 726d 2062 7974 652d 636f ." [form byte-co │ │ │ -0000b620: 6d70 696c 652d 6669 6c65 2d66 6f72 6d2d mpile-file-form- │ │ │ -0000b630: 6465 666d 756d 626c 6520 6e69 6c5d 2033 defmumble nil] 3 │ │ │ -0000b640: 5d29 0a28 7075 7420 2764 6566 6d61 6372 ]).(put 'defmacr │ │ │ -0000b650: 6f20 2762 7974 652d 6875 6e6b 2d68 616e o 'byte-hunk-han │ │ │ -0000b660: 646c 6572 2027 6279 7465 2d63 6f6d 7069 dler 'byte-compi │ │ │ -0000b670: 6c65 2d66 696c 652d 666f 726d 2d64 6566 le-file-form-def │ │ │ -0000b680: 6d61 6372 6f29 0a28 6465 6661 6c69 6173 macro).(defalias │ │ │ -0000b690: 2027 6279 7465 2d63 6f6d 7069 6c65 2d66 'byte-compile-f │ │ │ -0000b6a0: 696c 652d 666f 726d 2d64 6566 6d61 6372 ile-form-defmacr │ │ │ -0000b6b0: 6f20 235b 2866 6f72 6d29 2022 c108 c25c o #[(form) "...\ │ │ │ -0000b6c0: 2287 2220 5b66 6f72 6d20 6279 7465 2d63 "." [form byte-c │ │ │ -0000b6d0: 6f6d 7069 6c65 2d66 696c 652d 666f 726d ompile-file-form │ │ │ -0000b6e0: 2d64 6566 6d75 6d62 6c65 2074 5d20 335d -defmumble t] 3] │ │ │ -0000b6f0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -0000b700: 652d 636f 6d70 696c 652d 636f 6d70 696c e-compile-compil │ │ │ -0000b710: 6564 2d6f 626a 2d74 6f2d 6c69 7374 2023 ed-obj-to-list # │ │ │ -0000b720: 5b28 6f62 6a29 2022 c6c7 c80d ad85 0c3f [(obj) ".......? │ │ │ -0000b730: ad81 c9ca 1b1a 19cb 0821 2bcc cd4f ce51 .........!+..O.Q │ │ │ -0000b740: 2187 2220 5b6f 626a 2070 7269 6e74 2d72 !." [obj print-r │ │ │ -0000b750: 6561 6461 626c 7920 7072 696e 742d 6765 eadably print-ge │ │ │ -0000b760: 6e73 796d 2070 7269 6e74 2d67 656e 7379 nsym print-gensy │ │ │ -0000b770: 6d2d 616c 6973 7420 6279 7465 2d63 6f6d m-alist byte-com │ │ │ -0000b780: 7069 6c65 2d65 6d61 6373 3139 2d63 6f6d pile-emacs19-com │ │ │ -0000b790: 7061 7469 6269 6c69 7479 2062 7974 652d patibility byte- │ │ │ -0000b7a0: 636f 6d70 696c 652d 7072 696e 742d 6765 compile-print-ge │ │ │ -0000b7b0: 6e73 796d 2072 6561 6420 2228 2220 7420 nsym read "(" t │ │ │ -0000b7c0: 2874 2920 6e69 6c20 7072 696e 312d 746f (t) nil prin1-to │ │ │ -0000b7d0: 2d73 7472 696e 6720 3220 2d31 2022 2922 -string 2 -1 ")" │ │ │ -0000b7e0: 5d20 355d 290a 2864 6566 616c 6961 7320 ] 5]).(defalias │ │ │ -0000b7f0: 2762 7974 652d 636f 6d70 696c 652d 6669 'byte-compile-fi │ │ │ -0000b800: 6c65 2d66 6f72 6d2d 6465 666d 756d 626c le-form-defmumbl │ │ │ -0000b810: 6520 235b 2866 6f72 6d20 6d61 6372 6f70 e #[(form macrop │ │ │ -0000b820: 2920 220b 4140 1c5c 6eab 83c6 aa81 c719 ) ".A@.\n....... │ │ │ -0000b830: 5c6e ab83 c7aa 81c6 1e41 0c09 4ab7 1e3c \n.......A..J..< │ │ │ -0000b840: 0c0e 414a b71e 3fc8 891e 461e 470e 48ab ..AJ..?...F.G.H. │ │ │ -0000b850: 8f0c 0e40 b7ac 890c c889 450e 4042 1640 ...@......E.@B.@ │ │ │ -0000b860: 0c16 49c9 0e3d 73ab 85ca 0b5c 6e5c 2288 ..I..=s....\n\". │ │ │ -0000b870: 0e4a ab92 cbcc 0e42 ab86 cd0e 4221 aa81 .J.....B....B!.. │ │ │ -0000b880: ce0b 4140 2388 0e3f ab9c c90e 3d73 ab8f ..A@#..?....=s.. │ │ │ -0000b890: 0b41 400e 43b7 ac87 cfd0 0b41 405c 2288 .A@.C......A@\". │ │ │ -0000b8a0: 0e3f c8a1 88aa e70e 3cab 9ec9 0e3d 73ab .?......<....=s. │ │ │ -0000b8b0: dd0b 4140 0e43 b7ac d5cf d15c 6eab 83d2 ..A@.C.....\n... │ │ │ -0000b8c0: aa81 d30b 4140 2388 aac5 d40c 21ab c0d5 ....A@#.....!... │ │ │ -0000b8d0: 0c4b 21ac 8d0c 4ba2 5c6e ab83 d6aa 81d7 .K!...K.\n...... │ │ │ -0000b8e0: 61ab adc9 0e3d 73ab 9ecf d8d5 0c4b 21ab a....=s......K!. │ │ │ -0000b8f0: 83d9 aa87 5c6e ab83 d3aa 81d2 0b41 405c ....\n.......A@\ │ │ │ -0000b900: 6eab 83d2 aa81 d324 8809 0cc8 4209 4a42 n......$....B.JB │ │ │ -0000b910: 4c88 da0b 9b89 1e3e 403b ab9c 0e3e a3a2 L......>@;...>.. │ │ │ -0000b920: 39ab 950e 3ea3 a2ab 8f0e 3ea3 a3a2 3bab 9...>.....>...;. │ │ │ -0000b930: 87cf db0b 4140 5c22 8829 dcd6 0b41 4142 ....A@\".)...AAB │ │ │ -0000b940: 2118 dd08 211d 0e3c ab87 0e3c 08a1 88aa !...!..<...<.... │ │ │ -0000b950: 8909 0c08 4209 4a42 4c88 da0b 383b ab9a ....B.JBL...8;.. │ │ │ -0000b960: 0da2 de61 ab94 0d41 40a2 d661 ab8c 0b40 ...a...A@..a...@ │ │ │ -0000b970: 0c0d 4140 4142 4282 0702 df20 88da 0b38 ..A@ABB.... ...8 │ │ │ -0000b980: 3bac c6e0 e10c 0d3a ac89 5c6e ab83 e2aa ;......:..\n.... │ │ │ -0000b990: 9be3 aa98 0d40 de61 ab8b 0815 5c6e ab83 .....@.a....\n.. │ │ │ -0000b9a0: e4aa 8ae5 aa87 5c6e ab83 e6aa 81e7 e80d ......\n........ │ │ │ -0000b9b0: 21ab 85e9 0d21 aa84 ea0d c85c 220d 3a3f !....!.....\".:? │ │ │ -0000b9c0: ad85 0e44 ad81 ebc8 2606 88aa e4e0 e10c ...D....&....... │ │ │ -0000b9d0: 0d3a ac89 5c6e ab83 ecaa 9bed aa98 0d40 .:..\n.........@ │ │ │ -0000b9e0: de61 ab8b 0815 5c6e ab83 eeaa 8aef aa87 .a....\n........ │ │ │ -0000b9f0: 5c6e ab83 f0aa 81f1 0d3a ab83 0daa a7f2 \n.......:...... │ │ │ -0000ba00: 0d21 f30d 21f4 0d21 f50d 2146 f60d f75c .!..!..!..!F...\ │ │ │ -0000ba10: 2289 1e45 ad83 0e45 4329 a4f8 0d21 ad86 "..E...EC)...!.. │ │ │ -0000ba20: f90d 2141 4043 a40d 3a3f ad85 0e44 ad81 ..!A@C..:?...D.. │ │ │ -0000ba30: ebc8 2606 88fa fb0e 4b5c 2288 c82e 0987 ..&.....K\"..... │ │ │ -0000ba40: 2220 5b6e 6577 2d6f 6e65 2074 6869 732d " [new-one this- │ │ │ -0000ba50: 6b69 6e64 206d 6163 726f 7020 666f 726d kind macrop form │ │ │ -0000ba60: 206e 616d 6520 636f 6465 2062 7974 652d name code byte- │ │ │ -0000ba70: 636f 6d70 696c 652d 6d61 6372 6f2d 656e compile-macro-en │ │ │ -0000ba80: 7669 726f 6e6d 656e 7420 6279 7465 2d63 vironment byte-c │ │ │ -0000ba90: 6f6d 7069 6c65 2d66 756e 6374 696f 6e2d ompile-function- │ │ │ -0000baa0: 656e 7669 726f 6e6d 656e 7420 6e69 6c20 environment nil │ │ │ -0000bab0: 7265 6465 6669 6e65 2062 7974 652d 636f redefine byte-co │ │ │ -0000bac0: 6d70 696c 652d 6172 676c 6973 742d 7761 mpile-arglist-wa │ │ │ -0000bad0: 726e 206d 6573 7361 6765 2022 436f 6d70 rn message "Comp │ │ │ -0000bae0: 696c 696e 6720 2573 2e2e 2e20 2825 7329 iling %s... (%s) │ │ │ -0000baf0: 2220 6669 6c65 2d6e 616d 652d 6e6f 6e64 " file-name-nond │ │ │ -0000bb00: 6972 6563 746f 7279 2022 2220 6279 7465 irectory "" byte │ │ │ -0000bb10: 2d63 6f6d 7069 6c65 2d77 6172 6e20 2225 -compile-warn "% │ │ │ -0000bb20: 7320 6465 6669 6e65 6420 6d75 6c74 6970 s defined multip │ │ │ -0000bb30: 6c65 2074 696d 6573 2c20 6173 2062 6f74 le times, as bot │ │ │ -0000bb40: 6820 6675 6e63 7469 6f6e 2061 6e64 206d h function and m │ │ │ -0000bb50: 6163 726f 2220 2225 7320 2573 2064 6566 acro" "%s %s def │ │ │ -0000bb60: 696e 6564 206d 756c 7469 706c 6520 7469 ined multiple ti │ │ │ -0000bb70: 6d65 7320 696e 2074 6869 7320 6669 6c65 mes in this file │ │ │ -0000bb80: 2220 226d 6163 726f 2220 2266 756e 6374 " "macro" "funct │ │ │ -0000bb90: 696f 6e22 2066 626f 756e 6470 2073 7562 ion" fboundp sub │ │ │ -0000bba0: 7270 206c 616d 6264 6120 6d61 6372 6f20 rp lambda macro │ │ │ -0000bbb0: 2225 7320 2573 2062 6569 6e67 2072 6564 "%s %s being red │ │ │ -0000bbc0: 6566 696e 6564 2061 7320 6120 2573 2220 efined as a %s" │ │ │ -0000bbd0: 2273 7562 7222 2033 2022 5072 6f62 6162 "subr" 3 "Probab │ │ │ -0000bbe0: 6c65 2060 5c22 2720 7769 7468 6f75 7420 le `\"' without │ │ │ -0000bbf0: 605c 5c27 2069 6e20 646f 6320 7374 7269 `\\' in doc stri │ │ │ -0000bc00: 6e67 206f 6620 2573 2220 6279 7465 2d63 ng of %s" byte-c │ │ │ -0000bc10: 6f6d 7069 6c65 2d6c 616d 6264 6120 6279 ompile-lambda by │ │ │ -0000bc20: 7465 2d63 6f6d 7069 6c65 2d62 7974 652d te-compile-byte- │ │ │ -0000bc30: 636f 6465 2d6d 616b 6572 2071 756f 7465 code-maker quote │ │ │ -0000bc40: 2062 7974 652d 636f 6d70 696c 652d 666c byte-compile-fl │ │ │ -0000bc50: 7573 682d 7065 6e64 696e 6720 6279 7465 ush-pending byte │ │ │ -0000bc60: 2d63 6f6d 7069 6c65 2d6f 7574 7075 742d -compile-output- │ │ │ -0000bc70: 646f 6366 6f72 6d20 225c 6e28 6465 6661 docform "\n(defa │ │ │ -0000bc80: 6c69 6173 2027 2220 2822 2027 286d 6163 lias '" (" '(mac │ │ │ -0000bc90: 726f 202e 2023 5b22 202d 3120 225d 2922 ro . #[" -1 "])" │ │ │ -0000bca0: 2920 2822 2023 5b22 202d 3120 225d 2229 ) (" #[" -1 "]") │ │ │ -0000bcb0: 2028 2220 2728 6d61 6372 6f20 2220 2d31 (" '(macro " -1 │ │ │ -0000bcc0: 2022 2922 2920 2822 2027 2822 202d 3120 ")") (" '(" -1 │ │ │ -0000bcd0: 2229 2229 2028 2220 2863 6f6e 7320 276d ")") (" (cons 'm │ │ │ -0000bce0: 6163 726f 2028 2220 2d31 2022 2929 2229 acro (" -1 "))") │ │ │ -0000bcf0: 2028 2220 2822 202d 3120 2229 2229 2063 (" (" -1 ")") c │ │ │ -0000bd00: 6f6d 7069 6c65 642d 6675 6e63 7469 6f6e ompiled-function │ │ │ -0000bd10: 2d70 2062 7974 652d 636f 6d70 696c 652d -p byte-compile- │ │ │ -0000bd20: 636f 6d70 696c 6564 2d6f 626a 2d74 6f2d compiled-obj-to- │ │ │ -0000bd30: 6c69 7374 2061 7070 656e 6420 3120 2822 list append 1 (" │ │ │ -0000bd40: 2027 286d 6163 726f 202e 2023 5b22 2034 '(macro . #[" 4 │ │ │ -0000bd50: 2022 5d29 2229 2028 2220 235b 2220 3420 "])") (" #[" 4 │ │ │ -0000bd60: 225d 2229 2028 2220 2728 6d61 6372 6f20 "]") (" '(macro │ │ │ -0000bd70: 2220 3220 2229 2229 2028 2220 2728 2220 " 2 ")") (" '(" │ │ │ -0000bd80: 3220 2229 2229 2028 2220 2863 6f6e 7320 2 ")") (" (cons │ │ │ -0000bd90: 276d 6163 726f 2028 2220 3520 2229 2922 'macro (" 5 "))" │ │ │ -0000bda0: 2920 2822 2028 2220 3520 2229 2229 2063 ) (" (" 5 ")") c │ │ │ -0000bdb0: 6f6d 7069 6c65 642d 6675 6e63 7469 6f6e ompiled-function │ │ │ -0000bdc0: 2d61 7267 6c69 7374 2063 6f6d 7069 6c65 -arglist compile │ │ │ -0000bdd0: 642d 6675 6e63 7469 6f6e 2d69 6e73 7472 d-function-instr │ │ │ -0000bde0: 7563 7469 6f6e 7320 636f 6d70 696c 6564 uctions compiled │ │ │ -0000bdf0: 2d66 756e 6374 696f 6e2d 636f 6e73 7461 -function-consta │ │ │ -0000be00: 6e74 7320 636f 6d70 696c 6564 2d66 756e nts compiled-fun │ │ │ -0000be10: 6374 696f 6e2d 7374 6163 6b2d 6465 7074 ction-stack-dept │ │ │ -0000be20: 6820 646f 6375 6d65 6e74 6174 696f 6e20 h documentation │ │ │ -0000be30: 7420 636f 6d6d 616e 6470 2063 6f6d 7069 t commandp compi │ │ │ -0000be40: 6c65 642d 6675 6e63 7469 6f6e 2d69 6e74 led-function-int │ │ │ -0000be50: 6572 6163 7469 7665 2070 7269 6e63 2022 eractive princ " │ │ │ -0000be60: 2922 2074 6869 732d 6f6e 6520 6279 7465 )" this-one byte │ │ │ -0000be70: 2d63 6f6d 7069 6c65 2d77 6172 6e69 6e67 -compile-warning │ │ │ -0000be80: 7320 626f 6479 2074 6861 742d 6f6e 6520 s body that-one │ │ │ -0000be90: 6279 7465 2d63 6f6d 7069 6c65 2d63 616c byte-compile-cal │ │ │ -0000bea0: 6c2d 7472 6565 2074 6861 742d 6b69 6e64 l-tree that-kind │ │ │ -0000beb0: 2066 696c 656e 616d 6520 6279 7465 2d63 filename byte-c │ │ │ -0000bec0: 6f6d 7069 6c65 2d69 6e69 7469 616c 2d6d ompile-initial-m │ │ │ -0000bed0: 6163 726f 2d65 6e76 6972 6f6e 6d65 6e74 acro-environment │ │ │ -0000bee0: 2062 7974 652d 636f 6d70 696c 652d 6479 byte-compile-dy │ │ │ -0000bef0: 6e61 6d69 6320 646f 6320 6279 7465 2d63 namic doc byte-c │ │ │ -0000bf00: 6f6d 7069 6c65 2d66 7265 652d 7265 6665 ompile-free-refe │ │ │ -0000bf10: 7265 6e63 6573 2062 7974 652d 636f 6d70 rences byte-comp │ │ │ -0000bf20: 696c 652d 6672 6565 2d61 7373 6967 6e6d ile-free-assignm │ │ │ -0000bf30: 656e 7473 2062 7974 652d 636f 6d70 696c ents byte-compil │ │ │ -0000bf40: 652d 6765 6e65 7261 7465 2d63 616c 6c2d e-generate-call- │ │ │ -0000bf50: 7472 6565 2062 7974 652d 636f 6d70 696c tree byte-compil │ │ │ -0000bf60: 652d 6375 7272 656e 742d 666f 726d 2062 e-current-form b │ │ │ -0000bf70: 7974 652d 636f 6d70 696c 652d 7665 7262 yte-compile-verb │ │ │ -0000bf80: 6f73 6520 6279 7465 2d63 6f6d 7069 6c65 ose byte-compile │ │ │ -0000bf90: 2d6f 7574 6275 6666 6572 5d20 3130 5d29 -outbuffer] 10]) │ │ │ -0000bfa0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -0000bfb0: 2d63 6f6d 7069 6c65 2d6f 7574 7075 742d -compile-output- │ │ │ -0000bfc0: 6173 2d63 6f6d 6d65 6e74 2023 5b28 6578 as-comment #[(ex │ │ │ -0000bfd0: 7020 7175 6f74 6564 2920 2260 1b70 5c6e p quoted) "`.p\n │ │ │ -0000bfe0: 7188 c463 8808 ab87 c509 5c6e 5c22 88aa q..c......\n\".. │ │ │ -0000bff0: 85c6 095c 6e5c 2288 0b62 88c7 c8c9 ca23 ...\n\"..b.....# │ │ │ -0000c000: ab88 cbcc ca89 2388 aa71 0b62 88c7 cdc9 ......#..q.b.... │ │ │ -0000c010: ca23 ab88 cbce ca89 2388 aa71 0b62 88c7 .#......#..q.b.. │ │ │ -0000c020: cfc9 ca23 ab88 cbd0 ca89 2388 aa71 6462 ...#......#..qdb │ │ │ -0000c030: 88cf 6388 0b62 88d1 d2d3 640b 5a5c 22b1 ..c..b....d.Z\". │ │ │ -0000c040: 0288 6013 6462 8871 880b 2987 2220 5b71 ..`.db.q..)." [q │ │ │ -0000c050: 756f 7465 6420 6578 7020 6279 7465 2d63 uoted exp byte-c │ │ │ -0000c060: 6f6d 7069 6c65 2d6f 7574 6275 6666 6572 ompile-outbuffer │ │ │ -0000c070: 2070 6f73 6974 696f 6e20 2220 2220 7072 position " " pr │ │ │ -0000c080: 696e 3120 7072 696e 6320 7365 6172 6368 in1 princ search │ │ │ -0000c090: 2d66 6f72 7761 7264 2022 0122 206e 696c -forward "." nil │ │ │ -0000c0a0: 2074 2072 6570 6c61 6365 2d6d 6174 6368 t replace-match │ │ │ -0000c0b0: 2022 0101 2220 2200 2220 2201 3022 2022 ".." "." ".0" " │ │ │ -0000c0c0: 1f22 2022 015f 2220 2223 4022 2066 6f72 ." "._" "#@" for │ │ │ -0000c0d0: 6d61 7420 2225 6422 5d20 365d 290a 2870 mat "%d"] 6]).(p │ │ │ -0000c0e0: 7574 2027 646f 6d61 696e 2027 6279 7465 ut 'domain 'byte │ │ │ -0000c0f0: 2d68 756e 6b2d 6861 6e64 6c65 7220 2762 -hunk-handler 'b │ │ │ -0000c100: 7974 652d 636f 6d70 696c 652d 6669 6c65 yte-compile-file │ │ │ -0000c110: 2d66 6f72 6d2d 646f 6d61 696e 290a 2864 -form-domain).(d │ │ │ -0000c120: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ -0000c130: 6d70 696c 652d 6669 6c65 2d66 6f72 6d2d mpile-file-form- │ │ │ -0000c140: 646f 6d61 696e 2023 5b28 666f 726d 2920 domain #[(form) │ │ │ -0000c150: 225c 6e41 41ab 85c3 c45c 6e5c 2288 5c6e "\nAA....\n\".\n │ │ │ -0000c160: 4140 8919 ab8b 093b ac87 c3c5 5c6e 5c22 A@.....;....\n\" │ │ │ -0000c170: 88c6 1109 1029 c75c 6ec8 5c22 8722 205b .....).\n.\"." [ │ │ │ -0000c180: 6279 7465 2d63 6f6d 7069 6c65 2d66 696c byte-compile-fil │ │ │ -0000c190: 652d 646f 6d61 696e 2064 6f6d 6169 6e20 e-domain domain │ │ │ -0000c1a0: 666f 726d 2062 7974 652d 636f 6d70 696c form byte-compil │ │ │ -0000c1b0: 652d 7761 726e 2022 646f 6d61 696e 2075 e-warn "domain u │ │ │ -0000c1c0: 7365 6420 7769 7468 2074 6f6f 206d 616e sed with too man │ │ │ -0000c1d0: 7920 6172 6775 6d65 6e74 733a 2025 7322 y arguments: %s" │ │ │ -0000c1e0: 2022 6172 6775 6d65 6e74 2074 6f20 6064 "argument to `d │ │ │ -0000c1f0: 6f6d 6169 6e27 2064 6563 6c61 7261 7469 omain' declarati │ │ │ -0000c200: 6f6e 206d 7573 7420 6265 2061 206c 6974 on must be a lit │ │ │ -0000c210: 6572 616c 2073 7472 696e 673a 2025 7322 eral string: %s" │ │ │ -0000c220: 206e 696c 2062 7974 652d 636f 6d70 696c nil byte-compil │ │ │ -0000c230: 652d 6b65 6570 2d70 656e 6469 6e67 2062 e-keep-pending b │ │ │ -0000c240: 7974 652d 636f 6d70 696c 652d 6e6f 726d yte-compile-norm │ │ │ -0000c250: 616c 2d63 616c 6c5d 2034 5d29 0a28 6465 al-call] 4]).(de │ │ │ -0000c260: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -0000c270: 7069 6c65 2d64 6f6d 6169 6e20 235b 2866 pile-domain #[(f │ │ │ -0000c280: 6f72 6d29 2022 c4c5 c6c7 891a 1918 c80b orm) ".......... │ │ │ -0000c290: 212b 5c22 88c9 cacb cccd 0b44 4445 2187 !+\".......DDE!. │ │ │ -0000c2a0: 2220 5b70 7269 6e74 2d65 7363 6170 652d " [print-escape- │ │ │ -0000c2b0: 6e65 776c 696e 6573 2070 7269 6e74 2d6c newlines print-l │ │ │ -0000c2c0: 6576 656c 2070 7269 6e74 2d6c 656e 6774 evel print-lengt │ │ │ -0000c2d0: 6820 666f 726d 2062 7974 652d 636f 6d70 h form byte-comp │ │ │ -0000c2e0: 696c 652d 7761 726e 2022 5468 6520 6064 ile-warn "The `d │ │ │ -0000c2f0: 6f6d 6169 6e27 2064 6563 6c61 7261 7469 omain' declarati │ │ │ -0000c300: 6f6e 2069 7320 6c65 6761 6c20 6f6e 6c79 on is legal only │ │ │ -0000c310: 2061 7420 746f 702d 6c65 7665 6c3a 2025 at top-level: % │ │ │ -0000c320: 7322 2074 2034 2070 7269 6e31 2d74 6f2d s" t 4 prin1-to- │ │ │ -0000c330: 7374 7269 6e67 2062 7974 652d 636f 6d70 string byte-comp │ │ │ -0000c340: 696c 652d 6e6f 726d 616c 2d63 616c 6c20 ile-normal-call │ │ │ -0000c350: 7369 676e 616c 2027 6572 726f 7220 7175 signal 'error qu │ │ │ -0000c360: 6f74 6520 2260 646f 6d61 696e 2720 7573 ote "`domain' us │ │ │ -0000c370: 6564 2069 6e73 6964 6520 6120 6675 6e63 ed inside a func │ │ │ -0000c380: 7469 6f6e 225d 2036 5d29 0a28 7075 7420 tion"] 6]).(put │ │ │ -0000c390: 2763 7573 746f 6d2d 6465 636c 6172 652d 'custom-declare- │ │ │ -0000c3a0: 7661 7269 6162 6c65 2027 6279 7465 2d68 variable 'byte-h │ │ │ -0000c3b0: 756e 6b2d 6861 6e64 6c65 7220 2762 7974 unk-handler 'byt │ │ │ -0000c3c0: 652d 636f 6d70 696c 652d 6669 6c65 2d66 e-compile-file-f │ │ │ -0000c3d0: 6f72 6d2d 6375 7374 6f6d 2d64 6563 6c61 orm-custom-decla │ │ │ -0000c3e0: 7265 2d76 6172 6961 626c 6529 0a28 6465 re-variable).(de │ │ │ -0000c3f0: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -0000c400: 7069 6c65 2d66 696c 652d 666f 726d 2d63 pile-file-form-c │ │ │ -0000c410: 7573 746f 6d2d 6465 636c 6172 652d 7661 ustom-declare-va │ │ │ -0000c420: 7269 6162 6c65 2023 5b28 666f 726d 2920 riable #[(form) │ │ │ -0000c430: 22c4 0973 ab8a 0b41 4041 4008 425c 6e42 "..s...A@A@.B\nB │ │ │ -0000c440: 120b 8722 205b 6279 7465 2d63 6f6d 7069 ..." [byte-compi │ │ │ -0000c450: 6c65 2d67 6c6f 6261 6c2d 6269 7420 6279 le-global-bit by │ │ │ -0000c460: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e69 te-compile-warni │ │ │ -0000c470: 6e67 7320 6279 7465 2d63 6f6d 7069 6c65 ngs byte-compile │ │ │ -0000c480: 2d62 6f75 6e64 2d76 6172 6961 626c 6573 -bound-variables │ │ │ -0000c490: 2066 6f72 6d20 6672 6565 2d76 6172 735d form free-vars] │ │ │ -0000c4a0: 2032 5d29 0a23 4031 3233 2049 6620 464f 2]).#@123 If FO │ │ │ -0000c4b0: 524d 2069 7320 6120 7379 6d62 6f6c 2c20 RM is a symbol, │ │ │ -0000c4c0: 6279 7465 2d63 6f6d 7069 6c65 2069 7473 byte-compile its │ │ │ -0000c4d0: 2066 756e 6374 696f 6e20 6465 6669 6e69 function defini │ │ │ -0000c4e0: 7469 6f6e 2e0a 4966 2046 4f52 4d20 6973 tion..If FORM is │ │ │ -0000c4f0: 2061 206c 616d 6264 6120 6f72 2061 206d a lambda or a m │ │ │ -0000c500: 6163 726f 2c20 6279 7465 2d63 6f6d 7069 acro, byte-compi │ │ │ -0000c510: 6c65 2069 7420 6173 2061 2066 756e 6374 le it as a funct │ │ │ -0000c520: 696f 6e2e 1f0a 2864 6566 616c 6961 7320 ion...(defalias │ │ │ -0000c530: 2762 7974 652d 636f 6d70 696c 6520 235b 'byte-compile #[ │ │ │ -0000c540: 2866 6f72 6d29 2022 c3c4 211a c55c 6e21 (form) "..!..\n! │ │ │ -0000c550: 18c6 2088 c7c1 21ab 8309 aa83 c55c 6e21 .. ...!......\n! │ │ │ -0000c560: 19c8 8ec9 cacb 5c22 2c87 2220 5b62 7974 ......\",." [byt │ │ │ -0000c570: 652d 636f 6d70 696c 652d 706f 696e 742d e-compile-point- │ │ │ -0000c580: 6d61 782d 7072 6576 2062 7974 652d 636f max-prev byte-co │ │ │ -0000c590: 6d70 696c 652d 7761 726e 696e 6773 2d62 mpile-warnings-b │ │ │ -0000c5a0: 6567 696e 6e69 6e67 2062 7974 652d 636f eginning byte-co │ │ │ -0000c5b0: 6d70 696c 652d 6c6f 672d 6275 6666 6572 mpile-log-buffer │ │ │ -0000c5c0: 2067 6574 2d62 7566 6665 722d 6372 6561 get-buffer-crea │ │ │ -0000c5d0: 7465 2022 2a43 6f6d 7069 6c65 2d4c 6f67 te "*Compile-Log │ │ │ -0000c5e0: 2a22 2070 6f69 6e74 2d6d 6178 2062 7974 *" point-max byt │ │ │ -0000c5f0: 652d 636f 6d70 696c 652d 6c6f 672d 6669 e-compile-log-fi │ │ │ -0000c600: 6c65 2062 6f75 6e64 7020 2828 6279 7465 le boundp ((byte │ │ │ -0000c610: 2d63 6f64 6520 2272 0971 8808 6288 c6c7 -code "r.q..b... │ │ │ -0000c620: 7788 601c 0bab a1c8 c921 1d72 0d71 88c7 w.`......!.r.q.. │ │ │ -0000c630: 1611 ca20 8829 cb0d 0c64 2388 5c6e 6457 ... .)...d#.\ndW │ │ │ -0000c640: ab84 0b0d 2188 29aa 975c 6e64 57ab 92cc ....!.)..\ndW... │ │ │ -0000c650: cd20 ccce 7021 2188 0c62 88cf d021 8821 . ..p!!..b...!.! │ │ │ -0000c660: 882a c787 2220 5b62 7974 652d 636f 6d70 .*.." [byte-comp │ │ │ -0000c670: 696c 652d 706f 696e 742d 6d61 782d 7072 ile-point-max-pr │ │ │ -0000c680: 6576 2062 7974 652d 636f 6d70 696c 652d ev byte-compile- │ │ │ -0000c690: 6c6f 672d 6275 6666 6572 2062 7974 652d log-buffer byte- │ │ │ -0000c6a0: 636f 6d70 696c 652d 7761 726e 696e 6773 compile-warnings │ │ │ -0000c6b0: 2d62 6567 696e 6e69 6e67 2074 656d 702d -beginning temp- │ │ │ -0000c6c0: 6275 6666 6572 2d73 686f 772d 6675 6e63 buffer-show-func │ │ │ -0000c6d0: 7469 6f6e 2073 686f 772d 6265 6769 6e20 tion show-begin │ │ │ -0000c6e0: 7368 6f77 2d62 7566 6665 7220 220c 5c6e show-buffer ".\n │ │ │ -0000c6f0: 2220 6e69 6c20 6765 742d 6275 6666 6572 " nil get-buffer │ │ │ -0000c700: 2d63 7265 6174 6520 222a 436f 6d70 696c -create "*Compil │ │ │ -0000c710: 652d 4c6f 672d 5368 6f77 2a22 2065 7261 e-Log-Show*" era │ │ │ -0000c720: 7365 2d62 7566 6665 7220 636f 7079 2d74 se-buffer copy-t │ │ │ -0000c730: 6f2d 6275 6666 6572 2073 656c 6563 742d o-buffer select- │ │ │ -0000c740: 7769 6e64 6f77 2073 656c 6563 7465 642d window selected- │ │ │ -0000c750: 7769 6e64 6f77 2064 6973 706c 6179 2d62 window display-b │ │ │ -0000c760: 7566 6665 7220 7265 6365 6e74 6572 2031 uffer recenter 1 │ │ │ -0000c770: 2062 7566 6665 722d 7265 6164 2d6f 6e6c buffer-read-onl │ │ │ -0000c780: 795d 2035 2929 2063 616c 6c2d 7769 7468 y] 5)) call-with │ │ │ -0000c790: 2d63 6f6e 6469 7469 6f6e 2d68 616e 646c -condition-handl │ │ │ -0000c7a0: 6572 2023 5b28 6572 726f 722d 696e 666f er #[(error-info │ │ │ -0000c7b0: 2920 22c1 0821 8722 205b 6572 726f 722d ) "..!." [error- │ │ │ -0000c7c0: 696e 666f 2062 7974 652d 636f 6d70 696c info byte-compil │ │ │ -0000c7d0: 652d 7265 706f 7274 2d65 7272 6f72 5d20 e-report-error] │ │ │ -0000c7e0: 325d 2023 5b6e 696c 2022 c60e 1221 c789 2] #[nil "...!.. │ │ │ -0000c7f0: 8989 8989 5c6e 0908 0e10 0e11 0bc8 61ab ....\n........a. │ │ │ -0000c800: 840e 13aa 810b c71e 141b 1e11 1e10 1819 ................ │ │ │ -0000c810: 1a1e 151e 161e 171e 181e 191e 1a1e 1b0c ................ │ │ │ -0000c820: 39ab 89c9 0c21 ad85 0c4b aa81 0c89 1da2 9....!...K...... │ │ │ -0000c830: ca61 891e 5c6e ab83 0d41 150d a2cb 61ad .a..\n...A....a. │ │ │ -0000c840: 9a0e 5c6e ab87 cacc 0d21 42aa 83cc 0d21 ..\n.....!B....! │ │ │ -0000c850: 150c 39ab 86cd 0c0d 5c22 aa81 0d2a ce0b ..9.....\"...*.. │ │ │ -0000c860: 73ab 83cf 2088 2e0e 8722 205b 6279 7465 s... ...." [byte │ │ │ -0000c870: 2d63 6f6d 7069 6c65 2d65 6d61 6373 3139 -compile-emacs19 │ │ │ -0000c880: 2d63 6f6d 7061 7469 6269 6c69 7479 2062 -compatibility b │ │ │ -0000c890: 7974 652d 6f70 7469 6d69 7a65 2062 7974 yte-optimize byt │ │ │ -0000c8a0: 652d 636f 6d70 696c 652d 7665 7262 6f73 e-compile-verbos │ │ │ -0000c8b0: 6520 6279 7465 2d63 6f6d 7069 6c65 2d77 e byte-compile-w │ │ │ -0000c8c0: 6172 6e69 6e67 7320 666f 726d 2066 756e arnings form fun │ │ │ -0000c8d0: 2063 6f70 792d 616c 6973 7420 6e69 6c20 copy-alist nil │ │ │ -0000c8e0: 7420 6662 6f75 6e64 7020 6d61 6372 6f20 t fboundp macro │ │ │ -0000c8f0: 6c61 6d62 6461 2062 7974 652d 636f 6d70 lambda byte-comp │ │ │ -0000c900: 696c 652d 6c61 6d62 6461 2064 6566 616c ile-lambda defal │ │ │ -0000c910: 6961 7320 756e 7573 6564 2d76 6172 7320 ias unused-vars │ │ │ -0000c920: 6279 7465 2d63 6f6d 7069 6c65 2d77 6172 byte-compile-war │ │ │ -0000c930: 6e2d 6162 6f75 742d 756e 7573 6564 2d76 n-about-unused-v │ │ │ -0000c940: 6172 6961 626c 6573 2062 7974 652d 636f ariables byte-co │ │ │ -0000c950: 6d70 696c 652d 6479 6e61 6d69 6320 6279 mpile-dynamic by │ │ │ -0000c960: 7465 2d63 6f6d 7069 6c65 2d64 796e 616d te-compile-dynam │ │ │ -0000c970: 6963 2d64 6f63 7374 7269 6e67 7320 6279 ic-docstrings by │ │ │ -0000c980: 7465 2d63 6f6d 7069 6c65 2d69 6e69 7469 te-compile-initi │ │ │ -0000c990: 616c 2d6d 6163 726f 2d65 6e76 6972 6f6e al-macro-environ │ │ │ -0000c9a0: 6d65 6e74 2062 7974 652d 636f 6d70 696c ment byte-compil │ │ │ -0000c9b0: 652d 6465 6661 756c 742d 7761 726e 696e e-default-warnin │ │ │ -0000c9c0: 6773 2062 7974 652d 636f 6d70 696c 652d gs byte-compile- │ │ │ -0000c9d0: 6669 6c65 2d64 6f6d 6169 6e20 6279 7465 file-domain byte │ │ │ -0000c9e0: 2d63 6f6d 7069 6c65 2d66 7265 652d 6173 -compile-free-as │ │ │ -0000c9f0: 7369 676e 6d65 6e74 7320 6279 7465 2d63 signments byte-c │ │ │ -0000ca00: 6f6d 7069 6c65 2d66 7265 652d 7265 6665 ompile-free-refe │ │ │ -0000ca10: 7265 6e63 6573 2062 7974 652d 636f 6d70 rences byte-comp │ │ │ -0000ca20: 696c 652d 626f 756e 642d 7661 7269 6162 ile-bound-variab │ │ │ -0000ca30: 6c65 7320 6279 7465 2d63 6f6d 7069 6c65 les byte-compile │ │ │ -0000ca40: 2d75 6e72 6573 6f6c 7665 642d 6675 6e63 -unresolved-func │ │ │ -0000ca50: 7469 6f6e 7320 6279 7465 2d63 6f6d 7069 tions byte-compi │ │ │ -0000ca60: 6c65 2d61 7574 6f6c 6f61 642d 656e 7669 le-autoload-envi │ │ │ -0000ca70: 726f 6e6d 656e 7420 6279 7465 2d63 6f6d ronment byte-com │ │ │ -0000ca80: 7069 6c65 2d66 756e 6374 696f 6e2d 656e pile-function-en │ │ │ -0000ca90: 7669 726f 6e6d 656e 7420 6279 7465 2d63 vironment byte-c │ │ │ -0000caa0: 6f6d 7069 6c65 2d6d 6163 726f 2d65 6e76 ompile-macro-env │ │ │ -0000cab0: 6972 6f6e 6d65 6e74 5d20 3135 5d5d 2033 ironment] 15]] 3 │ │ │ -0000cac0: 2028 2324 202e 2035 3033 3437 295d 290a (#$ . 50347)]). │ │ │ -0000cad0: 2340 3236 2043 6f6d 7069 6c65 2061 6e64 #@26 Compile and │ │ │ -0000cae0: 2072 6574 7572 6e20 5345 5850 2e1f 0a28 return SEXP...( │ │ │ -0000caf0: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ -0000cb00: 6f6d 7069 6c65 2d73 6578 7020 235b 2873 ompile-sexp #[(s │ │ │ -0000cb10: 6578 7020 266f 7074 696f 6e61 6c20 6d73 exp &optional ms │ │ │ -0000cb20: 6729 2022 c3c4 211a c55c 6e21 18c6 2088 g) "..!..\n!.. . │ │ │ -0000cb30: c7c1 21ab 8309 aa83 c55c 6e21 19c8 8ec9 ..!......\n!.... │ │ │ -0000cb40: cacb 5c22 2c87 2220 5b62 7974 652d 636f ..\",." [byte-co │ │ │ -0000cb50: 6d70 696c 652d 706f 696e 742d 6d61 782d mpile-point-max- │ │ │ -0000cb60: 7072 6576 2062 7974 652d 636f 6d70 696c prev byte-compil │ │ │ -0000cb70: 652d 7761 726e 696e 6773 2d62 6567 696e e-warnings-begin │ │ │ -0000cb80: 6e69 6e67 2062 7974 652d 636f 6d70 696c ning byte-compil │ │ │ -0000cb90: 652d 6c6f 672d 6275 6666 6572 2067 6574 e-log-buffer get │ │ │ -0000cba0: 2d62 7566 6665 722d 6372 6561 7465 2022 -buffer-create " │ │ │ -0000cbb0: 2a43 6f6d 7069 6c65 2d4c 6f67 2a22 2070 *Compile-Log*" p │ │ │ -0000cbc0: 6f69 6e74 2d6d 6178 2062 7974 652d 636f oint-max byte-co │ │ │ -0000cbd0: 6d70 696c 652d 6c6f 672d 6669 6c65 2062 mpile-log-file b │ │ │ -0000cbe0: 6f75 6e64 7020 2828 6279 7465 2d63 6f64 oundp ((byte-cod │ │ │ -0000cbf0: 6520 2272 0971 8808 6288 c6c7 7788 601c e "r.q..b...w.`. │ │ │ -0000cc00: 0bab a1c8 c921 1d72 0d71 88c7 1611 ca20 .....!.r.q..... │ │ │ -0000cc10: 8829 cb0d 0c64 2388 5c6e 6457 ab84 0b0d .)...d#.\ndW.... │ │ │ -0000cc20: 2188 29aa 975c 6e64 57ab 92cc cd20 ccce !.)..\ndW.... .. │ │ │ -0000cc30: 7021 2188 0c62 88cf d021 8821 882a c787 p!!..b...!.!.*.. │ │ │ -0000cc40: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ -0000cc50: 706f 696e 742d 6d61 782d 7072 6576 2062 point-max-prev b │ │ │ -0000cc60: 7974 652d 636f 6d70 696c 652d 6c6f 672d yte-compile-log- │ │ │ -0000cc70: 6275 6666 6572 2062 7974 652d 636f 6d70 buffer byte-comp │ │ │ -0000cc80: 696c 652d 7761 726e 696e 6773 2d62 6567 ile-warnings-beg │ │ │ -0000cc90: 696e 6e69 6e67 2074 656d 702d 6275 6666 inning temp-buff │ │ │ -0000cca0: 6572 2d73 686f 772d 6675 6e63 7469 6f6e er-show-function │ │ │ -0000ccb0: 2073 686f 772d 6265 6769 6e20 7368 6f77 show-begin show │ │ │ -0000ccc0: 2d62 7566 6665 7220 220c 5c6e 2220 6e69 -buffer ".\n" ni │ │ │ -0000ccd0: 6c20 6765 742d 6275 6666 6572 2d63 7265 l get-buffer-cre │ │ │ -0000cce0: 6174 6520 222a 436f 6d70 696c 652d 4c6f ate "*Compile-Lo │ │ │ -0000ccf0: 672d 5368 6f77 2a22 2065 7261 7365 2d62 g-Show*" erase-b │ │ │ -0000cd00: 7566 6665 7220 636f 7079 2d74 6f2d 6275 uffer copy-to-bu │ │ │ -0000cd10: 6666 6572 2073 656c 6563 742d 7769 6e64 ffer select-wind │ │ │ -0000cd20: 6f77 2073 656c 6563 7465 642d 7769 6e64 ow selected-wind │ │ │ -0000cd30: 6f77 2064 6973 706c 6179 2d62 7566 6665 ow display-buffe │ │ │ -0000cd40: 7220 7265 6365 6e74 6572 2031 2062 7566 r recenter 1 buf │ │ │ -0000cd50: 6665 722d 7265 6164 2d6f 6e6c 795d 2035 fer-read-only] 5 │ │ │ -0000cd60: 2929 2063 616c 6c2d 7769 7468 2d63 6f6e )) call-with-con │ │ │ -0000cd70: 6469 7469 6f6e 2d68 616e 646c 6572 2023 dition-handler # │ │ │ -0000cd80: 5b28 6572 726f 722d 696e 666f 2920 22c1 [(error-info) ". │ │ │ -0000cd90: 0821 8722 205b 6572 726f 722d 696e 666f .!." [error-info │ │ │ -0000cda0: 2062 7974 652d 636f 6d70 696c 652d 7265 byte-compile-re │ │ │ -0000cdb0: 706f 7274 2d65 7272 6f72 5d20 325d 2023 port-error] 2] # │ │ │ -0000cdc0: 5b6e 696c 2022 c60e 0d21 c789 8989 8989 [nil "...!...... │ │ │ -0000cdd0: 0c0b 5c6e 0908 0dc8 61ab 840e 0eaa 810d ..\n....a....... │ │ │ -0000cde0: c71e 0f1d 1819 1a1b 1c1e 101e 111e 121e ................ │ │ │ -0000cdf0: 131e 141e 151e 16c9 0e17 21ca 0e18 2188 ..........!...!. │ │ │ -0000ce00: cb0d 73ab 83cc 2088 2e0e 8722 205b 6279 ..s... ...." [by │ │ │ -0000ce10: 7465 2d63 6f6d 7069 6c65 2d64 796e 616d te-compile-dynam │ │ │ -0000ce20: 6963 2d64 6f63 7374 7269 6e67 7320 6279 ic-docstrings by │ │ │ -0000ce30: 7465 2d63 6f6d 7069 6c65 2d64 796e 616d te-compile-dynam │ │ │ -0000ce40: 6963 2062 7974 652d 636f 6d70 696c 652d ic byte-compile- │ │ │ -0000ce50: 656d 6163 7331 392d 636f 6d70 6174 6962 emacs19-compatib │ │ │ -0000ce60: 696c 6974 7920 6279 7465 2d6f 7074 696d ility byte-optim │ │ │ -0000ce70: 697a 6520 6279 7465 2d63 6f6d 7069 6c65 ize byte-compile │ │ │ -0000ce80: 2d76 6572 626f 7365 2062 7974 652d 636f -verbose byte-co │ │ │ -0000ce90: 6d70 696c 652d 7761 726e 696e 6773 2063 mpile-warnings c │ │ │ -0000cea0: 6f70 792d 616c 6973 7420 6e69 6c20 7420 opy-alist nil t │ │ │ -0000ceb0: 6279 7465 2d63 6f6d 7069 6c65 2d74 6f70 byte-compile-top │ │ │ -0000cec0: 2d6c 6576 656c 2062 7974 652d 636f 6d70 -level byte-comp │ │ │ -0000ced0: 696c 652d 7761 726e 2d61 626f 7574 2d75 ile-warn-about-u │ │ │ -0000cee0: 6e72 6573 6f6c 7665 642d 6675 6e63 7469 nresolved-functi │ │ │ -0000cef0: 6f6e 7320 756e 7573 6564 2d76 6172 7320 ons unused-vars │ │ │ -0000cf00: 6279 7465 2d63 6f6d 7069 6c65 2d77 6172 byte-compile-war │ │ │ -0000cf10: 6e2d 6162 6f75 742d 756e 7573 6564 2d76 n-about-unused-v │ │ │ -0000cf20: 6172 6961 626c 6573 2062 7974 652d 636f ariables byte-co │ │ │ -0000cf30: 6d70 696c 652d 696e 6974 6961 6c2d 6d61 mpile-initial-ma │ │ │ -0000cf40: 6372 6f2d 656e 7669 726f 6e6d 656e 7420 cro-environment │ │ │ -0000cf50: 6279 7465 2d63 6f6d 7069 6c65 2d64 6566 byte-compile-def │ │ │ -0000cf60: 6175 6c74 2d77 6172 6e69 6e67 7320 6279 ault-warnings by │ │ │ -0000cf70: 7465 2d63 6f6d 7069 6c65 2d66 696c 652d te-compile-file- │ │ │ -0000cf80: 646f 6d61 696e 2062 7974 652d 636f 6d70 domain byte-comp │ │ │ -0000cf90: 696c 652d 6672 6565 2d61 7373 6967 6e6d ile-free-assignm │ │ │ -0000cfa0: 656e 7473 2062 7974 652d 636f 6d70 696c ents byte-compil │ │ │ -0000cfb0: 652d 6672 6565 2d72 6566 6572 656e 6365 e-free-reference │ │ │ -0000cfc0: 7320 6279 7465 2d63 6f6d 7069 6c65 2d62 s byte-compile-b │ │ │ -0000cfd0: 6f75 6e64 2d76 6172 6961 626c 6573 2062 ound-variables b │ │ │ -0000cfe0: 7974 652d 636f 6d70 696c 652d 756e 7265 yte-compile-unre │ │ │ -0000cff0: 736f 6c76 6564 2d66 756e 6374 696f 6e73 solved-functions │ │ │ -0000d000: 2062 7974 652d 636f 6d70 696c 652d 6175 byte-compile-au │ │ │ -0000d010: 746f 6c6f 6164 2d65 6e76 6972 6f6e 6d65 toload-environme │ │ │ -0000d020: 6e74 2062 7974 652d 636f 6d70 696c 652d nt byte-compile- │ │ │ -0000d030: 6675 6e63 7469 6f6e 2d65 6e76 6972 6f6e function-environ │ │ │ -0000d040: 6d65 6e74 2062 7974 652d 636f 6d70 696c ment byte-compil │ │ │ -0000d050: 652d 6d61 6372 6f2d 656e 7669 726f 6e6d e-macro-environm │ │ │ -0000d060: 656e 7420 7365 7870 206d 7367 5d20 3134 ent sexp msg] 14 │ │ │ -0000d070: 5d5d 2033 2028 2324 202e 2035 3139 3235 ]] 3 (#$ . 51925 │ │ │ -0000d080: 295d 290a 2864 6566 616c 6961 7320 2762 )]).(defalias 'b │ │ │ -0000d090: 7974 652d 636f 6d70 696c 652d 6279 7465 yte-compile-byte │ │ │ -0000d0a0: 2d63 6f64 652d 6d61 6b65 7220 235b 2866 -code-maker #[(f │ │ │ -0000d0b0: 756e 2920 225c 6e3a ac82 5c6e 87c3 18c4 un) "\n:..\n.... │ │ │ -0000d0c0: 5c6e 41a3 b789 10ab cc08 5c6e 7341 acc6 \nA.......\nsA.. │ │ │ -0000d0d0: c15c 6e41 41b7 19c5 c65c 6e41 4044 0841 .\nAA....\nA@D.A │ │ │ -0000d0e0: 40c7 0838 c808 38af 05c7 5c6e 383b ab86 @..8..8...\n8;.. │ │ │ -0000d0f0: c75c 6e38 43aa 8509 ad82 c343 a409 ad96 .\n8C......C.... │ │ │ -0000d100: 0941 40ab 8609 4140 3bab 8509 4140 aa85 .A@...A@;...A@.. │ │ │ -0000d110: c609 4140 4443 a429 aa83 c65c 6e44 2987 ..A@DC.)...\nD). │ │ │ -0000d120: 2220 5b74 6d70 2069 6e74 6572 6163 7469 " [tmp interacti │ │ │ -0000d130: 7665 2066 756e 206e 696c 2062 7974 652d ve fun nil byte- │ │ │ -0000d140: 636f 6465 206d 616b 652d 6279 7465 2d63 code make-byte-c │ │ │ -0000d150: 6f64 6520 7175 6f74 6520 3220 335d 2036 ode quote 2 3] 6 │ │ │ -0000d160: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -0000d170: 7465 2d63 6f6d 7069 6c65 2d6c 616d 6264 te-compile-lambd │ │ │ -0000d180: 6120 235b 2866 756e 2920 220e 2ca2 c661 a #[(fun) ".,..a │ │ │ -0000d190: ac88 c7c8 c90e 2c21 5c22 880e 2c41 4018 ......,!\"..,A@. │ │ │ -0000d1a0: cacb cc0e 2e73 ad89 cdce cdcf d008 215c .....s........!\ │ │ │ -0000d1b0: 225c 225c 2289 1e30 d10e 2f42 a429 1e2f "\"\"..0../B.)./ │ │ │ -0000d1c0: 0e2c 4141 891c 403b ad89 0c40 0c41 ab83 .,AA..@;...@.A.. │ │ │ -0000d1d0: 0c41 141e 2bd2 0cb7 1d08 d31a 891e 2dab .A..+.........-. │ │ │ -0000d1e0: c10e 2d40 8912 39ac 87d4 d55c 6e5c 2288 ..-@..9....\n\". │ │ │ -0000d1f0: aaaa d65c 6e21 ac85 5c6e d773 ab87 d4d8 ...\n!..\n.s.... │ │ │ -0000d200: 5c6e 5c22 88aa 99d9 dadb 5c6e 21dc 485c \n\"......\n!.H\ │ │ │ -0000d210: 22ab 8f5c 6ecf 61ac 8a5c 6ece 61ac 85d4 "..\n.a..\n.a... │ │ │ -0000d220: dd5c 6e5c 2288 0e2d 4189 162d ac3f 2a0d .\n\"..-A..-.?*. │ │ │ -0000d230: abdd 0d0c 4061 ab83 0c41 140d 413a abc4 ....@a...A..A:.. │ │ │ -0000d240: 0d41 41ab 87d4 dec9 0d21 5c22 880d 4140 .AA......!\"..A@ │ │ │ -0000d250: 8919 a2df 61ac 8c09 a2e0 61ac 8609 a2e1 ....a.....a..... │ │ │ -0000d260: 61ab 9109 413a ab86 0941 8911 aa76 0940 a...A:...A...v.@ │ │ │ -0000d270: 8911 aa5e 09a2 e261 ac88 d2e3 0d41 4021 ...^...a.....A@! │ │ │ -0000d280: 4415 29aa 8b0d 41ab 87d4 dec9 0d21 5c22 D.)...A......!\" │ │ │ -0000d290: 88e3 e40c 42d3 c623 1be5 0e2e 73ab 83e6 ....B..#....s... │ │ │ -0000d2a0: 2088 0ba2 e761 ab9c e8e9 ea08 430b 410e ....a......C.A. │ │ │ -0000d2b0: 2bac 830d ad83 0e2b 430d ad84 0d41 4043 +......+C....A@C │ │ │ -0000d2c0: 245c 22aa b10d ad82 0d43 0ba2 e461 ab84 $\"......C...a.. │ │ │ -0000d2d0: 0b41 aa85 0bad 820b 43a4 13c6 0844 0e2b .A......C....D.+ │ │ │ -0000d2e0: ac85 0b40 3bab 8d0e 2b0b ae85 0cad 82d3 ...@;...+....... │ │ │ -0000d2f0: 4342 aa81 0ba4 2e06 8722 205b 6172 676c CB......." [argl │ │ │ -0000d300: 6973 7420 666f 726d 2061 7267 2063 6f6d ist form arg com │ │ │ -0000d310: 7069 6c65 6420 626f 6479 2069 6e74 206c piled body int l │ │ │ -0000d320: 616d 6264 6120 6572 726f 7220 226e 6f74 ambda error "not │ │ │ -0000d330: 2061 206c 616d 6264 6120 2d2d 2025 7322 a lambda -- %s" │ │ │ -0000d340: 2070 7269 6e31 2d74 6f2d 7374 7269 6e67 prin1-to-string │ │ │ -0000d350: 206d 6170 6361 7220 235b 2878 2920 2209 mapcar #[(x) ". │ │ │ -0000d360: 0842 8722 205b 6279 7465 2d63 6f6d 7069 .B." [byte-compi │ │ │ -0000d370: 6c65 2d61 7267 6c69 7374 2d62 6974 2078 le-arglist-bit x │ │ │ -0000d380: 5d20 325d 2066 7265 652d 7661 7273 2064 ] 2] free-vars d │ │ │ -0000d390: 656c 7120 2672 6573 7420 266f 7074 696f elq &rest &optio │ │ │ -0000d3a0: 6e61 6c20 636f 7079 2d73 6571 7565 6e63 nal copy-sequenc │ │ │ -0000d3b0: 6520 6e65 772d 7363 6f70 6520 696e 7465 e new-scope inte │ │ │ -0000d3c0: 7261 6374 6976 6520 6e69 6c20 6279 7465 ractive nil byte │ │ │ -0000d3d0: 2d63 6f6d 7069 6c65 2d77 6172 6e20 226e -compile-warn "n │ │ │ -0000d3e0: 6f6e 2d73 796d 626f 6c20 696e 2061 7267 on-symbol in arg │ │ │ -0000d3f0: 6c69 7374 3a20 2553 2220 6b65 7977 6f72 list: %S" keywor │ │ │ -0000d400: 6470 2028 6e69 6c20 7429 2022 636f 6e73 dp (nil t) "cons │ │ │ -0000d410: 7461 6e74 2073 796d 626f 6c20 696e 2061 tant symbol in a │ │ │ -0000d420: 7267 6c69 7374 3a20 2573 2220 6368 6172 rglist: %s" char │ │ │ -0000d430: 3d20 3f26 2073 796d 626f 6c2d 6e61 6d65 = ?& symbol-name │ │ │ -0000d440: 2030 2022 756e 7265 636f 676e 697a 6564 0 "unrecognized │ │ │ -0000d450: 2060 2627 206b 6579 776f 7264 2069 6e20 `&' keyword in │ │ │ -0000d460: 6172 676c 6973 743a 2025 7322 2022 6d61 arglist: %s" "ma │ │ │ -0000d470: 6c66 6f72 6d65 6420 696e 7465 7261 6374 lformed interact │ │ │ -0000d480: 6976 6520 7370 6563 3a20 2573 2220 6c65 ive spec: %s" le │ │ │ -0000d490: 7420 6c65 742a 2073 6176 652d 6578 6375 t let* save-excu │ │ │ -0000d4a0: 7273 696f 6e20 6c69 7374 2062 7974 652d rsion list byte- │ │ │ -0000d4b0: 636f 6d70 696c 652d 746f 702d 6c65 7665 compile-top-leve │ │ │ -0000d4c0: 6c20 7072 6f67 6e20 756e 7573 6564 2d76 l progn unused-v │ │ │ -0000d4d0: 6172 7320 6279 7465 2d63 6f6d 7069 6c65 ars byte-compile │ │ │ -0000d4e0: 2d77 6172 6e2d 6162 6f75 742d 756e 7573 -warn-about-unus │ │ │ -0000d4f0: 6564 2d76 6172 6961 626c 6573 2062 7974 ed-variables byt │ │ │ -0000d500: 652d 636f 6465 2061 7070 6c79 206d 616b e-code apply mak │ │ │ -0000d510: 652d 6279 7465 2d63 6f64 6520 6170 7065 e-byte-code appe │ │ │ -0000d520: 6e64 2064 6f63 2066 756e 2023 313d 233a nd doc fun #1=#: │ │ │ -0000d530: 2d2d 646f 6c69 7374 2d74 656d 702d 2d32 --dolist-temp--2 │ │ │ -0000d540: 3436 3837 2062 7974 652d 636f 6d70 696c 4687 byte-compil │ │ │ -0000d550: 652d 7761 726e 696e 6773 2062 7974 652d e-warnings byte- │ │ │ -0000d560: 636f 6d70 696c 652d 626f 756e 642d 7661 compile-bound-va │ │ │ -0000d570: 7269 6162 6c65 7320 6e65 772d 6269 6e64 riables new-bind │ │ │ -0000d580: 696e 6773 5d20 395d 290a 2864 6566 616c ings] 9]).(defal │ │ │ -0000d590: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ -0000d5a0: 652d 636f 6e73 7461 6e74 732d 7665 6374 e-constants-vect │ │ │ -0000d5b0: 6f72 2023 5b6e 696c 2022 c61b 0e0e 9f1d or #[nil "...... │ │ │ -0000d5c0: 0e0f 9f1a c789 1c18 c819 c71e 0d0d ac83 ................ │ │ │ -0000d5d0: 5c6e abbb 0940 160d 0dab aa0b 0e0d 61ac \n...@........a. │ │ │ -0000d5e0: a40d 4040 0cb7 8910 ab88 0d40 0841 a188 ..@@.......@.A.. │ │ │ -0000d5f0: aa8d 0d40 0b54 8913 a188 0d40 0c42 140d ...@.T.....@.B.. │ │ │ -0000d600: 4189 15ac 5609 4111 5c6e 0d12 8915 aa40 A...V.A.\n.....@ │ │ │ -0000d610: c9ca cbcc 0c5c 229f 5c22 2e07 8722 205b .....\".\"..." [ │ │ │ -0000d620: 746d 7020 6c69 6d69 7473 206f 7468 6572 tmp limits other │ │ │ -0000d630: 2069 2072 6574 2072 6573 7420 2d31 206e i ret rest -1 n │ │ │ -0000d640: 696c 2028 3520 3633 2032 3535 2036 3535 il (5 63 255 655 │ │ │ -0000d650: 3335 2920 6170 706c 7920 7665 6374 6f72 35) apply vector │ │ │ -0000d660: 206d 6170 6361 7220 6361 7220 6c69 6d69 mapcar car limi │ │ │ -0000d670: 7420 6279 7465 2d63 6f6d 7069 6c65 2d76 t byte-compile-v │ │ │ -0000d680: 6172 6961 626c 6573 2062 7974 652d 636f ariables byte-co │ │ │ -0000d690: 6d70 696c 652d 636f 6e73 7461 6e74 735d mpile-constants] │ │ │ -0000d6a0: 2036 5d29 0a28 6465 6661 6c69 6173 2027 6]).(defalias ' │ │ │ -0000d6b0: 6279 7465 2d63 6f6d 7069 6c65 2d74 6f70 byte-compile-top │ │ │ -0000d6c0: 2d6c 6576 656c 2023 5b28 666f 726d 2026 -level #[(form & │ │ │ -0000d6d0: 6f70 7469 6f6e 616c 2066 6f72 2d65 6666 optional for-eff │ │ │ -0000d6e0: 6563 7420 6f75 7470 7574 2d74 7970 6529 ect output-type) │ │ │ -0000d6f0: 2022 c689 c789 89c6 1a19 181e 131e 141e ".............. │ │ │ -0000d700: 150b c873 ab85 c90d 0c5c 2215 0da2 ca61 ...s.....\"....a │ │ │ -0000d710: ab8c 0d41 41ac 870d 4140 8915 aa6f 0da2 ...AA...A@...o.. │ │ │ -0000d720: cb61 ab9c 0bcc 73ac 970d 4140 3bab 91cd .a....s...A@;... │ │ │ -0000d730: ce0d 3821 ab8a cfd0 0d38 21ab 830d aa8a ..8!.....8!..... │ │ │ -0000d740: d10d 0c5c 2288 d20c 0e16 5c22 2e06 8722 ...\".....\"..." │ │ │ -0000d750: 205b 6279 7465 2d63 6f6d 7069 6c65 2d64 [byte-compile-d │ │ │ -0000d760: 6570 7468 2062 7974 652d 636f 6d70 696c epth byte-compil │ │ │ -0000d770: 652d 6d61 7864 6570 7468 2062 7974 652d e-maxdepth byte- │ │ │ -0000d780: 636f 6d70 696c 652d 6f75 7470 7574 2062 compile-output b │ │ │ -0000d790: 7974 652d 6f70 7469 6d69 7a65 2066 6f72 yte-optimize for │ │ │ -0000d7a0: 2d65 6666 6563 7420 666f 726d 206e 696c -effect form nil │ │ │ -0000d7b0: 2030 2028 7420 736f 7572 6365 2920 6279 0 (t source) by │ │ │ -0000d7c0: 7465 2d6f 7074 696d 697a 652d 666f 726d te-optimize-form │ │ │ -0000d7d0: 2070 726f 676e 2062 7974 652d 636f 6465 progn byte-code │ │ │ -0000d7e0: 2028 7420 6279 7465 2920 7665 6374 6f72 (t byte) vector │ │ │ -0000d7f0: 7020 3220 6e61 746e 756d 7020 3320 6279 p 2 natnump 3 by │ │ │ -0000d800: 7465 2d63 6f6d 7069 6c65 2d66 6f72 6d20 te-compile-form │ │ │ -0000d810: 6279 7465 2d63 6f6d 7069 6c65 2d6f 7574 byte-compile-out │ │ │ -0000d820: 2d74 6f70 6c65 7665 6c20 6279 7465 2d63 -toplevel byte-c │ │ │ -0000d830: 6f6d 7069 6c65 2d74 6167 2d6e 756d 6265 ompile-tag-numbe │ │ │ -0000d840: 7220 6279 7465 2d63 6f6d 7069 6c65 2d76 r byte-compile-v │ │ │ -0000d850: 6172 6961 626c 6573 2062 7974 652d 636f ariables byte-co │ │ │ -0000d860: 6d70 696c 652d 636f 6e73 7461 6e74 7320 mpile-constants │ │ │ -0000d870: 6f75 7470 7574 2d74 7970 655d 2037 5d29 output-type] 7]) │ │ │ -0000d880: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -0000d890: 2d63 6f6d 7069 6c65 2d6f 7574 2d74 6f70 -compile-out-top │ │ │ -0000d8a0: 6c65 7665 6c20 235b 2826 6f70 7469 6f6e level #[(&option │ │ │ -0000d8b0: 616c 2066 6f72 2d65 6666 6563 7420 6f75 al for-effect ou │ │ │ -0000d8c0: 7470 7574 2d74 7970 6529 2022 0e25 abb4 tput-type) ".%.. │ │ │ -0000d8d0: 5c6e 4040 c661 ab85 5c6e 4112 aaa8 c7c8 \n@@.a..\nA..... │ │ │ -0000d8e0: 0e26 b73f ad9e c90e 2621 891d ab92 0d40 .&.?....&!.....@ │ │ │ -0000d8f0: 4039 ac8c 0d40 40a7 ac86 0d41 8915 ac6e @9...@@....A...n │ │ │ -0000d900: 0d40 4029 2188 cacb cc5c 2288 5c6e 9f12 .@@)!....\".\n.. │ │ │ -0000d910: 0e28 cd73 ab86 ce5c 6e0e 255c 2212 c809 .(.s...\n.%\"... │ │ │ -0000d920: cf61 3fc8 891c 1d18 1b09 cf61 8428 0109 .a?........a.(.. │ │ │ -0000d930: d061 ab83 d1aa 81d2 5c6e 9b84 2801 d35c .a......\n..(..\ │ │ │ -0000d940: 6eb7 8428 01cb 5c6e b789 1583 2801 0dc9 n..(..\n....(... │ │ │ -0000d950: 5c6e 2173 419f 8913 4040 d473 abb1 0b40 \n!sA...@@.s...@ │ │ │ -0000d960: 4140 150b 4040 d561 ab9e 0d3a ac8e 0d39 A@..@@.a...:...9 │ │ │ -0000d970: ab96 d60d 21ac 910d d773 ac8c 08ab fcd8 ....!....s...... │ │ │ -0000d980: 0d44 0c42 8914 aaea 0d0c 4289 14aa e308 .D.B......B..... │ │ │ -0000d990: abe9 d90b 9bac e40e 29ab 870b 4040 da4e ........)...@@.N │ │ │ -0000d9a0: ae85 0b40 40db 4e89 15ab d00b 41ab 9509 ...@@.N.....A... │ │ │ -0000d9b0: dc73 abc7 0b41 41ab c20b 4140 40c6 61ab .s...AA...A@@.a. │ │ │ -0000d9c0: ba0b 4113 c810 0c9f 140d dd61 ab90 0c40 ..A........a...@ │ │ │ -0000d9d0: a2d8 61ab 890c 4041 400c 4142 aa83 0d0c ..a...@A@.AB.... │ │ │ -0000d9e0: 4243 1409 d061 ac8c dec8 dfe0 0c40 415c BC...a.......@A\ │ │ │ -0000d9f0: 225c 223f ab87 0b41 8913 8282 000b ab90 "\"?...A........ │ │ │ -0000da00: e120 1e27 e2e3 5c6e 210e 270e 2a46 29aa . .'..\n!.'.*F). │ │ │ -0000da10: 8c0c 41ab 86e4 0c9f 42aa 820c 402c 8722 ..A.....B...@,." │ │ │ -0000da20: 205b 6d61 7963 616c 6c20 6f75 7470 7574 [maycall output │ │ │ -0000da30: 2d74 7970 6520 6279 7465 2d63 6f6d 7069 -type byte-compi │ │ │ -0000da40: 6c65 2d6f 7574 7075 7420 7265 7374 2062 le-output rest b │ │ │ -0000da50: 6f64 7920 746d 7020 6279 7465 2d64 6973 ody tmp byte-dis │ │ │ -0000da60: 6361 7264 2062 7974 652d 636f 6d70 696c card byte-compil │ │ │ -0000da70: 652d 7075 7368 2d63 6f6e 7374 616e 7420 e-push-constant │ │ │ -0000da80: 6e69 6c20 7265 7665 7273 6520 6279 7465 nil reverse byte │ │ │ -0000da90: 2d63 6f6d 7069 6c65 2d6f 7574 2062 7974 -compile-out byt │ │ │ -0000daa0: 652d 7265 7475 726e 2030 2028 7420 6279 e-return 0 (t by │ │ │ -0000dab0: 7465 2920 6279 7465 2d6f 7074 696d 697a te) byte-optimiz │ │ │ -0000dac0: 652d 6c61 7063 6f64 6520 6c61 6d62 6461 e-lapcode lambda │ │ │ -0000dad0: 2066 696c 6520 3530 2038 2054 4147 2028 file 50 8 TAG ( │ │ │ -0000dae0: 6279 7465 2d76 6172 7265 6620 6279 7465 byte-varref byte │ │ │ -0000daf0: 2d63 6f6e 7374 616e 7429 2062 7974 652d -constant) byte- │ │ │ -0000db00: 636f 6e73 7461 6e74 206b 6579 776f 7264 constant keyword │ │ │ -0000db10: 7020 286e 696c 2074 2920 7175 6f74 6520 p (nil t) quote │ │ │ -0000db20: 3320 6279 7465 2d6f 7063 6f64 6531 392d 3 byte-opcode19- │ │ │ -0000db30: 696e 7665 7274 2062 7974 652d 6f70 636f invert byte-opco │ │ │ -0000db40: 6465 2d69 6e76 6572 7420 2866 696c 6520 de-invert (file │ │ │ -0000db50: 7072 6f67 6e20 7429 2066 756e 6361 6c6c progn t) funcall │ │ │ -0000db60: 2064 656c 7120 6d61 7063 6172 2063 6f6e delq mapcar con │ │ │ -0000db70: 7370 2062 7974 652d 636f 6d70 696c 652d sp byte-compile- │ │ │ -0000db80: 636f 6e73 7461 6e74 732d 7665 6374 6f72 constants-vector │ │ │ -0000db90: 2062 7974 652d 636f 6465 2062 7974 652d byte-code byte- │ │ │ -0000dba0: 636f 6d70 696c 652d 6c61 7063 6f64 6520 compile-lapcode │ │ │ -0000dbb0: 7072 6f67 6e20 666f 722d 6566 6665 6374 progn for-effect │ │ │ -0000dbc0: 2062 7974 652d 636f 6d70 696c 652d 636f byte-compile-co │ │ │ -0000dbd0: 6e73 7461 6e74 7320 6279 7465 2d63 6f6d nstants byte-com │ │ │ -0000dbe0: 7069 6c65 2d76 6563 746f 7220 6279 7465 pile-vector byte │ │ │ -0000dbf0: 2d6f 7074 696d 697a 6520 6279 7465 2d63 -optimize byte-c │ │ │ -0000dc00: 6f6d 7069 6c65 2d65 6d61 6373 3139 2d63 ompile-emacs19-c │ │ │ -0000dc10: 6f6d 7061 7469 6269 6c69 7479 2062 7974 ompatibility byt │ │ │ -0000dc20: 652d 636f 6d70 696c 652d 6d61 7864 6570 e-compile-maxdep │ │ │ -0000dc30: 7468 5d20 365d 290a 2864 6566 616c 6961 th] 6]).(defalia │ │ │ -0000dc40: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ -0000dc50: 746f 702d 6c65 7665 6c2d 626f 6479 2023 top-level-body # │ │ │ -0000dc60: 5b28 626f 6479 2026 6f70 7469 6f6e 616c [(body &optional │ │ │ -0000dc70: 2066 6f72 2d65 6666 6563 7429 2022 c2c3 for-effect) ".. │ │ │ -0000dc80: 0942 08c4 2389 11a2 c361 ab83 0941 8709 .B..#....a...A.. │ │ │ -0000dc90: ad82 0943 8722 205b 666f 722d 6566 6665 ...C." [for-effe │ │ │ -0000dca0: 6374 2062 6f64 7920 6279 7465 2d63 6f6d ct body byte-com │ │ │ -0000dcb0: 7069 6c65 2d74 6f70 2d6c 6576 656c 2070 pile-top-level p │ │ │ -0000dcc0: 726f 676e 2074 5d20 355d 290a 2864 6566 rogn t] 5]).(def │ │ │ -0000dcd0: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ -0000dce0: 696c 652d 666f 726d 2023 5b28 666f 726d ile-form #[(form │ │ │ -0000dcf0: 2026 6f70 7469 6f6e 616c 2066 6f72 2d65 &optional for-e │ │ │ -0000dd00: 6666 6563 7429 2022 c60d 095c 2289 153a ffect) "...\"..: │ │ │ -0000dd10: aca5 0d39 ab8a c70d 21ac 850d c873 ab86 ...9....!....s.. │ │ │ -0000dd20: c90d 2188 aaef 0cab 8708 ab84 ca14 aae5 ..!............. │ │ │ -0000dd30: cbcc 0d5c 2288 aade 0d40 39ab b60d 4089 ...\"....@9...@. │ │ │ -0000dd40: 1bcd 4e1a 0bce 73ab 85cf d00b 5c22 885c ..N...s.....\".\ │ │ │ -0000dd50: 6eab 910e 1bab 870b d14e d24e ac86 5c6e n........N.N..\n │ │ │ -0000dd60: 0d21 88aa 8ed3 0e1c 73ab 84d4 0d21 88d5 .!......s....!.. │ │ │ -0000dd70: 0d21 882a aaa3 d60d 4021 ac87 0d40 a2d7 .!.*....@!...@.. │ │ │ -0000dd80: 61ab 920d d80d 2189 1561 ac89 d90d 0c5c a.....!..a.....\ │ │ │ -0000dd90: 2288 ca14 aa84 d50d 2188 0cad 82da 2087 ".......!..... . │ │ │ -0000dda0: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ -0000ddb0: 6465 6c65 7465 2d65 7272 6f72 7320 6279 delete-errors by │ │ │ -0000ddc0: 7465 2d63 6f6d 7069 6c65 2d6d 6163 726f te-compile-macro │ │ │ -0000ddd0: 2d65 6e76 6972 6f6e 6d65 6e74 2068 616e -environment han │ │ │ -0000dde0: 646c 6572 2066 6e20 666f 722d 6566 6665 dler fn for-effe │ │ │ -0000ddf0: 6374 2066 6f72 6d20 6d61 6372 6f65 7870 ct form macroexp │ │ │ -0000de00: 616e 6420 6b65 7977 6f72 6470 2028 6e69 and keywordp (ni │ │ │ -0000de10: 6c20 7429 2062 7974 652d 636f 6d70 696c l t) byte-compil │ │ │ -0000de20: 652d 636f 6e73 7461 6e74 206e 696c 2062 e-constant nil b │ │ │ -0000de30: 7974 652d 636f 6d70 696c 652d 7661 7269 yte-compile-vari │ │ │ -0000de40: 6162 6c65 2d72 6566 2062 7974 652d 7661 able-ref byte-va │ │ │ -0000de50: 7272 6566 2062 7974 652d 636f 6d70 696c rref byte-compil │ │ │ -0000de60: 6520 2874 206e 696c 2920 6279 7465 2d63 e (t nil) byte-c │ │ │ -0000de70: 6f6d 7069 6c65 2d77 6172 6e20 2225 7320 ompile-warn "%s │ │ │ -0000de80: 6361 6c6c 6564 2061 7320 6120 6675 6e63 called as a func │ │ │ -0000de90: 7469 6f6e 2220 6279 7465 2d6f 7063 6f64 tion" byte-opcod │ │ │ -0000dea0: 6520 656d 6163 7332 302d 6f70 636f 6465 e emacs20-opcode │ │ │ -0000deb0: 2063 616c 6c61 7267 7320 6279 7465 2d63 callargs byte-c │ │ │ -0000dec0: 6f6d 7069 6c65 2d63 616c 6c61 7267 732d ompile-callargs- │ │ │ -0000ded0: 7761 726e 2062 7974 652d 636f 6d70 696c warn byte-compil │ │ │ -0000dee0: 652d 6e6f 726d 616c 2d63 616c 6c20 636f e-normal-call co │ │ │ -0000def0: 6d70 696c 6564 2d66 756e 6374 696f 6e2d mpiled-function- │ │ │ -0000df00: 7020 6c61 6d62 6461 2062 7974 652d 636f p lambda byte-co │ │ │ -0000df10: 6d70 696c 652d 756e 666f 6c64 2d6c 616d mpile-unfold-lam │ │ │ -0000df20: 6264 6120 6279 7465 2d63 6f6d 7069 6c65 bda byte-compile │ │ │ -0000df30: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ -0000df40: 6c65 2d64 6973 6361 7264 2062 7974 652d le-discard byte- │ │ │ -0000df50: 636f 6d70 696c 652d 656d 6163 7331 392d compile-emacs19- │ │ │ -0000df60: 636f 6d70 6174 6962 696c 6974 7920 6279 compatibility by │ │ │ -0000df70: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e69 te-compile-warni │ │ │ -0000df80: 6e67 735d 2034 5d29 0a28 6465 6661 6c69 ngs] 4]).(defali │ │ │ -0000df90: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ -0000dfa0: 2d6e 6f72 6d61 6c2d 6361 6c6c 2023 5b28 -normal-call #[( │ │ │ -0000dfb0: 666f 726d 2920 2208 ab84 c209 2188 c309 form) ".....!... │ │ │ -0000dfc0: 4021 88c4 c509 415c 2288 c6c7 0941 475c @!....A\"....AG\ │ │ │ -0000dfd0: 2287 2220 5b62 7974 652d 636f 6d70 696c "." [byte-compil │ │ │ -0000dfe0: 652d 6765 6e65 7261 7465 2d63 616c 6c2d e-generate-call- │ │ │ -0000dff0: 7472 6565 2066 6f72 6d20 6279 7465 2d63 tree form byte-c │ │ │ -0000e000: 6f6d 7069 6c65 2d61 6e6e 6f74 6174 652d ompile-annotate- │ │ │ -0000e010: 6361 6c6c 2d74 7265 6520 6279 7465 2d63 call-tree byte-c │ │ │ -0000e020: 6f6d 7069 6c65 2d70 7573 682d 636f 6e73 ompile-push-cons │ │ │ -0000e030: 7461 6e74 206d 6170 6361 7220 6279 7465 tant mapcar byte │ │ │ -0000e040: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6279 -compile-form by │ │ │ -0000e050: 7465 2d63 6f6d 7069 6c65 2d6f 7574 2062 te-compile-out b │ │ │ -0000e060: 7974 652d 6361 6c6c 5d20 335d 290a 2862 yte-call] 3]).(b │ │ │ -0000e070: 7974 652d 636f 6465 2022 c0c1 21ac 84c1 yte-code "..!... │ │ │ -0000e080: c24d 88c0 8722 205b 6662 6f75 6e64 7020 .M..." [fboundp │ │ │ -0000e090: 676c 6f62 616c 6c79 2d62 6f75 6e64 7020 globally-boundp │ │ │ -0000e0a0: 626f 756e 6470 5d20 3229 0a28 6465 6661 boundp] 2).(defa │ │ │ -0000e0b0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ -0000e0c0: 6c65 2d76 6172 6961 626c 652d 7265 6620 le-variable-ref │ │ │ -0000e0d0: 235b 2862 6173 652d 6f70 2076 6172 2026 #[(base-op var & │ │ │ -0000e0e0: 6f70 7469 6f6e 616c 2076 6172 6269 6e64 optional varbind │ │ │ -0000e0f0: 2d66 6c61 6773 2920 220d 39ab 8ac6 0d21 -flags) ".9....! │ │ │ -0000e100: ac85 0dc7 73ab a5c8 0bc9 61ab 83ca aa8e ....s.....a..... │ │ │ -0000e110: 0bcb 61ab 83cc aa86 0bcd 61ad 81ce 0d39 ..a.......a....9 │ │ │ -0000e120: ab83 cfaa 81d0 0d23 8882 db00 0dd1 4eab .......#......N. │ │ │ -0000e130: 9ad2 5c6e 73ab 950d d14e 1cc8 d30d 0c3b ..\ns....N.....; │ │ │ -0000e140: ab83 0caa 84d4 d50c 5c22 2388 290d d64e ........\"#.)..N │ │ │ -0000e150: ab9a d75c 6e73 ab95 0dd6 4e1c c8d8 0d0c ...\ns....N..... │ │ │ -0000e160: 3bab 830c aa84 d4d5 0c5c 2223 8829 d95c ;........\"#.).\ │ │ │ -0000e170: 6e73 abe5 0bcd 61ab 8c0d 0e26 ae81 da42 ns....a....&...B │ │ │ -0000e180: 0942 11aa d4db 0d21 accf 0d09 b789 18ad .B.....!........ │ │ │ -0000e190: 9108 dc08 410b cb61 ab84 0e27 aa82 0e28 ....A..a...'...( │ │ │ -0000e1a0: 5c22 a129 acb4 ddde 21ab 860d 0e1e 73ac \".)....!.....s. │ │ │ -0000e1b0: a90b cb61 ab93 0d0e 5c22 73ac 9ec8 df0d ...a....\"s..... │ │ │ -0000e1c0: 5c22 880d 0e5c 2242 165c 22aa 910d 0e23 \"...\"B.\"....# │ │ │ -0000e1d0: 73ac 8bc8 e00d 5c22 880d 0e23 4216 230d s.....\"...#B.#. │ │ │ -0000e1e0: 0e24 b789 1e25 ac8a 0d43 8916 250e 2442 .$...%...C..%.$B │ │ │ -0000e1f0: 1624 e10b 0e25 5c22 2987 2220 5b63 656c .$...%\")." [cel │ │ │ -0000e200: 6c20 6279 7465 2d63 6f6d 7069 6c65 2d62 l byte-compile-b │ │ │ -0000e210: 6f75 6e64 2d76 6172 6961 626c 6573 2062 ound-variables b │ │ │ -0000e220: 7974 652d 636f 6d70 696c 652d 7761 726e yte-compile-warn │ │ │ -0000e230: 696e 6773 2062 6173 652d 6f70 206f 6220 ings base-op ob │ │ │ -0000e240: 7661 7220 6b65 7977 6f72 6470 2028 6e69 var keywordp (ni │ │ │ -0000e250: 6c20 7429 2062 7974 652d 636f 6d70 696c l t) byte-compil │ │ │ -0000e260: 652d 7761 726e 2062 7974 652d 7661 7272 e-warn byte-varr │ │ │ -0000e270: 6566 2022 5661 7269 6162 6c65 2072 6566 ef "Variable ref │ │ │ -0000e280: 6572 656e 6365 2074 6f20 2573 2025 7322 erence to %s %s" │ │ │ -0000e290: 2062 7974 652d 7661 7273 6574 2022 4174 byte-varset "At │ │ │ -0000e2a0: 7465 6d70 7420 746f 2073 6574 2025 7320 tempt to set %s │ │ │ -0000e2b0: 2573 2220 6279 7465 2d76 6172 6269 6e64 %s" byte-varbind │ │ │ -0000e2c0: 2022 4174 7465 6d70 7420 746f 206c 6574 "Attempt to let │ │ │ -0000e2d0: 2d62 696e 6420 2573 2025 7322 2022 636f -bind %s %s" "co │ │ │ -0000e2e0: 6e73 7461 6e74 2073 796d 626f 6c22 2022 nstant symbol" " │ │ │ -0000e2f0: 6e6f 6e2d 7379 6d62 6f6c 2220 6279 7465 non-symbol" byte │ │ │ -0000e300: 2d6f 6273 6f6c 6574 652d 7661 7269 6162 -obsolete-variab │ │ │ -0000e310: 6c65 206f 6273 6f6c 6574 6520 2225 7320 le obsolete "%s │ │ │ -0000e320: 6973 2061 6e20 6f62 736f 6c65 7465 2076 is an obsolete v │ │ │ -0000e330: 6172 6961 626c 653b 2025 7322 2066 6f72 ariable; %s" for │ │ │ -0000e340: 6d61 7420 2275 7365 2025 7320 696e 7374 mat "use %s inst │ │ │ -0000e350: 6561 642e 2220 6279 7465 2d63 6f6d 7061 ead." byte-compa │ │ │ -0000e360: 7469 626c 652d 7661 7269 6162 6c65 2070 tible-variable p │ │ │ -0000e370: 6564 616e 7469 6320 2225 7320 6973 2070 edantic "%s is p │ │ │ -0000e380: 726f 7669 6465 6420 666f 7220 636f 6d70 rovided for comp │ │ │ -0000e390: 6174 6962 696c 6974 793b 2025 7322 2066 atibility; %s" f │ │ │ -0000e3a0: 7265 652d 7661 7273 2030 2067 6c6f 6261 ree-vars 0 globa │ │ │ -0000e3b0: 6c6c 792d 626f 756e 6470 206c 6f67 696f lly-boundp logio │ │ │ -0000e3c0: 7220 626f 756e 6470 2063 7572 7265 6e74 r boundp current │ │ │ -0000e3d0: 2d6c 6f61 642d 6c69 7374 2022 6173 7369 -load-list "assi │ │ │ -0000e3e0: 676e 6d65 6e74 2074 6f20 6672 6565 2076 gnment to free v │ │ │ -0000e3f0: 6172 6961 626c 6520 2573 2220 2272 6566 ariable %s" "ref │ │ │ -0000e400: 6572 656e 6365 2074 6f20 6672 6565 2076 erence to free v │ │ │ -0000e410: 6172 6961 626c 6520 2573 2220 6279 7465 ariable %s" byte │ │ │ -0000e420: 2d63 6f6d 7069 6c65 2d6f 7574 2062 7974 -compile-out byt │ │ │ -0000e430: 652d 636f 6d70 696c 652d 6672 6565 2d61 e-compile-free-a │ │ │ -0000e440: 7373 6967 6e6d 656e 7473 2062 7974 652d ssignments byte- │ │ │ -0000e450: 636f 6d70 696c 652d 6672 6565 2d72 6566 compile-free-ref │ │ │ -0000e460: 6572 656e 6365 7320 6279 7465 2d63 6f6d erences byte-com │ │ │ -0000e470: 7069 6c65 2d76 6172 6961 626c 6573 2074 pile-variables t │ │ │ -0000e480: 6d70 2076 6172 6269 6e64 2d66 6c61 6773 mp varbind-flags │ │ │ -0000e490: 2062 7974 652d 636f 6d70 696c 652d 6173 byte-compile-as │ │ │ -0000e4a0: 7369 676e 6564 2d62 6974 2062 7974 652d signed-bit byte- │ │ │ -0000e4b0: 636f 6d70 696c 652d 7265 6665 7265 6e63 compile-referenc │ │ │ -0000e4c0: 6564 2d62 6974 5d20 375d 290a 2864 6566 ed-bit] 7]).(def │ │ │ -0000e4d0: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ -0000e4e0: 696c 652d 6765 742d 636f 6e73 7461 6e74 ile-get-constant │ │ │ -0000e4f0: 2027 286d 6163 726f 202e 2023 5b28 636f '(macro . #[(co │ │ │ -0000e500: 6e73 7429 2022 c1c2 c308 44c4 08c5 4242 nst) "....D...BB │ │ │ -0000e510: c608 c742 4246 c8c9 cacb cc08 44cd 4242 ...BBF......D.BB │ │ │ -0000e520: 4544 4587 2220 5b63 6f6e 7374 206f 7220 EDE." [const or │ │ │ -0000e530: 6966 2073 7472 696e 6770 2061 7373 6f63 if stringp assoc │ │ │ -0000e540: 2028 6279 7465 2d63 6f6d 7069 6c65 2d63 (byte-compile-c │ │ │ -0000e550: 6f6e 7374 616e 7473 2920 6173 7371 2028 onstants) assq ( │ │ │ -0000e560: 6279 7465 2d63 6f6d 7069 6c65 2d63 6f6e byte-compile-con │ │ │ -0000e570: 7374 616e 7473 2920 6361 7220 7365 7471 stants) car setq │ │ │ -0000e580: 2062 7974 652d 636f 6d70 696c 652d 636f byte-compile-co │ │ │ -0000e590: 6e73 7461 6e74 7320 636f 6e73 206c 6973 nstants cons lis │ │ │ -0000e5a0: 7420 2862 7974 652d 636f 6d70 696c 652d t (byte-compile- │ │ │ -0000e5b0: 636f 6e73 7461 6e74 7329 5d20 385d 2929 constants)] 8])) │ │ │ -0000e5c0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -0000e5d0: 2d63 6f6d 7069 6c65 2d63 6f6e 7374 616e -compile-constan │ │ │ -0000e5e0: 7420 235b 2863 6f6e 7374 2920 2208 ab84 t #[(const) "... │ │ │ -0000e5f0: c389 1087 c4c5 5c6e 3bab 86c6 5c6e 095c ......\n;...\n.\ │ │ │ -0000e600: 22aa 835c 6e09 b7ae 875c 6e43 0942 8911 "..\n....\nC.B.. │ │ │ -0000e610: 405c 2287 2220 5b66 6f72 2d65 6666 6563 @\"." [for-effec │ │ │ -0000e620: 7420 6279 7465 2d63 6f6d 7069 6c65 2d63 t byte-compile-c │ │ │ -0000e630: 6f6e 7374 616e 7473 2063 6f6e 7374 206e onstants const n │ │ │ -0000e640: 696c 2062 7974 652d 636f 6d70 696c 652d il byte-compile- │ │ │ -0000e650: 6f75 7420 6279 7465 2d63 6f6e 7374 616e out byte-constan │ │ │ -0000e660: 7420 6173 736f 635d 2035 5d29 0a28 6465 t assoc] 5]).(de │ │ │ -0000e670: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -0000e680: 7069 6c65 2d70 7573 682d 636f 6e73 7461 pile-push-consta │ │ │ -0000e690: 6e74 2023 5b28 636f 6e73 7429 2022 c318 nt #[(const) ".. │ │ │ -0000e6a0: 5c6e 1a08 ab85 c389 10aa 99c4 c55c 6e3b \n...........\n; │ │ │ -0000e6b0: ab86 c65c 6e09 5c22 aa83 5c6e 09b7 ae87 ...\n.\"..\n.... │ │ │ -0000e6c0: 5c6e 4309 4289 1140 5c22 2a87 2220 5b66 \nC.B..@\"*." [f │ │ │ -0000e6d0: 6f72 2d65 6666 6563 7420 6279 7465 2d63 or-effect byte-c │ │ │ -0000e6e0: 6f6d 7069 6c65 2d63 6f6e 7374 616e 7473 ompile-constants │ │ │ -0000e6f0: 2063 6f6e 7374 206e 696c 2062 7974 652d const nil byte- │ │ │ -0000e700: 636f 6d70 696c 652d 6f75 7420 6279 7465 compile-out byte │ │ │ -0000e710: 2d63 6f6e 7374 616e 7420 6173 736f 635d -constant assoc] │ │ │ -0000e720: 2035 5d29 0a28 6465 6661 6c69 6173 2027 5]).(defalias ' │ │ │ -0000e730: 6279 7465 2d64 6566 6f70 2d63 6f6d 7069 byte-defop-compi │ │ │ -0000e740: 6c65 7220 2728 6d61 6372 6f20 2e20 235b ler '(macro . #[ │ │ │ -0000e750: 2866 756e 6374 696f 6e20 266f 7074 696f (function &optio │ │ │ -0000e760: 6e61 6c20 636f 6d70 696c 652d 6861 6e64 nal compile-hand │ │ │ -0000e770: 6c65 7229 2022 c41a 0b39 ab8a c5c6 c70b ler) "...9...... │ │ │ -0000e780: 2150 2112 aa87 0b41 4012 0b40 13c8 c90b !P!....A@..@.... │ │ │ -0000e790: 44ca c908 cbb7 41ae 8a08 ae87 c5cc c70b D.....A......... │ │ │ -0000e7a0: 2150 2144 4619 5c6e ab97 cd09 c8c9 0b44 !P!DF.\n.......D │ │ │ -0000e7b0: cec9 5c6e 4446 c8c9 5c6e 44cf c90b 4446 ..\nDF..\nD...DF │ │ │ -0000e7c0: 46aa 8109 2a87 2220 5b63 6f6d 7069 6c65 F...*." [compile │ │ │ -0000e7d0: 2d68 616e 646c 6572 2066 6e66 6f72 6d20 -handler fnform │ │ │ -0000e7e0: 6f70 636f 6465 2066 756e 6374 696f 6e20 opcode function │ │ │ -0000e7f0: 6e69 6c20 696e 7465 726e 2022 6279 7465 nil intern "byte │ │ │ -0000e800: 2d22 2073 796d 626f 6c2d 6e61 6d65 2070 -" symbol-name p │ │ │ -0000e810: 7574 2071 756f 7465 2027 6279 7465 2d63 ut quote 'byte-c │ │ │ -0000e820: 6f6d 7069 6c65 2028 2830 202e 2062 7974 ompile ((0 . byt │ │ │ -0000e830: 652d 636f 6d70 696c 652d 6e6f 2d61 7267 e-compile-no-arg │ │ │ -0000e840: 7329 2028 3120 2e20 6279 7465 2d63 6f6d s) (1 . byte-com │ │ │ -0000e850: 7069 6c65 2d6f 6e65 2d61 7267 2920 2832 pile-one-arg) (2 │ │ │ -0000e860: 202e 2062 7974 652d 636f 6d70 696c 652d . byte-compile- │ │ │ -0000e870: 7477 6f2d 6172 6773 2920 2833 202e 2062 two-args) (3 . b │ │ │ -0000e880: 7974 652d 636f 6d70 696c 652d 7468 7265 yte-compile-thre │ │ │ -0000e890: 652d 6172 6773 2920 2830 2d31 202e 2062 e-args) (0-1 . b │ │ │ -0000e8a0: 7974 652d 636f 6d70 696c 652d 7a65 726f yte-compile-zero │ │ │ -0000e8b0: 2d6f 722d 6f6e 652d 6172 6729 2028 312d -or-one-arg) (1- │ │ │ -0000e8c0: 3220 2e20 6279 7465 2d63 6f6d 7069 6c65 2 . byte-compile │ │ │ -0000e8d0: 2d6f 6e65 2d6f 722d 7477 6f2d 6172 6773 -one-or-two-args │ │ │ -0000e8e0: 2920 2832 2d33 202e 2062 7974 652d 636f ) (2-3 . byte-co │ │ │ -0000e8f0: 6d70 696c 652d 7477 6f2d 6f72 2d74 6872 mpile-two-or-thr │ │ │ -0000e900: 6565 2d61 7267 7329 2028 302b 3120 2e20 ee-args) (0+1 . │ │ │ -0000e910: 6279 7465 2d63 6f6d 7069 6c65 2d6e 6f2d byte-compile-no- │ │ │ -0000e920: 6172 6773 2d77 6974 682d 6f6e 652d 6578 args-with-one-ex │ │ │ -0000e930: 7472 6129 2028 312b 3120 2e20 6279 7465 tra) (1+1 . byte │ │ │ -0000e940: 2d63 6f6d 7069 6c65 2d6f 6e65 2d61 7267 -compile-one-arg │ │ │ -0000e950: 2d77 6974 682d 6f6e 652d 6578 7472 6129 -with-one-extra) │ │ │ -0000e960: 2028 322b 3120 2e20 6279 7465 2d63 6f6d (2+1 . byte-com │ │ │ -0000e970: 7069 6c65 2d74 776f 2d61 7267 732d 7769 pile-two-args-wi │ │ │ -0000e980: 7468 2d6f 6e65 2d65 7874 7261 2920 2830 th-one-extra) (0 │ │ │ -0000e990: 2d31 2b31 202e 2062 7974 652d 636f 6d70 -1+1 . byte-comp │ │ │ -0000e9a0: 696c 652d 7a65 726f 2d6f 722d 6f6e 652d ile-zero-or-one- │ │ │ -0000e9b0: 6172 672d 7769 7468 2d6f 6e65 2d65 7874 arg-with-one-ext │ │ │ -0000e9c0: 7261 2920 2831 2d32 2b31 202e 2062 7974 ra) (1-2+1 . byt │ │ │ -0000e9d0: 652d 636f 6d70 696c 652d 6f6e 652d 6f72 e-compile-one-or │ │ │ -0000e9e0: 2d74 776f 2d61 7267 732d 7769 7468 2d6f -two-args-with-o │ │ │ -0000e9f0: 6e65 2d65 7874 7261 2920 2832 2d33 2b31 ne-extra) (2-3+1 │ │ │ -0000ea00: 202e 2062 7974 652d 636f 6d70 696c 652d . byte-compile- │ │ │ -0000ea10: 7477 6f2d 6f72 2d74 6872 6565 2d61 7267 two-or-three-arg │ │ │ -0000ea20: 732d 7769 7468 2d6f 6e65 2d65 7874 7261 s-with-one-extra │ │ │ -0000ea30: 2920 2830 2b32 202e 2062 7974 652d 636f ) (0+2 . byte-co │ │ │ -0000ea40: 6d70 696c 652d 6e6f 2d61 7267 732d 7769 mpile-no-args-wi │ │ │ -0000ea50: 7468 2d74 776f 2d65 7874 7261 2920 2831 th-two-extra) (1 │ │ │ -0000ea60: 2b32 202e 2062 7974 652d 636f 6d70 696c +2 . byte-compil │ │ │ -0000ea70: 652d 6f6e 652d 6172 672d 7769 7468 2d74 e-one-arg-with-t │ │ │ -0000ea80: 776f 2d65 7874 7261 2929 2022 6279 7465 wo-extra)) "byte │ │ │ -0000ea90: 2d63 6f6d 7069 6c65 2d22 2070 726f 676e -compile-" progn │ │ │ -0000eaa0: 2027 6279 7465 2d6f 7063 6f64 6520 2762 'byte-opcode 'b │ │ │ -0000eab0: 7974 652d 6f70 636f 6465 2d69 6e76 6572 yte-opcode-inver │ │ │ -0000eac0: 745d 2038 5d29 290a 2864 6566 616c 6961 t] 8])).(defalia │ │ │ -0000ead0: 7320 2762 7974 652d 6465 666f 702d 636f s 'byte-defop-co │ │ │ -0000eae0: 6d70 696c 6572 3230 2027 286d 6163 726f mpiler20 '(macro │ │ │ -0000eaf0: 202e 2023 5b28 6675 6e63 7469 6f6e 2026 . #[(function & │ │ │ -0000eb00: 6f70 7469 6f6e 616c 2063 6f6d 7069 6c65 optional compile │ │ │ -0000eb10: 2d68 616e 646c 6572 2920 22c2 c3c4 09a3 -handler) "..... │ │ │ -0000eb20: 40ae 8bc5 c6c7 09a2 ae81 0921 5021 44c8 @..........!P!D. │ │ │ -0000eb30: c946 ca09 0845 4587 2220 5b63 6f6d 7069 .F...EE." [compi │ │ │ -0000eb40: 6c65 2d68 616e 646c 6572 2066 756e 6374 le-handler funct │ │ │ -0000eb50: 696f 6e20 7072 6f67 6e20 7075 7420 7175 ion progn put qu │ │ │ -0000eb60: 6f74 6520 696e 7465 726e 2022 6279 7465 ote intern "byte │ │ │ -0000eb70: 2d22 2073 796d 626f 6c2d 6e61 6d65 2027 -" symbol-name ' │ │ │ -0000eb80: 656d 6163 7332 302d 6f70 636f 6465 2074 emacs20-opcode t │ │ │ -0000eb90: 2062 7974 652d 6465 666f 702d 636f 6d70 byte-defop-comp │ │ │ -0000eba0: 696c 6572 5d20 375d 2929 0a28 6465 6661 iler] 7])).(defa │ │ │ -0000ebb0: 6c69 6173 2027 6279 7465 2d64 6566 6f70 lias 'byte-defop │ │ │ -0000ebc0: 2d63 6f6d 7069 6c65 722d 726d 7366 756e -compiler-rmsfun │ │ │ -0000ebd0: 2027 286d 6163 726f 202e 2023 5b28 6675 '(macro . #[(fu │ │ │ -0000ebe0: 6e63 7469 6f6e 2026 6f70 7469 6f6e 616c nction &optional │ │ │ -0000ebf0: 2063 6f6d 7069 6c65 2d68 616e 646c 6572 compile-handler │ │ │ -0000ec00: 2920 22c5 c6c7 0c21 5021 c5c8 c70c 2150 ) "....!P!....!P │ │ │ -0000ec10: 21c9 ca0c 44cb ca09 ccb7 41ae 8a09 ae87 !...D.....A..... │ │ │ -0000ec20: c5cd c70c 2150 2144 4618 1b1a ce08 c9ca ....!P!DF....... │ │ │ -0000ec30: 0c44 cfca 5c6e 4446 c9ca 0c44 d0ca 0b44 .D..\nDF...D...D │ │ │ -0000ec40: 46c9 ca5c 6e44 d1ca 0c44 46c9 ca0b 44d2 F..\nD...DF...D. │ │ │ -0000ec50: ca0c 4446 af06 2b87 2220 5b66 6e66 6f72 ..DF..+." [fnfor │ │ │ -0000ec60: 6d20 636f 6d70 696c 652d 6861 6e64 6c65 m compile-handle │ │ │ -0000ec70: 7220 6f70 636f 6465 206f 7063 6f64 6531 r opcode opcode1 │ │ │ -0000ec80: 3920 6675 6e63 7469 6f6e 2069 6e74 6572 9 function inter │ │ │ -0000ec90: 6e20 2262 7974 652d 2220 7379 6d62 6f6c n "byte-" symbol │ │ │ -0000eca0: 2d6e 616d 6520 2262 7974 652d 6f6c 642d -name "byte-old- │ │ │ -0000ecb0: 2220 7075 7420 7175 6f74 6520 2762 7974 " put quote 'byt │ │ │ -0000ecc0: 652d 636f 6d70 696c 6520 2828 3220 2e20 e-compile ((2 . │ │ │ -0000ecd0: 6279 7465 2d63 6f6d 7069 6c65 2d74 776f byte-compile-two │ │ │ -0000ece0: 2d61 7267 732d 3139 2d3e 3230 2929 2022 -args-19->20)) " │ │ │ -0000ecf0: 6279 7465 2d63 6f6d 7069 6c65 2d22 2070 byte-compile-" p │ │ │ -0000ed00: 726f 676e 2027 6279 7465 2d6f 7063 6f64 rogn 'byte-opcod │ │ │ -0000ed10: 6520 2762 7974 652d 6f70 636f 6465 3139 e 'byte-opcode19 │ │ │ -0000ed20: 2027 6279 7465 2d6f 7063 6f64 652d 696e 'byte-opcode-in │ │ │ -0000ed30: 7665 7274 2027 6279 7465 2d6f 7063 6f64 vert 'byte-opcod │ │ │ -0000ed40: 6531 392d 696e 7665 7274 5d20 3130 5d29 e19-invert] 10]) │ │ │ -0000ed50: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -0000ed60: 652d 6465 666f 702d 636f 6d70 696c 6572 e-defop-compiler │ │ │ -0000ed70: 2d31 2027 286d 6163 726f 202e 2023 5b28 -1 '(macro . #[( │ │ │ -0000ed80: 6675 6e63 7469 6f6e 2026 6f70 7469 6f6e function &option │ │ │ -0000ed90: 616c 2063 6f6d 7069 6c65 2d68 616e 646c al compile-handl │ │ │ -0000eda0: 6572 2920 22c2 09c3 4408 4587 2220 5b63 er) "...D.E." [c │ │ │ -0000edb0: 6f6d 7069 6c65 2d68 616e 646c 6572 2066 ompile-handler f │ │ │ -0000edc0: 756e 6374 696f 6e20 6279 7465 2d64 6566 unction byte-def │ │ │ -0000edd0: 6f70 2d63 6f6d 7069 6c65 7220 6e69 6c5d op-compiler nil] │ │ │ -0000ede0: 2033 5d29 290a 2862 7974 652d 636f 6465 3])).(byte-code │ │ │ -0000edf0: 2022 c0c1 c2c3 2388 c0c4 c2c5 2388 c0c6 "....#.....#... │ │ │ -0000ee00: c2c5 2388 c0c7 c2c5 2388 c0c8 c2c5 2388 ..#.....#.....#. │ │ │ -0000ee10: c0c9 c2c5 2388 c0ca c2cb 2388 c0cc c2cb ....#.....#..... │ │ │ -0000ee20: 2388 c0cd c2cb 2388 c0ce c2cb 2388 c0cf #.....#.....#... │ │ │ -0000ee30: c2d0 2388 c0d1 d2d3 2388 c0d1 d4d5 2388 ..#.....#.....#. │ │ │ -0000ee40: c0d5 c2d1 2388 c0d6 d2d7 2388 c0d6 d4d8 ....#.....#..... │ │ │ -0000ee50: 2388 c0d6 d9da 2388 c0d8 c2d6 2388 c0da #.....#.....#... │ │ │ -0000ee60: dbd6 2388 c0dc d2d3 2388 c0dc d4dd 2388 ..#.....#.....#. │ │ │ -0000ee70: c0dd c2dc 2388 c0de d2d3 2388 c0de d4df ....#.....#..... │ │ │ -0000ee80: 2388 c0df c2de 2388 c0e0 d2d3 2388 c0e0 #.....#.....#... │ │ │ -0000ee90: d4e1 2388 c0e1 c2e0 2388 c0e2 d2d3 2388 ..#.....#.....#. │ │ │ -0000eea0: c0e2 d4e3 2388 c0e3 c2e2 2388 c0e4 d2d3 ....#.....#..... │ │ │ -0000eeb0: 2388 c0e4 d4e5 2388 c0e5 c2e4 2388 c0e6 #.....#.....#... │ │ │ -0000eec0: d2e7 2388 c0e6 d4e8 2388 c0e8 c2e6 2388 ..#.....#.....#. │ │ │ -0000eed0: c0e9 d2e7 2388 c0e9 d4e8 2388 c0e8 c2e9 ....#.....#..... │ │ │ -0000eee0: 2388 c0ea d2d7 2388 c0ea d4eb 2388 c0ea #.....#.....#... │ │ │ -0000eef0: d9ec 2388 c0eb c2ea 2388 c0ec dbea 2388 ..#.....#.....#. │ │ │ -0000ef00: c0ed d2d3 2388 c0ed d4ee 2388 c0ee c2ed ....#.....#..... │ │ │ -0000ef10: 2388 c0ef d2d3 2388 c0ef d4f0 2388 c0f0 #.....#.....#... │ │ │ -0000ef20: c2ef 2388 c0f1 d2d3 2388 c0f1 d4f2 2388 ..#.....#.....#. │ │ │ -0000ef30: c0f2 c2f1 2388 c0f3 d2d3 2388 c0f3 d4f4 ....#.....#..... │ │ │ -0000ef40: 2388 c0f4 c2f3 2388 c0f5 d2f6 2388 c0f5 #.....#.....#... │ │ │ -0000ef50: d4f7 2388 c0f7 c2f5 2388 c0f8 d2d7 2388 ..#.....#.....#. │ │ │ -0000ef60: c0f8 d4f9 2388 c0f8 d9fa 2388 c0f9 c2f8 ....#.....#..... │ │ │ -0000ef70: 2388 c0fa dbf8 2388 c0fb d2f6 2388 c0fb #.....#.....#... │ │ │ -0000ef80: d4fc 2388 c0fc c2fb 2388 c0fd d2d3 2388 ..#.....#.....#. │ │ │ -0000ef90: c0fd d4fe 2388 c0fe c2fd 2388 c0ff d281 ....#.....#..... │ │ │ -0000efa0: 4000 2388 c0ff d481 4100 2388 c081 4100 @.#.....A.#...A. │ │ │ -0000efb0: c2ff 2388 c081 4200 d281 4000 2388 c081 ..#...B...@.#... │ │ │ -0000efc0: 4200 d481 4300 2388 c081 4300 c281 4200 B...C.#...C...B. │ │ │ -0000efd0: 2388 c081 4400 d281 4000 2388 c081 4400 #...D...@.#...D. │ │ │ -0000efe0: d481 4500 2388 c081 4500 c281 4400 2388 ..E.#...E...D.#. │ │ │ -0000eff0: c081 4600 d281 4700 2388 c081 4600 d481 ..F...G.#...F... │ │ │ -0000f000: 4800 2388 c081 4800 c281 4600 2388 c081 H.#...H...F.#... │ │ │ -0000f010: 4900 d281 4700 2388 c081 4900 d481 4a00 I...G.#...I...J. │ │ │ -0000f020: 2388 c081 4a00 c281 4900 2388 c081 4b00 #...J...I.#...K. │ │ │ -0000f030: d281 4700 2388 c081 4b00 d481 4c00 2388 ..G.#...K...L.#. │ │ │ -0000f040: c081 4c00 c281 4b00 2388 c081 4d00 d281 ..L...K.#...M... │ │ │ -0000f050: 4700 2388 c081 4d00 d481 4e00 2388 c081 G.#...M...N.#... │ │ │ -0000f060: 4e00 c281 4d00 2388 c081 4f00 d281 4700 N...M.#...O...G. │ │ │ -0000f070: 2388 c081 4f00 d481 5000 2388 c081 5000 #...O...P.#...P. │ │ │ -0000f080: c281 4f00 2388 c081 5100 d281 4700 2388 ..O.#...Q...G.#. │ │ │ -0000f090: c081 5100 d481 5000 2388 c081 5000 c281 ..Q...P.#...P... │ │ │ -0000f0a0: 5100 2388 c081 5200 d281 4700 2388 c081 Q.#...R...G.#... │ │ │ -0000f0b0: 5200 d481 5300 2388 c081 5300 c281 5200 R...S.#...S...R. │ │ │ -0000f0c0: 2388 c081 5400 d281 4700 2388 c081 5400 #...T...G.#...T. │ │ │ -0000f0d0: d481 5500 2388 c081 5500 c281 5400 2388 ..U.#...U...T.#. │ │ │ -0000f0e0: c081 5600 d281 4700 2388 c081 5600 d481 ..V...G.#...V... │ │ │ -0000f0f0: 5700 2388 c081 5700 c281 5600 2388 c081 W.#...W...V.#... │ │ │ -0000f100: 5800 d281 4700 2388 c081 5800 d481 5900 X...G.#...X...Y. │ │ │ -0000f110: 2388 c081 5900 c281 5800 2388 c081 5a00 #...Y...X.#...Z. │ │ │ -0000f120: d281 4700 2388 c081 5a00 d481 5b00 2388 ..G.#...Z...[.#. │ │ │ -0000f130: c081 5b00 c281 5a00 2388 c081 5c5c 00d2 ..[...Z.#...\\.. │ │ │ -0000f140: 8147 0023 88c0 815c 5c00 d481 5d00 2388 .G.#...\\...].#. │ │ │ -0000f150: c081 5d00 c281 5c5c 0023 88c0 815e 00d2 ..]...\\.#...^.. │ │ │ -0000f160: 8147 0023 88c0 815e 00d4 815f 0023 88c0 .G.#...^..._.#.. │ │ │ -0000f170: 815f 00c2 815e 0023 88c0 8160 00d2 8161 ._...^.#...`...a │ │ │ -0000f180: 0023 88c0 8160 00d4 8162 0023 88c0 8162 .#...`...b.#...b │ │ │ -0000f190: 00c2 8160 0023 88c0 8163 00d2 8140 0023 ...`.#...c...@.# │ │ │ -0000f1a0: 88c0 8163 00d4 8164 0023 88c0 8164 00c2 ...c...d.#...d.. │ │ │ -0000f1b0: 8163 0023 88c0 8165 00d2 8147 0023 88c0 .c.#...e...G.#.. │ │ │ -0000f1c0: 8165 00d4 8166 0023 88c0 8166 00c2 8165 .e...f.#...f...e │ │ │ -0000f1d0: 0023 88c0 8167 00d2 8140 0023 88c0 8167 .#...g...@.#...g │ │ │ -0000f1e0: 00d4 8168 0023 88c0 8168 00c2 8167 0023 ...h.#...h...g.# │ │ │ -0000f1f0: 88c0 8169 00d2 8161 0023 88c0 8169 00d4 ...i...a.#...i.. │ │ │ -0000f200: 816a 0023 88c0 816a 00c2 8169 0023 88c0 .j.#...j...i.#.. │ │ │ -0000f210: 816b 00d2 8147 0023 88c0 816b 00d4 816c .k...G.#...k...l │ │ │ -0000f220: 0023 88c0 816c 00c2 816b 0023 88c0 816d .#...l...k.#...m │ │ │ -0000f230: 00d2 8147 0023 88c0 816d 00d4 816e 0023 ...G.#...m...n.# │ │ │ -0000f240: 88c0 816e 00c2 816d 0023 88c0 816f 00d2 ...n...m.#...o.. │ │ │ -0000f250: 8147 0023 88c0 816f 00d4 8170 0023 88c0 .G.#...o...p.#.. │ │ │ -0000f260: 8170 00c2 816f 0023 88c0 8171 00d2 8147 .p...o.#...q...G │ │ │ -0000f270: 0023 88c0 8171 00d4 8172 0023 88c0 8172 .#...q...r.#...r │ │ │ -0000f280: 00c2 8171 0023 88c0 8173 00d2 8147 0023 ...q.#...s...G.# │ │ │ -0000f290: 88c0 8173 00d4 8174 0023 88c0 8174 00c2 ...s...t.#...t.. │ │ │ -0000f2a0: 8173 0023 88c0 8175 00d2 8176 0023 88c0 .s.#...u...v.#.. │ │ │ -0000f2b0: 8175 00d4 8177 0023 88c0 8177 00c2 8175 .u...w.#...w...u │ │ │ -0000f2c0: 0023 88c0 8178 00d2 8176 0023 88c0 8178 .#...x...v.#...x │ │ │ -0000f2d0: 00d4 8179 0023 88c0 8179 00c2 8178 0023 ...y.#...y...x.# │ │ │ -0000f2e0: 88c0 817a 00d2 817b 0023 88c0 817a 00d4 ...z...{.#...z.. │ │ │ -0000f2f0: d823 88c0 d8c2 817a 0023 88c0 da81 7c00 .#.....z.#....|. │ │ │ -0000f300: 817d 0023 88c0 817e 00d2 817b 0023 88c0 .}.#...~...{.#.. │ │ │ -0000f310: 817e 00d4 da23 88c0 dac2 817e 0023 88c0 .~...#.....~.#.. │ │ │ -0000f320: fa81 7c00 817d 0023 88c0 817f 00d2 817b ..|..}.#.......{ │ │ │ -0000f330: 0023 88c0 817f 00d4 fa23 88c0 fac2 817f .#.......#...... │ │ │ -0000f340: 0023 88c0 8180 00d2 817b 0023 88c0 8180 .#.......{.#.... │ │ │ -0000f350: 00d4 8181 0023 88c0 8181 00c2 8180 0023 .....#.........# │ │ │ -0000f360: 88c0 8182 00d2 817b 0023 88c0 8182 00d4 .......{.#...... │ │ │ -0000f370: 8183 0023 88c0 8183 00c2 8182 0023 88c0 ...#.........#.. │ │ │ -0000f380: 8184 00d2 8185 0023 88c0 8184 00d4 8186 .......#........ │ │ │ -0000f390: 0023 88c0 8186 00c2 8184 0023 88c0 8187 .#.........#.... │ │ │ -0000f3a0: 00d2 817b 0023 88c0 8187 00d4 8188 0023 ...{.#.........# │ │ │ -0000f3b0: 88c0 8188 00c2 8187 0023 88c0 8189 00d2 .........#...... │ │ │ -0000f3c0: 818a 0023 88c0 8189 00d4 818b 0023 88c0 ...#.........#.. │ │ │ -0000f3d0: 818b 00c2 8189 0023 88c0 818c 00d2 818a .......#........ │ │ │ -0000f3e0: 0023 88c0 818c 00d4 818d 0023 88c0 818d .#.........#.... │ │ │ -0000f3f0: 00c2 818c 0023 88c0 818e 00d2 818a 0023 .....#.........# │ │ │ -0000f400: 88c0 818e 00d4 818d 0023 88c0 818d 00c2 .........#...... │ │ │ -0000f410: 818e 0023 88c0 818f 00d2 8147 0023 88c0 ...#.......G.#.. │ │ │ -0000f420: 818f 00d4 8190 0023 88c0 8190 00c2 818f .......#........ │ │ │ -0000f430: 0023 88c0 8191 00d2 8147 0023 88c0 8191 .#.......G.#.... │ │ │ -0000f440: 00d4 8192 0023 88c0 8192 00c2 8191 0023 .....#.........# │ │ │ -0000f450: 88c0 8193 00d2 8161 0023 88c0 8193 00d4 .......a.#...... │ │ │ -0000f460: 8194 0023 88c0 8194 00c2 8193 0023 88c0 ...#.........#.. │ │ │ -0000f470: 8195 00d2 8161 0023 88c0 8195 00d4 8196 .....a.#........ │ │ │ -0000f480: 0023 88c0 8196 00c2 8195 0023 88c0 8197 .#.........#.... │ │ │ -0000f490: 00d2 817b 0023 88c0 8197 00d4 8198 0023 ...{.#.........# │ │ │ -0000f4a0: 88c0 8198 00c2 8197 0023 88c0 8199 00d2 .........#...... │ │ │ -0000f4b0: 817b 0023 88c0 8199 00d4 819a 0023 88c0 .{.#.........#.. │ │ │ -0000f4c0: 819a 00c2 8199 0023 88c0 819b 00d2 817b .......#.......{ │ │ │ -0000f4d0: 0023 88c0 819b 00d4 8198 0023 88c0 8198 .#.........#.... │ │ │ -0000f4e0: 00c2 819b 0023 88c0 819c 00d2 817b 0023 .....#.......{.# │ │ │ -0000f4f0: 88c0 819c 00d4 819a 0023 88c0 819a 00c2 .........#...... │ │ │ -0000f500: 819c 0023 88c0 ec81 7c00 817d 0023 88c0 ...#....|..}.#.. │ │ │ -0000f510: 819d 00d2 817b 0023 88c0 819d 00d4 ec23 .....{.#.......# │ │ │ -0000f520: 88c0 ecc2 819d 0023 88c0 819e 00d2 817b .......#.......{ │ │ │ -0000f530: 0023 88c0 819e 00d4 819f 0023 88c0 819f .#.........#.... │ │ │ -0000f540: 00c2 819e 0023 88c0 81a0 00d2 817b 0023 .....#.......{.# │ │ │ -0000f550: 88c0 81a0 00d4 81a1 0023 88c0 81a1 00c2 .........#...... │ │ │ -0000f560: 81a0 0023 88c0 81a2 0081 7c00 817d 0023 ...#......|..}.# │ │ │ -0000f570: 88c0 81a3 00d2 817b 0023 88c0 81a3 00d4 .......{.#...... │ │ │ -0000f580: 81a2 0023 88c0 81a2 00c2 81a3 0023 88c0 ...#.........#.. │ │ │ -0000f590: 81a4 0081 7c00 817d 0023 88c0 81a5 00d2 ....|..}.#...... │ │ │ -0000f5a0: 817b 0023 88c0 81a5 00d4 81a4 0023 88c0 .{.#.........#.. │ │ │ -0000f5b0: 81a4 00c2 81a5 0023 88c0 81a6 00d2 817b .......#.......{ │ │ │ -0000f5c0: 0023 88c0 81a6 00d4 81a7 0023 88c0 81a7 .#.........#.... │ │ │ -0000f5d0: 00c2 81a6 0023 88c0 81a8 00d2 817b 0023 .....#.......{.# │ │ │ -0000f5e0: 88c0 81a8 00d4 81a9 0023 88c0 81a9 00c2 .........#...... │ │ │ -0000f5f0: 81a8 0023 88c0 81aa 00d2 817b 0023 88c0 ...#.......{.#.. │ │ │ -0000f600: 81aa 00d4 81a7 0023 88c0 81a7 00c2 81aa .......#........ │ │ │ -0000f610: 0023 88c0 81ab 00d2 817b 0023 88c0 81ab .#.......{.#.... │ │ │ -0000f620: 00d4 81a9 0023 88c0 81a9 00c2 81ab 0023 .....#.........# │ │ │ -0000f630: 88c0 81ac 00d2 8185 0023 88c0 81ac 00d4 .........#...... │ │ │ -0000f640: 81ad 0023 88c0 81ad 00c2 81ac 0023 88c0 ...#.........#.. │ │ │ -0000f650: 81ae 00d2 8185 0023 88c0 81ae 00d4 81af .......#........ │ │ │ -0000f660: 0023 88c0 81af 00c2 81ae 0023 88c0 81b0 .#.........#.... │ │ │ -0000f670: 00d2 817b 0023 88c0 81b0 00d4 81b1 0023 ...{.#.........# │ │ │ -0000f680: 88c0 81b1 00c2 81b0 0023 88c0 81b2 00d2 .........#...... │ │ │ -0000f690: 81b3 0023 88c0 81b2 00d4 81b4 0023 88c0 ...#.........#.. │ │ │ -0000f6a0: 81b4 00c2 81b2 0023 88c0 81b5 00d2 d723 .......#.......# │ │ │ -0000f6b0: 88c0 81b5 00d4 81b6 0023 88c0 81b5 00d9 .........#...... │ │ │ -0000f6c0: 81a2 0023 88c0 81b6 00c2 81b5 0023 88c0 ...#.........#.. │ │ │ -0000f6d0: 81a2 00db 81b5 0023 88c0 81b7 00d2 d723 .......#.......# │ │ │ -0000f6e0: 88c0 81b7 00d4 81b8 0023 88c0 81b7 00d9 .........#...... │ │ │ -0000f6f0: 81a4 0023 88c0 81b8 00c2 81b7 0023 88c0 ...#.........#.. │ │ │ -0000f700: 81a4 00db 81b7 0023 88c0 81b9 00d2 81ba .......#........ │ │ │ -0000f710: 0023 88c0 81bb 00d2 81bc 0023 8722 205b .#.........#." [ │ │ │ -0000f720: 7075 7420 6279 7465 2d63 616c 6c20 6279 put byte-call by │ │ │ -0000f730: 7465 2d6f 7063 6f64 652d 696e 7665 7274 te-opcode-invert │ │ │ -0000f740: 2066 756e 6361 6c6c 2062 7974 652d 6c69 funcall byte-li │ │ │ -0000f750: 7374 3120 6c69 7374 2062 7974 652d 6c69 st1 list byte-li │ │ │ -0000f760: 7374 3220 6279 7465 2d6c 6973 7433 2062 st2 byte-list3 b │ │ │ -0000f770: 7974 652d 6c69 7374 3420 6279 7465 2d6c yte-list4 byte-l │ │ │ -0000f780: 6973 744e 2062 7974 652d 636f 6e63 6174 istN byte-concat │ │ │ -0000f790: 3220 636f 6e63 6174 2062 7974 652d 636f 2 concat byte-co │ │ │ -0000f7a0: 6e63 6174 3320 6279 7465 2d63 6f6e 6361 ncat3 byte-conca │ │ │ -0000f7b0: 7434 2062 7974 652d 636f 6e63 6174 4e20 t4 byte-concatN │ │ │ -0000f7c0: 6279 7465 2d69 6e73 6572 744e 2069 6e73 byte-insertN ins │ │ │ -0000f7d0: 6572 7420 706f 696e 7420 6279 7465 2d63 ert point byte-c │ │ │ -0000f7e0: 6f6d 7069 6c65 2062 7974 652d 636f 6d70 ompile byte-comp │ │ │ -0000f7f0: 696c 652d 6e6f 2d61 7267 732d 7769 7468 ile-no-args-with │ │ │ -0000f800: 2d6f 6e65 2d65 7874 7261 2062 7974 652d -one-extra byte- │ │ │ -0000f810: 6f70 636f 6465 2062 7974 652d 706f 696e opcode byte-poin │ │ │ -0000f820: 7420 6571 2062 7974 652d 636f 6d70 696c t eq byte-compil │ │ │ -0000f830: 652d 7477 6f2d 6172 6773 2d31 392d 3e32 e-two-args-19->2 │ │ │ -0000f840: 3020 6279 7465 2d65 7120 6279 7465 2d6f 0 byte-eq byte-o │ │ │ -0000f850: 7063 6f64 6531 3920 6279 7465 2d6f 6c64 pcode19 byte-old │ │ │ -0000f860: 2d65 7120 6279 7465 2d6f 7063 6f64 6531 -eq byte-opcode1 │ │ │ -0000f870: 392d 696e 7665 7274 2070 6f69 6e74 2d6d 9-invert point-m │ │ │ -0000f880: 6178 2062 7974 652d 706f 696e 742d 6d61 ax byte-point-ma │ │ │ -0000f890: 7820 706f 696e 742d 6d69 6e20 6279 7465 x point-min byte │ │ │ -0000f8a0: 2d70 6f69 6e74 2d6d 696e 2066 6f6c 6c6f -point-min follo │ │ │ -0000f8b0: 7769 6e67 2d63 6861 7220 6279 7465 2d66 wing-char byte-f │ │ │ -0000f8c0: 6f6c 6c6f 7769 6e67 2d63 6861 7220 7072 ollowing-char pr │ │ │ -0000f8d0: 6563 6564 696e 672d 6368 6172 2062 7974 eceding-char byt │ │ │ -0000f8e0: 652d 7072 6563 6564 696e 672d 6368 6172 e-preceding-char │ │ │ -0000f8f0: 2063 7572 7265 6e74 2d63 6f6c 756d 6e20 current-column │ │ │ -0000f900: 6279 7465 2d63 7572 7265 6e74 2d63 6f6c byte-current-col │ │ │ -0000f910: 756d 6e20 696e 6465 6e74 2d74 6f2d 636f umn indent-to-co │ │ │ -0000f920: 6c75 6d6e 2062 7974 652d 636f 6d70 696c lumn byte-compil │ │ │ -0000f930: 652d 6f6e 652d 6172 672d 7769 7468 2d74 e-one-arg-with-t │ │ │ -0000f940: 776f 2d65 7874 7261 2062 7974 652d 696e wo-extra byte-in │ │ │ -0000f950: 6465 6e74 2d74 6f20 696e 6465 6e74 2d74 dent-to indent-t │ │ │ -0000f960: 6f20 6571 7561 6c20 6279 7465 2d65 7175 o equal byte-equ │ │ │ -0000f970: 616c 2062 7974 652d 6f6c 642d 6571 7561 al byte-old-equa │ │ │ -0000f980: 6c20 656f 6c70 2062 7974 652d 656f 6c70 l eolp byte-eolp │ │ │ -0000f990: 2065 6f62 7020 6279 7465 2d65 6f62 7020 eobp byte-eobp │ │ │ -0000f9a0: 626f 6c70 2062 7974 652d 626f 6c70 2062 bolp byte-bolp b │ │ │ -0000f9b0: 6f62 7020 6279 7465 2d62 6f62 7020 6375 obp byte-bobp cu │ │ │ -0000f9c0: 7272 656e 742d 6275 6666 6572 2062 7974 rrent-buffer byt │ │ │ -0000f9d0: 652d 636f 6d70 696c 652d 6e6f 2d61 7267 e-compile-no-arg │ │ │ -0000f9e0: 7320 6279 7465 2d63 7572 7265 6e74 2d62 s byte-current-b │ │ │ -0000f9f0: 7566 6665 7220 6d65 6d71 2062 7974 652d uffer memq byte- │ │ │ -0000fa00: 6d65 6d71 2062 7974 652d 6f6c 642d 6d65 memq byte-old-me │ │ │ -0000fa10: 6d71 2069 6e74 6572 6163 7469 7665 2d70 mq interactive-p │ │ │ -0000fa20: 2062 7974 652d 696e 7465 7261 6374 6976 byte-interactiv │ │ │ -0000fa30: 652d 7020 7769 6465 6e20 6279 7465 2d77 e-p widen byte-w │ │ │ -0000fa40: 6964 656e 2065 6e64 2d6f 662d 6c69 6e65 iden end-of-line │ │ │ -0000fa50: 2062 7974 652d 636f 6d70 696c 652d 7a65 byte-compile-ze │ │ │ -0000fa60: 726f 2d6f 722d 6f6e 652d 6172 672d 7769 ro-or-one-arg-wi │ │ │ -0000fa70: 7468 2d6f 6e65 2d65 7874 7261 2062 7974 th-one-extra byt │ │ │ -0000fa80: 652d 656e 642d 6f66 2d6c 696e 6520 666f e-end-of-line fo │ │ │ -0000fa90: 7277 6172 642d 6368 6172 2062 7974 652d rward-char byte- │ │ │ -0000faa0: 666f 7277 6172 642d 6368 6172 2066 6f72 forward-char for │ │ │ -0000fab0: 7761 7264 2d6c 696e 6520 6279 7465 2d66 ward-line byte-f │ │ │ -0000fac0: 6f72 7761 7264 2d6c 696e 6520 7379 6d62 orward-line symb │ │ │ -0000fad0: 6f6c 7020 6279 7465 2d63 6f6d 7069 6c65 olp byte-compile │ │ │ -0000fae0: 2d6f 6e65 2d61 7267 2062 7974 652d 7379 -one-arg byte-sy │ │ │ -0000faf0: 6d62 6f6c 7020 636f 6e73 7020 6279 7465 mbolp consp byte │ │ │ -0000fb00: 2d63 6f6e 7370 2073 7472 696e 6770 2062 -consp stringp b │ │ │ -0000fb10: 7974 652d 7374 7269 6e67 7020 6c69 7374 yte-stringp list │ │ │ -0000fb20: 7020 6279 7465 2d6c 6973 7470 206e 6f74 p byte-listp not │ │ │ -0000fb30: 2062 7974 652d 6e6f 7420 6e75 6c6c 2063 byte-not null c │ │ │ -0000fb40: 6172 2062 7974 652d 6361 7220 6364 7220 ar byte-car cdr │ │ │ -0000fb50: 6279 7465 2d63 6472 206c 656e 6774 6820 byte-cdr length │ │ │ -0000fb60: 6279 7465 2d6c 656e 6774 6820 7379 6d62 byte-length symb │ │ │ -0000fb70: 6f6c 2d76 616c 7565 2062 7974 652d 7379 ol-value byte-sy │ │ │ -0000fb80: 6d62 6f6c 2d76 616c 7565 2073 796d 626f mbol-value symbo │ │ │ -0000fb90: 6c2d 6675 6e63 7469 6f6e 2062 7974 652d l-function byte- │ │ │ -0000fba0: 7379 6d62 6f6c 2d66 756e 6374 696f 6e20 symbol-function │ │ │ -0000fbb0: 312b 2062 7974 652d 6164 6431 2031 2d20 1+ byte-add1 1- │ │ │ -0000fbc0: 6279 7465 2d73 7562 3120 676f 746f 2d63 byte-sub1 goto-c │ │ │ -0000fbd0: 6861 7220 6279 7465 2d63 6f6d 7069 6c65 har byte-compile │ │ │ -0000fbe0: 2d6f 6e65 2d61 7267 2d77 6974 682d 6f6e -one-arg-with-on │ │ │ -0000fbf0: 652d 6578 7472 6120 6279 7465 2d67 6f74 e-extra byte-got │ │ │ -0000fc00: 6f2d 6368 6172 2063 6861 722d 6166 7465 o-char char-afte │ │ │ -0000fc10: 7220 6279 7465 2d63 6861 722d 6166 7465 r byte-char-afte │ │ │ -0000fc20: 7220 7365 742d 6275 6666 6572 2062 7974 r set-buffer byt │ │ │ -0000fc30: 652d 7365 742d 6275 6666 6572 2066 6f72 e-set-buffer for │ │ │ -0000fc40: 7761 7264 2d77 6f72 6420 6279 7465 2d66 ward-word byte-f │ │ │ -0000fc50: 6f72 7761 7264 2d77 6f72 6420 6368 6172 orward-word char │ │ │ -0000fc60: 2d73 796e 7461 7820 6279 7465 2d63 6861 -syntax byte-cha │ │ │ -0000fc70: 722d 7379 6e74 6178 206e 7265 7665 7273 r-syntax nrevers │ │ │ -0000fc80: 6520 6279 7465 2d6e 7265 7665 7273 6520 e byte-nreverse │ │ │ -0000fc90: 6361 722d 7361 6665 2062 7974 652d 6361 car-safe byte-ca │ │ │ -0000fca0: 722d 7361 6665 2063 6472 2d73 6166 6520 r-safe cdr-safe │ │ │ -0000fcb0: 6279 7465 2d63 6472 2d73 6166 6520 6e75 byte-cdr-safe nu │ │ │ -0000fcc0: 6d62 6572 7020 6279 7465 2d6e 756d 6265 mberp byte-numbe │ │ │ -0000fcd0: 7270 2069 6e74 6567 6572 7020 6279 7465 rp integerp byte │ │ │ -0000fce0: 2d69 6e74 6567 6572 7020 736b 6970 2d63 -integerp skip-c │ │ │ -0000fcf0: 6861 7273 2d66 6f72 7761 7264 2062 7974 hars-forward byt │ │ │ -0000fd00: 652d 636f 6d70 696c 652d 6f6e 652d 6f72 e-compile-one-or │ │ │ -0000fd10: 2d74 776f 2d61 7267 732d 7769 7468 2d6f -two-args-with-o │ │ │ -0000fd20: 6e65 2d65 7874 7261 2062 7974 652d 736b ne-extra byte-sk │ │ │ -0000fd30: 6970 2d63 6861 7273 2d66 6f72 7761 7264 ip-chars-forward │ │ │ -0000fd40: 2073 6b69 702d 6368 6172 732d 6261 636b skip-chars-back │ │ │ -0000fd50: 7761 7264 2062 7974 652d 736b 6970 2d63 ward byte-skip-c │ │ │ -0000fd60: 6861 7273 2d62 6163 6b77 6172 6420 6571 hars-backward eq │ │ │ -0000fd70: 6c20 6279 7465 2d63 6f6d 7069 6c65 2d74 l byte-compile-t │ │ │ -0000fd80: 776f 2d61 7267 7320 656d 6163 7332 302d wo-args emacs20- │ │ │ -0000fd90: 6f70 636f 6465 2074 206f 6c64 2d65 7120 opcode t old-eq │ │ │ -0000fda0: 6f6c 642d 6d65 6d71 2063 6f6e 7320 6279 old-memq cons by │ │ │ -0000fdb0: 7465 2d63 6f6e 7320 6172 6566 2062 7974 te-cons aref byt │ │ │ -0000fdc0: 652d 6172 6566 2067 6574 2062 7974 652d e-aref get byte- │ │ │ -0000fdd0: 636f 6d70 696c 652d 7477 6f2d 6172 6773 compile-two-args │ │ │ -0000fde0: 2d77 6974 682d 6f6e 652d 6578 7472 6120 -with-one-extra │ │ │ -0000fdf0: 6279 7465 2d67 6574 206e 7468 2062 7974 byte-get nth byt │ │ │ -0000fe00: 652d 6e74 6820 7375 6273 7472 696e 6720 e-nth substring │ │ │ -0000fe10: 6279 7465 2d63 6f6d 7069 6c65 2d74 776f byte-compile-two │ │ │ -0000fe20: 2d6f 722d 7468 7265 652d 6172 6773 2062 -or-three-args b │ │ │ -0000fe30: 7974 652d 7375 6273 7472 696e 6720 6d6f yte-substring mo │ │ │ -0000fe40: 7665 2d6d 6172 6b65 7220 6279 7465 2d73 ve-marker byte-s │ │ │ -0000fe50: 6574 2d6d 6172 6b65 7220 7365 742d 6d61 et-marker set-ma │ │ │ -0000fe60: 726b 6572 206d 6174 6368 2d62 6567 696e rker match-begin │ │ │ -0000fe70: 6e69 6e67 2062 7974 652d 6d61 7463 682d ning byte-match- │ │ │ -0000fe80: 6265 6769 6e6e 696e 6720 6d61 7463 682d beginning match- │ │ │ -0000fe90: 656e 6420 6279 7465 2d6d 6174 6368 2d65 end byte-match-e │ │ │ -0000fea0: 6e64 2075 7063 6173 6520 6279 7465 2d75 nd upcase byte-u │ │ │ -0000feb0: 7063 6173 6520 646f 776e 6361 7365 2062 pcase downcase b │ │ │ -0000fec0: 7974 652d 646f 776e 6361 7365 2073 7472 yte-downcase str │ │ │ -0000fed0: 696e 673d 2062 7974 652d 7374 7269 6e67 ing= byte-string │ │ │ -0000fee0: 3d20 7374 7269 6e67 3c20 6279 7465 2d73 = string< byte-s │ │ │ -0000fef0: 7472 696e 673c 2073 7472 696e 672d 6571 tring< string-eq │ │ │ -0000ff00: 7561 6c20 7374 7269 6e67 2d6c 6573 7370 ual string-lessp │ │ │ -0000ff10: 206f 6c64 2d65 7175 616c 206e 7468 6364 old-equal nthcd │ │ │ -0000ff20: 7220 6279 7465 2d6e 7468 6364 7220 656c r byte-nthcdr el │ │ │ -0000ff30: 7420 6279 7465 2d65 6c74 2062 7974 652d t byte-elt byte- │ │ │ -0000ff40: 6f6c 642d 6d65 6d62 6572 206f 6c64 2d6d old-member old-m │ │ │ -0000ff50: 656d 6265 7220 6279 7465 2d6f 6c64 2d61 ember byte-old-a │ │ │ -0000ff60: 7373 7120 6f6c 642d 6173 7371 2072 706c ssq old-assq rpl │ │ │ -0000ff70: 6163 6120 6279 7465 2d73 6574 6361 7220 aca byte-setcar │ │ │ -0000ff80: 7270 6c61 6364 2062 7974 652d 7365 7463 rplacd byte-setc │ │ │ -0000ff90: 6472 2073 6574 6361 7220 7365 7463 6472 dr setcar setcdr │ │ │ -0000ffa0: 2064 656c 6574 652d 7265 6769 6f6e 2062 delete-region b │ │ │ -0000ffb0: 7974 652d 6465 6c65 7465 2d72 6567 696f yte-delete-regio │ │ │ -0000ffc0: 6e20 6e61 7272 6f77 2d74 6f2d 7265 6769 n narrow-to-regi │ │ │ -0000ffd0: 6f6e 2062 7974 652d 6e61 7272 6f77 2d74 on byte-narrow-t │ │ │ -0000ffe0: 6f2d 7265 6769 6f6e 2025 2062 7974 652d o-region % byte- │ │ │ -0000fff0: 7265 6d20 6173 6574 2062 7974 652d 636f rem aset byte-co │ │ │ -00010000: 6d70 696c 652d 7468 7265 652d 6172 6773 mpile-three-args │ │ │ -00010010: 2062 7974 652d 6173 6574 206d 656d 6265 byte-aset membe │ │ │ -00010020: 7220 6279 7465 2d6d 656d 6265 7220 6173 r byte-member as │ │ │ -00010030: 7371 2062 7974 652d 6173 7371 2069 6e74 sq byte-assq int │ │ │ -00010040: 6572 6163 7469 7665 2062 7974 652d 636f eractive byte-co │ │ │ -00010050: 6d70 696c 652d 6e6f 6f70 2064 6f6d 6169 mpile-noop domai │ │ │ -00010060: 6e20 6279 7465 2d63 6f6d 7069 6c65 2d64 n byte-compile-d │ │ │ -00010070: 6f6d 6169 6e5d 2034 290a 2864 6566 616c omain] 4).(defal │ │ │ -00010080: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ -00010090: 652d 7375 6272 2d77 726f 6e67 2d61 7267 e-subr-wrong-arg │ │ │ -000100a0: 7320 235b 2866 6f72 6d20 6e29 2022 c309 s #[(form n) ".. │ │ │ -000100b0: 73ab 95c4 c55c 6e40 5c6e 4147 c65c 6e41 s....\n@\nAG.\nA │ │ │ -000100c0: 4755 ab83 c7aa 81c8 0825 88c9 5c6e 2187 GU.......%..\n!. │ │ │ -000100d0: 2220 5b6e 2062 7974 652d 636f 6d70 696c " [n byte-compil │ │ │ -000100e0: 652d 7761 726e 696e 6773 2066 6f72 6d20 e-warnings form │ │ │ -000100f0: 7375 6272 2d63 616c 6c61 7267 7320 6279 subr-callargs by │ │ │ -00010100: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e20 te-compile-warn │ │ │ -00010110: 2225 7320 6361 6c6c 6564 2077 6974 6820 "%s called with │ │ │ -00010120: 2564 2061 7267 2573 2c20 6275 7420 7265 %d arg%s, but re │ │ │ -00010130: 7175 6972 6573 2025 7322 2031 2022 2220 quires %s" 1 "" │ │ │ -00010140: 2273 2220 6279 7465 2d63 6f6d 7069 6c65 "s" byte-compile │ │ │ -00010150: 2d6e 6f72 6d61 6c2d 6361 6c6c 5d20 365d -normal-call] 6] │ │ │ -00010160: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -00010170: 652d 636f 6d70 696c 652d 6e6f 2d61 7267 e-compile-no-arg │ │ │ -00010180: 7320 235b 2866 6f72 6d29 2022 0841 47c1 s #[(form) ".AG. │ │ │ -00010190: 61ab 88c2 0840 c34e c15c 2287 c408 c55c a....@.N.\"....\ │ │ │ -000101a0: 2287 2220 5b66 6f72 6d20 3020 6279 7465 "." [form 0 byte │ │ │ -000101b0: 2d63 6f6d 7069 6c65 2d6f 7574 2062 7974 -compile-out byt │ │ │ -000101c0: 652d 6f70 636f 6465 2062 7974 652d 636f e-opcode byte-co │ │ │ -000101d0: 6d70 696c 652d 7375 6272 2d77 726f 6e67 mpile-subr-wrong │ │ │ -000101e0: 2d61 7267 7320 226e 6f6e 6522 5d20 335d -args "none"] 3] │ │ │ -000101f0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -00010200: 652d 636f 6d70 696c 652d 6f6e 652d 6172 e-compile-one-ar │ │ │ -00010210: 6720 235b 2866 6f72 6d29 2022 0841 47c1 g #[(form) ".AG. │ │ │ -00010220: 61ab 8ec2 0841 4021 88c3 0840 c44e c55c a....A@!...@.N.\ │ │ │ -00010230: 2287 c608 c15c 2287 2220 5b66 6f72 6d20 "....\"." [form │ │ │ -00010240: 3120 6279 7465 2d63 6f6d 7069 6c65 2d66 1 byte-compile-f │ │ │ -00010250: 6f72 6d20 6279 7465 2d63 6f6d 7069 6c65 orm byte-compile │ │ │ -00010260: 2d6f 7574 2062 7974 652d 6f70 636f 6465 -out byte-opcode │ │ │ -00010270: 2030 2062 7974 652d 636f 6d70 696c 652d 0 byte-compile- │ │ │ -00010280: 7375 6272 2d77 726f 6e67 2d61 7267 735d subr-wrong-args] │ │ │ -00010290: 2033 5d29 0a28 6465 6661 6c69 6173 2027 3]).(defalias ' │ │ │ -000102a0: 6279 7465 2d63 6f6d 7069 6c65 2d74 776f byte-compile-two │ │ │ -000102b0: 2d61 7267 7320 235b 2866 6f72 6d29 2022 -args #[(form) " │ │ │ -000102c0: 0841 47c1 61ab 94c2 0841 4021 88c2 c108 .AG.a....A@!.... │ │ │ -000102d0: 3821 88c3 0840 c44e c55c 2287 c608 c15c 8!...@.N.\"....\ │ │ │ -000102e0: 2287 2220 5b66 6f72 6d20 3220 6279 7465 "." [form 2 byte │ │ │ -000102f0: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6279 -compile-form by │ │ │ -00010300: 7465 2d63 6f6d 7069 6c65 2d6f 7574 2062 te-compile-out b │ │ │ -00010310: 7974 652d 6f70 636f 6465 2030 2062 7974 yte-opcode 0 byt │ │ │ -00010320: 652d 636f 6d70 696c 652d 7375 6272 2d77 e-compile-subr-w │ │ │ -00010330: 726f 6e67 2d61 7267 735d 2033 5d29 0a28 rong-args] 3]).( │ │ │ -00010340: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ -00010350: 6f6d 7069 6c65 2d74 6872 6565 2d61 7267 ompile-three-arg │ │ │ -00010360: 7320 235b 2866 6f72 6d29 2022 0841 47c1 s #[(form) ".AG. │ │ │ -00010370: 61ab 9ac2 0841 4021 88c2 c308 3821 88c2 a....A@!....8!.. │ │ │ -00010380: c108 3821 88c4 0840 c54e c65c 2287 c708 ..8!...@.N.\"... │ │ │ -00010390: c15c 2287 2220 5b66 6f72 6d20 3320 6279 .\"." [form 3 by │ │ │ -000103a0: 7465 2d63 6f6d 7069 6c65 2d66 6f72 6d20 te-compile-form │ │ │ -000103b0: 3220 6279 7465 2d63 6f6d 7069 6c65 2d6f 2 byte-compile-o │ │ │ -000103c0: 7574 2062 7974 652d 6f70 636f 6465 2030 ut byte-opcode 0 │ │ │ -000103d0: 2062 7974 652d 636f 6d70 696c 652d 7375 byte-compile-su │ │ │ -000103e0: 6272 2d77 726f 6e67 2d61 7267 735d 2033 br-wrong-args] 3 │ │ │ -000103f0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -00010400: 7465 2d63 6f6d 7069 6c65 2d7a 6572 6f2d te-compile-zero- │ │ │ -00010410: 6f72 2d6f 6e65 2d61 7267 2023 5b28 666f or-one-arg #[(fo │ │ │ -00010420: 726d 2920 2208 4147 c161 ab87 c2c3 08c4 rm) ".AG.a...... │ │ │ -00010430: 5c22 2187 0841 47c5 61ab 84c2 0821 87c6 \"!..AG.a....!.. │ │ │ -00010440: 08c7 5c22 8722 205b 666f 726d 2030 2062 ..\"." [form 0 b │ │ │ -00010450: 7974 652d 636f 6d70 696c 652d 6f6e 652d yte-compile-one- │ │ │ -00010460: 6172 6720 6170 7065 6e64 2028 6e69 6c29 arg append (nil) │ │ │ -00010470: 2031 2062 7974 652d 636f 6d70 696c 652d 1 byte-compile- │ │ │ -00010480: 7375 6272 2d77 726f 6e67 2d61 7267 7320 subr-wrong-args │ │ │ -00010490: 2230 2d31 225d 2034 5d29 0a28 6465 6661 "0-1"] 4]).(defa │ │ │ -000104a0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ -000104b0: 6c65 2d6f 6e65 2d6f 722d 7477 6f2d 6172 le-one-or-two-ar │ │ │ -000104c0: 6773 2023 5b28 666f 726d 2920 2208 4147 gs #[(form) ".AG │ │ │ -000104d0: c161 ab87 c2c3 08c4 5c22 2187 0841 47c5 .a......\"!..AG. │ │ │ -000104e0: 61ab 84c2 0821 87c6 08c7 5c22 8722 205b a....!....\"." [ │ │ │ -000104f0: 666f 726d 2031 2062 7974 652d 636f 6d70 form 1 byte-comp │ │ │ -00010500: 696c 652d 7477 6f2d 6172 6773 2061 7070 ile-two-args app │ │ │ -00010510: 656e 6420 286e 696c 2920 3220 6279 7465 end (nil) 2 byte │ │ │ -00010520: 2d63 6f6d 7069 6c65 2d73 7562 722d 7772 -compile-subr-wr │ │ │ -00010530: 6f6e 672d 6172 6773 2022 312d 3222 5d20 ong-args "1-2"] │ │ │ -00010540: 345d 290a 2864 6566 616c 6961 7320 2762 4]).(defalias 'b │ │ │ -00010550: 7974 652d 636f 6d70 696c 652d 7477 6f2d yte-compile-two- │ │ │ -00010560: 6f72 2d74 6872 6565 2d61 7267 7320 235b or-three-args #[ │ │ │ -00010570: 2866 6f72 6d29 2022 0841 47c1 61ab 87c2 (form) ".AG.a... │ │ │ -00010580: c308 c45c 2221 8708 4147 c561 ab84 c208 ...\"!..AG.a.... │ │ │ -00010590: 2187 c608 c75c 2287 2220 5b66 6f72 6d20 !....\"." [form │ │ │ -000105a0: 3220 6279 7465 2d63 6f6d 7069 6c65 2d74 2 byte-compile-t │ │ │ -000105b0: 6872 6565 2d61 7267 7320 6170 7065 6e64 hree-args append │ │ │ -000105c0: 2028 6e69 6c29 2033 2062 7974 652d 636f (nil) 3 byte-co │ │ │ -000105d0: 6d70 696c 652d 7375 6272 2d77 726f 6e67 mpile-subr-wrong │ │ │ -000105e0: 2d61 7267 7320 2232 2d33 225d 2034 5d29 -args "2-3"] 4]) │ │ │ -000105f0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -00010600: 2d63 6f6d 7069 6c65 2d6e 6f2d 6172 6773 -compile-no-args │ │ │ -00010610: 2d77 6974 682d 6f6e 652d 6578 7472 6120 -with-one-extra │ │ │ -00010620: 235b 2866 6f72 6d29 2022 0841 47c1 61ab #[(form) ".AG.a. │ │ │ -00010630: 84c2 0821 8708 4147 c361 ab91 0841 40c4 ...!..AG.a...A@. │ │ │ -00010640: 61ab 86c2 c508 2121 87c6 0821 87c7 08c8 a.....!!...!.... │ │ │ -00010650: 5c22 8722 205b 666f 726d 2030 2062 7974 \"." [form 0 byt │ │ │ -00010660: 652d 636f 6d70 696c 652d 6e6f 2d61 7267 e-compile-no-arg │ │ │ -00010670: 7320 3120 6e69 6c20 6275 746c 6173 7420 s 1 nil butlast │ │ │ -00010680: 6279 7465 2d63 6f6d 7069 6c65 2d6e 6f72 byte-compile-nor │ │ │ -00010690: 6d61 6c2d 6361 6c6c 2062 7974 652d 636f mal-call byte-co │ │ │ -000106a0: 6d70 696c 652d 7375 6272 2d77 726f 6e67 mpile-subr-wrong │ │ │ -000106b0: 2d61 7267 7320 2230 2d31 225d 2033 5d29 -args "0-1"] 3]) │ │ │ -000106c0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -000106d0: 2d63 6f6d 7069 6c65 2d6f 6e65 2d61 7267 -compile-one-arg │ │ │ -000106e0: 2d77 6974 682d 6f6e 652d 6578 7472 6120 -with-one-extra │ │ │ -000106f0: 235b 2866 6f72 6d29 2022 0841 47c1 61ab #[(form) ".AG.a. │ │ │ -00010700: 84c2 0821 8708 4147 c361 ab91 c308 38c4 ...!..AG.a....8. │ │ │ -00010710: 61ab 86c2 c508 2121 87c6 0821 87c7 08c8 a.....!!...!.... │ │ │ -00010720: 5c22 8722 205b 666f 726d 2031 2062 7974 \"." [form 1 byt │ │ │ -00010730: 652d 636f 6d70 696c 652d 6f6e 652d 6172 e-compile-one-ar │ │ │ -00010740: 6720 3220 6e69 6c20 6275 746c 6173 7420 g 2 nil butlast │ │ │ -00010750: 6279 7465 2d63 6f6d 7069 6c65 2d6e 6f72 byte-compile-nor │ │ │ -00010760: 6d61 6c2d 6361 6c6c 2062 7974 652d 636f mal-call byte-co │ │ │ -00010770: 6d70 696c 652d 7375 6272 2d77 726f 6e67 mpile-subr-wrong │ │ │ -00010780: 2d61 7267 7320 2231 2d32 225d 2033 5d29 -args "1-2"] 3]) │ │ │ -00010790: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -000107a0: 2d63 6f6d 7069 6c65 2d74 776f 2d61 7267 -compile-two-arg │ │ │ -000107b0: 732d 7769 7468 2d6f 6e65 2d65 7874 7261 s-with-one-extra │ │ │ -000107c0: 2023 5b28 666f 726d 2920 2208 4147 c161 #[(form) ".AG.a │ │ │ -000107d0: ab84 c208 2187 0841 47c3 61ab 91c3 0838 ....!..AG.a....8 │ │ │ -000107e0: c461 ab86 c2c5 0821 2187 c608 2187 c708 .a.....!!...!... │ │ │ -000107f0: c85c 2287 2220 5b66 6f72 6d20 3220 6279 .\"." [form 2 by │ │ │ -00010800: 7465 2d63 6f6d 7069 6c65 2d74 776f 2d61 te-compile-two-a │ │ │ -00010810: 7267 7320 3320 6e69 6c20 6275 746c 6173 rgs 3 nil butlas │ │ │ -00010820: 7420 6279 7465 2d63 6f6d 7069 6c65 2d6e t byte-compile-n │ │ │ -00010830: 6f72 6d61 6c2d 6361 6c6c 2062 7974 652d ormal-call byte- │ │ │ -00010840: 636f 6d70 696c 652d 7375 6272 2d77 726f compile-subr-wro │ │ │ -00010850: 6e67 2d61 7267 7320 2232 2d33 225d 2033 ng-args "2-3"] 3 │ │ │ -00010860: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -00010870: 7465 2d63 6f6d 7069 6c65 2d7a 6572 6f2d te-compile-zero- │ │ │ -00010880: 6f72 2d6f 6e65 2d61 7267 2d77 6974 682d or-one-arg-with- │ │ │ -00010890: 6f6e 652d 6578 7472 6120 235b 2866 6f72 one-extra #[(for │ │ │ -000108a0: 6d29 2022 0841 47c1 61ab 87c2 c308 c45c m) ".AG.a......\ │ │ │ -000108b0: 2221 8708 4147 c561 ab84 c208 2187 0841 "!..AG.a....!..A │ │ │ -000108c0: 47c6 61ab 91c6 0838 c761 ab86 c2c8 0821 G.a....8.a.....! │ │ │ -000108d0: 2187 c908 2187 ca08 cb5c 2287 2220 5b66 !...!....\"." [f │ │ │ -000108e0: 6f72 6d20 3020 6279 7465 2d63 6f6d 7069 orm 0 byte-compi │ │ │ -000108f0: 6c65 2d6f 6e65 2d61 7267 2061 7070 656e le-one-arg appen │ │ │ -00010900: 6420 286e 696c 2920 3120 3220 6e69 6c20 d (nil) 1 2 nil │ │ │ -00010910: 6275 746c 6173 7420 6279 7465 2d63 6f6d butlast byte-com │ │ │ -00010920: 7069 6c65 2d6e 6f72 6d61 6c2d 6361 6c6c pile-normal-call │ │ │ -00010930: 2062 7974 652d 636f 6d70 696c 652d 7375 byte-compile-su │ │ │ -00010940: 6272 2d77 726f 6e67 2d61 7267 7320 2230 br-wrong-args "0 │ │ │ -00010950: 2d32 225d 2034 5d29 0a28 6465 6661 6c69 -2"] 4]).(defali │ │ │ -00010960: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ -00010970: 2d6f 6e65 2d6f 722d 7477 6f2d 6172 6773 -one-or-two-args │ │ │ -00010980: 2d77 6974 682d 6f6e 652d 6578 7472 6120 -with-one-extra │ │ │ -00010990: 235b 2866 6f72 6d29 2022 0841 47c1 61ab #[(form) ".AG.a. │ │ │ -000109a0: 87c2 c308 c45c 2221 8708 4147 c561 ab84 .....\"!..AG.a.. │ │ │ -000109b0: c208 2187 0841 47c6 61ab 91c6 0838 c761 ..!..AG.a....8.a │ │ │ -000109c0: ab86 c2c8 0821 2187 c908 2187 ca08 cb5c .....!!...!....\ │ │ │ -000109d0: 2287 2220 5b66 6f72 6d20 3120 6279 7465 "." [form 1 byte │ │ │ -000109e0: 2d63 6f6d 7069 6c65 2d74 776f 2d61 7267 -compile-two-arg │ │ │ -000109f0: 7320 6170 7065 6e64 2028 6e69 6c29 2032 s append (nil) 2 │ │ │ -00010a00: 2033 206e 696c 2062 7574 6c61 7374 2062 3 nil butlast b │ │ │ -00010a10: 7974 652d 636f 6d70 696c 652d 6e6f 726d yte-compile-norm │ │ │ -00010a20: 616c 2d63 616c 6c20 6279 7465 2d63 6f6d al-call byte-com │ │ │ -00010a30: 7069 6c65 2d73 7562 722d 7772 6f6e 672d pile-subr-wrong- │ │ │ -00010a40: 6172 6773 2022 312d 3322 5d20 345d 290a args "1-3"] 4]). │ │ │ -00010a50: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -00010a60: 636f 6d70 696c 652d 7477 6f2d 6f72 2d74 compile-two-or-t │ │ │ -00010a70: 6872 6565 2d61 7267 732d 7769 7468 2d6f hree-args-with-o │ │ │ -00010a80: 6e65 2d65 7874 7261 2023 5b28 666f 726d ne-extra #[(form │ │ │ -00010a90: 2920 2208 4147 c161 ab87 c2c3 08c4 5c22 ) ".AG.a......\" │ │ │ -00010aa0: 2187 0841 47c5 61ab 84c2 0821 8708 4147 !..AG.a....!..AG │ │ │ -00010ab0: c661 ab91 c608 38c7 61ab 86c2 c808 2121 .a....8.a.....!! │ │ │ -00010ac0: 87c9 0821 87ca 08cb 5c22 8722 205b 666f ...!....\"." [fo │ │ │ -00010ad0: 726d 2032 2062 7974 652d 636f 6d70 696c rm 2 byte-compil │ │ │ -00010ae0: 652d 7468 7265 652d 6172 6773 2061 7070 e-three-args app │ │ │ -00010af0: 656e 6420 286e 696c 2920 3320 3420 6e69 end (nil) 3 4 ni │ │ │ -00010b00: 6c20 6275 746c 6173 7420 6279 7465 2d63 l butlast byte-c │ │ │ -00010b10: 6f6d 7069 6c65 2d6e 6f72 6d61 6c2d 6361 ompile-normal-ca │ │ │ -00010b20: 6c6c 2062 7974 652d 636f 6d70 696c 652d ll byte-compile- │ │ │ -00010b30: 7375 6272 2d77 726f 6e67 2d61 7267 7320 subr-wrong-args │ │ │ -00010b40: 2232 2d34 225d 2034 5d29 0a28 6465 6661 "2-4"] 4]).(defa │ │ │ -00010b50: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ -00010b60: 6c65 2d6e 6f2d 6172 6773 2d77 6974 682d le-no-args-with- │ │ │ -00010b70: 7477 6f2d 6578 7472 6120 235b 2866 6f72 two-extra #[(for │ │ │ -00010b80: 6d29 2022 0841 47c1 61ab 84c2 0821 8708 m) ".AG.a....!.. │ │ │ -00010b90: 4147 c373 ab84 c408 2187 c508 c65c 2287 AG.s....!....\". │ │ │ -00010ba0: 2220 5b66 6f72 6d20 3020 6279 7465 2d63 " [form 0 byte-c │ │ │ -00010bb0: 6f6d 7069 6c65 2d6e 6f2d 6172 6773 2028 ompile-no-args ( │ │ │ -00010bc0: 3120 3229 2062 7974 652d 636f 6d70 696c 1 2) byte-compil │ │ │ -00010bd0: 652d 6e6f 726d 616c 2d63 616c 6c20 6279 e-normal-call by │ │ │ -00010be0: 7465 2d63 6f6d 7069 6c65 2d73 7562 722d te-compile-subr- │ │ │ -00010bf0: 7772 6f6e 672d 6172 6773 2022 302d 3222 wrong-args "0-2" │ │ │ -00010c00: 5d20 335d 290a 2864 6566 616c 6961 7320 ] 3]).(defalias │ │ │ -00010c10: 2762 7974 652d 636f 6d70 696c 652d 6f6e 'byte-compile-on │ │ │ -00010c20: 652d 6172 672d 7769 7468 2d74 776f 2d65 e-arg-with-two-e │ │ │ -00010c30: 7874 7261 2023 5b28 666f 726d 2920 2208 xtra #[(form) ". │ │ │ -00010c40: 4147 c161 ab84 c208 2187 0841 47c3 73ab AG.a....!..AG.s. │ │ │ -00010c50: 84c4 0821 87c5 08c6 5c22 8722 205b 666f ...!....\"." [fo │ │ │ -00010c60: 726d 2031 2062 7974 652d 636f 6d70 696c rm 1 byte-compil │ │ │ -00010c70: 652d 6f6e 652d 6172 6720 2832 2033 2920 e-one-arg (2 3) │ │ │ -00010c80: 6279 7465 2d63 6f6d 7069 6c65 2d6e 6f72 byte-compile-nor │ │ │ -00010c90: 6d61 6c2d 6361 6c6c 2062 7974 652d 636f mal-call byte-co │ │ │ -00010ca0: 6d70 696c 652d 7375 6272 2d77 726f 6e67 mpile-subr-wrong │ │ │ -00010cb0: 2d61 7267 7320 2231 2d33 225d 2033 5d29 -args "1-3"] 3]) │ │ │ -00010cc0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -00010cd0: 2d63 6f6d 7069 6c65 2d74 776f 2d61 7267 -compile-two-arg │ │ │ -00010ce0: 732d 3139 2d3e 3230 2023 5b28 666f 726d s-19->20 #[(form │ │ │ -00010cf0: 2920 2209 47c2 55ac 85c3 09c4 5c22 87c5 ) ".G.U.....\".. │ │ │ -00010d00: 0941 4021 88c5 c409 3821 8808 ab88 c609 .A@!....8!...... │ │ │ -00010d10: 40c7 4ec8 5c22 87c6 0940 c94e c85c 2287 @.N.\"...@.N.\". │ │ │ -00010d20: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ -00010d30: 656d 6163 7331 392d 636f 6d70 6174 6962 emacs19-compatib │ │ │ -00010d40: 696c 6974 7920 666f 726d 2033 2062 7974 ility form 3 byt │ │ │ -00010d50: 652d 636f 6d70 696c 652d 7375 6272 2d77 e-compile-subr-w │ │ │ -00010d60: 726f 6e67 2d61 7267 7320 3220 6279 7465 rong-args 2 byte │ │ │ -00010d70: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6279 -compile-form by │ │ │ -00010d80: 7465 2d63 6f6d 7069 6c65 2d6f 7574 2062 te-compile-out b │ │ │ -00010d90: 7974 652d 6f70 636f 6465 3139 2030 2062 yte-opcode19 0 b │ │ │ -00010da0: 7974 652d 6f70 636f 6465 5d20 335d 290a yte-opcode] 3]). │ │ │ -00010db0: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -00010dc0: 636f 6d70 696c 652d 6e6f 6f70 2023 5b28 compile-noop #[( │ │ │ -00010dd0: 666f 726d 2920 22c0 c121 8722 205b 6279 form) "..!." [by │ │ │ -00010de0: 7465 2d63 6f6d 7069 6c65 2d63 6f6e 7374 te-compile-const │ │ │ -00010df0: 616e 7420 6e69 6c5d 2032 5d29 0a28 6465 ant nil] 2]).(de │ │ │ -00010e00: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -00010e10: 7069 6c65 2d64 6973 6361 7264 2023 5b6e pile-discard #[n │ │ │ -00010e20: 696c 2022 c0c1 c25c 2287 2220 5b62 7974 il "...\"." [byt │ │ │ -00010e30: 652d 636f 6d70 696c 652d 6f75 7420 6279 e-compile-out by │ │ │ -00010e40: 7465 2d64 6973 6361 7264 2030 5d20 335d te-discard 0] 3] │ │ │ -00010e50: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -00010e60: 652d 636f 6d70 696c 652d 6d61 7820 235b e-compile-max #[ │ │ │ -00010e70: 2866 6f72 6d29 2022 0941 891c 47c5 61ab (form) ".A..G.a. │ │ │ -00010e80: 86c6 09c7 5c22 aabb 0c47 c861 ab94 c90c ....\"...G.a.... │ │ │ -00010e90: 4021 8808 3fad acca cbc5 5c22 88ca ccc5 @!..?.....\".... │ │ │ -00010ea0: 5c22 aaa1 c90c 4021 880c 41cd 1a89 1bab \"....@!..A..... │ │ │ -00010eb0: 920b 4012 c95c 6e21 88ca ccc5 5c22 880b ..@..\n!....\".. │ │ │ -00010ec0: 4189 13ac 6e2a cd29 8722 205b 6279 7465 A...n*.)." [byte │ │ │ -00010ed0: 2d63 6f6d 7069 6c65 2d64 656c 6574 652d -compile-delete- │ │ │ -00010ee0: 6572 726f 7273 2066 6f72 6d20 656c 7420 errors form elt │ │ │ -00010ef0: 2331 3d23 3a2d 2d64 6f6c 6973 742d 7465 #1=#:--dolist-te │ │ │ -00010f00: 6d70 2d2d 3234 3732 3620 6172 6773 2030 mp--24726 args 0 │ │ │ -00010f10: 2062 7974 652d 636f 6d70 696c 652d 7375 byte-compile-su │ │ │ -00010f20: 6272 2d77 726f 6e67 2d61 7267 7320 2231 br-wrong-args "1 │ │ │ -00010f30: 206f 7220 6d6f 7265 2220 3120 6279 7465 or more" 1 byte │ │ │ -00010f40: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6279 -compile-form by │ │ │ -00010f50: 7465 2d63 6f6d 7069 6c65 2d6f 7574 2062 te-compile-out b │ │ │ -00010f60: 7974 652d 6475 7020 6279 7465 2d6d 6178 yte-dup byte-max │ │ │ -00010f70: 206e 696c 5d20 355d 290a 2864 6566 616c nil] 5]).(defal │ │ │ -00010f80: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ -00010f90: 652d 6d69 6e20 235b 2866 6f72 6d29 2022 e-min #[(form) " │ │ │ -00010fa0: 0941 891c 47c5 61ab 86c6 09c7 5c22 aabb .A..G.a.....\".. │ │ │ -00010fb0: 0c47 c861 ab94 c90c 4021 8808 3fad acca .G.a....@!..?... │ │ │ -00010fc0: cbc5 5c22 88ca ccc5 5c22 aaa1 c90c 4021 ..\"....\"....@! │ │ │ -00010fd0: 880c 41cd 1a89 1bab 920b 4012 c95c 6e21 ..A.......@..\n! │ │ │ -00010fe0: 88ca ccc5 5c22 880b 4189 13ac 6e2a cd29 ....\"..A...n*.) │ │ │ -00010ff0: 8722 205b 6279 7465 2d63 6f6d 7069 6c65 ." [byte-compile │ │ │ -00011000: 2d64 656c 6574 652d 6572 726f 7273 2066 -delete-errors f │ │ │ -00011010: 6f72 6d20 656c 7420 2331 3d23 3a2d 2d64 orm elt #1=#:--d │ │ │ -00011020: 6f6c 6973 742d 7465 6d70 2d2d 3234 3732 olist-temp--2472 │ │ │ -00011030: 3820 6172 6773 2030 2062 7974 652d 636f 8 args 0 byte-co │ │ │ -00011040: 6d70 696c 652d 7375 6272 2d77 726f 6e67 mpile-subr-wrong │ │ │ -00011050: 2d61 7267 7320 2231 206f 7220 6d6f 7265 -args "1 or more │ │ │ -00011060: 2220 3120 6279 7465 2d63 6f6d 7069 6c65 " 1 byte-compile │ │ │ -00011070: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ -00011080: 6c65 2d6f 7574 2062 7974 652d 6475 7020 le-out byte-dup │ │ │ -00011090: 6279 7465 2d6d 696e 206e 696c 5d20 355d byte-min nil] 5] │ │ │ -000110a0: 290a 2862 7974 652d 636f 6465 2022 c0c1 ).(byte-code ".. │ │ │ -000110b0: c2c3 2388 c0c1 c4c5 2388 c0c5 c6c1 2388 ..#.....#.....#. │ │ │ -000110c0: c0c7 c2c8 2388 c0c7 c4c9 2388 c0c9 c6c7 ....#.....#..... │ │ │ -000110d0: 2388 c0ca c2cb 2388 c0ca c4cc 2388 c0cc #.....#.....#... │ │ │ -000110e0: c6ca 2388 c0cd c2ce 2388 c0cd c4cf 2388 ..#.....#.....#. │ │ │ -000110f0: c0cf c6cd 2388 c0d0 c2d1 2388 c0d2 c2d3 ....#.....#..... │ │ │ -00011100: 2388 c0d2 c4d4 2388 c0d4 c6d2 2388 c0d5 #.....#.....#... │ │ │ -00011110: c2d6 2388 c0d5 c4d7 2388 c0d7 c6d5 2388 ..#.....#.....#. │ │ │ -00011120: c0d8 c2d9 2388 c0d8 c4da 2388 c0da c6d8 ....#.....#..... │ │ │ -00011130: 2388 c0db c2dc 2388 c0dd c2de 2388 c0dd #.....#.....#... │ │ │ -00011140: c4df 2388 c0df c6dd 2388 c0e0 c2e1 2388 ..#.....#.....#. │ │ │ -00011150: c0e0 c4e2 2388 c0e2 c6e0 2388 c0e3 c2e4 ....#.....#..... │ │ │ -00011160: 2388 c0e3 c4e5 2388 c0e5 c6e3 2388 c0e6 #.....#.....#... │ │ │ -00011170: c2e7 2388 c0e8 c2e9 2388 c0e8 c4ea 2388 ..#.....#.....#. │ │ │ -00011180: c0ea c6e8 2388 c0eb c2e9 2388 c0eb c4ec ....#.....#..... │ │ │ -00011190: 2388 c0ec c6eb 2388 c0ed c2e9 2388 c0ed #.....#.....#... │ │ │ -000111a0: c4ee 2388 c0ee c6ed 2388 c0ef c2e9 2388 ..#.....#.....#. │ │ │ -000111b0: c0ef c4f0 2388 c0f0 c6ef 2388 c0f1 c2e9 ....#.....#..... │ │ │ -000111c0: 2388 c0f1 c4f2 2388 c0f2 c6f1 2387 2220 #.....#.....#." │ │ │ -000111d0: 5b70 7574 206c 6973 7420 6279 7465 2d63 [put list byte-c │ │ │ -000111e0: 6f6d 7069 6c65 2062 7974 652d 636f 6d70 ompile byte-comp │ │ │ -000111f0: 696c 652d 6c69 7374 2062 7974 652d 6f70 ile-list byte-op │ │ │ -00011200: 636f 6465 2062 7974 652d 6c69 7374 2062 code byte-list b │ │ │ -00011210: 7974 652d 6f70 636f 6465 2d69 6e76 6572 yte-opcode-inver │ │ │ -00011220: 7420 636f 6e63 6174 2062 7974 652d 636f t concat byte-co │ │ │ -00011230: 6d70 696c 652d 636f 6e63 6174 2062 7974 mpile-concat byt │ │ │ -00011240: 652d 636f 6e63 6174 2066 7365 7420 6279 e-concat fset by │ │ │ -00011250: 7465 2d63 6f6d 7069 6c65 2d66 7365 7420 te-compile-fset │ │ │ -00011260: 6279 7465 2d66 7365 7420 696e 7365 7274 byte-fset insert │ │ │ -00011270: 2062 7974 652d 636f 6d70 696c 652d 696e byte-compile-in │ │ │ -00011280: 7365 7274 2062 7974 652d 696e 7365 7274 sert byte-insert │ │ │ -00011290: 2066 756e 6374 696f 6e20 6279 7465 2d63 function byte-c │ │ │ -000112a0: 6f6d 7069 6c65 2d66 756e 6374 696f 6e2d ompile-function- │ │ │ -000112b0: 666f 726d 206d 6178 2062 7974 652d 636f form max byte-co │ │ │ -000112c0: 6d70 696c 652d 6d61 7820 6279 7465 2d6d mpile-max byte-m │ │ │ -000112d0: 6178 206d 696e 2062 7974 652d 636f 6d70 ax min byte-comp │ │ │ -000112e0: 696c 652d 6d69 6e20 6279 7465 2d6d 696e ile-min byte-min │ │ │ -000112f0: 202b 2062 7974 652d 636f 6d70 696c 652d + byte-compile- │ │ │ -00011300: 706c 7573 2062 7974 652d 706c 7573 202d plus byte-plus - │ │ │ -00011310: 2062 7974 652d 636f 6d70 696c 652d 6d69 byte-compile-mi │ │ │ -00011320: 6e75 7320 2a20 6279 7465 2d63 6f6d 7069 nus * byte-compi │ │ │ -00011330: 6c65 2d6d 756c 7420 6279 7465 2d6d 756c le-mult byte-mul │ │ │ -00011340: 7420 2f20 6279 7465 2d63 6f6d 7069 6c65 t / byte-compile │ │ │ -00011350: 2d71 756f 2062 7974 652d 7175 6f20 6e63 -quo byte-quo nc │ │ │ -00011360: 6f6e 6320 6279 7465 2d63 6f6d 7069 6c65 onc byte-compile │ │ │ -00011370: 2d6e 636f 6e63 2062 7974 652d 6e63 6f6e -nconc byte-ncon │ │ │ -00011380: 6320 6265 6769 6e6e 696e 672d 6f66 2d6c c beginning-of-l │ │ │ -00011390: 696e 6520 6279 7465 2d63 6f6d 7069 6c65 ine byte-compile │ │ │ -000113a0: 2d62 6567 696e 6e69 6e67 2d6f 662d 6c69 -beginning-of-li │ │ │ -000113b0: 6e65 203d 2062 7974 652d 636f 6d70 696c ne = byte-compil │ │ │ -000113c0: 652d 6172 6974 6863 6f6d 7061 7265 2062 e-arithcompare b │ │ │ -000113d0: 7974 652d 6571 6c73 6967 6e20 3c20 6279 yte-eqlsign < by │ │ │ -000113e0: 7465 2d6c 7373 203e 2062 7974 652d 6774 te-lss > byte-gt │ │ │ -000113f0: 7220 3c3d 2062 7974 652d 6c65 7120 3e3d r <= byte-leq >= │ │ │ -00011400: 2062 7974 652d 6765 715d 2034 290a 2864 byte-geq] 4).(d │ │ │ -00011410: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ -00011420: 6d70 696c 652d 6172 6974 6863 6f6d 7061 mpile-arithcompa │ │ │ -00011430: 7265 2023 5b28 666f 726d 2920 2209 4147 re #[(form) ".AG │ │ │ -00011440: c261 ab85 c309 c45c 2287 0941 47c5 61ab .a.....\"..AG.a. │ │ │ -00011450: 8b08 ab84 c6c7 2187 c809 2187 0941 47c9 ......!...!..AG. │ │ │ -00011460: 61ab 84ca 0921 87c8 0921 8722 205b 6279 a....!...!." [by │ │ │ -00011470: 7465 2d63 6f6d 7069 6c65 2d64 656c 6574 te-compile-delet │ │ │ -00011480: 652d 6572 726f 7273 2066 6f72 6d20 3020 e-errors form 0 │ │ │ -00011490: 6279 7465 2d63 6f6d 7069 6c65 2d73 7562 byte-compile-sub │ │ │ -000114a0: 722d 7772 6f6e 672d 6172 6773 2022 3120 r-wrong-args "1 │ │ │ -000114b0: 6f72 206d 6f72 6522 2031 2062 7974 652d or more" 1 byte- │ │ │ -000114c0: 636f 6d70 696c 652d 636f 6e73 7461 6e74 compile-constant │ │ │ -000114d0: 2074 2062 7974 652d 636f 6d70 696c 652d t byte-compile- │ │ │ -000114e0: 6e6f 726d 616c 2d63 616c 6c20 3220 6279 normal-call 2 by │ │ │ -000114f0: 7465 2d63 6f6d 7069 6c65 2d74 776f 2d61 te-compile-two-a │ │ │ -00011500: 7267 735d 2033 5d29 0a28 6279 7465 2d63 rgs] 3]).(byte-c │ │ │ -00011510: 6f64 6520 22c0 c1c2 c323 88c0 c1c4 c523 ode "....#.....# │ │ │ -00011520: 88c0 c5c6 c123 8722 205b 7075 7420 2f3d .....#." [put /= │ │ │ -00011530: 2062 7974 652d 636f 6d70 696c 6520 6279 byte-compile by │ │ │ -00011540: 7465 2d63 6f6d 7069 6c65 2d2f 3d20 6279 te-compile-/= by │ │ │ -00011550: 7465 2d6f 7063 6f64 6520 6279 7465 2d2f te-opcode byte-/ │ │ │ -00011560: 3d20 6279 7465 2d6f 7063 6f64 652d 696e = byte-opcode-in │ │ │ -00011570: 7665 7274 5d20 3429 0a28 6465 6661 6c69 vert] 4).(defali │ │ │ -00011580: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ -00011590: 2d2f 3d20 235b 2866 6f72 6d29 2022 0941 -/= #[(form) ".A │ │ │ -000115a0: 47c2 61ab 85c3 09c4 5c22 8709 4147 c561 G.a.....\"..AG.a │ │ │ -000115b0: ab84 c6c7 2187 0941 47c8 61ab 91c9 ca09 ....!..AG.a..... │ │ │ -000115c0: 4142 4419 cb09 085c 2288 cc89 1029 87cd ABD....\"....).. │ │ │ -000115d0: 0921 8722 205b 666f 722d 6566 6665 6374 .!." [for-effect │ │ │ -000115e0: 2066 6f72 6d20 3020 6279 7465 2d63 6f6d form 0 byte-com │ │ │ -000115f0: 7069 6c65 2d73 7562 722d 7772 6f6e 672d pile-subr-wrong- │ │ │ -00011600: 6172 6773 2022 3120 6f72 206d 6f72 6522 args "1 or more" │ │ │ -00011610: 2031 2062 7974 652d 636f 6d70 696c 652d 1 byte-compile- │ │ │ -00011620: 636f 6e73 7461 6e74 2074 2032 206e 6f74 constant t 2 not │ │ │ -00011630: 203d 2062 7974 652d 636f 6d70 696c 652d = byte-compile- │ │ │ -00011640: 666f 726d 206e 696c 2062 7974 652d 636f form nil byte-co │ │ │ -00011650: 6d70 696c 652d 6e6f 726d 616c 2d63 616c mpile-normal-cal │ │ │ -00011660: 6c5d 2033 5d29 0a28 6279 7465 2d63 6f64 l] 3]).(byte-cod │ │ │ -00011670: 6520 22c0 c1c2 c323 88c0 c1c4 c523 88c0 e "....#.....#.. │ │ │ -00011680: c5c6 c123 8722 205b 7075 7420 6275 6666 ...#." [put buff │ │ │ -00011690: 6572 2d73 7562 7374 7269 6e67 2062 7974 er-substring byt │ │ │ -000116a0: 652d 636f 6d70 696c 6520 6279 7465 2d63 e-compile byte-c │ │ │ -000116b0: 6f6d 7069 6c65 2d62 7566 6665 722d 7375 ompile-buffer-su │ │ │ -000116c0: 6273 7472 696e 6720 6279 7465 2d6f 7063 bstring byte-opc │ │ │ -000116d0: 6f64 6520 6279 7465 2d62 7566 6665 722d ode byte-buffer- │ │ │ -000116e0: 7375 6273 7472 696e 6720 6279 7465 2d6f substring byte-o │ │ │ -000116f0: 7063 6f64 652d 696e 7665 7274 5d20 3429 pcode-invert] 4) │ │ │ -00011700: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -00011710: 2d63 6f6d 7069 6c65 2d62 7566 6665 722d -compile-buffer- │ │ │ -00011720: 7375 6273 7472 696e 6720 235b 2866 6f72 substring #[(for │ │ │ -00011730: 6d29 2022 0841 47c1 61ab 87c2 c308 c45c m) ".AG.a......\ │ │ │ -00011740: 2221 8708 4147 c561 ab87 c2c3 08c6 5c22 "!..AG.a......\" │ │ │ -00011750: 2187 0841 47c7 61ab 84c2 0821 8708 4147 !..AG.a....!..AG │ │ │ -00011760: c861 ab84 c908 2187 ca08 cb5c 2287 2220 .a....!....\"." │ │ │ -00011770: 5b66 6f72 6d20 3020 6279 7465 2d63 6f6d [form 0 byte-com │ │ │ -00011780: 7069 6c65 2d74 776f 2d61 7267 7320 6170 pile-two-args ap │ │ │ -00011790: 7065 6e64 2028 6e69 6c20 6e69 6c29 2031 pend (nil nil) 1 │ │ │ -000117a0: 2028 6e69 6c29 2032 2033 2062 7974 652d (nil) 2 3 byte- │ │ │ -000117b0: 636f 6d70 696c 652d 6e6f 726d 616c 2d63 compile-normal-c │ │ │ -000117c0: 616c 6c20 6279 7465 2d63 6f6d 7069 6c65 all byte-compile │ │ │ -000117d0: 2d73 7562 722d 7772 6f6e 672d 6172 6773 -subr-wrong-args │ │ │ -000117e0: 2022 302d 3322 5d20 345d 290a 2864 6566 "0-3"] 4]).(def │ │ │ -000117f0: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ -00011800: 696c 652d 6c69 7374 2023 5b28 666f 726d ile-list #[(form │ │ │ -00011810: 2920 2208 4189 1947 891a c355 ab85 c4c5 ) ".A..G...U.... │ │ │ -00011820: 21aa a65c 6ec6 57ab 8ec7 c809 5c22 88c9 !..\n.W.....\".. │ │ │ -00011830: ca5c 6e53 48c3 5c22 aa93 5c6e cb57 ab8b .\nSH.\"..\n.W.. │ │ │ -00011840: c7c8 095c 2288 c9cc 5c6e 5c22 aa83 cd08 ...\"...\n\".... │ │ │ -00011850: 212a 8722 205b 666f 726d 2061 7267 7320 !*." [form args │ │ │ -00011860: 6e61 7267 7320 3020 6279 7465 2d63 6f6d nargs 0 byte-com │ │ │ -00011870: 7069 6c65 2d63 6f6e 7374 616e 7420 6e69 pile-constant ni │ │ │ -00011880: 6c20 3520 6d61 7063 6172 2062 7974 652d l 5 mapcar byte- │ │ │ -00011890: 636f 6d70 696c 652d 666f 726d 2062 7974 compile-form byt │ │ │ -000118a0: 652d 636f 6d70 696c 652d 6f75 7420 5b62 e-compile-out [b │ │ │ -000118b0: 7974 652d 6c69 7374 3120 6279 7465 2d6c yte-list1 byte-l │ │ │ -000118c0: 6973 7432 2062 7974 652d 6c69 7374 3320 ist2 byte-list3 │ │ │ -000118d0: 6279 7465 2d6c 6973 7434 5d20 3235 3620 byte-list4] 256 │ │ │ -000118e0: 6279 7465 2d6c 6973 744e 2062 7974 652d byte-listN byte- │ │ │ -000118f0: 636f 6d70 696c 652d 6e6f 726d 616c 2d63 compile-normal-c │ │ │ -00011900: 616c 6c5d 2034 5d29 0a28 6465 6661 6c69 all] 4]).(defali │ │ │ -00011910: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ -00011920: 2d63 6f6e 6361 7420 235b 2866 6f72 6d29 -concat #[(form) │ │ │ -00011930: 2022 0841 8919 4789 1ac3 73ab 8fc4 c509 ".A..G...s..... │ │ │ -00011940: 5c22 88c6 c75c 6ec8 5a48 c95c 22aa 9d5c \"...\n.ZH.\"..\ │ │ │ -00011950: 6ec9 61ab 85c5 ca21 aa93 5c6e cb57 ab8b n.a....!..\n.W.. │ │ │ -00011960: c4c5 095c 2288 c6cc 5c6e 5c22 aa83 cd08 ...\"...\n\".... │ │ │ -00011970: 212a 8722 205b 666f 726d 2061 7267 7320 !*." [form args │ │ │ -00011980: 6e61 7267 7320 2832 2033 2034 2920 6d61 nargs (2 3 4) ma │ │ │ -00011990: 7063 6172 2062 7974 652d 636f 6d70 696c pcar byte-compil │ │ │ -000119a0: 652d 666f 726d 2062 7974 652d 636f 6d70 e-form byte-comp │ │ │ -000119b0: 696c 652d 6f75 7420 5b62 7974 652d 636f ile-out [byte-co │ │ │ -000119c0: 6e63 6174 3220 6279 7465 2d63 6f6e 6361 ncat2 byte-conca │ │ │ -000119d0: 7433 2062 7974 652d 636f 6e63 6174 345d t3 byte-concat4] │ │ │ -000119e0: 2032 2030 2022 2220 3235 3620 6279 7465 2 0 "" 256 byte │ │ │ -000119f0: 2d63 6f6e 6361 744e 2062 7974 652d 636f -concatN byte-co │ │ │ -00011a00: 6d70 696c 652d 6e6f 726d 616c 2d63 616c mpile-normal-cal │ │ │ -00011a10: 6c5d 2035 5d29 0a28 6465 6661 6c69 6173 l] 5]).(defalias │ │ │ -00011a20: 2027 6279 7465 2d63 6f6d 7069 6c65 2d70 'byte-compile-p │ │ │ -00011a30: 6c75 7320 235b 2866 6f72 6d29 2022 0941 lus #[(form) ".A │ │ │ -00011a40: 891b 47c5 61ab 85c6 c521 aada 0b47 c761 ..G.a....!...G.a │ │ │ -00011a50: ab88 c8c9 09ca 5c22 21aa cccb 0b40 2188 ......\"!....@!. │ │ │ -00011a60: 0b41 cc1c 891a abbd 5c6e 4089 14c5 61ab .A......\n@...a. │ │ │ -00011a70: 8e08 acac c6c5 2188 cdce c55c 2288 aaa1 ......!....\"... │ │ │ -00011a80: 0cc7 61ab 87cd cfc5 5c22 88aa 950c d061 ..a.....\".....a │ │ │ -00011a90: ab87 cdd1 c55c 2288 aa89 cb0c 2188 cdce .....\".....!... │ │ │ -00011aa0: c55c 2288 5c6e 4189 12ac 432a cc29 8722 .\".\nA...C*.)." │ │ │ -00011ab0: 205b 6279 7465 2d63 6f6d 7069 6c65 2d64 [byte-compile-d │ │ │ -00011ac0: 656c 6574 652d 6572 726f 7273 2066 6f72 elete-errors for │ │ │ -00011ad0: 6d20 2331 3d23 3a2d 2d64 6f6c 6973 742d m #1=#:--dolist- │ │ │ -00011ae0: 7465 6d70 2d2d 3234 3733 3620 6172 6773 temp--24736 args │ │ │ -00011af0: 2065 6c74 2030 2062 7974 652d 636f 6d70 elt 0 byte-comp │ │ │ -00011b00: 696c 652d 636f 6e73 7461 6e74 2031 2062 ile-constant 1 b │ │ │ -00011b10: 7974 652d 636f 6d70 696c 652d 706c 7573 yte-compile-plus │ │ │ -00011b20: 2061 7070 656e 6420 2830 2920 6279 7465 append (0) byte │ │ │ -00011b30: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6e69 -compile-form ni │ │ │ -00011b40: 6c20 6279 7465 2d63 6f6d 7069 6c65 2d6f l byte-compile-o │ │ │ -00011b50: 7574 2062 7974 652d 706c 7573 2062 7974 ut byte-plus byt │ │ │ -00011b60: 652d 6164 6431 202d 3120 6279 7465 2d73 e-add1 -1 byte-s │ │ │ -00011b70: 7562 315d 2035 5d29 0a28 6465 6661 6c69 ub1] 5]).(defali │ │ │ -00011b80: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ -00011b90: 2d6d 696e 7573 2023 5b28 666f 726d 2920 -minus #[(form) │ │ │ -00011ba0: 2209 4189 1c47 c561 ab86 c609 c75c 22aa ".A..G.a.....\". │ │ │ -00011bb0: dd0c 47c8 61ab 8bc9 0c40 2188 cacb c55c ..G.a....@!....\ │ │ │ -00011bc0: 22aa ccc9 0c40 2188 0c41 cc1b 891a abbd "....@!..A...... │ │ │ -00011bd0: 5c6e 4089 13c5 61ab 8e08 acac cdc5 2188 \n@...a.......!. │ │ │ -00011be0: cace c55c 2288 aaa1 0bc8 61ab 87ca cfc5 ...\".....a..... │ │ │ -00011bf0: 5c22 88aa 950b d061 ab87 cad1 c55c 2288 \".....a.....\". │ │ │ -00011c00: aa89 c90b 2188 cace c55c 2288 5c6e 4189 ....!....\".\nA. │ │ │ -00011c10: 12ac 432a cc29 8722 205b 6279 7465 2d63 ..C*.)." [byte-c │ │ │ -00011c20: 6f6d 7069 6c65 2d64 656c 6574 652d 6572 ompile-delete-er │ │ │ -00011c30: 726f 7273 2066 6f72 6d20 2331 3d23 3a2d rors form #1=#:- │ │ │ -00011c40: 2d64 6f6c 6973 742d 7465 6d70 2d2d 3234 -dolist-temp--24 │ │ │ -00011c50: 3733 3820 656c 7420 6172 6773 2030 2062 738 elt args 0 b │ │ │ -00011c60: 7974 652d 636f 6d70 696c 652d 7375 6272 yte-compile-subr │ │ │ -00011c70: 2d77 726f 6e67 2d61 7267 7320 2231 206f -wrong-args "1 o │ │ │ -00011c80: 7220 6d6f 7265 2220 3120 6279 7465 2d63 r more" 1 byte-c │ │ │ -00011c90: 6f6d 7069 6c65 2d66 6f72 6d20 6279 7465 ompile-form byte │ │ │ -00011ca0: 2d63 6f6d 7069 6c65 2d6f 7574 2062 7974 -compile-out byt │ │ │ -00011cb0: 652d 6e65 6761 7465 206e 696c 2062 7974 e-negate nil byt │ │ │ -00011cc0: 652d 636f 6d70 696c 652d 636f 6e73 7461 e-compile-consta │ │ │ -00011cd0: 6e74 2062 7974 652d 6469 6666 2062 7974 nt byte-diff byt │ │ │ -00011ce0: 652d 7375 6231 202d 3120 6279 7465 2d61 e-sub1 -1 byte-a │ │ │ -00011cf0: 6464 315d 2035 5d29 0a28 6465 6661 6c69 dd1] 5]).(defali │ │ │ -00011d00: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ -00011d10: 2d6d 756c 7420 235b 2866 6f72 6d29 2022 -mult #[(form) " │ │ │ -00011d20: 0941 891b 47c5 61ab 85c6 c721 aadf 0b47 .A..G.a....!...G │ │ │ -00011d30: c761 ab88 c8c9 09ca 5c22 21aa d1cb 0b40 .a......\"!....@ │ │ │ -00011d40: 2188 0b41 cc1c 891a abc2 5c6e 4089 14c7 !..A......\n@... │ │ │ -00011d50: 61ab 8e08 acb1 c6c7 2188 cdce c55c 2288 a.......!....\". │ │ │ -00011d60: aaa6 0ccf 61ab 87cd d0c5 5c22 88aa 9a0c ....a.....\".... │ │ │ -00011d70: d161 ab8c cdd2 c55c 2288 cdd3 c55c 2288 .a.....\"....\". │ │ │ -00011d80: aa89 cb0c 2188 cdce c55c 2288 5c6e 4189 ....!....\".\nA. │ │ │ -00011d90: 12ac 3e2a cc29 8722 205b 6279 7465 2d63 ..>*.)." [byte-c │ │ │ -00011da0: 6f6d 7069 6c65 2d64 656c 6574 652d 6572 ompile-delete-er │ │ │ -00011db0: 726f 7273 2066 6f72 6d20 2331 3d23 3a2d rors form #1=#:- │ │ │ -00011dc0: 2d64 6f6c 6973 742d 7465 6d70 2d2d 3234 -dolist-temp--24 │ │ │ -00011dd0: 3734 3020 6172 6773 2065 6c74 2030 2062 740 args elt 0 b │ │ │ -00011de0: 7974 652d 636f 6d70 696c 652d 636f 6e73 yte-compile-cons │ │ │ -00011df0: 7461 6e74 2031 2062 7974 652d 636f 6d70 tant 1 byte-comp │ │ │ -00011e00: 696c 652d 6d75 6c74 2061 7070 656e 6420 ile-mult append │ │ │ -00011e10: 2831 2920 6279 7465 2d63 6f6d 7069 6c65 (1) byte-compile │ │ │ -00011e20: 2d66 6f72 6d20 6e69 6c20 6279 7465 2d63 -form nil byte-c │ │ │ -00011e30: 6f6d 7069 6c65 2d6f 7574 2062 7974 652d ompile-out byte- │ │ │ -00011e40: 6d75 6c74 202d 3120 6279 7465 2d6e 6567 mult -1 byte-neg │ │ │ -00011e50: 6174 6520 3220 6279 7465 2d64 7570 2062 ate 2 byte-dup b │ │ │ -00011e60: 7974 652d 706c 7573 5d20 355d 290a 2864 yte-plus] 5]).(d │ │ │ -00011e70: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ -00011e80: 6d70 696c 652d 7175 6f20 235b 2866 6f72 mpile-quo #[(for │ │ │ -00011e90: 6d29 2022 0941 891b 47c5 61ab 86c6 09c7 m) ".A..G.a..... │ │ │ -00011ea0: 5c22 aae3 0b47 c861 ab8f c9c8 2188 ca0b \"...G.a....!... │ │ │ -00011eb0: 4021 88cb ccc5 5c22 aace ca0b 4021 880b @!....\"....@!.. │ │ │ -00011ec0: 41cd 1c89 1aab bf5c 6e40 8914 c861 ab8e A......\n@...a.. │ │ │ -00011ed0: 08ac aec9 c821 88cb ccc5 5c22 88aa a30c .....!....\".... │ │ │ -00011ee0: ce61 ab87 cbcf c55c 2288 aa97 0ca7 ab8a .a.....\"....... │ │ │ -00011ef0: 0cc5 55ab 85d0 d109 5c22 88ca 0c21 88cb ..U.....\"...!.. │ │ │ -00011f00: ccc5 5c22 885c 6e41 8912 ac41 2acd 2987 ..\".\nA...A*.). │ │ │ -00011f10: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ -00011f20: 6465 6c65 7465 2d65 7272 6f72 7320 666f delete-errors fo │ │ │ -00011f30: 726d 2023 313d 233a 2d2d 646f 6c69 7374 rm #1=#:--dolist │ │ │ -00011f40: 2d74 656d 702d 2d32 3437 3432 2061 7267 -temp--24742 arg │ │ │ -00011f50: 7320 656c 7420 3020 6279 7465 2d63 6f6d s elt 0 byte-com │ │ │ -00011f60: 7069 6c65 2d73 7562 722d 7772 6f6e 672d pile-subr-wrong- │ │ │ -00011f70: 6172 6773 2022 3120 6f72 206d 6f72 6522 args "1 or more" │ │ │ -00011f80: 2031 2062 7974 652d 636f 6d70 696c 652d 1 byte-compile- │ │ │ -00011f90: 636f 6e73 7461 6e74 2062 7974 652d 636f constant byte-co │ │ │ -00011fa0: 6d70 696c 652d 666f 726d 2062 7974 652d mpile-form byte- │ │ │ -00011fb0: 636f 6d70 696c 652d 6f75 7420 6279 7465 compile-out byte │ │ │ -00011fc0: 2d71 756f 206e 696c 202d 3120 6279 7465 -quo nil -1 byte │ │ │ -00011fd0: 2d6e 6567 6174 6520 6279 7465 2d63 6f6d -negate byte-com │ │ │ -00011fe0: 7069 6c65 2d77 6172 6e20 2241 7474 656d pile-warn "Attem │ │ │ -00011ff0: 7074 2074 6f20 6469 7669 6465 2062 7920 pt to divide by │ │ │ -00012000: 7a65 726f 3a20 2573 225d 2035 5d29 0a28 zero: %s"] 5]).( │ │ │ -00012010: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ -00012020: 6f6d 7069 6c65 2d6e 636f 6e63 2023 5b28 ompile-nconc #[( │ │ │ -00012030: 666f 726d 2920 2208 4189 1b47 c461 ab85 form) ".A..G.a.. │ │ │ -00012040: c5c6 21aa ad0b 47c7 61ab 86c8 0b40 21aa ..!...G.a....@!. │ │ │ -00012050: a1c8 0b40 2188 0b41 c619 891a ab92 5c6e ...@!..A......\n │ │ │ -00012060: 4011 c809 2188 c9ca c45c 2288 5c6e 4189 @...!....\".\nA. │ │ │ -00012070: 12ac 6e2a c629 8722 205b 666f 726d 2065 ..n*.)." [form e │ │ │ -00012080: 6c74 2023 313d 233a 2d2d 646f 6c69 7374 lt #1=#:--dolist │ │ │ -00012090: 2d74 656d 702d 2d32 3437 3434 2061 7267 -temp--24744 arg │ │ │ -000120a0: 7320 3020 6279 7465 2d63 6f6d 7069 6c65 s 0 byte-compile │ │ │ -000120b0: 2d63 6f6e 7374 616e 7420 6e69 6c20 3120 -constant nil 1 │ │ │ -000120c0: 6279 7465 2d63 6f6d 7069 6c65 2d66 6f72 byte-compile-for │ │ │ -000120d0: 6d20 6279 7465 2d63 6f6d 7069 6c65 2d6f m byte-compile-o │ │ │ -000120e0: 7574 2062 7974 652d 6e63 6f6e 635d 2035 ut byte-nconc] 5 │ │ │ -000120f0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -00012100: 7465 2d63 6f6d 7069 6c65 2d66 7365 7420 te-compile-fset │ │ │ -00012110: 235b 2866 6f72 6d29 2022 c308 38c4 1a89 #[(form) "..8... │ │ │ -00012120: 19a2 c561 abb9 0941 4089 11a2 c661 abaf ...a...A@....a.. │ │ │ -00012130: 0841 40a3 a2c7 61ac a609 4141 8912 403b .A@...a...AA..@; │ │ │ -00012140: ab83 5c6e 4112 5c6e 40a2 c861 ab83 5c6e ..\nA.\n@..a..\n │ │ │ -00012150: 4112 5c6e 403a ab8b 5c6e 4040 c961 ac84 A.\n@:..\n@@.a.. │ │ │ -00012160: cacb 2188 2acc 0821 8722 205b 666f 726d ..!.*..!." [form │ │ │ -00012170: 2066 6e20 626f 6479 2032 206e 696c 2071 fn body 2 nil q │ │ │ -00012180: 756f 7465 206c 616d 6264 6120 6d61 6b65 uote lambda make │ │ │ -00012190: 2d62 7974 652d 636f 6465 2069 6e74 6572 -byte-code inter │ │ │ -000121a0: 6163 7469 7665 2062 7974 652d 636f 6465 active byte-code │ │ │ -000121b0: 2062 7974 652d 636f 6d70 696c 652d 7761 byte-compile-wa │ │ │ -000121c0: 726e 2022 4120 7175 6f74 6564 206c 616d rn "A quoted lam │ │ │ -000121d0: 6264 6120 666f 726d 2069 7320 7468 6520 bda form is the │ │ │ -000121e0: 7365 636f 6e64 2061 7267 756d 656e 7420 second argument │ │ │ -000121f0: 6f66 2066 7365 742e 2020 5468 6973 2069 of fset. This i │ │ │ -00012200: 7320 7072 6f62 6162 6c79 5c6e 2020 2020 s probably\n │ │ │ -00012210: 206e 6f74 2077 6861 7420 796f 7520 7761 not what you wa │ │ │ -00012220: 6e74 2c20 6173 2074 6861 7420 6c61 6d62 nt, as that lamb │ │ │ -00012230: 6461 2063 616e 6e6f 7420 6265 2063 6f6d da cannot be com │ │ │ -00012240: 7069 6c65 642e 2020 436f 6e73 6964 6572 piled. Consider │ │ │ -00012250: 2075 7369 6e67 5c6e 2020 2020 2074 6865 using\n the │ │ │ -00012260: 2073 796e 7461 7820 2866 756e 6374 696f syntax (functio │ │ │ -00012270: 6e20 286c 616d 6264 6120 282e 2e2e 2920 n (lambda (...) │ │ │ -00012280: 2e2e 2e29 2920 696e 7374 6561 642e 2220 ...)) instead." │ │ │ -00012290: 6279 7465 2d63 6f6d 7069 6c65 2d74 776f byte-compile-two │ │ │ -000122a0: 2d61 7267 735d 2033 5d29 0a28 6465 6661 -args] 3]).(defa │ │ │ -000122b0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ -000122c0: 6c65 2d66 756e 6172 6720 235b 2866 6f72 le-funarg #[(for │ │ │ -000122d0: 6d29 2022 c209 4140 8918 a2c3 61ab 9508 m) "..A@....a... │ │ │ -000122e0: 4140 a2c4 61ab 8d09 40c5 0841 4209 4141 A@..a...@..AB.AA │ │ │ -000122f0: 4242 aa81 0929 2187 2220 5b66 6e20 666f BB...)!." [fn fo │ │ │ -00012300: 726d 2062 7974 652d 636f 6d70 696c 652d rm byte-compile- │ │ │ -00012310: 6e6f 726d 616c 2d63 616c 6c20 7175 6f74 normal-call quot │ │ │ -00012320: 6520 6c61 6d62 6461 2066 756e 6374 696f e lambda functio │ │ │ -00012330: 6e5d 2035 5d29 0a28 6465 6661 6c69 6173 n] 5]).(defalias │ │ │ -00012340: 2027 6279 7465 2d63 6f6d 7069 6c65 2d66 'byte-compile-f │ │ │ -00012350: 756e 6374 696f 6e2d 666f 726d 2023 5b28 unction-form #[( │ │ │ -00012360: 666f 726d 2920 22c1 0841 4039 ab85 0841 form) "..A@9...A │ │ │ -00012370: 40aa 85c2 0841 4021 2187 2220 5b66 6f72 @....A@!!." [for │ │ │ -00012380: 6d20 6279 7465 2d63 6f6d 7069 6c65 2d63 m byte-compile-c │ │ │ -00012390: 6f6e 7374 616e 7420 6279 7465 2d63 6f6d onstant byte-com │ │ │ -000123a0: 7069 6c65 2d6c 616d 6264 615d 2033 5d29 pile-lambda] 3]) │ │ │ -000123b0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -000123c0: 2d63 6f6d 7069 6c65 2d69 6e73 6572 7420 -compile-insert │ │ │ -000123d0: 235b 2866 6f72 6d29 2022 0841 ac84 c1c2 #[(form) ".A.... │ │ │ -000123e0: 2187 0847 c358 ab97 c4c5 0841 5c22 8808 !..G.X.....A\".. │ │ │ -000123f0: 4141 ab87 c6c7 0841 475c 2287 c6c8 c95c AA.....AG\"....\ │ │ │ -00012400: 2287 cac4 cb08 4141 5c22 73ab 84cc 0821 ".....AA\"s....! │ │ │ -00012410: 8708 4189 10ad 93c5 0840 2188 c6c8 c95c ..A......@!....\ │ │ │ -00012420: 2288 0841 ab6c cd20 88aa 6787 2220 5b66 "..A.l. ..g." [f │ │ │ -00012430: 6f72 6d20 6279 7465 2d63 6f6d 7069 6c65 orm byte-compile │ │ │ -00012440: 2d63 6f6e 7374 616e 7420 6e69 6c20 3235 -constant nil 25 │ │ │ -00012450: 3620 6d61 7063 6172 2062 7974 652d 636f 6 mapcar byte-co │ │ │ -00012460: 6d70 696c 652d 666f 726d 2062 7974 652d mpile-form byte- │ │ │ -00012470: 636f 6d70 696c 652d 6f75 7420 6279 7465 compile-out byte │ │ │ -00012480: 2d69 6e73 6572 744e 2062 7974 652d 696e -insertN byte-in │ │ │ -00012490: 7365 7274 2030 2074 2063 6f6e 7370 2062 sert 0 t consp b │ │ │ -000124a0: 7974 652d 636f 6d70 696c 652d 6e6f 726d yte-compile-norm │ │ │ -000124b0: 616c 2d63 616c 6c20 6279 7465 2d63 6f6d al-call byte-com │ │ │ -000124c0: 7069 6c65 2d64 6973 6361 7264 5d20 345d pile-discard] 4] │ │ │ -000124d0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -000124e0: 652d 636f 6d70 696c 652d 6265 6769 6e6e e-compile-beginn │ │ │ -000124f0: 696e 672d 6f66 2d6c 696e 6520 235b 2866 ing-of-line #[(f │ │ │ -00012500: 6f72 6d29 2022 0947 8918 c256 ab86 c309 orm) ".G...V.... │ │ │ -00012510: c45c 22aa d308 c255 aca5 0941 403a ab88 .\"....U...A@:.. │ │ │ -00012520: 0941 4040 c561 aa95 0941 4039 ab8e c609 .A@@.a...A@9.... │ │ │ -00012530: 4140 21ac 8f09 4140 c773 aa81 c8ac 85c9 A@!...A@.s...... │ │ │ -00012540: 0921 aaa4 cacb cc09 4140 21ae 81cd 8911 .!......A@!..... │ │ │ -00012550: a8ab 8409 53aa 8ace cf09 5c22 88d0 c509 ....S.....\".... │ │ │ -00012560: 4444 44c8 5c22 88d1 d221 2987 2220 5b6c DDD.\"...!)." [l │ │ │ -00012570: 656e 2066 6f72 6d20 3320 6279 7465 2d63 en form 3 byte-c │ │ │ -00012580: 6f6d 7069 6c65 2d73 7562 722d 7772 6f6e ompile-subr-wron │ │ │ -00012590: 672d 6172 6773 2022 302d 3222 2071 756f g-args "0-2" quo │ │ │ -000125a0: 7465 206b 6579 776f 7264 7020 286e 696c te keywordp (nil │ │ │ -000125b0: 2074 2920 7420 6279 7465 2d63 6f6d 7069 t) t byte-compi │ │ │ -000125c0: 6c65 2d6e 6f72 6d61 6c2d 6361 6c6c 2062 le-normal-call b │ │ │ -000125d0: 7974 652d 636f 6d70 696c 652d 666f 726d yte-compile-form │ │ │ -000125e0: 2066 6f72 7761 7264 2d6c 696e 6520 6576 forward-line ev │ │ │ -000125f0: 616c 2031 2062 7974 652d 636f 6d70 696c al 1 byte-compil │ │ │ -00012600: 652d 7761 726e 2022 4e6f 6e2d 6e75 6d65 e-warn "Non-nume │ │ │ -00012610: 7269 6320 6172 6720 746f 2062 6567 696e ric arg to begin │ │ │ -00012620: 6e69 6e67 2d6f 662d 6c69 6e65 3a20 2573 ning-of-line: %s │ │ │ -00012630: 2220 312d 2062 7974 652d 636f 6d70 696c " 1- byte-compil │ │ │ -00012640: 652d 636f 6e73 7461 6e74 206e 696c 5d20 e-constant nil] │ │ │ -00012650: 365d 290a 2862 7974 652d 636f 6465 2022 6]).(byte-code " │ │ │ -00012660: c0c1 c2c3 2388 c0c1 c4c5 2388 c0c5 c6c1 ....#.....#..... │ │ │ -00012670: 2388 c0c7 c2c8 2388 c0c9 c2ca 2388 c0cb #.....#.....#... │ │ │ -00012680: c2cc 2388 c0cd c2ce 2388 c0cf c2d0 2387 ..#.....#.....#. │ │ │ -00012690: 2220 5b70 7574 2073 6574 2062 7974 652d " [put set byte- │ │ │ -000126a0: 636f 6d70 696c 6520 6279 7465 2d63 6f6d compile byte-com │ │ │ -000126b0: 7069 6c65 2d73 6574 2062 7974 652d 6f70 pile-set byte-op │ │ │ -000126c0: 636f 6465 2062 7974 652d 7365 7420 6279 code byte-set by │ │ │ -000126d0: 7465 2d6f 7063 6f64 652d 696e 7665 7274 te-opcode-invert │ │ │ -000126e0: 2073 6574 7120 6279 7465 2d63 6f6d 7069 setq byte-compi │ │ │ -000126f0: 6c65 2d73 6574 7120 7365 742d 6465 6661 le-setq set-defa │ │ │ -00012700: 756c 7420 6279 7465 2d63 6f6d 7069 6c65 ult byte-compile │ │ │ -00012710: 2d73 6574 2d64 6566 6175 6c74 2073 6574 -set-default set │ │ │ -00012720: 712d 6465 6661 756c 7420 6279 7465 2d63 q-default byte-c │ │ │ -00012730: 6f6d 7069 6c65 2d73 6574 712d 6465 6661 ompile-setq-defa │ │ │ -00012740: 756c 7420 7175 6f74 6520 6279 7465 2d63 ult quote byte-c │ │ │ -00012750: 6f6d 7069 6c65 2d71 756f 7465 2071 756f ompile-quote quo │ │ │ -00012760: 7465 2d66 6f72 6d20 6279 7465 2d63 6f6d te-form byte-com │ │ │ -00012770: 7069 6c65 2d71 756f 7465 2d66 6f72 6d5d pile-quote-form] │ │ │ -00012780: 2034 290a 2864 6566 616c 6961 7320 2762 4).(defalias 'b │ │ │ -00012790: 7974 652d 636f 6d70 696c 652d 7365 7471 yte-compile-setq │ │ │ -000127a0: 2023 5b28 666f 726d 2920 2208 41c5 8919 #[(form) ".A... │ │ │ -000127b0: 1b89 1cac 87c6 c55c 6e5c 2288 aaca 0cab .......\n\"..... │ │ │ -000127c0: c70c 8941 1440 130c ac8b c6c7 c80b 4444 ...A.@........DD │ │ │ -000127d0: 5c6e 5c22 88aa 690c 8941 1440 11c9 0b21 \n\"..i..A.@...! │ │ │ -000127e0: ab92 c6c7 c80b 4409 450c ab83 caaa 815c ......D.E......\ │ │ │ -000127f0: 6e5c 2288 aa4c c609 2188 0cac 885c 6eac n\"..L..!....\n. │ │ │ -00012800: 85cb cccd 5c22 88ce cf0b 5c22 88aa 362b ....\"....\"..6+ │ │ │ -00012810: c589 1287 2220 5b66 6f72 6d20 7661 6c20 ...." [form val │ │ │ -00012820: 666f 722d 6566 6665 6374 2076 6172 2061 for-effect var a │ │ │ -00012830: 7267 7320 6e69 6c20 6279 7465 2d63 6f6d rgs nil byte-com │ │ │ -00012840: 7069 6c65 2d66 6f72 6d20 7365 7420 7175 pile-form set qu │ │ │ -00012850: 6f74 6520 6b65 7977 6f72 6470 2074 2062 ote keywordp t b │ │ │ -00012860: 7974 652d 636f 6d70 696c 652d 6f75 7420 yte-compile-out │ │ │ -00012870: 6279 7465 2d64 7570 2030 2062 7974 652d byte-dup 0 byte- │ │ │ -00012880: 636f 6d70 696c 652d 7661 7269 6162 6c65 compile-variable │ │ │ -00012890: 2d72 6566 2062 7974 652d 7661 7273 6574 -ref byte-varset │ │ │ -000128a0: 5d20 355d 290a 2864 6566 616c 6961 7320 ] 5]).(defalias │ │ │ -000128b0: 2762 7974 652d 636f 6d70 696c 652d 7365 'byte-compile-se │ │ │ -000128c0: 7420 235b 2866 6f72 6d29 2022 5c6e 4140 t #[(form) "\nA@ │ │ │ -000128d0: c45c 6e38 c51b 1819 5c6e 47c6 55ab a7c7 .\n8....\nG.U... │ │ │ -000128e0: 0921 c455 aba0 0940 c861 ab9a 0941 4089 .!.U...@.a...A@. │ │ │ -000128f0: 1339 ab92 c90b 21ac 8d0b ca73 ac88 cbcc .9....!....s.... │ │ │ -00012900: 0b08 4521 aa83 cd5c 6e21 2b87 2220 5b76 ..E!...\n!+." [v │ │ │ -00012910: 616c 666f 726d 2073 796d 666f 726d 2066 alform symform f │ │ │ -00012920: 6f72 6d20 7379 6d20 3220 6e69 6c20 3320 orm sym 2 nil 3 │ │ │ -00012930: 7361 6665 2d6c 656e 6774 6820 7175 6f74 safe-length quot │ │ │ -00012940: 6520 6b65 7977 6f72 6470 2028 6e69 6c20 e keywordp (nil │ │ │ -00012950: 7429 2062 7974 652d 636f 6d70 696c 652d t) byte-compile- │ │ │ -00012960: 7365 7471 2073 6574 7120 6279 7465 2d63 setq setq byte-c │ │ │ -00012970: 6f6d 7069 6c65 2d74 776f 2d61 7267 735d ompile-two-args] │ │ │ -00012980: 2034 5d29 0a28 6465 6661 6c69 6173 2027 4]).(defalias ' │ │ │ -00012990: 6279 7465 2d63 6f6d 7069 6c65 2d73 6574 byte-compile-set │ │ │ -000129a0: 712d 6465 6661 756c 7420 235b 2866 6f72 q-default #[(for │ │ │ -000129b0: 6d29 2022 0841 891a ac87 c3c4 095c 2288 m) ".A.......\". │ │ │ -000129c0: aaa2 5c6e ab9f c3c5 c65c 6e89 4112 4044 ..\n.....\n.A.@D │ │ │ -000129d0: 5c6e ad86 5c6e 8941 1240 4342 425c 6eab \n..\n.A.@CBB\n. │ │ │ -000129e0: 83c7 aa81 095c 2288 aa5e 29c4 8911 8722 .....\"..^)...." │ │ │ -000129f0: 205b 666f 726d 2066 6f72 2d65 6666 6563 [form for-effec │ │ │ -00012a00: 7420 6172 6773 2062 7974 652d 636f 6d70 t args byte-comp │ │ │ -00012a10: 696c 652d 666f 726d 206e 696c 2073 6574 ile-form nil set │ │ │ -00012a20: 2d64 6566 6175 6c74 2071 756f 7465 2074 -default quote t │ │ │ -00012a30: 5d20 365d 290a 2864 6566 616c 6961 7320 ] 6]).(defalias │ │ │ -00012a40: 2762 7974 652d 636f 6d70 696c 652d 7365 'byte-compile-se │ │ │ -00012a50: 742d 6465 6661 756c 7420 235b 2866 6f72 t-default #[(for │ │ │ -00012a60: 6d29 2022 0b41 8918 471e 1508 401c c60c m) ".A..G...@... │ │ │ -00012a70: 21c7 55ab d60c 40c8 61ab d00c 4140 891d !.U...@.a...A@.. │ │ │ -00012a80: 39ac 87c9 ca0d 5c22 88aa c0cb 0d21 ac85 9.....\".....!.. │ │ │ -00012a90: 0dcc 73ab 87c9 cd0d 5c22 88aa af0d 0e16 ..s.....\"...... │ │ │ -00012aa0: b789 1aad 8b5c 6ece 5c6e 410e 175c 22a1 .....\n.\nA..\". │ │ │ -00012ab0: ad81 cf29 ac99 d00d 21ac 94d1 0e18 73ab ...)....!.....s. │ │ │ -00012ac0: 8e0d 0973 ac89 c9d2 0d5c 2288 0d09 4211 ...s.....\"...B. │ │ │ -00012ad0: 290e 15c7 55ab 85d3 0b21 aa84 d40b c75c )...U....!.....\ │ │ │ -00012ae0: 222b 8722 205b 6172 6773 2062 7974 652d "+." [args byte- │ │ │ -00012af0: 636f 6d70 696c 652d 6672 6565 2d61 7373 compile-free-ass │ │ │ -00012b00: 6967 6e6d 656e 7473 2063 656c 6c20 666f ignments cell fo │ │ │ -00012b10: 726d 2076 6172 2073 796d 2073 6166 652d rm var sym safe- │ │ │ -00012b20: 6c65 6e67 7468 2032 2071 756f 7465 2062 length 2 quote b │ │ │ -00012b30: 7974 652d 636f 6d70 696c 652d 7761 726e yte-compile-warn │ │ │ -00012b40: 2022 4174 7465 6d70 7420 746f 2073 6574 "Attempt to set │ │ │ -00012b50: 2d67 6c6f 6261 6c6c 7920 6e6f 6e2d 7379 -globally non-sy │ │ │ -00012b60: 6d62 6f6c 2025 7322 206b 6579 776f 7264 mbol %s" keyword │ │ │ -00012b70: 7020 286e 696c 2074 2920 2241 7474 656d p (nil t) "Attem │ │ │ -00012b80: 7074 2074 6f20 7365 742d 676c 6f62 616c pt to set-global │ │ │ -00012b90: 6c79 2063 6f6e 7374 616e 7420 7379 6d62 ly constant symb │ │ │ -00012ba0: 6f6c 2025 7322 206c 6f67 696f 7220 7420 ol %s" logior t │ │ │ -00012bb0: 676c 6f62 616c 6c79 2d62 6f75 6e64 7020 globally-boundp │ │ │ -00012bc0: 6672 6565 2d76 6172 7320 2261 7373 6967 free-vars "assig │ │ │ -00012bd0: 6e6d 656e 7420 746f 2066 7265 6520 7661 nment to free va │ │ │ -00012be0: 7269 6162 6c65 2025 7322 2062 7974 652d riable %s" byte- │ │ │ -00012bf0: 636f 6d70 696c 652d 6e6f 726d 616c 2d63 compile-normal-c │ │ │ -00012c00: 616c 6c20 6279 7465 2d63 6f6d 7069 6c65 all byte-compile │ │ │ -00012c10: 2d73 7562 722d 7772 6f6e 672d 6172 6773 -subr-wrong-args │ │ │ -00012c20: 206e 6172 6773 2062 7974 652d 636f 6d70 nargs byte-comp │ │ │ -00012c30: 696c 652d 626f 756e 642d 7661 7269 6162 ile-bound-variab │ │ │ -00012c40: 6c65 7320 6279 7465 2d63 6f6d 7069 6c65 les byte-compile │ │ │ -00012c50: 2d61 7373 6967 6e65 642d 6269 7420 6279 -assigned-bit by │ │ │ -00012c60: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e69 te-compile-warni │ │ │ -00012c70: 6e67 735d 2035 5d29 0a28 6465 6661 6c69 ngs] 5]).(defali │ │ │ -00012c80: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ -00012c90: 2d71 756f 7465 2023 5b28 666f 726d 2920 -quote #[(form) │ │ │ -00012ca0: 22c1 0841 4021 8722 205b 666f 726d 2062 "..A@!." [form b │ │ │ -00012cb0: 7974 652d 636f 6d70 696c 652d 636f 6e73 yte-compile-cons │ │ │ -00012cc0: 7461 6e74 5d20 325d 290a 2864 6566 616c tant] 2]).(defal │ │ │ -00012cd0: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ -00012ce0: 652d 7175 6f74 652d 666f 726d 2023 5b28 e-quote-form #[( │ │ │ -00012cf0: 666f 726d 2920 22c1 c208 4140 2121 8722 form) "...A@!!." │ │ │ -00012d00: 205b 666f 726d 2062 7974 652d 636f 6d70 [form byte-comp │ │ │ -00012d10: 696c 652d 636f 6e73 7461 6e74 2062 7974 ile-constant byt │ │ │ -00012d20: 652d 636f 6d70 696c 652d 746f 702d 6c65 e-compile-top-le │ │ │ -00012d30: 7665 6c5d 2033 5d29 0a28 6465 6661 6c69 vel] 3]).(defali │ │ │ -00012d40: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ -00012d50: 2d62 6f64 7920 235b 2862 6f64 7920 266f -body #[(body &o │ │ │ -00012d60: 7074 696f 6e61 6c20 666f 722d 6566 6665 ptional for-effe │ │ │ -00012d70: 6374 2920 2209 41ab 8cc2 0940 c35c 2288 ct) ".A....@.\". │ │ │ -00012d80: 0941 8911 aa71 c209 4008 5c22 8722 205b .A...q..@.\"." [ │ │ │ -00012d90: 666f 722d 6566 6665 6374 2062 6f64 7920 for-effect body │ │ │ -00012da0: 6279 7465 2d63 6f6d 7069 6c65 2d66 6f72 byte-compile-for │ │ │ -00012db0: 6d20 745d 2034 5d29 0a28 6279 7465 2d63 m t] 4]).(byte-c │ │ │ -00012dc0: 6f64 6520 22c0 c14e c273 ac85 c3c4 c05c ode "..N.s.....\ │ │ │ -00012dd0: 2288 c5c0 c1c6 2387 2220 5b62 7974 652d ".....#." [byte- │ │ │ -00012de0: 636f 6d70 696c 652d 626f 6479 2d64 6f2d compile-body-do- │ │ │ -00012df0: 6566 6665 6374 2062 7974 652d 6f70 7469 effect byte-opti │ │ │ -00012e00: 6d69 7a65 7220 286e 696c 2062 7974 652d mizer (nil byte- │ │ │ -00012e10: 636f 6d70 696c 652d 696e 6c69 6e65 2d65 compile-inline-e │ │ │ -00012e20: 7870 616e 6429 2065 7272 6f72 2022 2573 xpand) error "%s │ │ │ -00012e30: 2061 6c72 6561 6479 2068 6173 2061 2062 already has a b │ │ │ -00012e40: 7974 652d 6f70 7469 6d69 7a65 722c 2063 yte-optimizer, c │ │ │ -00012e50: 616e 2774 206d 616b 6520 6974 2069 6e6c an't make it inl │ │ │ -00012e60: 696e 6522 2070 7574 2062 7974 652d 636f ine" put byte-co │ │ │ -00012e70: 6d70 696c 652d 696e 6c69 6e65 2d65 7870 mpile-inline-exp │ │ │ -00012e80: 616e 645d 2034 290a 2864 6566 616c 6961 and] 4).(defalia │ │ │ -00012e90: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ -00012ea0: 626f 6479 2d64 6f2d 6566 6665 6374 2023 body-do-effect # │ │ │ -00012eb0: 5b28 626f 6479 2920 22c2 0809 5c22 88c3 [(body) "...\".. │ │ │ -00012ec0: 8911 8722 205b 626f 6479 2066 6f72 2d65 ..." [body for-e │ │ │ -00012ed0: 6666 6563 7420 6279 7465 2d63 6f6d 7069 ffect byte-compi │ │ │ -00012ee0: 6c65 2d62 6f64 7920 6e69 6c5d 2033 5d29 le-body nil] 3]) │ │ │ -00012ef0: 0a28 6279 7465 2d63 6f64 6520 22c0 c14e .(byte-code "..N │ │ │ -00012f00: c273 ac85 c3c4 c05c 2288 c5c0 c1c6 2387 .s.....\".....#. │ │ │ -00012f10: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ -00012f20: 666f 726d 2d64 6f2d 6566 6665 6374 2062 form-do-effect b │ │ │ -00012f30: 7974 652d 6f70 7469 6d69 7a65 7220 286e yte-optimizer (n │ │ │ -00012f40: 696c 2062 7974 652d 636f 6d70 696c 652d il byte-compile- │ │ │ -00012f50: 696e 6c69 6e65 2d65 7870 616e 6429 2065 inline-expand) e │ │ │ -00012f60: 7272 6f72 2022 2573 2061 6c72 6561 6479 rror "%s already │ │ │ -00012f70: 2068 6173 2061 2062 7974 652d 6f70 7469 has a byte-opti │ │ │ -00012f80: 6d69 7a65 722c 2063 616e 2774 206d 616b mizer, can't mak │ │ │ -00012f90: 6520 6974 2069 6e6c 696e 6522 2070 7574 e it inline" put │ │ │ -00012fa0: 2062 7974 652d 636f 6d70 696c 652d 696e byte-compile-in │ │ │ -00012fb0: 6c69 6e65 2d65 7870 616e 645d 2034 290a line-expand] 4). │ │ │ -00012fc0: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -00012fd0: 636f 6d70 696c 652d 666f 726d 2d64 6f2d compile-form-do- │ │ │ -00012fe0: 6566 6665 6374 2023 5b28 666f 726d 2920 effect #[(form) │ │ │ -00012ff0: 22c2 0809 5c22 88c3 8911 8722 205b 666f "...\"....." [fo │ │ │ -00013000: 726d 2066 6f72 2d65 6666 6563 7420 6279 rm for-effect by │ │ │ -00013010: 7465 2d63 6f6d 7069 6c65 2d66 6f72 6d20 te-compile-form │ │ │ -00013020: 6e69 6c5d 2033 5d29 0a28 6279 7465 2d63 nil] 3]).(byte-c │ │ │ -00013030: 6f64 6520 22c0 c1c2 c323 88c0 c4c2 c323 ode "....#.....# │ │ │ -00013040: 88c0 c5c2 c623 88c0 c7c2 c823 88c0 c9c2 .....#.....#.... │ │ │ -00013050: ca23 88c0 cbc2 cc23 88c0 cdc2 ce23 88c0 .#.....#.....#.. │ │ │ -00013060: cfc2 d023 88c0 d1c2 d223 88c0 d3c2 d423 ...#.....#.....# │ │ │ -00013070: 88c0 d5c2 d623 88c0 d7c2 d623 88c0 d8c2 .....#.....#.... │ │ │ -00013080: d623 88c0 d9c2 d623 88c0 dac2 db23 88c0 .#.....#.....#.. │ │ │ -00013090: dcc2 dd23 8722 205b 7075 7420 696e 6c69 ...#." [put inli │ │ │ -000130a0: 6e65 2062 7974 652d 636f 6d70 696c 6520 ne byte-compile │ │ │ -000130b0: 6279 7465 2d63 6f6d 7069 6c65 2d70 726f byte-compile-pro │ │ │ -000130c0: 676e 2070 726f 676e 2070 726f 6731 2062 gn progn prog1 b │ │ │ -000130d0: 7974 652d 636f 6d70 696c 652d 7072 6f67 yte-compile-prog │ │ │ -000130e0: 3120 7072 6f67 3220 6279 7465 2d63 6f6d 1 prog2 byte-com │ │ │ -000130f0: 7069 6c65 2d70 726f 6732 2069 6620 6279 pile-prog2 if by │ │ │ -00013100: 7465 2d63 6f6d 7069 6c65 2d69 6620 636f te-compile-if co │ │ │ -00013110: 6e64 2062 7974 652d 636f 6d70 696c 652d nd byte-compile- │ │ │ -00013120: 636f 6e64 2061 6e64 2062 7974 652d 636f cond and byte-co │ │ │ -00013130: 6d70 696c 652d 616e 6420 6f72 2062 7974 mpile-and or byt │ │ │ -00013140: 652d 636f 6d70 696c 652d 6f72 2077 6869 e-compile-or whi │ │ │ -00013150: 6c65 2062 7974 652d 636f 6d70 696c 652d le byte-compile- │ │ │ -00013160: 7768 696c 6520 6675 6e63 616c 6c20 6279 while funcall by │ │ │ -00013170: 7465 2d63 6f6d 7069 6c65 2d66 756e 6361 te-compile-funca │ │ │ -00013180: 6c6c 2061 7070 6c79 2062 7974 652d 636f ll apply byte-co │ │ │ -00013190: 6d70 696c 652d 6675 6e61 7267 206d 6170 mpile-funarg map │ │ │ -000131a0: 6361 7220 6d61 7061 746f 6d73 206d 6170 car mapatoms map │ │ │ -000131b0: 636f 6e63 6174 206c 6574 2062 7974 652d concat let byte- │ │ │ -000131c0: 636f 6d70 696c 652d 6c65 7420 6c65 742a compile-let let* │ │ │ -000131d0: 2062 7974 652d 636f 6d70 696c 652d 6c65 byte-compile-le │ │ │ -000131e0: 742a 5d20 3429 0a28 6465 6661 6c69 6173 t*] 4).(defalias │ │ │ -000131f0: 2027 6279 7465 2d63 6f6d 7069 6c65 2d70 'byte-compile-p │ │ │ -00013200: 726f 676e 2023 5b28 666f 726d 2920 2208 rogn #[(form) ". │ │ │ -00013210: 411a c35c 6e09 5c22 88c4 8911 2987 2220 A..\n.\"....)." │ │ │ -00013220: 5b66 6f72 6d20 666f 722d 6566 6665 6374 [form for-effect │ │ │ -00013230: 2062 6f64 7920 6279 7465 2d63 6f6d 7069 body byte-compi │ │ │ -00013240: 6c65 2d62 6f64 7920 6e69 6c5d 2033 5d29 le-body nil] 3]) │ │ │ -00013250: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -00013260: 2d63 6f6d 7069 6c65 2d70 726f 6731 2023 -compile-prog1 # │ │ │ -00013270: 5b28 666f 726d 2920 2209 4189 1189 4111 [(form) ".A...A. │ │ │ -00013280: 4019 c209 085c 2288 c310 29c4 09c5 5c22 @....\"...)...\" │ │ │ -00013290: 8722 205b 666f 722d 6566 6665 6374 2066 ." [for-effect f │ │ │ -000132a0: 6f72 6d20 6279 7465 2d63 6f6d 7069 6c65 orm byte-compile │ │ │ -000132b0: 2d66 6f72 6d20 6e69 6c20 6279 7465 2d63 -form nil byte-c │ │ │ -000132c0: 6f6d 7069 6c65 2d62 6f64 7920 745d 2034 ompile-body t] 4 │ │ │ -000132d0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -000132e0: 7465 2d63 6f6d 7069 6c65 2d70 726f 6732 te-compile-prog2 │ │ │ -000132f0: 2023 5b28 666f 726d 2920 2209 4111 c209 #[(form) ".A... │ │ │ -00013300: 8941 1140 c35c 2288 0989 4111 4019 c209 .A.@.\"...A.@... │ │ │ -00013310: 085c 2288 c410 29c5 09c3 5c22 8722 205b .\"...)...\"." [ │ │ │ -00013320: 666f 722d 6566 6665 6374 2066 6f72 6d20 for-effect form │ │ │ -00013330: 6279 7465 2d63 6f6d 7069 6c65 2d66 6f72 byte-compile-for │ │ │ -00013340: 6d20 7420 6e69 6c20 6279 7465 2d63 6f6d m t nil byte-com │ │ │ -00013350: 7069 6c65 2d62 6f64 795d 2033 5d29 0a28 pile-body] 3]).( │ │ │ -00013360: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ -00013370: 6f6d 7069 6c65 2d67 6f74 6f2d 6966 2027 ompile-goto-if ' │ │ │ -00013380: 286d 6163 726f 202e 2023 5b28 636f 6e64 (macro . #[(cond │ │ │ -00013390: 2064 6973 6361 7264 2074 6167 2920 22c3 discard tag) ". │ │ │ -000133a0: c409 c45c 6ec5 4242 c45c 6ec6 4242 4608 ...\n.BB.\n.BBF. │ │ │ -000133b0: 4587 2220 5b74 6167 2063 6f6e 6420 6469 E." [tag cond di │ │ │ -000133c0: 7363 6172 6420 6279 7465 2d63 6f6d 7069 scard byte-compi │ │ │ -000133d0: 6c65 2d67 6f74 6f20 6966 2028 2762 7974 le-goto if ('byt │ │ │ -000133e0: 652d 676f 746f 2d69 662d 6e6f 742d 6e69 e-goto-if-not-ni │ │ │ -000133f0: 6c20 2762 7974 652d 676f 746f 2d69 662d l 'byte-goto-if- │ │ │ -00013400: 6e6f 742d 6e69 6c2d 656c 7365 2d70 6f70 not-nil-else-pop │ │ │ -00013410: 2920 2827 6279 7465 2d67 6f74 6f2d 6966 ) ('byte-goto-if │ │ │ -00013420: 2d6e 696c 2027 6279 7465 2d67 6f74 6f2d -nil 'byte-goto- │ │ │ -00013430: 6966 2d6e 696c 2d65 6c73 652d 706f 7029 if-nil-else-pop) │ │ │ -00013440: 5d20 375d 2929 0a28 6465 6661 6c69 6173 ] 7])).(defalias │ │ │ -00013450: 2027 6279 7465 2d63 6f6d 7069 6c65 2d69 'byte-compile-i │ │ │ -00013460: 6620 235b 2866 6f72 6d29 2022 c45c 6e41 f #[(form) ".\nA │ │ │ -00013470: 4021 88c5 5c6e 9bac 9cc6 201b c709 ab83 @!..\n.... ..... │ │ │ -00013480: c8aa 81c9 0b5c 2288 c4ca 5c6e 3809 5c22 .....\"...\n8.\" │ │ │ -00013490: 88cb 0b21 8829 aaa8 c620 c620 181b c7c8 ...!.)... . .... │ │ │ -000134a0: 085c 2288 c4ca 5c6e 3809 5c22 88c7 cc0b .\"...\n8.\".... │ │ │ -000134b0: 5c22 88cb 0821 88cd 5c6e 4141 4109 5c22 \"...!..\nAAA.\" │ │ │ -000134c0: 88cb 0b21 882a ce89 1187 2220 5b65 6c73 ...!.*...." [els │ │ │ -000134d0: 6574 6167 2066 6f72 2d65 6666 6563 7420 etag for-effect │ │ │ -000134e0: 666f 726d 2064 6f6e 6574 6167 2062 7974 form donetag byt │ │ │ -000134f0: 652d 636f 6d70 696c 652d 666f 726d 2033 e-compile-form 3 │ │ │ -00013500: 2062 7974 652d 636f 6d70 696c 652d 6d61 byte-compile-ma │ │ │ -00013510: 6b65 2d74 6167 2062 7974 652d 636f 6d70 ke-tag byte-comp │ │ │ -00013520: 696c 652d 676f 746f 2062 7974 652d 676f ile-goto byte-go │ │ │ -00013530: 746f 2d69 662d 6e69 6c20 6279 7465 2d67 to-if-nil byte-g │ │ │ -00013540: 6f74 6f2d 6966 2d6e 696c 2d65 6c73 652d oto-if-nil-else- │ │ │ -00013550: 706f 7020 3220 6279 7465 2d63 6f6d 7069 pop 2 byte-compi │ │ │ -00013560: 6c65 2d6f 7574 2d74 6167 2062 7974 652d le-out-tag byte- │ │ │ -00013570: 676f 746f 2062 7974 652d 636f 6d70 696c goto byte-compil │ │ │ -00013580: 652d 626f 6479 206e 696c 5d20 335d 290a e-body nil] 3]). │ │ │ -00013590: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -000135a0: 636f 6d70 696c 652d 636f 6e64 2023 5b28 compile-cond #[( │ │ │ -000135b0: 636c 6175 7365 7329 2022 c620 c789 1d19 clauses) ". .... │ │ │ -000135c0: 1c0b 4189 13ab d20b 4089 1540 c861 ac8d ..A.....@..@.a.. │ │ │ -000135d0: 0d40 a2c9 61ab 8f0d 40a3 a2ab 89c8 0d42 .@..a...@......B │ │ │ -000135e0: 15c7 8913 aa5c 5c0b 41ab 57ca 0d40 2188 .....\\.A.W..@!. │ │ │ -000135f0: 0d41 ac8d cb5c 6eab 83cc aa81 cd0c 5c22 .A...\n.......\" │ │ │ -00013600: 88aa 41c6 2011 cbce 095c 2288 cf0d 415c ..A. ....\"...A\ │ │ │ -00013610: 6e5c 2288 cbd0 0c5c 2288 d109 2188 aa28 n\"....\"...!..( │ │ │ -00013620: 0d41 ab99 0d40 c861 ac93 ca0d 4021 88cb .A...@.a....@!.. │ │ │ -00013630: 5c6e ab83 ceaa 81d2 0c5c 2288 0d41 150d \n.......\"..A.. │ │ │ -00013640: 18cf 085c 6e5c 2288 c712 29d1 0c21 2b87 ...\n\"...)..!+. │ │ │ -00013650: 2220 5b62 6f64 7920 6e65 7874 7461 6720 " [body nexttag │ │ │ -00013660: 666f 722d 6566 6665 6374 2063 6c61 7573 for-effect claus │ │ │ -00013670: 6573 2064 6f6e 6574 6167 2063 6c61 7573 es donetag claus │ │ │ -00013680: 6520 6279 7465 2d63 6f6d 7069 6c65 2d6d e byte-compile-m │ │ │ -00013690: 616b 652d 7461 6720 6e69 6c20 7420 7175 ake-tag nil t qu │ │ │ -000136a0: 6f74 6520 6279 7465 2d63 6f6d 7069 6c65 ote byte-compile │ │ │ -000136b0: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ -000136c0: 6c65 2d67 6f74 6f20 6279 7465 2d67 6f74 le-goto byte-got │ │ │ -000136d0: 6f2d 6966 2d6e 6f74 2d6e 696c 2062 7974 o-if-not-nil byt │ │ │ -000136e0: 652d 676f 746f 2d69 662d 6e6f 742d 6e69 e-goto-if-not-ni │ │ │ -000136f0: 6c2d 656c 7365 2d70 6f70 2062 7974 652d l-else-pop byte- │ │ │ -00013700: 676f 746f 2d69 662d 6e69 6c20 6279 7465 goto-if-nil byte │ │ │ -00013710: 2d63 6f6d 7069 6c65 2d62 6f64 7920 6279 -compile-body by │ │ │ -00013720: 7465 2d67 6f74 6f20 6279 7465 2d63 6f6d te-goto byte-com │ │ │ -00013730: 7069 6c65 2d6f 7574 2d74 6167 2062 7974 pile-out-tag byt │ │ │ -00013740: 652d 676f 746f 2d69 662d 6e69 6c2d 656c e-goto-if-nil-el │ │ │ -00013750: 7365 2d70 6f70 5d20 345d 290a 2864 6566 se-pop] 4]).(def │ │ │ -00013760: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ -00013770: 696c 652d 616e 6420 235b 2866 6f72 6d29 ile-and #[(form) │ │ │ -00013780: 2022 c420 5c6e 411b 180b ac8d c51a c65c ". \nA........\ │ │ │ -00013790: 6e09 5c22 88c7 8911 29aa a80b 41ab 96c6 n.\"....)...A... │ │ │ -000137a0: 0b40 2188 c809 ab83 c9aa 81ca 085c 2288 .@!..........\". │ │ │ -000137b0: 0b41 8913 aa67 0b40 1ac6 5c6e 095c 2288 .A...g.@..\n.\". │ │ │ -000137c0: c711 29cb 0821 2a87 2220 5b66 6169 6c74 ..)..!*." [failt │ │ │ -000137d0: 6167 2066 6f72 2d65 6666 6563 7420 666f ag for-effect fo │ │ │ -000137e0: 726d 2061 7267 7320 6279 7465 2d63 6f6d rm args byte-com │ │ │ -000137f0: 7069 6c65 2d6d 616b 652d 7461 6720 7420 pile-make-tag t │ │ │ -00013800: 6279 7465 2d63 6f6d 7069 6c65 2d66 6f72 byte-compile-for │ │ │ -00013810: 6d20 6e69 6c20 6279 7465 2d63 6f6d 7069 m nil byte-compi │ │ │ -00013820: 6c65 2d67 6f74 6f20 6279 7465 2d67 6f74 le-goto byte-got │ │ │ -00013830: 6f2d 6966 2d6e 696c 2062 7974 652d 676f o-if-nil byte-go │ │ │ -00013840: 746f 2d69 662d 6e69 6c2d 656c 7365 2d70 to-if-nil-else-p │ │ │ -00013850: 6f70 2062 7974 652d 636f 6d70 696c 652d op byte-compile- │ │ │ -00013860: 6f75 742d 7461 675d 2034 5d29 0a28 6465 out-tag] 4]).(de │ │ │ -00013870: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -00013880: 7069 6c65 2d6f 7220 235b 2866 6f72 6d29 pile-or #[(form) │ │ │ -00013890: 2022 c420 5c6e 411b 180b ac8d c51a c65c ". \nA........\ │ │ │ -000138a0: 6e09 5c22 88c5 8911 29aa a80b 41ab 96c6 n.\"....)...A... │ │ │ -000138b0: 0b40 2188 c709 ab83 c8aa 81c9 085c 2288 .@!..........\". │ │ │ -000138c0: 0b41 8913 aa67 0b40 1ac6 5c6e 095c 2288 .A...g.@..\n.\". │ │ │ -000138d0: c511 29ca 0821 2a87 2220 5b77 696e 7461 ..)..!*." [winta │ │ │ -000138e0: 6720 666f 722d 6566 6665 6374 2066 6f72 g for-effect for │ │ │ -000138f0: 6d20 6172 6773 2062 7974 652d 636f 6d70 m args byte-comp │ │ │ -00013900: 696c 652d 6d61 6b65 2d74 6167 206e 696c ile-make-tag nil │ │ │ -00013910: 2062 7974 652d 636f 6d70 696c 652d 666f byte-compile-fo │ │ │ -00013920: 726d 2062 7974 652d 636f 6d70 696c 652d rm byte-compile- │ │ │ -00013930: 676f 746f 2062 7974 652d 676f 746f 2d69 goto byte-goto-i │ │ │ -00013940: 662d 6e6f 742d 6e69 6c20 6279 7465 2d67 f-not-nil byte-g │ │ │ -00013950: 6f74 6f2d 6966 2d6e 6f74 2d6e 696c 2d65 oto-if-not-nil-e │ │ │ -00013960: 6c73 652d 706f 7020 6279 7465 2d63 6f6d lse-pop byte-com │ │ │ -00013970: 7069 6c65 2d6f 7574 2d74 6167 5d20 345d pile-out-tag] 4] │ │ │ -00013980: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -00013990: 652d 636f 6d70 696c 652d 7768 696c 6520 e-compile-while │ │ │ -000139a0: 235b 2866 6f72 6d29 2022 c420 c420 1b1a #[(form) ". . .. │ │ │ -000139b0: c50b 2188 c609 4140 2188 c708 ab83 c8aa ..!...A@!....... │ │ │ -000139c0: 81c9 5c6e 5c22 88ca 0941 41cb 5c22 88c7 ..\n\"...AA.\".. │ │ │ -000139d0: cc0b 5c22 88c5 5c6e 2188 cd89 102a 8722 ..\"..\n!....*." │ │ │ -000139e0: 205b 666f 722d 6566 6665 6374 2066 6f72 [for-effect for │ │ │ -000139f0: 6d20 656e 6474 6167 206c 6f6f 7074 6167 m endtag looptag │ │ │ -00013a00: 2062 7974 652d 636f 6d70 696c 652d 6d61 byte-compile-ma │ │ │ -00013a10: 6b65 2d74 6167 2062 7974 652d 636f 6d70 ke-tag byte-comp │ │ │ -00013a20: 696c 652d 6f75 742d 7461 6720 6279 7465 ile-out-tag byte │ │ │ -00013a30: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6279 -compile-form by │ │ │ -00013a40: 7465 2d63 6f6d 7069 6c65 2d67 6f74 6f20 te-compile-goto │ │ │ -00013a50: 6279 7465 2d67 6f74 6f2d 6966 2d6e 696c byte-goto-if-nil │ │ │ -00013a60: 2062 7974 652d 676f 746f 2d69 662d 6e69 byte-goto-if-ni │ │ │ -00013a70: 6c2d 656c 7365 2d70 6f70 2062 7974 652d l-else-pop byte- │ │ │ -00013a80: 636f 6d70 696c 652d 626f 6479 2074 2062 compile-body t b │ │ │ -00013a90: 7974 652d 676f 746f 206e 696c 5d20 335d yte-goto nil] 3] │ │ │ -00013aa0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ -00013ab0: 652d 636f 6d70 696c 652d 6675 6e63 616c e-compile-funcal │ │ │ -00013ac0: 6c20 235b 2866 6f72 6d29 2022 c1c2 0841 l #[(form) "...A │ │ │ -00013ad0: 5c22 88c3 c408 4141 475c 2287 2220 5b66 \"....AAG\"." [f │ │ │ -00013ae0: 6f72 6d20 6d61 7063 6172 2062 7974 652d orm mapcar byte- │ │ │ -00013af0: 636f 6d70 696c 652d 666f 726d 2062 7974 compile-form byt │ │ │ -00013b00: 652d 636f 6d70 696c 652d 6f75 7420 6279 e-compile-out by │ │ │ -00013b10: 7465 2d63 616c 6c5d 2033 5d29 0a28 6465 te-call] 3]).(de │ │ │ -00013b20: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -00013b30: 7069 6c65 2d6c 6574 2023 5b28 666f 726d pile-let #[(form │ │ │ -00013b40: 2920 220c 4140 891d ab98 0d40 3aab 89c6 ) ".A@.....@:... │ │ │ -00013b50: 0d40 4140 2188 aa84 c7c8 2188 0d41 8915 .@A@!.....!..A.. │ │ │ -00013b60: ac68 29c9 0b42 ca0c 4140 21cb 0c38 a2cc .h)..B..A@!..8.. │ │ │ -00013b70: 61ad 820e 141a 1d1b 0dab 97cd ce0d 403a a.............@: │ │ │ -00013b80: ab85 0d40 40aa 820d 405c 6e23 880d 4189 ...@@...@\n#..A. │ │ │ -00013b90: 15ac 690c 4141 19cf 0908 5c22 88c8 1029 ..i.AA....\"...) │ │ │ -00013ba0: d00e 1573 ab83 d120 88d2 d30c 4140 475c ...s... ....A@G\ │ │ │ -00013bb0: 222b 8722 205b 666f 722d 6566 6665 6374 "+." [for-effect │ │ │ -00013bc0: 2062 6f64 7920 6578 7472 612d 666c 6167 body extra-flag │ │ │ -00013bd0: 7320 6279 7465 2d63 6f6d 7069 6c65 2d62 s byte-compile-b │ │ │ -00013be0: 6f75 6e64 2d76 6172 6961 626c 6573 2066 ound-variables f │ │ │ -00013bf0: 6f72 6d20 7661 726c 6973 7420 6279 7465 orm varlist byte │ │ │ -00013c00: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6279 -compile-form by │ │ │ -00013c10: 7465 2d63 6f6d 7069 6c65 2d70 7573 682d te-compile-push- │ │ │ -00013c20: 636f 6e73 7461 6e74 206e 696c 206e 6577 constant nil new │ │ │ -00013c30: 2d73 636f 7065 2072 6576 6572 7365 2032 -scope reverse 2 │ │ │ -00013c40: 2062 7974 652d 636f 6465 2062 7974 652d byte-code byte- │ │ │ -00013c50: 636f 6d70 696c 652d 7661 7269 6162 6c65 compile-variable │ │ │ -00013c60: 2d72 6566 2062 7974 652d 7661 7262 696e -ref byte-varbin │ │ │ -00013c70: 6420 6279 7465 2d63 6f6d 7069 6c65 2d62 d byte-compile-b │ │ │ -00013c80: 6f64 7920 756e 7573 6564 2d76 6172 7320 ody unused-vars │ │ │ -00013c90: 6279 7465 2d63 6f6d 7069 6c65 2d77 6172 byte-compile-war │ │ │ -00013ca0: 6e2d 6162 6f75 742d 756e 7573 6564 2d76 n-about-unused-v │ │ │ -00013cb0: 6172 6961 626c 6573 2062 7974 652d 636f ariables byte-co │ │ │ -00013cc0: 6d70 696c 652d 6f75 7420 6279 7465 2d75 mpile-out byte-u │ │ │ -00013cd0: 6e62 696e 6420 6279 7465 2d63 6f6d 7069 nbind byte-compi │ │ │ -00013ce0: 6c65 2d61 7267 6c69 7374 2d62 6974 2062 le-arglist-bit b │ │ │ -00013cf0: 7974 652d 636f 6d70 696c 652d 7761 726e yte-compile-warn │ │ │ -00013d00: 696e 6773 5d20 355d 290a 2864 6566 616c ings] 5]).(defal │ │ │ -00013d10: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ -00013d20: 652d 6c65 742a 2023 5b28 666f 726d 2920 e-let* #[(form) │ │ │ -00013d30: 22c6 0b42 c70c 4140 211d 1b0d aba4 0d40 "..B..A@!......@ │ │ │ -00013d40: 3aac 86c8 c921 88aa 8dca 0d40 4140 2188 :....!.....@A@!. │ │ │ -00013d50: 0d89 4040 a088 cbcc 0d40 5c22 880d 4189 ..@@.....@\"..A. │ │ │ -00013d60: 15ac 5c5c 0c41 411a cd5c 6e09 5c22 88c9 ..\\.AA..\n.\".. │ │ │ -00013d70: 1129 ce08 73ab 83cf 2088 d0d1 0c41 4047 .)..s... ....A@G │ │ │ -00013d80: 5c22 2a87 2220 5b62 7974 652d 636f 6d70 \"*." [byte-comp │ │ │ -00013d90: 696c 652d 7761 726e 696e 6773 2066 6f72 ile-warnings for │ │ │ -00013da0: 2d65 6666 6563 7420 626f 6479 2062 7974 -effect body byt │ │ │ -00013db0: 652d 636f 6d70 696c 652d 626f 756e 642d e-compile-bound- │ │ │ -00013dc0: 7661 7269 6162 6c65 7320 666f 726d 2076 variables form v │ │ │ -00013dd0: 6172 6c69 7374 206e 6577 2d73 636f 7065 arlist new-scope │ │ │ -00013de0: 2063 6f70 792d 7365 7175 656e 6365 2062 copy-sequence b │ │ │ -00013df0: 7974 652d 636f 6d70 696c 652d 7075 7368 yte-compile-push │ │ │ -00013e00: 2d63 6f6e 7374 616e 7420 6e69 6c20 6279 -constant nil by │ │ │ -00013e10: 7465 2d63 6f6d 7069 6c65 2d66 6f72 6d20 te-compile-form │ │ │ -00013e20: 6279 7465 2d63 6f6d 7069 6c65 2d76 6172 byte-compile-var │ │ │ -00013e30: 6961 626c 652d 7265 6620 6279 7465 2d76 iable-ref byte-v │ │ │ -00013e40: 6172 6269 6e64 2062 7974 652d 636f 6d70 arbind byte-comp │ │ │ -00013e50: 696c 652d 626f 6479 2075 6e75 7365 642d ile-body unused- │ │ │ -00013e60: 7661 7273 2062 7974 652d 636f 6d70 696c vars byte-compil │ │ │ -00013e70: 652d 7761 726e 2d61 626f 7574 2d75 6e75 e-warn-about-unu │ │ │ -00013e80: 7365 642d 7661 7269 6162 6c65 7320 6279 sed-variables by │ │ │ -00013e90: 7465 2d63 6f6d 7069 6c65 2d6f 7574 2062 te-compile-out b │ │ │ -00013ea0: 7974 652d 756e 6269 6e64 5d20 345d 290a yte-unbind] 4]). │ │ │ -00013eb0: 2862 7974 652d 636f 6465 2022 c0c1 c2c3 (byte-code ".... │ │ │ -00013ec0: 2388 c0c4 c2c3 2388 c0c1 c5c6 2388 c0c4 #.....#.....#... │ │ │ -00013ed0: c5c7 2387 2220 5b70 7574 2061 746f 6d20 ..#." [put atom │ │ │ -00013ee0: 6279 7465 2d63 6f6d 7069 6c65 2062 7974 byte-compile byt │ │ │ -00013ef0: 652d 636f 6d70 696c 652d 6e65 6761 7465 e-compile-negate │ │ │ -00013f00: 6420 6e6c 6973 7470 2062 7974 652d 636f d nlistp byte-co │ │ │ -00013f10: 6d70 696c 652d 6e65 6761 7465 642d 6f70 mpile-negated-op │ │ │ -00013f20: 2063 6f6e 7370 206c 6973 7470 5d20 3429 consp listp] 4) │ │ │ -00013f30: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ -00013f40: 2d63 6f6d 7069 6c65 2d6e 6567 6174 6564 -compile-negated │ │ │ -00013f50: 2023 5b28 666f 726d 2920 22c2 0921 19c3 #[(form) "..!.. │ │ │ -00013f60: 0908 5c22 88c4 8910 2987 2220 5b66 6f72 ..\"....)." [for │ │ │ -00013f70: 2d65 6666 6563 7420 666f 726d 2062 7974 -effect form byt │ │ │ -00013f80: 652d 636f 6d70 696c 652d 6e65 6761 7469 e-compile-negati │ │ │ -00013f90: 6f6e 2d6f 7074 696d 697a 6572 2062 7974 on-optimizer byt │ │ │ -00013fa0: 652d 636f 6d70 696c 652d 666f 726d 206e e-compile-form n │ │ │ -00013fb0: 696c 5d20 335d 290a 2864 6566 616c 6961 il] 3]).(defalia │ │ │ -00013fc0: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ -00013fd0: 6e65 6761 7469 6f6e 2d6f 7074 696d 697a negation-optimiz │ │ │ -00013fe0: 6572 2023 5b28 666f 726d 2920 22c1 0840 er #[(form) "..@ │ │ │ -00013ff0: c24e ae85 c3c4 0840 5c22 0841 4244 8722 .N.....@\".ABD." │ │ │ -00014000: 205b 666f 726d 206e 6f74 2062 7974 652d [form not byte- │ │ │ -00014010: 636f 6d70 696c 652d 6e65 6761 7465 642d compile-negated- │ │ │ -00014020: 6f70 2065 7272 6f72 2022 436f 6d70 696c op error "Compil │ │ │ -00014030: 6572 2065 7272 6f72 3a20 6025 7327 2068 er error: `%s' h │ │ │ -00014040: 6173 206e 6f20 6062 7974 652d 636f 6d70 as no `byte-comp │ │ │ -00014050: 696c 652d 6e65 6761 7465 642d 6f70 2720 ile-negated-op' │ │ │ -00014060: 7072 6f70 6572 7479 225d 2034 5d29 0a28 property"] 4]).( │ │ │ -00014070: 6279 7465 2d63 6f64 6520 22c0 c1c2 c323 byte-code "....# │ │ │ -00014080: 88c0 c4c2 c523 88c0 c6c2 c723 88c0 c8c2 .....#.....#.... │ │ │ -00014090: c923 88c0 cac2 cb23 88c0 ccc2 cd23 88c0 .#.....#.....#.. │ │ │ -000140a0: cec2 cf23 88c0 d0c2 d123 8722 205b 7075 ...#.....#." [pu │ │ │ -000140b0: 7420 6361 7463 6820 6279 7465 2d63 6f6d t catch byte-com │ │ │ -000140c0: 7069 6c65 2062 7974 652d 636f 6d70 696c pile byte-compil │ │ │ -000140d0: 652d 6361 7463 6820 756e 7769 6e64 2d70 e-catch unwind-p │ │ │ -000140e0: 726f 7465 6374 2062 7974 652d 636f 6d70 rotect byte-comp │ │ │ -000140f0: 696c 652d 756e 7769 6e64 2d70 726f 7465 ile-unwind-prote │ │ │ -00014100: 6374 2063 6f6e 6469 7469 6f6e 2d63 6173 ct condition-cas │ │ │ -00014110: 6520 6279 7465 2d63 6f6d 7069 6c65 2d63 e byte-compile-c │ │ │ -00014120: 6f6e 6469 7469 6f6e 2d63 6173 6520 7361 ondition-case sa │ │ │ -00014130: 7665 2d65 7863 7572 7369 6f6e 2062 7974 ve-excursion byt │ │ │ -00014140: 652d 636f 6d70 696c 652d 7361 7665 2d65 e-compile-save-e │ │ │ -00014150: 7863 7572 7369 6f6e 2073 6176 652d 6375 xcursion save-cu │ │ │ -00014160: 7272 656e 742d 6275 6666 6572 2062 7974 rrent-buffer byt │ │ │ -00014170: 652d 636f 6d70 696c 652d 7361 7665 2d63 e-compile-save-c │ │ │ -00014180: 7572 7265 6e74 2d62 7566 6665 7220 7361 urrent-buffer sa │ │ │ -00014190: 7665 2d72 6573 7472 6963 7469 6f6e 2062 ve-restriction b │ │ │ -000141a0: 7974 652d 636f 6d70 696c 652d 7361 7665 yte-compile-save │ │ │ -000141b0: 2d72 6573 7472 6963 7469 6f6e 2073 6176 -restriction sav │ │ │ -000141c0: 652d 7769 6e64 6f77 2d65 7863 7572 7369 e-window-excursi │ │ │ -000141d0: 6f6e 2062 7974 652d 636f 6d70 696c 652d on byte-compile- │ │ │ -000141e0: 7361 7665 2d77 696e 646f 772d 6578 6375 save-window-excu │ │ │ -000141f0: 7273 696f 6e20 7769 7468 2d6f 7574 7075 rsion with-outpu │ │ │ -00014200: 742d 746f 2d74 656d 702d 6275 6666 6572 t-to-temp-buffer │ │ │ -00014210: 2062 7974 652d 636f 6d70 696c 652d 7769 byte-compile-wi │ │ │ -00014220: 7468 2d6f 7574 7075 742d 746f 2d74 656d th-output-to-tem │ │ │ -00014230: 702d 6275 6666 6572 5d20 3429 0a28 6465 p-buffer] 4).(de │ │ │ -00014240: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -00014250: 7069 6c65 2d63 6174 6368 2023 5b28 666f pile-catch #[(fo │ │ │ -00014260: 726d 2920 22c2 0941 4021 88c3 c4c5 0941 rm) "..A@!.....A │ │ │ -00014270: 4142 085c 2221 88c6 c7c8 5c22 8722 205b AB.\"!....\"." [ │ │ │ -00014280: 666f 722d 6566 6665 6374 2066 6f72 6d20 for-effect form │ │ │ -00014290: 6279 7465 2d63 6f6d 7069 6c65 2d66 6f72 byte-compile-for │ │ │ -000142a0: 6d20 6279 7465 2d63 6f6d 7069 6c65 2d70 m byte-compile-p │ │ │ -000142b0: 7573 682d 636f 6e73 7461 6e74 2062 7974 ush-constant byt │ │ │ -000142c0: 652d 636f 6d70 696c 652d 746f 702d 6c65 e-compile-top-le │ │ │ -000142d0: 7665 6c20 7072 6f67 6e20 6279 7465 2d63 vel progn byte-c │ │ │ -000142e0: 6f6d 7069 6c65 2d6f 7574 2062 7974 652d ompile-out byte- │ │ │ -000142f0: 6361 7463 6820 305d 2034 5d29 0a28 6465 catch 0] 4]).(de │ │ │ -00014300: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -00014310: 7069 6c65 2d75 6e77 696e 642d 7072 6f74 pile-unwind-prot │ │ │ -00014320: 6563 7420 235b 2866 6f72 6d29 2022 c2c3 ect #[(form) ".. │ │ │ -00014330: 0941 41c4 5c22 2188 c5c6 c75c 2288 0941 .AA.\"!....\"..A │ │ │ -00014340: 4019 c809 085c 2288 c910 29c5 cacb 5c22 @....\"...)...\" │ │ │ -00014350: 8722 205b 666f 722d 6566 6665 6374 2066 ." [for-effect f │ │ │ -00014360: 6f72 6d20 6279 7465 2d63 6f6d 7069 6c65 orm byte-compile │ │ │ -00014370: 2d70 7573 682d 636f 6e73 7461 6e74 2062 -push-constant b │ │ │ -00014380: 7974 652d 636f 6d70 696c 652d 746f 702d yte-compile-top- │ │ │ -00014390: 6c65 7665 6c2d 626f 6479 2074 2062 7974 level-body t byt │ │ │ -000143a0: 652d 636f 6d70 696c 652d 6f75 7420 6279 e-compile-out by │ │ │ -000143b0: 7465 2d75 6e77 696e 642d 7072 6f74 6563 te-unwind-protec │ │ │ -000143c0: 7420 3020 6279 7465 2d63 6f6d 7069 6c65 t 0 byte-compile │ │ │ -000143d0: 2d66 6f72 6d20 6e69 6c20 6279 7465 2d75 -form nil byte-u │ │ │ -000143e0: 6e62 696e 6420 315d 2034 5d29 0a28 6465 nbind 1] 4]).(de │ │ │ -000143f0: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -00014400: 7069 6c65 2d63 6f6e 6469 7469 6f6e 2d63 pile-condition-c │ │ │ -00014410: 6173 6520 235b 2866 6f72 6d29 2022 0841 ase #[(form) ".A │ │ │ -00014420: 4089 1dab 8a0d c642 c70e 1642 42aa 84c7 @......B...BB... │ │ │ -00014430: 0e16 421e 160d 39ac 87c8 c9ca 0d21 5c22 ..B...9......!\" │ │ │ -00014440: 88cb 0d21 88cb cccd 0838 0e18 5c22 2188 ...!.....8..\"!. │ │ │ -00014450: 0841 4141 ce1b 891a abc4 5c6e 4089 1e19 .AAA......\n@... │ │ │ -00014460: 4089 1c39 aca6 0c3c ab9b 0ccf 1e17 8919 @..9...<........ │ │ │ -00014470: ab8e 0940 39ac 83ce 1617 0941 8911 ac72 ...@9......A...r │ │ │ -00014480: 0e17 2aac 87c8 d0ca 0c21 5c22 880c d10e ..*......!\".... │ │ │ -00014490: 1941 0e18 5c22 420b 4213 2a5c 6e41 8912 .A..\"B.B.*\nA.. │ │ │ -000144a0: ac3c cb0b 9f21 882a d20e 1a73 ab83 d320 .<...!.*...s... │ │ │ -000144b0: 88d4 d5c6 5c22 2a87 2220 5b66 6f72 6d20 ....\"*." [form │ │ │ -000144c0: 7379 6d73 2063 6c61 7573 6573 2063 6f6d syms clauses com │ │ │ -000144d0: 7069 6c65 642d 636c 6175 7365 7320 636f piled-clauses co │ │ │ -000144e0: 6e64 6974 696f 6e20 7661 7220 3020 6e65 ndition var 0 ne │ │ │ -000144f0: 772d 7363 6f70 6520 6279 7465 2d63 6f6d w-scope byte-com │ │ │ -00014500: 7069 6c65 2d77 6172 6e20 2225 7320 6973 pile-warn "%s is │ │ │ -00014510: 206e 6f74 2061 2076 6172 6961 626c 652d not a variable- │ │ │ -00014520: 6e61 6d65 206f 7220 6e69 6c20 2869 6e20 name or nil (in │ │ │ -00014530: 636f 6e64 6974 696f 6e2d 6361 7365 2922 condition-case)" │ │ │ -00014540: 2070 7269 6e31 2d74 6f2d 7374 7269 6e67 prin1-to-string │ │ │ -00014550: 2062 7974 652d 636f 6d70 696c 652d 7075 byte-compile-pu │ │ │ -00014560: 7368 2d63 6f6e 7374 616e 7420 6279 7465 sh-constant byte │ │ │ -00014570: 2d63 6f6d 7069 6c65 2d74 6f70 2d6c 6576 -compile-top-lev │ │ │ -00014580: 656c 2032 206e 696c 2074 2022 2573 2069 el 2 nil t "%s i │ │ │ -00014590: 7320 6e6f 7420 6120 7379 6d62 6f6c 206e s not a symbol n │ │ │ -000145a0: 616d 696e 6720 6120 636f 6e64 6974 696f aming a conditio │ │ │ -000145b0: 6e20 6f72 2061 206c 6973 7420 6f66 2073 n or a list of s │ │ │ -000145c0: 7563 6820 2869 6e20 636f 6e64 6974 696f uch (in conditio │ │ │ -000145d0: 6e2d 6361 7365 2922 2062 7974 652d 636f n-case)" byte-co │ │ │ -000145e0: 6d70 696c 652d 746f 702d 6c65 7665 6c2d mpile-top-level- │ │ │ -000145f0: 626f 6479 2075 6e75 7365 642d 7661 7273 body unused-vars │ │ │ -00014600: 2062 7974 652d 636f 6d70 696c 652d 7761 byte-compile-wa │ │ │ -00014610: 726e 2d61 626f 7574 2d75 6e75 7365 642d rn-about-unused- │ │ │ -00014620: 7661 7269 6162 6c65 7320 6279 7465 2d63 variables byte-c │ │ │ -00014630: 6f6d 7069 6c65 2d6f 7574 2062 7974 652d ompile-out byte- │ │ │ -00014640: 636f 6e64 6974 696f 6e2d 6361 7365 2062 condition-case b │ │ │ -00014650: 7974 652d 636f 6d70 696c 652d 626f 756e yte-compile-boun │ │ │ -00014660: 642d 7661 7269 6162 6c65 7320 6f6b 2066 d-variables ok f │ │ │ -00014670: 6f72 2d65 6666 6563 7420 636c 6175 7365 or-effect clause │ │ │ -00014680: 2062 7974 652d 636f 6d70 696c 652d 7761 byte-compile-wa │ │ │ -00014690: 726e 696e 6773 5d20 355d 290a 2864 6566 rnings] 5]).(def │ │ │ -000146a0: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ -000146b0: 696c 652d 7361 7665 2d65 7863 7572 7369 ile-save-excursi │ │ │ -000146c0: 6f6e 2023 5b28 666f 726d 2920 22c3 c4c5 on #[(form) "... │ │ │ -000146d0: 5c22 8808 411a c65c 6e09 5c22 88c7 1129 \"..A..\n.\"...) │ │ │ -000146e0: c3c8 c95c 2287 2220 5b66 6f72 6d20 666f ...\"." [form fo │ │ │ -000146f0: 722d 6566 6665 6374 2062 6f64 7920 6279 r-effect body by │ │ │ -00014700: 7465 2d63 6f6d 7069 6c65 2d6f 7574 2062 te-compile-out b │ │ │ -00014710: 7974 652d 7361 7665 2d65 7863 7572 7369 yte-save-excursi │ │ │ -00014720: 6f6e 2030 2062 7974 652d 636f 6d70 696c on 0 byte-compil │ │ │ -00014730: 652d 626f 6479 206e 696c 2062 7974 652d e-body nil byte- │ │ │ -00014740: 756e 6269 6e64 2031 5d20 335d 290a 2864 unbind 1] 3]).(d │ │ │ -00014750: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ -00014760: 6d70 696c 652d 7361 7665 2d72 6573 7472 mpile-save-restr │ │ │ -00014770: 6963 7469 6f6e 2023 5b28 666f 726d 2920 iction #[(form) │ │ │ -00014780: 22c3 c4c5 5c22 8808 411a c65c 6e09 5c22 "...\"..A..\n.\" │ │ │ -00014790: 88c7 1129 c3c8 c95c 2287 2220 5b66 6f72 ...)...\"." [for │ │ │ -000147a0: 6d20 666f 722d 6566 6665 6374 2062 6f64 m for-effect bod │ │ │ -000147b0: 7920 6279 7465 2d63 6f6d 7069 6c65 2d6f y byte-compile-o │ │ │ -000147c0: 7574 2062 7974 652d 7361 7665 2d72 6573 ut byte-save-res │ │ │ -000147d0: 7472 6963 7469 6f6e 2030 2062 7974 652d triction 0 byte- │ │ │ -000147e0: 636f 6d70 696c 652d 626f 6479 206e 696c compile-body nil │ │ │ -000147f0: 2062 7974 652d 756e 6269 6e64 2031 5d20 byte-unbind 1] │ │ │ -00014800: 335d 290a 2864 6566 616c 6961 7320 2762 3]).(defalias 'b │ │ │ -00014810: 7974 652d 636f 6d70 696c 652d 7361 7665 yte-compile-save │ │ │ -00014820: 2d63 7572 7265 6e74 2d62 7566 6665 7220 -current-buffer │ │ │ -00014830: 235b 2866 6f72 6d29 2022 08ab 8ec4 c5c6 #[(form) "...... │ │ │ -00014840: c7c8 0b41 42c9 4242 4521 87ca cbcc 5c22 ...AB.BBE!....\" │ │ │ -00014850: 880b 411a cd5c 6e09 5c22 88ce 1129 cacf ..A..\n.\"...).. │ │ │ -00014860: d05c 2287 2220 5b62 7974 652d 636f 6d70 .\"." [byte-comp │ │ │ -00014870: 696c 652d 656d 6163 7331 392d 636f 6d70 ile-emacs19-comp │ │ │ -00014880: 6174 6962 696c 6974 7920 666f 722d 6566 atibility for-ef │ │ │ -00014890: 6665 6374 2062 6f64 7920 666f 726d 2062 fect body form b │ │ │ -000148a0: 7974 652d 636f 6d70 696c 652d 666f 726d yte-compile-form │ │ │ -000148b0: 206c 6574 2028 285f 6279 7465 5f63 6f6d let ((_byte_com │ │ │ -000148c0: 7069 6c65 725f 7361 7665 5f62 7566 6665 piler_save_buffe │ │ │ -000148d0: 725f 656d 756c 6174 696f 6e5f 636c 6f73 r_emulation_clos │ │ │ -000148e0: 7572 655f 2028 6375 7272 656e 742d 6275 ure_ (current-bu │ │ │ -000148f0: 6666 6572 2929 2920 756e 7769 6e64 2d70 ffer))) unwind-p │ │ │ -00014900: 726f 7465 6374 2070 726f 676e 2028 2861 rotect progn ((a │ │ │ -00014910: 6e64 2028 6275 6666 6572 2d6c 6976 652d nd (buffer-live- │ │ │ -00014920: 7020 5f62 7974 655f 636f 6d70 696c 6572 p _byte_compiler │ │ │ -00014930: 5f73 6176 655f 6275 6666 6572 5f65 6d75 _save_buffer_emu │ │ │ -00014940: 6c61 7469 6f6e 5f63 6c6f 7375 7265 5f29 lation_closure_) │ │ │ -00014950: 2028 7365 742d 6275 6666 6572 205f 6279 (set-buffer _by │ │ │ -00014960: 7465 5f63 6f6d 7069 6c65 725f 7361 7665 te_compiler_save │ │ │ -00014970: 5f62 7566 6665 725f 656d 756c 6174 696f _buffer_emulatio │ │ │ -00014980: 6e5f 636c 6f73 7572 655f 2929 2920 6279 n_closure_))) by │ │ │ -00014990: 7465 2d63 6f6d 7069 6c65 2d6f 7574 2062 te-compile-out b │ │ │ -000149a0: 7974 652d 7361 7665 2d63 7572 7265 6e74 yte-save-current │ │ │ -000149b0: 2d62 7566 6665 7220 3020 6279 7465 2d63 -buffer 0 byte-c │ │ │ -000149c0: 6f6d 7069 6c65 2d62 6f64 7920 6e69 6c20 ompile-body nil │ │ │ -000149d0: 6279 7465 2d75 6e62 696e 6420 315d 2036 byte-unbind 1] 6 │ │ │ -000149e0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -000149f0: 7465 2d63 6f6d 7069 6c65 2d73 6176 652d te-compile-save- │ │ │ -00014a00: 7769 6e64 6f77 2d65 7863 7572 7369 6f6e window-excursion │ │ │ -00014a10: 2023 5b28 666f 726d 2920 22c2 c309 4108 #[(form) "...A. │ │ │ -00014a20: 5c22 2188 c4c5 c65c 2287 2220 5b66 6f72 \"!....\"." [for │ │ │ -00014a30: 2d65 6666 6563 7420 666f 726d 2062 7974 -effect form byt │ │ │ -00014a40: 652d 636f 6d70 696c 652d 7075 7368 2d63 e-compile-push-c │ │ │ -00014a50: 6f6e 7374 616e 7420 6279 7465 2d63 6f6d onstant byte-com │ │ │ -00014a60: 7069 6c65 2d74 6f70 2d6c 6576 656c 2d62 pile-top-level-b │ │ │ -00014a70: 6f64 7920 6279 7465 2d63 6f6d 7069 6c65 ody byte-compile │ │ │ -00014a80: 2d6f 7574 2062 7974 652d 7361 7665 2d77 -out byte-save-w │ │ │ -00014a90: 696e 646f 772d 6578 6375 7273 696f 6e20 indow-excursion │ │ │ -00014aa0: 305d 2034 5d29 0a28 6465 6661 6c69 6173 0] 4]).(defalias │ │ │ -00014ab0: 2027 6279 7465 2d63 6f6d 7069 6c65 2d77 'byte-compile-w │ │ │ -00014ac0: 6974 682d 6f75 7470 7574 2d74 6f2d 7465 ith-output-to-te │ │ │ -00014ad0: 6d70 2d62 7566 6665 7220 235b 2866 6f72 mp-buffer #[(for │ │ │ -00014ae0: 6d29 2022 c108 4140 2188 c2c3 c45c 2288 m) "..A@!....\". │ │ │ -00014af0: c508 4141 2188 c2c6 c45c 2287 2220 5b66 ..AA!....\"." [f │ │ │ -00014b00: 6f72 6d20 6279 7465 2d63 6f6d 7069 6c65 orm byte-compile │ │ │ -00014b10: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ -00014b20: 6c65 2d6f 7574 2062 7974 652d 7465 6d70 le-out byte-temp │ │ │ -00014b30: 2d6f 7574 7075 742d 6275 6666 6572 2d73 -output-buffer-s │ │ │ -00014b40: 6574 7570 2030 2062 7974 652d 636f 6d70 etup 0 byte-comp │ │ │ -00014b50: 696c 652d 626f 6479 2062 7974 652d 7465 ile-body byte-te │ │ │ -00014b60: 6d70 2d6f 7574 7075 742d 6275 6666 6572 mp-output-buffer │ │ │ -00014b70: 2d73 686f 775d 2033 5d29 0a28 6279 7465 -show] 3]).(byte │ │ │ -00014b80: 2d63 6f64 6520 22c0 c1c2 c323 88c0 c4c2 -code "....#.... │ │ │ -00014b90: c523 88c0 c6c2 c723 88c0 c6c2 c823 88c0 .#.....#.....#.. │ │ │ -00014ba0: c9c2 c823 88c0 cac2 cb23 88c0 ccc2 cd23 ...#.....#.....# │ │ │ -00014bb0: 88c0 cec2 cf23 8722 205b 7075 7420 6465 .....#." [put de │ │ │ -00014bc0: 6675 6e20 6279 7465 2d63 6f6d 7069 6c65 fun byte-compile │ │ │ -00014bd0: 2062 7974 652d 636f 6d70 696c 652d 6465 byte-compile-de │ │ │ -00014be0: 6675 6e20 6465 666d 6163 726f 2062 7974 fun defmacro byt │ │ │ -00014bf0: 652d 636f 6d70 696c 652d 6465 666d 6163 e-compile-defmac │ │ │ -00014c00: 726f 2064 6566 7661 7220 6279 7465 2d63 ro defvar byte-c │ │ │ -00014c10: 6f6d 7069 6c65 2d64 6566 7661 7220 6279 ompile-defvar by │ │ │ -00014c20: 7465 2d63 6f6d 7069 6c65 2d64 6566 7661 te-compile-defva │ │ │ -00014c30: 722d 6f72 2d64 6566 636f 6e73 7420 6465 r-or-defconst de │ │ │ -00014c40: 6663 6f6e 7374 2061 7574 6f6c 6f61 6420 fconst autoload │ │ │ -00014c50: 6279 7465 2d63 6f6d 7069 6c65 2d61 7574 byte-compile-aut │ │ │ -00014c60: 6f6c 6f61 6420 6465 6661 6c69 6173 2062 oload defalias b │ │ │ -00014c70: 7974 652d 636f 6d70 696c 652d 6465 6661 yte-compile-defa │ │ │ -00014c80: 6c69 6173 2064 6566 696e 652d 6675 6e63 lias define-func │ │ │ -00014c90: 7469 6f6e 2062 7974 652d 636f 6d70 696c tion byte-compil │ │ │ -00014ca0: 652d 6465 6669 6e65 2d66 756e 6374 696f e-define-functio │ │ │ -00014cb0: 6e5d 2034 290a 2864 6566 616c 6961 7320 n] 4).(defalias │ │ │ -00014cc0: 2762 7974 652d 636f 6d70 696c 652d 6465 'byte-compile-de │ │ │ -00014cd0: 6675 6e20 235b 2866 6f72 6d29 2022 c1c2 fun #[(form) ".. │ │ │ -00014ce0: c308 4140 44c4 c5c6 0841 4142 2121 4521 ..A@D....AAB!!E! │ │ │ -00014cf0: 88c7 2088 c808 4140 2187 2220 5b66 6f72 .. ...A@!." [for │ │ │ -00014d00: 6d20 6279 7465 2d63 6f6d 7069 6c65 2d74 m byte-compile-t │ │ │ -00014d10: 776f 2d61 7267 7320 6673 6574 2071 756f wo-args fset quo │ │ │ -00014d20: 7465 2062 7974 652d 636f 6d70 696c 652d te byte-compile- │ │ │ -00014d30: 6279 7465 2d63 6f64 652d 6d61 6b65 7220 byte-code-maker │ │ │ -00014d40: 6279 7465 2d63 6f6d 7069 6c65 2d6c 616d byte-compile-lam │ │ │ -00014d50: 6264 6120 6c61 6d62 6461 2062 7974 652d bda lambda byte- │ │ │ -00014d60: 636f 6d70 696c 652d 6469 7363 6172 6420 compile-discard │ │ │ -00014d70: 6279 7465 2d63 6f6d 7069 6c65 2d63 6f6e byte-compile-con │ │ │ -00014d80: 7374 616e 745d 2037 5d29 0a28 6465 6661 stant] 7]).(defa │ │ │ -00014d90: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ -00014da0: 6c65 2d64 6566 6d61 6372 6f20 235b 2866 le-defmacro #[(f │ │ │ -00014db0: 6f72 6d29 2022 c4c5 0b41 4044 c6c7 c80b orm) "...A@D.... │ │ │ -00014dc0: 4141 4221 2189 1aa2 c961 ab86 cacb 5c6e AAB!!....a....\n │ │ │ -00014dd0: 45aa 87c5 cccd 5c6e 2142 4429 45c5 0b41 E.....\n!BD)E..A │ │ │ -00014de0: 4044 4419 ce09 085c 2288 cf89 1029 8722 @DD....\"....)." │ │ │ -00014df0: 205b 666f 722d 6566 6665 6374 2062 6f64 [for-effect bod │ │ │ -00014e00: 7920 636f 6465 2066 6f72 6d20 6673 6574 y code form fset │ │ │ -00014e10: 2071 756f 7465 2062 7974 652d 636f 6d70 quote byte-comp │ │ │ -00014e20: 696c 652d 6279 7465 2d63 6f64 652d 6d61 ile-byte-code-ma │ │ │ -00014e30: 6b65 7220 6279 7465 2d63 6f6d 7069 6c65 ker byte-compile │ │ │ -00014e40: 2d6c 616d 6264 6120 6c61 6d62 6461 206d -lambda lambda m │ │ │ -00014e50: 616b 652d 6279 7465 2d63 6f64 6520 636f ake-byte-code co │ │ │ -00014e60: 6e73 2027 6d61 6372 6f20 6d61 6372 6f20 ns 'macro macro │ │ │ -00014e70: 6576 616c 2062 7974 652d 636f 6d70 696c eval byte-compil │ │ │ -00014e80: 652d 626f 6479 206e 696c 5d20 375d 290a e-body nil] 7]). │ │ │ -00014e90: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ -00014ea0: 636f 6d70 696c 652d 6465 6676 6172 2d6f compile-defvar-o │ │ │ -00014eb0: 722d 6465 6663 6f6e 7374 2023 5b28 666f r-defconst #[(fo │ │ │ -00014ec0: 726d 2920 220c 400c 4140 c60c 38c7 0c38 rm) ".@.A@..8..8 │ │ │ -00014ed0: 1b19 1d1a 0c47 c856 ab8a c9ca 5c6e 0d0c .....G.V....\n.. │ │ │ -00014ee0: 4147 c725 88cb 0e1c 73ab 870d 0e1d 4208 AG.%....s.....B. │ │ │ -00014ef0: 4210 0c47 c656 ad8c 0e1e 3fad 87cc cd0d B..G.V....?..... │ │ │ -00014f00: 44ce 4242 0c47 c756 ad95 0bab 8b0b 3bac D.BB.G.V......;. │ │ │ -00014f10: 87c9 cf5c 6e0d 0b24 88d0 cd0d 44d1 0b46 ...\n..$....D..F │ │ │ -00014f20: 0c41 41ad 9a5c 6ed2 61ab 86d3 0d09 45aa .AA..\n.a.....E. │ │ │ -00014f30: 8fd4 d5d6 cd0d 4444 44d7 cd0d 4409 4545 ......DDD...D.EE │ │ │ -00014f40: cd0d 4446 1e1a d80e 1a0e 1b5c 2288 d989 ..DF.......\"... │ │ │ -00014f50: 161b 2d87 2220 5b62 7974 652d 636f 6d70 ..-." [byte-comp │ │ │ -00014f60: 696c 652d 626f 756e 642d 7661 7269 6162 ile-bound-variab │ │ │ -00014f70: 6c65 7320 7661 6c75 6520 6675 6e20 7374 les value fun st │ │ │ -00014f80: 7269 6e67 2066 6f72 6d20 7661 7220 3220 ring form var 2 │ │ │ -00014f90: 3320 3420 6279 7465 2d63 6f6d 7069 6c65 3 4 byte-compile │ │ │ -00014fa0: 2d77 6172 6e20 2225 7320 2573 2063 616c -warn "%s %s cal │ │ │ -00014fb0: 6c65 6420 7769 7468 2025 6420 6172 6775 led with %d argu │ │ │ -00014fc0: 6d65 6e74 732c 2062 7574 2061 6363 6570 ments, but accep │ │ │ -00014fd0: 7473 206f 6e6c 7920 2573 2220 6672 6565 ts only %s" free │ │ │ -00014fe0: 2d76 6172 7320 7075 7368 2071 756f 7465 -vars push quote │ │ │ -00014ff0: 2028 6375 7272 656e 742d 6c6f 6164 2d6c (current-load-l │ │ │ -00015000: 6973 7429 2022 5468 6972 6420 6172 6720 ist) "Third arg │ │ │ -00015010: 746f 2025 7320 2573 2069 7320 6e6f 7420 to %s %s is not │ │ │ -00015020: 6120 7374 7269 6e67 3a20 2573 2220 7075 a string: %s" pu │ │ │ -00015030: 7420 2776 6172 6961 626c 652d 646f 6375 t 'variable-docu │ │ │ -00015040: 6d65 6e74 6174 696f 6e20 6465 6663 6f6e mentation defcon │ │ │ -00015050: 7374 2073 6574 7120 6966 206e 6f74 2064 st setq if not d │ │ │ -00015060: 6566 6175 6c74 2d62 6f75 6e64 7020 7365 efault-boundp se │ │ │ -00015070: 742d 6465 6661 756c 7420 6279 7465 2d63 t-default byte-c │ │ │ -00015080: 6f6d 7069 6c65 2d62 6f64 7920 6e69 6c20 ompile-body nil │ │ │ -00015090: 626f 6479 2066 6f72 2d65 6666 6563 7420 body for-effect │ │ │ -000150a0: 6279 7465 2d63 6f6d 7069 6c65 2d77 6172 byte-compile-war │ │ │ -000150b0: 6e69 6e67 7320 6279 7465 2d63 6f6d 7069 nings byte-compi │ │ │ -000150c0: 6c65 2d67 6c6f 6261 6c2d 6269 7420 6279 le-global-bit by │ │ │ -000150d0: 7465 2d63 6f6d 7069 6c65 2d63 7572 7265 te-compile-curre │ │ │ -000150e0: 6e74 2d66 6f72 6d5d 2037 5d29 0a28 6465 nt-form] 7]).(de │ │ │ -000150f0: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -00015100: 7069 6c65 2d61 7574 6f6c 6f61 6420 235b pile-autoload #[ │ │ │ -00015110: 2866 6f72 6d29 2022 0841 403a ab88 0841 (form) ".A@:...A │ │ │ -00015120: 4040 c161 aa95 0841 4039 ab8e c208 4140 @@.a...A@9....A@ │ │ │ -00015130: 21ac 8a08 4140 c373 aa81 c4ab c0c5 0838 !...A@.s.......8 │ │ │ -00015140: 3aab 88c5 0838 40c1 61aa 95c5 0838 39ab :....8@.a....89. │ │ │ -00015150: 8ec2 c508 3821 ac8a c508 38c3 73aa 81c4 ....8!....8.s... │ │ │ -00015160: ab9b c6c5 0838 21c7 73ab 92c8 c608 4140 .....8!.s.....A@ │ │ │ -00015170: 2121 ac89 c9ca c608 4140 215c 2288 cb08 !!......A@!\"... │ │ │ -00015180: 2187 2220 5b66 6f72 6d20 7175 6f74 6520 !." [form quote │ │ │ -00015190: 6b65 7977 6f72 6470 2028 6e69 6c20 7429 keywordp (nil t) │ │ │ -000151a0: 2074 2035 2065 7661 6c20 2874 206d 6163 t 5 eval (t mac │ │ │ -000151b0: 726f 2920 6662 6f75 6e64 7020 6279 7465 ro) fboundp byte │ │ │ -000151c0: 2d63 6f6d 7069 6c65 2d77 6172 6e20 2254 -compile-warn "T │ │ │ -000151d0: 6865 2063 6f6d 7069 6c65 7220 6967 6e6f he compiler igno │ │ │ -000151e0: 7265 7320 6061 7574 6f6c 6f61 6427 2065 res `autoload' e │ │ │ -000151f0: 7863 6570 7420 6174 2074 6f70 206c 6576 xcept at top lev │ │ │ -00015200: 656c 2e20 2059 6f75 2073 686f 756c 645c el. You should\ │ │ │ -00015210: 6e20 2020 2020 7072 6f62 6162 6c79 2070 n probably p │ │ │ -00015220: 7574 2074 6865 2061 7574 6f6c 6f61 6420 ut the autoload │ │ │ -00015230: 6f66 2074 6865 206d 6163 726f 2060 2573 of the macro `%s │ │ │ -00015240: 2720 6174 2074 6f70 2d6c 6576 656c 2e22 ' at top-level." │ │ │ -00015250: 2062 7974 652d 636f 6d70 696c 652d 6e6f byte-compile-no │ │ │ -00015260: 726d 616c 2d63 616c 6c5d 2034 5d29 0a28 rmal-call] 4]).( │ │ │ -00015270: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ -00015280: 6f6d 7069 6c65 2d64 6566 616c 6961 7320 ompile-defalias │ │ │ -00015290: 235b 2866 6f72 6d29 2022 0941 3aab db09 #[(form) ".A:... │ │ │ -000152a0: 4140 3aab d509 4140 40c2 61ab cd09 4140 A@:...A@@.a...A@ │ │ │ -000152b0: 413a abc6 0941 4041 4039 abbe 0941 413a A:...A@A@9...AA: │ │ │ -000152c0: abb8 c309 383a abb2 c309 3840 c261 abaa ....8:....8@.a.. │ │ │ -000152d0: c309 3841 3aab a3c3 0938 4140 39ab 9bc4 ..8A:....8A@9... │ │ │ -000152e0: 0941 4041 40c3 0938 4140 5c22 8809 4140 .A@A@..8A@\"..A@ │ │ │ -000152f0: 4140 c309 3841 4042 0842 10c5 0921 8722 A@..8A@B.B...!." │ │ │ -00015300: 205b 6279 7465 2d63 6f6d 7069 6c65 2d66 [byte-compile-f │ │ │ -00015310: 756e 6374 696f 6e2d 656e 7669 726f 6e6d unction-environm │ │ │ -00015320: 656e 7420 666f 726d 2071 756f 7465 2032 ent form quote 2 │ │ │ -00015330: 2062 7974 652d 636f 6d70 696c 652d 6465 byte-compile-de │ │ │ -00015340: 6661 6c69 6173 2d77 6172 6e20 6279 7465 falias-warn byte │ │ │ -00015350: 2d63 6f6d 7069 6c65 2d6e 6f72 6d61 6c2d -compile-normal- │ │ │ -00015360: 6361 6c6c 5d20 345d 290a 2864 6566 616c call] 4]).(defal │ │ │ -00015370: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ -00015380: 652d 6465 6669 6e65 2d66 756e 6374 696f e-define-functio │ │ │ -00015390: 6e20 235b 2866 6f72 6d29 2022 c108 2187 n #[(form) "..!. │ │ │ -000153a0: 2220 5b66 6f72 6d20 6279 7465 2d63 6f6d " [form byte-com │ │ │ -000153b0: 7069 6c65 2d64 6566 616c 6961 735d 2032 pile-defalias] 2 │ │ │ -000153c0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -000153d0: 7465 2d63 6f6d 7069 6c65 2d64 6566 616c te-compile-defal │ │ │ -000153e0: 6961 732d 7761 726e 2023 5b28 6e65 7720 ias-warn #[(new │ │ │ -000153f0: 616c 6961 7329 2022 085c 6eb7 8919 ad86 alias) ".\n..... │ │ │ -00015400: c309 5c6e 5c22 8912 2987 2220 5b6e 6577 ..\n\"..)." [new │ │ │ -00015410: 2063 616c 6c73 2062 7974 652d 636f 6d70 calls byte-comp │ │ │ -00015420: 696c 652d 756e 7265 736f 6c76 6564 2d66 ile-unresolved-f │ │ │ -00015430: 756e 6374 696f 6e73 2064 656c 715d 2034 unctions delq] 4 │ │ │ -00015440: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -00015450: 7465 2d63 6f6d 7069 6c65 2d6d 616b 652d te-compile-make- │ │ │ -00015460: 7461 6720 235b 6e69 6c20 22c1 0854 8910 tag #[nil "..T.. │ │ │ -00015470: 4487 2220 5b62 7974 652d 636f 6d70 696c D." [byte-compil │ │ │ -00015480: 652d 7461 672d 6e75 6d62 6572 2054 4147 e-tag-number TAG │ │ │ -00015490: 5d20 335d 290a 2864 6566 616c 6961 7320 ] 3]).(defalias │ │ │ -000154a0: 2762 7974 652d 636f 6d70 696c 652d 6f75 'byte-compile-ou │ │ │ -000154b0: 742d 7461 6720 235b 2874 6167 2920 225c t-tag #[(tag) "\ │ │ │ -000154c0: 6e08 4210 5c6e 4141 ab97 09ab 8e5c 6e41 n.B.\nAA.....\nA │ │ │ -000154d0: 4109 55ac 87c3 c45c 6e41 405c 2288 5c6e A.U....\nA@\".\n │ │ │ -000154e0: 4141 8911 875c 6e41 09a1 8722 205b 6279 AA...\nA..." [by │ │ │ -000154f0: 7465 2d63 6f6d 7069 6c65 2d6f 7574 7075 te-compile-outpu │ │ │ -00015500: 7420 6279 7465 2d63 6f6d 7069 6c65 2d64 t byte-compile-d │ │ │ -00015510: 6570 7468 2074 6167 2065 7272 6f72 2022 epth tag error " │ │ │ -00015520: 436f 6d70 696c 6572 2062 7567 3a20 6465 Compiler bug: de │ │ │ -00015530: 7074 6820 636f 6e66 6c69 6374 2061 7420 pth conflict at │ │ │ -00015540: 7461 6720 2564 225d 2033 5d29 0a28 6465 tag %d"] 3]).(de │ │ │ -00015550: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ -00015560: 7069 6c65 2d67 6f74 6f20 235b 286f 7063 pile-goto #[(opc │ │ │ -00015570: 6f64 6520 7461 6729 2022 0b5c 6e42 0942 ode tag) ".\nB.B │ │ │ -00015580: 115c 6e41 0b08 73ab 840c 53aa 810c a188 .\nA..s...S..... │ │ │ -00015590: 0bc5 613f ad82 0c53 8914 8722 205b 6279 ..a?...S..." [by │ │ │ -000155a0: 7465 2d67 6f74 6f2d 616c 7761 7973 2d70 te-goto-always-p │ │ │ -000155b0: 6f70 2d6f 7073 2062 7974 652d 636f 6d70 op-ops byte-comp │ │ │ -000155c0: 696c 652d 6f75 7470 7574 2074 6167 206f ile-output tag o │ │ │ -000155d0: 7063 6f64 6520 6279 7465 2d63 6f6d 7069 pcode byte-compi │ │ │ -000155e0: 6c65 2d64 6570 7468 2062 7974 652d 676f le-depth byte-go │ │ │ -000155f0: 746f 5d20 335d 290a 2864 6566 616c 6961 to] 3]).(defalia │ │ │ -00015600: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ -00015610: 6f75 7420 235b 286f 7063 6f64 6520 6f66 out #[(opcode of │ │ │ -00015620: 6673 6574 2920 220c 0b42 5c6e 4212 0cc6 fset) "..B\nB... │ │ │ -00015630: 61ab 860d 0b5a 8915 870c c761 ab84 c889 a....Z.....a.... │ │ │ -00015640: 1587 0d08 0c4a 48ae 830b 535b 5c5c 8915 .....JH...S[\\.. │ │ │ -00015650: 095d 8911 8722 205b 6279 7465 2d73 7461 .]..." [byte-sta │ │ │ -00015660: 636b 2b2d 696e 666f 2062 7974 652d 636f ck+-info byte-co │ │ │ -00015670: 6d70 696c 652d 6d61 7864 6570 7468 2062 mpile-maxdepth b │ │ │ -00015680: 7974 652d 636f 6d70 696c 652d 6f75 7470 yte-compile-outp │ │ │ -00015690: 7574 206f 6666 7365 7420 6f70 636f 6465 ut offset opcode │ │ │ -000156a0: 2062 7974 652d 636f 6d70 696c 652d 6465 byte-compile-de │ │ │ -000156b0: 7074 6820 6279 7465 2d63 616c 6c20 6279 pth byte-call by │ │ │ -000156c0: 7465 2d72 6574 7572 6e20 6e69 6c5d 2034 te-return nil] 4 │ │ │ -000156d0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ -000156e0: 7465 2d63 6f6d 7069 6c65 2d61 6e6e 6f74 te-compile-annot │ │ │ -000156f0: 6174 652d 6361 6c6c 2d74 7265 6520 235b ate-call-tree #[ │ │ │ -00015700: 2866 6f72 6d29 2022 c41b 0940 5c6e b789 (form) "...@\n.. │ │ │ -00015710: 13ab 9208 0b41 4073 ac94 0b41 080b 4140 .....A@s...A..A@ │ │ │ -00015720: 42a0 88aa 8909 4008 43c4 455c 6e42 1208 B.....@.C.E\nB.. │ │ │ -00015730: 5c6e b789 13ab 9409 40c5 0b38 73ae 960b \n......@..8s... │ │ │ -00015740: 4141 0940 c50b 3842 a0aa 8a08 c409 4043 AA.@..8B......@C │ │ │ -00015750: 455c 6e42 8912 2987 2220 5b62 7974 652d E\nB..)." [byte- │ │ │ -00015760: 636f 6d70 696c 652d 6375 7272 656e 742d compile-current- │ │ │ -00015770: 666f 726d 2066 6f72 6d20 6279 7465 2d63 form form byte-c │ │ │ -00015780: 6f6d 7069 6c65 2d63 616c 6c2d 7472 6565 ompile-call-tree │ │ │ -00015790: 2065 6e74 7279 206e 696c 2032 5d20 345d entry nil 2] 4] │ │ │ -000157a0: 290a 2340 3630 3120 4469 7370 6c61 7920 ).#@601 Display │ │ │ -000157b0: 6120 6361 6c6c 2067 7261 7068 206f 6620 a call graph of │ │ │ -000157c0: 6120 7370 6563 6966 6965 6420 6669 6c65 a specified file │ │ │ -000157d0: 2e0a 5468 6973 206c 6973 7473 2077 6869 ..This lists whi │ │ │ -000157e0: 6368 2066 756e 6374 696f 6e73 2068 6176 ch functions hav │ │ │ -000157f0: 6520 6265 656e 2063 616c 6c65 642c 2077 e been called, w │ │ │ -00015800: 6861 7420 6675 6e63 7469 6f6e 7320 6361 hat functions ca │ │ │ -00015810: 6c6c 6564 0a74 6865 6d2c 2061 6e64 2077 lled.them, and w │ │ │ -00015820: 6861 7420 6675 6e63 7469 6f6e 7320 7468 hat functions th │ │ │ -00015830: 6579 2063 616c 6c2e 2020 5468 6520 6c69 ey call. The li │ │ │ -00015840: 7374 2069 6e63 6c75 6465 7320 616c 6c20 st includes all │ │ │ -00015850: 6675 6e63 7469 6f6e 730a 7768 6f73 6520 functions.whose │ │ │ -00015860: 6465 6669 6e69 7469 6f6e 7320 6861 7665 definitions have │ │ │ -00015870: 2062 6565 6e20 636f 6d70 696c 6564 2069 been compiled i │ │ │ -00015880: 6e20 7468 6973 2045 6d61 6373 2073 6573 n this Emacs ses │ │ │ -00015890: 7369 6f6e 2c20 6173 2077 656c 6c20 6173 sion, as well as │ │ │ -000158a0: 0a61 6c6c 2066 756e 6374 696f 6e73 2063 .all functions c │ │ │ -000158b0: 616c 6c65 6420 6279 2074 686f 7365 2066 alled by those f │ │ │ -000158c0: 756e 6374 696f 6e73 2e0a 0a54 6865 2063 unctions...The c │ │ │ -000158d0: 616c 6c20 6772 6170 6820 646f 6573 206e all graph does n │ │ │ -000158e0: 6f74 2069 6e63 6c75 6465 206d 6163 726f ot include macro │ │ │ -000158f0: 732c 2069 6e6c 696e 6520 6675 6e63 7469 s, inline functi │ │ │ -00015900: 6f6e 732c 206f 720a 7072 696d 6974 6976 ons, or.primitiv │ │ │ -00015910: 6573 2074 6861 7420 7468 6520 6279 7465 es that the byte │ │ │ -00015920: 2d63 6f64 6520 696e 7465 7270 7265 7465 -code interprete │ │ │ -00015930: 7220 6b6e 6f77 7320 6162 6f75 7420 6469 r knows about di │ │ │ -00015940: 7265 6374 6c79 2028 6571 2c0a 636f 6e73 rectly (eq,.cons │ │ │ -00015950: 2c20 6574 632e 292e 0a0a 5468 6520 6361 , etc.)...The ca │ │ │ -00015960: 6c6c 2074 7265 6520 616c 736f 206c 6973 ll tree also lis │ │ │ -00015970: 7473 2074 686f 7365 2066 756e 6374 696f ts those functio │ │ │ -00015980: 6e73 2077 6869 6368 2061 7265 206e 6f74 ns which are not │ │ │ -00015990: 206b 6e6f 776e 2074 6f20 6265 2063 616c known to be cal │ │ │ -000159a0: 6c65 640a 2874 6861 7420 6973 2c20 746f led.(that is, to │ │ │ -000159b0: 2077 6869 6368 206e 6f20 6361 6c6c 7320 which no calls │ │ │ -000159c0: 6861 7665 2062 6565 6e20 636f 6d70 696c have been compil │ │ │ -000159d0: 6564 292c 2061 6e64 2077 6869 6368 2063 ed), and which c │ │ │ -000159e0: 616e 6e6f 7420 6265 0a69 6e76 6f6b 6564 annot be.invoked │ │ │ -000159f0: 2069 6e74 6572 6163 7469 7665 6c79 2e1f interactively.. │ │ │ -00015a00: 0a28 6465 6661 6c69 6173 2027 6469 7370 .(defalias 'disp │ │ │ -00015a10: 6c61 792d 6361 6c6c 2d74 7265 6520 235b lay-call-tree #[ │ │ │ -00015a20: 2826 6f70 7469 6f6e 616c 2066 696c 656e (&optional filen │ │ │ -00015a30: 616d 6529 2022 c6c7 2188 c890 c871 88c9 ame) "..!....q.. │ │ │ -00015a40: 2088 c6ca 0b5c 2288 cb0e 41ac 870e 45ae ....\"...A...E. │ │ │ -00015a50: 90cc aa8d 0e41 3bab 840e 41aa 84cd 0e41 .....A;...A....A │ │ │ -00015a60: 21ce cf0b 21d0 b105 880b abaa d10e 420b !...!.........B. │ │ │ -00015a70: c261 ab83 d2aa 9c0b c061 ab83 d3aa 940b .a.......a...... │ │ │ -00015a80: d461 ab83 d5aa 8c0b d661 ab83 d7aa 84d8 .a.......a...... │ │ │ -00015a90: d90b 5c22 5c22 1642 c6c7 2188 0e42 70da ..\"\".B..!..Bp. │ │ │ -00015aa0: 8989 8918 1a19 1d1e 4489 1c83 4101 db0c ........D...A... │ │ │ -00015ab0: 4040 0e44 5c22 880c 4041 4012 dc0c 4038 @@.D\"..@A@...@8 │ │ │ -00015ac0: 10dd de0c 4040 8915 21ac 890d ac83 dfaa ....@@..!....... │ │ │ -00015ad0: d5e0 aad2 e10d 4b89 1521 ab83 e2aa c70d ......K..!...... │ │ │ -00015ae0: 39ab 86e3 e40d 5c22 aabd e50d 21ab 83e6 9.....\"....!... │ │ │ -00015af0: aab5 0d3a ac83 e7aa ae0d 40e8 61ab 94e5 ...:......@.a... │ │ │ -00015b00: 0d41 21ac 88e9 0d41 4141 b7ab 83ea aa97 .A!....AAA...... │ │ │ -00015b10: ebaa 94e9 0d41 41b7 ab83 ecaa 8a0d 40ed .....AA.......@. │ │ │ -00015b20: 61ab 83ee aa81 cce3 ef5c 6e47 0847 5c6e a........\nG.G\n │ │ │ -00015b30: 4708 475c 5c24 f0b1 0488 5c6e ab9e f163 G.G\\$....\n...c │ │ │ -00015b40: 8860 11f2 5c6e 40ab 87f3 f45c 6ef5 23aa .`..\n@....\n.#. │ │ │ -00015b50: 81f6 b102 88f2 1e43 f709 605c 2288 2908 .......C..`\".). │ │ │ -00015b60: ab97 f863 8860 11f2 f3f4 08f5 23b1 0288 ...c.`......#... │ │ │ -00015b70: f21e 43f7 0960 5c22 8829 f063 880c 4189 ..C..`\".).c..A. │ │ │ -00015b80: 1484 7500 c6f9 2188 0e42 14da 1e40 0cab ..u...!..B...@.. │ │ │ -00015b90: a70c 4041 40ac 9b0c 4040 8915 ab94 fa0d ..@A@...@@...... │ │ │ -00015ba0: fb5c 22ac 8efc fa0d da5c 2221 ac86 0d0e .\"......\"!.... │ │ │ -00015bb0: 4042 1640 0c41 8914 ac59 0e40 ab97 fd1e @B.@.A...Y.@.... │ │ │ -00015bc0: 43fe 6388 6011 f3f4 0e40 9ff5 2363 88f7 C.c.`....@..#c.. │ │ │ -00015bd0: 0960 5c22 8829 2e07 c6ff 2191 8722 205b .`\".)....!.." [ │ │ │ -00015be0: 6361 6c6c 7320 7020 6361 6c6c 6572 7320 calls p callers │ │ │ -00015bf0: 6279 7465 2d63 6f6d 7069 6c65 2d63 616c byte-compile-cal │ │ │ -00015c00: 6c2d 7472 6565 2d73 6f72 7420 7265 7374 l-tree-sort rest │ │ │ -00015c10: 2066 206d 6573 7361 6765 2022 4765 6e65 f message "Gene │ │ │ -00015c20: 7261 7469 6e67 2063 616c 6c20 7472 6565 rating call tree │ │ │ -00015c30: 2e2e 2e22 2022 2a43 616c 6c2d 5472 6565 ..." "*Call-Tree │ │ │ -00015c40: 2a22 2065 7261 7365 2d62 7566 6665 7220 *" erase-buffer │ │ │ -00015c50: 2247 656e 6572 6174 696e 6720 6361 6c6c "Generating call │ │ │ -00015c60: 2074 7265 652e 2e2e 2028 736f 7274 696e tree... (sortin │ │ │ -00015c70: 6720 6f6e 2025 7329 2220 2243 616c 6c20 g on %s)" "Call │ │ │ -00015c80: 7472 6565 2066 6f72 2022 2022 3f3f 3f22 tree for " "???" │ │ │ -00015c90: 2062 7566 6665 722d 6e61 6d65 2022 2073 buffer-name " s │ │ │ -00015ca0: 6f72 7465 6420 6f6e 2022 2070 7269 6e31 orted on " prin1 │ │ │ -00015cb0: 2d74 6f2d 7374 7269 6e67 2022 3a5c 6e5c -to-string ":\n\ │ │ │ -00015cc0: 6e22 2073 6f72 7420 235b 2878 2079 2920 n" sort #[(x y) │ │ │ -00015cd0: 2209 4140 4708 4140 4757 8722 205b 7920 ".A@G.A@GW." [y │ │ │ -00015ce0: 785d 2032 5d20 235b 2878 2079 2920 22c2 x] 2] #[(x y) ". │ │ │ -00015cf0: 0938 47c2 0838 4757 8722 205b 7920 7820 .8G..8GW." [y x │ │ │ -00015d00: 325d 2033 5d20 6361 6c6c 732b 6361 6c6c 2] 3] calls+call │ │ │ -00015d10: 6572 7320 235b 2878 2079 2920 2209 4140 ers #[(x y) ".A@ │ │ │ -00015d20: 47c2 0938 475c 5c08 4140 47c2 0838 475c G..8G\\.A@G..8G\ │ │ │ -00015d30: 5c57 8722 205b 7920 7820 325d 2034 5d20 \W." [y x 2] 4] │ │ │ -00015d40: 6e61 6d65 2023 5b28 7820 7929 2022 0940 name #[(x y) ".@ │ │ │ -00015d50: 0840 9987 2220 5b79 2078 5d20 325d 2065 .@.." [y x] 2] e │ │ │ -00015d60: 7272 6f72 2022 6062 7974 652d 636f 6d70 rror "`byte-comp │ │ │ -00015d70: 696c 652d 6361 6c6c 2d74 7265 652d 736f ile-call-tree-so │ │ │ -00015d80: 7274 273a 2060 2573 2720 2d20 756e 6b6e rt': `%s' - unkn │ │ │ -00015d90: 6f77 6e20 736f 7274 206d 6f64 6522 206e own sort mode" n │ │ │ -00015da0: 696c 2070 7269 6e31 2032 2022 0922 2066 il prin1 2 "." f │ │ │ -00015db0: 626f 756e 6470 2022 203c 746f 7020 6c65 boundp " " " " subrp " < │ │ │ -00015de0: 7375 6272 3e22 2066 6f72 6d61 7420 2220 subr>" format " │ │ │ -00015df0: 3d3d 3e20 2573 2220 636f 6d70 696c 6564 ==> %s" compiled │ │ │ -00015e00: 2d66 756e 6374 696f 6e2d 7020 223c 636f -function-p " │ │ │ -00015e20: 2220 223c 6d61 6c66 6f72 6d65 6420 6675 " "" macro b │ │ │ -00015e40: 7974 652d 636f 6465 2022 203c 636f 6d70 yte-code " " " < │ │ │ -00015e60: 6d61 6372 6f3e 2220 223c 636f 6d70 696c macro>" "" lamb │ │ │ -00015e80: 6461 2022 3c66 756e 6374 696f 6e3e 2220 da "" │ │ │ -00015e90: 2220 2825 6420 6361 6c6c 6572 7320 2b20 " (%d callers + │ │ │ -00015ea0: 2564 2063 616c 6c73 203d 2025 6429 2220 %d calls = %d)" │ │ │ -00015eb0: 225c 6e22 2022 2020 6361 6c6c 6564 2062 "\n" " called b │ │ │ -00015ec0: 793a 5c6e 2220 2220 2020 2022 206d 6170 y:\n" " " map │ │ │ -00015ed0: 636f 6e63 6174 2073 796d 626f 6c2d 6e61 concat symbol-na │ │ │ -00015ee0: 6d65 2022 2c20 2220 223c 746f 7020 6c65 me ", " "" fill-regio │ │ │ -00015f00: 6e2d 6173 2d70 6172 6167 7261 7068 2022 n-as-paragraph " │ │ │ -00015f10: 2020 6361 6c6c 733a 5c6e 2220 2247 656e calls:\n" "Gen │ │ │ -00015f20: 6572 6174 696e 6720 6361 6c6c 2074 7265 erating call tre │ │ │ -00015f30: 652e 2e2e 2866 696e 6469 6e67 2075 6e63 e...(finding unc │ │ │ -00015f40: 616c 6c65 6420 6675 6e63 7469 6f6e 732e alled functions. │ │ │ -00015f50: 2e2e 2922 2062 7974 652d 636f 6d70 696c ..)" byte-compil │ │ │ -00015f60: 652d 6664 6566 696e 6974 696f 6e20 7420 e-fdefinition t │ │ │ -00015f70: 636f 6d6d 616e 6470 2022 2020 2220 224e commandp " " "N │ │ │ -00015f80: 6f6e 696e 7465 7261 6374 6976 6520 6675 oninteractive fu │ │ │ -00015f90: 6e63 7469 6f6e 7320 6e6f 7420 6b6e 6f77 nctions not know │ │ │ -00015fa0: 6e20 746f 2062 6520 6361 6c6c 6564 3a5c n to be called:\ │ │ │ -00015fb0: 6e20 2022 2022 4765 6e65 7261 7469 6e67 n " "Generating │ │ │ -00015fc0: 2063 616c 6c20 7472 6565 2e2e 2e64 6f6e call tree...don │ │ │ -00015fd0: 652e 2220 756e 6361 6c6c 6564 2062 7974 e." uncalled byt │ │ │ -00015fe0: 652d 636f 6d70 696c 652d 6375 7272 656e e-compile-curren │ │ │ -00015ff0: 742d 6669 6c65 2062 7974 652d 636f 6d70 t-file byte-comp │ │ │ -00016000: 696c 652d 6361 6c6c 2d74 7265 6520 6669 ile-call-tree fi │ │ │ -00016010: 6c6c 2d70 7265 6669 7820 6220 6669 6c65 ll-prefix b file │ │ │ -00016020: 6e61 6d65 5d20 3130 2028 2324 202e 2038 name] 10 (#$ . 8 │ │ │ -00016030: 3739 3736 2920 6e69 6c5d 290a 2340 3239 7976) nil]).#@29 │ │ │ -00016040: 3020 5275 6e20 6062 7974 652d 636f 6d70 0 Run `byte-comp │ │ │ -00016050: 696c 652d 6669 6c65 2720 6f6e 2074 6865 ile-file' on the │ │ │ -00016060: 2066 696c 6573 2072 656d 6169 6e69 6e67 files remaining │ │ │ -00016070: 206f 6e20 7468 6520 636f 6d6d 616e 6420 on the command │ │ │ -00016080: 6c69 6e65 2e0a 5573 6520 7468 6973 2066 line..Use this f │ │ │ -00016090: 726f 6d20 7468 6520 636f 6d6d 616e 6420 rom the command │ │ │ -000160a0: 6c69 6e65 2c20 7769 7468 2060 2d62 6174 line, with `-bat │ │ │ -000160b0: 6368 273b 0a69 7420 776f 6e27 7420 776f ch';.it won't wo │ │ │ -000160c0: 726b 2069 6e20 616e 2069 6e74 6572 6163 rk in an interac │ │ │ -000160d0: 7469 7665 2045 6d61 6373 2e0a 4561 6368 tive Emacs..Each │ │ │ -000160e0: 2066 696c 6520 6973 2070 726f 6365 7373 file is process │ │ │ -000160f0: 6564 2065 7665 6e20 6966 2061 6e20 6572 ed even if an er │ │ │ -00016100: 726f 7220 6f63 6375 7272 6564 2070 7265 ror occurred pre │ │ │ -00016110: 7669 6f75 736c 792e 0a46 6f72 2065 7861 viously..For exa │ │ │ -00016120: 6d70 6c65 2c20 696e 766f 6b65 2022 7865 mple, invoke "xe │ │ │ -00016130: 6d61 6373 202d 6261 7463 6820 2d66 2062 macs -batch -f b │ │ │ -00016140: 6174 6368 2d62 7974 652d 636f 6d70 696c atch-byte-compil │ │ │ -00016150: 6520 2465 6d61 6373 2f20 7e2f 2a2e 656c e $emacs/ ~/*.el │ │ │ -00016160: 222e 1f0a 2864 6566 616c 6961 7320 2762 "...(defalias 'b │ │ │ -00016170: 6174 6368 2d62 7974 652d 636f 6d70 696c atch-byte-compil │ │ │ -00016180: 6520 235b 6e69 6c20 2209 ac84 c2c3 2188 e #[nil ".....!. │ │ │ -00016190: c41a 08ab 88c5 20ac 79c6 12aa 75c7 c821 ...... .y...u..! │ │ │ -000161a0: 88c9 5c6e ab83 caaa 81cb 2129 8722 205b ..\n......!)." [ │ │ │ -000161b0: 636f 6d6d 616e 642d 6c69 6e65 2d61 7267 command-line-arg │ │ │ -000161c0: 732d 6c65 6674 206e 6f6e 696e 7465 7261 s-left nonintera │ │ │ -000161d0: 6374 6976 6520 6572 726f 7220 2260 6261 ctive error "`ba │ │ │ -000161e0: 7463 682d 6279 7465 2d63 6f6d 7069 6c65 tch-byte-compile │ │ │ -000161f0: 2720 6973 2074 6f20 6265 2075 7365 6420 ' is to be used │ │ │ -00016200: 6f6e 6c79 2077 6974 6820 2d62 6174 6368 only with -batch │ │ │ -00016210: 2220 6e69 6c20 6261 7463 682d 6279 7465 " nil batch-byte │ │ │ -00016220: 2d63 6f6d 7069 6c65 2d6f 6e65 2d66 696c -compile-one-fil │ │ │ -00016230: 6520 7420 6d65 7373 6167 6520 2244 6f6e e t message "Don │ │ │ -00016240: 6522 206b 696c 6c2d 656d 6163 7320 3120 e" kill-emacs 1 │ │ │ -00016250: 305d 2032 2028 2324 202e 2039 3031 3738 0] 2 (#$ . 90178 │ │ │ -00016260: 295d 290a 2340 3135 3920 5275 6e20 6062 )]).#@159 Run `b │ │ │ -00016270: 7974 652d 636f 6d70 696c 652d 6669 6c65 yte-compile-file │ │ │ -00016280: 2720 6f6e 2061 2073 696e 676c 6520 6669 ' on a single fi │ │ │ -00016290: 6c65 2072 656d 6169 6e69 6e67 206f 6e20 le remaining on │ │ │ -000162a0: 7468 6520 636f 6d6d 616e 6420 6c69 6e65 the command line │ │ │ -000162b0: 2e0a 5573 6520 7468 6973 2066 726f 6d20 ..Use this from │ │ │ -000162c0: 7468 6520 636f 6d6d 616e 6420 6c69 6e65 the command line │ │ │ -000162d0: 2c20 7769 7468 2060 2d62 6174 6368 273b , with `-batch'; │ │ │ -000162e0: 0a69 7420 776f 6e27 7420 776f 726b 2069 .it won't work i │ │ │ -000162f0: 6e20 616e 2069 6e74 6572 6163 7469 7665 n an interactive │ │ │ -00016300: 2045 6d61 6373 2e1f 0a28 6465 6661 6c69 Emacs...(defali │ │ │ -00016310: 6173 2027 6261 7463 682d 6279 7465 2d63 as 'batch-byte-c │ │ │ -00016320: 6f6d 7069 6c65 2d6f 6e65 2d66 696c 6520 ompile-one-file │ │ │ -00016330: 235b 6e69 6c20 220e 12ac 84c0 c621 88c7 #[nil "......!.. │ │ │ -00016340: 0940 1c18 0941 11c8 c90c 2121 abc6 ca0c .@...A....!!.... │ │ │ -00016350: 21c7 891a 1b89 1dab b6cb 0e13 0d40 5c22 !............@\" │ │ │ -00016360: aba8 cc0d 4021 aca2 c90d 400c 5c22 8913 ....@!....@.\".. │ │ │ -00016370: ab99 cd0b 2189 12ab 92ce 5c6e 21ab 8dcf ....!.....\n!... │ │ │ -00016380: 0b5c 6e5c 22ab 87d0 0b21 ac82 d110 0d41 .\n\"....!.....A │ │ │ -00016390: 8915 ac4a 082b 3faa 83d0 0c21 2a87 2220 ...J.+?....!*." │ │ │ -000163a0: 5b65 7272 6f72 2063 6f6d 6d61 6e64 2d6c [error command-l │ │ │ -000163b0: 696e 652d 6172 6773 2d6c 6566 7420 6465 ine-args-left de │ │ │ -000163c0: 7374 2073 6f75 7263 6520 6669 6c65 2d74 st source file-t │ │ │ -000163d0: 6f2d 7072 6f63 6573 7320 6669 6c65 7320 o-process files │ │ │ -000163e0: 2260 6261 7463 682d 6279 7465 2d63 6f6d "`batch-byte-com │ │ │ -000163f0: 7069 6c65 2d6f 6e65 2d66 696c 6527 2069 pile-one-file' i │ │ │ -00016400: 7320 746f 2062 6520 7573 6564 206f 6e6c s to be used onl │ │ │ -00016410: 7920 7769 7468 202d 6261 7463 6822 206e y with -batch" n │ │ │ -00016420: 696c 2066 696c 652d 6469 7265 6374 6f72 il file-director │ │ │ -00016430: 792d 7020 6578 7061 6e64 2d66 696c 652d y-p expand-file- │ │ │ -00016440: 6e61 6d65 2064 6972 6563 746f 7279 2d66 name directory-f │ │ │ -00016450: 696c 6573 2073 7472 696e 672d 6d61 7463 iles string-matc │ │ │ -00016460: 6820 6175 746f 2d73 6176 652d 6669 6c65 h auto-save-file │ │ │ -00016470: 2d6e 616d 652d 7020 6279 7465 2d63 6f6d -name-p byte-com │ │ │ -00016480: 7069 6c65 2d64 6573 742d 6669 6c65 2066 pile-dest-file f │ │ │ -00016490: 696c 652d 6578 6973 7473 2d70 2066 696c ile-exists-p fil │ │ │ -000164a0: 652d 6e65 7765 722d 7468 616e 2d66 696c e-newer-than-fil │ │ │ -000164b0: 652d 7020 6261 7463 682d 6279 7465 2d63 e-p batch-byte-c │ │ │ -000164c0: 6f6d 7069 6c65 2d31 2074 206e 6f6e 696e ompile-1 t nonin │ │ │ -000164d0: 7465 7261 6374 6976 6520 656d 6163 732d teractive emacs- │ │ │ -000164e0: 6c69 7370 2d66 696c 652d 7265 6765 7870 lisp-file-regexp │ │ │ -000164f0: 5d20 3420 2823 2420 2e20 3930 3733 3029 ] 4 (#$ . 90730) │ │ │ -00016500: 5d29 0a28 6465 6661 6c69 6173 2027 6261 ]).(defalias 'ba │ │ │ -00016510: 7463 682d 6279 7465 2d63 6f6d 7069 6c65 tch-byte-compile │ │ │ -00016520: 2d31 2023 5b28 6669 6c65 2920 22c0 c1c2 -1 #[(file) "... │ │ │ -00016530: 8f87 2220 5b65 7272 2028 6279 7465 2d63 .." [err (byte-c │ │ │ -00016540: 6f64 6520 22c1 0821 88c2 8722 205b 6669 ode "..!..." [fi │ │ │ -00016550: 6c65 2062 7974 652d 636f 6d70 696c 652d le byte-compile- │ │ │ -00016560: 6669 6c65 2074 5d20 3229 2028 2865 7272 file t] 2) ((err │ │ │ -00016570: 6f72 2028 6279 7465 2d63 6f64 6520 22c2 or (byte-code ". │ │ │ -00016580: c321 88c2 0821 88c2 c421 88c5 c621 ab87 .!...!...!...!.. │ │ │ -00016590: c609 c75c 2288 aa91 c209 40c8 4eae 8209 ...\".....@.N... │ │ │ -000165a0: 4021 88c9 ca09 415c 2288 c2cb 2188 c787 @!....A\"...!... │ │ │ -000165b0: 2220 5b66 696c 6520 6572 7220 7072 696e " [file err prin │ │ │ -000165c0: 6320 223e 3e45 7272 6f72 206f 6363 7572 c ">>Error occur │ │ │ -000165d0: 7265 6420 7072 6f63 6573 7369 6e67 2022 red processing " │ │ │ -000165e0: 2022 3a20 2220 6662 6f75 6e64 7020 6469 ": " fboundp di │ │ │ -000165f0: 7370 6c61 792d 6572 726f 7220 6e69 6c20 splay-error nil │ │ │ -00016600: 6572 726f 722d 6d65 7373 6167 6520 6d61 error-message ma │ │ │ -00016610: 7063 6172 2023 5b28 7829 2022 c1c2 2188 pcar #[(x) "..!. │ │ │ -00016620: c308 2187 2220 5b78 2070 7269 6e63 2022 ..!." [x princ " │ │ │ -00016630: 2022 2070 7269 6e31 5d20 325d 2022 5c6e " prin1] 2] "\n │ │ │ -00016640: 225d 2033 2929 295d 2033 5d29 0a23 4036 "] 3)))] 3]).#@6 │ │ │ -00016650: 3520 5361 6d65 2061 7320 6062 6174 6368 5 Same as `batch │ │ │ -00016660: 2d62 7974 652d 7265 636f 6d70 696c 652d -byte-recompile- │ │ │ -00016670: 6469 7265 6374 6f72 7927 2062 7574 2077 directory' but w │ │ │ -00016680: 6974 686f 7574 2072 6563 7572 7369 6f6e ithout recursion │ │ │ -00016690: 2e1f 0a28 6465 6661 6c69 6173 2027 6261 ...(defalias 'ba │ │ │ -000166a0: 7463 682d 6279 7465 2d72 6563 6f6d 7069 tch-byte-recompi │ │ │ -000166b0: 6c65 2d64 6972 6563 746f 7279 2d6e 6f72 le-directory-nor │ │ │ -000166c0: 6563 7572 7365 2023 5b6e 696c 2022 c110 ecurse #[nil ".. │ │ │ -000166d0: c220 8722 205b 6279 7465 2d72 6563 6f6d . ." [byte-recom │ │ │ -000166e0: 7069 6c65 2d64 6972 6563 746f 7279 2d72 pile-directory-r │ │ │ -000166f0: 6563 7572 7369 7665 6c79 206e 696c 2062 ecursively nil b │ │ │ -00016700: 6174 6368 2d62 7974 652d 7265 636f 6d70 atch-byte-recomp │ │ │ -00016710: 696c 652d 6469 7265 6374 6f72 795d 2031 ile-directory] 1 │ │ │ -00016720: 2028 2324 202e 2039 3137 3330 295d 290a (#$ . 91730)]). │ │ │ -00016730: 2340 3231 3320 5275 6e73 2060 6279 7465 #@213 Runs `byte │ │ │ -00016740: 2d72 6563 6f6d 7069 6c65 2d64 6972 6563 -recompile-direc │ │ │ -00016750: 746f 7279 2720 6f6e 2074 6865 2064 6972 tory' on the dir │ │ │ -00016760: 7320 7265 6d61 696e 696e 6720 6f6e 2074 s remaining on t │ │ │ -00016770: 6865 2063 6f6d 6d61 6e64 206c 696e 652e he command line. │ │ │ -00016780: 0a4d 7573 7420 6265 2075 7365 6420 6f6e .Must be used on │ │ │ -00016790: 6c79 2077 6974 6820 602d 6261 7463 6827 ly with `-batch' │ │ │ -000167a0: 2c20 616e 6420 6b69 6c6c 7320 456d 6163 , and kills Emac │ │ │ -000167b0: 7320 6f6e 2063 6f6d 706c 6574 696f 6e2e s on completion. │ │ │ -000167c0: 0a46 6f72 2065 7861 6d70 6c65 2c20 696e .For example, in │ │ │ -000167d0: 766f 6b65 2060 7865 6d61 6373 202d 6261 voke `xemacs -ba │ │ │ -000167e0: 7463 6820 2d66 2062 6174 6368 2d62 7974 tch -f batch-byt │ │ │ -000167f0: 652d 7265 636f 6d70 696c 652d 6469 7265 e-recompile-dire │ │ │ -00016800: 6374 6f72 7920 2e27 2e1f 0a28 6465 6661 ctory .'...(defa │ │ │ -00016810: 6c69 6173 2027 6261 7463 682d 6279 7465 lias 'batch-byte │ │ │ -00016820: 2d72 6563 6f6d 7069 6c65 2d64 6972 6563 -recompile-direc │ │ │ -00016830: 746f 7279 2023 5b6e 696c 2022 09ac 84c3 tory #[nil ".... │ │ │ -00016840: c421 885c 6eac 82c5 12c6 185c 6eab 8bc7 .!.\n......\n... │ │ │ -00016850: 5c6e 4021 885c 6e41 8912 ac75 29c8 c921 \n@!.\nA...u)..! │ │ │ -00016860: 8722 205b 6279 7465 2d72 6563 6f6d 7069 ." [byte-recompi │ │ │ -00016870: 6c65 2d64 6972 6563 746f 7279 2d69 676e le-directory-ign │ │ │ -00016880: 6f72 652d 6572 726f 7273 2d70 206e 6f6e ore-errors-p non │ │ │ -00016890: 696e 7465 7261 6374 6976 6520 636f 6d6d interactive comm │ │ │ -000168a0: 616e 642d 6c69 6e65 2d61 7267 732d 6c65 and-line-args-le │ │ │ -000168b0: 6674 2065 7272 6f72 2022 6261 7463 682d ft error "batch- │ │ │ -000168c0: 6279 7465 2d72 6563 6f6d 7069 6c65 2d64 byte-recompile-d │ │ │ -000168d0: 6972 6563 746f 7279 2069 7320 746f 2062 irectory is to b │ │ │ -000168e0: 6520 7573 6564 206f 6e6c 7920 7769 7468 e used only with │ │ │ -000168f0: 202d 6261 7463 6822 2028 222e 2229 2074 -batch" (".") t │ │ │ -00016900: 2062 7974 652d 7265 636f 6d70 696c 652d byte-recompile- │ │ │ -00016910: 6469 7265 6374 6f72 7920 6b69 6c6c 2d65 directory kill-e │ │ │ -00016920: 6d61 6373 2030 5d20 3320 2823 2420 2e20 macs 0] 3 (#$ . │ │ │ -00016930: 3931 3935 3829 5d29 0a28 6279 7465 2d63 91958)]).(byte-c │ │ │ -00016940: 6f64 6520 22c0 c1c2 5c22 88c0 c3c4 5c22 ode "...\"....\" │ │ │ -00016950: 88c5 c621 88c5 c721 88c8 c921 ab84 cacb ...!...!...!.... │ │ │ -00016960: 4d88 c087 2220 5b6d 616b 652d 6f62 736f M..." [make-obso │ │ │ -00016970: 6c65 7465 2065 6c69 7370 2d63 6f6d 7069 lete elisp-compi │ │ │ -00016980: 6c65 2d64 6566 756e 2063 6f6d 7069 6c65 le-defun compile │ │ │ -00016990: 2d64 6566 756e 2062 7974 652d 636f 6d70 -defun byte-comp │ │ │ -000169a0: 696c 652d 7265 706f 7274 2d63 616c 6c2d ile-report-call- │ │ │ -000169b0: 7472 6565 2064 6973 706c 6179 2d63 616c tree display-cal │ │ │ -000169c0: 6c2d 7472 6565 2070 726f 7669 6465 2062 l-tree provide b │ │ │ -000169d0: 7974 652d 636f 6d70 696c 6520 6279 7465 yte-compile byte │ │ │ -000169e0: 636f 6d70 2062 6f75 6e64 7020 6279 7465 comp boundp byte │ │ │ -000169f0: 2d63 6f64 652d 6d65 7465 7220 6279 7465 -code-meter byte │ │ │ -00016a00: 2d63 6f6d 7069 6c65 2d72 6570 6f72 742d -compile-report- │ │ │ -00016a10: 6f70 7320 235b 6e69 6c20 22c6 90c6 7188 ops #[nil "...q. │ │ │ -00016a20: c7c8 8989 1c1d 1a89 1bc9 57ad d408 c748 ..........W....H │ │ │ -00016a30: 0b48 12c8 140b 15c8 140d 0e15 57ab 8cca .H..........W... │ │ │ -00016a40: 0dcb 5c22 14ca 0dcc 5c22 15aa 8b0d 0959 ..\"....\".....Y │ │ │ -00016a50: ab86 0d09 5a14 0915 0e16 0d48 15cd ce0b ....Z......H.... │ │ │ -00016a60: 5c22 6388 cf0d 2163 880c ab88 d0d1 0c21 \"c...!c.......! │ │ │ -00016a70: d2b1 0388 d36a 88d1 5c6e 21d4 b102 880b .....j..\n!..... │ │ │ -00016a80: 5489 13aa 282c 9187 2220 5b62 7974 652d T...(,.." [byte- │ │ │ -00016a90: 636f 6465 2d6d 6574 6572 2062 7974 652d code-meter byte- │ │ │ -00016aa0: 636f 6e73 7461 6e74 206e 2069 206f 6666 constant n i off │ │ │ -00016ab0: 206f 7020 222a 4d65 7465 722a 2220 3020 op "*Meter*" 0 │ │ │ -00016ac0: 6e69 6c20 3235 3620 6c6f 6761 6e64 2037 nil 256 logand 7 │ │ │ -00016ad0: 2032 3438 2066 6f72 6d61 7420 2225 2d34 248 format "%-4 │ │ │ -00016ae0: 6422 2073 796d 626f 6c2d 6e61 6d65 2022 d" symbol-name " │ │ │ -00016af0: 205b 2220 696e 742d 746f 2d73 7472 696e [" int-to-strin │ │ │ -00016b00: 6720 225d 2220 3430 2022 5c6e 2220 6279 g "]" 40 "\n" by │ │ │ -00016b10: 7465 2d6e 7468 2062 7974 652d 636f 6465 te-nth byte-code │ │ │ -00016b20: 2d76 6563 746f 725d 2036 5d5d 2033 290a -vector] 6]] 3). │ │ │ +00005030: 696c 206e 696c 206e 696c 5d20 6e69 6c5d il nil nil] nil] │ │ │ +00005040: 2031 290a 2340 3537 2054 7572 6e73 206c 1).#@57 Turns l │ │ │ +00005050: 6170 636f 6465 2069 6e74 6f20 6279 7465 apcode into byte │ │ │ +00005060: 636f 6465 2e20 2054 6865 206c 6170 636f code. The lapco │ │ │ +00005070: 6465 2069 7320 6465 7374 726f 7965 642e de is destroyed. │ │ │ +00005080: 1f0a 2864 6566 616c 6961 7320 2762 7974 ..(defalias 'byt │ │ │ +00005090: 652d 636f 6d70 696c 652d 6c61 7063 6f64 e-compile-lapcod │ │ │ +000050a0: 6520 235b 286c 6170 2920 22c6 c789 8989 e #[(lap) "..... │ │ │ +000050b0: 8989 891e 171e 1918 191c 1d1a 1b0e 1883 ................ │ │ │ +000050c0: e600 0e18 4040 120e 1840 4115 5c6e 39ac ....@@...@A.\n9. │ │ │ +000050d0: 88c8 c95c 6e5c 2288 82dd 005c 6eca 61ab ...\n\"....\n.a. │ │ │ +000050e0: 8b0d 0ba0 880d 0942 1182 dd00 5c6e 0e1a .......B....\n.. │ │ │ +000050f0: 73ab 970b cb5c 5c89 130d 4142 c75c 6e4a s....\\...AB.\nJ │ │ │ +00005100: 0c42 4242 8914 0942 1182 dd00 0d3a abad .BBB...B.....:.. │ │ │ +00005110: 0d41 155c 6ecc 61ab a50d 0e1b 57ab 8b0b .A.\n.a.....W... │ │ │ +00005120: 5413 0e0c 0d5c 5c0c 42aa e50b cb5c 5c13 T....\\.B....\\. │ │ │ +00005130: cd0d ce5c 22cf 0dd0 5c22 0e1c 0c42 4242 ...\"...\"...BBB │ │ │ +00005140: aad1 0e1d 5c6e 4a58 ab93 5c6e 4a0e 1e58 ....\nJX..\nJ..X │ │ │ +00005150: ab8c 0bd1 5c5c 130d 5c6e 4a0c 4242 aab7 ....\\..\nJ.BB.. │ │ │ +00005160: 0dd2 57ab 8b0b 5413 5c6e 4a0d 5c5c 0c42 ..W...T.\nJ.\\.B │ │ │ +00005170: aaa7 0dd3 57ab 8e0b d15c 5c13 0d5c 6e4a ....W....\\..\nJ │ │ │ +00005180: d25c 5c0c 4242 aa94 0bcb 5c5c 13cd 0dce .\\.BB....\\.... │ │ │ +00005190: 5c22 cf0d d05c 225c 6e4a d45c 5c0c 4242 \"...\"\nJ.\\.BB │ │ │ +000051a0: 4214 0e18 4189 1618 8417 0009 9f11 c615 B...A........... │ │ │ +000051b0: 0989 10ab d308 4089 1617 403a abbc 0e17 ......@...@:.... │ │ │ +000051c0: 4140 3f0e 1740 1617 abb0 0e17 4140 0e17 A@?..@......A@.. │ │ │ +000051d0: 405a 1619 d50e 1958 aba0 0e19 d657 ab9a @Z.....X.....W.. │ │ │ +000051e0: 0840 0840 4141 a188 0840 4108 4041 400e .@.@AA...@A.@A@. │ │ │ +000051f0: 1f0e 205a 5c5c a088 0d53 150e 1789 400d .. Z\\...S....@. │ │ │ +00005200: 5c5c a088 0841 8910 ac2d 0e21 ab85 0dc6 \\...A...-.!.... │ │ │ +00005210: 55ab 1dc7 1c09 abb6 0940 8914 403a aba8 U........@..@:.. │ │ │ +00005220: 0c41 40ab 8f0c 8940 4140 0c40 405a d65c .A@....@A@.@@Z.\ │ │ │ +00005230: 5ca0 88aa 940c 4041 4013 0c41 cf0b d05c \.....@A@..A...\ │ │ │ +00005240: 22a0 880c cd0b ce5c 22a0 8809 4189 11ac "......\"...A... │ │ │ +00005250: 4a29 0c9f b001 2e08 8722 205b 7265 7374 J)......." [rest │ │ │ +00005260: 2070 6174 6368 6c69 7374 206f 7020 7063 patchlist op pc │ │ │ +00005270: 2062 7974 6573 206f 6666 2030 206e 696c bytes off 0 nil │ │ │ +00005280: 2065 7272 6f72 2022 4e6f 6e2d 7379 6d62 error "Non-symb │ │ │ +00005290: 6f6c 6963 206f 7063 6f64 6520 6025 7327 olic opcode `%s' │ │ │ +000052a0: 2220 5441 4720 3320 6279 7465 2d63 6f6e " TAG 3 byte-con │ │ │ +000052b0: 7374 616e 7420 6c73 6820 2d38 206c 6f67 stant lsh -8 log │ │ │ +000052c0: 616e 6420 3235 3520 3220 3620 3235 3620 and 255 2 6 256 │ │ │ +000052d0: 3720 2d31 3239 2031 3238 2074 6d70 206c 7 -129 128 tmp l │ │ │ +000052e0: 6170 2072 656c 2062 7974 652d 676f 746f ap rel byte-goto │ │ │ +000052f0: 2d6f 7073 2062 7974 652d 636f 6e73 7461 -ops byte-consta │ │ │ +00005300: 6e74 2d6c 696d 6974 2062 7974 652d 636f nt-limit byte-co │ │ │ +00005310: 6e73 7461 6e74 3220 6279 7465 2d6c 6973 nstant2 byte-lis │ │ │ +00005320: 744e 2062 7974 652d 696e 7365 7274 4e20 tN byte-insertN │ │ │ +00005330: 6279 7465 2d72 656c 2d67 6f74 6f20 6279 byte-rel-goto by │ │ │ +00005340: 7465 2d67 6f74 6f20 6279 7465 2d6f 7074 te-goto byte-opt │ │ │ +00005350: 696d 697a 655d 2039 2028 2324 202e 2032 imize] 9 (#$ . 2 │ │ │ +00005360: 3035 3533 295d 290a 2862 7974 652d 636f 0553)]).(byte-co │ │ │ +00005370: 6465 2022 c108 4210 c2c1 21ac 85c3 c1c4 de "..B...!..... │ │ │ +00005380: 5c22 88c5 0842 10c2 c521 ac85 c3c5 c45c \"...B...!.....\ │ │ │ +00005390: 2288 c608 4210 c2c6 21ac 85c3 c6c4 5c22 "...B...!.....\" │ │ │ +000053a0: 88c4 8722 205b 6375 7272 656e 742d 6c6f ..." [current-lo │ │ │ +000053b0: 6164 2d6c 6973 7420 6279 7465 2d63 6f6d ad-list byte-com │ │ │ +000053c0: 7069 6c65 2d63 7572 7265 6e74 2d66 6f72 pile-current-for │ │ │ +000053d0: 6d20 6465 6661 756c 742d 626f 756e 6470 m default-boundp │ │ │ +000053e0: 2073 6574 2d64 6566 6175 6c74 206e 696c set-default nil │ │ │ +000053f0: 2062 7974 652d 636f 6d70 696c 652d 6375 byte-compile-cu │ │ │ +00005400: 7272 656e 742d 6669 6c65 2062 7974 652d rrent-file byte- │ │ │ +00005410: 636f 6d70 696c 652d 6465 7374 2d66 696c compile-dest-fil │ │ │ +00005420: 655d 2033 290a 2864 6566 616c 6961 7320 e] 3).(defalias │ │ │ +00005430: 2762 7974 652d 636f 6d70 696c 652d 6c6f 'byte-compile-lo │ │ │ +00005440: 6720 2728 6d61 6372 6f20 2e20 235b 2866 g '(macro . #[(f │ │ │ +00005450: 6f72 6d61 742d 7374 7269 6e67 2026 7265 ormat-string &re │ │ │ +00005460: 7374 2061 7267 7329 2022 c2c3 c4c5 c6c7 st args) "...... │ │ │ +00005470: 0908 4242 4445 4587 2220 5b61 7267 7320 ..BBDEE." [args │ │ │ +00005480: 666f 726d 6174 2d73 7472 696e 6720 7768 format-string wh │ │ │ +00005490: 656e 2028 616e 6420 6279 7465 2d6f 7074 en (and byte-opt │ │ │ +000054a0: 696d 697a 6520 286d 656d 7120 6279 7465 imize (memq byte │ │ │ +000054b0: 2d6f 7074 696d 697a 652d 6c6f 6720 2728 -optimize-log '( │ │ │ +000054c0: 7420 736f 7572 6365 2929 2920 6c65 7420 t source))) let │ │ │ +000054d0: 2828 7072 696e 742d 6573 6361 7065 2d6e ((print-escape-n │ │ │ +000054e0: 6577 6c69 6e65 7320 7429 2028 7072 696e ewlines t) (prin │ │ │ +000054f0: 742d 6c65 7665 6c20 3429 2028 7072 696e t-level 4) (prin │ │ │ +00005500: 742d 6c65 6e67 7468 2034 2929 2062 7974 t-length 4)) byt │ │ │ +00005510: 652d 636f 6d70 696c 652d 6c6f 672d 3120 e-compile-log-1 │ │ │ +00005520: 666f 726d 6174 5d20 385d 2929 0a28 6279 format] 8])).(by │ │ │ +00005530: 7465 2d63 6f64 6520 22c0 0942 11c2 10c0 te-code "..B.... │ │ │ +00005540: 8722 205b 6279 7465 2d63 6f6d 7069 6c65 ." [byte-compile │ │ │ +00005550: 2d6c 6173 742d 7761 726e 6564 2d66 6f72 -last-warned-for │ │ │ +00005560: 6d20 6375 7272 656e 742d 6c6f 6164 2d6c m current-load-l │ │ │ +00005570: 6973 7420 6e6f 7468 696e 675d 2032 290a ist nothing] 2). │ │ │ +00005580: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +00005590: 636f 6d70 696c 652d 6c6f 672d 3120 235b compile-log-1 #[ │ │ │ +000055a0: 2873 7472 696e 6720 266f 7074 696f 6e61 (string &optiona │ │ │ +000055b0: 6c20 6669 6c6c 2920 2208 ae81 c61b 0dac l fill) "....... │ │ │ +000055c0: 860b 0961 3fad 9ac7 c80b 0d3b ab85 c90d ...a?......;.... │ │ │ +000055d0: 50aa 8dca 0d21 ab87 cbcc 0d21 50aa 81cd P....!.....!P... │ │ │ +000055e0: 231c 0e1c ab8f 0cab 85ce cf0c 5c22 88ce #...........\".. │ │ │ +000055f0: d05c 6e5c 2288 aabe 72d1 d221 7188 6462 .\n\"...r..!q.db │ │ │ +00005600: 880d ab8e 6465 56ab 83d3 6388 d420 d5b1 ....deV...c.. .. │ │ │ +00005610: 0288 0cab 850c d5b1 0288 d65c 6ed5 b103 ...........\n... │ │ │ +00005620: 880e 1dab 91d7 d55c 6e5c 22ac 8bd8 d91e .......\n\"..... │ │ │ +00005630: 1e1e 1fda db21 882a 29db 150b 8911 2a87 .....!.*).....*. │ │ │ +00005640: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ +00005650: 6375 7272 656e 742d 666f 726d 2062 7974 current-form byt │ │ │ +00005660: 652d 636f 6d70 696c 652d 6c61 7374 2d77 e-compile-last-w │ │ │ +00005670: 6172 6e65 642d 666f 726d 2073 7472 696e arned-form strin │ │ │ +00005680: 6720 7468 6973 2d66 6f72 6d20 7768 696c g this-form whil │ │ │ +00005690: 652d 636f 6d70 696c 696e 672d 6d73 6720 e-compiling-msg │ │ │ +000056a0: 6279 7465 2d63 6f6d 7069 6c65 2d63 7572 byte-compile-cur │ │ │ +000056b0: 7265 6e74 2d66 696c 6520 2274 6f70 6c65 rent-file "tople │ │ │ +000056c0: 7665 6c20 666f 726d 7322 2066 6f72 6d61 vel forms" forma │ │ │ +000056d0: 7420 2257 6869 6c65 2063 6f6d 7069 6c69 t "While compili │ │ │ +000056e0: 6e67 2025 7325 733a 2220 2220 696e 2066 ng %s%s:" " in f │ │ │ +000056f0: 696c 6520 2220 6275 6666 6572 7020 2220 ile " bufferp " │ │ │ +00005700: 696e 2062 7566 6665 7220 2220 6275 6666 in buffer " buff │ │ │ +00005710: 6572 2d6e 616d 6520 2222 206d 6573 7361 er-name "" messa │ │ │ +00005720: 6765 2022 2573 2220 2220 2025 7322 2067 ge "%s" " %s" g │ │ │ +00005730: 6574 2d62 7566 6665 722d 6372 6561 7465 et-buffer-create │ │ │ +00005740: 2022 2a43 6f6d 7069 6c65 2d4c 6f67 2a22 "*Compile-Log*" │ │ │ +00005750: 2022 5c6e 0c5c 6e22 2063 7572 7265 6e74 "\n.\n" current │ │ │ +00005760: 2d74 696d 652d 7374 7269 6e67 2022 5c6e -time-string "\n │ │ │ +00005770: 2220 2220 2022 2073 7472 696e 672d 6d61 " " " string-ma │ │ │ +00005780: 7463 6820 2220 2020 2020 2220 3738 2066 tch " " 78 f │ │ │ +00005790: 696c 6c2d 7061 7261 6772 6170 6820 6e69 ill-paragraph ni │ │ │ +000057a0: 6c20 6e6f 6e69 6e74 6572 6163 7469 7665 l noninteractive │ │ │ +000057b0: 2066 696c 6c20 6669 6c6c 2d63 6f6c 756d fill fill-colum │ │ │ +000057c0: 6e20 6669 6c6c 2d70 7265 6669 785d 2036 n fill-prefix] 6 │ │ │ +000057d0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +000057e0: 7465 2d63 6f6d 7069 6c65 2d6c 6f67 2d66 te-compile-log-f │ │ │ +000057f0: 696c 6520 235b 6e69 6c20 2209 adaf 083f ile #[nil "....? │ │ │ +00005800: adab 72c2 c321 7188 6465 56ab 8664 6288 ..r..!q.deV..db. │ │ │ +00005810: c463 88c5 093b ab85 c609 50aa 85c7 c809 .c...;....P..... │ │ │ +00005820: 2150 c9ca 20cb b105 88cc 8911 2987 2220 !P.. .......)." │ │ │ +00005830: 5b6e 6f6e 696e 7465 7261 6374 6976 6520 [noninteractive │ │ │ +00005840: 6279 7465 2d63 6f6d 7069 6c65 2d63 7572 byte-compile-cur │ │ │ +00005850: 7265 6e74 2d66 696c 6520 6765 742d 6275 rent-file get-bu │ │ │ +00005860: 6666 6572 2d63 7265 6174 6520 222a 436f ffer-create "*Co │ │ │ +00005870: 6d70 696c 652d 4c6f 672a 2220 225c 6e0c mpile-Log*" "\n. │ │ │ +00005880: 5c6e 2220 2243 6f6d 7069 6c69 6e67 2022 \n" "Compiling " │ │ │ +00005890: 2022 6669 6c65 2022 2022 6275 6666 6572 "file " "buffer │ │ │ +000058a0: 2022 2062 7566 6665 722d 6e61 6d65 2022 " buffer-name " │ │ │ +000058b0: 2061 7420 2220 6375 7272 656e 742d 7469 at " current-ti │ │ │ +000058c0: 6d65 2d73 7472 696e 6720 225c 6e22 206e me-string "\n" n │ │ │ +000058d0: 696c 5d20 355d 290a 2864 6566 616c 6961 il] 5]).(defalia │ │ │ +000058e0: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ +000058f0: 7761 726e 2023 5b28 666f 726d 6174 2026 warn #[(format & │ │ │ +00005900: 7265 7374 2061 7267 7329 2022 c4c3 0b5c rest args) "...\ │ │ │ +00005910: 6e23 1309 ab85 c5c6 0b5c 2287 c7c8 0b50 n#.......\"....P │ │ │ +00005920: c95c 2288 08ae 84ca cb0b 5c22 8722 205b .\".......\"." [ │ │ │ +00005930: 6e6f 6e69 6e74 6572 6163 7469 7665 2062 noninteractive b │ │ │ +00005940: 7974 652d 636f 6d70 696c 652d 6572 726f yte-compile-erro │ │ │ +00005950: 722d 6f6e 2d77 6172 6e20 6172 6773 2066 r-on-warn args f │ │ │ +00005960: 6f72 6d61 7420 6170 706c 7920 6572 726f ormat apply erro │ │ │ +00005970: 7220 2225 7322 2062 7974 652d 636f 6d70 r "%s" byte-comp │ │ │ +00005980: 696c 652d 6c6f 672d 3120 222a 2a20 2220 ile-log-1 "** " │ │ │ +00005990: 7420 6d65 7373 6167 6520 2257 6172 6e69 t message "Warni │ │ │ +000059a0: 6e67 3a20 2573 225d 2034 5d29 0a28 6465 ng: %s"] 4]).(de │ │ │ +000059b0: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ +000059c0: 7069 6c65 2d72 6570 6f72 742d 6572 726f pile-report-erro │ │ │ +000059d0: 7220 235b 2865 7272 6f72 2d69 6e66 6f29 r #[(error-info) │ │ │ +000059e0: 2022 c311 c4c5 c65c 6e41 ab83 c7aa 81c8 ".....\nA...... │ │ │ +000059f0: 5c6e 40c9 4eca 5c6e 4121 2350 2188 08ad \n@.N.\nA!#P!... │ │ │ +00005a00: 84cb ccc3 5c22 8722 205b 7374 6163 6b2d ....\"." [stack- │ │ │ +00005a10: 7472 6163 652d 6f6e 2d65 7272 6f72 2062 trace-on-error b │ │ │ +00005a20: 7974 652d 636f 6d70 696c 6572 2d65 7272 yte-compiler-err │ │ │ +00005a30: 6f72 2d66 6c61 6720 6572 726f 722d 696e or-flag error-in │ │ │ +00005a40: 666f 2074 2062 7974 652d 636f 6d70 696c fo t byte-compil │ │ │ +00005a50: 652d 6c6f 672d 3120 2221 2120 2220 666f e-log-1 "!! " fo │ │ │ +00005a60: 726d 6174 2022 2573 2028 2573 2922 2022 rmat "%s (%s)" " │ │ │ +00005a70: 2573 2220 6572 726f 722d 6d65 7373 6167 %s" error-messag │ │ │ +00005a80: 6520 7072 696e 312d 746f 2d73 7472 696e e prin1-to-strin │ │ │ +00005a90: 6720 6261 636b 7472 6163 6520 6e69 6c5d g backtrace nil] │ │ │ +00005aa0: 2037 5d29 0a28 6465 6661 6c69 6173 2027 7]).(defalias ' │ │ │ +00005ab0: 6279 7465 2d63 6f6d 7069 6c65 2d6f 6273 byte-compile-obs │ │ │ +00005ac0: 6f6c 6574 6520 235b 2866 6f72 6d29 2022 olete #[(form) " │ │ │ +00005ad0: 0940 c34e 1ac4 0873 ab94 c5c6 0940 5c6e .@.N...s.....@\n │ │ │ +00005ae0: 403b ab84 5c6e 40aa 85c7 c85c 6e40 5c22 @;..\n@....\n@\" │ │ │ +00005af0: 2388 5c6e 41ae 81c9 0921 2987 2220 5b62 #.\nA....!)." [b │ │ │ +00005b00: 7974 652d 636f 6d70 696c 652d 7761 726e yte-compile-warn │ │ │ +00005b10: 696e 6773 2066 6f72 6d20 6e65 7720 6279 ings form new by │ │ │ +00005b20: 7465 2d6f 6273 6f6c 6574 652d 696e 666f te-obsolete-info │ │ │ +00005b30: 206f 6273 6f6c 6574 6520 6279 7465 2d63 obsolete byte-c │ │ │ +00005b40: 6f6d 7069 6c65 2d77 6172 6e20 2225 7320 ompile-warn "%s │ │ │ +00005b50: 6973 2061 6e20 6f62 736f 6c65 7465 2066 is an obsolete f │ │ │ +00005b60: 756e 6374 696f 6e3b 2025 7322 2066 6f72 unction; %s" for │ │ │ +00005b70: 6d61 7420 2275 7365 2025 7320 696e 7374 mat "use %s inst │ │ │ +00005b80: 6561 642e 2220 6279 7465 2d63 6f6d 7069 ead." byte-compi │ │ │ +00005b90: 6c65 2d6e 6f72 6d61 6c2d 6361 6c6c 5d20 le-normal-call] │ │ │ +00005ba0: 365d 290a 2864 6566 616c 6961 7320 2762 6]).(defalias 'b │ │ │ +00005bb0: 7974 652d 636f 6d70 696c 652d 636f 6d70 yte-compile-comp │ │ │ +00005bc0: 6174 6962 6c65 2023 5b28 666f 726d 2920 atible #[(form) │ │ │ +00005bd0: 2209 40c3 4e1a c408 73ab 94c5 c609 405c ".@.N...s.....@\ │ │ │ +00005be0: 6e40 3bab 845c 6e40 aa85 c7c8 5c6e 405c n@;..\n@....\n@\ │ │ │ +00005bf0: 2223 885c 6e41 ae81 c909 2129 8722 205b "#.\nA....!)." [ │ │ │ +00005c00: 6279 7465 2d63 6f6d 7069 6c65 2d77 6172 byte-compile-war │ │ │ +00005c10: 6e69 6e67 7320 666f 726d 206e 6577 2062 nings form new b │ │ │ +00005c20: 7974 652d 636f 6d70 6174 6962 6c65 2d69 yte-compatible-i │ │ │ +00005c30: 6e66 6f20 7065 6461 6e74 6963 2062 7974 nfo pedantic byt │ │ │ +00005c40: 652d 636f 6d70 696c 652d 7761 726e 2022 e-compile-warn " │ │ │ +00005c50: 2573 2069 7320 7072 6f76 6964 6564 2066 %s is provided f │ │ │ +00005c60: 6f72 2063 6f6d 7061 7469 6269 6c69 7479 or compatibility │ │ │ +00005c70: 3b20 2573 2220 666f 726d 6174 2022 7573 ; %s" format "us │ │ │ +00005c80: 6520 2573 2069 6e73 7465 6164 2e22 2062 e %s instead." b │ │ │ +00005c90: 7974 652d 636f 6d70 696c 652d 6e6f 726d yte-compile-norm │ │ │ +00005ca0: 616c 2d63 616c 6c5d 2036 5d29 0a28 6279 al-call] 6]).(by │ │ │ +00005cb0: 7465 2d63 6f64 6520 22c1 5c6e 4212 c311 te-code ".\nB... │ │ │ +00005cc0: c05c 6e42 12c4 1009 11c1 8722 205b 6279 .\nB......." [by │ │ │ +00005cd0: 7465 2d63 6f6d 7069 6c65 722d 6f62 736f te-compiler-obso │ │ │ +00005ce0: 6c65 7465 2d6f 7074 696f 6e73 2062 7974 lete-options byt │ │ │ +00005cf0: 652d 636f 6d70 696c 6572 2d6c 6567 616c e-compiler-legal │ │ │ +00005d00: 2d6f 7074 696f 6e73 2063 7572 7265 6e74 -options current │ │ │ +00005d10: 2d6c 6f61 642d 6c69 7374 2028 286f 7074 -load-list ((opt │ │ │ +00005d20: 696d 697a 6520 6279 7465 2d6f 7074 696d imize byte-optim │ │ │ +00005d30: 697a 6520 2874 206e 696c 2073 6f75 7263 ize (t nil sourc │ │ │ +00005d40: 6520 6279 7465 2920 7661 6c29 2028 6669 e byte) val) (fi │ │ │ +00005d50: 6c65 2d66 6f72 6d61 7420 6279 7465 2d63 le-format byte-c │ │ │ +00005d60: 6f6d 7069 6c65 2d65 6d61 6373 3139 2d63 ompile-emacs19-c │ │ │ +00005d70: 6f6d 7061 7469 6269 6c69 7479 2028 656d ompatibility (em │ │ │ +00005d80: 6163 7331 3920 656d 6163 7332 3029 2028 acs19 emacs20) ( │ │ │ +00005d90: 6571 2076 616c 2027 656d 6163 7331 3929 eq val 'emacs19) │ │ │ +00005da0: 2920 2864 656c 6574 652d 6572 726f 7273 ) (delete-errors │ │ │ +00005db0: 2062 7974 652d 636f 6d70 696c 652d 6465 byte-compile-de │ │ │ +00005dc0: 6c65 7465 2d65 7272 6f72 7320 2874 206e lete-errors (t n │ │ │ +00005dd0: 696c 2920 7661 6c29 2028 7665 7262 6f73 il) val) (verbos │ │ │ +00005de0: 6520 6279 7465 2d63 6f6d 7069 6c65 2d76 e byte-compile-v │ │ │ +00005df0: 6572 626f 7365 2028 7420 6e69 6c29 2076 erbose (t nil) v │ │ │ +00005e00: 616c 2920 286e 6577 2d62 7974 6563 6f64 al) (new-bytecod │ │ │ +00005e10: 6573 2062 7974 652d 636f 6d70 696c 652d es byte-compile- │ │ │ +00005e20: 6e65 772d 6279 7465 636f 6465 7320 2874 new-bytecodes (t │ │ │ +00005e30: 206e 696c 2920 7661 6c29 2028 7761 726e nil) val) (warn │ │ │ +00005e40: 696e 6773 2062 7974 652d 636f 6d70 696c ings byte-compil │ │ │ +00005e50: 652d 7761 726e 696e 6773 2028 2863 616c e-warnings ((cal │ │ │ +00005e60: 6c61 7267 7320 7375 6272 2d63 616c 6c61 largs subr-calla │ │ │ +00005e70: 7267 7320 7265 6465 6669 6e65 2066 7265 rgs redefine fre │ │ │ +00005e80: 652d 7661 7273 2075 6e75 7365 642d 7661 e-vars unused-va │ │ │ +00005e90: 7273 2075 6e72 6573 6f6c 7665 6429 2920 rs unresolved)) │ │ │ +00005ea0: 7661 6c29 2920 2828 6e65 772d 6279 7465 val)) ((new-byte │ │ │ +00005eb0: 636f 6465 7320 7429 295d 2032 290a 2864 codes t))] 2).(d │ │ │ +00005ec0: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ +00005ed0: 6d70 696c 6572 2d6f 7074 696f 6e73 2d68 mpiler-options-h │ │ │ +00005ee0: 616e 646c 6572 2023 5b28 2672 6573 7420 andler #[(&rest │ │ │ +00005ef0: 6172 6773 2920 22c6 8989 891d 191b 1a0c args) "......... │ │ │ +00005f00: 83cc 000c 403a ab8b 0c40 4141 ac85 0c40 ....@:...@AA...@ │ │ │ +00005f10: 41ac 86c7 c80c 405c 2288 0c40 4012 0c40 A.....@\"..@@..@ │ │ │ +00005f20: 4140 135c 6e0e 1bb7 8911 ac85 c7c9 5c6e A@.\n.........\n │ │ │ +00005f30: 5c22 885c 6e0e 1cb7 ab85 cacb 5c6e 5c22 \".\n.......\n\" │ │ │ +00005f40: 88cc 0938 8915 403a abe4 c618 cd1e 1809 ...8..@:........ │ │ │ +00005f50: 4140 1e1a 0b40 ce73 ad90 cf0e 1a4a d061 A@...@.s.....J.a │ │ │ +00005f60: ab84 0d40 aa83 0e1a 4a21 1e19 0d40 150b ...@....J!...@.. │ │ │ +00005f70: abb2 0b40 8910 0d73 ab8a 0e18 080e 195c ...@...s.......\ │ │ │ +00005f80: 2216 19aa 9a08 d161 ab85 cd16 18aa 9008 "......a........ │ │ │ +00005f90: d261 ab85 d316 18aa 86c7 d45c 6e0d 2388 .a.........\n.#. │ │ │ +00005fa0: 0b41 8913 ac4e 0941 400e 194c 882c aa95 .A...N.A@..L.,.. │ │ │ +00005fb0: 0b0d 73ac 86c7 d55c 6e0d 2388 0941 40d6 ..s....\n.#..A@. │ │ │ +00005fc0: d709 3821 4c88 0c41 8914 840c 002c c687 ..8!L..A.....,.. │ │ │ +00005fd0: 2220 5b74 6869 7320 6465 7363 206b 6579 " [this desc key │ │ │ +00005fe0: 2076 616c 2061 7267 7320 6368 6f69 6365 val args choice │ │ │ +00005ff0: 7320 6e69 6c20 6572 726f 7220 226d 616c s nil error "mal │ │ │ +00006000: 666f 726d 6564 2062 7974 652d 636f 6d70 formed byte-comp │ │ │ +00006010: 696c 6572 2d6f 7074 696f 6e20 2573 2220 iler-option %s" │ │ │ +00006020: 2275 6e6b 6e6f 776e 2062 7974 652d 636f "unknown byte-co │ │ │ +00006030: 6d70 696c 6572 206f 7074 696f 6e20 2573 mpiler option %s │ │ │ +00006040: 2220 6279 7465 2d63 6f6d 7069 6c65 2d77 " byte-compile-w │ │ │ +00006050: 6172 6e20 2225 7320 6973 2061 6e20 6f62 arn "%s is an ob │ │ │ +00006060: 736f 6c65 7465 2062 7974 652d 636f 6d70 solete byte-comp │ │ │ +00006070: 696c 6572 206f 7074 696f 6e2e 2220 3220 iler option." 2 │ │ │ +00006080: 636f 6e73 2028 2b20 2d29 2063 6f70 792d cons (+ -) copy- │ │ │ +00006090: 7365 7175 656e 6365 2074 202b 202d 2064 sequence t + - d │ │ │ +000060a0: 656c 7120 2225 7320 6f6e 6c79 2061 6363 elq "%s only acc │ │ │ +000060b0: 6570 7473 2025 732e 2220 2225 7320 6d75 epts %s." "%s mu │ │ │ +000060c0: 7374 2062 6520 6f6e 6520 6f66 2025 732e st be one of %s. │ │ │ +000060d0: 2220 6576 616c 2033 2068 616e 646c 6572 " eval 3 handler │ │ │ +000060e0: 2072 6574 2076 6172 2062 7974 652d 636f ret var byte-co │ │ │ +000060f0: 6d70 696c 6572 2d6c 6567 616c 2d6f 7074 mpiler-legal-opt │ │ │ +00006100: 696f 6e73 2062 7974 652d 636f 6d70 696c ions byte-compil │ │ │ +00006110: 6572 2d6f 6273 6f6c 6574 652d 6f70 7469 er-obsolete-opti │ │ │ +00006120: 6f6e 735d 2035 5d29 0a28 6465 6661 6c69 ons] 5]).(defali │ │ │ +00006130: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +00006140: 2d66 6465 6669 6e69 7469 6f6e 2023 5b28 -fdefinition #[( │ │ │ +00006150: 6e61 6d65 206d 6163 726f 2d70 2920 220c name macro-p) ". │ │ │ +00006160: c673 ab83 09aa 8108 1b5c 6e0b b741 891e .s.......\n..A.. │ │ │ +00006170: 0dae e45c 6e89 1d39 aba8 c70d 21ab a30d ...\n..9....!... │ │ │ +00006180: 4b39 ac98 0d4b 3aac 930c ac86 c80d 4b21 K9...K:.......K! │ │ │ +00006190: ac8a 0cc9 61ab 8bca 0d21 ab86 0d4b 8915 ....a....!...K.. │ │ │ +000061a0: aa55 0cac 85c8 0d21 ac8a 0cc9 61ab 88ca .U.....!....a... │ │ │ +000061b0: 0d21 ab83 0daa a00d 3aad 9c0c c961 3fad .!......:....a?. │ │ │ +000061c0: 960d 40cb 61ab 840d 41aa 8c0c 3fad 880d ..@.a...A...?... │ │ │ +000061d0: 40cc 613f ad81 0d29 2a87 2220 5b62 7974 @.a?...)*." [byt │ │ │ +000061e0: 652d 636f 6d70 696c 652d 6d61 6372 6f2d e-compile-macro- │ │ │ +000061f0: 656e 7669 726f 6e6d 656e 7420 6279 7465 environment byte │ │ │ +00006200: 2d63 6f6d 7069 6c65 2d66 756e 6374 696f -compile-functio │ │ │ +00006210: 6e2d 656e 7669 726f 6e6d 656e 7420 6e61 n-environment na │ │ │ +00006220: 6d65 206c 6973 7420 6d61 6372 6f2d 7020 me list macro-p │ │ │ +00006230: 666e 2028 6e69 6c20 7375 6272 2920 6662 fn (nil subr) fb │ │ │ +00006240: 6f75 6e64 7020 636f 6d70 696c 6564 2d66 oundp compiled-f │ │ │ +00006250: 756e 6374 696f 6e2d 7020 7375 6272 2073 unction-p subr s │ │ │ +00006260: 7562 7270 206d 6163 726f 2061 7574 6f6c ubrp macro autol │ │ │ +00006270: 6f61 6420 656e 765d 2033 5d29 0a28 6465 oad env] 3]).(de │ │ │ +00006280: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ +00006290: 7069 6c65 2d61 7267 6c69 7374 2d73 6967 pile-arglist-sig │ │ │ +000062a0: 6e61 7475 7265 2023 5b28 6172 676c 6973 nature #[(arglis │ │ │ +000062b0: 7429 2022 c4c5 8918 1b19 5c6e abae 5c6e t) "......\n..\n │ │ │ +000062c0: 40c6 61ab 870b ac9f c413 aa9b 5c6e 40c7 @.a.........\n@. │ │ │ +000062d0: 61ab 8a5c 6e41 ab91 c810 c512 aa8b 0bab a..\nA.......... │ │ │ +000062e0: 850b 5413 aa83 0954 115c 6e41 8912 ac52 ..T....T.\nA...R │ │ │ +000062f0: 0908 3fad 890b ab85 090b 5c5c aa81 092b ..?.......\\...+ │ │ │ +00006300: 4287 2220 5b72 6573 7470 2061 7267 7320 B." [restp args │ │ │ +00006310: 6172 676c 6973 7420 6f70 7473 2030 206e arglist opts 0 n │ │ │ +00006320: 696c 2026 6f70 7469 6f6e 616c 2026 7265 il &optional &re │ │ │ +00006330: 7374 2074 5d20 345d 290a 2864 6566 616c st t] 4]).(defal │ │ │ +00006340: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00006350: 652d 6172 676c 6973 742d 7369 676e 6174 e-arglist-signat │ │ │ +00006360: 7572 6573 2d63 6f6e 6772 7565 6e74 2d70 ures-congruent-p │ │ │ +00006370: 2023 5b28 6f6c 6420 6e65 7729 2022 0940 #[(old new) ".@ │ │ │ +00006380: 0840 56ae 9508 41ac 8409 41ae 8d09 41ad .@V...A...A...A. │ │ │ +00006390: 8908 41ad 8509 4108 4157 3f87 2220 5b6f ..A...A.AW?." [o │ │ │ +000063a0: 6c64 206e 6577 5d20 325d 290a 2864 6566 ld new] 2]).(def │ │ │ +000063b0: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ +000063c0: 696c 652d 6172 676c 6973 742d 7369 676e ile-arglist-sign │ │ │ +000063d0: 6174 7572 652d 7374 7269 6e67 2023 5b28 ature-string #[( │ │ │ +000063e0: 7369 676e 6174 7572 6529 2022 0841 ac86 signature) ".A.. │ │ │ +000063f0: c1c2 0840 5c22 8708 4008 4155 ab86 c1c3 ...@\"..@.AU.... │ │ │ +00006400: 0840 5c22 87c1 c408 4008 4123 8722 205b .@\"....@.A#." [ │ │ │ +00006410: 7369 676e 6174 7572 6520 666f 726d 6174 signature format │ │ │ +00006420: 2022 2564 2b22 2022 2564 2220 2225 642d "%d+" "%d" "%d- │ │ │ +00006430: 2564 225d 2034 5d29 0a28 6465 6661 6c69 %d"] 4]).(defali │ │ │ +00006440: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +00006450: 2d63 616c 6c61 7267 732d 7761 726e 2023 -callargs-warn # │ │ │ +00006460: 5b28 666f 726d 2920 22c6 0d40 c75c 22ae [(form) "..@.\". │ │ │ +00006470: 85c6 0d40 c85c 2289 1cad 98c9 0ca2 ca61 ...@.\"........a │ │ │ +00006480: ab85 0c41 40aa 8bcb 0c21 ab85 cc0c 21aa ...A@....!....!. │ │ │ +00006490: 81cd 211b 0d41 471a 0cac 96ce cf21 ab91 ..!..AG......!.. │ │ │ +000064a0: c60d 40d0 5c22 8914 ab88 cf0c 21d1 0c21 ..@.\"......!..! │ │ │ +000064b0: 4213 0bab af5c 6e0b 4057 ac8a 0b41 add8 B....\n.@W...A.. │ │ │ +000064c0: 5c6e 0b41 56ad d2d2 d30d 405c 6ed4 5c6e \n.AV.....@\n.\n │ │ │ +000064d0: 55ab 83d5 aa81 d65c 6e0b 4057 ab83 d7aa U......\n.@W.... │ │ │ +000064e0: 81d8 d90b 2126 06aa b3ce 0d40 21ae ad0d ....!&.....@!... │ │ │ +000064f0: 400e 1b61 aea6 0d40 0e1a b70d 4147 1989 @..a...@....AG.. │ │ │ +00006500: 18ab 8e09 0841 73ae 9208 0908 4142 a1aa .....As.....AB.. │ │ │ +00006510: 8a0d 4009 440e 1a42 8916 1a2a 2b87 2220 ..@.D..B...*+." │ │ │ +00006520: 5b63 6f6e 7320 6e20 6e63 616c 6c20 7369 [cons n ncall si │ │ │ +00006530: 6720 6465 6620 666f 726d 2062 7974 652d g def form byte- │ │ │ +00006540: 636f 6d70 696c 652d 6664 6566 696e 6974 compile-fdefinit │ │ │ +00006550: 696f 6e20 6e69 6c20 7420 6279 7465 2d63 ion nil t byte-c │ │ │ +00006560: 6f6d 7069 6c65 2d61 7267 6c69 7374 2d73 ompile-arglist-s │ │ │ +00006570: 6967 6e61 7475 7265 206c 616d 6264 6120 ignature lambda │ │ │ +00006580: 636f 6d70 696c 6564 2d66 756e 6374 696f compiled-functio │ │ │ +00006590: 6e2d 7020 636f 6d70 696c 6564 2d66 756e n-p compiled-fun │ │ │ +000065a0: 6374 696f 6e2d 6172 676c 6973 7420 2826 ction-arglist (& │ │ │ +000065b0: 7265 7374 2064 6566 2920 6662 6f75 6e64 rest def) fbound │ │ │ +000065c0: 7020 7375 6272 2d6d 696e 2d61 7267 7320 p subr-min-args │ │ │ +000065d0: 7375 6272 2073 7562 722d 6d61 782d 6172 subr subr-max-ar │ │ │ +000065e0: 6773 2062 7974 652d 636f 6d70 696c 652d gs byte-compile- │ │ │ +000065f0: 7761 726e 2022 2573 2063 616c 6c65 6420 warn "%s called │ │ │ +00006600: 7769 7468 2025 6420 6172 6775 6d65 6e74 with %d argument │ │ │ +00006610: 2573 2c20 6275 7420 2573 2025 7322 2031 %s, but %s %s" 1 │ │ │ +00006620: 2022 2220 2273 2220 2272 6571 7569 7265 "" "s" "require │ │ │ +00006630: 7322 2022 6163 6365 7074 7320 6f6e 6c79 s" "accepts only │ │ │ +00006640: 2220 6279 7465 2d63 6f6d 7069 6c65 2d61 " byte-compile-a │ │ │ +00006650: 7267 6c69 7374 2d73 6967 6e61 7475 7265 rglist-signature │ │ │ +00006660: 2d73 7472 696e 6720 6279 7465 2d63 6f6d -string byte-com │ │ │ +00006670: 7069 6c65 2d75 6e72 6573 6f6c 7665 642d pile-unresolved- │ │ │ +00006680: 6675 6e63 7469 6f6e 7320 6279 7465 2d63 functions byte-c │ │ │ +00006690: 6f6d 7069 6c65 2d63 7572 7265 6e74 2d66 ompile-current-f │ │ │ +000066a0: 6f72 6d5d 2039 5d29 0a28 6465 6661 6c69 orm] 9]).(defali │ │ │ +000066b0: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +000066c0: 2d61 7267 6c69 7374 2d77 6172 6e20 235b -arglist-warn #[ │ │ │ +000066d0: 2866 6f72 6d20 6d61 6372 6f70 2920 22c6 (form macrop) ". │ │ │ +000066e0: 0d41 400e 245c 2289 1bab cbc7 0ba2 c861 .A@.$\"........a │ │ │ +000066f0: ab85 0b41 40aa 8bc9 0b21 ab85 ca0b 21aa ...A@....!....!. │ │ │ +00006700: 81cb 21c7 cc0d 3821 1e20 1acd 5c6e 0e20 ..!...8!. ..\n. │ │ │ +00006710: 5c22 aea1 cecf 0d40 d061 ab83 d1aa 81d2 \".....@.a...... │ │ │ +00006720: 0d41 40d3 5c6e 215c 6ed4 6bab 83d5 aa81 .A@.\n!\n.k..... │ │ │ +00006730: d6d3 0e20 2126 062a aade 0d41 400e 21b7 ... !&.*...A@.!. │ │ │ +00006740: d789 8989 1918 1c1e 5c22 891e 23ad c9c7 ........\"..#... │ │ │ +00006750: cc0d 3821 14d8 d90e 2341 21da 5c22 8916 ..8!....#A!.\".. │ │ │ +00006760: 5c22 4010 0e5c 229f 4011 080c 4057 ac8a \"@..\".@...@W.. │ │ │ +00006770: 0c41 ab9e 090c 4156 ab98 cedb 0d41 40d3 .A....AV.....A@. │ │ │ +00006780: 0c21 0cdc 6bab 83dd aa81 ded3 0809 4221 .!..k.........B! │ │ │ +00006790: 2588 df0e 230e 215c 2289 1621 2d29 8722 %...#.!\"..!-)." │ │ │ +000067a0: 205b 6d69 6e20 6d61 7820 7369 6731 206f [min max sig1 o │ │ │ +000067b0: 6c64 2073 6967 2066 6f72 6d20 6279 7465 ld sig form byte │ │ │ +000067c0: 2d63 6f6d 7069 6c65 2d66 6465 6669 6e69 -compile-fdefini │ │ │ +000067d0: 7469 6f6e 2062 7974 652d 636f 6d70 696c tion byte-compil │ │ │ +000067e0: 652d 6172 676c 6973 742d 7369 676e 6174 e-arglist-signat │ │ │ +000067f0: 7572 6520 6c61 6d62 6461 2063 6f6d 7069 ure lambda compi │ │ │ +00006800: 6c65 642d 6675 6e63 7469 6f6e 2d70 2063 led-function-p c │ │ │ +00006810: 6f6d 7069 6c65 642d 6675 6e63 7469 6f6e ompiled-function │ │ │ +00006820: 2d61 7267 6c69 7374 2028 2672 6573 7420 -arglist (&rest │ │ │ +00006830: 6465 6629 2032 2062 7974 652d 636f 6d70 def) 2 byte-comp │ │ │ +00006840: 696c 652d 6172 676c 6973 742d 7369 676e ile-arglist-sign │ │ │ +00006850: 6174 7572 6573 2d63 6f6e 6772 7565 6e74 atures-congruent │ │ │ +00006860: 2d70 2062 7974 652d 636f 6d70 696c 652d -p byte-compile- │ │ │ +00006870: 7761 726e 2022 2573 2025 7320 7573 6564 warn "%s %s used │ │ │ +00006880: 2074 6f20 7461 6b65 2025 7320 2573 2c20 to take %s %s, │ │ │ +00006890: 6e6f 7720 7461 6b65 7320 2573 2220 6465 now takes %s" de │ │ │ +000068a0: 6675 6e20 2266 756e 6374 696f 6e22 2022 fun "function" " │ │ │ +000068b0: 6d61 6372 6f22 2062 7974 652d 636f 6d70 macro" byte-comp │ │ │ +000068c0: 696c 652d 6172 676c 6973 742d 7369 676e ile-arglist-sign │ │ │ +000068d0: 6174 7572 652d 7374 7269 6e67 2028 3120 ature-string (1 │ │ │ +000068e0: 2e20 3129 2022 6172 6775 6d65 6e74 2220 . 1) "argument" │ │ │ +000068f0: 2261 7267 756d 656e 7473 2220 6e69 6c20 "arguments" nil │ │ │ +00006900: 736f 7274 2063 6f70 792d 7365 7175 656e sort copy-sequen │ │ │ +00006910: 6365 203c 2022 2573 2062 6569 6e67 2064 ce < "%s being d │ │ │ +00006920: 6566 696e 6564 2074 6f20 7461 6b65 2025 efined to take % │ │ │ +00006930: 7325 732c 2062 7574 2077 6173 2070 7265 s%s, but was pre │ │ │ +00006940: 7669 6f75 736c 7920 6361 6c6c 6564 2077 viously called w │ │ │ +00006950: 6974 6820 2573 2220 2831 202e 2031 2920 ith %s" (1 . 1) │ │ │ +00006960: 2220 6172 6722 2022 2061 7267 7322 2064 " arg" " args" d │ │ │ +00006970: 656c 7120 7369 6732 2062 7974 652d 636f elq sig2 byte-co │ │ │ +00006980: 6d70 696c 652d 756e 7265 736f 6c76 6564 mpile-unresolved │ │ │ +00006990: 2d66 756e 6374 696f 6e73 206e 756d 7320 -functions nums │ │ │ +000069a0: 6361 6c6c 7320 6d61 6372 6f70 5d20 395d calls macrop] 9] │ │ │ +000069b0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ +000069c0: 652d 636f 6d70 696c 652d 7761 726e 2d61 e-compile-warn-a │ │ │ +000069d0: 626f 7574 2d75 6e72 6573 6f6c 7665 642d bout-unresolved- │ │ │ +000069e0: 6675 6e63 7469 6f6e 7320 235b 2826 6f70 functions #[(&op │ │ │ +000069f0: 7469 6f6e 616c 206d 7367 2920 22c6 0e16 tional msg) "... │ │ │ +00006a00: 73ab fc0e 17ae 81c7 1e18 08ab 990c 891d s............... │ │ │ +00006a10: ab93 0d40 4008 b7ab 86c8 0d40 0c5c 2214 ...@@......@.\". │ │ │ +00006a20: 0d41 8915 ac6d 290c 41ab cac9 891b 47ca .A...m).A.....G. │ │ │ +00006a30: 5c5c 19cb 0c21 1dcc 1a0d abb2 cd0d 4040 \\...!........@@ │ │ │ +00006a40: 2112 095c 6e47 5c5c ce5c 5c11 0d41 1509 !..\nG\\.\\..A.. │ │ │ +00006a50: 0e19 5358 ab8b 0bcf 5c6e 0dad 81d0 5213 ..SX....\n....R. │ │ │ +00006a60: aa5b 0bd1 5c6e 0dad 81d0 5213 5c6e 47d2 .[..\n....R.\nG. │ │ │ +00006a70: 5c5c 11aa 4bd3 d40b 5c22 882c aa8a 0cab \\..K...\".,.... │ │ │ +00006a80: 87d3 d50c 4040 5c22 8829 cc87 2220 5b62 ....@@\".).." [b │ │ │ +00006a90: 7974 652d 636f 6d70 696c 652d 6175 746f yte-compile-auto │ │ │ +00006aa0: 6c6f 6164 2d65 6e76 6972 6f6e 6d65 6e74 load-environment │ │ │ +00006ab0: 204c 2073 2073 7472 2062 7974 652d 636f L s str byte-co │ │ │ +00006ac0: 6d70 696c 652d 756e 7265 736f 6c76 6564 mpile-unresolved │ │ │ +00006ad0: 2d66 756e 6374 696f 6e73 2072 6573 7420 -functions rest │ │ │ +00006ae0: 756e 7265 736f 6c76 6564 2022 7468 6520 unresolved "the │ │ │ +00006af0: 656e 6420 6f66 2074 6865 2064 6174 6122 end of the data" │ │ │ +00006b00: 2064 656c 7120 2254 6865 2066 6f6c 6c6f delq "The follo │ │ │ +00006b10: 7769 6e67 2066 756e 6374 696f 6e73 2061 wing functions a │ │ │ +00006b20: 7265 206e 6f74 206b 6e6f 776e 2074 6f20 re not known to │ │ │ +00006b30: 6265 2064 6566 696e 6564 3a20 2220 3520 be defined: " 5 │ │ │ +00006b40: 7265 7665 7273 6520 6e69 6c20 7379 6d62 reverse nil symb │ │ │ +00006b50: 6f6c 2d6e 616d 6520 3220 2220 2220 222c ol-name 2 " " ", │ │ │ +00006b60: 2220 225c 6e20 2020 2022 2034 2062 7974 " "\n " 4 byt │ │ │ +00006b70: 652d 636f 6d70 696c 652d 7761 726e 2022 e-compile-warn " │ │ │ +00006b80: 2573 2220 2274 6865 2066 756e 6374 696f %s" "the functio │ │ │ +00006b90: 6e20 2573 2069 7320 6e6f 7420 6b6e 6f77 n %s is not know │ │ │ +00006ba0: 6e20 746f 2062 6520 6465 6669 6e65 642e n to be defined. │ │ │ +00006bb0: 2220 6279 7465 2d63 6f6d 7069 6c65 2d77 " byte-compile-w │ │ │ +00006bc0: 6172 6e69 6e67 7320 6d73 6720 6279 7465 arnings msg byte │ │ │ +00006bd0: 2d63 6f6d 7069 6c65 2d63 7572 7265 6e74 -compile-current │ │ │ +00006be0: 2d66 6f72 6d20 6669 6c6c 2d63 6f6c 756d -form fill-colum │ │ │ +00006bf0: 6e5d 2035 5d29 0a28 6465 6661 6c69 6173 n] 5]).(defalias │ │ │ +00006c00: 2027 6279 7465 2d63 6f6d 7069 6c65 2d64 'byte-compile-d │ │ │ +00006c10: 6566 7661 722d 7020 235b 2876 6172 2920 efvar-p #[(var) │ │ │ +00006c20: 22c5 0c21 aeae 5c6e 891b ab9c 0cab 990c "..!..\n........ │ │ │ +00006c30: 0b40 a261 ab8c c6c7 0b40 4109 5c22 55ac .@.a.....@A.\"U. │ │ │ +00006c40: 82c8 140b 4189 13ac 640c 293f ae88 c9c0 ....A...d.)?.... │ │ │ +00006c50: 21ad 830c 0873 8722 205b 6375 7272 656e !....s." [curren │ │ │ +00006c60: 742d 6c6f 6164 2d6c 6973 7420 6279 7465 t-load-list byte │ │ │ +00006c70: 2d63 6f6d 7069 6c65 2d67 6c6f 6261 6c2d -compile-global- │ │ │ +00006c80: 6269 7420 6279 7465 2d63 6f6d 7069 6c65 bit byte-compile │ │ │ +00006c90: 2d62 6f75 6e64 2d76 6172 6961 626c 6573 -bound-variables │ │ │ +00006ca0: 2072 6573 7420 7661 7220 676c 6f62 616c rest var global │ │ │ +00006cb0: 6c79 2d62 6f75 6e64 7020 3020 6c6f 6761 ly-boundp 0 loga │ │ │ +00006cc0: 6e64 206e 696c 2062 6f75 6e64 705d 2035 nd nil boundp] 5 │ │ │ +00006cd0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +00006ce0: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e2d te-compile-warn- │ │ │ +00006cf0: 6162 6f75 742d 756e 7573 6564 2d76 6172 about-unused-var │ │ │ +00006d00: 6961 626c 6573 2023 5b6e 696c 2022 5c6e iables #[nil "\n │ │ │ +00006d10: c689 1c1d 891b abac 0b40 c761 aca6 0b40 .........@.a...@ │ │ │ +00006d20: 14c8 c909 0c41 5c22 55ab 94c8 c908 0c41 .....A\"U......A │ │ │ +00006d30: 5c22 55ab 8bca 0c40 21ac 850c 400d 4215 \"U....@!...@.B. │ │ │ +00006d40: 0b41 8913 ac54 0d9f 8915 ad8d cbcc 0d40 .A...T.........@ │ │ │ +00006d50: 5c22 880d 4189 15ac 74c6 2b87 2220 5b62 \"..A...t.+." [b │ │ │ +00006d60: 7974 652d 636f 6d70 696c 652d 6172 676c yte-compile-argl │ │ │ +00006d70: 6973 742d 6269 7420 6279 7465 2d63 6f6d ist-bit byte-com │ │ │ +00006d80: 7069 6c65 2d72 6566 6572 656e 6365 642d pile-referenced- │ │ │ +00006d90: 6269 7420 6279 7465 2d63 6f6d 7069 6c65 bit byte-compile │ │ │ +00006da0: 2d62 6f75 6e64 2d76 6172 6961 626c 6573 -bound-variables │ │ │ +00006db0: 2072 6573 7420 6365 6c6c 2075 6e72 6566 rest cell unref │ │ │ +00006dc0: 6572 656e 6365 6420 6e69 6c20 6e65 772d erenced nil new- │ │ │ +00006dd0: 7363 6f70 6520 3020 6c6f 6761 6e64 2062 scope 0 logand b │ │ │ +00006de0: 7974 652d 636f 6d70 696c 652d 6465 6676 yte-compile-defv │ │ │ +00006df0: 6172 2d70 2062 7974 652d 636f 6d70 696c ar-p byte-compil │ │ │ +00006e00: 652d 7761 726e 2022 7661 7269 6162 6c65 e-warn "variable │ │ │ +00006e10: 2025 7320 626f 756e 6420 6275 7420 6e6f %s bound but no │ │ │ +00006e20: 7420 7265 6665 7265 6e63 6564 225d 2035 t referenced"] 5 │ │ │ +00006e30: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +00006e40: 7465 2d63 6f6d 7069 6c65 2d63 6f6e 7374 te-compile-const │ │ │ +00006e50: 616e 742d 7379 6d62 6f6c 2d70 2027 286d ant-symbol-p '(m │ │ │ +00006e60: 6163 726f 202e 2023 5b28 7379 6d62 6f6c acro . #[(symbol │ │ │ +00006e70: 2920 22c1 c208 44c3 08c4 4242 4587 2220 ) "...D...BBE." │ │ │ +00006e80: 5b73 796d 626f 6c20 6f72 206b 6579 776f [symbol or keywo │ │ │ +00006e90: 7264 7020 6d65 6d71 2028 2728 6e69 6c20 rdp memq ('(nil │ │ │ +00006ea0: 7429 295d 2035 5d29 290a 2864 6566 616c t))] 5])).(defal │ │ │ +00006eb0: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00006ec0: 652d 636f 6e73 7470 2027 286d 6163 726f e-constp '(macro │ │ │ +00006ed0: 202e 2023 5b28 666f 726d 2920 22c1 c208 . #[(form) "... │ │ │ +00006ee0: 44c3 c408 44c5 4242 44c6 0844 c708 4444 D...D.BBD..D..DD │ │ │ +00006ef0: c842 4242 8722 205b 666f 726d 2063 6f6e .BBB." [form con │ │ │ +00006f00: 6420 636f 6e73 7020 6571 2063 6172 2028 d consp eq car ( │ │ │ +00006f10: 2771 756f 7465 2920 7379 6d62 6f6c 7020 'quote) symbolp │ │ │ +00006f20: 6279 7465 2d63 6f6d 7069 6c65 2d63 6f6e byte-compile-con │ │ │ +00006f30: 7374 616e 742d 7379 6d62 6f6c 2d70 2028 stant-symbol-p ( │ │ │ +00006f40: 2874 2929 5d20 355d 2929 0a28 6465 6661 (t))] 5])).(defa │ │ │ +00006f50: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +00006f60: 6c65 2d63 6c6f 7365 2d76 6172 6961 626c le-close-variabl │ │ │ +00006f70: 6573 2027 286d 6163 726f 202e 2023 5b28 es '(macro . #[( │ │ │ +00006f80: 2672 6573 7420 626f 6479 2920 22c1 c2c3 &rest body) "... │ │ │ +00006f90: c408 42c5 4242 4587 2220 5b62 6f64 7920 ..B.BBE." [body │ │ │ +00006fa0: 6c65 7420 2828 6279 7465 2d63 6f6d 7069 let ((byte-compi │ │ │ +00006fb0: 6c65 2d6d 6163 726f 2d65 6e76 6972 6f6e le-macro-environ │ │ │ +00006fc0: 6d65 6e74 2028 636f 7079 2d61 6c69 7374 ment (copy-alist │ │ │ +00006fd0: 2062 7974 652d 636f 6d70 696c 652d 696e byte-compile-in │ │ │ +00006fe0: 6974 6961 6c2d 6d61 6372 6f2d 656e 7669 itial-macro-envi │ │ │ +00006ff0: 726f 6e6d 656e 7429 2920 2862 7974 652d ronment)) (byte- │ │ │ +00007000: 636f 6d70 696c 652d 6675 6e63 7469 6f6e compile-function │ │ │ +00007010: 2d65 6e76 6972 6f6e 6d65 6e74 206e 696c -environment nil │ │ │ +00007020: 2920 2862 7974 652d 636f 6d70 696c 652d ) (byte-compile- │ │ │ +00007030: 6175 746f 6c6f 6164 2d65 6e76 6972 6f6e autoload-environ │ │ │ +00007040: 6d65 6e74 206e 696c 2920 2862 7974 652d ment nil) (byte- │ │ │ +00007050: 636f 6d70 696c 652d 756e 7265 736f 6c76 compile-unresolv │ │ │ +00007060: 6564 2d66 756e 6374 696f 6e73 206e 696c ed-functions nil │ │ │ +00007070: 2920 2862 7974 652d 636f 6d70 696c 652d ) (byte-compile- │ │ │ +00007080: 626f 756e 642d 7661 7269 6162 6c65 7320 bound-variables │ │ │ +00007090: 6e69 6c29 2028 6279 7465 2d63 6f6d 7069 nil) (byte-compi │ │ │ +000070a0: 6c65 2d66 7265 652d 7265 6665 7265 6e63 le-free-referenc │ │ │ +000070b0: 6573 206e 696c 2920 2862 7974 652d 636f es nil) (byte-co │ │ │ +000070c0: 6d70 696c 652d 6672 6565 2d61 7373 6967 mpile-free-assig │ │ │ +000070d0: 6e6d 656e 7473 206e 696c 2920 2862 7974 nments nil) (byt │ │ │ +000070e0: 652d 636f 6d70 696c 652d 7665 7262 6f73 e-compile-verbos │ │ │ +000070f0: 6520 6279 7465 2d63 6f6d 7069 6c65 2d76 e byte-compile-v │ │ │ +00007100: 6572 626f 7365 2920 2862 7974 652d 6f70 erbose) (byte-op │ │ │ +00007110: 7469 6d69 7a65 2062 7974 652d 6f70 7469 timize byte-opti │ │ │ +00007120: 6d69 7a65 2920 2862 7974 652d 636f 6d70 mize) (byte-comp │ │ │ +00007130: 696c 652d 656d 6163 7331 392d 636f 6d70 ile-emacs19-comp │ │ │ +00007140: 6174 6962 696c 6974 7920 6279 7465 2d63 atibility byte-c │ │ │ +00007150: 6f6d 7069 6c65 2d65 6d61 6373 3139 2d63 ompile-emacs19-c │ │ │ +00007160: 6f6d 7061 7469 6269 6c69 7479 2920 2862 ompatibility) (b │ │ │ +00007170: 7974 652d 636f 6d70 696c 652d 6479 6e61 yte-compile-dyna │ │ │ +00007180: 6d69 6320 6279 7465 2d63 6f6d 7069 6c65 mic byte-compile │ │ │ +00007190: 2d64 796e 616d 6963 2920 2862 7974 652d -dynamic) (byte- │ │ │ +000071a0: 636f 6d70 696c 652d 6479 6e61 6d69 632d compile-dynamic- │ │ │ +000071b0: 646f 6373 7472 696e 6773 2062 7974 652d docstrings byte- │ │ │ +000071c0: 636f 6d70 696c 652d 6479 6e61 6d69 632d compile-dynamic- │ │ │ +000071d0: 646f 6373 7472 696e 6773 2920 2862 7974 docstrings) (byt │ │ │ +000071e0: 652d 636f 6d70 696c 652d 7761 726e 696e e-compile-warnin │ │ │ +000071f0: 6773 2028 6966 2028 6571 2062 7974 652d gs (if (eq byte- │ │ │ +00007200: 636f 6d70 696c 652d 7761 726e 696e 6773 compile-warnings │ │ │ +00007210: 2074 2920 6279 7465 2d63 6f6d 7069 6c65 t) byte-compile │ │ │ +00007220: 2d64 6566 6175 6c74 2d77 6172 6e69 6e67 -default-warning │ │ │ +00007230: 7320 6279 7465 2d63 6f6d 7069 6c65 2d77 s byte-compile-w │ │ │ +00007240: 6172 6e69 6e67 7329 2920 2862 7974 652d arnings)) (byte- │ │ │ +00007250: 636f 6d70 696c 652d 6669 6c65 2d64 6f6d compile-file-dom │ │ │ +00007260: 6169 6e20 6e69 6c29 2920 7072 6f67 3120 ain nil)) prog1 │ │ │ +00007270: 7072 6f67 6e20 2828 6966 2028 6d65 6d71 progn ((if (memq │ │ │ +00007280: 2027 756e 7573 6564 2d76 6172 7320 6279 'unused-vars by │ │ │ +00007290: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e69 te-compile-warni │ │ │ +000072a0: 6e67 7329 2028 6279 7465 2d63 6f6d 7069 ngs) (byte-compi │ │ │ +000072b0: 6c65 2d77 6172 6e2d 6162 6f75 742d 756e le-warn-about-un │ │ │ +000072c0: 7573 6564 2d76 6172 6961 626c 6573 2929 used-variables)) │ │ │ +000072d0: 295d 2035 5d29 290a 2864 6566 616c 6961 )] 5])).(defalia │ │ │ +000072e0: 7320 2764 6973 706c 6179 696e 672d 6279 s 'displaying-by │ │ │ +000072f0: 7465 2d63 6f6d 7069 6c65 2d77 6172 6e69 te-compile-warni │ │ │ +00007300: 6e67 7320 2728 6d61 6372 6f20 2e20 235b ngs '(macro . #[ │ │ │ +00007310: 2826 7265 7374 2062 6f64 7929 2022 c1c2 (&rest body) ".. │ │ │ +00007320: c3c4 c5c6 c7c8 c9ca cbcc cd08 4245 4445 ............BEDE │ │ │ +00007330: ce42 4245 af05 8722 205b 626f 6479 206c .BBE..." [body l │ │ │ +00007340: 6574 2a20 2828 6279 7465 2d63 6f6d 7069 et* ((byte-compi │ │ │ +00007350: 6c65 2d6c 6f67 2d62 7566 6665 7220 2867 le-log-buffer (g │ │ │ +00007360: 6574 2d62 7566 6665 722d 6372 6561 7465 et-buffer-create │ │ │ +00007370: 2022 2a43 6f6d 7069 6c65 2d4c 6f67 2a22 "*Compile-Log*" │ │ │ +00007380: 2929 2028 6279 7465 2d63 6f6d 7069 6c65 )) (byte-compile │ │ │ +00007390: 2d70 6f69 6e74 2d6d 6178 2d70 7265 7620 -point-max-prev │ │ │ +000073a0: 2870 6f69 6e74 2d6d 6178 2062 7974 652d (point-max byte- │ │ │ +000073b0: 636f 6d70 696c 652d 6c6f 672d 6275 6666 compile-log-buff │ │ │ +000073c0: 6572 2929 2920 2862 7974 652d 636f 6d70 er))) (byte-comp │ │ │ +000073d0: 696c 652d 6c6f 672d 6669 6c65 2920 2864 ile-log-file) (d │ │ │ +000073e0: 6566 7661 7220 6279 7465 2d63 6f6d 7069 efvar byte-compi │ │ │ +000073f0: 6c65 2d77 6172 6e69 6e67 732d 6265 6769 le-warnings-begi │ │ │ +00007400: 6e6e 696e 6729 206c 6574 2028 2862 7974 nning) let ((byt │ │ │ +00007410: 652d 636f 6d70 696c 652d 7761 726e 696e e-compile-warnin │ │ │ +00007420: 6773 2d62 6567 696e 6e69 6e67 2028 6966 gs-beginning (if │ │ │ +00007430: 2028 626f 756e 6470 2027 6279 7465 2d63 (boundp 'byte-c │ │ │ +00007440: 6f6d 7069 6c65 2d77 6172 6e69 6e67 732d ompile-warnings- │ │ │ +00007450: 6265 6769 6e6e 696e 6729 2062 7974 652d beginning) byte- │ │ │ +00007460: 636f 6d70 696c 652d 7761 726e 696e 6773 compile-warnings │ │ │ +00007470: 2d62 6567 696e 6e69 6e67 2028 706f 696e -beginning (poin │ │ │ +00007480: 742d 6d61 7820 6279 7465 2d63 6f6d 7069 t-max byte-compi │ │ │ +00007490: 6c65 2d6c 6f67 2d62 7566 6665 7229 2929 le-log-buffer))) │ │ │ +000074a0: 2920 756e 7769 6e64 2d70 726f 7465 6374 ) unwind-protect │ │ │ +000074b0: 2063 616c 6c2d 7769 7468 2d63 6f6e 6469 call-with-condi │ │ │ +000074c0: 7469 6f6e 2d68 616e 646c 6572 2028 6675 tion-handler (fu │ │ │ +000074d0: 6e63 7469 6f6e 2028 6c61 6d62 6461 2028 nction (lambda ( │ │ │ +000074e0: 6572 726f 722d 696e 666f 2920 2862 7974 error-info) (byt │ │ │ +000074f0: 652d 636f 6d70 696c 652d 7265 706f 7274 e-compile-report │ │ │ +00007500: 2d65 7272 6f72 2065 7272 6f72 2d69 6e66 -error error-inf │ │ │ +00007510: 6f29 2929 2066 756e 6374 696f 6e20 6c61 o))) function la │ │ │ +00007520: 6d62 6461 206e 696c 2070 726f 676e 2028 mbda nil progn ( │ │ │ +00007530: 2877 6974 682d 6375 7272 656e 742d 6275 (with-current-bu │ │ │ +00007540: 6666 6572 2062 7974 652d 636f 6d70 696c ffer byte-compil │ │ │ +00007550: 652d 6c6f 672d 6275 6666 6572 2028 6c65 e-log-buffer (le │ │ │ +00007560: 7420 2828 7368 6f77 2d62 6567 696e 2028 t ((show-begin ( │ │ │ +00007570: 7072 6f67 6e20 2867 6f74 6f2d 6368 6172 progn (goto-char │ │ │ +00007580: 2062 7974 652d 636f 6d70 696c 652d 706f byte-compile-po │ │ │ +00007590: 696e 742d 6d61 782d 7072 6576 2920 2873 int-max-prev) (s │ │ │ +000075a0: 6b69 702d 6368 6172 732d 666f 7277 6172 kip-chars-forwar │ │ │ +000075b0: 6420 220c 5c6e 2229 2028 706f 696e 7429 d ".\n") (point) │ │ │ +000075c0: 2929 2920 2869 6620 7465 6d70 2d62 7566 ))) (if temp-buf │ │ │ +000075d0: 6665 722d 7368 6f77 2d66 756e 6374 696f fer-show-functio │ │ │ +000075e0: 6e20 286c 6574 2028 2873 686f 772d 6275 n (let ((show-bu │ │ │ +000075f0: 6666 6572 2028 6765 742d 6275 6666 6572 ffer (get-buffer │ │ │ +00007600: 2d63 7265 6174 6520 222a 436f 6d70 696c -create "*Compil │ │ │ +00007610: 652d 4c6f 672d 5368 6f77 2a22 2929 2920 e-Log-Show*"))) │ │ │ +00007620: 2877 6974 682d 6375 7272 656e 742d 6275 (with-current-bu │ │ │ +00007630: 6666 6572 2073 686f 772d 6275 6666 6572 ffer show-buffer │ │ │ +00007640: 2028 7365 7471 2062 7566 6665 722d 7265 (setq buffer-re │ │ │ +00007650: 6164 2d6f 6e6c 7920 6e69 6c29 2028 6572 ad-only nil) (er │ │ │ +00007660: 6173 652d 6275 6666 6572 2929 2028 636f ase-buffer)) (co │ │ │ +00007670: 7079 2d74 6f2d 6275 6666 6572 2073 686f py-to-buffer sho │ │ │ +00007680: 772d 6275 6666 6572 2073 686f 772d 6265 w-buffer show-be │ │ │ +00007690: 6769 6e20 2870 6f69 6e74 2d6d 6178 2929 gin (point-max)) │ │ │ +000076a0: 2028 7768 656e 2028 3c20 6279 7465 2d63 (when (< byte-c │ │ │ +000076b0: 6f6d 7069 6c65 2d77 6172 6e69 6e67 732d ompile-warnings- │ │ │ +000076c0: 6265 6769 6e6e 696e 6720 2870 6f69 6e74 beginning (point │ │ │ +000076d0: 2d6d 6178 2929 2028 6675 6e63 616c 6c20 -max)) (funcall │ │ │ +000076e0: 7465 6d70 2d62 7566 6665 722d 7368 6f77 temp-buffer-show │ │ │ +000076f0: 2d66 756e 6374 696f 6e20 7368 6f77 2d62 -function show-b │ │ │ +00007700: 7566 6665 7229 2929 2028 7768 656e 2028 uffer))) (when ( │ │ │ +00007710: 3c20 6279 7465 2d63 6f6d 7069 6c65 2d77 < byte-compile-w │ │ │ +00007720: 6172 6e69 6e67 732d 6265 6769 6e6e 696e arnings-beginnin │ │ │ +00007730: 6720 2870 6f69 6e74 2d6d 6178 2929 2028 g (point-max)) ( │ │ │ +00007740: 7365 6c65 6374 2d77 696e 646f 7720 2870 select-window (p │ │ │ +00007750: 726f 6731 2028 7365 6c65 6374 6564 2d77 rog1 (selected-w │ │ │ +00007760: 696e 646f 7729 2028 7365 6c65 6374 2d77 indow) (select-w │ │ │ +00007770: 696e 646f 7720 2864 6973 706c 6179 2d62 indow (display-b │ │ │ +00007780: 7566 6665 7220 2863 7572 7265 6e74 2d62 uffer (current-b │ │ │ +00007790: 7566 6665 7229 2929 2028 676f 746f 2d63 uffer))) (goto-c │ │ │ +000077a0: 6861 7220 7368 6f77 2d62 6567 696e 2920 har show-begin) │ │ │ +000077b0: 2872 6563 656e 7465 7220 3129 2929 2929 (recenter 1))))) │ │ │ +000077c0: 2929 295d 2031 345d 2929 0a23 4031 3330 )))] 14])).#@130 │ │ │ +000077d0: 2052 6563 6f6d 7069 6c65 2065 7665 7279 Recompile every │ │ │ +000077e0: 2060 2e65 6c27 2066 696c 6520 696e 2044 `.el' file in D │ │ │ +000077f0: 4952 4543 544f 5259 2074 6861 7420 616c IRECTORY that al │ │ │ +00007800: 7265 6164 7920 6861 7320 6120 602e 656c ready has a `.el │ │ │ +00007810: 6327 2066 696c 652e 0a46 696c 6573 2069 c' file..Files i │ │ │ +00007820: 6e20 7375 6264 6972 6563 746f 7269 6573 n subdirectories │ │ │ +00007830: 206f 6620 4449 5245 4354 4f52 5920 6172 of DIRECTORY ar │ │ │ +00007840: 6520 7072 6f63 6573 7365 6420 616c 736f e processed also │ │ │ +00007850: 2e1f 0a28 6465 6661 6c69 6173 2027 6279 ...(defalias 'by │ │ │ +00007860: 7465 2d66 6f72 6365 2d72 6563 6f6d 7069 te-force-recompi │ │ │ +00007870: 6c65 2023 5b28 6469 7265 6374 6f72 7929 le #[(directory) │ │ │ +00007880: 2022 c108 c289 c324 8722 205b 6469 7265 ".....$." [dire │ │ │ +00007890: 6374 6f72 7920 6279 7465 2d72 6563 6f6d ctory byte-recom │ │ │ +000078a0: 7069 6c65 2d64 6972 6563 746f 7279 206e pile-directory n │ │ │ +000078b0: 696c 2074 5d20 3520 2823 2420 2e20 3330 il t] 5 (#$ . 30 │ │ │ +000078c0: 3637 3329 2022 4442 7974 6520 666f 7263 673) "DByte forc │ │ │ +000078d0: 6520 7265 636f 6d70 696c 6520 2864 6972 e recompile (dir │ │ │ +000078e0: 6563 746f 7279 293a 2022 5d29 0a23 4036 ectory): "]).#@6 │ │ │ +000078f0: 3637 2052 6563 6f6d 7069 6c65 2065 7665 67 Recompile eve │ │ │ +00007900: 7279 2060 2e65 6c27 2066 696c 6520 696e ry `.el' file in │ │ │ +00007910: 2044 4952 4543 544f 5259 2074 6861 7420 DIRECTORY that │ │ │ +00007920: 6e65 6564 7320 7265 636f 6d70 696c 6174 needs recompilat │ │ │ +00007930: 696f 6e2e 0a54 6869 7320 6973 2069 6620 ion..This is if │ │ │ +00007940: 6120 602e 656c 6327 2066 696c 6520 6578 a `.elc' file ex │ │ │ +00007950: 6973 7473 2062 7574 2069 7320 6f6c 6465 ists but is olde │ │ │ +00007960: 7220 7468 616e 2074 6865 2060 2e65 6c27 r than the `.el' │ │ │ +00007970: 2066 696c 652e 0a46 696c 6573 2069 6e20 file..Files in │ │ │ +00007980: 7375 6264 6972 6563 746f 7269 6573 206f subdirectories o │ │ │ +00007990: 6620 4449 5245 4354 4f52 5920 6172 6520 f DIRECTORY are │ │ │ +000079a0: 616c 736f 2070 726f 6365 7373 6564 2075 also processed u │ │ │ +000079b0: 6e6c 6573 730a 6f70 7469 6f6e 616c 2061 nless.optional a │ │ │ +000079c0: 7267 756d 656e 7420 4e4f 5245 4355 5253 rgument NORECURS │ │ │ +000079d0: 494f 4e20 6973 206e 6f6e 2d6e 696c 2e0a ION is non-nil.. │ │ │ +000079e0: 0a49 6620 7468 6520 602e 656c 6327 2066 .If the `.elc' f │ │ │ +000079f0: 696c 6520 646f 6573 206e 6f74 2065 7869 ile does not exi │ │ │ +00007a00: 7374 2c20 6e6f 726d 616c 6c79 2074 6865 st, normally the │ │ │ +00007a10: 2060 2e65 6c27 2066 696c 6520 6973 202a `.el' file is * │ │ │ +00007a20: 6e6f 742a 2063 6f6d 7069 6c65 642e 0a42 not* compiled..B │ │ │ +00007a30: 7574 2061 2070 7265 6669 7820 6172 6775 ut a prefix argu │ │ │ +00007a40: 6d65 6e74 2028 6f70 7469 6f6e 616c 2073 ment (optional s │ │ │ +00007a50: 6563 6f6e 6420 6172 6729 206d 6561 6e73 econd arg) means │ │ │ +00007a60: 2061 736b 2075 7365 722c 0a66 6f72 2065 ask user,.for e │ │ │ +00007a70: 6163 6820 7375 6368 2060 2e65 6c27 2066 ach such `.el' f │ │ │ +00007a80: 696c 652c 2077 6865 7468 6572 2074 6f20 ile, whether to │ │ │ +00007a90: 636f 6d70 696c 6520 6974 2e20 2050 7265 compile it. Pre │ │ │ +00007aa0: 6669 7820 6172 6775 6d65 6e74 2030 206d fix argument 0 m │ │ │ +00007ab0: 6561 6e73 0a64 6f6e 2774 2061 736b 2061 eans.don't ask a │ │ │ +00007ac0: 6e64 2063 6f6d 7069 6c65 2074 6865 2066 nd compile the f │ │ │ +00007ad0: 696c 6520 616e 7977 6179 2e0a 0a41 206e ile anyway...A n │ │ │ +00007ae0: 6f6e 7a65 726f 2070 7265 6669 7820 6172 onzero prefix ar │ │ │ +00007af0: 6775 6d65 6e74 2061 6c73 6f20 6d65 616e gument also mean │ │ │ +00007b00: 7320 6173 6b20 6162 6f75 7420 6561 6368 s ask about each │ │ │ +00007b10: 2073 7562 6469 7265 6374 6f72 792e 0a0a subdirectory... │ │ │ +00007b20: 4966 2074 6865 2066 6f75 7274 6820 6f70 If the fourth op │ │ │ +00007b30: 7469 6f6e 616c 2061 7267 756d 656e 7420 tional argument │ │ │ +00007b40: 464f 5243 4520 6973 206e 6f6e 2d6e 696c FORCE is non-nil │ │ │ +00007b50: 2c0a 7265 636f 6d70 696c 6520 6576 6572 ,.recompile ever │ │ │ +00007b60: 7920 602e 656c 2720 6669 6c65 2074 6861 y `.el' file tha │ │ │ +00007b70: 7420 616c 7265 6164 7920 6861 7320 6120 t already has a │ │ │ +00007b80: 602e 656c 6327 2066 696c 652e 1f0a 2864 `.elc' file...(d │ │ │ +00007b90: 6566 616c 6961 7320 2762 7974 652d 7265 efalias 'byte-re │ │ │ +00007ba0: 636f 6d70 696c 652d 6469 7265 6374 6f72 compile-director │ │ │ +00007bb0: 7920 235b 2864 6972 6563 746f 7279 2026 y #[(directory & │ │ │ +00007bc0: 6f70 7469 6f6e 616c 2061 7267 206e 6f72 optional arg nor │ │ │ +00007bd0: 6563 7572 7369 6f6e 2066 6f72 6365 2920 ecursion force) │ │ │ +00007be0: 220d ab84 c60d 2115 08ac 86c7 2088 c820 ".....!..... .. │ │ │ +00007bf0: 88c9 0e1c 2143 ca89 cb1e 1d1c 1a1e 1ecc ....!C.......... │ │ │ +00007c00: cd21 1bce 0b21 1e1f cf20 88d0 c121 ab83 .!...!... ...!.. │ │ │ +00007c10: 09aa 83ce 0b21 19d1 8ed2 d3d4 5c22 882c .....!......\"., │ │ │ +00007c20: d5d6 5c6e 89d7 55ab 83d8 aa81 d90c d756 ..\n..U........V │ │ │ +00007c30: ab86 dadb 0c5c 22aa 81d8 242c 8722 205b .....\"...$,." [ │ │ │ +00007c40: 6e6f 6e69 6e74 6572 6163 7469 7665 2062 noninteractive b │ │ │ +00007c50: 7974 652d 636f 6d70 696c 652d 7761 726e yte-compile-warn │ │ │ +00007c60: 696e 6773 2d62 6567 696e 6e69 6e67 2066 ings-beginning f │ │ │ +00007c70: 696c 652d 636f 756e 7420 6279 7465 2d63 ile-count byte-c │ │ │ +00007c80: 6f6d 7069 6c65 2d6c 6f67 2d62 7566 6665 ompile-log-buffe │ │ │ +00007c90: 7220 6469 722d 636f 756e 7420 6172 6720 r dir-count arg │ │ │ +00007ca0: 7072 6566 6978 2d6e 756d 6572 6963 2d76 prefix-numeric-v │ │ │ +00007cb0: 616c 7565 2073 6176 652d 736f 6d65 2d62 alue save-some-b │ │ │ +00007cc0: 7566 6665 7273 2072 6564 7261 772d 6d6f uffers redraw-mo │ │ │ +00007cd0: 6465 6c69 6e65 2065 7870 616e 642d 6669 deline expand-fi │ │ │ +00007ce0: 6c65 2d6e 616d 6520 3020 6e69 6c20 6765 le-name 0 nil ge │ │ │ +00007cf0: 742d 6275 6666 6572 2d63 7265 6174 6520 t-buffer-create │ │ │ +00007d00: 222a 436f 6d70 696c 652d 4c6f 672a 2220 "*Compile-Log*" │ │ │ +00007d10: 706f 696e 742d 6d61 7820 6279 7465 2d63 point-max byte-c │ │ │ +00007d20: 6f6d 7069 6c65 2d6c 6f67 2d66 696c 6520 ompile-log-file │ │ │ +00007d30: 626f 756e 6470 2028 2862 7974 652d 636f boundp ((byte-co │ │ │ +00007d40: 6465 2022 7209 7188 0862 88c6 c777 8860 de "r.q..b...w.` │ │ │ +00007d50: 1c0b aba1 c8c9 211d 720d 7188 c716 11ca ......!.r.q..... │ │ │ +00007d60: 2088 29cb 0d0c 6423 885c 6e64 57ab 840b .)...d#.\ndW... │ │ │ +00007d70: 0d21 8829 aa97 5c6e 6457 ab92 cccd 20cc .!.)..\ndW.... . │ │ │ +00007d80: ce70 2121 880c 6288 cfd0 2188 2188 2ac7 .p!!..b...!.!.*. │ │ │ +00007d90: 8722 205b 6279 7465 2d63 6f6d 7069 6c65 ." [byte-compile │ │ │ +00007da0: 2d70 6f69 6e74 2d6d 6178 2d70 7265 7620 -point-max-prev │ │ │ +00007db0: 6279 7465 2d63 6f6d 7069 6c65 2d6c 6f67 byte-compile-log │ │ │ +00007dc0: 2d62 7566 6665 7220 6279 7465 2d63 6f6d -buffer byte-com │ │ │ +00007dd0: 7069 6c65 2d77 6172 6e69 6e67 732d 6265 pile-warnings-be │ │ │ +00007de0: 6769 6e6e 696e 6720 7465 6d70 2d62 7566 ginning temp-buf │ │ │ +00007df0: 6665 722d 7368 6f77 2d66 756e 6374 696f fer-show-functio │ │ │ +00007e00: 6e20 7368 6f77 2d62 6567 696e 2073 686f n show-begin sho │ │ │ +00007e10: 772d 6275 6666 6572 2022 0c5c 6e22 206e w-buffer ".\n" n │ │ │ +00007e20: 696c 2067 6574 2d62 7566 6665 722d 6372 il get-buffer-cr │ │ │ +00007e30: 6561 7465 2022 2a43 6f6d 7069 6c65 2d4c eate "*Compile-L │ │ │ +00007e40: 6f67 2d53 686f 772a 2220 6572 6173 652d og-Show*" erase- │ │ │ +00007e50: 6275 6666 6572 2063 6f70 792d 746f 2d62 buffer copy-to-b │ │ │ +00007e60: 7566 6665 7220 7365 6c65 6374 2d77 696e uffer select-win │ │ │ +00007e70: 646f 7720 7365 6c65 6374 6564 2d77 696e dow selected-win │ │ │ +00007e80: 646f 7720 6469 7370 6c61 792d 6275 6666 dow display-buff │ │ │ +00007e90: 6572 2072 6563 656e 7465 7220 3120 6275 er recenter 1 bu │ │ │ +00007ea0: 6666 6572 2d72 6561 642d 6f6e 6c79 5d20 ffer-read-only] │ │ │ +00007eb0: 3529 2920 6361 6c6c 2d77 6974 682d 636f 5)) call-with-co │ │ │ +00007ec0: 6e64 6974 696f 6e2d 6861 6e64 6c65 7220 ndition-handler │ │ │ +00007ed0: 235b 2865 7272 6f72 2d69 6e66 6f29 2022 #[(error-info) " │ │ │ +00007ee0: c108 2187 2220 5b65 7272 6f72 2d69 6e66 ..!." [error-inf │ │ │ +00007ef0: 6f20 6279 7465 2d63 6f6d 7069 6c65 2d72 o byte-compile-r │ │ │ +00007f00: 6570 6f72 742d 6572 726f 725d 2032 5d20 eport-error] 2] │ │ │ +00007f10: 235b 6e69 6c20 220b 85bb 00c6 0b40 2114 #[nil "......@!. │ │ │ +00007f20: 0e1b ac85 c7c8 0c5c 2288 c90c 21ca 8919 .......\"...!... │ │ │ +00007f30: 1d89 1a83 b200 cb5c 6e40 0c5c 2215 5c6e .......\n@.\".\n │ │ │ +00007f40: 40cc b6ac a5cd 0d21 aca0 ce0d 21ab 9b0e @......!....!... │ │ │ +00007f50: 1fab 9708 ab8d 08cf 61ac 88d0 d10d d251 ........a......Q │ │ │ +00007f60: 21ab e30b 0d43 a413 aadc d30e 200d 5c22 !....C...... .\" │ │ │ +00007f70: abd5 d40d 21ac d0d5 0d21 8911 abc9 d609 ....!....!...... │ │ │ +00007f80: 21ab 8a0e 21ac 96d7 0d09 5c22 aa8e 08ab !...!.....\".... │ │ │ +00007f90: b708 cf61 ac88 d0d8 0dd2 5121 abaa 0e5c ...a......Q!...\ │ │ │ +00007fa0: 22ab 86d9 0d21 88aa 84da 0d21 880e 1bac "....!.....!.... │ │ │ +00007fb0: 85c7 c80c 5c22 880e 1c54 161c 0e1d 0c61 ....\"...T.....a │ │ │ +00007fc0: ac88 0c16 1d0e 1e54 161e 5c6e 4189 1284 .......T..\nA... │ │ │ +00007fd0: 1e00 2b0b 4189 1384 0400 ca87 2220 5b61 ..+.A......." [a │ │ │ +00007fe0: 7267 2064 6573 7420 6669 6c65 7320 6469 rg dest files di │ │ │ +00007ff0: 7265 6374 6f72 6965 7320 6469 7265 6374 rectories direct │ │ │ +00008000: 6f72 7920 736f 7572 6365 2066 696c 652d ory source file- │ │ │ +00008010: 6e61 6d65 2d61 732d 6469 7265 6374 6f72 name-as-director │ │ │ +00008020: 7920 6d65 7373 6167 6520 2243 6865 636b y message "Check │ │ │ +00008030: 696e 6720 2573 2e2e 2e22 2064 6972 6563 ing %s..." direc │ │ │ +00008040: 746f 7279 2d66 696c 6573 206e 696c 2065 tory-files nil e │ │ │ +00008050: 7870 616e 642d 6669 6c65 2d6e 616d 6520 xpand-file-name │ │ │ +00008060: 2822 2e22 2022 2e2e 2220 2252 4353 2220 ("." ".." "RCS" │ │ │ +00008070: 2243 5653 2220 2253 4343 5322 2920 6669 "CVS" "SCCS") fi │ │ │ +00008080: 6c65 2d73 796d 6c69 6e6b 2d70 2066 696c le-symlink-p fil │ │ │ +00008090: 652d 6469 7265 6374 6f72 792d 7020 3020 e-directory-p 0 │ │ │ +000080a0: 792d 6f72 2d6e 2d70 2022 4368 6563 6b20 y-or-n-p "Check │ │ │ +000080b0: 2220 223f 2022 2073 7472 696e 672d 6d61 " "? " string-ma │ │ │ +000080c0: 7463 6820 6175 746f 2d73 6176 652d 6669 tch auto-save-fi │ │ │ +000080d0: 6c65 2d6e 616d 652d 7020 6279 7465 2d63 le-name-p byte-c │ │ │ +000080e0: 6f6d 7069 6c65 2d64 6573 742d 6669 6c65 ompile-dest-file │ │ │ +000080f0: 2066 696c 652d 6578 6973 7473 2d70 2066 file-exists-p f │ │ │ +00008100: 696c 652d 6e65 7765 722d 7468 616e 2d66 ile-newer-than-f │ │ │ +00008110: 696c 652d 7020 2243 6f6d 7069 6c65 2022 ile-p "Compile " │ │ │ +00008120: 2062 6174 6368 2d62 7974 652d 636f 6d70 batch-byte-comp │ │ │ +00008130: 696c 652d 3120 6279 7465 2d63 6f6d 7069 ile-1 byte-compi │ │ │ +00008140: 6c65 2d66 696c 6520 6e6f 6e69 6e74 6572 le-file noninter │ │ │ +00008150: 6163 7469 7665 2066 696c 652d 636f 756e active file-coun │ │ │ +00008160: 7420 6c61 7374 2d64 6972 2064 6972 2d63 t last-dir dir-c │ │ │ +00008170: 6f75 6e74 2062 7974 652d 7265 636f 6d70 ount byte-recomp │ │ │ +00008180: 696c 652d 6469 7265 6374 6f72 792d 7265 ile-directory-re │ │ │ +00008190: 6375 7273 6976 656c 7920 656d 6163 732d cursively emacs- │ │ │ +000081a0: 6c69 7370 2d66 696c 652d 7265 6765 7870 lisp-file-regexp │ │ │ +000081b0: 2066 6f72 6365 2062 7974 652d 7265 636f force byte-reco │ │ │ +000081c0: 6d70 696c 652d 6469 7265 6374 6f72 792d mpile-directory- │ │ │ +000081d0: 6967 6e6f 7265 2d65 7272 6f72 732d 705d ignore-errors-p] │ │ │ +000081e0: 2035 5d20 6d65 7373 6167 6520 2244 6f6e 5] message "Don │ │ │ +000081f0: 6520 2854 6f74 616c 206f 6620 2564 2066 e (Total of %d f │ │ │ +00008200: 696c 6525 7320 636f 6d70 696c 6564 2573 ile%s compiled%s │ │ │ +00008210: 2922 2031 2022 2220 2273 2220 666f 726d )" 1 "" "s" form │ │ │ +00008220: 6174 2022 2069 6e20 2564 2064 6972 6563 at " in %d direc │ │ │ +00008230: 746f 7269 6573 2220 6469 7265 6374 6f72 tories" director │ │ │ +00008240: 7920 6c61 7374 2d64 6972 2064 6972 6563 y last-dir direc │ │ │ +00008250: 746f 7269 6573 2062 7974 652d 636f 6d70 tories byte-comp │ │ │ +00008260: 696c 652d 706f 696e 742d 6d61 782d 7072 ile-point-max-pr │ │ │ +00008270: 6576 5d20 3720 2823 2420 2e20 3330 3936 ev] 7 (#$ . 3096 │ │ │ +00008280: 3329 2022 4442 7974 6520 7265 636f 6d70 3) "DByte recomp │ │ │ +00008290: 696c 6520 6469 7265 6374 6f72 793a 205c ile directory: \ │ │ │ +000082a0: 6e50 225d 290a 2340 3335 3420 5265 636f nP"]).#@354 Reco │ │ │ +000082b0: 6d70 696c 6520 6120 6669 6c65 206f 6620 mpile a file of │ │ │ +000082c0: 4c69 7370 2063 6f64 6520 6e61 6d65 6420 Lisp code named │ │ │ +000082d0: 4649 4c45 4e41 4d45 2069 6620 6974 206e FILENAME if it n │ │ │ +000082e0: 6565 6473 2072 6563 6f6d 7069 6c61 7469 eeds recompilati │ │ │ +000082f0: 6f6e 2e0a 5468 6973 2069 7320 6966 2074 on..This is if t │ │ │ +00008300: 6865 2060 2e65 6c63 2720 6669 6c65 2065 he `.elc' file e │ │ │ +00008310: 7869 7374 7320 6275 7420 6973 206f 6c64 xists but is old │ │ │ +00008320: 6572 2074 6861 6e20 7468 6520 602e 656c er than the `.el │ │ │ +00008330: 2720 6669 6c65 2e0a 0a49 6620 7468 6520 ' file...If the │ │ │ +00008340: 602e 656c 6327 2066 696c 6520 646f 6573 `.elc' file does │ │ │ +00008350: 206e 6f74 2065 7869 7374 2c20 6e6f 726d not exist, norm │ │ │ +00008360: 616c 6c79 2074 6865 2060 2e65 6c27 2066 ally the `.el' f │ │ │ +00008370: 696c 6520 6973 202a 6e6f 742a 0a63 6f6d ile is *not*.com │ │ │ +00008380: 7069 6c65 642e 2020 4275 7420 6120 7072 piled. But a pr │ │ │ +00008390: 6566 6978 2061 7267 756d 656e 7420 286f efix argument (o │ │ │ +000083a0: 7074 696f 6e61 6c20 7365 636f 6e64 2061 ptional second a │ │ │ +000083b0: 7267 2920 6d65 616e 7320 6173 6b20 7573 rg) means ask us │ │ │ +000083c0: 6572 0a77 6865 7468 6572 2074 6f20 636f er.whether to co │ │ │ +000083d0: 6d70 696c 6520 6974 2e20 2050 7265 6669 mpile it. Prefi │ │ │ +000083e0: 7820 6172 6775 6d65 6e74 2030 2064 6f6e x argument 0 don │ │ │ +000083f0: 2774 2061 736b 2061 6e64 2072 6563 6f6d 't ask and recom │ │ │ +00008400: 7069 6c65 2061 6e79 7761 792e 1f0a 2864 pile anyway...(d │ │ │ +00008410: 6566 616c 6961 7320 2762 7974 652d 7265 efalias 'byte-re │ │ │ +00008420: 636f 6d70 696c 652d 6669 6c65 2023 5b28 compile-file #[( │ │ │ +00008430: 6669 6c65 6e61 6d65 2026 6f70 7469 6f6e filename &option │ │ │ +00008440: 616c 2066 6f72 6365 2920 22c4 1ac5 080b al force) "..... │ │ │ +00008450: 5c22 adab c60b 213f ada5 c70b 2189 12ad \"....!?....!... │ │ │ +00008460: 9ec8 5c6e 21ab 86c9 0b5c 6e5c 22aa 8e09 ..\n!....\n\"... │ │ │ +00008470: ad90 09ca 61ac 88cb cc0b cd51 21ad 83ce ....a......Q!... │ │ │ +00008480: 0b21 2987 2220 5b65 6d61 6373 2d6c 6973 .!)." [emacs-lis │ │ │ +00008490: 702d 6669 6c65 2d72 6567 6578 7020 666f p-file-regexp fo │ │ │ +000084a0: 7263 6520 6465 7374 2066 696c 656e 616d rce dest filenam │ │ │ +000084b0: 6520 6e69 6c20 7374 7269 6e67 2d6d 6174 e nil string-mat │ │ │ +000084c0: 6368 2061 7574 6f2d 7361 7665 2d66 696c ch auto-save-fil │ │ │ +000084d0: 652d 6e61 6d65 2d70 2062 7974 652d 636f e-name-p byte-co │ │ │ +000084e0: 6d70 696c 652d 6465 7374 2d66 696c 6520 mpile-dest-file │ │ │ +000084f0: 6669 6c65 2d65 7869 7374 732d 7020 6669 file-exists-p fi │ │ │ +00008500: 6c65 2d6e 6577 6572 2d74 6861 6e2d 6669 le-newer-than-fi │ │ │ +00008510: 6c65 2d70 2030 2079 2d6f 722d 6e2d 7020 le-p 0 y-or-n-p │ │ │ +00008520: 2243 6f6d 7069 6c65 2022 2022 3f20 2220 "Compile " "? " │ │ │ +00008530: 6279 7465 2d63 6f6d 7069 6c65 2d66 696c byte-compile-fil │ │ │ +00008540: 655d 2034 2028 2324 202e 2033 3334 3532 e] 4 (#$ . 33452 │ │ │ +00008550: 2920 2266 4279 7465 2072 6563 6f6d 7069 ) "fByte recompi │ │ │ +00008560: 6c65 2066 696c 653a 205c 6e50 225d 290a le file: \nP"]). │ │ │ +00008570: 2340 3231 3820 436f 6d70 696c 6520 6120 #@218 Compile a │ │ │ +00008580: 6669 6c65 206f 6620 4c69 7370 2063 6f64 file of Lisp cod │ │ │ +00008590: 6520 6e61 6d65 6420 4649 4c45 4e41 4d45 e named FILENAME │ │ │ +000085a0: 2069 6e74 6f20 6120 6669 6c65 206f 6620 into a file of │ │ │ +000085b0: 6279 7465 2063 6f64 652e 0a54 6865 206f byte code..The o │ │ │ +000085c0: 7574 7075 7420 6669 6c65 2773 206e 616d utput file's nam │ │ │ +000085d0: 6520 6973 206d 6164 6520 6279 2061 7070 e is made by app │ │ │ +000085e0: 656e 6469 6e67 2060 6327 2074 6f20 7468 ending `c' to th │ │ │ +000085f0: 6520 656e 6420 6f66 2046 494c 454e 414d e end of FILENAM │ │ │ +00008600: 452e 0a57 6974 6820 7072 6566 6978 2061 E..With prefix a │ │ │ +00008610: 7267 2028 6e6f 6e69 6e74 6572 6163 7469 rg (noninteracti │ │ │ +00008620: 7665 6c79 3a20 326e 6420 6172 6729 2c20 vely: 2nd arg), │ │ │ +00008630: 6c6f 6164 2074 6865 2066 696c 6520 6166 load the file af │ │ │ +00008640: 7465 7220 636f 6d70 696c 696e 672e 1f0a ter compiling... │ │ │ +00008650: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +00008660: 636f 6d70 696c 652d 6669 6c65 2023 5b28 compile-file #[( │ │ │ +00008670: 6669 6c65 6e61 6d65 2026 6f70 7469 6f6e filename &option │ │ │ +00008680: 616c 206c 6f61 6429 2022 c60d 2115 08ac al load) "..!... │ │ │ +00008690: a1c7 c60d 2121 891b ab97 c80b 21ab 92c9 ....!!......!... │ │ │ +000086a0: cacb cc0b 215c 2221 ab88 8a0b 7188 cd20 ....!\"!....q.. │ │ │ +000086b0: 8829 2908 ac84 0e2d ab85 cecf 0d5c 2288 .))....-.....\". │ │ │ +000086c0: 0dd0 8989 891e 1119 1a1c 1e32 d10d 2189 ...........2..!. │ │ │ +000086d0: 1416 118a d2d3 2189 1271 88d4 2088 d50d ......!..q.. ... │ │ │ +000086e0: 2188 0dd6 d01e 331e 341e 2ed7 2088 0e2e !.....3.4... ... │ │ │ +000086f0: 152c d016 2fd8 5c6e 0d5c 2211 0e2f 3fad .,../.\n.\"../?. │ │ │ +00008700: f00e 2dab 85ce d90d 5c22 88da 5c6e 2188 ..-.....\"..\n!. │ │ │ +00008710: 8a09 7188 6462 88db 6388 d10d 2114 0e30 ..q.db..c...!..0 │ │ │ +00008720: ac85 d0dc dd8f 88de 0c21 ab88 dfe0 640c .........!....d. │ │ │ +00008730: 2388 aa90 e1e2 e3e4 0c21 ab83 e5aa 81e6 #........!...... │ │ │ +00008740: 0c45 5c22 880e 30ac 85d0 e7e8 8f88 da70 .E\"..0........p │ │ │ +00008750: 2188 290e 31ab 940e 31e9 61ac 88c9 caea !.).1...1.a..... │ │ │ +00008760: 0d5c 2221 ab86 8aeb 0d21 8829 0e2c ab84 .\"!.....!.).,.. │ │ │ +00008770: ec0c 2188 e92d 8722 205b 6e6f 6e69 6e74 ..!..-." [nonint │ │ │ +00008780: 6572 6163 7469 7665 206f 7574 7075 742d eractive output- │ │ │ +00008790: 6275 6666 6572 2069 6e70 7574 2d62 7566 buffer input-buf │ │ │ +000087a0: 6665 7220 6220 7461 7267 6574 2d66 696c fer b target-fil │ │ │ +000087b0: 6520 6669 6c65 6e61 6d65 2065 7870 616e e filename expan │ │ │ +000087c0: 642d 6669 6c65 2d6e 616d 6520 6765 742d d-file-name get- │ │ │ +000087d0: 6669 6c65 2d62 7566 6665 7220 6275 6666 file-buffer buff │ │ │ +000087e0: 6572 2d6d 6f64 6966 6965 642d 7020 792d er-modified-p y- │ │ │ +000087f0: 6f72 2d6e 2d70 2066 6f72 6d61 7420 2273 or-n-p format "s │ │ │ +00008800: 6176 6520 6275 6666 6572 2025 7320 6669 ave buffer %s fi │ │ │ +00008810: 7273 743f 2022 2062 7566 6665 722d 6e61 rst? " buffer-na │ │ │ +00008820: 6d65 2073 6176 652d 6275 6666 6572 206d me save-buffer m │ │ │ +00008830: 6573 7361 6765 2022 436f 6d70 696c 696e essage "Compilin │ │ │ +00008840: 6720 2573 2e2e 2e22 206e 696c 2062 7974 g %s..." nil byt │ │ │ +00008850: 652d 636f 6d70 696c 652d 6465 7374 2d66 e-compile-dest-f │ │ │ +00008860: 696c 6520 6765 742d 6275 6666 6572 2d63 ile get-buffer-c │ │ │ +00008870: 7265 6174 6520 2220 2a43 6f6d 7069 6c65 reate " *Compile │ │ │ +00008880: 7220 496e 7075 742a 2220 6572 6173 652d r Input*" erase- │ │ │ +00008890: 6275 6666 6572 2069 6e73 6572 742d 6669 buffer insert-fi │ │ │ +000088a0: 6c65 2d63 6f6e 7465 6e74 7320 656d 6163 le-contents emac │ │ │ +000088b0: 732d 6c69 7370 2d6d 6f64 6520 6e6f 726d s-lisp-mode norm │ │ │ +000088c0: 616c 2d6d 6f64 6520 6279 7465 2d63 6f6d al-mode byte-com │ │ │ +000088d0: 7069 6c65 2d66 726f 6d2d 6275 6666 6572 pile-from-buffer │ │ │ +000088e0: 2022 436f 6d70 696c 696e 6720 2573 2e2e "Compiling %s.. │ │ │ +000088f0: 2e64 6f6e 6522 206b 696c 6c2d 6275 6666 .done" kill-buff │ │ │ +00008900: 6572 2022 5c6e 2220 2864 656c 6574 652d er "\n" (delete- │ │ │ +00008910: 6669 6c65 2074 6172 6765 742d 6669 6c65 file target-file │ │ │ +00008920: 2920 2828 6669 6c65 2d65 7272 6f72 2929 ) ((file-error)) │ │ │ +00008930: 2066 696c 652d 7772 6974 6162 6c65 2d70 file-writable-p │ │ │ +00008940: 2077 7269 7465 2d72 6567 696f 6e20 3120 write-region 1 │ │ │ +00008950: 7369 676e 616c 2066 696c 652d 6572 726f signal file-erro │ │ │ +00008960: 7220 224f 7065 6e69 6e67 206f 7574 7075 r "Opening outpu │ │ │ +00008970: 7420 6669 6c65 2220 6669 6c65 2d65 7869 t file" file-exi │ │ │ +00008980: 7374 732d 7020 2263 616e 6e6f 7420 6f76 sts-p "cannot ov │ │ │ +00008990: 6572 7772 6974 6520 6669 6c65 2220 2264 erwrite file" "d │ │ │ +000089a0: 6972 6563 746f 7279 206e 6f74 2077 7269 irectory not wri │ │ │ +000089b0: 7461 626c 6520 6f72 206e 6f6e 6578 6973 table or nonexis │ │ │ +000089c0: 7465 6e74 2220 2862 7974 652d 636f 6465 tent" (byte-code │ │ │ +000089d0: 2022 c209 c308 215c 2287 2220 5b66 696c "....!\"." [fil │ │ │ +000089e0: 656e 616d 6520 7461 7267 6574 2d66 696c ename target-fil │ │ │ +000089f0: 6520 7365 742d 6669 6c65 2d6d 6f64 6573 e set-file-modes │ │ │ +00008a00: 2066 696c 652d 6d6f 6465 735d 2034 2920 file-modes] 4) │ │ │ +00008a10: 2828 6572 726f 7229 2920 7420 2252 6570 ((error)) t "Rep │ │ │ +00008a20: 6f72 7420 6361 6c6c 2074 7265 6520 666f ort call tree fo │ │ │ +00008a30: 7220 2573 3f20 2220 6469 7370 6c61 792d r %s? " display- │ │ │ +00008a40: 6361 6c6c 2d74 7265 6520 6c6f 6164 2062 call-tree load b │ │ │ +00008a50: 7974 652d 636f 6d70 696c 652d 7665 7262 yte-compile-verb │ │ │ +00008a60: 6f73 6520 6275 6666 6572 2d66 696c 652d ose buffer-file- │ │ │ +00008a70: 6e61 6d65 2062 7974 652d 636f 6d70 696c name byte-compil │ │ │ +00008a80: 6572 2d65 7272 6f72 2d66 6c61 6720 6279 er-error-flag by │ │ │ +00008a90: 7465 2d63 6f6d 7069 6c65 2d6f 7665 7277 te-compile-overw │ │ │ +00008aa0: 7269 7465 2d66 696c 6520 6279 7465 2d63 rite-file byte-c │ │ │ +00008ab0: 6f6d 7069 6c65 2d67 656e 6572 6174 652d ompile-generate- │ │ │ +00008ac0: 6361 6c6c 2d74 7265 6520 6279 7465 2d63 call-tree byte-c │ │ │ +00008ad0: 6f6d 7069 6c65 2d63 7572 7265 6e74 2d66 ompile-current-f │ │ │ +00008ae0: 696c 6520 656e 6162 6c65 2d6c 6f63 616c ile enable-local │ │ │ +00008af0: 2d65 7661 6c20 6465 6661 756c 742d 6d61 -eval default-ma │ │ │ +00008b00: 6a6f 722d 6d6f 6465 5d20 3620 2823 2420 jor-mode] 6 (#$ │ │ │ +00008b10: 2e20 3334 3136 3629 2028 6c65 7420 2828 . 34166) (let (( │ │ │ +00008b20: 6669 6c65 2062 7566 6665 722d 6669 6c65 file buffer-file │ │ │ +00008b30: 2d6e 616d 6529 2028 6669 6c65 2d6e 616d -name) (file-nam │ │ │ +00008b40: 6520 6e69 6c29 2028 6669 6c65 2d64 6972 e nil) (file-dir │ │ │ +00008b50: 206e 696c 2929 2028 616e 6420 6669 6c65 nil)) (and file │ │ │ +00008b60: 2028 6571 2028 6364 7220 2861 7373 7120 (eq (cdr (assq │ │ │ +00008b70: 276d 616a 6f72 2d6d 6f64 6520 2862 7566 'major-mode (buf │ │ │ +00008b80: 6665 722d 6c6f 6361 6c2d 7661 7269 6162 fer-local-variab │ │ │ +00008b90: 6c65 7329 2929 2027 656d 6163 732d 6c69 les))) 'emacs-li │ │ │ +00008ba0: 7370 2d6d 6f64 6529 2028 7365 7471 2066 sp-mode) (setq f │ │ │ +00008bb0: 696c 652d 6e61 6d65 2028 6669 6c65 2d6e ile-name (file-n │ │ │ +00008bc0: 616d 652d 6e6f 6e64 6972 6563 746f 7279 ame-nondirectory │ │ │ +00008bd0: 2066 696c 6529 2066 696c 652d 6469 7220 file) file-dir │ │ │ +00008be0: 2866 696c 652d 6e61 6d65 2d64 6972 6563 (file-name-direc │ │ │ +00008bf0: 746f 7279 2066 696c 6529 2929 2028 6c69 tory file))) (li │ │ │ +00008c00: 7374 2028 7265 6164 2d66 696c 652d 6e61 st (read-file-na │ │ │ +00008c10: 6d65 2028 6966 2063 7572 7265 6e74 2d70 me (if current-p │ │ │ +00008c20: 7265 6669 782d 6172 6720 2242 7974 6520 refix-arg "Byte │ │ │ +00008c30: 636f 6d70 696c 6520 616e 6420 6c6f 6164 compile and load │ │ │ +00008c40: 2066 696c 653a 2022 2022 4279 7465 2063 file: " "Byte c │ │ │ +00008c50: 6f6d 7069 6c65 2066 696c 653a 2022 2920 ompile file: ") │ │ │ +00008c60: 6669 6c65 2d64 6972 206e 696c 206e 696c file-dir nil nil │ │ │ +00008c70: 2066 696c 652d 6e61 6d65 2920 6375 7272 file-name) curr │ │ │ +00008c80: 656e 742d 7072 6566 6978 2d61 7267 2929 ent-prefix-arg)) │ │ │ +00008c90: 5d29 0a23 4031 3631 2043 6f6d 7069 6c65 ]).#@161 Compile │ │ │ +00008ca0: 2061 2066 696c 6520 6f66 204c 6973 7020 a file of Lisp │ │ │ +00008cb0: 636f 6465 206e 616d 6564 2046 494c 454e code named FILEN │ │ │ +00008cc0: 414d 4520 696e 746f 2061 2066 696c 6520 AME into a file │ │ │ +00008cd0: 6f66 2062 7974 6520 636f 6465 2c0a 616e of byte code,.an │ │ │ +00008ce0: 6420 7468 656e 206c 6f61 6420 6974 2e20 d then load it. │ │ │ +00008cf0: 2054 6865 206f 7574 7075 7420 6669 6c65 The output file │ │ │ +00008d00: 2773 206e 616d 6520 6973 206d 6164 6520 's name is made │ │ │ +00008d10: 6279 2061 7070 656e 6469 6e67 2022 6322 by appending "c" │ │ │ +00008d20: 2074 6f0a 7468 6520 656e 6420 6f66 2046 to.the end of F │ │ │ +00008d30: 494c 454e 414d 452e 1f0a 2864 6566 616c ILENAME...(defal │ │ │ +00008d40: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00008d50: 652d 616e 642d 6c6f 6164 2d66 696c 6520 e-and-load-file │ │ │ +00008d60: 235b 2826 6f70 7469 6f6e 616c 2066 696c #[(&optional fil │ │ │ +00008d70: 656e 616d 6529 2022 09ab 85c2 09c3 5c22 ename) "......\" │ │ │ +00008d80: 87c4 18c5 c221 2987 2220 5b63 7572 7265 .....!)." [curre │ │ │ +00008d90: 6e74 2d70 7265 6669 782d 6172 6720 6669 nt-prefix-arg fi │ │ │ +00008da0: 6c65 6e61 6d65 2062 7974 652d 636f 6d70 lename byte-comp │ │ │ +00008db0: 696c 652d 6669 6c65 2074 2028 3429 2063 ile-file t (4) c │ │ │ +00008dc0: 616c 6c2d 696e 7465 7261 6374 6976 656c all-interactivel │ │ │ +00008dd0: 795d 2033 2028 2324 202e 2033 3539 3933 y] 3 (#$ . 35993 │ │ │ +00008de0: 2920 6e69 6c5d 290a 2340 3737 2042 7974 ) nil]).#@77 Byt │ │ │ +00008df0: 652d 636f 6d70 696c 6520 616e 6420 6576 e-compile and ev │ │ │ +00008e00: 616c 7561 7465 2063 6f6e 7465 6e74 7320 aluate contents │ │ │ +00008e10: 6f66 2042 5546 4645 5220 2864 6566 6175 of BUFFER (defau │ │ │ +00008e20: 6c74 3a20 7468 6520 6375 7272 656e 7420 lt: the current │ │ │ +00008e30: 6275 6666 6572 292e 1f0a 2864 6566 616c buffer)...(defal │ │ │ +00008e40: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00008e50: 652d 6275 6666 6572 2023 5b28 266f 7074 e-buffer #[(&opt │ │ │ +00008e60: 696f 6e61 6c20 6275 6666 6572 2920 225c ional buffer) "\ │ │ │ +00008e70: 6eab 85c3 5c6e 21aa 8170 12c4 c55c 6e5c n...\n!..p...\n\ │ │ │ +00008e80: 2288 c65c 6e21 ae83 c75c 6e21 195c 6e18 "..\n!...\n!.\n. │ │ │ +00008e90: c85c 6e09 c923 882a c4ca 5c6e 5c22 88c9 .\n..#.*..\n\".. │ │ │ +00008ea0: 8722 205b 6279 7465 2d63 6f6d 7069 6c65 ." [byte-compile │ │ │ +00008eb0: 2d63 7572 7265 6e74 2d66 696c 6520 6669 -current-file fi │ │ │ +00008ec0: 6c65 6e61 6d65 2062 7566 6665 7220 6765 lename buffer ge │ │ │ +00008ed0: 742d 6275 6666 6572 206d 6573 7361 6765 t-buffer message │ │ │ +00008ee0: 2022 436f 6d70 696c 696e 6720 2573 2e2e "Compiling %s.. │ │ │ +00008ef0: 2e22 2062 7566 6665 722d 6669 6c65 2d6e ." buffer-file-n │ │ │ +00008f00: 616d 6520 7072 696e 312d 746f 2d73 7472 ame prin1-to-str │ │ │ +00008f10: 696e 6720 6279 7465 2d63 6f6d 7069 6c65 ing byte-compile │ │ │ +00008f20: 2d66 726f 6d2d 6275 6666 6572 2074 2022 -from-buffer t " │ │ │ +00008f30: 436f 6d70 696c 696e 6720 2573 2e2e 2e64 Compiling %s...d │ │ │ +00008f40: 6f6e 6522 5d20 3420 2823 2420 2e20 3336 one"] 4 (#$ . 36 │ │ │ +00008f50: 3333 3329 2022 6242 7974 6520 636f 6d70 333) "bByte comp │ │ │ +00008f60: 696c 6520 6275 6666 6572 3a20 225d 290a ile buffer: "]). │ │ │ +00008f70: 2340 3134 3820 436f 6d70 696c 6520 616e #@148 Compile an │ │ │ +00008f80: 6420 6576 616c 7561 7465 2074 6865 2063 d evaluate the c │ │ │ +00008f90: 7572 7265 6e74 2074 6f70 2d6c 6576 656c urrent top-level │ │ │ +00008fa0: 2066 6f72 6d2e 0a50 7269 6e74 2074 6865 form..Print the │ │ │ +00008fb0: 2072 6573 756c 7420 696e 2074 6865 206d result in the m │ │ │ +00008fc0: 696e 6962 7566 6665 722e 0a57 6974 6820 inibuffer..With │ │ │ +00008fd0: 6172 6775 6d65 6e74 2c20 696e 7365 7274 argument, insert │ │ │ +00008fe0: 2076 616c 7565 2069 6e20 6375 7272 656e value in curren │ │ │ +00008ff0: 7420 6275 6666 6572 2061 6674 6572 2074 t buffer after t │ │ │ +00009000: 6865 2066 6f72 6d2e 1f0a 2864 6566 616c he form...(defal │ │ │ +00009010: 6961 7320 2763 6f6d 7069 6c65 2d64 6566 ias 'compile-def │ │ │ +00009020: 756e 2023 5b28 266f 7074 696f 6e61 6c20 un #[(&optional │ │ │ +00009030: 6172 6729 2022 8ac6 2088 c720 88c8 201a arg) ".. .. .. . │ │ │ +00009040: c820 19c9 18ca cbcc 211d cd0d 211e 1ace . ......!...!... │ │ │ +00009050: 2088 cfc3 21ab 830b aa83 cd0d 211b d08e ...!.......!... │ │ │ +00009060: d1d2 d35c 222c 211c 0e1b ab8d d4d5 2188 ...\",!.......!. │ │ │ +00009070: d60c 705c 2288 d763 aa86 d4d8 d90c 215c ..p\"..c......!\ │ │ │ +00009080: 222d 8722 205b 6279 7465 2d63 6f6d 7069 "-." [byte-compi │ │ │ +00009090: 6c65 2d6c 6173 742d 7761 726e 6564 2d66 le-last-warned-f │ │ │ +000090a0: 6f72 6d20 6c6f 6164 2d66 696c 652d 6e61 orm load-file-na │ │ │ +000090b0: 6d65 2062 7974 652d 636f 6d70 696c 652d me byte-compile- │ │ │ +000090c0: 6375 7272 656e 742d 6669 6c65 2062 7974 current-file byt │ │ │ +000090d0: 652d 636f 6d70 696c 652d 7761 726e 696e e-compile-warnin │ │ │ +000090e0: 6773 2d62 6567 696e 6e69 6e67 2076 616c gs-beginning val │ │ │ +000090f0: 7565 2062 7974 652d 636f 6d70 696c 652d ue byte-compile- │ │ │ +00009100: 6c6f 672d 6275 6666 6572 2065 6e64 2d6f log-buffer end-o │ │ │ +00009110: 662d 6465 6675 6e20 6265 6769 6e6e 696e f-defun beginnin │ │ │ +00009120: 672d 6f66 2d64 6566 756e 2062 7566 6665 g-of-defun buffe │ │ │ +00009130: 722d 6669 6c65 2d6e 616d 6520 6e6f 7468 r-file-name noth │ │ │ +00009140: 696e 6720 6576 616c 2067 6574 2d62 7566 ing eval get-buf │ │ │ +00009150: 6665 722d 6372 6561 7465 2022 2a43 6f6d fer-create "*Com │ │ │ +00009160: 7069 6c65 2d4c 6f67 2a22 2070 6f69 6e74 pile-Log*" point │ │ │ +00009170: 2d6d 6178 2062 7974 652d 636f 6d70 696c -max byte-compil │ │ │ +00009180: 652d 6c6f 672d 6669 6c65 2062 6f75 6e64 e-log-file bound │ │ │ +00009190: 7020 2828 6279 7465 2d63 6f64 6520 2272 p ((byte-code "r │ │ │ +000091a0: 0971 8808 6288 c6c7 7788 601c 0bab a1c8 .q..b...w.`..... │ │ │ +000091b0: c921 1d72 0d71 88c7 1611 ca20 8829 cb0d .!.r.q..... .).. │ │ │ +000091c0: 0c64 2388 5c6e 6457 ab84 0b0d 2188 29aa .d#.\ndW....!.). │ │ │ +000091d0: 975c 6e64 57ab 92cc cd20 ccce 7021 2188 .\ndW.... ..p!!. │ │ │ +000091e0: 0c62 88cf d021 8821 882a c787 2220 5b62 .b...!.!.*.." [b │ │ │ +000091f0: 7974 652d 636f 6d70 696c 652d 706f 696e yte-compile-poin │ │ │ +00009200: 742d 6d61 782d 7072 6576 2062 7974 652d t-max-prev byte- │ │ │ +00009210: 636f 6d70 696c 652d 6c6f 672d 6275 6666 compile-log-buff │ │ │ +00009220: 6572 2062 7974 652d 636f 6d70 696c 652d er byte-compile- │ │ │ +00009230: 7761 726e 696e 6773 2d62 6567 696e 6e69 warnings-beginni │ │ │ +00009240: 6e67 2074 656d 702d 6275 6666 6572 2d73 ng temp-buffer-s │ │ │ +00009250: 686f 772d 6675 6e63 7469 6f6e 2073 686f how-function sho │ │ │ +00009260: 772d 6265 6769 6e20 7368 6f77 2d62 7566 w-begin show-buf │ │ │ +00009270: 6665 7220 220c 5c6e 2220 6e69 6c20 6765 fer ".\n" nil ge │ │ │ +00009280: 742d 6275 6666 6572 2d63 7265 6174 6520 t-buffer-create │ │ │ +00009290: 222a 436f 6d70 696c 652d 4c6f 672d 5368 "*Compile-Log-Sh │ │ │ +000092a0: 6f77 2a22 2065 7261 7365 2d62 7566 6665 ow*" erase-buffe │ │ │ +000092b0: 7220 636f 7079 2d74 6f2d 6275 6666 6572 r copy-to-buffer │ │ │ +000092c0: 2073 656c 6563 742d 7769 6e64 6f77 2073 select-window s │ │ │ +000092d0: 656c 6563 7465 642d 7769 6e64 6f77 2064 elected-window d │ │ │ +000092e0: 6973 706c 6179 2d62 7566 6665 7220 7265 isplay-buffer re │ │ │ +000092f0: 6365 6e74 6572 2031 2062 7566 6665 722d center 1 buffer- │ │ │ +00009300: 7265 6164 2d6f 6e6c 795d 2035 2929 2063 read-only] 5)) c │ │ │ +00009310: 616c 6c2d 7769 7468 2d63 6f6e 6469 7469 all-with-conditi │ │ │ +00009320: 6f6e 2d68 616e 646c 6572 2023 5b28 6572 on-handler #[(er │ │ │ +00009330: 726f 722d 696e 666f 2920 22c1 0821 8722 ror-info) "..!." │ │ │ +00009340: 205b 6572 726f 722d 696e 666f 2062 7974 [error-info byt │ │ │ +00009350: 652d 636f 6d70 696c 652d 7265 706f 7274 e-compile-report │ │ │ +00009360: 2d65 7272 6f72 5d20 325d 2023 5b6e 696c -error] 2] #[nil │ │ │ +00009370: 2022 c0c1 7021 c25c 2287 2220 5b62 7974 "..p!.\"." [byt │ │ │ +00009380: 652d 636f 6d70 696c 652d 7365 7870 2072 e-compile-sexp r │ │ │ +00009390: 6561 6420 2274 6f70 6c65 7665 6c20 666f ead "toplevel fo │ │ │ +000093a0: 726d 7322 5d20 335d 206d 6573 7361 6765 rms"] 3] message │ │ │ +000093b0: 2022 436f 6d70 696c 696e 6720 6672 6f6d "Compiling from │ │ │ +000093c0: 2062 7566 6665 722e 2e2e 2064 6f6e 652e buffer... done. │ │ │ +000093d0: 2220 7072 696e 3120 225c 6e22 2022 2573 " prin1 "\n" "%s │ │ │ +000093e0: 2220 7072 696e 312d 746f 2d73 7472 696e " prin1-to-strin │ │ │ +000093f0: 6720 6279 7465 2d63 6f6d 7069 6c65 2d70 g byte-compile-p │ │ │ +00009400: 6f69 6e74 2d6d 6178 2d70 7265 7620 6172 oint-max-prev ar │ │ │ +00009410: 675d 2034 2028 2324 202e 2033 3637 3236 g] 4 (#$ . 36726 │ │ │ +00009420: 2920 2250 225d 290a 2864 6566 616c 6961 ) "P"]).(defalia │ │ │ +00009430: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ +00009440: 6672 6f6d 2d62 7566 6665 7220 235b 2862 from-buffer #[(b │ │ │ +00009450: 7974 652d 636f 6d70 696c 652d 696e 6275 yte-compile-inbu │ │ │ +00009460: 6666 6572 2066 696c 656e 616d 6520 266f ffer filename &o │ │ │ +00009470: 7074 696f 6e61 6c20 6576 616c 2920 22c6 ptional eval) ". │ │ │ +00009480: 8989 8989 8989 c789 89c6 1e23 1e24 1e25 ...........#.$.% │ │ │ +00009490: 1e26 1e27 1e28 1e29 1e2a 1a1e 2b1d c80e .&.'.(.).*..+... │ │ │ +000094a0: 2c21 c689 8989 8989 0908 0e1e 0e1f 0e20 ,!............. │ │ │ +000094b0: 0cc9 61ab 840e 2daa 810c c61e 2e1c 1e20 ..a...-........ │ │ │ +000094c0: 1e1f 1e1e 1819 1e2f 1e30 1e31 1e32 1e33 ......./.0.1.2.3 │ │ │ +000094d0: 1e34 1e35 8aca cb21 7115 cc20 88c6 120e .4.5...!q.. .... │ │ │ +000094e0: 21ab 8c0e 1cac 88cd 0e21 0e36 0d23 88ce !........!.6.#.. │ │ │ +000094f0: 1637 29ca cf21 1bd0 0b21 1e38 d120 88d2 .7)..!...!.8. .. │ │ │ +00009500: d321 ab84 0e13 aa83 d00b 211e 13d4 8ed5 .!........!..... │ │ │ +00009510: d6d7 5c22 882c 8a0d 7188 6562 8829 d80c ..\".,..q.eb.).. │ │ │ +00009520: 73ab 83d9 2088 2e0e 0e1c ac83 0daa 96c6 s... ........... │ │ │ +00009530: 1e5c 22c6 dadb 8fab 87dc 0e5c 2221 88aa .\"........\"!.. │ │ │ +00009540: 7329 dd0d 2188 c62e 0b87 2220 5b62 7974 s)..!....." [byt │ │ │ +00009550: 652d 6f70 7469 6d69 7a65 2062 7974 652d e-optimize byte- │ │ │ +00009560: 636f 6d70 696c 652d 7665 7262 6f73 6520 compile-verbose │ │ │ +00009570: 6361 7365 2d66 6f6c 642d 7365 6172 6368 case-fold-search │ │ │ +00009580: 2062 7974 652d 636f 6d70 696c 652d 6c6f byte-compile-lo │ │ │ +00009590: 672d 6275 6666 6572 2062 7974 652d 636f g-buffer byte-co │ │ │ +000095a0: 6d70 696c 652d 7761 726e 696e 6773 2062 mpile-warnings b │ │ │ +000095b0: 7974 652d 636f 6d70 696c 652d 6f75 7462 yte-compile-outb │ │ │ +000095c0: 7566 6665 7220 6e69 6c20 3020 636f 7079 uffer nil 0 copy │ │ │ +000095d0: 2d61 6c69 7374 2074 2067 6574 2d62 7566 -alist t get-buf │ │ │ +000095e0: 6665 722d 6372 6561 7465 2022 202a 436f fer-create " *Co │ │ │ +000095f0: 6d70 696c 6572 204f 7574 7075 742a 2220 mpiler Output*" │ │ │ +00009600: 6572 6173 652d 6275 6666 6572 2062 7974 erase-buffer byt │ │ │ +00009610: 652d 636f 6d70 696c 652d 696e 7365 7274 e-compile-insert │ │ │ +00009620: 2d68 6561 6465 7220 6f76 6572 7772 6974 -header overwrit │ │ │ +00009630: 652d 6d6f 6465 2d62 696e 6172 7920 222a e-mode-binary "* │ │ │ +00009640: 436f 6d70 696c 652d 4c6f 672a 2220 706f Compile-Log*" po │ │ │ +00009650: 696e 742d 6d61 7820 6279 7465 2d63 6f6d int-max byte-com │ │ │ +00009660: 7069 6c65 2d6c 6f67 2d66 696c 6520 626f pile-log-file bo │ │ │ +00009670: 756e 6470 2062 7974 652d 636f 6d70 696c undp byte-compil │ │ │ +00009680: 652d 7761 726e 696e 6773 2d62 6567 696e e-warnings-begin │ │ │ +00009690: 6e69 6e67 2028 2862 7974 652d 636f 6465 ning ((byte-code │ │ │ +000096a0: 2022 7209 7188 0862 88c6 c777 8860 1c0b "r.q..b...w.`.. │ │ │ +000096b0: aba1 c8c9 211d 720d 7188 c716 11ca 2088 ....!.r.q..... . │ │ │ +000096c0: 29cb 0d0c 6423 885c 6e64 57ab 840b 0d21 )...d#.\ndW....! │ │ │ +000096d0: 8829 aa97 5c6e 6457 ab92 cccd 20cc ce70 .)..\ndW.... ..p │ │ │ +000096e0: 2121 880c 6288 cfd0 2188 2188 2ac7 8722 !!..b...!.!.*.." │ │ │ +000096f0: 205b 6279 7465 2d63 6f6d 7069 6c65 2d70 [byte-compile-p │ │ │ +00009700: 6f69 6e74 2d6d 6178 2d70 7265 7620 6279 oint-max-prev by │ │ │ +00009710: 7465 2d63 6f6d 7069 6c65 2d6c 6f67 2d62 te-compile-log-b │ │ │ +00009720: 7566 6665 7220 6279 7465 2d63 6f6d 7069 uffer byte-compi │ │ │ +00009730: 6c65 2d77 6172 6e69 6e67 732d 6265 6769 le-warnings-begi │ │ │ +00009740: 6e6e 696e 6720 7465 6d70 2d62 7566 6665 nning temp-buffe │ │ │ +00009750: 722d 7368 6f77 2d66 756e 6374 696f 6e20 r-show-function │ │ │ +00009760: 7368 6f77 2d62 6567 696e 2073 686f 772d show-begin show- │ │ │ +00009770: 6275 6666 6572 2022 0c5c 6e22 206e 696c buffer ".\n" nil │ │ │ +00009780: 2067 6574 2d62 7566 6665 722d 6372 6561 get-buffer-crea │ │ │ +00009790: 7465 2022 2a43 6f6d 7069 6c65 2d4c 6f67 te "*Compile-Log │ │ │ +000097a0: 2d53 686f 772a 2220 6572 6173 652d 6275 -Show*" erase-bu │ │ │ +000097b0: 6666 6572 2063 6f70 792d 746f 2d62 7566 ffer copy-to-buf │ │ │ +000097c0: 6665 7220 7365 6c65 6374 2d77 696e 646f fer select-windo │ │ │ +000097d0: 7720 7365 6c65 6374 6564 2d77 696e 646f w selected-windo │ │ │ +000097e0: 7720 6469 7370 6c61 792d 6275 6666 6572 w display-buffer │ │ │ +000097f0: 2072 6563 656e 7465 7220 3120 6275 6666 recenter 1 buff │ │ │ +00009800: 6572 2d72 6561 642d 6f6e 6c79 5d20 3529 er-read-only] 5) │ │ │ +00009810: 2920 6361 6c6c 2d77 6974 682d 636f 6e64 ) call-with-cond │ │ │ +00009820: 6974 696f 6e2d 6861 6e64 6c65 7220 235b ition-handler #[ │ │ │ +00009830: 2865 7272 6f72 2d69 6e66 6f29 2022 c108 (error-info) ".. │ │ │ +00009840: 2187 2220 5b65 7272 6f72 2d69 6e66 6f20 !." [error-info │ │ │ +00009850: 6279 7465 2d63 6f6d 7069 6c65 2d72 6570 byte-compile-rep │ │ │ +00009860: 6f72 742d 6572 726f 725d 2032 5d20 235b ort-error] 2] #[ │ │ │ +00009870: 6e69 6c20 228a 0971 88c2 6288 c3c4 7788 nil "..q..b...w. │ │ │ +00009880: c5c6 21ab 85c2 7988 aa72 6dac 88c7 c809 ..!...y..rm..... │ │ │ +00009890: 2121 88aa 67c9 2088 ca20 88c4 8910 2987 !!..g. .. ....). │ │ │ +000098a0: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ +000098b0: 756e 7265 736f 6c76 6564 2d66 756e 6374 unresolved-funct │ │ │ +000098c0: 696f 6e73 2062 7974 652d 636f 6d70 696c ions byte-compil │ │ │ +000098d0: 652d 696e 6275 6666 6572 2031 2022 2009 e-inbuffer 1 " . │ │ │ +000098e0: 5c6e 0c22 206e 696c 206c 6f6f 6b69 6e67 \n." nil looking │ │ │ +000098f0: 2d61 7420 223b 2220 6279 7465 2d63 6f6d -at ";" byte-com │ │ │ +00009900: 7069 6c65 2d66 696c 652d 666f 726d 2072 pile-file-form r │ │ │ +00009910: 6561 6420 6279 7465 2d63 6f6d 7069 6c65 ead byte-compile │ │ │ +00009920: 2d66 6c75 7368 2d70 656e 6469 6e67 2062 -flush-pending b │ │ │ +00009930: 7974 652d 636f 6d70 696c 652d 7761 726e yte-compile-warn │ │ │ +00009940: 2d61 626f 7574 2d75 6e72 6573 6f6c 7665 -about-unresolve │ │ │ +00009950: 642d 6675 6e63 7469 6f6e 735d 2033 5d20 d-functions] 3] │ │ │ +00009960: 756e 7573 6564 2d76 6172 7320 6279 7465 unused-vars byte │ │ │ +00009970: 2d63 6f6d 7069 6c65 2d77 6172 6e2d 6162 -compile-warn-ab │ │ │ +00009980: 6f75 742d 756e 7573 6564 2d76 6172 6961 out-unused-varia │ │ │ +00009990: 626c 6573 2028 6279 7465 2d63 6f64 6520 bles (byte-code │ │ │ +000099a0: 22c2 0921 10c3 8722 205b 666f 726d 2062 "..!..." [form b │ │ │ +000099b0: 7974 652d 636f 6d70 696c 652d 6f75 7462 yte-compile-outb │ │ │ +000099c0: 7566 6665 7220 7265 6164 2074 5d20 3229 uffer read t] 2) │ │ │ +000099d0: 2028 2865 6e64 2d6f 662d 6669 6c65 2929 ((end-of-file)) │ │ │ +000099e0: 2065 7661 6c20 6b69 6c6c 2d62 7566 6665 eval kill-buffe │ │ │ +000099f0: 7220 6279 7465 2d63 6f6d 7069 6c65 2d65 r byte-compile-e │ │ │ +00009a00: 6d61 6373 3139 2d63 6f6d 7061 7469 6269 macs19-compatibi │ │ │ +00009a10: 6c69 7479 2062 7974 652d 636f 6d70 696c lity byte-compil │ │ │ +00009a20: 652d 6479 6e61 6d69 6320 6279 7465 2d63 e-dynamic byte-c │ │ │ +00009a30: 6f6d 7069 6c65 2d64 796e 616d 6963 2d64 ompile-dynamic-d │ │ │ +00009a40: 6f63 7374 7269 6e67 7320 6669 6c65 6e61 ocstrings filena │ │ │ +00009a50: 6d65 2066 6f72 6d20 6279 7465 2d63 6f6d me form byte-com │ │ │ +00009a60: 7069 6c65 2d6f 7574 7075 7420 6279 7465 pile-output byte │ │ │ +00009a70: 2d63 6f6d 7069 6c65 2d6d 6178 6465 7074 -compile-maxdept │ │ │ +00009a80: 6820 6279 7465 2d63 6f6d 7069 6c65 2d64 h byte-compile-d │ │ │ +00009a90: 6570 7468 2062 7974 652d 636f 6d70 696c epth byte-compil │ │ │ +00009aa0: 652d 7461 672d 6e75 6d62 6572 2062 7974 e-tag-number byt │ │ │ +00009ab0: 652d 636f 6d70 696c 652d 7661 7269 6162 e-compile-variab │ │ │ +00009ac0: 6c65 7320 6279 7465 2d63 6f6d 7069 6c65 les byte-compile │ │ │ +00009ad0: 2d63 6f6e 7374 616e 7473 2070 7269 6e74 -constants print │ │ │ +00009ae0: 2d6c 6576 656c 2070 7269 6e74 2d6c 656e -level print-len │ │ │ +00009af0: 6774 6820 666c 6f61 742d 6f75 7470 7574 gth float-output │ │ │ +00009b00: 2d66 6f72 6d61 7420 6279 7465 2d63 6f6d -format byte-com │ │ │ +00009b10: 7069 6c65 2d69 6e69 7469 616c 2d6d 6163 pile-initial-mac │ │ │ +00009b20: 726f 2d65 6e76 6972 6f6e 6d65 6e74 2062 ro-environment b │ │ │ +00009b30: 7974 652d 636f 6d70 696c 652d 6465 6661 yte-compile-defa │ │ │ +00009b40: 756c 742d 7761 726e 696e 6773 2062 7974 ult-warnings byt │ │ │ +00009b50: 652d 636f 6d70 696c 652d 6669 6c65 2d64 e-compile-file-d │ │ │ +00009b60: 6f6d 6169 6e20 6279 7465 2d63 6f6d 7069 omain byte-compi │ │ │ +00009b70: 6c65 2d66 7265 652d 6173 7369 676e 6d65 le-free-assignme │ │ │ +00009b80: 6e74 7320 6279 7465 2d63 6f6d 7069 6c65 nts byte-compile │ │ │ +00009b90: 2d66 7265 652d 7265 6665 7265 6e63 6573 -free-references │ │ │ +00009ba0: 2062 7974 652d 636f 6d70 696c 652d 626f byte-compile-bo │ │ │ +00009bb0: 756e 642d 7661 7269 6162 6c65 7320 6279 und-variables by │ │ │ +00009bc0: 7465 2d63 6f6d 7069 6c65 2d75 6e72 6573 te-compile-unres │ │ │ +00009bd0: 6f6c 7665 642d 6675 6e63 7469 6f6e 7320 olved-functions │ │ │ +00009be0: 6279 7465 2d63 6f6d 7069 6c65 2d61 7574 byte-compile-aut │ │ │ +00009bf0: 6f6c 6f61 642d 656e 7669 726f 6e6d 656e oload-environmen │ │ │ +00009c00: 7420 6279 7465 2d63 6f6d 7069 6c65 2d66 t byte-compile-f │ │ │ +00009c10: 756e 6374 696f 6e2d 656e 7669 726f 6e6d unction-environm │ │ │ +00009c20: 656e 7420 6279 7465 2d63 6f6d 7069 6c65 ent byte-compile │ │ │ +00009c30: 2d6d 6163 726f 2d65 6e76 6972 6f6e 6d65 -macro-environme │ │ │ +00009c40: 6e74 2062 7974 652d 636f 6d70 696c 652d nt byte-compile- │ │ │ +00009c50: 696e 6275 6666 6572 206f 7665 7277 7269 inbuffer overwri │ │ │ +00009c60: 7465 2d6d 6f64 6520 6279 7465 2d63 6f6d te-mode byte-com │ │ │ +00009c70: 7069 6c65 2d70 6f69 6e74 2d6d 6178 2d70 pile-point-max-p │ │ │ +00009c80: 7265 765d 2031 345d 290a 2864 6566 616c rev] 14]).(defal │ │ │ +00009c90: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00009ca0: 652d 696e 7365 7274 2d68 6561 6465 7220 e-insert-header │ │ │ +00009cb0: 235b 2866 696c 656e 616d 6520 6279 7465 #[(filename byte │ │ │ +00009cc0: 2d63 6f6d 7069 6c65 2d69 6e62 7566 6665 -compile-inbuffe │ │ │ +00009cd0: 7220 6279 7465 2d63 6f6d 7069 6c65 2d6f r byte-compile-o │ │ │ +00009ce0: 7574 6275 6666 6572 2920 220c 7188 0918 utbuffer) ".q... │ │ │ +00009cf0: 0e3c 7188 c662 88c7 0dab 83c8 aa81 c9ca ..\n.a..... │ │ │ +00009d30: 5c6e db61 ab83 dcaa 875c 6eab 83dd aa81 \n.a.....\n..... │ │ │ +00009d40: de0d ab83 dfaa 81d6 b105 880d ac91 e0e1 ................ │ │ │ +00009d50: e2e3 e4e5 e60b 2121 c6e7 4fe8 b107 88e9 ......!!..O..... │ │ │ +00009d60: d4b1 0288 0dab 9708 ab94 eaeb e1e2 eced ................ │ │ │ +00009d70: eee4 e5e6 0b21 21c6 e74f efb1 5c6e 8829 .....!!..O..\n.) │ │ │ +00009d80: f0f1 21ad b3f0 f221 ac98 8a0c 7188 6562 ..!....!....q.eb │ │ │ +00009d90: 88f3 f421 f5f3 f621 51f7 7788 6064 2961 ...!...!Q.w.`d)a │ │ │ +00009da0: ab85 f889 163b 87f9 6388 fa16 3b8a 0c71 .....;..c...;..q │ │ │ +00009db0: 88f7 8916 3f89 1129 8722 205b 6479 6e61 ....?..)." [dyna │ │ │ +00009dc0: 6d69 632d 646f 6373 7472 696e 6773 2062 mic-docstrings b │ │ │ +00009dd0: 7974 652d 636f 6d70 696c 652d 6479 6e61 yte-compile-dyna │ │ │ +00009de0: 6d69 632d 646f 6373 7472 696e 6773 2062 mic-docstrings b │ │ │ +00009df0: 7974 652d 6f70 7469 6d69 7a65 2066 696c yte-optimize fil │ │ │ +00009e00: 656e 616d 6520 6279 7465 2d63 6f6d 7069 ename byte-compi │ │ │ +00009e10: 6c65 2d69 6e62 7566 6665 7220 6279 7465 le-inbuffer byte │ │ │ +00009e20: 2d63 6f6d 7069 6c65 2d65 6d61 6373 3139 -compile-emacs19 │ │ │ +00009e30: 2d63 6f6d 7061 7469 6269 6c69 7479 2031 -compatibility 1 │ │ │ +00009e40: 2022 3b45 4c43 2220 3139 2032 3020 2200 ";ELC" 19 20 ". │ │ │ +00009e50: 0000 5c6e 2220 223b 3b3b 2063 6f6d 7069 ..\n" ";;; compi │ │ │ +00009e60: 6c65 6420 6279 2022 2062 6f75 6e64 7020 led by " boundp │ │ │ +00009e70: 7573 6572 2d6d 6169 6c2d 6164 6472 6573 user-mail-addres │ │ │ +00009e80: 7320 7573 6572 2d6c 6f67 696e 2d6e 616d s user-login-nam │ │ │ +00009e90: 6520 2240 2220 7379 7374 656d 2d6e 616d e "@" system-nam │ │ │ +00009ea0: 6520 2220 6f6e 2022 2063 7572 7265 6e74 e " on " current │ │ │ +00009eb0: 2d74 696d 652d 7374 7269 6e67 2022 5c6e -time-string "\n │ │ │ +00009ec0: 3b3b 3b20 6672 6f6d 2066 696c 6520 2220 ;;; from file " │ │ │ +00009ed0: 225c 6e22 2022 3b3b 3b20 656d 6163 7320 "\n" ";;; emacs │ │ │ +00009ee0: 7665 7273 696f 6e20 2220 222e 5c6e 2220 version " ".\n" │ │ │ +00009ef0: 223b 3b3b 2062 7974 6563 6f6d 7020 7665 ";;; bytecomp ve │ │ │ +00009f00: 7273 696f 6e20 2220 225c 6e3b 3b3b 2022 rsion " "\n;;; " │ │ │ +00009f10: 2073 6f75 7263 6520 2273 6f75 7263 652d source "source- │ │ │ +00009f20: 6c65 7665 6c20 6f70 7469 6d69 7a61 7469 level optimizati │ │ │ +00009f30: 6f6e 206f 6e6c 7922 2062 7974 6520 2262 on only" byte "b │ │ │ +00009f40: 7974 652d 6c65 7665 6c20 6f70 7469 6d69 yte-level optimi │ │ │ +00009f50: 7a61 7469 6f6e 206f 6e6c 7922 2022 6f70 zation only" "op │ │ │ +00009f60: 7469 6d69 7a61 7469 6f6e 2069 7320 6f6e timization is on │ │ │ +00009f70: 2220 226f 7074 696d 697a 6174 696f 6e20 " "optimization │ │ │ +00009f80: 6973 206f 6666 2220 223b 2063 6f6d 7069 is off" "; compi │ │ │ +00009f90: 6c65 6420 7769 7468 2045 6d61 6373 2031 led with Emacs 1 │ │ │ +00009fa0: 3920 636f 6d70 6174 6962 696c 6974 792e 9 compatibility. │ │ │ +00009fb0: 5c6e 2220 223b 3b3b 2074 6869 7320 6669 \n" ";;; this fi │ │ │ +00009fc0: 6c65 2075 7365 7320 6f70 636f 6465 7320 le uses opcodes │ │ │ +00009fd0: 7768 6963 6820 646f 206e 6f74 2065 7869 which do not exi │ │ │ +00009fe0: 7374 2069 6e20 456d 6163 7320 3139 2e5c st in Emacs 19.\ │ │ │ +00009ff0: 6e22 2022 5c6e 2869 6620 2861 6e64 2028 n" "\n(if (and ( │ │ │ +0000a000: 626f 756e 6470 2027 656d 6163 732d 7665 boundp 'emacs-ve │ │ │ +0000a010: 7273 696f 6e29 5c6e 2220 2209 2028 6f72 rsion)\n" ". (or │ │ │ +0000a020: 2028 616e 6420 2862 6f75 6e64 7020 2765 (and (boundp 'e │ │ │ +0000a030: 706f 6368 3a3a 7665 7273 696f 6e29 2065 poch::version) e │ │ │ +0000a040: 706f 6368 3a3a 7665 7273 696f 6e29 5c6e poch::version)\n │ │ │ +0000a050: 2220 2209 2020 2020 2028 7374 7269 6e67 " ". (string │ │ │ +0000a060: 2d6c 6573 7370 2065 6d61 6373 2d76 6572 -lessp emacs-ver │ │ │ +0000a070: 7369 6f6e 205c 2232 305c 2229 2929 5c6e sion \"20\")))\n │ │ │ +0000a080: 2220 2220 2020 2028 6572 726f 7220 5c22 " " (error \" │ │ │ +0000a090: 6022 2070 7269 6e31 2d74 6f2d 7374 7269 `" prin1-to-stri │ │ │ +0000a0a0: 6e67 2066 696c 652d 6e61 6d65 2d6e 6f6e ng file-name-non │ │ │ +0000a0b0: 6469 7265 6374 6f72 7920 2d31 2022 2720 directory -1 "' │ │ │ +0000a0c0: 7761 7320 636f 6d70 696c 6564 2066 6f72 was compiled for │ │ │ +0000a0d0: 2045 6d61 6373 2032 305c 2229 295c 6e5c Emacs 20\"))\n\ │ │ │ +0000a0e0: 6e22 2022 286f 7220 2862 6f75 6e64 7020 n" "(or (boundp │ │ │ +0000a0f0: 2763 7572 7265 6e74 2d6c 6f61 642d 6c69 'current-load-li │ │ │ +0000a100: 7374 2920 2873 6574 7120 6375 7272 656e st) (setq curren │ │ │ +0000a110: 742d 6c6f 6164 2d6c 6973 7420 6e69 6c29 t-load-list nil) │ │ │ +0000a120: 295c 6e22 2022 3b3b 3b20 7468 6973 2066 )\n" ";;; this f │ │ │ +0000a130: 696c 6520 7573 6573 206f 7063 6f64 6573 ile uses opcodes │ │ │ +0000a140: 2077 6869 6368 2064 6f20 6e6f 7420 6578 which do not ex │ │ │ +0000a150: 6973 7420 7072 696f 7220 746f 5c6e 2220 ist prior to\n" │ │ │ +0000a160: 223b 3b3b 2058 456d 6163 7320 3139 2e31 ";;; XEmacs 19.1 │ │ │ +0000a170: 342f 474e 5520 456d 6163 7320 3139 2e32 4/GNU Emacs 19.2 │ │ │ +0000a180: 3920 6f72 206c 6174 6572 2e22 2022 0920 9 or later." ". │ │ │ +0000a190: 2020 2020 2861 6e64 2028 6e6f 7420 2873 (and (not (s │ │ │ +0000a1a0: 7472 696e 672d 6d61 7463 6820 5c22 5845 tring-match \"XE │ │ │ +0000a1b0: 6d61 6373 5c22 2065 6d61 6373 2d76 6572 macs\" emacs-ver │ │ │ +0000a1c0: 7369 6f6e 2929 5c6e 2220 2209 2020 2020 sion))\n" ". │ │ │ +0000a1d0: 2020 2020 2020 2873 7472 696e 672d 6c65 (string-le │ │ │ +0000a1e0: 7373 7020 656d 6163 732d 7665 7273 696f ssp emacs-versio │ │ │ +0000a1f0: 6e20 5c22 3139 2e32 395c 2229 295c 6e22 n \"19.29\"))\n" │ │ │ +0000a200: 2022 0920 2020 2020 2873 7472 696e 672d ". (string- │ │ │ +0000a210: 6c65 7373 7020 656d 6163 732d 7665 7273 lessp emacs-vers │ │ │ +0000a220: 696f 6e20 5c22 3139 2e31 345c 2229 2929 ion \"19.14\"))) │ │ │ +0000a230: 5c6e 2220 2227 2077 6173 2063 6f6d 7069 \n" "' was compi │ │ │ +0000a240: 6c65 6420 666f 7220 5845 6d61 6373 2031 led for XEmacs 1 │ │ │ +0000a250: 392e 3134 2f45 6d61 6373 2031 392e 3239 9.14/Emacs 19.29 │ │ │ +0000a260: 206f 7220 6c61 7465 725c 2229 295c 6e5c or later\"))\n\ │ │ │ +0000a270: 6e22 2066 6561 7475 7265 7020 286f 7220 n" featurep (or │ │ │ +0000a280: 6d75 6c65 2066 696c 652d 636f 6469 6e67 mule file-coding │ │ │ +0000a290: 2920 286e 6f74 206d 756c 6529 2063 6861 ) (not mule) cha │ │ │ +0000a2a0: 722d 746f 2d73 7472 696e 6720 3020 222d r-to-string 0 "- │ │ │ +0000a2b0: 2220 3235 3520 6e69 6c20 7261 772d 7465 " 255 nil raw-te │ │ │ +0000a2c0: 7874 2d75 6e69 7820 2228 7265 7175 6972 xt-unix "(requir │ │ │ +0000a2d0: 6520 276d 756c 6529 5c6e 3b3b 3b23 2323 e 'mule)\n;;;### │ │ │ +0000a2e0: 636f 6469 6e67 2073 7973 7465 6d3a 2065 coding system: e │ │ │ +0000a2f0: 7363 6170 652d 7175 6f74 6564 5c6e 2220 scape-quoted\n" │ │ │ +0000a300: 6573 6361 7065 2d71 756f 7465 6420 6275 escape-quoted bu │ │ │ +0000a310: 6666 6572 2d66 696c 652d 636f 6469 6e67 ffer-file-coding │ │ │ +0000a320: 2d73 7973 7465 6d20 6279 7465 2d63 6f6d -system byte-com │ │ │ +0000a330: 7069 6c65 2d6f 7574 6275 6666 6572 2065 pile-outbuffer e │ │ │ +0000a340: 6d61 6373 2d76 6572 7369 6f6e 2062 7974 macs-version byt │ │ │ +0000a350: 652d 636f 6d70 696c 652d 7665 7273 696f e-compile-versio │ │ │ +0000a360: 6e20 6279 7465 2d63 6f6d 7069 6c65 2d64 n byte-compile-d │ │ │ +0000a370: 796e 616d 6963 5d20 3132 5d29 0a28 6465 ynamic] 12]).(de │ │ │ +0000a380: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ +0000a390: 7069 6c65 2d6f 7574 7075 742d 6669 6c65 pile-output-file │ │ │ +0000a3a0: 2d66 6f72 6d20 235b 2866 6f72 6d29 2022 -form #[(form) " │ │ │ +0000a3b0: 0da2 c673 ab93 c70d 383b ab8d c8c9 89ca ...s....8;...... │ │ │ +0000a3c0: 0dc9 0d40 cb61 2606 87cc c989 cc0b ad85 ...@.a&......... │ │ │ +0000a3d0: 5c6e 3fad 81cc 1918 1e10 1e11 1e12 cdce \n?............. │ │ │ +0000a3e0: 0c5c 2288 cf0d 0c5c 2288 2dc9 8722 205b .\"....\".-.." [ │ │ │ +0000a3f0: 7072 696e 742d 7265 6164 6162 6c79 2070 print-readably p │ │ │ +0000a400: 7269 6e74 2d67 656e 7379 6d20 6279 7465 rint-gensym byte │ │ │ +0000a410: 2d63 6f6d 7069 6c65 2d65 6d61 6373 3139 -compile-emacs19 │ │ │ +0000a420: 2d63 6f6d 7061 7469 6269 6c69 7479 2062 -compatibility b │ │ │ +0000a430: 7974 652d 636f 6d70 696c 652d 7072 696e yte-compile-prin │ │ │ +0000a440: 742d 6765 6e73 796d 2062 7974 652d 636f t-gensym byte-co │ │ │ +0000a450: 6d70 696c 652d 6f75 7462 7566 6665 7220 mpile-outbuffer │ │ │ +0000a460: 666f 726d 2028 6465 6675 6e20 6465 666d form (defun defm │ │ │ +0000a470: 6163 726f 2064 6566 7661 7220 6465 6663 acro defvar defc │ │ │ +0000a480: 6f6e 7374 2061 7574 6f6c 6f61 6429 2033 onst autoload) 3 │ │ │ +0000a490: 2062 7974 652d 636f 6d70 696c 652d 6f75 byte-compile-ou │ │ │ +0000a4a0: 7470 7574 2d64 6f63 666f 726d 206e 696c tput-docform nil │ │ │ +0000a4b0: 2028 225c 6e28 2220 3320 2229 2229 2061 ("\n(" 3 ")") a │ │ │ +0000a4c0: 7574 6f6c 6f61 6420 7420 7072 696e 6320 utoload t princ │ │ │ +0000a4d0: 225c 6e22 2070 7269 6e31 2070 7269 6e74 "\n" prin1 print │ │ │ +0000a4e0: 2d6c 6576 656c 2070 7269 6e74 2d6c 656e -level print-len │ │ │ +0000a4f0: 6774 6820 7072 696e 742d 6573 6361 7065 gth print-escape │ │ │ +0000a500: 2d6e 6577 6c69 6e65 735d 2038 5d29 0a23 -newlines] 8]).# │ │ │ +0000a510: 4034 3935 2050 7269 6e74 2061 2066 6f72 @495 Print a for │ │ │ +0000a520: 6d20 7769 7468 2061 2064 6f63 2073 7472 m with a doc str │ │ │ +0000a530: 696e 672e 2020 494e 464f 2069 7320 2870 ing. INFO is (p │ │ │ +0000a540: 7265 6669 7820 646f 632d 696e 6465 7820 refix doc-index │ │ │ +0000a550: 706f 7374 6669 7829 2e0a 4966 2050 5245 postfix)..If PRE │ │ │ +0000a560: 4641 4345 2061 6e64 204e 414d 4520 6172 FACE and NAME ar │ │ │ +0000a570: 6520 6e6f 6e2d 6e69 6c2c 2070 7269 6e74 e non-nil, print │ │ │ +0000a580: 2074 6865 6d20 746f 6f2c 0a62 6566 6f72 them too,.befor │ │ │ +0000a590: 6520 494e 464f 2061 6e64 2074 6865 2046 e INFO and the F │ │ │ +0000a5a0: 4f52 4d20 6275 7420 6166 7465 7220 7468 ORM but after th │ │ │ +0000a5b0: 6520 646f 6320 7374 7269 6e67 2069 7473 e doc string its │ │ │ +0000a5c0: 656c 662e 0a49 6620 5350 4543 494e 4445 elf..If SPECINDE │ │ │ +0000a5d0: 5820 6973 206e 6f6e 2d6e 696c 2c20 6974 X is non-nil, it │ │ │ +0000a5e0: 2069 7320 7468 6520 696e 6465 7820 696e is the index in │ │ │ +0000a5f0: 2046 4f52 4d0a 6f66 2074 6865 2066 756e FORM.of the fun │ │ │ +0000a600: 6374 696f 6e20 6279 7465 636f 6465 2073 ction bytecode s │ │ │ +0000a610: 7472 696e 672e 2020 496e 2074 6861 7420 tring. In that │ │ │ +0000a620: 6361 7365 2c0a 7765 206f 7574 7075 7420 case,.we output │ │ │ +0000a630: 7468 6174 2061 7267 756d 656e 7420 616e that argument an │ │ │ +0000a640: 6420 7468 6520 666f 6c6c 6f77 696e 6720 d the following │ │ │ +0000a650: 6172 6775 6d65 6e74 2028 7468 6520 636f argument (the co │ │ │ +0000a660: 6e73 7461 6e74 7320 7665 6374 6f72 290a nstants vector). │ │ │ +0000a670: 746f 6765 7468 6572 2c20 666f 7220 6c61 together, for la │ │ │ +0000a680: 7a79 206c 6f61 6469 6e67 2e0a 5155 4f54 zy loading..QUOT │ │ │ +0000a690: 4544 2073 6179 7320 7468 6174 2077 6520 ED says that we │ │ │ +0000a6a0: 6861 7665 2074 6f20 7075 7420 6120 7175 have to put a qu │ │ │ +0000a6b0: 6f74 6520 6265 666f 7265 2074 6865 0a6c ote before the.l │ │ │ +0000a6c0: 6973 7420 7468 6174 2072 6570 7265 7365 ist that represe │ │ │ +0000a6d0: 6e74 7320 6120 646f 6320 7374 7269 6e67 nts a doc string │ │ │ +0000a6e0: 2072 6566 6572 656e 6365 2e0a 6061 7574 reference..`aut │ │ │ +0000a6f0: 6f6c 6f61 6427 206e 6565 6473 2074 6861 oload' needs tha │ │ │ +0000a700: 742e 1f0a 2864 6566 616c 6961 7320 2762 t...(defalias 'b │ │ │ +0000a710: 7974 652d 636f 6d70 696c 652d 6f75 7470 yte-compile-outp │ │ │ +0000a720: 7574 2d64 6f63 666f 726d 2023 5b28 7072 ut-docform #[(pr │ │ │ +0000a730: 6566 6163 6520 6e61 6d65 2069 6e66 6f20 eface name info │ │ │ +0000a740: 666f 726d 2073 7065 6369 6e64 6578 2071 form specindex q │ │ │ +0000a750: 756f 7465 6429 2022 0e1a 1870 5c6e 7188 uoted) "...p\nq. │ │ │ +0000a760: c61c 0b41 40c7 59ab b008 abad c863 88c9 ...A@.Y......c.. │ │ │ +0000a770: 0b41 400d 38c6 5c22 140b 4140 0d38 3bab .A@.8.\"..A@.8;. │ │ │ +0000a780: 990b 4140 0d38 47c7 56ab 8fca 0b41 400d ..A@.8G.V....A@. │ │ │ +0000a790: 38c7 48cb 5c22 ab83 0c5b 140e 17ab 8a0e 8.H.\"...[...... │ │ │ +0000a7a0: 1763 88cc 0e1b 5c6e 5c22 880b 4063 88cd .c....\n\"..@c.. │ │ │ +0000a7b0: 890e 1cad 860e 1d3f ad81 cec6 c719 1e1e .......?........ │ │ │ +0000a7c0: 1e1f 1e20 1e18 cc0d 405c 6e5c 2288 0d41 ... ....@\n\"..A │ │ │ +0000a7d0: 8915 abe5 0954 11cf 6388 0e19 a7ab a109 .....T..c....... │ │ │ +0000a7e0: 0e19 55ab 9bc9 0d40 0d41 4042 cd5c 221c ..U....@.A@B.\". │ │ │ +0000a7f0: d0d1 d20c 5c22 5c6e 5c22 880d 4115 0954 ....\"\n\"..A..T │ │ │ +0000a800: 1129 aa4e 090b 4140 55ab aa0c ab91 d0d1 .).N..A@U....... │ │ │ +0000a810: 0e21 ab83 d3aa 81d4 0c5c 225c 6e5c 2288 .!.......\"\n\". │ │ │ +0000a820: aa33 c61e 1860 54cc 0d40 5c6e 5c22 8862 .3...`T..@\n\".b │ │ │ +0000a830: 88d5 6388 6462 8829 aa1d cc0d 405c 6e5c ..c.db.)....@\n\ │ │ │ +0000a840: 2288 aa15 2dd6 0b38 6388 2971 8829 c687 "...-..8c.)q.).. │ │ │ +0000a850: 2220 5b64 796e 616d 6963 2d64 6f63 7374 " [dynamic-docst │ │ │ +0000a860: 7269 6e67 7320 696e 6465 7820 6279 7465 rings index byte │ │ │ +0000a870: 2d63 6f6d 7069 6c65 2d6f 7574 6275 6666 -compile-outbuff │ │ │ +0000a880: 6572 2069 6e66 6f20 706f 7369 7469 6f6e er info position │ │ │ +0000a890: 2066 6f72 6d20 6e69 6c20 3020 225c 6e22 form nil 0 "\n" │ │ │ +0000a8a0: 2062 7974 652d 636f 6d70 696c 652d 6f75 byte-compile-ou │ │ │ +0000a8b0: 7470 7574 2d61 732d 636f 6d6d 656e 7420 tput-as-comment │ │ │ +0000a8c0: 6368 6172 3d20 3f2a 2070 7269 6e31 2074 char= ?* prin1 t │ │ │ +0000a8d0: 2028 7429 2022 2022 2070 7269 6e63 2066 (t) " " princ f │ │ │ +0000a8e0: 6f72 6d61 7420 2228 2324 202e 2025 6429 ormat "(#$ . %d) │ │ │ +0000a8f0: 206e 696c 2220 2227 2823 2420 2e20 2564 nil" "'(#$ . %d │ │ │ +0000a900: 2922 2022 2823 2420 2e20 2564 2922 2022 )" "(#$ . %d)" " │ │ │ +0000a910: 5c5c 5c6e 2220 3220 7072 6566 6163 6520 \\\n" 2 preface │ │ │ +0000a920: 7072 696e 742d 6573 6361 7065 2d6e 6577 print-escape-new │ │ │ +0000a930: 6c69 6e65 7320 7370 6563 696e 6465 7820 lines specindex │ │ │ +0000a940: 6279 7465 2d63 6f6d 7069 6c65 2d64 796e byte-compile-dyn │ │ │ +0000a950: 616d 6963 2d64 6f63 7374 7269 6e67 7320 amic-docstrings │ │ │ +0000a960: 6e61 6d65 2062 7974 652d 636f 6d70 696c name byte-compil │ │ │ +0000a970: 652d 7072 696e 742d 6765 6e73 796d 2062 e-print-gensym b │ │ │ +0000a980: 7974 652d 636f 6d70 696c 652d 656d 6163 yte-compile-emac │ │ │ +0000a990: 7331 392d 636f 6d70 6174 6962 696c 6974 s19-compatibilit │ │ │ +0000a9a0: 7920 7072 696e 742d 6765 6e73 796d 2d61 y print-gensym-a │ │ │ +0000a9b0: 6c69 7374 2070 7269 6e74 2d67 656e 7379 list print-gensy │ │ │ +0000a9c0: 6d20 7072 696e 742d 7265 6164 6162 6c79 m print-readably │ │ │ +0000a9d0: 2071 756f 7465 645d 2036 2028 2324 202e quoted] 6 (#$ . │ │ │ +0000a9e0: 2034 3232 3631 295d 290a 2864 6566 616c 42261)]).(defal │ │ │ +0000a9f0: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +0000aa00: 652d 6b65 6570 2d70 656e 6469 6e67 2023 e-keep-pending # │ │ │ +0000aa10: 5b28 666f 726d 2026 6f70 7469 6f6e 616c [(form &optional │ │ │ +0000aa20: 2068 616e 646c 6572 2920 2209 c573 ab85 handler) "..s.. │ │ │ +0000aa30: c60c c75c 2214 0bab 9dc7 1a0c a2c8 73ab ...\".........s. │ │ │ +0000aa40: 88c9 089b ab83 ca20 880b 0c21 885c 6eab ....... ...!.\n. │ │ │ +0000aa50: 83cb 2088 29aa 85cc 0cc7 5c22 88cd 8722 .. .).....\"..." │ │ │ +0000aa60: 205b 6279 7465 2d63 6f6d 7069 6c65 2d6f [byte-compile-o │ │ │ +0000aa70: 7574 7075 7420 6279 7465 2d6f 7074 696d utput byte-optim │ │ │ +0000aa80: 697a 6520 666f 722d 6566 6665 6374 2068 ize for-effect h │ │ │ +0000aa90: 616e 646c 6572 2066 6f72 6d20 2874 2073 andler form (t s │ │ │ +0000aaa0: 6f75 7263 6529 2062 7974 652d 6f70 7469 ource) byte-opti │ │ │ +0000aab0: 6d69 7a65 2d66 6f72 6d20 7420 2866 7365 mize-form t (fse │ │ │ +0000aac0: 7420 6465 6661 6c69 6173 2064 6566 696e t defalias defin │ │ │ +0000aad0: 652d 6675 6e63 7469 6f6e 2920 3330 3020 e-function) 300 │ │ │ +0000aae0: 6279 7465 2d63 6f6d 7069 6c65 2d66 6c75 byte-compile-flu │ │ │ +0000aaf0: 7368 2d70 656e 6469 6e67 2062 7974 652d sh-pending byte- │ │ │ +0000ab00: 636f 6d70 696c 652d 6469 7363 6172 6420 compile-discard │ │ │ +0000ab10: 6279 7465 2d63 6f6d 7069 6c65 2d66 6f72 byte-compile-for │ │ │ +0000ab20: 6d20 6e69 6c5d 2033 5d29 0a28 6465 6661 m nil] 3]).(defa │ │ │ +0000ab30: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +0000ab40: 6c65 2d66 6c75 7368 2d70 656e 6469 6e67 le-flush-pending │ │ │ +0000ab50: 2023 5b6e 696c 2022 0cad a6c6 c7c8 5c22 #[nil "......\" │ │ │ +0000ab60: 891d a2c9 61ab 88ca cb0d 415c 2288 aa87 ....a.....A\"... │ │ │ +0000ab70: 0dab 84cb 0d21 88cc 8913 12cd 8911 10cc .....!.......... │ │ │ +0000ab80: 8914 2987 2220 5b62 7974 652d 636f 6d70 ..)." [byte-comp │ │ │ +0000ab90: 696c 652d 6d61 7864 6570 7468 2062 7974 ile-maxdepth byt │ │ │ +0000aba0: 652d 636f 6d70 696c 652d 6465 7074 6820 e-compile-depth │ │ │ +0000abb0: 6279 7465 2d63 6f6d 7069 6c65 2d76 6172 byte-compile-var │ │ │ +0000abc0: 6961 626c 6573 2062 7974 652d 636f 6d70 iables byte-comp │ │ │ +0000abd0: 696c 652d 636f 6e73 7461 6e74 7320 6279 ile-constants by │ │ │ +0000abe0: 7465 2d63 6f6d 7069 6c65 2d6f 7574 7075 te-compile-outpu │ │ │ +0000abf0: 7420 666f 726d 2062 7974 652d 636f 6d70 t form byte-comp │ │ │ +0000ac00: 696c 652d 6f75 742d 746f 706c 6576 656c ile-out-toplevel │ │ │ +0000ac10: 2074 2066 696c 6520 7072 6f67 6e20 6d61 t file progn ma │ │ │ +0000ac20: 7063 6172 2062 7974 652d 636f 6d70 696c pcar byte-compil │ │ │ +0000ac30: 652d 6f75 7470 7574 2d66 696c 652d 666f e-output-file-fo │ │ │ +0000ac40: 726d 206e 696c 2030 5d20 345d 290a 2864 rm nil 0] 4]).(d │ │ │ +0000ac50: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ +0000ac60: 6d70 696c 652d 6669 6c65 2d66 6f72 6d20 mpile-file-form │ │ │ +0000ac70: 235b 2866 6f72 6d29 2022 c489 1a19 0b3a #[(form) ".....: │ │ │ +0000ac80: ac85 c50b 21aa ae0b 4039 ab97 0b40 c64e ....!...@9...@.N │ │ │ +0000ac90: 8912 ab8f 5c6e 0b21 8913 ad9a c720 88c8 ....\n.!..... .. │ │ │ +0000aca0: 0b21 aa92 0bc9 0b08 5c22 8913 61ab 85c5 .!......\"..a... │ │ │ +0000acb0: 0b21 aa83 ca0b 212a 8722 205b 6279 7465 .!....!*." [byte │ │ │ +0000acc0: 2d63 6f6d 7069 6c65 2d6d 6163 726f 2d65 -compile-macro-e │ │ │ +0000acd0: 6e76 6972 6f6e 6d65 6e74 2062 7974 652d nvironment byte- │ │ │ +0000ace0: 636f 6d70 696c 652d 6375 7272 656e 742d compile-current- │ │ │ +0000acf0: 666f 726d 2068 616e 646c 6572 2066 6f72 form handler for │ │ │ +0000ad00: 6d20 6e69 6c20 6279 7465 2d63 6f6d 7069 m nil byte-compi │ │ │ +0000ad10: 6c65 2d6b 6565 702d 7065 6e64 696e 6720 le-keep-pending │ │ │ +0000ad20: 6279 7465 2d68 756e 6b2d 6861 6e64 6c65 byte-hunk-handle │ │ │ +0000ad30: 7220 6279 7465 2d63 6f6d 7069 6c65 2d66 r byte-compile-f │ │ │ +0000ad40: 6c75 7368 2d70 656e 6469 6e67 2062 7974 lush-pending byt │ │ │ +0000ad50: 652d 636f 6d70 696c 652d 6f75 7470 7574 e-compile-output │ │ │ +0000ad60: 2d66 696c 652d 666f 726d 206d 6163 726f -file-form macro │ │ │ +0000ad70: 6578 7061 6e64 2062 7974 652d 636f 6d70 expand byte-comp │ │ │ +0000ad80: 696c 652d 6669 6c65 2d66 6f72 6d5d 2034 ile-file-form] 4 │ │ │ +0000ad90: 5d29 0a28 7075 7420 2764 6566 7375 6273 ]).(put 'defsubs │ │ │ +0000ada0: 7420 2762 7974 652d 6875 6e6b 2d68 616e t 'byte-hunk-han │ │ │ +0000adb0: 646c 6572 2027 6279 7465 2d63 6f6d 7069 dler 'byte-compi │ │ │ +0000adc0: 6c65 2d66 696c 652d 666f 726d 2d64 6566 le-file-form-def │ │ │ +0000add0: 7375 6273 7429 0a28 6465 6661 6c69 6173 subst).(defalias │ │ │ +0000ade0: 2027 6279 7465 2d63 6f6d 7069 6c65 2d66 'byte-compile-f │ │ │ +0000adf0: 696c 652d 666f 726d 2d64 6566 7375 6273 ile-form-defsubs │ │ │ +0000ae00: 7420 235b 2866 6f72 6d29 2022 0b41 405c t #[(form) ".A@\ │ │ │ +0000ae10: 6eb7 ab8b 0b41 4011 c4c5 0b41 405c 2288 n....A@....A@\". │ │ │ +0000ae20: c6c7 0b08 5c22 2188 c887 2220 5b62 7974 ....\"!..." [byt │ │ │ +0000ae30: 652d 636f 6d70 696c 652d 6d61 6372 6f2d e-compile-macro- │ │ │ +0000ae40: 656e 7669 726f 6e6d 656e 7420 6279 7465 environment byte │ │ │ +0000ae50: 2d63 6f6d 7069 6c65 2d63 7572 7265 6e74 -compile-current │ │ │ +0000ae60: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ +0000ae70: 6c65 2d75 6e72 6573 6f6c 7665 642d 6675 le-unresolved-fu │ │ │ +0000ae80: 6e63 7469 6f6e 7320 666f 726d 2062 7974 nctions form byt │ │ │ +0000ae90: 652d 636f 6d70 696c 652d 7761 726e 2022 e-compile-warn " │ │ │ +0000aea0: 6465 6673 7562 7374 2025 7320 7761 7320 defsubst %s was │ │ │ +0000aeb0: 7573 6564 2062 6566 6f72 6520 6974 2077 used before it w │ │ │ +0000aec0: 6173 2064 6566 696e 6564 2220 6279 7465 as defined" byte │ │ │ +0000aed0: 2d63 6f6d 7069 6c65 2d66 696c 652d 666f -compile-file-fo │ │ │ +0000aee0: 726d 206d 6163 726f 6578 7061 6e64 206e rm macroexpand n │ │ │ +0000aef0: 696c 5d20 345d 290a 2870 7574 2027 6175 il] 4]).(put 'au │ │ │ +0000af00: 746f 6c6f 6164 2027 6279 7465 2d68 756e toload 'byte-hun │ │ │ +0000af10: 6b2d 6861 6e64 6c65 7220 2762 7974 652d k-handler 'byte- │ │ │ +0000af20: 636f 6d70 696c 652d 6669 6c65 2d66 6f72 compile-file-for │ │ │ +0000af30: 6d2d 6175 746f 6c6f 6164 290a 2864 6566 m-autoload).(def │ │ │ +0000af40: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ +0000af50: 696c 652d 6669 6c65 2d66 6f72 6d2d 6175 ile-file-form-au │ │ │ +0000af60: 746f 6c6f 6164 2023 5b28 666f 726d 2920 toload #[(form) │ │ │ +0000af70: 220d 4140 3aab 880d 4140 40c6 61aa 950d ".A@:...A@@.a... │ │ │ +0000af80: 4140 39ab 8ec7 0d41 4021 ac8a 0d41 40c8 A@9....A@!...A@. │ │ │ +0000af90: 73aa 81c9 ad85 ca0d 4140 211c cb0d 383a s.......A@!...8: │ │ │ +0000afa0: ab88 cb0d 3840 c661 aa95 cb0d 3839 ab8e ....8@.a....89.. │ │ │ +0000afb0: c7cb 0d38 21ac 8acb 0d38 c873 aa81 c9ad ...8!....8.s.... │ │ │ +0000afc0: 87ca cb0d 3821 cc73 8919 abb0 0d1d 0d41 ....8!.s.......A │ │ │ +0000afd0: 8915 aba0 0d40 3aab 870d 4040 c661 aa92 .....@:...@@.a.. │ │ │ +0000afe0: 0d40 39ab 8cc7 0d40 21ac 630d 40c8 73aa .@9....@!.c.@.s. │ │ │ +0000aff0: 81c9 ac5a 0d29 ac84 ca0d 2188 0cab 9e0c ...Z.)....!..... │ │ │ +0000b000: 0bb7 891a ab90 cd08 73ab 85ce cf0c 5c22 ........s.....\" │ │ │ +0000b010: 885c 6e0d a188 aa86 0c0d 420b 4213 292a .\n.......B.B.)* │ │ │ +0000b020: d00d 383b ab82 0d87 d10d d25c 2287 2220 ..8;.......\"." │ │ │ +0000b030: 5b62 7974 652d 636f 6d70 696c 652d 7761 [byte-compile-wa │ │ │ +0000b040: 726e 696e 6773 206d 6163 726f 7020 6f6c rnings macrop ol │ │ │ +0000b050: 6420 6279 7465 2d63 6f6d 7069 6c65 2d61 d byte-compile-a │ │ │ +0000b060: 7574 6f6c 6f61 642d 656e 7669 726f 6e6d utoload-environm │ │ │ +0000b070: 656e 7420 6e61 6d65 2066 6f72 6d20 7175 ent name form qu │ │ │ +0000b080: 6f74 6520 6b65 7977 6f72 6470 2028 6e69 ote keywordp (ni │ │ │ +0000b090: 6c20 7429 2074 2065 7661 6c20 3520 2874 l t) t eval 5 (t │ │ │ +0000b0a0: 206d 6163 726f 2920 7265 6465 6669 6e65 macro) redefine │ │ │ +0000b0b0: 2062 7974 652d 636f 6d70 696c 652d 7761 byte-compile-wa │ │ │ +0000b0c0: 726e 2022 6d75 6c74 6970 6c65 2061 7574 rn "multiple aut │ │ │ +0000b0d0: 6f6c 6f61 6473 2066 6f72 2025 7322 2033 oloads for %s" 3 │ │ │ +0000b0e0: 2062 7974 652d 636f 6d70 696c 652d 6b65 byte-compile-ke │ │ │ +0000b0f0: 6570 2d70 656e 6469 6e67 2062 7974 652d ep-pending byte- │ │ │ +0000b100: 636f 6d70 696c 652d 6e6f 726d 616c 2d63 compile-normal-c │ │ │ +0000b110: 616c 6c5d 2034 5d29 0a28 6279 7465 2d63 all] 4]).(byte-c │ │ │ +0000b120: 6f64 6520 22c0 c1c2 c323 88c0 c4c2 c323 ode "....#.....# │ │ │ +0000b130: 8722 205b 7075 7420 6465 6676 6172 2062 ." [put defvar b │ │ │ +0000b140: 7974 652d 6875 6e6b 2d68 616e 646c 6572 yte-hunk-handler │ │ │ +0000b150: 2062 7974 652d 636f 6d70 696c 652d 6669 byte-compile-fi │ │ │ +0000b160: 6c65 2d66 6f72 6d2d 6465 6676 6172 2d6f le-form-defvar-o │ │ │ +0000b170: 722d 6465 6663 6f6e 7374 2064 6566 636f r-defconst defco │ │ │ +0000b180: 6e73 745d 2034 290a 2864 6566 616c 6961 nst] 4).(defalia │ │ │ +0000b190: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ +0000b1a0: 6669 6c65 2d66 6f72 6d2d 6465 6676 6172 file-form-defvar │ │ │ +0000b1b0: 2d6f 722d 6465 6663 6f6e 7374 2023 5b28 -or-defconst #[( │ │ │ +0000b1c0: 666f 726d 2920 220b 47c4 56ab 8dc5 c60b form) ".G.V..... │ │ │ +0000b1d0: 400b 4140 0b41 47c7 2588 0b47 c756 ab92 @.A@.AG.%..G.V.. │ │ │ +0000b1e0: c70b 383b ac8c c5c8 0b40 0b41 40c7 0b38 ..8;.....@.A@..8 │ │ │ +0000b1f0: 2488 c70b 38ac 84c9 0b21 87ca 0973 ab88 $...8....!...s.. │ │ │ +0000b200: 0b41 4008 425c 6e42 12cb 0b38 3aab 90cc .A@.B\nB...8:... │ │ │ +0000b210: 0b21 8913 4141 cdcb 0b38 cecf 23a0 880b .!..AA...8..#... │ │ │ +0000b220: 8722 205b 6279 7465 2d63 6f6d 7069 6c65 ." [byte-compile │ │ │ +0000b230: 2d67 6c6f 6261 6c2d 6269 7420 6279 7465 -global-bit byte │ │ │ +0000b240: 2d63 6f6d 7069 6c65 2d77 6172 6e69 6e67 -compile-warning │ │ │ +0000b250: 7320 6279 7465 2d63 6f6d 7069 6c65 2d62 s byte-compile-b │ │ │ +0000b260: 6f75 6e64 2d76 6172 6961 626c 6573 2066 ound-variables f │ │ │ +0000b270: 6f72 6d20 3420 6279 7465 2d63 6f6d 7069 orm 4 byte-compi │ │ │ +0000b280: 6c65 2d77 6172 6e20 2225 7320 2573 2063 le-warn "%s %s c │ │ │ +0000b290: 616c 6c65 6420 7769 7468 2025 6420 6172 alled with %d ar │ │ │ +0000b2a0: 6775 6d65 6e74 732c 2062 7574 2061 6363 guments, but acc │ │ │ +0000b2b0: 6570 7473 206f 6e6c 7920 2573 2220 3320 epts only %s" 3 │ │ │ +0000b2c0: 2254 6869 7264 2061 7267 2074 6f20 2573 "Third arg to %s │ │ │ +0000b2d0: 2025 7320 6973 206e 6f74 2061 2073 7472 %s is not a str │ │ │ +0000b2e0: 696e 673a 2025 7322 2062 7974 652d 636f ing: %s" byte-co │ │ │ +0000b2f0: 6d70 696c 652d 6b65 6570 2d70 656e 6469 mpile-keep-pendi │ │ │ +0000b300: 6e67 2066 7265 652d 7661 7273 2032 2063 ng free-vars 2 c │ │ │ +0000b310: 6f70 792d 7365 7175 656e 6365 2062 7974 opy-sequence byt │ │ │ +0000b320: 652d 636f 6d70 696c 652d 746f 702d 6c65 e-compile-top-le │ │ │ +0000b330: 7665 6c20 6e69 6c20 6669 6c65 5d20 375d vel nil file] 7] │ │ │ +0000b340: 290a 2870 7574 2027 7265 7175 6972 6520 ).(put 'require │ │ │ +0000b350: 2762 7974 652d 6875 6e6b 2d68 616e 646c 'byte-hunk-handl │ │ │ +0000b360: 6572 2027 6279 7465 2d63 6f6d 7069 6c65 er 'byte-compile │ │ │ +0000b370: 2d66 696c 652d 666f 726d 2d65 7661 6c2d -file-form-eval- │ │ │ +0000b380: 626f 756e 6461 7279 290a 2864 6566 616c boundary).(defal │ │ │ +0000b390: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +0000b3a0: 652d 6669 6c65 2d66 6f72 6d2d 6576 616c e-file-form-eval │ │ │ +0000b3b0: 2d62 6f75 6e64 6172 7920 235b 2866 6f72 -boundary #[(for │ │ │ +0000b3c0: 6d29 2022 c108 2188 c208 c35c 2287 2220 m) "..!....\"." │ │ │ +0000b3d0: 5b66 6f72 6d20 6576 616c 2062 7974 652d [form eval byte- │ │ │ +0000b3e0: 636f 6d70 696c 652d 6b65 6570 2d70 656e compile-keep-pen │ │ │ +0000b3f0: 6469 6e67 2062 7974 652d 636f 6d70 696c ding byte-compil │ │ │ +0000b400: 652d 6e6f 726d 616c 2d63 616c 6c5d 2033 e-normal-call] 3 │ │ │ +0000b410: 5d29 0a28 6279 7465 2d63 6f64 6520 22c0 ]).(byte-code ". │ │ │ +0000b420: c1c2 c323 88c0 c4c2 c323 88c0 c5c2 c323 ...#.....#.....# │ │ │ +0000b430: 8722 205b 7075 7420 7072 6f67 6e20 6279 ." [put progn by │ │ │ +0000b440: 7465 2d68 756e 6b2d 6861 6e64 6c65 7220 te-hunk-handler │ │ │ +0000b450: 6279 7465 2d63 6f6d 7069 6c65 2d66 696c byte-compile-fil │ │ │ +0000b460: 652d 666f 726d 2d70 726f 676e 2070 726f e-form-progn pro │ │ │ +0000b470: 6731 2070 726f 6732 5d20 3429 0a28 6465 g1 prog2] 4).(de │ │ │ +0000b480: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ +0000b490: 7069 6c65 2d66 696c 652d 666f 726d 2d70 pile-file-form-p │ │ │ +0000b4a0: 726f 676e 2023 5b28 666f 726d 2920 22c1 rogn #[(form) ". │ │ │ +0000b4b0: c208 415c 2288 c387 2220 5b66 6f72 6d20 ..A\"..." [form │ │ │ +0000b4c0: 6d61 7063 6172 2062 7974 652d 636f 6d70 mapcar byte-comp │ │ │ +0000b4d0: 696c 652d 6669 6c65 2d66 6f72 6d20 6e69 ile-file-form ni │ │ │ +0000b4e0: 6c5d 2033 5d29 0a28 7075 7420 2765 7661 l] 3]).(put 'eva │ │ │ +0000b4f0: 6c20 2762 7974 652d 6875 6e6b 2d68 616e l 'byte-hunk-han │ │ │ +0000b500: 646c 6572 2027 6279 7465 2d63 6f6d 7069 dler 'byte-compi │ │ │ +0000b510: 6c65 2d66 696c 652d 666f 726d 2d65 7661 le-file-form-eva │ │ │ +0000b520: 6c29 0a28 6465 6661 6c69 6173 2027 6279 l).(defalias 'by │ │ │ +0000b530: 7465 2d63 6f6d 7069 6c65 2d66 696c 652d te-compile-file- │ │ │ +0000b540: 666f 726d 2d65 7661 6c20 235b 2866 6f72 form-eval #[(for │ │ │ +0000b550: 6d29 2022 0841 40a2 c161 ab86 0841 4041 m) ".A@..a...A@A │ │ │ +0000b560: 4087 c208 2187 2220 5b66 6f72 6d20 7175 @...!." [form qu │ │ │ +0000b570: 6f74 6520 6279 7465 2d63 6f6d 7069 6c65 ote byte-compile │ │ │ +0000b580: 2d6b 6565 702d 7065 6e64 696e 675d 2032 -keep-pending] 2 │ │ │ +0000b590: 5d29 0a28 7075 7420 2764 6566 756e 2027 ]).(put 'defun ' │ │ │ +0000b5a0: 6279 7465 2d68 756e 6b2d 6861 6e64 6c65 byte-hunk-handle │ │ │ +0000b5b0: 7220 2762 7974 652d 636f 6d70 696c 652d r 'byte-compile- │ │ │ +0000b5c0: 6669 6c65 2d66 6f72 6d2d 6465 6675 6e29 file-form-defun) │ │ │ +0000b5d0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +0000b5e0: 2d63 6f6d 7069 6c65 2d66 696c 652d 666f -compile-file-fo │ │ │ +0000b5f0: 726d 2d64 6566 756e 2023 5b28 666f 726d rm-defun #[(form │ │ │ +0000b600: 2920 22c1 08c2 5c22 8722 205b 666f 726d ) "...\"." [form │ │ │ +0000b610: 2062 7974 652d 636f 6d70 696c 652d 6669 byte-compile-fi │ │ │ +0000b620: 6c65 2d66 6f72 6d2d 6465 666d 756d 626c le-form-defmumbl │ │ │ +0000b630: 6520 6e69 6c5d 2033 5d29 0a28 7075 7420 e nil] 3]).(put │ │ │ +0000b640: 2764 6566 6d61 6372 6f20 2762 7974 652d 'defmacro 'byte- │ │ │ +0000b650: 6875 6e6b 2d68 616e 646c 6572 2027 6279 hunk-handler 'by │ │ │ +0000b660: 7465 2d63 6f6d 7069 6c65 2d66 696c 652d te-compile-file- │ │ │ +0000b670: 666f 726d 2d64 6566 6d61 6372 6f29 0a28 form-defmacro).( │ │ │ +0000b680: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ +0000b690: 6f6d 7069 6c65 2d66 696c 652d 666f 726d ompile-file-form │ │ │ +0000b6a0: 2d64 6566 6d61 6372 6f20 235b 2866 6f72 -defmacro #[(for │ │ │ +0000b6b0: 6d29 2022 c108 c25c 2287 2220 5b66 6f72 m) "...\"." [for │ │ │ +0000b6c0: 6d20 6279 7465 2d63 6f6d 7069 6c65 2d66 m byte-compile-f │ │ │ +0000b6d0: 696c 652d 666f 726d 2d64 6566 6d75 6d62 ile-form-defmumb │ │ │ +0000b6e0: 6c65 2074 5d20 335d 290a 2864 6566 616c le t] 3]).(defal │ │ │ +0000b6f0: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +0000b700: 652d 636f 6d70 696c 6564 2d6f 626a 2d74 e-compiled-obj-t │ │ │ +0000b710: 6f2d 6c69 7374 2023 5b28 6f62 6a29 2022 o-list #[(obj) " │ │ │ +0000b720: c6c7 c80d ad85 0c3f ad81 c9ca 1b1a 19cb .......?........ │ │ │ +0000b730: 0821 2bcc cd4f ce51 2187 2220 5b6f 626a .!+..O.Q!." [obj │ │ │ +0000b740: 2070 7269 6e74 2d72 6561 6461 626c 7920 print-readably │ │ │ +0000b750: 7072 696e 742d 6765 6e73 796d 2070 7269 print-gensym pri │ │ │ +0000b760: 6e74 2d67 656e 7379 6d2d 616c 6973 7420 nt-gensym-alist │ │ │ +0000b770: 6279 7465 2d63 6f6d 7069 6c65 2d65 6d61 byte-compile-ema │ │ │ +0000b780: 6373 3139 2d63 6f6d 7061 7469 6269 6c69 cs19-compatibili │ │ │ +0000b790: 7479 2062 7974 652d 636f 6d70 696c 652d ty byte-compile- │ │ │ +0000b7a0: 7072 696e 742d 6765 6e73 796d 2072 6561 print-gensym rea │ │ │ +0000b7b0: 6420 2228 2220 7420 2874 2920 6e69 6c20 d "(" t (t) nil │ │ │ +0000b7c0: 7072 696e 312d 746f 2d73 7472 696e 6720 prin1-to-string │ │ │ +0000b7d0: 3220 2d31 2022 2922 5d20 355d 290a 2864 2 -1 ")"] 5]).(d │ │ │ +0000b7e0: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ +0000b7f0: 6d70 696c 652d 6669 6c65 2d66 6f72 6d2d mpile-file-form- │ │ │ +0000b800: 6465 666d 756d 626c 6520 235b 2866 6f72 defmumble #[(for │ │ │ +0000b810: 6d20 6d61 6372 6f70 2920 220b 4140 1c5c m macrop) ".A@.\ │ │ │ +0000b820: 6eab 83c6 aa81 c719 5c6e ab83 c7aa 81c6 n.......\n...... │ │ │ +0000b830: 1e41 0c09 4ab7 1e3c 0c0e 414a b71e 3fc8 .A..J..<..AJ..?. │ │ │ +0000b840: 891e 461e 470e 48ab 8f0c 0e40 b7ac 890c ..F.G.H....@.... │ │ │ +0000b850: c889 450e 4042 1640 0c16 49c9 0e3d 73ab ..E.@B.@..I..=s. │ │ │ +0000b860: 85ca 0b5c 6e5c 2288 0e4a ab92 cbcc 0e42 ...\n\"..J.....B │ │ │ +0000b870: ab86 cd0e 4221 aa81 ce0b 4140 2388 0e3f ....B!....A@#..? │ │ │ +0000b880: ab9c c90e 3d73 ab8f 0b41 400e 43b7 ac87 ....=s...A@.C... │ │ │ +0000b890: cfd0 0b41 405c 2288 0e3f c8a1 88aa e70e ...A@\"..?...... │ │ │ +0000b8a0: 3cab 9ec9 0e3d 73ab dd0b 4140 0e43 b7ac <....=s...A@.C.. │ │ │ +0000b8b0: d5cf d15c 6eab 83d2 aa81 d30b 4140 2388 ...\n.......A@#. │ │ │ +0000b8c0: aac5 d40c 21ab c0d5 0c4b 21ac 8d0c 4ba2 ....!....K!...K. │ │ │ +0000b8d0: 5c6e ab83 d6aa 81d7 61ab adc9 0e3d 73ab \n......a....=s. │ │ │ +0000b8e0: 9ecf d8d5 0c4b 21ab 83d9 aa87 5c6e ab83 .....K!.....\n.. │ │ │ +0000b8f0: d3aa 81d2 0b41 405c 6eab 83d2 aa81 d324 .....A@\n......$ │ │ │ +0000b900: 8809 0cc8 4209 4a42 4c88 da0b 9b89 1e3e ....B.JBL......> │ │ │ +0000b910: 403b ab9c 0e3e a3a2 39ab 950e 3ea3 a2ab @;...>..9...>... │ │ │ +0000b920: 8f0e 3ea3 a3a2 3bab 87cf db0b 4140 5c22 ..>...;.....A@\" │ │ │ +0000b930: 8829 dcd6 0b41 4142 2118 dd08 211d 0e3c .)...AAB!...!..< │ │ │ +0000b940: ab87 0e3c 08a1 88aa 8909 0c08 4209 4a42 ...<........B.JB │ │ │ +0000b950: 4c88 da0b 383b ab9a 0da2 de61 ab94 0d41 L...8;.....a...A │ │ │ +0000b960: 40a2 d661 ab8c 0b40 0c0d 4140 4142 4282 @..a...@..A@ABB. │ │ │ +0000b970: 0702 df20 88da 0b38 3bac c6e0 e10c 0d3a ... ...8;......: │ │ │ +0000b980: ac89 5c6e ab83 e2aa 9be3 aa98 0d40 de61 ..\n.........@.a │ │ │ +0000b990: ab8b 0815 5c6e ab83 e4aa 8ae5 aa87 5c6e ....\n........\n │ │ │ +0000b9a0: ab83 e6aa 81e7 e80d 21ab 85e9 0d21 aa84 ........!....!.. │ │ │ +0000b9b0: ea0d c85c 220d 3a3f ad85 0e44 ad81 ebc8 ...\".:?...D.... │ │ │ +0000b9c0: 2606 88aa e4e0 e10c 0d3a ac89 5c6e ab83 &........:..\n.. │ │ │ +0000b9d0: ecaa 9bed aa98 0d40 de61 ab8b 0815 5c6e .......@.a....\n │ │ │ +0000b9e0: ab83 eeaa 8aef aa87 5c6e ab83 f0aa 81f1 ........\n...... │ │ │ +0000b9f0: 0d3a ab83 0daa a7f2 0d21 f30d 21f4 0d21 .:.......!..!..! │ │ │ +0000ba00: f50d 2146 f60d f75c 2289 1e45 ad83 0e45 ..!F...\"..E...E │ │ │ +0000ba10: 4329 a4f8 0d21 ad86 f90d 2141 4043 a40d C)...!....!A@C.. │ │ │ +0000ba20: 3a3f ad85 0e44 ad81 ebc8 2606 88fa fb0e :?...D....&..... │ │ │ +0000ba30: 4b5c 2288 c82e 0987 2220 5b6e 6577 2d6f K\"....." [new-o │ │ │ +0000ba40: 6e65 2074 6869 732d 6b69 6e64 206d 6163 ne this-kind mac │ │ │ +0000ba50: 726f 7020 666f 726d 206e 616d 6520 636f rop form name co │ │ │ +0000ba60: 6465 2062 7974 652d 636f 6d70 696c 652d de byte-compile- │ │ │ +0000ba70: 6d61 6372 6f2d 656e 7669 726f 6e6d 656e macro-environmen │ │ │ +0000ba80: 7420 6279 7465 2d63 6f6d 7069 6c65 2d66 t byte-compile-f │ │ │ +0000ba90: 756e 6374 696f 6e2d 656e 7669 726f 6e6d unction-environm │ │ │ +0000baa0: 656e 7420 6e69 6c20 7265 6465 6669 6e65 ent nil redefine │ │ │ +0000bab0: 2062 7974 652d 636f 6d70 696c 652d 6172 byte-compile-ar │ │ │ +0000bac0: 676c 6973 742d 7761 726e 206d 6573 7361 glist-warn messa │ │ │ +0000bad0: 6765 2022 436f 6d70 696c 696e 6720 2573 ge "Compiling %s │ │ │ +0000bae0: 2e2e 2e20 2825 7329 2220 6669 6c65 2d6e ... (%s)" file-n │ │ │ +0000baf0: 616d 652d 6e6f 6e64 6972 6563 746f 7279 ame-nondirectory │ │ │ +0000bb00: 2022 2220 6279 7465 2d63 6f6d 7069 6c65 "" byte-compile │ │ │ +0000bb10: 2d77 6172 6e20 2225 7320 6465 6669 6e65 -warn "%s define │ │ │ +0000bb20: 6420 6d75 6c74 6970 6c65 2074 696d 6573 d multiple times │ │ │ +0000bb30: 2c20 6173 2062 6f74 6820 6675 6e63 7469 , as both functi │ │ │ +0000bb40: 6f6e 2061 6e64 206d 6163 726f 2220 2225 on and macro" "% │ │ │ +0000bb50: 7320 2573 2064 6566 696e 6564 206d 756c s %s defined mul │ │ │ +0000bb60: 7469 706c 6520 7469 6d65 7320 696e 2074 tiple times in t │ │ │ +0000bb70: 6869 7320 6669 6c65 2220 226d 6163 726f his file" "macro │ │ │ +0000bb80: 2220 2266 756e 6374 696f 6e22 2066 626f " "function" fbo │ │ │ +0000bb90: 756e 6470 2073 7562 7270 206c 616d 6264 undp subrp lambd │ │ │ +0000bba0: 6120 6d61 6372 6f20 2225 7320 2573 2062 a macro "%s %s b │ │ │ +0000bbb0: 6569 6e67 2072 6564 6566 696e 6564 2061 eing redefined a │ │ │ +0000bbc0: 7320 6120 2573 2220 2273 7562 7222 2033 s a %s" "subr" 3 │ │ │ +0000bbd0: 2022 5072 6f62 6162 6c65 2060 5c22 2720 "Probable `\"' │ │ │ +0000bbe0: 7769 7468 6f75 7420 605c 5c27 2069 6e20 without `\\' in │ │ │ +0000bbf0: 646f 6320 7374 7269 6e67 206f 6620 2573 doc string of %s │ │ │ +0000bc00: 2220 6279 7465 2d63 6f6d 7069 6c65 2d6c " byte-compile-l │ │ │ +0000bc10: 616d 6264 6120 6279 7465 2d63 6f6d 7069 ambda byte-compi │ │ │ +0000bc20: 6c65 2d62 7974 652d 636f 6465 2d6d 616b le-byte-code-mak │ │ │ +0000bc30: 6572 2071 756f 7465 2062 7974 652d 636f er quote byte-co │ │ │ +0000bc40: 6d70 696c 652d 666c 7573 682d 7065 6e64 mpile-flush-pend │ │ │ +0000bc50: 696e 6720 6279 7465 2d63 6f6d 7069 6c65 ing byte-compile │ │ │ +0000bc60: 2d6f 7574 7075 742d 646f 6366 6f72 6d20 -output-docform │ │ │ +0000bc70: 225c 6e28 6465 6661 6c69 6173 2027 2220 "\n(defalias '" │ │ │ +0000bc80: 2822 2027 286d 6163 726f 202e 2023 5b22 (" '(macro . #[" │ │ │ +0000bc90: 202d 3120 225d 2922 2920 2822 2023 5b22 -1 "])") (" #[" │ │ │ +0000bca0: 202d 3120 225d 2229 2028 2220 2728 6d61 -1 "]") (" '(ma │ │ │ +0000bcb0: 6372 6f20 2220 2d31 2022 2922 2920 2822 cro " -1 ")") (" │ │ │ +0000bcc0: 2027 2822 202d 3120 2229 2229 2028 2220 '(" -1 ")") (" │ │ │ +0000bcd0: 2863 6f6e 7320 276d 6163 726f 2028 2220 (cons 'macro (" │ │ │ +0000bce0: 2d31 2022 2929 2229 2028 2220 2822 202d -1 "))") (" (" - │ │ │ +0000bcf0: 3120 2229 2229 2063 6f6d 7069 6c65 642d 1 ")") compiled- │ │ │ +0000bd00: 6675 6e63 7469 6f6e 2d70 2062 7974 652d function-p byte- │ │ │ +0000bd10: 636f 6d70 696c 652d 636f 6d70 696c 6564 compile-compiled │ │ │ +0000bd20: 2d6f 626a 2d74 6f2d 6c69 7374 2061 7070 -obj-to-list app │ │ │ +0000bd30: 656e 6420 3120 2822 2027 286d 6163 726f end 1 (" '(macro │ │ │ +0000bd40: 202e 2023 5b22 2034 2022 5d29 2229 2028 . #[" 4 "])") ( │ │ │ +0000bd50: 2220 235b 2220 3420 225d 2229 2028 2220 " #[" 4 "]") (" │ │ │ +0000bd60: 2728 6d61 6372 6f20 2220 3220 2229 2229 '(macro " 2 ")") │ │ │ +0000bd70: 2028 2220 2728 2220 3220 2229 2229 2028 (" '(" 2 ")") ( │ │ │ +0000bd80: 2220 2863 6f6e 7320 276d 6163 726f 2028 " (cons 'macro ( │ │ │ +0000bd90: 2220 3520 2229 2922 2920 2822 2028 2220 " 5 "))") (" (" │ │ │ +0000bda0: 3520 2229 2229 2063 6f6d 7069 6c65 642d 5 ")") compiled- │ │ │ +0000bdb0: 6675 6e63 7469 6f6e 2d61 7267 6c69 7374 function-arglist │ │ │ +0000bdc0: 2063 6f6d 7069 6c65 642d 6675 6e63 7469 compiled-functi │ │ │ +0000bdd0: 6f6e 2d69 6e73 7472 7563 7469 6f6e 7320 on-instructions │ │ │ +0000bde0: 636f 6d70 696c 6564 2d66 756e 6374 696f compiled-functio │ │ │ +0000bdf0: 6e2d 636f 6e73 7461 6e74 7320 636f 6d70 n-constants comp │ │ │ +0000be00: 696c 6564 2d66 756e 6374 696f 6e2d 7374 iled-function-st │ │ │ +0000be10: 6163 6b2d 6465 7074 6820 646f 6375 6d65 ack-depth docume │ │ │ +0000be20: 6e74 6174 696f 6e20 7420 636f 6d6d 616e ntation t comman │ │ │ +0000be30: 6470 2063 6f6d 7069 6c65 642d 6675 6e63 dp compiled-func │ │ │ +0000be40: 7469 6f6e 2d69 6e74 6572 6163 7469 7665 tion-interactive │ │ │ +0000be50: 2070 7269 6e63 2022 2922 2074 6869 732d princ ")" this- │ │ │ +0000be60: 6f6e 6520 6279 7465 2d63 6f6d 7069 6c65 one byte-compile │ │ │ +0000be70: 2d77 6172 6e69 6e67 7320 626f 6479 2074 -warnings body t │ │ │ +0000be80: 6861 742d 6f6e 6520 6279 7465 2d63 6f6d hat-one byte-com │ │ │ +0000be90: 7069 6c65 2d63 616c 6c2d 7472 6565 2074 pile-call-tree t │ │ │ +0000bea0: 6861 742d 6b69 6e64 2066 696c 656e 616d hat-kind filenam │ │ │ +0000beb0: 6520 6279 7465 2d63 6f6d 7069 6c65 2d69 e byte-compile-i │ │ │ +0000bec0: 6e69 7469 616c 2d6d 6163 726f 2d65 6e76 nitial-macro-env │ │ │ +0000bed0: 6972 6f6e 6d65 6e74 2062 7974 652d 636f ironment byte-co │ │ │ +0000bee0: 6d70 696c 652d 6479 6e61 6d69 6320 646f mpile-dynamic do │ │ │ +0000bef0: 6320 6279 7465 2d63 6f6d 7069 6c65 2d66 c byte-compile-f │ │ │ +0000bf00: 7265 652d 7265 6665 7265 6e63 6573 2062 ree-references b │ │ │ +0000bf10: 7974 652d 636f 6d70 696c 652d 6672 6565 yte-compile-free │ │ │ +0000bf20: 2d61 7373 6967 6e6d 656e 7473 2062 7974 -assignments byt │ │ │ +0000bf30: 652d 636f 6d70 696c 652d 6765 6e65 7261 e-compile-genera │ │ │ +0000bf40: 7465 2d63 616c 6c2d 7472 6565 2062 7974 te-call-tree byt │ │ │ +0000bf50: 652d 636f 6d70 696c 652d 6375 7272 656e e-compile-curren │ │ │ +0000bf60: 742d 666f 726d 2062 7974 652d 636f 6d70 t-form byte-comp │ │ │ +0000bf70: 696c 652d 7665 7262 6f73 6520 6279 7465 ile-verbose byte │ │ │ +0000bf80: 2d63 6f6d 7069 6c65 2d6f 7574 6275 6666 -compile-outbuff │ │ │ +0000bf90: 6572 5d20 3130 5d29 0a28 6465 6661 6c69 er] 10]).(defali │ │ │ +0000bfa0: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +0000bfb0: 2d6f 7574 7075 742d 6173 2d63 6f6d 6d65 -output-as-comme │ │ │ +0000bfc0: 6e74 2023 5b28 6578 7020 7175 6f74 6564 nt #[(exp quoted │ │ │ +0000bfd0: 2920 2260 1b70 5c6e 7188 c463 8808 ab87 ) "`.p\nq..c.... │ │ │ +0000bfe0: c509 5c6e 5c22 88aa 85c6 095c 6e5c 2288 ..\n\".....\n\". │ │ │ +0000bff0: 0b62 88c7 c8c9 ca23 ab88 cbcc ca89 2388 .b.....#......#. │ │ │ +0000c000: aa71 0b62 88c7 cdc9 ca23 ab88 cbce ca89 .q.b.....#...... │ │ │ +0000c010: 2388 aa71 0b62 88c7 cfc9 ca23 ab88 cbd0 #..q.b.....#.... │ │ │ +0000c020: ca89 2388 aa71 6462 88cf 6388 0b62 88d1 ..#..qdb..c..b.. │ │ │ +0000c030: d2d3 640b 5a5c 22b1 0288 6013 6462 8871 ..d.Z\"...`.db.q │ │ │ +0000c040: 880b 2987 2220 5b71 756f 7465 6420 6578 ..)." [quoted ex │ │ │ +0000c050: 7020 6279 7465 2d63 6f6d 7069 6c65 2d6f p byte-compile-o │ │ │ +0000c060: 7574 6275 6666 6572 2070 6f73 6974 696f utbuffer positio │ │ │ +0000c070: 6e20 2220 2220 7072 696e 3120 7072 696e n " " prin1 prin │ │ │ +0000c080: 6320 7365 6172 6368 2d66 6f72 7761 7264 c search-forward │ │ │ +0000c090: 2022 0122 206e 696c 2074 2072 6570 6c61 "." nil t repla │ │ │ +0000c0a0: 6365 2d6d 6174 6368 2022 0101 2220 2200 ce-match ".." ". │ │ │ +0000c0b0: 2220 2201 3022 2022 1f22 2022 015f 2220 " ".0" "." "._" │ │ │ +0000c0c0: 2223 4022 2066 6f72 6d61 7420 2225 6422 "#@" format "%d" │ │ │ +0000c0d0: 5d20 365d 290a 2870 7574 2027 646f 6d61 ] 6]).(put 'doma │ │ │ +0000c0e0: 696e 2027 6279 7465 2d68 756e 6b2d 6861 in 'byte-hunk-ha │ │ │ +0000c0f0: 6e64 6c65 7220 2762 7974 652d 636f 6d70 ndler 'byte-comp │ │ │ +0000c100: 696c 652d 6669 6c65 2d66 6f72 6d2d 646f ile-file-form-do │ │ │ +0000c110: 6d61 696e 290a 2864 6566 616c 6961 7320 main).(defalias │ │ │ +0000c120: 2762 7974 652d 636f 6d70 696c 652d 6669 'byte-compile-fi │ │ │ +0000c130: 6c65 2d66 6f72 6d2d 646f 6d61 696e 2023 le-form-domain # │ │ │ +0000c140: 5b28 666f 726d 2920 225c 6e41 41ab 85c3 [(form) "\nAA... │ │ │ +0000c150: c45c 6e5c 2288 5c6e 4140 8919 ab8b 093b .\n\".\nA@.....; │ │ │ +0000c160: ac87 c3c5 5c6e 5c22 88c6 1109 1029 c75c ....\n\".....).\ │ │ │ +0000c170: 6ec8 5c22 8722 205b 6279 7465 2d63 6f6d n.\"." [byte-com │ │ │ +0000c180: 7069 6c65 2d66 696c 652d 646f 6d61 696e pile-file-domain │ │ │ +0000c190: 2064 6f6d 6169 6e20 666f 726d 2062 7974 domain form byt │ │ │ +0000c1a0: 652d 636f 6d70 696c 652d 7761 726e 2022 e-compile-warn " │ │ │ +0000c1b0: 646f 6d61 696e 2075 7365 6420 7769 7468 domain used with │ │ │ +0000c1c0: 2074 6f6f 206d 616e 7920 6172 6775 6d65 too many argume │ │ │ +0000c1d0: 6e74 733a 2025 7322 2022 6172 6775 6d65 nts: %s" "argume │ │ │ +0000c1e0: 6e74 2074 6f20 6064 6f6d 6169 6e27 2064 nt to `domain' d │ │ │ +0000c1f0: 6563 6c61 7261 7469 6f6e 206d 7573 7420 eclaration must │ │ │ +0000c200: 6265 2061 206c 6974 6572 616c 2073 7472 be a literal str │ │ │ +0000c210: 696e 673a 2025 7322 206e 696c 2062 7974 ing: %s" nil byt │ │ │ +0000c220: 652d 636f 6d70 696c 652d 6b65 6570 2d70 e-compile-keep-p │ │ │ +0000c230: 656e 6469 6e67 2062 7974 652d 636f 6d70 ending byte-comp │ │ │ +0000c240: 696c 652d 6e6f 726d 616c 2d63 616c 6c5d ile-normal-call] │ │ │ +0000c250: 2034 5d29 0a28 6465 6661 6c69 6173 2027 4]).(defalias ' │ │ │ +0000c260: 6279 7465 2d63 6f6d 7069 6c65 2d64 6f6d byte-compile-dom │ │ │ +0000c270: 6169 6e20 235b 2866 6f72 6d29 2022 c4c5 ain #[(form) ".. │ │ │ +0000c280: c6c7 891a 1918 c80b 212b 5c22 88c9 cacb ........!+\".... │ │ │ +0000c290: cccd 0b44 4445 2187 2220 5b70 7269 6e74 ...DDE!." [print │ │ │ +0000c2a0: 2d65 7363 6170 652d 6e65 776c 696e 6573 -escape-newlines │ │ │ +0000c2b0: 2070 7269 6e74 2d6c 6576 656c 2070 7269 print-level pri │ │ │ +0000c2c0: 6e74 2d6c 656e 6774 6820 666f 726d 2062 nt-length form b │ │ │ +0000c2d0: 7974 652d 636f 6d70 696c 652d 7761 726e yte-compile-warn │ │ │ +0000c2e0: 2022 5468 6520 6064 6f6d 6169 6e27 2064 "The `domain' d │ │ │ +0000c2f0: 6563 6c61 7261 7469 6f6e 2069 7320 6c65 eclaration is le │ │ │ +0000c300: 6761 6c20 6f6e 6c79 2061 7420 746f 702d gal only at top- │ │ │ +0000c310: 6c65 7665 6c3a 2025 7322 2074 2034 2070 level: %s" t 4 p │ │ │ +0000c320: 7269 6e31 2d74 6f2d 7374 7269 6e67 2062 rin1-to-string b │ │ │ +0000c330: 7974 652d 636f 6d70 696c 652d 6e6f 726d yte-compile-norm │ │ │ +0000c340: 616c 2d63 616c 6c20 7369 676e 616c 2027 al-call signal ' │ │ │ +0000c350: 6572 726f 7220 7175 6f74 6520 2260 646f error quote "`do │ │ │ +0000c360: 6d61 696e 2720 7573 6564 2069 6e73 6964 main' used insid │ │ │ +0000c370: 6520 6120 6675 6e63 7469 6f6e 225d 2036 e a function"] 6 │ │ │ +0000c380: 5d29 0a28 7075 7420 2763 7573 746f 6d2d ]).(put 'custom- │ │ │ +0000c390: 6465 636c 6172 652d 7661 7269 6162 6c65 declare-variable │ │ │ +0000c3a0: 2027 6279 7465 2d68 756e 6b2d 6861 6e64 'byte-hunk-hand │ │ │ +0000c3b0: 6c65 7220 2762 7974 652d 636f 6d70 696c ler 'byte-compil │ │ │ +0000c3c0: 652d 6669 6c65 2d66 6f72 6d2d 6375 7374 e-file-form-cust │ │ │ +0000c3d0: 6f6d 2d64 6563 6c61 7265 2d76 6172 6961 om-declare-varia │ │ │ +0000c3e0: 626c 6529 0a28 6465 6661 6c69 6173 2027 ble).(defalias ' │ │ │ +0000c3f0: 6279 7465 2d63 6f6d 7069 6c65 2d66 696c byte-compile-fil │ │ │ +0000c400: 652d 666f 726d 2d63 7573 746f 6d2d 6465 e-form-custom-de │ │ │ +0000c410: 636c 6172 652d 7661 7269 6162 6c65 2023 clare-variable # │ │ │ +0000c420: 5b28 666f 726d 2920 22c4 0973 ab8a 0b41 [(form) "..s...A │ │ │ +0000c430: 4041 4008 425c 6e42 120b 8722 205b 6279 @A@.B\nB..." [by │ │ │ +0000c440: 7465 2d63 6f6d 7069 6c65 2d67 6c6f 6261 te-compile-globa │ │ │ +0000c450: 6c2d 6269 7420 6279 7465 2d63 6f6d 7069 l-bit byte-compi │ │ │ +0000c460: 6c65 2d77 6172 6e69 6e67 7320 6279 7465 le-warnings byte │ │ │ +0000c470: 2d63 6f6d 7069 6c65 2d62 6f75 6e64 2d76 -compile-bound-v │ │ │ +0000c480: 6172 6961 626c 6573 2066 6f72 6d20 6672 ariables form fr │ │ │ +0000c490: 6565 2d76 6172 735d 2032 5d29 0a23 4031 ee-vars] 2]).#@1 │ │ │ +0000c4a0: 3233 2049 6620 464f 524d 2069 7320 6120 23 If FORM is a │ │ │ +0000c4b0: 7379 6d62 6f6c 2c20 6279 7465 2d63 6f6d symbol, byte-com │ │ │ +0000c4c0: 7069 6c65 2069 7473 2066 756e 6374 696f pile its functio │ │ │ +0000c4d0: 6e20 6465 6669 6e69 7469 6f6e 2e0a 4966 n definition..If │ │ │ +0000c4e0: 2046 4f52 4d20 6973 2061 206c 616d 6264 FORM is a lambd │ │ │ +0000c4f0: 6120 6f72 2061 206d 6163 726f 2c20 6279 a or a macro, by │ │ │ +0000c500: 7465 2d63 6f6d 7069 6c65 2069 7420 6173 te-compile it as │ │ │ +0000c510: 2061 2066 756e 6374 696f 6e2e 1f0a 2864 a function...(d │ │ │ +0000c520: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ +0000c530: 6d70 696c 6520 235b 2866 6f72 6d29 2022 mpile #[(form) " │ │ │ +0000c540: c3c4 211a c55c 6e21 18c6 2088 c7c1 21ab ..!..\n!.. ...!. │ │ │ +0000c550: 8309 aa83 c55c 6e21 19c8 8ec9 cacb 5c22 .....\n!......\" │ │ │ +0000c560: 2c87 2220 5b62 7974 652d 636f 6d70 696c ,." [byte-compil │ │ │ +0000c570: 652d 706f 696e 742d 6d61 782d 7072 6576 e-point-max-prev │ │ │ +0000c580: 2062 7974 652d 636f 6d70 696c 652d 7761 byte-compile-wa │ │ │ +0000c590: 726e 696e 6773 2d62 6567 696e 6e69 6e67 rnings-beginning │ │ │ +0000c5a0: 2062 7974 652d 636f 6d70 696c 652d 6c6f byte-compile-lo │ │ │ +0000c5b0: 672d 6275 6666 6572 2067 6574 2d62 7566 g-buffer get-buf │ │ │ +0000c5c0: 6665 722d 6372 6561 7465 2022 2a43 6f6d fer-create "*Com │ │ │ +0000c5d0: 7069 6c65 2d4c 6f67 2a22 2070 6f69 6e74 pile-Log*" point │ │ │ +0000c5e0: 2d6d 6178 2062 7974 652d 636f 6d70 696c -max byte-compil │ │ │ +0000c5f0: 652d 6c6f 672d 6669 6c65 2062 6f75 6e64 e-log-file bound │ │ │ +0000c600: 7020 2828 6279 7465 2d63 6f64 6520 2272 p ((byte-code "r │ │ │ +0000c610: 0971 8808 6288 c6c7 7788 601c 0bab a1c8 .q..b...w.`..... │ │ │ +0000c620: c921 1d72 0d71 88c7 1611 ca20 8829 cb0d .!.r.q..... .).. │ │ │ +0000c630: 0c64 2388 5c6e 6457 ab84 0b0d 2188 29aa .d#.\ndW....!.). │ │ │ +0000c640: 975c 6e64 57ab 92cc cd20 ccce 7021 2188 .\ndW.... ..p!!. │ │ │ +0000c650: 0c62 88cf d021 8821 882a c787 2220 5b62 .b...!.!.*.." [b │ │ │ +0000c660: 7974 652d 636f 6d70 696c 652d 706f 696e yte-compile-poin │ │ │ +0000c670: 742d 6d61 782d 7072 6576 2062 7974 652d t-max-prev byte- │ │ │ +0000c680: 636f 6d70 696c 652d 6c6f 672d 6275 6666 compile-log-buff │ │ │ +0000c690: 6572 2062 7974 652d 636f 6d70 696c 652d er byte-compile- │ │ │ +0000c6a0: 7761 726e 696e 6773 2d62 6567 696e 6e69 warnings-beginni │ │ │ +0000c6b0: 6e67 2074 656d 702d 6275 6666 6572 2d73 ng temp-buffer-s │ │ │ +0000c6c0: 686f 772d 6675 6e63 7469 6f6e 2073 686f how-function sho │ │ │ +0000c6d0: 772d 6265 6769 6e20 7368 6f77 2d62 7566 w-begin show-buf │ │ │ +0000c6e0: 6665 7220 220c 5c6e 2220 6e69 6c20 6765 fer ".\n" nil ge │ │ │ +0000c6f0: 742d 6275 6666 6572 2d63 7265 6174 6520 t-buffer-create │ │ │ +0000c700: 222a 436f 6d70 696c 652d 4c6f 672d 5368 "*Compile-Log-Sh │ │ │ +0000c710: 6f77 2a22 2065 7261 7365 2d62 7566 6665 ow*" erase-buffe │ │ │ +0000c720: 7220 636f 7079 2d74 6f2d 6275 6666 6572 r copy-to-buffer │ │ │ +0000c730: 2073 656c 6563 742d 7769 6e64 6f77 2073 select-window s │ │ │ +0000c740: 656c 6563 7465 642d 7769 6e64 6f77 2064 elected-window d │ │ │ +0000c750: 6973 706c 6179 2d62 7566 6665 7220 7265 isplay-buffer re │ │ │ +0000c760: 6365 6e74 6572 2031 2062 7566 6665 722d center 1 buffer- │ │ │ +0000c770: 7265 6164 2d6f 6e6c 795d 2035 2929 2063 read-only] 5)) c │ │ │ +0000c780: 616c 6c2d 7769 7468 2d63 6f6e 6469 7469 all-with-conditi │ │ │ +0000c790: 6f6e 2d68 616e 646c 6572 2023 5b28 6572 on-handler #[(er │ │ │ +0000c7a0: 726f 722d 696e 666f 2920 22c1 0821 8722 ror-info) "..!." │ │ │ +0000c7b0: 205b 6572 726f 722d 696e 666f 2062 7974 [error-info byt │ │ │ +0000c7c0: 652d 636f 6d70 696c 652d 7265 706f 7274 e-compile-report │ │ │ +0000c7d0: 2d65 7272 6f72 5d20 325d 2023 5b6e 696c -error] 2] #[nil │ │ │ +0000c7e0: 2022 c60e 1221 c789 8989 8989 5c6e 0908 "...!......\n.. │ │ │ +0000c7f0: 0e10 0e11 0bc8 61ab 840e 13aa 810b c71e ......a......... │ │ │ +0000c800: 141b 1e11 1e10 1819 1a1e 151e 161e 171e ................ │ │ │ +0000c810: 181e 191e 1a1e 1b0c 39ab 89c9 0c21 ad85 ........9....!.. │ │ │ +0000c820: 0c4b aa81 0c89 1da2 ca61 891e 5c6e ab83 .K.......a..\n.. │ │ │ +0000c830: 0d41 150d a2cb 61ad 9a0e 5c6e ab87 cacc .A....a...\n.... │ │ │ +0000c840: 0d21 42aa 83cc 0d21 150c 39ab 86cd 0c0d .!B....!..9..... │ │ │ +0000c850: 5c22 aa81 0d2a ce0b 73ab 83cf 2088 2e0e \"...*..s... ... │ │ │ +0000c860: 8722 205b 6279 7465 2d63 6f6d 7069 6c65 ." [byte-compile │ │ │ +0000c870: 2d65 6d61 6373 3139 2d63 6f6d 7061 7469 -emacs19-compati │ │ │ +0000c880: 6269 6c69 7479 2062 7974 652d 6f70 7469 bility byte-opti │ │ │ +0000c890: 6d69 7a65 2062 7974 652d 636f 6d70 696c mize byte-compil │ │ │ +0000c8a0: 652d 7665 7262 6f73 6520 6279 7465 2d63 e-verbose byte-c │ │ │ +0000c8b0: 6f6d 7069 6c65 2d77 6172 6e69 6e67 7320 ompile-warnings │ │ │ +0000c8c0: 666f 726d 2066 756e 2063 6f70 792d 616c form fun copy-al │ │ │ +0000c8d0: 6973 7420 6e69 6c20 7420 6662 6f75 6e64 ist nil t fbound │ │ │ +0000c8e0: 7020 6d61 6372 6f20 6c61 6d62 6461 2062 p macro lambda b │ │ │ +0000c8f0: 7974 652d 636f 6d70 696c 652d 6c61 6d62 yte-compile-lamb │ │ │ +0000c900: 6461 2064 6566 616c 6961 7320 756e 7573 da defalias unus │ │ │ +0000c910: 6564 2d76 6172 7320 6279 7465 2d63 6f6d ed-vars byte-com │ │ │ +0000c920: 7069 6c65 2d77 6172 6e2d 6162 6f75 742d pile-warn-about- │ │ │ +0000c930: 756e 7573 6564 2d76 6172 6961 626c 6573 unused-variables │ │ │ +0000c940: 2062 7974 652d 636f 6d70 696c 652d 6479 byte-compile-dy │ │ │ +0000c950: 6e61 6d69 6320 6279 7465 2d63 6f6d 7069 namic byte-compi │ │ │ +0000c960: 6c65 2d64 796e 616d 6963 2d64 6f63 7374 le-dynamic-docst │ │ │ +0000c970: 7269 6e67 7320 6279 7465 2d63 6f6d 7069 rings byte-compi │ │ │ +0000c980: 6c65 2d69 6e69 7469 616c 2d6d 6163 726f le-initial-macro │ │ │ +0000c990: 2d65 6e76 6972 6f6e 6d65 6e74 2062 7974 -environment byt │ │ │ +0000c9a0: 652d 636f 6d70 696c 652d 6465 6661 756c e-compile-defaul │ │ │ +0000c9b0: 742d 7761 726e 696e 6773 2062 7974 652d t-warnings byte- │ │ │ +0000c9c0: 636f 6d70 696c 652d 6669 6c65 2d64 6f6d compile-file-dom │ │ │ +0000c9d0: 6169 6e20 6279 7465 2d63 6f6d 7069 6c65 ain byte-compile │ │ │ +0000c9e0: 2d66 7265 652d 6173 7369 676e 6d65 6e74 -free-assignment │ │ │ +0000c9f0: 7320 6279 7465 2d63 6f6d 7069 6c65 2d66 s byte-compile-f │ │ │ +0000ca00: 7265 652d 7265 6665 7265 6e63 6573 2062 ree-references b │ │ │ +0000ca10: 7974 652d 636f 6d70 696c 652d 626f 756e yte-compile-boun │ │ │ +0000ca20: 642d 7661 7269 6162 6c65 7320 6279 7465 d-variables byte │ │ │ +0000ca30: 2d63 6f6d 7069 6c65 2d75 6e72 6573 6f6c -compile-unresol │ │ │ +0000ca40: 7665 642d 6675 6e63 7469 6f6e 7320 6279 ved-functions by │ │ │ +0000ca50: 7465 2d63 6f6d 7069 6c65 2d61 7574 6f6c te-compile-autol │ │ │ +0000ca60: 6f61 642d 656e 7669 726f 6e6d 656e 7420 oad-environment │ │ │ +0000ca70: 6279 7465 2d63 6f6d 7069 6c65 2d66 756e byte-compile-fun │ │ │ +0000ca80: 6374 696f 6e2d 656e 7669 726f 6e6d 656e ction-environmen │ │ │ +0000ca90: 7420 6279 7465 2d63 6f6d 7069 6c65 2d6d t byte-compile-m │ │ │ +0000caa0: 6163 726f 2d65 6e76 6972 6f6e 6d65 6e74 acro-environment │ │ │ +0000cab0: 5d20 3135 5d5d 2033 2028 2324 202e 2035 ] 15]] 3 (#$ . 5 │ │ │ +0000cac0: 3033 3339 295d 290a 2340 3236 2043 6f6d 0339)]).#@26 Com │ │ │ +0000cad0: 7069 6c65 2061 6e64 2072 6574 7572 6e20 pile and return │ │ │ +0000cae0: 5345 5850 2e1f 0a28 6465 6661 6c69 6173 SEXP...(defalias │ │ │ +0000caf0: 2027 6279 7465 2d63 6f6d 7069 6c65 2d73 'byte-compile-s │ │ │ +0000cb00: 6578 7020 235b 2873 6578 7020 266f 7074 exp #[(sexp &opt │ │ │ +0000cb10: 696f 6e61 6c20 6d73 6729 2022 c3c4 211a ional msg) "..!. │ │ │ +0000cb20: c55c 6e21 18c6 2088 c7c1 21ab 8309 aa83 .\n!.. ...!..... │ │ │ +0000cb30: c55c 6e21 19c8 8ec9 cacb 5c22 2c87 2220 .\n!......\",." │ │ │ +0000cb40: 5b62 7974 652d 636f 6d70 696c 652d 706f [byte-compile-po │ │ │ +0000cb50: 696e 742d 6d61 782d 7072 6576 2062 7974 int-max-prev byt │ │ │ +0000cb60: 652d 636f 6d70 696c 652d 7761 726e 696e e-compile-warnin │ │ │ +0000cb70: 6773 2d62 6567 696e 6e69 6e67 2062 7974 gs-beginning byt │ │ │ +0000cb80: 652d 636f 6d70 696c 652d 6c6f 672d 6275 e-compile-log-bu │ │ │ +0000cb90: 6666 6572 2067 6574 2d62 7566 6665 722d ffer get-buffer- │ │ │ +0000cba0: 6372 6561 7465 2022 2a43 6f6d 7069 6c65 create "*Compile │ │ │ +0000cbb0: 2d4c 6f67 2a22 2070 6f69 6e74 2d6d 6178 -Log*" point-max │ │ │ +0000cbc0: 2062 7974 652d 636f 6d70 696c 652d 6c6f byte-compile-lo │ │ │ +0000cbd0: 672d 6669 6c65 2062 6f75 6e64 7020 2828 g-file boundp (( │ │ │ +0000cbe0: 6279 7465 2d63 6f64 6520 2272 0971 8808 byte-code "r.q.. │ │ │ +0000cbf0: 6288 c6c7 7788 601c 0bab a1c8 c921 1d72 b...w.`......!.r │ │ │ +0000cc00: 0d71 88c7 1611 ca20 8829 cb0d 0c64 2388 .q..... .)...d#. │ │ │ +0000cc10: 5c6e 6457 ab84 0b0d 2188 29aa 975c 6e64 \ndW....!.)..\nd │ │ │ +0000cc20: 57ab 92cc cd20 ccce 7021 2188 0c62 88cf W.... ..p!!..b.. │ │ │ +0000cc30: d021 8821 882a c787 2220 5b62 7974 652d .!.!.*.." [byte- │ │ │ +0000cc40: 636f 6d70 696c 652d 706f 696e 742d 6d61 compile-point-ma │ │ │ +0000cc50: 782d 7072 6576 2062 7974 652d 636f 6d70 x-prev byte-comp │ │ │ +0000cc60: 696c 652d 6c6f 672d 6275 6666 6572 2062 ile-log-buffer b │ │ │ +0000cc70: 7974 652d 636f 6d70 696c 652d 7761 726e yte-compile-warn │ │ │ +0000cc80: 696e 6773 2d62 6567 696e 6e69 6e67 2074 ings-beginning t │ │ │ +0000cc90: 656d 702d 6275 6666 6572 2d73 686f 772d emp-buffer-show- │ │ │ +0000cca0: 6675 6e63 7469 6f6e 2073 686f 772d 6265 function show-be │ │ │ +0000ccb0: 6769 6e20 7368 6f77 2d62 7566 6665 7220 gin show-buffer │ │ │ +0000ccc0: 220c 5c6e 2220 6e69 6c20 6765 742d 6275 ".\n" nil get-bu │ │ │ +0000ccd0: 6666 6572 2d63 7265 6174 6520 222a 436f ffer-create "*Co │ │ │ +0000cce0: 6d70 696c 652d 4c6f 672d 5368 6f77 2a22 mpile-Log-Show*" │ │ │ +0000ccf0: 2065 7261 7365 2d62 7566 6665 7220 636f erase-buffer co │ │ │ +0000cd00: 7079 2d74 6f2d 6275 6666 6572 2073 656c py-to-buffer sel │ │ │ +0000cd10: 6563 742d 7769 6e64 6f77 2073 656c 6563 ect-window selec │ │ │ +0000cd20: 7465 642d 7769 6e64 6f77 2064 6973 706c ted-window displ │ │ │ +0000cd30: 6179 2d62 7566 6665 7220 7265 6365 6e74 ay-buffer recent │ │ │ +0000cd40: 6572 2031 2062 7566 6665 722d 7265 6164 er 1 buffer-read │ │ │ +0000cd50: 2d6f 6e6c 795d 2035 2929 2063 616c 6c2d -only] 5)) call- │ │ │ +0000cd60: 7769 7468 2d63 6f6e 6469 7469 6f6e 2d68 with-condition-h │ │ │ +0000cd70: 616e 646c 6572 2023 5b28 6572 726f 722d andler #[(error- │ │ │ +0000cd80: 696e 666f 2920 22c1 0821 8722 205b 6572 info) "..!." [er │ │ │ +0000cd90: 726f 722d 696e 666f 2062 7974 652d 636f ror-info byte-co │ │ │ +0000cda0: 6d70 696c 652d 7265 706f 7274 2d65 7272 mpile-report-err │ │ │ +0000cdb0: 6f72 5d20 325d 2023 5b6e 696c 2022 c60e or] 2] #[nil ".. │ │ │ +0000cdc0: 0d21 c789 8989 8989 0c0b 5c6e 0908 0dc8 .!........\n.... │ │ │ +0000cdd0: 61ab 840e 0eaa 810d c71e 0f1d 1819 1a1b a............... │ │ │ +0000cde0: 1c1e 101e 111e 121e 131e 141e 151e 16c9 ................ │ │ │ +0000cdf0: 0e17 21ca 0e18 2188 cb0d 73ab 83cc 2088 ..!...!...s... . │ │ │ +0000ce00: 2e0e 8722 205b 6279 7465 2d63 6f6d 7069 ..." [byte-compi │ │ │ +0000ce10: 6c65 2d64 796e 616d 6963 2d64 6f63 7374 le-dynamic-docst │ │ │ +0000ce20: 7269 6e67 7320 6279 7465 2d63 6f6d 7069 rings byte-compi │ │ │ +0000ce30: 6c65 2d64 796e 616d 6963 2062 7974 652d le-dynamic byte- │ │ │ +0000ce40: 636f 6d70 696c 652d 656d 6163 7331 392d compile-emacs19- │ │ │ +0000ce50: 636f 6d70 6174 6962 696c 6974 7920 6279 compatibility by │ │ │ +0000ce60: 7465 2d6f 7074 696d 697a 6520 6279 7465 te-optimize byte │ │ │ +0000ce70: 2d63 6f6d 7069 6c65 2d76 6572 626f 7365 -compile-verbose │ │ │ +0000ce80: 2062 7974 652d 636f 6d70 696c 652d 7761 byte-compile-wa │ │ │ +0000ce90: 726e 696e 6773 2063 6f70 792d 616c 6973 rnings copy-alis │ │ │ +0000cea0: 7420 6e69 6c20 7420 6279 7465 2d63 6f6d t nil t byte-com │ │ │ +0000ceb0: 7069 6c65 2d74 6f70 2d6c 6576 656c 2062 pile-top-level b │ │ │ +0000cec0: 7974 652d 636f 6d70 696c 652d 7761 726e yte-compile-warn │ │ │ +0000ced0: 2d61 626f 7574 2d75 6e72 6573 6f6c 7665 -about-unresolve │ │ │ +0000cee0: 642d 6675 6e63 7469 6f6e 7320 756e 7573 d-functions unus │ │ │ +0000cef0: 6564 2d76 6172 7320 6279 7465 2d63 6f6d ed-vars byte-com │ │ │ +0000cf00: 7069 6c65 2d77 6172 6e2d 6162 6f75 742d pile-warn-about- │ │ │ +0000cf10: 756e 7573 6564 2d76 6172 6961 626c 6573 unused-variables │ │ │ +0000cf20: 2062 7974 652d 636f 6d70 696c 652d 696e byte-compile-in │ │ │ +0000cf30: 6974 6961 6c2d 6d61 6372 6f2d 656e 7669 itial-macro-envi │ │ │ +0000cf40: 726f 6e6d 656e 7420 6279 7465 2d63 6f6d ronment byte-com │ │ │ +0000cf50: 7069 6c65 2d64 6566 6175 6c74 2d77 6172 pile-default-war │ │ │ +0000cf60: 6e69 6e67 7320 6279 7465 2d63 6f6d 7069 nings byte-compi │ │ │ +0000cf70: 6c65 2d66 696c 652d 646f 6d61 696e 2062 le-file-domain b │ │ │ +0000cf80: 7974 652d 636f 6d70 696c 652d 6672 6565 yte-compile-free │ │ │ +0000cf90: 2d61 7373 6967 6e6d 656e 7473 2062 7974 -assignments byt │ │ │ +0000cfa0: 652d 636f 6d70 696c 652d 6672 6565 2d72 e-compile-free-r │ │ │ +0000cfb0: 6566 6572 656e 6365 7320 6279 7465 2d63 eferences byte-c │ │ │ +0000cfc0: 6f6d 7069 6c65 2d62 6f75 6e64 2d76 6172 ompile-bound-var │ │ │ +0000cfd0: 6961 626c 6573 2062 7974 652d 636f 6d70 iables byte-comp │ │ │ +0000cfe0: 696c 652d 756e 7265 736f 6c76 6564 2d66 ile-unresolved-f │ │ │ +0000cff0: 756e 6374 696f 6e73 2062 7974 652d 636f unctions byte-co │ │ │ +0000d000: 6d70 696c 652d 6175 746f 6c6f 6164 2d65 mpile-autoload-e │ │ │ +0000d010: 6e76 6972 6f6e 6d65 6e74 2062 7974 652d nvironment byte- │ │ │ +0000d020: 636f 6d70 696c 652d 6675 6e63 7469 6f6e compile-function │ │ │ +0000d030: 2d65 6e76 6972 6f6e 6d65 6e74 2062 7974 -environment byt │ │ │ +0000d040: 652d 636f 6d70 696c 652d 6d61 6372 6f2d e-compile-macro- │ │ │ +0000d050: 656e 7669 726f 6e6d 656e 7420 7365 7870 environment sexp │ │ │ +0000d060: 206d 7367 5d20 3134 5d5d 2033 2028 2324 msg] 14]] 3 (#$ │ │ │ +0000d070: 202e 2035 3139 3137 295d 290a 2864 6566 . 51917)]).(def │ │ │ +0000d080: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ +0000d090: 696c 652d 6279 7465 2d63 6f64 652d 6d61 ile-byte-code-ma │ │ │ +0000d0a0: 6b65 7220 235b 2866 756e 2920 225c 6e3a ker #[(fun) "\n: │ │ │ +0000d0b0: ac82 5c6e 87c3 18c4 5c6e 41a3 b789 10ab ..\n....\nA..... │ │ │ +0000d0c0: cc08 5c6e 7341 acc6 c15c 6e41 41b7 19c5 ..\nsA...\nAA... │ │ │ +0000d0d0: c65c 6e41 4044 0841 40c7 0838 c808 38af .\nA@D.A@..8..8. │ │ │ +0000d0e0: 05c7 5c6e 383b ab86 c75c 6e38 43aa 8509 ..\n8;...\n8C... │ │ │ +0000d0f0: ad82 c343 a409 ad96 0941 40ab 8609 4140 ...C.....A@...A@ │ │ │ +0000d100: 3bab 8509 4140 aa85 c609 4140 4443 a429 ;...A@....A@DC.) │ │ │ +0000d110: aa83 c65c 6e44 2987 2220 5b74 6d70 2069 ...\nD)." [tmp i │ │ │ +0000d120: 6e74 6572 6163 7469 7665 2066 756e 206e nteractive fun n │ │ │ +0000d130: 696c 2062 7974 652d 636f 6465 206d 616b il byte-code mak │ │ │ +0000d140: 652d 6279 7465 2d63 6f64 6520 7175 6f74 e-byte-code quot │ │ │ +0000d150: 6520 3220 335d 2036 5d29 0a28 6465 6661 e 2 3] 6]).(defa │ │ │ +0000d160: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +0000d170: 6c65 2d6c 616d 6264 6120 235b 2866 756e le-lambda #[(fun │ │ │ +0000d180: 2920 220e 2ca2 c661 ac88 c7c8 c90e 2c21 ) ".,..a......,! │ │ │ +0000d190: 5c22 880e 2c41 4018 cacb cc0e 2e73 ad89 \"..,A@......s.. │ │ │ +0000d1a0: cdce cdcf d008 215c 225c 225c 2289 1e30 ......!\"\"\"..0 │ │ │ +0000d1b0: d10e 2f42 a429 1e2f 0e2c 4141 891c 403b ../B.)./.,AA..@; │ │ │ +0000d1c0: ad89 0c40 0c41 ab83 0c41 141e 2bd2 0cb7 ...@.A...A..+... │ │ │ +0000d1d0: 1d08 d31a 891e 2dab c10e 2d40 8912 39ac ......-...-@..9. │ │ │ +0000d1e0: 87d4 d55c 6e5c 2288 aaaa d65c 6e21 ac85 ...\n\"....\n!.. │ │ │ +0000d1f0: 5c6e d773 ab87 d4d8 5c6e 5c22 88aa 99d9 \n.s....\n\".... │ │ │ +0000d200: dadb 5c6e 21dc 485c 22ab 8f5c 6ecf 61ac ..\n!.H\"..\n.a. │ │ │ +0000d210: 8a5c 6ece 61ac 85d4 dd5c 6e5c 2288 0e2d .\n.a....\n\"..- │ │ │ +0000d220: 4189 162d ac3f 2a0d abdd 0d0c 4061 ab83 A..-.?*.....@a.. │ │ │ +0000d230: 0c41 140d 413a abc4 0d41 41ab 87d4 dec9 .A..A:...AA..... │ │ │ +0000d240: 0d21 5c22 880d 4140 8919 a2df 61ac 8c09 .!\"..A@....a... │ │ │ +0000d250: a2e0 61ac 8609 a2e1 61ab 9109 413a ab86 ..a.....a...A:.. │ │ │ +0000d260: 0941 8911 aa76 0940 8911 aa5e 09a2 e261 .A...v.@...^...a │ │ │ +0000d270: ac88 d2e3 0d41 4021 4415 29aa 8b0d 41ab .....A@!D.)...A. │ │ │ +0000d280: 87d4 dec9 0d21 5c22 88e3 e40c 42d3 c623 .....!\"....B..# │ │ │ +0000d290: 1be5 0e2e 73ab 83e6 2088 0ba2 e761 ab9c ....s... ....a.. │ │ │ +0000d2a0: e8e9 ea08 430b 410e 2bac 830d ad83 0e2b ....C.A.+......+ │ │ │ +0000d2b0: 430d ad84 0d41 4043 245c 22aa b10d ad82 C....A@C$\"..... │ │ │ +0000d2c0: 0d43 0ba2 e461 ab84 0b41 aa85 0bad 820b .C...a...A...... │ │ │ +0000d2d0: 43a4 13c6 0844 0e2b ac85 0b40 3bab 8d0e C....D.+...@;... │ │ │ +0000d2e0: 2b0b ae85 0cad 82d3 4342 aa81 0ba4 2e06 +.......CB...... │ │ │ +0000d2f0: 8722 205b 6172 676c 6973 7420 666f 726d ." [arglist form │ │ │ +0000d300: 2061 7267 2063 6f6d 7069 6c65 6420 626f arg compiled bo │ │ │ +0000d310: 6479 2069 6e74 206c 616d 6264 6120 6572 dy int lambda er │ │ │ +0000d320: 726f 7220 226e 6f74 2061 206c 616d 6264 ror "not a lambd │ │ │ +0000d330: 6120 2d2d 2025 7322 2070 7269 6e31 2d74 a -- %s" prin1-t │ │ │ +0000d340: 6f2d 7374 7269 6e67 206d 6170 6361 7220 o-string mapcar │ │ │ +0000d350: 235b 2878 2920 2209 0842 8722 205b 6279 #[(x) "..B." [by │ │ │ +0000d360: 7465 2d63 6f6d 7069 6c65 2d61 7267 6c69 te-compile-argli │ │ │ +0000d370: 7374 2d62 6974 2078 5d20 325d 2066 7265 st-bit x] 2] fre │ │ │ +0000d380: 652d 7661 7273 2064 656c 7120 2672 6573 e-vars delq &res │ │ │ +0000d390: 7420 266f 7074 696f 6e61 6c20 636f 7079 t &optional copy │ │ │ +0000d3a0: 2d73 6571 7565 6e63 6520 6e65 772d 7363 -sequence new-sc │ │ │ +0000d3b0: 6f70 6520 696e 7465 7261 6374 6976 6520 ope interactive │ │ │ +0000d3c0: 6e69 6c20 6279 7465 2d63 6f6d 7069 6c65 nil byte-compile │ │ │ +0000d3d0: 2d77 6172 6e20 226e 6f6e 2d73 796d 626f -warn "non-symbo │ │ │ +0000d3e0: 6c20 696e 2061 7267 6c69 7374 3a20 2553 l in arglist: %S │ │ │ +0000d3f0: 2220 6b65 7977 6f72 6470 2028 6e69 6c20 " keywordp (nil │ │ │ +0000d400: 7429 2022 636f 6e73 7461 6e74 2073 796d t) "constant sym │ │ │ +0000d410: 626f 6c20 696e 2061 7267 6c69 7374 3a20 bol in arglist: │ │ │ +0000d420: 2573 2220 6368 6172 3d20 3f26 2073 796d %s" char= ?& sym │ │ │ +0000d430: 626f 6c2d 6e61 6d65 2030 2022 756e 7265 bol-name 0 "unre │ │ │ +0000d440: 636f 676e 697a 6564 2060 2627 206b 6579 cognized `&' key │ │ │ +0000d450: 776f 7264 2069 6e20 6172 676c 6973 743a word in arglist: │ │ │ +0000d460: 2025 7322 2022 6d61 6c66 6f72 6d65 6420 %s" "malformed │ │ │ +0000d470: 696e 7465 7261 6374 6976 6520 7370 6563 interactive spec │ │ │ +0000d480: 3a20 2573 2220 6c65 7420 6c65 742a 2073 : %s" let let* s │ │ │ +0000d490: 6176 652d 6578 6375 7273 696f 6e20 6c69 ave-excursion li │ │ │ +0000d4a0: 7374 2062 7974 652d 636f 6d70 696c 652d st byte-compile- │ │ │ +0000d4b0: 746f 702d 6c65 7665 6c20 7072 6f67 6e20 top-level progn │ │ │ +0000d4c0: 756e 7573 6564 2d76 6172 7320 6279 7465 unused-vars byte │ │ │ +0000d4d0: 2d63 6f6d 7069 6c65 2d77 6172 6e2d 6162 -compile-warn-ab │ │ │ +0000d4e0: 6f75 742d 756e 7573 6564 2d76 6172 6961 out-unused-varia │ │ │ +0000d4f0: 626c 6573 2062 7974 652d 636f 6465 2061 bles byte-code a │ │ │ +0000d500: 7070 6c79 206d 616b 652d 6279 7465 2d63 pply make-byte-c │ │ │ +0000d510: 6f64 6520 6170 7065 6e64 2064 6f63 2066 ode append doc f │ │ │ +0000d520: 756e 2023 313d 233a 2d2d 646f 6c69 7374 un #1=#:--dolist │ │ │ +0000d530: 2d74 656d 702d 2d33 3131 3837 2062 7974 -temp--31187 byt │ │ │ +0000d540: 652d 636f 6d70 696c 652d 7761 726e 696e e-compile-warnin │ │ │ +0000d550: 6773 2062 7974 652d 636f 6d70 696c 652d gs byte-compile- │ │ │ +0000d560: 626f 756e 642d 7661 7269 6162 6c65 7320 bound-variables │ │ │ +0000d570: 6e65 772d 6269 6e64 696e 6773 5d20 395d new-bindings] 9] │ │ │ +0000d580: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ +0000d590: 652d 636f 6d70 696c 652d 636f 6e73 7461 e-compile-consta │ │ │ +0000d5a0: 6e74 732d 7665 6374 6f72 2023 5b6e 696c nts-vector #[nil │ │ │ +0000d5b0: 2022 c61b 0e0e 9f1d 0e0f 9f1a c789 1c18 ".............. │ │ │ +0000d5c0: c819 c71e 0d0d ac83 5c6e abbb 0940 160d ........\n...@.. │ │ │ +0000d5d0: 0dab aa0b 0e0d 61ac a40d 4040 0cb7 8910 ......a...@@.... │ │ │ +0000d5e0: ab88 0d40 0841 a188 aa8d 0d40 0b54 8913 ...@.A.....@.T.. │ │ │ +0000d5f0: a188 0d40 0c42 140d 4189 15ac 5609 4111 ...@.B..A...V.A. │ │ │ +0000d600: 5c6e 0d12 8915 aa40 c9ca cbcc 0c5c 229f \n.....@.....\". │ │ │ +0000d610: 5c22 2e07 8722 205b 746d 7020 6c69 6d69 \"..." [tmp limi │ │ │ +0000d620: 7473 206f 7468 6572 2069 2072 6574 2072 ts other i ret r │ │ │ +0000d630: 6573 7420 2d31 206e 696c 2028 3520 3633 est -1 nil (5 63 │ │ │ +0000d640: 2032 3535 2036 3535 3335 2920 6170 706c 255 65535) appl │ │ │ +0000d650: 7920 7665 6374 6f72 206d 6170 6361 7220 y vector mapcar │ │ │ +0000d660: 6361 7220 6c69 6d69 7420 6279 7465 2d63 car limit byte-c │ │ │ +0000d670: 6f6d 7069 6c65 2d76 6172 6961 626c 6573 ompile-variables │ │ │ +0000d680: 2062 7974 652d 636f 6d70 696c 652d 636f byte-compile-co │ │ │ +0000d690: 6e73 7461 6e74 735d 2036 5d29 0a28 6465 nstants] 6]).(de │ │ │ +0000d6a0: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ +0000d6b0: 7069 6c65 2d74 6f70 2d6c 6576 656c 2023 pile-top-level # │ │ │ +0000d6c0: 5b28 666f 726d 2026 6f70 7469 6f6e 616c [(form &optional │ │ │ +0000d6d0: 2066 6f72 2d65 6666 6563 7420 6f75 7470 for-effect outp │ │ │ +0000d6e0: 7574 2d74 7970 6529 2022 c689 c789 89c6 ut-type) "...... │ │ │ +0000d6f0: 1a19 181e 131e 141e 150b c873 ab85 c90d ...........s.... │ │ │ +0000d700: 0c5c 2215 0da2 ca61 ab8c 0d41 41ac 870d .\"....a...AA... │ │ │ +0000d710: 4140 8915 aa6f 0da2 cb61 ab9c 0bcc 73ac A@...o...a....s. │ │ │ +0000d720: 970d 4140 3bab 91cd ce0d 3821 ab8a cfd0 ..A@;.....8!.... │ │ │ +0000d730: 0d38 21ab 830d aa8a d10d 0c5c 2288 d20c .8!........\"... │ │ │ +0000d740: 0e16 5c22 2e06 8722 205b 6279 7465 2d63 ..\"..." [byte-c │ │ │ +0000d750: 6f6d 7069 6c65 2d64 6570 7468 2062 7974 ompile-depth byt │ │ │ +0000d760: 652d 636f 6d70 696c 652d 6d61 7864 6570 e-compile-maxdep │ │ │ +0000d770: 7468 2062 7974 652d 636f 6d70 696c 652d th byte-compile- │ │ │ +0000d780: 6f75 7470 7574 2062 7974 652d 6f70 7469 output byte-opti │ │ │ +0000d790: 6d69 7a65 2066 6f72 2d65 6666 6563 7420 mize for-effect │ │ │ +0000d7a0: 666f 726d 206e 696c 2030 2028 7420 736f form nil 0 (t so │ │ │ +0000d7b0: 7572 6365 2920 6279 7465 2d6f 7074 696d urce) byte-optim │ │ │ +0000d7c0: 697a 652d 666f 726d 2070 726f 676e 2062 ize-form progn b │ │ │ +0000d7d0: 7974 652d 636f 6465 2028 7420 6279 7465 yte-code (t byte │ │ │ +0000d7e0: 2920 7665 6374 6f72 7020 3220 6e61 746e ) vectorp 2 natn │ │ │ +0000d7f0: 756d 7020 3320 6279 7465 2d63 6f6d 7069 ump 3 byte-compi │ │ │ +0000d800: 6c65 2d66 6f72 6d20 6279 7465 2d63 6f6d le-form byte-com │ │ │ +0000d810: 7069 6c65 2d6f 7574 2d74 6f70 6c65 7665 pile-out-topleve │ │ │ +0000d820: 6c20 6279 7465 2d63 6f6d 7069 6c65 2d74 l byte-compile-t │ │ │ +0000d830: 6167 2d6e 756d 6265 7220 6279 7465 2d63 ag-number byte-c │ │ │ +0000d840: 6f6d 7069 6c65 2d76 6172 6961 626c 6573 ompile-variables │ │ │ +0000d850: 2062 7974 652d 636f 6d70 696c 652d 636f byte-compile-co │ │ │ +0000d860: 6e73 7461 6e74 7320 6f75 7470 7574 2d74 nstants output-t │ │ │ +0000d870: 7970 655d 2037 5d29 0a28 6465 6661 6c69 ype] 7]).(defali │ │ │ +0000d880: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +0000d890: 2d6f 7574 2d74 6f70 6c65 7665 6c20 235b -out-toplevel #[ │ │ │ +0000d8a0: 2826 6f70 7469 6f6e 616c 2066 6f72 2d65 (&optional for-e │ │ │ +0000d8b0: 6666 6563 7420 6f75 7470 7574 2d74 7970 ffect output-typ │ │ │ +0000d8c0: 6529 2022 0e25 abb4 5c6e 4040 c661 ab85 e) ".%..\n@@.a.. │ │ │ +0000d8d0: 5c6e 4112 aaa8 c7c8 0e26 b73f ad9e c90e \nA......&.?.... │ │ │ +0000d8e0: 2621 891d ab92 0d40 4039 ac8c 0d40 40a7 &!.....@@9...@@. │ │ │ +0000d8f0: ac86 0d41 8915 ac6e 0d40 4029 2188 cacb ...A...n.@@)!... │ │ │ +0000d900: cc5c 2288 5c6e 9f12 0e28 cd73 ab86 ce5c .\".\n...(.s...\ │ │ │ +0000d910: 6e0e 255c 2212 c809 cf61 3fc8 891c 1d18 n.%\"....a?..... │ │ │ +0000d920: 1b09 cf61 8428 0109 d061 ab83 d1aa 81d2 ...a.(...a...... │ │ │ +0000d930: 5c6e 9b84 2801 d35c 6eb7 8428 01cb 5c6e \n..(..\n..(..\n │ │ │ +0000d940: b789 1583 2801 0dc9 5c6e 2173 419f 8913 ....(...\n!sA... │ │ │ +0000d950: 4040 d473 abb1 0b40 4140 150b 4040 d561 @@.s...@A@..@@.a │ │ │ +0000d960: ab9e 0d3a ac8e 0d39 ab96 d60d 21ac 910d ...:...9....!... │ │ │ +0000d970: d773 ac8c 08ab fcd8 0d44 0c42 8914 aaea .s.......D.B.... │ │ │ +0000d980: 0d0c 4289 14aa e308 abe9 d90b 9bac e40e ..B............. │ │ │ +0000d990: 29ab 870b 4040 da4e ae85 0b40 40db 4e89 )...@@.N...@@.N. │ │ │ +0000d9a0: 15ab d00b 41ab 9509 dc73 abc7 0b41 41ab ....A....s...AA. │ │ │ +0000d9b0: c20b 4140 40c6 61ab ba0b 4113 c810 0c9f ..A@@.a...A..... │ │ │ +0000d9c0: 140d dd61 ab90 0c40 a2d8 61ab 890c 4041 ...a...@..a...@A │ │ │ +0000d9d0: 400c 4142 aa83 0d0c 4243 1409 d061 ac8c @.AB....BC...a.. │ │ │ +0000d9e0: dec8 dfe0 0c40 415c 225c 223f ab87 0b41 .....@A\"\"?...A │ │ │ +0000d9f0: 8913 8282 000b ab90 e120 1e27 e2e3 5c6e ......... .'..\n │ │ │ +0000da00: 210e 270e 2a46 29aa 8c0c 41ab 86e4 0c9f !.'.*F)...A..... │ │ │ +0000da10: 42aa 820c 402c 8722 205b 6d61 7963 616c B...@,." [maycal │ │ │ +0000da20: 6c20 6f75 7470 7574 2d74 7970 6520 6279 l output-type by │ │ │ +0000da30: 7465 2d63 6f6d 7069 6c65 2d6f 7574 7075 te-compile-outpu │ │ │ +0000da40: 7420 7265 7374 2062 6f64 7920 746d 7020 t rest body tmp │ │ │ +0000da50: 6279 7465 2d64 6973 6361 7264 2062 7974 byte-discard byt │ │ │ +0000da60: 652d 636f 6d70 696c 652d 7075 7368 2d63 e-compile-push-c │ │ │ +0000da70: 6f6e 7374 616e 7420 6e69 6c20 7265 7665 onstant nil reve │ │ │ +0000da80: 7273 6520 6279 7465 2d63 6f6d 7069 6c65 rse byte-compile │ │ │ +0000da90: 2d6f 7574 2062 7974 652d 7265 7475 726e -out byte-return │ │ │ +0000daa0: 2030 2028 7420 6279 7465 2920 6279 7465 0 (t byte) byte │ │ │ +0000dab0: 2d6f 7074 696d 697a 652d 6c61 7063 6f64 -optimize-lapcod │ │ │ +0000dac0: 6520 6c61 6d62 6461 2066 696c 6520 3530 e lambda file 50 │ │ │ +0000dad0: 2038 2054 4147 2028 6279 7465 2d76 6172 8 TAG (byte-var │ │ │ +0000dae0: 7265 6620 6279 7465 2d63 6f6e 7374 616e ref byte-constan │ │ │ +0000daf0: 7429 2062 7974 652d 636f 6e73 7461 6e74 t) byte-constant │ │ │ +0000db00: 206b 6579 776f 7264 7020 286e 696c 2074 keywordp (nil t │ │ │ +0000db10: 2920 7175 6f74 6520 3320 6279 7465 2d6f ) quote 3 byte-o │ │ │ +0000db20: 7063 6f64 6531 392d 696e 7665 7274 2062 pcode19-invert b │ │ │ +0000db30: 7974 652d 6f70 636f 6465 2d69 6e76 6572 yte-opcode-inver │ │ │ +0000db40: 7420 2866 696c 6520 7072 6f67 6e20 7429 t (file progn t) │ │ │ +0000db50: 2066 756e 6361 6c6c 2064 656c 7120 6d61 funcall delq ma │ │ │ +0000db60: 7063 6172 2063 6f6e 7370 2062 7974 652d pcar consp byte- │ │ │ +0000db70: 636f 6d70 696c 652d 636f 6e73 7461 6e74 compile-constant │ │ │ +0000db80: 732d 7665 6374 6f72 2062 7974 652d 636f s-vector byte-co │ │ │ +0000db90: 6465 2062 7974 652d 636f 6d70 696c 652d de byte-compile- │ │ │ +0000dba0: 6c61 7063 6f64 6520 7072 6f67 6e20 666f lapcode progn fo │ │ │ +0000dbb0: 722d 6566 6665 6374 2062 7974 652d 636f r-effect byte-co │ │ │ +0000dbc0: 6d70 696c 652d 636f 6e73 7461 6e74 7320 mpile-constants │ │ │ +0000dbd0: 6279 7465 2d63 6f6d 7069 6c65 2d76 6563 byte-compile-vec │ │ │ +0000dbe0: 746f 7220 6279 7465 2d6f 7074 696d 697a tor byte-optimiz │ │ │ +0000dbf0: 6520 6279 7465 2d63 6f6d 7069 6c65 2d65 e byte-compile-e │ │ │ +0000dc00: 6d61 6373 3139 2d63 6f6d 7061 7469 6269 macs19-compatibi │ │ │ +0000dc10: 6c69 7479 2062 7974 652d 636f 6d70 696c lity byte-compil │ │ │ +0000dc20: 652d 6d61 7864 6570 7468 5d20 365d 290a e-maxdepth] 6]). │ │ │ +0000dc30: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +0000dc40: 636f 6d70 696c 652d 746f 702d 6c65 7665 compile-top-leve │ │ │ +0000dc50: 6c2d 626f 6479 2023 5b28 626f 6479 2026 l-body #[(body & │ │ │ +0000dc60: 6f70 7469 6f6e 616c 2066 6f72 2d65 6666 optional for-eff │ │ │ +0000dc70: 6563 7429 2022 c2c3 0942 08c4 2389 11a2 ect) "...B..#... │ │ │ +0000dc80: c361 ab83 0941 8709 ad82 0943 8722 205b .a...A.....C." [ │ │ │ +0000dc90: 666f 722d 6566 6665 6374 2062 6f64 7920 for-effect body │ │ │ +0000dca0: 6279 7465 2d63 6f6d 7069 6c65 2d74 6f70 byte-compile-top │ │ │ +0000dcb0: 2d6c 6576 656c 2070 726f 676e 2074 5d20 -level progn t] │ │ │ +0000dcc0: 355d 290a 2864 6566 616c 6961 7320 2762 5]).(defalias 'b │ │ │ +0000dcd0: 7974 652d 636f 6d70 696c 652d 666f 726d yte-compile-form │ │ │ +0000dce0: 2023 5b28 666f 726d 2026 6f70 7469 6f6e #[(form &option │ │ │ +0000dcf0: 616c 2066 6f72 2d65 6666 6563 7429 2022 al for-effect) " │ │ │ +0000dd00: c60d 095c 2289 153a aca5 0d39 ab8a c70d ...\"..:...9.... │ │ │ +0000dd10: 21ac 850d c873 ab86 c90d 2188 aaef 0cab !....s....!..... │ │ │ +0000dd20: 8708 ab84 ca14 aae5 cbcc 0d5c 2288 aade ...........\"... │ │ │ +0000dd30: 0d40 39ab b60d 4089 1bcd 4e1a 0bce 73ab .@9...@...N...s. │ │ │ +0000dd40: 85cf d00b 5c22 885c 6eab 910e 1bab 870b ....\".\n....... │ │ │ +0000dd50: d14e d24e ac86 5c6e 0d21 88aa 8ed3 0e1c .N.N..\n.!...... │ │ │ +0000dd60: 73ab 84d4 0d21 88d5 0d21 882a aaa3 d60d s....!...!.*.... │ │ │ +0000dd70: 4021 ac87 0d40 a2d7 61ab 920d d80d 2189 @!...@..a.....!. │ │ │ +0000dd80: 1561 ac89 d90d 0c5c 2288 ca14 aa84 d50d .a.....\"....... │ │ │ +0000dd90: 2188 0cad 82da 2087 2220 5b62 7974 652d !..... ." [byte- │ │ │ +0000dda0: 636f 6d70 696c 652d 6465 6c65 7465 2d65 compile-delete-e │ │ │ +0000ddb0: 7272 6f72 7320 6279 7465 2d63 6f6d 7069 rrors byte-compi │ │ │ +0000ddc0: 6c65 2d6d 6163 726f 2d65 6e76 6972 6f6e le-macro-environ │ │ │ +0000ddd0: 6d65 6e74 2068 616e 646c 6572 2066 6e20 ment handler fn │ │ │ +0000dde0: 666f 722d 6566 6665 6374 2066 6f72 6d20 for-effect form │ │ │ +0000ddf0: 6d61 6372 6f65 7870 616e 6420 6b65 7977 macroexpand keyw │ │ │ +0000de00: 6f72 6470 2028 6e69 6c20 7429 2062 7974 ordp (nil t) byt │ │ │ +0000de10: 652d 636f 6d70 696c 652d 636f 6e73 7461 e-compile-consta │ │ │ +0000de20: 6e74 206e 696c 2062 7974 652d 636f 6d70 nt nil byte-comp │ │ │ +0000de30: 696c 652d 7661 7269 6162 6c65 2d72 6566 ile-variable-ref │ │ │ +0000de40: 2062 7974 652d 7661 7272 6566 2062 7974 byte-varref byt │ │ │ +0000de50: 652d 636f 6d70 696c 6520 2874 206e 696c e-compile (t nil │ │ │ +0000de60: 2920 6279 7465 2d63 6f6d 7069 6c65 2d77 ) byte-compile-w │ │ │ +0000de70: 6172 6e20 2225 7320 6361 6c6c 6564 2061 arn "%s called a │ │ │ +0000de80: 7320 6120 6675 6e63 7469 6f6e 2220 6279 s a function" by │ │ │ +0000de90: 7465 2d6f 7063 6f64 6520 656d 6163 7332 te-opcode emacs2 │ │ │ +0000dea0: 302d 6f70 636f 6465 2063 616c 6c61 7267 0-opcode callarg │ │ │ +0000deb0: 7320 6279 7465 2d63 6f6d 7069 6c65 2d63 s byte-compile-c │ │ │ +0000dec0: 616c 6c61 7267 732d 7761 726e 2062 7974 allargs-warn byt │ │ │ +0000ded0: 652d 636f 6d70 696c 652d 6e6f 726d 616c e-compile-normal │ │ │ +0000dee0: 2d63 616c 6c20 636f 6d70 696c 6564 2d66 -call compiled-f │ │ │ +0000def0: 756e 6374 696f 6e2d 7020 6c61 6d62 6461 unction-p lambda │ │ │ +0000df00: 2062 7974 652d 636f 6d70 696c 652d 756e byte-compile-un │ │ │ +0000df10: 666f 6c64 2d6c 616d 6264 6120 6279 7465 fold-lambda byte │ │ │ +0000df20: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6279 -compile-form by │ │ │ +0000df30: 7465 2d63 6f6d 7069 6c65 2d64 6973 6361 te-compile-disca │ │ │ +0000df40: 7264 2062 7974 652d 636f 6d70 696c 652d rd byte-compile- │ │ │ +0000df50: 656d 6163 7331 392d 636f 6d70 6174 6962 emacs19-compatib │ │ │ +0000df60: 696c 6974 7920 6279 7465 2d63 6f6d 7069 ility byte-compi │ │ │ +0000df70: 6c65 2d77 6172 6e69 6e67 735d 2034 5d29 le-warnings] 4]) │ │ │ +0000df80: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +0000df90: 2d63 6f6d 7069 6c65 2d6e 6f72 6d61 6c2d -compile-normal- │ │ │ +0000dfa0: 6361 6c6c 2023 5b28 666f 726d 2920 2208 call #[(form) ". │ │ │ +0000dfb0: ab84 c209 2188 c309 4021 88c4 c509 415c ....!...@!....A\ │ │ │ +0000dfc0: 2288 c6c7 0941 475c 2287 2220 5b62 7974 "....AG\"." [byt │ │ │ +0000dfd0: 652d 636f 6d70 696c 652d 6765 6e65 7261 e-compile-genera │ │ │ +0000dfe0: 7465 2d63 616c 6c2d 7472 6565 2066 6f72 te-call-tree for │ │ │ +0000dff0: 6d20 6279 7465 2d63 6f6d 7069 6c65 2d61 m byte-compile-a │ │ │ +0000e000: 6e6e 6f74 6174 652d 6361 6c6c 2d74 7265 nnotate-call-tre │ │ │ +0000e010: 6520 6279 7465 2d63 6f6d 7069 6c65 2d70 e byte-compile-p │ │ │ +0000e020: 7573 682d 636f 6e73 7461 6e74 206d 6170 ush-constant map │ │ │ +0000e030: 6361 7220 6279 7465 2d63 6f6d 7069 6c65 car byte-compile │ │ │ +0000e040: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ +0000e050: 6c65 2d6f 7574 2062 7974 652d 6361 6c6c le-out byte-call │ │ │ +0000e060: 5d20 335d 290a 2862 7974 652d 636f 6465 ] 3]).(byte-code │ │ │ +0000e070: 2022 c0c1 21ac 84c1 c24d 88c0 8722 205b "..!....M..." [ │ │ │ +0000e080: 6662 6f75 6e64 7020 676c 6f62 616c 6c79 fboundp globally │ │ │ +0000e090: 2d62 6f75 6e64 7020 626f 756e 6470 5d20 -boundp boundp] │ │ │ +0000e0a0: 3229 0a28 6465 6661 6c69 6173 2027 6279 2).(defalias 'by │ │ │ +0000e0b0: 7465 2d63 6f6d 7069 6c65 2d76 6172 6961 te-compile-varia │ │ │ +0000e0c0: 626c 652d 7265 6620 235b 2862 6173 652d ble-ref #[(base- │ │ │ +0000e0d0: 6f70 2076 6172 2026 6f70 7469 6f6e 616c op var &optional │ │ │ +0000e0e0: 2076 6172 6269 6e64 2d66 6c61 6773 2920 varbind-flags) │ │ │ +0000e0f0: 220d 39ab 8ac6 0d21 ac85 0dc7 73ab a5c8 ".9....!....s... │ │ │ +0000e100: 0bc9 61ab 83ca aa8e 0bcb 61ab 83cc aa86 ..a.......a..... │ │ │ +0000e110: 0bcd 61ad 81ce 0d39 ab83 cfaa 81d0 0d23 ..a....9.......# │ │ │ +0000e120: 8882 db00 0dd1 4eab 9ad2 5c6e 73ab 950d ......N...\ns... │ │ │ +0000e130: d14e 1cc8 d30d 0c3b ab83 0caa 84d4 d50c .N.....;........ │ │ │ +0000e140: 5c22 2388 290d d64e ab9a d75c 6e73 ab95 \"#.)..N...\ns.. │ │ │ +0000e150: 0dd6 4e1c c8d8 0d0c 3bab 830c aa84 d4d5 ..N.....;....... │ │ │ +0000e160: 0c5c 2223 8829 d95c 6e73 abe5 0bcd 61ab .\"#.).\ns....a. │ │ │ +0000e170: 8c0d 0e26 ae81 da42 0942 11aa d4db 0d21 ...&...B.B.....! │ │ │ +0000e180: accf 0d09 b789 18ad 9108 dc08 410b cb61 ............A..a │ │ │ +0000e190: ab84 0e27 aa82 0e28 5c22 a129 acb4 ddde ...'...(\".).... │ │ │ +0000e1a0: 21ab 860d 0e1e 73ac a90b cb61 ab93 0d0e !.....s....a.... │ │ │ +0000e1b0: 5c22 73ac 9ec8 df0d 5c22 880d 0e5c 2242 \"s.....\"...\"B │ │ │ +0000e1c0: 165c 22aa 910d 0e23 73ac 8bc8 e00d 5c22 .\"....#s.....\" │ │ │ +0000e1d0: 880d 0e23 4216 230d 0e24 b789 1e25 ac8a ...#B.#..$...%.. │ │ │ +0000e1e0: 0d43 8916 250e 2442 1624 e10b 0e25 5c22 .C..%.$B.$...%\" │ │ │ +0000e1f0: 2987 2220 5b63 656c 6c20 6279 7465 2d63 )." [cell byte-c │ │ │ +0000e200: 6f6d 7069 6c65 2d62 6f75 6e64 2d76 6172 ompile-bound-var │ │ │ +0000e210: 6961 626c 6573 2062 7974 652d 636f 6d70 iables byte-comp │ │ │ +0000e220: 696c 652d 7761 726e 696e 6773 2062 6173 ile-warnings bas │ │ │ +0000e230: 652d 6f70 206f 6220 7661 7220 6b65 7977 e-op ob var keyw │ │ │ +0000e240: 6f72 6470 2028 6e69 6c20 7429 2062 7974 ordp (nil t) byt │ │ │ +0000e250: 652d 636f 6d70 696c 652d 7761 726e 2062 e-compile-warn b │ │ │ +0000e260: 7974 652d 7661 7272 6566 2022 5661 7269 yte-varref "Vari │ │ │ +0000e270: 6162 6c65 2072 6566 6572 656e 6365 2074 able reference t │ │ │ +0000e280: 6f20 2573 2025 7322 2062 7974 652d 7661 o %s %s" byte-va │ │ │ +0000e290: 7273 6574 2022 4174 7465 6d70 7420 746f rset "Attempt to │ │ │ +0000e2a0: 2073 6574 2025 7320 2573 2220 6279 7465 set %s %s" byte │ │ │ +0000e2b0: 2d76 6172 6269 6e64 2022 4174 7465 6d70 -varbind "Attemp │ │ │ +0000e2c0: 7420 746f 206c 6574 2d62 696e 6420 2573 t to let-bind %s │ │ │ +0000e2d0: 2025 7322 2022 636f 6e73 7461 6e74 2073 %s" "constant s │ │ │ +0000e2e0: 796d 626f 6c22 2022 6e6f 6e2d 7379 6d62 ymbol" "non-symb │ │ │ +0000e2f0: 6f6c 2220 6279 7465 2d6f 6273 6f6c 6574 ol" byte-obsolet │ │ │ +0000e300: 652d 7661 7269 6162 6c65 206f 6273 6f6c e-variable obsol │ │ │ +0000e310: 6574 6520 2225 7320 6973 2061 6e20 6f62 ete "%s is an ob │ │ │ +0000e320: 736f 6c65 7465 2076 6172 6961 626c 653b solete variable; │ │ │ +0000e330: 2025 7322 2066 6f72 6d61 7420 2275 7365 %s" format "use │ │ │ +0000e340: 2025 7320 696e 7374 6561 642e 2220 6279 %s instead." by │ │ │ +0000e350: 7465 2d63 6f6d 7061 7469 626c 652d 7661 te-compatible-va │ │ │ +0000e360: 7269 6162 6c65 2070 6564 616e 7469 6320 riable pedantic │ │ │ +0000e370: 2225 7320 6973 2070 726f 7669 6465 6420 "%s is provided │ │ │ +0000e380: 666f 7220 636f 6d70 6174 6962 696c 6974 for compatibilit │ │ │ +0000e390: 793b 2025 7322 2066 7265 652d 7661 7273 y; %s" free-vars │ │ │ +0000e3a0: 2030 2067 6c6f 6261 6c6c 792d 626f 756e 0 globally-boun │ │ │ +0000e3b0: 6470 206c 6f67 696f 7220 626f 756e 6470 dp logior boundp │ │ │ +0000e3c0: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ +0000e3d0: 7374 2022 6173 7369 676e 6d65 6e74 2074 st "assignment t │ │ │ +0000e3e0: 6f20 6672 6565 2076 6172 6961 626c 6520 o free variable │ │ │ +0000e3f0: 2573 2220 2272 6566 6572 656e 6365 2074 %s" "reference t │ │ │ +0000e400: 6f20 6672 6565 2076 6172 6961 626c 6520 o free variable │ │ │ +0000e410: 2573 2220 6279 7465 2d63 6f6d 7069 6c65 %s" byte-compile │ │ │ +0000e420: 2d6f 7574 2062 7974 652d 636f 6d70 696c -out byte-compil │ │ │ +0000e430: 652d 6672 6565 2d61 7373 6967 6e6d 656e e-free-assignmen │ │ │ +0000e440: 7473 2062 7974 652d 636f 6d70 696c 652d ts byte-compile- │ │ │ +0000e450: 6672 6565 2d72 6566 6572 656e 6365 7320 free-references │ │ │ +0000e460: 6279 7465 2d63 6f6d 7069 6c65 2d76 6172 byte-compile-var │ │ │ +0000e470: 6961 626c 6573 2074 6d70 2076 6172 6269 iables tmp varbi │ │ │ +0000e480: 6e64 2d66 6c61 6773 2062 7974 652d 636f nd-flags byte-co │ │ │ +0000e490: 6d70 696c 652d 6173 7369 676e 6564 2d62 mpile-assigned-b │ │ │ +0000e4a0: 6974 2062 7974 652d 636f 6d70 696c 652d it byte-compile- │ │ │ +0000e4b0: 7265 6665 7265 6e63 6564 2d62 6974 5d20 referenced-bit] │ │ │ +0000e4c0: 375d 290a 2864 6566 616c 6961 7320 2762 7]).(defalias 'b │ │ │ +0000e4d0: 7974 652d 636f 6d70 696c 652d 6765 742d yte-compile-get- │ │ │ +0000e4e0: 636f 6e73 7461 6e74 2027 286d 6163 726f constant '(macro │ │ │ +0000e4f0: 202e 2023 5b28 636f 6e73 7429 2022 c1c2 . #[(const) ".. │ │ │ +0000e500: c308 44c4 08c5 4242 c608 c742 4246 c8c9 ..D...BB...BBF.. │ │ │ +0000e510: cacb cc08 44cd 4242 4544 4587 2220 5b63 ....D.BBEDE." [c │ │ │ +0000e520: 6f6e 7374 206f 7220 6966 2073 7472 696e onst or if strin │ │ │ +0000e530: 6770 2061 7373 6f63 2028 6279 7465 2d63 gp assoc (byte-c │ │ │ +0000e540: 6f6d 7069 6c65 2d63 6f6e 7374 616e 7473 ompile-constants │ │ │ +0000e550: 2920 6173 7371 2028 6279 7465 2d63 6f6d ) assq (byte-com │ │ │ +0000e560: 7069 6c65 2d63 6f6e 7374 616e 7473 2920 pile-constants) │ │ │ +0000e570: 6361 7220 7365 7471 2062 7974 652d 636f car setq byte-co │ │ │ +0000e580: 6d70 696c 652d 636f 6e73 7461 6e74 7320 mpile-constants │ │ │ +0000e590: 636f 6e73 206c 6973 7420 2862 7974 652d cons list (byte- │ │ │ +0000e5a0: 636f 6d70 696c 652d 636f 6e73 7461 6e74 compile-constant │ │ │ +0000e5b0: 7329 5d20 385d 2929 0a28 6465 6661 6c69 s)] 8])).(defali │ │ │ +0000e5c0: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +0000e5d0: 2d63 6f6e 7374 616e 7420 235b 2863 6f6e -constant #[(con │ │ │ +0000e5e0: 7374 2920 2208 ab84 c389 1087 c4c5 5c6e st) ".........\n │ │ │ +0000e5f0: 3bab 86c6 5c6e 095c 22aa 835c 6e09 b7ae ;...\n.\"..\n... │ │ │ +0000e600: 875c 6e43 0942 8911 405c 2287 2220 5b66 .\nC.B..@\"." [f │ │ │ +0000e610: 6f72 2d65 6666 6563 7420 6279 7465 2d63 or-effect byte-c │ │ │ +0000e620: 6f6d 7069 6c65 2d63 6f6e 7374 616e 7473 ompile-constants │ │ │ +0000e630: 2063 6f6e 7374 206e 696c 2062 7974 652d const nil byte- │ │ │ +0000e640: 636f 6d70 696c 652d 6f75 7420 6279 7465 compile-out byte │ │ │ +0000e650: 2d63 6f6e 7374 616e 7420 6173 736f 635d -constant assoc] │ │ │ +0000e660: 2035 5d29 0a28 6465 6661 6c69 6173 2027 5]).(defalias ' │ │ │ +0000e670: 6279 7465 2d63 6f6d 7069 6c65 2d70 7573 byte-compile-pus │ │ │ +0000e680: 682d 636f 6e73 7461 6e74 2023 5b28 636f h-constant #[(co │ │ │ +0000e690: 6e73 7429 2022 c318 5c6e 1a08 ab85 c389 nst) "..\n...... │ │ │ +0000e6a0: 10aa 99c4 c55c 6e3b ab86 c65c 6e09 5c22 .....\n;...\n.\" │ │ │ +0000e6b0: aa83 5c6e 09b7 ae87 5c6e 4309 4289 1140 ..\n....\nC.B..@ │ │ │ +0000e6c0: 5c22 2a87 2220 5b66 6f72 2d65 6666 6563 \"*." [for-effec │ │ │ +0000e6d0: 7420 6279 7465 2d63 6f6d 7069 6c65 2d63 t byte-compile-c │ │ │ +0000e6e0: 6f6e 7374 616e 7473 2063 6f6e 7374 206e onstants const n │ │ │ +0000e6f0: 696c 2062 7974 652d 636f 6d70 696c 652d il byte-compile- │ │ │ +0000e700: 6f75 7420 6279 7465 2d63 6f6e 7374 616e out byte-constan │ │ │ +0000e710: 7420 6173 736f 635d 2035 5d29 0a28 6465 t assoc] 5]).(de │ │ │ +0000e720: 6661 6c69 6173 2027 6279 7465 2d64 6566 falias 'byte-def │ │ │ +0000e730: 6f70 2d63 6f6d 7069 6c65 7220 2728 6d61 op-compiler '(ma │ │ │ +0000e740: 6372 6f20 2e20 235b 2866 756e 6374 696f cro . #[(functio │ │ │ +0000e750: 6e20 266f 7074 696f 6e61 6c20 636f 6d70 n &optional comp │ │ │ +0000e760: 696c 652d 6861 6e64 6c65 7229 2022 c41a ile-handler) ".. │ │ │ +0000e770: 0b39 ab8a c5c6 c70b 2150 2112 aa87 0b41 .9......!P!....A │ │ │ +0000e780: 4012 0b40 13c8 c90b 44ca c908 cbb7 41ae @..@....D.....A. │ │ │ +0000e790: 8a08 ae87 c5cc c70b 2150 2144 4619 5c6e ........!P!DF.\n │ │ │ +0000e7a0: ab97 cd09 c8c9 0b44 cec9 5c6e 4446 c8c9 .......D..\nDF.. │ │ │ +0000e7b0: 5c6e 44cf c90b 4446 46aa 8109 2a87 2220 \nD...DFF...*." │ │ │ +0000e7c0: 5b63 6f6d 7069 6c65 2d68 616e 646c 6572 [compile-handler │ │ │ +0000e7d0: 2066 6e66 6f72 6d20 6f70 636f 6465 2066 fnform opcode f │ │ │ +0000e7e0: 756e 6374 696f 6e20 6e69 6c20 696e 7465 unction nil inte │ │ │ +0000e7f0: 726e 2022 6279 7465 2d22 2073 796d 626f rn "byte-" symbo │ │ │ +0000e800: 6c2d 6e61 6d65 2070 7574 2071 756f 7465 l-name put quote │ │ │ +0000e810: 2027 6279 7465 2d63 6f6d 7069 6c65 2028 'byte-compile ( │ │ │ +0000e820: 2830 202e 2062 7974 652d 636f 6d70 696c (0 . byte-compil │ │ │ +0000e830: 652d 6e6f 2d61 7267 7329 2028 3120 2e20 e-no-args) (1 . │ │ │ +0000e840: 6279 7465 2d63 6f6d 7069 6c65 2d6f 6e65 byte-compile-one │ │ │ +0000e850: 2d61 7267 2920 2832 202e 2062 7974 652d -arg) (2 . byte- │ │ │ +0000e860: 636f 6d70 696c 652d 7477 6f2d 6172 6773 compile-two-args │ │ │ +0000e870: 2920 2833 202e 2062 7974 652d 636f 6d70 ) (3 . byte-comp │ │ │ +0000e880: 696c 652d 7468 7265 652d 6172 6773 2920 ile-three-args) │ │ │ +0000e890: 2830 2d31 202e 2062 7974 652d 636f 6d70 (0-1 . byte-comp │ │ │ +0000e8a0: 696c 652d 7a65 726f 2d6f 722d 6f6e 652d ile-zero-or-one- │ │ │ +0000e8b0: 6172 6729 2028 312d 3220 2e20 6279 7465 arg) (1-2 . byte │ │ │ +0000e8c0: 2d63 6f6d 7069 6c65 2d6f 6e65 2d6f 722d -compile-one-or- │ │ │ +0000e8d0: 7477 6f2d 6172 6773 2920 2832 2d33 202e two-args) (2-3 . │ │ │ +0000e8e0: 2062 7974 652d 636f 6d70 696c 652d 7477 byte-compile-tw │ │ │ +0000e8f0: 6f2d 6f72 2d74 6872 6565 2d61 7267 7329 o-or-three-args) │ │ │ +0000e900: 2028 302b 3120 2e20 6279 7465 2d63 6f6d (0+1 . byte-com │ │ │ +0000e910: 7069 6c65 2d6e 6f2d 6172 6773 2d77 6974 pile-no-args-wit │ │ │ +0000e920: 682d 6f6e 652d 6578 7472 6129 2028 312b h-one-extra) (1+ │ │ │ +0000e930: 3120 2e20 6279 7465 2d63 6f6d 7069 6c65 1 . byte-compile │ │ │ +0000e940: 2d6f 6e65 2d61 7267 2d77 6974 682d 6f6e -one-arg-with-on │ │ │ +0000e950: 652d 6578 7472 6129 2028 322b 3120 2e20 e-extra) (2+1 . │ │ │ +0000e960: 6279 7465 2d63 6f6d 7069 6c65 2d74 776f byte-compile-two │ │ │ +0000e970: 2d61 7267 732d 7769 7468 2d6f 6e65 2d65 -args-with-one-e │ │ │ +0000e980: 7874 7261 2920 2830 2d31 2b31 202e 2062 xtra) (0-1+1 . b │ │ │ +0000e990: 7974 652d 636f 6d70 696c 652d 7a65 726f yte-compile-zero │ │ │ +0000e9a0: 2d6f 722d 6f6e 652d 6172 672d 7769 7468 -or-one-arg-with │ │ │ +0000e9b0: 2d6f 6e65 2d65 7874 7261 2920 2831 2d32 -one-extra) (1-2 │ │ │ +0000e9c0: 2b31 202e 2062 7974 652d 636f 6d70 696c +1 . byte-compil │ │ │ +0000e9d0: 652d 6f6e 652d 6f72 2d74 776f 2d61 7267 e-one-or-two-arg │ │ │ +0000e9e0: 732d 7769 7468 2d6f 6e65 2d65 7874 7261 s-with-one-extra │ │ │ +0000e9f0: 2920 2832 2d33 2b31 202e 2062 7974 652d ) (2-3+1 . byte- │ │ │ +0000ea00: 636f 6d70 696c 652d 7477 6f2d 6f72 2d74 compile-two-or-t │ │ │ +0000ea10: 6872 6565 2d61 7267 732d 7769 7468 2d6f hree-args-with-o │ │ │ +0000ea20: 6e65 2d65 7874 7261 2920 2830 2b32 202e ne-extra) (0+2 . │ │ │ +0000ea30: 2062 7974 652d 636f 6d70 696c 652d 6e6f byte-compile-no │ │ │ +0000ea40: 2d61 7267 732d 7769 7468 2d74 776f 2d65 -args-with-two-e │ │ │ +0000ea50: 7874 7261 2920 2831 2b32 202e 2062 7974 xtra) (1+2 . byt │ │ │ +0000ea60: 652d 636f 6d70 696c 652d 6f6e 652d 6172 e-compile-one-ar │ │ │ +0000ea70: 672d 7769 7468 2d74 776f 2d65 7874 7261 g-with-two-extra │ │ │ +0000ea80: 2929 2022 6279 7465 2d63 6f6d 7069 6c65 )) "byte-compile │ │ │ +0000ea90: 2d22 2070 726f 676e 2027 6279 7465 2d6f -" progn 'byte-o │ │ │ +0000eaa0: 7063 6f64 6520 2762 7974 652d 6f70 636f pcode 'byte-opco │ │ │ +0000eab0: 6465 2d69 6e76 6572 745d 2038 5d29 290a de-invert] 8])). │ │ │ +0000eac0: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +0000ead0: 6465 666f 702d 636f 6d70 696c 6572 3230 defop-compiler20 │ │ │ +0000eae0: 2027 286d 6163 726f 202e 2023 5b28 6675 '(macro . #[(fu │ │ │ +0000eaf0: 6e63 7469 6f6e 2026 6f70 7469 6f6e 616c nction &optional │ │ │ +0000eb00: 2063 6f6d 7069 6c65 2d68 616e 646c 6572 compile-handler │ │ │ +0000eb10: 2920 22c2 c3c4 09a3 40ae 8bc5 c6c7 09a2 ) ".....@....... │ │ │ +0000eb20: ae81 0921 5021 44c8 c946 ca09 0845 4587 ...!P!D..F...EE. │ │ │ +0000eb30: 2220 5b63 6f6d 7069 6c65 2d68 616e 646c " [compile-handl │ │ │ +0000eb40: 6572 2066 756e 6374 696f 6e20 7072 6f67 er function prog │ │ │ +0000eb50: 6e20 7075 7420 7175 6f74 6520 696e 7465 n put quote inte │ │ │ +0000eb60: 726e 2022 6279 7465 2d22 2073 796d 626f rn "byte-" symbo │ │ │ +0000eb70: 6c2d 6e61 6d65 2027 656d 6163 7332 302d l-name 'emacs20- │ │ │ +0000eb80: 6f70 636f 6465 2074 2062 7974 652d 6465 opcode t byte-de │ │ │ +0000eb90: 666f 702d 636f 6d70 696c 6572 5d20 375d fop-compiler] 7] │ │ │ +0000eba0: 2929 0a28 6465 6661 6c69 6173 2027 6279 )).(defalias 'by │ │ │ +0000ebb0: 7465 2d64 6566 6f70 2d63 6f6d 7069 6c65 te-defop-compile │ │ │ +0000ebc0: 722d 726d 7366 756e 2027 286d 6163 726f r-rmsfun '(macro │ │ │ +0000ebd0: 202e 2023 5b28 6675 6e63 7469 6f6e 2026 . #[(function & │ │ │ +0000ebe0: 6f70 7469 6f6e 616c 2063 6f6d 7069 6c65 optional compile │ │ │ +0000ebf0: 2d68 616e 646c 6572 2920 22c5 c6c7 0c21 -handler) "....! │ │ │ +0000ec00: 5021 c5c8 c70c 2150 21c9 ca0c 44cb ca09 P!....!P!...D... │ │ │ +0000ec10: ccb7 41ae 8a09 ae87 c5cd c70c 2150 2144 ..A.........!P!D │ │ │ +0000ec20: 4618 1b1a ce08 c9ca 0c44 cfca 5c6e 4446 F........D..\nDF │ │ │ +0000ec30: c9ca 0c44 d0ca 0b44 46c9 ca5c 6e44 d1ca ...D...DF..\nD.. │ │ │ +0000ec40: 0c44 46c9 ca0b 44d2 ca0c 4446 af06 2b87 .DF...D...DF..+. │ │ │ +0000ec50: 2220 5b66 6e66 6f72 6d20 636f 6d70 696c " [fnform compil │ │ │ +0000ec60: 652d 6861 6e64 6c65 7220 6f70 636f 6465 e-handler opcode │ │ │ +0000ec70: 206f 7063 6f64 6531 3920 6675 6e63 7469 opcode19 functi │ │ │ +0000ec80: 6f6e 2069 6e74 6572 6e20 2262 7974 652d on intern "byte- │ │ │ +0000ec90: 2220 7379 6d62 6f6c 2d6e 616d 6520 2262 " symbol-name "b │ │ │ +0000eca0: 7974 652d 6f6c 642d 2220 7075 7420 7175 yte-old-" put qu │ │ │ +0000ecb0: 6f74 6520 2762 7974 652d 636f 6d70 696c ote 'byte-compil │ │ │ +0000ecc0: 6520 2828 3220 2e20 6279 7465 2d63 6f6d e ((2 . byte-com │ │ │ +0000ecd0: 7069 6c65 2d74 776f 2d61 7267 732d 3139 pile-two-args-19 │ │ │ +0000ece0: 2d3e 3230 2929 2022 6279 7465 2d63 6f6d ->20)) "byte-com │ │ │ +0000ecf0: 7069 6c65 2d22 2070 726f 676e 2027 6279 pile-" progn 'by │ │ │ +0000ed00: 7465 2d6f 7063 6f64 6520 2762 7974 652d te-opcode 'byte- │ │ │ +0000ed10: 6f70 636f 6465 3139 2027 6279 7465 2d6f opcode19 'byte-o │ │ │ +0000ed20: 7063 6f64 652d 696e 7665 7274 2027 6279 pcode-invert 'by │ │ │ +0000ed30: 7465 2d6f 7063 6f64 6531 392d 696e 7665 te-opcode19-inve │ │ │ +0000ed40: 7274 5d20 3130 5d29 290a 2864 6566 616c rt] 10])).(defal │ │ │ +0000ed50: 6961 7320 2762 7974 652d 6465 666f 702d ias 'byte-defop- │ │ │ +0000ed60: 636f 6d70 696c 6572 2d31 2027 286d 6163 compiler-1 '(mac │ │ │ +0000ed70: 726f 202e 2023 5b28 6675 6e63 7469 6f6e ro . #[(function │ │ │ +0000ed80: 2026 6f70 7469 6f6e 616c 2063 6f6d 7069 &optional compi │ │ │ +0000ed90: 6c65 2d68 616e 646c 6572 2920 22c2 09c3 le-handler) "... │ │ │ +0000eda0: 4408 4587 2220 5b63 6f6d 7069 6c65 2d68 D.E." [compile-h │ │ │ +0000edb0: 616e 646c 6572 2066 756e 6374 696f 6e20 andler function │ │ │ +0000edc0: 6279 7465 2d64 6566 6f70 2d63 6f6d 7069 byte-defop-compi │ │ │ +0000edd0: 6c65 7220 6e69 6c5d 2033 5d29 290a 2862 ler nil] 3])).(b │ │ │ +0000ede0: 7974 652d 636f 6465 2022 c0c1 c2c3 2388 yte-code "....#. │ │ │ +0000edf0: c0c4 c2c5 2388 c0c6 c2c5 2388 c0c7 c2c5 ....#.....#..... │ │ │ +0000ee00: 2388 c0c8 c2c5 2388 c0c9 c2c5 2388 c0ca #.....#.....#... │ │ │ +0000ee10: c2cb 2388 c0cc c2cb 2388 c0cd c2cb 2388 ..#.....#.....#. │ │ │ +0000ee20: c0ce c2cb 2388 c0cf c2d0 2388 c0d1 d2d3 ....#.....#..... │ │ │ +0000ee30: 2388 c0d1 d4d5 2388 c0d5 c2d1 2388 c0d6 #.....#.....#... │ │ │ +0000ee40: d2d7 2388 c0d6 d4d8 2388 c0d6 d9da 2388 ..#.....#.....#. │ │ │ +0000ee50: c0d8 c2d6 2388 c0da dbd6 2388 c0dc d2d3 ....#.....#..... │ │ │ +0000ee60: 2388 c0dc d4dd 2388 c0dd c2dc 2388 c0de #.....#.....#... │ │ │ +0000ee70: d2d3 2388 c0de d4df 2388 c0df c2de 2388 ..#.....#.....#. │ │ │ +0000ee80: c0e0 d2d3 2388 c0e0 d4e1 2388 c0e1 c2e0 ....#.....#..... │ │ │ +0000ee90: 2388 c0e2 d2d3 2388 c0e2 d4e3 2388 c0e3 #.....#.....#... │ │ │ +0000eea0: c2e2 2388 c0e4 d2d3 2388 c0e4 d4e5 2388 ..#.....#.....#. │ │ │ +0000eeb0: c0e5 c2e4 2388 c0e6 d2e7 2388 c0e6 d4e8 ....#.....#..... │ │ │ +0000eec0: 2388 c0e8 c2e6 2388 c0e9 d2e7 2388 c0e9 #.....#.....#... │ │ │ +0000eed0: d4e8 2388 c0e8 c2e9 2388 c0ea d2d7 2388 ..#.....#.....#. │ │ │ +0000eee0: c0ea d4eb 2388 c0ea d9ec 2388 c0eb c2ea ....#.....#..... │ │ │ +0000eef0: 2388 c0ec dbea 2388 c0ed d2d3 2388 c0ed #.....#.....#... │ │ │ +0000ef00: d4ee 2388 c0ee c2ed 2388 c0ef d2d3 2388 ..#.....#.....#. │ │ │ +0000ef10: c0ef d4f0 2388 c0f0 c2ef 2388 c0f1 d2d3 ....#.....#..... │ │ │ +0000ef20: 2388 c0f1 d4f2 2388 c0f2 c2f1 2388 c0f3 #.....#.....#... │ │ │ +0000ef30: d2d3 2388 c0f3 d4f4 2388 c0f4 c2f3 2388 ..#.....#.....#. │ │ │ +0000ef40: c0f5 d2f6 2388 c0f5 d4f7 2388 c0f7 c2f5 ....#.....#..... │ │ │ +0000ef50: 2388 c0f8 d2d7 2388 c0f8 d4f9 2388 c0f8 #.....#.....#... │ │ │ +0000ef60: d9fa 2388 c0f9 c2f8 2388 c0fa dbf8 2388 ..#.....#.....#. │ │ │ +0000ef70: c0fb d2f6 2388 c0fb d4fc 2388 c0fc c2fb ....#.....#..... │ │ │ +0000ef80: 2388 c0fd d2d3 2388 c0fd d4fe 2388 c0fe #.....#.....#... │ │ │ +0000ef90: c2fd 2388 c0ff d281 4000 2388 c0ff d481 ..#.....@.#..... │ │ │ +0000efa0: 4100 2388 c081 4100 c2ff 2388 c081 4200 A.#...A...#...B. │ │ │ +0000efb0: d281 4000 2388 c081 4200 d481 4300 2388 ..@.#...B...C.#. │ │ │ +0000efc0: c081 4300 c281 4200 2388 c081 4400 d281 ..C...B.#...D... │ │ │ +0000efd0: 4000 2388 c081 4400 d481 4500 2388 c081 @.#...D...E.#... │ │ │ +0000efe0: 4500 c281 4400 2388 c081 4600 d281 4700 E...D.#...F...G. │ │ │ +0000eff0: 2388 c081 4600 d481 4800 2388 c081 4800 #...F...H.#...H. │ │ │ +0000f000: c281 4600 2388 c081 4900 d281 4700 2388 ..F.#...I...G.#. │ │ │ +0000f010: c081 4900 d481 4a00 2388 c081 4a00 c281 ..I...J.#...J... │ │ │ +0000f020: 4900 2388 c081 4b00 d281 4700 2388 c081 I.#...K...G.#... │ │ │ +0000f030: 4b00 d481 4c00 2388 c081 4c00 c281 4b00 K...L.#...L...K. │ │ │ +0000f040: 2388 c081 4d00 d281 4700 2388 c081 4d00 #...M...G.#...M. │ │ │ +0000f050: d481 4e00 2388 c081 4e00 c281 4d00 2388 ..N.#...N...M.#. │ │ │ +0000f060: c081 4f00 d281 4700 2388 c081 4f00 d481 ..O...G.#...O... │ │ │ +0000f070: 5000 2388 c081 5000 c281 4f00 2388 c081 P.#...P...O.#... │ │ │ +0000f080: 5100 d281 4700 2388 c081 5100 d481 5000 Q...G.#...Q...P. │ │ │ +0000f090: 2388 c081 5000 c281 5100 2388 c081 5200 #...P...Q.#...R. │ │ │ +0000f0a0: d281 4700 2388 c081 5200 d481 5300 2388 ..G.#...R...S.#. │ │ │ +0000f0b0: c081 5300 c281 5200 2388 c081 5400 d281 ..S...R.#...T... │ │ │ +0000f0c0: 4700 2388 c081 5400 d481 5500 2388 c081 G.#...T...U.#... │ │ │ +0000f0d0: 5500 c281 5400 2388 c081 5600 d281 4700 U...T.#...V...G. │ │ │ +0000f0e0: 2388 c081 5600 d481 5700 2388 c081 5700 #...V...W.#...W. │ │ │ +0000f0f0: c281 5600 2388 c081 5800 d281 4700 2388 ..V.#...X...G.#. │ │ │ +0000f100: c081 5800 d481 5900 2388 c081 5900 c281 ..X...Y.#...Y... │ │ │ +0000f110: 5800 2388 c081 5a00 d281 4700 2388 c081 X.#...Z...G.#... │ │ │ +0000f120: 5a00 d481 5b00 2388 c081 5b00 c281 5a00 Z...[.#...[...Z. │ │ │ +0000f130: 2388 c081 5c5c 00d2 8147 0023 88c0 815c #...\\...G.#...\ │ │ │ +0000f140: 5c00 d481 5d00 2388 c081 5d00 c281 5c5c \...].#...]...\\ │ │ │ +0000f150: 0023 88c0 815e 00d2 8147 0023 88c0 815e .#...^...G.#...^ │ │ │ +0000f160: 00d4 815f 0023 88c0 815f 00c2 815e 0023 ..._.#..._...^.# │ │ │ +0000f170: 88c0 8160 00d2 8161 0023 88c0 8160 00d4 ...`...a.#...`.. │ │ │ +0000f180: 8162 0023 88c0 8162 00c2 8160 0023 88c0 .b.#...b...`.#.. │ │ │ +0000f190: 8163 00d2 8140 0023 88c0 8163 00d4 8164 .c...@.#...c...d │ │ │ +0000f1a0: 0023 88c0 8164 00c2 8163 0023 88c0 8165 .#...d...c.#...e │ │ │ +0000f1b0: 00d2 8147 0023 88c0 8165 00d4 8166 0023 ...G.#...e...f.# │ │ │ +0000f1c0: 88c0 8166 00c2 8165 0023 88c0 8167 00d2 ...f...e.#...g.. │ │ │ +0000f1d0: 8140 0023 88c0 8167 00d4 8168 0023 88c0 .@.#...g...h.#.. │ │ │ +0000f1e0: 8168 00c2 8167 0023 88c0 8169 00d2 8161 .h...g.#...i...a │ │ │ +0000f1f0: 0023 88c0 8169 00d4 816a 0023 88c0 816a .#...i...j.#...j │ │ │ +0000f200: 00c2 8169 0023 88c0 816b 00d2 8147 0023 ...i.#...k...G.# │ │ │ +0000f210: 88c0 816b 00d4 816c 0023 88c0 816c 00c2 ...k...l.#...l.. │ │ │ +0000f220: 816b 0023 88c0 816d 00d2 8147 0023 88c0 .k.#...m...G.#.. │ │ │ +0000f230: 816d 00d4 816e 0023 88c0 816e 00c2 816d .m...n.#...n...m │ │ │ +0000f240: 0023 88c0 816f 00d2 8147 0023 88c0 816f .#...o...G.#...o │ │ │ +0000f250: 00d4 8170 0023 88c0 8170 00c2 816f 0023 ...p.#...p...o.# │ │ │ +0000f260: 88c0 8171 00d2 8147 0023 88c0 8171 00d4 ...q...G.#...q.. │ │ │ +0000f270: 8172 0023 88c0 8172 00c2 8171 0023 88c0 .r.#...r...q.#.. │ │ │ +0000f280: 8173 00d2 8147 0023 88c0 8173 00d4 8174 .s...G.#...s...t │ │ │ +0000f290: 0023 88c0 8174 00c2 8173 0023 88c0 8175 .#...t...s.#...u │ │ │ +0000f2a0: 00d2 8176 0023 88c0 8175 00d4 8177 0023 ...v.#...u...w.# │ │ │ +0000f2b0: 88c0 8177 00c2 8175 0023 88c0 8178 00d2 ...w...u.#...x.. │ │ │ +0000f2c0: 8176 0023 88c0 8178 00d4 8179 0023 88c0 .v.#...x...y.#.. │ │ │ +0000f2d0: 8179 00c2 8178 0023 88c0 817a 00d2 817b .y...x.#...z...{ │ │ │ +0000f2e0: 0023 88c0 817a 00d4 d823 88c0 d8c2 817a .#...z...#.....z │ │ │ +0000f2f0: 0023 88c0 da81 7c00 817d 0023 88c0 817e .#....|..}.#...~ │ │ │ +0000f300: 00d2 817b 0023 88c0 817e 00d4 da23 88c0 ...{.#...~...#.. │ │ │ +0000f310: dac2 817e 0023 88c0 fa81 7c00 817d 0023 ...~.#....|..}.# │ │ │ +0000f320: 88c0 817f 00d2 817b 0023 88c0 817f 00d4 .......{.#...... │ │ │ +0000f330: fa23 88c0 fac2 817f 0023 88c0 8180 00d2 .#.......#...... │ │ │ +0000f340: 817b 0023 88c0 8180 00d4 8181 0023 88c0 .{.#.........#.. │ │ │ +0000f350: 8181 00c2 8180 0023 88c0 8182 00d2 817b .......#.......{ │ │ │ +0000f360: 0023 88c0 8182 00d4 8183 0023 88c0 8183 .#.........#.... │ │ │ +0000f370: 00c2 8182 0023 88c0 8184 00d2 8185 0023 .....#.........# │ │ │ +0000f380: 88c0 8184 00d4 8186 0023 88c0 8186 00c2 .........#...... │ │ │ +0000f390: 8184 0023 88c0 8187 00d2 817b 0023 88c0 ...#.......{.#.. │ │ │ +0000f3a0: 8187 00d4 8188 0023 88c0 8188 00c2 8187 .......#........ │ │ │ +0000f3b0: 0023 88c0 8189 00d2 818a 0023 88c0 8189 .#.........#.... │ │ │ +0000f3c0: 00d4 818b 0023 88c0 818b 00c2 8189 0023 .....#.........# │ │ │ +0000f3d0: 88c0 818c 00d2 818a 0023 88c0 818c 00d4 .........#...... │ │ │ +0000f3e0: 818d 0023 88c0 818d 00c2 818c 0023 88c0 ...#.........#.. │ │ │ +0000f3f0: 818e 00d2 818a 0023 88c0 818e 00d4 818d .......#........ │ │ │ +0000f400: 0023 88c0 818d 00c2 818e 0023 88c0 818f .#.........#.... │ │ │ +0000f410: 00d2 8147 0023 88c0 818f 00d4 8190 0023 ...G.#.........# │ │ │ +0000f420: 88c0 8190 00c2 818f 0023 88c0 8191 00d2 .........#...... │ │ │ +0000f430: 8147 0023 88c0 8191 00d4 8192 0023 88c0 .G.#.........#.. │ │ │ +0000f440: 8192 00c2 8191 0023 88c0 8193 00d2 8161 .......#.......a │ │ │ +0000f450: 0023 88c0 8193 00d4 8194 0023 88c0 8194 .#.........#.... │ │ │ +0000f460: 00c2 8193 0023 88c0 8195 00d2 8161 0023 .....#.......a.# │ │ │ +0000f470: 88c0 8195 00d4 8196 0023 88c0 8196 00c2 .........#...... │ │ │ +0000f480: 8195 0023 88c0 8197 00d2 817b 0023 88c0 ...#.......{.#.. │ │ │ +0000f490: 8197 00d4 8198 0023 88c0 8198 00c2 8197 .......#........ │ │ │ +0000f4a0: 0023 88c0 8199 00d2 817b 0023 88c0 8199 .#.......{.#.... │ │ │ +0000f4b0: 00d4 819a 0023 88c0 819a 00c2 8199 0023 .....#.........# │ │ │ +0000f4c0: 88c0 819b 00d2 817b 0023 88c0 819b 00d4 .......{.#...... │ │ │ +0000f4d0: 8198 0023 88c0 8198 00c2 819b 0023 88c0 ...#.........#.. │ │ │ +0000f4e0: 819c 00d2 817b 0023 88c0 819c 00d4 819a .....{.#........ │ │ │ +0000f4f0: 0023 88c0 819a 00c2 819c 0023 88c0 ec81 .#.........#.... │ │ │ +0000f500: 7c00 817d 0023 88c0 819d 00d2 817b 0023 |..}.#.......{.# │ │ │ +0000f510: 88c0 819d 00d4 ec23 88c0 ecc2 819d 0023 .......#.......# │ │ │ +0000f520: 88c0 819e 00d2 817b 0023 88c0 819e 00d4 .......{.#...... │ │ │ +0000f530: 819f 0023 88c0 819f 00c2 819e 0023 88c0 ...#.........#.. │ │ │ +0000f540: 81a0 00d2 817b 0023 88c0 81a0 00d4 81a1 .....{.#........ │ │ │ +0000f550: 0023 88c0 81a1 00c2 81a0 0023 88c0 81a2 .#.........#.... │ │ │ +0000f560: 0081 7c00 817d 0023 88c0 81a3 00d2 817b ..|..}.#.......{ │ │ │ +0000f570: 0023 88c0 81a3 00d4 81a2 0023 88c0 81a2 .#.........#.... │ │ │ +0000f580: 00c2 81a3 0023 88c0 81a4 0081 7c00 817d .....#......|..} │ │ │ +0000f590: 0023 88c0 81a5 00d2 817b 0023 88c0 81a5 .#.......{.#.... │ │ │ +0000f5a0: 00d4 81a4 0023 88c0 81a4 00c2 81a5 0023 .....#.........# │ │ │ +0000f5b0: 88c0 81a6 00d2 817b 0023 88c0 81a6 00d4 .......{.#...... │ │ │ +0000f5c0: 81a7 0023 88c0 81a7 00c2 81a6 0023 88c0 ...#.........#.. │ │ │ +0000f5d0: 81a8 00d2 817b 0023 88c0 81a8 00d4 81a9 .....{.#........ │ │ │ +0000f5e0: 0023 88c0 81a9 00c2 81a8 0023 88c0 81aa .#.........#.... │ │ │ +0000f5f0: 00d2 817b 0023 88c0 81aa 00d4 81a7 0023 ...{.#.........# │ │ │ +0000f600: 88c0 81a7 00c2 81aa 0023 88c0 81ab 00d2 .........#...... │ │ │ +0000f610: 817b 0023 88c0 81ab 00d4 81a9 0023 88c0 .{.#.........#.. │ │ │ +0000f620: 81a9 00c2 81ab 0023 88c0 81ac 00d2 8185 .......#........ │ │ │ +0000f630: 0023 88c0 81ac 00d4 81ad 0023 88c0 81ad .#.........#.... │ │ │ +0000f640: 00c2 81ac 0023 88c0 81ae 00d2 8185 0023 .....#.........# │ │ │ +0000f650: 88c0 81ae 00d4 81af 0023 88c0 81af 00c2 .........#...... │ │ │ +0000f660: 81ae 0023 88c0 81b0 00d2 817b 0023 88c0 ...#.......{.#.. │ │ │ +0000f670: 81b0 00d4 81b1 0023 88c0 81b1 00c2 81b0 .......#........ │ │ │ +0000f680: 0023 88c0 81b2 00d2 81b3 0023 88c0 81b2 .#.........#.... │ │ │ +0000f690: 00d4 81b4 0023 88c0 81b4 00c2 81b2 0023 .....#.........# │ │ │ +0000f6a0: 88c0 81b5 00d2 d723 88c0 81b5 00d4 81b6 .......#........ │ │ │ +0000f6b0: 0023 88c0 81b5 00d9 81a2 0023 88c0 81b6 .#.........#.... │ │ │ +0000f6c0: 00c2 81b5 0023 88c0 81a2 00db 81b5 0023 .....#.........# │ │ │ +0000f6d0: 88c0 81b7 00d2 d723 88c0 81b7 00d4 81b8 .......#........ │ │ │ +0000f6e0: 0023 88c0 81b7 00d9 81a4 0023 88c0 81b8 .#.........#.... │ │ │ +0000f6f0: 00c2 81b7 0023 88c0 81a4 00db 81b7 0023 .....#.........# │ │ │ +0000f700: 88c0 81b9 00d2 81ba 0023 88c0 81bb 00d2 .........#...... │ │ │ +0000f710: 81bc 0023 8722 205b 7075 7420 6279 7465 ...#." [put byte │ │ │ +0000f720: 2d63 616c 6c20 6279 7465 2d6f 7063 6f64 -call byte-opcod │ │ │ +0000f730: 652d 696e 7665 7274 2066 756e 6361 6c6c e-invert funcall │ │ │ +0000f740: 2062 7974 652d 6c69 7374 3120 6c69 7374 byte-list1 list │ │ │ +0000f750: 2062 7974 652d 6c69 7374 3220 6279 7465 byte-list2 byte │ │ │ +0000f760: 2d6c 6973 7433 2062 7974 652d 6c69 7374 -list3 byte-list │ │ │ +0000f770: 3420 6279 7465 2d6c 6973 744e 2062 7974 4 byte-listN byt │ │ │ +0000f780: 652d 636f 6e63 6174 3220 636f 6e63 6174 e-concat2 concat │ │ │ +0000f790: 2062 7974 652d 636f 6e63 6174 3320 6279 byte-concat3 by │ │ │ +0000f7a0: 7465 2d63 6f6e 6361 7434 2062 7974 652d te-concat4 byte- │ │ │ +0000f7b0: 636f 6e63 6174 4e20 6279 7465 2d69 6e73 concatN byte-ins │ │ │ +0000f7c0: 6572 744e 2069 6e73 6572 7420 706f 696e ertN insert poin │ │ │ +0000f7d0: 7420 6279 7465 2d63 6f6d 7069 6c65 2062 t byte-compile b │ │ │ +0000f7e0: 7974 652d 636f 6d70 696c 652d 6e6f 2d61 yte-compile-no-a │ │ │ +0000f7f0: 7267 732d 7769 7468 2d6f 6e65 2d65 7874 rgs-with-one-ext │ │ │ +0000f800: 7261 2062 7974 652d 6f70 636f 6465 2062 ra byte-opcode b │ │ │ +0000f810: 7974 652d 706f 696e 7420 6571 2062 7974 yte-point eq byt │ │ │ +0000f820: 652d 636f 6d70 696c 652d 7477 6f2d 6172 e-compile-two-ar │ │ │ +0000f830: 6773 2d31 392d 3e32 3020 6279 7465 2d65 gs-19->20 byte-e │ │ │ +0000f840: 7120 6279 7465 2d6f 7063 6f64 6531 3920 q byte-opcode19 │ │ │ +0000f850: 6279 7465 2d6f 6c64 2d65 7120 6279 7465 byte-old-eq byte │ │ │ +0000f860: 2d6f 7063 6f64 6531 392d 696e 7665 7274 -opcode19-invert │ │ │ +0000f870: 2070 6f69 6e74 2d6d 6178 2062 7974 652d point-max byte- │ │ │ +0000f880: 706f 696e 742d 6d61 7820 706f 696e 742d point-max point- │ │ │ +0000f890: 6d69 6e20 6279 7465 2d70 6f69 6e74 2d6d min byte-point-m │ │ │ +0000f8a0: 696e 2066 6f6c 6c6f 7769 6e67 2d63 6861 in following-cha │ │ │ +0000f8b0: 7220 6279 7465 2d66 6f6c 6c6f 7769 6e67 r byte-following │ │ │ +0000f8c0: 2d63 6861 7220 7072 6563 6564 696e 672d -char preceding- │ │ │ +0000f8d0: 6368 6172 2062 7974 652d 7072 6563 6564 char byte-preced │ │ │ +0000f8e0: 696e 672d 6368 6172 2063 7572 7265 6e74 ing-char current │ │ │ +0000f8f0: 2d63 6f6c 756d 6e20 6279 7465 2d63 7572 -column byte-cur │ │ │ +0000f900: 7265 6e74 2d63 6f6c 756d 6e20 696e 6465 rent-column inde │ │ │ +0000f910: 6e74 2d74 6f2d 636f 6c75 6d6e 2062 7974 nt-to-column byt │ │ │ +0000f920: 652d 636f 6d70 696c 652d 6f6e 652d 6172 e-compile-one-ar │ │ │ +0000f930: 672d 7769 7468 2d74 776f 2d65 7874 7261 g-with-two-extra │ │ │ +0000f940: 2062 7974 652d 696e 6465 6e74 2d74 6f20 byte-indent-to │ │ │ +0000f950: 696e 6465 6e74 2d74 6f20 6571 7561 6c20 indent-to equal │ │ │ +0000f960: 6279 7465 2d65 7175 616c 2062 7974 652d byte-equal byte- │ │ │ +0000f970: 6f6c 642d 6571 7561 6c20 656f 6c70 2062 old-equal eolp b │ │ │ +0000f980: 7974 652d 656f 6c70 2065 6f62 7020 6279 yte-eolp eobp by │ │ │ +0000f990: 7465 2d65 6f62 7020 626f 6c70 2062 7974 te-eobp bolp byt │ │ │ +0000f9a0: 652d 626f 6c70 2062 6f62 7020 6279 7465 e-bolp bobp byte │ │ │ +0000f9b0: 2d62 6f62 7020 6375 7272 656e 742d 6275 -bobp current-bu │ │ │ +0000f9c0: 6666 6572 2062 7974 652d 636f 6d70 696c ffer byte-compil │ │ │ +0000f9d0: 652d 6e6f 2d61 7267 7320 6279 7465 2d63 e-no-args byte-c │ │ │ +0000f9e0: 7572 7265 6e74 2d62 7566 6665 7220 6d65 urrent-buffer me │ │ │ +0000f9f0: 6d71 2062 7974 652d 6d65 6d71 2062 7974 mq byte-memq byt │ │ │ +0000fa00: 652d 6f6c 642d 6d65 6d71 2069 6e74 6572 e-old-memq inter │ │ │ +0000fa10: 6163 7469 7665 2d70 2062 7974 652d 696e active-p byte-in │ │ │ +0000fa20: 7465 7261 6374 6976 652d 7020 7769 6465 teractive-p wide │ │ │ +0000fa30: 6e20 6279 7465 2d77 6964 656e 2065 6e64 n byte-widen end │ │ │ +0000fa40: 2d6f 662d 6c69 6e65 2062 7974 652d 636f -of-line byte-co │ │ │ +0000fa50: 6d70 696c 652d 7a65 726f 2d6f 722d 6f6e mpile-zero-or-on │ │ │ +0000fa60: 652d 6172 672d 7769 7468 2d6f 6e65 2d65 e-arg-with-one-e │ │ │ +0000fa70: 7874 7261 2062 7974 652d 656e 642d 6f66 xtra byte-end-of │ │ │ +0000fa80: 2d6c 696e 6520 666f 7277 6172 642d 6368 -line forward-ch │ │ │ +0000fa90: 6172 2062 7974 652d 666f 7277 6172 642d ar byte-forward- │ │ │ +0000faa0: 6368 6172 2066 6f72 7761 7264 2d6c 696e char forward-lin │ │ │ +0000fab0: 6520 6279 7465 2d66 6f72 7761 7264 2d6c e byte-forward-l │ │ │ +0000fac0: 696e 6520 7379 6d62 6f6c 7020 6279 7465 ine symbolp byte │ │ │ +0000fad0: 2d63 6f6d 7069 6c65 2d6f 6e65 2d61 7267 -compile-one-arg │ │ │ +0000fae0: 2062 7974 652d 7379 6d62 6f6c 7020 636f byte-symbolp co │ │ │ +0000faf0: 6e73 7020 6279 7465 2d63 6f6e 7370 2073 nsp byte-consp s │ │ │ +0000fb00: 7472 696e 6770 2062 7974 652d 7374 7269 tringp byte-stri │ │ │ +0000fb10: 6e67 7020 6c69 7374 7020 6279 7465 2d6c ngp listp byte-l │ │ │ +0000fb20: 6973 7470 206e 6f74 2062 7974 652d 6e6f istp not byte-no │ │ │ +0000fb30: 7420 6e75 6c6c 2063 6172 2062 7974 652d t null car byte- │ │ │ +0000fb40: 6361 7220 6364 7220 6279 7465 2d63 6472 car cdr byte-cdr │ │ │ +0000fb50: 206c 656e 6774 6820 6279 7465 2d6c 656e length byte-len │ │ │ +0000fb60: 6774 6820 7379 6d62 6f6c 2d76 616c 7565 gth symbol-value │ │ │ +0000fb70: 2062 7974 652d 7379 6d62 6f6c 2d76 616c byte-symbol-val │ │ │ +0000fb80: 7565 2073 796d 626f 6c2d 6675 6e63 7469 ue symbol-functi │ │ │ +0000fb90: 6f6e 2062 7974 652d 7379 6d62 6f6c 2d66 on byte-symbol-f │ │ │ +0000fba0: 756e 6374 696f 6e20 312b 2062 7974 652d unction 1+ byte- │ │ │ +0000fbb0: 6164 6431 2031 2d20 6279 7465 2d73 7562 add1 1- byte-sub │ │ │ +0000fbc0: 3120 676f 746f 2d63 6861 7220 6279 7465 1 goto-char byte │ │ │ +0000fbd0: 2d63 6f6d 7069 6c65 2d6f 6e65 2d61 7267 -compile-one-arg │ │ │ +0000fbe0: 2d77 6974 682d 6f6e 652d 6578 7472 6120 -with-one-extra │ │ │ +0000fbf0: 6279 7465 2d67 6f74 6f2d 6368 6172 2063 byte-goto-char c │ │ │ +0000fc00: 6861 722d 6166 7465 7220 6279 7465 2d63 har-after byte-c │ │ │ +0000fc10: 6861 722d 6166 7465 7220 7365 742d 6275 har-after set-bu │ │ │ +0000fc20: 6666 6572 2062 7974 652d 7365 742d 6275 ffer byte-set-bu │ │ │ +0000fc30: 6666 6572 2066 6f72 7761 7264 2d77 6f72 ffer forward-wor │ │ │ +0000fc40: 6420 6279 7465 2d66 6f72 7761 7264 2d77 d byte-forward-w │ │ │ +0000fc50: 6f72 6420 6368 6172 2d73 796e 7461 7820 ord char-syntax │ │ │ +0000fc60: 6279 7465 2d63 6861 722d 7379 6e74 6178 byte-char-syntax │ │ │ +0000fc70: 206e 7265 7665 7273 6520 6279 7465 2d6e nreverse byte-n │ │ │ +0000fc80: 7265 7665 7273 6520 6361 722d 7361 6665 reverse car-safe │ │ │ +0000fc90: 2062 7974 652d 6361 722d 7361 6665 2063 byte-car-safe c │ │ │ +0000fca0: 6472 2d73 6166 6520 6279 7465 2d63 6472 dr-safe byte-cdr │ │ │ +0000fcb0: 2d73 6166 6520 6e75 6d62 6572 7020 6279 -safe numberp by │ │ │ +0000fcc0: 7465 2d6e 756d 6265 7270 2069 6e74 6567 te-numberp integ │ │ │ +0000fcd0: 6572 7020 6279 7465 2d69 6e74 6567 6572 erp byte-integer │ │ │ +0000fce0: 7020 736b 6970 2d63 6861 7273 2d66 6f72 p skip-chars-for │ │ │ +0000fcf0: 7761 7264 2062 7974 652d 636f 6d70 696c ward byte-compil │ │ │ +0000fd00: 652d 6f6e 652d 6f72 2d74 776f 2d61 7267 e-one-or-two-arg │ │ │ +0000fd10: 732d 7769 7468 2d6f 6e65 2d65 7874 7261 s-with-one-extra │ │ │ +0000fd20: 2062 7974 652d 736b 6970 2d63 6861 7273 byte-skip-chars │ │ │ +0000fd30: 2d66 6f72 7761 7264 2073 6b69 702d 6368 -forward skip-ch │ │ │ +0000fd40: 6172 732d 6261 636b 7761 7264 2062 7974 ars-backward byt │ │ │ +0000fd50: 652d 736b 6970 2d63 6861 7273 2d62 6163 e-skip-chars-bac │ │ │ +0000fd60: 6b77 6172 6420 6571 6c20 6279 7465 2d63 kward eql byte-c │ │ │ +0000fd70: 6f6d 7069 6c65 2d74 776f 2d61 7267 7320 ompile-two-args │ │ │ +0000fd80: 656d 6163 7332 302d 6f70 636f 6465 2074 emacs20-opcode t │ │ │ +0000fd90: 206f 6c64 2d65 7120 6f6c 642d 6d65 6d71 old-eq old-memq │ │ │ +0000fda0: 2063 6f6e 7320 6279 7465 2d63 6f6e 7320 cons byte-cons │ │ │ +0000fdb0: 6172 6566 2062 7974 652d 6172 6566 2067 aref byte-aref g │ │ │ +0000fdc0: 6574 2062 7974 652d 636f 6d70 696c 652d et byte-compile- │ │ │ +0000fdd0: 7477 6f2d 6172 6773 2d77 6974 682d 6f6e two-args-with-on │ │ │ +0000fde0: 652d 6578 7472 6120 6279 7465 2d67 6574 e-extra byte-get │ │ │ +0000fdf0: 206e 7468 2062 7974 652d 6e74 6820 7375 nth byte-nth su │ │ │ +0000fe00: 6273 7472 696e 6720 6279 7465 2d63 6f6d bstring byte-com │ │ │ +0000fe10: 7069 6c65 2d74 776f 2d6f 722d 7468 7265 pile-two-or-thre │ │ │ +0000fe20: 652d 6172 6773 2062 7974 652d 7375 6273 e-args byte-subs │ │ │ +0000fe30: 7472 696e 6720 6d6f 7665 2d6d 6172 6b65 tring move-marke │ │ │ +0000fe40: 7220 6279 7465 2d73 6574 2d6d 6172 6b65 r byte-set-marke │ │ │ +0000fe50: 7220 7365 742d 6d61 726b 6572 206d 6174 r set-marker mat │ │ │ +0000fe60: 6368 2d62 6567 696e 6e69 6e67 2062 7974 ch-beginning byt │ │ │ +0000fe70: 652d 6d61 7463 682d 6265 6769 6e6e 696e e-match-beginnin │ │ │ +0000fe80: 6720 6d61 7463 682d 656e 6420 6279 7465 g match-end byte │ │ │ +0000fe90: 2d6d 6174 6368 2d65 6e64 2075 7063 6173 -match-end upcas │ │ │ +0000fea0: 6520 6279 7465 2d75 7063 6173 6520 646f e byte-upcase do │ │ │ +0000feb0: 776e 6361 7365 2062 7974 652d 646f 776e wncase byte-down │ │ │ +0000fec0: 6361 7365 2073 7472 696e 673d 2062 7974 case string= byt │ │ │ +0000fed0: 652d 7374 7269 6e67 3d20 7374 7269 6e67 e-string= string │ │ │ +0000fee0: 3c20 6279 7465 2d73 7472 696e 673c 2073 < byte-string< s │ │ │ +0000fef0: 7472 696e 672d 6571 7561 6c20 7374 7269 tring-equal stri │ │ │ +0000ff00: 6e67 2d6c 6573 7370 206f 6c64 2d65 7175 ng-lessp old-equ │ │ │ +0000ff10: 616c 206e 7468 6364 7220 6279 7465 2d6e al nthcdr byte-n │ │ │ +0000ff20: 7468 6364 7220 656c 7420 6279 7465 2d65 thcdr elt byte-e │ │ │ +0000ff30: 6c74 2062 7974 652d 6f6c 642d 6d65 6d62 lt byte-old-memb │ │ │ +0000ff40: 6572 206f 6c64 2d6d 656d 6265 7220 6279 er old-member by │ │ │ +0000ff50: 7465 2d6f 6c64 2d61 7373 7120 6f6c 642d te-old-assq old- │ │ │ +0000ff60: 6173 7371 2072 706c 6163 6120 6279 7465 assq rplaca byte │ │ │ +0000ff70: 2d73 6574 6361 7220 7270 6c61 6364 2062 -setcar rplacd b │ │ │ +0000ff80: 7974 652d 7365 7463 6472 2073 6574 6361 yte-setcdr setca │ │ │ +0000ff90: 7220 7365 7463 6472 2064 656c 6574 652d r setcdr delete- │ │ │ +0000ffa0: 7265 6769 6f6e 2062 7974 652d 6465 6c65 region byte-dele │ │ │ +0000ffb0: 7465 2d72 6567 696f 6e20 6e61 7272 6f77 te-region narrow │ │ │ +0000ffc0: 2d74 6f2d 7265 6769 6f6e 2062 7974 652d -to-region byte- │ │ │ +0000ffd0: 6e61 7272 6f77 2d74 6f2d 7265 6769 6f6e narrow-to-region │ │ │ +0000ffe0: 2025 2062 7974 652d 7265 6d20 6173 6574 % byte-rem aset │ │ │ +0000fff0: 2062 7974 652d 636f 6d70 696c 652d 7468 byte-compile-th │ │ │ +00010000: 7265 652d 6172 6773 2062 7974 652d 6173 ree-args byte-as │ │ │ +00010010: 6574 206d 656d 6265 7220 6279 7465 2d6d et member byte-m │ │ │ +00010020: 656d 6265 7220 6173 7371 2062 7974 652d ember assq byte- │ │ │ +00010030: 6173 7371 2069 6e74 6572 6163 7469 7665 assq interactive │ │ │ +00010040: 2062 7974 652d 636f 6d70 696c 652d 6e6f byte-compile-no │ │ │ +00010050: 6f70 2064 6f6d 6169 6e20 6279 7465 2d63 op domain byte-c │ │ │ +00010060: 6f6d 7069 6c65 2d64 6f6d 6169 6e5d 2034 ompile-domain] 4 │ │ │ +00010070: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ +00010080: 652d 636f 6d70 696c 652d 7375 6272 2d77 e-compile-subr-w │ │ │ +00010090: 726f 6e67 2d61 7267 7320 235b 2866 6f72 rong-args #[(for │ │ │ +000100a0: 6d20 6e29 2022 c309 73ab 95c4 c55c 6e40 m n) "..s....\n@ │ │ │ +000100b0: 5c6e 4147 c65c 6e41 4755 ab83 c7aa 81c8 \nAG.\nAGU...... │ │ │ +000100c0: 0825 88c9 5c6e 2187 2220 5b6e 2062 7974 .%..\n!." [n byt │ │ │ +000100d0: 652d 636f 6d70 696c 652d 7761 726e 696e e-compile-warnin │ │ │ +000100e0: 6773 2066 6f72 6d20 7375 6272 2d63 616c gs form subr-cal │ │ │ +000100f0: 6c61 7267 7320 6279 7465 2d63 6f6d 7069 largs byte-compi │ │ │ +00010100: 6c65 2d77 6172 6e20 2225 7320 6361 6c6c le-warn "%s call │ │ │ +00010110: 6564 2077 6974 6820 2564 2061 7267 2573 ed with %d arg%s │ │ │ +00010120: 2c20 6275 7420 7265 7175 6972 6573 2025 , but requires % │ │ │ +00010130: 7322 2031 2022 2220 2273 2220 6279 7465 s" 1 "" "s" byte │ │ │ +00010140: 2d63 6f6d 7069 6c65 2d6e 6f72 6d61 6c2d -compile-normal- │ │ │ +00010150: 6361 6c6c 5d20 365d 290a 2864 6566 616c call] 6]).(defal │ │ │ +00010160: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00010170: 652d 6e6f 2d61 7267 7320 235b 2866 6f72 e-no-args #[(for │ │ │ +00010180: 6d29 2022 0841 47c1 61ab 88c2 0840 c34e m) ".AG.a....@.N │ │ │ +00010190: c15c 2287 c408 c55c 2287 2220 5b66 6f72 .\"....\"." [for │ │ │ +000101a0: 6d20 3020 6279 7465 2d63 6f6d 7069 6c65 m 0 byte-compile │ │ │ +000101b0: 2d6f 7574 2062 7974 652d 6f70 636f 6465 -out byte-opcode │ │ │ +000101c0: 2062 7974 652d 636f 6d70 696c 652d 7375 byte-compile-su │ │ │ +000101d0: 6272 2d77 726f 6e67 2d61 7267 7320 226e br-wrong-args "n │ │ │ +000101e0: 6f6e 6522 5d20 335d 290a 2864 6566 616c one"] 3]).(defal │ │ │ +000101f0: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00010200: 652d 6f6e 652d 6172 6720 235b 2866 6f72 e-one-arg #[(for │ │ │ +00010210: 6d29 2022 0841 47c1 61ab 8ec2 0841 4021 m) ".AG.a....A@! │ │ │ +00010220: 88c3 0840 c44e c55c 2287 c608 c15c 2287 ...@.N.\"....\". │ │ │ +00010230: 2220 5b66 6f72 6d20 3120 6279 7465 2d63 " [form 1 byte-c │ │ │ +00010240: 6f6d 7069 6c65 2d66 6f72 6d20 6279 7465 ompile-form byte │ │ │ +00010250: 2d63 6f6d 7069 6c65 2d6f 7574 2062 7974 -compile-out byt │ │ │ +00010260: 652d 6f70 636f 6465 2030 2062 7974 652d e-opcode 0 byte- │ │ │ +00010270: 636f 6d70 696c 652d 7375 6272 2d77 726f compile-subr-wro │ │ │ +00010280: 6e67 2d61 7267 735d 2033 5d29 0a28 6465 ng-args] 3]).(de │ │ │ +00010290: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ +000102a0: 7069 6c65 2d74 776f 2d61 7267 7320 235b pile-two-args #[ │ │ │ +000102b0: 2866 6f72 6d29 2022 0841 47c1 61ab 94c2 (form) ".AG.a... │ │ │ +000102c0: 0841 4021 88c2 c108 3821 88c3 0840 c44e .A@!....8!...@.N │ │ │ +000102d0: c55c 2287 c608 c15c 2287 2220 5b66 6f72 .\"....\"." [for │ │ │ +000102e0: 6d20 3220 6279 7465 2d63 6f6d 7069 6c65 m 2 byte-compile │ │ │ +000102f0: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ +00010300: 6c65 2d6f 7574 2062 7974 652d 6f70 636f le-out byte-opco │ │ │ +00010310: 6465 2030 2062 7974 652d 636f 6d70 696c de 0 byte-compil │ │ │ +00010320: 652d 7375 6272 2d77 726f 6e67 2d61 7267 e-subr-wrong-arg │ │ │ +00010330: 735d 2033 5d29 0a28 6465 6661 6c69 6173 s] 3]).(defalias │ │ │ +00010340: 2027 6279 7465 2d63 6f6d 7069 6c65 2d74 'byte-compile-t │ │ │ +00010350: 6872 6565 2d61 7267 7320 235b 2866 6f72 hree-args #[(for │ │ │ +00010360: 6d29 2022 0841 47c1 61ab 9ac2 0841 4021 m) ".AG.a....A@! │ │ │ +00010370: 88c2 c308 3821 88c2 c108 3821 88c4 0840 ....8!....8!...@ │ │ │ +00010380: c54e c65c 2287 c708 c15c 2287 2220 5b66 .N.\"....\"." [f │ │ │ +00010390: 6f72 6d20 3320 6279 7465 2d63 6f6d 7069 orm 3 byte-compi │ │ │ +000103a0: 6c65 2d66 6f72 6d20 3220 6279 7465 2d63 le-form 2 byte-c │ │ │ +000103b0: 6f6d 7069 6c65 2d6f 7574 2062 7974 652d ompile-out byte- │ │ │ +000103c0: 6f70 636f 6465 2030 2062 7974 652d 636f opcode 0 byte-co │ │ │ +000103d0: 6d70 696c 652d 7375 6272 2d77 726f 6e67 mpile-subr-wrong │ │ │ +000103e0: 2d61 7267 735d 2033 5d29 0a28 6465 6661 -args] 3]).(defa │ │ │ +000103f0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +00010400: 6c65 2d7a 6572 6f2d 6f72 2d6f 6e65 2d61 le-zero-or-one-a │ │ │ +00010410: 7267 2023 5b28 666f 726d 2920 2208 4147 rg #[(form) ".AG │ │ │ +00010420: c161 ab87 c2c3 08c4 5c22 2187 0841 47c5 .a......\"!..AG. │ │ │ +00010430: 61ab 84c2 0821 87c6 08c7 5c22 8722 205b a....!....\"." [ │ │ │ +00010440: 666f 726d 2030 2062 7974 652d 636f 6d70 form 0 byte-comp │ │ │ +00010450: 696c 652d 6f6e 652d 6172 6720 6170 7065 ile-one-arg appe │ │ │ +00010460: 6e64 2028 6e69 6c29 2031 2062 7974 652d nd (nil) 1 byte- │ │ │ +00010470: 636f 6d70 696c 652d 7375 6272 2d77 726f compile-subr-wro │ │ │ +00010480: 6e67 2d61 7267 7320 2230 2d31 225d 2034 ng-args "0-1"] 4 │ │ │ +00010490: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +000104a0: 7465 2d63 6f6d 7069 6c65 2d6f 6e65 2d6f te-compile-one-o │ │ │ +000104b0: 722d 7477 6f2d 6172 6773 2023 5b28 666f r-two-args #[(fo │ │ │ +000104c0: 726d 2920 2208 4147 c161 ab87 c2c3 08c4 rm) ".AG.a...... │ │ │ +000104d0: 5c22 2187 0841 47c5 61ab 84c2 0821 87c6 \"!..AG.a....!.. │ │ │ +000104e0: 08c7 5c22 8722 205b 666f 726d 2031 2062 ..\"." [form 1 b │ │ │ +000104f0: 7974 652d 636f 6d70 696c 652d 7477 6f2d yte-compile-two- │ │ │ +00010500: 6172 6773 2061 7070 656e 6420 286e 696c args append (nil │ │ │ +00010510: 2920 3220 6279 7465 2d63 6f6d 7069 6c65 ) 2 byte-compile │ │ │ +00010520: 2d73 7562 722d 7772 6f6e 672d 6172 6773 -subr-wrong-args │ │ │ +00010530: 2022 312d 3222 5d20 345d 290a 2864 6566 "1-2"] 4]).(def │ │ │ +00010540: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ +00010550: 696c 652d 7477 6f2d 6f72 2d74 6872 6565 ile-two-or-three │ │ │ +00010560: 2d61 7267 7320 235b 2866 6f72 6d29 2022 -args #[(form) " │ │ │ +00010570: 0841 47c1 61ab 87c2 c308 c45c 2221 8708 .AG.a......\"!.. │ │ │ +00010580: 4147 c561 ab84 c208 2187 c608 c75c 2287 AG.a....!....\". │ │ │ +00010590: 2220 5b66 6f72 6d20 3220 6279 7465 2d63 " [form 2 byte-c │ │ │ +000105a0: 6f6d 7069 6c65 2d74 6872 6565 2d61 7267 ompile-three-arg │ │ │ +000105b0: 7320 6170 7065 6e64 2028 6e69 6c29 2033 s append (nil) 3 │ │ │ +000105c0: 2062 7974 652d 636f 6d70 696c 652d 7375 byte-compile-su │ │ │ +000105d0: 6272 2d77 726f 6e67 2d61 7267 7320 2232 br-wrong-args "2 │ │ │ +000105e0: 2d33 225d 2034 5d29 0a28 6465 6661 6c69 -3"] 4]).(defali │ │ │ +000105f0: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +00010600: 2d6e 6f2d 6172 6773 2d77 6974 682d 6f6e -no-args-with-on │ │ │ +00010610: 652d 6578 7472 6120 235b 2866 6f72 6d29 e-extra #[(form) │ │ │ +00010620: 2022 0841 47c1 61ab 84c2 0821 8708 4147 ".AG.a....!..AG │ │ │ +00010630: c361 ab91 0841 40c4 61ab 86c2 c508 2121 .a...A@.a.....!! │ │ │ +00010640: 87c6 0821 87c7 08c8 5c22 8722 205b 666f ...!....\"." [fo │ │ │ +00010650: 726d 2030 2062 7974 652d 636f 6d70 696c rm 0 byte-compil │ │ │ +00010660: 652d 6e6f 2d61 7267 7320 3120 6e69 6c20 e-no-args 1 nil │ │ │ +00010670: 6275 746c 6173 7420 6279 7465 2d63 6f6d butlast byte-com │ │ │ +00010680: 7069 6c65 2d6e 6f72 6d61 6c2d 6361 6c6c pile-normal-call │ │ │ +00010690: 2062 7974 652d 636f 6d70 696c 652d 7375 byte-compile-su │ │ │ +000106a0: 6272 2d77 726f 6e67 2d61 7267 7320 2230 br-wrong-args "0 │ │ │ +000106b0: 2d31 225d 2033 5d29 0a28 6465 6661 6c69 -1"] 3]).(defali │ │ │ +000106c0: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +000106d0: 2d6f 6e65 2d61 7267 2d77 6974 682d 6f6e -one-arg-with-on │ │ │ +000106e0: 652d 6578 7472 6120 235b 2866 6f72 6d29 e-extra #[(form) │ │ │ +000106f0: 2022 0841 47c1 61ab 84c2 0821 8708 4147 ".AG.a....!..AG │ │ │ +00010700: c361 ab91 c308 38c4 61ab 86c2 c508 2121 .a....8.a.....!! │ │ │ +00010710: 87c6 0821 87c7 08c8 5c22 8722 205b 666f ...!....\"." [fo │ │ │ +00010720: 726d 2031 2062 7974 652d 636f 6d70 696c rm 1 byte-compil │ │ │ +00010730: 652d 6f6e 652d 6172 6720 3220 6e69 6c20 e-one-arg 2 nil │ │ │ +00010740: 6275 746c 6173 7420 6279 7465 2d63 6f6d butlast byte-com │ │ │ +00010750: 7069 6c65 2d6e 6f72 6d61 6c2d 6361 6c6c pile-normal-call │ │ │ +00010760: 2062 7974 652d 636f 6d70 696c 652d 7375 byte-compile-su │ │ │ +00010770: 6272 2d77 726f 6e67 2d61 7267 7320 2231 br-wrong-args "1 │ │ │ +00010780: 2d32 225d 2033 5d29 0a28 6465 6661 6c69 -2"] 3]).(defali │ │ │ +00010790: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +000107a0: 2d74 776f 2d61 7267 732d 7769 7468 2d6f -two-args-with-o │ │ │ +000107b0: 6e65 2d65 7874 7261 2023 5b28 666f 726d ne-extra #[(form │ │ │ +000107c0: 2920 2208 4147 c161 ab84 c208 2187 0841 ) ".AG.a....!..A │ │ │ +000107d0: 47c3 61ab 91c3 0838 c461 ab86 c2c5 0821 G.a....8.a.....! │ │ │ +000107e0: 2187 c608 2187 c708 c85c 2287 2220 5b66 !...!....\"." [f │ │ │ +000107f0: 6f72 6d20 3220 6279 7465 2d63 6f6d 7069 orm 2 byte-compi │ │ │ +00010800: 6c65 2d74 776f 2d61 7267 7320 3320 6e69 le-two-args 3 ni │ │ │ +00010810: 6c20 6275 746c 6173 7420 6279 7465 2d63 l butlast byte-c │ │ │ +00010820: 6f6d 7069 6c65 2d6e 6f72 6d61 6c2d 6361 ompile-normal-ca │ │ │ +00010830: 6c6c 2062 7974 652d 636f 6d70 696c 652d ll byte-compile- │ │ │ +00010840: 7375 6272 2d77 726f 6e67 2d61 7267 7320 subr-wrong-args │ │ │ +00010850: 2232 2d33 225d 2033 5d29 0a28 6465 6661 "2-3"] 3]).(defa │ │ │ +00010860: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +00010870: 6c65 2d7a 6572 6f2d 6f72 2d6f 6e65 2d61 le-zero-or-one-a │ │ │ +00010880: 7267 2d77 6974 682d 6f6e 652d 6578 7472 rg-with-one-extr │ │ │ +00010890: 6120 235b 2866 6f72 6d29 2022 0841 47c1 a #[(form) ".AG. │ │ │ +000108a0: 61ab 87c2 c308 c45c 2221 8708 4147 c561 a......\"!..AG.a │ │ │ +000108b0: ab84 c208 2187 0841 47c6 61ab 91c6 0838 ....!..AG.a....8 │ │ │ +000108c0: c761 ab86 c2c8 0821 2187 c908 2187 ca08 .a.....!!...!... │ │ │ +000108d0: cb5c 2287 2220 5b66 6f72 6d20 3020 6279 .\"." [form 0 by │ │ │ +000108e0: 7465 2d63 6f6d 7069 6c65 2d6f 6e65 2d61 te-compile-one-a │ │ │ +000108f0: 7267 2061 7070 656e 6420 286e 696c 2920 rg append (nil) │ │ │ +00010900: 3120 3220 6e69 6c20 6275 746c 6173 7420 1 2 nil butlast │ │ │ +00010910: 6279 7465 2d63 6f6d 7069 6c65 2d6e 6f72 byte-compile-nor │ │ │ +00010920: 6d61 6c2d 6361 6c6c 2062 7974 652d 636f mal-call byte-co │ │ │ +00010930: 6d70 696c 652d 7375 6272 2d77 726f 6e67 mpile-subr-wrong │ │ │ +00010940: 2d61 7267 7320 2230 2d32 225d 2034 5d29 -args "0-2"] 4]) │ │ │ +00010950: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +00010960: 2d63 6f6d 7069 6c65 2d6f 6e65 2d6f 722d -compile-one-or- │ │ │ +00010970: 7477 6f2d 6172 6773 2d77 6974 682d 6f6e two-args-with-on │ │ │ +00010980: 652d 6578 7472 6120 235b 2866 6f72 6d29 e-extra #[(form) │ │ │ +00010990: 2022 0841 47c1 61ab 87c2 c308 c45c 2221 ".AG.a......\"! │ │ │ +000109a0: 8708 4147 c561 ab84 c208 2187 0841 47c6 ..AG.a....!..AG. │ │ │ +000109b0: 61ab 91c6 0838 c761 ab86 c2c8 0821 2187 a....8.a.....!!. │ │ │ +000109c0: c908 2187 ca08 cb5c 2287 2220 5b66 6f72 ..!....\"." [for │ │ │ +000109d0: 6d20 3120 6279 7465 2d63 6f6d 7069 6c65 m 1 byte-compile │ │ │ +000109e0: 2d74 776f 2d61 7267 7320 6170 7065 6e64 -two-args append │ │ │ +000109f0: 2028 6e69 6c29 2032 2033 206e 696c 2062 (nil) 2 3 nil b │ │ │ +00010a00: 7574 6c61 7374 2062 7974 652d 636f 6d70 utlast byte-comp │ │ │ +00010a10: 696c 652d 6e6f 726d 616c 2d63 616c 6c20 ile-normal-call │ │ │ +00010a20: 6279 7465 2d63 6f6d 7069 6c65 2d73 7562 byte-compile-sub │ │ │ +00010a30: 722d 7772 6f6e 672d 6172 6773 2022 312d r-wrong-args "1- │ │ │ +00010a40: 3322 5d20 345d 290a 2864 6566 616c 6961 3"] 4]).(defalia │ │ │ +00010a50: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ +00010a60: 7477 6f2d 6f72 2d74 6872 6565 2d61 7267 two-or-three-arg │ │ │ +00010a70: 732d 7769 7468 2d6f 6e65 2d65 7874 7261 s-with-one-extra │ │ │ +00010a80: 2023 5b28 666f 726d 2920 2208 4147 c161 #[(form) ".AG.a │ │ │ +00010a90: ab87 c2c3 08c4 5c22 2187 0841 47c5 61ab ......\"!..AG.a. │ │ │ +00010aa0: 84c2 0821 8708 4147 c661 ab91 c608 38c7 ...!..AG.a....8. │ │ │ +00010ab0: 61ab 86c2 c808 2121 87c9 0821 87ca 08cb a.....!!...!.... │ │ │ +00010ac0: 5c22 8722 205b 666f 726d 2032 2062 7974 \"." [form 2 byt │ │ │ +00010ad0: 652d 636f 6d70 696c 652d 7468 7265 652d e-compile-three- │ │ │ +00010ae0: 6172 6773 2061 7070 656e 6420 286e 696c args append (nil │ │ │ +00010af0: 2920 3320 3420 6e69 6c20 6275 746c 6173 ) 3 4 nil butlas │ │ │ +00010b00: 7420 6279 7465 2d63 6f6d 7069 6c65 2d6e t byte-compile-n │ │ │ +00010b10: 6f72 6d61 6c2d 6361 6c6c 2062 7974 652d ormal-call byte- │ │ │ +00010b20: 636f 6d70 696c 652d 7375 6272 2d77 726f compile-subr-wro │ │ │ +00010b30: 6e67 2d61 7267 7320 2232 2d34 225d 2034 ng-args "2-4"] 4 │ │ │ +00010b40: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +00010b50: 7465 2d63 6f6d 7069 6c65 2d6e 6f2d 6172 te-compile-no-ar │ │ │ +00010b60: 6773 2d77 6974 682d 7477 6f2d 6578 7472 gs-with-two-extr │ │ │ +00010b70: 6120 235b 2866 6f72 6d29 2022 0841 47c1 a #[(form) ".AG. │ │ │ +00010b80: 61ab 84c2 0821 8708 4147 c373 ab84 c408 a....!..AG.s.... │ │ │ +00010b90: 2187 c508 c65c 2287 2220 5b66 6f72 6d20 !....\"." [form │ │ │ +00010ba0: 3020 6279 7465 2d63 6f6d 7069 6c65 2d6e 0 byte-compile-n │ │ │ +00010bb0: 6f2d 6172 6773 2028 3120 3229 2062 7974 o-args (1 2) byt │ │ │ +00010bc0: 652d 636f 6d70 696c 652d 6e6f 726d 616c e-compile-normal │ │ │ +00010bd0: 2d63 616c 6c20 6279 7465 2d63 6f6d 7069 -call byte-compi │ │ │ +00010be0: 6c65 2d73 7562 722d 7772 6f6e 672d 6172 le-subr-wrong-ar │ │ │ +00010bf0: 6773 2022 302d 3222 5d20 335d 290a 2864 gs "0-2"] 3]).(d │ │ │ +00010c00: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ +00010c10: 6d70 696c 652d 6f6e 652d 6172 672d 7769 mpile-one-arg-wi │ │ │ +00010c20: 7468 2d74 776f 2d65 7874 7261 2023 5b28 th-two-extra #[( │ │ │ +00010c30: 666f 726d 2920 2208 4147 c161 ab84 c208 form) ".AG.a.... │ │ │ +00010c40: 2187 0841 47c3 73ab 84c4 0821 87c5 08c6 !..AG.s....!.... │ │ │ +00010c50: 5c22 8722 205b 666f 726d 2031 2062 7974 \"." [form 1 byt │ │ │ +00010c60: 652d 636f 6d70 696c 652d 6f6e 652d 6172 e-compile-one-ar │ │ │ +00010c70: 6720 2832 2033 2920 6279 7465 2d63 6f6d g (2 3) byte-com │ │ │ +00010c80: 7069 6c65 2d6e 6f72 6d61 6c2d 6361 6c6c pile-normal-call │ │ │ +00010c90: 2062 7974 652d 636f 6d70 696c 652d 7375 byte-compile-su │ │ │ +00010ca0: 6272 2d77 726f 6e67 2d61 7267 7320 2231 br-wrong-args "1 │ │ │ +00010cb0: 2d33 225d 2033 5d29 0a28 6465 6661 6c69 -3"] 3]).(defali │ │ │ +00010cc0: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +00010cd0: 2d74 776f 2d61 7267 732d 3139 2d3e 3230 -two-args-19->20 │ │ │ +00010ce0: 2023 5b28 666f 726d 2920 2209 47c2 55ac #[(form) ".G.U. │ │ │ +00010cf0: 85c3 09c4 5c22 87c5 0941 4021 88c5 c409 ....\"...A@!.... │ │ │ +00010d00: 3821 8808 ab88 c609 40c7 4ec8 5c22 87c6 8!......@.N.\".. │ │ │ +00010d10: 0940 c94e c85c 2287 2220 5b62 7974 652d .@.N.\"." [byte- │ │ │ +00010d20: 636f 6d70 696c 652d 656d 6163 7331 392d compile-emacs19- │ │ │ +00010d30: 636f 6d70 6174 6962 696c 6974 7920 666f compatibility fo │ │ │ +00010d40: 726d 2033 2062 7974 652d 636f 6d70 696c rm 3 byte-compil │ │ │ +00010d50: 652d 7375 6272 2d77 726f 6e67 2d61 7267 e-subr-wrong-arg │ │ │ +00010d60: 7320 3220 6279 7465 2d63 6f6d 7069 6c65 s 2 byte-compile │ │ │ +00010d70: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ +00010d80: 6c65 2d6f 7574 2062 7974 652d 6f70 636f le-out byte-opco │ │ │ +00010d90: 6465 3139 2030 2062 7974 652d 6f70 636f de19 0 byte-opco │ │ │ +00010da0: 6465 5d20 335d 290a 2864 6566 616c 6961 de] 3]).(defalia │ │ │ +00010db0: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ +00010dc0: 6e6f 6f70 2023 5b28 666f 726d 2920 22c0 noop #[(form) ". │ │ │ +00010dd0: c121 8722 205b 6279 7465 2d63 6f6d 7069 .!." [byte-compi │ │ │ +00010de0: 6c65 2d63 6f6e 7374 616e 7420 6e69 6c5d le-constant nil] │ │ │ +00010df0: 2032 5d29 0a28 6465 6661 6c69 6173 2027 2]).(defalias ' │ │ │ +00010e00: 6279 7465 2d63 6f6d 7069 6c65 2d64 6973 byte-compile-dis │ │ │ +00010e10: 6361 7264 2023 5b6e 696c 2022 c0c1 c25c card #[nil "...\ │ │ │ +00010e20: 2287 2220 5b62 7974 652d 636f 6d70 696c "." [byte-compil │ │ │ +00010e30: 652d 6f75 7420 6279 7465 2d64 6973 6361 e-out byte-disca │ │ │ +00010e40: 7264 2030 5d20 335d 290a 2864 6566 616c rd 0] 3]).(defal │ │ │ +00010e50: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00010e60: 652d 6d61 7820 235b 2866 6f72 6d29 2022 e-max #[(form) " │ │ │ +00010e70: 0941 891c 47c5 61ab 86c6 09c7 5c22 aabb .A..G.a.....\".. │ │ │ +00010e80: 0c47 c861 ab94 c90c 4021 8808 3fad acca .G.a....@!..?... │ │ │ +00010e90: cbc5 5c22 88ca ccc5 5c22 aaa1 c90c 4021 ..\"....\"....@! │ │ │ +00010ea0: 880c 41cd 1a89 1bab 920b 4012 c95c 6e21 ..A.......@..\n! │ │ │ +00010eb0: 88ca ccc5 5c22 880b 4189 13ac 6e2a cd29 ....\"..A...n*.) │ │ │ +00010ec0: 8722 205b 6279 7465 2d63 6f6d 7069 6c65 ." [byte-compile │ │ │ +00010ed0: 2d64 656c 6574 652d 6572 726f 7273 2066 -delete-errors f │ │ │ +00010ee0: 6f72 6d20 656c 7420 2331 3d23 3a2d 2d64 orm elt #1=#:--d │ │ │ +00010ef0: 6f6c 6973 742d 7465 6d70 2d2d 3331 3232 olist-temp--3122 │ │ │ +00010f00: 3620 6172 6773 2030 2062 7974 652d 636f 6 args 0 byte-co │ │ │ +00010f10: 6d70 696c 652d 7375 6272 2d77 726f 6e67 mpile-subr-wrong │ │ │ +00010f20: 2d61 7267 7320 2231 206f 7220 6d6f 7265 -args "1 or more │ │ │ +00010f30: 2220 3120 6279 7465 2d63 6f6d 7069 6c65 " 1 byte-compile │ │ │ +00010f40: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ +00010f50: 6c65 2d6f 7574 2062 7974 652d 6475 7020 le-out byte-dup │ │ │ +00010f60: 6279 7465 2d6d 6178 206e 696c 5d20 355d byte-max nil] 5] │ │ │ +00010f70: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ +00010f80: 652d 636f 6d70 696c 652d 6d69 6e20 235b e-compile-min #[ │ │ │ +00010f90: 2866 6f72 6d29 2022 0941 891c 47c5 61ab (form) ".A..G.a. │ │ │ +00010fa0: 86c6 09c7 5c22 aabb 0c47 c861 ab94 c90c ....\"...G.a.... │ │ │ +00010fb0: 4021 8808 3fad acca cbc5 5c22 88ca ccc5 @!..?.....\".... │ │ │ +00010fc0: 5c22 aaa1 c90c 4021 880c 41cd 1a89 1bab \"....@!..A..... │ │ │ +00010fd0: 920b 4012 c95c 6e21 88ca ccc5 5c22 880b ..@..\n!....\".. │ │ │ +00010fe0: 4189 13ac 6e2a cd29 8722 205b 6279 7465 A...n*.)." [byte │ │ │ +00010ff0: 2d63 6f6d 7069 6c65 2d64 656c 6574 652d -compile-delete- │ │ │ +00011000: 6572 726f 7273 2066 6f72 6d20 656c 7420 errors form elt │ │ │ +00011010: 2331 3d23 3a2d 2d64 6f6c 6973 742d 7465 #1=#:--dolist-te │ │ │ +00011020: 6d70 2d2d 3331 3232 3820 6172 6773 2030 mp--31228 args 0 │ │ │ +00011030: 2062 7974 652d 636f 6d70 696c 652d 7375 byte-compile-su │ │ │ +00011040: 6272 2d77 726f 6e67 2d61 7267 7320 2231 br-wrong-args "1 │ │ │ +00011050: 206f 7220 6d6f 7265 2220 3120 6279 7465 or more" 1 byte │ │ │ +00011060: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6279 -compile-form by │ │ │ +00011070: 7465 2d63 6f6d 7069 6c65 2d6f 7574 2062 te-compile-out b │ │ │ +00011080: 7974 652d 6475 7020 6279 7465 2d6d 696e yte-dup byte-min │ │ │ +00011090: 206e 696c 5d20 355d 290a 2862 7974 652d nil] 5]).(byte- │ │ │ +000110a0: 636f 6465 2022 c0c1 c2c3 2388 c0c1 c4c5 code "....#..... │ │ │ +000110b0: 2388 c0c5 c6c1 2388 c0c7 c2c8 2388 c0c7 #.....#.....#... │ │ │ +000110c0: c4c9 2388 c0c9 c6c7 2388 c0ca c2cb 2388 ..#.....#.....#. │ │ │ +000110d0: c0ca c4cc 2388 c0cc c6ca 2388 c0cd c2ce ....#.....#..... │ │ │ +000110e0: 2388 c0cd c4cf 2388 c0cf c6cd 2388 c0d0 #.....#.....#... │ │ │ +000110f0: c2d1 2388 c0d2 c2d3 2388 c0d2 c4d4 2388 ..#.....#.....#. │ │ │ +00011100: c0d4 c6d2 2388 c0d5 c2d6 2388 c0d5 c4d7 ....#.....#..... │ │ │ +00011110: 2388 c0d7 c6d5 2388 c0d8 c2d9 2388 c0d8 #.....#.....#... │ │ │ +00011120: c4da 2388 c0da c6d8 2388 c0db c2dc 2388 ..#.....#.....#. │ │ │ +00011130: c0dd c2de 2388 c0dd c4df 2388 c0df c6dd ....#.....#..... │ │ │ +00011140: 2388 c0e0 c2e1 2388 c0e0 c4e2 2388 c0e2 #.....#.....#... │ │ │ +00011150: c6e0 2388 c0e3 c2e4 2388 c0e3 c4e5 2388 ..#.....#.....#. │ │ │ +00011160: c0e5 c6e3 2388 c0e6 c2e7 2388 c0e8 c2e9 ....#.....#..... │ │ │ +00011170: 2388 c0e8 c4ea 2388 c0ea c6e8 2388 c0eb #.....#.....#... │ │ │ +00011180: c2e9 2388 c0eb c4ec 2388 c0ec c6eb 2388 ..#.....#.....#. │ │ │ +00011190: c0ed c2e9 2388 c0ed c4ee 2388 c0ee c6ed ....#.....#..... │ │ │ +000111a0: 2388 c0ef c2e9 2388 c0ef c4f0 2388 c0f0 #.....#.....#... │ │ │ +000111b0: c6ef 2388 c0f1 c2e9 2388 c0f1 c4f2 2388 ..#.....#.....#. │ │ │ +000111c0: c0f2 c6f1 2387 2220 5b70 7574 206c 6973 ....#." [put lis │ │ │ +000111d0: 7420 6279 7465 2d63 6f6d 7069 6c65 2062 t byte-compile b │ │ │ +000111e0: 7974 652d 636f 6d70 696c 652d 6c69 7374 yte-compile-list │ │ │ +000111f0: 2062 7974 652d 6f70 636f 6465 2062 7974 byte-opcode byt │ │ │ +00011200: 652d 6c69 7374 2062 7974 652d 6f70 636f e-list byte-opco │ │ │ +00011210: 6465 2d69 6e76 6572 7420 636f 6e63 6174 de-invert concat │ │ │ +00011220: 2062 7974 652d 636f 6d70 696c 652d 636f byte-compile-co │ │ │ +00011230: 6e63 6174 2062 7974 652d 636f 6e63 6174 ncat byte-concat │ │ │ +00011240: 2066 7365 7420 6279 7465 2d63 6f6d 7069 fset byte-compi │ │ │ +00011250: 6c65 2d66 7365 7420 6279 7465 2d66 7365 le-fset byte-fse │ │ │ +00011260: 7420 696e 7365 7274 2062 7974 652d 636f t insert byte-co │ │ │ +00011270: 6d70 696c 652d 696e 7365 7274 2062 7974 mpile-insert byt │ │ │ +00011280: 652d 696e 7365 7274 2066 756e 6374 696f e-insert functio │ │ │ +00011290: 6e20 6279 7465 2d63 6f6d 7069 6c65 2d66 n byte-compile-f │ │ │ +000112a0: 756e 6374 696f 6e2d 666f 726d 206d 6178 unction-form max │ │ │ +000112b0: 2062 7974 652d 636f 6d70 696c 652d 6d61 byte-compile-ma │ │ │ +000112c0: 7820 6279 7465 2d6d 6178 206d 696e 2062 x byte-max min b │ │ │ +000112d0: 7974 652d 636f 6d70 696c 652d 6d69 6e20 yte-compile-min │ │ │ +000112e0: 6279 7465 2d6d 696e 202b 2062 7974 652d byte-min + byte- │ │ │ +000112f0: 636f 6d70 696c 652d 706c 7573 2062 7974 compile-plus byt │ │ │ +00011300: 652d 706c 7573 202d 2062 7974 652d 636f e-plus - byte-co │ │ │ +00011310: 6d70 696c 652d 6d69 6e75 7320 2a20 6279 mpile-minus * by │ │ │ +00011320: 7465 2d63 6f6d 7069 6c65 2d6d 756c 7420 te-compile-mult │ │ │ +00011330: 6279 7465 2d6d 756c 7420 2f20 6279 7465 byte-mult / byte │ │ │ +00011340: 2d63 6f6d 7069 6c65 2d71 756f 2062 7974 -compile-quo byt │ │ │ +00011350: 652d 7175 6f20 6e63 6f6e 6320 6279 7465 e-quo nconc byte │ │ │ +00011360: 2d63 6f6d 7069 6c65 2d6e 636f 6e63 2062 -compile-nconc b │ │ │ +00011370: 7974 652d 6e63 6f6e 6320 6265 6769 6e6e yte-nconc beginn │ │ │ +00011380: 696e 672d 6f66 2d6c 696e 6520 6279 7465 ing-of-line byte │ │ │ +00011390: 2d63 6f6d 7069 6c65 2d62 6567 696e 6e69 -compile-beginni │ │ │ +000113a0: 6e67 2d6f 662d 6c69 6e65 203d 2062 7974 ng-of-line = byt │ │ │ +000113b0: 652d 636f 6d70 696c 652d 6172 6974 6863 e-compile-arithc │ │ │ +000113c0: 6f6d 7061 7265 2062 7974 652d 6571 6c73 ompare byte-eqls │ │ │ +000113d0: 6967 6e20 3c20 6279 7465 2d6c 7373 203e ign < byte-lss > │ │ │ +000113e0: 2062 7974 652d 6774 7220 3c3d 2062 7974 byte-gtr <= byt │ │ │ +000113f0: 652d 6c65 7120 3e3d 2062 7974 652d 6765 e-leq >= byte-ge │ │ │ +00011400: 715d 2034 290a 2864 6566 616c 6961 7320 q] 4).(defalias │ │ │ +00011410: 2762 7974 652d 636f 6d70 696c 652d 6172 'byte-compile-ar │ │ │ +00011420: 6974 6863 6f6d 7061 7265 2023 5b28 666f ithcompare #[(fo │ │ │ +00011430: 726d 2920 2209 4147 c261 ab85 c309 c45c rm) ".AG.a.....\ │ │ │ +00011440: 2287 0941 47c5 61ab 8b08 ab84 c6c7 2187 "..AG.a.......!. │ │ │ +00011450: c809 2187 0941 47c9 61ab 84ca 0921 87c8 ..!..AG.a....!.. │ │ │ +00011460: 0921 8722 205b 6279 7465 2d63 6f6d 7069 .!." [byte-compi │ │ │ +00011470: 6c65 2d64 656c 6574 652d 6572 726f 7273 le-delete-errors │ │ │ +00011480: 2066 6f72 6d20 3020 6279 7465 2d63 6f6d form 0 byte-com │ │ │ +00011490: 7069 6c65 2d73 7562 722d 7772 6f6e 672d pile-subr-wrong- │ │ │ +000114a0: 6172 6773 2022 3120 6f72 206d 6f72 6522 args "1 or more" │ │ │ +000114b0: 2031 2062 7974 652d 636f 6d70 696c 652d 1 byte-compile- │ │ │ +000114c0: 636f 6e73 7461 6e74 2074 2062 7974 652d constant t byte- │ │ │ +000114d0: 636f 6d70 696c 652d 6e6f 726d 616c 2d63 compile-normal-c │ │ │ +000114e0: 616c 6c20 3220 6279 7465 2d63 6f6d 7069 all 2 byte-compi │ │ │ +000114f0: 6c65 2d74 776f 2d61 7267 735d 2033 5d29 le-two-args] 3]) │ │ │ +00011500: 0a28 6279 7465 2d63 6f64 6520 22c0 c1c2 .(byte-code "... │ │ │ +00011510: c323 88c0 c1c4 c523 88c0 c5c6 c123 8722 .#.....#.....#." │ │ │ +00011520: 205b 7075 7420 2f3d 2062 7974 652d 636f [put /= byte-co │ │ │ +00011530: 6d70 696c 6520 6279 7465 2d63 6f6d 7069 mpile byte-compi │ │ │ +00011540: 6c65 2d2f 3d20 6279 7465 2d6f 7063 6f64 le-/= byte-opcod │ │ │ +00011550: 6520 6279 7465 2d2f 3d20 6279 7465 2d6f e byte-/= byte-o │ │ │ +00011560: 7063 6f64 652d 696e 7665 7274 5d20 3429 pcode-invert] 4) │ │ │ +00011570: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +00011580: 2d63 6f6d 7069 6c65 2d2f 3d20 235b 2866 -compile-/= #[(f │ │ │ +00011590: 6f72 6d29 2022 0941 47c2 61ab 85c3 09c4 orm) ".AG.a..... │ │ │ +000115a0: 5c22 8709 4147 c561 ab84 c6c7 2187 0941 \"..AG.a....!..A │ │ │ +000115b0: 47c8 61ab 91c9 ca09 4142 4419 cb09 085c G.a.....ABD....\ │ │ │ +000115c0: 2288 cc89 1029 87cd 0921 8722 205b 666f "....)...!." [fo │ │ │ +000115d0: 722d 6566 6665 6374 2066 6f72 6d20 3020 r-effect form 0 │ │ │ +000115e0: 6279 7465 2d63 6f6d 7069 6c65 2d73 7562 byte-compile-sub │ │ │ +000115f0: 722d 7772 6f6e 672d 6172 6773 2022 3120 r-wrong-args "1 │ │ │ +00011600: 6f72 206d 6f72 6522 2031 2062 7974 652d or more" 1 byte- │ │ │ +00011610: 636f 6d70 696c 652d 636f 6e73 7461 6e74 compile-constant │ │ │ +00011620: 2074 2032 206e 6f74 203d 2062 7974 652d t 2 not = byte- │ │ │ +00011630: 636f 6d70 696c 652d 666f 726d 206e 696c compile-form nil │ │ │ +00011640: 2062 7974 652d 636f 6d70 696c 652d 6e6f byte-compile-no │ │ │ +00011650: 726d 616c 2d63 616c 6c5d 2033 5d29 0a28 rmal-call] 3]).( │ │ │ +00011660: 6279 7465 2d63 6f64 6520 22c0 c1c2 c323 byte-code "....# │ │ │ +00011670: 88c0 c1c4 c523 88c0 c5c6 c123 8722 205b .....#.....#." [ │ │ │ +00011680: 7075 7420 6275 6666 6572 2d73 7562 7374 put buffer-subst │ │ │ +00011690: 7269 6e67 2062 7974 652d 636f 6d70 696c ring byte-compil │ │ │ +000116a0: 6520 6279 7465 2d63 6f6d 7069 6c65 2d62 e byte-compile-b │ │ │ +000116b0: 7566 6665 722d 7375 6273 7472 696e 6720 uffer-substring │ │ │ +000116c0: 6279 7465 2d6f 7063 6f64 6520 6279 7465 byte-opcode byte │ │ │ +000116d0: 2d62 7566 6665 722d 7375 6273 7472 696e -buffer-substrin │ │ │ +000116e0: 6720 6279 7465 2d6f 7063 6f64 652d 696e g byte-opcode-in │ │ │ +000116f0: 7665 7274 5d20 3429 0a28 6465 6661 6c69 vert] 4).(defali │ │ │ +00011700: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +00011710: 2d62 7566 6665 722d 7375 6273 7472 696e -buffer-substrin │ │ │ +00011720: 6720 235b 2866 6f72 6d29 2022 0841 47c1 g #[(form) ".AG. │ │ │ +00011730: 61ab 87c2 c308 c45c 2221 8708 4147 c561 a......\"!..AG.a │ │ │ +00011740: ab87 c2c3 08c6 5c22 2187 0841 47c7 61ab ......\"!..AG.a. │ │ │ +00011750: 84c2 0821 8708 4147 c861 ab84 c908 2187 ...!..AG.a....!. │ │ │ +00011760: ca08 cb5c 2287 2220 5b66 6f72 6d20 3020 ...\"." [form 0 │ │ │ +00011770: 6279 7465 2d63 6f6d 7069 6c65 2d74 776f byte-compile-two │ │ │ +00011780: 2d61 7267 7320 6170 7065 6e64 2028 6e69 -args append (ni │ │ │ +00011790: 6c20 6e69 6c29 2031 2028 6e69 6c29 2032 l nil) 1 (nil) 2 │ │ │ +000117a0: 2033 2062 7974 652d 636f 6d70 696c 652d 3 byte-compile- │ │ │ +000117b0: 6e6f 726d 616c 2d63 616c 6c20 6279 7465 normal-call byte │ │ │ +000117c0: 2d63 6f6d 7069 6c65 2d73 7562 722d 7772 -compile-subr-wr │ │ │ +000117d0: 6f6e 672d 6172 6773 2022 302d 3322 5d20 ong-args "0-3"] │ │ │ +000117e0: 345d 290a 2864 6566 616c 6961 7320 2762 4]).(defalias 'b │ │ │ +000117f0: 7974 652d 636f 6d70 696c 652d 6c69 7374 yte-compile-list │ │ │ +00011800: 2023 5b28 666f 726d 2920 2208 4189 1947 #[(form) ".A..G │ │ │ +00011810: 891a c355 ab85 c4c5 21aa a65c 6ec6 57ab ...U....!..\n.W. │ │ │ +00011820: 8ec7 c809 5c22 88c9 ca5c 6e53 48c3 5c22 ....\"...\nSH.\" │ │ │ +00011830: aa93 5c6e cb57 ab8b c7c8 095c 2288 c9cc ..\n.W.....\"... │ │ │ +00011840: 5c6e 5c22 aa83 cd08 212a 8722 205b 666f \n\"....!*." [fo │ │ │ +00011850: 726d 2061 7267 7320 6e61 7267 7320 3020 rm args nargs 0 │ │ │ +00011860: 6279 7465 2d63 6f6d 7069 6c65 2d63 6f6e byte-compile-con │ │ │ +00011870: 7374 616e 7420 6e69 6c20 3520 6d61 7063 stant nil 5 mapc │ │ │ +00011880: 6172 2062 7974 652d 636f 6d70 696c 652d ar byte-compile- │ │ │ +00011890: 666f 726d 2062 7974 652d 636f 6d70 696c form byte-compil │ │ │ +000118a0: 652d 6f75 7420 5b62 7974 652d 6c69 7374 e-out [byte-list │ │ │ +000118b0: 3120 6279 7465 2d6c 6973 7432 2062 7974 1 byte-list2 byt │ │ │ +000118c0: 652d 6c69 7374 3320 6279 7465 2d6c 6973 e-list3 byte-lis │ │ │ +000118d0: 7434 5d20 3235 3620 6279 7465 2d6c 6973 t4] 256 byte-lis │ │ │ +000118e0: 744e 2062 7974 652d 636f 6d70 696c 652d tN byte-compile- │ │ │ +000118f0: 6e6f 726d 616c 2d63 616c 6c5d 2034 5d29 normal-call] 4]) │ │ │ +00011900: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +00011910: 2d63 6f6d 7069 6c65 2d63 6f6e 6361 7420 -compile-concat │ │ │ +00011920: 235b 2866 6f72 6d29 2022 0841 8919 4789 #[(form) ".A..G. │ │ │ +00011930: 1ac3 73ab 8fc4 c509 5c22 88c6 c75c 6ec8 ..s.....\"...\n. │ │ │ +00011940: 5a48 c95c 22aa 9d5c 6ec9 61ab 85c5 ca21 ZH.\"..\n.a....! │ │ │ +00011950: aa93 5c6e cb57 ab8b c4c5 095c 2288 c6cc ..\n.W.....\"... │ │ │ +00011960: 5c6e 5c22 aa83 cd08 212a 8722 205b 666f \n\"....!*." [fo │ │ │ +00011970: 726d 2061 7267 7320 6e61 7267 7320 2832 rm args nargs (2 │ │ │ +00011980: 2033 2034 2920 6d61 7063 6172 2062 7974 3 4) mapcar byt │ │ │ +00011990: 652d 636f 6d70 696c 652d 666f 726d 2062 e-compile-form b │ │ │ +000119a0: 7974 652d 636f 6d70 696c 652d 6f75 7420 yte-compile-out │ │ │ +000119b0: 5b62 7974 652d 636f 6e63 6174 3220 6279 [byte-concat2 by │ │ │ +000119c0: 7465 2d63 6f6e 6361 7433 2062 7974 652d te-concat3 byte- │ │ │ +000119d0: 636f 6e63 6174 345d 2032 2030 2022 2220 concat4] 2 0 "" │ │ │ +000119e0: 3235 3620 6279 7465 2d63 6f6e 6361 744e 256 byte-concatN │ │ │ +000119f0: 2062 7974 652d 636f 6d70 696c 652d 6e6f byte-compile-no │ │ │ +00011a00: 726d 616c 2d63 616c 6c5d 2035 5d29 0a28 rmal-call] 5]).( │ │ │ +00011a10: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ +00011a20: 6f6d 7069 6c65 2d70 6c75 7320 235b 2866 ompile-plus #[(f │ │ │ +00011a30: 6f72 6d29 2022 0941 891b 47c5 61ab 85c6 orm) ".A..G.a... │ │ │ +00011a40: c521 aada 0b47 c761 ab88 c8c9 09ca 5c22 .!...G.a......\" │ │ │ +00011a50: 21aa cccb 0b40 2188 0b41 cc1c 891a abbd !....@!..A...... │ │ │ +00011a60: 5c6e 4089 14c5 61ab 8e08 acac c6c5 2188 \n@...a.......!. │ │ │ +00011a70: cdce c55c 2288 aaa1 0cc7 61ab 87cd cfc5 ...\".....a..... │ │ │ +00011a80: 5c22 88aa 950c d061 ab87 cdd1 c55c 2288 \".....a.....\". │ │ │ +00011a90: aa89 cb0c 2188 cdce c55c 2288 5c6e 4189 ....!....\".\nA. │ │ │ +00011aa0: 12ac 432a cc29 8722 205b 6279 7465 2d63 ..C*.)." [byte-c │ │ │ +00011ab0: 6f6d 7069 6c65 2d64 656c 6574 652d 6572 ompile-delete-er │ │ │ +00011ac0: 726f 7273 2066 6f72 6d20 2331 3d23 3a2d rors form #1=#:- │ │ │ +00011ad0: 2d64 6f6c 6973 742d 7465 6d70 2d2d 3331 -dolist-temp--31 │ │ │ +00011ae0: 3233 3620 6172 6773 2065 6c74 2030 2062 236 args elt 0 b │ │ │ +00011af0: 7974 652d 636f 6d70 696c 652d 636f 6e73 yte-compile-cons │ │ │ +00011b00: 7461 6e74 2031 2062 7974 652d 636f 6d70 tant 1 byte-comp │ │ │ +00011b10: 696c 652d 706c 7573 2061 7070 656e 6420 ile-plus append │ │ │ +00011b20: 2830 2920 6279 7465 2d63 6f6d 7069 6c65 (0) byte-compile │ │ │ +00011b30: 2d66 6f72 6d20 6e69 6c20 6279 7465 2d63 -form nil byte-c │ │ │ +00011b40: 6f6d 7069 6c65 2d6f 7574 2062 7974 652d ompile-out byte- │ │ │ +00011b50: 706c 7573 2062 7974 652d 6164 6431 202d plus byte-add1 - │ │ │ +00011b60: 3120 6279 7465 2d73 7562 315d 2035 5d29 1 byte-sub1] 5]) │ │ │ +00011b70: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +00011b80: 2d63 6f6d 7069 6c65 2d6d 696e 7573 2023 -compile-minus # │ │ │ +00011b90: 5b28 666f 726d 2920 2209 4189 1c47 c561 [(form) ".A..G.a │ │ │ +00011ba0: ab86 c609 c75c 22aa dd0c 47c8 61ab 8bc9 .....\"...G.a... │ │ │ +00011bb0: 0c40 2188 cacb c55c 22aa ccc9 0c40 2188 .@!....\"....@!. │ │ │ +00011bc0: 0c41 cc1b 891a abbd 5c6e 4089 13c5 61ab .A......\n@...a. │ │ │ +00011bd0: 8e08 acac cdc5 2188 cace c55c 2288 aaa1 ......!....\"... │ │ │ +00011be0: 0bc8 61ab 87ca cfc5 5c22 88aa 950b d061 ..a.....\".....a │ │ │ +00011bf0: ab87 cad1 c55c 2288 aa89 c90b 2188 cace .....\".....!... │ │ │ +00011c00: c55c 2288 5c6e 4189 12ac 432a cc29 8722 .\".\nA...C*.)." │ │ │ +00011c10: 205b 6279 7465 2d63 6f6d 7069 6c65 2d64 [byte-compile-d │ │ │ +00011c20: 656c 6574 652d 6572 726f 7273 2066 6f72 elete-errors for │ │ │ +00011c30: 6d20 2331 3d23 3a2d 2d64 6f6c 6973 742d m #1=#:--dolist- │ │ │ +00011c40: 7465 6d70 2d2d 3331 3233 3820 656c 7420 temp--31238 elt │ │ │ +00011c50: 6172 6773 2030 2062 7974 652d 636f 6d70 args 0 byte-comp │ │ │ +00011c60: 696c 652d 7375 6272 2d77 726f 6e67 2d61 ile-subr-wrong-a │ │ │ +00011c70: 7267 7320 2231 206f 7220 6d6f 7265 2220 rgs "1 or more" │ │ │ +00011c80: 3120 6279 7465 2d63 6f6d 7069 6c65 2d66 1 byte-compile-f │ │ │ +00011c90: 6f72 6d20 6279 7465 2d63 6f6d 7069 6c65 orm byte-compile │ │ │ +00011ca0: 2d6f 7574 2062 7974 652d 6e65 6761 7465 -out byte-negate │ │ │ +00011cb0: 206e 696c 2062 7974 652d 636f 6d70 696c nil byte-compil │ │ │ +00011cc0: 652d 636f 6e73 7461 6e74 2062 7974 652d e-constant byte- │ │ │ +00011cd0: 6469 6666 2062 7974 652d 7375 6231 202d diff byte-sub1 - │ │ │ +00011ce0: 3120 6279 7465 2d61 6464 315d 2035 5d29 1 byte-add1] 5]) │ │ │ +00011cf0: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +00011d00: 2d63 6f6d 7069 6c65 2d6d 756c 7420 235b -compile-mult #[ │ │ │ +00011d10: 2866 6f72 6d29 2022 0941 891b 47c5 61ab (form) ".A..G.a. │ │ │ +00011d20: 85c6 c721 aadf 0b47 c761 ab88 c8c9 09ca ...!...G.a...... │ │ │ +00011d30: 5c22 21aa d1cb 0b40 2188 0b41 cc1c 891a \"!....@!..A.... │ │ │ +00011d40: abc2 5c6e 4089 14c7 61ab 8e08 acb1 c6c7 ..\n@...a....... │ │ │ +00011d50: 2188 cdce c55c 2288 aaa6 0ccf 61ab 87cd !....\".....a... │ │ │ +00011d60: d0c5 5c22 88aa 9a0c d161 ab8c cdd2 c55c ..\".....a.....\ │ │ │ +00011d70: 2288 cdd3 c55c 2288 aa89 cb0c 2188 cdce "....\".....!... │ │ │ +00011d80: c55c 2288 5c6e 4189 12ac 3e2a cc29 8722 .\".\nA...>*.)." │ │ │ +00011d90: 205b 6279 7465 2d63 6f6d 7069 6c65 2d64 [byte-compile-d │ │ │ +00011da0: 656c 6574 652d 6572 726f 7273 2066 6f72 elete-errors for │ │ │ +00011db0: 6d20 2331 3d23 3a2d 2d64 6f6c 6973 742d m #1=#:--dolist- │ │ │ +00011dc0: 7465 6d70 2d2d 3331 3234 3020 6172 6773 temp--31240 args │ │ │ +00011dd0: 2065 6c74 2030 2062 7974 652d 636f 6d70 elt 0 byte-comp │ │ │ +00011de0: 696c 652d 636f 6e73 7461 6e74 2031 2062 ile-constant 1 b │ │ │ +00011df0: 7974 652d 636f 6d70 696c 652d 6d75 6c74 yte-compile-mult │ │ │ +00011e00: 2061 7070 656e 6420 2831 2920 6279 7465 append (1) byte │ │ │ +00011e10: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6e69 -compile-form ni │ │ │ +00011e20: 6c20 6279 7465 2d63 6f6d 7069 6c65 2d6f l byte-compile-o │ │ │ +00011e30: 7574 2062 7974 652d 6d75 6c74 202d 3120 ut byte-mult -1 │ │ │ +00011e40: 6279 7465 2d6e 6567 6174 6520 3220 6279 byte-negate 2 by │ │ │ +00011e50: 7465 2d64 7570 2062 7974 652d 706c 7573 te-dup byte-plus │ │ │ +00011e60: 5d20 355d 290a 2864 6566 616c 6961 7320 ] 5]).(defalias │ │ │ +00011e70: 2762 7974 652d 636f 6d70 696c 652d 7175 'byte-compile-qu │ │ │ +00011e80: 6f20 235b 2866 6f72 6d29 2022 0941 891b o #[(form) ".A.. │ │ │ +00011e90: 47c5 61ab 86c6 09c7 5c22 aae3 0b47 c861 G.a.....\"...G.a │ │ │ +00011ea0: ab8f c9c8 2188 ca0b 4021 88cb ccc5 5c22 ....!...@!....\" │ │ │ +00011eb0: aace ca0b 4021 880b 41cd 1c89 1aab bf5c ....@!..A......\ │ │ │ +00011ec0: 6e40 8914 c861 ab8e 08ac aec9 c821 88cb n@...a.......!.. │ │ │ +00011ed0: ccc5 5c22 88aa a30c ce61 ab87 cbcf c55c ..\".....a.....\ │ │ │ +00011ee0: 2288 aa97 0ca7 ab8a 0cc5 55ab 85d0 d109 ".........U..... │ │ │ +00011ef0: 5c22 88ca 0c21 88cb ccc5 5c22 885c 6e41 \"...!....\".\nA │ │ │ +00011f00: 8912 ac41 2acd 2987 2220 5b62 7974 652d ...A*.)." [byte- │ │ │ +00011f10: 636f 6d70 696c 652d 6465 6c65 7465 2d65 compile-delete-e │ │ │ +00011f20: 7272 6f72 7320 666f 726d 2023 313d 233a rrors form #1=#: │ │ │ +00011f30: 2d2d 646f 6c69 7374 2d74 656d 702d 2d33 --dolist-temp--3 │ │ │ +00011f40: 3132 3432 2061 7267 7320 656c 7420 3020 1242 args elt 0 │ │ │ +00011f50: 6279 7465 2d63 6f6d 7069 6c65 2d73 7562 byte-compile-sub │ │ │ +00011f60: 722d 7772 6f6e 672d 6172 6773 2022 3120 r-wrong-args "1 │ │ │ +00011f70: 6f72 206d 6f72 6522 2031 2062 7974 652d or more" 1 byte- │ │ │ +00011f80: 636f 6d70 696c 652d 636f 6e73 7461 6e74 compile-constant │ │ │ +00011f90: 2062 7974 652d 636f 6d70 696c 652d 666f byte-compile-fo │ │ │ +00011fa0: 726d 2062 7974 652d 636f 6d70 696c 652d rm byte-compile- │ │ │ +00011fb0: 6f75 7420 6279 7465 2d71 756f 206e 696c out byte-quo nil │ │ │ +00011fc0: 202d 3120 6279 7465 2d6e 6567 6174 6520 -1 byte-negate │ │ │ +00011fd0: 6279 7465 2d63 6f6d 7069 6c65 2d77 6172 byte-compile-war │ │ │ +00011fe0: 6e20 2241 7474 656d 7074 2074 6f20 6469 n "Attempt to di │ │ │ +00011ff0: 7669 6465 2062 7920 7a65 726f 3a20 2573 vide by zero: %s │ │ │ +00012000: 225d 2035 5d29 0a28 6465 6661 6c69 6173 "] 5]).(defalias │ │ │ +00012010: 2027 6279 7465 2d63 6f6d 7069 6c65 2d6e 'byte-compile-n │ │ │ +00012020: 636f 6e63 2023 5b28 666f 726d 2920 2208 conc #[(form) ". │ │ │ +00012030: 4189 1b47 c461 ab85 c5c6 21aa ad0b 47c7 A..G.a....!...G. │ │ │ +00012040: 61ab 86c8 0b40 21aa a1c8 0b40 2188 0b41 a....@!....@!..A │ │ │ +00012050: c619 891a ab92 5c6e 4011 c809 2188 c9ca ......\n@...!... │ │ │ +00012060: c45c 2288 5c6e 4189 12ac 6e2a c629 8722 .\".\nA...n*.)." │ │ │ +00012070: 205b 666f 726d 2065 6c74 2023 313d 233a [form elt #1=#: │ │ │ +00012080: 2d2d 646f 6c69 7374 2d74 656d 702d 2d33 --dolist-temp--3 │ │ │ +00012090: 3132 3434 2061 7267 7320 3020 6279 7465 1244 args 0 byte │ │ │ +000120a0: 2d63 6f6d 7069 6c65 2d63 6f6e 7374 616e -compile-constan │ │ │ +000120b0: 7420 6e69 6c20 3120 6279 7465 2d63 6f6d t nil 1 byte-com │ │ │ +000120c0: 7069 6c65 2d66 6f72 6d20 6279 7465 2d63 pile-form byte-c │ │ │ +000120d0: 6f6d 7069 6c65 2d6f 7574 2062 7974 652d ompile-out byte- │ │ │ +000120e0: 6e63 6f6e 635d 2035 5d29 0a28 6465 6661 nconc] 5]).(defa │ │ │ +000120f0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +00012100: 6c65 2d66 7365 7420 235b 2866 6f72 6d29 le-fset #[(form) │ │ │ +00012110: 2022 c308 38c4 1a89 19a2 c561 abb9 0941 "..8......a...A │ │ │ +00012120: 4089 11a2 c661 abaf 0841 40a3 a2c7 61ac @....a...A@...a. │ │ │ +00012130: a609 4141 8912 403b ab83 5c6e 4112 5c6e ..AA..@;..\nA.\n │ │ │ +00012140: 40a2 c861 ab83 5c6e 4112 5c6e 403a ab8b @..a..\nA.\n@:.. │ │ │ +00012150: 5c6e 4040 c961 ac84 cacb 2188 2acc 0821 \n@@.a....!.*..! │ │ │ +00012160: 8722 205b 666f 726d 2066 6e20 626f 6479 ." [form fn body │ │ │ +00012170: 2032 206e 696c 2071 756f 7465 206c 616d 2 nil quote lam │ │ │ +00012180: 6264 6120 6d61 6b65 2d62 7974 652d 636f bda make-byte-co │ │ │ +00012190: 6465 2069 6e74 6572 6163 7469 7665 2062 de interactive b │ │ │ +000121a0: 7974 652d 636f 6465 2062 7974 652d 636f yte-code byte-co │ │ │ +000121b0: 6d70 696c 652d 7761 726e 2022 4120 7175 mpile-warn "A qu │ │ │ +000121c0: 6f74 6564 206c 616d 6264 6120 666f 726d oted lambda form │ │ │ +000121d0: 2069 7320 7468 6520 7365 636f 6e64 2061 is the second a │ │ │ +000121e0: 7267 756d 656e 7420 6f66 2066 7365 742e rgument of fset. │ │ │ +000121f0: 2020 5468 6973 2069 7320 7072 6f62 6162 This is probab │ │ │ +00012200: 6c79 5c6e 2020 2020 206e 6f74 2077 6861 ly\n not wha │ │ │ +00012210: 7420 796f 7520 7761 6e74 2c20 6173 2074 t you want, as t │ │ │ +00012220: 6861 7420 6c61 6d62 6461 2063 616e 6e6f hat lambda canno │ │ │ +00012230: 7420 6265 2063 6f6d 7069 6c65 642e 2020 t be compiled. │ │ │ +00012240: 436f 6e73 6964 6572 2075 7369 6e67 5c6e Consider using\n │ │ │ +00012250: 2020 2020 2074 6865 2073 796e 7461 7820 the syntax │ │ │ +00012260: 2866 756e 6374 696f 6e20 286c 616d 6264 (function (lambd │ │ │ +00012270: 6120 282e 2e2e 2920 2e2e 2e29 2920 696e a (...) ...)) in │ │ │ +00012280: 7374 6561 642e 2220 6279 7465 2d63 6f6d stead." byte-com │ │ │ +00012290: 7069 6c65 2d74 776f 2d61 7267 735d 2033 pile-two-args] 3 │ │ │ +000122a0: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +000122b0: 7465 2d63 6f6d 7069 6c65 2d66 756e 6172 te-compile-funar │ │ │ +000122c0: 6720 235b 2866 6f72 6d29 2022 c209 4140 g #[(form) "..A@ │ │ │ +000122d0: 8918 a2c3 61ab 9508 4140 a2c4 61ab 8d09 ....a...A@..a... │ │ │ +000122e0: 40c5 0841 4209 4141 4242 aa81 0929 2187 @..AB.AABB...)!. │ │ │ +000122f0: 2220 5b66 6e20 666f 726d 2062 7974 652d " [fn form byte- │ │ │ +00012300: 636f 6d70 696c 652d 6e6f 726d 616c 2d63 compile-normal-c │ │ │ +00012310: 616c 6c20 7175 6f74 6520 6c61 6d62 6461 all quote lambda │ │ │ +00012320: 2066 756e 6374 696f 6e5d 2035 5d29 0a28 function] 5]).( │ │ │ +00012330: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ +00012340: 6f6d 7069 6c65 2d66 756e 6374 696f 6e2d ompile-function- │ │ │ +00012350: 666f 726d 2023 5b28 666f 726d 2920 22c1 form #[(form) ". │ │ │ +00012360: 0841 4039 ab85 0841 40aa 85c2 0841 4021 .A@9...A@....A@! │ │ │ +00012370: 2187 2220 5b66 6f72 6d20 6279 7465 2d63 !." [form byte-c │ │ │ +00012380: 6f6d 7069 6c65 2d63 6f6e 7374 616e 7420 ompile-constant │ │ │ +00012390: 6279 7465 2d63 6f6d 7069 6c65 2d6c 616d byte-compile-lam │ │ │ +000123a0: 6264 615d 2033 5d29 0a28 6465 6661 6c69 bda] 3]).(defali │ │ │ +000123b0: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +000123c0: 2d69 6e73 6572 7420 235b 2866 6f72 6d29 -insert #[(form) │ │ │ +000123d0: 2022 0841 ac84 c1c2 2187 0847 c358 ab97 ".A....!..G.X.. │ │ │ +000123e0: c4c5 0841 5c22 8808 4141 ab87 c6c7 0841 ...A\"..AA.....A │ │ │ +000123f0: 475c 2287 c6c8 c95c 2287 cac4 cb08 4141 G\"....\".....AA │ │ │ +00012400: 5c22 73ab 84cc 0821 8708 4189 10ad 93c5 \"s....!..A..... │ │ │ +00012410: 0840 2188 c6c8 c95c 2288 0841 ab6c cd20 .@!....\"..A.l. │ │ │ +00012420: 88aa 6787 2220 5b66 6f72 6d20 6279 7465 ..g." [form byte │ │ │ +00012430: 2d63 6f6d 7069 6c65 2d63 6f6e 7374 616e -compile-constan │ │ │ +00012440: 7420 6e69 6c20 3235 3620 6d61 7063 6172 t nil 256 mapcar │ │ │ +00012450: 2062 7974 652d 636f 6d70 696c 652d 666f byte-compile-fo │ │ │ +00012460: 726d 2062 7974 652d 636f 6d70 696c 652d rm byte-compile- │ │ │ +00012470: 6f75 7420 6279 7465 2d69 6e73 6572 744e out byte-insertN │ │ │ +00012480: 2062 7974 652d 696e 7365 7274 2030 2074 byte-insert 0 t │ │ │ +00012490: 2063 6f6e 7370 2062 7974 652d 636f 6d70 consp byte-comp │ │ │ +000124a0: 696c 652d 6e6f 726d 616c 2d63 616c 6c20 ile-normal-call │ │ │ +000124b0: 6279 7465 2d63 6f6d 7069 6c65 2d64 6973 byte-compile-dis │ │ │ +000124c0: 6361 7264 5d20 345d 290a 2864 6566 616c card] 4]).(defal │ │ │ +000124d0: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +000124e0: 652d 6265 6769 6e6e 696e 672d 6f66 2d6c e-beginning-of-l │ │ │ +000124f0: 696e 6520 235b 2866 6f72 6d29 2022 0947 ine #[(form) ".G │ │ │ +00012500: 8918 c256 ab86 c309 c45c 22aa d308 c255 ...V.....\"....U │ │ │ +00012510: aca5 0941 403a ab88 0941 4040 c561 aa95 ...A@:...A@@.a.. │ │ │ +00012520: 0941 4039 ab8e c609 4140 21ac 8f09 4140 .A@9....A@!...A@ │ │ │ +00012530: c773 aa81 c8ac 85c9 0921 aaa4 cacb cc09 .s.......!...... │ │ │ +00012540: 4140 21ae 81cd 8911 a8ab 8409 53aa 8ace A@!.........S... │ │ │ +00012550: cf09 5c22 88d0 c509 4444 44c8 5c22 88d1 ..\"....DDD.\".. │ │ │ +00012560: d221 2987 2220 5b6c 656e 2066 6f72 6d20 .!)." [len form │ │ │ +00012570: 3320 6279 7465 2d63 6f6d 7069 6c65 2d73 3 byte-compile-s │ │ │ +00012580: 7562 722d 7772 6f6e 672d 6172 6773 2022 ubr-wrong-args " │ │ │ +00012590: 302d 3222 2071 756f 7465 206b 6579 776f 0-2" quote keywo │ │ │ +000125a0: 7264 7020 286e 696c 2074 2920 7420 6279 rdp (nil t) t by │ │ │ +000125b0: 7465 2d63 6f6d 7069 6c65 2d6e 6f72 6d61 te-compile-norma │ │ │ +000125c0: 6c2d 6361 6c6c 2062 7974 652d 636f 6d70 l-call byte-comp │ │ │ +000125d0: 696c 652d 666f 726d 2066 6f72 7761 7264 ile-form forward │ │ │ +000125e0: 2d6c 696e 6520 6576 616c 2031 2062 7974 -line eval 1 byt │ │ │ +000125f0: 652d 636f 6d70 696c 652d 7761 726e 2022 e-compile-warn " │ │ │ +00012600: 4e6f 6e2d 6e75 6d65 7269 6320 6172 6720 Non-numeric arg │ │ │ +00012610: 746f 2062 6567 696e 6e69 6e67 2d6f 662d to beginning-of- │ │ │ +00012620: 6c69 6e65 3a20 2573 2220 312d 2062 7974 line: %s" 1- byt │ │ │ +00012630: 652d 636f 6d70 696c 652d 636f 6e73 7461 e-compile-consta │ │ │ +00012640: 6e74 206e 696c 5d20 365d 290a 2862 7974 nt nil] 6]).(byt │ │ │ +00012650: 652d 636f 6465 2022 c0c1 c2c3 2388 c0c1 e-code "....#... │ │ │ +00012660: c4c5 2388 c0c5 c6c1 2388 c0c7 c2c8 2388 ..#.....#.....#. │ │ │ +00012670: c0c9 c2ca 2388 c0cb c2cc 2388 c0cd c2ce ....#.....#..... │ │ │ +00012680: 2388 c0cf c2d0 2387 2220 5b70 7574 2073 #.....#." [put s │ │ │ +00012690: 6574 2062 7974 652d 636f 6d70 696c 6520 et byte-compile │ │ │ +000126a0: 6279 7465 2d63 6f6d 7069 6c65 2d73 6574 byte-compile-set │ │ │ +000126b0: 2062 7974 652d 6f70 636f 6465 2062 7974 byte-opcode byt │ │ │ +000126c0: 652d 7365 7420 6279 7465 2d6f 7063 6f64 e-set byte-opcod │ │ │ +000126d0: 652d 696e 7665 7274 2073 6574 7120 6279 e-invert setq by │ │ │ +000126e0: 7465 2d63 6f6d 7069 6c65 2d73 6574 7120 te-compile-setq │ │ │ +000126f0: 7365 742d 6465 6661 756c 7420 6279 7465 set-default byte │ │ │ +00012700: 2d63 6f6d 7069 6c65 2d73 6574 2d64 6566 -compile-set-def │ │ │ +00012710: 6175 6c74 2073 6574 712d 6465 6661 756c ault setq-defaul │ │ │ +00012720: 7420 6279 7465 2d63 6f6d 7069 6c65 2d73 t byte-compile-s │ │ │ +00012730: 6574 712d 6465 6661 756c 7420 7175 6f74 etq-default quot │ │ │ +00012740: 6520 6279 7465 2d63 6f6d 7069 6c65 2d71 e byte-compile-q │ │ │ +00012750: 756f 7465 2071 756f 7465 2d66 6f72 6d20 uote quote-form │ │ │ +00012760: 6279 7465 2d63 6f6d 7069 6c65 2d71 756f byte-compile-quo │ │ │ +00012770: 7465 2d66 6f72 6d5d 2034 290a 2864 6566 te-form] 4).(def │ │ │ +00012780: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ +00012790: 696c 652d 7365 7471 2023 5b28 666f 726d ile-setq #[(form │ │ │ +000127a0: 2920 2208 41c5 8919 1b89 1cac 87c6 c55c ) ".A..........\ │ │ │ +000127b0: 6e5c 2288 aaca 0cab c70c 8941 1440 130c n\"........A.@.. │ │ │ +000127c0: ac8b c6c7 c80b 4444 5c6e 5c22 88aa 690c ......DD\n\"..i. │ │ │ +000127d0: 8941 1440 11c9 0b21 ab92 c6c7 c80b 4409 .A.@...!......D. │ │ │ +000127e0: 450c ab83 caaa 815c 6e5c 2288 aa4c c609 E......\n\"..L.. │ │ │ +000127f0: 2188 0cac 885c 6eac 85cb cccd 5c22 88ce !....\n.....\".. │ │ │ +00012800: cf0b 5c22 88aa 362b c589 1287 2220 5b66 ..\"..6+...." [f │ │ │ +00012810: 6f72 6d20 7661 6c20 666f 722d 6566 6665 orm val for-effe │ │ │ +00012820: 6374 2076 6172 2061 7267 7320 6e69 6c20 ct var args nil │ │ │ +00012830: 6279 7465 2d63 6f6d 7069 6c65 2d66 6f72 byte-compile-for │ │ │ +00012840: 6d20 7365 7420 7175 6f74 6520 6b65 7977 m set quote keyw │ │ │ +00012850: 6f72 6470 2074 2062 7974 652d 636f 6d70 ordp t byte-comp │ │ │ +00012860: 696c 652d 6f75 7420 6279 7465 2d64 7570 ile-out byte-dup │ │ │ +00012870: 2030 2062 7974 652d 636f 6d70 696c 652d 0 byte-compile- │ │ │ +00012880: 7661 7269 6162 6c65 2d72 6566 2062 7974 variable-ref byt │ │ │ +00012890: 652d 7661 7273 6574 5d20 355d 290a 2864 e-varset] 5]).(d │ │ │ +000128a0: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ +000128b0: 6d70 696c 652d 7365 7420 235b 2866 6f72 mpile-set #[(for │ │ │ +000128c0: 6d29 2022 5c6e 4140 c45c 6e38 c51b 1819 m) "\nA@.\n8.... │ │ │ +000128d0: 5c6e 47c6 55ab a7c7 0921 c455 aba0 0940 \nG.U....!.U...@ │ │ │ +000128e0: c861 ab9a 0941 4089 1339 ab92 c90b 21ac .a...A@..9....!. │ │ │ +000128f0: 8d0b ca73 ac88 cbcc 0b08 4521 aa83 cd5c ...s......E!...\ │ │ │ +00012900: 6e21 2b87 2220 5b76 616c 666f 726d 2073 n!+." [valform s │ │ │ +00012910: 796d 666f 726d 2066 6f72 6d20 7379 6d20 ymform form sym │ │ │ +00012920: 3220 6e69 6c20 3320 7361 6665 2d6c 656e 2 nil 3 safe-len │ │ │ +00012930: 6774 6820 7175 6f74 6520 6b65 7977 6f72 gth quote keywor │ │ │ +00012940: 6470 2028 6e69 6c20 7429 2062 7974 652d dp (nil t) byte- │ │ │ +00012950: 636f 6d70 696c 652d 7365 7471 2073 6574 compile-setq set │ │ │ +00012960: 7120 6279 7465 2d63 6f6d 7069 6c65 2d74 q byte-compile-t │ │ │ +00012970: 776f 2d61 7267 735d 2034 5d29 0a28 6465 wo-args] 4]).(de │ │ │ +00012980: 6661 6c69 6173 2027 6279 7465 2d63 6f6d falias 'byte-com │ │ │ +00012990: 7069 6c65 2d73 6574 712d 6465 6661 756c pile-setq-defaul │ │ │ +000129a0: 7420 235b 2866 6f72 6d29 2022 0841 891a t #[(form) ".A.. │ │ │ +000129b0: ac87 c3c4 095c 2288 aaa2 5c6e ab9f c3c5 .....\"...\n.... │ │ │ +000129c0: c65c 6e89 4112 4044 5c6e ad86 5c6e 8941 .\n.A.@D\n..\n.A │ │ │ +000129d0: 1240 4342 425c 6eab 83c7 aa81 095c 2288 .@CBB\n......\". │ │ │ +000129e0: aa5e 29c4 8911 8722 205b 666f 726d 2066 .^)...." [form f │ │ │ +000129f0: 6f72 2d65 6666 6563 7420 6172 6773 2062 or-effect args b │ │ │ +00012a00: 7974 652d 636f 6d70 696c 652d 666f 726d yte-compile-form │ │ │ +00012a10: 206e 696c 2073 6574 2d64 6566 6175 6c74 nil set-default │ │ │ +00012a20: 2071 756f 7465 2074 5d20 365d 290a 2864 quote t] 6]).(d │ │ │ +00012a30: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ +00012a40: 6d70 696c 652d 7365 742d 6465 6661 756c mpile-set-defaul │ │ │ +00012a50: 7420 235b 2866 6f72 6d29 2022 0b41 8918 t #[(form) ".A.. │ │ │ +00012a60: 471e 1508 401c c60c 21c7 55ab d60c 40c8 G...@...!.U...@. │ │ │ +00012a70: 61ab d00c 4140 891d 39ac 87c9 ca0d 5c22 a...A@..9.....\" │ │ │ +00012a80: 88aa c0cb 0d21 ac85 0dcc 73ab 87c9 cd0d .....!....s..... │ │ │ +00012a90: 5c22 88aa af0d 0e16 b789 1aad 8b5c 6ece \"...........\n. │ │ │ +00012aa0: 5c6e 410e 175c 22a1 ad81 cf29 ac99 d00d \nA..\"....).... │ │ │ +00012ab0: 21ac 94d1 0e18 73ab 8e0d 0973 ac89 c9d2 !.....s....s.... │ │ │ +00012ac0: 0d5c 2288 0d09 4211 290e 15c7 55ab 85d3 .\"...B.)...U... │ │ │ +00012ad0: 0b21 aa84 d40b c75c 222b 8722 205b 6172 .!.....\"+." [ar │ │ │ +00012ae0: 6773 2062 7974 652d 636f 6d70 696c 652d gs byte-compile- │ │ │ +00012af0: 6672 6565 2d61 7373 6967 6e6d 656e 7473 free-assignments │ │ │ +00012b00: 2063 656c 6c20 666f 726d 2076 6172 2073 cell form var s │ │ │ +00012b10: 796d 2073 6166 652d 6c65 6e67 7468 2032 ym safe-length 2 │ │ │ +00012b20: 2071 756f 7465 2062 7974 652d 636f 6d70 quote byte-comp │ │ │ +00012b30: 696c 652d 7761 726e 2022 4174 7465 6d70 ile-warn "Attemp │ │ │ +00012b40: 7420 746f 2073 6574 2d67 6c6f 6261 6c6c t to set-globall │ │ │ +00012b50: 7920 6e6f 6e2d 7379 6d62 6f6c 2025 7322 y non-symbol %s" │ │ │ +00012b60: 206b 6579 776f 7264 7020 286e 696c 2074 keywordp (nil t │ │ │ +00012b70: 2920 2241 7474 656d 7074 2074 6f20 7365 ) "Attempt to se │ │ │ +00012b80: 742d 676c 6f62 616c 6c79 2063 6f6e 7374 t-globally const │ │ │ +00012b90: 616e 7420 7379 6d62 6f6c 2025 7322 206c ant symbol %s" l │ │ │ +00012ba0: 6f67 696f 7220 7420 676c 6f62 616c 6c79 ogior t globally │ │ │ +00012bb0: 2d62 6f75 6e64 7020 6672 6565 2d76 6172 -boundp free-var │ │ │ +00012bc0: 7320 2261 7373 6967 6e6d 656e 7420 746f s "assignment to │ │ │ +00012bd0: 2066 7265 6520 7661 7269 6162 6c65 2025 free variable % │ │ │ +00012be0: 7322 2062 7974 652d 636f 6d70 696c 652d s" byte-compile- │ │ │ +00012bf0: 6e6f 726d 616c 2d63 616c 6c20 6279 7465 normal-call byte │ │ │ +00012c00: 2d63 6f6d 7069 6c65 2d73 7562 722d 7772 -compile-subr-wr │ │ │ +00012c10: 6f6e 672d 6172 6773 206e 6172 6773 2062 ong-args nargs b │ │ │ +00012c20: 7974 652d 636f 6d70 696c 652d 626f 756e yte-compile-boun │ │ │ +00012c30: 642d 7661 7269 6162 6c65 7320 6279 7465 d-variables byte │ │ │ +00012c40: 2d63 6f6d 7069 6c65 2d61 7373 6967 6e65 -compile-assigne │ │ │ +00012c50: 642d 6269 7420 6279 7465 2d63 6f6d 7069 d-bit byte-compi │ │ │ +00012c60: 6c65 2d77 6172 6e69 6e67 735d 2035 5d29 le-warnings] 5]) │ │ │ +00012c70: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +00012c80: 2d63 6f6d 7069 6c65 2d71 756f 7465 2023 -compile-quote # │ │ │ +00012c90: 5b28 666f 726d 2920 22c1 0841 4021 8722 [(form) "..A@!." │ │ │ +00012ca0: 205b 666f 726d 2062 7974 652d 636f 6d70 [form byte-comp │ │ │ +00012cb0: 696c 652d 636f 6e73 7461 6e74 5d20 325d ile-constant] 2] │ │ │ +00012cc0: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ +00012cd0: 652d 636f 6d70 696c 652d 7175 6f74 652d e-compile-quote- │ │ │ +00012ce0: 666f 726d 2023 5b28 666f 726d 2920 22c1 form #[(form) ". │ │ │ +00012cf0: c208 4140 2121 8722 205b 666f 726d 2062 ..A@!!." [form b │ │ │ +00012d00: 7974 652d 636f 6d70 696c 652d 636f 6e73 yte-compile-cons │ │ │ +00012d10: 7461 6e74 2062 7974 652d 636f 6d70 696c tant byte-compil │ │ │ +00012d20: 652d 746f 702d 6c65 7665 6c5d 2033 5d29 e-top-level] 3]) │ │ │ +00012d30: 0a28 6465 6661 6c69 6173 2027 6279 7465 .(defalias 'byte │ │ │ +00012d40: 2d63 6f6d 7069 6c65 2d62 6f64 7920 235b -compile-body #[ │ │ │ +00012d50: 2862 6f64 7920 266f 7074 696f 6e61 6c20 (body &optional │ │ │ +00012d60: 666f 722d 6566 6665 6374 2920 2209 41ab for-effect) ".A. │ │ │ +00012d70: 8cc2 0940 c35c 2288 0941 8911 aa71 c209 ...@.\"..A...q.. │ │ │ +00012d80: 4008 5c22 8722 205b 666f 722d 6566 6665 @.\"." [for-effe │ │ │ +00012d90: 6374 2062 6f64 7920 6279 7465 2d63 6f6d ct body byte-com │ │ │ +00012da0: 7069 6c65 2d66 6f72 6d20 745d 2034 5d29 pile-form t] 4]) │ │ │ +00012db0: 0a28 6279 7465 2d63 6f64 6520 22c0 c14e .(byte-code "..N │ │ │ +00012dc0: c273 ac85 c3c4 c05c 2288 c5c0 c1c6 2387 .s.....\".....#. │ │ │ +00012dd0: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ +00012de0: 626f 6479 2d64 6f2d 6566 6665 6374 2062 body-do-effect b │ │ │ +00012df0: 7974 652d 6f70 7469 6d69 7a65 7220 286e yte-optimizer (n │ │ │ +00012e00: 696c 2062 7974 652d 636f 6d70 696c 652d il byte-compile- │ │ │ +00012e10: 696e 6c69 6e65 2d65 7870 616e 6429 2065 inline-expand) e │ │ │ +00012e20: 7272 6f72 2022 2573 2061 6c72 6561 6479 rror "%s already │ │ │ +00012e30: 2068 6173 2061 2062 7974 652d 6f70 7469 has a byte-opti │ │ │ +00012e40: 6d69 7a65 722c 2063 616e 2774 206d 616b mizer, can't mak │ │ │ +00012e50: 6520 6974 2069 6e6c 696e 6522 2070 7574 e it inline" put │ │ │ +00012e60: 2062 7974 652d 636f 6d70 696c 652d 696e byte-compile-in │ │ │ +00012e70: 6c69 6e65 2d65 7870 616e 645d 2034 290a line-expand] 4). │ │ │ +00012e80: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +00012e90: 636f 6d70 696c 652d 626f 6479 2d64 6f2d compile-body-do- │ │ │ +00012ea0: 6566 6665 6374 2023 5b28 626f 6479 2920 effect #[(body) │ │ │ +00012eb0: 22c2 0809 5c22 88c3 8911 8722 205b 626f "...\"....." [bo │ │ │ +00012ec0: 6479 2066 6f72 2d65 6666 6563 7420 6279 dy for-effect by │ │ │ +00012ed0: 7465 2d63 6f6d 7069 6c65 2d62 6f64 7920 te-compile-body │ │ │ +00012ee0: 6e69 6c5d 2033 5d29 0a28 6279 7465 2d63 nil] 3]).(byte-c │ │ │ +00012ef0: 6f64 6520 22c0 c14e c273 ac85 c3c4 c05c ode "..N.s.....\ │ │ │ +00012f00: 2288 c5c0 c1c6 2387 2220 5b62 7974 652d ".....#." [byte- │ │ │ +00012f10: 636f 6d70 696c 652d 666f 726d 2d64 6f2d compile-form-do- │ │ │ +00012f20: 6566 6665 6374 2062 7974 652d 6f70 7469 effect byte-opti │ │ │ +00012f30: 6d69 7a65 7220 286e 696c 2062 7974 652d mizer (nil byte- │ │ │ +00012f40: 636f 6d70 696c 652d 696e 6c69 6e65 2d65 compile-inline-e │ │ │ +00012f50: 7870 616e 6429 2065 7272 6f72 2022 2573 xpand) error "%s │ │ │ +00012f60: 2061 6c72 6561 6479 2068 6173 2061 2062 already has a b │ │ │ +00012f70: 7974 652d 6f70 7469 6d69 7a65 722c 2063 yte-optimizer, c │ │ │ +00012f80: 616e 2774 206d 616b 6520 6974 2069 6e6c an't make it inl │ │ │ +00012f90: 696e 6522 2070 7574 2062 7974 652d 636f ine" put byte-co │ │ │ +00012fa0: 6d70 696c 652d 696e 6c69 6e65 2d65 7870 mpile-inline-exp │ │ │ +00012fb0: 616e 645d 2034 290a 2864 6566 616c 6961 and] 4).(defalia │ │ │ +00012fc0: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ +00012fd0: 666f 726d 2d64 6f2d 6566 6665 6374 2023 form-do-effect # │ │ │ +00012fe0: 5b28 666f 726d 2920 22c2 0809 5c22 88c3 [(form) "...\".. │ │ │ +00012ff0: 8911 8722 205b 666f 726d 2066 6f72 2d65 ..." [form for-e │ │ │ +00013000: 6666 6563 7420 6279 7465 2d63 6f6d 7069 ffect byte-compi │ │ │ +00013010: 6c65 2d66 6f72 6d20 6e69 6c5d 2033 5d29 le-form nil] 3]) │ │ │ +00013020: 0a28 6279 7465 2d63 6f64 6520 22c0 c1c2 .(byte-code "... │ │ │ +00013030: c323 88c0 c4c2 c323 88c0 c5c2 c623 88c0 .#.....#.....#.. │ │ │ +00013040: c7c2 c823 88c0 c9c2 ca23 88c0 cbc2 cc23 ...#.....#.....# │ │ │ +00013050: 88c0 cdc2 ce23 88c0 cfc2 d023 88c0 d1c2 .....#.....#.... │ │ │ +00013060: d223 88c0 d3c2 d423 88c0 d5c2 d623 88c0 .#.....#.....#.. │ │ │ +00013070: d7c2 d623 88c0 d8c2 d623 88c0 d9c2 d623 ...#.....#.....# │ │ │ +00013080: 88c0 dac2 db23 88c0 dcc2 dd23 8722 205b .....#.....#." [ │ │ │ +00013090: 7075 7420 696e 6c69 6e65 2062 7974 652d put inline byte- │ │ │ +000130a0: 636f 6d70 696c 6520 6279 7465 2d63 6f6d compile byte-com │ │ │ +000130b0: 7069 6c65 2d70 726f 676e 2070 726f 676e pile-progn progn │ │ │ +000130c0: 2070 726f 6731 2062 7974 652d 636f 6d70 prog1 byte-comp │ │ │ +000130d0: 696c 652d 7072 6f67 3120 7072 6f67 3220 ile-prog1 prog2 │ │ │ +000130e0: 6279 7465 2d63 6f6d 7069 6c65 2d70 726f byte-compile-pro │ │ │ +000130f0: 6732 2069 6620 6279 7465 2d63 6f6d 7069 g2 if byte-compi │ │ │ +00013100: 6c65 2d69 6620 636f 6e64 2062 7974 652d le-if cond byte- │ │ │ +00013110: 636f 6d70 696c 652d 636f 6e64 2061 6e64 compile-cond and │ │ │ +00013120: 2062 7974 652d 636f 6d70 696c 652d 616e byte-compile-an │ │ │ +00013130: 6420 6f72 2062 7974 652d 636f 6d70 696c d or byte-compil │ │ │ +00013140: 652d 6f72 2077 6869 6c65 2062 7974 652d e-or while byte- │ │ │ +00013150: 636f 6d70 696c 652d 7768 696c 6520 6675 compile-while fu │ │ │ +00013160: 6e63 616c 6c20 6279 7465 2d63 6f6d 7069 ncall byte-compi │ │ │ +00013170: 6c65 2d66 756e 6361 6c6c 2061 7070 6c79 le-funcall apply │ │ │ +00013180: 2062 7974 652d 636f 6d70 696c 652d 6675 byte-compile-fu │ │ │ +00013190: 6e61 7267 206d 6170 6361 7220 6d61 7061 narg mapcar mapa │ │ │ +000131a0: 746f 6d73 206d 6170 636f 6e63 6174 206c toms mapconcat l │ │ │ +000131b0: 6574 2062 7974 652d 636f 6d70 696c 652d et byte-compile- │ │ │ +000131c0: 6c65 7420 6c65 742a 2062 7974 652d 636f let let* byte-co │ │ │ +000131d0: 6d70 696c 652d 6c65 742a 5d20 3429 0a28 mpile-let*] 4).( │ │ │ +000131e0: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ +000131f0: 6f6d 7069 6c65 2d70 726f 676e 2023 5b28 ompile-progn #[( │ │ │ +00013200: 666f 726d 2920 2208 411a c35c 6e09 5c22 form) ".A..\n.\" │ │ │ +00013210: 88c4 8911 2987 2220 5b66 6f72 6d20 666f ....)." [form fo │ │ │ +00013220: 722d 6566 6665 6374 2062 6f64 7920 6279 r-effect body by │ │ │ +00013230: 7465 2d63 6f6d 7069 6c65 2d62 6f64 7920 te-compile-body │ │ │ +00013240: 6e69 6c5d 2033 5d29 0a28 6465 6661 6c69 nil] 3]).(defali │ │ │ +00013250: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +00013260: 2d70 726f 6731 2023 5b28 666f 726d 2920 -prog1 #[(form) │ │ │ +00013270: 2209 4189 1189 4111 4019 c209 085c 2288 ".A...A.@....\". │ │ │ +00013280: c310 29c4 09c5 5c22 8722 205b 666f 722d ..)...\"." [for- │ │ │ +00013290: 6566 6665 6374 2066 6f72 6d20 6279 7465 effect form byte │ │ │ +000132a0: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6e69 -compile-form ni │ │ │ +000132b0: 6c20 6279 7465 2d63 6f6d 7069 6c65 2d62 l byte-compile-b │ │ │ +000132c0: 6f64 7920 745d 2034 5d29 0a28 6465 6661 ody t] 4]).(defa │ │ │ +000132d0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +000132e0: 6c65 2d70 726f 6732 2023 5b28 666f 726d le-prog2 #[(form │ │ │ +000132f0: 2920 2209 4111 c209 8941 1140 c35c 2288 ) ".A....A.@.\". │ │ │ +00013300: 0989 4111 4019 c209 085c 2288 c410 29c5 ..A.@....\"...). │ │ │ +00013310: 09c3 5c22 8722 205b 666f 722d 6566 6665 ..\"." [for-effe │ │ │ +00013320: 6374 2066 6f72 6d20 6279 7465 2d63 6f6d ct form byte-com │ │ │ +00013330: 7069 6c65 2d66 6f72 6d20 7420 6e69 6c20 pile-form t nil │ │ │ +00013340: 6279 7465 2d63 6f6d 7069 6c65 2d62 6f64 byte-compile-bod │ │ │ +00013350: 795d 2033 5d29 0a28 6465 6661 6c69 6173 y] 3]).(defalias │ │ │ +00013360: 2027 6279 7465 2d63 6f6d 7069 6c65 2d67 'byte-compile-g │ │ │ +00013370: 6f74 6f2d 6966 2027 286d 6163 726f 202e oto-if '(macro . │ │ │ +00013380: 2023 5b28 636f 6e64 2064 6973 6361 7264 #[(cond discard │ │ │ +00013390: 2074 6167 2920 22c3 c409 c45c 6ec5 4242 tag) "....\n.BB │ │ │ +000133a0: c45c 6ec6 4242 4608 4587 2220 5b74 6167 .\n.BBF.E." [tag │ │ │ +000133b0: 2063 6f6e 6420 6469 7363 6172 6420 6279 cond discard by │ │ │ +000133c0: 7465 2d63 6f6d 7069 6c65 2d67 6f74 6f20 te-compile-goto │ │ │ +000133d0: 6966 2028 2762 7974 652d 676f 746f 2d69 if ('byte-goto-i │ │ │ +000133e0: 662d 6e6f 742d 6e69 6c20 2762 7974 652d f-not-nil 'byte- │ │ │ +000133f0: 676f 746f 2d69 662d 6e6f 742d 6e69 6c2d goto-if-not-nil- │ │ │ +00013400: 656c 7365 2d70 6f70 2920 2827 6279 7465 else-pop) ('byte │ │ │ +00013410: 2d67 6f74 6f2d 6966 2d6e 696c 2027 6279 -goto-if-nil 'by │ │ │ +00013420: 7465 2d67 6f74 6f2d 6966 2d6e 696c 2d65 te-goto-if-nil-e │ │ │ +00013430: 6c73 652d 706f 7029 5d20 375d 2929 0a28 lse-pop)] 7])).( │ │ │ +00013440: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ +00013450: 6f6d 7069 6c65 2d69 6620 235b 2866 6f72 ompile-if #[(for │ │ │ +00013460: 6d29 2022 c45c 6e41 4021 88c5 5c6e 9bac m) ".\nA@!..\n.. │ │ │ +00013470: 9cc6 201b c709 ab83 c8aa 81c9 0b5c 2288 .. ..........\". │ │ │ +00013480: c4ca 5c6e 3809 5c22 88cb 0b21 8829 aaa8 ..\n8.\"...!.).. │ │ │ +00013490: c620 c620 181b c7c8 085c 2288 c4ca 5c6e . . .....\"...\n │ │ │ +000134a0: 3809 5c22 88c7 cc0b 5c22 88cb 0821 88cd 8.\"....\"...!.. │ │ │ +000134b0: 5c6e 4141 4109 5c22 88cb 0b21 882a ce89 \nAAA.\"...!.*.. │ │ │ +000134c0: 1187 2220 5b65 6c73 6574 6167 2066 6f72 .." [elsetag for │ │ │ +000134d0: 2d65 6666 6563 7420 666f 726d 2064 6f6e -effect form don │ │ │ +000134e0: 6574 6167 2062 7974 652d 636f 6d70 696c etag byte-compil │ │ │ +000134f0: 652d 666f 726d 2033 2062 7974 652d 636f e-form 3 byte-co │ │ │ +00013500: 6d70 696c 652d 6d61 6b65 2d74 6167 2062 mpile-make-tag b │ │ │ +00013510: 7974 652d 636f 6d70 696c 652d 676f 746f yte-compile-goto │ │ │ +00013520: 2062 7974 652d 676f 746f 2d69 662d 6e69 byte-goto-if-ni │ │ │ +00013530: 6c20 6279 7465 2d67 6f74 6f2d 6966 2d6e l byte-goto-if-n │ │ │ +00013540: 696c 2d65 6c73 652d 706f 7020 3220 6279 il-else-pop 2 by │ │ │ +00013550: 7465 2d63 6f6d 7069 6c65 2d6f 7574 2d74 te-compile-out-t │ │ │ +00013560: 6167 2062 7974 652d 676f 746f 2062 7974 ag byte-goto byt │ │ │ +00013570: 652d 636f 6d70 696c 652d 626f 6479 206e e-compile-body n │ │ │ +00013580: 696c 5d20 335d 290a 2864 6566 616c 6961 il] 3]).(defalia │ │ │ +00013590: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ +000135a0: 636f 6e64 2023 5b28 636c 6175 7365 7329 cond #[(clauses) │ │ │ +000135b0: 2022 c620 c789 1d19 1c0b 4189 13ab d20b ". ......A..... │ │ │ +000135c0: 4089 1540 c861 ac8d 0d40 a2c9 61ab 8f0d @..@.a...@..a... │ │ │ +000135d0: 40a3 a2ab 89c8 0d42 15c7 8913 aa5c 5c0b @......B.....\\. │ │ │ +000135e0: 41ab 57ca 0d40 2188 0d41 ac8d cb5c 6eab A.W..@!..A...\n. │ │ │ +000135f0: 83cc aa81 cd0c 5c22 88aa 41c6 2011 cbce ......\"..A. ... │ │ │ +00013600: 095c 2288 cf0d 415c 6e5c 2288 cbd0 0c5c .\"...A\n\"....\ │ │ │ +00013610: 2288 d109 2188 aa28 0d41 ab99 0d40 c861 "...!..(.A...@.a │ │ │ +00013620: ac93 ca0d 4021 88cb 5c6e ab83 ceaa 81d2 ....@!..\n...... │ │ │ +00013630: 0c5c 2288 0d41 150d 18cf 085c 6e5c 2288 .\"..A.....\n\". │ │ │ +00013640: c712 29d1 0c21 2b87 2220 5b62 6f64 7920 ..)..!+." [body │ │ │ +00013650: 6e65 7874 7461 6720 666f 722d 6566 6665 nexttag for-effe │ │ │ +00013660: 6374 2063 6c61 7573 6573 2064 6f6e 6574 ct clauses donet │ │ │ +00013670: 6167 2063 6c61 7573 6520 6279 7465 2d63 ag clause byte-c │ │ │ +00013680: 6f6d 7069 6c65 2d6d 616b 652d 7461 6720 ompile-make-tag │ │ │ +00013690: 6e69 6c20 7420 7175 6f74 6520 6279 7465 nil t quote byte │ │ │ +000136a0: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6279 -compile-form by │ │ │ +000136b0: 7465 2d63 6f6d 7069 6c65 2d67 6f74 6f20 te-compile-goto │ │ │ +000136c0: 6279 7465 2d67 6f74 6f2d 6966 2d6e 6f74 byte-goto-if-not │ │ │ +000136d0: 2d6e 696c 2062 7974 652d 676f 746f 2d69 -nil byte-goto-i │ │ │ +000136e0: 662d 6e6f 742d 6e69 6c2d 656c 7365 2d70 f-not-nil-else-p │ │ │ +000136f0: 6f70 2062 7974 652d 676f 746f 2d69 662d op byte-goto-if- │ │ │ +00013700: 6e69 6c20 6279 7465 2d63 6f6d 7069 6c65 nil byte-compile │ │ │ +00013710: 2d62 6f64 7920 6279 7465 2d67 6f74 6f20 -body byte-goto │ │ │ +00013720: 6279 7465 2d63 6f6d 7069 6c65 2d6f 7574 byte-compile-out │ │ │ +00013730: 2d74 6167 2062 7974 652d 676f 746f 2d69 -tag byte-goto-i │ │ │ +00013740: 662d 6e69 6c2d 656c 7365 2d70 6f70 5d20 f-nil-else-pop] │ │ │ +00013750: 345d 290a 2864 6566 616c 6961 7320 2762 4]).(defalias 'b │ │ │ +00013760: 7974 652d 636f 6d70 696c 652d 616e 6420 yte-compile-and │ │ │ +00013770: 235b 2866 6f72 6d29 2022 c420 5c6e 411b #[(form) ". \nA. │ │ │ +00013780: 180b ac8d c51a c65c 6e09 5c22 88c7 8911 .......\n.\".... │ │ │ +00013790: 29aa a80b 41ab 96c6 0b40 2188 c809 ab83 )...A....@!..... │ │ │ +000137a0: c9aa 81ca 085c 2288 0b41 8913 aa67 0b40 .....\"..A...g.@ │ │ │ +000137b0: 1ac6 5c6e 095c 2288 c711 29cb 0821 2a87 ..\n.\"...)..!*. │ │ │ +000137c0: 2220 5b66 6169 6c74 6167 2066 6f72 2d65 " [failtag for-e │ │ │ +000137d0: 6666 6563 7420 666f 726d 2061 7267 7320 ffect form args │ │ │ +000137e0: 6279 7465 2d63 6f6d 7069 6c65 2d6d 616b byte-compile-mak │ │ │ +000137f0: 652d 7461 6720 7420 6279 7465 2d63 6f6d e-tag t byte-com │ │ │ +00013800: 7069 6c65 2d66 6f72 6d20 6e69 6c20 6279 pile-form nil by │ │ │ +00013810: 7465 2d63 6f6d 7069 6c65 2d67 6f74 6f20 te-compile-goto │ │ │ +00013820: 6279 7465 2d67 6f74 6f2d 6966 2d6e 696c byte-goto-if-nil │ │ │ +00013830: 2062 7974 652d 676f 746f 2d69 662d 6e69 byte-goto-if-ni │ │ │ +00013840: 6c2d 656c 7365 2d70 6f70 2062 7974 652d l-else-pop byte- │ │ │ +00013850: 636f 6d70 696c 652d 6f75 742d 7461 675d compile-out-tag] │ │ │ +00013860: 2034 5d29 0a28 6465 6661 6c69 6173 2027 4]).(defalias ' │ │ │ +00013870: 6279 7465 2d63 6f6d 7069 6c65 2d6f 7220 byte-compile-or │ │ │ +00013880: 235b 2866 6f72 6d29 2022 c420 5c6e 411b #[(form) ". \nA. │ │ │ +00013890: 180b ac8d c51a c65c 6e09 5c22 88c5 8911 .......\n.\".... │ │ │ +000138a0: 29aa a80b 41ab 96c6 0b40 2188 c709 ab83 )...A....@!..... │ │ │ +000138b0: c8aa 81c9 085c 2288 0b41 8913 aa67 0b40 .....\"..A...g.@ │ │ │ +000138c0: 1ac6 5c6e 095c 2288 c511 29ca 0821 2a87 ..\n.\"...)..!*. │ │ │ +000138d0: 2220 5b77 696e 7461 6720 666f 722d 6566 " [wintag for-ef │ │ │ +000138e0: 6665 6374 2066 6f72 6d20 6172 6773 2062 fect form args b │ │ │ +000138f0: 7974 652d 636f 6d70 696c 652d 6d61 6b65 yte-compile-make │ │ │ +00013900: 2d74 6167 206e 696c 2062 7974 652d 636f -tag nil byte-co │ │ │ +00013910: 6d70 696c 652d 666f 726d 2062 7974 652d mpile-form byte- │ │ │ +00013920: 636f 6d70 696c 652d 676f 746f 2062 7974 compile-goto byt │ │ │ +00013930: 652d 676f 746f 2d69 662d 6e6f 742d 6e69 e-goto-if-not-ni │ │ │ +00013940: 6c20 6279 7465 2d67 6f74 6f2d 6966 2d6e l byte-goto-if-n │ │ │ +00013950: 6f74 2d6e 696c 2d65 6c73 652d 706f 7020 ot-nil-else-pop │ │ │ +00013960: 6279 7465 2d63 6f6d 7069 6c65 2d6f 7574 byte-compile-out │ │ │ +00013970: 2d74 6167 5d20 345d 290a 2864 6566 616c -tag] 4]).(defal │ │ │ +00013980: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00013990: 652d 7768 696c 6520 235b 2866 6f72 6d29 e-while #[(form) │ │ │ +000139a0: 2022 c420 c420 1b1a c50b 2188 c609 4140 ". . ....!...A@ │ │ │ +000139b0: 2188 c708 ab83 c8aa 81c9 5c6e 5c22 88ca !.........\n\".. │ │ │ +000139c0: 0941 41cb 5c22 88c7 cc0b 5c22 88c5 5c6e .AA.\"....\"..\n │ │ │ +000139d0: 2188 cd89 102a 8722 205b 666f 722d 6566 !....*." [for-ef │ │ │ +000139e0: 6665 6374 2066 6f72 6d20 656e 6474 6167 fect form endtag │ │ │ +000139f0: 206c 6f6f 7074 6167 2062 7974 652d 636f looptag byte-co │ │ │ +00013a00: 6d70 696c 652d 6d61 6b65 2d74 6167 2062 mpile-make-tag b │ │ │ +00013a10: 7974 652d 636f 6d70 696c 652d 6f75 742d yte-compile-out- │ │ │ +00013a20: 7461 6720 6279 7465 2d63 6f6d 7069 6c65 tag byte-compile │ │ │ +00013a30: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ +00013a40: 6c65 2d67 6f74 6f20 6279 7465 2d67 6f74 le-goto byte-got │ │ │ +00013a50: 6f2d 6966 2d6e 696c 2062 7974 652d 676f o-if-nil byte-go │ │ │ +00013a60: 746f 2d69 662d 6e69 6c2d 656c 7365 2d70 to-if-nil-else-p │ │ │ +00013a70: 6f70 2062 7974 652d 636f 6d70 696c 652d op byte-compile- │ │ │ +00013a80: 626f 6479 2074 2062 7974 652d 676f 746f body t byte-goto │ │ │ +00013a90: 206e 696c 5d20 335d 290a 2864 6566 616c nil] 3]).(defal │ │ │ +00013aa0: 6961 7320 2762 7974 652d 636f 6d70 696c ias 'byte-compil │ │ │ +00013ab0: 652d 6675 6e63 616c 6c20 235b 2866 6f72 e-funcall #[(for │ │ │ +00013ac0: 6d29 2022 c1c2 0841 5c22 88c3 c408 4141 m) "...A\"....AA │ │ │ +00013ad0: 475c 2287 2220 5b66 6f72 6d20 6d61 7063 G\"." [form mapc │ │ │ +00013ae0: 6172 2062 7974 652d 636f 6d70 696c 652d ar byte-compile- │ │ │ +00013af0: 666f 726d 2062 7974 652d 636f 6d70 696c form byte-compil │ │ │ +00013b00: 652d 6f75 7420 6279 7465 2d63 616c 6c5d e-out byte-call] │ │ │ +00013b10: 2033 5d29 0a28 6465 6661 6c69 6173 2027 3]).(defalias ' │ │ │ +00013b20: 6279 7465 2d63 6f6d 7069 6c65 2d6c 6574 byte-compile-let │ │ │ +00013b30: 2023 5b28 666f 726d 2920 220c 4140 891d #[(form) ".A@.. │ │ │ +00013b40: ab98 0d40 3aab 89c6 0d40 4140 2188 aa84 ...@:....@A@!... │ │ │ +00013b50: c7c8 2188 0d41 8915 ac68 29c9 0b42 ca0c ..!..A...h)..B.. │ │ │ +00013b60: 4140 21cb 0c38 a2cc 61ad 820e 141a 1d1b A@!..8..a....... │ │ │ +00013b70: 0dab 97cd ce0d 403a ab85 0d40 40aa 820d ......@:...@@... │ │ │ +00013b80: 405c 6e23 880d 4189 15ac 690c 4141 19cf @\n#..A...i.AA.. │ │ │ +00013b90: 0908 5c22 88c8 1029 d00e 1573 ab83 d120 ..\"...)...s... │ │ │ +00013ba0: 88d2 d30c 4140 475c 222b 8722 205b 666f ....A@G\"+." [fo │ │ │ +00013bb0: 722d 6566 6665 6374 2062 6f64 7920 6578 r-effect body ex │ │ │ +00013bc0: 7472 612d 666c 6167 7320 6279 7465 2d63 tra-flags byte-c │ │ │ +00013bd0: 6f6d 7069 6c65 2d62 6f75 6e64 2d76 6172 ompile-bound-var │ │ │ +00013be0: 6961 626c 6573 2066 6f72 6d20 7661 726c iables form varl │ │ │ +00013bf0: 6973 7420 6279 7465 2d63 6f6d 7069 6c65 ist byte-compile │ │ │ +00013c00: 2d66 6f72 6d20 6279 7465 2d63 6f6d 7069 -form byte-compi │ │ │ +00013c10: 6c65 2d70 7573 682d 636f 6e73 7461 6e74 le-push-constant │ │ │ +00013c20: 206e 696c 206e 6577 2d73 636f 7065 2072 nil new-scope r │ │ │ +00013c30: 6576 6572 7365 2032 2062 7974 652d 636f everse 2 byte-co │ │ │ +00013c40: 6465 2062 7974 652d 636f 6d70 696c 652d de byte-compile- │ │ │ +00013c50: 7661 7269 6162 6c65 2d72 6566 2062 7974 variable-ref byt │ │ │ +00013c60: 652d 7661 7262 696e 6420 6279 7465 2d63 e-varbind byte-c │ │ │ +00013c70: 6f6d 7069 6c65 2d62 6f64 7920 756e 7573 ompile-body unus │ │ │ +00013c80: 6564 2d76 6172 7320 6279 7465 2d63 6f6d ed-vars byte-com │ │ │ +00013c90: 7069 6c65 2d77 6172 6e2d 6162 6f75 742d pile-warn-about- │ │ │ +00013ca0: 756e 7573 6564 2d76 6172 6961 626c 6573 unused-variables │ │ │ +00013cb0: 2062 7974 652d 636f 6d70 696c 652d 6f75 byte-compile-ou │ │ │ +00013cc0: 7420 6279 7465 2d75 6e62 696e 6420 6279 t byte-unbind by │ │ │ +00013cd0: 7465 2d63 6f6d 7069 6c65 2d61 7267 6c69 te-compile-argli │ │ │ +00013ce0: 7374 2d62 6974 2062 7974 652d 636f 6d70 st-bit byte-comp │ │ │ +00013cf0: 696c 652d 7761 726e 696e 6773 5d20 355d ile-warnings] 5] │ │ │ +00013d00: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ +00013d10: 652d 636f 6d70 696c 652d 6c65 742a 2023 e-compile-let* # │ │ │ +00013d20: 5b28 666f 726d 2920 22c6 0b42 c70c 4140 [(form) "..B..A@ │ │ │ +00013d30: 211d 1b0d aba4 0d40 3aac 86c8 c921 88aa !......@:....!.. │ │ │ +00013d40: 8dca 0d40 4140 2188 0d89 4040 a088 cbcc ...@A@!...@@.... │ │ │ +00013d50: 0d40 5c22 880d 4189 15ac 5c5c 0c41 411a .@\"..A...\\.AA. │ │ │ +00013d60: cd5c 6e09 5c22 88c9 1129 ce08 73ab 83cf .\n.\"...)..s... │ │ │ +00013d70: 2088 d0d1 0c41 4047 5c22 2a87 2220 5b62 ....A@G\"*." [b │ │ │ +00013d80: 7974 652d 636f 6d70 696c 652d 7761 726e yte-compile-warn │ │ │ +00013d90: 696e 6773 2066 6f72 2d65 6666 6563 7420 ings for-effect │ │ │ +00013da0: 626f 6479 2062 7974 652d 636f 6d70 696c body byte-compil │ │ │ +00013db0: 652d 626f 756e 642d 7661 7269 6162 6c65 e-bound-variable │ │ │ +00013dc0: 7320 666f 726d 2076 6172 6c69 7374 206e s form varlist n │ │ │ +00013dd0: 6577 2d73 636f 7065 2063 6f70 792d 7365 ew-scope copy-se │ │ │ +00013de0: 7175 656e 6365 2062 7974 652d 636f 6d70 quence byte-comp │ │ │ +00013df0: 696c 652d 7075 7368 2d63 6f6e 7374 616e ile-push-constan │ │ │ +00013e00: 7420 6e69 6c20 6279 7465 2d63 6f6d 7069 t nil byte-compi │ │ │ +00013e10: 6c65 2d66 6f72 6d20 6279 7465 2d63 6f6d le-form byte-com │ │ │ +00013e20: 7069 6c65 2d76 6172 6961 626c 652d 7265 pile-variable-re │ │ │ +00013e30: 6620 6279 7465 2d76 6172 6269 6e64 2062 f byte-varbind b │ │ │ +00013e40: 7974 652d 636f 6d70 696c 652d 626f 6479 yte-compile-body │ │ │ +00013e50: 2075 6e75 7365 642d 7661 7273 2062 7974 unused-vars byt │ │ │ +00013e60: 652d 636f 6d70 696c 652d 7761 726e 2d61 e-compile-warn-a │ │ │ +00013e70: 626f 7574 2d75 6e75 7365 642d 7661 7269 bout-unused-vari │ │ │ +00013e80: 6162 6c65 7320 6279 7465 2d63 6f6d 7069 ables byte-compi │ │ │ +00013e90: 6c65 2d6f 7574 2062 7974 652d 756e 6269 le-out byte-unbi │ │ │ +00013ea0: 6e64 5d20 345d 290a 2862 7974 652d 636f nd] 4]).(byte-co │ │ │ +00013eb0: 6465 2022 c0c1 c2c3 2388 c0c4 c2c3 2388 de "....#.....#. │ │ │ +00013ec0: c0c1 c5c6 2388 c0c4 c5c7 2387 2220 5b70 ....#.....#." [p │ │ │ +00013ed0: 7574 2061 746f 6d20 6279 7465 2d63 6f6d ut atom byte-com │ │ │ +00013ee0: 7069 6c65 2062 7974 652d 636f 6d70 696c pile byte-compil │ │ │ +00013ef0: 652d 6e65 6761 7465 6420 6e6c 6973 7470 e-negated nlistp │ │ │ +00013f00: 2062 7974 652d 636f 6d70 696c 652d 6e65 byte-compile-ne │ │ │ +00013f10: 6761 7465 642d 6f70 2063 6f6e 7370 206c gated-op consp l │ │ │ +00013f20: 6973 7470 5d20 3429 0a28 6465 6661 6c69 istp] 4).(defali │ │ │ +00013f30: 6173 2027 6279 7465 2d63 6f6d 7069 6c65 as 'byte-compile │ │ │ +00013f40: 2d6e 6567 6174 6564 2023 5b28 666f 726d -negated #[(form │ │ │ +00013f50: 2920 22c2 0921 19c3 0908 5c22 88c4 8910 ) "..!....\".... │ │ │ +00013f60: 2987 2220 5b66 6f72 2d65 6666 6563 7420 )." [for-effect │ │ │ +00013f70: 666f 726d 2062 7974 652d 636f 6d70 696c form byte-compil │ │ │ +00013f80: 652d 6e65 6761 7469 6f6e 2d6f 7074 696d e-negation-optim │ │ │ +00013f90: 697a 6572 2062 7974 652d 636f 6d70 696c izer byte-compil │ │ │ +00013fa0: 652d 666f 726d 206e 696c 5d20 335d 290a e-form nil] 3]). │ │ │ +00013fb0: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +00013fc0: 636f 6d70 696c 652d 6e65 6761 7469 6f6e compile-negation │ │ │ +00013fd0: 2d6f 7074 696d 697a 6572 2023 5b28 666f -optimizer #[(fo │ │ │ +00013fe0: 726d 2920 22c1 0840 c24e ae85 c3c4 0840 rm) "..@.N.....@ │ │ │ +00013ff0: 5c22 0841 4244 8722 205b 666f 726d 206e \".ABD." [form n │ │ │ +00014000: 6f74 2062 7974 652d 636f 6d70 696c 652d ot byte-compile- │ │ │ +00014010: 6e65 6761 7465 642d 6f70 2065 7272 6f72 negated-op error │ │ │ +00014020: 2022 436f 6d70 696c 6572 2065 7272 6f72 "Compiler error │ │ │ +00014030: 3a20 6025 7327 2068 6173 206e 6f20 6062 : `%s' has no `b │ │ │ +00014040: 7974 652d 636f 6d70 696c 652d 6e65 6761 yte-compile-nega │ │ │ +00014050: 7465 642d 6f70 2720 7072 6f70 6572 7479 ted-op' property │ │ │ +00014060: 225d 2034 5d29 0a28 6279 7465 2d63 6f64 "] 4]).(byte-cod │ │ │ +00014070: 6520 22c0 c1c2 c323 88c0 c4c2 c523 88c0 e "....#.....#.. │ │ │ +00014080: c6c2 c723 88c0 c8c2 c923 88c0 cac2 cb23 ...#.....#.....# │ │ │ +00014090: 88c0 ccc2 cd23 88c0 cec2 cf23 88c0 d0c2 .....#.....#.... │ │ │ +000140a0: d123 8722 205b 7075 7420 6361 7463 6820 .#." [put catch │ │ │ +000140b0: 6279 7465 2d63 6f6d 7069 6c65 2062 7974 byte-compile byt │ │ │ +000140c0: 652d 636f 6d70 696c 652d 6361 7463 6820 e-compile-catch │ │ │ +000140d0: 756e 7769 6e64 2d70 726f 7465 6374 2062 unwind-protect b │ │ │ +000140e0: 7974 652d 636f 6d70 696c 652d 756e 7769 yte-compile-unwi │ │ │ +000140f0: 6e64 2d70 726f 7465 6374 2063 6f6e 6469 nd-protect condi │ │ │ +00014100: 7469 6f6e 2d63 6173 6520 6279 7465 2d63 tion-case byte-c │ │ │ +00014110: 6f6d 7069 6c65 2d63 6f6e 6469 7469 6f6e ompile-condition │ │ │ +00014120: 2d63 6173 6520 7361 7665 2d65 7863 7572 -case save-excur │ │ │ +00014130: 7369 6f6e 2062 7974 652d 636f 6d70 696c sion byte-compil │ │ │ +00014140: 652d 7361 7665 2d65 7863 7572 7369 6f6e e-save-excursion │ │ │ +00014150: 2073 6176 652d 6375 7272 656e 742d 6275 save-current-bu │ │ │ +00014160: 6666 6572 2062 7974 652d 636f 6d70 696c ffer byte-compil │ │ │ +00014170: 652d 7361 7665 2d63 7572 7265 6e74 2d62 e-save-current-b │ │ │ +00014180: 7566 6665 7220 7361 7665 2d72 6573 7472 uffer save-restr │ │ │ +00014190: 6963 7469 6f6e 2062 7974 652d 636f 6d70 iction byte-comp │ │ │ +000141a0: 696c 652d 7361 7665 2d72 6573 7472 6963 ile-save-restric │ │ │ +000141b0: 7469 6f6e 2073 6176 652d 7769 6e64 6f77 tion save-window │ │ │ +000141c0: 2d65 7863 7572 7369 6f6e 2062 7974 652d -excursion byte- │ │ │ +000141d0: 636f 6d70 696c 652d 7361 7665 2d77 696e compile-save-win │ │ │ +000141e0: 646f 772d 6578 6375 7273 696f 6e20 7769 dow-excursion wi │ │ │ +000141f0: 7468 2d6f 7574 7075 742d 746f 2d74 656d th-output-to-tem │ │ │ +00014200: 702d 6275 6666 6572 2062 7974 652d 636f p-buffer byte-co │ │ │ +00014210: 6d70 696c 652d 7769 7468 2d6f 7574 7075 mpile-with-outpu │ │ │ +00014220: 742d 746f 2d74 656d 702d 6275 6666 6572 t-to-temp-buffer │ │ │ +00014230: 5d20 3429 0a28 6465 6661 6c69 6173 2027 ] 4).(defalias ' │ │ │ +00014240: 6279 7465 2d63 6f6d 7069 6c65 2d63 6174 byte-compile-cat │ │ │ +00014250: 6368 2023 5b28 666f 726d 2920 22c2 0941 ch #[(form) "..A │ │ │ +00014260: 4021 88c3 c4c5 0941 4142 085c 2221 88c6 @!.....AAB.\"!.. │ │ │ +00014270: c7c8 5c22 8722 205b 666f 722d 6566 6665 ..\"." [for-effe │ │ │ +00014280: 6374 2066 6f72 6d20 6279 7465 2d63 6f6d ct form byte-com │ │ │ +00014290: 7069 6c65 2d66 6f72 6d20 6279 7465 2d63 pile-form byte-c │ │ │ +000142a0: 6f6d 7069 6c65 2d70 7573 682d 636f 6e73 ompile-push-cons │ │ │ +000142b0: 7461 6e74 2062 7974 652d 636f 6d70 696c tant byte-compil │ │ │ +000142c0: 652d 746f 702d 6c65 7665 6c20 7072 6f67 e-top-level prog │ │ │ +000142d0: 6e20 6279 7465 2d63 6f6d 7069 6c65 2d6f n byte-compile-o │ │ │ +000142e0: 7574 2062 7974 652d 6361 7463 6820 305d ut byte-catch 0] │ │ │ +000142f0: 2034 5d29 0a28 6465 6661 6c69 6173 2027 4]).(defalias ' │ │ │ +00014300: 6279 7465 2d63 6f6d 7069 6c65 2d75 6e77 byte-compile-unw │ │ │ +00014310: 696e 642d 7072 6f74 6563 7420 235b 2866 ind-protect #[(f │ │ │ +00014320: 6f72 6d29 2022 c2c3 0941 41c4 5c22 2188 orm) "...AA.\"!. │ │ │ +00014330: c5c6 c75c 2288 0941 4019 c809 085c 2288 ...\"..A@....\". │ │ │ +00014340: c910 29c5 cacb 5c22 8722 205b 666f 722d ..)...\"." [for- │ │ │ +00014350: 6566 6665 6374 2066 6f72 6d20 6279 7465 effect form byte │ │ │ +00014360: 2d63 6f6d 7069 6c65 2d70 7573 682d 636f -compile-push-co │ │ │ +00014370: 6e73 7461 6e74 2062 7974 652d 636f 6d70 nstant byte-comp │ │ │ +00014380: 696c 652d 746f 702d 6c65 7665 6c2d 626f ile-top-level-bo │ │ │ +00014390: 6479 2074 2062 7974 652d 636f 6d70 696c dy t byte-compil │ │ │ +000143a0: 652d 6f75 7420 6279 7465 2d75 6e77 696e e-out byte-unwin │ │ │ +000143b0: 642d 7072 6f74 6563 7420 3020 6279 7465 d-protect 0 byte │ │ │ +000143c0: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6e69 -compile-form ni │ │ │ +000143d0: 6c20 6279 7465 2d75 6e62 696e 6420 315d l byte-unbind 1] │ │ │ +000143e0: 2034 5d29 0a28 6465 6661 6c69 6173 2027 4]).(defalias ' │ │ │ +000143f0: 6279 7465 2d63 6f6d 7069 6c65 2d63 6f6e byte-compile-con │ │ │ +00014400: 6469 7469 6f6e 2d63 6173 6520 235b 2866 dition-case #[(f │ │ │ +00014410: 6f72 6d29 2022 0841 4089 1dab 8a0d c642 orm) ".A@......B │ │ │ +00014420: c70e 1642 42aa 84c7 0e16 421e 160d 39ac ...BB.....B...9. │ │ │ +00014430: 87c8 c9ca 0d21 5c22 88cb 0d21 88cb cccd .....!\"...!.... │ │ │ +00014440: 0838 0e18 5c22 2188 0841 4141 ce1b 891a .8..\"!..AAA.... │ │ │ +00014450: abc4 5c6e 4089 1e19 4089 1c39 aca6 0c3c ..\n@...@..9...< │ │ │ +00014460: ab9b 0ccf 1e17 8919 ab8e 0940 39ac 83ce ...........@9... │ │ │ +00014470: 1617 0941 8911 ac72 0e17 2aac 87c8 d0ca ...A...r..*..... │ │ │ +00014480: 0c21 5c22 880c d10e 1941 0e18 5c22 420b .!\".....A..\"B. │ │ │ +00014490: 4213 2a5c 6e41 8912 ac3c cb0b 9f21 882a B.*\nA...<...!.* │ │ │ +000144a0: d20e 1a73 ab83 d320 88d4 d5c6 5c22 2a87 ...s... ....\"*. │ │ │ +000144b0: 2220 5b66 6f72 6d20 7379 6d73 2063 6c61 " [form syms cla │ │ │ +000144c0: 7573 6573 2063 6f6d 7069 6c65 642d 636c uses compiled-cl │ │ │ +000144d0: 6175 7365 7320 636f 6e64 6974 696f 6e20 auses condition │ │ │ +000144e0: 7661 7220 3020 6e65 772d 7363 6f70 6520 var 0 new-scope │ │ │ +000144f0: 6279 7465 2d63 6f6d 7069 6c65 2d77 6172 byte-compile-war │ │ │ +00014500: 6e20 2225 7320 6973 206e 6f74 2061 2076 n "%s is not a v │ │ │ +00014510: 6172 6961 626c 652d 6e61 6d65 206f 7220 ariable-name or │ │ │ +00014520: 6e69 6c20 2869 6e20 636f 6e64 6974 696f nil (in conditio │ │ │ +00014530: 6e2d 6361 7365 2922 2070 7269 6e31 2d74 n-case)" prin1-t │ │ │ +00014540: 6f2d 7374 7269 6e67 2062 7974 652d 636f o-string byte-co │ │ │ +00014550: 6d70 696c 652d 7075 7368 2d63 6f6e 7374 mpile-push-const │ │ │ +00014560: 616e 7420 6279 7465 2d63 6f6d 7069 6c65 ant byte-compile │ │ │ +00014570: 2d74 6f70 2d6c 6576 656c 2032 206e 696c -top-level 2 nil │ │ │ +00014580: 2074 2022 2573 2069 7320 6e6f 7420 6120 t "%s is not a │ │ │ +00014590: 7379 6d62 6f6c 206e 616d 696e 6720 6120 symbol naming a │ │ │ +000145a0: 636f 6e64 6974 696f 6e20 6f72 2061 206c condition or a l │ │ │ +000145b0: 6973 7420 6f66 2073 7563 6820 2869 6e20 ist of such (in │ │ │ +000145c0: 636f 6e64 6974 696f 6e2d 6361 7365 2922 condition-case)" │ │ │ +000145d0: 2062 7974 652d 636f 6d70 696c 652d 746f byte-compile-to │ │ │ +000145e0: 702d 6c65 7665 6c2d 626f 6479 2075 6e75 p-level-body unu │ │ │ +000145f0: 7365 642d 7661 7273 2062 7974 652d 636f sed-vars byte-co │ │ │ +00014600: 6d70 696c 652d 7761 726e 2d61 626f 7574 mpile-warn-about │ │ │ +00014610: 2d75 6e75 7365 642d 7661 7269 6162 6c65 -unused-variable │ │ │ +00014620: 7320 6279 7465 2d63 6f6d 7069 6c65 2d6f s byte-compile-o │ │ │ +00014630: 7574 2062 7974 652d 636f 6e64 6974 696f ut byte-conditio │ │ │ +00014640: 6e2d 6361 7365 2062 7974 652d 636f 6d70 n-case byte-comp │ │ │ +00014650: 696c 652d 626f 756e 642d 7661 7269 6162 ile-bound-variab │ │ │ +00014660: 6c65 7320 6f6b 2066 6f72 2d65 6666 6563 les ok for-effec │ │ │ +00014670: 7420 636c 6175 7365 2062 7974 652d 636f t clause byte-co │ │ │ +00014680: 6d70 696c 652d 7761 726e 696e 6773 5d20 mpile-warnings] │ │ │ +00014690: 355d 290a 2864 6566 616c 6961 7320 2762 5]).(defalias 'b │ │ │ +000146a0: 7974 652d 636f 6d70 696c 652d 7361 7665 yte-compile-save │ │ │ +000146b0: 2d65 7863 7572 7369 6f6e 2023 5b28 666f -excursion #[(fo │ │ │ +000146c0: 726d 2920 22c3 c4c5 5c22 8808 411a c65c rm) "...\"..A..\ │ │ │ +000146d0: 6e09 5c22 88c7 1129 c3c8 c95c 2287 2220 n.\"...)...\"." │ │ │ +000146e0: 5b66 6f72 6d20 666f 722d 6566 6665 6374 [form for-effect │ │ │ +000146f0: 2062 6f64 7920 6279 7465 2d63 6f6d 7069 body byte-compi │ │ │ +00014700: 6c65 2d6f 7574 2062 7974 652d 7361 7665 le-out byte-save │ │ │ +00014710: 2d65 7863 7572 7369 6f6e 2030 2062 7974 -excursion 0 byt │ │ │ +00014720: 652d 636f 6d70 696c 652d 626f 6479 206e e-compile-body n │ │ │ +00014730: 696c 2062 7974 652d 756e 6269 6e64 2031 il byte-unbind 1 │ │ │ +00014740: 5d20 335d 290a 2864 6566 616c 6961 7320 ] 3]).(defalias │ │ │ +00014750: 2762 7974 652d 636f 6d70 696c 652d 7361 'byte-compile-sa │ │ │ +00014760: 7665 2d72 6573 7472 6963 7469 6f6e 2023 ve-restriction # │ │ │ +00014770: 5b28 666f 726d 2920 22c3 c4c5 5c22 8808 [(form) "...\".. │ │ │ +00014780: 411a c65c 6e09 5c22 88c7 1129 c3c8 c95c A..\n.\"...)...\ │ │ │ +00014790: 2287 2220 5b66 6f72 6d20 666f 722d 6566 "." [form for-ef │ │ │ +000147a0: 6665 6374 2062 6f64 7920 6279 7465 2d63 fect body byte-c │ │ │ +000147b0: 6f6d 7069 6c65 2d6f 7574 2062 7974 652d ompile-out byte- │ │ │ +000147c0: 7361 7665 2d72 6573 7472 6963 7469 6f6e save-restriction │ │ │ +000147d0: 2030 2062 7974 652d 636f 6d70 696c 652d 0 byte-compile- │ │ │ +000147e0: 626f 6479 206e 696c 2062 7974 652d 756e body nil byte-un │ │ │ +000147f0: 6269 6e64 2031 5d20 335d 290a 2864 6566 bind 1] 3]).(def │ │ │ +00014800: 616c 6961 7320 2762 7974 652d 636f 6d70 alias 'byte-comp │ │ │ +00014810: 696c 652d 7361 7665 2d63 7572 7265 6e74 ile-save-current │ │ │ +00014820: 2d62 7566 6665 7220 235b 2866 6f72 6d29 -buffer #[(form) │ │ │ +00014830: 2022 08ab 8ec4 c5c6 c7c8 0b41 42c9 4242 ".........AB.BB │ │ │ +00014840: 4521 87ca cbcc 5c22 880b 411a cd5c 6e09 E!....\"..A..\n. │ │ │ +00014850: 5c22 88ce 1129 cacf d05c 2287 2220 5b62 \"...)...\"." [b │ │ │ +00014860: 7974 652d 636f 6d70 696c 652d 656d 6163 yte-compile-emac │ │ │ +00014870: 7331 392d 636f 6d70 6174 6962 696c 6974 s19-compatibilit │ │ │ +00014880: 7920 666f 722d 6566 6665 6374 2062 6f64 y for-effect bod │ │ │ +00014890: 7920 666f 726d 2062 7974 652d 636f 6d70 y form byte-comp │ │ │ +000148a0: 696c 652d 666f 726d 206c 6574 2028 285f ile-form let ((_ │ │ │ +000148b0: 6279 7465 5f63 6f6d 7069 6c65 725f 7361 byte_compiler_sa │ │ │ +000148c0: 7665 5f62 7566 6665 725f 656d 756c 6174 ve_buffer_emulat │ │ │ +000148d0: 696f 6e5f 636c 6f73 7572 655f 2028 6375 ion_closure_ (cu │ │ │ +000148e0: 7272 656e 742d 6275 6666 6572 2929 2920 rrent-buffer))) │ │ │ +000148f0: 756e 7769 6e64 2d70 726f 7465 6374 2070 unwind-protect p │ │ │ +00014900: 726f 676e 2028 2861 6e64 2028 6275 6666 rogn ((and (buff │ │ │ +00014910: 6572 2d6c 6976 652d 7020 5f62 7974 655f er-live-p _byte_ │ │ │ +00014920: 636f 6d70 696c 6572 5f73 6176 655f 6275 compiler_save_bu │ │ │ +00014930: 6666 6572 5f65 6d75 6c61 7469 6f6e 5f63 ffer_emulation_c │ │ │ +00014940: 6c6f 7375 7265 5f29 2028 7365 742d 6275 losure_) (set-bu │ │ │ +00014950: 6666 6572 205f 6279 7465 5f63 6f6d 7069 ffer _byte_compi │ │ │ +00014960: 6c65 725f 7361 7665 5f62 7566 6665 725f ler_save_buffer_ │ │ │ +00014970: 656d 756c 6174 696f 6e5f 636c 6f73 7572 emulation_closur │ │ │ +00014980: 655f 2929 2920 6279 7465 2d63 6f6d 7069 e_))) byte-compi │ │ │ +00014990: 6c65 2d6f 7574 2062 7974 652d 7361 7665 le-out byte-save │ │ │ +000149a0: 2d63 7572 7265 6e74 2d62 7566 6665 7220 -current-buffer │ │ │ +000149b0: 3020 6279 7465 2d63 6f6d 7069 6c65 2d62 0 byte-compile-b │ │ │ +000149c0: 6f64 7920 6e69 6c20 6279 7465 2d75 6e62 ody nil byte-unb │ │ │ +000149d0: 696e 6420 315d 2036 5d29 0a28 6465 6661 ind 1] 6]).(defa │ │ │ +000149e0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +000149f0: 6c65 2d73 6176 652d 7769 6e64 6f77 2d65 le-save-window-e │ │ │ +00014a00: 7863 7572 7369 6f6e 2023 5b28 666f 726d xcursion #[(form │ │ │ +00014a10: 2920 22c2 c309 4108 5c22 2188 c4c5 c65c ) "...A.\"!....\ │ │ │ +00014a20: 2287 2220 5b66 6f72 2d65 6666 6563 7420 "." [for-effect │ │ │ +00014a30: 666f 726d 2062 7974 652d 636f 6d70 696c form byte-compil │ │ │ +00014a40: 652d 7075 7368 2d63 6f6e 7374 616e 7420 e-push-constant │ │ │ +00014a50: 6279 7465 2d63 6f6d 7069 6c65 2d74 6f70 byte-compile-top │ │ │ +00014a60: 2d6c 6576 656c 2d62 6f64 7920 6279 7465 -level-body byte │ │ │ +00014a70: 2d63 6f6d 7069 6c65 2d6f 7574 2062 7974 -compile-out byt │ │ │ +00014a80: 652d 7361 7665 2d77 696e 646f 772d 6578 e-save-window-ex │ │ │ +00014a90: 6375 7273 696f 6e20 305d 2034 5d29 0a28 cursion 0] 4]).( │ │ │ +00014aa0: 6465 6661 6c69 6173 2027 6279 7465 2d63 defalias 'byte-c │ │ │ +00014ab0: 6f6d 7069 6c65 2d77 6974 682d 6f75 7470 ompile-with-outp │ │ │ +00014ac0: 7574 2d74 6f2d 7465 6d70 2d62 7566 6665 ut-to-temp-buffe │ │ │ +00014ad0: 7220 235b 2866 6f72 6d29 2022 c108 4140 r #[(form) "..A@ │ │ │ +00014ae0: 2188 c2c3 c45c 2288 c508 4141 2188 c2c6 !....\"...AA!... │ │ │ +00014af0: c45c 2287 2220 5b66 6f72 6d20 6279 7465 .\"." [form byte │ │ │ +00014b00: 2d63 6f6d 7069 6c65 2d66 6f72 6d20 6279 -compile-form by │ │ │ +00014b10: 7465 2d63 6f6d 7069 6c65 2d6f 7574 2062 te-compile-out b │ │ │ +00014b20: 7974 652d 7465 6d70 2d6f 7574 7075 742d yte-temp-output- │ │ │ +00014b30: 6275 6666 6572 2d73 6574 7570 2030 2062 buffer-setup 0 b │ │ │ +00014b40: 7974 652d 636f 6d70 696c 652d 626f 6479 yte-compile-body │ │ │ +00014b50: 2062 7974 652d 7465 6d70 2d6f 7574 7075 byte-temp-outpu │ │ │ +00014b60: 742d 6275 6666 6572 2d73 686f 775d 2033 t-buffer-show] 3 │ │ │ +00014b70: 5d29 0a28 6279 7465 2d63 6f64 6520 22c0 ]).(byte-code ". │ │ │ +00014b80: c1c2 c323 88c0 c4c2 c523 88c0 c6c2 c723 ...#.....#.....# │ │ │ +00014b90: 88c0 c6c2 c823 88c0 c9c2 c823 88c0 cac2 .....#.....#.... │ │ │ +00014ba0: cb23 88c0 ccc2 cd23 88c0 cec2 cf23 8722 .#.....#.....#." │ │ │ +00014bb0: 205b 7075 7420 6465 6675 6e20 6279 7465 [put defun byte │ │ │ +00014bc0: 2d63 6f6d 7069 6c65 2062 7974 652d 636f -compile byte-co │ │ │ +00014bd0: 6d70 696c 652d 6465 6675 6e20 6465 666d mpile-defun defm │ │ │ +00014be0: 6163 726f 2062 7974 652d 636f 6d70 696c acro byte-compil │ │ │ +00014bf0: 652d 6465 666d 6163 726f 2064 6566 7661 e-defmacro defva │ │ │ +00014c00: 7220 6279 7465 2d63 6f6d 7069 6c65 2d64 r byte-compile-d │ │ │ +00014c10: 6566 7661 7220 6279 7465 2d63 6f6d 7069 efvar byte-compi │ │ │ +00014c20: 6c65 2d64 6566 7661 722d 6f72 2d64 6566 le-defvar-or-def │ │ │ +00014c30: 636f 6e73 7420 6465 6663 6f6e 7374 2061 const defconst a │ │ │ +00014c40: 7574 6f6c 6f61 6420 6279 7465 2d63 6f6d utoload byte-com │ │ │ +00014c50: 7069 6c65 2d61 7574 6f6c 6f61 6420 6465 pile-autoload de │ │ │ +00014c60: 6661 6c69 6173 2062 7974 652d 636f 6d70 falias byte-comp │ │ │ +00014c70: 696c 652d 6465 6661 6c69 6173 2064 6566 ile-defalias def │ │ │ +00014c80: 696e 652d 6675 6e63 7469 6f6e 2062 7974 ine-function byt │ │ │ +00014c90: 652d 636f 6d70 696c 652d 6465 6669 6e65 e-compile-define │ │ │ +00014ca0: 2d66 756e 6374 696f 6e5d 2034 290a 2864 -function] 4).(d │ │ │ +00014cb0: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ +00014cc0: 6d70 696c 652d 6465 6675 6e20 235b 2866 mpile-defun #[(f │ │ │ +00014cd0: 6f72 6d29 2022 c1c2 c308 4140 44c4 c5c6 orm) "....A@D... │ │ │ +00014ce0: 0841 4142 2121 4521 88c7 2088 c808 4140 .AAB!!E!.. ...A@ │ │ │ +00014cf0: 2187 2220 5b66 6f72 6d20 6279 7465 2d63 !." [form byte-c │ │ │ +00014d00: 6f6d 7069 6c65 2d74 776f 2d61 7267 7320 ompile-two-args │ │ │ +00014d10: 6673 6574 2071 756f 7465 2062 7974 652d fset quote byte- │ │ │ +00014d20: 636f 6d70 696c 652d 6279 7465 2d63 6f64 compile-byte-cod │ │ │ +00014d30: 652d 6d61 6b65 7220 6279 7465 2d63 6f6d e-maker byte-com │ │ │ +00014d40: 7069 6c65 2d6c 616d 6264 6120 6c61 6d62 pile-lambda lamb │ │ │ +00014d50: 6461 2062 7974 652d 636f 6d70 696c 652d da byte-compile- │ │ │ +00014d60: 6469 7363 6172 6420 6279 7465 2d63 6f6d discard byte-com │ │ │ +00014d70: 7069 6c65 2d63 6f6e 7374 616e 745d 2037 pile-constant] 7 │ │ │ +00014d80: 5d29 0a28 6465 6661 6c69 6173 2027 6279 ]).(defalias 'by │ │ │ +00014d90: 7465 2d63 6f6d 7069 6c65 2d64 6566 6d61 te-compile-defma │ │ │ +00014da0: 6372 6f20 235b 2866 6f72 6d29 2022 c4c5 cro #[(form) ".. │ │ │ +00014db0: 0b41 4044 c6c7 c80b 4141 4221 2189 1aa2 .A@D....AAB!!... │ │ │ +00014dc0: c961 ab86 cacb 5c6e 45aa 87c5 cccd 5c6e .a....\nE.....\n │ │ │ +00014dd0: 2142 4429 45c5 0b41 4044 4419 ce09 085c !BD)E..A@DD....\ │ │ │ +00014de0: 2288 cf89 1029 8722 205b 666f 722d 6566 "....)." [for-ef │ │ │ +00014df0: 6665 6374 2062 6f64 7920 636f 6465 2066 fect body code f │ │ │ +00014e00: 6f72 6d20 6673 6574 2071 756f 7465 2062 orm fset quote b │ │ │ +00014e10: 7974 652d 636f 6d70 696c 652d 6279 7465 yte-compile-byte │ │ │ +00014e20: 2d63 6f64 652d 6d61 6b65 7220 6279 7465 -code-maker byte │ │ │ +00014e30: 2d63 6f6d 7069 6c65 2d6c 616d 6264 6120 -compile-lambda │ │ │ +00014e40: 6c61 6d62 6461 206d 616b 652d 6279 7465 lambda make-byte │ │ │ +00014e50: 2d63 6f64 6520 636f 6e73 2027 6d61 6372 -code cons 'macr │ │ │ +00014e60: 6f20 6d61 6372 6f20 6576 616c 2062 7974 o macro eval byt │ │ │ +00014e70: 652d 636f 6d70 696c 652d 626f 6479 206e e-compile-body n │ │ │ +00014e80: 696c 5d20 375d 290a 2864 6566 616c 6961 il] 7]).(defalia │ │ │ +00014e90: 7320 2762 7974 652d 636f 6d70 696c 652d s 'byte-compile- │ │ │ +00014ea0: 6465 6676 6172 2d6f 722d 6465 6663 6f6e defvar-or-defcon │ │ │ +00014eb0: 7374 2023 5b28 666f 726d 2920 220c 400c st #[(form) ".@. │ │ │ +00014ec0: 4140 c60c 38c7 0c38 1b19 1d1a 0c47 c856 A@..8..8.....G.V │ │ │ +00014ed0: ab8a c9ca 5c6e 0d0c 4147 c725 88cb 0e1c ....\n..AG.%.... │ │ │ +00014ee0: 73ab 870d 0e1d 4208 4210 0c47 c656 ad8c s.....B.B..G.V.. │ │ │ +00014ef0: 0e1e 3fad 87cc cd0d 44ce 4242 0c47 c756 ..?.....D.BB.G.V │ │ │ +00014f00: ad95 0bab 8b0b 3bac 87c9 cf5c 6e0d 0b24 ......;....\n..$ │ │ │ +00014f10: 88d0 cd0d 44d1 0b46 0c41 41ad 9a5c 6ed2 ....D..F.AA..\n. │ │ │ +00014f20: 61ab 86d3 0d09 45aa 8fd4 d5d6 cd0d 4444 a.....E.......DD │ │ │ +00014f30: 44d7 cd0d 4409 4545 cd0d 4446 1e1a d80e D...D.EE..DF.... │ │ │ +00014f40: 1a0e 1b5c 2288 d989 161b 2d87 2220 5b62 ...\".....-." [b │ │ │ +00014f50: 7974 652d 636f 6d70 696c 652d 626f 756e yte-compile-boun │ │ │ +00014f60: 642d 7661 7269 6162 6c65 7320 7661 6c75 d-variables valu │ │ │ +00014f70: 6520 6675 6e20 7374 7269 6e67 2066 6f72 e fun string for │ │ │ +00014f80: 6d20 7661 7220 3220 3320 3420 6279 7465 m var 2 3 4 byte │ │ │ +00014f90: 2d63 6f6d 7069 6c65 2d77 6172 6e20 2225 -compile-warn "% │ │ │ +00014fa0: 7320 2573 2063 616c 6c65 6420 7769 7468 s %s called with │ │ │ +00014fb0: 2025 6420 6172 6775 6d65 6e74 732c 2062 %d arguments, b │ │ │ +00014fc0: 7574 2061 6363 6570 7473 206f 6e6c 7920 ut accepts only │ │ │ +00014fd0: 2573 2220 6672 6565 2d76 6172 7320 7075 %s" free-vars pu │ │ │ +00014fe0: 7368 2071 756f 7465 2028 6375 7272 656e sh quote (curren │ │ │ +00014ff0: 742d 6c6f 6164 2d6c 6973 7429 2022 5468 t-load-list) "Th │ │ │ +00015000: 6972 6420 6172 6720 746f 2025 7320 2573 ird arg to %s %s │ │ │ +00015010: 2069 7320 6e6f 7420 6120 7374 7269 6e67 is not a string │ │ │ +00015020: 3a20 2573 2220 7075 7420 2776 6172 6961 : %s" put 'varia │ │ │ +00015030: 626c 652d 646f 6375 6d65 6e74 6174 696f ble-documentatio │ │ │ +00015040: 6e20 6465 6663 6f6e 7374 2073 6574 7120 n defconst setq │ │ │ +00015050: 6966 206e 6f74 2064 6566 6175 6c74 2d62 if not default-b │ │ │ +00015060: 6f75 6e64 7020 7365 742d 6465 6661 756c oundp set-defaul │ │ │ +00015070: 7420 6279 7465 2d63 6f6d 7069 6c65 2d62 t byte-compile-b │ │ │ +00015080: 6f64 7920 6e69 6c20 626f 6479 2066 6f72 ody nil body for │ │ │ +00015090: 2d65 6666 6563 7420 6279 7465 2d63 6f6d -effect byte-com │ │ │ +000150a0: 7069 6c65 2d77 6172 6e69 6e67 7320 6279 pile-warnings by │ │ │ +000150b0: 7465 2d63 6f6d 7069 6c65 2d67 6c6f 6261 te-compile-globa │ │ │ +000150c0: 6c2d 6269 7420 6279 7465 2d63 6f6d 7069 l-bit byte-compi │ │ │ +000150d0: 6c65 2d63 7572 7265 6e74 2d66 6f72 6d5d le-current-form] │ │ │ +000150e0: 2037 5d29 0a28 6465 6661 6c69 6173 2027 7]).(defalias ' │ │ │ +000150f0: 6279 7465 2d63 6f6d 7069 6c65 2d61 7574 byte-compile-aut │ │ │ +00015100: 6f6c 6f61 6420 235b 2866 6f72 6d29 2022 oload #[(form) " │ │ │ +00015110: 0841 403a ab88 0841 4040 c161 aa95 0841 .A@:...A@@.a...A │ │ │ +00015120: 4039 ab8e c208 4140 21ac 8a08 4140 c373 @9....A@!...A@.s │ │ │ +00015130: aa81 c4ab c0c5 0838 3aab 88c5 0838 40c1 .......8:....8@. │ │ │ +00015140: 61aa 95c5 0838 39ab 8ec2 c508 3821 ac8a a....89.....8!.. │ │ │ +00015150: c508 38c3 73aa 81c4 ab9b c6c5 0838 21c7 ..8.s........8!. │ │ │ +00015160: 73ab 92c8 c608 4140 2121 ac89 c9ca c608 s.....A@!!...... │ │ │ +00015170: 4140 215c 2288 cb08 2187 2220 5b66 6f72 A@!\"...!." [for │ │ │ +00015180: 6d20 7175 6f74 6520 6b65 7977 6f72 6470 m quote keywordp │ │ │ +00015190: 2028 6e69 6c20 7429 2074 2035 2065 7661 (nil t) t 5 eva │ │ │ +000151a0: 6c20 2874 206d 6163 726f 2920 6662 6f75 l (t macro) fbou │ │ │ +000151b0: 6e64 7020 6279 7465 2d63 6f6d 7069 6c65 ndp byte-compile │ │ │ +000151c0: 2d77 6172 6e20 2254 6865 2063 6f6d 7069 -warn "The compi │ │ │ +000151d0: 6c65 7220 6967 6e6f 7265 7320 6061 7574 ler ignores `aut │ │ │ +000151e0: 6f6c 6f61 6427 2065 7863 6570 7420 6174 oload' except at │ │ │ +000151f0: 2074 6f70 206c 6576 656c 2e20 2059 6f75 top level. You │ │ │ +00015200: 2073 686f 756c 645c 6e20 2020 2020 7072 should\n pr │ │ │ +00015210: 6f62 6162 6c79 2070 7574 2074 6865 2061 obably put the a │ │ │ +00015220: 7574 6f6c 6f61 6420 6f66 2074 6865 206d utoload of the m │ │ │ +00015230: 6163 726f 2060 2573 2720 6174 2074 6f70 acro `%s' at top │ │ │ +00015240: 2d6c 6576 656c 2e22 2062 7974 652d 636f -level." byte-co │ │ │ +00015250: 6d70 696c 652d 6e6f 726d 616c 2d63 616c mpile-normal-cal │ │ │ +00015260: 6c5d 2034 5d29 0a28 6465 6661 6c69 6173 l] 4]).(defalias │ │ │ +00015270: 2027 6279 7465 2d63 6f6d 7069 6c65 2d64 'byte-compile-d │ │ │ +00015280: 6566 616c 6961 7320 235b 2866 6f72 6d29 efalias #[(form) │ │ │ +00015290: 2022 0941 3aab db09 4140 3aab d509 4140 ".A:...A@:...A@ │ │ │ +000152a0: 40c2 61ab cd09 4140 413a abc6 0941 4041 @.a...A@A:...A@A │ │ │ +000152b0: 4039 abbe 0941 413a abb8 c309 383a abb2 @9...AA:....8:.. │ │ │ +000152c0: c309 3840 c261 abaa c309 3841 3aab a3c3 ..8@.a....8A:... │ │ │ +000152d0: 0938 4140 39ab 9bc4 0941 4041 40c3 0938 .8A@9....A@A@..8 │ │ │ +000152e0: 4140 5c22 8809 4140 4140 c309 3841 4042 A@\"..A@A@..8A@B │ │ │ +000152f0: 0842 10c5 0921 8722 205b 6279 7465 2d63 .B...!." [byte-c │ │ │ +00015300: 6f6d 7069 6c65 2d66 756e 6374 696f 6e2d ompile-function- │ │ │ +00015310: 656e 7669 726f 6e6d 656e 7420 666f 726d environment form │ │ │ +00015320: 2071 756f 7465 2032 2062 7974 652d 636f quote 2 byte-co │ │ │ +00015330: 6d70 696c 652d 6465 6661 6c69 6173 2d77 mpile-defalias-w │ │ │ +00015340: 6172 6e20 6279 7465 2d63 6f6d 7069 6c65 arn byte-compile │ │ │ +00015350: 2d6e 6f72 6d61 6c2d 6361 6c6c 5d20 345d -normal-call] 4] │ │ │ +00015360: 290a 2864 6566 616c 6961 7320 2762 7974 ).(defalias 'byt │ │ │ +00015370: 652d 636f 6d70 696c 652d 6465 6669 6e65 e-compile-define │ │ │ +00015380: 2d66 756e 6374 696f 6e20 235b 2866 6f72 -function #[(for │ │ │ +00015390: 6d29 2022 c108 2187 2220 5b66 6f72 6d20 m) "..!." [form │ │ │ +000153a0: 6279 7465 2d63 6f6d 7069 6c65 2d64 6566 byte-compile-def │ │ │ +000153b0: 616c 6961 735d 2032 5d29 0a28 6465 6661 alias] 2]).(defa │ │ │ +000153c0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +000153d0: 6c65 2d64 6566 616c 6961 732d 7761 726e le-defalias-warn │ │ │ +000153e0: 2023 5b28 6e65 7720 616c 6961 7329 2022 #[(new alias) " │ │ │ +000153f0: 085c 6eb7 8919 ad86 c309 5c6e 5c22 8912 .\n.......\n\".. │ │ │ +00015400: 2987 2220 5b6e 6577 2063 616c 6c73 2062 )." [new calls b │ │ │ +00015410: 7974 652d 636f 6d70 696c 652d 756e 7265 yte-compile-unre │ │ │ +00015420: 736f 6c76 6564 2d66 756e 6374 696f 6e73 solved-functions │ │ │ +00015430: 2064 656c 715d 2034 5d29 0a28 6465 6661 delq] 4]).(defa │ │ │ +00015440: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +00015450: 6c65 2d6d 616b 652d 7461 6720 235b 6e69 le-make-tag #[ni │ │ │ +00015460: 6c20 22c1 0854 8910 4487 2220 5b62 7974 l "..T..D." [byt │ │ │ +00015470: 652d 636f 6d70 696c 652d 7461 672d 6e75 e-compile-tag-nu │ │ │ +00015480: 6d62 6572 2054 4147 5d20 335d 290a 2864 mber TAG] 3]).(d │ │ │ +00015490: 6566 616c 6961 7320 2762 7974 652d 636f efalias 'byte-co │ │ │ +000154a0: 6d70 696c 652d 6f75 742d 7461 6720 235b mpile-out-tag #[ │ │ │ +000154b0: 2874 6167 2920 225c 6e08 4210 5c6e 4141 (tag) "\n.B.\nAA │ │ │ +000154c0: ab97 09ab 8e5c 6e41 4109 55ac 87c3 c45c .....\nAA.U....\ │ │ │ +000154d0: 6e41 405c 2288 5c6e 4141 8911 875c 6e41 nA@\".\nAA...\nA │ │ │ +000154e0: 09a1 8722 205b 6279 7465 2d63 6f6d 7069 ..." [byte-compi │ │ │ +000154f0: 6c65 2d6f 7574 7075 7420 6279 7465 2d63 le-output byte-c │ │ │ +00015500: 6f6d 7069 6c65 2d64 6570 7468 2074 6167 ompile-depth tag │ │ │ +00015510: 2065 7272 6f72 2022 436f 6d70 696c 6572 error "Compiler │ │ │ +00015520: 2062 7567 3a20 6465 7074 6820 636f 6e66 bug: depth conf │ │ │ +00015530: 6c69 6374 2061 7420 7461 6720 2564 225d lict at tag %d"] │ │ │ +00015540: 2033 5d29 0a28 6465 6661 6c69 6173 2027 3]).(defalias ' │ │ │ +00015550: 6279 7465 2d63 6f6d 7069 6c65 2d67 6f74 byte-compile-got │ │ │ +00015560: 6f20 235b 286f 7063 6f64 6520 7461 6729 o #[(opcode tag) │ │ │ +00015570: 2022 0b5c 6e42 0942 115c 6e41 0b08 73ab ".\nB.B.\nA..s. │ │ │ +00015580: 840c 53aa 810c a188 0bc5 613f ad82 0c53 ..S.......a?...S │ │ │ +00015590: 8914 8722 205b 6279 7465 2d67 6f74 6f2d ..." [byte-goto- │ │ │ +000155a0: 616c 7761 7973 2d70 6f70 2d6f 7073 2062 always-pop-ops b │ │ │ +000155b0: 7974 652d 636f 6d70 696c 652d 6f75 7470 yte-compile-outp │ │ │ +000155c0: 7574 2074 6167 206f 7063 6f64 6520 6279 ut tag opcode by │ │ │ +000155d0: 7465 2d63 6f6d 7069 6c65 2d64 6570 7468 te-compile-depth │ │ │ +000155e0: 2062 7974 652d 676f 746f 5d20 335d 290a byte-goto] 3]). │ │ │ +000155f0: 2864 6566 616c 6961 7320 2762 7974 652d (defalias 'byte- │ │ │ +00015600: 636f 6d70 696c 652d 6f75 7420 235b 286f compile-out #[(o │ │ │ +00015610: 7063 6f64 6520 6f66 6673 6574 2920 220c pcode offset) ". │ │ │ +00015620: 0b42 5c6e 4212 0cc6 61ab 860d 0b5a 8915 .B\nB...a....Z.. │ │ │ +00015630: 870c c761 ab84 c889 1587 0d08 0c4a 48ae ...a.........JH. │ │ │ +00015640: 830b 535b 5c5c 8915 095d 8911 8722 205b ..S[\\...]..." [ │ │ │ +00015650: 6279 7465 2d73 7461 636b 2b2d 696e 666f byte-stack+-info │ │ │ +00015660: 2062 7974 652d 636f 6d70 696c 652d 6d61 byte-compile-ma │ │ │ +00015670: 7864 6570 7468 2062 7974 652d 636f 6d70 xdepth byte-comp │ │ │ +00015680: 696c 652d 6f75 7470 7574 206f 6666 7365 ile-output offse │ │ │ +00015690: 7420 6f70 636f 6465 2062 7974 652d 636f t opcode byte-co │ │ │ +000156a0: 6d70 696c 652d 6465 7074 6820 6279 7465 mpile-depth byte │ │ │ +000156b0: 2d63 616c 6c20 6279 7465 2d72 6574 7572 -call byte-retur │ │ │ +000156c0: 6e20 6e69 6c5d 2034 5d29 0a28 6465 6661 n nil] 4]).(defa │ │ │ +000156d0: 6c69 6173 2027 6279 7465 2d63 6f6d 7069 lias 'byte-compi │ │ │ +000156e0: 6c65 2d61 6e6e 6f74 6174 652d 6361 6c6c le-annotate-call │ │ │ +000156f0: 2d74 7265 6520 235b 2866 6f72 6d29 2022 -tree #[(form) " │ │ │ +00015700: c41b 0940 5c6e b789 13ab 9208 0b41 4073 ...@\n.......A@s │ │ │ +00015710: ac94 0b41 080b 4140 42a0 88aa 8909 4008 ...A..A@B.....@. │ │ │ +00015720: 43c4 455c 6e42 1208 5c6e b789 13ab 9409 C.E\nB..\n...... │ │ │ +00015730: 40c5 0b38 73ae 960b 4141 0940 c50b 3842 @..8s...AA.@..8B │ │ │ +00015740: a0aa 8a08 c409 4043 455c 6e42 8912 2987 ......@CE\nB..). │ │ │ +00015750: 2220 5b62 7974 652d 636f 6d70 696c 652d " [byte-compile- │ │ │ +00015760: 6375 7272 656e 742d 666f 726d 2066 6f72 current-form for │ │ │ +00015770: 6d20 6279 7465 2d63 6f6d 7069 6c65 2d63 m byte-compile-c │ │ │ +00015780: 616c 6c2d 7472 6565 2065 6e74 7279 206e all-tree entry n │ │ │ +00015790: 696c 2032 5d20 345d 290a 2340 3630 3120 il 2] 4]).#@601 │ │ │ +000157a0: 4469 7370 6c61 7920 6120 6361 6c6c 2067 Display a call g │ │ │ +000157b0: 7261 7068 206f 6620 6120 7370 6563 6966 raph of a specif │ │ │ +000157c0: 6965 6420 6669 6c65 2e0a 5468 6973 206c ied file..This l │ │ │ +000157d0: 6973 7473 2077 6869 6368 2066 756e 6374 ists which funct │ │ │ +000157e0: 696f 6e73 2068 6176 6520 6265 656e 2063 ions have been c │ │ │ +000157f0: 616c 6c65 642c 2077 6861 7420 6675 6e63 alled, what func │ │ │ +00015800: 7469 6f6e 7320 6361 6c6c 6564 0a74 6865 tions called.the │ │ │ +00015810: 6d2c 2061 6e64 2077 6861 7420 6675 6e63 m, and what func │ │ │ +00015820: 7469 6f6e 7320 7468 6579 2063 616c 6c2e tions they call. │ │ │ +00015830: 2020 5468 6520 6c69 7374 2069 6e63 6c75 The list inclu │ │ │ +00015840: 6465 7320 616c 6c20 6675 6e63 7469 6f6e des all function │ │ │ +00015850: 730a 7768 6f73 6520 6465 6669 6e69 7469 s.whose definiti │ │ │ +00015860: 6f6e 7320 6861 7665 2062 6565 6e20 636f ons have been co │ │ │ +00015870: 6d70 696c 6564 2069 6e20 7468 6973 2045 mpiled in this E │ │ │ +00015880: 6d61 6373 2073 6573 7369 6f6e 2c20 6173 macs session, as │ │ │ +00015890: 2077 656c 6c20 6173 0a61 6c6c 2066 756e well as.all fun │ │ │ +000158a0: 6374 696f 6e73 2063 616c 6c65 6420 6279 ctions called by │ │ │ +000158b0: 2074 686f 7365 2066 756e 6374 696f 6e73 those functions │ │ │ +000158c0: 2e0a 0a54 6865 2063 616c 6c20 6772 6170 ...The call grap │ │ │ +000158d0: 6820 646f 6573 206e 6f74 2069 6e63 6c75 h does not inclu │ │ │ +000158e0: 6465 206d 6163 726f 732c 2069 6e6c 696e de macros, inlin │ │ │ +000158f0: 6520 6675 6e63 7469 6f6e 732c 206f 720a e functions, or. │ │ │ +00015900: 7072 696d 6974 6976 6573 2074 6861 7420 primitives that │ │ │ +00015910: 7468 6520 6279 7465 2d63 6f64 6520 696e the byte-code in │ │ │ +00015920: 7465 7270 7265 7465 7220 6b6e 6f77 7320 terpreter knows │ │ │ +00015930: 6162 6f75 7420 6469 7265 6374 6c79 2028 about directly ( │ │ │ +00015940: 6571 2c0a 636f 6e73 2c20 6574 632e 292e eq,.cons, etc.). │ │ │ +00015950: 0a0a 5468 6520 6361 6c6c 2074 7265 6520 ..The call tree │ │ │ +00015960: 616c 736f 206c 6973 7473 2074 686f 7365 also lists those │ │ │ +00015970: 2066 756e 6374 696f 6e73 2077 6869 6368 functions which │ │ │ +00015980: 2061 7265 206e 6f74 206b 6e6f 776e 2074 are not known t │ │ │ +00015990: 6f20 6265 2063 616c 6c65 640a 2874 6861 o be called.(tha │ │ │ +000159a0: 7420 6973 2c20 746f 2077 6869 6368 206e t is, to which n │ │ │ +000159b0: 6f20 6361 6c6c 7320 6861 7665 2062 6565 o calls have bee │ │ │ +000159c0: 6e20 636f 6d70 696c 6564 292c 2061 6e64 n compiled), and │ │ │ +000159d0: 2077 6869 6368 2063 616e 6e6f 7420 6265 which cannot be │ │ │ +000159e0: 0a69 6e76 6f6b 6564 2069 6e74 6572 6163 .invoked interac │ │ │ +000159f0: 7469 7665 6c79 2e1f 0a28 6465 6661 6c69 tively...(defali │ │ │ +00015a00: 6173 2027 6469 7370 6c61 792d 6361 6c6c as 'display-call │ │ │ +00015a10: 2d74 7265 6520 235b 2826 6f70 7469 6f6e -tree #[(&option │ │ │ +00015a20: 616c 2066 696c 656e 616d 6529 2022 c6c7 al filename) ".. │ │ │ +00015a30: 2188 c890 c871 88c9 2088 c6ca 0b5c 2288 !....q.. ....\". │ │ │ +00015a40: cb0e 41ac 870e 45ae 90cc aa8d 0e41 3bab ..A...E......A;. │ │ │ +00015a50: 840e 41aa 84cd 0e41 21ce cf0b 21d0 b105 ..A....A!...!... │ │ │ +00015a60: 880b abaa d10e 420b c261 ab83 d2aa 9c0b ......B..a...... │ │ │ +00015a70: c061 ab83 d3aa 940b d461 ab83 d5aa 8c0b .a.......a...... │ │ │ +00015a80: d661 ab83 d7aa 84d8 d90b 5c22 5c22 1642 .a........\"\".B │ │ │ +00015a90: c6c7 2188 0e42 70da 8989 8918 1a19 1d1e ..!..Bp......... │ │ │ +00015aa0: 4489 1c83 4101 db0c 4040 0e44 5c22 880c D...A...@@.D\".. │ │ │ +00015ab0: 4041 4012 dc0c 4038 10dd de0c 4040 8915 @A@...@8....@@.. │ │ │ +00015ac0: 21ac 890d ac83 dfaa d5e0 aad2 e10d 4b89 !.............K. │ │ │ +00015ad0: 1521 ab83 e2aa c70d 39ab 86e3 e40d 5c22 .!......9.....\" │ │ │ +00015ae0: aabd e50d 21ab 83e6 aab5 0d3a ac83 e7aa ....!......:.... │ │ │ +00015af0: ae0d 40e8 61ab 94e5 0d41 21ac 88e9 0d41 ..@.a....A!....A │ │ │ +00015b00: 4141 b7ab 83ea aa97 ebaa 94e9 0d41 41b7 AA...........AA. │ │ │ +00015b10: ab83 ecaa 8a0d 40ed 61ab 83ee aa81 cce3 ......@.a....... │ │ │ +00015b20: ef5c 6e47 0847 5c6e 4708 475c 5c24 f0b1 .\nG.G\nG.G\\$.. │ │ │ +00015b30: 0488 5c6e ab9e f163 8860 11f2 5c6e 40ab ..\n...c.`..\n@. │ │ │ +00015b40: 87f3 f45c 6ef5 23aa 81f6 b102 88f2 1e43 ...\n.#........C │ │ │ +00015b50: f709 605c 2288 2908 ab97 f863 8860 11f2 ..`\".)....c.`.. │ │ │ +00015b60: f3f4 08f5 23b1 0288 f21e 43f7 0960 5c22 ....#.....C..`\" │ │ │ +00015b70: 8829 f063 880c 4189 1484 7500 c6f9 2188 .).c..A...u...!. │ │ │ +00015b80: 0e42 14da 1e40 0cab a70c 4041 40ac 9b0c .B...@....@A@... │ │ │ +00015b90: 4040 8915 ab94 fa0d fb5c 22ac 8efc fa0d @@.......\"..... │ │ │ +00015ba0: da5c 2221 ac86 0d0e 4042 1640 0c41 8914 .\"!....@B.@.A.. │ │ │ +00015bb0: ac59 0e40 ab97 fd1e 43fe 6388 6011 f3f4 .Y.@....C.c.`... │ │ │ +00015bc0: 0e40 9ff5 2363 88f7 0960 5c22 8829 2e07 .@..#c...`\".).. │ │ │ +00015bd0: c6ff 2191 8722 205b 6361 6c6c 7320 7020 ..!.." [calls p │ │ │ +00015be0: 6361 6c6c 6572 7320 6279 7465 2d63 6f6d callers byte-com │ │ │ +00015bf0: 7069 6c65 2d63 616c 6c2d 7472 6565 2d73 pile-call-tree-s │ │ │ +00015c00: 6f72 7420 7265 7374 2066 206d 6573 7361 ort rest f messa │ │ │ +00015c10: 6765 2022 4765 6e65 7261 7469 6e67 2063 ge "Generating c │ │ │ +00015c20: 616c 6c20 7472 6565 2e2e 2e22 2022 2a43 all tree..." "*C │ │ │ +00015c30: 616c 6c2d 5472 6565 2a22 2065 7261 7365 all-Tree*" erase │ │ │ +00015c40: 2d62 7566 6665 7220 2247 656e 6572 6174 -buffer "Generat │ │ │ +00015c50: 696e 6720 6361 6c6c 2074 7265 652e 2e2e ing call tree... │ │ │ +00015c60: 2028 736f 7274 696e 6720 6f6e 2025 7329 (sorting on %s) │ │ │ +00015c70: 2220 2243 616c 6c20 7472 6565 2066 6f72 " "Call tree for │ │ │ +00015c80: 2022 2022 3f3f 3f22 2062 7566 6665 722d " "???" buffer- │ │ │ +00015c90: 6e61 6d65 2022 2073 6f72 7465 6420 6f6e name " sorted on │ │ │ +00015ca0: 2022 2070 7269 6e31 2d74 6f2d 7374 7269 " prin1-to-stri │ │ │ +00015cb0: 6e67 2022 3a5c 6e5c 6e22 2073 6f72 7420 ng ":\n\n" sort │ │ │ +00015cc0: 235b 2878 2079 2920 2209 4140 4708 4140 #[(x y) ".A@G.A@ │ │ │ +00015cd0: 4757 8722 205b 7920 785d 2032 5d20 235b GW." [y x] 2] #[ │ │ │ +00015ce0: 2878 2079 2920 22c2 0938 47c2 0838 4757 (x y) "..8G..8GW │ │ │ +00015cf0: 8722 205b 7920 7820 325d 2033 5d20 6361 ." [y x 2] 3] ca │ │ │ +00015d00: 6c6c 732b 6361 6c6c 6572 7320 235b 2878 lls+callers #[(x │ │ │ +00015d10: 2079 2920 2209 4140 47c2 0938 475c 5c08 y) ".A@G..8G\\. │ │ │ +00015d20: 4140 47c2 0838 475c 5c57 8722 205b 7920 A@G..8G\\W." [y │ │ │ +00015d30: 7820 325d 2034 5d20 6e61 6d65 2023 5b28 x 2] 4] name #[( │ │ │ +00015d40: 7820 7929 2022 0940 0840 9987 2220 5b79 x y) ".@.@.." [y │ │ │ +00015d50: 2078 5d20 325d 2065 7272 6f72 2022 6062 x] 2] error "`b │ │ │ +00015d60: 7974 652d 636f 6d70 696c 652d 6361 6c6c yte-compile-call │ │ │ +00015d70: 2d74 7265 652d 736f 7274 273a 2060 2573 -tree-sort': `%s │ │ │ +00015d80: 2720 2d20 756e 6b6e 6f77 6e20 736f 7274 ' - unknown sort │ │ │ +00015d90: 206d 6f64 6522 206e 696c 2070 7269 6e31 mode" nil prin1 │ │ │ +00015da0: 2032 2022 0922 2066 626f 756e 6470 2022 2 "." fboundp " │ │ │ +00015db0: 203c 746f 7020 6c65 7665 6c3e 2220 2220 " " │ │ │ +00015dc0: 3c6e 6f74 2064 6566 696e 6564 3e22 2073 " s │ │ │ +00015dd0: 7562 7270 2022 203c 7375 6272 3e22 2066 ubrp " " f │ │ │ +00015de0: 6f72 6d61 7420 2220 3d3d 3e20 2573 2220 ormat " ==> %s" │ │ │ +00015df0: 636f 6d70 696c 6564 2d66 756e 6374 696f compiled-functio │ │ │ +00015e00: 6e2d 7020 223c 636f 6d70 696c 6564 2066 n-p "" "" │ │ │ +00015e30: 206d 6163 726f 2062 7974 652d 636f 6465 macro byte-code │ │ │ +00015e40: 2022 203c 636f 6d70 696c 6564 206d 6163 " " " " │ │ │ +00015e60: 223c 636f 6d70 696c 6564 206c 616d 6264 "" lambda "" " (%d ca │ │ │ +00015e90: 6c6c 6572 7320 2b20 2564 2063 616c 6c73 llers + %d calls │ │ │ +00015ea0: 203d 2025 6429 2220 225c 6e22 2022 2020 = %d)" "\n" " │ │ │ +00015eb0: 6361 6c6c 6564 2062 793a 5c6e 2220 2220 called by:\n" " │ │ │ +00015ec0: 2020 2022 206d 6170 636f 6e63 6174 2073 " mapconcat s │ │ │ +00015ed0: 796d 626f 6c2d 6e61 6d65 2022 2c20 2220 ymbol-name ", " │ │ │ +00015ee0: 223c 746f 7020 6c65 7665 6c3e 2220 6669 "" fi │ │ │ +00015ef0: 6c6c 2d72 6567 696f 6e2d 6173 2d70 6172 ll-region-as-par │ │ │ +00015f00: 6167 7261 7068 2022 2020 6361 6c6c 733a agraph " calls: │ │ │ +00015f10: 5c6e 2220 2247 656e 6572 6174 696e 6720 \n" "Generating │ │ │ +00015f20: 6361 6c6c 2074 7265 652e 2e2e 2866 696e call tree...(fin │ │ │ +00015f30: 6469 6e67 2075 6e63 616c 6c65 6420 6675 ding uncalled fu │ │ │ +00015f40: 6e63 7469 6f6e 732e 2e2e 2922 2062 7974 nctions...)" byt │ │ │ +00015f50: 652d 636f 6d70 696c 652d 6664 6566 696e e-compile-fdefin │ │ │ +00015f60: 6974 696f 6e20 7420 636f 6d6d 616e 6470 ition t commandp │ │ │ +00015f70: 2022 2020 2220 224e 6f6e 696e 7465 7261 " " "Nonintera │ │ │ +00015f80: 6374 6976 6520 6675 6e63 7469 6f6e 7320 ctive functions │ │ │ +00015f90: 6e6f 7420 6b6e 6f77 6e20 746f 2062 6520 not known to be │ │ │ +00015fa0: 6361 6c6c 6564 3a5c 6e20 2022 2022 4765 called:\n " "Ge │ │ │ +00015fb0: 6e65 7261 7469 6e67 2063 616c 6c20 7472 nerating call tr │ │ │ +00015fc0: 6565 2e2e 2e64 6f6e 652e 2220 756e 6361 ee...done." unca │ │ │ +00015fd0: 6c6c 6564 2062 7974 652d 636f 6d70 696c lled byte-compil │ │ │ +00015fe0: 652d 6375 7272 656e 742d 6669 6c65 2062 e-current-file b │ │ │ +00015ff0: 7974 652d 636f 6d70 696c 652d 6361 6c6c yte-compile-call │ │ │ +00016000: 2d74 7265 6520 6669 6c6c 2d70 7265 6669 -tree fill-prefi │ │ │ +00016010: 7820 6220 6669 6c65 6e61 6d65 5d20 3130 x b filename] 10 │ │ │ +00016020: 2028 2324 202e 2038 3739 3638 2920 6e69 (#$ . 87968) ni │ │ │ +00016030: 6c5d 290a 2340 3239 3020 5275 6e20 6062 l]).#@290 Run `b │ │ │ +00016040: 7974 652d 636f 6d70 696c 652d 6669 6c65 yte-compile-file │ │ │ +00016050: 2720 6f6e 2074 6865 2066 696c 6573 2072 ' on the files r │ │ │ +00016060: 656d 6169 6e69 6e67 206f 6e20 7468 6520 emaining on the │ │ │ +00016070: 636f 6d6d 616e 6420 6c69 6e65 2e0a 5573 command line..Us │ │ │ +00016080: 6520 7468 6973 2066 726f 6d20 7468 6520 e this from the │ │ │ +00016090: 636f 6d6d 616e 6420 6c69 6e65 2c20 7769 command line, wi │ │ │ +000160a0: 7468 2060 2d62 6174 6368 273b 0a69 7420 th `-batch';.it │ │ │ +000160b0: 776f 6e27 7420 776f 726b 2069 6e20 616e won't work in an │ │ │ +000160c0: 2069 6e74 6572 6163 7469 7665 2045 6d61 interactive Ema │ │ │ +000160d0: 6373 2e0a 4561 6368 2066 696c 6520 6973 cs..Each file is │ │ │ +000160e0: 2070 726f 6365 7373 6564 2065 7665 6e20 processed even │ │ │ +000160f0: 6966 2061 6e20 6572 726f 7220 6f63 6375 if an error occu │ │ │ +00016100: 7272 6564 2070 7265 7669 6f75 736c 792e rred previously. │ │ │ +00016110: 0a46 6f72 2065 7861 6d70 6c65 2c20 696e .For example, in │ │ │ +00016120: 766f 6b65 2022 7865 6d61 6373 202d 6261 voke "xemacs -ba │ │ │ +00016130: 7463 6820 2d66 2062 6174 6368 2d62 7974 tch -f batch-byt │ │ │ +00016140: 652d 636f 6d70 696c 6520 2465 6d61 6373 e-compile $emacs │ │ │ +00016150: 2f20 7e2f 2a2e 656c 222e 1f0a 2864 6566 / ~/*.el"...(def │ │ │ +00016160: 616c 6961 7320 2762 6174 6368 2d62 7974 alias 'batch-byt │ │ │ +00016170: 652d 636f 6d70 696c 6520 235b 6e69 6c20 e-compile #[nil │ │ │ +00016180: 2209 ac84 c2c3 2188 c41a 08ab 88c5 20ac ".....!....... . │ │ │ +00016190: 79c6 12aa 75c7 c821 88c9 5c6e ab83 caaa y...u..!..\n.... │ │ │ +000161a0: 81cb 2129 8722 205b 636f 6d6d 616e 642d ..!)." [command- │ │ │ +000161b0: 6c69 6e65 2d61 7267 732d 6c65 6674 206e line-args-left n │ │ │ +000161c0: 6f6e 696e 7465 7261 6374 6976 6520 6572 oninteractive er │ │ │ +000161d0: 726f 7220 2260 6261 7463 682d 6279 7465 ror "`batch-byte │ │ │ +000161e0: 2d63 6f6d 7069 6c65 2720 6973 2074 6f20 -compile' is to │ │ │ +000161f0: 6265 2075 7365 6420 6f6e 6c79 2077 6974 be used only wit │ │ │ +00016200: 6820 2d62 6174 6368 2220 6e69 6c20 6261 h -batch" nil ba │ │ │ +00016210: 7463 682d 6279 7465 2d63 6f6d 7069 6c65 tch-byte-compile │ │ │ +00016220: 2d6f 6e65 2d66 696c 6520 7420 6d65 7373 -one-file t mess │ │ │ +00016230: 6167 6520 2244 6f6e 6522 206b 696c 6c2d age "Done" kill- │ │ │ +00016240: 656d 6163 7320 3120 305d 2032 2028 2324 emacs 1 0] 2 (#$ │ │ │ +00016250: 202e 2039 3031 3730 295d 290a 2340 3135 . 90170)]).#@15 │ │ │ +00016260: 3920 5275 6e20 6062 7974 652d 636f 6d70 9 Run `byte-comp │ │ │ +00016270: 696c 652d 6669 6c65 2720 6f6e 2061 2073 ile-file' on a s │ │ │ +00016280: 696e 676c 6520 6669 6c65 2072 656d 6169 ingle file remai │ │ │ +00016290: 6e69 6e67 206f 6e20 7468 6520 636f 6d6d ning on the comm │ │ │ +000162a0: 616e 6420 6c69 6e65 2e0a 5573 6520 7468 and line..Use th │ │ │ +000162b0: 6973 2066 726f 6d20 7468 6520 636f 6d6d is from the comm │ │ │ +000162c0: 616e 6420 6c69 6e65 2c20 7769 7468 2060 and line, with ` │ │ │ +000162d0: 2d62 6174 6368 273b 0a69 7420 776f 6e27 -batch';.it won' │ │ │ +000162e0: 7420 776f 726b 2069 6e20 616e 2069 6e74 t work in an int │ │ │ +000162f0: 6572 6163 7469 7665 2045 6d61 6373 2e1f eractive Emacs.. │ │ │ +00016300: 0a28 6465 6661 6c69 6173 2027 6261 7463 .(defalias 'batc │ │ │ +00016310: 682d 6279 7465 2d63 6f6d 7069 6c65 2d6f h-byte-compile-o │ │ │ +00016320: 6e65 2d66 696c 6520 235b 6e69 6c20 220e ne-file #[nil ". │ │ │ +00016330: 12ac 84c0 c621 88c7 0940 1c18 0941 11c8 .....!...@...A.. │ │ │ +00016340: c90c 2121 abc6 ca0c 21c7 891a 1b89 1dab ..!!....!....... │ │ │ +00016350: b6cb 0e13 0d40 5c22 aba8 cc0d 4021 aca2 .....@\"....@!.. │ │ │ +00016360: c90d 400c 5c22 8913 ab99 cd0b 2189 12ab ..@.\"......!... │ │ │ +00016370: 92ce 5c6e 21ab 8dcf 0b5c 6e5c 22ab 87d0 ..\n!....\n\"... │ │ │ +00016380: 0b21 ac82 d110 0d41 8915 ac4a 082b 3faa .!.....A...J.+?. │ │ │ +00016390: 83d0 0c21 2a87 2220 5b65 7272 6f72 2063 ...!*." [error c │ │ │ +000163a0: 6f6d 6d61 6e64 2d6c 696e 652d 6172 6773 ommand-line-args │ │ │ +000163b0: 2d6c 6566 7420 6465 7374 2073 6f75 7263 -left dest sourc │ │ │ +000163c0: 6520 6669 6c65 2d74 6f2d 7072 6f63 6573 e file-to-proces │ │ │ +000163d0: 7320 6669 6c65 7320 2260 6261 7463 682d s files "`batch- │ │ │ +000163e0: 6279 7465 2d63 6f6d 7069 6c65 2d6f 6e65 byte-compile-one │ │ │ +000163f0: 2d66 696c 6527 2069 7320 746f 2062 6520 -file' is to be │ │ │ +00016400: 7573 6564 206f 6e6c 7920 7769 7468 202d used only with - │ │ │ +00016410: 6261 7463 6822 206e 696c 2066 696c 652d batch" nil file- │ │ │ +00016420: 6469 7265 6374 6f72 792d 7020 6578 7061 directory-p expa │ │ │ +00016430: 6e64 2d66 696c 652d 6e61 6d65 2064 6972 nd-file-name dir │ │ │ +00016440: 6563 746f 7279 2d66 696c 6573 2073 7472 ectory-files str │ │ │ +00016450: 696e 672d 6d61 7463 6820 6175 746f 2d73 ing-match auto-s │ │ │ +00016460: 6176 652d 6669 6c65 2d6e 616d 652d 7020 ave-file-name-p │ │ │ +00016470: 6279 7465 2d63 6f6d 7069 6c65 2d64 6573 byte-compile-des │ │ │ +00016480: 742d 6669 6c65 2066 696c 652d 6578 6973 t-file file-exis │ │ │ +00016490: 7473 2d70 2066 696c 652d 6e65 7765 722d ts-p file-newer- │ │ │ +000164a0: 7468 616e 2d66 696c 652d 7020 6261 7463 than-file-p batc │ │ │ +000164b0: 682d 6279 7465 2d63 6f6d 7069 6c65 2d31 h-byte-compile-1 │ │ │ +000164c0: 2074 206e 6f6e 696e 7465 7261 6374 6976 t noninteractiv │ │ │ +000164d0: 6520 656d 6163 732d 6c69 7370 2d66 696c e emacs-lisp-fil │ │ │ +000164e0: 652d 7265 6765 7870 5d20 3420 2823 2420 e-regexp] 4 (#$ │ │ │ +000164f0: 2e20 3930 3732 3229 5d29 0a28 6465 6661 . 90722)]).(defa │ │ │ +00016500: 6c69 6173 2027 6261 7463 682d 6279 7465 lias 'batch-byte │ │ │ +00016510: 2d63 6f6d 7069 6c65 2d31 2023 5b28 6669 -compile-1 #[(fi │ │ │ +00016520: 6c65 2920 22c0 c1c2 8f87 2220 5b65 7272 le) "....." [err │ │ │ +00016530: 2028 6279 7465 2d63 6f64 6520 22c1 0821 (byte-code "..! │ │ │ +00016540: 88c2 8722 205b 6669 6c65 2062 7974 652d ..." [file byte- │ │ │ +00016550: 636f 6d70 696c 652d 6669 6c65 2074 5d20 compile-file t] │ │ │ +00016560: 3229 2028 2865 7272 6f72 2028 6279 7465 2) ((error (byte │ │ │ +00016570: 2d63 6f64 6520 22c2 c321 88c2 0821 88c2 -code "..!...!.. │ │ │ +00016580: c421 88c5 c621 ab87 c609 c75c 2288 aa91 .!...!.....\"... │ │ │ +00016590: c209 40c8 4eae 8209 4021 88c9 ca09 415c ..@.N...@!....A\ │ │ │ +000165a0: 2288 c2cb 2188 c787 2220 5b66 696c 6520 "...!..." [file │ │ │ +000165b0: 6572 7220 7072 696e 6320 223e 3e45 7272 err princ ">>Err │ │ │ +000165c0: 6f72 206f 6363 7572 7265 6420 7072 6f63 or occurred proc │ │ │ +000165d0: 6573 7369 6e67 2022 2022 3a20 2220 6662 essing " ": " fb │ │ │ +000165e0: 6f75 6e64 7020 6469 7370 6c61 792d 6572 oundp display-er │ │ │ +000165f0: 726f 7220 6e69 6c20 6572 726f 722d 6d65 ror nil error-me │ │ │ +00016600: 7373 6167 6520 6d61 7063 6172 2023 5b28 ssage mapcar #[( │ │ │ +00016610: 7829 2022 c1c2 2188 c308 2187 2220 5b78 x) "..!...!." [x │ │ │ +00016620: 2070 7269 6e63 2022 2022 2070 7269 6e31 princ " " prin1 │ │ │ +00016630: 5d20 325d 2022 5c6e 225d 2033 2929 295d ] 2] "\n"] 3)))] │ │ │ +00016640: 2033 5d29 0a23 4036 3520 5361 6d65 2061 3]).#@65 Same a │ │ │ +00016650: 7320 6062 6174 6368 2d62 7974 652d 7265 s `batch-byte-re │ │ │ +00016660: 636f 6d70 696c 652d 6469 7265 6374 6f72 compile-director │ │ │ +00016670: 7927 2062 7574 2077 6974 686f 7574 2072 y' but without r │ │ │ +00016680: 6563 7572 7369 6f6e 2e1f 0a28 6465 6661 ecursion...(defa │ │ │ +00016690: 6c69 6173 2027 6261 7463 682d 6279 7465 lias 'batch-byte │ │ │ +000166a0: 2d72 6563 6f6d 7069 6c65 2d64 6972 6563 -recompile-direc │ │ │ +000166b0: 746f 7279 2d6e 6f72 6563 7572 7365 2023 tory-norecurse # │ │ │ +000166c0: 5b6e 696c 2022 c110 c220 8722 205b 6279 [nil "... ." [by │ │ │ +000166d0: 7465 2d72 6563 6f6d 7069 6c65 2d64 6972 te-recompile-dir │ │ │ +000166e0: 6563 746f 7279 2d72 6563 7572 7369 7665 ectory-recursive │ │ │ +000166f0: 6c79 206e 696c 2062 6174 6368 2d62 7974 ly nil batch-byt │ │ │ +00016700: 652d 7265 636f 6d70 696c 652d 6469 7265 e-recompile-dire │ │ │ +00016710: 6374 6f72 795d 2031 2028 2324 202e 2039 ctory] 1 (#$ . 9 │ │ │ +00016720: 3137 3232 295d 290a 2340 3231 3320 5275 1722)]).#@213 Ru │ │ │ +00016730: 6e73 2060 6279 7465 2d72 6563 6f6d 7069 ns `byte-recompi │ │ │ +00016740: 6c65 2d64 6972 6563 746f 7279 2720 6f6e le-directory' on │ │ │ +00016750: 2074 6865 2064 6972 7320 7265 6d61 696e the dirs remain │ │ │ +00016760: 696e 6720 6f6e 2074 6865 2063 6f6d 6d61 ing on the comma │ │ │ +00016770: 6e64 206c 696e 652e 0a4d 7573 7420 6265 nd line..Must be │ │ │ +00016780: 2075 7365 6420 6f6e 6c79 2077 6974 6820 used only with │ │ │ +00016790: 602d 6261 7463 6827 2c20 616e 6420 6b69 `-batch', and ki │ │ │ +000167a0: 6c6c 7320 456d 6163 7320 6f6e 2063 6f6d lls Emacs on com │ │ │ +000167b0: 706c 6574 696f 6e2e 0a46 6f72 2065 7861 pletion..For exa │ │ │ +000167c0: 6d70 6c65 2c20 696e 766f 6b65 2060 7865 mple, invoke `xe │ │ │ +000167d0: 6d61 6373 202d 6261 7463 6820 2d66 2062 macs -batch -f b │ │ │ +000167e0: 6174 6368 2d62 7974 652d 7265 636f 6d70 atch-byte-recomp │ │ │ +000167f0: 696c 652d 6469 7265 6374 6f72 7920 2e27 ile-directory .' │ │ │ +00016800: 2e1f 0a28 6465 6661 6c69 6173 2027 6261 ...(defalias 'ba │ │ │ +00016810: 7463 682d 6279 7465 2d72 6563 6f6d 7069 tch-byte-recompi │ │ │ +00016820: 6c65 2d64 6972 6563 746f 7279 2023 5b6e le-directory #[n │ │ │ +00016830: 696c 2022 09ac 84c3 c421 885c 6eac 82c5 il ".....!.\n... │ │ │ +00016840: 12c6 185c 6eab 8bc7 5c6e 4021 885c 6e41 ...\n...\n@!.\nA │ │ │ +00016850: 8912 ac75 29c8 c921 8722 205b 6279 7465 ...u)..!." [byte │ │ │ +00016860: 2d72 6563 6f6d 7069 6c65 2d64 6972 6563 -recompile-direc │ │ │ +00016870: 746f 7279 2d69 676e 6f72 652d 6572 726f tory-ignore-erro │ │ │ +00016880: 7273 2d70 206e 6f6e 696e 7465 7261 6374 rs-p noninteract │ │ │ +00016890: 6976 6520 636f 6d6d 616e 642d 6c69 6e65 ive command-line │ │ │ +000168a0: 2d61 7267 732d 6c65 6674 2065 7272 6f72 -args-left error │ │ │ +000168b0: 2022 6261 7463 682d 6279 7465 2d72 6563 "batch-byte-rec │ │ │ +000168c0: 6f6d 7069 6c65 2d64 6972 6563 746f 7279 ompile-directory │ │ │ +000168d0: 2069 7320 746f 2062 6520 7573 6564 206f is to be used o │ │ │ +000168e0: 6e6c 7920 7769 7468 202d 6261 7463 6822 nly with -batch" │ │ │ +000168f0: 2028 222e 2229 2074 2062 7974 652d 7265 (".") t byte-re │ │ │ +00016900: 636f 6d70 696c 652d 6469 7265 6374 6f72 compile-director │ │ │ +00016910: 7920 6b69 6c6c 2d65 6d61 6373 2030 5d20 y kill-emacs 0] │ │ │ +00016920: 3320 2823 2420 2e20 3931 3935 3029 5d29 3 (#$ . 91950)]) │ │ │ +00016930: 0a28 6279 7465 2d63 6f64 6520 22c0 c1c2 .(byte-code "... │ │ │ +00016940: 5c22 88c0 c3c4 5c22 88c5 c621 88c5 c721 \"....\"...!...! │ │ │ +00016950: 88c8 c921 ab84 cacb 4d88 c087 2220 5b6d ...!....M..." [m │ │ │ +00016960: 616b 652d 6f62 736f 6c65 7465 2065 6c69 ake-obsolete eli │ │ │ +00016970: 7370 2d63 6f6d 7069 6c65 2d64 6566 756e sp-compile-defun │ │ │ +00016980: 2063 6f6d 7069 6c65 2d64 6566 756e 2062 compile-defun b │ │ │ +00016990: 7974 652d 636f 6d70 696c 652d 7265 706f yte-compile-repo │ │ │ +000169a0: 7274 2d63 616c 6c2d 7472 6565 2064 6973 rt-call-tree dis │ │ │ +000169b0: 706c 6179 2d63 616c 6c2d 7472 6565 2070 play-call-tree p │ │ │ +000169c0: 726f 7669 6465 2062 7974 652d 636f 6d70 rovide byte-comp │ │ │ +000169d0: 696c 6520 6279 7465 636f 6d70 2062 6f75 ile bytecomp bou │ │ │ +000169e0: 6e64 7020 6279 7465 2d63 6f64 652d 6d65 ndp byte-code-me │ │ │ +000169f0: 7465 7220 6279 7465 2d63 6f6d 7069 6c65 ter byte-compile │ │ │ +00016a00: 2d72 6570 6f72 742d 6f70 7320 235b 6e69 -report-ops #[ni │ │ │ +00016a10: 6c20 22c6 90c6 7188 c7c8 8989 1c1d 1a89 l "...q......... │ │ │ +00016a20: 1bc9 57ad d408 c748 0b48 12c8 140b 15c8 ..W....H.H...... │ │ │ +00016a30: 140d 0e15 57ab 8cca 0dcb 5c22 14ca 0dcc ....W.....\".... │ │ │ +00016a40: 5c22 15aa 8b0d 0959 ab86 0d09 5a14 0915 \".....Y....Z... │ │ │ +00016a50: 0e16 0d48 15cd ce0b 5c22 6388 cf0d 2163 ...H....\"c...!c │ │ │ +00016a60: 880c ab88 d0d1 0c21 d2b1 0388 d36a 88d1 .......!.....j.. │ │ │ +00016a70: 5c6e 21d4 b102 880b 5489 13aa 282c 9187 \n!.....T...(,.. │ │ │ +00016a80: 2220 5b62 7974 652d 636f 6465 2d6d 6574 " [byte-code-met │ │ │ +00016a90: 6572 2062 7974 652d 636f 6e73 7461 6e74 er byte-constant │ │ │ +00016aa0: 206e 2069 206f 6666 206f 7020 222a 4d65 n i off op "*Me │ │ │ +00016ab0: 7465 722a 2220 3020 6e69 6c20 3235 3620 ter*" 0 nil 256 │ │ │ +00016ac0: 6c6f 6761 6e64 2037 2032 3438 2066 6f72 logand 7 248 for │ │ │ +00016ad0: 6d61 7420 2225 2d34 6422 2073 796d 626f mat "%-4d" symbo │ │ │ +00016ae0: 6c2d 6e61 6d65 2022 205b 2220 696e 742d l-name " [" int- │ │ │ +00016af0: 746f 2d73 7472 696e 6720 225d 2220 3430 to-string "]" 40 │ │ │ +00016b00: 2022 5c6e 2220 6279 7465 2d6e 7468 2062 "\n" byte-nth b │ │ │ +00016b10: 7974 652d 636f 6465 2d76 6563 746f 725d yte-code-vector] │ │ │ +00016b20: 2036 5d5d 2033 290a 6]] 3). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/callers-of-rpt.elc │ │ │ @@ -1,144 +1,144 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 616c 6c65 7273 2d6f 662d 7270 742e 656c allers-of-rpt.el │ │ │ -000000a0: 0a3b 3b3b 2065 6d61 6373 2076 6572 7369 .;;; emacs versi │ │ │ -000000b0: 6f6e 2032 312e 3420 2870 6174 6368 2032 on 21.4 (patch 2 │ │ │ -000000c0: 3429 2022 5374 616e 6461 7264 2043 2220 4) "Standard C" │ │ │ -000000d0: 5845 6d61 6373 204c 7563 6964 2e0a 3b3b XEmacs Lucid..;; │ │ │ -000000e0: 3b20 6279 7465 636f 6d70 2076 6572 7369 ; bytecomp versi │ │ │ -000000f0: 6f6e 2032 2e32 3720 5845 6d61 6373 3b20 on 2.27 XEmacs; │ │ │ -00000100: 3230 3030 2d30 392d 3132 2e0a 3b3b 3b20 2000-09-12..;;; │ │ │ -00000110: 6f70 7469 6d69 7a61 7469 6f6e 2069 7320 optimization is │ │ │ -00000120: 6f6e 2e0a 3b3b 3b20 7468 6973 2066 696c on..;;; this fil │ │ │ -00000130: 6520 7573 6573 206f 7063 6f64 6573 2077 e uses opcodes w │ │ │ -00000140: 6869 6368 2064 6f20 6e6f 7420 6578 6973 hich do not exis │ │ │ -00000150: 7420 696e 2045 6d61 6373 2031 392e 0a0a t in Emacs 19... │ │ │ -00000160: 2869 6620 2861 6e64 2028 626f 756e 6470 (if (and (boundp │ │ │ -00000170: 2027 656d 6163 732d 7665 7273 696f 6e29 'emacs-version) │ │ │ -00000180: 0a09 2028 6f72 2028 616e 6420 2862 6f75 .. (or (and (bou │ │ │ -00000190: 6e64 7020 2765 706f 6368 3a3a 7665 7273 ndp 'epoch::vers │ │ │ -000001a0: 696f 6e29 2065 706f 6368 3a3a 7665 7273 ion) epoch::vers │ │ │ -000001b0: 696f 6e29 0a09 2020 2020 2028 7374 7269 ion).. (stri │ │ │ -000001c0: 6e67 2d6c 6573 7370 2065 6d61 6373 2d76 ng-lessp emacs-v │ │ │ -000001d0: 6572 7369 6f6e 2022 3230 2229 2929 0a20 ersion "20"))). │ │ │ -000001e0: 2020 2028 6572 726f 7220 2260 6361 6c6c (error "`call │ │ │ -000001f0: 6572 732d 6f66 2d72 7074 2e65 6c27 2077 ers-of-rpt.el' w │ │ │ -00000200: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ -00000210: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ -00000220: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ -00000230: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ -00000240: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ -00000250: 6c69 7374 206e 696c 2929 0a0a 0a23 4034 list nil))...#@4 │ │ │ -00000260: 3020 5768 6572 6520 7468 6520 5845 6d61 0 Where the XEma │ │ │ -00000270: 6373 2032 3020 6c69 7370 2073 6f75 7263 cs 20 lisp sourc │ │ │ -00000280: 6573 206c 6976 652e 1f0a 2864 6566 7661 es live...(defva │ │ │ -00000290: 7220 7865 6d61 6373 2d73 7263 2d6c 6973 r xemacs-src-lis │ │ │ -000002a0: 702d 6469 7220 222f 7573 722f 7372 632f p-dir "/usr/src/ │ │ │ -000002b0: 7865 6d61 6373 2d32 302e 302f 6c69 7370 xemacs-20.0/lisp │ │ │ -000002c0: 2f22 2028 2324 202e 2036 3130 2929 0a23 /" (#$ . 610)).# │ │ │ -000002d0: 4033 3820 5768 6572 6520 7468 6520 7061 @38 Where the pa │ │ │ -000002e0: 636b 6167 6520 6c69 7370 2073 6f75 7263 ckage lisp sourc │ │ │ -000002f0: 6573 206c 6976 652e 1f0a 2864 6566 7661 es live...(defva │ │ │ -00000300: 7220 7865 6d61 6373 2d70 6b67 2d6c 6973 r xemacs-pkg-lis │ │ │ -00000310: 702d 6469 7220 222f 686f 6d65 2f78 656d p-dir "/home/xem │ │ │ -00000320: 6163 732f 7061 636b 6167 6573 2f22 2028 acs/packages/" ( │ │ │ -00000330: 2324 202e 2037 3234 2929 0a23 4031 3237 #$ . 724)).#@127 │ │ │ -00000340: 2048 6173 6820 7461 626c 6520 6b65 7965 Hash table keye │ │ │ -00000350: 6420 6f6e 2074 6865 2073 796d 626f 6c73 d on the symbols │ │ │ -00000360: 2062 6569 6e67 2072 6571 7569 7265 642e being required. │ │ │ -00000370: 2020 4561 6368 2065 6c65 6d65 6e74 2077 Each element w │ │ │ -00000380: 696c 6c0a 2020 6265 2061 206c 6973 7420 ill. be a list │ │ │ -00000390: 6f66 2066 696c 652d 6e61 6d65 7320 6f66 of file-names of │ │ │ -000003a0: 2070 726f 6772 616d 7320 7468 6174 2064 programs that d │ │ │ -000003b0: 6570 656e 6420 6f6e 2074 6865 6d2e 1f0a epend on them... │ │ │ -000003c0: 2864 6566 636f 6e73 7420 6361 6c6c 6572 (defconst caller │ │ │ -000003d0: 2d74 6162 6c65 2028 6d61 6b65 2d68 6173 -table (make-has │ │ │ -000003e0: 682d 7461 626c 6520 3a74 6573 7420 2765 h-table :test 'e │ │ │ -000003f0: 7175 616c 2920 2823 2420 2e20 3833 3329 qual) (#$ . 833) │ │ │ -00000400: 290a 2340 3133 3220 4765 6e65 7261 7465 ).#@132 Generate │ │ │ -00000410: 2061 2073 696d 706c 6520 7265 706f 7274 a simple report │ │ │ -00000420: 2073 686f 7769 6e67 202e 656c 2066 696c showing .el fil │ │ │ -00000430: 6573 2074 6861 7420 6172 6520 6072 6571 es that are `req │ │ │ -00000440: 7569 7265 2764 2062 790a 2020 6f74 6865 uire'd by. othe │ │ │ -00000450: 7220 2e65 6c20 6669 6c65 732c 2061 6e64 r .el files, and │ │ │ -00000460: 2074 6865 206c 6973 7420 6f66 2070 726f the list of pro │ │ │ -00000470: 6772 616d 7320 7468 6174 2064 6570 656e grams that depen │ │ │ -00000480: 6420 6f6e 2074 6865 6d2e 1f0a 2864 6566 d on them...(def │ │ │ -00000490: 616c 6961 7320 276d 616b 652d 6361 6c6c alias 'make-call │ │ │ -000004a0: 6572 2d72 6570 6f72 7420 235b 6e69 6c20 er-report #[nil │ │ │ -000004b0: 22c6 c721 c6c8 21c9 1c1b 1dca 0d21 88cb "..!..!......!.. │ │ │ -000004c0: 0d21 88cc 0e2b 0d5c 2288 cd0d 2188 cecf .!...+.\"...!... │ │ │ -000004d0: 2188 d0d1 2188 d2d3 0e2c d4d5 d6d7 d30e !...!....,...... │ │ │ -000004e0: 2dd4 d5d6 d8b0 0c0d 5c22 88ce d921 8865 -.......\"...!.e │ │ │ -000004f0: 6288 d0d1 2188 6dac bbda 60db 5c5c dcc9 b...!.m...`.\\.. │ │ │ -00000500: 7788 600d 2314 ddde c9df 2388 da60 e0c9 w.`.#.....#..`.. │ │ │ -00000510: 7788 600d 2319 e109 085c 221e 2a0c 0e2a w.`.#....\".*..* │ │ │ -00000520: b6ac 89e2 090c 0e2a 4208 2388 2ae3 7988 .......*B.#.*.y. │ │ │ -00000530: d0d1 2188 aa42 ca0b 2188 cb0b 2188 cd0b ..!..B..!...!... │ │ │ -00000540: 2188 d0d1 2188 c91a e4e5 085c 2288 e65c !...!......\"..\ │ │ │ -00000550: 6ee7 5c22 12e8 e95c 6e5c 222c 8722 205b n.\"...\n\",." [ │ │ │ -00000560: 6361 6c6c 6572 2d74 6162 6c65 206b 6579 caller-table key │ │ │ -00000570: 206b 6579 7320 7270 7420 6669 6c65 2d6e keys rpt file-n │ │ │ -00000580: 616d 6520 636d 642d 6f75 7420 6765 742d ame cmd-out get- │ │ │ -00000590: 6275 6666 6572 2d63 7265 6174 6520 222a buffer-create "* │ │ │ -000005a0: 6361 6c6c 6572 2d72 6570 6f72 7420 6669 caller-report fi │ │ │ -000005b0: 6e64 2d67 7265 7020 6f75 7470 7574 2a22 nd-grep output*" │ │ │ -000005c0: 2022 2a20 6361 6c6c 6572 2072 6570 6f72 "* caller repor │ │ │ -000005d0: 7420 2a22 206e 696c 2073 7769 7463 682d t *" nil switch- │ │ │ -000005e0: 746f 2d62 7566 6665 7220 6275 6666 6572 to-buffer buffer │ │ │ -000005f0: 2d64 6973 6162 6c65 2d75 6e64 6f20 7365 -disable-undo se │ │ │ -00000600: 742d 7379 6e74 6178 2d74 6162 6c65 2065 t-syntax-table e │ │ │ -00000610: 7261 7365 2d62 7566 6665 7220 6d65 7373 rase-buffer mess │ │ │ -00000620: 6167 6520 2252 756e 6e69 6e67 2074 6865 age "Running the │ │ │ -00000630: 2066 696e 6420 7c20 6772 6570 2e2e 2e22 find | grep..." │ │ │ -00000640: 2073 6974 2d66 6f72 2030 2073 6865 6c6c sit-for 0 shell │ │ │ -00000650: 2d63 6f6d 6d61 6e64 2022 6364 2022 2022 -command "cd " " │ │ │ -00000660: 203b 2220 2267 7265 7020 2d48 2027 2872 ;" "grep -H '(r │ │ │ -00000670: 6571 7569 7265 2027 2024 2866 696e 6420 equire ' $(find │ │ │ -00000680: 2d6e 616d 6520 272a 2e65 6c27 202d 7072 -name '*.el' -pr │ │ │ -00000690: 696e 7429 207c 2220 2220 6772 6570 202d int) |" " grep - │ │ │ -000006a0: 7620 2761 7574 6f2d 6175 746f 6c6f 6164 v 'auto-autoload │ │ │ -000006b0: 735c 5c2e 656c 5c5c 7c63 616c 6c65 7273 s\\.el\\|callers │ │ │ -000006c0: 2d6f 662d 7270 745c 5c2e 656c 2720 7c22 -of-rpt\\.el' |" │ │ │ -000006d0: 2022 2067 7265 7020 2d76 2027 656c 3a5b " grep -v 'el:[ │ │ │ -000006e0: 2009 5d2a 3b5c 5c7c 7265 7175 6972 6520 .]*;\\|require │ │ │ -000006f0: 6c6f 6164 2720 3b22 2022 2067 7265 7020 load' ;" " grep │ │ │ -00000700: 2d76 2027 656c 3a5b 2009 5d2a 3b27 203b -v 'el:[ .]*;' ; │ │ │ -00000710: 2220 2252 756e 6e69 6e67 2074 6865 2066 " "Running the f │ │ │ -00000720: 696e 6420 7c20 6772 6570 2e2e 2e20 446f ind | grep... Do │ │ │ -00000730: 6e65 2e22 2062 7566 6665 722d 7375 6273 ne." buffer-subs │ │ │ -00000740: 7472 696e 6720 3220 225e 3a22 2072 652d tring 2 "^:" re- │ │ │ -00000750: 7365 6172 6368 2d66 6f72 7761 7264 2022 search-forward " │ │ │ -00000760: 2872 6571 7569 7265 2027 2220 7420 225e (require '" t "^ │ │ │ -00000770: 2920 2220 6765 7468 6173 6820 7075 7468 ) " gethash puth │ │ │ -00000780: 6173 6820 3120 6d61 7068 6173 6820 235b ash 1 maphash #[ │ │ │ -00000790: 286b 6579 2076 616c 2920 2208 0942 8911 (key val) "..B.. │ │ │ -000007a0: 8722 205b 6b65 7920 6b65 7973 5d20 325d ." [key keys] 2] │ │ │ -000007b0: 2073 6f72 7420 7374 7269 6e67 3c20 6d61 sort string< ma │ │ │ -000007c0: 7063 2023 5b28 6b65 7929 2022 c3c4 095c pc #[(key) "...\ │ │ │ -000007d0: 2263 88c5 0908 5c22 1a5c 6eab 92c3 c65c "c....\".\n....\ │ │ │ -000007e0: 6e40 5c22 6388 5c6e 4189 12ab 70c7 6388 n@\"c.\nA...p.c. │ │ │ -000007f0: aa6b 29c8 6388 c9ca 2187 2220 5b63 616c .k).c...!." [cal │ │ │ -00000800: 6c65 722d 7461 626c 6520 6b65 7920 6c73 ler-table key ls │ │ │ -00000810: 7420 666f 726d 6174 2022 2825 7320 2728 t format "(%s '( │ │ │ -00000820: 2220 6765 7468 6173 6820 2225 5322 2022 " gethash "%S" " │ │ │ -00000830: 2022 2022 2929 5c6e 2220 7369 742d 666f " "))\n" sit-fo │ │ │ -00000840: 7220 305d 2034 5d20 6c73 7420 656d 6163 r 0] 4] lst emac │ │ │ -00000850: 732d 6c69 7370 2d6d 6f64 652d 7379 6e74 s-lisp-mode-synt │ │ │ -00000860: 6178 2d74 6162 6c65 2078 656d 6163 732d ax-table xemacs- │ │ │ -00000870: 7372 632d 6c69 7370 2d64 6972 2078 656d src-lisp-dir xem │ │ │ -00000880: 6163 732d 706b 672d 6c69 7370 2d64 6972 acs-pkg-lisp-dir │ │ │ -00000890: 5d20 3133 2028 2324 202e 2031 3033 3229 ] 13 (#$ . 1032) │ │ │ -000008a0: 206e 696c 5d29 0a28 6279 7465 2d63 6f64 nil]).(byte-cod │ │ │ -000008b0: 6520 22c0 c121 88c2 2088 c120 8722 205b e "..!.. .. ." [ │ │ │ -000008c0: 6279 7465 2d63 6f6d 7069 6c65 206d 616b byte-compile mak │ │ │ -000008d0: 652d 6361 6c6c 6572 2d72 6570 6f72 7420 e-caller-report │ │ │ -000008e0: 6465 6c65 7465 2d6f 7468 6572 2d77 696e delete-other-win │ │ │ -000008f0: 646f 7773 5d20 3229 0a dows] 2). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3530 2032 3032 310a 3b3b 3b20 :08:50 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 616c 6c65 7273 2d6f 4/lisp/callers-o │ │ │ +00000090: 662d 7270 742e 656c 0a3b 3b3b 2065 6d61 f-rpt.el.;;; ema │ │ │ +000000a0: 6373 2076 6572 7369 6f6e 2032 312e 3420 cs version 21.4 │ │ │ +000000b0: 2870 6174 6368 2032 3429 2022 5374 616e (patch 24) "Stan │ │ │ +000000c0: 6461 7264 2043 2220 5845 6d61 6373 204c dard C" XEmacs L │ │ │ +000000d0: 7563 6964 2e0a 3b3b 3b20 6279 7465 636f ucid..;;; byteco │ │ │ +000000e0: 6d70 2076 6572 7369 6f6e 2032 2e32 3720 mp version 2.27 │ │ │ +000000f0: 5845 6d61 6373 3b20 3230 3030 2d30 392d XEmacs; 2000-09- │ │ │ +00000100: 3132 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 12..;;; optimiza │ │ │ +00000110: 7469 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 tion is on..;;; │ │ │ +00000120: 7468 6973 2066 696c 6520 7573 6573 206f this file uses o │ │ │ +00000130: 7063 6f64 6573 2077 6869 6368 2064 6f20 pcodes which do │ │ │ +00000140: 6e6f 7420 6578 6973 7420 696e 2045 6d61 not exist in Ema │ │ │ +00000150: 6373 2031 392e 0a0a 2869 6620 2861 6e64 cs 19...(if (and │ │ │ +00000160: 2028 626f 756e 6470 2027 656d 6163 732d (boundp 'emacs- │ │ │ +00000170: 7665 7273 696f 6e29 0a09 2028 6f72 2028 version).. (or ( │ │ │ +00000180: 616e 6420 2862 6f75 6e64 7020 2765 706f and (boundp 'epo │ │ │ +00000190: 6368 3a3a 7665 7273 696f 6e29 2065 706f ch::version) epo │ │ │ +000001a0: 6368 3a3a 7665 7273 696f 6e29 0a09 2020 ch::version).. │ │ │ +000001b0: 2020 2028 7374 7269 6e67 2d6c 6573 7370 (string-lessp │ │ │ +000001c0: 2065 6d61 6373 2d76 6572 7369 6f6e 2022 emacs-version " │ │ │ +000001d0: 3230 2229 2929 0a20 2020 2028 6572 726f 20"))). (erro │ │ │ +000001e0: 7220 2260 6361 6c6c 6572 732d 6f66 2d72 r "`callers-of-r │ │ │ +000001f0: 7074 2e65 6c27 2077 6173 2063 6f6d 7069 pt.el' was compi │ │ │ +00000200: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ +00000210: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ +00000220: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ +00000230: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ +00000240: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ +00000250: 2929 0a0a 0a23 4034 3020 5768 6572 6520 ))...#@40 Where │ │ │ +00000260: 7468 6520 5845 6d61 6373 2032 3020 6c69 the XEmacs 20 li │ │ │ +00000270: 7370 2073 6f75 7263 6573 206c 6976 652e sp sources live. │ │ │ +00000280: 1f0a 2864 6566 7661 7220 7865 6d61 6373 ..(defvar xemacs │ │ │ +00000290: 2d73 7263 2d6c 6973 702d 6469 7220 222f -src-lisp-dir "/ │ │ │ +000002a0: 7573 722f 7372 632f 7865 6d61 6373 2d32 usr/src/xemacs-2 │ │ │ +000002b0: 302e 302f 6c69 7370 2f22 2028 2324 202e 0.0/lisp/" (#$ . │ │ │ +000002c0: 2036 3032 2929 0a23 4033 3820 5768 6572 602)).#@38 Wher │ │ │ +000002d0: 6520 7468 6520 7061 636b 6167 6520 6c69 e the package li │ │ │ +000002e0: 7370 2073 6f75 7263 6573 206c 6976 652e sp sources live. │ │ │ +000002f0: 1f0a 2864 6566 7661 7220 7865 6d61 6373 ..(defvar xemacs │ │ │ +00000300: 2d70 6b67 2d6c 6973 702d 6469 7220 222f -pkg-lisp-dir "/ │ │ │ +00000310: 686f 6d65 2f78 656d 6163 732f 7061 636b home/xemacs/pack │ │ │ +00000320: 6167 6573 2f22 2028 2324 202e 2037 3136 ages/" (#$ . 716 │ │ │ +00000330: 2929 0a23 4031 3237 2048 6173 6820 7461 )).#@127 Hash ta │ │ │ +00000340: 626c 6520 6b65 7965 6420 6f6e 2074 6865 ble keyed on the │ │ │ +00000350: 2073 796d 626f 6c73 2062 6569 6e67 2072 symbols being r │ │ │ +00000360: 6571 7569 7265 642e 2020 4561 6368 2065 equired. Each e │ │ │ +00000370: 6c65 6d65 6e74 2077 696c 6c0a 2020 6265 lement will. be │ │ │ +00000380: 2061 206c 6973 7420 6f66 2066 696c 652d a list of file- │ │ │ +00000390: 6e61 6d65 7320 6f66 2070 726f 6772 616d names of program │ │ │ +000003a0: 7320 7468 6174 2064 6570 656e 6420 6f6e s that depend on │ │ │ +000003b0: 2074 6865 6d2e 1f0a 2864 6566 636f 6e73 them...(defcons │ │ │ +000003c0: 7420 6361 6c6c 6572 2d74 6162 6c65 2028 t caller-table ( │ │ │ +000003d0: 6d61 6b65 2d68 6173 682d 7461 626c 6520 make-hash-table │ │ │ +000003e0: 3a74 6573 7420 2765 7175 616c 2920 2823 :test 'equal) (# │ │ │ +000003f0: 2420 2e20 3832 3529 290a 2340 3133 3220 $ . 825)).#@132 │ │ │ +00000400: 4765 6e65 7261 7465 2061 2073 696d 706c Generate a simpl │ │ │ +00000410: 6520 7265 706f 7274 2073 686f 7769 6e67 e report showing │ │ │ +00000420: 202e 656c 2066 696c 6573 2074 6861 7420 .el files that │ │ │ +00000430: 6172 6520 6072 6571 7569 7265 2764 2062 are `require'd b │ │ │ +00000440: 790a 2020 6f74 6865 7220 2e65 6c20 6669 y. other .el fi │ │ │ +00000450: 6c65 732c 2061 6e64 2074 6865 206c 6973 les, and the lis │ │ │ +00000460: 7420 6f66 2070 726f 6772 616d 7320 7468 t of programs th │ │ │ +00000470: 6174 2064 6570 656e 6420 6f6e 2074 6865 at depend on the │ │ │ +00000480: 6d2e 1f0a 2864 6566 616c 6961 7320 276d m...(defalias 'm │ │ │ +00000490: 616b 652d 6361 6c6c 6572 2d72 6570 6f72 ake-caller-repor │ │ │ +000004a0: 7420 235b 6e69 6c20 22c6 c721 c6c8 21c9 t #[nil "..!..!. │ │ │ +000004b0: 1c1b 1dca 0d21 88cb 0d21 88cc 0e2b 0d5c .....!...!...+.\ │ │ │ +000004c0: 2288 cd0d 2188 cecf 2188 d0d1 2188 d2d3 "...!...!...!... │ │ │ +000004d0: 0e2c d4d5 d6d7 d30e 2dd4 d5d6 d8b0 0c0d .,......-....... │ │ │ +000004e0: 5c22 88ce d921 8865 6288 d0d1 2188 6dac \"...!.eb...!.m. │ │ │ +000004f0: bbda 60db 5c5c dcc9 7788 600d 2314 ddde ..`.\\..w.`.#... │ │ │ +00000500: c9df 2388 da60 e0c9 7788 600d 2319 e109 ..#..`..w.`.#... │ │ │ +00000510: 085c 221e 2a0c 0e2a b6ac 89e2 090c 0e2a .\".*..*.......* │ │ │ +00000520: 4208 2388 2ae3 7988 d0d1 2188 aa42 ca0b B.#.*.y...!..B.. │ │ │ +00000530: 2188 cb0b 2188 cd0b 2188 d0d1 2188 c91a !...!...!...!... │ │ │ +00000540: e4e5 085c 2288 e65c 6ee7 5c22 12e8 e95c ...\"..\n.\"...\ │ │ │ +00000550: 6e5c 222c 8722 205b 6361 6c6c 6572 2d74 n\",." [caller-t │ │ │ +00000560: 6162 6c65 206b 6579 206b 6579 7320 7270 able key keys rp │ │ │ +00000570: 7420 6669 6c65 2d6e 616d 6520 636d 642d t file-name cmd- │ │ │ +00000580: 6f75 7420 6765 742d 6275 6666 6572 2d63 out get-buffer-c │ │ │ +00000590: 7265 6174 6520 222a 6361 6c6c 6572 2d72 reate "*caller-r │ │ │ +000005a0: 6570 6f72 7420 6669 6e64 2d67 7265 7020 eport find-grep │ │ │ +000005b0: 6f75 7470 7574 2a22 2022 2a20 6361 6c6c output*" "* call │ │ │ +000005c0: 6572 2072 6570 6f72 7420 2a22 206e 696c er report *" nil │ │ │ +000005d0: 2073 7769 7463 682d 746f 2d62 7566 6665 switch-to-buffe │ │ │ +000005e0: 7220 6275 6666 6572 2d64 6973 6162 6c65 r buffer-disable │ │ │ +000005f0: 2d75 6e64 6f20 7365 742d 7379 6e74 6178 -undo set-syntax │ │ │ +00000600: 2d74 6162 6c65 2065 7261 7365 2d62 7566 -table erase-buf │ │ │ +00000610: 6665 7220 6d65 7373 6167 6520 2252 756e fer message "Run │ │ │ +00000620: 6e69 6e67 2074 6865 2066 696e 6420 7c20 ning the find | │ │ │ +00000630: 6772 6570 2e2e 2e22 2073 6974 2d66 6f72 grep..." sit-for │ │ │ +00000640: 2030 2073 6865 6c6c 2d63 6f6d 6d61 6e64 0 shell-command │ │ │ +00000650: 2022 6364 2022 2022 203b 2220 2267 7265 "cd " " ;" "gre │ │ │ +00000660: 7020 2d48 2027 2872 6571 7569 7265 2027 p -H '(require ' │ │ │ +00000670: 2024 2866 696e 6420 2d6e 616d 6520 272a $(find -name '* │ │ │ +00000680: 2e65 6c27 202d 7072 696e 7429 207c 2220 .el' -print) |" │ │ │ +00000690: 2220 6772 6570 202d 7620 2761 7574 6f2d " grep -v 'auto- │ │ │ +000006a0: 6175 746f 6c6f 6164 735c 5c2e 656c 5c5c autoloads\\.el\\ │ │ │ +000006b0: 7c63 616c 6c65 7273 2d6f 662d 7270 745c |callers-of-rpt\ │ │ │ +000006c0: 5c2e 656c 2720 7c22 2022 2067 7265 7020 \.el' |" " grep │ │ │ +000006d0: 2d76 2027 656c 3a5b 2009 5d2a 3b5c 5c7c -v 'el:[ .]*;\\| │ │ │ +000006e0: 7265 7175 6972 6520 6c6f 6164 2720 3b22 require load' ;" │ │ │ +000006f0: 2022 2067 7265 7020 2d76 2027 656c 3a5b " grep -v 'el:[ │ │ │ +00000700: 2009 5d2a 3b27 203b 2220 2252 756e 6e69 .]*;' ;" "Runni │ │ │ +00000710: 6e67 2074 6865 2066 696e 6420 7c20 6772 ng the find | gr │ │ │ +00000720: 6570 2e2e 2e20 446f 6e65 2e22 2062 7566 ep... Done." buf │ │ │ +00000730: 6665 722d 7375 6273 7472 696e 6720 3220 fer-substring 2 │ │ │ +00000740: 225e 3a22 2072 652d 7365 6172 6368 2d66 "^:" re-search-f │ │ │ +00000750: 6f72 7761 7264 2022 2872 6571 7569 7265 orward "(require │ │ │ +00000760: 2027 2220 7420 225e 2920 2220 6765 7468 '" t "^) " geth │ │ │ +00000770: 6173 6820 7075 7468 6173 6820 3120 6d61 ash puthash 1 ma │ │ │ +00000780: 7068 6173 6820 235b 286b 6579 2076 616c phash #[(key val │ │ │ +00000790: 2920 2208 0942 8911 8722 205b 6b65 7920 ) "..B..." [key │ │ │ +000007a0: 6b65 7973 5d20 325d 2073 6f72 7420 7374 keys] 2] sort st │ │ │ +000007b0: 7269 6e67 3c20 6d61 7063 2023 5b28 6b65 ring< mapc #[(ke │ │ │ +000007c0: 7929 2022 c3c4 095c 2263 88c5 0908 5c22 y) "...\"c....\" │ │ │ +000007d0: 1a5c 6eab 92c3 c65c 6e40 5c22 6388 5c6e .\n....\n@\"c.\n │ │ │ +000007e0: 4189 12ab 70c7 6388 aa6b 29c8 6388 c9ca A...p.c..k).c... │ │ │ +000007f0: 2187 2220 5b63 616c 6c65 722d 7461 626c !." [caller-tabl │ │ │ +00000800: 6520 6b65 7920 6c73 7420 666f 726d 6174 e key lst format │ │ │ +00000810: 2022 2825 7320 2728 2220 6765 7468 6173 "(%s '(" gethas │ │ │ +00000820: 6820 2225 5322 2022 2022 2022 2929 5c6e h "%S" " " "))\n │ │ │ +00000830: 2220 7369 742d 666f 7220 305d 2034 5d20 " sit-for 0] 4] │ │ │ +00000840: 6c73 7420 656d 6163 732d 6c69 7370 2d6d lst emacs-lisp-m │ │ │ +00000850: 6f64 652d 7379 6e74 6178 2d74 6162 6c65 ode-syntax-table │ │ │ +00000860: 2078 656d 6163 732d 7372 632d 6c69 7370 xemacs-src-lisp │ │ │ +00000870: 2d64 6972 2078 656d 6163 732d 706b 672d -dir xemacs-pkg- │ │ │ +00000880: 6c69 7370 2d64 6972 5d20 3133 2028 2324 lisp-dir] 13 (#$ │ │ │ +00000890: 202e 2031 3032 3429 206e 696c 5d29 0a28 . 1024) nil]).( │ │ │ +000008a0: 6279 7465 2d63 6f64 6520 22c0 c121 88c2 byte-code "..!.. │ │ │ +000008b0: 2088 c120 8722 205b 6279 7465 2d63 6f6d .. ." [byte-com │ │ │ +000008c0: 7069 6c65 206d 616b 652d 6361 6c6c 6572 pile make-caller │ │ │ +000008d0: 2d72 6570 6f72 7420 6465 6c65 7465 2d6f -report delete-o │ │ │ +000008e0: 7468 6572 2d77 696e 646f 7773 5d20 3229 ther-windows] 2) │ │ │ +000008f0: 0a . │ │ ├── ./usr/share/xemacs-21.4.24/lisp/check-features.elc │ │ │ @@ -1,83 +1,83 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6865 636b 2d66 6561 7475 7265 732e 656c heck-features.el │ │ │ -000000a0: 0a3b 3b3b 2065 6d61 6373 2076 6572 7369 .;;; emacs versi │ │ │ -000000b0: 6f6e 2032 312e 3420 2870 6174 6368 2032 on 21.4 (patch 2 │ │ │ -000000c0: 3429 2022 5374 616e 6461 7264 2043 2220 4) "Standard C" │ │ │ -000000d0: 5845 6d61 6373 204c 7563 6964 2e0a 3b3b XEmacs Lucid..;; │ │ │ -000000e0: 3b20 6279 7465 636f 6d70 2076 6572 7369 ; bytecomp versi │ │ │ -000000f0: 6f6e 2032 2e32 3720 5845 6d61 6373 3b20 on 2.27 XEmacs; │ │ │ -00000100: 3230 3030 2d30 392d 3132 2e0a 3b3b 3b20 2000-09-12..;;; │ │ │ -00000110: 6f70 7469 6d69 7a61 7469 6f6e 2069 7320 optimization is │ │ │ -00000120: 6f6e 2e0a 3b3b 3b20 7468 6973 2066 696c on..;;; this fil │ │ │ -00000130: 6520 7573 6573 206f 7063 6f64 6573 2077 e uses opcodes w │ │ │ -00000140: 6869 6368 2064 6f20 6e6f 7420 6578 6973 hich do not exis │ │ │ -00000150: 7420 696e 2045 6d61 6373 2031 392e 0a0a t in Emacs 19... │ │ │ -00000160: 2869 6620 2861 6e64 2028 626f 756e 6470 (if (and (boundp │ │ │ -00000170: 2027 656d 6163 732d 7665 7273 696f 6e29 'emacs-version) │ │ │ -00000180: 0a09 2028 6f72 2028 616e 6420 2862 6f75 .. (or (and (bou │ │ │ -00000190: 6e64 7020 2765 706f 6368 3a3a 7665 7273 ndp 'epoch::vers │ │ │ -000001a0: 696f 6e29 2065 706f 6368 3a3a 7665 7273 ion) epoch::vers │ │ │ -000001b0: 696f 6e29 0a09 2020 2020 2028 7374 7269 ion).. (stri │ │ │ -000001c0: 6e67 2d6c 6573 7370 2065 6d61 6373 2d76 ng-lessp emacs-v │ │ │ -000001d0: 6572 7369 6f6e 2022 3230 2229 2929 0a20 ersion "20"))). │ │ │ -000001e0: 2020 2028 6572 726f 7220 2260 6368 6563 (error "`chec │ │ │ -000001f0: 6b2d 6665 6174 7572 6573 2e65 6c27 2077 k-features.el' w │ │ │ -00000200: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ -00000210: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ -00000220: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ -00000230: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ -00000240: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ -00000250: 6c69 7374 206e 696c 2929 0a0a 0a28 6279 list nil))...(by │ │ │ -00000260: 7465 2d63 6f64 6520 22c2 c321 88c0 0942 te-code "..!...B │ │ │ -00000270: 11c4 c021 ac85 c5c0 c65c 2288 c7c8 21ab ...!.....\"...!. │ │ │ -00000280: 85c9 cacb 8f88 c7cc 21ab 85c9 cdce 8f88 ........!....... │ │ │ -00000290: cf08 2187 2220 5b62 7569 6c64 2d65 7272 ..!." [build-err │ │ │ -000002a0: 6f72 2063 7572 7265 6e74 2d6c 6f61 642d or current-load- │ │ │ -000002b0: 6c69 7374 2072 6571 7569 7265 2070 6163 list require pac │ │ │ -000002c0: 6b61 6765 7320 6465 6661 756c 742d 626f kages default-bo │ │ │ -000002d0: 756e 6470 2073 6574 2d64 6566 6175 6c74 undp set-default │ │ │ -000002e0: 2030 2066 6561 7475 7265 7020 746f 6f6c 0 featurep tool │ │ │ -000002f0: 7461 6c6b 206e 696c 2028 6279 7465 2d63 talk nil (byte-c │ │ │ -00000300: 6f64 6520 22c0 c1c2 5c22 8722 205b 7061 ode "...\"." [pa │ │ │ -00000310: 636b 6167 652d 7265 7175 6972 6520 746f ckage-require to │ │ │ -00000320: 6f6c 7461 6c6b 2031 2e30 5d20 3329 2028 oltalk 1.0] 3) ( │ │ │ -00000330: 2874 2028 6279 7465 2d63 6f64 6520 22c0 (t (byte-code ". │ │ │ -00000340: c121 88c0 c221 88c0 c321 8722 205b 6d65 .!...!...!." [me │ │ │ -00000350: 7373 6167 6520 2257 6172 6e69 6e67 3a20 ssage "Warning: │ │ │ -00000360: 2054 6869 7320 5845 6d61 6373 2069 7320 This XEmacs is │ │ │ -00000370: 6275 696c 7420 7769 7468 2074 6f6f 6c74 built with toolt │ │ │ -00000380: 616c 6b20 7375 7070 6f72 7420 6275 7422 alk support but" │ │ │ -00000390: 2022 646f 6573 206e 6f74 2068 6176 6520 "does not have │ │ │ -000003a0: 6120 746f 6f6c 7461 6c6b 2070 6163 6b61 a tooltalk packa │ │ │ -000003b0: 6765 2069 6e73 7461 6c6c 6564 2e20 2057 ge installed. W │ │ │ -000003c0: 6974 686f 7574 2074 6865 2220 2274 6f6f ithout the" "too │ │ │ -000003d0: 6c74 616c 6b20 6c69 7370 2070 6163 6b61 ltalk lisp packa │ │ │ -000003e0: 6765 2c20 546f 6f6c 7461 6c6b 2073 7570 ge, Tooltalk sup │ │ │ -000003f0: 706f 7274 2069 7320 6272 6f6b 656e 2e22 port is broken." │ │ │ -00000400: 5d20 3229 2929 2073 7061 7263 776f 726b ] 2))) sparcwork │ │ │ -00000410: 7320 2862 7974 652d 636f 6465 2022 c0c1 s (byte-code ".. │ │ │ -00000420: c25c 2287 2220 5b70 6163 6b61 6765 2d72 .\"." [package-r │ │ │ -00000430: 6571 7569 7265 2053 756e 2031 2e30 5d20 equire Sun 1.0] │ │ │ -00000440: 3329 2028 2874 2028 6279 7465 2d63 6f64 3) ((t (byte-cod │ │ │ -00000450: 6520 22c0 c121 88c0 c221 88c0 c321 8722 e "..!...!...!." │ │ │ -00000460: 205b 6d65 7373 6167 6520 2257 6172 6e69 [message "Warni │ │ │ -00000470: 6e67 3a20 2054 6869 7320 5845 6d61 6373 ng: This XEmacs │ │ │ -00000480: 2069 7320 6275 696c 7420 7769 7468 2073 is built with s │ │ │ -00000490: 7061 7263 776f 726b 7320 7375 7070 6f72 parcworks suppor │ │ │ -000004a0: 7420 6275 7422 2022 646f 6573 206e 6f74 t but" "does not │ │ │ -000004b0: 2068 6176 6520 7468 6520 5375 6e20 7061 have the Sun pa │ │ │ -000004c0: 636b 6167 6520 696e 7374 616c 6c65 642e ckage installed. │ │ │ -000004d0: 2020 5769 7468 6f75 7420 7468 6520 5375 Without the Su │ │ │ -000004e0: 6e22 2022 6c69 7370 2070 6163 6b61 6765 n" "lisp package │ │ │ -000004f0: 2c20 5370 6172 6377 6f72 6b73 2073 7570 , Sparcworks sup │ │ │ -00000500: 706f 7274 2077 696c 6c20 6265 2062 726f port will be bro │ │ │ -00000510: 6b65 6e2e 225d 2032 2929 2920 6b69 6c6c ken."] 2))) kill │ │ │ -00000520: 2d65 6d61 6373 5d20 3329 0a -emacs] 3). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3530 2032 3032 310a 3b3b 3b20 :08:50 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6865 636b 2d66 6561 4/lisp/check-fea │ │ │ +00000090: 7475 7265 732e 656c 0a3b 3b3b 2065 6d61 tures.el.;;; ema │ │ │ +000000a0: 6373 2076 6572 7369 6f6e 2032 312e 3420 cs version 21.4 │ │ │ +000000b0: 2870 6174 6368 2032 3429 2022 5374 616e (patch 24) "Stan │ │ │ +000000c0: 6461 7264 2043 2220 5845 6d61 6373 204c dard C" XEmacs L │ │ │ +000000d0: 7563 6964 2e0a 3b3b 3b20 6279 7465 636f ucid..;;; byteco │ │ │ +000000e0: 6d70 2076 6572 7369 6f6e 2032 2e32 3720 mp version 2.27 │ │ │ +000000f0: 5845 6d61 6373 3b20 3230 3030 2d30 392d XEmacs; 2000-09- │ │ │ +00000100: 3132 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 12..;;; optimiza │ │ │ +00000110: 7469 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 tion is on..;;; │ │ │ +00000120: 7468 6973 2066 696c 6520 7573 6573 206f this file uses o │ │ │ +00000130: 7063 6f64 6573 2077 6869 6368 2064 6f20 pcodes which do │ │ │ +00000140: 6e6f 7420 6578 6973 7420 696e 2045 6d61 not exist in Ema │ │ │ +00000150: 6373 2031 392e 0a0a 2869 6620 2861 6e64 cs 19...(if (and │ │ │ +00000160: 2028 626f 756e 6470 2027 656d 6163 732d (boundp 'emacs- │ │ │ +00000170: 7665 7273 696f 6e29 0a09 2028 6f72 2028 version).. (or ( │ │ │ +00000180: 616e 6420 2862 6f75 6e64 7020 2765 706f and (boundp 'epo │ │ │ +00000190: 6368 3a3a 7665 7273 696f 6e29 2065 706f ch::version) epo │ │ │ +000001a0: 6368 3a3a 7665 7273 696f 6e29 0a09 2020 ch::version).. │ │ │ +000001b0: 2020 2028 7374 7269 6e67 2d6c 6573 7370 (string-lessp │ │ │ +000001c0: 2065 6d61 6373 2d76 6572 7369 6f6e 2022 emacs-version " │ │ │ +000001d0: 3230 2229 2929 0a20 2020 2028 6572 726f 20"))). (erro │ │ │ +000001e0: 7220 2260 6368 6563 6b2d 6665 6174 7572 r "`check-featur │ │ │ +000001f0: 6573 2e65 6c27 2077 6173 2063 6f6d 7069 es.el' was compi │ │ │ +00000200: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ +00000210: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ +00000220: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ +00000230: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ +00000240: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ +00000250: 2929 0a0a 0a28 6279 7465 2d63 6f64 6520 ))...(byte-code │ │ │ +00000260: 22c2 c321 88c0 0942 11c4 c021 ac85 c5c0 "..!...B...!.... │ │ │ +00000270: c65c 2288 c7c8 21ab 85c9 cacb 8f88 c7cc .\"...!......... │ │ │ +00000280: 21ab 85c9 cdce 8f88 cf08 2187 2220 5b62 !.........!." [b │ │ │ +00000290: 7569 6c64 2d65 7272 6f72 2063 7572 7265 uild-error curre │ │ │ +000002a0: 6e74 2d6c 6f61 642d 6c69 7374 2072 6571 nt-load-list req │ │ │ +000002b0: 7569 7265 2070 6163 6b61 6765 7320 6465 uire packages de │ │ │ +000002c0: 6661 756c 742d 626f 756e 6470 2073 6574 fault-boundp set │ │ │ +000002d0: 2d64 6566 6175 6c74 2030 2066 6561 7475 -default 0 featu │ │ │ +000002e0: 7265 7020 746f 6f6c 7461 6c6b 206e 696c rep tooltalk nil │ │ │ +000002f0: 2028 6279 7465 2d63 6f64 6520 22c0 c1c2 (byte-code "... │ │ │ +00000300: 5c22 8722 205b 7061 636b 6167 652d 7265 \"." [package-re │ │ │ +00000310: 7175 6972 6520 746f 6f6c 7461 6c6b 2031 quire tooltalk 1 │ │ │ +00000320: 2e30 5d20 3329 2028 2874 2028 6279 7465 .0] 3) ((t (byte │ │ │ +00000330: 2d63 6f64 6520 22c0 c121 88c0 c221 88c0 -code "..!...!.. │ │ │ +00000340: c321 8722 205b 6d65 7373 6167 6520 2257 .!." [message "W │ │ │ +00000350: 6172 6e69 6e67 3a20 2054 6869 7320 5845 arning: This XE │ │ │ +00000360: 6d61 6373 2069 7320 6275 696c 7420 7769 macs is built wi │ │ │ +00000370: 7468 2074 6f6f 6c74 616c 6b20 7375 7070 th tooltalk supp │ │ │ +00000380: 6f72 7420 6275 7422 2022 646f 6573 206e ort but" "does n │ │ │ +00000390: 6f74 2068 6176 6520 6120 746f 6f6c 7461 ot have a toolta │ │ │ +000003a0: 6c6b 2070 6163 6b61 6765 2069 6e73 7461 lk package insta │ │ │ +000003b0: 6c6c 6564 2e20 2057 6974 686f 7574 2074 lled. Without t │ │ │ +000003c0: 6865 2220 2274 6f6f 6c74 616c 6b20 6c69 he" "tooltalk li │ │ │ +000003d0: 7370 2070 6163 6b61 6765 2c20 546f 6f6c sp package, Tool │ │ │ +000003e0: 7461 6c6b 2073 7570 706f 7274 2069 7320 talk support is │ │ │ +000003f0: 6272 6f6b 656e 2e22 5d20 3229 2929 2073 broken."] 2))) s │ │ │ +00000400: 7061 7263 776f 726b 7320 2862 7974 652d parcworks (byte- │ │ │ +00000410: 636f 6465 2022 c0c1 c25c 2287 2220 5b70 code "...\"." [p │ │ │ +00000420: 6163 6b61 6765 2d72 6571 7569 7265 2053 ackage-require S │ │ │ +00000430: 756e 2031 2e30 5d20 3329 2028 2874 2028 un 1.0] 3) ((t ( │ │ │ +00000440: 6279 7465 2d63 6f64 6520 22c0 c121 88c0 byte-code "..!.. │ │ │ +00000450: c221 88c0 c321 8722 205b 6d65 7373 6167 .!...!." [messag │ │ │ +00000460: 6520 2257 6172 6e69 6e67 3a20 2054 6869 e "Warning: Thi │ │ │ +00000470: 7320 5845 6d61 6373 2069 7320 6275 696c s XEmacs is buil │ │ │ +00000480: 7420 7769 7468 2073 7061 7263 776f 726b t with sparcwork │ │ │ +00000490: 7320 7375 7070 6f72 7420 6275 7422 2022 s support but" " │ │ │ +000004a0: 646f 6573 206e 6f74 2068 6176 6520 7468 does not have th │ │ │ +000004b0: 6520 5375 6e20 7061 636b 6167 6520 696e e Sun package in │ │ │ +000004c0: 7374 616c 6c65 642e 2020 5769 7468 6f75 stalled. Withou │ │ │ +000004d0: 7420 7468 6520 5375 6e22 2022 6c69 7370 t the Sun" "lisp │ │ │ +000004e0: 2070 6163 6b61 6765 2c20 5370 6172 6377 package, Sparcw │ │ │ +000004f0: 6f72 6b73 2073 7570 706f 7274 2077 696c orks support wil │ │ │ +00000500: 6c20 6265 2062 726f 6b65 6e2e 225d 2032 l be broken."] 2 │ │ │ +00000510: 2929 2920 6b69 6c6c 2d65 6d61 6373 5d20 ))) kill-emacs] │ │ │ +00000520: 3329 0a 3). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/cl-compat.elc │ │ │ @@ -1,238 +1,237 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6c2d 636f 6d70 6174 2e65 6c0a 3b3b 3b20 l-compat.el.;;; │ │ │ -000000a0: 656d 6163 7320 7665 7273 696f 6e20 3231 emacs version 21 │ │ │ -000000b0: 2e34 2028 7061 7463 6820 3234 2920 2253 .4 (patch 24) "S │ │ │ -000000c0: 7461 6e64 6172 6420 4322 2058 456d 6163 tandard C" XEmac │ │ │ -000000d0: 7320 4c75 6369 642e 0a3b 3b3b 2062 7974 s Lucid..;;; byt │ │ │ -000000e0: 6563 6f6d 7020 7665 7273 696f 6e20 322e ecomp version 2. │ │ │ -000000f0: 3237 2058 456d 6163 733b 2032 3030 302d 27 XEmacs; 2000- │ │ │ -00000100: 3039 2d31 322e 0a3b 3b3b 206f 7074 696d 09-12..;;; optim │ │ │ -00000110: 697a 6174 696f 6e20 6973 206f 6e2e 0a3b ization is on..; │ │ │ -00000120: 3b3b 2074 6869 7320 6669 6c65 2075 7365 ;; this file use │ │ │ -00000130: 7320 6f70 636f 6465 7320 7768 6963 6820 s opcodes which │ │ │ -00000140: 646f 206e 6f74 2065 7869 7374 2069 6e20 do not exist in │ │ │ -00000150: 456d 6163 7320 3139 2e0a 0a28 6966 2028 Emacs 19...(if ( │ │ │ -00000160: 616e 6420 2862 6f75 6e64 7020 2765 6d61 and (boundp 'ema │ │ │ -00000170: 6373 2d76 6572 7369 6f6e 290a 0920 286f cs-version).. (o │ │ │ -00000180: 7220 2861 6e64 2028 626f 756e 6470 2027 r (and (boundp ' │ │ │ -00000190: 6570 6f63 683a 3a76 6572 7369 6f6e 2920 epoch::version) │ │ │ -000001a0: 6570 6f63 683a 3a76 6572 7369 6f6e 290a epoch::version). │ │ │ -000001b0: 0920 2020 2020 2873 7472 696e 672d 6c65 . (string-le │ │ │ -000001c0: 7373 7020 656d 6163 732d 7665 7273 696f ssp emacs-versio │ │ │ -000001d0: 6e20 2232 3022 2929 290a 2020 2020 2865 n "20"))). (e │ │ │ -000001e0: 7272 6f72 2022 6063 6c2d 636f 6d70 6174 rror "`cl-compat │ │ │ -000001f0: 2e65 6c27 2077 6173 2063 6f6d 7069 6c65 .el' was compile │ │ │ -00000200: 6420 666f 7220 456d 6163 7320 3230 2229 d for Emacs 20") │ │ │ -00000210: 290a 0a28 6f72 2028 626f 756e 6470 2027 )..(or (boundp ' │ │ │ -00000220: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ -00000230: 7429 2028 7365 7471 2063 7572 7265 6e74 t) (setq current │ │ │ -00000240: 2d6c 6f61 642d 6c69 7374 206e 696c 2929 -load-list nil)) │ │ │ -00000250: 0a0a 0a28 6279 7465 2d63 6f64 6520 22c0 ...(byte-code ". │ │ │ -00000260: c121 ac84 c2c1 2188 c087 2220 5b66 6561 .!....!..." [fea │ │ │ -00000270: 7475 7265 7020 636c 2072 6571 7569 7265 turep cl require │ │ │ -00000280: 5d20 3229 0a28 6465 6661 6c69 6173 2027 ] 2).(defalias ' │ │ │ -00000290: 6465 666b 6579 776f 7264 2027 286d 6163 defkeyword '(mac │ │ │ -000002a0: 726f 202e 2023 5b28 7820 266f 7074 696f ro . #[(x &optio │ │ │ -000002b0: 6e61 6c20 646f 6329 2022 c209 c309 4408 nal doc) "....D. │ │ │ -000002c0: ad82 0843 4242 4287 2220 5b64 6f63 2078 ...CBBB." [doc x │ │ │ -000002d0: 2064 6566 636f 6e73 7420 7175 6f74 655d defconst quote] │ │ │ -000002e0: 2034 5d29 290a 2864 6566 616c 6961 7320 4])).(defalias │ │ │ -000002f0: 276b 6579 776f 7264 2d6f 6620 235b 2873 'keyword-of #[(s │ │ │ -00000300: 796d 2920 22c1 0821 ae88 c1c2 c3c4 085c ym) "..!.......\ │ │ │ -00000310: 2221 2187 2220 5b73 796d 206b 6579 776f "!!." [sym keywo │ │ │ -00000320: 7264 7020 696e 7465 726e 2066 6f72 6d61 rdp intern forma │ │ │ -00000330: 7420 223a 2573 225d 2035 5d29 0a28 6279 t ":%s"] 5]).(by │ │ │ -00000340: 7465 2d63 6f64 6520 22c1 c2c3 c423 88c1 te-code "....#.. │ │ │ -00000350: c5c3 c423 88c1 c6c3 c723 88c1 c8c3 c723 ...#.....#.....# │ │ │ -00000360: 88c9 0842 10ca c921 ac85 cbc9 cc5c 2288 ...B...!.....\". │ │ │ -00000370: cc87 2220 5b63 7572 7265 6e74 2d6c 6f61 .." [current-loa │ │ │ -00000380: 642d 6c69 7374 2070 7574 204d 756c 7469 d-list put Multi │ │ │ -00000390: 706c 652d 7661 6c75 652d 6269 6e64 206c ple-value-bind l │ │ │ -000003a0: 6973 702d 696e 6465 6e74 2d66 756e 6374 isp-indent-funct │ │ │ -000003b0: 696f 6e20 3220 4d75 6c74 6970 6c65 2d76 ion 2 Multiple-v │ │ │ -000003c0: 616c 7565 2d73 6574 7120 4d75 6c74 6970 alue-setq Multip │ │ │ -000003d0: 6c65 2d76 616c 7565 2d63 616c 6c20 3120 le-value-call 1 │ │ │ -000003e0: 4d75 6c74 6970 6c65 2d76 616c 7565 2d70 Multiple-value-p │ │ │ -000003f0: 726f 6731 202a 6d76 616c 7565 732d 7661 rog1 *mvalues-va │ │ │ -00000400: 6c75 6573 2a20 6465 6661 756c 742d 626f lues* default-bo │ │ │ -00000410: 756e 6470 2073 6574 2d64 6566 6175 6c74 undp set-default │ │ │ -00000420: 206e 696c 5d20 3429 0a28 6465 6661 6c69 nil] 4).(defali │ │ │ -00000430: 6173 2027 5661 6c75 6573 2023 5b28 2672 as 'Values #[(&r │ │ │ -00000440: 6573 7420 7661 6c2d 666f 726d 7329 2022 est val-forms) " │ │ │ -00000450: 0910 0940 8722 205b 2a6d 7661 6c75 6573 ...@." [*mvalues │ │ │ -00000460: 2d76 616c 7565 732a 2076 616c 2d66 6f72 -values* val-for │ │ │ -00000470: 6d73 5d20 315d 290a 2864 6566 616c 6961 ms] 1]).(defalia │ │ │ -00000480: 7320 2756 616c 7565 732d 6c69 7374 2023 s 'Values-list # │ │ │ -00000490: 5b28 7661 6c2d 666f 726d 7329 2022 c1c2 [(val-forms) ".. │ │ │ -000004a0: 085c 2287 2220 5b76 616c 2d66 6f72 6d73 .\"." [val-forms │ │ │ -000004b0: 2061 7070 6c79 2076 616c 7565 735d 2033 apply values] 3 │ │ │ -000004c0: 5d29 0a28 6465 6661 6c69 6173 2027 4d75 ]).(defalias 'Mu │ │ │ -000004d0: 6c74 6970 6c65 2d76 616c 7565 2d6c 6973 ltiple-value-lis │ │ │ -000004e0: 7420 2728 6d61 6372 6f20 2e20 235b 2866 t '(macro . #[(f │ │ │ -000004f0: 6f72 6d29 2022 c1c2 c308 4444 c445 8722 orm) "....DD.E." │ │ │ -00000500: 205b 666f 726d 206c 6574 2a20 282a 6d76 [form let* (*mv │ │ │ -00000510: 616c 7565 732d 7661 6c75 6573 2a20 6e69 alues-values* ni │ │ │ -00000520: 6c29 202a 6d76 616c 7565 732d 7465 6d70 l) *mvalues-temp │ │ │ -00000530: 2a20 286f 7220 2861 6e64 2028 6571 202a * (or (and (eq * │ │ │ -00000540: 6d76 616c 7565 732d 7465 6d70 2a20 2863 mvalues-temp* (c │ │ │ -00000550: 6172 202a 6d76 616c 7565 732d 7661 6c75 ar *mvalues-valu │ │ │ -00000560: 6573 2a29 2920 2a6d 7661 6c75 6573 2d76 es*)) *mvalues-v │ │ │ -00000570: 616c 7565 732a 2920 286c 6973 7420 2a6d alues*) (list *m │ │ │ -00000580: 7661 6c75 6573 2d74 656d 702a 2929 5d20 values-temp*))] │ │ │ -00000590: 345d 2929 0a28 6465 6661 6c69 6173 2027 4])).(defalias ' │ │ │ -000005a0: 4d75 6c74 6970 6c65 2d76 616c 7565 2d63 Multiple-value-c │ │ │ -000005b0: 616c 6c20 2728 6d61 6372 6f20 2e20 235b all '(macro . #[ │ │ │ -000005c0: 2866 756e 6374 696f 6e20 2672 6573 7420 (function &rest │ │ │ -000005d0: 6172 6773 2920 22c2 09c3 c4c5 085c 2242 args) "......\"B │ │ │ -000005e0: 4587 2220 5b61 7267 7320 6675 6e63 7469 E." [args functi │ │ │ -000005f0: 6f6e 2061 7070 6c79 2061 7070 656e 6420 on apply append │ │ │ -00000600: 6d61 7063 6172 2023 5b28 7829 2022 c108 mapcar #[(x) ".. │ │ │ -00000610: 4487 2220 5b78 204d 756c 7469 706c 652d D." [x Multiple- │ │ │ -00000620: 7661 6c75 652d 6c69 7374 5d20 325d 5d20 value-list] 2]] │ │ │ -00000630: 365d 2929 0a28 6465 6661 6c69 6173 2027 6])).(defalias ' │ │ │ -00000640: 4d75 6c74 6970 6c65 2d76 616c 7565 2d62 Multiple-value-b │ │ │ -00000650: 696e 6420 2728 6d61 6372 6f20 2e20 235b ind '(macro . #[ │ │ │ -00000660: 2876 6172 7320 666f 726d 2026 7265 7374 (vars form &rest │ │ │ -00000670: 2062 6f64 7929 2022 c35c 6ec4 0944 0842 body) ".\n..D.B │ │ │ -00000680: 4242 8722 205b 626f 6479 2066 6f72 6d20 BB." [body form │ │ │ -00000690: 7661 7273 206d 756c 7469 706c 652d 7661 vars multiple-va │ │ │ -000006a0: 6c75 652d 6269 6e64 204d 756c 7469 706c lue-bind Multipl │ │ │ -000006b0: 652d 7661 6c75 652d 6c69 7374 5d20 345d e-value-list] 4] │ │ │ -000006c0: 2929 0a28 6465 6661 6c69 6173 2027 4d75 )).(defalias 'Mu │ │ │ -000006d0: 6c74 6970 6c65 2d76 616c 7565 2d73 6574 ltiple-value-set │ │ │ -000006e0: 7120 2728 6d61 6372 6f20 2e20 235b 2876 q '(macro . #[(v │ │ │ -000006f0: 6172 7320 666f 726d 2920 22c2 09c3 0844 ars form) "....D │ │ │ -00000700: 4587 2220 5b66 6f72 6d20 7661 7273 206d E." [form vars m │ │ │ -00000710: 756c 7469 706c 652d 7661 6c75 652d 7365 ultiple-value-se │ │ │ -00000720: 7471 204d 756c 7469 706c 652d 7661 6c75 tq Multiple-valu │ │ │ -00000730: 652d 6c69 7374 5d20 345d 2929 0a28 6465 e-list] 4])).(de │ │ │ -00000740: 6661 6c69 6173 2027 4d75 6c74 6970 6c65 falias 'Multiple │ │ │ -00000750: 2d76 616c 7565 2d70 726f 6731 2027 286d -value-prog1 '(m │ │ │ -00000760: 6163 726f 202e 2023 5b28 666f 726d 2026 acro . #[(form & │ │ │ -00000770: 7265 7374 2062 6f64 7929 2022 c209 c3c4 rest body) ".... │ │ │ -00000780: 0842 4245 8722 205b 626f 6479 2066 6f72 .BBE." [body for │ │ │ -00000790: 6d20 7072 6f67 3120 6c65 7420 2828 2a6d m prog1 let ((*m │ │ │ -000007a0: 7661 6c75 6573 2d76 616c 7565 732a 206e values-values* n │ │ │ -000007b0: 696c 2929 5d20 355d 2929 0a28 6465 6661 il))] 5])).(defa │ │ │ -000007c0: 6c69 6173 2027 6275 696c 642d 6b6c 6973 lias 'build-klis │ │ │ -000007d0: 7420 235b 2861 7267 6c69 7374 206b 6579 t #[(arglist key │ │ │ -000007e0: 7320 266f 7074 696f 6e61 6c20 616c 6c6f s &optional allo │ │ │ -000007f0: 772d 6f74 6865 7273 2920 22c6 c7c8 c91d w-others) "..... │ │ │ -00000800: ca89 1c0d 4061 ab83 0dae 820c 432a c91d ....@a......C*.. │ │ │ -00000810: cb08 2189 1c0d 4061 ab83 0dae 820c 432a ..!...@a......C* │ │ │ -00000820: 5c22 5c22 1b0e 11ac 92cc cdce 0b5c 225c \"\".........\"\ │ │ │ -00000830: 6e5c 2289 19ab 86cf d009 5c6e 2388 290b n\".......\n#.). │ │ │ -00000840: 2987 2220 5b61 7267 6c69 7374 2062 6164 )." [arglist bad │ │ │ -00000850: 206b 6579 7320 7265 7320 2a6d 7661 6c75 keys res *mvalu │ │ │ -00000860: 6573 2d74 656d 702a 202a 6d76 616c 7565 es-temp* *mvalue │ │ │ -00000870: 732d 7661 6c75 6573 2a20 6170 706c 7920 s-values* apply │ │ │ -00000880: 6d61 7063 6172 2a20 6170 7065 6e64 206e mapcar* append n │ │ │ -00000890: 696c 2063 6f6e 7320 756e 7a69 702d 6c69 il cons unzip-li │ │ │ -000008a0: 7374 7320 7365 742d 6469 6666 6572 656e sts set-differen │ │ │ -000008b0: 6365 206d 6170 6361 7220 6361 7220 6572 ce mapcar car er │ │ │ -000008c0: 726f 7220 2242 6164 206b 6579 776f 7264 ror "Bad keyword │ │ │ -000008d0: 733a 2025 7320 6e6f 7420 696e 2025 7322 s: %s not in %s" │ │ │ -000008e0: 2061 6c6c 6f77 2d6f 7468 6572 735d 2037 allow-others] 7 │ │ │ -000008f0: 5d29 0a28 6465 6661 6c69 6173 2027 6578 ]).(defalias 'ex │ │ │ -00000900: 7472 6163 742d 6672 6f6d 2d6b 6c69 7374 tract-from-klist │ │ │ -00000910: 2023 5b28 6b6c 6973 7420 6b65 7920 266f #[(klist key &o │ │ │ -00000920: 7074 696f 6e61 6c20 6465 6629 2022 5c6e ptional def) "\n │ │ │ -00000930: 09b7 891b ab84 0b41 aa81 0829 8722 205b .......A...)." [ │ │ │ -00000940: 6465 6620 6b6c 6973 7420 6b65 7920 7265 def klist key re │ │ │ -00000950: 735d 2033 5d29 0a28 6465 6661 6c69 6173 s] 3]).(defalias │ │ │ -00000960: 2027 6b65 7977 6f72 642d 6172 6775 6d65 'keyword-argume │ │ │ -00000970: 6e74 2d73 7570 706c 6965 642d 7020 235b nt-supplied-p #[ │ │ │ -00000980: 286b 6c69 7374 206b 6579 2920 2209 08b7 (klist key) "... │ │ │ -00000990: 8722 205b 6b6c 6973 7420 6b65 795d 2032 ." [klist key] 2 │ │ │ -000009a0: 5d29 0a28 6465 6661 6c69 6173 2027 656c ]).(defalias 'el │ │ │ -000009b0: 742d 7361 7469 7366 6965 732d 7465 7374 t-satisfies-test │ │ │ -000009c0: 2d70 2023 5b28 6974 656d 2065 6c74 206b -p #[(item elt k │ │ │ -000009d0: 6c69 7374 2920 22c6 0cb7 41c7 0cb7 41c8 list) "...A...A. │ │ │ -000009e0: 0cb7 411b 191a 0bab 840b 0d21 155c 6eab ..A........!.\n. │ │ │ -000009f0: 875c 6e08 0d5c 223f aa87 09ae 81c9 080d .\n..\"?........ │ │ │ -00000a00: 5c22 2b87 2220 5b69 7465 6d20 7465 7374 \"+." [item test │ │ │ -00000a10: 2074 6573 742d 6e6f 7420 6b65 7920 6b6c test-not key kl │ │ │ -00000a20: 6973 7420 656c 7420 3a74 6573 742d 6e6f ist elt :test-no │ │ │ -00000a30: 7420 3a74 6573 7420 3a6b 6579 2065 716c t :test :key eql │ │ │ -00000a40: 5d20 345d 290a 2864 6566 616c 6961 7320 ] 4]).(defalias │ │ │ -00000a50: 2763 6c2d 666c 6f6f 7220 235b 2861 2026 'cl-floor #[(a & │ │ │ -00000a60: 6f70 7469 6f6e 616c 2062 2920 22c2 c309 optional b) "... │ │ │ -00000a70: 085c 2221 8722 205b 6220 6120 5661 6c75 .\"!." [b a Valu │ │ │ -00000a80: 6573 2d6c 6973 7420 666c 6f6f 722a 5d20 es-list floor*] │ │ │ -00000a90: 345d 290a 2864 6566 616c 6961 7320 2763 4]).(defalias 'c │ │ │ -00000aa0: 6c2d 6365 696c 696e 6720 235b 2861 2026 l-ceiling #[(a & │ │ │ -00000ab0: 6f70 7469 6f6e 616c 2062 2920 22c2 c309 optional b) "... │ │ │ -00000ac0: 085c 2221 8722 205b 6220 6120 5661 6c75 .\"!." [b a Valu │ │ │ -00000ad0: 6573 2d6c 6973 7420 6365 696c 696e 672a es-list ceiling* │ │ │ -00000ae0: 5d20 345d 290a 2864 6566 616c 6961 7320 ] 4]).(defalias │ │ │ -00000af0: 2763 6c2d 726f 756e 6420 235b 2861 2026 'cl-round #[(a & │ │ │ -00000b00: 6f70 7469 6f6e 616c 2062 2920 22c2 c309 optional b) "... │ │ │ -00000b10: 085c 2221 8722 205b 6220 6120 5661 6c75 .\"!." [b a Valu │ │ │ -00000b20: 6573 2d6c 6973 7420 726f 756e 642a 5d20 es-list round*] │ │ │ -00000b30: 345d 290a 2864 6566 616c 6961 7320 2763 4]).(defalias 'c │ │ │ -00000b40: 6c2d 7472 756e 6361 7465 2023 5b28 6120 l-truncate #[(a │ │ │ -00000b50: 266f 7074 696f 6e61 6c20 6229 2022 c2c3 &optional b) ".. │ │ │ -00000b60: 0908 5c22 2187 2220 5b62 2061 2056 616c ..\"!." [b a Val │ │ │ -00000b70: 7565 732d 6c69 7374 2074 7275 6e63 6174 ues-list truncat │ │ │ -00000b80: 652a 5d20 345d 290a 2864 6566 616c 6961 e*] 4]).(defalia │ │ │ -00000b90: 7320 2773 6166 652d 6964 6976 2023 5b28 s 'safe-idiv #[( │ │ │ -00000ba0: 6120 6229 2022 c40b 21c4 5c6e 21a5 19c5 a b) "..!.\n!... │ │ │ -00000bb0: 0b21 c55c 6e21 5f18 c609 0b08 095f 5c6e .!.\n!_......_\n │ │ │ -00000bc0: 5f5a 0823 2a87 2220 5b73 2071 2062 2061 _Z.#*." [s q b a │ │ │ -00000bd0: 2061 6273 2073 6967 6e75 6d20 5661 6c75 abs signum Valu │ │ │ -00000be0: 6573 5d20 355d 290a 2864 6566 616c 6961 es] 5]).(defalia │ │ │ -00000bf0: 7320 2770 6169 722d 7769 7468 2d6e 6577 s 'pair-with-new │ │ │ -00000c00: 7379 6d73 2023 5b28 6f6c 6466 6f72 6d73 syms #[(oldforms │ │ │ -00000c10: 2920 22c2 c308 5c22 19c4 c5c6 0908 2309 ) "...\"......#. │ │ │ -00000c20: 5c22 2987 2220 5b6f 6c64 666f 726d 7320 \")." [oldforms │ │ │ -00000c30: 6e65 7773 796d 7320 6d61 7063 6172 2023 newsyms mapcar # │ │ │ -00000c40: 5b28 7829 2022 c020 8722 205b 6765 6e73 [(x) ". ." [gens │ │ │ -00000c50: 796d 5d20 315d 2056 616c 7565 7320 6d61 ym] 1] Values ma │ │ │ -00000c60: 7063 6172 2a20 6c69 7374 5d20 355d 290a pcar* list] 5]). │ │ │ -00000c70: 2864 6566 616c 6961 7320 277a 6970 2d6c (defalias 'zip-l │ │ │ -00000c80: 6973 7473 2023 5b28 6576 656e 7320 6f64 ists #[(evens od │ │ │ -00000c90: 6473 2920 22c2 c309 0823 8722 205b 6f64 ds) "....#." [od │ │ │ -00000ca0: 6473 2065 7665 6e73 206d 6170 6361 6e20 ds evens mapcan │ │ │ -00000cb0: 6c69 7374 5d20 345d 290a 2864 6566 616c list] 4]).(defal │ │ │ -00000cc0: 6961 7320 2775 6e7a 6970 2d6c 6973 7473 ias 'unzip-lists │ │ │ -00000cd0: 2023 5b28 6c69 7374 2920 22c3 8919 185c #[(list) "....\ │ │ │ -00000ce0: 6eab 925c 6e40 0842 105c 6e41 4009 4211 n..\n@.B.\nA@.B. │ │ │ -00000cf0: 5c6e 4141 8912 ac6e c408 9f09 9f5c 222a \nAA...n.....\"* │ │ │ -00000d00: 8722 205b 6520 6f20 6c69 7374 206e 696c ." [e o list nil │ │ │ -00000d10: 2056 616c 7565 735d 2034 5d29 0a28 6465 Values] 4]).(de │ │ │ -00000d20: 6661 6c69 6173 2027 7265 6173 7365 6d62 falias 'reassemb │ │ │ -00000d30: 6c65 2d61 7267 736c 6973 7473 2023 5b28 le-argslists #[( │ │ │ -00000d40: 6c69 7374 2920 22c3 c4c5 c608 5c22 5c22 list) ".....\"\" │ │ │ -00000d50: c71a 1909 5389 11c8 59ab 89c5 c908 5c22 ....S...Y.....\" │ │ │ -00000d60: 5c6e 4212 aa6f 5c6e 2a87 2220 5b6c 6973 \nB..o\n*." [lis │ │ │ -00000d70: 7420 6e20 7265 7320 6170 706c 7920 6d69 t n res apply mi │ │ │ -00000d80: 6e20 6d61 7063 6172 206c 656e 6774 6820 n mapcar length │ │ │ -00000d90: 6e69 6c20 3020 235b 2878 2920 2209 089c nil 0 #[(x) "... │ │ │ -00000da0: 8722 205b 6e20 785d 2032 5d5d 2035 5d29 ." [n x] 2]] 5]) │ │ │ -00000db0: 0a28 6465 6661 6c69 6173 2027 6475 706c .(defalias 'dupl │ │ │ -00000dc0: 6963 6174 652d 7379 6d62 6f6c 732d 7020 icate-symbols-p │ │ │ -00000dd0: 235b 286c 6973 7429 2022 c218 09ab 9209 #[(list) "...... │ │ │ -00000de0: 4009 4173 ab85 0940 0842 1009 4189 11ac @.As...@.B..A... │ │ │ -00000df0: 6e08 2987 2220 5b72 6573 206c 6973 7420 n.)." [res list │ │ │ -00000e00: 6e69 6c5d 2033 5d29 0a28 6465 6661 6c69 nil] 3]).(defali │ │ │ -00000e10: 6173 2027 7365 746e 7468 2023 5b28 6e20 as 'setnth #[(n │ │ │ -00000e20: 6c69 7374 2078 2920 225c 6e09 9b08 a087 list x) "\n..... │ │ │ -00000e30: 2220 5b78 206c 6973 7420 6e5d 2032 5d29 " [x list n] 2]) │ │ │ -00000e40: 0a28 6465 6661 6c69 6173 2027 7365 746e .(defalias 'setn │ │ │ -00000e50: 7468 6364 7220 235b 286e 206c 6973 7420 thcdr #[(n list │ │ │ -00000e60: 7829 2022 5c6e 5309 9b08 a187 2220 5b78 x) "\nS....." [x │ │ │ -00000e70: 206c 6973 7420 6e5d 2032 5d29 0a28 6465 list n] 2]).(de │ │ │ -00000e80: 6661 6c69 6173 2027 7365 7465 6c74 2023 falias 'setelt # │ │ │ -00000e90: 5b28 7365 7120 6e20 7829 2022 5c6e 3aab [(seq n x) "\n:. │ │ │ -00000ea0: 8609 5c6e 9b08 a087 5c6e 0908 4987 2220 ..\n....\n..I." │ │ │ -00000eb0: 5b78 206e 2073 6571 5d20 335d 290a 2870 [x n seq] 3]).(p │ │ │ -00000ec0: 726f 7669 6465 2027 636c 2d63 6f6d 7061 rovide 'cl-compa │ │ │ -00000ed0: 7429 0a t). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3530 2032 3032 310a 3b3b 3b20 :08:50 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6c2d 636f 6d70 6174 4/lisp/cl-compat │ │ │ +00000090: 2e65 6c0a 3b3b 3b20 656d 6163 7320 7665 .el.;;; emacs ve │ │ │ +000000a0: 7273 696f 6e20 3231 2e34 2028 7061 7463 rsion 21.4 (patc │ │ │ +000000b0: 6820 3234 2920 2253 7461 6e64 6172 6420 h 24) "Standard │ │ │ +000000c0: 4322 2058 456d 6163 7320 4c75 6369 642e C" XEmacs Lucid. │ │ │ +000000d0: 0a3b 3b3b 2062 7974 6563 6f6d 7020 7665 .;;; bytecomp ve │ │ │ +000000e0: 7273 696f 6e20 322e 3237 2058 456d 6163 rsion 2.27 XEmac │ │ │ +000000f0: 733b 2032 3030 302d 3039 2d31 322e 0a3b s; 2000-09-12..; │ │ │ +00000100: 3b3b 206f 7074 696d 697a 6174 696f 6e20 ;; optimization │ │ │ +00000110: 6973 206f 6e2e 0a3b 3b3b 2074 6869 7320 is on..;;; this │ │ │ +00000120: 6669 6c65 2075 7365 7320 6f70 636f 6465 file uses opcode │ │ │ +00000130: 7320 7768 6963 6820 646f 206e 6f74 2065 s which do not e │ │ │ +00000140: 7869 7374 2069 6e20 456d 6163 7320 3139 xist in Emacs 19 │ │ │ +00000150: 2e0a 0a28 6966 2028 616e 6420 2862 6f75 ...(if (and (bou │ │ │ +00000160: 6e64 7020 2765 6d61 6373 2d76 6572 7369 ndp 'emacs-versi │ │ │ +00000170: 6f6e 290a 0920 286f 7220 2861 6e64 2028 on).. (or (and ( │ │ │ +00000180: 626f 756e 6470 2027 6570 6f63 683a 3a76 boundp 'epoch::v │ │ │ +00000190: 6572 7369 6f6e 2920 6570 6f63 683a 3a76 ersion) epoch::v │ │ │ +000001a0: 6572 7369 6f6e 290a 0920 2020 2020 2873 ersion).. (s │ │ │ +000001b0: 7472 696e 672d 6c65 7373 7020 656d 6163 tring-lessp emac │ │ │ +000001c0: 732d 7665 7273 696f 6e20 2232 3022 2929 s-version "20")) │ │ │ +000001d0: 290a 2020 2020 2865 7272 6f72 2022 6063 ). (error "`c │ │ │ +000001e0: 6c2d 636f 6d70 6174 2e65 6c27 2077 6173 l-compat.el' was │ │ │ +000001f0: 2063 6f6d 7069 6c65 6420 666f 7220 456d compiled for Em │ │ │ +00000200: 6163 7320 3230 2229 290a 0a28 6f72 2028 acs 20"))..(or ( │ │ │ +00000210: 626f 756e 6470 2027 6375 7272 656e 742d boundp 'current- │ │ │ +00000220: 6c6f 6164 2d6c 6973 7429 2028 7365 7471 load-list) (setq │ │ │ +00000230: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ +00000240: 7374 206e 696c 2929 0a0a 0a28 6279 7465 st nil))...(byte │ │ │ +00000250: 2d63 6f64 6520 22c0 c121 ac84 c2c1 2188 -code "..!....!. │ │ │ +00000260: c087 2220 5b66 6561 7475 7265 7020 636c .." [featurep cl │ │ │ +00000270: 2072 6571 7569 7265 5d20 3229 0a28 6465 require] 2).(de │ │ │ +00000280: 6661 6c69 6173 2027 6465 666b 6579 776f falias 'defkeywo │ │ │ +00000290: 7264 2027 286d 6163 726f 202e 2023 5b28 rd '(macro . #[( │ │ │ +000002a0: 7820 266f 7074 696f 6e61 6c20 646f 6329 x &optional doc) │ │ │ +000002b0: 2022 c209 c309 4408 ad82 0843 4242 4287 "....D....CBBB. │ │ │ +000002c0: 2220 5b64 6f63 2078 2064 6566 636f 6e73 " [doc x defcons │ │ │ +000002d0: 7420 7175 6f74 655d 2034 5d29 290a 2864 t quote] 4])).(d │ │ │ +000002e0: 6566 616c 6961 7320 276b 6579 776f 7264 efalias 'keyword │ │ │ +000002f0: 2d6f 6620 235b 2873 796d 2920 22c1 0821 -of #[(sym) "..! │ │ │ +00000300: ae88 c1c2 c3c4 085c 2221 2187 2220 5b73 .......\"!!." [s │ │ │ +00000310: 796d 206b 6579 776f 7264 7020 696e 7465 ym keywordp inte │ │ │ +00000320: 726e 2066 6f72 6d61 7420 223a 2573 225d rn format ":%s"] │ │ │ +00000330: 2035 5d29 0a28 6279 7465 2d63 6f64 6520 5]).(byte-code │ │ │ +00000340: 22c1 c2c3 c423 88c1 c5c3 c423 88c1 c6c3 "....#.....#.... │ │ │ +00000350: c723 88c1 c8c3 c723 88c9 0842 10ca c921 .#.....#...B...! │ │ │ +00000360: ac85 cbc9 cc5c 2288 cc87 2220 5b63 7572 .....\"..." [cur │ │ │ +00000370: 7265 6e74 2d6c 6f61 642d 6c69 7374 2070 rent-load-list p │ │ │ +00000380: 7574 204d 756c 7469 706c 652d 7661 6c75 ut Multiple-valu │ │ │ +00000390: 652d 6269 6e64 206c 6973 702d 696e 6465 e-bind lisp-inde │ │ │ +000003a0: 6e74 2d66 756e 6374 696f 6e20 3220 4d75 nt-function 2 Mu │ │ │ +000003b0: 6c74 6970 6c65 2d76 616c 7565 2d73 6574 ltiple-value-set │ │ │ +000003c0: 7120 4d75 6c74 6970 6c65 2d76 616c 7565 q Multiple-value │ │ │ +000003d0: 2d63 616c 6c20 3120 4d75 6c74 6970 6c65 -call 1 Multiple │ │ │ +000003e0: 2d76 616c 7565 2d70 726f 6731 202a 6d76 -value-prog1 *mv │ │ │ +000003f0: 616c 7565 732d 7661 6c75 6573 2a20 6465 alues-values* de │ │ │ +00000400: 6661 756c 742d 626f 756e 6470 2073 6574 fault-boundp set │ │ │ +00000410: 2d64 6566 6175 6c74 206e 696c 5d20 3429 -default nil] 4) │ │ │ +00000420: 0a28 6465 6661 6c69 6173 2027 5661 6c75 .(defalias 'Valu │ │ │ +00000430: 6573 2023 5b28 2672 6573 7420 7661 6c2d es #[(&rest val- │ │ │ +00000440: 666f 726d 7329 2022 0910 0940 8722 205b forms) "...@." [ │ │ │ +00000450: 2a6d 7661 6c75 6573 2d76 616c 7565 732a *mvalues-values* │ │ │ +00000460: 2076 616c 2d66 6f72 6d73 5d20 315d 290a val-forms] 1]). │ │ │ +00000470: 2864 6566 616c 6961 7320 2756 616c 7565 (defalias 'Value │ │ │ +00000480: 732d 6c69 7374 2023 5b28 7661 6c2d 666f s-list #[(val-fo │ │ │ +00000490: 726d 7329 2022 c1c2 085c 2287 2220 5b76 rms) "...\"." [v │ │ │ +000004a0: 616c 2d66 6f72 6d73 2061 7070 6c79 2076 al-forms apply v │ │ │ +000004b0: 616c 7565 735d 2033 5d29 0a28 6465 6661 alues] 3]).(defa │ │ │ +000004c0: 6c69 6173 2027 4d75 6c74 6970 6c65 2d76 lias 'Multiple-v │ │ │ +000004d0: 616c 7565 2d6c 6973 7420 2728 6d61 6372 alue-list '(macr │ │ │ +000004e0: 6f20 2e20 235b 2866 6f72 6d29 2022 c1c2 o . #[(form) ".. │ │ │ +000004f0: c308 4444 c445 8722 205b 666f 726d 206c ..DD.E." [form l │ │ │ +00000500: 6574 2a20 282a 6d76 616c 7565 732d 7661 et* (*mvalues-va │ │ │ +00000510: 6c75 6573 2a20 6e69 6c29 202a 6d76 616c lues* nil) *mval │ │ │ +00000520: 7565 732d 7465 6d70 2a20 286f 7220 2861 ues-temp* (or (a │ │ │ +00000530: 6e64 2028 6571 202a 6d76 616c 7565 732d nd (eq *mvalues- │ │ │ +00000540: 7465 6d70 2a20 2863 6172 202a 6d76 616c temp* (car *mval │ │ │ +00000550: 7565 732d 7661 6c75 6573 2a29 2920 2a6d ues-values*)) *m │ │ │ +00000560: 7661 6c75 6573 2d76 616c 7565 732a 2920 values-values*) │ │ │ +00000570: 286c 6973 7420 2a6d 7661 6c75 6573 2d74 (list *mvalues-t │ │ │ +00000580: 656d 702a 2929 5d20 345d 2929 0a28 6465 emp*))] 4])).(de │ │ │ +00000590: 6661 6c69 6173 2027 4d75 6c74 6970 6c65 falias 'Multiple │ │ │ +000005a0: 2d76 616c 7565 2d63 616c 6c20 2728 6d61 -value-call '(ma │ │ │ +000005b0: 6372 6f20 2e20 235b 2866 756e 6374 696f cro . #[(functio │ │ │ +000005c0: 6e20 2672 6573 7420 6172 6773 2920 22c2 n &rest args) ". │ │ │ +000005d0: 09c3 c4c5 085c 2242 4587 2220 5b61 7267 .....\"BE." [arg │ │ │ +000005e0: 7320 6675 6e63 7469 6f6e 2061 7070 6c79 s function apply │ │ │ +000005f0: 2061 7070 656e 6420 6d61 7063 6172 2023 append mapcar # │ │ │ +00000600: 5b28 7829 2022 c108 4487 2220 5b78 204d [(x) "..D." [x M │ │ │ +00000610: 756c 7469 706c 652d 7661 6c75 652d 6c69 ultiple-value-li │ │ │ +00000620: 7374 5d20 325d 5d20 365d 2929 0a28 6465 st] 2]] 6])).(de │ │ │ +00000630: 6661 6c69 6173 2027 4d75 6c74 6970 6c65 falias 'Multiple │ │ │ +00000640: 2d76 616c 7565 2d62 696e 6420 2728 6d61 -value-bind '(ma │ │ │ +00000650: 6372 6f20 2e20 235b 2876 6172 7320 666f cro . #[(vars fo │ │ │ +00000660: 726d 2026 7265 7374 2062 6f64 7929 2022 rm &rest body) " │ │ │ +00000670: c35c 6ec4 0944 0842 4242 8722 205b 626f .\n..D.BBB." [bo │ │ │ +00000680: 6479 2066 6f72 6d20 7661 7273 206d 756c dy form vars mul │ │ │ +00000690: 7469 706c 652d 7661 6c75 652d 6269 6e64 tiple-value-bind │ │ │ +000006a0: 204d 756c 7469 706c 652d 7661 6c75 652d Multiple-value- │ │ │ +000006b0: 6c69 7374 5d20 345d 2929 0a28 6465 6661 list] 4])).(defa │ │ │ +000006c0: 6c69 6173 2027 4d75 6c74 6970 6c65 2d76 lias 'Multiple-v │ │ │ +000006d0: 616c 7565 2d73 6574 7120 2728 6d61 6372 alue-setq '(macr │ │ │ +000006e0: 6f20 2e20 235b 2876 6172 7320 666f 726d o . #[(vars form │ │ │ +000006f0: 2920 22c2 09c3 0844 4587 2220 5b66 6f72 ) "....DE." [for │ │ │ +00000700: 6d20 7661 7273 206d 756c 7469 706c 652d m vars multiple- │ │ │ +00000710: 7661 6c75 652d 7365 7471 204d 756c 7469 value-setq Multi │ │ │ +00000720: 706c 652d 7661 6c75 652d 6c69 7374 5d20 ple-value-list] │ │ │ +00000730: 345d 2929 0a28 6465 6661 6c69 6173 2027 4])).(defalias ' │ │ │ +00000740: 4d75 6c74 6970 6c65 2d76 616c 7565 2d70 Multiple-value-p │ │ │ +00000750: 726f 6731 2027 286d 6163 726f 202e 2023 rog1 '(macro . # │ │ │ +00000760: 5b28 666f 726d 2026 7265 7374 2062 6f64 [(form &rest bod │ │ │ +00000770: 7929 2022 c209 c3c4 0842 4245 8722 205b y) ".....BBE." [ │ │ │ +00000780: 626f 6479 2066 6f72 6d20 7072 6f67 3120 body form prog1 │ │ │ +00000790: 6c65 7420 2828 2a6d 7661 6c75 6573 2d76 let ((*mvalues-v │ │ │ +000007a0: 616c 7565 732a 206e 696c 2929 5d20 355d alues* nil))] 5] │ │ │ +000007b0: 2929 0a28 6465 6661 6c69 6173 2027 6275 )).(defalias 'bu │ │ │ +000007c0: 696c 642d 6b6c 6973 7420 235b 2861 7267 ild-klist #[(arg │ │ │ +000007d0: 6c69 7374 206b 6579 7320 266f 7074 696f list keys &optio │ │ │ +000007e0: 6e61 6c20 616c 6c6f 772d 6f74 6865 7273 nal allow-others │ │ │ +000007f0: 2920 22c6 c7c8 c91d ca89 1c0d 4061 ab83 ) ".........@a.. │ │ │ +00000800: 0dae 820c 432a c91d cb08 2189 1c0d 4061 ....C*....!...@a │ │ │ +00000810: ab83 0dae 820c 432a 5c22 5c22 1b0e 11ac ......C*\"\".... │ │ │ +00000820: 92cc cdce 0b5c 225c 6e5c 2289 19ab 86cf .....\"\n\"..... │ │ │ +00000830: d009 5c6e 2388 290b 2987 2220 5b61 7267 ..\n#.).)." [arg │ │ │ +00000840: 6c69 7374 2062 6164 206b 6579 7320 7265 list bad keys re │ │ │ +00000850: 7320 2a6d 7661 6c75 6573 2d74 656d 702a s *mvalues-temp* │ │ │ +00000860: 202a 6d76 616c 7565 732d 7661 6c75 6573 *mvalues-values │ │ │ +00000870: 2a20 6170 706c 7920 6d61 7063 6172 2a20 * apply mapcar* │ │ │ +00000880: 6170 7065 6e64 206e 696c 2063 6f6e 7320 append nil cons │ │ │ +00000890: 756e 7a69 702d 6c69 7374 7320 7365 742d unzip-lists set- │ │ │ +000008a0: 6469 6666 6572 656e 6365 206d 6170 6361 difference mapca │ │ │ +000008b0: 7220 6361 7220 6572 726f 7220 2242 6164 r car error "Bad │ │ │ +000008c0: 206b 6579 776f 7264 733a 2025 7320 6e6f keywords: %s no │ │ │ +000008d0: 7420 696e 2025 7322 2061 6c6c 6f77 2d6f t in %s" allow-o │ │ │ +000008e0: 7468 6572 735d 2037 5d29 0a28 6465 6661 thers] 7]).(defa │ │ │ +000008f0: 6c69 6173 2027 6578 7472 6163 742d 6672 lias 'extract-fr │ │ │ +00000900: 6f6d 2d6b 6c69 7374 2023 5b28 6b6c 6973 om-klist #[(klis │ │ │ +00000910: 7420 6b65 7920 266f 7074 696f 6e61 6c20 t key &optional │ │ │ +00000920: 6465 6629 2022 5c6e 09b7 891b ab84 0b41 def) "\n.......A │ │ │ +00000930: aa81 0829 8722 205b 6465 6620 6b6c 6973 ...)." [def klis │ │ │ +00000940: 7420 6b65 7920 7265 735d 2033 5d29 0a28 t key res] 3]).( │ │ │ +00000950: 6465 6661 6c69 6173 2027 6b65 7977 6f72 defalias 'keywor │ │ │ +00000960: 642d 6172 6775 6d65 6e74 2d73 7570 706c d-argument-suppl │ │ │ +00000970: 6965 642d 7020 235b 286b 6c69 7374 206b ied-p #[(klist k │ │ │ +00000980: 6579 2920 2209 08b7 8722 205b 6b6c 6973 ey) "...." [klis │ │ │ +00000990: 7420 6b65 795d 2032 5d29 0a28 6465 6661 t key] 2]).(defa │ │ │ +000009a0: 6c69 6173 2027 656c 742d 7361 7469 7366 lias 'elt-satisf │ │ │ +000009b0: 6965 732d 7465 7374 2d70 2023 5b28 6974 ies-test-p #[(it │ │ │ +000009c0: 656d 2065 6c74 206b 6c69 7374 2920 22c6 em elt klist) ". │ │ │ +000009d0: 0cb7 41c7 0cb7 41c8 0cb7 411b 191a 0bab ..A...A...A..... │ │ │ +000009e0: 840b 0d21 155c 6eab 875c 6e08 0d5c 223f ...!.\n..\n..\"? │ │ │ +000009f0: aa87 09ae 81c9 080d 5c22 2b87 2220 5b69 ........\"+." [i │ │ │ +00000a00: 7465 6d20 7465 7374 2074 6573 742d 6e6f tem test test-no │ │ │ +00000a10: 7420 6b65 7920 6b6c 6973 7420 656c 7420 t key klist elt │ │ │ +00000a20: 3a74 6573 742d 6e6f 7420 3a74 6573 7420 :test-not :test │ │ │ +00000a30: 3a6b 6579 2065 716c 5d20 345d 290a 2864 :key eql] 4]).(d │ │ │ +00000a40: 6566 616c 6961 7320 2763 6c2d 666c 6f6f efalias 'cl-floo │ │ │ +00000a50: 7220 235b 2861 2026 6f70 7469 6f6e 616c r #[(a &optional │ │ │ +00000a60: 2062 2920 22c2 c309 085c 2221 8722 205b b) "....\"!." [ │ │ │ +00000a70: 6220 6120 5661 6c75 6573 2d6c 6973 7420 b a Values-list │ │ │ +00000a80: 666c 6f6f 722a 5d20 345d 290a 2864 6566 floor*] 4]).(def │ │ │ +00000a90: 616c 6961 7320 2763 6c2d 6365 696c 696e alias 'cl-ceilin │ │ │ +00000aa0: 6720 235b 2861 2026 6f70 7469 6f6e 616c g #[(a &optional │ │ │ +00000ab0: 2062 2920 22c2 c309 085c 2221 8722 205b b) "....\"!." [ │ │ │ +00000ac0: 6220 6120 5661 6c75 6573 2d6c 6973 7420 b a Values-list │ │ │ +00000ad0: 6365 696c 696e 672a 5d20 345d 290a 2864 ceiling*] 4]).(d │ │ │ +00000ae0: 6566 616c 6961 7320 2763 6c2d 726f 756e efalias 'cl-roun │ │ │ +00000af0: 6420 235b 2861 2026 6f70 7469 6f6e 616c d #[(a &optional │ │ │ +00000b00: 2062 2920 22c2 c309 085c 2221 8722 205b b) "....\"!." [ │ │ │ +00000b10: 6220 6120 5661 6c75 6573 2d6c 6973 7420 b a Values-list │ │ │ +00000b20: 726f 756e 642a 5d20 345d 290a 2864 6566 round*] 4]).(def │ │ │ +00000b30: 616c 6961 7320 2763 6c2d 7472 756e 6361 alias 'cl-trunca │ │ │ +00000b40: 7465 2023 5b28 6120 266f 7074 696f 6e61 te #[(a &optiona │ │ │ +00000b50: 6c20 6229 2022 c2c3 0908 5c22 2187 2220 l b) "....\"!." │ │ │ +00000b60: 5b62 2061 2056 616c 7565 732d 6c69 7374 [b a Values-list │ │ │ +00000b70: 2074 7275 6e63 6174 652a 5d20 345d 290a truncate*] 4]). │ │ │ +00000b80: 2864 6566 616c 6961 7320 2773 6166 652d (defalias 'safe- │ │ │ +00000b90: 6964 6976 2023 5b28 6120 6229 2022 c40b idiv #[(a b) ".. │ │ │ +00000ba0: 21c4 5c6e 21a5 19c5 0b21 c55c 6e21 5f18 !.\n!....!.\n!_. │ │ │ +00000bb0: c609 0b08 095f 5c6e 5f5a 0823 2a87 2220 ....._\n_Z.#*." │ │ │ +00000bc0: 5b73 2071 2062 2061 2061 6273 2073 6967 [s q b a abs sig │ │ │ +00000bd0: 6e75 6d20 5661 6c75 6573 5d20 355d 290a num Values] 5]). │ │ │ +00000be0: 2864 6566 616c 6961 7320 2770 6169 722d (defalias 'pair- │ │ │ +00000bf0: 7769 7468 2d6e 6577 7379 6d73 2023 5b28 with-newsyms #[( │ │ │ +00000c00: 6f6c 6466 6f72 6d73 2920 22c2 c308 5c22 oldforms) "...\" │ │ │ +00000c10: 19c4 c5c6 0908 2309 5c22 2987 2220 5b6f ......#.\")." [o │ │ │ +00000c20: 6c64 666f 726d 7320 6e65 7773 796d 7320 ldforms newsyms │ │ │ +00000c30: 6d61 7063 6172 2023 5b28 7829 2022 c020 mapcar #[(x) ". │ │ │ +00000c40: 8722 205b 6765 6e73 796d 5d20 315d 2056 ." [gensym] 1] V │ │ │ +00000c50: 616c 7565 7320 6d61 7063 6172 2a20 6c69 alues mapcar* li │ │ │ +00000c60: 7374 5d20 355d 290a 2864 6566 616c 6961 st] 5]).(defalia │ │ │ +00000c70: 7320 277a 6970 2d6c 6973 7473 2023 5b28 s 'zip-lists #[( │ │ │ +00000c80: 6576 656e 7320 6f64 6473 2920 22c2 c309 evens odds) "... │ │ │ +00000c90: 0823 8722 205b 6f64 6473 2065 7665 6e73 .#." [odds evens │ │ │ +00000ca0: 206d 6170 6361 6e20 6c69 7374 5d20 345d mapcan list] 4] │ │ │ +00000cb0: 290a 2864 6566 616c 6961 7320 2775 6e7a ).(defalias 'unz │ │ │ +00000cc0: 6970 2d6c 6973 7473 2023 5b28 6c69 7374 ip-lists #[(list │ │ │ +00000cd0: 2920 22c3 8919 185c 6eab 925c 6e40 0842 ) "....\n..\n@.B │ │ │ +00000ce0: 105c 6e41 4009 4211 5c6e 4141 8912 ac6e .\nA@.B.\nAA...n │ │ │ +00000cf0: c408 9f09 9f5c 222a 8722 205b 6520 6f20 .....\"*." [e o │ │ │ +00000d00: 6c69 7374 206e 696c 2056 616c 7565 735d list nil Values] │ │ │ +00000d10: 2034 5d29 0a28 6465 6661 6c69 6173 2027 4]).(defalias ' │ │ │ +00000d20: 7265 6173 7365 6d62 6c65 2d61 7267 736c reassemble-argsl │ │ │ +00000d30: 6973 7473 2023 5b28 6c69 7374 2920 22c3 ists #[(list) ". │ │ │ +00000d40: c4c5 c608 5c22 5c22 c71a 1909 5389 11c8 ....\"\"....S... │ │ │ +00000d50: 59ab 89c5 c908 5c22 5c6e 4212 aa6f 5c6e Y.....\"\nB..o\n │ │ │ +00000d60: 2a87 2220 5b6c 6973 7420 6e20 7265 7320 *." [list n res │ │ │ +00000d70: 6170 706c 7920 6d69 6e20 6d61 7063 6172 apply min mapcar │ │ │ +00000d80: 206c 656e 6774 6820 6e69 6c20 3020 235b length nil 0 #[ │ │ │ +00000d90: 2878 2920 2209 089c 8722 205b 6e20 785d (x) "...." [n x] │ │ │ +00000da0: 2032 5d5d 2035 5d29 0a28 6465 6661 6c69 2]] 5]).(defali │ │ │ +00000db0: 6173 2027 6475 706c 6963 6174 652d 7379 as 'duplicate-sy │ │ │ +00000dc0: 6d62 6f6c 732d 7020 235b 286c 6973 7429 mbols-p #[(list) │ │ │ +00000dd0: 2022 c218 09ab 9209 4009 4173 ab85 0940 "......@.As...@ │ │ │ +00000de0: 0842 1009 4189 11ac 6e08 2987 2220 5b72 .B..A...n.)." [r │ │ │ +00000df0: 6573 206c 6973 7420 6e69 6c5d 2033 5d29 es list nil] 3]) │ │ │ +00000e00: 0a28 6465 6661 6c69 6173 2027 7365 746e .(defalias 'setn │ │ │ +00000e10: 7468 2023 5b28 6e20 6c69 7374 2078 2920 th #[(n list x) │ │ │ +00000e20: 225c 6e09 9b08 a087 2220 5b78 206c 6973 "\n....." [x lis │ │ │ +00000e30: 7420 6e5d 2032 5d29 0a28 6465 6661 6c69 t n] 2]).(defali │ │ │ +00000e40: 6173 2027 7365 746e 7468 6364 7220 235b as 'setnthcdr #[ │ │ │ +00000e50: 286e 206c 6973 7420 7829 2022 5c6e 5309 (n list x) "\nS. │ │ │ +00000e60: 9b08 a187 2220 5b78 206c 6973 7420 6e5d ...." [x list n] │ │ │ +00000e70: 2032 5d29 0a28 6465 6661 6c69 6173 2027 2]).(defalias ' │ │ │ +00000e80: 7365 7465 6c74 2023 5b28 7365 7120 6e20 setelt #[(seq n │ │ │ +00000e90: 7829 2022 5c6e 3aab 8609 5c6e 9b08 a087 x) "\n:...\n.... │ │ │ +00000ea0: 5c6e 0908 4987 2220 5b78 206e 2073 6571 \n..I." [x n seq │ │ │ +00000eb0: 5d20 335d 290a 2870 726f 7669 6465 2027 ] 3]).(provide ' │ │ │ +00000ec0: 636c 2d63 6f6d 7061 7429 0a cl-compat). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/cl-extra.elc │ │ │ @@ -1,1047 +1,1046 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3434 2032 eb 25 01:53:44 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6c2d 6578 7472 612e 656c 0a3b 3b3b 2065 l-extra.el.;;; e │ │ │ -000000a0: 6d61 6373 2076 6572 7369 6f6e 2032 312e macs version 21. │ │ │ -000000b0: 3420 2870 6174 6368 2032 3429 2022 5374 4 (patch 24) "St │ │ │ -000000c0: 616e 6461 7264 2043 2220 5845 6d61 6373 andard C" XEmacs │ │ │ -000000d0: 204c 7563 6964 2e0a 3b3b 3b20 6279 7465 Lucid..;;; byte │ │ │ -000000e0: 636f 6d70 2076 6572 7369 6f6e 2032 2e32 comp version 2.2 │ │ │ -000000f0: 3720 5845 6d61 6373 3b20 3230 3030 2d30 7 XEmacs; 2000-0 │ │ │ -00000100: 392d 3132 2e0a 3b3b 3b20 6f70 7469 6d69 9-12..;;; optimi │ │ │ -00000110: 7a61 7469 6f6e 2069 7320 6f6e 2e0a 3b3b zation is on..;; │ │ │ -00000120: 3b20 7468 6973 2066 696c 6520 7573 6573 ; this file uses │ │ │ -00000130: 206f 7063 6f64 6573 2077 6869 6368 2064 opcodes which d │ │ │ -00000140: 6f20 6e6f 7420 6578 6973 7420 696e 2045 o not exist in E │ │ │ -00000150: 6d61 6373 2031 392e 0a0a 2869 6620 2861 macs 19...(if (a │ │ │ -00000160: 6e64 2028 626f 756e 6470 2027 656d 6163 nd (boundp 'emac │ │ │ -00000170: 732d 7665 7273 696f 6e29 0a09 2028 6f72 s-version).. (or │ │ │ -00000180: 2028 616e 6420 2862 6f75 6e64 7020 2765 (and (boundp 'e │ │ │ -00000190: 706f 6368 3a3a 7665 7273 696f 6e29 2065 poch::version) e │ │ │ -000001a0: 706f 6368 3a3a 7665 7273 696f 6e29 0a09 poch::version).. │ │ │ -000001b0: 2020 2020 2028 7374 7269 6e67 2d6c 6573 (string-les │ │ │ -000001c0: 7370 2065 6d61 6373 2d76 6572 7369 6f6e sp emacs-version │ │ │ -000001d0: 2022 3230 2229 2929 0a20 2020 2028 6572 "20"))). (er │ │ │ -000001e0: 726f 7220 2260 636c 2d65 7874 7261 2e65 ror "`cl-extra.e │ │ │ -000001f0: 6c27 2077 6173 2063 6f6d 7069 6c65 6420 l' was compiled │ │ │ -00000200: 666f 7220 456d 6163 7320 3230 2229 290a for Emacs 20")). │ │ │ -00000210: 0a28 6f72 2028 626f 756e 6470 2027 6375 .(or (boundp 'cu │ │ │ -00000220: 7272 656e 742d 6c6f 6164 2d6c 6973 7429 rrent-load-list) │ │ │ -00000230: 2028 7365 7471 2063 7572 7265 6e74 2d6c (setq current-l │ │ │ -00000240: 6f61 642d 6c69 7374 206e 696c 2929 0a0a oad-list nil)).. │ │ │ -00000250: 0a28 6279 7465 2d63 6f64 6520 22c1 0873 .(byte-code "..s │ │ │ -00000260: ac84 c2c3 2188 c187 2220 5b66 6561 7475 ....!..." [featu │ │ │ -00000270: 7265 7320 636c 2d31 3920 6572 726f 7220 res cl-19 error │ │ │ -00000280: 2254 7269 6564 2074 6f20 6c6f 6164 2060 "Tried to load ` │ │ │ -00000290: 636c 2d65 7874 7261 2720 6265 666f 7265 cl-extra' before │ │ │ -000002a0: 2060 636c 2721 225d 2032 290a 2864 6566 `cl'!"] 2).(def │ │ │ -000002b0: 616c 6961 7320 2763 6c2d 7075 7368 2027 alias 'cl-push ' │ │ │ -000002c0: 286d 6163 726f 202e 2023 5b28 7820 706c (macro . #[(x pl │ │ │ -000002d0: 6163 6529 2022 c209 c308 0945 4587 2220 ace) ".....EE." │ │ │ -000002e0: 5b78 2070 6c61 6365 2073 6574 7120 636f [x place setq co │ │ │ -000002f0: 6e73 5d20 355d 2929 0a28 6465 6661 6c69 ns] 5])).(defali │ │ │ -00000300: 6173 2027 636c 2d70 6f70 2027 286d 6163 as 'cl-pop '(mac │ │ │ -00000310: 726f 202e 2023 5b28 706c 6163 6529 2022 ro . #[(place) " │ │ │ -00000320: c1c2 08c3 08c4 0844 4545 4487 2220 5b70 .......DEED." [p │ │ │ -00000330: 6c61 6365 2063 6172 2070 726f 6731 2073 lace car prog1 s │ │ │ -00000340: 6574 7120 6364 725d 2037 5d29 290a 2340 etq cdr] 7])).#@ │ │ │ -00000350: 3637 2043 6f65 7263 6520 4f42 4a45 4354 67 Coerce OBJECT │ │ │ -00000360: 2074 6f20 7479 7065 2054 5950 452e 0a54 to type TYPE..T │ │ │ -00000370: 5950 4520 6973 2061 2043 6f6d 6d6f 6e20 YPE is a Common │ │ │ -00000380: 4c69 7370 2074 7970 6520 7370 6563 6966 Lisp type specif │ │ │ -00000390: 6965 722e 1f0a 2864 6566 616c 6961 7320 ier...(defalias │ │ │ -000003a0: 2763 6f65 7263 6520 235b 2878 2074 7970 'coerce #[(x typ │ │ │ -000003b0: 6529 2022 09c3 61ab 8b5c 6e3c ab82 5c6e e) "..a..\n<..\n │ │ │ -000003c0: 87c4 5c6e c55c 2287 09c6 61ab 8bc7 5c6e ..\n.\"...a...\n │ │ │ -000003d0: 21ab 825c 6e87 c85c 6e21 8709 c961 ab8a !..\n..\n!...a.. │ │ │ -000003e0: 5c6e 3bab 825c 6e87 5c6e b001 8709 ca61 \n;..\n.\n.....a │ │ │ -000003f0: ab8b cb5c 6e21 ab82 5c6e 87c8 5c6e 2187 ...\n!..\n..\n!. │ │ │ -00000400: 09cc 61ab 8e5c 6e3b ab8a 5c6e 47cd 55ab ..a..\n;..\nG.U. │ │ │ -00000410: 845c 6ece 4887 09cc 61ab 8b5c 6e39 ab87 .\n.H...a..\n9.. │ │ │ -00000420: cfd0 5c6e 2109 5c22 8709 cc61 ab89 d15c ..\n!.\"...a...\ │ │ │ -00000430: 6e21 ab84 d25c 6e21 8709 d361 ab89 d45c n!...\n!...a...\ │ │ │ -00000440: 6e21 ab84 d55c 6e21 8709 d661 ab84 d65c n!...\n!...a...\ │ │ │ -00000450: 6e21 8709 d761 ab8f d85c 6e21 ab82 5c6e n!...a...\n!..\n │ │ │ -00000460: 87d9 d7c4 5c6e c55c 225c 2287 09da 61ab ....\n.\"\"...a. │ │ │ -00000470: 9cdb 5c6e 21ab 825c 6e87 dc20 18dd 085c ..\n!..\n.. ...\ │ │ │ -00000480: 6e3c ab83 5c6e aa84 c45c 6ec5 5c22 5c22 n<..\n...\n.\"\" │ │ │ -00000490: 8808 2987 de5c 6e09 5c22 ab82 5c6e 87df ..)..\n.\"..\n.. │ │ │ -000004a0: e05c 6e09 2387 2220 5b77 6c20 7479 7065 .\n.#." [wl type │ │ │ -000004b0: 2078 206c 6973 7420 6170 7065 6e64 206e x list append n │ │ │ -000004c0: 696c 2076 6563 746f 7220 7665 6374 6f72 il vector vector │ │ │ -000004d0: 7020 7663 6f6e 6361 7420 7374 7269 6e67 p vconcat string │ │ │ -000004e0: 2061 7272 6179 2061 7272 6179 7020 6368 array arrayp ch │ │ │ -000004f0: 6172 6163 7465 7220 3120 3020 636f 6572 aracter 1 0 coer │ │ │ -00000500: 6365 2073 796d 626f 6c2d 6e61 6d65 2063 ce symbol-name c │ │ │ -00000510: 6861 722d 696e 742d 7020 696e 742d 6368 har-int-p int-ch │ │ │ -00000520: 6172 2069 6e74 6567 6572 2063 6861 7261 ar integer chara │ │ │ -00000530: 6374 6572 7020 6368 6172 2d69 6e74 2066 cterp char-int f │ │ │ -00000540: 6c6f 6174 2062 6974 2d76 6563 746f 7220 loat bit-vector │ │ │ -00000550: 6269 742d 7665 6374 6f72 2d70 2061 7070 bit-vector-p app │ │ │ -00000560: 6c79 2077 6561 6b2d 6c69 7374 2077 6561 ly weak-list wea │ │ │ -00000570: 6b2d 6c69 7374 2d70 206d 616b 652d 7765 k-list-p make-we │ │ │ -00000580: 616b 2d6c 6973 7420 7365 742d 7765 616b ak-list set-weak │ │ │ -00000590: 2d6c 6973 742d 6c69 7374 2074 7970 6570 -list-list typep │ │ │ -000005a0: 2065 7272 6f72 2022 4361 6e27 7420 636f error "Can't co │ │ │ -000005b0: 6572 6365 2025 7320 746f 2074 7970 6520 erce %s to type │ │ │ -000005c0: 2573 225d 2035 2028 2324 202e 2038 3531 %s"] 5 (#$ . 851 │ │ │ -000005d0: 295d 290a 2340 3232 3520 5265 7475 726e )]).#@225 Return │ │ │ -000005e0: 2074 2069 6620 7477 6f20 4c69 7370 206f t if two Lisp o │ │ │ -000005f0: 626a 6563 7473 2068 6176 6520 7369 6d69 bjects have simi │ │ │ -00000600: 6c61 7220 7374 7275 6374 7572 6573 2061 lar structures a │ │ │ -00000610: 6e64 2063 6f6e 7465 6e74 732e 0a54 6869 nd contents..Thi │ │ │ -00000620: 7320 6973 206c 696b 6520 6065 7175 616c s is like `equal │ │ │ -00000630: 272c 2065 7863 6570 7420 7468 6174 2069 ', except that i │ │ │ -00000640: 7420 6163 6365 7074 7320 6e75 6d65 7269 t accepts numeri │ │ │ -00000650: 6361 6c6c 7920 6571 7561 6c0a 6e75 6d62 cally equal.numb │ │ │ -00000660: 6572 7320 6f66 2064 6966 6665 7265 6e74 ers of different │ │ │ -00000670: 2074 7970 6573 2028 666c 6f61 7420 7673 types (float vs │ │ │ -00000680: 2e20 696e 7465 6765 7229 2c20 616e 6420 . integer), and │ │ │ -00000690: 616c 736f 2063 6f6d 7061 7265 730a 7374 also compares.st │ │ │ -000006a0: 7269 6e67 7320 6361 7365 2d69 6e73 656e rings case-insen │ │ │ -000006b0: 7369 7469 7665 6c79 2e1f 0a28 6465 6661 sitively...(defa │ │ │ -000006c0: 6c69 6173 2027 6571 7561 6c70 2023 5b28 lias 'equalp #[( │ │ │ -000006d0: 7820 7929 2022 5c6e 0961 ab82 c387 5c6e x y) "\n.a....\n │ │ │ -000006e0: 3bab 9909 3b85 9f00 5c6e 4709 4755 859f ;...;...\nG.GU.. │ │ │ -000006f0: 005c 6e09 9886 9f00 5c6e 9709 9798 87c4 .\n.....\n...... │ │ │ -00000700: 5c6e 21ab 92c4 0921 adf1 c55c 6e09 5c22 \n!....!...\n.\" │ │ │ -00000710: aeeb c55c 6e97 0997 5c22 875c 6ea7 ab88 ...\n...\".\n... │ │ │ -00000720: 09a7 addc 5c6e 0955 875c 6e3a aba6 5c6e ....\n.U.\n:..\n │ │ │ -00000730: 3aab 9809 3aab 94c6 5c6e 4009 405c 22ab :...:...\n@.@\". │ │ │ -00000740: 8c5c 6e89 4112 8809 8941 1188 aa64 5c6e .\n.A....A...d\n │ │ │ -00000750: 3a3f adb3 c65c 6e09 5c22 87c7 5c6e 21ab :?...\n.\"..\n!. │ │ │ -00000760: a6c7 0921 ada4 5c6e 4709 4755 ad9d 5c6e ...!..\nG.GU..\n │ │ │ -00000770: 4718 0853 8910 c859 ab8a c65c 6e08 4809 G..S...Y...\n.H. │ │ │ -00000780: 0848 5c22 ac6e 08c8 5729 875c 6e09 6b87 .H\".n..W).\n.k. │ │ │ -00000790: 2220 5b69 2079 2078 2074 2063 6861 7261 " [i y x t chara │ │ │ -000007a0: 6374 6572 7020 6368 6172 2d65 7175 616c cterp char-equal │ │ │ -000007b0: 2065 7175 616c 7020 7665 6374 6f72 7020 equalp vectorp │ │ │ -000007c0: 305d 2034 2028 2324 202e 2031 3439 3829 0] 4 (#$ . 1498) │ │ │ -000007d0: 5d29 0a28 6465 6661 6c69 6173 2027 636c ]).(defalias 'cl │ │ │ -000007e0: 2d6d 6170 6361 722d 6d61 6e79 2023 5b28 -mapcar-many #[( │ │ │ -000007f0: 636c 2d66 756e 6320 636c 2d73 6571 7329 cl-func cl-seqs) │ │ │ -00000800: 2022 0b41 41ab e0c6 1ac7 c8c9 ca0b 5c22 ".AA.........\" │ │ │ -00000810: 5c22 1e0f cb1d cc0b 211e 10c6 891c 1e0e \"......!....... │ │ │ -00000820: cc0b 2113 0d0e 0f57 abba 0b14 0e10 160e ..!....W........ │ │ │ -00000830: 0cab a20e 0e0c 403a ab8b 0c40 400c 8940 ......@:...@@..@ │ │ │ -00000840: 41a0 88aa 840c 400d 48a0 880c 4114 0e0e A.....@.H...A... │ │ │ -00000850: 4116 0eaa 5bc7 0e11 0e10 5c22 5c6e 4212 A...[.....\"\nB. │ │ │ -00000860: 0d54 8915 aa41 5c6e 9f2e 0687 c60b 400b .T...A\n......@. │ │ │ -00000870: 4140 1918 1a08 4709 475e cd1d 1e0f 0d54 A@....G.G^.....T │ │ │ -00000880: 8915 0e0f 57ab a40e 1108 3aab 8708 8941 ....W.....:....A │ │ │ -00000890: 1040 aa83 080d 4809 3aab 8709 8941 1140 .@....H.:....A.@ │ │ │ -000008a0: aa83 090d 485c 225c 6e42 12aa 532a 5c6e ....H\"\nB..S*\n │ │ │ -000008b0: 9f2b 8722 205b 636c 2d78 2063 6c2d 7920 .+." [cl-x cl-y │ │ │ -000008c0: 636c 2d72 6573 2063 6c2d 7365 7173 2063 cl-res cl-seqs c │ │ │ -000008d0: 6c2d 7031 2063 6c2d 6920 6e69 6c20 6170 l-p1 cl-i nil ap │ │ │ -000008e0: 706c 7920 6d69 6e20 6d61 7063 6172 206c ply min mapcar l │ │ │ -000008f0: 656e 6774 6820 3020 636f 7079 2d73 6571 ength 0 copy-seq │ │ │ -00000900: 7565 6e63 6520 2d31 2063 6c2d 7032 2063 uence -1 cl-p2 c │ │ │ -00000910: 6c2d 6e20 636c 2d61 7267 7320 636c 2d66 l-n cl-args cl-f │ │ │ -00000920: 756e 635d 2036 5d29 0a23 4031 3634 204d unc] 6]).#@164 M │ │ │ -00000930: 6170 2061 2066 756e 6374 696f 6e20 6163 ap a function ac │ │ │ -00000940: 726f 7373 206f 6e65 206f 7220 6d6f 7265 ross one or more │ │ │ -00000950: 2073 6571 7565 6e63 6573 2c20 7265 7475 sequences, retu │ │ │ -00000960: 726e 696e 6720 6120 7365 7175 656e 6365 rning a sequence │ │ │ -00000970: 2e0a 5459 5045 2069 7320 7468 6520 7365 ..TYPE is the se │ │ │ -00000980: 7175 656e 6365 2074 7970 6520 746f 2072 quence type to r │ │ │ -00000990: 6574 7572 6e2c 2046 554e 4320 6973 2074 eturn, FUNC is t │ │ │ -000009a0: 6865 2066 756e 6374 696f 6e2c 2061 6e64 he function, and │ │ │ -000009b0: 2053 4551 530a 6172 6520 7468 6520 6172 SEQS.are the ar │ │ │ -000009c0: 6775 6d65 6e74 2073 6571 7565 6e63 6573 gument sequences │ │ │ -000009d0: 2e1f 0a28 6465 6661 6c69 6173 2027 6d61 ...(defalias 'ma │ │ │ -000009e0: 7020 235b 2863 6c2d 7479 7065 2063 6c2d p #[(cl-type cl- │ │ │ -000009f0: 6675 6e63 2063 6c2d 7365 7120 2672 6573 func cl-seq &res │ │ │ -00000a00: 7420 636c 2d72 6573 7429 2022 c5c6 5c6e t cl-rest) "..\n │ │ │ -00000a10: 0908 241c 0bad 84c7 0c0b 5c22 2987 2220 ..$.......\")." │ │ │ -00000a20: 5b63 6c2d 7265 7374 2063 6c2d 7365 7120 [cl-rest cl-seq │ │ │ -00000a30: 636c 2d66 756e 6320 636c 2d74 7970 6520 cl-func cl-type │ │ │ -00000a40: 636c 2d72 6573 2061 7070 6c79 206d 6170 cl-res apply map │ │ │ -00000a50: 6361 722a 2063 6f65 7263 655d 2035 2028 car* coerce] 5 ( │ │ │ -00000a60: 2324 202e 2032 3335 3129 5d29 0a23 4031 #$ . 2351)]).#@1 │ │ │ -00000a70: 3339 204d 6170 2046 554e 4320 746f 2065 39 Map FUNC to e │ │ │ -00000a80: 6163 6820 7375 626c 6973 7420 6f66 204c ach sublist of L │ │ │ -00000a90: 4953 5420 6f72 204c 4953 5453 2e0a 4c69 IST or LISTS..Li │ │ │ -00000aa0: 6b65 2060 6d61 7063 6172 272c 2065 7863 ke `mapcar', exc │ │ │ -00000ab0: 6570 7420 6170 706c 6965 7320 746f 206c ept applies to l │ │ │ -00000ac0: 6973 7473 2061 6e64 2074 6865 6972 2063 ists and their c │ │ │ -00000ad0: 6472 2773 2072 6174 6865 7220 7468 616e dr's rather than │ │ │ -00000ae0: 2074 6f0a 7468 6520 656c 656d 656e 7473 to.the elements │ │ │ -00000af0: 2074 6865 6d73 656c 7665 732e 1f0a 2864 themselves...(d │ │ │ -00000b00: 6566 616c 6961 7320 276d 6170 6c69 7374 efalias 'maplist │ │ │ -00000b10: 2023 5b28 636c 2d66 756e 6320 636c 2d6c #[(cl-func cl-l │ │ │ -00000b20: 6973 7420 2672 6573 7420 636c 2d72 6573 ist &rest cl-res │ │ │ -00000b30: 7429 2022 09ab aac6 0cc7 0921 42c6 1b1a t) ".......!B... │ │ │ -00000b40: 1dc6 5c6e 73ac 97c8 085c 6e5c 220d 4215 ..\ns....\n\".B. │ │ │ -00000b50: 5c6e 130b ab6f 0b89 8941 1340 41a0 88aa \n...o...A.@A... │ │ │ -00000b60: 720d 9f2b 87c6 1d0c ab8c 080c 210d 4215 r..+........!.B. │ │ │ -00000b70: 0c41 8914 ac74 0d9f 2987 2220 5b63 6c2d .A...t..)." [cl- │ │ │ -00000b80: 6675 6e63 2063 6c2d 7265 7374 2063 6c2d func cl-rest cl- │ │ │ -00000b90: 6172 6773 2063 6c2d 7020 636c 2d6c 6973 args cl-p cl-lis │ │ │ -00000ba0: 7420 636c 2d72 6573 206e 696c 2063 6f70 t cl-res nil cop │ │ │ -00000bb0: 792d 7365 7175 656e 6365 2061 7070 6c79 y-sequence apply │ │ │ -00000bc0: 5d20 3520 2823 2420 2e20 3236 3735 295d ] 5 (#$ . 2675)] │ │ │ -00000bd0: 290a 2340 3733 204c 696b 6520 606d 6170 ).#@73 Like `map │ │ │ -00000be0: 6361 7227 2c20 6275 7420 646f 6573 206e car', but does n │ │ │ -00000bf0: 6f74 2061 6363 756d 756c 6174 6520 7661 ot accumulate va │ │ │ -00000c00: 6c75 6573 2072 6574 7572 6e65 6420 6279 lues returned by │ │ │ -00000c10: 2074 6865 2066 756e 6374 696f 6e2e 1f0a the function... │ │ │ -00000c20: 2864 6566 616c 6961 7320 276d 6170 6320 (defalias 'mapc │ │ │ -00000c30: 235b 2863 6c2d 6675 6e63 2063 6c2d 7365 #[(cl-func cl-se │ │ │ -00000c40: 7120 2672 6573 7420 636c 2d72 6573 7429 q &rest cl-rest) │ │ │ -00000c50: 2022 09ab 8ac3 c4c5 085c 6e09 2588 aa85 ".......\n.%... │ │ │ -00000c60: c608 5c6e 5c22 885c 6e87 2220 5b63 6c2d ..\n\".\n." [cl- │ │ │ -00000c70: 6675 6e63 2063 6c2d 7265 7374 2063 6c2d func cl-rest cl- │ │ │ -00000c80: 7365 7120 6170 706c 7920 6d61 7020 6e69 seq apply map ni │ │ │ -00000c90: 6c20 6d61 7063 2d69 6e74 6572 6e61 6c5d l mapc-internal] │ │ │ -00000ca0: 2036 2028 2324 202e 2033 3033 3129 5d29 6 (#$ . 3031)]) │ │ │ -00000cb0: 0a23 4037 3420 4c69 6b65 2060 6d61 706c .#@74 Like `mapl │ │ │ -00000cc0: 6973 7427 2c20 6275 7420 646f 6573 206e ist', but does n │ │ │ -00000cd0: 6f74 2061 6363 756d 756c 6174 6520 7661 ot accumulate va │ │ │ -00000ce0: 6c75 6573 2072 6574 7572 6e65 6420 6279 lues returned by │ │ │ -00000cf0: 2074 6865 2066 756e 6374 696f 6e2e 1f0a the function... │ │ │ -00000d00: 2864 6566 616c 6961 7320 276d 6170 6c20 (defalias 'mapl │ │ │ -00000d10: 235b 2863 6c2d 6675 6e63 2063 6c2d 6c69 #[(cl-func cl-li │ │ │ -00000d20: 7374 2026 7265 7374 2063 6c2d 7265 7374 st &rest cl-rest │ │ │ -00000d30: 2920 2209 ab89 c4c5 085c 6e09 2488 aa90 ) "......\n.$... │ │ │ -00000d40: 5c6e 891b ab8a 080b 2188 0b41 8913 ac76 \n......!..A...v │ │ │ -00000d50: 295c 6e87 2220 5b63 6c2d 6675 6e63 2063 )\n." [cl-func c │ │ │ -00000d60: 6c2d 7265 7374 2063 6c2d 6c69 7374 2063 l-rest cl-list c │ │ │ -00000d70: 6c2d 7020 6170 706c 7920 6d61 706c 6973 l-p apply maplis │ │ │ -00000d80: 745d 2036 2028 2324 202e 2033 3235 3429 t] 6 (#$ . 3254) │ │ │ -00000d90: 5d29 0a23 4037 3420 4c69 6b65 2060 6d61 ]).#@74 Like `ma │ │ │ -00000da0: 7063 6172 272c 2062 7574 206e 636f 6e63 pcar', but nconc │ │ │ -00000db0: 2773 2074 6f67 6574 6865 7220 7468 6520 's together the │ │ │ -00000dc0: 7661 6c75 6573 2072 6574 7572 6e65 6420 values returned │ │ │ -00000dd0: 6279 2074 6865 2066 756e 6374 696f 6e2e by the function. │ │ │ -00000de0: 1f0a 2864 6566 616c 6961 7320 276d 6170 ..(defalias 'map │ │ │ -00000df0: 6361 6e20 235b 2863 6c2d 6675 6e63 2063 can #[(cl-func c │ │ │ -00000e00: 6c2d 7365 7120 2672 6573 7420 636c 2d72 l-seq &rest cl-r │ │ │ -00000e10: 6573 7429 2022 c3c4 c3c5 5c6e 0908 245c est) "....\n..$\ │ │ │ -00000e20: 2287 2220 5b63 6c2d 7265 7374 2063 6c2d "." [cl-rest cl- │ │ │ -00000e30: 7365 7120 636c 2d66 756e 6320 6170 706c seq cl-func appl │ │ │ -00000e40: 7920 6e63 6f6e 6320 6d61 7063 6172 2a5d y nconc mapcar*] │ │ │ -00000e50: 2037 2028 2324 202e 2033 3438 3029 5d29 7 (#$ . 3480)]) │ │ │ -00000e60: 0a23 4037 3520 4c69 6b65 2060 6d61 706c .#@75 Like `mapl │ │ │ -00000e70: 6973 7427 2c20 6275 7420 6e63 6f6e 6327 ist', but nconc' │ │ │ -00000e80: 7320 746f 6765 7468 6572 2074 6865 2076 s together the v │ │ │ -00000e90: 616c 7565 7320 7265 7475 726e 6564 2062 alues returned b │ │ │ -00000ea0: 7920 7468 6520 6675 6e63 7469 6f6e 2e1f y the function.. │ │ │ -00000eb0: 0a28 6465 6661 6c69 6173 2027 6d61 7063 .(defalias 'mapc │ │ │ -00000ec0: 6f6e 2023 5b28 636c 2d66 756e 6320 636c on #[(cl-func cl │ │ │ -00000ed0: 2d6c 6973 7420 2672 6573 7420 636c 2d72 -list &rest cl-r │ │ │ -00000ee0: 6573 7429 2022 c3c4 c3c5 5c6e 0908 245c est) "....\n..$\ │ │ │ -00000ef0: 2287 2220 5b63 6c2d 7265 7374 2063 6c2d "." [cl-rest cl- │ │ │ -00000f00: 6c69 7374 2063 6c2d 6675 6e63 2061 7070 list cl-func app │ │ │ -00000f10: 6c79 206e 636f 6e63 206d 6170 6c69 7374 ly nconc maplist │ │ │ -00000f20: 5d20 3720 2823 2420 2e20 3336 3836 295d ] 7 (#$ . 3686)] │ │ │ -00000f30: 290a 2340 3132 3720 5265 7475 726e 2074 ).#@127 Return t │ │ │ -00000f40: 7275 6520 6966 2050 5245 4449 4341 5445 rue if PREDICATE │ │ │ -00000f50: 2069 7320 7472 7565 206f 6620 616e 7920 is true of any │ │ │ -00000f60: 656c 656d 656e 7420 6f66 2053 4551 206f element of SEQ o │ │ │ -00000f70: 7220 5345 5173 2e0a 4966 2073 6f2c 2072 r SEQs..If so, r │ │ │ -00000f80: 6574 7572 6e20 7468 6520 7472 7565 2028 eturn the true ( │ │ │ -00000f90: 6e6f 6e2d 6e69 6c29 2076 616c 7565 2072 non-nil) value r │ │ │ -00000fa0: 6574 7572 6e65 6420 6279 2050 5245 4449 eturned by PREDI │ │ │ -00000fb0: 4341 5445 2e1f 0a28 6465 6661 6c69 6173 CATE...(defalias │ │ │ -00000fc0: 2027 736f 6d65 2023 5b28 636c 2d70 7265 'some #[(cl-pre │ │ │ -00000fd0: 6420 636c 2d73 6571 2026 7265 7374 2063 d cl-seq &rest c │ │ │ -00000fe0: 6c2d 7265 7374 2920 2209 ac84 0b3c ac84 l-rest) "....<.. │ │ │ -00000ff0: c4c5 8d87 c61a 0bab 8b08 0b89 4113 4021 ............A.@! │ │ │ -00001000: 8912 ab72 5c6e 2987 2220 5b63 6c2d 7072 ...r\n)." [cl-pr │ │ │ -00001010: 6564 2063 6c2d 7265 7374 2063 6c2d 7820 ed cl-rest cl-x │ │ │ -00001020: 636c 2d73 6571 2063 6c2d 736f 6d65 2028 cl-seq cl-some ( │ │ │ -00001030: 6279 7465 2d63 6f64 6520 22c2 c3c4 c509 byte-code "..... │ │ │ -00001040: 0825 88c4 8722 205b 636c 2d72 6573 7420 .%..." [cl-rest │ │ │ -00001050: 636c 2d73 6571 2061 7070 6c79 206d 6170 cl-seq apply map │ │ │ -00001060: 206e 696c 2023 5b28 2672 6573 7420 636c nil #[(&rest cl │ │ │ -00001070: 2d78 2920 22c3 0908 5c22 891a ad84 c4c5 -x) "...\"...... │ │ │ -00001080: 5c6e 5c22 2987 2220 5b63 6c2d 7820 636c \n\")." [cl-x cl │ │ │ -00001090: 2d70 7265 6420 636c 2d72 6573 2061 7070 -pred cl-res app │ │ │ -000010a0: 6c79 2074 6872 6f77 2063 6c2d 736f 6d65 ly throw cl-some │ │ │ -000010b0: 5d20 345d 5d20 3629 206e 696c 5d20 3320 ] 4]] 6) nil] 3 │ │ │ -000010c0: 2823 2420 2e20 3338 3936 295d 290a 2340 (#$ . 3896)]).#@ │ │ │ -000010d0: 3637 2052 6574 7572 6e20 7472 7565 2069 67 Return true i │ │ │ -000010e0: 6620 5052 4544 4943 4154 4520 6973 2074 f PREDICATE is t │ │ │ -000010f0: 7275 6520 6f66 2065 7665 7279 2065 6c65 rue of every ele │ │ │ -00001100: 6d65 6e74 206f 6620 5345 5120 6f72 2053 ment of SEQ or S │ │ │ -00001110: 4551 732e 1f0a 2864 6566 616c 6961 7320 EQs...(defalias │ │ │ -00001120: 2765 7665 7279 2023 5b28 636c 2d70 7265 'every #[(cl-pre │ │ │ -00001130: 6420 636c 2d73 6571 2026 7265 7374 2063 d cl-seq &rest c │ │ │ -00001140: 6c2d 7265 7374 2920 2209 ac84 5c6e 3cac l-rest) "...\n<. │ │ │ -00001150: 84c3 c48d 875c 6eab 8c08 5c6e 4021 ab86 .....\n...\n@!.. │ │ │ -00001160: 5c6e 4189 12ac 745c 6e3f 8722 205b 636c \nA...t\n?." [cl │ │ │ -00001170: 2d70 7265 6420 636c 2d72 6573 7420 636c -pred cl-rest cl │ │ │ -00001180: 2d73 6571 2063 6c2d 6576 6572 7920 2862 -seq cl-every (b │ │ │ -00001190: 7974 652d 636f 6465 2022 c2c3 c4c5 0908 yte-code "...... │ │ │ -000011a0: 2588 c687 2220 5b63 6c2d 7265 7374 2063 %..." [cl-rest c │ │ │ -000011b0: 6c2d 7365 7120 6170 706c 7920 6d61 7020 l-seq apply map │ │ │ -000011c0: 6e69 6c20 235b 2826 7265 7374 2063 6c2d nil #[(&rest cl- │ │ │ -000011d0: 7829 2022 c209 085c 22ae 84c3 c4c5 5c22 x) "...\".....\" │ │ │ -000011e0: 8722 205b 636c 2d78 2063 6c2d 7072 6564 ." [cl-x cl-pred │ │ │ -000011f0: 2061 7070 6c79 2074 6872 6f77 2063 6c2d apply throw cl- │ │ │ -00001200: 6576 6572 7920 6e69 6c5d 2033 5d20 745d every nil] 3] t] │ │ │ -00001210: 2036 295d 2033 2028 2324 202e 2034 3330 6)] 3 (#$ . 430 │ │ │ -00001220: 3729 5d29 0a23 4036 3820 5265 7475 726e 7)]).#@68 Return │ │ │ -00001230: 2074 7275 6520 6966 2050 5245 4449 4341 true if PREDICA │ │ │ -00001240: 5445 2069 7320 6661 6c73 6520 6f66 2065 TE is false of e │ │ │ -00001250: 7665 7279 2065 6c65 6d65 6e74 206f 6620 very element of │ │ │ -00001260: 5345 5120 6f72 2053 4551 732e 1f0a 2864 SEQ or SEQs...(d │ │ │ -00001270: 6566 616c 6961 7320 276e 6f74 616e 7920 efalias 'notany │ │ │ -00001280: 235b 2863 6c2d 7072 6564 2063 6c2d 7365 #[(cl-pred cl-se │ │ │ -00001290: 7120 2672 6573 7420 636c 2d72 6573 7429 q &rest cl-rest) │ │ │ -000012a0: 2022 c3c4 5c6e 0908 243f 8722 205b 636c "..\n..$?." [cl │ │ │ -000012b0: 2d72 6573 7420 636c 2d73 6571 2063 6c2d -rest cl-seq cl- │ │ │ -000012c0: 7072 6564 2061 7070 6c79 2073 6f6d 655d pred apply some] │ │ │ -000012d0: 2035 2028 2324 202e 2034 3635 3029 5d29 5 (#$ . 4650)]) │ │ │ -000012e0: 0a23 4036 3720 5265 7475 726e 2074 7275 .#@67 Return tru │ │ │ -000012f0: 6520 6966 2050 5245 4449 4341 5445 2069 e if PREDICATE i │ │ │ -00001300: 7320 6661 6c73 6520 6f66 2073 6f6d 6520 s false of some │ │ │ -00001310: 656c 656d 656e 7420 6f66 2053 4551 206f element of SEQ o │ │ │ -00001320: 7220 5345 5173 2e1f 0a28 6465 6661 6c69 r SEQs...(defali │ │ │ -00001330: 6173 2027 6e6f 7465 7665 7279 2023 5b28 as 'notevery #[( │ │ │ -00001340: 636c 2d70 7265 6420 636c 2d73 6571 2026 cl-pred cl-seq & │ │ │ -00001350: 7265 7374 2063 6c2d 7265 7374 2920 22c3 rest cl-rest) ". │ │ │ -00001360: c45c 6e09 0824 3f87 2220 5b63 6c2d 7265 .\n..$?." [cl-re │ │ │ -00001370: 7374 2063 6c2d 7365 7120 636c 2d70 7265 st cl-seq cl-pre │ │ │ -00001380: 6420 6170 706c 7920 6576 6572 795d 2035 d apply every] 5 │ │ │ -00001390: 2028 2324 202e 2034 3833 3829 5d29 0a28 (#$ . 4838)]).( │ │ │ -000013a0: 6465 6661 6c69 6173 2027 636c 2d6d 6170 defalias 'cl-map │ │ │ -000013b0: 2d6b 6579 6d61 7020 235b 2863 6c2d 6675 -keymap #[(cl-fu │ │ │ -000013c0: 6e63 2063 6c2d 6d61 7029 2022 0b39 ab86 nc cl-map) ".9.. │ │ │ -000013d0: 0b4b 8913 aa77 08c5 61ab 85c6 090b 5c22 .K...w..a.....\" │ │ │ -000013e0: 870b 3cab b40b 1c0c 4189 143a ada9 0c40 ..<.....A..:...@ │ │ │ -000013f0: 3aab 8b09 0c40 400c 4041 5c22 88aa 69c7 :....@@.@A\"..i. │ │ │ -00001400: 0c40 21ab 88c8 090c 405c 2288 aa5b 0c40 .@!.....@\"..[.@ │ │ │ -00001410: c961 ab55 ca89 14aa 5129 87cb 1a5c 6e54 .a.U....Q)...\nT │ │ │ -00001420: 8912 0b47 57ad 8e0b 5c6e 48ab 7209 5c6e ...GW...\nH.r.\n │ │ │ -00001430: 0b5c 6e48 5c22 88aa 6929 8722 205b 636c .\nH\"..i)." [cl │ │ │ -00001440: 2d65 6d61 6373 2d74 7970 6520 636c 2d66 -emacs-type cl-f │ │ │ -00001450: 756e 6320 636c 2d69 2063 6c2d 6d61 7020 unc cl-i cl-map │ │ │ -00001460: 636c 2d70 206c 7563 6964 206d 6170 2d6b cl-p lucid map-k │ │ │ -00001470: 6579 6d61 7020 7665 6374 6f72 7020 636c eymap vectorp cl │ │ │ -00001480: 2d6d 6170 2d6b 6579 6d61 7020 6b65 796d -map-keymap keym │ │ │ -00001490: 6170 206e 696c 202d 315d 2035 5d29 0a28 ap nil -1] 5]).( │ │ │ -000014a0: 6465 6661 6c69 6173 2027 636c 2d6d 6170 defalias 'cl-map │ │ │ -000014b0: 2d6b 6579 6d61 702d 7265 6375 7273 6976 -keymap-recursiv │ │ │ -000014c0: 656c 7920 235b 2863 6c2d 6675 6e63 2d72 ely #[(cl-func-r │ │ │ -000014d0: 6563 2063 6c2d 6d61 7020 266f 7074 696f ec cl-map &optio │ │ │ -000014e0: 6e61 6c20 636c 2d62 6173 6529 2022 5c6e nal cl-base) "\n │ │ │ -000014f0: ac8c c309 c461 ab83 c5aa 81c6 2112 c7c8 .....a......!... │ │ │ -00001500: 085c 2287 2220 5b63 6c2d 6d61 7020 636c .\"." [cl-map cl │ │ │ -00001510: 2d65 6d61 6373 2d74 7970 6520 636c 2d62 -emacs-type cl-b │ │ │ -00001520: 6173 6520 636f 7079 2d73 6571 7565 6e63 ase copy-sequenc │ │ │ -00001530: 6520 3138 2022 3022 205b 305d 2063 6c2d e 18 "0" [0] cl- │ │ │ -00001540: 6d61 702d 6b65 796d 6170 2023 5b28 636c map-keymap #[(cl │ │ │ -00001550: 2d6b 6579 2063 6c2d 6269 6e64 2920 220c -key cl-bind) ". │ │ │ -00001560: 8947 5309 4988 c50b 21ab 92c6 5c6e 0b08 .GS.I...!...\n.. │ │ │ -00001570: c761 ab83 c8aa 81c9 0cca 435c 2223 875c .a........C\"#.\ │ │ │ -00001580: 6e0c 0b5c 2287 2220 5b63 6c2d 656d 6163 n..\"." [cl-emac │ │ │ -00001590: 732d 7479 7065 2063 6c2d 6b65 7920 636c s-type cl-key cl │ │ │ -000015a0: 2d66 756e 632d 7265 6320 636c 2d62 696e -func-rec cl-bin │ │ │ -000015b0: 6420 636c 2d62 6173 6520 6b65 796d 6170 d cl-base keymap │ │ │ -000015c0: 7020 636c 2d6d 6170 2d6b 6579 6d61 702d p cl-map-keymap- │ │ │ -000015d0: 7265 6375 7273 6976 656c 7920 3138 2063 recursively 18 c │ │ │ -000015e0: 6f6e 6361 7420 7663 6f6e 6361 7420 305d oncat vconcat 0] │ │ │ -000015f0: 2036 5d5d 2033 5d29 0a28 6465 6661 6c69 6]] 3]).(defali │ │ │ -00001600: 6173 2027 636c 2d6d 6170 2d69 6e74 6572 as 'cl-map-inter │ │ │ -00001610: 7661 6c73 2023 5b28 636c 2d66 756e 6320 vals #[(cl-func │ │ │ -00001620: 266f 7074 696f 6e61 6c20 636c 2d77 6861 &optional cl-wha │ │ │ -00001630: 7420 636c 2d70 726f 7020 636c 2d73 7461 t cl-prop cl-sta │ │ │ -00001640: 7274 2063 6c2d 656e 6429 2022 0dac 8270 rt cl-end) "...p │ │ │ -00001650: 15c6 0d21 abf0 c789 c8c7 1e0f 181c 1b8a ...!............ │ │ │ -00001660: 0d71 88c9 5c6e ae81 6521 1309 ad83 c909 .q..\n..e!...... │ │ │ -00001670: 2114 2908 abc3 0cab 850b 0c57 abbb cacb !.)........W.... │ │ │ -00001680: 21ad 900e 10ab 88cc 0b0e 100d 23aa 84cb !...........#... │ │ │ -00001690: 0b0d 5c22 8910 ae86 8a0d 7188 6429 160f ..\"......q.d).. │ │ │ -000016a0: 0e11 cd0b 210b 0e0f c793 880c ab86 0e0f ....!........... │ │ │ -000016b0: 0c5e aa82 0e0f 5c22 88aa 3a0b c789 9388 .^....\"..:..... │ │ │ -000016c0: 0cad 840c c789 932c 875c 6eac 82ce 1209 .......,.\n..... │ │ │ -000016d0: ac83 0d47 115c 6e09 57ad a6ca cb21 ab92 ...G.\n.W....!.. │ │ │ -000016e0: 0e10 ab88 cc5c 6e0e 100d 23aa 84cb 5c6e .....\n...#...\n │ │ │ -000016f0: 0d5c 22ae 8109 180e 115c 6e08 095e 5c22 .\"......\n..^\" │ │ │ -00001700: 8808 1229 aa55 8722 205b 636c 2d6e 6578 ...).U." [cl-nex │ │ │ -00001710: 7420 636c 2d65 6e64 2063 6c2d 7374 6172 t cl-end cl-star │ │ │ -00001720: 7420 636c 2d6d 6172 6b20 636c 2d6d 6172 t cl-mark cl-mar │ │ │ -00001730: 6b32 2063 6c2d 7768 6174 2062 7566 6665 k2 cl-what buffe │ │ │ -00001740: 7270 206e 696c 2074 2063 6f70 792d 6d61 rp nil t copy-ma │ │ │ -00001750: 726b 6572 2066 626f 756e 6470 206e 6578 rker fboundp nex │ │ │ -00001760: 742d 7072 6f70 6572 7479 2d63 6861 6e67 t-property-chang │ │ │ -00001770: 6520 6e65 7874 2d73 696e 676c 652d 7072 e next-single-pr │ │ │ -00001780: 6f70 6572 7479 2d63 6861 6e67 6520 6d61 operty-change ma │ │ │ -00001790: 726b 6572 2d70 6f73 6974 696f 6e20 3020 rker-position 0 │ │ │ -000017a0: 636c 2d6e 6578 7432 2063 6c2d 7072 6f70 cl-next2 cl-prop │ │ │ -000017b0: 2063 6c2d 6675 6e63 5d20 365d 290a 2864 cl-func] 6]).(d │ │ │ -000017c0: 6566 616c 6961 7320 2763 6c2d 6d61 702d efalias 'cl-map- │ │ │ -000017d0: 6f76 6572 6c61 7973 2023 5b28 636c 2d66 overlays #[(cl-f │ │ │ -000017e0: 756e 6320 266f 7074 696f 6e61 6c20 636c unc &optional cl │ │ │ -000017f0: 2d62 7566 6665 7220 636c 2d73 7461 7274 -buffer cl-start │ │ │ -00001800: 2063 6c2d 656e 6420 636c 2d61 7267 2920 cl-end cl-arg) │ │ │ -00001810: 225c 6eac 8270 12c6 c721 abdd c81d 8a5c "\n..p...!.....\ │ │ │ -00001820: 6e71 88c7 2015 0bab 84c9 0b21 130c ab84 nq.. ......!.... │ │ │ -00001830: c90c 2114 290d 400d 41a4 8915 abab ca0d ..!.).@.A....... │ │ │ -00001840: 4021 ab9f 0cab 88ca 0d40 210c 59ac 940b @!.......@!.Y... │ │ │ -00001850: ab88 cb0d 4021 0b58 ac89 0e10 0d40 0e11 ....@!.X.....@.. │ │ │ -00001860: 5c22 ac86 0d41 8915 ac55 0bab 850b c889 \"...A...U...... │ │ │ -00001870: 9388 0cad 840c c889 9329 878a 5c6e 7188 .........)..\nq. │ │ │ -00001880: c90b ae81 6521 290c ad88 8a5c 6e71 88c9 ....e!)....\nq.. │ │ │ -00001890: 0c21 29c8 891d 191e 0f18 8acc 0821 8911 .!)..........!.. │ │ │ -000018a0: ad96 090e 0fae 8164 57ad 8d5c 6e71 88cd .......dW..\nq.. │ │ │ -000018b0: 0921 1508 ce09 21c8 9329 aba2 0dab 5c5c .!....!..)....\\ │ │ │ -000018c0: ca0d 4021 0955 ab8f 0e10 0d40 0e11 5c22 ..@!.U.....@..\" │ │ │ -000018d0: ab86 08c8 8993 ac45 0d41 8915 ac63 aa3d .......E.A...c.= │ │ │ -000018e0: 08c8 8993 880e 0fad 850e 0fc8 8993 2c87 ..............,. │ │ │ -000018f0: 2220 5b63 6c2d 6d61 726b 2063 6c2d 706f " [cl-mark cl-po │ │ │ -00001900: 7320 636c 2d62 7566 6665 7220 636c 2d73 s cl-buffer cl-s │ │ │ -00001910: 7461 7274 2063 6c2d 656e 6420 636c 2d6f tart cl-end cl-o │ │ │ -00001920: 766c 2066 626f 756e 6470 206f 7665 726c vl fboundp overl │ │ │ -00001930: 6179 2d6c 6973 7473 206e 696c 2063 6f70 ay-lists nil cop │ │ │ -00001940: 792d 6d61 726b 6572 206f 7665 726c 6179 y-marker overlay │ │ │ -00001950: 2d73 7461 7274 206f 7665 726c 6179 2d65 -start overlay-e │ │ │ -00001960: 6e64 206d 6172 6b65 722d 706f 7369 7469 nd marker-positi │ │ │ -00001970: 6f6e 206f 7665 726c 6179 732d 6174 206e on overlays-at n │ │ │ -00001980: 6578 742d 6f76 6572 6c61 792d 6368 616e ext-overlay-chan │ │ │ -00001990: 6765 2063 6c2d 6d61 726b 3220 636c 2d66 ge cl-mark2 cl-f │ │ │ -000019a0: 756e 6320 636c 2d61 7267 5d20 355d 290a unc cl-arg] 5]). │ │ │ -000019b0: 2864 6566 616c 6961 7320 2763 6c2d 7365 (defalias 'cl-se │ │ │ -000019c0: 742d 6672 616d 652d 7669 7369 626c 652d t-frame-visible- │ │ │ -000019d0: 7020 235b 2866 7261 6d65 2076 616c 2920 p #[(frame val) │ │ │ -000019e0: 2209 ac86 c208 2188 aa8f 09c3 61ab 86c4 ".....!.....a... │ │ │ -000019f0: 0821 88aa 84c5 0821 8809 8722 205b 6672 .!.....!..." [fr │ │ │ -00001a00: 616d 6520 7661 6c20 6d61 6b65 2d66 7261 ame val make-fra │ │ │ -00001a10: 6d65 2d69 6e76 6973 6962 6c65 2069 636f me-invisible ico │ │ │ -00001a20: 6e20 6963 6f6e 6966 792d 6672 616d 6520 n iconify-frame │ │ │ -00001a30: 6d61 6b65 2d66 7261 6d65 2d76 6973 6962 make-frame-visib │ │ │ -00001a40: 6c65 5d20 325d 290a 2864 6566 616c 6961 le] 2]).(defalia │ │ │ -00001a50: 7320 2763 6c2d 7072 6f67 762d 6265 666f s 'cl-progv-befo │ │ │ -00001a60: 7265 2023 5b28 7379 6d73 2076 616c 7565 re #[(syms value │ │ │ -00001a70: 7329 2022 5c6e adae c35c 6e40 21ab 885c s) "\n...\n@!..\ │ │ │ -00001a80: 6e40 5c6e 404a 42aa 825c 6e40 0842 1009 n@\n@JB..\n@.B.. │ │ │ -00001a90: ab8e 5c6e 8941 1240 0989 4111 404c 88aa ..\n.A.@..A.@L.. │ │ │ -00001aa0: 59c4 5c6e 8941 1240 2188 aa4f 8722 205b Y.\n.A.@!..O." [ │ │ │ -00001ab0: 636c 2d70 726f 6776 2d73 6176 6520 7661 cl-progv-save va │ │ │ -00001ac0: 6c75 6573 2073 796d 7320 626f 756e 6470 lues syms boundp │ │ │ -00001ad0: 206d 616b 756e 626f 756e 645d 2033 5d29 makunbound] 3]) │ │ │ -00001ae0: 0a28 6465 6661 6c69 6173 2027 636c 2d70 .(defalias 'cl-p │ │ │ -00001af0: 726f 6776 2d61 6674 6572 2023 5b6e 696c rogv-after #[nil │ │ │ -00001b00: 2022 08ad 9b08 403a ab8a 0840 4008 4041 "....@:...@@.@A │ │ │ -00001b10: 4c88 aa85 c108 4021 8808 8941 1088 aa62 L.....@!...A...b │ │ │ -00001b20: 8722 205b 636c 2d70 726f 6776 2d73 6176 ." [cl-progv-sav │ │ │ -00001b30: 6520 6d61 6b75 6e62 6f75 6e64 5d20 325d e makunbound] 2] │ │ │ -00001b40: 290a 2340 3534 2052 6574 7572 6e20 7468 ).#@54 Return th │ │ │ -00001b50: 6520 6772 6561 7465 7374 2063 6f6d 6d6f e greatest commo │ │ │ -00001b60: 6e20 6469 7669 736f 7220 6f66 2074 6865 n divisor of the │ │ │ -00001b70: 2061 7267 756d 656e 7473 2e1f 0a28 6465 arguments...(de │ │ │ -00001b80: 6661 6c69 6173 2027 6763 6420 235b 2826 falias 'gcd #[(& │ │ │ -00001b90: 7265 7374 2061 7267 7329 2022 c35c 6e89 rest args) ".\n. │ │ │ -00001ba0: 4112 40ae 81c4 2119 5c6e ab99 c35c 6e89 A.@...!.\n...\n. │ │ │ -00001bb0: 4112 4021 8918 c456 ab89 0908 8911 a689 A.@!...V........ │ │ │ -00001bc0: 10aa 7329 aa64 0929 8722 205b 6220 6120 ..s).d.)." [b a │ │ │ -00001bd0: 6172 6773 2061 6273 2030 5d20 3420 2823 args abs 0] 4 (# │ │ │ -00001be0: 2420 2e20 3639 3833 295d 290a 2340 3532 $ . 6983)]).#@52 │ │ │ -00001bf0: 2052 6574 7572 6e20 7468 6520 6c65 6173 Return the leas │ │ │ -00001c00: 7420 636f 6d6d 6f6e 206d 756c 7469 706c t common multipl │ │ │ -00001c10: 6520 6f66 2074 6865 2061 7267 756d 656e e of the argumen │ │ │ -00001c20: 7473 2e1f 0a28 6465 6661 6c69 6173 2027 ts...(defalias ' │ │ │ -00001c30: 6c63 6d20 235b 2826 7265 7374 2061 7267 lcm #[(&rest arg │ │ │ -00001c40: 7329 2022 c35c 6e73 ab82 c387 c45c 6e89 s) ".\ns.....\n. │ │ │ -00001c50: 4112 40ae 81c5 2119 5c6e ab94 c45c 6e89 A.@...!.\n...\n. │ │ │ -00001c60: 4112 4021 1809 c609 085c 22a5 085f 1129 A.@!.....\".._.) │ │ │ -00001c70: aa69 0929 8722 205b 6220 6120 6172 6773 .i.)." [b a args │ │ │ -00001c80: 2030 2061 6273 2031 2067 6364 5d20 3420 0 abs 1 gcd] 4 │ │ │ -00001c90: 2823 2420 2e20 3731 3533 295d 290a 2340 (#$ . 7153)]).#@ │ │ │ -00001ca0: 3439 2052 6574 7572 6e20 7468 6520 696e 49 Return the in │ │ │ -00001cb0: 7465 6765 7220 7371 7561 7265 2072 6f6f teger square roo │ │ │ -00001cc0: 7420 6f66 2074 6865 2061 7267 756d 656e t of the argumen │ │ │ -00001cd0: 742e 1f0a 2864 6566 616c 6961 7320 2769 t...(defalias 'i │ │ │ -00001ce0: 7371 7274 2023 5b28 6129 2022 5c6e a8ab sqrt #[(a) "\n.. │ │ │ -00001cf0: b65c 6ec3 56ab b15c 6ec4 59ab 83c5 aa91 .\n.V..\n.Y..... │ │ │ -00001d00: 5c6e c559 ab83 c6aa 895c 6ec7 59ab 83c7 \n.Y.....\n.Y... │ │ │ -00001d10: aa81 c8c9 1889 195c 6e09 a55c 5cca a589 .......\n..\\... │ │ │ -00001d20: 1009 57ab 8508 8911 aa6f 092a 875c 6ec3 ..W......o.*.\n. │ │ │ -00001d30: 61ab 82c3 87cb ccc9 5c22 8722 205b 6732 a.......\"." [g2 │ │ │ -00001d40: 2067 2061 2030 2031 3030 3030 3030 2031 g a 0 1000000 1 │ │ │ -00001d50: 3030 3030 2031 3030 3020 3130 3020 3130 0000 1000 100 10 │ │ │ -00001d60: 206e 696c 2032 2073 6967 6e61 6c20 6172 nil 2 signal ar │ │ │ -00001d70: 6974 682d 6572 726f 725d 2034 2028 2324 ith-error] 4 (#$ │ │ │ -00001d80: 202e 2037 3333 3129 5d29 0a23 4037 3120 . 7331)]).#@71 │ │ │ -00001d90: 5265 7475 726e 2058 2072 6169 7365 6420 Return X raised │ │ │ -00001da0: 746f 2074 6865 2070 6f77 6572 206f 6620 to the power of │ │ │ -00001db0: 592e 2020 576f 726b 7320 6f6e 6c79 2066 Y. Works only f │ │ │ -00001dc0: 6f72 2069 6e74 6567 6572 2061 7267 756d or integer argum │ │ │ -00001dd0: 656e 7473 2e1f 0a28 6465 6661 6c69 6173 ents...(defalias │ │ │ -00001de0: 2027 636c 2d65 7870 7420 235b 2878 2079 'cl-expt #[(x y │ │ │ -00001df0: 2920 2209 c258 ab94 09c2 55ab 82c3 8708 ) "..X....U..... │ │ │ -00001e00: c473 ab86 c508 095b 5c22 87c2 8709 c6a6 .s.....[\"...... │ │ │ -00001e10: c255 ab83 c3aa 8108 c508 895f 09c6 a55c .U........._...\ │ │ │ -00001e20: 225f 8722 205b 7820 7920 3020 3120 282d "_." [x y 0 1 (- │ │ │ -00001e30: 3120 3129 2063 6c2d 6578 7074 2032 5d20 1 1) cl-expt 2] │ │ │ -00001e40: 3520 2823 2420 2e20 3735 3638 295d 290a 5 (#$ . 7568)]). │ │ │ -00001e50: 2862 7974 652d 636f 6465 2022 c0c1 21ab (byte-code "..!. │ │ │ -00001e60: 86c2 c14b 21ac 85c3 c1c4 5c22 88c0 8722 ...K!.....\"..." │ │ │ -00001e70: 205b 6662 6f75 6e64 7020 6578 7074 2073 [fboundp expt s │ │ │ -00001e80: 7562 7270 2064 6566 616c 6961 7320 636c ubrp defalias cl │ │ │ -00001e90: 2d65 7870 745d 2033 290a 2340 3132 3920 -expt] 3).#@129 │ │ │ -00001ea0: 5265 7475 726e 2061 206c 6973 7420 6f66 Return a list of │ │ │ -00001eb0: 2074 6865 2066 6c6f 6f72 206f 6620 5820 the floor of X │ │ │ -00001ec0: 616e 6420 7468 6520 6672 6163 7469 6f6e and the fraction │ │ │ -00001ed0: 616c 2070 6172 7420 6f66 2058 2e0a 5769 al part of X..Wi │ │ │ -00001ee0: 7468 2074 776f 2061 7267 756d 656e 7473 th two arguments │ │ │ -00001ef0: 2c20 7265 7475 726e 2066 6c6f 6f72 2061 , return floor a │ │ │ -00001f00: 6e64 2072 656d 6169 6e64 6572 206f 6620 nd remainder of │ │ │ -00001f10: 7468 6569 7220 7175 6f74 6965 6e74 2e1f their quotient.. │ │ │ -00001f20: 0a28 6465 6661 6c69 6173 2027 666c 6f6f .(defalias 'floo │ │ │ -00001f30: 722a 2023 5b28 7820 266f 7074 696f 6e61 r* #[(x &optiona │ │ │ -00001f40: 6c20 7929 2022 c308 5c6e 5c22 8919 085c l y) "..\n\"...\ │ │ │ -00001f50: 6eab 855c 6e09 5faa 8109 5a29 4487 2220 n..\n._...Z)D." │ │ │ -00001f60: 5b78 2071 2079 2066 6c6f 6f72 5d20 3520 [x q y floor] 5 │ │ │ -00001f70: 2823 2420 2e20 3738 3430 295d 290a 2340 (#$ . 7840)]).#@ │ │ │ -00001f80: 3133 3320 5265 7475 726e 2061 206c 6973 133 Return a lis │ │ │ -00001f90: 7420 6f66 2074 6865 2063 6569 6c69 6e67 t of the ceiling │ │ │ -00001fa0: 206f 6620 5820 616e 6420 7468 6520 6672 of X and the fr │ │ │ -00001fb0: 6163 7469 6f6e 616c 2070 6172 7420 6f66 actional part of │ │ │ -00001fc0: 2058 2e0a 5769 7468 2074 776f 2061 7267 X..With two arg │ │ │ -00001fd0: 756d 656e 7473 2c20 7265 7475 726e 2063 uments, return c │ │ │ -00001fe0: 6569 6c69 6e67 2061 6e64 2072 656d 6169 eiling and remai │ │ │ -00001ff0: 6e64 6572 206f 6620 7468 6569 7220 7175 nder of their qu │ │ │ -00002000: 6f74 6965 6e74 2e1f 0a28 6465 6661 6c69 otient...(defali │ │ │ -00002010: 6173 2027 6365 696c 696e 672a 2023 5b28 as 'ceiling* #[( │ │ │ -00002020: 7820 266f 7074 696f 6e61 6c20 7929 2022 x &optional y) " │ │ │ -00002030: c308 095c 2289 1a41 40c4 55ab 835c 6eaa ...\"..A@.U..\n. │ │ │ -00002040: 8c5c 6e40 545c 6e41 4009 ae81 c55a 4429 .\n@T\nA@....ZD) │ │ │ -00002050: 8722 205b 7820 7920 7265 7320 666c 6f6f ." [x y res floo │ │ │ -00002060: 722a 2030 2031 5d20 3420 2823 2420 2e20 r* 0 1] 4 (#$ . │ │ │ -00002070: 3830 3638 295d 290a 2340 3134 3120 5265 8068)]).#@141 Re │ │ │ -00002080: 7475 726e 2061 206c 6973 7420 6f66 2074 turn a list of t │ │ │ -00002090: 6865 2069 6e74 6567 6572 2070 6172 7420 he integer part │ │ │ -000020a0: 6f66 2058 2061 6e64 2074 6865 2066 7261 of X and the fra │ │ │ -000020b0: 6374 696f 6e61 6c20 7061 7274 206f 6620 ctional part of │ │ │ -000020c0: 582e 0a57 6974 6820 7477 6f20 6172 6775 X..With two argu │ │ │ -000020d0: 6d65 6e74 732c 2072 6574 7572 6e20 7472 ments, return tr │ │ │ -000020e0: 756e 6361 7469 6f6e 2061 6e64 2072 656d uncation and rem │ │ │ -000020f0: 6169 6e64 6572 206f 6620 7468 6569 7220 ainder of their │ │ │ -00002100: 7175 6f74 6965 6e74 2e1f 0a28 6465 6661 quotient...(defa │ │ │ -00002110: 6c69 6173 2027 7472 756e 6361 7465 2a20 lias 'truncate* │ │ │ -00002120: 235b 2878 2026 6f70 7469 6f6e 616c 2079 #[(x &optional y │ │ │ -00002130: 2920 2208 c259 093f ae83 09c2 5961 ab85 ) "..Y.?....Ya.. │ │ │ -00002140: c308 095c 2287 c408 095c 2287 2220 5b78 ...\"....\"." [x │ │ │ -00002150: 2079 2030 2066 6c6f 6f72 2a20 6365 696c y 0 floor* ceil │ │ │ -00002160: 696e 672a 5d20 3320 2823 2420 2e20 3833 ing*] 3 (#$ . 83 │ │ │ -00002170: 3138 295d 290a 2340 3133 3920 5265 7475 18)]).#@139 Retu │ │ │ -00002180: 726e 2061 206c 6973 7420 6f66 2058 2072 rn a list of X r │ │ │ -00002190: 6f75 6e64 6564 2074 6f20 7468 6520 6e65 ounded to the ne │ │ │ -000021a0: 6172 6573 7420 696e 7465 6765 7220 616e arest integer an │ │ │ -000021b0: 6420 7468 6520 7265 6d61 696e 6465 722e d the remainder. │ │ │ -000021c0: 0a57 6974 6820 7477 6f20 6172 6775 6d65 .With two argume │ │ │ -000021d0: 6e74 732c 2072 6574 7572 6e20 726f 756e nts, return roun │ │ │ -000021e0: 6469 6e67 2061 6e64 2072 656d 6169 6e64 ding and remaind │ │ │ -000021f0: 6572 206f 6620 7468 6569 7220 7175 6f74 er of their quot │ │ │ -00002200: 6965 6e74 2e1f 0a28 6465 6661 6c69 6173 ient...(defalias │ │ │ -00002210: 2027 726f 756e 642a 2023 5b28 7820 266f 'round* #[(x &o │ │ │ -00002220: 7074 696f 6e61 6c20 7929 2022 0bab c90c ptional y) ".... │ │ │ -00002230: a8ab b60b a8ab b20b c5a5 1ac6 0c5c 6e5c .............\n\ │ │ │ -00002240: 5c0b 5c22 8919 4140 c755 ab96 5c6e 895c \.\"..A@.U..\n.\ │ │ │ -00002250: 5c0b 55ab 8f09 40c5 a6c7 55ac 8709 4053 \.U...@...U...@S │ │ │ -00002260: 5c6e 44aa 8809 4009 4140 5c6e 5a44 2a87 \nD...@.A@\nZD*. │ │ │ -00002270: c80c 0ba5 2189 180c 080b 5f5a 2944 870c ....!....._Z)D.. │ │ │ -00002280: a8ab 840c c744 87c8 0c21 8918 0c08 5a29 .....D...!....Z) │ │ │ -00002290: 4487 2220 5b71 2072 6573 2068 7920 7920 D." [q res hy y │ │ │ -000022a0: 7820 3220 666c 6f6f 722a 2030 2072 6f75 x 2 floor* 0 rou │ │ │ -000022b0: 6e64 5d20 3520 2823 2420 2e20 3835 3732 nd] 5 (#$ . 8572 │ │ │ -000022c0: 295d 290a 2340 3539 2054 6865 2072 656d )]).#@59 The rem │ │ │ -000022d0: 6169 6e64 6572 206f 6620 5820 6469 7669 ainder of X divi │ │ │ -000022e0: 6465 6420 6279 2059 2c20 7769 7468 2074 ded by Y, with t │ │ │ -000022f0: 6865 2073 616d 6520 7369 676e 2061 7320 he same sign as │ │ │ -00002300: 592e 1f0a 2864 6566 616c 6961 7320 276d Y...(defalias 'm │ │ │ -00002310: 6f64 2a20 235b 2878 2079 2920 22c2 0908 od* #[(x y) "... │ │ │ -00002320: 5c22 4140 8722 205b 7920 7820 666c 6f6f \"A@." [y x floo │ │ │ -00002330: 722a 5d20 3320 2823 2420 2e20 3839 3035 r*] 3 (#$ . 8905 │ │ │ -00002340: 295d 290a 2340 3539 2054 6865 2072 656d )]).#@59 The rem │ │ │ -00002350: 6169 6e64 6572 206f 6620 5820 6469 7669 ainder of X divi │ │ │ -00002360: 6465 6420 6279 2059 2c20 7769 7468 2074 ded by Y, with t │ │ │ -00002370: 6865 2073 616d 6520 7369 676e 2061 7320 he same sign as │ │ │ -00002380: 582e 1f0a 2864 6566 616c 6961 7320 2772 X...(defalias 'r │ │ │ -00002390: 656d 2a20 235b 2878 2079 2920 22c2 0908 em* #[(x y) "... │ │ │ -000023a0: 5c22 4140 8722 205b 7920 7820 7472 756e \"A@." [y x trun │ │ │ -000023b0: 6361 7465 2a5d 2033 2028 2324 202e 2039 cate*] 3 (#$ . 9 │ │ │ -000023c0: 3033 3329 5d29 0a23 4035 3520 5265 7475 033)]).#@55 Retu │ │ │ -000023d0: 726e 2031 2069 6620 4120 6973 2070 6f73 rn 1 if A is pos │ │ │ -000023e0: 6974 6976 652c 202d 3120 6966 206e 6567 itive, -1 if neg │ │ │ -000023f0: 6174 6976 652c 2030 2069 6620 7a65 726f ative, 0 if zero │ │ │ -00002400: 2e1f 0a28 6465 6661 6c69 6173 2027 7369 ...(defalias 'si │ │ │ -00002410: 676e 756d 2023 5b28 6129 2022 08c1 56ab gnum #[(a) "..V. │ │ │ -00002420: 82c2 8708 c157 ab82 c387 c187 2220 5b61 .....W......" [a │ │ │ -00002430: 2030 2031 202d 315d 2032 2028 2324 202e 0 1 -1] 2 (#$ . │ │ │ -00002440: 2039 3136 3429 5d29 0a23 4031 3234 2052 9164)]).#@124 R │ │ │ -00002450: 6574 7572 6e20 6120 7261 6e64 6f6d 206e eturn a random n │ │ │ -00002460: 6f6e 6e65 6761 7469 7665 206e 756d 6265 onnegative numbe │ │ │ -00002470: 7220 6c65 7373 2074 6861 6e20 4c49 4d2c r less than LIM, │ │ │ -00002480: 2061 6e20 696e 7465 6765 7220 6f72 2066 an integer or f │ │ │ -00002490: 6c6f 6174 2e0a 4f70 7469 6f6e 616c 2073 loat..Optional s │ │ │ -000024a0: 6563 6f6e 6420 6172 6720 5354 4154 4520 econd arg STATE │ │ │ -000024b0: 6973 2061 2072 616e 646f 6d2d 7374 6174 is a random-stat │ │ │ -000024c0: 6520 6f62 6a65 6374 2e1f 0a28 6465 6661 e object...(defa │ │ │ -000024d0: 6c69 6173 2027 7261 6e64 6f6d 2a20 235b lias 'random* #[ │ │ │ -000024e0: 286c 696d 2026 6f70 7469 6f6e 616c 2073 (lim &optional s │ │ │ -000024f0: 7461 7465 2920 220d ac83 0e1c 150d c648 tate) "........H │ │ │ -00002500: 891b a8ab c7c7 c8c9 0b21 caa6 5acb 1e1a .........!..Z... │ │ │ -00002510: 181c 0dc6 cccd ce5c 2289 1349 880b c708 .......\"..I.... │ │ │ -00002520: 4988 0ccf 5c5c cda6 8914 c756 ab90 0b0c I...\\.....V.... │ │ │ -00002530: 0e1a 080e 1a5a 161a 8910 4988 aa65 0c54 .....Z....I..e.T │ │ │ -00002540: 8914 d057 ab87 d1d2 0d5c 2288 aa71 2b0d ...W.....\"..q+. │ │ │ -00002550: cb0d cb48 54cd a649 1c0d d20d d248 54cd ...HT..I.....HT. │ │ │ -00002560: a649 18d3 0b0c 0b0c 480b 0848 5a49 d45c .I......H..HZI.\ │ │ │ -00002570: 221a 09a8 abc1 09d5 58ab 855c 6e09 a6aa ".......X..\n... │ │ │ -00002580: bc09 d456 ab8a d65c 6ed7 5c22 d1d5 0d5c ...V...\n.\"...\ │ │ │ -00002590: 225c 5c12 d889 1e1b 0953 57ab 8a0e 1b89 "\\......SW..... │ │ │ -000025a0: 5c5c 5489 161b aa71 d35c 6e0e 1b5c 2289 \\T....q.\n..\". │ │ │ -000025b0: 1209 57ab 835c 6eaa 84d1 090d 5c22 29aa ..W..\n.....\"). │ │ │ -000025c0: 855c 6ed9 a509 5f2c 8722 205b 6a20 6c69 .\n..._,." [j li │ │ │ -000025d0: 6d20 6e20 7665 6320 6920 7374 6174 6520 m n vec i state │ │ │ -000025e0: 3320 3020 3133 3537 3333 3520 6162 7320 3 0 1357335 abs │ │ │ -000025f0: 3133 3537 3333 3320 3120 6d61 6b65 2d76 1357333 1 make-v │ │ │ -00002600: 6563 746f 7220 3535 206e 696c 2032 3120 ector 55 nil 21 │ │ │ -00002610: 3230 3020 7261 6e64 6f6d 2a20 3220 6c6f 200 random* 2 lo │ │ │ -00002620: 6761 6e64 2038 3338 3836 3037 2035 3132 gand 8388607 512 │ │ │ -00002630: 206c 7368 2039 2031 3032 3320 3833 3838 lsh 9 1023 8388 │ │ │ -00002640: 3630 382e 3020 6b20 6d61 736b 202a 7261 608.0 k mask *ra │ │ │ -00002650: 6e64 6f6d 2d73 7461 7465 2a5d 2037 2028 ndom-state*] 7 ( │ │ │ -00002660: 2324 202e 2039 3239 3529 5d29 0a23 4031 #$ . 9295)]).#@1 │ │ │ -00002670: 3433 2052 6574 7572 6e20 6120 636f 7079 43 Return a copy │ │ │ -00002680: 206f 6620 7261 6e64 6f6d 2d73 7461 7465 of random-state │ │ │ -00002690: 2053 5441 5445 2c20 6f72 206f 6620 602a STATE, or of `* │ │ │ -000026a0: 7261 6e64 6f6d 2d73 7461 7465 2a27 2069 random-state*' i │ │ │ -000026b0: 6620 6f6d 6974 7465 642e 0a49 6620 5354 f omitted..If ST │ │ │ -000026c0: 4154 4520 6973 2074 2c20 7265 7475 726e ATE is t, return │ │ │ -000026d0: 2061 206e 6577 2073 7461 7465 206f 626a a new state obj │ │ │ -000026e0: 6563 7420 7365 6564 6564 2066 726f 6d20 ect seeded from │ │ │ -000026f0: 7468 6520 7469 6d65 206f 6620 6461 792e the time of day. │ │ │ -00002700: 1f0a 2864 6566 616c 6961 7320 276d 616b ..(defalias 'mak │ │ │ -00002710: 652d 7261 6e64 6f6d 2d73 7461 7465 2023 e-random-state # │ │ │ -00002720: 5b28 266f 7074 696f 6e61 6c20 7374 6174 [(&optional stat │ │ │ -00002730: 6529 2022 09ac 84c2 0821 87c3 0921 ab85 e) ".....!...!.. │ │ │ -00002740: c409 c55c 2287 09a8 ab87 c6c7 c8c9 0924 ...\"..........$ │ │ │ -00002750: 87c2 ca20 2187 2220 5b2a 7261 6e64 6f6d ... !." [*random │ │ │ -00002760: 2d73 7461 7465 2a20 7374 6174 6520 6d61 -state* state ma │ │ │ -00002770: 6b65 2d72 616e 646f 6d2d 7374 6174 6520 ke-random-state │ │ │ -00002780: 7665 6374 6f72 7020 636c 2d63 6f70 792d vectorp cl-copy- │ │ │ -00002790: 7472 6565 2074 2076 6563 746f 7220 636c tree t vector cl │ │ │ -000027a0: 2d72 616e 646f 6d2d 7374 6174 652d 7461 -random-state-ta │ │ │ -000027b0: 6720 2d31 2033 3020 636c 2d72 616e 646f g -1 30 cl-rando │ │ │ -000027c0: 6d2d 7469 6d65 5d20 3520 2823 2420 2e20 m-time] 5 (#$ . │ │ │ -000027d0: 3938 3433 295d 290a 2340 3436 2052 6574 9843)]).#@46 Ret │ │ │ -000027e0: 7572 6e20 7420 6966 204f 424a 4543 5420 urn t if OBJECT │ │ │ -000027f0: 6973 2061 2072 616e 646f 6d2d 7374 6174 is a random-stat │ │ │ -00002800: 6520 6f62 6a65 6374 2e1f 0a28 6465 6661 e object...(defa │ │ │ -00002810: 6c69 6173 2027 7261 6e64 6f6d 2d73 7461 lias 'random-sta │ │ │ -00002820: 7465 2d70 2023 5b28 6f62 6a65 6374 2920 te-p #[(object) │ │ │ -00002830: 22c1 0821 ad8b 0847 c255 ad85 08c3 48c4 "..!...G.U....H. │ │ │ -00002840: 6187 2220 5b6f 626a 6563 7420 7665 6374 a." [object vect │ │ │ -00002850: 6f72 7020 3420 3020 636c 2d72 616e 646f orp 4 0 cl-rando │ │ │ -00002860: 6d2d 7374 6174 652d 7461 675d 2032 2028 m-state-tag] 2 ( │ │ │ -00002870: 2324 202e 2031 3032 3035 295d 290a 2864 #$ . 10205)]).(d │ │ │ -00002880: 6566 616c 6961 7320 2763 6c2d 6669 6e69 efalias 'cl-fini │ │ │ -00002890: 7465 2d64 6f20 235b 2866 756e 6320 6120 te-do #[(func a │ │ │ -000028a0: 6229 2022 c0c1 c28f 8722 205b 6e69 6c20 b) "....." [nil │ │ │ -000028b0: 2862 7974 652d 636f 6465 2022 5c6e 0908 (byte-code "\n.. │ │ │ -000028c0: 5c22 891b a7ad 890b 89c4 a555 3fad 810b \".........U?... │ │ │ -000028d0: 2987 2220 5b62 2061 2066 756e 6320 7265 )." [b a func re │ │ │ -000028e0: 7320 325d 2034 2920 2828 6172 6974 682d s 2] 4) ((arith- │ │ │ -000028f0: 6572 726f 7229 295d 2033 5d29 0a28 6465 error))] 3]).(de │ │ │ -00002900: 6661 6c69 6173 2027 636c 2d66 6c6f 6174 falias 'cl-float │ │ │ -00002910: 2d6c 696d 6974 7320 235b 6e69 6c20 225c -limits #[nil "\ │ │ │ -00002920: 6e84 c100 c6a7 83c1 00c7 c889 1b1c 1dc9 n............... │ │ │ -00002930: ca0d 8923 ab86 0d89 5f15 aa73 c9ca 0d89 ...#...._..s.... │ │ │ -00002940: cba5 23ab 880d 89cb a55f 15aa 6fc9 cc0d ..#......_..o... │ │ │ -00002950: 8923 ab86 0d89 5c5c 15aa 730d 130d cba5 .#....\\..s..... │ │ │ -00002960: 14c9 cc0d 0c23 ab91 0d0c 5c5c 0d55 ac8a .....#....\\.U.. │ │ │ -00002970: 0d0c 5c5c 150c cba5 14aa 680d 120d 5b11 ..\\......h...[. │ │ │ -00002980: 0d0b a515 cd0b a514 0d0c 5f15 c8ce cf8f .........._..... │ │ │ -00002990: ab8a 0dcb a515 0ccb a514 aa70 0c10 0c5b ...........p...[ │ │ │ -000029a0: 1619 d00b a589 1514 c8d1 d28f ab86 0dcb ................ │ │ │ -000029b0: a515 aa74 0d16 1a0d 5b16 1bd3 15d4 0d5c ...t....[......\ │ │ │ -000029c0: 5cd5 55ac 860d cba5 15aa 730d 895c 5c16 \.U.......s..\\. │ │ │ -000029d0: 1cd6 15d7 0d5a d855 ac86 0dcb a515 aa73 .....Z.U.......s │ │ │ -000029e0: 0d89 5c5c 161d 2bc8 8722 205b 6c65 6173 ..\\..+.." [leas │ │ │ -000029f0: 742d 706f 7369 7469 7665 2d6e 6f72 6d61 t-positive-norma │ │ │ -00002a00: 6c69 7a65 642d 666c 6f61 7420 6d6f 7374 lized-float most │ │ │ -00002a10: 2d6e 6567 6174 6976 652d 666c 6f61 7420 -negative-float │ │ │ -00002a20: 6d6f 7374 2d70 6f73 6974 6976 652d 666c most-positive-fl │ │ │ -00002a30: 6f61 7420 7a20 7920 7820 3230 2e30 2032 oat z y x 20.0 2 │ │ │ -00002a40: 2e30 206e 696c 2063 6c2d 6669 6e69 7465 .0 nil cl-finite │ │ │ -00002a50: 2d64 6f20 2a20 3220 2b20 3136 2028 6279 -do * 2 + 16 (by │ │ │ -00002a60: 7465 2d63 6f64 6520 2209 89c2 a589 5c5c te-code ".....\\ │ │ │ -00002a70: 55ad 8508 c2a5 c356 8722 205b 7920 7820 U......V." [y x │ │ │ -00002a80: 3220 305d 2033 2920 2828 6172 6974 682d 2 0] 3) ((arith- │ │ │ -00002a90: 6572 726f 7229 2920 3120 2862 7974 652d error)) 1 (byte- │ │ │ -00002aa0: 636f 6465 2022 08c1 a5c2 5687 2220 5b78 code "....V." [x │ │ │ -00002ab0: 2032 2030 5d20 3229 2028 2861 7269 7468 2 0] 2) ((arith │ │ │ -00002ac0: 2d65 7272 6f72 2929 2031 2e30 2031 2e30 -error)) 1.0 1.0 │ │ │ -00002ad0: 2031 2e30 2031 2e30 2031 2e30 2031 2e30 1.0 1.0 1.0 1.0 │ │ │ -00002ae0: 206c 6561 7374 2d6e 6567 6174 6976 652d least-negative- │ │ │ -00002af0: 6e6f 726d 616c 697a 6564 2d66 6c6f 6174 normalized-float │ │ │ -00002b00: 206c 6561 7374 2d70 6f73 6974 6976 652d least-positive- │ │ │ -00002b10: 666c 6f61 7420 6c65 6173 742d 6e65 6761 float least-nega │ │ │ -00002b20: 7469 7665 2d66 6c6f 6174 2066 6c6f 6174 tive-float float │ │ │ -00002b30: 2d65 7073 696c 6f6e 2066 6c6f 6174 2d6e -epsilon float-n │ │ │ -00002b40: 6567 6174 6976 652d 6570 7369 6c6f 6e5d egative-epsilon] │ │ │ -00002b50: 2036 5d29 0a23 4036 3820 436f 6e63 6174 6]).#@68 Concat │ │ │ -00002b60: 656e 6174 652c 2069 6e74 6f20 6120 7365 enate, into a se │ │ │ -00002b70: 7175 656e 6365 206f 6620 7479 7065 2054 quence of type T │ │ │ -00002b80: 5950 452c 2074 6865 2061 7267 756d 656e YPE, the argumen │ │ │ -00002b90: 7420 5345 5155 454e 4345 532e 1f0a 2864 t SEQUENCES...(d │ │ │ -00002ba0: 6566 616c 6961 7320 2763 6f6e 6361 7465 efalias 'concate │ │ │ -00002bb0: 6e61 7465 2023 5b28 7479 7065 2026 7265 nate #[(type &re │ │ │ -00002bc0: 7374 2073 6571 7329 2022 09c2 61ab 85c3 st seqs) "..a... │ │ │ -00002bd0: c408 5c22 8709 c561 ab85 c3c6 085c 2287 ..\"...a.....\". │ │ │ -00002be0: 09c7 61ab 88c3 c889 08c9 5c22 5c22 87ca ..a.......\"\".. │ │ │ -00002bf0: cb09 5c22 8722 205b 7365 7173 2074 7970 ..\"." [seqs typ │ │ │ -00002c00: 6520 7665 6374 6f72 2061 7070 6c79 2076 e vector apply v │ │ │ -00002c10: 636f 6e63 6174 2073 7472 696e 6720 636f concat string co │ │ │ -00002c20: 6e63 6174 206c 6973 7420 6170 7065 6e64 ncat list append │ │ │ -00002c30: 2028 6e69 6c29 2065 7272 6f72 2022 4e6f (nil) error "No │ │ │ -00002c40: 7420 6120 7365 7175 656e 6365 2074 7970 t a sequence typ │ │ │ -00002c50: 6520 6e61 6d65 3a20 2573 225d 2035 2028 e name: %s"] 5 ( │ │ │ -00002c60: 2324 202e 2031 3130 3938 295d 290a 2340 #$ . 11098)]).#@ │ │ │ -00002c70: 3339 2045 7175 6976 616c 656e 7420 746f 39 Equivalent to │ │ │ -00002c80: 2028 6170 7065 6e64 2028 7265 7665 7273 (append (revers │ │ │ -00002c90: 6520 5829 2059 292e 1f0a 2864 6566 616c e X) Y)...(defal │ │ │ -00002ca0: 6961 7320 2772 6576 6170 7065 6e64 2023 ias 'revappend # │ │ │ -00002cb0: 5b28 7820 7929 2022 c209 2108 a487 2220 [(x y) "..!..." │ │ │ -00002cc0: 5b79 2078 2072 6576 6572 7365 5d20 3220 [y x reverse] 2 │ │ │ -00002cd0: 2823 2420 2e20 3131 3337 3929 5d29 0a23 (#$ . 11379)]).# │ │ │ -00002ce0: 4033 3920 4571 7569 7661 6c65 6e74 2074 @39 Equivalent t │ │ │ -00002cf0: 6f20 286e 636f 6e63 2028 6e72 6576 6572 o (nconc (nrever │ │ │ -00002d00: 7365 2058 2920 5929 2e1f 0a28 6465 6661 se X) Y)...(defa │ │ │ -00002d10: 6c69 6173 2027 6e72 6563 6f6e 6320 235b lias 'nreconc #[ │ │ │ -00002d20: 2878 2079 2920 2209 9f08 a487 2220 5b79 (x y) "....." [y │ │ │ -00002d30: 2078 5d20 3220 2823 2420 2e20 3131 3439 x] 2 (#$ . 1149 │ │ │ -00002d40: 3229 5d29 0a23 4036 3320 5265 7475 726e 2)]).#@63 Return │ │ │ -00002d50: 2074 6865 206c 656e 6774 6820 6f66 2061 the length of a │ │ │ -00002d60: 206c 6973 742e 2020 5265 7475 726e 206e list. Return n │ │ │ -00002d70: 696c 2069 6620 6c69 7374 2069 7320 6369 il if list is ci │ │ │ -00002d80: 7263 756c 6172 2e1f 0a28 6465 6661 6c69 rcular...(defali │ │ │ -00002d90: 6173 2027 6c69 7374 2d6c 656e 6774 6820 as 'list-length │ │ │ -00002da0: 235b 2878 2920 22c4 0889 191b 1a0b 41ab #[(x) ".......A. │ │ │ -00002db0: 970b 0961 ab85 5c6e c456 ac8d 5c6e c55c ...a..\n.V..\n.\ │ │ │ -00002dc0: 5c12 0b41 4113 0941 11aa 650b ab89 0b41 \..AA..A..e....A │ │ │ -00002dd0: 3fad 855c 6e54 aa81 5c6e 2b87 2220 5b78 ?..\nT..\n+." [x │ │ │ -00002de0: 2073 6c6f 7720 6e20 6661 7374 2030 2032 slow n fast 0 2 │ │ │ -00002df0: 5d20 3320 2823 2420 2e20 3131 3539 3429 ] 3 (#$ . 11594) │ │ │ -00002e00: 5d29 0a23 4034 3320 5265 7475 726e 2074 ]).#@43 Return t │ │ │ -00002e10: 7275 6520 6966 2053 5542 4c49 5354 2069 rue if SUBLIST i │ │ │ -00002e20: 7320 6120 7461 696c 206f 6620 4c49 5354 s a tail of LIST │ │ │ -00002e30: 2e1f 0a28 6465 6661 6c69 6173 2027 7461 ...(defalias 'ta │ │ │ -00002e40: 696c 7020 235b 2873 7562 6c69 7374 206c ilp #[(sublist l │ │ │ -00002e50: 6973 7429 2022 093a ab8b 0809 61ac 8609 ist) ".:....a... │ │ │ -00002e60: 4189 11aa 7208 a7ab 8408 096b 8708 0961 A...r......k...a │ │ │ -00002e70: 8722 205b 7375 626c 6973 7420 6c69 7374 ." [sublist list │ │ │ -00002e80: 5d20 3320 2823 2420 2e20 3131 3738 3429 ] 3 (#$ . 11784) │ │ │ -00002e90: 5d29 0a23 4032 3234 204d 616b 6520 6120 ]).#@224 Make a │ │ │ -00002ea0: 636f 7079 206f 6620 5452 4545 2e0a 4966 copy of TREE..If │ │ │ -00002eb0: 2054 5245 4520 6973 2061 2063 6f6e 7320 TREE is a cons │ │ │ -00002ec0: 6365 6c6c 2c20 7468 6973 2072 6563 7572 cell, this recur │ │ │ -00002ed0: 7369 7665 6c79 2063 6f70 6965 7320 626f sively copies bo │ │ │ -00002ee0: 7468 2069 7473 2063 6172 2061 6e64 2069 th its car and i │ │ │ -00002ef0: 7473 2063 6472 2e0a 436f 6e74 7261 7374 ts cdr..Contrast │ │ │ -00002f00: 2074 6f20 636f 7079 2d73 6571 7565 6e63 to copy-sequenc │ │ │ -00002f10: 652c 2077 6869 6368 2063 6f70 6965 7320 e, which copies │ │ │ -00002f20: 6f6e 6c79 2061 6c6f 6e67 2074 6865 2063 only along the c │ │ │ -00002f30: 6472 732e 2020 5769 7468 2073 6563 6f6e drs. With secon │ │ │ -00002f40: 640a 6172 6775 6d65 6e74 2056 4543 502c d.argument VECP, │ │ │ -00002f50: 2074 6869 7320 636f 7069 6573 2076 6563 this copies vec │ │ │ -00002f60: 746f 7273 2061 7320 7765 6c6c 2061 7320 tors as well as │ │ │ -00002f70: 636f 6e73 6573 2e1f 0a28 6465 6661 6c69 conses...(defali │ │ │ -00002f80: 6173 2027 636c 2d63 6f70 792d 7472 6565 as 'cl-copy-tree │ │ │ -00002f90: 2023 5b28 7472 6565 2026 6f70 7469 6f6e #[(tree &option │ │ │ -00002fa0: 616c 2076 6563 7029 2022 5c6e 3aab b7c4 al vecp) "\n:... │ │ │ -00002fb0: 5c6e 2189 121b 0b3a abaa 0b40 3aac 8909 \n!....:...@:... │ │ │ -00002fc0: ab8e c50b 4021 ab88 0bc6 0b40 095c 22a0 ....@!.....@.\". │ │ │ -00002fd0: 880b 413c ac88 0bc6 0b41 095c 22a1 880b ..A<.....A.\"... │ │ │ -00002fe0: 8941 1388 aa52 29aa a409 aba1 c55c 6e21 .A...R)......\n! │ │ │ -00002ff0: ab9c c75c 6e21 8912 4718 0853 8910 c859 ...\n!..G..S...Y │ │ │ -00003000: ab8c 5c6e 08c6 5c6e 0848 095c 2249 88aa ..\n..\n.H.\"I.. │ │ │ -00003010: 6c29 5c6e 8722 205b 6920 7665 6370 2074 l)\n." [i vecp t │ │ │ -00003020: 7265 6520 7020 636f 7079 2d6c 6973 7420 ree p copy-list │ │ │ -00003030: 7665 6374 6f72 7020 636c 2d63 6f70 792d vectorp cl-copy- │ │ │ -00003040: 7472 6565 2063 6f70 792d 7365 7175 656e tree copy-sequen │ │ │ -00003050: 6365 2030 5d20 3520 2823 2420 2e20 3131 ce 0] 5 (#$ . 11 │ │ │ -00003060: 3932 3929 5d29 0a28 6279 7465 2d63 6f64 929)]).(byte-cod │ │ │ -00003070: 6520 22c0 c121 ab86 c2c1 4b21 ac85 c3c1 e "..!....K!.... │ │ │ -00003080: c45c 2288 c3c5 c65c 2288 c3c7 c85c 2287 .\"....\"....\". │ │ │ -00003090: 2220 5b66 626f 756e 6470 2063 6f70 792d " [fboundp copy- │ │ │ -000030a0: 7472 6565 2073 7562 7270 2064 6566 616c tree subrp defal │ │ │ -000030b0: 6961 7320 636c 2d63 6f70 792d 7472 6565 ias cl-copy-tree │ │ │ -000030c0: 2067 6574 2a20 6765 7420 6765 7466 2070 get* get getf p │ │ │ -000030d0: 6c69 7374 2d67 6574 5d20 3329 0a28 6465 list-get] 3).(de │ │ │ -000030e0: 6661 6c69 6173 2027 636c 2d73 6574 2d67 falias 'cl-set-g │ │ │ -000030f0: 6574 6620 235b 2870 6c69 7374 2074 6167 etf #[(plist tag │ │ │ -00003100: 2076 616c 2920 225c 6e89 1bab 8d0b 4009 val) "\n.....@. │ │ │ -00003110: 61ac 870b 4141 8913 ac73 0bab 880b 4108 a...AA...s....A. │ │ │ -00003120: a088 5c6e aa85 0908 5c6e 4242 2987 2220 ..\n....\nBB)." │ │ │ -00003130: 5b76 616c 2074 6167 2070 6c69 7374 2070 [val tag plist p │ │ │ -00003140: 5d20 345d 290a 2864 6566 616c 6961 7320 ] 4]).(defalias │ │ │ -00003150: 2763 6c2d 646f 2d72 656d 6620 235b 2870 'cl-do-remf #[(p │ │ │ -00003160: 6c69 7374 2074 6167 2920 2209 4189 1a41 list tag) ".A..A │ │ │ -00003170: ab8e 5c6e 4140 0861 ac87 5c6e 4141 8912 ..\nA@.a..\nAA.. │ │ │ -00003180: aa6f 5c6e 41ad 885c 6e89 4141 41a1 88c3 .o\nA..\n.AAA... │ │ │ -00003190: 2987 2220 5b74 6167 2070 6c69 7374 2070 )." [tag plist p │ │ │ -000031a0: 2074 5d20 335d 290a 2864 6566 616c 6961 t] 3]).(defalia │ │ │ -000031b0: 7320 276d 616b 652d 6861 7368 7461 626c s 'make-hashtabl │ │ │ -000031c0: 6520 235b 2873 697a 6520 266f 7074 696f e #[(size &optio │ │ │ -000031d0: 6e61 6c20 7465 7374 2920 22c2 c309 c408 nal test) "..... │ │ │ -000031e0: 2487 2220 5b73 697a 6520 7465 7374 206d $." [size test m │ │ │ -000031f0: 616b 652d 6861 7368 2d74 6162 6c65 203a ake-hash-table : │ │ │ -00003200: 7465 7374 203a 7369 7a65 5d20 355d 290a test :size] 5]). │ │ │ -00003210: 2864 6566 616c 6961 7320 276d 616b 652d (defalias 'make- │ │ │ -00003220: 7765 616b 2d68 6173 6874 6162 6c65 2023 weak-hashtable # │ │ │ -00003230: 5b28 7369 7a65 2026 6f70 7469 6f6e 616c [(size &optional │ │ │ -00003240: 2074 6573 7429 2022 c2c3 09c4 08c5 c626 test) ".......& │ │ │ -00003250: 0687 2220 5b73 697a 6520 7465 7374 206d .." [size test m │ │ │ -00003260: 616b 652d 6861 7368 2d74 6162 6c65 203a ake-hash-table : │ │ │ -00003270: 7465 7374 203a 7369 7a65 203a 7765 616b test :size :weak │ │ │ -00003280: 6e65 7373 2074 5d20 375d 290a 2864 6566 ness t] 7]).(def │ │ │ -00003290: 616c 6961 7320 276d 616b 652d 6b65 792d alias 'make-key- │ │ │ -000032a0: 7765 616b 2d68 6173 6874 6162 6c65 2023 weak-hashtable # │ │ │ -000032b0: 5b28 7369 7a65 2026 6f70 7469 6f6e 616c [(size &optional │ │ │ -000032c0: 2074 6573 7429 2022 c2c3 09c4 08c5 c626 test) ".......& │ │ │ -000032d0: 0687 2220 5b73 697a 6520 7465 7374 206d .." [size test m │ │ │ -000032e0: 616b 652d 6861 7368 2d74 6162 6c65 203a ake-hash-table : │ │ │ -000032f0: 7465 7374 203a 7369 7a65 203a 7765 616b test :size :weak │ │ │ -00003300: 6e65 7373 206b 6579 5d20 375d 290a 2864 ness key] 7]).(d │ │ │ -00003310: 6566 616c 6961 7320 276d 616b 652d 7661 efalias 'make-va │ │ │ -00003320: 6c75 652d 7765 616b 2d68 6173 6874 6162 lue-weak-hashtab │ │ │ -00003330: 6c65 2023 5b28 7369 7a65 2026 6f70 7469 le #[(size &opti │ │ │ -00003340: 6f6e 616c 2074 6573 7429 2022 c2c3 09c4 onal test) ".... │ │ │ -00003350: 08c5 c626 0687 2220 5b73 697a 6520 7465 ...&.." [size te │ │ │ -00003360: 7374 206d 616b 652d 6861 7368 2d74 6162 st make-hash-tab │ │ │ -00003370: 6c65 203a 7465 7374 203a 7369 7a65 203a le :test :size : │ │ │ -00003380: 7765 616b 6e65 7373 2076 616c 7565 5d20 weakness value] │ │ │ -00003390: 375d 290a 2862 7974 652d 636f 6465 2022 7]).(byte-code " │ │ │ -000033a0: c3c4 1a19 c509 5c6e 5c22 88c6 095c 6e5c ......\n\"...\n\ │ │ │ -000033b0: 2288 2ac7 c81a 19c5 095c 6e5c 2288 c609 ".*......\n\"... │ │ │ -000033c0: 5c6e 5c22 882a c9ca 1a19 c509 5c6e 5c22 \n\".*......\n\" │ │ │ -000033d0: 88c6 095c 6e5c 2288 2acb cc1a 19c5 095c ...\n\".*......\ │ │ │ -000033e0: 6e5c 2288 c609 5c6e 5c22 882a cdce 1a19 n\"...\n\".*.... │ │ │ -000033f0: c509 5c6e 5c22 88c6 095c 6e5c 2288 2acf ..\n\"...\n\".*. │ │ │ -00003400: d01a 19c5 095c 6e5c 2288 c609 5c6e 5c22 .....\n\"...\n\" │ │ │ -00003410: 882a c6d1 d25c 2288 c6d3 d25c 2288 c6d4 .*...\"....\"... │ │ │ -00003420: d25c 2288 c6d5 d25c 2288 c6cc d65c 2288 .\"....\"....\". │ │ │ -00003430: d7d8 21ab 85c6 d9d8 5c22 88da 0842 10db ..!.....\"...B.. │ │ │ -00003440: da21 ac86 dcda dd4b 5c22 88de 0842 10db .!.....K\"...B.. │ │ │ -00003450: de21 ac86 dcde df4b 5c22 88e0 0842 10db .!.....K\"...B.. │ │ │ -00003460: e021 ac86 dce0 e14b 5c22 88e2 0842 10db .!.....K\"...B.. │ │ │ -00003470: e221 ac86 dce2 e34b 5c22 88e4 e5dd 5c22 .!.....K\"....\" │ │ │ -00003480: 88e4 e6e7 5c22 88e4 e8df 5c22 88e4 e9e1 ....\"....\".... │ │ │ -00003490: 5c22 88e4 eae3 5c22 8722 205b 6375 7272 \"....\"." [curr │ │ │ -000034a0: 656e 742d 6c6f 6164 2d6c 6973 7420 6f6c ent-load-list ol │ │ │ -000034b0: 6466 756e 206e 6577 6675 6e20 6861 7368 dfun newfun hash │ │ │ -000034c0: 7461 626c 6570 2068 6173 682d 7461 626c tablep hash-tabl │ │ │ -000034d0: 652d 7020 6465 6669 6e65 2d66 756e 6374 e-p define-funct │ │ │ -000034e0: 696f 6e20 6d61 6b65 2d6f 6273 6f6c 6574 ion make-obsolet │ │ │ -000034f0: 6520 6861 7368 7461 626c 652d 6675 6c6c e hashtable-full │ │ │ -00003500: 6e65 7373 2068 6173 682d 7461 626c 652d ness hash-table- │ │ │ -00003510: 636f 756e 7420 6861 7368 7461 626c 652d count hashtable- │ │ │ -00003520: 7465 7374 2d66 756e 6374 696f 6e20 6861 test-function ha │ │ │ -00003530: 7368 2d74 6162 6c65 2d74 6573 7420 6861 sh-table-test ha │ │ │ -00003540: 7368 7461 626c 652d 7479 7065 2068 6173 shtable-type has │ │ │ -00003550: 682d 7461 626c 652d 7479 7065 2068 6173 h-table-type has │ │ │ -00003560: 6874 6162 6c65 2d73 697a 6520 6861 7368 htable-size hash │ │ │ -00003570: 2d74 6162 6c65 2d73 697a 6520 636f 7079 -table-size copy │ │ │ -00003580: 2d68 6173 6874 6162 6c65 2063 6f70 792d -hashtable copy- │ │ │ -00003590: 6861 7368 2d74 6162 6c65 206d 616b 652d hash-table make- │ │ │ -000035a0: 6861 7368 7461 626c 6520 6d61 6b65 2d68 hashtable make-h │ │ │ -000035b0: 6173 682d 7461 626c 6520 6d61 6b65 2d77 ash-table make-w │ │ │ -000035c0: 6561 6b2d 6861 7368 7461 626c 6520 6d61 eak-hashtable ma │ │ │ -000035d0: 6b65 2d6b 6579 2d77 6561 6b2d 6861 7368 ke-key-weak-hash │ │ │ -000035e0: 7461 626c 6520 6d61 6b65 2d76 616c 7565 table make-value │ │ │ -000035f0: 2d77 6561 6b2d 6861 7368 7461 626c 6520 -weak-hashtable │ │ │ -00003600: 6861 7368 2d74 6162 6c65 2d77 6561 6b6e hash-table-weakn │ │ │ -00003610: 6573 7320 6662 6f75 6e64 7020 782d 6b65 ess fboundp x-ke │ │ │ -00003620: 7973 796d 2d68 6173 682d 7461 626c 6520 ysym-hash-table │ │ │ -00003630: 782d 6b65 7973 796d 2d68 6173 6874 6162 x-keysym-hashtab │ │ │ -00003640: 6c65 2063 6c2d 6275 696c 7469 6e2d 6765 le cl-builtin-ge │ │ │ -00003650: 7468 6173 6820 6465 6661 756c 742d 626f thash default-bo │ │ │ -00003660: 756e 6470 2073 6574 2d64 6566 6175 6c74 undp set-default │ │ │ -00003670: 2067 6574 6861 7368 2063 6c2d 6275 696c gethash cl-buil │ │ │ -00003680: 7469 6e2d 7265 6d68 6173 6820 7265 6d68 tin-remhash remh │ │ │ -00003690: 6173 6820 636c 2d62 7569 6c74 696e 2d63 ash cl-builtin-c │ │ │ -000036a0: 6c72 6861 7368 2063 6c72 6861 7368 2063 lrhash clrhash c │ │ │ -000036b0: 6c2d 6275 696c 7469 6e2d 6d61 7068 6173 l-builtin-maphas │ │ │ -000036c0: 6820 6d61 7068 6173 6820 6465 6661 6c69 h maphash defali │ │ │ -000036d0: 6173 2063 6c2d 6765 7468 6173 6820 636c as cl-gethash cl │ │ │ -000036e0: 2d70 7574 6861 7368 2070 7574 6861 7368 -puthash puthash │ │ │ -000036f0: 2063 6c2d 7265 6d68 6173 6820 636c 2d63 cl-remhash cl-c │ │ │ -00003700: 6c72 6861 7368 2063 6c2d 6d61 7068 6173 lrhash cl-maphas │ │ │ -00003710: 685d 2033 290a 2340 3639 2049 6e73 6572 h] 3).#@69 Inser │ │ │ -00003720: 7420 6120 7072 6574 7479 2d70 7269 6e74 t a pretty-print │ │ │ -00003730: 6564 2072 656e 6469 7469 6f6e 206f 6620 ed rendition of │ │ │ -00003740: 6120 4c69 7370 2046 4f52 4d20 696e 2063 a Lisp FORM in c │ │ │ -00003750: 7572 7265 6e74 2062 7566 6665 722e 1f0a urrent buffer... │ │ │ -00003760: 2864 6566 616c 6961 7320 2763 6c2d 7072 (defalias 'cl-pr │ │ │ -00003770: 6574 7479 7072 696e 7420 235b 2866 6f72 ettyprint #[(for │ │ │ -00003780: 6d29 2022 60c3 1a19 c4c5 0821 c4b1 0388 m) "`......!.... │ │ │ -00003790: 6012 0954 6288 c6c7 5c6e c823 ab90 c9ca `..Tb...\n.#.... │ │ │ -000037a0: 2188 cb63 88cc 2088 cdce 2188 aa69 0954 !..c.. ...!..i.T │ │ │ -000037b0: 6288 cf20 2a87 2220 5b66 6f72 6d20 7074 b.. *." [form pt │ │ │ -000037c0: 206c 6173 7420 6e69 6c20 225c 6e22 2070 last nil "\n" p │ │ │ -000037d0: 7269 6e31 2d74 6f2d 7374 7269 6e67 2073 rin1-to-string s │ │ │ -000037e0: 6561 7263 682d 666f 7277 6172 6420 2228 earch-forward "( │ │ │ -000037f0: 7175 6f74 6520 2220 7420 6465 6c65 7465 quote " t delete │ │ │ -00003800: 2d62 6163 6b77 6172 642d 6368 6172 2037 -backward-char 7 │ │ │ -00003810: 2022 2722 2066 6f72 7761 7264 2d73 6578 "'" forward-sex │ │ │ -00003820: 7020 6465 6c65 7465 2d63 6861 7220 3120 p delete-char 1 │ │ │ -00003830: 636c 2d64 6f2d 7072 6574 7479 7072 696e cl-do-prettyprin │ │ │ -00003840: 745d 2034 2028 2324 202e 2031 3431 3037 t] 4 (#$ . 14107 │ │ │ -00003850: 295d 290a 2864 6566 616c 6961 7320 2763 )]).(defalias 'c │ │ │ -00003860: 6c2d 646f 2d70 7265 7474 7970 7269 6e74 l-do-prettyprint │ │ │ -00003870: 2023 5b6e 696c 2022 c5c6 7788 c7c8 21ab #[nil "..w...!. │ │ │ -00003880: fbc7 c921 ae92 c7ca 21ae 8dc7 cb21 ae88 ...!....!....!.. │ │ │ -00003890: c7cc 21ae 83c7 cd21 c7ce 21ae 83c7 cf21 ..!....!..!....! │ │ │ -000038a0: c7d0 21ae 83c7 d121 c7d2 211b 1a19 8918 ..!....!..!..... │ │ │ -000038b0: ac8e 5c6e ac8b d320 8869 d459 adbd d520 ..\n... .i.Y... │ │ │ -000038c0: 88d6 1cd7 7588 d820 8808 ac88 c7d9 21ac ....u.. ......!. │ │ │ -000038d0: 83d8 2088 09ab 88c7 d921 ac83 d820 88c7 .. ......!... .. │ │ │ -000038e0: d921 ac94 0bab 830c 3f14 0cab 83da 6388 .!......?.....c. │ │ │ -000038f0: db20 88d8 2088 aa67 d775 292c 87d3 2087 . .. ..g.u),.. . │ │ │ -00003900: 2220 5b73 6b69 7020 7477 6f20 6c65 7420 " [skip two let │ │ │ -00003910: 7365 7420 6e6c 2022 2022 206e 696c 206c set nl " " nil l │ │ │ -00003920: 6f6f 6b69 6e67 2d61 7420 2228 2220 2228 ooking-at "(" "( │ │ │ -00003930: 2822 2022 2870 726f 6722 2022 2875 6e77 (" "(prog" "(unw │ │ │ -00003940: 696e 642d 7072 6f74 6563 7420 2220 2228 ind-protect " "( │ │ │ -00003950: 6675 6e63 7469 6f6e 2028 2220 2228 636c function (" "(cl │ │ │ -00003960: 2d62 6c6f 636b 2d77 7261 7070 6572 2022 -block-wrapper " │ │ │ -00003970: 2022 2864 6566 756e 2022 2022 2864 6566 "(defun " "(def │ │ │ -00003980: 6d61 6372 6f20 2220 2228 6c65 745c 5c2a macro " "(let\\* │ │ │ -00003990: 3f20 2220 2228 7768 696c 6520 2220 2228 ? " "(while " "( │ │ │ -000039a0: 703f 7365 745b 7166 5d20 2220 666f 7277 p?set[qf] " forw │ │ │ -000039b0: 6172 642d 7365 7870 2037 3820 6261 636b ard-sexp 78 back │ │ │ -000039c0: 7761 7264 2d73 6578 7020 7420 3120 636c ward-sexp t 1 cl │ │ │ -000039d0: 2d64 6f2d 7072 6574 7479 7072 696e 7420 -do-prettyprint │ │ │ -000039e0: 2229 2220 225c 6e22 206c 6973 702d 696e ")" "\n" lisp-in │ │ │ -000039f0: 6465 6e74 2d6c 696e 655d 2036 5d29 0a28 dent-line] 6]).( │ │ │ -00003a00: 6279 7465 2d63 6f64 6520 22c1 0842 10c2 byte-code "..B.. │ │ │ -00003a10: c121 ac85 c3c1 c45c 2288 c508 4210 c2c5 .!.....\"...B... │ │ │ -00003a20: 21ac 85c3 c5c4 5c22 88c4 8722 205b 6375 !.....\"..." [cu │ │ │ -00003a30: 7272 656e 742d 6c6f 6164 2d6c 6973 7420 rrent-load-list │ │ │ -00003a40: 636c 2d6d 6163 726f 6578 7061 6e64 2d63 cl-macroexpand-c │ │ │ -00003a50: 6d61 6373 2064 6566 6175 6c74 2d62 6f75 macs default-bou │ │ │ -00003a60: 6e64 7020 7365 742d 6465 6661 756c 7420 ndp set-default │ │ │ -00003a70: 6e69 6c20 636c 2d63 6c6f 7375 7265 2d76 nil cl-closure-v │ │ │ -00003a80: 6172 735d 2033 290a 2340 3131 3420 4578 ars] 3).#@114 Ex │ │ │ -00003a90: 7061 6e64 2061 6c6c 206d 6163 726f 2063 pand all macro c │ │ │ -00003aa0: 616c 6c73 2074 6872 6f75 6768 2061 204c alls through a L │ │ │ -00003ab0: 6973 7020 464f 524d 2e0a 5468 6973 2061 isp FORM..This a │ │ │ -00003ac0: 6c73 6f20 646f 6573 2073 6f6d 6520 7472 lso does some tr │ │ │ -00003ad0: 6976 6961 6c20 6f70 7469 6d69 7a61 7469 ivial optimizati │ │ │ -00003ae0: 6f6e 7320 746f 206d 616b 6520 7468 6520 ons to make the │ │ │ -00003af0: 666f 726d 2070 7265 7474 6965 722e 1f0a form prettier... │ │ │ -00003b00: 2864 6566 616c 6961 7320 2763 6c2d 6d61 (defalias 'cl-ma │ │ │ -00003b10: 6372 6f65 7870 616e 642d 616c 6c20 235b croexpand-all #[ │ │ │ -00003b20: 2866 6f72 6d20 266f 7074 696f 6e61 6c20 (form &optional │ │ │ -00003b30: 656e 7629 2022 0dc6 0d0c 5c22 8915 61ab env) "....\"..a. │ │ │ -00003b40: 760e 36ab 890d c70d 2189 1561 ab69 0d3a v.6.....!..a.i.: │ │ │ -00003b50: ac82 0d87 0d40 c873 abf7 0d41 40ac 89c9 .....@.s...A@... │ │ │ -00003b60: ca0d 4141 420c 5c22 87cb 890d 4140 1b1e ..AAB.\"....A@.. │ │ │ -00003b70: 301e 0f0b abbd 0b40 3aab 99c9 0b40 400c 0......@:....@@. │ │ │ -00003b80: 5c22 8918 39ac 83cc 160f 08cd 0b40 410c \"..9........@A. │ │ │ -00003b90: 5c22 2942 aa94 c90b 400c 5c22 8918 39ab \")B....@.\"..9. │ │ │ -00003ba0: 8308 aa86 cc16 0f08 cb44 290e 3042 1630 .........D).0B.0 │ │ │ -00003bb0: 0b41 8913 ac43 0e0f ab8c 0d40 ce61 ab83 .A...C.....@.a.. │ │ │ -00003bc0: cfaa 85d0 aa82 0d40 0e30 9fcd 0d41 410c .......@.0...AA. │ │ │ -00003bd0: 5c22 2b42 4287 0d40 d161 ab89 0d40 d2d3 \"+BB..@.a...@.. │ │ │ -00003be0: 0d41 5c22 4287 0d40 d461 ab96 0d40 0d41 .A\"B..@.a...@.A │ │ │ -00003bf0: 40c9 d50d 380c 5c22 d2d6 0d41 4141 5c22 @...8.\"...AAA\" │ │ │ -00003c00: 4242 4287 0d40 d773 8384 010d 4140 a2d8 BBB..@.s....A@.. │ │ │ -00003c10: 6183 6001 cd0d 4140 4141 0c5c 221a 09ab a.`...A@AA.\"... │ │ │ -00003c20: f10d 40d9 61ab ebda 5c6e 095c 22ab e5d2 ..@.a...\n.\"... │ │ │ -00003c30: db09 5c22 1e32 dc09 0e32 5c22 1e33 cb1e ..\".2...2\".3.. │ │ │ -00003c40: 315c 6e40 3bac 875c 6e40 a2dd 61ab 8ede 1\n@;..\n@..a... │ │ │ -00003c50: 5c6e 8941 1240 440e 3142 1631 aa66 dfe0 \n.A.@D.1B.1.f.. │ │ │ -00003c60: 0921 40e1 cc23 88e2 e3e4 e545 e60e 330e .!@..#.....E..3. │ │ │ -00003c70: 319f 5c22 e3e7 e3e8 d9d8 e20e 320d 4140 1.\"........2.A@ │ │ │ -00003c80: 4140 5c22 e60e 335c 6e5c 2242 4244 45d2 A@\"..3\n\"BBDE. │ │ │ -00003c90: e909 5c22 eaa4 4242 4243 232b aa8c 0d40 ..\"..BBBC#+...@ │ │ │ -00003ca0: d80d 4140 4140 5c6e 4242 4429 870d 4140 ..A@A@\nBBD)..A@ │ │ │ -00003cb0: 0cb7 891e 3541 4140 4140 eb61 ab90 c90e ....5AA@A@.a.... │ │ │ -00003cc0: 3541 4141 4041 4140 4140 0c5c 22aa 810d 5AAA@AA@A@.\"... │ │ │ -00003cd0: 2987 0d40 ec73 ab8e 0d40 0d41 40cd 0d41 )..@.s...@.A@..A │ │ │ -00003ce0: 410c 5c22 4242 870d 40ca 61ab 8c0d 4141 A.\"BB..@.a...AA │ │ │ -00003cf0: ac87 c90d 4140 0c5c 2287 0d40 ed61 abae ....A@.\"..@.a.. │ │ │ -00003d00: cd0d 410c 5c22 891e 3489 1e2f ab8f 0e2f ..A.\"..4../.../ │ │ │ -00003d10: 4039 ab89 0e2f 4141 8916 2fac 710e 2fab @9.../AA../.q./. │ │ │ -00003d20: 88c9 ee0e 3442 21aa 84ed 0e34 422a 870d ....4B!....4B*.. │ │ │ -00003d30: 40cd 0d41 0c5c 2242 8722 205b 6578 7020 @..A.\"B." [exp │ │ │ -00003d40: 636c 2d63 6c6f 7375 7265 2d76 6172 7320 cl-closure-vars │ │ │ -00003d50: 626f 6479 206c 6574 7320 656e 7620 666f body lets env fo │ │ │ -00003d60: 726d 206d 6163 726f 6578 7061 6e64 2063 rm macroexpand c │ │ │ -00003d70: 6f6d 7069 6c65 722d 6d61 6372 6f65 7870 ompiler-macroexp │ │ │ -00003d80: 616e 6420 286c 6574 206c 6574 2a29 2063 and (let let*) c │ │ │ -00003d90: 6c2d 6d61 6372 6f65 7870 616e 642d 616c l-macroexpand-al │ │ │ -00003da0: 6c20 7072 6f67 6e20 6e69 6c20 7420 636c l progn nil t cl │ │ │ -00003db0: 2d6d 6163 726f 6578 7061 6e64 2d62 6f64 -macroexpand-bod │ │ │ -00003dc0: 7920 6c65 7420 6c65 7466 206c 6574 662a y let letf letf* │ │ │ -00003dd0: 2063 6f6e 6420 6d61 7063 6172 2023 5b28 cond mapcar #[( │ │ │ -00003de0: 7829 2022 c209 085c 2287 2220 5b65 6e76 x) "...\"." [env │ │ │ -00003df0: 2078 2063 6c2d 6d61 6372 6f65 7870 616e x cl-macroexpan │ │ │ -00003e00: 642d 626f 6479 5d20 335d 2063 6f6e 6469 d-body] 3] condi │ │ │ -00003e10: 7469 6f6e 2d63 6173 6520 3220 235b 2878 tion-case 2 #[(x │ │ │ -00003e20: 2920 2209 40c2 0941 085c 2242 8722 205b ) ".@..A.\"B." [ │ │ │ -00003e30: 656e 7620 7820 636c 2d6d 6163 726f 6578 env x cl-macroex │ │ │ -00003e40: 7061 6e64 2d62 6f64 795d 2034 5d20 2766 pand-body] 4] 'f │ │ │ -00003e50: 756e 6374 696f 6e20 6c61 6d62 6461 2066 unction lambda f │ │ │ -00003e60: 756e 6374 696f 6e20 636c 2d65 7870 722d unction cl-expr- │ │ │ -00003e70: 636f 6e74 6169 6e73 2d61 6e79 2067 656e contains-any gen │ │ │ -00003e80: 7379 6d20 7061 6972 6c69 7320 696e 7465 sym pairlis inte │ │ │ -00003e90: 7261 6374 6976 6520 7175 6f74 6520 7075 ractive quote pu │ │ │ -00003ea0: 7420 6c61 7374 2075 7365 6420 6170 7065 t last used appe │ │ │ -00003eb0: 6e64 206c 6973 7420 276c 616d 6264 6120 nd list 'lambda │ │ │ -00003ec0: 2728 2672 6573 7420 2d2d 636c 2d72 6573 '(&rest --cl-res │ │ │ -00003ed0: 742d 2d29 2073 7562 6c69 7320 2761 7070 t--) sublis 'app │ │ │ -00003ee0: 6c79 2027 7175 6f74 6520 235b 2878 2920 ly 'quote #[(x) │ │ │ -00003ef0: 22c1 c208 4587 2220 5b78 206c 6973 7420 "...E." [x list │ │ │ -00003f00: 2771 756f 7465 5d20 335d 2028 272d 2d63 'quote] 3] ('--c │ │ │ -00003f10: 6c2d 7265 7374 2d2d 2920 636c 2d6c 6162 l-rest--) cl-lab │ │ │ -00003f20: 656c 732d 6172 6773 2028 6465 6675 6e20 els-args (defun │ │ │ -00003f30: 6465 666d 6163 726f 2920 7365 7471 2073 defmacro) setq s │ │ │ -00003f40: 6574 6620 7020 7265 7320 6465 636c 7320 etf p res decls │ │ │ -00003f50: 6e65 7720 7375 6220 6172 6773 2066 6f75 new sub args fou │ │ │ -00003f60: 6e64 2063 6c2d 6d61 6372 6f65 7870 616e nd cl-macroexpan │ │ │ -00003f70: 642d 636d 6163 735d 2031 3420 2823 2420 d-cmacs] 14 (#$ │ │ │ -00003f80: 2e20 3134 3939 3029 5d29 0a28 6465 6661 . 14990)]).(defa │ │ │ -00003f90: 6c69 6173 2027 636c 2d6d 6163 726f 6578 lias 'cl-macroex │ │ │ -00003fa0: 7061 6e64 2d62 6f64 7920 235b 2862 6f64 pand-body #[(bod │ │ │ -00003fb0: 7920 266f 7074 696f 6e61 6c20 656e 7629 y &optional env) │ │ │ -00003fc0: 2022 c1c2 085c 2287 2220 5b62 6f64 7920 "...\"." [body │ │ │ -00003fd0: 6d61 7063 6172 2023 5b28 7829 2022 c209 mapcar #[(x) ".. │ │ │ -00003fe0: 085c 2287 2220 5b65 6e76 2078 2063 6c2d .\"." [env x cl- │ │ │ -00003ff0: 6d61 6372 6f65 7870 616e 642d 616c 6c5d macroexpand-all] │ │ │ -00004000: 2033 5d5d 2033 5d29 0a28 6465 6661 6c69 3]] 3]).(defali │ │ │ -00004010: 6173 2027 636c 2d70 7265 7474 7965 7870 as 'cl-prettyexp │ │ │ -00004020: 616e 6420 235b 2866 6f72 6d20 266f 7074 and #[(form &opt │ │ │ -00004030: 696f 6e61 6c20 6675 6c6c 2920 22c5 c621 ional full) "..! │ │ │ -00004040: 880b 89c7 1a19 18c8 0c0b 3fad 81c9 5c22 ..........?...\" │ │ │ -00004050: 14c5 ca21 88cb 0c21 c5cc 2188 2b87 2220 ...!...!..!.+." │ │ │ -00004060: 5b63 6c2d 6d61 6372 6f65 7870 616e 642d [cl-macroexpand- │ │ │ -00004070: 636d 6163 7320 636c 2d63 6f6d 7069 6c69 cmacs cl-compili │ │ │ -00004080: 6e67 2d66 696c 6520 6279 7465 2d63 6f6d ng-file byte-com │ │ │ -00004090: 7069 6c65 2d6d 6163 726f 2d65 6e76 6972 pile-macro-envir │ │ │ -000040a0: 6f6e 6d65 6e74 2066 756c 6c20 666f 726d onment full form │ │ │ -000040b0: 206d 6573 7361 6765 2022 4578 7061 6e64 message "Expand │ │ │ -000040c0: 696e 672e 2e2e 2220 6e69 6c20 636c 2d6d ing..." nil cl-m │ │ │ -000040d0: 6163 726f 6578 7061 6e64 2d61 6c6c 2028 acroexpand-all ( │ │ │ -000040e0: 2862 6c6f 636b 2920 2865 7661 6c2d 7768 (block) (eval-wh │ │ │ -000040f0: 656e 2929 2022 466f 726d 6174 7469 6e67 en)) "Formatting │ │ │ -00004100: 2e2e 2e22 2063 6c2d 7072 6574 7479 7072 ..." cl-prettypr │ │ │ -00004110: 696e 7420 2222 5d20 335d 290a 2862 7974 int ""] 3]).(byt │ │ │ -00004120: 652d 636f 6465 2022 c0c1 2188 c2c3 2187 e-code "..!...!. │ │ │ -00004130: 2220 5b72 756e 2d68 6f6f 6b73 2063 6c2d " [run-hooks cl- │ │ │ -00004140: 6578 7472 612d 6c6f 6164 2d68 6f6f 6b20 extra-load-hook │ │ │ -00004150: 7072 6f76 6964 6520 636c 2d65 7874 7261 provide cl-extra │ │ │ -00004160: 5d20 3229 0a ] 2). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3039 2032 3032 310a 3b3b 3b20 :08:09 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6c2d 6578 7472 612e 4/lisp/cl-extra. │ │ │ +00000090: 656c 0a3b 3b3b 2065 6d61 6373 2076 6572 el.;;; emacs ver │ │ │ +000000a0: 7369 6f6e 2032 312e 3420 2870 6174 6368 sion 21.4 (patch │ │ │ +000000b0: 2032 3429 2022 5374 616e 6461 7264 2043 24) "Standard C │ │ │ +000000c0: 2220 5845 6d61 6373 204c 7563 6964 2e0a " XEmacs Lucid.. │ │ │ +000000d0: 3b3b 3b20 6279 7465 636f 6d70 2076 6572 ;;; bytecomp ver │ │ │ +000000e0: 7369 6f6e 2032 2e32 3720 5845 6d61 6373 sion 2.27 XEmacs │ │ │ +000000f0: 3b20 3230 3030 2d30 392d 3132 2e0a 3b3b ; 2000-09-12..;; │ │ │ +00000100: 3b20 6f70 7469 6d69 7a61 7469 6f6e 2069 ; optimization i │ │ │ +00000110: 7320 6f6e 2e0a 3b3b 3b20 7468 6973 2066 s on..;;; this f │ │ │ +00000120: 696c 6520 7573 6573 206f 7063 6f64 6573 ile uses opcodes │ │ │ +00000130: 2077 6869 6368 2064 6f20 6e6f 7420 6578 which do not ex │ │ │ +00000140: 6973 7420 696e 2045 6d61 6373 2031 392e ist in Emacs 19. │ │ │ +00000150: 0a0a 2869 6620 2861 6e64 2028 626f 756e ..(if (and (boun │ │ │ +00000160: 6470 2027 656d 6163 732d 7665 7273 696f dp 'emacs-versio │ │ │ +00000170: 6e29 0a09 2028 6f72 2028 616e 6420 2862 n).. (or (and (b │ │ │ +00000180: 6f75 6e64 7020 2765 706f 6368 3a3a 7665 oundp 'epoch::ve │ │ │ +00000190: 7273 696f 6e29 2065 706f 6368 3a3a 7665 rsion) epoch::ve │ │ │ +000001a0: 7273 696f 6e29 0a09 2020 2020 2028 7374 rsion).. (st │ │ │ +000001b0: 7269 6e67 2d6c 6573 7370 2065 6d61 6373 ring-lessp emacs │ │ │ +000001c0: 2d76 6572 7369 6f6e 2022 3230 2229 2929 -version "20"))) │ │ │ +000001d0: 0a20 2020 2028 6572 726f 7220 2260 636c . (error "`cl │ │ │ +000001e0: 2d65 7874 7261 2e65 6c27 2077 6173 2063 -extra.el' was c │ │ │ +000001f0: 6f6d 7069 6c65 6420 666f 7220 456d 6163 ompiled for Emac │ │ │ +00000200: 7320 3230 2229 290a 0a28 6f72 2028 626f s 20"))..(or (bo │ │ │ +00000210: 756e 6470 2027 6375 7272 656e 742d 6c6f undp 'current-lo │ │ │ +00000220: 6164 2d6c 6973 7429 2028 7365 7471 2063 ad-list) (setq c │ │ │ +00000230: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ +00000240: 206e 696c 2929 0a0a 0a28 6279 7465 2d63 nil))...(byte-c │ │ │ +00000250: 6f64 6520 22c1 0873 ac84 c2c3 2188 c187 ode "..s....!... │ │ │ +00000260: 2220 5b66 6561 7475 7265 7320 636c 2d31 " [features cl-1 │ │ │ +00000270: 3920 6572 726f 7220 2254 7269 6564 2074 9 error "Tried t │ │ │ +00000280: 6f20 6c6f 6164 2060 636c 2d65 7874 7261 o load `cl-extra │ │ │ +00000290: 2720 6265 666f 7265 2060 636c 2721 225d ' before `cl'!"] │ │ │ +000002a0: 2032 290a 2864 6566 616c 6961 7320 2763 2).(defalias 'c │ │ │ +000002b0: 6c2d 7075 7368 2027 286d 6163 726f 202e l-push '(macro . │ │ │ +000002c0: 2023 5b28 7820 706c 6163 6529 2022 c209 #[(x place) ".. │ │ │ +000002d0: c308 0945 4587 2220 5b78 2070 6c61 6365 ...EE." [x place │ │ │ +000002e0: 2073 6574 7120 636f 6e73 5d20 355d 2929 setq cons] 5])) │ │ │ +000002f0: 0a28 6465 6661 6c69 6173 2027 636c 2d70 .(defalias 'cl-p │ │ │ +00000300: 6f70 2027 286d 6163 726f 202e 2023 5b28 op '(macro . #[( │ │ │ +00000310: 706c 6163 6529 2022 c1c2 08c3 08c4 0844 place) ".......D │ │ │ +00000320: 4545 4487 2220 5b70 6c61 6365 2063 6172 EED." [place car │ │ │ +00000330: 2070 726f 6731 2073 6574 7120 6364 725d prog1 setq cdr] │ │ │ +00000340: 2037 5d29 290a 2340 3637 2043 6f65 7263 7])).#@67 Coerc │ │ │ +00000350: 6520 4f42 4a45 4354 2074 6f20 7479 7065 e OBJECT to type │ │ │ +00000360: 2054 5950 452e 0a54 5950 4520 6973 2061 TYPE..TYPE is a │ │ │ +00000370: 2043 6f6d 6d6f 6e20 4c69 7370 2074 7970 Common Lisp typ │ │ │ +00000380: 6520 7370 6563 6966 6965 722e 1f0a 2864 e specifier...(d │ │ │ +00000390: 6566 616c 6961 7320 2763 6f65 7263 6520 efalias 'coerce │ │ │ +000003a0: 235b 2878 2074 7970 6529 2022 09c3 61ab #[(x type) "..a. │ │ │ +000003b0: 8b5c 6e3c ab82 5c6e 87c4 5c6e c55c 2287 .\n<..\n..\n.\". │ │ │ +000003c0: 09c6 61ab 8bc7 5c6e 21ab 825c 6e87 c85c ..a...\n!..\n..\ │ │ │ +000003d0: 6e21 8709 c961 ab8a 5c6e 3bab 825c 6e87 n!...a..\n;..\n. │ │ │ +000003e0: 5c6e b001 8709 ca61 ab8b cb5c 6e21 ab82 \n.....a...\n!.. │ │ │ +000003f0: 5c6e 87c8 5c6e 2187 09cc 61ab 8e5c 6e3b \n..\n!...a..\n; │ │ │ +00000400: ab8a 5c6e 47cd 55ab 845c 6ece 4887 09cc ..\nG.U..\n.H... │ │ │ +00000410: 61ab 8b5c 6e39 ab87 cfd0 5c6e 2109 5c22 a..\n9....\n!.\" │ │ │ +00000420: 8709 cc61 ab89 d15c 6e21 ab84 d25c 6e21 ...a...\n!...\n! │ │ │ +00000430: 8709 d361 ab89 d45c 6e21 ab84 d55c 6e21 ...a...\n!...\n! │ │ │ +00000440: 8709 d661 ab84 d65c 6e21 8709 d761 ab8f ...a...\n!...a.. │ │ │ +00000450: d85c 6e21 ab82 5c6e 87d9 d7c4 5c6e c55c .\n!..\n....\n.\ │ │ │ +00000460: 225c 2287 09da 61ab 9cdb 5c6e 21ab 825c "\"...a...\n!..\ │ │ │ +00000470: 6e87 dc20 18dd 085c 6e3c ab83 5c6e aa84 n.. ...\n<..\n.. │ │ │ +00000480: c45c 6ec5 5c22 5c22 8808 2987 de5c 6e09 .\n.\"\"..)..\n. │ │ │ +00000490: 5c22 ab82 5c6e 87df e05c 6e09 2387 2220 \"..\n...\n.#." │ │ │ +000004a0: 5b77 6c20 7479 7065 2078 206c 6973 7420 [wl type x list │ │ │ +000004b0: 6170 7065 6e64 206e 696c 2076 6563 746f append nil vecto │ │ │ +000004c0: 7220 7665 6374 6f72 7020 7663 6f6e 6361 r vectorp vconca │ │ │ +000004d0: 7420 7374 7269 6e67 2061 7272 6179 2061 t string array a │ │ │ +000004e0: 7272 6179 7020 6368 6172 6163 7465 7220 rrayp character │ │ │ +000004f0: 3120 3020 636f 6572 6365 2073 796d 626f 1 0 coerce symbo │ │ │ +00000500: 6c2d 6e61 6d65 2063 6861 722d 696e 742d l-name char-int- │ │ │ +00000510: 7020 696e 742d 6368 6172 2069 6e74 6567 p int-char integ │ │ │ +00000520: 6572 2063 6861 7261 6374 6572 7020 6368 er characterp ch │ │ │ +00000530: 6172 2d69 6e74 2066 6c6f 6174 2062 6974 ar-int float bit │ │ │ +00000540: 2d76 6563 746f 7220 6269 742d 7665 6374 -vector bit-vect │ │ │ +00000550: 6f72 2d70 2061 7070 6c79 2077 6561 6b2d or-p apply weak- │ │ │ +00000560: 6c69 7374 2077 6561 6b2d 6c69 7374 2d70 list weak-list-p │ │ │ +00000570: 206d 616b 652d 7765 616b 2d6c 6973 7420 make-weak-list │ │ │ +00000580: 7365 742d 7765 616b 2d6c 6973 742d 6c69 set-weak-list-li │ │ │ +00000590: 7374 2074 7970 6570 2065 7272 6f72 2022 st typep error " │ │ │ +000005a0: 4361 6e27 7420 636f 6572 6365 2025 7320 Can't coerce %s │ │ │ +000005b0: 746f 2074 7970 6520 2573 225d 2035 2028 to type %s"] 5 ( │ │ │ +000005c0: 2324 202e 2038 3433 295d 290a 2340 3232 #$ . 843)]).#@22 │ │ │ +000005d0: 3520 5265 7475 726e 2074 2069 6620 7477 5 Return t if tw │ │ │ +000005e0: 6f20 4c69 7370 206f 626a 6563 7473 2068 o Lisp objects h │ │ │ +000005f0: 6176 6520 7369 6d69 6c61 7220 7374 7275 ave similar stru │ │ │ +00000600: 6374 7572 6573 2061 6e64 2063 6f6e 7465 ctures and conte │ │ │ +00000610: 6e74 732e 0a54 6869 7320 6973 206c 696b nts..This is lik │ │ │ +00000620: 6520 6065 7175 616c 272c 2065 7863 6570 e `equal', excep │ │ │ +00000630: 7420 7468 6174 2069 7420 6163 6365 7074 t that it accept │ │ │ +00000640: 7320 6e75 6d65 7269 6361 6c6c 7920 6571 s numerically eq │ │ │ +00000650: 7561 6c0a 6e75 6d62 6572 7320 6f66 2064 ual.numbers of d │ │ │ +00000660: 6966 6665 7265 6e74 2074 7970 6573 2028 ifferent types ( │ │ │ +00000670: 666c 6f61 7420 7673 2e20 696e 7465 6765 float vs. intege │ │ │ +00000680: 7229 2c20 616e 6420 616c 736f 2063 6f6d r), and also com │ │ │ +00000690: 7061 7265 730a 7374 7269 6e67 7320 6361 pares.strings ca │ │ │ +000006a0: 7365 2d69 6e73 656e 7369 7469 7665 6c79 se-insensitively │ │ │ +000006b0: 2e1f 0a28 6465 6661 6c69 6173 2027 6571 ...(defalias 'eq │ │ │ +000006c0: 7561 6c70 2023 5b28 7820 7929 2022 5c6e ualp #[(x y) "\n │ │ │ +000006d0: 0961 ab82 c387 5c6e 3bab 9909 3b85 9f00 .a....\n;...;... │ │ │ +000006e0: 5c6e 4709 4755 859f 005c 6e09 9886 9f00 \nG.GU...\n..... │ │ │ +000006f0: 5c6e 9709 9798 87c4 5c6e 21ab 92c4 0921 \n......\n!....! │ │ │ +00000700: adf1 c55c 6e09 5c22 aeeb c55c 6e97 0997 ...\n.\"...\n... │ │ │ +00000710: 5c22 875c 6ea7 ab88 09a7 addc 5c6e 0955 \".\n.......\n.U │ │ │ +00000720: 875c 6e3a aba6 5c6e 3aab 9809 3aab 94c6 .\n:..\n:...:... │ │ │ +00000730: 5c6e 4009 405c 22ab 8c5c 6e89 4112 8809 \n@.@\"..\n.A... │ │ │ +00000740: 8941 1188 aa64 5c6e 3a3f adb3 c65c 6e09 .A...d\n:?...\n. │ │ │ +00000750: 5c22 87c7 5c6e 21ab a6c7 0921 ada4 5c6e \"..\n!....!..\n │ │ │ +00000760: 4709 4755 ad9d 5c6e 4718 0853 8910 c859 G.GU..\nG..S...Y │ │ │ +00000770: ab8a c65c 6e08 4809 0848 5c22 ac6e 08c8 ...\n.H..H\".n.. │ │ │ +00000780: 5729 875c 6e09 6b87 2220 5b69 2079 2078 W).\n.k." [i y x │ │ │ +00000790: 2074 2063 6861 7261 6374 6572 7020 6368 t characterp ch │ │ │ +000007a0: 6172 2d65 7175 616c 2065 7175 616c 7020 ar-equal equalp │ │ │ +000007b0: 7665 6374 6f72 7020 305d 2034 2028 2324 vectorp 0] 4 (#$ │ │ │ +000007c0: 202e 2031 3439 3029 5d29 0a28 6465 6661 . 1490)]).(defa │ │ │ +000007d0: 6c69 6173 2027 636c 2d6d 6170 6361 722d lias 'cl-mapcar- │ │ │ +000007e0: 6d61 6e79 2023 5b28 636c 2d66 756e 6320 many #[(cl-func │ │ │ +000007f0: 636c 2d73 6571 7329 2022 0b41 41ab e0c6 cl-seqs) ".AA... │ │ │ +00000800: 1ac7 c8c9 ca0b 5c22 5c22 1e0f cb1d cc0b ......\"\"...... │ │ │ +00000810: 211e 10c6 891c 1e0e cc0b 2113 0d0e 0f57 !.........!....W │ │ │ +00000820: abba 0b14 0e10 160e 0cab a20e 0e0c 403a ..............@: │ │ │ +00000830: ab8b 0c40 400c 8940 41a0 88aa 840c 400d ...@@..@A.....@. │ │ │ +00000840: 48a0 880c 4114 0e0e 4116 0eaa 5bc7 0e11 H...A...A...[... │ │ │ +00000850: 0e10 5c22 5c6e 4212 0d54 8915 aa41 5c6e ..\"\nB..T...A\n │ │ │ +00000860: 9f2e 0687 c60b 400b 4140 1918 1a08 4709 ......@.A@....G. │ │ │ +00000870: 475e cd1d 1e0f 0d54 8915 0e0f 57ab a40e G^.....T....W... │ │ │ +00000880: 1108 3aab 8708 8941 1040 aa83 080d 4809 ..:....A.@....H. │ │ │ +00000890: 3aab 8709 8941 1140 aa83 090d 485c 225c :....A.@....H\"\ │ │ │ +000008a0: 6e42 12aa 532a 5c6e 9f2b 8722 205b 636c nB..S*\n.+." [cl │ │ │ +000008b0: 2d78 2063 6c2d 7920 636c 2d72 6573 2063 -x cl-y cl-res c │ │ │ +000008c0: 6c2d 7365 7173 2063 6c2d 7031 2063 6c2d l-seqs cl-p1 cl- │ │ │ +000008d0: 6920 6e69 6c20 6170 706c 7920 6d69 6e20 i nil apply min │ │ │ +000008e0: 6d61 7063 6172 206c 656e 6774 6820 3020 mapcar length 0 │ │ │ +000008f0: 636f 7079 2d73 6571 7565 6e63 6520 2d31 copy-sequence -1 │ │ │ +00000900: 2063 6c2d 7032 2063 6c2d 6e20 636c 2d61 cl-p2 cl-n cl-a │ │ │ +00000910: 7267 7320 636c 2d66 756e 635d 2036 5d29 rgs cl-func] 6]) │ │ │ +00000920: 0a23 4031 3634 204d 6170 2061 2066 756e .#@164 Map a fun │ │ │ +00000930: 6374 696f 6e20 6163 726f 7373 206f 6e65 ction across one │ │ │ +00000940: 206f 7220 6d6f 7265 2073 6571 7565 6e63 or more sequenc │ │ │ +00000950: 6573 2c20 7265 7475 726e 696e 6720 6120 es, returning a │ │ │ +00000960: 7365 7175 656e 6365 2e0a 5459 5045 2069 sequence..TYPE i │ │ │ +00000970: 7320 7468 6520 7365 7175 656e 6365 2074 s the sequence t │ │ │ +00000980: 7970 6520 746f 2072 6574 7572 6e2c 2046 ype to return, F │ │ │ +00000990: 554e 4320 6973 2074 6865 2066 756e 6374 UNC is the funct │ │ │ +000009a0: 696f 6e2c 2061 6e64 2053 4551 530a 6172 ion, and SEQS.ar │ │ │ +000009b0: 6520 7468 6520 6172 6775 6d65 6e74 2073 e the argument s │ │ │ +000009c0: 6571 7565 6e63 6573 2e1f 0a28 6465 6661 equences...(defa │ │ │ +000009d0: 6c69 6173 2027 6d61 7020 235b 2863 6c2d lias 'map #[(cl- │ │ │ +000009e0: 7479 7065 2063 6c2d 6675 6e63 2063 6c2d type cl-func cl- │ │ │ +000009f0: 7365 7120 2672 6573 7420 636c 2d72 6573 seq &rest cl-res │ │ │ +00000a00: 7429 2022 c5c6 5c6e 0908 241c 0bad 84c7 t) "..\n..$..... │ │ │ +00000a10: 0c0b 5c22 2987 2220 5b63 6c2d 7265 7374 ..\")." [cl-rest │ │ │ +00000a20: 2063 6c2d 7365 7120 636c 2d66 756e 6320 cl-seq cl-func │ │ │ +00000a30: 636c 2d74 7970 6520 636c 2d72 6573 2061 cl-type cl-res a │ │ │ +00000a40: 7070 6c79 206d 6170 6361 722a 2063 6f65 pply mapcar* coe │ │ │ +00000a50: 7263 655d 2035 2028 2324 202e 2032 3334 rce] 5 (#$ . 234 │ │ │ +00000a60: 3329 5d29 0a23 4031 3339 204d 6170 2046 3)]).#@139 Map F │ │ │ +00000a70: 554e 4320 746f 2065 6163 6820 7375 626c UNC to each subl │ │ │ +00000a80: 6973 7420 6f66 204c 4953 5420 6f72 204c ist of LIST or L │ │ │ +00000a90: 4953 5453 2e0a 4c69 6b65 2060 6d61 7063 ISTS..Like `mapc │ │ │ +00000aa0: 6172 272c 2065 7863 6570 7420 6170 706c ar', except appl │ │ │ +00000ab0: 6965 7320 746f 206c 6973 7473 2061 6e64 ies to lists and │ │ │ +00000ac0: 2074 6865 6972 2063 6472 2773 2072 6174 their cdr's rat │ │ │ +00000ad0: 6865 7220 7468 616e 2074 6f0a 7468 6520 her than to.the │ │ │ +00000ae0: 656c 656d 656e 7473 2074 6865 6d73 656c elements themsel │ │ │ +00000af0: 7665 732e 1f0a 2864 6566 616c 6961 7320 ves...(defalias │ │ │ +00000b00: 276d 6170 6c69 7374 2023 5b28 636c 2d66 'maplist #[(cl-f │ │ │ +00000b10: 756e 6320 636c 2d6c 6973 7420 2672 6573 unc cl-list &res │ │ │ +00000b20: 7420 636c 2d72 6573 7429 2022 09ab aac6 t cl-rest) ".... │ │ │ +00000b30: 0cc7 0921 42c6 1b1a 1dc6 5c6e 73ac 97c8 ...!B.....\ns... │ │ │ +00000b40: 085c 6e5c 220d 4215 5c6e 130b ab6f 0b89 .\n\".B.\n...o.. │ │ │ +00000b50: 8941 1340 41a0 88aa 720d 9f2b 87c6 1d0c .A.@A...r..+.... │ │ │ +00000b60: ab8c 080c 210d 4215 0c41 8914 ac74 0d9f ....!.B..A...t.. │ │ │ +00000b70: 2987 2220 5b63 6c2d 6675 6e63 2063 6c2d )." [cl-func cl- │ │ │ +00000b80: 7265 7374 2063 6c2d 6172 6773 2063 6c2d rest cl-args cl- │ │ │ +00000b90: 7020 636c 2d6c 6973 7420 636c 2d72 6573 p cl-list cl-res │ │ │ +00000ba0: 206e 696c 2063 6f70 792d 7365 7175 656e nil copy-sequen │ │ │ +00000bb0: 6365 2061 7070 6c79 5d20 3520 2823 2420 ce apply] 5 (#$ │ │ │ +00000bc0: 2e20 3236 3637 295d 290a 2340 3733 204c . 2667)]).#@73 L │ │ │ +00000bd0: 696b 6520 606d 6170 6361 7227 2c20 6275 ike `mapcar', bu │ │ │ +00000be0: 7420 646f 6573 206e 6f74 2061 6363 756d t does not accum │ │ │ +00000bf0: 756c 6174 6520 7661 6c75 6573 2072 6574 ulate values ret │ │ │ +00000c00: 7572 6e65 6420 6279 2074 6865 2066 756e urned by the fun │ │ │ +00000c10: 6374 696f 6e2e 1f0a 2864 6566 616c 6961 ction...(defalia │ │ │ +00000c20: 7320 276d 6170 6320 235b 2863 6c2d 6675 s 'mapc #[(cl-fu │ │ │ +00000c30: 6e63 2063 6c2d 7365 7120 2672 6573 7420 nc cl-seq &rest │ │ │ +00000c40: 636c 2d72 6573 7429 2022 09ab 8ac3 c4c5 cl-rest) "...... │ │ │ +00000c50: 085c 6e09 2588 aa85 c608 5c6e 5c22 885c .\n.%.....\n\".\ │ │ │ +00000c60: 6e87 2220 5b63 6c2d 6675 6e63 2063 6c2d n." [cl-func cl- │ │ │ +00000c70: 7265 7374 2063 6c2d 7365 7120 6170 706c rest cl-seq appl │ │ │ +00000c80: 7920 6d61 7020 6e69 6c20 6d61 7063 2d69 y map nil mapc-i │ │ │ +00000c90: 6e74 6572 6e61 6c5d 2036 2028 2324 202e nternal] 6 (#$ . │ │ │ +00000ca0: 2033 3032 3329 5d29 0a23 4037 3420 4c69 3023)]).#@74 Li │ │ │ +00000cb0: 6b65 2060 6d61 706c 6973 7427 2c20 6275 ke `maplist', bu │ │ │ +00000cc0: 7420 646f 6573 206e 6f74 2061 6363 756d t does not accum │ │ │ +00000cd0: 756c 6174 6520 7661 6c75 6573 2072 6574 ulate values ret │ │ │ +00000ce0: 7572 6e65 6420 6279 2074 6865 2066 756e urned by the fun │ │ │ +00000cf0: 6374 696f 6e2e 1f0a 2864 6566 616c 6961 ction...(defalia │ │ │ +00000d00: 7320 276d 6170 6c20 235b 2863 6c2d 6675 s 'mapl #[(cl-fu │ │ │ +00000d10: 6e63 2063 6c2d 6c69 7374 2026 7265 7374 nc cl-list &rest │ │ │ +00000d20: 2063 6c2d 7265 7374 2920 2209 ab89 c4c5 cl-rest) "..... │ │ │ +00000d30: 085c 6e09 2488 aa90 5c6e 891b ab8a 080b .\n.$...\n...... │ │ │ +00000d40: 2188 0b41 8913 ac76 295c 6e87 2220 5b63 !..A...v)\n." [c │ │ │ +00000d50: 6c2d 6675 6e63 2063 6c2d 7265 7374 2063 l-func cl-rest c │ │ │ +00000d60: 6c2d 6c69 7374 2063 6c2d 7020 6170 706c l-list cl-p appl │ │ │ +00000d70: 7920 6d61 706c 6973 745d 2036 2028 2324 y maplist] 6 (#$ │ │ │ +00000d80: 202e 2033 3234 3629 5d29 0a23 4037 3420 . 3246)]).#@74 │ │ │ +00000d90: 4c69 6b65 2060 6d61 7063 6172 272c 2062 Like `mapcar', b │ │ │ +00000da0: 7574 206e 636f 6e63 2773 2074 6f67 6574 ut nconc's toget │ │ │ +00000db0: 6865 7220 7468 6520 7661 6c75 6573 2072 her the values r │ │ │ +00000dc0: 6574 7572 6e65 6420 6279 2074 6865 2066 eturned by the f │ │ │ +00000dd0: 756e 6374 696f 6e2e 1f0a 2864 6566 616c unction...(defal │ │ │ +00000de0: 6961 7320 276d 6170 6361 6e20 235b 2863 ias 'mapcan #[(c │ │ │ +00000df0: 6c2d 6675 6e63 2063 6c2d 7365 7120 2672 l-func cl-seq &r │ │ │ +00000e00: 6573 7420 636c 2d72 6573 7429 2022 c3c4 est cl-rest) ".. │ │ │ +00000e10: c3c5 5c6e 0908 245c 2287 2220 5b63 6c2d ..\n..$\"." [cl- │ │ │ +00000e20: 7265 7374 2063 6c2d 7365 7120 636c 2d66 rest cl-seq cl-f │ │ │ +00000e30: 756e 6320 6170 706c 7920 6e63 6f6e 6320 unc apply nconc │ │ │ +00000e40: 6d61 7063 6172 2a5d 2037 2028 2324 202e mapcar*] 7 (#$ . │ │ │ +00000e50: 2033 3437 3229 5d29 0a23 4037 3520 4c69 3472)]).#@75 Li │ │ │ +00000e60: 6b65 2060 6d61 706c 6973 7427 2c20 6275 ke `maplist', bu │ │ │ +00000e70: 7420 6e63 6f6e 6327 7320 746f 6765 7468 t nconc's togeth │ │ │ +00000e80: 6572 2074 6865 2076 616c 7565 7320 7265 er the values re │ │ │ +00000e90: 7475 726e 6564 2062 7920 7468 6520 6675 turned by the fu │ │ │ +00000ea0: 6e63 7469 6f6e 2e1f 0a28 6465 6661 6c69 nction...(defali │ │ │ +00000eb0: 6173 2027 6d61 7063 6f6e 2023 5b28 636c as 'mapcon #[(cl │ │ │ +00000ec0: 2d66 756e 6320 636c 2d6c 6973 7420 2672 -func cl-list &r │ │ │ +00000ed0: 6573 7420 636c 2d72 6573 7429 2022 c3c4 est cl-rest) ".. │ │ │ +00000ee0: c3c5 5c6e 0908 245c 2287 2220 5b63 6c2d ..\n..$\"." [cl- │ │ │ +00000ef0: 7265 7374 2063 6c2d 6c69 7374 2063 6c2d rest cl-list cl- │ │ │ +00000f00: 6675 6e63 2061 7070 6c79 206e 636f 6e63 func apply nconc │ │ │ +00000f10: 206d 6170 6c69 7374 5d20 3720 2823 2420 maplist] 7 (#$ │ │ │ +00000f20: 2e20 3336 3738 295d 290a 2340 3132 3720 . 3678)]).#@127 │ │ │ +00000f30: 5265 7475 726e 2074 7275 6520 6966 2050 Return true if P │ │ │ +00000f40: 5245 4449 4341 5445 2069 7320 7472 7565 REDICATE is true │ │ │ +00000f50: 206f 6620 616e 7920 656c 656d 656e 7420 of any element │ │ │ +00000f60: 6f66 2053 4551 206f 7220 5345 5173 2e0a of SEQ or SEQs.. │ │ │ +00000f70: 4966 2073 6f2c 2072 6574 7572 6e20 7468 If so, return th │ │ │ +00000f80: 6520 7472 7565 2028 6e6f 6e2d 6e69 6c29 e true (non-nil) │ │ │ +00000f90: 2076 616c 7565 2072 6574 7572 6e65 6420 value returned │ │ │ +00000fa0: 6279 2050 5245 4449 4341 5445 2e1f 0a28 by PREDICATE...( │ │ │ +00000fb0: 6465 6661 6c69 6173 2027 736f 6d65 2023 defalias 'some # │ │ │ +00000fc0: 5b28 636c 2d70 7265 6420 636c 2d73 6571 [(cl-pred cl-seq │ │ │ +00000fd0: 2026 7265 7374 2063 6c2d 7265 7374 2920 &rest cl-rest) │ │ │ +00000fe0: 2209 ac84 0b3c ac84 c4c5 8d87 c61a 0bab "....<.......... │ │ │ +00000ff0: 8b08 0b89 4113 4021 8912 ab72 5c6e 2987 ....A.@!...r\n). │ │ │ +00001000: 2220 5b63 6c2d 7072 6564 2063 6c2d 7265 " [cl-pred cl-re │ │ │ +00001010: 7374 2063 6c2d 7820 636c 2d73 6571 2063 st cl-x cl-seq c │ │ │ +00001020: 6c2d 736f 6d65 2028 6279 7465 2d63 6f64 l-some (byte-cod │ │ │ +00001030: 6520 22c2 c3c4 c509 0825 88c4 8722 205b e "......%..." [ │ │ │ +00001040: 636c 2d72 6573 7420 636c 2d73 6571 2061 cl-rest cl-seq a │ │ │ +00001050: 7070 6c79 206d 6170 206e 696c 2023 5b28 pply map nil #[( │ │ │ +00001060: 2672 6573 7420 636c 2d78 2920 22c3 0908 &rest cl-x) "... │ │ │ +00001070: 5c22 891a ad84 c4c5 5c6e 5c22 2987 2220 \"......\n\")." │ │ │ +00001080: 5b63 6c2d 7820 636c 2d70 7265 6420 636c [cl-x cl-pred cl │ │ │ +00001090: 2d72 6573 2061 7070 6c79 2074 6872 6f77 -res apply throw │ │ │ +000010a0: 2063 6c2d 736f 6d65 5d20 345d 5d20 3629 cl-some] 4]] 6) │ │ │ +000010b0: 206e 696c 5d20 3320 2823 2420 2e20 3338 nil] 3 (#$ . 38 │ │ │ +000010c0: 3838 295d 290a 2340 3637 2052 6574 7572 88)]).#@67 Retur │ │ │ +000010d0: 6e20 7472 7565 2069 6620 5052 4544 4943 n true if PREDIC │ │ │ +000010e0: 4154 4520 6973 2074 7275 6520 6f66 2065 ATE is true of e │ │ │ +000010f0: 7665 7279 2065 6c65 6d65 6e74 206f 6620 very element of │ │ │ +00001100: 5345 5120 6f72 2053 4551 732e 1f0a 2864 SEQ or SEQs...(d │ │ │ +00001110: 6566 616c 6961 7320 2765 7665 7279 2023 efalias 'every # │ │ │ +00001120: 5b28 636c 2d70 7265 6420 636c 2d73 6571 [(cl-pred cl-seq │ │ │ +00001130: 2026 7265 7374 2063 6c2d 7265 7374 2920 &rest cl-rest) │ │ │ +00001140: 2209 ac84 5c6e 3cac 84c3 c48d 875c 6eab "...\n<......\n. │ │ │ +00001150: 8c08 5c6e 4021 ab86 5c6e 4189 12ac 745c ..\n@!..\nA...t\ │ │ │ +00001160: 6e3f 8722 205b 636c 2d70 7265 6420 636c n?." [cl-pred cl │ │ │ +00001170: 2d72 6573 7420 636c 2d73 6571 2063 6c2d -rest cl-seq cl- │ │ │ +00001180: 6576 6572 7920 2862 7974 652d 636f 6465 every (byte-code │ │ │ +00001190: 2022 c2c3 c4c5 0908 2588 c687 2220 5b63 "......%..." [c │ │ │ +000011a0: 6c2d 7265 7374 2063 6c2d 7365 7120 6170 l-rest cl-seq ap │ │ │ +000011b0: 706c 7920 6d61 7020 6e69 6c20 235b 2826 ply map nil #[(& │ │ │ +000011c0: 7265 7374 2063 6c2d 7829 2022 c209 085c rest cl-x) "...\ │ │ │ +000011d0: 22ae 84c3 c4c5 5c22 8722 205b 636c 2d78 ".....\"." [cl-x │ │ │ +000011e0: 2063 6c2d 7072 6564 2061 7070 6c79 2074 cl-pred apply t │ │ │ +000011f0: 6872 6f77 2063 6c2d 6576 6572 7920 6e69 hrow cl-every ni │ │ │ +00001200: 6c5d 2033 5d20 745d 2036 295d 2033 2028 l] 3] t] 6)] 3 ( │ │ │ +00001210: 2324 202e 2034 3239 3929 5d29 0a23 4036 #$ . 4299)]).#@6 │ │ │ +00001220: 3820 5265 7475 726e 2074 7275 6520 6966 8 Return true if │ │ │ +00001230: 2050 5245 4449 4341 5445 2069 7320 6661 PREDICATE is fa │ │ │ +00001240: 6c73 6520 6f66 2065 7665 7279 2065 6c65 lse of every ele │ │ │ +00001250: 6d65 6e74 206f 6620 5345 5120 6f72 2053 ment of SEQ or S │ │ │ +00001260: 4551 732e 1f0a 2864 6566 616c 6961 7320 EQs...(defalias │ │ │ +00001270: 276e 6f74 616e 7920 235b 2863 6c2d 7072 'notany #[(cl-pr │ │ │ +00001280: 6564 2063 6c2d 7365 7120 2672 6573 7420 ed cl-seq &rest │ │ │ +00001290: 636c 2d72 6573 7429 2022 c3c4 5c6e 0908 cl-rest) "..\n.. │ │ │ +000012a0: 243f 8722 205b 636c 2d72 6573 7420 636c $?." [cl-rest cl │ │ │ +000012b0: 2d73 6571 2063 6c2d 7072 6564 2061 7070 -seq cl-pred app │ │ │ +000012c0: 6c79 2073 6f6d 655d 2035 2028 2324 202e ly some] 5 (#$ . │ │ │ +000012d0: 2034 3634 3229 5d29 0a23 4036 3720 5265 4642)]).#@67 Re │ │ │ +000012e0: 7475 726e 2074 7275 6520 6966 2050 5245 turn true if PRE │ │ │ +000012f0: 4449 4341 5445 2069 7320 6661 6c73 6520 DICATE is false │ │ │ +00001300: 6f66 2073 6f6d 6520 656c 656d 656e 7420 of some element │ │ │ +00001310: 6f66 2053 4551 206f 7220 5345 5173 2e1f of SEQ or SEQs.. │ │ │ +00001320: 0a28 6465 6661 6c69 6173 2027 6e6f 7465 .(defalias 'note │ │ │ +00001330: 7665 7279 2023 5b28 636c 2d70 7265 6420 very #[(cl-pred │ │ │ +00001340: 636c 2d73 6571 2026 7265 7374 2063 6c2d cl-seq &rest cl- │ │ │ +00001350: 7265 7374 2920 22c3 c45c 6e09 0824 3f87 rest) "..\n..$?. │ │ │ +00001360: 2220 5b63 6c2d 7265 7374 2063 6c2d 7365 " [cl-rest cl-se │ │ │ +00001370: 7120 636c 2d70 7265 6420 6170 706c 7920 q cl-pred apply │ │ │ +00001380: 6576 6572 795d 2035 2028 2324 202e 2034 every] 5 (#$ . 4 │ │ │ +00001390: 3833 3029 5d29 0a28 6465 6661 6c69 6173 830)]).(defalias │ │ │ +000013a0: 2027 636c 2d6d 6170 2d6b 6579 6d61 7020 'cl-map-keymap │ │ │ +000013b0: 235b 2863 6c2d 6675 6e63 2063 6c2d 6d61 #[(cl-func cl-ma │ │ │ +000013c0: 7029 2022 0b39 ab86 0b4b 8913 aa77 08c5 p) ".9...K...w.. │ │ │ +000013d0: 61ab 85c6 090b 5c22 870b 3cab b40b 1c0c a.....\"..<..... │ │ │ +000013e0: 4189 143a ada9 0c40 3aab 8b09 0c40 400c A..:...@:....@@. │ │ │ +000013f0: 4041 5c22 88aa 69c7 0c40 21ab 88c8 090c @A\"..i..@!..... │ │ │ +00001400: 405c 2288 aa5b 0c40 c961 ab55 ca89 14aa @\"..[.@.a.U.... │ │ │ +00001410: 5129 87cb 1a5c 6e54 8912 0b47 57ad 8e0b Q)...\nT...GW... │ │ │ +00001420: 5c6e 48ab 7209 5c6e 0b5c 6e48 5c22 88aa \nH.r.\n.\nH\".. │ │ │ +00001430: 6929 8722 205b 636c 2d65 6d61 6373 2d74 i)." [cl-emacs-t │ │ │ +00001440: 7970 6520 636c 2d66 756e 6320 636c 2d69 ype cl-func cl-i │ │ │ +00001450: 2063 6c2d 6d61 7020 636c 2d70 206c 7563 cl-map cl-p luc │ │ │ +00001460: 6964 206d 6170 2d6b 6579 6d61 7020 7665 id map-keymap ve │ │ │ +00001470: 6374 6f72 7020 636c 2d6d 6170 2d6b 6579 ctorp cl-map-key │ │ │ +00001480: 6d61 7020 6b65 796d 6170 206e 696c 202d map keymap nil - │ │ │ +00001490: 315d 2035 5d29 0a28 6465 6661 6c69 6173 1] 5]).(defalias │ │ │ +000014a0: 2027 636c 2d6d 6170 2d6b 6579 6d61 702d 'cl-map-keymap- │ │ │ +000014b0: 7265 6375 7273 6976 656c 7920 235b 2863 recursively #[(c │ │ │ +000014c0: 6c2d 6675 6e63 2d72 6563 2063 6c2d 6d61 l-func-rec cl-ma │ │ │ +000014d0: 7020 266f 7074 696f 6e61 6c20 636c 2d62 p &optional cl-b │ │ │ +000014e0: 6173 6529 2022 5c6e ac8c c309 c461 ab83 ase) "\n.....a.. │ │ │ +000014f0: c5aa 81c6 2112 c7c8 085c 2287 2220 5b63 ....!....\"." [c │ │ │ +00001500: 6c2d 6d61 7020 636c 2d65 6d61 6373 2d74 l-map cl-emacs-t │ │ │ +00001510: 7970 6520 636c 2d62 6173 6520 636f 7079 ype cl-base copy │ │ │ +00001520: 2d73 6571 7565 6e63 6520 3138 2022 3022 -sequence 18 "0" │ │ │ +00001530: 205b 305d 2063 6c2d 6d61 702d 6b65 796d [0] cl-map-keym │ │ │ +00001540: 6170 2023 5b28 636c 2d6b 6579 2063 6c2d ap #[(cl-key cl- │ │ │ +00001550: 6269 6e64 2920 220c 8947 5309 4988 c50b bind) "..GS.I... │ │ │ +00001560: 21ab 92c6 5c6e 0b08 c761 ab83 c8aa 81c9 !...\n...a...... │ │ │ +00001570: 0cca 435c 2223 875c 6e0c 0b5c 2287 2220 ..C\"#.\n..\"." │ │ │ +00001580: 5b63 6c2d 656d 6163 732d 7479 7065 2063 [cl-emacs-type c │ │ │ +00001590: 6c2d 6b65 7920 636c 2d66 756e 632d 7265 l-key cl-func-re │ │ │ +000015a0: 6320 636c 2d62 696e 6420 636c 2d62 6173 c cl-bind cl-bas │ │ │ +000015b0: 6520 6b65 796d 6170 7020 636c 2d6d 6170 e keymapp cl-map │ │ │ +000015c0: 2d6b 6579 6d61 702d 7265 6375 7273 6976 -keymap-recursiv │ │ │ +000015d0: 656c 7920 3138 2063 6f6e 6361 7420 7663 ely 18 concat vc │ │ │ +000015e0: 6f6e 6361 7420 305d 2036 5d5d 2033 5d29 oncat 0] 6]] 3]) │ │ │ +000015f0: 0a28 6465 6661 6c69 6173 2027 636c 2d6d .(defalias 'cl-m │ │ │ +00001600: 6170 2d69 6e74 6572 7661 6c73 2023 5b28 ap-intervals #[( │ │ │ +00001610: 636c 2d66 756e 6320 266f 7074 696f 6e61 cl-func &optiona │ │ │ +00001620: 6c20 636c 2d77 6861 7420 636c 2d70 726f l cl-what cl-pro │ │ │ +00001630: 7020 636c 2d73 7461 7274 2063 6c2d 656e p cl-start cl-en │ │ │ +00001640: 6429 2022 0dac 8270 15c6 0d21 abf0 c789 d) "...p...!.... │ │ │ +00001650: c8c7 1e0f 181c 1b8a 0d71 88c9 5c6e ae81 .........q..\n.. │ │ │ +00001660: 6521 1309 ad83 c909 2114 2908 abc3 0cab e!......!.)..... │ │ │ +00001670: 850b 0c57 abbb cacb 21ad 900e 10ab 88cc ...W....!....... │ │ │ +00001680: 0b0e 100d 23aa 84cb 0b0d 5c22 8910 ae86 ....#.....\".... │ │ │ +00001690: 8a0d 7188 6429 160f 0e11 cd0b 210b 0e0f ..q.d)......!... │ │ │ +000016a0: c793 880c ab86 0e0f 0c5e aa82 0e0f 5c22 .........^....\" │ │ │ +000016b0: 88aa 3a0b c789 9388 0cad 840c c789 932c ..:............, │ │ │ +000016c0: 875c 6eac 82ce 1209 ac83 0d47 115c 6e09 .\n........G.\n. │ │ │ +000016d0: 57ad a6ca cb21 ab92 0e10 ab88 cc5c 6e0e W....!.......\n. │ │ │ +000016e0: 100d 23aa 84cb 5c6e 0d5c 22ae 8109 180e ..#...\n.\"..... │ │ │ +000016f0: 115c 6e08 095e 5c22 8808 1229 aa55 8722 .\n..^\"...).U." │ │ │ +00001700: 205b 636c 2d6e 6578 7420 636c 2d65 6e64 [cl-next cl-end │ │ │ +00001710: 2063 6c2d 7374 6172 7420 636c 2d6d 6172 cl-start cl-mar │ │ │ +00001720: 6b20 636c 2d6d 6172 6b32 2063 6c2d 7768 k cl-mark2 cl-wh │ │ │ +00001730: 6174 2062 7566 6665 7270 206e 696c 2074 at bufferp nil t │ │ │ +00001740: 2063 6f70 792d 6d61 726b 6572 2066 626f copy-marker fbo │ │ │ +00001750: 756e 6470 206e 6578 742d 7072 6f70 6572 undp next-proper │ │ │ +00001760: 7479 2d63 6861 6e67 6520 6e65 7874 2d73 ty-change next-s │ │ │ +00001770: 696e 676c 652d 7072 6f70 6572 7479 2d63 ingle-property-c │ │ │ +00001780: 6861 6e67 6520 6d61 726b 6572 2d70 6f73 hange marker-pos │ │ │ +00001790: 6974 696f 6e20 3020 636c 2d6e 6578 7432 ition 0 cl-next2 │ │ │ +000017a0: 2063 6c2d 7072 6f70 2063 6c2d 6675 6e63 cl-prop cl-func │ │ │ +000017b0: 5d20 365d 290a 2864 6566 616c 6961 7320 ] 6]).(defalias │ │ │ +000017c0: 2763 6c2d 6d61 702d 6f76 6572 6c61 7973 'cl-map-overlays │ │ │ +000017d0: 2023 5b28 636c 2d66 756e 6320 266f 7074 #[(cl-func &opt │ │ │ +000017e0: 696f 6e61 6c20 636c 2d62 7566 6665 7220 ional cl-buffer │ │ │ +000017f0: 636c 2d73 7461 7274 2063 6c2d 656e 6420 cl-start cl-end │ │ │ +00001800: 636c 2d61 7267 2920 225c 6eac 8270 12c6 cl-arg) "\n..p.. │ │ │ +00001810: c721 abdd c81d 8a5c 6e71 88c7 2015 0bab .!.....\nq.. ... │ │ │ +00001820: 84c9 0b21 130c ab84 c90c 2114 290d 400d ...!......!.).@. │ │ │ +00001830: 41a4 8915 abab ca0d 4021 ab9f 0cab 88ca A.......@!...... │ │ │ +00001840: 0d40 210c 59ac 940b ab88 cb0d 4021 0b58 .@!.Y.......@!.X │ │ │ +00001850: ac89 0e10 0d40 0e11 5c22 ac86 0d41 8915 .....@..\"...A.. │ │ │ +00001860: ac55 0bab 850b c889 9388 0cad 840c c889 .U.............. │ │ │ +00001870: 9329 878a 5c6e 7188 c90b ae81 6521 290c .)..\nq.....e!). │ │ │ +00001880: ad88 8a5c 6e71 88c9 0c21 29c8 891d 191e ...\nq...!)..... │ │ │ +00001890: 0f18 8acc 0821 8911 ad96 090e 0fae 8164 .....!.........d │ │ │ +000018a0: 57ad 8d5c 6e71 88cd 0921 1508 ce09 21c8 W..\nq...!....!. │ │ │ +000018b0: 9329 aba2 0dab 5c5c ca0d 4021 0955 ab8f .)....\\..@!.U.. │ │ │ +000018c0: 0e10 0d40 0e11 5c22 ab86 08c8 8993 ac45 ...@..\".......E │ │ │ +000018d0: 0d41 8915 ac63 aa3d 08c8 8993 880e 0fad .A...c.=........ │ │ │ +000018e0: 850e 0fc8 8993 2c87 2220 5b63 6c2d 6d61 ......,." [cl-ma │ │ │ +000018f0: 726b 2063 6c2d 706f 7320 636c 2d62 7566 rk cl-pos cl-buf │ │ │ +00001900: 6665 7220 636c 2d73 7461 7274 2063 6c2d fer cl-start cl- │ │ │ +00001910: 656e 6420 636c 2d6f 766c 2066 626f 756e end cl-ovl fboun │ │ │ +00001920: 6470 206f 7665 726c 6179 2d6c 6973 7473 dp overlay-lists │ │ │ +00001930: 206e 696c 2063 6f70 792d 6d61 726b 6572 nil copy-marker │ │ │ +00001940: 206f 7665 726c 6179 2d73 7461 7274 206f overlay-start o │ │ │ +00001950: 7665 726c 6179 2d65 6e64 206d 6172 6b65 verlay-end marke │ │ │ +00001960: 722d 706f 7369 7469 6f6e 206f 7665 726c r-position overl │ │ │ +00001970: 6179 732d 6174 206e 6578 742d 6f76 6572 ays-at next-over │ │ │ +00001980: 6c61 792d 6368 616e 6765 2063 6c2d 6d61 lay-change cl-ma │ │ │ +00001990: 726b 3220 636c 2d66 756e 6320 636c 2d61 rk2 cl-func cl-a │ │ │ +000019a0: 7267 5d20 355d 290a 2864 6566 616c 6961 rg] 5]).(defalia │ │ │ +000019b0: 7320 2763 6c2d 7365 742d 6672 616d 652d s 'cl-set-frame- │ │ │ +000019c0: 7669 7369 626c 652d 7020 235b 2866 7261 visible-p #[(fra │ │ │ +000019d0: 6d65 2076 616c 2920 2209 ac86 c208 2188 me val) ".....!. │ │ │ +000019e0: aa8f 09c3 61ab 86c4 0821 88aa 84c5 0821 ....a....!.....! │ │ │ +000019f0: 8809 8722 205b 6672 616d 6520 7661 6c20 ..." [frame val │ │ │ +00001a00: 6d61 6b65 2d66 7261 6d65 2d69 6e76 6973 make-frame-invis │ │ │ +00001a10: 6962 6c65 2069 636f 6e20 6963 6f6e 6966 ible icon iconif │ │ │ +00001a20: 792d 6672 616d 6520 6d61 6b65 2d66 7261 y-frame make-fra │ │ │ +00001a30: 6d65 2d76 6973 6962 6c65 5d20 325d 290a me-visible] 2]). │ │ │ +00001a40: 2864 6566 616c 6961 7320 2763 6c2d 7072 (defalias 'cl-pr │ │ │ +00001a50: 6f67 762d 6265 666f 7265 2023 5b28 7379 ogv-before #[(sy │ │ │ +00001a60: 6d73 2076 616c 7565 7329 2022 5c6e adae ms values) "\n.. │ │ │ +00001a70: c35c 6e40 21ab 885c 6e40 5c6e 404a 42aa .\n@!..\n@\n@JB. │ │ │ +00001a80: 825c 6e40 0842 1009 ab8e 5c6e 8941 1240 .\n@.B....\n.A.@ │ │ │ +00001a90: 0989 4111 404c 88aa 59c4 5c6e 8941 1240 ..A.@L..Y.\n.A.@ │ │ │ +00001aa0: 2188 aa4f 8722 205b 636c 2d70 726f 6776 !..O." [cl-progv │ │ │ +00001ab0: 2d73 6176 6520 7661 6c75 6573 2073 796d -save values sym │ │ │ +00001ac0: 7320 626f 756e 6470 206d 616b 756e 626f s boundp makunbo │ │ │ +00001ad0: 756e 645d 2033 5d29 0a28 6465 6661 6c69 und] 3]).(defali │ │ │ +00001ae0: 6173 2027 636c 2d70 726f 6776 2d61 6674 as 'cl-progv-aft │ │ │ +00001af0: 6572 2023 5b6e 696c 2022 08ad 9b08 403a er #[nil "....@: │ │ │ +00001b00: ab8a 0840 4008 4041 4c88 aa85 c108 4021 ...@@.@AL.....@! │ │ │ +00001b10: 8808 8941 1088 aa62 8722 205b 636c 2d70 ...A...b." [cl-p │ │ │ +00001b20: 726f 6776 2d73 6176 6520 6d61 6b75 6e62 rogv-save makunb │ │ │ +00001b30: 6f75 6e64 5d20 325d 290a 2340 3534 2052 ound] 2]).#@54 R │ │ │ +00001b40: 6574 7572 6e20 7468 6520 6772 6561 7465 eturn the greate │ │ │ +00001b50: 7374 2063 6f6d 6d6f 6e20 6469 7669 736f st common diviso │ │ │ +00001b60: 7220 6f66 2074 6865 2061 7267 756d 656e r of the argumen │ │ │ +00001b70: 7473 2e1f 0a28 6465 6661 6c69 6173 2027 ts...(defalias ' │ │ │ +00001b80: 6763 6420 235b 2826 7265 7374 2061 7267 gcd #[(&rest arg │ │ │ +00001b90: 7329 2022 c35c 6e89 4112 40ae 81c4 2119 s) ".\n.A.@...!. │ │ │ +00001ba0: 5c6e ab99 c35c 6e89 4112 4021 8918 c456 \n...\n.A.@!...V │ │ │ +00001bb0: ab89 0908 8911 a689 10aa 7329 aa64 0929 ..........s).d.) │ │ │ +00001bc0: 8722 205b 6220 6120 6172 6773 2061 6273 ." [b a args abs │ │ │ +00001bd0: 2030 5d20 3420 2823 2420 2e20 3639 3735 0] 4 (#$ . 6975 │ │ │ +00001be0: 295d 290a 2340 3532 2052 6574 7572 6e20 )]).#@52 Return │ │ │ +00001bf0: 7468 6520 6c65 6173 7420 636f 6d6d 6f6e the least common │ │ │ +00001c00: 206d 756c 7469 706c 6520 6f66 2074 6865 multiple of the │ │ │ +00001c10: 2061 7267 756d 656e 7473 2e1f 0a28 6465 arguments...(de │ │ │ +00001c20: 6661 6c69 6173 2027 6c63 6d20 235b 2826 falias 'lcm #[(& │ │ │ +00001c30: 7265 7374 2061 7267 7329 2022 c35c 6e73 rest args) ".\ns │ │ │ +00001c40: ab82 c387 c45c 6e89 4112 40ae 81c5 2119 .....\n.A.@...!. │ │ │ +00001c50: 5c6e ab94 c45c 6e89 4112 4021 1809 c609 \n...\n.A.@!.... │ │ │ +00001c60: 085c 22a5 085f 1129 aa69 0929 8722 205b .\".._.).i.)." [ │ │ │ +00001c70: 6220 6120 6172 6773 2030 2061 6273 2031 b a args 0 abs 1 │ │ │ +00001c80: 2067 6364 5d20 3420 2823 2420 2e20 3731 gcd] 4 (#$ . 71 │ │ │ +00001c90: 3435 295d 290a 2340 3439 2052 6574 7572 45)]).#@49 Retur │ │ │ +00001ca0: 6e20 7468 6520 696e 7465 6765 7220 7371 n the integer sq │ │ │ +00001cb0: 7561 7265 2072 6f6f 7420 6f66 2074 6865 uare root of the │ │ │ +00001cc0: 2061 7267 756d 656e 742e 1f0a 2864 6566 argument...(def │ │ │ +00001cd0: 616c 6961 7320 2769 7371 7274 2023 5b28 alias 'isqrt #[( │ │ │ +00001ce0: 6129 2022 5c6e a8ab b65c 6ec3 56ab b15c a) "\n...\n.V..\ │ │ │ +00001cf0: 6ec4 59ab 83c5 aa91 5c6e c559 ab83 c6aa n.Y.....\n.Y.... │ │ │ +00001d00: 895c 6ec7 59ab 83c7 aa81 c8c9 1889 195c .\n.Y..........\ │ │ │ +00001d10: 6e09 a55c 5cca a589 1009 57ab 8508 8911 n..\\.....W..... │ │ │ +00001d20: aa6f 092a 875c 6ec3 61ab 82c3 87cb ccc9 .o.*.\n.a....... │ │ │ +00001d30: 5c22 8722 205b 6732 2067 2061 2030 2031 \"." [g2 g a 0 1 │ │ │ +00001d40: 3030 3030 3030 2031 3030 3030 2031 3030 000000 10000 100 │ │ │ +00001d50: 3020 3130 3020 3130 206e 696c 2032 2073 0 100 10 nil 2 s │ │ │ +00001d60: 6967 6e61 6c20 6172 6974 682d 6572 726f ignal arith-erro │ │ │ +00001d70: 725d 2034 2028 2324 202e 2037 3332 3329 r] 4 (#$ . 7323) │ │ │ +00001d80: 5d29 0a23 4037 3120 5265 7475 726e 2058 ]).#@71 Return X │ │ │ +00001d90: 2072 6169 7365 6420 746f 2074 6865 2070 raised to the p │ │ │ +00001da0: 6f77 6572 206f 6620 592e 2020 576f 726b ower of Y. Work │ │ │ +00001db0: 7320 6f6e 6c79 2066 6f72 2069 6e74 6567 s only for integ │ │ │ +00001dc0: 6572 2061 7267 756d 656e 7473 2e1f 0a28 er arguments...( │ │ │ +00001dd0: 6465 6661 6c69 6173 2027 636c 2d65 7870 defalias 'cl-exp │ │ │ +00001de0: 7420 235b 2878 2079 2920 2209 c258 ab94 t #[(x y) "..X.. │ │ │ +00001df0: 09c2 55ab 82c3 8708 c473 ab86 c508 095b ..U......s.....[ │ │ │ +00001e00: 5c22 87c2 8709 c6a6 c255 ab83 c3aa 8108 \".......U...... │ │ │ +00001e10: c508 895f 09c6 a55c 225f 8722 205b 7820 ..._...\"_." [x │ │ │ +00001e20: 7920 3020 3120 282d 3120 3129 2063 6c2d y 0 1 (-1 1) cl- │ │ │ +00001e30: 6578 7074 2032 5d20 3520 2823 2420 2e20 expt 2] 5 (#$ . │ │ │ +00001e40: 3735 3630 295d 290a 2862 7974 652d 636f 7560)]).(byte-co │ │ │ +00001e50: 6465 2022 c0c1 21ab 86c2 c14b 21ac 85c3 de "..!....K!... │ │ │ +00001e60: c1c4 5c22 88c0 8722 205b 6662 6f75 6e64 ..\"..." [fbound │ │ │ +00001e70: 7020 6578 7074 2073 7562 7270 2064 6566 p expt subrp def │ │ │ +00001e80: 616c 6961 7320 636c 2d65 7870 745d 2033 alias cl-expt] 3 │ │ │ +00001e90: 290a 2340 3132 3920 5265 7475 726e 2061 ).#@129 Return a │ │ │ +00001ea0: 206c 6973 7420 6f66 2074 6865 2066 6c6f list of the flo │ │ │ +00001eb0: 6f72 206f 6620 5820 616e 6420 7468 6520 or of X and the │ │ │ +00001ec0: 6672 6163 7469 6f6e 616c 2070 6172 7420 fractional part │ │ │ +00001ed0: 6f66 2058 2e0a 5769 7468 2074 776f 2061 of X..With two a │ │ │ +00001ee0: 7267 756d 656e 7473 2c20 7265 7475 726e rguments, return │ │ │ +00001ef0: 2066 6c6f 6f72 2061 6e64 2072 656d 6169 floor and remai │ │ │ +00001f00: 6e64 6572 206f 6620 7468 6569 7220 7175 nder of their qu │ │ │ +00001f10: 6f74 6965 6e74 2e1f 0a28 6465 6661 6c69 otient...(defali │ │ │ +00001f20: 6173 2027 666c 6f6f 722a 2023 5b28 7820 as 'floor* #[(x │ │ │ +00001f30: 266f 7074 696f 6e61 6c20 7929 2022 c308 &optional y) ".. │ │ │ +00001f40: 5c6e 5c22 8919 085c 6eab 855c 6e09 5faa \n\"...\n..\n._. │ │ │ +00001f50: 8109 5a29 4487 2220 5b78 2071 2079 2066 ..Z)D." [x q y f │ │ │ +00001f60: 6c6f 6f72 5d20 3520 2823 2420 2e20 3738 loor] 5 (#$ . 78 │ │ │ +00001f70: 3332 295d 290a 2340 3133 3320 5265 7475 32)]).#@133 Retu │ │ │ +00001f80: 726e 2061 206c 6973 7420 6f66 2074 6865 rn a list of the │ │ │ +00001f90: 2063 6569 6c69 6e67 206f 6620 5820 616e ceiling of X an │ │ │ +00001fa0: 6420 7468 6520 6672 6163 7469 6f6e 616c d the fractional │ │ │ +00001fb0: 2070 6172 7420 6f66 2058 2e0a 5769 7468 part of X..With │ │ │ +00001fc0: 2074 776f 2061 7267 756d 656e 7473 2c20 two arguments, │ │ │ +00001fd0: 7265 7475 726e 2063 6569 6c69 6e67 2061 return ceiling a │ │ │ +00001fe0: 6e64 2072 656d 6169 6e64 6572 206f 6620 nd remainder of │ │ │ +00001ff0: 7468 6569 7220 7175 6f74 6965 6e74 2e1f their quotient.. │ │ │ +00002000: 0a28 6465 6661 6c69 6173 2027 6365 696c .(defalias 'ceil │ │ │ +00002010: 696e 672a 2023 5b28 7820 266f 7074 696f ing* #[(x &optio │ │ │ +00002020: 6e61 6c20 7929 2022 c308 095c 2289 1a41 nal y) "...\"..A │ │ │ +00002030: 40c4 55ab 835c 6eaa 8c5c 6e40 545c 6e41 @.U..\n..\n@T\nA │ │ │ +00002040: 4009 ae81 c55a 4429 8722 205b 7820 7920 @....ZD)." [x y │ │ │ +00002050: 7265 7320 666c 6f6f 722a 2030 2031 5d20 res floor* 0 1] │ │ │ +00002060: 3420 2823 2420 2e20 3830 3630 295d 290a 4 (#$ . 8060)]). │ │ │ +00002070: 2340 3134 3120 5265 7475 726e 2061 206c #@141 Return a l │ │ │ +00002080: 6973 7420 6f66 2074 6865 2069 6e74 6567 ist of the integ │ │ │ +00002090: 6572 2070 6172 7420 6f66 2058 2061 6e64 er part of X and │ │ │ +000020a0: 2074 6865 2066 7261 6374 696f 6e61 6c20 the fractional │ │ │ +000020b0: 7061 7274 206f 6620 582e 0a57 6974 6820 part of X..With │ │ │ +000020c0: 7477 6f20 6172 6775 6d65 6e74 732c 2072 two arguments, r │ │ │ +000020d0: 6574 7572 6e20 7472 756e 6361 7469 6f6e eturn truncation │ │ │ +000020e0: 2061 6e64 2072 656d 6169 6e64 6572 206f and remainder o │ │ │ +000020f0: 6620 7468 6569 7220 7175 6f74 6965 6e74 f their quotient │ │ │ +00002100: 2e1f 0a28 6465 6661 6c69 6173 2027 7472 ...(defalias 'tr │ │ │ +00002110: 756e 6361 7465 2a20 235b 2878 2026 6f70 uncate* #[(x &op │ │ │ +00002120: 7469 6f6e 616c 2079 2920 2208 c259 093f tional y) "..Y.? │ │ │ +00002130: ae83 09c2 5961 ab85 c308 095c 2287 c408 ....Ya.....\"... │ │ │ +00002140: 095c 2287 2220 5b78 2079 2030 2066 6c6f .\"." [x y 0 flo │ │ │ +00002150: 6f72 2a20 6365 696c 696e 672a 5d20 3320 or* ceiling*] 3 │ │ │ +00002160: 2823 2420 2e20 3833 3130 295d 290a 2340 (#$ . 8310)]).#@ │ │ │ +00002170: 3133 3920 5265 7475 726e 2061 206c 6973 139 Return a lis │ │ │ +00002180: 7420 6f66 2058 2072 6f75 6e64 6564 2074 t of X rounded t │ │ │ +00002190: 6f20 7468 6520 6e65 6172 6573 7420 696e o the nearest in │ │ │ +000021a0: 7465 6765 7220 616e 6420 7468 6520 7265 teger and the re │ │ │ +000021b0: 6d61 696e 6465 722e 0a57 6974 6820 7477 mainder..With tw │ │ │ +000021c0: 6f20 6172 6775 6d65 6e74 732c 2072 6574 o arguments, ret │ │ │ +000021d0: 7572 6e20 726f 756e 6469 6e67 2061 6e64 urn rounding and │ │ │ +000021e0: 2072 656d 6169 6e64 6572 206f 6620 7468 remainder of th │ │ │ +000021f0: 6569 7220 7175 6f74 6965 6e74 2e1f 0a28 eir quotient...( │ │ │ +00002200: 6465 6661 6c69 6173 2027 726f 756e 642a defalias 'round* │ │ │ +00002210: 2023 5b28 7820 266f 7074 696f 6e61 6c20 #[(x &optional │ │ │ +00002220: 7929 2022 0bab c90c a8ab b60b a8ab b20b y) "............ │ │ │ +00002230: c5a5 1ac6 0c5c 6e5c 5c0b 5c22 8919 4140 .....\n\\.\"..A@ │ │ │ +00002240: c755 ab96 5c6e 895c 5c0b 55ab 8f09 40c5 .U..\n.\\.U...@. │ │ │ +00002250: a6c7 55ac 8709 4053 5c6e 44aa 8809 4009 ..U...@S\nD...@. │ │ │ +00002260: 4140 5c6e 5a44 2a87 c80c 0ba5 2189 180c A@\nZD*.....!... │ │ │ +00002270: 080b 5f5a 2944 870c a8ab 840c c744 87c8 .._Z)D.......D.. │ │ │ +00002280: 0c21 8918 0c08 5a29 4487 2220 5b71 2072 .!....Z)D." [q r │ │ │ +00002290: 6573 2068 7920 7920 7820 3220 666c 6f6f es hy y x 2 floo │ │ │ +000022a0: 722a 2030 2072 6f75 6e64 5d20 3520 2823 r* 0 round] 5 (# │ │ │ +000022b0: 2420 2e20 3835 3634 295d 290a 2340 3539 $ . 8564)]).#@59 │ │ │ +000022c0: 2054 6865 2072 656d 6169 6e64 6572 206f The remainder o │ │ │ +000022d0: 6620 5820 6469 7669 6465 6420 6279 2059 f X divided by Y │ │ │ +000022e0: 2c20 7769 7468 2074 6865 2073 616d 6520 , with the same │ │ │ +000022f0: 7369 676e 2061 7320 592e 1f0a 2864 6566 sign as Y...(def │ │ │ +00002300: 616c 6961 7320 276d 6f64 2a20 235b 2878 alias 'mod* #[(x │ │ │ +00002310: 2079 2920 22c2 0908 5c22 4140 8722 205b y) "...\"A@." [ │ │ │ +00002320: 7920 7820 666c 6f6f 722a 5d20 3320 2823 y x floor*] 3 (# │ │ │ +00002330: 2420 2e20 3838 3937 295d 290a 2340 3539 $ . 8897)]).#@59 │ │ │ +00002340: 2054 6865 2072 656d 6169 6e64 6572 206f The remainder o │ │ │ +00002350: 6620 5820 6469 7669 6465 6420 6279 2059 f X divided by Y │ │ │ +00002360: 2c20 7769 7468 2074 6865 2073 616d 6520 , with the same │ │ │ +00002370: 7369 676e 2061 7320 582e 1f0a 2864 6566 sign as X...(def │ │ │ +00002380: 616c 6961 7320 2772 656d 2a20 235b 2878 alias 'rem* #[(x │ │ │ +00002390: 2079 2920 22c2 0908 5c22 4140 8722 205b y) "...\"A@." [ │ │ │ +000023a0: 7920 7820 7472 756e 6361 7465 2a5d 2033 y x truncate*] 3 │ │ │ +000023b0: 2028 2324 202e 2039 3032 3529 5d29 0a23 (#$ . 9025)]).# │ │ │ +000023c0: 4035 3520 5265 7475 726e 2031 2069 6620 @55 Return 1 if │ │ │ +000023d0: 4120 6973 2070 6f73 6974 6976 652c 202d A is positive, - │ │ │ +000023e0: 3120 6966 206e 6567 6174 6976 652c 2030 1 if negative, 0 │ │ │ +000023f0: 2069 6620 7a65 726f 2e1f 0a28 6465 6661 if zero...(defa │ │ │ +00002400: 6c69 6173 2027 7369 676e 756d 2023 5b28 lias 'signum #[( │ │ │ +00002410: 6129 2022 08c1 56ab 82c2 8708 c157 ab82 a) "..V......W.. │ │ │ +00002420: c387 c187 2220 5b61 2030 2031 202d 315d ...." [a 0 1 -1] │ │ │ +00002430: 2032 2028 2324 202e 2039 3135 3629 5d29 2 (#$ . 9156)]) │ │ │ +00002440: 0a23 4031 3234 2052 6574 7572 6e20 6120 .#@124 Return a │ │ │ +00002450: 7261 6e64 6f6d 206e 6f6e 6e65 6761 7469 random nonnegati │ │ │ +00002460: 7665 206e 756d 6265 7220 6c65 7373 2074 ve number less t │ │ │ +00002470: 6861 6e20 4c49 4d2c 2061 6e20 696e 7465 han LIM, an inte │ │ │ +00002480: 6765 7220 6f72 2066 6c6f 6174 2e0a 4f70 ger or float..Op │ │ │ +00002490: 7469 6f6e 616c 2073 6563 6f6e 6420 6172 tional second ar │ │ │ +000024a0: 6720 5354 4154 4520 6973 2061 2072 616e g STATE is a ran │ │ │ +000024b0: 646f 6d2d 7374 6174 6520 6f62 6a65 6374 dom-state object │ │ │ +000024c0: 2e1f 0a28 6465 6661 6c69 6173 2027 7261 ...(defalias 'ra │ │ │ +000024d0: 6e64 6f6d 2a20 235b 286c 696d 2026 6f70 ndom* #[(lim &op │ │ │ +000024e0: 7469 6f6e 616c 2073 7461 7465 2920 220d tional state) ". │ │ │ +000024f0: ac83 0e1c 150d c648 891b a8ab c7c7 c8c9 .......H........ │ │ │ +00002500: 0b21 caa6 5acb 1e1a 181c 0dc6 cccd ce5c .!..Z..........\ │ │ │ +00002510: 2289 1349 880b c708 4988 0ccf 5c5c cda6 "..I....I...\\.. │ │ │ +00002520: 8914 c756 ab90 0b0c 0e1a 080e 1a5a 161a ...V.........Z.. │ │ │ +00002530: 8910 4988 aa65 0c54 8914 d057 ab87 d1d2 ..I..e.T...W.... │ │ │ +00002540: 0d5c 2288 aa71 2b0d cb0d cb48 54cd a649 .\"..q+....HT..I │ │ │ +00002550: 1c0d d20d d248 54cd a649 18d3 0b0c 0b0c .....HT..I...... │ │ │ +00002560: 480b 0848 5a49 d45c 221a 09a8 abc1 09d5 H..HZI.\"....... │ │ │ +00002570: 58ab 855c 6e09 a6aa bc09 d456 ab8a d65c X..\n......V...\ │ │ │ +00002580: 6ed7 5c22 d1d5 0d5c 225c 5c12 d889 1e1b n.\"...\"\\..... │ │ │ +00002590: 0953 57ab 8a0e 1b89 5c5c 5489 161b aa71 .SW.....\\T....q │ │ │ +000025a0: d35c 6e0e 1b5c 2289 1209 57ab 835c 6eaa .\n..\"...W..\n. │ │ │ +000025b0: 84d1 090d 5c22 29aa 855c 6ed9 a509 5f2c ....\")..\n..._, │ │ │ +000025c0: 8722 205b 6a20 6c69 6d20 6e20 7665 6320 ." [j lim n vec │ │ │ +000025d0: 6920 7374 6174 6520 3320 3020 3133 3537 i state 3 0 1357 │ │ │ +000025e0: 3333 3520 6162 7320 3133 3537 3333 3320 335 abs 1357333 │ │ │ +000025f0: 3120 6d61 6b65 2d76 6563 746f 7220 3535 1 make-vector 55 │ │ │ +00002600: 206e 696c 2032 3120 3230 3020 7261 6e64 nil 21 200 rand │ │ │ +00002610: 6f6d 2a20 3220 6c6f 6761 6e64 2038 3338 om* 2 logand 838 │ │ │ +00002620: 3836 3037 2035 3132 206c 7368 2039 2031 8607 512 lsh 9 1 │ │ │ +00002630: 3032 3320 3833 3838 3630 382e 3020 6b20 023 8388608.0 k │ │ │ +00002640: 6d61 736b 202a 7261 6e64 6f6d 2d73 7461 mask *random-sta │ │ │ +00002650: 7465 2a5d 2037 2028 2324 202e 2039 3238 te*] 7 (#$ . 928 │ │ │ +00002660: 3729 5d29 0a23 4031 3433 2052 6574 7572 7)]).#@143 Retur │ │ │ +00002670: 6e20 6120 636f 7079 206f 6620 7261 6e64 n a copy of rand │ │ │ +00002680: 6f6d 2d73 7461 7465 2053 5441 5445 2c20 om-state STATE, │ │ │ +00002690: 6f72 206f 6620 602a 7261 6e64 6f6d 2d73 or of `*random-s │ │ │ +000026a0: 7461 7465 2a27 2069 6620 6f6d 6974 7465 tate*' if omitte │ │ │ +000026b0: 642e 0a49 6620 5354 4154 4520 6973 2074 d..If STATE is t │ │ │ +000026c0: 2c20 7265 7475 726e 2061 206e 6577 2073 , return a new s │ │ │ +000026d0: 7461 7465 206f 626a 6563 7420 7365 6564 tate object seed │ │ │ +000026e0: 6564 2066 726f 6d20 7468 6520 7469 6d65 ed from the time │ │ │ +000026f0: 206f 6620 6461 792e 1f0a 2864 6566 616c of day...(defal │ │ │ +00002700: 6961 7320 276d 616b 652d 7261 6e64 6f6d ias 'make-random │ │ │ +00002710: 2d73 7461 7465 2023 5b28 266f 7074 696f -state #[(&optio │ │ │ +00002720: 6e61 6c20 7374 6174 6529 2022 09ac 84c2 nal state) ".... │ │ │ +00002730: 0821 87c3 0921 ab85 c409 c55c 2287 09a8 .!...!.....\"... │ │ │ +00002740: ab87 c6c7 c8c9 0924 87c2 ca20 2187 2220 .......$... !." │ │ │ +00002750: 5b2a 7261 6e64 6f6d 2d73 7461 7465 2a20 [*random-state* │ │ │ +00002760: 7374 6174 6520 6d61 6b65 2d72 616e 646f state make-rando │ │ │ +00002770: 6d2d 7374 6174 6520 7665 6374 6f72 7020 m-state vectorp │ │ │ +00002780: 636c 2d63 6f70 792d 7472 6565 2074 2076 cl-copy-tree t v │ │ │ +00002790: 6563 746f 7220 636c 2d72 616e 646f 6d2d ector cl-random- │ │ │ +000027a0: 7374 6174 652d 7461 6720 2d31 2033 3020 state-tag -1 30 │ │ │ +000027b0: 636c 2d72 616e 646f 6d2d 7469 6d65 5d20 cl-random-time] │ │ │ +000027c0: 3520 2823 2420 2e20 3938 3335 295d 290a 5 (#$ . 9835)]). │ │ │ +000027d0: 2340 3436 2052 6574 7572 6e20 7420 6966 #@46 Return t if │ │ │ +000027e0: 204f 424a 4543 5420 6973 2061 2072 616e OBJECT is a ran │ │ │ +000027f0: 646f 6d2d 7374 6174 6520 6f62 6a65 6374 dom-state object │ │ │ +00002800: 2e1f 0a28 6465 6661 6c69 6173 2027 7261 ...(defalias 'ra │ │ │ +00002810: 6e64 6f6d 2d73 7461 7465 2d70 2023 5b28 ndom-state-p #[( │ │ │ +00002820: 6f62 6a65 6374 2920 22c1 0821 ad8b 0847 object) "..!...G │ │ │ +00002830: c255 ad85 08c3 48c4 6187 2220 5b6f 626a .U....H.a." [obj │ │ │ +00002840: 6563 7420 7665 6374 6f72 7020 3420 3020 ect vectorp 4 0 │ │ │ +00002850: 636c 2d72 616e 646f 6d2d 7374 6174 652d cl-random-state- │ │ │ +00002860: 7461 675d 2032 2028 2324 202e 2031 3031 tag] 2 (#$ . 101 │ │ │ +00002870: 3937 295d 290a 2864 6566 616c 6961 7320 97)]).(defalias │ │ │ +00002880: 2763 6c2d 6669 6e69 7465 2d64 6f20 235b 'cl-finite-do #[ │ │ │ +00002890: 2866 756e 6320 6120 6229 2022 c0c1 c28f (func a b) ".... │ │ │ +000028a0: 8722 205b 6e69 6c20 2862 7974 652d 636f ." [nil (byte-co │ │ │ +000028b0: 6465 2022 5c6e 0908 5c22 891b a7ad 890b de "\n..\"...... │ │ │ +000028c0: 89c4 a555 3fad 810b 2987 2220 5b62 2061 ...U?...)." [b a │ │ │ +000028d0: 2066 756e 6320 7265 7320 325d 2034 2920 func res 2] 4) │ │ │ +000028e0: 2828 6172 6974 682d 6572 726f 7229 295d ((arith-error))] │ │ │ +000028f0: 2033 5d29 0a28 6465 6661 6c69 6173 2027 3]).(defalias ' │ │ │ +00002900: 636c 2d66 6c6f 6174 2d6c 696d 6974 7320 cl-float-limits │ │ │ +00002910: 235b 6e69 6c20 225c 6e84 c100 c6a7 83c1 #[nil "\n....... │ │ │ +00002920: 00c7 c889 1b1c 1dc9 ca0d 8923 ab86 0d89 ...........#.... │ │ │ +00002930: 5f15 aa73 c9ca 0d89 cba5 23ab 880d 89cb _..s......#..... │ │ │ +00002940: a55f 15aa 6fc9 cc0d 8923 ab86 0d89 5c5c ._..o....#....\\ │ │ │ +00002950: 15aa 730d 130d cba5 14c9 cc0d 0c23 ab91 ..s..........#.. │ │ │ +00002960: 0d0c 5c5c 0d55 ac8a 0d0c 5c5c 150c cba5 ..\\.U....\\.... │ │ │ +00002970: 14aa 680d 120d 5b11 0d0b a515 cd0b a514 ..h...[......... │ │ │ +00002980: 0d0c 5f15 c8ce cf8f ab8a 0dcb a515 0ccb .._............. │ │ │ +00002990: a514 aa70 0c10 0c5b 1619 d00b a589 1514 ...p...[........ │ │ │ +000029a0: c8d1 d28f ab86 0dcb a515 aa74 0d16 1a0d ...........t.... │ │ │ +000029b0: 5b16 1bd3 15d4 0d5c 5cd5 55ac 860d cba5 [......\\.U..... │ │ │ +000029c0: 15aa 730d 895c 5c16 1cd6 15d7 0d5a d855 ..s..\\......Z.U │ │ │ +000029d0: ac86 0dcb a515 aa73 0d89 5c5c 161d 2bc8 .......s..\\..+. │ │ │ +000029e0: 8722 205b 6c65 6173 742d 706f 7369 7469 ." [least-positi │ │ │ +000029f0: 7665 2d6e 6f72 6d61 6c69 7a65 642d 666c ve-normalized-fl │ │ │ +00002a00: 6f61 7420 6d6f 7374 2d6e 6567 6174 6976 oat most-negativ │ │ │ +00002a10: 652d 666c 6f61 7420 6d6f 7374 2d70 6f73 e-float most-pos │ │ │ +00002a20: 6974 6976 652d 666c 6f61 7420 7a20 7920 itive-float z y │ │ │ +00002a30: 7820 3230 2e30 2032 2e30 206e 696c 2063 x 20.0 2.0 nil c │ │ │ +00002a40: 6c2d 6669 6e69 7465 2d64 6f20 2a20 3220 l-finite-do * 2 │ │ │ +00002a50: 2b20 3136 2028 6279 7465 2d63 6f64 6520 + 16 (byte-code │ │ │ +00002a60: 2209 89c2 a589 5c5c 55ad 8508 c2a5 c356 ".....\\U......V │ │ │ +00002a70: 8722 205b 7920 7820 3220 305d 2033 2920 ." [y x 2 0] 3) │ │ │ +00002a80: 2828 6172 6974 682d 6572 726f 7229 2920 ((arith-error)) │ │ │ +00002a90: 3120 2862 7974 652d 636f 6465 2022 08c1 1 (byte-code ".. │ │ │ +00002aa0: a5c2 5687 2220 5b78 2032 2030 5d20 3229 ..V." [x 2 0] 2) │ │ │ +00002ab0: 2028 2861 7269 7468 2d65 7272 6f72 2929 ((arith-error)) │ │ │ +00002ac0: 2031 2e30 2031 2e30 2031 2e30 2031 2e30 1.0 1.0 1.0 1.0 │ │ │ +00002ad0: 2031 2e30 2031 2e30 206c 6561 7374 2d6e 1.0 1.0 least-n │ │ │ +00002ae0: 6567 6174 6976 652d 6e6f 726d 616c 697a egative-normaliz │ │ │ +00002af0: 6564 2d66 6c6f 6174 206c 6561 7374 2d70 ed-float least-p │ │ │ +00002b00: 6f73 6974 6976 652d 666c 6f61 7420 6c65 ositive-float le │ │ │ +00002b10: 6173 742d 6e65 6761 7469 7665 2d66 6c6f ast-negative-flo │ │ │ +00002b20: 6174 2066 6c6f 6174 2d65 7073 696c 6f6e at float-epsilon │ │ │ +00002b30: 2066 6c6f 6174 2d6e 6567 6174 6976 652d float-negative- │ │ │ +00002b40: 6570 7369 6c6f 6e5d 2036 5d29 0a23 4036 epsilon] 6]).#@6 │ │ │ +00002b50: 3820 436f 6e63 6174 656e 6174 652c 2069 8 Concatenate, i │ │ │ +00002b60: 6e74 6f20 6120 7365 7175 656e 6365 206f nto a sequence o │ │ │ +00002b70: 6620 7479 7065 2054 5950 452c 2074 6865 f type TYPE, the │ │ │ +00002b80: 2061 7267 756d 656e 7420 5345 5155 454e argument SEQUEN │ │ │ +00002b90: 4345 532e 1f0a 2864 6566 616c 6961 7320 CES...(defalias │ │ │ +00002ba0: 2763 6f6e 6361 7465 6e61 7465 2023 5b28 'concatenate #[( │ │ │ +00002bb0: 7479 7065 2026 7265 7374 2073 6571 7329 type &rest seqs) │ │ │ +00002bc0: 2022 09c2 61ab 85c3 c408 5c22 8709 c561 "..a.....\"...a │ │ │ +00002bd0: ab85 c3c6 085c 2287 09c7 61ab 88c3 c889 .....\"...a..... │ │ │ +00002be0: 08c9 5c22 5c22 87ca cb09 5c22 8722 205b ..\"\"....\"." [ │ │ │ +00002bf0: 7365 7173 2074 7970 6520 7665 6374 6f72 seqs type vector │ │ │ +00002c00: 2061 7070 6c79 2076 636f 6e63 6174 2073 apply vconcat s │ │ │ +00002c10: 7472 696e 6720 636f 6e63 6174 206c 6973 tring concat lis │ │ │ +00002c20: 7420 6170 7065 6e64 2028 6e69 6c29 2065 t append (nil) e │ │ │ +00002c30: 7272 6f72 2022 4e6f 7420 6120 7365 7175 rror "Not a sequ │ │ │ +00002c40: 656e 6365 2074 7970 6520 6e61 6d65 3a20 ence type name: │ │ │ +00002c50: 2573 225d 2035 2028 2324 202e 2031 3130 %s"] 5 (#$ . 110 │ │ │ +00002c60: 3930 295d 290a 2340 3339 2045 7175 6976 90)]).#@39 Equiv │ │ │ +00002c70: 616c 656e 7420 746f 2028 6170 7065 6e64 alent to (append │ │ │ +00002c80: 2028 7265 7665 7273 6520 5829 2059 292e (reverse X) Y). │ │ │ +00002c90: 1f0a 2864 6566 616c 6961 7320 2772 6576 ..(defalias 'rev │ │ │ +00002ca0: 6170 7065 6e64 2023 5b28 7820 7929 2022 append #[(x y) " │ │ │ +00002cb0: c209 2108 a487 2220 5b79 2078 2072 6576 ..!..." [y x rev │ │ │ +00002cc0: 6572 7365 5d20 3220 2823 2420 2e20 3131 erse] 2 (#$ . 11 │ │ │ +00002cd0: 3337 3129 5d29 0a23 4033 3920 4571 7569 371)]).#@39 Equi │ │ │ +00002ce0: 7661 6c65 6e74 2074 6f20 286e 636f 6e63 valent to (nconc │ │ │ +00002cf0: 2028 6e72 6576 6572 7365 2058 2920 5929 (nreverse X) Y) │ │ │ +00002d00: 2e1f 0a28 6465 6661 6c69 6173 2027 6e72 ...(defalias 'nr │ │ │ +00002d10: 6563 6f6e 6320 235b 2878 2079 2920 2209 econc #[(x y) ". │ │ │ +00002d20: 9f08 a487 2220 5b79 2078 5d20 3220 2823 ...." [y x] 2 (# │ │ │ +00002d30: 2420 2e20 3131 3438 3429 5d29 0a23 4036 $ . 11484)]).#@6 │ │ │ +00002d40: 3320 5265 7475 726e 2074 6865 206c 656e 3 Return the len │ │ │ +00002d50: 6774 6820 6f66 2061 206c 6973 742e 2020 gth of a list. │ │ │ +00002d60: 5265 7475 726e 206e 696c 2069 6620 6c69 Return nil if li │ │ │ +00002d70: 7374 2069 7320 6369 7263 756c 6172 2e1f st is circular.. │ │ │ +00002d80: 0a28 6465 6661 6c69 6173 2027 6c69 7374 .(defalias 'list │ │ │ +00002d90: 2d6c 656e 6774 6820 235b 2878 2920 22c4 -length #[(x) ". │ │ │ +00002da0: 0889 191b 1a0b 41ab 970b 0961 ab85 5c6e ......A....a..\n │ │ │ +00002db0: c456 ac8d 5c6e c55c 5c12 0b41 4113 0941 .V..\n.\\..AA..A │ │ │ +00002dc0: 11aa 650b ab89 0b41 3fad 855c 6e54 aa81 ..e....A?..\nT.. │ │ │ +00002dd0: 5c6e 2b87 2220 5b78 2073 6c6f 7720 6e20 \n+." [x slow n │ │ │ +00002de0: 6661 7374 2030 2032 5d20 3320 2823 2420 fast 0 2] 3 (#$ │ │ │ +00002df0: 2e20 3131 3538 3629 5d29 0a23 4034 3320 . 11586)]).#@43 │ │ │ +00002e00: 5265 7475 726e 2074 7275 6520 6966 2053 Return true if S │ │ │ +00002e10: 5542 4c49 5354 2069 7320 6120 7461 696c UBLIST is a tail │ │ │ +00002e20: 206f 6620 4c49 5354 2e1f 0a28 6465 6661 of LIST...(defa │ │ │ +00002e30: 6c69 6173 2027 7461 696c 7020 235b 2873 lias 'tailp #[(s │ │ │ +00002e40: 7562 6c69 7374 206c 6973 7429 2022 093a ublist list) ".: │ │ │ +00002e50: ab8b 0809 61ac 8609 4189 11aa 7208 a7ab ....a...A...r... │ │ │ +00002e60: 8408 096b 8708 0961 8722 205b 7375 626c ...k...a." [subl │ │ │ +00002e70: 6973 7420 6c69 7374 5d20 3320 2823 2420 ist list] 3 (#$ │ │ │ +00002e80: 2e20 3131 3737 3629 5d29 0a23 4032 3234 . 11776)]).#@224 │ │ │ +00002e90: 204d 616b 6520 6120 636f 7079 206f 6620 Make a copy of │ │ │ +00002ea0: 5452 4545 2e0a 4966 2054 5245 4520 6973 TREE..If TREE is │ │ │ +00002eb0: 2061 2063 6f6e 7320 6365 6c6c 2c20 7468 a cons cell, th │ │ │ +00002ec0: 6973 2072 6563 7572 7369 7665 6c79 2063 is recursively c │ │ │ +00002ed0: 6f70 6965 7320 626f 7468 2069 7473 2063 opies both its c │ │ │ +00002ee0: 6172 2061 6e64 2069 7473 2063 6472 2e0a ar and its cdr.. │ │ │ +00002ef0: 436f 6e74 7261 7374 2074 6f20 636f 7079 Contrast to copy │ │ │ +00002f00: 2d73 6571 7565 6e63 652c 2077 6869 6368 -sequence, which │ │ │ +00002f10: 2063 6f70 6965 7320 6f6e 6c79 2061 6c6f copies only alo │ │ │ +00002f20: 6e67 2074 6865 2063 6472 732e 2020 5769 ng the cdrs. Wi │ │ │ +00002f30: 7468 2073 6563 6f6e 640a 6172 6775 6d65 th second.argume │ │ │ +00002f40: 6e74 2056 4543 502c 2074 6869 7320 636f nt VECP, this co │ │ │ +00002f50: 7069 6573 2076 6563 746f 7273 2061 7320 pies vectors as │ │ │ +00002f60: 7765 6c6c 2061 7320 636f 6e73 6573 2e1f well as conses.. │ │ │ +00002f70: 0a28 6465 6661 6c69 6173 2027 636c 2d63 .(defalias 'cl-c │ │ │ +00002f80: 6f70 792d 7472 6565 2023 5b28 7472 6565 opy-tree #[(tree │ │ │ +00002f90: 2026 6f70 7469 6f6e 616c 2076 6563 7029 &optional vecp) │ │ │ +00002fa0: 2022 5c6e 3aab b7c4 5c6e 2189 121b 0b3a "\n:...\n!....: │ │ │ +00002fb0: abaa 0b40 3aac 8909 ab8e c50b 4021 ab88 ...@:.......@!.. │ │ │ +00002fc0: 0bc6 0b40 095c 22a0 880b 413c ac88 0bc6 ...@.\"...A<.... │ │ │ +00002fd0: 0b41 095c 22a1 880b 8941 1388 aa52 29aa .A.\"....A...R). │ │ │ +00002fe0: a409 aba1 c55c 6e21 ab9c c75c 6e21 8912 .....\n!...\n!.. │ │ │ +00002ff0: 4718 0853 8910 c859 ab8c 5c6e 08c6 5c6e G..S...Y..\n..\n │ │ │ +00003000: 0848 095c 2249 88aa 6c29 5c6e 8722 205b .H.\"I..l)\n." [ │ │ │ +00003010: 6920 7665 6370 2074 7265 6520 7020 636f i vecp tree p co │ │ │ +00003020: 7079 2d6c 6973 7420 7665 6374 6f72 7020 py-list vectorp │ │ │ +00003030: 636c 2d63 6f70 792d 7472 6565 2063 6f70 cl-copy-tree cop │ │ │ +00003040: 792d 7365 7175 656e 6365 2030 5d20 3520 y-sequence 0] 5 │ │ │ +00003050: 2823 2420 2e20 3131 3932 3129 5d29 0a28 (#$ . 11921)]).( │ │ │ +00003060: 6279 7465 2d63 6f64 6520 22c0 c121 ab86 byte-code "..!.. │ │ │ +00003070: c2c1 4b21 ac85 c3c1 c45c 2288 c3c5 c65c ..K!.....\"....\ │ │ │ +00003080: 2288 c3c7 c85c 2287 2220 5b66 626f 756e "....\"." [fboun │ │ │ +00003090: 6470 2063 6f70 792d 7472 6565 2073 7562 dp copy-tree sub │ │ │ +000030a0: 7270 2064 6566 616c 6961 7320 636c 2d63 rp defalias cl-c │ │ │ +000030b0: 6f70 792d 7472 6565 2067 6574 2a20 6765 opy-tree get* ge │ │ │ +000030c0: 7420 6765 7466 2070 6c69 7374 2d67 6574 t getf plist-get │ │ │ +000030d0: 5d20 3329 0a28 6465 6661 6c69 6173 2027 ] 3).(defalias ' │ │ │ +000030e0: 636c 2d73 6574 2d67 6574 6620 235b 2870 cl-set-getf #[(p │ │ │ +000030f0: 6c69 7374 2074 6167 2076 616c 2920 225c list tag val) "\ │ │ │ +00003100: 6e89 1bab 8d0b 4009 61ac 870b 4141 8913 n.....@.a...AA.. │ │ │ +00003110: ac73 0bab 880b 4108 a088 5c6e aa85 0908 .s....A...\n.... │ │ │ +00003120: 5c6e 4242 2987 2220 5b76 616c 2074 6167 \nBB)." [val tag │ │ │ +00003130: 2070 6c69 7374 2070 5d20 345d 290a 2864 plist p] 4]).(d │ │ │ +00003140: 6566 616c 6961 7320 2763 6c2d 646f 2d72 efalias 'cl-do-r │ │ │ +00003150: 656d 6620 235b 2870 6c69 7374 2074 6167 emf #[(plist tag │ │ │ +00003160: 2920 2209 4189 1a41 ab8e 5c6e 4140 0861 ) ".A..A..\nA@.a │ │ │ +00003170: ac87 5c6e 4141 8912 aa6f 5c6e 41ad 885c ..\nAA...o\nA..\ │ │ │ +00003180: 6e89 4141 41a1 88c3 2987 2220 5b74 6167 n.AAA...)." [tag │ │ │ +00003190: 2070 6c69 7374 2070 2074 5d20 335d 290a plist p t] 3]). │ │ │ +000031a0: 2864 6566 616c 6961 7320 276d 616b 652d (defalias 'make- │ │ │ +000031b0: 6861 7368 7461 626c 6520 235b 2873 697a hashtable #[(siz │ │ │ +000031c0: 6520 266f 7074 696f 6e61 6c20 7465 7374 e &optional test │ │ │ +000031d0: 2920 22c2 c309 c408 2487 2220 5b73 697a ) ".....$." [siz │ │ │ +000031e0: 6520 7465 7374 206d 616b 652d 6861 7368 e test make-hash │ │ │ +000031f0: 2d74 6162 6c65 203a 7465 7374 203a 7369 -table :test :si │ │ │ +00003200: 7a65 5d20 355d 290a 2864 6566 616c 6961 ze] 5]).(defalia │ │ │ +00003210: 7320 276d 616b 652d 7765 616b 2d68 6173 s 'make-weak-has │ │ │ +00003220: 6874 6162 6c65 2023 5b28 7369 7a65 2026 htable #[(size & │ │ │ +00003230: 6f70 7469 6f6e 616c 2074 6573 7429 2022 optional test) " │ │ │ +00003240: c2c3 09c4 08c5 c626 0687 2220 5b73 697a .......&.." [siz │ │ │ +00003250: 6520 7465 7374 206d 616b 652d 6861 7368 e test make-hash │ │ │ +00003260: 2d74 6162 6c65 203a 7465 7374 203a 7369 -table :test :si │ │ │ +00003270: 7a65 203a 7765 616b 6e65 7373 2074 5d20 ze :weakness t] │ │ │ +00003280: 375d 290a 2864 6566 616c 6961 7320 276d 7]).(defalias 'm │ │ │ +00003290: 616b 652d 6b65 792d 7765 616b 2d68 6173 ake-key-weak-has │ │ │ +000032a0: 6874 6162 6c65 2023 5b28 7369 7a65 2026 htable #[(size & │ │ │ +000032b0: 6f70 7469 6f6e 616c 2074 6573 7429 2022 optional test) " │ │ │ +000032c0: c2c3 09c4 08c5 c626 0687 2220 5b73 697a .......&.." [siz │ │ │ +000032d0: 6520 7465 7374 206d 616b 652d 6861 7368 e test make-hash │ │ │ +000032e0: 2d74 6162 6c65 203a 7465 7374 203a 7369 -table :test :si │ │ │ +000032f0: 7a65 203a 7765 616b 6e65 7373 206b 6579 ze :weakness key │ │ │ +00003300: 5d20 375d 290a 2864 6566 616c 6961 7320 ] 7]).(defalias │ │ │ +00003310: 276d 616b 652d 7661 6c75 652d 7765 616b 'make-value-weak │ │ │ +00003320: 2d68 6173 6874 6162 6c65 2023 5b28 7369 -hashtable #[(si │ │ │ +00003330: 7a65 2026 6f70 7469 6f6e 616c 2074 6573 ze &optional tes │ │ │ +00003340: 7429 2022 c2c3 09c4 08c5 c626 0687 2220 t) ".......&.." │ │ │ +00003350: 5b73 697a 6520 7465 7374 206d 616b 652d [size test make- │ │ │ +00003360: 6861 7368 2d74 6162 6c65 203a 7465 7374 hash-table :test │ │ │ +00003370: 203a 7369 7a65 203a 7765 616b 6e65 7373 :size :weakness │ │ │ +00003380: 2076 616c 7565 5d20 375d 290a 2862 7974 value] 7]).(byt │ │ │ +00003390: 652d 636f 6465 2022 c3c4 1a19 c509 5c6e e-code "......\n │ │ │ +000033a0: 5c22 88c6 095c 6e5c 2288 2ac7 c81a 19c5 \"...\n\".*..... │ │ │ +000033b0: 095c 6e5c 2288 c609 5c6e 5c22 882a c9ca .\n\"...\n\".*.. │ │ │ +000033c0: 1a19 c509 5c6e 5c22 88c6 095c 6e5c 2288 ....\n\"...\n\". │ │ │ +000033d0: 2acb cc1a 19c5 095c 6e5c 2288 c609 5c6e *......\n\"...\n │ │ │ +000033e0: 5c22 882a cdce 1a19 c509 5c6e 5c22 88c6 \".*......\n\".. │ │ │ +000033f0: 095c 6e5c 2288 2acf d01a 19c5 095c 6e5c .\n\".*......\n\ │ │ │ +00003400: 2288 c609 5c6e 5c22 882a c6d1 d25c 2288 "...\n\".*...\". │ │ │ +00003410: c6d3 d25c 2288 c6d4 d25c 2288 c6d5 d25c ...\"....\"....\ │ │ │ +00003420: 2288 c6cc d65c 2288 d7d8 21ab 85c6 d9d8 "....\"...!..... │ │ │ +00003430: 5c22 88da 0842 10db da21 ac86 dcda dd4b \"...B...!.....K │ │ │ +00003440: 5c22 88de 0842 10db de21 ac86 dcde df4b \"...B...!.....K │ │ │ +00003450: 5c22 88e0 0842 10db e021 ac86 dce0 e14b \"...B...!.....K │ │ │ +00003460: 5c22 88e2 0842 10db e221 ac86 dce2 e34b \"...B...!.....K │ │ │ +00003470: 5c22 88e4 e5dd 5c22 88e4 e6e7 5c22 88e4 \"....\"....\".. │ │ │ +00003480: e8df 5c22 88e4 e9e1 5c22 88e4 eae3 5c22 ..\"....\"....\" │ │ │ +00003490: 8722 205b 6375 7272 656e 742d 6c6f 6164 ." [current-load │ │ │ +000034a0: 2d6c 6973 7420 6f6c 6466 756e 206e 6577 -list oldfun new │ │ │ +000034b0: 6675 6e20 6861 7368 7461 626c 6570 2068 fun hashtablep h │ │ │ +000034c0: 6173 682d 7461 626c 652d 7020 6465 6669 ash-table-p defi │ │ │ +000034d0: 6e65 2d66 756e 6374 696f 6e20 6d61 6b65 ne-function make │ │ │ +000034e0: 2d6f 6273 6f6c 6574 6520 6861 7368 7461 -obsolete hashta │ │ │ +000034f0: 626c 652d 6675 6c6c 6e65 7373 2068 6173 ble-fullness has │ │ │ +00003500: 682d 7461 626c 652d 636f 756e 7420 6861 h-table-count ha │ │ │ +00003510: 7368 7461 626c 652d 7465 7374 2d66 756e shtable-test-fun │ │ │ +00003520: 6374 696f 6e20 6861 7368 2d74 6162 6c65 ction hash-table │ │ │ +00003530: 2d74 6573 7420 6861 7368 7461 626c 652d -test hashtable- │ │ │ +00003540: 7479 7065 2068 6173 682d 7461 626c 652d type hash-table- │ │ │ +00003550: 7479 7065 2068 6173 6874 6162 6c65 2d73 type hashtable-s │ │ │ +00003560: 697a 6520 6861 7368 2d74 6162 6c65 2d73 ize hash-table-s │ │ │ +00003570: 697a 6520 636f 7079 2d68 6173 6874 6162 ize copy-hashtab │ │ │ +00003580: 6c65 2063 6f70 792d 6861 7368 2d74 6162 le copy-hash-tab │ │ │ +00003590: 6c65 206d 616b 652d 6861 7368 7461 626c le make-hashtabl │ │ │ +000035a0: 6520 6d61 6b65 2d68 6173 682d 7461 626c e make-hash-tabl │ │ │ +000035b0: 6520 6d61 6b65 2d77 6561 6b2d 6861 7368 e make-weak-hash │ │ │ +000035c0: 7461 626c 6520 6d61 6b65 2d6b 6579 2d77 table make-key-w │ │ │ +000035d0: 6561 6b2d 6861 7368 7461 626c 6520 6d61 eak-hashtable ma │ │ │ +000035e0: 6b65 2d76 616c 7565 2d77 6561 6b2d 6861 ke-value-weak-ha │ │ │ +000035f0: 7368 7461 626c 6520 6861 7368 2d74 6162 shtable hash-tab │ │ │ +00003600: 6c65 2d77 6561 6b6e 6573 7320 6662 6f75 le-weakness fbou │ │ │ +00003610: 6e64 7020 782d 6b65 7973 796d 2d68 6173 ndp x-keysym-has │ │ │ +00003620: 682d 7461 626c 6520 782d 6b65 7973 796d h-table x-keysym │ │ │ +00003630: 2d68 6173 6874 6162 6c65 2063 6c2d 6275 -hashtable cl-bu │ │ │ +00003640: 696c 7469 6e2d 6765 7468 6173 6820 6465 iltin-gethash de │ │ │ +00003650: 6661 756c 742d 626f 756e 6470 2073 6574 fault-boundp set │ │ │ +00003660: 2d64 6566 6175 6c74 2067 6574 6861 7368 -default gethash │ │ │ +00003670: 2063 6c2d 6275 696c 7469 6e2d 7265 6d68 cl-builtin-remh │ │ │ +00003680: 6173 6820 7265 6d68 6173 6820 636c 2d62 ash remhash cl-b │ │ │ +00003690: 7569 6c74 696e 2d63 6c72 6861 7368 2063 uiltin-clrhash c │ │ │ +000036a0: 6c72 6861 7368 2063 6c2d 6275 696c 7469 lrhash cl-builti │ │ │ +000036b0: 6e2d 6d61 7068 6173 6820 6d61 7068 6173 n-maphash maphas │ │ │ +000036c0: 6820 6465 6661 6c69 6173 2063 6c2d 6765 h defalias cl-ge │ │ │ +000036d0: 7468 6173 6820 636c 2d70 7574 6861 7368 thash cl-puthash │ │ │ +000036e0: 2070 7574 6861 7368 2063 6c2d 7265 6d68 puthash cl-remh │ │ │ +000036f0: 6173 6820 636c 2d63 6c72 6861 7368 2063 ash cl-clrhash c │ │ │ +00003700: 6c2d 6d61 7068 6173 685d 2033 290a 2340 l-maphash] 3).#@ │ │ │ +00003710: 3639 2049 6e73 6572 7420 6120 7072 6574 69 Insert a pret │ │ │ +00003720: 7479 2d70 7269 6e74 6564 2072 656e 6469 ty-printed rendi │ │ │ +00003730: 7469 6f6e 206f 6620 6120 4c69 7370 2046 tion of a Lisp F │ │ │ +00003740: 4f52 4d20 696e 2063 7572 7265 6e74 2062 ORM in current b │ │ │ +00003750: 7566 6665 722e 1f0a 2864 6566 616c 6961 uffer...(defalia │ │ │ +00003760: 7320 2763 6c2d 7072 6574 7479 7072 696e s 'cl-prettyprin │ │ │ +00003770: 7420 235b 2866 6f72 6d29 2022 60c3 1a19 t #[(form) "`... │ │ │ +00003780: c4c5 0821 c4b1 0388 6012 0954 6288 c6c7 ...!....`..Tb... │ │ │ +00003790: 5c6e c823 ab90 c9ca 2188 cb63 88cc 2088 \n.#....!..c.. . │ │ │ +000037a0: cdce 2188 aa69 0954 6288 cf20 2a87 2220 ..!..i.Tb.. *." │ │ │ +000037b0: 5b66 6f72 6d20 7074 206c 6173 7420 6e69 [form pt last ni │ │ │ +000037c0: 6c20 225c 6e22 2070 7269 6e31 2d74 6f2d l "\n" prin1-to- │ │ │ +000037d0: 7374 7269 6e67 2073 6561 7263 682d 666f string search-fo │ │ │ +000037e0: 7277 6172 6420 2228 7175 6f74 6520 2220 rward "(quote " │ │ │ +000037f0: 7420 6465 6c65 7465 2d62 6163 6b77 6172 t delete-backwar │ │ │ +00003800: 642d 6368 6172 2037 2022 2722 2066 6f72 d-char 7 "'" for │ │ │ +00003810: 7761 7264 2d73 6578 7020 6465 6c65 7465 ward-sexp delete │ │ │ +00003820: 2d63 6861 7220 3120 636c 2d64 6f2d 7072 -char 1 cl-do-pr │ │ │ +00003830: 6574 7479 7072 696e 745d 2034 2028 2324 ettyprint] 4 (#$ │ │ │ +00003840: 202e 2031 3430 3939 295d 290a 2864 6566 . 14099)]).(def │ │ │ +00003850: 616c 6961 7320 2763 6c2d 646f 2d70 7265 alias 'cl-do-pre │ │ │ +00003860: 7474 7970 7269 6e74 2023 5b6e 696c 2022 ttyprint #[nil " │ │ │ +00003870: c5c6 7788 c7c8 21ab fbc7 c921 ae92 c7ca ..w...!....!.... │ │ │ +00003880: 21ae 8dc7 cb21 ae88 c7cc 21ae 83c7 cd21 !....!....!....! │ │ │ +00003890: c7ce 21ae 83c7 cf21 c7d0 21ae 83c7 d121 ..!....!..!....! │ │ │ +000038a0: c7d2 211b 1a19 8918 ac8e 5c6e ac8b d320 ..!.......\n... │ │ │ +000038b0: 8869 d459 adbd d520 88d6 1cd7 7588 d820 .i.Y... ....u.. │ │ │ +000038c0: 8808 ac88 c7d9 21ac 83d8 2088 09ab 88c7 ......!... ..... │ │ │ +000038d0: d921 ac83 d820 88c7 d921 ac94 0bab 830c .!... ...!...... │ │ │ +000038e0: 3f14 0cab 83da 6388 db20 88d8 2088 aa67 ?.....c.. .. ..g │ │ │ +000038f0: d775 292c 87d3 2087 2220 5b73 6b69 7020 .u),.. ." [skip │ │ │ +00003900: 7477 6f20 6c65 7420 7365 7420 6e6c 2022 two let set nl " │ │ │ +00003910: 2022 206e 696c 206c 6f6f 6b69 6e67 2d61 " nil looking-a │ │ │ +00003920: 7420 2228 2220 2228 2822 2022 2870 726f t "(" "((" "(pro │ │ │ +00003930: 6722 2022 2875 6e77 696e 642d 7072 6f74 g" "(unwind-prot │ │ │ +00003940: 6563 7420 2220 2228 6675 6e63 7469 6f6e ect " "(function │ │ │ +00003950: 2028 2220 2228 636c 2d62 6c6f 636b 2d77 (" "(cl-block-w │ │ │ +00003960: 7261 7070 6572 2022 2022 2864 6566 756e rapper " "(defun │ │ │ +00003970: 2022 2022 2864 6566 6d61 6372 6f20 2220 " "(defmacro " │ │ │ +00003980: 2228 6c65 745c 5c2a 3f20 2220 2228 7768 "(let\\*? " "(wh │ │ │ +00003990: 696c 6520 2220 2228 703f 7365 745b 7166 ile " "(p?set[qf │ │ │ +000039a0: 5d20 2220 666f 7277 6172 642d 7365 7870 ] " forward-sexp │ │ │ +000039b0: 2037 3820 6261 636b 7761 7264 2d73 6578 78 backward-sex │ │ │ +000039c0: 7020 7420 3120 636c 2d64 6f2d 7072 6574 p t 1 cl-do-pret │ │ │ +000039d0: 7479 7072 696e 7420 2229 2220 225c 6e22 typrint ")" "\n" │ │ │ +000039e0: 206c 6973 702d 696e 6465 6e74 2d6c 696e lisp-indent-lin │ │ │ +000039f0: 655d 2036 5d29 0a28 6279 7465 2d63 6f64 e] 6]).(byte-cod │ │ │ +00003a00: 6520 22c1 0842 10c2 c121 ac85 c3c1 c45c e "..B...!.....\ │ │ │ +00003a10: 2288 c508 4210 c2c5 21ac 85c3 c5c4 5c22 "...B...!.....\" │ │ │ +00003a20: 88c4 8722 205b 6375 7272 656e 742d 6c6f ..." [current-lo │ │ │ +00003a30: 6164 2d6c 6973 7420 636c 2d6d 6163 726f ad-list cl-macro │ │ │ +00003a40: 6578 7061 6e64 2d63 6d61 6373 2064 6566 expand-cmacs def │ │ │ +00003a50: 6175 6c74 2d62 6f75 6e64 7020 7365 742d ault-boundp set- │ │ │ +00003a60: 6465 6661 756c 7420 6e69 6c20 636c 2d63 default nil cl-c │ │ │ +00003a70: 6c6f 7375 7265 2d76 6172 735d 2033 290a losure-vars] 3). │ │ │ +00003a80: 2340 3131 3420 4578 7061 6e64 2061 6c6c #@114 Expand all │ │ │ +00003a90: 206d 6163 726f 2063 616c 6c73 2074 6872 macro calls thr │ │ │ +00003aa0: 6f75 6768 2061 204c 6973 7020 464f 524d ough a Lisp FORM │ │ │ +00003ab0: 2e0a 5468 6973 2061 6c73 6f20 646f 6573 ..This also does │ │ │ +00003ac0: 2073 6f6d 6520 7472 6976 6961 6c20 6f70 some trivial op │ │ │ +00003ad0: 7469 6d69 7a61 7469 6f6e 7320 746f 206d timizations to m │ │ │ +00003ae0: 616b 6520 7468 6520 666f 726d 2070 7265 ake the form pre │ │ │ +00003af0: 7474 6965 722e 1f0a 2864 6566 616c 6961 ttier...(defalia │ │ │ +00003b00: 7320 2763 6c2d 6d61 6372 6f65 7870 616e s 'cl-macroexpan │ │ │ +00003b10: 642d 616c 6c20 235b 2866 6f72 6d20 266f d-all #[(form &o │ │ │ +00003b20: 7074 696f 6e61 6c20 656e 7629 2022 0dc6 ptional env) ".. │ │ │ +00003b30: 0d0c 5c22 8915 61ab 760e 36ab 890d c70d ..\"..a.v.6..... │ │ │ +00003b40: 2189 1561 ab69 0d3a ac82 0d87 0d40 c873 !..a.i.:.....@.s │ │ │ +00003b50: abf7 0d41 40ac 89c9 ca0d 4141 420c 5c22 ...A@.....AAB.\" │ │ │ +00003b60: 87cb 890d 4140 1b1e 301e 0f0b abbd 0b40 ....A@..0......@ │ │ │ +00003b70: 3aab 99c9 0b40 400c 5c22 8918 39ac 83cc :....@@.\"..9... │ │ │ +00003b80: 160f 08cd 0b40 410c 5c22 2942 aa94 c90b .....@A.\")B.... │ │ │ +00003b90: 400c 5c22 8918 39ab 8308 aa86 cc16 0f08 @.\"..9......... │ │ │ +00003ba0: cb44 290e 3042 1630 0b41 8913 ac43 0e0f .D).0B.0.A...C.. │ │ │ +00003bb0: ab8c 0d40 ce61 ab83 cfaa 85d0 aa82 0d40 ...@.a.........@ │ │ │ +00003bc0: 0e30 9fcd 0d41 410c 5c22 2b42 4287 0d40 .0...AA.\"+BB..@ │ │ │ +00003bd0: d161 ab89 0d40 d2d3 0d41 5c22 4287 0d40 .a...@...A\"B..@ │ │ │ +00003be0: d461 ab96 0d40 0d41 40c9 d50d 380c 5c22 .a...@.A@...8.\" │ │ │ +00003bf0: d2d6 0d41 4141 5c22 4242 4287 0d40 d773 ...AAA\"BBB..@.s │ │ │ +00003c00: 8384 010d 4140 a2d8 6183 6001 cd0d 4140 ....A@..a.`...A@ │ │ │ +00003c10: 4141 0c5c 221a 09ab f10d 40d9 61ab ebda AA.\".....@.a... │ │ │ +00003c20: 5c6e 095c 22ab e5d2 db09 5c22 1e32 dc09 \n.\".....\".2.. │ │ │ +00003c30: 0e32 5c22 1e33 cb1e 315c 6e40 3bac 875c .2\".3..1\n@;..\ │ │ │ +00003c40: 6e40 a2dd 61ab 8ede 5c6e 8941 1240 440e n@..a...\n.A.@D. │ │ │ +00003c50: 3142 1631 aa66 dfe0 0921 40e1 cc23 88e2 1B.1.f...!@..#.. │ │ │ +00003c60: e3e4 e545 e60e 330e 319f 5c22 e3e7 e3e8 ...E..3.1.\".... │ │ │ +00003c70: d9d8 e20e 320d 4140 4140 5c22 e60e 335c ....2.A@A@\"..3\ │ │ │ +00003c80: 6e5c 2242 4244 45d2 e909 5c22 eaa4 4242 n\"BBDE...\"..BB │ │ │ +00003c90: 4243 232b aa8c 0d40 d80d 4140 4140 5c6e BC#+...@..A@A@\n │ │ │ +00003ca0: 4242 4429 870d 4140 0cb7 891e 3541 4140 BBD)..A@....5AA@ │ │ │ +00003cb0: 4140 eb61 ab90 c90e 3541 4141 4041 4140 A@.a....5AAA@AA@ │ │ │ +00003cc0: 4140 0c5c 22aa 810d 2987 0d40 ec73 ab8e A@.\"...)..@.s.. │ │ │ +00003cd0: 0d40 0d41 40cd 0d41 410c 5c22 4242 870d .@.A@..AA.\"BB.. │ │ │ +00003ce0: 40ca 61ab 8c0d 4141 ac87 c90d 4140 0c5c @.a...AA....A@.\ │ │ │ +00003cf0: 2287 0d40 ed61 abae cd0d 410c 5c22 891e "..@.a....A.\".. │ │ │ +00003d00: 3489 1e2f ab8f 0e2f 4039 ab89 0e2f 4141 4../.../@9.../AA │ │ │ +00003d10: 8916 2fac 710e 2fab 88c9 ee0e 3442 21aa ../.q./.....4B!. │ │ │ +00003d20: 84ed 0e34 422a 870d 40cd 0d41 0c5c 2242 ...4B*..@..A.\"B │ │ │ +00003d30: 8722 205b 6578 7020 636c 2d63 6c6f 7375 ." [exp cl-closu │ │ │ +00003d40: 7265 2d76 6172 7320 626f 6479 206c 6574 re-vars body let │ │ │ +00003d50: 7320 656e 7620 666f 726d 206d 6163 726f s env form macro │ │ │ +00003d60: 6578 7061 6e64 2063 6f6d 7069 6c65 722d expand compiler- │ │ │ +00003d70: 6d61 6372 6f65 7870 616e 6420 286c 6574 macroexpand (let │ │ │ +00003d80: 206c 6574 2a29 2063 6c2d 6d61 6372 6f65 let*) cl-macroe │ │ │ +00003d90: 7870 616e 642d 616c 6c20 7072 6f67 6e20 xpand-all progn │ │ │ +00003da0: 6e69 6c20 7420 636c 2d6d 6163 726f 6578 nil t cl-macroex │ │ │ +00003db0: 7061 6e64 2d62 6f64 7920 6c65 7420 6c65 pand-body let le │ │ │ +00003dc0: 7466 206c 6574 662a 2063 6f6e 6420 6d61 tf letf* cond ma │ │ │ +00003dd0: 7063 6172 2023 5b28 7829 2022 c209 085c pcar #[(x) "...\ │ │ │ +00003de0: 2287 2220 5b65 6e76 2078 2063 6c2d 6d61 "." [env x cl-ma │ │ │ +00003df0: 6372 6f65 7870 616e 642d 626f 6479 5d20 croexpand-body] │ │ │ +00003e00: 335d 2063 6f6e 6469 7469 6f6e 2d63 6173 3] condition-cas │ │ │ +00003e10: 6520 3220 235b 2878 2920 2209 40c2 0941 e 2 #[(x) ".@..A │ │ │ +00003e20: 085c 2242 8722 205b 656e 7620 7820 636c .\"B." [env x cl │ │ │ +00003e30: 2d6d 6163 726f 6578 7061 6e64 2d62 6f64 -macroexpand-bod │ │ │ +00003e40: 795d 2034 5d20 2766 756e 6374 696f 6e20 y] 4] 'function │ │ │ +00003e50: 6c61 6d62 6461 2066 756e 6374 696f 6e20 lambda function │ │ │ +00003e60: 636c 2d65 7870 722d 636f 6e74 6169 6e73 cl-expr-contains │ │ │ +00003e70: 2d61 6e79 2067 656e 7379 6d20 7061 6972 -any gensym pair │ │ │ +00003e80: 6c69 7320 696e 7465 7261 6374 6976 6520 lis interactive │ │ │ +00003e90: 7175 6f74 6520 7075 7420 6c61 7374 2075 quote put last u │ │ │ +00003ea0: 7365 6420 6170 7065 6e64 206c 6973 7420 sed append list │ │ │ +00003eb0: 276c 616d 6264 6120 2728 2672 6573 7420 'lambda '(&rest │ │ │ +00003ec0: 2d2d 636c 2d72 6573 742d 2d29 2073 7562 --cl-rest--) sub │ │ │ +00003ed0: 6c69 7320 2761 7070 6c79 2027 7175 6f74 lis 'apply 'quot │ │ │ +00003ee0: 6520 235b 2878 2920 22c1 c208 4587 2220 e #[(x) "...E." │ │ │ +00003ef0: 5b78 206c 6973 7420 2771 756f 7465 5d20 [x list 'quote] │ │ │ +00003f00: 335d 2028 272d 2d63 6c2d 7265 7374 2d2d 3] ('--cl-rest-- │ │ │ +00003f10: 2920 636c 2d6c 6162 656c 732d 6172 6773 ) cl-labels-args │ │ │ +00003f20: 2028 6465 6675 6e20 6465 666d 6163 726f (defun defmacro │ │ │ +00003f30: 2920 7365 7471 2073 6574 6620 7020 7265 ) setq setf p re │ │ │ +00003f40: 7320 6465 636c 7320 6e65 7720 7375 6220 s decls new sub │ │ │ +00003f50: 6172 6773 2066 6f75 6e64 2063 6c2d 6d61 args found cl-ma │ │ │ +00003f60: 6372 6f65 7870 616e 642d 636d 6163 735d croexpand-cmacs] │ │ │ +00003f70: 2031 3420 2823 2420 2e20 3134 3938 3229 14 (#$ . 14982) │ │ │ +00003f80: 5d29 0a28 6465 6661 6c69 6173 2027 636c ]).(defalias 'cl │ │ │ +00003f90: 2d6d 6163 726f 6578 7061 6e64 2d62 6f64 -macroexpand-bod │ │ │ +00003fa0: 7920 235b 2862 6f64 7920 266f 7074 696f y #[(body &optio │ │ │ +00003fb0: 6e61 6c20 656e 7629 2022 c1c2 085c 2287 nal env) "...\". │ │ │ +00003fc0: 2220 5b62 6f64 7920 6d61 7063 6172 2023 " [body mapcar # │ │ │ +00003fd0: 5b28 7829 2022 c209 085c 2287 2220 5b65 [(x) "...\"." [e │ │ │ +00003fe0: 6e76 2078 2063 6c2d 6d61 6372 6f65 7870 nv x cl-macroexp │ │ │ +00003ff0: 616e 642d 616c 6c5d 2033 5d5d 2033 5d29 and-all] 3]] 3]) │ │ │ +00004000: 0a28 6465 6661 6c69 6173 2027 636c 2d70 .(defalias 'cl-p │ │ │ +00004010: 7265 7474 7965 7870 616e 6420 235b 2866 rettyexpand #[(f │ │ │ +00004020: 6f72 6d20 266f 7074 696f 6e61 6c20 6675 orm &optional fu │ │ │ +00004030: 6c6c 2920 22c5 c621 880b 89c7 1a19 18c8 ll) "..!........ │ │ │ +00004040: 0c0b 3fad 81c9 5c22 14c5 ca21 88cb 0c21 ..?...\"...!...! │ │ │ +00004050: c5cc 2188 2b87 2220 5b63 6c2d 6d61 6372 ..!.+." [cl-macr │ │ │ +00004060: 6f65 7870 616e 642d 636d 6163 7320 636c oexpand-cmacs cl │ │ │ +00004070: 2d63 6f6d 7069 6c69 6e67 2d66 696c 6520 -compiling-file │ │ │ +00004080: 6279 7465 2d63 6f6d 7069 6c65 2d6d 6163 byte-compile-mac │ │ │ +00004090: 726f 2d65 6e76 6972 6f6e 6d65 6e74 2066 ro-environment f │ │ │ +000040a0: 756c 6c20 666f 726d 206d 6573 7361 6765 ull form message │ │ │ +000040b0: 2022 4578 7061 6e64 696e 672e 2e2e 2220 "Expanding..." │ │ │ +000040c0: 6e69 6c20 636c 2d6d 6163 726f 6578 7061 nil cl-macroexpa │ │ │ +000040d0: 6e64 2d61 6c6c 2028 2862 6c6f 636b 2920 nd-all ((block) │ │ │ +000040e0: 2865 7661 6c2d 7768 656e 2929 2022 466f (eval-when)) "Fo │ │ │ +000040f0: 726d 6174 7469 6e67 2e2e 2e22 2063 6c2d rmatting..." cl- │ │ │ +00004100: 7072 6574 7479 7072 696e 7420 2222 5d20 prettyprint ""] │ │ │ +00004110: 335d 290a 2862 7974 652d 636f 6465 2022 3]).(byte-code " │ │ │ +00004120: c0c1 2188 c2c3 2187 2220 5b72 756e 2d68 ..!...!." [run-h │ │ │ +00004130: 6f6f 6b73 2063 6c2d 6578 7472 612d 6c6f ooks cl-extra-lo │ │ │ +00004140: 6164 2d68 6f6f 6b20 7072 6f76 6964 6520 ad-hook provide │ │ │ +00004150: 636c 2d65 7874 7261 5d20 3229 0a cl-extra] 2). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/cl-macs.elc │ │ │ @@ -1,5831 +1,5830 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3031 2032 eb 25 01:54:01 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6c2d 6d61 6373 2e65 6c0a 3b3b 3b20 656d l-macs.el.;;; em │ │ │ -000000a0: 6163 7320 7665 7273 696f 6e20 3231 2e34 acs version 21.4 │ │ │ -000000b0: 2028 7061 7463 6820 3234 2920 2253 7461 (patch 24) "Sta │ │ │ -000000c0: 6e64 6172 6420 4322 2058 456d 6163 7320 ndard C" XEmacs │ │ │ -000000d0: 4c75 6369 642e 0a3b 3b3b 2062 7974 6563 Lucid..;;; bytec │ │ │ -000000e0: 6f6d 7020 7665 7273 696f 6e20 322e 3237 omp version 2.27 │ │ │ -000000f0: 2058 456d 6163 733b 2032 3030 302d 3039 XEmacs; 2000-09 │ │ │ -00000100: 2d31 322e 0a3b 3b3b 206f 7074 696d 697a -12..;;; optimiz │ │ │ -00000110: 6174 696f 6e20 6973 206f 6e2e 0a3b 3b3b ation is on..;;; │ │ │ -00000120: 2074 6869 7320 6669 6c65 2075 7365 7320 this file uses │ │ │ -00000130: 6f70 636f 6465 7320 7768 6963 6820 646f opcodes which do │ │ │ -00000140: 206e 6f74 2065 7869 7374 2069 6e20 456d not exist in Em │ │ │ -00000150: 6163 7320 3139 2e0a 0a28 6966 2028 616e acs 19...(if (an │ │ │ -00000160: 6420 2862 6f75 6e64 7020 2765 6d61 6373 d (boundp 'emacs │ │ │ -00000170: 2d76 6572 7369 6f6e 290a 0920 286f 7220 -version).. (or │ │ │ -00000180: 2861 6e64 2028 626f 756e 6470 2027 6570 (and (boundp 'ep │ │ │ -00000190: 6f63 683a 3a76 6572 7369 6f6e 2920 6570 och::version) ep │ │ │ -000001a0: 6f63 683a 3a76 6572 7369 6f6e 290a 0920 och::version).. │ │ │ -000001b0: 2020 2020 2873 7472 696e 672d 6c65 7373 (string-less │ │ │ -000001c0: 7020 656d 6163 732d 7665 7273 696f 6e20 p emacs-version │ │ │ -000001d0: 2232 3022 2929 290a 2020 2020 2865 7272 "20"))). (err │ │ │ -000001e0: 6f72 2022 6063 6c2d 6d61 6373 2e65 6c27 or "`cl-macs.el' │ │ │ -000001f0: 2077 6173 2063 6f6d 7069 6c65 6420 666f was compiled fo │ │ │ -00000200: 7220 456d 6163 7320 3230 2229 290a 0a28 r Emacs 20"))..( │ │ │ -00000210: 6f72 2028 626f 756e 6470 2027 6375 7272 or (boundp 'curr │ │ │ -00000220: 656e 742d 6c6f 6164 2d6c 6973 7429 2028 ent-load-list) ( │ │ │ -00000230: 7365 7471 2063 7572 7265 6e74 2d6c 6f61 setq current-loa │ │ │ -00000240: 642d 6c69 7374 206e 696c 2929 0a0a 0a28 d-list nil))...( │ │ │ -00000250: 6279 7465 2d63 6f64 6520 22c1 0873 ac84 byte-code "..s.. │ │ │ -00000260: c2c3 2188 c187 2220 5b66 6561 7475 7265 ..!..." [feature │ │ │ -00000270: 7320 636c 2d31 3920 6572 726f 7220 2254 s cl-19 error "T │ │ │ -00000280: 7269 6564 2074 6f20 6c6f 6164 2060 636c ried to load `cl │ │ │ -00000290: 2d6d 6163 7327 2062 6566 6f72 6520 6063 -macs' before `c │ │ │ -000002a0: 6c27 2122 5d20 3229 0a28 6465 6661 6c69 l'!"] 2).(defali │ │ │ -000002b0: 6173 2027 636c 2d70 7573 6820 2728 6d61 as 'cl-push '(ma │ │ │ -000002c0: 6372 6f20 2e20 235b 2878 2070 6c61 6365 cro . #[(x place │ │ │ -000002d0: 2920 22c2 09c3 0809 4545 8722 205b 7820 ) ".....EE." [x │ │ │ -000002e0: 706c 6163 6520 7365 7471 2063 6f6e 735d place setq cons] │ │ │ -000002f0: 2035 5d29 290a 2864 6566 616c 6961 7320 5])).(defalias │ │ │ -00000300: 2763 6c2d 706f 7020 2728 6d61 6372 6f20 'cl-pop '(macro │ │ │ -00000310: 2e20 235b 2870 6c61 6365 2920 22c1 c208 . #[(place) "... │ │ │ -00000320: c308 c408 4445 4544 8722 205b 706c 6163 ....DEED." [plac │ │ │ -00000330: 6520 6361 7220 7072 6f67 3120 7365 7471 e car prog1 setq │ │ │ -00000340: 2063 6472 5d20 375d 2929 0a28 6465 6661 cdr] 7])).(defa │ │ │ -00000350: 6c69 6173 2027 636c 2d70 6f70 3220 2728 lias 'cl-pop2 '( │ │ │ -00000360: 6d61 6372 6f20 2e20 235b 2870 6c61 6365 macro . #[(place │ │ │ -00000370: 2920 22c1 c2c3 0844 44c4 08c3 8908 4444 ) "....DD.....DD │ │ │ -00000380: 4545 8722 205b 706c 6163 6520 7072 6f67 EE." [place prog │ │ │ -00000390: 3120 6361 7220 6364 7220 7365 7471 5d20 1 car cdr setq] │ │ │ -000003a0: 375d 2929 0a28 6279 7465 2d63 6f64 6520 7])).(byte-code │ │ │ -000003b0: 22c1 c2c3 c423 88c1 c5c3 c423 88c1 c6c3 "....#.....#.... │ │ │ -000003c0: c423 88c7 c8c9 21ac 84c9 ca4d 88c8 cb21 .#....!....M...! │ │ │ -000003d0: ac85 c9cb cc5c 2288 cd21 88ce 0842 10cf .....\"..!...B.. │ │ │ -000003e0: ce21 ac85 d0ce d15c 2288 d187 2220 5b63 .!.....\"..." [c │ │ │ -000003f0: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ -00000400: 2070 7574 2063 6c2d 7075 7368 2065 6465 put cl-push ede │ │ │ -00000410: 6275 672d 666f 726d 2d73 7065 6320 6564 bug-form-spec ed │ │ │ -00000420: 6562 7567 2d73 6578 7073 2063 6c2d 706f ebug-sexps cl-po │ │ │ -00000430: 7020 636c 2d70 6f70 3220 7265 7175 6972 p cl-pop2 requir │ │ │ -00000440: 6520 6662 6f75 6e64 7020 6465 6661 6c69 e fboundp defali │ │ │ -00000450: 6173 2066 7365 7420 636c 2d74 7261 6e73 as fset cl-trans │ │ │ -00000460: 666f 726d 2d66 756e 6374 696f 6e2d 7072 form-function-pr │ │ │ -00000470: 6f70 6572 7479 2023 5b28 6e20 7020 6629 operty #[(n p f) │ │ │ -00000480: 2022 c3c4 5c6e 44c4 0944 c5c6 0842 4446 "..\nD..D...BDF │ │ │ -00000490: 8722 205b 6620 7020 6e20 7075 7420 7175 ." [f p n put qu │ │ │ -000004a0: 6f74 6520 6675 6e63 7469 6f6e 206c 616d ote function lam │ │ │ -000004b0: 6264 615d 2036 5d20 7865 6d61 6373 2063 bda] 6] xemacs c │ │ │ -000004c0: 6c2d 6f6c 642d 6263 2d66 696c 652d 666f l-old-bc-file-fo │ │ │ -000004d0: 726d 2064 6566 6175 6c74 2d62 6f75 6e64 rm default-bound │ │ │ -000004e0: 7020 7365 742d 6465 6661 756c 7420 6e69 p set-default ni │ │ │ -000004f0: 6c5d 2034 290a 2864 6566 616c 6961 7320 l] 4).(defalias │ │ │ -00000500: 2763 6c2d 636f 6d70 696c 652d 7469 6d65 'cl-compile-time │ │ │ -00000510: 2d69 6e69 7420 235b 6e69 6c20 22c1 4b10 -init #[nil ".K. │ │ │ -00000520: c2c3 21ac 85c4 c1c5 5c22 88c6 c7c8 c923 ..!.....\".....# │ │ │ -00000530: 88ca cb21 8722 205b 636c 2d6f 6c64 2d62 ...!." [cl-old-b │ │ │ -00000540: 632d 6669 6c65 2d66 6f72 6d20 6279 7465 c-file-form byte │ │ │ -00000550: 2d63 6f6d 7069 6c65 2d66 696c 652d 666f -compile-file-fo │ │ │ -00000560: 726d 2066 626f 756e 6470 2062 7974 652d rm fboundp byte- │ │ │ -00000570: 636f 6d70 696c 652d 666c 7573 682d 7065 compile-flush-pe │ │ │ -00000580: 6e64 696e 6720 6465 6661 6c69 6173 2023 nding defalias # │ │ │ -00000590: 5b28 666f 726d 2920 22c3 5c6e 095c 2289 [(form) ".\n.\". │ │ │ -000005a0: 12a2 c461 ab88 c4c5 c65c 6e41 5c22 4287 ...a.....\nA\"B. │ │ │ -000005b0: 085c 6e21 8722 205b 636c 2d6f 6c64 2d62 .\n!." [cl-old-b │ │ │ -000005c0: 632d 6669 6c65 2d66 6f72 6d20 6279 7465 c-file-form byte │ │ │ -000005d0: 2d63 6f6d 7069 6c65 2d6d 6163 726f 2d65 -compile-macro-e │ │ │ -000005e0: 6e76 6972 6f6e 6d65 6e74 2066 6f72 6d20 nvironment form │ │ │ -000005f0: 6d61 6372 6f65 7870 616e 6420 7072 6f67 macroexpand prog │ │ │ -00000600: 6e20 6d61 7063 6172 2062 7974 652d 636f n mapcar byte-co │ │ │ -00000610: 6d70 696c 652d 6669 6c65 2d66 6f72 6d5d mpile-file-form] │ │ │ -00000620: 2035 5d20 7075 7420 6571 6c20 6279 7465 5] put eql byte │ │ │ -00000630: 2d63 6f6d 7069 6c65 2063 6c2d 6279 7465 -compile cl-byte │ │ │ -00000640: 2d63 6f6d 7069 6c65 2d63 6f6d 7069 6c65 -compile-compile │ │ │ -00000650: 722d 6d61 6372 6f20 7275 6e2d 686f 6f6b r-macro run-hook │ │ │ -00000660: 7320 636c 2d68 6163 6b2d 6279 7465 636f s cl-hack-byteco │ │ │ -00000670: 6d70 2d68 6f6f 6b5d 2034 5d29 0a23 4031 mp-hook] 4]).#@1 │ │ │ -00000680: 3939 2028 6465 6675 6e2a 204e 414d 4520 99 (defun* NAME │ │ │ -00000690: 4152 474c 4953 5420 5b44 4f43 5354 5249 ARGLIST [DOCSTRI │ │ │ -000006a0: 4e47 5d20 424f 4459 2e2e 2e29 3a20 6465 NG] BODY...): de │ │ │ -000006b0: 6669 6e65 204e 414d 4520 6173 2061 2066 fine NAME as a f │ │ │ -000006c0: 756e 6374 696f 6e2e 0a4c 696b 6520 6e6f unction..Like no │ │ │ -000006d0: 726d 616c 2060 6465 6675 6e27 2c20 6578 rmal `defun', ex │ │ │ -000006e0: 6365 7074 2041 5247 4c49 5354 2061 6c6c cept ARGLIST all │ │ │ -000006f0: 6f77 7320 6675 6c6c 2043 6f6d 6d6f 6e20 ows full Common │ │ │ -00000700: 4c69 7370 2063 6f6e 7665 6e74 696f 6e73 Lisp conventions │ │ │ -00000710: 2c0a 616e 6420 424f 4459 2069 7320 696d ,.and BODY is im │ │ │ -00000720: 706c 6963 6974 6c79 2073 7572 726f 756e plicitly surroun │ │ │ -00000730: 6465 6420 6279 2028 626c 6f63 6b20 4e41 ded by (block NA │ │ │ -00000740: 4d45 202e 2e2e 292e 1f0a 2864 6566 616c ME ...)...(defal │ │ │ -00000750: 6961 7320 2764 6566 756e 2a20 2728 6d61 ias 'defun* '(ma │ │ │ -00000760: 6372 6f20 2e20 235b 286e 616d 6520 6172 cro . #[(name ar │ │ │ -00000770: 6773 2026 7265 7374 2062 6f64 7929 2022 gs &rest body) " │ │ │ -00000780: c509 0842 5c6e 5c22 1cc6 5c6e 0c41 4242 ...B\n\"..\n.ABB │ │ │ -00000790: 1b0c 40ab 87c7 0c40 0b45 aa81 0b2a 8722 ..@....@.E...*." │ │ │ -000007a0: 205b 626f 6479 2061 7267 7320 6e61 6d65 [body args name │ │ │ -000007b0: 2066 6f72 6d20 7265 7320 636c 2d74 7261 form res cl-tra │ │ │ -000007c0: 6e73 666f 726d 2d6c 616d 6264 6120 6465 nsform-lambda de │ │ │ -000007d0: 6675 6e20 7072 6f67 6e5d 2033 2028 2324 fun progn] 3 (#$ │ │ │ -000007e0: 202e 2031 3636 3729 5d29 290a 2340 3230 . 1667)])).#@20 │ │ │ -000007f0: 3220 2864 6566 6d61 6372 6f2a 204e 414d 2 (defmacro* NAM │ │ │ -00000800: 4520 4152 474c 4953 5420 5b44 4f43 5354 E ARGLIST [DOCST │ │ │ -00000810: 5249 4e47 5d20 424f 4459 2e2e 2e29 3a20 RING] BODY...): │ │ │ -00000820: 6465 6669 6e65 204e 414d 4520 6173 2061 define NAME as a │ │ │ -00000830: 206d 6163 726f 2e0a 4c69 6b65 206e 6f72 macro..Like nor │ │ │ -00000840: 6d61 6c20 6064 6566 6d61 6372 6f27 2c20 mal `defmacro', │ │ │ -00000850: 6578 6365 7074 2041 5247 4c49 5354 2061 except ARGLIST a │ │ │ -00000860: 6c6c 6f77 7320 6675 6c6c 2043 6f6d 6d6f llows full Commo │ │ │ -00000870: 6e20 4c69 7370 2063 6f6e 7665 6e74 696f n Lisp conventio │ │ │ -00000880: 6e73 2c0a 616e 6420 424f 4459 2069 7320 ns,.and BODY is │ │ │ -00000890: 696d 706c 6963 6974 6c79 2073 7572 726f implicitly surro │ │ │ -000008a0: 756e 6465 6420 6279 2028 626c 6f63 6b20 unded by (block │ │ │ -000008b0: 4e41 4d45 202e 2e2e 292e 1f0a 2864 6566 NAME ...)...(def │ │ │ -000008c0: 616c 6961 7320 2764 6566 6d61 6372 6f2a alias 'defmacro* │ │ │ -000008d0: 2027 286d 6163 726f 202e 2023 5b28 6e61 '(macro . #[(na │ │ │ -000008e0: 6d65 2061 7267 7320 2672 6573 7420 626f me args &rest bo │ │ │ -000008f0: 6479 2920 22c5 0908 425c 6e5c 221c c65c dy) "...B\n\"..\ │ │ │ -00000900: 6e0c 4142 421b 0c40 ab87 c70c 400b 45aa n.ABB..@....@.E. │ │ │ -00000910: 810b 2a87 2220 5b62 6f64 7920 6172 6773 ..*." [body args │ │ │ -00000920: 206e 616d 6520 666f 726d 2072 6573 2063 name form res c │ │ │ -00000930: 6c2d 7472 616e 7366 6f72 6d2d 6c61 6d62 l-transform-lamb │ │ │ -00000940: 6461 2064 6566 6d61 6372 6f20 7072 6f67 da defmacro prog │ │ │ -00000950: 6e5d 2033 2028 2324 202e 2032 3033 3429 n] 3 (#$ . 2034) │ │ │ -00000960: 5d29 290a 2340 3136 3820 2866 756e 6374 ])).#@168 (funct │ │ │ -00000970: 696f 6e2a 2053 594d 424f 4c2d 4f52 2d4c ion* SYMBOL-OR-L │ │ │ -00000980: 414d 4244 4129 3a20 696e 7472 6f64 7563 AMBDA): introduc │ │ │ -00000990: 6520 6120 6675 6e63 7469 6f6e 2e0a 4c69 e a function..Li │ │ │ -000009a0: 6b65 206e 6f72 6d61 6c20 6066 756e 6374 ke normal `funct │ │ │ -000009b0: 696f 6e27 2c20 6578 6365 7074 2074 6861 ion', except tha │ │ │ -000009c0: 7420 6966 2061 7267 756d 656e 7420 6973 t if argument is │ │ │ -000009d0: 2061 206c 616d 6264 6120 666f 726d 2c20 a lambda form, │ │ │ -000009e0: 6974 730a 4152 474c 4953 5420 616c 6c6f its.ARGLIST allo │ │ │ -000009f0: 7773 2066 756c 6c20 436f 6d6d 6f6e 204c ws full Common L │ │ │ -00000a00: 6973 7020 636f 6e76 656e 7469 6f6e 732e isp conventions. │ │ │ -00000a10: 1f0a 2864 6566 616c 6961 7320 2766 756e ..(defalias 'fun │ │ │ -00000a20: 6374 696f 6e2a 2027 286d 6163 726f 202e ction* '(macro . │ │ │ -00000a30: 2023 5b28 6675 6e63 2920 2209 a2c3 61ab #[(func) "...a. │ │ │ -00000a40: 9bc4 0941 c55c 221a c6c3 5c6e 4142 4418 ...A.\"...\nABD. │ │ │ -00000a50: 5c6e 40ab 87c7 5c6e 4008 45aa 8108 2a87 \n@...\n@.E...*. │ │ │ -00000a60: c609 4487 2220 5b66 6f72 6d20 6675 6e63 ..D." [form func │ │ │ -00000a70: 2072 6573 206c 616d 6264 6120 636c 2d74 res lambda cl-t │ │ │ -00000a80: 7261 6e73 666f 726d 2d6c 616d 6264 6120 ransform-lambda │ │ │ -00000a90: 636c 2d6e 6f6e 6520 6675 6e63 7469 6f6e cl-none function │ │ │ -00000aa0: 2070 726f 676e 5d20 3320 2823 2420 2e20 progn] 3 (#$ . │ │ │ -00000ab0: 3234 3130 295d 2929 0a28 6465 6661 6c69 2410)])).(defali │ │ │ -00000ac0: 6173 2027 636c 2d74 7261 6e73 666f 726d as 'cl-transform │ │ │ -00000ad0: 2d66 756e 6374 696f 6e2d 7072 6f70 6572 -function-proper │ │ │ -00000ae0: 7479 2023 5b28 6675 6e63 2070 726f 7020 ty #[(func prop │ │ │ -00000af0: 666f 726d 2920 22c4 095c 6e5c 221b c5c6 form) "..\n\"... │ │ │ -00000b00: 0b40 4141 c7c8 5c6e 44c8 0844 c9ca 0b41 .@AA..\nD..D...A │ │ │ -00000b10: 4244 4643 2329 8722 205b 7072 6f70 2066 BDFC#)." [prop f │ │ │ -00000b20: 6f72 6d20 6675 6e63 2072 6573 2063 6c2d orm func res cl- │ │ │ -00000b30: 7472 616e 7366 6f72 6d2d 6c61 6d62 6461 transform-lambda │ │ │ -00000b40: 2061 7070 656e 6420 2870 726f 676e 2920 append (progn) │ │ │ -00000b50: 7075 7420 7175 6f74 6520 6675 6e63 7469 put quote functi │ │ │ -00000b60: 6f6e 206c 616d 6264 615d 2039 5d29 0a28 on lambda] 9]).( │ │ │ -00000b70: 6279 7465 2d63 6f64 6520 22c0 0942 11c2 byte-code "..B.. │ │ │ -00000b80: 10c3 0942 11c4 c321 ac85 c5c3 c65c 2288 ...B...!.....\". │ │ │ -00000b90: c687 2220 5b6c 616d 6264 612d 6c69 7374 .." [lambda-list │ │ │ -00000ba0: 2d6b 6579 776f 7264 7320 6375 7272 656e -keywords curren │ │ │ -00000bb0: 742d 6c6f 6164 2d6c 6973 7420 2826 6f70 t-load-list (&op │ │ │ -00000bc0: 7469 6f6e 616c 2026 7265 7374 2026 6b65 tional &rest &ke │ │ │ -00000bd0: 7920 2661 6c6c 6f77 2d6f 7468 6572 2d6b y &allow-other-k │ │ │ -00000be0: 6579 7320 2661 7578 2026 7768 6f6c 6520 eys &aux &whole │ │ │ -00000bf0: 2662 6f64 7920 2665 6e76 6972 6f6e 6d65 &body &environme │ │ │ -00000c00: 6e74 2920 636c 2d6d 6163 726f 2d65 6e76 nt) cl-macro-env │ │ │ -00000c10: 6972 6f6e 6d65 6e74 2064 6566 6175 6c74 ironment default │ │ │ -00000c20: 2d62 6f75 6e64 7020 7365 742d 6465 6661 -boundp set-defa │ │ │ -00000c30: 756c 7420 6e69 6c5d 2033 290a 2864 6566 ult nil] 3).(def │ │ │ -00000c40: 616c 6961 7320 2763 6c2d 7570 6361 7365 alias 'cl-upcase │ │ │ -00000c50: 2d61 7267 2023 5b28 6172 6729 2022 0c39 -arg #[(arg) ".9 │ │ │ -00000c60: ab8e 0c08 73ab 820c 87c5 c60c 2196 2187 ....s.......!.!. │ │ │ -00000c70: 0c3c abc5 0c0b 73ab 85c7 c8c9 5c22 880c .<....s.....\".. │ │ │ -00000c80: 0b42 13ca 0c21 cb1a 1ccc 0c21 8919 41ab .B...!.....!..A. │ │ │ -00000c90: 8709 cd09 4144 a188 29ce 0c73 4140 8912 ....AD..)..sA@.. │ │ │ -00000ca0: ab88 cfce cf5c 6e0c 5c22 5c22 14d0 0c73 .....\n.\"\"...s │ │ │ -00000cb0: ab85 cfd0 0c5c 2214 d1d2 0c5c 222a 870c .....\"....\"*.. │ │ │ -00000cc0: 8722 205b 6c61 6d62 6461 2d6c 6973 742d ." [lambda-list- │ │ │ -00000cd0: 6b65 7977 6f72 6473 2070 206a 756e 6b20 keywords p junk │ │ │ -00000ce0: 6172 676c 6973 742d 7669 7369 7465 6420 arglist-visited │ │ │ -00000cf0: 6172 6720 696e 7465 726e 2073 796d 626f arg intern symbo │ │ │ -00000d00: 6c2d 6e61 6d65 2065 7272 6f72 2063 6972 l-name error cir │ │ │ -00000d10: 6375 6c61 722d 6c69 7374 2028 6172 6729 cular-list (arg) │ │ │ -00000d20: 2063 6f70 792d 6c69 7374 206e 696c 206c copy-list nil l │ │ │ -00000d30: 6173 7420 2672 6573 7420 2663 6c2d 6465 ast &rest &cl-de │ │ │ -00000d40: 6673 2064 656c 7120 2663 6c2d 7175 6f74 fs delq &cl-quot │ │ │ -00000d50: 6520 6d61 7063 6172 2063 6c2d 7570 6361 e mapcar cl-upca │ │ │ -00000d60: 7365 2d61 7267 5d20 365d 290a 2340 3938 se-arg] 6]).#@98 │ │ │ -00000d70: 2052 6574 7572 6e73 2073 7472 696e 6720 Returns string │ │ │ -00000d80: 7769 7468 2070 7269 6e74 6564 2072 6570 with printed rep │ │ │ -00000d90: 7265 7365 6e74 6174 696f 6e20 6f66 2061 resentation of a │ │ │ -00000da0: 7267 756d 656e 7473 206c 6973 742e 0a53 rguments list..S │ │ │ -00000db0: 7570 706f 7274 7320 436f 6d6d 6f6e 204c upports Common L │ │ │ -00000dc0: 6973 7020 6c61 6d62 6461 206c 6973 7473 isp lambda lists │ │ │ -00000dd0: 2e1f 0a28 6465 6661 6c69 6173 2027 636c ...(defalias 'cl │ │ │ -00000de0: 2d66 756e 6374 696f 6e2d 6172 676c 6973 -function-arglis │ │ │ -00000df0: 7420 235b 286e 616d 6520 6172 676c 6973 t #[(name arglis │ │ │ -00000e00: 7429 2022 093c ac86 0939 ac82 c287 c389 t) ".<...9...... │ │ │ -00000e10: 10c4 c58f 8722 205b 6172 676c 6973 742d ....." [arglist- │ │ │ -00000e20: 7669 7369 7465 6420 6172 676c 6973 7420 visited arglist │ │ │ -00000e30: 224e 6f74 2061 7661 696c 6162 6c65 2220 "Not available" │ │ │ -00000e40: 6e69 6c20 2862 7974 652d 636f 6465 2022 nil (byte-code " │ │ │ -00000e50: c208 c361 ab83 c4aa 8108 09ad 9809 3cab ...a..........<. │ │ │ -00000e60: 85c5 0921 aa8f 0939 ab87 c5c6 0944 21aa ...!...9.....D!. │ │ │ -00000e70: 84c7 c809 5c22 4221 8722 205b 6e61 6d65 ....\"B!." [name │ │ │ -00000e80: 2061 7267 6c69 7374 2070 7269 6e31 2d74 arglist prin1-t │ │ │ -00000e90: 6f2d 7374 7269 6e67 2063 6c2d 6e6f 6e65 o-string cl-none │ │ │ -00000ea0: 206c 616d 6264 6120 636c 2d75 7063 6173 lambda cl-upcas │ │ │ -00000eb0: 652d 6172 6720 2672 6573 7420 7772 6f6e e-arg &rest wron │ │ │ -00000ec0: 672d 7479 7065 2d61 7267 756d 656e 7420 g-type-argument │ │ │ -00000ed0: 6c69 7374 705d 2035 2920 2828 7420 224e listp] 5) ((t "N │ │ │ -00000ee0: 6f74 2061 7661 696c 6162 6c65 2229 295d ot available"))] │ │ │ -00000ef0: 2034 2028 2324 202e 2033 3434 3129 5d29 4 (#$ . 3441)]) │ │ │ -00000f00: 0a28 6465 6661 6c69 6173 2027 636c 2d74 .(defalias 'cl-t │ │ │ -00000f10: 7261 6e73 666f 726d 2d6c 616d 6264 6120 ransform-lambda │ │ │ -00000f20: 235b 2866 6f72 6d20 6269 6e64 2d62 6c6f #[(form bind-blo │ │ │ -00000f30: 636b 2920 220e 2840 1d0e 2841 1cc6 8919 ck) ".(@..(A.... │ │ │ -00000f40: 1e29 c689 1e24 18c6 891e 2a1a c61b c71e .)...$....*..... │ │ │ -00000f50: 250c 403b ab8b 0c41 ab87 0c89 4114 4016 %.@;...A....A.@. │ │ │ -00000f60: 250e 25c8 c9ca 0e26 0d5c 22cb b005 5c6e %.%....&.\"...\n │ │ │ -00000f70: 4212 0c40 3bac 870c 40a2 cc61 ab8a 0c89 B..@;...@..a.... │ │ │ -00000f80: 4114 405c 6e42 12aa 6a0d 3cab 85cd 0d21 A.@\nB..j.<....! │ │ │ -00000f90: aa83 ce0d 4415 cf0d 2189 1e23 41ab 890e ....D...!..#A... │ │ │ -00000fa0: 23ce 0e23 4144 a188 29d0 0d73 4140 8911 #..#AD..)..sA@.. │ │ │ -00000fb0: ab8c d1d0 d109 0d5c 225c 2215 0941 4011 .......\"\"..A@. │ │ │ -00000fc0: d20d 7389 1629 ab85 d1d2 0d5c 2215 d30d ..s..).....\"... │ │ │ -00000fd0: 73ab 84d4 d521 88d6 0d73 891e 2341 401e s....!...s..#A@. │ │ │ -00000fe0: 270e 23ab 92d1 0e23 40d1 0e27 0d5c 225c '.#....#@..'.\"\ │ │ │ -00000ff0: 22d7 0e27 d844 44a4 152a 0dab a40d 4039 "..'.DD..*....@9 │ │ │ -00001000: ab9f 0d40 d973 ac99 0d40 da61 ab89 09ac ...@.s...@.a.... │ │ │ -00001010: 900d 4140 3aac 8a0d 8941 1540 0b42 13aa ..A@:....A.@.B.. │ │ │ -00001020: 590e 26db 61ac 88dc 0e26 0c42 4243 140d Y.&.a....&.BBC.. │ │ │ -00001030: ac8b c60b 9f5c 6e9f 0ca4 4242 aac2 da0b .....\n...BB.... │ │ │ -00001040: 73ab 84da 0d42 15dd 0dc6 0b47 da0b 73ab s....B.....G..s. │ │ │ -00001050: 83de aa81 df5a 2388 089f 100e 24ad 87e0 .....Z#.....$... │ │ │ -00001060: e10e 249f 4242 0b9f ce08 8941 1040 4044 ..$.BB.....A.@@D │ │ │ -00001070: a45c 6e9f e208 440e 2a9f a40c a443 a442 .\n...D.*....C.B │ │ │ -00001080: 422e 5c6e 8722 205b 6269 6e64 2d6c 6574 B.\n." [bind-let │ │ │ -00001090: 7320 6269 6e64 2d64 6566 7320 6865 6164 s bind-defs head │ │ │ -000010a0: 6572 2073 696d 706c 652d 6172 6773 2062 er simple-args b │ │ │ -000010b0: 6f64 7920 6172 6773 206e 696c 2022 2220 ody args nil "" │ │ │ -000010c0: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ -000010d0: 616d 6264 6120 6c69 7374 3a5c 6e22 2022 ambda list:\n" " │ │ │ -000010e0: 2020 2220 636c 2d66 756e 6374 696f 6e2d " cl-function- │ │ │ -000010f0: 6172 676c 6973 7420 225c 6e5c 6e22 2069 arglist "\n\n" i │ │ │ -00001100: 6e74 6572 6163 7469 7665 2063 6f70 792d nteractive copy- │ │ │ -00001110: 6c69 7374 2026 7265 7374 206c 6173 7420 list &rest last │ │ │ -00001120: 2663 6c2d 6465 6673 2064 656c 7120 2663 &cl-defs delq &c │ │ │ -00001130: 6c2d 7175 6f74 6520 2677 686f 6c65 2065 l-quote &whole e │ │ │ -00001140: 7272 6f72 2022 2677 686f 6c65 206e 6f74 rror "&whole not │ │ │ -00001150: 2063 7572 7265 6e74 6c79 2069 6d70 6c65 currently imple │ │ │ -00001160: 6d65 6e74 6564 2220 2665 6e76 6972 6f6e mented" &environ │ │ │ -00001170: 6d65 6e74 2026 6175 7820 636c 2d6d 6163 ment &aux cl-mac │ │ │ -00001180: 726f 2d65 6e76 6972 6f6e 6d65 6e74 2028 ro-environment ( │ │ │ -00001190: 6e69 6c20 2672 6573 7420 2662 6f64 7920 nil &rest &body │ │ │ -000011a0: 266b 6579 2026 6175 7829 2026 6f70 7469 &key &aux) &opti │ │ │ -000011b0: 6f6e 616c 2063 6c2d 6e6f 6e65 2062 6c6f onal cl-none blo │ │ │ -000011c0: 636b 2063 6c2d 646f 2d61 7267 6c69 7374 ck cl-do-arglist │ │ │ -000011d0: 2031 2030 2065 7661 6c2d 7768 656e 2028 1 0 eval-when ( │ │ │ -000011e0: 636f 6d70 696c 6520 6c6f 6164 2065 7661 compile load eva │ │ │ -000011f0: 6c29 206c 6574 2a20 7020 6269 6e64 2d69 l) let* p bind-i │ │ │ -00001200: 6e69 7473 2064 6f63 2062 696e 642d 626c nits doc bind-bl │ │ │ -00001210: 6f63 6b20 7620 666f 726d 2062 696e 642d ock v form bind- │ │ │ -00001220: 656e 7175 6f74 6520 6269 6e64 2d66 6f72 enquote bind-for │ │ │ -00001230: 6d73 5d20 375d 290a 2864 6566 616c 6961 ms] 7]).(defalia │ │ │ -00001240: 7320 2763 6c2d 646f 2d61 7267 6c69 7374 s 'cl-do-arglist │ │ │ -00001250: 2023 5b28 6172 6773 2065 7870 7220 266f #[(args expr &o │ │ │ -00001260: 7074 696f 6e61 6c20 6e75 6d29 2022 0d3c ptional num) ".< │ │ │ -00001270: ac9a 0d0e 4273 ac84 0d39 ac85 c6c7 0d5c ....Bs...9.....\ │ │ │ -00001280: 2287 0d0e 5144 0e43 4289 1643 87c8 0d21 "...QD.CB..C...! │ │ │ -00001290: 15c9 0d21 891a 41ab 875c 6eca 5c6e 4144 ...!..A..\n.\nAD │ │ │ -000012a0: a188 29cb 0d73 891a ab84 5c6e caa0 8829 ..)..s....\n...) │ │ │ -000012b0: cc0d 73ab 84c6 cd21 880d ca0d 73ce 20ab ..s....!....s. . │ │ │ -000012c0: 840e 56aa 81cf d089 8989 1e44 1e47 1e4e ..V........D.G.N │ │ │ -000012d0: 181e 481b 1e52 0e40 ac83 d116 400b 4140 ..H..R.@....@.A@ │ │ │ -000012e0: 3cab 86d2 d321 13aa 840b 4140 130b 0e51 <....!....A@...Q │ │ │ -000012f0: 440e 4342 1643 0d40 d461 ab8e 0d41 400d D.CB.C.@.a...A@. │ │ │ -00001300: 4141 150b 440e 4342 1643 0d1a 0b16 445c AA..D.CB.C....D\ │ │ │ -00001310: 6eab 985c 6e40 0e42 73ac 915c 6e0d 61ac n..\n@.Bs..\n.a. │ │ │ -00001320: 86d5 0e44 4416 445c 6e41 8912 ac68 5c6e ...DD.D\nA...h\n │ │ │ -00001330: 40d6 73ab 92d7 d80b 44d9 0d5c 6e5c 2247 @.s.....D..\n\"G │ │ │ -00001340: 4516 440d 5c6e 613f 1647 290d abd1 0d40 E.D.\na?.G)....@ │ │ │ -00001350: 0e42 73ac ca0d 41ac 840e 47ac 83da aa81 .Bs...A...G..... │ │ │ -00001360: db0b 441e 45dc 0d89 4115 400e 4eac 860e ..D.E...A.@.N... │ │ │ -00001370: 48d1 55ab 840e 45aa 99dd 0e44 0e45 dedf H.U...E....D.E.. │ │ │ -00001380: e00e 49e1 613f ad84 e20e 4944 d80b 4445 ..I.a?....ID..DE │ │ │ -00001390: 4546 5c22 8829 0e40 5416 40e3 164e aa2c EF\".).@T.@..N., │ │ │ -000013a0: 0d40 e461 abed 0d89 4115 40ab e60d ab70 .@.a....A.@....p │ │ │ -000013b0: 0d40 0e42 73ac 690d 8941 1540 891c 3aac .@.Bs.i..A.@..:. │ │ │ -000013c0: 830c 4314 0c41 41ab 8adc e50c 38e6 0be3 ..C..AA.....8... │ │ │ -000013d0: 455c 2288 0c41 ab85 0c41 40aa 8c0e 4a40 E\"..A...A@...J@ │ │ │ -000013e0: ae87 0c40 0e4a b741 40da 0b44 1e45 8919 ...@.J.A@..D.E.. │ │ │ -000013f0: ab88 0e4f ab84 e209 4411 dc0c 4009 ab88 ...O....D...@... │ │ │ -00001400: dd0b 0e45 0946 aa82 0e45 5c22 880e 4054 ...E.F...E\"..@T │ │ │ -00001410: 1640 2baa 1a0d 40ca 61ab 940d 4140 0d41 .@+...@.a...A@.A │ │ │ -00001420: 4115 891c 3aab 85dc 0c0b 5c22 8829 aaaf A...:.....\".).. │ │ │ -00001430: 0d40 e761 aca9 0e48 d155 aca3 0e47 ac9f .@.a...H.U...G.. │ │ │ -00001440: dd0b dee8 e00e 49e1 613f ad84 e20e 4944 ......I.a?....ID │ │ │ -00001450: e90e 40d8 0b44 4545 4545 0e4b 4216 4b0d ..@..DEEEE.KB.K. │ │ │ -00001460: 40e7 6183 d302 0d89 4115 4083 d302 0dab @.a.....A.@..... │ │ │ -00001470: 6e0d 400e 4273 ac67 0d89 4115 4089 1c3a n.@.Bs.g..A.@..: │ │ │ -00001480: ac83 0c43 140c 403a ab85 0c40 40aa 87ea ...C..@:...@@... │ │ │ -00001490: ebec 0c40 5c22 211e 410c 403a ab86 0c40 ...@\"!.A.@:...@ │ │ │ -000014a0: 4140 aa82 0c40 1e4c 0c41 ab85 0c41 40aa A@...@.L.A...A@. │ │ │ -000014b0: 8c0e 4a40 ae87 0e4c 0e4a b741 4019 ede2 ..J@...L.J.A@... │ │ │ -000014c0: 0e41 440b 451e 4d09 ab88 0e4f ab84 e209 .AD.E.M....O.... │ │ │ -000014d0: 4411 0c41 41ab aee5 0c38 ae82 d220 1e46 D..AA....8... .F │ │ │ -000014e0: dbd5 0e46 4444 1e53 dc0e 460e 4d5c 2288 ...FDD.S..F.M\". │ │ │ -000014f0: dc0e 4cdd 0e46 ee0e 53ef 0e46 e345 4509 ..L..F..S..F.EE. │ │ │ -00001500: 465c 2288 2aaa a8dc 0e4c dbd5 09ac 840e F\".*....L...... │ │ │ -00001510: 4daa 98f0 0e4d f109 21e3 61ab 89e2 d0f2 M....M..!.a..... │ │ │ -00001520: 0921 4444 aa84 e0d0 0945 4544 445c 2288 .!DD.....EEDD\". │ │ │ -00001530: 0e41 0842 10f3 0e41 21d1 48f4 55ab 920e .A.B...A!.H.U... │ │ │ -00001540: 4189 4c88 ef0e 41e2 0e41 4445 0e54 4216 A.L...A..ADE.TB. │ │ │ -00001550: 542d 82f0 0108 9f10 0d40 f561 ab87 0d89 T-.......@.a.... │ │ │ -00001560: 4115 40ac dd08 abda 0e48 d155 acd4 d2f6 A.@......H.U.... │ │ │ -00001570: 211e 3ff7 1e50 f80e 3ff9 eddb 0e3f 44e2 !.?..P..?....?D. │ │ │ -00001580: fa08 0e50 5c22 4445 ef0e 3fd5 890e 3f44 ...P\"DE..?...?D │ │ │ -00001590: 4445 44db d5ed e20e 5042 0b45 4444 ef0e DED.....PB.EDD.. │ │ │ -000015a0: 3fd0 4544 e3c6 ebfb 085c 22db 0e3f 4445 ?.ED.....\"..?DE │ │ │ -000015b0: 4446 451e 55fc 0e3f 0b44 430e 5545 0e4b DFE.U..?.DC.UE.K │ │ │ -000015c0: 4216 4b2b 0d40 fd61 abcb 0d89 4115 40ab B.K+.@.a....A.@. │ │ │ -000015d0: c40d ab70 0d40 0e42 73ac 690d 403a abaa ...p.@.Bs.i.@:.. │ │ │ -000015e0: 0e4f ab97 0d40 4140 ab91 dc0d 4040 e20d .O...@A@....@@.. │ │ │ -000015f0: 8941 1540 4140 445c 2288 aa56 dc0d 4040 .A.@A@D\"..V..@@ │ │ │ -00001600: 0d89 4115 4041 405c 2288 aa47 dc0d 8941 ..A.@A@\"..G...A │ │ │ -00001610: 1540 d05c 2288 aa3c 0dad 85c6 fe0e 525c .@.\"..<......R\ │ │ │ -00001620: 222e 0787 2220 5b6b 6579 7320 6465 6620 "..." [keys def │ │ │ -00001630: 7020 7265 7374 6172 6720 6172 6720 6172 p restarg arg ar │ │ │ -00001640: 6773 2065 7272 6f72 2022 496e 7661 6c69 gs error "Invali │ │ │ -00001650: 6420 6172 6775 6d65 6e74 206e 616d 653a d argument name: │ │ │ -00001660: 2025 7322 2063 6f70 792d 6c69 7374 206c %s" copy-list l │ │ │ -00001670: 6173 7420 2672 6573 7420 2662 6f64 7920 ast &rest &body │ │ │ -00001680: 2665 6e76 6972 6f6e 6d65 6e74 2022 2665 &environment "&e │ │ │ -00001690: 6e76 6972 6f6e 6d65 6e74 2075 7365 6420 nvironment used │ │ │ -000016a0: 696e 636f 7272 6563 746c 7922 2063 6c2d incorrectly" cl- │ │ │ -000016b0: 636f 6d70 696c 696e 672d 6669 6c65 2033 compiling-file 3 │ │ │ -000016c0: 206e 696c 2030 2067 656e 7379 6d20 222d nil 0 gensym "- │ │ │ -000016d0: 2d72 6573 742d 2d22 2026 7768 6f6c 6520 -rest--" &whole │ │ │ -000016e0: 6364 7220 286e 696c 2026 6175 7829 203d cdr (nil &aux) = │ │ │ -000016f0: 206c 656e 6774 6820 6c64 6966 6620 706f length ldiff po │ │ │ -00001700: 7020 6361 7220 636c 2d64 6f2d 6172 676c p car cl-do-argl │ │ │ -00001710: 6973 7420 6966 2073 6967 6e61 6c20 2777 ist if signal 'w │ │ │ -00001720: 726f 6e67 2d6e 756d 6265 722d 6f66 2d61 rong-number-of-a │ │ │ -00001730: 7267 756d 656e 7473 206c 6973 7420 636c rguments list cl │ │ │ -00001740: 2d6e 6f6e 6520 7175 6f74 6520 7420 266f -none quote t &o │ │ │ -00001750: 7074 696f 6e61 6c20 3220 616e 6420 266b ptional 2 and &k │ │ │ -00001760: 6579 2027 7772 6f6e 672d 6e75 6d62 6572 ey 'wrong-number │ │ │ -00001770: 2d6f 662d 6172 6775 6d65 6e74 7320 2b20 -of-arguments + │ │ │ -00001780: 696e 7465 726e 2066 6f72 6d61 7420 223a intern format ": │ │ │ -00001790: 2573 2220 6d65 6d71 2070 726f 6731 2073 %s" memq prog1 s │ │ │ -000017a0: 6574 7120 6f72 2063 6c2d 636f 6e73 742d etq or cl-const- │ │ │ -000017b0: 6578 7072 2d70 2063 6c2d 636f 6e73 742d expr-p cl-const- │ │ │ -000017c0: 6578 7072 2d76 616c 2073 796d 626f 6c2d expr-val symbol- │ │ │ -000017d0: 6e61 6d65 203f 3a20 2661 6c6c 6f77 2d6f name ?: &allow-o │ │ │ -000017e0: 7468 6572 2d6b 6579 7320 222d 2d6b 6579 ther-keys "--key │ │ │ -000017f0: 732d 2d22 2028 3a61 6c6c 6f77 2d6f 7468 s--" (:allow-oth │ │ │ -00001800: 6572 2d6b 6579 7329 2077 6869 6c65 2063 er-keys) while c │ │ │ -00001810: 6f6e 6420 6170 7065 6e64 2022 4b65 7977 ond append "Keyw │ │ │ -00001820: 6f72 6420 6172 6775 6d65 6e74 2025 2573 ord argument %%s │ │ │ -00001830: 206e 6f74 206f 6e65 206f 6620 2573 2220 not one of %s" │ │ │ -00001840: 6c65 7420 2661 7578 2022 4d61 6c66 6f72 let &aux "Malfor │ │ │ -00001850: 6d65 6420 6172 6775 6d65 6e74 206c 6973 med argument lis │ │ │ -00001860: 7420 2573 2220 7661 7220 6e75 6d20 6b61 t %s" var num ka │ │ │ -00001870: 7267 206c 616d 6264 612d 6c69 7374 2d6b rg lambda-list-k │ │ │ -00001880: 6579 776f 7264 7320 6269 6e64 2d6c 6574 eywords bind-let │ │ │ -00001890: 7320 6d69 6e61 7267 2070 6f70 6172 6720 s minarg poparg │ │ │ -000018a0: 7465 6d70 2065 7861 6374 6172 6720 7361 temp exactarg sa │ │ │ -000018b0: 6665 7479 2062 696e 642d 626c 6f63 6b20 fety bind-block │ │ │ -000018c0: 6269 6e64 2d64 6566 7320 6269 6e64 2d66 bind-defs bind-f │ │ │ -000018d0: 6f72 6d73 2076 6172 6720 6c6f 6f6b 206c orms varg look l │ │ │ -000018e0: 6174 6572 6172 6720 6269 6e64 2d65 6e71 aterarg bind-enq │ │ │ -000018f0: 756f 7465 2061 6c6c 6f77 2065 7870 7220 uote allow expr │ │ │ -00001900: 7361 7665 2d61 7267 7320 7661 6c20 6269 save-args val bi │ │ │ -00001910: 6e64 2d69 6e69 7473 2063 6865 636b 2063 nd-inits check c │ │ │ -00001920: 6c2d 6f70 7469 6d69 7a65 2d73 6166 6574 l-optimize-safet │ │ │ -00001930: 795d 2031 325d 290a 2864 6566 616c 6961 y] 12]).(defalia │ │ │ -00001940: 7320 2763 6c2d 6172 676c 6973 742d 6172 s 'cl-arglist-ar │ │ │ -00001950: 6773 2023 5b28 6172 6773 2920 220b 3cac gs #[(args) ".<. │ │ │ -00001960: 830b 4387 c589 891c 1a19 0b3a abbe 0b89 ..C........:.... │ │ │ -00001970: 4113 4089 1408 73ab 840c 12aa 6d0c c661 A.@...s.....m..a │ │ │ -00001980: ab87 0b89 4113 88aa 610c 3aab 865c 6eab ....A...a.:..\n. │ │ │ -00001990: 830c 4014 0c3a ab8d 0c41 ab89 5c6e c761 ..@..:...A..\n.a │ │ │ -000019a0: ab84 0c41 4014 09c8 0c21 a411 aa3e 090b ...A@....!...>.. │ │ │ -000019b0: ad82 0b43 a42b 8722 205b 6c61 6d62 6461 ...C.+." [lambda │ │ │ -000019c0: 2d6c 6973 742d 6b65 7977 6f72 6473 2072 -list-keywords r │ │ │ -000019d0: 6573 206b 696e 6420 6172 6773 2061 7267 es kind args arg │ │ │ -000019e0: 206e 696c 2026 636c 2d64 6566 7320 266b nil &cl-defs &k │ │ │ -000019f0: 6579 2063 6c2d 6172 676c 6973 742d 6172 ey cl-arglist-ar │ │ │ -00001a00: 6773 5d20 345d 290a 2864 6566 616c 6961 gs] 4]).(defalia │ │ │ -00001a10: 7320 2764 6573 7472 7563 7475 7269 6e67 s 'destructuring │ │ │ -00001a20: 2d62 696e 6420 2728 6d61 6372 6f20 2e20 -bind '(macro . │ │ │ -00001a30: 235b 2861 7267 7320 6578 7072 2026 7265 #[(args expr &re │ │ │ -00001a40: 7374 2062 6f64 7929 2022 c689 1d1c c689 st body) "...... │ │ │ -00001a50: 1b1a c719 c808 ae81 c90e 0d5c 2288 cacb ...........\"... │ │ │ -00001a60: 0bcc 0d9f 440c 9fa4 0e0e a443 232d 8722 ....D......C#-." │ │ │ -00001a70: 205b 6172 6773 2062 696e 642d 626c 6f63 [args bind-bloc │ │ │ -00001a80: 6b20 6269 6e64 2d64 6566 7320 6269 6e64 k bind-defs bind │ │ │ -00001a90: 2d69 6e69 7473 2062 696e 642d 666f 726d -inits bind-form │ │ │ -00001aa0: 7320 6269 6e64 2d6c 6574 7320 6e69 6c20 s bind-lets nil │ │ │ -00001ab0: 636c 2d6e 6f6e 6520 636c 2d64 6f2d 6172 cl-none cl-do-ar │ │ │ -00001ac0: 676c 6973 7420 2826 6175 7829 2061 7070 glist (&aux) app │ │ │ -00001ad0: 656e 6420 2870 726f 676e 2920 6c65 742a end (progn) let* │ │ │ -00001ae0: 2065 7870 7220 626f 6479 5d20 365d 2929 expr body] 6])) │ │ │ -00001af0: 0a28 6279 7465 2d63 6f64 6520 22c1 0842 .(byte-code "..B │ │ │ -00001b00: 10c2 c121 ac85 c3c1 c45c 2288 c487 2220 ...!.....\"..." │ │ │ -00001b10: 5b63 7572 7265 6e74 2d6c 6f61 642d 6c69 [current-load-li │ │ │ -00001b20: 7374 2063 6c2d 6e6f 742d 746f 706c 6576 st cl-not-toplev │ │ │ -00001b30: 656c 2064 6566 6175 6c74 2d62 6f75 6e64 el default-bound │ │ │ -00001b40: 7020 7365 742d 6465 6661 756c 7420 6e69 p set-default ni │ │ │ -00001b50: 6c5d 2033 290a 2340 3239 3020 2865 7661 l] 3).#@290 (eva │ │ │ -00001b60: 6c2d 7768 656e 2028 5748 454e 2e2e 2e29 l-when (WHEN...) │ │ │ -00001b70: 2042 4f44 592e 2e2e 293a 2063 6f6e 7472 BODY...): contr │ │ │ -00001b80: 6f6c 2077 6865 6e20 424f 4459 2069 7320 ol when BODY is │ │ │ -00001b90: 6576 616c 7561 7465 642e 0a49 6620 6063 evaluated..If `c │ │ │ -00001ba0: 6f6d 7069 6c65 2720 6973 2069 6e20 5748 ompile' is in WH │ │ │ -00001bb0: 454e 2c20 424f 4459 2069 7320 6576 616c EN, BODY is eval │ │ │ -00001bc0: 7561 7465 6420 7768 656e 2063 6f6d 7069 uated when compi │ │ │ -00001bd0: 6c65 6420 6174 2074 6f70 2d6c 6576 656c led at top-level │ │ │ -00001be0: 2e0a 4966 2060 6c6f 6164 2720 6973 2069 ..If `load' is i │ │ │ -00001bf0: 6e20 5748 454e 2c20 424f 4459 2069 7320 n WHEN, BODY is │ │ │ -00001c00: 6576 616c 7561 7465 6420 7768 656e 206c evaluated when l │ │ │ -00001c10: 6f61 6465 6420 6166 7465 7220 746f 702d oaded after top- │ │ │ -00001c20: 6c65 7665 6c20 636f 6d70 696c 652e 0a49 level compile..I │ │ │ -00001c30: 6620 6065 7661 6c27 2069 7320 696e 2057 f `eval' is in W │ │ │ -00001c40: 4845 4e2c 2042 4f44 5920 6973 2065 7661 HEN, BODY is eva │ │ │ -00001c50: 6c75 6174 6564 2077 6865 6e20 696e 7465 luated when inte │ │ │ -00001c60: 7270 7265 7465 6420 6f72 2061 7420 6e6f rpreted or at no │ │ │ -00001c70: 6e2d 746f 702d 6c65 7665 6c2e 1f0a 2864 n-top-level...(d │ │ │ -00001c80: 6566 616c 6961 7320 2765 7661 6c2d 7768 efalias 'eval-wh │ │ │ -00001c90: 656e 2027 286d 6163 726f 202e 2023 5b28 en '(macro . #[( │ │ │ -00001ca0: 7768 656e 2026 7265 7374 2062 6f64 7929 when &rest body) │ │ │ -00001cb0: 2022 c4c5 21ab c1c5 20ab bd08 acba c6c7 "..!... ....... │ │ │ -00001cc0: 21ac b5c8 0b73 ae83 c90b 73ca 1819 cb0b !....s....s..... │ │ │ -00001cd0: 73ac 85cc 0b73 ab94 09ab 88cd cecf 5c6e s....s........\n │ │ │ -00001ce0: 5c22 42aa 93d0 d189 5c6e 4242 42aa 8a09 \"B.....\nBBB... │ │ │ -00001cf0: ab86 d2cd 5c6e 4221 88d1 2a87 d20b 73ac ....\nB!..*...s. │ │ │ -00001d00: 85d3 0b73 ad83 cd5c 6e42 8722 205b 636c ...s...\nB." [cl │ │ │ -00001d10: 2d6e 6f74 2d74 6f70 6c65 7665 6c20 636f -not-toplevel co │ │ │ -00001d20: 6d70 2062 6f64 7920 7768 656e 2066 626f mp body when fbo │ │ │ -00001d30: 756e 6470 2063 6c2d 636f 6d70 696c 696e undp cl-compilin │ │ │ -00001d40: 672d 6669 6c65 2062 6f75 6e64 7020 666f g-file boundp fo │ │ │ -00001d50: 722d 6566 6665 6374 2063 6f6d 7069 6c65 r-effect compile │ │ │ -00001d60: 203a 636f 6d70 696c 652d 746f 706c 6576 :compile-toplev │ │ │ -00001d70: 656c 2074 206c 6f61 6420 3a6c 6f61 642d el t load :load- │ │ │ -00001d80: 746f 706c 6576 656c 2070 726f 676e 206d toplevel progn m │ │ │ -00001d90: 6170 6361 7220 636c 2d63 6f6d 7069 6c65 apcar cl-compile │ │ │ -00001da0: 2d74 696d 652d 746f 6f20 6966 206e 696c -time-too if nil │ │ │ -00001db0: 2065 7661 6c20 3a65 7865 6375 7465 5d20 eval :execute] │ │ │ -00001dc0: 3420 2823 2420 2e20 3730 3034 295d 2929 4 (#$ . 7004)])) │ │ │ -00001dd0: 0a28 6465 6661 6c69 6173 2027 636c 2d63 .(defalias 'cl-c │ │ │ -00001de0: 6f6d 7069 6c65 2d74 696d 652d 746f 6f20 ompile-time-too │ │ │ -00001df0: 235b 2866 6f72 6d29 2022 5c6e a239 ab86 #[(form) "\n.9.. │ │ │ -00001e00: 5c6e a2c3 4eac 87c4 5c6e c508 425c 2212 \n..N...\n..B\". │ │ │ -00001e10: 5c6e a2c6 61ab 88c6 c7c8 5c6e 415c 2242 \n..a.....\nA\"B │ │ │ -00001e20: 875c 6ea2 c961 ab9c 5c6e 4140 19ca 0973 .\n..a..\nA@...s │ │ │ -00001e30: ac85 cb09 73ab 8bc9 cc09 425c 6e41 4142 ....s.....B\nAAB │ │ │ -00001e40: 42aa 815c 6e29 87ca 5c6e 2188 5c6e 8722 B..\n)..\n!.\n." │ │ │ -00001e50: 205b 6279 7465 2d63 6f6d 7069 6c65 2d6d [byte-compile-m │ │ │ -00001e60: 6163 726f 2d65 6e76 6972 6f6e 6d65 6e74 acro-environment │ │ │ -00001e70: 2077 6865 6e20 666f 726d 2062 7974 652d when form byte- │ │ │ -00001e80: 6875 6e6b 2d68 616e 646c 6572 206d 6163 hunk-handler mac │ │ │ -00001e90: 726f 6578 7061 6e64 2028 6576 616c 2d77 roexpand (eval-w │ │ │ -00001ea0: 6865 6e29 2070 726f 676e 206d 6170 6361 hen) progn mapca │ │ │ -00001eb0: 7220 636c 2d63 6f6d 7069 6c65 2d74 696d r cl-compile-tim │ │ │ -00001ec0: 652d 746f 6f20 6576 616c 2d77 6865 6e20 e-too eval-when │ │ │ -00001ed0: 6576 616c 203a 6578 6563 7574 6520 636f eval :execute co │ │ │ -00001ee0: 6d70 696c 655d 2034 5d29 0a28 6279 7465 mpile] 4]).(byte │ │ │ -00001ef0: 2d63 6f64 6520 22c0 c121 ab87 c14b a2c2 -code "..!...K.. │ │ │ -00001f00: 61ab 84c3 c421 88c0 8722 205b 6662 6f75 a....!..." [fbou │ │ │ -00001f10: 6e64 7020 6576 616c 2d77 6865 6e2d 636f ndp eval-when-co │ │ │ -00001f20: 6d70 696c 6520 6175 746f 6c6f 6164 2065 mpile autoload e │ │ │ -00001f30: 7661 6c20 2864 6566 6d61 6372 6f20 6576 val (defmacro ev │ │ │ -00001f40: 616c 2d77 6865 6e2d 636f 6d70 696c 6520 al-when-compile │ │ │ -00001f50: 2826 7265 7374 2062 6f64 7929 2022 4c69 (&rest body) "Li │ │ │ -00001f60: 6b65 2060 7072 6f67 6e27 2c20 6275 7420 ke `progn', but │ │ │ -00001f70: 6576 616c 7561 7465 7320 7468 6520 626f evaluates the bo │ │ │ -00001f80: 6479 2061 7420 636f 6d70 696c 6520 7469 dy at compile ti │ │ │ -00001f90: 6d65 2e5c 6e54 6865 2072 6573 756c 7420 me.\nThe result │ │ │ -00001fa0: 6f66 2074 6865 2062 6f64 7920 6170 7065 of the body appe │ │ │ -00001fb0: 6172 7320 746f 2074 6865 2063 6f6d 7069 ars to the compi │ │ │ -00001fc0: 6c65 7220 6173 2061 2071 756f 7465 6420 ler as a quoted │ │ │ -00001fd0: 636f 6e73 7461 6e74 2e22 2028 6c69 7374 constant." (list │ │ │ -00001fe0: 2027 7175 6f74 6520 2865 7661 6c20 2863 'quote (eval (c │ │ │ -00001ff0: 6f6e 7320 2770 726f 676e 2062 6f64 7929 ons 'progn body) │ │ │ -00002000: 2929 295d 2032 290a 2340 3132 3120 4c69 )))] 2).#@121 Li │ │ │ -00002010: 6b65 2060 7072 6f67 6e27 2c20 6275 7420 ke `progn', but │ │ │ -00002020: 6576 616c 7561 7465 7320 7468 6520 626f evaluates the bo │ │ │ -00002030: 6479 2061 7420 6c6f 6164 2074 696d 652e dy at load time. │ │ │ -00002040: 0a54 6865 2072 6573 756c 7420 6f66 2074 .The result of t │ │ │ -00002050: 6865 2062 6f64 7920 6170 7065 6172 7320 he body appears │ │ │ -00002060: 746f 2074 6865 2063 6f6d 7069 6c65 7220 to the compiler │ │ │ -00002070: 6173 2061 2071 756f 7465 6420 636f 6e73 as a quoted cons │ │ │ -00002080: 7461 6e74 2e1f 0a28 6465 6661 6c69 6173 tant...(defalias │ │ │ -00002090: 2027 6c6f 6164 2d74 696d 652d 7661 6c75 'load-time-valu │ │ │ -000020a0: 6520 2728 6d61 6372 6f20 2e20 235b 2866 e '(macro . #[(f │ │ │ -000020b0: 6f72 6d20 266f 7074 696f 6e61 6c20 7265 orm &optional re │ │ │ -000020c0: 6164 2d6f 6e6c 7929 2022 c320 abbd c4c5 ad-only) ". .... │ │ │ -000020d0: 211a c1c6 5c6e 4408 4519 c7c8 21ab a0c9 !...\nD.E...!... │ │ │ -000020e0: ca21 ab9b c9cb 21ab 96cc cdce cfd0 c6cc .!....!......... │ │ │ -000020f0: 4b44 45cc c609 4444 d1af 054d 88aa 86d2 KDE...DD...M.... │ │ │ -00002100: 09d3 4a5c 2288 d4c6 5c6e 2a44 4487 c6d5 ..J\"...\n*DD... │ │ │ -00002110: 0821 4487 2220 5b66 6f72 6d20 7365 7420 .!D." [form set │ │ │ -00002120: 7465 6d70 2063 6c2d 636f 6d70 696c 696e temp cl-compilin │ │ │ -00002130: 672d 6669 6c65 2067 656e 7465 6d70 2022 g-file gentemp " │ │ │ -00002140: 2d2d 636c 2d6c 6f61 642d 7469 6d65 2d2d --cl-load-time-- │ │ │ -00002150: 2220 7175 6f74 6520 6662 6f75 6e64 7020 " quote fboundp │ │ │ -00002160: 6279 7465 2d63 6f6d 7069 6c65 2d66 696c byte-compile-fil │ │ │ -00002170: 652d 666f 726d 2d64 6566 6d75 6d62 6c65 e-form-defmumble │ │ │ -00002180: 2062 6f75 6e64 7020 7468 6973 2d6b 696e boundp this-kin │ │ │ -00002190: 6420 7468 6174 2d6f 6e65 2062 7974 652d d that-one byte- │ │ │ -000021a0: 636f 6d70 696c 652d 6669 6c65 2d66 6f72 compile-file-for │ │ │ -000021b0: 6d20 6c61 6d62 6461 2028 666f 726d 2920 m lambda (form) │ │ │ -000021c0: 6673 6574 2027 6279 7465 2d63 6f6d 7069 fset 'byte-compi │ │ │ -000021d0: 6c65 2d66 696c 652d 666f 726d 2028 6279 le-file-form (by │ │ │ -000021e0: 7465 2d63 6f6d 7069 6c65 2d66 696c 652d te-compile-file- │ │ │ -000021f0: 666f 726d 2066 6f72 6d29 2070 7269 6e74 form form) print │ │ │ -00002200: 2062 7974 652d 636f 6d70 696c 652d 6f75 byte-compile-ou │ │ │ -00002210: 7470 7574 2d62 7566 6665 7220 7379 6d62 tput-buffer symb │ │ │ -00002220: 6f6c 2d76 616c 7565 2065 7661 6c5d 2037 ol-value eval] 7 │ │ │ -00002230: 2028 2324 202e 2038 3230 3629 5d29 290a (#$ . 8206)])). │ │ │ -00002240: 2340 3436 3120 2863 6173 6520 4558 5052 #@461 (case EXPR │ │ │ -00002250: 2043 4c41 5553 4553 2e2e 2e29 3a20 6576 CLAUSES...): ev │ │ │ -00002260: 616c 7320 4558 5052 2c20 6368 6f6f 7365 als EXPR, choose │ │ │ -00002270: 7320 6672 6f6d 2043 4c41 5553 4553 206f s from CLAUSES o │ │ │ -00002280: 6e20 7468 6174 2076 616c 7565 2e0a 4561 n that value..Ea │ │ │ -00002290: 6368 2063 6c61 7573 6520 6c6f 6f6b 7320 ch clause looks │ │ │ -000022a0: 6c69 6b65 2028 4b45 594c 4953 5420 424f like (KEYLIST BO │ │ │ -000022b0: 4459 2e2e 2e29 2e20 2045 5850 5220 6973 DY...). EXPR is │ │ │ -000022c0: 2065 7661 6c75 6174 6564 2061 6e64 2063 evaluated and c │ │ │ -000022d0: 6f6d 7061 7265 640a 6167 6169 6e73 7420 ompared.against │ │ │ -000022e0: 6561 6368 206b 6579 2069 6e20 6561 6368 each key in each │ │ │ -000022f0: 204b 4559 4c49 5354 3b20 7468 6520 636f KEYLIST; the co │ │ │ -00002300: 7272 6573 706f 6e64 696e 6720 424f 4459 rresponding BODY │ │ │ -00002310: 2069 7320 6576 616c 7561 7465 642e 0a49 is evaluated..I │ │ │ -00002320: 6620 6e6f 2063 6c61 7573 6520 7375 6363 f no clause succ │ │ │ -00002330: 6565 6473 2c20 6361 7365 2072 6574 7572 eeds, case retur │ │ │ -00002340: 6e73 206e 696c 2e20 2041 2073 696e 676c ns nil. A singl │ │ │ -00002350: 6520 6174 6f6d 206d 6179 2062 6520 7573 e atom may be us │ │ │ -00002360: 6564 2069 6e0a 706c 6163 6520 6f66 2061 ed in.place of a │ │ │ -00002370: 204b 4559 4c49 5354 206f 6620 6f6e 6520 KEYLIST of one │ │ │ -00002380: 6174 6f6d 2e20 2041 204b 4559 4c49 5354 atom. A KEYLIST │ │ │ -00002390: 206f 6620 6074 2720 6f72 2060 6f74 6865 of `t' or `othe │ │ │ -000023a0: 7277 6973 6527 2069 730a 616c 6c6f 7765 rwise' is.allowe │ │ │ -000023b0: 6420 6f6e 6c79 2069 6e20 7468 6520 6669 d only in the fi │ │ │ -000023c0: 6e61 6c20 636c 6175 7365 2c20 616e 6420 nal clause, and │ │ │ -000023d0: 6d61 7463 6865 7320 6966 206e 6f20 6f74 matches if no ot │ │ │ -000023e0: 6865 7220 6b65 7973 206d 6174 6368 2e0a her keys match.. │ │ │ -000023f0: 4b65 7920 7661 6c75 6573 2061 7265 2063 Key values are c │ │ │ -00002400: 6f6d 7061 7265 6420 6279 2060 6571 6c27 ompared by `eql' │ │ │ -00002410: 2e1f 0a28 6465 6661 6c69 6173 2027 6361 ...(defalias 'ca │ │ │ -00002420: 7365 2027 286d 6163 726f 202e 2023 5b28 se '(macro . #[( │ │ │ -00002430: 6578 7072 2026 7265 7374 2063 6c61 7573 expr &rest claus │ │ │ -00002440: 6573 2920 22c6 0dc7 5c22 ab83 0daa 82c8 es) "...\"...... │ │ │ -00002450: 201c c919 ca5c 6e21 4018 cbcc cd5c 6e5c ....\n!@....\n\ │ │ │ -00002460: 2242 1b0c 0d61 ab83 0baa 87ce 0c0d 4443 "B...a........DC │ │ │ -00002470: 0b45 2c87 2220 5b6c 6173 742d 636c 6175 .E,." [last-clau │ │ │ -00002480: 7365 2068 6561 642d 6c69 7374 2063 6c61 se head-list cla │ │ │ -00002490: 7573 6573 2062 6f64 7920 7465 6d70 2065 uses body temp e │ │ │ -000024a0: 7870 7220 636c 2d73 696d 706c 652d 6578 xpr cl-simple-ex │ │ │ -000024b0: 7072 2d70 2033 2067 656e 7379 6d20 6e69 pr-p 3 gensym ni │ │ │ -000024c0: 6c20 6c61 7374 2063 6f6e 6420 6d61 7063 l last cond mapc │ │ │ -000024d0: 6172 2023 5b28 6329 2022 0b40 c473 ab8e ar #[(c) ".@.s.. │ │ │ -000024e0: 0b08 61ac 86c5 c60b 405c 2288 c7aa bd0b ..a.....@\"..... │ │ │ -000024f0: 40c8 61ab 8bc5 c909 cacb 5c6e 2144 46aa @.a.......\n!DF. │ │ │ -00002500: ac0b 403c ab8f cc0b 405c 6e5c 2212 cd09 ..@<....@\n\"... │ │ │ -00002510: ca0b 4044 45aa 980b 405c 6e73 ab86 c5ce ..@DE...@\ns.... │ │ │ -00002520: 0b40 5c22 880b 405c 6e42 12cf 09ca 0b40 .@\"..@\nB.....@ │ │ │ -00002530: 4445 0b41 ae81 d042 8722 205b 6c61 7374 DE.A...B." [last │ │ │ -00002540: 2d63 6c61 7573 6520 7465 6d70 2068 6561 -clause temp hea │ │ │ -00002550: 642d 6c69 7374 2063 2028 7420 6f74 6865 d-list c (t othe │ │ │ -00002560: 7277 6973 6529 2065 7272 6f72 2022 6025 rwise) error "`% │ │ │ -00002570: 7327 2069 7320 616c 6c6f 7765 6420 6f6e s' is allowed on │ │ │ -00002580: 6c79 2061 7320 7468 6520 6c61 7374 2063 ly as the last c │ │ │ -00002590: 6173 6520 636c 6175 7365 2220 7420 6563 ase clause" t ec │ │ │ -000025a0: 6173 652d 6572 726f 722d 666c 6167 2022 ase-error-flag " │ │ │ -000025b0: 6563 6173 6520 6661 696c 6564 3a20 2573 ecase failed: %s │ │ │ -000025c0: 2c20 2573 2220 7175 6f74 6520 7265 7665 , %s" quote reve │ │ │ -000025d0: 7273 6520 6170 7065 6e64 206d 656d 6265 rse append membe │ │ │ -000025e0: 722a 2022 4475 706c 6963 6174 6520 6b65 r* "Duplicate ke │ │ │ -000025f0: 7920 696e 2063 6173 653a 2025 7322 2065 y in case: %s" e │ │ │ -00002600: 716c 2028 6e69 6c29 5d20 365d 206c 6574 ql (nil)] 6] let │ │ │ -00002610: 5d20 3420 2823 2420 2e20 3837 3734 295d ] 4 (#$ . 8774)] │ │ │ -00002620: 2929 0a23 4031 3033 2028 6563 6173 6520 )).#@103 (ecase │ │ │ -00002630: 4558 5052 2043 4c41 5553 4553 2e2e 2e29 EXPR CLAUSES...) │ │ │ -00002640: 3a20 6c69 6b65 2060 6361 7365 272c 2062 : like `case', b │ │ │ -00002650: 7574 2065 7272 6f72 2069 6620 6e6f 2063 ut error if no c │ │ │ -00002660: 6173 6520 6669 7473 2e0a 606f 7468 6572 ase fits..`other │ │ │ -00002670: 7769 7365 272d 636c 6175 7365 7320 6172 wise'-clauses ar │ │ │ -00002680: 6520 6e6f 7420 616c 6c6f 7765 642e 1f0a e not allowed... │ │ │ -00002690: 2864 6566 616c 6961 7320 2765 6361 7365 (defalias 'ecase │ │ │ -000026a0: 2027 286d 6163 726f 202e 2023 5b28 6578 '(macro . #[(ex │ │ │ -000026b0: 7072 2026 7265 7374 2063 6c61 7573 6573 pr &rest clauses │ │ │ -000026c0: 2920 22c3 5c6e b7ae 83c4 5c6e b789 19ab ) ".\n....\n.... │ │ │ -000026d0: 86c5 c609 405c 2288 29c7 08c8 5c6e c95c ....@\".)...\n.\ │ │ │ -000026e0: 2242 4287 2220 5b65 7870 7220 6469 7361 "BB." [expr disa │ │ │ -000026f0: 6c6c 6f77 6564 2063 6c61 7573 6573 2074 llowed clauses t │ │ │ -00002700: 206f 7468 6572 7769 7365 2065 7272 6f72 otherwise error │ │ │ -00002710: 2022 6025 7327 2069 7320 6e6f 7420 616c "`%s' is not al │ │ │ -00002720: 6c6f 7765 6420 696e 2065 6361 7365 2220 lowed in ecase" │ │ │ -00002730: 6361 7365 2061 7070 656e 6420 2828 6563 case append ((ec │ │ │ -00002740: 6173 652d 6572 726f 722d 666c 6167 2929 ase-error-flag)) │ │ │ -00002750: 5d20 3620 2823 2420 2e20 3937 3639 295d ] 6 (#$ . 9769)] │ │ │ -00002760: 2929 0a23 4033 3438 2028 7479 7065 6361 )).#@348 (typeca │ │ │ -00002770: 7365 2045 5850 5220 434c 4155 5345 532e se EXPR CLAUSES. │ │ │ -00002780: 2e2e 293a 2065 7661 6c73 2045 5850 522c ..): evals EXPR, │ │ │ -00002790: 2063 686f 6f73 6573 2066 726f 6d20 434c chooses from CL │ │ │ -000027a0: 4155 5345 5320 6f6e 2074 6861 7420 7661 AUSES on that va │ │ │ -000027b0: 6c75 652e 0a45 6163 6820 636c 6175 7365 lue..Each clause │ │ │ -000027c0: 206c 6f6f 6b73 206c 696b 6520 2854 5950 looks like (TYP │ │ │ -000027d0: 4520 424f 4459 2e2e 2e29 2e20 2045 5850 E BODY...). EXP │ │ │ -000027e0: 5220 6973 2065 7661 6c75 6174 6564 2061 R is evaluated a │ │ │ -000027f0: 6e64 2c20 6966 2069 740a 7361 7469 7366 nd, if it.satisf │ │ │ -00002800: 6965 7320 5459 5045 2c20 7468 6520 636f ies TYPE, the co │ │ │ -00002810: 7272 6573 706f 6e64 696e 6720 424f 4459 rresponding BODY │ │ │ -00002820: 2069 7320 6576 616c 7561 7465 642e 2020 is evaluated. │ │ │ -00002830: 4966 206e 6f20 636c 6175 7365 2073 7563 If no clause suc │ │ │ -00002840: 6365 6564 732c 0a74 7970 6563 6173 6520 ceeds,.typecase │ │ │ -00002850: 7265 7475 726e 7320 6e69 6c2e 2020 4120 returns nil. A │ │ │ -00002860: 5459 5045 206f 6620 6074 2720 6f72 2060 TYPE of `t' or ` │ │ │ -00002870: 6f74 6865 7277 6973 6527 2069 7320 616c otherwise' is al │ │ │ -00002880: 6c6f 7765 6420 6f6e 6c79 2069 6e20 7468 lowed only in th │ │ │ -00002890: 650a 6669 6e61 6c20 636c 6175 7365 2c20 e.final clause, │ │ │ -000028a0: 616e 6420 6d61 7463 6865 7320 6966 206e and matches if n │ │ │ -000028b0: 6f20 6f74 6865 7220 6b65 7973 206d 6174 o other keys mat │ │ │ -000028c0: 6368 2e1f 0a28 6465 6661 6c69 6173 2027 ch...(defalias ' │ │ │ -000028d0: 7479 7065 6361 7365 2027 286d 6163 726f typecase '(macro │ │ │ -000028e0: 202e 2023 5b28 6578 7072 2026 7265 7374 . #[(expr &rest │ │ │ -000028f0: 2063 6c61 7573 6573 2920 22c5 0cc6 5c22 clauses) "...\" │ │ │ -00002900: ab83 0caa 82c7 201b c819 c9ca cb08 5c22 ...... .......\" │ │ │ -00002910: 421a 0b0c 61ab 835c 6eaa 87cc 0b0c 4443 B...a..\n.....DC │ │ │ -00002920: 5c6e 452b 8722 205b 636c 6175 7365 7320 \nE+." [clauses │ │ │ -00002930: 7479 7065 2d6c 6973 7420 626f 6479 2074 type-list body t │ │ │ -00002940: 656d 7020 6578 7072 2063 6c2d 7369 6d70 emp expr cl-simp │ │ │ -00002950: 6c65 2d65 7870 722d 7020 3320 6765 6e73 le-expr-p 3 gens │ │ │ -00002960: 796d 206e 696c 2063 6f6e 6420 6d61 7063 ym nil cond mapc │ │ │ -00002970: 6172 2023 5b28 6329 2022 5c6e 40c3 61ab ar #[(c) "\n@.a. │ │ │ -00002980: 83c4 aa9b 5c6e 40c5 61ab 8bc6 c708 c8c9 ....\n@.a....... │ │ │ -00002990: 0921 4446 aa8a 5c6e 4009 4211 ca08 5c6e .!DF..\n@.B...\n │ │ │ -000029a0: 405c 225c 6e41 ae81 cb42 8722 205b 7465 @\"\nA...B." [te │ │ │ -000029b0: 6d70 2074 7970 652d 6c69 7374 2063 206f mp type-list c o │ │ │ -000029c0: 7468 6572 7769 7365 2074 2065 6361 7365 therwise t ecase │ │ │ -000029d0: 2d65 7272 6f72 2d66 6c61 6720 6572 726f -error-flag erro │ │ │ -000029e0: 7220 2265 7479 7065 6361 7365 2066 6169 r "etypecase fai │ │ │ -000029f0: 6c65 643a 2025 732c 2025 7322 2071 756f led: %s, %s" quo │ │ │ -00002a00: 7465 2072 6576 6572 7365 2063 6c2d 6d61 te reverse cl-ma │ │ │ -00002a10: 6b65 2d74 7970 652d 7465 7374 2028 6e69 ke-type-test (ni │ │ │ -00002a20: 6c29 5d20 365d 206c 6574 5d20 3420 2823 l)] 6] let] 4 (# │ │ │ -00002a30: 2420 2e20 3130 3038 3929 5d29 290a 2340 $ . 10089)])).#@ │ │ │ -00002a40: 3131 3120 2865 7479 7065 6361 7365 2045 111 (etypecase E │ │ │ -00002a50: 5850 5220 434c 4155 5345 532e 2e2e 293a XPR CLAUSES...): │ │ │ -00002a60: 206c 696b 6520 6074 7970 6563 6173 6527 like `typecase' │ │ │ -00002a70: 2c20 6275 7420 6572 726f 7220 6966 206e , but error if n │ │ │ -00002a80: 6f20 6361 7365 2066 6974 732e 0a60 6f74 o case fits..`ot │ │ │ -00002a90: 6865 7277 6973 6527 2d63 6c61 7573 6573 herwise'-clauses │ │ │ -00002aa0: 2061 7265 206e 6f74 2061 6c6c 6f77 6564 are not allowed │ │ │ -00002ab0: 2e1f 0a28 6465 6661 6c69 6173 2027 6574 ...(defalias 'et │ │ │ -00002ac0: 7970 6563 6173 6520 2728 6d61 6372 6f20 ypecase '(macro │ │ │ -00002ad0: 2e20 235b 2865 7870 7220 2672 6573 7420 . #[(expr &rest │ │ │ -00002ae0: 636c 6175 7365 7329 2022 c209 c308 c45c clauses) ".....\ │ │ │ -00002af0: 2242 4287 2220 5b63 6c61 7573 6573 2065 "BB." [clauses e │ │ │ -00002b00: 7870 7220 7479 7065 6361 7365 2061 7070 xpr typecase app │ │ │ -00002b10: 656e 6420 2828 6563 6173 652d 6572 726f end ((ecase-erro │ │ │ -00002b20: 722d 666c 6167 2929 5d20 3520 2823 2420 r-flag))] 5 (#$ │ │ │ -00002b30: 2e20 3130 3832 3029 5d29 290a 2340 3532 . 10820)])).#@52 │ │ │ -00002b40: 3620 2862 6c6f 636b 204e 414d 4520 424f 6 (block NAME BO │ │ │ -00002b50: 4459 2e2e 2e29 3a20 6465 6669 6e65 2061 DY...): define a │ │ │ -00002b60: 206c 6578 6963 616c 6c79 2d73 636f 7065 lexically-scope │ │ │ -00002b70: 6420 626c 6f63 6b20 6e61 6d65 6420 4e41 d block named NA │ │ │ -00002b80: 4d45 2e0a 4e41 4d45 206d 6179 2062 6520 ME..NAME may be │ │ │ -00002b90: 616e 7920 7379 6d62 6f6c 2e20 2043 6f64 any symbol. Cod │ │ │ -00002ba0: 6520 696e 7369 6465 2074 6865 2042 4f44 e inside the BOD │ │ │ -00002bb0: 5920 666f 726d 7320 6361 6e20 6361 6c6c Y forms can call │ │ │ -00002bc0: 2060 7265 7475 726e 2d66 726f 6d27 0a74 `return-from'.t │ │ │ -00002bd0: 6f20 6a75 6d70 2070 7265 6d61 7475 7265 o jump premature │ │ │ -00002be0: 6c79 206f 7574 206f 6620 7468 6520 626c ly out of the bl │ │ │ -00002bf0: 6f63 6b2e 2020 5468 6973 2064 6966 6665 ock. This diffe │ │ │ -00002c00: 7273 2066 726f 6d20 6063 6174 6368 2720 rs from `catch' │ │ │ -00002c10: 616e 6420 6074 6872 6f77 270a 696e 2074 and `throw'.in t │ │ │ -00002c20: 776f 2072 6573 7065 6374 733a 2020 4669 wo respects: Fi │ │ │ -00002c30: 7273 742c 2074 6865 204e 414d 4520 6973 rst, the NAME is │ │ │ -00002c40: 2061 6e20 756e 6576 616c 7561 7465 6420 an unevaluated │ │ │ -00002c50: 7379 6d62 6f6c 2072 6174 6865 7220 7468 symbol rather th │ │ │ -00002c60: 616e 2061 0a71 756f 7465 6420 7379 6d62 an a.quoted symb │ │ │ -00002c70: 6f6c 206f 7220 6f74 6865 7220 666f 726d ol or other form │ │ │ -00002c80: 3b20 616e 6420 7365 636f 6e64 2c20 4e41 ; and second, NA │ │ │ -00002c90: 4d45 2069 7320 6c65 7869 6361 6c6c 7920 ME is lexically │ │ │ -00002ca0: 7261 7468 6572 2074 6861 6e0a 6479 6e61 rather than.dyna │ │ │ -00002cb0: 6d69 6361 6c6c 7920 7363 6f70 6564 3a20 mically scoped: │ │ │ -00002cc0: 204f 6e6c 7920 7265 6665 7265 6e63 6573 Only references │ │ │ -00002cd0: 2074 6f20 6974 2077 6974 6869 6e20 424f to it within BO │ │ │ -00002ce0: 4459 2077 696c 6c20 776f 726b 2e20 2054 DY will work. T │ │ │ -00002cf0: 6865 7365 0a72 6566 6572 656e 6365 7320 hese.references │ │ │ -00002d00: 6d61 7920 6170 7065 6172 2069 6e73 6964 may appear insid │ │ │ -00002d10: 6520 6d61 6372 6f20 6578 7061 6e73 696f e macro expansio │ │ │ -00002d20: 6e73 2c20 6275 7420 6e6f 7420 696e 7369 ns, but not insi │ │ │ -00002d30: 6465 2066 756e 6374 696f 6e73 0a63 616c de functions.cal │ │ │ -00002d40: 6c65 6420 6672 6f6d 2042 4f44 592e 1f0a led from BODY... │ │ │ -00002d50: 2864 6566 616c 6961 7320 2762 6c6f 636b (defalias 'block │ │ │ -00002d60: 2027 286d 6163 726f 202e 2023 5b28 6e61 '(macro . #[(na │ │ │ -00002d70: 6d65 2026 7265 7374 2062 6f64 7929 2022 me &rest body) " │ │ │ -00002d80: c2c3 0942 21ab 84c3 0942 87c4 c5c6 c7c8 ...B!....B...... │ │ │ -00002d90: c908 5c22 2144 0942 4244 8722 205b 6e61 ..\"!D.BBD." [na │ │ │ -00002da0: 6d65 2062 6f64 7920 636c 2d73 6166 652d me body cl-safe- │ │ │ -00002db0: 6578 7072 2d70 2070 726f 676e 2063 6c2d expr-p progn cl- │ │ │ -00002dc0: 626c 6f63 6b2d 7772 6170 7065 7220 6361 block-wrapper ca │ │ │ -00002dd0: 7463 6820 7175 6f74 6520 696e 7465 726e tch quote intern │ │ │ -00002de0: 2066 6f72 6d61 7420 222d 2d63 6c2d 626c format "--cl-bl │ │ │ -00002df0: 6f63 6b2d 2573 2d2d 225d 2037 2028 2324 ock-%s--"] 7 (#$ │ │ │ -00002e00: 202e 2031 3130 3734 295d 2929 0a28 6279 . 11074)])).(by │ │ │ -00002e10: 7465 2d63 6f64 6520 22c1 0842 10c2 c121 te-code "..B...! │ │ │ -00002e20: ac85 c3c1 c45c 2288 c5c6 c7c8 2387 2220 .....\".....#." │ │ │ -00002e30: 5b63 7572 7265 6e74 2d6c 6f61 642d 6c69 [current-load-li │ │ │ -00002e40: 7374 2063 6c2d 6163 7469 7665 2d62 6c6f st cl-active-blo │ │ │ -00002e50: 636b 2d6e 616d 6573 2064 6566 6175 6c74 ck-names default │ │ │ -00002e60: 2d62 6f75 6e64 7020 7365 742d 6465 6661 -boundp set-defa │ │ │ -00002e70: 756c 7420 6e69 6c20 7075 7420 636c 2d62 ult nil put cl-b │ │ │ -00002e80: 6c6f 636b 2d77 7261 7070 6572 2062 7974 lock-wrapper byt │ │ │ -00002e90: 652d 636f 6d70 696c 6520 636c 2d62 7974 e-compile cl-byt │ │ │ -00002ea0: 652d 636f 6d70 696c 652d 626c 6f63 6b5d e-compile-block] │ │ │ -00002eb0: 2034 290a 2864 6566 616c 6961 7320 2763 4).(defalias 'c │ │ │ -00002ec0: 6c2d 6279 7465 2d63 6f6d 7069 6c65 2d62 l-byte-compile-b │ │ │ -00002ed0: 6c6f 636b 2023 5b28 636c 2d66 6f72 6d29 lock #[(cl-form) │ │ │ -00002ee0: 2022 c4c5 21ab ad0b 4140 4140 4140 c642 "..!...A@A@A@.B │ │ │ -00002ef0: 8919 0842 18c7 c80b 4140 4141 4221 1a09 ...B....A@AAB!.. │ │ │ -00002f00: 41ab 8cc9 ca0b 4140 4140 5c6e 4521 aa83 A.....A@A@\nE!.. │ │ │ -00002f10: c95c 6e21 2b87 c90b 4140 2187 2220 5b63 .\n!+...A@!." [c │ │ │ -00002f20: 6c2d 6163 7469 7665 2d62 6c6f 636b 2d6e l-active-block-n │ │ │ -00002f30: 616d 6573 2063 6c2d 656e 7472 7920 636c ames cl-entry cl │ │ │ -00002f40: 2d62 6f64 7920 636c 2d66 6f72 6d20 6662 -body cl-form fb │ │ │ -00002f50: 6f75 6e64 7020 6279 7465 2d63 6f6d 7069 oundp byte-compi │ │ │ -00002f60: 6c65 2d66 6f72 6d2d 646f 2d65 6666 6563 le-form-do-effec │ │ │ -00002f70: 7420 6e69 6c20 6279 7465 2d63 6f6d 7069 t nil byte-compi │ │ │ -00002f80: 6c65 2d74 6f70 2d6c 6576 656c 2070 726f le-top-level pro │ │ │ -00002f90: 676e 2062 7974 652d 636f 6d70 696c 652d gn byte-compile- │ │ │ -00002fa0: 666f 726d 2063 6174 6368 5d20 355d 290a form catch] 5]). │ │ │ -00002fb0: 2870 7574 2027 636c 2d62 6c6f 636b 2d74 (put 'cl-block-t │ │ │ -00002fc0: 6872 6f77 2027 6279 7465 2d63 6f6d 7069 hrow 'byte-compi │ │ │ -00002fd0: 6c65 2027 636c 2d62 7974 652d 636f 6d70 le 'cl-byte-comp │ │ │ -00002fe0: 696c 652d 7468 726f 7729 0a28 6465 6661 ile-throw).(defa │ │ │ -00002ff0: 6c69 6173 2027 636c 2d62 7974 652d 636f lias 'cl-byte-co │ │ │ -00003000: 6d70 696c 652d 7468 726f 7720 235b 2863 mpile-throw #[(c │ │ │ -00003010: 6c2d 666f 726d 2920 225c 6e41 4041 4008 l-form) "\nA@A@. │ │ │ -00003020: b789 19ab 8409 c3a1 8829 c4c5 5c6e 4142 .........)..\nAB │ │ │ -00003030: 2187 2220 5b63 6c2d 6163 7469 7665 2d62 !." [cl-active-b │ │ │ -00003040: 6c6f 636b 2d6e 616d 6573 2063 6c2d 666f lock-names cl-fo │ │ │ -00003050: 756e 6420 636c 2d66 6f72 6d20 7420 6279 und cl-form t by │ │ │ -00003060: 7465 2d63 6f6d 7069 6c65 2d6e 6f72 6d61 te-compile-norma │ │ │ -00003070: 6c2d 6361 6c6c 2074 6872 6f77 5d20 345d l-call throw] 4] │ │ │ -00003080: 290a 2340 3130 3320 2872 6574 7572 6e20 ).#@103 (return │ │ │ -00003090: 5b52 4553 554c 545d 293a 2072 6574 7572 [RESULT]): retur │ │ │ -000030a0: 6e20 6672 6f6d 2074 6865 2062 6c6f 636b n from the block │ │ │ -000030b0: 206e 616d 6564 206e 696c 2e0a 5468 6973 named nil..This │ │ │ -000030c0: 2069 7320 6571 7569 7661 6c65 6e74 2074 is equivalent t │ │ │ -000030d0: 6f20 6028 7265 7475 726e 2d66 726f 6d20 o `(return-from │ │ │ -000030e0: 6e69 6c20 5245 5355 4c54 2927 2e1f 0a28 nil RESULT)'...( │ │ │ -000030f0: 6465 6661 6c69 6173 2027 7265 7475 726e defalias 'return │ │ │ -00003100: 2027 286d 6163 726f 202e 2023 5b28 266f '(macro . #[(&o │ │ │ -00003110: 7074 696f 6e61 6c20 7265 7329 2022 c1c2 ptional res) ".. │ │ │ -00003120: 0845 8722 205b 7265 7320 7265 7475 726e .E." [res return │ │ │ -00003130: 2d66 726f 6d20 6e69 6c5d 2033 2028 2324 -from nil] 3 (#$ │ │ │ -00003140: 202e 2031 3234 3234 295d 2929 0a23 4033 . 12424)])).#@3 │ │ │ -00003150: 3235 2028 7265 7475 726e 2d66 726f 6d20 25 (return-from │ │ │ -00003160: 4e41 4d45 205b 5245 5355 4c54 5d29 3a20 NAME [RESULT]): │ │ │ -00003170: 7265 7475 726e 2066 726f 6d20 7468 6520 return from the │ │ │ -00003180: 626c 6f63 6b20 6e61 6d65 6420 4e41 4d45 block named NAME │ │ │ -00003190: 2e0a 5468 6973 206a 756d 7073 206f 7574 ..This jumps out │ │ │ -000031a0: 2074 6f20 7468 6520 696e 6e65 726d 6f73 to the innermos │ │ │ -000031b0: 7420 656e 636c 6f73 696e 6720 6028 626c t enclosing `(bl │ │ │ -000031c0: 6f63 6b20 4e41 4d45 202e 2e2e 2927 2066 ock NAME ...)' f │ │ │ -000031d0: 6f72 6d2c 0a72 6574 7572 6e69 6e67 2052 orm,.returning R │ │ │ -000031e0: 4553 554c 5420 6672 6f6d 2074 6861 7420 ESULT from that │ │ │ -000031f0: 666f 726d 2028 6f72 206e 696c 2069 6620 form (or nil if │ │ │ -00003200: 5245 5355 4c54 2069 7320 6f6d 6974 7465 RESULT is omitte │ │ │ -00003210: 6429 2e0a 5468 6973 2069 7320 636f 6d70 d)..This is comp │ │ │ -00003220: 6174 6962 6c65 2077 6974 6820 436f 6d6d atible with Comm │ │ │ -00003230: 6f6e 204c 6973 702c 2062 7574 206e 6f74 on Lisp, but not │ │ │ -00003240: 6520 7468 6174 2060 6465 6675 6e27 2061 e that `defun' a │ │ │ -00003250: 6e64 0a60 6465 666d 6163 726f 2720 646f nd.`defmacro' do │ │ │ -00003260: 206e 6f74 2063 7265 6174 6520 696d 706c not create impl │ │ │ -00003270: 6963 6974 2062 6c6f 636b 7320 6173 2074 icit blocks as t │ │ │ -00003280: 6865 7920 646f 2069 6e20 436f 6d6d 6f6e hey do in Common │ │ │ -00003290: 204c 6973 702e 1f0a 2864 6566 616c 6961 Lisp...(defalia │ │ │ -000032a0: 7320 2772 6574 7572 6e2d 6672 6f6d 2027 s 'return-from ' │ │ │ -000032b0: 286d 6163 726f 202e 2023 5b28 6e61 6d65 (macro . #[(name │ │ │ -000032c0: 2026 6f70 7469 6f6e 616c 2072 6573 2920 &optional res) │ │ │ -000032d0: 22c3 c4c5 095c 2221 1ac6 c75c 6e44 0845 "....\"!...\nD.E │ │ │ -000032e0: 2987 2220 5b72 6573 206e 616d 6520 6e61 )." [res name na │ │ │ -000032f0: 6d65 3220 696e 7465 726e 2066 6f72 6d61 me2 intern forma │ │ │ -00003300: 7420 222d 2d63 6c2d 626c 6f63 6b2d 2573 t "--cl-block-%s │ │ │ -00003310: 2d2d 2220 636c 2d62 6c6f 636b 2d74 6872 --" cl-block-thr │ │ │ -00003320: 6f77 2071 756f 7465 5d20 3420 2823 2420 ow quote] 4 (#$ │ │ │ -00003330: 2e20 3132 3632 3729 5d29 290a 2340 3732 . 12627)])).#@72 │ │ │ -00003340: 3520 286c 6f6f 7020 434c 4155 5345 2e2e 5 (loop CLAUSE.. │ │ │ -00003350: 2e29 3a20 5468 6520 436f 6d6d 6f6e 204c .): The Common L │ │ │ -00003360: 6973 7020 606c 6f6f 7027 206d 6163 726f isp `loop' macro │ │ │ -00003370: 2e0a 5661 6c69 6420 636c 6175 7365 7320 ..Valid clauses │ │ │ -00003380: 6172 653a 0a20 2066 6f72 2056 4152 2066 are:. for VAR f │ │ │ -00003390: 726f 6d2f 7570 6672 6f6d 2f64 6f77 6e66 rom/upfrom/downf │ │ │ -000033a0: 726f 6d20 4e55 4d20 746f 2f75 7074 6f2f rom NUM to/upto/ │ │ │ -000033b0: 646f 776e 746f 2f61 626f 7665 2f62 656c downto/above/bel │ │ │ -000033c0: 6f77 204e 554d 2062 7920 4e55 4d2c 0a20 ow NUM by NUM,. │ │ │ -000033d0: 2066 6f72 2056 4152 2069 6e20 4c49 5354 for VAR in LIST │ │ │ -000033e0: 2062 7920 4655 4e43 2c20 666f 7220 5641 by FUNC, for VA │ │ │ -000033f0: 5220 6f6e 204c 4953 5420 6279 2046 554e R on LIST by FUN │ │ │ -00003400: 432c 2066 6f72 2056 4152 203d 2049 4e49 C, for VAR = INI │ │ │ -00003410: 5420 7468 656e 2045 5850 522c 0a20 2066 T then EXPR,. f │ │ │ -00003420: 6f72 2056 4152 2061 6372 6f73 7320 4152 or VAR across AR │ │ │ -00003430: 5241 592c 2072 6570 6561 7420 4e55 4d2c RAY, repeat NUM, │ │ │ -00003440: 2077 6974 6820 5641 5220 3d20 494e 4954 with VAR = INIT │ │ │ -00003450: 2c20 7768 696c 6520 434f 4e44 2c20 756e , while COND, un │ │ │ -00003460: 7469 6c20 434f 4e44 2c0a 2020 616c 7761 til COND,. alwa │ │ │ -00003470: 7973 2043 4f4e 442c 206e 6576 6572 2043 ys COND, never C │ │ │ -00003480: 4f4e 442c 2074 6865 7265 6973 2043 4f4e OND, thereis CON │ │ │ -00003490: 442c 2063 6f6c 6c65 6374 2045 5850 5220 D, collect EXPR │ │ │ -000034a0: 696e 746f 2056 4152 2c0a 2020 6170 7065 into VAR,. appe │ │ │ -000034b0: 6e64 2045 5850 5220 696e 746f 2056 4152 nd EXPR into VAR │ │ │ -000034c0: 2c20 6e63 6f6e 6320 4558 5052 2069 6e74 , nconc EXPR int │ │ │ -000034d0: 6f20 5641 522c 2073 756d 2045 5850 5220 o VAR, sum EXPR │ │ │ -000034e0: 696e 746f 2056 4152 2c0a 2020 636f 756e into VAR,. coun │ │ │ -000034f0: 7420 4558 5052 2069 6e74 6f20 5641 522c t EXPR into VAR, │ │ │ -00003500: 206d 6178 696d 697a 6520 4558 5052 2069 maximize EXPR i │ │ │ -00003510: 6e74 6f20 5641 522c 206d 696e 696d 697a nto VAR, minimiz │ │ │ -00003520: 6520 4558 5052 2069 6e74 6f20 5641 522c e EXPR into VAR, │ │ │ -00003530: 0a20 2069 6620 434f 4e44 2043 4c41 5553 . if COND CLAUS │ │ │ -00003540: 4520 5b61 6e64 2043 4c41 5553 455d 2e2e E [and CLAUSE].. │ │ │ -00003550: 2e20 656c 7365 2043 4c41 5553 4520 5b61 . else CLAUSE [a │ │ │ -00003560: 6e64 2043 4c41 5553 452e 2e2e 5d2c 0a20 nd CLAUSE...],. │ │ │ -00003570: 2075 6e6c 6573 7320 434f 4e44 2043 4c41 unless COND CLA │ │ │ -00003580: 5553 4520 5b61 6e64 2043 4c41 5553 455d USE [and CLAUSE] │ │ │ -00003590: 2e2e 2e20 656c 7365 2043 4c41 5553 4520 ... else CLAUSE │ │ │ -000035a0: 5b61 6e64 2043 4c41 5553 452e 2e2e 5d2c [and CLAUSE...], │ │ │ -000035b0: 0a20 2064 6f20 4558 5052 532e 2e2e 2c20 . do EXPRS..., │ │ │ -000035c0: 696e 6974 6961 6c6c 7920 4558 5052 532e initially EXPRS. │ │ │ -000035d0: 2e2e 2c20 6669 6e61 6c6c 7920 4558 5052 .., finally EXPR │ │ │ -000035e0: 532e 2e2e 2c20 7265 7475 726e 2045 5850 S..., return EXP │ │ │ -000035f0: 522c 0a20 2066 696e 616c 6c79 2072 6574 R,. finally ret │ │ │ -00003600: 7572 6e20 4558 5052 2c20 6e61 6d65 6420 urn EXPR, named │ │ │ -00003610: 4e41 4d45 2e1f 0a28 6465 6661 6c69 6173 NAME...(defalias │ │ │ -00003620: 2027 6c6f 6f70 2027 286d 6163 726f 202e 'loop '(macro . │ │ │ -00003630: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ -00003640: 22c6 c7c8 c9ca c9c6 cb0b 215c 225c 225c ".........!\"\"\ │ │ │ -00003650: 2273 ac89 ccca cdc6 0b42 4245 87ca 8989 "s.......BBE.... │ │ │ -00003660: 8989 8989 8989 8989 8989 8989 891e 231e ..............#. │ │ │ -00003670: 2b18 1e24 1e25 1e26 1e2c 1e2d 1a19 1e27 +..$.%.&.,.-...' │ │ │ -00003680: 1e28 1e1e 1e29 1d1e 2ace 0bcf 5c22 130b .(...)..*...\".. │ │ │ -00003690: 40d0 61ac 85d1 2088 aa75 5c6e ab87 5c6e @.a... ..u\n..\n │ │ │ -000036a0: c644 430d 4215 08ab 9008 c644 430d 4215 .DC.B......DC.B. │ │ │ -000036b0: d208 ca45 0e1e 4216 1e0e 259f 0e27 ae82 ...E..B...%..'.. │ │ │ -000036c0: 0e28 43a4 1e1f d30e 299f 2189 1e20 4140 .(C.....).!.. A@ │ │ │ -000036d0: 0e1e 9fa4 1e21 ce0e 269f 0e24 ab9e ccd4 .....!..&..$.... │ │ │ -000036e0: d50e 2040 c661 ab84 0e21 aa89 d60e 2040 .. @.a...!.... @ │ │ │ -000036f0: d745 0e21 42d8 0e24 2345 aa88 cd0e 2040 .E.!B..$#E.... @ │ │ │ -00003700: 0e21 4242 435c 6eab 950e 1fd9 6bab 8409 .!BBC\n.....k... │ │ │ -00003710: 43aa 8dda 5c6e db0e 1f42 0946 43aa 820e C...\n...B.FC... │ │ │ -00003720: 1f23 1c09 ab85 0943 0d42 150d abb5 0d40 .#.....C.B.....@ │ │ │ -00003730: 41ab 8ddc 0d89 4115 400c c623 4314 aa6b A.....A.@..#C..k │ │ │ -00003740: ca1e 5c22 0dab 920d 4041 ac8d 0d89 4115 ..\"....@A....A. │ │ │ -00003750: 4040 0e5c 2242 165c 22aa 6bdc 0e5c 220c @@.\"B.\".k..\". │ │ │ -00003760: ca23 4314 29aa 480e 23ab 88dd 0e23 0c42 .#C.).H.#....#.B │ │ │ -00003770: 4243 14cc 0e2a 0c2e 1442 4287 2220 5b6c BC...*...BB." [l │ │ │ -00003780: 6f6f 702d 6669 7273 742d 666c 6167 206c oop-first-flag l │ │ │ -00003790: 6f6f 702d 7265 7375 6c74 2d76 6172 206c oop-result-var l │ │ │ -000037a0: 6f6f 702d 6669 6e69 7368 2d66 6c61 6720 oop-finish-flag │ │ │ -000037b0: 6172 6773 2062 6f64 7920 6c6f 6f70 2d62 args body loop-b │ │ │ -000037c0: 696e 6469 6e67 7320 7420 6d61 7063 6172 indings t mapcar │ │ │ -000037d0: 2073 796d 626f 6c70 2064 656c 7120 6e69 symbolp delq ni │ │ │ -000037e0: 6c20 636f 7079 2d6c 6973 7420 626c 6f63 l copy-list bloc │ │ │ -000037f0: 6b20 7768 696c 6520 6170 7065 6e64 2028 k while append ( │ │ │ -00003800: 636c 2d65 6e64 2d6c 6f6f 7029 2063 6c2d cl-end-loop) cl- │ │ │ -00003810: 656e 642d 6c6f 6f70 2063 6c2d 7061 7273 end-loop cl-pars │ │ │ -00003820: 652d 6c6f 6f70 2d63 6c61 7573 6520 7365 e-loop-clause se │ │ │ -00003830: 7471 2063 6c2d 6c6f 6f70 2d62 7569 6c64 tq cl-loop-build │ │ │ -00003840: 2d61 6e64 7320 2d2d 636c 2d66 696e 6973 -ands --cl-finis │ │ │ -00003850: 682d 2d20 7375 6273 7420 6f72 2028 7265 h-- subst or (re │ │ │ -00003860: 7475 726e 2d66 726f 6d20 2d2d 636c 2d66 turn-from --cl-f │ │ │ -00003870: 696e 6973 682d 2d20 6e69 6c29 202d 2d63 inish-- nil) --c │ │ │ -00003880: 6c2d 6d61 7020 286e 696c 2920 6966 2070 l-map (nil) if p │ │ │ -00003890: 726f 676e 2063 6c2d 6c6f 6f70 2d6c 6574 rogn cl-loop-let │ │ │ -000038a0: 2073 796d 626f 6c2d 6d61 6372 6f6c 6574 symbol-macrolet │ │ │ -000038b0: 206c 6f6f 702d 7374 6570 7320 6570 696c loop-steps epil │ │ │ -000038c0: 6f67 7565 2061 6e64 7320 7768 696c 652d ogue ands while- │ │ │ -000038d0: 626f 6479 206c 6574 7320 6c6f 6f70 2d73 body lets loop-s │ │ │ -000038e0: 796d 626f 6c2d 6d61 6373 206c 6f6f 702d ymbol-macs loop- │ │ │ -000038f0: 6d61 702d 666f 726d 206c 6f6f 702d 6669 map-form loop-fi │ │ │ -00003900: 6e61 6c6c 7920 6c6f 6f70 2d69 6e69 7469 nally loop-initi │ │ │ -00003910: 616c 6c79 206c 6f6f 702d 7265 7375 6c74 ally loop-result │ │ │ -00003920: 2d65 7870 6c69 6369 7420 6c6f 6f70 2d72 -explicit loop-r │ │ │ -00003930: 6573 756c 7420 6c6f 6f70 2d62 6f64 7920 esult loop-body │ │ │ -00003940: 6c6f 6f70 2d6e 616d 6520 6c6f 6f70 2d64 loop-name loop-d │ │ │ -00003950: 6573 7472 2d74 656d 7073 206c 6f6f 702d estr-temps loop- │ │ │ -00003960: 6163 6375 6d2d 7661 7273 206c 6f6f 702d accum-vars loop- │ │ │ -00003970: 6163 6375 6d2d 7661 725d 2031 3720 2823 accum-var] 17 (# │ │ │ -00003980: 2420 2e20 3133 3132 3229 5d29 290a 2864 $ . 13122)])).(d │ │ │ -00003990: 6566 616c 6961 7320 2763 6c2d 7061 7273 efalias 'cl-pars │ │ │ -000039a0: 652d 6c6f 6f70 2d63 6c61 7573 6520 235b e-loop-clause #[ │ │ │ -000039b0: 6e69 6c20 220d 8941 1540 c6c7 1e5e 1e5f nil "..A.@...^._ │ │ │ -000039c0: 1b0d ac87 c8c9 2188 82b2 0b0b ca61 ab8a ......!......a.. │ │ │ -000039d0: 0d89 4115 4016 6682 b20b 0bcb 61ab a40d ..A.@.f.....a... │ │ │ -000039e0: 40cc 73ab 830d 4115 0d40 3aac 84c8 cd21 @.s...A..@:....! │ │ │ -000039f0: 880d 403a 83b2 0b0d 8941 1540 0e67 4216 ..@:.....A.@.gB. │ │ │ -00003a00: 67aa 6e0b ce61 abd3 0d40 cf61 ab8f 0d41 g.n..a...@.a...A │ │ │ -00003a10: 400d 4141 15ae 81d0 1668 82b2 0b0d 40d1 @.AA.....h....@. │ │ │ -00003a20: 73ab 830d 4115 0d40 3aac 84c8 d221 880d s...A..@:....!.. │ │ │ -00003a30: 4040 cf61 ab93 0e66 ac8f 0d89 4115 4041 @@.a...f....A.@A │ │ │ -00003a40: 40ae 81d3 1668 82b2 0b0d 403a 83b2 0b0d @....h....@:.... │ │ │ -00003a50: 8941 1540 0e69 4216 69aa 6e0b d473 83a2 .A.@.iB.i.n..s.. │ │ │ -00003a60: 07d5 8989 891e 4b1e 411e 4219 0d89 4115 ......K.A.B...A. │ │ │ -00003a70: 40ae 82d6 201c 0d89 4115 4089 13d7 61ab @... ...A.@...a. │ │ │ -00003a80: 860d 8941 1540 130b d873 ab86 0d89 4115 ...A.@...s....A. │ │ │ -00003a90: 4013 0bd9 73ab 86da 13db 0d42 150b dc73 @...s......B...s │ │ │ -00003aa0: 83d6 010b 0d42 8915 40dd 73ab 84c8 de21 .....B..@.s....! │ │ │ -00003ab0: 880d 40df 61ae 860d 4141 40e0 731e 600d ..@.a...AA@.s.`. │ │ │ -00003ac0: 40e1 73ae 860d 4141 40e2 731e 610d 40e3 @.s...AA@.s.a.@. │ │ │ -00003ad0: 73ad 870d 4140 0d41 4115 1e48 0d40 e473 s...A@.AA..H.@.s │ │ │ -00003ae0: ad87 0d41 400d 4141 151e 520d 40e5 61ad ...A@.AA..R.@.a. │ │ │ -00003af0: 870d 4140 0d41 4115 1e44 e60e 5221 3fad ..A@.AA..D..R!?. │ │ │ -00003b00: 82d6 201e 54e6 0e44 213f ad82 d620 1e55 .. .T..D!?... .U │ │ │ -00003b10: 0e44 ab91 0e44 a7ab 8c0e 44e7 58ab 86c8 .D...D....D.X... │ │ │ -00003b20: e80e 445c 2288 0c0e 48ae 81e7 4409 4211 ..D\"...H...D.B. │ │ │ -00003b30: 0e54 ab88 0e54 0e52 4409 4211 0e55 ab88 .T...T.RD.B..U.. │ │ │ -00003b40: 0e55 0e44 4409 4211 0e52 aba1 0e60 ab8a .U.DD.B..R...`.. │ │ │ -00003b50: 0e61 ab83 e9aa 8bea aa88 0e61 ab83 ebaa .a.........a.... │ │ │ -00003b60: 81ec 0c0e 54ae 820e 5245 5c6e 4212 0c0e ....T...RE\nB... │ │ │ -00003b70: 60ab 83ed aa81 ee0c 0e55 ae85 0e44 ae81 `........U...D.. │ │ │ -00003b80: ef45 440e 4142 1641 2e07 8237 070b f073 .ED.AB.A...7...s │ │ │ -00003b90: 8365 020b f161 891e 31ab 870c 39ab 830c .e...a..1...9... │ │ │ -00003ba0: aa82 d620 8918 0d89 4115 4044 0942 11f2 ... ....A.@D.B.. │ │ │ -00003bb0: 0844 5c6e 4212 0bf3 61ab 8c0c f408 4444 .D\nB...a.....DD │ │ │ -00003bc0: 0e4c 4216 4caa 9c08 0c61 ac97 0cd5 4409 .LB.L....a....D. │ │ │ -00003bd0: 4211 0c0e 31ab 8308 aa83 f408 4444 0e42 B...1.......DD.B │ │ │ -00003be0: 4216 4208 0d40 e561 aba6 0d41 400d 4141 B.B..@.a...A@.AA │ │ │ -00003bf0: 1589 1e44 a2f5 73ab 8f0e 4441 4039 ab88 ...D..s...DA@9.. │ │ │ -00003c00: 0e44 4140 0844 aa85 f60e 4408 4529 aa83 .DA@.D....D.E).. │ │ │ -00003c10: f708 4444 0e41 4216 412a 8237 070b f861 ..DD.AB.A*.7...a │ │ │ -00003c20: abef 0d89 4115 401e 480d 40f9 61ab 890d ....A.@.H.@.a... │ │ │ -00003c30: 4140 0d41 4115 aa82 0e48 1e39 0cd5 4409 A@.AA....H.9..D. │ │ │ -00003c40: 4211 0e4b ac86 0d40 fa61 aba0 0cfb 0e56 B..K...@.a.....V │ │ │ -00003c50: ae85 d620 8916 560e 480c 4644 0e42 4216 ... ..V.H.FD.BB. │ │ │ -00003c60: 420c 0e39 440e 4142 1641 aaa1 0c0e 480e B..9D.AB.A....H. │ │ │ -00003c70: 3961 ab84 0e48 aa8f fb0e 56ae 85d6 2089 9a...H....V... . │ │ │ -00003c80: 1656 0e48 0e39 4644 0e42 4216 422a 8237 .V.H.9FD.BB.B*.7 │ │ │ -00003c90: 070b fc73 abdd d620 d620 1e43 891e 570d ...s... . .C..W. │ │ │ -00003ca0: 8941 1540 4409 4211 0e43 fd44 0942 11eb .A.@D.B..C.D.B.. │ │ │ -00003cb0: fe0e 43ff 0e43 4445 8174 000e 5744 455c ..C..CDE.t..WDE\ │ │ │ -00003cc0: 6e42 120b 8175 0061 ab91 0c81 7600 0e57 nB...u.a....v..W │ │ │ -00003cd0: 0e43 4544 0e4c 4216 4caa 950c d544 0942 .CED.LB.L....D.B │ │ │ -00003ce0: 110c 8176 000e 570e 4345 440e 4242 1642 ...v..W.CED.BB.B │ │ │ -00003cf0: 2a82 3707 0b81 7700 7383 2104 0d40 8178 *.7...w.s.!..@.x │ │ │ -00003d00: 0073 ae8e 0d40 8179 0073 3fad 85c8 817a .s...@.y.s?....z │ │ │ -00003d10: 0021 0d41 400d 4141 15d6 200d 4081 7b00 .!.A@.AA.. .@.{. │ │ │ -00003d20: 61ab a60d 4140 4781 7c00 55ab 950d 4140 a...A@G.|.U...A@ │ │ │ -00003d30: 4081 7d00 61ab 8b0d 4140 0d41 4115 4140 @.}.a...A@.AA.A@ │ │ │ -00003d40: aa89 c881 7e00 21aa 82d6 201e 431e 461e ....~.!... .C.F. │ │ │ -00003d50: 6a1e 6b0e 460e 6a44 0942 110e 43e7 4409 j.k.F.jD.B..C.D. │ │ │ -00003d60: 4211 0e6b abaa d620 891e 6c81 7400 0e46 B..k... ..l.t..F │ │ │ -00003d70: 4444 0942 110c 817f 000e 460e 4345 440e DD.B......F.CED. │ │ │ -00003d80: 4c42 164c eb0e 430e 6c45 5c6e 4212 29aa LB.L..C.lE\nB.). │ │ │ -00003d90: ba0c d544 0942 11fa 0e46 8180 00f2 0e46 ...D.B...F.....F │ │ │ -00003da0: 44eb 0e43 8174 000e 4644 4545 455c 6e42 D..C.t..FDEEE\nB │ │ │ -00003db0: 120c fbf2 0e46 4481 8100 0e46 4481 7600 .....FD....FD.v. │ │ │ -00003dc0: 0e46 0e43 4546 440e 4242 1642 0e43 ff0e .F.CEFD.BB.B.C.. │ │ │ -00003dd0: 4344 440e 4142 1641 2c82 3707 0b0e 5f73 CDD.AB.A,.7..._s │ │ │ -00003de0: abf9 0d40 8182 0073 ac86 c881 7a00 2188 ...@...s....z.!. │ │ │ -00003df0: 0d41 400d 4141 151e 6d0d 4081 7b00 61ab .A@.AA..m.@.{.a. │ │ │ -00003e00: ad0d 4140 4781 7c00 55ab 9c0d 4140 400e ..A@G.|.U...A@@. │ │ │ -00003e10: 5f73 ab93 0d41 4040 0b61 ac8b 0d41 400d _s...A@@.a...A@. │ │ │ -00003e20: 4141 1541 40aa 89c8 817e 0021 aa82 d620 AA.A@....~.!... │ │ │ -00003e30: 1e49 0b81 8300 73ab 860e 490c 1649 1481 .I....s...I..I.. │ │ │ -00003e40: 8400 8185 0081 8600 0c0e 4944 8187 0042 ..........ID...B │ │ │ -00003e50: 4244 0e6d 4516 532a 8237 070b 8188 0073 BD.mE.S*.7.....s │ │ │ -00003e60: abab 0d40 8189 0073 ad87 0d41 400d 4141 ...@...s...A@.AA │ │ │ -00003e70: 151e 6e81 8a00 8185 0081 8600 0c43 8187 ..n..........C.. │ │ │ -00003e80: 0042 4244 0e6e 4516 5329 8237 070b 818b .BBD.nE.S).7.... │ │ │ -00003e90: 0073 abe3 d589 891e 4d1e 4e1e 4f0d 4081 .s......M.N.O.@. │ │ │ -00003ea0: 8c00 73ab b10d 4081 4e00 61ab 8b0d 4140 ..s...@.N.a...A@ │ │ │ -00003eb0: 0d41 4115 164e aa65 0d40 814d 0061 ab8b .AA..N.e.@.M.a.. │ │ │ -00003ec0: 0d41 400d 4141 1516 4daa 520d 4140 0d41 .A@.AA..M.R.A@.A │ │ │ -00003ed0: 4115 164f aa47 818d 0081 8500 8186 000c A..O.G.......... │ │ │ -00003ee0: d620 4481 8e00 d546 440e 4f0e 4e0e 4daf . D....FD.O.N.M. │ │ │ -00003ef0: 0516 532b 8237 070b 818f 0073 83ef 05d5 ..S+.7.....s.... │ │ │ -00003f00: 8989 89d6 20d6 201e 581e 591e 4d1e 4e1e .... . .X.Y.M.N. │ │ │ -00003f10: 621e 4f0d 4081 9000 73ab c40d 4081 4e00 b.O.@...s...@.N. │ │ │ -00003f20: 61ab 8b0d 4140 0d41 4115 164e aa65 0d40 a...A@.AA..N.e.@ │ │ │ -00003f30: 814d 0061 ab8b 0d41 400d 4141 1516 4daa .M.a...A@.AA..M. │ │ │ -00003f40: 520d 4081 9100 61ab 8b0d 4140 0d41 4115 R.@...a...A@.AA. │ │ │ -00003f50: 1662 aa3f 0d41 400d 4141 1516 4faa 340c .b.?.A@.AA..O.4. │ │ │ -00003f60: 3aab 940c 4039 ab8f 0c41 39ab 8a0c 4016 :...@9...A9...@. │ │ │ -00003f70: 590c 4116 58aa 8f0c 8192 000e 590e 5845 Y.A.X.......Y.XE │ │ │ -00003f80: 440e 4242 1642 8193 0081 8500 8186 000e D.BB.B.......... │ │ │ -00003f90: 590e 5844 8194 0045 440e 4f0e 620e 4e0e Y.XD...ED.O.b.N. │ │ │ -00003fa0: 4daf 0616 532e 0682 3707 0b0e 5e73 837b M...S...7...^s.{ │ │ │ -00003fb0: 060d 4081 9500 73ac 86c8 817a 0021 880d ..@...s....z.!.. │ │ │ -00003fc0: 4140 0d41 4189 1540 817b 0061 abad 0d41 A@.AA..@.{.a...A │ │ │ -00003fd0: 4047 817c 0055 ab9c 0d41 4040 0e5e 73ab @G.|.U...A@@.^s. │ │ │ -00003fe0: 930d 4140 400b 61ac 8b0d 4140 0d41 4115 ..A@@.a...A@.AA. │ │ │ -00003ff0: 4140 aa89 c881 7e00 21aa 82d6 201e 491e A@....~.!... .I. │ │ │ -00004000: 6f0b 8196 0073 ab86 0e49 0c16 4914 0b81 o....s...I..I... │ │ │ -00004010: 9700 73ab 8581 9800 aa83 8199 0081 8500 ..s............. │ │ │ -00004020: 8186 000c 0e49 4481 8700 4242 440e 6f45 .....ID...BBD.oE │ │ │ -00004030: 1653 2a82 3707 0b81 9a00 73ab bad6 2018 .S*.7.....s... . │ │ │ -00004040: 0c81 9b00 4409 4211 08d5 4409 4211 819c ....D.B...D.B... │ │ │ -00004050: 0081 9d00 819e 000c 0845 4481 8000 08fe .........ED..... │ │ │ -00004060: 080c 4545 455c 6e42 120c 819f 000c 4444 ..EEE\nB......DD │ │ │ -00004070: 0e41 4216 4129 aafb 0b81 a000 73ab d70d .AB.A)......s... │ │ │ -00004080: 4081 a100 73ad 870d 4140 0d41 4115 d620 @...s...A@.AA.. │ │ │ -00004090: 181e 630c 0e63 ab88 81a2 000e 6344 aa83 ..c..c......cD.. │ │ │ -000040a0: 81a3 0044 0942 1108 d544 0942 1181 9c00 ...D.B...D.B.... │ │ │ -000040b0: 819d 0081 9e00 0c08 4544 8180 0008 fe08 ........ED...... │ │ │ -000040c0: 0c45 4545 5c6e 4212 0c81 a400 0c44 440e .EEE\nB......DD. │ │ │ -000040d0: 4142 1641 2aaa 9d0b 39ad 850b 81a5 004e AB.A*...9......N │ │ │ -000040e0: 891e 5aab 870e 5a0c 2188 aa87 c881 a600 ..Z...Z.!....... │ │ │ -000040f0: 0b5c 2288 290d 4029 fa61 ab8d 81a7 0016 .\".).@).a...... │ │ │ -00004100: 4b0d 8941 1588 82b7 000e 4bab 8c09 ab89 K..A......K..... │ │ │ -00004110: 099f 0e47 4216 47aa 8d81 a800 81a9 0009 ...GB.G......... │ │ │ -00004120: 5c22 0e47 a416 470e 42ab 9481 aa00 81ab \".G..G.B....... │ │ │ -00004130: 000e 429f fe0e 4b23 81a7 0045 5c6e 4212 ..B...K#...E\nB. │ │ │ -00004140: 0e41 ab9a 0e4b ab85 81ac 00aa 81fe 81ad .A...K.......... │ │ │ -00004150: 0081 ae00 0e41 9f5c 2242 0e70 4216 702c .....A.\"B.pB.p, │ │ │ -00004160: 82b2 0b0b 81af 0061 aba2 d620 8918 0d89 .......a... .... │ │ │ -00004170: 4115 4044 430e 4742 1647 eafe 0881 b000 A.@DC.GB.G...... │ │ │ -00004180: 0844 45e7 455c 6e42 1229 82b2 0b0b 81b1 .DE.E\nB.)...... │ │ │ -00004190: 0061 abc5 0d89 4115 4081 b200 d581 b300 .a....A.@....... │ │ │ -000041a0: 5c22 1c1e 400c 0e71 61ab 9381 aa00 81b4 \"..@..qa....... │ │ │ -000041b0: 000e 400c 4581 a700 455c 6e42 12aa 9881 ..@.E...E\nB.... │ │ │ -000041c0: aa00 fe0c 81b5 000c 81a9 000e 4044 4545 ............@DEE │ │ │ -000041d0: 81a7 0045 5c6e 4212 2a82 b20b 0b81 b600 ...E\nB.*....... │ │ │ -000041e0: 73ab d30d 8941 1540 81b2 00d5 81b3 005c s....A.@.......\ │ │ │ -000041f0: 221c 1e40 81aa 00fe 0c89 0e71 61ab 9981 "..@.......qa... │ │ │ -00004200: b500 0b81 b700 73ab 8581 b300 aa83 81b8 ......s......... │ │ │ -00004210: 000e 4044 0c45 aa93 0b81 b900 73ab 8581 ..@D.E......s... │ │ │ -00004220: b500 aa83 81ae 000c 0e40 4545 81a7 0045 .........@EE...E │ │ │ -00004230: 5c6e 4212 2a82 b20b 0b81 ba00 73ab a70d \nB.*.......s... │ │ │ -00004240: 8941 1540 81b2 0081 bb00 211c 1e40 81aa .A.@......!..@.. │ │ │ -00004250: 0081 bc00 81bd 000c 0e40 4681 a700 455c .........@F...E\ │ │ │ -00004260: 6e42 122a 82b2 0b0b 81be 0073 aba7 0d89 nB.*.......s.... │ │ │ -00004270: 4115 4081 b200 81bf 0021 1c1e 4081 aa00 A.@......!..@... │ │ │ -00004280: 81bc 0081 c000 0c0e 4046 81a7 0045 5c6e ........@F...E\n │ │ │ -00004290: 4212 2a82 b20b 0b81 c100 73ab a20d 8941 B.*.......s....A │ │ │ -000042a0: 1540 81b2 00e7 211c 1e40 81aa 0081 c200 .@....!..@...... │ │ │ -000042b0: 0c0e 4045 81a7 0045 5c6e 4212 2a82 b20b ..@E...E\nB.*... │ │ │ -000042c0: 0b81 c300 73ab a40d 8941 1540 81b2 00e7 ....s....A.@.... │ │ │ -000042d0: 211c 1e40 81aa 00fb 0e40 81c2 000c 4445 !..@.....@....DE │ │ │ -000042e0: 81a7 0045 5c6e 4212 2a82 b20b 0b81 c400 ...E\nB.*....... │ │ │ -000042f0: 73ab dd0d 8941 1540 1e40 81c5 000e 4021 s....A.@.@....@! │ │ │ -00004300: ab84 0e40 aa82 d620 1881 b200 d521 1c81 ...@... .....!.. │ │ │ -00004310: c600 81c7 000b 21e7 81c8 004f 211e 72fe ......!....O!.r. │ │ │ -00004320: 0cfb 0c0e 720c 0845 0846 451e 6481 aa00 ....r..E.FE.d... │ │ │ -00004330: 080e 4061 ab84 0e64 aa8b 81c9 0008 0e40 ..@a...d.......@ │ │ │ -00004340: 4443 0e64 4581 a700 455c 6e42 122d 82b2 DC.dE...E\nB.-.. │ │ │ -00004350: 0b0b 81ca 0061 abb4 d51e 5b0d 8941 1540 .....a....[..A.@ │ │ │ -00004360: 0d40 f861 ad87 0d41 400d 4141 1544 0e5b .@.a...A@.AA.D.[ │ │ │ -00004370: 4216 5b0d 40fa 61ab 870d 8941 1588 aa5b B.[.@.a....A...[ │ │ │ -00004380: 0e5b 9f0e 4742 1647 2982 b20b 0b81 cb00 .[..GB.G)....... │ │ │ -00004390: 61ab 8b0d 8941 1540 5c6e 4212 82b2 0b0b a....A.@\nB..... │ │ │ -000043a0: 81cc 0061 ab8f 819d 000d 8941 1540 445c ...a.......A.@D\ │ │ │ -000043b0: 6e42 1282 b20b 0b81 cd00 61ab 9c0e 45ac nB........a...E. │ │ │ -000043c0: 84d6 2016 45fe 0e45 0d89 4115 4045 5c6e .. .E..E..A.@E\n │ │ │ -000043d0: 4212 81a7 0016 7382 b20b 0b81 ce00 61ab B.....s.......a. │ │ │ -000043e0: a00e 45ac 84d6 2016 45fe 0e45 819d 000d ..E... .E..E.... │ │ │ -000043f0: 8941 1540 4445 5c6e 4212 81a7 0016 7382 .A.@DE\nB.....s. │ │ │ -00004400: b20b 0b81 cf00 61ab a70e 45ac 84d6 2016 ......a...E... . │ │ │ -00004410: 450e 50ac 84d6 2016 50fe 0e45 819d 00fe E.P... .P..E.... │ │ │ -00004420: 0e50 0d89 4115 4045 4445 5c6e 4212 82b2 .P..A.@EDE\nB... │ │ │ -00004430: 0b0b 81d0 0073 833a 0b0d 8941 1540 1e65 .....s.:...A.@.e │ │ │ -00004440: d51a 81d1 0020 8881 d200 5c6e 9f21 291e ..... ....\n.!). │ │ │ -00004450: 39d5 1a0d 4081 5100 61ab 880d 4115 81d1 9...@.Q.a...A... │ │ │ -00004460: 0020 8881 d200 5c6e 9f21 291e 510e 3940 . ....\n.!).Q.9@ │ │ │ -00004470: 81a7 0061 ad87 0e51 4081 a700 611e 5c5c ...a...Q@...a.\\ │ │ │ -00004480: 0d40 8152 0061 ab83 0d41 150b 81d3 0061 .@.R.a...A.....a │ │ │ -00004490: ab88 0e51 0e39 1651 1639 0e5c 5cab 8a81 ...Q.9.Q.9.\\... │ │ │ -000044a0: aa00 0e39 4140 42aa 8681 7c00 0e39 380e ...9A@B...|..98. │ │ │ -000044b0: 5c5c ab86 0e51 4140 aa87 817c 000e 5138 \\...QA@...|..Q8 │ │ │ -000044c0: 4342 1e4a 81d4 000e 4a81 d500 5c22 aba1 CB.J....J...\".. │ │ │ -000044d0: d620 8918 430e 4742 1647 fbfe 080e 6545 . ..C.GB.G....eE │ │ │ -000044e0: 81d6 0008 81d5 000e 4a23 4242 164a 29aa ........J#BB.J). │ │ │ -000044f0: 89fb 0e65 0e4a 4242 164a 0e5c 5cab 8b81 ...e.JBB.J.\\... │ │ │ -00004500: aa00 0e4a 81a7 0045 aa82 0e4a 5c6e 4212 ...J...E...J\nB. │ │ │ -00004510: 2daa f80b 81d7 0073 abb0 d51e 5d0d 403a -......s....].@: │ │ │ -00004520: ac86 c881 d800 2188 0d40 3aab 8c0d 8941 ......!..@:....A │ │ │ -00004530: 1540 0e5d 4216 5daa 6f81 aa00 81a7 000e .@.]B.].o....... │ │ │ -00004540: 5d42 9f42 5c6e 4212 29aa c10b cf61 aba2 ]B.B\nB.)....a.. │ │ │ -00004550: 0e45 ac84 d620 1645 0e50 ac84 d620 1650 .E... .E.P... .P │ │ │ -00004560: fe0e 500d 8941 1540 0e45 d5af 055c 6e42 ..P..A.@.E...\nB │ │ │ -00004570: 12aa 9a0b 39ad 850b 81d9 004e 891e 5aac ....9......N..Z. │ │ │ -00004580: 87c8 81da 000b 5c22 880e 5a20 8829 0d40 ......\"..Z .).@ │ │ │ -00004590: fa61 ad87 0d41 1581 d100 202b 8722 205b .a...A.... +." [ │ │ │ -000045a0: 7465 6d70 206c 6f6f 702d 666f 722d 6269 temp loop-for-bi │ │ │ -000045b0: 6e64 696e 6773 206c 6f6f 702d 626f 6479 ndings loop-body │ │ │ -000045c0: 2077 6f72 6420 7661 7220 6172 6773 2028 word var args ( │ │ │ -000045d0: 6861 7368 2d6b 6579 2068 6173 682d 6b65 hash-key hash-ke │ │ │ -000045e0: 7973 2068 6173 682d 7661 6c75 6520 6861 ys hash-value ha │ │ │ -000045f0: 7368 2d76 616c 7565 7329 2028 6b65 792d sh-values) (key- │ │ │ -00004600: 636f 6465 206b 6579 2d63 6f64 6573 206b code key-codes k │ │ │ -00004610: 6579 2d73 6571 206b 6579 2d73 6571 7320 ey-seq key-seqs │ │ │ -00004620: 6b65 792d 6269 6e64 696e 6720 6b65 792d key-binding key- │ │ │ -00004630: 6269 6e64 696e 6773 2920 6572 726f 7220 bindings) error │ │ │ -00004640: 224d 616c 666f 726d 6564 2060 6c6f 6f70 "Malformed `loop │ │ │ -00004650: 2720 6d61 6372 6f22 206e 616d 6564 2069 ' macro" named i │ │ │ -00004660: 6e69 7469 616c 6c79 2028 646f 2064 6f69 nitially (do doi │ │ │ -00004670: 6e67 2920 2253 796e 7461 7820 6572 726f ng) "Syntax erro │ │ │ -00004680: 7220 6f6e 2060 696e 6974 6961 6c6c 7927 r on `initially' │ │ │ -00004690: 2063 6c61 7573 6522 2066 696e 616c 6c79 clause" finally │ │ │ -000046a0: 2072 6574 7572 6e20 276e 696c 2028 646f return 'nil (do │ │ │ -000046b0: 2064 6f69 6e67 2920 2253 796e 7461 7820 doing) "Syntax │ │ │ -000046c0: 6572 726f 7220 6f6e 2060 6669 6e61 6c6c error on `finall │ │ │ -000046d0: 7927 2063 6c61 7573 6522 2027 6e69 6c20 y' clause" 'nil │ │ │ -000046e0: 2866 6f72 2061 7329 206e 696c 2067 656e (for as) nil gen │ │ │ -000046f0: 7379 6d20 6265 696e 6720 2874 6865 2065 sym being (the e │ │ │ -00004700: 6163 6829 2028 6275 6666 6572 2062 7566 ach) (buffer buf │ │ │ -00004710: 6665 7273 2920 696e 2028 6275 6666 6572 fers) in (buffer │ │ │ -00004720: 2d6c 6973 7429 2028 6672 6f6d 2064 6f77 -list) (from dow │ │ │ -00004730: 6e66 726f 6d20 7570 6672 6f6d 2074 6f20 nfrom upfrom to │ │ │ -00004740: 646f 776e 746f 2075 7074 6f20 6162 6f76 downto upto abov │ │ │ -00004750: 6520 6265 6c6f 7720 6279 2920 2864 6f77 e below by) (dow │ │ │ -00004760: 6e74 6f20 6162 6f76 6529 2022 4d75 7374 nto above) "Must │ │ │ -00004770: 2073 7065 6369 6679 2060 6672 6f6d 2720 specify `from' │ │ │ -00004780: 7661 6c75 6520 666f 7220 646f 776e 7761 value for downwa │ │ │ -00004790: 7264 206c 6f6f 7022 2064 6f77 6e66 726f rd loop" downfro │ │ │ -000047a0: 6d20 2864 6f77 6e74 6f20 6162 6f76 6529 m (downto above) │ │ │ -000047b0: 2028 6162 6f76 6520 6265 6c6f 7729 2028 (above below) ( │ │ │ -000047c0: 6162 6f76 6520 6265 6c6f 7729 2028 6672 above below) (fr │ │ │ -000047d0: 6f6d 2075 7066 726f 6d20 646f 776e 6672 om upfrom downfr │ │ │ -000047e0: 6f6d 2920 2874 6f20 7570 746f 2064 6f77 om) (to upto dow │ │ │ -000047f0: 6e74 6f20 6162 6f76 6520 6265 6c6f 7729 nto above below) │ │ │ -00004800: 2062 7920 636c 2d63 6f6e 7374 2d65 7870 by cl-const-exp │ │ │ -00004810: 722d 7020 3020 224c 6f6f 7020 6062 7927 r-p 0 "Loop `by' │ │ │ -00004820: 2076 616c 7565 2069 7320 6e6f 7420 706f value is not po │ │ │ -00004830: 7369 7469 7665 3a20 2573 2220 3e20 3e3d sitive: %s" > >= │ │ │ -00004840: 203c 203c 3d20 2d20 2b20 3120 2869 6e20 < <= - + 1 (in │ │ │ -00004850: 696e 2d72 6566 206f 6e29 206f 6e20 636f in-ref on) on co │ │ │ -00004860: 6e73 7020 696e 2d72 6566 2063 6172 2028 nsp in-ref car ( │ │ │ -00004870: 7175 6f74 6520 6675 6e63 7469 6f6e 2066 quote function f │ │ │ -00004880: 756e 6374 696f 6e2a 2920 6675 6e63 616c unction*) funcal │ │ │ -00004890: 6c20 6364 7220 3d20 7468 656e 2061 6e64 l cdr = then and │ │ │ -000048a0: 2069 6620 2861 6372 6f73 7320 6163 726f if (across acro │ │ │ -000048b0: 7373 2d72 6566 2920 2d31 2073 6574 7120 ss-ref) -1 setq │ │ │ -000048c0: 312b 2077 6861 7420 6c6f 6f70 2d66 6f72 1+ what loop-for │ │ │ -000048d0: 2d73 7465 7073 206c 6f6f 702d 666f 722d -steps loop-for- │ │ │ -000048e0: 7365 7473 2074 656d 702d 6964 7820 7374 sets temp-idx st │ │ │ -000048f0: 6570 206c 6f6f 702d 6669 6e69 7368 2d66 ep loop-finish-f │ │ │ -00004900: 6c61 6720 7465 6d70 2d73 6571 206c 6f6f lag temp-seq loo │ │ │ -00004910: 702d 6269 6e64 696e 6773 2073 7461 7274 p-bindings start │ │ │ -00004920: 206f 7468 6572 2066 6f72 6d20 616e 6473 other form ands │ │ │ -00004930: 206c 6f6f 702d 7379 6d62 6f6c 2d6d 6163 loop-symbol-mac │ │ │ -00004940: 7320 746f 2066 726f 6d20 6275 6620 6c6f s to from buf lo │ │ │ -00004950: 6f70 2d72 6573 756c 742d 7661 7220 656c op-result-var el │ │ │ -00004960: 7365 2065 6e64 206c 6f6f 702d 6d61 702d se end loop-map- │ │ │ -00004970: 666f 726d 2065 6e64 2d76 6172 2073 7465 form end-var ste │ │ │ -00004980: 702d 7661 7220 6c6f 6f70 2d66 6972 7374 p-var loop-first │ │ │ -00004990: 2d66 6c61 6720 7465 6d70 2d76 6563 2076 -flag temp-vec v │ │ │ -000049a0: 6172 3220 7661 7231 2068 616e 646c 6572 ar2 var1 handler │ │ │ -000049b0: 2062 696e 6469 6e67 7320 7369 6d70 6c65 bindings simple │ │ │ -000049c0: 2062 6f64 7920 6b65 792d 7479 7065 7320 body key-types │ │ │ -000049d0: 6861 7368 2d74 7970 6573 2064 6f77 6e20 hash-types down │ │ │ -000049e0: 6578 636c 2070 726f 7020 7363 7220 7365 excl prop scr se │ │ │ -000049f0: 7420 636f 6e64 206c 6f6f 702d 6e61 6d65 t cond loop-name │ │ │ -00004a00: 206c 6f6f 702d 696e 6974 6961 6c6c 7920 loop-initially │ │ │ -00004a10: 6c6f 6f70 2d72 6573 756c 742d 6578 706c loop-result-expl │ │ │ -00004a20: 6963 6974 206c 6f6f 702d 6669 6e61 6c6c icit loop-finall │ │ │ -00004a30: 7920 7365 7120 7265 6620 7465 6d70 2d6c y seq ref temp-l │ │ │ -00004a40: 656e 2074 6162 6c65 206f 6220 6d61 7020 en table ob map │ │ │ -00004a50: 6c6f 6f70 2d73 7465 7073 206c 6f6f 702d loop-steps loop- │ │ │ -00004a60: 6163 6375 6d2d 7661 7220 6675 6e63 206c accum-var func l │ │ │ -00004a70: 6f6f 702d 7265 7375 6c74 206c 656e 6774 oop-result lengt │ │ │ -00004a80: 6820 6163 726f 7373 2d72 6566 2061 7265 h across-ref are │ │ │ -00004a90: 6620 2865 6c65 6d65 6e74 2065 6c65 6d65 f (element eleme │ │ │ -00004aa0: 6e74 7329 2028 696e 2d72 6566 206f 662d nts) (in-ref of- │ │ │ -00004ab0: 7265 6629 2028 696e 206f 6629 2022 4578 ref) (in of) "Ex │ │ │ -00004ac0: 7065 6374 6564 2060 6f66 2722 2075 7369 pected `of'" usi │ │ │ -00004ad0: 6e67 2032 2069 6e64 6578 2022 4261 6420 ng 2 index "Bad │ │ │ -00004ae0: 6075 7369 6e67 2720 636c 6175 7365 2220 `using' clause" │ │ │ -00004af0: 656c 7420 6f72 2070 6f70 2028 696e 206f elt or pop (in o │ │ │ -00004b00: 6629 2028 6861 7368 2d76 616c 7565 2068 f) (hash-value h │ │ │ -00004b10: 6173 682d 7661 6c75 6573 2920 6d61 7068 ash-values) maph │ │ │ -00004b20: 6173 6820 6675 6e63 7469 6f6e 206c 616d ash function lam │ │ │ -00004b30: 6264 6120 2d2d 636c 2d6d 6170 2028 7379 bda --cl-map (sy │ │ │ -00004b40: 6d62 6f6c 2070 7265 7365 6e74 2d73 796d mbol present-sym │ │ │ -00004b50: 626f 6c20 6578 7465 726e 616c 2d73 796d bol external-sym │ │ │ -00004b60: 626f 6c20 7379 6d62 6f6c 7320 7072 6573 bol symbols pres │ │ │ -00004b70: 656e 742d 7379 6d62 6f6c 7320 6578 7465 ent-symbols exte │ │ │ -00004b80: 726e 616c 2d73 796d 626f 6c73 2920 2869 rnal-symbols) (i │ │ │ -00004b90: 6e20 6f66 2920 6d61 7061 746f 6d73 2028 n of) mapatoms ( │ │ │ -00004ba0: 6f76 6572 6c61 7920 6f76 6572 6c61 7973 overlay overlays │ │ │ -00004bb0: 2065 7874 656e 7420 6578 7465 6e74 7329 extent extents) │ │ │ -00004bc0: 2028 696e 206f 6620 6672 6f6d 2074 6f29 (in of from to) │ │ │ -00004bd0: 2063 6c2d 6d61 702d 6578 7465 6e74 7320 cl-map-extents │ │ │ -00004be0: 2870 726f 676e 202e 202d 2d63 6c2d 6d61 (progn . --cl-ma │ │ │ -00004bf0: 7029 2028 696e 7465 7276 616c 2069 6e74 p) (interval int │ │ │ -00004c00: 6572 7661 6c73 2920 2869 6e20 6f66 2070 ervals) (in of p │ │ │ -00004c10: 726f 7065 7274 7920 6672 6f6d 2074 6f29 roperty from to) │ │ │ -00004c20: 2070 726f 7065 7274 7920 636f 6e73 2063 property cons c │ │ │ -00004c30: 6c2d 6d61 702d 696e 7465 7276 616c 7320 l-map-intervals │ │ │ -00004c40: 2870 726f 676e 202e 202d 2d63 6c2d 6d61 (progn . --cl-ma │ │ │ -00004c50: 7029 2028 696e 206f 6629 2028 6b65 792d p) (in of) (key- │ │ │ -00004c60: 6269 6e64 696e 6720 6b65 792d 6269 6e64 binding key-bind │ │ │ -00004c70: 696e 6773 2920 286b 6579 2d73 6571 206b ings) (key-seq k │ │ │ -00004c80: 6579 2d73 6571 7329 2063 6c2d 6d61 702d ey-seqs) cl-map- │ │ │ -00004c90: 6b65 796d 6170 2d72 6563 7572 7369 7665 keymap-recursive │ │ │ -00004ca0: 6c79 2063 6c2d 6d61 702d 6b65 796d 6170 ly cl-map-keymap │ │ │ -00004cb0: 2028 6672 616d 6520 6672 616d 6573 2073 (frame frames s │ │ │ -00004cc0: 6372 6565 6e20 7363 7265 656e 7329 2028 creen screens) ( │ │ │ -00004cd0: 7365 6c65 6374 6564 2d66 7261 6d65 2920 selected-frame) │ │ │ -00004ce0: 7072 6f67 3120 6e6f 7420 6571 206e 6578 prog1 not eq nex │ │ │ -00004cf0: 742d 6672 616d 6520 2877 696e 646f 7720 t-frame (window │ │ │ -00004d00: 7769 6e64 6f77 7329 2028 696e 206f 6629 windows) (in of) │ │ │ -00004d10: 2066 7261 6d65 2d73 656c 6563 7465 642d frame-selected- │ │ │ -00004d20: 7769 6e64 6f77 2028 7365 6c65 6374 6564 window (selected │ │ │ -00004d30: 2d77 696e 646f 7729 206e 6578 742d 7769 -window) next-wi │ │ │ -00004d40: 6e64 6f77 2063 6c2d 6c6f 6f70 2d66 6f72 ndow cl-loop-for │ │ │ -00004d50: 2d68 616e 646c 6572 2022 4578 7065 6374 -handler "Expect │ │ │ -00004d60: 6564 2061 2060 666f 7227 2070 7265 706f ed a `for' prepo │ │ │ -00004d70: 7369 7469 6f6e 2c20 666f 756e 6420 2573 sition, found %s │ │ │ -00004d80: 2220 7420 6d61 7063 6172 206c 6973 7420 " t mapcar list │ │ │ -00004d90: 7072 6f67 6e20 636c 2d6c 6f6f 702d 6c65 progn cl-loop-le │ │ │ -00004da0: 7420 7073 6574 7120 6170 706c 7920 6170 t psetq apply ap │ │ │ -00004db0: 7065 6e64 2072 6570 6561 7420 312d 2063 pend repeat 1- c │ │ │ -00004dc0: 6f6c 6c65 6374 2063 6c2d 6c6f 6f70 2d68 ollect cl-loop-h │ │ │ -00004dd0: 616e 646c 652d 6163 6375 6d20 6e72 6576 andle-accum nrev │ │ │ -00004de0: 6572 7365 2070 7573 6820 6e63 6f6e 6320 erse push nconc │ │ │ -00004df0: 286e 636f 6e63 206e 636f 6e63 696e 6720 (nconc nconcing │ │ │ -00004e00: 6170 7065 6e64 2061 7070 656e 6469 6e67 append appending │ │ │ -00004e10: 2920 286e 636f 6e63 206e 636f 6e63 696e ) (nconc nconcin │ │ │ -00004e20: 6729 2072 6576 6572 7365 2028 6e63 6f6e g) reverse (ncon │ │ │ -00004e30: 6320 6e63 6f6e 6369 6e67 2920 2863 6f6e c nconcing) (con │ │ │ -00004e40: 6361 7420 636f 6e63 6174 696e 6729 2022 cat concating) " │ │ │ -00004e50: 2220 6361 6c6c 6620 636f 6e63 6174 2028 " callf concat ( │ │ │ -00004e60: 7663 6f6e 6361 7420 7663 6f6e 6361 7469 vconcat vconcati │ │ │ -00004e70: 6e67 2920 5b5d 2076 636f 6e63 6174 2028 ng) [] vconcat ( │ │ │ -00004e80: 7375 6d20 7375 6d6d 696e 6729 2069 6e63 sum summing) inc │ │ │ -00004e90: 6620 2863 6f75 6e74 2063 6f75 6e74 696e f (count countin │ │ │ -00004ea0: 6729 2028 6d69 6e69 6d69 7a65 206d 696e g) (minimize min │ │ │ -00004eb0: 696d 697a 696e 6720 6d61 7869 6d69 7a65 imizing maximize │ │ │ -00004ec0: 206d 6178 696d 697a 696e 6729 2063 6c2d maximizing) cl- │ │ │ -00004ed0: 7369 6d70 6c65 2d65 7870 722d 7020 696e simple-expr-p in │ │ │ -00004ee0: 7465 726e 2073 796d 626f 6c2d 6e61 6d65 tern symbol-name │ │ │ -00004ef0: 2033 206c 6574 2077 6974 6820 7768 696c 3 let with whil │ │ │ -00004f00: 6520 756e 7469 6c20 616c 7761 7973 206e e until always n │ │ │ -00004f10: 6576 6572 2074 6865 7265 6973 2028 6966 ever thereis (if │ │ │ -00004f20: 2077 6865 6e20 756e 6c65 7373 2920 636c when unless) cl │ │ │ -00004f30: 2d70 6172 7365 2d6c 6f6f 702d 636c 6175 -parse-loop-clau │ │ │ -00004f40: 7365 2063 6c2d 6c6f 6f70 2d62 7569 6c64 se cl-loop-build │ │ │ -00004f50: 2d61 6e64 7320 756e 6c65 7373 2063 6c2d -ands unless cl- │ │ │ -00004f60: 6578 7072 2d63 6f6e 7461 696e 7320 6974 expr-contains it │ │ │ -00004f70: 2073 7562 7374 2028 646f 2064 6f69 6e67 subst (do doing │ │ │ -00004f80: 2920 2253 796e 7461 7820 6572 726f 7220 ) "Syntax error │ │ │ -00004f90: 6f6e 2060 646f 2720 636c 6175 7365 2220 on `do' clause" │ │ │ -00004fa0: 636c 2d6c 6f6f 702d 6861 6e64 6c65 7220 cl-loop-handler │ │ │ -00004fb0: 2245 7870 6563 7465 6420 6120 6c6f 6f70 "Expected a loop │ │ │ -00004fc0: 206b 6579 776f 7264 2c20 666f 756e 6420 keyword, found │ │ │ -00004fd0: 2573 225d 2039 5d29 0a28 6465 6661 6c69 %s"] 9]).(defali │ │ │ -00004fe0: 6173 2027 636c 2d6c 6f6f 702d 6c65 7420 as 'cl-loop-let │ │ │ -00004ff0: 235b 2873 7065 6373 2062 6f64 7920 7061 #[(specs body pa │ │ │ -00005000: 7229 2022 0dc6 891a 1989 1cab 920c 40a2 r) "..........@. │ │ │ -00005010: 39ac 860c 4041 40ac 860c 4189 14ac 6e08 9...@A@...A...n. │ │ │ -00005020: abad 0cab aac6 100d 8914 aba3 c70c 4041 ..............@A │ │ │ -00005030: 4021 ac95 c820 891e 130c 4041 4044 0942 @!... ....@A@D.B │ │ │ -00005040: 110c 4041 0e13 a088 290c 4189 14ac 5d0d ..@A....).A...]. │ │ │ -00005050: abee 0d40 3aab df0d 4040 3cab d90d 4040 ...@:...@@<...@@ │ │ │ -00005060: 1bc6 1e14 0d89 4115 4041 401e 150b 0e16 ......A.@A@..... │ │ │ -00005070: b7ae 910b c90b ca5c 22ae 82c8 2042 0e16 .......\"... B.. │ │ │ -00005080: 4289 1616 4041 891e 130e 1544 5c6e 4212 B...@A.....D\nB. │ │ │ -00005090: 0b3a ab9b 0b89 4113 400e 15ad 8a0b ab83 .:....A.@....... │ │ │ -000050a0: cbaa 81cc 0e13 4444 0e14 4216 14aa 610e ......DD..B...a. │ │ │ -000050b0: 149f 0da4 152c aa19 0d89 4115 405c 6e42 .....,....A.@\nB │ │ │ -000050c0: 12aa 0f0e 18cd 61ab 9f08 ab83 ceaa 81cd ......a......... │ │ │ -000050d0: cfd0 5c6e 9f5c 2242 1e17 09ab 88d1 099f ..\n.\"B........ │ │ │ -000050e0: 0e17 45aa 820e 1729 aa90 08ab 83d2 aa81 ..E....)........ │ │ │ -000050f0: d109 9f5c 6e9f a40e 1842 422b 8722 205b ...\n....BB+." [ │ │ │ -00005100: 7061 7220 7465 6d70 7320 6e65 7720 7370 par temps new sp │ │ │ -00005110: 6563 2070 2073 7065 6373 206e 696c 2063 ec p specs nil c │ │ │ -00005120: 6c2d 636f 6e73 742d 6578 7072 2d70 2067 l-const-expr-p g │ │ │ -00005130: 656e 7379 6d20 6c61 7374 2030 2070 6f70 ensym last 0 pop │ │ │ -00005140: 2063 6172 2073 6574 7120 7073 6574 7120 car setq psetq │ │ │ -00005150: 6170 706c 7920 6e63 6f6e 6320 6c65 742a apply nconc let* │ │ │ -00005160: 206c 6574 2074 656d 7020 6e73 7065 6373 let temp nspecs │ │ │ -00005170: 2065 7870 7220 6c6f 6f70 2d64 6573 7472 expr loop-destr │ │ │ -00005180: 2d74 656d 7073 2073 6574 2062 6f64 795d -temps set body] │ │ │ -00005190: 2035 5d29 0a28 6465 6661 6c69 6173 2027 5]).(defalias ' │ │ │ -000051a0: 636c 2d6c 6f6f 702d 6861 6e64 6c65 2d61 cl-loop-handle-a │ │ │ -000051b0: 6363 756d 2023 5b28 6465 6620 266f 7074 ccum #[(def &opt │ │ │ -000051c0: 696f 6e61 6c20 6675 6e63 2920 220c 40c6 ional func) ".@. │ │ │ -000051d0: 61ab 9b0c 4140 0c41 4114 891b 0973 ac8b a...A@.AA....s.. │ │ │ -000051e0: 0b08 4443 5c6e 4212 0b09 4211 0b29 870d ..DC\nB...B..).. │ │ │ -000051f0: ae98 c720 8915 0844 435c 6e42 120e 08ab ... ...DC\nB.... │ │ │ -00005200: 860e 080d 44aa 810d 1609 0d87 2220 5b64 ....D......." [d │ │ │ -00005210: 6566 206c 6f6f 702d 6163 6375 6d2d 7661 ef loop-accum-va │ │ │ -00005220: 7273 206c 6f6f 702d 6269 6e64 696e 6773 rs loop-bindings │ │ │ -00005230: 2076 6172 2061 7267 7320 6c6f 6f70 2d61 var args loop-a │ │ │ -00005240: 6363 756d 2d76 6172 2069 6e74 6f20 6765 ccum-var into ge │ │ │ -00005250: 6e73 796d 2066 756e 6320 6c6f 6f70 2d72 nsym func loop-r │ │ │ -00005260: 6573 756c 745d 2033 5d29 0a28 6465 6661 esult] 3]).(defa │ │ │ -00005270: 6c69 6173 2027 636c 2d6c 6f6f 702d 6275 lias 'cl-loop-bu │ │ │ -00005280: 696c 642d 616e 6473 2023 5b28 636c 6175 ild-ands #[(clau │ │ │ -00005290: 7365 7329 2022 c489 191a 0bab c80b 40a2 ses) "........@. │ │ │ -000052a0: c561 abb7 c60b 4021 40c7 61ab ae0b 41ab .a....@!@.a...A. │ │ │ -000052b0: 9fc8 0b40 210b 4140 a2c5 61ab 860b 4140 ...@!.A@..a...A@ │ │ │ -000052c0: 41aa 840b 4140 43a4 0b41 4142 8913 aa4b A...A@C..AAB...K │ │ │ -000052d0: c80b 8941 1340 2141 11aa 3f0b 8941 1340 ...A.@!A..?..A.@ │ │ │ -000052e0: 5c6e 4212 aa35 5c6e 9fae 82c7 4389 1241 \nB..5\n....C..A │ │ │ -000052f0: ab85 c95c 6e42 aa82 5c6e 4009 89ab 8cca ...\nB..\n@..... │ │ │ -00005300: 5c6e c5ca 09cb 5c22 4243 5c22 aa81 5c6e \n....\"BC\"..\n │ │ │ -00005310: 8918 41ab 85c9 0842 aa82 0840 2945 2a87 ..A....B...@)E*. │ │ │ -00005320: 2220 5b66 756c 6c20 626f 6479 2061 6e64 " [full body and │ │ │ -00005330: 7320 636c 6175 7365 7320 6e69 6c20 7072 s clauses nil pr │ │ │ -00005340: 6f67 6e20 6c61 7374 2074 2062 7574 6c61 ogn last t butla │ │ │ -00005350: 7374 2061 6e64 2061 7070 656e 6420 2874 st and append (t │ │ │ -00005360: 295d 2039 5d29 0a23 4039 3820 5468 6520 )] 9]).#@98 The │ │ │ -00005370: 436f 6d6d 6f6e 204c 6973 7020 6064 6f27 Common Lisp `do' │ │ │ -00005380: 206c 6f6f 702e 0a46 6f72 6d61 7420 6973 loop..Format is │ │ │ -00005390: 3a20 2864 6f20 2828 5641 5220 494e 4954 : (do ((VAR INIT │ │ │ -000053a0: 205b 5354 4550 5d29 2e2e 2e29 2028 454e [STEP])...) (EN │ │ │ -000053b0: 442d 5445 5354 205b 5245 5355 4c54 2e2e D-TEST [RESULT.. │ │ │ -000053c0: 2e5d 2920 424f 4459 2e2e 2e29 1f0a 2864 .]) BODY...)..(d │ │ │ -000053d0: 6566 616c 6961 7320 2764 6f20 2728 6d61 efalias 'do '(ma │ │ │ -000053e0: 6372 6f20 2e20 235b 2873 7465 7073 2065 cro . #[(steps e │ │ │ -000053f0: 6e64 7465 7374 2026 7265 7374 2062 6f64 ndtest &rest bod │ │ │ -00005400: 7929 2022 c35c 6e09 08c4 2487 2220 5b62 y) ".\n...$." [b │ │ │ -00005410: 6f64 7920 656e 6474 6573 7420 7374 6570 ody endtest step │ │ │ -00005420: 7320 636c 2d65 7870 616e 642d 646f 2d6c s cl-expand-do-l │ │ │ -00005430: 6f6f 7020 6e69 6c5d 2035 2028 2324 202e oop nil] 5 (#$ . │ │ │ -00005440: 2032 3133 3536 295d 2929 0a23 4031 3030 21356)])).#@100 │ │ │ -00005450: 2054 6865 2043 6f6d 6d6f 6e20 4c69 7370 The Common Lisp │ │ │ -00005460: 2060 646f 2a27 206c 6f6f 702e 0a46 6f72 `do*' loop..For │ │ │ -00005470: 6d61 7420 6973 3a20 2864 6f2a 2028 2856 mat is: (do* ((V │ │ │ -00005480: 4152 2049 4e49 5420 5b53 5445 505d 292e AR INIT [STEP]). │ │ │ -00005490: 2e2e 2920 2845 4e44 2d54 4553 5420 5b52 ..) (END-TEST [R │ │ │ -000054a0: 4553 554c 542e 2e2e 5d29 2042 4f44 592e ESULT...]) BODY. │ │ │ -000054b0: 2e2e 291f 0a28 6465 6661 6c69 6173 2027 ..)..(defalias ' │ │ │ -000054c0: 646f 2a20 2728 6d61 6372 6f20 2e20 235b do* '(macro . #[ │ │ │ -000054d0: 2873 7465 7073 2065 6e64 7465 7374 2026 (steps endtest & │ │ │ -000054e0: 7265 7374 2062 6f64 7929 2022 c35c 6e09 rest body) ".\n. │ │ │ -000054f0: 08c4 2487 2220 5b62 6f64 7920 656e 6474 ..$." [body endt │ │ │ -00005500: 6573 7420 7374 6570 7320 636c 2d65 7870 est steps cl-exp │ │ │ -00005510: 616e 642d 646f 2d6c 6f6f 7020 745d 2035 and-do-loop t] 5 │ │ │ -00005520: 2028 2324 202e 2032 3135 3835 295d 2929 (#$ . 21585)])) │ │ │ -00005530: 0a28 6465 6661 6c69 6173 2027 636c 2d65 .(defalias 'cl-e │ │ │ -00005540: 7870 616e 642d 646f 2d6c 6f6f 7020 235b xpand-do-loop #[ │ │ │ -00005550: 2873 7465 7073 2065 6e64 7465 7374 2062 (steps endtest b │ │ │ -00005560: 6f64 7920 7374 6172 2920 22c5 c60b ab83 ody star) "..... │ │ │ -00005570: c7aa 81c8 c9ca 5c6e 5c22 cbcc 0940 44cd ......\n\"...@D. │ │ │ -00005580: 08c9 ce5c 6e5c 221c cfc6 0c5c 2289 14ad ...\n\"....\"... │ │ │ -00005590: 910b ac84 0c41 ac83 d0aa 81d1 d2cd 0c5c .....A.........\ │ │ │ -000055a0: 2242 4329 5c22 4242 0941 ae81 d342 4242 "BC)\"BB.A...BBB │ │ │ -000055b0: 4587 2220 5b62 6f64 7920 656e 6474 6573 E." [body endtes │ │ │ -000055c0: 7420 7374 6570 7320 7374 6172 2073 6574 t steps star set │ │ │ -000055d0: 7320 626c 6f63 6b20 6e69 6c20 6c65 742a s block nil let* │ │ │ -000055e0: 206c 6574 206d 6170 6361 7220 235b 2863 let mapcar #[(c │ │ │ -000055f0: 2920 2208 3aab 8708 4008 4140 4487 0887 ) ".:...@.A@D... │ │ │ -00005600: 2220 5b63 5d20 325d 2077 6869 6c65 206e " [c] 2] while n │ │ │ -00005610: 6f74 2061 7070 656e 6420 235b 2863 2920 ot append #[(c) │ │ │ -00005620: 2208 3aad 8b08 4141 ad86 0840 c108 3844 ".:...AA...@..8D │ │ │ -00005630: 8722 205b 6320 325d 2033 5d20 6465 6c71 ." [c 2] 3] delq │ │ │ -00005640: 2073 6574 7120 7073 6574 7120 6170 706c setq psetq appl │ │ │ -00005650: 7920 286e 696c 295d 2031 335d 290a 2340 y (nil)] 13]).#@ │ │ │ -00005660: 3137 3520 2864 6f6c 6973 7420 2856 4152 175 (dolist (VAR │ │ │ -00005670: 204c 4953 5420 5b52 4553 554c 545d 2920 LIST [RESULT]) │ │ │ -00005680: 424f 4459 2e2e 2e29 3a20 6c6f 6f70 206f BODY...): loop o │ │ │ -00005690: 7665 7220 6120 6c69 7374 2e0a 4576 616c ver a list..Eval │ │ │ -000056a0: 7561 7465 2042 4f44 5920 7769 7468 2056 uate BODY with V │ │ │ -000056b0: 4152 2062 6f75 6e64 2074 6f20 6561 6368 AR bound to each │ │ │ -000056c0: 2060 6361 7227 2066 726f 6d20 4c49 5354 `car' from LIST │ │ │ -000056d0: 2c20 696e 2074 7572 6e2e 0a54 6865 6e20 , in turn..Then │ │ │ -000056e0: 6576 616c 7561 7465 2052 4553 554c 5420 evaluate RESULT │ │ │ -000056f0: 746f 2067 6574 2072 6574 7572 6e20 7661 to get return va │ │ │ -00005700: 6c75 652c 2064 6566 6175 6c74 206e 696c lue, default nil │ │ │ -00005710: 2e1f 0a28 6465 6661 6c69 6173 2027 646f ...(defalias 'do │ │ │ -00005720: 6c69 7374 2027 286d 6163 726f 202e 2023 list '(macro . # │ │ │ -00005730: 5b28 7370 6563 2026 7265 7374 2062 6f64 [(spec &rest bod │ │ │ -00005740: 7929 2022 c3c4 211a c5c6 c75c 6e09 4140 y) "..!....\n.A@ │ │ │ -00005750: 4409 4044 c85c 6ec9 0940 ca5c 6e44 45cb D.@D.\n..@.\nDE. │ │ │ -00005760: 08c9 5c6e cc5c 6e44 4543 5c22 4242 4209 ..\n.\nDEC\"BBB. │ │ │ -00005770: 4141 ab8b c909 40c6 4509 4141 42aa 81cd AA....@.E.AAB... │ │ │ -00005780: 4242 4245 2987 2220 5b62 6f64 7920 7370 BBBE)." [body sp │ │ │ -00005790: 6563 2074 656d 7020 6765 6e73 796d 2022 ec temp gensym " │ │ │ -000057a0: 2d2d 646f 6c69 7374 2d74 656d 702d 2d22 --dolist-temp--" │ │ │ -000057b0: 2062 6c6f 636b 206e 696c 206c 6574 2077 block nil let w │ │ │ -000057c0: 6869 6c65 2073 6574 7120 6361 7220 6170 hile setq car ap │ │ │ -000057d0: 7065 6e64 2063 6472 2028 6e69 6c29 5d20 pend cdr (nil)] │ │ │ -000057e0: 3133 2028 2324 202e 2032 3231 3136 295d 13 (#$ . 22116)] │ │ │ -000057f0: 2929 0a23 4032 3231 2028 646f 7469 6d65 )).#@221 (dotime │ │ │ -00005800: 7320 2856 4152 2043 4f55 4e54 205b 5245 s (VAR COUNT [RE │ │ │ -00005810: 5355 4c54 5d29 2042 4f44 592e 2e2e 293a SULT]) BODY...): │ │ │ -00005820: 206c 6f6f 7020 6120 6365 7274 6169 6e20 loop a certain │ │ │ -00005830: 6e75 6d62 6572 206f 6620 7469 6d65 732e number of times. │ │ │ -00005840: 0a45 7661 6c75 6174 6520 424f 4459 2077 .Evaluate BODY w │ │ │ -00005850: 6974 6820 5641 5220 626f 756e 6420 746f ith VAR bound to │ │ │ -00005860: 2073 7563 6365 7373 6976 6520 696e 7465 successive inte │ │ │ -00005870: 6765 7273 2066 726f 6d20 302c 2069 6e63 gers from 0, inc │ │ │ -00005880: 6c75 7369 7665 2c0a 746f 2043 4f55 4e54 lusive,.to COUNT │ │ │ -00005890: 2c20 6578 636c 7573 6976 652e 2020 5468 , exclusive. Th │ │ │ -000058a0: 656e 2065 7661 6c75 6174 6520 5245 5355 en evaluate RESU │ │ │ -000058b0: 4c54 2074 6f20 6765 7420 7265 7475 726e LT to get return │ │ │ -000058c0: 2076 616c 7565 2c20 6465 6661 756c 740a value, default. │ │ │ -000058d0: 6e69 6c2e 1f0a 2864 6566 616c 6961 7320 nil...(defalias │ │ │ -000058e0: 2764 6f74 696d 6573 2027 286d 6163 726f 'dotimes '(macro │ │ │ -000058f0: 202e 2023 5b28 7370 6563 2026 7265 7374 . #[(spec &rest │ │ │ -00005900: 2062 6f64 7929 2022 c3c4 2119 c5c6 c709 body) "..!..... │ │ │ -00005910: 5c6e 4140 445c 6e40 c844 44c9 ca5c 6e40 \nA@D\n@.DD..\n@ │ │ │ -00005920: 0945 cb08 cc5c 6e40 4443 5c22 4242 5c6e .E...\n@DC\"BB\n │ │ │ -00005930: 4141 ae81 cd42 4242 4529 8722 205b 626f AA...BBBE)." [bo │ │ │ -00005940: 6479 2074 656d 7020 7370 6563 2067 656e dy temp spec gen │ │ │ -00005950: 7379 6d20 222d 2d64 6f74 696d 6573 2d74 sym "--dotimes-t │ │ │ -00005960: 656d 702d 2d22 2062 6c6f 636b 206e 696c emp--" block nil │ │ │ -00005970: 206c 6574 2030 2077 6869 6c65 203c 2061 let 0 while < a │ │ │ -00005980: 7070 656e 6420 696e 6366 2028 6e69 6c29 ppend incf (nil) │ │ │ -00005990: 5d20 3130 2028 2324 202e 2032 3235 3231 ] 10 (#$ . 22521 │ │ │ -000059a0: 295d 2929 0a23 4031 3536 2028 646f 7379 )])).#@156 (dosy │ │ │ -000059b0: 6d62 6f6c 7320 2856 4152 205b 4f42 4152 mbols (VAR [OBAR │ │ │ -000059c0: 5241 5920 5b52 4553 554c 545d 5d29 2042 RAY [RESULT]]) B │ │ │ -000059d0: 4f44 592e 2e2e 293a 206c 6f6f 7020 6f76 ODY...): loop ov │ │ │ -000059e0: 6572 2061 6c6c 2073 796d 626f 6c73 2e0a er all symbols.. │ │ │ -000059f0: 4576 616c 7561 7465 2042 4f44 5920 7769 Evaluate BODY wi │ │ │ -00005a00: 7468 2056 4152 2062 6f75 6e64 2074 6f20 th VAR bound to │ │ │ -00005a10: 6561 6368 2069 6e74 6572 6e65 6420 7379 each interned sy │ │ │ -00005a20: 6d62 6f6c 2c20 6f72 2074 6f20 6561 6368 mbol, or to each │ │ │ -00005a30: 2073 796d 626f 6c0a 6672 6f6d 204f 4241 symbol.from OBA │ │ │ -00005a40: 5252 4159 2e1f 0a28 6465 6661 6c69 6173 RRAY...(defalias │ │ │ -00005a50: 2027 646f 2d73 796d 626f 6c73 2027 286d 'do-symbols '(m │ │ │ -00005a60: 6163 726f 202e 2023 5b28 7370 6563 2026 acro . #[(spec & │ │ │ -00005a70: 7265 7374 2062 6f64 7929 2022 c2c3 c409 rest body) ".... │ │ │ -00005a80: 4043 c5c6 c709 4043 0842 4244 0941 40ad @C....@C.BBD.A@. │ │ │ -00005a90: 8409 4140 4342 4209 4141 4046 4587 2220 ..A@CBB.AA@FE." │ │ │ -00005aa0: 5b62 6f64 7920 7370 6563 2062 6c6f 636b [body spec block │ │ │ -00005ab0: 206e 696c 206c 6574 206d 6170 6174 6f6d nil let mapatom │ │ │ -00005ac0: 7320 6675 6e63 7469 6f6e 206c 616d 6264 s function lambd │ │ │ -00005ad0: 615d 2039 2028 2324 202e 2032 3239 3535 a] 9 (#$ . 22955 │ │ │ -00005ae0: 295d 2929 0a28 6465 6661 6c69 6173 2027 )])).(defalias ' │ │ │ -00005af0: 646f 2d61 6c6c 2d73 796d 626f 6c73 2027 do-all-symbols ' │ │ │ -00005b00: 286d 6163 726f 202e 2023 5b28 7370 6563 (macro . #[(spec │ │ │ -00005b10: 2026 7265 7374 2062 6f64 7929 2022 c209 &rest body) ".. │ │ │ -00005b20: 40c3 0941 4045 0842 4287 2220 5b62 6f64 @..A@E.BB." [bod │ │ │ -00005b30: 7920 7370 6563 2064 6f2d 7379 6d62 6f6c y spec do-symbol │ │ │ -00005b40: 7320 6e69 6c5d 2034 5d29 290a 2340 3230 s nil] 4])).#@20 │ │ │ -00005b50: 3520 2870 7365 7471 2053 594d 2056 414c 5 (psetq SYM VAL │ │ │ -00005b60: 2053 594d 2056 414c 202e 2e2e 293a 2073 SYM VAL ...): s │ │ │ -00005b70: 6574 2053 594d 7320 746f 2074 6865 2076 et SYMs to the v │ │ │ -00005b80: 616c 7565 7320 5641 4c73 2069 6e20 7061 alues VALs in pa │ │ │ -00005b90: 7261 6c6c 656c 2e0a 5468 6973 2069 7320 rallel..This is │ │ │ -00005ba0: 6c69 6b65 2060 7365 7471 272c 2065 7863 like `setq', exc │ │ │ -00005bb0: 6570 7420 7468 6174 2061 6c6c 2056 414c ept that all VAL │ │ │ -00005bc0: 2066 6f72 6d73 2061 7265 2065 7661 6c75 forms are evalu │ │ │ -00005bd0: 6174 6564 2028 696e 206f 7264 6572 290a ated (in order). │ │ │ -00005be0: 6265 666f 7265 2061 7373 6967 6e69 6e67 before assigning │ │ │ -00005bf0: 2061 6e79 2073 796d 626f 6c73 2053 594d any symbols SYM │ │ │ -00005c00: 2074 6f20 7468 6520 636f 7272 6573 706f to the correspo │ │ │ -00005c10: 6e64 696e 6720 7661 6c75 6573 2e1f 0a28 nding values...( │ │ │ -00005c20: 6465 6661 6c69 6173 2027 7073 6574 7120 defalias 'psetq │ │ │ -00005c30: 2728 6d61 6372 6f20 2e20 235b 2826 7265 '(macro . #[(&re │ │ │ -00005c40: 7374 2061 7267 7329 2022 c108 4287 2220 st args) "..B." │ │ │ -00005c50: 5b61 7267 7320 7073 6574 665d 2032 2028 [args psetf] 2 ( │ │ │ -00005c60: 2324 202e 2032 3333 3738 295d 2929 0a23 #$ . 23378)])).# │ │ │ -00005c70: 4034 3434 2028 7072 6f67 7620 5359 4d42 @444 (progv SYMB │ │ │ -00005c80: 4f4c 5320 5641 4c55 4553 2042 4f44 592e OLS VALUES BODY. │ │ │ -00005c90: 2e2e 293a 2062 696e 6420 5359 4d42 4f4c ..): bind SYMBOL │ │ │ -00005ca0: 5320 746f 2056 414c 5545 5320 6479 6e61 S to VALUES dyna │ │ │ -00005cb0: 6d69 6361 6c6c 7920 696e 2042 4f44 592e mically in BODY. │ │ │ -00005cc0: 0a54 6865 2066 6f72 6d73 2053 594d 424f .The forms SYMBO │ │ │ -00005cd0: 4c53 2061 6e64 2056 414c 5545 5320 6172 LS and VALUES ar │ │ │ -00005ce0: 6520 6576 616c 7561 7465 642c 2061 6e64 e evaluated, and │ │ │ -00005cf0: 206d 7573 7420 6576 616c 7561 7465 2074 must evaluate t │ │ │ -00005d00: 6f20 6c69 7374 732e 0a45 6163 6820 5359 o lists..Each SY │ │ │ -00005d10: 4d42 4f4c 2069 6e20 7468 6520 6669 7273 MBOL in the firs │ │ │ -00005d20: 7420 6c69 7374 2069 7320 626f 756e 6420 t list is bound │ │ │ -00005d30: 746f 2074 6865 2063 6f72 7265 7370 6f6e to the correspon │ │ │ -00005d40: 6469 6e67 2056 414c 5545 2069 6e20 7468 ding VALUE in th │ │ │ -00005d50: 650a 7365 636f 6e64 206c 6973 7420 286f e.second list (o │ │ │ -00005d60: 7220 6d61 6465 2075 6e62 6f75 6e64 2069 r made unbound i │ │ │ -00005d70: 6620 5641 4c55 4553 2069 7320 7368 6f72 f VALUES is shor │ │ │ -00005d80: 7465 7220 7468 616e 2053 594d 424f 4c53 ter than SYMBOLS │ │ │ -00005d90: 293b 2074 6865 6e20 7468 650a 424f 4459 ); then the.BODY │ │ │ -00005da0: 2066 6f72 6d73 2061 7265 2065 7865 6375 forms are execu │ │ │ -00005db0: 7465 6420 616e 6420 7468 6569 7220 7265 ted and their re │ │ │ -00005dc0: 7375 6c74 2069 7320 7265 7475 726e 6564 sult is returned │ │ │ -00005dd0: 2e20 2054 6869 7320 6973 206d 7563 6820 . This is much │ │ │ -00005de0: 6c69 6b65 0a61 2060 6c65 7427 2066 6f72 like.a `let' for │ │ │ -00005df0: 6d2c 2065 7863 6570 7420 7468 6174 2074 m, except that t │ │ │ -00005e00: 6865 206c 6973 7420 6f66 2073 796d 626f he list of symbo │ │ │ -00005e10: 6c73 2063 616e 2062 6520 636f 6d70 7574 ls can be comput │ │ │ -00005e20: 6564 2061 7420 7275 6e2d 7469 6d65 2e1f ed at run-time.. │ │ │ -00005e30: 0a28 6465 6661 6c69 6173 2027 7072 6f67 .(defalias 'prog │ │ │ -00005e40: 7620 2728 6d61 6372 6f20 2e20 235b 2873 v '(macro . #[(s │ │ │ -00005e50: 796d 626f 6c73 2076 616c 7565 7320 2672 ymbols values &r │ │ │ -00005e60: 6573 7420 626f 6479 2920 22c3 c4c5 c6c7 est body) "..... │ │ │ -00005e70: 5c6e 0945 0842 42c8 4545 8722 205b 626f \n.E.BB.EE." [bo │ │ │ -00005e80: 6479 2076 616c 7565 7320 7379 6d62 6f6c dy values symbol │ │ │ -00005e90: 7320 6c65 7420 2828 636c 2d70 726f 6776 s let ((cl-progv │ │ │ -00005ea0: 2d73 6176 6520 6e69 6c29 2920 756e 7769 -save nil)) unwi │ │ │ -00005eb0: 6e64 2d70 726f 7465 6374 2070 726f 676e nd-protect progn │ │ │ -00005ec0: 2063 6c2d 7072 6f67 762d 6265 666f 7265 cl-progv-before │ │ │ -00005ed0: 2028 636c 2d70 726f 6776 2d61 6674 6572 (cl-progv-after │ │ │ -00005ee0: 295d 2037 2028 2324 202e 2032 3336 3639 )] 7 (#$ . 23669 │ │ │ -00005ef0: 295d 2929 0a23 4033 3532 2028 666c 6574 )])).#@352 (flet │ │ │ -00005f00: 2028 2846 554e 4320 4152 474c 4953 5420 ((FUNC ARGLIST │ │ │ -00005f10: 424f 4459 2e2e 2e29 202e 2e2e 2920 464f BODY...) ...) FO │ │ │ -00005f20: 524d 2e2e 2e29 3a20 6d61 6b65 2074 656d RM...): make tem │ │ │ -00005f30: 706f 7261 7279 2066 756e 6374 696f 6e20 porary function │ │ │ -00005f40: 6465 666e 732e 0a54 6869 7320 6973 2061 defns..This is a │ │ │ -00005f50: 6e20 616e 616c 6f67 7565 206f 6620 606c n analogue of `l │ │ │ -00005f60: 6574 2720 7468 6174 206f 7065 7261 7465 et' that operate │ │ │ -00005f70: 7320 6f6e 2074 6865 2066 756e 6374 696f s on the functio │ │ │ -00005f80: 6e20 6365 6c6c 206f 6620 4655 4e43 0a72 n cell of FUNC.r │ │ │ -00005f90: 6174 6865 7220 7468 616e 2069 7473 2076 ather than its v │ │ │ -00005fa0: 616c 7565 2063 656c 6c2e 2020 5468 6520 alue cell. The │ │ │ -00005fb0: 464f 524d 7320 6172 6520 6576 616c 7561 FORMs are evalua │ │ │ -00005fc0: 7465 6420 7769 7468 2074 6865 2073 7065 ted with the spe │ │ │ -00005fd0: 6369 6669 6564 0a66 756e 6374 696f 6e20 cified.function │ │ │ -00005fe0: 6465 6669 6e69 7469 6f6e 7320 696e 2070 definitions in p │ │ │ -00005ff0: 6c61 6365 2c20 7468 656e 2074 6865 2064 lace, then the d │ │ │ -00006000: 6566 696e 6974 696f 6e73 2061 7265 2075 efinitions are u │ │ │ -00006010: 6e64 6f6e 6520 2874 6865 2046 554e 4373 ndone (the FUNCs │ │ │ -00006020: 0a67 6f20 6261 636b 2074 6f20 7468 6569 .go back to thei │ │ │ -00006030: 7220 7072 6576 696f 7573 2064 6566 696e r previous defin │ │ │ -00006040: 6974 696f 6e73 2c20 6f72 206c 6163 6b20 itions, or lack │ │ │ -00006050: 7468 6572 656f 6629 2e1f 0a28 6465 6661 thereof)...(defa │ │ │ -00006060: 6c69 6173 2027 666c 6574 2027 286d 6163 lias 'flet '(mac │ │ │ -00006070: 726f 202e 2023 5b28 6269 6e64 696e 6773 ro . #[(bindings │ │ │ -00006080: 2026 7265 7374 2062 6f64 7929 2022 c2c3 &rest body) ".. │ │ │ -00006090: c409 5c22 0842 4287 2220 5b62 6f64 7920 ..\".BB." [body │ │ │ -000060a0: 6269 6e64 696e 6773 206c 6574 662a 206d bindings letf* m │ │ │ -000060b0: 6170 6361 7220 235b 2878 2920 22c4 0b40 apcar #[(x) "..@ │ │ │ -000060c0: 21ab 880b 404b a2c5 61ac 870b 4008 b741 !...@K..a...@..A │ │ │ -000060d0: ab84 c6c7 2188 c8c9 0b41 40ca 0b40 0b41 ....!....A@..@.A │ │ │ -000060e0: 4142 4245 441a cb20 ab8e ccc1 21ab 890b ABBED.. ....!... │ │ │ -000060f0: 40cd 5c6e 2142 0942 11ce cf0b 4044 445c @.\n!B.B....@DD\ │ │ │ -00006100: 6e29 4487 2220 5b63 6c2d 6d61 6372 6f2d n)D." [cl-macro- │ │ │ -00006110: 656e 7669 726f 6e6d 656e 7420 6279 7465 environment byte │ │ │ -00006120: 2d63 6f6d 7069 6c65 2d66 756e 6374 696f -compile-functio │ │ │ -00006130: 6e2d 656e 7669 726f 6e6d 656e 7420 6675 n-environment fu │ │ │ -00006140: 6e63 2078 2066 626f 756e 6470 206d 6163 nc x fboundp mac │ │ │ -00006150: 726f 2065 7272 6f72 2022 5573 6520 606c ro error "Use `l │ │ │ -00006160: 6162 656c 7327 2c20 6e6f 7420 6066 6c65 abels', not `fle │ │ │ -00006170: 7427 2c20 746f 2072 6562 696e 6420 6d61 t', to rebind ma │ │ │ -00006180: 6372 6f20 6e61 6d65 7322 2066 756e 6374 cro names" funct │ │ │ -00006190: 696f 6e2a 206c 616d 6264 6120 626c 6f63 ion* lambda bloc │ │ │ -000061a0: 6b20 636c 2d63 6f6d 7069 6c69 6e67 2d66 k cl-compiling-f │ │ │ -000061b0: 696c 6520 626f 756e 6470 2065 7661 6c20 ile boundp eval │ │ │ -000061c0: 7379 6d62 6f6c 2d66 756e 6374 696f 6e20 symbol-function │ │ │ -000061d0: 7175 6f74 655d 2036 5d5d 2034 2028 2324 quote] 6]] 4 (#$ │ │ │ -000061e0: 202e 2032 3433 3135 295d 2929 0a23 4032 . 24315)])).#@2 │ │ │ -000061f0: 3237 2028 6c61 6265 6c73 2028 2846 554e 27 (labels ((FUN │ │ │ -00006200: 4320 4152 474c 4953 5420 424f 4459 2e2e C ARGLIST BODY.. │ │ │ -00006210: 2e29 202e 2e2e 2920 464f 524d 2e2e 2e29 .) ...) FORM...) │ │ │ -00006220: 3a20 6d61 6b65 2074 656d 706f 7261 7279 : make temporary │ │ │ -00006230: 2066 756e 6320 6269 6e64 696e 6773 2e0a func bindings.. │ │ │ -00006240: 5468 6973 2069 7320 6c69 6b65 2060 666c This is like `fl │ │ │ -00006250: 6574 272c 2065 7863 6570 7420 7468 6520 et', except the │ │ │ -00006260: 6269 6e64 696e 6773 2061 7265 206c 6578 bindings are lex │ │ │ -00006270: 6963 616c 2069 6e73 7465 6164 206f 6620 ical instead of │ │ │ -00006280: 6479 6e61 6d69 632e 0a55 6e6c 696b 6520 dynamic..Unlike │ │ │ -00006290: 6066 6c65 7427 2c20 7468 6973 206d 6163 `flet', this mac │ │ │ -000062a0: 726f 2069 7320 6675 6c6c 7920 636f 6d70 ro is fully comp │ │ │ -000062b0: 6c69 616e 7420 7769 7468 2074 6865 2043 liant with the C │ │ │ -000062c0: 6f6d 6d6f 6e20 4c69 7370 2073 7461 6e64 ommon Lisp stand │ │ │ -000062d0: 6172 642e 1f0a 2864 6566 616c 6961 7320 ard...(defalias │ │ │ -000062e0: 276c 6162 656c 7320 2728 6d61 6372 6f20 'labels '(macro │ │ │ -000062f0: 2e20 235b 2862 696e 6469 6e67 7320 2672 . #[(bindings &r │ │ │ -00006300: 6573 7420 626f 6479 2920 22c6 890c 1c1d est body) "..... │ │ │ -00006310: 1b5c 6eab abc7 2089 190b 4213 c8c9 5c6e .\n... ...B...\n │ │ │ -00006320: 4041 4244 0d42 1509 0d42 155c 6e89 4112 @ABD.B...B.\n.A. │ │ │ -00006330: 4040 c9ca cbcc cd09 44ce 4646 0c42 1429 @@......D.FF.B.) │ │ │ -00006340: aa52 cfd0 0bd1 0d42 0842 4242 0c5c 222b .R.....B.BBB.\"+ │ │ │ -00006350: 8722 205b 626f 6479 2076 6172 2062 696e ." [body var bin │ │ │ -00006360: 6469 6e67 7320 7661 7273 2063 6c2d 6d61 dings vars cl-ma │ │ │ -00006370: 6372 6f2d 656e 7669 726f 6e6d 656e 7420 cro-environment │ │ │ -00006380: 7365 7473 206e 696c 2067 656e 7379 6d20 sets nil gensym │ │ │ -00006390: 6675 6e63 7469 6f6e 2a20 6c61 6d62 6461 function* lambda │ │ │ -000063a0: 2028 2672 6573 7420 636c 2d6c 6162 656c (&rest cl-label │ │ │ -000063b0: 732d 6172 6773 2920 6c69 7374 2a20 2766 s-args) list* 'f │ │ │ -000063c0: 756e 6361 6c6c 2071 756f 7465 2063 6c2d uncall quote cl- │ │ │ -000063d0: 6c61 6265 6c73 2d61 7267 7320 636c 2d6d labels-args cl-m │ │ │ -000063e0: 6163 726f 6578 7061 6e64 2d61 6c6c 206c acroexpand-all l │ │ │ -000063f0: 6578 6963 616c 2d6c 6574 2073 6574 715d exical-let setq] │ │ │ -00006400: 2038 2028 2324 202e 2032 3530 3735 295d 8 (#$ . 25075)] │ │ │ -00006410: 2929 0a23 4031 3336 2028 6d61 6372 6f6c )).#@136 (macrol │ │ │ -00006420: 6574 2028 284e 414d 4520 4152 474c 4953 et ((NAME ARGLIS │ │ │ -00006430: 5420 424f 4459 2e2e 2e29 202e 2e2e 2920 T BODY...) ...) │ │ │ -00006440: 464f 524d 2e2e 2e29 3a20 6d61 6b65 2074 FORM...): make t │ │ │ -00006450: 656d 706f 7261 7279 206d 6163 726f 2064 emporary macro d │ │ │ -00006460: 6566 6e73 2e0a 5468 6973 2069 7320 6c69 efns..This is li │ │ │ -00006470: 6b65 2060 666c 6574 272c 2062 7574 2066 ke `flet', but f │ │ │ -00006480: 6f72 206d 6163 726f 7320 696e 7374 6561 or macros instea │ │ │ -00006490: 6420 6f66 2066 756e 6374 696f 6e73 2e1f d of functions.. │ │ │ -000064a0: 0a28 6465 6661 6c69 6173 2027 6d61 6372 .(defalias 'macr │ │ │ -000064b0: 6f6c 6574 2027 286d 6163 726f 202e 2023 olet '(macro . # │ │ │ -000064c0: 5b28 6269 6e64 696e 6773 2026 7265 7374 [(bindings &rest │ │ │ -000064d0: 2062 6f64 7929 2022 0c41 ab8c c50c 4043 body) ".A....@C │ │ │ -000064e0: c50c 410b 4242 4587 0cac 84c6 0b42 870c ..A.BBE......B.. │ │ │ -000064f0: 4040 1ac7 0c40 415c 6e5c 2219 c809 4021 @@...@A\n\"...@! │ │ │ -00006500: 88c9 c60b 425c 6eca 0941 4242 0842 5c22 ....B\n..ABB.B\" │ │ │ -00006510: 2a87 2220 5b63 6c2d 6d61 6372 6f2d 656e *." [cl-macro-en │ │ │ -00006520: 7669 726f 6e6d 656e 7420 7265 7320 6e61 vironment res na │ │ │ -00006530: 6d65 2062 6f64 7920 6269 6e64 696e 6773 me body bindings │ │ │ -00006540: 206d 6163 726f 6c65 7420 7072 6f67 6e20 macrolet progn │ │ │ -00006550: 636c 2d74 7261 6e73 666f 726d 2d6c 616d cl-transform-lam │ │ │ -00006560: 6264 6120 6576 616c 2063 6c2d 6d61 6372 bda eval cl-macr │ │ │ -00006570: 6f65 7870 616e 642d 616c 6c20 6c61 6d62 oexpand-all lamb │ │ │ -00006580: 6461 5d20 3520 2823 2420 2e20 3235 3632 da] 5 (#$ . 2562 │ │ │ -00006590: 3529 5d29 290a 2340 3231 3820 2873 796d 5)])).#@218 (sym │ │ │ -000065a0: 626f 6c2d 6d61 6372 6f6c 6574 2028 284e bol-macrolet ((N │ │ │ -000065b0: 414d 4520 4558 5041 4e53 494f 4e29 202e AME EXPANSION) . │ │ │ -000065c0: 2e2e 2920 464f 524d 2e2e 2e29 3a20 6d61 ..) FORM...): ma │ │ │ -000065d0: 6b65 2073 796d 626f 6c20 6d61 6372 6f20 ke symbol macro │ │ │ -000065e0: 6465 666e 732e 0a57 6974 6869 6e20 7468 defns..Within th │ │ │ -000065f0: 6520 626f 6479 2046 4f52 4d73 2c20 7265 e body FORMs, re │ │ │ -00006600: 6665 7265 6e63 6573 2074 6f20 7468 6520 ferences to the │ │ │ -00006610: 7661 7269 6162 6c65 204e 414d 4520 7769 variable NAME wi │ │ │ -00006620: 6c6c 2062 6520 7265 706c 6163 6564 0a62 ll be replaced.b │ │ │ -00006630: 7920 4558 5041 4e53 494f 4e2c 2061 6e64 y EXPANSION, and │ │ │ -00006640: 2028 7365 7471 204e 414d 4520 2e2e 2e29 (setq NAME ...) │ │ │ -00006650: 2077 696c 6c20 6163 7420 6c69 6b65 2028 will act like ( │ │ │ -00006660: 7365 7466 2045 5850 414e 5349 4f4e 202e setf EXPANSION . │ │ │ -00006670: 2e2e 292e 1f0a 2864 6566 616c 6961 7320 ..)...(defalias │ │ │ -00006680: 2773 796d 626f 6c2d 6d61 6372 6f6c 6574 'symbol-macrolet │ │ │ -00006690: 2027 286d 6163 726f 202e 2023 5b28 6269 '(macro . #[(bi │ │ │ -000066a0: 6e64 696e 6773 2026 7265 7374 2062 6f64 ndings &rest bod │ │ │ -000066b0: 7929 2022 5c6e 41ab 8cc3 5c6e 4043 c35c y) "\nA...\n@C.\ │ │ │ -000066c0: 6e41 0942 4245 875c 6eac 84c4 0942 87c5 nA.BBE.\n....B.. │ │ │ -000066d0: c409 42c6 5c6e 4040 215c 6e40 4140 4408 ..B.\n@@!\n@A@D. │ │ │ -000066e0: 425c 2287 2220 5b63 6c2d 6d61 6372 6f2d B\"." [cl-macro- │ │ │ -000066f0: 656e 7669 726f 6e6d 656e 7420 626f 6479 environment body │ │ │ -00006700: 2062 696e 6469 6e67 7320 7379 6d62 6f6c bindings symbol │ │ │ -00006710: 2d6d 6163 726f 6c65 7420 7072 6f67 6e20 -macrolet progn │ │ │ -00006720: 636c 2d6d 6163 726f 6578 7061 6e64 2d61 cl-macroexpand-a │ │ │ -00006730: 6c6c 2073 796d 626f 6c2d 6e61 6d65 5d20 ll symbol-name] │ │ │ -00006740: 3520 2823 2420 2e20 3236 3031 3229 5d29 5 (#$ . 26012)]) │ │ │ -00006750: 290a 2862 7974 652d 636f 6465 2022 c108 ).(byte-code ".. │ │ │ -00006760: 4210 c2c1 21ac 85c3 c1c4 5c22 88c4 8722 B...!.....\"..." │ │ │ -00006770: 205b 6375 7272 656e 742d 6c6f 6164 2d6c [current-load-l │ │ │ -00006780: 6973 7420 636c 2d63 6c6f 7375 7265 2d76 ist cl-closure-v │ │ │ -00006790: 6172 7320 6465 6661 756c 742d 626f 756e ars default-boun │ │ │ -000067a0: 6470 2073 6574 2d64 6566 6175 6c74 206e dp set-default n │ │ │ -000067b0: 696c 5d20 3329 0a23 4031 3731 2028 6c65 il] 3).#@171 (le │ │ │ -000067c0: 7869 6361 6c2d 6c65 7420 4249 4e44 494e xical-let BINDIN │ │ │ -000067d0: 4753 2042 4f44 592e 2e2e 293a 206c 696b GS BODY...): lik │ │ │ -000067e0: 6520 606c 6574 272c 2062 7574 206c 6578 e `let', but lex │ │ │ -000067f0: 6963 616c 6c79 2073 636f 7065 642e 0a54 ically scoped..T │ │ │ -00006800: 6865 206d 6169 6e20 7669 7369 626c 6520 he main visible │ │ │ -00006810: 6469 6666 6572 656e 6365 2069 7320 7468 difference is th │ │ │ -00006820: 6174 206c 616d 6264 6173 2069 6e73 6964 at lambdas insid │ │ │ -00006830: 6520 424f 4459 2077 696c 6c20 6372 6561 e BODY will crea │ │ │ -00006840: 7465 0a6c 6578 6963 616c 2063 6c6f 7375 te.lexical closu │ │ │ -00006850: 7265 7320 6173 2069 6e20 436f 6d6d 6f6e res as in Common │ │ │ -00006860: 204c 6973 702e 1f0a 2864 6566 616c 6961 Lisp...(defalia │ │ │ -00006870: 7320 276c 6578 6963 616c 2d6c 6574 2027 s 'lexical-let ' │ │ │ -00006880: 286d 6163 726f 202e 2023 5b28 6269 6e64 (macro . #[(bind │ │ │ -00006890: 696e 6773 2026 7265 7374 2062 6f64 7929 ings &rest body) │ │ │ -000068a0: 2022 0c1c c6c7 5c6e 5c22 1dc8 c909 42c6 "....\n\"....B. │ │ │ -000068b0: ca0d 5c22 cb43 a408 a45c 221b cc0c 2140 ..\".C...\"...!@ │ │ │ -000068c0: cd4e ac8f cec6 cf0d 5c22 d0c6 d10d 5c22 .N......\"....\" │ │ │ -000068d0: 0b5c 2245 aa8f cec6 d20d 5c22 d3d4 d5c6 .\"E......\".... │ │ │ -000068e0: d60d 5c22 230b 462b 8722 205b 636c 2d6d ..\"#.F+." [cl-m │ │ │ -000068f0: 6163 726f 2d65 6e76 6972 6f6e 6d65 6e74 acro-environment │ │ │ -00006900: 2062 6f64 7920 6269 6e64 696e 6773 2065 body bindings e │ │ │ -00006910: 626f 6479 2063 6c2d 636c 6f73 7572 652d body cl-closure- │ │ │ -00006920: 7661 7273 2076 6172 7320 6d61 7063 6172 vars vars mapcar │ │ │ -00006930: 2023 5b28 7829 2022 093a ac83 0943 11c2 #[(x) ".:...C.. │ │ │ -00006940: c3c4 0940 5c22 2108 4210 0940 0941 4008 ...@\"!.B..@.A@. │ │ │ -00006950: 4045 8722 205b 636c 2d63 6c6f 7375 7265 @E." [cl-closure │ │ │ -00006960: 2d76 6172 7320 7820 6765 6e73 796d 2066 -vars x gensym f │ │ │ -00006970: 6f72 6d61 7420 222d 2d25 732d 2d22 5d20 ormat "--%s--"] │ │ │ -00006980: 345d 2063 6c2d 6d61 6372 6f65 7870 616e 4] cl-macroexpan │ │ │ -00006990: 642d 616c 6c20 7072 6f67 6e20 235b 2878 d-all progn #[(x │ │ │ -000069a0: 2920 22c1 0840 21c2 0841 4140 44c3 4587 ) "..@!..AA@D.E. │ │ │ -000069b0: 2220 5b78 2073 796d 626f 6c2d 6e61 6d65 " [x symbol-name │ │ │ -000069c0: 2073 796d 626f 6c2d 7661 6c75 6520 745d symbol-value t] │ │ │ -000069d0: 2033 5d20 2864 6566 756e 202e 2063 6c2d 3] (defun . cl- │ │ │ -000069e0: 6465 6675 6e2d 6578 7061 6e64 6572 2920 defun-expander) │ │ │ -000069f0: 6c61 7374 2075 7365 6420 6c65 7420 235b last used let #[ │ │ │ -00006a00: 2878 2920 2208 4141 4008 4140 4487 2220 (x) ".AA@.A@D." │ │ │ -00006a10: 5b78 5d20 325d 2073 7562 6c69 7320 235b [x] 2] sublis #[ │ │ │ -00006a20: 2878 2920 2208 4141 40c1 0841 4140 4442 (x) ".AA@..AA@DB │ │ │ -00006a30: 8722 205b 7820 7175 6f74 655d 2033 5d20 ." [x quote] 3] │ │ │ -00006a40: 235b 2878 2920 2208 4141 40c1 c2c3 0840 #[(x) ".AA@....@ │ │ │ -00006a50: 5c22 4444 8722 205b 7820 6d61 6b65 2d73 \"DD." [x make-s │ │ │ -00006a60: 796d 626f 6c20 666f 726d 6174 2022 2d2d ymbol format "-- │ │ │ -00006a70: 2573 2d2d 225d 2035 5d20 6170 706c 7920 %s--"] 5] apply │ │ │ -00006a80: 6170 7065 6e64 2028 7365 7466 2920 235b append (setf) #[ │ │ │ -00006a90: 2878 2920 22c1 0841 4140 4408 4140 4487 (x) "..AA@D.A@D. │ │ │ -00006aa0: 2220 5b78 2073 796d 626f 6c2d 7661 6c75 " [x symbol-valu │ │ │ -00006ab0: 655d 2032 5d5d 2038 2028 2324 202e 2032 e] 2]] 8 (#$ . 2 │ │ │ -00006ac0: 3635 3537 295d 2929 0a23 4031 3733 2028 6557)])).#@173 ( │ │ │ -00006ad0: 6c65 7869 6361 6c2d 6c65 742a 2042 494e lexical-let* BIN │ │ │ -00006ae0: 4449 4e47 5320 424f 4459 2e2e 2e29 3a20 DINGS BODY...): │ │ │ -00006af0: 6c69 6b65 2060 6c65 742a 272c 2062 7574 like `let*', but │ │ │ -00006b00: 206c 6578 6963 616c 6c79 2073 636f 7065 lexically scope │ │ │ -00006b10: 642e 0a54 6865 206d 6169 6e20 7669 7369 d..The main visi │ │ │ -00006b20: 626c 6520 6469 6666 6572 656e 6365 2069 ble difference i │ │ │ -00006b30: 7320 7468 6174 206c 616d 6264 6173 2069 s that lambdas i │ │ │ -00006b40: 6e73 6964 6520 424f 4459 2077 696c 6c20 nside BODY will │ │ │ -00006b50: 6372 6561 7465 0a6c 6578 6963 616c 2063 create.lexical c │ │ │ -00006b60: 6c6f 7375 7265 7320 6173 2069 6e20 436f losures as in Co │ │ │ -00006b70: 6d6d 6f6e 204c 6973 702e 1f0a 2864 6566 mmon Lisp...(def │ │ │ -00006b80: 616c 6961 7320 276c 6578 6963 616c 2d6c alias 'lexical-l │ │ │ -00006b90: 6574 2a20 2728 6d61 6372 6f20 2e20 235b et* '(macro . #[ │ │ │ -00006ba0: 2862 696e 6469 6e67 7320 2672 6573 7420 (bindings &rest │ │ │ -00006bb0: 626f 6479 2920 2209 ac84 c208 4287 c309 body) ".....B... │ │ │ -00006bc0: 2111 09ab 8ec4 0989 4111 4043 0842 4243 !.......A.@C.BBC │ │ │ -00006bd0: 10aa 6f08 4087 2220 5b62 6f64 7920 6269 ..o.@." [body bi │ │ │ -00006be0: 6e64 696e 6773 2070 726f 676e 2072 6576 ndings progn rev │ │ │ -00006bf0: 6572 7365 206c 6578 6963 616c 2d6c 6574 erse lexical-let │ │ │ -00006c00: 5d20 3320 2823 2420 2e20 3237 3334 3329 ] 3 (#$ . 27343) │ │ │ -00006c10: 5d29 290a 2864 6566 616c 6961 7320 2763 ])).(defalias 'c │ │ │ -00006c20: 6c2d 6465 6675 6e2d 6578 7061 6e64 6572 l-defun-expander │ │ │ -00006c30: 2023 5b28 6675 6e63 2026 7265 7374 2072 #[(func &rest r │ │ │ -00006c40: 6573 7429 2022 c2c3 c409 44c5 c608 4244 est) "....D...BD │ │ │ -00006c50: 45c4 0944 4587 2220 5b72 6573 7420 6675 E..DE." [rest fu │ │ │ -00006c60: 6e63 2070 726f 676e 2064 6566 616c 6961 nc progn defalia │ │ │ -00006c70: 7320 7175 6f74 6520 6675 6e63 7469 6f6e s quote function │ │ │ -00006c80: 206c 616d 6264 615d 2036 5d29 0a23 4034 lambda] 6]).#@4 │ │ │ -00006c90: 3131 2028 6d75 6c74 6970 6c65 2d76 616c 11 (multiple-val │ │ │ -00006ca0: 7565 2d62 696e 6420 2853 594d 2053 594d ue-bind (SYM SYM │ │ │ -00006cb0: 2e2e 2e29 2046 4f52 4d20 424f 4459 293a ...) FORM BODY): │ │ │ -00006cc0: 2063 6f6c 6c65 6374 206d 756c 7469 706c collect multipl │ │ │ -00006cd0: 6520 7265 7475 726e 2076 616c 7565 732e e return values. │ │ │ -00006ce0: 0a46 4f52 4d20 6d75 7374 2072 6574 7572 .FORM must retur │ │ │ -00006cf0: 6e20 6120 6c69 7374 3b20 7468 6520 424f n a list; the BO │ │ │ -00006d00: 4459 2069 7320 7468 656e 2065 7865 6375 DY is then execu │ │ │ -00006d10: 7465 6420 7769 7468 2074 6865 2066 6972 ted with the fir │ │ │ -00006d20: 7374 204e 2065 6c65 6d65 6e74 730a 6f66 st N elements.of │ │ │ -00006d30: 2074 6869 7320 6c69 7374 2062 6f75 6e64 this list bound │ │ │ -00006d40: 2028 606c 6574 272d 7374 796c 6529 2074 (`let'-style) t │ │ │ -00006d50: 6f20 6561 6368 206f 6620 7468 6520 7379 o each of the sy │ │ │ -00006d60: 6d62 6f6c 7320 5359 4d20 696e 2074 7572 mbols SYM in tur │ │ │ -00006d70: 6e2e 2020 5468 6973 0a69 7320 616e 616c n. This.is anal │ │ │ -00006d80: 6f67 6f75 7320 746f 2074 6865 2043 6f6d ogous to the Com │ │ │ -00006d90: 6d6f 6e20 4c69 7370 2060 6d75 6c74 6970 mon Lisp `multip │ │ │ -00006da0: 6c65 2d76 616c 7565 2d62 696e 6427 206d le-value-bind' m │ │ │ -00006db0: 6163 726f 2c20 7573 696e 6720 6c69 7374 acro, using list │ │ │ -00006dc0: 7320 746f 0a73 696d 756c 6174 6520 7472 s to.simulate tr │ │ │ -00006dd0: 7565 206d 756c 7469 706c 6520 7265 7475 ue multiple retu │ │ │ -00006de0: 726e 2076 616c 7565 732e 2020 466f 7220 rn values. For │ │ │ -00006df0: 636f 6d70 6174 6962 696c 6974 792c 2028 compatibility, ( │ │ │ -00006e00: 7661 6c75 6573 2041 2042 2043 2920 6973 values A B C) is │ │ │ -00006e10: 0a61 2073 796e 6f6e 796d 2066 6f72 2028 .a synonym for ( │ │ │ -00006e20: 6c69 7374 2041 2042 2043 292e 1f0a 2864 list A B C)...(d │ │ │ -00006e30: 6566 616c 6961 7320 276d 756c 7469 706c efalias 'multipl │ │ │ -00006e40: 652d 7661 6c75 652d 6269 6e64 2027 286d e-value-bind '(m │ │ │ -00006e50: 6163 726f 202e 2023 5b28 7661 7273 2066 acro . #[(vars f │ │ │ -00006e60: 6f72 6d20 2672 6573 7420 626f 6479 2920 orm &rest body) │ │ │ -00006e70: 22c5 20c6 1b1c c70c 5c6e 44c8 c909 5c22 ". .....\nD...\" │ │ │ -00006e80: 4208 2a42 4287 2220 5b62 6f64 7920 7661 B.*BB." [body va │ │ │ -00006e90: 7273 2066 6f72 6d20 6e20 7465 6d70 2067 rs form n temp g │ │ │ -00006ea0: 656e 7379 6d20 2d31 206c 6574 2a20 6d61 ensym -1 let* ma │ │ │ -00006eb0: 7063 6172 2023 5b28 7629 2022 09c3 5c6e pcar #[(v) "..\n │ │ │ -00006ec0: 5489 1208 4544 8722 205b 7465 6d70 2076 T...ED." [temp v │ │ │ -00006ed0: 206e 206e 7468 5d20 345d 5d20 3520 2823 n nth] 4]] 5 (# │ │ │ -00006ee0: 2420 2e20 3237 3739 3529 5d29 290a 2340 $ . 27795)])).#@ │ │ │ -00006ef0: 3336 3620 286d 756c 7469 706c 652d 7661 366 (multiple-va │ │ │ -00006f00: 6c75 652d 7365 7471 2028 5359 4d20 5359 lue-setq (SYM SY │ │ │ -00006f10: 4d2e 2e2e 2920 464f 524d 293a 2063 6f6c M...) FORM): col │ │ │ -00006f20: 6c65 6374 206d 756c 7469 706c 6520 7265 lect multiple re │ │ │ -00006f30: 7475 726e 2076 616c 7565 732e 0a46 4f52 turn values..FOR │ │ │ -00006f40: 4d20 6d75 7374 2072 6574 7572 6e20 6120 M must return a │ │ │ -00006f50: 6c69 7374 3b20 7468 6520 6669 7273 7420 list; the first │ │ │ -00006f60: 4e20 656c 656d 656e 7473 206f 6620 7468 N elements of th │ │ │ -00006f70: 6973 206c 6973 7420 6172 6520 7374 6f72 is list are stor │ │ │ -00006f80: 6564 2069 6e0a 6561 6368 206f 6620 7468 ed in.each of th │ │ │ -00006f90: 6520 7379 6d62 6f6c 7320 5359 4d20 696e e symbols SYM in │ │ │ -00006fa0: 2074 7572 6e2e 2020 5468 6973 2069 7320 turn. This is │ │ │ -00006fb0: 616e 616c 6f67 6f75 7320 746f 2074 6865 analogous to the │ │ │ -00006fc0: 2043 6f6d 6d6f 6e20 4c69 7370 0a60 6d75 Common Lisp.`mu │ │ │ -00006fd0: 6c74 6970 6c65 2d76 616c 7565 2d73 6574 ltiple-value-set │ │ │ -00006fe0: 7127 206d 6163 726f 2c20 7573 696e 6720 q' macro, using │ │ │ -00006ff0: 6c69 7374 7320 746f 2073 696d 756c 6174 lists to simulat │ │ │ -00007000: 6520 7472 7565 206d 756c 7469 706c 6520 e true multiple │ │ │ -00007010: 7265 7475 726e 0a76 616c 7565 732e 2020 return.values. │ │ │ -00007020: 466f 7220 636f 6d70 6174 6962 696c 6974 For compatibilit │ │ │ -00007030: 792c 2028 7661 6c75 6573 2041 2042 2043 y, (values A B C │ │ │ -00007040: 2920 6973 2061 2073 796e 6f6e 796d 2066 ) is a synonym f │ │ │ -00007050: 6f72 2028 6c69 7374 2041 2042 2043 292e or (list A B C). │ │ │ -00007060: 1f0a 2864 6566 616c 6961 7320 276d 756c ..(defalias 'mul │ │ │ -00007070: 7469 706c 652d 7661 6c75 652d 7365 7471 tiple-value-setq │ │ │ -00007080: 2027 286d 6163 726f 202e 2023 5b28 7661 '(macro . #[(va │ │ │ -00007090: 7273 2066 6f72 6d29 2022 0bac 85c4 5c6e rs form) "....\n │ │ │ -000070a0: c545 870b 41ac 88c6 0b40 c75c 6e44 4587 .E..A....@.\nDE. │ │ │ -000070b0: c820 19c9 18ca 095c 6e44 43cb c60b 8941 . .....\nDC....A │ │ │ -000070c0: 1340 c709 4445 c6cc cdce cf0b 5c22 5c22 .@..DE......\"\" │ │ │ -000070d0: 4245 452a 8722 205b 6e20 7465 6d70 2066 BEE*." [n temp f │ │ │ -000070e0: 6f72 6d20 7661 7273 2070 726f 676e 206e orm vars progn n │ │ │ -000070f0: 696c 2073 6574 7120 6361 7220 6765 6e73 il setq car gens │ │ │ -00007100: 796d 2030 206c 6574 2070 726f 6731 2061 ym 0 let prog1 a │ │ │ -00007110: 7070 6c79 206e 636f 6e63 206d 6170 6361 pply nconc mapca │ │ │ -00007120: 7220 235b 2876 2920 2209 c35c 6e54 8912 r #[(v) "..\nT.. │ │ │ -00007130: 0845 4487 2220 5b74 656d 7020 7620 6e20 .ED." [temp v n │ │ │ -00007140: 6e74 685d 2034 5d5d 2031 3020 2823 2420 nth] 4]] 10 (#$ │ │ │ -00007150: 2e20 3238 3430 3429 5d29 290a 2864 6566 . 28404)])).(def │ │ │ -00007160: 616c 6961 7320 276c 6f63 616c 6c79 2027 alias 'locally ' │ │ │ -00007170: 286d 6163 726f 202e 2023 5b28 2672 6573 (macro . #[(&res │ │ │ -00007180: 7420 626f 6479 2920 22c1 0842 8722 205b t body) "..B." [ │ │ │ -00007190: 626f 6479 2070 726f 676e 5d20 325d 2929 body progn] 2])) │ │ │ -000071a0: 0a28 6465 6661 6c69 6173 2027 7468 6520 .(defalias 'the │ │ │ -000071b0: 2728 6d61 6372 6f20 2e20 235b 2874 7970 '(macro . #[(typ │ │ │ -000071c0: 6520 666f 726d 2920 2208 8722 205b 666f e form) ".." [fo │ │ │ -000071d0: 726d 5d20 315d 2929 0a28 6279 7465 2d63 rm] 1])).(byte-c │ │ │ -000071e0: 6f64 6520 22c1 0842 10c2 c121 ac85 c3c1 ode "..B...!.... │ │ │ -000071f0: c45c 2288 c508 4210 c2c5 21ac 85c3 c5c4 .\"...B...!..... │ │ │ -00007200: 5c22 88c1 8722 205b 6375 7272 656e 742d \"..." [current- │ │ │ -00007210: 6c6f 6164 2d6c 6973 7420 636c 2d70 726f load-list cl-pro │ │ │ -00007220: 636c 6169 6d2d 6869 7374 6f72 7920 6465 claim-history de │ │ │ -00007230: 6661 756c 742d 626f 756e 6470 2073 6574 fault-boundp set │ │ │ -00007240: 2d64 6566 6175 6c74 2074 2063 6c2d 6465 -default t cl-de │ │ │ -00007250: 636c 6172 652d 7374 6163 6b5d 2033 290a clare-stack] 3). │ │ │ -00007260: 2864 6566 616c 6961 7320 2763 6c2d 646f (defalias 'cl-do │ │ │ -00007270: 2d70 726f 636c 6169 6d20 235b 2873 7065 -proclaim #[(spe │ │ │ -00007280: 6320 6869 7374 2920 220e 1cab 885c 6e3c c hist) "....\n< │ │ │ -00007290: ab84 0d5c 6e42 120d a2c6 61ab 92c7 c021 ...\nB....a....! │ │ │ -000072a0: 83d9 00c8 c9ca 0d41 5c22 085c 2210 82d9 .......A\".\"... │ │ │ -000072b0: 000d a2cb 61ab 9e0d 4189 1583 d900 0d40 ....a...A......@ │ │ │ -000072c0: cc4e cd73 ac86 cecf 0d40 5c22 88d0 0d40 .N.s.....@\"...@ │ │ │ -000072d0: ccd1 2388 aa62 0da2 d261 ab98 0d41 8915 ..#..b...a...A.. │ │ │ -000072e0: 83d9 000d 40cc 4ed1 61ab 71d0 0d40 ccd3 ....@.N.a.q..@.. │ │ │ -000072f0: 2388 aa68 0da2 d461 abab c10d 41b7 4140 #..h...a....A.A@ │ │ │ -00007300: d5b7 c30d 41b7 4140 d6b7 1b89 19ab 8809 ....A.A@........ │ │ │ -00007310: 4016 1d09 4116 1e0b ab88 0b40 161f 0b41 @...A......@...A │ │ │ -00007320: 1620 2aaa c20d a2d7 61ab bcc7 c421 abb7 . *.....a....!.. │ │ │ -00007330: 0cd8 61ab 830e 2114 0d41 8915 aba9 0d40 ..a...!..A.....@ │ │ │ -00007340: 3aab 750d 4041 40d9 61ab 89da 0d40 400c :.u.@A@.a....@@. │ │ │ -00007350: 5c22 14aa 64db 0d40 400c 5c22 ab83 0caa \"..d..@@.\".... │ │ │ -00007360: 850d 4040 0c42 14aa 51d3 8722 205b 6279 ..@@.B..Q.." [by │ │ │ -00007370: 7465 2d63 6f6d 7069 6c65 2d62 6f75 6e64 te-compile-bound │ │ │ -00007380: 2d76 6172 6961 626c 6573 2073 7065 6564 -variables speed │ │ │ -00007390: 2063 6c2d 7072 6f63 6c61 696d 2d68 6973 cl-proclaim-his │ │ │ -000073a0: 746f 7279 2073 6166 6574 7920 6279 7465 tory safety byte │ │ │ -000073b0: 2d63 6f6d 7069 6c65 2d77 6172 6e69 6e67 -compile-warning │ │ │ -000073c0: 7320 7370 6563 2073 7065 6369 616c 2062 s spec special b │ │ │ -000073d0: 6f75 6e64 7020 6170 7065 6e64 206d 6170 oundp append map │ │ │ -000073e0: 6361 7220 235b 2876 2920 2209 0842 8722 car #[(v) "..B." │ │ │ -000073f0: 205b 6279 7465 2d63 6f6d 7069 6c65 2d67 [byte-compile-g │ │ │ -00007400: 6c6f 6261 6c2d 6269 7420 765d 2032 5d20 lobal-bit v] 2] │ │ │ -00007410: 696e 6c69 6e65 2062 7974 652d 6f70 7469 inline byte-opti │ │ │ -00007420: 6d69 7a65 7220 286e 696c 2062 7974 652d mizer (nil byte- │ │ │ -00007430: 636f 6d70 696c 652d 696e 6c69 6e65 2d65 compile-inline-e │ │ │ -00007440: 7870 616e 6429 2065 7272 6f72 2022 2573 xpand) error "%s │ │ │ -00007450: 2061 6c72 6561 6479 2068 6173 2061 2062 already has a b │ │ │ -00007460: 7974 652d 6f70 7469 6d69 7a65 722c 2063 yte-optimizer, c │ │ │ -00007470: 616e 2774 206d 616b 6520 6974 2069 6e6c an't make it inl │ │ │ -00007480: 696e 6522 2070 7574 2062 7974 652d 636f ine" put byte-co │ │ │ -00007490: 6d70 696c 652d 696e 6c69 6e65 2d65 7870 mpile-inline-exp │ │ │ -000074a0: 616e 6420 6e6f 7469 6e6c 696e 6520 6e69 and notinline ni │ │ │ -000074b0: 6c20 6f70 7469 6d69 7a65 2028 2830 2920 l optimize ((0) │ │ │ -000074c0: 2831 202e 2074 2920 2832 202e 2074 2920 (1 . t) (2 . t) │ │ │ -000074d0: 2833 202e 2074 2929 2028 2830 202e 2074 (3 . t)) ((0 . t │ │ │ -000074e0: 2920 2831 202e 2074 2920 2832 202e 2074 ) (1 . t) (2 . t │ │ │ -000074f0: 2920 2833 2929 2077 6172 6e20 7420 3020 ) (3)) warn t 0 │ │ │ -00007500: 6465 6c71 206d 656d 6265 722a 2068 6973 delq member* his │ │ │ -00007510: 7420 636c 2d6f 7074 696d 697a 652d 7370 t cl-optimize-sp │ │ │ -00007520: 6565 6420 6279 7465 2d6f 7074 696d 697a eed byte-optimiz │ │ │ -00007530: 6520 636c 2d6f 7074 696d 697a 652d 7361 e cl-optimize-sa │ │ │ -00007540: 6665 7479 2062 7974 652d 636f 6d70 696c fety byte-compil │ │ │ -00007550: 652d 6465 6c65 7465 2d65 7272 6f72 7320 e-delete-errors │ │ │ -00007560: 6279 7465 2d63 6f6d 7069 6c65 2d64 6566 byte-compile-def │ │ │ -00007570: 6175 6c74 2d77 6172 6e69 6e67 735d 2035 ault-warnings] 5 │ │ │ -00007580: 5d29 0a28 6279 7465 2d63 6f64 6520 22c2 ]).(byte-code ". │ │ │ -00007590: 0821 1909 ab8b c309 8941 1140 c45c 2288 .!.......A.@.\". │ │ │ -000075a0: aa72 c510 29c5 8722 205b 636c 2d70 726f .r..).." [cl-pro │ │ │ -000075b0: 636c 6169 6d73 2d64 6566 6572 7265 6420 claims-deferred │ │ │ -000075c0: 7020 7265 7665 7273 6520 636c 2d64 6f2d p reverse cl-do- │ │ │ -000075d0: 7072 6f63 6c61 696d 2074 206e 696c 5d20 proclaim t nil] │ │ │ -000075e0: 3329 0a28 6465 6661 6c69 6173 2027 6465 3).(defalias 'de │ │ │ -000075f0: 636c 6172 6520 2728 6d61 6372 6f20 2e20 clare '(macro . │ │ │ -00007600: 235b 2826 7265 7374 2073 7065 6373 2920 #[(&rest specs) │ │ │ -00007610: 22c2 20ab 9709 ab94 083c ab85 0940 0842 ". ......<...@.B │ │ │ -00007620: 10c3 0989 4111 40c4 5c22 88aa 69c4 8722 ....A.@.\"..i.." │ │ │ -00007630: 205b 636c 2d64 6563 6c61 7265 2d73 7461 [cl-declare-sta │ │ │ -00007640: 636b 2073 7065 6373 2063 6c2d 636f 6d70 ck specs cl-comp │ │ │ -00007650: 696c 696e 672d 6669 6c65 2063 6c2d 646f iling-file cl-do │ │ │ -00007660: 2d70 726f 636c 6169 6d20 6e69 6c5d 2033 -proclaim nil] 3 │ │ │ -00007670: 5d29 290a 2340 3531 3020 2864 6566 696e ])).#@510 (defin │ │ │ -00007680: 652d 7365 7466 2d6d 6574 686f 6420 4e41 e-setf-method NA │ │ │ -00007690: 4d45 2041 5247 4c49 5354 2042 4f44 592e ME ARGLIST BODY. │ │ │ -000076a0: 2e2e 293a 2064 6566 696e 6520 6120 6073 ..): define a `s │ │ │ -000076b0: 6574 6627 206d 6574 686f 642e 0a54 6869 etf' method..Thi │ │ │ -000076c0: 7320 6d65 7468 6f64 2073 686f 7773 2068 s method shows h │ │ │ -000076d0: 6f77 2074 6f20 6861 6e64 6c65 2060 7365 ow to handle `se │ │ │ -000076e0: 7466 2773 2074 6f20 706c 6163 6573 206f tf's to places o │ │ │ -000076f0: 6620 7468 6520 666f 726d 2028 4e41 4d45 f the form (NAME │ │ │ -00007700: 2041 5247 532e 2e2e 292e 0a54 6865 2061 ARGS...)..The a │ │ │ -00007710: 7267 756d 656e 7420 666f 726d 7320 4152 rgument forms AR │ │ │ -00007720: 4753 2061 7265 2062 6f75 6e64 2061 6363 GS are bound acc │ │ │ -00007730: 6f72 6469 6e67 2074 6f20 4152 474c 4953 ording to ARGLIS │ │ │ -00007740: 542c 2061 7320 6966 204e 414d 4520 7765 T, as if NAME we │ │ │ -00007750: 7265 0a67 6f69 6e67 2074 6f20 6265 2065 re.going to be e │ │ │ -00007760: 7870 616e 6465 6420 6173 2061 206d 6163 xpanded as a mac │ │ │ -00007770: 726f 2c20 7468 656e 2074 6865 2042 4f44 ro, then the BOD │ │ │ -00007780: 5920 666f 726d 7320 6172 6520 6578 6563 Y forms are exec │ │ │ -00007790: 7574 6564 2061 6e64 206d 7573 740a 7265 uted and must.re │ │ │ -000077a0: 7475 726e 2061 206c 6973 7420 6f66 2066 turn a list of f │ │ │ -000077b0: 6976 6520 656c 656d 656e 7473 3a20 6120 ive elements: a │ │ │ -000077c0: 7465 6d70 6f72 6172 792d 7661 7269 6162 temporary-variab │ │ │ -000077d0: 6c65 7320 6c69 7374 2c20 6120 7661 6c75 les list, a valu │ │ │ -000077e0: 652d 666f 726d 730a 6c69 7374 2c20 6120 e-forms.list, a │ │ │ -000077f0: 7374 6f72 652d 7661 7269 6162 6c65 7320 store-variables │ │ │ -00007800: 6c69 7374 2028 6f66 206c 656e 6774 6820 list (of length │ │ │ -00007810: 6f6e 6529 2c20 6120 7374 6f72 652d 666f one), a store-fo │ │ │ -00007820: 726d 2c20 616e 6420 616e 2061 6363 6573 rm, and an acces │ │ │ -00007830: 732d 0a66 6f72 6d2e 2020 5365 6520 6064 s-.form. See `d │ │ │ -00007840: 6566 7365 7466 2720 666f 7220 6120 7369 efsetf' for a si │ │ │ -00007850: 6d70 6c65 7220 7761 7920 746f 2064 6566 mpler way to def │ │ │ -00007860: 696e 6520 6d6f 7374 2073 6574 662d 6d65 ine most setf-me │ │ │ -00007870: 7468 6f64 732e 1f0a 2864 6566 616c 6961 thods...(defalia │ │ │ -00007880: 7320 2764 6566 696e 652d 7365 7466 2d6d s 'define-setf-m │ │ │ -00007890: 6574 686f 6420 2728 6d61 6372 6f20 2e20 ethod '(macro . │ │ │ -000078a0: 235b 2866 756e 6320 6172 6773 2026 7265 #[(func args &re │ │ │ -000078b0: 7374 2062 6f64 7929 2022 c3c4 5c6e 403b st body) "..\n@; │ │ │ -000078c0: ad8c c5c6 0944 c75c 6e89 4112 4046 43c8 .....D.\n.A.@FC. │ │ │ -000078d0: 09c9 085c 6e42 2343 2387 2220 5b61 7267 ...\nB#C#." [arg │ │ │ -000078e0: 7320 6675 6e63 2062 6f64 7920 6170 7065 s func body appe │ │ │ -000078f0: 6e64 2028 6576 616c 2d77 6865 6e20 2863 nd (eval-when (c │ │ │ -00007900: 6f6d 7069 6c65 206c 6f61 6420 6576 616c ompile load eval │ │ │ -00007910: 2929 2070 7574 2071 756f 7465 2027 7365 )) put quote 'se │ │ │ -00007920: 7466 2d64 6f63 756d 656e 7461 7469 6f6e tf-documentation │ │ │ -00007930: 2063 6c2d 7472 616e 7366 6f72 6d2d 6675 cl-transform-fu │ │ │ -00007940: 6e63 7469 6f6e 2d70 726f 7065 7274 7920 nction-property │ │ │ -00007950: 7365 7466 2d6d 6574 686f 645d 2038 2028 setf-method] 8 ( │ │ │ -00007960: 2324 202e 2033 3033 3330 295d 2929 0a23 #$ . 30330)])).# │ │ │ -00007970: 4038 3339 2028 6465 6673 6574 6620 4e41 @839 (defsetf NA │ │ │ -00007980: 4d45 2046 554e 4329 3a20 6465 6669 6e65 ME FUNC): define │ │ │ -00007990: 2061 2060 7365 7466 2720 6d65 7468 6f64 a `setf' method │ │ │ -000079a0: 2e0a 5468 6973 206d 6163 726f 2069 7320 ..This macro is │ │ │ -000079b0: 616e 2065 6173 792d 746f 2d75 7365 2073 an easy-to-use s │ │ │ -000079c0: 7562 7374 6974 7574 6520 666f 7220 6064 ubstitute for `d │ │ │ -000079d0: 6566 696e 652d 7365 7466 2d6d 6574 686f efine-setf-metho │ │ │ -000079e0: 6427 2074 6861 7420 776f 726b 730a 7765 d' that works.we │ │ │ -000079f0: 6c6c 2066 6f72 2073 696d 706c 6520 706c ll for simple pl │ │ │ -00007a00: 6163 6520 666f 726d 732e 2020 496e 2074 ace forms. In t │ │ │ -00007a10: 6865 2073 696d 706c 6520 6064 6566 7365 he simple `defse │ │ │ -00007a20: 7466 2720 666f 726d 2c20 6073 6574 6627 tf' form, `setf' │ │ │ -00007a30: 7320 6f66 0a74 6865 2066 6f72 6d20 2873 s of.the form (s │ │ │ -00007a40: 6574 6620 284e 414d 4520 4152 4753 2e2e etf (NAME ARGS.. │ │ │ -00007a50: 2e29 2056 414c 2920 6172 6520 7472 616e .) VAL) are tran │ │ │ -00007a60: 7366 6f72 6d65 6420 746f 2066 756e 6374 sformed to funct │ │ │ -00007a70: 696f 6e20 6f72 206d 6163 726f 0a63 616c ion or macro.cal │ │ │ -00007a80: 6c73 206f 6620 7468 6520 666f 726d 2028 ls of the form ( │ │ │ -00007a90: 4655 4e43 2041 5247 532e 2e2e 2056 414c FUNC ARGS... VAL │ │ │ -00007aa0: 292e 2020 4578 616d 706c 653a 2028 6465 ). Example: (de │ │ │ -00007ab0: 6673 6574 6620 6172 6566 2061 7365 7429 fsetf aref aset) │ │ │ -00007ac0: 2e0a 416c 7465 726e 6174 6520 666f 726d ..Alternate form │ │ │ -00007ad0: 3a20 2864 6566 7365 7466 204e 414d 4520 : (defsetf NAME │ │ │ -00007ae0: 4152 474c 4953 5420 2853 544f 5245 2920 ARGLIST (STORE) │ │ │ -00007af0: 424f 4459 2e2e 2e29 2e0a 4865 7265 2c20 BODY...)..Here, │ │ │ -00007b00: 7468 6520 6162 6f76 6520 6073 6574 6627 the above `setf' │ │ │ -00007b10: 2063 616c 6c20 6973 2065 7870 616e 6465 call is expande │ │ │ -00007b20: 6420 6279 2062 696e 6469 6e67 2074 6865 d by binding the │ │ │ -00007b30: 2061 7267 756d 656e 7420 666f 726d 7320 argument forms │ │ │ -00007b40: 4152 4753 0a61 6363 6f72 6469 6e67 2074 ARGS.according t │ │ │ -00007b50: 6f20 4152 474c 4953 542c 2062 696e 6469 o ARGLIST, bindi │ │ │ -00007b60: 6e67 2074 6865 2076 616c 7565 2066 6f72 ng the value for │ │ │ -00007b70: 6d20 5641 4c20 746f 2053 544f 5245 2c20 m VAL to STORE, │ │ │ -00007b80: 7468 656e 2065 7865 6375 7469 6e67 0a42 then executing.B │ │ │ -00007b90: 4f44 592c 2077 6869 6368 206d 7573 7420 ODY, which must │ │ │ -00007ba0: 7265 7475 726e 2061 204c 6973 7020 666f return a Lisp fo │ │ │ -00007bb0: 726d 2074 6861 7420 646f 6573 2074 6865 rm that does the │ │ │ -00007bc0: 206e 6563 6573 7361 7279 2060 7365 7466 necessary `setf │ │ │ -00007bd0: 2720 6f70 6572 6174 696f 6e2e 0a41 6374 ' operation..Act │ │ │ -00007be0: 7561 6c6c 792c 2041 5247 4c49 5354 2061 ually, ARGLIST a │ │ │ -00007bf0: 6e64 2053 544f 5245 206d 6179 2062 6520 nd STORE may be │ │ │ -00007c00: 626f 756e 6420 746f 2074 656d 706f 7261 bound to tempora │ │ │ -00007c10: 7279 2076 6172 6961 626c 6573 2077 6869 ry variables whi │ │ │ -00007c20: 6368 2061 7265 0a69 6e74 726f 6475 6365 ch are.introduce │ │ │ -00007c30: 6420 6175 746f 6d61 7469 6361 6c6c 7920 d automatically │ │ │ -00007c40: 746f 2070 7265 7365 7276 6520 7072 6f70 to preserve prop │ │ │ -00007c50: 6572 2065 7865 6375 7469 6f6e 206f 7264 er execution ord │ │ │ -00007c60: 6572 206f 6620 7468 6520 6172 6775 6d65 er of the argume │ │ │ -00007c70: 6e74 732e 0a45 7861 6d70 6c65 3a20 2864 nts..Example: (d │ │ │ -00007c80: 6566 7365 7466 206e 7468 2028 6e20 7829 efsetf nth (n x) │ │ │ -00007c90: 2028 7629 2028 6c69 7374 2027 7365 7463 (v) (list 'setc │ │ │ -00007ca0: 6172 2028 6c69 7374 2027 6e74 6863 6472 ar (list 'nthcdr │ │ │ -00007cb0: 206e 2078 2920 7629 292e 1f0a 2864 6566 n x) v))...(def │ │ │ -00007cc0: 616c 6961 7320 2764 6566 7365 7466 2027 alias 'defsetf ' │ │ │ -00007cd0: 286d 6163 726f 202e 2023 5b28 6675 6e63 (macro . #[(func │ │ │ -00007ce0: 2061 7267 3120 2672 6573 7420 6172 6773 arg1 &rest args │ │ │ -00007cf0: 2920 220e 233c 8347 01c6 891b 1e24 c689 ) ".#<.G.....$.. │ │ │ -00007d00: 191e 1fc6 891d 1e20 5c6e 405c 6e41 1240 ....... \n@\nA.@ │ │ │ -00007d10: 1e25 c7c8 c90e 255c 2221 1e26 c689 1e21 .%....%\"!.&...! │ │ │ -00007d20: 18c6 1e27 0e23 1c5c 6e40 3bab 875c 6e40 ...'.#.\n@;..\n@ │ │ │ -00007d30: 5c6e 4112 1627 0cab b90c 40ca 61ac b30c \nA..'....@.a... │ │ │ -00007d40: 40cb 61ab 880c 4189 1440 15aa 9f0c 40cc @.a...A..@....@. │ │ │ -00007d50: 73ac 990c 403a ab85 0c40 40aa 820c 400b s...@:...@@...@. │ │ │ -00007d60: 4213 c7c8 c90b 405c 2221 0942 110c 4189 B.....@\"!.B..A. │ │ │ -00007d70: 14ac 470b 9f13 099f 110d ab99 cd0b 0d43 ..G............C │ │ │ -00007d80: 5c22 1624 c7c8 c90d 5c22 2116 20cd 090e \".$....\"!. ... │ │ │ -00007d90: 2043 5c22 161f aa86 0b16 2409 161f 0b09 C\"......$..... │ │ │ -00007da0: 1e5c 221e 1e0e 1eab a70e 5c22 40ce c8cf .\".......\"@... │ │ │ -00007db0: 0e1e 405c 2244 440e 2142 1621 0e1e 400e ..@\"DD.!B.!..@. │ │ │ -00007dc0: 5c22 4044 0842 100e 1e41 161e 0e5c 2241 \"@D.B...A...\"A │ │ │ -00007dd0: 165c 22aa 552a 0dab 870d 0e20 4408 4210 .\".U*..... D.B. │ │ │ -00007de0: cdd0 0e28 0e23 450e 27ad 830e 2743 d10e ...(.#E.'...'C.. │ │ │ -00007df0: 26ce c8cf 0e25 5c22 4444 0dab 8ecd 0e20 &....%\"DD..... │ │ │ -00007e00: d2d3 0d45 4443 0e21 5c22 aa82 0e21 429f ...EDC.!\"...!B. │ │ │ -00007e10: d40d ab83 d5aa 81d4 0e1f 420d ab83 d5aa ..........B..... │ │ │ -00007e20: 81d4 0e24 42d4 0e26 44d1 0e25 0e26 4408 ...$B..&D..%.&D. │ │ │ -00007e30: 429f 5c6e 4242 0dab 83d5 aa81 d4d6 0e28 B.\nBB.........( │ │ │ -00007e40: 440e 1f42 42af 0645 4323 2e0c 87d7 0e28 D..BB..EC#.....( │ │ │ -00007e50: d8d9 dad6 0e23 44db 451e 295c 6e40 ab88 .....#D.E.)\n@.. │ │ │ -00007e60: d4dc 0e29 dd46 aa82 0e29 29af 0587 2220 ...).F...))..." │ │ │ -00007e70: 5b6c 6574 7332 2074 656d 7073 2061 7267 [lets2 temps arg │ │ │ -00007e80: 7320 6c61 7267 7320 7020 7265 7374 6172 s largs p restar │ │ │ -00007e90: 6720 6e69 6c20 696e 7465 726e 2066 6f72 g nil intern for │ │ │ -00007ea0: 6d61 7420 222d 2d25 732d 2d74 656d 702d mat "--%s--temp- │ │ │ -00007eb0: 2d22 2026 6175 7820 2672 6573 7420 2826 -" &aux &rest (& │ │ │ -00007ec0: 6f70 7469 6f6e 616c 2026 6b65 7920 2661 optional &key &a │ │ │ -00007ed0: 6c6c 6f77 2d6f 7468 6572 2d6b 6579 7329 llow-other-keys) │ │ │ -00007ee0: 2061 7070 656e 6420 6765 6e73 796d 2022 append gensym " │ │ │ -00007ef0: 2d2d 2573 2d2d 2220 6465 6669 6e65 2d73 --%s--" define-s │ │ │ -00007f00: 6574 662d 6d65 7468 6f64 206c 6574 2a20 etf-method let* │ │ │ -00007f10: 6d61 7063 6172 2027 6765 6e73 796d 206c mapcar 'gensym l │ │ │ -00007f20: 6973 7420 6c69 7374 2a20 7175 6f74 6520 ist list* quote │ │ │ -00007f30: 6465 6673 6574 6620 2826 7265 7374 2061 defsetf (&rest a │ │ │ -00007f40: 7267 7329 2028 7374 6f72 6529 2063 6f6e rgs) (store) con │ │ │ -00007f50: 7320 2861 7070 656e 6420 6172 6773 2028 s (append args ( │ │ │ -00007f60: 6c69 7374 2073 746f 7265 2929 2027 7072 list store)) 'pr │ │ │ -00007f70: 6f67 6e20 7374 6f72 6520 7031 2074 656d ogn store p1 tem │ │ │ -00007f80: 7073 7220 7265 7374 2d74 656d 7073 206c psr rest-temps l │ │ │ -00007f90: 6574 7331 2070 3220 6172 6731 206c 6172 ets1 p2 arg1 lar │ │ │ -00007fa0: 6773 7220 7374 6f72 652d 7661 7220 7374 gsr store-var st │ │ │ -00007fb0: 6f72 652d 7465 6d70 2064 6f63 7374 7220 ore-temp docstr │ │ │ -00007fc0: 6675 6e63 2063 616c 6c5d 2031 3420 2823 func call] 14 (# │ │ │ -00007fd0: 2420 2e20 3331 3039 3329 5d29 290a 2862 $ . 31093)])).(b │ │ │ -00007fe0: 7974 652d 636f 6465 2022 c0c1 c2c3 2388 yte-code "....#. │ │ │ -00007ff0: c0c4 c2c5 2388 c0c6 c2c7 2388 c0c8 c2c9 ....#.....#..... │ │ │ -00008000: 2388 c0ca c2cb 2388 c0cc c2cd 2388 c0ce #.....#.....#... │ │ │ -00008010: c2cf 2388 c0d0 c2d1 2388 c0d2 c2d3 2388 ..#.....#.....#. │ │ │ -00008020: c0d4 c2d5 2388 c0d6 c2d7 2388 c0d8 c2d9 ....#.....#..... │ │ │ -00008030: 2388 c0da c2db 2388 c0dc c2dd 2388 c0de #.....#.....#... │ │ │ -00008040: c2df 2388 c0e0 c2e1 2388 c0e2 c2e3 2388 ..#.....#.....#. │ │ │ -00008050: c0e4 c2e5 2388 c0e6 c2e7 2388 c0e8 c2e9 ....#.....#..... │ │ │ -00008060: 2388 c0ea c2eb 2388 c0ec c2ed 2388 c0ee #.....#.....#... │ │ │ -00008070: c2ef 2388 c0f0 c2f1 2388 c0f2 c2f3 2388 ..#.....#.....#. │ │ │ -00008080: c0f4 c2f5 2388 c0f6 c2f7 2388 c0f8 c2f9 ....#.....#..... │ │ │ -00008090: 2388 c0fa c2fb 2388 c0fc c2fd 2388 c0fe #.....#.....#... │ │ │ -000080a0: c2ff 2388 c081 4000 c281 4100 2388 c081 ..#...@...A.#... │ │ │ -000080b0: 4200 c281 4300 2388 c081 4400 c281 4500 B...C.#...D...E. │ │ │ -000080c0: 2388 c081 4600 c281 4700 2388 c081 4800 #...F...G.#...H. │ │ │ -000080d0: c281 4900 2388 c081 4a00 c281 4b00 2388 ..I.#...J...K.#. │ │ │ -000080e0: c081 4c00 c281 4d00 2388 c081 4e00 c281 ..L...M.#...N... │ │ │ -000080f0: 4f00 2388 c081 5000 c281 5100 2388 c081 O.#...P...Q.#... │ │ │ -00008100: 5200 c281 5300 2388 c081 5400 c281 5500 R...S.#...T...U. │ │ │ -00008110: 2388 c081 5600 c281 5700 2388 c081 5800 #...V...W.#...X. │ │ │ -00008120: c281 5900 2388 c081 5a00 c281 5b00 2388 ..Y.#...Z...[.#. │ │ │ -00008130: c081 5c5c 00c2 815d 0023 88c0 815e 00c2 ..\\...].#...^.. │ │ │ -00008140: 815f 0023 88c0 8160 00c2 8161 0023 88c0 ._.#...`...a.#.. │ │ │ -00008150: 8162 00c2 8163 0023 88c0 8164 00c2 8165 .b...c.#...d...e │ │ │ -00008160: 0023 88c0 8166 00c2 8167 0023 88c0 8168 .#...f...g.#...h │ │ │ -00008170: 00c2 8169 0023 88c0 816a 00c2 816b 0023 ...i.#...j...k.# │ │ │ -00008180: 88c0 816c 00c2 816d 0023 88c0 816e 00c2 ...l...m.#...n.. │ │ │ -00008190: 816f 0023 88c0 8170 00c2 8171 0023 88c0 .o.#...p...q.#.. │ │ │ -000081a0: 8172 00c2 8173 0023 88c0 8174 00c2 8175 .r...s.#...t...u │ │ │ -000081b0: 0023 88c0 8176 00c2 8177 0023 88c0 8178 .#...v...w.#...x │ │ │ -000081c0: 00c2 8179 0023 88c0 817a 00c2 817b 0023 ...y.#...z...{.# │ │ │ -000081d0: 88c0 817c 00c2 817d 0023 88c0 817e 00c2 ...|...}.#...~.. │ │ │ -000081e0: 817f 0023 88c0 8180 00c2 8181 0023 88c0 ...#.........#.. │ │ │ -000081f0: 8182 00c2 8183 0023 88c0 8184 00c2 8185 .......#........ │ │ │ -00008200: 0023 88c0 8186 00c2 8187 0023 88c0 8188 .#.........#.... │ │ │ -00008210: 00c2 8189 0023 88c0 818a 00c2 818b 0023 .....#.........# │ │ │ -00008220: 88c0 818c 00c2 818d 0023 88c0 818e 00c2 .........#...... │ │ │ -00008230: 818f 0023 88c0 8190 00c2 8191 0023 88c0 ...#.........#.. │ │ │ -00008240: 8192 00c2 8193 0023 88c0 8194 00c2 8195 .......#........ │ │ │ -00008250: 0023 88c0 8196 00c2 8197 0023 88c0 8198 .#.........#.... │ │ │ -00008260: 00c2 8199 0023 88c0 819a 00c2 819b 0023 .....#.........# │ │ │ -00008270: 88c0 819c 00c2 819d 0023 88c0 819e 00c2 .........#...... │ │ │ -00008280: 819f 0023 88c0 81a0 00c2 81a1 0023 88c0 ...#.........#.. │ │ │ -00008290: 81a2 00c2 81a3 0023 88c0 81a4 00c2 81a5 .......#........ │ │ │ -000082a0: 0023 88c0 81a6 00c2 81a7 0023 88c0 81a8 .#.........#.... │ │ │ -000082b0: 00c2 81a9 0023 88c0 81aa 00c2 81ab 0023 .....#.........# │ │ │ -000082c0: 88c0 81ac 00c2 81ad 0023 88c0 81ae 00c2 .........#...... │ │ │ -000082d0: 81af 0023 88c0 81b0 00c2 81b1 0023 88c0 ...#.........#.. │ │ │ -000082e0: 81b2 00c2 81b3 0023 88c0 81b4 00c2 81b5 .......#........ │ │ │ -000082f0: 0023 88c0 81b6 00c2 81b7 0023 88c0 81b8 .#.........#.... │ │ │ -00008300: 00c2 81b9 0023 88c0 81ba 00c2 81bb 0023 .....#.........# │ │ │ -00008310: 88c0 81bc 00c2 81bd 0023 88c0 81be 00c2 .........#...... │ │ │ -00008320: 81bf 0023 88c0 81c0 00c2 81c1 0023 88c0 ...#.........#.. │ │ │ -00008330: 81c2 00c2 81c3 0023 88c0 81c4 00c2 81c5 .......#........ │ │ │ -00008340: 0023 88c0 81c6 00c2 81c7 0023 88c0 81c8 .#.........#.... │ │ │ -00008350: 00c2 81c9 0023 88c0 81ca 00c2 81cb 0023 .....#.........# │ │ │ -00008360: 88c0 81cc 00c2 81cd 0023 88c0 81ce 00c2 .........#...... │ │ │ -00008370: 81cf 0023 88c0 81d0 00c2 81d1 0023 88c0 ...#.........#.. │ │ │ -00008380: 81d2 00c2 81d3 0023 88c0 81d4 00c2 81d5 .......#........ │ │ │ -00008390: 0023 88c0 81d6 00c2 81d7 0023 88c0 81d8 .#.........#.... │ │ │ -000083a0: 00c2 81d9 0023 88c0 81da 00c2 81db 0023 .....#.........# │ │ │ -000083b0: 88c0 81dc 00c2 81dd 0023 88c0 81de 00c2 .........#...... │ │ │ -000083c0: 81df 0023 88c0 81e0 00c2 81e1 0023 88c0 ...#.........#.. │ │ │ -000083d0: 81e2 00c2 81e3 0023 88c0 81e4 00c2 81e5 .......#........ │ │ │ -000083e0: 0023 88c0 81e6 00c2 81e7 0023 88c0 81e8 .#.........#.... │ │ │ -000083f0: 00c2 81e9 0023 88c0 81ea 00c2 81eb 0023 .....#.........# │ │ │ -00008400: 88c0 81ec 00c2 81ed 0023 88c0 81ee 00c2 .........#...... │ │ │ -00008410: 81ef 0023 88c0 81f0 00c2 81f1 0023 88c0 ...#.........#.. │ │ │ -00008420: 81f2 00c2 81f3 0023 88c0 81f4 00c2 81f5 .......#........ │ │ │ -00008430: 0023 88c0 81f6 00c2 81f7 0023 88c0 81f8 .#.........#.... │ │ │ -00008440: 00c2 81f9 0023 88c0 81fa 00c2 81fb 0023 .....#.........# │ │ │ -00008450: 88c0 81fc 00c2 81fd 0023 88c0 81fe 00c2 .........#...... │ │ │ -00008460: 81ff 0023 88c0 8100 01c2 8101 0123 88c0 ...#.........#.. │ │ │ -00008470: 8102 01c2 8103 0123 88c0 8104 01c2 8105 .......#........ │ │ │ -00008480: 0123 88c0 8106 01c2 8107 0123 88c0 8108 .#.........#.... │ │ │ -00008490: 01c2 8109 0123 88c0 815c 6e01 c281 0b01 .....#...\n..... │ │ │ -000084a0: 2388 c081 0c01 c281 0d01 2388 c081 0e01 #.........#..... │ │ │ -000084b0: c281 0f01 2388 c081 1001 c281 1101 2388 ....#.........#. │ │ │ -000084c0: c081 1201 c281 1301 2388 c081 1401 c281 ........#....... │ │ │ -000084d0: 1501 2388 c081 1601 c281 1701 2388 c081 ..#.........#... │ │ │ -000084e0: 1801 c281 1901 2388 c081 1a01 c281 1b01 ......#......... │ │ │ -000084f0: 2387 2220 5b70 7574 2061 7265 6620 7365 #." [put aref se │ │ │ -00008500: 7466 2d6d 6574 686f 6420 235b 2826 7265 tf-method #[(&re │ │ │ -00008510: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -00008520: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -00008530: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ -00008540: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -00008550: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -00008560: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -00008570: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -00008580: 7265 2d2d 2220 6173 6574 2061 7070 656e re--" aset appen │ │ │ -00008590: 6420 6172 6566 5d20 3720 225c 6e43 6f6d d aref] 7 "\nCom │ │ │ -000085a0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -000085b0: 6c69 7374 3a5c 6e20 2028 6172 6566 2026 list:\n (aref & │ │ │ -000085c0: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ -000085d0: 2063 6172 2023 5b28 2672 6573 7420 6172 car #[(&rest ar │ │ │ -000085e0: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ -000085f0: 6e0b 0943 5c6e 1b09 18c7 c80b 0843 5c22 n..C\n.......C\" │ │ │ -00008600: 2a42 c95c 6e42 af05 2a87 2220 5b73 746f *B.\nB..*." [sto │ │ │ -00008610: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ -00008620: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ -00008630: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ -00008640: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ -00008650: 2073 6574 6361 7220 6170 7065 6e64 2063 setcar append c │ │ │ -00008660: 6172 5d20 3720 225c 6e43 6f6d 6d6f 6e20 ar] 7 "\nCommon │ │ │ -00008670: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ -00008680: 3a5c 6e20 2028 6361 7220 2672 6573 7420 :\n (car &rest │ │ │ -00008690: 4152 4753 295c 6e5c 6e22 5d20 6364 7220 ARGS)\n\n"] cdr │ │ │ -000086a0: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ -000086b0: c4c5 0b5c 221a c5c6 2119 5c6e 0b09 435c ...\"...!.\n..C\ │ │ │ -000086c0: 6e1b 0918 c7c8 0b08 435c 222a 42c9 5c6e n.......C\"*B.\n │ │ │ -000086d0: 42af 052a 8722 205b 7374 6f72 6520 2d2d B..*." [store -- │ │ │ -000086e0: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ -000086f0: 6172 6773 2d2d 7465 6d70 2d2d 2061 7267 args--temp-- arg │ │ │ -00008700: 7320 6d61 7063 6172 2067 656e 7379 6d20 s mapcar gensym │ │ │ -00008710: 222d 2d73 746f 7265 2d2d 2220 7365 7463 "--store--" setc │ │ │ -00008720: 6472 2061 7070 656e 6420 6364 725d 2037 dr append cdr] 7 │ │ │ -00008730: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -00008740: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -00008750: 2863 6472 2026 7265 7374 2041 5247 5329 (cdr &rest ARGS) │ │ │ -00008760: 5c6e 5c6e 225d 2065 6c74 2023 5b28 7365 \n\n"] elt #[(se │ │ │ -00008770: 7120 6e29 2022 c6c7 211c c6c8 211b c6c9 q n) "..!...!... │ │ │ -00008780: 2119 0c0b 440d 5c6e 4409 430c 1d0b 1a09 !...D.\nD.C..... │ │ │ -00008790: 18ca cb0d 44cc cd5c 6e0d 4508 45ce 0d5c ....D..\n.E.E..\ │ │ │ -000087a0: 6e08 4646 2bcf 0c0b 45af 052b 8722 205b n.FF+...E..+." [ │ │ │ -000087b0: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ -000087c0: 656d 702d 2d20 6e20 2d2d 6e2d 2d74 656d emp-- n --n--tem │ │ │ -000087d0: 702d 2d20 2d2d 7365 712d 2d74 656d 702d p-- --seq--temp- │ │ │ -000087e0: 2d20 7365 7120 6765 6e73 796d 2022 2d2d - seq gensym "-- │ │ │ -000087f0: 7365 712d 2d22 2022 2d2d 6e2d 2d22 2022 seq--" "--n--" " │ │ │ -00008800: 2d2d 7374 6f72 652d 2d22 2069 6620 6c69 --store--" if li │ │ │ -00008810: 7374 7020 7365 7463 6172 206e 7468 6364 stp setcar nthcd │ │ │ -00008820: 7220 6173 6574 2065 6c74 5d20 3130 2022 r aset elt] 10 " │ │ │ -00008830: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -00008840: 6d62 6461 206c 6973 743a 5c6e 2020 2865 mbda list:\n (e │ │ │ -00008850: 6c74 2053 4551 204e 295c 6e5c 6e22 5d20 lt SEQ N)\n\n"] │ │ │ -00008860: 6765 7420 235b 2878 2079 2026 6f70 7469 get #[(x y &opti │ │ │ -00008870: 6f6e 616c 2069 676e 6f72 6564 2d61 7267 onal ignored-arg │ │ │ -00008880: 2920 22c6 c721 1dc6 c821 1cc6 c921 1bc6 ) "..!...!...!.. │ │ │ -00008890: ca21 1a0d 0c0b 4509 080e 0d45 5c6e 430d .!....E....E\nC. │ │ │ -000088a0: 190c 180b 1e0d 5c6e 1e0e cb09 080e 0e46 ......\n.......F │ │ │ -000088b0: 2ccc 0d0c 0b46 af05 2c87 2220 5b79 2078 ,....F..,." [y x │ │ │ -000088c0: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ -000088d0: 202d 2d69 676e 6f72 6564 2d61 7267 2d2d --ignored-arg-- │ │ │ -000088e0: 7465 6d70 2d2d 202d 2d79 2d2d 7465 6d70 temp-- --y--temp │ │ │ -000088f0: 2d2d 202d 2d78 2d2d 7465 6d70 2d2d 2067 -- --x--temp-- g │ │ │ -00008900: 656e 7379 6d20 222d 2d78 2d2d 2220 222d ensym "--x--" "- │ │ │ -00008910: 2d79 2d2d 2220 222d 2d69 676e 6f72 6564 -y--" "--ignored │ │ │ -00008920: 2d61 7267 2d2d 2220 222d 2d73 746f 7265 -arg--" "--store │ │ │ -00008930: 2d2d 2220 7075 7420 6765 7420 6967 6e6f --" put get igno │ │ │ -00008940: 7265 642d 6172 6720 7374 6f72 655d 2038 red-arg store] 8 │ │ │ -00008950: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -00008960: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -00008970: 2867 6574 2058 2059 2026 6f70 7469 6f6e (get X Y &option │ │ │ -00008980: 616c 2049 474e 4f52 4544 2d41 5247 295c al IGNORED-ARG)\ │ │ │ -00008990: 6e5c 6e22 5d20 6765 742a 2023 5b28 7820 n\n"] get* #[(x │ │ │ -000089a0: 7920 266f 7074 696f 6e61 6c20 6967 6e6f y &optional igno │ │ │ -000089b0: 7265 642d 6172 6729 2022 c6c7 211d c6c8 red-arg) "..!... │ │ │ -000089c0: 211c c6c9 211b c6ca 211a 0d0c 0b45 0908 !...!...!....E.. │ │ │ -000089d0: 0e0d 455c 6e43 0d19 0c18 0b1e 0d5c 6e1e ..E\nC.......\n. │ │ │ -000089e0: 0ecb 0908 0e0e 462c cc0d 0c0b 46af 052c ......F,....F.., │ │ │ -000089f0: 8722 205b 7920 7820 2d2d 7374 6f72 652d ." [y x --store- │ │ │ -00008a00: 2d74 656d 702d 2d20 2d2d 6967 6e6f 7265 -temp-- --ignore │ │ │ -00008a10: 642d 6172 672d 2d74 656d 702d 2d20 2d2d d-arg--temp-- -- │ │ │ -00008a20: 792d 2d74 656d 702d 2d20 2d2d 782d 2d74 y--temp-- --x--t │ │ │ -00008a30: 656d 702d 2d20 6765 6e73 796d 2022 2d2d emp-- gensym "-- │ │ │ -00008a40: 782d 2d22 2022 2d2d 792d 2d22 2022 2d2d x--" "--y--" "-- │ │ │ -00008a50: 6967 6e6f 7265 642d 6172 672d 2d22 2022 ignored-arg--" " │ │ │ -00008a60: 2d2d 7374 6f72 652d 2d22 2070 7574 2067 --store--" put g │ │ │ -00008a70: 6574 2a20 6967 6e6f 7265 642d 6172 6720 et* ignored-arg │ │ │ -00008a80: 7374 6f72 655d 2038 2022 5c6e 436f 6d6d store] 8 "\nComm │ │ │ -00008a90: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ -00008aa0: 6973 743a 5c6e 2020 2867 6574 2a20 5820 ist:\n (get* X │ │ │ -00008ab0: 5920 266f 7074 696f 6e61 6c20 4947 4e4f Y &optional IGNO │ │ │ -00008ac0: 5245 442d 4152 4729 5c6e 5c6e 225d 2067 RED-ARG)\n\n"] g │ │ │ -00008ad0: 6574 6861 7368 2023 5b28 7820 6820 266f ethash #[(x h &o │ │ │ -00008ae0: 7074 696f 6e61 6c20 6967 6e6f 7265 642d ptional ignored- │ │ │ -00008af0: 6172 6729 2022 c6c7 211d c6c8 211c c6c9 arg) "..!...!... │ │ │ -00008b00: 211b c6ca 211a 0d0c 0b45 0908 0e0d 455c !...!....E....E\ │ │ │ -00008b10: 6e43 0d19 0c18 0b1e 0d5c 6e1e 0ecb 090e nC.......\n..... │ │ │ -00008b20: 0e08 462c cc0d 0c0b 46af 052c 8722 205b ..F,....F..,." [ │ │ │ -00008b30: 6820 7820 2d2d 7374 6f72 652d 2d74 656d h x --store--tem │ │ │ -00008b40: 702d 2d20 2d2d 6967 6e6f 7265 642d 6172 p-- --ignored-ar │ │ │ -00008b50: 672d 2d74 656d 702d 2d20 2d2d 682d 2d74 g--temp-- --h--t │ │ │ -00008b60: 656d 702d 2d20 2d2d 782d 2d74 656d 702d emp-- --x--temp- │ │ │ -00008b70: 2d20 6765 6e73 796d 2022 2d2d 782d 2d22 - gensym "--x--" │ │ │ -00008b80: 2022 2d2d 682d 2d22 2022 2d2d 6967 6e6f "--h--" "--igno │ │ │ -00008b90: 7265 642d 6172 672d 2d22 2022 2d2d 7374 red-arg--" "--st │ │ │ -00008ba0: 6f72 652d 2d22 2063 6c2d 7075 7468 6173 ore--" cl-puthas │ │ │ -00008bb0: 6820 6765 7468 6173 6820 6967 6e6f 7265 h gethash ignore │ │ │ -00008bc0: 642d 6172 6720 7374 6f72 655d 2038 2022 d-arg store] 8 " │ │ │ -00008bd0: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -00008be0: 6d62 6461 206c 6973 743a 5c6e 2020 2867 mbda list:\n (g │ │ │ -00008bf0: 6574 6861 7368 2058 2048 2026 6f70 7469 ethash X H &opti │ │ │ -00008c00: 6f6e 616c 2049 474e 4f52 4544 2d41 5247 onal IGNORED-ARG │ │ │ -00008c10: 295c 6e5c 6e22 5d20 6e74 6820 235b 286e )\n\n"] nth #[(n │ │ │ -00008c20: 2078 2920 22c6 c721 1dc6 c821 1cc6 c921 x) "..!...!...! │ │ │ -00008c30: 1b0d 0c44 5c6e 0944 0b43 0d1a 0c19 0b18 ...D\n.D.C...... │ │ │ -00008c40: cacb 5c6e 0945 0845 2bcc 0d0c 45af 052b ..\n.E.E+...E..+ │ │ │ -00008c50: 8722 205b 7374 6f72 6520 7820 6e20 2d2d ." [store x n -- │ │ │ -00008c60: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ -00008c70: 782d 2d74 656d 702d 2d20 2d2d 6e2d 2d74 x--temp-- --n--t │ │ │ -00008c80: 656d 702d 2d20 6765 6e73 796d 2022 2d2d emp-- gensym "-- │ │ │ -00008c90: 6e2d 2d22 2022 2d2d 782d 2d22 2022 2d2d n--" "--x--" "-- │ │ │ -00008ca0: 7374 6f72 652d 2d22 2073 6574 6361 7220 store--" setcar │ │ │ -00008cb0: 6e74 6863 6472 206e 7468 5d20 3720 225c nthcdr nth] 7 "\ │ │ │ -00008cc0: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ -00008cd0: 6264 6120 6c69 7374 3a5c 6e20 2028 6e74 bda list:\n (nt │ │ │ -00008ce0: 6820 4e20 5829 5c6e 5c6e 225d 2073 7562 h N X)\n\n"] sub │ │ │ -00008cf0: 7365 7120 235b 2873 6571 2073 7461 7274 seq #[(seq start │ │ │ -00008d00: 2026 6f70 7469 6f6e 616c 2065 6e64 2920 &optional end) │ │ │ -00008d10: 22c6 c721 1dc6 c821 1cc6 c921 1bc6 ca21 "..!...!...!...! │ │ │ -00008d20: 1a0d 0c0b 4509 080e 1045 5c6e 430d 190c ....E....E\nC... │ │ │ -00008d30: 180b 1e10 5c6e 1e11 cbcc 090e 11cd 08ce ....\n.......... │ │ │ -00008d40: 0e10 af07 0e11 452c cf0d 0c0b 46af 052c ......E,....F.., │ │ │ -00008d50: 8722 205b 7374 6172 7420 7365 7120 2d2d ." [start seq -- │ │ │ -00008d60: 6e65 772d 2d74 656d 702d 2d20 2d2d 656e new--temp-- --en │ │ │ -00008d70: 642d 2d74 656d 702d 2d20 2d2d 7374 6172 d--temp-- --star │ │ │ -00008d80: 742d 2d74 656d 702d 2d20 2d2d 7365 712d t--temp-- --seq- │ │ │ -00008d90: 2d74 656d 702d 2d20 6765 6e73 796d 2022 -temp-- gensym " │ │ │ -00008da0: 2d2d 7365 712d 2d22 2022 2d2d 7374 6172 --seq--" "--star │ │ │ -00008db0: 742d 2d22 2022 2d2d 656e 642d 2d22 2022 t--" "--end--" " │ │ │ -00008dc0: 2d2d 6e65 772d 2d22 2070 726f 676e 2072 --new--" progn r │ │ │ -00008dd0: 6570 6c61 6365 203a 7374 6172 7431 203a eplace :start1 : │ │ │ -00008de0: 656e 6431 2073 7562 7365 7120 656e 6420 end1 subseq end │ │ │ -00008df0: 6e65 775d 2031 3120 225c 6e43 6f6d 6d6f new] 11 "\nCommo │ │ │ -00008e00: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ -00008e10: 7374 3a5c 6e20 2028 7375 6273 6571 2053 st:\n (subseq S │ │ │ -00008e20: 4551 2053 5441 5254 2026 6f70 7469 6f6e EQ START &option │ │ │ -00008e30: 616c 2045 4e44 295c 6e5c 6e22 5d20 7379 al END)\n\n"] sy │ │ │ -00008e40: 6d62 6f6c 2d66 756e 6374 696f 6e20 235b mbol-function #[ │ │ │ -00008e50: 2826 7265 7374 2061 7267 7329 2022 c4c5 (&rest args) ".. │ │ │ -00008e60: 0b5c 221a c5c6 2119 5c6e 0b09 435c 6e1b .\"...!.\n..C\n. │ │ │ -00008e70: 0918 c7c8 0b08 435c 222a 42c9 5c6e 42af ......C\"*B.\nB. │ │ │ -00008e80: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ -00008e90: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ -00008ea0: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ -00008eb0: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ -00008ec0: 2d73 746f 7265 2d2d 2220 6673 6574 2061 -store--" fset a │ │ │ -00008ed0: 7070 656e 6420 7379 6d62 6f6c 2d66 756e ppend symbol-fun │ │ │ -00008ee0: 6374 696f 6e5d 2037 2022 5c6e 436f 6d6d ction] 7 "\nComm │ │ │ -00008ef0: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ -00008f00: 6973 743a 5c6e 2020 2873 796d 626f 6c2d ist:\n (symbol- │ │ │ -00008f10: 6675 6e63 7469 6f6e 2026 7265 7374 2041 function &rest A │ │ │ -00008f20: 5247 5329 5c6e 5c6e 225d 2073 796d 626f RGS)\n\n"] symbo │ │ │ -00008f30: 6c2d 706c 6973 7420 235b 2826 7265 7374 l-plist #[(&rest │ │ │ -00008f40: 2061 7267 7329 2022 c4c5 0b5c 221a c5c6 args) "...\"... │ │ │ -00008f50: 2119 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 !.\n..C\n....... │ │ │ -00008f60: 435c 222a 42c9 5c6e 42af 052a 8722 205b C\"*B.\nB..*." [ │ │ │ -00008f70: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ -00008f80: 656d 702d 2d20 2d2d 6172 6773 2d2d 7465 emp-- --args--te │ │ │ -00008f90: 6d70 2d2d 2061 7267 7320 6d61 7063 6172 mp-- args mapcar │ │ │ -00008fa0: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ -00008fb0: 2d2d 2220 7365 7470 6c69 7374 2061 7070 --" setplist app │ │ │ -00008fc0: 656e 6420 7379 6d62 6f6c 2d70 6c69 7374 end symbol-plist │ │ │ -00008fd0: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ -00008fe0: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -00008ff0: 6e20 2028 7379 6d62 6f6c 2d70 6c69 7374 n (symbol-plist │ │ │ -00009000: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ -00009010: 225d 2073 796d 626f 6c2d 7661 6c75 6520 "] symbol-value │ │ │ -00009020: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ -00009030: c4c5 0b5c 221a c5c6 2119 5c6e 0b09 435c ...\"...!.\n..C\ │ │ │ -00009040: 6e1b 0918 c7c8 0b08 435c 222a 42c9 5c6e n.......C\"*B.\n │ │ │ -00009050: 42af 052a 8722 205b 7374 6f72 6520 2d2d B..*." [store -- │ │ │ -00009060: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ -00009070: 6172 6773 2d2d 7465 6d70 2d2d 2061 7267 args--temp-- arg │ │ │ -00009080: 7320 6d61 7063 6172 2067 656e 7379 6d20 s mapcar gensym │ │ │ -00009090: 222d 2d73 746f 7265 2d2d 2220 7365 7420 "--store--" set │ │ │ -000090a0: 6170 7065 6e64 2073 796d 626f 6c2d 7661 append symbol-va │ │ │ -000090b0: 6c75 655d 2037 2022 5c6e 436f 6d6d 6f6e lue] 7 "\nCommon │ │ │ -000090c0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -000090d0: 743a 5c6e 2020 2873 796d 626f 6c2d 7661 t:\n (symbol-va │ │ │ -000090e0: 6c75 6520 2672 6573 7420 4152 4753 295c lue &rest ARGS)\ │ │ │ -000090f0: 6e5c 6e22 5d20 6669 7273 7420 235b 2826 n\n"] first #[(& │ │ │ -00009100: 7265 7374 2061 7267 7329 2022 c4c5 0b5c rest args) "...\ │ │ │ -00009110: 221a c5c6 2119 5c6e 0b09 435c 6e1b 0918 "...!.\n..C\n... │ │ │ -00009120: c7c8 0b08 435c 222a 42c9 5c6e 42af 052a ....C\"*B.\nB..* │ │ │ -00009130: 8722 205b 7374 6f72 6520 2d2d 7374 6f72 ." [store --stor │ │ │ -00009140: 652d 2d74 656d 702d 2d20 2d2d 6172 6773 e--temp-- --args │ │ │ -00009150: 2d2d 7465 6d70 2d2d 2061 7267 7320 6d61 --temp-- args ma │ │ │ -00009160: 7063 6172 2067 656e 7379 6d20 222d 2d73 pcar gensym "--s │ │ │ -00009170: 746f 7265 2d2d 2220 7365 7463 6172 2061 tore--" setcar a │ │ │ -00009180: 7070 656e 6420 6669 7273 745d 2037 2022 ppend first] 7 " │ │ │ -00009190: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -000091a0: 6d62 6461 206c 6973 743a 5c6e 2020 2866 mbda list:\n (f │ │ │ -000091b0: 6972 7374 2026 7265 7374 2041 5247 5329 irst &rest ARGS) │ │ │ -000091c0: 5c6e 5c6e 225d 2073 6563 6f6e 6420 235b \n\n"] second #[ │ │ │ -000091d0: 2878 2920 22c4 c521 1bc4 c621 1a0b 4309 (x) "..!...!..C. │ │ │ -000091e0: 435c 6e43 0b19 5c6e 18c7 c809 4408 452a C\nC..\n....D.E* │ │ │ -000091f0: c90b 44af 052a 8722 205b 7374 6f72 6520 ..D..*." [store │ │ │ -00009200: 7820 2d2d 7374 6f72 652d 2d74 656d 702d x --store--temp- │ │ │ -00009210: 2d20 2d2d 782d 2d74 656d 702d 2d20 6765 - --x--temp-- ge │ │ │ -00009220: 6e73 796d 2022 2d2d 782d 2d22 2022 2d2d nsym "--x--" "-- │ │ │ -00009230: 7374 6f72 652d 2d22 2073 6574 6361 7220 store--" setcar │ │ │ -00009240: 6364 7220 7365 636f 6e64 5d20 3620 225c cdr second] 6 "\ │ │ │ -00009250: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ -00009260: 6264 6120 6c69 7374 3a5c 6e20 2028 7365 bda list:\n (se │ │ │ -00009270: 636f 6e64 2058 295c 6e5c 6e22 5d20 7468 cond X)\n\n"] th │ │ │ -00009280: 6972 6420 235b 2878 2920 22c4 c521 1bc4 ird #[(x) "..!.. │ │ │ -00009290: c621 1a0b 4309 435c 6e43 0b19 5c6e 18c7 .!..C.C\nC..\n.. │ │ │ -000092a0: c809 4408 452a c90b 44af 052a 8722 205b ..D.E*..D..*." [ │ │ │ -000092b0: 7374 6f72 6520 7820 2d2d 7374 6f72 652d store x --store- │ │ │ -000092c0: 2d74 656d 702d 2d20 2d2d 782d 2d74 656d -temp-- --x--tem │ │ │ -000092d0: 702d 2d20 6765 6e73 796d 2022 2d2d 782d p-- gensym "--x- │ │ │ -000092e0: 2d22 2022 2d2d 7374 6f72 652d 2d22 2073 -" "--store--" s │ │ │ -000092f0: 6574 6361 7220 6364 6472 2074 6869 7264 etcar cddr third │ │ │ -00009300: 5d20 3620 225c 6e43 6f6d 6d6f 6e20 4c69 ] 6 "\nCommon Li │ │ │ -00009310: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -00009320: 6e20 2028 7468 6972 6420 5829 5c6e 5c6e n (third X)\n\n │ │ │ -00009330: 225d 2066 6f75 7274 6820 235b 2878 2920 "] fourth #[(x) │ │ │ -00009340: 22c4 c521 1bc4 c621 1a0b 4309 435c 6e43 "..!...!..C.C\nC │ │ │ -00009350: 0b19 5c6e 18c7 c809 4408 452a c90b 44af ..\n....D.E*..D. │ │ │ -00009360: 052a 8722 205b 7374 6f72 6520 7820 2d2d .*." [store x -- │ │ │ -00009370: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ -00009380: 782d 2d74 656d 702d 2d20 6765 6e73 796d x--temp-- gensym │ │ │ -00009390: 2022 2d2d 782d 2d22 2022 2d2d 7374 6f72 "--x--" "--stor │ │ │ -000093a0: 652d 2d22 2073 6574 6361 7220 6364 6464 e--" setcar cddd │ │ │ -000093b0: 7220 666f 7572 7468 5d20 3620 225c 6e43 r fourth] 6 "\nC │ │ │ -000093c0: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ -000093d0: 6120 6c69 7374 3a5c 6e20 2028 666f 7572 a list:\n (four │ │ │ -000093e0: 7468 2058 295c 6e5c 6e22 5d20 6669 6674 th X)\n\n"] fift │ │ │ -000093f0: 6820 235b 2878 2920 22c4 c521 1bc4 c621 h #[(x) "..!...! │ │ │ -00009400: 1a0b 4309 435c 6e43 0b19 5c6e 18c7 c8c9 ..C.C\nC..\n.... │ │ │ -00009410: 0945 0845 2aca 0b44 af05 2a87 2220 5b73 .E.E*..D..*." [s │ │ │ -00009420: 746f 7265 2078 202d 2d73 746f 7265 2d2d tore x --store-- │ │ │ -00009430: 7465 6d70 2d2d 202d 2d78 2d2d 7465 6d70 temp-- --x--temp │ │ │ -00009440: 2d2d 2067 656e 7379 6d20 222d 2d78 2d2d -- gensym "--x-- │ │ │ -00009450: 2220 222d 2d73 746f 7265 2d2d 2220 7365 " "--store--" se │ │ │ -00009460: 7463 6172 206e 7468 6364 7220 3420 6669 tcar nthcdr 4 fi │ │ │ -00009470: 6674 685d 2037 2022 5c6e 436f 6d6d 6f6e fth] 7 "\nCommon │ │ │ -00009480: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -00009490: 743a 5c6e 2020 2866 6966 7468 2058 295c t:\n (fifth X)\ │ │ │ -000094a0: 6e5c 6e22 5d20 7369 7874 6820 235b 2878 n\n"] sixth #[(x │ │ │ -000094b0: 2920 22c4 c521 1bc4 c621 1a0b 4309 435c ) "..!...!..C.C\ │ │ │ -000094c0: 6e43 0b19 5c6e 18c7 c8c9 0945 0845 2aca nC..\n.....E.E*. │ │ │ -000094d0: 0b44 af05 2a87 2220 5b73 746f 7265 2078 .D..*." [store x │ │ │ -000094e0: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ -000094f0: 202d 2d78 2d2d 7465 6d70 2d2d 2067 656e --x--temp-- gen │ │ │ -00009500: 7379 6d20 222d 2d78 2d2d 2220 222d 2d73 sym "--x--" "--s │ │ │ -00009510: 746f 7265 2d2d 2220 7365 7463 6172 206e tore--" setcar n │ │ │ -00009520: 7468 6364 7220 3520 7369 7874 685d 2037 thcdr 5 sixth] 7 │ │ │ -00009530: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -00009540: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -00009550: 2873 6978 7468 2058 295c 6e5c 6e22 5d20 (sixth X)\n\n"] │ │ │ -00009560: 7365 7665 6e74 6820 235b 2878 2920 22c4 seventh #[(x) ". │ │ │ -00009570: c521 1bc4 c621 1a0b 4309 435c 6e43 0b19 .!...!..C.C\nC.. │ │ │ -00009580: 5c6e 18c7 c8c9 0945 0845 2aca 0b44 af05 \n.....E.E*..D.. │ │ │ -00009590: 2a87 2220 5b73 746f 7265 2078 202d 2d73 *." [store x --s │ │ │ -000095a0: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d78 tore--temp-- --x │ │ │ -000095b0: 2d2d 7465 6d70 2d2d 2067 656e 7379 6d20 --temp-- gensym │ │ │ -000095c0: 222d 2d78 2d2d 2220 222d 2d73 746f 7265 "--x--" "--store │ │ │ -000095d0: 2d2d 2220 7365 7463 6172 206e 7468 6364 --" setcar nthcd │ │ │ -000095e0: 7220 3620 7365 7665 6e74 685d 2037 2022 r 6 seventh] 7 " │ │ │ -000095f0: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -00009600: 6d62 6461 206c 6973 743a 5c6e 2020 2873 mbda list:\n (s │ │ │ -00009610: 6576 656e 7468 2058 295c 6e5c 6e22 5d20 eventh X)\n\n"] │ │ │ -00009620: 6569 6768 7468 2023 5b28 7829 2022 c4c5 eighth #[(x) ".. │ │ │ -00009630: 211b c4c6 211a 0b43 0943 5c6e 430b 195c !...!..C.C\nC..\ │ │ │ -00009640: 6e18 c7c8 c909 4508 452a ca0b 44af 052a n.....E.E*..D..* │ │ │ -00009650: 8722 205b 7374 6f72 6520 7820 2d2d 7374 ." [store x --st │ │ │ -00009660: 6f72 652d 2d74 656d 702d 2d20 2d2d 782d ore--temp-- --x- │ │ │ -00009670: 2d74 656d 702d 2d20 6765 6e73 796d 2022 -temp-- gensym " │ │ │ -00009680: 2d2d 782d 2d22 2022 2d2d 7374 6f72 652d --x--" "--store- │ │ │ -00009690: 2d22 2073 6574 6361 7220 6e74 6863 6472 -" setcar nthcdr │ │ │ -000096a0: 2037 2065 6967 6874 685d 2037 2022 5c6e 7 eighth] 7 "\n │ │ │ -000096b0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -000096c0: 6461 206c 6973 743a 5c6e 2020 2865 6967 da list:\n (eig │ │ │ -000096d0: 6874 6820 5829 5c6e 5c6e 225d 206e 696e hth X)\n\n"] nin │ │ │ -000096e0: 7468 2023 5b28 7829 2022 c4c5 211b c4c6 th #[(x) "..!... │ │ │ -000096f0: 211a 0b43 0943 5c6e 430b 195c 6e18 c7c8 !..C.C\nC..\n... │ │ │ -00009700: c909 4508 452a ca0b 44af 052a 8722 205b ..E.E*..D..*." [ │ │ │ -00009710: 7374 6f72 6520 7820 2d2d 7374 6f72 652d store x --store- │ │ │ -00009720: 2d74 656d 702d 2d20 2d2d 782d 2d74 656d -temp-- --x--tem │ │ │ -00009730: 702d 2d20 6765 6e73 796d 2022 2d2d 782d p-- gensym "--x- │ │ │ -00009740: 2d22 2022 2d2d 7374 6f72 652d 2d22 2073 -" "--store--" s │ │ │ -00009750: 6574 6361 7220 6e74 6863 6472 2038 206e etcar nthcdr 8 n │ │ │ -00009760: 696e 7468 5d20 3720 225c 6e43 6f6d 6d6f inth] 7 "\nCommo │ │ │ -00009770: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ -00009780: 7374 3a5c 6e20 2028 6e69 6e74 6820 5829 st:\n (ninth X) │ │ │ -00009790: 5c6e 5c6e 225d 2074 656e 7468 2023 5b28 \n\n"] tenth #[( │ │ │ -000097a0: 7829 2022 c4c5 211b c4c6 211a 0b43 0943 x) "..!...!..C.C │ │ │ -000097b0: 5c6e 430b 195c 6e18 c7c8 c909 4508 452a \nC..\n.....E.E* │ │ │ -000097c0: ca0b 44af 052a 8722 205b 7374 6f72 6520 ..D..*." [store │ │ │ -000097d0: 7820 2d2d 7374 6f72 652d 2d74 656d 702d x --store--temp- │ │ │ -000097e0: 2d20 2d2d 782d 2d74 656d 702d 2d20 6765 - --x--temp-- ge │ │ │ -000097f0: 6e73 796d 2022 2d2d 782d 2d22 2022 2d2d nsym "--x--" "-- │ │ │ -00009800: 7374 6f72 652d 2d22 2073 6574 6361 7220 store--" setcar │ │ │ -00009810: 6e74 6863 6472 2039 2074 656e 7468 5d20 nthcdr 9 tenth] │ │ │ -00009820: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ -00009830: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -00009840: 2028 7465 6e74 6820 5829 5c6e 5c6e 225d (tenth X)\n\n"] │ │ │ -00009850: 2072 6573 7420 235b 2826 7265 7374 2061 rest #[(&rest a │ │ │ -00009860: 7267 7329 2022 c4c5 0b5c 221a c5c6 2119 rgs) "...\"...!. │ │ │ -00009870: 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 435c \n..C\n.......C\ │ │ │ -00009880: 222a 42c9 5c6e 42af 052a 8722 205b 7374 "*B.\nB..*." [st │ │ │ -00009890: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ -000098a0: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ -000098b0: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ -000098c0: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ -000098d0: 2220 7365 7463 6472 2061 7070 656e 6420 " setcdr append │ │ │ -000098e0: 7265 7374 5d20 3720 225c 6e43 6f6d 6d6f rest] 7 "\nCommo │ │ │ -000098f0: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ -00009900: 7374 3a5c 6e20 2028 7265 7374 2026 7265 st:\n (rest &re │ │ │ -00009910: 7374 2041 5247 5329 5c6e 5c6e 225d 2062 st ARGS)\n\n"] b │ │ │ -00009920: 7566 6665 722d 6669 6c65 2d6e 616d 6520 uffer-file-name │ │ │ -00009930: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ -00009940: c4c5 0b5c 221a c5c6 2119 5c6e 0b09 435c ...\"...!.\n..C\ │ │ │ -00009950: 6e1b 0918 c7c8 c90b 0843 5c22 4208 452a n........C\"B.E* │ │ │ -00009960: ca5c 6e42 af05 2a87 2220 5b73 746f 7265 .\nB..*." [store │ │ │ -00009970: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ -00009980: 202d 2d61 7267 732d 2d74 656d 702d 2d20 --args--temp-- │ │ │ -00009990: 6172 6773 206d 6170 6361 7220 6765 6e73 args mapcar gens │ │ │ -000099a0: 796d 2022 2d2d 7374 6f72 652d 2d22 2070 ym "--store--" p │ │ │ -000099b0: 726f 676e 2073 6574 2d76 6973 6974 6564 rogn set-visited │ │ │ -000099c0: 2d66 696c 652d 6e61 6d65 2061 7070 656e -file-name appen │ │ │ -000099d0: 6420 6275 6666 6572 2d66 696c 652d 6e61 d buffer-file-na │ │ │ -000099e0: 6d65 5d20 3820 225c 6e43 6f6d 6d6f 6e20 me] 8 "\nCommon │ │ │ -000099f0: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ -00009a00: 3a5c 6e20 2028 6275 6666 6572 2d66 696c :\n (buffer-fil │ │ │ -00009a10: 652d 6e61 6d65 2026 7265 7374 2041 5247 e-name &rest ARG │ │ │ -00009a20: 5329 5c6e 5c6e 225d 2062 7566 6665 722d S)\n\n"] buffer- │ │ │ -00009a30: 6d6f 6469 6669 6564 2d70 2023 5b28 2672 modified-p #[(&r │ │ │ -00009a40: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ -00009a50: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ -00009a60: c8c9 0b08 435c 2242 0845 2aca 5c6e 42af ....C\"B.E*.\nB. │ │ │ -00009a70: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ -00009a80: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ -00009a90: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ -00009aa0: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ -00009ab0: 2d73 746f 7265 2d2d 2220 7072 6f67 6e20 -store--" progn │ │ │ -00009ac0: 7365 742d 6275 6666 6572 2d6d 6f64 6966 set-buffer-modif │ │ │ -00009ad0: 6965 642d 7020 6170 7065 6e64 2062 7566 ied-p append buf │ │ │ -00009ae0: 6665 722d 6d6f 6469 6669 6564 2d70 5d20 fer-modified-p] │ │ │ -00009af0: 3820 225c 6e43 6f6d 6d6f 6e20 4c69 7370 8 "\nCommon Lisp │ │ │ -00009b00: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -00009b10: 2028 6275 6666 6572 2d6d 6f64 6966 6965 (buffer-modifie │ │ │ -00009b20: 642d 7020 2672 6573 7420 4152 4753 295c d-p &rest ARGS)\ │ │ │ -00009b30: 6e5c 6e22 5d20 6275 6666 6572 2d6e 616d n\n"] buffer-nam │ │ │ -00009b40: 6520 235b 2826 7265 7374 2061 7267 7329 e #[(&rest args) │ │ │ -00009b50: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ -00009b60: 435c 6e1b 0918 c7c8 c90b 0843 5c22 4208 C\n........C\"B. │ │ │ -00009b70: 452a ca5c 6e42 af05 2a87 2220 5b73 746f E*.\nB..*." [sto │ │ │ -00009b80: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ -00009b90: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ -00009ba0: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ -00009bb0: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ -00009bc0: 2070 726f 676e 2072 656e 616d 652d 6275 progn rename-bu │ │ │ -00009bd0: 6666 6572 2061 7070 656e 6420 6275 6666 ffer append buff │ │ │ -00009be0: 6572 2d6e 616d 655d 2038 2022 5c6e 436f er-name] 8 "\nCo │ │ │ -00009bf0: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ -00009c00: 206c 6973 743a 5c6e 2020 2862 7566 6665 list:\n (buffe │ │ │ -00009c10: 722d 6e61 6d65 2026 7265 7374 2041 5247 r-name &rest ARG │ │ │ -00009c20: 5329 5c6e 5c6e 225d 2062 7566 6665 722d S)\n\n"] buffer- │ │ │ -00009c30: 7374 7269 6e67 2023 5b6e 696c 2022 c2c3 string #[nil ".. │ │ │ -00009c40: 2119 c489 0943 0918 c5c6 c708 4445 29c8 !....C......DE). │ │ │ -00009c50: 43af 0529 8722 205b 7374 6f72 6520 2d2d C..)." [store -- │ │ │ -00009c60: 7374 6f72 652d 2d74 656d 702d 2d20 6765 store--temp-- ge │ │ │ -00009c70: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ -00009c80: 206e 696c 2070 726f 676e 2028 6572 6173 nil progn (eras │ │ │ -00009c90: 652d 6275 6666 6572 2920 696e 7365 7274 e-buffer) insert │ │ │ -00009ca0: 2062 7566 6665 722d 7374 7269 6e67 5d20 buffer-string] │ │ │ -00009cb0: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ -00009cc0: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -00009cd0: 2028 6275 6666 6572 2d73 7472 696e 6729 (buffer-string) │ │ │ -00009ce0: 5c6e 5c6e 225d 2062 7566 6665 722d 7375 \n\n"] buffer-su │ │ │ -00009cf0: 6273 7472 696e 6720 235b 2826 7265 7374 bstring #[(&rest │ │ │ -00009d00: 2061 7267 7329 2022 c4c5 0b5c 221a c5c6 args) "...\"... │ │ │ -00009d10: 2119 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 !.\n..C\n....... │ │ │ -00009d20: 435c 222a 42c9 5c6e 42af 052a 8722 205b C\"*B.\nB..*." [ │ │ │ -00009d30: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ -00009d40: 656d 702d 2d20 2d2d 6172 6773 2d2d 7465 emp-- --args--te │ │ │ -00009d50: 6d70 2d2d 2061 7267 7320 6d61 7063 6172 mp-- args mapcar │ │ │ -00009d60: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ -00009d70: 2d2d 2220 636c 2d73 6574 2d62 7566 6665 --" cl-set-buffe │ │ │ -00009d80: 722d 7375 6273 7472 696e 6720 6170 7065 r-substring appe │ │ │ -00009d90: 6e64 2062 7566 6665 722d 7375 6273 7472 nd buffer-substr │ │ │ -00009da0: 696e 675d 2037 2022 5c6e 436f 6d6d 6f6e ing] 7 "\nCommon │ │ │ -00009db0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -00009dc0: 743a 5c6e 2020 2862 7566 6665 722d 7375 t:\n (buffer-su │ │ │ -00009dd0: 6273 7472 696e 6720 2672 6573 7420 4152 bstring &rest AR │ │ │ -00009de0: 4753 295c 6e5c 6e22 5d20 6375 7272 656e GS)\n\n"] curren │ │ │ -00009df0: 742d 6275 6666 6572 2023 5b28 2672 6573 t-buffer #[(&res │ │ │ -00009e00: 7420 6172 6773 2920 22c4 c50b 5c22 1ac5 t args) "...\".. │ │ │ -00009e10: c621 195c 6e0b 0943 5c6e 1b09 18c7 c80b .!.\n..C\n...... │ │ │ -00009e20: 0843 5c22 2a42 c95c 6e42 af05 2a87 2220 .C\"*B.\nB..*." │ │ │ -00009e30: 5b73 746f 7265 202d 2d73 746f 7265 2d2d [store --store-- │ │ │ -00009e40: 7465 6d70 2d2d 202d 2d61 7267 732d 2d74 temp-- --args--t │ │ │ -00009e50: 656d 702d 2d20 6172 6773 206d 6170 6361 emp-- args mapca │ │ │ -00009e60: 7220 6765 6e73 796d 2022 2d2d 7374 6f72 r gensym "--stor │ │ │ -00009e70: 652d 2d22 2073 6574 2d62 7566 6665 7220 e--" set-buffer │ │ │ -00009e80: 6170 7065 6e64 2063 7572 7265 6e74 2d62 append current-b │ │ │ -00009e90: 7566 6665 725d 2037 2022 5c6e 436f 6d6d uffer] 7 "\nComm │ │ │ -00009ea0: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ -00009eb0: 6973 743a 5c6e 2020 2863 7572 7265 6e74 ist:\n (current │ │ │ -00009ec0: 2d62 7566 6665 7220 2672 6573 7420 4152 -buffer &rest AR │ │ │ -00009ed0: 4753 295c 6e5c 6e22 5d20 6375 7272 656e GS)\n\n"] curren │ │ │ -00009ee0: 742d 6361 7365 2d74 6162 6c65 2023 5b28 t-case-table #[( │ │ │ -00009ef0: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ -00009f00: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ -00009f10: 18c7 c80b 0843 5c22 2a42 c95c 6e42 af05 .....C\"*B.\nB.. │ │ │ -00009f20: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -00009f30: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -00009f40: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -00009f50: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -00009f60: 7374 6f72 652d 2d22 2073 6574 2d63 6173 store--" set-cas │ │ │ -00009f70: 652d 7461 626c 6520 6170 7065 6e64 2063 e-table append c │ │ │ -00009f80: 7572 7265 6e74 2d63 6173 652d 7461 626c urrent-case-tabl │ │ │ -00009f90: 655d 2037 2022 5c6e 436f 6d6d 6f6e 204c e] 7 "\nCommon L │ │ │ -00009fa0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ -00009fb0: 5c6e 2020 2863 7572 7265 6e74 2d63 6173 \n (current-cas │ │ │ -00009fc0: 652d 7461 626c 6520 2672 6573 7420 4152 e-table &rest AR │ │ │ -00009fd0: 4753 295c 6e5c 6e22 5d20 6375 7272 656e GS)\n\n"] curren │ │ │ -00009fe0: 742d 636f 6c75 6d6e 2023 5b28 2672 6573 t-column #[(&res │ │ │ -00009ff0: 7420 6172 6773 2920 22c4 c50b 5c22 1ac5 t args) "...\".. │ │ │ -0000a000: c621 195c 6e0b 0943 5c6e 1b09 18c7 c8c9 .!.\n..C\n...... │ │ │ -0000a010: 0b08 435c 2242 0845 2aca 5c6e 42af 052a ..C\"B.E*.\nB..* │ │ │ -0000a020: 8722 205b 7374 6f72 6520 2d2d 7374 6f72 ." [store --stor │ │ │ -0000a030: 652d 2d74 656d 702d 2d20 2d2d 6172 6773 e--temp-- --args │ │ │ -0000a040: 2d2d 7465 6d70 2d2d 2061 7267 7320 6d61 --temp-- args ma │ │ │ -0000a050: 7063 6172 2067 656e 7379 6d20 222d 2d73 pcar gensym "--s │ │ │ -0000a060: 746f 7265 2d2d 2220 7072 6f67 6e20 6d6f tore--" progn mo │ │ │ -0000a070: 7665 2d74 6f2d 636f 6c75 6d6e 2061 7070 ve-to-column app │ │ │ -0000a080: 656e 6420 6375 7272 656e 742d 636f 6c75 end current-colu │ │ │ -0000a090: 6d6e 5d20 3820 225c 6e43 6f6d 6d6f 6e20 mn] 8 "\nCommon │ │ │ -0000a0a0: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ -0000a0b0: 3a5c 6e20 2028 6375 7272 656e 742d 636f :\n (current-co │ │ │ -0000a0c0: 6c75 6d6e 2026 7265 7374 2041 5247 5329 lumn &rest ARGS) │ │ │ -0000a0d0: 5c6e 5c6e 225d 2063 7572 7265 6e74 2d67 \n\n"] current-g │ │ │ -0000a0e0: 6c6f 6261 6c2d 6d61 7020 235b 2826 7265 lobal-map #[(&re │ │ │ -0000a0f0: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000a100: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000a110: c90b 0843 5c22 4208 452a ca5c 6e42 af05 ...C\"B.E*.\nB.. │ │ │ -0000a120: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -0000a130: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -0000a140: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -0000a150: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -0000a160: 7374 6f72 652d 2d22 2070 726f 676e 2075 store--" progn u │ │ │ -0000a170: 7365 2d67 6c6f 6261 6c2d 6d61 7020 6170 se-global-map ap │ │ │ -0000a180: 7065 6e64 2063 7572 7265 6e74 2d67 6c6f pend current-glo │ │ │ -0000a190: 6261 6c2d 6d61 705d 2038 2022 5c6e 436f bal-map] 8 "\nCo │ │ │ -0000a1a0: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ -0000a1b0: 206c 6973 743a 5c6e 2020 2863 7572 7265 list:\n (curre │ │ │ -0000a1c0: 6e74 2d67 6c6f 6261 6c2d 6d61 7020 2672 nt-global-map &r │ │ │ -0000a1d0: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ -0000a1e0: 6375 7272 656e 742d 696e 7075 742d 6d6f current-input-mo │ │ │ -0000a1f0: 6465 2023 5b6e 696c 2022 c2c3 2119 c489 de #[nil "..!... │ │ │ -0000a200: 0943 0918 c5c6 c708 4508 4529 c843 af05 .C......E.E).C.. │ │ │ -0000a210: 2987 2220 5b73 746f 7265 202d 2d73 746f )." [store --sto │ │ │ -0000a220: 7265 2d2d 7465 6d70 2d2d 2067 656e 7379 re--temp-- gensy │ │ │ -0000a230: 6d20 222d 2d73 746f 7265 2d2d 2220 6e69 m "--store--" ni │ │ │ -0000a240: 6c20 7072 6f67 6e20 6170 706c 7920 7365 l progn apply se │ │ │ -0000a250: 742d 696e 7075 742d 6d6f 6465 2063 7572 t-input-mode cur │ │ │ -0000a260: 7265 6e74 2d69 6e70 7574 2d6d 6f64 655d rent-input-mode] │ │ │ -0000a270: 2037 2022 5c6e 436f 6d6d 6f6e 204c 6973 7 "\nCommon Lis │ │ │ -0000a280: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ -0000a290: 2020 2863 7572 7265 6e74 2d69 6e70 7574 (current-input │ │ │ -0000a2a0: 2d6d 6f64 6529 5c6e 5c6e 225d 2063 7572 -mode)\n\n"] cur │ │ │ -0000a2b0: 7265 6e74 2d6c 6f63 616c 2d6d 6170 2023 rent-local-map # │ │ │ -0000a2c0: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ -0000a2d0: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ -0000a2e0: 1b09 18c7 c8c9 0b08 435c 2242 0845 2aca ........C\"B.E*. │ │ │ -0000a2f0: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ -0000a300: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ -0000a310: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ -0000a320: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ -0000a330: 6d20 222d 2d73 746f 7265 2d2d 2220 7072 m "--store--" pr │ │ │ -0000a340: 6f67 6e20 7573 652d 6c6f 6361 6c2d 6d61 ogn use-local-ma │ │ │ -0000a350: 7020 6170 7065 6e64 2063 7572 7265 6e74 p append current │ │ │ -0000a360: 2d6c 6f63 616c 2d6d 6170 5d20 3820 225c -local-map] 8 "\ │ │ │ -0000a370: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ -0000a380: 6264 6120 6c69 7374 3a5c 6e20 2028 6375 bda list:\n (cu │ │ │ -0000a390: 7272 656e 742d 6c6f 6361 6c2d 6d61 7020 rrent-local-map │ │ │ -0000a3a0: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ -0000a3b0: 5d20 6375 7272 656e 742d 7769 6e64 6f77 ] current-window │ │ │ -0000a3c0: 2d63 6f6e 6669 6775 7261 7469 6f6e 2023 -configuration # │ │ │ -0000a3d0: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ -0000a3e0: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ -0000a3f0: 1b09 18c7 c8c9 0b08 435c 2242 0845 2aca ........C\"B.E*. │ │ │ -0000a400: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ -0000a410: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ -0000a420: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ -0000a430: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ -0000a440: 6d20 222d 2d73 746f 7265 2d2d 2220 7072 m "--store--" pr │ │ │ -0000a450: 6f67 6e20 7365 742d 7769 6e64 6f77 2d63 ogn set-window-c │ │ │ -0000a460: 6f6e 6669 6775 7261 7469 6f6e 2061 7070 onfiguration app │ │ │ -0000a470: 656e 6420 6375 7272 656e 742d 7769 6e64 end current-wind │ │ │ -0000a480: 6f77 2d63 6f6e 6669 6775 7261 7469 6f6e ow-configuration │ │ │ -0000a490: 5d20 3820 225c 6e43 6f6d 6d6f 6e20 4c69 ] 8 "\nCommon Li │ │ │ -0000a4a0: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -0000a4b0: 6e20 2028 6375 7272 656e 742d 7769 6e64 n (current-wind │ │ │ -0000a4c0: 6f77 2d63 6f6e 6669 6775 7261 7469 6f6e ow-configuration │ │ │ -0000a4d0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ -0000a4e0: 225d 2064 6566 6175 6c74 2d66 696c 652d "] default-file- │ │ │ -0000a4f0: 6d6f 6465 7320 235b 2826 7265 7374 2061 modes #[(&rest a │ │ │ -0000a500: 7267 7329 2022 c4c5 0b5c 221a c5c6 2119 rgs) "...\"...!. │ │ │ -0000a510: 5c6e 0b09 435c 6e1b 0918 c7c8 c90b 0843 \n..C\n........C │ │ │ -0000a520: 5c22 4208 452a ca5c 6e42 af05 2a87 2220 \"B.E*.\nB..*." │ │ │ -0000a530: 5b73 746f 7265 202d 2d73 746f 7265 2d2d [store --store-- │ │ │ -0000a540: 7465 6d70 2d2d 202d 2d61 7267 732d 2d74 temp-- --args--t │ │ │ -0000a550: 656d 702d 2d20 6172 6773 206d 6170 6361 emp-- args mapca │ │ │ -0000a560: 7220 6765 6e73 796d 2022 2d2d 7374 6f72 r gensym "--stor │ │ │ -0000a570: 652d 2d22 2070 726f 676e 2073 6574 2d64 e--" progn set-d │ │ │ -0000a580: 6566 6175 6c74 2d66 696c 652d 6d6f 6465 efault-file-mode │ │ │ -0000a590: 7320 6170 7065 6e64 2064 6566 6175 6c74 s append default │ │ │ -0000a5a0: 2d66 696c 652d 6d6f 6465 735d 2038 2022 -file-modes] 8 " │ │ │ -0000a5b0: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -0000a5c0: 6d62 6461 206c 6973 743a 5c6e 2020 2864 mbda list:\n (d │ │ │ -0000a5d0: 6566 6175 6c74 2d66 696c 652d 6d6f 6465 efault-file-mode │ │ │ -0000a5e0: 7320 2672 6573 7420 4152 4753 295c 6e5c s &rest ARGS)\n\ │ │ │ -0000a5f0: 6e22 5d20 6465 6661 756c 742d 7661 6c75 n"] default-valu │ │ │ -0000a600: 6520 235b 2826 7265 7374 2061 7267 7329 e #[(&rest args) │ │ │ -0000a610: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ -0000a620: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ -0000a630: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ -0000a640: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ -0000a650: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ -0000a660: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ -0000a670: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ -0000a680: 742d 6465 6661 756c 7420 6170 7065 6e64 t-default append │ │ │ -0000a690: 2064 6566 6175 6c74 2d76 616c 7565 5d20 default-value] │ │ │ -0000a6a0: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ -0000a6b0: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -0000a6c0: 2028 6465 6661 756c 742d 7661 6c75 6520 (default-value │ │ │ -0000a6d0: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ -0000a6e0: 5d20 646f 6375 6d65 6e74 6174 696f 6e2d ] documentation- │ │ │ -0000a6f0: 7072 6f70 6572 7479 2023 5b28 2672 6573 property #[(&res │ │ │ -0000a700: 7420 6172 6773 2920 22c4 c50b 5c22 1ac5 t args) "...\".. │ │ │ -0000a710: c621 195c 6e0b 0943 5c6e 1b09 18c7 c80b .!.\n..C\n...... │ │ │ -0000a720: 0843 5c22 2a42 c95c 6e42 af05 2a87 2220 .C\"*B.\nB..*." │ │ │ -0000a730: 5b73 746f 7265 202d 2d73 746f 7265 2d2d [store --store-- │ │ │ -0000a740: 7465 6d70 2d2d 202d 2d61 7267 732d 2d74 temp-- --args--t │ │ │ -0000a750: 656d 702d 2d20 6172 6773 206d 6170 6361 emp-- args mapca │ │ │ -0000a760: 7220 6765 6e73 796d 2022 2d2d 7374 6f72 r gensym "--stor │ │ │ -0000a770: 652d 2d22 2070 7574 2061 7070 656e 6420 e--" put append │ │ │ -0000a780: 646f 6375 6d65 6e74 6174 696f 6e2d 7072 documentation-pr │ │ │ -0000a790: 6f70 6572 7479 5d20 3720 225c 6e43 6f6d operty] 7 "\nCom │ │ │ -0000a7a0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -0000a7b0: 6c69 7374 3a5c 6e20 2028 646f 6375 6d65 list:\n (docume │ │ │ -0000a7c0: 6e74 6174 696f 6e2d 7072 6f70 6572 7479 ntation-property │ │ │ -0000a7d0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ -0000a7e0: 225d 2065 7874 656e 742d 6661 6365 2023 "] extent-face # │ │ │ -0000a7f0: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ -0000a800: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ -0000a810: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ -0000a820: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ -0000a830: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ -0000a840: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ -0000a850: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ -0000a860: 2d2d 7374 6f72 652d 2d22 2073 6574 2d65 --store--" set-e │ │ │ -0000a870: 7874 656e 742d 6661 6365 2061 7070 656e xtent-face appen │ │ │ -0000a880: 6420 6578 7465 6e74 2d66 6163 655d 2037 d extent-face] 7 │ │ │ -0000a890: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -0000a8a0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -0000a8b0: 2865 7874 656e 742d 6661 6365 2026 7265 (extent-face &re │ │ │ -0000a8c0: 7374 2041 5247 5329 5c6e 5c6e 225d 2065 st ARGS)\n\n"] e │ │ │ -0000a8d0: 7874 656e 742d 7072 696f 7269 7479 2023 xtent-priority # │ │ │ -0000a8e0: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ -0000a8f0: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ -0000a900: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ -0000a910: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ -0000a920: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ -0000a930: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ -0000a940: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ -0000a950: 2d2d 7374 6f72 652d 2d22 2073 6574 2d65 --store--" set-e │ │ │ -0000a960: 7874 656e 742d 7072 696f 7269 7479 2061 xtent-priority a │ │ │ -0000a970: 7070 656e 6420 6578 7465 6e74 2d70 7269 ppend extent-pri │ │ │ -0000a980: 6f72 6974 795d 2037 2022 5c6e 436f 6d6d ority] 7 "\nComm │ │ │ -0000a990: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ -0000a9a0: 6973 743a 5c6e 2020 2865 7874 656e 742d ist:\n (extent- │ │ │ -0000a9b0: 7072 696f 7269 7479 2026 7265 7374 2041 priority &rest A │ │ │ -0000a9c0: 5247 5329 5c6e 5c6e 225d 2065 7874 656e RGS)\n\n"] exten │ │ │ -0000a9d0: 742d 7072 6f70 6572 7479 2023 5b28 7820 t-property #[(x │ │ │ -0000a9e0: 7920 266f 7074 696f 6e61 6c20 6967 6e6f y &optional igno │ │ │ -0000a9f0: 7265 642d 6172 6729 2022 c6c7 211d c6c8 red-arg) "..!... │ │ │ -0000aa00: 211c c6c9 211b c6ca 211a 0d0c 0b45 0908 !...!...!....E.. │ │ │ -0000aa10: 0e0d 455c 6e43 0d19 0c18 0b1e 0d5c 6e1e ..E\nC.......\n. │ │ │ -0000aa20: 0ecb 0908 0e0e 462c cc0d 0c0b 46af 052c ......F,....F.., │ │ │ -0000aa30: 8722 205b 7920 7820 2d2d 6172 672d 2d74 ." [y x --arg--t │ │ │ -0000aa40: 656d 702d 2d20 2d2d 6967 6e6f 7265 642d emp-- --ignored- │ │ │ -0000aa50: 6172 672d 2d74 656d 702d 2d20 2d2d 792d arg--temp-- --y- │ │ │ -0000aa60: 2d74 656d 702d 2d20 2d2d 782d 2d74 656d -temp-- --x--tem │ │ │ -0000aa70: 702d 2d20 6765 6e73 796d 2022 2d2d 782d p-- gensym "--x- │ │ │ -0000aa80: 2d22 2022 2d2d 792d 2d22 2022 2d2d 6967 -" "--y--" "--ig │ │ │ -0000aa90: 6e6f 7265 642d 6172 672d 2d22 2022 2d2d nored-arg--" "-- │ │ │ -0000aaa0: 6172 672d 2d22 2073 6574 2d65 7874 656e arg--" set-exten │ │ │ -0000aab0: 742d 7072 6f70 6572 7479 2065 7874 656e t-property exten │ │ │ -0000aac0: 742d 7072 6f70 6572 7479 2069 676e 6f72 t-property ignor │ │ │ -0000aad0: 6564 2d61 7267 2061 7267 5d20 3820 225c ed-arg arg] 8 "\ │ │ │ -0000aae0: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ -0000aaf0: 6264 6120 6c69 7374 3a5c 6e20 2028 6578 bda list:\n (ex │ │ │ -0000ab00: 7465 6e74 2d70 726f 7065 7274 7920 5820 tent-property X │ │ │ -0000ab10: 5920 266f 7074 696f 6e61 6c20 4947 4e4f Y &optional IGNO │ │ │ -0000ab20: 5245 442d 4152 4729 5c6e 5c6e 225d 2065 RED-ARG)\n\n"] e │ │ │ -0000ab30: 7874 656e 742d 7374 6172 742d 706f 7369 xtent-start-posi │ │ │ -0000ab40: 7469 6f6e 2023 5b28 6578 7429 2022 c4c5 tion #[(ext) ".. │ │ │ -0000ab50: 211b c4c6 2119 0b43 5c6e 4309 430b 1a09 !...!..C\nC.C... │ │ │ -0000ab60: 18c7 c85c 6e08 c95c 6e44 4608 452a ca0b ...\n..\nDF.E*.. │ │ │ -0000ab70: 44af 052a 8722 205b 7374 6f72 6520 2d2d D..*." [store -- │ │ │ -0000ab80: 7374 6f72 652d 2d74 656d 702d 2d20 6578 store--temp-- ex │ │ │ -0000ab90: 7420 2d2d 6578 742d 2d74 656d 702d 2d20 t --ext--temp-- │ │ │ -0000aba0: 6765 6e73 796d 2022 2d2d 6578 742d 2d22 gensym "--ext--" │ │ │ -0000abb0: 2022 2d2d 7374 6f72 652d 2d22 2070 726f "--store--" pro │ │ │ -0000abc0: 676e 2073 6574 2d65 7874 656e 742d 656e gn set-extent-en │ │ │ -0000abd0: 6470 6f69 6e74 7320 6578 7465 6e74 2d65 dpoints extent-e │ │ │ -0000abe0: 6e64 2d70 6f73 6974 696f 6e20 6578 7465 nd-position exte │ │ │ -0000abf0: 6e74 2d73 7461 7274 2d70 6f73 6974 696f nt-start-positio │ │ │ -0000ac00: 6e5d 2039 2022 5c6e 436f 6d6d 6f6e 204c n] 9 "\nCommon L │ │ │ -0000ac10: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ -0000ac20: 5c6e 2020 2865 7874 656e 742d 7374 6172 \n (extent-star │ │ │ -0000ac30: 742d 706f 7369 7469 6f6e 2045 5854 295c t-position EXT)\ │ │ │ -0000ac40: 6e5c 6e22 5d20 6578 7465 6e74 2d65 6e64 n\n"] extent-end │ │ │ -0000ac50: 2d70 6f73 6974 696f 6e20 235b 2865 7874 -position #[(ext │ │ │ -0000ac60: 2920 22c4 c521 1bc4 c621 190b 435c 6e43 ) "..!...!..C\nC │ │ │ -0000ac70: 0943 0b1a 0918 c7c8 5c6e c95c 6e44 0846 .C......\n.\nD.F │ │ │ -0000ac80: 0845 2aca 0b44 af05 2a87 2220 5b73 746f .E*..D..*." [sto │ │ │ -0000ac90: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ -0000aca0: 2d2d 2065 7874 202d 2d65 7874 2d2d 7465 -- ext --ext--te │ │ │ -0000acb0: 6d70 2d2d 2067 656e 7379 6d20 222d 2d65 mp-- gensym "--e │ │ │ -0000acc0: 7874 2d2d 2220 222d 2d73 746f 7265 2d2d xt--" "--store-- │ │ │ -0000acd0: 2220 7072 6f67 6e20 7365 742d 6578 7465 " progn set-exte │ │ │ -0000ace0: 6e74 2d65 6e64 706f 696e 7473 2065 7874 nt-endpoints ext │ │ │ -0000acf0: 656e 742d 7374 6172 742d 706f 7369 7469 ent-start-positi │ │ │ -0000ad00: 6f6e 2065 7874 656e 742d 656e 642d 706f on extent-end-po │ │ │ -0000ad10: 7369 7469 6f6e 5d20 3820 225c 6e43 6f6d sition] 8 "\nCom │ │ │ -0000ad20: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -0000ad30: 6c69 7374 3a5c 6e20 2028 6578 7465 6e74 list:\n (extent │ │ │ -0000ad40: 2d65 6e64 2d70 6f73 6974 696f 6e20 4558 -end-position EX │ │ │ -0000ad50: 5429 5c6e 5c6e 225d 2066 6163 652d 6261 T)\n\n"] face-ba │ │ │ -0000ad60: 636b 6772 6f75 6e64 2023 5b28 6620 266f ckground #[(f &o │ │ │ -0000ad70: 7074 696f 6e61 6c20 7329 2022 c6c7 211d ptional s) "..!. │ │ │ -0000ad80: c6c8 211c c6c9 211b 0d0c 445c 6e09 440b ..!...!...D\n.D. │ │ │ -0000ad90: 430d 1a0c 190b 18ca 5c6e 0809 462b cb0d C.......\n..F+.. │ │ │ -0000ada0: 0c45 af05 2b87 2220 5b78 2073 2066 202d .E..+." [x s f - │ │ │ -0000adb0: 2d78 2d2d 7465 6d70 2d2d 202d 2d73 2d2d -x--temp-- --s-- │ │ │ -0000adc0: 7465 6d70 2d2d 202d 2d66 2d2d 7465 6d70 temp-- --f--temp │ │ │ -0000add0: 2d2d 2067 656e 7379 6d20 222d 2d66 2d2d -- gensym "--f-- │ │ │ -0000ade0: 2220 222d 2d73 2d2d 2220 222d 2d78 2d2d " "--s--" "--x-- │ │ │ -0000adf0: 2220 7365 742d 6661 6365 2d62 6163 6b67 " set-face-backg │ │ │ -0000ae00: 726f 756e 6420 6661 6365 2d62 6163 6b67 round face-backg │ │ │ -0000ae10: 726f 756e 645d 2037 2022 5c6e 436f 6d6d round] 7 "\nComm │ │ │ -0000ae20: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ -0000ae30: 6973 743a 5c6e 2020 2866 6163 652d 6261 ist:\n (face-ba │ │ │ -0000ae40: 636b 6772 6f75 6e64 2046 2026 6f70 7469 ckground F &opti │ │ │ -0000ae50: 6f6e 616c 2053 295c 6e5c 6e22 5d20 6661 onal S)\n\n"] fa │ │ │ -0000ae60: 6365 2d62 6163 6b67 726f 756e 642d 7069 ce-background-pi │ │ │ -0000ae70: 786d 6170 2023 5b28 6620 266f 7074 696f xmap #[(f &optio │ │ │ -0000ae80: 6e61 6c20 7329 2022 c6c7 211d c6c8 211c nal s) "..!...!. │ │ │ -0000ae90: c6c9 211b 0d0c 445c 6e09 440b 430d 1a0c ..!...D\n.D.C... │ │ │ -0000aea0: 190b 18ca 5c6e 0809 462b cb0d 0c45 af05 ....\n..F+...E.. │ │ │ -0000aeb0: 2b87 2220 5b78 2073 2066 202d 2d78 2d2d +." [x s f --x-- │ │ │ -0000aec0: 7465 6d70 2d2d 202d 2d73 2d2d 7465 6d70 temp-- --s--temp │ │ │ -0000aed0: 2d2d 202d 2d66 2d2d 7465 6d70 2d2d 2067 -- --f--temp-- g │ │ │ -0000aee0: 656e 7379 6d20 222d 2d66 2d2d 2220 222d ensym "--f--" "- │ │ │ -0000aef0: 2d73 2d2d 2220 222d 2d78 2d2d 2220 7365 -s--" "--x--" se │ │ │ -0000af00: 742d 6661 6365 2d62 6163 6b67 726f 756e t-face-backgroun │ │ │ -0000af10: 642d 7069 786d 6170 2066 6163 652d 6261 d-pixmap face-ba │ │ │ -0000af20: 636b 6772 6f75 6e64 2d70 6978 6d61 705d ckground-pixmap] │ │ │ -0000af30: 2037 2022 5c6e 436f 6d6d 6f6e 204c 6973 7 "\nCommon Lis │ │ │ -0000af40: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ -0000af50: 2020 2866 6163 652d 6261 636b 6772 6f75 (face-backgrou │ │ │ -0000af60: 6e64 2d70 6978 6d61 7020 4620 266f 7074 nd-pixmap F &opt │ │ │ -0000af70: 696f 6e61 6c20 5329 5c6e 5c6e 225d 2066 ional S)\n\n"] f │ │ │ -0000af80: 6163 652d 666f 6e74 2023 5b28 6620 266f ace-font #[(f &o │ │ │ -0000af90: 7074 696f 6e61 6c20 7329 2022 c6c7 211d ptional s) "..!. │ │ │ -0000afa0: c6c8 211c c6c9 211b 0d0c 445c 6e09 440b ..!...!...D\n.D. │ │ │ -0000afb0: 430d 1a0c 190b 18ca 5c6e 0809 462b cb0d C.......\n..F+.. │ │ │ -0000afc0: 0c45 af05 2b87 2220 5b78 2073 2066 202d .E..+." [x s f - │ │ │ -0000afd0: 2d78 2d2d 7465 6d70 2d2d 202d 2d73 2d2d -x--temp-- --s-- │ │ │ -0000afe0: 7465 6d70 2d2d 202d 2d66 2d2d 7465 6d70 temp-- --f--temp │ │ │ -0000aff0: 2d2d 2067 656e 7379 6d20 222d 2d66 2d2d -- gensym "--f-- │ │ │ -0000b000: 2220 222d 2d73 2d2d 2220 222d 2d78 2d2d " "--s--" "--x-- │ │ │ -0000b010: 2220 7365 742d 6661 6365 2d66 6f6e 7420 " set-face-font │ │ │ -0000b020: 6661 6365 2d66 6f6e 745d 2037 2022 5c6e face-font] 7 "\n │ │ │ -0000b030: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -0000b040: 6461 206c 6973 743a 5c6e 2020 2866 6163 da list:\n (fac │ │ │ -0000b050: 652d 666f 6e74 2046 2026 6f70 7469 6f6e e-font F &option │ │ │ -0000b060: 616c 2053 295c 6e5c 6e22 5d20 6661 6365 al S)\n\n"] face │ │ │ -0000b070: 2d66 6f72 6567 726f 756e 6420 235b 2866 -foreground #[(f │ │ │ -0000b080: 2026 6f70 7469 6f6e 616c 2073 2920 22c6 &optional s) ". │ │ │ -0000b090: c721 1dc6 c821 1cc6 c921 1b0d 0c44 5c6e .!...!...!...D\n │ │ │ -0000b0a0: 0944 0b43 0d1a 0c19 0b18 ca5c 6e08 0946 .D.C.......\n..F │ │ │ -0000b0b0: 2bcb 0d0c 45af 052b 8722 205b 7820 7320 +...E..+." [x s │ │ │ -0000b0c0: 6620 2d2d 782d 2d74 656d 702d 2d20 2d2d f --x--temp-- -- │ │ │ -0000b0d0: 732d 2d74 656d 702d 2d20 2d2d 662d 2d74 s--temp-- --f--t │ │ │ -0000b0e0: 656d 702d 2d20 6765 6e73 796d 2022 2d2d emp-- gensym "-- │ │ │ -0000b0f0: 662d 2d22 2022 2d2d 732d 2d22 2022 2d2d f--" "--s--" "-- │ │ │ -0000b100: 782d 2d22 2073 6574 2d66 6163 652d 666f x--" set-face-fo │ │ │ -0000b110: 7265 6772 6f75 6e64 2066 6163 652d 666f reground face-fo │ │ │ -0000b120: 7265 6772 6f75 6e64 5d20 3720 225c 6e43 reground] 7 "\nC │ │ │ -0000b130: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ -0000b140: 6120 6c69 7374 3a5c 6e20 2028 6661 6365 a list:\n (face │ │ │ -0000b150: 2d66 6f72 6567 726f 756e 6420 4620 266f -foreground F &o │ │ │ -0000b160: 7074 696f 6e61 6c20 5329 5c6e 5c6e 225d ptional S)\n\n"] │ │ │ -0000b170: 2066 6163 652d 756e 6465 726c 696e 652d face-underline- │ │ │ -0000b180: 7020 235b 2866 2026 6f70 7469 6f6e 616c p #[(f &optional │ │ │ -0000b190: 2073 2920 22c6 c721 1dc6 c821 1cc6 c921 s) "..!...!...! │ │ │ -0000b1a0: 1b0d 0c44 5c6e 0944 0b43 0d1a 0c19 0b18 ...D\n.D.C...... │ │ │ -0000b1b0: ca5c 6e08 0946 2bcb 0d0c 45af 052b 8722 .\n..F+...E..+." │ │ │ -0000b1c0: 205b 7820 7320 6620 2d2d 782d 2d74 656d [x s f --x--tem │ │ │ -0000b1d0: 702d 2d20 2d2d 732d 2d74 656d 702d 2d20 p-- --s--temp-- │ │ │ -0000b1e0: 2d2d 662d 2d74 656d 702d 2d20 6765 6e73 --f--temp-- gens │ │ │ -0000b1f0: 796d 2022 2d2d 662d 2d22 2022 2d2d 732d ym "--f--" "--s- │ │ │ -0000b200: 2d22 2022 2d2d 782d 2d22 2073 6574 2d66 -" "--x--" set-f │ │ │ -0000b210: 6163 652d 756e 6465 726c 696e 652d 7020 ace-underline-p │ │ │ -0000b220: 6661 6365 2d75 6e64 6572 6c69 6e65 2d70 face-underline-p │ │ │ -0000b230: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ -0000b240: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -0000b250: 6e20 2028 6661 6365 2d75 6e64 6572 6c69 n (face-underli │ │ │ -0000b260: 6e65 2d70 2046 2026 6f70 7469 6f6e 616c ne-p F &optional │ │ │ -0000b270: 2053 295c 6e5c 6e22 5d20 6669 6c65 2d6d S)\n\n"] file-m │ │ │ -0000b280: 6f64 6573 2023 5b28 2672 6573 7420 6172 odes #[(&rest ar │ │ │ -0000b290: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ -0000b2a0: 6e0b 0943 5c6e 1b09 18c7 c8c9 0b08 435c n..C\n........C\ │ │ │ -0000b2b0: 2242 0845 2aca 5c6e 42af 052a 8722 205b "B.E*.\nB..*." [ │ │ │ -0000b2c0: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ -0000b2d0: 656d 702d 2d20 2d2d 6172 6773 2d2d 7465 emp-- --args--te │ │ │ -0000b2e0: 6d70 2d2d 2061 7267 7320 6d61 7063 6172 mp-- args mapcar │ │ │ -0000b2f0: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ -0000b300: 2d2d 2220 7072 6f67 6e20 7365 742d 6669 --" progn set-fi │ │ │ -0000b310: 6c65 2d6d 6f64 6573 2061 7070 656e 6420 le-modes append │ │ │ -0000b320: 6669 6c65 2d6d 6f64 6573 5d20 3820 225c file-modes] 8 "\ │ │ │ -0000b330: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ -0000b340: 6264 6120 6c69 7374 3a5c 6e20 2028 6669 bda list:\n (fi │ │ │ -0000b350: 6c65 2d6d 6f64 6573 2026 7265 7374 2041 le-modes &rest A │ │ │ -0000b360: 5247 5329 5c6e 5c6e 225d 2066 7261 6d65 RGS)\n\n"] frame │ │ │ -0000b370: 2d70 6172 616d 6574 6572 7320 235b 2826 -parameters #[(& │ │ │ -0000b380: 7265 7374 2061 7267 7329 2022 c4c5 0b5c rest args) "...\ │ │ │ -0000b390: 221a c5c6 2119 5c6e 0b09 435c 6e1b 0918 "...!.\n..C\n... │ │ │ -0000b3a0: c7c8 c90b 0843 5c22 4208 452a ca5c 6e42 .....C\"B.E*.\nB │ │ │ -0000b3b0: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ -0000b3c0: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ -0000b3d0: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ -0000b3e0: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ -0000b3f0: 2d2d 7374 6f72 652d 2d22 2070 726f 676e --store--" progn │ │ │ -0000b400: 206d 6f64 6966 792d 6672 616d 652d 7061 modify-frame-pa │ │ │ -0000b410: 7261 6d65 7465 7273 2061 7070 656e 6420 rameters append │ │ │ -0000b420: 6672 616d 652d 7061 7261 6d65 7465 7273 frame-parameters │ │ │ -0000b430: 5d20 3820 225c 6e43 6f6d 6d6f 6e20 4c69 ] 8 "\nCommon Li │ │ │ -0000b440: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -0000b450: 6e20 2028 6672 616d 652d 7061 7261 6d65 n (frame-parame │ │ │ -0000b460: 7465 7273 2026 7265 7374 2041 5247 5329 ters &rest ARGS) │ │ │ -0000b470: 5c6e 5c6e 225d 2066 7261 6d65 2d76 6973 \n\n"] frame-vis │ │ │ -0000b480: 6962 6c65 2d70 2023 5b28 2672 6573 7420 ible-p #[(&rest │ │ │ -0000b490: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ -0000b4a0: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ -0000b4b0: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ -0000b4c0: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ -0000b4d0: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ -0000b4e0: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ -0000b4f0: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ -0000b500: 2d22 2063 6c2d 7365 742d 6672 616d 652d -" cl-set-frame- │ │ │ -0000b510: 7669 7369 626c 652d 7020 6170 7065 6e64 visible-p append │ │ │ -0000b520: 2066 7261 6d65 2d76 6973 6962 6c65 2d70 frame-visible-p │ │ │ -0000b530: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ -0000b540: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -0000b550: 6e20 2028 6672 616d 652d 7669 7369 626c n (frame-visibl │ │ │ -0000b560: 652d 7020 2672 6573 7420 4152 4753 295c e-p &rest ARGS)\ │ │ │ -0000b570: 6e5c 6e22 5d20 6672 616d 652d 7072 6f70 n\n"] frame-prop │ │ │ -0000b580: 6572 7469 6573 2023 5b28 266f 7074 696f erties #[(&optio │ │ │ -0000b590: 6e61 6c20 6629 2022 c4c5 211b c4c6 211a nal f) "..!...!. │ │ │ -0000b5a0: 0b43 0943 5c6e 430b 195c 6e18 c7c8 0908 .C.C\nC..\n..... │ │ │ -0000b5b0: 4508 452a c90b 44af 052a 8722 205b 7020 E.E*..D..*." [p │ │ │ -0000b5c0: 6620 2d2d 702d 2d74 656d 702d 2d20 2d2d f --p--temp-- -- │ │ │ -0000b5d0: 662d 2d74 656d 702d 2d20 6765 6e73 796d f--temp-- gensym │ │ │ -0000b5e0: 2022 2d2d 662d 2d22 2022 2d2d 702d 2d22 "--f--" "--p--" │ │ │ -0000b5f0: 2070 726f 676e 2073 6574 2d66 7261 6d65 progn set-frame │ │ │ -0000b600: 2d70 726f 7065 7274 6965 7320 6672 616d -properties fram │ │ │ -0000b610: 652d 7072 6f70 6572 7469 6573 5d20 3720 e-properties] 7 │ │ │ -0000b620: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ -0000b630: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ -0000b640: 6672 616d 652d 7072 6f70 6572 7469 6573 frame-properties │ │ │ -0000b650: 2026 6f70 7469 6f6e 616c 2046 295c 6e5c &optional F)\n\ │ │ │ -0000b660: 6e22 5d20 6672 616d 652d 7072 6f70 6572 n"] frame-proper │ │ │ -0000b670: 7479 2023 5b28 6620 7020 266f 7074 696f ty #[(f p &optio │ │ │ -0000b680: 6e61 6c20 6967 6e6f 7265 642d 6172 6729 nal ignored-arg) │ │ │ -0000b690: 2022 c6c7 211d c6c8 211c c6c9 211b c6ca "..!...!...!... │ │ │ -0000b6a0: 211a 0d0c 0b45 0908 0e0e 455c 6e43 0d19 !....E....E\nC.. │ │ │ -0000b6b0: 0c18 0b1e 0e5c 6e1e 0fcb cc09 0e0f 4508 .....\n.......E. │ │ │ -0000b6c0: 452c cd0d 0c0b 46af 052c 8722 205b 7020 E,....F..,." [p │ │ │ -0000b6d0: 6620 2d2d 762d 2d74 656d 702d 2d20 2d2d f --v--temp-- -- │ │ │ -0000b6e0: 6967 6e6f 7265 642d 6172 672d 2d74 656d ignored-arg--tem │ │ │ -0000b6f0: 702d 2d20 2d2d 702d 2d74 656d 702d 2d20 p-- --p--temp-- │ │ │ -0000b700: 2d2d 662d 2d74 656d 702d 2d20 6765 6e73 --f--temp-- gens │ │ │ -0000b710: 796d 2022 2d2d 662d 2d22 2022 2d2d 702d ym "--f--" "--p- │ │ │ -0000b720: 2d22 2022 2d2d 6967 6e6f 7265 642d 6172 -" "--ignored-ar │ │ │ -0000b730: 672d 2d22 2022 2d2d 762d 2d22 2070 726f g--" "--v--" pro │ │ │ -0000b740: 676e 2073 6574 2d66 7261 6d65 2d70 726f gn set-frame-pro │ │ │ -0000b750: 7065 7274 7920 6672 616d 652d 7072 6f70 perty frame-prop │ │ │ -0000b760: 6572 7479 2069 676e 6f72 6564 2d61 7267 erty ignored-arg │ │ │ -0000b770: 2076 5d20 3820 225c 6e43 6f6d 6d6f 6e20 v] 8 "\nCommon │ │ │ -0000b780: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ -0000b790: 3a5c 6e20 2028 6672 616d 652d 7072 6f70 :\n (frame-prop │ │ │ -0000b7a0: 6572 7479 2046 2050 2026 6f70 7469 6f6e erty F P &option │ │ │ -0000b7b0: 616c 2049 474e 4f52 4544 2d41 5247 295c al IGNORED-ARG)\ │ │ │ -0000b7c0: 6e5c 6e22 5d20 6672 616d 652d 7769 6474 n\n"] frame-widt │ │ │ -0000b7d0: 6820 235b 2826 6f70 7469 6f6e 616c 2066 h #[(&optional f │ │ │ -0000b7e0: 2920 22c4 c521 1bc4 c621 1a0b 4309 435c ) "..!...!..C.C\ │ │ │ -0000b7f0: 6e43 0b19 5c6e 18c7 c809 0845 0845 2ac9 nC..\n.....E.E*. │ │ │ -0000b800: 0b44 af05 2a87 2220 5b76 2066 202d 2d76 .D..*." [v f --v │ │ │ -0000b810: 2d2d 7465 6d70 2d2d 202d 2d66 2d2d 7465 --temp-- --f--te │ │ │ -0000b820: 6d70 2d2d 2067 656e 7379 6d20 222d 2d66 mp-- gensym "--f │ │ │ -0000b830: 2d2d 2220 222d 2d76 2d2d 2220 7072 6f67 --" "--v--" prog │ │ │ -0000b840: 6e20 7365 742d 6672 616d 652d 7769 6474 n set-frame-widt │ │ │ -0000b850: 6820 6672 616d 652d 7769 6474 685d 2037 h frame-width] 7 │ │ │ -0000b860: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -0000b870: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -0000b880: 2866 7261 6d65 2d77 6964 7468 2026 6f70 (frame-width &op │ │ │ -0000b890: 7469 6f6e 616c 2046 295c 6e5c 6e22 5d20 tional F)\n\n"] │ │ │ -0000b8a0: 6672 616d 652d 6865 6967 6874 2023 5b28 frame-height #[( │ │ │ -0000b8b0: 266f 7074 696f 6e61 6c20 6629 2022 c4c5 &optional f) ".. │ │ │ -0000b8c0: 211b c4c6 211a 0b43 0943 5c6e 430b 195c !...!..C.C\nC..\ │ │ │ -0000b8d0: 6e18 c7c8 0908 4508 452a c90b 44af 052a n.....E.E*..D..* │ │ │ -0000b8e0: 8722 205b 7620 6620 2d2d 762d 2d74 656d ." [v f --v--tem │ │ │ -0000b8f0: 702d 2d20 2d2d 662d 2d74 656d 702d 2d20 p-- --f--temp-- │ │ │ -0000b900: 6765 6e73 796d 2022 2d2d 662d 2d22 2022 gensym "--f--" " │ │ │ -0000b910: 2d2d 762d 2d22 2070 726f 676e 2073 6574 --v--" progn set │ │ │ -0000b920: 2d66 7261 6d65 2d68 6569 6768 7420 6672 -frame-height fr │ │ │ -0000b930: 616d 652d 6865 6967 6874 5d20 3720 225c ame-height] 7 "\ │ │ │ -0000b940: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ -0000b950: 6264 6120 6c69 7374 3a5c 6e20 2028 6672 bda list:\n (fr │ │ │ -0000b960: 616d 652d 6865 6967 6874 2026 6f70 7469 ame-height &opti │ │ │ -0000b970: 6f6e 616c 2046 295c 6e5c 6e22 5d20 6375 onal F)\n\n"] cu │ │ │ -0000b980: 7272 656e 742d 6672 616d 652d 636f 6e66 rrent-frame-conf │ │ │ -0000b990: 6967 7572 6174 696f 6e20 235b 2826 7265 iguration #[(&re │ │ │ -0000b9a0: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000b9b0: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000b9c0: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ -0000b9d0: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -0000b9e0: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -0000b9f0: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -0000ba00: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -0000ba10: 7265 2d2d 2220 7365 742d 6672 616d 652d re--" set-frame- │ │ │ -0000ba20: 636f 6e66 6967 7572 6174 696f 6e20 6170 configuration ap │ │ │ -0000ba30: 7065 6e64 2063 7572 7265 6e74 2d66 7261 pend current-fra │ │ │ -0000ba40: 6d65 2d63 6f6e 6669 6775 7261 7469 6f6e me-configuration │ │ │ -0000ba50: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ -0000ba60: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -0000ba70: 6e20 2028 6375 7272 656e 742d 6672 616d n (current-fram │ │ │ -0000ba80: 652d 636f 6e66 6967 7572 6174 696f 6e20 e-configuration │ │ │ -0000ba90: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ -0000baa0: 5d20 7365 6c65 6374 6564 2d63 6f6e 736f ] selected-conso │ │ │ -0000bab0: 6c65 2023 5b28 2672 6573 7420 6172 6773 le #[(&rest args │ │ │ -0000bac0: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ -0000bad0: 0943 5c6e 1b09 18c7 c8c9 0b08 435c 2242 .C\n........C\"B │ │ │ -0000bae0: 0845 2aca 5c6e 42af 052a 8722 205b 7374 .E*.\nB..*." [st │ │ │ -0000baf0: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ -0000bb00: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ -0000bb10: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ -0000bb20: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ -0000bb30: 2220 7072 6f67 6e20 7365 6c65 6374 2d63 " progn select-c │ │ │ -0000bb40: 6f6e 736f 6c65 2061 7070 656e 6420 7365 onsole append se │ │ │ -0000bb50: 6c65 6374 6564 2d63 6f6e 736f 6c65 5d20 lected-console] │ │ │ -0000bb60: 3820 225c 6e43 6f6d 6d6f 6e20 4c69 7370 8 "\nCommon Lisp │ │ │ -0000bb70: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -0000bb80: 2028 7365 6c65 6374 6564 2d63 6f6e 736f (selected-conso │ │ │ -0000bb90: 6c65 2026 7265 7374 2041 5247 5329 5c6e le &rest ARGS)\n │ │ │ -0000bba0: 5c6e 225d 2073 656c 6563 7465 642d 6465 \n"] selected-de │ │ │ -0000bbb0: 7669 6365 2023 5b28 2672 6573 7420 6172 vice #[(&rest ar │ │ │ -0000bbc0: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ -0000bbd0: 6e0b 0943 5c6e 1b09 18c7 c8c9 0b08 435c n..C\n........C\ │ │ │ -0000bbe0: 2242 0845 2aca 5c6e 42af 052a 8722 205b "B.E*.\nB..*." [ │ │ │ -0000bbf0: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ -0000bc00: 656d 702d 2d20 2d2d 6172 6773 2d2d 7465 emp-- --args--te │ │ │ -0000bc10: 6d70 2d2d 2061 7267 7320 6d61 7063 6172 mp-- args mapcar │ │ │ -0000bc20: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ -0000bc30: 2d2d 2220 7072 6f67 6e20 7365 6c65 6374 --" progn select │ │ │ -0000bc40: 2d64 6576 6963 6520 6170 7065 6e64 2073 -device append s │ │ │ -0000bc50: 656c 6563 7465 642d 6465 7669 6365 5d20 elected-device] │ │ │ -0000bc60: 3820 225c 6e43 6f6d 6d6f 6e20 4c69 7370 8 "\nCommon Lisp │ │ │ -0000bc70: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -0000bc80: 2028 7365 6c65 6374 6564 2d64 6576 6963 (selected-devic │ │ │ -0000bc90: 6520 2672 6573 7420 4152 4753 295c 6e5c e &rest ARGS)\n\ │ │ │ -0000bca0: 6e22 5d20 6465 7669 6365 2d62 6175 642d n"] device-baud- │ │ │ -0000bcb0: 7261 7465 2023 5b28 266f 7074 696f 6e61 rate #[(&optiona │ │ │ -0000bcc0: 6c20 6429 2022 c4c5 211b c4c6 211a 0b43 l d) "..!...!..C │ │ │ -0000bcd0: 0943 5c6e 430b 195c 6e18 c709 0845 2ac8 .C\nC..\n....E*. │ │ │ -0000bce0: 0b44 af05 2a87 2220 5b76 2064 202d 2d76 .D..*." [v d --v │ │ │ -0000bcf0: 2d2d 7465 6d70 2d2d 202d 2d64 2d2d 7465 --temp-- --d--te │ │ │ -0000bd00: 6d70 2d2d 2067 656e 7379 6d20 222d 2d64 mp-- gensym "--d │ │ │ -0000bd10: 2d2d 2220 222d 2d76 2d2d 2220 7365 742d --" "--v--" set- │ │ │ -0000bd20: 6465 7669 6365 2d62 6175 642d 7261 7465 device-baud-rate │ │ │ -0000bd30: 2064 6576 6963 652d 6261 7564 2d72 6174 device-baud-rat │ │ │ -0000bd40: 655d 2036 2022 5c6e 436f 6d6d 6f6e 204c e] 6 "\nCommon L │ │ │ -0000bd50: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ -0000bd60: 5c6e 2020 2864 6576 6963 652d 6261 7564 \n (device-baud │ │ │ -0000bd70: 2d72 6174 6520 266f 7074 696f 6e61 6c20 -rate &optional │ │ │ -0000bd80: 4429 5c6e 5c6e 225d 2061 6e6e 6f74 6174 D)\n\n"] annotat │ │ │ -0000bd90: 696f 6e2d 676c 7970 6820 235b 2826 7265 ion-glyph #[(&re │ │ │ -0000bda0: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000bdb0: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000bdc0: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ -0000bdd0: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -0000bde0: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -0000bdf0: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -0000be00: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -0000be10: 7265 2d2d 2220 7365 742d 616e 6e6f 7461 re--" set-annota │ │ │ -0000be20: 7469 6f6e 2d67 6c79 7068 2061 7070 656e tion-glyph appen │ │ │ -0000be30: 6420 616e 6e6f 7461 7469 6f6e 2d67 6c79 d annotation-gly │ │ │ -0000be40: 7068 5d20 3720 225c 6e43 6f6d 6d6f 6e20 ph] 7 "\nCommon │ │ │ -0000be50: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ -0000be60: 3a5c 6e20 2028 616e 6e6f 7461 7469 6f6e :\n (annotation │ │ │ -0000be70: 2d67 6c79 7068 2026 7265 7374 2041 5247 -glyph &rest ARG │ │ │ -0000be80: 5329 5c6e 5c6e 225d 2061 6e6e 6f74 6174 S)\n\n"] annotat │ │ │ -0000be90: 696f 6e2d 646f 776e 2d67 6c79 7068 2023 ion-down-glyph # │ │ │ -0000bea0: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ -0000beb0: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ -0000bec0: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ -0000bed0: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ -0000bee0: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ -0000bef0: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ -0000bf00: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ -0000bf10: 2d2d 7374 6f72 652d 2d22 2073 6574 2d61 --store--" set-a │ │ │ -0000bf20: 6e6e 6f74 6174 696f 6e2d 646f 776e 2d67 nnotation-down-g │ │ │ -0000bf30: 6c79 7068 2061 7070 656e 6420 616e 6e6f lyph append anno │ │ │ -0000bf40: 7461 7469 6f6e 2d64 6f77 6e2d 676c 7970 tation-down-glyp │ │ │ -0000bf50: 685d 2037 2022 5c6e 436f 6d6d 6f6e 204c h] 7 "\nCommon L │ │ │ -0000bf60: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ -0000bf70: 5c6e 2020 2861 6e6e 6f74 6174 696f 6e2d \n (annotation- │ │ │ -0000bf80: 646f 776e 2d67 6c79 7068 2026 7265 7374 down-glyph &rest │ │ │ -0000bf90: 2041 5247 5329 5c6e 5c6e 225d 2061 6e6e ARGS)\n\n"] ann │ │ │ -0000bfa0: 6f74 6174 696f 6e2d 6661 6365 2023 5b28 otation-face #[( │ │ │ -0000bfb0: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ -0000bfc0: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ -0000bfd0: 18c7 c80b 0843 5c22 2a42 c95c 6e42 af05 .....C\"*B.\nB.. │ │ │ -0000bfe0: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -0000bff0: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -0000c000: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -0000c010: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -0000c020: 7374 6f72 652d 2d22 2073 6574 2d61 6e6e store--" set-ann │ │ │ -0000c030: 6f74 6174 696f 6e2d 6661 6365 2061 7070 otation-face app │ │ │ -0000c040: 656e 6420 616e 6e6f 7461 7469 6f6e 2d66 end annotation-f │ │ │ -0000c050: 6163 655d 2037 2022 5c6e 436f 6d6d 6f6e ace] 7 "\nCommon │ │ │ -0000c060: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -0000c070: 743a 5c6e 2020 2861 6e6e 6f74 6174 696f t:\n (annotatio │ │ │ -0000c080: 6e2d 6661 6365 2026 7265 7374 2041 5247 n-face &rest ARG │ │ │ -0000c090: 5329 5c6e 5c6e 225d 2061 6e6e 6f74 6174 S)\n\n"] annotat │ │ │ -0000c0a0: 696f 6e2d 6c61 796f 7574 2023 5b28 2672 ion-layout #[(&r │ │ │ -0000c0b0: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ -0000c0c0: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ -0000c0d0: c80b 0843 5c22 2a42 c95c 6e42 af05 2a87 ...C\"*B.\nB..*. │ │ │ -0000c0e0: 2220 5b73 746f 7265 202d 2d73 746f 7265 " [store --store │ │ │ -0000c0f0: 2d2d 7465 6d70 2d2d 202d 2d61 7267 732d --temp-- --args- │ │ │ -0000c100: 2d74 656d 702d 2d20 6172 6773 206d 6170 -temp-- args map │ │ │ -0000c110: 6361 7220 6765 6e73 796d 2022 2d2d 7374 car gensym "--st │ │ │ -0000c120: 6f72 652d 2d22 2073 6574 2d61 6e6e 6f74 ore--" set-annot │ │ │ -0000c130: 6174 696f 6e2d 6c61 796f 7574 2061 7070 ation-layout app │ │ │ -0000c140: 656e 6420 616e 6e6f 7461 7469 6f6e 2d6c end annotation-l │ │ │ -0000c150: 6179 6f75 745d 2037 2022 5c6e 436f 6d6d ayout] 7 "\nComm │ │ │ -0000c160: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ -0000c170: 6973 743a 5c6e 2020 2861 6e6e 6f74 6174 ist:\n (annotat │ │ │ -0000c180: 696f 6e2d 6c61 796f 7574 2026 7265 7374 ion-layout &rest │ │ │ -0000c190: 2041 5247 5329 5c6e 5c6e 225d 2061 6e6e ARGS)\n\n"] ann │ │ │ -0000c1a0: 6f74 6174 696f 6e2d 6461 7461 2023 5b28 otation-data #[( │ │ │ -0000c1b0: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ -0000c1c0: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ -0000c1d0: 18c7 c80b 0843 5c22 2a42 c95c 6e42 af05 .....C\"*B.\nB.. │ │ │ -0000c1e0: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -0000c1f0: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -0000c200: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -0000c210: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -0000c220: 7374 6f72 652d 2d22 2073 6574 2d61 6e6e store--" set-ann │ │ │ -0000c230: 6f74 6174 696f 6e2d 6461 7461 2061 7070 otation-data app │ │ │ -0000c240: 656e 6420 616e 6e6f 7461 7469 6f6e 2d64 end annotation-d │ │ │ -0000c250: 6174 615d 2037 2022 5c6e 436f 6d6d 6f6e ata] 7 "\nCommon │ │ │ -0000c260: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -0000c270: 743a 5c6e 2020 2861 6e6e 6f74 6174 696f t:\n (annotatio │ │ │ -0000c280: 6e2d 6461 7461 2026 7265 7374 2041 5247 n-data &rest ARG │ │ │ -0000c290: 5329 5c6e 5c6e 225d 2061 6e6e 6f74 6174 S)\n\n"] annotat │ │ │ -0000c2a0: 696f 6e2d 6163 7469 6f6e 2023 5b28 2672 ion-action #[(&r │ │ │ -0000c2b0: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ -0000c2c0: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ -0000c2d0: c80b 0843 5c22 2a42 c95c 6e42 af05 2a87 ...C\"*B.\nB..*. │ │ │ -0000c2e0: 2220 5b73 746f 7265 202d 2d73 746f 7265 " [store --store │ │ │ -0000c2f0: 2d2d 7465 6d70 2d2d 202d 2d61 7267 732d --temp-- --args- │ │ │ -0000c300: 2d74 656d 702d 2d20 6172 6773 206d 6170 -temp-- args map │ │ │ -0000c310: 6361 7220 6765 6e73 796d 2022 2d2d 7374 car gensym "--st │ │ │ -0000c320: 6f72 652d 2d22 2073 6574 2d61 6e6e 6f74 ore--" set-annot │ │ │ -0000c330: 6174 696f 6e2d 6163 7469 6f6e 2061 7070 ation-action app │ │ │ -0000c340: 656e 6420 616e 6e6f 7461 7469 6f6e 2d61 end annotation-a │ │ │ -0000c350: 6374 696f 6e5d 2037 2022 5c6e 436f 6d6d ction] 7 "\nComm │ │ │ -0000c360: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ -0000c370: 6973 743a 5c6e 2020 2861 6e6e 6f74 6174 ist:\n (annotat │ │ │ -0000c380: 696f 6e2d 6163 7469 6f6e 2026 7265 7374 ion-action &rest │ │ │ -0000c390: 2041 5247 5329 5c6e 5c6e 225d 2061 6e6e ARGS)\n\n"] ann │ │ │ -0000c3a0: 6f74 6174 696f 6e2d 6d65 6e75 2023 5b28 otation-menu #[( │ │ │ -0000c3b0: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ -0000c3c0: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ -0000c3d0: 18c7 c80b 0843 5c22 2a42 c95c 6e42 af05 .....C\"*B.\nB.. │ │ │ -0000c3e0: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -0000c3f0: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -0000c400: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -0000c410: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -0000c420: 7374 6f72 652d 2d22 2073 6574 2d61 6e6e store--" set-ann │ │ │ -0000c430: 6f74 6174 696f 6e2d 6d65 6e75 2061 7070 otation-menu app │ │ │ -0000c440: 656e 6420 616e 6e6f 7461 7469 6f6e 2d6d end annotation-m │ │ │ -0000c450: 656e 755d 2037 2022 5c6e 436f 6d6d 6f6e enu] 7 "\nCommon │ │ │ -0000c460: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -0000c470: 743a 5c6e 2020 2861 6e6e 6f74 6174 696f t:\n (annotatio │ │ │ -0000c480: 6e2d 6d65 6e75 2026 7265 7374 2041 5247 n-menu &rest ARG │ │ │ -0000c490: 5329 5c6e 5c6e 225d 2077 6964 6765 742d S)\n\n"] widget- │ │ │ -0000c4a0: 6765 7420 235b 2826 7265 7374 2061 7267 get #[(&rest arg │ │ │ -0000c4b0: 7329 2022 c4c5 0b5c 221a c5c6 2119 5c6e s) "...\"...!.\n │ │ │ -0000c4c0: 0b09 435c 6e1b 0918 c7c8 c90b 0843 5c22 ..C\n........C\" │ │ │ -0000c4d0: 4208 452a ca5c 6e42 af05 2a87 2220 5b73 B.E*.\nB..*." [s │ │ │ -0000c4e0: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ -0000c4f0: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ -0000c500: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ -0000c510: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ -0000c520: 2d22 2070 726f 676e 2077 6964 6765 742d -" progn widget- │ │ │ -0000c530: 7075 7420 6170 7065 6e64 2077 6964 6765 put append widge │ │ │ -0000c540: 742d 6765 745d 2038 2022 5c6e 436f 6d6d t-get] 8 "\nComm │ │ │ -0000c550: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ -0000c560: 6973 743a 5c6e 2020 2877 6964 6765 742d ist:\n (widget- │ │ │ -0000c570: 6765 7420 2672 6573 7420 4152 4753 295c get &rest ARGS)\ │ │ │ -0000c580: 6e5c 6e22 5d20 7769 6467 6574 2d76 616c n\n"] widget-val │ │ │ -0000c590: 7565 2023 5b28 2672 6573 7420 6172 6773 ue #[(&rest args │ │ │ -0000c5a0: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ -0000c5b0: 0943 5c6e 1b09 18c7 c8c9 0b08 435c 2242 .C\n........C\"B │ │ │ -0000c5c0: 0845 2aca 5c6e 42af 052a 8722 205b 7374 .E*.\nB..*." [st │ │ │ -0000c5d0: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ -0000c5e0: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ -0000c5f0: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ -0000c600: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ -0000c610: 2220 7072 6f67 6e20 7769 6467 6574 2d76 " progn widget-v │ │ │ -0000c620: 616c 7565 2d73 6574 2061 7070 656e 6420 alue-set append │ │ │ -0000c630: 7769 6467 6574 2d76 616c 7565 5d20 3820 widget-value] 8 │ │ │ -0000c640: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ -0000c650: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ -0000c660: 7769 6467 6574 2d76 616c 7565 2026 7265 widget-value &re │ │ │ -0000c670: 7374 2041 5247 5329 5c6e 5c6e 225d 2072 st ARGS)\n\n"] r │ │ │ -0000c680: 6563 656e 742d 6b65 7973 2d72 696e 672d ecent-keys-ring- │ │ │ -0000c690: 7369 7a65 2023 5b28 2672 6573 7420 6172 size #[(&rest ar │ │ │ -0000c6a0: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ -0000c6b0: 6e0b 0943 5c6e 1b09 18c7 c80b 0843 5c22 n..C\n.......C\" │ │ │ -0000c6c0: 2a42 c95c 6e42 af05 2a87 2220 5b73 746f *B.\nB..*." [sto │ │ │ -0000c6d0: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ -0000c6e0: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ -0000c6f0: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ -0000c700: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ -0000c710: 2073 6574 2d72 6563 656e 742d 6b65 7973 set-recent-keys │ │ │ -0000c720: 2d72 696e 672d 7369 7a65 2061 7070 656e -ring-size appen │ │ │ -0000c730: 6420 7265 6365 6e74 2d6b 6579 732d 7269 d recent-keys-ri │ │ │ -0000c740: 6e67 2d73 697a 655d 2037 2022 5c6e 436f ng-size] 7 "\nCo │ │ │ -0000c750: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ -0000c760: 206c 6973 743a 5c6e 2020 2872 6563 656e list:\n (recen │ │ │ -0000c770: 742d 6b65 7973 2d72 696e 672d 7369 7a65 t-keys-ring-size │ │ │ -0000c780: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ -0000c790: 225d 2073 796d 626f 6c2d 7661 6c75 652d "] symbol-value- │ │ │ -0000c7a0: 696e 2d62 7566 6665 7220 235b 2873 2062 in-buffer #[(s b │ │ │ -0000c7b0: 2026 6f70 7469 6f6e 616c 2069 676e 6f72 &optional ignor │ │ │ -0000c7c0: 6564 2d61 7267 2920 22c6 c721 1dc6 c821 ed-arg) "..!...! │ │ │ -0000c7d0: 1cc6 c921 1bc6 ca21 1a0d 0c0b 4509 080e ...!...!....E... │ │ │ -0000c7e0: 0e45 5c6e 430d 190c 180b 1e0e 5c6e 1e0f .E\nC.......\n.. │ │ │ -0000c7f0: cb08 cc09 0e0f 4545 2ccd 0d0c 0b46 af05 ......EE,....F.. │ │ │ -0000c800: 2c87 2220 5b62 2073 202d 2d73 746f 7265 ,." [b s --store │ │ │ -0000c810: 2d2d 7465 6d70 2d2d 202d 2d69 676e 6f72 --temp-- --ignor │ │ │ -0000c820: 6564 2d61 7267 2d2d 7465 6d70 2d2d 202d ed-arg--temp-- - │ │ │ -0000c830: 2d62 2d2d 7465 6d70 2d2d 202d 2d73 2d2d -b--temp-- --s-- │ │ │ -0000c840: 7465 6d70 2d2d 2067 656e 7379 6d20 222d temp-- gensym "- │ │ │ -0000c850: 2d73 2d2d 2220 222d 2d62 2d2d 2220 222d -s--" "--b--" "- │ │ │ -0000c860: 2d69 676e 6f72 6564 2d61 7267 2d2d 2220 -ignored-arg--" │ │ │ -0000c870: 222d 2d73 746f 7265 2d2d 2220 7769 7468 "--store--" with │ │ │ -0000c880: 2d63 7572 7265 6e74 2d62 7566 6665 7220 -current-buffer │ │ │ -0000c890: 7365 7420 7379 6d62 6f6c 2d76 616c 7565 set symbol-value │ │ │ -0000c8a0: 2d69 6e2d 6275 6666 6572 2069 676e 6f72 -in-buffer ignor │ │ │ -0000c8b0: 6564 2d61 7267 2073 746f 7265 5d20 3820 ed-arg store] 8 │ │ │ -0000c8c0: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ -0000c8d0: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ -0000c8e0: 7379 6d62 6f6c 2d76 616c 7565 2d69 6e2d symbol-value-in- │ │ │ -0000c8f0: 6275 6666 6572 2053 2042 2026 6f70 7469 buffer S B &opti │ │ │ -0000c900: 6f6e 616c 2049 474e 4f52 4544 2d41 5247 onal IGNORED-ARG │ │ │ -0000c910: 295c 6e5c 6e22 5d20 7379 6d62 6f6c 2d76 )\n\n"] symbol-v │ │ │ -0000c920: 616c 7565 2d69 6e2d 636f 6e73 6f6c 6520 alue-in-console │ │ │ -0000c930: 235b 2873 2063 2026 6f70 7469 6f6e 616c #[(s c &optional │ │ │ -0000c940: 2069 676e 6f72 6564 2d61 7267 2920 22c6 ignored-arg) ". │ │ │ -0000c950: c721 1dc6 c821 1cc6 c921 1bc6 ca21 1a0d .!...!...!...!.. │ │ │ -0000c960: 0c0b 4509 080e 0f45 5c6e 430d 190c 180b ..E....E\nC..... │ │ │ -0000c970: 1e0f 5c6e 1e10 cbcc 0844 43cd 090e 1045 ..\n.....DC....E │ │ │ -0000c980: 452c ce0d 0c0b 46af 052c 8722 205b 6320 E,....F..,." [c │ │ │ -0000c990: 7320 2d2d 7374 6f72 652d 2d74 656d 702d s --store--temp- │ │ │ -0000c9a0: 2d20 2d2d 6967 6e6f 7265 642d 6172 672d - --ignored-arg- │ │ │ -0000c9b0: 2d74 656d 702d 2d20 2d2d 632d 2d74 656d -temp-- --c--tem │ │ │ -0000c9c0: 702d 2d20 2d2d 732d 2d74 656d 702d 2d20 p-- --s--temp-- │ │ │ -0000c9d0: 6765 6e73 796d 2022 2d2d 732d 2d22 2022 gensym "--s--" " │ │ │ -0000c9e0: 2d2d 632d 2d22 2022 2d2d 6967 6e6f 7265 --c--" "--ignore │ │ │ -0000c9f0: 642d 6172 672d 2d22 2022 2d2d 7374 6f72 d-arg--" "--stor │ │ │ -0000ca00: 652d 2d22 206c 6574 6620 2873 656c 6563 e--" letf (selec │ │ │ -0000ca10: 7465 642d 636f 6e73 6f6c 6529 2073 6574 ted-console) set │ │ │ -0000ca20: 2073 796d 626f 6c2d 7661 6c75 652d 696e symbol-value-in │ │ │ -0000ca30: 2d63 6f6e 736f 6c65 2069 676e 6f72 6564 -console ignored │ │ │ -0000ca40: 2d61 7267 2073 746f 7265 5d20 3820 225c -arg store] 8 "\ │ │ │ -0000ca50: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ -0000ca60: 6264 6120 6c69 7374 3a5c 6e20 2028 7379 bda list:\n (sy │ │ │ -0000ca70: 6d62 6f6c 2d76 616c 7565 2d69 6e2d 636f mbol-value-in-co │ │ │ -0000ca80: 6e73 6f6c 6520 5320 4320 266f 7074 696f nsole S C &optio │ │ │ -0000ca90: 6e61 6c20 4947 4e4f 5245 442d 4152 4729 nal IGNORED-ARG) │ │ │ -0000caa0: 5c6e 5c6e 225d 2062 7566 6665 722d 6465 \n\n"] buffer-de │ │ │ -0000cab0: 6469 6361 7465 642d 6672 616d 6520 235b dicated-frame #[ │ │ │ -0000cac0: 2826 6f70 7469 6f6e 616c 2062 2920 22c4 (&optional b) ". │ │ │ -0000cad0: c521 1bc4 c621 1a0b 4309 435c 6e43 0b19 .!...!..C.C\nC.. │ │ │ -0000cae0: 5c6e 18c7 0908 452a c80b 44af 052a 8722 \n....E*..D..*." │ │ │ -0000caf0: 205b 7620 6220 2d2d 762d 2d74 656d 702d [v b --v--temp- │ │ │ -0000cb00: 2d20 2d2d 622d 2d74 656d 702d 2d20 6765 - --b--temp-- ge │ │ │ -0000cb10: 6e73 796d 2022 2d2d 622d 2d22 2022 2d2d nsym "--b--" "-- │ │ │ -0000cb20: 762d 2d22 2073 6574 2d62 7566 6665 722d v--" set-buffer- │ │ │ -0000cb30: 6465 6469 6361 7465 642d 6672 616d 6520 dedicated-frame │ │ │ -0000cb40: 6275 6666 6572 2d64 6564 6963 6174 6564 buffer-dedicated │ │ │ -0000cb50: 2d66 7261 6d65 5d20 3620 225c 6e43 6f6d -frame] 6 "\nCom │ │ │ -0000cb60: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -0000cb70: 6c69 7374 3a5c 6e20 2028 6275 6666 6572 list:\n (buffer │ │ │ -0000cb80: 2d64 6564 6963 6174 6564 2d66 7261 6d65 -dedicated-frame │ │ │ -0000cb90: 2026 6f70 7469 6f6e 616c 2042 295c 6e5c &optional B)\n\ │ │ │ -0000cba0: 6e22 5d20 636f 6e73 6f6c 652d 7479 7065 n"] console-type │ │ │ -0000cbb0: 2d69 6d61 6765 2d63 6f6e 7665 7273 696f -image-conversio │ │ │ -0000cbc0: 6e2d 6c69 7374 2023 5b28 2672 6573 7420 n-list #[(&rest │ │ │ -0000cbd0: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ -0000cbe0: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ -0000cbf0: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ -0000cc00: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ -0000cc10: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ -0000cc20: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ -0000cc30: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ -0000cc40: 2d22 2073 6574 2d63 6f6e 736f 6c65 2d74 -" set-console-t │ │ │ -0000cc50: 7970 652d 696d 6167 652d 636f 6e76 6572 ype-image-conver │ │ │ -0000cc60: 7369 6f6e 2d6c 6973 7420 6170 7065 6e64 sion-list append │ │ │ -0000cc70: 2063 6f6e 736f 6c65 2d74 7970 652d 696d console-type-im │ │ │ -0000cc80: 6167 652d 636f 6e76 6572 7369 6f6e 2d6c age-conversion-l │ │ │ -0000cc90: 6973 745d 2037 2022 5c6e 436f 6d6d 6f6e ist] 7 "\nCommon │ │ │ -0000cca0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -0000ccb0: 743a 5c6e 2020 2863 6f6e 736f 6c65 2d74 t:\n (console-t │ │ │ -0000ccc0: 7970 652d 696d 6167 652d 636f 6e76 6572 ype-image-conver │ │ │ -0000ccd0: 7369 6f6e 2d6c 6973 7420 2672 6573 7420 sion-list &rest │ │ │ -0000cce0: 4152 4753 295c 6e5c 6e22 5d20 6465 6661 ARGS)\n\n"] defa │ │ │ -0000ccf0: 756c 742d 746f 6f6c 6261 722d 706f 7369 ult-toolbar-posi │ │ │ -0000cd00: 7469 6f6e 2023 5b28 2672 6573 7420 6172 tion #[(&rest ar │ │ │ -0000cd10: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ -0000cd20: 6e0b 0943 5c6e 1b09 18c7 c80b 0843 5c22 n..C\n.......C\" │ │ │ -0000cd30: 2a42 c95c 6e42 af05 2a87 2220 5b73 746f *B.\nB..*." [sto │ │ │ -0000cd40: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ -0000cd50: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ -0000cd60: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ -0000cd70: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ -0000cd80: 2073 6574 2d64 6566 6175 6c74 2d74 6f6f set-default-too │ │ │ -0000cd90: 6c62 6172 2d70 6f73 6974 696f 6e20 6170 lbar-position ap │ │ │ -0000cda0: 7065 6e64 2064 6566 6175 6c74 2d74 6f6f pend default-too │ │ │ -0000cdb0: 6c62 6172 2d70 6f73 6974 696f 6e5d 2037 lbar-position] 7 │ │ │ -0000cdc0: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -0000cdd0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -0000cde0: 2864 6566 6175 6c74 2d74 6f6f 6c62 6172 (default-toolbar │ │ │ -0000cdf0: 2d70 6f73 6974 696f 6e20 2672 6573 7420 -position &rest │ │ │ -0000ce00: 4152 4753 295c 6e5c 6e22 5d20 6465 7669 ARGS)\n\n"] devi │ │ │ -0000ce10: 6365 2d63 6c61 7373 2023 5b28 266f 7074 ce-class #[(&opt │ │ │ -0000ce20: 696f 6e61 6c20 6429 2022 c4c5 211b c4c6 ional d) "..!... │ │ │ -0000ce30: 211a 0b43 0943 5c6e 430b 195c 6e18 c709 !..C.C\nC..\n... │ │ │ -0000ce40: 0845 2ac8 0b44 af05 2a87 2220 5b76 2064 .E*..D..*." [v d │ │ │ -0000ce50: 202d 2d76 2d2d 7465 6d70 2d2d 202d 2d64 --v--temp-- --d │ │ │ -0000ce60: 2d2d 7465 6d70 2d2d 2067 656e 7379 6d20 --temp-- gensym │ │ │ -0000ce70: 222d 2d64 2d2d 2220 222d 2d76 2d2d 2220 "--d--" "--v--" │ │ │ -0000ce80: 7365 742d 6465 7669 6365 2d63 6c61 7373 set-device-class │ │ │ -0000ce90: 2064 6576 6963 652d 636c 6173 735d 2036 device-class] 6 │ │ │ -0000cea0: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -0000ceb0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -0000cec0: 2864 6576 6963 652d 636c 6173 7320 266f (device-class &o │ │ │ -0000ced0: 7074 696f 6e61 6c20 4429 5c6e 5c6e 225d ptional D)\n\n"] │ │ │ -0000cee0: 2065 7874 656e 742d 6265 6769 6e2d 676c extent-begin-gl │ │ │ -0000cef0: 7970 6820 235b 2826 7265 7374 2061 7267 yph #[(&rest arg │ │ │ -0000cf00: 7329 2022 c4c5 0b5c 221a c5c6 2119 5c6e s) "...\"...!.\n │ │ │ -0000cf10: 0b09 435c 6e1b 0918 c7c8 0b08 435c 222a ..C\n.......C\"* │ │ │ -0000cf20: 42c9 5c6e 42af 052a 8722 205b 7374 6f72 B.\nB..*." [stor │ │ │ -0000cf30: 6520 2d2d 7374 6f72 652d 2d74 656d 702d e --store--temp- │ │ │ -0000cf40: 2d20 2d2d 6172 6773 2d2d 7465 6d70 2d2d - --args--temp-- │ │ │ -0000cf50: 2061 7267 7320 6d61 7063 6172 2067 656e args mapcar gen │ │ │ -0000cf60: 7379 6d20 222d 2d73 746f 7265 2d2d 2220 sym "--store--" │ │ │ -0000cf70: 7365 742d 6578 7465 6e74 2d62 6567 696e set-extent-begin │ │ │ -0000cf80: 2d67 6c79 7068 2061 7070 656e 6420 6578 -glyph append ex │ │ │ -0000cf90: 7465 6e74 2d62 6567 696e 2d67 6c79 7068 tent-begin-glyph │ │ │ -0000cfa0: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ -0000cfb0: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -0000cfc0: 6e20 2028 6578 7465 6e74 2d62 6567 696e n (extent-begin │ │ │ -0000cfd0: 2d67 6c79 7068 2026 7265 7374 2041 5247 -glyph &rest ARG │ │ │ -0000cfe0: 5329 5c6e 5c6e 225d 2065 7874 656e 742d S)\n\n"] extent- │ │ │ -0000cff0: 6265 6769 6e2d 676c 7970 682d 6c61 796f begin-glyph-layo │ │ │ -0000d000: 7574 2023 5b28 2672 6573 7420 6172 6773 ut #[(&rest args │ │ │ -0000d010: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ -0000d020: 0943 5c6e 1b09 18c7 c80b 0843 5c22 2a42 .C\n.......C\"*B │ │ │ -0000d030: c95c 6e42 af05 2a87 2220 5b73 746f 7265 .\nB..*." [store │ │ │ -0000d040: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ -0000d050: 202d 2d61 7267 732d 2d74 656d 702d 2d20 --args--temp-- │ │ │ -0000d060: 6172 6773 206d 6170 6361 7220 6765 6e73 args mapcar gens │ │ │ -0000d070: 796d 2022 2d2d 7374 6f72 652d 2d22 2073 ym "--store--" s │ │ │ -0000d080: 6574 2d65 7874 656e 742d 6265 6769 6e2d et-extent-begin- │ │ │ -0000d090: 676c 7970 682d 6c61 796f 7574 2061 7070 glyph-layout app │ │ │ -0000d0a0: 656e 6420 6578 7465 6e74 2d62 6567 696e end extent-begin │ │ │ -0000d0b0: 2d67 6c79 7068 2d6c 6179 6f75 745d 2037 -glyph-layout] 7 │ │ │ -0000d0c0: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -0000d0d0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -0000d0e0: 2865 7874 656e 742d 6265 6769 6e2d 676c (extent-begin-gl │ │ │ -0000d0f0: 7970 682d 6c61 796f 7574 2026 7265 7374 yph-layout &rest │ │ │ -0000d100: 2041 5247 5329 5c6e 5c6e 225d 2065 7874 ARGS)\n\n"] ext │ │ │ -0000d110: 656e 742d 656e 642d 676c 7970 6820 235b ent-end-glyph #[ │ │ │ -0000d120: 2826 7265 7374 2061 7267 7329 2022 c4c5 (&rest args) ".. │ │ │ -0000d130: 0b5c 221a c5c6 2119 5c6e 0b09 435c 6e1b .\"...!.\n..C\n. │ │ │ -0000d140: 0918 c7c8 0b08 435c 222a 42c9 5c6e 42af ......C\"*B.\nB. │ │ │ -0000d150: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ -0000d160: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ -0000d170: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ -0000d180: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ -0000d190: 2d73 746f 7265 2d2d 2220 7365 742d 6578 -store--" set-ex │ │ │ -0000d1a0: 7465 6e74 2d65 6e64 2d67 6c79 7068 2061 tent-end-glyph a │ │ │ -0000d1b0: 7070 656e 6420 6578 7465 6e74 2d65 6e64 ppend extent-end │ │ │ -0000d1c0: 2d67 6c79 7068 5d20 3720 225c 6e43 6f6d -glyph] 7 "\nCom │ │ │ -0000d1d0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -0000d1e0: 6c69 7374 3a5c 6e20 2028 6578 7465 6e74 list:\n (extent │ │ │ -0000d1f0: 2d65 6e64 2d67 6c79 7068 2026 7265 7374 -end-glyph &rest │ │ │ -0000d200: 2041 5247 5329 5c6e 5c6e 225d 2065 7874 ARGS)\n\n"] ext │ │ │ -0000d210: 656e 742d 656e 642d 676c 7970 682d 6c61 ent-end-glyph-la │ │ │ -0000d220: 796f 7574 2023 5b28 2672 6573 7420 6172 yout #[(&rest ar │ │ │ -0000d230: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ -0000d240: 6e0b 0943 5c6e 1b09 18c7 c80b 0843 5c22 n..C\n.......C\" │ │ │ -0000d250: 2a42 c95c 6e42 af05 2a87 2220 5b73 746f *B.\nB..*." [sto │ │ │ -0000d260: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ -0000d270: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ -0000d280: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ -0000d290: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ -0000d2a0: 2073 6574 2d65 7874 656e 742d 656e 642d set-extent-end- │ │ │ -0000d2b0: 676c 7970 682d 6c61 796f 7574 2061 7070 glyph-layout app │ │ │ -0000d2c0: 656e 6420 6578 7465 6e74 2d65 6e64 2d67 end extent-end-g │ │ │ -0000d2d0: 6c79 7068 2d6c 6179 6f75 745d 2037 2022 lyph-layout] 7 " │ │ │ -0000d2e0: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -0000d2f0: 6d62 6461 206c 6973 743a 5c6e 2020 2865 mbda list:\n (e │ │ │ -0000d300: 7874 656e 742d 656e 642d 676c 7970 682d xtent-end-glyph- │ │ │ -0000d310: 6c61 796f 7574 2026 7265 7374 2041 5247 layout &rest ARG │ │ │ -0000d320: 5329 5c6e 5c6e 225d 2065 7874 656e 742d S)\n\n"] extent- │ │ │ -0000d330: 6b65 796d 6170 2023 5b28 2672 6573 7420 keymap #[(&rest │ │ │ -0000d340: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ -0000d350: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ -0000d360: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ -0000d370: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ -0000d380: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ -0000d390: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ -0000d3a0: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ -0000d3b0: 2d22 2073 6574 2d65 7874 656e 742d 6b65 -" set-extent-ke │ │ │ -0000d3c0: 796d 6170 2061 7070 656e 6420 6578 7465 ymap append exte │ │ │ -0000d3d0: 6e74 2d6b 6579 6d61 705d 2037 2022 5c6e nt-keymap] 7 "\n │ │ │ -0000d3e0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -0000d3f0: 6461 206c 6973 743a 5c6e 2020 2865 7874 da list:\n (ext │ │ │ -0000d400: 656e 742d 6b65 796d 6170 2026 7265 7374 ent-keymap &rest │ │ │ -0000d410: 2041 5247 5329 5c6e 5c6e 225d 2065 7874 ARGS)\n\n"] ext │ │ │ -0000d420: 656e 742d 7061 7265 6e74 2023 5b28 2672 ent-parent #[(&r │ │ │ -0000d430: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ -0000d440: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ -0000d450: c80b 0843 5c22 2a42 c95c 6e42 af05 2a87 ...C\"*B.\nB..*. │ │ │ -0000d460: 2220 5b73 746f 7265 202d 2d73 746f 7265 " [store --store │ │ │ -0000d470: 2d2d 7465 6d70 2d2d 202d 2d61 7267 732d --temp-- --args- │ │ │ -0000d480: 2d74 656d 702d 2d20 6172 6773 206d 6170 -temp-- args map │ │ │ -0000d490: 6361 7220 6765 6e73 796d 2022 2d2d 7374 car gensym "--st │ │ │ -0000d4a0: 6f72 652d 2d22 2073 6574 2d65 7874 656e ore--" set-exten │ │ │ -0000d4b0: 742d 7061 7265 6e74 2061 7070 656e 6420 t-parent append │ │ │ -0000d4c0: 6578 7465 6e74 2d70 6172 656e 745d 2037 extent-parent] 7 │ │ │ -0000d4d0: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -0000d4e0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -0000d4f0: 2865 7874 656e 742d 7061 7265 6e74 2026 (extent-parent & │ │ │ -0000d500: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ -0000d510: 2065 7874 656e 742d 7072 6f70 6572 7469 extent-properti │ │ │ -0000d520: 6573 2023 5b28 2672 6573 7420 6172 6773 es #[(&rest args │ │ │ -0000d530: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ -0000d540: 0943 5c6e 1b09 18c7 c80b 0843 5c22 2a42 .C\n.......C\"*B │ │ │ -0000d550: c95c 6e42 af05 2a87 2220 5b73 746f 7265 .\nB..*." [store │ │ │ -0000d560: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ -0000d570: 202d 2d61 7267 732d 2d74 656d 702d 2d20 --args--temp-- │ │ │ -0000d580: 6172 6773 206d 6170 6361 7220 6765 6e73 args mapcar gens │ │ │ -0000d590: 796d 2022 2d2d 7374 6f72 652d 2d22 2073 ym "--store--" s │ │ │ -0000d5a0: 6574 2d65 7874 656e 742d 7072 6f70 6572 et-extent-proper │ │ │ -0000d5b0: 7469 6573 2061 7070 656e 6420 6578 7465 ties append exte │ │ │ -0000d5c0: 6e74 2d70 726f 7065 7274 6965 735d 2037 nt-properties] 7 │ │ │ -0000d5d0: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -0000d5e0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -0000d5f0: 2865 7874 656e 742d 7072 6f70 6572 7469 (extent-properti │ │ │ -0000d600: 6573 2026 7265 7374 2041 5247 5329 5c6e es &rest ARGS)\n │ │ │ -0000d610: 5c6e 225d 2066 7261 6d65 2d73 656c 6563 \n"] frame-selec │ │ │ -0000d620: 7465 642d 7769 6e64 6f77 2023 5b28 266f ted-window #[(&o │ │ │ -0000d630: 7074 696f 6e61 6c20 6629 2022 c4c5 211b ptional f) "..!. │ │ │ -0000d640: c4c6 211a 0b43 0943 5c6e 430b 195c 6e18 ..!..C.C\nC..\n. │ │ │ -0000d650: c709 0845 2ac8 0b44 af05 2a87 2220 5b76 ...E*..D..*." [v │ │ │ -0000d660: 2066 202d 2d76 2d2d 7465 6d70 2d2d 202d f --v--temp-- - │ │ │ -0000d670: 2d66 2d2d 7465 6d70 2d2d 2067 656e 7379 -f--temp-- gensy │ │ │ -0000d680: 6d20 222d 2d66 2d2d 2220 222d 2d76 2d2d m "--f--" "--v-- │ │ │ -0000d690: 2220 7365 742d 6672 616d 652d 7365 6c65 " set-frame-sele │ │ │ -0000d6a0: 6374 6564 2d77 696e 646f 7720 6672 616d cted-window fram │ │ │ -0000d6b0: 652d 7365 6c65 6374 6564 2d77 696e 646f e-selected-windo │ │ │ -0000d6c0: 775d 2036 2022 5c6e 436f 6d6d 6f6e 204c w] 6 "\nCommon L │ │ │ -0000d6d0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ -0000d6e0: 5c6e 2020 2866 7261 6d65 2d73 656c 6563 \n (frame-selec │ │ │ -0000d6f0: 7465 642d 7769 6e64 6f77 2026 6f70 7469 ted-window &opti │ │ │ -0000d700: 6f6e 616c 2046 295c 6e5c 6e22 5d20 676c onal F)\n\n"] gl │ │ │ -0000d710: 7970 682d 696d 6167 6520 235b 2867 6c79 yph-image #[(gly │ │ │ -0000d720: 7068 2026 6f70 7469 6f6e 616c 2064 6f6d ph &optional dom │ │ │ -0000d730: 6169 6e29 2022 c6c7 211d c6c8 211c c6c9 ain) "..!...!... │ │ │ -0000d740: 211b 0d0c 445c 6e09 440b 430d 1a0c 190b !...D\n.D.C..... │ │ │ -0000d750: 18ca 5c6e 0809 462b cb0d 0c45 af05 2b87 ..\n..F+...E..+. │ │ │ -0000d760: 2220 5b69 2064 6f6d 6169 6e20 676c 7970 " [i domain glyp │ │ │ -0000d770: 6820 2d2d 692d 2d74 656d 702d 2d20 2d2d h --i--temp-- -- │ │ │ -0000d780: 646f 6d61 696e 2d2d 7465 6d70 2d2d 202d domain--temp-- - │ │ │ -0000d790: 2d67 6c79 7068 2d2d 7465 6d70 2d2d 2067 -glyph--temp-- g │ │ │ -0000d7a0: 656e 7379 6d20 222d 2d67 6c79 7068 2d2d ensym "--glyph-- │ │ │ -0000d7b0: 2220 222d 2d64 6f6d 6169 6e2d 2d22 2022 " "--domain--" " │ │ │ -0000d7c0: 2d2d 692d 2d22 2073 6574 2d67 6c79 7068 --i--" set-glyph │ │ │ -0000d7d0: 2d69 6d61 6765 2067 6c79 7068 2d69 6d61 -image glyph-ima │ │ │ -0000d7e0: 6765 5d20 3720 225c 6e43 6f6d 6d6f 6e20 ge] 7 "\nCommon │ │ │ -0000d7f0: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ -0000d800: 3a5c 6e20 2028 676c 7970 682d 696d 6167 :\n (glyph-imag │ │ │ -0000d810: 6520 474c 5950 4820 266f 7074 696f 6e61 e GLYPH &optiona │ │ │ -0000d820: 6c20 444f 4d41 494e 295c 6e5c 6e22 5d20 l DOMAIN)\n\n"] │ │ │ -0000d830: 6974 696d 6572 2d66 756e 6374 696f 6e20 itimer-function │ │ │ -0000d840: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ -0000d850: c4c5 0b5c 221a c5c6 2119 5c6e 0b09 435c ...\"...!.\n..C\ │ │ │ -0000d860: 6e1b 0918 c7c8 0b08 435c 222a 42c9 5c6e n.......C\"*B.\n │ │ │ -0000d870: 42af 052a 8722 205b 7374 6f72 6520 2d2d B..*." [store -- │ │ │ -0000d880: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ -0000d890: 6172 6773 2d2d 7465 6d70 2d2d 2061 7267 args--temp-- arg │ │ │ -0000d8a0: 7320 6d61 7063 6172 2067 656e 7379 6d20 s mapcar gensym │ │ │ -0000d8b0: 222d 2d73 746f 7265 2d2d 2220 7365 742d "--store--" set- │ │ │ -0000d8c0: 6974 696d 6572 2d66 756e 6374 696f 6e20 itimer-function │ │ │ -0000d8d0: 6170 7065 6e64 2069 7469 6d65 722d 6675 append itimer-fu │ │ │ -0000d8e0: 6e63 7469 6f6e 5d20 3720 225c 6e43 6f6d nction] 7 "\nCom │ │ │ -0000d8f0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -0000d900: 6c69 7374 3a5c 6e20 2028 6974 696d 6572 list:\n (itimer │ │ │ -0000d910: 2d66 756e 6374 696f 6e20 2672 6573 7420 -function &rest │ │ │ -0000d920: 4152 4753 295c 6e5c 6e22 5d20 6974 696d ARGS)\n\n"] itim │ │ │ -0000d930: 6572 2d66 756e 6374 696f 6e2d 6172 6775 er-function-argu │ │ │ -0000d940: 6d65 6e74 7320 235b 2826 7265 7374 2061 ments #[(&rest a │ │ │ -0000d950: 7267 7329 2022 c4c5 0b5c 221a c5c6 2119 rgs) "...\"...!. │ │ │ -0000d960: 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 435c \n..C\n.......C\ │ │ │ -0000d970: 222a 42c9 5c6e 42af 052a 8722 205b 7374 "*B.\nB..*." [st │ │ │ -0000d980: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ -0000d990: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ -0000d9a0: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ -0000d9b0: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ -0000d9c0: 2220 7365 742d 6974 696d 6572 2d66 756e " set-itimer-fun │ │ │ -0000d9d0: 6374 696f 6e2d 6172 6775 6d65 6e74 7320 ction-arguments │ │ │ -0000d9e0: 6170 7065 6e64 2069 7469 6d65 722d 6675 append itimer-fu │ │ │ -0000d9f0: 6e63 7469 6f6e 2d61 7267 756d 656e 7473 nction-arguments │ │ │ -0000da00: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ -0000da10: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -0000da20: 6e20 2028 6974 696d 6572 2d66 756e 6374 n (itimer-funct │ │ │ -0000da30: 696f 6e2d 6172 6775 6d65 6e74 7320 2672 ion-arguments &r │ │ │ -0000da40: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ -0000da50: 6974 696d 6572 2d69 732d 6964 6c65 2023 itimer-is-idle # │ │ │ -0000da60: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ -0000da70: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ -0000da80: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ -0000da90: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ -0000daa0: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ -0000dab0: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ -0000dac0: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ -0000dad0: 2d2d 7374 6f72 652d 2d22 2073 6574 2d69 --store--" set-i │ │ │ -0000dae0: 7469 6d65 722d 6973 2d69 646c 6520 6170 timer-is-idle ap │ │ │ -0000daf0: 7065 6e64 2069 7469 6d65 722d 6973 2d69 pend itimer-is-i │ │ │ -0000db00: 646c 655d 2037 2022 5c6e 436f 6d6d 6f6e dle] 7 "\nCommon │ │ │ -0000db10: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -0000db20: 743a 5c6e 2020 2869 7469 6d65 722d 6973 t:\n (itimer-is │ │ │ -0000db30: 2d69 646c 6520 2672 6573 7420 4152 4753 -idle &rest ARGS │ │ │ -0000db40: 295c 6e5c 6e22 5d20 6974 696d 6572 2d72 )\n\n"] itimer-r │ │ │ -0000db50: 6563 6f72 6465 642d 7275 6e2d 7469 6d65 ecorded-run-time │ │ │ -0000db60: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ -0000db70: 22c4 c50b 5c22 1ac5 c621 195c 6e0b 0943 "...\"...!.\n..C │ │ │ -0000db80: 5c6e 1b09 18c7 c80b 0843 5c22 2a42 c95c \n.......C\"*B.\ │ │ │ -0000db90: 6e42 af05 2a87 2220 5b73 746f 7265 202d nB..*." [store - │ │ │ -0000dba0: 2d73 746f 7265 2d2d 7465 6d70 2d2d 202d -store--temp-- - │ │ │ -0000dbb0: 2d61 7267 732d 2d74 656d 702d 2d20 6172 -args--temp-- ar │ │ │ -0000dbc0: 6773 206d 6170 6361 7220 6765 6e73 796d gs mapcar gensym │ │ │ -0000dbd0: 2022 2d2d 7374 6f72 652d 2d22 2073 6574 "--store--" set │ │ │ -0000dbe0: 2d69 7469 6d65 722d 7265 636f 7264 6564 -itimer-recorded │ │ │ -0000dbf0: 2d72 756e 2d74 696d 6520 6170 7065 6e64 -run-time append │ │ │ -0000dc00: 2069 7469 6d65 722d 7265 636f 7264 6564 itimer-recorded │ │ │ -0000dc10: 2d72 756e 2d74 696d 655d 2037 2022 5c6e -run-time] 7 "\n │ │ │ -0000dc20: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -0000dc30: 6461 206c 6973 743a 5c6e 2020 2869 7469 da list:\n (iti │ │ │ -0000dc40: 6d65 722d 7265 636f 7264 6564 2d72 756e mer-recorded-run │ │ │ -0000dc50: 2d74 696d 6520 2672 6573 7420 4152 4753 -time &rest ARGS │ │ │ -0000dc60: 295c 6e5c 6e22 5d20 6974 696d 6572 2d72 )\n\n"] itimer-r │ │ │ -0000dc70: 6573 7461 7274 2023 5b28 2672 6573 7420 estart #[(&rest │ │ │ -0000dc80: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ -0000dc90: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ -0000dca0: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ -0000dcb0: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ -0000dcc0: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ -0000dcd0: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ -0000dce0: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ -0000dcf0: 2d22 2073 6574 2d69 7469 6d65 722d 7265 -" set-itimer-re │ │ │ -0000dd00: 7374 6172 7420 6170 7065 6e64 2069 7469 start append iti │ │ │ -0000dd10: 6d65 722d 7265 7374 6172 745d 2037 2022 mer-restart] 7 " │ │ │ -0000dd20: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -0000dd30: 6d62 6461 206c 6973 743a 5c6e 2020 2869 mbda list:\n (i │ │ │ -0000dd40: 7469 6d65 722d 7265 7374 6172 7420 2672 timer-restart &r │ │ │ -0000dd50: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ -0000dd60: 6974 696d 6572 2d75 7365 732d 6172 6775 itimer-uses-argu │ │ │ -0000dd70: 6d65 6e74 7320 235b 2826 7265 7374 2061 ments #[(&rest a │ │ │ -0000dd80: 7267 7329 2022 c4c5 0b5c 221a c5c6 2119 rgs) "...\"...!. │ │ │ -0000dd90: 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 435c \n..C\n.......C\ │ │ │ -0000dda0: 222a 42c9 5c6e 42af 052a 8722 205b 7374 "*B.\nB..*." [st │ │ │ -0000ddb0: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ -0000ddc0: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ -0000ddd0: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ -0000dde0: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ -0000ddf0: 2220 7365 742d 6974 696d 6572 2d75 7365 " set-itimer-use │ │ │ -0000de00: 732d 6172 6775 6d65 6e74 7320 6170 7065 s-arguments appe │ │ │ -0000de10: 6e64 2069 7469 6d65 722d 7573 6573 2d61 nd itimer-uses-a │ │ │ -0000de20: 7267 756d 656e 7473 5d20 3720 225c 6e43 rguments] 7 "\nC │ │ │ -0000de30: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ -0000de40: 6120 6c69 7374 3a5c 6e20 2028 6974 696d a list:\n (itim │ │ │ -0000de50: 6572 2d75 7365 732d 6172 6775 6d65 6e74 er-uses-argument │ │ │ -0000de60: 7320 2672 6573 7420 4152 4753 295c 6e5c s &rest ARGS)\n\ │ │ │ -0000de70: 6e22 5d20 6974 696d 6572 2d76 616c 7565 n"] itimer-value │ │ │ -0000de80: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ -0000de90: 22c4 c50b 5c22 1ac5 c621 195c 6e0b 0943 "...\"...!.\n..C │ │ │ -0000dea0: 5c6e 1b09 18c7 c80b 0843 5c22 2a42 c95c \n.......C\"*B.\ │ │ │ -0000deb0: 6e42 af05 2a87 2220 5b73 746f 7265 202d nB..*." [store - │ │ │ -0000dec0: 2d73 746f 7265 2d2d 7465 6d70 2d2d 202d -store--temp-- - │ │ │ -0000ded0: 2d61 7267 732d 2d74 656d 702d 2d20 6172 -args--temp-- ar │ │ │ -0000dee0: 6773 206d 6170 6361 7220 6765 6e73 796d gs mapcar gensym │ │ │ -0000def0: 2022 2d2d 7374 6f72 652d 2d22 2073 6574 "--store--" set │ │ │ -0000df00: 2d69 7469 6d65 722d 7661 6c75 6520 6170 -itimer-value ap │ │ │ -0000df10: 7065 6e64 2069 7469 6d65 722d 7661 6c75 pend itimer-valu │ │ │ -0000df20: 655d 2037 2022 5c6e 436f 6d6d 6f6e 204c e] 7 "\nCommon L │ │ │ -0000df30: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ -0000df40: 5c6e 2020 2869 7469 6d65 722d 7661 6c75 \n (itimer-valu │ │ │ -0000df50: 6520 2672 6573 7420 4152 4753 295c 6e5c e &rest ARGS)\n\ │ │ │ -0000df60: 6e22 5d20 6b65 796d 6170 2d70 6172 656e n"] keymap-paren │ │ │ -0000df70: 7473 2023 5b28 2672 6573 7420 6172 6773 ts #[(&rest args │ │ │ -0000df80: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ -0000df90: 0943 5c6e 1b09 18c7 c80b 0843 5c22 2a42 .C\n.......C\"*B │ │ │ -0000dfa0: c95c 6e42 af05 2a87 2220 5b73 746f 7265 .\nB..*." [store │ │ │ -0000dfb0: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ -0000dfc0: 202d 2d61 7267 732d 2d74 656d 702d 2d20 --args--temp-- │ │ │ -0000dfd0: 6172 6773 206d 6170 6361 7220 6765 6e73 args mapcar gens │ │ │ -0000dfe0: 796d 2022 2d2d 7374 6f72 652d 2d22 2073 ym "--store--" s │ │ │ -0000dff0: 6574 2d6b 6579 6d61 702d 7061 7265 6e74 et-keymap-parent │ │ │ -0000e000: 7320 6170 7065 6e64 206b 6579 6d61 702d s append keymap- │ │ │ -0000e010: 7061 7265 6e74 735d 2037 2022 5c6e 436f parents] 7 "\nCo │ │ │ -0000e020: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ -0000e030: 206c 6973 743a 5c6e 2020 286b 6579 6d61 list:\n (keyma │ │ │ -0000e040: 702d 7061 7265 6e74 7320 2672 6573 7420 p-parents &rest │ │ │ -0000e050: 4152 4753 295c 6e5c 6e22 5d20 6d61 726b ARGS)\n\n"] mark │ │ │ -0000e060: 6572 2d69 6e73 6572 7469 6f6e 2d74 7970 er-insertion-typ │ │ │ -0000e070: 6520 235b 2826 7265 7374 2061 7267 7329 e #[(&rest args) │ │ │ -0000e080: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ -0000e090: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ -0000e0a0: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ -0000e0b0: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ -0000e0c0: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ -0000e0d0: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ -0000e0e0: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ -0000e0f0: 742d 6d61 726b 6572 2d69 6e73 6572 7469 t-marker-inserti │ │ │ -0000e100: 6f6e 2d74 7970 6520 6170 7065 6e64 206d on-type append m │ │ │ -0000e110: 6172 6b65 722d 696e 7365 7274 696f 6e2d arker-insertion- │ │ │ -0000e120: 7479 7065 5d20 3720 225c 6e43 6f6d 6d6f type] 7 "\nCommo │ │ │ -0000e130: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ -0000e140: 7374 3a5c 6e20 2028 6d61 726b 6572 2d69 st:\n (marker-i │ │ │ -0000e150: 6e73 6572 7469 6f6e 2d74 7970 6520 2672 nsertion-type &r │ │ │ -0000e160: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ -0000e170: 6d6f 7573 652d 7069 7865 6c2d 706f 7369 mouse-pixel-posi │ │ │ -0000e180: 7469 6f6e 2023 5b28 266f 7074 696f 6e61 tion #[(&optiona │ │ │ -0000e190: 6c20 6429 2022 c4c5 211a c4c6 2119 5c6e l d) "..!...!.\n │ │ │ -0000e1a0: 4308 4309 435c 6e18 091b c7c8 080b 400b C.C.C\n.......@. │ │ │ -0000e1b0: 4140 0b41 41af 050b 452a c95c 6e44 af05 A@.AA...E*.\nD.. │ │ │ -0000e1c0: 2a87 2220 5b64 202d 2d76 2d2d 7465 6d70 *." [d --v--temp │ │ │ -0000e1d0: 2d2d 202d 2d64 2d2d 7465 6d70 2d2d 2076 -- --d--temp-- v │ │ │ -0000e1e0: 2067 656e 7379 6d20 222d 2d64 2d2d 2220 gensym "--d--" │ │ │ -0000e1f0: 222d 2d76 2d2d 2220 7072 6f67 6e20 7365 "--v--" progn se │ │ │ -0000e200: 742d 6d6f 7573 652d 7069 7865 6c2d 706f t-mouse-pixel-po │ │ │ -0000e210: 7369 7469 6f6e 206d 6f75 7365 2d70 6978 sition mouse-pix │ │ │ -0000e220: 656c 2d70 6f73 6974 696f 6e5d 2039 2022 el-position] 9 " │ │ │ -0000e230: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -0000e240: 6d62 6461 206c 6973 743a 5c6e 2020 286d mbda list:\n (m │ │ │ -0000e250: 6f75 7365 2d70 6978 656c 2d70 6f73 6974 ouse-pixel-posit │ │ │ -0000e260: 696f 6e20 266f 7074 696f 6e61 6c20 4429 ion &optional D) │ │ │ -0000e270: 5c6e 5c6e 225d 2074 7275 6e63 2d73 7461 \n\n"] trunc-sta │ │ │ -0000e280: 636b 2d6c 656e 6774 6820 235b 2826 7265 ck-length #[(&re │ │ │ -0000e290: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000e2a0: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000e2b0: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ -0000e2c0: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -0000e2d0: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -0000e2e0: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -0000e2f0: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -0000e300: 7265 2d2d 2220 7365 742d 7472 756e 632d re--" set-trunc- │ │ │ -0000e310: 7374 6163 6b2d 6c65 6e67 7468 2061 7070 stack-length app │ │ │ -0000e320: 656e 6420 7472 756e 632d 7374 6163 6b2d end trunc-stack- │ │ │ -0000e330: 6c65 6e67 7468 5d20 3720 225c 6e43 6f6d length] 7 "\nCom │ │ │ -0000e340: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -0000e350: 6c69 7374 3a5c 6e20 2028 7472 756e 632d list:\n (trunc- │ │ │ -0000e360: 7374 6163 6b2d 6c65 6e67 7468 2026 7265 stack-length &re │ │ │ -0000e370: 7374 2041 5247 5329 5c6e 5c6e 225d 2074 st ARGS)\n\n"] t │ │ │ -0000e380: 7275 6e63 2d73 7461 636b 2d73 7461 636b runc-stack-stack │ │ │ -0000e390: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ -0000e3a0: 22c4 c50b 5c22 1ac5 c621 195c 6e0b 0943 "...\"...!.\n..C │ │ │ -0000e3b0: 5c6e 1b09 18c7 c80b 0843 5c22 2a42 c95c \n.......C\"*B.\ │ │ │ -0000e3c0: 6e42 af05 2a87 2220 5b73 746f 7265 202d nB..*." [store - │ │ │ -0000e3d0: 2d73 746f 7265 2d2d 7465 6d70 2d2d 202d -store--temp-- - │ │ │ -0000e3e0: 2d61 7267 732d 2d74 656d 702d 2d20 6172 -args--temp-- ar │ │ │ -0000e3f0: 6773 206d 6170 6361 7220 6765 6e73 796d gs mapcar gensym │ │ │ -0000e400: 2022 2d2d 7374 6f72 652d 2d22 2073 6574 "--store--" set │ │ │ -0000e410: 2d74 7275 6e63 2d73 7461 636b 2d73 7461 -trunc-stack-sta │ │ │ -0000e420: 636b 2061 7070 656e 6420 7472 756e 632d ck append trunc- │ │ │ -0000e430: 7374 6163 6b2d 7374 6163 6b5d 2037 2022 stack-stack] 7 " │ │ │ -0000e440: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -0000e450: 6d62 6461 206c 6973 743a 5c6e 2020 2874 mbda list:\n (t │ │ │ -0000e460: 7275 6e63 2d73 7461 636b 2d73 7461 636b runc-stack-stack │ │ │ -0000e470: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ -0000e480: 225d 2075 6e64 6f61 626c 652d 7374 6163 "] undoable-stac │ │ │ -0000e490: 6b2d 6d61 7820 235b 2826 7265 7374 2061 k-max #[(&rest a │ │ │ -0000e4a0: 7267 7329 2022 c4c5 0b5c 221a c5c6 2119 rgs) "...\"...!. │ │ │ -0000e4b0: 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 435c \n..C\n.......C\ │ │ │ -0000e4c0: 222a 42c9 5c6e 42af 052a 8722 205b 7374 "*B.\nB..*." [st │ │ │ -0000e4d0: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ -0000e4e0: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ -0000e4f0: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ -0000e500: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ -0000e510: 2220 7365 742d 756e 646f 6162 6c65 2d73 " set-undoable-s │ │ │ -0000e520: 7461 636b 2d6d 6178 2061 7070 656e 6420 tack-max append │ │ │ -0000e530: 756e 646f 6162 6c65 2d73 7461 636b 2d6d undoable-stack-m │ │ │ -0000e540: 6178 5d20 3720 225c 6e43 6f6d 6d6f 6e20 ax] 7 "\nCommon │ │ │ -0000e550: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ -0000e560: 3a5c 6e20 2028 756e 646f 6162 6c65 2d73 :\n (undoable-s │ │ │ -0000e570: 7461 636b 2d6d 6178 2026 7265 7374 2041 tack-max &rest A │ │ │ -0000e580: 5247 5329 5c6e 5c6e 225d 2077 6561 6b2d RGS)\n\n"] weak- │ │ │ -0000e590: 6c69 7374 2d6c 6973 7420 235b 2826 7265 list-list #[(&re │ │ │ -0000e5a0: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000e5b0: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000e5c0: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ -0000e5d0: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -0000e5e0: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -0000e5f0: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -0000e600: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -0000e610: 7265 2d2d 2220 7365 742d 7765 616b 2d6c re--" set-weak-l │ │ │ -0000e620: 6973 742d 6c69 7374 2061 7070 656e 6420 ist-list append │ │ │ -0000e630: 7765 616b 2d6c 6973 742d 6c69 7374 5d20 weak-list-list] │ │ │ -0000e640: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ -0000e650: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -0000e660: 2028 7765 616b 2d6c 6973 742d 6c69 7374 (weak-list-list │ │ │ -0000e670: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ -0000e680: 225d 2067 6574 656e 7620 235b 2826 7265 "] getenv #[(&re │ │ │ -0000e690: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000e6a0: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000e6b0: c90b 0843 5c22 4208 452a ca5c 6e42 af05 ...C\"B.E*.\nB.. │ │ │ -0000e6c0: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -0000e6d0: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -0000e6e0: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -0000e6f0: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -0000e700: 7374 6f72 652d 2d22 2070 726f 676e 2073 store--" progn s │ │ │ -0000e710: 6574 656e 7620 6170 7065 6e64 2067 6574 etenv append get │ │ │ -0000e720: 656e 765d 2038 2022 5c6e 436f 6d6d 6f6e env] 8 "\nCommon │ │ │ -0000e730: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -0000e740: 743a 5c6e 2020 2867 6574 656e 7620 2672 t:\n (getenv &r │ │ │ -0000e750: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ -0000e760: 6765 742d 7265 6769 7374 6572 2023 5b28 get-register #[( │ │ │ -0000e770: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ -0000e780: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ -0000e790: 18c7 c80b 0843 5c22 2a42 c95c 6e42 af05 .....C\"*B.\nB.. │ │ │ -0000e7a0: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -0000e7b0: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -0000e7c0: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -0000e7d0: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -0000e7e0: 7374 6f72 652d 2d22 2073 6574 2d72 6567 store--" set-reg │ │ │ -0000e7f0: 6973 7465 7220 6170 7065 6e64 2067 6574 ister append get │ │ │ -0000e800: 2d72 6567 6973 7465 725d 2037 2022 5c6e -register] 7 "\n │ │ │ -0000e810: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -0000e820: 6461 206c 6973 743a 5c6e 2020 2867 6574 da list:\n (get │ │ │ -0000e830: 2d72 6567 6973 7465 7220 2672 6573 7420 -register &rest │ │ │ -0000e840: 4152 4753 295c 6e5c 6e22 5d20 676c 6f62 ARGS)\n\n"] glob │ │ │ -0000e850: 616c 2d6b 6579 2d62 696e 6469 6e67 2023 al-key-binding # │ │ │ -0000e860: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ -0000e870: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ -0000e880: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ -0000e890: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ -0000e8a0: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ -0000e8b0: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ -0000e8c0: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ -0000e8d0: 2d2d 7374 6f72 652d 2d22 2067 6c6f 6261 --store--" globa │ │ │ -0000e8e0: 6c2d 7365 742d 6b65 7920 6170 7065 6e64 l-set-key append │ │ │ -0000e8f0: 2067 6c6f 6261 6c2d 6b65 792d 6269 6e64 global-key-bind │ │ │ -0000e900: 696e 675d 2037 2022 5c6e 436f 6d6d 6f6e ing] 7 "\nCommon │ │ │ -0000e910: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -0000e920: 743a 5c6e 2020 2867 6c6f 6261 6c2d 6b65 t:\n (global-ke │ │ │ -0000e930: 792d 6269 6e64 696e 6720 2672 6573 7420 y-binding &rest │ │ │ -0000e940: 4152 4753 295c 6e5c 6e22 5d20 6b65 796d ARGS)\n\n"] keym │ │ │ -0000e950: 6170 2d70 6172 656e 7420 235b 2826 7265 ap-parent #[(&re │ │ │ -0000e960: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000e970: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000e980: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ -0000e990: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -0000e9a0: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -0000e9b0: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -0000e9c0: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -0000e9d0: 7265 2d2d 2220 7365 742d 6b65 796d 6170 re--" set-keymap │ │ │ -0000e9e0: 2d70 6172 656e 7420 6170 7065 6e64 206b -parent append k │ │ │ -0000e9f0: 6579 6d61 702d 7061 7265 6e74 5d20 3720 eymap-parent] 7 │ │ │ -0000ea00: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ -0000ea10: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ -0000ea20: 6b65 796d 6170 2d70 6172 656e 7420 2672 keymap-parent &r │ │ │ -0000ea30: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ -0000ea40: 6b65 796d 6170 2d6e 616d 6520 235b 2826 keymap-name #[(& │ │ │ -0000ea50: 7265 7374 2061 7267 7329 2022 c4c5 0b5c rest args) "...\ │ │ │ -0000ea60: 221a c5c6 2119 5c6e 0b09 435c 6e1b 0918 "...!.\n..C\n... │ │ │ -0000ea70: c7c8 0b08 435c 222a 42c9 5c6e 42af 052a ....C\"*B.\nB..* │ │ │ -0000ea80: 8722 205b 7374 6f72 6520 2d2d 7374 6f72 ." [store --stor │ │ │ -0000ea90: 652d 2d74 656d 702d 2d20 2d2d 6172 6773 e--temp-- --args │ │ │ -0000eaa0: 2d2d 7465 6d70 2d2d 2061 7267 7320 6d61 --temp-- args ma │ │ │ -0000eab0: 7063 6172 2067 656e 7379 6d20 222d 2d73 pcar gensym "--s │ │ │ -0000eac0: 746f 7265 2d2d 2220 7365 742d 6b65 796d tore--" set-keym │ │ │ -0000ead0: 6170 2d6e 616d 6520 6170 7065 6e64 206b ap-name append k │ │ │ -0000eae0: 6579 6d61 702d 6e61 6d65 5d20 3720 225c eymap-name] 7 "\ │ │ │ -0000eaf0: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ -0000eb00: 6264 6120 6c69 7374 3a5c 6e20 2028 6b65 bda list:\n (ke │ │ │ -0000eb10: 796d 6170 2d6e 616d 6520 2672 6573 7420 ymap-name &rest │ │ │ -0000eb20: 4152 4753 295c 6e5c 6e22 5d20 6b65 796d ARGS)\n\n"] keym │ │ │ -0000eb30: 6170 2d70 726f 6d70 7420 235b 2826 7265 ap-prompt #[(&re │ │ │ -0000eb40: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000eb50: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000eb60: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ -0000eb70: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -0000eb80: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -0000eb90: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -0000eba0: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -0000ebb0: 7265 2d2d 2220 7365 742d 6b65 796d 6170 re--" set-keymap │ │ │ -0000ebc0: 2d70 726f 6d70 7420 6170 7065 6e64 206b -prompt append k │ │ │ -0000ebd0: 6579 6d61 702d 7072 6f6d 7074 5d20 3720 eymap-prompt] 7 │ │ │ -0000ebe0: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ -0000ebf0: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ -0000ec00: 6b65 796d 6170 2d70 726f 6d70 7420 2672 keymap-prompt &r │ │ │ -0000ec10: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ -0000ec20: 6b65 796d 6170 2d64 6566 6175 6c74 2d62 keymap-default-b │ │ │ -0000ec30: 696e 6469 6e67 2023 5b28 2672 6573 7420 inding #[(&rest │ │ │ -0000ec40: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ -0000ec50: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ -0000ec60: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ -0000ec70: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ -0000ec80: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ -0000ec90: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ -0000eca0: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ -0000ecb0: 2d22 2073 6574 2d6b 6579 6d61 702d 6465 -" set-keymap-de │ │ │ -0000ecc0: 6661 756c 742d 6269 6e64 696e 6720 6170 fault-binding ap │ │ │ -0000ecd0: 7065 6e64 206b 6579 6d61 702d 6465 6661 pend keymap-defa │ │ │ -0000ece0: 756c 742d 6269 6e64 696e 675d 2037 2022 ult-binding] 7 " │ │ │ -0000ecf0: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -0000ed00: 6d62 6461 206c 6973 743a 5c6e 2020 286b mbda list:\n (k │ │ │ -0000ed10: 6579 6d61 702d 6465 6661 756c 742d 6269 eymap-default-bi │ │ │ -0000ed20: 6e64 696e 6720 2672 6573 7420 4152 4753 nding &rest ARGS │ │ │ -0000ed30: 295c 6e5c 6e22 5d20 6c6f 6361 6c2d 6b65 )\n\n"] local-ke │ │ │ -0000ed40: 792d 6269 6e64 696e 6720 235b 2826 7265 y-binding #[(&re │ │ │ -0000ed50: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000ed60: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000ed70: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ -0000ed80: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -0000ed90: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -0000eda0: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -0000edb0: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -0000edc0: 7265 2d2d 2220 6c6f 6361 6c2d 7365 742d re--" local-set- │ │ │ -0000edd0: 6b65 7920 6170 7065 6e64 206c 6f63 616c key append local │ │ │ -0000ede0: 2d6b 6579 2d62 696e 6469 6e67 5d20 3720 -key-binding] 7 │ │ │ -0000edf0: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ -0000ee00: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ -0000ee10: 6c6f 6361 6c2d 6b65 792d 6269 6e64 696e local-key-bindin │ │ │ -0000ee20: 6720 2672 6573 7420 4152 4753 295c 6e5c g &rest ARGS)\n\ │ │ │ -0000ee30: 6e22 5d20 6d61 726b 2023 5b28 2672 6573 n"] mark #[(&res │ │ │ -0000ee40: 7420 6172 6773 2920 22c4 c50b 5c22 1ac5 t args) "...\".. │ │ │ -0000ee50: c621 195c 6e0b 0943 5c6e 1b09 18c7 c8c9 .!.\n..C\n...... │ │ │ -0000ee60: 0b08 435c 2242 0845 2aca 5c6e 42af 052a ..C\"B.E*.\nB..* │ │ │ -0000ee70: 8722 205b 7374 6f72 6520 2d2d 7374 6f72 ." [store --stor │ │ │ -0000ee80: 652d 2d74 656d 702d 2d20 2d2d 6172 6773 e--temp-- --args │ │ │ -0000ee90: 2d2d 7465 6d70 2d2d 2061 7267 7320 6d61 --temp-- args ma │ │ │ -0000eea0: 7063 6172 2067 656e 7379 6d20 222d 2d73 pcar gensym "--s │ │ │ -0000eeb0: 746f 7265 2d2d 2220 7072 6f67 6e20 7365 tore--" progn se │ │ │ -0000eec0: 742d 6d61 726b 2061 7070 656e 6420 6d61 t-mark append ma │ │ │ -0000eed0: 726b 5d20 3820 225c 6e43 6f6d 6d6f 6e20 rk] 8 "\nCommon │ │ │ -0000eee0: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ -0000eef0: 3a5c 6e20 2028 6d61 726b 2026 7265 7374 :\n (mark &rest │ │ │ -0000ef00: 2041 5247 5329 5c6e 5c6e 225d 206d 6172 ARGS)\n\n"] mar │ │ │ -0000ef10: 6b2d 6d61 726b 6572 2023 5b28 2672 6573 k-marker #[(&res │ │ │ -0000ef20: 7420 6172 6773 2920 22c4 c50b 5c22 1ac5 t args) "...\".. │ │ │ -0000ef30: c621 195c 6e0b 0943 5c6e 1b09 18c7 c8c9 .!.\n..C\n...... │ │ │ -0000ef40: 0b08 435c 2242 0845 2aca 5c6e 42af 052a ..C\"B.E*.\nB..* │ │ │ -0000ef50: 8722 205b 7374 6f72 6520 2d2d 7374 6f72 ." [store --stor │ │ │ -0000ef60: 652d 2d74 656d 702d 2d20 2d2d 6172 6773 e--temp-- --args │ │ │ -0000ef70: 2d2d 7465 6d70 2d2d 2061 7267 7320 6d61 --temp-- args ma │ │ │ -0000ef80: 7063 6172 2067 656e 7379 6d20 222d 2d73 pcar gensym "--s │ │ │ -0000ef90: 746f 7265 2d2d 2220 7072 6f67 6e20 7365 tore--" progn se │ │ │ -0000efa0: 742d 6d61 726b 2061 7070 656e 6420 6d61 t-mark append ma │ │ │ -0000efb0: 726b 2d6d 6172 6b65 725d 2038 2022 5c6e rk-marker] 8 "\n │ │ │ -0000efc0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -0000efd0: 6461 206c 6973 743a 5c6e 2020 286d 6172 da list:\n (mar │ │ │ -0000efe0: 6b2d 6d61 726b 6572 2026 7265 7374 2041 k-marker &rest A │ │ │ -0000eff0: 5247 5329 5c6e 5c6e 225d 206d 6172 6b65 RGS)\n\n"] marke │ │ │ -0000f000: 722d 706f 7369 7469 6f6e 2023 5b28 2672 r-position #[(&r │ │ │ -0000f010: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ -0000f020: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ -0000f030: c8c9 0b08 435c 2242 0845 2aca 5c6e 42af ....C\"B.E*.\nB. │ │ │ -0000f040: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ -0000f050: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ -0000f060: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ -0000f070: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ -0000f080: 2d73 746f 7265 2d2d 2220 7072 6f67 6e20 -store--" progn │ │ │ -0000f090: 7365 742d 6d61 726b 6572 2061 7070 656e set-marker appen │ │ │ -0000f0a0: 6420 6d61 726b 6572 2d70 6f73 6974 696f d marker-positio │ │ │ -0000f0b0: 6e5d 2038 2022 5c6e 436f 6d6d 6f6e 204c n] 8 "\nCommon L │ │ │ -0000f0c0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ -0000f0d0: 5c6e 2020 286d 6172 6b65 722d 706f 7369 \n (marker-posi │ │ │ -0000f0e0: 7469 6f6e 2026 7265 7374 2041 5247 5329 tion &rest ARGS) │ │ │ -0000f0f0: 5c6e 5c6e 225d 206d 6174 6368 2d64 6174 \n\n"] match-dat │ │ │ -0000f100: 6120 235b 2826 7265 7374 2061 7267 7329 a #[(&rest args) │ │ │ -0000f110: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ -0000f120: 435c 6e1b 0918 c7c8 c90b 0843 5c22 4208 C\n........C\"B. │ │ │ -0000f130: 452a ca5c 6e42 af05 2a87 2220 5b73 746f E*.\nB..*." [sto │ │ │ -0000f140: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ -0000f150: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ -0000f160: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ -0000f170: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ -0000f180: 2070 726f 676e 2073 746f 7265 2d6d 6174 progn store-mat │ │ │ -0000f190: 6368 2d64 6174 6120 6170 7065 6e64 206d ch-data append m │ │ │ -0000f1a0: 6174 6368 2d64 6174 615d 2038 2022 5c6e atch-data] 8 "\n │ │ │ -0000f1b0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -0000f1c0: 6461 206c 6973 743a 5c6e 2020 286d 6174 da list:\n (mat │ │ │ -0000f1d0: 6368 2d64 6174 6120 2672 6573 7420 4152 ch-data &rest AR │ │ │ -0000f1e0: 4753 295c 6e5c 6e22 5d20 6d6f 7573 652d GS)\n\n"] mouse- │ │ │ -0000f1f0: 706f 7369 7469 6f6e 2023 5b28 7363 7229 position #[(scr) │ │ │ -0000f200: 2022 c4c5 211b c4c6 2119 0b43 0843 0943 "..!...!..C.C.C │ │ │ -0000f210: 0b18 091a c708 c85c 6e44 c95c 6e44 ca5c .......\nD.\nD.\ │ │ │ -0000f220: 6e44 af05 2acb 0b44 af05 2a87 2220 5b73 nD..*..D..*." [s │ │ │ -0000f230: 6372 202d 2d73 746f 7265 2d2d 7465 6d70 cr --store--temp │ │ │ -0000f240: 2d2d 2073 746f 7265 202d 2d73 6372 2d2d -- store --scr-- │ │ │ -0000f250: 7465 6d70 2d2d 2067 656e 7379 6d20 222d temp-- gensym "- │ │ │ -0000f260: 2d73 6372 2d2d 2220 222d 2d73 746f 7265 -scr--" "--store │ │ │ -0000f270: 2d2d 2220 7365 742d 6d6f 7573 652d 706f --" set-mouse-po │ │ │ -0000f280: 7369 7469 6f6e 2063 6172 2063 6164 7220 sition car cadr │ │ │ -0000f290: 6364 6472 206d 6f75 7365 2d70 6f73 6974 cddr mouse-posit │ │ │ -0000f2a0: 696f 6e5d 2039 2022 5c6e 436f 6d6d 6f6e ion] 9 "\nCommon │ │ │ -0000f2b0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -0000f2c0: 743a 5c6e 2020 286d 6f75 7365 2d70 6f73 t:\n (mouse-pos │ │ │ -0000f2d0: 6974 696f 6e20 5343 5229 5c6e 5c6e 225d ition SCR)\n\n"] │ │ │ -0000f2e0: 206f 7665 726c 6179 2d67 6574 2023 5b28 overlay-get #[( │ │ │ -0000f2f0: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ -0000f300: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ -0000f310: 18c7 c80b 0843 5c22 2a42 c95c 6e42 af05 .....C\"*B.\nB.. │ │ │ -0000f320: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -0000f330: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -0000f340: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -0000f350: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -0000f360: 7374 6f72 652d 2d22 206f 7665 726c 6179 store--" overlay │ │ │ -0000f370: 2d70 7574 2061 7070 656e 6420 6f76 6572 -put append over │ │ │ -0000f380: 6c61 792d 6765 745d 2037 2022 5c6e 436f lay-get] 7 "\nCo │ │ │ -0000f390: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ -0000f3a0: 206c 6973 743a 5c6e 2020 286f 7665 726c list:\n (overl │ │ │ -0000f3b0: 6179 2d67 6574 2026 7265 7374 2041 5247 ay-get &rest ARG │ │ │ -0000f3c0: 5329 5c6e 5c6e 225d 206f 7665 726c 6179 S)\n\n"] overlay │ │ │ -0000f3d0: 2d73 7461 7274 2023 5b28 6f76 2920 22c4 -start #[(ov) ". │ │ │ -0000f3e0: c521 1bc4 c621 190b 435c 6e43 0943 0b1a .!...!..C\nC.C.. │ │ │ -0000f3f0: 0918 c7c8 5c6e 08c9 5c6e 4446 0845 2aca ....\n..\nDF.E*. │ │ │ -0000f400: 0b44 af05 2a87 2220 5b73 746f 7265 202d .D..*." [store - │ │ │ -0000f410: 2d73 746f 7265 2d2d 7465 6d70 2d2d 206f -store--temp-- o │ │ │ -0000f420: 7620 2d2d 6f76 2d2d 7465 6d70 2d2d 2067 v --ov--temp-- g │ │ │ -0000f430: 656e 7379 6d20 222d 2d6f 762d 2d22 2022 ensym "--ov--" " │ │ │ -0000f440: 2d2d 7374 6f72 652d 2d22 2070 726f 676e --store--" progn │ │ │ -0000f450: 206d 6f76 652d 6f76 6572 6c61 7920 6f76 move-overlay ov │ │ │ -0000f460: 6572 6c61 792d 656e 6420 6f76 6572 6c61 erlay-end overla │ │ │ -0000f470: 792d 7374 6172 745d 2039 2022 5c6e 436f y-start] 9 "\nCo │ │ │ -0000f480: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ -0000f490: 206c 6973 743a 5c6e 2020 286f 7665 726c list:\n (overl │ │ │ -0000f4a0: 6179 2d73 7461 7274 204f 5629 5c6e 5c6e ay-start OV)\n\n │ │ │ -0000f4b0: 225d 206f 7665 726c 6179 2d65 6e64 2023 "] overlay-end # │ │ │ -0000f4c0: 5b28 6f76 2920 22c4 c521 1bc4 c621 190b [(ov) "..!...!.. │ │ │ -0000f4d0: 435c 6e43 0943 0b1a 0918 c7c8 5c6e c95c C\nC.C......\n.\ │ │ │ -0000f4e0: 6e44 0846 0845 2aca 0b44 af05 2a87 2220 nD.F.E*..D..*." │ │ │ -0000f4f0: 5b73 746f 7265 202d 2d73 746f 7265 2d2d [store --store-- │ │ │ -0000f500: 7465 6d70 2d2d 206f 7620 2d2d 6f76 2d2d temp-- ov --ov-- │ │ │ -0000f510: 7465 6d70 2d2d 2067 656e 7379 6d20 222d temp-- gensym "- │ │ │ -0000f520: 2d6f 762d 2d22 2022 2d2d 7374 6f72 652d -ov--" "--store- │ │ │ -0000f530: 2d22 2070 726f 676e 206d 6f76 652d 6f76 -" progn move-ov │ │ │ -0000f540: 6572 6c61 7920 6f76 6572 6c61 792d 7374 erlay overlay-st │ │ │ -0000f550: 6172 7420 6f76 6572 6c61 792d 656e 645d art overlay-end] │ │ │ -0000f560: 2038 2022 5c6e 436f 6d6d 6f6e 204c 6973 8 "\nCommon Lis │ │ │ -0000f570: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ -0000f580: 2020 286f 7665 726c 6179 2d65 6e64 204f (overlay-end O │ │ │ -0000f590: 5629 5c6e 5c6e 225d 2070 6f69 6e74 2023 V)\n\n"] point # │ │ │ -0000f5a0: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ -0000f5b0: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ -0000f5c0: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ -0000f5d0: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ -0000f5e0: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ -0000f5f0: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ -0000f600: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ -0000f610: 2d2d 7374 6f72 652d 2d22 2067 6f74 6f2d --store--" goto- │ │ │ -0000f620: 6368 6172 2061 7070 656e 6420 706f 696e char append poin │ │ │ -0000f630: 745d 2037 2022 5c6e 436f 6d6d 6f6e 204c t] 7 "\nCommon L │ │ │ -0000f640: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ -0000f650: 5c6e 2020 2870 6f69 6e74 2026 7265 7374 \n (point &rest │ │ │ -0000f660: 2041 5247 5329 5c6e 5c6e 225d 2070 6f69 ARGS)\n\n"] poi │ │ │ -0000f670: 6e74 2d6d 6172 6b65 7220 235b 2826 7265 nt-marker #[(&re │ │ │ -0000f680: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000f690: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000f6a0: c90b 0843 5c22 4208 452a ca5c 6e42 af05 ...C\"B.E*.\nB.. │ │ │ -0000f6b0: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -0000f6c0: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -0000f6d0: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -0000f6e0: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -0000f6f0: 7374 6f72 652d 2d22 2070 726f 676e 2067 store--" progn g │ │ │ -0000f700: 6f74 6f2d 6368 6172 2061 7070 656e 6420 oto-char append │ │ │ -0000f710: 706f 696e 742d 6d61 726b 6572 5d20 3820 point-marker] 8 │ │ │ -0000f720: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ -0000f730: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ -0000f740: 706f 696e 742d 6d61 726b 6572 2026 7265 point-marker &re │ │ │ -0000f750: 7374 2041 5247 5329 5c6e 5c6e 225d 2070 st ARGS)\n\n"] p │ │ │ -0000f760: 6f69 6e74 2d6d 6178 2023 5b6e 696c 2022 oint-max #[nil " │ │ │ -0000f770: c2c3 2119 c489 0943 0918 c5c6 c708 4508 ..!....C......E. │ │ │ -0000f780: 4529 c843 af05 2987 2220 5b73 746f 7265 E).C..)." [store │ │ │ -0000f790: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ -0000f7a0: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ -0000f7b0: 2d2d 2220 6e69 6c20 7072 6f67 6e20 6e61 --" nil progn na │ │ │ -0000f7c0: 7272 6f77 2d74 6f2d 7265 6769 6f6e 2028 rrow-to-region ( │ │ │ -0000f7d0: 706f 696e 742d 6d69 6e29 2070 6f69 6e74 point-min) point │ │ │ -0000f7e0: 2d6d 6178 5d20 3720 225c 6e43 6f6d 6d6f -max] 7 "\nCommo │ │ │ -0000f7f0: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ -0000f800: 7374 3a5c 6e20 2028 706f 696e 742d 6d61 st:\n (point-ma │ │ │ -0000f810: 7829 5c6e 5c6e 225d 2070 6f69 6e74 2d6d x)\n\n"] point-m │ │ │ -0000f820: 696e 2023 5b6e 696c 2022 c2c3 2119 c489 in #[nil "..!... │ │ │ -0000f830: 0943 0918 c5c6 08c7 4508 4529 c843 af05 .C......E.E).C.. │ │ │ -0000f840: 2987 2220 5b73 746f 7265 202d 2d73 746f )." [store --sto │ │ │ -0000f850: 7265 2d2d 7465 6d70 2d2d 2067 656e 7379 re--temp-- gensy │ │ │ -0000f860: 6d20 222d 2d73 746f 7265 2d2d 2220 6e69 m "--store--" ni │ │ │ -0000f870: 6c20 7072 6f67 6e20 6e61 7272 6f77 2d74 l progn narrow-t │ │ │ -0000f880: 6f2d 7265 6769 6f6e 2028 706f 696e 742d o-region (point- │ │ │ -0000f890: 6d61 7829 2070 6f69 6e74 2d6d 696e 5d20 max) point-min] │ │ │ -0000f8a0: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ -0000f8b0: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -0000f8c0: 2028 706f 696e 742d 6d69 6e29 5c6e 5c6e (point-min)\n\n │ │ │ -0000f8d0: 225d 2070 726f 6365 7373 2d62 7566 6665 "] process-buffe │ │ │ -0000f8e0: 7220 235b 2826 7265 7374 2061 7267 7329 r #[(&rest args) │ │ │ -0000f8f0: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ -0000f900: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ -0000f910: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ -0000f920: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ -0000f930: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ -0000f940: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ -0000f950: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ -0000f960: 742d 7072 6f63 6573 732d 6275 6666 6572 t-process-buffer │ │ │ -0000f970: 2061 7070 656e 6420 7072 6f63 6573 732d append process- │ │ │ -0000f980: 6275 6666 6572 5d20 3720 225c 6e43 6f6d buffer] 7 "\nCom │ │ │ -0000f990: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -0000f9a0: 6c69 7374 3a5c 6e20 2028 7072 6f63 6573 list:\n (proces │ │ │ -0000f9b0: 732d 6275 6666 6572 2026 7265 7374 2041 s-buffer &rest A │ │ │ -0000f9c0: 5247 5329 5c6e 5c6e 225d 2070 726f 6365 RGS)\n\n"] proce │ │ │ -0000f9d0: 7373 2d66 696c 7465 7220 235b 2826 7265 ss-filter #[(&re │ │ │ -0000f9e0: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000f9f0: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000fa00: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ -0000fa10: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -0000fa20: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -0000fa30: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -0000fa40: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -0000fa50: 7265 2d2d 2220 7365 742d 7072 6f63 6573 re--" set-proces │ │ │ -0000fa60: 732d 6669 6c74 6572 2061 7070 656e 6420 s-filter append │ │ │ -0000fa70: 7072 6f63 6573 732d 6669 6c74 6572 5d20 process-filter] │ │ │ -0000fa80: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ -0000fa90: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -0000faa0: 2028 7072 6f63 6573 732d 6669 6c74 6572 (process-filter │ │ │ -0000fab0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ -0000fac0: 225d 2070 726f 6365 7373 2d73 656e 7469 "] process-senti │ │ │ -0000fad0: 6e65 6c20 235b 2826 7265 7374 2061 7267 nel #[(&rest arg │ │ │ -0000fae0: 7329 2022 c4c5 0b5c 221a c5c6 2119 5c6e s) "...\"...!.\n │ │ │ -0000faf0: 0b09 435c 6e1b 0918 c7c8 0b08 435c 222a ..C\n.......C\"* │ │ │ -0000fb00: 42c9 5c6e 42af 052a 8722 205b 7374 6f72 B.\nB..*." [stor │ │ │ -0000fb10: 6520 2d2d 7374 6f72 652d 2d74 656d 702d e --store--temp- │ │ │ -0000fb20: 2d20 2d2d 6172 6773 2d2d 7465 6d70 2d2d - --args--temp-- │ │ │ -0000fb30: 2061 7267 7320 6d61 7063 6172 2067 656e args mapcar gen │ │ │ -0000fb40: 7379 6d20 222d 2d73 746f 7265 2d2d 2220 sym "--store--" │ │ │ -0000fb50: 7365 742d 7072 6f63 6573 732d 7365 6e74 set-process-sent │ │ │ -0000fb60: 696e 656c 2061 7070 656e 6420 7072 6f63 inel append proc │ │ │ -0000fb70: 6573 732d 7365 6e74 696e 656c 5d20 3720 ess-sentinel] 7 │ │ │ -0000fb80: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ -0000fb90: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ -0000fba0: 7072 6f63 6573 732d 7365 6e74 696e 656c process-sentinel │ │ │ -0000fbb0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ -0000fbc0: 225d 2072 6561 642d 6d6f 7573 652d 706f "] read-mouse-po │ │ │ -0000fbd0: 7369 7469 6f6e 2023 5b28 7363 7229 2022 sition #[(scr) " │ │ │ -0000fbe0: c4c5 211b c4c6 211a 0b43 0943 5c6e 430b ..!...!..C.C\nC. │ │ │ -0000fbf0: 195c 6e18 c709 c808 44c9 0844 462a ca0b .\n.....D..DF*.. │ │ │ -0000fc00: 44af 052a 8722 205b 7374 6f72 6520 7363 D..*." [store sc │ │ │ -0000fc10: 7220 2d2d 7374 6f72 652d 2d74 656d 702d r --store--temp- │ │ │ -0000fc20: 2d20 2d2d 7363 722d 2d74 656d 702d 2d20 - --scr--temp-- │ │ │ -0000fc30: 6765 6e73 796d 2022 2d2d 7363 722d 2d22 gensym "--scr--" │ │ │ -0000fc40: 2022 2d2d 7374 6f72 652d 2d22 2073 6574 "--store--" set │ │ │ -0000fc50: 2d6d 6f75 7365 2d70 6f73 6974 696f 6e20 -mouse-position │ │ │ -0000fc60: 6361 7220 6364 7220 7265 6164 2d6d 6f75 car cdr read-mou │ │ │ -0000fc70: 7365 2d70 6f73 6974 696f 6e5d 2038 2022 se-position] 8 " │ │ │ -0000fc80: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ -0000fc90: 6d62 6461 206c 6973 743a 5c6e 2020 2872 mbda list:\n (r │ │ │ -0000fca0: 6561 642d 6d6f 7573 652d 706f 7369 7469 ead-mouse-positi │ │ │ -0000fcb0: 6f6e 2053 4352 295c 6e5c 6e22 5d20 7365 on SCR)\n\n"] se │ │ │ -0000fcc0: 6c65 6374 6564 2d77 696e 646f 7720 235b lected-window #[ │ │ │ -0000fcd0: 2826 7265 7374 2061 7267 7329 2022 c4c5 (&rest args) ".. │ │ │ -0000fce0: 0b5c 221a c5c6 2119 5c6e 0b09 435c 6e1b .\"...!.\n..C\n. │ │ │ -0000fcf0: 0918 c7c8 0b08 435c 222a 42c9 5c6e 42af ......C\"*B.\nB. │ │ │ -0000fd00: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ -0000fd10: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ -0000fd20: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ -0000fd30: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ -0000fd40: 2d73 746f 7265 2d2d 2220 7365 6c65 6374 -store--" select │ │ │ -0000fd50: 2d77 696e 646f 7720 6170 7065 6e64 2073 -window append s │ │ │ -0000fd60: 656c 6563 7465 642d 7769 6e64 6f77 5d20 elected-window] │ │ │ -0000fd70: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ -0000fd80: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -0000fd90: 2028 7365 6c65 6374 6564 2d77 696e 646f (selected-windo │ │ │ -0000fda0: 7720 2672 6573 7420 4152 4753 295c 6e5c w &rest ARGS)\n\ │ │ │ -0000fdb0: 6e22 5d20 7365 6c65 6374 6564 2d66 7261 n"] selected-fra │ │ │ -0000fdc0: 6d65 2023 5b28 2672 6573 7420 6172 6773 me #[(&rest args │ │ │ -0000fdd0: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ -0000fde0: 0943 5c6e 1b09 18c7 c80b 0843 5c22 2a42 .C\n.......C\"*B │ │ │ -0000fdf0: c95c 6e42 af05 2a87 2220 5b73 746f 7265 .\nB..*." [store │ │ │ -0000fe00: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ -0000fe10: 202d 2d61 7267 732d 2d74 656d 702d 2d20 --args--temp-- │ │ │ -0000fe20: 6172 6773 206d 6170 6361 7220 6765 6e73 args mapcar gens │ │ │ -0000fe30: 796d 2022 2d2d 7374 6f72 652d 2d22 2073 ym "--store--" s │ │ │ -0000fe40: 656c 6563 742d 6672 616d 6520 6170 7065 elect-frame appe │ │ │ -0000fe50: 6e64 2073 656c 6563 7465 642d 6672 616d nd selected-fram │ │ │ -0000fe60: 655d 2037 2022 5c6e 436f 6d6d 6f6e 204c e] 7 "\nCommon L │ │ │ -0000fe70: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ -0000fe80: 5c6e 2020 2873 656c 6563 7465 642d 6672 \n (selected-fr │ │ │ -0000fe90: 616d 6520 2672 6573 7420 4152 4753 295c ame &rest ARGS)\ │ │ │ -0000fea0: 6e5c 6e22 5d20 7374 616e 6461 7264 2d63 n\n"] standard-c │ │ │ -0000feb0: 6173 652d 7461 626c 6520 235b 2826 7265 ase-table #[(&re │ │ │ -0000fec0: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -0000fed0: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -0000fee0: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ -0000fef0: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -0000ff00: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -0000ff10: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -0000ff20: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -0000ff30: 7265 2d2d 2220 7365 742d 7374 616e 6461 re--" set-standa │ │ │ -0000ff40: 7264 2d63 6173 652d 7461 626c 6520 6170 rd-case-table ap │ │ │ -0000ff50: 7065 6e64 2073 7461 6e64 6172 642d 6361 pend standard-ca │ │ │ -0000ff60: 7365 2d74 6162 6c65 5d20 3720 225c 6e43 se-table] 7 "\nC │ │ │ -0000ff70: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ -0000ff80: 6120 6c69 7374 3a5c 6e20 2028 7374 616e a list:\n (stan │ │ │ -0000ff90: 6461 7264 2d63 6173 652d 7461 626c 6520 dard-case-table │ │ │ -0000ffa0: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ -0000ffb0: 5d20 7379 6e74 6178 2d74 6162 6c65 2023 ] syntax-table # │ │ │ -0000ffc0: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ -0000ffd0: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ -0000ffe0: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ -0000fff0: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ -00010000: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ -00010010: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ -00010020: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ -00010030: 2d2d 7374 6f72 652d 2d22 2073 6574 2d73 --store--" set-s │ │ │ -00010040: 796e 7461 782d 7461 626c 6520 6170 7065 yntax-table appe │ │ │ -00010050: 6e64 2073 796e 7461 782d 7461 626c 655d nd syntax-table] │ │ │ -00010060: 2037 2022 5c6e 436f 6d6d 6f6e 204c 6973 7 "\nCommon Lis │ │ │ -00010070: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ -00010080: 2020 2873 796e 7461 782d 7461 626c 6520 (syntax-table │ │ │ -00010090: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ -000100a0: 5d20 7669 7369 7465 642d 6669 6c65 2d6d ] visited-file-m │ │ │ -000100b0: 6f64 7469 6d65 2023 5b28 2672 6573 7420 odtime #[(&rest │ │ │ -000100c0: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ -000100d0: 195c 6e0b 0943 5c6e 1b09 18c7 c8c9 0b08 .\n..C\n........ │ │ │ -000100e0: 435c 2242 0845 2aca 5c6e 42af 052a 8722 C\"B.E*.\nB..*." │ │ │ -000100f0: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ -00010100: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ -00010110: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ -00010120: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ -00010130: 7265 2d2d 2220 7072 6f67 6e20 7365 742d re--" progn set- │ │ │ -00010140: 7669 7369 7465 642d 6669 6c65 2d6d 6f64 visited-file-mod │ │ │ -00010150: 7469 6d65 2061 7070 656e 6420 7669 7369 time append visi │ │ │ -00010160: 7465 642d 6669 6c65 2d6d 6f64 7469 6d65 ted-file-modtime │ │ │ -00010170: 5d20 3820 225c 6e43 6f6d 6d6f 6e20 4c69 ] 8 "\nCommon Li │ │ │ -00010180: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ -00010190: 6e20 2028 7669 7369 7465 642d 6669 6c65 n (visited-file │ │ │ -000101a0: 2d6d 6f64 7469 6d65 2026 7265 7374 2041 -modtime &rest A │ │ │ -000101b0: 5247 5329 5c6e 5c6e 225d 2077 696e 646f RGS)\n\n"] windo │ │ │ -000101c0: 772d 6275 6666 6572 2023 5b28 2672 6573 w-buffer #[(&res │ │ │ -000101d0: 7420 6172 6773 2920 22c4 c50b 5c22 1ac5 t args) "...\".. │ │ │ -000101e0: c621 195c 6e0b 0943 5c6e 1b09 18c7 c8c9 .!.\n..C\n...... │ │ │ -000101f0: 0b08 435c 2242 0845 2aca 5c6e 42af 052a ..C\"B.E*.\nB..* │ │ │ -00010200: 8722 205b 7374 6f72 6520 2d2d 7374 6f72 ." [store --stor │ │ │ -00010210: 652d 2d74 656d 702d 2d20 2d2d 6172 6773 e--temp-- --args │ │ │ -00010220: 2d2d 7465 6d70 2d2d 2061 7267 7320 6d61 --temp-- args ma │ │ │ -00010230: 7063 6172 2067 656e 7379 6d20 222d 2d73 pcar gensym "--s │ │ │ -00010240: 746f 7265 2d2d 2220 7072 6f67 6e20 7365 tore--" progn se │ │ │ -00010250: 742d 7769 6e64 6f77 2d62 7566 6665 7220 t-window-buffer │ │ │ -00010260: 6170 7065 6e64 2077 696e 646f 772d 6275 append window-bu │ │ │ -00010270: 6666 6572 5d20 3820 225c 6e43 6f6d 6d6f ffer] 8 "\nCommo │ │ │ -00010280: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ -00010290: 7374 3a5c 6e20 2028 7769 6e64 6f77 2d62 st:\n (window-b │ │ │ -000102a0: 7566 6665 7220 2672 6573 7420 4152 4753 uffer &rest ARGS │ │ │ -000102b0: 295c 6e5c 6e22 5d20 7769 6e64 6f77 2d64 )\n\n"] window-d │ │ │ -000102c0: 6973 706c 6179 2d74 6162 6c65 2023 5b28 isplay-table #[( │ │ │ -000102d0: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ -000102e0: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ -000102f0: 18c7 c8c9 0b08 435c 2242 0845 2aca 5c6e ......C\"B.E*.\n │ │ │ -00010300: 42af 052a 8722 205b 7374 6f72 6520 2d2d B..*." [store -- │ │ │ -00010310: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ -00010320: 6172 6773 2d2d 7465 6d70 2d2d 2061 7267 args--temp-- arg │ │ │ -00010330: 7320 6d61 7063 6172 2067 656e 7379 6d20 s mapcar gensym │ │ │ -00010340: 222d 2d73 746f 7265 2d2d 2220 7072 6f67 "--store--" prog │ │ │ -00010350: 6e20 7365 742d 7769 6e64 6f77 2d64 6973 n set-window-dis │ │ │ -00010360: 706c 6179 2d74 6162 6c65 2061 7070 656e play-table appen │ │ │ -00010370: 6420 7769 6e64 6f77 2d64 6973 706c 6179 d window-display │ │ │ -00010380: 2d74 6162 6c65 5d20 3820 225c 6e43 6f6d -table] 8 "\nCom │ │ │ -00010390: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -000103a0: 6c69 7374 3a5c 6e20 2028 7769 6e64 6f77 list:\n (window │ │ │ -000103b0: 2d64 6973 706c 6179 2d74 6162 6c65 2026 -display-table & │ │ │ -000103c0: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ -000103d0: 2077 696e 646f 772d 6465 6469 6361 7465 window-dedicate │ │ │ -000103e0: 642d 7020 235b 2826 7265 7374 2061 7267 d-p #[(&rest arg │ │ │ -000103f0: 7329 2022 c4c5 0b5c 221a c5c6 2119 5c6e s) "...\"...!.\n │ │ │ -00010400: 0b09 435c 6e1b 0918 c7c8 c90b 0843 5c22 ..C\n........C\" │ │ │ -00010410: 4208 452a ca5c 6e42 af05 2a87 2220 5b73 B.E*.\nB..*." [s │ │ │ -00010420: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ -00010430: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ -00010440: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ -00010450: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ -00010460: 2d22 2070 726f 676e 2073 6574 2d77 696e -" progn set-win │ │ │ -00010470: 646f 772d 6465 6469 6361 7465 642d 7020 dow-dedicated-p │ │ │ -00010480: 6170 7065 6e64 2077 696e 646f 772d 6465 append window-de │ │ │ -00010490: 6469 6361 7465 642d 705d 2038 2022 5c6e dicated-p] 8 "\n │ │ │ -000104a0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -000104b0: 6461 206c 6973 743a 5c6e 2020 2877 696e da list:\n (win │ │ │ -000104c0: 646f 772d 6465 6469 6361 7465 642d 7020 dow-dedicated-p │ │ │ -000104d0: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ -000104e0: 5d20 7769 6e64 6f77 2d68 6569 6768 7420 ] window-height │ │ │ -000104f0: 235b 2826 6f70 7469 6f6e 616c 2077 696e #[(&optional win │ │ │ -00010500: 646f 7729 2022 c4c5 211b c4c6 211a 0b43 dow) "..!...!..C │ │ │ -00010510: 0943 5c6e 430b 195c 6e18 c7c8 c908 ca42 .C\nC..\n......B │ │ │ -00010520: 42cb 0946 0845 2acc 0b44 af05 2a87 2220 B..F.E*..D..*." │ │ │ -00010530: 5b73 746f 7265 2077 696e 646f 7720 2d2d [store window -- │ │ │ -00010540: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ -00010550: 7769 6e64 6f77 2d2d 7465 6d70 2d2d 2067 window--temp-- g │ │ │ -00010560: 656e 7379 6d20 222d 2d77 696e 646f 772d ensym "--window- │ │ │ -00010570: 2d22 2022 2d2d 7374 6f72 652d 2d22 2070 -" "--store--" p │ │ │ -00010580: 726f 676e 2065 6e6c 6172 6765 2d77 696e rogn enlarge-win │ │ │ -00010590: 646f 7720 2d20 2828 7769 6e64 6f77 2d68 dow - ((window-h │ │ │ -000105a0: 6569 6768 7429 2920 6e69 6c20 7769 6e64 eight)) nil wind │ │ │ -000105b0: 6f77 2d68 6569 6768 745d 2038 2022 5c6e ow-height] 8 "\n │ │ │ -000105c0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -000105d0: 6461 206c 6973 743a 5c6e 2020 2877 696e da list:\n (win │ │ │ -000105e0: 646f 772d 6865 6967 6874 2026 6f70 7469 dow-height &opti │ │ │ -000105f0: 6f6e 616c 2057 494e 444f 5729 5c6e 5c6e onal WINDOW)\n\n │ │ │ -00010600: 225d 2077 696e 646f 772d 6873 6372 6f6c "] window-hscrol │ │ │ -00010610: 6c20 235b 2826 7265 7374 2061 7267 7329 l #[(&rest args) │ │ │ -00010620: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ -00010630: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ -00010640: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ -00010650: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ -00010660: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ -00010670: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ -00010680: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ -00010690: 742d 7769 6e64 6f77 2d68 7363 726f 6c6c t-window-hscroll │ │ │ -000106a0: 2061 7070 656e 6420 7769 6e64 6f77 2d68 append window-h │ │ │ -000106b0: 7363 726f 6c6c 5d20 3720 225c 6e43 6f6d scroll] 7 "\nCom │ │ │ -000106c0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -000106d0: 6c69 7374 3a5c 6e20 2028 7769 6e64 6f77 list:\n (window │ │ │ -000106e0: 2d68 7363 726f 6c6c 2026 7265 7374 2041 -hscroll &rest A │ │ │ -000106f0: 5247 5329 5c6e 5c6e 225d 2077 696e 646f RGS)\n\n"] windo │ │ │ -00010700: 772d 706f 696e 7420 235b 2826 7265 7374 w-point #[(&rest │ │ │ -00010710: 2061 7267 7329 2022 c4c5 0b5c 221a c5c6 args) "...\"... │ │ │ -00010720: 2119 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 !.\n..C\n....... │ │ │ -00010730: 435c 222a 42c9 5c6e 42af 052a 8722 205b C\"*B.\nB..*." [ │ │ │ -00010740: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ -00010750: 656d 702d 2d20 2d2d 6172 6773 2d2d 7465 emp-- --args--te │ │ │ -00010760: 6d70 2d2d 2061 7267 7320 6d61 7063 6172 mp-- args mapcar │ │ │ -00010770: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ -00010780: 2d2d 2220 7365 742d 7769 6e64 6f77 2d70 --" set-window-p │ │ │ -00010790: 6f69 6e74 2061 7070 656e 6420 7769 6e64 oint append wind │ │ │ -000107a0: 6f77 2d70 6f69 6e74 5d20 3720 225c 6e43 ow-point] 7 "\nC │ │ │ -000107b0: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ -000107c0: 6120 6c69 7374 3a5c 6e20 2028 7769 6e64 a list:\n (wind │ │ │ -000107d0: 6f77 2d70 6f69 6e74 2026 7265 7374 2041 ow-point &rest A │ │ │ -000107e0: 5247 5329 5c6e 5c6e 225d 2077 696e 646f RGS)\n\n"] windo │ │ │ -000107f0: 772d 7374 6172 7420 235b 2826 7265 7374 w-start #[(&rest │ │ │ -00010800: 2061 7267 7329 2022 c4c5 0b5c 221a c5c6 args) "...\"... │ │ │ -00010810: 2119 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 !.\n..C\n....... │ │ │ -00010820: 435c 222a 42c9 5c6e 42af 052a 8722 205b C\"*B.\nB..*." [ │ │ │ -00010830: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ -00010840: 656d 702d 2d20 2d2d 6172 6773 2d2d 7465 emp-- --args--te │ │ │ -00010850: 6d70 2d2d 2061 7267 7320 6d61 7063 6172 mp-- args mapcar │ │ │ -00010860: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ -00010870: 2d2d 2220 7365 742d 7769 6e64 6f77 2d73 --" set-window-s │ │ │ -00010880: 7461 7274 2061 7070 656e 6420 7769 6e64 tart append wind │ │ │ -00010890: 6f77 2d73 7461 7274 5d20 3720 225c 6e43 ow-start] 7 "\nC │ │ │ -000108a0: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ -000108b0: 6120 6c69 7374 3a5c 6e20 2028 7769 6e64 a list:\n (wind │ │ │ -000108c0: 6f77 2d73 7461 7274 2026 7265 7374 2041 ow-start &rest A │ │ │ -000108d0: 5247 5329 5c6e 5c6e 225d 2077 696e 646f RGS)\n\n"] windo │ │ │ -000108e0: 772d 7769 6474 6820 235b 2826 6f70 7469 w-width #[(&opti │ │ │ -000108f0: 6f6e 616c 2077 696e 646f 7729 2022 c4c5 onal window) ".. │ │ │ -00010900: 211b c4c6 211a 0b43 0943 5c6e 430b 195c !...!..C.C\nC..\ │ │ │ -00010910: 6e18 c7c8 c908 ca42 42cb 0946 0845 2acc n......BB..F.E*. │ │ │ -00010920: 0b44 af05 2a87 2220 5b73 746f 7265 2077 .D..*." [store w │ │ │ -00010930: 696e 646f 7720 2d2d 7374 6f72 652d 2d74 indow --store--t │ │ │ -00010940: 656d 702d 2d20 2d2d 7769 6e64 6f77 2d2d emp-- --window-- │ │ │ -00010950: 7465 6d70 2d2d 2067 656e 7379 6d20 222d temp-- gensym "- │ │ │ -00010960: 2d77 696e 646f 772d 2d22 2022 2d2d 7374 -window--" "--st │ │ │ -00010970: 6f72 652d 2d22 2070 726f 676e 2065 6e6c ore--" progn enl │ │ │ -00010980: 6172 6765 2d77 696e 646f 7720 2d20 2828 arge-window - (( │ │ │ -00010990: 7769 6e64 6f77 2d77 6964 7468 2929 2074 window-width)) t │ │ │ -000109a0: 2077 696e 646f 772d 7769 6474 685d 2038 window-width] 8 │ │ │ -000109b0: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ -000109c0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ -000109d0: 2877 696e 646f 772d 7769 6474 6820 266f (window-width &o │ │ │ -000109e0: 7074 696f 6e61 6c20 5749 4e44 4f57 295c ptional WINDOW)\ │ │ │ -000109f0: 6e5c 6e22 5d20 782d 6765 742d 6375 7462 n\n"] x-get-cutb │ │ │ -00010a00: 7566 6665 7220 235b 2826 7265 7374 2061 uffer #[(&rest a │ │ │ -00010a10: 7267 7329 2022 c4c5 0b5c 221a c5c6 2119 rgs) "...\"...!. │ │ │ -00010a20: 5c6e 0b09 435c 6e1b 0918 c7c8 c90b 0843 \n..C\n........C │ │ │ -00010a30: 5c22 4208 452a ca5c 6e42 af05 2a87 2220 \"B.E*.\nB..*." │ │ │ -00010a40: 5b73 746f 7265 202d 2d73 746f 7265 2d2d [store --store-- │ │ │ -00010a50: 7465 6d70 2d2d 202d 2d61 7267 732d 2d74 temp-- --args--t │ │ │ -00010a60: 656d 702d 2d20 6172 6773 206d 6170 6361 emp-- args mapca │ │ │ -00010a70: 7220 6765 6e73 796d 2022 2d2d 7374 6f72 r gensym "--stor │ │ │ -00010a80: 652d 2d22 2070 726f 676e 2078 2d73 746f e--" progn x-sto │ │ │ -00010a90: 7265 2d63 7574 6275 6666 6572 2061 7070 re-cutbuffer app │ │ │ -00010aa0: 656e 6420 782d 6765 742d 6375 7462 7566 end x-get-cutbuf │ │ │ -00010ab0: 6665 725d 2038 2022 5c6e 436f 6d6d 6f6e fer] 8 "\nCommon │ │ │ -00010ac0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -00010ad0: 743a 5c6e 2020 2878 2d67 6574 2d63 7574 t:\n (x-get-cut │ │ │ -00010ae0: 6275 6666 6572 2026 7265 7374 2041 5247 buffer &rest ARG │ │ │ -00010af0: 5329 5c6e 5c6e 225d 2078 2d67 6574 2d63 S)\n\n"] x-get-c │ │ │ -00010b00: 7574 2d62 7566 6665 7220 235b 2826 7265 ut-buffer #[(&re │ │ │ -00010b10: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -00010b20: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -00010b30: c90b 0843 5c22 4208 452a ca5c 6e42 af05 ...C\"B.E*.\nB.. │ │ │ -00010b40: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -00010b50: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -00010b60: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -00010b70: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -00010b80: 7374 6f72 652d 2d22 2070 726f 676e 2078 store--" progn x │ │ │ -00010b90: 2d73 746f 7265 2d63 7574 2d62 7566 6665 -store-cut-buffe │ │ │ -00010ba0: 7220 6170 7065 6e64 2078 2d67 6574 2d63 r append x-get-c │ │ │ -00010bb0: 7574 2d62 7566 6665 725d 2038 2022 5c6e ut-buffer] 8 "\n │ │ │ -00010bc0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -00010bd0: 6461 206c 6973 743a 5c6e 2020 2878 2d67 da list:\n (x-g │ │ │ -00010be0: 6574 2d63 7574 2d62 7566 6665 7220 2672 et-cut-buffer &r │ │ │ -00010bf0: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ -00010c00: 782d 6765 742d 7365 636f 6e64 6172 792d x-get-secondary- │ │ │ -00010c10: 7365 6c65 6374 696f 6e20 235b 2826 7265 selection #[(&re │ │ │ -00010c20: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ -00010c30: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ -00010c40: c90b 0843 5c22 4208 452a ca5c 6e42 af05 ...C\"B.E*.\nB.. │ │ │ -00010c50: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ -00010c60: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ -00010c70: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ -00010c80: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ -00010c90: 7374 6f72 652d 2d22 2070 726f 676e 2078 store--" progn x │ │ │ -00010ca0: 2d6f 776e 2d73 6563 6f6e 6461 7279 2d73 -own-secondary-s │ │ │ -00010cb0: 656c 6563 7469 6f6e 2061 7070 656e 6420 election append │ │ │ -00010cc0: 782d 6765 742d 7365 636f 6e64 6172 792d x-get-secondary- │ │ │ -00010cd0: 7365 6c65 6374 696f 6e5d 2038 2022 5c6e selection] 8 "\n │ │ │ -00010ce0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -00010cf0: 6461 206c 6973 743a 5c6e 2020 2878 2d67 da list:\n (x-g │ │ │ -00010d00: 6574 2d73 6563 6f6e 6461 7279 2d73 656c et-secondary-sel │ │ │ -00010d10: 6563 7469 6f6e 2026 7265 7374 2041 5247 ection &rest ARG │ │ │ -00010d20: 5329 5c6e 5c6e 225d 2078 2d67 6574 2d73 S)\n\n"] x-get-s │ │ │ -00010d30: 656c 6563 7469 6f6e 2023 5b28 2672 6573 election #[(&res │ │ │ -00010d40: 7420 6172 6773 2920 22c4 c50b 5c22 1ac5 t args) "...\".. │ │ │ -00010d50: c621 195c 6e0b 0943 5c6e 1b09 18c7 c8c9 .!.\n..C\n...... │ │ │ -00010d60: 0b08 435c 2242 0845 2aca 5c6e 42af 052a ..C\"B.E*.\nB..* │ │ │ -00010d70: 8722 205b 7374 6f72 6520 2d2d 7374 6f72 ." [store --stor │ │ │ -00010d80: 652d 2d74 656d 702d 2d20 2d2d 6172 6773 e--temp-- --args │ │ │ -00010d90: 2d2d 7465 6d70 2d2d 2061 7267 7320 6d61 --temp-- args ma │ │ │ -00010da0: 7063 6172 2067 656e 7379 6d20 222d 2d73 pcar gensym "--s │ │ │ -00010db0: 746f 7265 2d2d 2220 7072 6f67 6e20 782d tore--" progn x- │ │ │ -00010dc0: 6f77 6e2d 7365 6c65 6374 696f 6e20 6170 own-selection ap │ │ │ -00010dd0: 7065 6e64 2078 2d67 6574 2d73 656c 6563 pend x-get-selec │ │ │ -00010de0: 7469 6f6e 5d20 3820 225c 6e43 6f6d 6d6f tion] 8 "\nCommo │ │ │ -00010df0: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ -00010e00: 7374 3a5c 6e20 2028 782d 6765 742d 7365 st:\n (x-get-se │ │ │ -00010e10: 6c65 6374 696f 6e20 2672 6573 7420 4152 lection &rest AR │ │ │ -00010e20: 4753 295c 6e5c 6e22 5d20 6765 742d 7365 GS)\n\n"] get-se │ │ │ -00010e30: 6c65 6374 696f 6e20 235b 2826 7265 7374 lection #[(&rest │ │ │ -00010e40: 2061 7267 7329 2022 c4c5 0b5c 221a c5c6 args) "...\"... │ │ │ -00010e50: 2119 5c6e 0b09 435c 6e1b 0918 c7c8 c90b !.\n..C\n....... │ │ │ -00010e60: 0843 5c22 4208 452a ca5c 6e42 af05 2a87 .C\"B.E*.\nB..*. │ │ │ -00010e70: 2220 5b73 746f 7265 202d 2d73 746f 7265 " [store --store │ │ │ -00010e80: 2d2d 7465 6d70 2d2d 202d 2d61 7267 732d --temp-- --args- │ │ │ -00010e90: 2d74 656d 702d 2d20 6172 6773 206d 6170 -temp-- args map │ │ │ -00010ea0: 6361 7220 6765 6e73 796d 2022 2d2d 7374 car gensym "--st │ │ │ -00010eb0: 6f72 652d 2d22 2070 726f 676e 206f 776e ore--" progn own │ │ │ -00010ec0: 2d73 656c 6563 7469 6f6e 2061 7070 656e -selection appen │ │ │ -00010ed0: 6420 6765 742d 7365 6c65 6374 696f 6e5d d get-selection] │ │ │ -00010ee0: 2038 2022 5c6e 436f 6d6d 6f6e 204c 6973 8 "\nCommon Lis │ │ │ -00010ef0: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ -00010f00: 2020 2867 6574 2d73 656c 6563 7469 6f6e (get-selection │ │ │ -00010f10: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ -00010f20: 225d 2061 7070 6c79 2023 5b28 6675 6e63 "] apply #[(func │ │ │ -00010f30: 2061 7267 3120 2672 6573 7420 7265 7374 arg1 &rest rest │ │ │ -00010f40: 2920 220c a2c6 73ab 860c a3a2 39ac 85c7 ) "...s.....9... │ │ │ -00010f50: c80c 5c22 880c 4140 5c6e 0942 421b c90b ..\"..A@\n.BB... │ │ │ -00010f60: 085c 2289 1d40 0d41 40ca 0d38 cbcc 0d38 .\"..@.A@..8...8 │ │ │ -00010f70: 0c41 400d 4023 cbcd 0d38 0c41 400d 4023 .A@.@#...8.A@.@# │ │ │ -00010f80: af05 2a87 2220 5b63 6c2d 6d61 6372 6f2d ..*." [cl-macro- │ │ │ -00010f90: 656e 7669 726f 6e6d 656e 7420 7265 7374 environment rest │ │ │ -00010fa0: 2061 7267 3120 666f 726d 2066 756e 6320 arg1 form func │ │ │ -00010fb0: 6d65 7468 6f64 2028 7175 6f74 6520 6675 method (quote fu │ │ │ -00010fc0: 6e63 7469 6f6e 2066 756e 6374 696f 6e2a nction function* │ │ │ -00010fd0: 2920 6572 726f 7220 2246 6972 7374 2061 ) error "First a │ │ │ -00010fe0: 7267 2074 6f20 6170 706c 7920 696e 2073 rg to apply in s │ │ │ -00010ff0: 6574 6620 6973 206e 6f74 2028 6675 6e63 etf is not (func │ │ │ -00011000: 7469 6f6e 2053 594d 293a 2025 7322 2067 tion SYM): %s" g │ │ │ -00011010: 6574 2d73 6574 662d 6d65 7468 6f64 2032 et-setf-method 2 │ │ │ -00011020: 2063 6c2d 7365 7466 2d6d 616b 652d 6170 cl-setf-make-ap │ │ │ -00011030: 706c 7920 3320 345d 2039 2022 5c6e 436f ply 3 4] 9 "\nCo │ │ │ -00011040: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ -00011050: 206c 6973 743a 5c6e 2020 2861 7070 6c79 list:\n (apply │ │ │ -00011060: 2046 554e 4320 4152 4731 2026 7265 7374 FUNC ARG1 &rest │ │ │ -00011070: 2052 4553 5429 5c6e 5c6e 225d 5d20 3429 REST)\n\n"]] 4) │ │ │ -00011080: 0a28 6465 6661 6c69 6173 2027 636c 2d73 .(defalias 'cl-s │ │ │ -00011090: 6574 662d 6d61 6b65 2d61 7070 6c79 2023 etf-make-apply # │ │ │ -000110a0: 5b28 666f 726d 2066 756e 6320 7465 6d70 [(form func temp │ │ │ -000110b0: 7329 2022 5c6e 40c3 61ab 8ec3 c45c 6e41 s) "\n@.a....\nA │ │ │ -000110c0: 4009 0823 5c6e 4141 4242 87c5 5c6e 21c5 @..#\nAABB..\n!. │ │ │ -000110d0: 0821 6bac 85c6 c709 5c22 88c8 c95c 6e40 .!k.....\"...\n@ │ │ │ -000110e0: 445c 6e41 4242 8722 205b 7465 6d70 7320 D\nABB." [temps │ │ │ -000110f0: 6675 6e63 2066 6f72 6d20 7072 6f67 6e20 func form progn │ │ │ -00011100: 636c 2d73 6574 662d 6d61 6b65 2d61 7070 cl-setf-make-app │ │ │ -00011110: 6c79 206c 6173 7420 6572 726f 7220 2225 ly last error "% │ │ │ -00011120: 7320 6973 206e 6f74 2073 7569 7461 626c s is not suitabl │ │ │ -00011130: 6520 666f 7220 7573 6520 7769 7468 2073 e for use with s │ │ │ -00011140: 6574 662d 6f66 2d61 7070 6c79 2220 6170 etf-of-apply" ap │ │ │ -00011150: 706c 7920 7175 6f74 655d 2035 5d29 0a28 ply quote] 5]).( │ │ │ -00011160: 6279 7465 2d63 6f64 6520 22c0 c1c2 c323 byte-code "....# │ │ │ -00011170: 88c0 c4c2 c523 88c0 c6c2 c723 88c0 c8c2 .....#.....#.... │ │ │ -00011180: c923 8722 205b 7075 7420 6e74 6863 6472 .#." [put nthcdr │ │ │ -00011190: 2073 6574 662d 6d65 7468 6f64 2023 5b28 setf-method #[( │ │ │ -000111a0: 6e20 706c 6163 6529 2022 c65c 6e09 5c22 n place) ".\n.\" │ │ │ -000111b0: c7c8 21c7 c921 1c1b 1d0b 0d40 4208 0d41 ..!..!.....@B..A │ │ │ -000111c0: 4042 0c43 cacb 0d38 40cc 0bcd 0d38 0c46 @B.C...8@....8.F │ │ │ -000111d0: 4443 ce0d 380c 46cf 0bcd 0d38 45af 052b DC..8.F....8E..+ │ │ │ -000111e0: 8722 205b 6e20 636c 2d6d 6163 726f 2d65 ." [n cl-macro-e │ │ │ -000111f0: 6e76 6972 6f6e 6d65 6e74 2070 6c61 6365 nvironment place │ │ │ -00011200: 206e 2d74 656d 7020 7374 6f72 652d 7465 n-temp store-te │ │ │ -00011210: 6d70 206d 6574 686f 6420 6765 742d 7365 mp method get-se │ │ │ -00011220: 7466 2d6d 6574 686f 6420 6765 6e73 796d tf-method gensym │ │ │ -00011230: 2022 2d2d 6e74 6863 6472 2d6e 2d2d 2220 "--nthcdr-n--" │ │ │ -00011240: 222d 2d6e 7468 6364 722d 7374 6f72 652d "--nthcdr-store- │ │ │ -00011250: 2d22 206c 6574 2032 2063 6c2d 7365 742d -" let 2 cl-set- │ │ │ -00011260: 6e74 6863 6472 2034 2033 206e 7468 6364 nthcdr 4 3 nthcd │ │ │ -00011270: 725d 2039 2022 5c6e 436f 6d6d 6f6e 204c r] 9 "\nCommon L │ │ │ -00011280: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ -00011290: 5c6e 2020 286e 7468 6364 7220 4e20 504c \n (nthcdr N PL │ │ │ -000112a0: 4143 4529 5c6e 5c6e 225d 2067 6574 6620 ACE)\n\n"] getf │ │ │ -000112b0: 235b 2870 6c61 6365 2074 6167 2026 6f70 #[(place tag &op │ │ │ -000112c0: 7469 6f6e 616c 2064 6566 2920 22c6 0908 tional def) "... │ │ │ -000112d0: 5c22 c7c8 21c7 c921 c7ca 211c 1a1b 1dcb \"..!..!..!..... │ │ │ -000112e0: 0d40 0b5c 6e44 5c22 cb0d 4140 0e12 0e13 .@.\nD\"..A@.... │ │ │ -000112f0: 445c 220c 43cc cd0d 3840 cecf 0d38 0b0c D\".C...8@...8.. │ │ │ -00011300: 4644 43d0 0d38 0c46 d1cf 0d38 0b5c 6e46 FDC..8.F...8.\nF │ │ │ -00011310: af05 2c87 2220 5b63 6c2d 6d61 6372 6f2d ..,." [cl-macro- │ │ │ -00011320: 656e 7669 726f 6e6d 656e 7420 706c 6163 environment plac │ │ │ -00011330: 6520 6465 662d 7465 6d70 2074 6167 2d74 e def-temp tag-t │ │ │ -00011340: 656d 7020 7374 6f72 652d 7465 6d70 206d emp store-temp m │ │ │ -00011350: 6574 686f 6420 6765 742d 7365 7466 2d6d ethod get-setf-m │ │ │ -00011360: 6574 686f 6420 6765 6e73 796d 2022 2d2d ethod gensym "-- │ │ │ -00011370: 6765 7466 2d74 6167 2d2d 2220 222d 2d67 getf-tag--" "--g │ │ │ -00011380: 6574 662d 6465 662d 2d22 2022 2d2d 6765 etf-def--" "--ge │ │ │ -00011390: 7466 2d73 746f 7265 2d2d 2220 6170 7065 tf-store--" appe │ │ │ -000113a0: 6e64 206c 6574 2032 2063 6c2d 7365 742d nd let 2 cl-set- │ │ │ -000113b0: 6765 7466 2034 2033 2067 6574 6620 7461 getf 4 3 getf ta │ │ │ -000113c0: 6720 6465 665d 2039 2022 5c6e 436f 6d6d g def] 9 "\nComm │ │ │ -000113d0: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ -000113e0: 6973 743a 5c6e 2020 2867 6574 6620 504c ist:\n (getf PL │ │ │ -000113f0: 4143 4520 5441 4720 266f 7074 696f 6e61 ACE TAG &optiona │ │ │ -00011400: 6c20 4445 4629 5c6e 5c6e 225d 2073 7562 l DEF)\n\n"] sub │ │ │ -00011410: 7374 7269 6e67 2023 5b28 706c 6163 6520 string #[(place │ │ │ -00011420: 6672 6f6d 2026 6f70 7469 6f6e 616c 2074 from &optional t │ │ │ -00011430: 6f29 2022 c609 085c 22c7 c821 c7c9 21c7 o) "...\"..!..!. │ │ │ -00011440: ca21 1c1b 1a1d cb0d 405c 6e0b 445c 22cb .!......@\n.D\". │ │ │ -00011450: 0d41 400e 120e 1344 5c22 0c43 cccd 0d38 .A@....D\".C...8 │ │ │ -00011460: 40ce cf0d 385c 6e0b 0caf 0544 43d0 0d38 @...8\n....DC..8 │ │ │ -00011470: 0c46 d1cf 0d38 5c6e 0b46 af05 2c87 2220 .F...8\n.F..,." │ │ │ -00011480: 5b63 6c2d 6d61 6372 6f2d 656e 7669 726f [cl-macro-enviro │ │ │ -00011490: 6e6d 656e 7420 706c 6163 6520 6672 6f6d nment place from │ │ │ -000114a0: 2d74 656d 7020 746f 2d74 656d 7020 7374 -temp to-temp st │ │ │ -000114b0: 6f72 652d 7465 6d70 206d 6574 686f 6420 ore-temp method │ │ │ -000114c0: 6765 742d 7365 7466 2d6d 6574 686f 6420 get-setf-method │ │ │ -000114d0: 6765 6e73 796d 2022 2d2d 7375 6273 7472 gensym "--substr │ │ │ -000114e0: 696e 672d 6672 6f6d 2d2d 2220 222d 2d73 ing-from--" "--s │ │ │ -000114f0: 7562 7374 7269 6e67 2d74 6f2d 2d22 2022 ubstring-to--" " │ │ │ -00011500: 2d2d 7375 6273 7472 696e 672d 7374 6f72 --substring-stor │ │ │ -00011510: 652d 2d22 2061 7070 656e 6420 6c65 7420 e--" append let │ │ │ -00011520: 3220 636c 2d73 6574 2d73 7562 7374 7269 2 cl-set-substri │ │ │ -00011530: 6e67 2034 2033 2073 7562 7374 7269 6e67 ng 4 3 substring │ │ │ -00011540: 2066 726f 6d20 746f 5d20 3130 2022 5c6e from to] 10 "\n │ │ │ -00011550: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -00011560: 6461 206c 6973 743a 5c6e 2020 2873 7562 da list:\n (sub │ │ │ -00011570: 7374 7269 6e67 2050 4c41 4345 2046 524f string PLACE FRO │ │ │ -00011580: 4d20 266f 7074 696f 6e61 6c20 544f 295c M &optional TO)\ │ │ │ -00011590: 6e5c 6e22 5d20 7661 6c75 6573 2023 5b28 n\n"] values #[( │ │ │ -000115a0: 2672 6573 7420 6172 6773 2920 22c3 c408 &rest args) "... │ │ │ -000115b0: 5c22 c5c6 2119 1ac7 c8c3 c95c 6e5c 225c \"..!......\n\"\ │ │ │ -000115c0: 22c7 c8c3 ca5c 6e5c 225c 2209 43cb c3cc "....\n\"\".C... │ │ │ -000115d0: 5c6e 5c22 42cb c3cd 5c6e 5c22 42af 052a \n\"B...\n\"B..* │ │ │ -000115e0: 8722 205b 6172 6773 2073 746f 7265 2d74 ." [args store-t │ │ │ -000115f0: 656d 7020 6d65 7468 6f64 7320 6d61 7063 emp methods mapc │ │ │ -00011600: 6172 2023 5b28 7829 2022 c209 085c 2287 ar #[(x) "...\". │ │ │ -00011610: 2220 5b63 6c2d 6d61 6372 6f2d 656e 7669 " [cl-macro-envi │ │ │ -00011620: 726f 6e6d 656e 7420 7820 6765 742d 7365 ronment x get-se │ │ │ -00011630: 7466 2d6d 6574 686f 645d 2033 5d20 6765 tf-method] 3] ge │ │ │ -00011640: 6e73 796d 2022 2d2d 7661 6c75 6573 2d73 nsym "--values-s │ │ │ -00011650: 746f 7265 2d2d 2220 6170 706c 7920 6170 tore--" apply ap │ │ │ -00011660: 7065 6e64 2066 6972 7374 2073 6563 6f6e pend first secon │ │ │ -00011670: 6420 6c69 7374 2023 5b28 6d29 2022 c209 d list #[(m) ".. │ │ │ -00011680: 4141 4040 0941 4141 4042 c308 445c 2287 AA@@.AAA@B..D\". │ │ │ -00011690: 2220 5b73 746f 7265 2d74 656d 7020 6d20 " [store-temp m │ │ │ -000116a0: 636c 2d73 6574 662d 646f 2d73 746f 7265 cl-setf-do-store │ │ │ -000116b0: 2070 6f70 5d20 345d 2066 6966 7468 5d20 pop] 4] fifth] │ │ │ -000116c0: 3820 225c 6e43 6f6d 6d6f 6e20 4c69 7370 8 "\nCommon Lisp │ │ │ -000116d0: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -000116e0: 2028 7661 6c75 6573 2026 7265 7374 2041 (values &rest A │ │ │ -000116f0: 5247 5329 5c6e 5c6e 225d 5d20 3429 0a23 RGS)\n\n"]] 4).# │ │ │ -00011700: 4031 3638 2052 6574 7572 6e20 6120 6c69 @168 Return a li │ │ │ -00011710: 7374 206f 6620 6669 7665 2076 616c 7565 st of five value │ │ │ -00011720: 7320 6465 7363 7269 6269 6e67 2074 6865 s describing the │ │ │ -00011730: 2073 6574 662d 6d65 7468 6f64 2066 6f72 setf-method for │ │ │ -00011740: 2050 4c41 4345 2e0a 504c 4143 4520 6d61 PLACE..PLACE ma │ │ │ -00011750: 7920 6265 2061 6e79 204c 6973 7020 666f y be any Lisp fo │ │ │ -00011760: 726d 2077 6869 6368 2063 616e 2061 7070 rm which can app │ │ │ -00011770: 6561 7220 6173 2074 6865 2050 4c41 4345 ear as the PLACE │ │ │ -00011780: 2061 7267 756d 656e 7420 746f 0a61 206d argument to.a m │ │ │ -00011790: 6163 726f 206c 696b 6520 6073 6574 6627 acro like `setf' │ │ │ -000117a0: 206f 7220 6069 6e63 6627 2e1f 0a28 6465 or `incf'...(de │ │ │ -000117b0: 6661 6c69 6173 2027 6765 742d 7365 7466 falias 'get-setf │ │ │ -000117c0: 2d6d 6574 686f 6420 235b 2870 6c61 6365 -method #[(place │ │ │ -000117d0: 2026 6f70 7469 6f6e 616c 2065 6e76 2920 &optional env) │ │ │ -000117e0: 220d 39ab 91c6 c721 19c8 8909 43c9 0d09 ".9....!....C... │ │ │ -000117f0: 450d af05 2987 0d40 39ab d50d 401b ca0b E...)..@9...@... │ │ │ -00011800: 2118 0bcb 4e1c c81e 1a0c aba0 5c6e 1e1b !...N.......\n.. │ │ │ -00011810: cc0c 0d41 5c22 8914 29ab 930c 3aab 890c ...A\"..)...:... │ │ │ -00011820: 47cd 55ab 830c aa84 cecf 0b5c 22ae a1d0 G.U........\"... │ │ │ -00011830: 201e 1cd1 8ed2 d308 5c22 2aab 87d4 d50d .......\"*..... │ │ │ -00011840: 2121 ae8d 0bd6 61ad 88d4 0d47 530d 385c !!....a....GS.8\ │ │ │ -00011850: 6e5c 222c aeaf 0dd7 0d5c 6e5c 2289 1561 n\",.....\n\"..a │ │ │ -00011860: aba1 0d40 39ab 96d8 0d40 21ab 900d 404b ...@9....@!...@K │ │ │ -00011870: 39ab 8ad4 0d40 4b0d 4142 5c6e 5c22 87ce 9....@K.AB\n\".. │ │ │ -00011880: d90d 405c 2287 d40d 5c6e 5c22 8722 205b ..@\"...\n\"." [ │ │ │ -00011890: 6e61 6d65 2074 656d 7020 656e 7620 6675 name temp env fu │ │ │ -000118a0: 6e63 206d 6574 686f 6420 706c 6163 6520 nc method place │ │ │ -000118b0: 6765 6e73 796d 2022 2d2d 7365 7466 2d2d gensym "--setf-- │ │ │ -000118c0: 2220 6e69 6c20 7365 7471 2073 796d 626f " nil setq symbo │ │ │ -000118d0: 6c2d 6e61 6d65 2073 6574 662d 6d65 7468 l-name setf-meth │ │ │ -000118e0: 6f64 2061 7070 6c79 2035 2065 7272 6f72 od apply 5 error │ │ │ -000118f0: 2022 5365 7466 2d6d 6574 686f 6420 666f "Setf-method fo │ │ │ -00011900: 7220 2573 2072 6574 7572 6e73 206d 616c r %s returns mal │ │ │ -00011910: 666f 726d 6564 206d 6574 686f 6422 206d formed method" m │ │ │ -00011920: 6174 6368 2d64 6174 6120 2828 7374 6f72 atch-data ((stor │ │ │ -00011930: 652d 6d61 7463 682d 6461 7461 2023 313d e-match-data #1= │ │ │ -00011940: 233a 6d61 7463 682d 6461 7461 2929 2073 #:match-data)) s │ │ │ -00011950: 7472 696e 672d 6d61 7463 6820 225c 5c60 tring-match "\\` │ │ │ -00011960: 635b 6164 5d5b 6164 5d5b 6164 5d3f 5b61 c[ad][ad][ad]?[a │ │ │ -00011970: 645d 3f72 5c5c 2722 2067 6574 2d73 6574 d]?r\\'" get-set │ │ │ -00011980: 662d 6d65 7468 6f64 2063 6f6d 7069 6c65 f-method compile │ │ │ -00011990: 722d 6d61 6372 6f65 7870 616e 6420 6564 r-macroexpand ed │ │ │ -000119a0: 6562 7567 2d61 6674 6572 206d 6163 726f ebug-after macro │ │ │ -000119b0: 6578 7061 6e64 2066 626f 756e 6470 2022 expand fboundp " │ │ │ -000119c0: 4e6f 2073 6574 662d 6d65 7468 6f64 206b No setf-method k │ │ │ -000119d0: 6e6f 776e 2066 6f72 2025 7322 2063 6173 nown for %s" cas │ │ │ -000119e0: 652d 666f 6c64 2d73 6561 7263 6820 636c e-fold-search cl │ │ │ -000119f0: 2d6d 6163 726f 2d65 6e76 6972 6f6e 6d65 -macro-environme │ │ │ -00011a00: 6e74 2023 3123 5d20 3620 2823 2420 2e20 nt #1#] 6 (#$ . │ │ │ -00011a10: 3731 3432 3929 5d29 0a28 6465 6661 6c69 71429)]).(defali │ │ │ -00011a20: 6173 2027 636c 2d73 6574 662d 646f 2d6d as 'cl-setf-do-m │ │ │ -00011a30: 6f64 6966 7920 235b 2870 6c61 6365 206f odify #[(place o │ │ │ -00011a40: 7074 2d65 7870 7229 2022 c608 0e14 5c22 pt-expr) "....\" │ │ │ -00011a50: 891d 401b 0d41 401c c789 191a 0e12 c861 ..@..A@........a │ │ │ -00011a60: 3fad 950e 12c9 61ac 86ca 0e12 21ae 89cb ?.....a.....!... │ │ │ -00011a70: cc0d 3840 cd0d 385c 2289 1e15 ad88 083a ..8@..8\"......: │ │ │ -00011a80: ad84 ce08 4121 1e13 0cab aa0e 13ac 86cf ....A!.......... │ │ │ -00011a90: 0c40 21ab 900b 8941 1340 0c89 4114 4042 .@!....A.@..A.@B │ │ │ -00011aa0: 5c6e 4212 aa63 0b89 4113 400c 8941 1440 \nB..c..A.@..A.@ │ │ │ -00011ab0: 4409 4211 aa53 099f cc0d 3840 d05c 6ecd D.B..S....8@.\n. │ │ │ -00011ac0: 0d38 5c22 42d0 5c6e d10d 385c 2245 2e07 .8\"B.\n..8\"E.. │ │ │ -00011ad0: 8722 205b 706c 6163 6520 6c65 7473 2073 ." [place lets s │ │ │ -00011ae0: 7562 7320 7465 6d70 7320 7661 6c75 6573 ubs temps values │ │ │ -00011af0: 206d 6574 686f 6420 6765 742d 7365 7466 method get-setf │ │ │ -00011b00: 2d6d 6574 686f 6420 6e69 6c20 6e6f 2d6f -method nil no-o │ │ │ -00011b10: 7074 2075 6e73 6166 6520 636c 2d73 6166 pt unsafe cl-saf │ │ │ -00011b20: 652d 6578 7072 2d70 2063 6c2d 7365 7466 e-expr-p cl-setf │ │ │ -00011b30: 2d73 696d 706c 652d 7374 6f72 652d 7020 -simple-store-p │ │ │ -00011b40: 3220 3320 636c 2d73 696d 706c 652d 6578 2 3 cl-simple-ex │ │ │ -00011b50: 7072 732d 7020 636c 2d63 6f6e 7374 2d65 prs-p cl-const-e │ │ │ -00011b60: 7870 722d 7020 7375 626c 6973 2034 206f xpr-p sublis 4 o │ │ │ -00011b70: 7074 2d65 7870 7220 7369 6d70 6c65 2063 pt-expr simple c │ │ │ -00011b80: 6c2d 6d61 6372 6f2d 656e 7669 726f 6e6d l-macro-environm │ │ │ -00011b90: 656e 7420 6f70 7469 6d69 7a65 5d20 375d ent optimize] 7] │ │ │ -00011ba0: 290a 2864 6566 616c 6961 7320 2763 6c2d ).(defalias 'cl- │ │ │ -00011bb0: 7365 7466 2d64 6f2d 7374 6f72 6520 235b setf-do-store #[ │ │ │ -00011bc0: 2873 7065 6320 7661 6c29 2022 0840 0841 (spec val) ".@.A │ │ │ -00011bd0: 1b1a c409 21ac 93c5 0921 ab88 c60b 5c6e ....!....!....\n │ │ │ -00011be0: 5c22 c761 ac86 c85c 6e0b 5c22 ab87 c909 \".a...\n.\".... │ │ │ -00011bf0: 5c6e 0b23 aa87 ca5c 6e09 4443 0b45 2a87 \n.#...\n.DC.E*. │ │ │ -00011c00: 2220 5b73 7065 6320 7661 6c20 7379 6d20 " [spec val sym │ │ │ -00011c10: 666f 726d 2063 6c2d 636f 6e73 742d 6578 form cl-const-ex │ │ │ -00011c20: 7072 2d70 2063 6c2d 7369 6d70 6c65 2d65 pr-p cl-simple-e │ │ │ -00011c30: 7870 722d 7020 636c 2d65 7870 722d 636f xpr-p cl-expr-co │ │ │ -00011c40: 6e74 6169 6e73 2031 2063 6c2d 7365 7466 ntains 1 cl-setf │ │ │ -00011c50: 2d73 696d 706c 652d 7374 6f72 652d 7020 -simple-store-p │ │ │ -00011c60: 7375 6273 7420 6c65 745d 2034 5d29 0a28 subst let] 4]).( │ │ │ -00011c70: 6465 6661 6c69 6173 2027 636c 2d73 6574 defalias 'cl-set │ │ │ -00011c80: 662d 7369 6d70 6c65 2d73 746f 7265 2d70 f-simple-store-p │ │ │ -00011c90: 2023 5b28 7379 6d20 666f 726d 2920 2209 #[(sym form) ". │ │ │ -00011ca0: 3aad a3c2 0908 5c22 c361 ad9b 0947 5309 :.....\".a...GS. │ │ │ -00011cb0: 3808 61ad 9209 4039 ad8d c409 4021 ad87 8.a...@9....@!.. │ │ │ -00011cc0: 0940 4ba2 c561 3f87 2220 5b73 796d 2066 .@K..a?." [sym f │ │ │ -00011cd0: 6f72 6d20 636c 2d65 7870 722d 636f 6e74 orm cl-expr-cont │ │ │ -00011ce0: 6169 6e73 2031 2066 626f 756e 6470 206d ains 1 fboundp m │ │ │ -00011cf0: 6163 726f 5d20 335d 290a 2340 3332 3520 acro] 3]).#@325 │ │ │ -00011d00: 2873 6574 6620 504c 4143 4520 5641 4c20 (setf PLACE VAL │ │ │ -00011d10: 504c 4143 4520 5641 4c20 2e2e 2e29 3a20 PLACE VAL ...): │ │ │ -00011d20: 7365 7420 6561 6368 2050 4c41 4345 2074 set each PLACE t │ │ │ -00011d30: 6f20 7468 6520 7661 6c75 6520 6f66 2069 o the value of i │ │ │ -00011d40: 7473 2056 414c 2e0a 5468 6973 2069 7320 ts VAL..This is │ │ │ -00011d50: 6120 6765 6e65 7261 6c69 7a65 6420 7665 a generalized ve │ │ │ -00011d60: 7273 696f 6e20 6f66 2060 7365 7471 273b rsion of `setq'; │ │ │ -00011d70: 2074 6865 2050 4c41 4345 7320 6d61 7920 the PLACEs may │ │ │ -00011d80: 6265 2073 796d 626f 6c69 630a 7265 6665 be symbolic.refe │ │ │ -00011d90: 7265 6e63 6573 2073 7563 6820 6173 2028 rences such as ( │ │ │ -00011da0: 6361 7220 7829 206f 7220 2861 7265 6620 car x) or (aref │ │ │ -00011db0: 7820 6929 2c20 6173 2077 656c 6c20 6173 x i), as well as │ │ │ -00011dc0: 2070 6c61 696e 2073 796d 626f 6c73 2e0a plain symbols.. │ │ │ -00011dd0: 466f 7220 6578 616d 706c 652c 2028 7365 For example, (se │ │ │ -00011de0: 7466 2028 6361 6461 7220 7829 2079 2920 tf (cadar x) y) │ │ │ -00011df0: 6973 2065 7175 6976 616c 656e 7420 746f is equivalent to │ │ │ -00011e00: 2028 7365 7463 6172 2028 6364 6172 2078 (setcar (cdar x │ │ │ -00011e10: 2920 7929 2e0a 5468 6520 7265 7475 726e ) y)..The return │ │ │ -00011e20: 2076 616c 7565 2069 7320 7468 6520 6c61 value is the la │ │ │ -00011e30: 7374 2056 414c 2069 6e20 7468 6520 6c69 st VAL in the li │ │ │ -00011e40: 7374 2e1f 0a28 6465 6661 6c69 6173 2027 st...(defalias ' │ │ │ -00011e50: 7365 7466 2027 286d 6163 726f 202e 2023 setf '(macro . # │ │ │ -00011e60: 5b28 2672 6573 7420 6172 6773 2920 220b [(&rest args) ". │ │ │ -00011e70: 4141 ab9c c41a 0bab 91c5 0b89 4113 400b AA..........A.@. │ │ │ -00011e80: 8941 1340 455c 6e42 12aa 6cc6 5c6e 9f29 .A.@E\nB..l.\n.) │ │ │ -00011e90: 4287 0b40 39ab 870b ada2 c70b 4287 c80b B..@9.......B... │ │ │ -00011ea0: 400b 4140 5c22 19c9 0941 400b 4140 5c22 @.A@\"...A@.A@\" │ │ │ -00011eb0: 1809 40ab 87ca 0940 0845 aa81 082a 8722 ..@....@.E...*." │ │ │ -00011ec0: 205b 7374 6f72 6520 6d65 7468 6f64 2073 [store method s │ │ │ -00011ed0: 6574 7320 6172 6773 206e 696c 2073 6574 ets args nil set │ │ │ -00011ee0: 6620 7072 6f67 6e20 7365 7471 2063 6c2d f progn setq cl- │ │ │ -00011ef0: 7365 7466 2d64 6f2d 6d6f 6469 6679 2063 setf-do-modify c │ │ │ -00011f00: 6c2d 7365 7466 2d64 6f2d 7374 6f72 6520 l-setf-do-store │ │ │ -00011f10: 6c65 742a 5d20 3420 2823 2420 2e20 3732 let*] 4 (#$ . 72 │ │ │ -00011f20: 3936 3029 5d29 290a 2340 3230 3620 2870 960)])).#@206 (p │ │ │ -00011f30: 7365 7466 2050 4c41 4345 2056 414c 2050 setf PLACE VAL P │ │ │ -00011f40: 4c41 4345 2056 414c 202e 2e2e 293a 2073 LACE VAL ...): s │ │ │ -00011f50: 6574 2050 4c41 4345 7320 746f 2074 6865 et PLACEs to the │ │ │ -00011f60: 2076 616c 7565 7320 5641 4c73 2069 6e20 values VALs in │ │ │ -00011f70: 7061 7261 6c6c 656c 2e0a 5468 6973 2069 parallel..This i │ │ │ -00011f80: 7320 6c69 6b65 2060 7365 7466 272c 2065 s like `setf', e │ │ │ -00011f90: 7863 6570 7420 7468 6174 2061 6c6c 2056 xcept that all V │ │ │ -00011fa0: 414c 2066 6f72 6d73 2061 7265 2065 7661 AL forms are eva │ │ │ -00011fb0: 6c75 6174 6564 2028 696e 206f 7264 6572 luated (in order │ │ │ -00011fc0: 290a 6265 666f 7265 2061 7373 6967 6e69 ).before assigni │ │ │ -00011fd0: 6e67 2061 6e79 2050 4c41 4345 7320 746f ng any PLACEs to │ │ │ -00011fe0: 2074 6865 2063 6f72 7265 7370 6f6e 6469 the correspondi │ │ │ -00011ff0: 6e67 2076 616c 7565 732e 1f0a 2864 6566 ng values...(def │ │ │ -00012000: 616c 6961 7320 2770 7365 7466 2027 286d alias 'psetf '(m │ │ │ -00012010: 6163 726f 202e 2023 5b28 2672 6573 7420 acro . #[(&rest │ │ │ -00012020: 6172 6773 2920 220b c5c6 1a18 1c0c abb1 args) "......... │ │ │ -00012030: 0c40 39ab 88c7 0c41 405c 6e5c 22ab 82c6 .@9....A@\n\"... │ │ │ -00012040: 100c 405c 6e73 ab86 c8c9 0c40 5c22 880c ..@\ns.....@\".. │ │ │ -00012050: 8941 1440 5c6e 4212 0cac 84c8 ca21 880c .A.@\nB......!.. │ │ │ -00012060: 8941 1488 aa4c 08ab 88cb cc0b 42c6 45aa .A...L......B.E. │ │ │ -00012070: a5cd 0b21 13cc 0b41 400b 4045 190b 4141 ...!...A@.@E..AA │ │ │ -00012080: 8913 ab8d cc0b 4140 ce0b 4009 4545 11aa ......A@..@.EE.. │ │ │ -00012090: 6ccb 09c6 4529 2b87 2220 5b73 696d 706c l...E)+." [simpl │ │ │ -000120a0: 6520 6578 7072 2076 6172 7320 6172 6773 e expr vars args │ │ │ -000120b0: 2070 2074 206e 696c 2063 6c2d 6578 7072 p t nil cl-expr │ │ │ -000120c0: 2d64 6570 656e 6473 2d70 2065 7272 6f72 -depends-p error │ │ │ -000120d0: 2022 4465 7374 696e 6174 696f 6e20 6475 "Destination du │ │ │ -000120e0: 706c 6963 6174 6564 2069 6e20 7073 6574 plicated in pset │ │ │ -000120f0: 663a 2025 7322 2022 4f64 6420 6e75 6d62 f: %s" "Odd numb │ │ │ -00012100: 6572 206f 6620 6172 6775 6d65 6e74 7320 er of arguments │ │ │ -00012110: 746f 2070 7365 7466 2220 7072 6f67 6e20 to psetf" progn │ │ │ -00012120: 7365 7466 2072 6576 6572 7365 2070 726f setf reverse pro │ │ │ -00012130: 6731 5d20 3520 2823 2420 2e20 3733 3531 g1] 5 (#$ . 7351 │ │ │ -00012140: 3829 5d29 290a 2864 6566 616c 6961 7320 8)])).(defalias │ │ │ -00012150: 2763 6c2d 646f 2d70 6f70 2023 5b28 706c 'cl-do-pop #[(pl │ │ │ -00012160: 6163 6529 2022 c35c 6e21 ab8c c4c5 5c6e ace) ".\n!....\n │ │ │ -00012170: 44c6 5c6e c75c 6e44 4545 87c8 5c6e c95c D.\n.\nDEE..\n.\ │ │ │ -00012180: 2219 cacb 2118 cccd 0940 08ce 0938 4443 "...!....@...8DC │ │ │ -00012190: 5c22 c4c5 0844 cf09 4140 c708 445c 2245 \"...D..A@..D\"E │ │ │ -000121a0: 452a 8722 205b 7465 6d70 206d 6574 686f E*." [temp metho │ │ │ -000121b0: 6420 706c 6163 6520 636c 2d73 696d 706c d place cl-simpl │ │ │ -000121c0: 652d 6578 7072 2d70 2070 726f 6731 2063 e-expr-p prog1 c │ │ │ -000121d0: 6172 2073 6574 6620 6364 7220 636c 2d73 ar setf cdr cl-s │ │ │ -000121e0: 6574 662d 646f 2d6d 6f64 6966 7920 7420 etf-do-modify t │ │ │ -000121f0: 6765 6e73 796d 2022 2d2d 706f 702d 2d22 gensym "--pop--" │ │ │ -00012200: 206c 6574 2a20 6170 7065 6e64 2032 2063 let* append 2 c │ │ │ -00012210: 6c2d 7365 7466 2d64 6f2d 7374 6f72 655d l-setf-do-store] │ │ │ -00012220: 2038 5d29 0a23 4031 3933 2028 7265 6d66 8]).#@193 (remf │ │ │ -00012230: 2050 4c41 4345 2054 4147 293a 2072 656d PLACE TAG): rem │ │ │ -00012240: 6f76 6520 5441 4720 6672 6f6d 2070 726f ove TAG from pro │ │ │ -00012250: 7065 7274 7920 6c69 7374 2050 4c41 4345 perty list PLACE │ │ │ -00012260: 2e0a 504c 4143 4520 6d61 7920 6265 2061 ..PLACE may be a │ │ │ -00012270: 2073 796d 626f 6c2c 206f 7220 616e 7920 symbol, or any │ │ │ -00012280: 6765 6e65 7261 6c69 7a65 6420 7661 7269 generalized vari │ │ │ -00012290: 6162 6c65 2061 6c6c 6f77 6564 2062 7920 able allowed by │ │ │ -000122a0: 6073 6574 6627 2e0a 5468 6520 666f 726d `setf'..The form │ │ │ -000122b0: 2072 6574 7572 6e73 2074 7275 6520 6966 returns true if │ │ │ -000122c0: 2054 4147 2077 6173 2066 6f75 6e64 2061 TAG was found a │ │ │ -000122d0: 6e64 2072 656d 6f76 6564 2c20 6e69 6c20 nd removed, nil │ │ │ -000122e0: 6f74 6865 7277 6973 652e 1f0a 2864 6566 otherwise...(def │ │ │ -000122f0: 616c 6961 7320 2772 656d 6620 2728 6d61 alias 'remf '(ma │ │ │ -00012300: 6372 6f20 2e20 235b 2870 6c61 6365 2074 cro . #[(place t │ │ │ -00012310: 6167 2920 22c6 0e17 c75c 221d c809 213f ag) "....\"...!? │ │ │ -00012320: ad83 c9ca 211c cb0e 1721 3fad 83c9 cc21 ....!....!?....! │ │ │ -00012330: 1b0c ae81 0918 0bae 83cd 0d38 1ace cf0d ...........8.... │ │ │ -00012340: 400b ad86 0bcd 0d38 4443 0cad 840c 0944 @......8DC.....D │ │ │ -00012350: 4323 d0d1 08d2 5c6e 4445 d3d4 0d41 40d5 C#....\nDE...A@. │ │ │ -00012360: 5c6e 445c 22c7 45d6 5c6e 0845 4645 2d87 \nD\".E.\n.EFE-. │ │ │ -00012370: 2220 5b74 7461 6720 7461 6720 7476 616c " [ttag tag tval │ │ │ -00012380: 2076 616c 2d74 656d 7020 7461 672d 7465 val-temp tag-te │ │ │ -00012390: 6d70 206d 6574 686f 6420 636c 2d73 6574 mp method cl-set │ │ │ -000123a0: 662d 646f 2d6d 6f64 6966 7920 7420 636c f-do-modify t cl │ │ │ -000123b0: 2d63 6f6e 7374 2d65 7870 722d 7020 6765 -const-expr-p ge │ │ │ -000123c0: 6e73 796d 2022 2d2d 7265 6d66 2d74 6167 nsym "--remf-tag │ │ │ -000123d0: 2d2d 2220 636c 2d73 696d 706c 652d 6578 --" cl-simple-ex │ │ │ -000123e0: 7072 2d70 2022 2d2d 7265 6d66 2d70 6c61 pr-p "--remf-pla │ │ │ -000123f0: 6365 2d2d 2220 3220 6c65 742a 2061 7070 ce--" 2 let* app │ │ │ -00012400: 656e 6420 6966 2065 7120 6361 7220 7072 end if eq car pr │ │ │ -00012410: 6f67 6e20 636c 2d73 6574 662d 646f 2d73 ogn cl-setf-do-s │ │ │ -00012420: 746f 7265 2063 6464 7220 636c 2d64 6f2d tore cddr cl-do- │ │ │ -00012430: 7265 6d66 2070 6c61 6365 5d20 3920 2823 remf place] 9 (# │ │ │ -00012440: 2420 2e20 3734 3238 3329 5d29 290a 2340 $ . 74283)])).#@ │ │ │ -00012450: 3139 3820 2873 6869 6674 6620 504c 4143 198 (shiftf PLAC │ │ │ -00012460: 4520 504c 4143 452e 2e2e 2056 414c 293a E PLACE... VAL): │ │ │ -00012470: 2073 6869 6674 206c 6566 7420 616d 6f6e shift left amon │ │ │ -00012480: 6720 504c 4143 4573 2e0a 4578 616d 706c g PLACEs..Exampl │ │ │ -00012490: 653a 2028 7368 6966 7466 2041 2042 2043 e: (shiftf A B C │ │ │ -000124a0: 2920 7365 7473 2041 2074 6f20 422c 2042 ) sets A to B, B │ │ │ -000124b0: 2074 6f20 432c 2061 6e64 2072 6574 7572 to C, and retur │ │ │ -000124c0: 6e73 2074 6865 206f 6c64 2041 2e0a 4561 ns the old A..Ea │ │ │ -000124d0: 6368 2050 4c41 4345 206d 6179 2062 6520 ch PLACE may be │ │ │ -000124e0: 6120 7379 6d62 6f6c 2c20 6f72 2061 6e79 a symbol, or any │ │ │ -000124f0: 2067 656e 6572 616c 697a 6564 2076 6172 generalized var │ │ │ -00012500: 6961 626c 6520 616c 6c6f 7765 6420 6279 iable allowed by │ │ │ -00012510: 2060 7365 7466 272e 1f0a 2864 6566 616c `setf'...(defal │ │ │ -00012520: 6961 7320 2773 6869 6674 6620 2728 6d61 ias 'shiftf '(ma │ │ │ -00012530: 6372 6f20 2e20 235b 2870 6c61 6365 2026 cro . #[(place & │ │ │ -00012540: 7265 7374 2061 7267 7329 2022 c6c7 c8c9 rest args) ".... │ │ │ -00012550: 0c0d 4221 5c22 73ac 9dca 0cc6 1a0d ab90 ..B!\"s......... │ │ │ -00012560: cb0c 0d40 455c 6e42 120d 8941 1540 14aa ...@E\nB...A.@.. │ │ │ -00012570: 6d5c 6e9f 2942 4287 cc0c 0d42 2189 1b89 m\n.)BB....B!... │ │ │ -00012580: 4113 4019 0bab 9ccd 0b89 4113 40ce 5c22 A.@.......A.@.\" │ │ │ -00012590: 18cf 0840 cad0 0838 d108 4140 095c 2245 ...@...8..A@.\"E │ │ │ -000125a0: 4511 29aa 6109 2a87 2220 5b6d 6574 686f E.).a.*." [metho │ │ │ -000125b0: 6420 666f 726d 2073 6574 7320 706c 6163 d form sets plac │ │ │ -000125c0: 6573 2070 6c61 6365 2061 7267 7320 6e69 es place args ni │ │ │ -000125d0: 6c20 6d61 7063 6172 2073 796d 626f 6c70 l mapcar symbolp │ │ │ -000125e0: 2062 7574 6c61 7374 2070 726f 6731 2073 butlast prog1 s │ │ │ -000125f0: 6574 7120 7265 7665 7273 6520 636c 2d73 etq reverse cl-s │ │ │ -00012600: 6574 662d 646f 2d6d 6f64 6966 7920 756e etf-do-modify un │ │ │ -00012610: 7361 6665 206c 6574 2a20 3220 636c 2d73 safe let* 2 cl-s │ │ │ -00012620: 6574 662d 646f 2d73 746f 7265 5d20 3820 etf-do-store] 8 │ │ │ -00012630: 2823 2420 2e20 3734 3833 3629 5d29 290a (#$ . 74836)])). │ │ │ -00012640: 2340 3139 3720 2872 6f74 6174 6566 2050 #@197 (rotatef P │ │ │ -00012650: 4c41 4345 2e2e 2e29 3a20 726f 7461 7465 LACE...): rotate │ │ │ -00012660: 206c 6566 7420 616d 6f6e 6720 504c 4143 left among PLAC │ │ │ -00012670: 4573 2e0a 4578 616d 706c 653a 2028 726f Es..Example: (ro │ │ │ -00012680: 7461 7465 6620 4120 4220 4329 2073 6574 tatef A B C) set │ │ │ -00012690: 7320 4120 746f 2042 2c20 4220 746f 2043 s A to B, B to C │ │ │ -000126a0: 2c20 616e 6420 4320 746f 2041 2e20 2049 , and C to A. I │ │ │ -000126b0: 7420 7265 7475 726e 7320 6e69 6c2e 0a45 t returns nil..E │ │ │ -000126c0: 6163 6820 504c 4143 4520 6d61 7920 6265 ach PLACE may be │ │ │ -000126d0: 2061 2073 796d 626f 6c2c 206f 7220 616e a symbol, or an │ │ │ -000126e0: 7920 6765 6e65 7261 6c69 7a65 6420 7661 y generalized va │ │ │ -000126f0: 7269 6162 6c65 2061 6c6c 6f77 6564 2062 riable allowed b │ │ │ -00012700: 7920 6073 6574 6627 2e1f 0a28 6465 6661 y `setf'...(defa │ │ │ -00012710: 6c69 6173 2027 726f 7461 7465 6620 2728 lias 'rotatef '( │ │ │ -00012720: 6d61 6372 6f20 2e20 235b 2826 7265 7374 macro . #[(&rest │ │ │ -00012730: 2061 7267 7329 2022 c6c7 c80d 5c22 73ac args) "....\"s. │ │ │ -00012740: a50d 41ad e7c6 0d40 181a 0d41 ab8d 5c6e ..A....@...A..\n │ │ │ -00012750: 0d89 4115 400d 4044 a412 aa6f c943 5c6e ..A.@.@D...o.C\n │ │ │ -00012760: a40d 4008 44a4 2a87 ca0d 211b cbcc 2189 ..@.D.*...!...!. │ │ │ -00012770: 1e14 190b 41ab 9ccd 0b89 4113 40ce 5c22 ....A.....A.@.\" │ │ │ -00012780: 1ccf 0c40 d0d1 0c38 d20c 4140 095c 2245 ...@...8..A@.\"E │ │ │ -00012790: 4511 29aa 60cd 0b40 ce5c 221c cfd3 0c40 E.).`..@.\"....@ │ │ │ -000127a0: 0e14 d10c 3844 435c 22d2 0c41 4009 5c22 ....8DC\"..A@.\" │ │ │ -000127b0: c646 2c87 2220 5b66 6972 7374 2066 6f72 .F,." [first for │ │ │ -000127c0: 6d20 7365 7473 2070 6c61 6365 7320 6d65 m sets places me │ │ │ -000127d0: 7468 6f64 2061 7267 7320 6e69 6c20 6d61 thod args nil ma │ │ │ -000127e0: 7063 6172 2073 796d 626f 6c70 2070 7365 pcar symbolp pse │ │ │ -000127f0: 7466 2072 6576 6572 7365 2067 656e 7379 tf reverse gensy │ │ │ -00012800: 6d20 222d 2d72 6f74 6174 6566 2d2d 2220 m "--rotatef--" │ │ │ -00012810: 636c 2d73 6574 662d 646f 2d6d 6f64 6966 cl-setf-do-modif │ │ │ -00012820: 7920 756e 7361 6665 206c 6574 2a20 7072 y unsafe let* pr │ │ │ -00012830: 6f67 3120 3220 636c 2d73 6574 662d 646f og1 2 cl-setf-do │ │ │ -00012840: 2d73 746f 7265 2061 7070 656e 6420 7465 -store append te │ │ │ -00012850: 6d70 5d20 3820 2823 2420 2e20 3735 3333 mp] 8 (#$ . 7533 │ │ │ -00012860: 3429 5d29 290a 2340 3533 3320 286c 6574 4)])).#@533 (let │ │ │ -00012870: 6620 2828 504c 4143 4520 5641 4c55 4529 f ((PLACE VALUE) │ │ │ -00012880: 202e 2e2e 2920 424f 4459 2e2e 2e29 3a20 ...) BODY...): │ │ │ -00012890: 7465 6d70 6f72 6172 696c 7920 6269 6e64 temporarily bind │ │ │ -000128a0: 2074 6f20 504c 4143 4573 2e0a 5468 6973 to PLACEs..This │ │ │ -000128b0: 2069 7320 7468 6520 616e 616c 6f67 7565 is the analogue │ │ │ -000128c0: 206f 6620 606c 6574 272c 2062 7574 2077 of `let', but w │ │ │ -000128d0: 6974 6820 6765 6e65 7261 6c69 7a65 6420 ith generalized │ │ │ -000128e0: 7661 7269 6162 6c65 7320 2869 6e20 7468 variables (in th │ │ │ -000128f0: 650a 7365 6e73 6520 6f66 2060 7365 7466 e.sense of `setf │ │ │ -00012900: 2729 2066 6f72 2074 6865 2050 4c41 4345 ') for the PLACE │ │ │ -00012910: 732e 2020 4561 6368 2050 4c41 4345 2069 s. Each PLACE i │ │ │ -00012920: 7320 7365 7420 746f 2074 6865 2063 6f72 s set to the cor │ │ │ -00012930: 7265 7370 6f6e 6469 6e67 0a56 414c 5545 responding.VALUE │ │ │ -00012940: 2c20 7468 656e 2074 6865 2042 4f44 5920 , then the BODY │ │ │ -00012950: 666f 726d 7320 6172 6520 6578 6563 7574 forms are execut │ │ │ -00012960: 6564 2e20 204f 6e20 6578 6974 2c20 6569 ed. On exit, ei │ │ │ -00012970: 7468 6572 206e 6f72 6d61 6c6c 7920 6f72 ther normally or │ │ │ -00012980: 0a62 6563 6175 7365 206f 6620 6120 6074 .because of a `t │ │ │ -00012990: 6872 6f77 2720 6f72 2065 7272 6f72 2c20 hrow' or error, │ │ │ -000129a0: 7468 6520 504c 4143 4573 2061 7265 2073 the PLACEs are s │ │ │ -000129b0: 6574 2062 6163 6b20 746f 2074 6865 6972 et back to their │ │ │ -000129c0: 206f 7269 6769 6e61 6c0a 7661 6c75 6573 original.values │ │ │ -000129d0: 2e20 204e 6f74 6520 7468 6174 2074 6869 . Note that thi │ │ │ -000129e0: 7320 6d61 6372 6f20 6973 202a 6e6f 742a s macro is *not* │ │ │ -000129f0: 2061 7661 696c 6162 6c65 2069 6e20 436f available in Co │ │ │ -00012a00: 6d6d 6f6e 204c 6973 702e 0a41 7320 6120 mmon Lisp..As a │ │ │ -00012a10: 7370 6563 6961 6c20 6361 7365 2c20 6966 special case, if │ │ │ -00012a20: 2060 2850 4c41 4345 2927 2069 7320 7573 `(PLACE)' is us │ │ │ -00012a30: 6564 2069 6e73 7465 6164 206f 6620 6028 ed instead of `( │ │ │ -00012a40: 504c 4143 4520 5641 4c55 4529 272c 0a74 PLACE VALUE)',.t │ │ │ -00012a50: 6865 2050 4c41 4345 2069 7320 6e6f 7420 he PLACE is not │ │ │ -00012a60: 6d6f 6469 6669 6564 2062 6566 6f72 6520 modified before │ │ │ -00012a70: 6578 6563 7574 696e 6720 424f 4459 2e1f executing BODY.. │ │ │ -00012a80: 0a28 6465 6661 6c69 6173 2027 6c65 7466 .(defalias 'letf │ │ │ -00012a90: 2027 286d 6163 726f 202e 2023 5b28 6269 '(macro . #[(bi │ │ │ -00012aa0: 6e64 696e 6773 2026 7265 7374 2062 6f64 ndings &rest bod │ │ │ -00012ab0: 7929 2022 0b41 ac91 0b40 41ab 8c0b 4040 y) ".A...@A...@@ │ │ │ -00012ac0: 39ab 86c6 0b09 4242 87c7 c80b 211d 1e1f 9.....BB....!... │ │ │ -00012ad0: 0d83 e100 0d40 4039 ab89 c9ca 0d40 4044 .....@@9.....@@D │ │ │ -00012ae0: 44aa 830d 4040 180d 4041 401e 20cb 08cc D...@@..@A@. ... │ │ │ -00012af0: 5c22 1ccd ce21 1e1e 0840 cf73 ad83 cdd0 \"...!...@.s.... │ │ │ -00012b00: 211a d10e 2021 3fad 870b 41ad 83cd d221 !... !?...A....! │ │ │ -00012b10: 1e21 0c40 5c6e ab9e 5c6e 0840 c961 ab83 .!.@\n..\n.@.a.. │ │ │ -00012b20: d3aa 81d4 d50c 3841 4044 440e 1ed6 5c6e ......8A@DD...\n │ │ │ -00012b30: d50c 3845 4444 aa87 0e1e d50c 3844 43a4 ..8EDD......8DC. │ │ │ -00012b40: 0e21 ad86 0e21 0e20 4443 a40e 1fa4 161f .!...!. DC...... │ │ │ -00012b50: d7d8 0d40 41ab 8fd9 0c41 400e 21ae 820e ...@A....A@.!... │ │ │ -00012b60: 205c 2209 42aa 8109 425c 6eab 9cda 5c6e \".B...B\n...\n │ │ │ -00012b70: d90c 4140 0e1e 5c22 0840 c961 ab83 dbaa ..A@..\".@.a.... │ │ │ -00012b80: 81dc d50c 3841 4044 46aa 87d9 0c41 400e ....8A@DF....A@. │ │ │ -00012b90: 1e5c 2245 4311 0d41 152e 0682 1c00 dd0e .\"EC..A........ │ │ │ -00012ba0: 1f09 2a42 4287 2220 5b70 6c61 6365 2062 ..*BB." [place b │ │ │ -00012bb0: 6f64 7920 626f 756e 6420 6269 6e64 696e ody bound bindin │ │ │ -00012bc0: 6773 206d 6574 686f 6420 7265 7620 6c65 gs method rev le │ │ │ -00012bd0: 7420 6e69 6c20 7265 7665 7273 6520 7379 t nil reverse sy │ │ │ -00012be0: 6d62 6f6c 2d76 616c 7565 2071 756f 7465 mbol-value quote │ │ │ -00012bf0: 2063 6c2d 7365 7466 2d64 6f2d 6d6f 6469 cl-setf-do-modi │ │ │ -00012c00: 6679 206e 6f2d 6f70 7420 6765 6e73 796d fy no-opt gensym │ │ │ -00012c10: 2022 2d2d 6c65 7466 2d73 6176 652d 2d22 "--letf-save--" │ │ │ -00012c20: 2028 7379 6d62 6f6c 2d76 616c 7565 2073 (symbol-value s │ │ │ -00012c30: 796d 626f 6c2d 6675 6e63 7469 6f6e 2920 ymbol-function) │ │ │ -00012c40: 222d 2d6c 6574 662d 626f 756e 642d 2d22 "--letf-bound--" │ │ │ -00012c50: 2063 6c2d 636f 6e73 742d 6578 7072 2d70 cl-const-expr-p │ │ │ -00012c60: 2022 2d2d 6c65 7466 2d76 616c 2d2d 2220 "--letf-val--" │ │ │ -00012c70: 626f 756e 6470 2066 626f 756e 6470 2032 boundp fboundp 2 │ │ │ -00012c80: 2061 6e64 2075 6e77 696e 642d 7072 6f74 and unwind-prot │ │ │ -00012c90: 6563 7420 7072 6f67 6e20 636c 2d73 6574 ect progn cl-set │ │ │ -00012ca0: 662d 646f 2d73 746f 7265 2069 6620 6d61 f-do-store if ma │ │ │ -00012cb0: 6b75 6e62 6f75 6e64 2066 6d61 6b75 6e62 kunbound fmakunb │ │ │ -00012cc0: 6f75 6e64 206c 6574 2a20 7361 7665 206c ound let* save l │ │ │ -00012cd0: 6574 7320 7661 6c75 6520 7465 6d70 5d20 ets value temp] │ │ │ -00012ce0: 3820 2823 2420 2e20 3735 3838 3429 5d29 8 (#$ . 75884)]) │ │ │ -00012cf0: 290a 2340 3533 3520 286c 6574 662a 2028 ).#@535 (letf* ( │ │ │ -00012d00: 2850 4c41 4345 2056 414c 5545 2920 2e2e (PLACE VALUE) .. │ │ │ -00012d10: 2e29 2042 4f44 592e 2e2e 293a 2074 656d .) BODY...): tem │ │ │ -00012d20: 706f 7261 7269 6c79 2062 696e 6420 746f porarily bind to │ │ │ -00012d30: 2050 4c41 4345 732e 0a54 6869 7320 6973 PLACEs..This is │ │ │ -00012d40: 2074 6865 2061 6e61 6c6f 6775 6520 6f66 the analogue of │ │ │ -00012d50: 2060 6c65 742a 272c 2062 7574 2077 6974 `let*', but wit │ │ │ -00012d60: 6820 6765 6e65 7261 6c69 7a65 6420 7661 h generalized va │ │ │ -00012d70: 7269 6162 6c65 7320 2869 6e20 7468 650a riables (in the. │ │ │ -00012d80: 7365 6e73 6520 6f66 2060 7365 7466 2729 sense of `setf') │ │ │ -00012d90: 2066 6f72 2074 6865 2050 4c41 4345 732e for the PLACEs. │ │ │ -00012da0: 2020 4561 6368 2050 4c41 4345 2069 7320 Each PLACE is │ │ │ -00012db0: 7365 7420 746f 2074 6865 2063 6f72 7265 set to the corre │ │ │ -00012dc0: 7370 6f6e 6469 6e67 0a56 414c 5545 2c20 sponding.VALUE, │ │ │ -00012dd0: 7468 656e 2074 6865 2042 4f44 5920 666f then the BODY fo │ │ │ -00012de0: 726d 7320 6172 6520 6578 6563 7574 6564 rms are executed │ │ │ -00012df0: 2e20 204f 6e20 6578 6974 2c20 6569 7468 . On exit, eith │ │ │ -00012e00: 6572 206e 6f72 6d61 6c6c 7920 6f72 0a62 er normally or.b │ │ │ -00012e10: 6563 6175 7365 206f 6620 6120 6074 6872 ecause of a `thr │ │ │ -00012e20: 6f77 2720 6f72 2065 7272 6f72 2c20 7468 ow' or error, th │ │ │ -00012e30: 6520 504c 4143 4573 2061 7265 2073 6574 e PLACEs are set │ │ │ -00012e40: 2062 6163 6b20 746f 2074 6865 6972 206f back to their o │ │ │ -00012e50: 7269 6769 6e61 6c0a 7661 6c75 6573 2e20 riginal.values. │ │ │ -00012e60: 204e 6f74 6520 7468 6174 2074 6869 7320 Note that this │ │ │ -00012e70: 6d61 6372 6f20 6973 202a 6e6f 742a 2061 macro is *not* a │ │ │ -00012e80: 7661 696c 6162 6c65 2069 6e20 436f 6d6d vailable in Comm │ │ │ -00012e90: 6f6e 204c 6973 702e 0a41 7320 6120 7370 on Lisp..As a sp │ │ │ -00012ea0: 6563 6961 6c20 6361 7365 2c20 6966 2060 ecial case, if ` │ │ │ -00012eb0: 2850 4c41 4345 2927 2069 7320 7573 6564 (PLACE)' is used │ │ │ -00012ec0: 2069 6e73 7465 6164 206f 6620 6028 504c instead of `(PL │ │ │ -00012ed0: 4143 4520 5641 4c55 4529 272c 0a74 6865 ACE VALUE)',.the │ │ │ -00012ee0: 2050 4c41 4345 2069 7320 6e6f 7420 6d6f PLACE is not mo │ │ │ -00012ef0: 6469 6669 6564 2062 6566 6f72 6520 6578 dified before ex │ │ │ -00012f00: 6563 7574 696e 6720 424f 4459 2e1f 0a28 ecuting BODY...( │ │ │ -00012f10: 6465 6661 6c69 6173 2027 6c65 7466 2a20 defalias 'letf* │ │ │ -00012f20: 2728 6d61 6372 6f20 2e20 235b 2862 696e '(macro . #[(bin │ │ │ -00012f30: 6469 6e67 7320 2672 6573 7420 626f 6479 dings &rest body │ │ │ -00012f40: 2920 2209 ac84 c208 4287 c309 2111 09ab ) ".....B...!... │ │ │ -00012f50: 8ec4 0989 4111 4043 0842 4243 10aa 6f08 ....A.@C.BBC..o. │ │ │ -00012f60: 4087 2220 5b62 6f64 7920 6269 6e64 696e @." [body bindin │ │ │ -00012f70: 6773 2070 726f 676e 2072 6576 6572 7365 gs progn reverse │ │ │ -00012f80: 206c 6574 665d 2033 2028 2324 202e 2037 letf] 3 (#$ . 7 │ │ │ -00012f90: 3730 3438 295d 2929 0a23 4031 3737 2028 7048)])).#@177 ( │ │ │ -00012fa0: 6361 6c6c 6620 4655 4e43 2050 4c41 4345 callf FUNC PLACE │ │ │ -00012fb0: 2041 5247 532e 2e2e 293a 2073 6574 2050 ARGS...): set P │ │ │ -00012fc0: 4c41 4345 2074 6f20 2846 554e 4320 504c LACE to (FUNC PL │ │ │ -00012fd0: 4143 4520 4152 4753 2e2e 2e29 2e0a 4655 ACE ARGS...)..FU │ │ │ -00012fe0: 4e43 2073 686f 756c 6420 6265 2061 6e20 NC should be an │ │ │ -00012ff0: 756e 7175 6f74 6564 2066 756e 6374 696f unquoted functio │ │ │ -00013000: 6e20 6e61 6d65 2e20 2050 4c41 4345 206d n name. PLACE m │ │ │ -00013010: 6179 2062 6520 6120 7379 6d62 6f6c 2c0a ay be a symbol,. │ │ │ -00013020: 6f72 2061 6e79 2067 656e 6572 616c 697a or any generaliz │ │ │ -00013030: 6564 2076 6172 6961 626c 6520 616c 6c6f ed variable allo │ │ │ -00013040: 7765 6420 6279 2060 7365 7466 272e 1f0a wed by `setf'... │ │ │ -00013050: 2864 6566 616c 6961 7320 2763 616c 6c66 (defalias 'callf │ │ │ -00013060: 2027 286d 6163 726f 202e 2023 5b28 6675 '(macro . #[(fu │ │ │ -00013070: 6e63 2070 6c61 6365 2026 7265 7374 2061 nc place &rest a │ │ │ -00013080: 7267 7329 2022 c508 c609 425c 221c c70c rgs) "....B\"... │ │ │ -00013090: 3809 421b c80c 40c9 0c41 405c 6e39 ab85 8.B...@..A@\n9.. │ │ │ -000130a0: 5c6e 0b42 aa87 cacb 5c6e 440b 4242 5c22 \n.B....\nD.BB\" │ │ │ -000130b0: 452a 8722 205b 706c 6163 6520 6172 6773 E*." [place args │ │ │ -000130c0: 2066 756e 6320 7261 7267 7320 6d65 7468 func rargs meth │ │ │ -000130d0: 6f64 2063 6c2d 7365 7466 2d64 6f2d 6d6f od cl-setf-do-mo │ │ │ -000130e0: 6469 6679 206c 6973 7420 3220 6c65 742a dify list 2 let* │ │ │ -000130f0: 2063 6c2d 7365 7466 2d64 6f2d 7374 6f72 cl-setf-do-stor │ │ │ -00013100: 6520 6675 6e63 616c 6c20 6675 6e63 7469 e funcall functi │ │ │ -00013110: 6f6e 5d20 3720 2823 2420 2e20 3737 3732 on] 7 (#$ . 7772 │ │ │ -00013120: 3729 5d29 290a 2340 3134 3620 2863 616c 7)])).#@146 (cal │ │ │ -00013130: 6c66 3220 4655 4e43 2041 5247 3120 504c lf2 FUNC ARG1 PL │ │ │ -00013140: 4143 4520 4152 4753 2e2e 2e29 3a20 7365 ACE ARGS...): se │ │ │ -00013150: 7420 504c 4143 4520 746f 2028 4655 4e43 t PLACE to (FUNC │ │ │ -00013160: 2041 5247 3120 504c 4143 4520 4152 4753 ARG1 PLACE ARGS │ │ │ -00013170: 2e2e 2e29 2e0a 4c69 6b65 2060 6361 6c6c ...)..Like `call │ │ │ -00013180: 6627 2c20 6275 7420 504c 4143 4520 6973 f', but PLACE is │ │ │ -00013190: 2074 6865 2073 6563 6f6e 6420 6172 6775 the second argu │ │ │ -000131a0: 6d65 6e74 206f 6620 4655 4e43 2c20 6e6f ment of FUNC, no │ │ │ -000131b0: 7420 7468 6520 6669 7273 742e 1f0a 2864 t the first...(d │ │ │ -000131c0: 6566 616c 6961 7320 2763 616c 6c66 3220 efalias 'callf2 │ │ │ -000131d0: 2728 6d61 6372 6f20 2e20 235b 2866 756e '(macro . #[(fun │ │ │ -000131e0: 6320 6172 6731 2070 6c61 6365 2026 7265 c arg1 place &re │ │ │ -000131f0: 7374 2061 7267 7329 2022 c60d 21ab 94c7 st args) "..!... │ │ │ -00013200: 0b21 ab8f 0c39 ab8b c80b 0c0d 0b09 4242 .!...9........BB │ │ │ -00013210: 4245 87c9 0bca 0942 5c22 1acb 0d21 3fad BE.....B\"...!?. │ │ │ -00013220: 83cc cd21 8918 ae81 0dce 5c6e 3809 4242 ...!......\n8.BB │ │ │ -00013230: 1e14 cfd0 08ad 8408 0d44 435c 6e40 5c22 .........DC\n@\" │ │ │ -00013240: d15c 6e41 400c 39ab 860c 0e14 42aa 88d2 .\nA@.9.....B... │ │ │ -00013250: d30c 440e 1442 425c 2245 2b87 2220 5b74 ..D..BB\"E+." [t │ │ │ -00013260: 656d 7020 6172 6773 206d 6574 686f 6420 emp args method │ │ │ -00013270: 706c 6163 6520 6675 6e63 2061 7267 3120 place func arg1 │ │ │ -00013280: 636c 2d73 6166 652d 6578 7072 2d70 2063 cl-safe-expr-p c │ │ │ -00013290: 6c2d 7369 6d70 6c65 2d65 7870 722d 7020 l-simple-expr-p │ │ │ -000132a0: 7365 7466 2063 6c2d 7365 7466 2d64 6f2d setf cl-setf-do- │ │ │ -000132b0: 6d6f 6469 6679 206c 6973 7420 636c 2d63 modify list cl-c │ │ │ -000132c0: 6f6e 7374 2d65 7870 722d 7020 6765 6e73 onst-expr-p gens │ │ │ -000132d0: 796d 2022 2d2d 6172 6731 2d2d 2220 3220 ym "--arg1--" 2 │ │ │ -000132e0: 6c65 742a 2061 7070 656e 6420 636c 2d73 let* append cl-s │ │ │ -000132f0: 6574 662d 646f 2d73 746f 7265 2066 756e etf-do-store fun │ │ │ -00013300: 6361 6c6c 2066 756e 6374 696f 6e20 7261 call function ra │ │ │ -00013310: 7267 735d 2038 2028 2324 202e 2037 3831 rgs] 8 (#$ . 781 │ │ │ -00013320: 3234 295d 2929 0a23 4032 3234 2028 6465 24)])).#@224 (de │ │ │ -00013330: 6669 6e65 2d6d 6f64 6966 792d 6d61 6372 fine-modify-macr │ │ │ -00013340: 6f20 4e41 4d45 2041 5247 4c49 5354 2046 o NAME ARGLIST F │ │ │ -00013350: 554e 4329 3a20 6465 6669 6e65 2061 2060 UNC): define a ` │ │ │ -00013360: 7365 7466 272d 6c69 6b65 206d 6f64 6966 setf'-like modif │ │ │ -00013370: 7920 6d61 6372 6f2e 0a49 6620 4e41 4d45 y macro..If NAME │ │ │ -00013380: 2069 7320 6361 6c6c 6564 2c20 6974 2063 is called, it c │ │ │ -00013390: 6f6d 6269 6e65 7320 6974 7320 504c 4143 ombines its PLAC │ │ │ -000133a0: 4520 6172 6775 6d65 6e74 2077 6974 6820 E argument with │ │ │ -000133b0: 7468 6520 6f74 6865 7220 6172 6775 6d65 the other argume │ │ │ -000133c0: 6e74 730a 6672 6f6d 2041 5247 4c49 5354 nts.from ARGLIST │ │ │ -000133d0: 2075 7369 6e67 2046 554e 433a 2028 6465 using FUNC: (de │ │ │ -000133e0: 6669 6e65 2d6d 6f64 6966 792d 6d61 6372 fine-modify-macr │ │ │ -000133f0: 6f20 696e 6366 2028 266f 7074 696f 6e61 o incf (&optiona │ │ │ -00013400: 6c20 286e 2031 2929 202b 291f 0a28 6465 l (n 1)) +)..(de │ │ │ -00013410: 6661 6c69 6173 2027 6465 6669 6e65 2d6d falias 'define-m │ │ │ -00013420: 6f64 6966 792d 6d61 6372 6f20 2728 6d61 odify-macro '(ma │ │ │ -00013430: 6372 6f20 2e20 235b 286e 616d 6520 6172 cro . #[(name ar │ │ │ -00013440: 676c 6973 7420 6675 6e63 2026 6f70 7469 glist func &opti │ │ │ -00013450: 6f6e 616c 2064 6f63 2920 22c5 0c73 ab84 onal doc) "..s.. │ │ │ -00013460: c6c7 2188 c8c9 211b ca5c 6e0b 0c42 09cb ..!...!..\n..B.. │ │ │ -00013470: 0c73 ab83 ccaa 81cd cecf 0844 0bd0 0c21 .s.........D...! │ │ │ -00013480: 4242 4242 af05 2987 2220 5b66 756e 6320 BBBB..)." [func │ │ │ -00013490: 646f 6320 6e61 6d65 2070 6c61 6365 2061 doc name place a │ │ │ -000134a0: 7267 6c69 7374 2026 6b65 7920 6572 726f rglist &key erro │ │ │ -000134b0: 7220 2226 6b65 7920 6e6f 7420 616c 6c6f r "&key not allo │ │ │ -000134c0: 7765 6420 696e 2064 6566 696e 652d 6d6f wed in define-mo │ │ │ -000134d0: 6469 6679 2d6d 6163 726f 2220 6765 6e73 dify-macro" gens │ │ │ -000134e0: 796d 2022 2d2d 706c 6163 652d 2d22 2064 ym "--place--" d │ │ │ -000134f0: 6566 6d61 6372 6f2a 2026 7265 7374 206c efmacro* &rest l │ │ │ -00013500: 6973 742a 206c 6973 7420 2763 616c 6c66 ist* list 'callf │ │ │ -00013510: 2071 756f 7465 2063 6c2d 6172 676c 6973 quote cl-arglis │ │ │ -00013520: 742d 6172 6773 5d20 3130 2028 2324 202e t-args] 10 (#$ . │ │ │ -00013530: 2037 3836 3337 295d 2929 0a23 4032 3839 78637)])).#@289 │ │ │ -00013540: 2028 6465 6673 7472 7563 7420 284e 414d (defstruct (NAM │ │ │ -00013550: 4520 4f50 5449 4f4e 532e 2e2e 2920 2853 E OPTIONS...) (S │ │ │ -00013560: 4c4f 5420 534c 4f54 2d4f 5054 532e 2e2e LOT SLOT-OPTS... │ │ │ -00013570: 292e 2e2e 293a 2064 6566 696e 6520 6120 )...): define a │ │ │ -00013580: 7374 7275 6374 2074 7970 652e 0a54 6869 struct type..Thi │ │ │ -00013590: 7320 6d61 6372 6f20 6465 6669 6e65 7320 s macro defines │ │ │ -000135a0: 6120 6e65 7720 4c69 7370 2064 6174 6120 a new Lisp data │ │ │ -000135b0: 7479 7065 2063 616c 6c65 6420 4e41 4d45 type called NAME │ │ │ -000135c0: 2c20 7768 6963 6820 636f 6e74 6169 6e73 , which contains │ │ │ -000135d0: 2064 6174 610a 7374 6f72 6564 2069 6e20 data.stored in │ │ │ -000135e0: 534c 4f54 732e 2020 5468 6973 2064 6566 SLOTs. This def │ │ │ -000135f0: 696e 6573 2061 2060 6d61 6b65 2d4e 414d ines a `make-NAM │ │ │ -00013600: 4527 2063 6f6e 7374 7275 6374 6f72 2c20 E' constructor, │ │ │ -00013610: 6120 6063 6f70 792d 4e41 4d45 270a 636f a `copy-NAME'.co │ │ │ -00013620: 7069 6572 2c20 6120 604e 414d 452d 7027 pier, a `NAME-p' │ │ │ -00013630: 2070 7265 6469 6361 7465 2c20 616e 6420 predicate, and │ │ │ -00013640: 7365 7466 2d61 626c 6520 604e 414d 452d setf-able `NAME- │ │ │ -00013650: 534c 4f54 2720 6163 6365 7373 6f72 732e SLOT' accessors. │ │ │ -00013660: 1f0a 2864 6566 616c 6961 7320 2764 6566 ..(defalias 'def │ │ │ -00013670: 7374 7275 6374 2027 286d 6163 726f 202e struct '(macro . │ │ │ -00013680: 2023 5b28 7374 7275 6374 2026 7265 7374 #[(struct &rest │ │ │ -00013690: 2064 6573 6373 2920 220e 543a ab85 0e54 descs) ".T:...T │ │ │ -000136a0: 40aa 820e 541c 0e54 a31e 4ac6 891e 451e @...T..T..J...E. │ │ │ -000136b0: 48c7 0c21 c850 1e59 c9ca cb0c 5c22 211e H..!.P.Y....\"!. │ │ │ -000136c0: 55c6 1e46 c9ca cc0c 5c22 211e 50c9 cacd U..F....\"!.P... │ │ │ -000136d0: 0c5c 2221 1e51 c689 1e40 1e52 ce20 ab84 .\"!.Q...@.R. .. │ │ │ -000136e0: 0e5d aa81 cf1e 5ac6 18c9 cad0 0c5c 2221 .]....Z......\"! │ │ │ -000136f0: 1e4d c9ca d10c 5c22 211e 4ec6 891e 4b1e .M....\"!.N...K. │ │ │ -00013700: 42c6 8919 1e47 c689 1d1e 43c6 1e4f 0b40 B....G....C..O.@ │ │ │ -00013710: 3bab 8ed2 d30c 44d4 0b89 4113 4046 0d42 ;.....D...A.@F.B │ │ │ -00013720: 15d5 d6d7 0b5c 2242 130e 4a83 4901 0e4a .....\"B..J.I..J │ │ │ -00013730: 403a ab86 0e4a 4040 aa83 0e4a 400e 4a89 @:...J@@...J@.J. │ │ │ -00013740: 4116 4a40 a31a 891e 44d8 61ab 945c 6e83 A.J@....D.a..\n. │ │ │ -00013750: 4501 5c6e 40ab 86c7 5c6e 4021 aa81 d916 E.\n@...\n@!.... │ │ │ -00013760: 5982 4501 0e44 da61 ab95 5c6e 41ab 885c Y.E..D.a..\nA..\ │ │ │ -00013770: 6e0e 4642 1646 aaf1 5c6e abee 5c6e 4016 n.FB.F..\n..\n@. │ │ │ -00013780: 55aa e80e 44db 61ab 895c 6eab df5c 6e40 U...D.a..\n..\n@ │ │ │ -00013790: 1650 aad9 0e44 dc61 ab89 5c6e abd0 5c6e .P...D.a..\n..\n │ │ │ -000137a0: 4016 51aa ca0e 44dd 61ab 8c5c 6e40 10d6 @.Q...D.a..\n@.. │ │ │ -000137b0: de5c 6e41 5c22 164b aab8 0e44 df61 ab86 .\nA\".K...D.a.. │ │ │ -000137c0: 5c6e 4016 40aa ac0e 44e0 61ab 855c 6e40 \n@.@...D.a..\n@ │ │ │ -000137d0: 11aa a10e 44e1 61ab 85e2 1647 aa96 0e44 ....D.a....G...D │ │ │ -000137e0: e361 ab8a e45c 6e40 e55c 220b a413 aa86 .a...\n@.\"..... │ │ │ -000137f0: e6e7 0e44 5c22 882a 828a 000e 40ab 91e8 ...D\".*....@... │ │ │ -00013800: e9ea 0e40 44eb eced af05 e245 1640 aaa4 ...@D......E.@.. │ │ │ -00013810: 09ac a108 ab85 08ee 4eab 99e2 1652 08ac ........N....R.. │ │ │ -00013820: 8309 ab85 0e40 3fad 89e8 efca f00c 5c22 .....@?.......\" │ │ │ -00013830: ec45 4416 4008 830c 0208 f14e 08f2 4e1e .ED.@......N..N. │ │ │ -00013840: 5689 1e57 ac85 e6f3 085c 2288 09ab 8c0e V..W.....\"..... │ │ │ -00013850: 5740 0961 ac85 e6f4 0c5c 2288 0e4b ab9f W@.a.....\"..K.. │ │ │ -00013860: 0e4b 4040 0e56 b7ae 88e6 f50e 4b40 4008 .K@@.V......K@@. │ │ │ -00013870: 230e 5673 0e4b 8941 164b 40a0 88aa 5df6 #.Vs.K.A.K@...]. │ │ │ -00013880: 0e56 f7f8 0bb7 0b5c 225c 2213 0e57 4011 .V.....\"\"..W@. │ │ │ -00013890: f80b b716 470e 5741 40ab 860c 164d e216 ....G.WA@....M.. │ │ │ -000138a0: 4708 891e 58ab 99f9 d30e 4d44 c9ca d10e G...X.....MD.... │ │ │ -000138b0: 585c 2221 450d 4215 0e58 fa4e 8916 58ac X\"!E.B..X.N..X. │ │ │ -000138c0: 672b aa9b 09ab 9309 fb73 ac85 e6fc 095c g+.......s.....\ │ │ │ -000138d0: 2288 0e47 ab8a 0c16 4daa 85fd 11fe 1647 "..G....M......G │ │ │ -000138e0: 0e47 ac87 f7f8 0bb7 0b5c 2213 ff0e 4e44 .G.......\"...ND │ │ │ -000138f0: 0d42 150e 47ad d70b 47f8 0bb7 0b73 475a .B..G...G....sGZ │ │ │ -00013900: 1e41 09fd 61ab 9f81 5f00 8160 0081 6100 .A..a..._..`..a. │ │ │ -00013910: 8162 000b 4745 8163 0081 6400 eb0e 4145 .b..GE.c..d...AE │ │ │ -00013920: 0e4e 4546 aaa7 0e41 8165 0055 ab8b 8163 .NEF...A.e.U...c │ │ │ -00013930: 0081 6600 0e4e 45aa 9481 5f00 8167 0081 ..f..NE..._..g.. │ │ │ -00013940: 6300 8168 000e 41eb 450e 4e45 4529 8916 c..h..A.E.NEE).. │ │ │ -00013950: 43ad a80e 5a81 6500 56ad a00e 4341 4040 C...Z.e.V...CA@@ │ │ │ -00013960: 8169 0061 ab93 0e5a 816a 0055 ab8b 815f .i.a...Z.j.U..._ │ │ │ -00013970: 000e 4341 4141 42aa 820e 4316 4f81 6500 ..CAAAB...C.O.e. │ │ │ -00013980: 0b1e 531e 410e 5383 db03 0e53 8941 1653 ..S.A.S....S.A.S │ │ │ -00013990: 4089 1e5b 4089 1e4c 816b 0073 ab98 c60e @..[@..L.k.s.... │ │ │ -000139a0: 4542 1645 0e4c f861 ad84 d30e 4d44 0e48 EB.E.L.a....MD.H │ │ │ -000139b0: 4216 4882 d203 0e4c 0e53 b7ab 89e6 816c B.H....L.S.....l │ │ │ -000139c0: 000e 4c0c 2388 c9ca 816d 000e 590e 4c23 ..L.#....m..Y.L# │ │ │ -000139d0: 211e 490e 4c0e 4542 1645 0e5b 4140 0e48 !.I.L.EB.E.[A@.H │ │ │ -000139e0: 4216 4881 6e00 0e49 816f 00f6 0e4f ad92 B.H.n..I.o...O.. │ │ │ -000139f0: 8170 000e 4fe6 ca81 7100 0e49 0c23 eb45 .p..O...q..I.#.E │ │ │ -00013a00: 4543 09fd 61ab 8981 6400 eb0e 4145 aa94 EC..a...d...AE.. │ │ │ -00013a10: 0e41 8165 0055 ab85 8172 00aa 8781 6800 .A.e.U...r....h. │ │ │ -00013a20: 0e41 eb45 435c 2242 4242 0d42 150e 49e2 .A.EC\"BBB.B..I. │ │ │ -00013a30: 420e 4242 1642 8173 000e 4981 7400 8175 B.BB.B.s..I.t..u │ │ │ -00013a40: 000e 5b41 4173 4140 ab8b e6ca 8176 000e ..[AAsA@.....v.. │ │ │ -00013a50: 495c 2244 aa97 8177 00eb d30c 44d3 0e49 I\"D...w....D..I │ │ │ -00013a60: 440e 4fad 84d3 0e4f 440e 41af 0646 0d42 D.O....OD.A..F.B │ │ │ -00013a70: 150e 52ab 980e 40ef ca81 7800 0e4c 5c22 ..R...@...x..L\" │ │ │ -00013a80: ec45 8179 000e 49eb 44ec 4544 a488 292a .E.y..I.D.ED..)* │ │ │ -00013a90: 0e41 5416 4182 cb02 2a0e 459f 1645 0e48 .AT.A...*.E..E.H │ │ │ -00013aa0: 9f16 480e 51ab b40e 43ab b081 6e00 0e51 ..H.Q...C...n..Q │ │ │ -00013ab0: 817a 000e 4340 815f 0061 ab89 f60e 4381 .z..C@._.a....C. │ │ │ -00013ac0: 7b00 5c22 aa87 815f 000e 43e2 4546 0d42 {.\"..._..C.EF.B │ │ │ -00013ad0: 150e 5181 7c00 420e 4242 1642 0e50 ab98 ..Q.|.B.BB.B.P.. │ │ │ -00013ae0: 817d 000e 5081 7e00 817f 0046 0d42 150e .}..P.~....F.B.. │ │ │ -00013af0: 50e2 420e 4242 1642 0e55 ab95 0e55 8180 P.B.BB.B.U...U.. │ │ │ -00013b00: 00f7 c681 8100 0e45 215c 2242 440e 4642 .......E!\"BD.FB │ │ │ -00013b10: 1646 0e46 abd3 0e46 4040 1c0e 4689 4116 .F.F...F@@..F.A. │ │ │ -00013b20: 4640 4140 1a81 8200 5c6e 211e 5e81 8300 F@A@....\n!.^... │ │ │ -00013b30: 8184 000e 450e 4823 1e5c 5c81 6e00 0c81 ....E.H#.\\.n... │ │ │ -00013b40: 8500 d3c6 0b42 445c 6e42 4209 0e5c 5c42 .....BD\nBB..\\B │ │ │ -00013b50: 460d 4215 8186 00e8 d681 8700 0b5c 2242 F.B..........\"B │ │ │ -00013b60: 21ab 880c e242 0e42 4216 422c aa29 0e52 !....B.BB.B,.).R │ │ │ -00013b70: ab89 0e40 8188 00e2 44a4 880e 40ab 9b81 ...@....D...@... │ │ │ -00013b80: 8900 ea81 8a00 818b 0081 5f00 0e43 0e40 .........._..C.@ │ │ │ -00013b90: 4545 4481 8c00 450d 4215 818d 000e 4e81 EED...E.B.....N. │ │ │ -00013ba0: 8e00 d30e 4d44 4445 0d42 1581 8f00 8190 ....MDDE.B...... │ │ │ -00013bb0: 00d2 d30c 4481 9100 d30b 4446 d2d3 0c44 ....D.....DF...D │ │ │ -00013bc0: 8192 00d3 090e 47e2 6144 4446 d2d3 0c44 ......G.aDDF...D │ │ │ -00013bd0: 8193 00d3 0844 46d2 d30c 4481 9400 0e52 .....DF...D....R │ │ │ -00013be0: 46d6 8195 000e 425c 2242 4242 4242 420d F.....B\"BBBBBB. │ │ │ -00013bf0: 4215 e8d3 0c44 0d42 9f2e 1642 8722 205b B....D.B...B." [ │ │ │ -00013c00: 696e 636c 7564 6520 7479 7065 2061 7267 include type arg │ │ │ -00013c10: 7320 6465 7363 7320 6e61 6d65 2066 6f72 s descs name for │ │ │ -00013c20: 6d73 206e 696c 2073 796d 626f 6c2d 6e61 ms nil symbol-na │ │ │ -00013c30: 6d65 2022 2d22 2069 6e74 6572 6e20 666f me "-" intern fo │ │ │ -00013c40: 726d 6174 2022 6d61 6b65 2d25 7322 2022 rmat "make-%s" " │ │ │ -00013c50: 636f 7079 2d25 7322 2022 2573 2d70 2220 copy-%s" "%s-p" │ │ │ -00013c60: 636c 2d63 6f6d 7069 6c69 6e67 2d66 696c cl-compiling-fil │ │ │ -00013c70: 6520 3320 2263 6c2d 7374 7275 6374 2d25 e 3 "cl-struct-% │ │ │ -00013c80: 7322 2022 636c 2d73 7472 7563 742d 2573 s" "cl-struct-%s │ │ │ -00013c90: 2d74 6167 7322 2070 7574 2071 756f 7465 -tags" put quote │ │ │ -00013ca0: 2027 7374 7275 6374 7572 652d 646f 6375 'structure-docu │ │ │ -00013cb0: 6d65 6e74 6174 696f 6e20 2863 6c2d 7461 mentation (cl-ta │ │ │ -00013cc0: 672d 736c 6f74 2920 6d61 7063 6172 2023 g-slot) mapcar # │ │ │ -00013cd0: 5b28 7829 2022 083a ab82 0887 0843 8722 [(x) ".:.....C." │ │ │ -00013ce0: 205b 785d 2031 5d20 3a63 6f6e 632d 6e61 [x] 1] :conc-na │ │ │ -00013cf0: 6d65 2022 2220 3a63 6f6e 7374 7275 6374 me "" :construct │ │ │ -00013d00: 6f72 203a 636f 7069 6572 203a 7072 6564 or :copier :pred │ │ │ -00013d10: 6963 6174 6520 3a69 6e63 6c75 6465 2023 icate :include # │ │ │ -00013d20: 5b28 7829 2022 083a ab82 0887 0843 8722 [(x) ".:.....C." │ │ │ -00013d30: 205b 785d 2031 5d20 3a70 7269 6e74 2d66 [x] 1] :print-f │ │ │ -00013d40: 756e 6374 696f 6e20 3a74 7970 6520 3a6e unction :type :n │ │ │ -00013d50: 616d 6564 2074 203a 696e 6974 6961 6c2d amed t :initial- │ │ │ -00013d60: 6f66 6673 6574 206d 616b 652d 6c69 7374 offset make-list │ │ │ -00013d70: 2028 636c 2d73 6b69 702d 736c 6f74 2920 (cl-skip-slot) │ │ │ -00013d80: 6572 726f 7220 2253 6c6f 7420 6f70 7469 error "Slot opti │ │ │ -00013d90: 6f6e 2025 7320 756e 7265 636f 676e 697a on %s unrecogniz │ │ │ -00013da0: 6564 2220 7072 6f67 6e20 6675 6e63 616c ed" progn funcal │ │ │ -00013db0: 6c20 6675 6e63 7469 6f6e 2063 6c2d 7820 l function cl-x │ │ │ -00013dc0: 636c 2d73 2063 6c2d 6e20 636c 2d73 7472 cl-s cl-n cl-str │ │ │ -00013dd0: 7563 742d 7072 696e 7420 7072 696e 6320 uct-print princ │ │ │ -00013de0: 2223 5328 2573 2220 636c 2d73 7472 7563 "#S(%s" cl-struc │ │ │ -00013df0: 742d 7479 7065 2063 6c2d 7374 7275 6374 t-type cl-struct │ │ │ -00013e00: 2d73 6c6f 7473 2022 2573 2069 7320 6e6f -slots "%s is no │ │ │ -00013e10: 7420 6120 7374 7275 6374 206e 616d 6522 t a struct name" │ │ │ -00013e20: 2022 3a74 7970 6520 6469 7361 6772 6565 ":type disagree │ │ │ -00013e30: 7320 7769 7468 203a 696e 636c 7564 6520 s with :include │ │ │ -00013e40: 666f 7220 2573 2220 224e 6f20 736c 6f74 for %s" "No slot │ │ │ -00013e50: 2025 7320 696e 2069 6e63 6c75 6465 6420 %s in included │ │ │ -00013e60: 7374 7275 6374 2025 7322 2061 7070 656e struct %s" appen │ │ │ -00013e70: 6420 6465 6c71 2063 6c2d 7461 672d 736c d delq cl-tag-sl │ │ │ -00013e80: 6f74 2070 7573 686e 6577 2063 6c2d 7374 ot pushnew cl-st │ │ │ -00013e90: 7275 6374 2d69 6e63 6c75 6465 2028 7665 ruct-include (ve │ │ │ -00013ea0: 6374 6f72 206c 6973 7429 2022 496c 6c65 ctor list) "Ille │ │ │ -00013eb0: 6761 6c20 3a74 7970 6520 7370 6563 6966 gal :type specif │ │ │ -00013ec0: 6965 723a 2025 7322 2076 6563 746f 7220 ier: %s" vector │ │ │ -00013ed0: 7472 7565 2064 6566 7661 7220 7072 696e true defvar prin │ │ │ -00013ee0: 742d 6675 6e63 2070 6f73 2073 6964 652d t-func pos side- │ │ │ -00013ef0: 6566 6620 7072 6564 2d66 6f72 6d20 6f70 eff pred-form op │ │ │ -00013f00: 7420 736c 6f74 7320 636f 6e73 7472 7320 t slots constrs │ │ │ -00013f10: 6e61 6d65 6420 6465 6661 756c 7473 2061 named defaults a │ │ │ -00013f20: 6363 6573 736f 7220 6f70 7473 2069 6e63 ccessor opts inc │ │ │ -00013f30: 6c75 6465 2d64 6573 6373 2073 6c6f 7420 lude-descs slot │ │ │ -00013f40: 7461 6720 7461 672d 7379 6d62 6f6c 2070 tag tag-symbol p │ │ │ -00013f50: 7265 642d 6368 6563 6b20 636f 7069 6572 red-check copier │ │ │ -00013f60: 2070 7265 6469 6361 7465 2070 7269 6e74 predicate print │ │ │ -00013f70: 2d61 7574 6f20 6465 7363 7020 7374 7275 -auto descp stru │ │ │ -00013f80: 6374 2063 6f6e 7374 7275 6374 6f72 206f ct constructor o │ │ │ -00013f90: 6c64 2d64 6573 6373 2069 6e63 2d74 7970 ld-descs inc-typ │ │ │ -00013fa0: 6520 696e 636c 2063 6f6e 632d 6e61 6d65 e incl conc-name │ │ │ -00013fb0: 2073 6166 6574 7920 6465 7363 206d 616b safety desc mak │ │ │ -00013fc0: 6520 636c 2d6f 7074 696d 697a 652d 7361 e cl-optimize-sa │ │ │ -00013fd0: 6665 7479 2061 6e61 6d65 7320 616e 6420 fety anames and │ │ │ -00013fe0: 2876 6563 746f 7270 2063 6c2d 7829 203e (vectorp cl-x) > │ │ │ -00013ff0: 3d20 286c 656e 6774 6820 636c 2d78 2920 = (length cl-x) │ │ │ -00014000: 6d65 6d71 2061 7265 6620 3020 2863 6172 memq aref 0 (car │ │ │ -00014010: 2d73 6166 6520 636c 2d78 2920 2863 6f6e -safe cl-x) (con │ │ │ -00014020: 7370 2063 6c2d 7829 206e 7468 2076 6563 sp cl-x) nth vec │ │ │ -00014030: 746f 7270 2031 2028 636c 2d74 6167 2d73 torp 1 (cl-tag-s │ │ │ -00014040: 6c6f 7420 636c 2d73 6b69 702d 736c 6f74 lot cl-skip-slot │ │ │ -00014050: 2920 2244 7570 6c69 6361 7465 2073 6c6f ) "Duplicate slo │ │ │ -00014060: 7473 206e 616d 6564 2025 7320 696e 2025 ts named %s in % │ │ │ -00014070: 7322 2022 2573 2573 2220 6465 6673 7562 s" "%s%s" defsub │ │ │ -00014080: 7374 2a20 2863 6c2d 7829 206f 7220 2225 st* (cl-x) or "% │ │ │ -00014090: 7320 6163 6365 7373 696e 6720 6120 6e6f s accessing a no │ │ │ -000140a0: 6e2d 2573 2220 2863 6172 2063 6c2d 7829 n-%s" (car cl-x) │ │ │ -000140b0: 2064 6566 696e 652d 7365 7466 2d6d 6574 define-setf-met │ │ │ -000140c0: 686f 6420 2863 6c2d 7829 203a 7265 6164 hod (cl-x) :read │ │ │ -000140d0: 2d6f 6e6c 7920 2225 7320 6973 2061 2072 -only "%s is a r │ │ │ -000140e0: 6561 642d 6f6e 6c79 2073 6c6f 7422 2063 ead-only slot" c │ │ │ -000140f0: 6c2d 7374 7275 6374 2d73 6574 662d 6578 l-struct-setf-ex │ │ │ -00014100: 7061 6e64 6572 2022 2025 7322 2070 7269 pander " %s" pri │ │ │ -00014110: 6e31 2028 636c 2d78 2920 2874 2920 6572 n1 (cl-x) (t) er │ │ │ -00014120: 726f 722d 6672 6565 2064 6566 756e 2028 ror-free defun ( │ │ │ -00014130: 7829 2028 636f 7079 2d73 6571 7565 6e63 x) (copy-sequenc │ │ │ -00014140: 6520 7829 2026 6b65 7920 636f 7079 2d73 e x) &key copy-s │ │ │ -00014150: 6571 7565 6e63 6520 636c 2d61 7267 6c69 equence cl-argli │ │ │ -00014160: 7374 2d61 7267 7320 6d61 7063 6172 2a20 st-args mapcar* │ │ │ -00014170: 235b 2873 2064 2920 225c 6e09 73ab 825c #[(s d) "\n.s..\ │ │ │ -00014180: 6e87 0887 2220 5b64 2061 6e61 6d65 7320 n..." [d anames │ │ │ -00014190: 735d 2032 5d20 2663 6c2d 6465 6673 2063 s] 2] &cl-defs c │ │ │ -000141a0: 6c2d 7361 6665 2d65 7870 722d 7020 7365 l-safe-expr-p se │ │ │ -000141b0: 636f 6e64 2028 7072 696e 6320 2229 2220 cond (princ ")" │ │ │ -000141c0: 636c 2d73 2920 7075 7368 206c 616d 6264 cl-s) push lambd │ │ │ -000141d0: 6120 2863 6c2d 7820 636c 2d73 2063 6c2d a (cl-x cl-s cl- │ │ │ -000141e0: 6e29 2063 7573 746f 6d2d 7072 696e 742d n) custom-print- │ │ │ -000141f0: 6675 6e63 7469 6f6e 7320 7365 7471 206c functions setq l │ │ │ -00014200: 6973 7420 6576 616c 2d77 6865 6e20 2863 ist eval-when (c │ │ │ -00014210: 6f6d 7069 6c65 206c 6f61 6420 6576 616c ompile load eval │ │ │ -00014220: 2920 2763 6c2d 7374 7275 6374 2d73 6c6f ) 'cl-struct-slo │ │ │ -00014230: 7473 2027 636c 2d73 7472 7563 742d 7479 ts 'cl-struct-ty │ │ │ -00014240: 7065 2027 636c 2d73 7472 7563 742d 696e pe 'cl-struct-in │ │ │ -00014250: 636c 7564 6520 2763 6c2d 7374 7275 6374 clude 'cl-struct │ │ │ -00014260: 2d70 7269 6e74 2023 5b28 7829 2022 c1c2 -print #[(x) ".. │ │ │ -00014270: 0840 44c3 c208 4144 4687 2220 5b78 2070 .@D...ADF." [x p │ │ │ -00014280: 7574 2071 756f 7465 2027 7369 6465 2d65 ut quote 'side-e │ │ │ -00014290: 6666 6563 742d 6672 6565 5d20 355d 5d20 ffect-free] 5]] │ │ │ -000142a0: 3132 2028 2324 202e 2037 3931 3639 295d 12 (#$ . 79169)] │ │ │ -000142b0: 2929 0a28 6465 6661 6c69 6173 2027 636c )).(defalias 'cl │ │ │ -000142c0: 2d73 7472 7563 742d 7365 7466 2d65 7870 -struct-setf-exp │ │ │ -000142d0: 616e 6465 7220 235b 2878 206e 616d 6520 ander #[(x name │ │ │ -000142e0: 6163 6365 7373 6f72 2070 7265 642d 666f accessor pred-fo │ │ │ -000142f0: 726d 2070 6f73 2920 22c6 c721 1dc6 c821 rm pos) "..!...! │ │ │ -00014300: 1b0d 430e 1a43 0b43 c9ca 09ad 91cb cc0d ..C..C.C........ │ │ │ -00014310: cd09 23ce cfd0 080e 1923 0d45 4543 0e19 ..#......#.EEC.. │ │ │ -00014320: d14e 40d2 61ab 87d3 0d0c 0b46 aaa0 d40c .N@.a......F.... │ │ │ -00014330: d558 ab94 0d1a 0c53 8914 d659 ab86 d75c .X.....S...Y...\ │ │ │ -00014340: 6e44 12aa 725c 6e29 aa84 d80c 0d45 0b45 nD..r\n).....E.E │ │ │ -00014350: 4323 080d 44af 052a 8722 205b 6163 6365 C#..D..*." [acce │ │ │ -00014360: 7373 6f72 2070 7265 642d 666f 726d 2078 ssor pred-form x │ │ │ -00014370: 7820 7374 6f72 6520 706f 7320 7465 6d70 x store pos temp │ │ │ -00014380: 2067 656e 7379 6d20 222d 2d78 2d2d 2220 gensym "--x--" │ │ │ -00014390: 222d 2d73 746f 7265 2d2d 2220 6170 7065 "--store--" appe │ │ │ -000143a0: 6e64 2028 7072 6f67 6e29 206f 7220 7375 nd (progn) or su │ │ │ -000143b0: 6273 7420 636c 2d78 2065 7272 6f72 2066 bst cl-x error f │ │ │ -000143c0: 6f72 6d61 7420 2225 7320 7374 6f72 696e ormat "%s storin │ │ │ -000143d0: 6720 6120 6e6f 6e2d 2573 2220 636c 2d73 g a non-%s" cl-s │ │ │ -000143e0: 7472 7563 742d 7479 7065 2076 6563 746f truct-type vecto │ │ │ -000143f0: 7220 6173 6574 2073 6574 6361 7220 3520 r aset setcar 5 │ │ │ -00014400: 3020 6364 7220 6e74 6863 6472 206e 616d 0 cdr nthcdr nam │ │ │ -00014410: 6520 785d 2031 325d 290a 2340 3133 3020 e x] 12]).#@130 │ │ │ -00014420: 2864 6566 7479 7065 204e 414d 4520 4152 (deftype NAME AR │ │ │ -00014430: 474c 4953 5420 424f 4459 2e2e 2e29 3a20 GLIST BODY...): │ │ │ -00014440: 6465 6669 6e65 204e 414d 4520 6173 2061 define NAME as a │ │ │ -00014450: 206e 6577 2064 6174 6120 7479 7065 2e0a new data type.. │ │ │ -00014460: 5468 6520 7479 7065 206e 616d 6520 6361 The type name ca │ │ │ -00014470: 6e20 7468 656e 2062 6520 7573 6564 2069 n then be used i │ │ │ -00014480: 6e20 6074 7970 6563 6173 6527 2c20 6063 n `typecase', `c │ │ │ -00014490: 6865 636b 2d74 7970 6527 2c20 6574 632e heck-type', etc. │ │ │ -000144a0: 1f0a 2864 6566 616c 6961 7320 2764 6566 ..(defalias 'def │ │ │ -000144b0: 7479 7065 2027 286d 6163 726f 202e 2023 type '(macro . # │ │ │ -000144c0: 5b28 6e61 6d65 2061 7267 7320 2672 6573 [(name args &res │ │ │ -000144d0: 7420 626f 6479 2920 22c3 c4c5 5c6e c6c7 t body) "...\n.. │ │ │ -000144e0: c809 4242 0842 2345 8722 205b 626f 6479 ..BB.B#E." [body │ │ │ -000144f0: 2061 7267 7320 6e61 6d65 2065 7661 6c2d args name eval- │ │ │ -00014500: 7768 656e 2028 636f 6d70 696c 6520 6c6f when (compile lo │ │ │ -00014510: 6164 2065 7661 6c29 2063 6c2d 7472 616e ad eval) cl-tran │ │ │ -00014520: 7366 6f72 6d2d 6675 6e63 7469 6f6e 2d70 sform-function-p │ │ │ -00014530: 726f 7065 7274 7920 636c 2d64 6566 7479 roperty cl-defty │ │ │ -00014540: 7065 2d68 616e 646c 6572 2026 636c 2d64 pe-handler &cl-d │ │ │ -00014550: 6566 7320 2728 272a 295d 2038 2028 2324 efs '('*)] 8 (#$ │ │ │ -00014560: 202e 2038 3239 3736 295d 2929 0a28 6465 . 82976)])).(de │ │ │ -00014570: 6661 6c69 6173 2027 636c 2d6d 616b 652d falias 'cl-make- │ │ │ -00014580: 7479 7065 2d74 6573 7420 235b 2876 616c type-test #[(val │ │ │ -00014590: 2074 7970 6529 2022 0b39 abde 0bc4 4eab type) ".9....N. │ │ │ -000145a0: 88c5 5c6e 0bc4 4e20 5c22 870b c673 ab82 ..\n..N \"...s.. │ │ │ -000145b0: 0b87 0bc7 61ab 84c8 5c6e 4487 0bc9 61ab ....a...\nD...a. │ │ │ -000145c0: 84c9 5c6e 4487 0bca 61ab 84cb 5c6e 4487 ..\nD...a...\nD. │ │ │ -000145d0: 0bcc 61ab 84cd 5c6e 4487 0bce 61ab 84cf ..a...\nD...a... │ │ │ -000145e0: 5c6e 4487 d00b 2119 d109 d250 2118 d308 \nD...!....P!... │ │ │ -000145f0: 21ab 8508 5c6e 44aa 87d1 09d4 5021 5c6e !...\nD.....P!\n │ │ │ -00014600: 442a 870b 40c4 4eab 8cc5 5c6e d50b 40c4 D*..@.N...\n..@. │ │ │ -00014610: 4e0b 415c 225c 2287 0ba2 d673 abcd d7d8 N.A\"\"....s.... │ │ │ -00014620: d9c5 5c6e 0b40 5c22 0b41 40da 73ab 83d8 ..\n.@\".A@.s... │ │ │ -00014630: aa95 0b41 403a ab89 db5c 6e0b 4140 4045 ...A@:...\n.A@@E │ │ │ -00014640: aa86 dc5c 6e0b 4140 450b 4141 40dd 73ab ...\n.A@E.AA@.s. │ │ │ -00014650: 83d8 aa98 0b41 4140 3aab 8ade 5c6e 0b41 .....AA@:...\n.A │ │ │ -00014660: 4140 4045 aa87 df5c 6e0b 4141 4045 465c A@@E...\n.AA@EF\ │ │ │ -00014670: 2287 0ba2 e073 ab89 0b40 e1e2 0b41 5c22 "....s...@...A\" │ │ │ -00014680: 4287 0ba2 e373 ab8b d9e4 5c6e e50b 4144 B....s....\n..AD │ │ │ -00014690: 45d8 4587 0ba2 e661 ab86 0b41 405c 6e44 E.E....a...A@\nD │ │ │ -000146a0: 87e7 e80b 5c22 8722 205b 6e61 6d65 7020 ....\"." [namep │ │ │ -000146b0: 6e61 6d65 2076 616c 2074 7970 6520 636c name val type cl │ │ │ -000146c0: 2d64 6566 7479 7065 2d68 616e 646c 6572 -deftype-handler │ │ │ -000146d0: 2063 6c2d 6d61 6b65 2d74 7970 652d 7465 cl-make-type-te │ │ │ -000146e0: 7374 2028 6e69 6c20 7429 2073 7472 696e st (nil t) strin │ │ │ -000146f0: 672d 6368 6172 2063 6861 7261 6374 6572 g-char character │ │ │ -00014700: 7020 6e75 6c6c 2066 6c6f 6174 2066 6c6f p null float flo │ │ │ -00014710: 6174 702d 7361 6665 2072 6561 6c20 6e75 atp-safe real nu │ │ │ -00014720: 6d62 6572 7020 6669 786e 756d 2069 6e74 mberp fixnum int │ │ │ -00014730: 6567 6572 7020 7379 6d62 6f6c 2d6e 616d egerp symbol-nam │ │ │ -00014740: 6520 696e 7465 726e 2022 7022 2066 626f e intern "p" fbo │ │ │ -00014750: 756e 6470 2022 2d70 2220 6170 706c 7920 undp "-p" apply │ │ │ -00014760: 2869 6e74 6567 6572 2066 6c6f 6174 2072 (integer float r │ │ │ -00014770: 6561 6c20 6e75 6d62 6572 2920 6465 6c71 eal number) delq │ │ │ -00014780: 2074 2061 6e64 2028 2a20 6e69 6c29 203e t and (* nil) > │ │ │ -00014790: 203e 3d20 282a 206e 696c 2920 3c20 3c3d >= (* nil) < <= │ │ │ -000147a0: 2028 616e 6420 6f72 206e 6f74 2920 6d61 (and or not) ma │ │ │ -000147b0: 7063 6172 2023 5b28 7829 2022 c209 085c pcar #[(x) "...\ │ │ │ -000147c0: 2287 2220 5b78 2076 616c 2063 6c2d 6d61 "." [x val cl-ma │ │ │ -000147d0: 6b65 2d74 7970 652d 7465 7374 5d20 335d ke-type-test] 3] │ │ │ -000147e0: 2028 6d65 6d62 6572 206d 656d 6265 722a (member member* │ │ │ -000147f0: 2920 6d65 6d62 6572 2a20 7175 6f74 6520 ) member* quote │ │ │ -00014800: 7361 7469 7366 6965 7320 6572 726f 7220 satisfies error │ │ │ -00014810: 2242 6164 2074 7970 6520 7370 6563 3a20 "Bad type spec: │ │ │ -00014820: 2573 225d 2038 5d29 0a23 4038 3020 4368 %s"] 8]).#@80 Ch │ │ │ -00014830: 6563 6b20 7468 6174 204f 424a 4543 5420 eck that OBJECT │ │ │ -00014840: 6973 206f 6620 7479 7065 2054 5950 452e is of type TYPE. │ │ │ -00014850: 0a54 5950 4520 6973 2061 2043 6f6d 6d6f .TYPE is a Commo │ │ │ -00014860: 6e20 4c69 7370 2d73 7479 6c65 2074 7970 n Lisp-style typ │ │ │ -00014870: 6520 7370 6563 6966 6965 722e 1f0a 2864 e specifier...(d │ │ │ -00014880: 6566 616c 6961 7320 2774 7970 6570 2023 efalias 'typep # │ │ │ -00014890: 5b28 6f62 6a65 6374 2074 7970 6529 2022 [(object type) " │ │ │ -000148a0: c1c2 c308 5c22 2187 2220 5b74 7970 6520 ....\"!." [type │ │ │ -000148b0: 6576 616c 2063 6c2d 6d61 6b65 2d74 7970 eval cl-make-typ │ │ │ -000148c0: 652d 7465 7374 206f 626a 6563 745d 2034 e-test object] 4 │ │ │ -000148d0: 2028 2324 202e 2038 3430 3134 295d 290a (#$ . 84014)]). │ │ │ -000148e0: 2340 3132 3620 5665 7269 6679 2074 6861 #@126 Verify tha │ │ │ -000148f0: 7420 504c 4143 4520 6973 206f 6620 7479 t PLACE is of ty │ │ │ -00014900: 7065 2054 5950 453b 2073 6967 6e61 6c20 pe TYPE; signal │ │ │ -00014910: 6120 636f 6e74 696e 7561 626c 6520 6572 a continuable er │ │ │ -00014920: 726f 7220 6966 206e 6f74 2e0a 5354 5249 ror if not..STRI │ │ │ -00014930: 4e47 2069 7320 616e 206f 7074 696f 6e61 NG is an optiona │ │ │ -00014940: 6c20 6465 7363 7269 7074 696f 6e20 6f66 l description of │ │ │ -00014950: 2074 6865 2064 6573 6972 6564 2074 7970 the desired typ │ │ │ -00014960: 652e 1f0a 2864 6566 616c 6961 7320 2763 e...(defalias 'c │ │ │ -00014970: 6865 636b 2d74 7970 6520 2728 6d61 6372 heck-type '(macr │ │ │ -00014980: 6f20 2e20 235b 2870 6c61 6365 2074 7970 o . #[(place typ │ │ │ -00014990: 6520 266f 7074 696f 6e61 6c20 7374 7269 e &optional stri │ │ │ -000149a0: 6e67 2920 22c6 20ab 8a09 c757 ac85 08c7 ng) ". ....W.... │ │ │ -000149b0: 55ad b9c8 0dc7 5c22 ab83 0daa 82c9 201c U.....\"...... . │ │ │ -000149c0: ca0c 5c6e 5c22 1e13 cbcc cd0e 14ae 83ce ..\n\".......... │ │ │ -000149d0: 5c6e 440c ce0d 4446 451e 15cf d0d1 8f1b \nD...DFE....... │ │ │ -000149e0: 0c0d 61ab 830b aa87 d20c 0d44 430b 452c ..a........DC.E, │ │ │ -000149f0: 8722 205b 636c 2d6f 7074 696d 697a 652d ." [cl-optimize- │ │ │ -00014a00: 7361 6665 7479 2063 6c2d 6f70 7469 6d69 safety cl-optimi │ │ │ -00014a10: 7a65 2d73 7065 6564 2074 7970 6520 626f ze-speed type bo │ │ │ -00014a20: 6479 2074 656d 7020 706c 6163 6520 636c dy temp place cl │ │ │ -00014a30: 2d63 6f6d 7069 6c69 6e67 2d66 696c 6520 -compiling-file │ │ │ -00014a40: 3320 636c 2d73 696d 706c 652d 6578 7072 3 cl-simple-expr │ │ │ -00014a50: 2d70 2067 656e 7379 6d20 636c 2d6d 616b -p gensym cl-mak │ │ │ -00014a60: 652d 7479 7065 2d74 6573 7420 7369 676e e-type-test sign │ │ │ -00014a70: 616c 2027 7772 6f6e 672d 7479 7065 2d61 al 'wrong-type-a │ │ │ -00014a80: 7267 756d 656e 7420 6c69 7374 2071 756f rgument list quo │ │ │ -00014a90: 7465 206e 696c 2028 6279 7465 2d63 6f64 te nil (byte-cod │ │ │ -00014aa0: 6520 22c3 c45c 6e44 c5c6 0908 4521 4587 e "..\nD....E!E. │ │ │ -00014ab0: 2220 5b73 6967 6e61 6c2d 6572 726f 7220 " [signal-error │ │ │ -00014ac0: 706c 6163 6520 7465 7374 2077 6869 6c65 place test while │ │ │ -00014ad0: 206e 6f74 206d 6163 726f 6578 7061 6e64 not macroexpand │ │ │ -00014ae0: 2073 6574 665d 2036 2920 2828 6572 726f setf] 6) ((erro │ │ │ -00014af0: 7220 2862 7974 652d 636f 6465 2022 c209 r (byte-code ".. │ │ │ -00014b00: c308 c442 4245 8722 205b 7369 676e 616c ...BBE." [signal │ │ │ -00014b10: 2d65 7272 6f72 2074 6573 7420 6966 2070 -error test if p │ │ │ -00014b20: 726f 676e 2028 6e69 6c29 5d20 3529 2929 rogn (nil)] 5))) │ │ │ -00014b30: 206c 6574 2074 6573 7420 7374 7269 6e67 let test string │ │ │ -00014b40: 2073 6967 6e61 6c2d 6572 726f 725d 2037 signal-error] 7 │ │ │ -00014b50: 2028 2324 202e 2038 3431 3938 295d 2929 (#$ . 84198)])) │ │ │ -00014b60: 0a23 4033 3137 2056 6572 6966 7920 7468 .#@317 Verify th │ │ │ -00014b70: 6174 2046 4f52 4d20 7265 7475 726e 7320 at FORM returns │ │ │ -00014b80: 6e6f 6e2d 6e69 6c3b 2073 6967 6e61 6c20 non-nil; signal │ │ │ -00014b90: 616e 2065 7272 6f72 2069 6620 6e6f 742e an error if not. │ │ │ -00014ba0: 0a53 6563 6f6e 6420 6172 6720 5348 4f57 .Second arg SHOW │ │ │ -00014bb0: 2d41 5247 5320 6d65 616e 7320 746f 2069 -ARGS means to i │ │ │ -00014bc0: 6e63 6c75 6465 2061 7267 756d 656e 7473 nclude arguments │ │ │ -00014bd0: 206f 6620 464f 524d 2069 6e20 6d65 7373 of FORM in mess │ │ │ -00014be0: 6167 652e 0a4f 7468 6572 2061 7267 7320 age..Other args │ │ │ -00014bf0: 5354 5249 4e47 2061 6e64 2041 5247 532e STRING and ARGS. │ │ │ -00014c00: 2e2e 2061 7265 2061 7267 756d 656e 7473 .. are arguments │ │ │ -00014c10: 2074 6f20 6265 2070 6173 7365 6420 746f to be passed to │ │ │ -00014c20: 2060 6572 726f 7227 2e0a 5468 6579 2061 `error'..They a │ │ │ -00014c30: 7265 206e 6f74 2065 7661 6c75 6174 6564 re not evaluated │ │ │ -00014c40: 2075 6e6c 6573 7320 7468 6520 6173 7365 unless the asse │ │ │ -00014c50: 7274 696f 6e20 6661 696c 732e 2020 4966 rtion fails. If │ │ │ -00014c60: 2053 5452 494e 4720 6973 0a6f 6d69 7474 STRING is.omitt │ │ │ -00014c70: 6564 2c20 6120 6465 6661 756c 7420 6d65 ed, a default me │ │ │ -00014c80: 7373 6167 6520 6c69 7374 696e 6720 464f ssage listing FO │ │ │ -00014c90: 524d 2069 7473 656c 6620 6973 2075 7365 RM itself is use │ │ │ -00014ca0: 642e 1f0a 2864 6566 616c 6961 7320 2761 d...(defalias 'a │ │ │ -00014cb0: 7373 6572 7420 2728 6d61 6372 6f20 2e20 ssert '(macro . │ │ │ -00014cc0: 235b 2866 6f72 6d20 266f 7074 696f 6e61 #[(form &optiona │ │ │ -00014cd0: 6c20 7368 6f77 2d61 7267 7320 7374 7269 l show-args stri │ │ │ -00014ce0: 6e67 2026 7265 7374 2061 7267 7329 2022 ng &rest args) " │ │ │ -00014cf0: c620 ab8a 5c6e c757 ac85 09c7 55ad ab08 . ..\n.W....U... │ │ │ -00014d00: ad88 c8c9 cacb 0d41 5c22 5c22 1ccc cd0d .......A\"\".... │ │ │ -00014d10: 0bab 8bce 0bcf 0c0e 145c 2242 42aa 8ad0 .........\"BB... │ │ │ -00014d20: d1d2 d30d 440c 4242 4545 c945 2987 2220 ....D.BBEE.E)." │ │ │ -00014d30: 5b73 686f 772d 6172 6773 2063 6c2d 6f70 [show-args cl-op │ │ │ -00014d40: 7469 6d69 7a65 2d73 6166 6574 7920 636c timize-safety cl │ │ │ -00014d50: 2d6f 7074 696d 697a 652d 7370 6565 6420 -optimize-speed │ │ │ -00014d60: 7374 7269 6e67 2073 6172 6773 2066 6f72 string sargs for │ │ │ -00014d70: 6d20 636c 2d63 6f6d 7069 6c69 6e67 2d66 m cl-compiling-f │ │ │ -00014d80: 696c 6520 3320 6465 6c71 206e 696c 206d ile 3 delq nil m │ │ │ -00014d90: 6170 6361 7220 235b 2878 2920 22c1 0821 apcar #[(x) "..! │ │ │ -00014da0: 3fad 8108 8722 205b 7820 636c 2d63 6f6e ?...." [x cl-con │ │ │ -00014db0: 7374 2d65 7870 722d 705d 2032 5d20 7072 st-expr-p] 2] pr │ │ │ -00014dc0: 6f67 6e20 6f72 2065 7272 6f72 2061 7070 ogn or error app │ │ │ -00014dd0: 656e 6420 7369 676e 616c 2027 636c 2d61 end signal 'cl-a │ │ │ -00014de0: 7373 6572 7469 6f6e 2d66 6169 6c65 6420 ssertion-failed │ │ │ -00014df0: 6c69 7374 2071 756f 7465 2061 7267 735d list quote args] │ │ │ -00014e00: 2038 2028 2324 202e 2038 3438 3339 295d 8 (#$ . 84839)] │ │ │ -00014e10: 2929 0a23 4038 3720 4578 6563 7574 6520 )).#@87 Execute │ │ │ -00014e20: 464f 524d 533b 2069 6620 616e 2065 7272 FORMS; if an err │ │ │ -00014e30: 6f72 206f 6363 7572 732c 2072 6574 7572 or occurs, retur │ │ │ -00014e40: 6e20 6e69 6c2e 0a4f 7468 6572 7769 7365 n nil..Otherwise │ │ │ -00014e50: 2c20 7265 7475 726e 2072 6573 756c 7420 , return result │ │ │ -00014e60: 6f66 206c 6173 7420 464f 524d 2e1f 0a28 of last FORM...( │ │ │ -00014e70: 6465 6661 6c69 6173 2027 6967 6e6f 7265 defalias 'ignore │ │ │ -00014e80: 2d65 7272 6f72 7320 2728 6d61 6372 6f20 -errors '(macro │ │ │ -00014e90: 2e20 235b 2826 7265 7374 2062 6f64 7929 . #[(&rest body) │ │ │ -00014ea0: 2022 c1c2 c308 42c4 4242 4287 2220 5b62 "....B.BBB." [b │ │ │ -00014eb0: 6f64 7920 636f 6e64 6974 696f 6e2d 6361 ody condition-ca │ │ │ -00014ec0: 7365 206e 696c 2070 726f 676e 2028 2865 se nil progn ((e │ │ │ -00014ed0: 7272 6f72 206e 696c 2929 5d20 3420 2823 rror nil))] 4 (# │ │ │ -00014ee0: 2420 2e20 3835 3532 3829 5d29 290a 2340 $ . 85528)])).#@ │ │ │ -00014ef0: 3130 3820 4578 6563 7574 6520 464f 524d 108 Execute FORM │ │ │ -00014f00: 533b 2069 6620 616e 2065 7272 6f72 206f S; if an error o │ │ │ -00014f10: 6620 7479 7065 2060 6669 6c65 2d65 7272 f type `file-err │ │ │ -00014f20: 6f72 2720 6f63 6375 7273 2c20 7265 7475 or' occurs, retu │ │ │ -00014f30: 726e 206e 696c 2e0a 4f74 6865 7277 6973 rn nil..Otherwis │ │ │ -00014f40: 652c 2072 6574 7572 6e20 7265 7375 6c74 e, return result │ │ │ -00014f50: 206f 6620 6c61 7374 2046 4f52 4d2e 1f0a of last FORM... │ │ │ -00014f60: 2864 6566 616c 6961 7320 2769 676e 6f72 (defalias 'ignor │ │ │ -00014f70: 652d 6669 6c65 2d65 7272 6f72 7320 2728 e-file-errors '( │ │ │ -00014f80: 6d61 6372 6f20 2e20 235b 2826 7265 7374 macro . #[(&rest │ │ │ -00014f90: 2062 6f64 7929 2022 c1c2 c308 42c4 4242 body) "....B.BB │ │ │ -00014fa0: 4287 2220 5b62 6f64 7920 636f 6e64 6974 B." [body condit │ │ │ -00014fb0: 696f 6e2d 6361 7365 206e 696c 2070 726f ion-case nil pro │ │ │ -00014fc0: 676e 2028 2866 696c 652d 6572 726f 7220 gn ((file-error │ │ │ -00014fd0: 6e69 6c29 295d 2034 2028 2324 202e 2038 nil))] 4 (#$ . 8 │ │ │ -00014fe0: 3537 3438 295d 2929 0a28 6279 7465 2d63 5748)])).(byte-c │ │ │ -00014ff0: 6f64 6520 22c1 5c6e 4212 c311 c05c 6e42 ode ".\nB....\nB │ │ │ -00015000: 12c4 10c1 8722 205b 636c 2d73 6166 652d ....." [cl-safe- │ │ │ -00015010: 6675 6e63 7320 636c 2d73 696d 706c 652d funcs cl-simple- │ │ │ -00015020: 6675 6e63 7320 6375 7272 656e 742d 6c6f funcs current-lo │ │ │ -00015030: 6164 2d6c 6973 7420 2863 6172 2063 6472 ad-list (car cdr │ │ │ -00015040: 206e 7468 2061 7265 6620 656c 7420 6966 nth aref elt if │ │ │ -00015050: 2061 6e64 206f 7220 2b20 2d20 312b 2031 and or + - 1+ 1 │ │ │ -00015060: 2d20 6d69 6e20 6d61 7820 6361 722d 7361 - min max car-sa │ │ │ -00015070: 6665 2063 6472 2d73 6166 6520 7072 6f67 fe cdr-safe prog │ │ │ -00015080: 6e20 7072 6f67 3120 7072 6f67 3229 2028 n prog1 prog2) ( │ │ │ -00015090: 2a20 2f20 2520 6c65 6e67 7468 206d 656d * / % length mem │ │ │ -000150a0: 7120 6c69 7374 2076 6563 746f 7220 7665 q list vector ve │ │ │ -000150b0: 6374 6f72 7020 3c20 3e20 3c3d 203e 3d20 ctorp < > <= >= │ │ │ -000150c0: 3d20 6572 726f 7229 5d20 3229 0a28 6465 = error)] 2).(de │ │ │ -000150d0: 6661 6c69 6173 2027 636c 2d73 696d 706c falias 'cl-simpl │ │ │ -000150e0: 652d 6578 7072 2d70 2023 5b28 7820 266f e-expr-p #[(x &o │ │ │ -000150f0: 7074 696f 6e61 6c20 7369 7a65 2920 225c ptional size) "\ │ │ │ -00015100: 6eac 82c3 1209 3aab b409 40c4 73ac ae09 n.....:...@.s... │ │ │ -00015110: 4039 adb0 0940 0873 ac86 0940 c54e ada4 @9...@.s...@.N.. │ │ │ -00015120: 5c6e 5312 0941 8911 ab89 c609 405c 6e5c \nS..A......@\n\ │ │ │ -00015130: 2289 12ac 7109 3fad 865c 6ec7 59ad 815c "...q.?..\n.Y..\ │ │ │ -00015140: 6e87 5c6e c756 ad82 5c6e 5387 2220 5b63 n.\n.V..\nS." [c │ │ │ -00015150: 6c2d 7369 6d70 6c65 2d66 756e 6373 2078 l-simple-funcs x │ │ │ -00015160: 2073 697a 6520 3130 2028 7175 6f74 6520 size 10 (quote │ │ │ -00015170: 6675 6e63 7469 6f6e 2066 756e 6374 696f function functio │ │ │ -00015180: 6e2a 2920 7369 6465 2d65 6666 6563 742d n*) side-effect- │ │ │ -00015190: 6672 6565 2063 6c2d 7369 6d70 6c65 2d65 free cl-simple-e │ │ │ -000151a0: 7870 722d 7020 305d 2033 5d29 0a28 6465 xpr-p 0] 3]).(de │ │ │ -000151b0: 6661 6c69 6173 2027 636c 2d73 696d 706c falias 'cl-simpl │ │ │ -000151c0: 652d 6578 7072 732d 7020 235b 2878 7329 e-exprs-p #[(xs) │ │ │ -000151d0: 2022 08ab 8cc1 0840 21ab 8608 4189 10ac ".....@!...A... │ │ │ -000151e0: 7408 3f87 2220 5b78 7320 636c 2d73 696d t.?." [xs cl-sim │ │ │ -000151f0: 706c 652d 6578 7072 2d70 5d20 335d 290a ple-expr-p] 3]). │ │ │ -00015200: 2864 6566 616c 6961 7320 2763 6c2d 7361 (defalias 'cl-sa │ │ │ -00015210: 6665 2d65 7870 722d 7020 235b 2878 2920 fe-expr-p #[(x) │ │ │ -00015220: 225c 6e3a ad85 5c6e 40c3 733f 3fae a55c "\n:..\n@.s??..\ │ │ │ -00015230: 6e40 39ad a05c 6e40 0973 ac8c 5c6e 4008 n@9..\n@.s..\n@. │ │ │ -00015240: 73ac 865c 6e40 c44e ad8e 5c6e 4189 12ab s..\n@.N..\nA... │ │ │ -00015250: 86c5 5c6e 4021 ac74 5c6e 3f87 2220 5b63 ..\n@!.t\n?." [c │ │ │ -00015260: 6c2d 7361 6665 2d66 756e 6373 2063 6c2d l-safe-funcs cl- │ │ │ -00015270: 7369 6d70 6c65 2d66 756e 6373 2078 2028 simple-funcs x ( │ │ │ -00015280: 7175 6f74 6520 6675 6e63 7469 6f6e 2066 quote function f │ │ │ -00015290: 756e 6374 696f 6e2a 2920 7369 6465 2d65 unction*) side-e │ │ │ -000152a0: 6666 6563 742d 6672 6565 2063 6c2d 7361 ffect-free cl-sa │ │ │ -000152b0: 6665 2d65 7870 722d 705d 2032 5d29 0a28 fe-expr-p] 2]).( │ │ │ -000152c0: 6465 6661 6c69 6173 2027 636c 2d63 6f6e defalias 'cl-con │ │ │ -000152d0: 7374 2d65 7870 722d 7020 235b 2878 2920 st-expr-p #[(x) │ │ │ -000152e0: 2208 3aab 9c08 40c1 61ae a208 40c2 73ad ".:...@.a...@.s. │ │ │ -000152f0: 8f08 4140 39ae 8908 4140 a2c3 61ad 81c4 ..A@9...A@..a... │ │ │ -00015300: 8708 39ab 8708 c573 ad83 c687 c687 2220 ..9....s......" │ │ │ -00015310: 5b78 2071 756f 7465 2028 6675 6e63 7469 [x quote (functi │ │ │ -00015320: 6f6e 2066 756e 6374 696f 6e2a 2920 6c61 on function*) la │ │ │ -00015330: 6d62 6461 2066 756e 6320 286e 696c 2074 mbda func (nil t │ │ │ -00015340: 2920 745d 2032 5d29 0a28 6465 6661 6c69 ) t] 2]).(defali │ │ │ -00015350: 6173 2027 636c 2d63 6f6e 7374 2d65 7870 as 'cl-const-exp │ │ │ -00015360: 7273 2d70 2023 5b28 7873 2920 2208 ab8c rs-p #[(xs) "... │ │ │ -00015370: c108 4021 ab86 0841 8910 ac74 083f 8722 ..@!...A...t.?." │ │ │ -00015380: 205b 7873 2063 6c2d 636f 6e73 742d 6578 [xs cl-const-ex │ │ │ -00015390: 7072 2d70 5d20 335d 290a 2864 6566 616c pr-p] 3]).(defal │ │ │ -000153a0: 6961 7320 2763 6c2d 636f 6e73 742d 6578 ias 'cl-const-ex │ │ │ -000153b0: 7072 2d76 616c 2023 5b28 7829 2022 c108 pr-val #[(x) ".. │ │ │ -000153c0: 21c2 61ad 8908 3aab 8408 4140 8708 8722 !.a...:...A@..." │ │ │ -000153d0: 205b 7820 636c 2d63 6f6e 7374 2d65 7870 [x cl-const-exp │ │ │ -000153e0: 722d 7020 745d 2032 5d29 0a28 6465 6661 r-p t] 2]).(defa │ │ │ -000153f0: 6c69 6173 2027 636c 2d65 7870 722d 6163 lias 'cl-expr-ac │ │ │ -00015400: 6365 7373 2d6f 7264 6572 2023 5b28 7820 cess-order #[(x │ │ │ -00015410: 7629 2022 c209 21ab 8208 8709 3aab 9009 v) "..!.....:... │ │ │ -00015420: 4189 11ab 88c3 0940 085c 2210 aa72 0887 A......@.\"..r.. │ │ │ -00015430: 0908 4061 ab83 0841 87c4 8722 205b 7620 ..@a...A..." [v │ │ │ -00015440: 7820 636c 2d63 6f6e 7374 2d65 7870 722d x cl-const-expr- │ │ │ -00015450: 7020 636c 2d65 7870 722d 6163 6365 7373 p cl-expr-access │ │ │ -00015460: 2d6f 7264 6572 2028 7429 5d20 335d 290a -order (t)] 3]). │ │ │ -00015470: 2864 6566 616c 6961 7320 2763 6c2d 6578 (defalias 'cl-ex │ │ │ -00015480: 7072 2d63 6f6e 7461 696e 7320 235b 2878 pr-contains #[(x │ │ │ -00015490: 2079 2920 2208 5c6e 6bab 82c3 875c 6e3a y) ".\nk....\n: │ │ │ -000154a0: ada3 5c6e a2c4 733f ad9c c519 5c6e ab90 ..\n..s?....\n.. │ │ │ -000154b0: 09c6 5c6e 8941 1240 085c 22ae 81c5 5c5c ..\n.A.@.\"...\\ │ │ │ -000154c0: 11aa 6d09 c556 ad81 0929 8722 205b 7920 ..m..V...)." [y │ │ │ -000154d0: 7375 6d20 7820 3120 2871 756f 7465 2066 sum x 1 (quote f │ │ │ -000154e0: 756e 6374 696f 6e20 6675 6e63 7469 6f6e unction function │ │ │ -000154f0: 2a29 2030 2063 6c2d 6578 7072 2d63 6f6e *) 0 cl-expr-con │ │ │ -00015500: 7461 696e 735d 2034 5d29 0a28 6465 6661 tains] 4]).(defa │ │ │ -00015510: 6c69 6173 2027 636c 2d65 7870 722d 636f lias 'cl-expr-co │ │ │ -00015520: 6e74 6169 6e73 2d61 6e79 2023 5b28 7820 ntains-any #[(x │ │ │ -00015530: 7929 2022 09ab 8ec2 0809 405c 22ac 8709 y) "......@\"... │ │ │ -00015540: 8941 1188 aa6f 0987 2220 5b78 2079 2063 .A...o.." [x y c │ │ │ -00015550: 6c2d 6578 7072 2d63 6f6e 7461 696e 735d l-expr-contains] │ │ │ -00015560: 2033 5d29 0a28 6465 6661 6c69 6173 2027 3]).(defalias ' │ │ │ -00015570: 636c 2d65 7870 722d 6465 7065 6e64 732d cl-expr-depends- │ │ │ -00015580: 7020 235b 2878 2079 2920 22c2 0921 3fad p #[(x y) "..!?. │ │ │ -00015590: 8ac3 0921 3fae 84c4 0908 5c22 8722 205b ...!?.....\"." [ │ │ │ -000155a0: 7920 7820 636c 2d63 6f6e 7374 2d65 7870 y x cl-const-exp │ │ │ -000155b0: 722d 7020 636c 2d73 6166 652d 6578 7072 r-p cl-safe-expr │ │ │ -000155c0: 2d70 2063 6c2d 6578 7072 2d63 6f6e 7461 -p cl-expr-conta │ │ │ -000155d0: 696e 732d 616e 795d 2033 5d29 0a23 4036 ins-any] 3]).#@6 │ │ │ -000155e0: 3834 2028 6465 6669 6e65 2d63 6f6d 7069 84 (define-compi │ │ │ -000155f0: 6c65 722d 6d61 6372 6f20 4655 4e43 2041 ler-macro FUNC A │ │ │ -00015600: 5247 4c49 5354 2042 4f44 592e 2e2e 293a RGLIST BODY...): │ │ │ -00015610: 2044 6566 696e 6520 6120 636f 6d70 696c Define a compil │ │ │ -00015620: 6572 2d6f 6e6c 7920 6d61 6372 6f2e 0a54 er-only macro..T │ │ │ -00015630: 6869 7320 6973 206c 696b 6520 6064 6566 his is like `def │ │ │ -00015640: 6d61 6372 6f27 2c20 6275 7420 6d61 6372 macro', but macr │ │ │ -00015650: 6f20 6578 7061 6e73 696f 6e20 6f63 6375 o expansion occu │ │ │ -00015660: 7273 206f 6e6c 7920 6966 2074 6865 2063 rs only if the c │ │ │ -00015670: 616c 6c20 746f 0a46 554e 4320 6973 2063 all to.FUNC is c │ │ │ -00015680: 6f6d 7069 6c65 6420 2869 2e65 2e2c 206e ompiled (i.e., n │ │ │ -00015690: 6f74 2069 6e74 6572 7072 6574 6564 292e ot interpreted). │ │ │ -000156a0: 2020 436f 6d70 696c 6572 206d 6163 726f Compiler macro │ │ │ -000156b0: 7320 7368 6f75 6c64 2062 6520 7573 6564 s should be used │ │ │ -000156c0: 0a66 6f72 206f 7074 696d 697a 696e 6720 .for optimizing │ │ │ -000156d0: 7468 6520 7761 7920 6361 6c6c 7320 746f the way calls to │ │ │ -000156e0: 2046 554e 4320 6172 6520 636f 6d70 696c FUNC are compil │ │ │ -000156f0: 6564 3b20 7468 6520 666f 726d 2072 6574 ed; the form ret │ │ │ -00015700: 7572 6e65 6420 6279 0a42 4f44 5920 7368 urned by.BODY sh │ │ │ -00015710: 6f75 6c64 2064 6f20 7468 6520 7361 6d65 ould do the same │ │ │ -00015720: 2074 6869 6e67 2061 7320 6120 6361 6c6c thing as a call │ │ │ -00015730: 2074 6f20 7468 6520 6e6f 726d 616c 2066 to the normal f │ │ │ -00015740: 756e 6374 696f 6e20 6361 6c6c 6564 0a46 unction called.F │ │ │ -00015750: 554e 432c 2074 686f 7567 6820 706f 7373 UNC, though poss │ │ │ -00015760: 6962 6c79 206d 6f72 6520 6566 6669 6369 ibly more effici │ │ │ -00015770: 656e 746c 792e 2020 4e6f 7465 2074 6861 ently. Note tha │ │ │ -00015780: 742c 206c 696b 6520 7265 6775 6c61 7220 t, like regular │ │ │ -00015790: 6d61 6372 6f73 2c0a 636f 6d70 696c 6572 macros,.compiler │ │ │ -000157a0: 206d 6163 726f 7320 6172 6520 6578 7061 macros are expa │ │ │ -000157b0: 6e64 6564 2072 6570 6561 7465 646c 7920 nded repeatedly │ │ │ -000157c0: 756e 7469 6c20 6e6f 2066 7572 7468 6572 until no further │ │ │ -000157d0: 2065 7870 616e 7369 6f6e 7320 6172 650a expansions are. │ │ │ -000157e0: 706f 7373 6962 6c65 2e20 2055 6e6c 696b possible. Unlik │ │ │ -000157f0: 6520 7265 6775 6c61 7220 6d61 6372 6f73 e regular macros │ │ │ -00015800: 2c20 424f 4459 2063 616e 2064 6563 6964 , BODY can decid │ │ │ -00015810: 6520 746f 2022 7075 6e74 2220 616e 6420 e to "punt" and │ │ │ -00015820: 6c65 6176 6520 7468 650a 6f72 6967 696e leave the.origin │ │ │ -00015830: 616c 2066 756e 6374 696f 6e20 6361 6c6c al function call │ │ │ -00015840: 2061 6c6f 6e65 2062 7920 6465 636c 6172 alone by declar │ │ │ -00015850: 696e 6720 616e 2069 6e69 7469 616c 2060 ing an initial ` │ │ │ -00015860: 2677 686f 6c65 2066 6f6f 2720 7061 7261 &whole foo' para │ │ │ -00015870: 6d65 7465 720a 616e 6420 7468 656e 2072 meter.and then r │ │ │ -00015880: 6574 7572 6e69 6e67 2066 6f6f 2e1f 0a28 eturning foo...( │ │ │ -00015890: 6465 6661 6c69 6173 2027 6465 6669 6e65 defalias 'define │ │ │ -000158a0: 2d63 6f6d 7069 6c65 722d 6d61 6372 6f20 -compiler-macro │ │ │ -000158b0: 2728 6d61 6372 6f20 2e20 235b 2866 756e '(macro . #[(fun │ │ │ -000158c0: 6320 6172 6773 2026 7265 7374 2062 6f64 c args &rest bod │ │ │ -000158d0: 7929 2022 0c3c ab83 0caa 83c5 0c44 c61a y) ".<.......D.. │ │ │ -000158e0: 1b0b 3aab 8a0b 8941 1340 5c6e 4212 aa72 ..:....A.@\nB..r │ │ │ -000158f0: 5c6e 9f14 5c6e 0bad 83c5 0b44 a188 2ac7 \n..\n.....D..*. │ │ │ -00015900: c8c9 09ca cb0c 73ab 86cc cb0c 5c22 aa83 ......s.....\".. │ │ │ -00015910: cd0c 4208 4223 cecf d009 44d1 45d2 d009 ..B.B#....D.E... │ │ │ -00015920: 44d3 d446 4546 8722 205b 626f 6479 2066 D..FEF." [body f │ │ │ -00015930: 756e 6320 7265 7320 7020 6172 6773 2026 unc res p args & │ │ │ -00015940: 7265 7374 206e 696c 2065 7661 6c2d 7768 rest nil eval-wh │ │ │ -00015950: 656e 2028 636f 6d70 696c 6520 6c6f 6164 en (compile load │ │ │ -00015960: 2065 7661 6c29 2063 6c2d 7472 616e 7366 eval) cl-transf │ │ │ -00015970: 6f72 6d2d 6675 6e63 7469 6f6e 2d70 726f orm-function-pro │ │ │ -00015980: 7065 7274 7920 636c 2d63 6f6d 7069 6c65 perty cl-compile │ │ │ -00015990: 722d 6d61 6372 6f20 2677 686f 6c65 2064 r-macro &whole d │ │ │ -000159a0: 656c 7120 2d2d 636c 2d77 686f 6c65 2d61 elq --cl-whole-a │ │ │ -000159b0: 7267 2d2d 206f 7220 6765 7420 7175 6f74 rg-- or get quot │ │ │ -000159c0: 6520 2762 7974 652d 636f 6d70 696c 6520 e 'byte-compile │ │ │ -000159d0: 7075 7420 2762 7974 652d 636f 6d70 696c put 'byte-compil │ │ │ -000159e0: 6520 2763 6c2d 6279 7465 2d63 6f6d 7069 e 'cl-byte-compi │ │ │ -000159f0: 6c65 2d63 6f6d 7069 6c65 722d 6d61 6372 le-compiler-macr │ │ │ -00015a00: 6f5d 2039 2028 2324 202e 2038 3735 3233 o] 9 (#$ . 87523 │ │ │ -00015a10: 295d 2929 0a28 6465 6661 6c69 6173 2027 )])).(defalias ' │ │ │ -00015a20: 636f 6d70 696c 6572 2d6d 6163 726f 6578 compiler-macroex │ │ │ -00015a30: 7061 6e64 2023 5b28 666f 726d 2920 2209 pand #[(form) ". │ │ │ -00015a40: a2c3 1889 1a39 aba1 5c6e c44e 8910 ac9a .....9..\n.N.... │ │ │ -00015a50: c55c 6e21 ab95 5c6e 4ba2 c661 ab88 c75c .\n!..\nK..a...\ │ │ │ -00015a60: 6e4b 4140 21ab 865c 6e4b 8912 aa5c 5c08 nKA@!..\nK...\\. │ │ │ -00015a70: ad8b 09c8 0809 8941 2389 1161 3f2a ac45 .......A#..a?*.E │ │ │ -00015a80: 0987 2220 5b68 616e 646c 6572 2066 6f72 .." [handler for │ │ │ -00015a90: 6d20 6675 6e63 206e 696c 2063 6c2d 636f m func nil cl-co │ │ │ -00015aa0: 6d70 696c 6572 2d6d 6163 726f 2066 626f mpiler-macro fbo │ │ │ -00015ab0: 756e 6470 2061 7574 6f6c 6f61 6420 6c6f undp autoload lo │ │ │ -00015ac0: 6164 2061 7070 6c79 5d20 365d 290a 2864 ad apply] 6]).(d │ │ │ -00015ad0: 6566 616c 6961 7320 2763 6c2d 6279 7465 efalias 'cl-byte │ │ │ -00015ae0: 2d63 6f6d 7069 6c65 2d63 6f6d 7069 6c65 -compile-compile │ │ │ -00015af0: 722d 6d61 6372 6f20 235b 2866 6f72 6d29 r-macro #[(form) │ │ │ -00015b00: 2022 08c1 0821 8910 61ab 84c2 0821 87c3 "...!..a....!.. │ │ │ -00015b10: 0821 8722 205b 666f 726d 2063 6f6d 7069 .!." [form compi │ │ │ -00015b20: 6c65 722d 6d61 6372 6f65 7870 616e 6420 ler-macroexpand │ │ │ -00015b30: 6279 7465 2d63 6f6d 7069 6c65 2d6e 6f72 byte-compile-nor │ │ │ -00015b40: 6d61 6c2d 6361 6c6c 2062 7974 652d 636f mal-call byte-co │ │ │ -00015b50: 6d70 696c 652d 666f 726d 5d20 335d 290a mpile-form] 3]). │ │ │ -00015b60: 2340 3234 3420 2864 6566 7375 6273 742a #@244 (defsubst* │ │ │ -00015b70: 204e 414d 4520 4152 474c 4953 5420 5b44 NAME ARGLIST [D │ │ │ -00015b80: 4f43 5354 5249 4e47 5d20 424f 4459 2e2e OCSTRING] BODY.. │ │ │ -00015b90: 2e29 3a20 6465 6669 6e65 204e 414d 4520 .): define NAME │ │ │ -00015ba0: 6173 2061 2066 756e 6374 696f 6e2e 0a4c as a function..L │ │ │ -00015bb0: 696b 6520 6064 6566 756e 272c 2065 7863 ike `defun', exc │ │ │ -00015bc0: 6570 7420 7468 6520 6675 6e63 7469 6f6e ept the function │ │ │ -00015bd0: 2069 7320 6175 746f 6d61 7469 6361 6c6c is automaticall │ │ │ -00015be0: 7920 6465 636c 6172 6564 2060 696e 6c69 y declared `inli │ │ │ -00015bf0: 6e65 272c 0a41 5247 4c49 5354 2061 6c6c ne',.ARGLIST all │ │ │ -00015c00: 6f77 7320 6675 6c6c 2043 6f6d 6d6f 6e20 ows full Common │ │ │ -00015c10: 4c69 7370 2063 6f6e 7665 6e74 696f 6e73 Lisp conventions │ │ │ -00015c20: 2c20 616e 6420 424f 4459 2069 7320 696d , and BODY is im │ │ │ -00015c30: 706c 6963 6974 6c79 0a73 7572 726f 756e plicitly.surroun │ │ │ -00015c40: 6465 6420 6279 2028 626c 6f63 6b20 4e41 ded by (block NA │ │ │ -00015c50: 4d45 202e 2e2e 292e 1f0a 2864 6566 616c ME ...)...(defal │ │ │ -00015c60: 6961 7320 2764 6566 7375 6273 742a 2027 ias 'defsubst* ' │ │ │ -00015c70: 286d 6163 726f 202e 2023 5b28 6e61 6d65 (macro . #[(name │ │ │ -00015c80: 2061 7267 7320 2672 6573 7420 626f 6479 args &rest body │ │ │ -00015c90: 2920 22c6 0c21 891b 1dc7 5c6e 4219 c809 ) "..!....\nB... │ │ │ -00015ca0: 213f 180d ab90 c90c 0d40 5c22 ca61 ab87 !?.......@\".a.. │ │ │ -00015cb0: 0d89 4115 88aa 6dc7 0d3f adad cb0e 15cc ..A...m..?...... │ │ │ -00015cc0: cdce 0c42 4242 cfd0 0b44 d0d1 0e15 5c6e ...BBB...D....\n │ │ │ -00015cd0: 4242 4408 ae84 d209 0b5c 223f d30c 73ad BBD......\"?..s. │ │ │ -00015ce0: 81cd 080b 4242 4242 4242 46d4 0e15 0c5c ....BBBBBBF....\ │ │ │ -00015cf0: 6e42 4242 452c 8722 205b 756e 7361 6665 nBBBE,." [unsafe │ │ │ -00015d00: 2070 626f 6479 2062 6f64 7920 6172 676e pbody body argn │ │ │ -00015d10: 7320 6172 6773 2070 2063 6c2d 6172 676c s args p cl-argl │ │ │ -00015d20: 6973 742d 6172 6773 2070 726f 676e 2063 ist-args progn c │ │ │ -00015d30: 6c2d 7361 6665 2d65 7870 722d 7020 636c l-safe-expr-p cl │ │ │ -00015d40: 2d65 7870 722d 636f 6e74 6169 6e73 2031 -expr-contains 1 │ │ │ -00015d50: 2064 6566 696e 652d 636f 6d70 696c 6572 define-compiler │ │ │ -00015d60: 2d6d 6163 726f 2026 7768 6f6c 6520 636c -macro &whole cl │ │ │ -00015d70: 2d77 686f 6c65 2026 636c 2d71 756f 7465 -whole &cl-quote │ │ │ -00015d80: 2063 6c2d 6465 6673 7562 7374 2d65 7870 cl-defsubst-exp │ │ │ -00015d90: 616e 6420 7175 6f74 6520 626c 6f63 6b20 and quote block │ │ │ -00015da0: 636c 2d65 7870 722d 6163 6365 7373 2d6f cl-expr-access-o │ │ │ -00015db0: 7264 6572 2026 6b65 7920 6465 6675 6e2a rder &key defun* │ │ │ -00015dc0: 206e 616d 655d 2031 3220 2823 2420 2e20 name] 12 (#$ . │ │ │ -00015dd0: 3838 3933 3429 5d29 290a 2864 6566 616c 88934)])).(defal │ │ │ -00015de0: 6961 7320 2763 6c2d 6465 6673 7562 7374 ias 'cl-defsubst │ │ │ -00015df0: 2d65 7870 616e 6420 235b 2861 7267 6e73 -expand #[(argns │ │ │ -00015e00: 2062 6f64 7920 7369 6d70 6c65 2077 686f body simple who │ │ │ -00015e10: 6c65 2075 6e73 6166 6520 2672 6573 7420 le unsafe &rest │ │ │ -00015e20: 6172 6776 7329 2022 0cab 89c6 c70d 4221 argvs) "......B! │ │ │ -00015e30: ac82 0c87 c80d 21ab 82c9 11ca cbcc cd08 ......!......... │ │ │ -00015e40: 0d23 5c22 891b ab86 ce0b 5c6e 45aa 815c .#\"......\nE..\ │ │ │ -00015e50: 6e29 8722 205b 6172 676e 7320 7369 6d70 n)." [argns simp │ │ │ -00015e60: 6c65 2062 6f64 7920 6c65 7473 2077 686f le body lets who │ │ │ -00015e70: 6c65 2061 7267 7673 2063 6c2d 7361 6665 le argvs cl-safe │ │ │ -00015e80: 2d65 7870 722d 7020 7072 6f67 6e20 636c -expr-p progn cl │ │ │ -00015e90: 2d73 696d 706c 652d 6578 7072 732d 7020 -simple-exprs-p │ │ │ -00015ea0: 7420 6465 6c71 206e 696c 206d 6170 6361 t delq nil mapca │ │ │ -00015eb0: 722a 2023 5b28 6172 676e 2061 7267 7629 r* #[(argn argv) │ │ │ -00015ec0: 2022 09ac 85c5 0c21 ab8d c60c 0b5c 6e23 ".....!.....\n# │ │ │ -00015ed0: 1208 ad87 0b0c 4487 0b0c 4487 2220 5b75 ......D...D." [u │ │ │ -00015ee0: 6e73 6166 6520 7369 6d70 6c65 2062 6f64 nsafe simple bod │ │ │ -00015ef0: 7920 6172 676e 2061 7267 7620 636c 2d63 y argn argv cl-c │ │ │ -00015f00: 6f6e 7374 2d65 7870 722d 7020 7375 6273 onst-expr-p subs │ │ │ -00015f10: 745d 2034 5d20 6c65 745d 2037 5d29 0a28 t] 4] let] 7]).( │ │ │ -00015f20: 6279 7465 2d63 6f64 6520 22c0 c1c2 c323 byte-code "....# │ │ │ -00015f30: 88c0 c1c4 c523 88c1 c24e ac86 c0c1 c2c6 .....#...N...... │ │ │ -00015f40: 2388 c0c7 c4c8 2388 c7c2 4eac 86c0 c7c2 #.....#...N..... │ │ │ -00015f50: c623 88c0 c9c4 ca23 88c9 c24e ac86 c0c9 .#.....#...N.... │ │ │ -00015f60: c2c6 2388 c0cb c4cc 2388 cbc2 4eac 86c0 ..#.....#...N... │ │ │ -00015f70: cbc2 c623 88c0 cdc4 ce23 88cd c24e ac86 ...#.....#...N.. │ │ │ -00015f80: c0cd c2c6 2388 c0cf c4d0 2388 cfc2 4eac ....#.....#...N. │ │ │ -00015f90: 86c0 cfc2 c623 88c0 d1c4 d223 88d1 c24e .....#.....#...N │ │ │ -00015fa0: ac86 c0d1 c2c6 2388 c0d3 c4d4 2388 d3c2 ......#.....#... │ │ │ -00015fb0: 4eac 86c0 d3c2 c623 88d5 d6d7 5c22 88d8 N......#....\".. │ │ │ -00015fc0: d921 88da db21 8722 205b 7075 7420 6571 .!...!." [put eq │ │ │ -00015fd0: 6c20 6279 7465 2d63 6f6d 7069 6c65 206e l byte-compile n │ │ │ -00015fe0: 696c 2063 6c2d 636f 6d70 696c 6572 2d6d il cl-compiler-m │ │ │ -00015ff0: 6163 726f 2023 5b28 666f 726d 2061 2062 acro #[(form a b │ │ │ -00016000: 2920 22c4 0b21 c561 ab98 c60b 2189 19a7 ) "..!.a....!... │ │ │ -00016010: ab8a 09a8 ac86 c70b 5c6e 45aa 84c8 0b5c ........\nE....\ │ │ │ -00016020: 6e45 2987 c45c 6e21 c561 ab98 c65c 6e21 nE)..\n!.a...\n! │ │ │ -00016030: 8919 a7ab 8a09 a8ac 86c7 0b5c 6e45 aa84 ...........\nE.. │ │ │ -00016040: c80b 5c6e 4529 87c9 0bca 5c22 ab8e cbcc ..\nE)....\".... │ │ │ -00016050: 0b44 c70b 5c6e 45c8 0b5c 6e45 4687 cd0b .D..\nE..\nEF... │ │ │ -00016060: 21ab 94c9 5c6e ca5c 22ab 8ecb cc5c 6e44 !...\n.\"....\nD │ │ │ -00016070: c70b 5c6e 45c8 0b5c 6e45 4687 0887 2220 ..\nE..\nEF..." │ │ │ -00016080: 5b66 6f72 6d20 7661 6c20 6220 6120 636c [form val b a cl │ │ │ -00016090: 2d63 6f6e 7374 2d65 7870 722d 7020 7420 -const-expr-p t │ │ │ -000160a0: 636c 2d63 6f6e 7374 2d65 7870 722d 7661 cl-const-expr-va │ │ │ -000160b0: 6c20 6571 7561 6c20 6571 2063 6c2d 7369 l equal eq cl-si │ │ │ -000160c0: 6d70 6c65 2d65 7870 722d 7020 3520 6966 mple-expr-p 5 if │ │ │ -000160d0: 206e 756d 6265 7270 2063 6c2d 7361 6665 numberp cl-safe │ │ │ -000160e0: 2d65 7870 722d 705d 2037 2022 5c6e 436f -expr-p] 7 "\nCo │ │ │ -000160f0: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ -00016100: 206c 6973 743a 5c6e 2020 2865 716c 2046 list:\n (eql F │ │ │ -00016110: 4f52 4d20 4120 4229 5c6e 5c6e 225d 2063 ORM A B)\n\n"] c │ │ │ -00016120: 6c2d 6279 7465 2d63 6f6d 7069 6c65 2d63 l-byte-compile-c │ │ │ -00016130: 6f6d 7069 6c65 722d 6d61 6372 6f20 6d65 ompiler-macro me │ │ │ -00016140: 6d62 6572 2a20 235b 2866 6f72 6d20 6120 mber* #[(form a │ │ │ -00016150: 6c69 7374 2026 7265 7374 206b 6579 7329 list &rest keys) │ │ │ -00016160: 2022 5c6e 47c6 55ad 8b5c 6e40 c761 ad85 "\nG.U..\n@.a.. │ │ │ -00016170: c85c 6e41 4021 8918 c961 ab87 ca0c 0b45 .\nA@!...a.....E │ │ │ -00016180: 82b0 0008 cb61 ab87 cc0c 0b45 82b0 005c .....a.....E...\ │ │ │ -00016190: 6eab 8508 cd61 abfc ce0c 21cf 61ab 93c8 n....a....!.a... │ │ │ -000161a0: 0c21 19d0 0921 29ab 83cc aa81 ca0c 0b45 .!...!)........E │ │ │ -000161b0: aae4 ce0b 21cf 61ab d7c8 0b21 d189 1e13 ....!.a....!.... │ │ │ -000161c0: 1e14 891d 41ac 8c0d adc3 cd0c d20d 4044 ....A.........@D │ │ │ -000161d0: 45aa ba0d aba1 0d40 19d0 0921 29ab 85cf E......@...!)... │ │ │ -000161e0: 1614 aa8d 0d40 a8ac 880d 4039 ac83 cf16 .....@....@9.... │ │ │ -000161f0: 130d 4189 15ac 5f0e 14ac 86ca 0c0b 45aa ..A..._.......E. │ │ │ -00016200: 8c0e 13ac 86cc 0c0b 45aa 820e 152b aa86 ........E....+.. │ │ │ -00016210: 0e15 aa82 0e15 2987 2220 5b74 6573 7420 ......)." [test │ │ │ -00016220: 6f62 6a65 6374 206b 6579 7320 6c69 7374 object keys list │ │ │ -00016230: 2061 2070 2032 203a 7465 7374 2063 6c2d a p 2 :test cl- │ │ │ -00016240: 636f 6e73 742d 6578 7072 2d76 616c 2065 const-expr-val e │ │ │ -00016250: 7120 6d65 6d71 2065 7175 616c 206d 656d q memq equal mem │ │ │ -00016260: 6265 7220 6571 6c20 636c 2d63 6f6e 7374 ber eql cl-const │ │ │ -00016270: 2d65 7870 722d 7020 7420 666c 6f61 7470 -expr-p t floatp │ │ │ -00016280: 206e 696c 2071 756f 7465 206d 7120 6d62 nil quote mq mb │ │ │ -00016290: 2066 6f72 6d5d 2035 2022 5c6e 436f 6d6d form] 5 "\nComm │ │ │ -000162a0: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ -000162b0: 6973 743a 5c6e 2020 286d 656d 6265 722a ist:\n (member* │ │ │ -000162c0: 2046 4f52 4d20 4120 4c49 5354 2026 7265 FORM A LIST &re │ │ │ -000162d0: 7374 204b 4559 5329 5c6e 5c6e 225d 2061 st KEYS)\n\n"] a │ │ │ -000162e0: 7373 6f63 2a20 235b 2866 6f72 6d20 6120 ssoc* #[(form a │ │ │ -000162f0: 6c69 7374 2026 7265 7374 206b 6579 7329 list &rest keys) │ │ │ -00016300: 2022 0c47 c655 ad8b 0c40 c761 ad85 c80c ".G.U...@.a.... │ │ │ -00016310: 4140 2189 1ac9 61ab 86ca 0d0b 45aa b15c A@!...a.....E..\ │ │ │ -00016320: 6ecb 61ab 86cc 0d0b 45aa a6cd 0d21 ce61 n.a.....E....!.a │ │ │ -00016330: ab9e 0cab 855c 6ecf 61ab 96c8 0d21 19d0 .....\n.a....!.. │ │ │ -00016340: 0921 29ab 86cc 0d0b 45aa 87ca 0d0b 45aa .!).....E.....E. │ │ │ -00016350: 8108 2987 2220 5b66 6f72 6d20 6f62 6a65 ..)." [form obje │ │ │ -00016360: 6374 2074 6573 7420 6c69 7374 206b 6579 ct test list key │ │ │ -00016370: 7320 6120 3220 3a74 6573 7420 636c 2d63 s a 2 :test cl-c │ │ │ -00016380: 6f6e 7374 2d65 7870 722d 7661 6c20 6571 onst-expr-val eq │ │ │ -00016390: 2061 7373 7120 6571 7561 6c20 6173 736f assq equal asso │ │ │ -000163a0: 6320 636c 2d63 6f6e 7374 2d65 7870 722d c cl-const-expr- │ │ │ -000163b0: 7020 7420 6571 6c20 666c 6f61 7470 5d20 p t eql floatp] │ │ │ -000163c0: 3420 225c 6e43 6f6d 6d6f 6e20 4c69 7370 4 "\nCommon Lisp │ │ │ -000163d0: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ -000163e0: 2028 6173 736f 632a 2046 4f52 4d20 4120 (assoc* FORM A │ │ │ -000163f0: 4c49 5354 2026 7265 7374 204b 4559 5329 LIST &rest KEYS) │ │ │ -00016400: 5c6e 5c6e 225d 2061 646a 6f69 6e20 235b \n\n"] adjoin #[ │ │ │ -00016410: 2866 6f72 6d20 6120 6c69 7374 2026 7265 (form a list &re │ │ │ -00016420: 7374 206b 6579 7329 2022 c45c 6e21 ab99 st keys) ".\n!.. │ │ │ -00016430: c40b 21ab 94c5 0973 ac8f c6c7 5c6e 0b09 ..!....s....\n.. │ │ │ -00016440: 4242 420b c85c 6e0b 4546 8708 8722 205b BBB..\n.EF..." [ │ │ │ -00016450: 666f 726d 206b 6579 7320 6120 6c69 7374 form keys a list │ │ │ -00016460: 2063 6c2d 7369 6d70 6c65 2d65 7870 722d cl-simple-expr- │ │ │ -00016470: 7020 3a6b 6579 2069 6620 6d65 6d62 6572 p :key if member │ │ │ -00016480: 2a20 636f 6e73 5d20 3620 225c 6e43 6f6d * cons] 6 "\nCom │ │ │ -00016490: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ -000164a0: 6c69 7374 3a5c 6e20 2028 6164 6a6f 696e list:\n (adjoin │ │ │ -000164b0: 2046 4f52 4d20 4120 4c49 5354 2026 7265 FORM A LIST &re │ │ │ -000164c0: 7374 204b 4559 5329 5c6e 5c6e 225d 206c st KEYS)\n\n"] l │ │ │ -000164d0: 6973 742a 2023 5b28 2d2d 636c 2d77 686f ist* #[(--cl-who │ │ │ -000164e0: 6c65 2d61 7267 2d2d 2061 7267 2026 7265 le-arg-- arg &re │ │ │ -000164f0: 7374 206f 7468 6572 7329 2022 c409 0842 st others) "...B │ │ │ -00016500: 2189 1b40 1a0b 4189 13ab 88c5 0b40 5c6e !..@..A......@\n │ │ │ -00016510: 4512 aa72 5c6e 2a87 2220 5b6f 7468 6572 E..r\n*." [other │ │ │ -00016520: 7320 6172 6720 666f 726d 2061 7267 7320 s arg form args │ │ │ -00016530: 7265 7665 7273 6520 636f 6e73 5d20 3420 reverse cons] 4 │ │ │ -00016540: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ -00016550: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ -00016560: 6c69 7374 2a20 2d2d 434c 2d57 484f 4c45 list* --CL-WHOLE │ │ │ -00016570: 2d41 5247 2d2d 2041 5247 2026 7265 7374 -ARG-- ARG &rest │ │ │ -00016580: 204f 5448 4552 5329 5c6e 5c6e 225d 2067 OTHERS)\n\n"] g │ │ │ -00016590: 6574 2a20 235b 282d 2d63 6c2d 7768 6f6c et* #[(--cl-whol │ │ │ -000165a0: 652d 6172 672d 2d20 7379 6d20 7072 6f70 e-arg-- sym prop │ │ │ -000165b0: 2026 6f70 7469 6f6e 616c 2064 6566 6175 &optional defau │ │ │ -000165c0: 6c74 2920 22c3 5c6e 0908 4687 2220 5b64 lt) ".\n..F." [d │ │ │ -000165d0: 6566 6175 6c74 2070 726f 7020 7379 6d20 efault prop sym │ │ │ -000165e0: 6765 745d 2034 2022 5c6e 436f 6d6d 6f6e get] 4 "\nCommon │ │ │ -000165f0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ -00016600: 743a 5c6e 2020 2867 6574 2a20 2d2d 434c t:\n (get* --CL │ │ │ -00016610: 2d57 484f 4c45 2d41 5247 2d2d 2053 594d -WHOLE-ARG-- SYM │ │ │ -00016620: 2050 524f 5020 266f 7074 696f 6e61 6c20 PROP &optional │ │ │ -00016630: 4445 4641 554c 5429 5c6e 5c6e 225d 2067 DEFAULT)\n\n"] g │ │ │ -00016640: 6574 6620 235b 282d 2d63 6c2d 7768 6f6c etf #[(--cl-whol │ │ │ -00016650: 652d 6172 672d 2d20 7379 6d20 7072 6f70 e-arg-- sym prop │ │ │ -00016660: 2026 6f70 7469 6f6e 616c 2064 6566 6175 &optional defau │ │ │ -00016670: 6c74 2920 22c3 5c6e 0908 4687 2220 5b64 lt) ".\n..F." [d │ │ │ -00016680: 6566 6175 6c74 2070 726f 7020 7379 6d20 efault prop sym │ │ │ -00016690: 706c 6973 742d 6765 745d 2034 2022 5c6e plist-get] 4 "\n │ │ │ -000166a0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -000166b0: 6461 206c 6973 743a 5c6e 2020 2867 6574 da list:\n (get │ │ │ -000166c0: 6620 2d2d 434c 2d57 484f 4c45 2d41 5247 f --CL-WHOLE-ARG │ │ │ -000166d0: 2d2d 2053 594d 2050 524f 5020 266f 7074 -- SYM PROP &opt │ │ │ -000166e0: 696f 6e61 6c20 4445 4641 554c 5429 5c6e ional DEFAULT)\n │ │ │ -000166f0: 5c6e 225d 2074 7970 6570 2023 5b28 666f \n"] typep #[(fo │ │ │ -00016700: 726d 2076 616c 2074 7970 6529 2022 c509 rm val type) ".. │ │ │ -00016710: 21ab a8c6 0cc7 0921 5c22 1bc8 0b0c 5c22 !......!\"....\" │ │ │ -00016720: c973 ac85 ca0c 21ab 830b aa8f cb20 1acc .s....!...... .. │ │ │ -00016730: 5c6e 0c44 43cd 5c6e 0c0b 2345 2929 8708 \n.DC.\n..#E)).. │ │ │ -00016740: 8722 205b 666f 726d 2074 7970 6520 7465 ." [form type te │ │ │ -00016750: 6d70 2072 6573 2076 616c 2063 6c2d 636f mp res val cl-co │ │ │ -00016760: 6e73 742d 6578 7072 2d70 2063 6c2d 6d61 nst-expr-p cl-ma │ │ │ -00016770: 6b65 2d74 7970 652d 7465 7374 2063 6c2d ke-type-test cl- │ │ │ -00016780: 636f 6e73 742d 6578 7072 2d76 616c 2063 const-expr-val c │ │ │ -00016790: 6c2d 6578 7072 2d63 6f6e 7461 696e 7320 l-expr-contains │ │ │ -000167a0: 286e 696c 2031 2920 636c 2d73 696d 706c (nil 1) cl-simpl │ │ │ -000167b0: 652d 6578 7072 2d70 2067 656e 7379 6d20 e-expr-p gensym │ │ │ -000167c0: 6c65 7420 7375 6273 745d 2036 2022 5c6e let subst] 6 "\n │ │ │ -000167d0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ -000167e0: 6461 206c 6973 743a 5c6e 2020 2874 7970 da list:\n (typ │ │ │ -000167f0: 6570 2046 4f52 4d20 5641 4c20 5459 5045 ep FORM VAL TYPE │ │ │ -00016800: 295c 6e5c 6e22 5d20 6d61 7063 2023 5b28 )\n\n"] mapc #[( │ │ │ -00016810: 7929 2022 c108 40c2 c323 88c1 0840 c4c5 y) "..@..#...@.. │ │ │ -00016820: 2388 c108 40c6 c7c8 0841 4039 ab92 c9ca #...@....A@9.... │ │ │ -00016830: 0841 4044 c9ca 0841 4140 44cb 4545 aa84 .A@D...AA@D.EE.. │ │ │ -00016840: c908 4142 4523 8722 205b 7920 7075 7420 ..ABE#." [y put │ │ │ -00016850: 7369 6465 2d65 6666 6563 742d 6672 6565 side-effect-free │ │ │ -00016860: 2074 2062 7974 652d 636f 6d70 696c 6520 t byte-compile │ │ │ -00016870: 636c 2d62 7974 652d 636f 6d70 696c 652d cl-byte-compile- │ │ │ -00016880: 636f 6d70 696c 6572 2d6d 6163 726f 2063 compiler-macro c │ │ │ -00016890: 6c2d 636f 6d70 696c 6572 2d6d 6163 726f l-compiler-macro │ │ │ -000168a0: 206c 616d 6264 6120 2877 2078 2920 6c69 lambda (w x) li │ │ │ -000168b0: 7374 2071 756f 7465 2078 5d20 3130 5d20 st quote x] 10] │ │ │ -000168c0: 2828 6669 7273 7420 2763 6172 2078 2920 ((first 'car x) │ │ │ -000168d0: 2873 6563 6f6e 6420 2763 6164 7220 7829 (second 'cadr x) │ │ │ -000168e0: 2028 7468 6972 6420 2763 6164 6472 2078 (third 'caddr x │ │ │ -000168f0: 2920 2866 6f75 7274 6820 2763 6164 6464 ) (fourth 'caddd │ │ │ -00016900: 7220 7829 2028 6669 6674 6820 276e 7468 r x) (fifth 'nth │ │ │ -00016910: 2034 2078 2920 2873 6978 7468 2027 6e74 4 x) (sixth 'nt │ │ │ -00016920: 6820 3520 7829 2028 7365 7665 6e74 6820 h 5 x) (seventh │ │ │ -00016930: 276e 7468 2036 2078 2920 2865 6967 6874 'nth 6 x) (eight │ │ │ -00016940: 6820 276e 7468 2037 2078 2920 286e 696e h 'nth 7 x) (nin │ │ │ -00016950: 7468 2027 6e74 6820 3820 7829 2028 7465 th 'nth 8 x) (te │ │ │ -00016960: 6e74 6820 276e 7468 2039 2078 2920 2872 nth 'nth 9 x) (r │ │ │ -00016970: 6573 7420 2763 6472 2078 2920 2865 6e64 est 'cdr x) (end │ │ │ -00016980: 7020 276e 756c 6c20 7829 2028 706c 7573 p 'null x) (plus │ │ │ -00016990: 7020 273e 2078 2030 2920 286d 696e 7573 p '> x 0) (minus │ │ │ -000169a0: 7020 273c 2078 2030 2920 286f 6464 7020 p '< x 0) (oddp │ │ │ -000169b0: 2765 7120 286c 6973 7420 276c 6f67 616e 'eq (list 'logan │ │ │ -000169c0: 6420 7820 3129 2031 2920 2865 7665 6e70 d x 1) 1) (evenp │ │ │ -000169d0: 2027 6571 2028 6c69 7374 2027 6c6f 6761 'eq (list 'loga │ │ │ -000169e0: 6e64 2078 2031 2920 3029 2028 6361 6172 nd x 1) 0) (caar │ │ │ -000169f0: 2063 6172 2063 6172 2920 2863 6164 7220 car car) (cadr │ │ │ -00016a00: 6361 7220 6364 7229 2028 6364 6172 2063 car cdr) (cdar c │ │ │ -00016a10: 6472 2063 6172 2920 2863 6464 7220 6364 dr car) (cddr cd │ │ │ -00016a20: 7220 6364 7229 2028 6361 6161 7220 6361 r cdr) (caaar ca │ │ │ -00016a30: 7220 6361 6172 2920 2863 6161 6472 2063 r caar) (caadr c │ │ │ -00016a40: 6172 2063 6164 7229 2028 6361 6461 7220 ar cadr) (cadar │ │ │ -00016a50: 6361 7220 6364 6172 2920 2863 6164 6472 car cdar) (caddr │ │ │ -00016a60: 2063 6172 2063 6464 7229 2028 6364 6161 car cddr) (cdaa │ │ │ -00016a70: 7220 6364 7220 6361 6172 2920 2863 6461 r cdr caar) (cda │ │ │ -00016a80: 6472 2063 6472 2063 6164 7229 2028 6364 dr cdr cadr) (cd │ │ │ -00016a90: 6461 7220 6364 7220 6364 6172 2920 2863 dar cdr cdar) (c │ │ │ -00016aa0: 6464 6472 2063 6472 2063 6464 7229 2028 dddr cdr cddr) ( │ │ │ -00016ab0: 6361 6161 6172 2063 6172 2063 6161 6172 caaaar car caaar │ │ │ -00016ac0: 2920 2863 6161 6164 7220 6361 7220 6361 ) (caaadr car ca │ │ │ -00016ad0: 6164 7229 2028 6361 6164 6172 2063 6172 adr) (caadar car │ │ │ -00016ae0: 2063 6164 6172 2920 2863 6161 6464 7220 cadar) (caaddr │ │ │ -00016af0: 6361 7220 6361 6464 7229 2028 6361 6461 car caddr) (cada │ │ │ -00016b00: 6172 2063 6172 2063 6461 6172 2920 2863 ar car cdaar) (c │ │ │ -00016b10: 6164 6164 7220 6361 7220 6364 6164 7229 adadr car cdadr) │ │ │ -00016b20: 2028 6361 6464 6172 2063 6172 2063 6464 (caddar car cdd │ │ │ -00016b30: 6172 2920 2863 6164 6464 7220 6361 7220 ar) (cadddr car │ │ │ -00016b40: 6364 6464 7229 2028 6364 6161 6172 2063 cdddr) (cdaaar c │ │ │ -00016b50: 6472 2063 6161 6172 2920 2863 6461 6164 dr caaar) (cdaad │ │ │ -00016b60: 7220 6364 7220 6361 6164 7229 2028 6364 r cdr caadr) (cd │ │ │ -00016b70: 6164 6172 2063 6472 2063 6164 6172 2920 adar cdr cadar) │ │ │ -00016b80: 2863 6461 6464 7220 6364 7220 6361 6464 (cdaddr cdr cadd │ │ │ -00016b90: 7229 2028 6364 6461 6172 2063 6472 2063 r) (cddaar cdr c │ │ │ -00016ba0: 6461 6172 2920 2863 6464 6164 7220 6364 daar) (cddadr cd │ │ │ -00016bb0: 7220 6364 6164 7229 2028 6364 6464 6172 r cdadr) (cdddar │ │ │ -00016bc0: 2063 6472 2063 6464 6172 2920 2863 6464 cdr cddar) (cdd │ │ │ -00016bd0: 6464 7220 6364 7220 6364 6464 7229 2920 ddr cdr cdddr)) │ │ │ -00016be0: 7072 6f63 6c61 696d 2028 696e 6c69 6e65 proclaim (inline │ │ │ -00016bf0: 2066 6c6f 6174 702d 7361 6665 2061 636f floatp-safe aco │ │ │ -00016c00: 6e73 206d 6170 2063 6f6e 6361 7465 6e61 ns map concatena │ │ │ -00016c10: 7465 206e 6f74 616e 7920 6e6f 7465 7665 te notany noteve │ │ │ -00016c20: 7279 2063 6c2d 7365 742d 656c 7420 7265 ry cl-set-elt re │ │ │ -00016c30: 7661 7070 656e 6420 6e72 6563 6f6e 6329 vappend nreconc) │ │ │ -00016c40: 2072 756e 2d68 6f6f 6b73 2063 6c2d 6d61 run-hooks cl-ma │ │ │ -00016c50: 6373 2d6c 6f61 642d 686f 6f6b 5d20 3429 cs-load-hook] 4) │ │ │ -00016c60: 0a . │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3530 2032 3032 310a 3b3b 3b20 :08:50 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6c2d 6d61 6373 2e65 4/lisp/cl-macs.e │ │ │ +00000090: 6c0a 3b3b 3b20 656d 6163 7320 7665 7273 l.;;; emacs vers │ │ │ +000000a0: 696f 6e20 3231 2e34 2028 7061 7463 6820 ion 21.4 (patch │ │ │ +000000b0: 3234 2920 2253 7461 6e64 6172 6420 4322 24) "Standard C" │ │ │ +000000c0: 2058 456d 6163 7320 4c75 6369 642e 0a3b XEmacs Lucid..; │ │ │ +000000d0: 3b3b 2062 7974 6563 6f6d 7020 7665 7273 ;; bytecomp vers │ │ │ +000000e0: 696f 6e20 322e 3237 2058 456d 6163 733b ion 2.27 XEmacs; │ │ │ +000000f0: 2032 3030 302d 3039 2d31 322e 0a3b 3b3b 2000-09-12..;;; │ │ │ +00000100: 206f 7074 696d 697a 6174 696f 6e20 6973 optimization is │ │ │ +00000110: 206f 6e2e 0a3b 3b3b 2074 6869 7320 6669 on..;;; this fi │ │ │ +00000120: 6c65 2075 7365 7320 6f70 636f 6465 7320 le uses opcodes │ │ │ +00000130: 7768 6963 6820 646f 206e 6f74 2065 7869 which do not exi │ │ │ +00000140: 7374 2069 6e20 456d 6163 7320 3139 2e0a st in Emacs 19.. │ │ │ +00000150: 0a28 6966 2028 616e 6420 2862 6f75 6e64 .(if (and (bound │ │ │ +00000160: 7020 2765 6d61 6373 2d76 6572 7369 6f6e p 'emacs-version │ │ │ +00000170: 290a 0920 286f 7220 2861 6e64 2028 626f ).. (or (and (bo │ │ │ +00000180: 756e 6470 2027 6570 6f63 683a 3a76 6572 undp 'epoch::ver │ │ │ +00000190: 7369 6f6e 2920 6570 6f63 683a 3a76 6572 sion) epoch::ver │ │ │ +000001a0: 7369 6f6e 290a 0920 2020 2020 2873 7472 sion).. (str │ │ │ +000001b0: 696e 672d 6c65 7373 7020 656d 6163 732d ing-lessp emacs- │ │ │ +000001c0: 7665 7273 696f 6e20 2232 3022 2929 290a version "20"))). │ │ │ +000001d0: 2020 2020 2865 7272 6f72 2022 6063 6c2d (error "`cl- │ │ │ +000001e0: 6d61 6373 2e65 6c27 2077 6173 2063 6f6d macs.el' was com │ │ │ +000001f0: 7069 6c65 6420 666f 7220 456d 6163 7320 piled for Emacs │ │ │ +00000200: 3230 2229 290a 0a28 6f72 2028 626f 756e 20"))..(or (boun │ │ │ +00000210: 6470 2027 6375 7272 656e 742d 6c6f 6164 dp 'current-load │ │ │ +00000220: 2d6c 6973 7429 2028 7365 7471 2063 7572 -list) (setq cur │ │ │ +00000230: 7265 6e74 2d6c 6f61 642d 6c69 7374 206e rent-load-list n │ │ │ +00000240: 696c 2929 0a0a 0a28 6279 7465 2d63 6f64 il))...(byte-cod │ │ │ +00000250: 6520 22c1 0873 ac84 c2c3 2188 c187 2220 e "..s....!..." │ │ │ +00000260: 5b66 6561 7475 7265 7320 636c 2d31 3920 [features cl-19 │ │ │ +00000270: 6572 726f 7220 2254 7269 6564 2074 6f20 error "Tried to │ │ │ +00000280: 6c6f 6164 2060 636c 2d6d 6163 7327 2062 load `cl-macs' b │ │ │ +00000290: 6566 6f72 6520 6063 6c27 2122 5d20 3229 efore `cl'!"] 2) │ │ │ +000002a0: 0a28 6465 6661 6c69 6173 2027 636c 2d70 .(defalias 'cl-p │ │ │ +000002b0: 7573 6820 2728 6d61 6372 6f20 2e20 235b ush '(macro . #[ │ │ │ +000002c0: 2878 2070 6c61 6365 2920 22c2 09c3 0809 (x place) "..... │ │ │ +000002d0: 4545 8722 205b 7820 706c 6163 6520 7365 EE." [x place se │ │ │ +000002e0: 7471 2063 6f6e 735d 2035 5d29 290a 2864 tq cons] 5])).(d │ │ │ +000002f0: 6566 616c 6961 7320 2763 6c2d 706f 7020 efalias 'cl-pop │ │ │ +00000300: 2728 6d61 6372 6f20 2e20 235b 2870 6c61 '(macro . #[(pla │ │ │ +00000310: 6365 2920 22c1 c208 c308 c408 4445 4544 ce) ".......DEED │ │ │ +00000320: 8722 205b 706c 6163 6520 6361 7220 7072 ." [place car pr │ │ │ +00000330: 6f67 3120 7365 7471 2063 6472 5d20 375d og1 setq cdr] 7] │ │ │ +00000340: 2929 0a28 6465 6661 6c69 6173 2027 636c )).(defalias 'cl │ │ │ +00000350: 2d70 6f70 3220 2728 6d61 6372 6f20 2e20 -pop2 '(macro . │ │ │ +00000360: 235b 2870 6c61 6365 2920 22c1 c2c3 0844 #[(place) "....D │ │ │ +00000370: 44c4 08c3 8908 4444 4545 8722 205b 706c D.....DDEE." [pl │ │ │ +00000380: 6163 6520 7072 6f67 3120 6361 7220 6364 ace prog1 car cd │ │ │ +00000390: 7220 7365 7471 5d20 375d 2929 0a28 6279 r setq] 7])).(by │ │ │ +000003a0: 7465 2d63 6f64 6520 22c1 c2c3 c423 88c1 te-code "....#.. │ │ │ +000003b0: c5c3 c423 88c1 c6c3 c423 88c7 c8c9 21ac ...#.....#....!. │ │ │ +000003c0: 84c9 ca4d 88c8 cb21 ac85 c9cb cc5c 2288 ...M...!.....\". │ │ │ +000003d0: cd21 88ce 0842 10cf ce21 ac85 d0ce d15c .!...B...!.....\ │ │ │ +000003e0: 2288 d187 2220 5b63 7572 7265 6e74 2d6c "..." [current-l │ │ │ +000003f0: 6f61 642d 6c69 7374 2070 7574 2063 6c2d oad-list put cl- │ │ │ +00000400: 7075 7368 2065 6465 6275 672d 666f 726d push edebug-form │ │ │ +00000410: 2d73 7065 6320 6564 6562 7567 2d73 6578 -spec edebug-sex │ │ │ +00000420: 7073 2063 6c2d 706f 7020 636c 2d70 6f70 ps cl-pop cl-pop │ │ │ +00000430: 3220 7265 7175 6972 6520 6662 6f75 6e64 2 require fbound │ │ │ +00000440: 7020 6465 6661 6c69 6173 2066 7365 7420 p defalias fset │ │ │ +00000450: 636c 2d74 7261 6e73 666f 726d 2d66 756e cl-transform-fun │ │ │ +00000460: 6374 696f 6e2d 7072 6f70 6572 7479 2023 ction-property # │ │ │ +00000470: 5b28 6e20 7020 6629 2022 c3c4 5c6e 44c4 [(n p f) "..\nD. │ │ │ +00000480: 0944 c5c6 0842 4446 8722 205b 6620 7020 .D...BDF." [f p │ │ │ +00000490: 6e20 7075 7420 7175 6f74 6520 6675 6e63 n put quote func │ │ │ +000004a0: 7469 6f6e 206c 616d 6264 615d 2036 5d20 tion lambda] 6] │ │ │ +000004b0: 7865 6d61 6373 2063 6c2d 6f6c 642d 6263 xemacs cl-old-bc │ │ │ +000004c0: 2d66 696c 652d 666f 726d 2064 6566 6175 -file-form defau │ │ │ +000004d0: 6c74 2d62 6f75 6e64 7020 7365 742d 6465 lt-boundp set-de │ │ │ +000004e0: 6661 756c 7420 6e69 6c5d 2034 290a 2864 fault nil] 4).(d │ │ │ +000004f0: 6566 616c 6961 7320 2763 6c2d 636f 6d70 efalias 'cl-comp │ │ │ +00000500: 696c 652d 7469 6d65 2d69 6e69 7420 235b ile-time-init #[ │ │ │ +00000510: 6e69 6c20 22c1 4b10 c2c3 21ac 85c4 c1c5 nil ".K...!..... │ │ │ +00000520: 5c22 88c6 c7c8 c923 88ca cb21 8722 205b \".....#...!." [ │ │ │ +00000530: 636c 2d6f 6c64 2d62 632d 6669 6c65 2d66 cl-old-bc-file-f │ │ │ +00000540: 6f72 6d20 6279 7465 2d63 6f6d 7069 6c65 orm byte-compile │ │ │ +00000550: 2d66 696c 652d 666f 726d 2066 626f 756e -file-form fboun │ │ │ +00000560: 6470 2062 7974 652d 636f 6d70 696c 652d dp byte-compile- │ │ │ +00000570: 666c 7573 682d 7065 6e64 696e 6720 6465 flush-pending de │ │ │ +00000580: 6661 6c69 6173 2023 5b28 666f 726d 2920 falias #[(form) │ │ │ +00000590: 22c3 5c6e 095c 2289 12a2 c461 ab88 c4c5 ".\n.\"....a.... │ │ │ +000005a0: c65c 6e41 5c22 4287 085c 6e21 8722 205b .\nA\"B..\n!." [ │ │ │ +000005b0: 636c 2d6f 6c64 2d62 632d 6669 6c65 2d66 cl-old-bc-file-f │ │ │ +000005c0: 6f72 6d20 6279 7465 2d63 6f6d 7069 6c65 orm byte-compile │ │ │ +000005d0: 2d6d 6163 726f 2d65 6e76 6972 6f6e 6d65 -macro-environme │ │ │ +000005e0: 6e74 2066 6f72 6d20 6d61 6372 6f65 7870 nt form macroexp │ │ │ +000005f0: 616e 6420 7072 6f67 6e20 6d61 7063 6172 and progn mapcar │ │ │ +00000600: 2062 7974 652d 636f 6d70 696c 652d 6669 byte-compile-fi │ │ │ +00000610: 6c65 2d66 6f72 6d5d 2035 5d20 7075 7420 le-form] 5] put │ │ │ +00000620: 6571 6c20 6279 7465 2d63 6f6d 7069 6c65 eql byte-compile │ │ │ +00000630: 2063 6c2d 6279 7465 2d63 6f6d 7069 6c65 cl-byte-compile │ │ │ +00000640: 2d63 6f6d 7069 6c65 722d 6d61 6372 6f20 -compiler-macro │ │ │ +00000650: 7275 6e2d 686f 6f6b 7320 636c 2d68 6163 run-hooks cl-hac │ │ │ +00000660: 6b2d 6279 7465 636f 6d70 2d68 6f6f 6b5d k-bytecomp-hook] │ │ │ +00000670: 2034 5d29 0a23 4031 3939 2028 6465 6675 4]).#@199 (defu │ │ │ +00000680: 6e2a 204e 414d 4520 4152 474c 4953 5420 n* NAME ARGLIST │ │ │ +00000690: 5b44 4f43 5354 5249 4e47 5d20 424f 4459 [DOCSTRING] BODY │ │ │ +000006a0: 2e2e 2e29 3a20 6465 6669 6e65 204e 414d ...): define NAM │ │ │ +000006b0: 4520 6173 2061 2066 756e 6374 696f 6e2e E as a function. │ │ │ +000006c0: 0a4c 696b 6520 6e6f 726d 616c 2060 6465 .Like normal `de │ │ │ +000006d0: 6675 6e27 2c20 6578 6365 7074 2041 5247 fun', except ARG │ │ │ +000006e0: 4c49 5354 2061 6c6c 6f77 7320 6675 6c6c LIST allows full │ │ │ +000006f0: 2043 6f6d 6d6f 6e20 4c69 7370 2063 6f6e Common Lisp con │ │ │ +00000700: 7665 6e74 696f 6e73 2c0a 616e 6420 424f ventions,.and BO │ │ │ +00000710: 4459 2069 7320 696d 706c 6963 6974 6c79 DY is implicitly │ │ │ +00000720: 2073 7572 726f 756e 6465 6420 6279 2028 surrounded by ( │ │ │ +00000730: 626c 6f63 6b20 4e41 4d45 202e 2e2e 292e block NAME ...). │ │ │ +00000740: 1f0a 2864 6566 616c 6961 7320 2764 6566 ..(defalias 'def │ │ │ +00000750: 756e 2a20 2728 6d61 6372 6f20 2e20 235b un* '(macro . #[ │ │ │ +00000760: 286e 616d 6520 6172 6773 2026 7265 7374 (name args &rest │ │ │ +00000770: 2062 6f64 7929 2022 c509 0842 5c6e 5c22 body) "...B\n\" │ │ │ +00000780: 1cc6 5c6e 0c41 4242 1b0c 40ab 87c7 0c40 ..\n.ABB..@....@ │ │ │ +00000790: 0b45 aa81 0b2a 8722 205b 626f 6479 2061 .E...*." [body a │ │ │ +000007a0: 7267 7320 6e61 6d65 2066 6f72 6d20 7265 rgs name form re │ │ │ +000007b0: 7320 636c 2d74 7261 6e73 666f 726d 2d6c s cl-transform-l │ │ │ +000007c0: 616d 6264 6120 6465 6675 6e20 7072 6f67 ambda defun prog │ │ │ +000007d0: 6e5d 2033 2028 2324 202e 2031 3635 3929 n] 3 (#$ . 1659) │ │ │ +000007e0: 5d29 290a 2340 3230 3220 2864 6566 6d61 ])).#@202 (defma │ │ │ +000007f0: 6372 6f2a 204e 414d 4520 4152 474c 4953 cro* NAME ARGLIS │ │ │ +00000800: 5420 5b44 4f43 5354 5249 4e47 5d20 424f T [DOCSTRING] BO │ │ │ +00000810: 4459 2e2e 2e29 3a20 6465 6669 6e65 204e DY...): define N │ │ │ +00000820: 414d 4520 6173 2061 206d 6163 726f 2e0a AME as a macro.. │ │ │ +00000830: 4c69 6b65 206e 6f72 6d61 6c20 6064 6566 Like normal `def │ │ │ +00000840: 6d61 6372 6f27 2c20 6578 6365 7074 2041 macro', except A │ │ │ +00000850: 5247 4c49 5354 2061 6c6c 6f77 7320 6675 RGLIST allows fu │ │ │ +00000860: 6c6c 2043 6f6d 6d6f 6e20 4c69 7370 2063 ll Common Lisp c │ │ │ +00000870: 6f6e 7665 6e74 696f 6e73 2c0a 616e 6420 onventions,.and │ │ │ +00000880: 424f 4459 2069 7320 696d 706c 6963 6974 BODY is implicit │ │ │ +00000890: 6c79 2073 7572 726f 756e 6465 6420 6279 ly surrounded by │ │ │ +000008a0: 2028 626c 6f63 6b20 4e41 4d45 202e 2e2e (block NAME ... │ │ │ +000008b0: 292e 1f0a 2864 6566 616c 6961 7320 2764 )...(defalias 'd │ │ │ +000008c0: 6566 6d61 6372 6f2a 2027 286d 6163 726f efmacro* '(macro │ │ │ +000008d0: 202e 2023 5b28 6e61 6d65 2061 7267 7320 . #[(name args │ │ │ +000008e0: 2672 6573 7420 626f 6479 2920 22c5 0908 &rest body) "... │ │ │ +000008f0: 425c 6e5c 221c c65c 6e0c 4142 421b 0c40 B\n\"..\n.ABB..@ │ │ │ +00000900: ab87 c70c 400b 45aa 810b 2a87 2220 5b62 ....@.E...*." [b │ │ │ +00000910: 6f64 7920 6172 6773 206e 616d 6520 666f ody args name fo │ │ │ +00000920: 726d 2072 6573 2063 6c2d 7472 616e 7366 rm res cl-transf │ │ │ +00000930: 6f72 6d2d 6c61 6d62 6461 2064 6566 6d61 orm-lambda defma │ │ │ +00000940: 6372 6f20 7072 6f67 6e5d 2033 2028 2324 cro progn] 3 (#$ │ │ │ +00000950: 202e 2032 3032 3629 5d29 290a 2340 3136 . 2026)])).#@16 │ │ │ +00000960: 3820 2866 756e 6374 696f 6e2a 2053 594d 8 (function* SYM │ │ │ +00000970: 424f 4c2d 4f52 2d4c 414d 4244 4129 3a20 BOL-OR-LAMBDA): │ │ │ +00000980: 696e 7472 6f64 7563 6520 6120 6675 6e63 introduce a func │ │ │ +00000990: 7469 6f6e 2e0a 4c69 6b65 206e 6f72 6d61 tion..Like norma │ │ │ +000009a0: 6c20 6066 756e 6374 696f 6e27 2c20 6578 l `function', ex │ │ │ +000009b0: 6365 7074 2074 6861 7420 6966 2061 7267 cept that if arg │ │ │ +000009c0: 756d 656e 7420 6973 2061 206c 616d 6264 ument is a lambd │ │ │ +000009d0: 6120 666f 726d 2c20 6974 730a 4152 474c a form, its.ARGL │ │ │ +000009e0: 4953 5420 616c 6c6f 7773 2066 756c 6c20 IST allows full │ │ │ +000009f0: 436f 6d6d 6f6e 204c 6973 7020 636f 6e76 Common Lisp conv │ │ │ +00000a00: 656e 7469 6f6e 732e 1f0a 2864 6566 616c entions...(defal │ │ │ +00000a10: 6961 7320 2766 756e 6374 696f 6e2a 2027 ias 'function* ' │ │ │ +00000a20: 286d 6163 726f 202e 2023 5b28 6675 6e63 (macro . #[(func │ │ │ +00000a30: 2920 2209 a2c3 61ab 9bc4 0941 c55c 221a ) "...a....A.\". │ │ │ +00000a40: c6c3 5c6e 4142 4418 5c6e 40ab 87c7 5c6e ..\nABD.\n@...\n │ │ │ +00000a50: 4008 45aa 8108 2a87 c609 4487 2220 5b66 @.E...*...D." [f │ │ │ +00000a60: 6f72 6d20 6675 6e63 2072 6573 206c 616d orm func res lam │ │ │ +00000a70: 6264 6120 636c 2d74 7261 6e73 666f 726d bda cl-transform │ │ │ +00000a80: 2d6c 616d 6264 6120 636c 2d6e 6f6e 6520 -lambda cl-none │ │ │ +00000a90: 6675 6e63 7469 6f6e 2070 726f 676e 5d20 function progn] │ │ │ +00000aa0: 3320 2823 2420 2e20 3234 3032 295d 2929 3 (#$ . 2402)])) │ │ │ +00000ab0: 0a28 6465 6661 6c69 6173 2027 636c 2d74 .(defalias 'cl-t │ │ │ +00000ac0: 7261 6e73 666f 726d 2d66 756e 6374 696f ransform-functio │ │ │ +00000ad0: 6e2d 7072 6f70 6572 7479 2023 5b28 6675 n-property #[(fu │ │ │ +00000ae0: 6e63 2070 726f 7020 666f 726d 2920 22c4 nc prop form) ". │ │ │ +00000af0: 095c 6e5c 221b c5c6 0b40 4141 c7c8 5c6e .\n\"....@AA..\n │ │ │ +00000b00: 44c8 0844 c9ca 0b41 4244 4643 2329 8722 D..D...ABDFC#)." │ │ │ +00000b10: 205b 7072 6f70 2066 6f72 6d20 6675 6e63 [prop form func │ │ │ +00000b20: 2072 6573 2063 6c2d 7472 616e 7366 6f72 res cl-transfor │ │ │ +00000b30: 6d2d 6c61 6d62 6461 2061 7070 656e 6420 m-lambda append │ │ │ +00000b40: 2870 726f 676e 2920 7075 7420 7175 6f74 (progn) put quot │ │ │ +00000b50: 6520 6675 6e63 7469 6f6e 206c 616d 6264 e function lambd │ │ │ +00000b60: 615d 2039 5d29 0a28 6279 7465 2d63 6f64 a] 9]).(byte-cod │ │ │ +00000b70: 6520 22c0 0942 11c2 10c3 0942 11c4 c321 e "..B.....B...! │ │ │ +00000b80: ac85 c5c3 c65c 2288 c687 2220 5b6c 616d .....\"..." [lam │ │ │ +00000b90: 6264 612d 6c69 7374 2d6b 6579 776f 7264 bda-list-keyword │ │ │ +00000ba0: 7320 6375 7272 656e 742d 6c6f 6164 2d6c s current-load-l │ │ │ +00000bb0: 6973 7420 2826 6f70 7469 6f6e 616c 2026 ist (&optional & │ │ │ +00000bc0: 7265 7374 2026 6b65 7920 2661 6c6c 6f77 rest &key &allow │ │ │ +00000bd0: 2d6f 7468 6572 2d6b 6579 7320 2661 7578 -other-keys &aux │ │ │ +00000be0: 2026 7768 6f6c 6520 2662 6f64 7920 2665 &whole &body &e │ │ │ +00000bf0: 6e76 6972 6f6e 6d65 6e74 2920 636c 2d6d nvironment) cl-m │ │ │ +00000c00: 6163 726f 2d65 6e76 6972 6f6e 6d65 6e74 acro-environment │ │ │ +00000c10: 2064 6566 6175 6c74 2d62 6f75 6e64 7020 default-boundp │ │ │ +00000c20: 7365 742d 6465 6661 756c 7420 6e69 6c5d set-default nil] │ │ │ +00000c30: 2033 290a 2864 6566 616c 6961 7320 2763 3).(defalias 'c │ │ │ +00000c40: 6c2d 7570 6361 7365 2d61 7267 2023 5b28 l-upcase-arg #[( │ │ │ +00000c50: 6172 6729 2022 0c39 ab8e 0c08 73ab 820c arg) ".9....s... │ │ │ +00000c60: 87c5 c60c 2196 2187 0c3c abc5 0c0b 73ab ....!.!..<....s. │ │ │ +00000c70: 85c7 c8c9 5c22 880c 0b42 13ca 0c21 cb1a ....\"...B...!.. │ │ │ +00000c80: 1ccc 0c21 8919 41ab 8709 cd09 4144 a188 ...!..A.....AD.. │ │ │ +00000c90: 29ce 0c73 4140 8912 ab88 cfce cf5c 6e0c )..sA@.......\n. │ │ │ +00000ca0: 5c22 5c22 14d0 0c73 ab85 cfd0 0c5c 2214 \"\"...s.....\". │ │ │ +00000cb0: d1d2 0c5c 222a 870c 8722 205b 6c61 6d62 ...\"*..." [lamb │ │ │ +00000cc0: 6461 2d6c 6973 742d 6b65 7977 6f72 6473 da-list-keywords │ │ │ +00000cd0: 2070 206a 756e 6b20 6172 676c 6973 742d p junk arglist- │ │ │ +00000ce0: 7669 7369 7465 6420 6172 6720 696e 7465 visited arg inte │ │ │ +00000cf0: 726e 2073 796d 626f 6c2d 6e61 6d65 2065 rn symbol-name e │ │ │ +00000d00: 7272 6f72 2063 6972 6375 6c61 722d 6c69 rror circular-li │ │ │ +00000d10: 7374 2028 6172 6729 2063 6f70 792d 6c69 st (arg) copy-li │ │ │ +00000d20: 7374 206e 696c 206c 6173 7420 2672 6573 st nil last &res │ │ │ +00000d30: 7420 2663 6c2d 6465 6673 2064 656c 7120 t &cl-defs delq │ │ │ +00000d40: 2663 6c2d 7175 6f74 6520 6d61 7063 6172 &cl-quote mapcar │ │ │ +00000d50: 2063 6c2d 7570 6361 7365 2d61 7267 5d20 cl-upcase-arg] │ │ │ +00000d60: 365d 290a 2340 3938 2052 6574 7572 6e73 6]).#@98 Returns │ │ │ +00000d70: 2073 7472 696e 6720 7769 7468 2070 7269 string with pri │ │ │ +00000d80: 6e74 6564 2072 6570 7265 7365 6e74 6174 nted representat │ │ │ +00000d90: 696f 6e20 6f66 2061 7267 756d 656e 7473 ion of arguments │ │ │ +00000da0: 206c 6973 742e 0a53 7570 706f 7274 7320 list..Supports │ │ │ +00000db0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +00000dc0: 6461 206c 6973 7473 2e1f 0a28 6465 6661 da lists...(defa │ │ │ +00000dd0: 6c69 6173 2027 636c 2d66 756e 6374 696f lias 'cl-functio │ │ │ +00000de0: 6e2d 6172 676c 6973 7420 235b 286e 616d n-arglist #[(nam │ │ │ +00000df0: 6520 6172 676c 6973 7429 2022 093c ac86 e arglist) ".<.. │ │ │ +00000e00: 0939 ac82 c287 c389 10c4 c58f 8722 205b .9..........." [ │ │ │ +00000e10: 6172 676c 6973 742d 7669 7369 7465 6420 arglist-visited │ │ │ +00000e20: 6172 676c 6973 7420 224e 6f74 2061 7661 arglist "Not ava │ │ │ +00000e30: 696c 6162 6c65 2220 6e69 6c20 2862 7974 ilable" nil (byt │ │ │ +00000e40: 652d 636f 6465 2022 c208 c361 ab83 c4aa e-code "...a.... │ │ │ +00000e50: 8108 09ad 9809 3cab 85c5 0921 aa8f 0939 ......<....!...9 │ │ │ +00000e60: ab87 c5c6 0944 21aa 84c7 c809 5c22 4221 .....D!.....\"B! │ │ │ +00000e70: 8722 205b 6e61 6d65 2061 7267 6c69 7374 ." [name arglist │ │ │ +00000e80: 2070 7269 6e31 2d74 6f2d 7374 7269 6e67 prin1-to-string │ │ │ +00000e90: 2063 6c2d 6e6f 6e65 206c 616d 6264 6120 cl-none lambda │ │ │ +00000ea0: 636c 2d75 7063 6173 652d 6172 6720 2672 cl-upcase-arg &r │ │ │ +00000eb0: 6573 7420 7772 6f6e 672d 7479 7065 2d61 est wrong-type-a │ │ │ +00000ec0: 7267 756d 656e 7420 6c69 7374 705d 2035 rgument listp] 5 │ │ │ +00000ed0: 2920 2828 7420 224e 6f74 2061 7661 696c ) ((t "Not avail │ │ │ +00000ee0: 6162 6c65 2229 295d 2034 2028 2324 202e able"))] 4 (#$ . │ │ │ +00000ef0: 2033 3433 3329 5d29 0a28 6465 6661 6c69 3433)]).(defali │ │ │ +00000f00: 6173 2027 636c 2d74 7261 6e73 666f 726d as 'cl-transform │ │ │ +00000f10: 2d6c 616d 6264 6120 235b 2866 6f72 6d20 -lambda #[(form │ │ │ +00000f20: 6269 6e64 2d62 6c6f 636b 2920 220e 2840 bind-block) ".(@ │ │ │ +00000f30: 1d0e 2841 1cc6 8919 1e29 c689 1e24 18c6 ..(A.....)...$.. │ │ │ +00000f40: 891e 2a1a c61b c71e 250c 403b ab8b 0c41 ..*.....%.@;...A │ │ │ +00000f50: ab87 0c89 4114 4016 250e 25c8 c9ca 0e26 ....A.@.%.%....& │ │ │ +00000f60: 0d5c 22cb b005 5c6e 4212 0c40 3bac 870c .\"...\nB..@;... │ │ │ +00000f70: 40a2 cc61 ab8a 0c89 4114 405c 6e42 12aa @..a....A.@\nB.. │ │ │ +00000f80: 6a0d 3cab 85cd 0d21 aa83 ce0d 4415 cf0d j.<....!....D... │ │ │ +00000f90: 2189 1e23 41ab 890e 23ce 0e23 4144 a188 !..#A...#..#AD.. │ │ │ +00000fa0: 29d0 0d73 4140 8911 ab8c d1d0 d109 0d5c )..sA@.........\ │ │ │ +00000fb0: 225c 2215 0941 4011 d20d 7389 1629 ab85 "\"..A@...s..).. │ │ │ +00000fc0: d1d2 0d5c 2215 d30d 73ab 84d4 d521 88d6 ...\"...s....!.. │ │ │ +00000fd0: 0d73 891e 2341 401e 270e 23ab 92d1 0e23 .s..#A@.'.#....# │ │ │ +00000fe0: 40d1 0e27 0d5c 225c 22d7 0e27 d844 44a4 @..'.\"\"..'.DD. │ │ │ +00000ff0: 152a 0dab a40d 4039 ab9f 0d40 d973 ac99 .*....@9...@.s.. │ │ │ +00001000: 0d40 da61 ab89 09ac 900d 4140 3aac 8a0d .@.a......A@:... │ │ │ +00001010: 8941 1540 0b42 13aa 590e 26db 61ac 88dc .A.@.B..Y.&.a... │ │ │ +00001020: 0e26 0c42 4243 140d ac8b c60b 9f5c 6e9f .&.BBC.......\n. │ │ │ +00001030: 0ca4 4242 aac2 da0b 73ab 84da 0d42 15dd ..BB....s....B.. │ │ │ +00001040: 0dc6 0b47 da0b 73ab 83de aa81 df5a 2388 ...G..s......Z#. │ │ │ +00001050: 089f 100e 24ad 87e0 e10e 249f 4242 0b9f ....$.....$.BB.. │ │ │ +00001060: ce08 8941 1040 4044 a45c 6e9f e208 440e ...A.@@D.\n...D. │ │ │ +00001070: 2a9f a40c a443 a442 422e 5c6e 8722 205b *....C.BB.\n." [ │ │ │ +00001080: 6269 6e64 2d6c 6574 7320 6269 6e64 2d64 bind-lets bind-d │ │ │ +00001090: 6566 7320 6865 6164 6572 2073 696d 706c efs header simpl │ │ │ +000010a0: 652d 6172 6773 2062 6f64 7920 6172 6773 e-args body args │ │ │ +000010b0: 206e 696c 2022 2220 225c 6e43 6f6d 6d6f nil "" "\nCommo │ │ │ +000010c0: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ +000010d0: 7374 3a5c 6e22 2022 2020 2220 636c 2d66 st:\n" " " cl-f │ │ │ +000010e0: 756e 6374 696f 6e2d 6172 676c 6973 7420 unction-arglist │ │ │ +000010f0: 225c 6e5c 6e22 2069 6e74 6572 6163 7469 "\n\n" interacti │ │ │ +00001100: 7665 2063 6f70 792d 6c69 7374 2026 7265 ve copy-list &re │ │ │ +00001110: 7374 206c 6173 7420 2663 6c2d 6465 6673 st last &cl-defs │ │ │ +00001120: 2064 656c 7120 2663 6c2d 7175 6f74 6520 delq &cl-quote │ │ │ +00001130: 2677 686f 6c65 2065 7272 6f72 2022 2677 &whole error "&w │ │ │ +00001140: 686f 6c65 206e 6f74 2063 7572 7265 6e74 hole not current │ │ │ +00001150: 6c79 2069 6d70 6c65 6d65 6e74 6564 2220 ly implemented" │ │ │ +00001160: 2665 6e76 6972 6f6e 6d65 6e74 2026 6175 &environment &au │ │ │ +00001170: 7820 636c 2d6d 6163 726f 2d65 6e76 6972 x cl-macro-envir │ │ │ +00001180: 6f6e 6d65 6e74 2028 6e69 6c20 2672 6573 onment (nil &res │ │ │ +00001190: 7420 2662 6f64 7920 266b 6579 2026 6175 t &body &key &au │ │ │ +000011a0: 7829 2026 6f70 7469 6f6e 616c 2063 6c2d x) &optional cl- │ │ │ +000011b0: 6e6f 6e65 2062 6c6f 636b 2063 6c2d 646f none block cl-do │ │ │ +000011c0: 2d61 7267 6c69 7374 2031 2030 2065 7661 -arglist 1 0 eva │ │ │ +000011d0: 6c2d 7768 656e 2028 636f 6d70 696c 6520 l-when (compile │ │ │ +000011e0: 6c6f 6164 2065 7661 6c29 206c 6574 2a20 load eval) let* │ │ │ +000011f0: 7020 6269 6e64 2d69 6e69 7473 2064 6f63 p bind-inits doc │ │ │ +00001200: 2062 696e 642d 626c 6f63 6b20 7620 666f bind-block v fo │ │ │ +00001210: 726d 2062 696e 642d 656e 7175 6f74 6520 rm bind-enquote │ │ │ +00001220: 6269 6e64 2d66 6f72 6d73 5d20 375d 290a bind-forms] 7]). │ │ │ +00001230: 2864 6566 616c 6961 7320 2763 6c2d 646f (defalias 'cl-do │ │ │ +00001240: 2d61 7267 6c69 7374 2023 5b28 6172 6773 -arglist #[(args │ │ │ +00001250: 2065 7870 7220 266f 7074 696f 6e61 6c20 expr &optional │ │ │ +00001260: 6e75 6d29 2022 0d3c ac9a 0d0e 4273 ac84 num) ".<....Bs.. │ │ │ +00001270: 0d39 ac85 c6c7 0d5c 2287 0d0e 5144 0e43 .9.....\"...QD.C │ │ │ +00001280: 4289 1643 87c8 0d21 15c9 0d21 891a 41ab B..C...!...!..A. │ │ │ +00001290: 875c 6eca 5c6e 4144 a188 29cb 0d73 891a .\n.\nAD..)..s.. │ │ │ +000012a0: ab84 5c6e caa0 8829 cc0d 73ab 84c6 cd21 ..\n...)..s....! │ │ │ +000012b0: 880d ca0d 73ce 20ab 840e 56aa 81cf d089 ....s. ...V..... │ │ │ +000012c0: 8989 1e44 1e47 1e4e 181e 481b 1e52 0e40 ...D.G.N..H..R.@ │ │ │ +000012d0: ac83 d116 400b 4140 3cab 86d2 d321 13aa ....@.A@<....!.. │ │ │ +000012e0: 840b 4140 130b 0e51 440e 4342 1643 0d40 ..A@...QD.CB.C.@ │ │ │ +000012f0: d461 ab8e 0d41 400d 4141 150b 440e 4342 .a...A@.AA..D.CB │ │ │ +00001300: 1643 0d1a 0b16 445c 6eab 985c 6e40 0e42 .C....D\n..\n@.B │ │ │ +00001310: 73ac 915c 6e0d 61ac 86d5 0e44 4416 445c s..\n.a....DD.D\ │ │ │ +00001320: 6e41 8912 ac68 5c6e 40d6 73ab 92d7 d80b nA...h\n@.s..... │ │ │ +00001330: 44d9 0d5c 6e5c 2247 4516 440d 5c6e 613f D..\n\"GE.D.\na? │ │ │ +00001340: 1647 290d abd1 0d40 0e42 73ac ca0d 41ac .G)....@.Bs...A. │ │ │ +00001350: 840e 47ac 83da aa81 db0b 441e 45dc 0d89 ..G.......D.E... │ │ │ +00001360: 4115 400e 4eac 860e 48d1 55ab 840e 45aa A.@.N...H.U...E. │ │ │ +00001370: 99dd 0e44 0e45 dedf e00e 49e1 613f ad84 ...D.E....I.a?.. │ │ │ +00001380: e20e 4944 d80b 4445 4546 5c22 8829 0e40 ..ID..DEEF\".).@ │ │ │ +00001390: 5416 40e3 164e aa2c 0d40 e461 abed 0d89 T.@..N.,.@.a.... │ │ │ +000013a0: 4115 40ab e60d ab70 0d40 0e42 73ac 690d A.@....p.@.Bs.i. │ │ │ +000013b0: 8941 1540 891c 3aac 830c 4314 0c41 41ab .A.@..:...C..AA. │ │ │ +000013c0: 8adc e50c 38e6 0be3 455c 2288 0c41 ab85 ....8...E\"..A.. │ │ │ +000013d0: 0c41 40aa 8c0e 4a40 ae87 0c40 0e4a b741 .A@...J@...@.J.A │ │ │ +000013e0: 40da 0b44 1e45 8919 ab88 0e4f ab84 e209 @..D.E.....O.... │ │ │ +000013f0: 4411 dc0c 4009 ab88 dd0b 0e45 0946 aa82 D...@......E.F.. │ │ │ +00001400: 0e45 5c22 880e 4054 1640 2baa 1a0d 40ca .E\"..@T.@+...@. │ │ │ +00001410: 61ab 940d 4140 0d41 4115 891c 3aab 85dc a...A@.AA...:... │ │ │ +00001420: 0c0b 5c22 8829 aaaf 0d40 e761 aca9 0e48 ..\".)...@.a...H │ │ │ +00001430: d155 aca3 0e47 ac9f dd0b dee8 e00e 49e1 .U...G........I. │ │ │ +00001440: 613f ad84 e20e 4944 e90e 40d8 0b44 4545 a?....ID..@..DEE │ │ │ +00001450: 4545 0e4b 4216 4b0d 40e7 6183 d302 0d89 EE.KB.K.@.a..... │ │ │ +00001460: 4115 4083 d302 0dab 6e0d 400e 4273 ac67 A.@.....n.@.Bs.g │ │ │ +00001470: 0d89 4115 4089 1c3a ac83 0c43 140c 403a ..A.@..:...C..@: │ │ │ +00001480: ab85 0c40 40aa 87ea ebec 0c40 5c22 211e ...@@......@\"!. │ │ │ +00001490: 410c 403a ab86 0c40 4140 aa82 0c40 1e4c A.@:...@A@...@.L │ │ │ +000014a0: 0c41 ab85 0c41 40aa 8c0e 4a40 ae87 0e4c .A...A@...J@...L │ │ │ +000014b0: 0e4a b741 4019 ede2 0e41 440b 451e 4d09 .J.A@....AD.E.M. │ │ │ +000014c0: ab88 0e4f ab84 e209 4411 0c41 41ab aee5 ...O....D..AA... │ │ │ +000014d0: 0c38 ae82 d220 1e46 dbd5 0e46 4444 1e53 .8... .F...FDD.S │ │ │ +000014e0: dc0e 460e 4d5c 2288 dc0e 4cdd 0e46 ee0e ..F.M\"...L..F.. │ │ │ +000014f0: 53ef 0e46 e345 4509 465c 2288 2aaa a8dc S..F.EE.F\".*... │ │ │ +00001500: 0e4c dbd5 09ac 840e 4daa 98f0 0e4d f109 .L......M....M.. │ │ │ +00001510: 21e3 61ab 89e2 d0f2 0921 4444 aa84 e0d0 !.a......!DD.... │ │ │ +00001520: 0945 4544 445c 2288 0e41 0842 10f3 0e41 .EEDD\"..A.B...A │ │ │ +00001530: 21d1 48f4 55ab 920e 4189 4c88 ef0e 41e2 !.H.U...A.L...A. │ │ │ +00001540: 0e41 4445 0e54 4216 542d 82f0 0108 9f10 .ADE.TB.T-...... │ │ │ +00001550: 0d40 f561 ab87 0d89 4115 40ac dd08 abda .@.a....A.@..... │ │ │ +00001560: 0e48 d155 acd4 d2f6 211e 3ff7 1e50 f80e .H.U....!.?..P.. │ │ │ +00001570: 3ff9 eddb 0e3f 44e2 fa08 0e50 5c22 4445 ?....?D....P\"DE │ │ │ +00001580: ef0e 3fd5 890e 3f44 4445 44db d5ed e20e ..?...?DDED..... │ │ │ +00001590: 5042 0b45 4444 ef0e 3fd0 4544 e3c6 ebfb PB.EDD..?.ED.... │ │ │ +000015a0: 085c 22db 0e3f 4445 4446 451e 55fc 0e3f .\"..?DEDFE.U..? │ │ │ +000015b0: 0b44 430e 5545 0e4b 4216 4b2b 0d40 fd61 .DC.UE.KB.K+.@.a │ │ │ +000015c0: abcb 0d89 4115 40ab c40d ab70 0d40 0e42 ....A.@....p.@.B │ │ │ +000015d0: 73ac 690d 403a abaa 0e4f ab97 0d40 4140 s.i.@:...O...@A@ │ │ │ +000015e0: ab91 dc0d 4040 e20d 8941 1540 4140 445c ....@@...A.@A@D\ │ │ │ +000015f0: 2288 aa56 dc0d 4040 0d89 4115 4041 405c "..V..@@..A.@A@\ │ │ │ +00001600: 2288 aa47 dc0d 8941 1540 d05c 2288 aa3c "..G...A.@.\"..< │ │ │ +00001610: 0dad 85c6 fe0e 525c 222e 0787 2220 5b6b ......R\"..." [k │ │ │ +00001620: 6579 7320 6465 6620 7020 7265 7374 6172 eys def p restar │ │ │ +00001630: 6720 6172 6720 6172 6773 2065 7272 6f72 g arg args error │ │ │ +00001640: 2022 496e 7661 6c69 6420 6172 6775 6d65 "Invalid argume │ │ │ +00001650: 6e74 206e 616d 653a 2025 7322 2063 6f70 nt name: %s" cop │ │ │ +00001660: 792d 6c69 7374 206c 6173 7420 2672 6573 y-list last &res │ │ │ +00001670: 7420 2662 6f64 7920 2665 6e76 6972 6f6e t &body &environ │ │ │ +00001680: 6d65 6e74 2022 2665 6e76 6972 6f6e 6d65 ment "&environme │ │ │ +00001690: 6e74 2075 7365 6420 696e 636f 7272 6563 nt used incorrec │ │ │ +000016a0: 746c 7922 2063 6c2d 636f 6d70 696c 696e tly" cl-compilin │ │ │ +000016b0: 672d 6669 6c65 2033 206e 696c 2030 2067 g-file 3 nil 0 g │ │ │ +000016c0: 656e 7379 6d20 222d 2d72 6573 742d 2d22 ensym "--rest--" │ │ │ +000016d0: 2026 7768 6f6c 6520 6364 7220 286e 696c &whole cdr (nil │ │ │ +000016e0: 2026 6175 7829 203d 206c 656e 6774 6820 &aux) = length │ │ │ +000016f0: 6c64 6966 6620 706f 7020 6361 7220 636c ldiff pop car cl │ │ │ +00001700: 2d64 6f2d 6172 676c 6973 7420 6966 2073 -do-arglist if s │ │ │ +00001710: 6967 6e61 6c20 2777 726f 6e67 2d6e 756d ignal 'wrong-num │ │ │ +00001720: 6265 722d 6f66 2d61 7267 756d 656e 7473 ber-of-arguments │ │ │ +00001730: 206c 6973 7420 636c 2d6e 6f6e 6520 7175 list cl-none qu │ │ │ +00001740: 6f74 6520 7420 266f 7074 696f 6e61 6c20 ote t &optional │ │ │ +00001750: 3220 616e 6420 266b 6579 2027 7772 6f6e 2 and &key 'wron │ │ │ +00001760: 672d 6e75 6d62 6572 2d6f 662d 6172 6775 g-number-of-argu │ │ │ +00001770: 6d65 6e74 7320 2b20 696e 7465 726e 2066 ments + intern f │ │ │ +00001780: 6f72 6d61 7420 223a 2573 2220 6d65 6d71 ormat ":%s" memq │ │ │ +00001790: 2070 726f 6731 2073 6574 7120 6f72 2063 prog1 setq or c │ │ │ +000017a0: 6c2d 636f 6e73 742d 6578 7072 2d70 2063 l-const-expr-p c │ │ │ +000017b0: 6c2d 636f 6e73 742d 6578 7072 2d76 616c l-const-expr-val │ │ │ +000017c0: 2073 796d 626f 6c2d 6e61 6d65 203f 3a20 symbol-name ?: │ │ │ +000017d0: 2661 6c6c 6f77 2d6f 7468 6572 2d6b 6579 &allow-other-key │ │ │ +000017e0: 7320 222d 2d6b 6579 732d 2d22 2028 3a61 s "--keys--" (:a │ │ │ +000017f0: 6c6c 6f77 2d6f 7468 6572 2d6b 6579 7329 llow-other-keys) │ │ │ +00001800: 2077 6869 6c65 2063 6f6e 6420 6170 7065 while cond appe │ │ │ +00001810: 6e64 2022 4b65 7977 6f72 6420 6172 6775 nd "Keyword argu │ │ │ +00001820: 6d65 6e74 2025 2573 206e 6f74 206f 6e65 ment %%s not one │ │ │ +00001830: 206f 6620 2573 2220 6c65 7420 2661 7578 of %s" let &aux │ │ │ +00001840: 2022 4d61 6c66 6f72 6d65 6420 6172 6775 "Malformed argu │ │ │ +00001850: 6d65 6e74 206c 6973 7420 2573 2220 7661 ment list %s" va │ │ │ +00001860: 7220 6e75 6d20 6b61 7267 206c 616d 6264 r num karg lambd │ │ │ +00001870: 612d 6c69 7374 2d6b 6579 776f 7264 7320 a-list-keywords │ │ │ +00001880: 6269 6e64 2d6c 6574 7320 6d69 6e61 7267 bind-lets minarg │ │ │ +00001890: 2070 6f70 6172 6720 7465 6d70 2065 7861 poparg temp exa │ │ │ +000018a0: 6374 6172 6720 7361 6665 7479 2062 696e ctarg safety bin │ │ │ +000018b0: 642d 626c 6f63 6b20 6269 6e64 2d64 6566 d-block bind-def │ │ │ +000018c0: 7320 6269 6e64 2d66 6f72 6d73 2076 6172 s bind-forms var │ │ │ +000018d0: 6720 6c6f 6f6b 206c 6174 6572 6172 6720 g look laterarg │ │ │ +000018e0: 6269 6e64 2d65 6e71 756f 7465 2061 6c6c bind-enquote all │ │ │ +000018f0: 6f77 2065 7870 7220 7361 7665 2d61 7267 ow expr save-arg │ │ │ +00001900: 7320 7661 6c20 6269 6e64 2d69 6e69 7473 s val bind-inits │ │ │ +00001910: 2063 6865 636b 2063 6c2d 6f70 7469 6d69 check cl-optimi │ │ │ +00001920: 7a65 2d73 6166 6574 795d 2031 325d 290a ze-safety] 12]). │ │ │ +00001930: 2864 6566 616c 6961 7320 2763 6c2d 6172 (defalias 'cl-ar │ │ │ +00001940: 676c 6973 742d 6172 6773 2023 5b28 6172 glist-args #[(ar │ │ │ +00001950: 6773 2920 220b 3cac 830b 4387 c589 891c gs) ".<...C..... │ │ │ +00001960: 1a19 0b3a abbe 0b89 4113 4089 1408 73ab ...:....A.@...s. │ │ │ +00001970: 840c 12aa 6d0c c661 ab87 0b89 4113 88aa ....m..a....A... │ │ │ +00001980: 610c 3aab 865c 6eab 830c 4014 0c3a ab8d a.:..\n...@..:.. │ │ │ +00001990: 0c41 ab89 5c6e c761 ab84 0c41 4014 09c8 .A..\n.a...A@... │ │ │ +000019a0: 0c21 a411 aa3e 090b ad82 0b43 a42b 8722 .!...>.....C.+." │ │ │ +000019b0: 205b 6c61 6d62 6461 2d6c 6973 742d 6b65 [lambda-list-ke │ │ │ +000019c0: 7977 6f72 6473 2072 6573 206b 696e 6420 ywords res kind │ │ │ +000019d0: 6172 6773 2061 7267 206e 696c 2026 636c args arg nil &cl │ │ │ +000019e0: 2d64 6566 7320 266b 6579 2063 6c2d 6172 -defs &key cl-ar │ │ │ +000019f0: 676c 6973 742d 6172 6773 5d20 345d 290a glist-args] 4]). │ │ │ +00001a00: 2864 6566 616c 6961 7320 2764 6573 7472 (defalias 'destr │ │ │ +00001a10: 7563 7475 7269 6e67 2d62 696e 6420 2728 ucturing-bind '( │ │ │ +00001a20: 6d61 6372 6f20 2e20 235b 2861 7267 7320 macro . #[(args │ │ │ +00001a30: 6578 7072 2026 7265 7374 2062 6f64 7929 expr &rest body) │ │ │ +00001a40: 2022 c689 1d1c c689 1b1a c719 c808 ae81 ".............. │ │ │ +00001a50: c90e 0d5c 2288 cacb 0bcc 0d9f 440c 9fa4 ...\".......D... │ │ │ +00001a60: 0e0e a443 232d 8722 205b 6172 6773 2062 ...C#-." [args b │ │ │ +00001a70: 696e 642d 626c 6f63 6b20 6269 6e64 2d64 ind-block bind-d │ │ │ +00001a80: 6566 7320 6269 6e64 2d69 6e69 7473 2062 efs bind-inits b │ │ │ +00001a90: 696e 642d 666f 726d 7320 6269 6e64 2d6c ind-forms bind-l │ │ │ +00001aa0: 6574 7320 6e69 6c20 636c 2d6e 6f6e 6520 ets nil cl-none │ │ │ +00001ab0: 636c 2d64 6f2d 6172 676c 6973 7420 2826 cl-do-arglist (& │ │ │ +00001ac0: 6175 7829 2061 7070 656e 6420 2870 726f aux) append (pro │ │ │ +00001ad0: 676e 2920 6c65 742a 2065 7870 7220 626f gn) let* expr bo │ │ │ +00001ae0: 6479 5d20 365d 2929 0a28 6279 7465 2d63 dy] 6])).(byte-c │ │ │ +00001af0: 6f64 6520 22c1 0842 10c2 c121 ac85 c3c1 ode "..B...!.... │ │ │ +00001b00: c45c 2288 c487 2220 5b63 7572 7265 6e74 .\"..." [current │ │ │ +00001b10: 2d6c 6f61 642d 6c69 7374 2063 6c2d 6e6f -load-list cl-no │ │ │ +00001b20: 742d 746f 706c 6576 656c 2064 6566 6175 t-toplevel defau │ │ │ +00001b30: 6c74 2d62 6f75 6e64 7020 7365 742d 6465 lt-boundp set-de │ │ │ +00001b40: 6661 756c 7420 6e69 6c5d 2033 290a 2340 fault nil] 3).#@ │ │ │ +00001b50: 3239 3020 2865 7661 6c2d 7768 656e 2028 290 (eval-when ( │ │ │ +00001b60: 5748 454e 2e2e 2e29 2042 4f44 592e 2e2e WHEN...) BODY... │ │ │ +00001b70: 293a 2063 6f6e 7472 6f6c 2077 6865 6e20 ): control when │ │ │ +00001b80: 424f 4459 2069 7320 6576 616c 7561 7465 BODY is evaluate │ │ │ +00001b90: 642e 0a49 6620 6063 6f6d 7069 6c65 2720 d..If `compile' │ │ │ +00001ba0: 6973 2069 6e20 5748 454e 2c20 424f 4459 is in WHEN, BODY │ │ │ +00001bb0: 2069 7320 6576 616c 7561 7465 6420 7768 is evaluated wh │ │ │ +00001bc0: 656e 2063 6f6d 7069 6c65 6420 6174 2074 en compiled at t │ │ │ +00001bd0: 6f70 2d6c 6576 656c 2e0a 4966 2060 6c6f op-level..If `lo │ │ │ +00001be0: 6164 2720 6973 2069 6e20 5748 454e 2c20 ad' is in WHEN, │ │ │ +00001bf0: 424f 4459 2069 7320 6576 616c 7561 7465 BODY is evaluate │ │ │ +00001c00: 6420 7768 656e 206c 6f61 6465 6420 6166 d when loaded af │ │ │ +00001c10: 7465 7220 746f 702d 6c65 7665 6c20 636f ter top-level co │ │ │ +00001c20: 6d70 696c 652e 0a49 6620 6065 7661 6c27 mpile..If `eval' │ │ │ +00001c30: 2069 7320 696e 2057 4845 4e2c 2042 4f44 is in WHEN, BOD │ │ │ +00001c40: 5920 6973 2065 7661 6c75 6174 6564 2077 Y is evaluated w │ │ │ +00001c50: 6865 6e20 696e 7465 7270 7265 7465 6420 hen interpreted │ │ │ +00001c60: 6f72 2061 7420 6e6f 6e2d 746f 702d 6c65 or at non-top-le │ │ │ +00001c70: 7665 6c2e 1f0a 2864 6566 616c 6961 7320 vel...(defalias │ │ │ +00001c80: 2765 7661 6c2d 7768 656e 2027 286d 6163 'eval-when '(mac │ │ │ +00001c90: 726f 202e 2023 5b28 7768 656e 2026 7265 ro . #[(when &re │ │ │ +00001ca0: 7374 2062 6f64 7929 2022 c4c5 21ab c1c5 st body) "..!... │ │ │ +00001cb0: 20ab bd08 acba c6c7 21ac b5c8 0b73 ae83 .......!....s.. │ │ │ +00001cc0: c90b 73ca 1819 cb0b 73ac 85cc 0b73 ab94 ..s.....s....s.. │ │ │ +00001cd0: 09ab 88cd cecf 5c6e 5c22 42aa 93d0 d189 ......\n\"B..... │ │ │ +00001ce0: 5c6e 4242 42aa 8a09 ab86 d2cd 5c6e 4221 \nBBB.......\nB! │ │ │ +00001cf0: 88d1 2a87 d20b 73ac 85d3 0b73 ad83 cd5c ..*...s....s...\ │ │ │ +00001d00: 6e42 8722 205b 636c 2d6e 6f74 2d74 6f70 nB." [cl-not-top │ │ │ +00001d10: 6c65 7665 6c20 636f 6d70 2062 6f64 7920 level comp body │ │ │ +00001d20: 7768 656e 2066 626f 756e 6470 2063 6c2d when fboundp cl- │ │ │ +00001d30: 636f 6d70 696c 696e 672d 6669 6c65 2062 compiling-file b │ │ │ +00001d40: 6f75 6e64 7020 666f 722d 6566 6665 6374 oundp for-effect │ │ │ +00001d50: 2063 6f6d 7069 6c65 203a 636f 6d70 696c compile :compil │ │ │ +00001d60: 652d 746f 706c 6576 656c 2074 206c 6f61 e-toplevel t loa │ │ │ +00001d70: 6420 3a6c 6f61 642d 746f 706c 6576 656c d :load-toplevel │ │ │ +00001d80: 2070 726f 676e 206d 6170 6361 7220 636c progn mapcar cl │ │ │ +00001d90: 2d63 6f6d 7069 6c65 2d74 696d 652d 746f -compile-time-to │ │ │ +00001da0: 6f20 6966 206e 696c 2065 7661 6c20 3a65 o if nil eval :e │ │ │ +00001db0: 7865 6375 7465 5d20 3420 2823 2420 2e20 xecute] 4 (#$ . │ │ │ +00001dc0: 3639 3936 295d 2929 0a28 6465 6661 6c69 6996)])).(defali │ │ │ +00001dd0: 6173 2027 636c 2d63 6f6d 7069 6c65 2d74 as 'cl-compile-t │ │ │ +00001de0: 696d 652d 746f 6f20 235b 2866 6f72 6d29 ime-too #[(form) │ │ │ +00001df0: 2022 5c6e a239 ab86 5c6e a2c3 4eac 87c4 "\n.9..\n..N... │ │ │ +00001e00: 5c6e c508 425c 2212 5c6e a2c6 61ab 88c6 \n..B\".\n..a... │ │ │ +00001e10: c7c8 5c6e 415c 2242 875c 6ea2 c961 ab9c ..\nA\"B.\n..a.. │ │ │ +00001e20: 5c6e 4140 19ca 0973 ac85 cb09 73ab 8bc9 \nA@...s....s... │ │ │ +00001e30: cc09 425c 6e41 4142 42aa 815c 6e29 87ca ..B\nAABB..\n).. │ │ │ +00001e40: 5c6e 2188 5c6e 8722 205b 6279 7465 2d63 \n!.\n." [byte-c │ │ │ +00001e50: 6f6d 7069 6c65 2d6d 6163 726f 2d65 6e76 ompile-macro-env │ │ │ +00001e60: 6972 6f6e 6d65 6e74 2077 6865 6e20 666f ironment when fo │ │ │ +00001e70: 726d 2062 7974 652d 6875 6e6b 2d68 616e rm byte-hunk-han │ │ │ +00001e80: 646c 6572 206d 6163 726f 6578 7061 6e64 dler macroexpand │ │ │ +00001e90: 2028 6576 616c 2d77 6865 6e29 2070 726f (eval-when) pro │ │ │ +00001ea0: 676e 206d 6170 6361 7220 636c 2d63 6f6d gn mapcar cl-com │ │ │ +00001eb0: 7069 6c65 2d74 696d 652d 746f 6f20 6576 pile-time-too ev │ │ │ +00001ec0: 616c 2d77 6865 6e20 6576 616c 203a 6578 al-when eval :ex │ │ │ +00001ed0: 6563 7574 6520 636f 6d70 696c 655d 2034 ecute compile] 4 │ │ │ +00001ee0: 5d29 0a28 6279 7465 2d63 6f64 6520 22c0 ]).(byte-code ". │ │ │ +00001ef0: c121 ab87 c14b a2c2 61ab 84c3 c421 88c0 .!...K..a....!.. │ │ │ +00001f00: 8722 205b 6662 6f75 6e64 7020 6576 616c ." [fboundp eval │ │ │ +00001f10: 2d77 6865 6e2d 636f 6d70 696c 6520 6175 -when-compile au │ │ │ +00001f20: 746f 6c6f 6164 2065 7661 6c20 2864 6566 toload eval (def │ │ │ +00001f30: 6d61 6372 6f20 6576 616c 2d77 6865 6e2d macro eval-when- │ │ │ +00001f40: 636f 6d70 696c 6520 2826 7265 7374 2062 compile (&rest b │ │ │ +00001f50: 6f64 7929 2022 4c69 6b65 2060 7072 6f67 ody) "Like `prog │ │ │ +00001f60: 6e27 2c20 6275 7420 6576 616c 7561 7465 n', but evaluate │ │ │ +00001f70: 7320 7468 6520 626f 6479 2061 7420 636f s the body at co │ │ │ +00001f80: 6d70 696c 6520 7469 6d65 2e5c 6e54 6865 mpile time.\nThe │ │ │ +00001f90: 2072 6573 756c 7420 6f66 2074 6865 2062 result of the b │ │ │ +00001fa0: 6f64 7920 6170 7065 6172 7320 746f 2074 ody appears to t │ │ │ +00001fb0: 6865 2063 6f6d 7069 6c65 7220 6173 2061 he compiler as a │ │ │ +00001fc0: 2071 756f 7465 6420 636f 6e73 7461 6e74 quoted constant │ │ │ +00001fd0: 2e22 2028 6c69 7374 2027 7175 6f74 6520 ." (list 'quote │ │ │ +00001fe0: 2865 7661 6c20 2863 6f6e 7320 2770 726f (eval (cons 'pro │ │ │ +00001ff0: 676e 2062 6f64 7929 2929 295d 2032 290a gn body))))] 2). │ │ │ +00002000: 2340 3132 3120 4c69 6b65 2060 7072 6f67 #@121 Like `prog │ │ │ +00002010: 6e27 2c20 6275 7420 6576 616c 7561 7465 n', but evaluate │ │ │ +00002020: 7320 7468 6520 626f 6479 2061 7420 6c6f s the body at lo │ │ │ +00002030: 6164 2074 696d 652e 0a54 6865 2072 6573 ad time..The res │ │ │ +00002040: 756c 7420 6f66 2074 6865 2062 6f64 7920 ult of the body │ │ │ +00002050: 6170 7065 6172 7320 746f 2074 6865 2063 appears to the c │ │ │ +00002060: 6f6d 7069 6c65 7220 6173 2061 2071 756f ompiler as a quo │ │ │ +00002070: 7465 6420 636f 6e73 7461 6e74 2e1f 0a28 ted constant...( │ │ │ +00002080: 6465 6661 6c69 6173 2027 6c6f 6164 2d74 defalias 'load-t │ │ │ +00002090: 696d 652d 7661 6c75 6520 2728 6d61 6372 ime-value '(macr │ │ │ +000020a0: 6f20 2e20 235b 2866 6f72 6d20 266f 7074 o . #[(form &opt │ │ │ +000020b0: 696f 6e61 6c20 7265 6164 2d6f 6e6c 7929 ional read-only) │ │ │ +000020c0: 2022 c320 abbd c4c5 211a c1c6 5c6e 4408 ". ....!...\nD. │ │ │ +000020d0: 4519 c7c8 21ab a0c9 ca21 ab9b c9cb 21ab E...!....!....!. │ │ │ +000020e0: 96cc cdce cfd0 c6cc 4b44 45cc c609 4444 ........KDE...DD │ │ │ +000020f0: d1af 054d 88aa 86d2 09d3 4a5c 2288 d4c6 ...M......J\"... │ │ │ +00002100: 5c6e 2a44 4487 c6d5 0821 4487 2220 5b66 \n*DD....!D." [f │ │ │ +00002110: 6f72 6d20 7365 7420 7465 6d70 2063 6c2d orm set temp cl- │ │ │ +00002120: 636f 6d70 696c 696e 672d 6669 6c65 2067 compiling-file g │ │ │ +00002130: 656e 7465 6d70 2022 2d2d 636c 2d6c 6f61 entemp "--cl-loa │ │ │ +00002140: 642d 7469 6d65 2d2d 2220 7175 6f74 6520 d-time--" quote │ │ │ +00002150: 6662 6f75 6e64 7020 6279 7465 2d63 6f6d fboundp byte-com │ │ │ +00002160: 7069 6c65 2d66 696c 652d 666f 726d 2d64 pile-file-form-d │ │ │ +00002170: 6566 6d75 6d62 6c65 2062 6f75 6e64 7020 efmumble boundp │ │ │ +00002180: 7468 6973 2d6b 696e 6420 7468 6174 2d6f this-kind that-o │ │ │ +00002190: 6e65 2062 7974 652d 636f 6d70 696c 652d ne byte-compile- │ │ │ +000021a0: 6669 6c65 2d66 6f72 6d20 6c61 6d62 6461 file-form lambda │ │ │ +000021b0: 2028 666f 726d 2920 6673 6574 2027 6279 (form) fset 'by │ │ │ +000021c0: 7465 2d63 6f6d 7069 6c65 2d66 696c 652d te-compile-file- │ │ │ +000021d0: 666f 726d 2028 6279 7465 2d63 6f6d 7069 form (byte-compi │ │ │ +000021e0: 6c65 2d66 696c 652d 666f 726d 2066 6f72 le-file-form for │ │ │ +000021f0: 6d29 2070 7269 6e74 2062 7974 652d 636f m) print byte-co │ │ │ +00002200: 6d70 696c 652d 6f75 7470 7574 2d62 7566 mpile-output-buf │ │ │ +00002210: 6665 7220 7379 6d62 6f6c 2d76 616c 7565 fer symbol-value │ │ │ +00002220: 2065 7661 6c5d 2037 2028 2324 202e 2038 eval] 7 (#$ . 8 │ │ │ +00002230: 3139 3829 5d29 290a 2340 3436 3120 2863 198)])).#@461 (c │ │ │ +00002240: 6173 6520 4558 5052 2043 4c41 5553 4553 ase EXPR CLAUSES │ │ │ +00002250: 2e2e 2e29 3a20 6576 616c 7320 4558 5052 ...): evals EXPR │ │ │ +00002260: 2c20 6368 6f6f 7365 7320 6672 6f6d 2043 , chooses from C │ │ │ +00002270: 4c41 5553 4553 206f 6e20 7468 6174 2076 LAUSES on that v │ │ │ +00002280: 616c 7565 2e0a 4561 6368 2063 6c61 7573 alue..Each claus │ │ │ +00002290: 6520 6c6f 6f6b 7320 6c69 6b65 2028 4b45 e looks like (KE │ │ │ +000022a0: 594c 4953 5420 424f 4459 2e2e 2e29 2e20 YLIST BODY...). │ │ │ +000022b0: 2045 5850 5220 6973 2065 7661 6c75 6174 EXPR is evaluat │ │ │ +000022c0: 6564 2061 6e64 2063 6f6d 7061 7265 640a ed and compared. │ │ │ +000022d0: 6167 6169 6e73 7420 6561 6368 206b 6579 against each key │ │ │ +000022e0: 2069 6e20 6561 6368 204b 4559 4c49 5354 in each KEYLIST │ │ │ +000022f0: 3b20 7468 6520 636f 7272 6573 706f 6e64 ; the correspond │ │ │ +00002300: 696e 6720 424f 4459 2069 7320 6576 616c ing BODY is eval │ │ │ +00002310: 7561 7465 642e 0a49 6620 6e6f 2063 6c61 uated..If no cla │ │ │ +00002320: 7573 6520 7375 6363 6565 6473 2c20 6361 use succeeds, ca │ │ │ +00002330: 7365 2072 6574 7572 6e73 206e 696c 2e20 se returns nil. │ │ │ +00002340: 2041 2073 696e 676c 6520 6174 6f6d 206d A single atom m │ │ │ +00002350: 6179 2062 6520 7573 6564 2069 6e0a 706c ay be used in.pl │ │ │ +00002360: 6163 6520 6f66 2061 204b 4559 4c49 5354 ace of a KEYLIST │ │ │ +00002370: 206f 6620 6f6e 6520 6174 6f6d 2e20 2041 of one atom. A │ │ │ +00002380: 204b 4559 4c49 5354 206f 6620 6074 2720 KEYLIST of `t' │ │ │ +00002390: 6f72 2060 6f74 6865 7277 6973 6527 2069 or `otherwise' i │ │ │ +000023a0: 730a 616c 6c6f 7765 6420 6f6e 6c79 2069 s.allowed only i │ │ │ +000023b0: 6e20 7468 6520 6669 6e61 6c20 636c 6175 n the final clau │ │ │ +000023c0: 7365 2c20 616e 6420 6d61 7463 6865 7320 se, and matches │ │ │ +000023d0: 6966 206e 6f20 6f74 6865 7220 6b65 7973 if no other keys │ │ │ +000023e0: 206d 6174 6368 2e0a 4b65 7920 7661 6c75 match..Key valu │ │ │ +000023f0: 6573 2061 7265 2063 6f6d 7061 7265 6420 es are compared │ │ │ +00002400: 6279 2060 6571 6c27 2e1f 0a28 6465 6661 by `eql'...(defa │ │ │ +00002410: 6c69 6173 2027 6361 7365 2027 286d 6163 lias 'case '(mac │ │ │ +00002420: 726f 202e 2023 5b28 6578 7072 2026 7265 ro . #[(expr &re │ │ │ +00002430: 7374 2063 6c61 7573 6573 2920 22c6 0dc7 st clauses) "... │ │ │ +00002440: 5c22 ab83 0daa 82c8 201c c919 ca5c 6e21 \"...... ....\n! │ │ │ +00002450: 4018 cbcc cd5c 6e5c 2242 1b0c 0d61 ab83 @....\n\"B...a.. │ │ │ +00002460: 0baa 87ce 0c0d 4443 0b45 2c87 2220 5b6c ......DC.E,." [l │ │ │ +00002470: 6173 742d 636c 6175 7365 2068 6561 642d ast-clause head- │ │ │ +00002480: 6c69 7374 2063 6c61 7573 6573 2062 6f64 list clauses bod │ │ │ +00002490: 7920 7465 6d70 2065 7870 7220 636c 2d73 y temp expr cl-s │ │ │ +000024a0: 696d 706c 652d 6578 7072 2d70 2033 2067 imple-expr-p 3 g │ │ │ +000024b0: 656e 7379 6d20 6e69 6c20 6c61 7374 2063 ensym nil last c │ │ │ +000024c0: 6f6e 6420 6d61 7063 6172 2023 5b28 6329 ond mapcar #[(c) │ │ │ +000024d0: 2022 0b40 c473 ab8e 0b08 61ac 86c5 c60b ".@.s....a..... │ │ │ +000024e0: 405c 2288 c7aa bd0b 40c8 61ab 8bc5 c909 @\".....@.a..... │ │ │ +000024f0: cacb 5c6e 2144 46aa ac0b 403c ab8f cc0b ..\n!DF...@<.... │ │ │ +00002500: 405c 6e5c 2212 cd09 ca0b 4044 45aa 980b @\n\".....@DE... │ │ │ +00002510: 405c 6e73 ab86 c5ce 0b40 5c22 880b 405c @\ns.....@\"..@\ │ │ │ +00002520: 6e42 12cf 09ca 0b40 4445 0b41 ae81 d042 nB.....@DE.A...B │ │ │ +00002530: 8722 205b 6c61 7374 2d63 6c61 7573 6520 ." [last-clause │ │ │ +00002540: 7465 6d70 2068 6561 642d 6c69 7374 2063 temp head-list c │ │ │ +00002550: 2028 7420 6f74 6865 7277 6973 6529 2065 (t otherwise) e │ │ │ +00002560: 7272 6f72 2022 6025 7327 2069 7320 616c rror "`%s' is al │ │ │ +00002570: 6c6f 7765 6420 6f6e 6c79 2061 7320 7468 lowed only as th │ │ │ +00002580: 6520 6c61 7374 2063 6173 6520 636c 6175 e last case clau │ │ │ +00002590: 7365 2220 7420 6563 6173 652d 6572 726f se" t ecase-erro │ │ │ +000025a0: 722d 666c 6167 2022 6563 6173 6520 6661 r-flag "ecase fa │ │ │ +000025b0: 696c 6564 3a20 2573 2c20 2573 2220 7175 iled: %s, %s" qu │ │ │ +000025c0: 6f74 6520 7265 7665 7273 6520 6170 7065 ote reverse appe │ │ │ +000025d0: 6e64 206d 656d 6265 722a 2022 4475 706c nd member* "Dupl │ │ │ +000025e0: 6963 6174 6520 6b65 7920 696e 2063 6173 icate key in cas │ │ │ +000025f0: 653a 2025 7322 2065 716c 2028 6e69 6c29 e: %s" eql (nil) │ │ │ +00002600: 5d20 365d 206c 6574 5d20 3420 2823 2420 ] 6] let] 4 (#$ │ │ │ +00002610: 2e20 3837 3636 295d 2929 0a23 4031 3033 . 8766)])).#@103 │ │ │ +00002620: 2028 6563 6173 6520 4558 5052 2043 4c41 (ecase EXPR CLA │ │ │ +00002630: 5553 4553 2e2e 2e29 3a20 6c69 6b65 2060 USES...): like ` │ │ │ +00002640: 6361 7365 272c 2062 7574 2065 7272 6f72 case', but error │ │ │ +00002650: 2069 6620 6e6f 2063 6173 6520 6669 7473 if no case fits │ │ │ +00002660: 2e0a 606f 7468 6572 7769 7365 272d 636c ..`otherwise'-cl │ │ │ +00002670: 6175 7365 7320 6172 6520 6e6f 7420 616c auses are not al │ │ │ +00002680: 6c6f 7765 642e 1f0a 2864 6566 616c 6961 lowed...(defalia │ │ │ +00002690: 7320 2765 6361 7365 2027 286d 6163 726f s 'ecase '(macro │ │ │ +000026a0: 202e 2023 5b28 6578 7072 2026 7265 7374 . #[(expr &rest │ │ │ +000026b0: 2063 6c61 7573 6573 2920 22c3 5c6e b7ae clauses) ".\n.. │ │ │ +000026c0: 83c4 5c6e b789 19ab 86c5 c609 405c 2288 ..\n........@\". │ │ │ +000026d0: 29c7 08c8 5c6e c95c 2242 4287 2220 5b65 )...\n.\"BB." [e │ │ │ +000026e0: 7870 7220 6469 7361 6c6c 6f77 6564 2063 xpr disallowed c │ │ │ +000026f0: 6c61 7573 6573 2074 206f 7468 6572 7769 lauses t otherwi │ │ │ +00002700: 7365 2065 7272 6f72 2022 6025 7327 2069 se error "`%s' i │ │ │ +00002710: 7320 6e6f 7420 616c 6c6f 7765 6420 696e s not allowed in │ │ │ +00002720: 2065 6361 7365 2220 6361 7365 2061 7070 ecase" case app │ │ │ +00002730: 656e 6420 2828 6563 6173 652d 6572 726f end ((ecase-erro │ │ │ +00002740: 722d 666c 6167 2929 5d20 3620 2823 2420 r-flag))] 6 (#$ │ │ │ +00002750: 2e20 3937 3631 295d 2929 0a23 4033 3438 . 9761)])).#@348 │ │ │ +00002760: 2028 7479 7065 6361 7365 2045 5850 5220 (typecase EXPR │ │ │ +00002770: 434c 4155 5345 532e 2e2e 293a 2065 7661 CLAUSES...): eva │ │ │ +00002780: 6c73 2045 5850 522c 2063 686f 6f73 6573 ls EXPR, chooses │ │ │ +00002790: 2066 726f 6d20 434c 4155 5345 5320 6f6e from CLAUSES on │ │ │ +000027a0: 2074 6861 7420 7661 6c75 652e 0a45 6163 that value..Eac │ │ │ +000027b0: 6820 636c 6175 7365 206c 6f6f 6b73 206c h clause looks l │ │ │ +000027c0: 696b 6520 2854 5950 4520 424f 4459 2e2e ike (TYPE BODY.. │ │ │ +000027d0: 2e29 2e20 2045 5850 5220 6973 2065 7661 .). EXPR is eva │ │ │ +000027e0: 6c75 6174 6564 2061 6e64 2c20 6966 2069 luated and, if i │ │ │ +000027f0: 740a 7361 7469 7366 6965 7320 5459 5045 t.satisfies TYPE │ │ │ +00002800: 2c20 7468 6520 636f 7272 6573 706f 6e64 , the correspond │ │ │ +00002810: 696e 6720 424f 4459 2069 7320 6576 616c ing BODY is eval │ │ │ +00002820: 7561 7465 642e 2020 4966 206e 6f20 636c uated. If no cl │ │ │ +00002830: 6175 7365 2073 7563 6365 6564 732c 0a74 ause succeeds,.t │ │ │ +00002840: 7970 6563 6173 6520 7265 7475 726e 7320 ypecase returns │ │ │ +00002850: 6e69 6c2e 2020 4120 5459 5045 206f 6620 nil. A TYPE of │ │ │ +00002860: 6074 2720 6f72 2060 6f74 6865 7277 6973 `t' or `otherwis │ │ │ +00002870: 6527 2069 7320 616c 6c6f 7765 6420 6f6e e' is allowed on │ │ │ +00002880: 6c79 2069 6e20 7468 650a 6669 6e61 6c20 ly in the.final │ │ │ +00002890: 636c 6175 7365 2c20 616e 6420 6d61 7463 clause, and matc │ │ │ +000028a0: 6865 7320 6966 206e 6f20 6f74 6865 7220 hes if no other │ │ │ +000028b0: 6b65 7973 206d 6174 6368 2e1f 0a28 6465 keys match...(de │ │ │ +000028c0: 6661 6c69 6173 2027 7479 7065 6361 7365 falias 'typecase │ │ │ +000028d0: 2027 286d 6163 726f 202e 2023 5b28 6578 '(macro . #[(ex │ │ │ +000028e0: 7072 2026 7265 7374 2063 6c61 7573 6573 pr &rest clauses │ │ │ +000028f0: 2920 22c5 0cc6 5c22 ab83 0caa 82c7 201b ) "...\"...... . │ │ │ +00002900: c819 c9ca cb08 5c22 421a 0b0c 61ab 835c ......\"B...a..\ │ │ │ +00002910: 6eaa 87cc 0b0c 4443 5c6e 452b 8722 205b n.....DC\nE+." [ │ │ │ +00002920: 636c 6175 7365 7320 7479 7065 2d6c 6973 clauses type-lis │ │ │ +00002930: 7420 626f 6479 2074 656d 7020 6578 7072 t body temp expr │ │ │ +00002940: 2063 6c2d 7369 6d70 6c65 2d65 7870 722d cl-simple-expr- │ │ │ +00002950: 7020 3320 6765 6e73 796d 206e 696c 2063 p 3 gensym nil c │ │ │ +00002960: 6f6e 6420 6d61 7063 6172 2023 5b28 6329 ond mapcar #[(c) │ │ │ +00002970: 2022 5c6e 40c3 61ab 83c4 aa9b 5c6e 40c5 "\n@.a.....\n@. │ │ │ +00002980: 61ab 8bc6 c708 c8c9 0921 4446 aa8a 5c6e a........!DF..\n │ │ │ +00002990: 4009 4211 ca08 5c6e 405c 225c 6e41 ae81 @.B...\n@\"\nA.. │ │ │ +000029a0: cb42 8722 205b 7465 6d70 2074 7970 652d .B." [temp type- │ │ │ +000029b0: 6c69 7374 2063 206f 7468 6572 7769 7365 list c otherwise │ │ │ +000029c0: 2074 2065 6361 7365 2d65 7272 6f72 2d66 t ecase-error-f │ │ │ +000029d0: 6c61 6720 6572 726f 7220 2265 7479 7065 lag error "etype │ │ │ +000029e0: 6361 7365 2066 6169 6c65 643a 2025 732c case failed: %s, │ │ │ +000029f0: 2025 7322 2071 756f 7465 2072 6576 6572 %s" quote rever │ │ │ +00002a00: 7365 2063 6c2d 6d61 6b65 2d74 7970 652d se cl-make-type- │ │ │ +00002a10: 7465 7374 2028 6e69 6c29 5d20 365d 206c test (nil)] 6] l │ │ │ +00002a20: 6574 5d20 3420 2823 2420 2e20 3130 3038 et] 4 (#$ . 1008 │ │ │ +00002a30: 3129 5d29 290a 2340 3131 3120 2865 7479 1)])).#@111 (ety │ │ │ +00002a40: 7065 6361 7365 2045 5850 5220 434c 4155 pecase EXPR CLAU │ │ │ +00002a50: 5345 532e 2e2e 293a 206c 696b 6520 6074 SES...): like `t │ │ │ +00002a60: 7970 6563 6173 6527 2c20 6275 7420 6572 ypecase', but er │ │ │ +00002a70: 726f 7220 6966 206e 6f20 6361 7365 2066 ror if no case f │ │ │ +00002a80: 6974 732e 0a60 6f74 6865 7277 6973 6527 its..`otherwise' │ │ │ +00002a90: 2d63 6c61 7573 6573 2061 7265 206e 6f74 -clauses are not │ │ │ +00002aa0: 2061 6c6c 6f77 6564 2e1f 0a28 6465 6661 allowed...(defa │ │ │ +00002ab0: 6c69 6173 2027 6574 7970 6563 6173 6520 lias 'etypecase │ │ │ +00002ac0: 2728 6d61 6372 6f20 2e20 235b 2865 7870 '(macro . #[(exp │ │ │ +00002ad0: 7220 2672 6573 7420 636c 6175 7365 7329 r &rest clauses) │ │ │ +00002ae0: 2022 c209 c308 c45c 2242 4287 2220 5b63 ".....\"BB." [c │ │ │ +00002af0: 6c61 7573 6573 2065 7870 7220 7479 7065 lauses expr type │ │ │ +00002b00: 6361 7365 2061 7070 656e 6420 2828 6563 case append ((ec │ │ │ +00002b10: 6173 652d 6572 726f 722d 666c 6167 2929 ase-error-flag)) │ │ │ +00002b20: 5d20 3520 2823 2420 2e20 3130 3831 3229 ] 5 (#$ . 10812) │ │ │ +00002b30: 5d29 290a 2340 3532 3620 2862 6c6f 636b ])).#@526 (block │ │ │ +00002b40: 204e 414d 4520 424f 4459 2e2e 2e29 3a20 NAME BODY...): │ │ │ +00002b50: 6465 6669 6e65 2061 206c 6578 6963 616c define a lexical │ │ │ +00002b60: 6c79 2d73 636f 7065 6420 626c 6f63 6b20 ly-scoped block │ │ │ +00002b70: 6e61 6d65 6420 4e41 4d45 2e0a 4e41 4d45 named NAME..NAME │ │ │ +00002b80: 206d 6179 2062 6520 616e 7920 7379 6d62 may be any symb │ │ │ +00002b90: 6f6c 2e20 2043 6f64 6520 696e 7369 6465 ol. Code inside │ │ │ +00002ba0: 2074 6865 2042 4f44 5920 666f 726d 7320 the BODY forms │ │ │ +00002bb0: 6361 6e20 6361 6c6c 2060 7265 7475 726e can call `return │ │ │ +00002bc0: 2d66 726f 6d27 0a74 6f20 6a75 6d70 2070 -from'.to jump p │ │ │ +00002bd0: 7265 6d61 7475 7265 6c79 206f 7574 206f rematurely out o │ │ │ +00002be0: 6620 7468 6520 626c 6f63 6b2e 2020 5468 f the block. Th │ │ │ +00002bf0: 6973 2064 6966 6665 7273 2066 726f 6d20 is differs from │ │ │ +00002c00: 6063 6174 6368 2720 616e 6420 6074 6872 `catch' and `thr │ │ │ +00002c10: 6f77 270a 696e 2074 776f 2072 6573 7065 ow'.in two respe │ │ │ +00002c20: 6374 733a 2020 4669 7273 742c 2074 6865 cts: First, the │ │ │ +00002c30: 204e 414d 4520 6973 2061 6e20 756e 6576 NAME is an unev │ │ │ +00002c40: 616c 7561 7465 6420 7379 6d62 6f6c 2072 aluated symbol r │ │ │ +00002c50: 6174 6865 7220 7468 616e 2061 0a71 756f ather than a.quo │ │ │ +00002c60: 7465 6420 7379 6d62 6f6c 206f 7220 6f74 ted symbol or ot │ │ │ +00002c70: 6865 7220 666f 726d 3b20 616e 6420 7365 her form; and se │ │ │ +00002c80: 636f 6e64 2c20 4e41 4d45 2069 7320 6c65 cond, NAME is le │ │ │ +00002c90: 7869 6361 6c6c 7920 7261 7468 6572 2074 xically rather t │ │ │ +00002ca0: 6861 6e0a 6479 6e61 6d69 6361 6c6c 7920 han.dynamically │ │ │ +00002cb0: 7363 6f70 6564 3a20 204f 6e6c 7920 7265 scoped: Only re │ │ │ +00002cc0: 6665 7265 6e63 6573 2074 6f20 6974 2077 ferences to it w │ │ │ +00002cd0: 6974 6869 6e20 424f 4459 2077 696c 6c20 ithin BODY will │ │ │ +00002ce0: 776f 726b 2e20 2054 6865 7365 0a72 6566 work. These.ref │ │ │ +00002cf0: 6572 656e 6365 7320 6d61 7920 6170 7065 erences may appe │ │ │ +00002d00: 6172 2069 6e73 6964 6520 6d61 6372 6f20 ar inside macro │ │ │ +00002d10: 6578 7061 6e73 696f 6e73 2c20 6275 7420 expansions, but │ │ │ +00002d20: 6e6f 7420 696e 7369 6465 2066 756e 6374 not inside funct │ │ │ +00002d30: 696f 6e73 0a63 616c 6c65 6420 6672 6f6d ions.called from │ │ │ +00002d40: 2042 4f44 592e 1f0a 2864 6566 616c 6961 BODY...(defalia │ │ │ +00002d50: 7320 2762 6c6f 636b 2027 286d 6163 726f s 'block '(macro │ │ │ +00002d60: 202e 2023 5b28 6e61 6d65 2026 7265 7374 . #[(name &rest │ │ │ +00002d70: 2062 6f64 7929 2022 c2c3 0942 21ab 84c3 body) "...B!... │ │ │ +00002d80: 0942 87c4 c5c6 c7c8 c908 5c22 2144 0942 .B........\"!D.B │ │ │ +00002d90: 4244 8722 205b 6e61 6d65 2062 6f64 7920 BD." [name body │ │ │ +00002da0: 636c 2d73 6166 652d 6578 7072 2d70 2070 cl-safe-expr-p p │ │ │ +00002db0: 726f 676e 2063 6c2d 626c 6f63 6b2d 7772 rogn cl-block-wr │ │ │ +00002dc0: 6170 7065 7220 6361 7463 6820 7175 6f74 apper catch quot │ │ │ +00002dd0: 6520 696e 7465 726e 2066 6f72 6d61 7420 e intern format │ │ │ +00002de0: 222d 2d63 6c2d 626c 6f63 6b2d 2573 2d2d "--cl-block-%s-- │ │ │ +00002df0: 225d 2037 2028 2324 202e 2031 3130 3636 "] 7 (#$ . 11066 │ │ │ +00002e00: 295d 2929 0a28 6279 7465 2d63 6f64 6520 )])).(byte-code │ │ │ +00002e10: 22c1 0842 10c2 c121 ac85 c3c1 c45c 2288 "..B...!.....\". │ │ │ +00002e20: c5c6 c7c8 2387 2220 5b63 7572 7265 6e74 ....#." [current │ │ │ +00002e30: 2d6c 6f61 642d 6c69 7374 2063 6c2d 6163 -load-list cl-ac │ │ │ +00002e40: 7469 7665 2d62 6c6f 636b 2d6e 616d 6573 tive-block-names │ │ │ +00002e50: 2064 6566 6175 6c74 2d62 6f75 6e64 7020 default-boundp │ │ │ +00002e60: 7365 742d 6465 6661 756c 7420 6e69 6c20 set-default nil │ │ │ +00002e70: 7075 7420 636c 2d62 6c6f 636b 2d77 7261 put cl-block-wra │ │ │ +00002e80: 7070 6572 2062 7974 652d 636f 6d70 696c pper byte-compil │ │ │ +00002e90: 6520 636c 2d62 7974 652d 636f 6d70 696c e cl-byte-compil │ │ │ +00002ea0: 652d 626c 6f63 6b5d 2034 290a 2864 6566 e-block] 4).(def │ │ │ +00002eb0: 616c 6961 7320 2763 6c2d 6279 7465 2d63 alias 'cl-byte-c │ │ │ +00002ec0: 6f6d 7069 6c65 2d62 6c6f 636b 2023 5b28 ompile-block #[( │ │ │ +00002ed0: 636c 2d66 6f72 6d29 2022 c4c5 21ab ad0b cl-form) "..!... │ │ │ +00002ee0: 4140 4140 4140 c642 8919 0842 18c7 c80b A@A@A@.B...B.... │ │ │ +00002ef0: 4140 4141 4221 1a09 41ab 8cc9 ca0b 4140 A@AAB!..A.....A@ │ │ │ +00002f00: 4140 5c6e 4521 aa83 c95c 6e21 2b87 c90b A@\nE!...\n!+... │ │ │ +00002f10: 4140 2187 2220 5b63 6c2d 6163 7469 7665 A@!." [cl-active │ │ │ +00002f20: 2d62 6c6f 636b 2d6e 616d 6573 2063 6c2d -block-names cl- │ │ │ +00002f30: 656e 7472 7920 636c 2d62 6f64 7920 636c entry cl-body cl │ │ │ +00002f40: 2d66 6f72 6d20 6662 6f75 6e64 7020 6279 -form fboundp by │ │ │ +00002f50: 7465 2d63 6f6d 7069 6c65 2d66 6f72 6d2d te-compile-form- │ │ │ +00002f60: 646f 2d65 6666 6563 7420 6e69 6c20 6279 do-effect nil by │ │ │ +00002f70: 7465 2d63 6f6d 7069 6c65 2d74 6f70 2d6c te-compile-top-l │ │ │ +00002f80: 6576 656c 2070 726f 676e 2062 7974 652d evel progn byte- │ │ │ +00002f90: 636f 6d70 696c 652d 666f 726d 2063 6174 compile-form cat │ │ │ +00002fa0: 6368 5d20 355d 290a 2870 7574 2027 636c ch] 5]).(put 'cl │ │ │ +00002fb0: 2d62 6c6f 636b 2d74 6872 6f77 2027 6279 -block-throw 'by │ │ │ +00002fc0: 7465 2d63 6f6d 7069 6c65 2027 636c 2d62 te-compile 'cl-b │ │ │ +00002fd0: 7974 652d 636f 6d70 696c 652d 7468 726f yte-compile-thro │ │ │ +00002fe0: 7729 0a28 6465 6661 6c69 6173 2027 636c w).(defalias 'cl │ │ │ +00002ff0: 2d62 7974 652d 636f 6d70 696c 652d 7468 -byte-compile-th │ │ │ +00003000: 726f 7720 235b 2863 6c2d 666f 726d 2920 row #[(cl-form) │ │ │ +00003010: 225c 6e41 4041 4008 b789 19ab 8409 c3a1 "\nA@A@......... │ │ │ +00003020: 8829 c4c5 5c6e 4142 2187 2220 5b63 6c2d .)..\nAB!." [cl- │ │ │ +00003030: 6163 7469 7665 2d62 6c6f 636b 2d6e 616d active-block-nam │ │ │ +00003040: 6573 2063 6c2d 666f 756e 6420 636c 2d66 es cl-found cl-f │ │ │ +00003050: 6f72 6d20 7420 6279 7465 2d63 6f6d 7069 orm t byte-compi │ │ │ +00003060: 6c65 2d6e 6f72 6d61 6c2d 6361 6c6c 2074 le-normal-call t │ │ │ +00003070: 6872 6f77 5d20 345d 290a 2340 3130 3320 hrow] 4]).#@103 │ │ │ +00003080: 2872 6574 7572 6e20 5b52 4553 554c 545d (return [RESULT] │ │ │ +00003090: 293a 2072 6574 7572 6e20 6672 6f6d 2074 ): return from t │ │ │ +000030a0: 6865 2062 6c6f 636b 206e 616d 6564 206e he block named n │ │ │ +000030b0: 696c 2e0a 5468 6973 2069 7320 6571 7569 il..This is equi │ │ │ +000030c0: 7661 6c65 6e74 2074 6f20 6028 7265 7475 valent to `(retu │ │ │ +000030d0: 726e 2d66 726f 6d20 6e69 6c20 5245 5355 rn-from nil RESU │ │ │ +000030e0: 4c54 2927 2e1f 0a28 6465 6661 6c69 6173 LT)'...(defalias │ │ │ +000030f0: 2027 7265 7475 726e 2027 286d 6163 726f 'return '(macro │ │ │ +00003100: 202e 2023 5b28 266f 7074 696f 6e61 6c20 . #[(&optional │ │ │ +00003110: 7265 7329 2022 c1c2 0845 8722 205b 7265 res) "...E." [re │ │ │ +00003120: 7320 7265 7475 726e 2d66 726f 6d20 6e69 s return-from ni │ │ │ +00003130: 6c5d 2033 2028 2324 202e 2031 3234 3136 l] 3 (#$ . 12416 │ │ │ +00003140: 295d 2929 0a23 4033 3235 2028 7265 7475 )])).#@325 (retu │ │ │ +00003150: 726e 2d66 726f 6d20 4e41 4d45 205b 5245 rn-from NAME [RE │ │ │ +00003160: 5355 4c54 5d29 3a20 7265 7475 726e 2066 SULT]): return f │ │ │ +00003170: 726f 6d20 7468 6520 626c 6f63 6b20 6e61 rom the block na │ │ │ +00003180: 6d65 6420 4e41 4d45 2e0a 5468 6973 206a med NAME..This j │ │ │ +00003190: 756d 7073 206f 7574 2074 6f20 7468 6520 umps out to the │ │ │ +000031a0: 696e 6e65 726d 6f73 7420 656e 636c 6f73 innermost enclos │ │ │ +000031b0: 696e 6720 6028 626c 6f63 6b20 4e41 4d45 ing `(block NAME │ │ │ +000031c0: 202e 2e2e 2927 2066 6f72 6d2c 0a72 6574 ...)' form,.ret │ │ │ +000031d0: 7572 6e69 6e67 2052 4553 554c 5420 6672 urning RESULT fr │ │ │ +000031e0: 6f6d 2074 6861 7420 666f 726d 2028 6f72 om that form (or │ │ │ +000031f0: 206e 696c 2069 6620 5245 5355 4c54 2069 nil if RESULT i │ │ │ +00003200: 7320 6f6d 6974 7465 6429 2e0a 5468 6973 s omitted)..This │ │ │ +00003210: 2069 7320 636f 6d70 6174 6962 6c65 2077 is compatible w │ │ │ +00003220: 6974 6820 436f 6d6d 6f6e 204c 6973 702c ith Common Lisp, │ │ │ +00003230: 2062 7574 206e 6f74 6520 7468 6174 2060 but note that ` │ │ │ +00003240: 6465 6675 6e27 2061 6e64 0a60 6465 666d defun' and.`defm │ │ │ +00003250: 6163 726f 2720 646f 206e 6f74 2063 7265 acro' do not cre │ │ │ +00003260: 6174 6520 696d 706c 6963 6974 2062 6c6f ate implicit blo │ │ │ +00003270: 636b 7320 6173 2074 6865 7920 646f 2069 cks as they do i │ │ │ +00003280: 6e20 436f 6d6d 6f6e 204c 6973 702e 1f0a n Common Lisp... │ │ │ +00003290: 2864 6566 616c 6961 7320 2772 6574 7572 (defalias 'retur │ │ │ +000032a0: 6e2d 6672 6f6d 2027 286d 6163 726f 202e n-from '(macro . │ │ │ +000032b0: 2023 5b28 6e61 6d65 2026 6f70 7469 6f6e #[(name &option │ │ │ +000032c0: 616c 2072 6573 2920 22c3 c4c5 095c 2221 al res) "....\"! │ │ │ +000032d0: 1ac6 c75c 6e44 0845 2987 2220 5b72 6573 ...\nD.E)." [res │ │ │ +000032e0: 206e 616d 6520 6e61 6d65 3220 696e 7465 name name2 inte │ │ │ +000032f0: 726e 2066 6f72 6d61 7420 222d 2d63 6c2d rn format "--cl- │ │ │ +00003300: 626c 6f63 6b2d 2573 2d2d 2220 636c 2d62 block-%s--" cl-b │ │ │ +00003310: 6c6f 636b 2d74 6872 6f77 2071 756f 7465 lock-throw quote │ │ │ +00003320: 5d20 3420 2823 2420 2e20 3132 3631 3929 ] 4 (#$ . 12619) │ │ │ +00003330: 5d29 290a 2340 3732 3520 286c 6f6f 7020 ])).#@725 (loop │ │ │ +00003340: 434c 4155 5345 2e2e 2e29 3a20 5468 6520 CLAUSE...): The │ │ │ +00003350: 436f 6d6d 6f6e 204c 6973 7020 606c 6f6f Common Lisp `loo │ │ │ +00003360: 7027 206d 6163 726f 2e0a 5661 6c69 6420 p' macro..Valid │ │ │ +00003370: 636c 6175 7365 7320 6172 653a 0a20 2066 clauses are:. f │ │ │ +00003380: 6f72 2056 4152 2066 726f 6d2f 7570 6672 or VAR from/upfr │ │ │ +00003390: 6f6d 2f64 6f77 6e66 726f 6d20 4e55 4d20 om/downfrom NUM │ │ │ +000033a0: 746f 2f75 7074 6f2f 646f 776e 746f 2f61 to/upto/downto/a │ │ │ +000033b0: 626f 7665 2f62 656c 6f77 204e 554d 2062 bove/below NUM b │ │ │ +000033c0: 7920 4e55 4d2c 0a20 2066 6f72 2056 4152 y NUM,. for VAR │ │ │ +000033d0: 2069 6e20 4c49 5354 2062 7920 4655 4e43 in LIST by FUNC │ │ │ +000033e0: 2c20 666f 7220 5641 5220 6f6e 204c 4953 , for VAR on LIS │ │ │ +000033f0: 5420 6279 2046 554e 432c 2066 6f72 2056 T by FUNC, for V │ │ │ +00003400: 4152 203d 2049 4e49 5420 7468 656e 2045 AR = INIT then E │ │ │ +00003410: 5850 522c 0a20 2066 6f72 2056 4152 2061 XPR,. for VAR a │ │ │ +00003420: 6372 6f73 7320 4152 5241 592c 2072 6570 cross ARRAY, rep │ │ │ +00003430: 6561 7420 4e55 4d2c 2077 6974 6820 5641 eat NUM, with VA │ │ │ +00003440: 5220 3d20 494e 4954 2c20 7768 696c 6520 R = INIT, while │ │ │ +00003450: 434f 4e44 2c20 756e 7469 6c20 434f 4e44 COND, until COND │ │ │ +00003460: 2c0a 2020 616c 7761 7973 2043 4f4e 442c ,. always COND, │ │ │ +00003470: 206e 6576 6572 2043 4f4e 442c 2074 6865 never COND, the │ │ │ +00003480: 7265 6973 2043 4f4e 442c 2063 6f6c 6c65 reis COND, colle │ │ │ +00003490: 6374 2045 5850 5220 696e 746f 2056 4152 ct EXPR into VAR │ │ │ +000034a0: 2c0a 2020 6170 7065 6e64 2045 5850 5220 ,. append EXPR │ │ │ +000034b0: 696e 746f 2056 4152 2c20 6e63 6f6e 6320 into VAR, nconc │ │ │ +000034c0: 4558 5052 2069 6e74 6f20 5641 522c 2073 EXPR into VAR, s │ │ │ +000034d0: 756d 2045 5850 5220 696e 746f 2056 4152 um EXPR into VAR │ │ │ +000034e0: 2c0a 2020 636f 756e 7420 4558 5052 2069 ,. count EXPR i │ │ │ +000034f0: 6e74 6f20 5641 522c 206d 6178 696d 697a nto VAR, maximiz │ │ │ +00003500: 6520 4558 5052 2069 6e74 6f20 5641 522c e EXPR into VAR, │ │ │ +00003510: 206d 696e 696d 697a 6520 4558 5052 2069 minimize EXPR i │ │ │ +00003520: 6e74 6f20 5641 522c 0a20 2069 6620 434f nto VAR,. if CO │ │ │ +00003530: 4e44 2043 4c41 5553 4520 5b61 6e64 2043 ND CLAUSE [and C │ │ │ +00003540: 4c41 5553 455d 2e2e 2e20 656c 7365 2043 LAUSE]... else C │ │ │ +00003550: 4c41 5553 4520 5b61 6e64 2043 4c41 5553 LAUSE [and CLAUS │ │ │ +00003560: 452e 2e2e 5d2c 0a20 2075 6e6c 6573 7320 E...],. unless │ │ │ +00003570: 434f 4e44 2043 4c41 5553 4520 5b61 6e64 COND CLAUSE [and │ │ │ +00003580: 2043 4c41 5553 455d 2e2e 2e20 656c 7365 CLAUSE]... else │ │ │ +00003590: 2043 4c41 5553 4520 5b61 6e64 2043 4c41 CLAUSE [and CLA │ │ │ +000035a0: 5553 452e 2e2e 5d2c 0a20 2064 6f20 4558 USE...],. do EX │ │ │ +000035b0: 5052 532e 2e2e 2c20 696e 6974 6961 6c6c PRS..., initiall │ │ │ +000035c0: 7920 4558 5052 532e 2e2e 2c20 6669 6e61 y EXPRS..., fina │ │ │ +000035d0: 6c6c 7920 4558 5052 532e 2e2e 2c20 7265 lly EXPRS..., re │ │ │ +000035e0: 7475 726e 2045 5850 522c 0a20 2066 696e turn EXPR,. fin │ │ │ +000035f0: 616c 6c79 2072 6574 7572 6e20 4558 5052 ally return EXPR │ │ │ +00003600: 2c20 6e61 6d65 6420 4e41 4d45 2e1f 0a28 , named NAME...( │ │ │ +00003610: 6465 6661 6c69 6173 2027 6c6f 6f70 2027 defalias 'loop ' │ │ │ +00003620: 286d 6163 726f 202e 2023 5b28 2672 6573 (macro . #[(&res │ │ │ +00003630: 7420 6172 6773 2920 22c6 c7c8 c9ca c9c6 t args) "....... │ │ │ +00003640: cb0b 215c 225c 225c 2273 ac89 ccca cdc6 ..!\"\"\"s...... │ │ │ +00003650: 0b42 4245 87ca 8989 8989 8989 8989 8989 .BBE............ │ │ │ +00003660: 8989 8989 891e 231e 2b18 1e24 1e25 1e26 ......#.+..$.%.& │ │ │ +00003670: 1e2c 1e2d 1a19 1e27 1e28 1e1e 1e29 1d1e .,.-...'.(...).. │ │ │ +00003680: 2ace 0bcf 5c22 130b 40d0 61ac 85d1 2088 *...\"..@.a... . │ │ │ +00003690: aa75 5c6e ab87 5c6e c644 430d 4215 08ab .u\n..\n.DC.B... │ │ │ +000036a0: 9008 c644 430d 4215 d208 ca45 0e1e 4216 ...DC.B....E..B. │ │ │ +000036b0: 1e0e 259f 0e27 ae82 0e28 43a4 1e1f d30e ..%..'...(C..... │ │ │ +000036c0: 299f 2189 1e20 4140 0e1e 9fa4 1e21 ce0e ).!.. A@.....!.. │ │ │ +000036d0: 269f 0e24 ab9e ccd4 d50e 2040 c661 ab84 &..$...... @.a.. │ │ │ +000036e0: 0e21 aa89 d60e 2040 d745 0e21 42d8 0e24 .!.... @.E.!B..$ │ │ │ +000036f0: 2345 aa88 cd0e 2040 0e21 4242 435c 6eab #E.... @.!BBC\n. │ │ │ +00003700: 950e 1fd9 6bab 8409 43aa 8dda 5c6e db0e ....k...C...\n.. │ │ │ +00003710: 1f42 0946 43aa 820e 1f23 1c09 ab85 0943 .B.FC....#.....C │ │ │ +00003720: 0d42 150d abb5 0d40 41ab 8ddc 0d89 4115 .B.....@A.....A. │ │ │ +00003730: 400c c623 4314 aa6b ca1e 5c22 0dab 920d @..#C..k..\".... │ │ │ +00003740: 4041 ac8d 0d89 4115 4040 0e5c 2242 165c @A....A.@@.\"B.\ │ │ │ +00003750: 22aa 6bdc 0e5c 220c ca23 4314 29aa 480e ".k..\"..#C.).H. │ │ │ +00003760: 23ab 88dd 0e23 0c42 4243 14cc 0e2a 0c2e #....#.BBC...*.. │ │ │ +00003770: 1442 4287 2220 5b6c 6f6f 702d 6669 7273 .BB." [loop-firs │ │ │ +00003780: 742d 666c 6167 206c 6f6f 702d 7265 7375 t-flag loop-resu │ │ │ +00003790: 6c74 2d76 6172 206c 6f6f 702d 6669 6e69 lt-var loop-fini │ │ │ +000037a0: 7368 2d66 6c61 6720 6172 6773 2062 6f64 sh-flag args bod │ │ │ +000037b0: 7920 6c6f 6f70 2d62 696e 6469 6e67 7320 y loop-bindings │ │ │ +000037c0: 7420 6d61 7063 6172 2073 796d 626f 6c70 t mapcar symbolp │ │ │ +000037d0: 2064 656c 7120 6e69 6c20 636f 7079 2d6c delq nil copy-l │ │ │ +000037e0: 6973 7420 626c 6f63 6b20 7768 696c 6520 ist block while │ │ │ +000037f0: 6170 7065 6e64 2028 636c 2d65 6e64 2d6c append (cl-end-l │ │ │ +00003800: 6f6f 7029 2063 6c2d 656e 642d 6c6f 6f70 oop) cl-end-loop │ │ │ +00003810: 2063 6c2d 7061 7273 652d 6c6f 6f70 2d63 cl-parse-loop-c │ │ │ +00003820: 6c61 7573 6520 7365 7471 2063 6c2d 6c6f lause setq cl-lo │ │ │ +00003830: 6f70 2d62 7569 6c64 2d61 6e64 7320 2d2d op-build-ands -- │ │ │ +00003840: 636c 2d66 696e 6973 682d 2d20 7375 6273 cl-finish-- subs │ │ │ +00003850: 7420 6f72 2028 7265 7475 726e 2d66 726f t or (return-fro │ │ │ +00003860: 6d20 2d2d 636c 2d66 696e 6973 682d 2d20 m --cl-finish-- │ │ │ +00003870: 6e69 6c29 202d 2d63 6c2d 6d61 7020 286e nil) --cl-map (n │ │ │ +00003880: 696c 2920 6966 2070 726f 676e 2063 6c2d il) if progn cl- │ │ │ +00003890: 6c6f 6f70 2d6c 6574 2073 796d 626f 6c2d loop-let symbol- │ │ │ +000038a0: 6d61 6372 6f6c 6574 206c 6f6f 702d 7374 macrolet loop-st │ │ │ +000038b0: 6570 7320 6570 696c 6f67 7565 2061 6e64 eps epilogue and │ │ │ +000038c0: 7320 7768 696c 652d 626f 6479 206c 6574 s while-body let │ │ │ +000038d0: 7320 6c6f 6f70 2d73 796d 626f 6c2d 6d61 s loop-symbol-ma │ │ │ +000038e0: 6373 206c 6f6f 702d 6d61 702d 666f 726d cs loop-map-form │ │ │ +000038f0: 206c 6f6f 702d 6669 6e61 6c6c 7920 6c6f loop-finally lo │ │ │ +00003900: 6f70 2d69 6e69 7469 616c 6c79 206c 6f6f op-initially loo │ │ │ +00003910: 702d 7265 7375 6c74 2d65 7870 6c69 6369 p-result-explici │ │ │ +00003920: 7420 6c6f 6f70 2d72 6573 756c 7420 6c6f t loop-result lo │ │ │ +00003930: 6f70 2d62 6f64 7920 6c6f 6f70 2d6e 616d op-body loop-nam │ │ │ +00003940: 6520 6c6f 6f70 2d64 6573 7472 2d74 656d e loop-destr-tem │ │ │ +00003950: 7073 206c 6f6f 702d 6163 6375 6d2d 7661 ps loop-accum-va │ │ │ +00003960: 7273 206c 6f6f 702d 6163 6375 6d2d 7661 rs loop-accum-va │ │ │ +00003970: 725d 2031 3720 2823 2420 2e20 3133 3131 r] 17 (#$ . 1311 │ │ │ +00003980: 3429 5d29 290a 2864 6566 616c 6961 7320 4)])).(defalias │ │ │ +00003990: 2763 6c2d 7061 7273 652d 6c6f 6f70 2d63 'cl-parse-loop-c │ │ │ +000039a0: 6c61 7573 6520 235b 6e69 6c20 220d 8941 lause #[nil "..A │ │ │ +000039b0: 1540 c6c7 1e5e 1e5f 1b0d ac87 c8c9 2188 .@...^._......!. │ │ │ +000039c0: 82b2 0b0b ca61 ab8a 0d89 4115 4016 6682 .....a....A.@.f. │ │ │ +000039d0: b20b 0bcb 61ab a40d 40cc 73ab 830d 4115 ....a...@.s...A. │ │ │ +000039e0: 0d40 3aac 84c8 cd21 880d 403a 83b2 0b0d .@:....!..@:.... │ │ │ +000039f0: 8941 1540 0e67 4216 67aa 6e0b ce61 abd3 .A.@.gB.g.n..a.. │ │ │ +00003a00: 0d40 cf61 ab8f 0d41 400d 4141 15ae 81d0 .@.a...A@.AA.... │ │ │ +00003a10: 1668 82b2 0b0d 40d1 73ab 830d 4115 0d40 .h....@.s...A..@ │ │ │ +00003a20: 3aac 84c8 d221 880d 4040 cf61 ab93 0e66 :....!..@@.a...f │ │ │ +00003a30: ac8f 0d89 4115 4041 40ae 81d3 1668 82b2 ....A.@A@....h.. │ │ │ +00003a40: 0b0d 403a 83b2 0b0d 8941 1540 0e69 4216 ..@:.....A.@.iB. │ │ │ +00003a50: 69aa 6e0b d473 83a2 07d5 8989 891e 4b1e i.n..s........K. │ │ │ +00003a60: 411e 4219 0d89 4115 40ae 82d6 201c 0d89 A.B...A.@... ... │ │ │ +00003a70: 4115 4089 13d7 61ab 860d 8941 1540 130b A.@...a....A.@.. │ │ │ +00003a80: d873 ab86 0d89 4115 4013 0bd9 73ab 86da .s....A.@...s... │ │ │ +00003a90: 13db 0d42 150b dc73 83d6 010b 0d42 8915 ...B...s.....B.. │ │ │ +00003aa0: 40dd 73ab 84c8 de21 880d 40df 61ae 860d @.s....!..@.a... │ │ │ +00003ab0: 4141 40e0 731e 600d 40e1 73ae 860d 4141 AA@.s.`.@.s...AA │ │ │ +00003ac0: 40e2 731e 610d 40e3 73ad 870d 4140 0d41 @.s.a.@.s...A@.A │ │ │ +00003ad0: 4115 1e48 0d40 e473 ad87 0d41 400d 4141 A..H.@.s...A@.AA │ │ │ +00003ae0: 151e 520d 40e5 61ad 870d 4140 0d41 4115 ..R.@.a...A@.AA. │ │ │ +00003af0: 1e44 e60e 5221 3fad 82d6 201e 54e6 0e44 .D..R!?... .T..D │ │ │ +00003b00: 213f ad82 d620 1e55 0e44 ab91 0e44 a7ab !?... .U.D...D.. │ │ │ +00003b10: 8c0e 44e7 58ab 86c8 e80e 445c 2288 0c0e ..D.X.....D\"... │ │ │ +00003b20: 48ae 81e7 4409 4211 0e54 ab88 0e54 0e52 H...D.B..T...T.R │ │ │ +00003b30: 4409 4211 0e55 ab88 0e55 0e44 4409 4211 D.B..U...U.DD.B. │ │ │ +00003b40: 0e52 aba1 0e60 ab8a 0e61 ab83 e9aa 8bea .R...`...a...... │ │ │ +00003b50: aa88 0e61 ab83 ebaa 81ec 0c0e 54ae 820e ...a........T... │ │ │ +00003b60: 5245 5c6e 4212 0c0e 60ab 83ed aa81 ee0c RE\nB...`....... │ │ │ +00003b70: 0e55 ae85 0e44 ae81 ef45 440e 4142 1641 .U...D...ED.AB.A │ │ │ +00003b80: 2e07 8237 070b f073 8365 020b f161 891e ...7...s.e...a.. │ │ │ +00003b90: 31ab 870c 39ab 830c aa82 d620 8918 0d89 1...9...... .... │ │ │ +00003ba0: 4115 4044 0942 11f2 0844 5c6e 4212 0bf3 A.@D.B...D\nB... │ │ │ +00003bb0: 61ab 8c0c f408 4444 0e4c 4216 4caa 9c08 a.....DD.LB.L... │ │ │ +00003bc0: 0c61 ac97 0cd5 4409 4211 0c0e 31ab 8308 .a....D.B...1... │ │ │ +00003bd0: aa83 f408 4444 0e42 4216 4208 0d40 e561 ....DD.BB.B..@.a │ │ │ +00003be0: aba6 0d41 400d 4141 1589 1e44 a2f5 73ab ...A@.AA...D..s. │ │ │ +00003bf0: 8f0e 4441 4039 ab88 0e44 4140 0844 aa85 ..DA@9...DA@.D.. │ │ │ +00003c00: f60e 4408 4529 aa83 f708 4444 0e41 4216 ..D.E)....DD.AB. │ │ │ +00003c10: 412a 8237 070b f861 abef 0d89 4115 401e A*.7...a....A.@. │ │ │ +00003c20: 480d 40f9 61ab 890d 4140 0d41 4115 aa82 H.@.a...A@.AA... │ │ │ +00003c30: 0e48 1e39 0cd5 4409 4211 0e4b ac86 0d40 .H.9..D.B..K...@ │ │ │ +00003c40: fa61 aba0 0cfb 0e56 ae85 d620 8916 560e .a.....V... ..V. │ │ │ +00003c50: 480c 4644 0e42 4216 420c 0e39 440e 4142 H.FD.BB.B..9D.AB │ │ │ +00003c60: 1641 aaa1 0c0e 480e 3961 ab84 0e48 aa8f .A....H.9a...H.. │ │ │ +00003c70: fb0e 56ae 85d6 2089 1656 0e48 0e39 4644 ..V... ..V.H.9FD │ │ │ +00003c80: 0e42 4216 422a 8237 070b fc73 abdd d620 .BB.B*.7...s... │ │ │ +00003c90: d620 1e43 891e 570d 8941 1540 4409 4211 . .C..W..A.@D.B. │ │ │ +00003ca0: 0e43 fd44 0942 11eb fe0e 43ff 0e43 4445 .C.D.B....C..CDE │ │ │ +00003cb0: 8174 000e 5744 455c 6e42 120b 8175 0061 .t..WDE\nB...u.a │ │ │ +00003cc0: ab91 0c81 7600 0e57 0e43 4544 0e4c 4216 ....v..W.CED.LB. │ │ │ +00003cd0: 4caa 950c d544 0942 110c 8176 000e 570e L....D.B...v..W. │ │ │ +00003ce0: 4345 440e 4242 1642 2a82 3707 0b81 7700 CED.BB.B*.7...w. │ │ │ +00003cf0: 7383 2104 0d40 8178 0073 ae8e 0d40 8179 s.!..@.x.s...@.y │ │ │ +00003d00: 0073 3fad 85c8 817a 0021 0d41 400d 4141 .s?....z.!.A@.AA │ │ │ +00003d10: 15d6 200d 4081 7b00 61ab a60d 4140 4781 .. .@.{.a...A@G. │ │ │ +00003d20: 7c00 55ab 950d 4140 4081 7d00 61ab 8b0d |.U...A@@.}.a... │ │ │ +00003d30: 4140 0d41 4115 4140 aa89 c881 7e00 21aa A@.AA.A@....~.!. │ │ │ +00003d40: 82d6 201e 431e 461e 6a1e 6b0e 460e 6a44 .. .C.F.j.k.F.jD │ │ │ +00003d50: 0942 110e 43e7 4409 4211 0e6b abaa d620 .B..C.D.B..k... │ │ │ +00003d60: 891e 6c81 7400 0e46 4444 0942 110c 817f ..l.t..FDD.B.... │ │ │ +00003d70: 000e 460e 4345 440e 4c42 164c eb0e 430e ..F.CED.LB.L..C. │ │ │ +00003d80: 6c45 5c6e 4212 29aa ba0c d544 0942 11fa lE\nB.)....D.B.. │ │ │ +00003d90: 0e46 8180 00f2 0e46 44eb 0e43 8174 000e .F.....FD..C.t.. │ │ │ +00003da0: 4644 4545 455c 6e42 120c fbf2 0e46 4481 FDEEE\nB.....FD. │ │ │ +00003db0: 8100 0e46 4481 7600 0e46 0e43 4546 440e ...FD.v..F.CEFD. │ │ │ +00003dc0: 4242 1642 0e43 ff0e 4344 440e 4142 1641 BB.B.C..CDD.AB.A │ │ │ +00003dd0: 2c82 3707 0b0e 5f73 abf9 0d40 8182 0073 ,.7..._s...@...s │ │ │ +00003de0: ac86 c881 7a00 2188 0d41 400d 4141 151e ....z.!..A@.AA.. │ │ │ +00003df0: 6d0d 4081 7b00 61ab ad0d 4140 4781 7c00 m.@.{.a...A@G.|. │ │ │ +00003e00: 55ab 9c0d 4140 400e 5f73 ab93 0d41 4040 U...A@@._s...A@@ │ │ │ +00003e10: 0b61 ac8b 0d41 400d 4141 1541 40aa 89c8 .a...A@.AA.A@... │ │ │ +00003e20: 817e 0021 aa82 d620 1e49 0b81 8300 73ab .~.!... .I....s. │ │ │ +00003e30: 860e 490c 1649 1481 8400 8185 0081 8600 ..I..I.......... │ │ │ +00003e40: 0c0e 4944 8187 0042 4244 0e6d 4516 532a ..ID...BBD.mE.S* │ │ │ +00003e50: 8237 070b 8188 0073 abab 0d40 8189 0073 .7.....s...@...s │ │ │ +00003e60: ad87 0d41 400d 4141 151e 6e81 8a00 8185 ...A@.AA..n..... │ │ │ +00003e70: 0081 8600 0c43 8187 0042 4244 0e6e 4516 .....C...BBD.nE. │ │ │ +00003e80: 5329 8237 070b 818b 0073 abe3 d589 891e S).7.....s...... │ │ │ +00003e90: 4d1e 4e1e 4f0d 4081 8c00 73ab b10d 4081 M.N.O.@...s...@. │ │ │ +00003ea0: 4e00 61ab 8b0d 4140 0d41 4115 164e aa65 N.a...A@.AA..N.e │ │ │ +00003eb0: 0d40 814d 0061 ab8b 0d41 400d 4141 1516 .@.M.a...A@.AA.. │ │ │ +00003ec0: 4daa 520d 4140 0d41 4115 164f aa47 818d M.R.A@.AA..O.G.. │ │ │ +00003ed0: 0081 8500 8186 000c d620 4481 8e00 d546 ......... D....F │ │ │ +00003ee0: 440e 4f0e 4e0e 4daf 0516 532b 8237 070b D.O.N.M...S+.7.. │ │ │ +00003ef0: 818f 0073 83ef 05d5 8989 89d6 20d6 201e ...s........ . . │ │ │ +00003f00: 581e 591e 4d1e 4e1e 621e 4f0d 4081 9000 X.Y.M.N.b.O.@... │ │ │ +00003f10: 73ab c40d 4081 4e00 61ab 8b0d 4140 0d41 s...@.N.a...A@.A │ │ │ +00003f20: 4115 164e aa65 0d40 814d 0061 ab8b 0d41 A..N.e.@.M.a...A │ │ │ +00003f30: 400d 4141 1516 4daa 520d 4081 9100 61ab @.AA..M.R.@...a. │ │ │ +00003f40: 8b0d 4140 0d41 4115 1662 aa3f 0d41 400d ..A@.AA..b.?.A@. │ │ │ +00003f50: 4141 1516 4faa 340c 3aab 940c 4039 ab8f AA..O.4.:...@9.. │ │ │ +00003f60: 0c41 39ab 8a0c 4016 590c 4116 58aa 8f0c .A9...@.Y.A.X... │ │ │ +00003f70: 8192 000e 590e 5845 440e 4242 1642 8193 ....Y.XED.BB.B.. │ │ │ +00003f80: 0081 8500 8186 000e 590e 5844 8194 0045 ........Y.XD...E │ │ │ +00003f90: 440e 4f0e 620e 4e0e 4daf 0616 532e 0682 D.O.b.N.M...S... │ │ │ +00003fa0: 3707 0b0e 5e73 837b 060d 4081 9500 73ac 7...^s.{..@...s. │ │ │ +00003fb0: 86c8 817a 0021 880d 4140 0d41 4189 1540 ...z.!..A@.AA..@ │ │ │ +00003fc0: 817b 0061 abad 0d41 4047 817c 0055 ab9c .{.a...A@G.|.U.. │ │ │ +00003fd0: 0d41 4040 0e5e 73ab 930d 4140 400b 61ac .A@@.^s...A@@.a. │ │ │ +00003fe0: 8b0d 4140 0d41 4115 4140 aa89 c881 7e00 ..A@.AA.A@....~. │ │ │ +00003ff0: 21aa 82d6 201e 491e 6f0b 8196 0073 ab86 !... .I.o....s.. │ │ │ +00004000: 0e49 0c16 4914 0b81 9700 73ab 8581 9800 .I..I.....s..... │ │ │ +00004010: aa83 8199 0081 8500 8186 000c 0e49 4481 .............ID. │ │ │ +00004020: 8700 4242 440e 6f45 1653 2a82 3707 0b81 ..BBD.oE.S*.7... │ │ │ +00004030: 9a00 73ab bad6 2018 0c81 9b00 4409 4211 ..s... .....D.B. │ │ │ +00004040: 08d5 4409 4211 819c 0081 9d00 819e 000c ..D.B........... │ │ │ +00004050: 0845 4481 8000 08fe 080c 4545 455c 6e42 .ED.......EEE\nB │ │ │ +00004060: 120c 819f 000c 4444 0e41 4216 4129 aafb ......DD.AB.A).. │ │ │ +00004070: 0b81 a000 73ab d70d 4081 a100 73ad 870d ....s...@...s... │ │ │ +00004080: 4140 0d41 4115 d620 181e 630c 0e63 ab88 A@.AA.. ..c..c.. │ │ │ +00004090: 81a2 000e 6344 aa83 81a3 0044 0942 1108 ....cD.....D.B.. │ │ │ +000040a0: d544 0942 1181 9c00 819d 0081 9e00 0c08 .D.B............ │ │ │ +000040b0: 4544 8180 0008 fe08 0c45 4545 5c6e 4212 ED.......EEE\nB. │ │ │ +000040c0: 0c81 a400 0c44 440e 4142 1641 2aaa 9d0b .....DD.AB.A*... │ │ │ +000040d0: 39ad 850b 81a5 004e 891e 5aab 870e 5a0c 9......N..Z...Z. │ │ │ +000040e0: 2188 aa87 c881 a600 0b5c 2288 290d 4029 !........\".).@) │ │ │ +000040f0: fa61 ab8d 81a7 0016 4b0d 8941 1588 82b7 .a......K..A.... │ │ │ +00004100: 000e 4bab 8c09 ab89 099f 0e47 4216 47aa ..K........GB.G. │ │ │ +00004110: 8d81 a800 81a9 0009 5c22 0e47 a416 470e ........\".G..G. │ │ │ +00004120: 42ab 9481 aa00 81ab 000e 429f fe0e 4b23 B.........B...K# │ │ │ +00004130: 81a7 0045 5c6e 4212 0e41 ab9a 0e4b ab85 ...E\nB..A...K.. │ │ │ +00004140: 81ac 00aa 81fe 81ad 0081 ae00 0e41 9f5c .............A.\ │ │ │ +00004150: 2242 0e70 4216 702c 82b2 0b0b 81af 0061 "B.pB.p,.......a │ │ │ +00004160: aba2 d620 8918 0d89 4115 4044 430e 4742 ... ....A.@DC.GB │ │ │ +00004170: 1647 eafe 0881 b000 0844 45e7 455c 6e42 .G.......DE.E\nB │ │ │ +00004180: 1229 82b2 0b0b 81b1 0061 abc5 0d89 4115 .).......a....A. │ │ │ +00004190: 4081 b200 d581 b300 5c22 1c1e 400c 0e71 @.......\"..@..q │ │ │ +000041a0: 61ab 9381 aa00 81b4 000e 400c 4581 a700 a.........@.E... │ │ │ +000041b0: 455c 6e42 12aa 9881 aa00 fe0c 81b5 000c E\nB............ │ │ │ +000041c0: 81a9 000e 4044 4545 81a7 0045 5c6e 4212 ....@DEE...E\nB. │ │ │ +000041d0: 2a82 b20b 0b81 b600 73ab d30d 8941 1540 *.......s....A.@ │ │ │ +000041e0: 81b2 00d5 81b3 005c 221c 1e40 81aa 00fe .......\"..@.... │ │ │ +000041f0: 0c89 0e71 61ab 9981 b500 0b81 b700 73ab ...qa.........s. │ │ │ +00004200: 8581 b300 aa83 81b8 000e 4044 0c45 aa93 ..........@D.E.. │ │ │ +00004210: 0b81 b900 73ab 8581 b500 aa83 81ae 000c ....s........... │ │ │ +00004220: 0e40 4545 81a7 0045 5c6e 4212 2a82 b20b .@EE...E\nB.*... │ │ │ +00004230: 0b81 ba00 73ab a70d 8941 1540 81b2 0081 ....s....A.@.... │ │ │ +00004240: bb00 211c 1e40 81aa 0081 bc00 81bd 000c ..!..@.......... │ │ │ +00004250: 0e40 4681 a700 455c 6e42 122a 82b2 0b0b .@F...E\nB.*.... │ │ │ +00004260: 81be 0073 aba7 0d89 4115 4081 b200 81bf ...s....A.@..... │ │ │ +00004270: 0021 1c1e 4081 aa00 81bc 0081 c000 0c0e .!..@........... │ │ │ +00004280: 4046 81a7 0045 5c6e 4212 2a82 b20b 0b81 @F...E\nB.*..... │ │ │ +00004290: c100 73ab a20d 8941 1540 81b2 00e7 211c ..s....A.@....!. │ │ │ +000042a0: 1e40 81aa 0081 c200 0c0e 4045 81a7 0045 .@........@E...E │ │ │ +000042b0: 5c6e 4212 2a82 b20b 0b81 c300 73ab a40d \nB.*.......s... │ │ │ +000042c0: 8941 1540 81b2 00e7 211c 1e40 81aa 00fb .A.@....!..@.... │ │ │ +000042d0: 0e40 81c2 000c 4445 81a7 0045 5c6e 4212 .@....DE...E\nB. │ │ │ +000042e0: 2a82 b20b 0b81 c400 73ab dd0d 8941 1540 *.......s....A.@ │ │ │ +000042f0: 1e40 81c5 000e 4021 ab84 0e40 aa82 d620 .@....@!...@... │ │ │ +00004300: 1881 b200 d521 1c81 c600 81c7 000b 21e7 .....!........!. │ │ │ +00004310: 81c8 004f 211e 72fe 0cfb 0c0e 720c 0845 ...O!.r.....r..E │ │ │ +00004320: 0846 451e 6481 aa00 080e 4061 ab84 0e64 .FE.d.....@a...d │ │ │ +00004330: aa8b 81c9 0008 0e40 4443 0e64 4581 a700 .......@DC.dE... │ │ │ +00004340: 455c 6e42 122d 82b2 0b0b 81ca 0061 abb4 E\nB.-.......a.. │ │ │ +00004350: d51e 5b0d 8941 1540 0d40 f861 ad87 0d41 ..[..A.@.@.a...A │ │ │ +00004360: 400d 4141 1544 0e5b 4216 5b0d 40fa 61ab @.AA.D.[B.[.@.a. │ │ │ +00004370: 870d 8941 1588 aa5b 0e5b 9f0e 4742 1647 ...A...[.[..GB.G │ │ │ +00004380: 2982 b20b 0b81 cb00 61ab 8b0d 8941 1540 ).......a....A.@ │ │ │ +00004390: 5c6e 4212 82b2 0b0b 81cc 0061 ab8f 819d \nB........a.... │ │ │ +000043a0: 000d 8941 1540 445c 6e42 1282 b20b 0b81 ...A.@D\nB...... │ │ │ +000043b0: cd00 61ab 9c0e 45ac 84d6 2016 45fe 0e45 ..a...E... .E..E │ │ │ +000043c0: 0d89 4115 4045 5c6e 4212 81a7 0016 7382 ..A.@E\nB.....s. │ │ │ +000043d0: b20b 0b81 ce00 61ab a00e 45ac 84d6 2016 ......a...E... . │ │ │ +000043e0: 45fe 0e45 819d 000d 8941 1540 4445 5c6e E..E.....A.@DE\n │ │ │ +000043f0: 4212 81a7 0016 7382 b20b 0b81 cf00 61ab B.....s.......a. │ │ │ +00004400: a70e 45ac 84d6 2016 450e 50ac 84d6 2016 ..E... .E.P... . │ │ │ +00004410: 50fe 0e45 819d 00fe 0e50 0d89 4115 4045 P..E.....P..A.@E │ │ │ +00004420: 4445 5c6e 4212 82b2 0b0b 81d0 0073 833a DE\nB........s.: │ │ │ +00004430: 0b0d 8941 1540 1e65 d51a 81d1 0020 8881 ...A.@.e..... .. │ │ │ +00004440: d200 5c6e 9f21 291e 39d5 1a0d 4081 5100 ..\n.!).9...@.Q. │ │ │ +00004450: 61ab 880d 4115 81d1 0020 8881 d200 5c6e a...A.... ....\n │ │ │ +00004460: 9f21 291e 510e 3940 81a7 0061 ad87 0e51 .!).Q.9@...a...Q │ │ │ +00004470: 4081 a700 611e 5c5c 0d40 8152 0061 ab83 @...a.\\.@.R.a.. │ │ │ +00004480: 0d41 150b 81d3 0061 ab88 0e51 0e39 1651 .A.....a...Q.9.Q │ │ │ +00004490: 1639 0e5c 5cab 8a81 aa00 0e39 4140 42aa .9.\\......9A@B. │ │ │ +000044a0: 8681 7c00 0e39 380e 5c5c ab86 0e51 4140 ..|..98.\\...QA@ │ │ │ +000044b0: aa87 817c 000e 5138 4342 1e4a 81d4 000e ...|..Q8CB.J.... │ │ │ +000044c0: 4a81 d500 5c22 aba1 d620 8918 430e 4742 J...\"... ..C.GB │ │ │ +000044d0: 1647 fbfe 080e 6545 81d6 0008 81d5 000e .G....eE........ │ │ │ +000044e0: 4a23 4242 164a 29aa 89fb 0e65 0e4a 4242 J#BB.J)....e.JBB │ │ │ +000044f0: 164a 0e5c 5cab 8b81 aa00 0e4a 81a7 0045 .J.\\......J...E │ │ │ +00004500: aa82 0e4a 5c6e 4212 2daa f80b 81d7 0073 ...J\nB.-......s │ │ │ +00004510: abb0 d51e 5d0d 403a ac86 c881 d800 2188 ....].@:......!. │ │ │ +00004520: 0d40 3aab 8c0d 8941 1540 0e5d 4216 5daa .@:....A.@.]B.]. │ │ │ +00004530: 6f81 aa00 81a7 000e 5d42 9f42 5c6e 4212 o.......]B.B\nB. │ │ │ +00004540: 29aa c10b cf61 aba2 0e45 ac84 d620 1645 )....a...E... .E │ │ │ +00004550: 0e50 ac84 d620 1650 fe0e 500d 8941 1540 .P... .P..P..A.@ │ │ │ +00004560: 0e45 d5af 055c 6e42 12aa 9a0b 39ad 850b .E...\nB....9... │ │ │ +00004570: 81d9 004e 891e 5aac 87c8 81da 000b 5c22 ...N..Z.......\" │ │ │ +00004580: 880e 5a20 8829 0d40 fa61 ad87 0d41 1581 ..Z .).@.a...A.. │ │ │ +00004590: d100 202b 8722 205b 7465 6d70 206c 6f6f .. +." [temp loo │ │ │ +000045a0: 702d 666f 722d 6269 6e64 696e 6773 206c p-for-bindings l │ │ │ +000045b0: 6f6f 702d 626f 6479 2077 6f72 6420 7661 oop-body word va │ │ │ +000045c0: 7220 6172 6773 2028 6861 7368 2d6b 6579 r args (hash-key │ │ │ +000045d0: 2068 6173 682d 6b65 7973 2068 6173 682d hash-keys hash- │ │ │ +000045e0: 7661 6c75 6520 6861 7368 2d76 616c 7565 value hash-value │ │ │ +000045f0: 7329 2028 6b65 792d 636f 6465 206b 6579 s) (key-code key │ │ │ +00004600: 2d63 6f64 6573 206b 6579 2d73 6571 206b -codes key-seq k │ │ │ +00004610: 6579 2d73 6571 7320 6b65 792d 6269 6e64 ey-seqs key-bind │ │ │ +00004620: 696e 6720 6b65 792d 6269 6e64 696e 6773 ing key-bindings │ │ │ +00004630: 2920 6572 726f 7220 224d 616c 666f 726d ) error "Malform │ │ │ +00004640: 6564 2060 6c6f 6f70 2720 6d61 6372 6f22 ed `loop' macro" │ │ │ +00004650: 206e 616d 6564 2069 6e69 7469 616c 6c79 named initially │ │ │ +00004660: 2028 646f 2064 6f69 6e67 2920 2253 796e (do doing) "Syn │ │ │ +00004670: 7461 7820 6572 726f 7220 6f6e 2060 696e tax error on `in │ │ │ +00004680: 6974 6961 6c6c 7927 2063 6c61 7573 6522 itially' clause" │ │ │ +00004690: 2066 696e 616c 6c79 2072 6574 7572 6e20 finally return │ │ │ +000046a0: 276e 696c 2028 646f 2064 6f69 6e67 2920 'nil (do doing) │ │ │ +000046b0: 2253 796e 7461 7820 6572 726f 7220 6f6e "Syntax error on │ │ │ +000046c0: 2060 6669 6e61 6c6c 7927 2063 6c61 7573 `finally' claus │ │ │ +000046d0: 6522 2027 6e69 6c20 2866 6f72 2061 7329 e" 'nil (for as) │ │ │ +000046e0: 206e 696c 2067 656e 7379 6d20 6265 696e nil gensym bein │ │ │ +000046f0: 6720 2874 6865 2065 6163 6829 2028 6275 g (the each) (bu │ │ │ +00004700: 6666 6572 2062 7566 6665 7273 2920 696e ffer buffers) in │ │ │ +00004710: 2028 6275 6666 6572 2d6c 6973 7429 2028 (buffer-list) ( │ │ │ +00004720: 6672 6f6d 2064 6f77 6e66 726f 6d20 7570 from downfrom up │ │ │ +00004730: 6672 6f6d 2074 6f20 646f 776e 746f 2075 from to downto u │ │ │ +00004740: 7074 6f20 6162 6f76 6520 6265 6c6f 7720 pto above below │ │ │ +00004750: 6279 2920 2864 6f77 6e74 6f20 6162 6f76 by) (downto abov │ │ │ +00004760: 6529 2022 4d75 7374 2073 7065 6369 6679 e) "Must specify │ │ │ +00004770: 2060 6672 6f6d 2720 7661 6c75 6520 666f `from' value fo │ │ │ +00004780: 7220 646f 776e 7761 7264 206c 6f6f 7022 r downward loop" │ │ │ +00004790: 2064 6f77 6e66 726f 6d20 2864 6f77 6e74 downfrom (downt │ │ │ +000047a0: 6f20 6162 6f76 6529 2028 6162 6f76 6520 o above) (above │ │ │ +000047b0: 6265 6c6f 7729 2028 6162 6f76 6520 6265 below) (above be │ │ │ +000047c0: 6c6f 7729 2028 6672 6f6d 2075 7066 726f low) (from upfro │ │ │ +000047d0: 6d20 646f 776e 6672 6f6d 2920 2874 6f20 m downfrom) (to │ │ │ +000047e0: 7570 746f 2064 6f77 6e74 6f20 6162 6f76 upto downto abov │ │ │ +000047f0: 6520 6265 6c6f 7729 2062 7920 636c 2d63 e below) by cl-c │ │ │ +00004800: 6f6e 7374 2d65 7870 722d 7020 3020 224c onst-expr-p 0 "L │ │ │ +00004810: 6f6f 7020 6062 7927 2076 616c 7565 2069 oop `by' value i │ │ │ +00004820: 7320 6e6f 7420 706f 7369 7469 7665 3a20 s not positive: │ │ │ +00004830: 2573 2220 3e20 3e3d 203c 203c 3d20 2d20 %s" > >= < <= - │ │ │ +00004840: 2b20 3120 2869 6e20 696e 2d72 6566 206f + 1 (in in-ref o │ │ │ +00004850: 6e29 206f 6e20 636f 6e73 7020 696e 2d72 n) on consp in-r │ │ │ +00004860: 6566 2063 6172 2028 7175 6f74 6520 6675 ef car (quote fu │ │ │ +00004870: 6e63 7469 6f6e 2066 756e 6374 696f 6e2a nction function* │ │ │ +00004880: 2920 6675 6e63 616c 6c20 6364 7220 3d20 ) funcall cdr = │ │ │ +00004890: 7468 656e 2061 6e64 2069 6620 2861 6372 then and if (acr │ │ │ +000048a0: 6f73 7320 6163 726f 7373 2d72 6566 2920 oss across-ref) │ │ │ +000048b0: 2d31 2073 6574 7120 312b 2077 6861 7420 -1 setq 1+ what │ │ │ +000048c0: 6c6f 6f70 2d66 6f72 2d73 7465 7073 206c loop-for-steps l │ │ │ +000048d0: 6f6f 702d 666f 722d 7365 7473 2074 656d oop-for-sets tem │ │ │ +000048e0: 702d 6964 7820 7374 6570 206c 6f6f 702d p-idx step loop- │ │ │ +000048f0: 6669 6e69 7368 2d66 6c61 6720 7465 6d70 finish-flag temp │ │ │ +00004900: 2d73 6571 206c 6f6f 702d 6269 6e64 696e -seq loop-bindin │ │ │ +00004910: 6773 2073 7461 7274 206f 7468 6572 2066 gs start other f │ │ │ +00004920: 6f72 6d20 616e 6473 206c 6f6f 702d 7379 orm ands loop-sy │ │ │ +00004930: 6d62 6f6c 2d6d 6163 7320 746f 2066 726f mbol-macs to fro │ │ │ +00004940: 6d20 6275 6620 6c6f 6f70 2d72 6573 756c m buf loop-resul │ │ │ +00004950: 742d 7661 7220 656c 7365 2065 6e64 206c t-var else end l │ │ │ +00004960: 6f6f 702d 6d61 702d 666f 726d 2065 6e64 oop-map-form end │ │ │ +00004970: 2d76 6172 2073 7465 702d 7661 7220 6c6f -var step-var lo │ │ │ +00004980: 6f70 2d66 6972 7374 2d66 6c61 6720 7465 op-first-flag te │ │ │ +00004990: 6d70 2d76 6563 2076 6172 3220 7661 7231 mp-vec var2 var1 │ │ │ +000049a0: 2068 616e 646c 6572 2062 696e 6469 6e67 handler binding │ │ │ +000049b0: 7320 7369 6d70 6c65 2062 6f64 7920 6b65 s simple body ke │ │ │ +000049c0: 792d 7479 7065 7320 6861 7368 2d74 7970 y-types hash-typ │ │ │ +000049d0: 6573 2064 6f77 6e20 6578 636c 2070 726f es down excl pro │ │ │ +000049e0: 7020 7363 7220 7365 7420 636f 6e64 206c p scr set cond l │ │ │ +000049f0: 6f6f 702d 6e61 6d65 206c 6f6f 702d 696e oop-name loop-in │ │ │ +00004a00: 6974 6961 6c6c 7920 6c6f 6f70 2d72 6573 itially loop-res │ │ │ +00004a10: 756c 742d 6578 706c 6963 6974 206c 6f6f ult-explicit loo │ │ │ +00004a20: 702d 6669 6e61 6c6c 7920 7365 7120 7265 p-finally seq re │ │ │ +00004a30: 6620 7465 6d70 2d6c 656e 2074 6162 6c65 f temp-len table │ │ │ +00004a40: 206f 6220 6d61 7020 6c6f 6f70 2d73 7465 ob map loop-ste │ │ │ +00004a50: 7073 206c 6f6f 702d 6163 6375 6d2d 7661 ps loop-accum-va │ │ │ +00004a60: 7220 6675 6e63 206c 6f6f 702d 7265 7375 r func loop-resu │ │ │ +00004a70: 6c74 206c 656e 6774 6820 6163 726f 7373 lt length across │ │ │ +00004a80: 2d72 6566 2061 7265 6620 2865 6c65 6d65 -ref aref (eleme │ │ │ +00004a90: 6e74 2065 6c65 6d65 6e74 7329 2028 696e nt elements) (in │ │ │ +00004aa0: 2d72 6566 206f 662d 7265 6629 2028 696e -ref of-ref) (in │ │ │ +00004ab0: 206f 6629 2022 4578 7065 6374 6564 2060 of) "Expected ` │ │ │ +00004ac0: 6f66 2722 2075 7369 6e67 2032 2069 6e64 of'" using 2 ind │ │ │ +00004ad0: 6578 2022 4261 6420 6075 7369 6e67 2720 ex "Bad `using' │ │ │ +00004ae0: 636c 6175 7365 2220 656c 7420 6f72 2070 clause" elt or p │ │ │ +00004af0: 6f70 2028 696e 206f 6629 2028 6861 7368 op (in of) (hash │ │ │ +00004b00: 2d76 616c 7565 2068 6173 682d 7661 6c75 -value hash-valu │ │ │ +00004b10: 6573 2920 6d61 7068 6173 6820 6675 6e63 es) maphash func │ │ │ +00004b20: 7469 6f6e 206c 616d 6264 6120 2d2d 636c tion lambda --cl │ │ │ +00004b30: 2d6d 6170 2028 7379 6d62 6f6c 2070 7265 -map (symbol pre │ │ │ +00004b40: 7365 6e74 2d73 796d 626f 6c20 6578 7465 sent-symbol exte │ │ │ +00004b50: 726e 616c 2d73 796d 626f 6c20 7379 6d62 rnal-symbol symb │ │ │ +00004b60: 6f6c 7320 7072 6573 656e 742d 7379 6d62 ols present-symb │ │ │ +00004b70: 6f6c 7320 6578 7465 726e 616c 2d73 796d ols external-sym │ │ │ +00004b80: 626f 6c73 2920 2869 6e20 6f66 2920 6d61 bols) (in of) ma │ │ │ +00004b90: 7061 746f 6d73 2028 6f76 6572 6c61 7920 patoms (overlay │ │ │ +00004ba0: 6f76 6572 6c61 7973 2065 7874 656e 7420 overlays extent │ │ │ +00004bb0: 6578 7465 6e74 7329 2028 696e 206f 6620 extents) (in of │ │ │ +00004bc0: 6672 6f6d 2074 6f29 2063 6c2d 6d61 702d from to) cl-map- │ │ │ +00004bd0: 6578 7465 6e74 7320 2870 726f 676e 202e extents (progn . │ │ │ +00004be0: 202d 2d63 6c2d 6d61 7029 2028 696e 7465 --cl-map) (inte │ │ │ +00004bf0: 7276 616c 2069 6e74 6572 7661 6c73 2920 rval intervals) │ │ │ +00004c00: 2869 6e20 6f66 2070 726f 7065 7274 7920 (in of property │ │ │ +00004c10: 6672 6f6d 2074 6f29 2070 726f 7065 7274 from to) propert │ │ │ +00004c20: 7920 636f 6e73 2063 6c2d 6d61 702d 696e y cons cl-map-in │ │ │ +00004c30: 7465 7276 616c 7320 2870 726f 676e 202e tervals (progn . │ │ │ +00004c40: 202d 2d63 6c2d 6d61 7029 2028 696e 206f --cl-map) (in o │ │ │ +00004c50: 6629 2028 6b65 792d 6269 6e64 696e 6720 f) (key-binding │ │ │ +00004c60: 6b65 792d 6269 6e64 696e 6773 2920 286b key-bindings) (k │ │ │ +00004c70: 6579 2d73 6571 206b 6579 2d73 6571 7329 ey-seq key-seqs) │ │ │ +00004c80: 2063 6c2d 6d61 702d 6b65 796d 6170 2d72 cl-map-keymap-r │ │ │ +00004c90: 6563 7572 7369 7665 6c79 2063 6c2d 6d61 ecursively cl-ma │ │ │ +00004ca0: 702d 6b65 796d 6170 2028 6672 616d 6520 p-keymap (frame │ │ │ +00004cb0: 6672 616d 6573 2073 6372 6565 6e20 7363 frames screen sc │ │ │ +00004cc0: 7265 656e 7329 2028 7365 6c65 6374 6564 reens) (selected │ │ │ +00004cd0: 2d66 7261 6d65 2920 7072 6f67 3120 6e6f -frame) prog1 no │ │ │ +00004ce0: 7420 6571 206e 6578 742d 6672 616d 6520 t eq next-frame │ │ │ +00004cf0: 2877 696e 646f 7720 7769 6e64 6f77 7329 (window windows) │ │ │ +00004d00: 2028 696e 206f 6629 2066 7261 6d65 2d73 (in of) frame-s │ │ │ +00004d10: 656c 6563 7465 642d 7769 6e64 6f77 2028 elected-window ( │ │ │ +00004d20: 7365 6c65 6374 6564 2d77 696e 646f 7729 selected-window) │ │ │ +00004d30: 206e 6578 742d 7769 6e64 6f77 2063 6c2d next-window cl- │ │ │ +00004d40: 6c6f 6f70 2d66 6f72 2d68 616e 646c 6572 loop-for-handler │ │ │ +00004d50: 2022 4578 7065 6374 6564 2061 2060 666f "Expected a `fo │ │ │ +00004d60: 7227 2070 7265 706f 7369 7469 6f6e 2c20 r' preposition, │ │ │ +00004d70: 666f 756e 6420 2573 2220 7420 6d61 7063 found %s" t mapc │ │ │ +00004d80: 6172 206c 6973 7420 7072 6f67 6e20 636c ar list progn cl │ │ │ +00004d90: 2d6c 6f6f 702d 6c65 7420 7073 6574 7120 -loop-let psetq │ │ │ +00004da0: 6170 706c 7920 6170 7065 6e64 2072 6570 apply append rep │ │ │ +00004db0: 6561 7420 312d 2063 6f6c 6c65 6374 2063 eat 1- collect c │ │ │ +00004dc0: 6c2d 6c6f 6f70 2d68 616e 646c 652d 6163 l-loop-handle-ac │ │ │ +00004dd0: 6375 6d20 6e72 6576 6572 7365 2070 7573 cum nreverse pus │ │ │ +00004de0: 6820 6e63 6f6e 6320 286e 636f 6e63 206e h nconc (nconc n │ │ │ +00004df0: 636f 6e63 696e 6720 6170 7065 6e64 2061 concing append a │ │ │ +00004e00: 7070 656e 6469 6e67 2920 286e 636f 6e63 ppending) (nconc │ │ │ +00004e10: 206e 636f 6e63 696e 6729 2072 6576 6572 nconcing) rever │ │ │ +00004e20: 7365 2028 6e63 6f6e 6320 6e63 6f6e 6369 se (nconc nconci │ │ │ +00004e30: 6e67 2920 2863 6f6e 6361 7420 636f 6e63 ng) (concat conc │ │ │ +00004e40: 6174 696e 6729 2022 2220 6361 6c6c 6620 ating) "" callf │ │ │ +00004e50: 636f 6e63 6174 2028 7663 6f6e 6361 7420 concat (vconcat │ │ │ +00004e60: 7663 6f6e 6361 7469 6e67 2920 5b5d 2076 vconcating) [] v │ │ │ +00004e70: 636f 6e63 6174 2028 7375 6d20 7375 6d6d concat (sum summ │ │ │ +00004e80: 696e 6729 2069 6e63 6620 2863 6f75 6e74 ing) incf (count │ │ │ +00004e90: 2063 6f75 6e74 696e 6729 2028 6d69 6e69 counting) (mini │ │ │ +00004ea0: 6d69 7a65 206d 696e 696d 697a 696e 6720 mize minimizing │ │ │ +00004eb0: 6d61 7869 6d69 7a65 206d 6178 696d 697a maximize maximiz │ │ │ +00004ec0: 696e 6729 2063 6c2d 7369 6d70 6c65 2d65 ing) cl-simple-e │ │ │ +00004ed0: 7870 722d 7020 696e 7465 726e 2073 796d xpr-p intern sym │ │ │ +00004ee0: 626f 6c2d 6e61 6d65 2033 206c 6574 2077 bol-name 3 let w │ │ │ +00004ef0: 6974 6820 7768 696c 6520 756e 7469 6c20 ith while until │ │ │ +00004f00: 616c 7761 7973 206e 6576 6572 2074 6865 always never the │ │ │ +00004f10: 7265 6973 2028 6966 2077 6865 6e20 756e reis (if when un │ │ │ +00004f20: 6c65 7373 2920 636c 2d70 6172 7365 2d6c less) cl-parse-l │ │ │ +00004f30: 6f6f 702d 636c 6175 7365 2063 6c2d 6c6f oop-clause cl-lo │ │ │ +00004f40: 6f70 2d62 7569 6c64 2d61 6e64 7320 756e op-build-ands un │ │ │ +00004f50: 6c65 7373 2063 6c2d 6578 7072 2d63 6f6e less cl-expr-con │ │ │ +00004f60: 7461 696e 7320 6974 2073 7562 7374 2028 tains it subst ( │ │ │ +00004f70: 646f 2064 6f69 6e67 2920 2253 796e 7461 do doing) "Synta │ │ │ +00004f80: 7820 6572 726f 7220 6f6e 2060 646f 2720 x error on `do' │ │ │ +00004f90: 636c 6175 7365 2220 636c 2d6c 6f6f 702d clause" cl-loop- │ │ │ +00004fa0: 6861 6e64 6c65 7220 2245 7870 6563 7465 handler "Expecte │ │ │ +00004fb0: 6420 6120 6c6f 6f70 206b 6579 776f 7264 d a loop keyword │ │ │ +00004fc0: 2c20 666f 756e 6420 2573 225d 2039 5d29 , found %s"] 9]) │ │ │ +00004fd0: 0a28 6465 6661 6c69 6173 2027 636c 2d6c .(defalias 'cl-l │ │ │ +00004fe0: 6f6f 702d 6c65 7420 235b 2873 7065 6373 oop-let #[(specs │ │ │ +00004ff0: 2062 6f64 7920 7061 7229 2022 0dc6 891a body par) ".... │ │ │ +00005000: 1989 1cab 920c 40a2 39ac 860c 4041 40ac ......@.9...@A@. │ │ │ +00005010: 860c 4189 14ac 6e08 abad 0cab aac6 100d ..A...n......... │ │ │ +00005020: 8914 aba3 c70c 4041 4021 ac95 c820 891e ......@A@!... .. │ │ │ +00005030: 130c 4041 4044 0942 110c 4041 0e13 a088 ..@A@D.B..@A.... │ │ │ +00005040: 290c 4189 14ac 5d0d abee 0d40 3aab df0d ).A...]....@:... │ │ │ +00005050: 4040 3cab d90d 4040 1bc6 1e14 0d89 4115 @@<...@@......A. │ │ │ +00005060: 4041 401e 150b 0e16 b7ae 910b c90b ca5c @A@............\ │ │ │ +00005070: 22ae 82c8 2042 0e16 4289 1616 4041 891e "... B..B...@A.. │ │ │ +00005080: 130e 1544 5c6e 4212 0b3a ab9b 0b89 4113 ...D\nB..:....A. │ │ │ +00005090: 400e 15ad 8a0b ab83 cbaa 81cc 0e13 4444 @.............DD │ │ │ +000050a0: 0e14 4216 14aa 610e 149f 0da4 152c aa19 ..B...a......,.. │ │ │ +000050b0: 0d89 4115 405c 6e42 12aa 0f0e 18cd 61ab ..A.@\nB......a. │ │ │ +000050c0: 9f08 ab83 ceaa 81cd cfd0 5c6e 9f5c 2242 ..........\n.\"B │ │ │ +000050d0: 1e17 09ab 88d1 099f 0e17 45aa 820e 1729 ..........E....) │ │ │ +000050e0: aa90 08ab 83d2 aa81 d109 9f5c 6e9f a40e ...........\n... │ │ │ +000050f0: 1842 422b 8722 205b 7061 7220 7465 6d70 .BB+." [par temp │ │ │ +00005100: 7320 6e65 7720 7370 6563 2070 2073 7065 s new spec p spe │ │ │ +00005110: 6373 206e 696c 2063 6c2d 636f 6e73 742d cs nil cl-const- │ │ │ +00005120: 6578 7072 2d70 2067 656e 7379 6d20 6c61 expr-p gensym la │ │ │ +00005130: 7374 2030 2070 6f70 2063 6172 2073 6574 st 0 pop car set │ │ │ +00005140: 7120 7073 6574 7120 6170 706c 7920 6e63 q psetq apply nc │ │ │ +00005150: 6f6e 6320 6c65 742a 206c 6574 2074 656d onc let* let tem │ │ │ +00005160: 7020 6e73 7065 6373 2065 7870 7220 6c6f p nspecs expr lo │ │ │ +00005170: 6f70 2d64 6573 7472 2d74 656d 7073 2073 op-destr-temps s │ │ │ +00005180: 6574 2062 6f64 795d 2035 5d29 0a28 6465 et body] 5]).(de │ │ │ +00005190: 6661 6c69 6173 2027 636c 2d6c 6f6f 702d falias 'cl-loop- │ │ │ +000051a0: 6861 6e64 6c65 2d61 6363 756d 2023 5b28 handle-accum #[( │ │ │ +000051b0: 6465 6620 266f 7074 696f 6e61 6c20 6675 def &optional fu │ │ │ +000051c0: 6e63 2920 220c 40c6 61ab 9b0c 4140 0c41 nc) ".@.a...A@.A │ │ │ +000051d0: 4114 891b 0973 ac8b 0b08 4443 5c6e 4212 A....s....DC\nB. │ │ │ +000051e0: 0b09 4211 0b29 870d ae98 c720 8915 0844 ..B..)..... ...D │ │ │ +000051f0: 435c 6e42 120e 08ab 860e 080d 44aa 810d C\nB........D... │ │ │ +00005200: 1609 0d87 2220 5b64 6566 206c 6f6f 702d ...." [def loop- │ │ │ +00005210: 6163 6375 6d2d 7661 7273 206c 6f6f 702d accum-vars loop- │ │ │ +00005220: 6269 6e64 696e 6773 2076 6172 2061 7267 bindings var arg │ │ │ +00005230: 7320 6c6f 6f70 2d61 6363 756d 2d76 6172 s loop-accum-var │ │ │ +00005240: 2069 6e74 6f20 6765 6e73 796d 2066 756e into gensym fun │ │ │ +00005250: 6320 6c6f 6f70 2d72 6573 756c 745d 2033 c loop-result] 3 │ │ │ +00005260: 5d29 0a28 6465 6661 6c69 6173 2027 636c ]).(defalias 'cl │ │ │ +00005270: 2d6c 6f6f 702d 6275 696c 642d 616e 6473 -loop-build-ands │ │ │ +00005280: 2023 5b28 636c 6175 7365 7329 2022 c489 #[(clauses) ".. │ │ │ +00005290: 191a 0bab c80b 40a2 c561 abb7 c60b 4021 ......@..a....@! │ │ │ +000052a0: 40c7 61ab ae0b 41ab 9fc8 0b40 210b 4140 @.a...A....@!.A@ │ │ │ +000052b0: a2c5 61ab 860b 4140 41aa 840b 4140 43a4 ..a...A@A...A@C. │ │ │ +000052c0: 0b41 4142 8913 aa4b c80b 8941 1340 2141 .AAB...K...A.@!A │ │ │ +000052d0: 11aa 3f0b 8941 1340 5c6e 4212 aa35 5c6e ..?..A.@\nB..5\n │ │ │ +000052e0: 9fae 82c7 4389 1241 ab85 c95c 6e42 aa82 ....C..A...\nB.. │ │ │ +000052f0: 5c6e 4009 89ab 8cca 5c6e c5ca 09cb 5c22 \n@.....\n....\" │ │ │ +00005300: 4243 5c22 aa81 5c6e 8918 41ab 85c9 0842 BC\"..\n..A....B │ │ │ +00005310: aa82 0840 2945 2a87 2220 5b66 756c 6c20 ...@)E*." [full │ │ │ +00005320: 626f 6479 2061 6e64 7320 636c 6175 7365 body ands clause │ │ │ +00005330: 7320 6e69 6c20 7072 6f67 6e20 6c61 7374 s nil progn last │ │ │ +00005340: 2074 2062 7574 6c61 7374 2061 6e64 2061 t butlast and a │ │ │ +00005350: 7070 656e 6420 2874 295d 2039 5d29 0a23 ppend (t)] 9]).# │ │ │ +00005360: 4039 3820 5468 6520 436f 6d6d 6f6e 204c @98 The Common L │ │ │ +00005370: 6973 7020 6064 6f27 206c 6f6f 702e 0a46 isp `do' loop..F │ │ │ +00005380: 6f72 6d61 7420 6973 3a20 2864 6f20 2828 ormat is: (do (( │ │ │ +00005390: 5641 5220 494e 4954 205b 5354 4550 5d29 VAR INIT [STEP]) │ │ │ +000053a0: 2e2e 2e29 2028 454e 442d 5445 5354 205b ...) (END-TEST [ │ │ │ +000053b0: 5245 5355 4c54 2e2e 2e5d 2920 424f 4459 RESULT...]) BODY │ │ │ +000053c0: 2e2e 2e29 1f0a 2864 6566 616c 6961 7320 ...)..(defalias │ │ │ +000053d0: 2764 6f20 2728 6d61 6372 6f20 2e20 235b 'do '(macro . #[ │ │ │ +000053e0: 2873 7465 7073 2065 6e64 7465 7374 2026 (steps endtest & │ │ │ +000053f0: 7265 7374 2062 6f64 7929 2022 c35c 6e09 rest body) ".\n. │ │ │ +00005400: 08c4 2487 2220 5b62 6f64 7920 656e 6474 ..$." [body endt │ │ │ +00005410: 6573 7420 7374 6570 7320 636c 2d65 7870 est steps cl-exp │ │ │ +00005420: 616e 642d 646f 2d6c 6f6f 7020 6e69 6c5d and-do-loop nil] │ │ │ +00005430: 2035 2028 2324 202e 2032 3133 3438 295d 5 (#$ . 21348)] │ │ │ +00005440: 2929 0a23 4031 3030 2054 6865 2043 6f6d )).#@100 The Com │ │ │ +00005450: 6d6f 6e20 4c69 7370 2060 646f 2a27 206c mon Lisp `do*' l │ │ │ +00005460: 6f6f 702e 0a46 6f72 6d61 7420 6973 3a20 oop..Format is: │ │ │ +00005470: 2864 6f2a 2028 2856 4152 2049 4e49 5420 (do* ((VAR INIT │ │ │ +00005480: 5b53 5445 505d 292e 2e2e 2920 2845 4e44 [STEP])...) (END │ │ │ +00005490: 2d54 4553 5420 5b52 4553 554c 542e 2e2e -TEST [RESULT... │ │ │ +000054a0: 5d29 2042 4f44 592e 2e2e 291f 0a28 6465 ]) BODY...)..(de │ │ │ +000054b0: 6661 6c69 6173 2027 646f 2a20 2728 6d61 falias 'do* '(ma │ │ │ +000054c0: 6372 6f20 2e20 235b 2873 7465 7073 2065 cro . #[(steps e │ │ │ +000054d0: 6e64 7465 7374 2026 7265 7374 2062 6f64 ndtest &rest bod │ │ │ +000054e0: 7929 2022 c35c 6e09 08c4 2487 2220 5b62 y) ".\n...$." [b │ │ │ +000054f0: 6f64 7920 656e 6474 6573 7420 7374 6570 ody endtest step │ │ │ +00005500: 7320 636c 2d65 7870 616e 642d 646f 2d6c s cl-expand-do-l │ │ │ +00005510: 6f6f 7020 745d 2035 2028 2324 202e 2032 oop t] 5 (#$ . 2 │ │ │ +00005520: 3135 3737 295d 2929 0a28 6465 6661 6c69 1577)])).(defali │ │ │ +00005530: 6173 2027 636c 2d65 7870 616e 642d 646f as 'cl-expand-do │ │ │ +00005540: 2d6c 6f6f 7020 235b 2873 7465 7073 2065 -loop #[(steps e │ │ │ +00005550: 6e64 7465 7374 2062 6f64 7920 7374 6172 ndtest body star │ │ │ +00005560: 2920 22c5 c60b ab83 c7aa 81c8 c9ca 5c6e ) "...........\n │ │ │ +00005570: 5c22 cbcc 0940 44cd 08c9 ce5c 6e5c 221c \"...@D....\n\". │ │ │ +00005580: cfc6 0c5c 2289 14ad 910b ac84 0c41 ac83 ...\"........A.. │ │ │ +00005590: d0aa 81d1 d2cd 0c5c 2242 4329 5c22 4242 .......\"BC)\"BB │ │ │ +000055a0: 0941 ae81 d342 4242 4587 2220 5b62 6f64 .A...BBBE." [bod │ │ │ +000055b0: 7920 656e 6474 6573 7420 7374 6570 7320 y endtest steps │ │ │ +000055c0: 7374 6172 2073 6574 7320 626c 6f63 6b20 star sets block │ │ │ +000055d0: 6e69 6c20 6c65 742a 206c 6574 206d 6170 nil let* let map │ │ │ +000055e0: 6361 7220 235b 2863 2920 2208 3aab 8708 car #[(c) ".:... │ │ │ +000055f0: 4008 4140 4487 0887 2220 5b63 5d20 325d @.A@D..." [c] 2] │ │ │ +00005600: 2077 6869 6c65 206e 6f74 2061 7070 656e while not appen │ │ │ +00005610: 6420 235b 2863 2920 2208 3aad 8b08 4141 d #[(c) ".:...AA │ │ │ +00005620: ad86 0840 c108 3844 8722 205b 6320 325d ...@..8D." [c 2] │ │ │ +00005630: 2033 5d20 6465 6c71 2073 6574 7120 7073 3] delq setq ps │ │ │ +00005640: 6574 7120 6170 706c 7920 286e 696c 295d etq apply (nil)] │ │ │ +00005650: 2031 335d 290a 2340 3137 3520 2864 6f6c 13]).#@175 (dol │ │ │ +00005660: 6973 7420 2856 4152 204c 4953 5420 5b52 ist (VAR LIST [R │ │ │ +00005670: 4553 554c 545d 2920 424f 4459 2e2e 2e29 ESULT]) BODY...) │ │ │ +00005680: 3a20 6c6f 6f70 206f 7665 7220 6120 6c69 : loop over a li │ │ │ +00005690: 7374 2e0a 4576 616c 7561 7465 2042 4f44 st..Evaluate BOD │ │ │ +000056a0: 5920 7769 7468 2056 4152 2062 6f75 6e64 Y with VAR bound │ │ │ +000056b0: 2074 6f20 6561 6368 2060 6361 7227 2066 to each `car' f │ │ │ +000056c0: 726f 6d20 4c49 5354 2c20 696e 2074 7572 rom LIST, in tur │ │ │ +000056d0: 6e2e 0a54 6865 6e20 6576 616c 7561 7465 n..Then evaluate │ │ │ +000056e0: 2052 4553 554c 5420 746f 2067 6574 2072 RESULT to get r │ │ │ +000056f0: 6574 7572 6e20 7661 6c75 652c 2064 6566 eturn value, def │ │ │ +00005700: 6175 6c74 206e 696c 2e1f 0a28 6465 6661 ault nil...(defa │ │ │ +00005710: 6c69 6173 2027 646f 6c69 7374 2027 286d lias 'dolist '(m │ │ │ +00005720: 6163 726f 202e 2023 5b28 7370 6563 2026 acro . #[(spec & │ │ │ +00005730: 7265 7374 2062 6f64 7929 2022 c3c4 211a rest body) "..!. │ │ │ +00005740: c5c6 c75c 6e09 4140 4409 4044 c85c 6ec9 ...\n.A@D.@D.\n. │ │ │ +00005750: 0940 ca5c 6e44 45cb 08c9 5c6e cc5c 6e44 .@.\nDE...\n.\nD │ │ │ +00005760: 4543 5c22 4242 4209 4141 ab8b c909 40c6 EC\"BBB.AA....@. │ │ │ +00005770: 4509 4141 42aa 81cd 4242 4245 2987 2220 E.AAB...BBBE)." │ │ │ +00005780: 5b62 6f64 7920 7370 6563 2074 656d 7020 [body spec temp │ │ │ +00005790: 6765 6e73 796d 2022 2d2d 646f 6c69 7374 gensym "--dolist │ │ │ +000057a0: 2d74 656d 702d 2d22 2062 6c6f 636b 206e -temp--" block n │ │ │ +000057b0: 696c 206c 6574 2077 6869 6c65 2073 6574 il let while set │ │ │ +000057c0: 7120 6361 7220 6170 7065 6e64 2063 6472 q car append cdr │ │ │ +000057d0: 2028 6e69 6c29 5d20 3133 2028 2324 202e (nil)] 13 (#$ . │ │ │ +000057e0: 2032 3231 3038 295d 2929 0a23 4032 3231 22108)])).#@221 │ │ │ +000057f0: 2028 646f 7469 6d65 7320 2856 4152 2043 (dotimes (VAR C │ │ │ +00005800: 4f55 4e54 205b 5245 5355 4c54 5d29 2042 OUNT [RESULT]) B │ │ │ +00005810: 4f44 592e 2e2e 293a 206c 6f6f 7020 6120 ODY...): loop a │ │ │ +00005820: 6365 7274 6169 6e20 6e75 6d62 6572 206f certain number o │ │ │ +00005830: 6620 7469 6d65 732e 0a45 7661 6c75 6174 f times..Evaluat │ │ │ +00005840: 6520 424f 4459 2077 6974 6820 5641 5220 e BODY with VAR │ │ │ +00005850: 626f 756e 6420 746f 2073 7563 6365 7373 bound to success │ │ │ +00005860: 6976 6520 696e 7465 6765 7273 2066 726f ive integers fro │ │ │ +00005870: 6d20 302c 2069 6e63 6c75 7369 7665 2c0a m 0, inclusive,. │ │ │ +00005880: 746f 2043 4f55 4e54 2c20 6578 636c 7573 to COUNT, exclus │ │ │ +00005890: 6976 652e 2020 5468 656e 2065 7661 6c75 ive. Then evalu │ │ │ +000058a0: 6174 6520 5245 5355 4c54 2074 6f20 6765 ate RESULT to ge │ │ │ +000058b0: 7420 7265 7475 726e 2076 616c 7565 2c20 t return value, │ │ │ +000058c0: 6465 6661 756c 740a 6e69 6c2e 1f0a 2864 default.nil...(d │ │ │ +000058d0: 6566 616c 6961 7320 2764 6f74 696d 6573 efalias 'dotimes │ │ │ +000058e0: 2027 286d 6163 726f 202e 2023 5b28 7370 '(macro . #[(sp │ │ │ +000058f0: 6563 2026 7265 7374 2062 6f64 7929 2022 ec &rest body) " │ │ │ +00005900: c3c4 2119 c5c6 c709 5c6e 4140 445c 6e40 ..!.....\nA@D\n@ │ │ │ +00005910: c844 44c9 ca5c 6e40 0945 cb08 cc5c 6e40 .DD..\n@.E...\n@ │ │ │ +00005920: 4443 5c22 4242 5c6e 4141 ae81 cd42 4242 DC\"BB\nAA...BBB │ │ │ +00005930: 4529 8722 205b 626f 6479 2074 656d 7020 E)." [body temp │ │ │ +00005940: 7370 6563 2067 656e 7379 6d20 222d 2d64 spec gensym "--d │ │ │ +00005950: 6f74 696d 6573 2d74 656d 702d 2d22 2062 otimes-temp--" b │ │ │ +00005960: 6c6f 636b 206e 696c 206c 6574 2030 2077 lock nil let 0 w │ │ │ +00005970: 6869 6c65 203c 2061 7070 656e 6420 696e hile < append in │ │ │ +00005980: 6366 2028 6e69 6c29 5d20 3130 2028 2324 cf (nil)] 10 (#$ │ │ │ +00005990: 202e 2032 3235 3133 295d 2929 0a23 4031 . 22513)])).#@1 │ │ │ +000059a0: 3536 2028 646f 7379 6d62 6f6c 7320 2856 56 (dosymbols (V │ │ │ +000059b0: 4152 205b 4f42 4152 5241 5920 5b52 4553 AR [OBARRAY [RES │ │ │ +000059c0: 554c 545d 5d29 2042 4f44 592e 2e2e 293a ULT]]) BODY...): │ │ │ +000059d0: 206c 6f6f 7020 6f76 6572 2061 6c6c 2073 loop over all s │ │ │ +000059e0: 796d 626f 6c73 2e0a 4576 616c 7561 7465 ymbols..Evaluate │ │ │ +000059f0: 2042 4f44 5920 7769 7468 2056 4152 2062 BODY with VAR b │ │ │ +00005a00: 6f75 6e64 2074 6f20 6561 6368 2069 6e74 ound to each int │ │ │ +00005a10: 6572 6e65 6420 7379 6d62 6f6c 2c20 6f72 erned symbol, or │ │ │ +00005a20: 2074 6f20 6561 6368 2073 796d 626f 6c0a to each symbol. │ │ │ +00005a30: 6672 6f6d 204f 4241 5252 4159 2e1f 0a28 from OBARRAY...( │ │ │ +00005a40: 6465 6661 6c69 6173 2027 646f 2d73 796d defalias 'do-sym │ │ │ +00005a50: 626f 6c73 2027 286d 6163 726f 202e 2023 bols '(macro . # │ │ │ +00005a60: 5b28 7370 6563 2026 7265 7374 2062 6f64 [(spec &rest bod │ │ │ +00005a70: 7929 2022 c2c3 c409 4043 c5c6 c709 4043 y) "....@C....@C │ │ │ +00005a80: 0842 4244 0941 40ad 8409 4140 4342 4209 .BBD.A@...A@CBB. │ │ │ +00005a90: 4141 4046 4587 2220 5b62 6f64 7920 7370 AA@FE." [body sp │ │ │ +00005aa0: 6563 2062 6c6f 636b 206e 696c 206c 6574 ec block nil let │ │ │ +00005ab0: 206d 6170 6174 6f6d 7320 6675 6e63 7469 mapatoms functi │ │ │ +00005ac0: 6f6e 206c 616d 6264 615d 2039 2028 2324 on lambda] 9 (#$ │ │ │ +00005ad0: 202e 2032 3239 3437 295d 2929 0a28 6465 . 22947)])).(de │ │ │ +00005ae0: 6661 6c69 6173 2027 646f 2d61 6c6c 2d73 falias 'do-all-s │ │ │ +00005af0: 796d 626f 6c73 2027 286d 6163 726f 202e ymbols '(macro . │ │ │ +00005b00: 2023 5b28 7370 6563 2026 7265 7374 2062 #[(spec &rest b │ │ │ +00005b10: 6f64 7929 2022 c209 40c3 0941 4045 0842 ody) "..@..A@E.B │ │ │ +00005b20: 4287 2220 5b62 6f64 7920 7370 6563 2064 B." [body spec d │ │ │ +00005b30: 6f2d 7379 6d62 6f6c 7320 6e69 6c5d 2034 o-symbols nil] 4 │ │ │ +00005b40: 5d29 290a 2340 3230 3520 2870 7365 7471 ])).#@205 (psetq │ │ │ +00005b50: 2053 594d 2056 414c 2053 594d 2056 414c SYM VAL SYM VAL │ │ │ +00005b60: 202e 2e2e 293a 2073 6574 2053 594d 7320 ...): set SYMs │ │ │ +00005b70: 746f 2074 6865 2076 616c 7565 7320 5641 to the values VA │ │ │ +00005b80: 4c73 2069 6e20 7061 7261 6c6c 656c 2e0a Ls in parallel.. │ │ │ +00005b90: 5468 6973 2069 7320 6c69 6b65 2060 7365 This is like `se │ │ │ +00005ba0: 7471 272c 2065 7863 6570 7420 7468 6174 tq', except that │ │ │ +00005bb0: 2061 6c6c 2056 414c 2066 6f72 6d73 2061 all VAL forms a │ │ │ +00005bc0: 7265 2065 7661 6c75 6174 6564 2028 696e re evaluated (in │ │ │ +00005bd0: 206f 7264 6572 290a 6265 666f 7265 2061 order).before a │ │ │ +00005be0: 7373 6967 6e69 6e67 2061 6e79 2073 796d ssigning any sym │ │ │ +00005bf0: 626f 6c73 2053 594d 2074 6f20 7468 6520 bols SYM to the │ │ │ +00005c00: 636f 7272 6573 706f 6e64 696e 6720 7661 corresponding va │ │ │ +00005c10: 6c75 6573 2e1f 0a28 6465 6661 6c69 6173 lues...(defalias │ │ │ +00005c20: 2027 7073 6574 7120 2728 6d61 6372 6f20 'psetq '(macro │ │ │ +00005c30: 2e20 235b 2826 7265 7374 2061 7267 7329 . #[(&rest args) │ │ │ +00005c40: 2022 c108 4287 2220 5b61 7267 7320 7073 "..B." [args ps │ │ │ +00005c50: 6574 665d 2032 2028 2324 202e 2032 3333 etf] 2 (#$ . 233 │ │ │ +00005c60: 3730 295d 2929 0a23 4034 3434 2028 7072 70)])).#@444 (pr │ │ │ +00005c70: 6f67 7620 5359 4d42 4f4c 5320 5641 4c55 ogv SYMBOLS VALU │ │ │ +00005c80: 4553 2042 4f44 592e 2e2e 293a 2062 696e ES BODY...): bin │ │ │ +00005c90: 6420 5359 4d42 4f4c 5320 746f 2056 414c d SYMBOLS to VAL │ │ │ +00005ca0: 5545 5320 6479 6e61 6d69 6361 6c6c 7920 UES dynamically │ │ │ +00005cb0: 696e 2042 4f44 592e 0a54 6865 2066 6f72 in BODY..The for │ │ │ +00005cc0: 6d73 2053 594d 424f 4c53 2061 6e64 2056 ms SYMBOLS and V │ │ │ +00005cd0: 414c 5545 5320 6172 6520 6576 616c 7561 ALUES are evalua │ │ │ +00005ce0: 7465 642c 2061 6e64 206d 7573 7420 6576 ted, and must ev │ │ │ +00005cf0: 616c 7561 7465 2074 6f20 6c69 7374 732e aluate to lists. │ │ │ +00005d00: 0a45 6163 6820 5359 4d42 4f4c 2069 6e20 .Each SYMBOL in │ │ │ +00005d10: 7468 6520 6669 7273 7420 6c69 7374 2069 the first list i │ │ │ +00005d20: 7320 626f 756e 6420 746f 2074 6865 2063 s bound to the c │ │ │ +00005d30: 6f72 7265 7370 6f6e 6469 6e67 2056 414c orresponding VAL │ │ │ +00005d40: 5545 2069 6e20 7468 650a 7365 636f 6e64 UE in the.second │ │ │ +00005d50: 206c 6973 7420 286f 7220 6d61 6465 2075 list (or made u │ │ │ +00005d60: 6e62 6f75 6e64 2069 6620 5641 4c55 4553 nbound if VALUES │ │ │ +00005d70: 2069 7320 7368 6f72 7465 7220 7468 616e is shorter than │ │ │ +00005d80: 2053 594d 424f 4c53 293b 2074 6865 6e20 SYMBOLS); then │ │ │ +00005d90: 7468 650a 424f 4459 2066 6f72 6d73 2061 the.BODY forms a │ │ │ +00005da0: 7265 2065 7865 6375 7465 6420 616e 6420 re executed and │ │ │ +00005db0: 7468 6569 7220 7265 7375 6c74 2069 7320 their result is │ │ │ +00005dc0: 7265 7475 726e 6564 2e20 2054 6869 7320 returned. This │ │ │ +00005dd0: 6973 206d 7563 6820 6c69 6b65 0a61 2060 is much like.a ` │ │ │ +00005de0: 6c65 7427 2066 6f72 6d2c 2065 7863 6570 let' form, excep │ │ │ +00005df0: 7420 7468 6174 2074 6865 206c 6973 7420 t that the list │ │ │ +00005e00: 6f66 2073 796d 626f 6c73 2063 616e 2062 of symbols can b │ │ │ +00005e10: 6520 636f 6d70 7574 6564 2061 7420 7275 e computed at ru │ │ │ +00005e20: 6e2d 7469 6d65 2e1f 0a28 6465 6661 6c69 n-time...(defali │ │ │ +00005e30: 6173 2027 7072 6f67 7620 2728 6d61 6372 as 'progv '(macr │ │ │ +00005e40: 6f20 2e20 235b 2873 796d 626f 6c73 2076 o . #[(symbols v │ │ │ +00005e50: 616c 7565 7320 2672 6573 7420 626f 6479 alues &rest body │ │ │ +00005e60: 2920 22c3 c4c5 c6c7 5c6e 0945 0842 42c8 ) ".....\n.E.BB. │ │ │ +00005e70: 4545 8722 205b 626f 6479 2076 616c 7565 EE." [body value │ │ │ +00005e80: 7320 7379 6d62 6f6c 7320 6c65 7420 2828 s symbols let (( │ │ │ +00005e90: 636c 2d70 726f 6776 2d73 6176 6520 6e69 cl-progv-save ni │ │ │ +00005ea0: 6c29 2920 756e 7769 6e64 2d70 726f 7465 l)) unwind-prote │ │ │ +00005eb0: 6374 2070 726f 676e 2063 6c2d 7072 6f67 ct progn cl-prog │ │ │ +00005ec0: 762d 6265 666f 7265 2028 636c 2d70 726f v-before (cl-pro │ │ │ +00005ed0: 6776 2d61 6674 6572 295d 2037 2028 2324 gv-after)] 7 (#$ │ │ │ +00005ee0: 202e 2032 3336 3631 295d 2929 0a23 4033 . 23661)])).#@3 │ │ │ +00005ef0: 3532 2028 666c 6574 2028 2846 554e 4320 52 (flet ((FUNC │ │ │ +00005f00: 4152 474c 4953 5420 424f 4459 2e2e 2e29 ARGLIST BODY...) │ │ │ +00005f10: 202e 2e2e 2920 464f 524d 2e2e 2e29 3a20 ...) FORM...): │ │ │ +00005f20: 6d61 6b65 2074 656d 706f 7261 7279 2066 make temporary f │ │ │ +00005f30: 756e 6374 696f 6e20 6465 666e 732e 0a54 unction defns..T │ │ │ +00005f40: 6869 7320 6973 2061 6e20 616e 616c 6f67 his is an analog │ │ │ +00005f50: 7565 206f 6620 606c 6574 2720 7468 6174 ue of `let' that │ │ │ +00005f60: 206f 7065 7261 7465 7320 6f6e 2074 6865 operates on the │ │ │ +00005f70: 2066 756e 6374 696f 6e20 6365 6c6c 206f function cell o │ │ │ +00005f80: 6620 4655 4e43 0a72 6174 6865 7220 7468 f FUNC.rather th │ │ │ +00005f90: 616e 2069 7473 2076 616c 7565 2063 656c an its value cel │ │ │ +00005fa0: 6c2e 2020 5468 6520 464f 524d 7320 6172 l. The FORMs ar │ │ │ +00005fb0: 6520 6576 616c 7561 7465 6420 7769 7468 e evaluated with │ │ │ +00005fc0: 2074 6865 2073 7065 6369 6669 6564 0a66 the specified.f │ │ │ +00005fd0: 756e 6374 696f 6e20 6465 6669 6e69 7469 unction definiti │ │ │ +00005fe0: 6f6e 7320 696e 2070 6c61 6365 2c20 7468 ons in place, th │ │ │ +00005ff0: 656e 2074 6865 2064 6566 696e 6974 696f en the definitio │ │ │ +00006000: 6e73 2061 7265 2075 6e64 6f6e 6520 2874 ns are undone (t │ │ │ +00006010: 6865 2046 554e 4373 0a67 6f20 6261 636b he FUNCs.go back │ │ │ +00006020: 2074 6f20 7468 6569 7220 7072 6576 696f to their previo │ │ │ +00006030: 7573 2064 6566 696e 6974 696f 6e73 2c20 us definitions, │ │ │ +00006040: 6f72 206c 6163 6b20 7468 6572 656f 6629 or lack thereof) │ │ │ +00006050: 2e1f 0a28 6465 6661 6c69 6173 2027 666c ...(defalias 'fl │ │ │ +00006060: 6574 2027 286d 6163 726f 202e 2023 5b28 et '(macro . #[( │ │ │ +00006070: 6269 6e64 696e 6773 2026 7265 7374 2062 bindings &rest b │ │ │ +00006080: 6f64 7929 2022 c2c3 c409 5c22 0842 4287 ody) "....\".BB. │ │ │ +00006090: 2220 5b62 6f64 7920 6269 6e64 696e 6773 " [body bindings │ │ │ +000060a0: 206c 6574 662a 206d 6170 6361 7220 235b letf* mapcar #[ │ │ │ +000060b0: 2878 2920 22c4 0b40 21ab 880b 404b a2c5 (x) "..@!...@K.. │ │ │ +000060c0: 61ac 870b 4008 b741 ab84 c6c7 2188 c8c9 a...@..A....!... │ │ │ +000060d0: 0b41 40ca 0b40 0b41 4142 4245 441a cb20 .A@..@.AABBED.. │ │ │ +000060e0: ab8e ccc1 21ab 890b 40cd 5c6e 2142 0942 ....!...@.\n!B.B │ │ │ +000060f0: 11ce cf0b 4044 445c 6e29 4487 2220 5b63 ....@DD\n)D." [c │ │ │ +00006100: 6c2d 6d61 6372 6f2d 656e 7669 726f 6e6d l-macro-environm │ │ │ +00006110: 656e 7420 6279 7465 2d63 6f6d 7069 6c65 ent byte-compile │ │ │ +00006120: 2d66 756e 6374 696f 6e2d 656e 7669 726f -function-enviro │ │ │ +00006130: 6e6d 656e 7420 6675 6e63 2078 2066 626f nment func x fbo │ │ │ +00006140: 756e 6470 206d 6163 726f 2065 7272 6f72 undp macro error │ │ │ +00006150: 2022 5573 6520 606c 6162 656c 7327 2c20 "Use `labels', │ │ │ +00006160: 6e6f 7420 6066 6c65 7427 2c20 746f 2072 not `flet', to r │ │ │ +00006170: 6562 696e 6420 6d61 6372 6f20 6e61 6d65 ebind macro name │ │ │ +00006180: 7322 2066 756e 6374 696f 6e2a 206c 616d s" function* lam │ │ │ +00006190: 6264 6120 626c 6f63 6b20 636c 2d63 6f6d bda block cl-com │ │ │ +000061a0: 7069 6c69 6e67 2d66 696c 6520 626f 756e piling-file boun │ │ │ +000061b0: 6470 2065 7661 6c20 7379 6d62 6f6c 2d66 dp eval symbol-f │ │ │ +000061c0: 756e 6374 696f 6e20 7175 6f74 655d 2036 unction quote] 6 │ │ │ +000061d0: 5d5d 2034 2028 2324 202e 2032 3433 3037 ]] 4 (#$ . 24307 │ │ │ +000061e0: 295d 2929 0a23 4032 3237 2028 6c61 6265 )])).#@227 (labe │ │ │ +000061f0: 6c73 2028 2846 554e 4320 4152 474c 4953 ls ((FUNC ARGLIS │ │ │ +00006200: 5420 424f 4459 2e2e 2e29 202e 2e2e 2920 T BODY...) ...) │ │ │ +00006210: 464f 524d 2e2e 2e29 3a20 6d61 6b65 2074 FORM...): make t │ │ │ +00006220: 656d 706f 7261 7279 2066 756e 6320 6269 emporary func bi │ │ │ +00006230: 6e64 696e 6773 2e0a 5468 6973 2069 7320 ndings..This is │ │ │ +00006240: 6c69 6b65 2060 666c 6574 272c 2065 7863 like `flet', exc │ │ │ +00006250: 6570 7420 7468 6520 6269 6e64 696e 6773 ept the bindings │ │ │ +00006260: 2061 7265 206c 6578 6963 616c 2069 6e73 are lexical ins │ │ │ +00006270: 7465 6164 206f 6620 6479 6e61 6d69 632e tead of dynamic. │ │ │ +00006280: 0a55 6e6c 696b 6520 6066 6c65 7427 2c20 .Unlike `flet', │ │ │ +00006290: 7468 6973 206d 6163 726f 2069 7320 6675 this macro is fu │ │ │ +000062a0: 6c6c 7920 636f 6d70 6c69 616e 7420 7769 lly compliant wi │ │ │ +000062b0: 7468 2074 6865 2043 6f6d 6d6f 6e20 4c69 th the Common Li │ │ │ +000062c0: 7370 2073 7461 6e64 6172 642e 1f0a 2864 sp standard...(d │ │ │ +000062d0: 6566 616c 6961 7320 276c 6162 656c 7320 efalias 'labels │ │ │ +000062e0: 2728 6d61 6372 6f20 2e20 235b 2862 696e '(macro . #[(bin │ │ │ +000062f0: 6469 6e67 7320 2672 6573 7420 626f 6479 dings &rest body │ │ │ +00006300: 2920 22c6 890c 1c1d 1b5c 6eab abc7 2089 ) "......\n... . │ │ │ +00006310: 190b 4213 c8c9 5c6e 4041 4244 0d42 1509 ..B...\n@ABD.B.. │ │ │ +00006320: 0d42 155c 6e89 4112 4040 c9ca cbcc cd09 .B.\n.A.@@...... │ │ │ +00006330: 44ce 4646 0c42 1429 aa52 cfd0 0bd1 0d42 D.FF.B.).R.....B │ │ │ +00006340: 0842 4242 0c5c 222b 8722 205b 626f 6479 .BBB.\"+." [body │ │ │ +00006350: 2076 6172 2062 696e 6469 6e67 7320 7661 var bindings va │ │ │ +00006360: 7273 2063 6c2d 6d61 6372 6f2d 656e 7669 rs cl-macro-envi │ │ │ +00006370: 726f 6e6d 656e 7420 7365 7473 206e 696c ronment sets nil │ │ │ +00006380: 2067 656e 7379 6d20 6675 6e63 7469 6f6e gensym function │ │ │ +00006390: 2a20 6c61 6d62 6461 2028 2672 6573 7420 * lambda (&rest │ │ │ +000063a0: 636c 2d6c 6162 656c 732d 6172 6773 2920 cl-labels-args) │ │ │ +000063b0: 6c69 7374 2a20 2766 756e 6361 6c6c 2071 list* 'funcall q │ │ │ +000063c0: 756f 7465 2063 6c2d 6c61 6265 6c73 2d61 uote cl-labels-a │ │ │ +000063d0: 7267 7320 636c 2d6d 6163 726f 6578 7061 rgs cl-macroexpa │ │ │ +000063e0: 6e64 2d61 6c6c 206c 6578 6963 616c 2d6c nd-all lexical-l │ │ │ +000063f0: 6574 2073 6574 715d 2038 2028 2324 202e et setq] 8 (#$ . │ │ │ +00006400: 2032 3530 3637 295d 2929 0a23 4031 3336 25067)])).#@136 │ │ │ +00006410: 2028 6d61 6372 6f6c 6574 2028 284e 414d (macrolet ((NAM │ │ │ +00006420: 4520 4152 474c 4953 5420 424f 4459 2e2e E ARGLIST BODY.. │ │ │ +00006430: 2e29 202e 2e2e 2920 464f 524d 2e2e 2e29 .) ...) FORM...) │ │ │ +00006440: 3a20 6d61 6b65 2074 656d 706f 7261 7279 : make temporary │ │ │ +00006450: 206d 6163 726f 2064 6566 6e73 2e0a 5468 macro defns..Th │ │ │ +00006460: 6973 2069 7320 6c69 6b65 2060 666c 6574 is is like `flet │ │ │ +00006470: 272c 2062 7574 2066 6f72 206d 6163 726f ', but for macro │ │ │ +00006480: 7320 696e 7374 6561 6420 6f66 2066 756e s instead of fun │ │ │ +00006490: 6374 696f 6e73 2e1f 0a28 6465 6661 6c69 ctions...(defali │ │ │ +000064a0: 6173 2027 6d61 6372 6f6c 6574 2027 286d as 'macrolet '(m │ │ │ +000064b0: 6163 726f 202e 2023 5b28 6269 6e64 696e acro . #[(bindin │ │ │ +000064c0: 6773 2026 7265 7374 2062 6f64 7929 2022 gs &rest body) " │ │ │ +000064d0: 0c41 ab8c c50c 4043 c50c 410b 4242 4587 .A....@C..A.BBE. │ │ │ +000064e0: 0cac 84c6 0b42 870c 4040 1ac7 0c40 415c .....B..@@...@A\ │ │ │ +000064f0: 6e5c 2219 c809 4021 88c9 c60b 425c 6eca n\"...@!....B\n. │ │ │ +00006500: 0941 4242 0842 5c22 2a87 2220 5b63 6c2d .ABB.B\"*." [cl- │ │ │ +00006510: 6d61 6372 6f2d 656e 7669 726f 6e6d 656e macro-environmen │ │ │ +00006520: 7420 7265 7320 6e61 6d65 2062 6f64 7920 t res name body │ │ │ +00006530: 6269 6e64 696e 6773 206d 6163 726f 6c65 bindings macrole │ │ │ +00006540: 7420 7072 6f67 6e20 636c 2d74 7261 6e73 t progn cl-trans │ │ │ +00006550: 666f 726d 2d6c 616d 6264 6120 6576 616c form-lambda eval │ │ │ +00006560: 2063 6c2d 6d61 6372 6f65 7870 616e 642d cl-macroexpand- │ │ │ +00006570: 616c 6c20 6c61 6d62 6461 5d20 3520 2823 all lambda] 5 (# │ │ │ +00006580: 2420 2e20 3235 3631 3729 5d29 290a 2340 $ . 25617)])).#@ │ │ │ +00006590: 3231 3820 2873 796d 626f 6c2d 6d61 6372 218 (symbol-macr │ │ │ +000065a0: 6f6c 6574 2028 284e 414d 4520 4558 5041 olet ((NAME EXPA │ │ │ +000065b0: 4e53 494f 4e29 202e 2e2e 2920 464f 524d NSION) ...) FORM │ │ │ +000065c0: 2e2e 2e29 3a20 6d61 6b65 2073 796d 626f ...): make symbo │ │ │ +000065d0: 6c20 6d61 6372 6f20 6465 666e 732e 0a57 l macro defns..W │ │ │ +000065e0: 6974 6869 6e20 7468 6520 626f 6479 2046 ithin the body F │ │ │ +000065f0: 4f52 4d73 2c20 7265 6665 7265 6e63 6573 ORMs, references │ │ │ +00006600: 2074 6f20 7468 6520 7661 7269 6162 6c65 to the variable │ │ │ +00006610: 204e 414d 4520 7769 6c6c 2062 6520 7265 NAME will be re │ │ │ +00006620: 706c 6163 6564 0a62 7920 4558 5041 4e53 placed.by EXPANS │ │ │ +00006630: 494f 4e2c 2061 6e64 2028 7365 7471 204e ION, and (setq N │ │ │ +00006640: 414d 4520 2e2e 2e29 2077 696c 6c20 6163 AME ...) will ac │ │ │ +00006650: 7420 6c69 6b65 2028 7365 7466 2045 5850 t like (setf EXP │ │ │ +00006660: 414e 5349 4f4e 202e 2e2e 292e 1f0a 2864 ANSION ...)...(d │ │ │ +00006670: 6566 616c 6961 7320 2773 796d 626f 6c2d efalias 'symbol- │ │ │ +00006680: 6d61 6372 6f6c 6574 2027 286d 6163 726f macrolet '(macro │ │ │ +00006690: 202e 2023 5b28 6269 6e64 696e 6773 2026 . #[(bindings & │ │ │ +000066a0: 7265 7374 2062 6f64 7929 2022 5c6e 41ab rest body) "\nA. │ │ │ +000066b0: 8cc3 5c6e 4043 c35c 6e41 0942 4245 875c ..\n@C.\nA.BBE.\ │ │ │ +000066c0: 6eac 84c4 0942 87c5 c409 42c6 5c6e 4040 n....B....B.\n@@ │ │ │ +000066d0: 215c 6e40 4140 4408 425c 2287 2220 5b63 !\n@A@D.B\"." [c │ │ │ +000066e0: 6c2d 6d61 6372 6f2d 656e 7669 726f 6e6d l-macro-environm │ │ │ +000066f0: 656e 7420 626f 6479 2062 696e 6469 6e67 ent body binding │ │ │ +00006700: 7320 7379 6d62 6f6c 2d6d 6163 726f 6c65 s symbol-macrole │ │ │ +00006710: 7420 7072 6f67 6e20 636c 2d6d 6163 726f t progn cl-macro │ │ │ +00006720: 6578 7061 6e64 2d61 6c6c 2073 796d 626f expand-all symbo │ │ │ +00006730: 6c2d 6e61 6d65 5d20 3520 2823 2420 2e20 l-name] 5 (#$ . │ │ │ +00006740: 3236 3030 3429 5d29 290a 2862 7974 652d 26004)])).(byte- │ │ │ +00006750: 636f 6465 2022 c108 4210 c2c1 21ac 85c3 code "..B...!... │ │ │ +00006760: c1c4 5c22 88c4 8722 205b 6375 7272 656e ..\"..." [curren │ │ │ +00006770: 742d 6c6f 6164 2d6c 6973 7420 636c 2d63 t-load-list cl-c │ │ │ +00006780: 6c6f 7375 7265 2d76 6172 7320 6465 6661 losure-vars defa │ │ │ +00006790: 756c 742d 626f 756e 6470 2073 6574 2d64 ult-boundp set-d │ │ │ +000067a0: 6566 6175 6c74 206e 696c 5d20 3329 0a23 efault nil] 3).# │ │ │ +000067b0: 4031 3731 2028 6c65 7869 6361 6c2d 6c65 @171 (lexical-le │ │ │ +000067c0: 7420 4249 4e44 494e 4753 2042 4f44 592e t BINDINGS BODY. │ │ │ +000067d0: 2e2e 293a 206c 696b 6520 606c 6574 272c ..): like `let', │ │ │ +000067e0: 2062 7574 206c 6578 6963 616c 6c79 2073 but lexically s │ │ │ +000067f0: 636f 7065 642e 0a54 6865 206d 6169 6e20 coped..The main │ │ │ +00006800: 7669 7369 626c 6520 6469 6666 6572 656e visible differen │ │ │ +00006810: 6365 2069 7320 7468 6174 206c 616d 6264 ce is that lambd │ │ │ +00006820: 6173 2069 6e73 6964 6520 424f 4459 2077 as inside BODY w │ │ │ +00006830: 696c 6c20 6372 6561 7465 0a6c 6578 6963 ill create.lexic │ │ │ +00006840: 616c 2063 6c6f 7375 7265 7320 6173 2069 al closures as i │ │ │ +00006850: 6e20 436f 6d6d 6f6e 204c 6973 702e 1f0a n Common Lisp... │ │ │ +00006860: 2864 6566 616c 6961 7320 276c 6578 6963 (defalias 'lexic │ │ │ +00006870: 616c 2d6c 6574 2027 286d 6163 726f 202e al-let '(macro . │ │ │ +00006880: 2023 5b28 6269 6e64 696e 6773 2026 7265 #[(bindings &re │ │ │ +00006890: 7374 2062 6f64 7929 2022 0c1c c6c7 5c6e st body) "....\n │ │ │ +000068a0: 5c22 1dc8 c909 42c6 ca0d 5c22 cb43 a408 \"....B...\".C.. │ │ │ +000068b0: a45c 221b cc0c 2140 cd4e ac8f cec6 cf0d .\"...!@.N...... │ │ │ +000068c0: 5c22 d0c6 d10d 5c22 0b5c 2245 aa8f cec6 \"....\".\"E.... │ │ │ +000068d0: d20d 5c22 d3d4 d5c6 d60d 5c22 230b 462b ..\"......\"#.F+ │ │ │ +000068e0: 8722 205b 636c 2d6d 6163 726f 2d65 6e76 ." [cl-macro-env │ │ │ +000068f0: 6972 6f6e 6d65 6e74 2062 6f64 7920 6269 ironment body bi │ │ │ +00006900: 6e64 696e 6773 2065 626f 6479 2063 6c2d ndings ebody cl- │ │ │ +00006910: 636c 6f73 7572 652d 7661 7273 2076 6172 closure-vars var │ │ │ +00006920: 7320 6d61 7063 6172 2023 5b28 7829 2022 s mapcar #[(x) " │ │ │ +00006930: 093a ac83 0943 11c2 c3c4 0940 5c22 2108 .:...C.....@\"!. │ │ │ +00006940: 4210 0940 0941 4008 4045 8722 205b 636c B..@.A@.@E." [cl │ │ │ +00006950: 2d63 6c6f 7375 7265 2d76 6172 7320 7820 -closure-vars x │ │ │ +00006960: 6765 6e73 796d 2066 6f72 6d61 7420 222d gensym format "- │ │ │ +00006970: 2d25 732d 2d22 5d20 345d 2063 6c2d 6d61 -%s--"] 4] cl-ma │ │ │ +00006980: 6372 6f65 7870 616e 642d 616c 6c20 7072 croexpand-all pr │ │ │ +00006990: 6f67 6e20 235b 2878 2920 22c1 0840 21c2 ogn #[(x) "..@!. │ │ │ +000069a0: 0841 4140 44c3 4587 2220 5b78 2073 796d .AA@D.E." [x sym │ │ │ +000069b0: 626f 6c2d 6e61 6d65 2073 796d 626f 6c2d bol-name symbol- │ │ │ +000069c0: 7661 6c75 6520 745d 2033 5d20 2864 6566 value t] 3] (def │ │ │ +000069d0: 756e 202e 2063 6c2d 6465 6675 6e2d 6578 un . cl-defun-ex │ │ │ +000069e0: 7061 6e64 6572 2920 6c61 7374 2075 7365 pander) last use │ │ │ +000069f0: 6420 6c65 7420 235b 2878 2920 2208 4141 d let #[(x) ".AA │ │ │ +00006a00: 4008 4140 4487 2220 5b78 5d20 325d 2073 @.A@D." [x] 2] s │ │ │ +00006a10: 7562 6c69 7320 235b 2878 2920 2208 4141 ublis #[(x) ".AA │ │ │ +00006a20: 40c1 0841 4140 4442 8722 205b 7820 7175 @..AA@DB." [x qu │ │ │ +00006a30: 6f74 655d 2033 5d20 235b 2878 2920 2208 ote] 3] #[(x) ". │ │ │ +00006a40: 4141 40c1 c2c3 0840 5c22 4444 8722 205b AA@....@\"DD." [ │ │ │ +00006a50: 7820 6d61 6b65 2d73 796d 626f 6c20 666f x make-symbol fo │ │ │ +00006a60: 726d 6174 2022 2d2d 2573 2d2d 225d 2035 rmat "--%s--"] 5 │ │ │ +00006a70: 5d20 6170 706c 7920 6170 7065 6e64 2028 ] apply append ( │ │ │ +00006a80: 7365 7466 2920 235b 2878 2920 22c1 0841 setf) #[(x) "..A │ │ │ +00006a90: 4140 4408 4140 4487 2220 5b78 2073 796d A@D.A@D." [x sym │ │ │ +00006aa0: 626f 6c2d 7661 6c75 655d 2032 5d5d 2038 bol-value] 2]] 8 │ │ │ +00006ab0: 2028 2324 202e 2032 3635 3439 295d 2929 (#$ . 26549)])) │ │ │ +00006ac0: 0a23 4031 3733 2028 6c65 7869 6361 6c2d .#@173 (lexical- │ │ │ +00006ad0: 6c65 742a 2042 494e 4449 4e47 5320 424f let* BINDINGS BO │ │ │ +00006ae0: 4459 2e2e 2e29 3a20 6c69 6b65 2060 6c65 DY...): like `le │ │ │ +00006af0: 742a 272c 2062 7574 206c 6578 6963 616c t*', but lexical │ │ │ +00006b00: 6c79 2073 636f 7065 642e 0a54 6865 206d ly scoped..The m │ │ │ +00006b10: 6169 6e20 7669 7369 626c 6520 6469 6666 ain visible diff │ │ │ +00006b20: 6572 656e 6365 2069 7320 7468 6174 206c erence is that l │ │ │ +00006b30: 616d 6264 6173 2069 6e73 6964 6520 424f ambdas inside BO │ │ │ +00006b40: 4459 2077 696c 6c20 6372 6561 7465 0a6c DY will create.l │ │ │ +00006b50: 6578 6963 616c 2063 6c6f 7375 7265 7320 exical closures │ │ │ +00006b60: 6173 2069 6e20 436f 6d6d 6f6e 204c 6973 as in Common Lis │ │ │ +00006b70: 702e 1f0a 2864 6566 616c 6961 7320 276c p...(defalias 'l │ │ │ +00006b80: 6578 6963 616c 2d6c 6574 2a20 2728 6d61 exical-let* '(ma │ │ │ +00006b90: 6372 6f20 2e20 235b 2862 696e 6469 6e67 cro . #[(binding │ │ │ +00006ba0: 7320 2672 6573 7420 626f 6479 2920 2209 s &rest body) ". │ │ │ +00006bb0: ac84 c208 4287 c309 2111 09ab 8ec4 0989 ....B...!....... │ │ │ +00006bc0: 4111 4043 0842 4243 10aa 6f08 4087 2220 A.@C.BBC..o.@." │ │ │ +00006bd0: 5b62 6f64 7920 6269 6e64 696e 6773 2070 [body bindings p │ │ │ +00006be0: 726f 676e 2072 6576 6572 7365 206c 6578 rogn reverse lex │ │ │ +00006bf0: 6963 616c 2d6c 6574 5d20 3320 2823 2420 ical-let] 3 (#$ │ │ │ +00006c00: 2e20 3237 3333 3529 5d29 290a 2864 6566 . 27335)])).(def │ │ │ +00006c10: 616c 6961 7320 2763 6c2d 6465 6675 6e2d alias 'cl-defun- │ │ │ +00006c20: 6578 7061 6e64 6572 2023 5b28 6675 6e63 expander #[(func │ │ │ +00006c30: 2026 7265 7374 2072 6573 7429 2022 c2c3 &rest rest) ".. │ │ │ +00006c40: c409 44c5 c608 4244 45c4 0944 4587 2220 ..D...BDE..DE." │ │ │ +00006c50: 5b72 6573 7420 6675 6e63 2070 726f 676e [rest func progn │ │ │ +00006c60: 2064 6566 616c 6961 7320 7175 6f74 6520 defalias quote │ │ │ +00006c70: 6675 6e63 7469 6f6e 206c 616d 6264 615d function lambda] │ │ │ +00006c80: 2036 5d29 0a23 4034 3131 2028 6d75 6c74 6]).#@411 (mult │ │ │ +00006c90: 6970 6c65 2d76 616c 7565 2d62 696e 6420 iple-value-bind │ │ │ +00006ca0: 2853 594d 2053 594d 2e2e 2e29 2046 4f52 (SYM SYM...) FOR │ │ │ +00006cb0: 4d20 424f 4459 293a 2063 6f6c 6c65 6374 M BODY): collect │ │ │ +00006cc0: 206d 756c 7469 706c 6520 7265 7475 726e multiple return │ │ │ +00006cd0: 2076 616c 7565 732e 0a46 4f52 4d20 6d75 values..FORM mu │ │ │ +00006ce0: 7374 2072 6574 7572 6e20 6120 6c69 7374 st return a list │ │ │ +00006cf0: 3b20 7468 6520 424f 4459 2069 7320 7468 ; the BODY is th │ │ │ +00006d00: 656e 2065 7865 6375 7465 6420 7769 7468 en executed with │ │ │ +00006d10: 2074 6865 2066 6972 7374 204e 2065 6c65 the first N ele │ │ │ +00006d20: 6d65 6e74 730a 6f66 2074 6869 7320 6c69 ments.of this li │ │ │ +00006d30: 7374 2062 6f75 6e64 2028 606c 6574 272d st bound (`let'- │ │ │ +00006d40: 7374 796c 6529 2074 6f20 6561 6368 206f style) to each o │ │ │ +00006d50: 6620 7468 6520 7379 6d62 6f6c 7320 5359 f the symbols SY │ │ │ +00006d60: 4d20 696e 2074 7572 6e2e 2020 5468 6973 M in turn. This │ │ │ +00006d70: 0a69 7320 616e 616c 6f67 6f75 7320 746f .is analogous to │ │ │ +00006d80: 2074 6865 2043 6f6d 6d6f 6e20 4c69 7370 the Common Lisp │ │ │ +00006d90: 2060 6d75 6c74 6970 6c65 2d76 616c 7565 `multiple-value │ │ │ +00006da0: 2d62 696e 6427 206d 6163 726f 2c20 7573 -bind' macro, us │ │ │ +00006db0: 696e 6720 6c69 7374 7320 746f 0a73 696d ing lists to.sim │ │ │ +00006dc0: 756c 6174 6520 7472 7565 206d 756c 7469 ulate true multi │ │ │ +00006dd0: 706c 6520 7265 7475 726e 2076 616c 7565 ple return value │ │ │ +00006de0: 732e 2020 466f 7220 636f 6d70 6174 6962 s. For compatib │ │ │ +00006df0: 696c 6974 792c 2028 7661 6c75 6573 2041 ility, (values A │ │ │ +00006e00: 2042 2043 2920 6973 0a61 2073 796e 6f6e B C) is.a synon │ │ │ +00006e10: 796d 2066 6f72 2028 6c69 7374 2041 2042 ym for (list A B │ │ │ +00006e20: 2043 292e 1f0a 2864 6566 616c 6961 7320 C)...(defalias │ │ │ +00006e30: 276d 756c 7469 706c 652d 7661 6c75 652d 'multiple-value- │ │ │ +00006e40: 6269 6e64 2027 286d 6163 726f 202e 2023 bind '(macro . # │ │ │ +00006e50: 5b28 7661 7273 2066 6f72 6d20 2672 6573 [(vars form &res │ │ │ +00006e60: 7420 626f 6479 2920 22c5 20c6 1b1c c70c t body) ". ..... │ │ │ +00006e70: 5c6e 44c8 c909 5c22 4208 2a42 4287 2220 \nD...\"B.*BB." │ │ │ +00006e80: 5b62 6f64 7920 7661 7273 2066 6f72 6d20 [body vars form │ │ │ +00006e90: 6e20 7465 6d70 2067 656e 7379 6d20 2d31 n temp gensym -1 │ │ │ +00006ea0: 206c 6574 2a20 6d61 7063 6172 2023 5b28 let* mapcar #[( │ │ │ +00006eb0: 7629 2022 09c3 5c6e 5489 1208 4544 8722 v) "..\nT...ED." │ │ │ +00006ec0: 205b 7465 6d70 2076 206e 206e 7468 5d20 [temp v n nth] │ │ │ +00006ed0: 345d 5d20 3520 2823 2420 2e20 3237 3738 4]] 5 (#$ . 2778 │ │ │ +00006ee0: 3729 5d29 290a 2340 3336 3620 286d 756c 7)])).#@366 (mul │ │ │ +00006ef0: 7469 706c 652d 7661 6c75 652d 7365 7471 tiple-value-setq │ │ │ +00006f00: 2028 5359 4d20 5359 4d2e 2e2e 2920 464f (SYM SYM...) FO │ │ │ +00006f10: 524d 293a 2063 6f6c 6c65 6374 206d 756c RM): collect mul │ │ │ +00006f20: 7469 706c 6520 7265 7475 726e 2076 616c tiple return val │ │ │ +00006f30: 7565 732e 0a46 4f52 4d20 6d75 7374 2072 ues..FORM must r │ │ │ +00006f40: 6574 7572 6e20 6120 6c69 7374 3b20 7468 eturn a list; th │ │ │ +00006f50: 6520 6669 7273 7420 4e20 656c 656d 656e e first N elemen │ │ │ +00006f60: 7473 206f 6620 7468 6973 206c 6973 7420 ts of this list │ │ │ +00006f70: 6172 6520 7374 6f72 6564 2069 6e0a 6561 are stored in.ea │ │ │ +00006f80: 6368 206f 6620 7468 6520 7379 6d62 6f6c ch of the symbol │ │ │ +00006f90: 7320 5359 4d20 696e 2074 7572 6e2e 2020 s SYM in turn. │ │ │ +00006fa0: 5468 6973 2069 7320 616e 616c 6f67 6f75 This is analogou │ │ │ +00006fb0: 7320 746f 2074 6865 2043 6f6d 6d6f 6e20 s to the Common │ │ │ +00006fc0: 4c69 7370 0a60 6d75 6c74 6970 6c65 2d76 Lisp.`multiple-v │ │ │ +00006fd0: 616c 7565 2d73 6574 7127 206d 6163 726f alue-setq' macro │ │ │ +00006fe0: 2c20 7573 696e 6720 6c69 7374 7320 746f , using lists to │ │ │ +00006ff0: 2073 696d 756c 6174 6520 7472 7565 206d simulate true m │ │ │ +00007000: 756c 7469 706c 6520 7265 7475 726e 0a76 ultiple return.v │ │ │ +00007010: 616c 7565 732e 2020 466f 7220 636f 6d70 alues. For comp │ │ │ +00007020: 6174 6962 696c 6974 792c 2028 7661 6c75 atibility, (valu │ │ │ +00007030: 6573 2041 2042 2043 2920 6973 2061 2073 es A B C) is a s │ │ │ +00007040: 796e 6f6e 796d 2066 6f72 2028 6c69 7374 ynonym for (list │ │ │ +00007050: 2041 2042 2043 292e 1f0a 2864 6566 616c A B C)...(defal │ │ │ +00007060: 6961 7320 276d 756c 7469 706c 652d 7661 ias 'multiple-va │ │ │ +00007070: 6c75 652d 7365 7471 2027 286d 6163 726f lue-setq '(macro │ │ │ +00007080: 202e 2023 5b28 7661 7273 2066 6f72 6d29 . #[(vars form) │ │ │ +00007090: 2022 0bac 85c4 5c6e c545 870b 41ac 88c6 "....\n.E..A... │ │ │ +000070a0: 0b40 c75c 6e44 4587 c820 19c9 18ca 095c .@.\nDE.. .....\ │ │ │ +000070b0: 6e44 43cb c60b 8941 1340 c709 4445 c6cc nDC....A.@..DE.. │ │ │ +000070c0: cdce cf0b 5c22 5c22 4245 452a 8722 205b ....\"\"BEE*." [ │ │ │ +000070d0: 6e20 7465 6d70 2066 6f72 6d20 7661 7273 n temp form vars │ │ │ +000070e0: 2070 726f 676e 206e 696c 2073 6574 7120 progn nil setq │ │ │ +000070f0: 6361 7220 6765 6e73 796d 2030 206c 6574 car gensym 0 let │ │ │ +00007100: 2070 726f 6731 2061 7070 6c79 206e 636f prog1 apply nco │ │ │ +00007110: 6e63 206d 6170 6361 7220 235b 2876 2920 nc mapcar #[(v) │ │ │ +00007120: 2209 c35c 6e54 8912 0845 4487 2220 5b74 "..\nT...ED." [t │ │ │ +00007130: 656d 7020 7620 6e20 6e74 685d 2034 5d5d emp v n nth] 4]] │ │ │ +00007140: 2031 3020 2823 2420 2e20 3238 3339 3629 10 (#$ . 28396) │ │ │ +00007150: 5d29 290a 2864 6566 616c 6961 7320 276c ])).(defalias 'l │ │ │ +00007160: 6f63 616c 6c79 2027 286d 6163 726f 202e ocally '(macro . │ │ │ +00007170: 2023 5b28 2672 6573 7420 626f 6479 2920 #[(&rest body) │ │ │ +00007180: 22c1 0842 8722 205b 626f 6479 2070 726f "..B." [body pro │ │ │ +00007190: 676e 5d20 325d 2929 0a28 6465 6661 6c69 gn] 2])).(defali │ │ │ +000071a0: 6173 2027 7468 6520 2728 6d61 6372 6f20 as 'the '(macro │ │ │ +000071b0: 2e20 235b 2874 7970 6520 666f 726d 2920 . #[(type form) │ │ │ +000071c0: 2208 8722 205b 666f 726d 5d20 315d 2929 ".." [form] 1])) │ │ │ +000071d0: 0a28 6279 7465 2d63 6f64 6520 22c1 0842 .(byte-code "..B │ │ │ +000071e0: 10c2 c121 ac85 c3c1 c45c 2288 c508 4210 ...!.....\"...B. │ │ │ +000071f0: c2c5 21ac 85c3 c5c4 5c22 88c1 8722 205b ..!.....\"..." [ │ │ │ +00007200: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ +00007210: 7420 636c 2d70 726f 636c 6169 6d2d 6869 t cl-proclaim-hi │ │ │ +00007220: 7374 6f72 7920 6465 6661 756c 742d 626f story default-bo │ │ │ +00007230: 756e 6470 2073 6574 2d64 6566 6175 6c74 undp set-default │ │ │ +00007240: 2074 2063 6c2d 6465 636c 6172 652d 7374 t cl-declare-st │ │ │ +00007250: 6163 6b5d 2033 290a 2864 6566 616c 6961 ack] 3).(defalia │ │ │ +00007260: 7320 2763 6c2d 646f 2d70 726f 636c 6169 s 'cl-do-proclai │ │ │ +00007270: 6d20 235b 2873 7065 6320 6869 7374 2920 m #[(spec hist) │ │ │ +00007280: 220e 1cab 885c 6e3c ab84 0d5c 6e42 120d "....\n<...\nB.. │ │ │ +00007290: a2c6 61ab 92c7 c021 83d9 00c8 c9ca 0d41 ..a....!.......A │ │ │ +000072a0: 5c22 085c 2210 82d9 000d a2cb 61ab 9e0d \".\".......a... │ │ │ +000072b0: 4189 1583 d900 0d40 cc4e cd73 ac86 cecf A......@.N.s.... │ │ │ +000072c0: 0d40 5c22 88d0 0d40 ccd1 2388 aa62 0da2 .@\"...@..#..b.. │ │ │ +000072d0: d261 ab98 0d41 8915 83d9 000d 40cc 4ed1 .a...A......@.N. │ │ │ +000072e0: 61ab 71d0 0d40 ccd3 2388 aa68 0da2 d461 a.q..@..#..h...a │ │ │ +000072f0: abab c10d 41b7 4140 d5b7 c30d 41b7 4140 ....A.A@....A.A@ │ │ │ +00007300: d6b7 1b89 19ab 8809 4016 1d09 4116 1e0b ........@...A... │ │ │ +00007310: ab88 0b40 161f 0b41 1620 2aaa c20d a2d7 ...@...A. *..... │ │ │ +00007320: 61ab bcc7 c421 abb7 0cd8 61ab 830e 2114 a....!....a...!. │ │ │ +00007330: 0d41 8915 aba9 0d40 3aab 750d 4041 40d9 .A.....@:.u.@A@. │ │ │ +00007340: 61ab 89da 0d40 400c 5c22 14aa 64db 0d40 a....@@.\"..d..@ │ │ │ +00007350: 400c 5c22 ab83 0caa 850d 4040 0c42 14aa @.\"......@@.B.. │ │ │ +00007360: 51d3 8722 205b 6279 7465 2d63 6f6d 7069 Q.." [byte-compi │ │ │ +00007370: 6c65 2d62 6f75 6e64 2d76 6172 6961 626c le-bound-variabl │ │ │ +00007380: 6573 2073 7065 6564 2063 6c2d 7072 6f63 es speed cl-proc │ │ │ +00007390: 6c61 696d 2d68 6973 746f 7279 2073 6166 laim-history saf │ │ │ +000073a0: 6574 7920 6279 7465 2d63 6f6d 7069 6c65 ety byte-compile │ │ │ +000073b0: 2d77 6172 6e69 6e67 7320 7370 6563 2073 -warnings spec s │ │ │ +000073c0: 7065 6369 616c 2062 6f75 6e64 7020 6170 pecial boundp ap │ │ │ +000073d0: 7065 6e64 206d 6170 6361 7220 235b 2876 pend mapcar #[(v │ │ │ +000073e0: 2920 2209 0842 8722 205b 6279 7465 2d63 ) "..B." [byte-c │ │ │ +000073f0: 6f6d 7069 6c65 2d67 6c6f 6261 6c2d 6269 ompile-global-bi │ │ │ +00007400: 7420 765d 2032 5d20 696e 6c69 6e65 2062 t v] 2] inline b │ │ │ +00007410: 7974 652d 6f70 7469 6d69 7a65 7220 286e yte-optimizer (n │ │ │ +00007420: 696c 2062 7974 652d 636f 6d70 696c 652d il byte-compile- │ │ │ +00007430: 696e 6c69 6e65 2d65 7870 616e 6429 2065 inline-expand) e │ │ │ +00007440: 7272 6f72 2022 2573 2061 6c72 6561 6479 rror "%s already │ │ │ +00007450: 2068 6173 2061 2062 7974 652d 6f70 7469 has a byte-opti │ │ │ +00007460: 6d69 7a65 722c 2063 616e 2774 206d 616b mizer, can't mak │ │ │ +00007470: 6520 6974 2069 6e6c 696e 6522 2070 7574 e it inline" put │ │ │ +00007480: 2062 7974 652d 636f 6d70 696c 652d 696e byte-compile-in │ │ │ +00007490: 6c69 6e65 2d65 7870 616e 6420 6e6f 7469 line-expand noti │ │ │ +000074a0: 6e6c 696e 6520 6e69 6c20 6f70 7469 6d69 nline nil optimi │ │ │ +000074b0: 7a65 2028 2830 2920 2831 202e 2074 2920 ze ((0) (1 . t) │ │ │ +000074c0: 2832 202e 2074 2920 2833 202e 2074 2929 (2 . t) (3 . t)) │ │ │ +000074d0: 2028 2830 202e 2074 2920 2831 202e 2074 ((0 . t) (1 . t │ │ │ +000074e0: 2920 2832 202e 2074 2920 2833 2929 2077 ) (2 . t) (3)) w │ │ │ +000074f0: 6172 6e20 7420 3020 6465 6c71 206d 656d arn t 0 delq mem │ │ │ +00007500: 6265 722a 2068 6973 7420 636c 2d6f 7074 ber* hist cl-opt │ │ │ +00007510: 696d 697a 652d 7370 6565 6420 6279 7465 imize-speed byte │ │ │ +00007520: 2d6f 7074 696d 697a 6520 636c 2d6f 7074 -optimize cl-opt │ │ │ +00007530: 696d 697a 652d 7361 6665 7479 2062 7974 imize-safety byt │ │ │ +00007540: 652d 636f 6d70 696c 652d 6465 6c65 7465 e-compile-delete │ │ │ +00007550: 2d65 7272 6f72 7320 6279 7465 2d63 6f6d -errors byte-com │ │ │ +00007560: 7069 6c65 2d64 6566 6175 6c74 2d77 6172 pile-default-war │ │ │ +00007570: 6e69 6e67 735d 2035 5d29 0a28 6279 7465 nings] 5]).(byte │ │ │ +00007580: 2d63 6f64 6520 22c2 0821 1909 ab8b c309 -code "..!...... │ │ │ +00007590: 8941 1140 c45c 2288 aa72 c510 29c5 8722 .A.@.\"..r..).." │ │ │ +000075a0: 205b 636c 2d70 726f 636c 6169 6d73 2d64 [cl-proclaims-d │ │ │ +000075b0: 6566 6572 7265 6420 7020 7265 7665 7273 eferred p revers │ │ │ +000075c0: 6520 636c 2d64 6f2d 7072 6f63 6c61 696d e cl-do-proclaim │ │ │ +000075d0: 2074 206e 696c 5d20 3329 0a28 6465 6661 t nil] 3).(defa │ │ │ +000075e0: 6c69 6173 2027 6465 636c 6172 6520 2728 lias 'declare '( │ │ │ +000075f0: 6d61 6372 6f20 2e20 235b 2826 7265 7374 macro . #[(&rest │ │ │ +00007600: 2073 7065 6373 2920 22c2 20ab 9709 ab94 specs) ". ..... │ │ │ +00007610: 083c ab85 0940 0842 10c3 0989 4111 40c4 .<...@.B....A.@. │ │ │ +00007620: 5c22 88aa 69c4 8722 205b 636c 2d64 6563 \"..i.." [cl-dec │ │ │ +00007630: 6c61 7265 2d73 7461 636b 2073 7065 6373 lare-stack specs │ │ │ +00007640: 2063 6c2d 636f 6d70 696c 696e 672d 6669 cl-compiling-fi │ │ │ +00007650: 6c65 2063 6c2d 646f 2d70 726f 636c 6169 le cl-do-proclai │ │ │ +00007660: 6d20 6e69 6c5d 2033 5d29 290a 2340 3531 m nil] 3])).#@51 │ │ │ +00007670: 3020 2864 6566 696e 652d 7365 7466 2d6d 0 (define-setf-m │ │ │ +00007680: 6574 686f 6420 4e41 4d45 2041 5247 4c49 ethod NAME ARGLI │ │ │ +00007690: 5354 2042 4f44 592e 2e2e 293a 2064 6566 ST BODY...): def │ │ │ +000076a0: 696e 6520 6120 6073 6574 6627 206d 6574 ine a `setf' met │ │ │ +000076b0: 686f 642e 0a54 6869 7320 6d65 7468 6f64 hod..This method │ │ │ +000076c0: 2073 686f 7773 2068 6f77 2074 6f20 6861 shows how to ha │ │ │ +000076d0: 6e64 6c65 2060 7365 7466 2773 2074 6f20 ndle `setf's to │ │ │ +000076e0: 706c 6163 6573 206f 6620 7468 6520 666f places of the fo │ │ │ +000076f0: 726d 2028 4e41 4d45 2041 5247 532e 2e2e rm (NAME ARGS... │ │ │ +00007700: 292e 0a54 6865 2061 7267 756d 656e 7420 )..The argument │ │ │ +00007710: 666f 726d 7320 4152 4753 2061 7265 2062 forms ARGS are b │ │ │ +00007720: 6f75 6e64 2061 6363 6f72 6469 6e67 2074 ound according t │ │ │ +00007730: 6f20 4152 474c 4953 542c 2061 7320 6966 o ARGLIST, as if │ │ │ +00007740: 204e 414d 4520 7765 7265 0a67 6f69 6e67 NAME were.going │ │ │ +00007750: 2074 6f20 6265 2065 7870 616e 6465 6420 to be expanded │ │ │ +00007760: 6173 2061 206d 6163 726f 2c20 7468 656e as a macro, then │ │ │ +00007770: 2074 6865 2042 4f44 5920 666f 726d 7320 the BODY forms │ │ │ +00007780: 6172 6520 6578 6563 7574 6564 2061 6e64 are executed and │ │ │ +00007790: 206d 7573 740a 7265 7475 726e 2061 206c must.return a l │ │ │ +000077a0: 6973 7420 6f66 2066 6976 6520 656c 656d ist of five elem │ │ │ +000077b0: 656e 7473 3a20 6120 7465 6d70 6f72 6172 ents: a temporar │ │ │ +000077c0: 792d 7661 7269 6162 6c65 7320 6c69 7374 y-variables list │ │ │ +000077d0: 2c20 6120 7661 6c75 652d 666f 726d 730a , a value-forms. │ │ │ +000077e0: 6c69 7374 2c20 6120 7374 6f72 652d 7661 list, a store-va │ │ │ +000077f0: 7269 6162 6c65 7320 6c69 7374 2028 6f66 riables list (of │ │ │ +00007800: 206c 656e 6774 6820 6f6e 6529 2c20 6120 length one), a │ │ │ +00007810: 7374 6f72 652d 666f 726d 2c20 616e 6420 store-form, and │ │ │ +00007820: 616e 2061 6363 6573 732d 0a66 6f72 6d2e an access-.form. │ │ │ +00007830: 2020 5365 6520 6064 6566 7365 7466 2720 See `defsetf' │ │ │ +00007840: 666f 7220 6120 7369 6d70 6c65 7220 7761 for a simpler wa │ │ │ +00007850: 7920 746f 2064 6566 696e 6520 6d6f 7374 y to define most │ │ │ +00007860: 2073 6574 662d 6d65 7468 6f64 732e 1f0a setf-methods... │ │ │ +00007870: 2864 6566 616c 6961 7320 2764 6566 696e (defalias 'defin │ │ │ +00007880: 652d 7365 7466 2d6d 6574 686f 6420 2728 e-setf-method '( │ │ │ +00007890: 6d61 6372 6f20 2e20 235b 2866 756e 6320 macro . #[(func │ │ │ +000078a0: 6172 6773 2026 7265 7374 2062 6f64 7929 args &rest body) │ │ │ +000078b0: 2022 c3c4 5c6e 403b ad8c c5c6 0944 c75c "..\n@;.....D.\ │ │ │ +000078c0: 6e89 4112 4046 43c8 09c9 085c 6e42 2343 n.A.@FC....\nB#C │ │ │ +000078d0: 2387 2220 5b61 7267 7320 6675 6e63 2062 #." [args func b │ │ │ +000078e0: 6f64 7920 6170 7065 6e64 2028 6576 616c ody append (eval │ │ │ +000078f0: 2d77 6865 6e20 2863 6f6d 7069 6c65 206c -when (compile l │ │ │ +00007900: 6f61 6420 6576 616c 2929 2070 7574 2071 oad eval)) put q │ │ │ +00007910: 756f 7465 2027 7365 7466 2d64 6f63 756d uote 'setf-docum │ │ │ +00007920: 656e 7461 7469 6f6e 2063 6c2d 7472 616e entation cl-tran │ │ │ +00007930: 7366 6f72 6d2d 6675 6e63 7469 6f6e 2d70 sform-function-p │ │ │ +00007940: 726f 7065 7274 7920 7365 7466 2d6d 6574 roperty setf-met │ │ │ +00007950: 686f 645d 2038 2028 2324 202e 2033 3033 hod] 8 (#$ . 303 │ │ │ +00007960: 3232 295d 2929 0a23 4038 3339 2028 6465 22)])).#@839 (de │ │ │ +00007970: 6673 6574 6620 4e41 4d45 2046 554e 4329 fsetf NAME FUNC) │ │ │ +00007980: 3a20 6465 6669 6e65 2061 2060 7365 7466 : define a `setf │ │ │ +00007990: 2720 6d65 7468 6f64 2e0a 5468 6973 206d ' method..This m │ │ │ +000079a0: 6163 726f 2069 7320 616e 2065 6173 792d acro is an easy- │ │ │ +000079b0: 746f 2d75 7365 2073 7562 7374 6974 7574 to-use substitut │ │ │ +000079c0: 6520 666f 7220 6064 6566 696e 652d 7365 e for `define-se │ │ │ +000079d0: 7466 2d6d 6574 686f 6427 2074 6861 7420 tf-method' that │ │ │ +000079e0: 776f 726b 730a 7765 6c6c 2066 6f72 2073 works.well for s │ │ │ +000079f0: 696d 706c 6520 706c 6163 6520 666f 726d imple place form │ │ │ +00007a00: 732e 2020 496e 2074 6865 2073 696d 706c s. In the simpl │ │ │ +00007a10: 6520 6064 6566 7365 7466 2720 666f 726d e `defsetf' form │ │ │ +00007a20: 2c20 6073 6574 6627 7320 6f66 0a74 6865 , `setf's of.the │ │ │ +00007a30: 2066 6f72 6d20 2873 6574 6620 284e 414d form (setf (NAM │ │ │ +00007a40: 4520 4152 4753 2e2e 2e29 2056 414c 2920 E ARGS...) VAL) │ │ │ +00007a50: 6172 6520 7472 616e 7366 6f72 6d65 6420 are transformed │ │ │ +00007a60: 746f 2066 756e 6374 696f 6e20 6f72 206d to function or m │ │ │ +00007a70: 6163 726f 0a63 616c 6c73 206f 6620 7468 acro.calls of th │ │ │ +00007a80: 6520 666f 726d 2028 4655 4e43 2041 5247 e form (FUNC ARG │ │ │ +00007a90: 532e 2e2e 2056 414c 292e 2020 4578 616d S... VAL). Exam │ │ │ +00007aa0: 706c 653a 2028 6465 6673 6574 6620 6172 ple: (defsetf ar │ │ │ +00007ab0: 6566 2061 7365 7429 2e0a 416c 7465 726e ef aset)..Altern │ │ │ +00007ac0: 6174 6520 666f 726d 3a20 2864 6566 7365 ate form: (defse │ │ │ +00007ad0: 7466 204e 414d 4520 4152 474c 4953 5420 tf NAME ARGLIST │ │ │ +00007ae0: 2853 544f 5245 2920 424f 4459 2e2e 2e29 (STORE) BODY...) │ │ │ +00007af0: 2e0a 4865 7265 2c20 7468 6520 6162 6f76 ..Here, the abov │ │ │ +00007b00: 6520 6073 6574 6627 2063 616c 6c20 6973 e `setf' call is │ │ │ +00007b10: 2065 7870 616e 6465 6420 6279 2062 696e expanded by bin │ │ │ +00007b20: 6469 6e67 2074 6865 2061 7267 756d 656e ding the argumen │ │ │ +00007b30: 7420 666f 726d 7320 4152 4753 0a61 6363 t forms ARGS.acc │ │ │ +00007b40: 6f72 6469 6e67 2074 6f20 4152 474c 4953 ording to ARGLIS │ │ │ +00007b50: 542c 2062 696e 6469 6e67 2074 6865 2076 T, binding the v │ │ │ +00007b60: 616c 7565 2066 6f72 6d20 5641 4c20 746f alue form VAL to │ │ │ +00007b70: 2053 544f 5245 2c20 7468 656e 2065 7865 STORE, then exe │ │ │ +00007b80: 6375 7469 6e67 0a42 4f44 592c 2077 6869 cuting.BODY, whi │ │ │ +00007b90: 6368 206d 7573 7420 7265 7475 726e 2061 ch must return a │ │ │ +00007ba0: 204c 6973 7020 666f 726d 2074 6861 7420 Lisp form that │ │ │ +00007bb0: 646f 6573 2074 6865 206e 6563 6573 7361 does the necessa │ │ │ +00007bc0: 7279 2060 7365 7466 2720 6f70 6572 6174 ry `setf' operat │ │ │ +00007bd0: 696f 6e2e 0a41 6374 7561 6c6c 792c 2041 ion..Actually, A │ │ │ +00007be0: 5247 4c49 5354 2061 6e64 2053 544f 5245 RGLIST and STORE │ │ │ +00007bf0: 206d 6179 2062 6520 626f 756e 6420 746f may be bound to │ │ │ +00007c00: 2074 656d 706f 7261 7279 2076 6172 6961 temporary varia │ │ │ +00007c10: 626c 6573 2077 6869 6368 2061 7265 0a69 bles which are.i │ │ │ +00007c20: 6e74 726f 6475 6365 6420 6175 746f 6d61 ntroduced automa │ │ │ +00007c30: 7469 6361 6c6c 7920 746f 2070 7265 7365 tically to prese │ │ │ +00007c40: 7276 6520 7072 6f70 6572 2065 7865 6375 rve proper execu │ │ │ +00007c50: 7469 6f6e 206f 7264 6572 206f 6620 7468 tion order of th │ │ │ +00007c60: 6520 6172 6775 6d65 6e74 732e 0a45 7861 e arguments..Exa │ │ │ +00007c70: 6d70 6c65 3a20 2864 6566 7365 7466 206e mple: (defsetf n │ │ │ +00007c80: 7468 2028 6e20 7829 2028 7629 2028 6c69 th (n x) (v) (li │ │ │ +00007c90: 7374 2027 7365 7463 6172 2028 6c69 7374 st 'setcar (list │ │ │ +00007ca0: 2027 6e74 6863 6472 206e 2078 2920 7629 'nthcdr n x) v) │ │ │ +00007cb0: 292e 1f0a 2864 6566 616c 6961 7320 2764 )...(defalias 'd │ │ │ +00007cc0: 6566 7365 7466 2027 286d 6163 726f 202e efsetf '(macro . │ │ │ +00007cd0: 2023 5b28 6675 6e63 2061 7267 3120 2672 #[(func arg1 &r │ │ │ +00007ce0: 6573 7420 6172 6773 2920 220e 233c 8347 est args) ".#<.G │ │ │ +00007cf0: 01c6 891b 1e24 c689 191e 1fc6 891d 1e20 .....$......... │ │ │ +00007d00: 5c6e 405c 6e41 1240 1e25 c7c8 c90e 255c \n@\nA.@.%....%\ │ │ │ +00007d10: 2221 1e26 c689 1e21 18c6 1e27 0e23 1c5c "!.&...!...'.#.\ │ │ │ +00007d20: 6e40 3bab 875c 6e40 5c6e 4112 1627 0cab n@;..\n@\nA..'.. │ │ │ +00007d30: b90c 40ca 61ac b30c 40cb 61ab 880c 4189 ..@.a...@.a...A. │ │ │ +00007d40: 1440 15aa 9f0c 40cc 73ac 990c 403a ab85 .@....@.s...@:.. │ │ │ +00007d50: 0c40 40aa 820c 400b 4213 c7c8 c90b 405c .@@...@.B.....@\ │ │ │ +00007d60: 2221 0942 110c 4189 14ac 470b 9f13 099f "!.B..A...G..... │ │ │ +00007d70: 110d ab99 cd0b 0d43 5c22 1624 c7c8 c90d .......C\".$.... │ │ │ +00007d80: 5c22 2116 20cd 090e 2043 5c22 161f aa86 \"!. ... C\".... │ │ │ +00007d90: 0b16 2409 161f 0b09 1e5c 221e 1e0e 1eab ..$......\"..... │ │ │ +00007da0: a70e 5c22 40ce c8cf 0e1e 405c 2244 440e ..\"@.....@\"DD. │ │ │ +00007db0: 2142 1621 0e1e 400e 5c22 4044 0842 100e !B.!..@.\"@D.B.. │ │ │ +00007dc0: 1e41 161e 0e5c 2241 165c 22aa 552a 0dab .A...\"A.\".U*.. │ │ │ +00007dd0: 870d 0e20 4408 4210 cdd0 0e28 0e23 450e ... D.B....(.#E. │ │ │ +00007de0: 27ad 830e 2743 d10e 26ce c8cf 0e25 5c22 '...'C..&....%\" │ │ │ +00007df0: 4444 0dab 8ecd 0e20 d2d3 0d45 4443 0e21 DD..... ...EDC.! │ │ │ +00007e00: 5c22 aa82 0e21 429f d40d ab83 d5aa 81d4 \"...!B......... │ │ │ +00007e10: 0e1f 420d ab83 d5aa 81d4 0e24 42d4 0e26 ..B........$B..& │ │ │ +00007e20: 44d1 0e25 0e26 4408 429f 5c6e 4242 0dab D..%.&D.B.\nBB.. │ │ │ +00007e30: 83d5 aa81 d4d6 0e28 440e 1f42 42af 0645 .......(D..BB..E │ │ │ +00007e40: 4323 2e0c 87d7 0e28 d8d9 dad6 0e23 44db C#.....(.....#D. │ │ │ +00007e50: 451e 295c 6e40 ab88 d4dc 0e29 dd46 aa82 E.)\n@.....).F.. │ │ │ +00007e60: 0e29 29af 0587 2220 5b6c 6574 7332 2074 .))..." [lets2 t │ │ │ +00007e70: 656d 7073 2061 7267 7320 6c61 7267 7320 emps args largs │ │ │ +00007e80: 7020 7265 7374 6172 6720 6e69 6c20 696e p restarg nil in │ │ │ +00007e90: 7465 726e 2066 6f72 6d61 7420 222d 2d25 tern format "--% │ │ │ +00007ea0: 732d 2d74 656d 702d 2d22 2026 6175 7820 s--temp--" &aux │ │ │ +00007eb0: 2672 6573 7420 2826 6f70 7469 6f6e 616c &rest (&optional │ │ │ +00007ec0: 2026 6b65 7920 2661 6c6c 6f77 2d6f 7468 &key &allow-oth │ │ │ +00007ed0: 6572 2d6b 6579 7329 2061 7070 656e 6420 er-keys) append │ │ │ +00007ee0: 6765 6e73 796d 2022 2d2d 2573 2d2d 2220 gensym "--%s--" │ │ │ +00007ef0: 6465 6669 6e65 2d73 6574 662d 6d65 7468 define-setf-meth │ │ │ +00007f00: 6f64 206c 6574 2a20 6d61 7063 6172 2027 od let* mapcar ' │ │ │ +00007f10: 6765 6e73 796d 206c 6973 7420 6c69 7374 gensym list list │ │ │ +00007f20: 2a20 7175 6f74 6520 6465 6673 6574 6620 * quote defsetf │ │ │ +00007f30: 2826 7265 7374 2061 7267 7329 2028 7374 (&rest args) (st │ │ │ +00007f40: 6f72 6529 2063 6f6e 7320 2861 7070 656e ore) cons (appen │ │ │ +00007f50: 6420 6172 6773 2028 6c69 7374 2073 746f d args (list sto │ │ │ +00007f60: 7265 2929 2027 7072 6f67 6e20 7374 6f72 re)) 'progn stor │ │ │ +00007f70: 6520 7031 2074 656d 7073 7220 7265 7374 e p1 tempsr rest │ │ │ +00007f80: 2d74 656d 7073 206c 6574 7331 2070 3220 -temps lets1 p2 │ │ │ +00007f90: 6172 6731 206c 6172 6773 7220 7374 6f72 arg1 largsr stor │ │ │ +00007fa0: 652d 7661 7220 7374 6f72 652d 7465 6d70 e-var store-temp │ │ │ +00007fb0: 2064 6f63 7374 7220 6675 6e63 2063 616c docstr func cal │ │ │ +00007fc0: 6c5d 2031 3420 2823 2420 2e20 3331 3038 l] 14 (#$ . 3108 │ │ │ +00007fd0: 3529 5d29 290a 2862 7974 652d 636f 6465 5)])).(byte-code │ │ │ +00007fe0: 2022 c0c1 c2c3 2388 c0c4 c2c5 2388 c0c6 "....#.....#... │ │ │ +00007ff0: c2c7 2388 c0c8 c2c9 2388 c0ca c2cb 2388 ..#.....#.....#. │ │ │ +00008000: c0cc c2cd 2388 c0ce c2cf 2388 c0d0 c2d1 ....#.....#..... │ │ │ +00008010: 2388 c0d2 c2d3 2388 c0d4 c2d5 2388 c0d6 #.....#.....#... │ │ │ +00008020: c2d7 2388 c0d8 c2d9 2388 c0da c2db 2388 ..#.....#.....#. │ │ │ +00008030: c0dc c2dd 2388 c0de c2df 2388 c0e0 c2e1 ....#.....#..... │ │ │ +00008040: 2388 c0e2 c2e3 2388 c0e4 c2e5 2388 c0e6 #.....#.....#... │ │ │ +00008050: c2e7 2388 c0e8 c2e9 2388 c0ea c2eb 2388 ..#.....#.....#. │ │ │ +00008060: c0ec c2ed 2388 c0ee c2ef 2388 c0f0 c2f1 ....#.....#..... │ │ │ +00008070: 2388 c0f2 c2f3 2388 c0f4 c2f5 2388 c0f6 #.....#.....#... │ │ │ +00008080: c2f7 2388 c0f8 c2f9 2388 c0fa c2fb 2388 ..#.....#.....#. │ │ │ +00008090: c0fc c2fd 2388 c0fe c2ff 2388 c081 4000 ....#.....#...@. │ │ │ +000080a0: c281 4100 2388 c081 4200 c281 4300 2388 ..A.#...B...C.#. │ │ │ +000080b0: c081 4400 c281 4500 2388 c081 4600 c281 ..D...E.#...F... │ │ │ +000080c0: 4700 2388 c081 4800 c281 4900 2388 c081 G.#...H...I.#... │ │ │ +000080d0: 4a00 c281 4b00 2388 c081 4c00 c281 4d00 J...K.#...L...M. │ │ │ +000080e0: 2388 c081 4e00 c281 4f00 2388 c081 5000 #...N...O.#...P. │ │ │ +000080f0: c281 5100 2388 c081 5200 c281 5300 2388 ..Q.#...R...S.#. │ │ │ +00008100: c081 5400 c281 5500 2388 c081 5600 c281 ..T...U.#...V... │ │ │ +00008110: 5700 2388 c081 5800 c281 5900 2388 c081 W.#...X...Y.#... │ │ │ +00008120: 5a00 c281 5b00 2388 c081 5c5c 00c2 815d Z...[.#...\\...] │ │ │ +00008130: 0023 88c0 815e 00c2 815f 0023 88c0 8160 .#...^..._.#...` │ │ │ +00008140: 00c2 8161 0023 88c0 8162 00c2 8163 0023 ...a.#...b...c.# │ │ │ +00008150: 88c0 8164 00c2 8165 0023 88c0 8166 00c2 ...d...e.#...f.. │ │ │ +00008160: 8167 0023 88c0 8168 00c2 8169 0023 88c0 .g.#...h...i.#.. │ │ │ +00008170: 816a 00c2 816b 0023 88c0 816c 00c2 816d .j...k.#...l...m │ │ │ +00008180: 0023 88c0 816e 00c2 816f 0023 88c0 8170 .#...n...o.#...p │ │ │ +00008190: 00c2 8171 0023 88c0 8172 00c2 8173 0023 ...q.#...r...s.# │ │ │ +000081a0: 88c0 8174 00c2 8175 0023 88c0 8176 00c2 ...t...u.#...v.. │ │ │ +000081b0: 8177 0023 88c0 8178 00c2 8179 0023 88c0 .w.#...x...y.#.. │ │ │ +000081c0: 817a 00c2 817b 0023 88c0 817c 00c2 817d .z...{.#...|...} │ │ │ +000081d0: 0023 88c0 817e 00c2 817f 0023 88c0 8180 .#...~.....#.... │ │ │ +000081e0: 00c2 8181 0023 88c0 8182 00c2 8183 0023 .....#.........# │ │ │ +000081f0: 88c0 8184 00c2 8185 0023 88c0 8186 00c2 .........#...... │ │ │ +00008200: 8187 0023 88c0 8188 00c2 8189 0023 88c0 ...#.........#.. │ │ │ +00008210: 818a 00c2 818b 0023 88c0 818c 00c2 818d .......#........ │ │ │ +00008220: 0023 88c0 818e 00c2 818f 0023 88c0 8190 .#.........#.... │ │ │ +00008230: 00c2 8191 0023 88c0 8192 00c2 8193 0023 .....#.........# │ │ │ +00008240: 88c0 8194 00c2 8195 0023 88c0 8196 00c2 .........#...... │ │ │ +00008250: 8197 0023 88c0 8198 00c2 8199 0023 88c0 ...#.........#.. │ │ │ +00008260: 819a 00c2 819b 0023 88c0 819c 00c2 819d .......#........ │ │ │ +00008270: 0023 88c0 819e 00c2 819f 0023 88c0 81a0 .#.........#.... │ │ │ +00008280: 00c2 81a1 0023 88c0 81a2 00c2 81a3 0023 .....#.........# │ │ │ +00008290: 88c0 81a4 00c2 81a5 0023 88c0 81a6 00c2 .........#...... │ │ │ +000082a0: 81a7 0023 88c0 81a8 00c2 81a9 0023 88c0 ...#.........#.. │ │ │ +000082b0: 81aa 00c2 81ab 0023 88c0 81ac 00c2 81ad .......#........ │ │ │ +000082c0: 0023 88c0 81ae 00c2 81af 0023 88c0 81b0 .#.........#.... │ │ │ +000082d0: 00c2 81b1 0023 88c0 81b2 00c2 81b3 0023 .....#.........# │ │ │ +000082e0: 88c0 81b4 00c2 81b5 0023 88c0 81b6 00c2 .........#...... │ │ │ +000082f0: 81b7 0023 88c0 81b8 00c2 81b9 0023 88c0 ...#.........#.. │ │ │ +00008300: 81ba 00c2 81bb 0023 88c0 81bc 00c2 81bd .......#........ │ │ │ +00008310: 0023 88c0 81be 00c2 81bf 0023 88c0 81c0 .#.........#.... │ │ │ +00008320: 00c2 81c1 0023 88c0 81c2 00c2 81c3 0023 .....#.........# │ │ │ +00008330: 88c0 81c4 00c2 81c5 0023 88c0 81c6 00c2 .........#...... │ │ │ +00008340: 81c7 0023 88c0 81c8 00c2 81c9 0023 88c0 ...#.........#.. │ │ │ +00008350: 81ca 00c2 81cb 0023 88c0 81cc 00c2 81cd .......#........ │ │ │ +00008360: 0023 88c0 81ce 00c2 81cf 0023 88c0 81d0 .#.........#.... │ │ │ +00008370: 00c2 81d1 0023 88c0 81d2 00c2 81d3 0023 .....#.........# │ │ │ +00008380: 88c0 81d4 00c2 81d5 0023 88c0 81d6 00c2 .........#...... │ │ │ +00008390: 81d7 0023 88c0 81d8 00c2 81d9 0023 88c0 ...#.........#.. │ │ │ +000083a0: 81da 00c2 81db 0023 88c0 81dc 00c2 81dd .......#........ │ │ │ +000083b0: 0023 88c0 81de 00c2 81df 0023 88c0 81e0 .#.........#.... │ │ │ +000083c0: 00c2 81e1 0023 88c0 81e2 00c2 81e3 0023 .....#.........# │ │ │ +000083d0: 88c0 81e4 00c2 81e5 0023 88c0 81e6 00c2 .........#...... │ │ │ +000083e0: 81e7 0023 88c0 81e8 00c2 81e9 0023 88c0 ...#.........#.. │ │ │ +000083f0: 81ea 00c2 81eb 0023 88c0 81ec 00c2 81ed .......#........ │ │ │ +00008400: 0023 88c0 81ee 00c2 81ef 0023 88c0 81f0 .#.........#.... │ │ │ +00008410: 00c2 81f1 0023 88c0 81f2 00c2 81f3 0023 .....#.........# │ │ │ +00008420: 88c0 81f4 00c2 81f5 0023 88c0 81f6 00c2 .........#...... │ │ │ +00008430: 81f7 0023 88c0 81f8 00c2 81f9 0023 88c0 ...#.........#.. │ │ │ +00008440: 81fa 00c2 81fb 0023 88c0 81fc 00c2 81fd .......#........ │ │ │ +00008450: 0023 88c0 81fe 00c2 81ff 0023 88c0 8100 .#.........#.... │ │ │ +00008460: 01c2 8101 0123 88c0 8102 01c2 8103 0123 .....#.........# │ │ │ +00008470: 88c0 8104 01c2 8105 0123 88c0 8106 01c2 .........#...... │ │ │ +00008480: 8107 0123 88c0 8108 01c2 8109 0123 88c0 ...#.........#.. │ │ │ +00008490: 815c 6e01 c281 0b01 2388 c081 0c01 c281 .\n.....#....... │ │ │ +000084a0: 0d01 2388 c081 0e01 c281 0f01 2388 c081 ..#.........#... │ │ │ +000084b0: 1001 c281 1101 2388 c081 1201 c281 1301 ......#......... │ │ │ +000084c0: 2388 c081 1401 c281 1501 2388 c081 1601 #.........#..... │ │ │ +000084d0: c281 1701 2388 c081 1801 c281 1901 2388 ....#.........#. │ │ │ +000084e0: c081 1a01 c281 1b01 2387 2220 5b70 7574 ........#." [put │ │ │ +000084f0: 2061 7265 6620 7365 7466 2d6d 6574 686f aref setf-metho │ │ │ +00008500: 6420 235b 2826 7265 7374 2061 7267 7329 d #[(&rest args) │ │ │ +00008510: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +00008520: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ +00008530: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +00008540: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +00008550: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +00008560: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +00008570: 6d20 222d 2d73 746f 7265 2d2d 2220 6173 m "--store--" as │ │ │ +00008580: 6574 2061 7070 656e 6420 6172 6566 5d20 et append aref] │ │ │ +00008590: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ +000085a0: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +000085b0: 2028 6172 6566 2026 7265 7374 2041 5247 (aref &rest ARG │ │ │ +000085c0: 5329 5c6e 5c6e 225d 2063 6172 2023 5b28 S)\n\n"] car #[( │ │ │ +000085d0: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ +000085e0: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ +000085f0: 18c7 c80b 0843 5c22 2a42 c95c 6e42 af05 .....C\"*B.\nB.. │ │ │ +00008600: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ +00008610: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ +00008620: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ +00008630: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ +00008640: 7374 6f72 652d 2d22 2073 6574 6361 7220 store--" setcar │ │ │ +00008650: 6170 7065 6e64 2063 6172 5d20 3720 225c append car] 7 "\ │ │ │ +00008660: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ +00008670: 6264 6120 6c69 7374 3a5c 6e20 2028 6361 bda list:\n (ca │ │ │ +00008680: 7220 2672 6573 7420 4152 4753 295c 6e5c r &rest ARGS)\n\ │ │ │ +00008690: 6e22 5d20 6364 7220 235b 2826 7265 7374 n"] cdr #[(&rest │ │ │ +000086a0: 2061 7267 7329 2022 c4c5 0b5c 221a c5c6 args) "...\"... │ │ │ +000086b0: 2119 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 !.\n..C\n....... │ │ │ +000086c0: 435c 222a 42c9 5c6e 42af 052a 8722 205b C\"*B.\nB..*." [ │ │ │ +000086d0: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ +000086e0: 656d 702d 2d20 2d2d 6172 6773 2d2d 7465 emp-- --args--te │ │ │ +000086f0: 6d70 2d2d 2061 7267 7320 6d61 7063 6172 mp-- args mapcar │ │ │ +00008700: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ +00008710: 2d2d 2220 7365 7463 6472 2061 7070 656e --" setcdr appen │ │ │ +00008720: 6420 6364 725d 2037 2022 5c6e 436f 6d6d d cdr] 7 "\nComm │ │ │ +00008730: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +00008740: 6973 743a 5c6e 2020 2863 6472 2026 7265 ist:\n (cdr &re │ │ │ +00008750: 7374 2041 5247 5329 5c6e 5c6e 225d 2065 st ARGS)\n\n"] e │ │ │ +00008760: 6c74 2023 5b28 7365 7120 6e29 2022 c6c7 lt #[(seq n) ".. │ │ │ +00008770: 211c c6c8 211b c6c9 2119 0c0b 440d 5c6e !...!...!...D.\n │ │ │ +00008780: 4409 430c 1d0b 1a09 18ca cb0d 44cc cd5c D.C.........D..\ │ │ │ +00008790: 6e0d 4508 45ce 0d5c 6e08 4646 2bcf 0c0b n.E.E..\n.FF+... │ │ │ +000087a0: 45af 052b 8722 205b 7374 6f72 6520 2d2d E..+." [store -- │ │ │ +000087b0: 7374 6f72 652d 2d74 656d 702d 2d20 6e20 store--temp-- n │ │ │ +000087c0: 2d2d 6e2d 2d74 656d 702d 2d20 2d2d 7365 --n--temp-- --se │ │ │ +000087d0: 712d 2d74 656d 702d 2d20 7365 7120 6765 q--temp-- seq ge │ │ │ +000087e0: 6e73 796d 2022 2d2d 7365 712d 2d22 2022 nsym "--seq--" " │ │ │ +000087f0: 2d2d 6e2d 2d22 2022 2d2d 7374 6f72 652d --n--" "--store- │ │ │ +00008800: 2d22 2069 6620 6c69 7374 7020 7365 7463 -" if listp setc │ │ │ +00008810: 6172 206e 7468 6364 7220 6173 6574 2065 ar nthcdr aset e │ │ │ +00008820: 6c74 5d20 3130 2022 5c6e 436f 6d6d 6f6e lt] 10 "\nCommon │ │ │ +00008830: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +00008840: 743a 5c6e 2020 2865 6c74 2053 4551 204e t:\n (elt SEQ N │ │ │ +00008850: 295c 6e5c 6e22 5d20 6765 7420 235b 2878 )\n\n"] get #[(x │ │ │ +00008860: 2079 2026 6f70 7469 6f6e 616c 2069 676e y &optional ign │ │ │ +00008870: 6f72 6564 2d61 7267 2920 22c6 c721 1dc6 ored-arg) "..!.. │ │ │ +00008880: c821 1cc6 c921 1bc6 ca21 1a0d 0c0b 4509 .!...!...!....E. │ │ │ +00008890: 080e 0d45 5c6e 430d 190c 180b 1e0d 5c6e ...E\nC.......\n │ │ │ +000088a0: 1e0e cb09 080e 0e46 2ccc 0d0c 0b46 af05 .......F,....F.. │ │ │ +000088b0: 2c87 2220 5b79 2078 202d 2d73 746f 7265 ,." [y x --store │ │ │ +000088c0: 2d2d 7465 6d70 2d2d 202d 2d69 676e 6f72 --temp-- --ignor │ │ │ +000088d0: 6564 2d61 7267 2d2d 7465 6d70 2d2d 202d ed-arg--temp-- - │ │ │ +000088e0: 2d79 2d2d 7465 6d70 2d2d 202d 2d78 2d2d -y--temp-- --x-- │ │ │ +000088f0: 7465 6d70 2d2d 2067 656e 7379 6d20 222d temp-- gensym "- │ │ │ +00008900: 2d78 2d2d 2220 222d 2d79 2d2d 2220 222d -x--" "--y--" "- │ │ │ +00008910: 2d69 676e 6f72 6564 2d61 7267 2d2d 2220 -ignored-arg--" │ │ │ +00008920: 222d 2d73 746f 7265 2d2d 2220 7075 7420 "--store--" put │ │ │ +00008930: 6765 7420 6967 6e6f 7265 642d 6172 6720 get ignored-arg │ │ │ +00008940: 7374 6f72 655d 2038 2022 5c6e 436f 6d6d store] 8 "\nComm │ │ │ +00008950: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +00008960: 6973 743a 5c6e 2020 2867 6574 2058 2059 ist:\n (get X Y │ │ │ +00008970: 2026 6f70 7469 6f6e 616c 2049 474e 4f52 &optional IGNOR │ │ │ +00008980: 4544 2d41 5247 295c 6e5c 6e22 5d20 6765 ED-ARG)\n\n"] ge │ │ │ +00008990: 742a 2023 5b28 7820 7920 266f 7074 696f t* #[(x y &optio │ │ │ +000089a0: 6e61 6c20 6967 6e6f 7265 642d 6172 6729 nal ignored-arg) │ │ │ +000089b0: 2022 c6c7 211d c6c8 211c c6c9 211b c6ca "..!...!...!... │ │ │ +000089c0: 211a 0d0c 0b45 0908 0e0d 455c 6e43 0d19 !....E....E\nC.. │ │ │ +000089d0: 0c18 0b1e 0d5c 6e1e 0ecb 0908 0e0e 462c .....\n.......F, │ │ │ +000089e0: cc0d 0c0b 46af 052c 8722 205b 7920 7820 ....F..,." [y x │ │ │ +000089f0: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +00008a00: 2d2d 6967 6e6f 7265 642d 6172 672d 2d74 --ignored-arg--t │ │ │ +00008a10: 656d 702d 2d20 2d2d 792d 2d74 656d 702d emp-- --y--temp- │ │ │ +00008a20: 2d20 2d2d 782d 2d74 656d 702d 2d20 6765 - --x--temp-- ge │ │ │ +00008a30: 6e73 796d 2022 2d2d 782d 2d22 2022 2d2d nsym "--x--" "-- │ │ │ +00008a40: 792d 2d22 2022 2d2d 6967 6e6f 7265 642d y--" "--ignored- │ │ │ +00008a50: 6172 672d 2d22 2022 2d2d 7374 6f72 652d arg--" "--store- │ │ │ +00008a60: 2d22 2070 7574 2067 6574 2a20 6967 6e6f -" put get* igno │ │ │ +00008a70: 7265 642d 6172 6720 7374 6f72 655d 2038 red-arg store] 8 │ │ │ +00008a80: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ +00008a90: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ +00008aa0: 2867 6574 2a20 5820 5920 266f 7074 696f (get* X Y &optio │ │ │ +00008ab0: 6e61 6c20 4947 4e4f 5245 442d 4152 4729 nal IGNORED-ARG) │ │ │ +00008ac0: 5c6e 5c6e 225d 2067 6574 6861 7368 2023 \n\n"] gethash # │ │ │ +00008ad0: 5b28 7820 6820 266f 7074 696f 6e61 6c20 [(x h &optional │ │ │ +00008ae0: 6967 6e6f 7265 642d 6172 6729 2022 c6c7 ignored-arg) ".. │ │ │ +00008af0: 211d c6c8 211c c6c9 211b c6ca 211a 0d0c !...!...!...!... │ │ │ +00008b00: 0b45 0908 0e0d 455c 6e43 0d19 0c18 0b1e .E....E\nC...... │ │ │ +00008b10: 0d5c 6e1e 0ecb 090e 0e08 462c cc0d 0c0b .\n.......F,.... │ │ │ +00008b20: 46af 052c 8722 205b 6820 7820 2d2d 7374 F..,." [h x --st │ │ │ +00008b30: 6f72 652d 2d74 656d 702d 2d20 2d2d 6967 ore--temp-- --ig │ │ │ +00008b40: 6e6f 7265 642d 6172 672d 2d74 656d 702d nored-arg--temp- │ │ │ +00008b50: 2d20 2d2d 682d 2d74 656d 702d 2d20 2d2d - --h--temp-- -- │ │ │ +00008b60: 782d 2d74 656d 702d 2d20 6765 6e73 796d x--temp-- gensym │ │ │ +00008b70: 2022 2d2d 782d 2d22 2022 2d2d 682d 2d22 "--x--" "--h--" │ │ │ +00008b80: 2022 2d2d 6967 6e6f 7265 642d 6172 672d "--ignored-arg- │ │ │ +00008b90: 2d22 2022 2d2d 7374 6f72 652d 2d22 2063 -" "--store--" c │ │ │ +00008ba0: 6c2d 7075 7468 6173 6820 6765 7468 6173 l-puthash gethas │ │ │ +00008bb0: 6820 6967 6e6f 7265 642d 6172 6720 7374 h ignored-arg st │ │ │ +00008bc0: 6f72 655d 2038 2022 5c6e 436f 6d6d 6f6e ore] 8 "\nCommon │ │ │ +00008bd0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +00008be0: 743a 5c6e 2020 2867 6574 6861 7368 2058 t:\n (gethash X │ │ │ +00008bf0: 2048 2026 6f70 7469 6f6e 616c 2049 474e H &optional IGN │ │ │ +00008c00: 4f52 4544 2d41 5247 295c 6e5c 6e22 5d20 ORED-ARG)\n\n"] │ │ │ +00008c10: 6e74 6820 235b 286e 2078 2920 22c6 c721 nth #[(n x) "..! │ │ │ +00008c20: 1dc6 c821 1cc6 c921 1b0d 0c44 5c6e 0944 ...!...!...D\n.D │ │ │ +00008c30: 0b43 0d1a 0c19 0b18 cacb 5c6e 0945 0845 .C........\n.E.E │ │ │ +00008c40: 2bcc 0d0c 45af 052b 8722 205b 7374 6f72 +...E..+." [stor │ │ │ +00008c50: 6520 7820 6e20 2d2d 7374 6f72 652d 2d74 e x n --store--t │ │ │ +00008c60: 656d 702d 2d20 2d2d 782d 2d74 656d 702d emp-- --x--temp- │ │ │ +00008c70: 2d20 2d2d 6e2d 2d74 656d 702d 2d20 6765 - --n--temp-- ge │ │ │ +00008c80: 6e73 796d 2022 2d2d 6e2d 2d22 2022 2d2d nsym "--n--" "-- │ │ │ +00008c90: 782d 2d22 2022 2d2d 7374 6f72 652d 2d22 x--" "--store--" │ │ │ +00008ca0: 2073 6574 6361 7220 6e74 6863 6472 206e setcar nthcdr n │ │ │ +00008cb0: 7468 5d20 3720 225c 6e43 6f6d 6d6f 6e20 th] 7 "\nCommon │ │ │ +00008cc0: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ +00008cd0: 3a5c 6e20 2028 6e74 6820 4e20 5829 5c6e :\n (nth N X)\n │ │ │ +00008ce0: 5c6e 225d 2073 7562 7365 7120 235b 2873 \n"] subseq #[(s │ │ │ +00008cf0: 6571 2073 7461 7274 2026 6f70 7469 6f6e eq start &option │ │ │ +00008d00: 616c 2065 6e64 2920 22c6 c721 1dc6 c821 al end) "..!...! │ │ │ +00008d10: 1cc6 c921 1bc6 ca21 1a0d 0c0b 4509 080e ...!...!....E... │ │ │ +00008d20: 1045 5c6e 430d 190c 180b 1e10 5c6e 1e11 .E\nC.......\n.. │ │ │ +00008d30: cbcc 090e 11cd 08ce 0e10 af07 0e11 452c ..............E, │ │ │ +00008d40: cf0d 0c0b 46af 052c 8722 205b 7374 6172 ....F..,." [star │ │ │ +00008d50: 7420 7365 7120 2d2d 6e65 772d 2d74 656d t seq --new--tem │ │ │ +00008d60: 702d 2d20 2d2d 656e 642d 2d74 656d 702d p-- --end--temp- │ │ │ +00008d70: 2d20 2d2d 7374 6172 742d 2d74 656d 702d - --start--temp- │ │ │ +00008d80: 2d20 2d2d 7365 712d 2d74 656d 702d 2d20 - --seq--temp-- │ │ │ +00008d90: 6765 6e73 796d 2022 2d2d 7365 712d 2d22 gensym "--seq--" │ │ │ +00008da0: 2022 2d2d 7374 6172 742d 2d22 2022 2d2d "--start--" "-- │ │ │ +00008db0: 656e 642d 2d22 2022 2d2d 6e65 772d 2d22 end--" "--new--" │ │ │ +00008dc0: 2070 726f 676e 2072 6570 6c61 6365 203a progn replace : │ │ │ +00008dd0: 7374 6172 7431 203a 656e 6431 2073 7562 start1 :end1 sub │ │ │ +00008de0: 7365 7120 656e 6420 6e65 775d 2031 3120 seq end new] 11 │ │ │ +00008df0: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ +00008e00: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ +00008e10: 7375 6273 6571 2053 4551 2053 5441 5254 subseq SEQ START │ │ │ +00008e20: 2026 6f70 7469 6f6e 616c 2045 4e44 295c &optional END)\ │ │ │ +00008e30: 6e5c 6e22 5d20 7379 6d62 6f6c 2d66 756e n\n"] symbol-fun │ │ │ +00008e40: 6374 696f 6e20 235b 2826 7265 7374 2061 ction #[(&rest a │ │ │ +00008e50: 7267 7329 2022 c4c5 0b5c 221a c5c6 2119 rgs) "...\"...!. │ │ │ +00008e60: 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 435c \n..C\n.......C\ │ │ │ +00008e70: 222a 42c9 5c6e 42af 052a 8722 205b 7374 "*B.\nB..*." [st │ │ │ +00008e80: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ +00008e90: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ +00008ea0: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ +00008eb0: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ +00008ec0: 2220 6673 6574 2061 7070 656e 6420 7379 " fset append sy │ │ │ +00008ed0: 6d62 6f6c 2d66 756e 6374 696f 6e5d 2037 mbol-function] 7 │ │ │ +00008ee0: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ +00008ef0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ +00008f00: 2873 796d 626f 6c2d 6675 6e63 7469 6f6e (symbol-function │ │ │ +00008f10: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +00008f20: 225d 2073 796d 626f 6c2d 706c 6973 7420 "] symbol-plist │ │ │ +00008f30: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ +00008f40: c4c5 0b5c 221a c5c6 2119 5c6e 0b09 435c ...\"...!.\n..C\ │ │ │ +00008f50: 6e1b 0918 c7c8 0b08 435c 222a 42c9 5c6e n.......C\"*B.\n │ │ │ +00008f60: 42af 052a 8722 205b 7374 6f72 6520 2d2d B..*." [store -- │ │ │ +00008f70: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ +00008f80: 6172 6773 2d2d 7465 6d70 2d2d 2061 7267 args--temp-- arg │ │ │ +00008f90: 7320 6d61 7063 6172 2067 656e 7379 6d20 s mapcar gensym │ │ │ +00008fa0: 222d 2d73 746f 7265 2d2d 2220 7365 7470 "--store--" setp │ │ │ +00008fb0: 6c69 7374 2061 7070 656e 6420 7379 6d62 list append symb │ │ │ +00008fc0: 6f6c 2d70 6c69 7374 5d20 3720 225c 6e43 ol-plist] 7 "\nC │ │ │ +00008fd0: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +00008fe0: 6120 6c69 7374 3a5c 6e20 2028 7379 6d62 a list:\n (symb │ │ │ +00008ff0: 6f6c 2d70 6c69 7374 2026 7265 7374 2041 ol-plist &rest A │ │ │ +00009000: 5247 5329 5c6e 5c6e 225d 2073 796d 626f RGS)\n\n"] symbo │ │ │ +00009010: 6c2d 7661 6c75 6520 235b 2826 7265 7374 l-value #[(&rest │ │ │ +00009020: 2061 7267 7329 2022 c4c5 0b5c 221a c5c6 args) "...\"... │ │ │ +00009030: 2119 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 !.\n..C\n....... │ │ │ +00009040: 435c 222a 42c9 5c6e 42af 052a 8722 205b C\"*B.\nB..*." [ │ │ │ +00009050: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ +00009060: 656d 702d 2d20 2d2d 6172 6773 2d2d 7465 emp-- --args--te │ │ │ +00009070: 6d70 2d2d 2061 7267 7320 6d61 7063 6172 mp-- args mapcar │ │ │ +00009080: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ +00009090: 2d2d 2220 7365 7420 6170 7065 6e64 2073 --" set append s │ │ │ +000090a0: 796d 626f 6c2d 7661 6c75 655d 2037 2022 ymbol-value] 7 " │ │ │ +000090b0: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +000090c0: 6d62 6461 206c 6973 743a 5c6e 2020 2873 mbda list:\n (s │ │ │ +000090d0: 796d 626f 6c2d 7661 6c75 6520 2672 6573 ymbol-value &res │ │ │ +000090e0: 7420 4152 4753 295c 6e5c 6e22 5d20 6669 t ARGS)\n\n"] fi │ │ │ +000090f0: 7273 7420 235b 2826 7265 7374 2061 7267 rst #[(&rest arg │ │ │ +00009100: 7329 2022 c4c5 0b5c 221a c5c6 2119 5c6e s) "...\"...!.\n │ │ │ +00009110: 0b09 435c 6e1b 0918 c7c8 0b08 435c 222a ..C\n.......C\"* │ │ │ +00009120: 42c9 5c6e 42af 052a 8722 205b 7374 6f72 B.\nB..*." [stor │ │ │ +00009130: 6520 2d2d 7374 6f72 652d 2d74 656d 702d e --store--temp- │ │ │ +00009140: 2d20 2d2d 6172 6773 2d2d 7465 6d70 2d2d - --args--temp-- │ │ │ +00009150: 2061 7267 7320 6d61 7063 6172 2067 656e args mapcar gen │ │ │ +00009160: 7379 6d20 222d 2d73 746f 7265 2d2d 2220 sym "--store--" │ │ │ +00009170: 7365 7463 6172 2061 7070 656e 6420 6669 setcar append fi │ │ │ +00009180: 7273 745d 2037 2022 5c6e 436f 6d6d 6f6e rst] 7 "\nCommon │ │ │ +00009190: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +000091a0: 743a 5c6e 2020 2866 6972 7374 2026 7265 t:\n (first &re │ │ │ +000091b0: 7374 2041 5247 5329 5c6e 5c6e 225d 2073 st ARGS)\n\n"] s │ │ │ +000091c0: 6563 6f6e 6420 235b 2878 2920 22c4 c521 econd #[(x) "..! │ │ │ +000091d0: 1bc4 c621 1a0b 4309 435c 6e43 0b19 5c6e ...!..C.C\nC..\n │ │ │ +000091e0: 18c7 c809 4408 452a c90b 44af 052a 8722 ....D.E*..D..*." │ │ │ +000091f0: 205b 7374 6f72 6520 7820 2d2d 7374 6f72 [store x --stor │ │ │ +00009200: 652d 2d74 656d 702d 2d20 2d2d 782d 2d74 e--temp-- --x--t │ │ │ +00009210: 656d 702d 2d20 6765 6e73 796d 2022 2d2d emp-- gensym "-- │ │ │ +00009220: 782d 2d22 2022 2d2d 7374 6f72 652d 2d22 x--" "--store--" │ │ │ +00009230: 2073 6574 6361 7220 6364 7220 7365 636f setcar cdr seco │ │ │ +00009240: 6e64 5d20 3620 225c 6e43 6f6d 6d6f 6e20 nd] 6 "\nCommon │ │ │ +00009250: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ +00009260: 3a5c 6e20 2028 7365 636f 6e64 2058 295c :\n (second X)\ │ │ │ +00009270: 6e5c 6e22 5d20 7468 6972 6420 235b 2878 n\n"] third #[(x │ │ │ +00009280: 2920 22c4 c521 1bc4 c621 1a0b 4309 435c ) "..!...!..C.C\ │ │ │ +00009290: 6e43 0b19 5c6e 18c7 c809 4408 452a c90b nC..\n....D.E*.. │ │ │ +000092a0: 44af 052a 8722 205b 7374 6f72 6520 7820 D..*." [store x │ │ │ +000092b0: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +000092c0: 2d2d 782d 2d74 656d 702d 2d20 6765 6e73 --x--temp-- gens │ │ │ +000092d0: 796d 2022 2d2d 782d 2d22 2022 2d2d 7374 ym "--x--" "--st │ │ │ +000092e0: 6f72 652d 2d22 2073 6574 6361 7220 6364 ore--" setcar cd │ │ │ +000092f0: 6472 2074 6869 7264 5d20 3620 225c 6e43 dr third] 6 "\nC │ │ │ +00009300: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +00009310: 6120 6c69 7374 3a5c 6e20 2028 7468 6972 a list:\n (thir │ │ │ +00009320: 6420 5829 5c6e 5c6e 225d 2066 6f75 7274 d X)\n\n"] fourt │ │ │ +00009330: 6820 235b 2878 2920 22c4 c521 1bc4 c621 h #[(x) "..!...! │ │ │ +00009340: 1a0b 4309 435c 6e43 0b19 5c6e 18c7 c809 ..C.C\nC..\n.... │ │ │ +00009350: 4408 452a c90b 44af 052a 8722 205b 7374 D.E*..D..*." [st │ │ │ +00009360: 6f72 6520 7820 2d2d 7374 6f72 652d 2d74 ore x --store--t │ │ │ +00009370: 656d 702d 2d20 2d2d 782d 2d74 656d 702d emp-- --x--temp- │ │ │ +00009380: 2d20 6765 6e73 796d 2022 2d2d 782d 2d22 - gensym "--x--" │ │ │ +00009390: 2022 2d2d 7374 6f72 652d 2d22 2073 6574 "--store--" set │ │ │ +000093a0: 6361 7220 6364 6464 7220 666f 7572 7468 car cdddr fourth │ │ │ +000093b0: 5d20 3620 225c 6e43 6f6d 6d6f 6e20 4c69 ] 6 "\nCommon Li │ │ │ +000093c0: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ +000093d0: 6e20 2028 666f 7572 7468 2058 295c 6e5c n (fourth X)\n\ │ │ │ +000093e0: 6e22 5d20 6669 6674 6820 235b 2878 2920 n"] fifth #[(x) │ │ │ +000093f0: 22c4 c521 1bc4 c621 1a0b 4309 435c 6e43 "..!...!..C.C\nC │ │ │ +00009400: 0b19 5c6e 18c7 c8c9 0945 0845 2aca 0b44 ..\n.....E.E*..D │ │ │ +00009410: af05 2a87 2220 5b73 746f 7265 2078 202d ..*." [store x - │ │ │ +00009420: 2d73 746f 7265 2d2d 7465 6d70 2d2d 202d -store--temp-- - │ │ │ +00009430: 2d78 2d2d 7465 6d70 2d2d 2067 656e 7379 -x--temp-- gensy │ │ │ +00009440: 6d20 222d 2d78 2d2d 2220 222d 2d73 746f m "--x--" "--sto │ │ │ +00009450: 7265 2d2d 2220 7365 7463 6172 206e 7468 re--" setcar nth │ │ │ +00009460: 6364 7220 3420 6669 6674 685d 2037 2022 cdr 4 fifth] 7 " │ │ │ +00009470: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +00009480: 6d62 6461 206c 6973 743a 5c6e 2020 2866 mbda list:\n (f │ │ │ +00009490: 6966 7468 2058 295c 6e5c 6e22 5d20 7369 ifth X)\n\n"] si │ │ │ +000094a0: 7874 6820 235b 2878 2920 22c4 c521 1bc4 xth #[(x) "..!.. │ │ │ +000094b0: c621 1a0b 4309 435c 6e43 0b19 5c6e 18c7 .!..C.C\nC..\n.. │ │ │ +000094c0: c8c9 0945 0845 2aca 0b44 af05 2a87 2220 ...E.E*..D..*." │ │ │ +000094d0: 5b73 746f 7265 2078 202d 2d73 746f 7265 [store x --store │ │ │ +000094e0: 2d2d 7465 6d70 2d2d 202d 2d78 2d2d 7465 --temp-- --x--te │ │ │ +000094f0: 6d70 2d2d 2067 656e 7379 6d20 222d 2d78 mp-- gensym "--x │ │ │ +00009500: 2d2d 2220 222d 2d73 746f 7265 2d2d 2220 --" "--store--" │ │ │ +00009510: 7365 7463 6172 206e 7468 6364 7220 3520 setcar nthcdr 5 │ │ │ +00009520: 7369 7874 685d 2037 2022 5c6e 436f 6d6d sixth] 7 "\nComm │ │ │ +00009530: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +00009540: 6973 743a 5c6e 2020 2873 6978 7468 2058 ist:\n (sixth X │ │ │ +00009550: 295c 6e5c 6e22 5d20 7365 7665 6e74 6820 )\n\n"] seventh │ │ │ +00009560: 235b 2878 2920 22c4 c521 1bc4 c621 1a0b #[(x) "..!...!.. │ │ │ +00009570: 4309 435c 6e43 0b19 5c6e 18c7 c8c9 0945 C.C\nC..\n.....E │ │ │ +00009580: 0845 2aca 0b44 af05 2a87 2220 5b73 746f .E*..D..*." [sto │ │ │ +00009590: 7265 2078 202d 2d73 746f 7265 2d2d 7465 re x --store--te │ │ │ +000095a0: 6d70 2d2d 202d 2d78 2d2d 7465 6d70 2d2d mp-- --x--temp-- │ │ │ +000095b0: 2067 656e 7379 6d20 222d 2d78 2d2d 2220 gensym "--x--" │ │ │ +000095c0: 222d 2d73 746f 7265 2d2d 2220 7365 7463 "--store--" setc │ │ │ +000095d0: 6172 206e 7468 6364 7220 3620 7365 7665 ar nthcdr 6 seve │ │ │ +000095e0: 6e74 685d 2037 2022 5c6e 436f 6d6d 6f6e nth] 7 "\nCommon │ │ │ +000095f0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +00009600: 743a 5c6e 2020 2873 6576 656e 7468 2058 t:\n (seventh X │ │ │ +00009610: 295c 6e5c 6e22 5d20 6569 6768 7468 2023 )\n\n"] eighth # │ │ │ +00009620: 5b28 7829 2022 c4c5 211b c4c6 211a 0b43 [(x) "..!...!..C │ │ │ +00009630: 0943 5c6e 430b 195c 6e18 c7c8 c909 4508 .C\nC..\n.....E. │ │ │ +00009640: 452a ca0b 44af 052a 8722 205b 7374 6f72 E*..D..*." [stor │ │ │ +00009650: 6520 7820 2d2d 7374 6f72 652d 2d74 656d e x --store--tem │ │ │ +00009660: 702d 2d20 2d2d 782d 2d74 656d 702d 2d20 p-- --x--temp-- │ │ │ +00009670: 6765 6e73 796d 2022 2d2d 782d 2d22 2022 gensym "--x--" " │ │ │ +00009680: 2d2d 7374 6f72 652d 2d22 2073 6574 6361 --store--" setca │ │ │ +00009690: 7220 6e74 6863 6472 2037 2065 6967 6874 r nthcdr 7 eight │ │ │ +000096a0: 685d 2037 2022 5c6e 436f 6d6d 6f6e 204c h] 7 "\nCommon L │ │ │ +000096b0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +000096c0: 5c6e 2020 2865 6967 6874 6820 5829 5c6e \n (eighth X)\n │ │ │ +000096d0: 5c6e 225d 206e 696e 7468 2023 5b28 7829 \n"] ninth #[(x) │ │ │ +000096e0: 2022 c4c5 211b c4c6 211a 0b43 0943 5c6e "..!...!..C.C\n │ │ │ +000096f0: 430b 195c 6e18 c7c8 c909 4508 452a ca0b C..\n.....E.E*.. │ │ │ +00009700: 44af 052a 8722 205b 7374 6f72 6520 7820 D..*." [store x │ │ │ +00009710: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +00009720: 2d2d 782d 2d74 656d 702d 2d20 6765 6e73 --x--temp-- gens │ │ │ +00009730: 796d 2022 2d2d 782d 2d22 2022 2d2d 7374 ym "--x--" "--st │ │ │ +00009740: 6f72 652d 2d22 2073 6574 6361 7220 6e74 ore--" setcar nt │ │ │ +00009750: 6863 6472 2038 206e 696e 7468 5d20 3720 hcdr 8 ninth] 7 │ │ │ +00009760: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ +00009770: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ +00009780: 6e69 6e74 6820 5829 5c6e 5c6e 225d 2074 ninth X)\n\n"] t │ │ │ +00009790: 656e 7468 2023 5b28 7829 2022 c4c5 211b enth #[(x) "..!. │ │ │ +000097a0: c4c6 211a 0b43 0943 5c6e 430b 195c 6e18 ..!..C.C\nC..\n. │ │ │ +000097b0: c7c8 c909 4508 452a ca0b 44af 052a 8722 ....E.E*..D..*." │ │ │ +000097c0: 205b 7374 6f72 6520 7820 2d2d 7374 6f72 [store x --stor │ │ │ +000097d0: 652d 2d74 656d 702d 2d20 2d2d 782d 2d74 e--temp-- --x--t │ │ │ +000097e0: 656d 702d 2d20 6765 6e73 796d 2022 2d2d emp-- gensym "-- │ │ │ +000097f0: 782d 2d22 2022 2d2d 7374 6f72 652d 2d22 x--" "--store--" │ │ │ +00009800: 2073 6574 6361 7220 6e74 6863 6472 2039 setcar nthcdr 9 │ │ │ +00009810: 2074 656e 7468 5d20 3720 225c 6e43 6f6d tenth] 7 "\nCom │ │ │ +00009820: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +00009830: 6c69 7374 3a5c 6e20 2028 7465 6e74 6820 list:\n (tenth │ │ │ +00009840: 5829 5c6e 5c6e 225d 2072 6573 7420 235b X)\n\n"] rest #[ │ │ │ +00009850: 2826 7265 7374 2061 7267 7329 2022 c4c5 (&rest args) ".. │ │ │ +00009860: 0b5c 221a c5c6 2119 5c6e 0b09 435c 6e1b .\"...!.\n..C\n. │ │ │ +00009870: 0918 c7c8 0b08 435c 222a 42c9 5c6e 42af ......C\"*B.\nB. │ │ │ +00009880: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ +00009890: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ +000098a0: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ +000098b0: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ +000098c0: 2d73 746f 7265 2d2d 2220 7365 7463 6472 -store--" setcdr │ │ │ +000098d0: 2061 7070 656e 6420 7265 7374 5d20 3720 append rest] 7 │ │ │ +000098e0: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ +000098f0: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ +00009900: 7265 7374 2026 7265 7374 2041 5247 5329 rest &rest ARGS) │ │ │ +00009910: 5c6e 5c6e 225d 2062 7566 6665 722d 6669 \n\n"] buffer-fi │ │ │ +00009920: 6c65 2d6e 616d 6520 235b 2826 7265 7374 le-name #[(&rest │ │ │ +00009930: 2061 7267 7329 2022 c4c5 0b5c 221a c5c6 args) "...\"... │ │ │ +00009940: 2119 5c6e 0b09 435c 6e1b 0918 c7c8 c90b !.\n..C\n....... │ │ │ +00009950: 0843 5c22 4208 452a ca5c 6e42 af05 2a87 .C\"B.E*.\nB..*. │ │ │ +00009960: 2220 5b73 746f 7265 202d 2d73 746f 7265 " [store --store │ │ │ +00009970: 2d2d 7465 6d70 2d2d 202d 2d61 7267 732d --temp-- --args- │ │ │ +00009980: 2d74 656d 702d 2d20 6172 6773 206d 6170 -temp-- args map │ │ │ +00009990: 6361 7220 6765 6e73 796d 2022 2d2d 7374 car gensym "--st │ │ │ +000099a0: 6f72 652d 2d22 2070 726f 676e 2073 6574 ore--" progn set │ │ │ +000099b0: 2d76 6973 6974 6564 2d66 696c 652d 6e61 -visited-file-na │ │ │ +000099c0: 6d65 2061 7070 656e 6420 6275 6666 6572 me append buffer │ │ │ +000099d0: 2d66 696c 652d 6e61 6d65 5d20 3820 225c -file-name] 8 "\ │ │ │ +000099e0: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ +000099f0: 6264 6120 6c69 7374 3a5c 6e20 2028 6275 bda list:\n (bu │ │ │ +00009a00: 6666 6572 2d66 696c 652d 6e61 6d65 2026 ffer-file-name & │ │ │ +00009a10: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +00009a20: 2062 7566 6665 722d 6d6f 6469 6669 6564 buffer-modified │ │ │ +00009a30: 2d70 2023 5b28 2672 6573 7420 6172 6773 -p #[(&rest args │ │ │ +00009a40: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ +00009a50: 0943 5c6e 1b09 18c7 c8c9 0b08 435c 2242 .C\n........C\"B │ │ │ +00009a60: 0845 2aca 5c6e 42af 052a 8722 205b 7374 .E*.\nB..*." [st │ │ │ +00009a70: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ +00009a80: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ +00009a90: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ +00009aa0: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ +00009ab0: 2220 7072 6f67 6e20 7365 742d 6275 6666 " progn set-buff │ │ │ +00009ac0: 6572 2d6d 6f64 6966 6965 642d 7020 6170 er-modified-p ap │ │ │ +00009ad0: 7065 6e64 2062 7566 6665 722d 6d6f 6469 pend buffer-modi │ │ │ +00009ae0: 6669 6564 2d70 5d20 3820 225c 6e43 6f6d fied-p] 8 "\nCom │ │ │ +00009af0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +00009b00: 6c69 7374 3a5c 6e20 2028 6275 6666 6572 list:\n (buffer │ │ │ +00009b10: 2d6d 6f64 6966 6965 642d 7020 2672 6573 -modified-p &res │ │ │ +00009b20: 7420 4152 4753 295c 6e5c 6e22 5d20 6275 t ARGS)\n\n"] bu │ │ │ +00009b30: 6666 6572 2d6e 616d 6520 235b 2826 7265 ffer-name #[(&re │ │ │ +00009b40: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ +00009b50: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ +00009b60: c90b 0843 5c22 4208 452a ca5c 6e42 af05 ...C\"B.E*.\nB.. │ │ │ +00009b70: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ +00009b80: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ +00009b90: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ +00009ba0: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ +00009bb0: 7374 6f72 652d 2d22 2070 726f 676e 2072 store--" progn r │ │ │ +00009bc0: 656e 616d 652d 6275 6666 6572 2061 7070 ename-buffer app │ │ │ +00009bd0: 656e 6420 6275 6666 6572 2d6e 616d 655d end buffer-name] │ │ │ +00009be0: 2038 2022 5c6e 436f 6d6d 6f6e 204c 6973 8 "\nCommon Lis │ │ │ +00009bf0: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ +00009c00: 2020 2862 7566 6665 722d 6e61 6d65 2026 (buffer-name & │ │ │ +00009c10: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +00009c20: 2062 7566 6665 722d 7374 7269 6e67 2023 buffer-string # │ │ │ +00009c30: 5b6e 696c 2022 c2c3 2119 c489 0943 0918 [nil "..!....C.. │ │ │ +00009c40: c5c6 c708 4445 29c8 43af 0529 8722 205b ....DE).C..)." [ │ │ │ +00009c50: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ +00009c60: 656d 702d 2d20 6765 6e73 796d 2022 2d2d emp-- gensym "-- │ │ │ +00009c70: 7374 6f72 652d 2d22 206e 696c 2070 726f store--" nil pro │ │ │ +00009c80: 676e 2028 6572 6173 652d 6275 6666 6572 gn (erase-buffer │ │ │ +00009c90: 2920 696e 7365 7274 2062 7566 6665 722d ) insert buffer- │ │ │ +00009ca0: 7374 7269 6e67 5d20 3720 225c 6e43 6f6d string] 7 "\nCom │ │ │ +00009cb0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +00009cc0: 6c69 7374 3a5c 6e20 2028 6275 6666 6572 list:\n (buffer │ │ │ +00009cd0: 2d73 7472 696e 6729 5c6e 5c6e 225d 2062 -string)\n\n"] b │ │ │ +00009ce0: 7566 6665 722d 7375 6273 7472 696e 6720 uffer-substring │ │ │ +00009cf0: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ +00009d00: c4c5 0b5c 221a c5c6 2119 5c6e 0b09 435c ...\"...!.\n..C\ │ │ │ +00009d10: 6e1b 0918 c7c8 0b08 435c 222a 42c9 5c6e n.......C\"*B.\n │ │ │ +00009d20: 42af 052a 8722 205b 7374 6f72 6520 2d2d B..*." [store -- │ │ │ +00009d30: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ +00009d40: 6172 6773 2d2d 7465 6d70 2d2d 2061 7267 args--temp-- arg │ │ │ +00009d50: 7320 6d61 7063 6172 2067 656e 7379 6d20 s mapcar gensym │ │ │ +00009d60: 222d 2d73 746f 7265 2d2d 2220 636c 2d73 "--store--" cl-s │ │ │ +00009d70: 6574 2d62 7566 6665 722d 7375 6273 7472 et-buffer-substr │ │ │ +00009d80: 696e 6720 6170 7065 6e64 2062 7566 6665 ing append buffe │ │ │ +00009d90: 722d 7375 6273 7472 696e 675d 2037 2022 r-substring] 7 " │ │ │ +00009da0: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +00009db0: 6d62 6461 206c 6973 743a 5c6e 2020 2862 mbda list:\n (b │ │ │ +00009dc0: 7566 6665 722d 7375 6273 7472 696e 6720 uffer-substring │ │ │ +00009dd0: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ +00009de0: 5d20 6375 7272 656e 742d 6275 6666 6572 ] current-buffer │ │ │ +00009df0: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ +00009e00: 22c4 c50b 5c22 1ac5 c621 195c 6e0b 0943 "...\"...!.\n..C │ │ │ +00009e10: 5c6e 1b09 18c7 c80b 0843 5c22 2a42 c95c \n.......C\"*B.\ │ │ │ +00009e20: 6e42 af05 2a87 2220 5b73 746f 7265 202d nB..*." [store - │ │ │ +00009e30: 2d73 746f 7265 2d2d 7465 6d70 2d2d 202d -store--temp-- - │ │ │ +00009e40: 2d61 7267 732d 2d74 656d 702d 2d20 6172 -args--temp-- ar │ │ │ +00009e50: 6773 206d 6170 6361 7220 6765 6e73 796d gs mapcar gensym │ │ │ +00009e60: 2022 2d2d 7374 6f72 652d 2d22 2073 6574 "--store--" set │ │ │ +00009e70: 2d62 7566 6665 7220 6170 7065 6e64 2063 -buffer append c │ │ │ +00009e80: 7572 7265 6e74 2d62 7566 6665 725d 2037 urrent-buffer] 7 │ │ │ +00009e90: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ +00009ea0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ +00009eb0: 2863 7572 7265 6e74 2d62 7566 6665 7220 (current-buffer │ │ │ +00009ec0: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ +00009ed0: 5d20 6375 7272 656e 742d 6361 7365 2d74 ] current-case-t │ │ │ +00009ee0: 6162 6c65 2023 5b28 2672 6573 7420 6172 able #[(&rest ar │ │ │ +00009ef0: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ +00009f00: 6e0b 0943 5c6e 1b09 18c7 c80b 0843 5c22 n..C\n.......C\" │ │ │ +00009f10: 2a42 c95c 6e42 af05 2a87 2220 5b73 746f *B.\nB..*." [sto │ │ │ +00009f20: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +00009f30: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +00009f40: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +00009f50: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +00009f60: 2073 6574 2d63 6173 652d 7461 626c 6520 set-case-table │ │ │ +00009f70: 6170 7065 6e64 2063 7572 7265 6e74 2d63 append current-c │ │ │ +00009f80: 6173 652d 7461 626c 655d 2037 2022 5c6e ase-table] 7 "\n │ │ │ +00009f90: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +00009fa0: 6461 206c 6973 743a 5c6e 2020 2863 7572 da list:\n (cur │ │ │ +00009fb0: 7265 6e74 2d63 6173 652d 7461 626c 6520 rent-case-table │ │ │ +00009fc0: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ +00009fd0: 5d20 6375 7272 656e 742d 636f 6c75 6d6e ] current-column │ │ │ +00009fe0: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ +00009ff0: 22c4 c50b 5c22 1ac5 c621 195c 6e0b 0943 "...\"...!.\n..C │ │ │ +0000a000: 5c6e 1b09 18c7 c8c9 0b08 435c 2242 0845 \n........C\"B.E │ │ │ +0000a010: 2aca 5c6e 42af 052a 8722 205b 7374 6f72 *.\nB..*." [stor │ │ │ +0000a020: 6520 2d2d 7374 6f72 652d 2d74 656d 702d e --store--temp- │ │ │ +0000a030: 2d20 2d2d 6172 6773 2d2d 7465 6d70 2d2d - --args--temp-- │ │ │ +0000a040: 2061 7267 7320 6d61 7063 6172 2067 656e args mapcar gen │ │ │ +0000a050: 7379 6d20 222d 2d73 746f 7265 2d2d 2220 sym "--store--" │ │ │ +0000a060: 7072 6f67 6e20 6d6f 7665 2d74 6f2d 636f progn move-to-co │ │ │ +0000a070: 6c75 6d6e 2061 7070 656e 6420 6375 7272 lumn append curr │ │ │ +0000a080: 656e 742d 636f 6c75 6d6e 5d20 3820 225c ent-column] 8 "\ │ │ │ +0000a090: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ +0000a0a0: 6264 6120 6c69 7374 3a5c 6e20 2028 6375 bda list:\n (cu │ │ │ +0000a0b0: 7272 656e 742d 636f 6c75 6d6e 2026 7265 rrent-column &re │ │ │ +0000a0c0: 7374 2041 5247 5329 5c6e 5c6e 225d 2063 st ARGS)\n\n"] c │ │ │ +0000a0d0: 7572 7265 6e74 2d67 6c6f 6261 6c2d 6d61 urrent-global-ma │ │ │ +0000a0e0: 7020 235b 2826 7265 7374 2061 7267 7329 p #[(&rest args) │ │ │ +0000a0f0: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000a100: 435c 6e1b 0918 c7c8 c90b 0843 5c22 4208 C\n........C\"B. │ │ │ +0000a110: 452a ca5c 6e42 af05 2a87 2220 5b73 746f E*.\nB..*." [sto │ │ │ +0000a120: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +0000a130: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +0000a140: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +0000a150: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +0000a160: 2070 726f 676e 2075 7365 2d67 6c6f 6261 progn use-globa │ │ │ +0000a170: 6c2d 6d61 7020 6170 7065 6e64 2063 7572 l-map append cur │ │ │ +0000a180: 7265 6e74 2d67 6c6f 6261 6c2d 6d61 705d rent-global-map] │ │ │ +0000a190: 2038 2022 5c6e 436f 6d6d 6f6e 204c 6973 8 "\nCommon Lis │ │ │ +0000a1a0: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ +0000a1b0: 2020 2863 7572 7265 6e74 2d67 6c6f 6261 (current-globa │ │ │ +0000a1c0: 6c2d 6d61 7020 2672 6573 7420 4152 4753 l-map &rest ARGS │ │ │ +0000a1d0: 295c 6e5c 6e22 5d20 6375 7272 656e 742d )\n\n"] current- │ │ │ +0000a1e0: 696e 7075 742d 6d6f 6465 2023 5b6e 696c input-mode #[nil │ │ │ +0000a1f0: 2022 c2c3 2119 c489 0943 0918 c5c6 c708 "..!....C...... │ │ │ +0000a200: 4508 4529 c843 af05 2987 2220 5b73 746f E.E).C..)." [sto │ │ │ +0000a210: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +0000a220: 2d2d 2067 656e 7379 6d20 222d 2d73 746f -- gensym "--sto │ │ │ +0000a230: 7265 2d2d 2220 6e69 6c20 7072 6f67 6e20 re--" nil progn │ │ │ +0000a240: 6170 706c 7920 7365 742d 696e 7075 742d apply set-input- │ │ │ +0000a250: 6d6f 6465 2063 7572 7265 6e74 2d69 6e70 mode current-inp │ │ │ +0000a260: 7574 2d6d 6f64 655d 2037 2022 5c6e 436f ut-mode] 7 "\nCo │ │ │ +0000a270: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ +0000a280: 206c 6973 743a 5c6e 2020 2863 7572 7265 list:\n (curre │ │ │ +0000a290: 6e74 2d69 6e70 7574 2d6d 6f64 6529 5c6e nt-input-mode)\n │ │ │ +0000a2a0: 5c6e 225d 2063 7572 7265 6e74 2d6c 6f63 \n"] current-loc │ │ │ +0000a2b0: 616c 2d6d 6170 2023 5b28 2672 6573 7420 al-map #[(&rest │ │ │ +0000a2c0: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ +0000a2d0: 195c 6e0b 0943 5c6e 1b09 18c7 c8c9 0b08 .\n..C\n........ │ │ │ +0000a2e0: 435c 2242 0845 2aca 5c6e 42af 052a 8722 C\"B.E*.\nB..*." │ │ │ +0000a2f0: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ +0000a300: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ +0000a310: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ +0000a320: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ +0000a330: 7265 2d2d 2220 7072 6f67 6e20 7573 652d re--" progn use- │ │ │ +0000a340: 6c6f 6361 6c2d 6d61 7020 6170 7065 6e64 local-map append │ │ │ +0000a350: 2063 7572 7265 6e74 2d6c 6f63 616c 2d6d current-local-m │ │ │ +0000a360: 6170 5d20 3820 225c 6e43 6f6d 6d6f 6e20 ap] 8 "\nCommon │ │ │ +0000a370: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ +0000a380: 3a5c 6e20 2028 6375 7272 656e 742d 6c6f :\n (current-lo │ │ │ +0000a390: 6361 6c2d 6d61 7020 2672 6573 7420 4152 cal-map &rest AR │ │ │ +0000a3a0: 4753 295c 6e5c 6e22 5d20 6375 7272 656e GS)\n\n"] curren │ │ │ +0000a3b0: 742d 7769 6e64 6f77 2d63 6f6e 6669 6775 t-window-configu │ │ │ +0000a3c0: 7261 7469 6f6e 2023 5b28 2672 6573 7420 ration #[(&rest │ │ │ +0000a3d0: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ +0000a3e0: 195c 6e0b 0943 5c6e 1b09 18c7 c8c9 0b08 .\n..C\n........ │ │ │ +0000a3f0: 435c 2242 0845 2aca 5c6e 42af 052a 8722 C\"B.E*.\nB..*." │ │ │ +0000a400: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ +0000a410: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ +0000a420: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ +0000a430: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ +0000a440: 7265 2d2d 2220 7072 6f67 6e20 7365 742d re--" progn set- │ │ │ +0000a450: 7769 6e64 6f77 2d63 6f6e 6669 6775 7261 window-configura │ │ │ +0000a460: 7469 6f6e 2061 7070 656e 6420 6375 7272 tion append curr │ │ │ +0000a470: 656e 742d 7769 6e64 6f77 2d63 6f6e 6669 ent-window-confi │ │ │ +0000a480: 6775 7261 7469 6f6e 5d20 3820 225c 6e43 guration] 8 "\nC │ │ │ +0000a490: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +0000a4a0: 6120 6c69 7374 3a5c 6e20 2028 6375 7272 a list:\n (curr │ │ │ +0000a4b0: 656e 742d 7769 6e64 6f77 2d63 6f6e 6669 ent-window-confi │ │ │ +0000a4c0: 6775 7261 7469 6f6e 2026 7265 7374 2041 guration &rest A │ │ │ +0000a4d0: 5247 5329 5c6e 5c6e 225d 2064 6566 6175 RGS)\n\n"] defau │ │ │ +0000a4e0: 6c74 2d66 696c 652d 6d6f 6465 7320 235b lt-file-modes #[ │ │ │ +0000a4f0: 2826 7265 7374 2061 7267 7329 2022 c4c5 (&rest args) ".. │ │ │ +0000a500: 0b5c 221a c5c6 2119 5c6e 0b09 435c 6e1b .\"...!.\n..C\n. │ │ │ +0000a510: 0918 c7c8 c90b 0843 5c22 4208 452a ca5c .......C\"B.E*.\ │ │ │ +0000a520: 6e42 af05 2a87 2220 5b73 746f 7265 202d nB..*." [store - │ │ │ +0000a530: 2d73 746f 7265 2d2d 7465 6d70 2d2d 202d -store--temp-- - │ │ │ +0000a540: 2d61 7267 732d 2d74 656d 702d 2d20 6172 -args--temp-- ar │ │ │ +0000a550: 6773 206d 6170 6361 7220 6765 6e73 796d gs mapcar gensym │ │ │ +0000a560: 2022 2d2d 7374 6f72 652d 2d22 2070 726f "--store--" pro │ │ │ +0000a570: 676e 2073 6574 2d64 6566 6175 6c74 2d66 gn set-default-f │ │ │ +0000a580: 696c 652d 6d6f 6465 7320 6170 7065 6e64 ile-modes append │ │ │ +0000a590: 2064 6566 6175 6c74 2d66 696c 652d 6d6f default-file-mo │ │ │ +0000a5a0: 6465 735d 2038 2022 5c6e 436f 6d6d 6f6e des] 8 "\nCommon │ │ │ +0000a5b0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +0000a5c0: 743a 5c6e 2020 2864 6566 6175 6c74 2d66 t:\n (default-f │ │ │ +0000a5d0: 696c 652d 6d6f 6465 7320 2672 6573 7420 ile-modes &rest │ │ │ +0000a5e0: 4152 4753 295c 6e5c 6e22 5d20 6465 6661 ARGS)\n\n"] defa │ │ │ +0000a5f0: 756c 742d 7661 6c75 6520 235b 2826 7265 ult-value #[(&re │ │ │ +0000a600: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ +0000a610: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ +0000a620: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ +0000a630: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ +0000a640: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ +0000a650: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ +0000a660: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ +0000a670: 7265 2d2d 2220 7365 742d 6465 6661 756c re--" set-defaul │ │ │ +0000a680: 7420 6170 7065 6e64 2064 6566 6175 6c74 t append default │ │ │ +0000a690: 2d76 616c 7565 5d20 3720 225c 6e43 6f6d -value] 7 "\nCom │ │ │ +0000a6a0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +0000a6b0: 6c69 7374 3a5c 6e20 2028 6465 6661 756c list:\n (defaul │ │ │ +0000a6c0: 742d 7661 6c75 6520 2672 6573 7420 4152 t-value &rest AR │ │ │ +0000a6d0: 4753 295c 6e5c 6e22 5d20 646f 6375 6d65 GS)\n\n"] docume │ │ │ +0000a6e0: 6e74 6174 696f 6e2d 7072 6f70 6572 7479 ntation-property │ │ │ +0000a6f0: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ +0000a700: 22c4 c50b 5c22 1ac5 c621 195c 6e0b 0943 "...\"...!.\n..C │ │ │ +0000a710: 5c6e 1b09 18c7 c80b 0843 5c22 2a42 c95c \n.......C\"*B.\ │ │ │ +0000a720: 6e42 af05 2a87 2220 5b73 746f 7265 202d nB..*." [store - │ │ │ +0000a730: 2d73 746f 7265 2d2d 7465 6d70 2d2d 202d -store--temp-- - │ │ │ +0000a740: 2d61 7267 732d 2d74 656d 702d 2d20 6172 -args--temp-- ar │ │ │ +0000a750: 6773 206d 6170 6361 7220 6765 6e73 796d gs mapcar gensym │ │ │ +0000a760: 2022 2d2d 7374 6f72 652d 2d22 2070 7574 "--store--" put │ │ │ +0000a770: 2061 7070 656e 6420 646f 6375 6d65 6e74 append document │ │ │ +0000a780: 6174 696f 6e2d 7072 6f70 6572 7479 5d20 ation-property] │ │ │ +0000a790: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ +0000a7a0: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +0000a7b0: 2028 646f 6375 6d65 6e74 6174 696f 6e2d (documentation- │ │ │ +0000a7c0: 7072 6f70 6572 7479 2026 7265 7374 2041 property &rest A │ │ │ +0000a7d0: 5247 5329 5c6e 5c6e 225d 2065 7874 656e RGS)\n\n"] exten │ │ │ +0000a7e0: 742d 6661 6365 2023 5b28 2672 6573 7420 t-face #[(&rest │ │ │ +0000a7f0: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ +0000a800: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ +0000a810: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ +0000a820: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ +0000a830: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ +0000a840: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ +0000a850: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ +0000a860: 2d22 2073 6574 2d65 7874 656e 742d 6661 -" set-extent-fa │ │ │ +0000a870: 6365 2061 7070 656e 6420 6578 7465 6e74 ce append extent │ │ │ +0000a880: 2d66 6163 655d 2037 2022 5c6e 436f 6d6d -face] 7 "\nComm │ │ │ +0000a890: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +0000a8a0: 6973 743a 5c6e 2020 2865 7874 656e 742d ist:\n (extent- │ │ │ +0000a8b0: 6661 6365 2026 7265 7374 2041 5247 5329 face &rest ARGS) │ │ │ +0000a8c0: 5c6e 5c6e 225d 2065 7874 656e 742d 7072 \n\n"] extent-pr │ │ │ +0000a8d0: 696f 7269 7479 2023 5b28 2672 6573 7420 iority #[(&rest │ │ │ +0000a8e0: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ +0000a8f0: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ +0000a900: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ +0000a910: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ +0000a920: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ +0000a930: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ +0000a940: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ +0000a950: 2d22 2073 6574 2d65 7874 656e 742d 7072 -" set-extent-pr │ │ │ +0000a960: 696f 7269 7479 2061 7070 656e 6420 6578 iority append ex │ │ │ +0000a970: 7465 6e74 2d70 7269 6f72 6974 795d 2037 tent-priority] 7 │ │ │ +0000a980: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ +0000a990: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ +0000a9a0: 2865 7874 656e 742d 7072 696f 7269 7479 (extent-priority │ │ │ +0000a9b0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +0000a9c0: 225d 2065 7874 656e 742d 7072 6f70 6572 "] extent-proper │ │ │ +0000a9d0: 7479 2023 5b28 7820 7920 266f 7074 696f ty #[(x y &optio │ │ │ +0000a9e0: 6e61 6c20 6967 6e6f 7265 642d 6172 6729 nal ignored-arg) │ │ │ +0000a9f0: 2022 c6c7 211d c6c8 211c c6c9 211b c6ca "..!...!...!... │ │ │ +0000aa00: 211a 0d0c 0b45 0908 0e0d 455c 6e43 0d19 !....E....E\nC.. │ │ │ +0000aa10: 0c18 0b1e 0d5c 6e1e 0ecb 0908 0e0e 462c .....\n.......F, │ │ │ +0000aa20: cc0d 0c0b 46af 052c 8722 205b 7920 7820 ....F..,." [y x │ │ │ +0000aa30: 2d2d 6172 672d 2d74 656d 702d 2d20 2d2d --arg--temp-- -- │ │ │ +0000aa40: 6967 6e6f 7265 642d 6172 672d 2d74 656d ignored-arg--tem │ │ │ +0000aa50: 702d 2d20 2d2d 792d 2d74 656d 702d 2d20 p-- --y--temp-- │ │ │ +0000aa60: 2d2d 782d 2d74 656d 702d 2d20 6765 6e73 --x--temp-- gens │ │ │ +0000aa70: 796d 2022 2d2d 782d 2d22 2022 2d2d 792d ym "--x--" "--y- │ │ │ +0000aa80: 2d22 2022 2d2d 6967 6e6f 7265 642d 6172 -" "--ignored-ar │ │ │ +0000aa90: 672d 2d22 2022 2d2d 6172 672d 2d22 2073 g--" "--arg--" s │ │ │ +0000aaa0: 6574 2d65 7874 656e 742d 7072 6f70 6572 et-extent-proper │ │ │ +0000aab0: 7479 2065 7874 656e 742d 7072 6f70 6572 ty extent-proper │ │ │ +0000aac0: 7479 2069 676e 6f72 6564 2d61 7267 2061 ty ignored-arg a │ │ │ +0000aad0: 7267 5d20 3820 225c 6e43 6f6d 6d6f 6e20 rg] 8 "\nCommon │ │ │ +0000aae0: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ +0000aaf0: 3a5c 6e20 2028 6578 7465 6e74 2d70 726f :\n (extent-pro │ │ │ +0000ab00: 7065 7274 7920 5820 5920 266f 7074 696f perty X Y &optio │ │ │ +0000ab10: 6e61 6c20 4947 4e4f 5245 442d 4152 4729 nal IGNORED-ARG) │ │ │ +0000ab20: 5c6e 5c6e 225d 2065 7874 656e 742d 7374 \n\n"] extent-st │ │ │ +0000ab30: 6172 742d 706f 7369 7469 6f6e 2023 5b28 art-position #[( │ │ │ +0000ab40: 6578 7429 2022 c4c5 211b c4c6 2119 0b43 ext) "..!...!..C │ │ │ +0000ab50: 5c6e 4309 430b 1a09 18c7 c85c 6e08 c95c \nC.C......\n..\ │ │ │ +0000ab60: 6e44 4608 452a ca0b 44af 052a 8722 205b nDF.E*..D..*." [ │ │ │ +0000ab70: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ +0000ab80: 656d 702d 2d20 6578 7420 2d2d 6578 742d emp-- ext --ext- │ │ │ +0000ab90: 2d74 656d 702d 2d20 6765 6e73 796d 2022 -temp-- gensym " │ │ │ +0000aba0: 2d2d 6578 742d 2d22 2022 2d2d 7374 6f72 --ext--" "--stor │ │ │ +0000abb0: 652d 2d22 2070 726f 676e 2073 6574 2d65 e--" progn set-e │ │ │ +0000abc0: 7874 656e 742d 656e 6470 6f69 6e74 7320 xtent-endpoints │ │ │ +0000abd0: 6578 7465 6e74 2d65 6e64 2d70 6f73 6974 extent-end-posit │ │ │ +0000abe0: 696f 6e20 6578 7465 6e74 2d73 7461 7274 ion extent-start │ │ │ +0000abf0: 2d70 6f73 6974 696f 6e5d 2039 2022 5c6e -position] 9 "\n │ │ │ +0000ac00: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +0000ac10: 6461 206c 6973 743a 5c6e 2020 2865 7874 da list:\n (ext │ │ │ +0000ac20: 656e 742d 7374 6172 742d 706f 7369 7469 ent-start-positi │ │ │ +0000ac30: 6f6e 2045 5854 295c 6e5c 6e22 5d20 6578 on EXT)\n\n"] ex │ │ │ +0000ac40: 7465 6e74 2d65 6e64 2d70 6f73 6974 696f tent-end-positio │ │ │ +0000ac50: 6e20 235b 2865 7874 2920 22c4 c521 1bc4 n #[(ext) "..!.. │ │ │ +0000ac60: c621 190b 435c 6e43 0943 0b1a 0918 c7c8 .!..C\nC.C...... │ │ │ +0000ac70: 5c6e c95c 6e44 0846 0845 2aca 0b44 af05 \n.\nD.F.E*..D.. │ │ │ +0000ac80: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ +0000ac90: 7265 2d2d 7465 6d70 2d2d 2065 7874 202d re--temp-- ext - │ │ │ +0000aca0: 2d65 7874 2d2d 7465 6d70 2d2d 2067 656e -ext--temp-- gen │ │ │ +0000acb0: 7379 6d20 222d 2d65 7874 2d2d 2220 222d sym "--ext--" "- │ │ │ +0000acc0: 2d73 746f 7265 2d2d 2220 7072 6f67 6e20 -store--" progn │ │ │ +0000acd0: 7365 742d 6578 7465 6e74 2d65 6e64 706f set-extent-endpo │ │ │ +0000ace0: 696e 7473 2065 7874 656e 742d 7374 6172 ints extent-star │ │ │ +0000acf0: 742d 706f 7369 7469 6f6e 2065 7874 656e t-position exten │ │ │ +0000ad00: 742d 656e 642d 706f 7369 7469 6f6e 5d20 t-end-position] │ │ │ +0000ad10: 3820 225c 6e43 6f6d 6d6f 6e20 4c69 7370 8 "\nCommon Lisp │ │ │ +0000ad20: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +0000ad30: 2028 6578 7465 6e74 2d65 6e64 2d70 6f73 (extent-end-pos │ │ │ +0000ad40: 6974 696f 6e20 4558 5429 5c6e 5c6e 225d ition EXT)\n\n"] │ │ │ +0000ad50: 2066 6163 652d 6261 636b 6772 6f75 6e64 face-background │ │ │ +0000ad60: 2023 5b28 6620 266f 7074 696f 6e61 6c20 #[(f &optional │ │ │ +0000ad70: 7329 2022 c6c7 211d c6c8 211c c6c9 211b s) "..!...!...!. │ │ │ +0000ad80: 0d0c 445c 6e09 440b 430d 1a0c 190b 18ca ..D\n.D.C....... │ │ │ +0000ad90: 5c6e 0809 462b cb0d 0c45 af05 2b87 2220 \n..F+...E..+." │ │ │ +0000ada0: 5b78 2073 2066 202d 2d78 2d2d 7465 6d70 [x s f --x--temp │ │ │ +0000adb0: 2d2d 202d 2d73 2d2d 7465 6d70 2d2d 202d -- --s--temp-- - │ │ │ +0000adc0: 2d66 2d2d 7465 6d70 2d2d 2067 656e 7379 -f--temp-- gensy │ │ │ +0000add0: 6d20 222d 2d66 2d2d 2220 222d 2d73 2d2d m "--f--" "--s-- │ │ │ +0000ade0: 2220 222d 2d78 2d2d 2220 7365 742d 6661 " "--x--" set-fa │ │ │ +0000adf0: 6365 2d62 6163 6b67 726f 756e 6420 6661 ce-background fa │ │ │ +0000ae00: 6365 2d62 6163 6b67 726f 756e 645d 2037 ce-background] 7 │ │ │ +0000ae10: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ +0000ae20: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ +0000ae30: 2866 6163 652d 6261 636b 6772 6f75 6e64 (face-background │ │ │ +0000ae40: 2046 2026 6f70 7469 6f6e 616c 2053 295c F &optional S)\ │ │ │ +0000ae50: 6e5c 6e22 5d20 6661 6365 2d62 6163 6b67 n\n"] face-backg │ │ │ +0000ae60: 726f 756e 642d 7069 786d 6170 2023 5b28 round-pixmap #[( │ │ │ +0000ae70: 6620 266f 7074 696f 6e61 6c20 7329 2022 f &optional s) " │ │ │ +0000ae80: c6c7 211d c6c8 211c c6c9 211b 0d0c 445c ..!...!...!...D\ │ │ │ +0000ae90: 6e09 440b 430d 1a0c 190b 18ca 5c6e 0809 n.D.C.......\n.. │ │ │ +0000aea0: 462b cb0d 0c45 af05 2b87 2220 5b78 2073 F+...E..+." [x s │ │ │ +0000aeb0: 2066 202d 2d78 2d2d 7465 6d70 2d2d 202d f --x--temp-- - │ │ │ +0000aec0: 2d73 2d2d 7465 6d70 2d2d 202d 2d66 2d2d -s--temp-- --f-- │ │ │ +0000aed0: 7465 6d70 2d2d 2067 656e 7379 6d20 222d temp-- gensym "- │ │ │ +0000aee0: 2d66 2d2d 2220 222d 2d73 2d2d 2220 222d -f--" "--s--" "- │ │ │ +0000aef0: 2d78 2d2d 2220 7365 742d 6661 6365 2d62 -x--" set-face-b │ │ │ +0000af00: 6163 6b67 726f 756e 642d 7069 786d 6170 ackground-pixmap │ │ │ +0000af10: 2066 6163 652d 6261 636b 6772 6f75 6e64 face-background │ │ │ +0000af20: 2d70 6978 6d61 705d 2037 2022 5c6e 436f -pixmap] 7 "\nCo │ │ │ +0000af30: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ +0000af40: 206c 6973 743a 5c6e 2020 2866 6163 652d list:\n (face- │ │ │ +0000af50: 6261 636b 6772 6f75 6e64 2d70 6978 6d61 background-pixma │ │ │ +0000af60: 7020 4620 266f 7074 696f 6e61 6c20 5329 p F &optional S) │ │ │ +0000af70: 5c6e 5c6e 225d 2066 6163 652d 666f 6e74 \n\n"] face-font │ │ │ +0000af80: 2023 5b28 6620 266f 7074 696f 6e61 6c20 #[(f &optional │ │ │ +0000af90: 7329 2022 c6c7 211d c6c8 211c c6c9 211b s) "..!...!...!. │ │ │ +0000afa0: 0d0c 445c 6e09 440b 430d 1a0c 190b 18ca ..D\n.D.C....... │ │ │ +0000afb0: 5c6e 0809 462b cb0d 0c45 af05 2b87 2220 \n..F+...E..+." │ │ │ +0000afc0: 5b78 2073 2066 202d 2d78 2d2d 7465 6d70 [x s f --x--temp │ │ │ +0000afd0: 2d2d 202d 2d73 2d2d 7465 6d70 2d2d 202d -- --s--temp-- - │ │ │ +0000afe0: 2d66 2d2d 7465 6d70 2d2d 2067 656e 7379 -f--temp-- gensy │ │ │ +0000aff0: 6d20 222d 2d66 2d2d 2220 222d 2d73 2d2d m "--f--" "--s-- │ │ │ +0000b000: 2220 222d 2d78 2d2d 2220 7365 742d 6661 " "--x--" set-fa │ │ │ +0000b010: 6365 2d66 6f6e 7420 6661 6365 2d66 6f6e ce-font face-fon │ │ │ +0000b020: 745d 2037 2022 5c6e 436f 6d6d 6f6e 204c t] 7 "\nCommon L │ │ │ +0000b030: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +0000b040: 5c6e 2020 2866 6163 652d 666f 6e74 2046 \n (face-font F │ │ │ +0000b050: 2026 6f70 7469 6f6e 616c 2053 295c 6e5c &optional S)\n\ │ │ │ +0000b060: 6e22 5d20 6661 6365 2d66 6f72 6567 726f n"] face-foregro │ │ │ +0000b070: 756e 6420 235b 2866 2026 6f70 7469 6f6e und #[(f &option │ │ │ +0000b080: 616c 2073 2920 22c6 c721 1dc6 c821 1cc6 al s) "..!...!.. │ │ │ +0000b090: c921 1b0d 0c44 5c6e 0944 0b43 0d1a 0c19 .!...D\n.D.C.... │ │ │ +0000b0a0: 0b18 ca5c 6e08 0946 2bcb 0d0c 45af 052b ...\n..F+...E..+ │ │ │ +0000b0b0: 8722 205b 7820 7320 6620 2d2d 782d 2d74 ." [x s f --x--t │ │ │ +0000b0c0: 656d 702d 2d20 2d2d 732d 2d74 656d 702d emp-- --s--temp- │ │ │ +0000b0d0: 2d20 2d2d 662d 2d74 656d 702d 2d20 6765 - --f--temp-- ge │ │ │ +0000b0e0: 6e73 796d 2022 2d2d 662d 2d22 2022 2d2d nsym "--f--" "-- │ │ │ +0000b0f0: 732d 2d22 2022 2d2d 782d 2d22 2073 6574 s--" "--x--" set │ │ │ +0000b100: 2d66 6163 652d 666f 7265 6772 6f75 6e64 -face-foreground │ │ │ +0000b110: 2066 6163 652d 666f 7265 6772 6f75 6e64 face-foreground │ │ │ +0000b120: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ +0000b130: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ +0000b140: 6e20 2028 6661 6365 2d66 6f72 6567 726f n (face-foregro │ │ │ +0000b150: 756e 6420 4620 266f 7074 696f 6e61 6c20 und F &optional │ │ │ +0000b160: 5329 5c6e 5c6e 225d 2066 6163 652d 756e S)\n\n"] face-un │ │ │ +0000b170: 6465 726c 696e 652d 7020 235b 2866 2026 derline-p #[(f & │ │ │ +0000b180: 6f70 7469 6f6e 616c 2073 2920 22c6 c721 optional s) "..! │ │ │ +0000b190: 1dc6 c821 1cc6 c921 1b0d 0c44 5c6e 0944 ...!...!...D\n.D │ │ │ +0000b1a0: 0b43 0d1a 0c19 0b18 ca5c 6e08 0946 2bcb .C.......\n..F+. │ │ │ +0000b1b0: 0d0c 45af 052b 8722 205b 7820 7320 6620 ..E..+." [x s f │ │ │ +0000b1c0: 2d2d 782d 2d74 656d 702d 2d20 2d2d 732d --x--temp-- --s- │ │ │ +0000b1d0: 2d74 656d 702d 2d20 2d2d 662d 2d74 656d -temp-- --f--tem │ │ │ +0000b1e0: 702d 2d20 6765 6e73 796d 2022 2d2d 662d p-- gensym "--f- │ │ │ +0000b1f0: 2d22 2022 2d2d 732d 2d22 2022 2d2d 782d -" "--s--" "--x- │ │ │ +0000b200: 2d22 2073 6574 2d66 6163 652d 756e 6465 -" set-face-unde │ │ │ +0000b210: 726c 696e 652d 7020 6661 6365 2d75 6e64 rline-p face-und │ │ │ +0000b220: 6572 6c69 6e65 2d70 5d20 3720 225c 6e43 erline-p] 7 "\nC │ │ │ +0000b230: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +0000b240: 6120 6c69 7374 3a5c 6e20 2028 6661 6365 a list:\n (face │ │ │ +0000b250: 2d75 6e64 6572 6c69 6e65 2d70 2046 2026 -underline-p F & │ │ │ +0000b260: 6f70 7469 6f6e 616c 2053 295c 6e5c 6e22 optional S)\n\n" │ │ │ +0000b270: 5d20 6669 6c65 2d6d 6f64 6573 2023 5b28 ] file-modes #[( │ │ │ +0000b280: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ +0000b290: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ +0000b2a0: 18c7 c8c9 0b08 435c 2242 0845 2aca 5c6e ......C\"B.E*.\n │ │ │ +0000b2b0: 42af 052a 8722 205b 7374 6f72 6520 2d2d B..*." [store -- │ │ │ +0000b2c0: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ +0000b2d0: 6172 6773 2d2d 7465 6d70 2d2d 2061 7267 args--temp-- arg │ │ │ +0000b2e0: 7320 6d61 7063 6172 2067 656e 7379 6d20 s mapcar gensym │ │ │ +0000b2f0: 222d 2d73 746f 7265 2d2d 2220 7072 6f67 "--store--" prog │ │ │ +0000b300: 6e20 7365 742d 6669 6c65 2d6d 6f64 6573 n set-file-modes │ │ │ +0000b310: 2061 7070 656e 6420 6669 6c65 2d6d 6f64 append file-mod │ │ │ +0000b320: 6573 5d20 3820 225c 6e43 6f6d 6d6f 6e20 es] 8 "\nCommon │ │ │ +0000b330: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ +0000b340: 3a5c 6e20 2028 6669 6c65 2d6d 6f64 6573 :\n (file-modes │ │ │ +0000b350: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +0000b360: 225d 2066 7261 6d65 2d70 6172 616d 6574 "] frame-paramet │ │ │ +0000b370: 6572 7320 235b 2826 7265 7374 2061 7267 ers #[(&rest arg │ │ │ +0000b380: 7329 2022 c4c5 0b5c 221a c5c6 2119 5c6e s) "...\"...!.\n │ │ │ +0000b390: 0b09 435c 6e1b 0918 c7c8 c90b 0843 5c22 ..C\n........C\" │ │ │ +0000b3a0: 4208 452a ca5c 6e42 af05 2a87 2220 5b73 B.E*.\nB..*." [s │ │ │ +0000b3b0: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ +0000b3c0: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ +0000b3d0: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ +0000b3e0: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ +0000b3f0: 2d22 2070 726f 676e 206d 6f64 6966 792d -" progn modify- │ │ │ +0000b400: 6672 616d 652d 7061 7261 6d65 7465 7273 frame-parameters │ │ │ +0000b410: 2061 7070 656e 6420 6672 616d 652d 7061 append frame-pa │ │ │ +0000b420: 7261 6d65 7465 7273 5d20 3820 225c 6e43 rameters] 8 "\nC │ │ │ +0000b430: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +0000b440: 6120 6c69 7374 3a5c 6e20 2028 6672 616d a list:\n (fram │ │ │ +0000b450: 652d 7061 7261 6d65 7465 7273 2026 7265 e-parameters &re │ │ │ +0000b460: 7374 2041 5247 5329 5c6e 5c6e 225d 2066 st ARGS)\n\n"] f │ │ │ +0000b470: 7261 6d65 2d76 6973 6962 6c65 2d70 2023 rame-visible-p # │ │ │ +0000b480: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ +0000b490: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ +0000b4a0: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ +0000b4b0: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ +0000b4c0: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ +0000b4d0: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ +0000b4e0: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ +0000b4f0: 2d2d 7374 6f72 652d 2d22 2063 6c2d 7365 --store--" cl-se │ │ │ +0000b500: 742d 6672 616d 652d 7669 7369 626c 652d t-frame-visible- │ │ │ +0000b510: 7020 6170 7065 6e64 2066 7261 6d65 2d76 p append frame-v │ │ │ +0000b520: 6973 6962 6c65 2d70 5d20 3720 225c 6e43 isible-p] 7 "\nC │ │ │ +0000b530: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +0000b540: 6120 6c69 7374 3a5c 6e20 2028 6672 616d a list:\n (fram │ │ │ +0000b550: 652d 7669 7369 626c 652d 7020 2672 6573 e-visible-p &res │ │ │ +0000b560: 7420 4152 4753 295c 6e5c 6e22 5d20 6672 t ARGS)\n\n"] fr │ │ │ +0000b570: 616d 652d 7072 6f70 6572 7469 6573 2023 ame-properties # │ │ │ +0000b580: 5b28 266f 7074 696f 6e61 6c20 6629 2022 [(&optional f) " │ │ │ +0000b590: c4c5 211b c4c6 211a 0b43 0943 5c6e 430b ..!...!..C.C\nC. │ │ │ +0000b5a0: 195c 6e18 c7c8 0908 4508 452a c90b 44af .\n.....E.E*..D. │ │ │ +0000b5b0: 052a 8722 205b 7020 6620 2d2d 702d 2d74 .*." [p f --p--t │ │ │ +0000b5c0: 656d 702d 2d20 2d2d 662d 2d74 656d 702d emp-- --f--temp- │ │ │ +0000b5d0: 2d20 6765 6e73 796d 2022 2d2d 662d 2d22 - gensym "--f--" │ │ │ +0000b5e0: 2022 2d2d 702d 2d22 2070 726f 676e 2073 "--p--" progn s │ │ │ +0000b5f0: 6574 2d66 7261 6d65 2d70 726f 7065 7274 et-frame-propert │ │ │ +0000b600: 6965 7320 6672 616d 652d 7072 6f70 6572 ies frame-proper │ │ │ +0000b610: 7469 6573 5d20 3720 225c 6e43 6f6d 6d6f ties] 7 "\nCommo │ │ │ +0000b620: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ +0000b630: 7374 3a5c 6e20 2028 6672 616d 652d 7072 st:\n (frame-pr │ │ │ +0000b640: 6f70 6572 7469 6573 2026 6f70 7469 6f6e operties &option │ │ │ +0000b650: 616c 2046 295c 6e5c 6e22 5d20 6672 616d al F)\n\n"] fram │ │ │ +0000b660: 652d 7072 6f70 6572 7479 2023 5b28 6620 e-property #[(f │ │ │ +0000b670: 7020 266f 7074 696f 6e61 6c20 6967 6e6f p &optional igno │ │ │ +0000b680: 7265 642d 6172 6729 2022 c6c7 211d c6c8 red-arg) "..!... │ │ │ +0000b690: 211c c6c9 211b c6ca 211a 0d0c 0b45 0908 !...!...!....E.. │ │ │ +0000b6a0: 0e0e 455c 6e43 0d19 0c18 0b1e 0e5c 6e1e ..E\nC.......\n. │ │ │ +0000b6b0: 0fcb cc09 0e0f 4508 452c cd0d 0c0b 46af ......E.E,....F. │ │ │ +0000b6c0: 052c 8722 205b 7020 6620 2d2d 762d 2d74 .,." [p f --v--t │ │ │ +0000b6d0: 656d 702d 2d20 2d2d 6967 6e6f 7265 642d emp-- --ignored- │ │ │ +0000b6e0: 6172 672d 2d74 656d 702d 2d20 2d2d 702d arg--temp-- --p- │ │ │ +0000b6f0: 2d74 656d 702d 2d20 2d2d 662d 2d74 656d -temp-- --f--tem │ │ │ +0000b700: 702d 2d20 6765 6e73 796d 2022 2d2d 662d p-- gensym "--f- │ │ │ +0000b710: 2d22 2022 2d2d 702d 2d22 2022 2d2d 6967 -" "--p--" "--ig │ │ │ +0000b720: 6e6f 7265 642d 6172 672d 2d22 2022 2d2d nored-arg--" "-- │ │ │ +0000b730: 762d 2d22 2070 726f 676e 2073 6574 2d66 v--" progn set-f │ │ │ +0000b740: 7261 6d65 2d70 726f 7065 7274 7920 6672 rame-property fr │ │ │ +0000b750: 616d 652d 7072 6f70 6572 7479 2069 676e ame-property ign │ │ │ +0000b760: 6f72 6564 2d61 7267 2076 5d20 3820 225c ored-arg v] 8 "\ │ │ │ +0000b770: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ +0000b780: 6264 6120 6c69 7374 3a5c 6e20 2028 6672 bda list:\n (fr │ │ │ +0000b790: 616d 652d 7072 6f70 6572 7479 2046 2050 ame-property F P │ │ │ +0000b7a0: 2026 6f70 7469 6f6e 616c 2049 474e 4f52 &optional IGNOR │ │ │ +0000b7b0: 4544 2d41 5247 295c 6e5c 6e22 5d20 6672 ED-ARG)\n\n"] fr │ │ │ +0000b7c0: 616d 652d 7769 6474 6820 235b 2826 6f70 ame-width #[(&op │ │ │ +0000b7d0: 7469 6f6e 616c 2066 2920 22c4 c521 1bc4 tional f) "..!.. │ │ │ +0000b7e0: c621 1a0b 4309 435c 6e43 0b19 5c6e 18c7 .!..C.C\nC..\n.. │ │ │ +0000b7f0: c809 0845 0845 2ac9 0b44 af05 2a87 2220 ...E.E*..D..*." │ │ │ +0000b800: 5b76 2066 202d 2d76 2d2d 7465 6d70 2d2d [v f --v--temp-- │ │ │ +0000b810: 202d 2d66 2d2d 7465 6d70 2d2d 2067 656e --f--temp-- gen │ │ │ +0000b820: 7379 6d20 222d 2d66 2d2d 2220 222d 2d76 sym "--f--" "--v │ │ │ +0000b830: 2d2d 2220 7072 6f67 6e20 7365 742d 6672 --" progn set-fr │ │ │ +0000b840: 616d 652d 7769 6474 6820 6672 616d 652d ame-width frame- │ │ │ +0000b850: 7769 6474 685d 2037 2022 5c6e 436f 6d6d width] 7 "\nComm │ │ │ +0000b860: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +0000b870: 6973 743a 5c6e 2020 2866 7261 6d65 2d77 ist:\n (frame-w │ │ │ +0000b880: 6964 7468 2026 6f70 7469 6f6e 616c 2046 idth &optional F │ │ │ +0000b890: 295c 6e5c 6e22 5d20 6672 616d 652d 6865 )\n\n"] frame-he │ │ │ +0000b8a0: 6967 6874 2023 5b28 266f 7074 696f 6e61 ight #[(&optiona │ │ │ +0000b8b0: 6c20 6629 2022 c4c5 211b c4c6 211a 0b43 l f) "..!...!..C │ │ │ +0000b8c0: 0943 5c6e 430b 195c 6e18 c7c8 0908 4508 .C\nC..\n.....E. │ │ │ +0000b8d0: 452a c90b 44af 052a 8722 205b 7620 6620 E*..D..*." [v f │ │ │ +0000b8e0: 2d2d 762d 2d74 656d 702d 2d20 2d2d 662d --v--temp-- --f- │ │ │ +0000b8f0: 2d74 656d 702d 2d20 6765 6e73 796d 2022 -temp-- gensym " │ │ │ +0000b900: 2d2d 662d 2d22 2022 2d2d 762d 2d22 2070 --f--" "--v--" p │ │ │ +0000b910: 726f 676e 2073 6574 2d66 7261 6d65 2d68 rogn set-frame-h │ │ │ +0000b920: 6569 6768 7420 6672 616d 652d 6865 6967 eight frame-heig │ │ │ +0000b930: 6874 5d20 3720 225c 6e43 6f6d 6d6f 6e20 ht] 7 "\nCommon │ │ │ +0000b940: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ +0000b950: 3a5c 6e20 2028 6672 616d 652d 6865 6967 :\n (frame-heig │ │ │ +0000b960: 6874 2026 6f70 7469 6f6e 616c 2046 295c ht &optional F)\ │ │ │ +0000b970: 6e5c 6e22 5d20 6375 7272 656e 742d 6672 n\n"] current-fr │ │ │ +0000b980: 616d 652d 636f 6e66 6967 7572 6174 696f ame-configuratio │ │ │ +0000b990: 6e20 235b 2826 7265 7374 2061 7267 7329 n #[(&rest args) │ │ │ +0000b9a0: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000b9b0: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ +0000b9c0: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +0000b9d0: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +0000b9e0: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +0000b9f0: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +0000ba00: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ +0000ba10: 742d 6672 616d 652d 636f 6e66 6967 7572 t-frame-configur │ │ │ +0000ba20: 6174 696f 6e20 6170 7065 6e64 2063 7572 ation append cur │ │ │ +0000ba30: 7265 6e74 2d66 7261 6d65 2d63 6f6e 6669 rent-frame-confi │ │ │ +0000ba40: 6775 7261 7469 6f6e 5d20 3720 225c 6e43 guration] 7 "\nC │ │ │ +0000ba50: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +0000ba60: 6120 6c69 7374 3a5c 6e20 2028 6375 7272 a list:\n (curr │ │ │ +0000ba70: 656e 742d 6672 616d 652d 636f 6e66 6967 ent-frame-config │ │ │ +0000ba80: 7572 6174 696f 6e20 2672 6573 7420 4152 uration &rest AR │ │ │ +0000ba90: 4753 295c 6e5c 6e22 5d20 7365 6c65 6374 GS)\n\n"] select │ │ │ +0000baa0: 6564 2d63 6f6e 736f 6c65 2023 5b28 2672 ed-console #[(&r │ │ │ +0000bab0: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ +0000bac0: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ +0000bad0: c8c9 0b08 435c 2242 0845 2aca 5c6e 42af ....C\"B.E*.\nB. │ │ │ +0000bae0: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ +0000baf0: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ +0000bb00: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ +0000bb10: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ +0000bb20: 2d73 746f 7265 2d2d 2220 7072 6f67 6e20 -store--" progn │ │ │ +0000bb30: 7365 6c65 6374 2d63 6f6e 736f 6c65 2061 select-console a │ │ │ +0000bb40: 7070 656e 6420 7365 6c65 6374 6564 2d63 ppend selected-c │ │ │ +0000bb50: 6f6e 736f 6c65 5d20 3820 225c 6e43 6f6d onsole] 8 "\nCom │ │ │ +0000bb60: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +0000bb70: 6c69 7374 3a5c 6e20 2028 7365 6c65 6374 list:\n (select │ │ │ +0000bb80: 6564 2d63 6f6e 736f 6c65 2026 7265 7374 ed-console &rest │ │ │ +0000bb90: 2041 5247 5329 5c6e 5c6e 225d 2073 656c ARGS)\n\n"] sel │ │ │ +0000bba0: 6563 7465 642d 6465 7669 6365 2023 5b28 ected-device #[( │ │ │ +0000bbb0: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ +0000bbc0: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ +0000bbd0: 18c7 c8c9 0b08 435c 2242 0845 2aca 5c6e ......C\"B.E*.\n │ │ │ +0000bbe0: 42af 052a 8722 205b 7374 6f72 6520 2d2d B..*." [store -- │ │ │ +0000bbf0: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ +0000bc00: 6172 6773 2d2d 7465 6d70 2d2d 2061 7267 args--temp-- arg │ │ │ +0000bc10: 7320 6d61 7063 6172 2067 656e 7379 6d20 s mapcar gensym │ │ │ +0000bc20: 222d 2d73 746f 7265 2d2d 2220 7072 6f67 "--store--" prog │ │ │ +0000bc30: 6e20 7365 6c65 6374 2d64 6576 6963 6520 n select-device │ │ │ +0000bc40: 6170 7065 6e64 2073 656c 6563 7465 642d append selected- │ │ │ +0000bc50: 6465 7669 6365 5d20 3820 225c 6e43 6f6d device] 8 "\nCom │ │ │ +0000bc60: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +0000bc70: 6c69 7374 3a5c 6e20 2028 7365 6c65 6374 list:\n (select │ │ │ +0000bc80: 6564 2d64 6576 6963 6520 2672 6573 7420 ed-device &rest │ │ │ +0000bc90: 4152 4753 295c 6e5c 6e22 5d20 6465 7669 ARGS)\n\n"] devi │ │ │ +0000bca0: 6365 2d62 6175 642d 7261 7465 2023 5b28 ce-baud-rate #[( │ │ │ +0000bcb0: 266f 7074 696f 6e61 6c20 6429 2022 c4c5 &optional d) ".. │ │ │ +0000bcc0: 211b c4c6 211a 0b43 0943 5c6e 430b 195c !...!..C.C\nC..\ │ │ │ +0000bcd0: 6e18 c709 0845 2ac8 0b44 af05 2a87 2220 n....E*..D..*." │ │ │ +0000bce0: 5b76 2064 202d 2d76 2d2d 7465 6d70 2d2d [v d --v--temp-- │ │ │ +0000bcf0: 202d 2d64 2d2d 7465 6d70 2d2d 2067 656e --d--temp-- gen │ │ │ +0000bd00: 7379 6d20 222d 2d64 2d2d 2220 222d 2d76 sym "--d--" "--v │ │ │ +0000bd10: 2d2d 2220 7365 742d 6465 7669 6365 2d62 --" set-device-b │ │ │ +0000bd20: 6175 642d 7261 7465 2064 6576 6963 652d aud-rate device- │ │ │ +0000bd30: 6261 7564 2d72 6174 655d 2036 2022 5c6e baud-rate] 6 "\n │ │ │ +0000bd40: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +0000bd50: 6461 206c 6973 743a 5c6e 2020 2864 6576 da list:\n (dev │ │ │ +0000bd60: 6963 652d 6261 7564 2d72 6174 6520 266f ice-baud-rate &o │ │ │ +0000bd70: 7074 696f 6e61 6c20 4429 5c6e 5c6e 225d ptional D)\n\n"] │ │ │ +0000bd80: 2061 6e6e 6f74 6174 696f 6e2d 676c 7970 annotation-glyp │ │ │ +0000bd90: 6820 235b 2826 7265 7374 2061 7267 7329 h #[(&rest args) │ │ │ +0000bda0: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000bdb0: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ +0000bdc0: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +0000bdd0: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +0000bde0: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +0000bdf0: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +0000be00: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ +0000be10: 742d 616e 6e6f 7461 7469 6f6e 2d67 6c79 t-annotation-gly │ │ │ +0000be20: 7068 2061 7070 656e 6420 616e 6e6f 7461 ph append annota │ │ │ +0000be30: 7469 6f6e 2d67 6c79 7068 5d20 3720 225c tion-glyph] 7 "\ │ │ │ +0000be40: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ +0000be50: 6264 6120 6c69 7374 3a5c 6e20 2028 616e bda list:\n (an │ │ │ +0000be60: 6e6f 7461 7469 6f6e 2d67 6c79 7068 2026 notation-glyph & │ │ │ +0000be70: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +0000be80: 2061 6e6e 6f74 6174 696f 6e2d 646f 776e annotation-down │ │ │ +0000be90: 2d67 6c79 7068 2023 5b28 2672 6573 7420 -glyph #[(&rest │ │ │ +0000bea0: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ +0000beb0: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ +0000bec0: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ +0000bed0: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ +0000bee0: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ +0000bef0: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ +0000bf00: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ +0000bf10: 2d22 2073 6574 2d61 6e6e 6f74 6174 696f -" set-annotatio │ │ │ +0000bf20: 6e2d 646f 776e 2d67 6c79 7068 2061 7070 n-down-glyph app │ │ │ +0000bf30: 656e 6420 616e 6e6f 7461 7469 6f6e 2d64 end annotation-d │ │ │ +0000bf40: 6f77 6e2d 676c 7970 685d 2037 2022 5c6e own-glyph] 7 "\n │ │ │ +0000bf50: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +0000bf60: 6461 206c 6973 743a 5c6e 2020 2861 6e6e da list:\n (ann │ │ │ +0000bf70: 6f74 6174 696f 6e2d 646f 776e 2d67 6c79 otation-down-gly │ │ │ +0000bf80: 7068 2026 7265 7374 2041 5247 5329 5c6e ph &rest ARGS)\n │ │ │ +0000bf90: 5c6e 225d 2061 6e6e 6f74 6174 696f 6e2d \n"] annotation- │ │ │ +0000bfa0: 6661 6365 2023 5b28 2672 6573 7420 6172 face #[(&rest ar │ │ │ +0000bfb0: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ +0000bfc0: 6e0b 0943 5c6e 1b09 18c7 c80b 0843 5c22 n..C\n.......C\" │ │ │ +0000bfd0: 2a42 c95c 6e42 af05 2a87 2220 5b73 746f *B.\nB..*." [sto │ │ │ +0000bfe0: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +0000bff0: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +0000c000: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +0000c010: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +0000c020: 2073 6574 2d61 6e6e 6f74 6174 696f 6e2d set-annotation- │ │ │ +0000c030: 6661 6365 2061 7070 656e 6420 616e 6e6f face append anno │ │ │ +0000c040: 7461 7469 6f6e 2d66 6163 655d 2037 2022 tation-face] 7 " │ │ │ +0000c050: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +0000c060: 6d62 6461 206c 6973 743a 5c6e 2020 2861 mbda list:\n (a │ │ │ +0000c070: 6e6e 6f74 6174 696f 6e2d 6661 6365 2026 nnotation-face & │ │ │ +0000c080: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +0000c090: 2061 6e6e 6f74 6174 696f 6e2d 6c61 796f annotation-layo │ │ │ +0000c0a0: 7574 2023 5b28 2672 6573 7420 6172 6773 ut #[(&rest args │ │ │ +0000c0b0: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ +0000c0c0: 0943 5c6e 1b09 18c7 c80b 0843 5c22 2a42 .C\n.......C\"*B │ │ │ +0000c0d0: c95c 6e42 af05 2a87 2220 5b73 746f 7265 .\nB..*." [store │ │ │ +0000c0e0: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ +0000c0f0: 202d 2d61 7267 732d 2d74 656d 702d 2d20 --args--temp-- │ │ │ +0000c100: 6172 6773 206d 6170 6361 7220 6765 6e73 args mapcar gens │ │ │ +0000c110: 796d 2022 2d2d 7374 6f72 652d 2d22 2073 ym "--store--" s │ │ │ +0000c120: 6574 2d61 6e6e 6f74 6174 696f 6e2d 6c61 et-annotation-la │ │ │ +0000c130: 796f 7574 2061 7070 656e 6420 616e 6e6f yout append anno │ │ │ +0000c140: 7461 7469 6f6e 2d6c 6179 6f75 745d 2037 tation-layout] 7 │ │ │ +0000c150: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ +0000c160: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ +0000c170: 2861 6e6e 6f74 6174 696f 6e2d 6c61 796f (annotation-layo │ │ │ +0000c180: 7574 2026 7265 7374 2041 5247 5329 5c6e ut &rest ARGS)\n │ │ │ +0000c190: 5c6e 225d 2061 6e6e 6f74 6174 696f 6e2d \n"] annotation- │ │ │ +0000c1a0: 6461 7461 2023 5b28 2672 6573 7420 6172 data #[(&rest ar │ │ │ +0000c1b0: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ +0000c1c0: 6e0b 0943 5c6e 1b09 18c7 c80b 0843 5c22 n..C\n.......C\" │ │ │ +0000c1d0: 2a42 c95c 6e42 af05 2a87 2220 5b73 746f *B.\nB..*." [sto │ │ │ +0000c1e0: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +0000c1f0: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +0000c200: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +0000c210: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +0000c220: 2073 6574 2d61 6e6e 6f74 6174 696f 6e2d set-annotation- │ │ │ +0000c230: 6461 7461 2061 7070 656e 6420 616e 6e6f data append anno │ │ │ +0000c240: 7461 7469 6f6e 2d64 6174 615d 2037 2022 tation-data] 7 " │ │ │ +0000c250: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +0000c260: 6d62 6461 206c 6973 743a 5c6e 2020 2861 mbda list:\n (a │ │ │ +0000c270: 6e6e 6f74 6174 696f 6e2d 6461 7461 2026 nnotation-data & │ │ │ +0000c280: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +0000c290: 2061 6e6e 6f74 6174 696f 6e2d 6163 7469 annotation-acti │ │ │ +0000c2a0: 6f6e 2023 5b28 2672 6573 7420 6172 6773 on #[(&rest args │ │ │ +0000c2b0: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ +0000c2c0: 0943 5c6e 1b09 18c7 c80b 0843 5c22 2a42 .C\n.......C\"*B │ │ │ +0000c2d0: c95c 6e42 af05 2a87 2220 5b73 746f 7265 .\nB..*." [store │ │ │ +0000c2e0: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ +0000c2f0: 202d 2d61 7267 732d 2d74 656d 702d 2d20 --args--temp-- │ │ │ +0000c300: 6172 6773 206d 6170 6361 7220 6765 6e73 args mapcar gens │ │ │ +0000c310: 796d 2022 2d2d 7374 6f72 652d 2d22 2073 ym "--store--" s │ │ │ +0000c320: 6574 2d61 6e6e 6f74 6174 696f 6e2d 6163 et-annotation-ac │ │ │ +0000c330: 7469 6f6e 2061 7070 656e 6420 616e 6e6f tion append anno │ │ │ +0000c340: 7461 7469 6f6e 2d61 6374 696f 6e5d 2037 tation-action] 7 │ │ │ +0000c350: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ +0000c360: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ +0000c370: 2861 6e6e 6f74 6174 696f 6e2d 6163 7469 (annotation-acti │ │ │ +0000c380: 6f6e 2026 7265 7374 2041 5247 5329 5c6e on &rest ARGS)\n │ │ │ +0000c390: 5c6e 225d 2061 6e6e 6f74 6174 696f 6e2d \n"] annotation- │ │ │ +0000c3a0: 6d65 6e75 2023 5b28 2672 6573 7420 6172 menu #[(&rest ar │ │ │ +0000c3b0: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ +0000c3c0: 6e0b 0943 5c6e 1b09 18c7 c80b 0843 5c22 n..C\n.......C\" │ │ │ +0000c3d0: 2a42 c95c 6e42 af05 2a87 2220 5b73 746f *B.\nB..*." [sto │ │ │ +0000c3e0: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +0000c3f0: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +0000c400: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +0000c410: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +0000c420: 2073 6574 2d61 6e6e 6f74 6174 696f 6e2d set-annotation- │ │ │ +0000c430: 6d65 6e75 2061 7070 656e 6420 616e 6e6f menu append anno │ │ │ +0000c440: 7461 7469 6f6e 2d6d 656e 755d 2037 2022 tation-menu] 7 " │ │ │ +0000c450: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +0000c460: 6d62 6461 206c 6973 743a 5c6e 2020 2861 mbda list:\n (a │ │ │ +0000c470: 6e6e 6f74 6174 696f 6e2d 6d65 6e75 2026 nnotation-menu & │ │ │ +0000c480: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +0000c490: 2077 6964 6765 742d 6765 7420 235b 2826 widget-get #[(& │ │ │ +0000c4a0: 7265 7374 2061 7267 7329 2022 c4c5 0b5c rest args) "...\ │ │ │ +0000c4b0: 221a c5c6 2119 5c6e 0b09 435c 6e1b 0918 "...!.\n..C\n... │ │ │ +0000c4c0: c7c8 c90b 0843 5c22 4208 452a ca5c 6e42 .....C\"B.E*.\nB │ │ │ +0000c4d0: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ +0000c4e0: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ +0000c4f0: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ +0000c500: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ +0000c510: 2d2d 7374 6f72 652d 2d22 2070 726f 676e --store--" progn │ │ │ +0000c520: 2077 6964 6765 742d 7075 7420 6170 7065 widget-put appe │ │ │ +0000c530: 6e64 2077 6964 6765 742d 6765 745d 2038 nd widget-get] 8 │ │ │ +0000c540: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ +0000c550: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ +0000c560: 2877 6964 6765 742d 6765 7420 2672 6573 (widget-get &res │ │ │ +0000c570: 7420 4152 4753 295c 6e5c 6e22 5d20 7769 t ARGS)\n\n"] wi │ │ │ +0000c580: 6467 6574 2d76 616c 7565 2023 5b28 2672 dget-value #[(&r │ │ │ +0000c590: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ +0000c5a0: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ +0000c5b0: c8c9 0b08 435c 2242 0845 2aca 5c6e 42af ....C\"B.E*.\nB. │ │ │ +0000c5c0: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ +0000c5d0: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ +0000c5e0: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ +0000c5f0: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ +0000c600: 2d73 746f 7265 2d2d 2220 7072 6f67 6e20 -store--" progn │ │ │ +0000c610: 7769 6467 6574 2d76 616c 7565 2d73 6574 widget-value-set │ │ │ +0000c620: 2061 7070 656e 6420 7769 6467 6574 2d76 append widget-v │ │ │ +0000c630: 616c 7565 5d20 3820 225c 6e43 6f6d 6d6f alue] 8 "\nCommo │ │ │ +0000c640: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ +0000c650: 7374 3a5c 6e20 2028 7769 6467 6574 2d76 st:\n (widget-v │ │ │ +0000c660: 616c 7565 2026 7265 7374 2041 5247 5329 alue &rest ARGS) │ │ │ +0000c670: 5c6e 5c6e 225d 2072 6563 656e 742d 6b65 \n\n"] recent-ke │ │ │ +0000c680: 7973 2d72 696e 672d 7369 7a65 2023 5b28 ys-ring-size #[( │ │ │ +0000c690: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ +0000c6a0: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ +0000c6b0: 18c7 c80b 0843 5c22 2a42 c95c 6e42 af05 .....C\"*B.\nB.. │ │ │ +0000c6c0: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ +0000c6d0: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ +0000c6e0: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ +0000c6f0: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ +0000c700: 7374 6f72 652d 2d22 2073 6574 2d72 6563 store--" set-rec │ │ │ +0000c710: 656e 742d 6b65 7973 2d72 696e 672d 7369 ent-keys-ring-si │ │ │ +0000c720: 7a65 2061 7070 656e 6420 7265 6365 6e74 ze append recent │ │ │ +0000c730: 2d6b 6579 732d 7269 6e67 2d73 697a 655d -keys-ring-size] │ │ │ +0000c740: 2037 2022 5c6e 436f 6d6d 6f6e 204c 6973 7 "\nCommon Lis │ │ │ +0000c750: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ +0000c760: 2020 2872 6563 656e 742d 6b65 7973 2d72 (recent-keys-r │ │ │ +0000c770: 696e 672d 7369 7a65 2026 7265 7374 2041 ing-size &rest A │ │ │ +0000c780: 5247 5329 5c6e 5c6e 225d 2073 796d 626f RGS)\n\n"] symbo │ │ │ +0000c790: 6c2d 7661 6c75 652d 696e 2d62 7566 6665 l-value-in-buffe │ │ │ +0000c7a0: 7220 235b 2873 2062 2026 6f70 7469 6f6e r #[(s b &option │ │ │ +0000c7b0: 616c 2069 676e 6f72 6564 2d61 7267 2920 al ignored-arg) │ │ │ +0000c7c0: 22c6 c721 1dc6 c821 1cc6 c921 1bc6 ca21 "..!...!...!...! │ │ │ +0000c7d0: 1a0d 0c0b 4509 080e 0e45 5c6e 430d 190c ....E....E\nC... │ │ │ +0000c7e0: 180b 1e0e 5c6e 1e0f cb08 cc09 0e0f 4545 ....\n........EE │ │ │ +0000c7f0: 2ccd 0d0c 0b46 af05 2c87 2220 5b62 2073 ,....F..,." [b s │ │ │ +0000c800: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ +0000c810: 202d 2d69 676e 6f72 6564 2d61 7267 2d2d --ignored-arg-- │ │ │ +0000c820: 7465 6d70 2d2d 202d 2d62 2d2d 7465 6d70 temp-- --b--temp │ │ │ +0000c830: 2d2d 202d 2d73 2d2d 7465 6d70 2d2d 2067 -- --s--temp-- g │ │ │ +0000c840: 656e 7379 6d20 222d 2d73 2d2d 2220 222d ensym "--s--" "- │ │ │ +0000c850: 2d62 2d2d 2220 222d 2d69 676e 6f72 6564 -b--" "--ignored │ │ │ +0000c860: 2d61 7267 2d2d 2220 222d 2d73 746f 7265 -arg--" "--store │ │ │ +0000c870: 2d2d 2220 7769 7468 2d63 7572 7265 6e74 --" with-current │ │ │ +0000c880: 2d62 7566 6665 7220 7365 7420 7379 6d62 -buffer set symb │ │ │ +0000c890: 6f6c 2d76 616c 7565 2d69 6e2d 6275 6666 ol-value-in-buff │ │ │ +0000c8a0: 6572 2069 676e 6f72 6564 2d61 7267 2073 er ignored-arg s │ │ │ +0000c8b0: 746f 7265 5d20 3820 225c 6e43 6f6d 6d6f tore] 8 "\nCommo │ │ │ +0000c8c0: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ +0000c8d0: 7374 3a5c 6e20 2028 7379 6d62 6f6c 2d76 st:\n (symbol-v │ │ │ +0000c8e0: 616c 7565 2d69 6e2d 6275 6666 6572 2053 alue-in-buffer S │ │ │ +0000c8f0: 2042 2026 6f70 7469 6f6e 616c 2049 474e B &optional IGN │ │ │ +0000c900: 4f52 4544 2d41 5247 295c 6e5c 6e22 5d20 ORED-ARG)\n\n"] │ │ │ +0000c910: 7379 6d62 6f6c 2d76 616c 7565 2d69 6e2d symbol-value-in- │ │ │ +0000c920: 636f 6e73 6f6c 6520 235b 2873 2063 2026 console #[(s c & │ │ │ +0000c930: 6f70 7469 6f6e 616c 2069 676e 6f72 6564 optional ignored │ │ │ +0000c940: 2d61 7267 2920 22c6 c721 1dc6 c821 1cc6 -arg) "..!...!.. │ │ │ +0000c950: c921 1bc6 ca21 1a0d 0c0b 4509 080e 0f45 .!...!....E....E │ │ │ +0000c960: 5c6e 430d 190c 180b 1e0f 5c6e 1e10 cbcc \nC.......\n.... │ │ │ +0000c970: 0844 43cd 090e 1045 452c ce0d 0c0b 46af .DC....EE,....F. │ │ │ +0000c980: 052c 8722 205b 6320 7320 2d2d 7374 6f72 .,." [c s --stor │ │ │ +0000c990: 652d 2d74 656d 702d 2d20 2d2d 6967 6e6f e--temp-- --igno │ │ │ +0000c9a0: 7265 642d 6172 672d 2d74 656d 702d 2d20 red-arg--temp-- │ │ │ +0000c9b0: 2d2d 632d 2d74 656d 702d 2d20 2d2d 732d --c--temp-- --s- │ │ │ +0000c9c0: 2d74 656d 702d 2d20 6765 6e73 796d 2022 -temp-- gensym " │ │ │ +0000c9d0: 2d2d 732d 2d22 2022 2d2d 632d 2d22 2022 --s--" "--c--" " │ │ │ +0000c9e0: 2d2d 6967 6e6f 7265 642d 6172 672d 2d22 --ignored-arg--" │ │ │ +0000c9f0: 2022 2d2d 7374 6f72 652d 2d22 206c 6574 "--store--" let │ │ │ +0000ca00: 6620 2873 656c 6563 7465 642d 636f 6e73 f (selected-cons │ │ │ +0000ca10: 6f6c 6529 2073 6574 2073 796d 626f 6c2d ole) set symbol- │ │ │ +0000ca20: 7661 6c75 652d 696e 2d63 6f6e 736f 6c65 value-in-console │ │ │ +0000ca30: 2069 676e 6f72 6564 2d61 7267 2073 746f ignored-arg sto │ │ │ +0000ca40: 7265 5d20 3820 225c 6e43 6f6d 6d6f 6e20 re] 8 "\nCommon │ │ │ +0000ca50: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ +0000ca60: 3a5c 6e20 2028 7379 6d62 6f6c 2d76 616c :\n (symbol-val │ │ │ +0000ca70: 7565 2d69 6e2d 636f 6e73 6f6c 6520 5320 ue-in-console S │ │ │ +0000ca80: 4320 266f 7074 696f 6e61 6c20 4947 4e4f C &optional IGNO │ │ │ +0000ca90: 5245 442d 4152 4729 5c6e 5c6e 225d 2062 RED-ARG)\n\n"] b │ │ │ +0000caa0: 7566 6665 722d 6465 6469 6361 7465 642d uffer-dedicated- │ │ │ +0000cab0: 6672 616d 6520 235b 2826 6f70 7469 6f6e frame #[(&option │ │ │ +0000cac0: 616c 2062 2920 22c4 c521 1bc4 c621 1a0b al b) "..!...!.. │ │ │ +0000cad0: 4309 435c 6e43 0b19 5c6e 18c7 0908 452a C.C\nC..\n....E* │ │ │ +0000cae0: c80b 44af 052a 8722 205b 7620 6220 2d2d ..D..*." [v b -- │ │ │ +0000caf0: 762d 2d74 656d 702d 2d20 2d2d 622d 2d74 v--temp-- --b--t │ │ │ +0000cb00: 656d 702d 2d20 6765 6e73 796d 2022 2d2d emp-- gensym "-- │ │ │ +0000cb10: 622d 2d22 2022 2d2d 762d 2d22 2073 6574 b--" "--v--" set │ │ │ +0000cb20: 2d62 7566 6665 722d 6465 6469 6361 7465 -buffer-dedicate │ │ │ +0000cb30: 642d 6672 616d 6520 6275 6666 6572 2d64 d-frame buffer-d │ │ │ +0000cb40: 6564 6963 6174 6564 2d66 7261 6d65 5d20 edicated-frame] │ │ │ +0000cb50: 3620 225c 6e43 6f6d 6d6f 6e20 4c69 7370 6 "\nCommon Lisp │ │ │ +0000cb60: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +0000cb70: 2028 6275 6666 6572 2d64 6564 6963 6174 (buffer-dedicat │ │ │ +0000cb80: 6564 2d66 7261 6d65 2026 6f70 7469 6f6e ed-frame &option │ │ │ +0000cb90: 616c 2042 295c 6e5c 6e22 5d20 636f 6e73 al B)\n\n"] cons │ │ │ +0000cba0: 6f6c 652d 7479 7065 2d69 6d61 6765 2d63 ole-type-image-c │ │ │ +0000cbb0: 6f6e 7665 7273 696f 6e2d 6c69 7374 2023 onversion-list # │ │ │ +0000cbc0: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ +0000cbd0: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ +0000cbe0: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ +0000cbf0: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ +0000cc00: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ +0000cc10: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ +0000cc20: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ +0000cc30: 2d2d 7374 6f72 652d 2d22 2073 6574 2d63 --store--" set-c │ │ │ +0000cc40: 6f6e 736f 6c65 2d74 7970 652d 696d 6167 onsole-type-imag │ │ │ +0000cc50: 652d 636f 6e76 6572 7369 6f6e 2d6c 6973 e-conversion-lis │ │ │ +0000cc60: 7420 6170 7065 6e64 2063 6f6e 736f 6c65 t append console │ │ │ +0000cc70: 2d74 7970 652d 696d 6167 652d 636f 6e76 -type-image-conv │ │ │ +0000cc80: 6572 7369 6f6e 2d6c 6973 745d 2037 2022 ersion-list] 7 " │ │ │ +0000cc90: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +0000cca0: 6d62 6461 206c 6973 743a 5c6e 2020 2863 mbda list:\n (c │ │ │ +0000ccb0: 6f6e 736f 6c65 2d74 7970 652d 696d 6167 onsole-type-imag │ │ │ +0000ccc0: 652d 636f 6e76 6572 7369 6f6e 2d6c 6973 e-conversion-lis │ │ │ +0000ccd0: 7420 2672 6573 7420 4152 4753 295c 6e5c t &rest ARGS)\n\ │ │ │ +0000cce0: 6e22 5d20 6465 6661 756c 742d 746f 6f6c n"] default-tool │ │ │ +0000ccf0: 6261 722d 706f 7369 7469 6f6e 2023 5b28 bar-position #[( │ │ │ +0000cd00: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ +0000cd10: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ +0000cd20: 18c7 c80b 0843 5c22 2a42 c95c 6e42 af05 .....C\"*B.\nB.. │ │ │ +0000cd30: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ +0000cd40: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ +0000cd50: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ +0000cd60: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ +0000cd70: 7374 6f72 652d 2d22 2073 6574 2d64 6566 store--" set-def │ │ │ +0000cd80: 6175 6c74 2d74 6f6f 6c62 6172 2d70 6f73 ault-toolbar-pos │ │ │ +0000cd90: 6974 696f 6e20 6170 7065 6e64 2064 6566 ition append def │ │ │ +0000cda0: 6175 6c74 2d74 6f6f 6c62 6172 2d70 6f73 ault-toolbar-pos │ │ │ +0000cdb0: 6974 696f 6e5d 2037 2022 5c6e 436f 6d6d ition] 7 "\nComm │ │ │ +0000cdc0: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +0000cdd0: 6973 743a 5c6e 2020 2864 6566 6175 6c74 ist:\n (default │ │ │ +0000cde0: 2d74 6f6f 6c62 6172 2d70 6f73 6974 696f -toolbar-positio │ │ │ +0000cdf0: 6e20 2672 6573 7420 4152 4753 295c 6e5c n &rest ARGS)\n\ │ │ │ +0000ce00: 6e22 5d20 6465 7669 6365 2d63 6c61 7373 n"] device-class │ │ │ +0000ce10: 2023 5b28 266f 7074 696f 6e61 6c20 6429 #[(&optional d) │ │ │ +0000ce20: 2022 c4c5 211b c4c6 211a 0b43 0943 5c6e "..!...!..C.C\n │ │ │ +0000ce30: 430b 195c 6e18 c709 0845 2ac8 0b44 af05 C..\n....E*..D.. │ │ │ +0000ce40: 2a87 2220 5b76 2064 202d 2d76 2d2d 7465 *." [v d --v--te │ │ │ +0000ce50: 6d70 2d2d 202d 2d64 2d2d 7465 6d70 2d2d mp-- --d--temp-- │ │ │ +0000ce60: 2067 656e 7379 6d20 222d 2d64 2d2d 2220 gensym "--d--" │ │ │ +0000ce70: 222d 2d76 2d2d 2220 7365 742d 6465 7669 "--v--" set-devi │ │ │ +0000ce80: 6365 2d63 6c61 7373 2064 6576 6963 652d ce-class device- │ │ │ +0000ce90: 636c 6173 735d 2036 2022 5c6e 436f 6d6d class] 6 "\nComm │ │ │ +0000cea0: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +0000ceb0: 6973 743a 5c6e 2020 2864 6576 6963 652d ist:\n (device- │ │ │ +0000cec0: 636c 6173 7320 266f 7074 696f 6e61 6c20 class &optional │ │ │ +0000ced0: 4429 5c6e 5c6e 225d 2065 7874 656e 742d D)\n\n"] extent- │ │ │ +0000cee0: 6265 6769 6e2d 676c 7970 6820 235b 2826 begin-glyph #[(& │ │ │ +0000cef0: 7265 7374 2061 7267 7329 2022 c4c5 0b5c rest args) "...\ │ │ │ +0000cf00: 221a c5c6 2119 5c6e 0b09 435c 6e1b 0918 "...!.\n..C\n... │ │ │ +0000cf10: c7c8 0b08 435c 222a 42c9 5c6e 42af 052a ....C\"*B.\nB..* │ │ │ +0000cf20: 8722 205b 7374 6f72 6520 2d2d 7374 6f72 ." [store --stor │ │ │ +0000cf30: 652d 2d74 656d 702d 2d20 2d2d 6172 6773 e--temp-- --args │ │ │ +0000cf40: 2d2d 7465 6d70 2d2d 2061 7267 7320 6d61 --temp-- args ma │ │ │ +0000cf50: 7063 6172 2067 656e 7379 6d20 222d 2d73 pcar gensym "--s │ │ │ +0000cf60: 746f 7265 2d2d 2220 7365 742d 6578 7465 tore--" set-exte │ │ │ +0000cf70: 6e74 2d62 6567 696e 2d67 6c79 7068 2061 nt-begin-glyph a │ │ │ +0000cf80: 7070 656e 6420 6578 7465 6e74 2d62 6567 ppend extent-beg │ │ │ +0000cf90: 696e 2d67 6c79 7068 5d20 3720 225c 6e43 in-glyph] 7 "\nC │ │ │ +0000cfa0: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +0000cfb0: 6120 6c69 7374 3a5c 6e20 2028 6578 7465 a list:\n (exte │ │ │ +0000cfc0: 6e74 2d62 6567 696e 2d67 6c79 7068 2026 nt-begin-glyph & │ │ │ +0000cfd0: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +0000cfe0: 2065 7874 656e 742d 6265 6769 6e2d 676c extent-begin-gl │ │ │ +0000cff0: 7970 682d 6c61 796f 7574 2023 5b28 2672 yph-layout #[(&r │ │ │ +0000d000: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ +0000d010: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ +0000d020: c80b 0843 5c22 2a42 c95c 6e42 af05 2a87 ...C\"*B.\nB..*. │ │ │ +0000d030: 2220 5b73 746f 7265 202d 2d73 746f 7265 " [store --store │ │ │ +0000d040: 2d2d 7465 6d70 2d2d 202d 2d61 7267 732d --temp-- --args- │ │ │ +0000d050: 2d74 656d 702d 2d20 6172 6773 206d 6170 -temp-- args map │ │ │ +0000d060: 6361 7220 6765 6e73 796d 2022 2d2d 7374 car gensym "--st │ │ │ +0000d070: 6f72 652d 2d22 2073 6574 2d65 7874 656e ore--" set-exten │ │ │ +0000d080: 742d 6265 6769 6e2d 676c 7970 682d 6c61 t-begin-glyph-la │ │ │ +0000d090: 796f 7574 2061 7070 656e 6420 6578 7465 yout append exte │ │ │ +0000d0a0: 6e74 2d62 6567 696e 2d67 6c79 7068 2d6c nt-begin-glyph-l │ │ │ +0000d0b0: 6179 6f75 745d 2037 2022 5c6e 436f 6d6d ayout] 7 "\nComm │ │ │ +0000d0c0: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +0000d0d0: 6973 743a 5c6e 2020 2865 7874 656e 742d ist:\n (extent- │ │ │ +0000d0e0: 6265 6769 6e2d 676c 7970 682d 6c61 796f begin-glyph-layo │ │ │ +0000d0f0: 7574 2026 7265 7374 2041 5247 5329 5c6e ut &rest ARGS)\n │ │ │ +0000d100: 5c6e 225d 2065 7874 656e 742d 656e 642d \n"] extent-end- │ │ │ +0000d110: 676c 7970 6820 235b 2826 7265 7374 2061 glyph #[(&rest a │ │ │ +0000d120: 7267 7329 2022 c4c5 0b5c 221a c5c6 2119 rgs) "...\"...!. │ │ │ +0000d130: 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 435c \n..C\n.......C\ │ │ │ +0000d140: 222a 42c9 5c6e 42af 052a 8722 205b 7374 "*B.\nB..*." [st │ │ │ +0000d150: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ +0000d160: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ +0000d170: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ +0000d180: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ +0000d190: 2220 7365 742d 6578 7465 6e74 2d65 6e64 " set-extent-end │ │ │ +0000d1a0: 2d67 6c79 7068 2061 7070 656e 6420 6578 -glyph append ex │ │ │ +0000d1b0: 7465 6e74 2d65 6e64 2d67 6c79 7068 5d20 tent-end-glyph] │ │ │ +0000d1c0: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ +0000d1d0: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +0000d1e0: 2028 6578 7465 6e74 2d65 6e64 2d67 6c79 (extent-end-gly │ │ │ +0000d1f0: 7068 2026 7265 7374 2041 5247 5329 5c6e ph &rest ARGS)\n │ │ │ +0000d200: 5c6e 225d 2065 7874 656e 742d 656e 642d \n"] extent-end- │ │ │ +0000d210: 676c 7970 682d 6c61 796f 7574 2023 5b28 glyph-layout #[( │ │ │ +0000d220: 2672 6573 7420 6172 6773 2920 22c4 c50b &rest args) "... │ │ │ +0000d230: 5c22 1ac5 c621 195c 6e0b 0943 5c6e 1b09 \"...!.\n..C\n.. │ │ │ +0000d240: 18c7 c80b 0843 5c22 2a42 c95c 6e42 af05 .....C\"*B.\nB.. │ │ │ +0000d250: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ +0000d260: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ +0000d270: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ +0000d280: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ +0000d290: 7374 6f72 652d 2d22 2073 6574 2d65 7874 store--" set-ext │ │ │ +0000d2a0: 656e 742d 656e 642d 676c 7970 682d 6c61 ent-end-glyph-la │ │ │ +0000d2b0: 796f 7574 2061 7070 656e 6420 6578 7465 yout append exte │ │ │ +0000d2c0: 6e74 2d65 6e64 2d67 6c79 7068 2d6c 6179 nt-end-glyph-lay │ │ │ +0000d2d0: 6f75 745d 2037 2022 5c6e 436f 6d6d 6f6e out] 7 "\nCommon │ │ │ +0000d2e0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +0000d2f0: 743a 5c6e 2020 2865 7874 656e 742d 656e t:\n (extent-en │ │ │ +0000d300: 642d 676c 7970 682d 6c61 796f 7574 2026 d-glyph-layout & │ │ │ +0000d310: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +0000d320: 2065 7874 656e 742d 6b65 796d 6170 2023 extent-keymap # │ │ │ +0000d330: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ +0000d340: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ +0000d350: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ +0000d360: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ +0000d370: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ +0000d380: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ +0000d390: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ +0000d3a0: 2d2d 7374 6f72 652d 2d22 2073 6574 2d65 --store--" set-e │ │ │ +0000d3b0: 7874 656e 742d 6b65 796d 6170 2061 7070 xtent-keymap app │ │ │ +0000d3c0: 656e 6420 6578 7465 6e74 2d6b 6579 6d61 end extent-keyma │ │ │ +0000d3d0: 705d 2037 2022 5c6e 436f 6d6d 6f6e 204c p] 7 "\nCommon L │ │ │ +0000d3e0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +0000d3f0: 5c6e 2020 2865 7874 656e 742d 6b65 796d \n (extent-keym │ │ │ +0000d400: 6170 2026 7265 7374 2041 5247 5329 5c6e ap &rest ARGS)\n │ │ │ +0000d410: 5c6e 225d 2065 7874 656e 742d 7061 7265 \n"] extent-pare │ │ │ +0000d420: 6e74 2023 5b28 2672 6573 7420 6172 6773 nt #[(&rest args │ │ │ +0000d430: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ +0000d440: 0943 5c6e 1b09 18c7 c80b 0843 5c22 2a42 .C\n.......C\"*B │ │ │ +0000d450: c95c 6e42 af05 2a87 2220 5b73 746f 7265 .\nB..*." [store │ │ │ +0000d460: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ +0000d470: 202d 2d61 7267 732d 2d74 656d 702d 2d20 --args--temp-- │ │ │ +0000d480: 6172 6773 206d 6170 6361 7220 6765 6e73 args mapcar gens │ │ │ +0000d490: 796d 2022 2d2d 7374 6f72 652d 2d22 2073 ym "--store--" s │ │ │ +0000d4a0: 6574 2d65 7874 656e 742d 7061 7265 6e74 et-extent-parent │ │ │ +0000d4b0: 2061 7070 656e 6420 6578 7465 6e74 2d70 append extent-p │ │ │ +0000d4c0: 6172 656e 745d 2037 2022 5c6e 436f 6d6d arent] 7 "\nComm │ │ │ +0000d4d0: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +0000d4e0: 6973 743a 5c6e 2020 2865 7874 656e 742d ist:\n (extent- │ │ │ +0000d4f0: 7061 7265 6e74 2026 7265 7374 2041 5247 parent &rest ARG │ │ │ +0000d500: 5329 5c6e 5c6e 225d 2065 7874 656e 742d S)\n\n"] extent- │ │ │ +0000d510: 7072 6f70 6572 7469 6573 2023 5b28 2672 properties #[(&r │ │ │ +0000d520: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ +0000d530: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ +0000d540: c80b 0843 5c22 2a42 c95c 6e42 af05 2a87 ...C\"*B.\nB..*. │ │ │ +0000d550: 2220 5b73 746f 7265 202d 2d73 746f 7265 " [store --store │ │ │ +0000d560: 2d2d 7465 6d70 2d2d 202d 2d61 7267 732d --temp-- --args- │ │ │ +0000d570: 2d74 656d 702d 2d20 6172 6773 206d 6170 -temp-- args map │ │ │ +0000d580: 6361 7220 6765 6e73 796d 2022 2d2d 7374 car gensym "--st │ │ │ +0000d590: 6f72 652d 2d22 2073 6574 2d65 7874 656e ore--" set-exten │ │ │ +0000d5a0: 742d 7072 6f70 6572 7469 6573 2061 7070 t-properties app │ │ │ +0000d5b0: 656e 6420 6578 7465 6e74 2d70 726f 7065 end extent-prope │ │ │ +0000d5c0: 7274 6965 735d 2037 2022 5c6e 436f 6d6d rties] 7 "\nComm │ │ │ +0000d5d0: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +0000d5e0: 6973 743a 5c6e 2020 2865 7874 656e 742d ist:\n (extent- │ │ │ +0000d5f0: 7072 6f70 6572 7469 6573 2026 7265 7374 properties &rest │ │ │ +0000d600: 2041 5247 5329 5c6e 5c6e 225d 2066 7261 ARGS)\n\n"] fra │ │ │ +0000d610: 6d65 2d73 656c 6563 7465 642d 7769 6e64 me-selected-wind │ │ │ +0000d620: 6f77 2023 5b28 266f 7074 696f 6e61 6c20 ow #[(&optional │ │ │ +0000d630: 6629 2022 c4c5 211b c4c6 211a 0b43 0943 f) "..!...!..C.C │ │ │ +0000d640: 5c6e 430b 195c 6e18 c709 0845 2ac8 0b44 \nC..\n....E*..D │ │ │ +0000d650: af05 2a87 2220 5b76 2066 202d 2d76 2d2d ..*." [v f --v-- │ │ │ +0000d660: 7465 6d70 2d2d 202d 2d66 2d2d 7465 6d70 temp-- --f--temp │ │ │ +0000d670: 2d2d 2067 656e 7379 6d20 222d 2d66 2d2d -- gensym "--f-- │ │ │ +0000d680: 2220 222d 2d76 2d2d 2220 7365 742d 6672 " "--v--" set-fr │ │ │ +0000d690: 616d 652d 7365 6c65 6374 6564 2d77 696e ame-selected-win │ │ │ +0000d6a0: 646f 7720 6672 616d 652d 7365 6c65 6374 dow frame-select │ │ │ +0000d6b0: 6564 2d77 696e 646f 775d 2036 2022 5c6e ed-window] 6 "\n │ │ │ +0000d6c0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +0000d6d0: 6461 206c 6973 743a 5c6e 2020 2866 7261 da list:\n (fra │ │ │ +0000d6e0: 6d65 2d73 656c 6563 7465 642d 7769 6e64 me-selected-wind │ │ │ +0000d6f0: 6f77 2026 6f70 7469 6f6e 616c 2046 295c ow &optional F)\ │ │ │ +0000d700: 6e5c 6e22 5d20 676c 7970 682d 696d 6167 n\n"] glyph-imag │ │ │ +0000d710: 6520 235b 2867 6c79 7068 2026 6f70 7469 e #[(glyph &opti │ │ │ +0000d720: 6f6e 616c 2064 6f6d 6169 6e29 2022 c6c7 onal domain) ".. │ │ │ +0000d730: 211d c6c8 211c c6c9 211b 0d0c 445c 6e09 !...!...!...D\n. │ │ │ +0000d740: 440b 430d 1a0c 190b 18ca 5c6e 0809 462b D.C.......\n..F+ │ │ │ +0000d750: cb0d 0c45 af05 2b87 2220 5b69 2064 6f6d ...E..+." [i dom │ │ │ +0000d760: 6169 6e20 676c 7970 6820 2d2d 692d 2d74 ain glyph --i--t │ │ │ +0000d770: 656d 702d 2d20 2d2d 646f 6d61 696e 2d2d emp-- --domain-- │ │ │ +0000d780: 7465 6d70 2d2d 202d 2d67 6c79 7068 2d2d temp-- --glyph-- │ │ │ +0000d790: 7465 6d70 2d2d 2067 656e 7379 6d20 222d temp-- gensym "- │ │ │ +0000d7a0: 2d67 6c79 7068 2d2d 2220 222d 2d64 6f6d -glyph--" "--dom │ │ │ +0000d7b0: 6169 6e2d 2d22 2022 2d2d 692d 2d22 2073 ain--" "--i--" s │ │ │ +0000d7c0: 6574 2d67 6c79 7068 2d69 6d61 6765 2067 et-glyph-image g │ │ │ +0000d7d0: 6c79 7068 2d69 6d61 6765 5d20 3720 225c lyph-image] 7 "\ │ │ │ +0000d7e0: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ +0000d7f0: 6264 6120 6c69 7374 3a5c 6e20 2028 676c bda list:\n (gl │ │ │ +0000d800: 7970 682d 696d 6167 6520 474c 5950 4820 yph-image GLYPH │ │ │ +0000d810: 266f 7074 696f 6e61 6c20 444f 4d41 494e &optional DOMAIN │ │ │ +0000d820: 295c 6e5c 6e22 5d20 6974 696d 6572 2d66 )\n\n"] itimer-f │ │ │ +0000d830: 756e 6374 696f 6e20 235b 2826 7265 7374 unction #[(&rest │ │ │ +0000d840: 2061 7267 7329 2022 c4c5 0b5c 221a c5c6 args) "...\"... │ │ │ +0000d850: 2119 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 !.\n..C\n....... │ │ │ +0000d860: 435c 222a 42c9 5c6e 42af 052a 8722 205b C\"*B.\nB..*." [ │ │ │ +0000d870: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ +0000d880: 656d 702d 2d20 2d2d 6172 6773 2d2d 7465 emp-- --args--te │ │ │ +0000d890: 6d70 2d2d 2061 7267 7320 6d61 7063 6172 mp-- args mapcar │ │ │ +0000d8a0: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ +0000d8b0: 2d2d 2220 7365 742d 6974 696d 6572 2d66 --" set-itimer-f │ │ │ +0000d8c0: 756e 6374 696f 6e20 6170 7065 6e64 2069 unction append i │ │ │ +0000d8d0: 7469 6d65 722d 6675 6e63 7469 6f6e 5d20 timer-function] │ │ │ +0000d8e0: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ +0000d8f0: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +0000d900: 2028 6974 696d 6572 2d66 756e 6374 696f (itimer-functio │ │ │ +0000d910: 6e20 2672 6573 7420 4152 4753 295c 6e5c n &rest ARGS)\n\ │ │ │ +0000d920: 6e22 5d20 6974 696d 6572 2d66 756e 6374 n"] itimer-funct │ │ │ +0000d930: 696f 6e2d 6172 6775 6d65 6e74 7320 235b ion-arguments #[ │ │ │ +0000d940: 2826 7265 7374 2061 7267 7329 2022 c4c5 (&rest args) ".. │ │ │ +0000d950: 0b5c 221a c5c6 2119 5c6e 0b09 435c 6e1b .\"...!.\n..C\n. │ │ │ +0000d960: 0918 c7c8 0b08 435c 222a 42c9 5c6e 42af ......C\"*B.\nB. │ │ │ +0000d970: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ +0000d980: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ +0000d990: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ +0000d9a0: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ +0000d9b0: 2d73 746f 7265 2d2d 2220 7365 742d 6974 -store--" set-it │ │ │ +0000d9c0: 696d 6572 2d66 756e 6374 696f 6e2d 6172 imer-function-ar │ │ │ +0000d9d0: 6775 6d65 6e74 7320 6170 7065 6e64 2069 guments append i │ │ │ +0000d9e0: 7469 6d65 722d 6675 6e63 7469 6f6e 2d61 timer-function-a │ │ │ +0000d9f0: 7267 756d 656e 7473 5d20 3720 225c 6e43 rguments] 7 "\nC │ │ │ +0000da00: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +0000da10: 6120 6c69 7374 3a5c 6e20 2028 6974 696d a list:\n (itim │ │ │ +0000da20: 6572 2d66 756e 6374 696f 6e2d 6172 6775 er-function-argu │ │ │ +0000da30: 6d65 6e74 7320 2672 6573 7420 4152 4753 ments &rest ARGS │ │ │ +0000da40: 295c 6e5c 6e22 5d20 6974 696d 6572 2d69 )\n\n"] itimer-i │ │ │ +0000da50: 732d 6964 6c65 2023 5b28 2672 6573 7420 s-idle #[(&rest │ │ │ +0000da60: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ +0000da70: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ +0000da80: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ +0000da90: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ +0000daa0: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ +0000dab0: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ +0000dac0: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ +0000dad0: 2d22 2073 6574 2d69 7469 6d65 722d 6973 -" set-itimer-is │ │ │ +0000dae0: 2d69 646c 6520 6170 7065 6e64 2069 7469 -idle append iti │ │ │ +0000daf0: 6d65 722d 6973 2d69 646c 655d 2037 2022 mer-is-idle] 7 " │ │ │ +0000db00: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +0000db10: 6d62 6461 206c 6973 743a 5c6e 2020 2869 mbda list:\n (i │ │ │ +0000db20: 7469 6d65 722d 6973 2d69 646c 6520 2672 timer-is-idle &r │ │ │ +0000db30: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ +0000db40: 6974 696d 6572 2d72 6563 6f72 6465 642d itimer-recorded- │ │ │ +0000db50: 7275 6e2d 7469 6d65 2023 5b28 2672 6573 run-time #[(&res │ │ │ +0000db60: 7420 6172 6773 2920 22c4 c50b 5c22 1ac5 t args) "...\".. │ │ │ +0000db70: c621 195c 6e0b 0943 5c6e 1b09 18c7 c80b .!.\n..C\n...... │ │ │ +0000db80: 0843 5c22 2a42 c95c 6e42 af05 2a87 2220 .C\"*B.\nB..*." │ │ │ +0000db90: 5b73 746f 7265 202d 2d73 746f 7265 2d2d [store --store-- │ │ │ +0000dba0: 7465 6d70 2d2d 202d 2d61 7267 732d 2d74 temp-- --args--t │ │ │ +0000dbb0: 656d 702d 2d20 6172 6773 206d 6170 6361 emp-- args mapca │ │ │ +0000dbc0: 7220 6765 6e73 796d 2022 2d2d 7374 6f72 r gensym "--stor │ │ │ +0000dbd0: 652d 2d22 2073 6574 2d69 7469 6d65 722d e--" set-itimer- │ │ │ +0000dbe0: 7265 636f 7264 6564 2d72 756e 2d74 696d recorded-run-tim │ │ │ +0000dbf0: 6520 6170 7065 6e64 2069 7469 6d65 722d e append itimer- │ │ │ +0000dc00: 7265 636f 7264 6564 2d72 756e 2d74 696d recorded-run-tim │ │ │ +0000dc10: 655d 2037 2022 5c6e 436f 6d6d 6f6e 204c e] 7 "\nCommon L │ │ │ +0000dc20: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +0000dc30: 5c6e 2020 2869 7469 6d65 722d 7265 636f \n (itimer-reco │ │ │ +0000dc40: 7264 6564 2d72 756e 2d74 696d 6520 2672 rded-run-time &r │ │ │ +0000dc50: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ +0000dc60: 6974 696d 6572 2d72 6573 7461 7274 2023 itimer-restart # │ │ │ +0000dc70: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ +0000dc80: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ +0000dc90: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ +0000dca0: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ +0000dcb0: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ +0000dcc0: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ +0000dcd0: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ +0000dce0: 2d2d 7374 6f72 652d 2d22 2073 6574 2d69 --store--" set-i │ │ │ +0000dcf0: 7469 6d65 722d 7265 7374 6172 7420 6170 timer-restart ap │ │ │ +0000dd00: 7065 6e64 2069 7469 6d65 722d 7265 7374 pend itimer-rest │ │ │ +0000dd10: 6172 745d 2037 2022 5c6e 436f 6d6d 6f6e art] 7 "\nCommon │ │ │ +0000dd20: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +0000dd30: 743a 5c6e 2020 2869 7469 6d65 722d 7265 t:\n (itimer-re │ │ │ +0000dd40: 7374 6172 7420 2672 6573 7420 4152 4753 start &rest ARGS │ │ │ +0000dd50: 295c 6e5c 6e22 5d20 6974 696d 6572 2d75 )\n\n"] itimer-u │ │ │ +0000dd60: 7365 732d 6172 6775 6d65 6e74 7320 235b ses-arguments #[ │ │ │ +0000dd70: 2826 7265 7374 2061 7267 7329 2022 c4c5 (&rest args) ".. │ │ │ +0000dd80: 0b5c 221a c5c6 2119 5c6e 0b09 435c 6e1b .\"...!.\n..C\n. │ │ │ +0000dd90: 0918 c7c8 0b08 435c 222a 42c9 5c6e 42af ......C\"*B.\nB. │ │ │ +0000dda0: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ +0000ddb0: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ +0000ddc0: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ +0000ddd0: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ +0000dde0: 2d73 746f 7265 2d2d 2220 7365 742d 6974 -store--" set-it │ │ │ +0000ddf0: 696d 6572 2d75 7365 732d 6172 6775 6d65 imer-uses-argume │ │ │ +0000de00: 6e74 7320 6170 7065 6e64 2069 7469 6d65 nts append itime │ │ │ +0000de10: 722d 7573 6573 2d61 7267 756d 656e 7473 r-uses-arguments │ │ │ +0000de20: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ +0000de30: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ +0000de40: 6e20 2028 6974 696d 6572 2d75 7365 732d n (itimer-uses- │ │ │ +0000de50: 6172 6775 6d65 6e74 7320 2672 6573 7420 arguments &rest │ │ │ +0000de60: 4152 4753 295c 6e5c 6e22 5d20 6974 696d ARGS)\n\n"] itim │ │ │ +0000de70: 6572 2d76 616c 7565 2023 5b28 2672 6573 er-value #[(&res │ │ │ +0000de80: 7420 6172 6773 2920 22c4 c50b 5c22 1ac5 t args) "...\".. │ │ │ +0000de90: c621 195c 6e0b 0943 5c6e 1b09 18c7 c80b .!.\n..C\n...... │ │ │ +0000dea0: 0843 5c22 2a42 c95c 6e42 af05 2a87 2220 .C\"*B.\nB..*." │ │ │ +0000deb0: 5b73 746f 7265 202d 2d73 746f 7265 2d2d [store --store-- │ │ │ +0000dec0: 7465 6d70 2d2d 202d 2d61 7267 732d 2d74 temp-- --args--t │ │ │ +0000ded0: 656d 702d 2d20 6172 6773 206d 6170 6361 emp-- args mapca │ │ │ +0000dee0: 7220 6765 6e73 796d 2022 2d2d 7374 6f72 r gensym "--stor │ │ │ +0000def0: 652d 2d22 2073 6574 2d69 7469 6d65 722d e--" set-itimer- │ │ │ +0000df00: 7661 6c75 6520 6170 7065 6e64 2069 7469 value append iti │ │ │ +0000df10: 6d65 722d 7661 6c75 655d 2037 2022 5c6e mer-value] 7 "\n │ │ │ +0000df20: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +0000df30: 6461 206c 6973 743a 5c6e 2020 2869 7469 da list:\n (iti │ │ │ +0000df40: 6d65 722d 7661 6c75 6520 2672 6573 7420 mer-value &rest │ │ │ +0000df50: 4152 4753 295c 6e5c 6e22 5d20 6b65 796d ARGS)\n\n"] keym │ │ │ +0000df60: 6170 2d70 6172 656e 7473 2023 5b28 2672 ap-parents #[(&r │ │ │ +0000df70: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ +0000df80: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ +0000df90: c80b 0843 5c22 2a42 c95c 6e42 af05 2a87 ...C\"*B.\nB..*. │ │ │ +0000dfa0: 2220 5b73 746f 7265 202d 2d73 746f 7265 " [store --store │ │ │ +0000dfb0: 2d2d 7465 6d70 2d2d 202d 2d61 7267 732d --temp-- --args- │ │ │ +0000dfc0: 2d74 656d 702d 2d20 6172 6773 206d 6170 -temp-- args map │ │ │ +0000dfd0: 6361 7220 6765 6e73 796d 2022 2d2d 7374 car gensym "--st │ │ │ +0000dfe0: 6f72 652d 2d22 2073 6574 2d6b 6579 6d61 ore--" set-keyma │ │ │ +0000dff0: 702d 7061 7265 6e74 7320 6170 7065 6e64 p-parents append │ │ │ +0000e000: 206b 6579 6d61 702d 7061 7265 6e74 735d keymap-parents] │ │ │ +0000e010: 2037 2022 5c6e 436f 6d6d 6f6e 204c 6973 7 "\nCommon Lis │ │ │ +0000e020: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ +0000e030: 2020 286b 6579 6d61 702d 7061 7265 6e74 (keymap-parent │ │ │ +0000e040: 7320 2672 6573 7420 4152 4753 295c 6e5c s &rest ARGS)\n\ │ │ │ +0000e050: 6e22 5d20 6d61 726b 6572 2d69 6e73 6572 n"] marker-inser │ │ │ +0000e060: 7469 6f6e 2d74 7970 6520 235b 2826 7265 tion-type #[(&re │ │ │ +0000e070: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ +0000e080: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ +0000e090: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ +0000e0a0: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ +0000e0b0: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ +0000e0c0: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ +0000e0d0: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ +0000e0e0: 7265 2d2d 2220 7365 742d 6d61 726b 6572 re--" set-marker │ │ │ +0000e0f0: 2d69 6e73 6572 7469 6f6e 2d74 7970 6520 -insertion-type │ │ │ +0000e100: 6170 7065 6e64 206d 6172 6b65 722d 696e append marker-in │ │ │ +0000e110: 7365 7274 696f 6e2d 7479 7065 5d20 3720 sertion-type] 7 │ │ │ +0000e120: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ +0000e130: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ +0000e140: 6d61 726b 6572 2d69 6e73 6572 7469 6f6e marker-insertion │ │ │ +0000e150: 2d74 7970 6520 2672 6573 7420 4152 4753 -type &rest ARGS │ │ │ +0000e160: 295c 6e5c 6e22 5d20 6d6f 7573 652d 7069 )\n\n"] mouse-pi │ │ │ +0000e170: 7865 6c2d 706f 7369 7469 6f6e 2023 5b28 xel-position #[( │ │ │ +0000e180: 266f 7074 696f 6e61 6c20 6429 2022 c4c5 &optional d) ".. │ │ │ +0000e190: 211a c4c6 2119 5c6e 4308 4309 435c 6e18 !...!.\nC.C.C\n. │ │ │ +0000e1a0: 091b c7c8 080b 400b 4140 0b41 41af 050b ......@.A@.AA... │ │ │ +0000e1b0: 452a c95c 6e44 af05 2a87 2220 5b64 202d E*.\nD..*." [d - │ │ │ +0000e1c0: 2d76 2d2d 7465 6d70 2d2d 202d 2d64 2d2d -v--temp-- --d-- │ │ │ +0000e1d0: 7465 6d70 2d2d 2076 2067 656e 7379 6d20 temp-- v gensym │ │ │ +0000e1e0: 222d 2d64 2d2d 2220 222d 2d76 2d2d 2220 "--d--" "--v--" │ │ │ +0000e1f0: 7072 6f67 6e20 7365 742d 6d6f 7573 652d progn set-mouse- │ │ │ +0000e200: 7069 7865 6c2d 706f 7369 7469 6f6e 206d pixel-position m │ │ │ +0000e210: 6f75 7365 2d70 6978 656c 2d70 6f73 6974 ouse-pixel-posit │ │ │ +0000e220: 696f 6e5d 2039 2022 5c6e 436f 6d6d 6f6e ion] 9 "\nCommon │ │ │ +0000e230: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +0000e240: 743a 5c6e 2020 286d 6f75 7365 2d70 6978 t:\n (mouse-pix │ │ │ +0000e250: 656c 2d70 6f73 6974 696f 6e20 266f 7074 el-position &opt │ │ │ +0000e260: 696f 6e61 6c20 4429 5c6e 5c6e 225d 2074 ional D)\n\n"] t │ │ │ +0000e270: 7275 6e63 2d73 7461 636b 2d6c 656e 6774 runc-stack-lengt │ │ │ +0000e280: 6820 235b 2826 7265 7374 2061 7267 7329 h #[(&rest args) │ │ │ +0000e290: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000e2a0: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ +0000e2b0: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +0000e2c0: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +0000e2d0: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +0000e2e0: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +0000e2f0: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ +0000e300: 742d 7472 756e 632d 7374 6163 6b2d 6c65 t-trunc-stack-le │ │ │ +0000e310: 6e67 7468 2061 7070 656e 6420 7472 756e ngth append trun │ │ │ +0000e320: 632d 7374 6163 6b2d 6c65 6e67 7468 5d20 c-stack-length] │ │ │ +0000e330: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ +0000e340: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +0000e350: 2028 7472 756e 632d 7374 6163 6b2d 6c65 (trunc-stack-le │ │ │ +0000e360: 6e67 7468 2026 7265 7374 2041 5247 5329 ngth &rest ARGS) │ │ │ +0000e370: 5c6e 5c6e 225d 2074 7275 6e63 2d73 7461 \n\n"] trunc-sta │ │ │ +0000e380: 636b 2d73 7461 636b 2023 5b28 2672 6573 ck-stack #[(&res │ │ │ +0000e390: 7420 6172 6773 2920 22c4 c50b 5c22 1ac5 t args) "...\".. │ │ │ +0000e3a0: c621 195c 6e0b 0943 5c6e 1b09 18c7 c80b .!.\n..C\n...... │ │ │ +0000e3b0: 0843 5c22 2a42 c95c 6e42 af05 2a87 2220 .C\"*B.\nB..*." │ │ │ +0000e3c0: 5b73 746f 7265 202d 2d73 746f 7265 2d2d [store --store-- │ │ │ +0000e3d0: 7465 6d70 2d2d 202d 2d61 7267 732d 2d74 temp-- --args--t │ │ │ +0000e3e0: 656d 702d 2d20 6172 6773 206d 6170 6361 emp-- args mapca │ │ │ +0000e3f0: 7220 6765 6e73 796d 2022 2d2d 7374 6f72 r gensym "--stor │ │ │ +0000e400: 652d 2d22 2073 6574 2d74 7275 6e63 2d73 e--" set-trunc-s │ │ │ +0000e410: 7461 636b 2d73 7461 636b 2061 7070 656e tack-stack appen │ │ │ +0000e420: 6420 7472 756e 632d 7374 6163 6b2d 7374 d trunc-stack-st │ │ │ +0000e430: 6163 6b5d 2037 2022 5c6e 436f 6d6d 6f6e ack] 7 "\nCommon │ │ │ +0000e440: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +0000e450: 743a 5c6e 2020 2874 7275 6e63 2d73 7461 t:\n (trunc-sta │ │ │ +0000e460: 636b 2d73 7461 636b 2026 7265 7374 2041 ck-stack &rest A │ │ │ +0000e470: 5247 5329 5c6e 5c6e 225d 2075 6e64 6f61 RGS)\n\n"] undoa │ │ │ +0000e480: 626c 652d 7374 6163 6b2d 6d61 7820 235b ble-stack-max #[ │ │ │ +0000e490: 2826 7265 7374 2061 7267 7329 2022 c4c5 (&rest args) ".. │ │ │ +0000e4a0: 0b5c 221a c5c6 2119 5c6e 0b09 435c 6e1b .\"...!.\n..C\n. │ │ │ +0000e4b0: 0918 c7c8 0b08 435c 222a 42c9 5c6e 42af ......C\"*B.\nB. │ │ │ +0000e4c0: 052a 8722 205b 7374 6f72 6520 2d2d 7374 .*." [store --st │ │ │ +0000e4d0: 6f72 652d 2d74 656d 702d 2d20 2d2d 6172 ore--temp-- --ar │ │ │ +0000e4e0: 6773 2d2d 7465 6d70 2d2d 2061 7267 7320 gs--temp-- args │ │ │ +0000e4f0: 6d61 7063 6172 2067 656e 7379 6d20 222d mapcar gensym "- │ │ │ +0000e500: 2d73 746f 7265 2d2d 2220 7365 742d 756e -store--" set-un │ │ │ +0000e510: 646f 6162 6c65 2d73 7461 636b 2d6d 6178 doable-stack-max │ │ │ +0000e520: 2061 7070 656e 6420 756e 646f 6162 6c65 append undoable │ │ │ +0000e530: 2d73 7461 636b 2d6d 6178 5d20 3720 225c -stack-max] 7 "\ │ │ │ +0000e540: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ +0000e550: 6264 6120 6c69 7374 3a5c 6e20 2028 756e bda list:\n (un │ │ │ +0000e560: 646f 6162 6c65 2d73 7461 636b 2d6d 6178 doable-stack-max │ │ │ +0000e570: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +0000e580: 225d 2077 6561 6b2d 6c69 7374 2d6c 6973 "] weak-list-lis │ │ │ +0000e590: 7420 235b 2826 7265 7374 2061 7267 7329 t #[(&rest args) │ │ │ +0000e5a0: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000e5b0: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ +0000e5c0: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +0000e5d0: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +0000e5e0: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +0000e5f0: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +0000e600: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ +0000e610: 742d 7765 616b 2d6c 6973 742d 6c69 7374 t-weak-list-list │ │ │ +0000e620: 2061 7070 656e 6420 7765 616b 2d6c 6973 append weak-lis │ │ │ +0000e630: 742d 6c69 7374 5d20 3720 225c 6e43 6f6d t-list] 7 "\nCom │ │ │ +0000e640: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +0000e650: 6c69 7374 3a5c 6e20 2028 7765 616b 2d6c list:\n (weak-l │ │ │ +0000e660: 6973 742d 6c69 7374 2026 7265 7374 2041 ist-list &rest A │ │ │ +0000e670: 5247 5329 5c6e 5c6e 225d 2067 6574 656e RGS)\n\n"] geten │ │ │ +0000e680: 7620 235b 2826 7265 7374 2061 7267 7329 v #[(&rest args) │ │ │ +0000e690: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000e6a0: 435c 6e1b 0918 c7c8 c90b 0843 5c22 4208 C\n........C\"B. │ │ │ +0000e6b0: 452a ca5c 6e42 af05 2a87 2220 5b73 746f E*.\nB..*." [sto │ │ │ +0000e6c0: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +0000e6d0: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +0000e6e0: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +0000e6f0: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +0000e700: 2070 726f 676e 2073 6574 656e 7620 6170 progn setenv ap │ │ │ +0000e710: 7065 6e64 2067 6574 656e 765d 2038 2022 pend getenv] 8 " │ │ │ +0000e720: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +0000e730: 6d62 6461 206c 6973 743a 5c6e 2020 2867 mbda list:\n (g │ │ │ +0000e740: 6574 656e 7620 2672 6573 7420 4152 4753 etenv &rest ARGS │ │ │ +0000e750: 295c 6e5c 6e22 5d20 6765 742d 7265 6769 )\n\n"] get-regi │ │ │ +0000e760: 7374 6572 2023 5b28 2672 6573 7420 6172 ster #[(&rest ar │ │ │ +0000e770: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ +0000e780: 6e0b 0943 5c6e 1b09 18c7 c80b 0843 5c22 n..C\n.......C\" │ │ │ +0000e790: 2a42 c95c 6e42 af05 2a87 2220 5b73 746f *B.\nB..*." [sto │ │ │ +0000e7a0: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +0000e7b0: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +0000e7c0: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +0000e7d0: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +0000e7e0: 2073 6574 2d72 6567 6973 7465 7220 6170 set-register ap │ │ │ +0000e7f0: 7065 6e64 2067 6574 2d72 6567 6973 7465 pend get-registe │ │ │ +0000e800: 725d 2037 2022 5c6e 436f 6d6d 6f6e 204c r] 7 "\nCommon L │ │ │ +0000e810: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +0000e820: 5c6e 2020 2867 6574 2d72 6567 6973 7465 \n (get-registe │ │ │ +0000e830: 7220 2672 6573 7420 4152 4753 295c 6e5c r &rest ARGS)\n\ │ │ │ +0000e840: 6e22 5d20 676c 6f62 616c 2d6b 6579 2d62 n"] global-key-b │ │ │ +0000e850: 696e 6469 6e67 2023 5b28 2672 6573 7420 inding #[(&rest │ │ │ +0000e860: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ +0000e870: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ +0000e880: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ +0000e890: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ +0000e8a0: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ +0000e8b0: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ +0000e8c0: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ +0000e8d0: 2d22 2067 6c6f 6261 6c2d 7365 742d 6b65 -" global-set-ke │ │ │ +0000e8e0: 7920 6170 7065 6e64 2067 6c6f 6261 6c2d y append global- │ │ │ +0000e8f0: 6b65 792d 6269 6e64 696e 675d 2037 2022 key-binding] 7 " │ │ │ +0000e900: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +0000e910: 6d62 6461 206c 6973 743a 5c6e 2020 2867 mbda list:\n (g │ │ │ +0000e920: 6c6f 6261 6c2d 6b65 792d 6269 6e64 696e lobal-key-bindin │ │ │ +0000e930: 6720 2672 6573 7420 4152 4753 295c 6e5c g &rest ARGS)\n\ │ │ │ +0000e940: 6e22 5d20 6b65 796d 6170 2d70 6172 656e n"] keymap-paren │ │ │ +0000e950: 7420 235b 2826 7265 7374 2061 7267 7329 t #[(&rest args) │ │ │ +0000e960: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000e970: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ +0000e980: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +0000e990: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +0000e9a0: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +0000e9b0: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +0000e9c0: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ +0000e9d0: 742d 6b65 796d 6170 2d70 6172 656e 7420 t-keymap-parent │ │ │ +0000e9e0: 6170 7065 6e64 206b 6579 6d61 702d 7061 append keymap-pa │ │ │ +0000e9f0: 7265 6e74 5d20 3720 225c 6e43 6f6d 6d6f rent] 7 "\nCommo │ │ │ +0000ea00: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ +0000ea10: 7374 3a5c 6e20 2028 6b65 796d 6170 2d70 st:\n (keymap-p │ │ │ +0000ea20: 6172 656e 7420 2672 6573 7420 4152 4753 arent &rest ARGS │ │ │ +0000ea30: 295c 6e5c 6e22 5d20 6b65 796d 6170 2d6e )\n\n"] keymap-n │ │ │ +0000ea40: 616d 6520 235b 2826 7265 7374 2061 7267 ame #[(&rest arg │ │ │ +0000ea50: 7329 2022 c4c5 0b5c 221a c5c6 2119 5c6e s) "...\"...!.\n │ │ │ +0000ea60: 0b09 435c 6e1b 0918 c7c8 0b08 435c 222a ..C\n.......C\"* │ │ │ +0000ea70: 42c9 5c6e 42af 052a 8722 205b 7374 6f72 B.\nB..*." [stor │ │ │ +0000ea80: 6520 2d2d 7374 6f72 652d 2d74 656d 702d e --store--temp- │ │ │ +0000ea90: 2d20 2d2d 6172 6773 2d2d 7465 6d70 2d2d - --args--temp-- │ │ │ +0000eaa0: 2061 7267 7320 6d61 7063 6172 2067 656e args mapcar gen │ │ │ +0000eab0: 7379 6d20 222d 2d73 746f 7265 2d2d 2220 sym "--store--" │ │ │ +0000eac0: 7365 742d 6b65 796d 6170 2d6e 616d 6520 set-keymap-name │ │ │ +0000ead0: 6170 7065 6e64 206b 6579 6d61 702d 6e61 append keymap-na │ │ │ +0000eae0: 6d65 5d20 3720 225c 6e43 6f6d 6d6f 6e20 me] 7 "\nCommon │ │ │ +0000eaf0: 4c69 7370 206c 616d 6264 6120 6c69 7374 Lisp lambda list │ │ │ +0000eb00: 3a5c 6e20 2028 6b65 796d 6170 2d6e 616d :\n (keymap-nam │ │ │ +0000eb10: 6520 2672 6573 7420 4152 4753 295c 6e5c e &rest ARGS)\n\ │ │ │ +0000eb20: 6e22 5d20 6b65 796d 6170 2d70 726f 6d70 n"] keymap-promp │ │ │ +0000eb30: 7420 235b 2826 7265 7374 2061 7267 7329 t #[(&rest args) │ │ │ +0000eb40: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000eb50: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ +0000eb60: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +0000eb70: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +0000eb80: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +0000eb90: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +0000eba0: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ +0000ebb0: 742d 6b65 796d 6170 2d70 726f 6d70 7420 t-keymap-prompt │ │ │ +0000ebc0: 6170 7065 6e64 206b 6579 6d61 702d 7072 append keymap-pr │ │ │ +0000ebd0: 6f6d 7074 5d20 3720 225c 6e43 6f6d 6d6f ompt] 7 "\nCommo │ │ │ +0000ebe0: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ +0000ebf0: 7374 3a5c 6e20 2028 6b65 796d 6170 2d70 st:\n (keymap-p │ │ │ +0000ec00: 726f 6d70 7420 2672 6573 7420 4152 4753 rompt &rest ARGS │ │ │ +0000ec10: 295c 6e5c 6e22 5d20 6b65 796d 6170 2d64 )\n\n"] keymap-d │ │ │ +0000ec20: 6566 6175 6c74 2d62 696e 6469 6e67 2023 efault-binding # │ │ │ +0000ec30: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ +0000ec40: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ +0000ec50: 1b09 18c7 c80b 0843 5c22 2a42 c95c 6e42 .......C\"*B.\nB │ │ │ +0000ec60: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ +0000ec70: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ +0000ec80: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ +0000ec90: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ +0000eca0: 2d2d 7374 6f72 652d 2d22 2073 6574 2d6b --store--" set-k │ │ │ +0000ecb0: 6579 6d61 702d 6465 6661 756c 742d 6269 eymap-default-bi │ │ │ +0000ecc0: 6e64 696e 6720 6170 7065 6e64 206b 6579 nding append key │ │ │ +0000ecd0: 6d61 702d 6465 6661 756c 742d 6269 6e64 map-default-bind │ │ │ +0000ece0: 696e 675d 2037 2022 5c6e 436f 6d6d 6f6e ing] 7 "\nCommon │ │ │ +0000ecf0: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +0000ed00: 743a 5c6e 2020 286b 6579 6d61 702d 6465 t:\n (keymap-de │ │ │ +0000ed10: 6661 756c 742d 6269 6e64 696e 6720 2672 fault-binding &r │ │ │ +0000ed20: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ +0000ed30: 6c6f 6361 6c2d 6b65 792d 6269 6e64 696e local-key-bindin │ │ │ +0000ed40: 6720 235b 2826 7265 7374 2061 7267 7329 g #[(&rest args) │ │ │ +0000ed50: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000ed60: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ +0000ed70: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +0000ed80: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +0000ed90: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +0000eda0: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +0000edb0: 6d20 222d 2d73 746f 7265 2d2d 2220 6c6f m "--store--" lo │ │ │ +0000edc0: 6361 6c2d 7365 742d 6b65 7920 6170 7065 cal-set-key appe │ │ │ +0000edd0: 6e64 206c 6f63 616c 2d6b 6579 2d62 696e nd local-key-bin │ │ │ +0000ede0: 6469 6e67 5d20 3720 225c 6e43 6f6d 6d6f ding] 7 "\nCommo │ │ │ +0000edf0: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ +0000ee00: 7374 3a5c 6e20 2028 6c6f 6361 6c2d 6b65 st:\n (local-ke │ │ │ +0000ee10: 792d 6269 6e64 696e 6720 2672 6573 7420 y-binding &rest │ │ │ +0000ee20: 4152 4753 295c 6e5c 6e22 5d20 6d61 726b ARGS)\n\n"] mark │ │ │ +0000ee30: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ +0000ee40: 22c4 c50b 5c22 1ac5 c621 195c 6e0b 0943 "...\"...!.\n..C │ │ │ +0000ee50: 5c6e 1b09 18c7 c8c9 0b08 435c 2242 0845 \n........C\"B.E │ │ │ +0000ee60: 2aca 5c6e 42af 052a 8722 205b 7374 6f72 *.\nB..*." [stor │ │ │ +0000ee70: 6520 2d2d 7374 6f72 652d 2d74 656d 702d e --store--temp- │ │ │ +0000ee80: 2d20 2d2d 6172 6773 2d2d 7465 6d70 2d2d - --args--temp-- │ │ │ +0000ee90: 2061 7267 7320 6d61 7063 6172 2067 656e args mapcar gen │ │ │ +0000eea0: 7379 6d20 222d 2d73 746f 7265 2d2d 2220 sym "--store--" │ │ │ +0000eeb0: 7072 6f67 6e20 7365 742d 6d61 726b 2061 progn set-mark a │ │ │ +0000eec0: 7070 656e 6420 6d61 726b 5d20 3820 225c ppend mark] 8 "\ │ │ │ +0000eed0: 6e43 6f6d 6d6f 6e20 4c69 7370 206c 616d nCommon Lisp lam │ │ │ +0000eee0: 6264 6120 6c69 7374 3a5c 6e20 2028 6d61 bda list:\n (ma │ │ │ +0000eef0: 726b 2026 7265 7374 2041 5247 5329 5c6e rk &rest ARGS)\n │ │ │ +0000ef00: 5c6e 225d 206d 6172 6b2d 6d61 726b 6572 \n"] mark-marker │ │ │ +0000ef10: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ +0000ef20: 22c4 c50b 5c22 1ac5 c621 195c 6e0b 0943 "...\"...!.\n..C │ │ │ +0000ef30: 5c6e 1b09 18c7 c8c9 0b08 435c 2242 0845 \n........C\"B.E │ │ │ +0000ef40: 2aca 5c6e 42af 052a 8722 205b 7374 6f72 *.\nB..*." [stor │ │ │ +0000ef50: 6520 2d2d 7374 6f72 652d 2d74 656d 702d e --store--temp- │ │ │ +0000ef60: 2d20 2d2d 6172 6773 2d2d 7465 6d70 2d2d - --args--temp-- │ │ │ +0000ef70: 2061 7267 7320 6d61 7063 6172 2067 656e args mapcar gen │ │ │ +0000ef80: 7379 6d20 222d 2d73 746f 7265 2d2d 2220 sym "--store--" │ │ │ +0000ef90: 7072 6f67 6e20 7365 742d 6d61 726b 2061 progn set-mark a │ │ │ +0000efa0: 7070 656e 6420 6d61 726b 2d6d 6172 6b65 ppend mark-marke │ │ │ +0000efb0: 725d 2038 2022 5c6e 436f 6d6d 6f6e 204c r] 8 "\nCommon L │ │ │ +0000efc0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +0000efd0: 5c6e 2020 286d 6172 6b2d 6d61 726b 6572 \n (mark-marker │ │ │ +0000efe0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +0000eff0: 225d 206d 6172 6b65 722d 706f 7369 7469 "] marker-positi │ │ │ +0000f000: 6f6e 2023 5b28 2672 6573 7420 6172 6773 on #[(&rest args │ │ │ +0000f010: 2920 22c4 c50b 5c22 1ac5 c621 195c 6e0b ) "...\"...!.\n. │ │ │ +0000f020: 0943 5c6e 1b09 18c7 c8c9 0b08 435c 2242 .C\n........C\"B │ │ │ +0000f030: 0845 2aca 5c6e 42af 052a 8722 205b 7374 .E*.\nB..*." [st │ │ │ +0000f040: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ +0000f050: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ +0000f060: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ +0000f070: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ +0000f080: 2220 7072 6f67 6e20 7365 742d 6d61 726b " progn set-mark │ │ │ +0000f090: 6572 2061 7070 656e 6420 6d61 726b 6572 er append marker │ │ │ +0000f0a0: 2d70 6f73 6974 696f 6e5d 2038 2022 5c6e -position] 8 "\n │ │ │ +0000f0b0: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +0000f0c0: 6461 206c 6973 743a 5c6e 2020 286d 6172 da list:\n (mar │ │ │ +0000f0d0: 6b65 722d 706f 7369 7469 6f6e 2026 7265 ker-position &re │ │ │ +0000f0e0: 7374 2041 5247 5329 5c6e 5c6e 225d 206d st ARGS)\n\n"] m │ │ │ +0000f0f0: 6174 6368 2d64 6174 6120 235b 2826 7265 atch-data #[(&re │ │ │ +0000f100: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ +0000f110: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ +0000f120: c90b 0843 5c22 4208 452a ca5c 6e42 af05 ...C\"B.E*.\nB.. │ │ │ +0000f130: 2a87 2220 5b73 746f 7265 202d 2d73 746f *." [store --sto │ │ │ +0000f140: 7265 2d2d 7465 6d70 2d2d 202d 2d61 7267 re--temp-- --arg │ │ │ +0000f150: 732d 2d74 656d 702d 2d20 6172 6773 206d s--temp-- args m │ │ │ +0000f160: 6170 6361 7220 6765 6e73 796d 2022 2d2d apcar gensym "-- │ │ │ +0000f170: 7374 6f72 652d 2d22 2070 726f 676e 2073 store--" progn s │ │ │ +0000f180: 746f 7265 2d6d 6174 6368 2d64 6174 6120 tore-match-data │ │ │ +0000f190: 6170 7065 6e64 206d 6174 6368 2d64 6174 append match-dat │ │ │ +0000f1a0: 615d 2038 2022 5c6e 436f 6d6d 6f6e 204c a] 8 "\nCommon L │ │ │ +0000f1b0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +0000f1c0: 5c6e 2020 286d 6174 6368 2d64 6174 6120 \n (match-data │ │ │ +0000f1d0: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ +0000f1e0: 5d20 6d6f 7573 652d 706f 7369 7469 6f6e ] mouse-position │ │ │ +0000f1f0: 2023 5b28 7363 7229 2022 c4c5 211b c4c6 #[(scr) "..!... │ │ │ +0000f200: 2119 0b43 0843 0943 0b18 091a c708 c85c !..C.C.C.......\ │ │ │ +0000f210: 6e44 c95c 6e44 ca5c 6e44 af05 2acb 0b44 nD.\nD.\nD..*..D │ │ │ +0000f220: af05 2a87 2220 5b73 6372 202d 2d73 746f ..*." [scr --sto │ │ │ +0000f230: 7265 2d2d 7465 6d70 2d2d 2073 746f 7265 re--temp-- store │ │ │ +0000f240: 202d 2d73 6372 2d2d 7465 6d70 2d2d 2067 --scr--temp-- g │ │ │ +0000f250: 656e 7379 6d20 222d 2d73 6372 2d2d 2220 ensym "--scr--" │ │ │ +0000f260: 222d 2d73 746f 7265 2d2d 2220 7365 742d "--store--" set- │ │ │ +0000f270: 6d6f 7573 652d 706f 7369 7469 6f6e 2063 mouse-position c │ │ │ +0000f280: 6172 2063 6164 7220 6364 6472 206d 6f75 ar cadr cddr mou │ │ │ +0000f290: 7365 2d70 6f73 6974 696f 6e5d 2039 2022 se-position] 9 " │ │ │ +0000f2a0: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +0000f2b0: 6d62 6461 206c 6973 743a 5c6e 2020 286d mbda list:\n (m │ │ │ +0000f2c0: 6f75 7365 2d70 6f73 6974 696f 6e20 5343 ouse-position SC │ │ │ +0000f2d0: 5229 5c6e 5c6e 225d 206f 7665 726c 6179 R)\n\n"] overlay │ │ │ +0000f2e0: 2d67 6574 2023 5b28 2672 6573 7420 6172 -get #[(&rest ar │ │ │ +0000f2f0: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ +0000f300: 6e0b 0943 5c6e 1b09 18c7 c80b 0843 5c22 n..C\n.......C\" │ │ │ +0000f310: 2a42 c95c 6e42 af05 2a87 2220 5b73 746f *B.\nB..*." [sto │ │ │ +0000f320: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +0000f330: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +0000f340: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +0000f350: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +0000f360: 206f 7665 726c 6179 2d70 7574 2061 7070 overlay-put app │ │ │ +0000f370: 656e 6420 6f76 6572 6c61 792d 6765 745d end overlay-get] │ │ │ +0000f380: 2037 2022 5c6e 436f 6d6d 6f6e 204c 6973 7 "\nCommon Lis │ │ │ +0000f390: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ +0000f3a0: 2020 286f 7665 726c 6179 2d67 6574 2026 (overlay-get & │ │ │ +0000f3b0: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +0000f3c0: 206f 7665 726c 6179 2d73 7461 7274 2023 overlay-start # │ │ │ +0000f3d0: 5b28 6f76 2920 22c4 c521 1bc4 c621 190b [(ov) "..!...!.. │ │ │ +0000f3e0: 435c 6e43 0943 0b1a 0918 c7c8 5c6e 08c9 C\nC.C......\n.. │ │ │ +0000f3f0: 5c6e 4446 0845 2aca 0b44 af05 2a87 2220 \nDF.E*..D..*." │ │ │ +0000f400: 5b73 746f 7265 202d 2d73 746f 7265 2d2d [store --store-- │ │ │ +0000f410: 7465 6d70 2d2d 206f 7620 2d2d 6f76 2d2d temp-- ov --ov-- │ │ │ +0000f420: 7465 6d70 2d2d 2067 656e 7379 6d20 222d temp-- gensym "- │ │ │ +0000f430: 2d6f 762d 2d22 2022 2d2d 7374 6f72 652d -ov--" "--store- │ │ │ +0000f440: 2d22 2070 726f 676e 206d 6f76 652d 6f76 -" progn move-ov │ │ │ +0000f450: 6572 6c61 7920 6f76 6572 6c61 792d 656e erlay overlay-en │ │ │ +0000f460: 6420 6f76 6572 6c61 792d 7374 6172 745d d overlay-start] │ │ │ +0000f470: 2039 2022 5c6e 436f 6d6d 6f6e 204c 6973 9 "\nCommon Lis │ │ │ +0000f480: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ +0000f490: 2020 286f 7665 726c 6179 2d73 7461 7274 (overlay-start │ │ │ +0000f4a0: 204f 5629 5c6e 5c6e 225d 206f 7665 726c OV)\n\n"] overl │ │ │ +0000f4b0: 6179 2d65 6e64 2023 5b28 6f76 2920 22c4 ay-end #[(ov) ". │ │ │ +0000f4c0: c521 1bc4 c621 190b 435c 6e43 0943 0b1a .!...!..C\nC.C.. │ │ │ +0000f4d0: 0918 c7c8 5c6e c95c 6e44 0846 0845 2aca ....\n.\nD.F.E*. │ │ │ +0000f4e0: 0b44 af05 2a87 2220 5b73 746f 7265 202d .D..*." [store - │ │ │ +0000f4f0: 2d73 746f 7265 2d2d 7465 6d70 2d2d 206f -store--temp-- o │ │ │ +0000f500: 7620 2d2d 6f76 2d2d 7465 6d70 2d2d 2067 v --ov--temp-- g │ │ │ +0000f510: 656e 7379 6d20 222d 2d6f 762d 2d22 2022 ensym "--ov--" " │ │ │ +0000f520: 2d2d 7374 6f72 652d 2d22 2070 726f 676e --store--" progn │ │ │ +0000f530: 206d 6f76 652d 6f76 6572 6c61 7920 6f76 move-overlay ov │ │ │ +0000f540: 6572 6c61 792d 7374 6172 7420 6f76 6572 erlay-start over │ │ │ +0000f550: 6c61 792d 656e 645d 2038 2022 5c6e 436f lay-end] 8 "\nCo │ │ │ +0000f560: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ +0000f570: 206c 6973 743a 5c6e 2020 286f 7665 726c list:\n (overl │ │ │ +0000f580: 6179 2d65 6e64 204f 5629 5c6e 5c6e 225d ay-end OV)\n\n"] │ │ │ +0000f590: 2070 6f69 6e74 2023 5b28 2672 6573 7420 point #[(&rest │ │ │ +0000f5a0: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ +0000f5b0: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ +0000f5c0: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ +0000f5d0: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ +0000f5e0: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ +0000f5f0: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ +0000f600: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ +0000f610: 2d22 2067 6f74 6f2d 6368 6172 2061 7070 -" goto-char app │ │ │ +0000f620: 656e 6420 706f 696e 745d 2037 2022 5c6e end point] 7 "\n │ │ │ +0000f630: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +0000f640: 6461 206c 6973 743a 5c6e 2020 2870 6f69 da list:\n (poi │ │ │ +0000f650: 6e74 2026 7265 7374 2041 5247 5329 5c6e nt &rest ARGS)\n │ │ │ +0000f660: 5c6e 225d 2070 6f69 6e74 2d6d 6172 6b65 \n"] point-marke │ │ │ +0000f670: 7220 235b 2826 7265 7374 2061 7267 7329 r #[(&rest args) │ │ │ +0000f680: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000f690: 435c 6e1b 0918 c7c8 c90b 0843 5c22 4208 C\n........C\"B. │ │ │ +0000f6a0: 452a ca5c 6e42 af05 2a87 2220 5b73 746f E*.\nB..*." [sto │ │ │ +0000f6b0: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +0000f6c0: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +0000f6d0: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +0000f6e0: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +0000f6f0: 2070 726f 676e 2067 6f74 6f2d 6368 6172 progn goto-char │ │ │ +0000f700: 2061 7070 656e 6420 706f 696e 742d 6d61 append point-ma │ │ │ +0000f710: 726b 6572 5d20 3820 225c 6e43 6f6d 6d6f rker] 8 "\nCommo │ │ │ +0000f720: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ +0000f730: 7374 3a5c 6e20 2028 706f 696e 742d 6d61 st:\n (point-ma │ │ │ +0000f740: 726b 6572 2026 7265 7374 2041 5247 5329 rker &rest ARGS) │ │ │ +0000f750: 5c6e 5c6e 225d 2070 6f69 6e74 2d6d 6178 \n\n"] point-max │ │ │ +0000f760: 2023 5b6e 696c 2022 c2c3 2119 c489 0943 #[nil "..!....C │ │ │ +0000f770: 0918 c5c6 c708 4508 4529 c843 af05 2987 ......E.E).C..). │ │ │ +0000f780: 2220 5b73 746f 7265 202d 2d73 746f 7265 " [store --store │ │ │ +0000f790: 2d2d 7465 6d70 2d2d 2067 656e 7379 6d20 --temp-- gensym │ │ │ +0000f7a0: 222d 2d73 746f 7265 2d2d 2220 6e69 6c20 "--store--" nil │ │ │ +0000f7b0: 7072 6f67 6e20 6e61 7272 6f77 2d74 6f2d progn narrow-to- │ │ │ +0000f7c0: 7265 6769 6f6e 2028 706f 696e 742d 6d69 region (point-mi │ │ │ +0000f7d0: 6e29 2070 6f69 6e74 2d6d 6178 5d20 3720 n) point-max] 7 │ │ │ +0000f7e0: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ +0000f7f0: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ +0000f800: 706f 696e 742d 6d61 7829 5c6e 5c6e 225d point-max)\n\n"] │ │ │ +0000f810: 2070 6f69 6e74 2d6d 696e 2023 5b6e 696c point-min #[nil │ │ │ +0000f820: 2022 c2c3 2119 c489 0943 0918 c5c6 08c7 "..!....C...... │ │ │ +0000f830: 4508 4529 c843 af05 2987 2220 5b73 746f E.E).C..)." [sto │ │ │ +0000f840: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +0000f850: 2d2d 2067 656e 7379 6d20 222d 2d73 746f -- gensym "--sto │ │ │ +0000f860: 7265 2d2d 2220 6e69 6c20 7072 6f67 6e20 re--" nil progn │ │ │ +0000f870: 6e61 7272 6f77 2d74 6f2d 7265 6769 6f6e narrow-to-region │ │ │ +0000f880: 2028 706f 696e 742d 6d61 7829 2070 6f69 (point-max) poi │ │ │ +0000f890: 6e74 2d6d 696e 5d20 3720 225c 6e43 6f6d nt-min] 7 "\nCom │ │ │ +0000f8a0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +0000f8b0: 6c69 7374 3a5c 6e20 2028 706f 696e 742d list:\n (point- │ │ │ +0000f8c0: 6d69 6e29 5c6e 5c6e 225d 2070 726f 6365 min)\n\n"] proce │ │ │ +0000f8d0: 7373 2d62 7566 6665 7220 235b 2826 7265 ss-buffer #[(&re │ │ │ +0000f8e0: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ +0000f8f0: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ +0000f900: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ +0000f910: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ +0000f920: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ +0000f930: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ +0000f940: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ +0000f950: 7265 2d2d 2220 7365 742d 7072 6f63 6573 re--" set-proces │ │ │ +0000f960: 732d 6275 6666 6572 2061 7070 656e 6420 s-buffer append │ │ │ +0000f970: 7072 6f63 6573 732d 6275 6666 6572 5d20 process-buffer] │ │ │ +0000f980: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ +0000f990: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +0000f9a0: 2028 7072 6f63 6573 732d 6275 6666 6572 (process-buffer │ │ │ +0000f9b0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +0000f9c0: 225d 2070 726f 6365 7373 2d66 696c 7465 "] process-filte │ │ │ +0000f9d0: 7220 235b 2826 7265 7374 2061 7267 7329 r #[(&rest args) │ │ │ +0000f9e0: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000f9f0: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ +0000fa00: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +0000fa10: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +0000fa20: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +0000fa30: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +0000fa40: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ +0000fa50: 742d 7072 6f63 6573 732d 6669 6c74 6572 t-process-filter │ │ │ +0000fa60: 2061 7070 656e 6420 7072 6f63 6573 732d append process- │ │ │ +0000fa70: 6669 6c74 6572 5d20 3720 225c 6e43 6f6d filter] 7 "\nCom │ │ │ +0000fa80: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +0000fa90: 6c69 7374 3a5c 6e20 2028 7072 6f63 6573 list:\n (proces │ │ │ +0000faa0: 732d 6669 6c74 6572 2026 7265 7374 2041 s-filter &rest A │ │ │ +0000fab0: 5247 5329 5c6e 5c6e 225d 2070 726f 6365 RGS)\n\n"] proce │ │ │ +0000fac0: 7373 2d73 656e 7469 6e65 6c20 235b 2826 ss-sentinel #[(& │ │ │ +0000fad0: 7265 7374 2061 7267 7329 2022 c4c5 0b5c rest args) "...\ │ │ │ +0000fae0: 221a c5c6 2119 5c6e 0b09 435c 6e1b 0918 "...!.\n..C\n... │ │ │ +0000faf0: c7c8 0b08 435c 222a 42c9 5c6e 42af 052a ....C\"*B.\nB..* │ │ │ +0000fb00: 8722 205b 7374 6f72 6520 2d2d 7374 6f72 ." [store --stor │ │ │ +0000fb10: 652d 2d74 656d 702d 2d20 2d2d 6172 6773 e--temp-- --args │ │ │ +0000fb20: 2d2d 7465 6d70 2d2d 2061 7267 7320 6d61 --temp-- args ma │ │ │ +0000fb30: 7063 6172 2067 656e 7379 6d20 222d 2d73 pcar gensym "--s │ │ │ +0000fb40: 746f 7265 2d2d 2220 7365 742d 7072 6f63 tore--" set-proc │ │ │ +0000fb50: 6573 732d 7365 6e74 696e 656c 2061 7070 ess-sentinel app │ │ │ +0000fb60: 656e 6420 7072 6f63 6573 732d 7365 6e74 end process-sent │ │ │ +0000fb70: 696e 656c 5d20 3720 225c 6e43 6f6d 6d6f inel] 7 "\nCommo │ │ │ +0000fb80: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ +0000fb90: 7374 3a5c 6e20 2028 7072 6f63 6573 732d st:\n (process- │ │ │ +0000fba0: 7365 6e74 696e 656c 2026 7265 7374 2041 sentinel &rest A │ │ │ +0000fbb0: 5247 5329 5c6e 5c6e 225d 2072 6561 642d RGS)\n\n"] read- │ │ │ +0000fbc0: 6d6f 7573 652d 706f 7369 7469 6f6e 2023 mouse-position # │ │ │ +0000fbd0: 5b28 7363 7229 2022 c4c5 211b c4c6 211a [(scr) "..!...!. │ │ │ +0000fbe0: 0b43 0943 5c6e 430b 195c 6e18 c709 c808 .C.C\nC..\n..... │ │ │ +0000fbf0: 44c9 0844 462a ca0b 44af 052a 8722 205b D..DF*..D..*." [ │ │ │ +0000fc00: 7374 6f72 6520 7363 7220 2d2d 7374 6f72 store scr --stor │ │ │ +0000fc10: 652d 2d74 656d 702d 2d20 2d2d 7363 722d e--temp-- --scr- │ │ │ +0000fc20: 2d74 656d 702d 2d20 6765 6e73 796d 2022 -temp-- gensym " │ │ │ +0000fc30: 2d2d 7363 722d 2d22 2022 2d2d 7374 6f72 --scr--" "--stor │ │ │ +0000fc40: 652d 2d22 2073 6574 2d6d 6f75 7365 2d70 e--" set-mouse-p │ │ │ +0000fc50: 6f73 6974 696f 6e20 6361 7220 6364 7220 osition car cdr │ │ │ +0000fc60: 7265 6164 2d6d 6f75 7365 2d70 6f73 6974 read-mouse-posit │ │ │ +0000fc70: 696f 6e5d 2038 2022 5c6e 436f 6d6d 6f6e ion] 8 "\nCommon │ │ │ +0000fc80: 204c 6973 7020 6c61 6d62 6461 206c 6973 Lisp lambda lis │ │ │ +0000fc90: 743a 5c6e 2020 2872 6561 642d 6d6f 7573 t:\n (read-mous │ │ │ +0000fca0: 652d 706f 7369 7469 6f6e 2053 4352 295c e-position SCR)\ │ │ │ +0000fcb0: 6e5c 6e22 5d20 7365 6c65 6374 6564 2d77 n\n"] selected-w │ │ │ +0000fcc0: 696e 646f 7720 235b 2826 7265 7374 2061 indow #[(&rest a │ │ │ +0000fcd0: 7267 7329 2022 c4c5 0b5c 221a c5c6 2119 rgs) "...\"...!. │ │ │ +0000fce0: 5c6e 0b09 435c 6e1b 0918 c7c8 0b08 435c \n..C\n.......C\ │ │ │ +0000fcf0: 222a 42c9 5c6e 42af 052a 8722 205b 7374 "*B.\nB..*." [st │ │ │ +0000fd00: 6f72 6520 2d2d 7374 6f72 652d 2d74 656d ore --store--tem │ │ │ +0000fd10: 702d 2d20 2d2d 6172 6773 2d2d 7465 6d70 p-- --args--temp │ │ │ +0000fd20: 2d2d 2061 7267 7320 6d61 7063 6172 2067 -- args mapcar g │ │ │ +0000fd30: 656e 7379 6d20 222d 2d73 746f 7265 2d2d ensym "--store-- │ │ │ +0000fd40: 2220 7365 6c65 6374 2d77 696e 646f 7720 " select-window │ │ │ +0000fd50: 6170 7065 6e64 2073 656c 6563 7465 642d append selected- │ │ │ +0000fd60: 7769 6e64 6f77 5d20 3720 225c 6e43 6f6d window] 7 "\nCom │ │ │ +0000fd70: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +0000fd80: 6c69 7374 3a5c 6e20 2028 7365 6c65 6374 list:\n (select │ │ │ +0000fd90: 6564 2d77 696e 646f 7720 2672 6573 7420 ed-window &rest │ │ │ +0000fda0: 4152 4753 295c 6e5c 6e22 5d20 7365 6c65 ARGS)\n\n"] sele │ │ │ +0000fdb0: 6374 6564 2d66 7261 6d65 2023 5b28 2672 cted-frame #[(&r │ │ │ +0000fdc0: 6573 7420 6172 6773 2920 22c4 c50b 5c22 est args) "...\" │ │ │ +0000fdd0: 1ac5 c621 195c 6e0b 0943 5c6e 1b09 18c7 ...!.\n..C\n.... │ │ │ +0000fde0: c80b 0843 5c22 2a42 c95c 6e42 af05 2a87 ...C\"*B.\nB..*. │ │ │ +0000fdf0: 2220 5b73 746f 7265 202d 2d73 746f 7265 " [store --store │ │ │ +0000fe00: 2d2d 7465 6d70 2d2d 202d 2d61 7267 732d --temp-- --args- │ │ │ +0000fe10: 2d74 656d 702d 2d20 6172 6773 206d 6170 -temp-- args map │ │ │ +0000fe20: 6361 7220 6765 6e73 796d 2022 2d2d 7374 car gensym "--st │ │ │ +0000fe30: 6f72 652d 2d22 2073 656c 6563 742d 6672 ore--" select-fr │ │ │ +0000fe40: 616d 6520 6170 7065 6e64 2073 656c 6563 ame append selec │ │ │ +0000fe50: 7465 642d 6672 616d 655d 2037 2022 5c6e ted-frame] 7 "\n │ │ │ +0000fe60: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +0000fe70: 6461 206c 6973 743a 5c6e 2020 2873 656c da list:\n (sel │ │ │ +0000fe80: 6563 7465 642d 6672 616d 6520 2672 6573 ected-frame &res │ │ │ +0000fe90: 7420 4152 4753 295c 6e5c 6e22 5d20 7374 t ARGS)\n\n"] st │ │ │ +0000fea0: 616e 6461 7264 2d63 6173 652d 7461 626c andard-case-tabl │ │ │ +0000feb0: 6520 235b 2826 7265 7374 2061 7267 7329 e #[(&rest args) │ │ │ +0000fec0: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +0000fed0: 435c 6e1b 0918 c7c8 0b08 435c 222a 42c9 C\n.......C\"*B. │ │ │ +0000fee0: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +0000fef0: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +0000ff00: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +0000ff10: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +0000ff20: 6d20 222d 2d73 746f 7265 2d2d 2220 7365 m "--store--" se │ │ │ +0000ff30: 742d 7374 616e 6461 7264 2d63 6173 652d t-standard-case- │ │ │ +0000ff40: 7461 626c 6520 6170 7065 6e64 2073 7461 table append sta │ │ │ +0000ff50: 6e64 6172 642d 6361 7365 2d74 6162 6c65 ndard-case-table │ │ │ +0000ff60: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ +0000ff70: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ +0000ff80: 6e20 2028 7374 616e 6461 7264 2d63 6173 n (standard-cas │ │ │ +0000ff90: 652d 7461 626c 6520 2672 6573 7420 4152 e-table &rest AR │ │ │ +0000ffa0: 4753 295c 6e5c 6e22 5d20 7379 6e74 6178 GS)\n\n"] syntax │ │ │ +0000ffb0: 2d74 6162 6c65 2023 5b28 2672 6573 7420 -table #[(&rest │ │ │ +0000ffc0: 6172 6773 2920 22c4 c50b 5c22 1ac5 c621 args) "...\"...! │ │ │ +0000ffd0: 195c 6e0b 0943 5c6e 1b09 18c7 c80b 0843 .\n..C\n.......C │ │ │ +0000ffe0: 5c22 2a42 c95c 6e42 af05 2a87 2220 5b73 \"*B.\nB..*." [s │ │ │ +0000fff0: 746f 7265 202d 2d73 746f 7265 2d2d 7465 tore --store--te │ │ │ +00010000: 6d70 2d2d 202d 2d61 7267 732d 2d74 656d mp-- --args--tem │ │ │ +00010010: 702d 2d20 6172 6773 206d 6170 6361 7220 p-- args mapcar │ │ │ +00010020: 6765 6e73 796d 2022 2d2d 7374 6f72 652d gensym "--store- │ │ │ +00010030: 2d22 2073 6574 2d73 796e 7461 782d 7461 -" set-syntax-ta │ │ │ +00010040: 626c 6520 6170 7065 6e64 2073 796e 7461 ble append synta │ │ │ +00010050: 782d 7461 626c 655d 2037 2022 5c6e 436f x-table] 7 "\nCo │ │ │ +00010060: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ +00010070: 206c 6973 743a 5c6e 2020 2873 796e 7461 list:\n (synta │ │ │ +00010080: 782d 7461 626c 6520 2672 6573 7420 4152 x-table &rest AR │ │ │ +00010090: 4753 295c 6e5c 6e22 5d20 7669 7369 7465 GS)\n\n"] visite │ │ │ +000100a0: 642d 6669 6c65 2d6d 6f64 7469 6d65 2023 d-file-modtime # │ │ │ +000100b0: 5b28 2672 6573 7420 6172 6773 2920 22c4 [(&rest args) ". │ │ │ +000100c0: c50b 5c22 1ac5 c621 195c 6e0b 0943 5c6e ..\"...!.\n..C\n │ │ │ +000100d0: 1b09 18c7 c8c9 0b08 435c 2242 0845 2aca ........C\"B.E*. │ │ │ +000100e0: 5c6e 42af 052a 8722 205b 7374 6f72 6520 \nB..*." [store │ │ │ +000100f0: 2d2d 7374 6f72 652d 2d74 656d 702d 2d20 --store--temp-- │ │ │ +00010100: 2d2d 6172 6773 2d2d 7465 6d70 2d2d 2061 --args--temp-- a │ │ │ +00010110: 7267 7320 6d61 7063 6172 2067 656e 7379 rgs mapcar gensy │ │ │ +00010120: 6d20 222d 2d73 746f 7265 2d2d 2220 7072 m "--store--" pr │ │ │ +00010130: 6f67 6e20 7365 742d 7669 7369 7465 642d ogn set-visited- │ │ │ +00010140: 6669 6c65 2d6d 6f64 7469 6d65 2061 7070 file-modtime app │ │ │ +00010150: 656e 6420 7669 7369 7465 642d 6669 6c65 end visited-file │ │ │ +00010160: 2d6d 6f64 7469 6d65 5d20 3820 225c 6e43 -modtime] 8 "\nC │ │ │ +00010170: 6f6d 6d6f 6e20 4c69 7370 206c 616d 6264 ommon Lisp lambd │ │ │ +00010180: 6120 6c69 7374 3a5c 6e20 2028 7669 7369 a list:\n (visi │ │ │ +00010190: 7465 642d 6669 6c65 2d6d 6f64 7469 6d65 ted-file-modtime │ │ │ +000101a0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +000101b0: 225d 2077 696e 646f 772d 6275 6666 6572 "] window-buffer │ │ │ +000101c0: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ +000101d0: 22c4 c50b 5c22 1ac5 c621 195c 6e0b 0943 "...\"...!.\n..C │ │ │ +000101e0: 5c6e 1b09 18c7 c8c9 0b08 435c 2242 0845 \n........C\"B.E │ │ │ +000101f0: 2aca 5c6e 42af 052a 8722 205b 7374 6f72 *.\nB..*." [stor │ │ │ +00010200: 6520 2d2d 7374 6f72 652d 2d74 656d 702d e --store--temp- │ │ │ +00010210: 2d20 2d2d 6172 6773 2d2d 7465 6d70 2d2d - --args--temp-- │ │ │ +00010220: 2061 7267 7320 6d61 7063 6172 2067 656e args mapcar gen │ │ │ +00010230: 7379 6d20 222d 2d73 746f 7265 2d2d 2220 sym "--store--" │ │ │ +00010240: 7072 6f67 6e20 7365 742d 7769 6e64 6f77 progn set-window │ │ │ +00010250: 2d62 7566 6665 7220 6170 7065 6e64 2077 -buffer append w │ │ │ +00010260: 696e 646f 772d 6275 6666 6572 5d20 3820 indow-buffer] 8 │ │ │ +00010270: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ +00010280: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ +00010290: 7769 6e64 6f77 2d62 7566 6665 7220 2672 window-buffer &r │ │ │ +000102a0: 6573 7420 4152 4753 295c 6e5c 6e22 5d20 est ARGS)\n\n"] │ │ │ +000102b0: 7769 6e64 6f77 2d64 6973 706c 6179 2d74 window-display-t │ │ │ +000102c0: 6162 6c65 2023 5b28 2672 6573 7420 6172 able #[(&rest ar │ │ │ +000102d0: 6773 2920 22c4 c50b 5c22 1ac5 c621 195c gs) "...\"...!.\ │ │ │ +000102e0: 6e0b 0943 5c6e 1b09 18c7 c8c9 0b08 435c n..C\n........C\ │ │ │ +000102f0: 2242 0845 2aca 5c6e 42af 052a 8722 205b "B.E*.\nB..*." [ │ │ │ +00010300: 7374 6f72 6520 2d2d 7374 6f72 652d 2d74 store --store--t │ │ │ +00010310: 656d 702d 2d20 2d2d 6172 6773 2d2d 7465 emp-- --args--te │ │ │ +00010320: 6d70 2d2d 2061 7267 7320 6d61 7063 6172 mp-- args mapcar │ │ │ +00010330: 2067 656e 7379 6d20 222d 2d73 746f 7265 gensym "--store │ │ │ +00010340: 2d2d 2220 7072 6f67 6e20 7365 742d 7769 --" progn set-wi │ │ │ +00010350: 6e64 6f77 2d64 6973 706c 6179 2d74 6162 ndow-display-tab │ │ │ +00010360: 6c65 2061 7070 656e 6420 7769 6e64 6f77 le append window │ │ │ +00010370: 2d64 6973 706c 6179 2d74 6162 6c65 5d20 -display-table] │ │ │ +00010380: 3820 225c 6e43 6f6d 6d6f 6e20 4c69 7370 8 "\nCommon Lisp │ │ │ +00010390: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +000103a0: 2028 7769 6e64 6f77 2d64 6973 706c 6179 (window-display │ │ │ +000103b0: 2d74 6162 6c65 2026 7265 7374 2041 5247 -table &rest ARG │ │ │ +000103c0: 5329 5c6e 5c6e 225d 2077 696e 646f 772d S)\n\n"] window- │ │ │ +000103d0: 6465 6469 6361 7465 642d 7020 235b 2826 dedicated-p #[(& │ │ │ +000103e0: 7265 7374 2061 7267 7329 2022 c4c5 0b5c rest args) "...\ │ │ │ +000103f0: 221a c5c6 2119 5c6e 0b09 435c 6e1b 0918 "...!.\n..C\n... │ │ │ +00010400: c7c8 c90b 0843 5c22 4208 452a ca5c 6e42 .....C\"B.E*.\nB │ │ │ +00010410: af05 2a87 2220 5b73 746f 7265 202d 2d73 ..*." [store --s │ │ │ +00010420: 746f 7265 2d2d 7465 6d70 2d2d 202d 2d61 tore--temp-- --a │ │ │ +00010430: 7267 732d 2d74 656d 702d 2d20 6172 6773 rgs--temp-- args │ │ │ +00010440: 206d 6170 6361 7220 6765 6e73 796d 2022 mapcar gensym " │ │ │ +00010450: 2d2d 7374 6f72 652d 2d22 2070 726f 676e --store--" progn │ │ │ +00010460: 2073 6574 2d77 696e 646f 772d 6465 6469 set-window-dedi │ │ │ +00010470: 6361 7465 642d 7020 6170 7065 6e64 2077 cated-p append w │ │ │ +00010480: 696e 646f 772d 6465 6469 6361 7465 642d indow-dedicated- │ │ │ +00010490: 705d 2038 2022 5c6e 436f 6d6d 6f6e 204c p] 8 "\nCommon L │ │ │ +000104a0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +000104b0: 5c6e 2020 2877 696e 646f 772d 6465 6469 \n (window-dedi │ │ │ +000104c0: 6361 7465 642d 7020 2672 6573 7420 4152 cated-p &rest AR │ │ │ +000104d0: 4753 295c 6e5c 6e22 5d20 7769 6e64 6f77 GS)\n\n"] window │ │ │ +000104e0: 2d68 6569 6768 7420 235b 2826 6f70 7469 -height #[(&opti │ │ │ +000104f0: 6f6e 616c 2077 696e 646f 7729 2022 c4c5 onal window) ".. │ │ │ +00010500: 211b c4c6 211a 0b43 0943 5c6e 430b 195c !...!..C.C\nC..\ │ │ │ +00010510: 6e18 c7c8 c908 ca42 42cb 0946 0845 2acc n......BB..F.E*. │ │ │ +00010520: 0b44 af05 2a87 2220 5b73 746f 7265 2077 .D..*." [store w │ │ │ +00010530: 696e 646f 7720 2d2d 7374 6f72 652d 2d74 indow --store--t │ │ │ +00010540: 656d 702d 2d20 2d2d 7769 6e64 6f77 2d2d emp-- --window-- │ │ │ +00010550: 7465 6d70 2d2d 2067 656e 7379 6d20 222d temp-- gensym "- │ │ │ +00010560: 2d77 696e 646f 772d 2d22 2022 2d2d 7374 -window--" "--st │ │ │ +00010570: 6f72 652d 2d22 2070 726f 676e 2065 6e6c ore--" progn enl │ │ │ +00010580: 6172 6765 2d77 696e 646f 7720 2d20 2828 arge-window - (( │ │ │ +00010590: 7769 6e64 6f77 2d68 6569 6768 7429 2920 window-height)) │ │ │ +000105a0: 6e69 6c20 7769 6e64 6f77 2d68 6569 6768 nil window-heigh │ │ │ +000105b0: 745d 2038 2022 5c6e 436f 6d6d 6f6e 204c t] 8 "\nCommon L │ │ │ +000105c0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +000105d0: 5c6e 2020 2877 696e 646f 772d 6865 6967 \n (window-heig │ │ │ +000105e0: 6874 2026 6f70 7469 6f6e 616c 2057 494e ht &optional WIN │ │ │ +000105f0: 444f 5729 5c6e 5c6e 225d 2077 696e 646f DOW)\n\n"] windo │ │ │ +00010600: 772d 6873 6372 6f6c 6c20 235b 2826 7265 w-hscroll #[(&re │ │ │ +00010610: 7374 2061 7267 7329 2022 c4c5 0b5c 221a st args) "...\". │ │ │ +00010620: c5c6 2119 5c6e 0b09 435c 6e1b 0918 c7c8 ..!.\n..C\n..... │ │ │ +00010630: 0b08 435c 222a 42c9 5c6e 42af 052a 8722 ..C\"*B.\nB..*." │ │ │ +00010640: 205b 7374 6f72 6520 2d2d 7374 6f72 652d [store --store- │ │ │ +00010650: 2d74 656d 702d 2d20 2d2d 6172 6773 2d2d -temp-- --args-- │ │ │ +00010660: 7465 6d70 2d2d 2061 7267 7320 6d61 7063 temp-- args mapc │ │ │ +00010670: 6172 2067 656e 7379 6d20 222d 2d73 746f ar gensym "--sto │ │ │ +00010680: 7265 2d2d 2220 7365 742d 7769 6e64 6f77 re--" set-window │ │ │ +00010690: 2d68 7363 726f 6c6c 2061 7070 656e 6420 -hscroll append │ │ │ +000106a0: 7769 6e64 6f77 2d68 7363 726f 6c6c 5d20 window-hscroll] │ │ │ +000106b0: 3720 225c 6e43 6f6d 6d6f 6e20 4c69 7370 7 "\nCommon Lisp │ │ │ +000106c0: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +000106d0: 2028 7769 6e64 6f77 2d68 7363 726f 6c6c (window-hscroll │ │ │ +000106e0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +000106f0: 225d 2077 696e 646f 772d 706f 696e 7420 "] window-point │ │ │ +00010700: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ +00010710: c4c5 0b5c 221a c5c6 2119 5c6e 0b09 435c ...\"...!.\n..C\ │ │ │ +00010720: 6e1b 0918 c7c8 0b08 435c 222a 42c9 5c6e n.......C\"*B.\n │ │ │ +00010730: 42af 052a 8722 205b 7374 6f72 6520 2d2d B..*." [store -- │ │ │ +00010740: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ +00010750: 6172 6773 2d2d 7465 6d70 2d2d 2061 7267 args--temp-- arg │ │ │ +00010760: 7320 6d61 7063 6172 2067 656e 7379 6d20 s mapcar gensym │ │ │ +00010770: 222d 2d73 746f 7265 2d2d 2220 7365 742d "--store--" set- │ │ │ +00010780: 7769 6e64 6f77 2d70 6f69 6e74 2061 7070 window-point app │ │ │ +00010790: 656e 6420 7769 6e64 6f77 2d70 6f69 6e74 end window-point │ │ │ +000107a0: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ +000107b0: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ +000107c0: 6e20 2028 7769 6e64 6f77 2d70 6f69 6e74 n (window-point │ │ │ +000107d0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +000107e0: 225d 2077 696e 646f 772d 7374 6172 7420 "] window-start │ │ │ +000107f0: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ +00010800: c4c5 0b5c 221a c5c6 2119 5c6e 0b09 435c ...\"...!.\n..C\ │ │ │ +00010810: 6e1b 0918 c7c8 0b08 435c 222a 42c9 5c6e n.......C\"*B.\n │ │ │ +00010820: 42af 052a 8722 205b 7374 6f72 6520 2d2d B..*." [store -- │ │ │ +00010830: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ +00010840: 6172 6773 2d2d 7465 6d70 2d2d 2061 7267 args--temp-- arg │ │ │ +00010850: 7320 6d61 7063 6172 2067 656e 7379 6d20 s mapcar gensym │ │ │ +00010860: 222d 2d73 746f 7265 2d2d 2220 7365 742d "--store--" set- │ │ │ +00010870: 7769 6e64 6f77 2d73 7461 7274 2061 7070 window-start app │ │ │ +00010880: 656e 6420 7769 6e64 6f77 2d73 7461 7274 end window-start │ │ │ +00010890: 5d20 3720 225c 6e43 6f6d 6d6f 6e20 4c69 ] 7 "\nCommon Li │ │ │ +000108a0: 7370 206c 616d 6264 6120 6c69 7374 3a5c sp lambda list:\ │ │ │ +000108b0: 6e20 2028 7769 6e64 6f77 2d73 7461 7274 n (window-start │ │ │ +000108c0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +000108d0: 225d 2077 696e 646f 772d 7769 6474 6820 "] window-width │ │ │ +000108e0: 235b 2826 6f70 7469 6f6e 616c 2077 696e #[(&optional win │ │ │ +000108f0: 646f 7729 2022 c4c5 211b c4c6 211a 0b43 dow) "..!...!..C │ │ │ +00010900: 0943 5c6e 430b 195c 6e18 c7c8 c908 ca42 .C\nC..\n......B │ │ │ +00010910: 42cb 0946 0845 2acc 0b44 af05 2a87 2220 B..F.E*..D..*." │ │ │ +00010920: 5b73 746f 7265 2077 696e 646f 7720 2d2d [store window -- │ │ │ +00010930: 7374 6f72 652d 2d74 656d 702d 2d20 2d2d store--temp-- -- │ │ │ +00010940: 7769 6e64 6f77 2d2d 7465 6d70 2d2d 2067 window--temp-- g │ │ │ +00010950: 656e 7379 6d20 222d 2d77 696e 646f 772d ensym "--window- │ │ │ +00010960: 2d22 2022 2d2d 7374 6f72 652d 2d22 2070 -" "--store--" p │ │ │ +00010970: 726f 676e 2065 6e6c 6172 6765 2d77 696e rogn enlarge-win │ │ │ +00010980: 646f 7720 2d20 2828 7769 6e64 6f77 2d77 dow - ((window-w │ │ │ +00010990: 6964 7468 2929 2074 2077 696e 646f 772d idth)) t window- │ │ │ +000109a0: 7769 6474 685d 2038 2022 5c6e 436f 6d6d width] 8 "\nComm │ │ │ +000109b0: 6f6e 204c 6973 7020 6c61 6d62 6461 206c on Lisp lambda l │ │ │ +000109c0: 6973 743a 5c6e 2020 2877 696e 646f 772d ist:\n (window- │ │ │ +000109d0: 7769 6474 6820 266f 7074 696f 6e61 6c20 width &optional │ │ │ +000109e0: 5749 4e44 4f57 295c 6e5c 6e22 5d20 782d WINDOW)\n\n"] x- │ │ │ +000109f0: 6765 742d 6375 7462 7566 6665 7220 235b get-cutbuffer #[ │ │ │ +00010a00: 2826 7265 7374 2061 7267 7329 2022 c4c5 (&rest args) ".. │ │ │ +00010a10: 0b5c 221a c5c6 2119 5c6e 0b09 435c 6e1b .\"...!.\n..C\n. │ │ │ +00010a20: 0918 c7c8 c90b 0843 5c22 4208 452a ca5c .......C\"B.E*.\ │ │ │ +00010a30: 6e42 af05 2a87 2220 5b73 746f 7265 202d nB..*." [store - │ │ │ +00010a40: 2d73 746f 7265 2d2d 7465 6d70 2d2d 202d -store--temp-- - │ │ │ +00010a50: 2d61 7267 732d 2d74 656d 702d 2d20 6172 -args--temp-- ar │ │ │ +00010a60: 6773 206d 6170 6361 7220 6765 6e73 796d gs mapcar gensym │ │ │ +00010a70: 2022 2d2d 7374 6f72 652d 2d22 2070 726f "--store--" pro │ │ │ +00010a80: 676e 2078 2d73 746f 7265 2d63 7574 6275 gn x-store-cutbu │ │ │ +00010a90: 6666 6572 2061 7070 656e 6420 782d 6765 ffer append x-ge │ │ │ +00010aa0: 742d 6375 7462 7566 6665 725d 2038 2022 t-cutbuffer] 8 " │ │ │ +00010ab0: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +00010ac0: 6d62 6461 206c 6973 743a 5c6e 2020 2878 mbda list:\n (x │ │ │ +00010ad0: 2d67 6574 2d63 7574 6275 6666 6572 2026 -get-cutbuffer & │ │ │ +00010ae0: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +00010af0: 2078 2d67 6574 2d63 7574 2d62 7566 6665 x-get-cut-buffe │ │ │ +00010b00: 7220 235b 2826 7265 7374 2061 7267 7329 r #[(&rest args) │ │ │ +00010b10: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +00010b20: 435c 6e1b 0918 c7c8 c90b 0843 5c22 4208 C\n........C\"B. │ │ │ +00010b30: 452a ca5c 6e42 af05 2a87 2220 5b73 746f E*.\nB..*." [sto │ │ │ +00010b40: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +00010b50: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +00010b60: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +00010b70: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +00010b80: 2070 726f 676e 2078 2d73 746f 7265 2d63 progn x-store-c │ │ │ +00010b90: 7574 2d62 7566 6665 7220 6170 7065 6e64 ut-buffer append │ │ │ +00010ba0: 2078 2d67 6574 2d63 7574 2d62 7566 6665 x-get-cut-buffe │ │ │ +00010bb0: 725d 2038 2022 5c6e 436f 6d6d 6f6e 204c r] 8 "\nCommon L │ │ │ +00010bc0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +00010bd0: 5c6e 2020 2878 2d67 6574 2d63 7574 2d62 \n (x-get-cut-b │ │ │ +00010be0: 7566 6665 7220 2672 6573 7420 4152 4753 uffer &rest ARGS │ │ │ +00010bf0: 295c 6e5c 6e22 5d20 782d 6765 742d 7365 )\n\n"] x-get-se │ │ │ +00010c00: 636f 6e64 6172 792d 7365 6c65 6374 696f condary-selectio │ │ │ +00010c10: 6e20 235b 2826 7265 7374 2061 7267 7329 n #[(&rest args) │ │ │ +00010c20: 2022 c4c5 0b5c 221a c5c6 2119 5c6e 0b09 "...\"...!.\n.. │ │ │ +00010c30: 435c 6e1b 0918 c7c8 c90b 0843 5c22 4208 C\n........C\"B. │ │ │ +00010c40: 452a ca5c 6e42 af05 2a87 2220 5b73 746f E*.\nB..*." [sto │ │ │ +00010c50: 7265 202d 2d73 746f 7265 2d2d 7465 6d70 re --store--temp │ │ │ +00010c60: 2d2d 202d 2d61 7267 732d 2d74 656d 702d -- --args--temp- │ │ │ +00010c70: 2d20 6172 6773 206d 6170 6361 7220 6765 - args mapcar ge │ │ │ +00010c80: 6e73 796d 2022 2d2d 7374 6f72 652d 2d22 nsym "--store--" │ │ │ +00010c90: 2070 726f 676e 2078 2d6f 776e 2d73 6563 progn x-own-sec │ │ │ +00010ca0: 6f6e 6461 7279 2d73 656c 6563 7469 6f6e ondary-selection │ │ │ +00010cb0: 2061 7070 656e 6420 782d 6765 742d 7365 append x-get-se │ │ │ +00010cc0: 636f 6e64 6172 792d 7365 6c65 6374 696f condary-selectio │ │ │ +00010cd0: 6e5d 2038 2022 5c6e 436f 6d6d 6f6e 204c n] 8 "\nCommon L │ │ │ +00010ce0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +00010cf0: 5c6e 2020 2878 2d67 6574 2d73 6563 6f6e \n (x-get-secon │ │ │ +00010d00: 6461 7279 2d73 656c 6563 7469 6f6e 2026 dary-selection & │ │ │ +00010d10: 7265 7374 2041 5247 5329 5c6e 5c6e 225d rest ARGS)\n\n"] │ │ │ +00010d20: 2078 2d67 6574 2d73 656c 6563 7469 6f6e x-get-selection │ │ │ +00010d30: 2023 5b28 2672 6573 7420 6172 6773 2920 #[(&rest args) │ │ │ +00010d40: 22c4 c50b 5c22 1ac5 c621 195c 6e0b 0943 "...\"...!.\n..C │ │ │ +00010d50: 5c6e 1b09 18c7 c8c9 0b08 435c 2242 0845 \n........C\"B.E │ │ │ +00010d60: 2aca 5c6e 42af 052a 8722 205b 7374 6f72 *.\nB..*." [stor │ │ │ +00010d70: 6520 2d2d 7374 6f72 652d 2d74 656d 702d e --store--temp- │ │ │ +00010d80: 2d20 2d2d 6172 6773 2d2d 7465 6d70 2d2d - --args--temp-- │ │ │ +00010d90: 2061 7267 7320 6d61 7063 6172 2067 656e args mapcar gen │ │ │ +00010da0: 7379 6d20 222d 2d73 746f 7265 2d2d 2220 sym "--store--" │ │ │ +00010db0: 7072 6f67 6e20 782d 6f77 6e2d 7365 6c65 progn x-own-sele │ │ │ +00010dc0: 6374 696f 6e20 6170 7065 6e64 2078 2d67 ction append x-g │ │ │ +00010dd0: 6574 2d73 656c 6563 7469 6f6e 5d20 3820 et-selection] 8 │ │ │ +00010de0: 225c 6e43 6f6d 6d6f 6e20 4c69 7370 206c "\nCommon Lisp l │ │ │ +00010df0: 616d 6264 6120 6c69 7374 3a5c 6e20 2028 ambda list:\n ( │ │ │ +00010e00: 782d 6765 742d 7365 6c65 6374 696f 6e20 x-get-selection │ │ │ +00010e10: 2672 6573 7420 4152 4753 295c 6e5c 6e22 &rest ARGS)\n\n" │ │ │ +00010e20: 5d20 6765 742d 7365 6c65 6374 696f 6e20 ] get-selection │ │ │ +00010e30: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ +00010e40: c4c5 0b5c 221a c5c6 2119 5c6e 0b09 435c ...\"...!.\n..C\ │ │ │ +00010e50: 6e1b 0918 c7c8 c90b 0843 5c22 4208 452a n........C\"B.E* │ │ │ +00010e60: ca5c 6e42 af05 2a87 2220 5b73 746f 7265 .\nB..*." [store │ │ │ +00010e70: 202d 2d73 746f 7265 2d2d 7465 6d70 2d2d --store--temp-- │ │ │ +00010e80: 202d 2d61 7267 732d 2d74 656d 702d 2d20 --args--temp-- │ │ │ +00010e90: 6172 6773 206d 6170 6361 7220 6765 6e73 args mapcar gens │ │ │ +00010ea0: 796d 2022 2d2d 7374 6f72 652d 2d22 2070 ym "--store--" p │ │ │ +00010eb0: 726f 676e 206f 776e 2d73 656c 6563 7469 rogn own-selecti │ │ │ +00010ec0: 6f6e 2061 7070 656e 6420 6765 742d 7365 on append get-se │ │ │ +00010ed0: 6c65 6374 696f 6e5d 2038 2022 5c6e 436f lection] 8 "\nCo │ │ │ +00010ee0: 6d6d 6f6e 204c 6973 7020 6c61 6d62 6461 mmon Lisp lambda │ │ │ +00010ef0: 206c 6973 743a 5c6e 2020 2867 6574 2d73 list:\n (get-s │ │ │ +00010f00: 656c 6563 7469 6f6e 2026 7265 7374 2041 election &rest A │ │ │ +00010f10: 5247 5329 5c6e 5c6e 225d 2061 7070 6c79 RGS)\n\n"] apply │ │ │ +00010f20: 2023 5b28 6675 6e63 2061 7267 3120 2672 #[(func arg1 &r │ │ │ +00010f30: 6573 7420 7265 7374 2920 220c a2c6 73ab est rest) "...s. │ │ │ +00010f40: 860c a3a2 39ac 85c7 c80c 5c22 880c 4140 ....9.....\"..A@ │ │ │ +00010f50: 5c6e 0942 421b c90b 085c 2289 1d40 0d41 \n.BB....\"..@.A │ │ │ +00010f60: 40ca 0d38 cbcc 0d38 0c41 400d 4023 cbcd @..8...8.A@.@#.. │ │ │ +00010f70: 0d38 0c41 400d 4023 af05 2a87 2220 5b63 .8.A@.@#..*." [c │ │ │ +00010f80: 6c2d 6d61 6372 6f2d 656e 7669 726f 6e6d l-macro-environm │ │ │ +00010f90: 656e 7420 7265 7374 2061 7267 3120 666f ent rest arg1 fo │ │ │ +00010fa0: 726d 2066 756e 6320 6d65 7468 6f64 2028 rm func method ( │ │ │ +00010fb0: 7175 6f74 6520 6675 6e63 7469 6f6e 2066 quote function f │ │ │ +00010fc0: 756e 6374 696f 6e2a 2920 6572 726f 7220 unction*) error │ │ │ +00010fd0: 2246 6972 7374 2061 7267 2074 6f20 6170 "First arg to ap │ │ │ +00010fe0: 706c 7920 696e 2073 6574 6620 6973 206e ply in setf is n │ │ │ +00010ff0: 6f74 2028 6675 6e63 7469 6f6e 2053 594d ot (function SYM │ │ │ +00011000: 293a 2025 7322 2067 6574 2d73 6574 662d ): %s" get-setf- │ │ │ +00011010: 6d65 7468 6f64 2032 2063 6c2d 7365 7466 method 2 cl-setf │ │ │ +00011020: 2d6d 616b 652d 6170 706c 7920 3320 345d -make-apply 3 4] │ │ │ +00011030: 2039 2022 5c6e 436f 6d6d 6f6e 204c 6973 9 "\nCommon Lis │ │ │ +00011040: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ +00011050: 2020 2861 7070 6c79 2046 554e 4320 4152 (apply FUNC AR │ │ │ +00011060: 4731 2026 7265 7374 2052 4553 5429 5c6e G1 &rest REST)\n │ │ │ +00011070: 5c6e 225d 5d20 3429 0a28 6465 6661 6c69 \n"]] 4).(defali │ │ │ +00011080: 6173 2027 636c 2d73 6574 662d 6d61 6b65 as 'cl-setf-make │ │ │ +00011090: 2d61 7070 6c79 2023 5b28 666f 726d 2066 -apply #[(form f │ │ │ +000110a0: 756e 6320 7465 6d70 7329 2022 5c6e 40c3 unc temps) "\n@. │ │ │ +000110b0: 61ab 8ec3 c45c 6e41 4009 0823 5c6e 4141 a....\nA@..#\nAA │ │ │ +000110c0: 4242 87c5 5c6e 21c5 0821 6bac 85c6 c709 BB..\n!..!k..... │ │ │ +000110d0: 5c22 88c8 c95c 6e40 445c 6e41 4242 8722 \"...\n@D\nABB." │ │ │ +000110e0: 205b 7465 6d70 7320 6675 6e63 2066 6f72 [temps func for │ │ │ +000110f0: 6d20 7072 6f67 6e20 636c 2d73 6574 662d m progn cl-setf- │ │ │ +00011100: 6d61 6b65 2d61 7070 6c79 206c 6173 7420 make-apply last │ │ │ +00011110: 6572 726f 7220 2225 7320 6973 206e 6f74 error "%s is not │ │ │ +00011120: 2073 7569 7461 626c 6520 666f 7220 7573 suitable for us │ │ │ +00011130: 6520 7769 7468 2073 6574 662d 6f66 2d61 e with setf-of-a │ │ │ +00011140: 7070 6c79 2220 6170 706c 7920 7175 6f74 pply" apply quot │ │ │ +00011150: 655d 2035 5d29 0a28 6279 7465 2d63 6f64 e] 5]).(byte-cod │ │ │ +00011160: 6520 22c0 c1c2 c323 88c0 c4c2 c523 88c0 e "....#.....#.. │ │ │ +00011170: c6c2 c723 88c0 c8c2 c923 8722 205b 7075 ...#.....#." [pu │ │ │ +00011180: 7420 6e74 6863 6472 2073 6574 662d 6d65 t nthcdr setf-me │ │ │ +00011190: 7468 6f64 2023 5b28 6e20 706c 6163 6529 thod #[(n place) │ │ │ +000111a0: 2022 c65c 6e09 5c22 c7c8 21c7 c921 1c1b ".\n.\"..!..!.. │ │ │ +000111b0: 1d0b 0d40 4208 0d41 4042 0c43 cacb 0d38 ...@B..A@B.C...8 │ │ │ +000111c0: 40cc 0bcd 0d38 0c46 4443 ce0d 380c 46cf @....8.FDC..8.F. │ │ │ +000111d0: 0bcd 0d38 45af 052b 8722 205b 6e20 636c ...8E..+." [n cl │ │ │ +000111e0: 2d6d 6163 726f 2d65 6e76 6972 6f6e 6d65 -macro-environme │ │ │ +000111f0: 6e74 2070 6c61 6365 206e 2d74 656d 7020 nt place n-temp │ │ │ +00011200: 7374 6f72 652d 7465 6d70 206d 6574 686f store-temp metho │ │ │ +00011210: 6420 6765 742d 7365 7466 2d6d 6574 686f d get-setf-metho │ │ │ +00011220: 6420 6765 6e73 796d 2022 2d2d 6e74 6863 d gensym "--nthc │ │ │ +00011230: 6472 2d6e 2d2d 2220 222d 2d6e 7468 6364 dr-n--" "--nthcd │ │ │ +00011240: 722d 7374 6f72 652d 2d22 206c 6574 2032 r-store--" let 2 │ │ │ +00011250: 2063 6c2d 7365 742d 6e74 6863 6472 2034 cl-set-nthcdr 4 │ │ │ +00011260: 2033 206e 7468 6364 725d 2039 2022 5c6e 3 nthcdr] 9 "\n │ │ │ +00011270: 436f 6d6d 6f6e 204c 6973 7020 6c61 6d62 Common Lisp lamb │ │ │ +00011280: 6461 206c 6973 743a 5c6e 2020 286e 7468 da list:\n (nth │ │ │ +00011290: 6364 7220 4e20 504c 4143 4529 5c6e 5c6e cdr N PLACE)\n\n │ │ │ +000112a0: 225d 2067 6574 6620 235b 2870 6c61 6365 "] getf #[(place │ │ │ +000112b0: 2074 6167 2026 6f70 7469 6f6e 616c 2064 tag &optional d │ │ │ +000112c0: 6566 2920 22c6 0908 5c22 c7c8 21c7 c921 ef) "...\"..!..! │ │ │ +000112d0: c7ca 211c 1a1b 1dcb 0d40 0b5c 6e44 5c22 ..!......@.\nD\" │ │ │ +000112e0: cb0d 4140 0e12 0e13 445c 220c 43cc cd0d ..A@....D\".C... │ │ │ +000112f0: 3840 cecf 0d38 0b0c 4644 43d0 0d38 0c46 8@...8..FDC..8.F │ │ │ +00011300: d1cf 0d38 0b5c 6e46 af05 2c87 2220 5b63 ...8.\nF..,." [c │ │ │ +00011310: 6c2d 6d61 6372 6f2d 656e 7669 726f 6e6d l-macro-environm │ │ │ +00011320: 656e 7420 706c 6163 6520 6465 662d 7465 ent place def-te │ │ │ +00011330: 6d70 2074 6167 2d74 656d 7020 7374 6f72 mp tag-temp stor │ │ │ +00011340: 652d 7465 6d70 206d 6574 686f 6420 6765 e-temp method ge │ │ │ +00011350: 742d 7365 7466 2d6d 6574 686f 6420 6765 t-setf-method ge │ │ │ +00011360: 6e73 796d 2022 2d2d 6765 7466 2d74 6167 nsym "--getf-tag │ │ │ +00011370: 2d2d 2220 222d 2d67 6574 662d 6465 662d --" "--getf-def- │ │ │ +00011380: 2d22 2022 2d2d 6765 7466 2d73 746f 7265 -" "--getf-store │ │ │ +00011390: 2d2d 2220 6170 7065 6e64 206c 6574 2032 --" append let 2 │ │ │ +000113a0: 2063 6c2d 7365 742d 6765 7466 2034 2033 cl-set-getf 4 3 │ │ │ +000113b0: 2067 6574 6620 7461 6720 6465 665d 2039 getf tag def] 9 │ │ │ +000113c0: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ +000113d0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ +000113e0: 2867 6574 6620 504c 4143 4520 5441 4720 (getf PLACE TAG │ │ │ +000113f0: 266f 7074 696f 6e61 6c20 4445 4629 5c6e &optional DEF)\n │ │ │ +00011400: 5c6e 225d 2073 7562 7374 7269 6e67 2023 \n"] substring # │ │ │ +00011410: 5b28 706c 6163 6520 6672 6f6d 2026 6f70 [(place from &op │ │ │ +00011420: 7469 6f6e 616c 2074 6f29 2022 c609 085c tional to) "...\ │ │ │ +00011430: 22c7 c821 c7c9 21c7 ca21 1c1b 1a1d cb0d "..!..!..!...... │ │ │ +00011440: 405c 6e0b 445c 22cb 0d41 400e 120e 1344 @\n.D\"..A@....D │ │ │ +00011450: 5c22 0c43 cccd 0d38 40ce cf0d 385c 6e0b \".C...8@...8\n. │ │ │ +00011460: 0caf 0544 43d0 0d38 0c46 d1cf 0d38 5c6e ...DC..8.F...8\n │ │ │ +00011470: 0b46 af05 2c87 2220 5b63 6c2d 6d61 6372 .F..,." [cl-macr │ │ │ +00011480: 6f2d 656e 7669 726f 6e6d 656e 7420 706c o-environment pl │ │ │ +00011490: 6163 6520 6672 6f6d 2d74 656d 7020 746f ace from-temp to │ │ │ +000114a0: 2d74 656d 7020 7374 6f72 652d 7465 6d70 -temp store-temp │ │ │ +000114b0: 206d 6574 686f 6420 6765 742d 7365 7466 method get-setf │ │ │ +000114c0: 2d6d 6574 686f 6420 6765 6e73 796d 2022 -method gensym " │ │ │ +000114d0: 2d2d 7375 6273 7472 696e 672d 6672 6f6d --substring-from │ │ │ +000114e0: 2d2d 2220 222d 2d73 7562 7374 7269 6e67 --" "--substring │ │ │ +000114f0: 2d74 6f2d 2d22 2022 2d2d 7375 6273 7472 -to--" "--substr │ │ │ +00011500: 696e 672d 7374 6f72 652d 2d22 2061 7070 ing-store--" app │ │ │ +00011510: 656e 6420 6c65 7420 3220 636c 2d73 6574 end let 2 cl-set │ │ │ +00011520: 2d73 7562 7374 7269 6e67 2034 2033 2073 -substring 4 3 s │ │ │ +00011530: 7562 7374 7269 6e67 2066 726f 6d20 746f ubstring from to │ │ │ +00011540: 5d20 3130 2022 5c6e 436f 6d6d 6f6e 204c ] 10 "\nCommon L │ │ │ +00011550: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +00011560: 5c6e 2020 2873 7562 7374 7269 6e67 2050 \n (substring P │ │ │ +00011570: 4c41 4345 2046 524f 4d20 266f 7074 696f LACE FROM &optio │ │ │ +00011580: 6e61 6c20 544f 295c 6e5c 6e22 5d20 7661 nal TO)\n\n"] va │ │ │ +00011590: 6c75 6573 2023 5b28 2672 6573 7420 6172 lues #[(&rest ar │ │ │ +000115a0: 6773 2920 22c3 c408 5c22 c5c6 2119 1ac7 gs) "...\"..!... │ │ │ +000115b0: c8c3 c95c 6e5c 225c 22c7 c8c3 ca5c 6e5c ...\n\"\"....\n\ │ │ │ +000115c0: 225c 2209 43cb c3cc 5c6e 5c22 42cb c3cd "\".C...\n\"B... │ │ │ +000115d0: 5c6e 5c22 42af 052a 8722 205b 6172 6773 \n\"B..*." [args │ │ │ +000115e0: 2073 746f 7265 2d74 656d 7020 6d65 7468 store-temp meth │ │ │ +000115f0: 6f64 7320 6d61 7063 6172 2023 5b28 7829 ods mapcar #[(x) │ │ │ +00011600: 2022 c209 085c 2287 2220 5b63 6c2d 6d61 "...\"." [cl-ma │ │ │ +00011610: 6372 6f2d 656e 7669 726f 6e6d 656e 7420 cro-environment │ │ │ +00011620: 7820 6765 742d 7365 7466 2d6d 6574 686f x get-setf-metho │ │ │ +00011630: 645d 2033 5d20 6765 6e73 796d 2022 2d2d d] 3] gensym "-- │ │ │ +00011640: 7661 6c75 6573 2d73 746f 7265 2d2d 2220 values-store--" │ │ │ +00011650: 6170 706c 7920 6170 7065 6e64 2066 6972 apply append fir │ │ │ +00011660: 7374 2073 6563 6f6e 6420 6c69 7374 2023 st second list # │ │ │ +00011670: 5b28 6d29 2022 c209 4141 4040 0941 4141 [(m) "..AA@@.AAA │ │ │ +00011680: 4042 c308 445c 2287 2220 5b73 746f 7265 @B..D\"." [store │ │ │ +00011690: 2d74 656d 7020 6d20 636c 2d73 6574 662d -temp m cl-setf- │ │ │ +000116a0: 646f 2d73 746f 7265 2070 6f70 5d20 345d do-store pop] 4] │ │ │ +000116b0: 2066 6966 7468 5d20 3820 225c 6e43 6f6d fifth] 8 "\nCom │ │ │ +000116c0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +000116d0: 6c69 7374 3a5c 6e20 2028 7661 6c75 6573 list:\n (values │ │ │ +000116e0: 2026 7265 7374 2041 5247 5329 5c6e 5c6e &rest ARGS)\n\n │ │ │ +000116f0: 225d 5d20 3429 0a23 4031 3638 2052 6574 "]] 4).#@168 Ret │ │ │ +00011700: 7572 6e20 6120 6c69 7374 206f 6620 6669 urn a list of fi │ │ │ +00011710: 7665 2076 616c 7565 7320 6465 7363 7269 ve values descri │ │ │ +00011720: 6269 6e67 2074 6865 2073 6574 662d 6d65 bing the setf-me │ │ │ +00011730: 7468 6f64 2066 6f72 2050 4c41 4345 2e0a thod for PLACE.. │ │ │ +00011740: 504c 4143 4520 6d61 7920 6265 2061 6e79 PLACE may be any │ │ │ +00011750: 204c 6973 7020 666f 726d 2077 6869 6368 Lisp form which │ │ │ +00011760: 2063 616e 2061 7070 6561 7220 6173 2074 can appear as t │ │ │ +00011770: 6865 2050 4c41 4345 2061 7267 756d 656e he PLACE argumen │ │ │ +00011780: 7420 746f 0a61 206d 6163 726f 206c 696b t to.a macro lik │ │ │ +00011790: 6520 6073 6574 6627 206f 7220 6069 6e63 e `setf' or `inc │ │ │ +000117a0: 6627 2e1f 0a28 6465 6661 6c69 6173 2027 f'...(defalias ' │ │ │ +000117b0: 6765 742d 7365 7466 2d6d 6574 686f 6420 get-setf-method │ │ │ +000117c0: 235b 2870 6c61 6365 2026 6f70 7469 6f6e #[(place &option │ │ │ +000117d0: 616c 2065 6e76 2920 220d 39ab 91c6 c721 al env) ".9....! │ │ │ +000117e0: 19c8 8909 43c9 0d09 450d af05 2987 0d40 ....C...E...)..@ │ │ │ +000117f0: 39ab d50d 401b ca0b 2118 0bcb 4e1c c81e 9...@...!...N... │ │ │ +00011800: 1a0c aba0 5c6e 1e1b cc0c 0d41 5c22 8914 ....\n.....A\".. │ │ │ +00011810: 29ab 930c 3aab 890c 47cd 55ab 830c aa84 )...:...G.U..... │ │ │ +00011820: cecf 0b5c 22ae a1d0 201e 1cd1 8ed2 d308 ...\"... ....... │ │ │ +00011830: 5c22 2aab 87d4 d50d 2121 ae8d 0bd6 61ad \"*.....!!....a. │ │ │ +00011840: 88d4 0d47 530d 385c 6e5c 222c aeaf 0dd7 ...GS.8\n\",.... │ │ │ +00011850: 0d5c 6e5c 2289 1561 aba1 0d40 39ab 96d8 .\n\"..a...@9... │ │ │ +00011860: 0d40 21ab 900d 404b 39ab 8ad4 0d40 4b0d .@!...@K9....@K. │ │ │ +00011870: 4142 5c6e 5c22 87ce d90d 405c 2287 d40d AB\n\"....@\"... │ │ │ +00011880: 5c6e 5c22 8722 205b 6e61 6d65 2074 656d \n\"." [name tem │ │ │ +00011890: 7020 656e 7620 6675 6e63 206d 6574 686f p env func metho │ │ │ +000118a0: 6420 706c 6163 6520 6765 6e73 796d 2022 d place gensym " │ │ │ +000118b0: 2d2d 7365 7466 2d2d 2220 6e69 6c20 7365 --setf--" nil se │ │ │ +000118c0: 7471 2073 796d 626f 6c2d 6e61 6d65 2073 tq symbol-name s │ │ │ +000118d0: 6574 662d 6d65 7468 6f64 2061 7070 6c79 etf-method apply │ │ │ +000118e0: 2035 2065 7272 6f72 2022 5365 7466 2d6d 5 error "Setf-m │ │ │ +000118f0: 6574 686f 6420 666f 7220 2573 2072 6574 ethod for %s ret │ │ │ +00011900: 7572 6e73 206d 616c 666f 726d 6564 206d urns malformed m │ │ │ +00011910: 6574 686f 6422 206d 6174 6368 2d64 6174 ethod" match-dat │ │ │ +00011920: 6120 2828 7374 6f72 652d 6d61 7463 682d a ((store-match- │ │ │ +00011930: 6461 7461 2023 313d 233a 6d61 7463 682d data #1=#:match- │ │ │ +00011940: 6461 7461 2929 2073 7472 696e 672d 6d61 data)) string-ma │ │ │ +00011950: 7463 6820 225c 5c60 635b 6164 5d5b 6164 tch "\\`c[ad][ad │ │ │ +00011960: 5d5b 6164 5d3f 5b61 645d 3f72 5c5c 2722 ][ad]?[ad]?r\\'" │ │ │ +00011970: 2067 6574 2d73 6574 662d 6d65 7468 6f64 get-setf-method │ │ │ +00011980: 2063 6f6d 7069 6c65 722d 6d61 6372 6f65 compiler-macroe │ │ │ +00011990: 7870 616e 6420 6564 6562 7567 2d61 6674 xpand edebug-aft │ │ │ +000119a0: 6572 206d 6163 726f 6578 7061 6e64 2066 er macroexpand f │ │ │ +000119b0: 626f 756e 6470 2022 4e6f 2073 6574 662d boundp "No setf- │ │ │ +000119c0: 6d65 7468 6f64 206b 6e6f 776e 2066 6f72 method known for │ │ │ +000119d0: 2025 7322 2063 6173 652d 666f 6c64 2d73 %s" case-fold-s │ │ │ +000119e0: 6561 7263 6820 636c 2d6d 6163 726f 2d65 earch cl-macro-e │ │ │ +000119f0: 6e76 6972 6f6e 6d65 6e74 2023 3123 5d20 nvironment #1#] │ │ │ +00011a00: 3620 2823 2420 2e20 3731 3432 3129 5d29 6 (#$ . 71421)]) │ │ │ +00011a10: 0a28 6465 6661 6c69 6173 2027 636c 2d73 .(defalias 'cl-s │ │ │ +00011a20: 6574 662d 646f 2d6d 6f64 6966 7920 235b etf-do-modify #[ │ │ │ +00011a30: 2870 6c61 6365 206f 7074 2d65 7870 7229 (place opt-expr) │ │ │ +00011a40: 2022 c608 0e14 5c22 891d 401b 0d41 401c "....\"..@..A@. │ │ │ +00011a50: c789 191a 0e12 c861 3fad 950e 12c9 61ac .......a?.....a. │ │ │ +00011a60: 86ca 0e12 21ae 89cb cc0d 3840 cd0d 385c ....!.....8@..8\ │ │ │ +00011a70: 2289 1e15 ad88 083a ad84 ce08 4121 1e13 "......:....A!.. │ │ │ +00011a80: 0cab aa0e 13ac 86cf 0c40 21ab 900b 8941 .........@!....A │ │ │ +00011a90: 1340 0c89 4114 4042 5c6e 4212 aa63 0b89 .@..A.@B\nB..c.. │ │ │ +00011aa0: 4113 400c 8941 1440 4409 4211 aa53 099f A.@..A.@D.B..S.. │ │ │ +00011ab0: cc0d 3840 d05c 6ecd 0d38 5c22 42d0 5c6e ..8@.\n..8\"B.\n │ │ │ +00011ac0: d10d 385c 2245 2e07 8722 205b 706c 6163 ..8\"E..." [plac │ │ │ +00011ad0: 6520 6c65 7473 2073 7562 7320 7465 6d70 e lets subs temp │ │ │ +00011ae0: 7320 7661 6c75 6573 206d 6574 686f 6420 s values method │ │ │ +00011af0: 6765 742d 7365 7466 2d6d 6574 686f 6420 get-setf-method │ │ │ +00011b00: 6e69 6c20 6e6f 2d6f 7074 2075 6e73 6166 nil no-opt unsaf │ │ │ +00011b10: 6520 636c 2d73 6166 652d 6578 7072 2d70 e cl-safe-expr-p │ │ │ +00011b20: 2063 6c2d 7365 7466 2d73 696d 706c 652d cl-setf-simple- │ │ │ +00011b30: 7374 6f72 652d 7020 3220 3320 636c 2d73 store-p 2 3 cl-s │ │ │ +00011b40: 696d 706c 652d 6578 7072 732d 7020 636c imple-exprs-p cl │ │ │ +00011b50: 2d63 6f6e 7374 2d65 7870 722d 7020 7375 -const-expr-p su │ │ │ +00011b60: 626c 6973 2034 206f 7074 2d65 7870 7220 blis 4 opt-expr │ │ │ +00011b70: 7369 6d70 6c65 2063 6c2d 6d61 6372 6f2d simple cl-macro- │ │ │ +00011b80: 656e 7669 726f 6e6d 656e 7420 6f70 7469 environment opti │ │ │ +00011b90: 6d69 7a65 5d20 375d 290a 2864 6566 616c mize] 7]).(defal │ │ │ +00011ba0: 6961 7320 2763 6c2d 7365 7466 2d64 6f2d ias 'cl-setf-do- │ │ │ +00011bb0: 7374 6f72 6520 235b 2873 7065 6320 7661 store #[(spec va │ │ │ +00011bc0: 6c29 2022 0840 0841 1b1a c409 21ac 93c5 l) ".@.A....!... │ │ │ +00011bd0: 0921 ab88 c60b 5c6e 5c22 c761 ac86 c85c .!....\n\".a...\ │ │ │ +00011be0: 6e0b 5c22 ab87 c909 5c6e 0b23 aa87 ca5c n.\"....\n.#...\ │ │ │ +00011bf0: 6e09 4443 0b45 2a87 2220 5b73 7065 6320 n.DC.E*." [spec │ │ │ +00011c00: 7661 6c20 7379 6d20 666f 726d 2063 6c2d val sym form cl- │ │ │ +00011c10: 636f 6e73 742d 6578 7072 2d70 2063 6c2d const-expr-p cl- │ │ │ +00011c20: 7369 6d70 6c65 2d65 7870 722d 7020 636c simple-expr-p cl │ │ │ +00011c30: 2d65 7870 722d 636f 6e74 6169 6e73 2031 -expr-contains 1 │ │ │ +00011c40: 2063 6c2d 7365 7466 2d73 696d 706c 652d cl-setf-simple- │ │ │ +00011c50: 7374 6f72 652d 7020 7375 6273 7420 6c65 store-p subst le │ │ │ +00011c60: 745d 2034 5d29 0a28 6465 6661 6c69 6173 t] 4]).(defalias │ │ │ +00011c70: 2027 636c 2d73 6574 662d 7369 6d70 6c65 'cl-setf-simple │ │ │ +00011c80: 2d73 746f 7265 2d70 2023 5b28 7379 6d20 -store-p #[(sym │ │ │ +00011c90: 666f 726d 2920 2209 3aad a3c2 0908 5c22 form) ".:.....\" │ │ │ +00011ca0: c361 ad9b 0947 5309 3808 61ad 9209 4039 .a...GS.8.a...@9 │ │ │ +00011cb0: ad8d c409 4021 ad87 0940 4ba2 c561 3f87 ....@!...@K..a?. │ │ │ +00011cc0: 2220 5b73 796d 2066 6f72 6d20 636c 2d65 " [sym form cl-e │ │ │ +00011cd0: 7870 722d 636f 6e74 6169 6e73 2031 2066 xpr-contains 1 f │ │ │ +00011ce0: 626f 756e 6470 206d 6163 726f 5d20 335d boundp macro] 3] │ │ │ +00011cf0: 290a 2340 3332 3520 2873 6574 6620 504c ).#@325 (setf PL │ │ │ +00011d00: 4143 4520 5641 4c20 504c 4143 4520 5641 ACE VAL PLACE VA │ │ │ +00011d10: 4c20 2e2e 2e29 3a20 7365 7420 6561 6368 L ...): set each │ │ │ +00011d20: 2050 4c41 4345 2074 6f20 7468 6520 7661 PLACE to the va │ │ │ +00011d30: 6c75 6520 6f66 2069 7473 2056 414c 2e0a lue of its VAL.. │ │ │ +00011d40: 5468 6973 2069 7320 6120 6765 6e65 7261 This is a genera │ │ │ +00011d50: 6c69 7a65 6420 7665 7273 696f 6e20 6f66 lized version of │ │ │ +00011d60: 2060 7365 7471 273b 2074 6865 2050 4c41 `setq'; the PLA │ │ │ +00011d70: 4345 7320 6d61 7920 6265 2073 796d 626f CEs may be symbo │ │ │ +00011d80: 6c69 630a 7265 6665 7265 6e63 6573 2073 lic.references s │ │ │ +00011d90: 7563 6820 6173 2028 6361 7220 7829 206f uch as (car x) o │ │ │ +00011da0: 7220 2861 7265 6620 7820 6929 2c20 6173 r (aref x i), as │ │ │ +00011db0: 2077 656c 6c20 6173 2070 6c61 696e 2073 well as plain s │ │ │ +00011dc0: 796d 626f 6c73 2e0a 466f 7220 6578 616d ymbols..For exam │ │ │ +00011dd0: 706c 652c 2028 7365 7466 2028 6361 6461 ple, (setf (cada │ │ │ +00011de0: 7220 7829 2079 2920 6973 2065 7175 6976 r x) y) is equiv │ │ │ +00011df0: 616c 656e 7420 746f 2028 7365 7463 6172 alent to (setcar │ │ │ +00011e00: 2028 6364 6172 2078 2920 7929 2e0a 5468 (cdar x) y)..Th │ │ │ +00011e10: 6520 7265 7475 726e 2076 616c 7565 2069 e return value i │ │ │ +00011e20: 7320 7468 6520 6c61 7374 2056 414c 2069 s the last VAL i │ │ │ +00011e30: 6e20 7468 6520 6c69 7374 2e1f 0a28 6465 n the list...(de │ │ │ +00011e40: 6661 6c69 6173 2027 7365 7466 2027 286d falias 'setf '(m │ │ │ +00011e50: 6163 726f 202e 2023 5b28 2672 6573 7420 acro . #[(&rest │ │ │ +00011e60: 6172 6773 2920 220b 4141 ab9c c41a 0bab args) ".AA...... │ │ │ +00011e70: 91c5 0b89 4113 400b 8941 1340 455c 6e42 ....A.@..A.@E\nB │ │ │ +00011e80: 12aa 6cc6 5c6e 9f29 4287 0b40 39ab 870b ..l.\n.)B..@9... │ │ │ +00011e90: ada2 c70b 4287 c80b 400b 4140 5c22 19c9 ....B...@.A@\".. │ │ │ +00011ea0: 0941 400b 4140 5c22 1809 40ab 87ca 0940 .A@.A@\"..@....@ │ │ │ +00011eb0: 0845 aa81 082a 8722 205b 7374 6f72 6520 .E...*." [store │ │ │ +00011ec0: 6d65 7468 6f64 2073 6574 7320 6172 6773 method sets args │ │ │ +00011ed0: 206e 696c 2073 6574 6620 7072 6f67 6e20 nil setf progn │ │ │ +00011ee0: 7365 7471 2063 6c2d 7365 7466 2d64 6f2d setq cl-setf-do- │ │ │ +00011ef0: 6d6f 6469 6679 2063 6c2d 7365 7466 2d64 modify cl-setf-d │ │ │ +00011f00: 6f2d 7374 6f72 6520 6c65 742a 5d20 3420 o-store let*] 4 │ │ │ +00011f10: 2823 2420 2e20 3732 3935 3229 5d29 290a (#$ . 72952)])). │ │ │ +00011f20: 2340 3230 3620 2870 7365 7466 2050 4c41 #@206 (psetf PLA │ │ │ +00011f30: 4345 2056 414c 2050 4c41 4345 2056 414c CE VAL PLACE VAL │ │ │ +00011f40: 202e 2e2e 293a 2073 6574 2050 4c41 4345 ...): set PLACE │ │ │ +00011f50: 7320 746f 2074 6865 2076 616c 7565 7320 s to the values │ │ │ +00011f60: 5641 4c73 2069 6e20 7061 7261 6c6c 656c VALs in parallel │ │ │ +00011f70: 2e0a 5468 6973 2069 7320 6c69 6b65 2060 ..This is like ` │ │ │ +00011f80: 7365 7466 272c 2065 7863 6570 7420 7468 setf', except th │ │ │ +00011f90: 6174 2061 6c6c 2056 414c 2066 6f72 6d73 at all VAL forms │ │ │ +00011fa0: 2061 7265 2065 7661 6c75 6174 6564 2028 are evaluated ( │ │ │ +00011fb0: 696e 206f 7264 6572 290a 6265 666f 7265 in order).before │ │ │ +00011fc0: 2061 7373 6967 6e69 6e67 2061 6e79 2050 assigning any P │ │ │ +00011fd0: 4c41 4345 7320 746f 2074 6865 2063 6f72 LACEs to the cor │ │ │ +00011fe0: 7265 7370 6f6e 6469 6e67 2076 616c 7565 responding value │ │ │ +00011ff0: 732e 1f0a 2864 6566 616c 6961 7320 2770 s...(defalias 'p │ │ │ +00012000: 7365 7466 2027 286d 6163 726f 202e 2023 setf '(macro . # │ │ │ +00012010: 5b28 2672 6573 7420 6172 6773 2920 220b [(&rest args) ". │ │ │ +00012020: c5c6 1a18 1c0c abb1 0c40 39ab 88c7 0c41 .........@9....A │ │ │ +00012030: 405c 6e5c 22ab 82c6 100c 405c 6e73 ab86 @\n\".....@\ns.. │ │ │ +00012040: c8c9 0c40 5c22 880c 8941 1440 5c6e 4212 ...@\"...A.@\nB. │ │ │ +00012050: 0cac 84c8 ca21 880c 8941 1488 aa4c 08ab .....!...A...L.. │ │ │ +00012060: 88cb cc0b 42c6 45aa a5cd 0b21 13cc 0b41 ....B.E....!...A │ │ │ +00012070: 400b 4045 190b 4141 8913 ab8d cc0b 4140 @.@E..AA......A@ │ │ │ +00012080: ce0b 4009 4545 11aa 6ccb 09c6 4529 2b87 ..@.EE..l...E)+. │ │ │ +00012090: 2220 5b73 696d 706c 6520 6578 7072 2076 " [simple expr v │ │ │ +000120a0: 6172 7320 6172 6773 2070 2074 206e 696c ars args p t nil │ │ │ +000120b0: 2063 6c2d 6578 7072 2d64 6570 656e 6473 cl-expr-depends │ │ │ +000120c0: 2d70 2065 7272 6f72 2022 4465 7374 696e -p error "Destin │ │ │ +000120d0: 6174 696f 6e20 6475 706c 6963 6174 6564 ation duplicated │ │ │ +000120e0: 2069 6e20 7073 6574 663a 2025 7322 2022 in psetf: %s" " │ │ │ +000120f0: 4f64 6420 6e75 6d62 6572 206f 6620 6172 Odd number of ar │ │ │ +00012100: 6775 6d65 6e74 7320 746f 2070 7365 7466 guments to psetf │ │ │ +00012110: 2220 7072 6f67 6e20 7365 7466 2072 6576 " progn setf rev │ │ │ +00012120: 6572 7365 2070 726f 6731 5d20 3520 2823 erse prog1] 5 (# │ │ │ +00012130: 2420 2e20 3733 3531 3029 5d29 290a 2864 $ . 73510)])).(d │ │ │ +00012140: 6566 616c 6961 7320 2763 6c2d 646f 2d70 efalias 'cl-do-p │ │ │ +00012150: 6f70 2023 5b28 706c 6163 6529 2022 c35c op #[(place) ".\ │ │ │ +00012160: 6e21 ab8c c4c5 5c6e 44c6 5c6e c75c 6e44 n!....\nD.\n.\nD │ │ │ +00012170: 4545 87c8 5c6e c95c 2219 cacb 2118 cccd EE..\n.\"...!... │ │ │ +00012180: 0940 08ce 0938 4443 5c22 c4c5 0844 cf09 .@...8DC\"...D.. │ │ │ +00012190: 4140 c708 445c 2245 452a 8722 205b 7465 A@..D\"EE*." [te │ │ │ +000121a0: 6d70 206d 6574 686f 6420 706c 6163 6520 mp method place │ │ │ +000121b0: 636c 2d73 696d 706c 652d 6578 7072 2d70 cl-simple-expr-p │ │ │ +000121c0: 2070 726f 6731 2063 6172 2073 6574 6620 prog1 car setf │ │ │ +000121d0: 6364 7220 636c 2d73 6574 662d 646f 2d6d cdr cl-setf-do-m │ │ │ +000121e0: 6f64 6966 7920 7420 6765 6e73 796d 2022 odify t gensym " │ │ │ +000121f0: 2d2d 706f 702d 2d22 206c 6574 2a20 6170 --pop--" let* ap │ │ │ +00012200: 7065 6e64 2032 2063 6c2d 7365 7466 2d64 pend 2 cl-setf-d │ │ │ +00012210: 6f2d 7374 6f72 655d 2038 5d29 0a23 4031 o-store] 8]).#@1 │ │ │ +00012220: 3933 2028 7265 6d66 2050 4c41 4345 2054 93 (remf PLACE T │ │ │ +00012230: 4147 293a 2072 656d 6f76 6520 5441 4720 AG): remove TAG │ │ │ +00012240: 6672 6f6d 2070 726f 7065 7274 7920 6c69 from property li │ │ │ +00012250: 7374 2050 4c41 4345 2e0a 504c 4143 4520 st PLACE..PLACE │ │ │ +00012260: 6d61 7920 6265 2061 2073 796d 626f 6c2c may be a symbol, │ │ │ +00012270: 206f 7220 616e 7920 6765 6e65 7261 6c69 or any generali │ │ │ +00012280: 7a65 6420 7661 7269 6162 6c65 2061 6c6c zed variable all │ │ │ +00012290: 6f77 6564 2062 7920 6073 6574 6627 2e0a owed by `setf'.. │ │ │ +000122a0: 5468 6520 666f 726d 2072 6574 7572 6e73 The form returns │ │ │ +000122b0: 2074 7275 6520 6966 2054 4147 2077 6173 true if TAG was │ │ │ +000122c0: 2066 6f75 6e64 2061 6e64 2072 656d 6f76 found and remov │ │ │ +000122d0: 6564 2c20 6e69 6c20 6f74 6865 7277 6973 ed, nil otherwis │ │ │ +000122e0: 652e 1f0a 2864 6566 616c 6961 7320 2772 e...(defalias 'r │ │ │ +000122f0: 656d 6620 2728 6d61 6372 6f20 2e20 235b emf '(macro . #[ │ │ │ +00012300: 2870 6c61 6365 2074 6167 2920 22c6 0e17 (place tag) "... │ │ │ +00012310: c75c 221d c809 213f ad83 c9ca 211c cb0e .\"...!?....!... │ │ │ +00012320: 1721 3fad 83c9 cc21 1b0c ae81 0918 0bae .!?....!........ │ │ │ +00012330: 83cd 0d38 1ace cf0d 400b ad86 0bcd 0d38 ...8....@......8 │ │ │ +00012340: 4443 0cad 840c 0944 4323 d0d1 08d2 5c6e DC.....DC#....\n │ │ │ +00012350: 4445 d3d4 0d41 40d5 5c6e 445c 22c7 45d6 DE...A@.\nD\".E. │ │ │ +00012360: 5c6e 0845 4645 2d87 2220 5b74 7461 6720 \n.EFE-." [ttag │ │ │ +00012370: 7461 6720 7476 616c 2076 616c 2d74 656d tag tval val-tem │ │ │ +00012380: 7020 7461 672d 7465 6d70 206d 6574 686f p tag-temp metho │ │ │ +00012390: 6420 636c 2d73 6574 662d 646f 2d6d 6f64 d cl-setf-do-mod │ │ │ +000123a0: 6966 7920 7420 636c 2d63 6f6e 7374 2d65 ify t cl-const-e │ │ │ +000123b0: 7870 722d 7020 6765 6e73 796d 2022 2d2d xpr-p gensym "-- │ │ │ +000123c0: 7265 6d66 2d74 6167 2d2d 2220 636c 2d73 remf-tag--" cl-s │ │ │ +000123d0: 696d 706c 652d 6578 7072 2d70 2022 2d2d imple-expr-p "-- │ │ │ +000123e0: 7265 6d66 2d70 6c61 6365 2d2d 2220 3220 remf-place--" 2 │ │ │ +000123f0: 6c65 742a 2061 7070 656e 6420 6966 2065 let* append if e │ │ │ +00012400: 7120 6361 7220 7072 6f67 6e20 636c 2d73 q car progn cl-s │ │ │ +00012410: 6574 662d 646f 2d73 746f 7265 2063 6464 etf-do-store cdd │ │ │ +00012420: 7220 636c 2d64 6f2d 7265 6d66 2070 6c61 r cl-do-remf pla │ │ │ +00012430: 6365 5d20 3920 2823 2420 2e20 3734 3237 ce] 9 (#$ . 7427 │ │ │ +00012440: 3529 5d29 290a 2340 3139 3820 2873 6869 5)])).#@198 (shi │ │ │ +00012450: 6674 6620 504c 4143 4520 504c 4143 452e ftf PLACE PLACE. │ │ │ +00012460: 2e2e 2056 414c 293a 2073 6869 6674 206c .. VAL): shift l │ │ │ +00012470: 6566 7420 616d 6f6e 6720 504c 4143 4573 eft among PLACEs │ │ │ +00012480: 2e0a 4578 616d 706c 653a 2028 7368 6966 ..Example: (shif │ │ │ +00012490: 7466 2041 2042 2043 2920 7365 7473 2041 tf A B C) sets A │ │ │ +000124a0: 2074 6f20 422c 2042 2074 6f20 432c 2061 to B, B to C, a │ │ │ +000124b0: 6e64 2072 6574 7572 6e73 2074 6865 206f nd returns the o │ │ │ +000124c0: 6c64 2041 2e0a 4561 6368 2050 4c41 4345 ld A..Each PLACE │ │ │ +000124d0: 206d 6179 2062 6520 6120 7379 6d62 6f6c may be a symbol │ │ │ +000124e0: 2c20 6f72 2061 6e79 2067 656e 6572 616c , or any general │ │ │ +000124f0: 697a 6564 2076 6172 6961 626c 6520 616c ized variable al │ │ │ +00012500: 6c6f 7765 6420 6279 2060 7365 7466 272e lowed by `setf'. │ │ │ +00012510: 1f0a 2864 6566 616c 6961 7320 2773 6869 ..(defalias 'shi │ │ │ +00012520: 6674 6620 2728 6d61 6372 6f20 2e20 235b ftf '(macro . #[ │ │ │ +00012530: 2870 6c61 6365 2026 7265 7374 2061 7267 (place &rest arg │ │ │ +00012540: 7329 2022 c6c7 c8c9 0c0d 4221 5c22 73ac s) "......B!\"s. │ │ │ +00012550: 9dca 0cc6 1a0d ab90 cb0c 0d40 455c 6e42 ...........@E\nB │ │ │ +00012560: 120d 8941 1540 14aa 6d5c 6e9f 2942 4287 ...A.@..m\n.)BB. │ │ │ +00012570: cc0c 0d42 2189 1b89 4113 4019 0bab 9ccd ...B!...A.@..... │ │ │ +00012580: 0b89 4113 40ce 5c22 18cf 0840 cad0 0838 ..A.@.\"...@...8 │ │ │ +00012590: d108 4140 095c 2245 4511 29aa 6109 2a87 ..A@.\"EE.).a.*. │ │ │ +000125a0: 2220 5b6d 6574 686f 6420 666f 726d 2073 " [method form s │ │ │ +000125b0: 6574 7320 706c 6163 6573 2070 6c61 6365 ets places place │ │ │ +000125c0: 2061 7267 7320 6e69 6c20 6d61 7063 6172 args nil mapcar │ │ │ +000125d0: 2073 796d 626f 6c70 2062 7574 6c61 7374 symbolp butlast │ │ │ +000125e0: 2070 726f 6731 2073 6574 7120 7265 7665 prog1 setq reve │ │ │ +000125f0: 7273 6520 636c 2d73 6574 662d 646f 2d6d rse cl-setf-do-m │ │ │ +00012600: 6f64 6966 7920 756e 7361 6665 206c 6574 odify unsafe let │ │ │ +00012610: 2a20 3220 636c 2d73 6574 662d 646f 2d73 * 2 cl-setf-do-s │ │ │ +00012620: 746f 7265 5d20 3820 2823 2420 2e20 3734 tore] 8 (#$ . 74 │ │ │ +00012630: 3832 3829 5d29 290a 2340 3139 3720 2872 828)])).#@197 (r │ │ │ +00012640: 6f74 6174 6566 2050 4c41 4345 2e2e 2e29 otatef PLACE...) │ │ │ +00012650: 3a20 726f 7461 7465 206c 6566 7420 616d : rotate left am │ │ │ +00012660: 6f6e 6720 504c 4143 4573 2e0a 4578 616d ong PLACEs..Exam │ │ │ +00012670: 706c 653a 2028 726f 7461 7465 6620 4120 ple: (rotatef A │ │ │ +00012680: 4220 4329 2073 6574 7320 4120 746f 2042 B C) sets A to B │ │ │ +00012690: 2c20 4220 746f 2043 2c20 616e 6420 4320 , B to C, and C │ │ │ +000126a0: 746f 2041 2e20 2049 7420 7265 7475 726e to A. It return │ │ │ +000126b0: 7320 6e69 6c2e 0a45 6163 6820 504c 4143 s nil..Each PLAC │ │ │ +000126c0: 4520 6d61 7920 6265 2061 2073 796d 626f E may be a symbo │ │ │ +000126d0: 6c2c 206f 7220 616e 7920 6765 6e65 7261 l, or any genera │ │ │ +000126e0: 6c69 7a65 6420 7661 7269 6162 6c65 2061 lized variable a │ │ │ +000126f0: 6c6c 6f77 6564 2062 7920 6073 6574 6627 llowed by `setf' │ │ │ +00012700: 2e1f 0a28 6465 6661 6c69 6173 2027 726f ...(defalias 'ro │ │ │ +00012710: 7461 7465 6620 2728 6d61 6372 6f20 2e20 tatef '(macro . │ │ │ +00012720: 235b 2826 7265 7374 2061 7267 7329 2022 #[(&rest args) " │ │ │ +00012730: c6c7 c80d 5c22 73ac a50d 41ad e7c6 0d40 ....\"s...A....@ │ │ │ +00012740: 181a 0d41 ab8d 5c6e 0d89 4115 400d 4044 ...A..\n..A.@.@D │ │ │ +00012750: a412 aa6f c943 5c6e a40d 4008 44a4 2a87 ...o.C\n..@.D.*. │ │ │ +00012760: ca0d 211b cbcc 2189 1e14 190b 41ab 9ccd ..!...!.....A... │ │ │ +00012770: 0b89 4113 40ce 5c22 1ccf 0c40 d0d1 0c38 ..A.@.\"...@...8 │ │ │ +00012780: d20c 4140 095c 2245 4511 29aa 60cd 0b40 ..A@.\"EE.).`..@ │ │ │ +00012790: ce5c 221c cfd3 0c40 0e14 d10c 3844 435c .\"....@....8DC\ │ │ │ +000127a0: 22d2 0c41 4009 5c22 c646 2c87 2220 5b66 "..A@.\".F,." [f │ │ │ +000127b0: 6972 7374 2066 6f72 6d20 7365 7473 2070 irst form sets p │ │ │ +000127c0: 6c61 6365 7320 6d65 7468 6f64 2061 7267 laces method arg │ │ │ +000127d0: 7320 6e69 6c20 6d61 7063 6172 2073 796d s nil mapcar sym │ │ │ +000127e0: 626f 6c70 2070 7365 7466 2072 6576 6572 bolp psetf rever │ │ │ +000127f0: 7365 2067 656e 7379 6d20 222d 2d72 6f74 se gensym "--rot │ │ │ +00012800: 6174 6566 2d2d 2220 636c 2d73 6574 662d atef--" cl-setf- │ │ │ +00012810: 646f 2d6d 6f64 6966 7920 756e 7361 6665 do-modify unsafe │ │ │ +00012820: 206c 6574 2a20 7072 6f67 3120 3220 636c let* prog1 2 cl │ │ │ +00012830: 2d73 6574 662d 646f 2d73 746f 7265 2061 -setf-do-store a │ │ │ +00012840: 7070 656e 6420 7465 6d70 5d20 3820 2823 ppend temp] 8 (# │ │ │ +00012850: 2420 2e20 3735 3332 3629 5d29 290a 2340 $ . 75326)])).#@ │ │ │ +00012860: 3533 3320 286c 6574 6620 2828 504c 4143 533 (letf ((PLAC │ │ │ +00012870: 4520 5641 4c55 4529 202e 2e2e 2920 424f E VALUE) ...) BO │ │ │ +00012880: 4459 2e2e 2e29 3a20 7465 6d70 6f72 6172 DY...): temporar │ │ │ +00012890: 696c 7920 6269 6e64 2074 6f20 504c 4143 ily bind to PLAC │ │ │ +000128a0: 4573 2e0a 5468 6973 2069 7320 7468 6520 Es..This is the │ │ │ +000128b0: 616e 616c 6f67 7565 206f 6620 606c 6574 analogue of `let │ │ │ +000128c0: 272c 2062 7574 2077 6974 6820 6765 6e65 ', but with gene │ │ │ +000128d0: 7261 6c69 7a65 6420 7661 7269 6162 6c65 ralized variable │ │ │ +000128e0: 7320 2869 6e20 7468 650a 7365 6e73 6520 s (in the.sense │ │ │ +000128f0: 6f66 2060 7365 7466 2729 2066 6f72 2074 of `setf') for t │ │ │ +00012900: 6865 2050 4c41 4345 732e 2020 4561 6368 he PLACEs. Each │ │ │ +00012910: 2050 4c41 4345 2069 7320 7365 7420 746f PLACE is set to │ │ │ +00012920: 2074 6865 2063 6f72 7265 7370 6f6e 6469 the correspondi │ │ │ +00012930: 6e67 0a56 414c 5545 2c20 7468 656e 2074 ng.VALUE, then t │ │ │ +00012940: 6865 2042 4f44 5920 666f 726d 7320 6172 he BODY forms ar │ │ │ +00012950: 6520 6578 6563 7574 6564 2e20 204f 6e20 e executed. On │ │ │ +00012960: 6578 6974 2c20 6569 7468 6572 206e 6f72 exit, either nor │ │ │ +00012970: 6d61 6c6c 7920 6f72 0a62 6563 6175 7365 mally or.because │ │ │ +00012980: 206f 6620 6120 6074 6872 6f77 2720 6f72 of a `throw' or │ │ │ +00012990: 2065 7272 6f72 2c20 7468 6520 504c 4143 error, the PLAC │ │ │ +000129a0: 4573 2061 7265 2073 6574 2062 6163 6b20 Es are set back │ │ │ +000129b0: 746f 2074 6865 6972 206f 7269 6769 6e61 to their origina │ │ │ +000129c0: 6c0a 7661 6c75 6573 2e20 204e 6f74 6520 l.values. Note │ │ │ +000129d0: 7468 6174 2074 6869 7320 6d61 6372 6f20 that this macro │ │ │ +000129e0: 6973 202a 6e6f 742a 2061 7661 696c 6162 is *not* availab │ │ │ +000129f0: 6c65 2069 6e20 436f 6d6d 6f6e 204c 6973 le in Common Lis │ │ │ +00012a00: 702e 0a41 7320 6120 7370 6563 6961 6c20 p..As a special │ │ │ +00012a10: 6361 7365 2c20 6966 2060 2850 4c41 4345 case, if `(PLACE │ │ │ +00012a20: 2927 2069 7320 7573 6564 2069 6e73 7465 )' is used inste │ │ │ +00012a30: 6164 206f 6620 6028 504c 4143 4520 5641 ad of `(PLACE VA │ │ │ +00012a40: 4c55 4529 272c 0a74 6865 2050 4c41 4345 LUE)',.the PLACE │ │ │ +00012a50: 2069 7320 6e6f 7420 6d6f 6469 6669 6564 is not modified │ │ │ +00012a60: 2062 6566 6f72 6520 6578 6563 7574 696e before executin │ │ │ +00012a70: 6720 424f 4459 2e1f 0a28 6465 6661 6c69 g BODY...(defali │ │ │ +00012a80: 6173 2027 6c65 7466 2027 286d 6163 726f as 'letf '(macro │ │ │ +00012a90: 202e 2023 5b28 6269 6e64 696e 6773 2026 . #[(bindings & │ │ │ +00012aa0: 7265 7374 2062 6f64 7929 2022 0b41 ac91 rest body) ".A.. │ │ │ +00012ab0: 0b40 41ab 8c0b 4040 39ab 86c6 0b09 4242 .@A...@@9.....BB │ │ │ +00012ac0: 87c7 c80b 211d 1e1f 0d83 e100 0d40 4039 ....!........@@9 │ │ │ +00012ad0: ab89 c9ca 0d40 4044 44aa 830d 4040 180d .....@@DD...@@.. │ │ │ +00012ae0: 4041 401e 20cb 08cc 5c22 1ccd ce21 1e1e @A@. ...\"...!.. │ │ │ +00012af0: 0840 cf73 ad83 cdd0 211a d10e 2021 3fad .@.s....!... !?. │ │ │ +00012b00: 870b 41ad 83cd d221 1e21 0c40 5c6e ab9e ..A....!.!.@\n.. │ │ │ +00012b10: 5c6e 0840 c961 ab83 d3aa 81d4 d50c 3841 \n.@.a........8A │ │ │ +00012b20: 4044 440e 1ed6 5c6e d50c 3845 4444 aa87 @DD...\n..8EDD.. │ │ │ +00012b30: 0e1e d50c 3844 43a4 0e21 ad86 0e21 0e20 ....8DC..!...!. │ │ │ +00012b40: 4443 a40e 1fa4 161f d7d8 0d40 41ab 8fd9 DC.........@A... │ │ │ +00012b50: 0c41 400e 21ae 820e 205c 2209 42aa 8109 .A@.!... \".B... │ │ │ +00012b60: 425c 6eab 9cda 5c6e d90c 4140 0e1e 5c22 B\n...\n..A@..\" │ │ │ +00012b70: 0840 c961 ab83 dbaa 81dc d50c 3841 4044 .@.a........8A@D │ │ │ +00012b80: 46aa 87d9 0c41 400e 1e5c 2245 4311 0d41 F....A@..\"EC..A │ │ │ +00012b90: 152e 0682 1c00 dd0e 1f09 2a42 4287 2220 ..........*BB." │ │ │ +00012ba0: 5b70 6c61 6365 2062 6f64 7920 626f 756e [place body boun │ │ │ +00012bb0: 6420 6269 6e64 696e 6773 206d 6574 686f d bindings metho │ │ │ +00012bc0: 6420 7265 7620 6c65 7420 6e69 6c20 7265 d rev let nil re │ │ │ +00012bd0: 7665 7273 6520 7379 6d62 6f6c 2d76 616c verse symbol-val │ │ │ +00012be0: 7565 2071 756f 7465 2063 6c2d 7365 7466 ue quote cl-setf │ │ │ +00012bf0: 2d64 6f2d 6d6f 6469 6679 206e 6f2d 6f70 -do-modify no-op │ │ │ +00012c00: 7420 6765 6e73 796d 2022 2d2d 6c65 7466 t gensym "--letf │ │ │ +00012c10: 2d73 6176 652d 2d22 2028 7379 6d62 6f6c -save--" (symbol │ │ │ +00012c20: 2d76 616c 7565 2073 796d 626f 6c2d 6675 -value symbol-fu │ │ │ +00012c30: 6e63 7469 6f6e 2920 222d 2d6c 6574 662d nction) "--letf- │ │ │ +00012c40: 626f 756e 642d 2d22 2063 6c2d 636f 6e73 bound--" cl-cons │ │ │ +00012c50: 742d 6578 7072 2d70 2022 2d2d 6c65 7466 t-expr-p "--letf │ │ │ +00012c60: 2d76 616c 2d2d 2220 626f 756e 6470 2066 -val--" boundp f │ │ │ +00012c70: 626f 756e 6470 2032 2061 6e64 2075 6e77 boundp 2 and unw │ │ │ +00012c80: 696e 642d 7072 6f74 6563 7420 7072 6f67 ind-protect prog │ │ │ +00012c90: 6e20 636c 2d73 6574 662d 646f 2d73 746f n cl-setf-do-sto │ │ │ +00012ca0: 7265 2069 6620 6d61 6b75 6e62 6f75 6e64 re if makunbound │ │ │ +00012cb0: 2066 6d61 6b75 6e62 6f75 6e64 206c 6574 fmakunbound let │ │ │ +00012cc0: 2a20 7361 7665 206c 6574 7320 7661 6c75 * save lets valu │ │ │ +00012cd0: 6520 7465 6d70 5d20 3820 2823 2420 2e20 e temp] 8 (#$ . │ │ │ +00012ce0: 3735 3837 3629 5d29 290a 2340 3533 3520 75876)])).#@535 │ │ │ +00012cf0: 286c 6574 662a 2028 2850 4c41 4345 2056 (letf* ((PLACE V │ │ │ +00012d00: 414c 5545 2920 2e2e 2e29 2042 4f44 592e ALUE) ...) BODY. │ │ │ +00012d10: 2e2e 293a 2074 656d 706f 7261 7269 6c79 ..): temporarily │ │ │ +00012d20: 2062 696e 6420 746f 2050 4c41 4345 732e bind to PLACEs. │ │ │ +00012d30: 0a54 6869 7320 6973 2074 6865 2061 6e61 .This is the ana │ │ │ +00012d40: 6c6f 6775 6520 6f66 2060 6c65 742a 272c logue of `let*', │ │ │ +00012d50: 2062 7574 2077 6974 6820 6765 6e65 7261 but with genera │ │ │ +00012d60: 6c69 7a65 6420 7661 7269 6162 6c65 7320 lized variables │ │ │ +00012d70: 2869 6e20 7468 650a 7365 6e73 6520 6f66 (in the.sense of │ │ │ +00012d80: 2060 7365 7466 2729 2066 6f72 2074 6865 `setf') for the │ │ │ +00012d90: 2050 4c41 4345 732e 2020 4561 6368 2050 PLACEs. Each P │ │ │ +00012da0: 4c41 4345 2069 7320 7365 7420 746f 2074 LACE is set to t │ │ │ +00012db0: 6865 2063 6f72 7265 7370 6f6e 6469 6e67 he corresponding │ │ │ +00012dc0: 0a56 414c 5545 2c20 7468 656e 2074 6865 .VALUE, then the │ │ │ +00012dd0: 2042 4f44 5920 666f 726d 7320 6172 6520 BODY forms are │ │ │ +00012de0: 6578 6563 7574 6564 2e20 204f 6e20 6578 executed. On ex │ │ │ +00012df0: 6974 2c20 6569 7468 6572 206e 6f72 6d61 it, either norma │ │ │ +00012e00: 6c6c 7920 6f72 0a62 6563 6175 7365 206f lly or.because o │ │ │ +00012e10: 6620 6120 6074 6872 6f77 2720 6f72 2065 f a `throw' or e │ │ │ +00012e20: 7272 6f72 2c20 7468 6520 504c 4143 4573 rror, the PLACEs │ │ │ +00012e30: 2061 7265 2073 6574 2062 6163 6b20 746f are set back to │ │ │ +00012e40: 2074 6865 6972 206f 7269 6769 6e61 6c0a their original. │ │ │ +00012e50: 7661 6c75 6573 2e20 204e 6f74 6520 7468 values. Note th │ │ │ +00012e60: 6174 2074 6869 7320 6d61 6372 6f20 6973 at this macro is │ │ │ +00012e70: 202a 6e6f 742a 2061 7661 696c 6162 6c65 *not* available │ │ │ +00012e80: 2069 6e20 436f 6d6d 6f6e 204c 6973 702e in Common Lisp. │ │ │ +00012e90: 0a41 7320 6120 7370 6563 6961 6c20 6361 .As a special ca │ │ │ +00012ea0: 7365 2c20 6966 2060 2850 4c41 4345 2927 se, if `(PLACE)' │ │ │ +00012eb0: 2069 7320 7573 6564 2069 6e73 7465 6164 is used instead │ │ │ +00012ec0: 206f 6620 6028 504c 4143 4520 5641 4c55 of `(PLACE VALU │ │ │ +00012ed0: 4529 272c 0a74 6865 2050 4c41 4345 2069 E)',.the PLACE i │ │ │ +00012ee0: 7320 6e6f 7420 6d6f 6469 6669 6564 2062 s not modified b │ │ │ +00012ef0: 6566 6f72 6520 6578 6563 7574 696e 6720 efore executing │ │ │ +00012f00: 424f 4459 2e1f 0a28 6465 6661 6c69 6173 BODY...(defalias │ │ │ +00012f10: 2027 6c65 7466 2a20 2728 6d61 6372 6f20 'letf* '(macro │ │ │ +00012f20: 2e20 235b 2862 696e 6469 6e67 7320 2672 . #[(bindings &r │ │ │ +00012f30: 6573 7420 626f 6479 2920 2209 ac84 c208 est body) "..... │ │ │ +00012f40: 4287 c309 2111 09ab 8ec4 0989 4111 4043 B...!.......A.@C │ │ │ +00012f50: 0842 4243 10aa 6f08 4087 2220 5b62 6f64 .BBC..o.@." [bod │ │ │ +00012f60: 7920 6269 6e64 696e 6773 2070 726f 676e y bindings progn │ │ │ +00012f70: 2072 6576 6572 7365 206c 6574 665d 2033 reverse letf] 3 │ │ │ +00012f80: 2028 2324 202e 2037 3730 3430 295d 2929 (#$ . 77040)])) │ │ │ +00012f90: 0a23 4031 3737 2028 6361 6c6c 6620 4655 .#@177 (callf FU │ │ │ +00012fa0: 4e43 2050 4c41 4345 2041 5247 532e 2e2e NC PLACE ARGS... │ │ │ +00012fb0: 293a 2073 6574 2050 4c41 4345 2074 6f20 ): set PLACE to │ │ │ +00012fc0: 2846 554e 4320 504c 4143 4520 4152 4753 (FUNC PLACE ARGS │ │ │ +00012fd0: 2e2e 2e29 2e0a 4655 4e43 2073 686f 756c ...)..FUNC shoul │ │ │ +00012fe0: 6420 6265 2061 6e20 756e 7175 6f74 6564 d be an unquoted │ │ │ +00012ff0: 2066 756e 6374 696f 6e20 6e61 6d65 2e20 function name. │ │ │ +00013000: 2050 4c41 4345 206d 6179 2062 6520 6120 PLACE may be a │ │ │ +00013010: 7379 6d62 6f6c 2c0a 6f72 2061 6e79 2067 symbol,.or any g │ │ │ +00013020: 656e 6572 616c 697a 6564 2076 6172 6961 eneralized varia │ │ │ +00013030: 626c 6520 616c 6c6f 7765 6420 6279 2060 ble allowed by ` │ │ │ +00013040: 7365 7466 272e 1f0a 2864 6566 616c 6961 setf'...(defalia │ │ │ +00013050: 7320 2763 616c 6c66 2027 286d 6163 726f s 'callf '(macro │ │ │ +00013060: 202e 2023 5b28 6675 6e63 2070 6c61 6365 . #[(func place │ │ │ +00013070: 2026 7265 7374 2061 7267 7329 2022 c508 &rest args) ".. │ │ │ +00013080: c609 425c 221c c70c 3809 421b c80c 40c9 ..B\"...8.B...@. │ │ │ +00013090: 0c41 405c 6e39 ab85 5c6e 0b42 aa87 cacb .A@\n9..\n.B.... │ │ │ +000130a0: 5c6e 440b 4242 5c22 452a 8722 205b 706c \nD.BB\"E*." [pl │ │ │ +000130b0: 6163 6520 6172 6773 2066 756e 6320 7261 ace args func ra │ │ │ +000130c0: 7267 7320 6d65 7468 6f64 2063 6c2d 7365 rgs method cl-se │ │ │ +000130d0: 7466 2d64 6f2d 6d6f 6469 6679 206c 6973 tf-do-modify lis │ │ │ +000130e0: 7420 3220 6c65 742a 2063 6c2d 7365 7466 t 2 let* cl-setf │ │ │ +000130f0: 2d64 6f2d 7374 6f72 6520 6675 6e63 616c -do-store funcal │ │ │ +00013100: 6c20 6675 6e63 7469 6f6e 5d20 3720 2823 l function] 7 (# │ │ │ +00013110: 2420 2e20 3737 3731 3929 5d29 290a 2340 $ . 77719)])).#@ │ │ │ +00013120: 3134 3620 2863 616c 6c66 3220 4655 4e43 146 (callf2 FUNC │ │ │ +00013130: 2041 5247 3120 504c 4143 4520 4152 4753 ARG1 PLACE ARGS │ │ │ +00013140: 2e2e 2e29 3a20 7365 7420 504c 4143 4520 ...): set PLACE │ │ │ +00013150: 746f 2028 4655 4e43 2041 5247 3120 504c to (FUNC ARG1 PL │ │ │ +00013160: 4143 4520 4152 4753 2e2e 2e29 2e0a 4c69 ACE ARGS...)..Li │ │ │ +00013170: 6b65 2060 6361 6c6c 6627 2c20 6275 7420 ke `callf', but │ │ │ +00013180: 504c 4143 4520 6973 2074 6865 2073 6563 PLACE is the sec │ │ │ +00013190: 6f6e 6420 6172 6775 6d65 6e74 206f 6620 ond argument of │ │ │ +000131a0: 4655 4e43 2c20 6e6f 7420 7468 6520 6669 FUNC, not the fi │ │ │ +000131b0: 7273 742e 1f0a 2864 6566 616c 6961 7320 rst...(defalias │ │ │ +000131c0: 2763 616c 6c66 3220 2728 6d61 6372 6f20 'callf2 '(macro │ │ │ +000131d0: 2e20 235b 2866 756e 6320 6172 6731 2070 . #[(func arg1 p │ │ │ +000131e0: 6c61 6365 2026 7265 7374 2061 7267 7329 lace &rest args) │ │ │ +000131f0: 2022 c60d 21ab 94c7 0b21 ab8f 0c39 ab8b "..!....!...9.. │ │ │ +00013200: c80b 0c0d 0b09 4242 4245 87c9 0bca 0942 ......BBBE.....B │ │ │ +00013210: 5c22 1acb 0d21 3fad 83cc cd21 8918 ae81 \"...!?....!.... │ │ │ +00013220: 0dce 5c6e 3809 4242 1e14 cfd0 08ad 8408 ..\n8.BB........ │ │ │ +00013230: 0d44 435c 6e40 5c22 d15c 6e41 400c 39ab .DC\n@\".\nA@.9. │ │ │ +00013240: 860c 0e14 42aa 88d2 d30c 440e 1442 425c ....B.....D..BB\ │ │ │ +00013250: 2245 2b87 2220 5b74 656d 7020 6172 6773 "E+." [temp args │ │ │ +00013260: 206d 6574 686f 6420 706c 6163 6520 6675 method place fu │ │ │ +00013270: 6e63 2061 7267 3120 636c 2d73 6166 652d nc arg1 cl-safe- │ │ │ +00013280: 6578 7072 2d70 2063 6c2d 7369 6d70 6c65 expr-p cl-simple │ │ │ +00013290: 2d65 7870 722d 7020 7365 7466 2063 6c2d -expr-p setf cl- │ │ │ +000132a0: 7365 7466 2d64 6f2d 6d6f 6469 6679 206c setf-do-modify l │ │ │ +000132b0: 6973 7420 636c 2d63 6f6e 7374 2d65 7870 ist cl-const-exp │ │ │ +000132c0: 722d 7020 6765 6e73 796d 2022 2d2d 6172 r-p gensym "--ar │ │ │ +000132d0: 6731 2d2d 2220 3220 6c65 742a 2061 7070 g1--" 2 let* app │ │ │ +000132e0: 656e 6420 636c 2d73 6574 662d 646f 2d73 end cl-setf-do-s │ │ │ +000132f0: 746f 7265 2066 756e 6361 6c6c 2066 756e tore funcall fun │ │ │ +00013300: 6374 696f 6e20 7261 7267 735d 2038 2028 ction rargs] 8 ( │ │ │ +00013310: 2324 202e 2037 3831 3136 295d 2929 0a23 #$ . 78116)])).# │ │ │ +00013320: 4032 3234 2028 6465 6669 6e65 2d6d 6f64 @224 (define-mod │ │ │ +00013330: 6966 792d 6d61 6372 6f20 4e41 4d45 2041 ify-macro NAME A │ │ │ +00013340: 5247 4c49 5354 2046 554e 4329 3a20 6465 RGLIST FUNC): de │ │ │ +00013350: 6669 6e65 2061 2060 7365 7466 272d 6c69 fine a `setf'-li │ │ │ +00013360: 6b65 206d 6f64 6966 7920 6d61 6372 6f2e ke modify macro. │ │ │ +00013370: 0a49 6620 4e41 4d45 2069 7320 6361 6c6c .If NAME is call │ │ │ +00013380: 6564 2c20 6974 2063 6f6d 6269 6e65 7320 ed, it combines │ │ │ +00013390: 6974 7320 504c 4143 4520 6172 6775 6d65 its PLACE argume │ │ │ +000133a0: 6e74 2077 6974 6820 7468 6520 6f74 6865 nt with the othe │ │ │ +000133b0: 7220 6172 6775 6d65 6e74 730a 6672 6f6d r arguments.from │ │ │ +000133c0: 2041 5247 4c49 5354 2075 7369 6e67 2046 ARGLIST using F │ │ │ +000133d0: 554e 433a 2028 6465 6669 6e65 2d6d 6f64 UNC: (define-mod │ │ │ +000133e0: 6966 792d 6d61 6372 6f20 696e 6366 2028 ify-macro incf ( │ │ │ +000133f0: 266f 7074 696f 6e61 6c20 286e 2031 2929 &optional (n 1)) │ │ │ +00013400: 202b 291f 0a28 6465 6661 6c69 6173 2027 +)..(defalias ' │ │ │ +00013410: 6465 6669 6e65 2d6d 6f64 6966 792d 6d61 define-modify-ma │ │ │ +00013420: 6372 6f20 2728 6d61 6372 6f20 2e20 235b cro '(macro . #[ │ │ │ +00013430: 286e 616d 6520 6172 676c 6973 7420 6675 (name arglist fu │ │ │ +00013440: 6e63 2026 6f70 7469 6f6e 616c 2064 6f63 nc &optional doc │ │ │ +00013450: 2920 22c5 0c73 ab84 c6c7 2188 c8c9 211b ) "..s....!...!. │ │ │ +00013460: ca5c 6e0b 0c42 09cb 0c73 ab83 ccaa 81cd .\n..B...s...... │ │ │ +00013470: cecf 0844 0bd0 0c21 4242 4242 af05 2987 ...D...!BBBB..). │ │ │ +00013480: 2220 5b66 756e 6320 646f 6320 6e61 6d65 " [func doc name │ │ │ +00013490: 2070 6c61 6365 2061 7267 6c69 7374 2026 place arglist & │ │ │ +000134a0: 6b65 7920 6572 726f 7220 2226 6b65 7920 key error "&key │ │ │ +000134b0: 6e6f 7420 616c 6c6f 7765 6420 696e 2064 not allowed in d │ │ │ +000134c0: 6566 696e 652d 6d6f 6469 6679 2d6d 6163 efine-modify-mac │ │ │ +000134d0: 726f 2220 6765 6e73 796d 2022 2d2d 706c ro" gensym "--pl │ │ │ +000134e0: 6163 652d 2d22 2064 6566 6d61 6372 6f2a ace--" defmacro* │ │ │ +000134f0: 2026 7265 7374 206c 6973 742a 206c 6973 &rest list* lis │ │ │ +00013500: 7420 2763 616c 6c66 2071 756f 7465 2063 t 'callf quote c │ │ │ +00013510: 6c2d 6172 676c 6973 742d 6172 6773 5d20 l-arglist-args] │ │ │ +00013520: 3130 2028 2324 202e 2037 3836 3239 295d 10 (#$ . 78629)] │ │ │ +00013530: 2929 0a23 4032 3839 2028 6465 6673 7472 )).#@289 (defstr │ │ │ +00013540: 7563 7420 284e 414d 4520 4f50 5449 4f4e uct (NAME OPTION │ │ │ +00013550: 532e 2e2e 2920 2853 4c4f 5420 534c 4f54 S...) (SLOT SLOT │ │ │ +00013560: 2d4f 5054 532e 2e2e 292e 2e2e 293a 2064 -OPTS...)...): d │ │ │ +00013570: 6566 696e 6520 6120 7374 7275 6374 2074 efine a struct t │ │ │ +00013580: 7970 652e 0a54 6869 7320 6d61 6372 6f20 ype..This macro │ │ │ +00013590: 6465 6669 6e65 7320 6120 6e65 7720 4c69 defines a new Li │ │ │ +000135a0: 7370 2064 6174 6120 7479 7065 2063 616c sp data type cal │ │ │ +000135b0: 6c65 6420 4e41 4d45 2c20 7768 6963 6820 led NAME, which │ │ │ +000135c0: 636f 6e74 6169 6e73 2064 6174 610a 7374 contains data.st │ │ │ +000135d0: 6f72 6564 2069 6e20 534c 4f54 732e 2020 ored in SLOTs. │ │ │ +000135e0: 5468 6973 2064 6566 696e 6573 2061 2060 This defines a ` │ │ │ +000135f0: 6d61 6b65 2d4e 414d 4527 2063 6f6e 7374 make-NAME' const │ │ │ +00013600: 7275 6374 6f72 2c20 6120 6063 6f70 792d ructor, a `copy- │ │ │ +00013610: 4e41 4d45 270a 636f 7069 6572 2c20 6120 NAME'.copier, a │ │ │ +00013620: 604e 414d 452d 7027 2070 7265 6469 6361 `NAME-p' predica │ │ │ +00013630: 7465 2c20 616e 6420 7365 7466 2d61 626c te, and setf-abl │ │ │ +00013640: 6520 604e 414d 452d 534c 4f54 2720 6163 e `NAME-SLOT' ac │ │ │ +00013650: 6365 7373 6f72 732e 1f0a 2864 6566 616c cessors...(defal │ │ │ +00013660: 6961 7320 2764 6566 7374 7275 6374 2027 ias 'defstruct ' │ │ │ +00013670: 286d 6163 726f 202e 2023 5b28 7374 7275 (macro . #[(stru │ │ │ +00013680: 6374 2026 7265 7374 2064 6573 6373 2920 ct &rest descs) │ │ │ +00013690: 220e 543a ab85 0e54 40aa 820e 541c 0e54 ".T:...T@...T..T │ │ │ +000136a0: a31e 4ac6 891e 451e 48c7 0c21 c850 1e59 ..J...E.H..!.P.Y │ │ │ +000136b0: c9ca cb0c 5c22 211e 55c6 1e46 c9ca cc0c ....\"!.U..F.... │ │ │ +000136c0: 5c22 211e 50c9 cacd 0c5c 2221 1e51 c689 \"!.P....\"!.Q.. │ │ │ +000136d0: 1e40 1e52 ce20 ab84 0e5d aa81 cf1e 5ac6 .@.R. ...]....Z. │ │ │ +000136e0: 18c9 cad0 0c5c 2221 1e4d c9ca d10c 5c22 .....\"!.M....\" │ │ │ +000136f0: 211e 4ec6 891e 4b1e 42c6 8919 1e47 c689 !.N...K.B....G.. │ │ │ +00013700: 1d1e 43c6 1e4f 0b40 3bab 8ed2 d30c 44d4 ..C..O.@;.....D. │ │ │ +00013710: 0b89 4113 4046 0d42 15d5 d6d7 0b5c 2242 ..A.@F.B.....\"B │ │ │ +00013720: 130e 4a83 4901 0e4a 403a ab86 0e4a 4040 ..J.I..J@:...J@@ │ │ │ +00013730: aa83 0e4a 400e 4a89 4116 4a40 a31a 891e ...J@.J.A.J@.... │ │ │ +00013740: 44d8 61ab 945c 6e83 4501 5c6e 40ab 86c7 D.a..\n.E.\n@... │ │ │ +00013750: 5c6e 4021 aa81 d916 5982 4501 0e44 da61 \n@!....Y.E..D.a │ │ │ +00013760: ab95 5c6e 41ab 885c 6e0e 4642 1646 aaf1 ..\nA..\n.FB.F.. │ │ │ +00013770: 5c6e abee 5c6e 4016 55aa e80e 44db 61ab \n..\n@.U...D.a. │ │ │ +00013780: 895c 6eab df5c 6e40 1650 aad9 0e44 dc61 .\n..\n@.P...D.a │ │ │ +00013790: ab89 5c6e abd0 5c6e 4016 51aa ca0e 44dd ..\n..\n@.Q...D. │ │ │ +000137a0: 61ab 8c5c 6e40 10d6 de5c 6e41 5c22 164b a..\n@...\nA\".K │ │ │ +000137b0: aab8 0e44 df61 ab86 5c6e 4016 40aa ac0e ...D.a..\n@.@... │ │ │ +000137c0: 44e0 61ab 855c 6e40 11aa a10e 44e1 61ab D.a..\n@....D.a. │ │ │ +000137d0: 85e2 1647 aa96 0e44 e361 ab8a e45c 6e40 ...G...D.a...\n@ │ │ │ +000137e0: e55c 220b a413 aa86 e6e7 0e44 5c22 882a .\"........D\".* │ │ │ +000137f0: 828a 000e 40ab 91e8 e9ea 0e40 44eb eced ....@......@D... │ │ │ +00013800: af05 e245 1640 aaa4 09ac a108 ab85 08ee ...E.@.......... │ │ │ +00013810: 4eab 99e2 1652 08ac 8309 ab85 0e40 3fad N....R.......@?. │ │ │ +00013820: 89e8 efca f00c 5c22 ec45 4416 4008 830c ......\".ED.@... │ │ │ +00013830: 0208 f14e 08f2 4e1e 5689 1e57 ac85 e6f3 ...N..N.V..W.... │ │ │ +00013840: 085c 2288 09ab 8c0e 5740 0961 ac85 e6f4 .\".....W@.a.... │ │ │ +00013850: 0c5c 2288 0e4b ab9f 0e4b 4040 0e56 b7ae .\"..K...K@@.V.. │ │ │ +00013860: 88e6 f50e 4b40 4008 230e 5673 0e4b 8941 ....K@@.#.Vs.K.A │ │ │ +00013870: 164b 40a0 88aa 5df6 0e56 f7f8 0bb7 0b5c .K@...]..V.....\ │ │ │ +00013880: 225c 2213 0e57 4011 f80b b716 470e 5741 "\"..W@.....G.WA │ │ │ +00013890: 40ab 860c 164d e216 4708 891e 58ab 99f9 @....M..G...X... │ │ │ +000138a0: d30e 4d44 c9ca d10e 585c 2221 450d 4215 ..MD....X\"!E.B. │ │ │ +000138b0: 0e58 fa4e 8916 58ac 672b aa9b 09ab 9309 .X.N..X.g+...... │ │ │ +000138c0: fb73 ac85 e6fc 095c 2288 0e47 ab8a 0c16 .s.....\"..G.... │ │ │ +000138d0: 4daa 85fd 11fe 1647 0e47 ac87 f7f8 0bb7 M......G.G...... │ │ │ +000138e0: 0b5c 2213 ff0e 4e44 0d42 150e 47ad d70b .\"...ND.B..G... │ │ │ +000138f0: 47f8 0bb7 0b73 475a 1e41 09fd 61ab 9f81 G....sGZ.A..a... │ │ │ +00013900: 5f00 8160 0081 6100 8162 000b 4745 8163 _..`..a..b..GE.c │ │ │ +00013910: 0081 6400 eb0e 4145 0e4e 4546 aaa7 0e41 ..d...AE.NEF...A │ │ │ +00013920: 8165 0055 ab8b 8163 0081 6600 0e4e 45aa .e.U...c..f..NE. │ │ │ +00013930: 9481 5f00 8167 0081 6300 8168 000e 41eb .._..g..c..h..A. │ │ │ +00013940: 450e 4e45 4529 8916 43ad a80e 5a81 6500 E.NEE)..C...Z.e. │ │ │ +00013950: 56ad a00e 4341 4040 8169 0061 ab93 0e5a V...CA@@.i.a...Z │ │ │ +00013960: 816a 0055 ab8b 815f 000e 4341 4141 42aa .j.U..._..CAAAB. │ │ │ +00013970: 820e 4316 4f81 6500 0b1e 531e 410e 5383 ..C.O.e...S.A.S. │ │ │ +00013980: db03 0e53 8941 1653 4089 1e5b 4089 1e4c ...S.A.S@..[@..L │ │ │ +00013990: 816b 0073 ab98 c60e 4542 1645 0e4c f861 .k.s....EB.E.L.a │ │ │ +000139a0: ad84 d30e 4d44 0e48 4216 4882 d203 0e4c ....MD.HB.H....L │ │ │ +000139b0: 0e53 b7ab 89e6 816c 000e 4c0c 2388 c9ca .S.....l..L.#... │ │ │ +000139c0: 816d 000e 590e 4c23 211e 490e 4c0e 4542 .m..Y.L#!.I.L.EB │ │ │ +000139d0: 1645 0e5b 4140 0e48 4216 4881 6e00 0e49 .E.[A@.HB.H.n..I │ │ │ +000139e0: 816f 00f6 0e4f ad92 8170 000e 4fe6 ca81 .o...O...p..O... │ │ │ +000139f0: 7100 0e49 0c23 eb45 4543 09fd 61ab 8981 q..I.#.EEC..a... │ │ │ +00013a00: 6400 eb0e 4145 aa94 0e41 8165 0055 ab85 d...AE...A.e.U.. │ │ │ +00013a10: 8172 00aa 8781 6800 0e41 eb45 435c 2242 .r....h..A.EC\"B │ │ │ +00013a20: 4242 0d42 150e 49e2 420e 4242 1642 8173 BB.B..I.B.BB.B.s │ │ │ +00013a30: 000e 4981 7400 8175 000e 5b41 4173 4140 ..I.t..u..[AAsA@ │ │ │ +00013a40: ab8b e6ca 8176 000e 495c 2244 aa97 8177 .....v..I\"D...w │ │ │ +00013a50: 00eb d30c 44d3 0e49 440e 4fad 84d3 0e4f ....D..ID.O....O │ │ │ +00013a60: 440e 41af 0646 0d42 150e 52ab 980e 40ef D.A..F.B..R...@. │ │ │ +00013a70: ca81 7800 0e4c 5c22 ec45 8179 000e 49eb ..x..L\".E.y..I. │ │ │ +00013a80: 44ec 4544 a488 292a 0e41 5416 4182 cb02 D.ED..)*.AT.A... │ │ │ +00013a90: 2a0e 459f 1645 0e48 9f16 480e 51ab b40e *.E..E.H..H.Q... │ │ │ +00013aa0: 43ab b081 6e00 0e51 817a 000e 4340 815f C...n..Q.z..C@._ │ │ │ +00013ab0: 0061 ab89 f60e 4381 7b00 5c22 aa87 815f .a....C.{.\"..._ │ │ │ +00013ac0: 000e 43e2 4546 0d42 150e 5181 7c00 420e ..C.EF.B..Q.|.B. │ │ │ +00013ad0: 4242 1642 0e50 ab98 817d 000e 5081 7e00 BB.B.P...}..P.~. │ │ │ +00013ae0: 817f 0046 0d42 150e 50e2 420e 4242 1642 ...F.B..P.B.BB.B │ │ │ +00013af0: 0e55 ab95 0e55 8180 00f7 c681 8100 0e45 .U...U.........E │ │ │ +00013b00: 215c 2242 440e 4642 1646 0e46 abd3 0e46 !\"BD.FB.F.F...F │ │ │ +00013b10: 4040 1c0e 4689 4116 4640 4140 1a81 8200 @@..F.A.F@A@.... │ │ │ +00013b20: 5c6e 211e 5e81 8300 8184 000e 450e 4823 \n!.^.......E.H# │ │ │ +00013b30: 1e5c 5c81 6e00 0c81 8500 d3c6 0b42 445c .\\.n........BD\ │ │ │ +00013b40: 6e42 4209 0e5c 5c42 460d 4215 8186 00e8 nBB..\\BF.B..... │ │ │ +00013b50: d681 8700 0b5c 2242 21ab 880c e242 0e42 .....\"B!....B.B │ │ │ +00013b60: 4216 422c aa29 0e52 ab89 0e40 8188 00e2 B.B,.).R...@.... │ │ │ +00013b70: 44a4 880e 40ab 9b81 8900 ea81 8a00 818b D...@........... │ │ │ +00013b80: 0081 5f00 0e43 0e40 4545 4481 8c00 450d .._..C.@EED...E. │ │ │ +00013b90: 4215 818d 000e 4e81 8e00 d30e 4d44 4445 B.....N.....MDDE │ │ │ +00013ba0: 0d42 1581 8f00 8190 00d2 d30c 4481 9100 .B..........D... │ │ │ +00013bb0: d30b 4446 d2d3 0c44 8192 00d3 090e 47e2 ..DF...D......G. │ │ │ +00013bc0: 6144 4446 d2d3 0c44 8193 00d3 0844 46d2 aDDF...D.....DF. │ │ │ +00013bd0: d30c 4481 9400 0e52 46d6 8195 000e 425c ..D....RF.....B\ │ │ │ +00013be0: 2242 4242 4242 420d 4215 e8d3 0c44 0d42 "BBBBBB.B....D.B │ │ │ +00013bf0: 9f2e 1642 8722 205b 696e 636c 7564 6520 ...B." [include │ │ │ +00013c00: 7479 7065 2061 7267 7320 6465 7363 7320 type args descs │ │ │ +00013c10: 6e61 6d65 2066 6f72 6d73 206e 696c 2073 name forms nil s │ │ │ +00013c20: 796d 626f 6c2d 6e61 6d65 2022 2d22 2069 ymbol-name "-" i │ │ │ +00013c30: 6e74 6572 6e20 666f 726d 6174 2022 6d61 ntern format "ma │ │ │ +00013c40: 6b65 2d25 7322 2022 636f 7079 2d25 7322 ke-%s" "copy-%s" │ │ │ +00013c50: 2022 2573 2d70 2220 636c 2d63 6f6d 7069 "%s-p" cl-compi │ │ │ +00013c60: 6c69 6e67 2d66 696c 6520 3320 2263 6c2d ling-file 3 "cl- │ │ │ +00013c70: 7374 7275 6374 2d25 7322 2022 636c 2d73 struct-%s" "cl-s │ │ │ +00013c80: 7472 7563 742d 2573 2d74 6167 7322 2070 truct-%s-tags" p │ │ │ +00013c90: 7574 2071 756f 7465 2027 7374 7275 6374 ut quote 'struct │ │ │ +00013ca0: 7572 652d 646f 6375 6d65 6e74 6174 696f ure-documentatio │ │ │ +00013cb0: 6e20 2863 6c2d 7461 672d 736c 6f74 2920 n (cl-tag-slot) │ │ │ +00013cc0: 6d61 7063 6172 2023 5b28 7829 2022 083a mapcar #[(x) ".: │ │ │ +00013cd0: ab82 0887 0843 8722 205b 785d 2031 5d20 .....C." [x] 1] │ │ │ +00013ce0: 3a63 6f6e 632d 6e61 6d65 2022 2220 3a63 :conc-name "" :c │ │ │ +00013cf0: 6f6e 7374 7275 6374 6f72 203a 636f 7069 onstructor :copi │ │ │ +00013d00: 6572 203a 7072 6564 6963 6174 6520 3a69 er :predicate :i │ │ │ +00013d10: 6e63 6c75 6465 2023 5b28 7829 2022 083a nclude #[(x) ".: │ │ │ +00013d20: ab82 0887 0843 8722 205b 785d 2031 5d20 .....C." [x] 1] │ │ │ +00013d30: 3a70 7269 6e74 2d66 756e 6374 696f 6e20 :print-function │ │ │ +00013d40: 3a74 7970 6520 3a6e 616d 6564 2074 203a :type :named t : │ │ │ +00013d50: 696e 6974 6961 6c2d 6f66 6673 6574 206d initial-offset m │ │ │ +00013d60: 616b 652d 6c69 7374 2028 636c 2d73 6b69 ake-list (cl-ski │ │ │ +00013d70: 702d 736c 6f74 2920 6572 726f 7220 2253 p-slot) error "S │ │ │ +00013d80: 6c6f 7420 6f70 7469 6f6e 2025 7320 756e lot option %s un │ │ │ +00013d90: 7265 636f 676e 697a 6564 2220 7072 6f67 recognized" prog │ │ │ +00013da0: 6e20 6675 6e63 616c 6c20 6675 6e63 7469 n funcall functi │ │ │ +00013db0: 6f6e 2063 6c2d 7820 636c 2d73 2063 6c2d on cl-x cl-s cl- │ │ │ +00013dc0: 6e20 636c 2d73 7472 7563 742d 7072 696e n cl-struct-prin │ │ │ +00013dd0: 7420 7072 696e 6320 2223 5328 2573 2220 t princ "#S(%s" │ │ │ +00013de0: 636c 2d73 7472 7563 742d 7479 7065 2063 cl-struct-type c │ │ │ +00013df0: 6c2d 7374 7275 6374 2d73 6c6f 7473 2022 l-struct-slots " │ │ │ +00013e00: 2573 2069 7320 6e6f 7420 6120 7374 7275 %s is not a stru │ │ │ +00013e10: 6374 206e 616d 6522 2022 3a74 7970 6520 ct name" ":type │ │ │ +00013e20: 6469 7361 6772 6565 7320 7769 7468 203a disagrees with : │ │ │ +00013e30: 696e 636c 7564 6520 666f 7220 2573 2220 include for %s" │ │ │ +00013e40: 224e 6f20 736c 6f74 2025 7320 696e 2069 "No slot %s in i │ │ │ +00013e50: 6e63 6c75 6465 6420 7374 7275 6374 2025 ncluded struct % │ │ │ +00013e60: 7322 2061 7070 656e 6420 6465 6c71 2063 s" append delq c │ │ │ +00013e70: 6c2d 7461 672d 736c 6f74 2070 7573 686e l-tag-slot pushn │ │ │ +00013e80: 6577 2063 6c2d 7374 7275 6374 2d69 6e63 ew cl-struct-inc │ │ │ +00013e90: 6c75 6465 2028 7665 6374 6f72 206c 6973 lude (vector lis │ │ │ +00013ea0: 7429 2022 496c 6c65 6761 6c20 3a74 7970 t) "Illegal :typ │ │ │ +00013eb0: 6520 7370 6563 6966 6965 723a 2025 7322 e specifier: %s" │ │ │ +00013ec0: 2076 6563 746f 7220 7472 7565 2064 6566 vector true def │ │ │ +00013ed0: 7661 7220 7072 696e 742d 6675 6e63 2070 var print-func p │ │ │ +00013ee0: 6f73 2073 6964 652d 6566 6620 7072 6564 os side-eff pred │ │ │ +00013ef0: 2d66 6f72 6d20 6f70 7420 736c 6f74 7320 -form opt slots │ │ │ +00013f00: 636f 6e73 7472 7320 6e61 6d65 6420 6465 constrs named de │ │ │ +00013f10: 6661 756c 7473 2061 6363 6573 736f 7220 faults accessor │ │ │ +00013f20: 6f70 7473 2069 6e63 6c75 6465 2d64 6573 opts include-des │ │ │ +00013f30: 6373 2073 6c6f 7420 7461 6720 7461 672d cs slot tag tag- │ │ │ +00013f40: 7379 6d62 6f6c 2070 7265 642d 6368 6563 symbol pred-chec │ │ │ +00013f50: 6b20 636f 7069 6572 2070 7265 6469 6361 k copier predica │ │ │ +00013f60: 7465 2070 7269 6e74 2d61 7574 6f20 6465 te print-auto de │ │ │ +00013f70: 7363 7020 7374 7275 6374 2063 6f6e 7374 scp struct const │ │ │ +00013f80: 7275 6374 6f72 206f 6c64 2d64 6573 6373 ructor old-descs │ │ │ +00013f90: 2069 6e63 2d74 7970 6520 696e 636c 2063 inc-type incl c │ │ │ +00013fa0: 6f6e 632d 6e61 6d65 2073 6166 6574 7920 onc-name safety │ │ │ +00013fb0: 6465 7363 206d 616b 6520 636c 2d6f 7074 desc make cl-opt │ │ │ +00013fc0: 696d 697a 652d 7361 6665 7479 2061 6e61 imize-safety ana │ │ │ +00013fd0: 6d65 7320 616e 6420 2876 6563 746f 7270 mes and (vectorp │ │ │ +00013fe0: 2063 6c2d 7829 203e 3d20 286c 656e 6774 cl-x) >= (lengt │ │ │ +00013ff0: 6820 636c 2d78 2920 6d65 6d71 2061 7265 h cl-x) memq are │ │ │ +00014000: 6620 3020 2863 6172 2d73 6166 6520 636c f 0 (car-safe cl │ │ │ +00014010: 2d78 2920 2863 6f6e 7370 2063 6c2d 7829 -x) (consp cl-x) │ │ │ +00014020: 206e 7468 2076 6563 746f 7270 2031 2028 nth vectorp 1 ( │ │ │ +00014030: 636c 2d74 6167 2d73 6c6f 7420 636c 2d73 cl-tag-slot cl-s │ │ │ +00014040: 6b69 702d 736c 6f74 2920 2244 7570 6c69 kip-slot) "Dupli │ │ │ +00014050: 6361 7465 2073 6c6f 7473 206e 616d 6564 cate slots named │ │ │ +00014060: 2025 7320 696e 2025 7322 2022 2573 2573 %s in %s" "%s%s │ │ │ +00014070: 2220 6465 6673 7562 7374 2a20 2863 6c2d " defsubst* (cl- │ │ │ +00014080: 7829 206f 7220 2225 7320 6163 6365 7373 x) or "%s access │ │ │ +00014090: 696e 6720 6120 6e6f 6e2d 2573 2220 2863 ing a non-%s" (c │ │ │ +000140a0: 6172 2063 6c2d 7829 2064 6566 696e 652d ar cl-x) define- │ │ │ +000140b0: 7365 7466 2d6d 6574 686f 6420 2863 6c2d setf-method (cl- │ │ │ +000140c0: 7829 203a 7265 6164 2d6f 6e6c 7920 2225 x) :read-only "% │ │ │ +000140d0: 7320 6973 2061 2072 6561 642d 6f6e 6c79 s is a read-only │ │ │ +000140e0: 2073 6c6f 7422 2063 6c2d 7374 7275 6374 slot" cl-struct │ │ │ +000140f0: 2d73 6574 662d 6578 7061 6e64 6572 2022 -setf-expander " │ │ │ +00014100: 2025 7322 2070 7269 6e31 2028 636c 2d78 %s" prin1 (cl-x │ │ │ +00014110: 2920 2874 2920 6572 726f 722d 6672 6565 ) (t) error-free │ │ │ +00014120: 2064 6566 756e 2028 7829 2028 636f 7079 defun (x) (copy │ │ │ +00014130: 2d73 6571 7565 6e63 6520 7829 2026 6b65 -sequence x) &ke │ │ │ +00014140: 7920 636f 7079 2d73 6571 7565 6e63 6520 y copy-sequence │ │ │ +00014150: 636c 2d61 7267 6c69 7374 2d61 7267 7320 cl-arglist-args │ │ │ +00014160: 6d61 7063 6172 2a20 235b 2873 2064 2920 mapcar* #[(s d) │ │ │ +00014170: 225c 6e09 73ab 825c 6e87 0887 2220 5b64 "\n.s..\n..." [d │ │ │ +00014180: 2061 6e61 6d65 7320 735d 2032 5d20 2663 anames s] 2] &c │ │ │ +00014190: 6c2d 6465 6673 2063 6c2d 7361 6665 2d65 l-defs cl-safe-e │ │ │ +000141a0: 7870 722d 7020 7365 636f 6e64 2028 7072 xpr-p second (pr │ │ │ +000141b0: 696e 6320 2229 2220 636c 2d73 2920 7075 inc ")" cl-s) pu │ │ │ +000141c0: 7368 206c 616d 6264 6120 2863 6c2d 7820 sh lambda (cl-x │ │ │ +000141d0: 636c 2d73 2063 6c2d 6e29 2063 7573 746f cl-s cl-n) custo │ │ │ +000141e0: 6d2d 7072 696e 742d 6675 6e63 7469 6f6e m-print-function │ │ │ +000141f0: 7320 7365 7471 206c 6973 7420 6576 616c s setq list eval │ │ │ +00014200: 2d77 6865 6e20 2863 6f6d 7069 6c65 206c -when (compile l │ │ │ +00014210: 6f61 6420 6576 616c 2920 2763 6c2d 7374 oad eval) 'cl-st │ │ │ +00014220: 7275 6374 2d73 6c6f 7473 2027 636c 2d73 ruct-slots 'cl-s │ │ │ +00014230: 7472 7563 742d 7479 7065 2027 636c 2d73 truct-type 'cl-s │ │ │ +00014240: 7472 7563 742d 696e 636c 7564 6520 2763 truct-include 'c │ │ │ +00014250: 6c2d 7374 7275 6374 2d70 7269 6e74 2023 l-struct-print # │ │ │ +00014260: 5b28 7829 2022 c1c2 0840 44c3 c208 4144 [(x) "...@D...AD │ │ │ +00014270: 4687 2220 5b78 2070 7574 2071 756f 7465 F." [x put quote │ │ │ +00014280: 2027 7369 6465 2d65 6666 6563 742d 6672 'side-effect-fr │ │ │ +00014290: 6565 5d20 355d 5d20 3132 2028 2324 202e ee] 5]] 12 (#$ . │ │ │ +000142a0: 2037 3931 3631 295d 2929 0a28 6465 6661 79161)])).(defa │ │ │ +000142b0: 6c69 6173 2027 636c 2d73 7472 7563 742d lias 'cl-struct- │ │ │ +000142c0: 7365 7466 2d65 7870 616e 6465 7220 235b setf-expander #[ │ │ │ +000142d0: 2878 206e 616d 6520 6163 6365 7373 6f72 (x name accessor │ │ │ +000142e0: 2070 7265 642d 666f 726d 2070 6f73 2920 pred-form pos) │ │ │ +000142f0: 22c6 c721 1dc6 c821 1b0d 430e 1a43 0b43 "..!...!..C..C.C │ │ │ +00014300: c9ca 09ad 91cb cc0d cd09 23ce cfd0 080e ..........#..... │ │ │ +00014310: 1923 0d45 4543 0e19 d14e 40d2 61ab 87d3 .#.EEC...N@.a... │ │ │ +00014320: 0d0c 0b46 aaa0 d40c d558 ab94 0d1a 0c53 ...F.....X.....S │ │ │ +00014330: 8914 d659 ab86 d75c 6e44 12aa 725c 6e29 ...Y...\nD..r\n) │ │ │ +00014340: aa84 d80c 0d45 0b45 4323 080d 44af 052a .....E.EC#..D..* │ │ │ +00014350: 8722 205b 6163 6365 7373 6f72 2070 7265 ." [accessor pre │ │ │ +00014360: 642d 666f 726d 2078 7820 7374 6f72 6520 d-form xx store │ │ │ +00014370: 706f 7320 7465 6d70 2067 656e 7379 6d20 pos temp gensym │ │ │ +00014380: 222d 2d78 2d2d 2220 222d 2d73 746f 7265 "--x--" "--store │ │ │ +00014390: 2d2d 2220 6170 7065 6e64 2028 7072 6f67 --" append (prog │ │ │ +000143a0: 6e29 206f 7220 7375 6273 7420 636c 2d78 n) or subst cl-x │ │ │ +000143b0: 2065 7272 6f72 2066 6f72 6d61 7420 2225 error format "% │ │ │ +000143c0: 7320 7374 6f72 696e 6720 6120 6e6f 6e2d s storing a non- │ │ │ +000143d0: 2573 2220 636c 2d73 7472 7563 742d 7479 %s" cl-struct-ty │ │ │ +000143e0: 7065 2076 6563 746f 7220 6173 6574 2073 pe vector aset s │ │ │ +000143f0: 6574 6361 7220 3520 3020 6364 7220 6e74 etcar 5 0 cdr nt │ │ │ +00014400: 6863 6472 206e 616d 6520 785d 2031 325d hcdr name x] 12] │ │ │ +00014410: 290a 2340 3133 3020 2864 6566 7479 7065 ).#@130 (deftype │ │ │ +00014420: 204e 414d 4520 4152 474c 4953 5420 424f NAME ARGLIST BO │ │ │ +00014430: 4459 2e2e 2e29 3a20 6465 6669 6e65 204e DY...): define N │ │ │ +00014440: 414d 4520 6173 2061 206e 6577 2064 6174 AME as a new dat │ │ │ +00014450: 6120 7479 7065 2e0a 5468 6520 7479 7065 a type..The type │ │ │ +00014460: 206e 616d 6520 6361 6e20 7468 656e 2062 name can then b │ │ │ +00014470: 6520 7573 6564 2069 6e20 6074 7970 6563 e used in `typec │ │ │ +00014480: 6173 6527 2c20 6063 6865 636b 2d74 7970 ase', `check-typ │ │ │ +00014490: 6527 2c20 6574 632e 1f0a 2864 6566 616c e', etc...(defal │ │ │ +000144a0: 6961 7320 2764 6566 7479 7065 2027 286d ias 'deftype '(m │ │ │ +000144b0: 6163 726f 202e 2023 5b28 6e61 6d65 2061 acro . #[(name a │ │ │ +000144c0: 7267 7320 2672 6573 7420 626f 6479 2920 rgs &rest body) │ │ │ +000144d0: 22c3 c4c5 5c6e c6c7 c809 4242 0842 2345 "...\n....BB.B#E │ │ │ +000144e0: 8722 205b 626f 6479 2061 7267 7320 6e61 ." [body args na │ │ │ +000144f0: 6d65 2065 7661 6c2d 7768 656e 2028 636f me eval-when (co │ │ │ +00014500: 6d70 696c 6520 6c6f 6164 2065 7661 6c29 mpile load eval) │ │ │ +00014510: 2063 6c2d 7472 616e 7366 6f72 6d2d 6675 cl-transform-fu │ │ │ +00014520: 6e63 7469 6f6e 2d70 726f 7065 7274 7920 nction-property │ │ │ +00014530: 636c 2d64 6566 7479 7065 2d68 616e 646c cl-deftype-handl │ │ │ +00014540: 6572 2026 636c 2d64 6566 7320 2728 272a er &cl-defs '('* │ │ │ +00014550: 295d 2038 2028 2324 202e 2038 3239 3638 )] 8 (#$ . 82968 │ │ │ +00014560: 295d 2929 0a28 6465 6661 6c69 6173 2027 )])).(defalias ' │ │ │ +00014570: 636c 2d6d 616b 652d 7479 7065 2d74 6573 cl-make-type-tes │ │ │ +00014580: 7420 235b 2876 616c 2074 7970 6529 2022 t #[(val type) " │ │ │ +00014590: 0b39 abde 0bc4 4eab 88c5 5c6e 0bc4 4e20 .9....N...\n..N │ │ │ +000145a0: 5c22 870b c673 ab82 0b87 0bc7 61ab 84c8 \"...s......a... │ │ │ +000145b0: 5c6e 4487 0bc9 61ab 84c9 5c6e 4487 0bca \nD...a...\nD... │ │ │ +000145c0: 61ab 84cb 5c6e 4487 0bcc 61ab 84cd 5c6e a...\nD...a...\n │ │ │ +000145d0: 4487 0bce 61ab 84cf 5c6e 4487 d00b 2119 D...a...\nD...!. │ │ │ +000145e0: d109 d250 2118 d308 21ab 8508 5c6e 44aa ...P!...!...\nD. │ │ │ +000145f0: 87d1 09d4 5021 5c6e 442a 870b 40c4 4eab ....P!\nD*..@.N. │ │ │ +00014600: 8cc5 5c6e d50b 40c4 4e0b 415c 225c 2287 ..\n..@.N.A\"\". │ │ │ +00014610: 0ba2 d673 abcd d7d8 d9c5 5c6e 0b40 5c22 ...s......\n.@\" │ │ │ +00014620: 0b41 40da 73ab 83d8 aa95 0b41 403a ab89 .A@.s......A@:.. │ │ │ +00014630: db5c 6e0b 4140 4045 aa86 dc5c 6e0b 4140 .\n.A@@E...\n.A@ │ │ │ +00014640: 450b 4141 40dd 73ab 83d8 aa98 0b41 4140 E.AA@.s......AA@ │ │ │ +00014650: 3aab 8ade 5c6e 0b41 4140 4045 aa87 df5c :...\n.AA@@E...\ │ │ │ +00014660: 6e0b 4141 4045 465c 2287 0ba2 e073 ab89 n.AA@EF\"....s.. │ │ │ +00014670: 0b40 e1e2 0b41 5c22 4287 0ba2 e373 ab8b .@...A\"B....s.. │ │ │ +00014680: d9e4 5c6e e50b 4144 45d8 4587 0ba2 e661 ..\n..ADE.E....a │ │ │ +00014690: ab86 0b41 405c 6e44 87e7 e80b 5c22 8722 ...A@\nD....\"." │ │ │ +000146a0: 205b 6e61 6d65 7020 6e61 6d65 2076 616c [namep name val │ │ │ +000146b0: 2074 7970 6520 636c 2d64 6566 7479 7065 type cl-deftype │ │ │ +000146c0: 2d68 616e 646c 6572 2063 6c2d 6d61 6b65 -handler cl-make │ │ │ +000146d0: 2d74 7970 652d 7465 7374 2028 6e69 6c20 -type-test (nil │ │ │ +000146e0: 7429 2073 7472 696e 672d 6368 6172 2063 t) string-char c │ │ │ +000146f0: 6861 7261 6374 6572 7020 6e75 6c6c 2066 haracterp null f │ │ │ +00014700: 6c6f 6174 2066 6c6f 6174 702d 7361 6665 loat floatp-safe │ │ │ +00014710: 2072 6561 6c20 6e75 6d62 6572 7020 6669 real numberp fi │ │ │ +00014720: 786e 756d 2069 6e74 6567 6572 7020 7379 xnum integerp sy │ │ │ +00014730: 6d62 6f6c 2d6e 616d 6520 696e 7465 726e mbol-name intern │ │ │ +00014740: 2022 7022 2066 626f 756e 6470 2022 2d70 "p" fboundp "-p │ │ │ +00014750: 2220 6170 706c 7920 2869 6e74 6567 6572 " apply (integer │ │ │ +00014760: 2066 6c6f 6174 2072 6561 6c20 6e75 6d62 float real numb │ │ │ +00014770: 6572 2920 6465 6c71 2074 2061 6e64 2028 er) delq t and ( │ │ │ +00014780: 2a20 6e69 6c29 203e 203e 3d20 282a 206e * nil) > >= (* n │ │ │ +00014790: 696c 2920 3c20 3c3d 2028 616e 6420 6f72 il) < <= (and or │ │ │ +000147a0: 206e 6f74 2920 6d61 7063 6172 2023 5b28 not) mapcar #[( │ │ │ +000147b0: 7829 2022 c209 085c 2287 2220 5b78 2076 x) "...\"." [x v │ │ │ +000147c0: 616c 2063 6c2d 6d61 6b65 2d74 7970 652d al cl-make-type- │ │ │ +000147d0: 7465 7374 5d20 335d 2028 6d65 6d62 6572 test] 3] (member │ │ │ +000147e0: 206d 656d 6265 722a 2920 6d65 6d62 6572 member*) member │ │ │ +000147f0: 2a20 7175 6f74 6520 7361 7469 7366 6965 * quote satisfie │ │ │ +00014800: 7320 6572 726f 7220 2242 6164 2074 7970 s error "Bad typ │ │ │ +00014810: 6520 7370 6563 3a20 2573 225d 2038 5d29 e spec: %s"] 8]) │ │ │ +00014820: 0a23 4038 3020 4368 6563 6b20 7468 6174 .#@80 Check that │ │ │ +00014830: 204f 424a 4543 5420 6973 206f 6620 7479 OBJECT is of ty │ │ │ +00014840: 7065 2054 5950 452e 0a54 5950 4520 6973 pe TYPE..TYPE is │ │ │ +00014850: 2061 2043 6f6d 6d6f 6e20 4c69 7370 2d73 a Common Lisp-s │ │ │ +00014860: 7479 6c65 2074 7970 6520 7370 6563 6966 tyle type specif │ │ │ +00014870: 6965 722e 1f0a 2864 6566 616c 6961 7320 ier...(defalias │ │ │ +00014880: 2774 7970 6570 2023 5b28 6f62 6a65 6374 'typep #[(object │ │ │ +00014890: 2074 7970 6529 2022 c1c2 c308 5c22 2187 type) "....\"!. │ │ │ +000148a0: 2220 5b74 7970 6520 6576 616c 2063 6c2d " [type eval cl- │ │ │ +000148b0: 6d61 6b65 2d74 7970 652d 7465 7374 206f make-type-test o │ │ │ +000148c0: 626a 6563 745d 2034 2028 2324 202e 2038 bject] 4 (#$ . 8 │ │ │ +000148d0: 3430 3036 295d 290a 2340 3132 3620 5665 4006)]).#@126 Ve │ │ │ +000148e0: 7269 6679 2074 6861 7420 504c 4143 4520 rify that PLACE │ │ │ +000148f0: 6973 206f 6620 7479 7065 2054 5950 453b is of type TYPE; │ │ │ +00014900: 2073 6967 6e61 6c20 6120 636f 6e74 696e signal a contin │ │ │ +00014910: 7561 626c 6520 6572 726f 7220 6966 206e uable error if n │ │ │ +00014920: 6f74 2e0a 5354 5249 4e47 2069 7320 616e ot..STRING is an │ │ │ +00014930: 206f 7074 696f 6e61 6c20 6465 7363 7269 optional descri │ │ │ +00014940: 7074 696f 6e20 6f66 2074 6865 2064 6573 ption of the des │ │ │ +00014950: 6972 6564 2074 7970 652e 1f0a 2864 6566 ired type...(def │ │ │ +00014960: 616c 6961 7320 2763 6865 636b 2d74 7970 alias 'check-typ │ │ │ +00014970: 6520 2728 6d61 6372 6f20 2e20 235b 2870 e '(macro . #[(p │ │ │ +00014980: 6c61 6365 2074 7970 6520 266f 7074 696f lace type &optio │ │ │ +00014990: 6e61 6c20 7374 7269 6e67 2920 22c6 20ab nal string) ". . │ │ │ +000149a0: 8a09 c757 ac85 08c7 55ad b9c8 0dc7 5c22 ...W....U.....\" │ │ │ +000149b0: ab83 0daa 82c9 201c ca0c 5c6e 5c22 1e13 ...... ...\n\".. │ │ │ +000149c0: cbcc cd0e 14ae 83ce 5c6e 440c ce0d 4446 ........\nD...DF │ │ │ +000149d0: 451e 15cf d0d1 8f1b 0c0d 61ab 830b aa87 E.........a..... │ │ │ +000149e0: d20c 0d44 430b 452c 8722 205b 636c 2d6f ...DC.E,." [cl-o │ │ │ +000149f0: 7074 696d 697a 652d 7361 6665 7479 2063 ptimize-safety c │ │ │ +00014a00: 6c2d 6f70 7469 6d69 7a65 2d73 7065 6564 l-optimize-speed │ │ │ +00014a10: 2074 7970 6520 626f 6479 2074 656d 7020 type body temp │ │ │ +00014a20: 706c 6163 6520 636c 2d63 6f6d 7069 6c69 place cl-compili │ │ │ +00014a30: 6e67 2d66 696c 6520 3320 636c 2d73 696d ng-file 3 cl-sim │ │ │ +00014a40: 706c 652d 6578 7072 2d70 2067 656e 7379 ple-expr-p gensy │ │ │ +00014a50: 6d20 636c 2d6d 616b 652d 7479 7065 2d74 m cl-make-type-t │ │ │ +00014a60: 6573 7420 7369 676e 616c 2027 7772 6f6e est signal 'wron │ │ │ +00014a70: 672d 7479 7065 2d61 7267 756d 656e 7420 g-type-argument │ │ │ +00014a80: 6c69 7374 2071 756f 7465 206e 696c 2028 list quote nil ( │ │ │ +00014a90: 6279 7465 2d63 6f64 6520 22c3 c45c 6e44 byte-code "..\nD │ │ │ +00014aa0: c5c6 0908 4521 4587 2220 5b73 6967 6e61 ....E!E." [signa │ │ │ +00014ab0: 6c2d 6572 726f 7220 706c 6163 6520 7465 l-error place te │ │ │ +00014ac0: 7374 2077 6869 6c65 206e 6f74 206d 6163 st while not mac │ │ │ +00014ad0: 726f 6578 7061 6e64 2073 6574 665d 2036 roexpand setf] 6 │ │ │ +00014ae0: 2920 2828 6572 726f 7220 2862 7974 652d ) ((error (byte- │ │ │ +00014af0: 636f 6465 2022 c209 c308 c442 4245 8722 code ".....BBE." │ │ │ +00014b00: 205b 7369 676e 616c 2d65 7272 6f72 2074 [signal-error t │ │ │ +00014b10: 6573 7420 6966 2070 726f 676e 2028 6e69 est if progn (ni │ │ │ +00014b20: 6c29 5d20 3529 2929 206c 6574 2074 6573 l)] 5))) let tes │ │ │ +00014b30: 7420 7374 7269 6e67 2073 6967 6e61 6c2d t string signal- │ │ │ +00014b40: 6572 726f 725d 2037 2028 2324 202e 2038 error] 7 (#$ . 8 │ │ │ +00014b50: 3431 3930 295d 2929 0a23 4033 3137 2056 4190)])).#@317 V │ │ │ +00014b60: 6572 6966 7920 7468 6174 2046 4f52 4d20 erify that FORM │ │ │ +00014b70: 7265 7475 726e 7320 6e6f 6e2d 6e69 6c3b returns non-nil; │ │ │ +00014b80: 2073 6967 6e61 6c20 616e 2065 7272 6f72 signal an error │ │ │ +00014b90: 2069 6620 6e6f 742e 0a53 6563 6f6e 6420 if not..Second │ │ │ +00014ba0: 6172 6720 5348 4f57 2d41 5247 5320 6d65 arg SHOW-ARGS me │ │ │ +00014bb0: 616e 7320 746f 2069 6e63 6c75 6465 2061 ans to include a │ │ │ +00014bc0: 7267 756d 656e 7473 206f 6620 464f 524d rguments of FORM │ │ │ +00014bd0: 2069 6e20 6d65 7373 6167 652e 0a4f 7468 in message..Oth │ │ │ +00014be0: 6572 2061 7267 7320 5354 5249 4e47 2061 er args STRING a │ │ │ +00014bf0: 6e64 2041 5247 532e 2e2e 2061 7265 2061 nd ARGS... are a │ │ │ +00014c00: 7267 756d 656e 7473 2074 6f20 6265 2070 rguments to be p │ │ │ +00014c10: 6173 7365 6420 746f 2060 6572 726f 7227 assed to `error' │ │ │ +00014c20: 2e0a 5468 6579 2061 7265 206e 6f74 2065 ..They are not e │ │ │ +00014c30: 7661 6c75 6174 6564 2075 6e6c 6573 7320 valuated unless │ │ │ +00014c40: 7468 6520 6173 7365 7274 696f 6e20 6661 the assertion fa │ │ │ +00014c50: 696c 732e 2020 4966 2053 5452 494e 4720 ils. If STRING │ │ │ +00014c60: 6973 0a6f 6d69 7474 6564 2c20 6120 6465 is.omitted, a de │ │ │ +00014c70: 6661 756c 7420 6d65 7373 6167 6520 6c69 fault message li │ │ │ +00014c80: 7374 696e 6720 464f 524d 2069 7473 656c sting FORM itsel │ │ │ +00014c90: 6620 6973 2075 7365 642e 1f0a 2864 6566 f is used...(def │ │ │ +00014ca0: 616c 6961 7320 2761 7373 6572 7420 2728 alias 'assert '( │ │ │ +00014cb0: 6d61 6372 6f20 2e20 235b 2866 6f72 6d20 macro . #[(form │ │ │ +00014cc0: 266f 7074 696f 6e61 6c20 7368 6f77 2d61 &optional show-a │ │ │ +00014cd0: 7267 7320 7374 7269 6e67 2026 7265 7374 rgs string &rest │ │ │ +00014ce0: 2061 7267 7329 2022 c620 ab8a 5c6e c757 args) ". ..\n.W │ │ │ +00014cf0: ac85 09c7 55ad ab08 ad88 c8c9 cacb 0d41 ....U..........A │ │ │ +00014d00: 5c22 5c22 1ccc cd0d 0bab 8bce 0bcf 0c0e \"\"............ │ │ │ +00014d10: 145c 2242 42aa 8ad0 d1d2 d30d 440c 4242 .\"BB.......D.BB │ │ │ +00014d20: 4545 c945 2987 2220 5b73 686f 772d 6172 EE.E)." [show-ar │ │ │ +00014d30: 6773 2063 6c2d 6f70 7469 6d69 7a65 2d73 gs cl-optimize-s │ │ │ +00014d40: 6166 6574 7920 636c 2d6f 7074 696d 697a afety cl-optimiz │ │ │ +00014d50: 652d 7370 6565 6420 7374 7269 6e67 2073 e-speed string s │ │ │ +00014d60: 6172 6773 2066 6f72 6d20 636c 2d63 6f6d args form cl-com │ │ │ +00014d70: 7069 6c69 6e67 2d66 696c 6520 3320 6465 piling-file 3 de │ │ │ +00014d80: 6c71 206e 696c 206d 6170 6361 7220 235b lq nil mapcar #[ │ │ │ +00014d90: 2878 2920 22c1 0821 3fad 8108 8722 205b (x) "..!?...." [ │ │ │ +00014da0: 7820 636c 2d63 6f6e 7374 2d65 7870 722d x cl-const-expr- │ │ │ +00014db0: 705d 2032 5d20 7072 6f67 6e20 6f72 2065 p] 2] progn or e │ │ │ +00014dc0: 7272 6f72 2061 7070 656e 6420 7369 676e rror append sign │ │ │ +00014dd0: 616c 2027 636c 2d61 7373 6572 7469 6f6e al 'cl-assertion │ │ │ +00014de0: 2d66 6169 6c65 6420 6c69 7374 2071 756f -failed list quo │ │ │ +00014df0: 7465 2061 7267 735d 2038 2028 2324 202e te args] 8 (#$ . │ │ │ +00014e00: 2038 3438 3331 295d 2929 0a23 4038 3720 84831)])).#@87 │ │ │ +00014e10: 4578 6563 7574 6520 464f 524d 533b 2069 Execute FORMS; i │ │ │ +00014e20: 6620 616e 2065 7272 6f72 206f 6363 7572 f an error occur │ │ │ +00014e30: 732c 2072 6574 7572 6e20 6e69 6c2e 0a4f s, return nil..O │ │ │ +00014e40: 7468 6572 7769 7365 2c20 7265 7475 726e therwise, return │ │ │ +00014e50: 2072 6573 756c 7420 6f66 206c 6173 7420 result of last │ │ │ +00014e60: 464f 524d 2e1f 0a28 6465 6661 6c69 6173 FORM...(defalias │ │ │ +00014e70: 2027 6967 6e6f 7265 2d65 7272 6f72 7320 'ignore-errors │ │ │ +00014e80: 2728 6d61 6372 6f20 2e20 235b 2826 7265 '(macro . #[(&re │ │ │ +00014e90: 7374 2062 6f64 7929 2022 c1c2 c308 42c4 st body) "....B. │ │ │ +00014ea0: 4242 4287 2220 5b62 6f64 7920 636f 6e64 BBB." [body cond │ │ │ +00014eb0: 6974 696f 6e2d 6361 7365 206e 696c 2070 ition-case nil p │ │ │ +00014ec0: 726f 676e 2028 2865 7272 6f72 206e 696c rogn ((error nil │ │ │ +00014ed0: 2929 5d20 3420 2823 2420 2e20 3835 3532 ))] 4 (#$ . 8552 │ │ │ +00014ee0: 3029 5d29 290a 2340 3130 3820 4578 6563 0)])).#@108 Exec │ │ │ +00014ef0: 7574 6520 464f 524d 533b 2069 6620 616e ute FORMS; if an │ │ │ +00014f00: 2065 7272 6f72 206f 6620 7479 7065 2060 error of type ` │ │ │ +00014f10: 6669 6c65 2d65 7272 6f72 2720 6f63 6375 file-error' occu │ │ │ +00014f20: 7273 2c20 7265 7475 726e 206e 696c 2e0a rs, return nil.. │ │ │ +00014f30: 4f74 6865 7277 6973 652c 2072 6574 7572 Otherwise, retur │ │ │ +00014f40: 6e20 7265 7375 6c74 206f 6620 6c61 7374 n result of last │ │ │ +00014f50: 2046 4f52 4d2e 1f0a 2864 6566 616c 6961 FORM...(defalia │ │ │ +00014f60: 7320 2769 676e 6f72 652d 6669 6c65 2d65 s 'ignore-file-e │ │ │ +00014f70: 7272 6f72 7320 2728 6d61 6372 6f20 2e20 rrors '(macro . │ │ │ +00014f80: 235b 2826 7265 7374 2062 6f64 7929 2022 #[(&rest body) " │ │ │ +00014f90: c1c2 c308 42c4 4242 4287 2220 5b62 6f64 ....B.BBB." [bod │ │ │ +00014fa0: 7920 636f 6e64 6974 696f 6e2d 6361 7365 y condition-case │ │ │ +00014fb0: 206e 696c 2070 726f 676e 2028 2866 696c nil progn ((fil │ │ │ +00014fc0: 652d 6572 726f 7220 6e69 6c29 295d 2034 e-error nil))] 4 │ │ │ +00014fd0: 2028 2324 202e 2038 3537 3430 295d 2929 (#$ . 85740)])) │ │ │ +00014fe0: 0a28 6279 7465 2d63 6f64 6520 22c1 5c6e .(byte-code ".\n │ │ │ +00014ff0: 4212 c311 c05c 6e42 12c4 10c1 8722 205b B....\nB....." [ │ │ │ +00015000: 636c 2d73 6166 652d 6675 6e63 7320 636c cl-safe-funcs cl │ │ │ +00015010: 2d73 696d 706c 652d 6675 6e63 7320 6375 -simple-funcs cu │ │ │ +00015020: 7272 656e 742d 6c6f 6164 2d6c 6973 7420 rrent-load-list │ │ │ +00015030: 2863 6172 2063 6472 206e 7468 2061 7265 (car cdr nth are │ │ │ +00015040: 6620 656c 7420 6966 2061 6e64 206f 7220 f elt if and or │ │ │ +00015050: 2b20 2d20 312b 2031 2d20 6d69 6e20 6d61 + - 1+ 1- min ma │ │ │ +00015060: 7820 6361 722d 7361 6665 2063 6472 2d73 x car-safe cdr-s │ │ │ +00015070: 6166 6520 7072 6f67 6e20 7072 6f67 3120 afe progn prog1 │ │ │ +00015080: 7072 6f67 3229 2028 2a20 2f20 2520 6c65 prog2) (* / % le │ │ │ +00015090: 6e67 7468 206d 656d 7120 6c69 7374 2076 ngth memq list v │ │ │ +000150a0: 6563 746f 7220 7665 6374 6f72 7020 3c20 ector vectorp < │ │ │ +000150b0: 3e20 3c3d 203e 3d20 3d20 6572 726f 7229 > <= >= = error) │ │ │ +000150c0: 5d20 3229 0a28 6465 6661 6c69 6173 2027 ] 2).(defalias ' │ │ │ +000150d0: 636c 2d73 696d 706c 652d 6578 7072 2d70 cl-simple-expr-p │ │ │ +000150e0: 2023 5b28 7820 266f 7074 696f 6e61 6c20 #[(x &optional │ │ │ +000150f0: 7369 7a65 2920 225c 6eac 82c3 1209 3aab size) "\n.....:. │ │ │ +00015100: b409 40c4 73ac ae09 4039 adb0 0940 0873 ..@.s...@9...@.s │ │ │ +00015110: ac86 0940 c54e ada4 5c6e 5312 0941 8911 ...@.N..\nS..A.. │ │ │ +00015120: ab89 c609 405c 6e5c 2289 12ac 7109 3fad ....@\n\"...q.?. │ │ │ +00015130: 865c 6ec7 59ad 815c 6e87 5c6e c756 ad82 .\n.Y..\n.\n.V.. │ │ │ +00015140: 5c6e 5387 2220 5b63 6c2d 7369 6d70 6c65 \nS." [cl-simple │ │ │ +00015150: 2d66 756e 6373 2078 2073 697a 6520 3130 -funcs x size 10 │ │ │ +00015160: 2028 7175 6f74 6520 6675 6e63 7469 6f6e (quote function │ │ │ +00015170: 2066 756e 6374 696f 6e2a 2920 7369 6465 function*) side │ │ │ +00015180: 2d65 6666 6563 742d 6672 6565 2063 6c2d -effect-free cl- │ │ │ +00015190: 7369 6d70 6c65 2d65 7870 722d 7020 305d simple-expr-p 0] │ │ │ +000151a0: 2033 5d29 0a28 6465 6661 6c69 6173 2027 3]).(defalias ' │ │ │ +000151b0: 636c 2d73 696d 706c 652d 6578 7072 732d cl-simple-exprs- │ │ │ +000151c0: 7020 235b 2878 7329 2022 08ab 8cc1 0840 p #[(xs) ".....@ │ │ │ +000151d0: 21ab 8608 4189 10ac 7408 3f87 2220 5b78 !...A...t.?." [x │ │ │ +000151e0: 7320 636c 2d73 696d 706c 652d 6578 7072 s cl-simple-expr │ │ │ +000151f0: 2d70 5d20 335d 290a 2864 6566 616c 6961 -p] 3]).(defalia │ │ │ +00015200: 7320 2763 6c2d 7361 6665 2d65 7870 722d s 'cl-safe-expr- │ │ │ +00015210: 7020 235b 2878 2920 225c 6e3a ad85 5c6e p #[(x) "\n:..\n │ │ │ +00015220: 40c3 733f 3fae a55c 6e40 39ad a05c 6e40 @.s??..\n@9..\n@ │ │ │ +00015230: 0973 ac8c 5c6e 4008 73ac 865c 6e40 c44e .s..\n@.s..\n@.N │ │ │ +00015240: ad8e 5c6e 4189 12ab 86c5 5c6e 4021 ac74 ..\nA.....\n@!.t │ │ │ +00015250: 5c6e 3f87 2220 5b63 6c2d 7361 6665 2d66 \n?." [cl-safe-f │ │ │ +00015260: 756e 6373 2063 6c2d 7369 6d70 6c65 2d66 uncs cl-simple-f │ │ │ +00015270: 756e 6373 2078 2028 7175 6f74 6520 6675 uncs x (quote fu │ │ │ +00015280: 6e63 7469 6f6e 2066 756e 6374 696f 6e2a nction function* │ │ │ +00015290: 2920 7369 6465 2d65 6666 6563 742d 6672 ) side-effect-fr │ │ │ +000152a0: 6565 2063 6c2d 7361 6665 2d65 7870 722d ee cl-safe-expr- │ │ │ +000152b0: 705d 2032 5d29 0a28 6465 6661 6c69 6173 p] 2]).(defalias │ │ │ +000152c0: 2027 636c 2d63 6f6e 7374 2d65 7870 722d 'cl-const-expr- │ │ │ +000152d0: 7020 235b 2878 2920 2208 3aab 9c08 40c1 p #[(x) ".:...@. │ │ │ +000152e0: 61ae a208 40c2 73ad 8f08 4140 39ae 8908 a...@.s...A@9... │ │ │ +000152f0: 4140 a2c3 61ad 81c4 8708 39ab 8708 c573 A@..a.....9....s │ │ │ +00015300: ad83 c687 c687 2220 5b78 2071 756f 7465 ......" [x quote │ │ │ +00015310: 2028 6675 6e63 7469 6f6e 2066 756e 6374 (function funct │ │ │ +00015320: 696f 6e2a 2920 6c61 6d62 6461 2066 756e ion*) lambda fun │ │ │ +00015330: 6320 286e 696c 2074 2920 745d 2032 5d29 c (nil t) t] 2]) │ │ │ +00015340: 0a28 6465 6661 6c69 6173 2027 636c 2d63 .(defalias 'cl-c │ │ │ +00015350: 6f6e 7374 2d65 7870 7273 2d70 2023 5b28 onst-exprs-p #[( │ │ │ +00015360: 7873 2920 2208 ab8c c108 4021 ab86 0841 xs) ".....@!...A │ │ │ +00015370: 8910 ac74 083f 8722 205b 7873 2063 6c2d ...t.?." [xs cl- │ │ │ +00015380: 636f 6e73 742d 6578 7072 2d70 5d20 335d const-expr-p] 3] │ │ │ +00015390: 290a 2864 6566 616c 6961 7320 2763 6c2d ).(defalias 'cl- │ │ │ +000153a0: 636f 6e73 742d 6578 7072 2d76 616c 2023 const-expr-val # │ │ │ +000153b0: 5b28 7829 2022 c108 21c2 61ad 8908 3aab [(x) "..!.a...:. │ │ │ +000153c0: 8408 4140 8708 8722 205b 7820 636c 2d63 ..A@..." [x cl-c │ │ │ +000153d0: 6f6e 7374 2d65 7870 722d 7020 745d 2032 onst-expr-p t] 2 │ │ │ +000153e0: 5d29 0a28 6465 6661 6c69 6173 2027 636c ]).(defalias 'cl │ │ │ +000153f0: 2d65 7870 722d 6163 6365 7373 2d6f 7264 -expr-access-ord │ │ │ +00015400: 6572 2023 5b28 7820 7629 2022 c209 21ab er #[(x v) "..!. │ │ │ +00015410: 8208 8709 3aab 9009 4189 11ab 88c3 0940 ....:...A......@ │ │ │ +00015420: 085c 2210 aa72 0887 0908 4061 ab83 0841 .\"..r....@a...A │ │ │ +00015430: 87c4 8722 205b 7620 7820 636c 2d63 6f6e ..." [v x cl-con │ │ │ +00015440: 7374 2d65 7870 722d 7020 636c 2d65 7870 st-expr-p cl-exp │ │ │ +00015450: 722d 6163 6365 7373 2d6f 7264 6572 2028 r-access-order ( │ │ │ +00015460: 7429 5d20 335d 290a 2864 6566 616c 6961 t)] 3]).(defalia │ │ │ +00015470: 7320 2763 6c2d 6578 7072 2d63 6f6e 7461 s 'cl-expr-conta │ │ │ +00015480: 696e 7320 235b 2878 2079 2920 2208 5c6e ins #[(x y) ".\n │ │ │ +00015490: 6bab 82c3 875c 6e3a ada3 5c6e a2c4 733f k....\n:..\n..s? │ │ │ +000154a0: ad9c c519 5c6e ab90 09c6 5c6e 8941 1240 ....\n....\n.A.@ │ │ │ +000154b0: 085c 22ae 81c5 5c5c 11aa 6d09 c556 ad81 .\"...\\..m..V.. │ │ │ +000154c0: 0929 8722 205b 7920 7375 6d20 7820 3120 .)." [y sum x 1 │ │ │ +000154d0: 2871 756f 7465 2066 756e 6374 696f 6e20 (quote function │ │ │ +000154e0: 6675 6e63 7469 6f6e 2a29 2030 2063 6c2d function*) 0 cl- │ │ │ +000154f0: 6578 7072 2d63 6f6e 7461 696e 735d 2034 expr-contains] 4 │ │ │ +00015500: 5d29 0a28 6465 6661 6c69 6173 2027 636c ]).(defalias 'cl │ │ │ +00015510: 2d65 7870 722d 636f 6e74 6169 6e73 2d61 -expr-contains-a │ │ │ +00015520: 6e79 2023 5b28 7820 7929 2022 09ab 8ec2 ny #[(x y) ".... │ │ │ +00015530: 0809 405c 22ac 8709 8941 1188 aa6f 0987 ..@\"....A...o.. │ │ │ +00015540: 2220 5b78 2079 2063 6c2d 6578 7072 2d63 " [x y cl-expr-c │ │ │ +00015550: 6f6e 7461 696e 735d 2033 5d29 0a28 6465 ontains] 3]).(de │ │ │ +00015560: 6661 6c69 6173 2027 636c 2d65 7870 722d falias 'cl-expr- │ │ │ +00015570: 6465 7065 6e64 732d 7020 235b 2878 2079 depends-p #[(x y │ │ │ +00015580: 2920 22c2 0921 3fad 8ac3 0921 3fae 84c4 ) "..!?....!?... │ │ │ +00015590: 0908 5c22 8722 205b 7920 7820 636c 2d63 ..\"." [y x cl-c │ │ │ +000155a0: 6f6e 7374 2d65 7870 722d 7020 636c 2d73 onst-expr-p cl-s │ │ │ +000155b0: 6166 652d 6578 7072 2d70 2063 6c2d 6578 afe-expr-p cl-ex │ │ │ +000155c0: 7072 2d63 6f6e 7461 696e 732d 616e 795d pr-contains-any] │ │ │ +000155d0: 2033 5d29 0a23 4036 3834 2028 6465 6669 3]).#@684 (defi │ │ │ +000155e0: 6e65 2d63 6f6d 7069 6c65 722d 6d61 6372 ne-compiler-macr │ │ │ +000155f0: 6f20 4655 4e43 2041 5247 4c49 5354 2042 o FUNC ARGLIST B │ │ │ +00015600: 4f44 592e 2e2e 293a 2044 6566 696e 6520 ODY...): Define │ │ │ +00015610: 6120 636f 6d70 696c 6572 2d6f 6e6c 7920 a compiler-only │ │ │ +00015620: 6d61 6372 6f2e 0a54 6869 7320 6973 206c macro..This is l │ │ │ +00015630: 696b 6520 6064 6566 6d61 6372 6f27 2c20 ike `defmacro', │ │ │ +00015640: 6275 7420 6d61 6372 6f20 6578 7061 6e73 but macro expans │ │ │ +00015650: 696f 6e20 6f63 6375 7273 206f 6e6c 7920 ion occurs only │ │ │ +00015660: 6966 2074 6865 2063 616c 6c20 746f 0a46 if the call to.F │ │ │ +00015670: 554e 4320 6973 2063 6f6d 7069 6c65 6420 UNC is compiled │ │ │ +00015680: 2869 2e65 2e2c 206e 6f74 2069 6e74 6572 (i.e., not inter │ │ │ +00015690: 7072 6574 6564 292e 2020 436f 6d70 696c preted). Compil │ │ │ +000156a0: 6572 206d 6163 726f 7320 7368 6f75 6c64 er macros should │ │ │ +000156b0: 2062 6520 7573 6564 0a66 6f72 206f 7074 be used.for opt │ │ │ +000156c0: 696d 697a 696e 6720 7468 6520 7761 7920 imizing the way │ │ │ +000156d0: 6361 6c6c 7320 746f 2046 554e 4320 6172 calls to FUNC ar │ │ │ +000156e0: 6520 636f 6d70 696c 6564 3b20 7468 6520 e compiled; the │ │ │ +000156f0: 666f 726d 2072 6574 7572 6e65 6420 6279 form returned by │ │ │ +00015700: 0a42 4f44 5920 7368 6f75 6c64 2064 6f20 .BODY should do │ │ │ +00015710: 7468 6520 7361 6d65 2074 6869 6e67 2061 the same thing a │ │ │ +00015720: 7320 6120 6361 6c6c 2074 6f20 7468 6520 s a call to the │ │ │ +00015730: 6e6f 726d 616c 2066 756e 6374 696f 6e20 normal function │ │ │ +00015740: 6361 6c6c 6564 0a46 554e 432c 2074 686f called.FUNC, tho │ │ │ +00015750: 7567 6820 706f 7373 6962 6c79 206d 6f72 ugh possibly mor │ │ │ +00015760: 6520 6566 6669 6369 656e 746c 792e 2020 e efficiently. │ │ │ +00015770: 4e6f 7465 2074 6861 742c 206c 696b 6520 Note that, like │ │ │ +00015780: 7265 6775 6c61 7220 6d61 6372 6f73 2c0a regular macros,. │ │ │ +00015790: 636f 6d70 696c 6572 206d 6163 726f 7320 compiler macros │ │ │ +000157a0: 6172 6520 6578 7061 6e64 6564 2072 6570 are expanded rep │ │ │ +000157b0: 6561 7465 646c 7920 756e 7469 6c20 6e6f eatedly until no │ │ │ +000157c0: 2066 7572 7468 6572 2065 7870 616e 7369 further expansi │ │ │ +000157d0: 6f6e 7320 6172 650a 706f 7373 6962 6c65 ons are.possible │ │ │ +000157e0: 2e20 2055 6e6c 696b 6520 7265 6775 6c61 . Unlike regula │ │ │ +000157f0: 7220 6d61 6372 6f73 2c20 424f 4459 2063 r macros, BODY c │ │ │ +00015800: 616e 2064 6563 6964 6520 746f 2022 7075 an decide to "pu │ │ │ +00015810: 6e74 2220 616e 6420 6c65 6176 6520 7468 nt" and leave th │ │ │ +00015820: 650a 6f72 6967 696e 616c 2066 756e 6374 e.original funct │ │ │ +00015830: 696f 6e20 6361 6c6c 2061 6c6f 6e65 2062 ion call alone b │ │ │ +00015840: 7920 6465 636c 6172 696e 6720 616e 2069 y declaring an i │ │ │ +00015850: 6e69 7469 616c 2060 2677 686f 6c65 2066 nitial `&whole f │ │ │ +00015860: 6f6f 2720 7061 7261 6d65 7465 720a 616e oo' parameter.an │ │ │ +00015870: 6420 7468 656e 2072 6574 7572 6e69 6e67 d then returning │ │ │ +00015880: 2066 6f6f 2e1f 0a28 6465 6661 6c69 6173 foo...(defalias │ │ │ +00015890: 2027 6465 6669 6e65 2d63 6f6d 7069 6c65 'define-compile │ │ │ +000158a0: 722d 6d61 6372 6f20 2728 6d61 6372 6f20 r-macro '(macro │ │ │ +000158b0: 2e20 235b 2866 756e 6320 6172 6773 2026 . #[(func args & │ │ │ +000158c0: 7265 7374 2062 6f64 7929 2022 0c3c ab83 rest body) ".<.. │ │ │ +000158d0: 0caa 83c5 0c44 c61a 1b0b 3aab 8a0b 8941 .....D....:....A │ │ │ +000158e0: 1340 5c6e 4212 aa72 5c6e 9f14 5c6e 0bad .@\nB..r\n..\n.. │ │ │ +000158f0: 83c5 0b44 a188 2ac7 c8c9 09ca cb0c 73ab ...D..*.......s. │ │ │ +00015900: 86cc cb0c 5c22 aa83 cd0c 4208 4223 cecf ....\"....B.B#.. │ │ │ +00015910: d009 44d1 45d2 d009 44d3 d446 4546 8722 ..D.E...D..FEF." │ │ │ +00015920: 205b 626f 6479 2066 756e 6320 7265 7320 [body func res │ │ │ +00015930: 7020 6172 6773 2026 7265 7374 206e 696c p args &rest nil │ │ │ +00015940: 2065 7661 6c2d 7768 656e 2028 636f 6d70 eval-when (comp │ │ │ +00015950: 696c 6520 6c6f 6164 2065 7661 6c29 2063 ile load eval) c │ │ │ +00015960: 6c2d 7472 616e 7366 6f72 6d2d 6675 6e63 l-transform-func │ │ │ +00015970: 7469 6f6e 2d70 726f 7065 7274 7920 636c tion-property cl │ │ │ +00015980: 2d63 6f6d 7069 6c65 722d 6d61 6372 6f20 -compiler-macro │ │ │ +00015990: 2677 686f 6c65 2064 656c 7120 2d2d 636c &whole delq --cl │ │ │ +000159a0: 2d77 686f 6c65 2d61 7267 2d2d 206f 7220 -whole-arg-- or │ │ │ +000159b0: 6765 7420 7175 6f74 6520 2762 7974 652d get quote 'byte- │ │ │ +000159c0: 636f 6d70 696c 6520 7075 7420 2762 7974 compile put 'byt │ │ │ +000159d0: 652d 636f 6d70 696c 6520 2763 6c2d 6279 e-compile 'cl-by │ │ │ +000159e0: 7465 2d63 6f6d 7069 6c65 2d63 6f6d 7069 te-compile-compi │ │ │ +000159f0: 6c65 722d 6d61 6372 6f5d 2039 2028 2324 ler-macro] 9 (#$ │ │ │ +00015a00: 202e 2038 3735 3135 295d 2929 0a28 6465 . 87515)])).(de │ │ │ +00015a10: 6661 6c69 6173 2027 636f 6d70 696c 6572 falias 'compiler │ │ │ +00015a20: 2d6d 6163 726f 6578 7061 6e64 2023 5b28 -macroexpand #[( │ │ │ +00015a30: 666f 726d 2920 2209 a2c3 1889 1a39 aba1 form) "......9.. │ │ │ +00015a40: 5c6e c44e 8910 ac9a c55c 6e21 ab95 5c6e \n.N.....\n!..\n │ │ │ +00015a50: 4ba2 c661 ab88 c75c 6e4b 4140 21ab 865c K..a...\nKA@!..\ │ │ │ +00015a60: 6e4b 8912 aa5c 5c08 ad8b 09c8 0809 8941 nK...\\........A │ │ │ +00015a70: 2389 1161 3f2a ac45 0987 2220 5b68 616e #..a?*.E.." [han │ │ │ +00015a80: 646c 6572 2066 6f72 6d20 6675 6e63 206e dler form func n │ │ │ +00015a90: 696c 2063 6c2d 636f 6d70 696c 6572 2d6d il cl-compiler-m │ │ │ +00015aa0: 6163 726f 2066 626f 756e 6470 2061 7574 acro fboundp aut │ │ │ +00015ab0: 6f6c 6f61 6420 6c6f 6164 2061 7070 6c79 oload load apply │ │ │ +00015ac0: 5d20 365d 290a 2864 6566 616c 6961 7320 ] 6]).(defalias │ │ │ +00015ad0: 2763 6c2d 6279 7465 2d63 6f6d 7069 6c65 'cl-byte-compile │ │ │ +00015ae0: 2d63 6f6d 7069 6c65 722d 6d61 6372 6f20 -compiler-macro │ │ │ +00015af0: 235b 2866 6f72 6d29 2022 08c1 0821 8910 #[(form) "...!.. │ │ │ +00015b00: 61ab 84c2 0821 87c3 0821 8722 205b 666f a....!...!." [fo │ │ │ +00015b10: 726d 2063 6f6d 7069 6c65 722d 6d61 6372 rm compiler-macr │ │ │ +00015b20: 6f65 7870 616e 6420 6279 7465 2d63 6f6d oexpand byte-com │ │ │ +00015b30: 7069 6c65 2d6e 6f72 6d61 6c2d 6361 6c6c pile-normal-call │ │ │ +00015b40: 2062 7974 652d 636f 6d70 696c 652d 666f byte-compile-fo │ │ │ +00015b50: 726d 5d20 335d 290a 2340 3234 3420 2864 rm] 3]).#@244 (d │ │ │ +00015b60: 6566 7375 6273 742a 204e 414d 4520 4152 efsubst* NAME AR │ │ │ +00015b70: 474c 4953 5420 5b44 4f43 5354 5249 4e47 GLIST [DOCSTRING │ │ │ +00015b80: 5d20 424f 4459 2e2e 2e29 3a20 6465 6669 ] BODY...): defi │ │ │ +00015b90: 6e65 204e 414d 4520 6173 2061 2066 756e ne NAME as a fun │ │ │ +00015ba0: 6374 696f 6e2e 0a4c 696b 6520 6064 6566 ction..Like `def │ │ │ +00015bb0: 756e 272c 2065 7863 6570 7420 7468 6520 un', except the │ │ │ +00015bc0: 6675 6e63 7469 6f6e 2069 7320 6175 746f function is auto │ │ │ +00015bd0: 6d61 7469 6361 6c6c 7920 6465 636c 6172 matically declar │ │ │ +00015be0: 6564 2060 696e 6c69 6e65 272c 0a41 5247 ed `inline',.ARG │ │ │ +00015bf0: 4c49 5354 2061 6c6c 6f77 7320 6675 6c6c LIST allows full │ │ │ +00015c00: 2043 6f6d 6d6f 6e20 4c69 7370 2063 6f6e Common Lisp con │ │ │ +00015c10: 7665 6e74 696f 6e73 2c20 616e 6420 424f ventions, and BO │ │ │ +00015c20: 4459 2069 7320 696d 706c 6963 6974 6c79 DY is implicitly │ │ │ +00015c30: 0a73 7572 726f 756e 6465 6420 6279 2028 .surrounded by ( │ │ │ +00015c40: 626c 6f63 6b20 4e41 4d45 202e 2e2e 292e block NAME ...). │ │ │ +00015c50: 1f0a 2864 6566 616c 6961 7320 2764 6566 ..(defalias 'def │ │ │ +00015c60: 7375 6273 742a 2027 286d 6163 726f 202e subst* '(macro . │ │ │ +00015c70: 2023 5b28 6e61 6d65 2061 7267 7320 2672 #[(name args &r │ │ │ +00015c80: 6573 7420 626f 6479 2920 22c6 0c21 891b est body) "..!.. │ │ │ +00015c90: 1dc7 5c6e 4219 c809 213f 180d ab90 c90c ..\nB...!?...... │ │ │ +00015ca0: 0d40 5c22 ca61 ab87 0d89 4115 88aa 6dc7 .@\".a....A...m. │ │ │ +00015cb0: 0d3f adad cb0e 15cc cdce 0c42 4242 cfd0 .?.........BBB.. │ │ │ +00015cc0: 0b44 d0d1 0e15 5c6e 4242 4408 ae84 d209 .D....\nBBD..... │ │ │ +00015cd0: 0b5c 223f d30c 73ad 81cd 080b 4242 4242 .\"?..s.....BBBB │ │ │ +00015ce0: 4242 46d4 0e15 0c5c 6e42 4242 452c 8722 BBF....\nBBBE,." │ │ │ +00015cf0: 205b 756e 7361 6665 2070 626f 6479 2062 [unsafe pbody b │ │ │ +00015d00: 6f64 7920 6172 676e 7320 6172 6773 2070 ody argns args p │ │ │ +00015d10: 2063 6c2d 6172 676c 6973 742d 6172 6773 cl-arglist-args │ │ │ +00015d20: 2070 726f 676e 2063 6c2d 7361 6665 2d65 progn cl-safe-e │ │ │ +00015d30: 7870 722d 7020 636c 2d65 7870 722d 636f xpr-p cl-expr-co │ │ │ +00015d40: 6e74 6169 6e73 2031 2064 6566 696e 652d ntains 1 define- │ │ │ +00015d50: 636f 6d70 696c 6572 2d6d 6163 726f 2026 compiler-macro & │ │ │ +00015d60: 7768 6f6c 6520 636c 2d77 686f 6c65 2026 whole cl-whole & │ │ │ +00015d70: 636c 2d71 756f 7465 2063 6c2d 6465 6673 cl-quote cl-defs │ │ │ +00015d80: 7562 7374 2d65 7870 616e 6420 7175 6f74 ubst-expand quot │ │ │ +00015d90: 6520 626c 6f63 6b20 636c 2d65 7870 722d e block cl-expr- │ │ │ +00015da0: 6163 6365 7373 2d6f 7264 6572 2026 6b65 access-order &ke │ │ │ +00015db0: 7920 6465 6675 6e2a 206e 616d 655d 2031 y defun* name] 1 │ │ │ +00015dc0: 3220 2823 2420 2e20 3838 3932 3629 5d29 2 (#$ . 88926)]) │ │ │ +00015dd0: 290a 2864 6566 616c 6961 7320 2763 6c2d ).(defalias 'cl- │ │ │ +00015de0: 6465 6673 7562 7374 2d65 7870 616e 6420 defsubst-expand │ │ │ +00015df0: 235b 2861 7267 6e73 2062 6f64 7920 7369 #[(argns body si │ │ │ +00015e00: 6d70 6c65 2077 686f 6c65 2075 6e73 6166 mple whole unsaf │ │ │ +00015e10: 6520 2672 6573 7420 6172 6776 7329 2022 e &rest argvs) " │ │ │ +00015e20: 0cab 89c6 c70d 4221 ac82 0c87 c80d 21ab ......B!......!. │ │ │ +00015e30: 82c9 11ca cbcc cd08 0d23 5c22 891b ab86 .........#\".... │ │ │ +00015e40: ce0b 5c6e 45aa 815c 6e29 8722 205b 6172 ..\nE..\n)." [ar │ │ │ +00015e50: 676e 7320 7369 6d70 6c65 2062 6f64 7920 gns simple body │ │ │ +00015e60: 6c65 7473 2077 686f 6c65 2061 7267 7673 lets whole argvs │ │ │ +00015e70: 2063 6c2d 7361 6665 2d65 7870 722d 7020 cl-safe-expr-p │ │ │ +00015e80: 7072 6f67 6e20 636c 2d73 696d 706c 652d progn cl-simple- │ │ │ +00015e90: 6578 7072 732d 7020 7420 6465 6c71 206e exprs-p t delq n │ │ │ +00015ea0: 696c 206d 6170 6361 722a 2023 5b28 6172 il mapcar* #[(ar │ │ │ +00015eb0: 676e 2061 7267 7629 2022 09ac 85c5 0c21 gn argv) ".....! │ │ │ +00015ec0: ab8d c60c 0b5c 6e23 1208 ad87 0b0c 4487 .....\n#......D. │ │ │ +00015ed0: 0b0c 4487 2220 5b75 6e73 6166 6520 7369 ..D." [unsafe si │ │ │ +00015ee0: 6d70 6c65 2062 6f64 7920 6172 676e 2061 mple body argn a │ │ │ +00015ef0: 7267 7620 636c 2d63 6f6e 7374 2d65 7870 rgv cl-const-exp │ │ │ +00015f00: 722d 7020 7375 6273 745d 2034 5d20 6c65 r-p subst] 4] le │ │ │ +00015f10: 745d 2037 5d29 0a28 6279 7465 2d63 6f64 t] 7]).(byte-cod │ │ │ +00015f20: 6520 22c0 c1c2 c323 88c0 c1c4 c523 88c1 e "....#.....#.. │ │ │ +00015f30: c24e ac86 c0c1 c2c6 2388 c0c7 c4c8 2388 .N......#.....#. │ │ │ +00015f40: c7c2 4eac 86c0 c7c2 c623 88c0 c9c4 ca23 ..N......#.....# │ │ │ +00015f50: 88c9 c24e ac86 c0c9 c2c6 2388 c0cb c4cc ...N......#..... │ │ │ +00015f60: 2388 cbc2 4eac 86c0 cbc2 c623 88c0 cdc4 #...N......#.... │ │ │ +00015f70: ce23 88cd c24e ac86 c0cd c2c6 2388 c0cf .#...N......#... │ │ │ +00015f80: c4d0 2388 cfc2 4eac 86c0 cfc2 c623 88c0 ..#...N......#.. │ │ │ +00015f90: d1c4 d223 88d1 c24e ac86 c0d1 c2c6 2388 ...#...N......#. │ │ │ +00015fa0: c0d3 c4d4 2388 d3c2 4eac 86c0 d3c2 c623 ....#...N......# │ │ │ +00015fb0: 88d5 d6d7 5c22 88d8 d921 88da db21 8722 ....\"...!...!." │ │ │ +00015fc0: 205b 7075 7420 6571 6c20 6279 7465 2d63 [put eql byte-c │ │ │ +00015fd0: 6f6d 7069 6c65 206e 696c 2063 6c2d 636f ompile nil cl-co │ │ │ +00015fe0: 6d70 696c 6572 2d6d 6163 726f 2023 5b28 mpiler-macro #[( │ │ │ +00015ff0: 666f 726d 2061 2062 2920 22c4 0b21 c561 form a b) "..!.a │ │ │ +00016000: ab98 c60b 2189 19a7 ab8a 09a8 ac86 c70b ....!........... │ │ │ +00016010: 5c6e 45aa 84c8 0b5c 6e45 2987 c45c 6e21 \nE....\nE)..\n! │ │ │ +00016020: c561 ab98 c65c 6e21 8919 a7ab 8a09 a8ac .a...\n!........ │ │ │ +00016030: 86c7 0b5c 6e45 aa84 c80b 5c6e 4529 87c9 ...\nE....\nE).. │ │ │ +00016040: 0bca 5c22 ab8e cbcc 0b44 c70b 5c6e 45c8 ..\".....D..\nE. │ │ │ +00016050: 0b5c 6e45 4687 cd0b 21ab 94c9 5c6e ca5c .\nEF...!...\n.\ │ │ │ +00016060: 22ab 8ecb cc5c 6e44 c70b 5c6e 45c8 0b5c "....\nD..\nE..\ │ │ │ +00016070: 6e45 4687 0887 2220 5b66 6f72 6d20 7661 nEF..." [form va │ │ │ +00016080: 6c20 6220 6120 636c 2d63 6f6e 7374 2d65 l b a cl-const-e │ │ │ +00016090: 7870 722d 7020 7420 636c 2d63 6f6e 7374 xpr-p t cl-const │ │ │ +000160a0: 2d65 7870 722d 7661 6c20 6571 7561 6c20 -expr-val equal │ │ │ +000160b0: 6571 2063 6c2d 7369 6d70 6c65 2d65 7870 eq cl-simple-exp │ │ │ +000160c0: 722d 7020 3520 6966 206e 756d 6265 7270 r-p 5 if numberp │ │ │ +000160d0: 2063 6c2d 7361 6665 2d65 7870 722d 705d cl-safe-expr-p] │ │ │ +000160e0: 2037 2022 5c6e 436f 6d6d 6f6e 204c 6973 7 "\nCommon Lis │ │ │ +000160f0: 7020 6c61 6d62 6461 206c 6973 743a 5c6e p lambda list:\n │ │ │ +00016100: 2020 2865 716c 2046 4f52 4d20 4120 4229 (eql FORM A B) │ │ │ +00016110: 5c6e 5c6e 225d 2063 6c2d 6279 7465 2d63 \n\n"] cl-byte-c │ │ │ +00016120: 6f6d 7069 6c65 2d63 6f6d 7069 6c65 722d ompile-compiler- │ │ │ +00016130: 6d61 6372 6f20 6d65 6d62 6572 2a20 235b macro member* #[ │ │ │ +00016140: 2866 6f72 6d20 6120 6c69 7374 2026 7265 (form a list &re │ │ │ +00016150: 7374 206b 6579 7329 2022 5c6e 47c6 55ad st keys) "\nG.U. │ │ │ +00016160: 8b5c 6e40 c761 ad85 c85c 6e41 4021 8918 .\n@.a...\nA@!.. │ │ │ +00016170: c961 ab87 ca0c 0b45 82b0 0008 cb61 ab87 .a.....E.....a.. │ │ │ +00016180: cc0c 0b45 82b0 005c 6eab 8508 cd61 abfc ...E...\n....a.. │ │ │ +00016190: ce0c 21cf 61ab 93c8 0c21 19d0 0921 29ab ..!.a....!...!). │ │ │ +000161a0: 83cc aa81 ca0c 0b45 aae4 ce0b 21cf 61ab .......E....!.a. │ │ │ +000161b0: d7c8 0b21 d189 1e13 1e14 891d 41ac 8c0d ...!........A... │ │ │ +000161c0: adc3 cd0c d20d 4044 45aa ba0d aba1 0d40 ......@DE......@ │ │ │ +000161d0: 19d0 0921 29ab 85cf 1614 aa8d 0d40 a8ac ...!)........@.. │ │ │ +000161e0: 880d 4039 ac83 cf16 130d 4189 15ac 5f0e ..@9......A..._. │ │ │ +000161f0: 14ac 86ca 0c0b 45aa 8c0e 13ac 86cc 0c0b ......E......... │ │ │ +00016200: 45aa 820e 152b aa86 0e15 aa82 0e15 2987 E....+........). │ │ │ +00016210: 2220 5b74 6573 7420 6f62 6a65 6374 206b " [test object k │ │ │ +00016220: 6579 7320 6c69 7374 2061 2070 2032 203a eys list a p 2 : │ │ │ +00016230: 7465 7374 2063 6c2d 636f 6e73 742d 6578 test cl-const-ex │ │ │ +00016240: 7072 2d76 616c 2065 7120 6d65 6d71 2065 pr-val eq memq e │ │ │ +00016250: 7175 616c 206d 656d 6265 7220 6571 6c20 qual member eql │ │ │ +00016260: 636c 2d63 6f6e 7374 2d65 7870 722d 7020 cl-const-expr-p │ │ │ +00016270: 7420 666c 6f61 7470 206e 696c 2071 756f t floatp nil quo │ │ │ +00016280: 7465 206d 7120 6d62 2066 6f72 6d5d 2035 te mq mb form] 5 │ │ │ +00016290: 2022 5c6e 436f 6d6d 6f6e 204c 6973 7020 "\nCommon Lisp │ │ │ +000162a0: 6c61 6d62 6461 206c 6973 743a 5c6e 2020 lambda list:\n │ │ │ +000162b0: 286d 656d 6265 722a 2046 4f52 4d20 4120 (member* FORM A │ │ │ +000162c0: 4c49 5354 2026 7265 7374 204b 4559 5329 LIST &rest KEYS) │ │ │ +000162d0: 5c6e 5c6e 225d 2061 7373 6f63 2a20 235b \n\n"] assoc* #[ │ │ │ +000162e0: 2866 6f72 6d20 6120 6c69 7374 2026 7265 (form a list &re │ │ │ +000162f0: 7374 206b 6579 7329 2022 0c47 c655 ad8b st keys) ".G.U.. │ │ │ +00016300: 0c40 c761 ad85 c80c 4140 2189 1ac9 61ab .@.a....A@!...a. │ │ │ +00016310: 86ca 0d0b 45aa b15c 6ecb 61ab 86cc 0d0b ....E..\n.a..... │ │ │ +00016320: 45aa a6cd 0d21 ce61 ab9e 0cab 855c 6ecf E....!.a.....\n. │ │ │ +00016330: 61ab 96c8 0d21 19d0 0921 29ab 86cc 0d0b a....!...!)..... │ │ │ +00016340: 45aa 87ca 0d0b 45aa 8108 2987 2220 5b66 E.....E...)." [f │ │ │ +00016350: 6f72 6d20 6f62 6a65 6374 2074 6573 7420 orm object test │ │ │ +00016360: 6c69 7374 206b 6579 7320 6120 3220 3a74 list keys a 2 :t │ │ │ +00016370: 6573 7420 636c 2d63 6f6e 7374 2d65 7870 est cl-const-exp │ │ │ +00016380: 722d 7661 6c20 6571 2061 7373 7120 6571 r-val eq assq eq │ │ │ +00016390: 7561 6c20 6173 736f 6320 636c 2d63 6f6e ual assoc cl-con │ │ │ +000163a0: 7374 2d65 7870 722d 7020 7420 6571 6c20 st-expr-p t eql │ │ │ +000163b0: 666c 6f61 7470 5d20 3420 225c 6e43 6f6d floatp] 4 "\nCom │ │ │ +000163c0: 6d6f 6e20 4c69 7370 206c 616d 6264 6120 mon Lisp lambda │ │ │ +000163d0: 6c69 7374 3a5c 6e20 2028 6173 736f 632a list:\n (assoc* │ │ │ +000163e0: 2046 4f52 4d20 4120 4c49 5354 2026 7265 FORM A LIST &re │ │ │ +000163f0: 7374 204b 4559 5329 5c6e 5c6e 225d 2061 st KEYS)\n\n"] a │ │ │ +00016400: 646a 6f69 6e20 235b 2866 6f72 6d20 6120 djoin #[(form a │ │ │ +00016410: 6c69 7374 2026 7265 7374 206b 6579 7329 list &rest keys) │ │ │ +00016420: 2022 c45c 6e21 ab99 c40b 21ab 94c5 0973 ".\n!....!....s │ │ │ +00016430: ac8f c6c7 5c6e 0b09 4242 420b c85c 6e0b ....\n..BBB..\n. │ │ │ +00016440: 4546 8708 8722 205b 666f 726d 206b 6579 EF..." [form key │ │ │ +00016450: 7320 6120 6c69 7374 2063 6c2d 7369 6d70 s a list cl-simp │ │ │ +00016460: 6c65 2d65 7870 722d 7020 3a6b 6579 2069 le-expr-p :key i │ │ │ +00016470: 6620 6d65 6d62 6572 2a20 636f 6e73 5d20 f member* cons] │ │ │ +00016480: 3620 225c 6e43 6f6d 6d6f 6e20 4c69 7370 6 "\nCommon Lisp │ │ │ +00016490: 206c 616d 6264 6120 6c69 7374 3a5c 6e20 lambda list:\n │ │ │ +000164a0: 2028 6164 6a6f 696e 2046 4f52 4d20 4120 (adjoin FORM A │ │ │ +000164b0: 4c49 5354 2026 7265 7374 204b 4559 5329 LIST &rest KEYS) │ │ │ +000164c0: 5c6e 5c6e 225d 206c 6973 742a 2023 5b28 \n\n"] list* #[( │ │ │ +000164d0: 2d2d 636c 2d77 686f 6c65 2d61 7267 2d2d --cl-whole-arg-- │ │ │ +000164e0: 2061 7267 2026 7265 7374 206f 7468 6572 arg &rest other │ │ │ +000164f0: 7329 2022 c409 0842 2189 1b40 1a0b 4189 s) "...B!..@..A. │ │ │ +00016500: 13ab 88c5 0b40 5c6e 4512 aa72 5c6e 2a87 .....@\nE..r\n*. │ │ │ +00016510: 2220 5b6f 7468 6572 7320 6172 6720 666f " [others arg fo │ │ │ +00016520: 726d 2061 7267 7320 7265 7665 7273 6520 rm args reverse │ │ │ +00016530: 636f 6e73 5d20 3420 225c 6e43 6f6d 6d6f cons] 4 "\nCommo │ │ │ +00016540: 6e20 4c69 7370 206c 616d 6264 6120 6c69 n Lisp lambda li │ │ │ +00016550: 7374 3a5c 6e20 2028 6c69 7374 2a20 2d2d st:\n (list* -- │ │ │ +00016560: 434c 2d57 484f 4c45 2d41 5247 2d2d 2041 CL-WHOLE-ARG-- A │ │ │ +00016570: 5247 2026 7265 7374 204f 5448 4552 5329 RG &rest OTHERS) │ │ │ +00016580: 5c6e 5c6e 225d 2067 6574 2a20 235b 282d \n\n"] get* #[(- │ │ │ +00016590: 2d63 6c2d 7768 6f6c 652d 6172 672d 2d20 -cl-whole-arg-- │ │ │ +000165a0: 7379 6d20 7072 6f70 2026 6f70 7469 6f6e sym prop &option │ │ │ +000165b0: 616c 2064 6566 6175 6c74 2920 22c3 5c6e al default) ".\n │ │ │ +000165c0: 0908 4687 2220 5b64 6566 6175 6c74 2070 ..F." [default p │ │ │ +000165d0: 726f 7020 7379 6d20 6765 745d 2034 2022 rop sym get] 4 " │ │ │ +000165e0: 5c6e 436f 6d6d 6f6e 204c 6973 7020 6c61 \nCommon Lisp la │ │ │ +000165f0: 6d62 6461 206c 6973 743a 5c6e 2020 2867 mbda list:\n (g │ │ │ +00016600: 6574 2a20 2d2d 434c 2d57 484f 4c45 2d41 et* --CL-WHOLE-A │ │ │ +00016610: 5247 2d2d 2053 594d 2050 524f 5020 266f RG-- SYM PROP &o │ │ │ +00016620: 7074 696f 6e61 6c20 4445 4641 554c 5429 ptional DEFAULT) │ │ │ +00016630: 5c6e 5c6e 225d 2067 6574 6620 235b 282d \n\n"] getf #[(- │ │ │ +00016640: 2d63 6c2d 7768 6f6c 652d 6172 672d 2d20 -cl-whole-arg-- │ │ │ +00016650: 7379 6d20 7072 6f70 2026 6f70 7469 6f6e sym prop &option │ │ │ +00016660: 616c 2064 6566 6175 6c74 2920 22c3 5c6e al default) ".\n │ │ │ +00016670: 0908 4687 2220 5b64 6566 6175 6c74 2070 ..F." [default p │ │ │ +00016680: 726f 7020 7379 6d20 706c 6973 742d 6765 rop sym plist-ge │ │ │ +00016690: 745d 2034 2022 5c6e 436f 6d6d 6f6e 204c t] 4 "\nCommon L │ │ │ +000166a0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +000166b0: 5c6e 2020 2867 6574 6620 2d2d 434c 2d57 \n (getf --CL-W │ │ │ +000166c0: 484f 4c45 2d41 5247 2d2d 2053 594d 2050 HOLE-ARG-- SYM P │ │ │ +000166d0: 524f 5020 266f 7074 696f 6e61 6c20 4445 ROP &optional DE │ │ │ +000166e0: 4641 554c 5429 5c6e 5c6e 225d 2074 7970 FAULT)\n\n"] typ │ │ │ +000166f0: 6570 2023 5b28 666f 726d 2076 616c 2074 ep #[(form val t │ │ │ +00016700: 7970 6529 2022 c509 21ab a8c6 0cc7 0921 ype) "..!......! │ │ │ +00016710: 5c22 1bc8 0b0c 5c22 c973 ac85 ca0c 21ab \"....\".s....!. │ │ │ +00016720: 830b aa8f cb20 1acc 5c6e 0c44 43cd 5c6e ..... ..\n.DC.\n │ │ │ +00016730: 0c0b 2345 2929 8708 8722 205b 666f 726d ..#E))..." [form │ │ │ +00016740: 2074 7970 6520 7465 6d70 2072 6573 2076 type temp res v │ │ │ +00016750: 616c 2063 6c2d 636f 6e73 742d 6578 7072 al cl-const-expr │ │ │ +00016760: 2d70 2063 6c2d 6d61 6b65 2d74 7970 652d -p cl-make-type- │ │ │ +00016770: 7465 7374 2063 6c2d 636f 6e73 742d 6578 test cl-const-ex │ │ │ +00016780: 7072 2d76 616c 2063 6c2d 6578 7072 2d63 pr-val cl-expr-c │ │ │ +00016790: 6f6e 7461 696e 7320 286e 696c 2031 2920 ontains (nil 1) │ │ │ +000167a0: 636c 2d73 696d 706c 652d 6578 7072 2d70 cl-simple-expr-p │ │ │ +000167b0: 2067 656e 7379 6d20 6c65 7420 7375 6273 gensym let subs │ │ │ +000167c0: 745d 2036 2022 5c6e 436f 6d6d 6f6e 204c t] 6 "\nCommon L │ │ │ +000167d0: 6973 7020 6c61 6d62 6461 206c 6973 743a isp lambda list: │ │ │ +000167e0: 5c6e 2020 2874 7970 6570 2046 4f52 4d20 \n (typep FORM │ │ │ +000167f0: 5641 4c20 5459 5045 295c 6e5c 6e22 5d20 VAL TYPE)\n\n"] │ │ │ +00016800: 6d61 7063 2023 5b28 7929 2022 c108 40c2 mapc #[(y) "..@. │ │ │ +00016810: c323 88c1 0840 c4c5 2388 c108 40c6 c7c8 .#...@..#...@... │ │ │ +00016820: 0841 4039 ab92 c9ca 0841 4044 c9ca 0841 .A@9.....A@D...A │ │ │ +00016830: 4140 44cb 4545 aa84 c908 4142 4523 8722 A@D.EE....ABE#." │ │ │ +00016840: 205b 7920 7075 7420 7369 6465 2d65 6666 [y put side-eff │ │ │ +00016850: 6563 742d 6672 6565 2074 2062 7974 652d ect-free t byte- │ │ │ +00016860: 636f 6d70 696c 6520 636c 2d62 7974 652d compile cl-byte- │ │ │ +00016870: 636f 6d70 696c 652d 636f 6d70 696c 6572 compile-compiler │ │ │ +00016880: 2d6d 6163 726f 2063 6c2d 636f 6d70 696c -macro cl-compil │ │ │ +00016890: 6572 2d6d 6163 726f 206c 616d 6264 6120 er-macro lambda │ │ │ +000168a0: 2877 2078 2920 6c69 7374 2071 756f 7465 (w x) list quote │ │ │ +000168b0: 2078 5d20 3130 5d20 2828 6669 7273 7420 x] 10] ((first │ │ │ +000168c0: 2763 6172 2078 2920 2873 6563 6f6e 6420 'car x) (second │ │ │ +000168d0: 2763 6164 7220 7829 2028 7468 6972 6420 'cadr x) (third │ │ │ +000168e0: 2763 6164 6472 2078 2920 2866 6f75 7274 'caddr x) (fourt │ │ │ +000168f0: 6820 2763 6164 6464 7220 7829 2028 6669 h 'cadddr x) (fi │ │ │ +00016900: 6674 6820 276e 7468 2034 2078 2920 2873 fth 'nth 4 x) (s │ │ │ +00016910: 6978 7468 2027 6e74 6820 3520 7829 2028 ixth 'nth 5 x) ( │ │ │ +00016920: 7365 7665 6e74 6820 276e 7468 2036 2078 seventh 'nth 6 x │ │ │ +00016930: 2920 2865 6967 6874 6820 276e 7468 2037 ) (eighth 'nth 7 │ │ │ +00016940: 2078 2920 286e 696e 7468 2027 6e74 6820 x) (ninth 'nth │ │ │ +00016950: 3820 7829 2028 7465 6e74 6820 276e 7468 8 x) (tenth 'nth │ │ │ +00016960: 2039 2078 2920 2872 6573 7420 2763 6472 9 x) (rest 'cdr │ │ │ +00016970: 2078 2920 2865 6e64 7020 276e 756c 6c20 x) (endp 'null │ │ │ +00016980: 7829 2028 706c 7573 7020 273e 2078 2030 x) (plusp '> x 0 │ │ │ +00016990: 2920 286d 696e 7573 7020 273c 2078 2030 ) (minusp '< x 0 │ │ │ +000169a0: 2920 286f 6464 7020 2765 7120 286c 6973 ) (oddp 'eq (lis │ │ │ +000169b0: 7420 276c 6f67 616e 6420 7820 3129 2031 t 'logand x 1) 1 │ │ │ +000169c0: 2920 2865 7665 6e70 2027 6571 2028 6c69 ) (evenp 'eq (li │ │ │ +000169d0: 7374 2027 6c6f 6761 6e64 2078 2031 2920 st 'logand x 1) │ │ │ +000169e0: 3029 2028 6361 6172 2063 6172 2063 6172 0) (caar car car │ │ │ +000169f0: 2920 2863 6164 7220 6361 7220 6364 7229 ) (cadr car cdr) │ │ │ +00016a00: 2028 6364 6172 2063 6472 2063 6172 2920 (cdar cdr car) │ │ │ +00016a10: 2863 6464 7220 6364 7220 6364 7229 2028 (cddr cdr cdr) ( │ │ │ +00016a20: 6361 6161 7220 6361 7220 6361 6172 2920 caaar car caar) │ │ │ +00016a30: 2863 6161 6472 2063 6172 2063 6164 7229 (caadr car cadr) │ │ │ +00016a40: 2028 6361 6461 7220 6361 7220 6364 6172 (cadar car cdar │ │ │ +00016a50: 2920 2863 6164 6472 2063 6172 2063 6464 ) (caddr car cdd │ │ │ +00016a60: 7229 2028 6364 6161 7220 6364 7220 6361 r) (cdaar cdr ca │ │ │ +00016a70: 6172 2920 2863 6461 6472 2063 6472 2063 ar) (cdadr cdr c │ │ │ +00016a80: 6164 7229 2028 6364 6461 7220 6364 7220 adr) (cddar cdr │ │ │ +00016a90: 6364 6172 2920 2863 6464 6472 2063 6472 cdar) (cdddr cdr │ │ │ +00016aa0: 2063 6464 7229 2028 6361 6161 6172 2063 cddr) (caaaar c │ │ │ +00016ab0: 6172 2063 6161 6172 2920 2863 6161 6164 ar caaar) (caaad │ │ │ +00016ac0: 7220 6361 7220 6361 6164 7229 2028 6361 r car caadr) (ca │ │ │ +00016ad0: 6164 6172 2063 6172 2063 6164 6172 2920 adar car cadar) │ │ │ +00016ae0: 2863 6161 6464 7220 6361 7220 6361 6464 (caaddr car cadd │ │ │ +00016af0: 7229 2028 6361 6461 6172 2063 6172 2063 r) (cadaar car c │ │ │ +00016b00: 6461 6172 2920 2863 6164 6164 7220 6361 daar) (cadadr ca │ │ │ +00016b10: 7220 6364 6164 7229 2028 6361 6464 6172 r cdadr) (caddar │ │ │ +00016b20: 2063 6172 2063 6464 6172 2920 2863 6164 car cddar) (cad │ │ │ +00016b30: 6464 7220 6361 7220 6364 6464 7229 2028 ddr car cdddr) ( │ │ │ +00016b40: 6364 6161 6172 2063 6472 2063 6161 6172 cdaaar cdr caaar │ │ │ +00016b50: 2920 2863 6461 6164 7220 6364 7220 6361 ) (cdaadr cdr ca │ │ │ +00016b60: 6164 7229 2028 6364 6164 6172 2063 6472 adr) (cdadar cdr │ │ │ +00016b70: 2063 6164 6172 2920 2863 6461 6464 7220 cadar) (cdaddr │ │ │ +00016b80: 6364 7220 6361 6464 7229 2028 6364 6461 cdr caddr) (cdda │ │ │ +00016b90: 6172 2063 6472 2063 6461 6172 2920 2863 ar cdr cdaar) (c │ │ │ +00016ba0: 6464 6164 7220 6364 7220 6364 6164 7229 ddadr cdr cdadr) │ │ │ +00016bb0: 2028 6364 6464 6172 2063 6472 2063 6464 (cdddar cdr cdd │ │ │ +00016bc0: 6172 2920 2863 6464 6464 7220 6364 7220 ar) (cddddr cdr │ │ │ +00016bd0: 6364 6464 7229 2920 7072 6f63 6c61 696d cdddr)) proclaim │ │ │ +00016be0: 2028 696e 6c69 6e65 2066 6c6f 6174 702d (inline floatp- │ │ │ +00016bf0: 7361 6665 2061 636f 6e73 206d 6170 2063 safe acons map c │ │ │ +00016c00: 6f6e 6361 7465 6e61 7465 206e 6f74 616e oncatenate notan │ │ │ +00016c10: 7920 6e6f 7465 7665 7279 2063 6c2d 7365 y notevery cl-se │ │ │ +00016c20: 742d 656c 7420 7265 7661 7070 656e 6420 t-elt revappend │ │ │ +00016c30: 6e72 6563 6f6e 6329 2072 756e 2d68 6f6f nreconc) run-hoo │ │ │ +00016c40: 6b73 2063 6c2d 6d61 6373 2d6c 6f61 642d ks cl-macs-load- │ │ │ +00016c50: 686f 6f6b 5d20 3429 0a hook] 4). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/cl-seq.elc │ │ │ @@ -1,2137 +1,2136 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3435 2032 eb 25 01:53:45 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6c2d 7365 712e 656c 0a3b 3b3b 2065 6d61 l-seq.el.;;; ema │ │ │ -000000a0: 6373 2076 6572 7369 6f6e 2032 312e 3420 cs version 21.4 │ │ │ -000000b0: 2870 6174 6368 2032 3429 2022 5374 616e (patch 24) "Stan │ │ │ -000000c0: 6461 7264 2043 2220 5845 6d61 6373 204c dard C" XEmacs L │ │ │ -000000d0: 7563 6964 2e0a 3b3b 3b20 6279 7465 636f ucid..;;; byteco │ │ │ -000000e0: 6d70 2076 6572 7369 6f6e 2032 2e32 3720 mp version 2.27 │ │ │ -000000f0: 5845 6d61 6373 3b20 3230 3030 2d30 392d XEmacs; 2000-09- │ │ │ -00000100: 3132 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 12..;;; optimiza │ │ │ -00000110: 7469 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 tion is on..;;; │ │ │ -00000120: 7468 6973 2066 696c 6520 7573 6573 206f this file uses o │ │ │ -00000130: 7063 6f64 6573 2077 6869 6368 2064 6f20 pcodes which do │ │ │ -00000140: 6e6f 7420 6578 6973 7420 696e 2045 6d61 not exist in Ema │ │ │ -00000150: 6373 2031 392e 0a0a 2869 6620 2861 6e64 cs 19...(if (and │ │ │ -00000160: 2028 626f 756e 6470 2027 656d 6163 732d (boundp 'emacs- │ │ │ -00000170: 7665 7273 696f 6e29 0a09 2028 6f72 2028 version).. (or ( │ │ │ -00000180: 616e 6420 2862 6f75 6e64 7020 2765 706f and (boundp 'epo │ │ │ -00000190: 6368 3a3a 7665 7273 696f 6e29 2065 706f ch::version) epo │ │ │ -000001a0: 6368 3a3a 7665 7273 696f 6e29 0a09 2020 ch::version).. │ │ │ -000001b0: 2020 2028 7374 7269 6e67 2d6c 6573 7370 (string-lessp │ │ │ -000001c0: 2065 6d61 6373 2d76 6572 7369 6f6e 2022 emacs-version " │ │ │ -000001d0: 3230 2229 2929 0a20 2020 2028 6572 726f 20"))). (erro │ │ │ -000001e0: 7220 2260 636c 2d73 6571 2e65 6c27 2077 r "`cl-seq.el' w │ │ │ -000001f0: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ -00000200: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ -00000210: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ -00000220: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ -00000230: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ -00000240: 6c69 7374 206e 696c 2929 0a0a 0a28 6279 list nil))...(by │ │ │ -00000250: 7465 2d63 6f64 6520 22c1 0873 ac84 c2c3 te-code "..s.... │ │ │ -00000260: 2188 c187 2220 5b66 6561 7475 7265 7320 !..." [features │ │ │ -00000270: 636c 2d31 3920 6572 726f 7220 2254 7269 cl-19 error "Tri │ │ │ -00000280: 6564 2074 6f20 6c6f 6164 2060 636c 2d73 ed to load `cl-s │ │ │ -00000290: 6571 2720 6265 666f 7265 2060 636c 2721 eq' before `cl'! │ │ │ -000002a0: 225d 2032 290a 2864 6566 616c 6961 7320 "] 2).(defalias │ │ │ -000002b0: 2763 6c2d 7075 7368 2027 286d 6163 726f 'cl-push '(macro │ │ │ -000002c0: 202e 2023 5b28 7820 706c 6163 6529 2022 . #[(x place) " │ │ │ -000002d0: c209 c308 0945 4587 2220 5b78 2070 6c61 .....EE." [x pla │ │ │ -000002e0: 6365 2073 6574 7120 636f 6e73 5d20 355d ce setq cons] 5] │ │ │ -000002f0: 2929 0a28 6465 6661 6c69 6173 2027 636c )).(defalias 'cl │ │ │ -00000300: 2d70 6f70 2027 286d 6163 726f 202e 2023 -pop '(macro . # │ │ │ -00000310: 5b28 706c 6163 6529 2022 c1c2 08c3 08c4 [(place) "...... │ │ │ -00000320: 0844 4545 4487 2220 5b70 6c61 6365 2063 .DEED." [place c │ │ │ -00000330: 6172 2070 726f 6731 2073 6574 7120 6364 ar prog1 setq cd │ │ │ -00000340: 725d 2037 5d29 290a 2340 3939 3820 4865 r] 7])).#@998 He │ │ │ -00000350: 6c70 6572 206d 6163 726f 2066 6f72 2066 lper macro for f │ │ │ -00000360: 756e 6374 696f 6e73 2077 6974 6820 6b65 unctions with ke │ │ │ -00000370: 7977 6f72 6420 6172 6775 6d65 6e74 732e yword arguments. │ │ │ -00000380: 0a54 6869 7320 6973 2061 2074 656d 706f .This is a tempo │ │ │ -00000390: 7261 7279 2073 6f6c 7574 696f 6e2c 2075 rary solution, u │ │ │ -000003a0: 6e74 696c 206b 6579 776f 7264 2061 7267 ntil keyword arg │ │ │ -000003b0: 756d 656e 7473 2061 7265 206e 6174 6976 uments are nativ │ │ │ -000003c0: 656c 7920 7375 7070 6f72 7465 642e 0a44 ely supported..D │ │ │ -000003d0: 6563 6c61 7265 2079 6f75 7220 6675 6e63 eclare your func │ │ │ -000003e0: 7469 6f6e 2065 6e64 696e 6720 7769 7468 tion ending with │ │ │ -000003f0: 2028 2e2e 2e20 2672 6573 7420 636c 2d6b (... &rest cl-k │ │ │ -00000400: 6579 7329 2c20 7468 656e 2077 7261 7020 eys), then wrap │ │ │ -00000410: 7468 650a 6675 6e63 7469 6f6e 2062 6f64 the.function bod │ │ │ -00000420: 7920 696e 2061 2063 616c 6c20 746f 2060 y in a call to ` │ │ │ -00000430: 636c 2d70 6172 7369 6e67 2d6b 6579 776f cl-parsing-keywo │ │ │ -00000440: 7264 7327 2e0a 0a4b 574f 5244 5320 6973 rds'...KWORDS is │ │ │ -00000450: 2061 206c 6973 7420 6f66 206b 6579 776f a list of keywo │ │ │ -00000460: 7264 2064 6566 696e 6974 696f 6e73 2e20 rd definitions. │ │ │ -00000470: 2045 6163 6820 6465 6669 6e69 7469 6f6e Each definition │ │ │ -00000480: 2073 686f 756c 6420 6265 0a65 6974 6865 should be.eithe │ │ │ -00000490: 7220 6120 6b65 7977 6f72 6420 6f72 2061 r a keyword or a │ │ │ -000004a0: 206c 6973 7420 284b 4559 574f 5244 2044 list (KEYWORD D │ │ │ -000004b0: 4546 4155 4c54 2d56 414c 5545 292e 2020 EFAULT-VALUE). │ │ │ -000004c0: 496e 2074 6865 2066 6f72 6d65 7220 6361 In the former ca │ │ │ -000004d0: 7365 2c0a 7468 6520 6465 6661 756c 7420 se,.the default │ │ │ -000004e0: 7661 6c75 6520 6973 206e 696c 2e20 2054 value is nil. T │ │ │ -000004f0: 6865 206b 6579 776f 7264 7320 6172 6520 he keywords are │ │ │ -00000500: 6176 6169 6c61 626c 6520 696e 2042 4f44 available in BOD │ │ │ -00000510: 5920 6173 2074 6865 206e 616d 650a 6f66 Y as the name.of │ │ │ -00000520: 2074 6865 206b 6579 776f 7264 2c20 6d69 the keyword, mi │ │ │ -00000530: 6e75 7320 6974 7320 696e 6974 6961 6c20 nus its initial │ │ │ -00000540: 636f 6c6f 6e20 616e 6420 7072 6570 656e colon and prepen │ │ │ -00000550: 6465 6420 7769 7468 2060 636c 2d27 2e0a ded with `cl-'.. │ │ │ -00000560: 0a4f 5448 4552 2d4b 4559 5320 7370 6563 .OTHER-KEYS spec │ │ │ -00000570: 6966 6965 7320 6f74 6865 7220 6b65 7977 ifies other keyw │ │ │ -00000580: 6f72 6473 2074 6861 7420 6172 6520 6163 ords that are ac │ │ │ -00000590: 6365 7074 6564 2062 7574 2069 676e 6f72 cepted but ignor │ │ │ -000005a0: 6564 2e20 2049 740a 6973 2065 6974 6865 ed. It.is eithe │ │ │ -000005b0: 7220 7468 6520 7661 6c75 6520 2774 2720 r the value 't' │ │ │ -000005c0: 2869 676e 6f72 6520 616c 6c20 6f74 6865 (ignore all othe │ │ │ -000005d0: 7220 6b65 7973 2c20 6571 7569 7661 6c65 r keys, equivale │ │ │ -000005e0: 6e74 2074 6f20 7468 650a 2661 6c6c 6f77 nt to the.&allow │ │ │ -000005f0: 2d6f 7468 6572 2d6b 6579 7320 6172 6775 -other-keys argu │ │ │ -00000600: 6d65 6e74 2064 6563 6c61 7261 7469 6f6e ment declaration │ │ │ -00000610: 2069 6e20 436f 6d6d 6f6e 204c 6973 7029 in Common Lisp) │ │ │ -00000620: 206f 7220 6120 6c69 7374 2069 6e20 7468 or a list in th │ │ │ -00000630: 650a 7361 6d65 2066 6f72 6d61 7420 6173 e.same format as │ │ │ -00000640: 204b 574f 5244 532e 2020 4966 206b 6579 KWORDS. If key │ │ │ -00000650: 776f 7264 7320 6172 6520 6769 7665 6e20 words are given │ │ │ -00000660: 7468 6174 2061 7265 206e 6f74 2069 6e20 that are not in │ │ │ -00000670: 4b57 4f52 4453 0a61 6e64 206e 6f74 2061 KWORDS.and not a │ │ │ -00000680: 6c6c 6f77 6564 2062 7920 4f54 4845 522d llowed by OTHER- │ │ │ -00000690: 4b45 5953 2c20 616e 2065 7272 6f72 2077 KEYS, an error w │ │ │ -000006a0: 696c 6c20 6e6f 726d 616c 6c79 2062 6520 ill normally be │ │ │ -000006b0: 7369 676e 616c 6c65 643b 2062 7574 0a74 signalled; but.t │ │ │ -000006c0: 6865 2063 616c 6c65 7220 6361 6e20 6f76 he caller can ov │ │ │ -000006d0: 6572 7269 6465 2074 6869 7320 6279 2073 erride this by s │ │ │ -000006e0: 7065 6369 6679 696e 6720 6120 6e6f 6e2d pecifying a non- │ │ │ -000006f0: 6e69 6c20 7661 6c75 6520 666f 7220 7468 nil value for th │ │ │ -00000700: 650a 6b65 7977 6f72 6420 3a61 6c6c 6f77 e.keyword :allow │ │ │ -00000710: 2d6f 7468 6572 2d6b 6579 7320 2877 6869 -other-keys (whi │ │ │ -00000720: 6368 2064 6566 6175 6c74 7320 746f 2074 ch defaults to t │ │ │ -00000730: 292e 1f0a 2864 6566 616c 6961 7320 2763 )...(defalias 'c │ │ │ -00000740: 6c2d 7061 7273 696e 672d 6b65 7977 6f72 l-parsing-keywor │ │ │ -00000750: 6473 2027 286d 6163 726f 202e 2023 5b28 ds '(macro . #[( │ │ │ -00000760: 6b77 6f72 6473 206f 7468 6572 2d6b 6579 kwords other-key │ │ │ -00000770: 7320 2672 6573 7420 626f 6479 2920 22c3 s &rest body) ". │ │ │ -00000780: c4c5 5c6e 5c22 c609 c761 3fad 98c8 c9ca ..\n\"...a?..... │ │ │ -00000790: cbcc cdce cfc4 d0c6 5c6e 095c 225c 2244 ........\n.\"\"D │ │ │ -000007a0: 45d1 d246 d346 4543 085c 2242 4287 2220 E..F.FEC.\"BB." │ │ │ -000007b0: 5b62 6f64 7920 6f74 6865 722d 6b65 7973 [body other-keys │ │ │ -000007c0: 206b 776f 7264 7320 6c65 742a 206d 6170 kwords let* map │ │ │ -000007d0: 6361 7220 235b 2878 2920 2209 3aab 8409 car #[(x) ".:... │ │ │ -000007e0: 40aa 8109 18c3 c4c5 c608 44c7 4544 441a @.........D.EDD. │ │ │ -000007f0: 08c8 61ab 89c9 5c6e cacb 5c6e 45cc 4612 ..a...\n..\nE.F. │ │ │ -00000800: 08cd 61ab 89c9 5c6e cace 5c6e 45cc 4612 ..a...\n..\nE.F. │ │ │ -00000810: cfd0 d1d2 0821 d3d4 4f5c 2221 093a ab88 .....!..O\"!.:.. │ │ │ -00000820: d55c 6e09 4140 45aa 815c 6e2a 4487 2220 .\n.A@E..\n*D." │ │ │ -00000830: 5b76 6172 2078 206d 656d 2063 6172 2063 [var x mem car c │ │ │ -00000840: 6472 206d 656d 7120 7175 6f74 6520 636c dr memq quote cl │ │ │ -00000850: 2d6b 6579 7320 3a74 6573 742d 6e6f 7420 -keys :test-not │ │ │ -00000860: 616e 6420 7365 7471 2063 6c2d 7465 7374 and setq cl-test │ │ │ -00000870: 2074 203a 6966 2d6e 6f74 2063 6c2d 6966 t :if-not cl-if │ │ │ -00000880: 2069 6e74 6572 6e20 666f 726d 6174 2022 intern format " │ │ │ -00000890: 636c 2d25 7322 2073 796d 626f 6c2d 6e61 cl-%s" symbol-na │ │ │ -000008a0: 6d65 2031 206e 696c 206f 725d 2036 5d20 me 1 nil or] 6] │ │ │ -000008b0: 6170 7065 6e64 2074 206c 6574 2028 2863 append t let ((c │ │ │ -000008c0: 6c2d 6b65 7973 2d74 656d 7020 636c 2d6b l-keys-temp cl-k │ │ │ -000008d0: 6579 7329 2920 7768 696c 6520 636c 2d6b eys)) while cl-k │ │ │ -000008e0: 6579 732d 7465 6d70 206f 7220 6d65 6d71 eys-temp or memq │ │ │ -000008f0: 2028 6361 7220 636c 2d6b 6579 732d 7465 (car cl-keys-te │ │ │ -00000900: 6d70 2920 7175 6f74 6520 235b 2878 2920 mp) quote #[(x) │ │ │ -00000910: 2208 3aab 8308 4087 0887 2220 5b78 5d20 ".:...@..." [x] │ │ │ -00000920: 315d 2028 6361 7220 2863 6472 2028 6d65 1] (car (cdr (me │ │ │ -00000930: 6d71 2027 3a61 6c6c 6f77 2d6f 7468 6572 mq ':allow-other │ │ │ -00000940: 2d6b 6579 7320 636c 2d6b 6579 7329 2929 -keys cl-keys))) │ │ │ -00000950: 2028 6572 726f 7220 2242 6164 206b 6579 (error "Bad key │ │ │ -00000960: 776f 7264 2061 7267 756d 656e 7420 2573 word argument %s │ │ │ -00000970: 2220 2863 6172 2063 6c2d 6b65 7973 2d74 " (car cl-keys-t │ │ │ -00000980: 656d 7029 2920 2873 6574 7120 636c 2d6b emp)) (setq cl-k │ │ │ -00000990: 6579 732d 7465 6d70 2028 6364 7220 2863 eys-temp (cdr (c │ │ │ -000009a0: 6472 2063 6c2d 6b65 7973 2d74 656d 7029 dr cl-keys-temp) │ │ │ -000009b0: 2929 5d20 3136 2028 2324 202e 2038 3436 ))] 16 (#$ . 846 │ │ │ -000009c0: 295d 2929 0a28 6279 7465 2d63 6f64 6520 )])).(byte-code │ │ │ -000009d0: 22c0 c1c2 c323 88c0 c1c4 c523 8722 205b "....#.....#." [ │ │ │ -000009e0: 7075 7420 636c 2d70 6172 7369 6e67 2d6b put cl-parsing-k │ │ │ -000009f0: 6579 776f 7264 7320 6c69 7370 2d69 6e64 eywords lisp-ind │ │ │ -00000a00: 656e 742d 6675 6e63 7469 6f6e 2032 2065 ent-function 2 e │ │ │ -00000a10: 6465 6275 672d 666f 726d 2d73 7065 6320 debug-form-spec │ │ │ -00000a20: 2873 6578 7020 7365 7870 2026 7265 7374 (sexp sexp &rest │ │ │ -00000a30: 2066 6f72 6d29 5d20 3429 0a28 6465 6661 form)] 4).(defa │ │ │ -00000a40: 6c69 6173 2027 636c 2d63 6865 636b 2d6b lias 'cl-check-k │ │ │ -00000a50: 6579 2027 286d 6163 726f 202e 2023 5b28 ey '(macro . #[( │ │ │ -00000a60: 7829 2022 c1c2 c3c2 0845 0846 8722 205b x) ".....E.F." [ │ │ │ -00000a70: 7820 6966 2063 6c2d 6b65 7920 6675 6e63 x if cl-key func │ │ │ -00000a80: 616c 6c5d 2035 5d29 290a 2864 6566 616c all] 5])).(defal │ │ │ -00000a90: 6961 7320 2763 6c2d 6368 6563 6b2d 7465 ias 'cl-check-te │ │ │ -00000aa0: 7374 2d6e 6f6b 6579 2027 286d 6163 726f st-nokey '(macro │ │ │ -00000ab0: 202e 2023 5b28 6974 656d 2078 2920 22c2 . #[(item x) ". │ │ │ -00000ac0: c3c4 c5c6 c309 0846 44c7 4544 c8c4 c5c6 .......FD.ED.... │ │ │ -00000ad0: c808 4544 c945 44ca cbcc 0944 cd09 0845 ..ED.ED....D...E │ │ │ -00000ae0: c409 0845 4644 4687 2220 5b78 2069 7465 ...EFDF." [x ite │ │ │ -00000af0: 6d20 636f 6e64 2063 6c2d 7465 7374 2065 m cond cl-test e │ │ │ -00000b00: 7120 6e6f 7420 6675 6e63 616c 6c20 636c q not funcall cl │ │ │ -00000b10: 2d74 6573 742d 6e6f 7420 636c 2d69 6620 -test-not cl-if │ │ │ -00000b20: 636c 2d69 662d 6e6f 7420 7420 6966 206e cl-if-not t if n │ │ │ -00000b30: 756d 6265 7270 2065 7175 616c 5d20 3130 umberp equal] 10 │ │ │ -00000b40: 5d29 290a 2864 6566 616c 6961 7320 2763 ])).(defalias 'c │ │ │ -00000b50: 6c2d 6368 6563 6b2d 7465 7374 2027 286d l-check-test '(m │ │ │ -00000b60: 6163 726f 202e 2023 5b28 6974 656d 2078 acro . #[(item x │ │ │ -00000b70: 2920 22c2 09c3 0844 4587 2220 5b78 2069 ) "....DE." [x i │ │ │ -00000b80: 7465 6d20 636c 2d63 6865 636b 2d74 6573 tem cl-check-tes │ │ │ -00000b90: 742d 6e6f 6b65 7920 636c 2d63 6865 636b t-nokey cl-check │ │ │ -00000ba0: 2d6b 6579 5d20 345d 2929 0a28 6465 6661 -key] 4])).(defa │ │ │ -00000bb0: 6c69 6173 2027 636c 2d63 6865 636b 2d6d lias 'cl-check-m │ │ │ -00000bc0: 6174 6368 2027 286d 6163 726f 202e 2023 atch '(macro . # │ │ │ -00000bd0: 5b28 7820 7929 2022 c209 4411 c208 4410 [(x y) "..D...D. │ │ │ -00000be0: c3c4 c5c6 c7c4 0908 4644 c845 c3c9 0944 ........FD.E...D │ │ │ -00000bf0: ca09 0845 c509 0845 4646 8722 205b 7920 ...E...EFF." [y │ │ │ -00000c00: 7820 636c 2d63 6865 636b 2d6b 6579 2069 x cl-check-key i │ │ │ -00000c10: 6620 636c 2d74 6573 7420 6571 206e 6f74 f cl-test eq not │ │ │ -00000c20: 2066 756e 6361 6c6c 2063 6c2d 7465 7374 funcall cl-test │ │ │ -00000c30: 2d6e 6f74 206e 756d 6265 7270 2065 7175 -not numberp equ │ │ │ -00000c40: 616c 5d20 395d 2929 0a28 6279 7465 2d63 al] 9])).(byte-c │ │ │ -00000c50: 6f64 6520 22c0 c1c2 c323 88c0 c4c2 c323 ode "....#.....# │ │ │ -00000c60: 88c0 c5c2 c323 88c0 c6c2 c323 8722 205b .....#.....#." [ │ │ │ -00000c70: 7075 7420 636c 2d63 6865 636b 2d6b 6579 put cl-check-key │ │ │ -00000c80: 2065 6465 6275 672d 666f 726d 2d73 7065 edebug-form-spe │ │ │ -00000c90: 6320 6564 6562 7567 2d66 6f72 6d73 2063 c edebug-forms c │ │ │ -00000ca0: 6c2d 6368 6563 6b2d 7465 7374 2063 6c2d l-check-test cl- │ │ │ -00000cb0: 6368 6563 6b2d 7465 7374 2d6e 6f6b 6579 check-test-nokey │ │ │ -00000cc0: 2063 6c2d 6368 6563 6b2d 6d61 7463 685d cl-check-match] │ │ │ -00000cd0: 2034 290a 2340 3131 3020 5265 6475 6365 4).#@110 Reduce │ │ │ -00000ce0: 2074 776f 2d61 7267 756d 656e 7420 4655 two-argument FU │ │ │ -00000cf0: 4e43 5449 4f4e 2061 6372 6f73 7320 5345 NCTION across SE │ │ │ -00000d00: 5155 454e 4345 2e0a 4b65 7977 6f72 6473 QUENCE..Keywords │ │ │ -00000d10: 2073 7570 706f 7274 6564 3a20 203a 7374 supported: :st │ │ │ -00000d20: 6172 7420 3a65 6e64 203a 6672 6f6d 2d65 art :end :from-e │ │ │ -00000d30: 6e64 203a 696e 6974 6961 6c2d 7661 6c75 nd :initial-valu │ │ │ -00000d40: 6520 3a6b 6579 1f0a 2864 6566 616c 6961 e :key..(defalia │ │ │ -00000d50: 7320 2772 6564 7563 6520 235b 2863 6c2d s 'reduce #[(cl- │ │ │ -00000d60: 6675 6e63 2063 6c2d 7365 7120 2672 6573 func cl-seq &res │ │ │ -00000d70: 7420 636c 2d6b 6579 7329 2022 c60c 7341 t cl-keys) "..sA │ │ │ -00000d80: 4018 c70c 7341 40ae 81c8 1e14 c90c 7341 @...sA@.......sA │ │ │ -00000d90: 401e 15ca 0c73 4140 1e16 cb0c 7341 401b @....sA@....sA@. │ │ │ -00000da0: 0c89 19ab 9a09 40cc 73ac 8dcd 0c73 4140 ......@.s....sA@ │ │ │ -00000db0: ac86 cecf 0940 5c22 8809 4141 8911 ac66 .....@\"..AA...f │ │ │ -00000dc0: 290d 3cac 85d0 0dd1 5c22 15d2 0d0e 140e ).<.....\"...... │ │ │ -00000dd0: 1523 1508 ab83 0d9f 15ca 0c73 ab84 0e16 .#.........s.... │ │ │ -00000de0: aa99 0dab 930b ab89 0b0d 8941 1540 21aa ...........A.@!. │ │ │ -00000df0: 8a0d 8941 1540 aa83 0e13 201a 08ab 9b0d ...A.@.... ..... │ │ │ -00000e00: abb3 0e13 0bab 890b 0d89 4115 4021 aa85 ..........A.@!.. │ │ │ -00000e10: 0d89 4115 405c 6e5c 2212 aa65 0dab 980e ..A.@\n\"..e.... │ │ │ -00000e20: 135c 6e0b ab89 0b0d 8941 1540 21aa 850d .\n......A.@!... │ │ │ -00000e30: 8941 1540 5c22 12aa 655c 6e2e 0687 2220 .A.@\"..e\n..." │ │ │ -00000e40: 5b63 6c2d 6672 6f6d 2d65 6e64 2063 6c2d [cl-from-end cl- │ │ │ -00000e50: 6b65 7973 2d74 656d 7020 636c 2d61 6363 keys-temp cl-acc │ │ │ -00000e60: 756d 2063 6c2d 6b65 7920 636c 2d6b 6579 um cl-key cl-key │ │ │ -00000e70: 7320 636c 2d73 6571 203a 6672 6f6d 2d65 s cl-seq :from-e │ │ │ -00000e80: 6e64 203a 7374 6172 7420 3020 3a65 6e64 nd :start 0 :end │ │ │ -00000e90: 203a 696e 6974 6961 6c2d 7661 6c75 6520 :initial-value │ │ │ -00000ea0: 3a6b 6579 2028 3a66 726f 6d2d 656e 6420 :key (:from-end │ │ │ -00000eb0: 3a73 7461 7274 203a 656e 6420 3a69 6e69 :start :end :ini │ │ │ -00000ec0: 7469 616c 2d76 616c 7565 203a 6b65 7929 tial-value :key) │ │ │ -00000ed0: 203a 616c 6c6f 772d 6f74 6865 722d 6b65 :allow-other-ke │ │ │ -00000ee0: 7973 2065 7272 6f72 2022 4261 6420 6b65 ys error "Bad ke │ │ │ -00000ef0: 7977 6f72 6420 6172 6775 6d65 6e74 2025 yword argument % │ │ │ -00000f00: 7322 2061 7070 656e 6420 6e69 6c20 7375 s" append nil su │ │ │ -00000f10: 6273 6571 2063 6c2d 6675 6e63 2063 6c2d bseq cl-func cl- │ │ │ -00000f20: 7374 6172 7420 636c 2d65 6e64 2063 6c2d start cl-end cl- │ │ │ -00000f30: 696e 6974 6961 6c2d 7661 6c75 655d 2036 initial-value] 6 │ │ │ -00000f40: 2028 2324 202e 2033 3239 3029 5d29 0a23 (#$ . 3290)]).# │ │ │ -00000f50: 4037 3020 4669 6c6c 2074 6865 2065 6c65 @70 Fill the ele │ │ │ -00000f60: 6d65 6e74 7320 6f66 2053 4551 2077 6974 ments of SEQ wit │ │ │ -00000f70: 6820 4954 454d 2e0a 4b65 7977 6f72 6473 h ITEM..Keywords │ │ │ -00000f80: 2073 7570 706f 7274 6564 3a20 203a 7374 supported: :st │ │ │ -00000f90: 6172 7420 3a65 6e64 1f0a 2864 6566 616c art :end..(defal │ │ │ -00000fa0: 6961 7320 2766 696c 6c20 235b 2873 6571 ias 'fill #[(seq │ │ │ -00000fb0: 2069 7465 6d20 2672 6573 7420 636c 2d6b item &rest cl-k │ │ │ -00000fc0: 6579 7329 2022 c609 7341 40ae 81c7 1dc8 eys) "..sA@..... │ │ │ -00000fd0: 0973 4140 1c09 891a ab9a 5c6e 40c9 73ac .sA@......\n@.s. │ │ │ -00000fe0: 8dca 0973 4140 ac86 cbcc 5c6e 405c 2288 ...sA@....\n@\". │ │ │ -00000ff0: 5c6e 4141 8912 ac66 290b 3cab aa0d 0b9b \nAA...f).<..... │ │ │ -00001000: 0cab 850c 0d5a aa81 cd1e 0f89 18ab 950e .....Z.......... │ │ │ -00001010: 0f53 8916 0fc7 59ab 8b08 0e10 a088 0841 .S....Y........A │ │ │ -00001020: 8910 ac6b 2aaa aa0c ac83 0b47 140d c755 ...k*......G...U │ │ │ -00001030: ab8e 0c0b 4755 ab88 ce0b 0e10 5c22 88aa ....GU......\".. │ │ │ -00001040: 910d 0c57 ab8c 0b0d 0e10 4988 0d54 8915 ...W......I..T.. │ │ │ -00001050: aa70 0b2a 8722 205b 7020 636c 2d6b 6579 .p.*." [p cl-key │ │ │ -00001060: 7320 636c 2d6b 6579 732d 7465 6d70 2073 s cl-keys-temp s │ │ │ -00001070: 6571 2063 6c2d 656e 6420 636c 2d73 7461 eq cl-end cl-sta │ │ │ -00001080: 7274 203a 7374 6172 7420 3020 3a65 6e64 rt :start 0 :end │ │ │ -00001090: 2028 3a73 7461 7274 203a 656e 6429 203a (:start :end) : │ │ │ -000010a0: 616c 6c6f 772d 6f74 6865 722d 6b65 7973 allow-other-keys │ │ │ -000010b0: 2065 7272 6f72 2022 4261 6420 6b65 7977 error "Bad keyw │ │ │ -000010c0: 6f72 6420 6172 6775 6d65 6e74 2025 7322 ord argument %s" │ │ │ -000010d0: 2038 3030 3030 3030 2066 696c 6c61 7272 8000000 fillarr │ │ │ -000010e0: 6179 206e 2069 7465 6d5d 2034 2028 2324 ay n item] 4 (#$ │ │ │ -000010f0: 202e 2033 3932 3429 5d29 0a23 4031 3533 . 3924)]).#@153 │ │ │ -00001100: 2052 6570 6c61 6365 2074 6865 2065 6c65 Replace the ele │ │ │ -00001110: 6d65 6e74 7320 6f66 2053 4551 3120 7769 ments of SEQ1 wi │ │ │ -00001120: 7468 2074 6865 2065 6c65 6d65 6e74 7320 th the elements │ │ │ -00001130: 6f66 2053 4551 322e 0a53 4551 3120 6973 of SEQ2..SEQ1 is │ │ │ -00001140: 2064 6573 7472 7563 7469 7665 6c79 206d destructively m │ │ │ -00001150: 6f64 6966 6965 642c 2074 6865 6e20 7265 odified, then re │ │ │ -00001160: 7475 726e 6564 2e0a 4b65 7977 6f72 6473 turned..Keywords │ │ │ -00001170: 2073 7570 706f 7274 6564 3a20 203a 7374 supported: :st │ │ │ -00001180: 6172 7431 203a 656e 6431 203a 7374 6172 art1 :end1 :star │ │ │ -00001190: 7432 203a 656e 6432 1f0a 2864 6566 616c t2 :end2..(defal │ │ │ -000011a0: 6961 7320 2772 6570 6c61 6365 2023 5b28 ias 'replace #[( │ │ │ -000011b0: 636c 2d73 6571 3120 636c 2d73 6571 3220 cl-seq1 cl-seq2 │ │ │ -000011c0: 2672 6573 7420 636c 2d6b 6579 7329 2022 &rest cl-keys) " │ │ │ -000011d0: c60e 1373 4140 ae81 c71c c80e 1373 4140 ...sA@.......sA@ │ │ │ -000011e0: 1e10 c90e 1373 4140 ae81 c71d ca0e 1373 .....sA@.......s │ │ │ -000011f0: 4140 1e11 0e13 891e 14ab 9f0e 1440 cb73 A@...........@.s │ │ │ -00001200: ac8f cc0e 1373 4140 ac87 cdce 0e14 405c .....sA@......@\ │ │ │ -00001210: 2288 0e14 4141 8916 14ac 6129 5c6e 0b61 "...AA....a)\n.a │ │ │ -00001220: abdb 0d0c 58ab d60c 0d55 8468 015c 6e47 ....X....U.h.\nG │ │ │ -00001230: 1e15 0e10 ae82 0e15 0c5a 0e11 ae82 0e15 .........Z...... │ │ │ -00001240: 0d5a 5e1e 120e 1253 8916 12c7 59ab ab5c .Z^....S....Y..\ │ │ │ -00001250: 6e0c 0e12 5c5c 0b0d 0e12 5c5c 9c1e 161e n...\\....\\.... │ │ │ -00001260: 1789 1e18 3cab 8b0e 170e 189b 0e16 a088 ....<........... │ │ │ -00001270: aa88 0e18 0e17 0e16 4988 2baa 4b2a 8268 ........I.+.K*.h │ │ │ -00001280: 015c 6e3c abf0 0c5c 6e9b 0e10 ab86 0e10 .\n<...\n....... │ │ │ -00001290: 0c5a aa81 cf1e 1919 0b3c abb4 0d0b 9b0e .Z.......<...... │ │ │ -000012a0: 190e 11ab 860e 110d 5aaa 81cf 5e1e 1218 ........Z...^... │ │ │ -000012b0: 09ab 9a08 ab97 0e12 5389 1612 c759 ab8d ........S....Y.. │ │ │ -000012c0: 0908 40a0 8809 4111 0841 10aa 632a aaa4 ..@...A..A..c*.. │ │ │ -000012d0: 0e11 ae82 0b47 0d0e 195c 5c5e 1611 09ab .....G...\\^.... │ │ │ -000012e0: 940d 0e11 57ab 8e09 0b0d 48a0 8809 4111 ....W.....H...A. │ │ │ -000012f0: 0d54 15aa 692a aac9 0e10 ae82 5c6e 470c .T..i*......\nG. │ │ │ -00001300: 0e11 ae82 0b47 0d5a 5c5c 5e16 100b 3cab .....G.Z\\^...<. │ │ │ -00001310: 9c0d 0b9b 180c 0e10 57ab 8f5c 6e0c 0840 ........W..\n..@ │ │ │ -00001320: 4988 0841 100c 5489 14aa 6c29 aa96 0c0e I..A..T...l).... │ │ │ -00001330: 1057 ab90 5c6e 0c0b 0d48 4988 0d54 150c .W..\n...HI..T.. │ │ │ -00001340: 5489 14aa 6b5c 6e2c 8722 205b 636c 2d70 T...k\n,." [cl-p │ │ │ -00001350: 3220 636c 2d70 3120 636c 2d73 6571 3120 2 cl-p1 cl-seq1 │ │ │ -00001360: 636c 2d73 6571 3220 636c 2d73 7461 7274 cl-seq2 cl-start │ │ │ -00001370: 3120 636c 2d73 7461 7274 3220 3a73 7461 1 cl-start2 :sta │ │ │ -00001380: 7274 3120 3020 3a65 6e64 3120 3a73 7461 rt1 0 :end1 :sta │ │ │ -00001390: 7274 3220 3a65 6e64 3220 283a 7374 6172 rt2 :end2 (:star │ │ │ -000013a0: 7431 203a 656e 6431 203a 7374 6172 7432 t1 :end1 :start2 │ │ │ -000013b0: 203a 656e 6432 2920 3a61 6c6c 6f77 2d6f :end2) :allow-o │ │ │ -000013c0: 7468 6572 2d6b 6579 7320 6572 726f 7220 ther-keys error │ │ │ -000013d0: 2242 6164 206b 6579 776f 7264 2061 7267 "Bad keyword arg │ │ │ -000013e0: 756d 656e 7420 2573 2220 3430 3030 3030 ument %s" 400000 │ │ │ -000013f0: 3020 636c 2d65 6e64 3120 636c 2d65 6e64 0 cl-end1 cl-end │ │ │ -00001400: 3220 636c 2d6e 2063 6c2d 6b65 7973 2063 2 cl-n cl-keys c │ │ │ -00001410: 6c2d 6b65 7973 2d74 656d 7020 636c 2d6c l-keys-temp cl-l │ │ │ -00001420: 656e 2076 616c 206e 2073 6571 2063 6c2d en val n seq cl- │ │ │ -00001430: 6e31 5d20 3620 2823 2420 2e20 3433 3533 n1] 6 (#$ . 4353 │ │ │ -00001440: 295d 290a 2340 3232 3120 5265 6d6f 7665 )]).#@221 Remove │ │ │ -00001450: 2061 6c6c 206f 6363 7572 7265 6e63 6573 all occurrences │ │ │ -00001460: 206f 6620 4954 454d 2069 6e20 5345 512e of ITEM in SEQ. │ │ │ -00001470: 0a54 6869 7320 6973 2061 206e 6f6e 2d64 .This is a non-d │ │ │ -00001480: 6573 7472 7563 7469 7665 2066 756e 6374 estructive funct │ │ │ -00001490: 696f 6e3b 2069 7420 6d61 6b65 7320 6120 ion; it makes a │ │ │ -000014a0: 636f 7079 206f 6620 5345 5120 6966 206e copy of SEQ if n │ │ │ -000014b0: 6563 6573 7361 7279 0a74 6f20 6176 6f69 ecessary.to avoi │ │ │ -000014c0: 6420 636f 7272 7570 7469 6e67 2074 6865 d corrupting the │ │ │ -000014d0: 206f 7269 6769 6e61 6c20 5345 512e 0a4b original SEQ..K │ │ │ -000014e0: 6579 776f 7264 7320 7375 7070 6f72 7465 eywords supporte │ │ │ -000014f0: 643a 2020 3a74 6573 7420 3a74 6573 742d d: :test :test- │ │ │ -00001500: 6e6f 7420 3a6b 6579 203a 636f 756e 7420 not :key :count │ │ │ -00001510: 3a73 7461 7274 203a 656e 6420 3a66 726f :start :end :fro │ │ │ -00001520: 6d2d 656e 641f 0a28 6465 6661 6c69 6173 m-end..(defalias │ │ │ -00001530: 2027 7265 6d6f 7665 2a20 235b 2863 6c2d 'remove* #[(cl- │ │ │ -00001540: 6974 656d 2063 6c2d 7365 7120 2672 6573 item cl-seq &res │ │ │ -00001550: 7420 636c 2d6b 6579 7329 2022 c65c 6e73 t cl-keys) ".\ns │ │ │ -00001560: 4140 1e21 c75c 6e73 4140 ad8b c75c 6e73 A@.!.\nsA@...\ns │ │ │ -00001570: 4140 8916 21ad 81c8 1e27 c95c 6e73 4140 A@..!....'.\nsA@ │ │ │ -00001580: 1cca 5c6e 7341 401e 5c22 cb5c 6e73 4140 ..\nsA@.\".\nsA@ │ │ │ -00001590: ad8b cb5c 6e73 4140 8916 5c22 ad81 c81e ...\nsA@..\".... │ │ │ -000015a0: 28cc 5c6e 7341 401e 20cd 5c6e 7341 401e (.\nsA@. .\nsA@. │ │ │ -000015b0: 25ce 5c6e 7341 40ae 81cf 1e23 d05c 6e73 %.\nsA@....#.\ns │ │ │ -000015c0: 4140 195c 6e89 1e24 ab9e 0e24 40d1 73ac A@.\n..$...$@.s. │ │ │ -000015d0: 8ed2 5c6e 7341 40ac 87d3 d40e 2440 5c22 ..\nsA@.....$@\" │ │ │ -000015e0: 880e 2441 4189 1624 ac62 290e 20ae 84d5 ..$AA..$.b). ... │ │ │ -000015f0: 8916 20cf 58ab 840d 8218 020d 3cab 8a0e .. .X.......<... │ │ │ -00001600: 25ab ce0e 20d6 57ab c8d7 080d 0e23 090e %... .W......#.. │ │ │ -00001610: 2525 891e 29ab b5d8 d908 da0d db5c 22da %%..)........\". │ │ │ -00001620: 0e25 ab87 d00e 2954 44aa 84ce 0e29 445c .%....)TD....)D\ │ │ │ -00001630: 6e5c 2224 1e26 0d3c ab84 0e26 aa8e 0d3b n\"$.&.<...&...; │ │ │ -00001640: ab86 0e26 b001 aa84 dc0e 2621 29aa 810d ...&......&!)... │ │ │ -00001650: 2982 1802 09ae 81d5 0e23 5a11 0e23 cf55 )........#Z..#.U │ │ │ -00001660: abee 0dab eb09 cf56 abe6 0e21 ab95 0e21 .......V...!...! │ │ │ -00001670: 080c ab86 0c0d 4021 aa82 0d40 5c22 3f0e ......@!...@\"?. │ │ │ -00001680: 2761 aab8 0e5c 22ab 940e 5c22 0cab 860c 'a...\"...\".... │ │ │ -00001690: 0d40 21aa 820d 4021 3f0e 2861 aaa0 08a7 .@!...@!?.(a.... │ │ │ -000016a0: ab8f 080c ab86 0c0d 4021 aa82 0d40 6baa ........@!...@k. │ │ │ -000016b0: 8d08 0cab 860c 0d40 21aa 820d 4061 ab93 .......@!...@a.. │ │ │ -000016c0: 0953 110d 4189 15ab 8a0e 2053 8916 20cf .S..A..... S.. . │ │ │ -000016d0: 56ac 120e 20cf 5683 1702 09cf 5683 1702 V... .V.....V... │ │ │ -000016e0: 0e23 cf56 ab86 0e23 0d9b aa85 0953 110d .#.V...#.....S.. │ │ │ -000016f0: 411b 0bab e009 cf56 abdb 0e21 ab95 0e21 A......V...!...! │ │ │ -00001700: 080c ab86 0c0b 4021 aa82 0b40 5c22 3f0e ......@!...@\"?. │ │ │ -00001710: 2761 aab8 0e5c 22ab 940e 5c22 0cab 860c 'a...\"...\".... │ │ │ -00001720: 0b40 21aa 820b 4021 3f0e 2861 aaa0 08a7 .@!...@!?.(a.... │ │ │ -00001730: ab8f 080c ab86 0c0b 4021 aa82 0b40 6baa ........@!...@k. │ │ │ -00001740: 8d08 0cab 860c 0b40 21aa 820b 4061 ac88 .......@!...@a.. │ │ │ -00001750: 0b41 1309 5311 aa1d 0bab ad09 cf56 aba8 .A..S........V.. │ │ │ -00001760: dd0d 0b5c 220e 20de 55ab 840b 41aa 970b ...\". .U...A... │ │ │ -00001770: 41ad 93d8 d908 df0b 4121 cecf d009 53cc A.......A!....S. │ │ │ -00001780: 0e20 535c 6e26 5c6e a4aa 810d 29aa 810d . S\n&\n....)... │ │ │ -00001790: 2e09 8722 205b 636c 2d69 7465 6d20 636c ..." [cl-item cl │ │ │ -000017a0: 2d65 6e64 2063 6c2d 6b65 7973 2063 6c2d -end cl-keys cl- │ │ │ -000017b0: 7020 636c 2d6b 6579 2063 6c2d 7365 7120 p cl-key cl-seq │ │ │ -000017c0: 3a74 6573 7420 3a74 6573 742d 6e6f 7420 :test :test-not │ │ │ -000017d0: 7420 3a6b 6579 203a 6966 203a 6966 2d6e t :key :if :if-n │ │ │ -000017e0: 6f74 203a 636f 756e 7420 3a66 726f 6d2d ot :count :from- │ │ │ -000017f0: 656e 6420 3a73 7461 7274 2030 203a 656e end :start 0 :en │ │ │ -00001800: 6420 283a 7465 7374 203a 7465 7374 2d6e d (:test :test-n │ │ │ -00001810: 6f74 203a 6b65 7920 3a69 6620 3a69 662d ot :key :if :if- │ │ │ -00001820: 6e6f 7420 3a63 6f75 6e74 203a 6672 6f6d not :count :from │ │ │ -00001830: 2d65 6e64 203a 7374 6172 7420 3a65 6e64 -end :start :end │ │ │ -00001840: 2920 3a61 6c6c 6f77 2d6f 7468 6572 2d6b ) :allow-other-k │ │ │ -00001850: 6579 7320 6572 726f 7220 2242 6164 206b eys error "Bad k │ │ │ -00001860: 6579 776f 7264 2061 7267 756d 656e 7420 eyword argument │ │ │ -00001870: 2573 2220 3830 3030 3030 3020 3430 3030 %s" 8000000 4000 │ │ │ -00001880: 3030 3020 636c 2d70 6f73 6974 696f 6e20 000 cl-position │ │ │ -00001890: 6170 706c 7920 6465 6c65 7465 2a20 6170 apply delete* ap │ │ │ -000018a0: 7065 6e64 206e 696c 2076 636f 6e63 6174 pend nil vconcat │ │ │ -000018b0: 206c 6469 6666 2031 2063 6f70 792d 7365 ldiff 1 copy-se │ │ │ -000018c0: 7175 656e 6365 2063 6c2d 636f 756e 7420 quence cl-count │ │ │ -000018d0: 636c 2d74 6573 7420 636c 2d69 6620 636c cl-test cl-if cl │ │ │ -000018e0: 2d73 7461 7274 2063 6c2d 6b65 7973 2d74 -start cl-keys-t │ │ │ -000018f0: 656d 7020 636c 2d66 726f 6d2d 656e 6420 emp cl-from-end │ │ │ -00001900: 636c 2d72 6573 2063 6c2d 7465 7374 2d6e cl-res cl-test-n │ │ │ -00001910: 6f74 2063 6c2d 6966 2d6e 6f74 2063 6c2d ot cl-if-not cl- │ │ │ -00001920: 695d 2031 3320 2823 2420 2e20 3531 3934 i] 13 (#$ . 5194 │ │ │ -00001930: 295d 290a 2340 3231 3220 5265 6d6f 7665 )]).#@212 Remove │ │ │ -00001940: 2061 6c6c 2069 7465 6d73 2073 6174 6973 all items satis │ │ │ -00001950: 6679 696e 6720 5052 4544 4943 4154 4520 fying PREDICATE │ │ │ -00001960: 696e 2053 4551 2e0a 5468 6973 2069 7320 in SEQ..This is │ │ │ -00001970: 6120 6e6f 6e2d 6465 7374 7275 6374 6976 a non-destructiv │ │ │ -00001980: 6520 6675 6e63 7469 6f6e 3b20 6974 206d e function; it m │ │ │ -00001990: 616b 6573 2061 2063 6f70 7920 6f66 2053 akes a copy of S │ │ │ -000019a0: 4551 2069 6620 6e65 6365 7373 6172 790a EQ if necessary. │ │ │ -000019b0: 746f 2061 766f 6964 2063 6f72 7275 7074 to avoid corrupt │ │ │ -000019c0: 696e 6720 7468 6520 6f72 6967 696e 616c ing the original │ │ │ -000019d0: 2053 4551 2e0a 4b65 7977 6f72 6473 2073 SEQ..Keywords s │ │ │ -000019e0: 7570 706f 7274 6564 3a20 203a 6b65 7920 upported: :key │ │ │ -000019f0: 3a63 6f75 6e74 203a 7374 6172 7420 3a65 :count :start :e │ │ │ -00001a00: 6e64 203a 6672 6f6d 2d65 6e64 1f0a 2864 nd :from-end..(d │ │ │ -00001a10: 6566 616c 6961 7320 2772 656d 6f76 652d efalias 'remove- │ │ │ -00001a20: 6966 2023 5b28 636c 2d70 7265 6420 636c if #[(cl-pred cl │ │ │ -00001a30: 2d6c 6973 7420 2672 6573 7420 636c 2d6b -list &rest cl-k │ │ │ -00001a40: 6579 7329 2022 c3c4 c55c 6ec6 0908 2606 eys) "...\n...&. │ │ │ -00001a50: 8722 205b 636c 2d6b 6579 7320 636c 2d70 ." [cl-keys cl-p │ │ │ -00001a60: 7265 6420 636c 2d6c 6973 7420 6170 706c red cl-list appl │ │ │ -00001a70: 7920 7265 6d6f 7665 2a20 6e69 6c20 3a69 y remove* nil :i │ │ │ -00001a80: 665d 2037 2028 2324 202e 2036 3435 3829 f] 7 (#$ . 6458) │ │ │ -00001a90: 5d29 0a23 4032 3136 2052 656d 6f76 6520 ]).#@216 Remove │ │ │ -00001aa0: 616c 6c20 6974 656d 7320 6e6f 7420 7361 all items not sa │ │ │ -00001ab0: 7469 7366 7969 6e67 2050 5245 4449 4341 tisfying PREDICA │ │ │ -00001ac0: 5445 2069 6e20 5345 512e 0a54 6869 7320 TE in SEQ..This │ │ │ -00001ad0: 6973 2061 206e 6f6e 2d64 6573 7472 7563 is a non-destruc │ │ │ -00001ae0: 7469 7665 2066 756e 6374 696f 6e3b 2069 tive function; i │ │ │ -00001af0: 7420 6d61 6b65 7320 6120 636f 7079 206f t makes a copy o │ │ │ -00001b00: 6620 5345 5120 6966 206e 6563 6573 7361 f SEQ if necessa │ │ │ -00001b10: 7279 0a74 6f20 6176 6f69 6420 636f 7272 ry.to avoid corr │ │ │ -00001b20: 7570 7469 6e67 2074 6865 206f 7269 6769 upting the origi │ │ │ -00001b30: 6e61 6c20 5345 512e 0a4b 6579 776f 7264 nal SEQ..Keyword │ │ │ -00001b40: 7320 7375 7070 6f72 7465 643a 2020 3a6b s supported: :k │ │ │ -00001b50: 6579 203a 636f 756e 7420 3a73 7461 7274 ey :count :start │ │ │ -00001b60: 203a 656e 6420 3a66 726f 6d2d 656e 641f :end :from-end. │ │ │ -00001b70: 0a28 6465 6661 6c69 6173 2027 7265 6d6f .(defalias 'remo │ │ │ -00001b80: 7665 2d69 662d 6e6f 7420 235b 2863 6c2d ve-if-not #[(cl- │ │ │ -00001b90: 7072 6564 2063 6c2d 6c69 7374 2026 7265 pred cl-list &re │ │ │ -00001ba0: 7374 2063 6c2d 6b65 7973 2920 22c3 c4c5 st cl-keys) "... │ │ │ -00001bb0: 5c6e c609 0826 0687 2220 5b63 6c2d 6b65 \n...&.." [cl-ke │ │ │ -00001bc0: 7973 2063 6c2d 7072 6564 2063 6c2d 6c69 ys cl-pred cl-li │ │ │ -00001bd0: 7374 2061 7070 6c79 2072 656d 6f76 652a st apply remove* │ │ │ -00001be0: 206e 696c 203a 6966 2d6e 6f74 5d20 3720 nil :if-not] 7 │ │ │ -00001bf0: 2823 2420 2e20 3638 3039 295d 290a 2340 (#$ . 6809)]).#@ │ │ │ -00001c00: 3139 3120 5265 6d6f 7665 2061 6c6c 206f 191 Remove all o │ │ │ -00001c10: 6363 7572 7265 6e63 6573 206f 6620 4954 ccurrences of IT │ │ │ -00001c20: 454d 2069 6e20 5345 512e 0a54 6869 7320 EM in SEQ..This │ │ │ -00001c30: 6973 2061 2064 6573 7472 7563 7469 7665 is a destructive │ │ │ -00001c40: 2066 756e 6374 696f 6e3b 2069 7420 7265 function; it re │ │ │ -00001c50: 7573 6573 2074 6865 2073 746f 7261 6765 uses the storage │ │ │ -00001c60: 206f 6620 5345 5120 7768 656e 6576 6572 of SEQ whenever │ │ │ -00001c70: 2070 6f73 7369 626c 652e 0a4b 6579 776f possible..Keywo │ │ │ -00001c80: 7264 7320 7375 7070 6f72 7465 643a 2020 rds supported: │ │ │ -00001c90: 3a74 6573 7420 3a74 6573 742d 6e6f 7420 :test :test-not │ │ │ -00001ca0: 3a6b 6579 203a 636f 756e 7420 3a73 7461 :key :count :sta │ │ │ -00001cb0: 7274 203a 656e 6420 3a66 726f 6d2d 656e rt :end :from-en │ │ │ -00001cc0: 641f 0a28 6465 6661 6c69 6173 2027 6465 d..(defalias 'de │ │ │ -00001cd0: 6c65 7465 2a20 235b 2863 6c2d 6974 656d lete* #[(cl-item │ │ │ -00001ce0: 2063 6c2d 7365 7120 2672 6573 7420 636c cl-seq &rest cl │ │ │ -00001cf0: 2d6b 6579 7329 2022 c65c 6e73 4140 1e1e -keys) ".\nsA@.. │ │ │ -00001d00: c75c 6e73 4140 ad8b c75c 6e73 4140 8916 .\nsA@...\nsA@.. │ │ │ -00001d10: 1ead 81c8 1e5c 22c9 5c6e 7341 401c ca5c .....\".\nsA@..\ │ │ │ -00001d20: 6e73 4140 1e1f cb5c 6e73 4140 ad8b cb5c nsA@...\nsA@...\ │ │ │ -00001d30: 6e73 4140 8916 1fad 81c8 1e23 cc5c 6e73 nsA@.......#.\ns │ │ │ -00001d40: 4140 18cd 5c6e 7341 401e 24ce 5c6e 7341 A@..\nsA@.$.\nsA │ │ │ -00001d50: 40ae 81cf 1e1d d05c 6e73 4140 1b5c 6e89 @......\nsA@.\n. │ │ │ -00001d60: 1e20 ab9e 0e20 40d1 73ac 8ed2 5c6e 7341 . ... @.s...\nsA │ │ │ -00001d70: 40ac 87d3 d40e 2040 5c22 880e 2041 4189 @..... @\".. AA. │ │ │ -00001d80: 1620 ac62 2908 ae83 d589 10cf 58ab 840d . .b).......X... │ │ │ -00001d90: 82fe 010d 3c83 f701 0e24 abc2 08d6 57ab ....<....$....W. │ │ │ -00001da0: bdd7 1e21 0853 8910 cf59 abad d80e 1c0d ...!.S...Y...... │ │ │ -00001db0: 0e1d 0b0e 2425 8916 21ab 9e0e 21cf 55ab ....$%..!...!.U. │ │ │ -00001dc0: 850d 4115 aa8e 0e21 530d 9b89 1e25 8941 ..A....!S....%.A │ │ │ -00001dd0: 41a1 8829 0e21 13aa 4b0d 2982 fe01 0bae A..).!..K.)..... │ │ │ -00001de0: 81d5 0e1d 5a13 0e1d cf55 abf5 0dab ed0b ....Z....U...... │ │ │ -00001df0: cf56 abe8 0e1e ab96 0e1e 0e1c 0cab 860c .V.............. │ │ │ -00001e00: 0d40 21aa 820d 405c 223f 0e5c 2261 aabb .@!...@\"?.\"a.. │ │ │ -00001e10: 0e1f ab94 0e1f 0cab 860c 0d40 21aa 820d ...........@!... │ │ │ -00001e20: 4021 3f0e 2361 aaa3 0e1c a7ab 900e 1c0c @!?.#a.......... │ │ │ -00001e30: ab86 0c0d 4021 aa82 0d40 6baa 8e0e 1c0c ....@!...@k..... │ │ │ -00001e40: ab86 0c0d 4021 aa82 0d40 61ab 910b 5313 ....@!...@a...S. │ │ │ -00001e50: 0d41 8915 ab88 0853 8910 cf56 ac10 0b53 .A.....S...V...S │ │ │ -00001e60: 13aa 850e 1d53 161d 08cf 5683 f401 0bcf .....S....V..... │ │ │ -00001e70: 5683 f401 0e1d 0d9b 1909 41ab ff0b cf56 V.........A....V │ │ │ -00001e80: abfa 0e1e ab98 0e1e 0e1c 0cab 870c 0941 ...............A │ │ │ -00001e90: 4021 aa83 0941 405c 223f 0e5c 2261 aac1 @!...A@\"?.\"a.. │ │ │ -00001ea0: 0e1f ab96 0e1f 0cab 870c 0941 4021 aa83 ...........A@!.. │ │ │ -00001eb0: 0941 4021 3f0e 2361 aaa7 0e1c a7ab 920e .A@!?.#a........ │ │ │ -00001ec0: 1c0c ab87 0c09 4140 21aa 8309 4140 6baa ......A@!...A@k. │ │ │ -00001ed0: 900e 1c0c ab87 0c09 4140 21aa 8309 4140 ........A@!...A@ │ │ │ -00001ee0: 61ab 9209 8941 41a1 8808 5389 10cf 55ab a....AA...S...U. │ │ │ -00001ef0: 87d9 13aa 8309 4111 0b53 1382 7001 290d ......A..S..p.). │ │ │ -00001f00: aa87 dadb 0e1c 0d5c 6e24 2e09 8722 205b .......\n$..." [ │ │ │ -00001f10: 636c 2d63 6f75 6e74 2063 6c2d 7020 636c cl-count cl-p cl │ │ │ -00001f20: 2d6b 6579 7320 636c 2d65 6e64 2063 6c2d -keys cl-end cl- │ │ │ -00001f30: 6b65 7920 636c 2d73 6571 203a 7465 7374 key cl-seq :test │ │ │ -00001f40: 203a 7465 7374 2d6e 6f74 2074 203a 6b65 :test-not t :ke │ │ │ -00001f50: 7920 3a69 6620 3a69 662d 6e6f 7420 3a63 y :if :if-not :c │ │ │ -00001f60: 6f75 6e74 203a 6672 6f6d 2d65 6e64 203a ount :from-end : │ │ │ -00001f70: 7374 6172 7420 3020 3a65 6e64 2028 3a74 start 0 :end (:t │ │ │ -00001f80: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ -00001f90: 6579 203a 6966 203a 6966 2d6e 6f74 203a ey :if :if-not : │ │ │ -00001fa0: 636f 756e 7420 3a66 726f 6d2d 656e 6420 count :from-end │ │ │ -00001fb0: 3a73 7461 7274 203a 656e 6429 203a 616c :start :end) :al │ │ │ -00001fc0: 6c6f 772d 6f74 6865 722d 6b65 7973 2065 low-other-keys e │ │ │ -00001fd0: 7272 6f72 2022 4261 6420 6b65 7977 6f72 rror "Bad keywor │ │ │ -00001fe0: 6420 6172 6775 6d65 6e74 2025 7322 2038 d argument %s" 8 │ │ │ -00001ff0: 3030 3030 3030 2034 3030 3030 3030 206e 000000 4000000 n │ │ │ -00002000: 696c 2063 6c2d 706f 7369 7469 6f6e 2031 il cl-position 1 │ │ │ -00002010: 2061 7070 6c79 2072 656d 6f76 652a 2063 apply remove* c │ │ │ -00002020: 6c2d 6974 656d 2063 6c2d 7374 6172 7420 l-item cl-start │ │ │ -00002030: 636c 2d74 6573 7420 636c 2d69 6620 636c cl-test cl-if cl │ │ │ -00002040: 2d6b 6579 732d 7465 6d70 2063 6c2d 6920 -keys-temp cl-i │ │ │ -00002050: 636c 2d74 6573 742d 6e6f 7420 636c 2d69 cl-test-not cl-i │ │ │ -00002060: 662d 6e6f 7420 636c 2d66 726f 6d2d 656e f-not cl-from-en │ │ │ -00002070: 6420 636c 2d74 6169 6c5d 2037 2028 2324 d cl-tail] 7 (#$ │ │ │ -00002080: 202e 2037 3137 3229 5d29 0a23 4031 3832 . 7172)]).#@182 │ │ │ -00002090: 2052 656d 6f76 6520 616c 6c20 6974 656d Remove all item │ │ │ -000020a0: 7320 7361 7469 7366 7969 6e67 2050 5245 s satisfying PRE │ │ │ -000020b0: 4449 4341 5445 2069 6e20 5345 512e 0a54 DICATE in SEQ..T │ │ │ -000020c0: 6869 7320 6973 2061 2064 6573 7472 7563 his is a destruc │ │ │ -000020d0: 7469 7665 2066 756e 6374 696f 6e3b 2069 tive function; i │ │ │ -000020e0: 7420 7265 7573 6573 2074 6865 2073 746f t reuses the sto │ │ │ -000020f0: 7261 6765 206f 6620 5345 5120 7768 656e rage of SEQ when │ │ │ -00002100: 6576 6572 2070 6f73 7369 626c 652e 0a4b ever possible..K │ │ │ -00002110: 6579 776f 7264 7320 7375 7070 6f72 7465 eywords supporte │ │ │ -00002120: 643a 2020 3a6b 6579 203a 636f 756e 7420 d: :key :count │ │ │ -00002130: 3a73 7461 7274 203a 656e 6420 3a66 726f :start :end :fro │ │ │ -00002140: 6d2d 656e 641f 0a28 6465 6661 6c69 6173 m-end..(defalias │ │ │ -00002150: 2027 6465 6c65 7465 2d69 6620 235b 2863 'delete-if #[(c │ │ │ -00002160: 6c2d 7072 6564 2063 6c2d 6c69 7374 2026 l-pred cl-list & │ │ │ -00002170: 7265 7374 2063 6c2d 6b65 7973 2920 22c3 rest cl-keys) ". │ │ │ -00002180: c4c5 5c6e c609 0826 0687 2220 5b63 6c2d ..\n...&.." [cl- │ │ │ -00002190: 6b65 7973 2063 6c2d 7072 6564 2063 6c2d keys cl-pred cl- │ │ │ -000021a0: 6c69 7374 2061 7070 6c79 2064 656c 6574 list apply delet │ │ │ -000021b0: 652a 206e 696c 203a 6966 5d20 3720 2823 e* nil :if] 7 (# │ │ │ -000021c0: 2420 2e20 3833 3337 295d 290a 2340 3138 $ . 8337)]).#@18 │ │ │ -000021d0: 3620 5265 6d6f 7665 2061 6c6c 2069 7465 6 Remove all ite │ │ │ -000021e0: 6d73 206e 6f74 2073 6174 6973 6679 696e ms not satisfyin │ │ │ -000021f0: 6720 5052 4544 4943 4154 4520 696e 2053 g PREDICATE in S │ │ │ -00002200: 4551 2e0a 5468 6973 2069 7320 6120 6465 EQ..This is a de │ │ │ -00002210: 7374 7275 6374 6976 6520 6675 6e63 7469 structive functi │ │ │ -00002220: 6f6e 3b20 6974 2072 6575 7365 7320 7468 on; it reuses th │ │ │ -00002230: 6520 7374 6f72 6167 6520 6f66 2053 4551 e storage of SEQ │ │ │ -00002240: 2077 6865 6e65 7665 7220 706f 7373 6962 whenever possib │ │ │ -00002250: 6c65 2e0a 4b65 7977 6f72 6473 2073 7570 le..Keywords sup │ │ │ -00002260: 706f 7274 6564 3a20 203a 6b65 7920 3a63 ported: :key :c │ │ │ -00002270: 6f75 6e74 203a 7374 6172 7420 3a65 6e64 ount :start :end │ │ │ -00002280: 203a 6672 6f6d 2d65 6e64 1f0a 2864 6566 :from-end..(def │ │ │ -00002290: 616c 6961 7320 2764 656c 6574 652d 6966 alias 'delete-if │ │ │ -000022a0: 2d6e 6f74 2023 5b28 636c 2d70 7265 6420 -not #[(cl-pred │ │ │ -000022b0: 636c 2d6c 6973 7420 2672 6573 7420 636c cl-list &rest cl │ │ │ -000022c0: 2d6b 6579 7329 2022 c3c4 c55c 6ec6 0908 -keys) "...\n... │ │ │ -000022d0: 2606 8722 205b 636c 2d6b 6579 7320 636c &.." [cl-keys cl │ │ │ -000022e0: 2d70 7265 6420 636c 2d6c 6973 7420 6170 -pred cl-list ap │ │ │ -000022f0: 706c 7920 6465 6c65 7465 2a20 6e69 6c20 ply delete* nil │ │ │ -00002300: 3a69 662d 6e6f 745d 2037 2028 2324 202e :if-not] 7 (#$ . │ │ │ -00002310: 2038 3635 3829 5d29 0a28 6279 7465 2d63 8658)]).(byte-c │ │ │ -00002320: 6f64 6520 22c0 c121 ab86 c2c1 4b21 ac85 ode "..!....K!.. │ │ │ -00002330: c3c1 c45c 2288 c087 2220 5b66 626f 756e ...\"..." [fboun │ │ │ -00002340: 6470 2064 656c 6574 6520 7375 6272 7020 dp delete subrp │ │ │ -00002350: 6465 6661 6c69 6173 2023 5b28 7820 7929 defalias #[(x y) │ │ │ -00002360: 2022 c209 08c3 c424 8722 205b 7920 7820 ".....$." [y x │ │ │ -00002370: 6465 6c65 7465 2a20 3a74 6573 7420 6571 delete* :test eq │ │ │ -00002380: 7561 6c5d 2035 5d5d 2033 290a 2340 3231 ual] 5]] 3).#@21 │ │ │ -00002390: 3220 5265 6d6f 7665 2061 6c6c 206f 6363 2 Remove all occ │ │ │ -000023a0: 7572 7265 6e63 6573 206f 6620 4954 454d urrences of ITEM │ │ │ -000023b0: 2069 6e20 5345 512c 2074 6573 7469 6e67 in SEQ, testing │ │ │ -000023c0: 2077 6974 6820 6065 7175 616c 270a 5468 with `equal'.Th │ │ │ -000023d0: 6973 2069 7320 6120 6e6f 6e2d 6465 7374 is is a non-dest │ │ │ -000023e0: 7275 6374 6976 6520 6675 6e63 7469 6f6e ructive function │ │ │ -000023f0: 3b20 6974 206d 616b 6573 2061 2063 6f70 ; it makes a cop │ │ │ -00002400: 7920 6f66 2053 4551 2069 6620 6e65 6365 y of SEQ if nece │ │ │ -00002410: 7373 6172 790a 746f 2061 766f 6964 2063 ssary.to avoid c │ │ │ -00002420: 6f72 7275 7074 696e 6720 7468 6520 6f72 orrupting the or │ │ │ -00002430: 6967 696e 616c 2053 4551 2e0a 416c 736f iginal SEQ..Also │ │ │ -00002440: 2073 6565 3a20 6072 656d 6f76 652a 272c see: `remove*', │ │ │ -00002450: 2060 6465 6c65 7465 272c 2060 6465 6c65 `delete', `dele │ │ │ -00002460: 7465 2a27 1f0a 2864 6566 616c 6961 7320 te*'..(defalias │ │ │ -00002470: 2772 656d 6f76 6520 235b 2863 6c2d 6974 'remove #[(cl-it │ │ │ -00002480: 656d 2063 6c2d 7365 7129 2022 c209 08c3 em cl-seq) ".... │ │ │ -00002490: c424 8722 205b 636c 2d73 6571 2063 6c2d .$." [cl-seq cl- │ │ │ -000024a0: 6974 656d 2072 656d 6f76 652a 203a 7465 item remove* :te │ │ │ -000024b0: 7374 2065 7175 616c 5d20 3520 2823 2420 st equal] 5 (#$ │ │ │ -000024c0: 2e20 3931 3036 295d 290a 2340 3232 3020 . 9106)]).#@220 │ │ │ -000024d0: 5265 6d6f 7665 2061 6c6c 206f 6363 7572 Remove all occur │ │ │ -000024e0: 7265 6e63 6573 206f 6620 454c 5420 696e rences of ELT in │ │ │ -000024f0: 204c 4953 542c 2063 6f6d 7061 7269 6e67 LIST, comparing │ │ │ -00002500: 2077 6974 6820 6065 7127 2e0a 5468 6973 with `eq'..This │ │ │ -00002510: 2069 7320 6120 6e6f 6e2d 6465 7374 7275 is a non-destru │ │ │ -00002520: 6374 6976 6520 6675 6e63 7469 6f6e 3b20 ctive function; │ │ │ -00002530: 6974 206d 616b 6573 2061 2063 6f70 7920 it makes a copy │ │ │ -00002540: 6f66 204c 4953 5420 746f 2061 766f 6964 of LIST to avoid │ │ │ -00002550: 0a63 6f72 7275 7074 696e 6720 7468 6520 .corrupting the │ │ │ -00002560: 6f72 6967 696e 616c 204c 4953 542e 0a41 original LIST..A │ │ │ -00002570: 6c73 6f20 7365 653a 2060 6465 6c71 272c lso see: `delq', │ │ │ -00002580: 2060 6465 6c65 7465 272c 2060 6465 6c65 `delete', `dele │ │ │ -00002590: 7465 2a27 2c20 6072 656d 6f76 6527 2c20 te*', `remove', │ │ │ -000025a0: 6072 656d 6f76 652a 272e 1f0a 2864 6566 `remove*'...(def │ │ │ -000025b0: 616c 6961 7320 2772 656d 7120 235b 2863 alias 'remq #[(c │ │ │ -000025c0: 6c2d 656c 7420 636c 2d6c 6973 7429 2022 l-elt cl-list) " │ │ │ -000025d0: 0809 73ab 87c2 08c3 0921 5c22 8709 8722 ..s......!\"..." │ │ │ -000025e0: 205b 636c 2d65 6c74 2063 6c2d 6c69 7374 [cl-elt cl-list │ │ │ -000025f0: 2064 656c 7120 636f 7079 2d6c 6973 745d delq copy-list] │ │ │ -00002600: 2034 2028 2324 202e 2039 3432 3429 5d29 4 (#$ . 9424)]) │ │ │ -00002610: 0a23 4031 3233 2052 6574 7572 6e20 6120 .#@123 Return a │ │ │ -00002620: 636f 7079 206f 6620 5345 5120 7769 7468 copy of SEQ with │ │ │ -00002630: 2061 6c6c 2064 7570 6c69 6361 7465 2065 all duplicate e │ │ │ -00002640: 6c65 6d65 6e74 7320 7265 6d6f 7665 642e lements removed. │ │ │ -00002650: 0a4b 6579 776f 7264 7320 7375 7070 6f72 .Keywords suppor │ │ │ -00002660: 7465 643a 2020 3a74 6573 7420 3a74 6573 ted: :test :tes │ │ │ -00002670: 742d 6e6f 7420 3a6b 6579 203a 7374 6172 t-not :key :star │ │ │ -00002680: 7420 3a65 6e64 203a 6672 6f6d 2d65 6e64 t :end :from-end │ │ │ -00002690: 1f0a 2864 6566 616c 6961 7320 2772 656d ..(defalias 'rem │ │ │ -000026a0: 6f76 652d 6475 706c 6963 6174 6573 2023 ove-duplicates # │ │ │ -000026b0: 5b28 636c 2d73 6571 2026 7265 7374 2063 [(cl-seq &rest c │ │ │ -000026c0: 6c2d 6b65 7973 2920 22c2 0908 c323 8722 l-keys) "....#." │ │ │ -000026d0: 205b 636c 2d6b 6579 7320 636c 2d73 6571 [cl-keys cl-seq │ │ │ -000026e0: 2063 6c2d 6465 6c65 7465 2d64 7570 6c69 cl-delete-dupli │ │ │ -000026f0: 6361 7465 7320 745d 2034 2028 2324 202e cates t] 4 (#$ . │ │ │ -00002700: 2039 3735 3129 5d29 0a23 4031 3231 2052 9751)]).#@121 R │ │ │ -00002710: 656d 6f76 6520 616c 6c20 6475 706c 6963 emove all duplic │ │ │ -00002720: 6174 6520 656c 656d 656e 7473 2066 726f ate elements fro │ │ │ -00002730: 6d20 5345 5120 2864 6573 7472 7563 7469 m SEQ (destructi │ │ │ -00002740: 7665 6c79 292e 0a4b 6579 776f 7264 7320 vely)..Keywords │ │ │ -00002750: 7375 7070 6f72 7465 643a 2020 3a74 6573 supported: :tes │ │ │ -00002760: 7420 3a74 6573 742d 6e6f 7420 3a6b 6579 t :test-not :key │ │ │ -00002770: 203a 7374 6172 7420 3a65 6e64 203a 6672 :start :end :fr │ │ │ -00002780: 6f6d 2d65 6e64 1f0a 2864 6566 616c 6961 om-end..(defalia │ │ │ -00002790: 7320 2764 656c 6574 652d 6475 706c 6963 s 'delete-duplic │ │ │ -000027a0: 6174 6573 2023 5b28 636c 2d73 6571 2026 ates #[(cl-seq & │ │ │ -000027b0: 7265 7374 2063 6c2d 6b65 7973 2920 22c2 rest cl-keys) ". │ │ │ -000027c0: 0908 c323 8722 205b 636c 2d6b 6579 7320 ...#." [cl-keys │ │ │ -000027d0: 636c 2d73 6571 2063 6c2d 6465 6c65 7465 cl-seq cl-delete │ │ │ -000027e0: 2d64 7570 6c69 6361 7465 7320 6e69 6c5d -duplicates nil] │ │ │ -000027f0: 2034 2028 2324 202e 2039 3939 3929 5d29 4 (#$ . 9999)]) │ │ │ -00002800: 0a28 6465 6661 6c69 6173 2027 636c 2d64 .(defalias 'cl-d │ │ │ -00002810: 656c 6574 652d 6475 706c 6963 6174 6573 elete-duplicates │ │ │ -00002820: 2023 5b28 636c 2d73 6571 2063 6c2d 6b65 #[(cl-seq cl-ke │ │ │ -00002830: 7973 2063 6c2d 636f 7079 2920 220d 3c83 ys cl-copy) ".<. │ │ │ -00002840: 5901 c609 7341 401e 1ec7 0973 4140 ad8b Y...sA@....sA@.. │ │ │ -00002850: c709 7341 4089 161e ad81 c81e 20c9 0973 ..sA@....... ..s │ │ │ -00002860: 4140 18ca 0973 4140 ae81 cb1a cc09 7341 A@...sA@......sA │ │ │ -00002870: 401c cd09 7341 401e 1fce 0973 4140 1e21 @...sA@....sA@.! │ │ │ -00002880: 0989 1e1a ab9e 0e1a 40cf 73ac 8ed0 0973 ........@.s....s │ │ │ -00002890: 4140 ac87 d1d2 0e1a 405c 2288 0e1a 4141 A@......@\"...AA │ │ │ -000028a0: 8916 1aac 6229 0e1f abe0 5c6e 0d9b d31e ....b)....\n.... │ │ │ -000028b0: 1b1b 0cae 820d 475c 6e5a 140c d456 abc7 ......G\nZ...V.. │ │ │ -000028c0: cb16 1bd5 08ab 8608 0b40 21aa 820b 400b .........@!...@. │ │ │ -000028d0: 410e 1b0c 5324 8916 1bab a10e 1cab 8bd6 A...S$.......... │ │ │ -000028e0: 0d21 155c 6e0d 9b13 d316 1c0e 1b0b 9b89 .!.\n........... │ │ │ -000028f0: 1e5c 2289 4141 a188 290c 5314 aa47 0b41 .\".AA..).S..G.A │ │ │ -00002900: 130c 5314 5c6e 5412 aa34 0d2a 8256 010c ..S.\nT..4.*.V.. │ │ │ -00002910: ae82 0d47 5c6e 5a14 0d41 aba6 5c6e cb55 ...G\nZ..A..\n.U │ │ │ -00002920: aba1 0cd4 56ab 9cd5 08ab 8608 0d40 21aa ....V........@!. │ │ │ -00002930: 820d 400d 41cb 0c53 24ab 880d 4115 0c53 ..@.A..S$...A..S │ │ │ -00002940: 14aa 565c 6ecb 56ab 865c 6e53 0d9b aa86 ..V\n.V..\nS.... │ │ │ -00002950: 0c53 14d4 120d 1b0b 4141 abbf 0cd4 56ab .S......AA....V. │ │ │ -00002960: bad5 08ab 8708 0b41 4021 aa83 0b41 400b .......A@!...A@. │ │ │ -00002970: 4141 cb0c 5324 ab98 0e1c ab8c d60d 2115 AA..S$........!. │ │ │ -00002980: 5c6e 530d 9b13 d316 1c0b 8941 41a1 88aa \nS........AA... │ │ │ -00002990: 830b 4113 0c53 145c 6e54 12aa 3c0d 292e ..A..S.\nT..<.). │ │ │ -000029a0: 0787 d7d8 0dd3 5c22 09d3 231e 1d0d 3bab ......\"..#...;. │ │ │ -000029b0: 860e 1db0 01aa 84d9 0e1d 2129 8722 205b ..........!)." [ │ │ │ -000029c0: 636c 2d6b 6579 2063 6c2d 6b65 7973 2063 cl-key cl-keys c │ │ │ -000029d0: 6c2d 7374 6172 7420 636c 2d70 2063 6c2d l-start cl-p cl- │ │ │ -000029e0: 656e 6420 636c 2d73 6571 203a 7465 7374 end cl-seq :test │ │ │ -000029f0: 203a 7465 7374 2d6e 6f74 2074 203a 6b65 :test-not t :ke │ │ │ -00002a00: 7920 3a73 7461 7274 2030 203a 656e 6420 y :start 0 :end │ │ │ -00002a10: 3a66 726f 6d2d 656e 6420 3a69 6620 283a :from-end :if (: │ │ │ -00002a20: 7465 7374 203a 7465 7374 2d6e 6f74 203a test :test-not : │ │ │ -00002a30: 6b65 7920 3a73 7461 7274 203a 656e 6420 key :start :end │ │ │ -00002a40: 3a66 726f 6d2d 656e 6420 3a69 6629 203a :from-end :if) : │ │ │ -00002a50: 616c 6c6f 772d 6f74 6865 722d 6b65 7973 allow-other-keys │ │ │ -00002a60: 2065 7272 6f72 2022 4261 6420 6b65 7977 error "Bad keyw │ │ │ -00002a70: 6f72 6420 6172 6775 6d65 6e74 2025 7322 ord argument %s" │ │ │ -00002a80: 206e 696c 2031 2063 6c2d 706f 7369 7469 nil 1 cl-positi │ │ │ -00002a90: 6f6e 2063 6f70 792d 7365 7175 656e 6365 on copy-sequence │ │ │ -00002aa0: 2063 6c2d 6465 6c65 7465 2d64 7570 6c69 cl-delete-dupli │ │ │ -00002ab0: 6361 7465 7320 6170 7065 6e64 2076 636f cates append vco │ │ │ -00002ac0: 6e63 6174 2063 6c2d 6b65 7973 2d74 656d ncat cl-keys-tem │ │ │ -00002ad0: 7020 636c 2d69 2063 6c2d 636f 7079 2063 p cl-i cl-copy c │ │ │ -00002ae0: 6c2d 7265 7320 636c 2d74 6573 7420 636c l-res cl-test cl │ │ │ -00002af0: 2d66 726f 6d2d 656e 6420 636c 2d74 6573 -from-end cl-tes │ │ │ -00002b00: 742d 6e6f 7420 636c 2d69 6620 636c 2d74 t-not cl-if cl-t │ │ │ -00002b10: 6169 6c5d 2036 5d29 0a23 4032 3133 2053 ail] 6]).#@213 S │ │ │ -00002b20: 7562 7374 6974 7574 6520 4e45 5720 666f ubstitute NEW fo │ │ │ -00002b30: 7220 4f4c 4420 696e 2053 4551 2e0a 5468 r OLD in SEQ..Th │ │ │ -00002b40: 6973 2069 7320 6120 6e6f 6e2d 6465 7374 is is a non-dest │ │ │ -00002b50: 7275 6374 6976 6520 6675 6e63 7469 6f6e ructive function │ │ │ -00002b60: 3b20 6974 206d 616b 6573 2061 2063 6f70 ; it makes a cop │ │ │ -00002b70: 7920 6f66 2053 4551 2069 6620 6e65 6365 y of SEQ if nece │ │ │ -00002b80: 7373 6172 790a 746f 2061 766f 6964 2063 ssary.to avoid c │ │ │ -00002b90: 6f72 7275 7074 696e 6720 7468 6520 6f72 orrupting the or │ │ │ -00002ba0: 6967 696e 616c 2053 4551 2e0a 4b65 7977 iginal SEQ..Keyw │ │ │ -00002bb0: 6f72 6473 2073 7570 706f 7274 6564 3a20 ords supported: │ │ │ -00002bc0: 203a 7465 7374 203a 7465 7374 2d6e 6f74 :test :test-not │ │ │ -00002bd0: 203a 6b65 7920 3a63 6f75 6e74 203a 7374 :key :count :st │ │ │ -00002be0: 6172 7420 3a65 6e64 203a 6672 6f6d 2d65 art :end :from-e │ │ │ -00002bf0: 6e64 1f0a 2864 6566 616c 6961 7320 2773 nd..(defalias 's │ │ │ -00002c00: 7562 7374 6974 7574 6520 235b 2863 6c2d ubstitute #[(cl- │ │ │ -00002c10: 6e65 7720 636c 2d6f 6c64 2063 6c2d 7365 new cl-old cl-se │ │ │ -00002c20: 7120 2672 6573 7420 636c 2d6b 6579 7329 q &rest cl-keys) │ │ │ -00002c30: 2022 c60d 7341 401e 20c7 0d73 4140 ad8b "..sA@. ..sA@.. │ │ │ -00002c40: c70d 7341 4089 1620 ad81 c81e 24c9 0d73 ..sA@.. ....$..s │ │ │ -00002c50: 4140 1e25 ca0d 7341 401e 21cb 0d73 4140 A@.%..sA@.!..sA@ │ │ │ -00002c60: ad8b cb0d 7341 4089 1621 ad81 c81e 26cc ....sA@..!....&. │ │ │ -00002c70: 0d73 4140 1bcd 0d73 4140 ae81 ce1e 5c22 .sA@...sA@....\" │ │ │ -00002c80: cf0d 7341 401e 23d0 0d73 4140 180d 891a ..sA@.#..sA@.... │ │ │ -00002c90: ab9a 5c6e 40d1 73ac 8dd2 0d73 4140 ac86 ..\n@.s....sA@.. │ │ │ -00002ca0: d3d4 5c6e 405c 2288 5c6e 4141 8912 ac66 ..\n@\".\nAA...f │ │ │ -00002cb0: 290e 1b0e 1c61 ac8c 0bae 85d5 10d6 8913 )....a.......... │ │ │ -00002cc0: ce58 ab83 0caa ced7 0e1b 0c0e 5c22 0e23 .X..........\".# │ │ │ -00002cd0: 2489 19ac 830c aabd d80c 2114 08ac a80c $.........!..... │ │ │ -00002ce0: 090e 1c1e 1d1e 1e89 1e1f 3cab 8b0e 1e0e ..........<..... │ │ │ -00002cf0: 1f9b 0e1d a088 aa88 0e1f 0e1e 0e1d 4988 ..............I. │ │ │ -00002d00: 2b09 5411 0b53 13d9 da0e 1c0e 1b0c cc0b +.T..S.......... │ │ │ -00002d10: cd09 0d26 0929 2e09 8722 205b 636c 2d66 ...&.)..." [cl-f │ │ │ -00002d20: 726f 6d2d 656e 6420 636c 2d69 2063 6c2d rom-end cl-i cl- │ │ │ -00002d30: 6b65 7973 2d74 656d 7020 636c 2d63 6f75 keys-temp cl-cou │ │ │ -00002d40: 6e74 2063 6c2d 7365 7120 636c 2d6b 6579 nt cl-seq cl-key │ │ │ -00002d50: 7320 3a74 6573 7420 3a74 6573 742d 6e6f s :test :test-no │ │ │ -00002d60: 7420 7420 3a6b 6579 203a 6966 203a 6966 t t :key :if :if │ │ │ -00002d70: 2d6e 6f74 203a 636f 756e 7420 3a73 7461 -not :count :sta │ │ │ -00002d80: 7274 2030 203a 656e 6420 3a66 726f 6d2d rt 0 :end :from- │ │ │ -00002d90: 656e 6420 283a 7465 7374 203a 7465 7374 end (:test :test │ │ │ -00002da0: 2d6e 6f74 203a 6b65 7920 3a69 6620 3a69 -not :key :if :i │ │ │ -00002db0: 662d 6e6f 7420 3a63 6f75 6e74 203a 7374 f-not :count :st │ │ │ -00002dc0: 6172 7420 3a65 6e64 203a 6672 6f6d 2d65 art :end :from-e │ │ │ -00002dd0: 6e64 2920 3a61 6c6c 6f77 2d6f 7468 6572 nd) :allow-other │ │ │ -00002de0: 2d6b 6579 7320 6572 726f 7220 2242 6164 -keys error "Bad │ │ │ -00002df0: 206b 6579 776f 7264 2061 7267 756d 656e keyword argumen │ │ │ -00002e00: 7420 2573 2220 6e69 6c20 3830 3030 3030 t %s" nil 800000 │ │ │ -00002e10: 3020 636c 2d70 6f73 6974 696f 6e20 636f 0 cl-position co │ │ │ -00002e20: 7079 2d73 6571 7565 6e63 6520 6170 706c py-sequence appl │ │ │ -00002e30: 7920 6e73 7562 7374 6974 7574 6520 636c y nsubstitute cl │ │ │ -00002e40: 2d6f 6c64 2063 6c2d 6e65 7720 7661 6c20 -old cl-new val │ │ │ -00002e50: 6e20 7365 7120 636c 2d74 6573 7420 636c n seq cl-test cl │ │ │ -00002e60: 2d69 6620 636c 2d73 7461 7274 2063 6c2d -if cl-start cl- │ │ │ -00002e70: 656e 6420 636c 2d74 6573 742d 6e6f 7420 end cl-test-not │ │ │ -00002e80: 636c 2d6b 6579 2063 6c2d 6966 2d6e 6f74 cl-key cl-if-not │ │ │ -00002e90: 5d20 3131 2028 2324 202e 2031 3130 3339 ] 11 (#$ . 11039 │ │ │ -00002ea0: 295d 290a 2340 3232 3420 5375 6273 7469 )]).#@224 Substi │ │ │ -00002eb0: 7475 7465 204e 4557 2066 6f72 2061 6c6c tute NEW for all │ │ │ -00002ec0: 2069 7465 6d73 2073 6174 6973 6679 696e items satisfyin │ │ │ -00002ed0: 6720 5052 4544 4943 4154 4520 696e 2053 g PREDICATE in S │ │ │ -00002ee0: 4551 2e0a 5468 6973 2069 7320 6120 6e6f EQ..This is a no │ │ │ -00002ef0: 6e2d 6465 7374 7275 6374 6976 6520 6675 n-destructive fu │ │ │ -00002f00: 6e63 7469 6f6e 3b20 6974 206d 616b 6573 nction; it makes │ │ │ -00002f10: 2061 2063 6f70 7920 6f66 2053 4551 2069 a copy of SEQ i │ │ │ -00002f20: 6620 6e65 6365 7373 6172 790a 746f 2061 f necessary.to a │ │ │ -00002f30: 766f 6964 2063 6f72 7275 7074 696e 6720 void corrupting │ │ │ -00002f40: 7468 6520 6f72 6967 696e 616c 2053 4551 the original SEQ │ │ │ -00002f50: 2e0a 4b65 7977 6f72 6473 2073 7570 706f ..Keywords suppo │ │ │ -00002f60: 7274 6564 3a20 203a 6b65 7920 3a63 6f75 rted: :key :cou │ │ │ -00002f70: 6e74 203a 7374 6172 7420 3a65 6e64 203a nt :start :end : │ │ │ -00002f80: 6672 6f6d 2d65 6e64 1f0a 2864 6566 616c from-end..(defal │ │ │ -00002f90: 6961 7320 2773 7562 7374 6974 7574 652d ias 'substitute- │ │ │ -00002fa0: 6966 2023 5b28 636c 2d6e 6577 2063 6c2d if #[(cl-new cl- │ │ │ -00002fb0: 7072 6564 2063 6c2d 6c69 7374 2026 7265 pred cl-list &re │ │ │ -00002fc0: 7374 2063 6c2d 6b65 7973 2920 22c4 c50b st cl-keys) "... │ │ │ -00002fd0: c65c 6ec7 0908 2607 8722 205b 636c 2d6b .\n...&.." [cl-k │ │ │ -00002fe0: 6579 7320 636c 2d70 7265 6420 636c 2d6c eys cl-pred cl-l │ │ │ -00002ff0: 6973 7420 636c 2d6e 6577 2061 7070 6c79 ist cl-new apply │ │ │ -00003000: 2073 7562 7374 6974 7574 6520 6e69 6c20 substitute nil │ │ │ -00003010: 3a69 665d 2038 2028 2324 202e 2031 3139 :if] 8 (#$ . 119 │ │ │ -00003020: 3436 295d 290a 2340 3232 3820 5375 6273 46)]).#@228 Subs │ │ │ -00003030: 7469 7475 7465 204e 4557 2066 6f72 2061 titute NEW for a │ │ │ -00003040: 6c6c 2069 7465 6d73 206e 6f74 2073 6174 ll items not sat │ │ │ -00003050: 6973 6679 696e 6720 5052 4544 4943 4154 isfying PREDICAT │ │ │ -00003060: 4520 696e 2053 4551 2e0a 5468 6973 2069 E in SEQ..This i │ │ │ -00003070: 7320 6120 6e6f 6e2d 6465 7374 7275 6374 s a non-destruct │ │ │ -00003080: 6976 6520 6675 6e63 7469 6f6e 3b20 6974 ive function; it │ │ │ -00003090: 206d 616b 6573 2061 2063 6f70 7920 6f66 makes a copy of │ │ │ -000030a0: 2053 4551 2069 6620 6e65 6365 7373 6172 SEQ if necessar │ │ │ -000030b0: 790a 746f 2061 766f 6964 2063 6f72 7275 y.to avoid corru │ │ │ -000030c0: 7074 696e 6720 7468 6520 6f72 6967 696e pting the origin │ │ │ -000030d0: 616c 2053 4551 2e0a 4b65 7977 6f72 6473 al SEQ..Keywords │ │ │ -000030e0: 2073 7570 706f 7274 6564 3a20 203a 6b65 supported: :ke │ │ │ -000030f0: 7920 3a63 6f75 6e74 203a 7374 6172 7420 y :count :start │ │ │ -00003100: 3a65 6e64 203a 6672 6f6d 2d65 6e64 1f0a :end :from-end.. │ │ │ -00003110: 2864 6566 616c 6961 7320 2773 7562 7374 (defalias 'subst │ │ │ -00003120: 6974 7574 652d 6966 2d6e 6f74 2023 5b28 itute-if-not #[( │ │ │ -00003130: 636c 2d6e 6577 2063 6c2d 7072 6564 2063 cl-new cl-pred c │ │ │ -00003140: 6c2d 6c69 7374 2026 7265 7374 2063 6c2d l-list &rest cl- │ │ │ -00003150: 6b65 7973 2920 22c4 c50b c65c 6ec7 0908 keys) "....\n... │ │ │ -00003160: 2607 8722 205b 636c 2d6b 6579 7320 636c &.." [cl-keys cl │ │ │ -00003170: 2d70 7265 6420 636c 2d6c 6973 7420 636c -pred cl-list cl │ │ │ -00003180: 2d6e 6577 2061 7070 6c79 2073 7562 7374 -new apply subst │ │ │ -00003190: 6974 7574 6520 6e69 6c20 3a69 662d 6e6f itute nil :if-no │ │ │ -000031a0: 745d 2038 2028 2324 202e 2031 3233 3332 t] 8 (#$ . 12332 │ │ │ -000031b0: 295d 290a 2340 3138 3320 5375 6273 7469 )]).#@183 Substi │ │ │ -000031c0: 7475 7465 204e 4557 2066 6f72 204f 4c44 tute NEW for OLD │ │ │ -000031d0: 2069 6e20 5345 512e 0a54 6869 7320 6973 in SEQ..This is │ │ │ -000031e0: 2061 2064 6573 7472 7563 7469 7665 2066 a destructive f │ │ │ -000031f0: 756e 6374 696f 6e3b 2069 7420 7265 7573 unction; it reus │ │ │ -00003200: 6573 2074 6865 2073 746f 7261 6765 206f es the storage o │ │ │ -00003210: 6620 5345 5120 7768 656e 6576 6572 2070 f SEQ whenever p │ │ │ -00003220: 6f73 7369 626c 652e 0a4b 6579 776f 7264 ossible..Keyword │ │ │ -00003230: 7320 7375 7070 6f72 7465 643a 2020 3a74 s supported: :t │ │ │ -00003240: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ -00003250: 6579 203a 636f 756e 7420 3a73 7461 7274 ey :count :start │ │ │ -00003260: 203a 656e 6420 3a66 726f 6d2d 656e 641f :end :from-end. │ │ │ -00003270: 0a28 6465 6661 6c69 6173 2027 6e73 7562 .(defalias 'nsub │ │ │ -00003280: 7374 6974 7574 6520 235b 2863 6c2d 6e65 stitute #[(cl-ne │ │ │ -00003290: 7720 636c 2d6f 6c64 2063 6c2d 7365 7120 w cl-old cl-seq │ │ │ -000032a0: 2672 6573 7420 636c 2d6b 6579 7329 2022 &rest cl-keys) " │ │ │ -000032b0: c609 7341 401e 19c7 0973 4140 ad8b c709 ..sA@....sA@.... │ │ │ -000032c0: 7341 4089 1619 ad81 c81e 1cc9 0973 4140 sA@..........sA@ │ │ │ -000032d0: 1dca 0973 4140 1e1a cb09 7341 40ad 8bcb ...sA@....sA@... │ │ │ -000032e0: 0973 4140 8916 1aad 81c8 1e1d cc09 7341 .sA@..........sA │ │ │ -000032f0: 4018 cd09 7341 40ae 81ce 1acf 0973 4140 @...sA@......sA@ │ │ │ -00003300: 1bd0 0973 4140 1e1f 0989 1e1b ab9e 0e1b ...sA@.......... │ │ │ -00003310: 40d1 73ac 8ed2 0973 4140 ac87 d3d4 0e1b @.s....sA@...... │ │ │ -00003320: 405c 2288 0e1b 4141 8916 1bac 6229 0e17 @\"...AA....b).. │ │ │ -00003330: 0e1e 6184 4802 08ae 83d5 8910 ce58 8448 ..a.H........X.H │ │ │ -00003340: 020c 3c83 2f01 0e1f ab86 08d6 5683 2f01 ..<./.......V./. │ │ │ -00003350: 5c6e 0c9b 1e18 0bae 81d5 5c6e 5a13 0e18 \n........\nZ... │ │ │ -00003360: abfc 0bce 56ab f708 ce56 abf2 0e19 ab98 ....V....V...... │ │ │ -00003370: 0e19 0e17 0dab 870d 0e18 4021 aa83 0e18 ..........@!.... │ │ │ -00003380: 405c 223f 0e1c 61aa c10e 1aab 960e 1a0d @\"?..a......... │ │ │ -00003390: ab87 0d0e 1840 21aa 830e 1840 213f 0e1d .....@!....@!?.. │ │ │ -000033a0: 61aa a70e 17a7 ab92 0e17 0dab 870d 0e18 a............... │ │ │ -000033b0: 4021 aa83 0e18 406b aa90 0e17 0dab 870d @!....@k........ │ │ │ -000033c0: 0e18 4021 aa83 0e18 4061 ab89 0e18 0e1e ..@!....@a...... │ │ │ -000033d0: a088 0853 100e 1841 1618 0b53 13aa 0029 ...S...A...S...) │ │ │ -000033e0: 8248 020b ac83 0c47 130e 1f83 d001 5c6e .H.....G......\n │ │ │ -000033f0: 0b57 8348 0208 ce56 8348 020b 5313 0e19 .W.H...V.H..S... │ │ │ -00003400: ab98 0e19 0e17 0dab 870d 0c0b 9c21 aa83 .............!.. │ │ │ -00003410: 0c0b 9c5c 223f 0e1c 61aa c10e 1aab 960e ...\"?..a....... │ │ │ -00003420: 1a0d ab87 0d0c 0b9c 21aa 830c 0b9c 213f ........!.....!? │ │ │ -00003430: 0e1d 61aa a70e 17a7 ab92 0e17 0dab 870d ..a............. │ │ │ -00003440: 0c0b 9c21 aa83 0c0b 9c6b aa90 0e17 0dab ...!.....k...... │ │ │ -00003450: 870d 0c0b 9c21 aa83 0c0b 9c61 ab12 0c0b .....!.....a.... │ │ │ -00003460: 0e1e 1e20 1e21 891e 5c22 3cab 8b0e 210e ... .!..\"<...!. │ │ │ -00003470: 5c22 9b0e 20a0 88aa 880e 5c22 0e21 0e20 \".. .....\".!. │ │ │ -00003480: 4988 2b08 5310 823a 015c 6e0b 57ab f308 I.+.S..:.\n.W... │ │ │ -00003490: ce56 abee 0e19 ab98 0e19 0e17 0dab 870d .V.............. │ │ │ -000034a0: 0c5c 6e48 21aa 830c 5c6e 485c 223f 0e1c .\nH!...\nH\"?.. │ │ │ -000034b0: 61aa c10e 1aab 960e 1a0d ab87 0d0c 5c6e a.............\n │ │ │ -000034c0: 4821 aa83 0c5c 6e48 213f 0e1d 61aa a70e H!...\nH!?..a... │ │ │ -000034d0: 17a7 ab92 0e17 0dab 870d 0c5c 6e48 21aa ...........\nH!. │ │ │ -000034e0: 830c 5c6e 486b aa90 0e17 0dab 870d 0c5c ..\nHk.........\ │ │ │ -000034f0: 6e48 21aa 830c 5c6e 4861 ab89 0c5c 6e0e nH!...\nHa...\n. │ │ │ -00003500: 1e49 8808 5310 5c6e 5489 12aa 090c 2e09 .I..S.\nT....... │ │ │ -00003510: 8722 205b 636c 2d63 6f75 6e74 2063 6c2d ." [cl-count cl- │ │ │ -00003520: 6b65 7973 2063 6c2d 7374 6172 7420 636c keys cl-start cl │ │ │ -00003530: 2d65 6e64 2063 6c2d 7365 7120 636c 2d6b -end cl-seq cl-k │ │ │ -00003540: 6579 203a 7465 7374 203a 7465 7374 2d6e ey :test :test-n │ │ │ -00003550: 6f74 2074 203a 6b65 7920 3a69 6620 3a69 ot t :key :if :i │ │ │ -00003560: 662d 6e6f 7420 3a63 6f75 6e74 203a 7374 f-not :count :st │ │ │ -00003570: 6172 7420 3020 3a65 6e64 203a 6672 6f6d art 0 :end :from │ │ │ -00003580: 2d65 6e64 2028 3a74 6573 7420 3a74 6573 -end (:test :tes │ │ │ -00003590: 742d 6e6f 7420 3a6b 6579 203a 6966 203a t-not :key :if : │ │ │ -000035a0: 6966 2d6e 6f74 203a 636f 756e 7420 3a73 if-not :count :s │ │ │ -000035b0: 7461 7274 203a 656e 6420 3a66 726f 6d2d tart :end :from- │ │ │ -000035c0: 656e 6429 203a 616c 6c6f 772d 6f74 6865 end) :allow-othe │ │ │ -000035d0: 722d 6b65 7973 2065 7272 6f72 2022 4261 r-keys error "Ba │ │ │ -000035e0: 6420 6b65 7977 6f72 6420 6172 6775 6d65 d keyword argume │ │ │ -000035f0: 6e74 2025 7322 2038 3030 3030 3030 2034 nt %s" 8000000 4 │ │ │ -00003600: 3030 3030 3030 2063 6c2d 6f6c 6420 636c 000000 cl-old cl │ │ │ -00003610: 2d70 2063 6c2d 7465 7374 2063 6c2d 6966 -p cl-test cl-if │ │ │ -00003620: 2063 6c2d 6b65 7973 2d74 656d 7020 636c cl-keys-temp cl │ │ │ -00003630: 2d74 6573 742d 6e6f 7420 636c 2d69 662d -test-not cl-if- │ │ │ -00003640: 6e6f 7420 636c 2d6e 6577 2063 6c2d 6672 not cl-new cl-fr │ │ │ -00003650: 6f6d 2d65 6e64 2076 616c 206e 2073 6571 om-end val n seq │ │ │ -00003660: 5d20 3620 2823 2420 2e20 3132 3733 3029 ] 6 (#$ . 12730) │ │ │ -00003670: 5d29 0a23 4031 3934 2053 7562 7374 6974 ]).#@194 Substit │ │ │ -00003680: 7574 6520 4e45 5720 666f 7220 616c 6c20 ute NEW for all │ │ │ -00003690: 6974 656d 7320 7361 7469 7366 7969 6e67 items satisfying │ │ │ -000036a0: 2050 5245 4449 4341 5445 2069 6e20 5345 PREDICATE in SE │ │ │ -000036b0: 512e 0a54 6869 7320 6973 2061 2064 6573 Q..This is a des │ │ │ -000036c0: 7472 7563 7469 7665 2066 756e 6374 696f tructive functio │ │ │ -000036d0: 6e3b 2069 7420 7265 7573 6573 2074 6865 n; it reuses the │ │ │ -000036e0: 2073 746f 7261 6765 206f 6620 5345 5120 storage of SEQ │ │ │ -000036f0: 7768 656e 6576 6572 2070 6f73 7369 626c whenever possibl │ │ │ -00003700: 652e 0a4b 6579 776f 7264 7320 7375 7070 e..Keywords supp │ │ │ -00003710: 6f72 7465 643a 2020 3a6b 6579 203a 636f orted: :key :co │ │ │ -00003720: 756e 7420 3a73 7461 7274 203a 656e 6420 unt :start :end │ │ │ -00003730: 3a66 726f 6d2d 656e 641f 0a28 6465 6661 :from-end..(defa │ │ │ -00003740: 6c69 6173 2027 6e73 7562 7374 6974 7574 lias 'nsubstitut │ │ │ -00003750: 652d 6966 2023 5b28 636c 2d6e 6577 2063 e-if #[(cl-new c │ │ │ -00003760: 6c2d 7072 6564 2063 6c2d 6c69 7374 2026 l-pred cl-list & │ │ │ -00003770: 7265 7374 2063 6c2d 6b65 7973 2920 22c4 rest cl-keys) ". │ │ │ -00003780: c50b c65c 6ec7 0908 2607 8722 205b 636c ...\n...&.." [cl │ │ │ -00003790: 2d6b 6579 7320 636c 2d70 7265 6420 636c -keys cl-pred cl │ │ │ -000037a0: 2d6c 6973 7420 636c 2d6e 6577 2061 7070 -list cl-new app │ │ │ -000037b0: 6c79 206e 7375 6273 7469 7475 7465 206e ly nsubstitute n │ │ │ -000037c0: 696c 203a 6966 5d20 3820 2823 2420 2e20 il :if] 8 (#$ . │ │ │ -000037d0: 3133 3934 3529 5d29 0a23 4031 3938 2053 13945)]).#@198 S │ │ │ -000037e0: 7562 7374 6974 7574 6520 4e45 5720 666f ubstitute NEW fo │ │ │ -000037f0: 7220 616c 6c20 6974 656d 7320 6e6f 7420 r all items not │ │ │ -00003800: 7361 7469 7366 7969 6e67 2050 5245 4449 satisfying PREDI │ │ │ -00003810: 4341 5445 2069 6e20 5345 512e 0a54 6869 CATE in SEQ..Thi │ │ │ -00003820: 7320 6973 2061 2064 6573 7472 7563 7469 s is a destructi │ │ │ -00003830: 7665 2066 756e 6374 696f 6e3b 2069 7420 ve function; it │ │ │ -00003840: 7265 7573 6573 2074 6865 2073 746f 7261 reuses the stora │ │ │ -00003850: 6765 206f 6620 5345 5120 7768 656e 6576 ge of SEQ whenev │ │ │ -00003860: 6572 2070 6f73 7369 626c 652e 0a4b 6579 er possible..Key │ │ │ -00003870: 776f 7264 7320 7375 7070 6f72 7465 643a words supported: │ │ │ -00003880: 2020 3a6b 6579 203a 636f 756e 7420 3a73 :key :count :s │ │ │ -00003890: 7461 7274 203a 656e 6420 3a66 726f 6d2d tart :end :from- │ │ │ -000038a0: 656e 641f 0a28 6465 6661 6c69 6173 2027 end..(defalias ' │ │ │ -000038b0: 6e73 7562 7374 6974 7574 652d 6966 2d6e nsubstitute-if-n │ │ │ -000038c0: 6f74 2023 5b28 636c 2d6e 6577 2063 6c2d ot #[(cl-new cl- │ │ │ -000038d0: 7072 6564 2063 6c2d 6c69 7374 2026 7265 pred cl-list &re │ │ │ -000038e0: 7374 2063 6c2d 6b65 7973 2920 22c4 c50b st cl-keys) "... │ │ │ -000038f0: c65c 6ec7 0908 2607 8722 205b 636c 2d6b .\n...&.." [cl-k │ │ │ -00003900: 6579 7320 636c 2d70 7265 6420 636c 2d6c eys cl-pred cl-l │ │ │ -00003910: 6973 7420 636c 2d6e 6577 2061 7070 6c79 ist cl-new apply │ │ │ -00003920: 206e 7375 6273 7469 7475 7465 206e 696c nsubstitute nil │ │ │ -00003930: 203a 6966 2d6e 6f74 5d20 3820 2823 2420 :if-not] 8 (#$ │ │ │ -00003940: 2e20 3134 3330 3329 5d29 0a23 4031 3535 . 14303)]).#@155 │ │ │ -00003950: 2046 696e 6420 7468 6520 6669 7273 7420 Find the first │ │ │ -00003960: 6f63 6375 7272 656e 6365 206f 6620 4954 occurrence of IT │ │ │ -00003970: 454d 2069 6e20 4c49 5354 2e0a 5265 7475 EM in LIST..Retu │ │ │ -00003980: 726e 2074 6865 206d 6174 6368 696e 6720 rn the matching │ │ │ -00003990: 4954 454d 2c20 6f72 206e 696c 2069 6620 ITEM, or nil if │ │ │ -000039a0: 6e6f 7420 666f 756e 642e 0a4b 6579 776f not found..Keywo │ │ │ -000039b0: 7264 7320 7375 7070 6f72 7465 643a 2020 rds supported: │ │ │ -000039c0: 3a74 6573 7420 3a74 6573 742d 6e6f 7420 :test :test-not │ │ │ -000039d0: 3a6b 6579 203a 7374 6172 7420 3a65 6e64 :key :start :end │ │ │ -000039e0: 203a 6672 6f6d 2d65 6e64 1f0a 2864 6566 :from-end..(def │ │ │ -000039f0: 616c 6961 7320 2766 696e 6420 235b 2863 alias 'find #[(c │ │ │ -00003a00: 6c2d 6974 656d 2063 6c2d 7365 7120 2672 l-item cl-seq &r │ │ │ -00003a10: 6573 7420 636c 2d6b 6579 7329 2022 c4c5 est cl-keys) ".. │ │ │ -00003a20: 090b 0824 891a ad83 0b5c 6e9c 2987 2220 ...$.....\n.)." │ │ │ -00003a30: 5b63 6c2d 6b65 7973 2063 6c2d 6974 656d [cl-keys cl-item │ │ │ -00003a40: 2063 6c2d 706f 7320 636c 2d73 6571 2061 cl-pos cl-seq a │ │ │ -00003a50: 7070 6c79 2070 6f73 6974 696f 6e5d 2036 pply position] 6 │ │ │ -00003a60: 2028 2324 202e 2031 3436 3733 295d 290a (#$ . 14673)]). │ │ │ -00003a70: 2340 3134 3620 4669 6e64 2074 6865 2066 #@146 Find the f │ │ │ -00003a80: 6972 7374 2069 7465 6d20 7361 7469 7366 irst item satisf │ │ │ -00003a90: 7969 6e67 2050 5245 4449 4341 5445 2069 ying PREDICATE i │ │ │ -00003aa0: 6e20 4c49 5354 2e0a 5265 7475 726e 2074 n LIST..Return t │ │ │ -00003ab0: 6865 206d 6174 6368 696e 6720 4954 454d he matching ITEM │ │ │ -00003ac0: 2c20 6f72 206e 696c 2069 6620 6e6f 7420 , or nil if not │ │ │ -00003ad0: 666f 756e 642e 0a4b 6579 776f 7264 7320 found..Keywords │ │ │ -00003ae0: 7375 7070 6f72 7465 643a 2020 3a6b 6579 supported: :key │ │ │ -00003af0: 203a 7374 6172 7420 3a65 6e64 203a 6672 :start :end :fr │ │ │ -00003b00: 6f6d 2d65 6e64 1f0a 2864 6566 616c 6961 om-end..(defalia │ │ │ -00003b10: 7320 2766 696e 642d 6966 2023 5b28 636c s 'find-if #[(cl │ │ │ -00003b20: 2d70 7265 6420 636c 2d6c 6973 7420 2672 -pred cl-list &r │ │ │ -00003b30: 6573 7420 636c 2d6b 6579 7329 2022 c3c4 est cl-keys) ".. │ │ │ -00003b40: c55c 6ec6 0908 2606 8722 205b 636c 2d6b .\n...&.." [cl-k │ │ │ -00003b50: 6579 7320 636c 2d70 7265 6420 636c 2d6c eys cl-pred cl-l │ │ │ -00003b60: 6973 7420 6170 706c 7920 6669 6e64 206e ist apply find n │ │ │ -00003b70: 696c 203a 6966 5d20 3720 2823 2420 2e20 il :if] 7 (#$ . │ │ │ -00003b80: 3134 3936 3629 5d29 0a23 4031 3530 2046 14966)]).#@150 F │ │ │ -00003b90: 696e 6420 7468 6520 6669 7273 7420 6974 ind the first it │ │ │ -00003ba0: 656d 206e 6f74 2073 6174 6973 6679 696e em not satisfyin │ │ │ -00003bb0: 6720 5052 4544 4943 4154 4520 696e 204c g PREDICATE in L │ │ │ -00003bc0: 4953 542e 0a52 6574 7572 6e20 7468 6520 IST..Return the │ │ │ -00003bd0: 6d61 7463 6869 6e67 2049 5445 4d2c 206f matching ITEM, o │ │ │ -00003be0: 7220 6e69 6c20 6966 206e 6f74 2066 6f75 r nil if not fou │ │ │ -00003bf0: 6e64 2e0a 4b65 7977 6f72 6473 2073 7570 nd..Keywords sup │ │ │ -00003c00: 706f 7274 6564 3a20 203a 6b65 7920 3a73 ported: :key :s │ │ │ -00003c10: 7461 7274 203a 656e 6420 3a66 726f 6d2d tart :end :from- │ │ │ -00003c20: 656e 641f 0a28 6465 6661 6c69 6173 2027 end..(defalias ' │ │ │ -00003c30: 6669 6e64 2d69 662d 6e6f 7420 235b 2863 find-if-not #[(c │ │ │ -00003c40: 6c2d 7072 6564 2063 6c2d 6c69 7374 2026 l-pred cl-list & │ │ │ -00003c50: 7265 7374 2063 6c2d 6b65 7973 2920 22c3 rest cl-keys) ". │ │ │ -00003c60: c4c5 5c6e c609 0826 0687 2220 5b63 6c2d ..\n...&.." [cl- │ │ │ -00003c70: 6b65 7973 2063 6c2d 7072 6564 2063 6c2d keys cl-pred cl- │ │ │ -00003c80: 6c69 7374 2061 7070 6c79 2066 696e 6420 list apply find │ │ │ -00003c90: 6e69 6c20 3a69 662d 6e6f 745d 2037 2028 nil :if-not] 7 ( │ │ │ -00003ca0: 2324 202e 2031 3532 3437 295d 290a 2340 #$ . 15247)]).#@ │ │ │ -00003cb0: 3136 3820 4669 6e64 2074 6865 2066 6972 168 Find the fir │ │ │ -00003cc0: 7374 206f 6363 7572 7265 6e63 6520 6f66 st occurrence of │ │ │ -00003cd0: 2049 5445 4d20 696e 204c 4953 542e 0a52 ITEM in LIST..R │ │ │ -00003ce0: 6574 7572 6e20 7468 6520 696e 6465 7820 eturn the index │ │ │ -00003cf0: 6f66 2074 6865 206d 6174 6368 696e 6720 of the matching │ │ │ -00003d00: 6974 656d 2c20 6f72 206e 696c 2069 6620 item, or nil if │ │ │ -00003d10: 6e6f 7420 666f 756e 642e 0a4b 6579 776f not found..Keywo │ │ │ -00003d20: 7264 7320 7375 7070 6f72 7465 643a 2020 rds supported: │ │ │ -00003d30: 3a74 6573 7420 3a74 6573 742d 6e6f 7420 :test :test-not │ │ │ -00003d40: 3a6b 6579 203a 7374 6172 7420 3a65 6e64 :key :start :end │ │ │ -00003d50: 203a 6672 6f6d 2d65 6e64 1f0a 2864 6566 :from-end..(def │ │ │ -00003d60: 616c 6961 7320 2770 6f73 6974 696f 6e20 alias 'position │ │ │ -00003d70: 235b 2863 6c2d 6974 656d 2063 6c2d 7365 #[(cl-item cl-se │ │ │ -00003d80: 7120 2672 6573 7420 636c 2d6b 6579 7329 q &rest cl-keys) │ │ │ -00003d90: 2022 c60d 7341 401b c70d 7341 40ad 8ac7 "..sA@...sA@... │ │ │ -00003da0: 0d73 4140 8913 ad81 c81e 16c9 0d73 4140 .sA@.........sA@ │ │ │ -00003db0: 1e17 ca0d 7341 401a cb0d 7341 40ad 8acb ....sA@...sA@... │ │ │ -00003dc0: 0d73 4140 8912 ad81 c81e 18cc 0d73 4140 .sA@.........sA@ │ │ │ -00003dd0: ae81 cd19 ce0d 7341 4018 cf0d 7341 401e ......sA@...sA@. │ │ │ -00003de0: 150d 891c ab9a 0c40 d073 ac8d d10d 7341 .......@.s....sA │ │ │ -00003df0: 40ac 86d2 d30c 405c 2288 0c41 4189 14ac @.....@\"..AA... │ │ │ -00003e00: 6629 d40e 190e 1a09 080e 1525 2e08 8722 f).........%..." │ │ │ -00003e10: 205b 636c 2d65 6e64 2063 6c2d 7374 6172 [cl-end cl-star │ │ │ -00003e20: 7420 636c 2d69 6620 636c 2d74 6573 7420 t cl-if cl-test │ │ │ -00003e30: 636c 2d6b 6579 732d 7465 6d70 2063 6c2d cl-keys-temp cl- │ │ │ -00003e40: 6b65 7973 203a 7465 7374 203a 7465 7374 keys :test :test │ │ │ -00003e50: 2d6e 6f74 2074 203a 6b65 7920 3a69 6620 -not t :key :if │ │ │ -00003e60: 3a69 662d 6e6f 7420 3a73 7461 7274 2030 :if-not :start 0 │ │ │ -00003e70: 203a 656e 6420 3a66 726f 6d2d 656e 6420 :end :from-end │ │ │ -00003e80: 283a 7465 7374 203a 7465 7374 2d6e 6f74 (:test :test-not │ │ │ -00003e90: 203a 6b65 7920 3a69 6620 3a69 662d 6e6f :key :if :if-no │ │ │ -00003ea0: 7420 3a73 7461 7274 203a 656e 6420 3a66 t :start :end :f │ │ │ -00003eb0: 726f 6d2d 656e 6429 203a 616c 6c6f 772d rom-end) :allow- │ │ │ -00003ec0: 6f74 6865 722d 6b65 7973 2065 7272 6f72 other-keys error │ │ │ -00003ed0: 2022 4261 6420 6b65 7977 6f72 6420 6172 "Bad keyword ar │ │ │ -00003ee0: 6775 6d65 6e74 2025 7322 2063 6c2d 706f gument %s" cl-po │ │ │ -00003ef0: 7369 7469 6f6e 2063 6c2d 6672 6f6d 2d65 sition cl-from-e │ │ │ -00003f00: 6e64 2063 6c2d 7465 7374 2d6e 6f74 2063 nd cl-test-not c │ │ │ -00003f10: 6c2d 6b65 7920 636c 2d69 662d 6e6f 7420 l-key cl-if-not │ │ │ -00003f20: 636c 2d69 7465 6d20 636c 2d73 6571 5d20 cl-item cl-seq] │ │ │ -00003f30: 3720 2823 2420 2e20 3135 3534 3029 5d29 7 (#$ . 15540)]) │ │ │ -00003f40: 0a28 6465 6661 6c69 6173 2027 636c 2d70 .(defalias 'cl-p │ │ │ -00003f50: 6f73 6974 696f 6e20 235b 2863 6c2d 6974 osition #[(cl-it │ │ │ -00003f60: 656d 2063 6c2d 7365 7120 636c 2d73 7461 em cl-seq cl-sta │ │ │ -00003f70: 7274 2026 6f70 7469 6f6e 616c 2063 6c2d rt &optional cl- │ │ │ -00003f80: 656e 6420 636c 2d66 726f 6d2d 656e 6429 end cl-from-end) │ │ │ -00003f90: 2022 0b3c abfe 0c0b 9b19 5c6e ac82 c612 ".<......\n.... │ │ │ -00003fa0: c71e 5c6e 09ab eb0c 5c6e 57ab e60e 5c6e ..\n....\nW...\n │ │ │ -00003fb0: ab84 0e0d abde 0e08 ab95 0e08 080d ab86 ................ │ │ │ -00003fc0: 0d09 4021 aa82 0940 5c22 3f0e 0b61 aab8 ..@!...@\"?..a.. │ │ │ -00003fd0: 0e09 ab94 0e09 0dab 860d 0940 21aa 8209 ...........@!... │ │ │ -00003fe0: 4021 3f0e 0c61 aaa0 08a7 ab8f 080d ab86 @!?..a.......... │ │ │ -00003ff0: 0d09 4021 aa82 0940 6baa 8d08 0dab 860d ..@!...@k....... │ │ │ -00004000: 0940 21aa 8209 4061 ab83 0c16 5c6e 0941 .@!...@a....\n.A │ │ │ -00004010: 110c 5414 aa12 0e5c 6e2a 875c 6eac 830b ..T....\n*.\n... │ │ │ -00004020: 4712 0e0d abea 5c6e 5389 120c 59ab db0e G.....\nS...Y... │ │ │ -00004030: 08ab 970e 0808 0dab 870d 0b5c 6e48 21aa ...........\nH!. │ │ │ -00004040: 830b 5c6e 485c 223f 0e0b 61aa be0e 09ab ..\nH\"?..a..... │ │ │ -00004050: 960e 090d ab87 0d0b 5c6e 4821 aa83 0b5c ........\nH!...\ │ │ │ -00004060: 6e48 213f 0e0c 61aa a408 a7ab 9108 0dab nH!?..a......... │ │ │ -00004070: 870d 0b5c 6e48 21aa 830b 5c6e 486b aa8f ...\nH!...\nHk.. │ │ │ -00004080: 080d ab87 0d0b 5c6e 4821 aa83 0b5c 6e48 ......\nH!...\nH │ │ │ -00004090: 61ab 1d5c 6e0c 59ad ee5c 6e87 0c5c 6e57 a..\n.Y..\n..\nW │ │ │ -000040a0: abe1 0e08 ab97 0e08 080d ab87 0d0b 0c48 ...............H │ │ │ -000040b0: 21aa 830b 0c48 5c22 3f0e 0b61 aabe 0e09 !....H\"?..a.... │ │ │ -000040c0: ab96 0e09 0dab 870d 0b0c 4821 aa83 0b0c ..........H!.... │ │ │ -000040d0: 4821 3f0e 0c61 aaa4 08a7 ab91 080d ab87 H!?..a.......... │ │ │ -000040e0: 0d0b 0c48 21aa 830b 0c48 6baa 8f08 0dab ...H!....Hk..... │ │ │ -000040f0: 870d 0b0c 4821 aa83 0b0c 4861 ac86 0c54 ....H!....Ha...T │ │ │ -00004100: 8914 aa1b 0c5c 6e57 ad81 0c87 2220 5b63 .....\nW...." [c │ │ │ -00004110: 6c2d 6974 656d 2063 6c2d 7020 636c 2d65 l-item cl-p cl-e │ │ │ -00004120: 6e64 2063 6c2d 7365 7120 636c 2d73 7461 nd cl-seq cl-sta │ │ │ -00004130: 7274 2063 6c2d 6b65 7920 3830 3030 3030 rt cl-key 800000 │ │ │ -00004140: 3020 6e69 6c20 636c 2d74 6573 7420 636c 0 nil cl-test cl │ │ │ -00004150: 2d69 6620 636c 2d72 6573 2063 6c2d 7465 -if cl-res cl-te │ │ │ -00004160: 7374 2d6e 6f74 2063 6c2d 6966 2d6e 6f74 st-not cl-if-not │ │ │ -00004170: 2063 6c2d 6672 6f6d 2d65 6e64 5d20 365d cl-from-end] 6] │ │ │ -00004180: 290a 2340 3135 3920 4669 6e64 2074 6865 ).#@159 Find the │ │ │ -00004190: 2066 6972 7374 2069 7465 6d20 7361 7469 first item sati │ │ │ -000041a0: 7366 7969 6e67 2050 5245 4449 4341 5445 sfying PREDICATE │ │ │ -000041b0: 2069 6e20 4c49 5354 2e0a 5265 7475 726e in LIST..Return │ │ │ -000041c0: 2074 6865 2069 6e64 6578 206f 6620 7468 the index of th │ │ │ -000041d0: 6520 6d61 7463 6869 6e67 2069 7465 6d2c e matching item, │ │ │ -000041e0: 206f 7220 6e69 6c20 6966 206e 6f74 2066 or nil if not f │ │ │ -000041f0: 6f75 6e64 2e0a 4b65 7977 6f72 6473 2073 ound..Keywords s │ │ │ -00004200: 7570 706f 7274 6564 3a20 203a 6b65 7920 upported: :key │ │ │ -00004210: 3a73 7461 7274 203a 656e 6420 3a66 726f :start :end :fro │ │ │ -00004220: 6d2d 656e 641f 0a28 6465 6661 6c69 6173 m-end..(defalias │ │ │ -00004230: 2027 706f 7369 7469 6f6e 2d69 6620 235b 'position-if #[ │ │ │ -00004240: 2863 6c2d 7072 6564 2063 6c2d 6c69 7374 (cl-pred cl-list │ │ │ -00004250: 2026 7265 7374 2063 6c2d 6b65 7973 2920 &rest cl-keys) │ │ │ -00004260: 22c3 c4c5 5c6e c609 0826 0687 2220 5b63 "...\n...&.." [c │ │ │ -00004270: 6c2d 6b65 7973 2063 6c2d 7072 6564 2063 l-keys cl-pred c │ │ │ -00004280: 6c2d 6c69 7374 2061 7070 6c79 2070 6f73 l-list apply pos │ │ │ -00004290: 6974 696f 6e20 6e69 6c20 3a69 665d 2037 ition nil :if] 7 │ │ │ -000042a0: 2028 2324 202e 2031 3637 3736 295d 290a (#$ . 16776)]). │ │ │ -000042b0: 2340 3136 3320 4669 6e64 2074 6865 2066 #@163 Find the f │ │ │ -000042c0: 6972 7374 2069 7465 6d20 6e6f 7420 7361 irst item not sa │ │ │ -000042d0: 7469 7366 7969 6e67 2050 5245 4449 4341 tisfying PREDICA │ │ │ -000042e0: 5445 2069 6e20 4c49 5354 2e0a 5265 7475 TE in LIST..Retu │ │ │ -000042f0: 726e 2074 6865 2069 6e64 6578 206f 6620 rn the index of │ │ │ -00004300: 7468 6520 6d61 7463 6869 6e67 2069 7465 the matching ite │ │ │ -00004310: 6d2c 206f 7220 6e69 6c20 6966 206e 6f74 m, or nil if not │ │ │ -00004320: 2066 6f75 6e64 2e0a 4b65 7977 6f72 6473 found..Keywords │ │ │ -00004330: 2073 7570 706f 7274 6564 3a20 203a 6b65 supported: :ke │ │ │ -00004340: 7920 3a73 7461 7274 203a 656e 6420 3a66 y :start :end :f │ │ │ -00004350: 726f 6d2d 656e 641f 0a28 6465 6661 6c69 rom-end..(defali │ │ │ -00004360: 6173 2027 706f 7369 7469 6f6e 2d69 662d as 'position-if- │ │ │ -00004370: 6e6f 7420 235b 2863 6c2d 7072 6564 2063 not #[(cl-pred c │ │ │ -00004380: 6c2d 6c69 7374 2026 7265 7374 2063 6c2d l-list &rest cl- │ │ │ -00004390: 6b65 7973 2920 22c3 c4c5 5c6e c609 0826 keys) "...\n...& │ │ │ -000043a0: 0687 2220 5b63 6c2d 6b65 7973 2063 6c2d .." [cl-keys cl- │ │ │ -000043b0: 7072 6564 2063 6c2d 6c69 7374 2061 7070 pred cl-list app │ │ │ -000043c0: 6c79 2070 6f73 6974 696f 6e20 6e69 6c20 ly position nil │ │ │ -000043d0: 3a69 662d 6e6f 745d 2037 2028 2324 202e :if-not] 7 (#$ . │ │ │ -000043e0: 2031 3730 3738 295d 290a 2340 3130 3420 17078)]).#@104 │ │ │ -000043f0: 436f 756e 7420 7468 6520 6e75 6d62 6572 Count the number │ │ │ -00004400: 206f 6620 6f63 6375 7272 656e 6365 7320 of occurrences │ │ │ -00004410: 6f66 2049 5445 4d20 696e 204c 4953 542e of ITEM in LIST. │ │ │ -00004420: 0a4b 6579 776f 7264 7320 7375 7070 6f72 .Keywords suppor │ │ │ -00004430: 7465 643a 2020 3a74 6573 7420 3a74 6573 ted: :test :tes │ │ │ -00004440: 742d 6e6f 7420 3a6b 6579 203a 7374 6172 t-not :key :star │ │ │ -00004450: 7420 3a65 6e64 1f0a 2864 6566 616c 6961 t :end..(defalia │ │ │ -00004460: 7320 2763 6f75 6e74 2023 5b28 636c 2d69 s 'count #[(cl-i │ │ │ -00004470: 7465 6d20 636c 2d73 6571 2026 7265 7374 tem cl-seq &rest │ │ │ -00004480: 2063 6c2d 6b65 7973 2920 22c6 0d73 4140 cl-keys) "..sA@ │ │ │ -00004490: 1e14 c70d 7341 40ad 8bc7 0d73 4140 8916 ....sA@....sA@.. │ │ │ -000044a0: 14ad 81c8 1e19 c90d 7341 401b ca0d 7341 ........sA@...sA │ │ │ -000044b0: 401e 15cb 0d73 4140 ad8b cb0d 7341 4089 @....sA@....sA@. │ │ │ -000044c0: 1615 ad81 c81e 1acc 0d73 4140 ae81 cd19 .........sA@.... │ │ │ -000044d0: ce0d 7341 401e 160d 8918 ab9a 0840 cf73 ..sA@........@.s │ │ │ -000044e0: ac8d d00d 7341 40ac 86d1 d208 405c 2288 ....sA@.....@\". │ │ │ -000044f0: 0841 4189 10ac 6629 cdd3 1c1e 170e 16ac .AA...f)........ │ │ │ -00004500: 845c 6e47 1616 5c6e 3aab 8409 5c6e 9b12 .\nG..\n:...\n.. │ │ │ -00004510: 090e 1657 abe9 5c6e 3aab 875c 6e89 4112 ...W..\n:..\n.A. │ │ │ -00004520: 40aa 835c 6e09 4814 0e14 ab94 0e14 0e18 @..\n.H......... │ │ │ -00004530: 0bab 850b 0c21 aa81 0c5c 223f 0e19 61aa .....!...\"?..a. │ │ │ -00004540: b50e 15ab 920e 150b ab85 0b0c 21aa 810c ............!... │ │ │ -00004550: 213f 0e1a 61aa 9f0e 18a7 ab8e 0e18 0bab !?..a........... │ │ │ -00004560: 850b 0c21 aa81 0c6b aa8c 0e18 0bab 850b ...!...k........ │ │ │ -00004570: 0c21 aa81 0c61 ab85 0e17 5416 1709 5489 .!...a....T...T. │ │ │ -00004580: 11aa 120e 172e 0987 2220 5b63 6c2d 6b65 ........" [cl-ke │ │ │ -00004590: 7973 2d74 656d 7020 636c 2d73 7461 7274 ys-temp cl-start │ │ │ -000045a0: 2063 6c2d 7365 7120 636c 2d6b 6579 2063 cl-seq cl-key c │ │ │ -000045b0: 6c2d 7820 636c 2d6b 6579 7320 3a74 6573 l-x cl-keys :tes │ │ │ -000045c0: 7420 3a74 6573 742d 6e6f 7420 7420 3a6b t :test-not t :k │ │ │ -000045d0: 6579 203a 6966 203a 6966 2d6e 6f74 203a ey :if :if-not : │ │ │ -000045e0: 7374 6172 7420 3020 3a65 6e64 2028 3a74 start 0 :end (:t │ │ │ -000045f0: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ -00004600: 6579 203a 6966 203a 6966 2d6e 6f74 203a ey :if :if-not : │ │ │ -00004610: 7374 6172 7420 3a65 6e64 2920 3a61 6c6c start :end) :all │ │ │ -00004620: 6f77 2d6f 7468 6572 2d6b 6579 7320 6572 ow-other-keys er │ │ │ -00004630: 726f 7220 2242 6164 206b 6579 776f 7264 ror "Bad keyword │ │ │ -00004640: 2061 7267 756d 656e 7420 2573 2220 6e69 argument %s" ni │ │ │ -00004650: 6c20 636c 2d74 6573 7420 636c 2d69 6620 l cl-test cl-if │ │ │ -00004660: 636c 2d65 6e64 2063 6c2d 636f 756e 7420 cl-end cl-count │ │ │ -00004670: 636c 2d69 7465 6d20 636c 2d74 6573 742d cl-item cl-test- │ │ │ -00004680: 6e6f 7420 636c 2d69 662d 6e6f 745d 2035 not cl-if-not] 5 │ │ │ -00004690: 2028 2324 202e 2031 3733 3932 295d 290a (#$ . 17392)]). │ │ │ -000046a0: 2340 3935 2043 6f75 6e74 2074 6865 206e #@95 Count the n │ │ │ -000046b0: 756d 6265 7220 6f66 2069 7465 6d73 2073 umber of items s │ │ │ -000046c0: 6174 6973 6679 696e 6720 5052 4544 4943 atisfying PREDIC │ │ │ -000046d0: 4154 4520 696e 204c 4953 542e 0a4b 6579 ATE in LIST..Key │ │ │ -000046e0: 776f 7264 7320 7375 7070 6f72 7465 643a words supported: │ │ │ -000046f0: 2020 3a6b 6579 203a 7374 6172 7420 3a65 :key :start :e │ │ │ -00004700: 6e64 1f0a 2864 6566 616c 6961 7320 2763 nd..(defalias 'c │ │ │ -00004710: 6f75 6e74 2d69 6620 235b 2863 6c2d 7072 ount-if #[(cl-pr │ │ │ -00004720: 6564 2063 6c2d 6c69 7374 2026 7265 7374 ed cl-list &rest │ │ │ -00004730: 2063 6c2d 6b65 7973 2920 22c3 c4c5 5c6e cl-keys) "...\n │ │ │ -00004740: c609 0826 0687 2220 5b63 6c2d 6b65 7973 ...&.." [cl-keys │ │ │ -00004750: 2063 6c2d 7072 6564 2063 6c2d 6c69 7374 cl-pred cl-list │ │ │ -00004760: 2061 7070 6c79 2063 6f75 6e74 206e 696c apply count nil │ │ │ -00004770: 203a 6966 5d20 3720 2823 2420 2e20 3138 :if] 7 (#$ . 18 │ │ │ -00004780: 3038 3529 5d29 0a23 4039 3920 436f 756e 085)]).#@99 Coun │ │ │ -00004790: 7420 7468 6520 6e75 6d62 6572 206f 6620 t the number of │ │ │ -000047a0: 6974 656d 7320 6e6f 7420 7361 7469 7366 items not satisf │ │ │ -000047b0: 7969 6e67 2050 5245 4449 4341 5445 2069 ying PREDICATE i │ │ │ -000047c0: 6e20 4c49 5354 2e0a 4b65 7977 6f72 6473 n LIST..Keywords │ │ │ -000047d0: 2073 7570 706f 7274 6564 3a20 203a 6b65 supported: :ke │ │ │ -000047e0: 7920 3a73 7461 7274 203a 656e 641f 0a28 y :start :end..( │ │ │ -000047f0: 6465 6661 6c69 6173 2027 636f 756e 742d defalias 'count- │ │ │ -00004800: 6966 2d6e 6f74 2023 5b28 636c 2d70 7265 if-not #[(cl-pre │ │ │ -00004810: 6420 636c 2d6c 6973 7420 2672 6573 7420 d cl-list &rest │ │ │ -00004820: 636c 2d6b 6579 7329 2022 c3c4 c55c 6ec6 cl-keys) "...\n. │ │ │ -00004830: 0908 2606 8722 205b 636c 2d6b 6579 7320 ..&.." [cl-keys │ │ │ -00004840: 636c 2d70 7265 6420 636c 2d6c 6973 7420 cl-pred cl-list │ │ │ -00004850: 6170 706c 7920 636f 756e 7420 6e69 6c20 apply count nil │ │ │ -00004860: 3a69 662d 6e6f 745d 2037 2028 2324 202e :if-not] 7 (#$ . │ │ │ -00004870: 2031 3833 3136 295d 290a 2340 3238 3620 18316)]).#@286 │ │ │ -00004880: 436f 6d70 6172 6520 5345 5131 2077 6974 Compare SEQ1 wit │ │ │ -00004890: 6820 5345 5132 2c20 7265 7475 726e 2069 h SEQ2, return i │ │ │ -000048a0: 6e64 6578 206f 6620 6669 7273 7420 6d69 ndex of first mi │ │ │ -000048b0: 736d 6174 6368 696e 6720 656c 656d 656e smatching elemen │ │ │ -000048c0: 742e 0a52 6574 7572 6e20 6e69 6c20 6966 t..Return nil if │ │ │ -000048d0: 2074 6865 2073 6571 7565 6e63 6573 206d the sequences m │ │ │ -000048e0: 6174 6368 2e20 2049 6620 6f6e 6520 7365 atch. If one se │ │ │ -000048f0: 7175 656e 6365 2069 7320 6120 7072 6566 quence is a pref │ │ │ -00004900: 6978 206f 6620 7468 650a 6f74 6865 722c ix of the.other, │ │ │ -00004910: 2074 6865 2072 6574 7572 6e20 7661 6c75 the return valu │ │ │ -00004920: 6520 696e 6469 6361 7465 7320 7468 6520 e indicates the │ │ │ -00004930: 656e 6420 6f66 2074 6865 2073 686f 7274 end of the short │ │ │ -00004940: 6564 2073 6571 7565 6e63 652e 0a4b 6579 ed sequence..Key │ │ │ -00004950: 776f 7264 7320 7375 7070 6f72 7465 643a words supported: │ │ │ -00004960: 2020 3a74 6573 7420 3a74 6573 742d 6e6f :test :test-no │ │ │ -00004970: 7420 3a6b 6579 203a 7374 6172 7431 203a t :key :start1 : │ │ │ -00004980: 656e 6431 203a 7374 6172 7432 203a 656e end1 :start2 :en │ │ │ -00004990: 6432 203a 6672 6f6d 2d65 6e64 1f0a 2864 d2 :from-end..(d │ │ │ -000049a0: 6566 616c 6961 7320 276d 6973 6d61 7463 efalias 'mismatc │ │ │ -000049b0: 6820 235b 2863 6c2d 7365 7131 2063 6c2d h #[(cl-seq1 cl- │ │ │ -000049c0: 7365 7132 2026 7265 7374 2063 6c2d 6b65 seq2 &rest cl-ke │ │ │ -000049d0: 7973 2920 22c6 0e17 7341 401e 18c7 0e17 ys) "...sA@..... │ │ │ -000049e0: 7341 40ad 8cc7 0e17 7341 4089 1618 ad81 sA@.....sA@..... │ │ │ -000049f0: c81e 1ac9 0e17 7341 401d ca0e 1773 4140 ......sA@....sA@ │ │ │ -00004a00: 1e1b cb0e 1773 4140 ae81 cc19 cd0e 1773 .....sA@.......s │ │ │ -00004a10: 4140 1ace 0e17 7341 40ae 81cc 1e16 cf0e A@....sA@....... │ │ │ -00004a20: 1773 4140 180e 1789 1e19 ab9f 0e19 40d0 .sA@..........@. │ │ │ -00004a30: 73ac 8fd1 0e17 7341 40ac 87d2 d30e 1940 s.....sA@......@ │ │ │ -00004a40: 5c22 880e 1941 4189 1619 ac61 295c 6eac \"...AA....a)\n. │ │ │ -00004a50: 830c 4712 08ac 840e 1447 100e 1b83 3501 ..G......G....5. │ │ │ -00004a60: 095c 6e57 8324 010e 1608 5783 2401 0e18 .\nW.$....W.$... │ │ │ -00004a70: aba9 0e18 0dab 880d 0c5c 6e53 9c21 aa84 .........\nS.!.. │ │ │ -00004a80: 0c5c 6e53 9c0d ab89 0d0e 1408 539c 21aa .\nS........S.!. │ │ │ -00004a90: 850e 1408 539c 5c22 3f0e 1a61 aad6 0dab ....S.\"?..a.... │ │ │ -00004aa0: 880d 0c5c 6e53 9c21 aa84 0c5c 6e53 9ca7 ...\nS.!...\nS.. │ │ │ -00004ab0: aba3 0dab 880d 0c5c 6e53 9c21 aa84 0c5c .......\nS.!...\ │ │ │ -00004ac0: 6e53 9c0d ab89 0d0e 1408 539c 21aa 850e nS........S.!... │ │ │ -00004ad0: 1408 539c 6baa a10d ab88 0d0c 5c6e 539c ..S.k.......\nS. │ │ │ -00004ae0: 21aa 840c 5c6e 539c 0dab 890d 0e14 0853 !...\nS........S │ │ │ -00004af0: 9c21 aa85 0e14 0853 9c61 ab89 5c6e 5312 .!.....S.a..\nS. │ │ │ -00004b00: 0853 1082 8900 095c 6e57 ac87 0e16 0857 .S.....\nW.....W │ │ │ -00004b10: 8562 025c 6e53 8262 020c 3cad 8309 0c9b .b.\nS.b..<..... │ │ │ -00004b20: 0e14 3cad 850e 160e 149b 1e15 1b09 5c6e ..<...........\n │ │ │ -00004b30: 5783 5502 0e16 0857 8355 020e 18ab c80e W.U....W.U...... │ │ │ -00004b40: 180d ab8e 0d0b ab84 0b40 aa83 0c09 4821 .........@....H! │ │ │ -00004b50: aa8a 0bab 840b 40aa 830c 0948 0dab 920d ......@....H.... │ │ │ -00004b60: 0e15 ab85 0e15 40aa 850e 140e 1648 21aa ......@......H!. │ │ │ -00004b70: 8e0e 15ab 850e 1540 aa85 0e14 0e16 485c .......@......H\ │ │ │ -00004b80: 223f 0e1a 6182 4002 0dab 8e0d 0bab 840b "?..a.@......... │ │ │ -00004b90: 40aa 830c 0948 21aa 8a0b ab84 0b40 aa83 @....H!......@.. │ │ │ -00004ba0: 0c09 48a7 abc1 0dab 8e0d 0bab 840b 40aa ..H...........@. │ │ │ -00004bb0: 830c 0948 21aa 8a0b ab84 0b40 aa83 0c09 ...H!......@.... │ │ │ -00004bc0: 480d ab92 0d0e 15ab 850e 1540 aa85 0e14 H..........@.... │ │ │ -00004bd0: 0e16 4821 aa8e 0e15 ab85 0e15 40aa 850e ..H!........@... │ │ │ -00004be0: 140e 1648 6baa bf0d ab8e 0d0b ab84 0b40 ...Hk..........@ │ │ │ -00004bf0: aa83 0c09 4821 aa8a 0bab 840b 40aa 830c ....H!......@... │ │ │ -00004c00: 0948 0dab 920d 0e15 ab85 0e15 40aa 850e .H..........@... │ │ │ -00004c10: 140e 1648 21aa 8e0e 15ab 850e 1540 aa85 ...H!........@.. │ │ │ -00004c20: 0e14 0e16 4861 ab93 0b41 130e 1541 1615 ....Ha...A...A.. │ │ │ -00004c30: 0954 110e 1654 1616 8249 0109 5c6e 57ac .T...T...I..\nW. │ │ │ -00004c40: 860e 1608 57ad 8109 2a2e 0887 2220 5b63 ....W...*..." [c │ │ │ -00004c50: 6c2d 656e 6432 2063 6c2d 7374 6172 7431 l-end2 cl-start1 │ │ │ -00004c60: 2063 6c2d 656e 6431 2063 6c2d 7031 2063 cl-end1 cl-p1 c │ │ │ -00004c70: 6c2d 7365 7131 2063 6c2d 6b65 7920 3a74 l-seq1 cl-key :t │ │ │ -00004c80: 6573 7420 3a74 6573 742d 6e6f 7420 7420 est :test-not t │ │ │ -00004c90: 3a6b 6579 203a 6672 6f6d 2d65 6e64 203a :key :from-end : │ │ │ -00004ca0: 7374 6172 7431 2030 203a 656e 6431 203a start1 0 :end1 : │ │ │ -00004cb0: 7374 6172 7432 203a 656e 6432 2028 3a74 start2 :end2 (:t │ │ │ -00004cc0: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ -00004cd0: 6579 203a 6672 6f6d 2d65 6e64 203a 7374 ey :from-end :st │ │ │ -00004ce0: 6172 7431 203a 656e 6431 203a 7374 6172 art1 :end1 :star │ │ │ -00004cf0: 7432 203a 656e 6432 2920 3a61 6c6c 6f77 t2 :end2) :allow │ │ │ -00004d00: 2d6f 7468 6572 2d6b 6579 7320 6572 726f -other-keys erro │ │ │ -00004d10: 7220 2242 6164 206b 6579 776f 7264 2061 r "Bad keyword a │ │ │ -00004d20: 7267 756d 656e 7420 2573 2220 636c 2d73 rgument %s" cl-s │ │ │ -00004d30: 6571 3220 636c 2d70 3220 636c 2d73 7461 eq2 cl-p2 cl-sta │ │ │ -00004d40: 7274 3220 636c 2d6b 6579 7320 636c 2d74 rt2 cl-keys cl-t │ │ │ -00004d50: 6573 7420 636c 2d6b 6579 732d 7465 6d70 est cl-keys-temp │ │ │ -00004d60: 2063 6c2d 7465 7374 2d6e 6f74 2063 6c2d cl-test-not cl- │ │ │ -00004d70: 6672 6f6d 2d65 6e64 5d20 3620 2823 2420 from-end] 6 (#$ │ │ │ -00004d80: 2e20 3138 3536 3029 5d29 0a23 4032 3236 . 18560)]).#@226 │ │ │ -00004d90: 2053 6561 7263 6820 666f 7220 5345 5131 Search for SEQ1 │ │ │ -00004da0: 2061 7320 6120 7375 6273 6571 7565 6e63 as a subsequenc │ │ │ -00004db0: 6520 6f66 2053 4551 322e 0a52 6574 7572 e of SEQ2..Retur │ │ │ -00004dc0: 6e20 7468 6520 696e 6465 7820 6f66 2074 n the index of t │ │ │ -00004dd0: 6865 206c 6566 746d 6f73 7420 656c 656d he leftmost elem │ │ │ -00004de0: 656e 7420 6f66 2074 6865 2066 6972 7374 ent of the first │ │ │ -00004df0: 206d 6174 6368 2066 6f75 6e64 3b0a 7265 match found;.re │ │ │ -00004e00: 7475 726e 206e 696c 2069 6620 7468 6572 turn nil if ther │ │ │ -00004e10: 6520 6172 6520 6e6f 206d 6174 6368 6573 e are no matches │ │ │ -00004e20: 2e0a 4b65 7977 6f72 6473 2073 7570 706f ..Keywords suppo │ │ │ -00004e30: 7274 6564 3a20 203a 7465 7374 203a 7465 rted: :test :te │ │ │ -00004e40: 7374 2d6e 6f74 203a 6b65 7920 3a73 7461 st-not :key :sta │ │ │ -00004e50: 7274 3120 3a65 6e64 3120 3a73 7461 7274 rt1 :end1 :start │ │ │ -00004e60: 3220 3a65 6e64 3220 3a66 726f 6d2d 656e 2 :end2 :from-en │ │ │ -00004e70: 641f 0a28 6465 6661 6c69 6173 2027 7365 d..(defalias 'se │ │ │ -00004e80: 6172 6368 2023 5b28 636c 2d73 6571 3120 arch #[(cl-seq1 │ │ │ -00004e90: 636c 2d73 6571 3220 2672 6573 7420 636c cl-seq2 &rest cl │ │ │ -00004ea0: 2d6b 6579 7329 2022 c60d 7341 401e 1ec7 -keys) "..sA@... │ │ │ -00004eb0: 0d73 4140 ad8b c70d 7341 4089 161e ad81 .sA@....sA@..... │ │ │ -00004ec0: c81e 20c9 0d73 4140 1e1b ca0d 7341 401e .. ..sA@....sA@. │ │ │ -00004ed0: 19cb 0d73 4140 ae81 cc1a cd0d 7341 4019 ...sA@......sA@. │ │ │ -00004ee0: ce0d 7341 40ae 81cc 18cf 0d73 4140 1c0d ..sA@......sA@.. │ │ │ -00004ef0: 891e 18ab 9e0e 1840 d073 ac8e d10d 7341 .......@.s....sA │ │ │ -00004f00: 40ac 87d2 d30e 1840 5c22 880e 1841 4189 @......@\"...AA. │ │ │ -00004f10: 1618 ac62 2909 ac84 0e1a 4711 0cac 840e ...b).....G..... │ │ │ -00004f20: 1c47 145c 6e09 59ab 8a0e 19ab 830c aae8 .G.\n.Y......... │ │ │ -00004f30: 08aa e509 5c6e 5a1e 1d0e 1bab 890e 1b0e ....\nZ......... │ │ │ -00004f40: 1a5c 6e9c 21aa 840e 1a5c 6e9c 1e1f d489 .\n.!....\n..... │ │ │ -00004f50: 1e21 1b0c 0e1d 535a 1408 0c57 abb6 d50e .!....SZ...W.... │ │ │ -00004f60: 1f0e 1c08 0c0e 1925 8913 aba8 d6d7 0e1a .......%........ │ │ │ -00004f70: 0e1c cb5c 6e54 cd09 ce0b 54cf 0b0e 1d5c ...\nT....T....\ │ │ │ -00004f80: 5cca d40d 260e ab8e 0e19 ab84 0b14 aa4b \...&..........K │ │ │ -00004f90: 0b54 8910 aa46 080c 57ad 810b 2c2e 0887 .T...F..W...,... │ │ │ -00004fa0: 2220 5b63 6c2d 7374 6172 7432 2063 6c2d " [cl-start2 cl- │ │ │ -00004fb0: 656e 6431 2063 6c2d 7374 6172 7431 2063 end1 cl-start1 c │ │ │ -00004fc0: 6c2d 706f 7320 636c 2d65 6e64 3220 636c l-pos cl-end2 cl │ │ │ -00004fd0: 2d6b 6579 7320 3a74 6573 7420 3a74 6573 -keys :test :tes │ │ │ -00004fe0: 742d 6e6f 7420 7420 3a6b 6579 203a 6672 t-not t :key :fr │ │ │ -00004ff0: 6f6d 2d65 6e64 203a 7374 6172 7431 2030 om-end :start1 0 │ │ │ -00005000: 203a 656e 6431 203a 7374 6172 7432 203a :end1 :start2 : │ │ │ -00005010: 656e 6432 2028 3a74 6573 7420 3a74 6573 end2 (:test :tes │ │ │ -00005020: 742d 6e6f 7420 3a6b 6579 203a 6672 6f6d t-not :key :from │ │ │ -00005030: 2d65 6e64 203a 7374 6172 7431 203a 656e -end :start1 :en │ │ │ -00005040: 6431 203a 7374 6172 7432 203a 656e 6432 d1 :start2 :end2 │ │ │ -00005050: 2920 3a61 6c6c 6f77 2d6f 7468 6572 2d6b ) :allow-other-k │ │ │ -00005060: 6579 7320 6572 726f 7220 2242 6164 206b eys error "Bad k │ │ │ -00005070: 6579 776f 7264 2061 7267 756d 656e 7420 eyword argument │ │ │ -00005080: 2573 2220 6e69 6c20 636c 2d70 6f73 6974 %s" nil cl-posit │ │ │ -00005090: 696f 6e20 6170 706c 7920 6d69 736d 6174 ion apply mismat │ │ │ -000050a0: 6368 2063 6c2d 6b65 7973 2d74 656d 7020 ch cl-keys-temp │ │ │ -000050b0: 636c 2d66 726f 6d2d 656e 6420 636c 2d73 cl-from-end cl-s │ │ │ -000050c0: 6571 3120 636c 2d6b 6579 2063 6c2d 7365 eq1 cl-key cl-se │ │ │ -000050d0: 7132 2063 6c2d 6c65 6e20 636c 2d74 6573 q2 cl-len cl-tes │ │ │ -000050e0: 7420 636c 2d66 6972 7374 2063 6c2d 7465 t cl-first cl-te │ │ │ -000050f0: 7374 2d6e 6f74 2063 6c2d 6966 5d20 3136 st-not cl-if] 16 │ │ │ -00005100: 2028 2324 202e 2031 3938 3537 295d 290a (#$ . 19857)]). │ │ │ -00005110: 2340 3135 3720 536f 7274 2074 6865 2061 #@157 Sort the a │ │ │ -00005120: 7267 756d 656e 7420 5345 5155 454e 4345 rgument SEQUENCE │ │ │ -00005130: 2061 6363 6f72 6469 6e67 2074 6f20 5052 according to PR │ │ │ -00005140: 4544 4943 4154 452e 0a54 6869 7320 6973 EDICATE..This is │ │ │ -00005150: 2061 2064 6573 7472 7563 7469 7665 2066 a destructive f │ │ │ -00005160: 756e 6374 696f 6e3b 2069 7420 7265 7573 unction; it reus │ │ │ -00005170: 6573 2074 6865 2073 746f 7261 6765 206f es the storage o │ │ │ -00005180: 6620 5345 5155 454e 4345 2069 6620 706f f SEQUENCE if po │ │ │ -00005190: 7373 6962 6c65 2e0a 4b65 7977 6f72 6473 ssible..Keywords │ │ │ -000051a0: 2073 7570 706f 7274 6564 3a20 203a 6b65 supported: :ke │ │ │ -000051b0: 791f 0a28 6465 6661 6c69 6173 2027 736f y..(defalias 'so │ │ │ -000051c0: 7274 2a20 235b 2863 6c2d 7365 7120 636c rt* #[(cl-seq cl │ │ │ -000051d0: 2d70 7265 6420 2672 6573 7420 636c 2d6b -pred &rest cl-k │ │ │ -000051e0: 6579 7329 2022 0c3c ac8d c50c c6c7 c80c eys) ".<........ │ │ │ -000051f0: c95c 2209 5c6e 245c 2287 ca5c 6e73 4140 .\".\n$\"..\nsA@ │ │ │ -00005200: 185c 6e89 1bab 9a0b 40cb 73ac 8dcc 5c6e .\n.....@.s...\n │ │ │ -00005210: 7341 40ac 86cd ce0b 405c 2288 0b41 4189 sA@.....@\"..AA. │ │ │ -00005220: 13ac 6629 08cf 73ab 86d0 0c09 5c22 aa84 ..f)..s.....\".. │ │ │ -00005230: d00c d15c 2229 8722 205b 636c 2d6b 6579 ...\")." [cl-key │ │ │ -00005240: 2063 6c2d 7072 6564 2063 6c2d 6b65 7973 cl-pred cl-keys │ │ │ -00005250: 2063 6c2d 6b65 7973 2d74 656d 7020 636c cl-keys-temp cl │ │ │ -00005260: 2d73 6571 2072 6570 6c61 6365 2061 7070 -seq replace app │ │ │ -00005270: 6c79 2073 6f72 742a 2061 7070 656e 6420 ly sort* append │ │ │ -00005280: 6e69 6c20 3a6b 6579 2028 3a6b 6579 2920 nil :key (:key) │ │ │ -00005290: 3a61 6c6c 6f77 2d6f 7468 6572 2d6b 6579 :allow-other-key │ │ │ -000052a0: 7320 6572 726f 7220 2242 6164 206b 6579 s error "Bad key │ │ │ -000052b0: 776f 7264 2061 7267 756d 656e 7420 2573 word argument %s │ │ │ -000052c0: 2220 286e 696c 2069 6465 6e74 6974 7929 " (nil identity) │ │ │ -000052d0: 2073 6f72 7420 235b 2863 6c2d 7820 636c sort #[(cl-x cl │ │ │ -000052e0: 2d79 2920 225c 6e0b 0921 0b08 215c 2287 -y) "\n..!..!\". │ │ │ -000052f0: 2220 5b63 6c2d 7920 636c 2d78 2063 6c2d " [cl-y cl-x cl- │ │ │ -00005300: 7072 6564 2063 6c2d 6b65 795d 2034 5d5d pred cl-key] 4]] │ │ │ -00005310: 2038 2028 2324 202e 2032 3037 3538 295d 8 (#$ . 20758)] │ │ │ -00005320: 290a 2340 3136 3420 536f 7274 2074 6865 ).#@164 Sort the │ │ │ -00005330: 2061 7267 756d 656e 7420 5345 5155 454e argument SEQUEN │ │ │ -00005340: 4345 2073 7461 626c 7920 6163 636f 7264 CE stably accord │ │ │ -00005350: 696e 6720 746f 2050 5245 4449 4341 5445 ing to PREDICATE │ │ │ -00005360: 2e0a 5468 6973 2069 7320 6120 6465 7374 ..This is a dest │ │ │ -00005370: 7275 6374 6976 6520 6675 6e63 7469 6f6e ructive function │ │ │ -00005380: 3b20 6974 2072 6575 7365 7320 7468 6520 ; it reuses the │ │ │ -00005390: 7374 6f72 6167 6520 6f66 2053 4551 5545 storage of SEQUE │ │ │ -000053a0: 4e43 4520 6966 2070 6f73 7369 626c 652e NCE if possible. │ │ │ -000053b0: 0a4b 6579 776f 7264 7320 7375 7070 6f72 .Keywords suppor │ │ │ -000053c0: 7465 643a 2020 3a6b 6579 1f0a 2864 6566 ted: :key..(def │ │ │ -000053d0: 616c 6961 7320 2773 7461 626c 652d 736f alias 'stable-so │ │ │ -000053e0: 7274 2023 5b28 636c 2d73 6571 2063 6c2d rt #[(cl-seq cl- │ │ │ -000053f0: 7072 6564 2026 7265 7374 2063 6c2d 6b65 pred &rest cl-ke │ │ │ -00005400: 7973 2920 22c3 c45c 6e09 0824 8722 205b ys) "..\n..$." [ │ │ │ -00005410: 636c 2d6b 6579 7320 636c 2d70 7265 6420 cl-keys cl-pred │ │ │ -00005420: 636c 2d73 6571 2061 7070 6c79 2073 6f72 cl-seq apply sor │ │ │ -00005430: 742a 5d20 3520 2823 2420 2e20 3231 3238 t*] 5 (#$ . 2128 │ │ │ -00005440: 3829 5d29 0a23 4032 3238 2044 6573 7472 8)]).#@228 Destr │ │ │ -00005450: 7563 7469 7665 6c79 206d 6572 6765 2074 uctively merge t │ │ │ -00005460: 6865 2074 776f 2073 6571 7565 6e63 6573 he two sequences │ │ │ -00005470: 2074 6f20 7072 6f64 7563 6520 6120 6e65 to produce a ne │ │ │ -00005480: 7720 7365 7175 656e 6365 2e0a 5459 5045 w sequence..TYPE │ │ │ -00005490: 2069 7320 7468 6520 7365 7175 656e 6365 is the sequence │ │ │ -000054a0: 2074 7970 6520 746f 2072 6574 7572 6e2c type to return, │ │ │ -000054b0: 2053 4551 3120 616e 6420 5345 5132 2061 SEQ1 and SEQ2 a │ │ │ -000054c0: 7265 2074 6865 2074 776f 0a61 7267 756d re the two.argum │ │ │ -000054d0: 656e 7420 7365 7175 656e 6365 732c 2061 ent sequences, a │ │ │ -000054e0: 6e64 2050 5245 4420 6973 2061 2060 6c65 nd PRED is a `le │ │ │ -000054f0: 7373 2d74 6861 6e27 2070 7265 6469 6361 ss-than' predica │ │ │ -00005500: 7465 206f 6e20 7468 6520 656c 656d 656e te on the elemen │ │ │ -00005510: 7473 2e0a 4b65 7977 6f72 6473 2073 7570 ts..Keywords sup │ │ │ -00005520: 706f 7274 6564 3a20 203a 6b65 791f 0a28 ported: :key..( │ │ │ -00005530: 6465 6661 6c69 6173 2027 6d65 7267 6520 defalias 'merge │ │ │ -00005540: 235b 2863 6c2d 7479 7065 2063 6c2d 7365 #[(cl-type cl-se │ │ │ -00005550: 7131 2063 6c2d 7365 7132 2063 6c2d 7072 q1 cl-seq2 cl-pr │ │ │ -00005560: 6564 2026 7265 7374 2063 6c2d 6b65 7973 ed &rest cl-keys │ │ │ -00005570: 2920 220d 3cac 85c6 0dc7 5c22 150c 3cac ) ".<.....\"..<. │ │ │ -00005580: 85c6 0cc7 5c22 14c8 0873 4140 1a08 8919 ....\"...sA@.... │ │ │ -00005590: ab9a 0940 c973 ac8d ca08 7341 40ac 86cb ...@.s....sA@... │ │ │ -000055a0: cc09 405c 2288 0941 4189 11ac 6629 c71b ..@\"..AA...f).. │ │ │ -000055b0: 0dab b20c abaf 0e0e 5c6e ab86 5c6e 0c40 ........\n..\n.@ │ │ │ -000055c0: 21aa 820c 405c 6eab 865c 6e0d 4021 aa82 !...@\n..\n.@!.. │ │ │ -000055d0: 0d40 5c22 ab8a 0c89 4114 400b 4213 aa55 .@\"....A.@.B..U │ │ │ -000055e0: 0d89 4115 400b 4213 aa4b cd0b 9f0d a40c ..A.@.B..K...... │ │ │ -000055f0: a40e 0f5c 222a 8722 205b 636c 2d6b 6579 ...\"*." [cl-key │ │ │ -00005600: 7320 636c 2d6b 6579 732d 7465 6d70 2063 s cl-keys-temp c │ │ │ -00005610: 6c2d 6b65 7920 636c 2d72 6573 2063 6c2d l-key cl-res cl- │ │ │ -00005620: 7365 7132 2063 6c2d 7365 7131 2061 7070 seq2 cl-seq1 app │ │ │ -00005630: 656e 6420 6e69 6c20 3a6b 6579 2028 3a6b end nil :key (:k │ │ │ -00005640: 6579 2920 3a61 6c6c 6f77 2d6f 7468 6572 ey) :allow-other │ │ │ -00005650: 2d6b 6579 7320 6572 726f 7220 2242 6164 -keys error "Bad │ │ │ -00005660: 206b 6579 776f 7264 2061 7267 756d 656e keyword argumen │ │ │ -00005670: 7420 2573 2220 636f 6572 6365 2063 6c2d t %s" coerce cl- │ │ │ -00005680: 7072 6564 2063 6c2d 7479 7065 5d20 3520 pred cl-type] 5 │ │ │ -00005690: 2823 2420 2e20 3231 3537 3929 5d29 0a23 (#$ . 21579)]).# │ │ │ -000056a0: 4031 3332 2046 696e 6420 7468 6520 6669 @132 Find the fi │ │ │ -000056b0: 7273 7420 6f63 6375 7272 656e 6365 206f rst occurrence o │ │ │ -000056c0: 6620 4954 454d 2069 6e20 4c49 5354 2e0a f ITEM in LIST.. │ │ │ -000056d0: 5265 7475 726e 2074 6865 2073 7562 6c69 Return the subli │ │ │ -000056e0: 7374 206f 6620 4c49 5354 2077 686f 7365 st of LIST whose │ │ │ -000056f0: 2063 6172 2069 7320 4954 454d 2e0a 4b65 car is ITEM..Ke │ │ │ -00005700: 7977 6f72 6473 2073 7570 706f 7274 6564 ywords supported │ │ │ -00005710: 3a20 203a 7465 7374 203a 7465 7374 2d6e : :test :test-n │ │ │ -00005720: 6f74 203a 6b65 791f 0a28 6465 6661 6c69 ot :key..(defali │ │ │ -00005730: 6173 2027 6d65 6d62 6572 2a20 235b 2863 as 'member* #[(c │ │ │ -00005740: 6c2d 6974 656d 2063 6c2d 6c69 7374 2026 l-item cl-list & │ │ │ -00005750: 7265 7374 2063 6c2d 6b65 7973 2920 220c rest cl-keys) ". │ │ │ -00005760: 83bb 00c6 0c73 4140 18c7 0c73 4140 ad8a .....sA@...sA@.. │ │ │ -00005770: c70c 7341 4089 10ad 81c8 1e11 c90c 7341 ..sA@.........sA │ │ │ -00005780: 401b ca0c 7341 401e 10cb 0c73 4140 ad8b @...sA@....sA@.. │ │ │ -00005790: cb0c 7341 4089 1610 ad81 c81e 120c 8919 ..sA@........... │ │ │ -000057a0: ab9a 0940 cc73 ac8d cd0c 7341 40ac 86ce ...@.s....sA@... │ │ │ -000057b0: cf09 405c 2288 0941 4189 11ac 6629 0dab ..@\"..AA...f).. │ │ │ -000057c0: d708 ab94 085c 6e0b ab86 0b0d 4021 aa82 .....\n.....@!.. │ │ │ -000057d0: 0d40 5c22 3f0e 1161 aab8 0e10 ab94 0e10 .@\"?..a........ │ │ │ -000057e0: 0bab 860b 0d40 21aa 820d 4021 3f0e 1261 .....@!...@!?..a │ │ │ -000057f0: aaa0 5c6e a7ab 8f5c 6e0b ab86 0b0d 4021 ..\n...\n.....@! │ │ │ -00005800: aa82 0d40 6baa 8d5c 6e0b ab86 0b0d 4021 ...@k..\n.....@! │ │ │ -00005810: aa82 0d40 61ac 860d 4189 15ac 290d 2d87 ...@a...A...).-. │ │ │ -00005820: 5c6e a7ab 885c 6ea8 ac84 5c6e 0db6 875c \n...\n...\n...\ │ │ │ -00005830: 6e0d 7387 2220 5b63 6c2d 7465 7374 2063 n.s." [cl-test c │ │ │ -00005840: 6c2d 6b65 7973 2d74 656d 7020 636c 2d69 l-keys-temp cl-i │ │ │ -00005850: 7465 6d20 636c 2d6b 6579 2063 6c2d 6b65 tem cl-key cl-ke │ │ │ -00005860: 7973 2063 6c2d 6c69 7374 203a 7465 7374 ys cl-list :test │ │ │ -00005870: 203a 7465 7374 2d6e 6f74 2074 203a 6b65 :test-not t :ke │ │ │ -00005880: 7920 3a69 6620 3a69 662d 6e6f 7420 283a y :if :if-not (: │ │ │ -00005890: 7465 7374 203a 7465 7374 2d6e 6f74 203a test :test-not : │ │ │ -000058a0: 6b65 7920 3a69 6620 3a69 662d 6e6f 7429 key :if :if-not) │ │ │ -000058b0: 203a 616c 6c6f 772d 6f74 6865 722d 6b65 :allow-other-ke │ │ │ -000058c0: 7973 2065 7272 6f72 2022 4261 6420 6b65 ys error "Bad ke │ │ │ -000058d0: 7977 6f72 6420 6172 6775 6d65 6e74 2025 yword argument % │ │ │ -000058e0: 7322 2063 6c2d 6966 2063 6c2d 7465 7374 s" cl-if cl-test │ │ │ -000058f0: 2d6e 6f74 2063 6c2d 6966 2d6e 6f74 5d20 -not cl-if-not] │ │ │ -00005900: 3520 2823 2420 2e20 3232 3138 3129 5d29 5 (#$ . 22181)]) │ │ │ -00005910: 0a23 4031 3233 2046 696e 6420 7468 6520 .#@123 Find the │ │ │ -00005920: 6669 7273 7420 6974 656d 2073 6174 6973 first item satis │ │ │ -00005930: 6679 696e 6720 5052 4544 4943 4154 4520 fying PREDICATE │ │ │ -00005940: 696e 204c 4953 542e 0a52 6574 7572 6e20 in LIST..Return │ │ │ -00005950: 7468 6520 7375 626c 6973 7420 6f66 204c the sublist of L │ │ │ -00005960: 4953 5420 7768 6f73 6520 6361 7220 6d61 IST whose car ma │ │ │ -00005970: 7463 6865 732e 0a4b 6579 776f 7264 7320 tches..Keywords │ │ │ -00005980: 7375 7070 6f72 7465 643a 2020 3a6b 6579 supported: :key │ │ │ -00005990: 1f0a 2864 6566 616c 6961 7320 276d 656d ..(defalias 'mem │ │ │ -000059a0: 6265 722d 6966 2023 5b28 636c 2d70 7265 ber-if #[(cl-pre │ │ │ -000059b0: 6420 636c 2d6c 6973 7420 2672 6573 7420 d cl-list &rest │ │ │ -000059c0: 636c 2d6b 6579 7329 2022 c3c4 c55c 6ec6 cl-keys) "...\n. │ │ │ -000059d0: 0908 2606 8722 205b 636c 2d6b 6579 7320 ..&.." [cl-keys │ │ │ -000059e0: 636c 2d70 7265 6420 636c 2d6c 6973 7420 cl-pred cl-list │ │ │ -000059f0: 6170 706c 7920 6d65 6d62 6572 2a20 6e69 apply member* ni │ │ │ -00005a00: 6c20 3a69 665d 2037 2028 2324 202e 2032 l :if] 7 (#$ . 2 │ │ │ -00005a10: 3238 3037 295d 290a 2340 3132 3720 4669 2807)]).#@127 Fi │ │ │ -00005a20: 6e64 2074 6865 2066 6972 7374 2069 7465 nd the first ite │ │ │ -00005a30: 6d20 6e6f 7420 7361 7469 7366 7969 6e67 m not satisfying │ │ │ -00005a40: 2050 5245 4449 4341 5445 2069 6e20 4c49 PREDICATE in LI │ │ │ -00005a50: 5354 2e0a 5265 7475 726e 2074 6865 2073 ST..Return the s │ │ │ -00005a60: 7562 6c69 7374 206f 6620 4c49 5354 2077 ublist of LIST w │ │ │ -00005a70: 686f 7365 2063 6172 206d 6174 6368 6573 hose car matches │ │ │ -00005a80: 2e0a 4b65 7977 6f72 6473 2073 7570 706f ..Keywords suppo │ │ │ -00005a90: 7274 6564 3a20 203a 6b65 791f 0a28 6465 rted: :key..(de │ │ │ -00005aa0: 6661 6c69 6173 2027 6d65 6d62 6572 2d69 falias 'member-i │ │ │ -00005ab0: 662d 6e6f 7420 235b 2863 6c2d 7072 6564 f-not #[(cl-pred │ │ │ -00005ac0: 2063 6c2d 6c69 7374 2026 7265 7374 2063 cl-list &rest c │ │ │ -00005ad0: 6c2d 6b65 7973 2920 22c3 c4c5 5c6e c609 l-keys) "...\n.. │ │ │ -00005ae0: 0826 0687 2220 5b63 6c2d 6b65 7973 2063 .&.." [cl-keys c │ │ │ -00005af0: 6c2d 7072 6564 2063 6c2d 6c69 7374 2061 l-pred cl-list a │ │ │ -00005b00: 7070 6c79 206d 656d 6265 722a 206e 696c pply member* nil │ │ │ -00005b10: 203a 6966 2d6e 6f74 5d20 3720 2823 2420 :if-not] 7 (#$ │ │ │ -00005b20: 2e20 3233 3037 3029 5d29 0a28 6465 6661 . 23070)]).(defa │ │ │ -00005b30: 6c69 6173 2027 636c 2d61 646a 6f69 6e20 lias 'cl-adjoin │ │ │ -00005b40: 235b 2863 6c2d 6974 656d 2063 6c2d 6c69 #[(cl-item cl-li │ │ │ -00005b50: 7374 2026 7265 7374 2063 6c2d 6b65 7973 st &rest cl-keys │ │ │ -00005b60: 2920 22c4 0873 4140 1bc5 c60b ab85 0b5c ) "..sA@.......\ │ │ │ -00005b70: 6e21 aa81 5c6e 0908 2429 ab82 0987 5c6e n!..\n..$)....\n │ │ │ -00005b80: 0942 8722 205b 636c 2d6b 6579 7320 636c .B." [cl-keys cl │ │ │ -00005b90: 2d6c 6973 7420 636c 2d69 7465 6d20 636c -list cl-item cl │ │ │ -00005ba0: 2d6b 6579 203a 6b65 7920 6170 706c 7920 -key :key apply │ │ │ -00005bb0: 6d65 6d62 6572 2a5d 2035 5d29 0a23 4039 member*] 5]).#@9 │ │ │ -00005bc0: 3520 4669 6e64 2074 6865 2066 6972 7374 5 Find the first │ │ │ -00005bd0: 2069 7465 6d20 7768 6f73 6520 6361 7220 item whose car │ │ │ -00005be0: 6d61 7463 6865 7320 4954 454d 2069 6e20 matches ITEM in │ │ │ -00005bf0: 4c49 5354 2e0a 4b65 7977 6f72 6473 2073 LIST..Keywords s │ │ │ -00005c00: 7570 706f 7274 6564 3a20 203a 7465 7374 upported: :test │ │ │ -00005c10: 203a 7465 7374 2d6e 6f74 203a 6b65 791f :test-not :key. │ │ │ -00005c20: 0a28 6465 6661 6c69 6173 2027 6173 736f .(defalias 'asso │ │ │ -00005c30: 632a 2023 5b28 636c 2d69 7465 6d20 636c c* #[(cl-item cl │ │ │ -00005c40: 2d61 6c69 7374 2026 7265 7374 2063 6c2d -alist &rest cl- │ │ │ -00005c50: 6b65 7973 2920 220c 83cc 00c6 0c73 4140 keys) "......sA@ │ │ │ -00005c60: 18c7 0c73 4140 ad8a c70c 7341 4089 10ad ...sA@....sA@... │ │ │ -00005c70: 81c8 1e12 c90c 7341 401b ca0c 7341 401e ......sA@...sA@. │ │ │ -00005c80: 11cb 0c73 4140 ad8b cb0c 7341 4089 1611 ...sA@....sA@... │ │ │ -00005c90: ad81 c81e 130c 8919 ab9a 0940 cc73 ac8d ...........@.s.. │ │ │ -00005ca0: cd0c 7341 40ac 86ce cf09 405c 2288 0941 ..sA@.....@\"..A │ │ │ -00005cb0: 4189 11ac 6629 0dab e40d 403a abd9 08ab A...f)....@:.... │ │ │ -00005cc0: 9608 5c6e 0bab 870b 0d40 4021 aa83 0d40 ..\n.....@@!...@ │ │ │ -00005cd0: 405c 223f 0e12 61aa be0e 11ab 960e 110b @\"?..a......... │ │ │ -00005ce0: ab87 0b0d 4040 21aa 830d 4040 213f 0e13 ....@@!...@@!?.. │ │ │ -00005cf0: 61aa a45c 6ea7 ab91 5c6e 0bab 870b 0d40 a..\n...\n.....@ │ │ │ -00005d00: 4021 aa83 0d40 406b aa8f 5c6e 0bab 870b @!...@@k..\n.... │ │ │ -00005d10: 0d40 4021 aa83 0d40 4061 ac86 0d41 8915 .@@!...@@a...A.. │ │ │ -00005d20: ac1c 0dad 820d 402d 875c 6ea7 ab89 5c6e ......@-.\n...\n │ │ │ -00005d30: a8ac 85d0 5c6e 0d5c 2287 5c6e 0db7 8722 ....\n.\".\n..." │ │ │ -00005d40: 205b 636c 2d74 6573 7420 636c 2d6b 6579 [cl-test cl-key │ │ │ -00005d50: 732d 7465 6d70 2063 6c2d 6974 656d 2063 s-temp cl-item c │ │ │ -00005d60: 6c2d 6b65 7920 636c 2d6b 6579 7320 636c l-key cl-keys cl │ │ │ -00005d70: 2d61 6c69 7374 203a 7465 7374 203a 7465 -alist :test :te │ │ │ -00005d80: 7374 2d6e 6f74 2074 203a 6b65 7920 3a69 st-not t :key :i │ │ │ -00005d90: 6620 3a69 662d 6e6f 7420 283a 7465 7374 f :if-not (:test │ │ │ -00005da0: 203a 7465 7374 2d6e 6f74 203a 6b65 7920 :test-not :key │ │ │ -00005db0: 3a69 6620 3a69 662d 6e6f 7429 203a 616c :if :if-not) :al │ │ │ -00005dc0: 6c6f 772d 6f74 6865 722d 6b65 7973 2065 low-other-keys e │ │ │ -00005dd0: 7272 6f72 2022 4261 6420 6b65 7977 6f72 rror "Bad keywor │ │ │ -00005de0: 6420 6172 6775 6d65 6e74 2025 7322 2061 d argument %s" a │ │ │ -00005df0: 7373 6f63 2063 6c2d 6966 2063 6c2d 7465 ssoc cl-if cl-te │ │ │ -00005e00: 7374 2d6e 6f74 2063 6c2d 6966 2d6e 6f74 st-not cl-if-not │ │ │ -00005e10: 5d20 3520 2823 2420 2e20 3233 3439 3029 ] 5 (#$ . 23490) │ │ │ -00005e20: 5d29 0a23 4038 3620 4669 6e64 2074 6865 ]).#@86 Find the │ │ │ -00005e30: 2066 6972 7374 2069 7465 6d20 7768 6f73 first item whos │ │ │ -00005e40: 6520 6361 7220 7361 7469 7366 6965 7320 e car satisfies │ │ │ -00005e50: 5052 4544 4943 4154 4520 696e 204c 4953 PREDICATE in LIS │ │ │ -00005e60: 542e 0a4b 6579 776f 7264 7320 7375 7070 T..Keywords supp │ │ │ -00005e70: 6f72 7465 643a 2020 3a6b 6579 1f0a 2864 orted: :key..(d │ │ │ -00005e80: 6566 616c 6961 7320 2761 7373 6f63 2d69 efalias 'assoc-i │ │ │ -00005e90: 6620 235b 2863 6c2d 7072 6564 2063 6c2d f #[(cl-pred cl- │ │ │ -00005ea0: 6c69 7374 2026 7265 7374 2063 6c2d 6b65 list &rest cl-ke │ │ │ -00005eb0: 7973 2920 22c3 c4c5 5c6e c609 0826 0687 ys) "...\n...&.. │ │ │ -00005ec0: 2220 5b63 6c2d 6b65 7973 2063 6c2d 7072 " [cl-keys cl-pr │ │ │ -00005ed0: 6564 2063 6c2d 6c69 7374 2061 7070 6c79 ed cl-list apply │ │ │ -00005ee0: 2061 7373 6f63 2a20 6e69 6c20 3a69 665d assoc* nil :if] │ │ │ -00005ef0: 2037 2028 2324 202e 2032 3431 3034 295d 7 (#$ . 24104)] │ │ │ -00005f00: 290a 2340 3933 2046 696e 6420 7468 6520 ).#@93 Find the │ │ │ -00005f10: 6669 7273 7420 6974 656d 2077 686f 7365 first item whose │ │ │ -00005f20: 2063 6172 2064 6f65 7320 6e6f 7420 7361 car does not sa │ │ │ -00005f30: 7469 7366 7920 5052 4544 4943 4154 4520 tisfy PREDICATE │ │ │ -00005f40: 696e 204c 4953 542e 0a4b 6579 776f 7264 in LIST..Keyword │ │ │ -00005f50: 7320 7375 7070 6f72 7465 643a 2020 3a6b s supported: :k │ │ │ -00005f60: 6579 1f0a 2864 6566 616c 6961 7320 2761 ey..(defalias 'a │ │ │ -00005f70: 7373 6f63 2d69 662d 6e6f 7420 235b 2863 ssoc-if-not #[(c │ │ │ -00005f80: 6c2d 7072 6564 2063 6c2d 6c69 7374 2026 l-pred cl-list & │ │ │ -00005f90: 7265 7374 2063 6c2d 6b65 7973 2920 22c3 rest cl-keys) ". │ │ │ -00005fa0: c4c5 5c6e c609 0826 0687 2220 5b63 6c2d ..\n...&.." [cl- │ │ │ -00005fb0: 6b65 7973 2063 6c2d 7072 6564 2063 6c2d keys cl-pred cl- │ │ │ -00005fc0: 6c69 7374 2061 7070 6c79 2061 7373 6f63 list apply assoc │ │ │ -00005fd0: 2a20 6e69 6c20 3a69 662d 6e6f 745d 2037 * nil :if-not] 7 │ │ │ -00005fe0: 2028 2324 202e 2032 3433 3237 295d 290a (#$ . 24327)]). │ │ │ -00005ff0: 2340 3935 2046 696e 6420 7468 6520 6669 #@95 Find the fi │ │ │ -00006000: 7273 7420 6974 656d 2077 686f 7365 2063 rst item whose c │ │ │ -00006010: 6472 206d 6174 6368 6573 2049 5445 4d20 dr matches ITEM │ │ │ -00006020: 696e 204c 4953 542e 0a4b 6579 776f 7264 in LIST..Keyword │ │ │ -00006030: 7320 7375 7070 6f72 7465 643a 2020 3a74 s supported: :t │ │ │ -00006040: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ -00006050: 6579 1f0a 2864 6566 616c 6961 7320 2772 ey..(defalias 'r │ │ │ -00006060: 6173 736f 632a 2023 5b28 636c 2d69 7465 assoc* #[(cl-ite │ │ │ -00006070: 6d20 636c 2d61 6c69 7374 2026 7265 7374 m cl-alist &rest │ │ │ -00006080: 2063 6c2d 6b65 7973 2920 220c ac85 5c6e cl-keys) "...\n │ │ │ -00006090: a783 d000 c60c 7341 4018 c70c 7341 40ad ......sA@...sA@. │ │ │ -000060a0: 8ac7 0c73 4140 8910 ad81 c81e 12c9 0c73 ...sA@.........s │ │ │ -000060b0: 4140 1bca 0c73 4140 1e11 cb0c 7341 40ad A@...sA@....sA@. │ │ │ -000060c0: 8bcb 0c73 4140 8916 11ad 81c8 1e13 0c89 ...sA@.......... │ │ │ -000060d0: 19ab 9a09 40cc 73ac 8dcd 0c73 4140 ac86 ....@.s....sA@.. │ │ │ -000060e0: cecf 0940 5c22 8809 4141 8911 ac66 290d ...@\"..AA...f). │ │ │ -000060f0: abe4 0d40 3aab d908 ab96 085c 6e0b ab87 ...@:......\n... │ │ │ -00006100: 0b0d 4041 21aa 830d 4041 5c22 3f0e 1261 ..@A!...@A\"?..a │ │ │ -00006110: aabe 0e11 ab96 0e11 0bab 870b 0d40 4121 .............@A! │ │ │ -00006120: aa83 0d40 4121 3f0e 1361 aaa4 5c6e a7ab ...@A!?..a..\n.. │ │ │ -00006130: 915c 6e0b ab87 0b0d 4041 21aa 830d 4041 .\n.....@A!...@A │ │ │ -00006140: 6baa 8f5c 6e0b ab87 0b0d 4041 21aa 830d k..\n.....@A!... │ │ │ -00006150: 4041 61ac 860d 4189 15ac 1c0d ad82 0d40 @Aa...A........@ │ │ │ -00006160: 2d87 d05c 6e0d 5c22 8722 205b 636c 2d74 -..\n.\"." [cl-t │ │ │ -00006170: 6573 7420 636c 2d6b 6579 732d 7465 6d70 est cl-keys-temp │ │ │ -00006180: 2063 6c2d 6974 656d 2063 6c2d 6b65 7920 cl-item cl-key │ │ │ -00006190: 636c 2d6b 6579 7320 636c 2d61 6c69 7374 cl-keys cl-alist │ │ │ -000061a0: 203a 7465 7374 203a 7465 7374 2d6e 6f74 :test :test-not │ │ │ -000061b0: 2074 203a 6b65 7920 3a69 6620 3a69 662d t :key :if :if- │ │ │ -000061c0: 6e6f 7420 283a 7465 7374 203a 7465 7374 not (:test :test │ │ │ -000061d0: 2d6e 6f74 203a 6b65 7920 3a69 6620 3a69 -not :key :if :i │ │ │ -000061e0: 662d 6e6f 7429 203a 616c 6c6f 772d 6f74 f-not) :allow-ot │ │ │ -000061f0: 6865 722d 6b65 7973 2065 7272 6f72 2022 her-keys error " │ │ │ -00006200: 4261 6420 6b65 7977 6f72 6420 6172 6775 Bad keyword argu │ │ │ -00006210: 6d65 6e74 2025 7322 2072 6173 7371 2063 ment %s" rassq c │ │ │ -00006220: 6c2d 6966 2063 6c2d 7465 7374 2d6e 6f74 l-if cl-test-not │ │ │ -00006230: 2063 6c2d 6966 2d6e 6f74 5d20 3520 2823 cl-if-not] 5 (# │ │ │ -00006240: 2420 2e20 3234 3536 3529 5d29 0a23 4038 $ . 24565)]).#@8 │ │ │ -00006250: 3620 4669 6e64 2074 6865 2066 6972 7374 6 Find the first │ │ │ -00006260: 2069 7465 6d20 7768 6f73 6520 6364 7220 item whose cdr │ │ │ -00006270: 7361 7469 7366 6965 7320 5052 4544 4943 satisfies PREDIC │ │ │ -00006280: 4154 4520 696e 204c 4953 542e 0a4b 6579 ATE in LIST..Key │ │ │ -00006290: 776f 7264 7320 7375 7070 6f72 7465 643a words supported: │ │ │ -000062a0: 2020 3a6b 6579 1f0a 2864 6566 616c 6961 :key..(defalia │ │ │ -000062b0: 7320 2772 6173 736f 632d 6966 2023 5b28 s 'rassoc-if #[( │ │ │ -000062c0: 636c 2d70 7265 6420 636c 2d6c 6973 7420 cl-pred cl-list │ │ │ -000062d0: 2672 6573 7420 636c 2d6b 6579 7329 2022 &rest cl-keys) " │ │ │ -000062e0: c3c4 c55c 6ec6 0908 2606 8722 205b 636c ...\n...&.." [cl │ │ │ -000062f0: 2d6b 6579 7320 636c 2d70 7265 6420 636c -keys cl-pred cl │ │ │ -00006300: 2d6c 6973 7420 6170 706c 7920 7261 7373 -list apply rass │ │ │ -00006310: 6f63 2a20 6e69 6c20 3a69 665d 2037 2028 oc* nil :if] 7 ( │ │ │ -00006320: 2324 202e 2032 3531 3730 295d 290a 2340 #$ . 25170)]).#@ │ │ │ -00006330: 3933 2046 696e 6420 7468 6520 6669 7273 93 Find the firs │ │ │ -00006340: 7420 6974 656d 2077 686f 7365 2063 6472 t item whose cdr │ │ │ -00006350: 2064 6f65 7320 6e6f 7420 7361 7469 7366 does not satisf │ │ │ -00006360: 7920 5052 4544 4943 4154 4520 696e 204c y PREDICATE in L │ │ │ -00006370: 4953 542e 0a4b 6579 776f 7264 7320 7375 IST..Keywords su │ │ │ -00006380: 7070 6f72 7465 643a 2020 3a6b 6579 1f0a pported: :key.. │ │ │ -00006390: 2864 6566 616c 6961 7320 2772 6173 736f (defalias 'rasso │ │ │ -000063a0: 632d 6966 2d6e 6f74 2023 5b28 636c 2d70 c-if-not #[(cl-p │ │ │ -000063b0: 7265 6420 636c 2d6c 6973 7420 2672 6573 red cl-list &res │ │ │ -000063c0: 7420 636c 2d6b 6579 7329 2022 c3c4 c55c t cl-keys) "...\ │ │ │ -000063d0: 6ec6 0908 2606 8722 205b 636c 2d6b 6579 n...&.." [cl-key │ │ │ -000063e0: 7320 636c 2d70 7265 6420 636c 2d6c 6973 s cl-pred cl-lis │ │ │ -000063f0: 7420 6170 706c 7920 7261 7373 6f63 2a20 t apply rassoc* │ │ │ -00006400: 6e69 6c20 3a69 662d 6e6f 745d 2037 2028 nil :if-not] 7 ( │ │ │ -00006410: 2324 202e 2032 3533 3935 295d 290a 2340 #$ . 25395)]).#@ │ │ │ -00006420: 3239 3620 436f 6d62 696e 6520 4c49 5354 296 Combine LIST │ │ │ -00006430: 3120 616e 6420 4c49 5354 3220 7573 696e 1 and LIST2 usin │ │ │ -00006440: 6720 6120 7365 742d 756e 696f 6e20 6f70 g a set-union op │ │ │ -00006450: 6572 6174 696f 6e2e 0a54 6865 2072 6573 eration..The res │ │ │ -00006460: 756c 7420 6c69 7374 2063 6f6e 7461 696e ult list contain │ │ │ -00006470: 7320 616c 6c20 6974 656d 7320 7468 6174 s all items that │ │ │ -00006480: 2061 7070 6561 7220 696e 2065 6974 6865 appear in eithe │ │ │ -00006490: 7220 4c49 5354 3120 6f72 204c 4953 5432 r LIST1 or LIST2 │ │ │ -000064a0: 2e0a 5468 6973 2069 7320 6120 6e6f 6e2d ..This is a non- │ │ │ -000064b0: 6465 7374 7275 6374 6976 6520 6675 6e63 destructive func │ │ │ -000064c0: 7469 6f6e 3b20 6974 206d 616b 6573 2061 tion; it makes a │ │ │ -000064d0: 2063 6f70 7920 6f66 2074 6865 2064 6174 copy of the dat │ │ │ -000064e0: 6120 6966 206e 6563 6573 7361 7279 0a74 a if necessary.t │ │ │ -000064f0: 6f20 6176 6f69 6420 636f 7272 7570 7469 o avoid corrupti │ │ │ -00006500: 6e67 2074 6865 206f 7269 6769 6e61 6c20 ng the original │ │ │ -00006510: 4c49 5354 3120 616e 6420 4c49 5354 322e LIST1 and LIST2. │ │ │ -00006520: 0a4b 6579 776f 7264 7320 7375 7070 6f72 .Keywords suppor │ │ │ -00006530: 7465 643a 2020 3a74 6573 7420 3a74 6573 ted: :test :tes │ │ │ -00006540: 742d 6e6f 7420 3a6b 6579 1f0a 2864 6566 t-not :key..(def │ │ │ -00006550: 616c 6961 7320 2775 6e69 6f6e 2023 5b28 alias 'union #[( │ │ │ -00006560: 636c 2d6c 6973 7431 2063 6c2d 6c69 7374 cl-list1 cl-list │ │ │ -00006570: 3220 2672 6573 7420 636c 2d6b 6579 7329 2 &rest cl-keys) │ │ │ -00006580: 2022 5c6e ac82 0987 09ac 825c 6e87 5c6e "\n.......\n.\n │ │ │ -00006590: 096b ab82 5c6e 875c 6e47 0947 59ac 8409 .k..\n.\nG.GY... │ │ │ -000065a0: 5c6e 1112 09ab a408 ac85 0940 a7ab 8ac3 \n.........@.... │ │ │ -000065b0: c409 405c 6e08 2412 aa8b 0940 5c6e 73ac ..@\n.$....@\ns. │ │ │ -000065c0: 8509 405c 6e42 1209 8941 1188 aa59 5c6e ..@\nB...A...Y\n │ │ │ -000065d0: 8722 205b 636c 2d6b 6579 7320 636c 2d6c ." [cl-keys cl-l │ │ │ -000065e0: 6973 7432 2063 6c2d 6c69 7374 3120 6170 ist2 cl-list1 ap │ │ │ -000065f0: 706c 7920 6164 6a6f 696e 5d20 3520 2823 ply adjoin] 5 (# │ │ │ -00006600: 2420 2e20 3235 3633 3629 5d29 0a23 4032 $ . 25636)]).#@2 │ │ │ -00006610: 3631 2043 6f6d 6269 6e65 204c 4953 5431 61 Combine LIST1 │ │ │ -00006620: 2061 6e64 204c 4953 5432 2075 7369 6e67 and LIST2 using │ │ │ -00006630: 2061 2073 6574 2d75 6e69 6f6e 206f 7065 a set-union ope │ │ │ -00006640: 7261 7469 6f6e 2e0a 5468 6520 7265 7375 ration..The resu │ │ │ -00006650: 6c74 206c 6973 7420 636f 6e74 6169 6e73 lt list contains │ │ │ -00006660: 2061 6c6c 2069 7465 6d73 2074 6861 7420 all items that │ │ │ -00006670: 6170 7065 6172 2069 6e20 6569 7468 6572 appear in either │ │ │ -00006680: 204c 4953 5431 206f 7220 4c49 5354 322e LIST1 or LIST2. │ │ │ -00006690: 0a54 6869 7320 6973 2061 2064 6573 7472 .This is a destr │ │ │ -000066a0: 7563 7469 7665 2066 756e 6374 696f 6e3b uctive function; │ │ │ -000066b0: 2069 7420 7265 7573 6573 2074 6865 2073 it reuses the s │ │ │ -000066c0: 746f 7261 6765 206f 6620 4c49 5354 3120 torage of LIST1 │ │ │ -000066d0: 616e 6420 4c49 5354 320a 7768 656e 6576 and LIST2.whenev │ │ │ -000066e0: 6572 2070 6f73 7369 626c 652e 0a4b 6579 er possible..Key │ │ │ -000066f0: 776f 7264 7320 7375 7070 6f72 7465 643a words supported: │ │ │ -00006700: 2020 3a74 6573 7420 3a74 6573 742d 6e6f :test :test-no │ │ │ -00006710: 7420 3a6b 6579 1f0a 2864 6566 616c 6961 t :key..(defalia │ │ │ -00006720: 7320 276e 756e 696f 6e20 235b 2863 6c2d s 'nunion #[(cl- │ │ │ -00006730: 6c69 7374 3120 636c 2d6c 6973 7432 2026 list1 cl-list2 & │ │ │ -00006740: 7265 7374 2063 6c2d 6b65 7973 2920 225c rest cl-keys) "\ │ │ │ -00006750: 6eac 8209 8709 ac82 5c6e 87c3 c45c 6e09 n.......\n...\n. │ │ │ -00006760: 0824 8722 205b 636c 2d6b 6579 7320 636c .$." [cl-keys cl │ │ │ -00006770: 2d6c 6973 7432 2063 6c2d 6c69 7374 3120 -list2 cl-list1 │ │ │ -00006780: 6170 706c 7920 756e 696f 6e5d 2035 2028 apply union] 5 ( │ │ │ -00006790: 2324 202e 2032 3631 3331 295d 290a 2340 #$ . 26131)]).#@ │ │ │ -000067a0: 3330 3220 436f 6d62 696e 6520 4c49 5354 302 Combine LIST │ │ │ -000067b0: 3120 616e 6420 4c49 5354 3220 7573 696e 1 and LIST2 usin │ │ │ -000067c0: 6720 6120 7365 742d 696e 7465 7273 6563 g a set-intersec │ │ │ -000067d0: 7469 6f6e 206f 7065 7261 7469 6f6e 2e0a tion operation.. │ │ │ -000067e0: 5468 6520 7265 7375 6c74 206c 6973 7420 The result list │ │ │ -000067f0: 636f 6e74 6169 6e73 2061 6c6c 2069 7465 contains all ite │ │ │ -00006800: 6d73 2074 6861 7420 6170 7065 6172 2069 ms that appear i │ │ │ -00006810: 6e20 626f 7468 204c 4953 5431 2061 6e64 n both LIST1 and │ │ │ -00006820: 204c 4953 5432 2e0a 5468 6973 2069 7320 LIST2..This is │ │ │ -00006830: 6120 6e6f 6e2d 6465 7374 7275 6374 6976 a non-destructiv │ │ │ -00006840: 6520 6675 6e63 7469 6f6e 3b20 6974 206d e function; it m │ │ │ -00006850: 616b 6573 2061 2063 6f70 7920 6f66 2074 akes a copy of t │ │ │ -00006860: 6865 2064 6174 6120 6966 206e 6563 6573 he data if neces │ │ │ -00006870: 7361 7279 0a74 6f20 6176 6f69 6420 636f sary.to avoid co │ │ │ -00006880: 7272 7570 7469 6e67 2074 6865 206f 7269 rrupting the ori │ │ │ -00006890: 6769 6e61 6c20 4c49 5354 3120 616e 6420 ginal LIST1 and │ │ │ -000068a0: 4c49 5354 322e 0a4b 6579 776f 7264 7320 LIST2..Keywords │ │ │ -000068b0: 7375 7070 6f72 7465 643a 2020 3a74 6573 supported: :tes │ │ │ -000068c0: 7420 3a74 6573 742d 6e6f 7420 3a6b 6579 t :test-not :key │ │ │ -000068d0: 1f0a 2864 6566 616c 6961 7320 2769 6e74 ..(defalias 'int │ │ │ -000068e0: 6572 7365 6374 696f 6e20 235b 2863 6c2d ersection #[(cl- │ │ │ -000068f0: 6c69 7374 3120 636c 2d6c 6973 7432 2026 list1 cl-list2 & │ │ │ -00006900: 7265 7374 2063 6c2d 6b65 7973 2920 220c rest cl-keys) ". │ │ │ -00006910: adee 0dad eb0c 0d6b ab82 0c87 c60b 7341 .......k......sA │ │ │ -00006920: 4018 0b89 1aab 9a5c 6e40 c773 ac8d c80b @......\n@.s.... │ │ │ -00006930: 7341 40ac 86c9 ca5c 6e40 5c22 885c 6e41 sA@....\n@\".\nA │ │ │ -00006940: 4189 12ac 6629 cb19 0c47 0d47 59ac 840d A...f)...G.GY... │ │ │ -00006950: 0c15 140d abac 0bac 850d 40a7 ab92 cccd ..........@..... │ │ │ -00006960: 08ab 8608 0d40 21aa 820d 400c 0b24 aa84 .....@!...@..$.. │ │ │ -00006970: 0d40 0c73 ab85 0d40 0942 110d 8941 1588 .@.s...@.B...A.. │ │ │ -00006980: aa51 092a 8722 205b 636c 2d6b 6579 2063 .Q.*." [cl-key c │ │ │ -00006990: 6c2d 7265 7320 636c 2d6b 6579 732d 7465 l-res cl-keys-te │ │ │ -000069a0: 6d70 2063 6c2d 6b65 7973 2063 6c2d 6c69 mp cl-keys cl-li │ │ │ -000069b0: 7374 3120 636c 2d6c 6973 7432 203a 6b65 st1 cl-list2 :ke │ │ │ -000069c0: 7920 283a 6b65 7920 3a74 6573 7420 3a74 y (:key :test :t │ │ │ -000069d0: 6573 742d 6e6f 7429 203a 616c 6c6f 772d est-not) :allow- │ │ │ -000069e0: 6f74 6865 722d 6b65 7973 2065 7272 6f72 other-keys error │ │ │ -000069f0: 2022 4261 6420 6b65 7977 6f72 6420 6172 "Bad keyword ar │ │ │ -00006a00: 6775 6d65 6e74 2025 7322 206e 696c 2061 gument %s" nil a │ │ │ -00006a10: 7070 6c79 206d 656d 6265 722a 5d20 3620 pply member*] 6 │ │ │ -00006a20: 2823 2420 2e20 3236 3533 3229 5d29 0a23 (#$ . 26532)]).# │ │ │ -00006a30: 4032 3637 2043 6f6d 6269 6e65 204c 4953 @267 Combine LIS │ │ │ -00006a40: 5431 2061 6e64 204c 4953 5432 2075 7369 T1 and LIST2 usi │ │ │ -00006a50: 6e67 2061 2073 6574 2d69 6e74 6572 7365 ng a set-interse │ │ │ -00006a60: 6374 696f 6e20 6f70 6572 6174 696f 6e2e ction operation. │ │ │ -00006a70: 0a54 6865 2072 6573 756c 7420 6c69 7374 .The result list │ │ │ -00006a80: 2063 6f6e 7461 696e 7320 616c 6c20 6974 contains all it │ │ │ -00006a90: 656d 7320 7468 6174 2061 7070 6561 7220 ems that appear │ │ │ -00006aa0: 696e 2062 6f74 6820 4c49 5354 3120 616e in both LIST1 an │ │ │ -00006ab0: 6420 4c49 5354 322e 0a54 6869 7320 6973 d LIST2..This is │ │ │ -00006ac0: 2061 2064 6573 7472 7563 7469 7665 2066 a destructive f │ │ │ -00006ad0: 756e 6374 696f 6e3b 2069 7420 7265 7573 unction; it reus │ │ │ -00006ae0: 6573 2074 6865 2073 746f 7261 6765 206f es the storage o │ │ │ -00006af0: 6620 4c49 5354 3120 616e 6420 4c49 5354 f LIST1 and LIST │ │ │ -00006b00: 320a 7768 656e 6576 6572 2070 6f73 7369 2.whenever possi │ │ │ -00006b10: 626c 652e 0a4b 6579 776f 7264 7320 7375 ble..Keywords su │ │ │ -00006b20: 7070 6f72 7465 643a 2020 3a74 6573 7420 pported: :test │ │ │ -00006b30: 3a74 6573 742d 6e6f 7420 3a6b 6579 1f0a :test-not :key.. │ │ │ -00006b40: 2864 6566 616c 6961 7320 276e 696e 7465 (defalias 'ninte │ │ │ -00006b50: 7273 6563 7469 6f6e 2023 5b28 636c 2d6c rsection #[(cl-l │ │ │ -00006b60: 6973 7431 2063 6c2d 6c69 7374 3220 2672 ist1 cl-list2 &r │ │ │ -00006b70: 6573 7420 636c 2d6b 6579 7329 2022 5c6e est cl-keys) "\n │ │ │ -00006b80: ad89 09ad 86c3 c45c 6e09 0824 8722 205b .......\n..$." [ │ │ │ -00006b90: 636c 2d6b 6579 7320 636c 2d6c 6973 7432 cl-keys cl-list2 │ │ │ -00006ba0: 2063 6c2d 6c69 7374 3120 6170 706c 7920 cl-list1 apply │ │ │ -00006bb0: 696e 7465 7273 6563 7469 6f6e 5d20 3520 intersection] 5 │ │ │ -00006bc0: 2823 2420 2e20 3237 3138 3929 5d29 0a23 (#$ . 27189)]).# │ │ │ -00006bd0: 4032 3939 2043 6f6d 6269 6e65 204c 4953 @299 Combine LIS │ │ │ -00006be0: 5431 2061 6e64 204c 4953 5432 2075 7369 T1 and LIST2 usi │ │ │ -00006bf0: 6e67 2061 2073 6574 2d64 6966 6665 7265 ng a set-differe │ │ │ -00006c00: 6e63 6520 6f70 6572 6174 696f 6e2e 0a54 nce operation..T │ │ │ -00006c10: 6865 2072 6573 756c 7420 6c69 7374 2063 he result list c │ │ │ -00006c20: 6f6e 7461 696e 7320 616c 6c20 6974 656d ontains all item │ │ │ -00006c30: 7320 7468 6174 2061 7070 6561 7220 696e s that appear in │ │ │ -00006c40: 204c 4953 5431 2062 7574 206e 6f74 204c LIST1 but not L │ │ │ -00006c50: 4953 5432 2e0a 5468 6973 2069 7320 6120 IST2..This is a │ │ │ -00006c60: 6e6f 6e2d 6465 7374 7275 6374 6976 6520 non-destructive │ │ │ -00006c70: 6675 6e63 7469 6f6e 3b20 6974 206d 616b function; it mak │ │ │ -00006c80: 6573 2061 2063 6f70 7920 6f66 2074 6865 es a copy of the │ │ │ -00006c90: 2064 6174 6120 6966 206e 6563 6573 7361 data if necessa │ │ │ -00006ca0: 7279 0a74 6f20 6176 6f69 6420 636f 7272 ry.to avoid corr │ │ │ -00006cb0: 7570 7469 6e67 2074 6865 206f 7269 6769 upting the origi │ │ │ -00006cc0: 6e61 6c20 4c49 5354 3120 616e 6420 4c49 nal LIST1 and LI │ │ │ -00006cd0: 5354 322e 0a4b 6579 776f 7264 7320 7375 ST2..Keywords su │ │ │ -00006ce0: 7070 6f72 7465 643a 2020 3a74 6573 7420 pported: :test │ │ │ -00006cf0: 3a74 6573 742d 6e6f 7420 3a6b 6579 1f0a :test-not :key.. │ │ │ -00006d00: 2864 6566 616c 6961 7320 2773 6574 2d64 (defalias 'set-d │ │ │ -00006d10: 6966 6665 7265 6e63 6520 235b 2863 6c2d ifference #[(cl- │ │ │ -00006d20: 6c69 7374 3120 636c 2d6c 6973 7432 2026 list1 cl-list2 & │ │ │ -00006d30: 7265 7374 2063 6c2d 6b65 7973 2920 220d rest cl-keys) ". │ │ │ -00006d40: ab83 09ac 820d 87c6 0c73 4140 180c 891b .........sA@.... │ │ │ -00006d50: ab9a 0b40 c773 ac8d c80c 7341 40ac 86c9 ...@.s....sA@... │ │ │ -00006d60: ca0b 405c 2288 0b41 4189 13ac 6629 cb1a ..@\"..AA...f).. │ │ │ -00006d70: 0dab ac0c ac85 0d40 a7ab 92cc cd08 ab86 .......@........ │ │ │ -00006d80: 080d 4021 aa82 0d40 090c 24aa 840d 4009 ..@!...@..$...@. │ │ │ -00006d90: 73ac 850d 405c 6e42 120d 8941 1588 aa51 s...@\nB...A...Q │ │ │ -00006da0: 5c6e 2a87 2220 5b63 6c2d 6b65 7920 636c \n*." [cl-key cl │ │ │ -00006db0: 2d6c 6973 7432 2063 6c2d 7265 7320 636c -list2 cl-res cl │ │ │ -00006dc0: 2d6b 6579 732d 7465 6d70 2063 6c2d 6b65 -keys-temp cl-ke │ │ │ -00006dd0: 7973 2063 6c2d 6c69 7374 3120 3a6b 6579 ys cl-list1 :key │ │ │ -00006de0: 2028 3a6b 6579 203a 7465 7374 203a 7465 (:key :test :te │ │ │ -00006df0: 7374 2d6e 6f74 2920 3a61 6c6c 6f77 2d6f st-not) :allow-o │ │ │ -00006e00: 7468 6572 2d6b 6579 7320 6572 726f 7220 ther-keys error │ │ │ -00006e10: 2242 6164 206b 6579 776f 7264 2061 7267 "Bad keyword arg │ │ │ -00006e20: 756d 656e 7420 2573 2220 6e69 6c20 6170 ument %s" nil ap │ │ │ -00006e30: 706c 7920 6d65 6d62 6572 2a5d 2036 2028 ply member*] 6 ( │ │ │ -00006e40: 2324 202e 2032 3736 3035 295d 290a 2340 #$ . 27605)]).#@ │ │ │ -00006e50: 3236 3420 436f 6d62 696e 6520 4c49 5354 264 Combine LIST │ │ │ -00006e60: 3120 616e 6420 4c49 5354 3220 7573 696e 1 and LIST2 usin │ │ │ -00006e70: 6720 6120 7365 742d 6469 6666 6572 656e g a set-differen │ │ │ -00006e80: 6365 206f 7065 7261 7469 6f6e 2e0a 5468 ce operation..Th │ │ │ -00006e90: 6520 7265 7375 6c74 206c 6973 7420 636f e result list co │ │ │ -00006ea0: 6e74 6169 6e73 2061 6c6c 2069 7465 6d73 ntains all items │ │ │ -00006eb0: 2074 6861 7420 6170 7065 6172 2069 6e20 that appear in │ │ │ -00006ec0: 4c49 5354 3120 6275 7420 6e6f 7420 4c49 LIST1 but not LI │ │ │ -00006ed0: 5354 322e 0a54 6869 7320 6973 2061 2064 ST2..This is a d │ │ │ -00006ee0: 6573 7472 7563 7469 7665 2066 756e 6374 estructive funct │ │ │ -00006ef0: 696f 6e3b 2069 7420 7265 7573 6573 2074 ion; it reuses t │ │ │ -00006f00: 6865 2073 746f 7261 6765 206f 6620 4c49 he storage of LI │ │ │ -00006f10: 5354 3120 616e 6420 4c49 5354 320a 7768 ST1 and LIST2.wh │ │ │ -00006f20: 656e 6576 6572 2070 6f73 7369 626c 652e enever possible. │ │ │ -00006f30: 0a4b 6579 776f 7264 7320 7375 7070 6f72 .Keywords suppor │ │ │ -00006f40: 7465 643a 2020 3a74 6573 7420 3a74 6573 ted: :test :tes │ │ │ -00006f50: 742d 6e6f 7420 3a6b 6579 1f0a 2864 6566 t-not :key..(def │ │ │ -00006f60: 616c 6961 7320 276e 7365 742d 6469 6666 alias 'nset-diff │ │ │ -00006f70: 6572 656e 6365 2023 5b28 636c 2d6c 6973 erence #[(cl-lis │ │ │ -00006f80: 7431 2063 6c2d 6c69 7374 3220 2672 6573 t1 cl-list2 &res │ │ │ -00006f90: 7420 636c 2d6b 6579 7329 2022 5c6e ab83 t cl-keys) "\n.. │ │ │ -00006fa0: 09ac 825c 6e87 c3c4 5c6e 0908 2487 2220 ...\n...\n..$." │ │ │ -00006fb0: 5b63 6c2d 6b65 7973 2063 6c2d 6c69 7374 [cl-keys cl-list │ │ │ -00006fc0: 3220 636c 2d6c 6973 7431 2061 7070 6c79 2 cl-list1 apply │ │ │ -00006fd0: 2073 6574 2d64 6966 6665 7265 6e63 655d set-difference] │ │ │ -00006fe0: 2035 2028 2324 202e 2032 3832 3434 295d 5 (#$ . 28244)] │ │ │ -00006ff0: 290a 2340 3330 3920 436f 6d62 696e 6520 ).#@309 Combine │ │ │ -00007000: 4c49 5354 3120 616e 6420 4c49 5354 3220 LIST1 and LIST2 │ │ │ -00007010: 7573 696e 6720 6120 7365 742d 6578 636c using a set-excl │ │ │ -00007020: 7573 6976 652d 6f72 206f 7065 7261 7469 usive-or operati │ │ │ -00007030: 6f6e 2e0a 5468 6520 7265 7375 6c74 206c on..The result l │ │ │ -00007040: 6973 7420 636f 6e74 6169 6e73 2061 6c6c ist contains all │ │ │ -00007050: 2069 7465 6d73 2074 6861 7420 6170 7065 items that appe │ │ │ -00007060: 6172 2069 6e20 6578 6163 746c 7920 6f6e ar in exactly on │ │ │ -00007070: 6520 6f66 204c 4953 5431 2c20 4c49 5354 e of LIST1, LIST │ │ │ -00007080: 322e 0a54 6869 7320 6973 2061 206e 6f6e 2..This is a non │ │ │ -00007090: 2d64 6573 7472 7563 7469 7665 2066 756e -destructive fun │ │ │ -000070a0: 6374 696f 6e3b 2069 7420 6d61 6b65 7320 ction; it makes │ │ │ -000070b0: 6120 636f 7079 206f 6620 7468 6520 6461 a copy of the da │ │ │ -000070c0: 7461 2069 6620 6e65 6365 7373 6172 790a ta if necessary. │ │ │ -000070d0: 746f 2061 766f 6964 2063 6f72 7275 7074 to avoid corrupt │ │ │ -000070e0: 696e 6720 7468 6520 6f72 6967 696e 616c ing the original │ │ │ -000070f0: 204c 4953 5431 2061 6e64 204c 4953 5432 LIST1 and LIST2 │ │ │ -00007100: 2e0a 4b65 7977 6f72 6473 2073 7570 706f ..Keywords suppo │ │ │ -00007110: 7274 6564 3a20 203a 7465 7374 203a 7465 rted: :test :te │ │ │ -00007120: 7374 2d6e 6f74 203a 6b65 791f 0a28 6465 st-not :key..(de │ │ │ -00007130: 6661 6c69 6173 2027 7365 742d 6578 636c falias 'set-excl │ │ │ -00007140: 7573 6976 652d 6f72 2023 5b28 636c 2d6c usive-or #[(cl-l │ │ │ -00007150: 6973 7431 2063 6c2d 6c69 7374 3220 2672 ist1 cl-list2 &r │ │ │ -00007160: 6573 7420 636c 2d6b 6579 7329 2022 5c6e est cl-keys) "\n │ │ │ -00007170: ac82 0987 09ac 825c 6e87 5c6e 096b 3fad .......\n.\n.k?. │ │ │ -00007180: 8ec3 c4c5 5c6e 0908 24c4 c509 5c6e 0824 ....\n..$...\n.$ │ │ │ -00007190: 5c22 8722 205b 636c 2d6b 6579 7320 636c \"." [cl-keys cl │ │ │ -000071a0: 2d6c 6973 7432 2063 6c2d 6c69 7374 3120 -list2 cl-list1 │ │ │ -000071b0: 6170 7065 6e64 2061 7070 6c79 2073 6574 append apply set │ │ │ -000071c0: 2d64 6966 6665 7265 6e63 655d 2037 2028 -difference] 7 ( │ │ │ -000071d0: 2324 202e 2032 3836 3634 295d 290a 2340 #$ . 28664)]).#@ │ │ │ -000071e0: 3237 3420 436f 6d62 696e 6520 4c49 5354 274 Combine LIST │ │ │ -000071f0: 3120 616e 6420 4c49 5354 3220 7573 696e 1 and LIST2 usin │ │ │ -00007200: 6720 6120 7365 742d 6578 636c 7573 6976 g a set-exclusiv │ │ │ -00007210: 652d 6f72 206f 7065 7261 7469 6f6e 2e0a e-or operation.. │ │ │ -00007220: 5468 6520 7265 7375 6c74 206c 6973 7420 The result list │ │ │ -00007230: 636f 6e74 6169 6e73 2061 6c6c 2069 7465 contains all ite │ │ │ -00007240: 6d73 2074 6861 7420 6170 7065 6172 2069 ms that appear i │ │ │ -00007250: 6e20 6578 6163 746c 7920 6f6e 6520 6f66 n exactly one of │ │ │ -00007260: 204c 4953 5431 2c20 4c49 5354 322e 0a54 LIST1, LIST2..T │ │ │ -00007270: 6869 7320 6973 2061 2064 6573 7472 7563 his is a destruc │ │ │ -00007280: 7469 7665 2066 756e 6374 696f 6e3b 2069 tive function; i │ │ │ -00007290: 7420 7265 7573 6573 2074 6865 2073 746f t reuses the sto │ │ │ -000072a0: 7261 6765 206f 6620 4c49 5354 3120 616e rage of LIST1 an │ │ │ -000072b0: 6420 4c49 5354 320a 7768 656e 6576 6572 d LIST2.whenever │ │ │ -000072c0: 2070 6f73 7369 626c 652e 0a4b 6579 776f possible..Keywo │ │ │ -000072d0: 7264 7320 7375 7070 6f72 7465 643a 2020 rds supported: │ │ │ -000072e0: 3a74 6573 7420 3a74 6573 742d 6e6f 7420 :test :test-not │ │ │ -000072f0: 3a6b 6579 1f0a 2864 6566 616c 6961 7320 :key..(defalias │ │ │ -00007300: 276e 7365 742d 6578 636c 7573 6976 652d 'nset-exclusive- │ │ │ -00007310: 6f72 2023 5b28 636c 2d6c 6973 7431 2063 or #[(cl-list1 c │ │ │ -00007320: 6c2d 6c69 7374 3220 2672 6573 7420 636c l-list2 &rest cl │ │ │ -00007330: 2d6b 6579 7329 2022 5c6e ac82 0987 09ac -keys) "\n...... │ │ │ -00007340: 825c 6e87 5c6e 096b 3fad 8dc3 c45c 6e09 .\n.\n.k?....\n. │ │ │ -00007350: 0824 c3c4 095c 6e08 24a4 8722 205b 636c .$...\n.$.." [cl │ │ │ -00007360: 2d6b 6579 7320 636c 2d6c 6973 7432 2063 -keys cl-list2 c │ │ │ -00007370: 6c2d 6c69 7374 3120 6170 706c 7920 6e73 l-list1 apply ns │ │ │ -00007380: 6574 2d64 6966 6665 7265 6e63 655d 2036 et-difference] 6 │ │ │ -00007390: 2028 2324 202e 2032 3931 3536 295d 290a (#$ . 29156)]). │ │ │ -000073a0: 2340 3133 3420 5472 7565 2069 6620 4c49 #@134 True if LI │ │ │ -000073b0: 5354 3120 6973 2061 2073 7562 7365 7420 ST1 is a subset │ │ │ -000073c0: 6f66 204c 4953 5432 2e0a 492e 652e 2c20 of LIST2..I.e., │ │ │ -000073d0: 6966 2065 7665 7279 2065 6c65 6d65 6e74 if every element │ │ │ -000073e0: 206f 6620 4c49 5354 3120 616c 736f 2061 of LIST1 also a │ │ │ -000073f0: 7070 6561 7273 2069 6e20 4c49 5354 322e ppears in LIST2. │ │ │ -00007400: 0a4b 6579 776f 7264 7320 7375 7070 6f72 .Keywords suppor │ │ │ -00007410: 7465 643a 2020 3a74 6573 7420 3a74 6573 ted: :test :tes │ │ │ -00007420: 742d 6e6f 7420 3a6b 6579 1f0a 2864 6566 t-not :key..(def │ │ │ -00007430: 616c 6961 7320 2773 7562 7365 7470 2023 alias 'subsetp # │ │ │ -00007440: 5b28 636c 2d6c 6973 7431 2063 6c2d 6c69 [(cl-list1 cl-li │ │ │ -00007450: 7374 3220 2672 6573 7420 636c 2d6b 6579 st2 &rest cl-key │ │ │ -00007460: 7329 2022 0cac 82c5 8709 adcc 0c09 6bab s) "..........k. │ │ │ -00007470: 82c5 87c6 5c6e 7341 4018 5c6e 891b ab9a ....\nsA@.\n.... │ │ │ -00007480: 0b40 c773 ac8d c85c 6e73 4140 ac86 c9ca .@.s...\nsA@.... │ │ │ -00007490: 0b40 5c22 880b 4141 8913 ac66 290c ab99 .@\"..AA...f)... │ │ │ -000074a0: cbcc 08ab 8608 0c40 21aa 820c 4009 5c6e .......@!...@.\n │ │ │ -000074b0: 24ab 870c 8941 1488 aa64 0c29 3f87 2220 $....A...d.)?." │ │ │ -000074c0: 5b63 6c2d 6b65 7920 636c 2d6c 6973 7432 [cl-key cl-list2 │ │ │ -000074d0: 2063 6c2d 6b65 7973 2063 6c2d 6b65 7973 cl-keys cl-keys │ │ │ -000074e0: 2d74 656d 7020 636c 2d6c 6973 7431 2074 -temp cl-list1 t │ │ │ -000074f0: 203a 6b65 7920 283a 6b65 7920 3a74 6573 :key (:key :tes │ │ │ -00007500: 7420 3a74 6573 742d 6e6f 7429 203a 616c t :test-not) :al │ │ │ -00007510: 6c6f 772d 6f74 6865 722d 6b65 7973 2065 low-other-keys e │ │ │ -00007520: 7272 6f72 2022 4261 6420 6b65 7977 6f72 rror "Bad keywor │ │ │ -00007530: 6420 6172 6775 6d65 6e74 2025 7322 2061 d argument %s" a │ │ │ -00007540: 7070 6c79 206d 656d 6265 722a 5d20 3620 pply member*] 6 │ │ │ -00007550: 2823 2420 2e20 3239 3630 3629 5d29 0a23 (#$ . 29606)]).# │ │ │ -00007560: 4031 3639 2053 7562 7374 6974 7574 6520 @169 Substitute │ │ │ -00007570: 4e45 5720 666f 7220 656c 656d 656e 7473 NEW for elements │ │ │ -00007580: 206d 6174 6368 696e 6720 5052 4544 4943 matching PREDIC │ │ │ -00007590: 4154 4520 696e 2054 5245 4520 286e 6f6e ATE in TREE (non │ │ │ -000075a0: 2d64 6573 7472 7563 7469 7665 6c79 292e -destructively). │ │ │ -000075b0: 0a52 6574 7572 6e20 6120 636f 7079 206f .Return a copy o │ │ │ -000075c0: 6620 5452 4545 2077 6974 6820 616c 6c20 f TREE with all │ │ │ -000075d0: 6d61 7463 6869 6e67 2065 6c65 6d65 6e74 matching element │ │ │ -000075e0: 7320 7265 706c 6163 6564 2062 7920 4e45 s replaced by NE │ │ │ -000075f0: 572e 0a4b 6579 776f 7264 7320 7375 7070 W..Keywords supp │ │ │ -00007600: 6f72 7465 643a 2020 3a6b 6579 1f0a 2864 orted: :key..(d │ │ │ -00007610: 6566 616c 6961 7320 2773 7562 7374 2d69 efalias 'subst-i │ │ │ -00007620: 6620 235b 2863 6c2d 6e65 7720 636c 2d70 f #[(cl-new cl-p │ │ │ -00007630: 7265 6420 636c 2d74 7265 6520 2672 6573 red cl-tree &res │ │ │ -00007640: 7420 636c 2d6b 6579 7329 2022 c4c5 c60b t cl-keys) ".... │ │ │ -00007650: 4243 5c6e c709 0826 0687 2220 5b63 6c2d BC\n...&.." [cl- │ │ │ -00007660: 6b65 7973 2063 6c2d 7072 6564 2063 6c2d keys cl-pred cl- │ │ │ -00007670: 7472 6565 2063 6c2d 6e65 7720 6170 706c tree cl-new appl │ │ │ -00007680: 7920 7375 626c 6973 206e 696c 203a 6966 y sublis nil :if │ │ │ -00007690: 5d20 3720 2823 2420 2e20 3330 3035 3329 ] 7 (#$ . 30053) │ │ │ -000076a0: 5d29 0a23 4031 3733 2053 7562 7374 6974 ]).#@173 Substit │ │ │ -000076b0: 7574 6520 4e45 5720 666f 7220 656c 7473 ute NEW for elts │ │ │ -000076c0: 206e 6f74 206d 6174 6368 696e 6720 5052 not matching PR │ │ │ -000076d0: 4544 4943 4154 4520 696e 2054 5245 4520 EDICATE in TREE │ │ │ -000076e0: 286e 6f6e 2d64 6573 7472 7563 7469 7665 (non-destructive │ │ │ -000076f0: 6c79 292e 0a52 6574 7572 6e20 6120 636f ly)..Return a co │ │ │ -00007700: 7079 206f 6620 5452 4545 2077 6974 6820 py of TREE with │ │ │ -00007710: 616c 6c20 6e6f 6e2d 6d61 7463 6869 6e67 all non-matching │ │ │ -00007720: 2065 6c65 6d65 6e74 7320 7265 706c 6163 elements replac │ │ │ -00007730: 6564 2062 7920 4e45 572e 0a4b 6579 776f ed by NEW..Keywo │ │ │ -00007740: 7264 7320 7375 7070 6f72 7465 643a 2020 rds supported: │ │ │ -00007750: 3a6b 6579 1f0a 2864 6566 616c 6961 7320 :key..(defalias │ │ │ -00007760: 2773 7562 7374 2d69 662d 6e6f 7420 235b 'subst-if-not #[ │ │ │ -00007770: 2863 6c2d 6e65 7720 636c 2d70 7265 6420 (cl-new cl-pred │ │ │ -00007780: 636c 2d74 7265 6520 2672 6573 7420 636c cl-tree &rest cl │ │ │ -00007790: 2d6b 6579 7329 2022 c4c5 c60b 4243 5c6e -keys) "....BC\n │ │ │ -000077a0: c709 0826 0687 2220 5b63 6c2d 6b65 7973 ...&.." [cl-keys │ │ │ -000077b0: 2063 6c2d 7072 6564 2063 6c2d 7472 6565 cl-pred cl-tree │ │ │ -000077c0: 2063 6c2d 6e65 7720 6170 706c 7920 7375 cl-new apply su │ │ │ -000077d0: 626c 6973 206e 696c 203a 6966 2d6e 6f74 blis nil :if-not │ │ │ -000077e0: 5d20 3720 2823 2420 2e20 3330 3337 3729 ] 7 (#$ . 30377) │ │ │ -000077f0: 5d29 0a23 4031 3838 2053 7562 7374 6974 ]).#@188 Substit │ │ │ -00007800: 7574 6520 4e45 5720 666f 7220 4f4c 4420 ute NEW for OLD │ │ │ -00007810: 6576 6572 7977 6865 7265 2069 6e20 5452 everywhere in TR │ │ │ -00007820: 4545 2028 6465 7374 7275 6374 6976 656c EE (destructivel │ │ │ -00007830: 7929 2e0a 416e 7920 656c 656d 656e 7420 y)..Any element │ │ │ -00007840: 6f66 2054 5245 4520 7768 6963 6820 6973 of TREE which is │ │ │ -00007850: 2060 6571 6c27 2074 6f20 4f4c 4420 6973 `eql' to OLD is │ │ │ -00007860: 2063 6861 6e67 6564 2074 6f20 4e45 5720 changed to NEW │ │ │ -00007870: 2876 6961 2061 2063 616c 6c0a 746f 2060 (via a call.to ` │ │ │ -00007880: 7365 7463 6172 2729 2e0a 4b65 7977 6f72 setcar')..Keywor │ │ │ -00007890: 6473 2073 7570 706f 7274 6564 3a20 203a ds supported: : │ │ │ -000078a0: 7465 7374 203a 7465 7374 2d6e 6f74 203a test :test-not : │ │ │ -000078b0: 6b65 791f 0a28 6465 6661 6c69 6173 2027 key..(defalias ' │ │ │ -000078c0: 6e73 7562 7374 2023 5b28 636c 2d6e 6577 nsubst #[(cl-new │ │ │ -000078d0: 2063 6c2d 6f6c 6420 636c 2d74 7265 6520 cl-old cl-tree │ │ │ -000078e0: 2672 6573 7420 636c 2d6b 6579 7329 2022 &rest cl-keys) " │ │ │ -000078f0: c4c5 0b5c 6e42 4309 0824 8722 205b 636c ...\nBC..$." [cl │ │ │ -00007900: 2d6b 6579 7320 636c 2d74 7265 6520 636c -keys cl-tree cl │ │ │ -00007910: 2d6e 6577 2063 6c2d 6f6c 6420 6170 706c -new cl-old appl │ │ │ -00007920: 7920 6e73 7562 6c69 735d 2035 2028 2324 y nsublis] 5 (#$ │ │ │ -00007930: 202e 2033 3037 3133 295d 290a 2340 3137 . 30713)]).#@17 │ │ │ -00007940: 3720 5375 6273 7469 7475 7465 204e 4557 7 Substitute NEW │ │ │ -00007950: 2066 6f72 2065 6c65 6d65 6e74 7320 6d61 for elements ma │ │ │ -00007960: 7463 6869 6e67 2050 5245 4449 4341 5445 tching PREDICATE │ │ │ -00007970: 2069 6e20 5452 4545 2028 6465 7374 7275 in TREE (destru │ │ │ -00007980: 6374 6976 656c 7929 2e0a 416e 7920 656c ctively)..Any el │ │ │ -00007990: 656d 656e 7420 6f66 2054 5245 4520 7768 ement of TREE wh │ │ │ -000079a0: 6963 6820 6d61 7463 6865 7320 6973 2063 ich matches is c │ │ │ -000079b0: 6861 6e67 6564 2074 6f20 4e45 5720 2876 hanged to NEW (v │ │ │ -000079c0: 6961 2061 2063 616c 6c20 746f 2060 7365 ia a call to `se │ │ │ -000079d0: 7463 6172 2729 2e0a 4b65 7977 6f72 6473 tcar')..Keywords │ │ │ -000079e0: 2073 7570 706f 7274 6564 3a20 203a 6b65 supported: :ke │ │ │ -000079f0: 791f 0a28 6465 6661 6c69 6173 2027 6e73 y..(defalias 'ns │ │ │ -00007a00: 7562 7374 2d69 6620 235b 2863 6c2d 6e65 ubst-if #[(cl-ne │ │ │ -00007a10: 7720 636c 2d70 7265 6420 636c 2d74 7265 w cl-pred cl-tre │ │ │ -00007a20: 6520 2672 6573 7420 636c 2d6b 6579 7329 e &rest cl-keys) │ │ │ -00007a30: 2022 c4c5 c60b 4243 5c6e c709 0826 0687 "....BC\n...&.. │ │ │ -00007a40: 2220 5b63 6c2d 6b65 7973 2063 6c2d 7072 " [cl-keys cl-pr │ │ │ -00007a50: 6564 2063 6c2d 7472 6565 2063 6c2d 6e65 ed cl-tree cl-ne │ │ │ -00007a60: 7720 6170 706c 7920 6e73 7562 6c69 7320 w apply nsublis │ │ │ -00007a70: 6e69 6c20 3a69 665d 2037 2028 2324 202e nil :if] 7 (#$ . │ │ │ -00007a80: 2033 3130 3432 295d 290a 2340 3138 3120 31042)]).#@181 │ │ │ -00007a90: 5375 6273 7469 7475 7465 204e 4557 2066 Substitute NEW f │ │ │ -00007aa0: 6f72 2065 6c65 6d65 6e74 7320 6e6f 7420 or elements not │ │ │ -00007ab0: 6d61 7463 6869 6e67 2050 5245 4449 4341 matching PREDICA │ │ │ -00007ac0: 5445 2069 6e20 5452 4545 2028 6465 7374 TE in TREE (dest │ │ │ -00007ad0: 7275 6374 6976 656c 7929 2e0a 416e 7920 ructively)..Any │ │ │ -00007ae0: 656c 656d 656e 7420 6f66 2054 5245 4520 element of TREE │ │ │ -00007af0: 7768 6963 6820 6d61 7463 6865 7320 6973 which matches is │ │ │ -00007b00: 2063 6861 6e67 6564 2074 6f20 4e45 5720 changed to NEW │ │ │ -00007b10: 2876 6961 2061 2063 616c 6c20 746f 2060 (via a call to ` │ │ │ -00007b20: 7365 7463 6172 2729 2e0a 4b65 7977 6f72 setcar')..Keywor │ │ │ -00007b30: 6473 2073 7570 706f 7274 6564 3a20 203a ds supported: : │ │ │ -00007b40: 6b65 791f 0a28 6465 6661 6c69 6173 2027 key..(defalias ' │ │ │ -00007b50: 6e73 7562 7374 2d69 662d 6e6f 7420 235b nsubst-if-not #[ │ │ │ -00007b60: 2863 6c2d 6e65 7720 636c 2d70 7265 6420 (cl-new cl-pred │ │ │ -00007b70: 636c 2d74 7265 6520 2672 6573 7420 636c cl-tree &rest cl │ │ │ -00007b80: 2d6b 6579 7329 2022 c4c5 c60b 4243 5c6e -keys) "....BC\n │ │ │ -00007b90: c709 0826 0687 2220 5b63 6c2d 6b65 7973 ...&.." [cl-keys │ │ │ -00007ba0: 2063 6c2d 7072 6564 2063 6c2d 7472 6565 cl-pred cl-tree │ │ │ -00007bb0: 2063 6c2d 6e65 7720 6170 706c 7920 6e73 cl-new apply ns │ │ │ -00007bc0: 7562 6c69 7320 6e69 6c20 3a69 662d 6e6f ublis nil :if-no │ │ │ -00007bd0: 745d 2037 2028 2324 202e 2033 3133 3736 t] 7 (#$ . 31376 │ │ │ -00007be0: 295d 290a 2340 3137 3220 5065 7266 6f72 )]).#@172 Perfor │ │ │ -00007bf0: 6d20 7375 6273 7469 7475 7469 6f6e 7320 m substitutions │ │ │ -00007c00: 696e 6469 6361 7465 6420 6279 2041 4c49 indicated by ALI │ │ │ -00007c10: 5354 2069 6e20 5452 4545 2028 6e6f 6e2d ST in TREE (non- │ │ │ -00007c20: 6465 7374 7275 6374 6976 656c 7929 2e0a destructively).. │ │ │ -00007c30: 5265 7475 726e 2061 2063 6f70 7920 6f66 Return a copy of │ │ │ -00007c40: 2054 5245 4520 7769 7468 2061 6c6c 206d TREE with all m │ │ │ -00007c50: 6174 6368 696e 6720 656c 656d 656e 7473 atching elements │ │ │ -00007c60: 2072 6570 6c61 6365 642e 0a4b 6579 776f replaced..Keywo │ │ │ -00007c70: 7264 7320 7375 7070 6f72 7465 643a 2020 rds supported: │ │ │ -00007c80: 3a74 6573 7420 3a74 6573 742d 6e6f 7420 :test :test-not │ │ │ -00007c90: 3a6b 6579 1f0a 2864 6566 616c 6961 7320 :key..(defalias │ │ │ -00007ca0: 2773 7562 6c69 7320 235b 2863 6c2d 616c 'sublis #[(cl-al │ │ │ -00007cb0: 6973 7420 636c 2d74 7265 6520 2672 6573 ist cl-tree &res │ │ │ -00007cc0: 7420 636c 2d6b 6579 7329 2022 c60d 7341 t cl-keys) "..sA │ │ │ -00007cd0: 401b c70d 7341 40ad 8ac7 0d73 4140 8913 @...sA@....sA@.. │ │ │ -00007ce0: ad81 c819 c90d 7341 4018 ca0d 7341 401a ......sA@...sA@. │ │ │ -00007cf0: cb0d 7341 40ad 8acb 0d73 4140 8912 ad81 ..sA@....sA@.... │ │ │ -00007d00: c81e 110d 891c ab9a 0c40 cc73 ac8d cd0d .........@.s.... │ │ │ -00007d10: 7341 40ac 86ce cf0c 405c 2288 0c41 4189 sA@.....@\"..AA. │ │ │ -00007d20: 14ac 6629 d00e 1221 2d87 2220 5b63 6c2d ..f)...!-." [cl- │ │ │ -00007d30: 6b65 7920 636c 2d74 6573 742d 6e6f 7420 key cl-test-not │ │ │ -00007d40: 636c 2d69 6620 636c 2d74 6573 7420 636c cl-if cl-test cl │ │ │ -00007d50: 2d6b 6579 732d 7465 6d70 2063 6c2d 6b65 -keys-temp cl-ke │ │ │ -00007d60: 7973 203a 7465 7374 203a 7465 7374 2d6e ys :test :test-n │ │ │ -00007d70: 6f74 2074 203a 6b65 7920 3a69 6620 3a69 ot t :key :if :i │ │ │ -00007d80: 662d 6e6f 7420 283a 7465 7374 203a 7465 f-not (:test :te │ │ │ -00007d90: 7374 2d6e 6f74 203a 6b65 7920 3a69 6620 st-not :key :if │ │ │ -00007da0: 3a69 662d 6e6f 7429 203a 616c 6c6f 772d :if-not) :allow- │ │ │ -00007db0: 6f74 6865 722d 6b65 7973 2065 7272 6f72 other-keys error │ │ │ -00007dc0: 2022 4261 6420 6b65 7977 6f72 6420 6172 "Bad keyword ar │ │ │ -00007dd0: 6775 6d65 6e74 2025 7322 2063 6c2d 7375 gument %s" cl-su │ │ │ -00007de0: 626c 6973 2d72 6563 2063 6c2d 6966 2d6e blis-rec cl-if-n │ │ │ -00007df0: 6f74 2063 6c2d 7472 6565 5d20 3420 2823 ot cl-tree] 4 (# │ │ │ -00007e00: 2420 2e20 3331 3732 3229 5d29 0a28 6465 $ . 31722)]).(de │ │ │ -00007e10: 6661 6c69 6173 2027 636c 2d73 7562 6c69 falias 'cl-subli │ │ │ -00007e20: 732d 7265 6320 235b 2863 6c2d 7472 6565 s-rec #[(cl-tree │ │ │ -00007e30: 2920 2209 ab85 090c 21aa 810c 0e09 1d1b ) ".....!....... │ │ │ -00007e40: 0dab b708 ab8c 080d 4040 0b5c 223f 0e5c ........@@.\"?.\ │ │ │ -00007e50: 6e61 aaa0 0e07 ab8a 0e07 0b21 3f0e 0b61 na.........!?..a │ │ │ -00007e60: aa92 0d40 40a7 ab87 0d40 400b 6baa 850d ...@@....@@.k... │ │ │ -00007e70: 4040 0b61 ac86 0d41 8915 ac49 0dab 850d @@.a...A...I.... │ │ │ -00007e80: 4041 aaa6 0c3a aba1 c60c 4021 c60c 4121 @A...:....@!..A! │ │ │ -00007e90: 1a89 1e08 0c40 61ab 895c 6e0c 4161 ab83 .....@a..\n.Aa.. │ │ │ -00007ea0: 0caa 840e 085c 6e42 2aaa 810c 2a87 2220 .....\nB*...*." │ │ │ -00007eb0: 5b63 6c2d 7465 7374 2063 6c2d 6b65 7920 [cl-test cl-key │ │ │ -00007ec0: 636c 2d64 2063 6c2d 7465 6d70 2063 6c2d cl-d cl-temp cl- │ │ │ -00007ed0: 7472 6565 2063 6c2d 7020 636c 2d73 7562 tree cl-p cl-sub │ │ │ -00007ee0: 6c69 732d 7265 6320 636c 2d69 6620 636c lis-rec cl-if cl │ │ │ -00007ef0: 2d61 2063 6c2d 616c 6973 7420 636c 2d74 -a cl-alist cl-t │ │ │ -00007f00: 6573 742d 6e6f 7420 636c 2d69 662d 6e6f est-not cl-if-no │ │ │ -00007f10: 745d 2034 5d29 0a23 4031 3733 2050 6572 t] 4]).#@173 Per │ │ │ -00007f20: 666f 726d 2073 7562 7374 6974 7574 696f form substitutio │ │ │ -00007f30: 6e73 2069 6e64 6963 6174 6564 2062 7920 ns indicated by │ │ │ -00007f40: 414c 4953 5420 696e 2054 5245 4520 2864 ALIST in TREE (d │ │ │ -00007f50: 6573 7472 7563 7469 7665 6c79 292e 0a41 estructively)..A │ │ │ -00007f60: 6e79 206d 6174 6368 696e 6720 656c 656d ny matching elem │ │ │ -00007f70: 656e 7420 6f66 2054 5245 4520 6973 2063 ent of TREE is c │ │ │ -00007f80: 6861 6e67 6564 2076 6961 2061 2063 616c hanged via a cal │ │ │ -00007f90: 6c20 746f 2060 7365 7463 6172 272e 0a4b l to `setcar'..K │ │ │ -00007fa0: 6579 776f 7264 7320 7375 7070 6f72 7465 eywords supporte │ │ │ -00007fb0: 643a 2020 3a74 6573 7420 3a74 6573 742d d: :test :test- │ │ │ -00007fc0: 6e6f 7420 3a6b 6579 1f0a 2864 6566 616c not :key..(defal │ │ │ -00007fd0: 6961 7320 276e 7375 626c 6973 2023 5b28 ias 'nsublis #[( │ │ │ -00007fe0: 636c 2d61 6c69 7374 2063 6c2d 7472 6565 cl-alist cl-tree │ │ │ -00007ff0: 2026 7265 7374 2063 6c2d 6b65 7973 2920 &rest cl-keys) │ │ │ -00008000: 22c6 0d73 4140 1ac7 0d73 4140 ad8a c70d "..sA@...sA@.... │ │ │ -00008010: 7341 4089 12ad 81c8 18c9 0d73 4140 1e11 sA@........sA@.. │ │ │ -00008020: ca0d 7341 4019 cb0d 7341 40ad 8acb 0d73 ..sA@...sA@....s │ │ │ -00008030: 4140 8911 ad81 c81e 120d 891c ab9a 0c40 A@.............@ │ │ │ -00008040: cc73 ac8d cd0d 7341 40ac 86ce cf0c 405c .s....sA@.....@\ │ │ │ -00008050: 2288 0c41 4189 14ac 6629 0e13 431b d00b "..AA...f)..C... │ │ │ -00008060: 2188 0b40 2e06 8722 205b 636c 2d74 6573 !..@..." [cl-tes │ │ │ -00008070: 742d 6e6f 7420 636c 2d69 6620 636c 2d74 t-not cl-if cl-t │ │ │ -00008080: 6573 7420 636c 2d68 6f6c 6420 636c 2d6b est cl-hold cl-k │ │ │ -00008090: 6579 732d 7465 6d70 2063 6c2d 6b65 7973 eys-temp cl-keys │ │ │ -000080a0: 203a 7465 7374 203a 7465 7374 2d6e 6f74 :test :test-not │ │ │ -000080b0: 2074 203a 6b65 7920 3a69 6620 3a69 662d t :key :if :if- │ │ │ -000080c0: 6e6f 7420 283a 7465 7374 203a 7465 7374 not (:test :test │ │ │ -000080d0: 2d6e 6f74 203a 6b65 7920 3a69 6620 3a69 -not :key :if :i │ │ │ -000080e0: 662d 6e6f 7429 203a 616c 6c6f 772d 6f74 f-not) :allow-ot │ │ │ -000080f0: 6865 722d 6b65 7973 2065 7272 6f72 2022 her-keys error " │ │ │ -00008100: 4261 6420 6b65 7977 6f72 6420 6172 6775 Bad keyword argu │ │ │ -00008110: 6d65 6e74 2025 7322 2063 6c2d 6e73 7562 ment %s" cl-nsub │ │ │ -00008120: 6c69 732d 7265 6320 636c 2d6b 6579 2063 lis-rec cl-key c │ │ │ -00008130: 6c2d 6966 2d6e 6f74 2063 6c2d 7472 6565 l-if-not cl-tree │ │ │ -00008140: 5d20 3420 2823 2420 2e20 3332 3534 3129 ] 4 (#$ . 32541) │ │ │ -00008150: 5d29 0a28 6465 6661 6c69 6173 2027 636c ]).(defalias 'cl │ │ │ -00008160: 2d6e 7375 626c 6973 2d72 6563 2023 5b28 -nsublis-rec #[( │ │ │ -00008170: 636c 2d74 7265 6529 2022 0c3a 85bc 005c cl-tree) ".:...\ │ │ │ -00008180: 6eab 865c 6e0c 4021 aa82 0c40 0e08 1d1b n..\n.@!...@.... │ │ │ -00008190: 0dab b509 ab8c 090d 4040 0b5c 223f 0e09 ........@@.\"?.. │ │ │ -000081a0: 61aa 9e08 ab89 080b 213f 0e5c 6e61 aa92 a.......!?.\na.. │ │ │ -000081b0: 0d40 40a7 ab87 0d40 400b 6baa 850d 4040 .@@....@@.k...@@ │ │ │ -000081c0: 0b61 ac86 0d41 8915 ac4b 0dab 880c 0d40 .a...A...K.....@ │ │ │ -000081d0: 41a0 88aa 8a0c 403a ab85 c60c 4021 885c A.....@:....@!.\ │ │ │ -000081e0: 6eab 865c 6e0c 4121 aa82 0c41 130e 0889 n..\n.A!...A.... │ │ │ -000081f0: 15ab b509 ab8c 090d 4040 0b5c 223f 0e09 ........@@.\"?.. │ │ │ -00008200: 61aa 9e08 ab89 080b 213f 0e5c 6e61 aa92 a.......!?.\na.. │ │ │ -00008210: 0d40 40a7 ab87 0d40 400b 6baa 850d 4040 .@@....@@.k...@@ │ │ │ -00008220: 0b61 ac86 0d41 8915 ac4b 0dab 8a0c 0d40 .a...A...K.....@ │ │ │ -00008230: 41a1 88c7 14aa 830c 4114 2a82 0000 8722 A.......A.*...." │ │ │ -00008240: 205b 636c 2d69 6620 636c 2d74 6573 7420 [cl-if cl-test │ │ │ -00008250: 636c 2d6b 6579 2063 6c2d 7465 6d70 2063 cl-key cl-temp c │ │ │ -00008260: 6c2d 7472 6565 2063 6c2d 7020 636c 2d6e l-tree cl-p cl-n │ │ │ -00008270: 7375 626c 6973 2d72 6563 206e 696c 2063 sublis-rec nil c │ │ │ -00008280: 6c2d 616c 6973 7420 636c 2d74 6573 742d l-alist cl-test- │ │ │ -00008290: 6e6f 7420 636c 2d69 662d 6e6f 745d 2034 not cl-if-not] 4 │ │ │ -000082a0: 5d29 0a23 4031 3534 2052 6574 7572 6e20 ]).#@154 Return │ │ │ -000082b0: 7420 6966 2074 7265 6573 2058 2061 6e64 t if trees X and │ │ │ -000082c0: 2059 2068 6176 6520 6065 716c 2720 6c65 Y have `eql' le │ │ │ -000082d0: 6176 6573 2e0a 4174 6f6d 7320 6172 6520 aves..Atoms are │ │ │ -000082e0: 636f 6d70 6172 6564 2062 7920 6065 716c compared by `eql │ │ │ -000082f0: 273b 2063 6f6e 7320 6365 6c6c 7320 6172 '; cons cells ar │ │ │ -00008300: 6520 636f 6d70 6172 6564 2072 6563 7572 e compared recur │ │ │ -00008310: 7369 7665 6c79 2e0a 4b65 7977 6f72 6473 sively..Keywords │ │ │ -00008320: 2073 7570 706f 7274 6564 3a20 203a 7465 supported: :te │ │ │ -00008330: 7374 203a 7465 7374 2d6e 6f74 203a 6b65 st :test-not :ke │ │ │ -00008340: 791f 0a28 6465 6661 6c69 6173 2027 7472 y..(defalias 'tr │ │ │ -00008350: 6565 2d65 7175 616c 2023 5b28 636c 2d78 ee-equal #[(cl-x │ │ │ -00008360: 2063 6c2d 7920 2672 6573 7420 636c 2d6b cl-y &rest cl-k │ │ │ -00008370: 6579 7329 2022 c60d 7341 401b c70d 7341 eys) "..sA@...sA │ │ │ -00008380: 40ad 8ac7 0d73 4140 8913 ad81 c81a c90d @....sA@........ │ │ │ -00008390: 7341 4019 0d89 1cab 9a0c 40ca 73ac 8dcb sA@.......@.s... │ │ │ -000083a0: 0d73 4140 ac86 cccd 0c40 5c22 880c 4141 .sA@.....@\"..AA │ │ │ -000083b0: 8914 ac66 29ce 080e 0f5c 222b 8722 205b ...f)....\"+." [ │ │ │ -000083c0: 636c 2d78 2063 6c2d 6b65 7920 636c 2d74 cl-x cl-key cl-t │ │ │ -000083d0: 6573 742d 6e6f 7420 636c 2d74 6573 7420 est-not cl-test │ │ │ -000083e0: 636c 2d6b 6579 732d 7465 6d70 2063 6c2d cl-keys-temp cl- │ │ │ -000083f0: 6b65 7973 203a 7465 7374 203a 7465 7374 keys :test :test │ │ │ -00008400: 2d6e 6f74 2074 203a 6b65 7920 283a 7465 -not t :key (:te │ │ │ -00008410: 7374 203a 7465 7374 2d6e 6f74 203a 6b65 st :test-not :ke │ │ │ -00008420: 7929 203a 616c 6c6f 772d 6f74 6865 722d y) :allow-other- │ │ │ -00008430: 6b65 7973 2065 7272 6f72 2022 4261 6420 keys error "Bad │ │ │ -00008440: 6b65 7977 6f72 6420 6172 6775 6d65 6e74 keyword argument │ │ │ -00008450: 2025 7322 2063 6c2d 7472 6565 2d65 7175 %s" cl-tree-equ │ │ │ -00008460: 616c 2d72 6563 2063 6c2d 795d 2034 2028 al-rec cl-y] 4 ( │ │ │ -00008470: 2324 202e 2033 3334 3439 295d 290a 2864 #$ . 33449)]).(d │ │ │ -00008480: 6566 616c 6961 7320 2763 6c2d 7472 6565 efalias 'cl-tree │ │ │ -00008490: 2d65 7175 616c 2d72 6563 2023 5b28 636c -equal-rec #[(cl │ │ │ -000084a0: 2d78 2063 6c2d 7929 2022 0b3a ab94 5c6e -x cl-y) ".:..\n │ │ │ -000084b0: 3aab 90c5 0b40 5c6e 405c 22ab 880b 4113 :....@\n@\"...A. │ │ │ -000084c0: 5c6e 4112 aa68 0b3a 3fad d35c 6e3a 3fad \nA..h.:?..\n:?. │ │ │ -000084d0: ce09 ab98 090c ab85 0c0b 21aa 810b 0cab ..........!..... │ │ │ -000084e0: 850c 5c6e 21aa 815c 6e5c 223f 0861 870c ..\n!..\n\"?.a.. │ │ │ -000084f0: ab85 0c0b 21aa 810b a7ab 940c ab85 0c0b ....!........... │ │ │ -00008500: 21aa 810b 0cab 850c 5c6e 21aa 815c 6e6b !.......\n!..\nk │ │ │ -00008510: 870c ab85 0c0b 21aa 810b 0cab 850c 5c6e ......!.......\n │ │ │ -00008520: 21aa 815c 6e61 8722 205b 636c 2d74 6573 !..\na." [cl-tes │ │ │ -00008530: 742d 6e6f 7420 636c 2d74 6573 7420 636c t-not cl-test cl │ │ │ -00008540: 2d79 2063 6c2d 7820 636c 2d6b 6579 2063 -y cl-x cl-key c │ │ │ -00008550: 6c2d 7472 6565 2d65 7175 616c 2d72 6563 l-tree-equal-rec │ │ │ -00008560: 5d20 345d 290a 2872 756e 2d68 6f6f 6b73 ] 4]).(run-hooks │ │ │ -00008570: 2027 636c 2d73 6571 2d6c 6f61 642d 686f 'cl-seq-load-ho │ │ │ -00008580: 6f6b 290a ok). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3130 2032 3032 310a 3b3b 3b20 :08:10 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6c2d 7365 712e 656c 4/lisp/cl-seq.el │ │ │ +00000090: 0a3b 3b3b 2065 6d61 6373 2076 6572 7369 .;;; emacs versi │ │ │ +000000a0: 6f6e 2032 312e 3420 2870 6174 6368 2032 on 21.4 (patch 2 │ │ │ +000000b0: 3429 2022 5374 616e 6461 7264 2043 2220 4) "Standard C" │ │ │ +000000c0: 5845 6d61 6373 204c 7563 6964 2e0a 3b3b XEmacs Lucid..;; │ │ │ +000000d0: 3b20 6279 7465 636f 6d70 2076 6572 7369 ; bytecomp versi │ │ │ +000000e0: 6f6e 2032 2e32 3720 5845 6d61 6373 3b20 on 2.27 XEmacs; │ │ │ +000000f0: 3230 3030 2d30 392d 3132 2e0a 3b3b 3b20 2000-09-12..;;; │ │ │ +00000100: 6f70 7469 6d69 7a61 7469 6f6e 2069 7320 optimization is │ │ │ +00000110: 6f6e 2e0a 3b3b 3b20 7468 6973 2066 696c on..;;; this fil │ │ │ +00000120: 6520 7573 6573 206f 7063 6f64 6573 2077 e uses opcodes w │ │ │ +00000130: 6869 6368 2064 6f20 6e6f 7420 6578 6973 hich do not exis │ │ │ +00000140: 7420 696e 2045 6d61 6373 2031 392e 0a0a t in Emacs 19... │ │ │ +00000150: 2869 6620 2861 6e64 2028 626f 756e 6470 (if (and (boundp │ │ │ +00000160: 2027 656d 6163 732d 7665 7273 696f 6e29 'emacs-version) │ │ │ +00000170: 0a09 2028 6f72 2028 616e 6420 2862 6f75 .. (or (and (bou │ │ │ +00000180: 6e64 7020 2765 706f 6368 3a3a 7665 7273 ndp 'epoch::vers │ │ │ +00000190: 696f 6e29 2065 706f 6368 3a3a 7665 7273 ion) epoch::vers │ │ │ +000001a0: 696f 6e29 0a09 2020 2020 2028 7374 7269 ion).. (stri │ │ │ +000001b0: 6e67 2d6c 6573 7370 2065 6d61 6373 2d76 ng-lessp emacs-v │ │ │ +000001c0: 6572 7369 6f6e 2022 3230 2229 2929 0a20 ersion "20"))). │ │ │ +000001d0: 2020 2028 6572 726f 7220 2260 636c 2d73 (error "`cl-s │ │ │ +000001e0: 6571 2e65 6c27 2077 6173 2063 6f6d 7069 eq.el' was compi │ │ │ +000001f0: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ +00000200: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ +00000210: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ +00000220: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ +00000230: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ +00000240: 2929 0a0a 0a28 6279 7465 2d63 6f64 6520 ))...(byte-code │ │ │ +00000250: 22c1 0873 ac84 c2c3 2188 c187 2220 5b66 "..s....!..." [f │ │ │ +00000260: 6561 7475 7265 7320 636c 2d31 3920 6572 eatures cl-19 er │ │ │ +00000270: 726f 7220 2254 7269 6564 2074 6f20 6c6f ror "Tried to lo │ │ │ +00000280: 6164 2060 636c 2d73 6571 2720 6265 666f ad `cl-seq' befo │ │ │ +00000290: 7265 2060 636c 2721 225d 2032 290a 2864 re `cl'!"] 2).(d │ │ │ +000002a0: 6566 616c 6961 7320 2763 6c2d 7075 7368 efalias 'cl-push │ │ │ +000002b0: 2027 286d 6163 726f 202e 2023 5b28 7820 '(macro . #[(x │ │ │ +000002c0: 706c 6163 6529 2022 c209 c308 0945 4587 place) ".....EE. │ │ │ +000002d0: 2220 5b78 2070 6c61 6365 2073 6574 7120 " [x place setq │ │ │ +000002e0: 636f 6e73 5d20 355d 2929 0a28 6465 6661 cons] 5])).(defa │ │ │ +000002f0: 6c69 6173 2027 636c 2d70 6f70 2027 286d lias 'cl-pop '(m │ │ │ +00000300: 6163 726f 202e 2023 5b28 706c 6163 6529 acro . #[(place) │ │ │ +00000310: 2022 c1c2 08c3 08c4 0844 4545 4487 2220 ".......DEED." │ │ │ +00000320: 5b70 6c61 6365 2063 6172 2070 726f 6731 [place car prog1 │ │ │ +00000330: 2073 6574 7120 6364 725d 2037 5d29 290a setq cdr] 7])). │ │ │ +00000340: 2340 3939 3820 4865 6c70 6572 206d 6163 #@998 Helper mac │ │ │ +00000350: 726f 2066 6f72 2066 756e 6374 696f 6e73 ro for functions │ │ │ +00000360: 2077 6974 6820 6b65 7977 6f72 6420 6172 with keyword ar │ │ │ +00000370: 6775 6d65 6e74 732e 0a54 6869 7320 6973 guments..This is │ │ │ +00000380: 2061 2074 656d 706f 7261 7279 2073 6f6c a temporary sol │ │ │ +00000390: 7574 696f 6e2c 2075 6e74 696c 206b 6579 ution, until key │ │ │ +000003a0: 776f 7264 2061 7267 756d 656e 7473 2061 word arguments a │ │ │ +000003b0: 7265 206e 6174 6976 656c 7920 7375 7070 re natively supp │ │ │ +000003c0: 6f72 7465 642e 0a44 6563 6c61 7265 2079 orted..Declare y │ │ │ +000003d0: 6f75 7220 6675 6e63 7469 6f6e 2065 6e64 our function end │ │ │ +000003e0: 696e 6720 7769 7468 2028 2e2e 2e20 2672 ing with (... &r │ │ │ +000003f0: 6573 7420 636c 2d6b 6579 7329 2c20 7468 est cl-keys), th │ │ │ +00000400: 656e 2077 7261 7020 7468 650a 6675 6e63 en wrap the.func │ │ │ +00000410: 7469 6f6e 2062 6f64 7920 696e 2061 2063 tion body in a c │ │ │ +00000420: 616c 6c20 746f 2060 636c 2d70 6172 7369 all to `cl-parsi │ │ │ +00000430: 6e67 2d6b 6579 776f 7264 7327 2e0a 0a4b ng-keywords'...K │ │ │ +00000440: 574f 5244 5320 6973 2061 206c 6973 7420 WORDS is a list │ │ │ +00000450: 6f66 206b 6579 776f 7264 2064 6566 696e of keyword defin │ │ │ +00000460: 6974 696f 6e73 2e20 2045 6163 6820 6465 itions. Each de │ │ │ +00000470: 6669 6e69 7469 6f6e 2073 686f 756c 6420 finition should │ │ │ +00000480: 6265 0a65 6974 6865 7220 6120 6b65 7977 be.either a keyw │ │ │ +00000490: 6f72 6420 6f72 2061 206c 6973 7420 284b ord or a list (K │ │ │ +000004a0: 4559 574f 5244 2044 4546 4155 4c54 2d56 EYWORD DEFAULT-V │ │ │ +000004b0: 414c 5545 292e 2020 496e 2074 6865 2066 ALUE). In the f │ │ │ +000004c0: 6f72 6d65 7220 6361 7365 2c0a 7468 6520 ormer case,.the │ │ │ +000004d0: 6465 6661 756c 7420 7661 6c75 6520 6973 default value is │ │ │ +000004e0: 206e 696c 2e20 2054 6865 206b 6579 776f nil. The keywo │ │ │ +000004f0: 7264 7320 6172 6520 6176 6169 6c61 626c rds are availabl │ │ │ +00000500: 6520 696e 2042 4f44 5920 6173 2074 6865 e in BODY as the │ │ │ +00000510: 206e 616d 650a 6f66 2074 6865 206b 6579 name.of the key │ │ │ +00000520: 776f 7264 2c20 6d69 6e75 7320 6974 7320 word, minus its │ │ │ +00000530: 696e 6974 6961 6c20 636f 6c6f 6e20 616e initial colon an │ │ │ +00000540: 6420 7072 6570 656e 6465 6420 7769 7468 d prepended with │ │ │ +00000550: 2060 636c 2d27 2e0a 0a4f 5448 4552 2d4b `cl-'...OTHER-K │ │ │ +00000560: 4559 5320 7370 6563 6966 6965 7320 6f74 EYS specifies ot │ │ │ +00000570: 6865 7220 6b65 7977 6f72 6473 2074 6861 her keywords tha │ │ │ +00000580: 7420 6172 6520 6163 6365 7074 6564 2062 t are accepted b │ │ │ +00000590: 7574 2069 676e 6f72 6564 2e20 2049 740a ut ignored. It. │ │ │ +000005a0: 6973 2065 6974 6865 7220 7468 6520 7661 is either the va │ │ │ +000005b0: 6c75 6520 2774 2720 2869 676e 6f72 6520 lue 't' (ignore │ │ │ +000005c0: 616c 6c20 6f74 6865 7220 6b65 7973 2c20 all other keys, │ │ │ +000005d0: 6571 7569 7661 6c65 6e74 2074 6f20 7468 equivalent to th │ │ │ +000005e0: 650a 2661 6c6c 6f77 2d6f 7468 6572 2d6b e.&allow-other-k │ │ │ +000005f0: 6579 7320 6172 6775 6d65 6e74 2064 6563 eys argument dec │ │ │ +00000600: 6c61 7261 7469 6f6e 2069 6e20 436f 6d6d laration in Comm │ │ │ +00000610: 6f6e 204c 6973 7029 206f 7220 6120 6c69 on Lisp) or a li │ │ │ +00000620: 7374 2069 6e20 7468 650a 7361 6d65 2066 st in the.same f │ │ │ +00000630: 6f72 6d61 7420 6173 204b 574f 5244 532e ormat as KWORDS. │ │ │ +00000640: 2020 4966 206b 6579 776f 7264 7320 6172 If keywords ar │ │ │ +00000650: 6520 6769 7665 6e20 7468 6174 2061 7265 e given that are │ │ │ +00000660: 206e 6f74 2069 6e20 4b57 4f52 4453 0a61 not in KWORDS.a │ │ │ +00000670: 6e64 206e 6f74 2061 6c6c 6f77 6564 2062 nd not allowed b │ │ │ +00000680: 7920 4f54 4845 522d 4b45 5953 2c20 616e y OTHER-KEYS, an │ │ │ +00000690: 2065 7272 6f72 2077 696c 6c20 6e6f 726d error will norm │ │ │ +000006a0: 616c 6c79 2062 6520 7369 676e 616c 6c65 ally be signalle │ │ │ +000006b0: 643b 2062 7574 0a74 6865 2063 616c 6c65 d; but.the calle │ │ │ +000006c0: 7220 6361 6e20 6f76 6572 7269 6465 2074 r can override t │ │ │ +000006d0: 6869 7320 6279 2073 7065 6369 6679 696e his by specifyin │ │ │ +000006e0: 6720 6120 6e6f 6e2d 6e69 6c20 7661 6c75 g a non-nil valu │ │ │ +000006f0: 6520 666f 7220 7468 650a 6b65 7977 6f72 e for the.keywor │ │ │ +00000700: 6420 3a61 6c6c 6f77 2d6f 7468 6572 2d6b d :allow-other-k │ │ │ +00000710: 6579 7320 2877 6869 6368 2064 6566 6175 eys (which defau │ │ │ +00000720: 6c74 7320 746f 2074 292e 1f0a 2864 6566 lts to t)...(def │ │ │ +00000730: 616c 6961 7320 2763 6c2d 7061 7273 696e alias 'cl-parsin │ │ │ +00000740: 672d 6b65 7977 6f72 6473 2027 286d 6163 g-keywords '(mac │ │ │ +00000750: 726f 202e 2023 5b28 6b77 6f72 6473 206f ro . #[(kwords o │ │ │ +00000760: 7468 6572 2d6b 6579 7320 2672 6573 7420 ther-keys &rest │ │ │ +00000770: 626f 6479 2920 22c3 c4c5 5c6e 5c22 c609 body) "...\n\".. │ │ │ +00000780: c761 3fad 98c8 c9ca cbcc cdce cfc4 d0c6 .a?............. │ │ │ +00000790: 5c6e 095c 225c 2244 45d1 d246 d346 4543 \n.\"\"DE..F.FEC │ │ │ +000007a0: 085c 2242 4287 2220 5b62 6f64 7920 6f74 .\"BB." [body ot │ │ │ +000007b0: 6865 722d 6b65 7973 206b 776f 7264 7320 her-keys kwords │ │ │ +000007c0: 6c65 742a 206d 6170 6361 7220 235b 2878 let* mapcar #[(x │ │ │ +000007d0: 2920 2209 3aab 8409 40aa 8109 18c3 c4c5 ) ".:...@....... │ │ │ +000007e0: c608 44c7 4544 441a 08c8 61ab 89c9 5c6e ..D.EDD...a...\n │ │ │ +000007f0: cacb 5c6e 45cc 4612 08cd 61ab 89c9 5c6e ..\nE.F...a...\n │ │ │ +00000800: cace 5c6e 45cc 4612 cfd0 d1d2 0821 d3d4 ..\nE.F......!.. │ │ │ +00000810: 4f5c 2221 093a ab88 d55c 6e09 4140 45aa O\"!.:...\n.A@E. │ │ │ +00000820: 815c 6e2a 4487 2220 5b76 6172 2078 206d .\n*D." [var x m │ │ │ +00000830: 656d 2063 6172 2063 6472 206d 656d 7120 em car cdr memq │ │ │ +00000840: 7175 6f74 6520 636c 2d6b 6579 7320 3a74 quote cl-keys :t │ │ │ +00000850: 6573 742d 6e6f 7420 616e 6420 7365 7471 est-not and setq │ │ │ +00000860: 2063 6c2d 7465 7374 2074 203a 6966 2d6e cl-test t :if-n │ │ │ +00000870: 6f74 2063 6c2d 6966 2069 6e74 6572 6e20 ot cl-if intern │ │ │ +00000880: 666f 726d 6174 2022 636c 2d25 7322 2073 format "cl-%s" s │ │ │ +00000890: 796d 626f 6c2d 6e61 6d65 2031 206e 696c ymbol-name 1 nil │ │ │ +000008a0: 206f 725d 2036 5d20 6170 7065 6e64 2074 or] 6] append t │ │ │ +000008b0: 206c 6574 2028 2863 6c2d 6b65 7973 2d74 let ((cl-keys-t │ │ │ +000008c0: 656d 7020 636c 2d6b 6579 7329 2920 7768 emp cl-keys)) wh │ │ │ +000008d0: 696c 6520 636c 2d6b 6579 732d 7465 6d70 ile cl-keys-temp │ │ │ +000008e0: 206f 7220 6d65 6d71 2028 6361 7220 636c or memq (car cl │ │ │ +000008f0: 2d6b 6579 732d 7465 6d70 2920 7175 6f74 -keys-temp) quot │ │ │ +00000900: 6520 235b 2878 2920 2208 3aab 8308 4087 e #[(x) ".:...@. │ │ │ +00000910: 0887 2220 5b78 5d20 315d 2028 6361 7220 .." [x] 1] (car │ │ │ +00000920: 2863 6472 2028 6d65 6d71 2027 3a61 6c6c (cdr (memq ':all │ │ │ +00000930: 6f77 2d6f 7468 6572 2d6b 6579 7320 636c ow-other-keys cl │ │ │ +00000940: 2d6b 6579 7329 2929 2028 6572 726f 7220 -keys))) (error │ │ │ +00000950: 2242 6164 206b 6579 776f 7264 2061 7267 "Bad keyword arg │ │ │ +00000960: 756d 656e 7420 2573 2220 2863 6172 2063 ument %s" (car c │ │ │ +00000970: 6c2d 6b65 7973 2d74 656d 7029 2920 2873 l-keys-temp)) (s │ │ │ +00000980: 6574 7120 636c 2d6b 6579 732d 7465 6d70 etq cl-keys-temp │ │ │ +00000990: 2028 6364 7220 2863 6472 2063 6c2d 6b65 (cdr (cdr cl-ke │ │ │ +000009a0: 7973 2d74 656d 7029 2929 5d20 3136 2028 ys-temp)))] 16 ( │ │ │ +000009b0: 2324 202e 2038 3338 295d 2929 0a28 6279 #$ . 838)])).(by │ │ │ +000009c0: 7465 2d63 6f64 6520 22c0 c1c2 c323 88c0 te-code "....#.. │ │ │ +000009d0: c1c4 c523 8722 205b 7075 7420 636c 2d70 ...#." [put cl-p │ │ │ +000009e0: 6172 7369 6e67 2d6b 6579 776f 7264 7320 arsing-keywords │ │ │ +000009f0: 6c69 7370 2d69 6e64 656e 742d 6675 6e63 lisp-indent-func │ │ │ +00000a00: 7469 6f6e 2032 2065 6465 6275 672d 666f tion 2 edebug-fo │ │ │ +00000a10: 726d 2d73 7065 6320 2873 6578 7020 7365 rm-spec (sexp se │ │ │ +00000a20: 7870 2026 7265 7374 2066 6f72 6d29 5d20 xp &rest form)] │ │ │ +00000a30: 3429 0a28 6465 6661 6c69 6173 2027 636c 4).(defalias 'cl │ │ │ +00000a40: 2d63 6865 636b 2d6b 6579 2027 286d 6163 -check-key '(mac │ │ │ +00000a50: 726f 202e 2023 5b28 7829 2022 c1c2 c3c2 ro . #[(x) ".... │ │ │ +00000a60: 0845 0846 8722 205b 7820 6966 2063 6c2d .E.F." [x if cl- │ │ │ +00000a70: 6b65 7920 6675 6e63 616c 6c5d 2035 5d29 key funcall] 5]) │ │ │ +00000a80: 290a 2864 6566 616c 6961 7320 2763 6c2d ).(defalias 'cl- │ │ │ +00000a90: 6368 6563 6b2d 7465 7374 2d6e 6f6b 6579 check-test-nokey │ │ │ +00000aa0: 2027 286d 6163 726f 202e 2023 5b28 6974 '(macro . #[(it │ │ │ +00000ab0: 656d 2078 2920 22c2 c3c4 c5c6 c309 0846 em x) "........F │ │ │ +00000ac0: 44c7 4544 c8c4 c5c6 c808 4544 c945 44ca D.ED......ED.ED. │ │ │ +00000ad0: cbcc 0944 cd09 0845 c409 0845 4644 4687 ...D...E...EFDF. │ │ │ +00000ae0: 2220 5b78 2069 7465 6d20 636f 6e64 2063 " [x item cond c │ │ │ +00000af0: 6c2d 7465 7374 2065 7120 6e6f 7420 6675 l-test eq not fu │ │ │ +00000b00: 6e63 616c 6c20 636c 2d74 6573 742d 6e6f ncall cl-test-no │ │ │ +00000b10: 7420 636c 2d69 6620 636c 2d69 662d 6e6f t cl-if cl-if-no │ │ │ +00000b20: 7420 7420 6966 206e 756d 6265 7270 2065 t t if numberp e │ │ │ +00000b30: 7175 616c 5d20 3130 5d29 290a 2864 6566 qual] 10])).(def │ │ │ +00000b40: 616c 6961 7320 2763 6c2d 6368 6563 6b2d alias 'cl-check- │ │ │ +00000b50: 7465 7374 2027 286d 6163 726f 202e 2023 test '(macro . # │ │ │ +00000b60: 5b28 6974 656d 2078 2920 22c2 09c3 0844 [(item x) "....D │ │ │ +00000b70: 4587 2220 5b78 2069 7465 6d20 636c 2d63 E." [x item cl-c │ │ │ +00000b80: 6865 636b 2d74 6573 742d 6e6f 6b65 7920 heck-test-nokey │ │ │ +00000b90: 636c 2d63 6865 636b 2d6b 6579 5d20 345d cl-check-key] 4] │ │ │ +00000ba0: 2929 0a28 6465 6661 6c69 6173 2027 636c )).(defalias 'cl │ │ │ +00000bb0: 2d63 6865 636b 2d6d 6174 6368 2027 286d -check-match '(m │ │ │ +00000bc0: 6163 726f 202e 2023 5b28 7820 7929 2022 acro . #[(x y) " │ │ │ +00000bd0: c209 4411 c208 4410 c3c4 c5c6 c7c4 0908 ..D...D......... │ │ │ +00000be0: 4644 c845 c3c9 0944 ca09 0845 c509 0845 FD.E...D...E...E │ │ │ +00000bf0: 4646 8722 205b 7920 7820 636c 2d63 6865 FF." [y x cl-che │ │ │ +00000c00: 636b 2d6b 6579 2069 6620 636c 2d74 6573 ck-key if cl-tes │ │ │ +00000c10: 7420 6571 206e 6f74 2066 756e 6361 6c6c t eq not funcall │ │ │ +00000c20: 2063 6c2d 7465 7374 2d6e 6f74 206e 756d cl-test-not num │ │ │ +00000c30: 6265 7270 2065 7175 616c 5d20 395d 2929 berp equal] 9])) │ │ │ +00000c40: 0a28 6279 7465 2d63 6f64 6520 22c0 c1c2 .(byte-code "... │ │ │ +00000c50: c323 88c0 c4c2 c323 88c0 c5c2 c323 88c0 .#.....#.....#.. │ │ │ +00000c60: c6c2 c323 8722 205b 7075 7420 636c 2d63 ...#." [put cl-c │ │ │ +00000c70: 6865 636b 2d6b 6579 2065 6465 6275 672d heck-key edebug- │ │ │ +00000c80: 666f 726d 2d73 7065 6320 6564 6562 7567 form-spec edebug │ │ │ +00000c90: 2d66 6f72 6d73 2063 6c2d 6368 6563 6b2d -forms cl-check- │ │ │ +00000ca0: 7465 7374 2063 6c2d 6368 6563 6b2d 7465 test cl-check-te │ │ │ +00000cb0: 7374 2d6e 6f6b 6579 2063 6c2d 6368 6563 st-nokey cl-chec │ │ │ +00000cc0: 6b2d 6d61 7463 685d 2034 290a 2340 3131 k-match] 4).#@11 │ │ │ +00000cd0: 3020 5265 6475 6365 2074 776f 2d61 7267 0 Reduce two-arg │ │ │ +00000ce0: 756d 656e 7420 4655 4e43 5449 4f4e 2061 ument FUNCTION a │ │ │ +00000cf0: 6372 6f73 7320 5345 5155 454e 4345 2e0a cross SEQUENCE.. │ │ │ +00000d00: 4b65 7977 6f72 6473 2073 7570 706f 7274 Keywords support │ │ │ +00000d10: 6564 3a20 203a 7374 6172 7420 3a65 6e64 ed: :start :end │ │ │ +00000d20: 203a 6672 6f6d 2d65 6e64 203a 696e 6974 :from-end :init │ │ │ +00000d30: 6961 6c2d 7661 6c75 6520 3a6b 6579 1f0a ial-value :key.. │ │ │ +00000d40: 2864 6566 616c 6961 7320 2772 6564 7563 (defalias 'reduc │ │ │ +00000d50: 6520 235b 2863 6c2d 6675 6e63 2063 6c2d e #[(cl-func cl- │ │ │ +00000d60: 7365 7120 2672 6573 7420 636c 2d6b 6579 seq &rest cl-key │ │ │ +00000d70: 7329 2022 c60c 7341 4018 c70c 7341 40ae s) "..sA@...sA@. │ │ │ +00000d80: 81c8 1e14 c90c 7341 401e 15ca 0c73 4140 ......sA@....sA@ │ │ │ +00000d90: 1e16 cb0c 7341 401b 0c89 19ab 9a09 40cc ....sA@.......@. │ │ │ +00000da0: 73ac 8dcd 0c73 4140 ac86 cecf 0940 5c22 s....sA@.....@\" │ │ │ +00000db0: 8809 4141 8911 ac66 290d 3cac 85d0 0dd1 ..AA...f).<..... │ │ │ +00000dc0: 5c22 15d2 0d0e 140e 1523 1508 ab83 0d9f \".......#...... │ │ │ +00000dd0: 15ca 0c73 ab84 0e16 aa99 0dab 930b ab89 ...s............ │ │ │ +00000de0: 0b0d 8941 1540 21aa 8a0d 8941 1540 aa83 ...A.@!....A.@.. │ │ │ +00000df0: 0e13 201a 08ab 9b0d abb3 0e13 0bab 890b .. ............. │ │ │ +00000e00: 0d89 4115 4021 aa85 0d89 4115 405c 6e5c ..A.@!....A.@\n\ │ │ │ +00000e10: 2212 aa65 0dab 980e 135c 6e0b ab89 0b0d "..e.....\n..... │ │ │ +00000e20: 8941 1540 21aa 850d 8941 1540 5c22 12aa .A.@!....A.@\".. │ │ │ +00000e30: 655c 6e2e 0687 2220 5b63 6c2d 6672 6f6d e\n..." [cl-from │ │ │ +00000e40: 2d65 6e64 2063 6c2d 6b65 7973 2d74 656d -end cl-keys-tem │ │ │ +00000e50: 7020 636c 2d61 6363 756d 2063 6c2d 6b65 p cl-accum cl-ke │ │ │ +00000e60: 7920 636c 2d6b 6579 7320 636c 2d73 6571 y cl-keys cl-seq │ │ │ +00000e70: 203a 6672 6f6d 2d65 6e64 203a 7374 6172 :from-end :star │ │ │ +00000e80: 7420 3020 3a65 6e64 203a 696e 6974 6961 t 0 :end :initia │ │ │ +00000e90: 6c2d 7661 6c75 6520 3a6b 6579 2028 3a66 l-value :key (:f │ │ │ +00000ea0: 726f 6d2d 656e 6420 3a73 7461 7274 203a rom-end :start : │ │ │ +00000eb0: 656e 6420 3a69 6e69 7469 616c 2d76 616c end :initial-val │ │ │ +00000ec0: 7565 203a 6b65 7929 203a 616c 6c6f 772d ue :key) :allow- │ │ │ +00000ed0: 6f74 6865 722d 6b65 7973 2065 7272 6f72 other-keys error │ │ │ +00000ee0: 2022 4261 6420 6b65 7977 6f72 6420 6172 "Bad keyword ar │ │ │ +00000ef0: 6775 6d65 6e74 2025 7322 2061 7070 656e gument %s" appen │ │ │ +00000f00: 6420 6e69 6c20 7375 6273 6571 2063 6c2d d nil subseq cl- │ │ │ +00000f10: 6675 6e63 2063 6c2d 7374 6172 7420 636c func cl-start cl │ │ │ +00000f20: 2d65 6e64 2063 6c2d 696e 6974 6961 6c2d -end cl-initial- │ │ │ +00000f30: 7661 6c75 655d 2036 2028 2324 202e 2033 value] 6 (#$ . 3 │ │ │ +00000f40: 3238 3229 5d29 0a23 4037 3020 4669 6c6c 282)]).#@70 Fill │ │ │ +00000f50: 2074 6865 2065 6c65 6d65 6e74 7320 6f66 the elements of │ │ │ +00000f60: 2053 4551 2077 6974 6820 4954 454d 2e0a SEQ with ITEM.. │ │ │ +00000f70: 4b65 7977 6f72 6473 2073 7570 706f 7274 Keywords support │ │ │ +00000f80: 6564 3a20 203a 7374 6172 7420 3a65 6e64 ed: :start :end │ │ │ +00000f90: 1f0a 2864 6566 616c 6961 7320 2766 696c ..(defalias 'fil │ │ │ +00000fa0: 6c20 235b 2873 6571 2069 7465 6d20 2672 l #[(seq item &r │ │ │ +00000fb0: 6573 7420 636c 2d6b 6579 7329 2022 c609 est cl-keys) ".. │ │ │ +00000fc0: 7341 40ae 81c7 1dc8 0973 4140 1c09 891a sA@......sA@.... │ │ │ +00000fd0: ab9a 5c6e 40c9 73ac 8dca 0973 4140 ac86 ..\n@.s....sA@.. │ │ │ +00000fe0: cbcc 5c6e 405c 2288 5c6e 4141 8912 ac66 ..\n@\".\nAA...f │ │ │ +00000ff0: 290b 3cab aa0d 0b9b 0cab 850c 0d5a aa81 ).<..........Z.. │ │ │ +00001000: cd1e 0f89 18ab 950e 0f53 8916 0fc7 59ab .........S....Y. │ │ │ +00001010: 8b08 0e10 a088 0841 8910 ac6b 2aaa aa0c .......A...k*... │ │ │ +00001020: ac83 0b47 140d c755 ab8e 0c0b 4755 ab88 ...G...U....GU.. │ │ │ +00001030: ce0b 0e10 5c22 88aa 910d 0c57 ab8c 0b0d ....\".....W.... │ │ │ +00001040: 0e10 4988 0d54 8915 aa70 0b2a 8722 205b ..I..T...p.*." [ │ │ │ +00001050: 7020 636c 2d6b 6579 7320 636c 2d6b 6579 p cl-keys cl-key │ │ │ +00001060: 732d 7465 6d70 2073 6571 2063 6c2d 656e s-temp seq cl-en │ │ │ +00001070: 6420 636c 2d73 7461 7274 203a 7374 6172 d cl-start :star │ │ │ +00001080: 7420 3020 3a65 6e64 2028 3a73 7461 7274 t 0 :end (:start │ │ │ +00001090: 203a 656e 6429 203a 616c 6c6f 772d 6f74 :end) :allow-ot │ │ │ +000010a0: 6865 722d 6b65 7973 2065 7272 6f72 2022 her-keys error " │ │ │ +000010b0: 4261 6420 6b65 7977 6f72 6420 6172 6775 Bad keyword argu │ │ │ +000010c0: 6d65 6e74 2025 7322 2038 3030 3030 3030 ment %s" 8000000 │ │ │ +000010d0: 2066 696c 6c61 7272 6179 206e 2069 7465 fillarray n ite │ │ │ +000010e0: 6d5d 2034 2028 2324 202e 2033 3931 3629 m] 4 (#$ . 3916) │ │ │ +000010f0: 5d29 0a23 4031 3533 2052 6570 6c61 6365 ]).#@153 Replace │ │ │ +00001100: 2074 6865 2065 6c65 6d65 6e74 7320 6f66 the elements of │ │ │ +00001110: 2053 4551 3120 7769 7468 2074 6865 2065 SEQ1 with the e │ │ │ +00001120: 6c65 6d65 6e74 7320 6f66 2053 4551 322e lements of SEQ2. │ │ │ +00001130: 0a53 4551 3120 6973 2064 6573 7472 7563 .SEQ1 is destruc │ │ │ +00001140: 7469 7665 6c79 206d 6f64 6966 6965 642c tively modified, │ │ │ +00001150: 2074 6865 6e20 7265 7475 726e 6564 2e0a then returned.. │ │ │ +00001160: 4b65 7977 6f72 6473 2073 7570 706f 7274 Keywords support │ │ │ +00001170: 6564 3a20 203a 7374 6172 7431 203a 656e ed: :start1 :en │ │ │ +00001180: 6431 203a 7374 6172 7432 203a 656e 6432 d1 :start2 :end2 │ │ │ +00001190: 1f0a 2864 6566 616c 6961 7320 2772 6570 ..(defalias 'rep │ │ │ +000011a0: 6c61 6365 2023 5b28 636c 2d73 6571 3120 lace #[(cl-seq1 │ │ │ +000011b0: 636c 2d73 6571 3220 2672 6573 7420 636c cl-seq2 &rest cl │ │ │ +000011c0: 2d6b 6579 7329 2022 c60e 1373 4140 ae81 -keys) "...sA@.. │ │ │ +000011d0: c71c c80e 1373 4140 1e10 c90e 1373 4140 .....sA@.....sA@ │ │ │ +000011e0: ae81 c71d ca0e 1373 4140 1e11 0e13 891e .......sA@...... │ │ │ +000011f0: 14ab 9f0e 1440 cb73 ac8f cc0e 1373 4140 .....@.s.....sA@ │ │ │ +00001200: ac87 cdce 0e14 405c 2288 0e14 4141 8916 ......@\"...AA.. │ │ │ +00001210: 14ac 6129 5c6e 0b61 abdb 0d0c 58ab d60c ..a)\n.a....X... │ │ │ +00001220: 0d55 8468 015c 6e47 1e15 0e10 ae82 0e15 .U.h.\nG........ │ │ │ +00001230: 0c5a 0e11 ae82 0e15 0d5a 5e1e 120e 1253 .Z.......Z^....S │ │ │ +00001240: 8916 12c7 59ab ab5c 6e0c 0e12 5c5c 0b0d ....Y..\n...\\.. │ │ │ +00001250: 0e12 5c5c 9c1e 161e 1789 1e18 3cab 8b0e ..\\........<... │ │ │ +00001260: 170e 189b 0e16 a088 aa88 0e18 0e17 0e16 ................ │ │ │ +00001270: 4988 2baa 4b2a 8268 015c 6e3c abf0 0c5c I.+.K*.h.\n<...\ │ │ │ +00001280: 6e9b 0e10 ab86 0e10 0c5a aa81 cf1e 1919 n........Z...... │ │ │ +00001290: 0b3c abb4 0d0b 9b0e 190e 11ab 860e 110d .<.............. │ │ │ +000012a0: 5aaa 81cf 5e1e 1218 09ab 9a08 ab97 0e12 Z...^........... │ │ │ +000012b0: 5389 1612 c759 ab8d 0908 40a0 8809 4111 S....Y....@...A. │ │ │ +000012c0: 0841 10aa 632a aaa4 0e11 ae82 0b47 0d0e .A..c*.......G.. │ │ │ +000012d0: 195c 5c5e 1611 09ab 940d 0e11 57ab 8e09 .\\^........W... │ │ │ +000012e0: 0b0d 48a0 8809 4111 0d54 15aa 692a aac9 ..H...A..T..i*.. │ │ │ +000012f0: 0e10 ae82 5c6e 470c 0e11 ae82 0b47 0d5a ....\nG......G.Z │ │ │ +00001300: 5c5c 5e16 100b 3cab 9c0d 0b9b 180c 0e10 \\^...<......... │ │ │ +00001310: 57ab 8f5c 6e0c 0840 4988 0841 100c 5489 W..\n..@I..A..T. │ │ │ +00001320: 14aa 6c29 aa96 0c0e 1057 ab90 5c6e 0c0b ..l).....W..\n.. │ │ │ +00001330: 0d48 4988 0d54 150c 5489 14aa 6b5c 6e2c .HI..T..T...k\n, │ │ │ +00001340: 8722 205b 636c 2d70 3220 636c 2d70 3120 ." [cl-p2 cl-p1 │ │ │ +00001350: 636c 2d73 6571 3120 636c 2d73 6571 3220 cl-seq1 cl-seq2 │ │ │ +00001360: 636c 2d73 7461 7274 3120 636c 2d73 7461 cl-start1 cl-sta │ │ │ +00001370: 7274 3220 3a73 7461 7274 3120 3020 3a65 rt2 :start1 0 :e │ │ │ +00001380: 6e64 3120 3a73 7461 7274 3220 3a65 6e64 nd1 :start2 :end │ │ │ +00001390: 3220 283a 7374 6172 7431 203a 656e 6431 2 (:start1 :end1 │ │ │ +000013a0: 203a 7374 6172 7432 203a 656e 6432 2920 :start2 :end2) │ │ │ +000013b0: 3a61 6c6c 6f77 2d6f 7468 6572 2d6b 6579 :allow-other-key │ │ │ +000013c0: 7320 6572 726f 7220 2242 6164 206b 6579 s error "Bad key │ │ │ +000013d0: 776f 7264 2061 7267 756d 656e 7420 2573 word argument %s │ │ │ +000013e0: 2220 3430 3030 3030 3020 636c 2d65 6e64 " 4000000 cl-end │ │ │ +000013f0: 3120 636c 2d65 6e64 3220 636c 2d6e 2063 1 cl-end2 cl-n c │ │ │ +00001400: 6c2d 6b65 7973 2063 6c2d 6b65 7973 2d74 l-keys cl-keys-t │ │ │ +00001410: 656d 7020 636c 2d6c 656e 2076 616c 206e emp cl-len val n │ │ │ +00001420: 2073 6571 2063 6c2d 6e31 5d20 3620 2823 seq cl-n1] 6 (# │ │ │ +00001430: 2420 2e20 3433 3435 295d 290a 2340 3232 $ . 4345)]).#@22 │ │ │ +00001440: 3120 5265 6d6f 7665 2061 6c6c 206f 6363 1 Remove all occ │ │ │ +00001450: 7572 7265 6e63 6573 206f 6620 4954 454d urrences of ITEM │ │ │ +00001460: 2069 6e20 5345 512e 0a54 6869 7320 6973 in SEQ..This is │ │ │ +00001470: 2061 206e 6f6e 2d64 6573 7472 7563 7469 a non-destructi │ │ │ +00001480: 7665 2066 756e 6374 696f 6e3b 2069 7420 ve function; it │ │ │ +00001490: 6d61 6b65 7320 6120 636f 7079 206f 6620 makes a copy of │ │ │ +000014a0: 5345 5120 6966 206e 6563 6573 7361 7279 SEQ if necessary │ │ │ +000014b0: 0a74 6f20 6176 6f69 6420 636f 7272 7570 .to avoid corrup │ │ │ +000014c0: 7469 6e67 2074 6865 206f 7269 6769 6e61 ting the origina │ │ │ +000014d0: 6c20 5345 512e 0a4b 6579 776f 7264 7320 l SEQ..Keywords │ │ │ +000014e0: 7375 7070 6f72 7465 643a 2020 3a74 6573 supported: :tes │ │ │ +000014f0: 7420 3a74 6573 742d 6e6f 7420 3a6b 6579 t :test-not :key │ │ │ +00001500: 203a 636f 756e 7420 3a73 7461 7274 203a :count :start : │ │ │ +00001510: 656e 6420 3a66 726f 6d2d 656e 641f 0a28 end :from-end..( │ │ │ +00001520: 6465 6661 6c69 6173 2027 7265 6d6f 7665 defalias 'remove │ │ │ +00001530: 2a20 235b 2863 6c2d 6974 656d 2063 6c2d * #[(cl-item cl- │ │ │ +00001540: 7365 7120 2672 6573 7420 636c 2d6b 6579 seq &rest cl-key │ │ │ +00001550: 7329 2022 c65c 6e73 4140 1e21 c75c 6e73 s) ".\nsA@.!.\ns │ │ │ +00001560: 4140 ad8b c75c 6e73 4140 8916 21ad 81c8 A@...\nsA@..!... │ │ │ +00001570: 1e27 c95c 6e73 4140 1cca 5c6e 7341 401e .'.\nsA@..\nsA@. │ │ │ +00001580: 5c22 cb5c 6e73 4140 ad8b cb5c 6e73 4140 \".\nsA@...\nsA@ │ │ │ +00001590: 8916 5c22 ad81 c81e 28cc 5c6e 7341 401e ..\"....(.\nsA@. │ │ │ +000015a0: 20cd 5c6e 7341 401e 25ce 5c6e 7341 40ae .\nsA@.%.\nsA@. │ │ │ +000015b0: 81cf 1e23 d05c 6e73 4140 195c 6e89 1e24 ...#.\nsA@.\n..$ │ │ │ +000015c0: ab9e 0e24 40d1 73ac 8ed2 5c6e 7341 40ac ...$@.s...\nsA@. │ │ │ +000015d0: 87d3 d40e 2440 5c22 880e 2441 4189 1624 ....$@\"..$AA..$ │ │ │ +000015e0: ac62 290e 20ae 84d5 8916 20cf 58ab 840d .b). ..... .X... │ │ │ +000015f0: 8218 020d 3cab 8a0e 25ab ce0e 20d6 57ab ....<...%... .W. │ │ │ +00001600: c8d7 080d 0e23 090e 2525 891e 29ab b5d8 .....#..%%..)... │ │ │ +00001610: d908 da0d db5c 22da 0e25 ab87 d00e 2954 .....\"..%....)T │ │ │ +00001620: 44aa 84ce 0e29 445c 6e5c 2224 1e26 0d3c D....)D\n\"$.&.< │ │ │ +00001630: ab84 0e26 aa8e 0d3b ab86 0e26 b001 aa84 ...&...;...&.... │ │ │ +00001640: dc0e 2621 29aa 810d 2982 1802 09ae 81d5 ..&!)...)....... │ │ │ +00001650: 0e23 5a11 0e23 cf55 abee 0dab eb09 cf56 .#Z..#.U.......V │ │ │ +00001660: abe6 0e21 ab95 0e21 080c ab86 0c0d 4021 ...!...!......@! │ │ │ +00001670: aa82 0d40 5c22 3f0e 2761 aab8 0e5c 22ab ...@\"?.'a...\". │ │ │ +00001680: 940e 5c22 0cab 860c 0d40 21aa 820d 4021 ..\".....@!...@! │ │ │ +00001690: 3f0e 2861 aaa0 08a7 ab8f 080c ab86 0c0d ?.(a............ │ │ │ +000016a0: 4021 aa82 0d40 6baa 8d08 0cab 860c 0d40 @!...@k........@ │ │ │ +000016b0: 21aa 820d 4061 ab93 0953 110d 4189 15ab !...@a...S..A... │ │ │ +000016c0: 8a0e 2053 8916 20cf 56ac 120e 20cf 5683 .. S.. .V... .V. │ │ │ +000016d0: 1702 09cf 5683 1702 0e23 cf56 ab86 0e23 ....V....#.V...# │ │ │ +000016e0: 0d9b aa85 0953 110d 411b 0bab e009 cf56 .....S..A......V │ │ │ +000016f0: abdb 0e21 ab95 0e21 080c ab86 0c0b 4021 ...!...!......@! │ │ │ +00001700: aa82 0b40 5c22 3f0e 2761 aab8 0e5c 22ab ...@\"?.'a...\". │ │ │ +00001710: 940e 5c22 0cab 860c 0b40 21aa 820b 4021 ..\".....@!...@! │ │ │ +00001720: 3f0e 2861 aaa0 08a7 ab8f 080c ab86 0c0b ?.(a............ │ │ │ +00001730: 4021 aa82 0b40 6baa 8d08 0cab 860c 0b40 @!...@k........@ │ │ │ +00001740: 21aa 820b 4061 ac88 0b41 1309 5311 aa1d !...@a...A..S... │ │ │ +00001750: 0bab ad09 cf56 aba8 dd0d 0b5c 220e 20de .....V.....\". . │ │ │ +00001760: 55ab 840b 41aa 970b 41ad 93d8 d908 df0b U...A...A....... │ │ │ +00001770: 4121 cecf d009 53cc 0e20 535c 6e26 5c6e A!....S.. S\n&\n │ │ │ +00001780: a4aa 810d 29aa 810d 2e09 8722 205b 636c ....)......" [cl │ │ │ +00001790: 2d69 7465 6d20 636c 2d65 6e64 2063 6c2d -item cl-end cl- │ │ │ +000017a0: 6b65 7973 2063 6c2d 7020 636c 2d6b 6579 keys cl-p cl-key │ │ │ +000017b0: 2063 6c2d 7365 7120 3a74 6573 7420 3a74 cl-seq :test :t │ │ │ +000017c0: 6573 742d 6e6f 7420 7420 3a6b 6579 203a est-not t :key : │ │ │ +000017d0: 6966 203a 6966 2d6e 6f74 203a 636f 756e if :if-not :coun │ │ │ +000017e0: 7420 3a66 726f 6d2d 656e 6420 3a73 7461 t :from-end :sta │ │ │ +000017f0: 7274 2030 203a 656e 6420 283a 7465 7374 rt 0 :end (:test │ │ │ +00001800: 203a 7465 7374 2d6e 6f74 203a 6b65 7920 :test-not :key │ │ │ +00001810: 3a69 6620 3a69 662d 6e6f 7420 3a63 6f75 :if :if-not :cou │ │ │ +00001820: 6e74 203a 6672 6f6d 2d65 6e64 203a 7374 nt :from-end :st │ │ │ +00001830: 6172 7420 3a65 6e64 2920 3a61 6c6c 6f77 art :end) :allow │ │ │ +00001840: 2d6f 7468 6572 2d6b 6579 7320 6572 726f -other-keys erro │ │ │ +00001850: 7220 2242 6164 206b 6579 776f 7264 2061 r "Bad keyword a │ │ │ +00001860: 7267 756d 656e 7420 2573 2220 3830 3030 rgument %s" 8000 │ │ │ +00001870: 3030 3020 3430 3030 3030 3020 636c 2d70 000 4000000 cl-p │ │ │ +00001880: 6f73 6974 696f 6e20 6170 706c 7920 6465 osition apply de │ │ │ +00001890: 6c65 7465 2a20 6170 7065 6e64 206e 696c lete* append nil │ │ │ +000018a0: 2076 636f 6e63 6174 206c 6469 6666 2031 vconcat ldiff 1 │ │ │ +000018b0: 2063 6f70 792d 7365 7175 656e 6365 2063 copy-sequence c │ │ │ +000018c0: 6c2d 636f 756e 7420 636c 2d74 6573 7420 l-count cl-test │ │ │ +000018d0: 636c 2d69 6620 636c 2d73 7461 7274 2063 cl-if cl-start c │ │ │ +000018e0: 6c2d 6b65 7973 2d74 656d 7020 636c 2d66 l-keys-temp cl-f │ │ │ +000018f0: 726f 6d2d 656e 6420 636c 2d72 6573 2063 rom-end cl-res c │ │ │ +00001900: 6c2d 7465 7374 2d6e 6f74 2063 6c2d 6966 l-test-not cl-if │ │ │ +00001910: 2d6e 6f74 2063 6c2d 695d 2031 3320 2823 -not cl-i] 13 (# │ │ │ +00001920: 2420 2e20 3531 3836 295d 290a 2340 3231 $ . 5186)]).#@21 │ │ │ +00001930: 3220 5265 6d6f 7665 2061 6c6c 2069 7465 2 Remove all ite │ │ │ +00001940: 6d73 2073 6174 6973 6679 696e 6720 5052 ms satisfying PR │ │ │ +00001950: 4544 4943 4154 4520 696e 2053 4551 2e0a EDICATE in SEQ.. │ │ │ +00001960: 5468 6973 2069 7320 6120 6e6f 6e2d 6465 This is a non-de │ │ │ +00001970: 7374 7275 6374 6976 6520 6675 6e63 7469 structive functi │ │ │ +00001980: 6f6e 3b20 6974 206d 616b 6573 2061 2063 on; it makes a c │ │ │ +00001990: 6f70 7920 6f66 2053 4551 2069 6620 6e65 opy of SEQ if ne │ │ │ +000019a0: 6365 7373 6172 790a 746f 2061 766f 6964 cessary.to avoid │ │ │ +000019b0: 2063 6f72 7275 7074 696e 6720 7468 6520 corrupting the │ │ │ +000019c0: 6f72 6967 696e 616c 2053 4551 2e0a 4b65 original SEQ..Ke │ │ │ +000019d0: 7977 6f72 6473 2073 7570 706f 7274 6564 ywords supported │ │ │ +000019e0: 3a20 203a 6b65 7920 3a63 6f75 6e74 203a : :key :count : │ │ │ +000019f0: 7374 6172 7420 3a65 6e64 203a 6672 6f6d start :end :from │ │ │ +00001a00: 2d65 6e64 1f0a 2864 6566 616c 6961 7320 -end..(defalias │ │ │ +00001a10: 2772 656d 6f76 652d 6966 2023 5b28 636c 'remove-if #[(cl │ │ │ +00001a20: 2d70 7265 6420 636c 2d6c 6973 7420 2672 -pred cl-list &r │ │ │ +00001a30: 6573 7420 636c 2d6b 6579 7329 2022 c3c4 est cl-keys) ".. │ │ │ +00001a40: c55c 6ec6 0908 2606 8722 205b 636c 2d6b .\n...&.." [cl-k │ │ │ +00001a50: 6579 7320 636c 2d70 7265 6420 636c 2d6c eys cl-pred cl-l │ │ │ +00001a60: 6973 7420 6170 706c 7920 7265 6d6f 7665 ist apply remove │ │ │ +00001a70: 2a20 6e69 6c20 3a69 665d 2037 2028 2324 * nil :if] 7 (#$ │ │ │ +00001a80: 202e 2036 3435 3029 5d29 0a23 4032 3136 . 6450)]).#@216 │ │ │ +00001a90: 2052 656d 6f76 6520 616c 6c20 6974 656d Remove all item │ │ │ +00001aa0: 7320 6e6f 7420 7361 7469 7366 7969 6e67 s not satisfying │ │ │ +00001ab0: 2050 5245 4449 4341 5445 2069 6e20 5345 PREDICATE in SE │ │ │ +00001ac0: 512e 0a54 6869 7320 6973 2061 206e 6f6e Q..This is a non │ │ │ +00001ad0: 2d64 6573 7472 7563 7469 7665 2066 756e -destructive fun │ │ │ +00001ae0: 6374 696f 6e3b 2069 7420 6d61 6b65 7320 ction; it makes │ │ │ +00001af0: 6120 636f 7079 206f 6620 5345 5120 6966 a copy of SEQ if │ │ │ +00001b00: 206e 6563 6573 7361 7279 0a74 6f20 6176 necessary.to av │ │ │ +00001b10: 6f69 6420 636f 7272 7570 7469 6e67 2074 oid corrupting t │ │ │ +00001b20: 6865 206f 7269 6769 6e61 6c20 5345 512e he original SEQ. │ │ │ +00001b30: 0a4b 6579 776f 7264 7320 7375 7070 6f72 .Keywords suppor │ │ │ +00001b40: 7465 643a 2020 3a6b 6579 203a 636f 756e ted: :key :coun │ │ │ +00001b50: 7420 3a73 7461 7274 203a 656e 6420 3a66 t :start :end :f │ │ │ +00001b60: 726f 6d2d 656e 641f 0a28 6465 6661 6c69 rom-end..(defali │ │ │ +00001b70: 6173 2027 7265 6d6f 7665 2d69 662d 6e6f as 'remove-if-no │ │ │ +00001b80: 7420 235b 2863 6c2d 7072 6564 2063 6c2d t #[(cl-pred cl- │ │ │ +00001b90: 6c69 7374 2026 7265 7374 2063 6c2d 6b65 list &rest cl-ke │ │ │ +00001ba0: 7973 2920 22c3 c4c5 5c6e c609 0826 0687 ys) "...\n...&.. │ │ │ +00001bb0: 2220 5b63 6c2d 6b65 7973 2063 6c2d 7072 " [cl-keys cl-pr │ │ │ +00001bc0: 6564 2063 6c2d 6c69 7374 2061 7070 6c79 ed cl-list apply │ │ │ +00001bd0: 2072 656d 6f76 652a 206e 696c 203a 6966 remove* nil :if │ │ │ +00001be0: 2d6e 6f74 5d20 3720 2823 2420 2e20 3638 -not] 7 (#$ . 68 │ │ │ +00001bf0: 3031 295d 290a 2340 3139 3120 5265 6d6f 01)]).#@191 Remo │ │ │ +00001c00: 7665 2061 6c6c 206f 6363 7572 7265 6e63 ve all occurrenc │ │ │ +00001c10: 6573 206f 6620 4954 454d 2069 6e20 5345 es of ITEM in SE │ │ │ +00001c20: 512e 0a54 6869 7320 6973 2061 2064 6573 Q..This is a des │ │ │ +00001c30: 7472 7563 7469 7665 2066 756e 6374 696f tructive functio │ │ │ +00001c40: 6e3b 2069 7420 7265 7573 6573 2074 6865 n; it reuses the │ │ │ +00001c50: 2073 746f 7261 6765 206f 6620 5345 5120 storage of SEQ │ │ │ +00001c60: 7768 656e 6576 6572 2070 6f73 7369 626c whenever possibl │ │ │ +00001c70: 652e 0a4b 6579 776f 7264 7320 7375 7070 e..Keywords supp │ │ │ +00001c80: 6f72 7465 643a 2020 3a74 6573 7420 3a74 orted: :test :t │ │ │ +00001c90: 6573 742d 6e6f 7420 3a6b 6579 203a 636f est-not :key :co │ │ │ +00001ca0: 756e 7420 3a73 7461 7274 203a 656e 6420 unt :start :end │ │ │ +00001cb0: 3a66 726f 6d2d 656e 641f 0a28 6465 6661 :from-end..(defa │ │ │ +00001cc0: 6c69 6173 2027 6465 6c65 7465 2a20 235b lias 'delete* #[ │ │ │ +00001cd0: 2863 6c2d 6974 656d 2063 6c2d 7365 7120 (cl-item cl-seq │ │ │ +00001ce0: 2672 6573 7420 636c 2d6b 6579 7329 2022 &rest cl-keys) " │ │ │ +00001cf0: c65c 6e73 4140 1e1e c75c 6e73 4140 ad8b .\nsA@...\nsA@.. │ │ │ +00001d00: c75c 6e73 4140 8916 1ead 81c8 1e5c 22c9 .\nsA@.......\". │ │ │ +00001d10: 5c6e 7341 401c ca5c 6e73 4140 1e1f cb5c \nsA@..\nsA@...\ │ │ │ +00001d20: 6e73 4140 ad8b cb5c 6e73 4140 8916 1fad nsA@...\nsA@.... │ │ │ +00001d30: 81c8 1e23 cc5c 6e73 4140 18cd 5c6e 7341 ...#.\nsA@..\nsA │ │ │ +00001d40: 401e 24ce 5c6e 7341 40ae 81cf 1e1d d05c @.$.\nsA@......\ │ │ │ +00001d50: 6e73 4140 1b5c 6e89 1e20 ab9e 0e20 40d1 nsA@.\n.. ... @. │ │ │ +00001d60: 73ac 8ed2 5c6e 7341 40ac 87d3 d40e 2040 s...\nsA@..... @ │ │ │ +00001d70: 5c22 880e 2041 4189 1620 ac62 2908 ae83 \".. AA.. .b)... │ │ │ +00001d80: d589 10cf 58ab 840d 82fe 010d 3c83 f701 ....X.......<... │ │ │ +00001d90: 0e24 abc2 08d6 57ab bdd7 1e21 0853 8910 .$....W....!.S.. │ │ │ +00001da0: cf59 abad d80e 1c0d 0e1d 0b0e 2425 8916 .Y..........$%.. │ │ │ +00001db0: 21ab 9e0e 21cf 55ab 850d 4115 aa8e 0e21 !...!.U...A....! │ │ │ +00001dc0: 530d 9b89 1e25 8941 41a1 8829 0e21 13aa S....%.AA..).!.. │ │ │ +00001dd0: 4b0d 2982 fe01 0bae 81d5 0e1d 5a13 0e1d K.).........Z... │ │ │ +00001de0: cf55 abf5 0dab ed0b cf56 abe8 0e1e ab96 .U.......V...... │ │ │ +00001df0: 0e1e 0e1c 0cab 860c 0d40 21aa 820d 405c .........@!...@\ │ │ │ +00001e00: 223f 0e5c 2261 aabb 0e1f ab94 0e1f 0cab "?.\"a.......... │ │ │ +00001e10: 860c 0d40 21aa 820d 4021 3f0e 2361 aaa3 ...@!...@!?.#a.. │ │ │ +00001e20: 0e1c a7ab 900e 1c0c ab86 0c0d 4021 aa82 ............@!.. │ │ │ +00001e30: 0d40 6baa 8e0e 1c0c ab86 0c0d 4021 aa82 .@k.........@!.. │ │ │ +00001e40: 0d40 61ab 910b 5313 0d41 8915 ab88 0853 .@a...S..A.....S │ │ │ +00001e50: 8910 cf56 ac10 0b53 13aa 850e 1d53 161d ...V...S.....S.. │ │ │ +00001e60: 08cf 5683 f401 0bcf 5683 f401 0e1d 0d9b ..V.....V....... │ │ │ +00001e70: 1909 41ab ff0b cf56 abfa 0e1e ab98 0e1e ..A....V........ │ │ │ +00001e80: 0e1c 0cab 870c 0941 4021 aa83 0941 405c .......A@!...A@\ │ │ │ +00001e90: 223f 0e5c 2261 aac1 0e1f ab96 0e1f 0cab "?.\"a.......... │ │ │ +00001ea0: 870c 0941 4021 aa83 0941 4021 3f0e 2361 ...A@!...A@!?.#a │ │ │ +00001eb0: aaa7 0e1c a7ab 920e 1c0c ab87 0c09 4140 ..............A@ │ │ │ +00001ec0: 21aa 8309 4140 6baa 900e 1c0c ab87 0c09 !...A@k......... │ │ │ +00001ed0: 4140 21aa 8309 4140 61ab 9209 8941 41a1 A@!...A@a....AA. │ │ │ +00001ee0: 8808 5389 10cf 55ab 87d9 13aa 8309 4111 ..S...U.......A. │ │ │ +00001ef0: 0b53 1382 7001 290d aa87 dadb 0e1c 0d5c .S..p.)........\ │ │ │ +00001f00: 6e24 2e09 8722 205b 636c 2d63 6f75 6e74 n$..." [cl-count │ │ │ +00001f10: 2063 6c2d 7020 636c 2d6b 6579 7320 636c cl-p cl-keys cl │ │ │ +00001f20: 2d65 6e64 2063 6c2d 6b65 7920 636c 2d73 -end cl-key cl-s │ │ │ +00001f30: 6571 203a 7465 7374 203a 7465 7374 2d6e eq :test :test-n │ │ │ +00001f40: 6f74 2074 203a 6b65 7920 3a69 6620 3a69 ot t :key :if :i │ │ │ +00001f50: 662d 6e6f 7420 3a63 6f75 6e74 203a 6672 f-not :count :fr │ │ │ +00001f60: 6f6d 2d65 6e64 203a 7374 6172 7420 3020 om-end :start 0 │ │ │ +00001f70: 3a65 6e64 2028 3a74 6573 7420 3a74 6573 :end (:test :tes │ │ │ +00001f80: 742d 6e6f 7420 3a6b 6579 203a 6966 203a t-not :key :if : │ │ │ +00001f90: 6966 2d6e 6f74 203a 636f 756e 7420 3a66 if-not :count :f │ │ │ +00001fa0: 726f 6d2d 656e 6420 3a73 7461 7274 203a rom-end :start : │ │ │ +00001fb0: 656e 6429 203a 616c 6c6f 772d 6f74 6865 end) :allow-othe │ │ │ +00001fc0: 722d 6b65 7973 2065 7272 6f72 2022 4261 r-keys error "Ba │ │ │ +00001fd0: 6420 6b65 7977 6f72 6420 6172 6775 6d65 d keyword argume │ │ │ +00001fe0: 6e74 2025 7322 2038 3030 3030 3030 2034 nt %s" 8000000 4 │ │ │ +00001ff0: 3030 3030 3030 206e 696c 2063 6c2d 706f 000000 nil cl-po │ │ │ +00002000: 7369 7469 6f6e 2031 2061 7070 6c79 2072 sition 1 apply r │ │ │ +00002010: 656d 6f76 652a 2063 6c2d 6974 656d 2063 emove* cl-item c │ │ │ +00002020: 6c2d 7374 6172 7420 636c 2d74 6573 7420 l-start cl-test │ │ │ +00002030: 636c 2d69 6620 636c 2d6b 6579 732d 7465 cl-if cl-keys-te │ │ │ +00002040: 6d70 2063 6c2d 6920 636c 2d74 6573 742d mp cl-i cl-test- │ │ │ +00002050: 6e6f 7420 636c 2d69 662d 6e6f 7420 636c not cl-if-not cl │ │ │ +00002060: 2d66 726f 6d2d 656e 6420 636c 2d74 6169 -from-end cl-tai │ │ │ +00002070: 6c5d 2037 2028 2324 202e 2037 3136 3429 l] 7 (#$ . 7164) │ │ │ +00002080: 5d29 0a23 4031 3832 2052 656d 6f76 6520 ]).#@182 Remove │ │ │ +00002090: 616c 6c20 6974 656d 7320 7361 7469 7366 all items satisf │ │ │ +000020a0: 7969 6e67 2050 5245 4449 4341 5445 2069 ying PREDICATE i │ │ │ +000020b0: 6e20 5345 512e 0a54 6869 7320 6973 2061 n SEQ..This is a │ │ │ +000020c0: 2064 6573 7472 7563 7469 7665 2066 756e destructive fun │ │ │ +000020d0: 6374 696f 6e3b 2069 7420 7265 7573 6573 ction; it reuses │ │ │ +000020e0: 2074 6865 2073 746f 7261 6765 206f 6620 the storage of │ │ │ +000020f0: 5345 5120 7768 656e 6576 6572 2070 6f73 SEQ whenever pos │ │ │ +00002100: 7369 626c 652e 0a4b 6579 776f 7264 7320 sible..Keywords │ │ │ +00002110: 7375 7070 6f72 7465 643a 2020 3a6b 6579 supported: :key │ │ │ +00002120: 203a 636f 756e 7420 3a73 7461 7274 203a :count :start : │ │ │ +00002130: 656e 6420 3a66 726f 6d2d 656e 641f 0a28 end :from-end..( │ │ │ +00002140: 6465 6661 6c69 6173 2027 6465 6c65 7465 defalias 'delete │ │ │ +00002150: 2d69 6620 235b 2863 6c2d 7072 6564 2063 -if #[(cl-pred c │ │ │ +00002160: 6c2d 6c69 7374 2026 7265 7374 2063 6c2d l-list &rest cl- │ │ │ +00002170: 6b65 7973 2920 22c3 c4c5 5c6e c609 0826 keys) "...\n...& │ │ │ +00002180: 0687 2220 5b63 6c2d 6b65 7973 2063 6c2d .." [cl-keys cl- │ │ │ +00002190: 7072 6564 2063 6c2d 6c69 7374 2061 7070 pred cl-list app │ │ │ +000021a0: 6c79 2064 656c 6574 652a 206e 696c 203a ly delete* nil : │ │ │ +000021b0: 6966 5d20 3720 2823 2420 2e20 3833 3239 if] 7 (#$ . 8329 │ │ │ +000021c0: 295d 290a 2340 3138 3620 5265 6d6f 7665 )]).#@186 Remove │ │ │ +000021d0: 2061 6c6c 2069 7465 6d73 206e 6f74 2073 all items not s │ │ │ +000021e0: 6174 6973 6679 696e 6720 5052 4544 4943 atisfying PREDIC │ │ │ +000021f0: 4154 4520 696e 2053 4551 2e0a 5468 6973 ATE in SEQ..This │ │ │ +00002200: 2069 7320 6120 6465 7374 7275 6374 6976 is a destructiv │ │ │ +00002210: 6520 6675 6e63 7469 6f6e 3b20 6974 2072 e function; it r │ │ │ +00002220: 6575 7365 7320 7468 6520 7374 6f72 6167 euses the storag │ │ │ +00002230: 6520 6f66 2053 4551 2077 6865 6e65 7665 e of SEQ wheneve │ │ │ +00002240: 7220 706f 7373 6962 6c65 2e0a 4b65 7977 r possible..Keyw │ │ │ +00002250: 6f72 6473 2073 7570 706f 7274 6564 3a20 ords supported: │ │ │ +00002260: 203a 6b65 7920 3a63 6f75 6e74 203a 7374 :key :count :st │ │ │ +00002270: 6172 7420 3a65 6e64 203a 6672 6f6d 2d65 art :end :from-e │ │ │ +00002280: 6e64 1f0a 2864 6566 616c 6961 7320 2764 nd..(defalias 'd │ │ │ +00002290: 656c 6574 652d 6966 2d6e 6f74 2023 5b28 elete-if-not #[( │ │ │ +000022a0: 636c 2d70 7265 6420 636c 2d6c 6973 7420 cl-pred cl-list │ │ │ +000022b0: 2672 6573 7420 636c 2d6b 6579 7329 2022 &rest cl-keys) " │ │ │ +000022c0: c3c4 c55c 6ec6 0908 2606 8722 205b 636c ...\n...&.." [cl │ │ │ +000022d0: 2d6b 6579 7320 636c 2d70 7265 6420 636c -keys cl-pred cl │ │ │ +000022e0: 2d6c 6973 7420 6170 706c 7920 6465 6c65 -list apply dele │ │ │ +000022f0: 7465 2a20 6e69 6c20 3a69 662d 6e6f 745d te* nil :if-not] │ │ │ +00002300: 2037 2028 2324 202e 2038 3635 3029 5d29 7 (#$ . 8650)]) │ │ │ +00002310: 0a28 6279 7465 2d63 6f64 6520 22c0 c121 .(byte-code "..! │ │ │ +00002320: ab86 c2c1 4b21 ac85 c3c1 c45c 2288 c087 ....K!.....\"... │ │ │ +00002330: 2220 5b66 626f 756e 6470 2064 656c 6574 " [fboundp delet │ │ │ +00002340: 6520 7375 6272 7020 6465 6661 6c69 6173 e subrp defalias │ │ │ +00002350: 2023 5b28 7820 7929 2022 c209 08c3 c424 #[(x y) ".....$ │ │ │ +00002360: 8722 205b 7920 7820 6465 6c65 7465 2a20 ." [y x delete* │ │ │ +00002370: 3a74 6573 7420 6571 7561 6c5d 2035 5d5d :test equal] 5]] │ │ │ +00002380: 2033 290a 2340 3231 3220 5265 6d6f 7665 3).#@212 Remove │ │ │ +00002390: 2061 6c6c 206f 6363 7572 7265 6e63 6573 all occurrences │ │ │ +000023a0: 206f 6620 4954 454d 2069 6e20 5345 512c of ITEM in SEQ, │ │ │ +000023b0: 2074 6573 7469 6e67 2077 6974 6820 6065 testing with `e │ │ │ +000023c0: 7175 616c 270a 5468 6973 2069 7320 6120 qual'.This is a │ │ │ +000023d0: 6e6f 6e2d 6465 7374 7275 6374 6976 6520 non-destructive │ │ │ +000023e0: 6675 6e63 7469 6f6e 3b20 6974 206d 616b function; it mak │ │ │ +000023f0: 6573 2061 2063 6f70 7920 6f66 2053 4551 es a copy of SEQ │ │ │ +00002400: 2069 6620 6e65 6365 7373 6172 790a 746f if necessary.to │ │ │ +00002410: 2061 766f 6964 2063 6f72 7275 7074 696e avoid corruptin │ │ │ +00002420: 6720 7468 6520 6f72 6967 696e 616c 2053 g the original S │ │ │ +00002430: 4551 2e0a 416c 736f 2073 6565 3a20 6072 EQ..Also see: `r │ │ │ +00002440: 656d 6f76 652a 272c 2060 6465 6c65 7465 emove*', `delete │ │ │ +00002450: 272c 2060 6465 6c65 7465 2a27 1f0a 2864 ', `delete*'..(d │ │ │ +00002460: 6566 616c 6961 7320 2772 656d 6f76 6520 efalias 'remove │ │ │ +00002470: 235b 2863 6c2d 6974 656d 2063 6c2d 7365 #[(cl-item cl-se │ │ │ +00002480: 7129 2022 c209 08c3 c424 8722 205b 636c q) ".....$." [cl │ │ │ +00002490: 2d73 6571 2063 6c2d 6974 656d 2072 656d -seq cl-item rem │ │ │ +000024a0: 6f76 652a 203a 7465 7374 2065 7175 616c ove* :test equal │ │ │ +000024b0: 5d20 3520 2823 2420 2e20 3930 3938 295d ] 5 (#$ . 9098)] │ │ │ +000024c0: 290a 2340 3232 3020 5265 6d6f 7665 2061 ).#@220 Remove a │ │ │ +000024d0: 6c6c 206f 6363 7572 7265 6e63 6573 206f ll occurrences o │ │ │ +000024e0: 6620 454c 5420 696e 204c 4953 542c 2063 f ELT in LIST, c │ │ │ +000024f0: 6f6d 7061 7269 6e67 2077 6974 6820 6065 omparing with `e │ │ │ +00002500: 7127 2e0a 5468 6973 2069 7320 6120 6e6f q'..This is a no │ │ │ +00002510: 6e2d 6465 7374 7275 6374 6976 6520 6675 n-destructive fu │ │ │ +00002520: 6e63 7469 6f6e 3b20 6974 206d 616b 6573 nction; it makes │ │ │ +00002530: 2061 2063 6f70 7920 6f66 204c 4953 5420 a copy of LIST │ │ │ +00002540: 746f 2061 766f 6964 0a63 6f72 7275 7074 to avoid.corrupt │ │ │ +00002550: 696e 6720 7468 6520 6f72 6967 696e 616c ing the original │ │ │ +00002560: 204c 4953 542e 0a41 6c73 6f20 7365 653a LIST..Also see: │ │ │ +00002570: 2060 6465 6c71 272c 2060 6465 6c65 7465 `delq', `delete │ │ │ +00002580: 272c 2060 6465 6c65 7465 2a27 2c20 6072 ', `delete*', `r │ │ │ +00002590: 656d 6f76 6527 2c20 6072 656d 6f76 652a emove', `remove* │ │ │ +000025a0: 272e 1f0a 2864 6566 616c 6961 7320 2772 '...(defalias 'r │ │ │ +000025b0: 656d 7120 235b 2863 6c2d 656c 7420 636c emq #[(cl-elt cl │ │ │ +000025c0: 2d6c 6973 7429 2022 0809 73ab 87c2 08c3 -list) "..s..... │ │ │ +000025d0: 0921 5c22 8709 8722 205b 636c 2d65 6c74 .!\"..." [cl-elt │ │ │ +000025e0: 2063 6c2d 6c69 7374 2064 656c 7120 636f cl-list delq co │ │ │ +000025f0: 7079 2d6c 6973 745d 2034 2028 2324 202e py-list] 4 (#$ . │ │ │ +00002600: 2039 3431 3629 5d29 0a23 4031 3233 2052 9416)]).#@123 R │ │ │ +00002610: 6574 7572 6e20 6120 636f 7079 206f 6620 eturn a copy of │ │ │ +00002620: 5345 5120 7769 7468 2061 6c6c 2064 7570 SEQ with all dup │ │ │ +00002630: 6c69 6361 7465 2065 6c65 6d65 6e74 7320 licate elements │ │ │ +00002640: 7265 6d6f 7665 642e 0a4b 6579 776f 7264 removed..Keyword │ │ │ +00002650: 7320 7375 7070 6f72 7465 643a 2020 3a74 s supported: :t │ │ │ +00002660: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ +00002670: 6579 203a 7374 6172 7420 3a65 6e64 203a ey :start :end : │ │ │ +00002680: 6672 6f6d 2d65 6e64 1f0a 2864 6566 616c from-end..(defal │ │ │ +00002690: 6961 7320 2772 656d 6f76 652d 6475 706c ias 'remove-dupl │ │ │ +000026a0: 6963 6174 6573 2023 5b28 636c 2d73 6571 icates #[(cl-seq │ │ │ +000026b0: 2026 7265 7374 2063 6c2d 6b65 7973 2920 &rest cl-keys) │ │ │ +000026c0: 22c2 0908 c323 8722 205b 636c 2d6b 6579 "....#." [cl-key │ │ │ +000026d0: 7320 636c 2d73 6571 2063 6c2d 6465 6c65 s cl-seq cl-dele │ │ │ +000026e0: 7465 2d64 7570 6c69 6361 7465 7320 745d te-duplicates t] │ │ │ +000026f0: 2034 2028 2324 202e 2039 3734 3329 5d29 4 (#$ . 9743)]) │ │ │ +00002700: 0a23 4031 3231 2052 656d 6f76 6520 616c .#@121 Remove al │ │ │ +00002710: 6c20 6475 706c 6963 6174 6520 656c 656d l duplicate elem │ │ │ +00002720: 656e 7473 2066 726f 6d20 5345 5120 2864 ents from SEQ (d │ │ │ +00002730: 6573 7472 7563 7469 7665 6c79 292e 0a4b estructively)..K │ │ │ +00002740: 6579 776f 7264 7320 7375 7070 6f72 7465 eywords supporte │ │ │ +00002750: 643a 2020 3a74 6573 7420 3a74 6573 742d d: :test :test- │ │ │ +00002760: 6e6f 7420 3a6b 6579 203a 7374 6172 7420 not :key :start │ │ │ +00002770: 3a65 6e64 203a 6672 6f6d 2d65 6e64 1f0a :end :from-end.. │ │ │ +00002780: 2864 6566 616c 6961 7320 2764 656c 6574 (defalias 'delet │ │ │ +00002790: 652d 6475 706c 6963 6174 6573 2023 5b28 e-duplicates #[( │ │ │ +000027a0: 636c 2d73 6571 2026 7265 7374 2063 6c2d cl-seq &rest cl- │ │ │ +000027b0: 6b65 7973 2920 22c2 0908 c323 8722 205b keys) "....#." [ │ │ │ +000027c0: 636c 2d6b 6579 7320 636c 2d73 6571 2063 cl-keys cl-seq c │ │ │ +000027d0: 6c2d 6465 6c65 7465 2d64 7570 6c69 6361 l-delete-duplica │ │ │ +000027e0: 7465 7320 6e69 6c5d 2034 2028 2324 202e tes nil] 4 (#$ . │ │ │ +000027f0: 2039 3939 3129 5d29 0a28 6465 6661 6c69 9991)]).(defali │ │ │ +00002800: 6173 2027 636c 2d64 656c 6574 652d 6475 as 'cl-delete-du │ │ │ +00002810: 706c 6963 6174 6573 2023 5b28 636c 2d73 plicates #[(cl-s │ │ │ +00002820: 6571 2063 6c2d 6b65 7973 2063 6c2d 636f eq cl-keys cl-co │ │ │ +00002830: 7079 2920 220d 3c83 5901 c609 7341 401e py) ".<.Y...sA@. │ │ │ +00002840: 1ec7 0973 4140 ad8b c709 7341 4089 161e ...sA@....sA@... │ │ │ +00002850: ad81 c81e 20c9 0973 4140 18ca 0973 4140 .... ..sA@...sA@ │ │ │ +00002860: ae81 cb1a cc09 7341 401c cd09 7341 401e ......sA@...sA@. │ │ │ +00002870: 1fce 0973 4140 1e21 0989 1e1a ab9e 0e1a ...sA@.!........ │ │ │ +00002880: 40cf 73ac 8ed0 0973 4140 ac87 d1d2 0e1a @.s....sA@...... │ │ │ +00002890: 405c 2288 0e1a 4141 8916 1aac 6229 0e1f @\"...AA....b).. │ │ │ +000028a0: abe0 5c6e 0d9b d31e 1b1b 0cae 820d 475c ..\n..........G\ │ │ │ +000028b0: 6e5a 140c d456 abc7 cb16 1bd5 08ab 8608 nZ...V.......... │ │ │ +000028c0: 0b40 21aa 820b 400b 410e 1b0c 5324 8916 .@!...@.A...S$.. │ │ │ +000028d0: 1bab a10e 1cab 8bd6 0d21 155c 6e0d 9b13 .........!.\n... │ │ │ +000028e0: d316 1c0e 1b0b 9b89 1e5c 2289 4141 a188 .........\".AA.. │ │ │ +000028f0: 290c 5314 aa47 0b41 130c 5314 5c6e 5412 ).S..G.A..S.\nT. │ │ │ +00002900: aa34 0d2a 8256 010c ae82 0d47 5c6e 5a14 .4.*.V.....G\nZ. │ │ │ +00002910: 0d41 aba6 5c6e cb55 aba1 0cd4 56ab 9cd5 .A..\n.U....V... │ │ │ +00002920: 08ab 8608 0d40 21aa 820d 400d 41cb 0c53 .....@!...@.A..S │ │ │ +00002930: 24ab 880d 4115 0c53 14aa 565c 6ecb 56ab $...A..S..V\n.V. │ │ │ +00002940: 865c 6e53 0d9b aa86 0c53 14d4 120d 1b0b .\nS.....S...... │ │ │ +00002950: 4141 abbf 0cd4 56ab bad5 08ab 8708 0b41 AA....V........A │ │ │ +00002960: 4021 aa83 0b41 400b 4141 cb0c 5324 ab98 @!...A@.AA..S$.. │ │ │ +00002970: 0e1c ab8c d60d 2115 5c6e 530d 9b13 d316 ......!.\nS..... │ │ │ +00002980: 1c0b 8941 41a1 88aa 830b 4113 0c53 145c ...AA.....A..S.\ │ │ │ +00002990: 6e54 12aa 3c0d 292e 0787 d7d8 0dd3 5c22 nT..<.).......\" │ │ │ +000029a0: 09d3 231e 1d0d 3bab 860e 1db0 01aa 84d9 ..#...;......... │ │ │ +000029b0: 0e1d 2129 8722 205b 636c 2d6b 6579 2063 ..!)." [cl-key c │ │ │ +000029c0: 6c2d 6b65 7973 2063 6c2d 7374 6172 7420 l-keys cl-start │ │ │ +000029d0: 636c 2d70 2063 6c2d 656e 6420 636c 2d73 cl-p cl-end cl-s │ │ │ +000029e0: 6571 203a 7465 7374 203a 7465 7374 2d6e eq :test :test-n │ │ │ +000029f0: 6f74 2074 203a 6b65 7920 3a73 7461 7274 ot t :key :start │ │ │ +00002a00: 2030 203a 656e 6420 3a66 726f 6d2d 656e 0 :end :from-en │ │ │ +00002a10: 6420 3a69 6620 283a 7465 7374 203a 7465 d :if (:test :te │ │ │ +00002a20: 7374 2d6e 6f74 203a 6b65 7920 3a73 7461 st-not :key :sta │ │ │ +00002a30: 7274 203a 656e 6420 3a66 726f 6d2d 656e rt :end :from-en │ │ │ +00002a40: 6420 3a69 6629 203a 616c 6c6f 772d 6f74 d :if) :allow-ot │ │ │ +00002a50: 6865 722d 6b65 7973 2065 7272 6f72 2022 her-keys error " │ │ │ +00002a60: 4261 6420 6b65 7977 6f72 6420 6172 6775 Bad keyword argu │ │ │ +00002a70: 6d65 6e74 2025 7322 206e 696c 2031 2063 ment %s" nil 1 c │ │ │ +00002a80: 6c2d 706f 7369 7469 6f6e 2063 6f70 792d l-position copy- │ │ │ +00002a90: 7365 7175 656e 6365 2063 6c2d 6465 6c65 sequence cl-dele │ │ │ +00002aa0: 7465 2d64 7570 6c69 6361 7465 7320 6170 te-duplicates ap │ │ │ +00002ab0: 7065 6e64 2076 636f 6e63 6174 2063 6c2d pend vconcat cl- │ │ │ +00002ac0: 6b65 7973 2d74 656d 7020 636c 2d69 2063 keys-temp cl-i c │ │ │ +00002ad0: 6c2d 636f 7079 2063 6c2d 7265 7320 636c l-copy cl-res cl │ │ │ +00002ae0: 2d74 6573 7420 636c 2d66 726f 6d2d 656e -test cl-from-en │ │ │ +00002af0: 6420 636c 2d74 6573 742d 6e6f 7420 636c d cl-test-not cl │ │ │ +00002b00: 2d69 6620 636c 2d74 6169 6c5d 2036 5d29 -if cl-tail] 6]) │ │ │ +00002b10: 0a23 4032 3133 2053 7562 7374 6974 7574 .#@213 Substitut │ │ │ +00002b20: 6520 4e45 5720 666f 7220 4f4c 4420 696e e NEW for OLD in │ │ │ +00002b30: 2053 4551 2e0a 5468 6973 2069 7320 6120 SEQ..This is a │ │ │ +00002b40: 6e6f 6e2d 6465 7374 7275 6374 6976 6520 non-destructive │ │ │ +00002b50: 6675 6e63 7469 6f6e 3b20 6974 206d 616b function; it mak │ │ │ +00002b60: 6573 2061 2063 6f70 7920 6f66 2053 4551 es a copy of SEQ │ │ │ +00002b70: 2069 6620 6e65 6365 7373 6172 790a 746f if necessary.to │ │ │ +00002b80: 2061 766f 6964 2063 6f72 7275 7074 696e avoid corruptin │ │ │ +00002b90: 6720 7468 6520 6f72 6967 696e 616c 2053 g the original S │ │ │ +00002ba0: 4551 2e0a 4b65 7977 6f72 6473 2073 7570 EQ..Keywords sup │ │ │ +00002bb0: 706f 7274 6564 3a20 203a 7465 7374 203a ported: :test : │ │ │ +00002bc0: 7465 7374 2d6e 6f74 203a 6b65 7920 3a63 test-not :key :c │ │ │ +00002bd0: 6f75 6e74 203a 7374 6172 7420 3a65 6e64 ount :start :end │ │ │ +00002be0: 203a 6672 6f6d 2d65 6e64 1f0a 2864 6566 :from-end..(def │ │ │ +00002bf0: 616c 6961 7320 2773 7562 7374 6974 7574 alias 'substitut │ │ │ +00002c00: 6520 235b 2863 6c2d 6e65 7720 636c 2d6f e #[(cl-new cl-o │ │ │ +00002c10: 6c64 2063 6c2d 7365 7120 2672 6573 7420 ld cl-seq &rest │ │ │ +00002c20: 636c 2d6b 6579 7329 2022 c60d 7341 401e cl-keys) "..sA@. │ │ │ +00002c30: 20c7 0d73 4140 ad8b c70d 7341 4089 1620 ..sA@....sA@.. │ │ │ +00002c40: ad81 c81e 24c9 0d73 4140 1e25 ca0d 7341 ....$..sA@.%..sA │ │ │ +00002c50: 401e 21cb 0d73 4140 ad8b cb0d 7341 4089 @.!..sA@....sA@. │ │ │ +00002c60: 1621 ad81 c81e 26cc 0d73 4140 1bcd 0d73 .!....&..sA@...s │ │ │ +00002c70: 4140 ae81 ce1e 5c22 cf0d 7341 401e 23d0 A@....\"..sA@.#. │ │ │ +00002c80: 0d73 4140 180d 891a ab9a 5c6e 40d1 73ac .sA@......\n@.s. │ │ │ +00002c90: 8dd2 0d73 4140 ac86 d3d4 5c6e 405c 2288 ...sA@....\n@\". │ │ │ +00002ca0: 5c6e 4141 8912 ac66 290e 1b0e 1c61 ac8c \nAA...f)....a.. │ │ │ +00002cb0: 0bae 85d5 10d6 8913 ce58 ab83 0caa ced7 .........X...... │ │ │ +00002cc0: 0e1b 0c0e 5c22 0e23 2489 19ac 830c aabd ....\".#$....... │ │ │ +00002cd0: d80c 2114 08ac a80c 090e 1c1e 1d1e 1e89 ..!............. │ │ │ +00002ce0: 1e1f 3cab 8b0e 1e0e 1f9b 0e1d a088 aa88 ..<............. │ │ │ +00002cf0: 0e1f 0e1e 0e1d 4988 2b09 5411 0b53 13d9 ......I.+.T..S.. │ │ │ +00002d00: da0e 1c0e 1b0c cc0b cd09 0d26 0929 2e09 ...........&.).. │ │ │ +00002d10: 8722 205b 636c 2d66 726f 6d2d 656e 6420 ." [cl-from-end │ │ │ +00002d20: 636c 2d69 2063 6c2d 6b65 7973 2d74 656d cl-i cl-keys-tem │ │ │ +00002d30: 7020 636c 2d63 6f75 6e74 2063 6c2d 7365 p cl-count cl-se │ │ │ +00002d40: 7120 636c 2d6b 6579 7320 3a74 6573 7420 q cl-keys :test │ │ │ +00002d50: 3a74 6573 742d 6e6f 7420 7420 3a6b 6579 :test-not t :key │ │ │ +00002d60: 203a 6966 203a 6966 2d6e 6f74 203a 636f :if :if-not :co │ │ │ +00002d70: 756e 7420 3a73 7461 7274 2030 203a 656e unt :start 0 :en │ │ │ +00002d80: 6420 3a66 726f 6d2d 656e 6420 283a 7465 d :from-end (:te │ │ │ +00002d90: 7374 203a 7465 7374 2d6e 6f74 203a 6b65 st :test-not :ke │ │ │ +00002da0: 7920 3a69 6620 3a69 662d 6e6f 7420 3a63 y :if :if-not :c │ │ │ +00002db0: 6f75 6e74 203a 7374 6172 7420 3a65 6e64 ount :start :end │ │ │ +00002dc0: 203a 6672 6f6d 2d65 6e64 2920 3a61 6c6c :from-end) :all │ │ │ +00002dd0: 6f77 2d6f 7468 6572 2d6b 6579 7320 6572 ow-other-keys er │ │ │ +00002de0: 726f 7220 2242 6164 206b 6579 776f 7264 ror "Bad keyword │ │ │ +00002df0: 2061 7267 756d 656e 7420 2573 2220 6e69 argument %s" ni │ │ │ +00002e00: 6c20 3830 3030 3030 3020 636c 2d70 6f73 l 8000000 cl-pos │ │ │ +00002e10: 6974 696f 6e20 636f 7079 2d73 6571 7565 ition copy-seque │ │ │ +00002e20: 6e63 6520 6170 706c 7920 6e73 7562 7374 nce apply nsubst │ │ │ +00002e30: 6974 7574 6520 636c 2d6f 6c64 2063 6c2d itute cl-old cl- │ │ │ +00002e40: 6e65 7720 7661 6c20 6e20 7365 7120 636c new val n seq cl │ │ │ +00002e50: 2d74 6573 7420 636c 2d69 6620 636c 2d73 -test cl-if cl-s │ │ │ +00002e60: 7461 7274 2063 6c2d 656e 6420 636c 2d74 tart cl-end cl-t │ │ │ +00002e70: 6573 742d 6e6f 7420 636c 2d6b 6579 2063 est-not cl-key c │ │ │ +00002e80: 6c2d 6966 2d6e 6f74 5d20 3131 2028 2324 l-if-not] 11 (#$ │ │ │ +00002e90: 202e 2031 3130 3331 295d 290a 2340 3232 . 11031)]).#@22 │ │ │ +00002ea0: 3420 5375 6273 7469 7475 7465 204e 4557 4 Substitute NEW │ │ │ +00002eb0: 2066 6f72 2061 6c6c 2069 7465 6d73 2073 for all items s │ │ │ +00002ec0: 6174 6973 6679 696e 6720 5052 4544 4943 atisfying PREDIC │ │ │ +00002ed0: 4154 4520 696e 2053 4551 2e0a 5468 6973 ATE in SEQ..This │ │ │ +00002ee0: 2069 7320 6120 6e6f 6e2d 6465 7374 7275 is a non-destru │ │ │ +00002ef0: 6374 6976 6520 6675 6e63 7469 6f6e 3b20 ctive function; │ │ │ +00002f00: 6974 206d 616b 6573 2061 2063 6f70 7920 it makes a copy │ │ │ +00002f10: 6f66 2053 4551 2069 6620 6e65 6365 7373 of SEQ if necess │ │ │ +00002f20: 6172 790a 746f 2061 766f 6964 2063 6f72 ary.to avoid cor │ │ │ +00002f30: 7275 7074 696e 6720 7468 6520 6f72 6967 rupting the orig │ │ │ +00002f40: 696e 616c 2053 4551 2e0a 4b65 7977 6f72 inal SEQ..Keywor │ │ │ +00002f50: 6473 2073 7570 706f 7274 6564 3a20 203a ds supported: : │ │ │ +00002f60: 6b65 7920 3a63 6f75 6e74 203a 7374 6172 key :count :star │ │ │ +00002f70: 7420 3a65 6e64 203a 6672 6f6d 2d65 6e64 t :end :from-end │ │ │ +00002f80: 1f0a 2864 6566 616c 6961 7320 2773 7562 ..(defalias 'sub │ │ │ +00002f90: 7374 6974 7574 652d 6966 2023 5b28 636c stitute-if #[(cl │ │ │ +00002fa0: 2d6e 6577 2063 6c2d 7072 6564 2063 6c2d -new cl-pred cl- │ │ │ +00002fb0: 6c69 7374 2026 7265 7374 2063 6c2d 6b65 list &rest cl-ke │ │ │ +00002fc0: 7973 2920 22c4 c50b c65c 6ec7 0908 2607 ys) "....\n...&. │ │ │ +00002fd0: 8722 205b 636c 2d6b 6579 7320 636c 2d70 ." [cl-keys cl-p │ │ │ +00002fe0: 7265 6420 636c 2d6c 6973 7420 636c 2d6e red cl-list cl-n │ │ │ +00002ff0: 6577 2061 7070 6c79 2073 7562 7374 6974 ew apply substit │ │ │ +00003000: 7574 6520 6e69 6c20 3a69 665d 2038 2028 ute nil :if] 8 ( │ │ │ +00003010: 2324 202e 2031 3139 3338 295d 290a 2340 #$ . 11938)]).#@ │ │ │ +00003020: 3232 3820 5375 6273 7469 7475 7465 204e 228 Substitute N │ │ │ +00003030: 4557 2066 6f72 2061 6c6c 2069 7465 6d73 EW for all items │ │ │ +00003040: 206e 6f74 2073 6174 6973 6679 696e 6720 not satisfying │ │ │ +00003050: 5052 4544 4943 4154 4520 696e 2053 4551 PREDICATE in SEQ │ │ │ +00003060: 2e0a 5468 6973 2069 7320 6120 6e6f 6e2d ..This is a non- │ │ │ +00003070: 6465 7374 7275 6374 6976 6520 6675 6e63 destructive func │ │ │ +00003080: 7469 6f6e 3b20 6974 206d 616b 6573 2061 tion; it makes a │ │ │ +00003090: 2063 6f70 7920 6f66 2053 4551 2069 6620 copy of SEQ if │ │ │ +000030a0: 6e65 6365 7373 6172 790a 746f 2061 766f necessary.to avo │ │ │ +000030b0: 6964 2063 6f72 7275 7074 696e 6720 7468 id corrupting th │ │ │ +000030c0: 6520 6f72 6967 696e 616c 2053 4551 2e0a e original SEQ.. │ │ │ +000030d0: 4b65 7977 6f72 6473 2073 7570 706f 7274 Keywords support │ │ │ +000030e0: 6564 3a20 203a 6b65 7920 3a63 6f75 6e74 ed: :key :count │ │ │ +000030f0: 203a 7374 6172 7420 3a65 6e64 203a 6672 :start :end :fr │ │ │ +00003100: 6f6d 2d65 6e64 1f0a 2864 6566 616c 6961 om-end..(defalia │ │ │ +00003110: 7320 2773 7562 7374 6974 7574 652d 6966 s 'substitute-if │ │ │ +00003120: 2d6e 6f74 2023 5b28 636c 2d6e 6577 2063 -not #[(cl-new c │ │ │ +00003130: 6c2d 7072 6564 2063 6c2d 6c69 7374 2026 l-pred cl-list & │ │ │ +00003140: 7265 7374 2063 6c2d 6b65 7973 2920 22c4 rest cl-keys) ". │ │ │ +00003150: c50b c65c 6ec7 0908 2607 8722 205b 636c ...\n...&.." [cl │ │ │ +00003160: 2d6b 6579 7320 636c 2d70 7265 6420 636c -keys cl-pred cl │ │ │ +00003170: 2d6c 6973 7420 636c 2d6e 6577 2061 7070 -list cl-new app │ │ │ +00003180: 6c79 2073 7562 7374 6974 7574 6520 6e69 ly substitute ni │ │ │ +00003190: 6c20 3a69 662d 6e6f 745d 2038 2028 2324 l :if-not] 8 (#$ │ │ │ +000031a0: 202e 2031 3233 3234 295d 290a 2340 3138 . 12324)]).#@18 │ │ │ +000031b0: 3320 5375 6273 7469 7475 7465 204e 4557 3 Substitute NEW │ │ │ +000031c0: 2066 6f72 204f 4c44 2069 6e20 5345 512e for OLD in SEQ. │ │ │ +000031d0: 0a54 6869 7320 6973 2061 2064 6573 7472 .This is a destr │ │ │ +000031e0: 7563 7469 7665 2066 756e 6374 696f 6e3b uctive function; │ │ │ +000031f0: 2069 7420 7265 7573 6573 2074 6865 2073 it reuses the s │ │ │ +00003200: 746f 7261 6765 206f 6620 5345 5120 7768 torage of SEQ wh │ │ │ +00003210: 656e 6576 6572 2070 6f73 7369 626c 652e enever possible. │ │ │ +00003220: 0a4b 6579 776f 7264 7320 7375 7070 6f72 .Keywords suppor │ │ │ +00003230: 7465 643a 2020 3a74 6573 7420 3a74 6573 ted: :test :tes │ │ │ +00003240: 742d 6e6f 7420 3a6b 6579 203a 636f 756e t-not :key :coun │ │ │ +00003250: 7420 3a73 7461 7274 203a 656e 6420 3a66 t :start :end :f │ │ │ +00003260: 726f 6d2d 656e 641f 0a28 6465 6661 6c69 rom-end..(defali │ │ │ +00003270: 6173 2027 6e73 7562 7374 6974 7574 6520 as 'nsubstitute │ │ │ +00003280: 235b 2863 6c2d 6e65 7720 636c 2d6f 6c64 #[(cl-new cl-old │ │ │ +00003290: 2063 6c2d 7365 7120 2672 6573 7420 636c cl-seq &rest cl │ │ │ +000032a0: 2d6b 6579 7329 2022 c609 7341 401e 19c7 -keys) "..sA@... │ │ │ +000032b0: 0973 4140 ad8b c709 7341 4089 1619 ad81 .sA@....sA@..... │ │ │ +000032c0: c81e 1cc9 0973 4140 1dca 0973 4140 1e1a .....sA@...sA@.. │ │ │ +000032d0: cb09 7341 40ad 8bcb 0973 4140 8916 1aad ..sA@....sA@.... │ │ │ +000032e0: 81c8 1e1d cc09 7341 4018 cd09 7341 40ae ......sA@...sA@. │ │ │ +000032f0: 81ce 1acf 0973 4140 1bd0 0973 4140 1e1f .....sA@...sA@.. │ │ │ +00003300: 0989 1e1b ab9e 0e1b 40d1 73ac 8ed2 0973 ........@.s....s │ │ │ +00003310: 4140 ac87 d3d4 0e1b 405c 2288 0e1b 4141 A@......@\"...AA │ │ │ +00003320: 8916 1bac 6229 0e17 0e1e 6184 4802 08ae ....b)....a.H... │ │ │ +00003330: 83d5 8910 ce58 8448 020c 3c83 2f01 0e1f .....X.H..<./... │ │ │ +00003340: ab86 08d6 5683 2f01 5c6e 0c9b 1e18 0bae ....V./.\n...... │ │ │ +00003350: 81d5 5c6e 5a13 0e18 abfc 0bce 56ab f708 ..\nZ.......V... │ │ │ +00003360: ce56 abf2 0e19 ab98 0e19 0e17 0dab 870d .V.............. │ │ │ +00003370: 0e18 4021 aa83 0e18 405c 223f 0e1c 61aa ..@!....@\"?..a. │ │ │ +00003380: c10e 1aab 960e 1a0d ab87 0d0e 1840 21aa .............@!. │ │ │ +00003390: 830e 1840 213f 0e1d 61aa a70e 17a7 ab92 ...@!?..a....... │ │ │ +000033a0: 0e17 0dab 870d 0e18 4021 aa83 0e18 406b ........@!....@k │ │ │ +000033b0: aa90 0e17 0dab 870d 0e18 4021 aa83 0e18 ..........@!.... │ │ │ +000033c0: 4061 ab89 0e18 0e1e a088 0853 100e 1841 @a.........S...A │ │ │ +000033d0: 1618 0b53 13aa 0029 8248 020b ac83 0c47 ...S...).H.....G │ │ │ +000033e0: 130e 1f83 d001 5c6e 0b57 8348 0208 ce56 ......\n.W.H...V │ │ │ +000033f0: 8348 020b 5313 0e19 ab98 0e19 0e17 0dab .H..S........... │ │ │ +00003400: 870d 0c0b 9c21 aa83 0c0b 9c5c 223f 0e1c .....!.....\"?.. │ │ │ +00003410: 61aa c10e 1aab 960e 1a0d ab87 0d0c 0b9c a............... │ │ │ +00003420: 21aa 830c 0b9c 213f 0e1d 61aa a70e 17a7 !.....!?..a..... │ │ │ +00003430: ab92 0e17 0dab 870d 0c0b 9c21 aa83 0c0b ...........!.... │ │ │ +00003440: 9c6b aa90 0e17 0dab 870d 0c0b 9c21 aa83 .k...........!.. │ │ │ +00003450: 0c0b 9c61 ab12 0c0b 0e1e 1e20 1e21 891e ...a....... .!.. │ │ │ +00003460: 5c22 3cab 8b0e 210e 5c22 9b0e 20a0 88aa \"<...!.\".. ... │ │ │ +00003470: 880e 5c22 0e21 0e20 4988 2b08 5310 823a ..\".!. I.+.S..: │ │ │ +00003480: 015c 6e0b 57ab f308 ce56 abee 0e19 ab98 .\n.W....V...... │ │ │ +00003490: 0e19 0e17 0dab 870d 0c5c 6e48 21aa 830c .........\nH!... │ │ │ +000034a0: 5c6e 485c 223f 0e1c 61aa c10e 1aab 960e \nH\"?..a....... │ │ │ +000034b0: 1a0d ab87 0d0c 5c6e 4821 aa83 0c5c 6e48 ......\nH!...\nH │ │ │ +000034c0: 213f 0e1d 61aa a70e 17a7 ab92 0e17 0dab !?..a........... │ │ │ +000034d0: 870d 0c5c 6e48 21aa 830c 5c6e 486b aa90 ...\nH!...\nHk.. │ │ │ +000034e0: 0e17 0dab 870d 0c5c 6e48 21aa 830c 5c6e .......\nH!...\n │ │ │ +000034f0: 4861 ab89 0c5c 6e0e 1e49 8808 5310 5c6e Ha...\n..I..S.\n │ │ │ +00003500: 5489 12aa 090c 2e09 8722 205b 636c 2d63 T........" [cl-c │ │ │ +00003510: 6f75 6e74 2063 6c2d 6b65 7973 2063 6c2d ount cl-keys cl- │ │ │ +00003520: 7374 6172 7420 636c 2d65 6e64 2063 6c2d start cl-end cl- │ │ │ +00003530: 7365 7120 636c 2d6b 6579 203a 7465 7374 seq cl-key :test │ │ │ +00003540: 203a 7465 7374 2d6e 6f74 2074 203a 6b65 :test-not t :ke │ │ │ +00003550: 7920 3a69 6620 3a69 662d 6e6f 7420 3a63 y :if :if-not :c │ │ │ +00003560: 6f75 6e74 203a 7374 6172 7420 3020 3a65 ount :start 0 :e │ │ │ +00003570: 6e64 203a 6672 6f6d 2d65 6e64 2028 3a74 nd :from-end (:t │ │ │ +00003580: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ +00003590: 6579 203a 6966 203a 6966 2d6e 6f74 203a ey :if :if-not : │ │ │ +000035a0: 636f 756e 7420 3a73 7461 7274 203a 656e count :start :en │ │ │ +000035b0: 6420 3a66 726f 6d2d 656e 6429 203a 616c d :from-end) :al │ │ │ +000035c0: 6c6f 772d 6f74 6865 722d 6b65 7973 2065 low-other-keys e │ │ │ +000035d0: 7272 6f72 2022 4261 6420 6b65 7977 6f72 rror "Bad keywor │ │ │ +000035e0: 6420 6172 6775 6d65 6e74 2025 7322 2038 d argument %s" 8 │ │ │ +000035f0: 3030 3030 3030 2034 3030 3030 3030 2063 000000 4000000 c │ │ │ +00003600: 6c2d 6f6c 6420 636c 2d70 2063 6c2d 7465 l-old cl-p cl-te │ │ │ +00003610: 7374 2063 6c2d 6966 2063 6c2d 6b65 7973 st cl-if cl-keys │ │ │ +00003620: 2d74 656d 7020 636c 2d74 6573 742d 6e6f -temp cl-test-no │ │ │ +00003630: 7420 636c 2d69 662d 6e6f 7420 636c 2d6e t cl-if-not cl-n │ │ │ +00003640: 6577 2063 6c2d 6672 6f6d 2d65 6e64 2076 ew cl-from-end v │ │ │ +00003650: 616c 206e 2073 6571 5d20 3620 2823 2420 al n seq] 6 (#$ │ │ │ +00003660: 2e20 3132 3732 3229 5d29 0a23 4031 3934 . 12722)]).#@194 │ │ │ +00003670: 2053 7562 7374 6974 7574 6520 4e45 5720 Substitute NEW │ │ │ +00003680: 666f 7220 616c 6c20 6974 656d 7320 7361 for all items sa │ │ │ +00003690: 7469 7366 7969 6e67 2050 5245 4449 4341 tisfying PREDICA │ │ │ +000036a0: 5445 2069 6e20 5345 512e 0a54 6869 7320 TE in SEQ..This │ │ │ +000036b0: 6973 2061 2064 6573 7472 7563 7469 7665 is a destructive │ │ │ +000036c0: 2066 756e 6374 696f 6e3b 2069 7420 7265 function; it re │ │ │ +000036d0: 7573 6573 2074 6865 2073 746f 7261 6765 uses the storage │ │ │ +000036e0: 206f 6620 5345 5120 7768 656e 6576 6572 of SEQ whenever │ │ │ +000036f0: 2070 6f73 7369 626c 652e 0a4b 6579 776f possible..Keywo │ │ │ +00003700: 7264 7320 7375 7070 6f72 7465 643a 2020 rds supported: │ │ │ +00003710: 3a6b 6579 203a 636f 756e 7420 3a73 7461 :key :count :sta │ │ │ +00003720: 7274 203a 656e 6420 3a66 726f 6d2d 656e rt :end :from-en │ │ │ +00003730: 641f 0a28 6465 6661 6c69 6173 2027 6e73 d..(defalias 'ns │ │ │ +00003740: 7562 7374 6974 7574 652d 6966 2023 5b28 ubstitute-if #[( │ │ │ +00003750: 636c 2d6e 6577 2063 6c2d 7072 6564 2063 cl-new cl-pred c │ │ │ +00003760: 6c2d 6c69 7374 2026 7265 7374 2063 6c2d l-list &rest cl- │ │ │ +00003770: 6b65 7973 2920 22c4 c50b c65c 6ec7 0908 keys) "....\n... │ │ │ +00003780: 2607 8722 205b 636c 2d6b 6579 7320 636c &.." [cl-keys cl │ │ │ +00003790: 2d70 7265 6420 636c 2d6c 6973 7420 636c -pred cl-list cl │ │ │ +000037a0: 2d6e 6577 2061 7070 6c79 206e 7375 6273 -new apply nsubs │ │ │ +000037b0: 7469 7475 7465 206e 696c 203a 6966 5d20 titute nil :if] │ │ │ +000037c0: 3820 2823 2420 2e20 3133 3933 3729 5d29 8 (#$ . 13937)]) │ │ │ +000037d0: 0a23 4031 3938 2053 7562 7374 6974 7574 .#@198 Substitut │ │ │ +000037e0: 6520 4e45 5720 666f 7220 616c 6c20 6974 e NEW for all it │ │ │ +000037f0: 656d 7320 6e6f 7420 7361 7469 7366 7969 ems not satisfyi │ │ │ +00003800: 6e67 2050 5245 4449 4341 5445 2069 6e20 ng PREDICATE in │ │ │ +00003810: 5345 512e 0a54 6869 7320 6973 2061 2064 SEQ..This is a d │ │ │ +00003820: 6573 7472 7563 7469 7665 2066 756e 6374 estructive funct │ │ │ +00003830: 696f 6e3b 2069 7420 7265 7573 6573 2074 ion; it reuses t │ │ │ +00003840: 6865 2073 746f 7261 6765 206f 6620 5345 he storage of SE │ │ │ +00003850: 5120 7768 656e 6576 6572 2070 6f73 7369 Q whenever possi │ │ │ +00003860: 626c 652e 0a4b 6579 776f 7264 7320 7375 ble..Keywords su │ │ │ +00003870: 7070 6f72 7465 643a 2020 3a6b 6579 203a pported: :key : │ │ │ +00003880: 636f 756e 7420 3a73 7461 7274 203a 656e count :start :en │ │ │ +00003890: 6420 3a66 726f 6d2d 656e 641f 0a28 6465 d :from-end..(de │ │ │ +000038a0: 6661 6c69 6173 2027 6e73 7562 7374 6974 falias 'nsubstit │ │ │ +000038b0: 7574 652d 6966 2d6e 6f74 2023 5b28 636c ute-if-not #[(cl │ │ │ +000038c0: 2d6e 6577 2063 6c2d 7072 6564 2063 6c2d -new cl-pred cl- │ │ │ +000038d0: 6c69 7374 2026 7265 7374 2063 6c2d 6b65 list &rest cl-ke │ │ │ +000038e0: 7973 2920 22c4 c50b c65c 6ec7 0908 2607 ys) "....\n...&. │ │ │ +000038f0: 8722 205b 636c 2d6b 6579 7320 636c 2d70 ." [cl-keys cl-p │ │ │ +00003900: 7265 6420 636c 2d6c 6973 7420 636c 2d6e red cl-list cl-n │ │ │ +00003910: 6577 2061 7070 6c79 206e 7375 6273 7469 ew apply nsubsti │ │ │ +00003920: 7475 7465 206e 696c 203a 6966 2d6e 6f74 tute nil :if-not │ │ │ +00003930: 5d20 3820 2823 2420 2e20 3134 3239 3529 ] 8 (#$ . 14295) │ │ │ +00003940: 5d29 0a23 4031 3535 2046 696e 6420 7468 ]).#@155 Find th │ │ │ +00003950: 6520 6669 7273 7420 6f63 6375 7272 656e e first occurren │ │ │ +00003960: 6365 206f 6620 4954 454d 2069 6e20 4c49 ce of ITEM in LI │ │ │ +00003970: 5354 2e0a 5265 7475 726e 2074 6865 206d ST..Return the m │ │ │ +00003980: 6174 6368 696e 6720 4954 454d 2c20 6f72 atching ITEM, or │ │ │ +00003990: 206e 696c 2069 6620 6e6f 7420 666f 756e nil if not foun │ │ │ +000039a0: 642e 0a4b 6579 776f 7264 7320 7375 7070 d..Keywords supp │ │ │ +000039b0: 6f72 7465 643a 2020 3a74 6573 7420 3a74 orted: :test :t │ │ │ +000039c0: 6573 742d 6e6f 7420 3a6b 6579 203a 7374 est-not :key :st │ │ │ +000039d0: 6172 7420 3a65 6e64 203a 6672 6f6d 2d65 art :end :from-e │ │ │ +000039e0: 6e64 1f0a 2864 6566 616c 6961 7320 2766 nd..(defalias 'f │ │ │ +000039f0: 696e 6420 235b 2863 6c2d 6974 656d 2063 ind #[(cl-item c │ │ │ +00003a00: 6c2d 7365 7120 2672 6573 7420 636c 2d6b l-seq &rest cl-k │ │ │ +00003a10: 6579 7329 2022 c4c5 090b 0824 891a ad83 eys) ".....$.... │ │ │ +00003a20: 0b5c 6e9c 2987 2220 5b63 6c2d 6b65 7973 .\n.)." [cl-keys │ │ │ +00003a30: 2063 6c2d 6974 656d 2063 6c2d 706f 7320 cl-item cl-pos │ │ │ +00003a40: 636c 2d73 6571 2061 7070 6c79 2070 6f73 cl-seq apply pos │ │ │ +00003a50: 6974 696f 6e5d 2036 2028 2324 202e 2031 ition] 6 (#$ . 1 │ │ │ +00003a60: 3436 3635 295d 290a 2340 3134 3620 4669 4665)]).#@146 Fi │ │ │ +00003a70: 6e64 2074 6865 2066 6972 7374 2069 7465 nd the first ite │ │ │ +00003a80: 6d20 7361 7469 7366 7969 6e67 2050 5245 m satisfying PRE │ │ │ +00003a90: 4449 4341 5445 2069 6e20 4c49 5354 2e0a DICATE in LIST.. │ │ │ +00003aa0: 5265 7475 726e 2074 6865 206d 6174 6368 Return the match │ │ │ +00003ab0: 696e 6720 4954 454d 2c20 6f72 206e 696c ing ITEM, or nil │ │ │ +00003ac0: 2069 6620 6e6f 7420 666f 756e 642e 0a4b if not found..K │ │ │ +00003ad0: 6579 776f 7264 7320 7375 7070 6f72 7465 eywords supporte │ │ │ +00003ae0: 643a 2020 3a6b 6579 203a 7374 6172 7420 d: :key :start │ │ │ +00003af0: 3a65 6e64 203a 6672 6f6d 2d65 6e64 1f0a :end :from-end.. │ │ │ +00003b00: 2864 6566 616c 6961 7320 2766 696e 642d (defalias 'find- │ │ │ +00003b10: 6966 2023 5b28 636c 2d70 7265 6420 636c if #[(cl-pred cl │ │ │ +00003b20: 2d6c 6973 7420 2672 6573 7420 636c 2d6b -list &rest cl-k │ │ │ +00003b30: 6579 7329 2022 c3c4 c55c 6ec6 0908 2606 eys) "...\n...&. │ │ │ +00003b40: 8722 205b 636c 2d6b 6579 7320 636c 2d70 ." [cl-keys cl-p │ │ │ +00003b50: 7265 6420 636c 2d6c 6973 7420 6170 706c red cl-list appl │ │ │ +00003b60: 7920 6669 6e64 206e 696c 203a 6966 5d20 y find nil :if] │ │ │ +00003b70: 3720 2823 2420 2e20 3134 3935 3829 5d29 7 (#$ . 14958)]) │ │ │ +00003b80: 0a23 4031 3530 2046 696e 6420 7468 6520 .#@150 Find the │ │ │ +00003b90: 6669 7273 7420 6974 656d 206e 6f74 2073 first item not s │ │ │ +00003ba0: 6174 6973 6679 696e 6720 5052 4544 4943 atisfying PREDIC │ │ │ +00003bb0: 4154 4520 696e 204c 4953 542e 0a52 6574 ATE in LIST..Ret │ │ │ +00003bc0: 7572 6e20 7468 6520 6d61 7463 6869 6e67 urn the matching │ │ │ +00003bd0: 2049 5445 4d2c 206f 7220 6e69 6c20 6966 ITEM, or nil if │ │ │ +00003be0: 206e 6f74 2066 6f75 6e64 2e0a 4b65 7977 not found..Keyw │ │ │ +00003bf0: 6f72 6473 2073 7570 706f 7274 6564 3a20 ords supported: │ │ │ +00003c00: 203a 6b65 7920 3a73 7461 7274 203a 656e :key :start :en │ │ │ +00003c10: 6420 3a66 726f 6d2d 656e 641f 0a28 6465 d :from-end..(de │ │ │ +00003c20: 6661 6c69 6173 2027 6669 6e64 2d69 662d falias 'find-if- │ │ │ +00003c30: 6e6f 7420 235b 2863 6c2d 7072 6564 2063 not #[(cl-pred c │ │ │ +00003c40: 6c2d 6c69 7374 2026 7265 7374 2063 6c2d l-list &rest cl- │ │ │ +00003c50: 6b65 7973 2920 22c3 c4c5 5c6e c609 0826 keys) "...\n...& │ │ │ +00003c60: 0687 2220 5b63 6c2d 6b65 7973 2063 6c2d .." [cl-keys cl- │ │ │ +00003c70: 7072 6564 2063 6c2d 6c69 7374 2061 7070 pred cl-list app │ │ │ +00003c80: 6c79 2066 696e 6420 6e69 6c20 3a69 662d ly find nil :if- │ │ │ +00003c90: 6e6f 745d 2037 2028 2324 202e 2031 3532 not] 7 (#$ . 152 │ │ │ +00003ca0: 3339 295d 290a 2340 3136 3820 4669 6e64 39)]).#@168 Find │ │ │ +00003cb0: 2074 6865 2066 6972 7374 206f 6363 7572 the first occur │ │ │ +00003cc0: 7265 6e63 6520 6f66 2049 5445 4d20 696e rence of ITEM in │ │ │ +00003cd0: 204c 4953 542e 0a52 6574 7572 6e20 7468 LIST..Return th │ │ │ +00003ce0: 6520 696e 6465 7820 6f66 2074 6865 206d e index of the m │ │ │ +00003cf0: 6174 6368 696e 6720 6974 656d 2c20 6f72 atching item, or │ │ │ +00003d00: 206e 696c 2069 6620 6e6f 7420 666f 756e nil if not foun │ │ │ +00003d10: 642e 0a4b 6579 776f 7264 7320 7375 7070 d..Keywords supp │ │ │ +00003d20: 6f72 7465 643a 2020 3a74 6573 7420 3a74 orted: :test :t │ │ │ +00003d30: 6573 742d 6e6f 7420 3a6b 6579 203a 7374 est-not :key :st │ │ │ +00003d40: 6172 7420 3a65 6e64 203a 6672 6f6d 2d65 art :end :from-e │ │ │ +00003d50: 6e64 1f0a 2864 6566 616c 6961 7320 2770 nd..(defalias 'p │ │ │ +00003d60: 6f73 6974 696f 6e20 235b 2863 6c2d 6974 osition #[(cl-it │ │ │ +00003d70: 656d 2063 6c2d 7365 7120 2672 6573 7420 em cl-seq &rest │ │ │ +00003d80: 636c 2d6b 6579 7329 2022 c60d 7341 401b cl-keys) "..sA@. │ │ │ +00003d90: c70d 7341 40ad 8ac7 0d73 4140 8913 ad81 ..sA@....sA@.... │ │ │ +00003da0: c81e 16c9 0d73 4140 1e17 ca0d 7341 401a .....sA@....sA@. │ │ │ +00003db0: cb0d 7341 40ad 8acb 0d73 4140 8912 ad81 ..sA@....sA@.... │ │ │ +00003dc0: c81e 18cc 0d73 4140 ae81 cd19 ce0d 7341 .....sA@......sA │ │ │ +00003dd0: 4018 cf0d 7341 401e 150d 891c ab9a 0c40 @...sA@........@ │ │ │ +00003de0: d073 ac8d d10d 7341 40ac 86d2 d30c 405c .s....sA@.....@\ │ │ │ +00003df0: 2288 0c41 4189 14ac 6629 d40e 190e 1a09 "..AA...f)...... │ │ │ +00003e00: 080e 1525 2e08 8722 205b 636c 2d65 6e64 ...%..." [cl-end │ │ │ +00003e10: 2063 6c2d 7374 6172 7420 636c 2d69 6620 cl-start cl-if │ │ │ +00003e20: 636c 2d74 6573 7420 636c 2d6b 6579 732d cl-test cl-keys- │ │ │ +00003e30: 7465 6d70 2063 6c2d 6b65 7973 203a 7465 temp cl-keys :te │ │ │ +00003e40: 7374 203a 7465 7374 2d6e 6f74 2074 203a st :test-not t : │ │ │ +00003e50: 6b65 7920 3a69 6620 3a69 662d 6e6f 7420 key :if :if-not │ │ │ +00003e60: 3a73 7461 7274 2030 203a 656e 6420 3a66 :start 0 :end :f │ │ │ +00003e70: 726f 6d2d 656e 6420 283a 7465 7374 203a rom-end (:test : │ │ │ +00003e80: 7465 7374 2d6e 6f74 203a 6b65 7920 3a69 test-not :key :i │ │ │ +00003e90: 6620 3a69 662d 6e6f 7420 3a73 7461 7274 f :if-not :start │ │ │ +00003ea0: 203a 656e 6420 3a66 726f 6d2d 656e 6429 :end :from-end) │ │ │ +00003eb0: 203a 616c 6c6f 772d 6f74 6865 722d 6b65 :allow-other-ke │ │ │ +00003ec0: 7973 2065 7272 6f72 2022 4261 6420 6b65 ys error "Bad ke │ │ │ +00003ed0: 7977 6f72 6420 6172 6775 6d65 6e74 2025 yword argument % │ │ │ +00003ee0: 7322 2063 6c2d 706f 7369 7469 6f6e 2063 s" cl-position c │ │ │ +00003ef0: 6c2d 6672 6f6d 2d65 6e64 2063 6c2d 7465 l-from-end cl-te │ │ │ +00003f00: 7374 2d6e 6f74 2063 6c2d 6b65 7920 636c st-not cl-key cl │ │ │ +00003f10: 2d69 662d 6e6f 7420 636c 2d69 7465 6d20 -if-not cl-item │ │ │ +00003f20: 636c 2d73 6571 5d20 3720 2823 2420 2e20 cl-seq] 7 (#$ . │ │ │ +00003f30: 3135 3533 3229 5d29 0a28 6465 6661 6c69 15532)]).(defali │ │ │ +00003f40: 6173 2027 636c 2d70 6f73 6974 696f 6e20 as 'cl-position │ │ │ +00003f50: 235b 2863 6c2d 6974 656d 2063 6c2d 7365 #[(cl-item cl-se │ │ │ +00003f60: 7120 636c 2d73 7461 7274 2026 6f70 7469 q cl-start &opti │ │ │ +00003f70: 6f6e 616c 2063 6c2d 656e 6420 636c 2d66 onal cl-end cl-f │ │ │ +00003f80: 726f 6d2d 656e 6429 2022 0b3c abfe 0c0b rom-end) ".<.... │ │ │ +00003f90: 9b19 5c6e ac82 c612 c71e 5c6e 09ab eb0c ..\n......\n.... │ │ │ +00003fa0: 5c6e 57ab e60e 5c6e ab84 0e0d abde 0e08 \nW...\n........ │ │ │ +00003fb0: ab95 0e08 080d ab86 0d09 4021 aa82 0940 ..........@!...@ │ │ │ +00003fc0: 5c22 3f0e 0b61 aab8 0e09 ab94 0e09 0dab \"?..a.......... │ │ │ +00003fd0: 860d 0940 21aa 8209 4021 3f0e 0c61 aaa0 ...@!...@!?..a.. │ │ │ +00003fe0: 08a7 ab8f 080d ab86 0d09 4021 aa82 0940 ..........@!...@ │ │ │ +00003ff0: 6baa 8d08 0dab 860d 0940 21aa 8209 4061 k........@!...@a │ │ │ +00004000: ab83 0c16 5c6e 0941 110c 5414 aa12 0e5c ....\n.A..T....\ │ │ │ +00004010: 6e2a 875c 6eac 830b 4712 0e0d abea 5c6e n*.\n...G.....\n │ │ │ +00004020: 5389 120c 59ab db0e 08ab 970e 0808 0dab S...Y........... │ │ │ +00004030: 870d 0b5c 6e48 21aa 830b 5c6e 485c 223f ...\nH!...\nH\"? │ │ │ +00004040: 0e0b 61aa be0e 09ab 960e 090d ab87 0d0b ..a............. │ │ │ +00004050: 5c6e 4821 aa83 0b5c 6e48 213f 0e0c 61aa \nH!...\nH!?..a. │ │ │ +00004060: a408 a7ab 9108 0dab 870d 0b5c 6e48 21aa ...........\nH!. │ │ │ +00004070: 830b 5c6e 486b aa8f 080d ab87 0d0b 5c6e ..\nHk........\n │ │ │ +00004080: 4821 aa83 0b5c 6e48 61ab 1d5c 6e0c 59ad H!...\nHa..\n.Y. │ │ │ +00004090: ee5c 6e87 0c5c 6e57 abe1 0e08 ab97 0e08 .\n..\nW........ │ │ │ +000040a0: 080d ab87 0d0b 0c48 21aa 830b 0c48 5c22 .......H!....H\" │ │ │ +000040b0: 3f0e 0b61 aabe 0e09 ab96 0e09 0dab 870d ?..a............ │ │ │ +000040c0: 0b0c 4821 aa83 0b0c 4821 3f0e 0c61 aaa4 ..H!....H!?..a.. │ │ │ +000040d0: 08a7 ab91 080d ab87 0d0b 0c48 21aa 830b ...........H!... │ │ │ +000040e0: 0c48 6baa 8f08 0dab 870d 0b0c 4821 aa83 .Hk.........H!.. │ │ │ +000040f0: 0b0c 4861 ac86 0c54 8914 aa1b 0c5c 6e57 ..Ha...T.....\nW │ │ │ +00004100: ad81 0c87 2220 5b63 6c2d 6974 656d 2063 ...." [cl-item c │ │ │ +00004110: 6c2d 7020 636c 2d65 6e64 2063 6c2d 7365 l-p cl-end cl-se │ │ │ +00004120: 7120 636c 2d73 7461 7274 2063 6c2d 6b65 q cl-start cl-ke │ │ │ +00004130: 7920 3830 3030 3030 3020 6e69 6c20 636c y 8000000 nil cl │ │ │ +00004140: 2d74 6573 7420 636c 2d69 6620 636c 2d72 -test cl-if cl-r │ │ │ +00004150: 6573 2063 6c2d 7465 7374 2d6e 6f74 2063 es cl-test-not c │ │ │ +00004160: 6c2d 6966 2d6e 6f74 2063 6c2d 6672 6f6d l-if-not cl-from │ │ │ +00004170: 2d65 6e64 5d20 365d 290a 2340 3135 3920 -end] 6]).#@159 │ │ │ +00004180: 4669 6e64 2074 6865 2066 6972 7374 2069 Find the first i │ │ │ +00004190: 7465 6d20 7361 7469 7366 7969 6e67 2050 tem satisfying P │ │ │ +000041a0: 5245 4449 4341 5445 2069 6e20 4c49 5354 REDICATE in LIST │ │ │ +000041b0: 2e0a 5265 7475 726e 2074 6865 2069 6e64 ..Return the ind │ │ │ +000041c0: 6578 206f 6620 7468 6520 6d61 7463 6869 ex of the matchi │ │ │ +000041d0: 6e67 2069 7465 6d2c 206f 7220 6e69 6c20 ng item, or nil │ │ │ +000041e0: 6966 206e 6f74 2066 6f75 6e64 2e0a 4b65 if not found..Ke │ │ │ +000041f0: 7977 6f72 6473 2073 7570 706f 7274 6564 ywords supported │ │ │ +00004200: 3a20 203a 6b65 7920 3a73 7461 7274 203a : :key :start : │ │ │ +00004210: 656e 6420 3a66 726f 6d2d 656e 641f 0a28 end :from-end..( │ │ │ +00004220: 6465 6661 6c69 6173 2027 706f 7369 7469 defalias 'positi │ │ │ +00004230: 6f6e 2d69 6620 235b 2863 6c2d 7072 6564 on-if #[(cl-pred │ │ │ +00004240: 2063 6c2d 6c69 7374 2026 7265 7374 2063 cl-list &rest c │ │ │ +00004250: 6c2d 6b65 7973 2920 22c3 c4c5 5c6e c609 l-keys) "...\n.. │ │ │ +00004260: 0826 0687 2220 5b63 6c2d 6b65 7973 2063 .&.." [cl-keys c │ │ │ +00004270: 6c2d 7072 6564 2063 6c2d 6c69 7374 2061 l-pred cl-list a │ │ │ +00004280: 7070 6c79 2070 6f73 6974 696f 6e20 6e69 pply position ni │ │ │ +00004290: 6c20 3a69 665d 2037 2028 2324 202e 2031 l :if] 7 (#$ . 1 │ │ │ +000042a0: 3637 3638 295d 290a 2340 3136 3320 4669 6768)]).#@163 Fi │ │ │ +000042b0: 6e64 2074 6865 2066 6972 7374 2069 7465 nd the first ite │ │ │ +000042c0: 6d20 6e6f 7420 7361 7469 7366 7969 6e67 m not satisfying │ │ │ +000042d0: 2050 5245 4449 4341 5445 2069 6e20 4c49 PREDICATE in LI │ │ │ +000042e0: 5354 2e0a 5265 7475 726e 2074 6865 2069 ST..Return the i │ │ │ +000042f0: 6e64 6578 206f 6620 7468 6520 6d61 7463 ndex of the matc │ │ │ +00004300: 6869 6e67 2069 7465 6d2c 206f 7220 6e69 hing item, or ni │ │ │ +00004310: 6c20 6966 206e 6f74 2066 6f75 6e64 2e0a l if not found.. │ │ │ +00004320: 4b65 7977 6f72 6473 2073 7570 706f 7274 Keywords support │ │ │ +00004330: 6564 3a20 203a 6b65 7920 3a73 7461 7274 ed: :key :start │ │ │ +00004340: 203a 656e 6420 3a66 726f 6d2d 656e 641f :end :from-end. │ │ │ +00004350: 0a28 6465 6661 6c69 6173 2027 706f 7369 .(defalias 'posi │ │ │ +00004360: 7469 6f6e 2d69 662d 6e6f 7420 235b 2863 tion-if-not #[(c │ │ │ +00004370: 6c2d 7072 6564 2063 6c2d 6c69 7374 2026 l-pred cl-list & │ │ │ +00004380: 7265 7374 2063 6c2d 6b65 7973 2920 22c3 rest cl-keys) ". │ │ │ +00004390: c4c5 5c6e c609 0826 0687 2220 5b63 6c2d ..\n...&.." [cl- │ │ │ +000043a0: 6b65 7973 2063 6c2d 7072 6564 2063 6c2d keys cl-pred cl- │ │ │ +000043b0: 6c69 7374 2061 7070 6c79 2070 6f73 6974 list apply posit │ │ │ +000043c0: 696f 6e20 6e69 6c20 3a69 662d 6e6f 745d ion nil :if-not] │ │ │ +000043d0: 2037 2028 2324 202e 2031 3730 3730 295d 7 (#$ . 17070)] │ │ │ +000043e0: 290a 2340 3130 3420 436f 756e 7420 7468 ).#@104 Count th │ │ │ +000043f0: 6520 6e75 6d62 6572 206f 6620 6f63 6375 e number of occu │ │ │ +00004400: 7272 656e 6365 7320 6f66 2049 5445 4d20 rrences of ITEM │ │ │ +00004410: 696e 204c 4953 542e 0a4b 6579 776f 7264 in LIST..Keyword │ │ │ +00004420: 7320 7375 7070 6f72 7465 643a 2020 3a74 s supported: :t │ │ │ +00004430: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ +00004440: 6579 203a 7374 6172 7420 3a65 6e64 1f0a ey :start :end.. │ │ │ +00004450: 2864 6566 616c 6961 7320 2763 6f75 6e74 (defalias 'count │ │ │ +00004460: 2023 5b28 636c 2d69 7465 6d20 636c 2d73 #[(cl-item cl-s │ │ │ +00004470: 6571 2026 7265 7374 2063 6c2d 6b65 7973 eq &rest cl-keys │ │ │ +00004480: 2920 22c6 0d73 4140 1e14 c70d 7341 40ad ) "..sA@....sA@. │ │ │ +00004490: 8bc7 0d73 4140 8916 14ad 81c8 1e19 c90d ...sA@.......... │ │ │ +000044a0: 7341 401b ca0d 7341 401e 15cb 0d73 4140 sA@...sA@....sA@ │ │ │ +000044b0: ad8b cb0d 7341 4089 1615 ad81 c81e 1acc ....sA@......... │ │ │ +000044c0: 0d73 4140 ae81 cd19 ce0d 7341 401e 160d .sA@......sA@... │ │ │ +000044d0: 8918 ab9a 0840 cf73 ac8d d00d 7341 40ac .....@.s....sA@. │ │ │ +000044e0: 86d1 d208 405c 2288 0841 4189 10ac 6629 ....@\"..AA...f) │ │ │ +000044f0: cdd3 1c1e 170e 16ac 845c 6e47 1616 5c6e .........\nG..\n │ │ │ +00004500: 3aab 8409 5c6e 9b12 090e 1657 abe9 5c6e :...\n.....W..\n │ │ │ +00004510: 3aab 875c 6e89 4112 40aa 835c 6e09 4814 :..\n.A.@..\n.H. │ │ │ +00004520: 0e14 ab94 0e14 0e18 0bab 850b 0c21 aa81 .............!.. │ │ │ +00004530: 0c5c 223f 0e19 61aa b50e 15ab 920e 150b .\"?..a......... │ │ │ +00004540: ab85 0b0c 21aa 810c 213f 0e1a 61aa 9f0e ....!...!?..a... │ │ │ +00004550: 18a7 ab8e 0e18 0bab 850b 0c21 aa81 0c6b ...........!...k │ │ │ +00004560: aa8c 0e18 0bab 850b 0c21 aa81 0c61 ab85 .........!...a.. │ │ │ +00004570: 0e17 5416 1709 5489 11aa 120e 172e 0987 ..T...T......... │ │ │ +00004580: 2220 5b63 6c2d 6b65 7973 2d74 656d 7020 " [cl-keys-temp │ │ │ +00004590: 636c 2d73 7461 7274 2063 6c2d 7365 7120 cl-start cl-seq │ │ │ +000045a0: 636c 2d6b 6579 2063 6c2d 7820 636c 2d6b cl-key cl-x cl-k │ │ │ +000045b0: 6579 7320 3a74 6573 7420 3a74 6573 742d eys :test :test- │ │ │ +000045c0: 6e6f 7420 7420 3a6b 6579 203a 6966 203a not t :key :if : │ │ │ +000045d0: 6966 2d6e 6f74 203a 7374 6172 7420 3020 if-not :start 0 │ │ │ +000045e0: 3a65 6e64 2028 3a74 6573 7420 3a74 6573 :end (:test :tes │ │ │ +000045f0: 742d 6e6f 7420 3a6b 6579 203a 6966 203a t-not :key :if : │ │ │ +00004600: 6966 2d6e 6f74 203a 7374 6172 7420 3a65 if-not :start :e │ │ │ +00004610: 6e64 2920 3a61 6c6c 6f77 2d6f 7468 6572 nd) :allow-other │ │ │ +00004620: 2d6b 6579 7320 6572 726f 7220 2242 6164 -keys error "Bad │ │ │ +00004630: 206b 6579 776f 7264 2061 7267 756d 656e keyword argumen │ │ │ +00004640: 7420 2573 2220 6e69 6c20 636c 2d74 6573 t %s" nil cl-tes │ │ │ +00004650: 7420 636c 2d69 6620 636c 2d65 6e64 2063 t cl-if cl-end c │ │ │ +00004660: 6c2d 636f 756e 7420 636c 2d69 7465 6d20 l-count cl-item │ │ │ +00004670: 636c 2d74 6573 742d 6e6f 7420 636c 2d69 cl-test-not cl-i │ │ │ +00004680: 662d 6e6f 745d 2035 2028 2324 202e 2031 f-not] 5 (#$ . 1 │ │ │ +00004690: 3733 3834 295d 290a 2340 3935 2043 6f75 7384)]).#@95 Cou │ │ │ +000046a0: 6e74 2074 6865 206e 756d 6265 7220 6f66 nt the number of │ │ │ +000046b0: 2069 7465 6d73 2073 6174 6973 6679 696e items satisfyin │ │ │ +000046c0: 6720 5052 4544 4943 4154 4520 696e 204c g PREDICATE in L │ │ │ +000046d0: 4953 542e 0a4b 6579 776f 7264 7320 7375 IST..Keywords su │ │ │ +000046e0: 7070 6f72 7465 643a 2020 3a6b 6579 203a pported: :key : │ │ │ +000046f0: 7374 6172 7420 3a65 6e64 1f0a 2864 6566 start :end..(def │ │ │ +00004700: 616c 6961 7320 2763 6f75 6e74 2d69 6620 alias 'count-if │ │ │ +00004710: 235b 2863 6c2d 7072 6564 2063 6c2d 6c69 #[(cl-pred cl-li │ │ │ +00004720: 7374 2026 7265 7374 2063 6c2d 6b65 7973 st &rest cl-keys │ │ │ +00004730: 2920 22c3 c4c5 5c6e c609 0826 0687 2220 ) "...\n...&.." │ │ │ +00004740: 5b63 6c2d 6b65 7973 2063 6c2d 7072 6564 [cl-keys cl-pred │ │ │ +00004750: 2063 6c2d 6c69 7374 2061 7070 6c79 2063 cl-list apply c │ │ │ +00004760: 6f75 6e74 206e 696c 203a 6966 5d20 3720 ount nil :if] 7 │ │ │ +00004770: 2823 2420 2e20 3138 3037 3729 5d29 0a23 (#$ . 18077)]).# │ │ │ +00004780: 4039 3920 436f 756e 7420 7468 6520 6e75 @99 Count the nu │ │ │ +00004790: 6d62 6572 206f 6620 6974 656d 7320 6e6f mber of items no │ │ │ +000047a0: 7420 7361 7469 7366 7969 6e67 2050 5245 t satisfying PRE │ │ │ +000047b0: 4449 4341 5445 2069 6e20 4c49 5354 2e0a DICATE in LIST.. │ │ │ +000047c0: 4b65 7977 6f72 6473 2073 7570 706f 7274 Keywords support │ │ │ +000047d0: 6564 3a20 203a 6b65 7920 3a73 7461 7274 ed: :key :start │ │ │ +000047e0: 203a 656e 641f 0a28 6465 6661 6c69 6173 :end..(defalias │ │ │ +000047f0: 2027 636f 756e 742d 6966 2d6e 6f74 2023 'count-if-not # │ │ │ +00004800: 5b28 636c 2d70 7265 6420 636c 2d6c 6973 [(cl-pred cl-lis │ │ │ +00004810: 7420 2672 6573 7420 636c 2d6b 6579 7329 t &rest cl-keys) │ │ │ +00004820: 2022 c3c4 c55c 6ec6 0908 2606 8722 205b "...\n...&.." [ │ │ │ +00004830: 636c 2d6b 6579 7320 636c 2d70 7265 6420 cl-keys cl-pred │ │ │ +00004840: 636c 2d6c 6973 7420 6170 706c 7920 636f cl-list apply co │ │ │ +00004850: 756e 7420 6e69 6c20 3a69 662d 6e6f 745d unt nil :if-not] │ │ │ +00004860: 2037 2028 2324 202e 2031 3833 3038 295d 7 (#$ . 18308)] │ │ │ +00004870: 290a 2340 3238 3620 436f 6d70 6172 6520 ).#@286 Compare │ │ │ +00004880: 5345 5131 2077 6974 6820 5345 5132 2c20 SEQ1 with SEQ2, │ │ │ +00004890: 7265 7475 726e 2069 6e64 6578 206f 6620 return index of │ │ │ +000048a0: 6669 7273 7420 6d69 736d 6174 6368 696e first mismatchin │ │ │ +000048b0: 6720 656c 656d 656e 742e 0a52 6574 7572 g element..Retur │ │ │ +000048c0: 6e20 6e69 6c20 6966 2074 6865 2073 6571 n nil if the seq │ │ │ +000048d0: 7565 6e63 6573 206d 6174 6368 2e20 2049 uences match. I │ │ │ +000048e0: 6620 6f6e 6520 7365 7175 656e 6365 2069 f one sequence i │ │ │ +000048f0: 7320 6120 7072 6566 6978 206f 6620 7468 s a prefix of th │ │ │ +00004900: 650a 6f74 6865 722c 2074 6865 2072 6574 e.other, the ret │ │ │ +00004910: 7572 6e20 7661 6c75 6520 696e 6469 6361 urn value indica │ │ │ +00004920: 7465 7320 7468 6520 656e 6420 6f66 2074 tes the end of t │ │ │ +00004930: 6865 2073 686f 7274 6564 2073 6571 7565 he shorted seque │ │ │ +00004940: 6e63 652e 0a4b 6579 776f 7264 7320 7375 nce..Keywords su │ │ │ +00004950: 7070 6f72 7465 643a 2020 3a74 6573 7420 pported: :test │ │ │ +00004960: 3a74 6573 742d 6e6f 7420 3a6b 6579 203a :test-not :key : │ │ │ +00004970: 7374 6172 7431 203a 656e 6431 203a 7374 start1 :end1 :st │ │ │ +00004980: 6172 7432 203a 656e 6432 203a 6672 6f6d art2 :end2 :from │ │ │ +00004990: 2d65 6e64 1f0a 2864 6566 616c 6961 7320 -end..(defalias │ │ │ +000049a0: 276d 6973 6d61 7463 6820 235b 2863 6c2d 'mismatch #[(cl- │ │ │ +000049b0: 7365 7131 2063 6c2d 7365 7132 2026 7265 seq1 cl-seq2 &re │ │ │ +000049c0: 7374 2063 6c2d 6b65 7973 2920 22c6 0e17 st cl-keys) "... │ │ │ +000049d0: 7341 401e 18c7 0e17 7341 40ad 8cc7 0e17 sA@.....sA@..... │ │ │ +000049e0: 7341 4089 1618 ad81 c81e 1ac9 0e17 7341 sA@...........sA │ │ │ +000049f0: 401d ca0e 1773 4140 1e1b cb0e 1773 4140 @....sA@.....sA@ │ │ │ +00004a00: ae81 cc19 cd0e 1773 4140 1ace 0e17 7341 .......sA@....sA │ │ │ +00004a10: 40ae 81cc 1e16 cf0e 1773 4140 180e 1789 @........sA@.... │ │ │ +00004a20: 1e19 ab9f 0e19 40d0 73ac 8fd1 0e17 7341 ......@.s.....sA │ │ │ +00004a30: 40ac 87d2 d30e 1940 5c22 880e 1941 4189 @......@\"...AA. │ │ │ +00004a40: 1619 ac61 295c 6eac 830c 4712 08ac 840e ...a)\n...G..... │ │ │ +00004a50: 1447 100e 1b83 3501 095c 6e57 8324 010e .G....5..\nW.$.. │ │ │ +00004a60: 1608 5783 2401 0e18 aba9 0e18 0dab 880d ..W.$........... │ │ │ +00004a70: 0c5c 6e53 9c21 aa84 0c5c 6e53 9c0d ab89 .\nS.!...\nS.... │ │ │ +00004a80: 0d0e 1408 539c 21aa 850e 1408 539c 5c22 ....S.!.....S.\" │ │ │ +00004a90: 3f0e 1a61 aad6 0dab 880d 0c5c 6e53 9c21 ?..a.......\nS.! │ │ │ +00004aa0: aa84 0c5c 6e53 9ca7 aba3 0dab 880d 0c5c ...\nS.........\ │ │ │ +00004ab0: 6e53 9c21 aa84 0c5c 6e53 9c0d ab89 0d0e nS.!...\nS...... │ │ │ +00004ac0: 1408 539c 21aa 850e 1408 539c 6baa a10d ..S.!.....S.k... │ │ │ +00004ad0: ab88 0d0c 5c6e 539c 21aa 840c 5c6e 539c ....\nS.!...\nS. │ │ │ +00004ae0: 0dab 890d 0e14 0853 9c21 aa85 0e14 0853 .......S.!.....S │ │ │ +00004af0: 9c61 ab89 5c6e 5312 0853 1082 8900 095c .a..\nS..S.....\ │ │ │ +00004b00: 6e57 ac87 0e16 0857 8562 025c 6e53 8262 nW.....W.b.\nS.b │ │ │ +00004b10: 020c 3cad 8309 0c9b 0e14 3cad 850e 160e ..<.......<..... │ │ │ +00004b20: 149b 1e15 1b09 5c6e 5783 5502 0e16 0857 ......\nW.U....W │ │ │ +00004b30: 8355 020e 18ab c80e 180d ab8e 0d0b ab84 .U.............. │ │ │ +00004b40: 0b40 aa83 0c09 4821 aa8a 0bab 840b 40aa .@....H!......@. │ │ │ +00004b50: 830c 0948 0dab 920d 0e15 ab85 0e15 40aa ...H..........@. │ │ │ +00004b60: 850e 140e 1648 21aa 8e0e 15ab 850e 1540 .....H!........@ │ │ │ +00004b70: aa85 0e14 0e16 485c 223f 0e1a 6182 4002 ......H\"?..a.@. │ │ │ +00004b80: 0dab 8e0d 0bab 840b 40aa 830c 0948 21aa ........@....H!. │ │ │ +00004b90: 8a0b ab84 0b40 aa83 0c09 48a7 abc1 0dab .....@....H..... │ │ │ +00004ba0: 8e0d 0bab 840b 40aa 830c 0948 21aa 8a0b ......@....H!... │ │ │ +00004bb0: ab84 0b40 aa83 0c09 480d ab92 0d0e 15ab ...@....H....... │ │ │ +00004bc0: 850e 1540 aa85 0e14 0e16 4821 aa8e 0e15 ...@......H!.... │ │ │ +00004bd0: ab85 0e15 40aa 850e 140e 1648 6baa bf0d ....@......Hk... │ │ │ +00004be0: ab8e 0d0b ab84 0b40 aa83 0c09 4821 aa8a .......@....H!.. │ │ │ +00004bf0: 0bab 840b 40aa 830c 0948 0dab 920d 0e15 ....@....H...... │ │ │ +00004c00: ab85 0e15 40aa 850e 140e 1648 21aa 8e0e ....@......H!... │ │ │ +00004c10: 15ab 850e 1540 aa85 0e14 0e16 4861 ab93 .....@......Ha.. │ │ │ +00004c20: 0b41 130e 1541 1615 0954 110e 1654 1616 .A...A...T...T.. │ │ │ +00004c30: 8249 0109 5c6e 57ac 860e 1608 57ad 8109 .I..\nW.....W... │ │ │ +00004c40: 2a2e 0887 2220 5b63 6c2d 656e 6432 2063 *..." [cl-end2 c │ │ │ +00004c50: 6c2d 7374 6172 7431 2063 6c2d 656e 6431 l-start1 cl-end1 │ │ │ +00004c60: 2063 6c2d 7031 2063 6c2d 7365 7131 2063 cl-p1 cl-seq1 c │ │ │ +00004c70: 6c2d 6b65 7920 3a74 6573 7420 3a74 6573 l-key :test :tes │ │ │ +00004c80: 742d 6e6f 7420 7420 3a6b 6579 203a 6672 t-not t :key :fr │ │ │ +00004c90: 6f6d 2d65 6e64 203a 7374 6172 7431 2030 om-end :start1 0 │ │ │ +00004ca0: 203a 656e 6431 203a 7374 6172 7432 203a :end1 :start2 : │ │ │ +00004cb0: 656e 6432 2028 3a74 6573 7420 3a74 6573 end2 (:test :tes │ │ │ +00004cc0: 742d 6e6f 7420 3a6b 6579 203a 6672 6f6d t-not :key :from │ │ │ +00004cd0: 2d65 6e64 203a 7374 6172 7431 203a 656e -end :start1 :en │ │ │ +00004ce0: 6431 203a 7374 6172 7432 203a 656e 6432 d1 :start2 :end2 │ │ │ +00004cf0: 2920 3a61 6c6c 6f77 2d6f 7468 6572 2d6b ) :allow-other-k │ │ │ +00004d00: 6579 7320 6572 726f 7220 2242 6164 206b eys error "Bad k │ │ │ +00004d10: 6579 776f 7264 2061 7267 756d 656e 7420 eyword argument │ │ │ +00004d20: 2573 2220 636c 2d73 6571 3220 636c 2d70 %s" cl-seq2 cl-p │ │ │ +00004d30: 3220 636c 2d73 7461 7274 3220 636c 2d6b 2 cl-start2 cl-k │ │ │ +00004d40: 6579 7320 636c 2d74 6573 7420 636c 2d6b eys cl-test cl-k │ │ │ +00004d50: 6579 732d 7465 6d70 2063 6c2d 7465 7374 eys-temp cl-test │ │ │ +00004d60: 2d6e 6f74 2063 6c2d 6672 6f6d 2d65 6e64 -not cl-from-end │ │ │ +00004d70: 5d20 3620 2823 2420 2e20 3138 3535 3229 ] 6 (#$ . 18552) │ │ │ +00004d80: 5d29 0a23 4032 3236 2053 6561 7263 6820 ]).#@226 Search │ │ │ +00004d90: 666f 7220 5345 5131 2061 7320 6120 7375 for SEQ1 as a su │ │ │ +00004da0: 6273 6571 7565 6e63 6520 6f66 2053 4551 bsequence of SEQ │ │ │ +00004db0: 322e 0a52 6574 7572 6e20 7468 6520 696e 2..Return the in │ │ │ +00004dc0: 6465 7820 6f66 2074 6865 206c 6566 746d dex of the leftm │ │ │ +00004dd0: 6f73 7420 656c 656d 656e 7420 6f66 2074 ost element of t │ │ │ +00004de0: 6865 2066 6972 7374 206d 6174 6368 2066 he first match f │ │ │ +00004df0: 6f75 6e64 3b0a 7265 7475 726e 206e 696c ound;.return nil │ │ │ +00004e00: 2069 6620 7468 6572 6520 6172 6520 6e6f if there are no │ │ │ +00004e10: 206d 6174 6368 6573 2e0a 4b65 7977 6f72 matches..Keywor │ │ │ +00004e20: 6473 2073 7570 706f 7274 6564 3a20 203a ds supported: : │ │ │ +00004e30: 7465 7374 203a 7465 7374 2d6e 6f74 203a test :test-not : │ │ │ +00004e40: 6b65 7920 3a73 7461 7274 3120 3a65 6e64 key :start1 :end │ │ │ +00004e50: 3120 3a73 7461 7274 3220 3a65 6e64 3220 1 :start2 :end2 │ │ │ +00004e60: 3a66 726f 6d2d 656e 641f 0a28 6465 6661 :from-end..(defa │ │ │ +00004e70: 6c69 6173 2027 7365 6172 6368 2023 5b28 lias 'search #[( │ │ │ +00004e80: 636c 2d73 6571 3120 636c 2d73 6571 3220 cl-seq1 cl-seq2 │ │ │ +00004e90: 2672 6573 7420 636c 2d6b 6579 7329 2022 &rest cl-keys) " │ │ │ +00004ea0: c60d 7341 401e 1ec7 0d73 4140 ad8b c70d ..sA@....sA@.... │ │ │ +00004eb0: 7341 4089 161e ad81 c81e 20c9 0d73 4140 sA@....... ..sA@ │ │ │ +00004ec0: 1e1b ca0d 7341 401e 19cb 0d73 4140 ae81 ....sA@....sA@.. │ │ │ +00004ed0: cc1a cd0d 7341 4019 ce0d 7341 40ae 81cc ....sA@...sA@... │ │ │ +00004ee0: 18cf 0d73 4140 1c0d 891e 18ab 9e0e 1840 ...sA@.........@ │ │ │ +00004ef0: d073 ac8e d10d 7341 40ac 87d2 d30e 1840 .s....sA@......@ │ │ │ +00004f00: 5c22 880e 1841 4189 1618 ac62 2909 ac84 \"...AA....b)... │ │ │ +00004f10: 0e1a 4711 0cac 840e 1c47 145c 6e09 59ab ..G......G.\n.Y. │ │ │ +00004f20: 8a0e 19ab 830c aae8 08aa e509 5c6e 5a1e ............\nZ. │ │ │ +00004f30: 1d0e 1bab 890e 1b0e 1a5c 6e9c 21aa 840e .........\n.!... │ │ │ +00004f40: 1a5c 6e9c 1e1f d489 1e21 1b0c 0e1d 535a .\n......!....SZ │ │ │ +00004f50: 1408 0c57 abb6 d50e 1f0e 1c08 0c0e 1925 ...W...........% │ │ │ +00004f60: 8913 aba8 d6d7 0e1a 0e1c cb5c 6e54 cd09 ...........\nT.. │ │ │ +00004f70: ce0b 54cf 0b0e 1d5c 5cca d40d 260e ab8e ..T....\\...&... │ │ │ +00004f80: 0e19 ab84 0b14 aa4b 0b54 8910 aa46 080c .......K.T...F.. │ │ │ +00004f90: 57ad 810b 2c2e 0887 2220 5b63 6c2d 7374 W...,..." [cl-st │ │ │ +00004fa0: 6172 7432 2063 6c2d 656e 6431 2063 6c2d art2 cl-end1 cl- │ │ │ +00004fb0: 7374 6172 7431 2063 6c2d 706f 7320 636c start1 cl-pos cl │ │ │ +00004fc0: 2d65 6e64 3220 636c 2d6b 6579 7320 3a74 -end2 cl-keys :t │ │ │ +00004fd0: 6573 7420 3a74 6573 742d 6e6f 7420 7420 est :test-not t │ │ │ +00004fe0: 3a6b 6579 203a 6672 6f6d 2d65 6e64 203a :key :from-end : │ │ │ +00004ff0: 7374 6172 7431 2030 203a 656e 6431 203a start1 0 :end1 : │ │ │ +00005000: 7374 6172 7432 203a 656e 6432 2028 3a74 start2 :end2 (:t │ │ │ +00005010: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ +00005020: 6579 203a 6672 6f6d 2d65 6e64 203a 7374 ey :from-end :st │ │ │ +00005030: 6172 7431 203a 656e 6431 203a 7374 6172 art1 :end1 :star │ │ │ +00005040: 7432 203a 656e 6432 2920 3a61 6c6c 6f77 t2 :end2) :allow │ │ │ +00005050: 2d6f 7468 6572 2d6b 6579 7320 6572 726f -other-keys erro │ │ │ +00005060: 7220 2242 6164 206b 6579 776f 7264 2061 r "Bad keyword a │ │ │ +00005070: 7267 756d 656e 7420 2573 2220 6e69 6c20 rgument %s" nil │ │ │ +00005080: 636c 2d70 6f73 6974 696f 6e20 6170 706c cl-position appl │ │ │ +00005090: 7920 6d69 736d 6174 6368 2063 6c2d 6b65 y mismatch cl-ke │ │ │ +000050a0: 7973 2d74 656d 7020 636c 2d66 726f 6d2d ys-temp cl-from- │ │ │ +000050b0: 656e 6420 636c 2d73 6571 3120 636c 2d6b end cl-seq1 cl-k │ │ │ +000050c0: 6579 2063 6c2d 7365 7132 2063 6c2d 6c65 ey cl-seq2 cl-le │ │ │ +000050d0: 6e20 636c 2d74 6573 7420 636c 2d66 6972 n cl-test cl-fir │ │ │ +000050e0: 7374 2063 6c2d 7465 7374 2d6e 6f74 2063 st cl-test-not c │ │ │ +000050f0: 6c2d 6966 5d20 3136 2028 2324 202e 2031 l-if] 16 (#$ . 1 │ │ │ +00005100: 3938 3439 295d 290a 2340 3135 3720 536f 9849)]).#@157 So │ │ │ +00005110: 7274 2074 6865 2061 7267 756d 656e 7420 rt the argument │ │ │ +00005120: 5345 5155 454e 4345 2061 6363 6f72 6469 SEQUENCE accordi │ │ │ +00005130: 6e67 2074 6f20 5052 4544 4943 4154 452e ng to PREDICATE. │ │ │ +00005140: 0a54 6869 7320 6973 2061 2064 6573 7472 .This is a destr │ │ │ +00005150: 7563 7469 7665 2066 756e 6374 696f 6e3b uctive function; │ │ │ +00005160: 2069 7420 7265 7573 6573 2074 6865 2073 it reuses the s │ │ │ +00005170: 746f 7261 6765 206f 6620 5345 5155 454e torage of SEQUEN │ │ │ +00005180: 4345 2069 6620 706f 7373 6962 6c65 2e0a CE if possible.. │ │ │ +00005190: 4b65 7977 6f72 6473 2073 7570 706f 7274 Keywords support │ │ │ +000051a0: 6564 3a20 203a 6b65 791f 0a28 6465 6661 ed: :key..(defa │ │ │ +000051b0: 6c69 6173 2027 736f 7274 2a20 235b 2863 lias 'sort* #[(c │ │ │ +000051c0: 6c2d 7365 7120 636c 2d70 7265 6420 2672 l-seq cl-pred &r │ │ │ +000051d0: 6573 7420 636c 2d6b 6579 7329 2022 0c3c est cl-keys) ".< │ │ │ +000051e0: ac8d c50c c6c7 c80c c95c 2209 5c6e 245c .........\".\n$\ │ │ │ +000051f0: 2287 ca5c 6e73 4140 185c 6e89 1bab 9a0b "..\nsA@.\n..... │ │ │ +00005200: 40cb 73ac 8dcc 5c6e 7341 40ac 86cd ce0b @.s...\nsA@..... │ │ │ +00005210: 405c 2288 0b41 4189 13ac 6629 08cf 73ab @\"..AA...f)..s. │ │ │ +00005220: 86d0 0c09 5c22 aa84 d00c d15c 2229 8722 ....\".....\")." │ │ │ +00005230: 205b 636c 2d6b 6579 2063 6c2d 7072 6564 [cl-key cl-pred │ │ │ +00005240: 2063 6c2d 6b65 7973 2063 6c2d 6b65 7973 cl-keys cl-keys │ │ │ +00005250: 2d74 656d 7020 636c 2d73 6571 2072 6570 -temp cl-seq rep │ │ │ +00005260: 6c61 6365 2061 7070 6c79 2073 6f72 742a lace apply sort* │ │ │ +00005270: 2061 7070 656e 6420 6e69 6c20 3a6b 6579 append nil :key │ │ │ +00005280: 2028 3a6b 6579 2920 3a61 6c6c 6f77 2d6f (:key) :allow-o │ │ │ +00005290: 7468 6572 2d6b 6579 7320 6572 726f 7220 ther-keys error │ │ │ +000052a0: 2242 6164 206b 6579 776f 7264 2061 7267 "Bad keyword arg │ │ │ +000052b0: 756d 656e 7420 2573 2220 286e 696c 2069 ument %s" (nil i │ │ │ +000052c0: 6465 6e74 6974 7929 2073 6f72 7420 235b dentity) sort #[ │ │ │ +000052d0: 2863 6c2d 7820 636c 2d79 2920 225c 6e0b (cl-x cl-y) "\n. │ │ │ +000052e0: 0921 0b08 215c 2287 2220 5b63 6c2d 7920 .!..!\"." [cl-y │ │ │ +000052f0: 636c 2d78 2063 6c2d 7072 6564 2063 6c2d cl-x cl-pred cl- │ │ │ +00005300: 6b65 795d 2034 5d5d 2038 2028 2324 202e key] 4]] 8 (#$ . │ │ │ +00005310: 2032 3037 3530 295d 290a 2340 3136 3420 20750)]).#@164 │ │ │ +00005320: 536f 7274 2074 6865 2061 7267 756d 656e Sort the argumen │ │ │ +00005330: 7420 5345 5155 454e 4345 2073 7461 626c t SEQUENCE stabl │ │ │ +00005340: 7920 6163 636f 7264 696e 6720 746f 2050 y according to P │ │ │ +00005350: 5245 4449 4341 5445 2e0a 5468 6973 2069 REDICATE..This i │ │ │ +00005360: 7320 6120 6465 7374 7275 6374 6976 6520 s a destructive │ │ │ +00005370: 6675 6e63 7469 6f6e 3b20 6974 2072 6575 function; it reu │ │ │ +00005380: 7365 7320 7468 6520 7374 6f72 6167 6520 ses the storage │ │ │ +00005390: 6f66 2053 4551 5545 4e43 4520 6966 2070 of SEQUENCE if p │ │ │ +000053a0: 6f73 7369 626c 652e 0a4b 6579 776f 7264 ossible..Keyword │ │ │ +000053b0: 7320 7375 7070 6f72 7465 643a 2020 3a6b s supported: :k │ │ │ +000053c0: 6579 1f0a 2864 6566 616c 6961 7320 2773 ey..(defalias 's │ │ │ +000053d0: 7461 626c 652d 736f 7274 2023 5b28 636c table-sort #[(cl │ │ │ +000053e0: 2d73 6571 2063 6c2d 7072 6564 2026 7265 -seq cl-pred &re │ │ │ +000053f0: 7374 2063 6c2d 6b65 7973 2920 22c3 c45c st cl-keys) "..\ │ │ │ +00005400: 6e09 0824 8722 205b 636c 2d6b 6579 7320 n..$." [cl-keys │ │ │ +00005410: 636c 2d70 7265 6420 636c 2d73 6571 2061 cl-pred cl-seq a │ │ │ +00005420: 7070 6c79 2073 6f72 742a 5d20 3520 2823 pply sort*] 5 (# │ │ │ +00005430: 2420 2e20 3231 3238 3029 5d29 0a23 4032 $ . 21280)]).#@2 │ │ │ +00005440: 3238 2044 6573 7472 7563 7469 7665 6c79 28 Destructively │ │ │ +00005450: 206d 6572 6765 2074 6865 2074 776f 2073 merge the two s │ │ │ +00005460: 6571 7565 6e63 6573 2074 6f20 7072 6f64 equences to prod │ │ │ +00005470: 7563 6520 6120 6e65 7720 7365 7175 656e uce a new sequen │ │ │ +00005480: 6365 2e0a 5459 5045 2069 7320 7468 6520 ce..TYPE is the │ │ │ +00005490: 7365 7175 656e 6365 2074 7970 6520 746f sequence type to │ │ │ +000054a0: 2072 6574 7572 6e2c 2053 4551 3120 616e return, SEQ1 an │ │ │ +000054b0: 6420 5345 5132 2061 7265 2074 6865 2074 d SEQ2 are the t │ │ │ +000054c0: 776f 0a61 7267 756d 656e 7420 7365 7175 wo.argument sequ │ │ │ +000054d0: 656e 6365 732c 2061 6e64 2050 5245 4420 ences, and PRED │ │ │ +000054e0: 6973 2061 2060 6c65 7373 2d74 6861 6e27 is a `less-than' │ │ │ +000054f0: 2070 7265 6469 6361 7465 206f 6e20 7468 predicate on th │ │ │ +00005500: 6520 656c 656d 656e 7473 2e0a 4b65 7977 e elements..Keyw │ │ │ +00005510: 6f72 6473 2073 7570 706f 7274 6564 3a20 ords supported: │ │ │ +00005520: 203a 6b65 791f 0a28 6465 6661 6c69 6173 :key..(defalias │ │ │ +00005530: 2027 6d65 7267 6520 235b 2863 6c2d 7479 'merge #[(cl-ty │ │ │ +00005540: 7065 2063 6c2d 7365 7131 2063 6c2d 7365 pe cl-seq1 cl-se │ │ │ +00005550: 7132 2063 6c2d 7072 6564 2026 7265 7374 q2 cl-pred &rest │ │ │ +00005560: 2063 6c2d 6b65 7973 2920 220d 3cac 85c6 cl-keys) ".<... │ │ │ +00005570: 0dc7 5c22 150c 3cac 85c6 0cc7 5c22 14c8 ..\"..<.....\".. │ │ │ +00005580: 0873 4140 1a08 8919 ab9a 0940 c973 ac8d .sA@.......@.s.. │ │ │ +00005590: ca08 7341 40ac 86cb cc09 405c 2288 0941 ..sA@.....@\"..A │ │ │ +000055a0: 4189 11ac 6629 c71b 0dab b20c abaf 0e0e A...f).......... │ │ │ +000055b0: 5c6e ab86 5c6e 0c40 21aa 820c 405c 6eab \n..\n.@!...@\n. │ │ │ +000055c0: 865c 6e0d 4021 aa82 0d40 5c22 ab8a 0c89 .\n.@!...@\".... │ │ │ +000055d0: 4114 400b 4213 aa55 0d89 4115 400b 4213 A.@.B..U..A.@.B. │ │ │ +000055e0: aa4b cd0b 9f0d a40c a40e 0f5c 222a 8722 .K.........\"*." │ │ │ +000055f0: 205b 636c 2d6b 6579 7320 636c 2d6b 6579 [cl-keys cl-key │ │ │ +00005600: 732d 7465 6d70 2063 6c2d 6b65 7920 636c s-temp cl-key cl │ │ │ +00005610: 2d72 6573 2063 6c2d 7365 7132 2063 6c2d -res cl-seq2 cl- │ │ │ +00005620: 7365 7131 2061 7070 656e 6420 6e69 6c20 seq1 append nil │ │ │ +00005630: 3a6b 6579 2028 3a6b 6579 2920 3a61 6c6c :key (:key) :all │ │ │ +00005640: 6f77 2d6f 7468 6572 2d6b 6579 7320 6572 ow-other-keys er │ │ │ +00005650: 726f 7220 2242 6164 206b 6579 776f 7264 ror "Bad keyword │ │ │ +00005660: 2061 7267 756d 656e 7420 2573 2220 636f argument %s" co │ │ │ +00005670: 6572 6365 2063 6c2d 7072 6564 2063 6c2d erce cl-pred cl- │ │ │ +00005680: 7479 7065 5d20 3520 2823 2420 2e20 3231 type] 5 (#$ . 21 │ │ │ +00005690: 3537 3129 5d29 0a23 4031 3332 2046 696e 571)]).#@132 Fin │ │ │ +000056a0: 6420 7468 6520 6669 7273 7420 6f63 6375 d the first occu │ │ │ +000056b0: 7272 656e 6365 206f 6620 4954 454d 2069 rrence of ITEM i │ │ │ +000056c0: 6e20 4c49 5354 2e0a 5265 7475 726e 2074 n LIST..Return t │ │ │ +000056d0: 6865 2073 7562 6c69 7374 206f 6620 4c49 he sublist of LI │ │ │ +000056e0: 5354 2077 686f 7365 2063 6172 2069 7320 ST whose car is │ │ │ +000056f0: 4954 454d 2e0a 4b65 7977 6f72 6473 2073 ITEM..Keywords s │ │ │ +00005700: 7570 706f 7274 6564 3a20 203a 7465 7374 upported: :test │ │ │ +00005710: 203a 7465 7374 2d6e 6f74 203a 6b65 791f :test-not :key. │ │ │ +00005720: 0a28 6465 6661 6c69 6173 2027 6d65 6d62 .(defalias 'memb │ │ │ +00005730: 6572 2a20 235b 2863 6c2d 6974 656d 2063 er* #[(cl-item c │ │ │ +00005740: 6c2d 6c69 7374 2026 7265 7374 2063 6c2d l-list &rest cl- │ │ │ +00005750: 6b65 7973 2920 220c 83bb 00c6 0c73 4140 keys) "......sA@ │ │ │ +00005760: 18c7 0c73 4140 ad8a c70c 7341 4089 10ad ...sA@....sA@... │ │ │ +00005770: 81c8 1e11 c90c 7341 401b ca0c 7341 401e ......sA@...sA@. │ │ │ +00005780: 10cb 0c73 4140 ad8b cb0c 7341 4089 1610 ...sA@....sA@... │ │ │ +00005790: ad81 c81e 120c 8919 ab9a 0940 cc73 ac8d ...........@.s.. │ │ │ +000057a0: cd0c 7341 40ac 86ce cf09 405c 2288 0941 ..sA@.....@\"..A │ │ │ +000057b0: 4189 11ac 6629 0dab d708 ab94 085c 6e0b A...f).......\n. │ │ │ +000057c0: ab86 0b0d 4021 aa82 0d40 5c22 3f0e 1161 ....@!...@\"?..a │ │ │ +000057d0: aab8 0e10 ab94 0e10 0bab 860b 0d40 21aa .............@!. │ │ │ +000057e0: 820d 4021 3f0e 1261 aaa0 5c6e a7ab 8f5c ..@!?..a..\n...\ │ │ │ +000057f0: 6e0b ab86 0b0d 4021 aa82 0d40 6baa 8d5c n.....@!...@k..\ │ │ │ +00005800: 6e0b ab86 0b0d 4021 aa82 0d40 61ac 860d n.....@!...@a... │ │ │ +00005810: 4189 15ac 290d 2d87 5c6e a7ab 885c 6ea8 A...).-.\n...\n. │ │ │ +00005820: ac84 5c6e 0db6 875c 6e0d 7387 2220 5b63 ..\n...\n.s." [c │ │ │ +00005830: 6c2d 7465 7374 2063 6c2d 6b65 7973 2d74 l-test cl-keys-t │ │ │ +00005840: 656d 7020 636c 2d69 7465 6d20 636c 2d6b emp cl-item cl-k │ │ │ +00005850: 6579 2063 6c2d 6b65 7973 2063 6c2d 6c69 ey cl-keys cl-li │ │ │ +00005860: 7374 203a 7465 7374 203a 7465 7374 2d6e st :test :test-n │ │ │ +00005870: 6f74 2074 203a 6b65 7920 3a69 6620 3a69 ot t :key :if :i │ │ │ +00005880: 662d 6e6f 7420 283a 7465 7374 203a 7465 f-not (:test :te │ │ │ +00005890: 7374 2d6e 6f74 203a 6b65 7920 3a69 6620 st-not :key :if │ │ │ +000058a0: 3a69 662d 6e6f 7429 203a 616c 6c6f 772d :if-not) :allow- │ │ │ +000058b0: 6f74 6865 722d 6b65 7973 2065 7272 6f72 other-keys error │ │ │ +000058c0: 2022 4261 6420 6b65 7977 6f72 6420 6172 "Bad keyword ar │ │ │ +000058d0: 6775 6d65 6e74 2025 7322 2063 6c2d 6966 gument %s" cl-if │ │ │ +000058e0: 2063 6c2d 7465 7374 2d6e 6f74 2063 6c2d cl-test-not cl- │ │ │ +000058f0: 6966 2d6e 6f74 5d20 3520 2823 2420 2e20 if-not] 5 (#$ . │ │ │ +00005900: 3232 3137 3329 5d29 0a23 4031 3233 2046 22173)]).#@123 F │ │ │ +00005910: 696e 6420 7468 6520 6669 7273 7420 6974 ind the first it │ │ │ +00005920: 656d 2073 6174 6973 6679 696e 6720 5052 em satisfying PR │ │ │ +00005930: 4544 4943 4154 4520 696e 204c 4953 542e EDICATE in LIST. │ │ │ +00005940: 0a52 6574 7572 6e20 7468 6520 7375 626c .Return the subl │ │ │ +00005950: 6973 7420 6f66 204c 4953 5420 7768 6f73 ist of LIST whos │ │ │ +00005960: 6520 6361 7220 6d61 7463 6865 732e 0a4b e car matches..K │ │ │ +00005970: 6579 776f 7264 7320 7375 7070 6f72 7465 eywords supporte │ │ │ +00005980: 643a 2020 3a6b 6579 1f0a 2864 6566 616c d: :key..(defal │ │ │ +00005990: 6961 7320 276d 656d 6265 722d 6966 2023 ias 'member-if # │ │ │ +000059a0: 5b28 636c 2d70 7265 6420 636c 2d6c 6973 [(cl-pred cl-lis │ │ │ +000059b0: 7420 2672 6573 7420 636c 2d6b 6579 7329 t &rest cl-keys) │ │ │ +000059c0: 2022 c3c4 c55c 6ec6 0908 2606 8722 205b "...\n...&.." [ │ │ │ +000059d0: 636c 2d6b 6579 7320 636c 2d70 7265 6420 cl-keys cl-pred │ │ │ +000059e0: 636c 2d6c 6973 7420 6170 706c 7920 6d65 cl-list apply me │ │ │ +000059f0: 6d62 6572 2a20 6e69 6c20 3a69 665d 2037 mber* nil :if] 7 │ │ │ +00005a00: 2028 2324 202e 2032 3237 3939 295d 290a (#$ . 22799)]). │ │ │ +00005a10: 2340 3132 3720 4669 6e64 2074 6865 2066 #@127 Find the f │ │ │ +00005a20: 6972 7374 2069 7465 6d20 6e6f 7420 7361 irst item not sa │ │ │ +00005a30: 7469 7366 7969 6e67 2050 5245 4449 4341 tisfying PREDICA │ │ │ +00005a40: 5445 2069 6e20 4c49 5354 2e0a 5265 7475 TE in LIST..Retu │ │ │ +00005a50: 726e 2074 6865 2073 7562 6c69 7374 206f rn the sublist o │ │ │ +00005a60: 6620 4c49 5354 2077 686f 7365 2063 6172 f LIST whose car │ │ │ +00005a70: 206d 6174 6368 6573 2e0a 4b65 7977 6f72 matches..Keywor │ │ │ +00005a80: 6473 2073 7570 706f 7274 6564 3a20 203a ds supported: : │ │ │ +00005a90: 6b65 791f 0a28 6465 6661 6c69 6173 2027 key..(defalias ' │ │ │ +00005aa0: 6d65 6d62 6572 2d69 662d 6e6f 7420 235b member-if-not #[ │ │ │ +00005ab0: 2863 6c2d 7072 6564 2063 6c2d 6c69 7374 (cl-pred cl-list │ │ │ +00005ac0: 2026 7265 7374 2063 6c2d 6b65 7973 2920 &rest cl-keys) │ │ │ +00005ad0: 22c3 c4c5 5c6e c609 0826 0687 2220 5b63 "...\n...&.." [c │ │ │ +00005ae0: 6c2d 6b65 7973 2063 6c2d 7072 6564 2063 l-keys cl-pred c │ │ │ +00005af0: 6c2d 6c69 7374 2061 7070 6c79 206d 656d l-list apply mem │ │ │ +00005b00: 6265 722a 206e 696c 203a 6966 2d6e 6f74 ber* nil :if-not │ │ │ +00005b10: 5d20 3720 2823 2420 2e20 3233 3036 3229 ] 7 (#$ . 23062) │ │ │ +00005b20: 5d29 0a28 6465 6661 6c69 6173 2027 636c ]).(defalias 'cl │ │ │ +00005b30: 2d61 646a 6f69 6e20 235b 2863 6c2d 6974 -adjoin #[(cl-it │ │ │ +00005b40: 656d 2063 6c2d 6c69 7374 2026 7265 7374 em cl-list &rest │ │ │ +00005b50: 2063 6c2d 6b65 7973 2920 22c4 0873 4140 cl-keys) "..sA@ │ │ │ +00005b60: 1bc5 c60b ab85 0b5c 6e21 aa81 5c6e 0908 .......\n!..\n.. │ │ │ +00005b70: 2429 ab82 0987 5c6e 0942 8722 205b 636c $)....\n.B." [cl │ │ │ +00005b80: 2d6b 6579 7320 636c 2d6c 6973 7420 636c -keys cl-list cl │ │ │ +00005b90: 2d69 7465 6d20 636c 2d6b 6579 203a 6b65 -item cl-key :ke │ │ │ +00005ba0: 7920 6170 706c 7920 6d65 6d62 6572 2a5d y apply member*] │ │ │ +00005bb0: 2035 5d29 0a23 4039 3520 4669 6e64 2074 5]).#@95 Find t │ │ │ +00005bc0: 6865 2066 6972 7374 2069 7465 6d20 7768 he first item wh │ │ │ +00005bd0: 6f73 6520 6361 7220 6d61 7463 6865 7320 ose car matches │ │ │ +00005be0: 4954 454d 2069 6e20 4c49 5354 2e0a 4b65 ITEM in LIST..Ke │ │ │ +00005bf0: 7977 6f72 6473 2073 7570 706f 7274 6564 ywords supported │ │ │ +00005c00: 3a20 203a 7465 7374 203a 7465 7374 2d6e : :test :test-n │ │ │ +00005c10: 6f74 203a 6b65 791f 0a28 6465 6661 6c69 ot :key..(defali │ │ │ +00005c20: 6173 2027 6173 736f 632a 2023 5b28 636c as 'assoc* #[(cl │ │ │ +00005c30: 2d69 7465 6d20 636c 2d61 6c69 7374 2026 -item cl-alist & │ │ │ +00005c40: 7265 7374 2063 6c2d 6b65 7973 2920 220c rest cl-keys) ". │ │ │ +00005c50: 83cc 00c6 0c73 4140 18c7 0c73 4140 ad8a .....sA@...sA@.. │ │ │ +00005c60: c70c 7341 4089 10ad 81c8 1e12 c90c 7341 ..sA@.........sA │ │ │ +00005c70: 401b ca0c 7341 401e 11cb 0c73 4140 ad8b @...sA@....sA@.. │ │ │ +00005c80: cb0c 7341 4089 1611 ad81 c81e 130c 8919 ..sA@........... │ │ │ +00005c90: ab9a 0940 cc73 ac8d cd0c 7341 40ac 86ce ...@.s....sA@... │ │ │ +00005ca0: cf09 405c 2288 0941 4189 11ac 6629 0dab ..@\"..AA...f).. │ │ │ +00005cb0: e40d 403a abd9 08ab 9608 5c6e 0bab 870b ..@:......\n.... │ │ │ +00005cc0: 0d40 4021 aa83 0d40 405c 223f 0e12 61aa .@@!...@@\"?..a. │ │ │ +00005cd0: be0e 11ab 960e 110b ab87 0b0d 4040 21aa ............@@!. │ │ │ +00005ce0: 830d 4040 213f 0e13 61aa a45c 6ea7 ab91 ..@@!?..a..\n... │ │ │ +00005cf0: 5c6e 0bab 870b 0d40 4021 aa83 0d40 406b \n.....@@!...@@k │ │ │ +00005d00: aa8f 5c6e 0bab 870b 0d40 4021 aa83 0d40 ..\n.....@@!...@ │ │ │ +00005d10: 4061 ac86 0d41 8915 ac1c 0dad 820d 402d @a...A........@- │ │ │ +00005d20: 875c 6ea7 ab89 5c6e a8ac 85d0 5c6e 0d5c .\n...\n....\n.\ │ │ │ +00005d30: 2287 5c6e 0db7 8722 205b 636c 2d74 6573 ".\n..." [cl-tes │ │ │ +00005d40: 7420 636c 2d6b 6579 732d 7465 6d70 2063 t cl-keys-temp c │ │ │ +00005d50: 6c2d 6974 656d 2063 6c2d 6b65 7920 636c l-item cl-key cl │ │ │ +00005d60: 2d6b 6579 7320 636c 2d61 6c69 7374 203a -keys cl-alist : │ │ │ +00005d70: 7465 7374 203a 7465 7374 2d6e 6f74 2074 test :test-not t │ │ │ +00005d80: 203a 6b65 7920 3a69 6620 3a69 662d 6e6f :key :if :if-no │ │ │ +00005d90: 7420 283a 7465 7374 203a 7465 7374 2d6e t (:test :test-n │ │ │ +00005da0: 6f74 203a 6b65 7920 3a69 6620 3a69 662d ot :key :if :if- │ │ │ +00005db0: 6e6f 7429 203a 616c 6c6f 772d 6f74 6865 not) :allow-othe │ │ │ +00005dc0: 722d 6b65 7973 2065 7272 6f72 2022 4261 r-keys error "Ba │ │ │ +00005dd0: 6420 6b65 7977 6f72 6420 6172 6775 6d65 d keyword argume │ │ │ +00005de0: 6e74 2025 7322 2061 7373 6f63 2063 6c2d nt %s" assoc cl- │ │ │ +00005df0: 6966 2063 6c2d 7465 7374 2d6e 6f74 2063 if cl-test-not c │ │ │ +00005e00: 6c2d 6966 2d6e 6f74 5d20 3520 2823 2420 l-if-not] 5 (#$ │ │ │ +00005e10: 2e20 3233 3438 3229 5d29 0a23 4038 3620 . 23482)]).#@86 │ │ │ +00005e20: 4669 6e64 2074 6865 2066 6972 7374 2069 Find the first i │ │ │ +00005e30: 7465 6d20 7768 6f73 6520 6361 7220 7361 tem whose car sa │ │ │ +00005e40: 7469 7366 6965 7320 5052 4544 4943 4154 tisfies PREDICAT │ │ │ +00005e50: 4520 696e 204c 4953 542e 0a4b 6579 776f E in LIST..Keywo │ │ │ +00005e60: 7264 7320 7375 7070 6f72 7465 643a 2020 rds supported: │ │ │ +00005e70: 3a6b 6579 1f0a 2864 6566 616c 6961 7320 :key..(defalias │ │ │ +00005e80: 2761 7373 6f63 2d69 6620 235b 2863 6c2d 'assoc-if #[(cl- │ │ │ +00005e90: 7072 6564 2063 6c2d 6c69 7374 2026 7265 pred cl-list &re │ │ │ +00005ea0: 7374 2063 6c2d 6b65 7973 2920 22c3 c4c5 st cl-keys) "... │ │ │ +00005eb0: 5c6e c609 0826 0687 2220 5b63 6c2d 6b65 \n...&.." [cl-ke │ │ │ +00005ec0: 7973 2063 6c2d 7072 6564 2063 6c2d 6c69 ys cl-pred cl-li │ │ │ +00005ed0: 7374 2061 7070 6c79 2061 7373 6f63 2a20 st apply assoc* │ │ │ +00005ee0: 6e69 6c20 3a69 665d 2037 2028 2324 202e nil :if] 7 (#$ . │ │ │ +00005ef0: 2032 3430 3936 295d 290a 2340 3933 2046 24096)]).#@93 F │ │ │ +00005f00: 696e 6420 7468 6520 6669 7273 7420 6974 ind the first it │ │ │ +00005f10: 656d 2077 686f 7365 2063 6172 2064 6f65 em whose car doe │ │ │ +00005f20: 7320 6e6f 7420 7361 7469 7366 7920 5052 s not satisfy PR │ │ │ +00005f30: 4544 4943 4154 4520 696e 204c 4953 542e EDICATE in LIST. │ │ │ +00005f40: 0a4b 6579 776f 7264 7320 7375 7070 6f72 .Keywords suppor │ │ │ +00005f50: 7465 643a 2020 3a6b 6579 1f0a 2864 6566 ted: :key..(def │ │ │ +00005f60: 616c 6961 7320 2761 7373 6f63 2d69 662d alias 'assoc-if- │ │ │ +00005f70: 6e6f 7420 235b 2863 6c2d 7072 6564 2063 not #[(cl-pred c │ │ │ +00005f80: 6c2d 6c69 7374 2026 7265 7374 2063 6c2d l-list &rest cl- │ │ │ +00005f90: 6b65 7973 2920 22c3 c4c5 5c6e c609 0826 keys) "...\n...& │ │ │ +00005fa0: 0687 2220 5b63 6c2d 6b65 7973 2063 6c2d .." [cl-keys cl- │ │ │ +00005fb0: 7072 6564 2063 6c2d 6c69 7374 2061 7070 pred cl-list app │ │ │ +00005fc0: 6c79 2061 7373 6f63 2a20 6e69 6c20 3a69 ly assoc* nil :i │ │ │ +00005fd0: 662d 6e6f 745d 2037 2028 2324 202e 2032 f-not] 7 (#$ . 2 │ │ │ +00005fe0: 3433 3139 295d 290a 2340 3935 2046 696e 4319)]).#@95 Fin │ │ │ +00005ff0: 6420 7468 6520 6669 7273 7420 6974 656d d the first item │ │ │ +00006000: 2077 686f 7365 2063 6472 206d 6174 6368 whose cdr match │ │ │ +00006010: 6573 2049 5445 4d20 696e 204c 4953 542e es ITEM in LIST. │ │ │ +00006020: 0a4b 6579 776f 7264 7320 7375 7070 6f72 .Keywords suppor │ │ │ +00006030: 7465 643a 2020 3a74 6573 7420 3a74 6573 ted: :test :tes │ │ │ +00006040: 742d 6e6f 7420 3a6b 6579 1f0a 2864 6566 t-not :key..(def │ │ │ +00006050: 616c 6961 7320 2772 6173 736f 632a 2023 alias 'rassoc* # │ │ │ +00006060: 5b28 636c 2d69 7465 6d20 636c 2d61 6c69 [(cl-item cl-ali │ │ │ +00006070: 7374 2026 7265 7374 2063 6c2d 6b65 7973 st &rest cl-keys │ │ │ +00006080: 2920 220c ac85 5c6e a783 d000 c60c 7341 ) "...\n......sA │ │ │ +00006090: 4018 c70c 7341 40ad 8ac7 0c73 4140 8910 @...sA@....sA@.. │ │ │ +000060a0: ad81 c81e 12c9 0c73 4140 1bca 0c73 4140 .......sA@...sA@ │ │ │ +000060b0: 1e11 cb0c 7341 40ad 8bcb 0c73 4140 8916 ....sA@....sA@.. │ │ │ +000060c0: 11ad 81c8 1e13 0c89 19ab 9a09 40cc 73ac ............@.s. │ │ │ +000060d0: 8dcd 0c73 4140 ac86 cecf 0940 5c22 8809 ...sA@.....@\".. │ │ │ +000060e0: 4141 8911 ac66 290d abe4 0d40 3aab d908 AA...f)....@:... │ │ │ +000060f0: ab96 085c 6e0b ab87 0b0d 4041 21aa 830d ...\n.....@A!... │ │ │ +00006100: 4041 5c22 3f0e 1261 aabe 0e11 ab96 0e11 @A\"?..a........ │ │ │ +00006110: 0bab 870b 0d40 4121 aa83 0d40 4121 3f0e .....@A!...@A!?. │ │ │ +00006120: 1361 aaa4 5c6e a7ab 915c 6e0b ab87 0b0d .a..\n...\n..... │ │ │ +00006130: 4041 21aa 830d 4041 6baa 8f5c 6e0b ab87 @A!...@Ak..\n... │ │ │ +00006140: 0b0d 4041 21aa 830d 4041 61ac 860d 4189 ..@A!...@Aa...A. │ │ │ +00006150: 15ac 1c0d ad82 0d40 2d87 d05c 6e0d 5c22 .......@-..\n.\" │ │ │ +00006160: 8722 205b 636c 2d74 6573 7420 636c 2d6b ." [cl-test cl-k │ │ │ +00006170: 6579 732d 7465 6d70 2063 6c2d 6974 656d eys-temp cl-item │ │ │ +00006180: 2063 6c2d 6b65 7920 636c 2d6b 6579 7320 cl-key cl-keys │ │ │ +00006190: 636c 2d61 6c69 7374 203a 7465 7374 203a cl-alist :test : │ │ │ +000061a0: 7465 7374 2d6e 6f74 2074 203a 6b65 7920 test-not t :key │ │ │ +000061b0: 3a69 6620 3a69 662d 6e6f 7420 283a 7465 :if :if-not (:te │ │ │ +000061c0: 7374 203a 7465 7374 2d6e 6f74 203a 6b65 st :test-not :ke │ │ │ +000061d0: 7920 3a69 6620 3a69 662d 6e6f 7429 203a y :if :if-not) : │ │ │ +000061e0: 616c 6c6f 772d 6f74 6865 722d 6b65 7973 allow-other-keys │ │ │ +000061f0: 2065 7272 6f72 2022 4261 6420 6b65 7977 error "Bad keyw │ │ │ +00006200: 6f72 6420 6172 6775 6d65 6e74 2025 7322 ord argument %s" │ │ │ +00006210: 2072 6173 7371 2063 6c2d 6966 2063 6c2d rassq cl-if cl- │ │ │ +00006220: 7465 7374 2d6e 6f74 2063 6c2d 6966 2d6e test-not cl-if-n │ │ │ +00006230: 6f74 5d20 3520 2823 2420 2e20 3234 3535 ot] 5 (#$ . 2455 │ │ │ +00006240: 3729 5d29 0a23 4038 3620 4669 6e64 2074 7)]).#@86 Find t │ │ │ +00006250: 6865 2066 6972 7374 2069 7465 6d20 7768 he first item wh │ │ │ +00006260: 6f73 6520 6364 7220 7361 7469 7366 6965 ose cdr satisfie │ │ │ +00006270: 7320 5052 4544 4943 4154 4520 696e 204c s PREDICATE in L │ │ │ +00006280: 4953 542e 0a4b 6579 776f 7264 7320 7375 IST..Keywords su │ │ │ +00006290: 7070 6f72 7465 643a 2020 3a6b 6579 1f0a pported: :key.. │ │ │ +000062a0: 2864 6566 616c 6961 7320 2772 6173 736f (defalias 'rasso │ │ │ +000062b0: 632d 6966 2023 5b28 636c 2d70 7265 6420 c-if #[(cl-pred │ │ │ +000062c0: 636c 2d6c 6973 7420 2672 6573 7420 636c cl-list &rest cl │ │ │ +000062d0: 2d6b 6579 7329 2022 c3c4 c55c 6ec6 0908 -keys) "...\n... │ │ │ +000062e0: 2606 8722 205b 636c 2d6b 6579 7320 636c &.." [cl-keys cl │ │ │ +000062f0: 2d70 7265 6420 636c 2d6c 6973 7420 6170 -pred cl-list ap │ │ │ +00006300: 706c 7920 7261 7373 6f63 2a20 6e69 6c20 ply rassoc* nil │ │ │ +00006310: 3a69 665d 2037 2028 2324 202e 2032 3531 :if] 7 (#$ . 251 │ │ │ +00006320: 3632 295d 290a 2340 3933 2046 696e 6420 62)]).#@93 Find │ │ │ +00006330: 7468 6520 6669 7273 7420 6974 656d 2077 the first item w │ │ │ +00006340: 686f 7365 2063 6472 2064 6f65 7320 6e6f hose cdr does no │ │ │ +00006350: 7420 7361 7469 7366 7920 5052 4544 4943 t satisfy PREDIC │ │ │ +00006360: 4154 4520 696e 204c 4953 542e 0a4b 6579 ATE in LIST..Key │ │ │ +00006370: 776f 7264 7320 7375 7070 6f72 7465 643a words supported: │ │ │ +00006380: 2020 3a6b 6579 1f0a 2864 6566 616c 6961 :key..(defalia │ │ │ +00006390: 7320 2772 6173 736f 632d 6966 2d6e 6f74 s 'rassoc-if-not │ │ │ +000063a0: 2023 5b28 636c 2d70 7265 6420 636c 2d6c #[(cl-pred cl-l │ │ │ +000063b0: 6973 7420 2672 6573 7420 636c 2d6b 6579 ist &rest cl-key │ │ │ +000063c0: 7329 2022 c3c4 c55c 6ec6 0908 2606 8722 s) "...\n...&.." │ │ │ +000063d0: 205b 636c 2d6b 6579 7320 636c 2d70 7265 [cl-keys cl-pre │ │ │ +000063e0: 6420 636c 2d6c 6973 7420 6170 706c 7920 d cl-list apply │ │ │ +000063f0: 7261 7373 6f63 2a20 6e69 6c20 3a69 662d rassoc* nil :if- │ │ │ +00006400: 6e6f 745d 2037 2028 2324 202e 2032 3533 not] 7 (#$ . 253 │ │ │ +00006410: 3837 295d 290a 2340 3239 3620 436f 6d62 87)]).#@296 Comb │ │ │ +00006420: 696e 6520 4c49 5354 3120 616e 6420 4c49 ine LIST1 and LI │ │ │ +00006430: 5354 3220 7573 696e 6720 6120 7365 742d ST2 using a set- │ │ │ +00006440: 756e 696f 6e20 6f70 6572 6174 696f 6e2e union operation. │ │ │ +00006450: 0a54 6865 2072 6573 756c 7420 6c69 7374 .The result list │ │ │ +00006460: 2063 6f6e 7461 696e 7320 616c 6c20 6974 contains all it │ │ │ +00006470: 656d 7320 7468 6174 2061 7070 6561 7220 ems that appear │ │ │ +00006480: 696e 2065 6974 6865 7220 4c49 5354 3120 in either LIST1 │ │ │ +00006490: 6f72 204c 4953 5432 2e0a 5468 6973 2069 or LIST2..This i │ │ │ +000064a0: 7320 6120 6e6f 6e2d 6465 7374 7275 6374 s a non-destruct │ │ │ +000064b0: 6976 6520 6675 6e63 7469 6f6e 3b20 6974 ive function; it │ │ │ +000064c0: 206d 616b 6573 2061 2063 6f70 7920 6f66 makes a copy of │ │ │ +000064d0: 2074 6865 2064 6174 6120 6966 206e 6563 the data if nec │ │ │ +000064e0: 6573 7361 7279 0a74 6f20 6176 6f69 6420 essary.to avoid │ │ │ +000064f0: 636f 7272 7570 7469 6e67 2074 6865 206f corrupting the o │ │ │ +00006500: 7269 6769 6e61 6c20 4c49 5354 3120 616e riginal LIST1 an │ │ │ +00006510: 6420 4c49 5354 322e 0a4b 6579 776f 7264 d LIST2..Keyword │ │ │ +00006520: 7320 7375 7070 6f72 7465 643a 2020 3a74 s supported: :t │ │ │ +00006530: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ +00006540: 6579 1f0a 2864 6566 616c 6961 7320 2775 ey..(defalias 'u │ │ │ +00006550: 6e69 6f6e 2023 5b28 636c 2d6c 6973 7431 nion #[(cl-list1 │ │ │ +00006560: 2063 6c2d 6c69 7374 3220 2672 6573 7420 cl-list2 &rest │ │ │ +00006570: 636c 2d6b 6579 7329 2022 5c6e ac82 0987 cl-keys) "\n.... │ │ │ +00006580: 09ac 825c 6e87 5c6e 096b ab82 5c6e 875c ...\n.\n.k..\n.\ │ │ │ +00006590: 6e47 0947 59ac 8409 5c6e 1112 09ab a408 nG.GY...\n...... │ │ │ +000065a0: ac85 0940 a7ab 8ac3 c409 405c 6e08 2412 ...@......@\n.$. │ │ │ +000065b0: aa8b 0940 5c6e 73ac 8509 405c 6e42 1209 ...@\ns...@\nB.. │ │ │ +000065c0: 8941 1188 aa59 5c6e 8722 205b 636c 2d6b .A...Y\n." [cl-k │ │ │ +000065d0: 6579 7320 636c 2d6c 6973 7432 2063 6c2d eys cl-list2 cl- │ │ │ +000065e0: 6c69 7374 3120 6170 706c 7920 6164 6a6f list1 apply adjo │ │ │ +000065f0: 696e 5d20 3520 2823 2420 2e20 3235 3632 in] 5 (#$ . 2562 │ │ │ +00006600: 3829 5d29 0a23 4032 3631 2043 6f6d 6269 8)]).#@261 Combi │ │ │ +00006610: 6e65 204c 4953 5431 2061 6e64 204c 4953 ne LIST1 and LIS │ │ │ +00006620: 5432 2075 7369 6e67 2061 2073 6574 2d75 T2 using a set-u │ │ │ +00006630: 6e69 6f6e 206f 7065 7261 7469 6f6e 2e0a nion operation.. │ │ │ +00006640: 5468 6520 7265 7375 6c74 206c 6973 7420 The result list │ │ │ +00006650: 636f 6e74 6169 6e73 2061 6c6c 2069 7465 contains all ite │ │ │ +00006660: 6d73 2074 6861 7420 6170 7065 6172 2069 ms that appear i │ │ │ +00006670: 6e20 6569 7468 6572 204c 4953 5431 206f n either LIST1 o │ │ │ +00006680: 7220 4c49 5354 322e 0a54 6869 7320 6973 r LIST2..This is │ │ │ +00006690: 2061 2064 6573 7472 7563 7469 7665 2066 a destructive f │ │ │ +000066a0: 756e 6374 696f 6e3b 2069 7420 7265 7573 unction; it reus │ │ │ +000066b0: 6573 2074 6865 2073 746f 7261 6765 206f es the storage o │ │ │ +000066c0: 6620 4c49 5354 3120 616e 6420 4c49 5354 f LIST1 and LIST │ │ │ +000066d0: 320a 7768 656e 6576 6572 2070 6f73 7369 2.whenever possi │ │ │ +000066e0: 626c 652e 0a4b 6579 776f 7264 7320 7375 ble..Keywords su │ │ │ +000066f0: 7070 6f72 7465 643a 2020 3a74 6573 7420 pported: :test │ │ │ +00006700: 3a74 6573 742d 6e6f 7420 3a6b 6579 1f0a :test-not :key.. │ │ │ +00006710: 2864 6566 616c 6961 7320 276e 756e 696f (defalias 'nunio │ │ │ +00006720: 6e20 235b 2863 6c2d 6c69 7374 3120 636c n #[(cl-list1 cl │ │ │ +00006730: 2d6c 6973 7432 2026 7265 7374 2063 6c2d -list2 &rest cl- │ │ │ +00006740: 6b65 7973 2920 225c 6eac 8209 8709 ac82 keys) "\n....... │ │ │ +00006750: 5c6e 87c3 c45c 6e09 0824 8722 205b 636c \n...\n..$." [cl │ │ │ +00006760: 2d6b 6579 7320 636c 2d6c 6973 7432 2063 -keys cl-list2 c │ │ │ +00006770: 6c2d 6c69 7374 3120 6170 706c 7920 756e l-list1 apply un │ │ │ +00006780: 696f 6e5d 2035 2028 2324 202e 2032 3631 ion] 5 (#$ . 261 │ │ │ +00006790: 3233 295d 290a 2340 3330 3220 436f 6d62 23)]).#@302 Comb │ │ │ +000067a0: 696e 6520 4c49 5354 3120 616e 6420 4c49 ine LIST1 and LI │ │ │ +000067b0: 5354 3220 7573 696e 6720 6120 7365 742d ST2 using a set- │ │ │ +000067c0: 696e 7465 7273 6563 7469 6f6e 206f 7065 intersection ope │ │ │ +000067d0: 7261 7469 6f6e 2e0a 5468 6520 7265 7375 ration..The resu │ │ │ +000067e0: 6c74 206c 6973 7420 636f 6e74 6169 6e73 lt list contains │ │ │ +000067f0: 2061 6c6c 2069 7465 6d73 2074 6861 7420 all items that │ │ │ +00006800: 6170 7065 6172 2069 6e20 626f 7468 204c appear in both L │ │ │ +00006810: 4953 5431 2061 6e64 204c 4953 5432 2e0a IST1 and LIST2.. │ │ │ +00006820: 5468 6973 2069 7320 6120 6e6f 6e2d 6465 This is a non-de │ │ │ +00006830: 7374 7275 6374 6976 6520 6675 6e63 7469 structive functi │ │ │ +00006840: 6f6e 3b20 6974 206d 616b 6573 2061 2063 on; it makes a c │ │ │ +00006850: 6f70 7920 6f66 2074 6865 2064 6174 6120 opy of the data │ │ │ +00006860: 6966 206e 6563 6573 7361 7279 0a74 6f20 if necessary.to │ │ │ +00006870: 6176 6f69 6420 636f 7272 7570 7469 6e67 avoid corrupting │ │ │ +00006880: 2074 6865 206f 7269 6769 6e61 6c20 4c49 the original LI │ │ │ +00006890: 5354 3120 616e 6420 4c49 5354 322e 0a4b ST1 and LIST2..K │ │ │ +000068a0: 6579 776f 7264 7320 7375 7070 6f72 7465 eywords supporte │ │ │ +000068b0: 643a 2020 3a74 6573 7420 3a74 6573 742d d: :test :test- │ │ │ +000068c0: 6e6f 7420 3a6b 6579 1f0a 2864 6566 616c not :key..(defal │ │ │ +000068d0: 6961 7320 2769 6e74 6572 7365 6374 696f ias 'intersectio │ │ │ +000068e0: 6e20 235b 2863 6c2d 6c69 7374 3120 636c n #[(cl-list1 cl │ │ │ +000068f0: 2d6c 6973 7432 2026 7265 7374 2063 6c2d -list2 &rest cl- │ │ │ +00006900: 6b65 7973 2920 220c adee 0dad eb0c 0d6b keys) "........k │ │ │ +00006910: ab82 0c87 c60b 7341 4018 0b89 1aab 9a5c ......sA@......\ │ │ │ +00006920: 6e40 c773 ac8d c80b 7341 40ac 86c9 ca5c n@.s....sA@....\ │ │ │ +00006930: 6e40 5c22 885c 6e41 4189 12ac 6629 cb19 n@\".\nAA...f).. │ │ │ +00006940: 0c47 0d47 59ac 840d 0c15 140d abac 0bac .G.GY........... │ │ │ +00006950: 850d 40a7 ab92 cccd 08ab 8608 0d40 21aa ..@..........@!. │ │ │ +00006960: 820d 400c 0b24 aa84 0d40 0c73 ab85 0d40 ..@..$...@.s...@ │ │ │ +00006970: 0942 110d 8941 1588 aa51 092a 8722 205b .B...A...Q.*." [ │ │ │ +00006980: 636c 2d6b 6579 2063 6c2d 7265 7320 636c cl-key cl-res cl │ │ │ +00006990: 2d6b 6579 732d 7465 6d70 2063 6c2d 6b65 -keys-temp cl-ke │ │ │ +000069a0: 7973 2063 6c2d 6c69 7374 3120 636c 2d6c ys cl-list1 cl-l │ │ │ +000069b0: 6973 7432 203a 6b65 7920 283a 6b65 7920 ist2 :key (:key │ │ │ +000069c0: 3a74 6573 7420 3a74 6573 742d 6e6f 7429 :test :test-not) │ │ │ +000069d0: 203a 616c 6c6f 772d 6f74 6865 722d 6b65 :allow-other-ke │ │ │ +000069e0: 7973 2065 7272 6f72 2022 4261 6420 6b65 ys error "Bad ke │ │ │ +000069f0: 7977 6f72 6420 6172 6775 6d65 6e74 2025 yword argument % │ │ │ +00006a00: 7322 206e 696c 2061 7070 6c79 206d 656d s" nil apply mem │ │ │ +00006a10: 6265 722a 5d20 3620 2823 2420 2e20 3236 ber*] 6 (#$ . 26 │ │ │ +00006a20: 3532 3429 5d29 0a23 4032 3637 2043 6f6d 524)]).#@267 Com │ │ │ +00006a30: 6269 6e65 204c 4953 5431 2061 6e64 204c bine LIST1 and L │ │ │ +00006a40: 4953 5432 2075 7369 6e67 2061 2073 6574 IST2 using a set │ │ │ +00006a50: 2d69 6e74 6572 7365 6374 696f 6e20 6f70 -intersection op │ │ │ +00006a60: 6572 6174 696f 6e2e 0a54 6865 2072 6573 eration..The res │ │ │ +00006a70: 756c 7420 6c69 7374 2063 6f6e 7461 696e ult list contain │ │ │ +00006a80: 7320 616c 6c20 6974 656d 7320 7468 6174 s all items that │ │ │ +00006a90: 2061 7070 6561 7220 696e 2062 6f74 6820 appear in both │ │ │ +00006aa0: 4c49 5354 3120 616e 6420 4c49 5354 322e LIST1 and LIST2. │ │ │ +00006ab0: 0a54 6869 7320 6973 2061 2064 6573 7472 .This is a destr │ │ │ +00006ac0: 7563 7469 7665 2066 756e 6374 696f 6e3b uctive function; │ │ │ +00006ad0: 2069 7420 7265 7573 6573 2074 6865 2073 it reuses the s │ │ │ +00006ae0: 746f 7261 6765 206f 6620 4c49 5354 3120 torage of LIST1 │ │ │ +00006af0: 616e 6420 4c49 5354 320a 7768 656e 6576 and LIST2.whenev │ │ │ +00006b00: 6572 2070 6f73 7369 626c 652e 0a4b 6579 er possible..Key │ │ │ +00006b10: 776f 7264 7320 7375 7070 6f72 7465 643a words supported: │ │ │ +00006b20: 2020 3a74 6573 7420 3a74 6573 742d 6e6f :test :test-no │ │ │ +00006b30: 7420 3a6b 6579 1f0a 2864 6566 616c 6961 t :key..(defalia │ │ │ +00006b40: 7320 276e 696e 7465 7273 6563 7469 6f6e s 'nintersection │ │ │ +00006b50: 2023 5b28 636c 2d6c 6973 7431 2063 6c2d #[(cl-list1 cl- │ │ │ +00006b60: 6c69 7374 3220 2672 6573 7420 636c 2d6b list2 &rest cl-k │ │ │ +00006b70: 6579 7329 2022 5c6e ad89 09ad 86c3 c45c eys) "\n.......\ │ │ │ +00006b80: 6e09 0824 8722 205b 636c 2d6b 6579 7320 n..$." [cl-keys │ │ │ +00006b90: 636c 2d6c 6973 7432 2063 6c2d 6c69 7374 cl-list2 cl-list │ │ │ +00006ba0: 3120 6170 706c 7920 696e 7465 7273 6563 1 apply intersec │ │ │ +00006bb0: 7469 6f6e 5d20 3520 2823 2420 2e20 3237 tion] 5 (#$ . 27 │ │ │ +00006bc0: 3138 3129 5d29 0a23 4032 3939 2043 6f6d 181)]).#@299 Com │ │ │ +00006bd0: 6269 6e65 204c 4953 5431 2061 6e64 204c bine LIST1 and L │ │ │ +00006be0: 4953 5432 2075 7369 6e67 2061 2073 6574 IST2 using a set │ │ │ +00006bf0: 2d64 6966 6665 7265 6e63 6520 6f70 6572 -difference oper │ │ │ +00006c00: 6174 696f 6e2e 0a54 6865 2072 6573 756c ation..The resul │ │ │ +00006c10: 7420 6c69 7374 2063 6f6e 7461 696e 7320 t list contains │ │ │ +00006c20: 616c 6c20 6974 656d 7320 7468 6174 2061 all items that a │ │ │ +00006c30: 7070 6561 7220 696e 204c 4953 5431 2062 ppear in LIST1 b │ │ │ +00006c40: 7574 206e 6f74 204c 4953 5432 2e0a 5468 ut not LIST2..Th │ │ │ +00006c50: 6973 2069 7320 6120 6e6f 6e2d 6465 7374 is is a non-dest │ │ │ +00006c60: 7275 6374 6976 6520 6675 6e63 7469 6f6e ructive function │ │ │ +00006c70: 3b20 6974 206d 616b 6573 2061 2063 6f70 ; it makes a cop │ │ │ +00006c80: 7920 6f66 2074 6865 2064 6174 6120 6966 y of the data if │ │ │ +00006c90: 206e 6563 6573 7361 7279 0a74 6f20 6176 necessary.to av │ │ │ +00006ca0: 6f69 6420 636f 7272 7570 7469 6e67 2074 oid corrupting t │ │ │ +00006cb0: 6865 206f 7269 6769 6e61 6c20 4c49 5354 he original LIST │ │ │ +00006cc0: 3120 616e 6420 4c49 5354 322e 0a4b 6579 1 and LIST2..Key │ │ │ +00006cd0: 776f 7264 7320 7375 7070 6f72 7465 643a words supported: │ │ │ +00006ce0: 2020 3a74 6573 7420 3a74 6573 742d 6e6f :test :test-no │ │ │ +00006cf0: 7420 3a6b 6579 1f0a 2864 6566 616c 6961 t :key..(defalia │ │ │ +00006d00: 7320 2773 6574 2d64 6966 6665 7265 6e63 s 'set-differenc │ │ │ +00006d10: 6520 235b 2863 6c2d 6c69 7374 3120 636c e #[(cl-list1 cl │ │ │ +00006d20: 2d6c 6973 7432 2026 7265 7374 2063 6c2d -list2 &rest cl- │ │ │ +00006d30: 6b65 7973 2920 220d ab83 09ac 820d 87c6 keys) "......... │ │ │ +00006d40: 0c73 4140 180c 891b ab9a 0b40 c773 ac8d .sA@.......@.s.. │ │ │ +00006d50: c80c 7341 40ac 86c9 ca0b 405c 2288 0b41 ..sA@.....@\"..A │ │ │ +00006d60: 4189 13ac 6629 cb1a 0dab ac0c ac85 0d40 A...f).........@ │ │ │ +00006d70: a7ab 92cc cd08 ab86 080d 4021 aa82 0d40 ..........@!...@ │ │ │ +00006d80: 090c 24aa 840d 4009 73ac 850d 405c 6e42 ..$...@.s...@\nB │ │ │ +00006d90: 120d 8941 1588 aa51 5c6e 2a87 2220 5b63 ...A...Q\n*." [c │ │ │ +00006da0: 6c2d 6b65 7920 636c 2d6c 6973 7432 2063 l-key cl-list2 c │ │ │ +00006db0: 6c2d 7265 7320 636c 2d6b 6579 732d 7465 l-res cl-keys-te │ │ │ +00006dc0: 6d70 2063 6c2d 6b65 7973 2063 6c2d 6c69 mp cl-keys cl-li │ │ │ +00006dd0: 7374 3120 3a6b 6579 2028 3a6b 6579 203a st1 :key (:key : │ │ │ +00006de0: 7465 7374 203a 7465 7374 2d6e 6f74 2920 test :test-not) │ │ │ +00006df0: 3a61 6c6c 6f77 2d6f 7468 6572 2d6b 6579 :allow-other-key │ │ │ +00006e00: 7320 6572 726f 7220 2242 6164 206b 6579 s error "Bad key │ │ │ +00006e10: 776f 7264 2061 7267 756d 656e 7420 2573 word argument %s │ │ │ +00006e20: 2220 6e69 6c20 6170 706c 7920 6d65 6d62 " nil apply memb │ │ │ +00006e30: 6572 2a5d 2036 2028 2324 202e 2032 3735 er*] 6 (#$ . 275 │ │ │ +00006e40: 3937 295d 290a 2340 3236 3420 436f 6d62 97)]).#@264 Comb │ │ │ +00006e50: 696e 6520 4c49 5354 3120 616e 6420 4c49 ine LIST1 and LI │ │ │ +00006e60: 5354 3220 7573 696e 6720 6120 7365 742d ST2 using a set- │ │ │ +00006e70: 6469 6666 6572 656e 6365 206f 7065 7261 difference opera │ │ │ +00006e80: 7469 6f6e 2e0a 5468 6520 7265 7375 6c74 tion..The result │ │ │ +00006e90: 206c 6973 7420 636f 6e74 6169 6e73 2061 list contains a │ │ │ +00006ea0: 6c6c 2069 7465 6d73 2074 6861 7420 6170 ll items that ap │ │ │ +00006eb0: 7065 6172 2069 6e20 4c49 5354 3120 6275 pear in LIST1 bu │ │ │ +00006ec0: 7420 6e6f 7420 4c49 5354 322e 0a54 6869 t not LIST2..Thi │ │ │ +00006ed0: 7320 6973 2061 2064 6573 7472 7563 7469 s is a destructi │ │ │ +00006ee0: 7665 2066 756e 6374 696f 6e3b 2069 7420 ve function; it │ │ │ +00006ef0: 7265 7573 6573 2074 6865 2073 746f 7261 reuses the stora │ │ │ +00006f00: 6765 206f 6620 4c49 5354 3120 616e 6420 ge of LIST1 and │ │ │ +00006f10: 4c49 5354 320a 7768 656e 6576 6572 2070 LIST2.whenever p │ │ │ +00006f20: 6f73 7369 626c 652e 0a4b 6579 776f 7264 ossible..Keyword │ │ │ +00006f30: 7320 7375 7070 6f72 7465 643a 2020 3a74 s supported: :t │ │ │ +00006f40: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ +00006f50: 6579 1f0a 2864 6566 616c 6961 7320 276e ey..(defalias 'n │ │ │ +00006f60: 7365 742d 6469 6666 6572 656e 6365 2023 set-difference # │ │ │ +00006f70: 5b28 636c 2d6c 6973 7431 2063 6c2d 6c69 [(cl-list1 cl-li │ │ │ +00006f80: 7374 3220 2672 6573 7420 636c 2d6b 6579 st2 &rest cl-key │ │ │ +00006f90: 7329 2022 5c6e ab83 09ac 825c 6e87 c3c4 s) "\n.....\n... │ │ │ +00006fa0: 5c6e 0908 2487 2220 5b63 6c2d 6b65 7973 \n..$." [cl-keys │ │ │ +00006fb0: 2063 6c2d 6c69 7374 3220 636c 2d6c 6973 cl-list2 cl-lis │ │ │ +00006fc0: 7431 2061 7070 6c79 2073 6574 2d64 6966 t1 apply set-dif │ │ │ +00006fd0: 6665 7265 6e63 655d 2035 2028 2324 202e ference] 5 (#$ . │ │ │ +00006fe0: 2032 3832 3336 295d 290a 2340 3330 3920 28236)]).#@309 │ │ │ +00006ff0: 436f 6d62 696e 6520 4c49 5354 3120 616e Combine LIST1 an │ │ │ +00007000: 6420 4c49 5354 3220 7573 696e 6720 6120 d LIST2 using a │ │ │ +00007010: 7365 742d 6578 636c 7573 6976 652d 6f72 set-exclusive-or │ │ │ +00007020: 206f 7065 7261 7469 6f6e 2e0a 5468 6520 operation..The │ │ │ +00007030: 7265 7375 6c74 206c 6973 7420 636f 6e74 result list cont │ │ │ +00007040: 6169 6e73 2061 6c6c 2069 7465 6d73 2074 ains all items t │ │ │ +00007050: 6861 7420 6170 7065 6172 2069 6e20 6578 hat appear in ex │ │ │ +00007060: 6163 746c 7920 6f6e 6520 6f66 204c 4953 actly one of LIS │ │ │ +00007070: 5431 2c20 4c49 5354 322e 0a54 6869 7320 T1, LIST2..This │ │ │ +00007080: 6973 2061 206e 6f6e 2d64 6573 7472 7563 is a non-destruc │ │ │ +00007090: 7469 7665 2066 756e 6374 696f 6e3b 2069 tive function; i │ │ │ +000070a0: 7420 6d61 6b65 7320 6120 636f 7079 206f t makes a copy o │ │ │ +000070b0: 6620 7468 6520 6461 7461 2069 6620 6e65 f the data if ne │ │ │ +000070c0: 6365 7373 6172 790a 746f 2061 766f 6964 cessary.to avoid │ │ │ +000070d0: 2063 6f72 7275 7074 696e 6720 7468 6520 corrupting the │ │ │ +000070e0: 6f72 6967 696e 616c 204c 4953 5431 2061 original LIST1 a │ │ │ +000070f0: 6e64 204c 4953 5432 2e0a 4b65 7977 6f72 nd LIST2..Keywor │ │ │ +00007100: 6473 2073 7570 706f 7274 6564 3a20 203a ds supported: : │ │ │ +00007110: 7465 7374 203a 7465 7374 2d6e 6f74 203a test :test-not : │ │ │ +00007120: 6b65 791f 0a28 6465 6661 6c69 6173 2027 key..(defalias ' │ │ │ +00007130: 7365 742d 6578 636c 7573 6976 652d 6f72 set-exclusive-or │ │ │ +00007140: 2023 5b28 636c 2d6c 6973 7431 2063 6c2d #[(cl-list1 cl- │ │ │ +00007150: 6c69 7374 3220 2672 6573 7420 636c 2d6b list2 &rest cl-k │ │ │ +00007160: 6579 7329 2022 5c6e ac82 0987 09ac 825c eys) "\n.......\ │ │ │ +00007170: 6e87 5c6e 096b 3fad 8ec3 c4c5 5c6e 0908 n.\n.k?.....\n.. │ │ │ +00007180: 24c4 c509 5c6e 0824 5c22 8722 205b 636c $...\n.$\"." [cl │ │ │ +00007190: 2d6b 6579 7320 636c 2d6c 6973 7432 2063 -keys cl-list2 c │ │ │ +000071a0: 6c2d 6c69 7374 3120 6170 7065 6e64 2061 l-list1 append a │ │ │ +000071b0: 7070 6c79 2073 6574 2d64 6966 6665 7265 pply set-differe │ │ │ +000071c0: 6e63 655d 2037 2028 2324 202e 2032 3836 nce] 7 (#$ . 286 │ │ │ +000071d0: 3536 295d 290a 2340 3237 3420 436f 6d62 56)]).#@274 Comb │ │ │ +000071e0: 696e 6520 4c49 5354 3120 616e 6420 4c49 ine LIST1 and LI │ │ │ +000071f0: 5354 3220 7573 696e 6720 6120 7365 742d ST2 using a set- │ │ │ +00007200: 6578 636c 7573 6976 652d 6f72 206f 7065 exclusive-or ope │ │ │ +00007210: 7261 7469 6f6e 2e0a 5468 6520 7265 7375 ration..The resu │ │ │ +00007220: 6c74 206c 6973 7420 636f 6e74 6169 6e73 lt list contains │ │ │ +00007230: 2061 6c6c 2069 7465 6d73 2074 6861 7420 all items that │ │ │ +00007240: 6170 7065 6172 2069 6e20 6578 6163 746c appear in exactl │ │ │ +00007250: 7920 6f6e 6520 6f66 204c 4953 5431 2c20 y one of LIST1, │ │ │ +00007260: 4c49 5354 322e 0a54 6869 7320 6973 2061 LIST2..This is a │ │ │ +00007270: 2064 6573 7472 7563 7469 7665 2066 756e destructive fun │ │ │ +00007280: 6374 696f 6e3b 2069 7420 7265 7573 6573 ction; it reuses │ │ │ +00007290: 2074 6865 2073 746f 7261 6765 206f 6620 the storage of │ │ │ +000072a0: 4c49 5354 3120 616e 6420 4c49 5354 320a LIST1 and LIST2. │ │ │ +000072b0: 7768 656e 6576 6572 2070 6f73 7369 626c whenever possibl │ │ │ +000072c0: 652e 0a4b 6579 776f 7264 7320 7375 7070 e..Keywords supp │ │ │ +000072d0: 6f72 7465 643a 2020 3a74 6573 7420 3a74 orted: :test :t │ │ │ +000072e0: 6573 742d 6e6f 7420 3a6b 6579 1f0a 2864 est-not :key..(d │ │ │ +000072f0: 6566 616c 6961 7320 276e 7365 742d 6578 efalias 'nset-ex │ │ │ +00007300: 636c 7573 6976 652d 6f72 2023 5b28 636c clusive-or #[(cl │ │ │ +00007310: 2d6c 6973 7431 2063 6c2d 6c69 7374 3220 -list1 cl-list2 │ │ │ +00007320: 2672 6573 7420 636c 2d6b 6579 7329 2022 &rest cl-keys) " │ │ │ +00007330: 5c6e ac82 0987 09ac 825c 6e87 5c6e 096b \n.......\n.\n.k │ │ │ +00007340: 3fad 8dc3 c45c 6e09 0824 c3c4 095c 6e08 ?....\n..$...\n. │ │ │ +00007350: 24a4 8722 205b 636c 2d6b 6579 7320 636c $.." [cl-keys cl │ │ │ +00007360: 2d6c 6973 7432 2063 6c2d 6c69 7374 3120 -list2 cl-list1 │ │ │ +00007370: 6170 706c 7920 6e73 6574 2d64 6966 6665 apply nset-diffe │ │ │ +00007380: 7265 6e63 655d 2036 2028 2324 202e 2032 rence] 6 (#$ . 2 │ │ │ +00007390: 3931 3438 295d 290a 2340 3133 3420 5472 9148)]).#@134 Tr │ │ │ +000073a0: 7565 2069 6620 4c49 5354 3120 6973 2061 ue if LIST1 is a │ │ │ +000073b0: 2073 7562 7365 7420 6f66 204c 4953 5432 subset of LIST2 │ │ │ +000073c0: 2e0a 492e 652e 2c20 6966 2065 7665 7279 ..I.e., if every │ │ │ +000073d0: 2065 6c65 6d65 6e74 206f 6620 4c49 5354 element of LIST │ │ │ +000073e0: 3120 616c 736f 2061 7070 6561 7273 2069 1 also appears i │ │ │ +000073f0: 6e20 4c49 5354 322e 0a4b 6579 776f 7264 n LIST2..Keyword │ │ │ +00007400: 7320 7375 7070 6f72 7465 643a 2020 3a74 s supported: :t │ │ │ +00007410: 6573 7420 3a74 6573 742d 6e6f 7420 3a6b est :test-not :k │ │ │ +00007420: 6579 1f0a 2864 6566 616c 6961 7320 2773 ey..(defalias 's │ │ │ +00007430: 7562 7365 7470 2023 5b28 636c 2d6c 6973 ubsetp #[(cl-lis │ │ │ +00007440: 7431 2063 6c2d 6c69 7374 3220 2672 6573 t1 cl-list2 &res │ │ │ +00007450: 7420 636c 2d6b 6579 7329 2022 0cac 82c5 t cl-keys) ".... │ │ │ +00007460: 8709 adcc 0c09 6bab 82c5 87c6 5c6e 7341 ......k.....\nsA │ │ │ +00007470: 4018 5c6e 891b ab9a 0b40 c773 ac8d c85c @.\n.....@.s...\ │ │ │ +00007480: 6e73 4140 ac86 c9ca 0b40 5c22 880b 4141 nsA@.....@\"..AA │ │ │ +00007490: 8913 ac66 290c ab99 cbcc 08ab 8608 0c40 ...f)..........@ │ │ │ +000074a0: 21aa 820c 4009 5c6e 24ab 870c 8941 1488 !...@.\n$....A.. │ │ │ +000074b0: aa64 0c29 3f87 2220 5b63 6c2d 6b65 7920 .d.)?." [cl-key │ │ │ +000074c0: 636c 2d6c 6973 7432 2063 6c2d 6b65 7973 cl-list2 cl-keys │ │ │ +000074d0: 2063 6c2d 6b65 7973 2d74 656d 7020 636c cl-keys-temp cl │ │ │ +000074e0: 2d6c 6973 7431 2074 203a 6b65 7920 283a -list1 t :key (: │ │ │ +000074f0: 6b65 7920 3a74 6573 7420 3a74 6573 742d key :test :test- │ │ │ +00007500: 6e6f 7429 203a 616c 6c6f 772d 6f74 6865 not) :allow-othe │ │ │ +00007510: 722d 6b65 7973 2065 7272 6f72 2022 4261 r-keys error "Ba │ │ │ +00007520: 6420 6b65 7977 6f72 6420 6172 6775 6d65 d keyword argume │ │ │ +00007530: 6e74 2025 7322 2061 7070 6c79 206d 656d nt %s" apply mem │ │ │ +00007540: 6265 722a 5d20 3620 2823 2420 2e20 3239 ber*] 6 (#$ . 29 │ │ │ +00007550: 3539 3829 5d29 0a23 4031 3639 2053 7562 598)]).#@169 Sub │ │ │ +00007560: 7374 6974 7574 6520 4e45 5720 666f 7220 stitute NEW for │ │ │ +00007570: 656c 656d 656e 7473 206d 6174 6368 696e elements matchin │ │ │ +00007580: 6720 5052 4544 4943 4154 4520 696e 2054 g PREDICATE in T │ │ │ +00007590: 5245 4520 286e 6f6e 2d64 6573 7472 7563 REE (non-destruc │ │ │ +000075a0: 7469 7665 6c79 292e 0a52 6574 7572 6e20 tively)..Return │ │ │ +000075b0: 6120 636f 7079 206f 6620 5452 4545 2077 a copy of TREE w │ │ │ +000075c0: 6974 6820 616c 6c20 6d61 7463 6869 6e67 ith all matching │ │ │ +000075d0: 2065 6c65 6d65 6e74 7320 7265 706c 6163 elements replac │ │ │ +000075e0: 6564 2062 7920 4e45 572e 0a4b 6579 776f ed by NEW..Keywo │ │ │ +000075f0: 7264 7320 7375 7070 6f72 7465 643a 2020 rds supported: │ │ │ +00007600: 3a6b 6579 1f0a 2864 6566 616c 6961 7320 :key..(defalias │ │ │ +00007610: 2773 7562 7374 2d69 6620 235b 2863 6c2d 'subst-if #[(cl- │ │ │ +00007620: 6e65 7720 636c 2d70 7265 6420 636c 2d74 new cl-pred cl-t │ │ │ +00007630: 7265 6520 2672 6573 7420 636c 2d6b 6579 ree &rest cl-key │ │ │ +00007640: 7329 2022 c4c5 c60b 4243 5c6e c709 0826 s) "....BC\n...& │ │ │ +00007650: 0687 2220 5b63 6c2d 6b65 7973 2063 6c2d .." [cl-keys cl- │ │ │ +00007660: 7072 6564 2063 6c2d 7472 6565 2063 6c2d pred cl-tree cl- │ │ │ +00007670: 6e65 7720 6170 706c 7920 7375 626c 6973 new apply sublis │ │ │ +00007680: 206e 696c 203a 6966 5d20 3720 2823 2420 nil :if] 7 (#$ │ │ │ +00007690: 2e20 3330 3034 3529 5d29 0a23 4031 3733 . 30045)]).#@173 │ │ │ +000076a0: 2053 7562 7374 6974 7574 6520 4e45 5720 Substitute NEW │ │ │ +000076b0: 666f 7220 656c 7473 206e 6f74 206d 6174 for elts not mat │ │ │ +000076c0: 6368 696e 6720 5052 4544 4943 4154 4520 ching PREDICATE │ │ │ +000076d0: 696e 2054 5245 4520 286e 6f6e 2d64 6573 in TREE (non-des │ │ │ +000076e0: 7472 7563 7469 7665 6c79 292e 0a52 6574 tructively)..Ret │ │ │ +000076f0: 7572 6e20 6120 636f 7079 206f 6620 5452 urn a copy of TR │ │ │ +00007700: 4545 2077 6974 6820 616c 6c20 6e6f 6e2d EE with all non- │ │ │ +00007710: 6d61 7463 6869 6e67 2065 6c65 6d65 6e74 matching element │ │ │ +00007720: 7320 7265 706c 6163 6564 2062 7920 4e45 s replaced by NE │ │ │ +00007730: 572e 0a4b 6579 776f 7264 7320 7375 7070 W..Keywords supp │ │ │ +00007740: 6f72 7465 643a 2020 3a6b 6579 1f0a 2864 orted: :key..(d │ │ │ +00007750: 6566 616c 6961 7320 2773 7562 7374 2d69 efalias 'subst-i │ │ │ +00007760: 662d 6e6f 7420 235b 2863 6c2d 6e65 7720 f-not #[(cl-new │ │ │ +00007770: 636c 2d70 7265 6420 636c 2d74 7265 6520 cl-pred cl-tree │ │ │ +00007780: 2672 6573 7420 636c 2d6b 6579 7329 2022 &rest cl-keys) " │ │ │ +00007790: c4c5 c60b 4243 5c6e c709 0826 0687 2220 ....BC\n...&.." │ │ │ +000077a0: 5b63 6c2d 6b65 7973 2063 6c2d 7072 6564 [cl-keys cl-pred │ │ │ +000077b0: 2063 6c2d 7472 6565 2063 6c2d 6e65 7720 cl-tree cl-new │ │ │ +000077c0: 6170 706c 7920 7375 626c 6973 206e 696c apply sublis nil │ │ │ +000077d0: 203a 6966 2d6e 6f74 5d20 3720 2823 2420 :if-not] 7 (#$ │ │ │ +000077e0: 2e20 3330 3336 3929 5d29 0a23 4031 3838 . 30369)]).#@188 │ │ │ +000077f0: 2053 7562 7374 6974 7574 6520 4e45 5720 Substitute NEW │ │ │ +00007800: 666f 7220 4f4c 4420 6576 6572 7977 6865 for OLD everywhe │ │ │ +00007810: 7265 2069 6e20 5452 4545 2028 6465 7374 re in TREE (dest │ │ │ +00007820: 7275 6374 6976 656c 7929 2e0a 416e 7920 ructively)..Any │ │ │ +00007830: 656c 656d 656e 7420 6f66 2054 5245 4520 element of TREE │ │ │ +00007840: 7768 6963 6820 6973 2060 6571 6c27 2074 which is `eql' t │ │ │ +00007850: 6f20 4f4c 4420 6973 2063 6861 6e67 6564 o OLD is changed │ │ │ +00007860: 2074 6f20 4e45 5720 2876 6961 2061 2063 to NEW (via a c │ │ │ +00007870: 616c 6c0a 746f 2060 7365 7463 6172 2729 all.to `setcar') │ │ │ +00007880: 2e0a 4b65 7977 6f72 6473 2073 7570 706f ..Keywords suppo │ │ │ +00007890: 7274 6564 3a20 203a 7465 7374 203a 7465 rted: :test :te │ │ │ +000078a0: 7374 2d6e 6f74 203a 6b65 791f 0a28 6465 st-not :key..(de │ │ │ +000078b0: 6661 6c69 6173 2027 6e73 7562 7374 2023 falias 'nsubst # │ │ │ +000078c0: 5b28 636c 2d6e 6577 2063 6c2d 6f6c 6420 [(cl-new cl-old │ │ │ +000078d0: 636c 2d74 7265 6520 2672 6573 7420 636c cl-tree &rest cl │ │ │ +000078e0: 2d6b 6579 7329 2022 c4c5 0b5c 6e42 4309 -keys) "...\nBC. │ │ │ +000078f0: 0824 8722 205b 636c 2d6b 6579 7320 636c .$." [cl-keys cl │ │ │ +00007900: 2d74 7265 6520 636c 2d6e 6577 2063 6c2d -tree cl-new cl- │ │ │ +00007910: 6f6c 6420 6170 706c 7920 6e73 7562 6c69 old apply nsubli │ │ │ +00007920: 735d 2035 2028 2324 202e 2033 3037 3035 s] 5 (#$ . 30705 │ │ │ +00007930: 295d 290a 2340 3137 3720 5375 6273 7469 )]).#@177 Substi │ │ │ +00007940: 7475 7465 204e 4557 2066 6f72 2065 6c65 tute NEW for ele │ │ │ +00007950: 6d65 6e74 7320 6d61 7463 6869 6e67 2050 ments matching P │ │ │ +00007960: 5245 4449 4341 5445 2069 6e20 5452 4545 REDICATE in TREE │ │ │ +00007970: 2028 6465 7374 7275 6374 6976 656c 7929 (destructively) │ │ │ +00007980: 2e0a 416e 7920 656c 656d 656e 7420 6f66 ..Any element of │ │ │ +00007990: 2054 5245 4520 7768 6963 6820 6d61 7463 TREE which matc │ │ │ +000079a0: 6865 7320 6973 2063 6861 6e67 6564 2074 hes is changed t │ │ │ +000079b0: 6f20 4e45 5720 2876 6961 2061 2063 616c o NEW (via a cal │ │ │ +000079c0: 6c20 746f 2060 7365 7463 6172 2729 2e0a l to `setcar').. │ │ │ +000079d0: 4b65 7977 6f72 6473 2073 7570 706f 7274 Keywords support │ │ │ +000079e0: 6564 3a20 203a 6b65 791f 0a28 6465 6661 ed: :key..(defa │ │ │ +000079f0: 6c69 6173 2027 6e73 7562 7374 2d69 6620 lias 'nsubst-if │ │ │ +00007a00: 235b 2863 6c2d 6e65 7720 636c 2d70 7265 #[(cl-new cl-pre │ │ │ +00007a10: 6420 636c 2d74 7265 6520 2672 6573 7420 d cl-tree &rest │ │ │ +00007a20: 636c 2d6b 6579 7329 2022 c4c5 c60b 4243 cl-keys) "....BC │ │ │ +00007a30: 5c6e c709 0826 0687 2220 5b63 6c2d 6b65 \n...&.." [cl-ke │ │ │ +00007a40: 7973 2063 6c2d 7072 6564 2063 6c2d 7472 ys cl-pred cl-tr │ │ │ +00007a50: 6565 2063 6c2d 6e65 7720 6170 706c 7920 ee cl-new apply │ │ │ +00007a60: 6e73 7562 6c69 7320 6e69 6c20 3a69 665d nsublis nil :if] │ │ │ +00007a70: 2037 2028 2324 202e 2033 3130 3334 295d 7 (#$ . 31034)] │ │ │ +00007a80: 290a 2340 3138 3120 5375 6273 7469 7475 ).#@181 Substitu │ │ │ +00007a90: 7465 204e 4557 2066 6f72 2065 6c65 6d65 te NEW for eleme │ │ │ +00007aa0: 6e74 7320 6e6f 7420 6d61 7463 6869 6e67 nts not matching │ │ │ +00007ab0: 2050 5245 4449 4341 5445 2069 6e20 5452 PREDICATE in TR │ │ │ +00007ac0: 4545 2028 6465 7374 7275 6374 6976 656c EE (destructivel │ │ │ +00007ad0: 7929 2e0a 416e 7920 656c 656d 656e 7420 y)..Any element │ │ │ +00007ae0: 6f66 2054 5245 4520 7768 6963 6820 6d61 of TREE which ma │ │ │ +00007af0: 7463 6865 7320 6973 2063 6861 6e67 6564 tches is changed │ │ │ +00007b00: 2074 6f20 4e45 5720 2876 6961 2061 2063 to NEW (via a c │ │ │ +00007b10: 616c 6c20 746f 2060 7365 7463 6172 2729 all to `setcar') │ │ │ +00007b20: 2e0a 4b65 7977 6f72 6473 2073 7570 706f ..Keywords suppo │ │ │ +00007b30: 7274 6564 3a20 203a 6b65 791f 0a28 6465 rted: :key..(de │ │ │ +00007b40: 6661 6c69 6173 2027 6e73 7562 7374 2d69 falias 'nsubst-i │ │ │ +00007b50: 662d 6e6f 7420 235b 2863 6c2d 6e65 7720 f-not #[(cl-new │ │ │ +00007b60: 636c 2d70 7265 6420 636c 2d74 7265 6520 cl-pred cl-tree │ │ │ +00007b70: 2672 6573 7420 636c 2d6b 6579 7329 2022 &rest cl-keys) " │ │ │ +00007b80: c4c5 c60b 4243 5c6e c709 0826 0687 2220 ....BC\n...&.." │ │ │ +00007b90: 5b63 6c2d 6b65 7973 2063 6c2d 7072 6564 [cl-keys cl-pred │ │ │ +00007ba0: 2063 6c2d 7472 6565 2063 6c2d 6e65 7720 cl-tree cl-new │ │ │ +00007bb0: 6170 706c 7920 6e73 7562 6c69 7320 6e69 apply nsublis ni │ │ │ +00007bc0: 6c20 3a69 662d 6e6f 745d 2037 2028 2324 l :if-not] 7 (#$ │ │ │ +00007bd0: 202e 2033 3133 3638 295d 290a 2340 3137 . 31368)]).#@17 │ │ │ +00007be0: 3220 5065 7266 6f72 6d20 7375 6273 7469 2 Perform substi │ │ │ +00007bf0: 7475 7469 6f6e 7320 696e 6469 6361 7465 tutions indicate │ │ │ +00007c00: 6420 6279 2041 4c49 5354 2069 6e20 5452 d by ALIST in TR │ │ │ +00007c10: 4545 2028 6e6f 6e2d 6465 7374 7275 6374 EE (non-destruct │ │ │ +00007c20: 6976 656c 7929 2e0a 5265 7475 726e 2061 ively)..Return a │ │ │ +00007c30: 2063 6f70 7920 6f66 2054 5245 4520 7769 copy of TREE wi │ │ │ +00007c40: 7468 2061 6c6c 206d 6174 6368 696e 6720 th all matching │ │ │ +00007c50: 656c 656d 656e 7473 2072 6570 6c61 6365 elements replace │ │ │ +00007c60: 642e 0a4b 6579 776f 7264 7320 7375 7070 d..Keywords supp │ │ │ +00007c70: 6f72 7465 643a 2020 3a74 6573 7420 3a74 orted: :test :t │ │ │ +00007c80: 6573 742d 6e6f 7420 3a6b 6579 1f0a 2864 est-not :key..(d │ │ │ +00007c90: 6566 616c 6961 7320 2773 7562 6c69 7320 efalias 'sublis │ │ │ +00007ca0: 235b 2863 6c2d 616c 6973 7420 636c 2d74 #[(cl-alist cl-t │ │ │ +00007cb0: 7265 6520 2672 6573 7420 636c 2d6b 6579 ree &rest cl-key │ │ │ +00007cc0: 7329 2022 c60d 7341 401b c70d 7341 40ad s) "..sA@...sA@. │ │ │ +00007cd0: 8ac7 0d73 4140 8913 ad81 c819 c90d 7341 ...sA@........sA │ │ │ +00007ce0: 4018 ca0d 7341 401a cb0d 7341 40ad 8acb @...sA@...sA@... │ │ │ +00007cf0: 0d73 4140 8912 ad81 c81e 110d 891c ab9a .sA@............ │ │ │ +00007d00: 0c40 cc73 ac8d cd0d 7341 40ac 86ce cf0c .@.s....sA@..... │ │ │ +00007d10: 405c 2288 0c41 4189 14ac 6629 d00e 1221 @\"..AA...f)...! │ │ │ +00007d20: 2d87 2220 5b63 6c2d 6b65 7920 636c 2d74 -." [cl-key cl-t │ │ │ +00007d30: 6573 742d 6e6f 7420 636c 2d69 6620 636c est-not cl-if cl │ │ │ +00007d40: 2d74 6573 7420 636c 2d6b 6579 732d 7465 -test cl-keys-te │ │ │ +00007d50: 6d70 2063 6c2d 6b65 7973 203a 7465 7374 mp cl-keys :test │ │ │ +00007d60: 203a 7465 7374 2d6e 6f74 2074 203a 6b65 :test-not t :ke │ │ │ +00007d70: 7920 3a69 6620 3a69 662d 6e6f 7420 283a y :if :if-not (: │ │ │ +00007d80: 7465 7374 203a 7465 7374 2d6e 6f74 203a test :test-not : │ │ │ +00007d90: 6b65 7920 3a69 6620 3a69 662d 6e6f 7429 key :if :if-not) │ │ │ +00007da0: 203a 616c 6c6f 772d 6f74 6865 722d 6b65 :allow-other-ke │ │ │ +00007db0: 7973 2065 7272 6f72 2022 4261 6420 6b65 ys error "Bad ke │ │ │ +00007dc0: 7977 6f72 6420 6172 6775 6d65 6e74 2025 yword argument % │ │ │ +00007dd0: 7322 2063 6c2d 7375 626c 6973 2d72 6563 s" cl-sublis-rec │ │ │ +00007de0: 2063 6c2d 6966 2d6e 6f74 2063 6c2d 7472 cl-if-not cl-tr │ │ │ +00007df0: 6565 5d20 3420 2823 2420 2e20 3331 3731 ee] 4 (#$ . 3171 │ │ │ +00007e00: 3429 5d29 0a28 6465 6661 6c69 6173 2027 4)]).(defalias ' │ │ │ +00007e10: 636c 2d73 7562 6c69 732d 7265 6320 235b cl-sublis-rec #[ │ │ │ +00007e20: 2863 6c2d 7472 6565 2920 2209 ab85 090c (cl-tree) "..... │ │ │ +00007e30: 21aa 810c 0e09 1d1b 0dab b708 ab8c 080d !............... │ │ │ +00007e40: 4040 0b5c 223f 0e5c 6e61 aaa0 0e07 ab8a @@.\"?.\na...... │ │ │ +00007e50: 0e07 0b21 3f0e 0b61 aa92 0d40 40a7 ab87 ...!?..a...@@... │ │ │ +00007e60: 0d40 400b 6baa 850d 4040 0b61 ac86 0d41 .@@.k...@@.a...A │ │ │ +00007e70: 8915 ac49 0dab 850d 4041 aaa6 0c3a aba1 ...I....@A...:.. │ │ │ +00007e80: c60c 4021 c60c 4121 1a89 1e08 0c40 61ab ..@!..A!.....@a. │ │ │ +00007e90: 895c 6e0c 4161 ab83 0caa 840e 085c 6e42 .\n.Aa.......\nB │ │ │ +00007ea0: 2aaa 810c 2a87 2220 5b63 6c2d 7465 7374 *...*." [cl-test │ │ │ +00007eb0: 2063 6c2d 6b65 7920 636c 2d64 2063 6c2d cl-key cl-d cl- │ │ │ +00007ec0: 7465 6d70 2063 6c2d 7472 6565 2063 6c2d temp cl-tree cl- │ │ │ +00007ed0: 7020 636c 2d73 7562 6c69 732d 7265 6320 p cl-sublis-rec │ │ │ +00007ee0: 636c 2d69 6620 636c 2d61 2063 6c2d 616c cl-if cl-a cl-al │ │ │ +00007ef0: 6973 7420 636c 2d74 6573 742d 6e6f 7420 ist cl-test-not │ │ │ +00007f00: 636c 2d69 662d 6e6f 745d 2034 5d29 0a23 cl-if-not] 4]).# │ │ │ +00007f10: 4031 3733 2050 6572 666f 726d 2073 7562 @173 Perform sub │ │ │ +00007f20: 7374 6974 7574 696f 6e73 2069 6e64 6963 stitutions indic │ │ │ +00007f30: 6174 6564 2062 7920 414c 4953 5420 696e ated by ALIST in │ │ │ +00007f40: 2054 5245 4520 2864 6573 7472 7563 7469 TREE (destructi │ │ │ +00007f50: 7665 6c79 292e 0a41 6e79 206d 6174 6368 vely)..Any match │ │ │ +00007f60: 696e 6720 656c 656d 656e 7420 6f66 2054 ing element of T │ │ │ +00007f70: 5245 4520 6973 2063 6861 6e67 6564 2076 REE is changed v │ │ │ +00007f80: 6961 2061 2063 616c 6c20 746f 2060 7365 ia a call to `se │ │ │ +00007f90: 7463 6172 272e 0a4b 6579 776f 7264 7320 tcar'..Keywords │ │ │ +00007fa0: 7375 7070 6f72 7465 643a 2020 3a74 6573 supported: :tes │ │ │ +00007fb0: 7420 3a74 6573 742d 6e6f 7420 3a6b 6579 t :test-not :key │ │ │ +00007fc0: 1f0a 2864 6566 616c 6961 7320 276e 7375 ..(defalias 'nsu │ │ │ +00007fd0: 626c 6973 2023 5b28 636c 2d61 6c69 7374 blis #[(cl-alist │ │ │ +00007fe0: 2063 6c2d 7472 6565 2026 7265 7374 2063 cl-tree &rest c │ │ │ +00007ff0: 6c2d 6b65 7973 2920 22c6 0d73 4140 1ac7 l-keys) "..sA@.. │ │ │ +00008000: 0d73 4140 ad8a c70d 7341 4089 12ad 81c8 .sA@....sA@..... │ │ │ +00008010: 18c9 0d73 4140 1e11 ca0d 7341 4019 cb0d ...sA@....sA@... │ │ │ +00008020: 7341 40ad 8acb 0d73 4140 8911 ad81 c81e sA@....sA@...... │ │ │ +00008030: 120d 891c ab9a 0c40 cc73 ac8d cd0d 7341 .......@.s....sA │ │ │ +00008040: 40ac 86ce cf0c 405c 2288 0c41 4189 14ac @.....@\"..AA... │ │ │ +00008050: 6629 0e13 431b d00b 2188 0b40 2e06 8722 f)..C...!..@..." │ │ │ +00008060: 205b 636c 2d74 6573 742d 6e6f 7420 636c [cl-test-not cl │ │ │ +00008070: 2d69 6620 636c 2d74 6573 7420 636c 2d68 -if cl-test cl-h │ │ │ +00008080: 6f6c 6420 636c 2d6b 6579 732d 7465 6d70 old cl-keys-temp │ │ │ +00008090: 2063 6c2d 6b65 7973 203a 7465 7374 203a cl-keys :test : │ │ │ +000080a0: 7465 7374 2d6e 6f74 2074 203a 6b65 7920 test-not t :key │ │ │ +000080b0: 3a69 6620 3a69 662d 6e6f 7420 283a 7465 :if :if-not (:te │ │ │ +000080c0: 7374 203a 7465 7374 2d6e 6f74 203a 6b65 st :test-not :ke │ │ │ +000080d0: 7920 3a69 6620 3a69 662d 6e6f 7429 203a y :if :if-not) : │ │ │ +000080e0: 616c 6c6f 772d 6f74 6865 722d 6b65 7973 allow-other-keys │ │ │ +000080f0: 2065 7272 6f72 2022 4261 6420 6b65 7977 error "Bad keyw │ │ │ +00008100: 6f72 6420 6172 6775 6d65 6e74 2025 7322 ord argument %s" │ │ │ +00008110: 2063 6c2d 6e73 7562 6c69 732d 7265 6320 cl-nsublis-rec │ │ │ +00008120: 636c 2d6b 6579 2063 6c2d 6966 2d6e 6f74 cl-key cl-if-not │ │ │ +00008130: 2063 6c2d 7472 6565 5d20 3420 2823 2420 cl-tree] 4 (#$ │ │ │ +00008140: 2e20 3332 3533 3329 5d29 0a28 6465 6661 . 32533)]).(defa │ │ │ +00008150: 6c69 6173 2027 636c 2d6e 7375 626c 6973 lias 'cl-nsublis │ │ │ +00008160: 2d72 6563 2023 5b28 636c 2d74 7265 6529 -rec #[(cl-tree) │ │ │ +00008170: 2022 0c3a 85bc 005c 6eab 865c 6e0c 4021 ".:...\n..\n.@! │ │ │ +00008180: aa82 0c40 0e08 1d1b 0dab b509 ab8c 090d ...@............ │ │ │ +00008190: 4040 0b5c 223f 0e09 61aa 9e08 ab89 080b @@.\"?..a....... │ │ │ +000081a0: 213f 0e5c 6e61 aa92 0d40 40a7 ab87 0d40 !?.\na...@@....@ │ │ │ +000081b0: 400b 6baa 850d 4040 0b61 ac86 0d41 8915 @.k...@@.a...A.. │ │ │ +000081c0: ac4b 0dab 880c 0d40 41a0 88aa 8a0c 403a .K.....@A.....@: │ │ │ +000081d0: ab85 c60c 4021 885c 6eab 865c 6e0c 4121 ....@!.\n..\n.A! │ │ │ +000081e0: aa82 0c41 130e 0889 15ab b509 ab8c 090d ...A............ │ │ │ +000081f0: 4040 0b5c 223f 0e09 61aa 9e08 ab89 080b @@.\"?..a....... │ │ │ +00008200: 213f 0e5c 6e61 aa92 0d40 40a7 ab87 0d40 !?.\na...@@....@ │ │ │ +00008210: 400b 6baa 850d 4040 0b61 ac86 0d41 8915 @.k...@@.a...A.. │ │ │ +00008220: ac4b 0dab 8a0c 0d40 41a1 88c7 14aa 830c .K.....@A....... │ │ │ +00008230: 4114 2a82 0000 8722 205b 636c 2d69 6620 A.*...." [cl-if │ │ │ +00008240: 636c 2d74 6573 7420 636c 2d6b 6579 2063 cl-test cl-key c │ │ │ +00008250: 6c2d 7465 6d70 2063 6c2d 7472 6565 2063 l-temp cl-tree c │ │ │ +00008260: 6c2d 7020 636c 2d6e 7375 626c 6973 2d72 l-p cl-nsublis-r │ │ │ +00008270: 6563 206e 696c 2063 6c2d 616c 6973 7420 ec nil cl-alist │ │ │ +00008280: 636c 2d74 6573 742d 6e6f 7420 636c 2d69 cl-test-not cl-i │ │ │ +00008290: 662d 6e6f 745d 2034 5d29 0a23 4031 3534 f-not] 4]).#@154 │ │ │ +000082a0: 2052 6574 7572 6e20 7420 6966 2074 7265 Return t if tre │ │ │ +000082b0: 6573 2058 2061 6e64 2059 2068 6176 6520 es X and Y have │ │ │ +000082c0: 6065 716c 2720 6c65 6176 6573 2e0a 4174 `eql' leaves..At │ │ │ +000082d0: 6f6d 7320 6172 6520 636f 6d70 6172 6564 oms are compared │ │ │ +000082e0: 2062 7920 6065 716c 273b 2063 6f6e 7320 by `eql'; cons │ │ │ +000082f0: 6365 6c6c 7320 6172 6520 636f 6d70 6172 cells are compar │ │ │ +00008300: 6564 2072 6563 7572 7369 7665 6c79 2e0a ed recursively.. │ │ │ +00008310: 4b65 7977 6f72 6473 2073 7570 706f 7274 Keywords support │ │ │ +00008320: 6564 3a20 203a 7465 7374 203a 7465 7374 ed: :test :test │ │ │ +00008330: 2d6e 6f74 203a 6b65 791f 0a28 6465 6661 -not :key..(defa │ │ │ +00008340: 6c69 6173 2027 7472 6565 2d65 7175 616c lias 'tree-equal │ │ │ +00008350: 2023 5b28 636c 2d78 2063 6c2d 7920 2672 #[(cl-x cl-y &r │ │ │ +00008360: 6573 7420 636c 2d6b 6579 7329 2022 c60d est cl-keys) ".. │ │ │ +00008370: 7341 401b c70d 7341 40ad 8ac7 0d73 4140 sA@...sA@....sA@ │ │ │ +00008380: 8913 ad81 c81a c90d 7341 4019 0d89 1cab ........sA@..... │ │ │ +00008390: 9a0c 40ca 73ac 8dcb 0d73 4140 ac86 cccd ..@.s....sA@.... │ │ │ +000083a0: 0c40 5c22 880c 4141 8914 ac66 29ce 080e .@\"..AA...f)... │ │ │ +000083b0: 0f5c 222b 8722 205b 636c 2d78 2063 6c2d .\"+." [cl-x cl- │ │ │ +000083c0: 6b65 7920 636c 2d74 6573 742d 6e6f 7420 key cl-test-not │ │ │ +000083d0: 636c 2d74 6573 7420 636c 2d6b 6579 732d cl-test cl-keys- │ │ │ +000083e0: 7465 6d70 2063 6c2d 6b65 7973 203a 7465 temp cl-keys :te │ │ │ +000083f0: 7374 203a 7465 7374 2d6e 6f74 2074 203a st :test-not t : │ │ │ +00008400: 6b65 7920 283a 7465 7374 203a 7465 7374 key (:test :test │ │ │ +00008410: 2d6e 6f74 203a 6b65 7929 203a 616c 6c6f -not :key) :allo │ │ │ +00008420: 772d 6f74 6865 722d 6b65 7973 2065 7272 w-other-keys err │ │ │ +00008430: 6f72 2022 4261 6420 6b65 7977 6f72 6420 or "Bad keyword │ │ │ +00008440: 6172 6775 6d65 6e74 2025 7322 2063 6c2d argument %s" cl- │ │ │ +00008450: 7472 6565 2d65 7175 616c 2d72 6563 2063 tree-equal-rec c │ │ │ +00008460: 6c2d 795d 2034 2028 2324 202e 2033 3334 l-y] 4 (#$ . 334 │ │ │ +00008470: 3431 295d 290a 2864 6566 616c 6961 7320 41)]).(defalias │ │ │ +00008480: 2763 6c2d 7472 6565 2d65 7175 616c 2d72 'cl-tree-equal-r │ │ │ +00008490: 6563 2023 5b28 636c 2d78 2063 6c2d 7929 ec #[(cl-x cl-y) │ │ │ +000084a0: 2022 0b3a ab94 5c6e 3aab 90c5 0b40 5c6e ".:..\n:....@\n │ │ │ +000084b0: 405c 22ab 880b 4113 5c6e 4112 aa68 0b3a @\"...A.\nA..h.: │ │ │ +000084c0: 3fad d35c 6e3a 3fad ce09 ab98 090c ab85 ?..\n:?......... │ │ │ +000084d0: 0c0b 21aa 810b 0cab 850c 5c6e 21aa 815c ..!.......\n!..\ │ │ │ +000084e0: 6e5c 223f 0861 870c ab85 0c0b 21aa 810b n\"?.a......!... │ │ │ +000084f0: a7ab 940c ab85 0c0b 21aa 810b 0cab 850c ........!....... │ │ │ +00008500: 5c6e 21aa 815c 6e6b 870c ab85 0c0b 21aa \n!..\nk......!. │ │ │ +00008510: 810b 0cab 850c 5c6e 21aa 815c 6e61 8722 ......\n!..\na." │ │ │ +00008520: 205b 636c 2d74 6573 742d 6e6f 7420 636c [cl-test-not cl │ │ │ +00008530: 2d74 6573 7420 636c 2d79 2063 6c2d 7820 -test cl-y cl-x │ │ │ +00008540: 636c 2d6b 6579 2063 6c2d 7472 6565 2d65 cl-key cl-tree-e │ │ │ +00008550: 7175 616c 2d72 6563 5d20 345d 290a 2872 qual-rec] 4]).(r │ │ │ +00008560: 756e 2d68 6f6f 6b73 2027 636c 2d73 6571 un-hooks 'cl-seq │ │ │ +00008570: 2d6c 6f61 642d 686f 6f6b 290a -load-hook). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/cl.elc │ │ │ @@ -1,1063 +1,1063 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3434 2032 eb 25 01:53:44 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6c2e 656c 0a3b 3b3b 2065 6d61 6373 2076 l.el.;;; emacs v │ │ │ -000000a0: 6572 7369 6f6e 2032 312e 3420 2870 6174 ersion 21.4 (pat │ │ │ -000000b0: 6368 2032 3429 2022 5374 616e 6461 7264 ch 24) "Standard │ │ │ -000000c0: 2043 2220 5845 6d61 6373 204c 7563 6964 C" XEmacs Lucid │ │ │ -000000d0: 2e0a 3b3b 3b20 6279 7465 636f 6d70 2076 ..;;; bytecomp v │ │ │ -000000e0: 6572 7369 6f6e 2032 2e32 3720 5845 6d61 ersion 2.27 XEma │ │ │ -000000f0: 6373 3b20 3230 3030 2d30 392d 3132 2e0a cs; 2000-09-12.. │ │ │ -00000100: 3b3b 3b20 6f70 7469 6d69 7a61 7469 6f6e ;;; optimization │ │ │ -00000110: 2069 7320 6f6e 2e0a 3b3b 3b20 7468 6973 is on..;;; this │ │ │ -00000120: 2066 696c 6520 7573 6573 206f 7063 6f64 file uses opcod │ │ │ -00000130: 6573 2077 6869 6368 2064 6f20 6e6f 7420 es which do not │ │ │ -00000140: 6578 6973 7420 696e 2045 6d61 6373 2031 exist in Emacs 1 │ │ │ -00000150: 392e 0a0a 2869 6620 2861 6e64 2028 626f 9...(if (and (bo │ │ │ -00000160: 756e 6470 2027 656d 6163 732d 7665 7273 undp 'emacs-vers │ │ │ -00000170: 696f 6e29 0a09 2028 6f72 2028 616e 6420 ion).. (or (and │ │ │ -00000180: 2862 6f75 6e64 7020 2765 706f 6368 3a3a (boundp 'epoch:: │ │ │ -00000190: 7665 7273 696f 6e29 2065 706f 6368 3a3a version) epoch:: │ │ │ -000001a0: 7665 7273 696f 6e29 0a09 2020 2020 2028 version).. ( │ │ │ -000001b0: 7374 7269 6e67 2d6c 6573 7370 2065 6d61 string-lessp ema │ │ │ -000001c0: 6373 2d76 6572 7369 6f6e 2022 3230 2229 cs-version "20") │ │ │ -000001d0: 2929 0a20 2020 2028 6572 726f 7220 2260 )). (error "` │ │ │ -000001e0: 636c 2e65 6c27 2077 6173 2063 6f6d 7069 cl.el' was compi │ │ │ -000001f0: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ -00000200: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ -00000210: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ -00000220: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ -00000230: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ -00000240: 2929 0a0a 0a28 6279 7465 2d63 6f64 6520 ))...(byte-code │ │ │ -00000250: 22c2 0942 11c3 c221 ac9f c4c2 c5c6 21ab "..B...!......!. │ │ │ -00000260: 84c6 4aac 8508 c799 ab83 c8aa 8ac9 ca08 ..J............. │ │ │ -00000270: 5c22 ab83 cbaa 81cc 5c22 88c5 cd21 ac84 \"......\"...!.. │ │ │ -00000280: cdce 4d88 cf09 4211 c3cf 21ac 85c4 cfd0 ..M...B...!..... │ │ │ -00000290: 5c22 88d1 0942 11c3 d121 ac85 c4d1 d05c \"...B...!.....\ │ │ │ -000002a0: 2288 c287 2220 5b65 6d61 6373 2d76 6572 "..." [emacs-ver │ │ │ -000002b0: 7369 6f6e 2063 7572 7265 6e74 2d6c 6f61 sion current-loa │ │ │ -000002c0: 642d 6c69 7374 2063 6c2d 656d 6163 732d d-list cl-emacs- │ │ │ -000002d0: 7479 7065 2064 6566 6175 6c74 2d62 6f75 type default-bou │ │ │ -000002e0: 6e64 7020 7365 742d 6465 6661 756c 7420 ndp set-default │ │ │ -000002f0: 6662 6f75 6e64 7020 6570 6f63 683a 3a76 fboundp epoch::v │ │ │ -00000300: 6572 7369 6f6e 2022 3139 2220 3138 2073 ersion "19" 18 s │ │ │ -00000310: 7472 696e 672d 6d61 7463 6820 2258 456d tring-match "XEm │ │ │ -00000320: 6163 7322 206c 7563 6964 2031 3920 6465 acs" lucid 19 de │ │ │ -00000330: 6661 6c69 6173 2066 7365 7420 636c 2d6f falias fset cl-o │ │ │ -00000340: 7074 696d 697a 652d 7370 6565 6420 3120 ptimize-speed 1 │ │ │ -00000350: 636c 2d6f 7074 696d 697a 652d 7361 6665 cl-optimize-safe │ │ │ -00000360: 7479 5d20 3529 0a23 4034 3435 2054 6869 ty] 5).#@445 Thi │ │ │ -00000370: 7320 6973 2061 206c 6973 7420 6f66 2066 s is a list of f │ │ │ -00000380: 756e 6374 696f 6e73 2074 6861 7420 666f unctions that fo │ │ │ -00000390: 726d 6174 2075 7365 7220 6f62 6a65 6374 rmat user object │ │ │ -000003a0: 7320 666f 7220 7072 696e 7469 6e67 2e0a s for printing.. │ │ │ -000003b0: 4561 6368 2066 756e 6374 696f 6e20 6973 Each function is │ │ │ -000003c0: 2063 616c 6c65 6420 696e 2074 7572 6e20 called in turn │ │ │ -000003d0: 7769 7468 2074 6872 6565 2061 7267 756d with three argum │ │ │ -000003e0: 656e 7473 3a20 7468 6520 6f62 6a65 6374 ents: the object │ │ │ -000003f0: 2c20 7468 650a 7374 7265 616d 2c20 616e , the.stream, an │ │ │ -00000400: 6420 7468 6520 7072 696e 7420 6c65 7665 d the print leve │ │ │ -00000410: 6c20 2863 7572 7265 6e74 6c79 2069 676e l (currently ign │ │ │ -00000420: 6f72 6564 292e 2020 4966 2069 7420 6973 ored). If it is │ │ │ -00000430: 2061 626c 6520 746f 0a70 7269 6e74 2074 able to.print t │ │ │ -00000440: 6865 206f 626a 6563 7420 6974 2072 6574 he object it ret │ │ │ -00000450: 7572 6e73 2074 7275 653b 206f 7468 6572 urns true; other │ │ │ -00000460: 7769 7365 2069 7420 7265 7475 726e 7320 wise it returns │ │ │ -00000470: 6e69 6c20 616e 6420 7468 650a 7072 696e nil and the.prin │ │ │ -00000480: 7465 7220 7072 6f63 6565 6473 2074 6f20 ter proceeds to │ │ │ -00000490: 7468 6520 6e65 7874 2066 756e 6374 696f the next functio │ │ │ -000004a0: 6e20 6f6e 2074 6865 206c 6973 742e 0a0a n on the list... │ │ │ -000004b0: 5468 6973 2076 6172 6961 626c 6520 6973 This variable is │ │ │ -000004c0: 206e 6f74 2075 7365 6420 6174 2070 7265 not used at pre │ │ │ -000004d0: 7365 6e74 2c20 6275 7420 6974 2069 7320 sent, but it is │ │ │ -000004e0: 6465 6669 6e65 6420 696e 2068 6f70 6573 defined in hopes │ │ │ -000004f0: 2074 6861 740a 6120 6675 7475 7265 2045 that.a future E │ │ │ -00000500: 6d61 6373 2069 6e74 6572 7072 6574 6572 macs interpreter │ │ │ -00000510: 2077 696c 6c20 6265 2061 626c 6520 746f will be able to │ │ │ -00000520: 2075 7365 2069 742e 1f0a 2864 6566 7661 use it...(defva │ │ │ -00000530: 7220 6375 7374 6f6d 2d70 7269 6e74 2d66 r custom-print-f │ │ │ -00000540: 756e 6374 696f 6e73 206e 696c 2028 2324 unctions nil (#$ │ │ │ -00000550: 202e 2038 3737 2929 0a23 4031 3237 2052 . 877)).#@127 R │ │ │ -00000560: 6574 7572 6e20 7420 6966 2074 6865 2074 eturn t if the t │ │ │ -00000570: 776f 2061 7267 7320 6172 6520 7468 6520 wo args are the │ │ │ -00000580: 7361 6d65 204c 6973 7020 6f62 6a65 6374 same Lisp object │ │ │ -00000590: 2e0a 466c 6f61 7469 6e67 2d70 6f69 6e74 ..Floating-point │ │ │ -000005a0: 206e 756d 6265 7273 206f 6620 6571 7561 numbers of equa │ │ │ -000005b0: 6c20 7661 6c75 6520 6172 6520 6065 716c l value are `eql │ │ │ -000005c0: 272c 2062 7574 2074 6865 7920 6d61 7920 ', but they may │ │ │ -000005d0: 6e6f 7420 6265 2060 6571 272e 1f0a 2864 not be `eq'...(d │ │ │ -000005e0: 6566 616c 6961 7320 2765 716c 2023 5b28 efalias 'eql #[( │ │ │ -000005f0: 6120 6229 2022 c209 21ab 8409 086b 8709 a b) "..!....k.. │ │ │ -00000600: 0861 8722 205b 6220 6120 666c 6f61 7470 .a." [b a floatp │ │ │ -00000610: 5d20 3220 2823 2420 2e20 3133 3735 295d ] 2 (#$ . 1375)] │ │ │ -00000620: 290a 2340 3137 3820 2869 6e63 6620 504c ).#@178 (incf PL │ │ │ -00000630: 4143 4520 5b58 5d29 3a20 696e 6372 656d ACE [X]): increm │ │ │ -00000640: 656e 7420 504c 4143 4520 6279 2058 2028 ent PLACE by X ( │ │ │ -00000650: 3120 6279 2064 6566 6175 6c74 292e 0a50 1 by default)..P │ │ │ -00000660: 4c41 4345 206d 6179 2062 6520 6120 7379 LACE may be a sy │ │ │ -00000670: 6d62 6f6c 2c20 6f72 2061 6e79 2067 656e mbol, or any gen │ │ │ -00000680: 6572 616c 697a 6564 2076 6172 6961 626c eralized variabl │ │ │ -00000690: 6520 616c 6c6f 7765 6420 6279 2060 7365 e allowed by `se │ │ │ -000006a0: 7466 272e 0a54 6865 2072 6574 7572 6e20 tf'..The return │ │ │ -000006b0: 7661 6c75 6520 6973 2074 6865 2069 6e63 value is the inc │ │ │ -000006c0: 7265 6d65 6e74 6564 2076 616c 7565 206f remented value o │ │ │ -000006d0: 6620 504c 4143 452e 1f0a 2864 6566 616c f PLACE...(defal │ │ │ -000006e0: 6961 7320 2769 6e63 6620 2728 6d61 6372 ias 'incf '(macr │ │ │ -000006f0: 6f20 2e20 235b 2870 6c61 6365 2026 6f70 o . #[(place &op │ │ │ -00000700: 7469 6f6e 616c 2078 2920 2209 39ab 90c2 tional x) ".9... │ │ │ -00000710: 0908 ab86 c309 0845 aa83 c409 4445 87c5 .......E....DE.. │ │ │ -00000720: c309 08ae 81c6 4687 2220 5b78 2070 6c61 ......F." [x pla │ │ │ -00000730: 6365 2073 6574 7120 2b20 312b 2063 616c ce setq + 1+ cal │ │ │ -00000740: 6c66 2031 5d20 3520 2823 2420 2e20 3135 lf 1] 5 (#$ . 15 │ │ │ -00000750: 3736 295d 2929 0a23 4031 3738 2028 6465 76)])).#@178 (de │ │ │ -00000760: 6366 2050 4c41 4345 205b 585d 293a 2064 cf PLACE [X]): d │ │ │ -00000770: 6563 7265 6d65 6e74 2050 4c41 4345 2062 ecrement PLACE b │ │ │ -00000780: 7920 5820 2831 2062 7920 6465 6661 756c y X (1 by defaul │ │ │ -00000790: 7429 2e0a 504c 4143 4520 6d61 7920 6265 t)..PLACE may be │ │ │ -000007a0: 2061 2073 796d 626f 6c2c 206f 7220 616e a symbol, or an │ │ │ -000007b0: 7920 6765 6e65 7261 6c69 7a65 6420 7661 y generalized va │ │ │ -000007c0: 7269 6162 6c65 2061 6c6c 6f77 6564 2062 riable allowed b │ │ │ -000007d0: 7920 6073 6574 6627 2e0a 5468 6520 7265 y `setf'..The re │ │ │ -000007e0: 7475 726e 2076 616c 7565 2069 7320 7468 turn value is th │ │ │ -000007f0: 6520 6465 6372 656d 656e 7465 6420 7661 e decremented va │ │ │ -00000800: 6c75 6520 6f66 2050 4c41 4345 2e1f 0a28 lue of PLACE...( │ │ │ -00000810: 6465 6661 6c69 6173 2027 6465 6366 2027 defalias 'decf ' │ │ │ -00000820: 286d 6163 726f 202e 2023 5b28 706c 6163 (macro . #[(plac │ │ │ -00000830: 6520 266f 7074 696f 6e61 6c20 7829 2022 e &optional x) " │ │ │ -00000840: 0939 ab90 c209 08ab 86c3 0908 45aa 83c4 .9..........E... │ │ │ -00000850: 0944 4587 c5c3 0908 ae81 c646 8722 205b .DE........F." [ │ │ │ -00000860: 7820 706c 6163 6520 7365 7471 202d 2031 x place setq - 1 │ │ │ -00000870: 2d20 6361 6c6c 6620 315d 2035 2028 2324 - callf 1] 5 (#$ │ │ │ -00000880: 202e 2031 3838 3529 5d29 290a 2340 3238 . 1885)])).#@28 │ │ │ -00000890: 3420 2870 6f70 2050 4c41 4345 293a 2072 4 (pop PLACE): r │ │ │ -000008a0: 656d 6f76 6520 616e 6420 7265 7475 726e emove and return │ │ │ -000008b0: 2074 6865 2068 6561 6420 6f66 2074 6865 the head of the │ │ │ -000008c0: 206c 6973 7420 7374 6f72 6564 2069 6e20 list stored in │ │ │ -000008d0: 504c 4143 452e 0a41 6e61 6c6f 676f 7573 PLACE..Analogous │ │ │ -000008e0: 2074 6f20 2870 726f 6731 2028 6361 7220 to (prog1 (car │ │ │ -000008f0: 504c 4143 4529 2028 7365 7466 2050 4c41 PLACE) (setf PLA │ │ │ -00000900: 4345 2028 6364 7220 504c 4143 4529 2929 CE (cdr PLACE))) │ │ │ -00000910: 2c20 7468 6f75 6768 206d 6f72 650a 6361 , though more.ca │ │ │ -00000920: 7265 6675 6c20 6162 6f75 7420 6576 616c reful about eval │ │ │ -00000930: 7561 7469 6e67 2065 6163 6820 6172 6775 uating each argu │ │ │ -00000940: 6d65 6e74 206f 6e6c 7920 6f6e 6365 2061 ment only once a │ │ │ -00000950: 6e64 2069 6e20 7468 6520 7269 6768 7420 nd in the right │ │ │ -00000960: 6f72 6465 722e 0a50 4c41 4345 206d 6179 order..PLACE may │ │ │ -00000970: 2062 6520 6120 7379 6d62 6f6c 2c20 6f72 be a symbol, or │ │ │ -00000980: 2061 6e79 2067 656e 6572 616c 697a 6564 any generalized │ │ │ -00000990: 2076 6172 6961 626c 6520 616c 6c6f 7765 variable allowe │ │ │ -000009a0: 6420 6279 2060 7365 7466 272e 1f0a 2864 d by `setf'...(d │ │ │ -000009b0: 6566 616c 6961 7320 2770 6f70 2027 286d efalias 'pop '(m │ │ │ -000009c0: 6163 726f 202e 2023 5b28 706c 6163 6529 acro . #[(place) │ │ │ -000009d0: 2022 0839 ab8c c1c2 08c3 08c4 0844 4545 ".9.........DEE │ │ │ -000009e0: 4487 c508 2187 2220 5b70 6c61 6365 2063 D...!." [place c │ │ │ -000009f0: 6172 2070 726f 6731 2073 6574 7120 6364 ar prog1 setq cd │ │ │ -00000a00: 7220 636c 2d64 6f2d 706f 705d 2037 2028 r cl-do-pop] 7 ( │ │ │ -00000a10: 2324 202e 2032 3139 3429 5d29 290a 2340 #$ . 2194)])).#@ │ │ │ -00000a20: 3236 3520 2870 7573 6820 5820 504c 4143 265 (push X PLAC │ │ │ -00000a30: 4529 3a20 696e 7365 7274 2058 2061 7420 E): insert X at │ │ │ -00000a40: 7468 6520 6865 6164 206f 6620 7468 6520 the head of the │ │ │ -00000a50: 6c69 7374 2073 746f 7265 6420 696e 2050 list stored in P │ │ │ -00000a60: 4c41 4345 2e0a 416e 616c 6f67 6f75 7320 LACE..Analogous │ │ │ -00000a70: 746f 2028 7365 7466 2050 4c41 4345 2028 to (setf PLACE ( │ │ │ -00000a80: 636f 6e73 2058 2050 4c41 4345 2929 2c20 cons X PLACE)), │ │ │ -00000a90: 7468 6f75 6768 206d 6f72 6520 6361 7265 though more care │ │ │ -00000aa0: 6675 6c20 6162 6f75 740a 6576 616c 7561 ful about.evalua │ │ │ -00000ab0: 7469 6e67 2065 6163 6820 6172 6775 6d65 ting each argume │ │ │ -00000ac0: 6e74 206f 6e6c 7920 6f6e 6365 2061 6e64 nt only once and │ │ │ -00000ad0: 2069 6e20 7468 6520 7269 6768 7420 6f72 in the right or │ │ │ -00000ae0: 6465 722e 2020 504c 4143 4520 6d61 790a der. PLACE may. │ │ │ -00000af0: 6265 2061 2073 796d 626f 6c2c 206f 7220 be a symbol, or │ │ │ -00000b00: 616e 7920 6765 6e65 7261 6c69 7a65 6420 any generalized │ │ │ -00000b10: 7661 7269 6162 6c65 2061 6c6c 6f77 6564 variable allowed │ │ │ -00000b20: 2062 7920 6073 6574 6627 2e1f 0a28 6465 by `setf'...(de │ │ │ -00000b30: 6661 6c69 6173 2027 7075 7368 2027 286d falias 'push '(m │ │ │ -00000b40: 6163 726f 202e 2023 5b28 7820 706c 6163 acro . #[(x plac │ │ │ -00000b50: 6529 2022 0939 ab88 c209 c308 0945 4587 e) ".9.......EE. │ │ │ -00000b60: c4c3 0809 4687 2220 5b78 2070 6c61 6365 ....F." [x place │ │ │ -00000b70: 2073 6574 7120 636f 6e73 2063 616c 6c66 setq cons callf │ │ │ -00000b80: 325d 2035 2028 2324 202e 2032 3539 3629 2] 5 (#$ . 2596) │ │ │ -00000b90: 5d29 290a 2340 3232 3220 2870 7573 686e ])).#@222 (pushn │ │ │ -00000ba0: 6577 2058 2050 4c41 4345 293a 2069 6e73 ew X PLACE): ins │ │ │ -00000bb0: 6572 7420 5820 6174 2074 6865 2068 6561 ert X at the hea │ │ │ -00000bc0: 6420 6f66 2074 6865 206c 6973 7420 6966 d of the list if │ │ │ -00000bd0: 206e 6f74 2061 6c72 6561 6479 2074 6865 not already the │ │ │ -00000be0: 7265 2e0a 4c69 6b65 2028 7075 7368 2058 re..Like (push X │ │ │ -00000bf0: 2050 4c41 4345 292c 2065 7863 6570 7420 PLACE), except │ │ │ -00000c00: 7468 6174 2074 6865 206c 6973 7420 6973 that the list is │ │ │ -00000c10: 2075 6e6d 6f64 6966 6965 6420 6966 2058 unmodified if X │ │ │ -00000c20: 2069 7320 6065 716c 2720 746f 0a61 6e20 is `eql' to.an │ │ │ -00000c30: 656c 656d 656e 7420 616c 7265 6164 7920 element already │ │ │ -00000c40: 6f6e 2074 6865 206c 6973 742e 0a4b 6579 on the list..Key │ │ │ -00000c50: 776f 7264 7320 7375 7070 6f72 7465 643a words supported: │ │ │ -00000c60: 2020 3a74 6573 7420 3a74 6573 742d 6e6f :test :test-no │ │ │ -00000c70: 7420 3a6b 6579 1f0a 2864 6566 616c 6961 t :key..(defalia │ │ │ -00000c80: 7320 2770 7573 686e 6577 2027 286d 6163 s 'pushnew '(mac │ │ │ -00000c90: 726f 202e 2023 5b28 7820 706c 6163 6520 ro . #[(x place │ │ │ -00000ca0: 2672 6573 7420 6b65 7973 2920 225c 6e39 &rest keys) "\n9 │ │ │ -00000cb0: ab8b c35c 6ec4 095c 6e08 4242 4245 87c5 ...\n..\n.BBBE.. │ │ │ -00000cc0: c409 5c6e 0842 4242 4287 2220 5b6b 6579 ..\n.BBBB." [key │ │ │ -00000cd0: 7320 7820 706c 6163 6520 7365 7471 2061 s x place setq a │ │ │ -00000ce0: 646a 6f69 6e20 6361 6c6c 6632 5d20 3620 djoin callf2] 6 │ │ │ -00000cf0: 2823 2420 2e20 3239 3730 295d 2929 0a28 (#$ . 2970)])).( │ │ │ -00000d00: 6465 6661 6c69 6173 2027 636c 2d73 6574 defalias 'cl-set │ │ │ -00000d10: 2d65 6c74 2023 5b28 7365 7120 6e20 7661 -elt #[(seq n va │ │ │ -00000d20: 6c29 2022 5c6e 3cab 8609 5c6e 9b08 a087 l) "\n<...\n.... │ │ │ -00000d30: 5c6e 0908 4987 2220 5b76 616c 206e 2073 \n..I." [val n s │ │ │ -00000d40: 6571 5d20 335d 290a 2864 6566 616c 6961 eq] 3]).(defalia │ │ │ -00000d50: 7320 2763 6c2d 7365 742d 6e74 6863 6472 s 'cl-set-nthcdr │ │ │ -00000d60: 2023 5b28 6e20 6c69 7374 2078 2920 225c #[(n list x) "\ │ │ │ -00000d70: 6ec3 58ab 8209 875c 6e53 089b 09a1 8808 n.X....\nS...... │ │ │ -00000d80: 8722 205b 6c69 7374 2078 206e 2030 5d20 ." [list x n 0] │ │ │ -00000d90: 325d 290a 2864 6566 616c 6961 7320 2763 2]).(defalias 'c │ │ │ -00000da0: 6c2d 7365 742d 6275 6666 6572 2d73 7562 l-set-buffer-sub │ │ │ -00000db0: 7374 7269 6e67 2023 5b28 7374 6172 7420 string #[(start │ │ │ -00000dc0: 656e 6420 7661 6c29 2022 8a5c 6e08 7c88 end val) ".\n.|. │ │ │ -00000dd0: 5c6e 6288 0963 8809 2987 2220 5b65 6e64 \nb..c..)." [end │ │ │ -00000de0: 2076 616c 2073 7461 7274 5d20 325d 290a val start] 2]). │ │ │ -00000df0: 2864 6566 616c 6961 7320 2763 6c2d 7365 (defalias 'cl-se │ │ │ -00000e00: 742d 7375 6273 7472 696e 6720 235b 2873 t-substring #[(s │ │ │ -00000e10: 7472 2073 7461 7274 2065 6e64 2076 616c tr start end val │ │ │ -00000e20: 2920 220b ab8c 0bc4 57ab 8a0b 5c6e 475c ) ".....W...\nG\ │ │ │ -00000e30: 5c13 aa83 5c6e 4713 09c4 57ab 8509 5c6e \...\nG...W...\n │ │ │ -00000e40: 475c 5c11 09c4 56ad 845c 6ec4 094f 080b G\\...V..\n..O.. │ │ │ -00000e50: 5c6e 4757 ad84 5c6e 0bc5 4f51 8722 205b \nGW..\n..OQ." [ │ │ │ -00000e60: 7661 6c20 7374 6172 7420 7374 7220 656e val start str en │ │ │ -00000e70: 6420 3020 6e69 6c5d 2035 5d29 0a28 6465 d 0 nil] 5]).(de │ │ │ -00000e80: 6661 6c69 6173 2027 636c 2d6d 6170 2d65 falias 'cl-map-e │ │ │ -00000e90: 7874 656e 7473 2023 5b28 2672 6573 7420 xtents #[(&rest │ │ │ -00000ea0: 636c 2d61 7267 7329 2022 c1c2 21ab 85c3 cl-args) "..!... │ │ │ -00000eb0: c208 5c22 87c1 c421 ad84 c3c5 085c 2287 ..\"...!.....\". │ │ │ -00000ec0: 2220 5b63 6c2d 6172 6773 2066 626f 756e " [cl-args fboun │ │ │ -00000ed0: 6470 206d 6170 2d65 7874 656e 7473 2061 dp map-extents a │ │ │ -00000ee0: 7070 6c79 206e 6578 742d 6f76 6572 6c61 pply next-overla │ │ │ -00000ef0: 792d 6174 2063 6c2d 6d61 702d 6f76 6572 y-at cl-map-over │ │ │ -00000f00: 6c61 7973 5d20 335d 290a 2862 7974 652d lays] 3]).(byte- │ │ │ -00000f10: 636f 6465 2022 c1c2 c35c 2288 c1c4 c55c code "...\"....\ │ │ │ -00000f20: 2288 c1c6 c75c 2288 c1c8 c35c 2288 c1c9 "....\"....\"... │ │ │ -00000f30: c35c 2288 c1ca cb5c 2288 c1cc cd5c 2288 .\"....\"....\". │ │ │ -00000f40: ce08 4210 cfce 21ac 85d0 ced1 5c22 88d2 ..B...!.....\".. │ │ │ -00000f50: 0842 10cf d221 ac8b d0d2 d34b c1d4 d55c .B...!.....K...\ │ │ │ -00000f60: 2288 5c22 88d1 8722 205b 6375 7272 656e ".\"..." [curren │ │ │ -00000f70: 742d 6c6f 6164 2d6c 6973 7420 6465 6661 t-load-list defa │ │ │ -00000f80: 6c69 6173 2063 6c2d 626c 6f63 6b2d 7772 lias cl-block-wr │ │ │ -00000f90: 6170 7065 7220 6964 656e 7469 7479 2063 apper identity c │ │ │ -00000fa0: 6c2d 626c 6f63 6b2d 7468 726f 7720 7468 l-block-throw th │ │ │ -00000fb0: 726f 7720 7661 6c75 6573 206c 6973 7420 row values list │ │ │ -00000fc0: 7661 6c75 6573 2d6c 6973 7420 6d75 6c74 values-list mult │ │ │ -00000fd0: 6970 6c65 2d76 616c 7565 2d6c 6973 7420 iple-value-list │ │ │ -00000fe0: 6d75 6c74 6970 6c65 2d76 616c 7565 2d63 multiple-value-c │ │ │ -00000ff0: 616c 6c20 6170 706c 7920 6e74 682d 7661 all apply nth-va │ │ │ -00001000: 6c75 6520 6e74 6820 636c 2d6d 6163 726f lue nth cl-macro │ │ │ -00001010: 2d65 6e76 6972 6f6e 6d65 6e74 2064 6566 -environment def │ │ │ -00001020: 6175 6c74 2d62 6f75 6e64 7020 7365 742d ault-boundp set- │ │ │ -00001030: 6465 6661 756c 7420 6e69 6c20 636c 2d6f default nil cl-o │ │ │ -00001040: 6c64 2d6d 6163 726f 6578 7061 6e64 206d ld-macroexpand m │ │ │ -00001050: 6163 726f 6578 7061 6e64 2d69 6e74 6572 acroexpand-inter │ │ │ -00001060: 6e61 6c20 6d61 6372 6f65 7870 616e 6420 nal macroexpand │ │ │ -00001070: 636c 2d6d 6163 726f 6578 7061 6e64 5d20 cl-macroexpand] │ │ │ -00001080: 3629 0a23 4033 3836 2052 6574 7572 6e20 6).#@386 Return │ │ │ -00001090: 7265 7375 6c74 206f 6620 6578 7061 6e64 result of expand │ │ │ -000010a0: 696e 6720 6d61 6372 6f73 2061 7420 746f ing macros at to │ │ │ -000010b0: 7020 6c65 7665 6c20 6f66 2046 4f52 4d2e p level of FORM. │ │ │ -000010c0: 0a49 6620 464f 524d 2069 7320 6e6f 7420 .If FORM is not │ │ │ -000010d0: 6120 6d61 6372 6f20 6361 6c6c 2c20 6974 a macro call, it │ │ │ -000010e0: 2069 7320 7265 7475 726e 6564 2075 6e63 is returned unc │ │ │ -000010f0: 6861 6e67 6564 2e0a 4f74 6865 7277 6973 hanged..Otherwis │ │ │ -00001100: 652c 2074 6865 206d 6163 726f 2069 7320 e, the macro is │ │ │ -00001110: 6578 7061 6e64 6564 2061 6e64 2074 6865 expanded and the │ │ │ -00001120: 2065 7870 616e 7369 6f6e 2069 7320 636f expansion is co │ │ │ -00001130: 6e73 6964 6572 6564 0a69 6e20 706c 6163 nsidered.in plac │ │ │ -00001140: 6520 6f66 2046 4f52 4d2e 2020 5768 656e e of FORM. When │ │ │ -00001150: 2061 206e 6f6e 2d6d 6163 726f 2d63 616c a non-macro-cal │ │ │ -00001160: 6c20 7265 7375 6c74 732c 2069 7420 6973 l results, it is │ │ │ -00001170: 2072 6574 7572 6e65 642e 0a0a 5468 6520 returned...The │ │ │ -00001180: 7365 636f 6e64 206f 7074 696f 6e61 6c20 second optional │ │ │ -00001190: 6172 6720 454e 5649 524f 4e4d 454e 5420 arg ENVIRONMENT │ │ │ -000011a0: 7370 6563 6966 6965 7320 616e 2065 6e76 specifies an env │ │ │ -000011b0: 6972 6f6e 6d65 6e74 206f 6620 6d61 6372 ironment of macr │ │ │ -000011c0: 6f0a 6465 6669 6e69 7469 6f6e 7320 746f o.definitions to │ │ │ -000011d0: 2073 6861 646f 7720 7468 6520 6c6f 6164 shadow the load │ │ │ -000011e0: 6564 206f 6e65 7320 666f 7220 7573 6520 ed ones for use │ │ │ -000011f0: 696e 2066 696c 6520 6279 7465 2d63 6f6d in file byte-com │ │ │ -00001200: 7069 6c61 7469 6f6e 2e1f 0a28 6465 6661 pilation...(defa │ │ │ -00001210: 6c69 6173 2027 636c 2d6d 6163 726f 6578 lias 'cl-macroex │ │ │ -00001220: 7061 6e64 2023 5b28 636c 2d6d 6163 726f pand #[(cl-macro │ │ │ -00001230: 2026 6f70 7469 6f6e 616c 2063 6c2d 656e &optional cl-en │ │ │ -00001240: 7629 2022 5c6e 1908 0b5c 6e5c 2289 1339 v) "\n...\n\"..9 │ │ │ -00001250: ab92 c40b 215c 6eb7 41ab 8ac4 0b21 5c6e ....!\n.A....!\n │ │ │ -00001260: b741 4013 aa65 0b29 8722 205b 636c 2d6f .A@..e.)." [cl-o │ │ │ -00001270: 6c64 2d6d 6163 726f 6578 7061 6e64 2063 ld-macroexpand c │ │ │ -00001280: 6c2d 6d61 6372 6f2d 656e 7669 726f 6e6d l-macro-environm │ │ │ -00001290: 656e 7420 636c 2d65 6e76 2063 6c2d 6d61 ent cl-env cl-ma │ │ │ -000012a0: 6372 6f20 7379 6d62 6f6c 2d6e 616d 655d cro symbol-name] │ │ │ -000012b0: 2034 2028 2324 202e 2034 3233 3329 5d29 4 (#$ . 4233)]) │ │ │ -000012c0: 0a28 6279 7465 2d63 6f64 6520 22c1 0842 .(byte-code "..B │ │ │ -000012d0: 10c2 c121 ac85 c3c1 c45c 2288 c487 2220 ...!.....\"..." │ │ │ -000012e0: 5b63 7572 7265 6e74 2d6c 6f61 642d 6c69 [current-load-li │ │ │ -000012f0: 7374 2063 6c2d 636f 6d70 696c 696e 672d st cl-compiling- │ │ │ -00001300: 6669 6c65 2064 6566 6175 6c74 2d62 6f75 file default-bou │ │ │ -00001310: 6e64 7020 7365 742d 6465 6661 756c 7420 ndp set-default │ │ │ -00001320: 6e69 6c5d 2033 290a 2864 6566 616c 6961 nil] 3).(defalia │ │ │ -00001330: 7320 2763 6c2d 636f 6d70 696c 696e 672d s 'cl-compiling- │ │ │ -00001340: 6669 6c65 2023 5b6e 696c 2022 08ae 91c1 file #[nil ".... │ │ │ -00001350: c221 ad8c c3c2 4a21 ad86 c4c2 4a21 c56b .!....J!....J!.k │ │ │ -00001360: 8722 205b 636c 2d63 6f6d 7069 6c69 6e67 ." [cl-compiling │ │ │ -00001370: 2d66 696c 6520 626f 756e 6470 2062 7974 -file boundp byt │ │ │ -00001380: 652d 636f 6d70 696c 652d 6f75 7462 7566 e-compile-outbuf │ │ │ -00001390: 6665 7220 6275 6666 6572 7020 6275 6666 fer bufferp buff │ │ │ -000013a0: 6572 2d6e 616d 6520 2220 2a43 6f6d 7069 er-name " *Compi │ │ │ -000013b0: 6c65 7220 4f75 7470 7574 2a22 5d20 325d ler Output*"] 2] │ │ │ -000013c0: 290a 2862 7974 652d 636f 6465 2022 c108 ).(byte-code ".. │ │ │ -000013d0: 4210 c2c1 21ac 85c3 c1c4 5c22 88c4 8722 B...!.....\"..." │ │ │ -000013e0: 205b 6375 7272 656e 742d 6c6f 6164 2d6c [current-load-l │ │ │ -000013f0: 6973 7420 636c 2d70 726f 636c 6169 6d73 ist cl-proclaims │ │ │ -00001400: 2d64 6566 6572 7265 6420 6465 6661 756c -deferred defaul │ │ │ -00001410: 742d 626f 756e 6470 2073 6574 2d64 6566 t-boundp set-def │ │ │ -00001420: 6175 6c74 206e 696c 5d20 3329 0a28 6465 ault nil] 3).(de │ │ │ -00001430: 6661 6c69 6173 2027 7072 6f63 6c61 696d falias 'proclaim │ │ │ -00001440: 2023 5b28 7370 6563 2920 22c2 c321 ab87 #[(spec) "..!.. │ │ │ -00001450: c309 c45c 2288 aa84 0908 4210 c587 2220 ...\".....B..." │ │ │ -00001460: 5b63 6c2d 7072 6f63 6c61 696d 732d 6465 [cl-proclaims-de │ │ │ -00001470: 6665 7272 6564 2073 7065 6320 6662 6f75 ferred spec fbou │ │ │ -00001480: 6e64 7020 636c 2d64 6f2d 7072 6f63 6c61 ndp cl-do-procla │ │ │ -00001490: 696d 2074 206e 696c 5d20 335d 290a 2864 im t nil] 3]).(d │ │ │ -000014a0: 6566 616c 6961 7320 2764 6563 6c61 696d efalias 'declaim │ │ │ -000014b0: 2027 286d 6163 726f 202e 2023 5b28 2672 '(macro . #[(&r │ │ │ -000014c0: 6573 7420 7370 6563 7329 2022 c2c3 085c est specs) "...\ │ │ │ -000014d0: 2219 c420 ab87 c5c6 0942 42aa 83c7 0942 ".. .....BB....B │ │ │ -000014e0: 2987 2220 5b73 7065 6373 2062 6f64 7920 )." [specs body │ │ │ -000014f0: 6d61 7063 6172 2023 5b28 7829 2022 c1c2 mapcar #[(x) ".. │ │ │ -00001500: 0844 4487 2220 5b78 2070 726f 636c 6169 .DD." [x proclai │ │ │ -00001510: 6d20 7175 6f74 655d 2033 5d20 636c 2d63 m quote] 3] cl-c │ │ │ -00001520: 6f6d 7069 6c69 6e67 2d66 696c 6520 6576 ompiling-file ev │ │ │ -00001530: 616c 2d77 6865 6e20 2863 6f6d 7069 6c65 al-when (compile │ │ │ -00001540: 206c 6f61 6420 6576 616c 2920 7072 6f67 load eval) prog │ │ │ -00001550: 6e5d 2033 5d29 290a 2864 6566 616c 6961 n] 3])).(defalia │ │ │ -00001560: 7320 2763 6c2d 7261 6e64 6f6d 2d74 696d s 'cl-random-tim │ │ │ -00001570: 6520 235b 6e69 6c20 22c3 c420 2189 1847 e #[nil ".. !..G │ │ │ -00001580: 1ac5 195c 6e53 8912 c559 ab8a 09c6 5f08 ...\nS...Y...._. │ │ │ -00001590: 5c6e 485c 5c11 aa6e 092b 8722 205b 7469 \nH\\..n.+." [ti │ │ │ -000015a0: 6d65 2076 2069 2063 6f70 792d 7365 7175 me v i copy-sequ │ │ │ -000015b0: 656e 6365 2063 7572 7265 6e74 2d74 696d ence current-tim │ │ │ -000015c0: 652d 7374 7269 6e67 2030 2033 5d20 345d e-string 0 3] 4] │ │ │ -000015d0: 290a 2862 7974 652d 636f 6465 2022 c108 ).(byte-code ".. │ │ │ -000015e0: 4210 c2c1 21ac 8bc3 c1c4 c520 c65c 22c7 B...!...... .\". │ │ │ -000015f0: 5f5c 2288 c187 2220 5b63 7572 7265 6e74 _\"..." [current │ │ │ -00001600: 2d6c 6f61 642d 6c69 7374 202a 6765 6e73 -load-list *gens │ │ │ -00001610: 796d 2d63 6f75 6e74 6572 2a20 6465 6661 ym-counter* defa │ │ │ -00001620: 756c 742d 626f 756e 6470 2073 6574 2d64 ult-boundp set-d │ │ │ -00001630: 6566 6175 6c74 206c 6f67 616e 6420 636c efault logand cl │ │ │ -00001640: 2d72 616e 646f 6d2d 7469 6d65 2031 3032 -random-time 102 │ │ │ -00001650: 3320 3130 305d 2035 290a 2340 3331 3120 3 100] 5).#@311 │ │ │ -00001660: 4765 6e65 7261 7465 2061 206e 6577 2075 Generate a new u │ │ │ -00001670: 6e69 6e74 6572 6e65 6420 7379 6d62 6f6c ninterned symbol │ │ │ -00001680: 2e0a 5468 6520 6e61 6d65 2069 7320 6d61 ..The name is ma │ │ │ -00001690: 6465 2062 7920 6170 7065 6e64 696e 6720 de by appending │ │ │ -000016a0: 6120 6e75 6d62 6572 2074 6f20 6120 7072 a number to a pr │ │ │ -000016b0: 6566 6978 2e20 2049 6620 4152 4720 6973 efix. If ARG is │ │ │ -000016c0: 2061 2073 7472 696e 672c 2069 740a 6973 a string, it.is │ │ │ -000016d0: 2074 6865 2070 7265 6669 782c 206f 7468 the prefix, oth │ │ │ -000016e0: 6572 7769 7365 2074 6865 2070 7265 6669 erwise the prefi │ │ │ -000016f0: 7820 6465 6661 756c 7473 2074 6f20 2247 x defaults to "G │ │ │ -00001700: 222e 2020 4966 2041 5247 2069 7320 616e ". If ARG is an │ │ │ -00001710: 2069 6e74 6567 6572 2c0a 7468 6520 696e integer,.the in │ │ │ -00001720: 7465 726e 616c 2063 6f75 6e74 6572 2069 ternal counter i │ │ │ -00001730: 7320 7265 7365 7420 746f 2074 6861 7420 s reset to that │ │ │ -00001740: 6e75 6d62 6572 2062 6566 6f72 6520 6372 number before cr │ │ │ -00001750: 6561 7469 6e67 2074 6865 206e 616d 652e eating the name. │ │ │ -00001760: 0a54 6865 7265 2069 7320 6e6f 2077 6179 .There is no way │ │ │ -00001770: 2074 6f20 7370 6563 6966 7920 626f 7468 to specify both │ │ │ -00001780: 2075 7369 6e67 2074 6869 7320 6675 6e63 using this func │ │ │ -00001790: 7469 6f6e 2e1f 0a28 6465 6661 6c69 6173 tion...(defalias │ │ │ -000017a0: 2027 6765 6e73 796d 2023 5b28 266f 7074 'gensym #[(&opt │ │ │ -000017b0: 696f 6e61 6c20 6172 6729 2022 0b3b ab83 ional arg) ".;.. │ │ │ -000017c0: 0baa 81c4 0ba8 ab83 0baa 845c 6e89 5412 ...........\n.T. │ │ │ -000017d0: 1918 c5c6 c708 0923 212a 8722 205b 7072 .......#!*." [pr │ │ │ -000017e0: 6566 6978 206e 756d 202a 6765 6e73 796d efix num *gensym │ │ │ -000017f0: 2d63 6f75 6e74 6572 2a20 6172 6720 2247 -counter* arg "G │ │ │ -00001800: 2220 6d61 6b65 2d73 796d 626f 6c20 666f " make-symbol fo │ │ │ -00001810: 726d 6174 2022 2573 2564 225d 2035 2028 rmat "%s%d"] 5 ( │ │ │ -00001820: 2324 202e 2035 3732 3829 5d29 0a23 4031 #$ . 5728)]).#@1 │ │ │ -00001830: 3531 2047 656e 6572 6174 6520 6120 6e65 51 Generate a ne │ │ │ -00001840: 7720 696e 7465 726e 6564 2073 796d 626f w interned symbo │ │ │ -00001850: 6c20 7769 7468 2061 2075 6e69 7175 6520 l with a unique │ │ │ -00001860: 6e61 6d65 2e0a 5468 6520 6e61 6d65 2069 name..The name i │ │ │ -00001870: 7320 6d61 6465 2062 7920 6170 7065 6e64 s made by append │ │ │ -00001880: 696e 6720 6120 6e75 6d62 6572 2074 6f20 ing a number to │ │ │ -00001890: 4152 472c 2064 6566 6175 6c74 2022 4722 ARG, default "G" │ │ │ -000018a0: 2e0a 4966 2041 5247 2069 7320 6e6f 7420 ..If ARG is not │ │ │ -000018b0: 6120 7374 7269 6e67 2c20 6974 2069 7320 a string, it is │ │ │ -000018c0: 6967 6e6f 7265 642e 1f0a 2864 6566 616c ignored...(defal │ │ │ -000018d0: 6961 7320 2767 656e 7465 6d70 2023 5b28 ias 'gentemp #[( │ │ │ -000018e0: 266f 7074 696f 6e61 6c20 6172 6729 2022 &optional arg) " │ │ │ -000018f0: 093b ab83 09aa 81c4 c51b 18c6 c7c8 085c .;.............\ │ │ │ -00001900: 6e23 8913 21ab 855c 6e54 12aa 70c9 0b21 n#..!..\nT..p..! │ │ │ -00001910: 2a87 2220 5b70 7265 6669 7820 6172 6720 *." [prefix arg │ │ │ -00001920: 2a67 656e 7379 6d2d 636f 756e 7465 722a *gensym-counter* │ │ │ -00001930: 206e 616d 6520 2247 2220 6e69 6c20 696e name "G" nil in │ │ │ -00001940: 7465 726e 2d73 6f66 7420 666f 726d 6174 tern-soft format │ │ │ -00001950: 2022 2573 2564 2220 696e 7465 726e 5d20 "%s%d" intern] │ │ │ -00001960: 3520 2823 2420 2e20 3631 3935 295d 290a 5 (#$ . 6195)]). │ │ │ -00001970: 2340 3438 2052 6574 7572 6e20 7420 6966 #@48 Return t if │ │ │ -00001980: 204f 424a 4543 5420 6973 2061 2066 6c6f OBJECT is a flo │ │ │ -00001990: 6174 696e 6720 706f 696e 7420 6e75 6d62 ating point numb │ │ │ -000019a0: 6572 2e1f 0a28 6465 6661 6c69 6173 2027 er...(defalias ' │ │ │ -000019b0: 666c 6f61 7470 2d73 6166 6520 235b 286f floatp-safe #[(o │ │ │ -000019c0: 626a 6563 7429 2022 c108 2187 2220 5b6f bject) "..!." [o │ │ │ -000019d0: 626a 6563 7420 666c 6f61 7470 5d20 3220 bject floatp] 2 │ │ │ -000019e0: 2823 2420 2e20 3635 3137 295d 290a 2340 (#$ . 6517)]).#@ │ │ │ -000019f0: 3333 2052 6574 7572 6e20 7420 6966 204e 33 Return t if N │ │ │ -00001a00: 554d 4245 5220 6973 2070 6f73 6974 6976 UMBER is positiv │ │ │ -00001a10: 652e 1f0a 2864 6566 616c 6961 7320 2770 e...(defalias 'p │ │ │ -00001a20: 6c75 7370 2023 5b28 6e75 6d62 6572 2920 lusp #[(number) │ │ │ -00001a30: 2208 c156 8722 205b 6e75 6d62 6572 2030 "..V." [number 0 │ │ │ -00001a40: 5d20 3220 2823 2420 2e20 3636 3433 295d ] 2 (#$ . 6643)] │ │ │ -00001a50: 290a 2340 3333 2052 6574 7572 6e20 7420 ).#@33 Return t │ │ │ -00001a60: 6966 204e 554d 4245 5220 6973 206e 6567 if NUMBER is neg │ │ │ -00001a70: 6174 6976 652e 1f0a 2864 6566 616c 6961 ative...(defalia │ │ │ -00001a80: 7320 276d 696e 7573 7020 235b 286e 756d s 'minusp #[(num │ │ │ -00001a90: 6265 7229 2022 08c1 5787 2220 5b6e 756d ber) "..W." [num │ │ │ -00001aa0: 6265 7220 305d 2032 2028 2324 202e 2036 ber 0] 2 (#$ . 6 │ │ │ -00001ab0: 3734 3329 5d29 0a23 4032 3920 5265 7475 743)]).#@29 Retu │ │ │ -00001ac0: 726e 2074 2069 6620 494e 5445 4745 5220 rn t if INTEGER │ │ │ -00001ad0: 6973 206f 6464 2e1f 0a28 6465 6661 6c69 is odd...(defali │ │ │ -00001ae0: 6173 2027 6f64 6470 2023 5b28 696e 7465 as 'oddp #[(inte │ │ │ -00001af0: 6765 7229 2022 c108 c25c 22c2 6187 2220 ger) "...\".a." │ │ │ -00001b00: 5b69 6e74 6567 6572 206c 6f67 616e 6420 [integer logand │ │ │ -00001b10: 315d 2033 2028 2324 202e 2036 3834 3429 1] 3 (#$ . 6844) │ │ │ -00001b20: 5d29 0a23 4033 3020 5265 7475 726e 2074 ]).#@30 Return t │ │ │ -00001b30: 2069 6620 494e 5445 4745 5220 6973 2065 if INTEGER is e │ │ │ -00001b40: 7665 6e2e 1f0a 2864 6566 616c 6961 7320 ven...(defalias │ │ │ -00001b50: 2765 7665 6e70 2023 5b28 696e 7465 6765 'evenp #[(intege │ │ │ -00001b60: 7229 2022 c108 c25c 22c3 6187 2220 5b69 r) "...\".a." [i │ │ │ -00001b70: 6e74 6567 6572 206c 6f67 616e 6420 3120 nteger logand 1 │ │ │ -00001b80: 305d 2033 2028 2324 202e 2036 3935 3229 0] 3 (#$ . 6952) │ │ │ -00001b90: 5d29 0a23 4033 3820 5265 7475 726e 2074 ]).#@38 Return t │ │ │ -00001ba0: 6865 2061 6273 6f6c 7574 6520 7661 6c75 he absolute valu │ │ │ -00001bb0: 6520 6f66 204e 554d 4245 522e 1f0a 2864 e of NUMBER...(d │ │ │ -00001bc0: 6566 616c 6961 7320 2763 6c2d 6162 7320 efalias 'cl-abs │ │ │ -00001bd0: 235b 286e 756d 6265 7229 2022 08c1 59ab #[(number) "..Y. │ │ │ -00001be0: 8208 8708 5b87 2220 5b6e 756d 6265 7220 ....[." [number │ │ │ -00001bf0: 305d 2032 2028 2324 202e 2037 3036 3429 0] 2 (#$ . 7064) │ │ │ -00001c00: 5d29 0a28 6279 7465 2d63 6f64 6520 22c1 ]).(byte-code ". │ │ │ -00001c10: c221 ac85 c3c2 c45c 2288 c508 4210 c6c5 .!.....\"...B... │ │ │ -00001c20: 21ac 8bc7 c5c8 c9ca cbcc 2024 5c22 88c1 !......... $\".. │ │ │ -00001c30: 8722 205b 6375 7272 656e 742d 6c6f 6164 ." [current-load │ │ │ -00001c40: 2d6c 6973 7420 6662 6f75 6e64 7020 6162 -list fboundp ab │ │ │ -00001c50: 7320 6465 6661 6c69 6173 2063 6c2d 6162 s defalias cl-ab │ │ │ -00001c60: 7320 2a72 616e 646f 6d2d 7374 6174 652a s *random-state* │ │ │ -00001c70: 2064 6566 6175 6c74 2d62 6f75 6e64 7020 default-boundp │ │ │ -00001c80: 7365 742d 6465 6661 756c 7420 7665 6374 set-default vect │ │ │ -00001c90: 6f72 2063 6c2d 7261 6e64 6f6d 2d73 7461 or cl-random-sta │ │ │ -00001ca0: 7465 2d74 6167 202d 3120 3330 2063 6c2d te-tag -1 30 cl- │ │ │ -00001cb0: 7261 6e64 6f6d 2d74 696d 655d 2037 290a random-time] 7). │ │ │ -00001cc0: 2340 3532 2054 6865 2069 6e74 6567 6572 #@52 The integer │ │ │ -00001cd0: 2063 6c6f 7365 7374 2069 6e20 7661 6c75 closest in valu │ │ │ -00001ce0: 6520 746f 2070 6f73 6974 6976 6520 696e e to positive in │ │ │ -00001cf0: 6669 6e69 7479 2e1f 0a28 6465 6663 6f6e finity...(defcon │ │ │ -00001d00: 7374 206d 6f73 742d 706f 7369 7469 7665 st most-positive │ │ │ -00001d10: 2d66 6978 6e75 6d20 2865 7661 6c20 2728 -fixnum (eval '( │ │ │ -00001d20: 6c73 6820 2d31 202d 3129 2920 2823 2420 lsh -1 -1)) (#$ │ │ │ -00001d30: 2e20 3733 3635 2929 0a23 4035 3220 5468 . 7365)).#@52 Th │ │ │ -00001d40: 6520 696e 7465 6765 7220 636c 6f73 6573 e integer closes │ │ │ -00001d50: 7420 696e 2076 616c 7565 2074 6f20 6e65 t in value to ne │ │ │ -00001d60: 6761 7469 7665 2069 6e66 696e 6974 792e gative infinity. │ │ │ -00001d70: 1f0a 2864 6566 636f 6e73 7420 6d6f 7374 ..(defconst most │ │ │ -00001d80: 2d6e 6567 6174 6976 652d 6669 786e 756d -negative-fixnum │ │ │ -00001d90: 2028 6576 616c 2027 282d 202d 3120 286c (eval '(- -1 (l │ │ │ -00001da0: 7368 202d 3120 2d31 2929 2920 2823 2420 sh -1 -1))) (#$ │ │ │ -00001db0: 2e20 3734 3836 2929 0a23 4035 3020 5468 . 7486)).#@50 Th │ │ │ -00001dc0: 6520 666c 6f61 7420 636c 6f73 6573 7420 e float closest │ │ │ -00001dd0: 696e 2076 616c 7565 2074 6f20 706f 7369 in value to posi │ │ │ -00001de0: 7469 7665 2069 6e66 696e 6974 792e 1f0a tive infinity... │ │ │ -00001df0: 2864 6566 636f 6e73 7420 6d6f 7374 2d70 (defconst most-p │ │ │ -00001e00: 6f73 6974 6976 652d 666c 6f61 7420 6e69 ositive-float ni │ │ │ -00001e10: 6c20 2823 2420 2e20 3736 3134 2929 0a23 l (#$ . 7614)).# │ │ │ -00001e20: 4035 3020 5468 6520 666c 6f61 7420 636c @50 The float cl │ │ │ -00001e30: 6f73 6573 7420 696e 2076 616c 7565 2074 osest in value t │ │ │ -00001e40: 6f20 6e65 6761 7469 7665 2069 6e66 696e o negative infin │ │ │ -00001e50: 6974 792e 1f0a 2864 6566 636f 6e73 7420 ity...(defconst │ │ │ -00001e60: 6d6f 7374 2d6e 6567 6174 6976 652d 666c most-negative-fl │ │ │ -00001e70: 6f61 7420 6e69 6c20 2823 2420 2e20 3737 oat nil (#$ . 77 │ │ │ -00001e80: 3136 2929 0a23 4034 3320 5468 6520 706f 16)).#@43 The po │ │ │ -00001e90: 7369 7469 7665 2066 6c6f 6174 2063 6c6f sitive float clo │ │ │ -00001ea0: 7365 7374 2069 6e20 7661 6c75 6520 746f sest in value to │ │ │ -00001eb0: 2030 2e1f 0a28 6465 6663 6f6e 7374 206c 0...(defconst l │ │ │ -00001ec0: 6561 7374 2d70 6f73 6974 6976 652d 666c east-positive-fl │ │ │ -00001ed0: 6f61 7420 6e69 6c20 2823 2420 2e20 3738 oat nil (#$ . 78 │ │ │ -00001ee0: 3138 2929 0a23 4034 3320 5468 6520 6e65 18)).#@43 The ne │ │ │ -00001ef0: 6761 7469 7665 2066 6c6f 6174 2063 6c6f gative float clo │ │ │ -00001f00: 7365 7374 2069 6e20 7661 6c75 6520 746f sest in value to │ │ │ -00001f10: 2030 2e1f 0a28 6465 6663 6f6e 7374 206c 0...(defconst l │ │ │ -00001f20: 6561 7374 2d6e 6567 6174 6976 652d 666c east-negative-fl │ │ │ -00001f30: 6f61 7420 6e69 6c20 2823 2420 2e20 3739 oat nil (#$ . 79 │ │ │ -00001f40: 3134 2929 0a28 6279 7465 2d63 6f64 6520 14)).(byte-code │ │ │ -00001f50: 22c3 0c42 14c5 13c2 0c42 14c5 12c1 0c42 "..B.....B.....B │ │ │ -00001f60: 14c5 11c0 0c42 14c5 10c6 c7c8 5c22 8722 .....B......\"." │ │ │ -00001f70: 205b 666c 6f61 742d 6e65 6761 7469 7665 [float-negative │ │ │ -00001f80: 2d65 7073 696c 6f6e 2066 6c6f 6174 2d65 -epsilon float-e │ │ │ -00001f90: 7073 696c 6f6e 206c 6561 7374 2d6e 6567 psilon least-neg │ │ │ -00001fa0: 6174 6976 652d 6e6f 726d 616c 697a 6564 ative-normalized │ │ │ -00001fb0: 2d66 6c6f 6174 206c 6561 7374 2d70 6f73 -float least-pos │ │ │ -00001fc0: 6974 6976 652d 6e6f 726d 616c 697a 6564 itive-normalized │ │ │ -00001fd0: 2d66 6c6f 6174 2063 7572 7265 6e74 2d6c -float current-l │ │ │ -00001fe0: 6f61 642d 6c69 7374 206e 696c 2064 6566 oad-list nil def │ │ │ -00001ff0: 616c 6961 7320 636f 7079 2d73 6571 2063 alias copy-seq c │ │ │ -00002000: 6f70 792d 7365 7175 656e 6365 5d20 3329 opy-sequence] 3) │ │ │ -00002010: 0a23 4033 3432 2041 7070 6c79 2046 554e .#@342 Apply FUN │ │ │ -00002020: 4354 494f 4e20 746f 2065 6163 6820 656c CTION to each el │ │ │ -00002030: 656d 656e 7420 6f66 2053 4551 2c20 616e ement of SEQ, an │ │ │ -00002040: 6420 6d61 6b65 2061 206c 6973 7420 6f66 d make a list of │ │ │ -00002050: 2074 6865 2072 6573 756c 7473 2e0a 4966 the results..If │ │ │ -00002060: 2074 6865 7265 2061 7265 2073 6576 6572 there are sever │ │ │ -00002070: 616c 2053 4551 732c 2046 554e 4354 494f al SEQs, FUNCTIO │ │ │ -00002080: 4e20 6973 2063 616c 6c65 6420 7769 7468 N is called with │ │ │ -00002090: 2074 6861 7420 6d61 6e79 2061 7267 756d that many argum │ │ │ -000020a0: 656e 7473 2c0a 616e 6420 6d61 7070 696e ents,.and mappin │ │ │ -000020b0: 6720 7374 6f70 7320 6173 2073 6f6f 6e20 g stops as soon │ │ │ -000020c0: 6173 2074 6865 2073 686f 7274 6573 7420 as the shortest │ │ │ -000020d0: 6c69 7374 2072 756e 7320 6f75 742e 2020 list runs out. │ │ │ -000020e0: 5769 7468 206a 7573 7420 6f6e 650a 5345 With just one.SE │ │ │ -000020f0: 512c 2074 6869 7320 6973 206c 696b 6520 Q, this is like │ │ │ -00002100: 606d 6170 6361 7227 2e20 2057 6974 6820 `mapcar'. With │ │ │ -00002110: 7365 7665 7261 6c2c 2069 7420 6973 206c several, it is l │ │ │ -00002120: 696b 6520 7468 6520 436f 6d6d 6f6e 204c ike the Common L │ │ │ -00002130: 6973 700a 606d 6170 6361 7227 2066 756e isp.`mapcar' fun │ │ │ -00002140: 6374 696f 6e20 6578 7465 6e64 6564 2074 ction extended t │ │ │ -00002150: 6f20 6172 6269 7472 6172 7920 7365 7175 o arbitrary sequ │ │ │ -00002160: 656e 6365 2074 7970 6573 2e1f 0a28 6465 ence types...(de │ │ │ -00002170: 6661 6c69 6173 2027 6d61 7063 6172 2a20 falias 'mapcar* │ │ │ -00002180: 235b 2863 6c2d 6675 6e63 2063 6c2d 7820 #[(cl-func cl-x │ │ │ -00002190: 2672 6573 7420 636c 2d72 6573 7429 2022 &rest cl-rest) " │ │ │ -000021a0: 0bab b40b 41ac 890c 3cab 850b 403c ac87 ....A...<...@<.. │ │ │ -000021b0: c508 0c0b 425c 2287 c60b 401a 190c ab94 ....B\"...@..... │ │ │ -000021c0: 5c6e ab91 080c 8941 1440 5c6e 8941 1240 \n.....A.@\n.A.@ │ │ │ -000021d0: 5c22 0942 11aa 6909 9f2a 87c7 080c 5c22 \".B..i..*....\" │ │ │ -000021e0: 8722 205b 636c 2d66 756e 6320 636c 2d72 ." [cl-func cl-r │ │ │ -000021f0: 6573 2063 6c2d 7920 636c 2d72 6573 7420 es cl-y cl-rest │ │ │ -00002200: 636c 2d78 2063 6c2d 6d61 7063 6172 2d6d cl-x cl-mapcar-m │ │ │ -00002210: 616e 7920 6e69 6c20 6d61 7063 6172 5d20 any nil mapcar] │ │ │ -00002220: 3420 2823 2420 2e20 3832 3135 295d 290a 4 (#$ . 8215)]). │ │ │ -00002230: 2862 7974 652d 636f 6465 2022 c0c1 c25c (byte-code "...\ │ │ │ -00002240: 2288 c0c3 c45c 2288 c0c5 c65c 2287 2220 "....\"....\"." │ │ │ -00002250: 5b64 6566 616c 6961 7320 6669 7273 7420 [defalias first │ │ │ -00002260: 6361 7220 7265 7374 2063 6472 2065 6e64 car rest cdr end │ │ │ -00002270: 7020 6e75 6c6c 5d20 3329 0a23 4034 3520 p null] 3).#@45 │ │ │ -00002280: 5265 7475 726e 2074 6865 2073 6563 6f6e Return the secon │ │ │ -00002290: 6420 656c 656d 656e 7420 6f66 2074 6865 d element of the │ │ │ -000022a0: 206c 6973 7420 4c49 5354 2e1f 0a28 6465 list LIST...(de │ │ │ -000022b0: 6661 6c69 6173 2027 7365 636f 6e64 2023 falias 'second # │ │ │ -000022c0: 5b28 7829 2022 0841 4087 2220 5b78 5d20 [(x) ".A@." [x] │ │ │ -000022d0: 3120 2823 2420 2e20 3838 3332 295d 290a 1 (#$ . 8832)]). │ │ │ -000022e0: 2340 3434 2052 6574 7572 6e20 7468 6520 #@44 Return the │ │ │ -000022f0: 7468 6972 6420 656c 656d 656e 7420 6f66 third element of │ │ │ -00002300: 2074 6865 206c 6973 7420 4c49 5354 2e1f the list LIST.. │ │ │ -00002310: 0a28 6465 6661 6c69 6173 2027 7468 6972 .(defalias 'thir │ │ │ -00002320: 6420 235b 2878 2920 2208 4141 4087 2220 d #[(x) ".AA@." │ │ │ -00002330: 5b78 5d20 3120 2823 2420 2e20 3839 3333 [x] 1 (#$ . 8933 │ │ │ -00002340: 295d 290a 2340 3435 2052 6574 7572 6e20 )]).#@45 Return │ │ │ -00002350: 7468 6520 666f 7572 7468 2065 6c65 6d65 the fourth eleme │ │ │ -00002360: 6e74 206f 6620 7468 6520 6c69 7374 204c nt of the list L │ │ │ -00002370: 4953 542e 1f0a 2864 6566 616c 6961 7320 IST...(defalias │ │ │ -00002380: 2766 6f75 7274 6820 235b 2878 2920 22c1 'fourth #[(x) ". │ │ │ -00002390: 0838 8722 205b 7820 335d 2032 2028 2324 .8." [x 3] 2 (#$ │ │ │ -000023a0: 202e 2039 3033 3329 5d29 0a23 4034 3420 . 9033)]).#@44 │ │ │ -000023b0: 5265 7475 726e 2074 6865 2066 6966 7468 Return the fifth │ │ │ -000023c0: 2065 6c65 6d65 6e74 206f 6620 7468 6520 element of the │ │ │ -000023d0: 6c69 7374 204c 4953 542e 1f0a 2864 6566 list LIST...(def │ │ │ -000023e0: 616c 6961 7320 2766 6966 7468 2023 5b28 alias 'fifth #[( │ │ │ -000023f0: 7829 2022 c108 3887 2220 5b78 2034 5d20 x) "..8." [x 4] │ │ │ -00002400: 3220 2823 2420 2e20 3931 3336 295d 290a 2 (#$ . 9136)]). │ │ │ -00002410: 2340 3434 2052 6574 7572 6e20 7468 6520 #@44 Return the │ │ │ -00002420: 7369 7874 6820 656c 656d 656e 7420 6f66 sixth element of │ │ │ -00002430: 2074 6865 206c 6973 7420 4c49 5354 2e1f the list LIST.. │ │ │ -00002440: 0a28 6465 6661 6c69 6173 2027 7369 7874 .(defalias 'sixt │ │ │ -00002450: 6820 235b 2878 2920 22c1 0838 8722 205b h #[(x) "..8." [ │ │ │ -00002460: 7820 355d 2032 2028 2324 202e 2039 3233 x 5] 2 (#$ . 923 │ │ │ -00002470: 3729 5d29 0a23 4034 3620 5265 7475 726e 7)]).#@46 Return │ │ │ -00002480: 2074 6865 2073 6576 656e 7468 2065 6c65 the seventh ele │ │ │ -00002490: 6d65 6e74 206f 6620 7468 6520 6c69 7374 ment of the list │ │ │ -000024a0: 204c 4953 542e 1f0a 2864 6566 616c 6961 LIST...(defalia │ │ │ -000024b0: 7320 2773 6576 656e 7468 2023 5b28 7829 s 'seventh #[(x) │ │ │ -000024c0: 2022 c108 3887 2220 5b78 2036 5d20 3220 "..8." [x 6] 2 │ │ │ -000024d0: 2823 2420 2e20 3933 3338 295d 290a 2340 (#$ . 9338)]).#@ │ │ │ -000024e0: 3435 2052 6574 7572 6e20 7468 6520 6569 45 Return the ei │ │ │ -000024f0: 6768 7468 2065 6c65 6d65 6e74 206f 6620 ghth element of │ │ │ -00002500: 7468 6520 6c69 7374 204c 4953 542e 1f0a the list LIST... │ │ │ -00002510: 2864 6566 616c 6961 7320 2765 6967 6874 (defalias 'eight │ │ │ -00002520: 6820 235b 2878 2920 22c1 0838 8722 205b h #[(x) "..8." [ │ │ │ -00002530: 7820 375d 2032 2028 2324 202e 2039 3434 x 7] 2 (#$ . 944 │ │ │ -00002540: 3329 5d29 0a23 4034 3420 5265 7475 726e 3)]).#@44 Return │ │ │ -00002550: 2074 6865 206e 696e 7468 2065 6c65 6d65 the ninth eleme │ │ │ -00002560: 6e74 206f 6620 7468 6520 6c69 7374 204c nt of the list L │ │ │ -00002570: 4953 542e 1f0a 2864 6566 616c 6961 7320 IST...(defalias │ │ │ -00002580: 276e 696e 7468 2023 5b28 7829 2022 c108 'ninth #[(x) ".. │ │ │ -00002590: 3887 2220 5b78 2038 5d20 3220 2823 2420 8." [x 8] 2 (#$ │ │ │ -000025a0: 2e20 3935 3436 295d 290a 2340 3434 2052 . 9546)]).#@44 R │ │ │ -000025b0: 6574 7572 6e20 7468 6520 7465 6e74 6820 eturn the tenth │ │ │ -000025c0: 656c 656d 656e 7420 6f66 2074 6865 206c element of the l │ │ │ -000025d0: 6973 7420 4c49 5354 2e1f 0a28 6465 6661 ist LIST...(defa │ │ │ -000025e0: 6c69 6173 2027 7465 6e74 6820 235b 2878 lias 'tenth #[(x │ │ │ -000025f0: 2920 22c1 0838 8722 205b 7820 395d 2032 ) "..8." [x 9] 2 │ │ │ -00002600: 2028 2324 202e 2039 3634 3729 5d29 0a23 (#$ . 9647)]).# │ │ │ -00002610: 4033 3720 5265 7475 726e 2074 6865 2060 @37 Return the ` │ │ │ -00002620: 6361 7227 206f 6620 7468 6520 6063 6172 car' of the `car │ │ │ -00002630: 2720 6f66 2058 2e1f 0a28 6465 6661 6c69 ' of X...(defali │ │ │ -00002640: 6173 2027 6361 6172 2023 5b28 7829 2022 as 'caar #[(x) " │ │ │ -00002650: 0840 4087 2220 5b78 5d20 3120 2823 2420 .@@." [x] 1 (#$ │ │ │ -00002660: 2e20 3937 3438 295d 290a 2340 3337 2052 . 9748)]).#@37 R │ │ │ -00002670: 6574 7572 6e20 7468 6520 6063 6172 2720 eturn the `car' │ │ │ -00002680: 6f66 2074 6865 2060 6364 7227 206f 6620 of the `cdr' of │ │ │ -00002690: 582e 1f0a 2864 6566 616c 6961 7320 2763 X...(defalias 'c │ │ │ -000026a0: 6164 7220 235b 2878 2920 2208 4140 8722 adr #[(x) ".A@." │ │ │ -000026b0: 205b 785d 2031 2028 2324 202e 2039 3833 [x] 1 (#$ . 983 │ │ │ -000026c0: 3929 5d29 0a23 4033 3720 5265 7475 726e 9)]).#@37 Return │ │ │ -000026d0: 2074 6865 2060 6364 7227 206f 6620 7468 the `cdr' of th │ │ │ -000026e0: 6520 6063 6172 2720 6f66 2058 2e1f 0a28 e `car' of X...( │ │ │ -000026f0: 6465 6661 6c69 6173 2027 6364 6172 2023 defalias 'cdar # │ │ │ -00002700: 5b28 7829 2022 0840 4187 2220 5b78 5d20 [(x) ".@A." [x] │ │ │ -00002710: 3120 2823 2420 2e20 3939 3330 295d 290a 1 (#$ . 9930)]). │ │ │ -00002720: 2340 3337 2052 6574 7572 6e20 7468 6520 #@37 Return the │ │ │ -00002730: 6063 6472 2720 6f66 2074 6865 2060 6364 `cdr' of the `cd │ │ │ -00002740: 7227 206f 6620 582e 1f0a 2864 6566 616c r' of X...(defal │ │ │ -00002750: 6961 7320 2763 6464 7220 235b 2878 2920 ias 'cddr #[(x) │ │ │ -00002760: 2208 4141 8722 205b 785d 2031 2028 2324 ".AA." [x] 1 (#$ │ │ │ -00002770: 202e 2031 3030 3231 295d 290a 2340 3530 . 10021)]).#@50 │ │ │ -00002780: 2052 6574 7572 6e20 7468 6520 6063 6172 Return the `car │ │ │ -00002790: 2720 6f66 2074 6865 2060 6361 7227 206f ' of the `car' o │ │ │ -000027a0: 6620 7468 6520 6063 6172 2720 6f66 2058 f the `car' of X │ │ │ -000027b0: 2e1f 0a28 6465 6661 6c69 6173 2027 6361 ...(defalias 'ca │ │ │ -000027c0: 6161 7220 235b 2878 2920 2208 4040 4087 aar #[(x) ".@@@. │ │ │ -000027d0: 2220 5b78 5d20 3120 2823 2420 2e20 3130 " [x] 1 (#$ . 10 │ │ │ -000027e0: 3131 3329 5d29 0a23 4035 3020 5265 7475 113)]).#@50 Retu │ │ │ -000027f0: 726e 2074 6865 2060 6361 7227 206f 6620 rn the `car' of │ │ │ -00002800: 7468 6520 6063 6172 2720 6f66 2074 6865 the `car' of the │ │ │ -00002810: 2060 6364 7227 206f 6620 582e 1f0a 2864 `cdr' of X...(d │ │ │ -00002820: 6566 616c 6961 7320 2763 6161 6472 2023 efalias 'caadr # │ │ │ -00002830: 5b28 7829 2022 0841 4040 8722 205b 785d [(x) ".A@@." [x] │ │ │ -00002840: 2031 2028 2324 202e 2031 3032 3230 295d 1 (#$ . 10220)] │ │ │ -00002850: 290a 2340 3530 2052 6574 7572 6e20 7468 ).#@50 Return th │ │ │ -00002860: 6520 6063 6172 2720 6f66 2074 6865 2060 e `car' of the ` │ │ │ -00002870: 6364 7227 206f 6620 7468 6520 6063 6172 cdr' of the `car │ │ │ -00002880: 2720 6f66 2058 2e1f 0a28 6465 6661 6c69 ' of X...(defali │ │ │ -00002890: 6173 2027 6361 6461 7220 235b 2878 2920 as 'cadar #[(x) │ │ │ -000028a0: 2208 4041 4087 2220 5b78 5d20 3120 2823 ".@A@." [x] 1 (# │ │ │ -000028b0: 2420 2e20 3130 3332 3729 5d29 0a23 4035 $ . 10327)]).#@5 │ │ │ -000028c0: 3020 5265 7475 726e 2074 6865 2060 6361 0 Return the `ca │ │ │ -000028d0: 7227 206f 6620 7468 6520 6063 6472 2720 r' of the `cdr' │ │ │ -000028e0: 6f66 2074 6865 2060 6364 7227 206f 6620 of the `cdr' of │ │ │ -000028f0: 582e 1f0a 2864 6566 616c 6961 7320 2763 X...(defalias 'c │ │ │ -00002900: 6164 6472 2023 5b28 7829 2022 0841 4140 addr #[(x) ".AA@ │ │ │ -00002910: 8722 205b 785d 2031 2028 2324 202e 2031 ." [x] 1 (#$ . 1 │ │ │ -00002920: 3034 3334 295d 290a 2340 3530 2052 6574 0434)]).#@50 Ret │ │ │ -00002930: 7572 6e20 7468 6520 6063 6472 2720 6f66 urn the `cdr' of │ │ │ -00002940: 2074 6865 2060 6361 7227 206f 6620 7468 the `car' of th │ │ │ -00002950: 6520 6063 6172 2720 6f66 2058 2e1f 0a28 e `car' of X...( │ │ │ -00002960: 6465 6661 6c69 6173 2027 6364 6161 7220 defalias 'cdaar │ │ │ -00002970: 235b 2878 2920 2208 4040 4187 2220 5b78 #[(x) ".@@A." [x │ │ │ -00002980: 5d20 3120 2823 2420 2e20 3130 3534 3129 ] 1 (#$ . 10541) │ │ │ -00002990: 5d29 0a23 4035 3020 5265 7475 726e 2074 ]).#@50 Return t │ │ │ -000029a0: 6865 2060 6364 7227 206f 6620 7468 6520 he `cdr' of the │ │ │ -000029b0: 6063 6172 2720 6f66 2074 6865 2060 6364 `car' of the `cd │ │ │ -000029c0: 7227 206f 6620 582e 1f0a 2864 6566 616c r' of X...(defal │ │ │ -000029d0: 6961 7320 2763 6461 6472 2023 5b28 7829 ias 'cdadr #[(x) │ │ │ -000029e0: 2022 0841 4041 8722 205b 785d 2031 2028 ".A@A." [x] 1 ( │ │ │ -000029f0: 2324 202e 2031 3036 3438 295d 290a 2340 #$ . 10648)]).#@ │ │ │ -00002a00: 3530 2052 6574 7572 6e20 7468 6520 6063 50 Return the `c │ │ │ -00002a10: 6472 2720 6f66 2074 6865 2060 6364 7227 dr' of the `cdr' │ │ │ -00002a20: 206f 6620 7468 6520 6063 6172 2720 6f66 of the `car' of │ │ │ -00002a30: 2058 2e1f 0a28 6465 6661 6c69 6173 2027 X...(defalias ' │ │ │ -00002a40: 6364 6461 7220 235b 2878 2920 2208 4041 cddar #[(x) ".@A │ │ │ -00002a50: 4187 2220 5b78 5d20 3120 2823 2420 2e20 A." [x] 1 (#$ . │ │ │ -00002a60: 3130 3735 3529 5d29 0a23 4035 3020 5265 10755)]).#@50 Re │ │ │ -00002a70: 7475 726e 2074 6865 2060 6364 7227 206f turn the `cdr' o │ │ │ -00002a80: 6620 7468 6520 6063 6472 2720 6f66 2074 f the `cdr' of t │ │ │ -00002a90: 6865 2060 6364 7227 206f 6620 582e 1f0a he `cdr' of X... │ │ │ -00002aa0: 2864 6566 616c 6961 7320 2763 6464 6472 (defalias 'cdddr │ │ │ -00002ab0: 2023 5b28 7829 2022 0841 4141 8722 205b #[(x) ".AAA." [ │ │ │ -00002ac0: 785d 2031 2028 2324 202e 2031 3038 3632 x] 1 (#$ . 10862 │ │ │ -00002ad0: 295d 290a 2340 3633 2052 6574 7572 6e20 )]).#@63 Return │ │ │ -00002ae0: 7468 6520 6063 6172 2720 6f66 2074 6865 the `car' of the │ │ │ -00002af0: 2060 6361 7227 206f 6620 7468 6520 6063 `car' of the `c │ │ │ -00002b00: 6172 2720 6f66 2074 6865 2060 6361 7227 ar' of the `car' │ │ │ -00002b10: 206f 6620 582e 1f0a 2864 6566 616c 6961 of X...(defalia │ │ │ -00002b20: 7320 2763 6161 6161 7220 235b 2878 2920 s 'caaaar #[(x) │ │ │ -00002b30: 2208 4040 4040 8722 205b 785d 2031 2028 ".@@@@." [x] 1 ( │ │ │ -00002b40: 2324 202e 2031 3039 3639 295d 290a 2340 #$ . 10969)]).#@ │ │ │ -00002b50: 3633 2052 6574 7572 6e20 7468 6520 6063 63 Return the `c │ │ │ -00002b60: 6172 2720 6f66 2074 6865 2060 6361 7227 ar' of the `car' │ │ │ -00002b70: 206f 6620 7468 6520 6063 6172 2720 6f66 of the `car' of │ │ │ -00002b80: 2074 6865 2060 6364 7227 206f 6620 582e the `cdr' of X. │ │ │ -00002b90: 1f0a 2864 6566 616c 6961 7320 2763 6161 ..(defalias 'caa │ │ │ -00002ba0: 6164 7220 235b 2878 2920 2208 4140 4040 adr #[(x) ".A@@@ │ │ │ -00002bb0: 8722 205b 785d 2031 2028 2324 202e 2031 ." [x] 1 (#$ . 1 │ │ │ -00002bc0: 3130 3931 295d 290a 2340 3633 2052 6574 1091)]).#@63 Ret │ │ │ -00002bd0: 7572 6e20 7468 6520 6063 6172 2720 6f66 urn the `car' of │ │ │ -00002be0: 2074 6865 2060 6361 7227 206f 6620 7468 the `car' of th │ │ │ -00002bf0: 6520 6063 6472 2720 6f66 2074 6865 2060 e `cdr' of the ` │ │ │ -00002c00: 6361 7227 206f 6620 582e 1f0a 2864 6566 car' of X...(def │ │ │ -00002c10: 616c 6961 7320 2763 6161 6461 7220 235b alias 'caadar #[ │ │ │ -00002c20: 2878 2920 2208 4041 4040 8722 205b 785d (x) ".@A@@." [x] │ │ │ -00002c30: 2031 2028 2324 202e 2031 3132 3133 295d 1 (#$ . 11213)] │ │ │ -00002c40: 290a 2340 3633 2052 6574 7572 6e20 7468 ).#@63 Return th │ │ │ -00002c50: 6520 6063 6172 2720 6f66 2074 6865 2060 e `car' of the ` │ │ │ -00002c60: 6361 7227 206f 6620 7468 6520 6063 6472 car' of the `cdr │ │ │ -00002c70: 2720 6f66 2074 6865 2060 6364 7227 206f ' of the `cdr' o │ │ │ -00002c80: 6620 582e 1f0a 2864 6566 616c 6961 7320 f X...(defalias │ │ │ -00002c90: 2763 6161 6464 7220 235b 2878 2920 2208 'caaddr #[(x) ". │ │ │ -00002ca0: 4141 4040 8722 205b 785d 2031 2028 2324 AA@@." [x] 1 (#$ │ │ │ -00002cb0: 202e 2031 3133 3335 295d 290a 2340 3633 . 11335)]).#@63 │ │ │ -00002cc0: 2052 6574 7572 6e20 7468 6520 6063 6172 Return the `car │ │ │ -00002cd0: 2720 6f66 2074 6865 2060 6364 7227 206f ' of the `cdr' o │ │ │ -00002ce0: 6620 7468 6520 6063 6172 2720 6f66 2074 f the `car' of t │ │ │ -00002cf0: 6865 2060 6361 7227 206f 6620 582e 1f0a he `car' of X... │ │ │ -00002d00: 2864 6566 616c 6961 7320 2763 6164 6161 (defalias 'cadaa │ │ │ -00002d10: 7220 235b 2878 2920 2208 4040 4140 8722 r #[(x) ".@@A@." │ │ │ -00002d20: 205b 785d 2031 2028 2324 202e 2031 3134 [x] 1 (#$ . 114 │ │ │ -00002d30: 3537 295d 290a 2340 3633 2052 6574 7572 57)]).#@63 Retur │ │ │ -00002d40: 6e20 7468 6520 6063 6172 2720 6f66 2074 n the `car' of t │ │ │ -00002d50: 6865 2060 6364 7227 206f 6620 7468 6520 he `cdr' of the │ │ │ -00002d60: 6063 6172 2720 6f66 2074 6865 2060 6364 `car' of the `cd │ │ │ -00002d70: 7227 206f 6620 582e 1f0a 2864 6566 616c r' of X...(defal │ │ │ -00002d80: 6961 7320 2763 6164 6164 7220 235b 2878 ias 'cadadr #[(x │ │ │ -00002d90: 2920 2208 4140 4140 8722 205b 785d 2031 ) ".A@A@." [x] 1 │ │ │ -00002da0: 2028 2324 202e 2031 3135 3739 295d 290a (#$ . 11579)]). │ │ │ -00002db0: 2340 3633 2052 6574 7572 6e20 7468 6520 #@63 Return the │ │ │ -00002dc0: 6063 6172 2720 6f66 2074 6865 2060 6364 `car' of the `cd │ │ │ -00002dd0: 7227 206f 6620 7468 6520 6063 6472 2720 r' of the `cdr' │ │ │ -00002de0: 6f66 2074 6865 2060 6361 7227 206f 6620 of the `car' of │ │ │ -00002df0: 582e 1f0a 2864 6566 616c 6961 7320 2763 X...(defalias 'c │ │ │ -00002e00: 6164 6461 7220 235b 2878 2920 2208 4041 addar #[(x) ".@A │ │ │ -00002e10: 4140 8722 205b 785d 2031 2028 2324 202e A@." [x] 1 (#$ . │ │ │ -00002e20: 2031 3137 3031 295d 290a 2340 3633 2052 11701)]).#@63 R │ │ │ -00002e30: 6574 7572 6e20 7468 6520 6063 6172 2720 eturn the `car' │ │ │ -00002e40: 6f66 2074 6865 2060 6364 7227 206f 6620 of the `cdr' of │ │ │ -00002e50: 7468 6520 6063 6472 2720 6f66 2074 6865 the `cdr' of the │ │ │ -00002e60: 2060 6364 7227 206f 6620 582e 1f0a 2864 `cdr' of X...(d │ │ │ -00002e70: 6566 616c 6961 7320 2763 6164 6464 7220 efalias 'cadddr │ │ │ -00002e80: 235b 2878 2920 2208 4141 4140 8722 205b #[(x) ".AAA@." [ │ │ │ -00002e90: 785d 2031 2028 2324 202e 2031 3138 3233 x] 1 (#$ . 11823 │ │ │ -00002ea0: 295d 290a 2340 3633 2052 6574 7572 6e20 )]).#@63 Return │ │ │ -00002eb0: 7468 6520 6063 6472 2720 6f66 2074 6865 the `cdr' of the │ │ │ -00002ec0: 2060 6361 7227 206f 6620 7468 6520 6063 `car' of the `c │ │ │ -00002ed0: 6172 2720 6f66 2074 6865 2060 6361 7227 ar' of the `car' │ │ │ -00002ee0: 206f 6620 582e 1f0a 2864 6566 616c 6961 of X...(defalia │ │ │ -00002ef0: 7320 2763 6461 6161 7220 235b 2878 2920 s 'cdaaar #[(x) │ │ │ -00002f00: 2208 4040 4041 8722 205b 785d 2031 2028 ".@@@A." [x] 1 ( │ │ │ -00002f10: 2324 202e 2031 3139 3435 295d 290a 2340 #$ . 11945)]).#@ │ │ │ -00002f20: 3633 2052 6574 7572 6e20 7468 6520 6063 63 Return the `c │ │ │ -00002f30: 6472 2720 6f66 2074 6865 2060 6361 7227 dr' of the `car' │ │ │ -00002f40: 206f 6620 7468 6520 6063 6172 2720 6f66 of the `car' of │ │ │ -00002f50: 2074 6865 2060 6364 7227 206f 6620 582e the `cdr' of X. │ │ │ -00002f60: 1f0a 2864 6566 616c 6961 7320 2763 6461 ..(defalias 'cda │ │ │ -00002f70: 6164 7220 235b 2878 2920 2208 4140 4041 adr #[(x) ".A@@A │ │ │ -00002f80: 8722 205b 785d 2031 2028 2324 202e 2031 ." [x] 1 (#$ . 1 │ │ │ -00002f90: 3230 3637 295d 290a 2340 3633 2052 6574 2067)]).#@63 Ret │ │ │ -00002fa0: 7572 6e20 7468 6520 6063 6472 2720 6f66 urn the `cdr' of │ │ │ -00002fb0: 2074 6865 2060 6361 7227 206f 6620 7468 the `car' of th │ │ │ -00002fc0: 6520 6063 6472 2720 6f66 2074 6865 2060 e `cdr' of the ` │ │ │ -00002fd0: 6361 7227 206f 6620 582e 1f0a 2864 6566 car' of X...(def │ │ │ -00002fe0: 616c 6961 7320 2763 6461 6461 7220 235b alias 'cdadar #[ │ │ │ -00002ff0: 2878 2920 2208 4041 4041 8722 205b 785d (x) ".@A@A." [x] │ │ │ -00003000: 2031 2028 2324 202e 2031 3231 3839 295d 1 (#$ . 12189)] │ │ │ -00003010: 290a 2340 3633 2052 6574 7572 6e20 7468 ).#@63 Return th │ │ │ -00003020: 6520 6063 6472 2720 6f66 2074 6865 2060 e `cdr' of the ` │ │ │ -00003030: 6361 7227 206f 6620 7468 6520 6063 6472 car' of the `cdr │ │ │ -00003040: 2720 6f66 2074 6865 2060 6364 7227 206f ' of the `cdr' o │ │ │ -00003050: 6620 582e 1f0a 2864 6566 616c 6961 7320 f X...(defalias │ │ │ -00003060: 2763 6461 6464 7220 235b 2878 2920 2208 'cdaddr #[(x) ". │ │ │ -00003070: 4141 4041 8722 205b 785d 2031 2028 2324 AA@A." [x] 1 (#$ │ │ │ -00003080: 202e 2031 3233 3131 295d 290a 2340 3633 . 12311)]).#@63 │ │ │ -00003090: 2052 6574 7572 6e20 7468 6520 6063 6472 Return the `cdr │ │ │ -000030a0: 2720 6f66 2074 6865 2060 6364 7227 206f ' of the `cdr' o │ │ │ -000030b0: 6620 7468 6520 6063 6172 2720 6f66 2074 f the `car' of t │ │ │ -000030c0: 6865 2060 6361 7227 206f 6620 582e 1f0a he `car' of X... │ │ │ -000030d0: 2864 6566 616c 6961 7320 2763 6464 6161 (defalias 'cddaa │ │ │ -000030e0: 7220 235b 2878 2920 2208 4040 4141 8722 r #[(x) ".@@AA." │ │ │ -000030f0: 205b 785d 2031 2028 2324 202e 2031 3234 [x] 1 (#$ . 124 │ │ │ -00003100: 3333 295d 290a 2340 3633 2052 6574 7572 33)]).#@63 Retur │ │ │ -00003110: 6e20 7468 6520 6063 6472 2720 6f66 2074 n the `cdr' of t │ │ │ -00003120: 6865 2060 6364 7227 206f 6620 7468 6520 he `cdr' of the │ │ │ -00003130: 6063 6172 2720 6f66 2074 6865 2060 6364 `car' of the `cd │ │ │ -00003140: 7227 206f 6620 582e 1f0a 2864 6566 616c r' of X...(defal │ │ │ -00003150: 6961 7320 2763 6464 6164 7220 235b 2878 ias 'cddadr #[(x │ │ │ -00003160: 2920 2208 4140 4141 8722 205b 785d 2031 ) ".A@AA." [x] 1 │ │ │ -00003170: 2028 2324 202e 2031 3235 3535 295d 290a (#$ . 12555)]). │ │ │ -00003180: 2340 3633 2052 6574 7572 6e20 7468 6520 #@63 Return the │ │ │ -00003190: 6063 6472 2720 6f66 2074 6865 2060 6364 `cdr' of the `cd │ │ │ -000031a0: 7227 206f 6620 7468 6520 6063 6472 2720 r' of the `cdr' │ │ │ -000031b0: 6f66 2074 6865 2060 6361 7227 206f 6620 of the `car' of │ │ │ -000031c0: 582e 1f0a 2864 6566 616c 6961 7320 2763 X...(defalias 'c │ │ │ -000031d0: 6464 6461 7220 235b 2878 2920 2208 4041 dddar #[(x) ".@A │ │ │ -000031e0: 4141 8722 205b 785d 2031 2028 2324 202e AA." [x] 1 (#$ . │ │ │ -000031f0: 2031 3236 3737 295d 290a 2340 3633 2052 12677)]).#@63 R │ │ │ -00003200: 6574 7572 6e20 7468 6520 6063 6472 2720 eturn the `cdr' │ │ │ -00003210: 6f66 2074 6865 2060 6364 7227 206f 6620 of the `cdr' of │ │ │ -00003220: 7468 6520 6063 6472 2720 6f66 2074 6865 the `cdr' of the │ │ │ -00003230: 2060 6364 7227 206f 6620 582e 1f0a 2864 `cdr' of X...(d │ │ │ -00003240: 6566 616c 6961 7320 2763 6464 6464 7220 efalias 'cddddr │ │ │ -00003250: 235b 2878 2920 2208 4141 4141 8722 205b #[(x) ".AAAA." [ │ │ │ -00003260: 785d 2031 2028 2324 202e 2031 3237 3939 x] 1 (#$ . 12799 │ │ │ -00003270: 295d 290a 2340 3137 3720 5265 7475 726e )]).#@177 Return │ │ │ -00003280: 2061 206e 6577 206c 6973 7420 7769 7468 a new list with │ │ │ -00003290: 2073 7065 6369 6669 6564 2061 7267 7320 specified args │ │ │ -000032a0: 6173 2065 6c65 6d65 6e74 732c 2063 6f6e as elements, con │ │ │ -000032b0: 7327 6420 746f 206c 6173 7420 6172 672e s'd to last arg. │ │ │ -000032c0: 0a54 6875 732c 2060 286c 6973 742a 2041 .Thus, `(list* A │ │ │ -000032d0: 2042 2043 2044 2927 2069 7320 6571 7569 B C D)' is equi │ │ │ -000032e0: 7661 6c65 6e74 2074 6f20 6028 6e63 6f6e valent to `(ncon │ │ │ -000032f0: 6320 286c 6973 7420 4120 4220 4329 2044 c (list A B C) D │ │ │ -00003300: 2927 2c20 6f72 2074 6f0a 6028 636f 6e73 )', or to.`(cons │ │ │ -00003310: 2041 2028 636f 6e73 2042 2028 636f 6e73 A (cons B (cons │ │ │ -00003320: 2043 2044 2929 2927 2e1f 0a28 6465 6661 C D)))'...(defa │ │ │ -00003330: 6c69 6173 2027 6c69 7374 2a20 235b 2861 lias 'list* #[(a │ │ │ -00003340: 7267 2026 7265 7374 2072 6573 7429 2022 rg &rest rest) " │ │ │ -00003350: 0cac 820b 870c 41ac 850b 0c40 4287 0c47 ......A....@B..G │ │ │ -00003360: 19c5 0c21 1a09 c65a 5c6e 9b89 1889 4140 ...!...Z\n....A@ │ │ │ -00003370: a188 0b5c 6e2b 4287 2220 5b6c 6173 7420 ...\n+B." [last │ │ │ -00003380: 6e20 636f 7079 2061 7267 2072 6573 7420 n copy arg rest │ │ │ -00003390: 636f 7079 2d73 6571 7565 6e63 6520 325d copy-sequence 2] │ │ │ -000033a0: 2033 2028 2324 202e 2031 3239 3232 295d 3 (#$ . 12922)] │ │ │ -000033b0: 290a 2340 3534 2052 6574 7572 6e20 6120 ).#@54 Return a │ │ │ -000033c0: 636f 7079 206f 6620 4c49 5354 2077 6974 copy of LIST wit │ │ │ -000033d0: 6820 7468 6520 7461 696c 2053 5542 4c49 h the tail SUBLI │ │ │ -000033e0: 5354 2072 656d 6f76 6564 2e1f 0a28 6465 ST removed...(de │ │ │ -000033f0: 6661 6c69 6173 2027 6c64 6966 6620 235b falias 'ldiff #[ │ │ │ -00003400: 286c 6973 7420 7375 626c 6973 7429 2022 (list sublist) " │ │ │ -00003410: c31a 093a ab8f 0908 61ac 8a09 8941 1140 ...:....a....A.@ │ │ │ -00003420: 5c6e 4212 aa6d 5c6e 9f29 8722 205b 7375 \nB..m\n.)." [su │ │ │ -00003430: 626c 6973 7420 6c69 7374 2072 6573 206e blist list res n │ │ │ -00003440: 696c 5d20 3220 2823 2420 2e20 3133 3233 il] 2 (#$ . 1323 │ │ │ -00003450: 3929 5d29 0a28 6465 6661 6c69 6173 2027 9)]).(defalias ' │ │ │ -00003460: 636c 2d6d 6163 6c69 7370 2d6d 656d 6265 cl-maclisp-membe │ │ │ -00003470: 7220 235b 2869 7465 6d20 6c69 7374 2920 r #[(item list) │ │ │ -00003480: 2209 ab8c 0809 406b ac86 0941 8911 ac74 ".....@k...A...t │ │ │ -00003490: 0987 2220 5b69 7465 6d20 6c69 7374 5d20 .." [item list] │ │ │ -000034a0: 335d 290a 2862 7974 652d 636f 6465 2022 3]).(byte-code " │ │ │ -000034b0: c0c1 21ab 86c2 c14b 21ac 85c3 c1c4 5c22 ..!....K!.....\" │ │ │ -000034c0: 88c3 c5c6 5c22 88c3 c7c8 5c22 88c3 c9ca ....\"....\".... │ │ │ -000034d0: 5c22 88c3 cbcc 5c22 88c3 cdce 5c22 88c3 \"....\"....\".. │ │ │ -000034e0: cfd0 5c22 8722 205b 6662 6f75 6e64 7020 ..\"." [fboundp │ │ │ -000034f0: 6d65 6d62 6572 2073 7562 7270 2064 6566 member subrp def │ │ │ -00003500: 616c 6961 7320 636c 2d6d 6163 6c69 7370 alias cl-maclisp │ │ │ -00003510: 2d6d 656d 6265 7220 636c 2d6d 656d 6265 -member cl-membe │ │ │ -00003520: 7220 6d65 6d71 2063 6c2d 666c 6f6f 7220 r memq cl-floor │ │ │ -00003530: 666c 6f6f 722a 2063 6c2d 6365 696c 696e floor* cl-ceilin │ │ │ -00003540: 6720 6365 696c 696e 672a 2063 6c2d 7472 g ceiling* cl-tr │ │ │ -00003550: 756e 6361 7465 2074 7275 6e63 6174 652a uncate truncate* │ │ │ -00003560: 2063 6c2d 726f 756e 6420 726f 756e 642a cl-round round* │ │ │ -00003570: 2063 6c2d 6d6f 6420 6d6f 642a 5d20 3329 cl-mod mod*] 3) │ │ │ -00003580: 0a23 4031 3532 2052 6574 7572 6e20 4954 .#@152 Return IT │ │ │ -00003590: 454d 2063 6f6e 7365 6420 6f6e 746f 2074 EM consed onto t │ │ │ -000035a0: 6865 2066 726f 6e74 206f 6620 4c49 5354 he front of LIST │ │ │ -000035b0: 206f 6e6c 7920 6966 2069 7427 7320 6e6f only if it's no │ │ │ -000035c0: 7420 616c 7265 6164 7920 7468 6572 652e t already there. │ │ │ -000035d0: 0a4f 7468 6572 7769 7365 2c20 7265 7475 .Otherwise, retu │ │ │ -000035e0: 726e 204c 4953 5420 756e 6d6f 6469 6669 rn LIST unmodifi │ │ │ -000035f0: 6564 2e0a 4b65 7977 6f72 6473 2073 7570 ed..Keywords sup │ │ │ -00003600: 706f 7274 6564 3a20 203a 7465 7374 203a ported: :test : │ │ │ -00003610: 7465 7374 2d6e 6f74 203a 6b65 791f 0a28 test-not :key..( │ │ │ -00003620: 6465 6661 6c69 6173 2027 6164 6a6f 696e defalias 'adjoin │ │ │ -00003630: 2023 5b28 636c 2d69 7465 6d20 636c 2d6c #[(cl-item cl-l │ │ │ -00003640: 6973 7420 2672 6573 7420 636c 2d6b 6579 ist &rest cl-key │ │ │ -00003650: 7329 2022 08c3 6bac 8708 ac8f 09a7 ac8b s) "..k......... │ │ │ -00003660: 095c 6e73 ab82 5c6e 8709 5c6e 4287 08c4 .\ns..\n..\nB... │ │ │ -00003670: 6bac 8308 ac8b 095c 6eb6 ab82 5c6e 8709 k......\n...\n.. │ │ │ -00003680: 5c6e 4287 c5c6 095c 6e08 2487 2220 5b63 \nB....\n.$." [c │ │ │ -00003690: 6c2d 6b65 7973 2063 6c2d 6974 656d 2063 l-keys cl-item c │ │ │ -000036a0: 6c2d 6c69 7374 2028 3a74 6573 7420 6571 l-list (:test eq │ │ │ -000036b0: 2920 283a 7465 7374 2065 7175 616c 2920 ) (:test equal) │ │ │ -000036c0: 6170 706c 7920 636c 2d61 646a 6f69 6e5d apply cl-adjoin] │ │ │ -000036d0: 2035 2028 2324 202e 2031 3337 3033 295d 5 (#$ . 13703)] │ │ │ -000036e0: 290a 2340 3137 3620 5375 6273 7469 7475 ).#@176 Substitu │ │ │ -000036f0: 7465 204e 4557 2066 6f72 204f 4c44 2065 te NEW for OLD e │ │ │ -00003700: 7665 7279 7768 6572 6520 696e 2054 5245 verywhere in TRE │ │ │ -00003710: 4520 286e 6f6e 2d64 6573 7472 7563 7469 E (non-destructi │ │ │ -00003720: 7665 6c79 292e 0a52 6574 7572 6e20 6120 vely)..Return a │ │ │ -00003730: 636f 7079 206f 6620 5452 4545 2077 6974 copy of TREE wit │ │ │ -00003740: 6820 616c 6c20 656c 656d 656e 7473 2060 h all elements ` │ │ │ -00003750: 6571 6c27 2074 6f20 4f4c 4420 7265 706c eql' to OLD repl │ │ │ -00003760: 6163 6564 2062 7920 4e45 572e 0a4b 6579 aced by NEW..Key │ │ │ -00003770: 776f 7264 7320 7375 7070 6f72 7465 643a words supported: │ │ │ -00003780: 2020 3a74 6573 7420 3a74 6573 742d 6e6f :test :test-no │ │ │ -00003790: 7420 3a6b 6579 1f0a 2864 6566 616c 6961 t :key..(defalia │ │ │ -000037a0: 7320 2773 7562 7374 2023 5b28 636c 2d6e s 'subst #[(cl-n │ │ │ -000037b0: 6577 2063 6c2d 6f6c 6420 636c 2d74 7265 ew cl-old cl-tre │ │ │ -000037c0: 6520 2672 6573 7420 636c 2d6b 6579 7329 e &rest cl-keys) │ │ │ -000037d0: 2022 5c6e ac88 0ba7 ab8e 0ba8 ac8a c4c5 "\n............ │ │ │ -000037e0: 0b09 4243 085c 6e24 87c6 090b 0823 8722 ..BC.\n$.....#." │ │ │ -000037f0: 205b 636c 2d74 7265 6520 636c 2d6e 6577 [cl-tree cl-new │ │ │ -00003800: 2063 6c2d 6b65 7973 2063 6c2d 6f6c 6420 cl-keys cl-old │ │ │ -00003810: 6170 706c 7920 7375 626c 6973 2063 6c2d apply sublis cl- │ │ │ -00003820: 646f 2d73 7562 7374 5d20 3520 2823 2420 do-subst] 5 (#$ │ │ │ -00003830: 2e20 3134 3035 3629 5d29 0a28 6465 6661 . 14056)]).(defa │ │ │ -00003840: 6c69 6173 2027 636c 2d64 6f2d 7375 6273 lias 'cl-do-subs │ │ │ -00003850: 7420 235b 2863 6c2d 6e65 7720 636c 2d6f t #[(cl-new cl-o │ │ │ -00003860: 6c64 2063 6c2d 7472 6565 2920 220c 0b61 ld cl-tree) "..a │ │ │ -00003870: ab82 5c6e 870c 3aab a2c5 5c6e 0b0c 4023 ..\n..:...\n..@# │ │ │ -00003880: c55c 6e0b 0c41 2319 8918 0c40 61ab 8909 .\n..A#....@a... │ │ │ -00003890: 0c41 61ab 830c aa83 0809 422a 870c 8722 .Aa.......B*..." │ │ │ -000038a0: 205b 6120 6420 636c 2d6e 6577 2063 6c2d [a d cl-new cl- │ │ │ -000038b0: 6f6c 6420 636c 2d74 7265 6520 636c 2d64 old cl-tree cl-d │ │ │ -000038c0: 6f2d 7375 6273 745d 2036 5d29 0a23 4036 o-subst] 6]).#@6 │ │ │ -000038d0: 3220 5265 7475 726e 2061 206e 6577 2061 2 Return a new a │ │ │ -000038e0: 6c69 7374 2063 7265 6174 6564 2062 7920 list created by │ │ │ -000038f0: 6164 6469 6e67 2028 4b45 5920 2e20 5641 adding (KEY . VA │ │ │ -00003900: 4c55 4529 2074 6f20 414c 4953 542e 1f0a LUE) to ALIST... │ │ │ -00003910: 2864 6566 616c 6961 7320 2761 636f 6e73 (defalias 'acons │ │ │ -00003920: 2023 5b28 6120 6220 6329 2022 5c6e 0942 #[(a b c) "\n.B │ │ │ -00003930: 0842 8722 205b 6320 6220 615d 2032 2028 .B." [c b a] 2 ( │ │ │ -00003940: 2324 202e 2031 3435 3436 295d 290a 2864 #$ . 14546)]).(d │ │ │ -00003950: 6566 616c 6961 7320 2770 6169 726c 6973 efalias 'pairlis │ │ │ -00003960: 2023 5b28 6120 6220 266f 7074 696f 6e61 #[(a b &optiona │ │ │ -00003970: 6c20 6329 2022 c3c4 5c6e 0923 08a4 8722 l c) "..\n.#..." │ │ │ -00003980: 205b 6320 6220 6120 6d61 7063 6172 2a20 [c b a mapcar* │ │ │ -00003990: 636f 6e73 5d20 345d 290a 2864 6566 696e cons] 4]).(defin │ │ │ -000039a0: 652d 6572 726f 7220 2763 6c2d 6173 7365 e-error 'cl-asse │ │ │ -000039b0: 7274 696f 6e2d 6661 696c 6564 2022 4173 rtion-failed "As │ │ │ -000039c0: 7365 7274 696f 6e20 6661 696c 6564 2229 sertion failed") │ │ │ -000039d0: 0a23 4031 3134 2041 6464 2074 6f20 686f .#@114 Add to ho │ │ │ -000039e0: 6f6b 2076 6172 6961 626c 6520 484f 4f4b ok variable HOOK │ │ │ -000039f0: 2074 6865 2066 756e 6374 696f 6e20 4655 the function FU │ │ │ -00003a00: 4e43 2e0a 4655 4e43 2069 7320 6e6f 7420 NC..FUNC is not │ │ │ -00003a10: 6164 6465 6420 6966 2069 7420 616c 7265 added if it alre │ │ │ -00003a20: 6164 7920 6170 7065 6172 7320 6f6e 2074 ady appears on t │ │ │ -00003a30: 6865 206c 6973 7420 7374 6f72 6564 2069 he list stored i │ │ │ -00003a40: 6e20 484f 4f4b 2e1f 0a28 6465 6661 6c69 n HOOK...(defali │ │ │ -00003a50: 6173 2027 636c 2d61 6464 2d68 6f6f 6b20 as 'cl-add-hook │ │ │ -00003a60: 235b 2868 6f6f 6b20 6675 6e63 2026 6f70 #[(hook func &op │ │ │ -00003a70: 7469 6f6e 616c 2061 7070 656e 6429 2022 tional append) " │ │ │ -00003a80: c45c 6e21 ad82 5c6e 4a89 1b3c ab89 0b40 .\n!..\nJ..<...@ │ │ │ -00003a90: c561 ac83 0b43 1309 0bb6 3fad 8e5c 6e08 .a...C....?..\n. │ │ │ -00003aa0: ab86 0b09 43a4 aa83 090b 424c 2987 2220 ....C.....BL)." │ │ │ -00003ab0: 5b61 7070 656e 6420 6675 6e63 2068 6f6f [append func hoo │ │ │ -00003ac0: 6b20 6f6c 6420 626f 756e 6470 206c 616d k old boundp lam │ │ │ -00003ad0: 6264 615d 2034 2028 2324 202e 2031 3438 bda] 4 (#$ . 148 │ │ │ -00003ae0: 3037 295d 290a 2862 7974 652d 636f 6465 07)]).(byte-code │ │ │ -00003af0: 2022 c1c2 21ac 85c3 c2c4 5c22 88c5 c6c7 "..!.....\".... │ │ │ -00003b00: 5c22 88c8 c921 88ca 0842 10cb ca21 ac85 \"...!...B...!.. │ │ │ -00003b10: ccca cd5c 2288 cd87 2220 5b63 7572 7265 ...\"..." [curre │ │ │ -00003b20: 6e74 2d6c 6f61 642d 6c69 7374 2066 626f nt-load-list fbo │ │ │ -00003b30: 756e 6470 2061 6464 2d68 6f6f 6b20 6465 undp add-hook de │ │ │ -00003b40: 6661 6c69 6173 2063 6c2d 6164 642d 686f falias cl-add-ho │ │ │ -00003b50: 6f6b 206d 6170 6361 7220 235b 2865 6e74 ok mapcar #[(ent │ │ │ -00003b60: 7279 2920 22c1 c208 405c 2287 2220 5b65 ry) "...@\"." [e │ │ │ -00003b70: 6e74 7279 206d 6170 6361 7220 235b 2866 ntry mapcar #[(f │ │ │ -00003b80: 756e 6329 2022 c209 c308 4140 2388 c209 unc) "....A@#... │ │ │ -00003b90: c408 4140 2388 09c5 4eae 87c2 09c5 c608 ..A@#...N....... │ │ │ -00003ba0: 3823 8722 205b 656e 7472 7920 6675 6e63 8#." [entry func │ │ │ -00003bb0: 2070 7574 206c 6973 702d 696e 6465 6e74 put lisp-indent │ │ │ -00003bc0: 2d66 756e 6374 696f 6e20 6c69 7370 2d69 -function lisp-i │ │ │ -00003bd0: 6e64 656e 742d 686f 6f6b 2065 6465 6275 ndent-hook edebu │ │ │ -00003be0: 672d 666f 726d 2d73 7065 6320 325d 2035 g-form-spec 2] 5 │ │ │ -00003bf0: 5d5d 2033 5d20 2828 2864 6566 756e 2a20 ]] 3] (((defun* │ │ │ -00003c00: 6465 666d 6163 726f 2a29 2064 6566 756e defmacro*) defun │ │ │ -00003c10: 2920 2828 6675 6e63 7469 6f6e 2a29 206e ) ((function*) n │ │ │ -00003c20: 696c 2028 266f 7220 7379 6d62 6f6c 7020 il (&or symbolp │ │ │ -00003c30: 285b 266f 7074 696f 6e61 6c20 276d 6163 ([&optional 'mac │ │ │ -00003c40: 726f 5d20 276c 616d 6264 6120 2826 7265 ro] 'lambda (&re │ │ │ -00003c50: 7374 2073 6578 7029 2026 7265 7374 2066 st sexp) &rest f │ │ │ -00003c60: 6f72 6d29 2929 2028 2865 7661 6c2d 7768 orm))) ((eval-wh │ │ │ -00003c70: 656e 2920 3120 2873 6578 7020 2672 6573 en) 1 (sexp &res │ │ │ -00003c80: 7420 666f 726d 2929 2028 2877 6865 6e20 t form)) ((when │ │ │ -00003c90: 756e 6c65 7373 2920 3120 2826 7265 7374 unless) 1 (&rest │ │ │ -00003ca0: 2066 6f72 6d29 2920 2828 6465 636c 6172 form)) ((declar │ │ │ -00003cb0: 6529 206e 696c 2028 2672 6573 7420 7365 e) nil (&rest se │ │ │ -00003cc0: 7870 2929 2028 2874 6865 2920 3120 2873 xp)) ((the) 1 (s │ │ │ -00003cd0: 6578 7020 2672 6573 7420 666f 726d 2929 exp &rest form)) │ │ │ -00003ce0: 2028 2863 6173 6520 6563 6173 6520 7479 ((case ecase ty │ │ │ -00003cf0: 7065 6361 7365 2065 7479 7065 6361 7365 pecase etypecase │ │ │ -00003d00: 2920 3120 2866 6f72 6d20 2672 6573 7420 ) 1 (form &rest │ │ │ -00003d10: 2873 6578 7020 2672 6573 7420 666f 726d (sexp &rest form │ │ │ -00003d20: 2929 2920 2828 626c 6f63 6b20 7265 7475 ))) ((block retu │ │ │ -00003d30: 726e 2d66 726f 6d29 2031 2028 7365 7870 rn-from) 1 (sexp │ │ │ -00003d40: 2026 7265 7374 2066 6f72 6d29 2920 2828 &rest form)) (( │ │ │ -00003d50: 7265 7475 726e 2920 6e69 6c20 2826 6f70 return) nil (&op │ │ │ -00003d60: 7469 6f6e 616c 2066 6f72 6d29 2920 2828 tional form)) (( │ │ │ -00003d70: 646f 2064 6f2a 2920 3220 2828 2672 6573 do do*) 2 ((&res │ │ │ -00003d80: 7420 266f 7220 7379 6d62 6f6c 7020 2873 t &or symbolp (s │ │ │ -00003d90: 796d 626f 6c70 2026 6f70 7469 6f6e 616c ymbolp &optional │ │ │ -00003da0: 2066 6f72 6d20 666f 726d 2929 2028 666f form form)) (fo │ │ │ -00003db0: 726d 2026 7265 7374 2066 6f72 6d29 2026 rm &rest form) & │ │ │ -00003dc0: 7265 7374 2066 6f72 6d29 2920 2828 646f rest form)) ((do │ │ │ -00003dd0: 6c69 7374 2064 6f74 696d 6573 2920 3120 list dotimes) 1 │ │ │ -00003de0: 2828 7379 6d62 6f6c 7020 666f 726d 2026 ((symbolp form & │ │ │ -00003df0: 7265 7374 2066 6f72 6d29 2026 7265 7374 rest form) &rest │ │ │ -00003e00: 2066 6f72 6d29 2920 2828 646f 2d73 796d form)) ((do-sym │ │ │ -00003e10: 626f 6c73 2920 3120 2828 7379 6d62 6f6c bols) 1 ((symbol │ │ │ -00003e20: 7020 666f 726d 2026 6f70 7469 6f6e 616c p form &optional │ │ │ -00003e30: 2066 6f72 6d20 666f 726d 2920 2672 6573 form form) &res │ │ │ -00003e40: 7420 666f 726d 2929 2028 2864 6f2d 616c t form)) ((do-al │ │ │ -00003e50: 6c2d 7379 6d62 6f6c 7329 2031 2028 2873 l-symbols) 1 ((s │ │ │ -00003e60: 796d 626f 6c70 2066 6f72 6d20 266f 7074 ymbolp form &opt │ │ │ -00003e70: 696f 6e61 6c20 666f 726d 2920 2672 6573 ional form) &res │ │ │ -00003e80: 7420 666f 726d 2929 2028 2870 7365 7471 t form)) ((psetq │ │ │ -00003e90: 2073 6574 6620 7073 6574 6629 206e 696c setf psetf) nil │ │ │ -00003ea0: 2065 6465 6275 672d 7365 7471 2d66 6f72 edebug-setq-for │ │ │ -00003eb0: 6d29 2028 2870 726f 6776 2920 3220 2826 m) ((progv) 2 (& │ │ │ -00003ec0: 7265 7374 2066 6f72 6d29 2920 2828 666c rest form)) ((fl │ │ │ -00003ed0: 6574 206c 6162 656c 7320 6d61 6372 6f6c et labels macrol │ │ │ -00003ee0: 6574 2920 3120 2828 2672 6573 7420 2873 et) 1 ((&rest (s │ │ │ -00003ef0: 6578 7020 7365 7870 2026 7265 7374 2066 exp sexp &rest f │ │ │ -00003f00: 6f72 6d29 2920 2672 6573 7420 666f 726d orm)) &rest form │ │ │ -00003f10: 2929 2028 2873 796d 626f 6c2d 6d61 6372 )) ((symbol-macr │ │ │ -00003f20: 6f6c 6574 206c 6578 6963 616c 2d6c 6574 olet lexical-let │ │ │ -00003f30: 206c 6578 6963 616c 2d6c 6574 2a29 2031 lexical-let*) 1 │ │ │ -00003f40: 2028 2826 7265 7374 2026 6f72 2073 796d ((&rest &or sym │ │ │ -00003f50: 626f 6c70 2028 7379 6d62 6f6c 7020 666f bolp (symbolp fo │ │ │ -00003f60: 726d 2929 2026 7265 7374 2066 6f72 6d29 rm)) &rest form) │ │ │ -00003f70: 2920 2828 6d75 6c74 6970 6c65 2d76 616c ) ((multiple-val │ │ │ -00003f80: 7565 2d62 696e 6429 2032 2028 2826 7265 ue-bind) 2 ((&re │ │ │ -00003f90: 7374 2073 796d 626f 6c70 2920 2672 6573 st symbolp) &res │ │ │ -00003fa0: 7420 666f 726d 2929 2028 286d 756c 7469 t form)) ((multi │ │ │ -00003fb0: 706c 652d 7661 6c75 652d 7365 7471 2920 ple-value-setq) │ │ │ -00003fc0: 3120 2828 2672 6573 7420 7379 6d62 6f6c 1 ((&rest symbol │ │ │ -00003fd0: 7029 2026 7265 7374 2066 6f72 6d29 2920 p) &rest form)) │ │ │ -00003fe0: 2828 696e 6366 2064 6563 6620 7265 6d66 ((incf decf remf │ │ │ -00003ff0: 2070 6f70 2070 7573 6820 7075 7368 6e65 pop push pushne │ │ │ -00004000: 7720 7368 6966 7466 2072 6f74 6174 6566 w shiftf rotatef │ │ │ -00004010: 2920 6e69 6c20 2826 7265 7374 2066 6f72 ) nil (&rest for │ │ │ -00004020: 6d29 2920 2828 6c65 7466 206c 6574 662a m)) ((letf letf* │ │ │ -00004030: 2920 3120 2828 2672 6573 7420 2826 7265 ) 1 ((&rest (&re │ │ │ -00004040: 7374 2066 6f72 6d29 2920 2672 6573 7420 st form)) &rest │ │ │ -00004050: 666f 726d 2929 2028 2863 616c 6c66 2064 form)) ((callf d │ │ │ -00004060: 6573 7472 7563 7475 7269 6e67 2d62 696e estructuring-bin │ │ │ -00004070: 6429 2032 2028 7365 7870 2066 6f72 6d20 d) 2 (sexp form │ │ │ -00004080: 2672 6573 7420 666f 726d 2929 2028 2863 &rest form)) ((c │ │ │ -00004090: 616c 6c66 3229 2033 2028 7365 7870 2066 allf2) 3 (sexp f │ │ │ -000040a0: 6f72 6d20 666f 726d 2026 7265 7374 2066 orm form &rest f │ │ │ -000040b0: 6f72 6d29 2920 2828 6c6f 6f70 2920 6465 orm)) ((loop) de │ │ │ -000040c0: 6675 6e20 2826 7265 7374 2026 6f72 2073 fun (&rest &or s │ │ │ -000040d0: 796d 626f 6c70 2066 6f72 6d29 2920 2828 ymbolp form)) (( │ │ │ -000040e0: 6967 6e6f 7265 2d65 7272 6f72 7329 2030 ignore-errors) 0 │ │ │ -000040f0: 2028 2672 6573 7420 666f 726d 2929 2920 (&rest form))) │ │ │ -00004100: 7072 6f76 6964 6520 636c 2d31 3920 636c provide cl-19 cl │ │ │ -00004110: 2d68 6163 6b65 642d 666c 6167 2064 6566 -hacked-flag def │ │ │ -00004120: 6175 6c74 2d62 6f75 6e64 7020 7365 742d ault-boundp set- │ │ │ -00004130: 6465 6661 756c 7420 6e69 6c5d 2033 290a default nil] 3). │ │ │ -00004140: 2864 6566 616c 6961 7320 2763 6c2d 6861 (defalias 'cl-ha │ │ │ -00004150: 636b 2d62 7974 652d 636f 6d70 696c 6572 ck-byte-compiler │ │ │ -00004160: 2023 5b6e 696c 2022 083f ad96 c1c2 21ad #[nil ".?....!. │ │ │ -00004170: 91c1 c321 ac86 c4c5 c6c7 2388 c320 88c7 ...!......#.. .. │ │ │ -00004180: 8910 8722 205b 636c 2d68 6163 6b65 642d ..." [cl-hacked- │ │ │ -00004190: 666c 6167 2066 626f 756e 6470 2062 7974 flag fboundp byt │ │ │ -000041a0: 652d 636f 6d70 696c 652d 6669 6c65 2d66 e-compile-file-f │ │ │ -000041b0: 6f72 6d20 636c 2d63 6f6d 7069 6c65 2d74 orm cl-compile-t │ │ │ -000041c0: 696d 652d 696e 6974 206c 6f61 6420 2263 ime-init load "c │ │ │ -000041d0: 6c2d 6d61 6373 2220 6e69 6c20 745d 2034 l-macs" nil t] 4 │ │ │ -000041e0: 5d29 0a28 6279 7465 2d63 6f64 6520 22c0 ]).(byte-code ". │ │ │ -000041f0: 2088 c1c2 c05c 2288 c3c4 2188 c3c5 2188 ....\"...!...!. │ │ │ -00004200: c6c7 2187 2220 5b63 6c2d 6861 636b 2d62 ..!." [cl-hack-b │ │ │ -00004210: 7974 652d 636f 6d70 696c 6572 2061 6464 yte-compiler add │ │ │ -00004220: 2d68 6f6f 6b20 656d 6163 732d 6c69 7370 -hook emacs-lisp │ │ │ -00004230: 2d6d 6f64 652d 686f 6f6b 2070 726f 7669 -mode-hook provi │ │ │ -00004240: 6465 2063 6c20 6d69 6e69 2d63 6c20 7275 de cl mini-cl ru │ │ │ -00004250: 6e2d 686f 6f6b 7320 636c 2d6c 6f61 642d n-hooks cl-load- │ │ │ -00004260: 686f 6f6b 5d20 3329 0a hook] 3). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3038 2032 3032 310a 3b3b 3b20 :08:08 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6c2e 656c 0a3b 3b3b 4/lisp/cl.el.;;; │ │ │ +00000090: 2065 6d61 6373 2076 6572 7369 6f6e 2032 emacs version 2 │ │ │ +000000a0: 312e 3420 2870 6174 6368 2032 3429 2022 1.4 (patch 24) " │ │ │ +000000b0: 5374 616e 6461 7264 2043 2220 5845 6d61 Standard C" XEma │ │ │ +000000c0: 6373 204c 7563 6964 2e0a 3b3b 3b20 6279 cs Lucid..;;; by │ │ │ +000000d0: 7465 636f 6d70 2076 6572 7369 6f6e 2032 tecomp version 2 │ │ │ +000000e0: 2e32 3720 5845 6d61 6373 3b20 3230 3030 .27 XEmacs; 2000 │ │ │ +000000f0: 2d30 392d 3132 2e0a 3b3b 3b20 6f70 7469 -09-12..;;; opti │ │ │ +00000100: 6d69 7a61 7469 6f6e 2069 7320 6f6e 2e0a mization is on.. │ │ │ +00000110: 3b3b 3b20 7468 6973 2066 696c 6520 7573 ;;; this file us │ │ │ +00000120: 6573 206f 7063 6f64 6573 2077 6869 6368 es opcodes which │ │ │ +00000130: 2064 6f20 6e6f 7420 6578 6973 7420 696e do not exist in │ │ │ +00000140: 2045 6d61 6373 2031 392e 0a0a 2869 6620 Emacs 19...(if │ │ │ +00000150: 2861 6e64 2028 626f 756e 6470 2027 656d (and (boundp 'em │ │ │ +00000160: 6163 732d 7665 7273 696f 6e29 0a09 2028 acs-version).. ( │ │ │ +00000170: 6f72 2028 616e 6420 2862 6f75 6e64 7020 or (and (boundp │ │ │ +00000180: 2765 706f 6368 3a3a 7665 7273 696f 6e29 'epoch::version) │ │ │ +00000190: 2065 706f 6368 3a3a 7665 7273 696f 6e29 epoch::version) │ │ │ +000001a0: 0a09 2020 2020 2028 7374 7269 6e67 2d6c .. (string-l │ │ │ +000001b0: 6573 7370 2065 6d61 6373 2d76 6572 7369 essp emacs-versi │ │ │ +000001c0: 6f6e 2022 3230 2229 2929 0a20 2020 2028 on "20"))). ( │ │ │ +000001d0: 6572 726f 7220 2260 636c 2e65 6c27 2077 error "`cl.el' w │ │ │ +000001e0: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ +000001f0: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ +00000200: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ +00000210: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ +00000220: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ +00000230: 6c69 7374 206e 696c 2929 0a0a 0a28 6279 list nil))...(by │ │ │ +00000240: 7465 2d63 6f64 6520 22c2 0942 11c3 c221 te-code "..B...! │ │ │ +00000250: ac9f c4c2 c5c6 21ab 84c6 4aac 8508 c799 ......!...J..... │ │ │ +00000260: ab83 c8aa 8ac9 ca08 5c22 ab83 cbaa 81cc ........\"...... │ │ │ +00000270: 5c22 88c5 cd21 ac84 cdce 4d88 cf09 4211 \"...!....M...B. │ │ │ +00000280: c3cf 21ac 85c4 cfd0 5c22 88d1 0942 11c3 ..!.....\"...B.. │ │ │ +00000290: d121 ac85 c4d1 d05c 2288 c287 2220 5b65 .!.....\"..." [e │ │ │ +000002a0: 6d61 6373 2d76 6572 7369 6f6e 2063 7572 macs-version cur │ │ │ +000002b0: 7265 6e74 2d6c 6f61 642d 6c69 7374 2063 rent-load-list c │ │ │ +000002c0: 6c2d 656d 6163 732d 7479 7065 2064 6566 l-emacs-type def │ │ │ +000002d0: 6175 6c74 2d62 6f75 6e64 7020 7365 742d ault-boundp set- │ │ │ +000002e0: 6465 6661 756c 7420 6662 6f75 6e64 7020 default fboundp │ │ │ +000002f0: 6570 6f63 683a 3a76 6572 7369 6f6e 2022 epoch::version " │ │ │ +00000300: 3139 2220 3138 2073 7472 696e 672d 6d61 19" 18 string-ma │ │ │ +00000310: 7463 6820 2258 456d 6163 7322 206c 7563 tch "XEmacs" luc │ │ │ +00000320: 6964 2031 3920 6465 6661 6c69 6173 2066 id 19 defalias f │ │ │ +00000330: 7365 7420 636c 2d6f 7074 696d 697a 652d set cl-optimize- │ │ │ +00000340: 7370 6565 6420 3120 636c 2d6f 7074 696d speed 1 cl-optim │ │ │ +00000350: 697a 652d 7361 6665 7479 5d20 3529 0a23 ize-safety] 5).# │ │ │ +00000360: 4034 3435 2054 6869 7320 6973 2061 206c @445 This is a l │ │ │ +00000370: 6973 7420 6f66 2066 756e 6374 696f 6e73 ist of functions │ │ │ +00000380: 2074 6861 7420 666f 726d 6174 2075 7365 that format use │ │ │ +00000390: 7220 6f62 6a65 6374 7320 666f 7220 7072 r objects for pr │ │ │ +000003a0: 696e 7469 6e67 2e0a 4561 6368 2066 756e inting..Each fun │ │ │ +000003b0: 6374 696f 6e20 6973 2063 616c 6c65 6420 ction is called │ │ │ +000003c0: 696e 2074 7572 6e20 7769 7468 2074 6872 in turn with thr │ │ │ +000003d0: 6565 2061 7267 756d 656e 7473 3a20 7468 ee arguments: th │ │ │ +000003e0: 6520 6f62 6a65 6374 2c20 7468 650a 7374 e object, the.st │ │ │ +000003f0: 7265 616d 2c20 616e 6420 7468 6520 7072 ream, and the pr │ │ │ +00000400: 696e 7420 6c65 7665 6c20 2863 7572 7265 int level (curre │ │ │ +00000410: 6e74 6c79 2069 676e 6f72 6564 292e 2020 ntly ignored). │ │ │ +00000420: 4966 2069 7420 6973 2061 626c 6520 746f If it is able to │ │ │ +00000430: 0a70 7269 6e74 2074 6865 206f 626a 6563 .print the objec │ │ │ +00000440: 7420 6974 2072 6574 7572 6e73 2074 7275 t it returns tru │ │ │ +00000450: 653b 206f 7468 6572 7769 7365 2069 7420 e; otherwise it │ │ │ +00000460: 7265 7475 726e 7320 6e69 6c20 616e 6420 returns nil and │ │ │ +00000470: 7468 650a 7072 696e 7465 7220 7072 6f63 the.printer proc │ │ │ +00000480: 6565 6473 2074 6f20 7468 6520 6e65 7874 eeds to the next │ │ │ +00000490: 2066 756e 6374 696f 6e20 6f6e 2074 6865 function on the │ │ │ +000004a0: 206c 6973 742e 0a0a 5468 6973 2076 6172 list...This var │ │ │ +000004b0: 6961 626c 6520 6973 206e 6f74 2075 7365 iable is not use │ │ │ +000004c0: 6420 6174 2070 7265 7365 6e74 2c20 6275 d at present, bu │ │ │ +000004d0: 7420 6974 2069 7320 6465 6669 6e65 6420 t it is defined │ │ │ +000004e0: 696e 2068 6f70 6573 2074 6861 740a 6120 in hopes that.a │ │ │ +000004f0: 6675 7475 7265 2045 6d61 6373 2069 6e74 future Emacs int │ │ │ +00000500: 6572 7072 6574 6572 2077 696c 6c20 6265 erpreter will be │ │ │ +00000510: 2061 626c 6520 746f 2075 7365 2069 742e able to use it. │ │ │ +00000520: 1f0a 2864 6566 7661 7220 6375 7374 6f6d ..(defvar custom │ │ │ +00000530: 2d70 7269 6e74 2d66 756e 6374 696f 6e73 -print-functions │ │ │ +00000540: 206e 696c 2028 2324 202e 2038 3639 2929 nil (#$ . 869)) │ │ │ +00000550: 0a23 4031 3237 2052 6574 7572 6e20 7420 .#@127 Return t │ │ │ +00000560: 6966 2074 6865 2074 776f 2061 7267 7320 if the two args │ │ │ +00000570: 6172 6520 7468 6520 7361 6d65 204c 6973 are the same Lis │ │ │ +00000580: 7020 6f62 6a65 6374 2e0a 466c 6f61 7469 p object..Floati │ │ │ +00000590: 6e67 2d70 6f69 6e74 206e 756d 6265 7273 ng-point numbers │ │ │ +000005a0: 206f 6620 6571 7561 6c20 7661 6c75 6520 of equal value │ │ │ +000005b0: 6172 6520 6065 716c 272c 2062 7574 2074 are `eql', but t │ │ │ +000005c0: 6865 7920 6d61 7920 6e6f 7420 6265 2060 hey may not be ` │ │ │ +000005d0: 6571 272e 1f0a 2864 6566 616c 6961 7320 eq'...(defalias │ │ │ +000005e0: 2765 716c 2023 5b28 6120 6229 2022 c209 'eql #[(a b) ".. │ │ │ +000005f0: 21ab 8409 086b 8709 0861 8722 205b 6220 !....k...a." [b │ │ │ +00000600: 6120 666c 6f61 7470 5d20 3220 2823 2420 a floatp] 2 (#$ │ │ │ +00000610: 2e20 3133 3637 295d 290a 2340 3137 3820 . 1367)]).#@178 │ │ │ +00000620: 2869 6e63 6620 504c 4143 4520 5b58 5d29 (incf PLACE [X]) │ │ │ +00000630: 3a20 696e 6372 656d 656e 7420 504c 4143 : increment PLAC │ │ │ +00000640: 4520 6279 2058 2028 3120 6279 2064 6566 E by X (1 by def │ │ │ +00000650: 6175 6c74 292e 0a50 4c41 4345 206d 6179 ault)..PLACE may │ │ │ +00000660: 2062 6520 6120 7379 6d62 6f6c 2c20 6f72 be a symbol, or │ │ │ +00000670: 2061 6e79 2067 656e 6572 616c 697a 6564 any generalized │ │ │ +00000680: 2076 6172 6961 626c 6520 616c 6c6f 7765 variable allowe │ │ │ +00000690: 6420 6279 2060 7365 7466 272e 0a54 6865 d by `setf'..The │ │ │ +000006a0: 2072 6574 7572 6e20 7661 6c75 6520 6973 return value is │ │ │ +000006b0: 2074 6865 2069 6e63 7265 6d65 6e74 6564 the incremented │ │ │ +000006c0: 2076 616c 7565 206f 6620 504c 4143 452e value of PLACE. │ │ │ +000006d0: 1f0a 2864 6566 616c 6961 7320 2769 6e63 ..(defalias 'inc │ │ │ +000006e0: 6620 2728 6d61 6372 6f20 2e20 235b 2870 f '(macro . #[(p │ │ │ +000006f0: 6c61 6365 2026 6f70 7469 6f6e 616c 2078 lace &optional x │ │ │ +00000700: 2920 2209 39ab 90c2 0908 ab86 c309 0845 ) ".9..........E │ │ │ +00000710: aa83 c409 4445 87c5 c309 08ae 81c6 4687 ....DE........F. │ │ │ +00000720: 2220 5b78 2070 6c61 6365 2073 6574 7120 " [x place setq │ │ │ +00000730: 2b20 312b 2063 616c 6c66 2031 5d20 3520 + 1+ callf 1] 5 │ │ │ +00000740: 2823 2420 2e20 3135 3638 295d 2929 0a23 (#$ . 1568)])).# │ │ │ +00000750: 4031 3738 2028 6465 6366 2050 4c41 4345 @178 (decf PLACE │ │ │ +00000760: 205b 585d 293a 2064 6563 7265 6d65 6e74 [X]): decrement │ │ │ +00000770: 2050 4c41 4345 2062 7920 5820 2831 2062 PLACE by X (1 b │ │ │ +00000780: 7920 6465 6661 756c 7429 2e0a 504c 4143 y default)..PLAC │ │ │ +00000790: 4520 6d61 7920 6265 2061 2073 796d 626f E may be a symbo │ │ │ +000007a0: 6c2c 206f 7220 616e 7920 6765 6e65 7261 l, or any genera │ │ │ +000007b0: 6c69 7a65 6420 7661 7269 6162 6c65 2061 lized variable a │ │ │ +000007c0: 6c6c 6f77 6564 2062 7920 6073 6574 6627 llowed by `setf' │ │ │ +000007d0: 2e0a 5468 6520 7265 7475 726e 2076 616c ..The return val │ │ │ +000007e0: 7565 2069 7320 7468 6520 6465 6372 656d ue is the decrem │ │ │ +000007f0: 656e 7465 6420 7661 6c75 6520 6f66 2050 ented value of P │ │ │ +00000800: 4c41 4345 2e1f 0a28 6465 6661 6c69 6173 LACE...(defalias │ │ │ +00000810: 2027 6465 6366 2027 286d 6163 726f 202e 'decf '(macro . │ │ │ +00000820: 2023 5b28 706c 6163 6520 266f 7074 696f #[(place &optio │ │ │ +00000830: 6e61 6c20 7829 2022 0939 ab90 c209 08ab nal x) ".9...... │ │ │ +00000840: 86c3 0908 45aa 83c4 0944 4587 c5c3 0908 ....E....DE..... │ │ │ +00000850: ae81 c646 8722 205b 7820 706c 6163 6520 ...F." [x place │ │ │ +00000860: 7365 7471 202d 2031 2d20 6361 6c6c 6620 setq - 1- callf │ │ │ +00000870: 315d 2035 2028 2324 202e 2031 3837 3729 1] 5 (#$ . 1877) │ │ │ +00000880: 5d29 290a 2340 3238 3420 2870 6f70 2050 ])).#@284 (pop P │ │ │ +00000890: 4c41 4345 293a 2072 656d 6f76 6520 616e LACE): remove an │ │ │ +000008a0: 6420 7265 7475 726e 2074 6865 2068 6561 d return the hea │ │ │ +000008b0: 6420 6f66 2074 6865 206c 6973 7420 7374 d of the list st │ │ │ +000008c0: 6f72 6564 2069 6e20 504c 4143 452e 0a41 ored in PLACE..A │ │ │ +000008d0: 6e61 6c6f 676f 7573 2074 6f20 2870 726f nalogous to (pro │ │ │ +000008e0: 6731 2028 6361 7220 504c 4143 4529 2028 g1 (car PLACE) ( │ │ │ +000008f0: 7365 7466 2050 4c41 4345 2028 6364 7220 setf PLACE (cdr │ │ │ +00000900: 504c 4143 4529 2929 2c20 7468 6f75 6768 PLACE))), though │ │ │ +00000910: 206d 6f72 650a 6361 7265 6675 6c20 6162 more.careful ab │ │ │ +00000920: 6f75 7420 6576 616c 7561 7469 6e67 2065 out evaluating e │ │ │ +00000930: 6163 6820 6172 6775 6d65 6e74 206f 6e6c ach argument onl │ │ │ +00000940: 7920 6f6e 6365 2061 6e64 2069 6e20 7468 y once and in th │ │ │ +00000950: 6520 7269 6768 7420 6f72 6465 722e 0a50 e right order..P │ │ │ +00000960: 4c41 4345 206d 6179 2062 6520 6120 7379 LACE may be a sy │ │ │ +00000970: 6d62 6f6c 2c20 6f72 2061 6e79 2067 656e mbol, or any gen │ │ │ +00000980: 6572 616c 697a 6564 2076 6172 6961 626c eralized variabl │ │ │ +00000990: 6520 616c 6c6f 7765 6420 6279 2060 7365 e allowed by `se │ │ │ +000009a0: 7466 272e 1f0a 2864 6566 616c 6961 7320 tf'...(defalias │ │ │ +000009b0: 2770 6f70 2027 286d 6163 726f 202e 2023 'pop '(macro . # │ │ │ +000009c0: 5b28 706c 6163 6529 2022 0839 ab8c c1c2 [(place) ".9.... │ │ │ +000009d0: 08c3 08c4 0844 4545 4487 c508 2187 2220 .....DEED...!." │ │ │ +000009e0: 5b70 6c61 6365 2063 6172 2070 726f 6731 [place car prog1 │ │ │ +000009f0: 2073 6574 7120 6364 7220 636c 2d64 6f2d setq cdr cl-do- │ │ │ +00000a00: 706f 705d 2037 2028 2324 202e 2032 3138 pop] 7 (#$ . 218 │ │ │ +00000a10: 3629 5d29 290a 2340 3236 3520 2870 7573 6)])).#@265 (pus │ │ │ +00000a20: 6820 5820 504c 4143 4529 3a20 696e 7365 h X PLACE): inse │ │ │ +00000a30: 7274 2058 2061 7420 7468 6520 6865 6164 rt X at the head │ │ │ +00000a40: 206f 6620 7468 6520 6c69 7374 2073 746f of the list sto │ │ │ +00000a50: 7265 6420 696e 2050 4c41 4345 2e0a 416e red in PLACE..An │ │ │ +00000a60: 616c 6f67 6f75 7320 746f 2028 7365 7466 alogous to (setf │ │ │ +00000a70: 2050 4c41 4345 2028 636f 6e73 2058 2050 PLACE (cons X P │ │ │ +00000a80: 4c41 4345 2929 2c20 7468 6f75 6768 206d LACE)), though m │ │ │ +00000a90: 6f72 6520 6361 7265 6675 6c20 6162 6f75 ore careful abou │ │ │ +00000aa0: 740a 6576 616c 7561 7469 6e67 2065 6163 t.evaluating eac │ │ │ +00000ab0: 6820 6172 6775 6d65 6e74 206f 6e6c 7920 h argument only │ │ │ +00000ac0: 6f6e 6365 2061 6e64 2069 6e20 7468 6520 once and in the │ │ │ +00000ad0: 7269 6768 7420 6f72 6465 722e 2020 504c right order. PL │ │ │ +00000ae0: 4143 4520 6d61 790a 6265 2061 2073 796d ACE may.be a sym │ │ │ +00000af0: 626f 6c2c 206f 7220 616e 7920 6765 6e65 bol, or any gene │ │ │ +00000b00: 7261 6c69 7a65 6420 7661 7269 6162 6c65 ralized variable │ │ │ +00000b10: 2061 6c6c 6f77 6564 2062 7920 6073 6574 allowed by `set │ │ │ +00000b20: 6627 2e1f 0a28 6465 6661 6c69 6173 2027 f'...(defalias ' │ │ │ +00000b30: 7075 7368 2027 286d 6163 726f 202e 2023 push '(macro . # │ │ │ +00000b40: 5b28 7820 706c 6163 6529 2022 0939 ab88 [(x place) ".9.. │ │ │ +00000b50: c209 c308 0945 4587 c4c3 0809 4687 2220 .....EE.....F." │ │ │ +00000b60: 5b78 2070 6c61 6365 2073 6574 7120 636f [x place setq co │ │ │ +00000b70: 6e73 2063 616c 6c66 325d 2035 2028 2324 ns callf2] 5 (#$ │ │ │ +00000b80: 202e 2032 3538 3829 5d29 290a 2340 3232 . 2588)])).#@22 │ │ │ +00000b90: 3220 2870 7573 686e 6577 2058 2050 4c41 2 (pushnew X PLA │ │ │ +00000ba0: 4345 293a 2069 6e73 6572 7420 5820 6174 CE): insert X at │ │ │ +00000bb0: 2074 6865 2068 6561 6420 6f66 2074 6865 the head of the │ │ │ +00000bc0: 206c 6973 7420 6966 206e 6f74 2061 6c72 list if not alr │ │ │ +00000bd0: 6561 6479 2074 6865 7265 2e0a 4c69 6b65 eady there..Like │ │ │ +00000be0: 2028 7075 7368 2058 2050 4c41 4345 292c (push X PLACE), │ │ │ +00000bf0: 2065 7863 6570 7420 7468 6174 2074 6865 except that the │ │ │ +00000c00: 206c 6973 7420 6973 2075 6e6d 6f64 6966 list is unmodif │ │ │ +00000c10: 6965 6420 6966 2058 2069 7320 6065 716c ied if X is `eql │ │ │ +00000c20: 2720 746f 0a61 6e20 656c 656d 656e 7420 ' to.an element │ │ │ +00000c30: 616c 7265 6164 7920 6f6e 2074 6865 206c already on the l │ │ │ +00000c40: 6973 742e 0a4b 6579 776f 7264 7320 7375 ist..Keywords su │ │ │ +00000c50: 7070 6f72 7465 643a 2020 3a74 6573 7420 pported: :test │ │ │ +00000c60: 3a74 6573 742d 6e6f 7420 3a6b 6579 1f0a :test-not :key.. │ │ │ +00000c70: 2864 6566 616c 6961 7320 2770 7573 686e (defalias 'pushn │ │ │ +00000c80: 6577 2027 286d 6163 726f 202e 2023 5b28 ew '(macro . #[( │ │ │ +00000c90: 7820 706c 6163 6520 2672 6573 7420 6b65 x place &rest ke │ │ │ +00000ca0: 7973 2920 225c 6e39 ab8b c35c 6ec4 095c ys) "\n9...\n..\ │ │ │ +00000cb0: 6e08 4242 4245 87c5 c409 5c6e 0842 4242 n.BBBE....\n.BBB │ │ │ +00000cc0: 4287 2220 5b6b 6579 7320 7820 706c 6163 B." [keys x plac │ │ │ +00000cd0: 6520 7365 7471 2061 646a 6f69 6e20 6361 e setq adjoin ca │ │ │ +00000ce0: 6c6c 6632 5d20 3620 2823 2420 2e20 3239 llf2] 6 (#$ . 29 │ │ │ +00000cf0: 3632 295d 2929 0a28 6465 6661 6c69 6173 62)])).(defalias │ │ │ +00000d00: 2027 636c 2d73 6574 2d65 6c74 2023 5b28 'cl-set-elt #[( │ │ │ +00000d10: 7365 7120 6e20 7661 6c29 2022 5c6e 3cab seq n val) "\n<. │ │ │ +00000d20: 8609 5c6e 9b08 a087 5c6e 0908 4987 2220 ..\n....\n..I." │ │ │ +00000d30: 5b76 616c 206e 2073 6571 5d20 335d 290a [val n seq] 3]). │ │ │ +00000d40: 2864 6566 616c 6961 7320 2763 6c2d 7365 (defalias 'cl-se │ │ │ +00000d50: 742d 6e74 6863 6472 2023 5b28 6e20 6c69 t-nthcdr #[(n li │ │ │ +00000d60: 7374 2078 2920 225c 6ec3 58ab 8209 875c st x) "\n.X....\ │ │ │ +00000d70: 6e53 089b 09a1 8808 8722 205b 6c69 7374 nS......." [list │ │ │ +00000d80: 2078 206e 2030 5d20 325d 290a 2864 6566 x n 0] 2]).(def │ │ │ +00000d90: 616c 6961 7320 2763 6c2d 7365 742d 6275 alias 'cl-set-bu │ │ │ +00000da0: 6666 6572 2d73 7562 7374 7269 6e67 2023 ffer-substring # │ │ │ +00000db0: 5b28 7374 6172 7420 656e 6420 7661 6c29 [(start end val) │ │ │ +00000dc0: 2022 8a5c 6e08 7c88 5c6e 6288 0963 8809 ".\n.|.\nb..c.. │ │ │ +00000dd0: 2987 2220 5b65 6e64 2076 616c 2073 7461 )." [end val sta │ │ │ +00000de0: 7274 5d20 325d 290a 2864 6566 616c 6961 rt] 2]).(defalia │ │ │ +00000df0: 7320 2763 6c2d 7365 742d 7375 6273 7472 s 'cl-set-substr │ │ │ +00000e00: 696e 6720 235b 2873 7472 2073 7461 7274 ing #[(str start │ │ │ +00000e10: 2065 6e64 2076 616c 2920 220b ab8c 0bc4 end val) "..... │ │ │ +00000e20: 57ab 8a0b 5c6e 475c 5c13 aa83 5c6e 4713 W...\nG\\...\nG. │ │ │ +00000e30: 09c4 57ab 8509 5c6e 475c 5c11 09c4 56ad ..W...\nG\\...V. │ │ │ +00000e40: 845c 6ec4 094f 080b 5c6e 4757 ad84 5c6e .\n..O..\nGW..\n │ │ │ +00000e50: 0bc5 4f51 8722 205b 7661 6c20 7374 6172 ..OQ." [val star │ │ │ +00000e60: 7420 7374 7220 656e 6420 3020 6e69 6c5d t str end 0 nil] │ │ │ +00000e70: 2035 5d29 0a28 6465 6661 6c69 6173 2027 5]).(defalias ' │ │ │ +00000e80: 636c 2d6d 6170 2d65 7874 656e 7473 2023 cl-map-extents # │ │ │ +00000e90: 5b28 2672 6573 7420 636c 2d61 7267 7329 [(&rest cl-args) │ │ │ +00000ea0: 2022 c1c2 21ab 85c3 c208 5c22 87c1 c421 "..!.....\"...! │ │ │ +00000eb0: ad84 c3c5 085c 2287 2220 5b63 6c2d 6172 .....\"." [cl-ar │ │ │ +00000ec0: 6773 2066 626f 756e 6470 206d 6170 2d65 gs fboundp map-e │ │ │ +00000ed0: 7874 656e 7473 2061 7070 6c79 206e 6578 xtents apply nex │ │ │ +00000ee0: 742d 6f76 6572 6c61 792d 6174 2063 6c2d t-overlay-at cl- │ │ │ +00000ef0: 6d61 702d 6f76 6572 6c61 7973 5d20 335d map-overlays] 3] │ │ │ +00000f00: 290a 2862 7974 652d 636f 6465 2022 c1c2 ).(byte-code ".. │ │ │ +00000f10: c35c 2288 c1c4 c55c 2288 c1c6 c75c 2288 .\"....\"....\". │ │ │ +00000f20: c1c8 c35c 2288 c1c9 c35c 2288 c1ca cb5c ...\"....\"....\ │ │ │ +00000f30: 2288 c1cc cd5c 2288 ce08 4210 cfce 21ac "....\"...B...!. │ │ │ +00000f40: 85d0 ced1 5c22 88d2 0842 10cf d221 ac8b ....\"...B...!.. │ │ │ +00000f50: d0d2 d34b c1d4 d55c 2288 5c22 88d1 8722 ...K...\".\"..." │ │ │ +00000f60: 205b 6375 7272 656e 742d 6c6f 6164 2d6c [current-load-l │ │ │ +00000f70: 6973 7420 6465 6661 6c69 6173 2063 6c2d ist defalias cl- │ │ │ +00000f80: 626c 6f63 6b2d 7772 6170 7065 7220 6964 block-wrapper id │ │ │ +00000f90: 656e 7469 7479 2063 6c2d 626c 6f63 6b2d entity cl-block- │ │ │ +00000fa0: 7468 726f 7720 7468 726f 7720 7661 6c75 throw throw valu │ │ │ +00000fb0: 6573 206c 6973 7420 7661 6c75 6573 2d6c es list values-l │ │ │ +00000fc0: 6973 7420 6d75 6c74 6970 6c65 2d76 616c ist multiple-val │ │ │ +00000fd0: 7565 2d6c 6973 7420 6d75 6c74 6970 6c65 ue-list multiple │ │ │ +00000fe0: 2d76 616c 7565 2d63 616c 6c20 6170 706c -value-call appl │ │ │ +00000ff0: 7920 6e74 682d 7661 6c75 6520 6e74 6820 y nth-value nth │ │ │ +00001000: 636c 2d6d 6163 726f 2d65 6e76 6972 6f6e cl-macro-environ │ │ │ +00001010: 6d65 6e74 2064 6566 6175 6c74 2d62 6f75 ment default-bou │ │ │ +00001020: 6e64 7020 7365 742d 6465 6661 756c 7420 ndp set-default │ │ │ +00001030: 6e69 6c20 636c 2d6f 6c64 2d6d 6163 726f nil cl-old-macro │ │ │ +00001040: 6578 7061 6e64 206d 6163 726f 6578 7061 expand macroexpa │ │ │ +00001050: 6e64 2d69 6e74 6572 6e61 6c20 6d61 6372 nd-internal macr │ │ │ +00001060: 6f65 7870 616e 6420 636c 2d6d 6163 726f oexpand cl-macro │ │ │ +00001070: 6578 7061 6e64 5d20 3629 0a23 4033 3836 expand] 6).#@386 │ │ │ +00001080: 2052 6574 7572 6e20 7265 7375 6c74 206f Return result o │ │ │ +00001090: 6620 6578 7061 6e64 696e 6720 6d61 6372 f expanding macr │ │ │ +000010a0: 6f73 2061 7420 746f 7020 6c65 7665 6c20 os at top level │ │ │ +000010b0: 6f66 2046 4f52 4d2e 0a49 6620 464f 524d of FORM..If FORM │ │ │ +000010c0: 2069 7320 6e6f 7420 6120 6d61 6372 6f20 is not a macro │ │ │ +000010d0: 6361 6c6c 2c20 6974 2069 7320 7265 7475 call, it is retu │ │ │ +000010e0: 726e 6564 2075 6e63 6861 6e67 6564 2e0a rned unchanged.. │ │ │ +000010f0: 4f74 6865 7277 6973 652c 2074 6865 206d Otherwise, the m │ │ │ +00001100: 6163 726f 2069 7320 6578 7061 6e64 6564 acro is expanded │ │ │ +00001110: 2061 6e64 2074 6865 2065 7870 616e 7369 and the expansi │ │ │ +00001120: 6f6e 2069 7320 636f 6e73 6964 6572 6564 on is considered │ │ │ +00001130: 0a69 6e20 706c 6163 6520 6f66 2046 4f52 .in place of FOR │ │ │ +00001140: 4d2e 2020 5768 656e 2061 206e 6f6e 2d6d M. When a non-m │ │ │ +00001150: 6163 726f 2d63 616c 6c20 7265 7375 6c74 acro-call result │ │ │ +00001160: 732c 2069 7420 6973 2072 6574 7572 6e65 s, it is returne │ │ │ +00001170: 642e 0a0a 5468 6520 7365 636f 6e64 206f d...The second o │ │ │ +00001180: 7074 696f 6e61 6c20 6172 6720 454e 5649 ptional arg ENVI │ │ │ +00001190: 524f 4e4d 454e 5420 7370 6563 6966 6965 RONMENT specifie │ │ │ +000011a0: 7320 616e 2065 6e76 6972 6f6e 6d65 6e74 s an environment │ │ │ +000011b0: 206f 6620 6d61 6372 6f0a 6465 6669 6e69 of macro.defini │ │ │ +000011c0: 7469 6f6e 7320 746f 2073 6861 646f 7720 tions to shadow │ │ │ +000011d0: 7468 6520 6c6f 6164 6564 206f 6e65 7320 the loaded ones │ │ │ +000011e0: 666f 7220 7573 6520 696e 2066 696c 6520 for use in file │ │ │ +000011f0: 6279 7465 2d63 6f6d 7069 6c61 7469 6f6e byte-compilation │ │ │ +00001200: 2e1f 0a28 6465 6661 6c69 6173 2027 636c ...(defalias 'cl │ │ │ +00001210: 2d6d 6163 726f 6578 7061 6e64 2023 5b28 -macroexpand #[( │ │ │ +00001220: 636c 2d6d 6163 726f 2026 6f70 7469 6f6e cl-macro &option │ │ │ +00001230: 616c 2063 6c2d 656e 7629 2022 5c6e 1908 al cl-env) "\n.. │ │ │ +00001240: 0b5c 6e5c 2289 1339 ab92 c40b 215c 6eb7 .\n\"..9....!\n. │ │ │ +00001250: 41ab 8ac4 0b21 5c6e b741 4013 aa65 0b29 A....!\n.A@..e.) │ │ │ +00001260: 8722 205b 636c 2d6f 6c64 2d6d 6163 726f ." [cl-old-macro │ │ │ +00001270: 6578 7061 6e64 2063 6c2d 6d61 6372 6f2d expand cl-macro- │ │ │ +00001280: 656e 7669 726f 6e6d 656e 7420 636c 2d65 environment cl-e │ │ │ +00001290: 6e76 2063 6c2d 6d61 6372 6f20 7379 6d62 nv cl-macro symb │ │ │ +000012a0: 6f6c 2d6e 616d 655d 2034 2028 2324 202e ol-name] 4 (#$ . │ │ │ +000012b0: 2034 3232 3529 5d29 0a28 6279 7465 2d63 4225)]).(byte-c │ │ │ +000012c0: 6f64 6520 22c1 0842 10c2 c121 ac85 c3c1 ode "..B...!.... │ │ │ +000012d0: c45c 2288 c487 2220 5b63 7572 7265 6e74 .\"..." [current │ │ │ +000012e0: 2d6c 6f61 642d 6c69 7374 2063 6c2d 636f -load-list cl-co │ │ │ +000012f0: 6d70 696c 696e 672d 6669 6c65 2064 6566 mpiling-file def │ │ │ +00001300: 6175 6c74 2d62 6f75 6e64 7020 7365 742d ault-boundp set- │ │ │ +00001310: 6465 6661 756c 7420 6e69 6c5d 2033 290a default nil] 3). │ │ │ +00001320: 2864 6566 616c 6961 7320 2763 6c2d 636f (defalias 'cl-co │ │ │ +00001330: 6d70 696c 696e 672d 6669 6c65 2023 5b6e mpiling-file #[n │ │ │ +00001340: 696c 2022 08ae 91c1 c221 ad8c c3c2 4a21 il ".....!....J! │ │ │ +00001350: ad86 c4c2 4a21 c56b 8722 205b 636c 2d63 ....J!.k." [cl-c │ │ │ +00001360: 6f6d 7069 6c69 6e67 2d66 696c 6520 626f ompiling-file bo │ │ │ +00001370: 756e 6470 2062 7974 652d 636f 6d70 696c undp byte-compil │ │ │ +00001380: 652d 6f75 7462 7566 6665 7220 6275 6666 e-outbuffer buff │ │ │ +00001390: 6572 7020 6275 6666 6572 2d6e 616d 6520 erp buffer-name │ │ │ +000013a0: 2220 2a43 6f6d 7069 6c65 7220 4f75 7470 " *Compiler Outp │ │ │ +000013b0: 7574 2a22 5d20 325d 290a 2862 7974 652d ut*"] 2]).(byte- │ │ │ +000013c0: 636f 6465 2022 c108 4210 c2c1 21ac 85c3 code "..B...!... │ │ │ +000013d0: c1c4 5c22 88c4 8722 205b 6375 7272 656e ..\"..." [curren │ │ │ +000013e0: 742d 6c6f 6164 2d6c 6973 7420 636c 2d70 t-load-list cl-p │ │ │ +000013f0: 726f 636c 6169 6d73 2d64 6566 6572 7265 roclaims-deferre │ │ │ +00001400: 6420 6465 6661 756c 742d 626f 756e 6470 d default-boundp │ │ │ +00001410: 2073 6574 2d64 6566 6175 6c74 206e 696c set-default nil │ │ │ +00001420: 5d20 3329 0a28 6465 6661 6c69 6173 2027 ] 3).(defalias ' │ │ │ +00001430: 7072 6f63 6c61 696d 2023 5b28 7370 6563 proclaim #[(spec │ │ │ +00001440: 2920 22c2 c321 ab87 c309 c45c 2288 aa84 ) "..!.....\"... │ │ │ +00001450: 0908 4210 c587 2220 5b63 6c2d 7072 6f63 ..B..." [cl-proc │ │ │ +00001460: 6c61 696d 732d 6465 6665 7272 6564 2073 laims-deferred s │ │ │ +00001470: 7065 6320 6662 6f75 6e64 7020 636c 2d64 pec fboundp cl-d │ │ │ +00001480: 6f2d 7072 6f63 6c61 696d 2074 206e 696c o-proclaim t nil │ │ │ +00001490: 5d20 335d 290a 2864 6566 616c 6961 7320 ] 3]).(defalias │ │ │ +000014a0: 2764 6563 6c61 696d 2027 286d 6163 726f 'declaim '(macro │ │ │ +000014b0: 202e 2023 5b28 2672 6573 7420 7370 6563 . #[(&rest spec │ │ │ +000014c0: 7329 2022 c2c3 085c 2219 c420 ab87 c5c6 s) "...\".. .... │ │ │ +000014d0: 0942 42aa 83c7 0942 2987 2220 5b73 7065 .BB....B)." [spe │ │ │ +000014e0: 6373 2062 6f64 7920 6d61 7063 6172 2023 cs body mapcar # │ │ │ +000014f0: 5b28 7829 2022 c1c2 0844 4487 2220 5b78 [(x) "...DD." [x │ │ │ +00001500: 2070 726f 636c 6169 6d20 7175 6f74 655d proclaim quote] │ │ │ +00001510: 2033 5d20 636c 2d63 6f6d 7069 6c69 6e67 3] cl-compiling │ │ │ +00001520: 2d66 696c 6520 6576 616c 2d77 6865 6e20 -file eval-when │ │ │ +00001530: 2863 6f6d 7069 6c65 206c 6f61 6420 6576 (compile load ev │ │ │ +00001540: 616c 2920 7072 6f67 6e5d 2033 5d29 290a al) progn] 3])). │ │ │ +00001550: 2864 6566 616c 6961 7320 2763 6c2d 7261 (defalias 'cl-ra │ │ │ +00001560: 6e64 6f6d 2d74 696d 6520 235b 6e69 6c20 ndom-time #[nil │ │ │ +00001570: 22c3 c420 2189 1847 1ac5 195c 6e53 8912 ".. !..G...\nS.. │ │ │ +00001580: c559 ab8a 09c6 5f08 5c6e 485c 5c11 aa6e .Y...._.\nH\\..n │ │ │ +00001590: 092b 8722 205b 7469 6d65 2076 2069 2063 .+." [time v i c │ │ │ +000015a0: 6f70 792d 7365 7175 656e 6365 2063 7572 opy-sequence cur │ │ │ +000015b0: 7265 6e74 2d74 696d 652d 7374 7269 6e67 rent-time-string │ │ │ +000015c0: 2030 2033 5d20 345d 290a 2862 7974 652d 0 3] 4]).(byte- │ │ │ +000015d0: 636f 6465 2022 c108 4210 c2c1 21ac 8bc3 code "..B...!... │ │ │ +000015e0: c1c4 c520 c65c 22c7 5f5c 2288 c187 2220 ... .\"._\"..." │ │ │ +000015f0: 5b63 7572 7265 6e74 2d6c 6f61 642d 6c69 [current-load-li │ │ │ +00001600: 7374 202a 6765 6e73 796d 2d63 6f75 6e74 st *gensym-count │ │ │ +00001610: 6572 2a20 6465 6661 756c 742d 626f 756e er* default-boun │ │ │ +00001620: 6470 2073 6574 2d64 6566 6175 6c74 206c dp set-default l │ │ │ +00001630: 6f67 616e 6420 636c 2d72 616e 646f 6d2d ogand cl-random- │ │ │ +00001640: 7469 6d65 2031 3032 3320 3130 305d 2035 time 1023 100] 5 │ │ │ +00001650: 290a 2340 3331 3120 4765 6e65 7261 7465 ).#@311 Generate │ │ │ +00001660: 2061 206e 6577 2075 6e69 6e74 6572 6e65 a new uninterne │ │ │ +00001670: 6420 7379 6d62 6f6c 2e0a 5468 6520 6e61 d symbol..The na │ │ │ +00001680: 6d65 2069 7320 6d61 6465 2062 7920 6170 me is made by ap │ │ │ +00001690: 7065 6e64 696e 6720 6120 6e75 6d62 6572 pending a number │ │ │ +000016a0: 2074 6f20 6120 7072 6566 6978 2e20 2049 to a prefix. I │ │ │ +000016b0: 6620 4152 4720 6973 2061 2073 7472 696e f ARG is a strin │ │ │ +000016c0: 672c 2069 740a 6973 2074 6865 2070 7265 g, it.is the pre │ │ │ +000016d0: 6669 782c 206f 7468 6572 7769 7365 2074 fix, otherwise t │ │ │ +000016e0: 6865 2070 7265 6669 7820 6465 6661 756c he prefix defaul │ │ │ +000016f0: 7473 2074 6f20 2247 222e 2020 4966 2041 ts to "G". If A │ │ │ +00001700: 5247 2069 7320 616e 2069 6e74 6567 6572 RG is an integer │ │ │ +00001710: 2c0a 7468 6520 696e 7465 726e 616c 2063 ,.the internal c │ │ │ +00001720: 6f75 6e74 6572 2069 7320 7265 7365 7420 ounter is reset │ │ │ +00001730: 746f 2074 6861 7420 6e75 6d62 6572 2062 to that number b │ │ │ +00001740: 6566 6f72 6520 6372 6561 7469 6e67 2074 efore creating t │ │ │ +00001750: 6865 206e 616d 652e 0a54 6865 7265 2069 he name..There i │ │ │ +00001760: 7320 6e6f 2077 6179 2074 6f20 7370 6563 s no way to spec │ │ │ +00001770: 6966 7920 626f 7468 2075 7369 6e67 2074 ify both using t │ │ │ +00001780: 6869 7320 6675 6e63 7469 6f6e 2e1f 0a28 his function...( │ │ │ +00001790: 6465 6661 6c69 6173 2027 6765 6e73 796d defalias 'gensym │ │ │ +000017a0: 2023 5b28 266f 7074 696f 6e61 6c20 6172 #[(&optional ar │ │ │ +000017b0: 6729 2022 0b3b ab83 0baa 81c4 0ba8 ab83 g) ".;.......... │ │ │ +000017c0: 0baa 845c 6e89 5412 1918 c5c6 c708 0923 ...\n.T........# │ │ │ +000017d0: 212a 8722 205b 7072 6566 6978 206e 756d !*." [prefix num │ │ │ +000017e0: 202a 6765 6e73 796d 2d63 6f75 6e74 6572 *gensym-counter │ │ │ +000017f0: 2a20 6172 6720 2247 2220 6d61 6b65 2d73 * arg "G" make-s │ │ │ +00001800: 796d 626f 6c20 666f 726d 6174 2022 2573 ymbol format "%s │ │ │ +00001810: 2564 225d 2035 2028 2324 202e 2035 3732 %d"] 5 (#$ . 572 │ │ │ +00001820: 3029 5d29 0a23 4031 3531 2047 656e 6572 0)]).#@151 Gener │ │ │ +00001830: 6174 6520 6120 6e65 7720 696e 7465 726e ate a new intern │ │ │ +00001840: 6564 2073 796d 626f 6c20 7769 7468 2061 ed symbol with a │ │ │ +00001850: 2075 6e69 7175 6520 6e61 6d65 2e0a 5468 unique name..Th │ │ │ +00001860: 6520 6e61 6d65 2069 7320 6d61 6465 2062 e name is made b │ │ │ +00001870: 7920 6170 7065 6e64 696e 6720 6120 6e75 y appending a nu │ │ │ +00001880: 6d62 6572 2074 6f20 4152 472c 2064 6566 mber to ARG, def │ │ │ +00001890: 6175 6c74 2022 4722 2e0a 4966 2041 5247 ault "G"..If ARG │ │ │ +000018a0: 2069 7320 6e6f 7420 6120 7374 7269 6e67 is not a string │ │ │ +000018b0: 2c20 6974 2069 7320 6967 6e6f 7265 642e , it is ignored. │ │ │ +000018c0: 1f0a 2864 6566 616c 6961 7320 2767 656e ..(defalias 'gen │ │ │ +000018d0: 7465 6d70 2023 5b28 266f 7074 696f 6e61 temp #[(&optiona │ │ │ +000018e0: 6c20 6172 6729 2022 093b ab83 09aa 81c4 l arg) ".;...... │ │ │ +000018f0: c51b 18c6 c7c8 085c 6e23 8913 21ab 855c .......\n#..!..\ │ │ │ +00001900: 6e54 12aa 70c9 0b21 2a87 2220 5b70 7265 nT..p..!*." [pre │ │ │ +00001910: 6669 7820 6172 6720 2a67 656e 7379 6d2d fix arg *gensym- │ │ │ +00001920: 636f 756e 7465 722a 206e 616d 6520 2247 counter* name "G │ │ │ +00001930: 2220 6e69 6c20 696e 7465 726e 2d73 6f66 " nil intern-sof │ │ │ +00001940: 7420 666f 726d 6174 2022 2573 2564 2220 t format "%s%d" │ │ │ +00001950: 696e 7465 726e 5d20 3520 2823 2420 2e20 intern] 5 (#$ . │ │ │ +00001960: 3631 3837 295d 290a 2340 3438 2052 6574 6187)]).#@48 Ret │ │ │ +00001970: 7572 6e20 7420 6966 204f 424a 4543 5420 urn t if OBJECT │ │ │ +00001980: 6973 2061 2066 6c6f 6174 696e 6720 706f is a floating po │ │ │ +00001990: 696e 7420 6e75 6d62 6572 2e1f 0a28 6465 int number...(de │ │ │ +000019a0: 6661 6c69 6173 2027 666c 6f61 7470 2d73 falias 'floatp-s │ │ │ +000019b0: 6166 6520 235b 286f 626a 6563 7429 2022 afe #[(object) " │ │ │ +000019c0: c108 2187 2220 5b6f 626a 6563 7420 666c ..!." [object fl │ │ │ +000019d0: 6f61 7470 5d20 3220 2823 2420 2e20 3635 oatp] 2 (#$ . 65 │ │ │ +000019e0: 3039 295d 290a 2340 3333 2052 6574 7572 09)]).#@33 Retur │ │ │ +000019f0: 6e20 7420 6966 204e 554d 4245 5220 6973 n t if NUMBER is │ │ │ +00001a00: 2070 6f73 6974 6976 652e 1f0a 2864 6566 positive...(def │ │ │ +00001a10: 616c 6961 7320 2770 6c75 7370 2023 5b28 alias 'plusp #[( │ │ │ +00001a20: 6e75 6d62 6572 2920 2208 c156 8722 205b number) "..V." [ │ │ │ +00001a30: 6e75 6d62 6572 2030 5d20 3220 2823 2420 number 0] 2 (#$ │ │ │ +00001a40: 2e20 3636 3335 295d 290a 2340 3333 2052 . 6635)]).#@33 R │ │ │ +00001a50: 6574 7572 6e20 7420 6966 204e 554d 4245 eturn t if NUMBE │ │ │ +00001a60: 5220 6973 206e 6567 6174 6976 652e 1f0a R is negative... │ │ │ +00001a70: 2864 6566 616c 6961 7320 276d 696e 7573 (defalias 'minus │ │ │ +00001a80: 7020 235b 286e 756d 6265 7229 2022 08c1 p #[(number) ".. │ │ │ +00001a90: 5787 2220 5b6e 756d 6265 7220 305d 2032 W." [number 0] 2 │ │ │ +00001aa0: 2028 2324 202e 2036 3733 3529 5d29 0a23 (#$ . 6735)]).# │ │ │ +00001ab0: 4032 3920 5265 7475 726e 2074 2069 6620 @29 Return t if │ │ │ +00001ac0: 494e 5445 4745 5220 6973 206f 6464 2e1f INTEGER is odd.. │ │ │ +00001ad0: 0a28 6465 6661 6c69 6173 2027 6f64 6470 .(defalias 'oddp │ │ │ +00001ae0: 2023 5b28 696e 7465 6765 7229 2022 c108 #[(integer) ".. │ │ │ +00001af0: c25c 22c2 6187 2220 5b69 6e74 6567 6572 .\".a." [integer │ │ │ +00001b00: 206c 6f67 616e 6420 315d 2033 2028 2324 logand 1] 3 (#$ │ │ │ +00001b10: 202e 2036 3833 3629 5d29 0a23 4033 3020 . 6836)]).#@30 │ │ │ +00001b20: 5265 7475 726e 2074 2069 6620 494e 5445 Return t if INTE │ │ │ +00001b30: 4745 5220 6973 2065 7665 6e2e 1f0a 2864 GER is even...(d │ │ │ +00001b40: 6566 616c 6961 7320 2765 7665 6e70 2023 efalias 'evenp # │ │ │ +00001b50: 5b28 696e 7465 6765 7229 2022 c108 c25c [(integer) "...\ │ │ │ +00001b60: 22c3 6187 2220 5b69 6e74 6567 6572 206c ".a." [integer l │ │ │ +00001b70: 6f67 616e 6420 3120 305d 2033 2028 2324 ogand 1 0] 3 (#$ │ │ │ +00001b80: 202e 2036 3934 3429 5d29 0a23 4033 3820 . 6944)]).#@38 │ │ │ +00001b90: 5265 7475 726e 2074 6865 2061 6273 6f6c Return the absol │ │ │ +00001ba0: 7574 6520 7661 6c75 6520 6f66 204e 554d ute value of NUM │ │ │ +00001bb0: 4245 522e 1f0a 2864 6566 616c 6961 7320 BER...(defalias │ │ │ +00001bc0: 2763 6c2d 6162 7320 235b 286e 756d 6265 'cl-abs #[(numbe │ │ │ +00001bd0: 7229 2022 08c1 59ab 8208 8708 5b87 2220 r) "..Y.....[." │ │ │ +00001be0: 5b6e 756d 6265 7220 305d 2032 2028 2324 [number 0] 2 (#$ │ │ │ +00001bf0: 202e 2037 3035 3629 5d29 0a28 6279 7465 . 7056)]).(byte │ │ │ +00001c00: 2d63 6f64 6520 22c1 c221 ac85 c3c2 c45c -code "..!.....\ │ │ │ +00001c10: 2288 c508 4210 c6c5 21ac 8bc7 c5c8 c9ca "...B...!....... │ │ │ +00001c20: cbcc 2024 5c22 88c1 8722 205b 6375 7272 .. $\"..." [curr │ │ │ +00001c30: 656e 742d 6c6f 6164 2d6c 6973 7420 6662 ent-load-list fb │ │ │ +00001c40: 6f75 6e64 7020 6162 7320 6465 6661 6c69 oundp abs defali │ │ │ +00001c50: 6173 2063 6c2d 6162 7320 2a72 616e 646f as cl-abs *rando │ │ │ +00001c60: 6d2d 7374 6174 652a 2064 6566 6175 6c74 m-state* default │ │ │ +00001c70: 2d62 6f75 6e64 7020 7365 742d 6465 6661 -boundp set-defa │ │ │ +00001c80: 756c 7420 7665 6374 6f72 2063 6c2d 7261 ult vector cl-ra │ │ │ +00001c90: 6e64 6f6d 2d73 7461 7465 2d74 6167 202d ndom-state-tag - │ │ │ +00001ca0: 3120 3330 2063 6c2d 7261 6e64 6f6d 2d74 1 30 cl-random-t │ │ │ +00001cb0: 696d 655d 2037 290a 2340 3532 2054 6865 ime] 7).#@52 The │ │ │ +00001cc0: 2069 6e74 6567 6572 2063 6c6f 7365 7374 integer closest │ │ │ +00001cd0: 2069 6e20 7661 6c75 6520 746f 2070 6f73 in value to pos │ │ │ +00001ce0: 6974 6976 6520 696e 6669 6e69 7479 2e1f itive infinity.. │ │ │ +00001cf0: 0a28 6465 6663 6f6e 7374 206d 6f73 742d .(defconst most- │ │ │ +00001d00: 706f 7369 7469 7665 2d66 6978 6e75 6d20 positive-fixnum │ │ │ +00001d10: 2865 7661 6c20 2728 6c73 6820 2d31 202d (eval '(lsh -1 - │ │ │ +00001d20: 3129 2920 2823 2420 2e20 3733 3537 2929 1)) (#$ . 7357)) │ │ │ +00001d30: 0a23 4035 3220 5468 6520 696e 7465 6765 .#@52 The intege │ │ │ +00001d40: 7220 636c 6f73 6573 7420 696e 2076 616c r closest in val │ │ │ +00001d50: 7565 2074 6f20 6e65 6761 7469 7665 2069 ue to negative i │ │ │ +00001d60: 6e66 696e 6974 792e 1f0a 2864 6566 636f nfinity...(defco │ │ │ +00001d70: 6e73 7420 6d6f 7374 2d6e 6567 6174 6976 nst most-negativ │ │ │ +00001d80: 652d 6669 786e 756d 2028 6576 616c 2027 e-fixnum (eval ' │ │ │ +00001d90: 282d 202d 3120 286c 7368 202d 3120 2d31 (- -1 (lsh -1 -1 │ │ │ +00001da0: 2929 2920 2823 2420 2e20 3734 3738 2929 ))) (#$ . 7478)) │ │ │ +00001db0: 0a23 4035 3020 5468 6520 666c 6f61 7420 .#@50 The float │ │ │ +00001dc0: 636c 6f73 6573 7420 696e 2076 616c 7565 closest in value │ │ │ +00001dd0: 2074 6f20 706f 7369 7469 7665 2069 6e66 to positive inf │ │ │ +00001de0: 696e 6974 792e 1f0a 2864 6566 636f 6e73 inity...(defcons │ │ │ +00001df0: 7420 6d6f 7374 2d70 6f73 6974 6976 652d t most-positive- │ │ │ +00001e00: 666c 6f61 7420 6e69 6c20 2823 2420 2e20 float nil (#$ . │ │ │ +00001e10: 3736 3036 2929 0a23 4035 3020 5468 6520 7606)).#@50 The │ │ │ +00001e20: 666c 6f61 7420 636c 6f73 6573 7420 696e float closest in │ │ │ +00001e30: 2076 616c 7565 2074 6f20 6e65 6761 7469 value to negati │ │ │ +00001e40: 7665 2069 6e66 696e 6974 792e 1f0a 2864 ve infinity...(d │ │ │ +00001e50: 6566 636f 6e73 7420 6d6f 7374 2d6e 6567 efconst most-neg │ │ │ +00001e60: 6174 6976 652d 666c 6f61 7420 6e69 6c20 ative-float nil │ │ │ +00001e70: 2823 2420 2e20 3737 3038 2929 0a23 4034 (#$ . 7708)).#@4 │ │ │ +00001e80: 3320 5468 6520 706f 7369 7469 7665 2066 3 The positive f │ │ │ +00001e90: 6c6f 6174 2063 6c6f 7365 7374 2069 6e20 loat closest in │ │ │ +00001ea0: 7661 6c75 6520 746f 2030 2e1f 0a28 6465 value to 0...(de │ │ │ +00001eb0: 6663 6f6e 7374 206c 6561 7374 2d70 6f73 fconst least-pos │ │ │ +00001ec0: 6974 6976 652d 666c 6f61 7420 6e69 6c20 itive-float nil │ │ │ +00001ed0: 2823 2420 2e20 3738 3130 2929 0a23 4034 (#$ . 7810)).#@4 │ │ │ +00001ee0: 3320 5468 6520 6e65 6761 7469 7665 2066 3 The negative f │ │ │ +00001ef0: 6c6f 6174 2063 6c6f 7365 7374 2069 6e20 loat closest in │ │ │ +00001f00: 7661 6c75 6520 746f 2030 2e1f 0a28 6465 value to 0...(de │ │ │ +00001f10: 6663 6f6e 7374 206c 6561 7374 2d6e 6567 fconst least-neg │ │ │ +00001f20: 6174 6976 652d 666c 6f61 7420 6e69 6c20 ative-float nil │ │ │ +00001f30: 2823 2420 2e20 3739 3036 2929 0a28 6279 (#$ . 7906)).(by │ │ │ +00001f40: 7465 2d63 6f64 6520 22c3 0c42 14c5 13c2 te-code "..B.... │ │ │ +00001f50: 0c42 14c5 12c1 0c42 14c5 11c0 0c42 14c5 .B.....B.....B.. │ │ │ +00001f60: 10c6 c7c8 5c22 8722 205b 666c 6f61 742d ....\"." [float- │ │ │ +00001f70: 6e65 6761 7469 7665 2d65 7073 696c 6f6e negative-epsilon │ │ │ +00001f80: 2066 6c6f 6174 2d65 7073 696c 6f6e 206c float-epsilon l │ │ │ +00001f90: 6561 7374 2d6e 6567 6174 6976 652d 6e6f east-negative-no │ │ │ +00001fa0: 726d 616c 697a 6564 2d66 6c6f 6174 206c rmalized-float l │ │ │ +00001fb0: 6561 7374 2d70 6f73 6974 6976 652d 6e6f east-positive-no │ │ │ +00001fc0: 726d 616c 697a 6564 2d66 6c6f 6174 2063 rmalized-float c │ │ │ +00001fd0: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ +00001fe0: 206e 696c 2064 6566 616c 6961 7320 636f nil defalias co │ │ │ +00001ff0: 7079 2d73 6571 2063 6f70 792d 7365 7175 py-seq copy-sequ │ │ │ +00002000: 656e 6365 5d20 3329 0a23 4033 3432 2041 ence] 3).#@342 A │ │ │ +00002010: 7070 6c79 2046 554e 4354 494f 4e20 746f pply FUNCTION to │ │ │ +00002020: 2065 6163 6820 656c 656d 656e 7420 6f66 each element of │ │ │ +00002030: 2053 4551 2c20 616e 6420 6d61 6b65 2061 SEQ, and make a │ │ │ +00002040: 206c 6973 7420 6f66 2074 6865 2072 6573 list of the res │ │ │ +00002050: 756c 7473 2e0a 4966 2074 6865 7265 2061 ults..If there a │ │ │ +00002060: 7265 2073 6576 6572 616c 2053 4551 732c re several SEQs, │ │ │ +00002070: 2046 554e 4354 494f 4e20 6973 2063 616c FUNCTION is cal │ │ │ +00002080: 6c65 6420 7769 7468 2074 6861 7420 6d61 led with that ma │ │ │ +00002090: 6e79 2061 7267 756d 656e 7473 2c0a 616e ny arguments,.an │ │ │ +000020a0: 6420 6d61 7070 696e 6720 7374 6f70 7320 d mapping stops │ │ │ +000020b0: 6173 2073 6f6f 6e20 6173 2074 6865 2073 as soon as the s │ │ │ +000020c0: 686f 7274 6573 7420 6c69 7374 2072 756e hortest list run │ │ │ +000020d0: 7320 6f75 742e 2020 5769 7468 206a 7573 s out. With jus │ │ │ +000020e0: 7420 6f6e 650a 5345 512c 2074 6869 7320 t one.SEQ, this │ │ │ +000020f0: 6973 206c 696b 6520 606d 6170 6361 7227 is like `mapcar' │ │ │ +00002100: 2e20 2057 6974 6820 7365 7665 7261 6c2c . With several, │ │ │ +00002110: 2069 7420 6973 206c 696b 6520 7468 6520 it is like the │ │ │ +00002120: 436f 6d6d 6f6e 204c 6973 700a 606d 6170 Common Lisp.`map │ │ │ +00002130: 6361 7227 2066 756e 6374 696f 6e20 6578 car' function ex │ │ │ +00002140: 7465 6e64 6564 2074 6f20 6172 6269 7472 tended to arbitr │ │ │ +00002150: 6172 7920 7365 7175 656e 6365 2074 7970 ary sequence typ │ │ │ +00002160: 6573 2e1f 0a28 6465 6661 6c69 6173 2027 es...(defalias ' │ │ │ +00002170: 6d61 7063 6172 2a20 235b 2863 6c2d 6675 mapcar* #[(cl-fu │ │ │ +00002180: 6e63 2063 6c2d 7820 2672 6573 7420 636c nc cl-x &rest cl │ │ │ +00002190: 2d72 6573 7429 2022 0bab b40b 41ac 890c -rest) "....A... │ │ │ +000021a0: 3cab 850b 403c ac87 c508 0c0b 425c 2287 <...@<......B\". │ │ │ +000021b0: c60b 401a 190c ab94 5c6e ab91 080c 8941 ..@.....\n.....A │ │ │ +000021c0: 1440 5c6e 8941 1240 5c22 0942 11aa 6909 .@\n.A.@\".B..i. │ │ │ +000021d0: 9f2a 87c7 080c 5c22 8722 205b 636c 2d66 .*....\"." [cl-f │ │ │ +000021e0: 756e 6320 636c 2d72 6573 2063 6c2d 7920 unc cl-res cl-y │ │ │ +000021f0: 636c 2d72 6573 7420 636c 2d78 2063 6c2d cl-rest cl-x cl- │ │ │ +00002200: 6d61 7063 6172 2d6d 616e 7920 6e69 6c20 mapcar-many nil │ │ │ +00002210: 6d61 7063 6172 5d20 3420 2823 2420 2e20 mapcar] 4 (#$ . │ │ │ +00002220: 3832 3037 295d 290a 2862 7974 652d 636f 8207)]).(byte-co │ │ │ +00002230: 6465 2022 c0c1 c25c 2288 c0c3 c45c 2288 de "...\"....\". │ │ │ +00002240: c0c5 c65c 2287 2220 5b64 6566 616c 6961 ...\"." [defalia │ │ │ +00002250: 7320 6669 7273 7420 6361 7220 7265 7374 s first car rest │ │ │ +00002260: 2063 6472 2065 6e64 7020 6e75 6c6c 5d20 cdr endp null] │ │ │ +00002270: 3329 0a23 4034 3520 5265 7475 726e 2074 3).#@45 Return t │ │ │ +00002280: 6865 2073 6563 6f6e 6420 656c 656d 656e he second elemen │ │ │ +00002290: 7420 6f66 2074 6865 206c 6973 7420 4c49 t of the list LI │ │ │ +000022a0: 5354 2e1f 0a28 6465 6661 6c69 6173 2027 ST...(defalias ' │ │ │ +000022b0: 7365 636f 6e64 2023 5b28 7829 2022 0841 second #[(x) ".A │ │ │ +000022c0: 4087 2220 5b78 5d20 3120 2823 2420 2e20 @." [x] 1 (#$ . │ │ │ +000022d0: 3838 3234 295d 290a 2340 3434 2052 6574 8824)]).#@44 Ret │ │ │ +000022e0: 7572 6e20 7468 6520 7468 6972 6420 656c urn the third el │ │ │ +000022f0: 656d 656e 7420 6f66 2074 6865 206c 6973 ement of the lis │ │ │ +00002300: 7420 4c49 5354 2e1f 0a28 6465 6661 6c69 t LIST...(defali │ │ │ +00002310: 6173 2027 7468 6972 6420 235b 2878 2920 as 'third #[(x) │ │ │ +00002320: 2208 4141 4087 2220 5b78 5d20 3120 2823 ".AA@." [x] 1 (# │ │ │ +00002330: 2420 2e20 3839 3235 295d 290a 2340 3435 $ . 8925)]).#@45 │ │ │ +00002340: 2052 6574 7572 6e20 7468 6520 666f 7572 Return the four │ │ │ +00002350: 7468 2065 6c65 6d65 6e74 206f 6620 7468 th element of th │ │ │ +00002360: 6520 6c69 7374 204c 4953 542e 1f0a 2864 e list LIST...(d │ │ │ +00002370: 6566 616c 6961 7320 2766 6f75 7274 6820 efalias 'fourth │ │ │ +00002380: 235b 2878 2920 22c1 0838 8722 205b 7820 #[(x) "..8." [x │ │ │ +00002390: 335d 2032 2028 2324 202e 2039 3032 3529 3] 2 (#$ . 9025) │ │ │ +000023a0: 5d29 0a23 4034 3420 5265 7475 726e 2074 ]).#@44 Return t │ │ │ +000023b0: 6865 2066 6966 7468 2065 6c65 6d65 6e74 he fifth element │ │ │ +000023c0: 206f 6620 7468 6520 6c69 7374 204c 4953 of the list LIS │ │ │ +000023d0: 542e 1f0a 2864 6566 616c 6961 7320 2766 T...(defalias 'f │ │ │ +000023e0: 6966 7468 2023 5b28 7829 2022 c108 3887 ifth #[(x) "..8. │ │ │ +000023f0: 2220 5b78 2034 5d20 3220 2823 2420 2e20 " [x 4] 2 (#$ . │ │ │ +00002400: 3931 3238 295d 290a 2340 3434 2052 6574 9128)]).#@44 Ret │ │ │ +00002410: 7572 6e20 7468 6520 7369 7874 6820 656c urn the sixth el │ │ │ +00002420: 656d 656e 7420 6f66 2074 6865 206c 6973 ement of the lis │ │ │ +00002430: 7420 4c49 5354 2e1f 0a28 6465 6661 6c69 t LIST...(defali │ │ │ +00002440: 6173 2027 7369 7874 6820 235b 2878 2920 as 'sixth #[(x) │ │ │ +00002450: 22c1 0838 8722 205b 7820 355d 2032 2028 "..8." [x 5] 2 ( │ │ │ +00002460: 2324 202e 2039 3232 3929 5d29 0a23 4034 #$ . 9229)]).#@4 │ │ │ +00002470: 3620 5265 7475 726e 2074 6865 2073 6576 6 Return the sev │ │ │ +00002480: 656e 7468 2065 6c65 6d65 6e74 206f 6620 enth element of │ │ │ +00002490: 7468 6520 6c69 7374 204c 4953 542e 1f0a the list LIST... │ │ │ +000024a0: 2864 6566 616c 6961 7320 2773 6576 656e (defalias 'seven │ │ │ +000024b0: 7468 2023 5b28 7829 2022 c108 3887 2220 th #[(x) "..8." │ │ │ +000024c0: 5b78 2036 5d20 3220 2823 2420 2e20 3933 [x 6] 2 (#$ . 93 │ │ │ +000024d0: 3330 295d 290a 2340 3435 2052 6574 7572 30)]).#@45 Retur │ │ │ +000024e0: 6e20 7468 6520 6569 6768 7468 2065 6c65 n the eighth ele │ │ │ +000024f0: 6d65 6e74 206f 6620 7468 6520 6c69 7374 ment of the list │ │ │ +00002500: 204c 4953 542e 1f0a 2864 6566 616c 6961 LIST...(defalia │ │ │ +00002510: 7320 2765 6967 6874 6820 235b 2878 2920 s 'eighth #[(x) │ │ │ +00002520: 22c1 0838 8722 205b 7820 375d 2032 2028 "..8." [x 7] 2 ( │ │ │ +00002530: 2324 202e 2039 3433 3529 5d29 0a23 4034 #$ . 9435)]).#@4 │ │ │ +00002540: 3420 5265 7475 726e 2074 6865 206e 696e 4 Return the nin │ │ │ +00002550: 7468 2065 6c65 6d65 6e74 206f 6620 7468 th element of th │ │ │ +00002560: 6520 6c69 7374 204c 4953 542e 1f0a 2864 e list LIST...(d │ │ │ +00002570: 6566 616c 6961 7320 276e 696e 7468 2023 efalias 'ninth # │ │ │ +00002580: 5b28 7829 2022 c108 3887 2220 5b78 2038 [(x) "..8." [x 8 │ │ │ +00002590: 5d20 3220 2823 2420 2e20 3935 3338 295d ] 2 (#$ . 9538)] │ │ │ +000025a0: 290a 2340 3434 2052 6574 7572 6e20 7468 ).#@44 Return th │ │ │ +000025b0: 6520 7465 6e74 6820 656c 656d 656e 7420 e tenth element │ │ │ +000025c0: 6f66 2074 6865 206c 6973 7420 4c49 5354 of the list LIST │ │ │ +000025d0: 2e1f 0a28 6465 6661 6c69 6173 2027 7465 ...(defalias 'te │ │ │ +000025e0: 6e74 6820 235b 2878 2920 22c1 0838 8722 nth #[(x) "..8." │ │ │ +000025f0: 205b 7820 395d 2032 2028 2324 202e 2039 [x 9] 2 (#$ . 9 │ │ │ +00002600: 3633 3929 5d29 0a23 4033 3720 5265 7475 639)]).#@37 Retu │ │ │ +00002610: 726e 2074 6865 2060 6361 7227 206f 6620 rn the `car' of │ │ │ +00002620: 7468 6520 6063 6172 2720 6f66 2058 2e1f the `car' of X.. │ │ │ +00002630: 0a28 6465 6661 6c69 6173 2027 6361 6172 .(defalias 'caar │ │ │ +00002640: 2023 5b28 7829 2022 0840 4087 2220 5b78 #[(x) ".@@." [x │ │ │ +00002650: 5d20 3120 2823 2420 2e20 3937 3430 295d ] 1 (#$ . 9740)] │ │ │ +00002660: 290a 2340 3337 2052 6574 7572 6e20 7468 ).#@37 Return th │ │ │ +00002670: 6520 6063 6172 2720 6f66 2074 6865 2060 e `car' of the ` │ │ │ +00002680: 6364 7227 206f 6620 582e 1f0a 2864 6566 cdr' of X...(def │ │ │ +00002690: 616c 6961 7320 2763 6164 7220 235b 2878 alias 'cadr #[(x │ │ │ +000026a0: 2920 2208 4140 8722 205b 785d 2031 2028 ) ".A@." [x] 1 ( │ │ │ +000026b0: 2324 202e 2039 3833 3129 5d29 0a23 4033 #$ . 9831)]).#@3 │ │ │ +000026c0: 3720 5265 7475 726e 2074 6865 2060 6364 7 Return the `cd │ │ │ +000026d0: 7227 206f 6620 7468 6520 6063 6172 2720 r' of the `car' │ │ │ +000026e0: 6f66 2058 2e1f 0a28 6465 6661 6c69 6173 of X...(defalias │ │ │ +000026f0: 2027 6364 6172 2023 5b28 7829 2022 0840 'cdar #[(x) ".@ │ │ │ +00002700: 4187 2220 5b78 5d20 3120 2823 2420 2e20 A." [x] 1 (#$ . │ │ │ +00002710: 3939 3232 295d 290a 2340 3337 2052 6574 9922)]).#@37 Ret │ │ │ +00002720: 7572 6e20 7468 6520 6063 6472 2720 6f66 urn the `cdr' of │ │ │ +00002730: 2074 6865 2060 6364 7227 206f 6620 582e the `cdr' of X. │ │ │ +00002740: 1f0a 2864 6566 616c 6961 7320 2763 6464 ..(defalias 'cdd │ │ │ +00002750: 7220 235b 2878 2920 2208 4141 8722 205b r #[(x) ".AA." [ │ │ │ +00002760: 785d 2031 2028 2324 202e 2031 3030 3133 x] 1 (#$ . 10013 │ │ │ +00002770: 295d 290a 2340 3530 2052 6574 7572 6e20 )]).#@50 Return │ │ │ +00002780: 7468 6520 6063 6172 2720 6f66 2074 6865 the `car' of the │ │ │ +00002790: 2060 6361 7227 206f 6620 7468 6520 6063 `car' of the `c │ │ │ +000027a0: 6172 2720 6f66 2058 2e1f 0a28 6465 6661 ar' of X...(defa │ │ │ +000027b0: 6c69 6173 2027 6361 6161 7220 235b 2878 lias 'caaar #[(x │ │ │ +000027c0: 2920 2208 4040 4087 2220 5b78 5d20 3120 ) ".@@@." [x] 1 │ │ │ +000027d0: 2823 2420 2e20 3130 3130 3529 5d29 0a23 (#$ . 10105)]).# │ │ │ +000027e0: 4035 3020 5265 7475 726e 2074 6865 2060 @50 Return the ` │ │ │ +000027f0: 6361 7227 206f 6620 7468 6520 6063 6172 car' of the `car │ │ │ +00002800: 2720 6f66 2074 6865 2060 6364 7227 206f ' of the `cdr' o │ │ │ +00002810: 6620 582e 1f0a 2864 6566 616c 6961 7320 f X...(defalias │ │ │ +00002820: 2763 6161 6472 2023 5b28 7829 2022 0841 'caadr #[(x) ".A │ │ │ +00002830: 4040 8722 205b 785d 2031 2028 2324 202e @@." [x] 1 (#$ . │ │ │ +00002840: 2031 3032 3132 295d 290a 2340 3530 2052 10212)]).#@50 R │ │ │ +00002850: 6574 7572 6e20 7468 6520 6063 6172 2720 eturn the `car' │ │ │ +00002860: 6f66 2074 6865 2060 6364 7227 206f 6620 of the `cdr' of │ │ │ +00002870: 7468 6520 6063 6172 2720 6f66 2058 2e1f the `car' of X.. │ │ │ +00002880: 0a28 6465 6661 6c69 6173 2027 6361 6461 .(defalias 'cada │ │ │ +00002890: 7220 235b 2878 2920 2208 4041 4087 2220 r #[(x) ".@A@." │ │ │ +000028a0: 5b78 5d20 3120 2823 2420 2e20 3130 3331 [x] 1 (#$ . 1031 │ │ │ +000028b0: 3929 5d29 0a23 4035 3020 5265 7475 726e 9)]).#@50 Return │ │ │ +000028c0: 2074 6865 2060 6361 7227 206f 6620 7468 the `car' of th │ │ │ +000028d0: 6520 6063 6472 2720 6f66 2074 6865 2060 e `cdr' of the ` │ │ │ +000028e0: 6364 7227 206f 6620 582e 1f0a 2864 6566 cdr' of X...(def │ │ │ +000028f0: 616c 6961 7320 2763 6164 6472 2023 5b28 alias 'caddr #[( │ │ │ +00002900: 7829 2022 0841 4140 8722 205b 785d 2031 x) ".AA@." [x] 1 │ │ │ +00002910: 2028 2324 202e 2031 3034 3236 295d 290a (#$ . 10426)]). │ │ │ +00002920: 2340 3530 2052 6574 7572 6e20 7468 6520 #@50 Return the │ │ │ +00002930: 6063 6472 2720 6f66 2074 6865 2060 6361 `cdr' of the `ca │ │ │ +00002940: 7227 206f 6620 7468 6520 6063 6172 2720 r' of the `car' │ │ │ +00002950: 6f66 2058 2e1f 0a28 6465 6661 6c69 6173 of X...(defalias │ │ │ +00002960: 2027 6364 6161 7220 235b 2878 2920 2208 'cdaar #[(x) ". │ │ │ +00002970: 4040 4187 2220 5b78 5d20 3120 2823 2420 @@A." [x] 1 (#$ │ │ │ +00002980: 2e20 3130 3533 3329 5d29 0a23 4035 3020 . 10533)]).#@50 │ │ │ +00002990: 5265 7475 726e 2074 6865 2060 6364 7227 Return the `cdr' │ │ │ +000029a0: 206f 6620 7468 6520 6063 6172 2720 6f66 of the `car' of │ │ │ +000029b0: 2074 6865 2060 6364 7227 206f 6620 582e the `cdr' of X. │ │ │ +000029c0: 1f0a 2864 6566 616c 6961 7320 2763 6461 ..(defalias 'cda │ │ │ +000029d0: 6472 2023 5b28 7829 2022 0841 4041 8722 dr #[(x) ".A@A." │ │ │ +000029e0: 205b 785d 2031 2028 2324 202e 2031 3036 [x] 1 (#$ . 106 │ │ │ +000029f0: 3430 295d 290a 2340 3530 2052 6574 7572 40)]).#@50 Retur │ │ │ +00002a00: 6e20 7468 6520 6063 6472 2720 6f66 2074 n the `cdr' of t │ │ │ +00002a10: 6865 2060 6364 7227 206f 6620 7468 6520 he `cdr' of the │ │ │ +00002a20: 6063 6172 2720 6f66 2058 2e1f 0a28 6465 `car' of X...(de │ │ │ +00002a30: 6661 6c69 6173 2027 6364 6461 7220 235b falias 'cddar #[ │ │ │ +00002a40: 2878 2920 2208 4041 4187 2220 5b78 5d20 (x) ".@AA." [x] │ │ │ +00002a50: 3120 2823 2420 2e20 3130 3734 3729 5d29 1 (#$ . 10747)]) │ │ │ +00002a60: 0a23 4035 3020 5265 7475 726e 2074 6865 .#@50 Return the │ │ │ +00002a70: 2060 6364 7227 206f 6620 7468 6520 6063 `cdr' of the `c │ │ │ +00002a80: 6472 2720 6f66 2074 6865 2060 6364 7227 dr' of the `cdr' │ │ │ +00002a90: 206f 6620 582e 1f0a 2864 6566 616c 6961 of X...(defalia │ │ │ +00002aa0: 7320 2763 6464 6472 2023 5b28 7829 2022 s 'cdddr #[(x) " │ │ │ +00002ab0: 0841 4141 8722 205b 785d 2031 2028 2324 .AAA." [x] 1 (#$ │ │ │ +00002ac0: 202e 2031 3038 3534 295d 290a 2340 3633 . 10854)]).#@63 │ │ │ +00002ad0: 2052 6574 7572 6e20 7468 6520 6063 6172 Return the `car │ │ │ +00002ae0: 2720 6f66 2074 6865 2060 6361 7227 206f ' of the `car' o │ │ │ +00002af0: 6620 7468 6520 6063 6172 2720 6f66 2074 f the `car' of t │ │ │ +00002b00: 6865 2060 6361 7227 206f 6620 582e 1f0a he `car' of X... │ │ │ +00002b10: 2864 6566 616c 6961 7320 2763 6161 6161 (defalias 'caaaa │ │ │ +00002b20: 7220 235b 2878 2920 2208 4040 4040 8722 r #[(x) ".@@@@." │ │ │ +00002b30: 205b 785d 2031 2028 2324 202e 2031 3039 [x] 1 (#$ . 109 │ │ │ +00002b40: 3631 295d 290a 2340 3633 2052 6574 7572 61)]).#@63 Retur │ │ │ +00002b50: 6e20 7468 6520 6063 6172 2720 6f66 2074 n the `car' of t │ │ │ +00002b60: 6865 2060 6361 7227 206f 6620 7468 6520 he `car' of the │ │ │ +00002b70: 6063 6172 2720 6f66 2074 6865 2060 6364 `car' of the `cd │ │ │ +00002b80: 7227 206f 6620 582e 1f0a 2864 6566 616c r' of X...(defal │ │ │ +00002b90: 6961 7320 2763 6161 6164 7220 235b 2878 ias 'caaadr #[(x │ │ │ +00002ba0: 2920 2208 4140 4040 8722 205b 785d 2031 ) ".A@@@." [x] 1 │ │ │ +00002bb0: 2028 2324 202e 2031 3130 3833 295d 290a (#$ . 11083)]). │ │ │ +00002bc0: 2340 3633 2052 6574 7572 6e20 7468 6520 #@63 Return the │ │ │ +00002bd0: 6063 6172 2720 6f66 2074 6865 2060 6361 `car' of the `ca │ │ │ +00002be0: 7227 206f 6620 7468 6520 6063 6472 2720 r' of the `cdr' │ │ │ +00002bf0: 6f66 2074 6865 2060 6361 7227 206f 6620 of the `car' of │ │ │ +00002c00: 582e 1f0a 2864 6566 616c 6961 7320 2763 X...(defalias 'c │ │ │ +00002c10: 6161 6461 7220 235b 2878 2920 2208 4041 aadar #[(x) ".@A │ │ │ +00002c20: 4040 8722 205b 785d 2031 2028 2324 202e @@." [x] 1 (#$ . │ │ │ +00002c30: 2031 3132 3035 295d 290a 2340 3633 2052 11205)]).#@63 R │ │ │ +00002c40: 6574 7572 6e20 7468 6520 6063 6172 2720 eturn the `car' │ │ │ +00002c50: 6f66 2074 6865 2060 6361 7227 206f 6620 of the `car' of │ │ │ +00002c60: 7468 6520 6063 6472 2720 6f66 2074 6865 the `cdr' of the │ │ │ +00002c70: 2060 6364 7227 206f 6620 582e 1f0a 2864 `cdr' of X...(d │ │ │ +00002c80: 6566 616c 6961 7320 2763 6161 6464 7220 efalias 'caaddr │ │ │ +00002c90: 235b 2878 2920 2208 4141 4040 8722 205b #[(x) ".AA@@." [ │ │ │ +00002ca0: 785d 2031 2028 2324 202e 2031 3133 3237 x] 1 (#$ . 11327 │ │ │ +00002cb0: 295d 290a 2340 3633 2052 6574 7572 6e20 )]).#@63 Return │ │ │ +00002cc0: 7468 6520 6063 6172 2720 6f66 2074 6865 the `car' of the │ │ │ +00002cd0: 2060 6364 7227 206f 6620 7468 6520 6063 `cdr' of the `c │ │ │ +00002ce0: 6172 2720 6f66 2074 6865 2060 6361 7227 ar' of the `car' │ │ │ +00002cf0: 206f 6620 582e 1f0a 2864 6566 616c 6961 of X...(defalia │ │ │ +00002d00: 7320 2763 6164 6161 7220 235b 2878 2920 s 'cadaar #[(x) │ │ │ +00002d10: 2208 4040 4140 8722 205b 785d 2031 2028 ".@@A@." [x] 1 ( │ │ │ +00002d20: 2324 202e 2031 3134 3439 295d 290a 2340 #$ . 11449)]).#@ │ │ │ +00002d30: 3633 2052 6574 7572 6e20 7468 6520 6063 63 Return the `c │ │ │ +00002d40: 6172 2720 6f66 2074 6865 2060 6364 7227 ar' of the `cdr' │ │ │ +00002d50: 206f 6620 7468 6520 6063 6172 2720 6f66 of the `car' of │ │ │ +00002d60: 2074 6865 2060 6364 7227 206f 6620 582e the `cdr' of X. │ │ │ +00002d70: 1f0a 2864 6566 616c 6961 7320 2763 6164 ..(defalias 'cad │ │ │ +00002d80: 6164 7220 235b 2878 2920 2208 4140 4140 adr #[(x) ".A@A@ │ │ │ +00002d90: 8722 205b 785d 2031 2028 2324 202e 2031 ." [x] 1 (#$ . 1 │ │ │ +00002da0: 3135 3731 295d 290a 2340 3633 2052 6574 1571)]).#@63 Ret │ │ │ +00002db0: 7572 6e20 7468 6520 6063 6172 2720 6f66 urn the `car' of │ │ │ +00002dc0: 2074 6865 2060 6364 7227 206f 6620 7468 the `cdr' of th │ │ │ +00002dd0: 6520 6063 6472 2720 6f66 2074 6865 2060 e `cdr' of the ` │ │ │ +00002de0: 6361 7227 206f 6620 582e 1f0a 2864 6566 car' of X...(def │ │ │ +00002df0: 616c 6961 7320 2763 6164 6461 7220 235b alias 'caddar #[ │ │ │ +00002e00: 2878 2920 2208 4041 4140 8722 205b 785d (x) ".@AA@." [x] │ │ │ +00002e10: 2031 2028 2324 202e 2031 3136 3933 295d 1 (#$ . 11693)] │ │ │ +00002e20: 290a 2340 3633 2052 6574 7572 6e20 7468 ).#@63 Return th │ │ │ +00002e30: 6520 6063 6172 2720 6f66 2074 6865 2060 e `car' of the ` │ │ │ +00002e40: 6364 7227 206f 6620 7468 6520 6063 6472 cdr' of the `cdr │ │ │ +00002e50: 2720 6f66 2074 6865 2060 6364 7227 206f ' of the `cdr' o │ │ │ +00002e60: 6620 582e 1f0a 2864 6566 616c 6961 7320 f X...(defalias │ │ │ +00002e70: 2763 6164 6464 7220 235b 2878 2920 2208 'cadddr #[(x) ". │ │ │ +00002e80: 4141 4140 8722 205b 785d 2031 2028 2324 AAA@." [x] 1 (#$ │ │ │ +00002e90: 202e 2031 3138 3135 295d 290a 2340 3633 . 11815)]).#@63 │ │ │ +00002ea0: 2052 6574 7572 6e20 7468 6520 6063 6472 Return the `cdr │ │ │ +00002eb0: 2720 6f66 2074 6865 2060 6361 7227 206f ' of the `car' o │ │ │ +00002ec0: 6620 7468 6520 6063 6172 2720 6f66 2074 f the `car' of t │ │ │ +00002ed0: 6865 2060 6361 7227 206f 6620 582e 1f0a he `car' of X... │ │ │ +00002ee0: 2864 6566 616c 6961 7320 2763 6461 6161 (defalias 'cdaaa │ │ │ +00002ef0: 7220 235b 2878 2920 2208 4040 4041 8722 r #[(x) ".@@@A." │ │ │ +00002f00: 205b 785d 2031 2028 2324 202e 2031 3139 [x] 1 (#$ . 119 │ │ │ +00002f10: 3337 295d 290a 2340 3633 2052 6574 7572 37)]).#@63 Retur │ │ │ +00002f20: 6e20 7468 6520 6063 6472 2720 6f66 2074 n the `cdr' of t │ │ │ +00002f30: 6865 2060 6361 7227 206f 6620 7468 6520 he `car' of the │ │ │ +00002f40: 6063 6172 2720 6f66 2074 6865 2060 6364 `car' of the `cd │ │ │ +00002f50: 7227 206f 6620 582e 1f0a 2864 6566 616c r' of X...(defal │ │ │ +00002f60: 6961 7320 2763 6461 6164 7220 235b 2878 ias 'cdaadr #[(x │ │ │ +00002f70: 2920 2208 4140 4041 8722 205b 785d 2031 ) ".A@@A." [x] 1 │ │ │ +00002f80: 2028 2324 202e 2031 3230 3539 295d 290a (#$ . 12059)]). │ │ │ +00002f90: 2340 3633 2052 6574 7572 6e20 7468 6520 #@63 Return the │ │ │ +00002fa0: 6063 6472 2720 6f66 2074 6865 2060 6361 `cdr' of the `ca │ │ │ +00002fb0: 7227 206f 6620 7468 6520 6063 6472 2720 r' of the `cdr' │ │ │ +00002fc0: 6f66 2074 6865 2060 6361 7227 206f 6620 of the `car' of │ │ │ +00002fd0: 582e 1f0a 2864 6566 616c 6961 7320 2763 X...(defalias 'c │ │ │ +00002fe0: 6461 6461 7220 235b 2878 2920 2208 4041 dadar #[(x) ".@A │ │ │ +00002ff0: 4041 8722 205b 785d 2031 2028 2324 202e @A." [x] 1 (#$ . │ │ │ +00003000: 2031 3231 3831 295d 290a 2340 3633 2052 12181)]).#@63 R │ │ │ +00003010: 6574 7572 6e20 7468 6520 6063 6472 2720 eturn the `cdr' │ │ │ +00003020: 6f66 2074 6865 2060 6361 7227 206f 6620 of the `car' of │ │ │ +00003030: 7468 6520 6063 6472 2720 6f66 2074 6865 the `cdr' of the │ │ │ +00003040: 2060 6364 7227 206f 6620 582e 1f0a 2864 `cdr' of X...(d │ │ │ +00003050: 6566 616c 6961 7320 2763 6461 6464 7220 efalias 'cdaddr │ │ │ +00003060: 235b 2878 2920 2208 4141 4041 8722 205b #[(x) ".AA@A." [ │ │ │ +00003070: 785d 2031 2028 2324 202e 2031 3233 3033 x] 1 (#$ . 12303 │ │ │ +00003080: 295d 290a 2340 3633 2052 6574 7572 6e20 )]).#@63 Return │ │ │ +00003090: 7468 6520 6063 6472 2720 6f66 2074 6865 the `cdr' of the │ │ │ +000030a0: 2060 6364 7227 206f 6620 7468 6520 6063 `cdr' of the `c │ │ │ +000030b0: 6172 2720 6f66 2074 6865 2060 6361 7227 ar' of the `car' │ │ │ +000030c0: 206f 6620 582e 1f0a 2864 6566 616c 6961 of X...(defalia │ │ │ +000030d0: 7320 2763 6464 6161 7220 235b 2878 2920 s 'cddaar #[(x) │ │ │ +000030e0: 2208 4040 4141 8722 205b 785d 2031 2028 ".@@AA." [x] 1 ( │ │ │ +000030f0: 2324 202e 2031 3234 3235 295d 290a 2340 #$ . 12425)]).#@ │ │ │ +00003100: 3633 2052 6574 7572 6e20 7468 6520 6063 63 Return the `c │ │ │ +00003110: 6472 2720 6f66 2074 6865 2060 6364 7227 dr' of the `cdr' │ │ │ +00003120: 206f 6620 7468 6520 6063 6172 2720 6f66 of the `car' of │ │ │ +00003130: 2074 6865 2060 6364 7227 206f 6620 582e the `cdr' of X. │ │ │ +00003140: 1f0a 2864 6566 616c 6961 7320 2763 6464 ..(defalias 'cdd │ │ │ +00003150: 6164 7220 235b 2878 2920 2208 4140 4141 adr #[(x) ".A@AA │ │ │ +00003160: 8722 205b 785d 2031 2028 2324 202e 2031 ." [x] 1 (#$ . 1 │ │ │ +00003170: 3235 3437 295d 290a 2340 3633 2052 6574 2547)]).#@63 Ret │ │ │ +00003180: 7572 6e20 7468 6520 6063 6472 2720 6f66 urn the `cdr' of │ │ │ +00003190: 2074 6865 2060 6364 7227 206f 6620 7468 the `cdr' of th │ │ │ +000031a0: 6520 6063 6472 2720 6f66 2074 6865 2060 e `cdr' of the ` │ │ │ +000031b0: 6361 7227 206f 6620 582e 1f0a 2864 6566 car' of X...(def │ │ │ +000031c0: 616c 6961 7320 2763 6464 6461 7220 235b alias 'cdddar #[ │ │ │ +000031d0: 2878 2920 2208 4041 4141 8722 205b 785d (x) ".@AAA." [x] │ │ │ +000031e0: 2031 2028 2324 202e 2031 3236 3639 295d 1 (#$ . 12669)] │ │ │ +000031f0: 290a 2340 3633 2052 6574 7572 6e20 7468 ).#@63 Return th │ │ │ +00003200: 6520 6063 6472 2720 6f66 2074 6865 2060 e `cdr' of the ` │ │ │ +00003210: 6364 7227 206f 6620 7468 6520 6063 6472 cdr' of the `cdr │ │ │ +00003220: 2720 6f66 2074 6865 2060 6364 7227 206f ' of the `cdr' o │ │ │ +00003230: 6620 582e 1f0a 2864 6566 616c 6961 7320 f X...(defalias │ │ │ +00003240: 2763 6464 6464 7220 235b 2878 2920 2208 'cddddr #[(x) ". │ │ │ +00003250: 4141 4141 8722 205b 785d 2031 2028 2324 AAAA." [x] 1 (#$ │ │ │ +00003260: 202e 2031 3237 3931 295d 290a 2340 3137 . 12791)]).#@17 │ │ │ +00003270: 3720 5265 7475 726e 2061 206e 6577 206c 7 Return a new l │ │ │ +00003280: 6973 7420 7769 7468 2073 7065 6369 6669 ist with specifi │ │ │ +00003290: 6564 2061 7267 7320 6173 2065 6c65 6d65 ed args as eleme │ │ │ +000032a0: 6e74 732c 2063 6f6e 7327 6420 746f 206c nts, cons'd to l │ │ │ +000032b0: 6173 7420 6172 672e 0a54 6875 732c 2060 ast arg..Thus, ` │ │ │ +000032c0: 286c 6973 742a 2041 2042 2043 2044 2927 (list* A B C D)' │ │ │ +000032d0: 2069 7320 6571 7569 7661 6c65 6e74 2074 is equivalent t │ │ │ +000032e0: 6f20 6028 6e63 6f6e 6320 286c 6973 7420 o `(nconc (list │ │ │ +000032f0: 4120 4220 4329 2044 2927 2c20 6f72 2074 A B C) D)', or t │ │ │ +00003300: 6f0a 6028 636f 6e73 2041 2028 636f 6e73 o.`(cons A (cons │ │ │ +00003310: 2042 2028 636f 6e73 2043 2044 2929 2927 B (cons C D)))' │ │ │ +00003320: 2e1f 0a28 6465 6661 6c69 6173 2027 6c69 ...(defalias 'li │ │ │ +00003330: 7374 2a20 235b 2861 7267 2026 7265 7374 st* #[(arg &rest │ │ │ +00003340: 2072 6573 7429 2022 0cac 820b 870c 41ac rest) "......A. │ │ │ +00003350: 850b 0c40 4287 0c47 19c5 0c21 1a09 c65a ...@B..G...!...Z │ │ │ +00003360: 5c6e 9b89 1889 4140 a188 0b5c 6e2b 4287 \n....A@...\n+B. │ │ │ +00003370: 2220 5b6c 6173 7420 6e20 636f 7079 2061 " [last n copy a │ │ │ +00003380: 7267 2072 6573 7420 636f 7079 2d73 6571 rg rest copy-seq │ │ │ +00003390: 7565 6e63 6520 325d 2033 2028 2324 202e uence 2] 3 (#$ . │ │ │ +000033a0: 2031 3239 3134 295d 290a 2340 3534 2052 12914)]).#@54 R │ │ │ +000033b0: 6574 7572 6e20 6120 636f 7079 206f 6620 eturn a copy of │ │ │ +000033c0: 4c49 5354 2077 6974 6820 7468 6520 7461 LIST with the ta │ │ │ +000033d0: 696c 2053 5542 4c49 5354 2072 656d 6f76 il SUBLIST remov │ │ │ +000033e0: 6564 2e1f 0a28 6465 6661 6c69 6173 2027 ed...(defalias ' │ │ │ +000033f0: 6c64 6966 6620 235b 286c 6973 7420 7375 ldiff #[(list su │ │ │ +00003400: 626c 6973 7429 2022 c31a 093a ab8f 0908 blist) "...:.... │ │ │ +00003410: 61ac 8a09 8941 1140 5c6e 4212 aa6d 5c6e a....A.@\nB..m\n │ │ │ +00003420: 9f29 8722 205b 7375 626c 6973 7420 6c69 .)." [sublist li │ │ │ +00003430: 7374 2072 6573 206e 696c 5d20 3220 2823 st res nil] 2 (# │ │ │ +00003440: 2420 2e20 3133 3233 3129 5d29 0a28 6465 $ . 13231)]).(de │ │ │ +00003450: 6661 6c69 6173 2027 636c 2d6d 6163 6c69 falias 'cl-macli │ │ │ +00003460: 7370 2d6d 656d 6265 7220 235b 2869 7465 sp-member #[(ite │ │ │ +00003470: 6d20 6c69 7374 2920 2209 ab8c 0809 406b m list) ".....@k │ │ │ +00003480: ac86 0941 8911 ac74 0987 2220 5b69 7465 ...A...t.." [ite │ │ │ +00003490: 6d20 6c69 7374 5d20 335d 290a 2862 7974 m list] 3]).(byt │ │ │ +000034a0: 652d 636f 6465 2022 c0c1 21ab 86c2 c14b e-code "..!....K │ │ │ +000034b0: 21ac 85c3 c1c4 5c22 88c3 c5c6 5c22 88c3 !.....\"....\".. │ │ │ +000034c0: c7c8 5c22 88c3 c9ca 5c22 88c3 cbcc 5c22 ..\"....\"....\" │ │ │ +000034d0: 88c3 cdce 5c22 88c3 cfd0 5c22 8722 205b ....\"....\"." [ │ │ │ +000034e0: 6662 6f75 6e64 7020 6d65 6d62 6572 2073 fboundp member s │ │ │ +000034f0: 7562 7270 2064 6566 616c 6961 7320 636c ubrp defalias cl │ │ │ +00003500: 2d6d 6163 6c69 7370 2d6d 656d 6265 7220 -maclisp-member │ │ │ +00003510: 636c 2d6d 656d 6265 7220 6d65 6d71 2063 cl-member memq c │ │ │ +00003520: 6c2d 666c 6f6f 7220 666c 6f6f 722a 2063 l-floor floor* c │ │ │ +00003530: 6c2d 6365 696c 696e 6720 6365 696c 696e l-ceiling ceilin │ │ │ +00003540: 672a 2063 6c2d 7472 756e 6361 7465 2074 g* cl-truncate t │ │ │ +00003550: 7275 6e63 6174 652a 2063 6c2d 726f 756e runcate* cl-roun │ │ │ +00003560: 6420 726f 756e 642a 2063 6c2d 6d6f 6420 d round* cl-mod │ │ │ +00003570: 6d6f 642a 5d20 3329 0a23 4031 3532 2052 mod*] 3).#@152 R │ │ │ +00003580: 6574 7572 6e20 4954 454d 2063 6f6e 7365 eturn ITEM conse │ │ │ +00003590: 6420 6f6e 746f 2074 6865 2066 726f 6e74 d onto the front │ │ │ +000035a0: 206f 6620 4c49 5354 206f 6e6c 7920 6966 of LIST only if │ │ │ +000035b0: 2069 7427 7320 6e6f 7420 616c 7265 6164 it's not alread │ │ │ +000035c0: 7920 7468 6572 652e 0a4f 7468 6572 7769 y there..Otherwi │ │ │ +000035d0: 7365 2c20 7265 7475 726e 204c 4953 5420 se, return LIST │ │ │ +000035e0: 756e 6d6f 6469 6669 6564 2e0a 4b65 7977 unmodified..Keyw │ │ │ +000035f0: 6f72 6473 2073 7570 706f 7274 6564 3a20 ords supported: │ │ │ +00003600: 203a 7465 7374 203a 7465 7374 2d6e 6f74 :test :test-not │ │ │ +00003610: 203a 6b65 791f 0a28 6465 6661 6c69 6173 :key..(defalias │ │ │ +00003620: 2027 6164 6a6f 696e 2023 5b28 636c 2d69 'adjoin #[(cl-i │ │ │ +00003630: 7465 6d20 636c 2d6c 6973 7420 2672 6573 tem cl-list &res │ │ │ +00003640: 7420 636c 2d6b 6579 7329 2022 08c3 6bac t cl-keys) "..k. │ │ │ +00003650: 8708 ac8f 09a7 ac8b 095c 6e73 ab82 5c6e .........\ns..\n │ │ │ +00003660: 8709 5c6e 4287 08c4 6bac 8308 ac8b 095c ..\nB...k......\ │ │ │ +00003670: 6eb6 ab82 5c6e 8709 5c6e 4287 c5c6 095c n...\n..\nB....\ │ │ │ +00003680: 6e08 2487 2220 5b63 6c2d 6b65 7973 2063 n.$." [cl-keys c │ │ │ +00003690: 6c2d 6974 656d 2063 6c2d 6c69 7374 2028 l-item cl-list ( │ │ │ +000036a0: 3a74 6573 7420 6571 2920 283a 7465 7374 :test eq) (:test │ │ │ +000036b0: 2065 7175 616c 2920 6170 706c 7920 636c equal) apply cl │ │ │ +000036c0: 2d61 646a 6f69 6e5d 2035 2028 2324 202e -adjoin] 5 (#$ . │ │ │ +000036d0: 2031 3336 3935 295d 290a 2340 3137 3620 13695)]).#@176 │ │ │ +000036e0: 5375 6273 7469 7475 7465 204e 4557 2066 Substitute NEW f │ │ │ +000036f0: 6f72 204f 4c44 2065 7665 7279 7768 6572 or OLD everywher │ │ │ +00003700: 6520 696e 2054 5245 4520 286e 6f6e 2d64 e in TREE (non-d │ │ │ +00003710: 6573 7472 7563 7469 7665 6c79 292e 0a52 estructively)..R │ │ │ +00003720: 6574 7572 6e20 6120 636f 7079 206f 6620 eturn a copy of │ │ │ +00003730: 5452 4545 2077 6974 6820 616c 6c20 656c TREE with all el │ │ │ +00003740: 656d 656e 7473 2060 6571 6c27 2074 6f20 ements `eql' to │ │ │ +00003750: 4f4c 4420 7265 706c 6163 6564 2062 7920 OLD replaced by │ │ │ +00003760: 4e45 572e 0a4b 6579 776f 7264 7320 7375 NEW..Keywords su │ │ │ +00003770: 7070 6f72 7465 643a 2020 3a74 6573 7420 pported: :test │ │ │ +00003780: 3a74 6573 742d 6e6f 7420 3a6b 6579 1f0a :test-not :key.. │ │ │ +00003790: 2864 6566 616c 6961 7320 2773 7562 7374 (defalias 'subst │ │ │ +000037a0: 2023 5b28 636c 2d6e 6577 2063 6c2d 6f6c #[(cl-new cl-ol │ │ │ +000037b0: 6420 636c 2d74 7265 6520 2672 6573 7420 d cl-tree &rest │ │ │ +000037c0: 636c 2d6b 6579 7329 2022 5c6e ac88 0ba7 cl-keys) "\n.... │ │ │ +000037d0: ab8e 0ba8 ac8a c4c5 0b09 4243 085c 6e24 ..........BC.\n$ │ │ │ +000037e0: 87c6 090b 0823 8722 205b 636c 2d74 7265 .....#." [cl-tre │ │ │ +000037f0: 6520 636c 2d6e 6577 2063 6c2d 6b65 7973 e cl-new cl-keys │ │ │ +00003800: 2063 6c2d 6f6c 6420 6170 706c 7920 7375 cl-old apply su │ │ │ +00003810: 626c 6973 2063 6c2d 646f 2d73 7562 7374 blis cl-do-subst │ │ │ +00003820: 5d20 3520 2823 2420 2e20 3134 3034 3829 ] 5 (#$ . 14048) │ │ │ +00003830: 5d29 0a28 6465 6661 6c69 6173 2027 636c ]).(defalias 'cl │ │ │ +00003840: 2d64 6f2d 7375 6273 7420 235b 2863 6c2d -do-subst #[(cl- │ │ │ +00003850: 6e65 7720 636c 2d6f 6c64 2063 6c2d 7472 new cl-old cl-tr │ │ │ +00003860: 6565 2920 220c 0b61 ab82 5c6e 870c 3aab ee) "..a..\n..:. │ │ │ +00003870: a2c5 5c6e 0b0c 4023 c55c 6e0b 0c41 2319 ..\n..@#.\n..A#. │ │ │ +00003880: 8918 0c40 61ab 8909 0c41 61ab 830c aa83 ...@a....Aa..... │ │ │ +00003890: 0809 422a 870c 8722 205b 6120 6420 636c ..B*..." [a d cl │ │ │ +000038a0: 2d6e 6577 2063 6c2d 6f6c 6420 636c 2d74 -new cl-old cl-t │ │ │ +000038b0: 7265 6520 636c 2d64 6f2d 7375 6273 745d ree cl-do-subst] │ │ │ +000038c0: 2036 5d29 0a23 4036 3220 5265 7475 726e 6]).#@62 Return │ │ │ +000038d0: 2061 206e 6577 2061 6c69 7374 2063 7265 a new alist cre │ │ │ +000038e0: 6174 6564 2062 7920 6164 6469 6e67 2028 ated by adding ( │ │ │ +000038f0: 4b45 5920 2e20 5641 4c55 4529 2074 6f20 KEY . VALUE) to │ │ │ +00003900: 414c 4953 542e 1f0a 2864 6566 616c 6961 ALIST...(defalia │ │ │ +00003910: 7320 2761 636f 6e73 2023 5b28 6120 6220 s 'acons #[(a b │ │ │ +00003920: 6329 2022 5c6e 0942 0842 8722 205b 6320 c) "\n.B.B." [c │ │ │ +00003930: 6220 615d 2032 2028 2324 202e 2031 3435 b a] 2 (#$ . 145 │ │ │ +00003940: 3338 295d 290a 2864 6566 616c 6961 7320 38)]).(defalias │ │ │ +00003950: 2770 6169 726c 6973 2023 5b28 6120 6220 'pairlis #[(a b │ │ │ +00003960: 266f 7074 696f 6e61 6c20 6329 2022 c3c4 &optional c) ".. │ │ │ +00003970: 5c6e 0923 08a4 8722 205b 6320 6220 6120 \n.#..." [c b a │ │ │ +00003980: 6d61 7063 6172 2a20 636f 6e73 5d20 345d mapcar* cons] 4] │ │ │ +00003990: 290a 2864 6566 696e 652d 6572 726f 7220 ).(define-error │ │ │ +000039a0: 2763 6c2d 6173 7365 7274 696f 6e2d 6661 'cl-assertion-fa │ │ │ +000039b0: 696c 6564 2022 4173 7365 7274 696f 6e20 iled "Assertion │ │ │ +000039c0: 6661 696c 6564 2229 0a23 4031 3134 2041 failed").#@114 A │ │ │ +000039d0: 6464 2074 6f20 686f 6f6b 2076 6172 6961 dd to hook varia │ │ │ +000039e0: 626c 6520 484f 4f4b 2074 6865 2066 756e ble HOOK the fun │ │ │ +000039f0: 6374 696f 6e20 4655 4e43 2e0a 4655 4e43 ction FUNC..FUNC │ │ │ +00003a00: 2069 7320 6e6f 7420 6164 6465 6420 6966 is not added if │ │ │ +00003a10: 2069 7420 616c 7265 6164 7920 6170 7065 it already appe │ │ │ +00003a20: 6172 7320 6f6e 2074 6865 206c 6973 7420 ars on the list │ │ │ +00003a30: 7374 6f72 6564 2069 6e20 484f 4f4b 2e1f stored in HOOK.. │ │ │ +00003a40: 0a28 6465 6661 6c69 6173 2027 636c 2d61 .(defalias 'cl-a │ │ │ +00003a50: 6464 2d68 6f6f 6b20 235b 2868 6f6f 6b20 dd-hook #[(hook │ │ │ +00003a60: 6675 6e63 2026 6f70 7469 6f6e 616c 2061 func &optional a │ │ │ +00003a70: 7070 656e 6429 2022 c45c 6e21 ad82 5c6e ppend) ".\n!..\n │ │ │ +00003a80: 4a89 1b3c ab89 0b40 c561 ac83 0b43 1309 J..<...@.a...C.. │ │ │ +00003a90: 0bb6 3fad 8e5c 6e08 ab86 0b09 43a4 aa83 ..?..\n.....C... │ │ │ +00003aa0: 090b 424c 2987 2220 5b61 7070 656e 6420 ..BL)." [append │ │ │ +00003ab0: 6675 6e63 2068 6f6f 6b20 6f6c 6420 626f func hook old bo │ │ │ +00003ac0: 756e 6470 206c 616d 6264 615d 2034 2028 undp lambda] 4 ( │ │ │ +00003ad0: 2324 202e 2031 3437 3939 295d 290a 2862 #$ . 14799)]).(b │ │ │ +00003ae0: 7974 652d 636f 6465 2022 c1c2 21ac 85c3 yte-code "..!... │ │ │ +00003af0: c2c4 5c22 88c5 c6c7 5c22 88c8 c921 88ca ..\"....\"...!.. │ │ │ +00003b00: 0842 10cb ca21 ac85 ccca cd5c 2288 cd87 .B...!.....\"... │ │ │ +00003b10: 2220 5b63 7572 7265 6e74 2d6c 6f61 642d " [current-load- │ │ │ +00003b20: 6c69 7374 2066 626f 756e 6470 2061 6464 list fboundp add │ │ │ +00003b30: 2d68 6f6f 6b20 6465 6661 6c69 6173 2063 -hook defalias c │ │ │ +00003b40: 6c2d 6164 642d 686f 6f6b 206d 6170 6361 l-add-hook mapca │ │ │ +00003b50: 7220 235b 2865 6e74 7279 2920 22c1 c208 r #[(entry) "... │ │ │ +00003b60: 405c 2287 2220 5b65 6e74 7279 206d 6170 @\"." [entry map │ │ │ +00003b70: 6361 7220 235b 2866 756e 6329 2022 c209 car #[(func) ".. │ │ │ +00003b80: c308 4140 2388 c209 c408 4140 2388 09c5 ..A@#.....A@#... │ │ │ +00003b90: 4eae 87c2 09c5 c608 3823 8722 205b 656e N.......8#." [en │ │ │ +00003ba0: 7472 7920 6675 6e63 2070 7574 206c 6973 try func put lis │ │ │ +00003bb0: 702d 696e 6465 6e74 2d66 756e 6374 696f p-indent-functio │ │ │ +00003bc0: 6e20 6c69 7370 2d69 6e64 656e 742d 686f n lisp-indent-ho │ │ │ +00003bd0: 6f6b 2065 6465 6275 672d 666f 726d 2d73 ok edebug-form-s │ │ │ +00003be0: 7065 6320 325d 2035 5d5d 2033 5d20 2828 pec 2] 5]] 3] (( │ │ │ +00003bf0: 2864 6566 756e 2a20 6465 666d 6163 726f (defun* defmacro │ │ │ +00003c00: 2a29 2064 6566 756e 2920 2828 6675 6e63 *) defun) ((func │ │ │ +00003c10: 7469 6f6e 2a29 206e 696c 2028 266f 7220 tion*) nil (&or │ │ │ +00003c20: 7379 6d62 6f6c 7020 285b 266f 7074 696f symbolp ([&optio │ │ │ +00003c30: 6e61 6c20 276d 6163 726f 5d20 276c 616d nal 'macro] 'lam │ │ │ +00003c40: 6264 6120 2826 7265 7374 2073 6578 7029 bda (&rest sexp) │ │ │ +00003c50: 2026 7265 7374 2066 6f72 6d29 2929 2028 &rest form))) ( │ │ │ +00003c60: 2865 7661 6c2d 7768 656e 2920 3120 2873 (eval-when) 1 (s │ │ │ +00003c70: 6578 7020 2672 6573 7420 666f 726d 2929 exp &rest form)) │ │ │ +00003c80: 2028 2877 6865 6e20 756e 6c65 7373 2920 ((when unless) │ │ │ +00003c90: 3120 2826 7265 7374 2066 6f72 6d29 2920 1 (&rest form)) │ │ │ +00003ca0: 2828 6465 636c 6172 6529 206e 696c 2028 ((declare) nil ( │ │ │ +00003cb0: 2672 6573 7420 7365 7870 2929 2028 2874 &rest sexp)) ((t │ │ │ +00003cc0: 6865 2920 3120 2873 6578 7020 2672 6573 he) 1 (sexp &res │ │ │ +00003cd0: 7420 666f 726d 2929 2028 2863 6173 6520 t form)) ((case │ │ │ +00003ce0: 6563 6173 6520 7479 7065 6361 7365 2065 ecase typecase e │ │ │ +00003cf0: 7479 7065 6361 7365 2920 3120 2866 6f72 typecase) 1 (for │ │ │ +00003d00: 6d20 2672 6573 7420 2873 6578 7020 2672 m &rest (sexp &r │ │ │ +00003d10: 6573 7420 666f 726d 2929 2920 2828 626c est form))) ((bl │ │ │ +00003d20: 6f63 6b20 7265 7475 726e 2d66 726f 6d29 ock return-from) │ │ │ +00003d30: 2031 2028 7365 7870 2026 7265 7374 2066 1 (sexp &rest f │ │ │ +00003d40: 6f72 6d29 2920 2828 7265 7475 726e 2920 orm)) ((return) │ │ │ +00003d50: 6e69 6c20 2826 6f70 7469 6f6e 616c 2066 nil (&optional f │ │ │ +00003d60: 6f72 6d29 2920 2828 646f 2064 6f2a 2920 orm)) ((do do*) │ │ │ +00003d70: 3220 2828 2672 6573 7420 266f 7220 7379 2 ((&rest &or sy │ │ │ +00003d80: 6d62 6f6c 7020 2873 796d 626f 6c70 2026 mbolp (symbolp & │ │ │ +00003d90: 6f70 7469 6f6e 616c 2066 6f72 6d20 666f optional form fo │ │ │ +00003da0: 726d 2929 2028 666f 726d 2026 7265 7374 rm)) (form &rest │ │ │ +00003db0: 2066 6f72 6d29 2026 7265 7374 2066 6f72 form) &rest for │ │ │ +00003dc0: 6d29 2920 2828 646f 6c69 7374 2064 6f74 m)) ((dolist dot │ │ │ +00003dd0: 696d 6573 2920 3120 2828 7379 6d62 6f6c imes) 1 ((symbol │ │ │ +00003de0: 7020 666f 726d 2026 7265 7374 2066 6f72 p form &rest for │ │ │ +00003df0: 6d29 2026 7265 7374 2066 6f72 6d29 2920 m) &rest form)) │ │ │ +00003e00: 2828 646f 2d73 796d 626f 6c73 2920 3120 ((do-symbols) 1 │ │ │ +00003e10: 2828 7379 6d62 6f6c 7020 666f 726d 2026 ((symbolp form & │ │ │ +00003e20: 6f70 7469 6f6e 616c 2066 6f72 6d20 666f optional form fo │ │ │ +00003e30: 726d 2920 2672 6573 7420 666f 726d 2929 rm) &rest form)) │ │ │ +00003e40: 2028 2864 6f2d 616c 6c2d 7379 6d62 6f6c ((do-all-symbol │ │ │ +00003e50: 7329 2031 2028 2873 796d 626f 6c70 2066 s) 1 ((symbolp f │ │ │ +00003e60: 6f72 6d20 266f 7074 696f 6e61 6c20 666f orm &optional fo │ │ │ +00003e70: 726d 2920 2672 6573 7420 666f 726d 2929 rm) &rest form)) │ │ │ +00003e80: 2028 2870 7365 7471 2073 6574 6620 7073 ((psetq setf ps │ │ │ +00003e90: 6574 6629 206e 696c 2065 6465 6275 672d etf) nil edebug- │ │ │ +00003ea0: 7365 7471 2d66 6f72 6d29 2028 2870 726f setq-form) ((pro │ │ │ +00003eb0: 6776 2920 3220 2826 7265 7374 2066 6f72 gv) 2 (&rest for │ │ │ +00003ec0: 6d29 2920 2828 666c 6574 206c 6162 656c m)) ((flet label │ │ │ +00003ed0: 7320 6d61 6372 6f6c 6574 2920 3120 2828 s macrolet) 1 (( │ │ │ +00003ee0: 2672 6573 7420 2873 6578 7020 7365 7870 &rest (sexp sexp │ │ │ +00003ef0: 2026 7265 7374 2066 6f72 6d29 2920 2672 &rest form)) &r │ │ │ +00003f00: 6573 7420 666f 726d 2929 2028 2873 796d est form)) ((sym │ │ │ +00003f10: 626f 6c2d 6d61 6372 6f6c 6574 206c 6578 bol-macrolet lex │ │ │ +00003f20: 6963 616c 2d6c 6574 206c 6578 6963 616c ical-let lexical │ │ │ +00003f30: 2d6c 6574 2a29 2031 2028 2826 7265 7374 -let*) 1 ((&rest │ │ │ +00003f40: 2026 6f72 2073 796d 626f 6c70 2028 7379 &or symbolp (sy │ │ │ +00003f50: 6d62 6f6c 7020 666f 726d 2929 2026 7265 mbolp form)) &re │ │ │ +00003f60: 7374 2066 6f72 6d29 2920 2828 6d75 6c74 st form)) ((mult │ │ │ +00003f70: 6970 6c65 2d76 616c 7565 2d62 696e 6429 iple-value-bind) │ │ │ +00003f80: 2032 2028 2826 7265 7374 2073 796d 626f 2 ((&rest symbo │ │ │ +00003f90: 6c70 2920 2672 6573 7420 666f 726d 2929 lp) &rest form)) │ │ │ +00003fa0: 2028 286d 756c 7469 706c 652d 7661 6c75 ((multiple-valu │ │ │ +00003fb0: 652d 7365 7471 2920 3120 2828 2672 6573 e-setq) 1 ((&res │ │ │ +00003fc0: 7420 7379 6d62 6f6c 7029 2026 7265 7374 t symbolp) &rest │ │ │ +00003fd0: 2066 6f72 6d29 2920 2828 696e 6366 2064 form)) ((incf d │ │ │ +00003fe0: 6563 6620 7265 6d66 2070 6f70 2070 7573 ecf remf pop pus │ │ │ +00003ff0: 6820 7075 7368 6e65 7720 7368 6966 7466 h pushnew shiftf │ │ │ +00004000: 2072 6f74 6174 6566 2920 6e69 6c20 2826 rotatef) nil (& │ │ │ +00004010: 7265 7374 2066 6f72 6d29 2920 2828 6c65 rest form)) ((le │ │ │ +00004020: 7466 206c 6574 662a 2920 3120 2828 2672 tf letf*) 1 ((&r │ │ │ +00004030: 6573 7420 2826 7265 7374 2066 6f72 6d29 est (&rest form) │ │ │ +00004040: 2920 2672 6573 7420 666f 726d 2929 2028 ) &rest form)) ( │ │ │ +00004050: 2863 616c 6c66 2064 6573 7472 7563 7475 (callf destructu │ │ │ +00004060: 7269 6e67 2d62 696e 6429 2032 2028 7365 ring-bind) 2 (se │ │ │ +00004070: 7870 2066 6f72 6d20 2672 6573 7420 666f xp form &rest fo │ │ │ +00004080: 726d 2929 2028 2863 616c 6c66 3229 2033 rm)) ((callf2) 3 │ │ │ +00004090: 2028 7365 7870 2066 6f72 6d20 666f 726d (sexp form form │ │ │ +000040a0: 2026 7265 7374 2066 6f72 6d29 2920 2828 &rest form)) (( │ │ │ +000040b0: 6c6f 6f70 2920 6465 6675 6e20 2826 7265 loop) defun (&re │ │ │ +000040c0: 7374 2026 6f72 2073 796d 626f 6c70 2066 st &or symbolp f │ │ │ +000040d0: 6f72 6d29 2920 2828 6967 6e6f 7265 2d65 orm)) ((ignore-e │ │ │ +000040e0: 7272 6f72 7329 2030 2028 2672 6573 7420 rrors) 0 (&rest │ │ │ +000040f0: 666f 726d 2929 2920 7072 6f76 6964 6520 form))) provide │ │ │ +00004100: 636c 2d31 3920 636c 2d68 6163 6b65 642d cl-19 cl-hacked- │ │ │ +00004110: 666c 6167 2064 6566 6175 6c74 2d62 6f75 flag default-bou │ │ │ +00004120: 6e64 7020 7365 742d 6465 6661 756c 7420 ndp set-default │ │ │ +00004130: 6e69 6c5d 2033 290a 2864 6566 616c 6961 nil] 3).(defalia │ │ │ +00004140: 7320 2763 6c2d 6861 636b 2d62 7974 652d s 'cl-hack-byte- │ │ │ +00004150: 636f 6d70 696c 6572 2023 5b6e 696c 2022 compiler #[nil " │ │ │ +00004160: 083f ad96 c1c2 21ad 91c1 c321 ac86 c4c5 .?....!....!.... │ │ │ +00004170: c6c7 2388 c320 88c7 8910 8722 205b 636c ..#.. ....." [cl │ │ │ +00004180: 2d68 6163 6b65 642d 666c 6167 2066 626f -hacked-flag fbo │ │ │ +00004190: 756e 6470 2062 7974 652d 636f 6d70 696c undp byte-compil │ │ │ +000041a0: 652d 6669 6c65 2d66 6f72 6d20 636c 2d63 e-file-form cl-c │ │ │ +000041b0: 6f6d 7069 6c65 2d74 696d 652d 696e 6974 ompile-time-init │ │ │ +000041c0: 206c 6f61 6420 2263 6c2d 6d61 6373 2220 load "cl-macs" │ │ │ +000041d0: 6e69 6c20 745d 2034 5d29 0a28 6279 7465 nil t] 4]).(byte │ │ │ +000041e0: 2d63 6f64 6520 22c0 2088 c1c2 c05c 2288 -code ". ....\". │ │ │ +000041f0: c3c4 2188 c3c5 2188 c6c7 2187 2220 5b63 ..!...!...!." [c │ │ │ +00004200: 6c2d 6861 636b 2d62 7974 652d 636f 6d70 l-hack-byte-comp │ │ │ +00004210: 696c 6572 2061 6464 2d68 6f6f 6b20 656d iler add-hook em │ │ │ +00004220: 6163 732d 6c69 7370 2d6d 6f64 652d 686f acs-lisp-mode-ho │ │ │ +00004230: 6f6b 2070 726f 7669 6465 2063 6c20 6d69 ok provide cl mi │ │ │ +00004240: 6e69 2d63 6c20 7275 6e2d 686f 6f6b 7320 ni-cl run-hooks │ │ │ +00004250: 636c 2d6c 6f61 642d 686f 6f6b 5d20 3329 cl-load-hook] 3) │ │ │ +00004260: 0a . │ │ ├── ./usr/share/xemacs-21.4.24/lisp/cmdloop.elc │ │ │ @@ -1,757 +1,757 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3436 2032 eb 25 01:53:46 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6d64 6c6f 6f70 2e65 6c0a 3b3b 3b20 656d mdloop.el.;;; em │ │ │ -000000a0: 6163 7320 7665 7273 696f 6e20 3231 2e34 acs version 21.4 │ │ │ -000000b0: 2028 7061 7463 6820 3234 2920 2253 7461 (patch 24) "Sta │ │ │ -000000c0: 6e64 6172 6420 4322 2058 456d 6163 7320 ndard C" XEmacs │ │ │ -000000d0: 4c75 6369 642e 0a3b 3b3b 2062 7974 6563 Lucid..;;; bytec │ │ │ -000000e0: 6f6d 7020 7665 7273 696f 6e20 322e 3237 omp version 2.27 │ │ │ -000000f0: 2058 456d 6163 733b 2032 3030 302d 3039 XEmacs; 2000-09 │ │ │ -00000100: 2d31 322e 0a3b 3b3b 206f 7074 696d 697a -12..;;; optimiz │ │ │ -00000110: 6174 696f 6e20 6973 206f 6e2e 0a3b 3b3b ation is on..;;; │ │ │ -00000120: 2074 6869 7320 6669 6c65 2075 7365 7320 this file uses │ │ │ -00000130: 6f70 636f 6465 7320 7768 6963 6820 646f opcodes which do │ │ │ -00000140: 206e 6f74 2065 7869 7374 2069 6e20 456d not exist in Em │ │ │ -00000150: 6163 7320 3139 2e0a 0a28 6966 2028 616e acs 19...(if (an │ │ │ -00000160: 6420 2862 6f75 6e64 7020 2765 6d61 6373 d (boundp 'emacs │ │ │ -00000170: 2d76 6572 7369 6f6e 290a 0920 286f 7220 -version).. (or │ │ │ -00000180: 2861 6e64 2028 626f 756e 6470 2027 6570 (and (boundp 'ep │ │ │ -00000190: 6f63 683a 3a76 6572 7369 6f6e 2920 6570 och::version) ep │ │ │ -000001a0: 6f63 683a 3a76 6572 7369 6f6e 290a 0920 och::version).. │ │ │ -000001b0: 2020 2020 2873 7472 696e 672d 6c65 7373 (string-less │ │ │ -000001c0: 7020 656d 6163 732d 7665 7273 696f 6e20 p emacs-version │ │ │ -000001d0: 2232 3022 2929 290a 2020 2020 2865 7272 "20"))). (err │ │ │ -000001e0: 6f72 2022 6063 6d64 6c6f 6f70 2e65 6c27 or "`cmdloop.el' │ │ │ -000001f0: 2077 6173 2063 6f6d 7069 6c65 6420 666f was compiled fo │ │ │ -00000200: 7220 456d 6163 7320 3230 2229 290a 0a28 r Emacs 20"))..( │ │ │ -00000210: 6f72 2028 626f 756e 6470 2027 6375 7272 or (boundp 'curr │ │ │ -00000220: 656e 742d 6c6f 6164 2d6c 6973 7429 2028 ent-load-list) ( │ │ │ -00000230: 7365 7471 2063 7572 7265 6e74 2d6c 6f61 setq current-loa │ │ │ -00000240: 642d 6c69 7374 206e 696c 2929 0a0a 0a23 d-list nil))...# │ │ │ -00000250: 4034 3620 5265 7475 726e 2074 6865 2063 @46 Return the c │ │ │ -00000260: 7572 7265 6e74 2064 6570 7468 2069 6e20 urrent depth in │ │ │ -00000270: 7265 6375 7273 6976 6520 6564 6974 732e recursive edits. │ │ │ -00000280: 1f0a 2864 6566 616c 6961 7320 2772 6563 ..(defalias 'rec │ │ │ -00000290: 7572 7369 6f6e 2d64 6570 7468 2023 5b6e ursion-depth #[n │ │ │ -000002a0: 696c 2022 08c1 205c 5c87 2220 5b63 6f6d il ".. \\." [com │ │ │ -000002b0: 6d61 6e64 2d6c 6f6f 702d 6c65 7665 6c20 mand-loop-level │ │ │ -000002c0: 6d69 6e69 6275 6666 6572 2d64 6570 7468 minibuffer-depth │ │ │ -000002d0: 5d20 3220 2823 2420 2e20 3539 3629 5d29 ] 2 (#$ . 596)]) │ │ │ -000002e0: 0a23 4033 3620 4578 6974 2061 6c6c 2072 .#@36 Exit all r │ │ │ -000002f0: 6563 7572 7369 7665 2065 6469 7469 6e67 ecursive editing │ │ │ -00000300: 206c 6576 656c 732e 1f0a 2864 6566 616c levels...(defal │ │ │ -00000310: 6961 7320 2774 6f70 2d6c 6576 656c 2023 ias 'top-level # │ │ │ -00000320: 5b6e 696c 2022 c0c1 c25c 2287 2220 5b74 [nil "...\"." [t │ │ │ -00000330: 6872 6f77 2074 6f70 2d6c 6576 656c 206e hrow top-level n │ │ │ -00000340: 696c 5d20 3320 2823 2420 2e20 3734 3229 il] 3 (#$ . 742) │ │ │ -00000350: 206e 696c 5d29 0a23 4035 3520 4578 6974 nil]).#@55 Exit │ │ │ -00000360: 2066 726f 6d20 7468 6520 696e 6e65 726d from the innerm │ │ │ -00000370: 6f73 7420 7265 6375 7273 6976 6520 6564 ost recursive ed │ │ │ -00000380: 6974 206f 7220 6d69 6e69 6275 6666 6572 it or minibuffer │ │ │ -00000390: 2e1f 0a28 6465 6661 6c69 6173 2027 6578 ...(defalias 'ex │ │ │ -000003a0: 6974 2d72 6563 7572 7369 7665 2d65 6469 it-recursive-edi │ │ │ -000003b0: 7420 235b 6e69 6c20 22c0 20c1 56ab 85c2 t #[nil ". .V... │ │ │ -000003c0: c3c4 5c22 88c5 c621 8722 205b 7265 6375 ..\"...!." [recu │ │ │ -000003d0: 7273 696f 6e2d 6465 7074 6820 3020 7468 rsion-depth 0 th │ │ │ -000003e0: 726f 7720 6578 6974 206e 696c 2065 7272 row exit nil err │ │ │ -000003f0: 6f72 2022 4e6f 2072 6563 7572 7369 7665 or "No recursive │ │ │ -00000400: 2065 6469 7420 6973 2069 6e20 7072 6f67 edit is in prog │ │ │ -00000410: 7265 7373 225d 2033 2028 2324 202e 2038 ress"] 3 (#$ . 8 │ │ │ -00000420: 3630 2920 6e69 6c5d 290a 2340 3735 2041 60) nil]).#@75 A │ │ │ -00000430: 626f 7274 2074 6865 2063 6f6d 6d61 6e64 bort the command │ │ │ -00000440: 2074 6861 7420 7265 7175 6573 7465 6420 that requested │ │ │ -00000450: 7468 6973 2072 6563 7572 7369 7665 2065 this recursive e │ │ │ -00000460: 6469 7420 6f72 206d 696e 6962 7566 6665 dit or minibuffe │ │ │ -00000470: 7220 696e 7075 742e 1f0a 2864 6566 616c r input...(defal │ │ │ -00000480: 6961 7320 2761 626f 7274 2d72 6563 7572 ias 'abort-recur │ │ │ -00000490: 7369 7665 2d65 6469 7420 235b 6e69 6c20 sive-edit #[nil │ │ │ -000004a0: 22c0 20c1 56ab 85c2 c3c4 5c22 88c5 c621 ". .V.....\"...! │ │ │ -000004b0: 8722 205b 7265 6375 7273 696f 6e2d 6465 ." [recursion-de │ │ │ -000004c0: 7074 6820 3020 7468 726f 7720 6578 6974 pth 0 throw exit │ │ │ -000004d0: 2074 2065 7272 6f72 2022 4e6f 2072 6563 t error "No rec │ │ │ -000004e0: 7572 7369 7665 2065 6469 7420 6973 2069 ursive edit is i │ │ │ -000004f0: 6e20 7072 6f67 7265 7373 225d 2033 2028 n progress"] 3 ( │ │ │ -00000500: 2324 202e 2031 3037 3129 206e 696c 5d29 #$ . 1071) nil]) │ │ │ -00000510: 0a23 4033 3235 2053 6967 6e61 6c20 6120 .#@325 Signal a │ │ │ -00000520: 6071 7569 7427 2063 6f6e 6469 7469 6f6e `quit' condition │ │ │ -00000530: 2e0a 4966 2074 6869 7320 6368 6172 6163 ..If this charac │ │ │ -00000540: 7465 7220 6973 2074 7970 6564 2077 6869 ter is typed whi │ │ │ -00000550: 6c65 206c 6973 7020 636f 6465 2069 7320 le lisp code is │ │ │ -00000560: 6578 6563 7574 696e 672c 2069 7420 7769 executing, it wi │ │ │ -00000570: 6c6c 2062 6520 7472 6561 7465 640a 2061 ll be treated. a │ │ │ -00000580: 7320 616e 2069 6e74 6572 7275 7074 2e0a s an interrupt.. │ │ │ -00000590: 4966 2074 6869 7320 6368 6172 6163 7465 If this characte │ │ │ -000005a0: 7220 6973 2074 7970 6564 2061 7420 746f r is typed at to │ │ │ -000005b0: 702d 6c65 7665 6c2c 2074 6869 7320 7369 p-level, this si │ │ │ -000005c0: 6d70 6c79 2062 6565 7073 2e0a 4966 2060 mply beeps..If ` │ │ │ -000005d0: 7a6d 6163 732d 7265 6769 6f6e 7327 2069 zmacs-regions' i │ │ │ -000005e0: 7320 7472 7565 2c20 616e 6420 7468 6520 s true, and the │ │ │ -000005f0: 7a6d 6163 7320 7265 6769 6f6e 2069 7320 zmacs region is │ │ │ -00000600: 6163 7469 7665 2069 6e20 7468 6973 2062 active in this b │ │ │ -00000610: 7566 6665 722c 0a74 6865 6e20 7468 6973 uffer,.then this │ │ │ -00000620: 206b 6579 2064 6561 6374 6976 6174 6573 key deactivates │ │ │ -00000630: 2074 6865 2072 6567 696f 6e20 7769 7468 the region with │ │ │ -00000640: 6f75 7420 6265 6570 696e 6720 6f72 2073 out beeping or s │ │ │ -00000650: 6967 6e61 6c6c 696e 672e 1f0a 2864 6566 ignalling...(def │ │ │ -00000660: 616c 6961 7320 276b 6579 626f 6172 642d alias 'keyboard- │ │ │ -00000670: 7175 6974 2023 5b6e 696c 2022 c020 3fad quit #[nil ". ?. │ │ │ -00000680: 84c1 c2c3 5c22 8722 205b 7265 6769 6f6e ....\"." [region │ │ │ -00000690: 2d61 6374 6976 652d 7020 7369 676e 616c -active-p signal │ │ │ -000006a0: 2071 7569 7420 6e69 6c5d 2033 2028 2324 quit nil] 3 (#$ │ │ │ -000006b0: 202e 2031 3330 3329 206e 696c 5d29 0a23 . 1303) nil]).# │ │ │ -000006c0: 4032 3131 2046 756e 6374 696f 6e20 746f @211 Function to │ │ │ -000006d0: 2063 616c 6c20 746f 2022 7175 6974 2220 call to "quit" │ │ │ -000006e0: 7468 6520 6375 7272 656e 7420 6275 6666 the current buff │ │ │ -000006f0: 6572 2c20 6f72 206e 696c 2069 6620 6e6f er, or nil if no │ │ │ -00000700: 6e65 2e0a 5c5b 6b65 7962 6f61 7264 2d65 ne..\[keyboard-e │ │ │ -00000710: 7363 6170 652d 7175 6974 5d20 6361 6c6c scape-quit] call │ │ │ -00000720: 7320 7468 6973 2066 756e 6374 696f 6e20 s this function │ │ │ -00000730: 7768 656e 2069 7473 206d 6f72 6520 6c6f when its more lo │ │ │ -00000740: 6361 6c20 6163 7469 6f6e 730a 2873 7563 cal actions.(suc │ │ │ -00000750: 6820 6173 2063 616e 6365 6c6c 696e 6720 h as cancelling │ │ │ -00000760: 6120 7072 6566 6978 2061 7267 756d 656e a prefix argumen │ │ │ -00000770: 742c 206d 696e 6962 7566 6665 7220 6f72 t, minibuffer or │ │ │ -00000780: 2072 6567 696f 6e29 2064 6f20 6e6f 7420 region) do not │ │ │ -00000790: 6170 706c 792e 1f0a 2864 6566 7661 7220 apply...(defvar │ │ │ -000007a0: 6275 6666 6572 2d71 7569 742d 6675 6e63 buffer-quit-func │ │ │ -000007b0: 7469 6f6e 206e 696c 2028 2324 202e 2031 tion nil (#$ . 1 │ │ │ -000007c0: 3733 3329 290a 2340 3337 3420 4578 6974 733)).#@374 Exit │ │ │ -000007d0: 2074 6865 2063 7572 7265 6e74 2022 6d6f the current "mo │ │ │ -000007e0: 6465 2220 2869 6e20 6120 6765 6e65 7261 de" (in a genera │ │ │ -000007f0: 6c69 7a65 6420 7365 6e73 6520 6f66 2074 lized sense of t │ │ │ -00000800: 6865 2077 6f72 6429 2e0a 5468 6973 2063 he word)..This c │ │ │ -00000810: 6f6d 6d61 6e64 2063 616e 2065 7869 7420 ommand can exit │ │ │ -00000820: 616e 2069 6e74 6572 6163 7469 7665 2063 an interactive c │ │ │ -00000830: 6f6d 6d61 6e64 2073 7563 6820 6173 2060 ommand such as ` │ │ │ -00000840: 7175 6572 792d 7265 706c 6163 6527 2c0a query-replace',. │ │ │ -00000850: 6361 6e20 636c 6561 7220 6f75 7420 6120 can clear out a │ │ │ -00000860: 7072 6566 6978 2061 7267 756d 656e 7420 prefix argument │ │ │ -00000870: 6f72 2061 2072 6567 696f 6e2c 0a63 616e or a region,.can │ │ │ -00000880: 2067 6574 206f 7574 206f 6620 7468 6520 get out of the │ │ │ -00000890: 6d69 6e69 6275 6666 6572 206f 7220 6f74 minibuffer or ot │ │ │ -000008a0: 6865 7220 7265 6375 7273 6976 6520 6564 her recursive ed │ │ │ -000008b0: 6974 2c0a 6361 6e63 656c 2074 6865 2075 it,.cancel the u │ │ │ -000008c0: 7365 206f 6620 7468 6520 6375 7272 656e se of the curren │ │ │ -000008d0: 7420 6275 6666 6572 2028 666f 7220 7370 t buffer (for sp │ │ │ -000008e0: 6563 6961 6c2d 7075 7270 6f73 6520 6275 ecial-purpose bu │ │ │ -000008f0: 6666 6572 7329 2c0a 6f72 2067 6f20 6261 ffers),.or go ba │ │ │ -00000900: 636b 2074 6f20 6a75 7374 206f 6e65 2077 ck to just one w │ │ │ -00000910: 696e 646f 7720 2862 7920 6465 6c65 7469 indow (by deleti │ │ │ -00000920: 6e67 2061 6c6c 2062 7574 2074 6865 2073 ng all but the s │ │ │ -00000930: 656c 6563 7465 6420 7769 6e64 6f77 292e elected window). │ │ │ -00000940: 1f0a 2864 6566 616c 6961 7320 276b 6579 ..(defalias 'key │ │ │ -00000950: 626f 6172 642d 6573 6361 7065 2d71 7569 board-escape-qui │ │ │ -00000960: 7420 235b 6e69 6c20 2209 c361 3fad b5c4 t #[nil "..a?... │ │ │ -00000970: 20c5 56ab 83c6 2087 083f ada8 c720 ab83 .V... ..?... .. │ │ │ -00000980: c820 87c9 20c5 56ab 83ca 2087 5c6e ab83 . .. .V... .\n.. │ │ │ -00000990: 5c6e 2087 cbcc 21ac 83cd 2087 cecf d070 \n ...!... ....p │ │ │ -000009a0: 215c 22ad 82d1 2087 2220 5b63 7572 7265 !\"... ." [curre │ │ │ -000009b0: 6e74 2d70 7265 6669 782d 6172 6720 6c61 nt-prefix-arg la │ │ │ -000009c0: 7374 2d63 6f6d 6d61 6e64 2062 7566 6665 st-command buffe │ │ │ -000009d0: 722d 7175 6974 2d66 756e 6374 696f 6e20 r-quit-function │ │ │ -000009e0: 6d6f 6465 2d65 7869 7465 6420 6d69 6e69 mode-exited mini │ │ │ -000009f0: 6275 6666 6572 2d64 6570 7468 2030 2061 buffer-depth 0 a │ │ │ -00000a00: 626f 7274 2d72 6563 7572 7369 7665 2d65 bort-recursive-e │ │ │ -00000a10: 6469 7420 7265 6769 6f6e 2d61 6374 6976 dit region-activ │ │ │ -00000a20: 652d 7020 7a6d 6163 732d 6465 6163 7469 e-p zmacs-deacti │ │ │ -00000a30: 7661 7465 2d72 6567 696f 6e20 7265 6375 vate-region recu │ │ │ -00000a40: 7273 696f 6e2d 6465 7074 6820 6578 6974 rsion-depth exit │ │ │ -00000a50: 2d72 6563 7572 7369 7665 2d65 6469 7420 -recursive-edit │ │ │ -00000a60: 6f6e 652d 7769 6e64 6f77 2d70 2074 2064 one-window-p t d │ │ │ -00000a70: 656c 6574 652d 6f74 6865 722d 7769 6e64 elete-other-wind │ │ │ -00000a80: 6f77 7320 7374 7269 6e67 2d6d 6174 6368 ows string-match │ │ │ -00000a90: 2022 5e20 5c5c 2a22 2062 7566 6665 722d "^ \\*" buffer- │ │ │ -00000aa0: 6e61 6d65 2062 7572 792d 6275 6666 6572 name bury-buffer │ │ │ -00000ab0: 5d20 3420 2823 2420 2e20 3139 3936 2920 ] 4 (#$ . 1996) │ │ │ -00000ac0: 6e69 6c5d 290a 2864 6566 616c 6961 7320 nil]).(defalias │ │ │ -00000ad0: 2763 616e 6365 6c2d 6d6f 6465 2d69 6e74 'cancel-mode-int │ │ │ -00000ae0: 6572 6e61 6c20 235b 286f 626a 6563 7429 ernal #[(object) │ │ │ -00000af0: 2022 c189 1087 2220 5b7a 6d61 6373 2d72 "...." [zmacs-r │ │ │ -00000b00: 6567 696f 6e2d 7374 6179 7320 745d 2032 egion-stays t] 2 │ │ │ -00000b10: 5d29 0a23 4034 3420 4f62 6a65 6374 2064 ]).#@44 Object d │ │ │ -00000b20: 6573 6372 6962 696e 6720 7468 6520 6c61 escribing the la │ │ │ -00000b30: 7374 2073 6967 6e61 6c65 6420 6572 726f st signaled erro │ │ │ -00000b40: 722e 1f0a 2864 6566 7661 7220 6c61 7374 r...(defvar last │ │ │ -00000b50: 2d65 7272 6f72 206e 696c 2028 2324 202e -error nil (#$ . │ │ │ -00000b60: 2032 3834 3029 290a 2863 7573 746f 6d2d 2840)).(custom- │ │ │ -00000b70: 6465 636c 6172 652d 7661 7269 6162 6c65 declare-variable │ │ │ -00000b80: 2027 6572 726f 7273 2d64 6561 6374 6976 'errors-deactiv │ │ │ -00000b90: 6174 652d 7265 6769 6f6e 2027 6e69 6c20 ate-region 'nil │ │ │ -00000ba0: 222a 4e6f 6e2d 6e69 6c20 6d65 616e 7320 "*Non-nil means │ │ │ -00000bb0: 7468 6174 2065 7272 6f72 7320 7769 6c6c that errors will │ │ │ -00000bc0: 2063 6175 7365 2074 6865 2072 6567 696f cause the regio │ │ │ -00000bd0: 6e20 746f 2062 6520 6465 6163 7469 7661 n to be deactiva │ │ │ -00000be0: 7465 642e 2220 3a74 7970 6520 2762 6f6f ted." :type 'boo │ │ │ -00000bf0: 6c65 616e 203a 6772 6f75 7020 2765 6469 lean :group 'edi │ │ │ -00000c00: 7469 6e67 2d62 6173 6963 7329 0a28 6465 ting-basics).(de │ │ │ -00000c10: 6661 6c69 6173 2027 636f 6d6d 616e 642d falias 'command- │ │ │ -00000c20: 6572 726f 7220 235b 2865 7272 6f72 2d6f error #[(error-o │ │ │ -00000c30: 626a 6563 7429 2022 0b1a c619 c71b 0da2 bject) "........ │ │ │ -00000c40: 1cc7 10c6 8916 2016 21c7 165c 220e 23ab ...... .!..\".#. │ │ │ -00000c50: 83c8 2088 c920 880d 1624 cac7 2188 cbc7 .. .. ...$..!... │ │ │ -00000c60: 0ccc 61ab 9ecd 0d41 4021 ab94 ce0d 4140 ..a....A@!....A@ │ │ │ -00000c70: 4755 ac8c cf0d 4140 ce48 21ab 83d0 aa9c GU....A@.H!..... │ │ │ -00000c80: d1aa 990c d261 ab83 d2aa 910c d373 ab83 .....a.......s.. │ │ │ -00000c90: d4aa 890c d561 ab83 d6aa 81d7 5c22 88d8 .....a......\".. │ │ │ -00000ca0: 0dc6 5c22 88d9 20ab 985c 6eab 8bca da21 ..\".. ..\n....! │ │ │ -00000cb0: 88db 2088 cadc 2188 cadd 0e25 5c22 88de .. ...!....%\".. │ │ │ -00000cc0: df21 882c c687 2220 5b71 7569 742d 666c .!.,.." [quit-fl │ │ │ -00000cd0: 6167 2069 6e68 6962 6974 2d71 7569 7420 ag inhibit-quit │ │ │ -00000ce0: 6f6c 642d 6465 6275 672d 6f6e 2d65 7272 old-debug-on-err │ │ │ -00000cf0: 6f72 2064 6562 7567 2d6f 6e2d 6572 726f or debug-on-erro │ │ │ -00000d00: 7220 6574 7970 6520 6572 726f 722d 6f62 r etype error-ob │ │ │ -00000d10: 6a65 6374 2074 206e 696c 207a 6d61 6373 ject t nil zmacs │ │ │ -00000d20: 2d64 6561 6374 6976 6174 652d 7265 6769 -deactivate-regi │ │ │ -00000d30: 6f6e 2064 6973 6361 7264 2d69 6e70 7574 on discard-input │ │ │ -00000d40: 206d 6573 7361 6765 2064 696e 6720 756e message ding un │ │ │ -00000d50: 6465 6669 6e65 642d 6b65 7973 7472 6f6b defined-keystrok │ │ │ -00000d60: 652d 7365 7175 656e 6365 2076 6563 746f e-sequence vecto │ │ │ -00000d70: 7270 2030 2062 7574 746f 6e2d 6576 656e rp 0 button-even │ │ │ -00000d80: 742d 7020 756e 6465 6669 6e65 642d 636c t-p undefined-cl │ │ │ -00000d90: 6963 6b20 756e 6465 6669 6e65 642d 6b65 ick undefined-ke │ │ │ -00000da0: 7920 7175 6974 2028 656e 642d 6f66 2d62 y quit (end-of-b │ │ │ -00000db0: 7566 6665 7220 6265 6769 6e6e 696e 672d uffer beginning- │ │ │ -00000dc0: 6f66 2d62 7566 6665 7229 2062 7566 6665 of-buffer) buffe │ │ │ -00000dd0: 722d 626f 756e 6420 6275 6666 6572 2d72 r-bound buffer-r │ │ │ -00000de0: 6561 642d 6f6e 6c79 2072 6561 642d 6f6e ead-only read-on │ │ │ -00000df0: 6c79 2063 6f6d 6d61 6e64 2d65 7272 6f72 ly command-error │ │ │ -00000e00: 2064 6973 706c 6179 2d65 7272 6f72 206e display-error n │ │ │ -00000e10: 6f6e 696e 7465 7261 6374 6976 6520 2242 oninteractive "B │ │ │ -00000e20: 6163 6b74 7261 6365 3a5c 6e5c 6e22 2062 acktrace:\n\n" b │ │ │ -00000e30: 6163 6b74 7261 6365 2022 5c6e 2220 2225 acktrace "\n" "% │ │ │ -00000e40: 7320 6578 6974 696e 675c 6e2e 2220 6b69 s exiting\n." ki │ │ │ -00000e50: 6c6c 2d65 6d61 6373 202d 3120 7374 616e ll-emacs -1 stan │ │ │ -00000e60: 6461 7264 2d6f 7574 7075 7420 7374 616e dard-output stan │ │ │ -00000e70: 6461 7264 2d69 6e70 7574 2065 7865 6375 dard-input execu │ │ │ -00000e80: 7469 6e67 2d6b 6264 2d6d 6163 726f 2065 ting-kbd-macro e │ │ │ -00000e90: 7272 6f72 732d 6465 6163 7469 7661 7465 rrors-deactivate │ │ │ -00000ea0: 2d72 6567 696f 6e20 6c61 7374 2d65 7272 -region last-err │ │ │ -00000eb0: 6f72 2065 6d61 6373 2d70 726f 6772 616d or emacs-program │ │ │ -00000ec0: 2d6e 616d 655d 2036 5d29 0a23 4036 3720 -name] 6]).#@67 │ │ │ -00000ed0: 5265 6469 7370 6c61 7920 7468 6520 6c61 Redisplay the la │ │ │ -00000ee0: 7374 2065 7272 6f72 2d6d 6573 7361 6765 st error-message │ │ │ -00000ef0: 2e20 2053 6565 2074 6865 2076 6172 6961 . See the varia │ │ │ -00000f00: 626c 6520 606c 6173 742d 6572 726f 7227 ble `last-error' │ │ │ -00000f10: 2e1f 0a28 6465 6661 6c69 6173 2027 6465 ...(defalias 'de │ │ │ -00000f20: 7363 7269 6265 2d6c 6173 742d 6572 726f scribe-last-erro │ │ │ -00000f30: 7220 235b 6e69 6c20 2208 ab84 c1c2 2187 r #[nil ".....!. │ │ │ -00000f40: c3c4 2187 2220 5b6c 6173 742d 6572 726f ..!." [last-erro │ │ │ -00000f50: 7220 7769 7468 2d64 6973 706c 6179 696e r with-displayin │ │ │ -00000f60: 672d 6865 6c70 2d62 7566 6665 7220 235b g-help-buffer #[ │ │ │ -00000f70: 6e69 6c20 22c2 c309 5c22 88c4 0809 5c22 nil "...\"....\" │ │ │ -00000f80: 8722 205b 6c61 7374 2d65 7272 6f72 2073 ." [last-error s │ │ │ -00000f90: 7461 6e64 6172 642d 6f75 7470 7574 2070 tandard-output p │ │ │ -00000fa0: 7269 6e63 2022 4c61 7374 2065 7272 6f72 rinc "Last error │ │ │ -00000fb0: 2077 6173 3a5c 6e22 2064 6973 706c 6179 was:\n" display │ │ │ -00000fc0: 2d65 7272 6f72 5d20 335d 206d 6573 7361 -error] 3] messa │ │ │ -00000fd0: 6765 2022 4e6f 2065 7272 6f72 2079 6574 ge "No error yet │ │ │ -00000fe0: 225d 2032 2028 2324 202e 2033 3739 3229 "] 2 (#$ . 3792) │ │ │ -00000ff0: 206e 696c 5d29 0a28 6465 6661 6c69 6173 nil]).(defalias │ │ │ -00001000: 2027 7472 756e 6361 7465 2d63 6f6d 6d61 'truncate-comma │ │ │ -00001010: 6e64 2d68 6973 746f 7279 2d66 6f72 2d67 nd-history-for-g │ │ │ -00001020: 6320 235b 6e69 6c20 22c0 203f ad84 c1c2 c #[nil ". ?.... │ │ │ -00001030: c35c 2287 2220 5b6e 6f6e 696e 7465 7261 .\"." [nonintera │ │ │ -00001040: 6374 6976 6520 656e 7175 6575 652d 6576 ctive enqueue-ev │ │ │ -00001050: 616c 2d65 7665 6e74 2023 5b28 6172 6729 al-event #[(arg) │ │ │ -00001060: 2022 c309 9b89 1aab 845c 6ec4 a188 29c3 ".......\n...). │ │ │ -00001070: 089b 891a ad83 5c6e c4a1 2987 2220 5b76 ......\n..)." [v │ │ │ -00001080: 616c 7565 7320 636f 6d6d 616e 642d 6869 alues command-hi │ │ │ -00001090: 7374 6f72 7920 7461 696c 2033 3020 6e69 story tail 30 ni │ │ │ -000010a0: 6c5d 2033 5d20 6e69 6c5d 2033 5d29 0a28 l] 3] nil] 3]).( │ │ │ -000010b0: 6279 7465 2d63 6f64 6520 22c0 c1c2 5c22 byte-code "...\" │ │ │ -000010c0: 88c3 c4c5 c623 88c3 c7c5 c823 8722 205b .....#.....#." [ │ │ │ -000010d0: 6164 642d 686f 6f6b 2070 7265 2d67 632d add-hook pre-gc- │ │ │ -000010e0: 686f 6f6b 2074 7275 6e63 6174 652d 636f hook truncate-co │ │ │ -000010f0: 6d6d 616e 642d 6869 7374 6f72 792d 666f mmand-history-fo │ │ │ -00001100: 722d 6763 2070 7574 2066 696c 652d 6572 r-gc put file-er │ │ │ -00001110: 726f 7220 6469 7370 6c61 792d 6572 726f ror display-erro │ │ │ -00001120: 7220 235b 2865 7272 6f72 2d6f 626a 6563 r #[(error-objec │ │ │ -00001130: 7420 7374 7265 616d 2920 2208 41c4 1a1b t stream) ".A... │ │ │ -00001140: c50b 4009 5c22 880b 4189 13ad 95c5 5c6e ..@.\"..A.....\n │ │ │ -00001150: ab83 c6aa 81c7 095c 2288 c50b 4009 5c22 .......\"...@.\" │ │ │ -00001160: 88c8 12aa 652a 8722 205b 6572 726f 722d ....e*." [error- │ │ │ -00001170: 6f62 6a65 6374 2073 7472 6561 6d20 6669 object stream fi │ │ │ -00001180: 7273 7420 7461 696c 2074 2070 7269 6e63 rst tail t princ │ │ │ -00001190: 2022 3a20 2220 222c 2022 206e 696c 5d20 ": " ", " nil] │ │ │ -000011a0: 335d 2075 6e64 6566 696e 6564 2d6b 6579 3] undefined-key │ │ │ -000011b0: 7374 726f 6b65 2d73 6571 7565 6e63 6520 stroke-sequence │ │ │ -000011c0: 235b 2865 7272 6f72 2d6f 626a 6563 7420 #[(error-object │ │ │ -000011d0: 7374 7265 616d 2920 22c2 c308 4140 2109 stream) "...A@!. │ │ │ -000011e0: 5c22 88c2 c4c5 2109 5c22 8722 205b 6572 \"....!.\"." [er │ │ │ -000011f0: 726f 722d 6f62 6a65 6374 2073 7472 6561 ror-object strea │ │ │ -00001200: 6d20 7072 696e 6320 6b65 792d 6465 7363 m princ key-desc │ │ │ -00001210: 7269 7074 696f 6e20 6765 7474 6578 7420 ription gettext │ │ │ -00001220: 2220 6e6f 7420 6465 6669 6e65 642e 225d " not defined."] │ │ │ -00001230: 2033 5d5d 2034 290a 2863 7573 746f 6d2d 3]] 4).(custom- │ │ │ -00001240: 6465 636c 6172 652d 7661 7269 6162 6c65 declare-variable │ │ │ -00001250: 2027 7465 6163 682d 6578 7465 6e64 6564 'teach-extended │ │ │ -00001260: 2d63 6f6d 6d61 6e64 732d 7020 2774 2022 -commands-p 't " │ │ │ -00001270: 2a49 6620 7472 7565 2c20 7468 656e 2060 *If true, then ` │ │ │ -00001280: 5c5c 5b65 7865 6375 7465 2d65 7874 656e \\[execute-exten │ │ │ -00001290: 6465 642d 636f 6d6d 616e 645d 2720 7769 ded-command]' wi │ │ │ -000012a0: 6c6c 2074 6561 6368 2079 6f75 206b 6579 ll teach you key │ │ │ -000012b0: 6269 6e64 696e 6773 2e5c 6e41 6e79 2074 bindings.\nAny t │ │ │ -000012c0: 696d 6520 796f 7520 6578 6563 7574 6520 ime you execute │ │ │ -000012d0: 6120 636f 6d6d 616e 6420 7769 7468 205c a command with \ │ │ │ -000012e0: 5c5b 6578 6563 7574 652d 6578 7465 6e64 \[execute-extend │ │ │ -000012f0: 6564 2d63 6f6d 6d61 6e64 5d20 7768 6963 ed-command] whic │ │ │ -00001300: 6820 6861 7320 615c 6e73 686f 7274 6572 h has a\nshorter │ │ │ -00001310: 206b 6579 6269 6e64 696e 672c 2079 6f75 keybinding, you │ │ │ -00001320: 2077 696c 6c20 6265 2073 686f 776e 2074 will be shown t │ │ │ -00001330: 6865 2061 6c74 6572 6e61 7465 2062 696e he alternate bin │ │ │ -00001340: 6469 6e67 2062 6566 6f72 6520 7468 655c ding before the\ │ │ │ -00001350: 6e63 6f6d 6d61 6e64 2065 7865 6375 7465 ncommand execute │ │ │ -00001360: 732e 2020 5468 6572 6520 6973 2061 2073 s. There is a s │ │ │ -00001370: 686f 7274 2070 6175 7365 2061 6674 6572 hort pause after │ │ │ -00001380: 2064 6973 706c 6179 696e 6720 7468 6520 displaying the │ │ │ -00001390: 6269 6e64 696e 672c 5c6e 6265 666f 7265 binding,\nbefore │ │ │ -000013a0: 2065 7865 6375 7469 6e67 2069 743b 2074 executing it; t │ │ │ -000013b0: 6865 206c 656e 6774 6820 6361 6e20 6265 he length can be │ │ │ -000013c0: 2063 6f6e 7472 6f6c 6c65 6420 6279 5c6e controlled by\n │ │ │ -000013d0: 6074 6561 6368 2d65 7874 656e 6465 642d `teach-extended- │ │ │ -000013e0: 636f 6d6d 616e 6473 2d74 696d 656f 7574 commands-timeout │ │ │ -000013f0: 272e 2220 3a74 7970 6520 2762 6f6f 6c65 '." :type 'boole │ │ │ -00001400: 616e 203a 6772 6f75 7020 276b 6579 626f an :group 'keybo │ │ │ -00001410: 6172 6429 0a28 6375 7374 6f6d 2d64 6563 ard).(custom-dec │ │ │ -00001420: 6c61 7265 2d76 6172 6961 626c 6520 2774 lare-variable 't │ │ │ -00001430: 6561 6368 2d65 7874 656e 6465 642d 636f each-extended-co │ │ │ -00001440: 6d6d 616e 6473 2d74 696d 656f 7574 2027 mmands-timeout ' │ │ │ -00001450: 3420 222a 486f 7720 6c6f 6e67 2074 6f20 4 "*How long to │ │ │ -00001460: 7061 7573 6520 6166 7465 7220 6469 7370 pause after disp │ │ │ -00001470: 6c61 7969 6e67 2061 206b 6579 6269 6e64 laying a keybind │ │ │ -00001480: 696e 6720 6265 666f 7265 2065 7865 6375 ing before execu │ │ │ -00001490: 7469 6e67 2e5c 6e54 6865 2076 616c 7565 ting.\nThe value │ │ │ -000014a0: 2069 7320 6d65 6173 7572 6564 2069 6e20 is measured in │ │ │ -000014b0: 7365 636f 6e64 732e 2020 5468 6973 206f seconds. This o │ │ │ -000014c0: 6e6c 7920 6170 706c 6965 7320 6966 5c6e nly applies if\n │ │ │ -000014d0: 6074 6561 6368 2d65 7874 656e 6465 642d `teach-extended- │ │ │ -000014e0: 636f 6d6d 616e 6473 2d70 2720 6973 2074 commands-p' is t │ │ │ -000014f0: 7275 652e 2220 3a74 7970 6520 276e 756d rue." :type 'num │ │ │ -00001500: 6265 7220 3a67 726f 7570 2027 6b65 7962 ber :group 'keyb │ │ │ -00001510: 6f61 7264 290a 2340 3239 3820 5265 6164 oard).#@298 Read │ │ │ -00001520: 2061 2063 6f6d 6d61 6e64 206e 616d 6520 a command name │ │ │ -00001530: 6672 6f6d 2074 6865 206d 696e 6962 7566 from the minibuf │ │ │ -00001540: 6665 7220 7573 696e 6720 2763 6f6d 706c fer using 'compl │ │ │ -00001550: 6574 696e 672d 7265 6164 272e 0a54 6865 eting-read'..The │ │ │ -00001560: 6e20 6361 6c6c 2074 6865 2073 7065 6369 n call the speci │ │ │ -00001570: 6669 6564 2063 6f6d 6d61 6e64 2075 7369 fied command usi │ │ │ -00001580: 6e67 2027 636f 6d6d 616e 642d 6578 6563 ng 'command-exec │ │ │ -00001590: 7574 6527 2061 6e64 2072 6574 7572 6e20 ute' and return │ │ │ -000015a0: 6974 730a 7265 7475 726e 2076 616c 7565 its.return value │ │ │ -000015b0: 2e20 2049 6620 7468 6520 636f 6d6d 616e . If the comman │ │ │ -000015c0: 6420 6173 6b73 2066 6f72 2061 2070 7265 d asks for a pre │ │ │ -000015d0: 6669 7820 6172 6775 6d65 6e74 2c20 7375 fix argument, su │ │ │ -000015e0: 7070 6c79 2074 6865 0a76 616c 7565 206f pply the.value o │ │ │ -000015f0: 6620 7468 6520 6375 7272 656e 7420 7261 f the current ra │ │ │ -00001600: 7720 7072 6566 6978 2061 7267 756d 656e w prefix argumen │ │ │ -00001610: 742c 206f 7220 7468 6520 7661 6c75 6520 t, or the value │ │ │ -00001620: 6f66 2050 5245 4649 582d 4152 470a 7768 of PREFIX-ARG.wh │ │ │ -00001630: 656e 2063 616c 6c65 6420 6672 6f6d 204c en called from L │ │ │ -00001640: 6973 702e 1f0a 2864 6566 616c 6961 7320 isp...(defalias │ │ │ -00001650: 2765 7865 6375 7465 2d65 7874 656e 6465 'execute-extende │ │ │ -00001660: 642d 636f 6d6d 616e 6420 235b 2870 7265 d-command #[(pre │ │ │ -00001670: 6669 782d 6172 6729 2022 0d1d c60d c761 fix-arg) ".....a │ │ │ -00001680: ab83 c8aa a30d c96b ab83 caaa 9b0d a8ab .......k........ │ │ │ -00001690: 86cb cc0d 5c22 aa91 0d3a ab8c 0d40 a8ab ....\"...:...@.. │ │ │ -000016a0: 87cb cc0d 405c 22aa 81cd 2114 2909 abca ....@\"...!.)... │ │ │ -000016b0: 74ab c7ce 0c21 0c1a 1bcf 0cd0 5c22 880b t....!......\".. │ │ │ -000016c0: adb7 08ac 92d1 20d2 2061 ab86 d320 7061 ...... . a... pa │ │ │ -000016d0: ab85 d420 88aa 83d5 2088 d6d7 21ad 9ad8 ... .... ...!... │ │ │ -000016e0: d9cb 0b41 ab83 daaa 81db 5c6e dc0b 2123 ...A......\n..!# │ │ │ -000016f0: 5c22 88d6 0e1e 2188 ddd9 212a 87cf 0cd0 \"....!...!*.... │ │ │ -00001700: 5c22 8722 205b 7a6d 6163 732d 7265 6769 \"." [zmacs-regi │ │ │ -00001710: 6f6e 2d73 7461 7973 2074 6561 6368 2d65 on-stays teach-e │ │ │ -00001720: 7874 656e 6465 642d 636f 6d6d 616e 6473 xtended-commands │ │ │ -00001730: 2d70 205f 6578 6563 7574 655f 636f 6d6d -p _execute_comm │ │ │ -00001740: 616e 645f 6e61 6d65 5f20 5f65 7865 6375 and_name_ _execu │ │ │ -00001750: 7465 5f63 6f6d 6d61 6e64 5f6b 6579 735f te_command_keys_ │ │ │ -00001760: 2074 6869 732d 636f 6d6d 616e 6420 7072 this-command pr │ │ │ -00001770: 6566 6978 2d61 7267 2072 6561 642d 636f efix-arg read-co │ │ │ -00001780: 6d6d 616e 6420 2d20 222d 204d 2d78 2022 mmand - "- M-x " │ │ │ -00001790: 2028 3429 2022 432d 7520 4d2d 7820 2220 (4) "C-u M-x " │ │ │ -000017a0: 666f 726d 6174 2022 2564 204d 2d78 2022 format "%d M-x " │ │ │ -000017b0: 2022 4d2d 7820 2220 7768 6572 652d 6973 "M-x " where-is │ │ │ -000017c0: 2d69 6e74 6572 6e61 6c20 636f 6d6d 616e -internal comman │ │ │ -000017d0: 642d 6578 6563 7574 6520 7420 7365 6c65 d-execute t sele │ │ │ -000017e0: 6374 6564 2d77 696e 646f 7720 6d69 6e69 cted-window mini │ │ │ -000017f0: 6275 6666 6572 2d77 696e 646f 7720 7a6d buffer-window zm │ │ │ -00001800: 6163 732d 7265 6769 6f6e 2d62 7566 6665 acs-region-buffe │ │ │ -00001810: 7220 7a6d 6163 732d 6465 6163 7469 7661 r zmacs-deactiva │ │ │ -00001820: 7465 2d72 6567 696f 6e20 7a6d 6163 732d te-region zmacs- │ │ │ -00001830: 7570 6461 7465 2d72 6567 696f 6e20 7369 update-region si │ │ │ -00001840: 742d 666f 7220 3120 6469 7370 6c61 792d t-for 1 display- │ │ │ -00001850: 6d65 7373 6167 6520 6e6f 2d6c 6f67 2022 message no-log " │ │ │ -00001860: 436f 6d6d 616e 6420 6025 7327 2069 7320 Command `%s' is │ │ │ -00001870: 626f 756e 6420 746f 206b 6579 733a 2025 bound to keys: % │ │ │ -00001880: 7322 2022 436f 6d6d 616e 6420 6025 7327 s" "Command `%s' │ │ │ -00001890: 2069 7320 626f 756e 6420 746f 206b 6579 is bound to key │ │ │ -000018a0: 3a20 2573 2220 736f 7274 6564 2d6b 6579 : %s" sorted-key │ │ │ -000018b0: 2d64 6573 6372 6970 7469 6f6e 7320 636c -descriptions cl │ │ │ -000018c0: 6561 722d 6d65 7373 6167 6520 7465 6163 ear-message teac │ │ │ -000018d0: 682d 6578 7465 6e64 6564 2d63 6f6d 6d61 h-extended-comma │ │ │ -000018e0: 6e64 732d 7469 6d65 6f75 745d 2037 2028 nds-timeout] 7 ( │ │ │ -000018f0: 2324 202e 2035 3430 3429 2022 5022 5d29 #$ . 5404) "P"]) │ │ │ -00001900: 0a23 4033 3332 2041 736b 2075 7365 7220 .#@332 Ask user │ │ │ -00001910: 6120 2279 206f 7220 6e22 2071 7565 7374 a "y or n" quest │ │ │ -00001920: 696f 6e2e 2020 5265 7475 726e 2074 2069 ion. Return t i │ │ │ -00001930: 6620 616e 7377 6572 2069 7320 2279 222c f answer is "y", │ │ │ -00001940: 206e 696c 2069 6620 226e 222e 0a54 616b nil if "n"..Tak │ │ │ -00001950: 6573 206f 6e65 2061 7267 756d 656e 742c es one argument, │ │ │ -00001960: 2077 6869 6368 2069 7320 7468 6520 7374 which is the st │ │ │ -00001970: 7269 6e67 2074 6f20 6469 7370 6c61 7920 ring to display │ │ │ -00001980: 746f 2061 736b 2074 6865 2071 7565 7374 to ask the quest │ │ │ -00001990: 696f 6e2e 0a49 7420 7368 6f75 6c64 2065 ion..It should e │ │ │ -000019a0: 6e64 2069 6e20 6120 7370 6163 653b 2060 nd in a space; ` │ │ │ -000019b0: 792d 6f72 2d6e 2d70 2720 6164 6473 2060 y-or-n-p' adds ` │ │ │ -000019c0: 2879 206f 7220 6e29 2027 2074 6f20 6974 (y or n) ' to it │ │ │ -000019d0: 2e0a 4e6f 2063 6f6e 6669 726d 6174 696f ..No confirmatio │ │ │ -000019e0: 6e20 6f66 2074 6865 2061 6e73 7765 7220 n of the answer │ │ │ -000019f0: 6973 2072 6571 7565 7374 6564 3b20 6120 is requested; a │ │ │ -00001a00: 7369 6e67 6c65 2063 6861 7261 6374 6572 single character │ │ │ -00001a10: 2069 7320 656e 6f75 6768 2e0a 416c 736f is enough..Also │ │ │ -00001a20: 2061 6363 6570 7473 2053 7061 6365 2074 accepts Space t │ │ │ -00001a30: 6f20 6d65 616e 2079 6573 2c20 6f72 2044 o mean yes, or D │ │ │ -00001a40: 656c 6574 6520 746f 206d 6561 6e20 6e6f elete to mean no │ │ │ -00001a50: 2e1f 0a28 6465 6661 6c69 6173 2027 792d ...(defalias 'y- │ │ │ -00001a60: 6f72 2d6e 2d70 2d6d 696e 6962 7566 2023 or-n-p-minibuf # │ │ │ -00001a70: 5b28 7072 6f6d 7074 2920 228a c61a c7c8 [(prompt) "..... │ │ │ -00001a80: 211d c70c 211c c91b 0d3b 83a6 00ca 891e !...!....;...... │ │ │ -00001a90: 231e 24cb cc5c 6e0c 0d24 88cd 0b21 13c9 #.$..\n..$...!.. │ │ │ -00001aa0: cecf 8f2a ab92 cbd0 5c6e 0c0d d10b 2125 ...*....\n....!% │ │ │ -00001ab0: 88c9 1625 d2d3 c95c 2288 d4d5 0b21 2118 ...%...\"....!!. │ │ │ -00001ac0: d60e 2608 5c22 8919 d761 ab8a cbd8 0c0d ..&.\"...a...... │ │ │ -00001ad0: 2388 c915 aacb 09d9 61ab 8acb da0c 0d23 #.......a......# │ │ │ -00001ae0: 88ca 15aa bc09 db61 ab85 db20 88aa b209 .......a... .... │ │ │ -00001af0: d361 ac85 09dc 61ab 87d2 d3c9 5c22 88aa .a....a.....\".. │ │ │ -00001b00: a1dd 0b21 ac9c cbd0 5c6e 0c0d d10b 2125 ...!....\n....!% │ │ │ -00001b10: 88de c9df 5c22 88e0 2088 5c6e 47e1 55ab ....\".. .\nG.U. │ │ │ -00001b20: 84c7 e221 122a 820d 000d 2d87 2220 5b6b ...!.*....-." [k │ │ │ -00001b30: 6579 7320 6465 6620 7072 6520 6576 656e eys def pre even │ │ │ -00001b40: 7420 7072 6f6d 7074 2079 6e20 2222 2067 t prompt yn "" g │ │ │ -00001b50: 6574 7465 7874 2022 2879 206f 7220 6e29 ettext "(y or n) │ │ │ -00001b60: 2022 206e 696c 2074 206d 6573 7361 6765 " nil t message │ │ │ -00001b70: 2022 2573 2573 2573 2220 6e65 7874 2d63 "%s%s%s" next-c │ │ │ -00001b80: 6f6d 6d61 6e64 2d65 7665 6e74 2028 6279 ommand-event (by │ │ │ -00001b90: 7465 2d63 6f64 6520 2209 ae85 c208 21c3 te-code ".....!. │ │ │ -00001ba0: 61c4 1187 2220 5b65 7665 6e74 2071 7569 a..." [event qui │ │ │ -00001bb0: 742d 666c 6167 206b 6579 2d62 696e 6469 t-flag key-bindi │ │ │ -00001bc0: 6e67 206b 6579 626f 6172 642d 7175 6974 ng keyboard-quit │ │ │ -00001bd0: 206e 696c 5d20 3229 2028 2877 726f 6e67 nil] 2) ((wrong │ │ │ -00001be0: 2d74 7970 652d 6172 6775 6d65 6e74 2074 -type-argument t │ │ │ -00001bf0: 2929 2022 2573 2573 2573 2573 2220 7369 )) "%s%s%s%s" si │ │ │ -00001c00: 6e67 6c65 2d6b 6579 2d64 6573 6372 6970 ngle-key-descrip │ │ │ -00001c10: 7469 6f6e 2073 6967 6e61 6c20 7175 6974 tion signal quit │ │ │ -00001c20: 2065 7665 6e74 732d 746f 2d6b 6579 7320 events-to-keys │ │ │ -00001c30: 7665 6374 6f72 206c 6f6f 6b75 702d 6b65 vector lookup-ke │ │ │ -00001c40: 7920 736b 6970 2022 2573 2573 4e6f 2220 y skip "%s%sNo" │ │ │ -00001c50: 6163 7420 2225 7325 7359 6573 2220 7265 act "%s%sYes" re │ │ │ -00001c60: 6365 6e74 6572 2065 7869 742d 7072 6566 center exit-pref │ │ │ -00001c70: 6978 2062 7574 746f 6e2d 7265 6c65 6173 ix button-releas │ │ │ -00001c80: 652d 6576 656e 742d 7020 6469 6e67 2079 e-event-p ding y │ │ │ -00001c90: 2d6f 722d 6e2d 7020 6469 7363 6172 642d -or-n-p discard- │ │ │ -00001ca0: 696e 7075 7420 3020 2250 6c65 6173 6520 input 0 "Please │ │ │ -00001cb0: 616e 7377 6572 2079 206f 7220 6e2e 2020 answer y or n. │ │ │ -00001cc0: 2220 696e 6869 6269 742d 7175 6974 2063 " inhibit-quit c │ │ │ -00001cd0: 7572 736f 722d 696e 2d65 6368 6f2d 6172 ursor-in-echo-ar │ │ │ -00001ce0: 6561 2071 7569 742d 666c 6167 2071 7565 ea quit-flag que │ │ │ -00001cf0: 7279 2d72 6570 6c61 6365 2d6d 6170 5d20 ry-replace-map] │ │ │ -00001d00: 3820 2823 2420 2e20 3634 3037 295d 290a 8 (#$ . 6407)]). │ │ │ -00001d10: 2340 3238 3720 4173 6b20 7573 6572 2061 #@287 Ask user a │ │ │ -00001d20: 2079 6573 2d6f 722d 6e6f 2071 7565 7374 yes-or-no quest │ │ │ -00001d30: 696f 6e2e 2020 5265 7475 726e 2074 2069 ion. Return t i │ │ │ -00001d40: 6620 616e 7377 6572 2069 7320 7965 732e f answer is yes. │ │ │ -00001d50: 0a54 616b 6573 206f 6e65 2061 7267 756d .Takes one argum │ │ │ -00001d60: 656e 742c 2077 6869 6368 2069 7320 7468 ent, which is th │ │ │ -00001d70: 6520 7374 7269 6e67 2074 6f20 6469 7370 e string to disp │ │ │ -00001d80: 6c61 7920 746f 2061 736b 2074 6865 2071 lay to ask the q │ │ │ -00001d90: 7565 7374 696f 6e2e 0a49 7420 7368 6f75 uestion..It shou │ │ │ -00001da0: 6c64 2065 6e64 2069 6e20 6120 7370 6163 ld end in a spac │ │ │ -00001db0: 653b 2060 7965 732d 6f72 2d6e 6f2d 7027 e; `yes-or-no-p' │ │ │ -00001dc0: 2061 6464 7320 6028 7965 7320 6f72 206e adds `(yes or n │ │ │ -00001dd0: 6f29 2027 2074 6f20 6974 2e0a 5468 6520 o) ' to it..The │ │ │ -00001de0: 7573 6572 206d 7573 7420 636f 6e66 6972 user must confir │ │ │ -00001df0: 6d20 7468 6520 616e 7377 6572 2077 6974 m the answer wit │ │ │ -00001e00: 6820 5245 542c 0a61 6e64 2063 616e 2065 h RET,.and can e │ │ │ -00001e10: 6469 7420 6974 2075 6e74 696c 2069 7420 dit it until it │ │ │ -00001e20: 6861 7320 6265 656e 2063 6f6e 6669 726d has been confirm │ │ │ -00001e30: 6564 2e1f 0a28 6465 6661 6c69 6173 2027 ed...(defalias ' │ │ │ -00001e40: 7965 732d 6f72 2d6e 6f2d 702d 6d69 6e69 yes-or-no-p-mini │ │ │ -00001e50: 6275 6620 235b 2870 726f 6d70 7429 2022 buf #[(prompt) " │ │ │ -00001e60: 8ac3 0821 c3c4 2150 c51a 195c 6e3b abb1 ...!..!P...\n;.. │ │ │ -00001e70: c609 c7c8 2397 8912 c3c9 2198 ab85 c889 ....#.....!..... │ │ │ -00001e80: 12aa 6a5c 6ec3 ca21 98ab 85c7 8912 aa5e ..j\n..!.......^ │ │ │ -00001e90: cbc7 cc5c 2288 cd20 88ce cf21 88d0 d121 ...\".. ...!...! │ │ │ -00001ea0: 88aa 4b5c 6e2b 8722 205b 7072 6f6d 7074 ..K\n+." [prompt │ │ │ -00001eb0: 2070 2061 6e73 2067 6574 7465 7874 2022 p ans gettext " │ │ │ -00001ec0: 2879 6573 206f 7220 6e6f 2920 2220 2222 (yes or no) " "" │ │ │ -00001ed0: 2072 6561 642d 7374 7269 6e67 206e 696c read-string nil │ │ │ -00001ee0: 2074 2022 7965 7322 2022 6e6f 2220 6469 t "yes" "no" di │ │ │ -00001ef0: 6e67 2079 6573 2d6f 722d 6e6f 2d70 2064 ng yes-or-no-p d │ │ │ -00001f00: 6973 6361 7264 2d69 6e70 7574 206d 6573 iscard-input mes │ │ │ -00001f10: 7361 6765 2022 506c 6561 7365 2061 6e73 sage "Please ans │ │ │ -00001f20: 7765 7220 7965 7320 6f72 206e 6f2e 2220 wer yes or no." │ │ │ -00001f30: 736c 6565 702d 666f 7220 325d 2035 2028 sleep-for 2] 5 ( │ │ │ -00001f40: 2324 202e 2037 3434 3629 5d29 0a23 4033 #$ . 7446)]).#@3 │ │ │ -00001f50: 3631 2041 736b 2075 7365 7220 6120 7965 61 Ask user a ye │ │ │ -00001f60: 732d 6f72 2d6e 6f20 7175 6573 7469 6f6e s-or-no question │ │ │ -00001f70: 2e20 2052 6574 7572 6e20 7420 6966 2061 . Return t if a │ │ │ -00001f80: 6e73 7765 7220 6973 2079 6573 2e0a 5468 nswer is yes..Th │ │ │ -00001f90: 6520 7175 6573 7469 6f6e 2069 7320 6173 e question is as │ │ │ -00001fa0: 6b65 6420 7769 7468 2061 2064 6961 6c6f ked with a dialo │ │ │ -00001fb0: 6720 626f 7820 6f72 2074 6865 206d 696e g box or the min │ │ │ -00001fc0: 6962 7566 6665 722c 2061 7320 6170 7072 ibuffer, as appr │ │ │ -00001fd0: 6f70 7269 6174 652e 0a54 616b 6573 206f opriate..Takes o │ │ │ -00001fe0: 6e65 2061 7267 756d 656e 742c 2077 6869 ne argument, whi │ │ │ -00001ff0: 6368 2069 7320 7468 6520 7374 7269 6e67 ch is the string │ │ │ -00002000: 2074 6f20 6469 7370 6c61 7920 746f 2061 to display to a │ │ │ -00002010: 736b 2074 6865 2071 7565 7374 696f 6e2e sk the question. │ │ │ -00002020: 0a49 7420 7368 6f75 6c64 2065 6e64 2069 .It should end i │ │ │ -00002030: 6e20 6120 7370 6163 653b 2060 7965 732d n a space; `yes- │ │ │ -00002040: 6f72 2d6e 6f2d 7027 2061 6464 7320 6028 or-no-p' adds `( │ │ │ -00002050: 7965 7320 6f72 206e 6f29 2027 2074 6f20 yes or no) ' to │ │ │ -00002060: 6974 2e0a 5468 6520 7573 6572 206d 7573 it..The user mus │ │ │ -00002070: 7420 636f 6e66 6972 6d20 7468 6520 616e t confirm the an │ │ │ -00002080: 7377 6572 2077 6974 6820 5245 542c 0a61 swer with RET,.a │ │ │ -00002090: 6e64 2063 616e 2065 6469 7420 6974 2075 nd can edit it u │ │ │ -000020a0: 6e74 696c 2069 7420 6173 2062 6565 6e20 ntil it as been │ │ │ -000020b0: 636f 6e66 6972 6d65 642e 1f0a 2864 6566 confirmed...(def │ │ │ -000020c0: 616c 6961 7320 2779 6573 2d6f 722d 6e6f alias 'yes-or-no │ │ │ -000020d0: 2d70 2023 5b28 7072 6f6d 7074 2920 22c1 -p #[(prompt) ". │ │ │ -000020e0: 20ab 84c2 0821 87c3 0821 8722 205b 7072 ....!...!." [pr │ │ │ -000020f0: 6f6d 7074 2073 686f 756c 642d 7573 652d ompt should-use- │ │ │ -00002100: 6469 616c 6f67 2d62 6f78 2d70 2079 6573 dialog-box-p yes │ │ │ -00002110: 2d6f 722d 6e6f 2d70 2d64 6961 6c6f 672d -or-no-p-dialog- │ │ │ -00002120: 626f 7820 7965 732d 6f72 2d6e 6f2d 702d box yes-or-no-p- │ │ │ -00002130: 6d69 6e69 6275 665d 2032 2028 2324 202e minibuf] 2 (#$ . │ │ │ -00002140: 2038 3031 3929 5d29 0a23 4034 3037 2041 8019)]).#@407 A │ │ │ -00002150: 736b 2075 7365 7220 6120 2279 206f 7220 sk user a "y or │ │ │ -00002160: 6e22 2071 7565 7374 696f 6e2e 2020 5265 n" question. Re │ │ │ -00002170: 7475 726e 2074 2069 6620 616e 7377 6572 turn t if answer │ │ │ -00002180: 2069 7320 2279 222c 206e 696c 2069 6620 is "y", nil if │ │ │ -00002190: 226e 222e 0a54 616b 6573 206f 6e65 2061 "n"..Takes one a │ │ │ -000021a0: 7267 756d 656e 742c 2077 6869 6368 2069 rgument, which i │ │ │ -000021b0: 7320 7468 6520 7374 7269 6e67 2074 6f20 s the string to │ │ │ -000021c0: 6469 7370 6c61 7920 746f 2061 736b 2074 display to ask t │ │ │ -000021d0: 6865 2071 7565 7374 696f 6e2e 0a54 6865 he question..The │ │ │ -000021e0: 2071 7565 7374 696f 6e20 6973 2061 736b question is ask │ │ │ -000021f0: 6564 2077 6974 6820 6120 6469 616c 6f67 ed with a dialog │ │ │ -00002200: 2062 6f78 206f 7220 7468 6520 6d69 6e69 box or the mini │ │ │ -00002210: 6275 6666 6572 2c20 6173 2061 7070 726f buffer, as appro │ │ │ -00002220: 7072 6961 7465 2e0a 4974 2073 686f 756c priate..It shoul │ │ │ -00002230: 6420 656e 6420 696e 2061 2073 7061 6365 d end in a space │ │ │ -00002240: 3b20 6079 2d6f 722d 6e2d 7027 2061 6464 ; `y-or-n-p' add │ │ │ -00002250: 7320 6028 7920 6f72 206e 2920 2720 746f s `(y or n) ' to │ │ │ -00002260: 2069 742e 0a4e 6f20 636f 6e66 6972 6d61 it..No confirma │ │ │ -00002270: 7469 6f6e 206f 6620 7468 6520 616e 7377 tion of the answ │ │ │ -00002280: 6572 2069 7320 7265 7175 6573 7465 643b er is requested; │ │ │ -00002290: 2061 2073 696e 676c 6520 6368 6172 6163 a single charac │ │ │ -000022a0: 7465 7220 6973 2065 6e6f 7567 682e 0a41 ter is enough..A │ │ │ -000022b0: 6c73 6f20 6163 6365 7074 7320 5370 6163 lso accepts Spac │ │ │ -000022c0: 6520 746f 206d 6561 6e20 7965 732c 206f e to mean yes, o │ │ │ -000022d0: 7220 4465 6c65 7465 2074 6f20 6d65 616e r Delete to mean │ │ │ -000022e0: 206e 6f2e 1f0a 2864 6566 616c 6961 7320 no...(defalias │ │ │ -000022f0: 2779 2d6f 722d 6e2d 7020 235b 2870 726f 'y-or-n-p #[(pro │ │ │ -00002300: 6d70 7429 2022 c120 ab84 c208 2187 c308 mpt) ". ....!... │ │ │ -00002310: 2187 2220 5b70 726f 6d70 7420 7368 6f75 !." [prompt shou │ │ │ -00002320: 6c64 2d75 7365 2d64 6961 6c6f 672d 626f ld-use-dialog-bo │ │ │ -00002330: 782d 7020 7965 732d 6f72 2d6e 6f2d 702d x-p yes-or-no-p- │ │ │ -00002340: 6469 616c 6f67 2d62 6f78 2079 2d6f 722d dialog-box y-or- │ │ │ -00002350: 6e2d 702d 6d69 6e69 6275 665d 2032 2028 n-p-minibuf] 2 ( │ │ │ -00002360: 2324 202e 2038 3532 3729 5d29 0a23 4033 #$ . 8527)]).#@3 │ │ │ -00002370: 3036 2052 6561 6420 6120 6368 6172 6163 06 Read a charac │ │ │ -00002380: 7465 7220 6672 6f6d 2074 6865 2063 6f6d ter from the com │ │ │ -00002390: 6d61 6e64 2069 6e70 7574 2028 6b65 7962 mand input (keyb │ │ │ -000023a0: 6f61 7264 206f 7220 6d61 6372 6f29 2e0a oard or macro).. │ │ │ -000023b0: 4966 2061 206d 6f75 7365 2063 6c69 636b If a mouse click │ │ │ -000023c0: 206f 7220 6e6f 6e2d 4153 4349 4920 6368 or non-ASCII ch │ │ │ -000023d0: 6172 6163 7465 7220 6973 2064 6574 6563 aracter is detec │ │ │ -000023e0: 7465 642c 2061 6e20 6572 726f 7220 6973 ted, an error is │ │ │ -000023f0: 0a73 6967 6e61 6c6c 6564 2e20 2054 6865 .signalled. The │ │ │ -00002400: 2063 6861 7261 6374 6572 2074 7970 6564 character typed │ │ │ -00002410: 2069 7320 7265 7475 726e 6564 2061 7320 is returned as │ │ │ -00002420: 616e 2041 5343 4949 2076 616c 7565 2e20 an ASCII value. │ │ │ -00002430: 2054 6869 730a 6973 206d 6f73 7420 6c69 This.is most li │ │ │ -00002440: 6b65 6c79 2074 6865 2077 726f 6e67 2074 kely the wrong t │ │ │ -00002450: 6869 6e67 2066 6f72 2079 6f75 2074 6f20 hing for you to │ │ │ -00002460: 6265 2075 7369 6e67 3a20 636f 6e73 6964 be using: consid │ │ │ -00002470: 6572 2075 7369 6e67 0a74 6865 2060 6e65 er using.the `ne │ │ │ -00002480: 7874 2d63 6f6d 6d61 6e64 2d65 7665 6e74 xt-command-event │ │ │ -00002490: 2720 6675 6e63 7469 6f6e 2069 6e73 7465 ' function inste │ │ │ -000024a0: 6164 2e1f 0a28 6465 6661 6c69 6173 2027 ad...(defalias ' │ │ │ -000024b0: 7265 6164 2d63 6861 7220 235b 6e69 6c20 read-char #[nil │ │ │ -000024c0: 228a c220 1908 ac8c c309 c420 5c22 ab85 ".. ....... \".. │ │ │ -000024d0: c5c6 c75c 2288 c809 21ae 90c9 0921 ab87 ...\"...!....!.. │ │ │ -000024e0: c8c2 0921 21ae 84ca cb09 5c22 cc09 2188 ...!!.....\"..!. │ │ │ -000024f0: 2a87 2220 5b69 6e68 6962 6974 2d71 7569 *." [inhibit-qui │ │ │ -00002500: 7420 6576 656e 7420 6e65 7874 2d63 6f6d t event next-com │ │ │ -00002510: 6d61 6e64 2d65 7665 6e74 2065 7665 6e74 mand-event event │ │ │ -00002520: 2d6d 6174 6368 6573 2d6b 6579 2d73 7065 -matches-key-spe │ │ │ -00002530: 6369 6669 6572 2d70 2071 7569 742d 6368 cifier-p quit-ch │ │ │ -00002540: 6172 2073 6967 6e61 6c20 7175 6974 206e ar signal quit n │ │ │ -00002550: 696c 2065 7665 6e74 2d74 6f2d 6368 6172 il event-to-char │ │ │ -00002560: 6163 7465 7220 6275 7474 6f6e 2d72 656c acter button-rel │ │ │ -00002570: 6561 7365 2d65 7665 6e74 2d70 2065 7272 ease-event-p err │ │ │ -00002580: 6f72 2022 4b65 7920 7265 6164 2068 6173 or "Key read has │ │ │ -00002590: 206e 6f20 4153 4349 4920 6571 7569 7661 no ASCII equiva │ │ │ -000025a0: 6c65 6e74 2025 5322 2064 6561 6c6c 6f63 lent %S" dealloc │ │ │ -000025b0: 6174 652d 6576 656e 745d 2033 2028 2324 ate-event] 3 (#$ │ │ │ -000025c0: 202e 2039 3037 3529 5d29 0a23 4032 3939 . 9075)]).#@299 │ │ │ -000025d0: 2052 6561 6420 6120 6368 6172 6163 7465 Read a characte │ │ │ -000025e0: 7220 6672 6f6d 2074 6865 2063 6f6d 6d61 r from the comma │ │ │ -000025f0: 6e64 2069 6e70 7574 2028 6b65 7962 6f61 nd input (keyboa │ │ │ -00002600: 7264 206f 7220 6d61 6372 6f29 2e0a 4966 rd or macro)..If │ │ │ -00002610: 2061 206d 6f75 7365 2063 6c69 636b 206f a mouse click o │ │ │ -00002620: 7220 6e6f 6e2d 4153 4349 4920 6368 6172 r non-ASCII char │ │ │ -00002630: 6163 7465 7220 6973 2064 6574 6563 7465 acter is detecte │ │ │ -00002640: 642c 2069 7420 6973 2064 6973 6361 7264 d, it is discard │ │ │ -00002650: 6564 2e0a 5468 6520 6368 6172 6163 7465 ed..The characte │ │ │ -00002660: 7220 7479 7065 6420 6973 2072 6574 7572 r typed is retur │ │ │ -00002670: 6e65 6420 6173 2061 6e20 4153 4349 4920 ned as an ASCII │ │ │ -00002680: 7661 6c75 652e 2020 5468 6973 2069 7320 value. This is │ │ │ -00002690: 6d6f 7374 206c 696b 656c 790a 7468 6520 most likely.the │ │ │ -000026a0: 7772 6f6e 6720 7468 696e 6720 666f 7220 wrong thing for │ │ │ -000026b0: 796f 7520 746f 2062 6520 7573 696e 673a you to be using: │ │ │ -000026c0: 2063 6f6e 7369 6465 7220 7573 696e 6720 consider using │ │ │ -000026d0: 7468 650a 606e 6578 742d 636f 6d6d 616e the.`next-comman │ │ │ -000026e0: 642d 6576 656e 7427 2066 756e 6374 696f d-event' functio │ │ │ -000026f0: 6e20 696e 7374 6561 642e 1f0a 2864 6566 n instead...(def │ │ │ -00002700: 616c 6961 7320 2772 6561 642d 6368 6172 alias 'read-char │ │ │ -00002710: 2d65 7863 6c75 7369 7665 2023 5b6e 696c -exclusive #[nil │ │ │ -00002720: 2022 c389 191a c420 1208 ac8c c55c 6ec6 "..... .....\n. │ │ │ -00002730: 205c 22ab 85c7 c8c3 5c22 88c9 5c6e 2111 \".....\"..\n!. │ │ │ -00002740: ca5c 6e21 8809 ab63 092a 8722 205b 696e .\n!...c.*." [in │ │ │ -00002750: 6869 6269 742d 7175 6974 2063 6820 6576 hibit-quit ch ev │ │ │ -00002760: 656e 7420 6e69 6c20 6e65 7874 2d63 6f6d ent nil next-com │ │ │ -00002770: 6d61 6e64 2d65 7665 6e74 2065 7665 6e74 mand-event event │ │ │ -00002780: 2d6d 6174 6368 6573 2d6b 6579 2d73 7065 -matches-key-spe │ │ │ -00002790: 6369 6669 6572 2d70 2071 7569 742d 6368 cifier-p quit-ch │ │ │ -000027a0: 6172 2073 6967 6e61 6c20 7175 6974 2065 ar signal quit e │ │ │ -000027b0: 7665 6e74 2d74 6f2d 6368 6172 6163 7465 vent-to-characte │ │ │ -000027c0: 7220 6465 616c 6c6f 6361 7465 2d65 7665 r deallocate-eve │ │ │ -000027d0: 6e74 5d20 3320 2823 2420 2e20 3936 3831 nt] 3 (#$ . 9681 │ │ │ -000027e0: 295d 290a 2340 3237 3020 4c69 6b65 2060 )]).#@270 Like ` │ │ │ -000027f0: 7265 6164 2d63 6861 7227 2c20 6578 6365 read-char', exce │ │ │ -00002800: 7074 2074 6861 7420 6966 2074 6865 2066 pt that if the f │ │ │ -00002810: 6972 7374 2063 6861 7261 6374 6572 2072 irst character r │ │ │ -00002820: 6561 6420 6973 2061 6e20 6f63 7461 6c0a ead is an octal. │ │ │ -00002830: 6469 6769 742c 2077 6520 7265 6164 2075 digit, we read u │ │ │ -00002840: 7020 746f 2074 776f 206d 6f72 6520 6f63 p to two more oc │ │ │ -00002850: 7461 6c20 6469 6769 7473 2061 6e64 2072 tal digits and r │ │ │ -00002860: 6574 7572 6e20 7468 6520 6368 6172 6163 eturn the charac │ │ │ -00002870: 7465 720a 7265 7072 6573 656e 7465 6420 ter.represented │ │ │ -00002880: 6279 2074 6865 206f 6374 616c 206e 756d by the octal num │ │ │ -00002890: 6265 7220 636f 6e73 6973 7469 6e67 206f ber consisting o │ │ │ -000028a0: 6620 7468 6f73 6520 6469 6769 7473 2e0a f those digits.. │ │ │ -000028b0: 4f70 7469 6f6e 616c 2061 7267 756d 656e Optional argumen │ │ │ -000028c0: 7420 5052 4f4d 5054 2073 7065 6369 6669 t PROMPT specifi │ │ │ -000028d0: 6573 2061 2073 7472 696e 6720 746f 2075 es a string to u │ │ │ -000028e0: 7365 2074 6f20 7072 6f6d 7074 2074 6865 se to prompt the │ │ │ -000028f0: 2075 7365 722e 1f0a 2864 6566 616c 6961 user...(defalia │ │ │ -00002900: 7320 2772 6561 642d 7175 6f74 6564 2d63 s 'read-quoted-c │ │ │ -00002910: 6861 7220 235b 2826 6f70 7469 6f6e 616c har #[(&optional │ │ │ -00002920: 2070 726f 6d70 7429 2022 c689 c70d ad83 prompt) "...... │ │ │ -00002930: c80d 21c7 891a 1c1d 1819 1b08 aced 0bc9 ..!............. │ │ │ -00002940: 57ab e80b c655 c7ca 1e1c 1e1d 1e1b 0dab W....U.......... │ │ │ -00002950: 88cb c5cc cd0d 5c22 5c22 88ce 2012 cf5c ......\"\".. ..\ │ │ │ -00002960: 6ec7 89d0 24ae 86d1 d2d3 5c6e 445c 2214 n...$.....\nD\". │ │ │ -00002970: 0e1b ab83 c716 1e2b d4d5 0cd6 23ab 9b09 .......+....#... │ │ │ -00002980: d75f 0cd5 5a5c 5c11 0b54 130d ab33 cbc5 ._..Z\\..T...3.. │ │ │ -00002990: ccd8 0d0c 2389 155c 2288 aa26 0bc6 56ab ....#..\"..&..V. │ │ │ -000029a0: 885c 6e16 1fd0 8910 aa1a d90c 2111 d089 .\n.........!... │ │ │ -000029b0: 10ab 13da 0921 2e06 8722 205b 646f 6e65 .....!..." [done │ │ │ -000029c0: 2063 6f64 6520 6576 656e 7420 636f 756e code event coun │ │ │ -000029d0: 7420 6368 6172 2070 726f 6d70 7420 3020 t char prompt 0 │ │ │ -000029e0: 6e69 6c20 6765 7474 6578 7420 3320 2254 nil gettext 3 "T │ │ │ -000029f0: 7970 6520 7468 6520 7370 6563 6961 6c20 ype the special │ │ │ -00002a00: 6368 6172 6163 7465 7220 796f 7520 7761 character you wa │ │ │ -00002a10: 6e74 2074 6f20 7573 652c 5c6e 6f72 2074 nt to use,\nor t │ │ │ -00002a20: 6872 6565 206f 6374 616c 2064 6967 6974 hree octal digit │ │ │ -00002a30: 7320 7265 7072 6573 656e 7469 6e67 2069 s representing i │ │ │ -00002a40: 7473 2063 6861 7261 6374 6572 2063 6f64 ts character cod │ │ │ -00002a50: 652e 2220 6469 7370 6c61 792d 6d65 7373 e." display-mess │ │ │ -00002a60: 6167 6520 666f 726d 6174 2022 2573 2d22 age format "%s-" │ │ │ -00002a70: 206e 6578 742d 636f 6d6d 616e 642d 6576 next-command-ev │ │ │ -00002a80: 656e 7420 6576 656e 742d 746f 2d63 6861 ent event-to-cha │ │ │ -00002a90: 7261 6374 6572 2074 2073 6967 6e61 6c20 racter t signal │ │ │ -00002aa0: 6572 726f 7220 226b 6579 2072 6561 6420 error "key read │ │ │ -00002ab0: 6361 6e6e 6f74 2062 6520 696e 7365 7274 cannot be insert │ │ │ -00002ac0: 6564 2069 6e20 6120 6275 6666 6572 2220 ed in a buffer" │ │ │ -00002ad0: 3c3d 203f 3020 3f37 2038 2022 2573 2025 <= ?0 ?7 8 "%s % │ │ │ -00002ae0: 6322 2063 6861 722d 696e 7420 696e 742d c" char-int int- │ │ │ -00002af0: 6368 6172 2069 6e68 6962 6974 2d71 7569 char inhibit-qui │ │ │ -00002b00: 7420 6865 6c70 2d66 6f72 6d20 6865 6c70 t help-form help │ │ │ -00002b10: 2d63 6861 7220 7175 6974 2d66 6c61 6720 -char quit-flag │ │ │ -00002b20: 756e 7265 6164 2d63 6f6d 6d61 6e64 2d65 unread-command-e │ │ │ -00002b30: 7665 6e74 5d20 3720 2823 2420 2e20 3130 vent] 7 (#$ . 10 │ │ │ -00002b40: 3231 3829 5d29 0a23 4033 3735 204d 6f6d 218)]).#@375 Mom │ │ │ -00002b50: 656e 7461 7269 6c79 2064 6973 706c 6179 entarily display │ │ │ -00002b60: 2053 5452 494e 4720 696e 2074 6865 2062 STRING in the b │ │ │ -00002b70: 7566 6665 7220 6174 2050 4f53 2e0a 4469 uffer at POS..Di │ │ │ -00002b80: 7370 6c61 7920 7265 6d61 696e 7320 756e splay remains un │ │ │ -00002b90: 7469 6c20 6e65 7874 2063 6861 7261 6374 til next charact │ │ │ -00002ba0: 6572 2069 7320 7479 7065 642e 0a49 6620 er is typed..If │ │ │ -00002bb0: 7468 6520 6368 6172 2069 7320 4558 4954 the char is EXIT │ │ │ -00002bc0: 2d43 4841 5220 286f 7074 696f 6e61 6c20 -CHAR (optional │ │ │ -00002bd0: 7468 6972 6420 6172 672c 2064 6566 6175 third arg, defau │ │ │ -00002be0: 6c74 2069 7320 5350 4329 2069 7420 6973 lt is SPC) it is │ │ │ -00002bf0: 2073 7761 6c6c 6f77 6564 3b0a 6f74 6865 swallowed;.othe │ │ │ -00002c00: 7277 6973 6520 6974 2069 7320 7468 656e rwise it is then │ │ │ -00002c10: 2061 7661 696c 6162 6c65 2061 7320 696e available as in │ │ │ -00002c20: 7075 7420 2861 7320 6120 636f 6d6d 616e put (as a comman │ │ │ -00002c30: 6420 6966 206e 6f74 6869 6e67 2065 6c73 d if nothing els │ │ │ -00002c40: 6529 2e0a 4469 7370 6c61 7920 4d45 5353 e)..Display MESS │ │ │ -00002c50: 4147 4520 286f 7074 696f 6e61 6c20 666f AGE (optional fo │ │ │ -00002c60: 7572 7468 2061 7267 2920 696e 2074 6865 urth arg) in the │ │ │ -00002c70: 2065 6368 6f20 6172 6561 2e0a 4966 204d echo area..If M │ │ │ -00002c80: 4553 5341 4745 2069 7320 6e69 6c2c 2069 ESSAGE is nil, i │ │ │ -00002c90: 6e73 7472 7563 7469 6f6e 7320 746f 2074 nstructions to t │ │ │ -00002ca0: 7970 6520 4558 4954 2d43 4841 5220 6172 ype EXIT-CHAR ar │ │ │ -00002cb0: 6520 6469 7370 6c61 7965 6420 7468 6572 e displayed ther │ │ │ -00002cc0: 652e 1f0a 2864 6566 616c 6961 7320 276d e...(defalias 'm │ │ │ -00002cd0: 6f6d 656e 7461 7279 2d73 7472 696e 672d omentary-string- │ │ │ -00002ce0: 6469 7370 6c61 7920 235b 2873 7472 696e display #[(strin │ │ │ -00002cf0: 6720 706f 7320 266f 7074 696f 6e61 6c20 g pos &optional │ │ │ -00002d00: 6578 6974 2d63 6861 7220 6d65 7373 6167 exit-char messag │ │ │ -00002d10: 6529 2022 0dac 82c6 15c7 c8c9 2009 c71c e) "........ ... │ │ │ -00002d20: 181e 181e 191e 1aca 8e8a 0b62 88c7 11cb ...........b.... │ │ │ -00002d30: cc0e 1b21 2188 6014 cd20 0c56 ab87 cecf ...!!.`.. .V.... │ │ │ -00002d40: 20d0 a521 88d1 d221 8860 0b56 ab87 0b62 ..!...!.`.V...b │ │ │ -00002d50: 88ce d221 8829 d30e 13ae 83cc d421 d50d ...!.).......!.. │ │ │ -00002d60: 215c 2288 8ad6 2029 1ad7 5c6e 210d 61ae !\"... )..\n!.a. │ │ │ -00002d70: 845c 6e89 161c 2e07 8722 205b 6e61 6d65 .\n......" [name │ │ │ -00002d80: 2062 7566 6665 722d 6669 6c65 2d6e 616d buffer-file-nam │ │ │ -00002d90: 6520 6576 656e 7420 706f 7320 696e 7365 e event pos inse │ │ │ -00002da0: 7274 2d65 6e64 2065 7869 742d 6368 6172 rt-end exit-char │ │ │ -00002db0: 203f 5c20 206e 696c 2074 2062 7566 6665 ?\ nil t buffe │ │ │ -00002dc0: 722d 6d6f 6469 6669 6564 2d70 2028 2862 r-modified-p ((b │ │ │ -00002dd0: 7974 652d 636f 6465 2022 0cab 868a 0b0c yte-code "...... │ │ │ -00002de0: 7c88 295c 6e11 c508 2187 2220 5b6d 6f64 |.)\n...!." [mod │ │ │ -00002df0: 6966 6965 6420 6275 6666 6572 2d66 696c ified buffer-fil │ │ │ -00002e00: 652d 6e61 6d65 206e 616d 6520 706f 7320 e-name name pos │ │ │ -00002e10: 696e 7365 7274 2d65 6e64 2073 6574 2d62 insert-end set-b │ │ │ -00002e20: 7566 6665 722d 6d6f 6469 6669 6564 2d70 uffer-modified-p │ │ │ -00002e30: 5d20 3229 2920 696e 7365 7274 2d62 6566 ] 2)) insert-bef │ │ │ -00002e40: 6f72 652d 6d61 726b 6572 7320 6765 7474 ore-markers gett │ │ │ -00002e50: 6578 7420 7769 6e64 6f77 2d65 6e64 2072 ext window-end r │ │ │ -00002e60: 6563 656e 7465 7220 7769 6e64 6f77 2d68 ecenter window-h │ │ │ -00002e70: 6569 6768 7420 3220 6d6f 7665 2d74 6f2d eight 2 move-to- │ │ │ -00002e80: 7769 6e64 6f77 2d6c 696e 6520 3020 6d65 window-line 0 me │ │ │ -00002e90: 7373 6167 6520 2254 7970 6520 2573 2074 ssage "Type %s t │ │ │ -00002ea0: 6f20 636f 6e74 696e 7565 2065 6469 7469 o continue editi │ │ │ -00002eb0: 6e67 2e22 2073 696e 676c 652d 6b65 792d ng." single-key- │ │ │ -00002ec0: 6465 7363 7269 7074 696f 6e20 6e65 7874 description next │ │ │ -00002ed0: 2d63 6f6d 6d61 6e64 2d65 7665 6e74 2065 -command-event e │ │ │ -00002ee0: 7665 6e74 2d74 6f2d 6368 6172 6163 7465 vent-to-characte │ │ │ -00002ef0: 7220 6d6f 6469 6669 6564 2062 7566 6665 r modified buffe │ │ │ -00002f00: 722d 756e 646f 2d6c 6973 7420 6275 6666 r-undo-list buff │ │ │ -00002f10: 6572 2d72 6561 642d 6f6e 6c79 2073 7472 er-read-only str │ │ │ -00002f20: 696e 6720 756e 7265 6164 2d63 6f6d 6d61 ing unread-comma │ │ │ -00002f30: 6e64 2d65 7665 6e74 5d20 3520 2823 2420 nd-event] 5 (#$ │ │ │ -00002f40: 2e20 3131 3038 3529 5d29 0a . 11085)]). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3132 2032 3032 310a 3b3b 3b20 :08:12 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6d64 6c6f 6f70 2e65 4/lisp/cmdloop.e │ │ │ +00000090: 6c0a 3b3b 3b20 656d 6163 7320 7665 7273 l.;;; emacs vers │ │ │ +000000a0: 696f 6e20 3231 2e34 2028 7061 7463 6820 ion 21.4 (patch │ │ │ +000000b0: 3234 2920 2253 7461 6e64 6172 6420 4322 24) "Standard C" │ │ │ +000000c0: 2058 456d 6163 7320 4c75 6369 642e 0a3b XEmacs Lucid..; │ │ │ +000000d0: 3b3b 2062 7974 6563 6f6d 7020 7665 7273 ;; bytecomp vers │ │ │ +000000e0: 696f 6e20 322e 3237 2058 456d 6163 733b ion 2.27 XEmacs; │ │ │ +000000f0: 2032 3030 302d 3039 2d31 322e 0a3b 3b3b 2000-09-12..;;; │ │ │ +00000100: 206f 7074 696d 697a 6174 696f 6e20 6973 optimization is │ │ │ +00000110: 206f 6e2e 0a3b 3b3b 2074 6869 7320 6669 on..;;; this fi │ │ │ +00000120: 6c65 2075 7365 7320 6f70 636f 6465 7320 le uses opcodes │ │ │ +00000130: 7768 6963 6820 646f 206e 6f74 2065 7869 which do not exi │ │ │ +00000140: 7374 2069 6e20 456d 6163 7320 3139 2e0a st in Emacs 19.. │ │ │ +00000150: 0a28 6966 2028 616e 6420 2862 6f75 6e64 .(if (and (bound │ │ │ +00000160: 7020 2765 6d61 6373 2d76 6572 7369 6f6e p 'emacs-version │ │ │ +00000170: 290a 0920 286f 7220 2861 6e64 2028 626f ).. (or (and (bo │ │ │ +00000180: 756e 6470 2027 6570 6f63 683a 3a76 6572 undp 'epoch::ver │ │ │ +00000190: 7369 6f6e 2920 6570 6f63 683a 3a76 6572 sion) epoch::ver │ │ │ +000001a0: 7369 6f6e 290a 0920 2020 2020 2873 7472 sion).. (str │ │ │ +000001b0: 696e 672d 6c65 7373 7020 656d 6163 732d ing-lessp emacs- │ │ │ +000001c0: 7665 7273 696f 6e20 2232 3022 2929 290a version "20"))). │ │ │ +000001d0: 2020 2020 2865 7272 6f72 2022 6063 6d64 (error "`cmd │ │ │ +000001e0: 6c6f 6f70 2e65 6c27 2077 6173 2063 6f6d loop.el' was com │ │ │ +000001f0: 7069 6c65 6420 666f 7220 456d 6163 7320 piled for Emacs │ │ │ +00000200: 3230 2229 290a 0a28 6f72 2028 626f 756e 20"))..(or (boun │ │ │ +00000210: 6470 2027 6375 7272 656e 742d 6c6f 6164 dp 'current-load │ │ │ +00000220: 2d6c 6973 7429 2028 7365 7471 2063 7572 -list) (setq cur │ │ │ +00000230: 7265 6e74 2d6c 6f61 642d 6c69 7374 206e rent-load-list n │ │ │ +00000240: 696c 2929 0a0a 0a23 4034 3620 5265 7475 il))...#@46 Retu │ │ │ +00000250: 726e 2074 6865 2063 7572 7265 6e74 2064 rn the current d │ │ │ +00000260: 6570 7468 2069 6e20 7265 6375 7273 6976 epth in recursiv │ │ │ +00000270: 6520 6564 6974 732e 1f0a 2864 6566 616c e edits...(defal │ │ │ +00000280: 6961 7320 2772 6563 7572 7369 6f6e 2d64 ias 'recursion-d │ │ │ +00000290: 6570 7468 2023 5b6e 696c 2022 08c1 205c epth #[nil ".. \ │ │ │ +000002a0: 5c87 2220 5b63 6f6d 6d61 6e64 2d6c 6f6f \." [command-loo │ │ │ +000002b0: 702d 6c65 7665 6c20 6d69 6e69 6275 6666 p-level minibuff │ │ │ +000002c0: 6572 2d64 6570 7468 5d20 3220 2823 2420 er-depth] 2 (#$ │ │ │ +000002d0: 2e20 3538 3829 5d29 0a23 4033 3620 4578 . 588)]).#@36 Ex │ │ │ +000002e0: 6974 2061 6c6c 2072 6563 7572 7369 7665 it all recursive │ │ │ +000002f0: 2065 6469 7469 6e67 206c 6576 656c 732e editing levels. │ │ │ +00000300: 1f0a 2864 6566 616c 6961 7320 2774 6f70 ..(defalias 'top │ │ │ +00000310: 2d6c 6576 656c 2023 5b6e 696c 2022 c0c1 -level #[nil ".. │ │ │ +00000320: c25c 2287 2220 5b74 6872 6f77 2074 6f70 .\"." [throw top │ │ │ +00000330: 2d6c 6576 656c 206e 696c 5d20 3320 2823 -level nil] 3 (# │ │ │ +00000340: 2420 2e20 3733 3429 206e 696c 5d29 0a23 $ . 734) nil]).# │ │ │ +00000350: 4035 3520 4578 6974 2066 726f 6d20 7468 @55 Exit from th │ │ │ +00000360: 6520 696e 6e65 726d 6f73 7420 7265 6375 e innermost recu │ │ │ +00000370: 7273 6976 6520 6564 6974 206f 7220 6d69 rsive edit or mi │ │ │ +00000380: 6e69 6275 6666 6572 2e1f 0a28 6465 6661 nibuffer...(defa │ │ │ +00000390: 6c69 6173 2027 6578 6974 2d72 6563 7572 lias 'exit-recur │ │ │ +000003a0: 7369 7665 2d65 6469 7420 235b 6e69 6c20 sive-edit #[nil │ │ │ +000003b0: 22c0 20c1 56ab 85c2 c3c4 5c22 88c5 c621 ". .V.....\"...! │ │ │ +000003c0: 8722 205b 7265 6375 7273 696f 6e2d 6465 ." [recursion-de │ │ │ +000003d0: 7074 6820 3020 7468 726f 7720 6578 6974 pth 0 throw exit │ │ │ +000003e0: 206e 696c 2065 7272 6f72 2022 4e6f 2072 nil error "No r │ │ │ +000003f0: 6563 7572 7369 7665 2065 6469 7420 6973 ecursive edit is │ │ │ +00000400: 2069 6e20 7072 6f67 7265 7373 225d 2033 in progress"] 3 │ │ │ +00000410: 2028 2324 202e 2038 3532 2920 6e69 6c5d (#$ . 852) nil] │ │ │ +00000420: 290a 2340 3735 2041 626f 7274 2074 6865 ).#@75 Abort the │ │ │ +00000430: 2063 6f6d 6d61 6e64 2074 6861 7420 7265 command that re │ │ │ +00000440: 7175 6573 7465 6420 7468 6973 2072 6563 quested this rec │ │ │ +00000450: 7572 7369 7665 2065 6469 7420 6f72 206d ursive edit or m │ │ │ +00000460: 696e 6962 7566 6665 7220 696e 7075 742e inibuffer input. │ │ │ +00000470: 1f0a 2864 6566 616c 6961 7320 2761 626f ..(defalias 'abo │ │ │ +00000480: 7274 2d72 6563 7572 7369 7665 2d65 6469 rt-recursive-edi │ │ │ +00000490: 7420 235b 6e69 6c20 22c0 20c1 56ab 85c2 t #[nil ". .V... │ │ │ +000004a0: c3c4 5c22 88c5 c621 8722 205b 7265 6375 ..\"...!." [recu │ │ │ +000004b0: 7273 696f 6e2d 6465 7074 6820 3020 7468 rsion-depth 0 th │ │ │ +000004c0: 726f 7720 6578 6974 2074 2065 7272 6f72 row exit t error │ │ │ +000004d0: 2022 4e6f 2072 6563 7572 7369 7665 2065 "No recursive e │ │ │ +000004e0: 6469 7420 6973 2069 6e20 7072 6f67 7265 dit is in progre │ │ │ +000004f0: 7373 225d 2033 2028 2324 202e 2031 3036 ss"] 3 (#$ . 106 │ │ │ +00000500: 3329 206e 696c 5d29 0a23 4033 3235 2053 3) nil]).#@325 S │ │ │ +00000510: 6967 6e61 6c20 6120 6071 7569 7427 2063 ignal a `quit' c │ │ │ +00000520: 6f6e 6469 7469 6f6e 2e0a 4966 2074 6869 ondition..If thi │ │ │ +00000530: 7320 6368 6172 6163 7465 7220 6973 2074 s character is t │ │ │ +00000540: 7970 6564 2077 6869 6c65 206c 6973 7020 yped while lisp │ │ │ +00000550: 636f 6465 2069 7320 6578 6563 7574 696e code is executin │ │ │ +00000560: 672c 2069 7420 7769 6c6c 2062 6520 7472 g, it will be tr │ │ │ +00000570: 6561 7465 640a 2061 7320 616e 2069 6e74 eated. as an int │ │ │ +00000580: 6572 7275 7074 2e0a 4966 2074 6869 7320 errupt..If this │ │ │ +00000590: 6368 6172 6163 7465 7220 6973 2074 7970 character is typ │ │ │ +000005a0: 6564 2061 7420 746f 702d 6c65 7665 6c2c ed at top-level, │ │ │ +000005b0: 2074 6869 7320 7369 6d70 6c79 2062 6565 this simply bee │ │ │ +000005c0: 7073 2e0a 4966 2060 7a6d 6163 732d 7265 ps..If `zmacs-re │ │ │ +000005d0: 6769 6f6e 7327 2069 7320 7472 7565 2c20 gions' is true, │ │ │ +000005e0: 616e 6420 7468 6520 7a6d 6163 7320 7265 and the zmacs re │ │ │ +000005f0: 6769 6f6e 2069 7320 6163 7469 7665 2069 gion is active i │ │ │ +00000600: 6e20 7468 6973 2062 7566 6665 722c 0a74 n this buffer,.t │ │ │ +00000610: 6865 6e20 7468 6973 206b 6579 2064 6561 hen this key dea │ │ │ +00000620: 6374 6976 6174 6573 2074 6865 2072 6567 ctivates the reg │ │ │ +00000630: 696f 6e20 7769 7468 6f75 7420 6265 6570 ion without beep │ │ │ +00000640: 696e 6720 6f72 2073 6967 6e61 6c6c 696e ing or signallin │ │ │ +00000650: 672e 1f0a 2864 6566 616c 6961 7320 276b g...(defalias 'k │ │ │ +00000660: 6579 626f 6172 642d 7175 6974 2023 5b6e eyboard-quit #[n │ │ │ +00000670: 696c 2022 c020 3fad 84c1 c2c3 5c22 8722 il ". ?.....\"." │ │ │ +00000680: 205b 7265 6769 6f6e 2d61 6374 6976 652d [region-active- │ │ │ +00000690: 7020 7369 676e 616c 2071 7569 7420 6e69 p signal quit ni │ │ │ +000006a0: 6c5d 2033 2028 2324 202e 2031 3239 3529 l] 3 (#$ . 1295) │ │ │ +000006b0: 206e 696c 5d29 0a23 4032 3131 2046 756e nil]).#@211 Fun │ │ │ +000006c0: 6374 696f 6e20 746f 2063 616c 6c20 746f ction to call to │ │ │ +000006d0: 2022 7175 6974 2220 7468 6520 6375 7272 "quit" the curr │ │ │ +000006e0: 656e 7420 6275 6666 6572 2c20 6f72 206e ent buffer, or n │ │ │ +000006f0: 696c 2069 6620 6e6f 6e65 2e0a 5c5b 6b65 il if none..\[ke │ │ │ +00000700: 7962 6f61 7264 2d65 7363 6170 652d 7175 yboard-escape-qu │ │ │ +00000710: 6974 5d20 6361 6c6c 7320 7468 6973 2066 it] calls this f │ │ │ +00000720: 756e 6374 696f 6e20 7768 656e 2069 7473 unction when its │ │ │ +00000730: 206d 6f72 6520 6c6f 6361 6c20 6163 7469 more local acti │ │ │ +00000740: 6f6e 730a 2873 7563 6820 6173 2063 616e ons.(such as can │ │ │ +00000750: 6365 6c6c 696e 6720 6120 7072 6566 6978 celling a prefix │ │ │ +00000760: 2061 7267 756d 656e 742c 206d 696e 6962 argument, minib │ │ │ +00000770: 7566 6665 7220 6f72 2072 6567 696f 6e29 uffer or region) │ │ │ +00000780: 2064 6f20 6e6f 7420 6170 706c 792e 1f0a do not apply... │ │ │ +00000790: 2864 6566 7661 7220 6275 6666 6572 2d71 (defvar buffer-q │ │ │ +000007a0: 7569 742d 6675 6e63 7469 6f6e 206e 696c uit-function nil │ │ │ +000007b0: 2028 2324 202e 2031 3732 3529 290a 2340 (#$ . 1725)).#@ │ │ │ +000007c0: 3337 3420 4578 6974 2074 6865 2063 7572 374 Exit the cur │ │ │ +000007d0: 7265 6e74 2022 6d6f 6465 2220 2869 6e20 rent "mode" (in │ │ │ +000007e0: 6120 6765 6e65 7261 6c69 7a65 6420 7365 a generalized se │ │ │ +000007f0: 6e73 6520 6f66 2074 6865 2077 6f72 6429 nse of the word) │ │ │ +00000800: 2e0a 5468 6973 2063 6f6d 6d61 6e64 2063 ..This command c │ │ │ +00000810: 616e 2065 7869 7420 616e 2069 6e74 6572 an exit an inter │ │ │ +00000820: 6163 7469 7665 2063 6f6d 6d61 6e64 2073 active command s │ │ │ +00000830: 7563 6820 6173 2060 7175 6572 792d 7265 uch as `query-re │ │ │ +00000840: 706c 6163 6527 2c0a 6361 6e20 636c 6561 place',.can clea │ │ │ +00000850: 7220 6f75 7420 6120 7072 6566 6978 2061 r out a prefix a │ │ │ +00000860: 7267 756d 656e 7420 6f72 2061 2072 6567 rgument or a reg │ │ │ +00000870: 696f 6e2c 0a63 616e 2067 6574 206f 7574 ion,.can get out │ │ │ +00000880: 206f 6620 7468 6520 6d69 6e69 6275 6666 of the minibuff │ │ │ +00000890: 6572 206f 7220 6f74 6865 7220 7265 6375 er or other recu │ │ │ +000008a0: 7273 6976 6520 6564 6974 2c0a 6361 6e63 rsive edit,.canc │ │ │ +000008b0: 656c 2074 6865 2075 7365 206f 6620 7468 el the use of th │ │ │ +000008c0: 6520 6375 7272 656e 7420 6275 6666 6572 e current buffer │ │ │ +000008d0: 2028 666f 7220 7370 6563 6961 6c2d 7075 (for special-pu │ │ │ +000008e0: 7270 6f73 6520 6275 6666 6572 7329 2c0a rpose buffers),. │ │ │ +000008f0: 6f72 2067 6f20 6261 636b 2074 6f20 6a75 or go back to ju │ │ │ +00000900: 7374 206f 6e65 2077 696e 646f 7720 2862 st one window (b │ │ │ +00000910: 7920 6465 6c65 7469 6e67 2061 6c6c 2062 y deleting all b │ │ │ +00000920: 7574 2074 6865 2073 656c 6563 7465 6420 ut the selected │ │ │ +00000930: 7769 6e64 6f77 292e 1f0a 2864 6566 616c window)...(defal │ │ │ +00000940: 6961 7320 276b 6579 626f 6172 642d 6573 ias 'keyboard-es │ │ │ +00000950: 6361 7065 2d71 7569 7420 235b 6e69 6c20 cape-quit #[nil │ │ │ +00000960: 2209 c361 3fad b5c4 20c5 56ab 83c6 2087 "..a?... .V... . │ │ │ +00000970: 083f ada8 c720 ab83 c820 87c9 20c5 56ab .?... ... .. .V. │ │ │ +00000980: 83ca 2087 5c6e ab83 5c6e 2087 cbcc 21ac .. .\n..\n ...!. │ │ │ +00000990: 83cd 2087 cecf d070 215c 22ad 82d1 2087 .. ....p!\"... . │ │ │ +000009a0: 2220 5b63 7572 7265 6e74 2d70 7265 6669 " [current-prefi │ │ │ +000009b0: 782d 6172 6720 6c61 7374 2d63 6f6d 6d61 x-arg last-comma │ │ │ +000009c0: 6e64 2062 7566 6665 722d 7175 6974 2d66 nd buffer-quit-f │ │ │ +000009d0: 756e 6374 696f 6e20 6d6f 6465 2d65 7869 unction mode-exi │ │ │ +000009e0: 7465 6420 6d69 6e69 6275 6666 6572 2d64 ted minibuffer-d │ │ │ +000009f0: 6570 7468 2030 2061 626f 7274 2d72 6563 epth 0 abort-rec │ │ │ +00000a00: 7572 7369 7665 2d65 6469 7420 7265 6769 ursive-edit regi │ │ │ +00000a10: 6f6e 2d61 6374 6976 652d 7020 7a6d 6163 on-active-p zmac │ │ │ +00000a20: 732d 6465 6163 7469 7661 7465 2d72 6567 s-deactivate-reg │ │ │ +00000a30: 696f 6e20 7265 6375 7273 696f 6e2d 6465 ion recursion-de │ │ │ +00000a40: 7074 6820 6578 6974 2d72 6563 7572 7369 pth exit-recursi │ │ │ +00000a50: 7665 2d65 6469 7420 6f6e 652d 7769 6e64 ve-edit one-wind │ │ │ +00000a60: 6f77 2d70 2074 2064 656c 6574 652d 6f74 ow-p t delete-ot │ │ │ +00000a70: 6865 722d 7769 6e64 6f77 7320 7374 7269 her-windows stri │ │ │ +00000a80: 6e67 2d6d 6174 6368 2022 5e20 5c5c 2a22 ng-match "^ \\*" │ │ │ +00000a90: 2062 7566 6665 722d 6e61 6d65 2062 7572 buffer-name bur │ │ │ +00000aa0: 792d 6275 6666 6572 5d20 3420 2823 2420 y-buffer] 4 (#$ │ │ │ +00000ab0: 2e20 3139 3838 2920 6e69 6c5d 290a 2864 . 1988) nil]).(d │ │ │ +00000ac0: 6566 616c 6961 7320 2763 616e 6365 6c2d efalias 'cancel- │ │ │ +00000ad0: 6d6f 6465 2d69 6e74 6572 6e61 6c20 235b mode-internal #[ │ │ │ +00000ae0: 286f 626a 6563 7429 2022 c189 1087 2220 (object) "...." │ │ │ +00000af0: 5b7a 6d61 6373 2d72 6567 696f 6e2d 7374 [zmacs-region-st │ │ │ +00000b00: 6179 7320 745d 2032 5d29 0a23 4034 3420 ays t] 2]).#@44 │ │ │ +00000b10: 4f62 6a65 6374 2064 6573 6372 6962 696e Object describin │ │ │ +00000b20: 6720 7468 6520 6c61 7374 2073 6967 6e61 g the last signa │ │ │ +00000b30: 6c65 6420 6572 726f 722e 1f0a 2864 6566 led error...(def │ │ │ +00000b40: 7661 7220 6c61 7374 2d65 7272 6f72 206e var last-error n │ │ │ +00000b50: 696c 2028 2324 202e 2032 3833 3229 290a il (#$ . 2832)). │ │ │ +00000b60: 2863 7573 746f 6d2d 6465 636c 6172 652d (custom-declare- │ │ │ +00000b70: 7661 7269 6162 6c65 2027 6572 726f 7273 variable 'errors │ │ │ +00000b80: 2d64 6561 6374 6976 6174 652d 7265 6769 -deactivate-regi │ │ │ +00000b90: 6f6e 2027 6e69 6c20 222a 4e6f 6e2d 6e69 on 'nil "*Non-ni │ │ │ +00000ba0: 6c20 6d65 616e 7320 7468 6174 2065 7272 l means that err │ │ │ +00000bb0: 6f72 7320 7769 6c6c 2063 6175 7365 2074 ors will cause t │ │ │ +00000bc0: 6865 2072 6567 696f 6e20 746f 2062 6520 he region to be │ │ │ +00000bd0: 6465 6163 7469 7661 7465 642e 2220 3a74 deactivated." :t │ │ │ +00000be0: 7970 6520 2762 6f6f 6c65 616e 203a 6772 ype 'boolean :gr │ │ │ +00000bf0: 6f75 7020 2765 6469 7469 6e67 2d62 6173 oup 'editing-bas │ │ │ +00000c00: 6963 7329 0a28 6465 6661 6c69 6173 2027 ics).(defalias ' │ │ │ +00000c10: 636f 6d6d 616e 642d 6572 726f 7220 235b command-error #[ │ │ │ +00000c20: 2865 7272 6f72 2d6f 626a 6563 7429 2022 (error-object) " │ │ │ +00000c30: 0b1a c619 c71b 0da2 1cc7 10c6 8916 2016 .............. . │ │ │ +00000c40: 21c7 165c 220e 23ab 83c8 2088 c920 880d !..\".#... .. .. │ │ │ +00000c50: 1624 cac7 2188 cbc7 0ccc 61ab 9ecd 0d41 .$..!.....a....A │ │ │ +00000c60: 4021 ab94 ce0d 4140 4755 ac8c cf0d 4140 @!....A@GU....A@ │ │ │ +00000c70: ce48 21ab 83d0 aa9c d1aa 990c d261 ab83 .H!..........a.. │ │ │ +00000c80: d2aa 910c d373 ab83 d4aa 890c d561 ab83 .....s.......a.. │ │ │ +00000c90: d6aa 81d7 5c22 88d8 0dc6 5c22 88d9 20ab ....\"....\".. . │ │ │ +00000ca0: 985c 6eab 8bca da21 88db 2088 cadc 2188 .\n....!.. ...!. │ │ │ +00000cb0: cadd 0e25 5c22 88de df21 882c c687 2220 ...%\"...!.,.." │ │ │ +00000cc0: 5b71 7569 742d 666c 6167 2069 6e68 6962 [quit-flag inhib │ │ │ +00000cd0: 6974 2d71 7569 7420 6f6c 642d 6465 6275 it-quit old-debu │ │ │ +00000ce0: 672d 6f6e 2d65 7272 6f72 2064 6562 7567 g-on-error debug │ │ │ +00000cf0: 2d6f 6e2d 6572 726f 7220 6574 7970 6520 -on-error etype │ │ │ +00000d00: 6572 726f 722d 6f62 6a65 6374 2074 206e error-object t n │ │ │ +00000d10: 696c 207a 6d61 6373 2d64 6561 6374 6976 il zmacs-deactiv │ │ │ +00000d20: 6174 652d 7265 6769 6f6e 2064 6973 6361 ate-region disca │ │ │ +00000d30: 7264 2d69 6e70 7574 206d 6573 7361 6765 rd-input message │ │ │ +00000d40: 2064 696e 6720 756e 6465 6669 6e65 642d ding undefined- │ │ │ +00000d50: 6b65 7973 7472 6f6b 652d 7365 7175 656e keystroke-sequen │ │ │ +00000d60: 6365 2076 6563 746f 7270 2030 2062 7574 ce vectorp 0 but │ │ │ +00000d70: 746f 6e2d 6576 656e 742d 7020 756e 6465 ton-event-p unde │ │ │ +00000d80: 6669 6e65 642d 636c 6963 6b20 756e 6465 fined-click unde │ │ │ +00000d90: 6669 6e65 642d 6b65 7920 7175 6974 2028 fined-key quit ( │ │ │ +00000da0: 656e 642d 6f66 2d62 7566 6665 7220 6265 end-of-buffer be │ │ │ +00000db0: 6769 6e6e 696e 672d 6f66 2d62 7566 6665 ginning-of-buffe │ │ │ +00000dc0: 7229 2062 7566 6665 722d 626f 756e 6420 r) buffer-bound │ │ │ +00000dd0: 6275 6666 6572 2d72 6561 642d 6f6e 6c79 buffer-read-only │ │ │ +00000de0: 2072 6561 642d 6f6e 6c79 2063 6f6d 6d61 read-only comma │ │ │ +00000df0: 6e64 2d65 7272 6f72 2064 6973 706c 6179 nd-error display │ │ │ +00000e00: 2d65 7272 6f72 206e 6f6e 696e 7465 7261 -error nonintera │ │ │ +00000e10: 6374 6976 6520 2242 6163 6b74 7261 6365 ctive "Backtrace │ │ │ +00000e20: 3a5c 6e5c 6e22 2062 6163 6b74 7261 6365 :\n\n" backtrace │ │ │ +00000e30: 2022 5c6e 2220 2225 7320 6578 6974 696e "\n" "%s exitin │ │ │ +00000e40: 675c 6e2e 2220 6b69 6c6c 2d65 6d61 6373 g\n." kill-emacs │ │ │ +00000e50: 202d 3120 7374 616e 6461 7264 2d6f 7574 -1 standard-out │ │ │ +00000e60: 7075 7420 7374 616e 6461 7264 2d69 6e70 put standard-inp │ │ │ +00000e70: 7574 2065 7865 6375 7469 6e67 2d6b 6264 ut executing-kbd │ │ │ +00000e80: 2d6d 6163 726f 2065 7272 6f72 732d 6465 -macro errors-de │ │ │ +00000e90: 6163 7469 7661 7465 2d72 6567 696f 6e20 activate-region │ │ │ +00000ea0: 6c61 7374 2d65 7272 6f72 2065 6d61 6373 last-error emacs │ │ │ +00000eb0: 2d70 726f 6772 616d 2d6e 616d 655d 2036 -program-name] 6 │ │ │ +00000ec0: 5d29 0a23 4036 3720 5265 6469 7370 6c61 ]).#@67 Redispla │ │ │ +00000ed0: 7920 7468 6520 6c61 7374 2065 7272 6f72 y the last error │ │ │ +00000ee0: 2d6d 6573 7361 6765 2e20 2053 6565 2074 -message. See t │ │ │ +00000ef0: 6865 2076 6172 6961 626c 6520 606c 6173 he variable `las │ │ │ +00000f00: 742d 6572 726f 7227 2e1f 0a28 6465 6661 t-error'...(defa │ │ │ +00000f10: 6c69 6173 2027 6465 7363 7269 6265 2d6c lias 'describe-l │ │ │ +00000f20: 6173 742d 6572 726f 7220 235b 6e69 6c20 ast-error #[nil │ │ │ +00000f30: 2208 ab84 c1c2 2187 c3c4 2187 2220 5b6c ".....!...!." [l │ │ │ +00000f40: 6173 742d 6572 726f 7220 7769 7468 2d64 ast-error with-d │ │ │ +00000f50: 6973 706c 6179 696e 672d 6865 6c70 2d62 isplaying-help-b │ │ │ +00000f60: 7566 6665 7220 235b 6e69 6c20 22c2 c309 uffer #[nil "... │ │ │ +00000f70: 5c22 88c4 0809 5c22 8722 205b 6c61 7374 \"....\"." [last │ │ │ +00000f80: 2d65 7272 6f72 2073 7461 6e64 6172 642d -error standard- │ │ │ +00000f90: 6f75 7470 7574 2070 7269 6e63 2022 4c61 output princ "La │ │ │ +00000fa0: 7374 2065 7272 6f72 2077 6173 3a5c 6e22 st error was:\n" │ │ │ +00000fb0: 2064 6973 706c 6179 2d65 7272 6f72 5d20 display-error] │ │ │ +00000fc0: 335d 206d 6573 7361 6765 2022 4e6f 2065 3] message "No e │ │ │ +00000fd0: 7272 6f72 2079 6574 225d 2032 2028 2324 rror yet"] 2 (#$ │ │ │ +00000fe0: 202e 2033 3738 3429 206e 696c 5d29 0a28 . 3784) nil]).( │ │ │ +00000ff0: 6465 6661 6c69 6173 2027 7472 756e 6361 defalias 'trunca │ │ │ +00001000: 7465 2d63 6f6d 6d61 6e64 2d68 6973 746f te-command-histo │ │ │ +00001010: 7279 2d66 6f72 2d67 6320 235b 6e69 6c20 ry-for-gc #[nil │ │ │ +00001020: 22c0 203f ad84 c1c2 c35c 2287 2220 5b6e ". ?.....\"." [n │ │ │ +00001030: 6f6e 696e 7465 7261 6374 6976 6520 656e oninteractive en │ │ │ +00001040: 7175 6575 652d 6576 616c 2d65 7665 6e74 queue-eval-event │ │ │ +00001050: 2023 5b28 6172 6729 2022 c309 9b89 1aab #[(arg) "...... │ │ │ +00001060: 845c 6ec4 a188 29c3 089b 891a ad83 5c6e .\n...).......\n │ │ │ +00001070: c4a1 2987 2220 5b76 616c 7565 7320 636f ..)." [values co │ │ │ +00001080: 6d6d 616e 642d 6869 7374 6f72 7920 7461 mmand-history ta │ │ │ +00001090: 696c 2033 3020 6e69 6c5d 2033 5d20 6e69 il 30 nil] 3] ni │ │ │ +000010a0: 6c5d 2033 5d29 0a28 6279 7465 2d63 6f64 l] 3]).(byte-cod │ │ │ +000010b0: 6520 22c0 c1c2 5c22 88c3 c4c5 c623 88c3 e "...\".....#.. │ │ │ +000010c0: c7c5 c823 8722 205b 6164 642d 686f 6f6b ...#." [add-hook │ │ │ +000010d0: 2070 7265 2d67 632d 686f 6f6b 2074 7275 pre-gc-hook tru │ │ │ +000010e0: 6e63 6174 652d 636f 6d6d 616e 642d 6869 ncate-command-hi │ │ │ +000010f0: 7374 6f72 792d 666f 722d 6763 2070 7574 story-for-gc put │ │ │ +00001100: 2066 696c 652d 6572 726f 7220 6469 7370 file-error disp │ │ │ +00001110: 6c61 792d 6572 726f 7220 235b 2865 7272 lay-error #[(err │ │ │ +00001120: 6f72 2d6f 626a 6563 7420 7374 7265 616d or-object stream │ │ │ +00001130: 2920 2208 41c4 1a1b c50b 4009 5c22 880b ) ".A.....@.\".. │ │ │ +00001140: 4189 13ad 95c5 5c6e ab83 c6aa 81c7 095c A.....\n.......\ │ │ │ +00001150: 2288 c50b 4009 5c22 88c8 12aa 652a 8722 "...@.\"....e*." │ │ │ +00001160: 205b 6572 726f 722d 6f62 6a65 6374 2073 [error-object s │ │ │ +00001170: 7472 6561 6d20 6669 7273 7420 7461 696c tream first tail │ │ │ +00001180: 2074 2070 7269 6e63 2022 3a20 2220 222c t princ ": " ", │ │ │ +00001190: 2022 206e 696c 5d20 335d 2075 6e64 6566 " nil] 3] undef │ │ │ +000011a0: 696e 6564 2d6b 6579 7374 726f 6b65 2d73 ined-keystroke-s │ │ │ +000011b0: 6571 7565 6e63 6520 235b 2865 7272 6f72 equence #[(error │ │ │ +000011c0: 2d6f 626a 6563 7420 7374 7265 616d 2920 -object stream) │ │ │ +000011d0: 22c2 c308 4140 2109 5c22 88c2 c4c5 2109 "...A@!.\"....!. │ │ │ +000011e0: 5c22 8722 205b 6572 726f 722d 6f62 6a65 \"." [error-obje │ │ │ +000011f0: 6374 2073 7472 6561 6d20 7072 696e 6320 ct stream princ │ │ │ +00001200: 6b65 792d 6465 7363 7269 7074 696f 6e20 key-description │ │ │ +00001210: 6765 7474 6578 7420 2220 6e6f 7420 6465 gettext " not de │ │ │ +00001220: 6669 6e65 642e 225d 2033 5d5d 2034 290a fined."] 3]] 4). │ │ │ +00001230: 2863 7573 746f 6d2d 6465 636c 6172 652d (custom-declare- │ │ │ +00001240: 7661 7269 6162 6c65 2027 7465 6163 682d variable 'teach- │ │ │ +00001250: 6578 7465 6e64 6564 2d63 6f6d 6d61 6e64 extended-command │ │ │ +00001260: 732d 7020 2774 2022 2a49 6620 7472 7565 s-p 't "*If true │ │ │ +00001270: 2c20 7468 656e 2060 5c5c 5b65 7865 6375 , then `\\[execu │ │ │ +00001280: 7465 2d65 7874 656e 6465 642d 636f 6d6d te-extended-comm │ │ │ +00001290: 616e 645d 2720 7769 6c6c 2074 6561 6368 and]' will teach │ │ │ +000012a0: 2079 6f75 206b 6579 6269 6e64 696e 6773 you keybindings │ │ │ +000012b0: 2e5c 6e41 6e79 2074 696d 6520 796f 7520 .\nAny time you │ │ │ +000012c0: 6578 6563 7574 6520 6120 636f 6d6d 616e execute a comman │ │ │ +000012d0: 6420 7769 7468 205c 5c5b 6578 6563 7574 d with \\[execut │ │ │ +000012e0: 652d 6578 7465 6e64 6564 2d63 6f6d 6d61 e-extended-comma │ │ │ +000012f0: 6e64 5d20 7768 6963 6820 6861 7320 615c nd] which has a\ │ │ │ +00001300: 6e73 686f 7274 6572 206b 6579 6269 6e64 nshorter keybind │ │ │ +00001310: 696e 672c 2079 6f75 2077 696c 6c20 6265 ing, you will be │ │ │ +00001320: 2073 686f 776e 2074 6865 2061 6c74 6572 shown the alter │ │ │ +00001330: 6e61 7465 2062 696e 6469 6e67 2062 6566 nate binding bef │ │ │ +00001340: 6f72 6520 7468 655c 6e63 6f6d 6d61 6e64 ore the\ncommand │ │ │ +00001350: 2065 7865 6375 7465 732e 2020 5468 6572 executes. Ther │ │ │ +00001360: 6520 6973 2061 2073 686f 7274 2070 6175 e is a short pau │ │ │ +00001370: 7365 2061 6674 6572 2064 6973 706c 6179 se after display │ │ │ +00001380: 696e 6720 7468 6520 6269 6e64 696e 672c ing the binding, │ │ │ +00001390: 5c6e 6265 666f 7265 2065 7865 6375 7469 \nbefore executi │ │ │ +000013a0: 6e67 2069 743b 2074 6865 206c 656e 6774 ng it; the lengt │ │ │ +000013b0: 6820 6361 6e20 6265 2063 6f6e 7472 6f6c h can be control │ │ │ +000013c0: 6c65 6420 6279 5c6e 6074 6561 6368 2d65 led by\n`teach-e │ │ │ +000013d0: 7874 656e 6465 642d 636f 6d6d 616e 6473 xtended-commands │ │ │ +000013e0: 2d74 696d 656f 7574 272e 2220 3a74 7970 -timeout'." :typ │ │ │ +000013f0: 6520 2762 6f6f 6c65 616e 203a 6772 6f75 e 'boolean :grou │ │ │ +00001400: 7020 276b 6579 626f 6172 6429 0a28 6375 p 'keyboard).(cu │ │ │ +00001410: 7374 6f6d 2d64 6563 6c61 7265 2d76 6172 stom-declare-var │ │ │ +00001420: 6961 626c 6520 2774 6561 6368 2d65 7874 iable 'teach-ext │ │ │ +00001430: 656e 6465 642d 636f 6d6d 616e 6473 2d74 ended-commands-t │ │ │ +00001440: 696d 656f 7574 2027 3420 222a 486f 7720 imeout '4 "*How │ │ │ +00001450: 6c6f 6e67 2074 6f20 7061 7573 6520 6166 long to pause af │ │ │ +00001460: 7465 7220 6469 7370 6c61 7969 6e67 2061 ter displaying a │ │ │ +00001470: 206b 6579 6269 6e64 696e 6720 6265 666f keybinding befo │ │ │ +00001480: 7265 2065 7865 6375 7469 6e67 2e5c 6e54 re executing.\nT │ │ │ +00001490: 6865 2076 616c 7565 2069 7320 6d65 6173 he value is meas │ │ │ +000014a0: 7572 6564 2069 6e20 7365 636f 6e64 732e ured in seconds. │ │ │ +000014b0: 2020 5468 6973 206f 6e6c 7920 6170 706c This only appl │ │ │ +000014c0: 6965 7320 6966 5c6e 6074 6561 6368 2d65 ies if\n`teach-e │ │ │ +000014d0: 7874 656e 6465 642d 636f 6d6d 616e 6473 xtended-commands │ │ │ +000014e0: 2d70 2720 6973 2074 7275 652e 2220 3a74 -p' is true." :t │ │ │ +000014f0: 7970 6520 276e 756d 6265 7220 3a67 726f ype 'number :gro │ │ │ +00001500: 7570 2027 6b65 7962 6f61 7264 290a 2340 up 'keyboard).#@ │ │ │ +00001510: 3239 3820 5265 6164 2061 2063 6f6d 6d61 298 Read a comma │ │ │ +00001520: 6e64 206e 616d 6520 6672 6f6d 2074 6865 nd name from the │ │ │ +00001530: 206d 696e 6962 7566 6665 7220 7573 696e minibuffer usin │ │ │ +00001540: 6720 2763 6f6d 706c 6574 696e 672d 7265 g 'completing-re │ │ │ +00001550: 6164 272e 0a54 6865 6e20 6361 6c6c 2074 ad'..Then call t │ │ │ +00001560: 6865 2073 7065 6369 6669 6564 2063 6f6d he specified com │ │ │ +00001570: 6d61 6e64 2075 7369 6e67 2027 636f 6d6d mand using 'comm │ │ │ +00001580: 616e 642d 6578 6563 7574 6527 2061 6e64 and-execute' and │ │ │ +00001590: 2072 6574 7572 6e20 6974 730a 7265 7475 return its.retu │ │ │ +000015a0: 726e 2076 616c 7565 2e20 2049 6620 7468 rn value. If th │ │ │ +000015b0: 6520 636f 6d6d 616e 6420 6173 6b73 2066 e command asks f │ │ │ +000015c0: 6f72 2061 2070 7265 6669 7820 6172 6775 or a prefix argu │ │ │ +000015d0: 6d65 6e74 2c20 7375 7070 6c79 2074 6865 ment, supply the │ │ │ +000015e0: 0a76 616c 7565 206f 6620 7468 6520 6375 .value of the cu │ │ │ +000015f0: 7272 656e 7420 7261 7720 7072 6566 6978 rrent raw prefix │ │ │ +00001600: 2061 7267 756d 656e 742c 206f 7220 7468 argument, or th │ │ │ +00001610: 6520 7661 6c75 6520 6f66 2050 5245 4649 e value of PREFI │ │ │ +00001620: 582d 4152 470a 7768 656e 2063 616c 6c65 X-ARG.when calle │ │ │ +00001630: 6420 6672 6f6d 204c 6973 702e 1f0a 2864 d from Lisp...(d │ │ │ +00001640: 6566 616c 6961 7320 2765 7865 6375 7465 efalias 'execute │ │ │ +00001650: 2d65 7874 656e 6465 642d 636f 6d6d 616e -extended-comman │ │ │ +00001660: 6420 235b 2870 7265 6669 782d 6172 6729 d #[(prefix-arg) │ │ │ +00001670: 2022 0d1d c60d c761 ab83 c8aa a30d c96b ".....a.......k │ │ │ +00001680: ab83 caaa 9b0d a8ab 86cb cc0d 5c22 aa91 ............\".. │ │ │ +00001690: 0d3a ab8c 0d40 a8ab 87cb cc0d 405c 22aa .:...@......@\". │ │ │ +000016a0: 81cd 2114 2909 abca 74ab c7ce 0c21 0c1a ..!.)...t....!.. │ │ │ +000016b0: 1bcf 0cd0 5c22 880b adb7 08ac 92d1 20d2 ....\"........ . │ │ │ +000016c0: 2061 ab86 d320 7061 ab85 d420 88aa 83d5 a... pa... .... │ │ │ +000016d0: 2088 d6d7 21ad 9ad8 d9cb 0b41 ab83 daaa ...!......A.... │ │ │ +000016e0: 81db 5c6e dc0b 2123 5c22 88d6 0e1e 2188 ..\n..!#\"....!. │ │ │ +000016f0: ddd9 212a 87cf 0cd0 5c22 8722 205b 7a6d ..!*....\"." [zm │ │ │ +00001700: 6163 732d 7265 6769 6f6e 2d73 7461 7973 acs-region-stays │ │ │ +00001710: 2074 6561 6368 2d65 7874 656e 6465 642d teach-extended- │ │ │ +00001720: 636f 6d6d 616e 6473 2d70 205f 6578 6563 commands-p _exec │ │ │ +00001730: 7574 655f 636f 6d6d 616e 645f 6e61 6d65 ute_command_name │ │ │ +00001740: 5f20 5f65 7865 6375 7465 5f63 6f6d 6d61 _ _execute_comma │ │ │ +00001750: 6e64 5f6b 6579 735f 2074 6869 732d 636f nd_keys_ this-co │ │ │ +00001760: 6d6d 616e 6420 7072 6566 6978 2d61 7267 mmand prefix-arg │ │ │ +00001770: 2072 6561 642d 636f 6d6d 616e 6420 2d20 read-command - │ │ │ +00001780: 222d 204d 2d78 2022 2028 3429 2022 432d "- M-x " (4) "C- │ │ │ +00001790: 7520 4d2d 7820 2220 666f 726d 6174 2022 u M-x " format " │ │ │ +000017a0: 2564 204d 2d78 2022 2022 4d2d 7820 2220 %d M-x " "M-x " │ │ │ +000017b0: 7768 6572 652d 6973 2d69 6e74 6572 6e61 where-is-interna │ │ │ +000017c0: 6c20 636f 6d6d 616e 642d 6578 6563 7574 l command-execut │ │ │ +000017d0: 6520 7420 7365 6c65 6374 6564 2d77 696e e t selected-win │ │ │ +000017e0: 646f 7720 6d69 6e69 6275 6666 6572 2d77 dow minibuffer-w │ │ │ +000017f0: 696e 646f 7720 7a6d 6163 732d 7265 6769 indow zmacs-regi │ │ │ +00001800: 6f6e 2d62 7566 6665 7220 7a6d 6163 732d on-buffer zmacs- │ │ │ +00001810: 6465 6163 7469 7661 7465 2d72 6567 696f deactivate-regio │ │ │ +00001820: 6e20 7a6d 6163 732d 7570 6461 7465 2d72 n zmacs-update-r │ │ │ +00001830: 6567 696f 6e20 7369 742d 666f 7220 3120 egion sit-for 1 │ │ │ +00001840: 6469 7370 6c61 792d 6d65 7373 6167 6520 display-message │ │ │ +00001850: 6e6f 2d6c 6f67 2022 436f 6d6d 616e 6420 no-log "Command │ │ │ +00001860: 6025 7327 2069 7320 626f 756e 6420 746f `%s' is bound to │ │ │ +00001870: 206b 6579 733a 2025 7322 2022 436f 6d6d keys: %s" "Comm │ │ │ +00001880: 616e 6420 6025 7327 2069 7320 626f 756e and `%s' is boun │ │ │ +00001890: 6420 746f 206b 6579 3a20 2573 2220 736f d to key: %s" so │ │ │ +000018a0: 7274 6564 2d6b 6579 2d64 6573 6372 6970 rted-key-descrip │ │ │ +000018b0: 7469 6f6e 7320 636c 6561 722d 6d65 7373 tions clear-mess │ │ │ +000018c0: 6167 6520 7465 6163 682d 6578 7465 6e64 age teach-extend │ │ │ +000018d0: 6564 2d63 6f6d 6d61 6e64 732d 7469 6d65 ed-commands-time │ │ │ +000018e0: 6f75 745d 2037 2028 2324 202e 2035 3339 out] 7 (#$ . 539 │ │ │ +000018f0: 3629 2022 5022 5d29 0a23 4033 3332 2041 6) "P"]).#@332 A │ │ │ +00001900: 736b 2075 7365 7220 6120 2279 206f 7220 sk user a "y or │ │ │ +00001910: 6e22 2071 7565 7374 696f 6e2e 2020 5265 n" question. Re │ │ │ +00001920: 7475 726e 2074 2069 6620 616e 7377 6572 turn t if answer │ │ │ +00001930: 2069 7320 2279 222c 206e 696c 2069 6620 is "y", nil if │ │ │ +00001940: 226e 222e 0a54 616b 6573 206f 6e65 2061 "n"..Takes one a │ │ │ +00001950: 7267 756d 656e 742c 2077 6869 6368 2069 rgument, which i │ │ │ +00001960: 7320 7468 6520 7374 7269 6e67 2074 6f20 s the string to │ │ │ +00001970: 6469 7370 6c61 7920 746f 2061 736b 2074 display to ask t │ │ │ +00001980: 6865 2071 7565 7374 696f 6e2e 0a49 7420 he question..It │ │ │ +00001990: 7368 6f75 6c64 2065 6e64 2069 6e20 6120 should end in a │ │ │ +000019a0: 7370 6163 653b 2060 792d 6f72 2d6e 2d70 space; `y-or-n-p │ │ │ +000019b0: 2720 6164 6473 2060 2879 206f 7220 6e29 ' adds `(y or n) │ │ │ +000019c0: 2027 2074 6f20 6974 2e0a 4e6f 2063 6f6e ' to it..No con │ │ │ +000019d0: 6669 726d 6174 696f 6e20 6f66 2074 6865 firmation of the │ │ │ +000019e0: 2061 6e73 7765 7220 6973 2072 6571 7565 answer is reque │ │ │ +000019f0: 7374 6564 3b20 6120 7369 6e67 6c65 2063 sted; a single c │ │ │ +00001a00: 6861 7261 6374 6572 2069 7320 656e 6f75 haracter is enou │ │ │ +00001a10: 6768 2e0a 416c 736f 2061 6363 6570 7473 gh..Also accepts │ │ │ +00001a20: 2053 7061 6365 2074 6f20 6d65 616e 2079 Space to mean y │ │ │ +00001a30: 6573 2c20 6f72 2044 656c 6574 6520 746f es, or Delete to │ │ │ +00001a40: 206d 6561 6e20 6e6f 2e1f 0a28 6465 6661 mean no...(defa │ │ │ +00001a50: 6c69 6173 2027 792d 6f72 2d6e 2d70 2d6d lias 'y-or-n-p-m │ │ │ +00001a60: 696e 6962 7566 2023 5b28 7072 6f6d 7074 inibuf #[(prompt │ │ │ +00001a70: 2920 228a c61a c7c8 211d c70c 211c c91b ) ".....!...!... │ │ │ +00001a80: 0d3b 83a6 00ca 891e 231e 24cb cc5c 6e0c .;......#.$..\n. │ │ │ +00001a90: 0d24 88cd 0b21 13c9 cecf 8f2a ab92 cbd0 .$...!.....*.... │ │ │ +00001aa0: 5c6e 0c0d d10b 2125 88c9 1625 d2d3 c95c \n....!%...%...\ │ │ │ +00001ab0: 2288 d4d5 0b21 2118 d60e 2608 5c22 8919 "....!!...&.\".. │ │ │ +00001ac0: d761 ab8a cbd8 0c0d 2388 c915 aacb 09d9 .a......#....... │ │ │ +00001ad0: 61ab 8acb da0c 0d23 88ca 15aa bc09 db61 a......#.......a │ │ │ +00001ae0: ab85 db20 88aa b209 d361 ac85 09dc 61ab ... .....a....a. │ │ │ +00001af0: 87d2 d3c9 5c22 88aa a1dd 0b21 ac9c cbd0 ....\".....!.... │ │ │ +00001b00: 5c6e 0c0d d10b 2125 88de c9df 5c22 88e0 \n....!%....\".. │ │ │ +00001b10: 2088 5c6e 47e1 55ab 84c7 e221 122a 820d .\nG.U....!.*.. │ │ │ +00001b20: 000d 2d87 2220 5b6b 6579 7320 6465 6620 ..-." [keys def │ │ │ +00001b30: 7072 6520 6576 656e 7420 7072 6f6d 7074 pre event prompt │ │ │ +00001b40: 2079 6e20 2222 2067 6574 7465 7874 2022 yn "" gettext " │ │ │ +00001b50: 2879 206f 7220 6e29 2022 206e 696c 2074 (y or n) " nil t │ │ │ +00001b60: 206d 6573 7361 6765 2022 2573 2573 2573 message "%s%s%s │ │ │ +00001b70: 2220 6e65 7874 2d63 6f6d 6d61 6e64 2d65 " next-command-e │ │ │ +00001b80: 7665 6e74 2028 6279 7465 2d63 6f64 6520 vent (byte-code │ │ │ +00001b90: 2209 ae85 c208 21c3 61c4 1187 2220 5b65 ".....!.a..." [e │ │ │ +00001ba0: 7665 6e74 2071 7569 742d 666c 6167 206b vent quit-flag k │ │ │ +00001bb0: 6579 2d62 696e 6469 6e67 206b 6579 626f ey-binding keybo │ │ │ +00001bc0: 6172 642d 7175 6974 206e 696c 5d20 3229 ard-quit nil] 2) │ │ │ +00001bd0: 2028 2877 726f 6e67 2d74 7970 652d 6172 ((wrong-type-ar │ │ │ +00001be0: 6775 6d65 6e74 2074 2929 2022 2573 2573 gument t)) "%s%s │ │ │ +00001bf0: 2573 2573 2220 7369 6e67 6c65 2d6b 6579 %s%s" single-key │ │ │ +00001c00: 2d64 6573 6372 6970 7469 6f6e 2073 6967 -description sig │ │ │ +00001c10: 6e61 6c20 7175 6974 2065 7665 6e74 732d nal quit events- │ │ │ +00001c20: 746f 2d6b 6579 7320 7665 6374 6f72 206c to-keys vector l │ │ │ +00001c30: 6f6f 6b75 702d 6b65 7920 736b 6970 2022 ookup-key skip " │ │ │ +00001c40: 2573 2573 4e6f 2220 6163 7420 2225 7325 %s%sNo" act "%s% │ │ │ +00001c50: 7359 6573 2220 7265 6365 6e74 6572 2065 sYes" recenter e │ │ │ +00001c60: 7869 742d 7072 6566 6978 2062 7574 746f xit-prefix butto │ │ │ +00001c70: 6e2d 7265 6c65 6173 652d 6576 656e 742d n-release-event- │ │ │ +00001c80: 7020 6469 6e67 2079 2d6f 722d 6e2d 7020 p ding y-or-n-p │ │ │ +00001c90: 6469 7363 6172 642d 696e 7075 7420 3020 discard-input 0 │ │ │ +00001ca0: 2250 6c65 6173 6520 616e 7377 6572 2079 "Please answer y │ │ │ +00001cb0: 206f 7220 6e2e 2020 2220 696e 6869 6269 or n. " inhibi │ │ │ +00001cc0: 742d 7175 6974 2063 7572 736f 722d 696e t-quit cursor-in │ │ │ +00001cd0: 2d65 6368 6f2d 6172 6561 2071 7569 742d -echo-area quit- │ │ │ +00001ce0: 666c 6167 2071 7565 7279 2d72 6570 6c61 flag query-repla │ │ │ +00001cf0: 6365 2d6d 6170 5d20 3820 2823 2420 2e20 ce-map] 8 (#$ . │ │ │ +00001d00: 3633 3939 295d 290a 2340 3238 3720 4173 6399)]).#@287 As │ │ │ +00001d10: 6b20 7573 6572 2061 2079 6573 2d6f 722d k user a yes-or- │ │ │ +00001d20: 6e6f 2071 7565 7374 696f 6e2e 2020 5265 no question. Re │ │ │ +00001d30: 7475 726e 2074 2069 6620 616e 7377 6572 turn t if answer │ │ │ +00001d40: 2069 7320 7965 732e 0a54 616b 6573 206f is yes..Takes o │ │ │ +00001d50: 6e65 2061 7267 756d 656e 742c 2077 6869 ne argument, whi │ │ │ +00001d60: 6368 2069 7320 7468 6520 7374 7269 6e67 ch is the string │ │ │ +00001d70: 2074 6f20 6469 7370 6c61 7920 746f 2061 to display to a │ │ │ +00001d80: 736b 2074 6865 2071 7565 7374 696f 6e2e sk the question. │ │ │ +00001d90: 0a49 7420 7368 6f75 6c64 2065 6e64 2069 .It should end i │ │ │ +00001da0: 6e20 6120 7370 6163 653b 2060 7965 732d n a space; `yes- │ │ │ +00001db0: 6f72 2d6e 6f2d 7027 2061 6464 7320 6028 or-no-p' adds `( │ │ │ +00001dc0: 7965 7320 6f72 206e 6f29 2027 2074 6f20 yes or no) ' to │ │ │ +00001dd0: 6974 2e0a 5468 6520 7573 6572 206d 7573 it..The user mus │ │ │ +00001de0: 7420 636f 6e66 6972 6d20 7468 6520 616e t confirm the an │ │ │ +00001df0: 7377 6572 2077 6974 6820 5245 542c 0a61 swer with RET,.a │ │ │ +00001e00: 6e64 2063 616e 2065 6469 7420 6974 2075 nd can edit it u │ │ │ +00001e10: 6e74 696c 2069 7420 6861 7320 6265 656e ntil it has been │ │ │ +00001e20: 2063 6f6e 6669 726d 6564 2e1f 0a28 6465 confirmed...(de │ │ │ +00001e30: 6661 6c69 6173 2027 7965 732d 6f72 2d6e falias 'yes-or-n │ │ │ +00001e40: 6f2d 702d 6d69 6e69 6275 6620 235b 2870 o-p-minibuf #[(p │ │ │ +00001e50: 726f 6d70 7429 2022 8ac3 0821 c3c4 2150 rompt) "...!..!P │ │ │ +00001e60: c51a 195c 6e3b abb1 c609 c7c8 2397 8912 ...\n;......#... │ │ │ +00001e70: c3c9 2198 ab85 c889 12aa 6a5c 6ec3 ca21 ..!.......j\n..! │ │ │ +00001e80: 98ab 85c7 8912 aa5e cbc7 cc5c 2288 cd20 .......^...\".. │ │ │ +00001e90: 88ce cf21 88d0 d121 88aa 4b5c 6e2b 8722 ...!...!..K\n+." │ │ │ +00001ea0: 205b 7072 6f6d 7074 2070 2061 6e73 2067 [prompt p ans g │ │ │ +00001eb0: 6574 7465 7874 2022 2879 6573 206f 7220 ettext "(yes or │ │ │ +00001ec0: 6e6f 2920 2220 2222 2072 6561 642d 7374 no) " "" read-st │ │ │ +00001ed0: 7269 6e67 206e 696c 2074 2022 7965 7322 ring nil t "yes" │ │ │ +00001ee0: 2022 6e6f 2220 6469 6e67 2079 6573 2d6f "no" ding yes-o │ │ │ +00001ef0: 722d 6e6f 2d70 2064 6973 6361 7264 2d69 r-no-p discard-i │ │ │ +00001f00: 6e70 7574 206d 6573 7361 6765 2022 506c nput message "Pl │ │ │ +00001f10: 6561 7365 2061 6e73 7765 7220 7965 7320 ease answer yes │ │ │ +00001f20: 6f72 206e 6f2e 2220 736c 6565 702d 666f or no." sleep-fo │ │ │ +00001f30: 7220 325d 2035 2028 2324 202e 2037 3433 r 2] 5 (#$ . 743 │ │ │ +00001f40: 3829 5d29 0a23 4033 3631 2041 736b 2075 8)]).#@361 Ask u │ │ │ +00001f50: 7365 7220 6120 7965 732d 6f72 2d6e 6f20 ser a yes-or-no │ │ │ +00001f60: 7175 6573 7469 6f6e 2e20 2052 6574 7572 question. Retur │ │ │ +00001f70: 6e20 7420 6966 2061 6e73 7765 7220 6973 n t if answer is │ │ │ +00001f80: 2079 6573 2e0a 5468 6520 7175 6573 7469 yes..The questi │ │ │ +00001f90: 6f6e 2069 7320 6173 6b65 6420 7769 7468 on is asked with │ │ │ +00001fa0: 2061 2064 6961 6c6f 6720 626f 7820 6f72 a dialog box or │ │ │ +00001fb0: 2074 6865 206d 696e 6962 7566 6665 722c the minibuffer, │ │ │ +00001fc0: 2061 7320 6170 7072 6f70 7269 6174 652e as appropriate. │ │ │ +00001fd0: 0a54 616b 6573 206f 6e65 2061 7267 756d .Takes one argum │ │ │ +00001fe0: 656e 742c 2077 6869 6368 2069 7320 7468 ent, which is th │ │ │ +00001ff0: 6520 7374 7269 6e67 2074 6f20 6469 7370 e string to disp │ │ │ +00002000: 6c61 7920 746f 2061 736b 2074 6865 2071 lay to ask the q │ │ │ +00002010: 7565 7374 696f 6e2e 0a49 7420 7368 6f75 uestion..It shou │ │ │ +00002020: 6c64 2065 6e64 2069 6e20 6120 7370 6163 ld end in a spac │ │ │ +00002030: 653b 2060 7965 732d 6f72 2d6e 6f2d 7027 e; `yes-or-no-p' │ │ │ +00002040: 2061 6464 7320 6028 7965 7320 6f72 206e adds `(yes or n │ │ │ +00002050: 6f29 2027 2074 6f20 6974 2e0a 5468 6520 o) ' to it..The │ │ │ +00002060: 7573 6572 206d 7573 7420 636f 6e66 6972 user must confir │ │ │ +00002070: 6d20 7468 6520 616e 7377 6572 2077 6974 m the answer wit │ │ │ +00002080: 6820 5245 542c 0a61 6e64 2063 616e 2065 h RET,.and can e │ │ │ +00002090: 6469 7420 6974 2075 6e74 696c 2069 7420 dit it until it │ │ │ +000020a0: 6173 2062 6565 6e20 636f 6e66 6972 6d65 as been confirme │ │ │ +000020b0: 642e 1f0a 2864 6566 616c 6961 7320 2779 d...(defalias 'y │ │ │ +000020c0: 6573 2d6f 722d 6e6f 2d70 2023 5b28 7072 es-or-no-p #[(pr │ │ │ +000020d0: 6f6d 7074 2920 22c1 20ab 84c2 0821 87c3 ompt) ". ....!.. │ │ │ +000020e0: 0821 8722 205b 7072 6f6d 7074 2073 686f .!." [prompt sho │ │ │ +000020f0: 756c 642d 7573 652d 6469 616c 6f67 2d62 uld-use-dialog-b │ │ │ +00002100: 6f78 2d70 2079 6573 2d6f 722d 6e6f 2d70 ox-p yes-or-no-p │ │ │ +00002110: 2d64 6961 6c6f 672d 626f 7820 7965 732d -dialog-box yes- │ │ │ +00002120: 6f72 2d6e 6f2d 702d 6d69 6e69 6275 665d or-no-p-minibuf] │ │ │ +00002130: 2032 2028 2324 202e 2038 3031 3129 5d29 2 (#$ . 8011)]) │ │ │ +00002140: 0a23 4034 3037 2041 736b 2075 7365 7220 .#@407 Ask user │ │ │ +00002150: 6120 2279 206f 7220 6e22 2071 7565 7374 a "y or n" quest │ │ │ +00002160: 696f 6e2e 2020 5265 7475 726e 2074 2069 ion. Return t i │ │ │ +00002170: 6620 616e 7377 6572 2069 7320 2279 222c f answer is "y", │ │ │ +00002180: 206e 696c 2069 6620 226e 222e 0a54 616b nil if "n"..Tak │ │ │ +00002190: 6573 206f 6e65 2061 7267 756d 656e 742c es one argument, │ │ │ +000021a0: 2077 6869 6368 2069 7320 7468 6520 7374 which is the st │ │ │ +000021b0: 7269 6e67 2074 6f20 6469 7370 6c61 7920 ring to display │ │ │ +000021c0: 746f 2061 736b 2074 6865 2071 7565 7374 to ask the quest │ │ │ +000021d0: 696f 6e2e 0a54 6865 2071 7565 7374 696f ion..The questio │ │ │ +000021e0: 6e20 6973 2061 736b 6564 2077 6974 6820 n is asked with │ │ │ +000021f0: 6120 6469 616c 6f67 2062 6f78 206f 7220 a dialog box or │ │ │ +00002200: 7468 6520 6d69 6e69 6275 6666 6572 2c20 the minibuffer, │ │ │ +00002210: 6173 2061 7070 726f 7072 6961 7465 2e0a as appropriate.. │ │ │ +00002220: 4974 2073 686f 756c 6420 656e 6420 696e It should end in │ │ │ +00002230: 2061 2073 7061 6365 3b20 6079 2d6f 722d a space; `y-or- │ │ │ +00002240: 6e2d 7027 2061 6464 7320 6028 7920 6f72 n-p' adds `(y or │ │ │ +00002250: 206e 2920 2720 746f 2069 742e 0a4e 6f20 n) ' to it..No │ │ │ +00002260: 636f 6e66 6972 6d61 7469 6f6e 206f 6620 confirmation of │ │ │ +00002270: 7468 6520 616e 7377 6572 2069 7320 7265 the answer is re │ │ │ +00002280: 7175 6573 7465 643b 2061 2073 696e 676c quested; a singl │ │ │ +00002290: 6520 6368 6172 6163 7465 7220 6973 2065 e character is e │ │ │ +000022a0: 6e6f 7567 682e 0a41 6c73 6f20 6163 6365 nough..Also acce │ │ │ +000022b0: 7074 7320 5370 6163 6520 746f 206d 6561 pts Space to mea │ │ │ +000022c0: 6e20 7965 732c 206f 7220 4465 6c65 7465 n yes, or Delete │ │ │ +000022d0: 2074 6f20 6d65 616e 206e 6f2e 1f0a 2864 to mean no...(d │ │ │ +000022e0: 6566 616c 6961 7320 2779 2d6f 722d 6e2d efalias 'y-or-n- │ │ │ +000022f0: 7020 235b 2870 726f 6d70 7429 2022 c120 p #[(prompt) ". │ │ │ +00002300: ab84 c208 2187 c308 2187 2220 5b70 726f ....!...!." [pro │ │ │ +00002310: 6d70 7420 7368 6f75 6c64 2d75 7365 2d64 mpt should-use-d │ │ │ +00002320: 6961 6c6f 672d 626f 782d 7020 7965 732d ialog-box-p yes- │ │ │ +00002330: 6f72 2d6e 6f2d 702d 6469 616c 6f67 2d62 or-no-p-dialog-b │ │ │ +00002340: 6f78 2079 2d6f 722d 6e2d 702d 6d69 6e69 ox y-or-n-p-mini │ │ │ +00002350: 6275 665d 2032 2028 2324 202e 2038 3531 buf] 2 (#$ . 851 │ │ │ +00002360: 3929 5d29 0a23 4033 3036 2052 6561 6420 9)]).#@306 Read │ │ │ +00002370: 6120 6368 6172 6163 7465 7220 6672 6f6d a character from │ │ │ +00002380: 2074 6865 2063 6f6d 6d61 6e64 2069 6e70 the command inp │ │ │ +00002390: 7574 2028 6b65 7962 6f61 7264 206f 7220 ut (keyboard or │ │ │ +000023a0: 6d61 6372 6f29 2e0a 4966 2061 206d 6f75 macro)..If a mou │ │ │ +000023b0: 7365 2063 6c69 636b 206f 7220 6e6f 6e2d se click or non- │ │ │ +000023c0: 4153 4349 4920 6368 6172 6163 7465 7220 ASCII character │ │ │ +000023d0: 6973 2064 6574 6563 7465 642c 2061 6e20 is detected, an │ │ │ +000023e0: 6572 726f 7220 6973 0a73 6967 6e61 6c6c error is.signall │ │ │ +000023f0: 6564 2e20 2054 6865 2063 6861 7261 6374 ed. The charact │ │ │ +00002400: 6572 2074 7970 6564 2069 7320 7265 7475 er typed is retu │ │ │ +00002410: 726e 6564 2061 7320 616e 2041 5343 4949 rned as an ASCII │ │ │ +00002420: 2076 616c 7565 2e20 2054 6869 730a 6973 value. This.is │ │ │ +00002430: 206d 6f73 7420 6c69 6b65 6c79 2074 6865 most likely the │ │ │ +00002440: 2077 726f 6e67 2074 6869 6e67 2066 6f72 wrong thing for │ │ │ +00002450: 2079 6f75 2074 6f20 6265 2075 7369 6e67 you to be using │ │ │ +00002460: 3a20 636f 6e73 6964 6572 2075 7369 6e67 : consider using │ │ │ +00002470: 0a74 6865 2060 6e65 7874 2d63 6f6d 6d61 .the `next-comma │ │ │ +00002480: 6e64 2d65 7665 6e74 2720 6675 6e63 7469 nd-event' functi │ │ │ +00002490: 6f6e 2069 6e73 7465 6164 2e1f 0a28 6465 on instead...(de │ │ │ +000024a0: 6661 6c69 6173 2027 7265 6164 2d63 6861 falias 'read-cha │ │ │ +000024b0: 7220 235b 6e69 6c20 228a c220 1908 ac8c r #[nil ".. .... │ │ │ +000024c0: c309 c420 5c22 ab85 c5c6 c75c 2288 c809 ... \".....\"... │ │ │ +000024d0: 21ae 90c9 0921 ab87 c8c2 0921 21ae 84ca !....!.....!!... │ │ │ +000024e0: cb09 5c22 cc09 2188 2a87 2220 5b69 6e68 ..\"..!.*." [inh │ │ │ +000024f0: 6962 6974 2d71 7569 7420 6576 656e 7420 ibit-quit event │ │ │ +00002500: 6e65 7874 2d63 6f6d 6d61 6e64 2d65 7665 next-command-eve │ │ │ +00002510: 6e74 2065 7665 6e74 2d6d 6174 6368 6573 nt event-matches │ │ │ +00002520: 2d6b 6579 2d73 7065 6369 6669 6572 2d70 -key-specifier-p │ │ │ +00002530: 2071 7569 742d 6368 6172 2073 6967 6e61 quit-char signa │ │ │ +00002540: 6c20 7175 6974 206e 696c 2065 7665 6e74 l quit nil event │ │ │ +00002550: 2d74 6f2d 6368 6172 6163 7465 7220 6275 -to-character bu │ │ │ +00002560: 7474 6f6e 2d72 656c 6561 7365 2d65 7665 tton-release-eve │ │ │ +00002570: 6e74 2d70 2065 7272 6f72 2022 4b65 7920 nt-p error "Key │ │ │ +00002580: 7265 6164 2068 6173 206e 6f20 4153 4349 read has no ASCI │ │ │ +00002590: 4920 6571 7569 7661 6c65 6e74 2025 5322 I equivalent %S" │ │ │ +000025a0: 2064 6561 6c6c 6f63 6174 652d 6576 656e deallocate-even │ │ │ +000025b0: 745d 2033 2028 2324 202e 2039 3036 3729 t] 3 (#$ . 9067) │ │ │ +000025c0: 5d29 0a23 4032 3939 2052 6561 6420 6120 ]).#@299 Read a │ │ │ +000025d0: 6368 6172 6163 7465 7220 6672 6f6d 2074 character from t │ │ │ +000025e0: 6865 2063 6f6d 6d61 6e64 2069 6e70 7574 he command input │ │ │ +000025f0: 2028 6b65 7962 6f61 7264 206f 7220 6d61 (keyboard or ma │ │ │ +00002600: 6372 6f29 2e0a 4966 2061 206d 6f75 7365 cro)..If a mouse │ │ │ +00002610: 2063 6c69 636b 206f 7220 6e6f 6e2d 4153 click or non-AS │ │ │ +00002620: 4349 4920 6368 6172 6163 7465 7220 6973 CII character is │ │ │ +00002630: 2064 6574 6563 7465 642c 2069 7420 6973 detected, it is │ │ │ +00002640: 2064 6973 6361 7264 6564 2e0a 5468 6520 discarded..The │ │ │ +00002650: 6368 6172 6163 7465 7220 7479 7065 6420 character typed │ │ │ +00002660: 6973 2072 6574 7572 6e65 6420 6173 2061 is returned as a │ │ │ +00002670: 6e20 4153 4349 4920 7661 6c75 652e 2020 n ASCII value. │ │ │ +00002680: 5468 6973 2069 7320 6d6f 7374 206c 696b This is most lik │ │ │ +00002690: 656c 790a 7468 6520 7772 6f6e 6720 7468 ely.the wrong th │ │ │ +000026a0: 696e 6720 666f 7220 796f 7520 746f 2062 ing for you to b │ │ │ +000026b0: 6520 7573 696e 673a 2063 6f6e 7369 6465 e using: conside │ │ │ +000026c0: 7220 7573 696e 6720 7468 650a 606e 6578 r using the.`nex │ │ │ +000026d0: 742d 636f 6d6d 616e 642d 6576 656e 7427 t-command-event' │ │ │ +000026e0: 2066 756e 6374 696f 6e20 696e 7374 6561 function instea │ │ │ +000026f0: 642e 1f0a 2864 6566 616c 6961 7320 2772 d...(defalias 'r │ │ │ +00002700: 6561 642d 6368 6172 2d65 7863 6c75 7369 ead-char-exclusi │ │ │ +00002710: 7665 2023 5b6e 696c 2022 c389 191a c420 ve #[nil "..... │ │ │ +00002720: 1208 ac8c c55c 6ec6 205c 22ab 85c7 c8c3 .....\n. \"..... │ │ │ +00002730: 5c22 88c9 5c6e 2111 ca5c 6e21 8809 ab63 \"..\n!..\n!...c │ │ │ +00002740: 092a 8722 205b 696e 6869 6269 742d 7175 .*." [inhibit-qu │ │ │ +00002750: 6974 2063 6820 6576 656e 7420 6e69 6c20 it ch event nil │ │ │ +00002760: 6e65 7874 2d63 6f6d 6d61 6e64 2d65 7665 next-command-eve │ │ │ +00002770: 6e74 2065 7665 6e74 2d6d 6174 6368 6573 nt event-matches │ │ │ +00002780: 2d6b 6579 2d73 7065 6369 6669 6572 2d70 -key-specifier-p │ │ │ +00002790: 2071 7569 742d 6368 6172 2073 6967 6e61 quit-char signa │ │ │ +000027a0: 6c20 7175 6974 2065 7665 6e74 2d74 6f2d l quit event-to- │ │ │ +000027b0: 6368 6172 6163 7465 7220 6465 616c 6c6f character deallo │ │ │ +000027c0: 6361 7465 2d65 7665 6e74 5d20 3320 2823 cate-event] 3 (# │ │ │ +000027d0: 2420 2e20 3936 3733 295d 290a 2340 3237 $ . 9673)]).#@27 │ │ │ +000027e0: 3020 4c69 6b65 2060 7265 6164 2d63 6861 0 Like `read-cha │ │ │ +000027f0: 7227 2c20 6578 6365 7074 2074 6861 7420 r', except that │ │ │ +00002800: 6966 2074 6865 2066 6972 7374 2063 6861 if the first cha │ │ │ +00002810: 7261 6374 6572 2072 6561 6420 6973 2061 racter read is a │ │ │ +00002820: 6e20 6f63 7461 6c0a 6469 6769 742c 2077 n octal.digit, w │ │ │ +00002830: 6520 7265 6164 2075 7020 746f 2074 776f e read up to two │ │ │ +00002840: 206d 6f72 6520 6f63 7461 6c20 6469 6769 more octal digi │ │ │ +00002850: 7473 2061 6e64 2072 6574 7572 6e20 7468 ts and return th │ │ │ +00002860: 6520 6368 6172 6163 7465 720a 7265 7072 e character.repr │ │ │ +00002870: 6573 656e 7465 6420 6279 2074 6865 206f esented by the o │ │ │ +00002880: 6374 616c 206e 756d 6265 7220 636f 6e73 ctal number cons │ │ │ +00002890: 6973 7469 6e67 206f 6620 7468 6f73 6520 isting of those │ │ │ +000028a0: 6469 6769 7473 2e0a 4f70 7469 6f6e 616c digits..Optional │ │ │ +000028b0: 2061 7267 756d 656e 7420 5052 4f4d 5054 argument PROMPT │ │ │ +000028c0: 2073 7065 6369 6669 6573 2061 2073 7472 specifies a str │ │ │ +000028d0: 696e 6720 746f 2075 7365 2074 6f20 7072 ing to use to pr │ │ │ +000028e0: 6f6d 7074 2074 6865 2075 7365 722e 1f0a ompt the user... │ │ │ +000028f0: 2864 6566 616c 6961 7320 2772 6561 642d (defalias 'read- │ │ │ +00002900: 7175 6f74 6564 2d63 6861 7220 235b 2826 quoted-char #[(& │ │ │ +00002910: 6f70 7469 6f6e 616c 2070 726f 6d70 7429 optional prompt) │ │ │ +00002920: 2022 c689 c70d ad83 c80d 21c7 891a 1c1d "........!..... │ │ │ +00002930: 1819 1b08 aced 0bc9 57ab e80b c655 c7ca ........W....U.. │ │ │ +00002940: 1e1c 1e1d 1e1b 0dab 88cb c5cc cd0d 5c22 ..............\" │ │ │ +00002950: 5c22 88ce 2012 cf5c 6ec7 89d0 24ae 86d1 \".. ..\n...$... │ │ │ +00002960: d2d3 5c6e 445c 2214 0e1b ab83 c716 1e2b ..\nD\"........+ │ │ │ +00002970: d4d5 0cd6 23ab 9b09 d75f 0cd5 5a5c 5c11 ....#...._..Z\\. │ │ │ +00002980: 0b54 130d ab33 cbc5 ccd8 0d0c 2389 155c .T...3......#..\ │ │ │ +00002990: 2288 aa26 0bc6 56ab 885c 6e16 1fd0 8910 "..&..V..\n..... │ │ │ +000029a0: aa1a d90c 2111 d089 10ab 13da 0921 2e06 ....!........!.. │ │ │ +000029b0: 8722 205b 646f 6e65 2063 6f64 6520 6576 ." [done code ev │ │ │ +000029c0: 656e 7420 636f 756e 7420 6368 6172 2070 ent count char p │ │ │ +000029d0: 726f 6d70 7420 3020 6e69 6c20 6765 7474 rompt 0 nil gett │ │ │ +000029e0: 6578 7420 3320 2254 7970 6520 7468 6520 ext 3 "Type the │ │ │ +000029f0: 7370 6563 6961 6c20 6368 6172 6163 7465 special characte │ │ │ +00002a00: 7220 796f 7520 7761 6e74 2074 6f20 7573 r you want to us │ │ │ +00002a10: 652c 5c6e 6f72 2074 6872 6565 206f 6374 e,\nor three oct │ │ │ +00002a20: 616c 2064 6967 6974 7320 7265 7072 6573 al digits repres │ │ │ +00002a30: 656e 7469 6e67 2069 7473 2063 6861 7261 enting its chara │ │ │ +00002a40: 6374 6572 2063 6f64 652e 2220 6469 7370 cter code." disp │ │ │ +00002a50: 6c61 792d 6d65 7373 6167 6520 666f 726d lay-message form │ │ │ +00002a60: 6174 2022 2573 2d22 206e 6578 742d 636f at "%s-" next-co │ │ │ +00002a70: 6d6d 616e 642d 6576 656e 7420 6576 656e mmand-event even │ │ │ +00002a80: 742d 746f 2d63 6861 7261 6374 6572 2074 t-to-character t │ │ │ +00002a90: 2073 6967 6e61 6c20 6572 726f 7220 226b signal error "k │ │ │ +00002aa0: 6579 2072 6561 6420 6361 6e6e 6f74 2062 ey read cannot b │ │ │ +00002ab0: 6520 696e 7365 7274 6564 2069 6e20 6120 e inserted in a │ │ │ +00002ac0: 6275 6666 6572 2220 3c3d 203f 3020 3f37 buffer" <= ?0 ?7 │ │ │ +00002ad0: 2038 2022 2573 2025 6322 2063 6861 722d 8 "%s %c" char- │ │ │ +00002ae0: 696e 7420 696e 742d 6368 6172 2069 6e68 int int-char inh │ │ │ +00002af0: 6962 6974 2d71 7569 7420 6865 6c70 2d66 ibit-quit help-f │ │ │ +00002b00: 6f72 6d20 6865 6c70 2d63 6861 7220 7175 orm help-char qu │ │ │ +00002b10: 6974 2d66 6c61 6720 756e 7265 6164 2d63 it-flag unread-c │ │ │ +00002b20: 6f6d 6d61 6e64 2d65 7665 6e74 5d20 3720 ommand-event] 7 │ │ │ +00002b30: 2823 2420 2e20 3130 3231 3029 5d29 0a23 (#$ . 10210)]).# │ │ │ +00002b40: 4033 3735 204d 6f6d 656e 7461 7269 6c79 @375 Momentarily │ │ │ +00002b50: 2064 6973 706c 6179 2053 5452 494e 4720 display STRING │ │ │ +00002b60: 696e 2074 6865 2062 7566 6665 7220 6174 in the buffer at │ │ │ +00002b70: 2050 4f53 2e0a 4469 7370 6c61 7920 7265 POS..Display re │ │ │ +00002b80: 6d61 696e 7320 756e 7469 6c20 6e65 7874 mains until next │ │ │ +00002b90: 2063 6861 7261 6374 6572 2069 7320 7479 character is ty │ │ │ +00002ba0: 7065 642e 0a49 6620 7468 6520 6368 6172 ped..If the char │ │ │ +00002bb0: 2069 7320 4558 4954 2d43 4841 5220 286f is EXIT-CHAR (o │ │ │ +00002bc0: 7074 696f 6e61 6c20 7468 6972 6420 6172 ptional third ar │ │ │ +00002bd0: 672c 2064 6566 6175 6c74 2069 7320 5350 g, default is SP │ │ │ +00002be0: 4329 2069 7420 6973 2073 7761 6c6c 6f77 C) it is swallow │ │ │ +00002bf0: 6564 3b0a 6f74 6865 7277 6973 6520 6974 ed;.otherwise it │ │ │ +00002c00: 2069 7320 7468 656e 2061 7661 696c 6162 is then availab │ │ │ +00002c10: 6c65 2061 7320 696e 7075 7420 2861 7320 le as input (as │ │ │ +00002c20: 6120 636f 6d6d 616e 6420 6966 206e 6f74 a command if not │ │ │ +00002c30: 6869 6e67 2065 6c73 6529 2e0a 4469 7370 hing else)..Disp │ │ │ +00002c40: 6c61 7920 4d45 5353 4147 4520 286f 7074 lay MESSAGE (opt │ │ │ +00002c50: 696f 6e61 6c20 666f 7572 7468 2061 7267 ional fourth arg │ │ │ +00002c60: 2920 696e 2074 6865 2065 6368 6f20 6172 ) in the echo ar │ │ │ +00002c70: 6561 2e0a 4966 204d 4553 5341 4745 2069 ea..If MESSAGE i │ │ │ +00002c80: 7320 6e69 6c2c 2069 6e73 7472 7563 7469 s nil, instructi │ │ │ +00002c90: 6f6e 7320 746f 2074 7970 6520 4558 4954 ons to type EXIT │ │ │ +00002ca0: 2d43 4841 5220 6172 6520 6469 7370 6c61 -CHAR are displa │ │ │ +00002cb0: 7965 6420 7468 6572 652e 1f0a 2864 6566 yed there...(def │ │ │ +00002cc0: 616c 6961 7320 276d 6f6d 656e 7461 7279 alias 'momentary │ │ │ +00002cd0: 2d73 7472 696e 672d 6469 7370 6c61 7920 -string-display │ │ │ +00002ce0: 235b 2873 7472 696e 6720 706f 7320 266f #[(string pos &o │ │ │ +00002cf0: 7074 696f 6e61 6c20 6578 6974 2d63 6861 ptional exit-cha │ │ │ +00002d00: 7220 6d65 7373 6167 6529 2022 0dac 82c6 r message) ".... │ │ │ +00002d10: 15c7 c8c9 2009 c71c 181e 181e 191e 1aca .... ........... │ │ │ +00002d20: 8e8a 0b62 88c7 11cb cc0e 1b21 2188 6014 ...b.......!!.`. │ │ │ +00002d30: cd20 0c56 ab87 cecf 20d0 a521 88d1 d221 . .V.... ..!...! │ │ │ +00002d40: 8860 0b56 ab87 0b62 88ce d221 8829 d30e .`.V...b...!.).. │ │ │ +00002d50: 13ae 83cc d421 d50d 215c 2288 8ad6 2029 .....!..!\"... ) │ │ │ +00002d60: 1ad7 5c6e 210d 61ae 845c 6e89 161c 2e07 ..\n!.a..\n..... │ │ │ +00002d70: 8722 205b 6e61 6d65 2062 7566 6665 722d ." [name buffer- │ │ │ +00002d80: 6669 6c65 2d6e 616d 6520 6576 656e 7420 file-name event │ │ │ +00002d90: 706f 7320 696e 7365 7274 2d65 6e64 2065 pos insert-end e │ │ │ +00002da0: 7869 742d 6368 6172 203f 5c20 206e 696c xit-char ?\ nil │ │ │ +00002db0: 2074 2062 7566 6665 722d 6d6f 6469 6669 t buffer-modifi │ │ │ +00002dc0: 6564 2d70 2028 2862 7974 652d 636f 6465 ed-p ((byte-code │ │ │ +00002dd0: 2022 0cab 868a 0b0c 7c88 295c 6e11 c508 "......|.)\n... │ │ │ +00002de0: 2187 2220 5b6d 6f64 6966 6965 6420 6275 !." [modified bu │ │ │ +00002df0: 6666 6572 2d66 696c 652d 6e61 6d65 206e ffer-file-name n │ │ │ +00002e00: 616d 6520 706f 7320 696e 7365 7274 2d65 ame pos insert-e │ │ │ +00002e10: 6e64 2073 6574 2d62 7566 6665 722d 6d6f nd set-buffer-mo │ │ │ +00002e20: 6469 6669 6564 2d70 5d20 3229 2920 696e dified-p] 2)) in │ │ │ +00002e30: 7365 7274 2d62 6566 6f72 652d 6d61 726b sert-before-mark │ │ │ +00002e40: 6572 7320 6765 7474 6578 7420 7769 6e64 ers gettext wind │ │ │ +00002e50: 6f77 2d65 6e64 2072 6563 656e 7465 7220 ow-end recenter │ │ │ +00002e60: 7769 6e64 6f77 2d68 6569 6768 7420 3220 window-height 2 │ │ │ +00002e70: 6d6f 7665 2d74 6f2d 7769 6e64 6f77 2d6c move-to-window-l │ │ │ +00002e80: 696e 6520 3020 6d65 7373 6167 6520 2254 ine 0 message "T │ │ │ +00002e90: 7970 6520 2573 2074 6f20 636f 6e74 696e ype %s to contin │ │ │ +00002ea0: 7565 2065 6469 7469 6e67 2e22 2073 696e ue editing." sin │ │ │ +00002eb0: 676c 652d 6b65 792d 6465 7363 7269 7074 gle-key-descript │ │ │ +00002ec0: 696f 6e20 6e65 7874 2d63 6f6d 6d61 6e64 ion next-command │ │ │ +00002ed0: 2d65 7665 6e74 2065 7665 6e74 2d74 6f2d -event event-to- │ │ │ +00002ee0: 6368 6172 6163 7465 7220 6d6f 6469 6669 character modifi │ │ │ +00002ef0: 6564 2062 7566 6665 722d 756e 646f 2d6c ed buffer-undo-l │ │ │ +00002f00: 6973 7420 6275 6666 6572 2d72 6561 642d ist buffer-read- │ │ │ +00002f10: 6f6e 6c79 2073 7472 696e 6720 756e 7265 only string unre │ │ │ +00002f20: 6164 2d63 6f6d 6d61 6e64 2d65 7665 6e74 ad-command-event │ │ │ +00002f30: 5d20 3520 2823 2420 2e20 3131 3037 3729 ] 5 (#$ . 11077) │ │ │ +00002f40: 5d29 0a ]). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/code-cmds.elc │ │ │ @@ -1,321 +1,321 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3536 2032 eb 25 01:53:56 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6f64 652d 636d 6473 2e65 6c0a 3b3b 3b20 ode-cmds.el.;;; │ │ │ -000000a0: 656d 6163 7320 7665 7273 696f 6e20 3231 emacs version 21 │ │ │ -000000b0: 2e34 2028 7061 7463 6820 3234 2920 2253 .4 (patch 24) "S │ │ │ -000000c0: 7461 6e64 6172 6420 4322 2058 456d 6163 tandard C" XEmac │ │ │ -000000d0: 7320 4c75 6369 642e 0a3b 3b3b 2062 7974 s Lucid..;;; byt │ │ │ -000000e0: 6563 6f6d 7020 7665 7273 696f 6e20 322e ecomp version 2. │ │ │ -000000f0: 3237 2058 456d 6163 733b 2032 3030 302d 27 XEmacs; 2000- │ │ │ -00000100: 3039 2d31 322e 0a3b 3b3b 206f 7074 696d 09-12..;;; optim │ │ │ -00000110: 697a 6174 696f 6e20 6973 206f 6e2e 0a3b ization is on..; │ │ │ -00000120: 3b3b 2074 6869 7320 6669 6c65 2075 7365 ;; this file use │ │ │ -00000130: 7320 6f70 636f 6465 7320 7768 6963 6820 s opcodes which │ │ │ -00000140: 646f 206e 6f74 2065 7869 7374 2069 6e20 do not exist in │ │ │ -00000150: 456d 6163 7320 3139 2e0a 0a28 6966 2028 Emacs 19...(if ( │ │ │ -00000160: 616e 6420 2862 6f75 6e64 7020 2765 6d61 and (boundp 'ema │ │ │ -00000170: 6373 2d76 6572 7369 6f6e 290a 0920 286f cs-version).. (o │ │ │ -00000180: 7220 2861 6e64 2028 626f 756e 6470 2027 r (and (boundp ' │ │ │ -00000190: 6570 6f63 683a 3a76 6572 7369 6f6e 2920 epoch::version) │ │ │ -000001a0: 6570 6f63 683a 3a76 6572 7369 6f6e 290a epoch::version). │ │ │ -000001b0: 0920 2020 2020 2873 7472 696e 672d 6c65 . (string-le │ │ │ -000001c0: 7373 7020 656d 6163 732d 7665 7273 696f ssp emacs-versio │ │ │ -000001d0: 6e20 2232 3022 2929 290a 2020 2020 2865 n "20"))). (e │ │ │ -000001e0: 7272 6f72 2022 6063 6f64 652d 636d 6473 rror "`code-cmds │ │ │ -000001f0: 2e65 6c27 2077 6173 2063 6f6d 7069 6c65 .el' was compile │ │ │ -00000200: 6420 666f 7220 456d 6163 7320 3230 2229 d for Emacs 20") │ │ │ -00000210: 290a 0a28 6f72 2028 626f 756e 6470 2027 )..(or (boundp ' │ │ │ -00000220: 6375 7272 656e 742d 6c6f 6164 2d6c 6973 current-load-lis │ │ │ -00000230: 7429 2028 7365 7471 2063 7572 7265 6e74 t) (setq current │ │ │ -00000240: 2d6c 6f61 642d 6c69 7374 206e 696c 2929 -load-list nil)) │ │ │ -00000250: 0a0a 0a23 4035 3420 4b65 796d 6170 2066 ...#@54 Keymap f │ │ │ -00000260: 6f72 204d 756c 6520 616e 6420 436f 6469 or Mule and Codi │ │ │ -00000270: 6e67 2063 7973 7465 6d20 7370 6563 6966 ng cystem specif │ │ │ -00000280: 6963 2063 6f6d 6d61 6e64 732e 1f0a 2864 ic commands...(d │ │ │ -00000290: 6566 7661 7220 636f 6469 6e67 2d6b 6579 efvar coding-key │ │ │ -000002a0: 6d61 7020 286d 616b 652d 7370 6172 7365 map (make-sparse │ │ │ -000002b0: 2d6b 6579 6d61 7020 224d 756c 652f 436f -keymap "Mule/Co │ │ │ -000002c0: 6e64 696e 6722 2920 2823 2420 2e20 3630 nding") (#$ . 60 │ │ │ -000002d0: 3029 290a 2862 7974 652d 636f 6465 2022 0)).(byte-code " │ │ │ -000002e0: c208 c309 2388 c209 c4c5 2388 c209 c6c7 ....#.....#..... │ │ │ -000002f0: 2388 c209 c8c9 2388 c209 cacb 2388 c209 #.....#.....#... │ │ │ -00000300: cccd 2387 2220 5b63 746c 2d78 2d6d 6170 ..#." [ctl-x-map │ │ │ -00000310: 2063 6f64 696e 672d 6b65 796d 6170 2064 coding-keymap d │ │ │ -00000320: 6566 696e 652d 6b65 7920 220d 2220 2266 efine-key "." "f │ │ │ -00000330: 2220 7365 742d 6275 6666 6572 2d66 696c " set-buffer-fil │ │ │ -00000340: 652d 636f 6469 6e67 2d73 7973 7465 6d20 e-coding-system │ │ │ -00000350: 2246 2220 7365 742d 6465 6661 756c 742d "F" set-default- │ │ │ -00000360: 6275 6666 6572 2d66 696c 652d 636f 6469 buffer-file-codi │ │ │ -00000370: 6e67 2d73 7973 7465 6d20 2274 2220 7365 ng-system "t" se │ │ │ -00000380: 742d 7465 726d 696e 616c 2d63 6f64 696e t-terminal-codin │ │ │ -00000390: 672d 7379 7374 656d 2022 7022 2073 6574 g-system "p" set │ │ │ -000003a0: 2d62 7566 6665 722d 7072 6f63 6573 732d -buffer-process- │ │ │ -000003b0: 636f 6469 6e67 2d73 7973 7465 6d20 2263 coding-system "c │ │ │ -000003c0: 2220 756e 6976 6572 7361 6c2d 636f 6469 " universal-codi │ │ │ -000003d0: 6e67 2d73 7973 7465 6d2d 6172 6775 6d65 ng-system-argume │ │ │ -000003e0: 6e74 5d20 3429 0a23 4034 3531 2052 6574 nt] 4).#@451 Ret │ │ │ -000003f0: 7572 6e20 6120 636f 6469 6e67 2073 7973 urn a coding sys │ │ │ -00000400: 7465 6d20 7768 6963 6820 6469 6666 6572 tem which differ │ │ │ -00000410: 7320 6672 6f6d 2043 4f44 494e 472d 5359 s from CODING-SY │ │ │ -00000420: 5354 454d 2069 6e20 656f 6c20 636f 6e76 STEM in eol conv │ │ │ -00000430: 6572 7369 6f6e 2e0a 5468 6520 7265 7475 ersion..The retu │ │ │ -00000440: 726e 6564 2063 6f64 696e 6720 7379 7374 rned coding syst │ │ │ -00000450: 656d 2063 6f6e 7665 7274 7320 656e 642d em converts end- │ │ │ -00000460: 6f66 2d6c 696e 6520 6279 2045 4f4c 2d54 of-line by EOL-T │ │ │ -00000470: 5950 450a 6275 7420 7465 7874 2061 7320 YPE.but text as │ │ │ -00000480: 7468 6520 7361 6d65 2077 6179 2061 7320 the same way as │ │ │ -00000490: 434f 4449 4e47 2d53 5953 5445 4d2e 0a45 CODING-SYSTEM..E │ │ │ -000004a0: 4f4c 2d54 5950 4520 7368 6f75 6c64 2062 OL-TYPE should b │ │ │ -000004b0: 6520 606c 6627 2c20 6063 726c 6627 2c20 e `lf', `crlf', │ │ │ -000004c0: 6063 7227 206f 7220 6e69 6c2e 0a49 6620 `cr' or nil..If │ │ │ -000004d0: 454f 4c2d 5459 5045 2069 7320 6e69 6c2c EOL-TYPE is nil, │ │ │ -000004e0: 2074 6865 2072 6574 7572 6e65 6420 636f the returned co │ │ │ -000004f0: 6469 6e67 2073 7973 7465 6d20 6465 7465 ding system dete │ │ │ -00000500: 6374 730a 686f 7720 656e 642d 6f66 2d6c cts.how end-of-l │ │ │ -00000510: 696e 6520 6973 2066 6f72 6d61 7474 6564 ine is formatted │ │ │ -00000520: 2061 7574 6f6d 6174 6963 616c 6c79 2077 automatically w │ │ │ -00000530: 6869 6c65 2064 6563 6f64 696e 672e 0a0a hile decoding... │ │ │ -00000540: 454f 4c2d 5459 5045 2063 616e 2062 6520 EOL-TYPE can be │ │ │ -00000550: 7370 6563 6966 6965 6420 6279 2061 6e20 specified by an │ │ │ -00000560: 7379 6d62 6f6c 2060 756e 6978 272c 2060 symbol `unix', ` │ │ │ -00000570: 646f 7327 206f 7220 606d 6163 272e 0a54 dos' or `mac'..T │ │ │ -00000580: 6865 7920 6d65 616e 7320 606c 6627 2c20 hey means `lf', │ │ │ -00000590: 6063 726c 6627 2c20 616e 6420 6063 7227 `crlf', and `cr' │ │ │ -000005a0: 2072 6573 7065 6374 6976 656c 792e 1f0a respectively... │ │ │ -000005b0: 2864 6566 616c 6961 7320 2763 6f64 696e (defalias 'codin │ │ │ -000005c0: 672d 7379 7374 656d 2d63 6861 6e67 652d g-system-change- │ │ │ -000005d0: 656f 6c2d 636f 6e76 6572 7369 6f6e 2023 eol-conversion # │ │ │ -000005e0: 5b28 636f 6469 6e67 2d73 7973 7465 6d20 [(coding-system │ │ │ -000005f0: 656f 6c2d 7479 7065 2920 220b 39ab a90b eol-type) ".9... │ │ │ -00000600: c461 ac85 0bc5 61ab 83c6 aa9b 0bc7 61ac .a....a.......a. │ │ │ -00000610: 850b c861 ab83 c9aa 8e0b ca61 ac85 0bcb ...a.......a.... │ │ │ -00000620: 61ab 83cc aa81 0b13 cd5c 6e21 8918 ac8c a........\n!.... │ │ │ -00000630: 0bac 835c 6eaa a5ce 5c6e 0b5c 22aa 9fcf ...\n...\n.\"... │ │ │ -00000640: 5c6e 2119 0bac 8309 aa94 0b08 55ab 835c \n!.........U..\ │ │ │ -00000650: 6eaa 8ccd 0921 8910 3fad 84ce 090b 5c22 n....!..?.....\" │ │ │ -00000660: 2929 8722 205b 6f72 6967 2d65 6f6c 2d74 ))." [orig-eol-t │ │ │ -00000670: 7970 6520 6261 7365 2063 6f64 696e 672d ype base coding- │ │ │ -00000680: 7379 7374 656d 2065 6f6c 2d74 7970 6520 system eol-type │ │ │ -00000690: 756e 6978 206c 6620 656f 6c2d 6c66 2064 unix lf eol-lf d │ │ │ -000006a0: 6f73 2063 726c 6620 656f 6c2d 6372 6c66 os crlf eol-crlf │ │ │ -000006b0: 206d 6163 2063 7220 656f 6c2d 6372 2063 mac cr eol-cr c │ │ │ -000006c0: 6f64 696e 672d 7379 7374 656d 2d65 6f6c oding-system-eol │ │ │ -000006d0: 2d74 7970 6520 636f 6469 6e67 2d73 7973 -type coding-sys │ │ │ -000006e0: 7465 6d2d 7072 6f70 6572 7479 2063 6f64 tem-property cod │ │ │ -000006f0: 696e 672d 7379 7374 656d 2d62 6173 655d ing-system-base] │ │ │ -00000700: 2034 2028 2324 202e 2031 3030 3529 5d29 4 (#$ . 1005)]) │ │ │ -00000710: 0a23 4035 3920 4578 6563 7574 6520 616e .#@59 Execute an │ │ │ -00000720: 2049 2f4f 2063 6f6d 6d61 6e64 2075 7369 I/O command usi │ │ │ -00000730: 6e67 2074 6865 2073 7065 6369 6669 6564 ng the specified │ │ │ -00000740: 2063 6f64 696e 6720 7379 7374 656d 2e1f coding system.. │ │ │ -00000750: 0a28 6465 6661 6c69 6173 2027 756e 6976 .(defalias 'univ │ │ │ -00000760: 6572 7361 6c2d 636f 6469 6e67 2d73 7973 ersal-coding-sys │ │ │ -00000770: 7465 6d2d 6172 6775 6d65 6e74 2023 5b6e tem-argument #[n │ │ │ -00000780: 696c 2022 0cad 8bc6 0c21 c761 3fad 83c8 il ".....!.a?... │ │ │ -00000790: 0c21 1dc9 0dab 86ca cb0d 5c22 aa81 cc0d .!........\".... │ │ │ -000007a0: 5c22 1bcd cace 0b5c 2221 1acf 5c6e 2119 \".....\"!..\n!. │ │ │ -000007b0: 0b89 181e 13d0 d121 88d2 0921 2e06 8722 .......!...!..." │ │ │ -000007c0: 205b 636f 6469 6e67 2d73 7973 7465 6d2d [coding-system- │ │ │ -000007d0: 666f 722d 7772 6974 6520 636d 6420 6b65 for-write cmd ke │ │ │ -000007e0: 7973 6571 2063 6f64 696e 672d 7379 7374 yseq coding-syst │ │ │ -000007f0: 656d 2062 7566 6665 722d 6669 6c65 2d63 em buffer-file-c │ │ │ -00000800: 6f64 696e 672d 7379 7374 656d 2064 6566 oding-system def │ │ │ -00000810: 6175 6c74 2063 6f64 696e 672d 7379 7374 ault coding-syst │ │ │ -00000820: 656d 2d74 7970 6520 7420 636f 6469 6e67 em-type t coding │ │ │ -00000830: 2d73 7973 7465 6d2d 6e61 6d65 2072 6561 -system-name rea │ │ │ -00000840: 642d 636f 6469 6e67 2d73 7973 7465 6d20 d-coding-system │ │ │ -00000850: 666f 726d 6174 2022 436f 6469 6e67 2073 format "Coding s │ │ │ -00000860: 7973 7465 6d20 666f 7220 666f 6c6c 6f77 ystem for follow │ │ │ -00000870: 696e 6720 636f 6d6d 616e 6420 2864 6566 ing command (def │ │ │ -00000880: 6175 6c74 2c20 2573 293a 2022 2022 436f ault, %s): " "Co │ │ │ -00000890: 6469 6e67 2073 7973 7465 6d20 666f 7220 ding system for │ │ │ -000008a0: 666f 6c6c 6f77 696e 6720 636f 6d6d 616e following comman │ │ │ -000008b0: 643a 2022 2072 6561 642d 6b65 792d 7365 d: " read-key-se │ │ │ -000008c0: 7175 656e 6365 2022 436f 6d6d 616e 6420 quence "Command │ │ │ -000008d0: 746f 2065 7865 6375 7465 2077 6974 6820 to execute with │ │ │ -000008e0: 2573 3a22 206b 6579 2d62 696e 6469 6e67 %s:" key-binding │ │ │ -000008f0: 206d 6573 7361 6765 2022 2220 6361 6c6c message "" call │ │ │ -00000900: 2d69 6e74 6572 6163 7469 7665 6c79 2063 -interactively c │ │ │ -00000910: 6f64 696e 672d 7379 7374 656d 2d66 6f72 oding-system-for │ │ │ -00000920: 2d72 6561 645d 2034 2028 2324 202e 2031 -read] 4 (#$ . 1 │ │ │ -00000930: 3831 3429 206e 696c 5d29 0a23 4033 3336 814) nil]).#@336 │ │ │ -00000940: 2053 6574 2064 6566 6175 6c74 2076 616c Set default val │ │ │ -00000950: 7565 206f 6620 7661 7269 6f75 7320 636f ue of various co │ │ │ -00000960: 6469 6e67 2073 7973 7465 6d73 2074 6f20 ding systems to │ │ │ -00000970: 434f 4449 4e47 2d53 5953 5445 4d2e 0a54 CODING-SYSTEM..T │ │ │ -00000980: 6869 7320 7365 7473 2074 6865 2066 6f6c his sets the fol │ │ │ -00000990: 6c6f 7769 6e67 2063 6f64 696e 6720 7379 lowing coding sy │ │ │ -000009a0: 7374 656d 733a 0a20 206f 2063 6f64 696e stems:. o codin │ │ │ -000009b0: 6720 7379 7374 656d 206f 6620 6120 6e65 g system of a ne │ │ │ -000009c0: 776c 7920 6372 6561 7465 6420 6275 6666 wly created buff │ │ │ -000009d0: 6572 0a20 206f 2064 6566 6175 6c74 2063 er. o default c │ │ │ -000009e0: 6f64 696e 6720 7379 7374 656d 2066 6f72 oding system for │ │ │ -000009f0: 2074 6572 6d69 6e61 6c20 6f75 7470 7574 terminal output │ │ │ -00000a00: 0a20 206f 2064 6566 6175 6c74 2063 6f64 . o default cod │ │ │ -00000a10: 696e 6720 7379 7374 656d 2066 6f72 206b ing system for k │ │ │ -00000a20: 6579 626f 6172 6420 696e 7075 740a 2020 eyboard input. │ │ │ -00000a30: 6f20 6465 6661 756c 7420 636f 6469 6e67 o default coding │ │ │ -00000a40: 2073 7973 7465 6d20 666f 7220 7375 6270 system for subp │ │ │ -00000a50: 726f 6365 7373 2049 2f4f 0a20 206f 2064 rocess I/O. o d │ │ │ -00000a60: 6566 6175 6c74 2063 6f64 696e 6720 7379 efault coding sy │ │ │ -00000a70: 7374 656d 2066 6f72 2063 6f6e 7665 7274 stem for convert │ │ │ -00000a80: 696e 6720 6669 6c65 206e 616d 6573 2e1f ing file names.. │ │ │ -00000a90: 0a28 6465 6661 6c69 6173 2027 7365 742d .(defalias 'set- │ │ │ -00000aa0: 6465 6661 756c 742d 636f 6469 6e67 2d73 default-coding-s │ │ │ -00000ab0: 7973 7465 6d73 2023 5b28 636f 6469 6e67 ystems #[(coding │ │ │ -00000ac0: 2d73 7973 7465 6d29 2022 c209 2188 c309 -system) "..!... │ │ │ -00000ad0: 2188 c409 2188 c509 2188 c6c7 c8c9 cacb !...!...!....... │ │ │ -00000ae0: cccd cecf d009 4445 45d1 cdce d2d0 0944 ......DEE......D │ │ │ -00000af0: 4545 4645 d323 8809 8910 8722 205b 6669 EEFE.#....." [fi │ │ │ -00000b00: 6c65 2d6e 616d 652d 636f 6469 6e67 2d73 le-name-coding-s │ │ │ -00000b10: 7973 7465 6d20 636f 6469 6e67 2d73 7973 ystem coding-sys │ │ │ -00000b20: 7465 6d20 6368 6563 6b2d 636f 6469 6e67 tem check-coding │ │ │ -00000b30: 2d73 7973 7465 6d20 7365 742d 6465 6661 -system set-defa │ │ │ -00000b40: 756c 742d 6275 6666 6572 2d66 696c 652d ult-buffer-file- │ │ │ -00000b50: 636f 6469 6e67 2d73 7973 7465 6d20 7365 coding-system se │ │ │ -00000b60: 742d 7465 726d 696e 616c 2d63 6f64 696e t-terminal-codin │ │ │ -00000b70: 672d 7379 7374 656d 2073 6574 2d6b 6579 g-system set-key │ │ │ -00000b80: 626f 6172 642d 636f 6469 6e67 2d73 7973 board-coding-sys │ │ │ -00000b90: 7465 6d20 6164 642d 686f 6f6b 2063 6f6d tem add-hook com │ │ │ -00000ba0: 696e 742d 6578 6563 2d68 6f6f 6b20 6c61 int-exec-hook la │ │ │ -00000bb0: 6d62 6461 206e 696c 206c 6574 2028 2870 mbda nil let ((p │ │ │ -00000bc0: 726f 6320 2867 6574 2d62 7566 6665 722d roc (get-buffer- │ │ │ -00000bd0: 7072 6f63 6573 7320 2863 7572 7265 6e74 process (current │ │ │ -00000be0: 2d62 7566 6665 7229 2929 2920 7365 742d -buffer)))) set- │ │ │ -00000bf0: 7072 6f63 6573 732d 696e 7075 742d 636f process-input-co │ │ │ -00000c00: 6469 6e67 2d73 7973 7465 6d20 7072 6f63 ding-system proc │ │ │ -00000c10: 206f 7220 636f 6469 6e67 2d73 7973 7465 or coding-syste │ │ │ -00000c20: 6d2d 666f 722d 7265 6164 2071 756f 7465 m-for-read quote │ │ │ -00000c30: 2073 6574 2d70 726f 6365 7373 2d6f 7574 set-process-out │ │ │ -00000c40: 7075 742d 636f 6469 6e67 2d73 7973 7465 put-coding-syste │ │ │ -00000c50: 6d20 636f 6469 6e67 2d73 7973 7465 6d2d m coding-system- │ │ │ -00000c60: 666f 722d 7772 6974 6520 6170 7065 6e64 for-write append │ │ │ -00000c70: 5d20 3133 2028 2324 202e 2032 3336 3929 ] 13 (#$ . 2369) │ │ │ -00000c80: 5d29 0a23 4036 3830 2041 6464 2043 4f44 ]).#@680 Add COD │ │ │ -00000c90: 494e 472d 5359 5354 454d 2061 7420 7468 ING-SYSTEM at th │ │ │ -00000ca0: 6520 6672 6f6e 7420 6f66 2074 6865 2070 e front of the p │ │ │ -00000cb0: 7269 6f72 6974 7920 6c69 7374 2066 6f72 riority list for │ │ │ -00000cc0: 2061 7574 6f6d 6174 6963 2064 6574 6563 automatic detec │ │ │ -00000cd0: 7469 6f6e 2e0a 5468 6973 2061 6c73 6f20 tion..This also │ │ │ -00000ce0: 7365 7473 2074 6865 2066 6f6c 6c6f 7769 sets the followi │ │ │ -00000cf0: 6e67 2063 6f64 696e 6720 7379 7374 656d ng coding system │ │ │ -00000d00: 733a 0a20 206f 2063 6f64 696e 6720 7379 s:. o coding sy │ │ │ -00000d10: 7374 656d 206f 6620 6120 6e65 776c 7920 stem of a newly │ │ │ -00000d20: 6372 6561 7465 6420 6275 6666 6572 0a20 created buffer. │ │ │ -00000d30: 206f 2064 6566 6175 6c74 2063 6f64 696e o default codin │ │ │ -00000d40: 6720 7379 7374 656d 2066 6f72 2074 6572 g system for ter │ │ │ -00000d50: 6d69 6e61 6c20 6f75 7470 7574 0a20 206f minal output. o │ │ │ -00000d60: 2064 6566 6175 6c74 2063 6f64 696e 6720 default coding │ │ │ -00000d70: 7379 7374 656d 2066 6f72 206b 6579 626f system for keybo │ │ │ -00000d80: 6172 6420 696e 7075 740a 2020 6f20 6465 ard input. o de │ │ │ -00000d90: 6661 756c 7420 636f 6469 6e67 2073 7973 fault coding sys │ │ │ -00000da0: 7465 6d20 666f 7220 636f 6e76 6572 7469 tem for converti │ │ │ -00000db0: 6e67 2066 696c 6520 6e61 6d65 732e 0a0a ng file names... │ │ │ -00000dc0: 4966 2043 4f44 494e 472d 5359 5354 454d If CODING-SYSTEM │ │ │ -00000dd0: 2073 7065 6369 6669 6573 2061 2063 6572 specifies a cer │ │ │ -00000de0: 7461 696e 2074 7970 6520 6f66 2045 4f4c tain type of EOL │ │ │ -00000df0: 2063 6f6e 7665 7273 696f 6e2c 2074 6865 conversion, the │ │ │ -00000e00: 2063 6f64 696e 670a 7379 7374 656d 7320 coding.systems │ │ │ -00000e10: 7365 7420 6279 2074 6869 7320 6675 6e63 set by this func │ │ │ -00000e20: 7469 6f6e 2077 696c 6c20 7573 6520 7468 tion will use th │ │ │ -00000e30: 6174 2074 7970 6520 6f66 2045 4f4c 2063 at type of EOL c │ │ │ -00000e40: 6f6e 7665 7273 696f 6e2e 0a0a 5468 6973 onversion...This │ │ │ -00000e50: 2063 6f6d 6d61 6e64 2064 6f65 7320 6e6f command does no │ │ │ -00000e60: 7420 6368 616e 6765 2074 6865 2064 6566 t change the def │ │ │ -00000e70: 6175 6c74 2076 616c 7565 206f 6620 7465 ault value of te │ │ │ -00000e80: 726d 696e 616c 2063 6f64 696e 6720 7379 rminal coding sy │ │ │ -00000e90: 7374 656d 0a66 6f72 204d 532d 444f 5320 stem.for MS-DOS │ │ │ -00000ea0: 7465 726d 696e 616c 2c20 6265 6361 7573 terminal, becaus │ │ │ -00000eb0: 6520 444f 5320 7465 726d 696e 616c 7320 e DOS terminals │ │ │ -00000ec0: 6f6e 6c79 2073 7570 706f 7274 2061 2073 only support a s │ │ │ -00000ed0: 696e 676c 6520 636f 6469 6e67 0a73 7973 ingle coding.sys │ │ │ -00000ee0: 7465 6d2c 2061 6e64 2045 6d61 6373 2061 tem, and Emacs a │ │ │ -00000ef0: 7574 6f6d 6174 6963 616c 6c79 2073 6574 utomatically set │ │ │ -00000f00: 7320 7468 6520 6465 6661 756c 7420 746f s the default to │ │ │ -00000f10: 2074 6861 7420 636f 6469 6e67 2073 7973 that coding sys │ │ │ -00000f20: 7465 6d20 6174 0a73 7461 7274 7570 2e1f tem at.startup.. │ │ │ -00000f30: 0a28 6465 6661 6c69 6173 2027 7072 6566 .(defalias 'pref │ │ │ -00000f40: 6572 2d63 6f64 696e 672d 7379 7374 656d er-coding-system │ │ │ -00000f50: 2023 5b28 636f 6469 6e67 2d73 7973 7465 #[(coding-syste │ │ │ -00000f60: 6d29 2022 0bab 85c4 0b21 ac85 c5c6 0b5c m) ".....!.....\ │ │ │ -00000f70: 2288 c70b 21c8 0b21 c90b 2118 1a89 19ac "...!..!..!..... │ │ │ -00000f80: 85c5 ca0b 5c22 88cb 095c 6eae 810b 5c22 ....\"...\n...\" │ │ │ -00000f90: 8809 cc20 4061 ac85 cd09 4321 885c 6eab ... @a....C!.\n. │ │ │ -00000fa0: 8974 ab86 cecf 5c6e 0b23 8808 d073 ab87 .t....\n.#...s.. │ │ │ -00000fb0: d15c 6e08 5c22 13aa 825c 6e13 d20b 212b .\n.\"...\n...!+ │ │ │ -00000fc0: 8722 205b 656f 6c2d 7479 7065 2063 6f64 ." [eol-type cod │ │ │ -00000fd0: 696e 672d 6361 7465 676f 7279 2062 6173 ing-category bas │ │ │ -00000fe0: 6520 636f 6469 6e67 2d73 7973 7465 6d20 e coding-system │ │ │ -00000ff0: 6669 6e64 2d63 6f64 696e 672d 7379 7374 find-coding-syst │ │ │ -00001000: 656d 2065 7272 6f72 2022 496e 7661 6c69 em error "Invali │ │ │ -00001010: 6420 636f 6469 6e67 2073 7973 7465 6d20 d coding system │ │ │ -00001020: 6025 7327 2220 636f 6469 6e67 2d73 7973 `%s'" coding-sys │ │ │ -00001030: 7465 6d2d 6361 7465 676f 7279 2063 6f64 tem-category cod │ │ │ -00001040: 696e 672d 7379 7374 656d 2d62 6173 6520 ing-system-base │ │ │ -00001050: 636f 6469 6e67 2d73 7973 7465 6d2d 656f coding-system-eo │ │ │ -00001060: 6c2d 7479 7065 2022 4361 6e27 7420 7072 l-type "Can't pr │ │ │ -00001070: 6566 6572 2074 6865 2063 6f64 696e 6720 efer the coding │ │ │ -00001080: 7379 7374 656d 2060 2573 2722 2073 6574 system `%s'" set │ │ │ -00001090: 2d63 6f64 696e 672d 6361 7465 676f 7279 -coding-category │ │ │ -000010a0: 2d73 7973 7465 6d20 636f 6469 6e67 2d63 -system coding-c │ │ │ -000010b0: 6174 6567 6f72 792d 6c69 7374 2073 6574 ategory-list set │ │ │ -000010c0: 2d63 6f64 696e 672d 7072 696f 7269 7479 -coding-priority │ │ │ -000010d0: 2d6c 6973 7420 6d65 7373 6167 6520 2248 -list message "H │ │ │ -000010e0: 6967 6865 7374 2070 7269 6f72 6974 7920 ighest priority │ │ │ -000010f0: 6973 2073 6574 2074 6f20 2573 2028 6261 is set to %s (ba │ │ │ -00001100: 7365 206f 6620 2573 2922 2028 6c66 2063 se of %s)" (lf c │ │ │ -00001110: 726c 6620 6d61 6329 2063 6f64 696e 672d rlf mac) coding- │ │ │ -00001120: 7379 7374 656d 2d63 6861 6e67 652d 656f system-change-eo │ │ │ -00001130: 6c2d 636f 6e76 6572 7369 6f6e 2073 6574 l-conversion set │ │ │ -00001140: 2d64 6566 6175 6c74 2d63 6f64 696e 672d -default-coding- │ │ │ -00001150: 7379 7374 656d 735d 2035 2028 2324 202e systems] 5 (#$ . │ │ │ -00001160: 2033 3230 3929 2022 7a50 7265 6665 7220 3209) "zPrefer │ │ │ -00001170: 636f 6469 6e67 2073 7973 7465 6d3a 2022 coding system: " │ │ │ -00001180: 5d29 0a23 4032 3938 2053 6574 2063 6f64 ]).#@298 Set cod │ │ │ -00001190: 696e 6720 7379 7374 656d 7320 666f 7220 ing systems for │ │ │ -000011a0: 7468 6520 7072 6f63 6573 7320 6173 736f the process asso │ │ │ -000011b0: 6369 6174 6564 2077 6974 6820 7468 6520 ciated with the │ │ │ -000011c0: 6375 7272 656e 7420 6275 6666 6572 2e0a current buffer.. │ │ │ -000011d0: 4445 434f 4449 4e47 2069 7320 7468 6520 DECODING is the │ │ │ -000011e0: 636f 6469 6e67 2073 7973 7465 6d20 746f coding system to │ │ │ -000011f0: 2062 6520 7573 6564 2074 6f20 6465 636f be used to deco │ │ │ -00001200: 6465 2069 6e70 7574 2066 726f 6d20 7468 de input from th │ │ │ -00001210: 6520 7072 6f63 6573 732c 0a45 4e43 4f44 e process,.ENCOD │ │ │ -00001220: 494e 4720 6973 2074 6865 2063 6f64 696e ING is the codin │ │ │ -00001230: 6720 7379 7374 656d 2074 6f20 6265 2075 g system to be u │ │ │ -00001240: 7365 6420 746f 2065 6e63 6f64 6520 6f75 sed to encode ou │ │ │ -00001250: 7470 7574 2074 6f20 7468 6520 7072 6f63 tput to the proc │ │ │ -00001260: 6573 732e 0a0a 466f 7220 6120 6c69 7374 ess...For a list │ │ │ -00001270: 206f 6620 706f 7373 6962 6c65 2076 616c of possible val │ │ │ -00001280: 7565 7320 6f66 2043 4f44 494e 472d 5359 ues of CODING-SY │ │ │ -00001290: 5354 454d 2c20 7573 6520 5c5b 6c69 7374 STEM, use \[list │ │ │ -000012a0: 2d63 6f64 696e 672d 7379 7374 656d 735d -coding-systems] │ │ │ -000012b0: 2e1f 0a28 6465 6661 6c69 6173 2027 7365 ...(defalias 'se │ │ │ -000012c0: 742d 6275 6666 6572 2d70 726f 6365 7373 t-buffer-process │ │ │ -000012d0: 2d63 6f64 696e 672d 7379 7374 656d 2023 -coding-system # │ │ │ -000012e0: 5b28 6465 636f 6469 6e67 2065 6e63 6f64 [(decoding encod │ │ │ -000012f0: 696e 6729 2022 c370 2189 1aac 86c4 c521 ing) ".p!......! │ │ │ -00001300: 88aa 8ec6 0921 88c6 0821 88c7 5c6e 0908 .....!...!..\n.. │ │ │ -00001310: 2388 29c8 2087 2220 5b65 6e63 6f64 696e #.). ." [encodin │ │ │ -00001320: 6720 6465 636f 6469 6e67 2070 726f 6320 g decoding proc │ │ │ -00001330: 6765 742d 6275 6666 6572 2d70 726f 6365 get-buffer-proce │ │ │ -00001340: 7373 2065 7272 6f72 2022 6e6f 2070 726f ss error "no pro │ │ │ -00001350: 6365 7373 2220 6368 6563 6b2d 636f 6469 cess" check-codi │ │ │ -00001360: 6e67 2d73 7973 7465 6d20 7365 742d 7072 ng-system set-pr │ │ │ -00001370: 6f63 6573 732d 636f 6469 6e67 2d73 7973 ocess-coding-sys │ │ │ -00001380: 7465 6d20 666f 7263 652d 6d6f 6465 2d6c tem force-mode-l │ │ │ -00001390: 696e 652d 7570 6461 7465 5d20 3520 2823 ine-update] 5 (# │ │ │ -000013a0: 2420 2e20 3434 3839 2920 227a 436f 6469 $ . 4489) "zCodi │ │ │ -000013b0: 6e67 2d73 7973 7465 6d20 666f 7220 7072 ng-system for pr │ │ │ -000013c0: 6f63 6573 7320 696e 7075 743a 205c 6e7a ocess input: \nz │ │ │ -000013d0: 436f 6469 6e67 2d73 7973 7465 6d20 666f Coding-system fo │ │ │ -000013e0: 7220 7072 6f63 6573 7320 6f75 7470 7574 r process output │ │ │ -000013f0: 3a20 225d 290a 2870 726f 7669 6465 2027 : "]).(provide ' │ │ │ -00001400: 636f 6465 2d63 6d64 7329 0a code-cmds). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3335 2032 3032 310a 3b3b 3b20 :08:35 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6f64 652d 636d 6473 4/lisp/code-cmds │ │ │ +00000090: 2e65 6c0a 3b3b 3b20 656d 6163 7320 7665 .el.;;; emacs ve │ │ │ +000000a0: 7273 696f 6e20 3231 2e34 2028 7061 7463 rsion 21.4 (patc │ │ │ +000000b0: 6820 3234 2920 2253 7461 6e64 6172 6420 h 24) "Standard │ │ │ +000000c0: 4322 2058 456d 6163 7320 4c75 6369 642e C" XEmacs Lucid. │ │ │ +000000d0: 0a3b 3b3b 2062 7974 6563 6f6d 7020 7665 .;;; bytecomp ve │ │ │ +000000e0: 7273 696f 6e20 322e 3237 2058 456d 6163 rsion 2.27 XEmac │ │ │ +000000f0: 733b 2032 3030 302d 3039 2d31 322e 0a3b s; 2000-09-12..; │ │ │ +00000100: 3b3b 206f 7074 696d 697a 6174 696f 6e20 ;; optimization │ │ │ +00000110: 6973 206f 6e2e 0a3b 3b3b 2074 6869 7320 is on..;;; this │ │ │ +00000120: 6669 6c65 2075 7365 7320 6f70 636f 6465 file uses opcode │ │ │ +00000130: 7320 7768 6963 6820 646f 206e 6f74 2065 s which do not e │ │ │ +00000140: 7869 7374 2069 6e20 456d 6163 7320 3139 xist in Emacs 19 │ │ │ +00000150: 2e0a 0a28 6966 2028 616e 6420 2862 6f75 ...(if (and (bou │ │ │ +00000160: 6e64 7020 2765 6d61 6373 2d76 6572 7369 ndp 'emacs-versi │ │ │ +00000170: 6f6e 290a 0920 286f 7220 2861 6e64 2028 on).. (or (and ( │ │ │ +00000180: 626f 756e 6470 2027 6570 6f63 683a 3a76 boundp 'epoch::v │ │ │ +00000190: 6572 7369 6f6e 2920 6570 6f63 683a 3a76 ersion) epoch::v │ │ │ +000001a0: 6572 7369 6f6e 290a 0920 2020 2020 2873 ersion).. (s │ │ │ +000001b0: 7472 696e 672d 6c65 7373 7020 656d 6163 tring-lessp emac │ │ │ +000001c0: 732d 7665 7273 696f 6e20 2232 3022 2929 s-version "20")) │ │ │ +000001d0: 290a 2020 2020 2865 7272 6f72 2022 6063 ). (error "`c │ │ │ +000001e0: 6f64 652d 636d 6473 2e65 6c27 2077 6173 ode-cmds.el' was │ │ │ +000001f0: 2063 6f6d 7069 6c65 6420 666f 7220 456d compiled for Em │ │ │ +00000200: 6163 7320 3230 2229 290a 0a28 6f72 2028 acs 20"))..(or ( │ │ │ +00000210: 626f 756e 6470 2027 6375 7272 656e 742d boundp 'current- │ │ │ +00000220: 6c6f 6164 2d6c 6973 7429 2028 7365 7471 load-list) (setq │ │ │ +00000230: 2063 7572 7265 6e74 2d6c 6f61 642d 6c69 current-load-li │ │ │ +00000240: 7374 206e 696c 2929 0a0a 0a23 4035 3420 st nil))...#@54 │ │ │ +00000250: 4b65 796d 6170 2066 6f72 204d 756c 6520 Keymap for Mule │ │ │ +00000260: 616e 6420 436f 6469 6e67 2063 7973 7465 and Coding cyste │ │ │ +00000270: 6d20 7370 6563 6966 6963 2063 6f6d 6d61 m specific comma │ │ │ +00000280: 6e64 732e 1f0a 2864 6566 7661 7220 636f nds...(defvar co │ │ │ +00000290: 6469 6e67 2d6b 6579 6d61 7020 286d 616b ding-keymap (mak │ │ │ +000002a0: 652d 7370 6172 7365 2d6b 6579 6d61 7020 e-sparse-keymap │ │ │ +000002b0: 224d 756c 652f 436f 6e64 696e 6722 2920 "Mule/Conding") │ │ │ +000002c0: 2823 2420 2e20 3539 3229 290a 2862 7974 (#$ . 592)).(byt │ │ │ +000002d0: 652d 636f 6465 2022 c208 c309 2388 c209 e-code "....#... │ │ │ +000002e0: c4c5 2388 c209 c6c7 2388 c209 c8c9 2388 ..#.....#.....#. │ │ │ +000002f0: c209 cacb 2388 c209 cccd 2387 2220 5b63 ....#.....#." [c │ │ │ +00000300: 746c 2d78 2d6d 6170 2063 6f64 696e 672d tl-x-map coding- │ │ │ +00000310: 6b65 796d 6170 2064 6566 696e 652d 6b65 keymap define-ke │ │ │ +00000320: 7920 220d 2220 2266 2220 7365 742d 6275 y "." "f" set-bu │ │ │ +00000330: 6666 6572 2d66 696c 652d 636f 6469 6e67 ffer-file-coding │ │ │ +00000340: 2d73 7973 7465 6d20 2246 2220 7365 742d -system "F" set- │ │ │ +00000350: 6465 6661 756c 742d 6275 6666 6572 2d66 default-buffer-f │ │ │ +00000360: 696c 652d 636f 6469 6e67 2d73 7973 7465 ile-coding-syste │ │ │ +00000370: 6d20 2274 2220 7365 742d 7465 726d 696e m "t" set-termin │ │ │ +00000380: 616c 2d63 6f64 696e 672d 7379 7374 656d al-coding-system │ │ │ +00000390: 2022 7022 2073 6574 2d62 7566 6665 722d "p" set-buffer- │ │ │ +000003a0: 7072 6f63 6573 732d 636f 6469 6e67 2d73 process-coding-s │ │ │ +000003b0: 7973 7465 6d20 2263 2220 756e 6976 6572 ystem "c" univer │ │ │ +000003c0: 7361 6c2d 636f 6469 6e67 2d73 7973 7465 sal-coding-syste │ │ │ +000003d0: 6d2d 6172 6775 6d65 6e74 5d20 3429 0a23 m-argument] 4).# │ │ │ +000003e0: 4034 3531 2052 6574 7572 6e20 6120 636f @451 Return a co │ │ │ +000003f0: 6469 6e67 2073 7973 7465 6d20 7768 6963 ding system whic │ │ │ +00000400: 6820 6469 6666 6572 7320 6672 6f6d 2043 h differs from C │ │ │ +00000410: 4f44 494e 472d 5359 5354 454d 2069 6e20 ODING-SYSTEM in │ │ │ +00000420: 656f 6c20 636f 6e76 6572 7369 6f6e 2e0a eol conversion.. │ │ │ +00000430: 5468 6520 7265 7475 726e 6564 2063 6f64 The returned cod │ │ │ +00000440: 696e 6720 7379 7374 656d 2063 6f6e 7665 ing system conve │ │ │ +00000450: 7274 7320 656e 642d 6f66 2d6c 696e 6520 rts end-of-line │ │ │ +00000460: 6279 2045 4f4c 2d54 5950 450a 6275 7420 by EOL-TYPE.but │ │ │ +00000470: 7465 7874 2061 7320 7468 6520 7361 6d65 text as the same │ │ │ +00000480: 2077 6179 2061 7320 434f 4449 4e47 2d53 way as CODING-S │ │ │ +00000490: 5953 5445 4d2e 0a45 4f4c 2d54 5950 4520 YSTEM..EOL-TYPE │ │ │ +000004a0: 7368 6f75 6c64 2062 6520 606c 6627 2c20 should be `lf', │ │ │ +000004b0: 6063 726c 6627 2c20 6063 7227 206f 7220 `crlf', `cr' or │ │ │ +000004c0: 6e69 6c2e 0a49 6620 454f 4c2d 5459 5045 nil..If EOL-TYPE │ │ │ +000004d0: 2069 7320 6e69 6c2c 2074 6865 2072 6574 is nil, the ret │ │ │ +000004e0: 7572 6e65 6420 636f 6469 6e67 2073 7973 urned coding sys │ │ │ +000004f0: 7465 6d20 6465 7465 6374 730a 686f 7720 tem detects.how │ │ │ +00000500: 656e 642d 6f66 2d6c 696e 6520 6973 2066 end-of-line is f │ │ │ +00000510: 6f72 6d61 7474 6564 2061 7574 6f6d 6174 ormatted automat │ │ │ +00000520: 6963 616c 6c79 2077 6869 6c65 2064 6563 ically while dec │ │ │ +00000530: 6f64 696e 672e 0a0a 454f 4c2d 5459 5045 oding...EOL-TYPE │ │ │ +00000540: 2063 616e 2062 6520 7370 6563 6966 6965 can be specifie │ │ │ +00000550: 6420 6279 2061 6e20 7379 6d62 6f6c 2060 d by an symbol ` │ │ │ +00000560: 756e 6978 272c 2060 646f 7327 206f 7220 unix', `dos' or │ │ │ +00000570: 606d 6163 272e 0a54 6865 7920 6d65 616e `mac'..They mean │ │ │ +00000580: 7320 606c 6627 2c20 6063 726c 6627 2c20 s `lf', `crlf', │ │ │ +00000590: 616e 6420 6063 7227 2072 6573 7065 6374 and `cr' respect │ │ │ +000005a0: 6976 656c 792e 1f0a 2864 6566 616c 6961 ively...(defalia │ │ │ +000005b0: 7320 2763 6f64 696e 672d 7379 7374 656d s 'coding-system │ │ │ +000005c0: 2d63 6861 6e67 652d 656f 6c2d 636f 6e76 -change-eol-conv │ │ │ +000005d0: 6572 7369 6f6e 2023 5b28 636f 6469 6e67 ersion #[(coding │ │ │ +000005e0: 2d73 7973 7465 6d20 656f 6c2d 7479 7065 -system eol-type │ │ │ +000005f0: 2920 220b 39ab a90b c461 ac85 0bc5 61ab ) ".9....a....a. │ │ │ +00000600: 83c6 aa9b 0bc7 61ac 850b c861 ab83 c9aa ......a....a.... │ │ │ +00000610: 8e0b ca61 ac85 0bcb 61ab 83cc aa81 0b13 ...a....a....... │ │ │ +00000620: cd5c 6e21 8918 ac8c 0bac 835c 6eaa a5ce .\n!.......\n... │ │ │ +00000630: 5c6e 0b5c 22aa 9fcf 5c6e 2119 0bac 8309 \n.\"...\n!..... │ │ │ +00000640: aa94 0b08 55ab 835c 6eaa 8ccd 0921 8910 ....U..\n....!.. │ │ │ +00000650: 3fad 84ce 090b 5c22 2929 8722 205b 6f72 ?.....\"))." [or │ │ │ +00000660: 6967 2d65 6f6c 2d74 7970 6520 6261 7365 ig-eol-type base │ │ │ +00000670: 2063 6f64 696e 672d 7379 7374 656d 2065 coding-system e │ │ │ +00000680: 6f6c 2d74 7970 6520 756e 6978 206c 6620 ol-type unix lf │ │ │ +00000690: 656f 6c2d 6c66 2064 6f73 2063 726c 6620 eol-lf dos crlf │ │ │ +000006a0: 656f 6c2d 6372 6c66 206d 6163 2063 7220 eol-crlf mac cr │ │ │ +000006b0: 656f 6c2d 6372 2063 6f64 696e 672d 7379 eol-cr coding-sy │ │ │ +000006c0: 7374 656d 2d65 6f6c 2d74 7970 6520 636f stem-eol-type co │ │ │ +000006d0: 6469 6e67 2d73 7973 7465 6d2d 7072 6f70 ding-system-prop │ │ │ +000006e0: 6572 7479 2063 6f64 696e 672d 7379 7374 erty coding-syst │ │ │ +000006f0: 656d 2d62 6173 655d 2034 2028 2324 202e em-base] 4 (#$ . │ │ │ +00000700: 2039 3937 295d 290a 2340 3539 2045 7865 997)]).#@59 Exe │ │ │ +00000710: 6375 7465 2061 6e20 492f 4f20 636f 6d6d cute an I/O comm │ │ │ +00000720: 616e 6420 7573 696e 6720 7468 6520 7370 and using the sp │ │ │ +00000730: 6563 6966 6965 6420 636f 6469 6e67 2073 ecified coding s │ │ │ +00000740: 7973 7465 6d2e 1f0a 2864 6566 616c 6961 ystem...(defalia │ │ │ +00000750: 7320 2775 6e69 7665 7273 616c 2d63 6f64 s 'universal-cod │ │ │ +00000760: 696e 672d 7379 7374 656d 2d61 7267 756d ing-system-argum │ │ │ +00000770: 656e 7420 235b 6e69 6c20 220c ad8b c60c ent #[nil "..... │ │ │ +00000780: 21c7 613f ad83 c80c 211d c90d ab86 cacb !.a?....!....... │ │ │ +00000790: 0d5c 22aa 81cc 0d5c 221b cdca ce0b 5c22 .\"....\".....\" │ │ │ +000007a0: 211a cf5c 6e21 190b 8918 1e13 d0d1 2188 !..\n!........!. │ │ │ +000007b0: d209 212e 0687 2220 5b63 6f64 696e 672d ..!..." [coding- │ │ │ +000007c0: 7379 7374 656d 2d66 6f72 2d77 7269 7465 system-for-write │ │ │ +000007d0: 2063 6d64 206b 6579 7365 7120 636f 6469 cmd keyseq codi │ │ │ +000007e0: 6e67 2d73 7973 7465 6d20 6275 6666 6572 ng-system buffer │ │ │ +000007f0: 2d66 696c 652d 636f 6469 6e67 2d73 7973 -file-coding-sys │ │ │ +00000800: 7465 6d20 6465 6661 756c 7420 636f 6469 tem default codi │ │ │ +00000810: 6e67 2d73 7973 7465 6d2d 7479 7065 2074 ng-system-type t │ │ │ +00000820: 2063 6f64 696e 672d 7379 7374 656d 2d6e coding-system-n │ │ │ +00000830: 616d 6520 7265 6164 2d63 6f64 696e 672d ame read-coding- │ │ │ +00000840: 7379 7374 656d 2066 6f72 6d61 7420 2243 system format "C │ │ │ +00000850: 6f64 696e 6720 7379 7374 656d 2066 6f72 oding system for │ │ │ +00000860: 2066 6f6c 6c6f 7769 6e67 2063 6f6d 6d61 following comma │ │ │ +00000870: 6e64 2028 6465 6661 756c 742c 2025 7329 nd (default, %s) │ │ │ +00000880: 3a20 2220 2243 6f64 696e 6720 7379 7374 : " "Coding syst │ │ │ +00000890: 656d 2066 6f72 2066 6f6c 6c6f 7769 6e67 em for following │ │ │ +000008a0: 2063 6f6d 6d61 6e64 3a20 2220 7265 6164 command: " read │ │ │ +000008b0: 2d6b 6579 2d73 6571 7565 6e63 6520 2243 -key-sequence "C │ │ │ +000008c0: 6f6d 6d61 6e64 2074 6f20 6578 6563 7574 ommand to execut │ │ │ +000008d0: 6520 7769 7468 2025 733a 2220 6b65 792d e with %s:" key- │ │ │ +000008e0: 6269 6e64 696e 6720 6d65 7373 6167 6520 binding message │ │ │ +000008f0: 2222 2063 616c 6c2d 696e 7465 7261 6374 "" call-interact │ │ │ +00000900: 6976 656c 7920 636f 6469 6e67 2d73 7973 ively coding-sys │ │ │ +00000910: 7465 6d2d 666f 722d 7265 6164 5d20 3420 tem-for-read] 4 │ │ │ +00000920: 2823 2420 2e20 3138 3035 2920 6e69 6c5d (#$ . 1805) nil] │ │ │ +00000930: 290a 2340 3333 3620 5365 7420 6465 6661 ).#@336 Set defa │ │ │ +00000940: 756c 7420 7661 6c75 6520 6f66 2076 6172 ult value of var │ │ │ +00000950: 696f 7573 2063 6f64 696e 6720 7379 7374 ious coding syst │ │ │ +00000960: 656d 7320 746f 2043 4f44 494e 472d 5359 ems to CODING-SY │ │ │ +00000970: 5354 454d 2e0a 5468 6973 2073 6574 7320 STEM..This sets │ │ │ +00000980: 7468 6520 666f 6c6c 6f77 696e 6720 636f the following co │ │ │ +00000990: 6469 6e67 2073 7973 7465 6d73 3a0a 2020 ding systems:. │ │ │ +000009a0: 6f20 636f 6469 6e67 2073 7973 7465 6d20 o coding system │ │ │ +000009b0: 6f66 2061 206e 6577 6c79 2063 7265 6174 of a newly creat │ │ │ +000009c0: 6564 2062 7566 6665 720a 2020 6f20 6465 ed buffer. o de │ │ │ +000009d0: 6661 756c 7420 636f 6469 6e67 2073 7973 fault coding sys │ │ │ +000009e0: 7465 6d20 666f 7220 7465 726d 696e 616c tem for terminal │ │ │ +000009f0: 206f 7574 7075 740a 2020 6f20 6465 6661 output. o defa │ │ │ +00000a00: 756c 7420 636f 6469 6e67 2073 7973 7465 ult coding syste │ │ │ +00000a10: 6d20 666f 7220 6b65 7962 6f61 7264 2069 m for keyboard i │ │ │ +00000a20: 6e70 7574 0a20 206f 2064 6566 6175 6c74 nput. o default │ │ │ +00000a30: 2063 6f64 696e 6720 7379 7374 656d 2066 coding system f │ │ │ +00000a40: 6f72 2073 7562 7072 6f63 6573 7320 492f or subprocess I/ │ │ │ +00000a50: 4f0a 2020 6f20 6465 6661 756c 7420 636f O. o default co │ │ │ +00000a60: 6469 6e67 2073 7973 7465 6d20 666f 7220 ding system for │ │ │ +00000a70: 636f 6e76 6572 7469 6e67 2066 696c 6520 converting file │ │ │ +00000a80: 6e61 6d65 732e 1f0a 2864 6566 616c 6961 names...(defalia │ │ │ +00000a90: 7320 2773 6574 2d64 6566 6175 6c74 2d63 s 'set-default-c │ │ │ +00000aa0: 6f64 696e 672d 7379 7374 656d 7320 235b oding-systems #[ │ │ │ +00000ab0: 2863 6f64 696e 672d 7379 7374 656d 2920 (coding-system) │ │ │ +00000ac0: 22c2 0921 88c3 0921 88c4 0921 88c5 0921 "..!...!...!...! │ │ │ +00000ad0: 88c6 c7c8 c9ca cbcc cdce cfd0 0944 4545 .............DEE │ │ │ +00000ae0: d1cd ced2 d009 4445 4546 45d3 2388 0989 ......DEEFE.#... │ │ │ +00000af0: 1087 2220 5b66 696c 652d 6e61 6d65 2d63 .." [file-name-c │ │ │ +00000b00: 6f64 696e 672d 7379 7374 656d 2063 6f64 oding-system cod │ │ │ +00000b10: 696e 672d 7379 7374 656d 2063 6865 636b ing-system check │ │ │ +00000b20: 2d63 6f64 696e 672d 7379 7374 656d 2073 -coding-system s │ │ │ +00000b30: 6574 2d64 6566 6175 6c74 2d62 7566 6665 et-default-buffe │ │ │ +00000b40: 722d 6669 6c65 2d63 6f64 696e 672d 7379 r-file-coding-sy │ │ │ +00000b50: 7374 656d 2073 6574 2d74 6572 6d69 6e61 stem set-termina │ │ │ +00000b60: 6c2d 636f 6469 6e67 2d73 7973 7465 6d20 l-coding-system │ │ │ +00000b70: 7365 742d 6b65 7962 6f61 7264 2d63 6f64 set-keyboard-cod │ │ │ +00000b80: 696e 672d 7379 7374 656d 2061 6464 2d68 ing-system add-h │ │ │ +00000b90: 6f6f 6b20 636f 6d69 6e74 2d65 7865 632d ook comint-exec- │ │ │ +00000ba0: 686f 6f6b 206c 616d 6264 6120 6e69 6c20 hook lambda nil │ │ │ +00000bb0: 6c65 7420 2828 7072 6f63 2028 6765 742d let ((proc (get- │ │ │ +00000bc0: 6275 6666 6572 2d70 726f 6365 7373 2028 buffer-process ( │ │ │ +00000bd0: 6375 7272 656e 742d 6275 6666 6572 2929 current-buffer)) │ │ │ +00000be0: 2929 2073 6574 2d70 726f 6365 7373 2d69 )) set-process-i │ │ │ +00000bf0: 6e70 7574 2d63 6f64 696e 672d 7379 7374 nput-coding-syst │ │ │ +00000c00: 656d 2070 726f 6320 6f72 2063 6f64 696e em proc or codin │ │ │ +00000c10: 672d 7379 7374 656d 2d66 6f72 2d72 6561 g-system-for-rea │ │ │ +00000c20: 6420 7175 6f74 6520 7365 742d 7072 6f63 d quote set-proc │ │ │ +00000c30: 6573 732d 6f75 7470 7574 2d63 6f64 696e ess-output-codin │ │ │ +00000c40: 672d 7379 7374 656d 2063 6f64 696e 672d g-system coding- │ │ │ +00000c50: 7379 7374 656d 2d66 6f72 2d77 7269 7465 system-for-write │ │ │ +00000c60: 2061 7070 656e 645d 2031 3320 2823 2420 append] 13 (#$ │ │ │ +00000c70: 2e20 3233 3630 295d 290a 2340 3638 3020 . 2360)]).#@680 │ │ │ +00000c80: 4164 6420 434f 4449 4e47 2d53 5953 5445 Add CODING-SYSTE │ │ │ +00000c90: 4d20 6174 2074 6865 2066 726f 6e74 206f M at the front o │ │ │ +00000ca0: 6620 7468 6520 7072 696f 7269 7479 206c f the priority l │ │ │ +00000cb0: 6973 7420 666f 7220 6175 746f 6d61 7469 ist for automati │ │ │ +00000cc0: 6320 6465 7465 6374 696f 6e2e 0a54 6869 c detection..Thi │ │ │ +00000cd0: 7320 616c 736f 2073 6574 7320 7468 6520 s also sets the │ │ │ +00000ce0: 666f 6c6c 6f77 696e 6720 636f 6469 6e67 following coding │ │ │ +00000cf0: 2073 7973 7465 6d73 3a0a 2020 6f20 636f systems:. o co │ │ │ +00000d00: 6469 6e67 2073 7973 7465 6d20 6f66 2061 ding system of a │ │ │ +00000d10: 206e 6577 6c79 2063 7265 6174 6564 2062 newly created b │ │ │ +00000d20: 7566 6665 720a 2020 6f20 6465 6661 756c uffer. o defaul │ │ │ +00000d30: 7420 636f 6469 6e67 2073 7973 7465 6d20 t coding system │ │ │ +00000d40: 666f 7220 7465 726d 696e 616c 206f 7574 for terminal out │ │ │ +00000d50: 7075 740a 2020 6f20 6465 6661 756c 7420 put. o default │ │ │ +00000d60: 636f 6469 6e67 2073 7973 7465 6d20 666f coding system fo │ │ │ +00000d70: 7220 6b65 7962 6f61 7264 2069 6e70 7574 r keyboard input │ │ │ +00000d80: 0a20 206f 2064 6566 6175 6c74 2063 6f64 . o default cod │ │ │ +00000d90: 696e 6720 7379 7374 656d 2066 6f72 2063 ing system for c │ │ │ +00000da0: 6f6e 7665 7274 696e 6720 6669 6c65 206e onverting file n │ │ │ +00000db0: 616d 6573 2e0a 0a49 6620 434f 4449 4e47 ames...If CODING │ │ │ +00000dc0: 2d53 5953 5445 4d20 7370 6563 6966 6965 -SYSTEM specifie │ │ │ +00000dd0: 7320 6120 6365 7274 6169 6e20 7479 7065 s a certain type │ │ │ +00000de0: 206f 6620 454f 4c20 636f 6e76 6572 7369 of EOL conversi │ │ │ +00000df0: 6f6e 2c20 7468 6520 636f 6469 6e67 0a73 on, the coding.s │ │ │ +00000e00: 7973 7465 6d73 2073 6574 2062 7920 7468 ystems set by th │ │ │ +00000e10: 6973 2066 756e 6374 696f 6e20 7769 6c6c is function will │ │ │ +00000e20: 2075 7365 2074 6861 7420 7479 7065 206f use that type o │ │ │ +00000e30: 6620 454f 4c20 636f 6e76 6572 7369 6f6e f EOL conversion │ │ │ +00000e40: 2e0a 0a54 6869 7320 636f 6d6d 616e 6420 ...This command │ │ │ +00000e50: 646f 6573 206e 6f74 2063 6861 6e67 6520 does not change │ │ │ +00000e60: 7468 6520 6465 6661 756c 7420 7661 6c75 the default valu │ │ │ +00000e70: 6520 6f66 2074 6572 6d69 6e61 6c20 636f e of terminal co │ │ │ +00000e80: 6469 6e67 2073 7973 7465 6d0a 666f 7220 ding system.for │ │ │ +00000e90: 4d53 2d44 4f53 2074 6572 6d69 6e61 6c2c MS-DOS terminal, │ │ │ +00000ea0: 2062 6563 6175 7365 2044 4f53 2074 6572 because DOS ter │ │ │ +00000eb0: 6d69 6e61 6c73 206f 6e6c 7920 7375 7070 minals only supp │ │ │ +00000ec0: 6f72 7420 6120 7369 6e67 6c65 2063 6f64 ort a single cod │ │ │ +00000ed0: 696e 670a 7379 7374 656d 2c20 616e 6420 ing.system, and │ │ │ +00000ee0: 456d 6163 7320 6175 746f 6d61 7469 6361 Emacs automatica │ │ │ +00000ef0: 6c6c 7920 7365 7473 2074 6865 2064 6566 lly sets the def │ │ │ +00000f00: 6175 6c74 2074 6f20 7468 6174 2063 6f64 ault to that cod │ │ │ +00000f10: 696e 6720 7379 7374 656d 2061 740a 7374 ing system at.st │ │ │ +00000f20: 6172 7475 702e 1f0a 2864 6566 616c 6961 artup...(defalia │ │ │ +00000f30: 7320 2770 7265 6665 722d 636f 6469 6e67 s 'prefer-coding │ │ │ +00000f40: 2d73 7973 7465 6d20 235b 2863 6f64 696e -system #[(codin │ │ │ +00000f50: 672d 7379 7374 656d 2920 220b ab85 c40b g-system) "..... │ │ │ +00000f60: 21ac 85c5 c60b 5c22 88c7 0b21 c80b 21c9 !.....\"...!..!. │ │ │ +00000f70: 0b21 181a 8919 ac85 c5ca 0b5c 2288 cb09 .!.........\"... │ │ │ +00000f80: 5c6e ae81 0b5c 2288 09cc 2040 61ac 85cd \n...\"... @a... │ │ │ +00000f90: 0943 2188 5c6e ab89 74ab 86ce cf5c 6e0b .C!.\n..t....\n. │ │ │ +00000fa0: 2388 08d0 73ab 87d1 5c6e 085c 2213 aa82 #...s...\n.\"... │ │ │ +00000fb0: 5c6e 13d2 0b21 2b87 2220 5b65 6f6c 2d74 \n...!+." [eol-t │ │ │ +00000fc0: 7970 6520 636f 6469 6e67 2d63 6174 6567 ype coding-categ │ │ │ +00000fd0: 6f72 7920 6261 7365 2063 6f64 696e 672d ory base coding- │ │ │ +00000fe0: 7379 7374 656d 2066 696e 642d 636f 6469 system find-codi │ │ │ +00000ff0: 6e67 2d73 7973 7465 6d20 6572 726f 7220 ng-system error │ │ │ +00001000: 2249 6e76 616c 6964 2063 6f64 696e 6720 "Invalid coding │ │ │ +00001010: 7379 7374 656d 2060 2573 2722 2063 6f64 system `%s'" cod │ │ │ +00001020: 696e 672d 7379 7374 656d 2d63 6174 6567 ing-system-categ │ │ │ +00001030: 6f72 7920 636f 6469 6e67 2d73 7973 7465 ory coding-syste │ │ │ +00001040: 6d2d 6261 7365 2063 6f64 696e 672d 7379 m-base coding-sy │ │ │ +00001050: 7374 656d 2d65 6f6c 2d74 7970 6520 2243 stem-eol-type "C │ │ │ +00001060: 616e 2774 2070 7265 6665 7220 7468 6520 an't prefer the │ │ │ +00001070: 636f 6469 6e67 2073 7973 7465 6d20 6025 coding system `% │ │ │ +00001080: 7327 2220 7365 742d 636f 6469 6e67 2d63 s'" set-coding-c │ │ │ +00001090: 6174 6567 6f72 792d 7379 7374 656d 2063 ategory-system c │ │ │ +000010a0: 6f64 696e 672d 6361 7465 676f 7279 2d6c oding-category-l │ │ │ +000010b0: 6973 7420 7365 742d 636f 6469 6e67 2d70 ist set-coding-p │ │ │ +000010c0: 7269 6f72 6974 792d 6c69 7374 206d 6573 riority-list mes │ │ │ +000010d0: 7361 6765 2022 4869 6768 6573 7420 7072 sage "Highest pr │ │ │ +000010e0: 696f 7269 7479 2069 7320 7365 7420 746f iority is set to │ │ │ +000010f0: 2025 7320 2862 6173 6520 6f66 2025 7329 %s (base of %s) │ │ │ +00001100: 2220 286c 6620 6372 6c66 206d 6163 2920 " (lf crlf mac) │ │ │ +00001110: 636f 6469 6e67 2d73 7973 7465 6d2d 6368 coding-system-ch │ │ │ +00001120: 616e 6765 2d65 6f6c 2d63 6f6e 7665 7273 ange-eol-convers │ │ │ +00001130: 696f 6e20 7365 742d 6465 6661 756c 742d ion set-default- │ │ │ +00001140: 636f 6469 6e67 2d73 7973 7465 6d73 5d20 coding-systems] │ │ │ +00001150: 3520 2823 2420 2e20 3332 3030 2920 227a 5 (#$ . 3200) "z │ │ │ +00001160: 5072 6566 6572 2063 6f64 696e 6720 7379 Prefer coding sy │ │ │ +00001170: 7374 656d 3a20 225d 290a 2340 3239 3820 stem: "]).#@298 │ │ │ +00001180: 5365 7420 636f 6469 6e67 2073 7973 7465 Set coding syste │ │ │ +00001190: 6d73 2066 6f72 2074 6865 2070 726f 6365 ms for the proce │ │ │ +000011a0: 7373 2061 7373 6f63 6961 7465 6420 7769 ss associated wi │ │ │ +000011b0: 7468 2074 6865 2063 7572 7265 6e74 2062 th the current b │ │ │ +000011c0: 7566 6665 722e 0a44 4543 4f44 494e 4720 uffer..DECODING │ │ │ +000011d0: 6973 2074 6865 2063 6f64 696e 6720 7379 is the coding sy │ │ │ +000011e0: 7374 656d 2074 6f20 6265 2075 7365 6420 stem to be used │ │ │ +000011f0: 746f 2064 6563 6f64 6520 696e 7075 7420 to decode input │ │ │ +00001200: 6672 6f6d 2074 6865 2070 726f 6365 7373 from the process │ │ │ +00001210: 2c0a 454e 434f 4449 4e47 2069 7320 7468 ,.ENCODING is th │ │ │ +00001220: 6520 636f 6469 6e67 2073 7973 7465 6d20 e coding system │ │ │ +00001230: 746f 2062 6520 7573 6564 2074 6f20 656e to be used to en │ │ │ +00001240: 636f 6465 206f 7574 7075 7420 746f 2074 code output to t │ │ │ +00001250: 6865 2070 726f 6365 7373 2e0a 0a46 6f72 he process...For │ │ │ +00001260: 2061 206c 6973 7420 6f66 2070 6f73 7369 a list of possi │ │ │ +00001270: 626c 6520 7661 6c75 6573 206f 6620 434f ble values of CO │ │ │ +00001280: 4449 4e47 2d53 5953 5445 4d2c 2075 7365 DING-SYSTEM, use │ │ │ +00001290: 205c 5b6c 6973 742d 636f 6469 6e67 2d73 \[list-coding-s │ │ │ +000012a0: 7973 7465 6d73 5d2e 1f0a 2864 6566 616c ystems]...(defal │ │ │ +000012b0: 6961 7320 2773 6574 2d62 7566 6665 722d ias 'set-buffer- │ │ │ +000012c0: 7072 6f63 6573 732d 636f 6469 6e67 2d73 process-coding-s │ │ │ +000012d0: 7973 7465 6d20 235b 2864 6563 6f64 696e ystem #[(decodin │ │ │ +000012e0: 6720 656e 636f 6469 6e67 2920 22c3 7021 g encoding) ".p! │ │ │ +000012f0: 891a ac86 c4c5 2188 aa8e c609 2188 c608 ......!.....!... │ │ │ +00001300: 2188 c75c 6e09 0823 8829 c820 8722 205b !..\n..#.). ." [ │ │ │ +00001310: 656e 636f 6469 6e67 2064 6563 6f64 696e encoding decodin │ │ │ +00001320: 6720 7072 6f63 2067 6574 2d62 7566 6665 g proc get-buffe │ │ │ +00001330: 722d 7072 6f63 6573 7320 6572 726f 7220 r-process error │ │ │ +00001340: 226e 6f20 7072 6f63 6573 7322 2063 6865 "no process" che │ │ │ +00001350: 636b 2d63 6f64 696e 672d 7379 7374 656d ck-coding-system │ │ │ +00001360: 2073 6574 2d70 726f 6365 7373 2d63 6f64 set-process-cod │ │ │ +00001370: 696e 672d 7379 7374 656d 2066 6f72 6365 ing-system force │ │ │ +00001380: 2d6d 6f64 652d 6c69 6e65 2d75 7064 6174 -mode-line-updat │ │ │ +00001390: 655d 2035 2028 2324 202e 2034 3438 3029 e] 5 (#$ . 4480) │ │ │ +000013a0: 2022 7a43 6f64 696e 672d 7379 7374 656d "zCoding-system │ │ │ +000013b0: 2066 6f72 2070 726f 6365 7373 2069 6e70 for process inp │ │ │ +000013c0: 7574 3a20 5c6e 7a43 6f64 696e 672d 7379 ut: \nzCoding-sy │ │ │ +000013d0: 7374 656d 2066 6f72 2070 726f 6365 7373 stem for process │ │ │ +000013e0: 206f 7574 7075 743a 2022 5d29 0a28 7072 output: "]).(pr │ │ │ +000013f0: 6f76 6964 6520 2763 6f64 652d 636d 6473 ovide 'code-cmds │ │ │ +00001400: 290a ). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/code-files.elc │ │ │ @@ -1,1048 +1,1047 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3535 2032 eb 25 01:53:55 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6f64 652d 6669 6c65 732e 656c 0a3b 3b3b ode-files.el.;;; │ │ │ -000000a0: 2065 6d61 6373 2076 6572 7369 6f6e 2032 emacs version 2 │ │ │ -000000b0: 312e 3420 2870 6174 6368 2032 3429 2022 1.4 (patch 24) " │ │ │ -000000c0: 5374 616e 6461 7264 2043 2220 5845 6d61 Standard C" XEma │ │ │ -000000d0: 6373 204c 7563 6964 2e0a 3b3b 3b20 6279 cs Lucid..;;; by │ │ │ -000000e0: 7465 636f 6d70 2076 6572 7369 6f6e 2032 tecomp version 2 │ │ │ -000000f0: 2e32 3720 5845 6d61 6373 3b20 3230 3030 .27 XEmacs; 2000 │ │ │ -00000100: 2d30 392d 3132 2e0a 3b3b 3b20 6f70 7469 -09-12..;;; opti │ │ │ -00000110: 6d69 7a61 7469 6f6e 2069 7320 6f6e 2e0a mization is on.. │ │ │ -00000120: 3b3b 3b20 7468 6973 2066 696c 6520 7573 ;;; this file us │ │ │ -00000130: 6573 206f 7063 6f64 6573 2077 6869 6368 es opcodes which │ │ │ -00000140: 2064 6f20 6e6f 7420 6578 6973 7420 696e do not exist in │ │ │ -00000150: 2045 6d61 6373 2031 392e 0a0a 2869 6620 Emacs 19...(if │ │ │ -00000160: 2861 6e64 2028 626f 756e 6470 2027 656d (and (boundp 'em │ │ │ -00000170: 6163 732d 7665 7273 696f 6e29 0a09 2028 acs-version).. ( │ │ │ -00000180: 6f72 2028 616e 6420 2862 6f75 6e64 7020 or (and (boundp │ │ │ -00000190: 2765 706f 6368 3a3a 7665 7273 696f 6e29 'epoch::version) │ │ │ -000001a0: 2065 706f 6368 3a3a 7665 7273 696f 6e29 epoch::version) │ │ │ -000001b0: 0a09 2020 2020 2028 7374 7269 6e67 2d6c .. (string-l │ │ │ -000001c0: 6573 7370 2065 6d61 6373 2d76 6572 7369 essp emacs-versi │ │ │ -000001d0: 6f6e 2022 3230 2229 2929 0a20 2020 2028 on "20"))). ( │ │ │ -000001e0: 6572 726f 7220 2260 636f 6465 2d66 696c error "`code-fil │ │ │ -000001f0: 6573 2e65 6c27 2077 6173 2063 6f6d 7069 es.el' was compi │ │ │ -00000200: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ -00000210: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ -00000220: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ -00000230: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ -00000240: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ -00000250: 2929 0a0a 0a28 6279 7465 2d63 6f64 6520 ))...(byte-code │ │ │ -00000260: 22c4 c5c6 5c22 88c7 c5c8 c923 88ca c51a "...\".....#.... │ │ │ -00000270: 1bcb 0b21 ad84 cb5c 6e21 3fcb 0b21 ad82 ...!...\n!?..!.. │ │ │ -00000280: 0b4a 1918 cc0b 5c6e 5c22 88cd 0b5c 6e5c .J....\n\"...\n\ │ │ │ -00000290: 2288 08ab 845c 6e09 4c88 2cce cf1a 1bcb "....\n.L.,..... │ │ │ -000002a0: 0b21 ad84 cb5c 6e21 3fcb 0b21 ad82 0b4a .!...\n!?..!...J │ │ │ -000002b0: 1918 cc0b 5c6e 5c22 88cd 0b5c 6e5c 2288 ....\n\"...\n\". │ │ │ -000002c0: 08ab 845c 6e09 4c88 2cc4 8722 205b 6e65 ...\n.L.,.." [ne │ │ │ -000002d0: 6564 732d 7365 7474 696e 6720 7661 6c75 eds-setting valu │ │ │ -000002e0: 6520 6e65 7776 6172 206f 6c64 7661 7220 e newvar oldvar │ │ │ -000002f0: 7365 742d 6465 6661 756c 7420 6275 6666 set-default buff │ │ │ -00000300: 6572 2d66 696c 652d 636f 6469 6e67 2d73 er-file-coding-s │ │ │ -00000310: 7973 7465 6d20 7261 772d 7465 7874 2070 ystem raw-text p │ │ │ -00000320: 7574 2070 6572 6d61 6e65 6e74 2d6c 6f63 ut permanent-loc │ │ │ -00000330: 616c 2074 2066 696c 652d 636f 6469 6e67 al t file-coding │ │ │ -00000340: 2d73 7973 7465 6d20 626f 756e 6470 2064 -system boundp d │ │ │ -00000350: 6566 7661 7261 6c69 6173 206d 616b 652d efvaralias make- │ │ │ -00000360: 6f62 736f 6c65 7465 2d76 6172 6961 626c obsolete-variabl │ │ │ -00000370: 6520 6f76 6572 7269 6469 6e67 2d66 696c e overriding-fil │ │ │ -00000380: 652d 636f 6469 6e67 2d73 7973 7465 6d20 e-coding-system │ │ │ -00000390: 636f 6469 6e67 2d73 7973 7465 6d2d 666f coding-system-fo │ │ │ -000003a0: 722d 7265 6164 5d20 3429 0a23 4034 3035 r-read] 4).#@405 │ │ │ -000003b0: 2043 6f64 696e 6720 7379 7374 656d 2075 Coding system u │ │ │ -000003c0: 7365 6420 7768 656e 2072 6561 6469 6e67 sed when reading │ │ │ -000003d0: 2061 2066 696c 652e 0a54 6869 7320 7072 a file..This pr │ │ │ -000003e0: 6f76 6964 6573 2063 6f61 7273 652d 6772 ovides coarse-gr │ │ │ -000003f0: 6169 6e65 6420 636f 6e74 726f 6c3b 2066 ained control; f │ │ │ -00000400: 6f72 2066 696e 6572 2d67 7261 696e 6564 or finer-grained │ │ │ -00000410: 2063 6f6e 7472 6f6c 2c20 7573 650a 6066 control, use.`f │ │ │ -00000420: 696c 652d 636f 6469 6e67 2d73 7973 7465 ile-coding-syste │ │ │ -00000430: 6d2d 616c 6973 7427 2e20 2046 726f 6d20 m-alist'. From │ │ │ -00000440: 6120 4c69 7370 2070 726f 6772 616d 2c20 a Lisp program, │ │ │ -00000450: 6966 2079 6f75 2077 6973 6820 746f 0a75 if you wish to.u │ │ │ -00000460: 6e69 6c61 7465 7261 6c6c 7920 7370 6563 nilaterally spec │ │ │ -00000470: 6966 7920 7468 6520 636f 6469 6e67 2073 ify the coding s │ │ │ -00000480: 7973 7465 6d20 7573 6564 2066 6f72 206f ystem used for o │ │ │ -00000490: 6e65 2070 6172 7469 6375 6c61 720a 6f70 ne particular.op │ │ │ -000004a0: 6572 6174 696f 6e2c 2079 6f75 2073 686f eration, you sho │ │ │ -000004b0: 756c 6420 6269 6e64 2074 6865 2076 6172 uld bind the var │ │ │ -000004c0: 6961 626c 6520 6063 6f64 696e 672d 7379 iable `coding-sy │ │ │ -000004d0: 7374 656d 2d66 6f72 2d72 6561 6427 0a72 stem-for-read'.r │ │ │ -000004e0: 6174 6865 7220 7468 616e 2073 6574 7469 ather than setti │ │ │ -000004f0: 6e67 2074 6869 7320 7661 7269 6162 6c65 ng this variable │ │ │ -00000500: 2c20 7768 6963 6820 6973 2069 6e74 656e , which is inten │ │ │ -00000510: 6465 6420 746f 2062 6520 7573 6564 2066 ded to be used f │ │ │ -00000520: 6f72 0a67 6c6f 6261 6c20 656e 7669 726f or.global enviro │ │ │ -00000530: 6e6d 656e 7420 7370 6563 6966 6963 6174 nment specificat │ │ │ -00000540: 696f 6e2e 1f0a 2864 6566 7661 7220 6275 ion...(defvar bu │ │ │ -00000550: 6666 6572 2d66 696c 652d 636f 6469 6e67 ffer-file-coding │ │ │ -00000560: 2d73 7973 7465 6d2d 666f 722d 7265 6164 -system-for-read │ │ │ -00000570: 2027 756e 6465 6369 6465 6420 2823 2420 'undecided (#$ │ │ │ -00000580: 2e20 3934 3529 290a 2862 7974 652d 636f . 945)).(byte-co │ │ │ -00000590: 6465 2022 c4c5 1a1b c60b 21ad 84c6 5c6e de "......!...\n │ │ │ -000005a0: 213f c60b 21ad 820b 4a19 18c7 0b5c 6e5c !?..!...J....\n\ │ │ │ -000005b0: 2288 c80b 5c6e 5c22 8808 ab84 5c6e 094c "...\n\"....\n.L │ │ │ -000005c0: 882c c487 2220 5b6e 6565 6473 2d73 6574 .,.." [needs-set │ │ │ -000005d0: 7469 6e67 2076 616c 7565 206e 6577 7661 ting value newva │ │ │ -000005e0: 7220 6f6c 6476 6172 2066 696c 652d 636f r oldvar file-co │ │ │ -000005f0: 6469 6e67 2d73 7973 7465 6d2d 666f 722d ding-system-for- │ │ │ -00000600: 7265 6164 2062 7566 6665 722d 6669 6c65 read buffer-file │ │ │ -00000610: 2d63 6f64 696e 672d 7379 7374 656d 2d66 -coding-system-f │ │ │ -00000620: 6f72 2d72 6561 6420 626f 756e 6470 2064 or-read boundp d │ │ │ -00000630: 6566 7661 7261 6c69 6173 206d 616b 652d efvaralias make- │ │ │ -00000640: 6f62 736f 6c65 7465 2d76 6172 6961 626c obsolete-variabl │ │ │ -00000650: 655d 2033 290a 2340 3639 3120 416c 6973 e] 3).#@691 Alis │ │ │ -00000660: 7420 746f 2064 6563 6964 6520 6120 636f t to decide a co │ │ │ -00000670: 6469 6e67 2073 7973 7465 6d20 746f 2075 ding system to u │ │ │ -00000680: 7365 2066 6f72 2061 2066 696c 6520 492f se for a file I/ │ │ │ -00000690: 4f20 6f70 6572 6174 696f 6e2e 0a54 6865 O operation..The │ │ │ -000006a0: 2066 6f72 6d61 7420 6973 2028 2850 4154 format is ((PAT │ │ │ -000006b0: 5445 524e 202e 2056 414c 2920 2e2e 2e29 TERN . VAL) ...) │ │ │ -000006c0: 2c0a 7768 6572 6520 5041 5454 4552 4e20 ,.where PATTERN │ │ │ -000006d0: 6973 2061 2072 6567 756c 6172 2065 7870 is a regular exp │ │ │ -000006e0: 7265 7373 696f 6e20 6d61 7463 6869 6e67 ression matching │ │ │ -000006f0: 2061 2066 696c 6520 6e61 6d65 2c0a 5641 a file name,.VA │ │ │ -00000700: 4c20 6973 2061 2063 6f64 696e 6720 7379 L is a coding sy │ │ │ -00000710: 7374 656d 2c20 6120 636f 6e73 206f 6620 stem, a cons of │ │ │ -00000720: 636f 6469 6e67 2073 7973 7465 6d73 2c20 coding systems, │ │ │ -00000730: 6f72 2061 2066 756e 6374 696f 6e20 7379 or a function sy │ │ │ -00000740: 6d62 6f6c 2e0a 4966 2056 414c 2069 7320 mbol..If VAL is │ │ │ -00000750: 6120 636f 6469 6e67 2073 7973 7465 6d2c a coding system, │ │ │ -00000760: 2069 7420 6973 2075 7365 6420 666f 7220 it is used for │ │ │ -00000770: 626f 7468 2064 6563 6f64 696e 6720 616e both decoding an │ │ │ -00000780: 6420 656e 636f 6469 6e67 0a74 6865 2066 d encoding.the f │ │ │ -00000790: 696c 6520 636f 6e74 656e 7473 2e0a 4966 ile contents..If │ │ │ -000007a0: 2056 414c 2069 7320 6120 636f 6e73 206f VAL is a cons o │ │ │ -000007b0: 6620 636f 6469 6e67 2073 7973 7465 6d73 f coding systems │ │ │ -000007c0: 2c20 7468 6520 6361 7220 7061 7274 2069 , the car part i │ │ │ -000007d0: 7320 7573 6564 2066 6f72 2064 6563 6f64 s used for decod │ │ │ -000007e0: 696e 672c 0a61 6e64 2074 6865 2063 6472 ing,.and the cdr │ │ │ -000007f0: 2070 6172 7420 6973 2075 7365 6420 666f part is used fo │ │ │ -00000800: 7220 656e 636f 6469 6e67 2e0a 4966 2056 r encoding..If V │ │ │ -00000810: 414c 2069 7320 6120 6675 6e63 7469 6f6e AL is a function │ │ │ -00000820: 2073 796d 626f 6c2c 2074 6865 2066 756e symbol, the fun │ │ │ -00000830: 6374 696f 6e20 6d75 7374 2072 6574 7572 ction must retur │ │ │ -00000840: 6e20 6120 636f 6469 6e67 2073 7973 7465 n a coding syste │ │ │ -00000850: 6d0a 6f72 2061 2063 6f6e 7320 6f66 2063 m.or a cons of c │ │ │ -00000860: 6f64 696e 6720 7379 7374 656d 7320 7768 oding systems wh │ │ │ -00000870: 6963 6820 6172 6520 7573 6564 2061 7320 ich are used as │ │ │ -00000880: 6162 6f76 652e 0a0a 5468 6973 206f 7665 above...This ove │ │ │ -00000890: 7272 6964 6573 2074 6865 206d 6f72 6520 rrides the more │ │ │ -000008a0: 6765 6e65 7261 6c20 7370 6563 6966 6963 general specific │ │ │ -000008b0: 6174 696f 6e20 696e 0a60 6275 6666 6572 ation in.`buffer │ │ │ -000008c0: 2d66 696c 652d 636f 6469 6e67 2d73 7973 -file-coding-sys │ │ │ -000008d0: 7465 6d2d 666f 722d 7265 6164 272c 2062 tem-for-read', b │ │ │ -000008e0: 7574 2069 7320 6f76 6572 7269 6464 656e ut is overridden │ │ │ -000008f0: 2062 790a 6063 6f64 696e 672d 7379 7374 by.`coding-syst │ │ │ -00000900: 656d 2d66 6f72 2d72 6561 6427 2e1f 0a28 em-for-read'...( │ │ │ -00000910: 6465 6676 6172 2066 696c 652d 636f 6469 defvar file-codi │ │ │ -00000920: 6e67 2d73 7973 7465 6d2d 616c 6973 7420 ng-system-alist │ │ │ -00000930: 2862 7974 652d 636f 6465 2022 c1c2 c308 (byte-code ".... │ │ │ -00000940: 5c22 c45c 2287 2220 5b62 696e 6172 792d \".\"." [binary- │ │ │ -00000950: 6669 6c65 2d72 6567 6578 7073 2061 7070 file-regexps app │ │ │ -00000960: 656e 6420 6d61 7063 6172 2023 5b28 7265 end mapcar #[(re │ │ │ -00000970: 6765 7870 2920 2208 c142 8722 205b 7265 gexp) "..B." [re │ │ │ -00000980: 6765 7870 2062 696e 6172 795d 2032 5d20 gexp binary] 2] │ │ │ -00000990: 2828 2254 5554 4f52 4941 4c5c 5c2e 5c5c (("TUTORIAL\\.\\ │ │ │ -000009a0: 283f 3a68 725c 5c7c 706c 5c5c 7c72 6f5c (?:hr\\|pl\\|ro\ │ │ │ -000009b0: 5c29 5c5c 2722 202e 2069 736f 2d38 3835 \)\\'" . iso-885 │ │ │ -000009c0: 392d 3229 295d 2034 2920 2823 2420 2e20 9-2))] 4) (#$ . │ │ │ -000009d0: 3136 3238 2929 0a23 4032 3537 2053 6574 1628)).#@257 Set │ │ │ -000009e0: 2062 7566 6665 722d 6669 6c65 2d63 6f64 buffer-file-cod │ │ │ -000009f0: 696e 672d 7379 7374 656d 206f 6620 7468 ing-system of th │ │ │ -00000a00: 6520 6375 7272 656e 7420 6275 6666 6572 e current buffer │ │ │ -00000a10: 2074 6f20 434f 4449 4e47 2d53 5953 5445 to CODING-SYSTE │ │ │ -00000a20: 4d2e 0a49 6620 6f70 7469 6f6e 616c 2061 M..If optional a │ │ │ -00000a30: 7267 756d 656e 7420 464f 5243 4520 2869 rgument FORCE (i │ │ │ -00000a40: 6e74 6572 6163 7469 7665 6c79 2c20 7468 nteractively, th │ │ │ -00000a50: 6520 7072 6566 6978 2061 7267 756d 656e e prefix argumen │ │ │ -00000a60: 7429 2069 7320 6e6f 740a 6769 7665 6e2c t) is not.given, │ │ │ -00000a70: 2061 7474 656d 7074 2074 6f20 6d61 7463 attempt to matc │ │ │ -00000a80: 6820 7468 6520 454f 4c20 7479 7065 206f h the EOL type o │ │ │ -00000a90: 6620 7468 6520 6e65 7720 636f 6469 6e67 f the new coding │ │ │ -00000aa0: 2073 7973 7465 6d20 746f 0a74 6865 2063 system to.the c │ │ │ -00000ab0: 7572 7265 6e74 2076 616c 7565 206f 6620 urrent value of │ │ │ -00000ac0: 6062 7566 6665 722d 6669 6c65 2d63 6f64 `buffer-file-cod │ │ │ -00000ad0: 696e 672d 7379 7374 656d 272e 1f0a 2864 ing-system'...(d │ │ │ -00000ae0: 6566 616c 6961 7320 2773 6574 2d62 7566 efalias 'set-buf │ │ │ -00000af0: 6665 722d 6669 6c65 2d63 6f64 696e 672d fer-file-coding- │ │ │ -00000b00: 7379 7374 656d 2023 5b28 636f 6469 6e67 system #[(coding │ │ │ -00000b10: 2d73 7973 7465 6d20 266f 7074 696f 6e61 -system &optiona │ │ │ -00000b20: 6c20 666f 7263 6529 2022 c35c 6e21 8808 l force) ".\n!.. │ │ │ -00000b30: ac87 c45c 6ec5 0921 5c22 125c 6e11 c6c7 ...\n..!\".\n... │ │ │ -00000b40: 2187 2220 5b66 6f72 6365 2062 7566 6665 !." [force buffe │ │ │ -00000b50: 722d 6669 6c65 2d63 6f64 696e 672d 7379 r-file-coding-sy │ │ │ -00000b60: 7374 656d 2063 6f64 696e 672d 7379 7374 stem coding-syst │ │ │ -00000b70: 656d 2067 6574 2d63 6f64 696e 672d 7379 em get-coding-sy │ │ │ -00000b80: 7374 656d 2073 7562 7369 6469 6172 792d stem subsidiary- │ │ │ -00000b90: 636f 6469 6e67 2d73 7973 7465 6d20 636f coding-system co │ │ │ -00000ba0: 6469 6e67 2d73 7973 7465 6d2d 656f 6c2d ding-system-eol- │ │ │ -00000bb0: 7479 7065 2072 6564 7261 772d 6d6f 6465 type redraw-mode │ │ │ -00000bc0: 6c69 6e65 2074 5d20 3420 2823 2420 2e20 line t] 4 (#$ . │ │ │ -00000bd0: 3235 3235 2920 227a 4669 6c65 2063 6f64 2525) "zFile cod │ │ │ -00000be0: 696e 6720 7379 7374 656d 3a20 5c6e 5022 ing system: \nP" │ │ │ -00000bf0: 5d29 0a23 4031 3135 2053 6574 2045 4f4c ]).#@115 Set EOL │ │ │ -00000c00: 2074 7970 6520 6f66 2062 7566 6665 722d type of buffer- │ │ │ -00000c10: 6669 6c65 2d63 6f64 696e 672d 7379 7374 file-coding-syst │ │ │ -00000c20: 656d 206f 6620 7468 6520 6375 7272 656e em of the curren │ │ │ -00000c30: 7420 6275 6666 6572 2074 6f0a 736f 6d65 t buffer to.some │ │ │ -00000c40: 7468 696e 6720 6f74 6865 7220 7468 616e thing other than │ │ │ -00000c50: 2077 6861 7420 6974 2069 7320 6174 2074 what it is at t │ │ │ -00000c60: 6865 206d 6f6d 656e 742e 1f0a 2864 6566 he moment...(def │ │ │ -00000c70: 616c 6961 7320 2774 6f67 676c 652d 6275 alias 'toggle-bu │ │ │ -00000c80: 6666 6572 2d66 696c 652d 636f 6469 6e67 ffer-file-coding │ │ │ -00000c90: 2d73 7973 7465 6d20 235b 6e69 6c20 22c2 -system #[nil ". │ │ │ -00000ca0: 0821 19c3 c408 2109 c561 ab83 c6aa 8e09 .!....!..a...... │ │ │ -00000cb0: c661 ab83 c5aa 8609 c761 ad81 c55c 2210 .a.......a...\". │ │ │ -00000cc0: c8c9 2129 8722 205b 6275 6666 6572 2d66 ..!)." [buffer-f │ │ │ -00000cd0: 696c 652d 636f 6469 6e67 2d73 7973 7465 ile-coding-syste │ │ │ -00000ce0: 6d20 656f 6c2d 7479 7065 2063 6f64 696e m eol-type codin │ │ │ -00000cf0: 672d 7379 7374 656d 2d65 6f6c 2d74 7970 g-system-eol-typ │ │ │ -00000d00: 6520 7375 6273 6964 6961 7279 2d63 6f64 e subsidiary-cod │ │ │ -00000d10: 696e 672d 7379 7374 656d 2063 6f64 696e ing-system codin │ │ │ -00000d20: 672d 7379 7374 656d 2d62 6173 6520 6c66 g-system-base lf │ │ │ -00000d30: 2063 726c 6620 6372 2073 6574 2d62 7566 crlf cr set-buf │ │ │ -00000d40: 6665 722d 6d6f 6469 6669 6564 2d70 2074 fer-modified-p t │ │ │ -00000d50: 5d20 3420 2823 2420 2e20 3330 3635 2920 ] 4 (#$ . 3065) │ │ │ -00000d60: 6e69 6c5d 290a 2862 7974 652d 636f 6465 nil]).(byte-code │ │ │ -00000d70: 2022 c2c3 1918 c408 095c 2288 c508 095c ".......\"....\ │ │ │ -00000d80: 2288 2ac2 8722 205b 6f6c 6466 756e 206e ".*.." [oldfun n │ │ │ -00000d90: 6577 6675 6e20 7365 742d 6669 6c65 2d63 ewfun set-file-c │ │ │ -00000da0: 6f64 696e 672d 7379 7374 656d 2073 6574 oding-system set │ │ │ -00000db0: 2d62 7566 6665 722d 6669 6c65 2d63 6f64 -buffer-file-cod │ │ │ -00000dc0: 696e 672d 7379 7374 656d 2064 6566 696e ing-system defin │ │ │ -00000dd0: 652d 6675 6e63 7469 6f6e 206d 616b 652d e-function make- │ │ │ -00000de0: 6f62 736f 6c65 7465 5d20 3329 0a23 4032 obsolete] 3).#@2 │ │ │ -00000df0: 3239 2053 6574 2074 6865 2063 6f64 696e 29 Set the codin │ │ │ -00000e00: 6720 7379 7374 656d 2075 7365 6420 7768 g system used wh │ │ │ -00000e10: 656e 2072 6561 6469 6e67 2069 6e20 6120 en reading in a │ │ │ -00000e20: 6669 6c65 2e0a 5468 6973 2069 7320 6571 file..This is eq │ │ │ -00000e30: 7569 7661 6c65 6e74 2074 6f20 7365 7474 uivalent to sett │ │ │ -00000e40: 696e 6720 7468 6520 7661 7269 6162 6c65 ing the variable │ │ │ -00000e50: 0a60 6275 6666 6572 2d66 696c 652d 636f .`buffer-file-co │ │ │ -00000e60: 6469 6e67 2d73 7973 7465 6d2d 666f 722d ding-system-for- │ │ │ -00000e70: 7265 6164 272e 2020 596f 7520 6361 6e20 read'. You can │ │ │ -00000e80: 616c 736f 2075 7365 0a60 6669 6c65 2d63 also use.`file-c │ │ │ -00000e90: 6f64 696e 672d 7379 7374 656d 2d61 6c69 oding-system-ali │ │ │ -00000ea0: 7374 2720 746f 2073 7065 6369 6679 2074 st' to specify t │ │ │ -00000eb0: 6865 2063 6f64 696e 6720 7379 7374 656d he coding system │ │ │ -00000ec0: 2066 6f72 0a70 6172 7469 6375 6c61 7220 for.particular │ │ │ -00000ed0: 6669 6c65 732e 1f0a 2864 6566 616c 6961 files...(defalia │ │ │ -00000ee0: 7320 2773 6574 2d62 7566 6665 722d 6669 s 'set-buffer-fi │ │ │ -00000ef0: 6c65 2d63 6f64 696e 672d 7379 7374 656d le-coding-system │ │ │ -00000f00: 2d66 6f72 2d72 6561 6420 235b 2863 6f64 -for-read #[(cod │ │ │ -00000f10: 696e 672d 7379 7374 656d 2920 22c2 0921 ing-system) "..! │ │ │ -00000f20: 8809 8910 8722 205b 6275 6666 6572 2d66 ....." [buffer-f │ │ │ -00000f30: 696c 652d 636f 6469 6e67 2d73 7973 7465 ile-coding-syste │ │ │ -00000f40: 6d2d 666f 722d 7265 6164 2063 6f64 696e m-for-read codin │ │ │ -00000f50: 672d 7379 7374 656d 2067 6574 2d63 6f64 g-system get-cod │ │ │ -00000f60: 696e 672d 7379 7374 656d 5d20 3220 2823 ing-system] 2 (# │ │ │ -00000f70: 2420 2e20 3335 3731 2920 227a 4669 6c65 $ . 3571) "zFile │ │ │ -00000f80: 2063 6f64 696e 6720 7379 7374 656d 2066 coding system f │ │ │ -00000f90: 6f72 2072 6561 643a 2022 5d29 0a28 6279 or read: "]).(by │ │ │ -00000fa0: 7465 2d63 6f64 6520 22c2 c319 18c4 0809 te-code "....... │ │ │ -00000fb0: 5c22 88c5 0809 5c22 882a c287 2220 5b6f \"....\".*.." [o │ │ │ -00000fc0: 6c64 6675 6e20 6e65 7766 756e 2073 6574 ldfun newfun set │ │ │ -00000fd0: 2d66 696c 652d 636f 6469 6e67 2d73 7973 -file-coding-sys │ │ │ -00000fe0: 7465 6d2d 666f 722d 7265 6164 2073 6574 tem-for-read set │ │ │ -00000ff0: 2d62 7566 6665 722d 6669 6c65 2d63 6f64 -buffer-file-cod │ │ │ -00001000: 696e 672d 7379 7374 656d 2d66 6f72 2d72 ing-system-for-r │ │ │ -00001010: 6561 6420 6465 6669 6e65 2d66 756e 6374 ead define-funct │ │ │ -00001020: 696f 6e20 6d61 6b65 2d6f 6273 6f6c 6574 ion make-obsolet │ │ │ -00001030: 655d 2033 290a 2340 3236 3320 5365 7420 e] 3).#@263 Set │ │ │ -00001040: 7468 6520 6465 6661 756c 7420 7661 6c75 the default valu │ │ │ -00001050: 6520 6f66 2060 6275 6666 6572 2d66 696c e of `buffer-fil │ │ │ -00001060: 652d 636f 6469 6e67 2d73 7973 7465 6d27 e-coding-system' │ │ │ -00001070: 2074 6f20 434f 4449 4e47 2d53 5953 5445 to CODING-SYSTE │ │ │ -00001080: 4d2e 0a54 6865 2064 6566 6175 6c74 2076 M..The default v │ │ │ -00001090: 616c 7565 2069 7320 7573 6564 2062 6f74 alue is used bot │ │ │ -000010a0: 6820 666f 7220 6275 6666 6572 7320 7769 h for buffers wi │ │ │ -000010b0: 7468 6f75 7420 6173 736f 6369 6174 6564 thout associated │ │ │ -000010c0: 2066 696c 6573 0a61 6e64 2066 6f72 2066 files.and for f │ │ │ -000010d0: 696c 6573 2077 6974 6820 6e6f 2061 7070 iles with no app │ │ │ -000010e0: 6172 656e 7420 636f 6469 6e67 2073 7973 arent coding sys │ │ │ -000010f0: 7465 6d20 2869 2e65 2e20 7072 696d 6172 tem (i.e. primar │ │ │ -00001100: 696c 7920 4153 4349 4929 2e0a 5365 6520 ily ASCII)..See │ │ │ -00001110: 6062 7566 6665 722d 6669 6c65 2d63 6f64 `buffer-file-cod │ │ │ -00001120: 696e 672d 7379 7374 656d 2720 666f 7220 ing-system' for │ │ │ -00001130: 6d6f 7265 2069 6e66 6f72 6d61 7469 6f6e more information │ │ │ -00001140: 2e1f 0a28 6465 6661 6c69 6173 2027 7365 ...(defalias 'se │ │ │ -00001150: 742d 6465 6661 756c 742d 6275 6666 6572 t-default-buffer │ │ │ -00001160: 2d66 696c 652d 636f 6469 6e67 2d73 7973 -file-coding-sys │ │ │ -00001170: 7465 6d20 235b 2863 6f64 696e 672d 7379 tem #[(coding-sy │ │ │ -00001180: 7374 656d 2920 22c1 c208 5c22 88c3 c421 stem) "...\"...! │ │ │ -00001190: 8722 205b 636f 6469 6e67 2d73 7973 7465 ." [coding-syste │ │ │ -000011a0: 6d20 7365 742d 6465 6661 756c 7420 6275 m set-default bu │ │ │ -000011b0: 6666 6572 2d66 696c 652d 636f 6469 6e67 ffer-file-coding │ │ │ -000011c0: 2d73 7973 7465 6d20 7265 6472 6177 2d6d -system redraw-m │ │ │ -000011d0: 6f64 656c 696e 6520 745d 2033 2028 2324 odeline t] 3 (#$ │ │ │ -000011e0: 202e 2034 3135 3629 2022 7a44 6566 6175 . 4156) "zDefau │ │ │ -000011f0: 6c74 2066 696c 6520 636f 6469 6e67 2073 lt file coding s │ │ │ -00001200: 7973 7465 6d3a 2022 5d29 0a28 6279 7465 ystem: "]).(byte │ │ │ -00001210: 2d63 6f64 6520 22c2 c319 18c4 0809 5c22 -code ".......\" │ │ │ -00001220: 88c5 0809 5c22 882a c287 2220 5b6f 6c64 ....\".*.." [old │ │ │ -00001230: 6675 6e20 6e65 7766 756e 2073 6574 2d64 fun newfun set-d │ │ │ -00001240: 6566 6175 6c74 2d66 696c 652d 636f 6469 efault-file-codi │ │ │ -00001250: 6e67 2d73 7973 7465 6d20 7365 742d 6465 ng-system set-de │ │ │ -00001260: 6661 756c 742d 6275 6666 6572 2d66 696c fault-buffer-fil │ │ │ -00001270: 652d 636f 6469 6e67 2d73 7973 7465 6d20 e-coding-system │ │ │ -00001280: 6465 6669 6e65 2d66 756e 6374 696f 6e20 define-function │ │ │ -00001290: 6d61 6b65 2d6f 6273 6f6c 6574 655d 2033 make-obsolete] 3 │ │ │ -000012a0: 290a 2340 3138 3520 4c6f 6f6b 2075 7020 ).#@185 Look up │ │ │ -000012b0: 636f 6469 6e67 2073 7973 7465 6d20 746f coding system to │ │ │ -000012c0: 2072 6561 6420 6120 6669 6c65 2069 6e20 read a file in │ │ │ -000012d0: 6066 696c 652d 636f 6469 6e67 2d73 7973 `file-coding-sys │ │ │ -000012e0: 7465 6d2d 616c 6973 7427 2e0a 5468 6520 tem-alist'..The │ │ │ -000012f0: 7265 7475 726e 2076 616c 7565 2077 696c return value wil │ │ │ -00001300: 6c20 6265 206e 696c 2028 6e6f 2061 7070 l be nil (no app │ │ │ -00001310: 6c69 6361 626c 6520 656e 7472 7929 206f licable entry) o │ │ │ -00001320: 7220 6120 636f 6469 6e67 2073 7973 7465 r a coding syste │ │ │ -00001330: 6d0a 6f62 6a65 6374 2028 7468 6520 656e m.object (the en │ │ │ -00001340: 7472 7920 7370 6563 6966 6965 6420 6120 try specified a │ │ │ -00001350: 636f 6469 6e67 2073 7973 7465 6d29 2e1f coding system).. │ │ │ -00001360: 0a28 6465 6661 6c69 6173 2027 6669 6e64 .(defalias 'find │ │ │ -00001370: 2d66 696c 652d 636f 6469 6e67 2d73 7973 -file-coding-sys │ │ │ -00001380: 7465 6d2d 666f 722d 7265 6164 2d66 726f tem-for-read-fro │ │ │ -00001390: 6d2d 6669 6c65 6e61 6d65 2023 5b28 6669 m-filename #[(fi │ │ │ -000013a0: 6c65 6e61 6d65 2920 2209 c689 1d1a 1cc6 lename) "....... │ │ │ -000013b0: 18c7 0b21 135c 6eac 960c ab93 c80c 4040 ...!.\n.......@@ │ │ │ -000013c0: 0b5c 22ab 860c 4041 15c9 120c 4114 aa67 .\"...@A....A..g │ │ │ -000013d0: 290d ad97 ca0d 21ab 850d cb0b 5c22 150d ).....!.....\".. │ │ │ -000013e0: 3aab 86cc 0d40 21aa 83cc 0d21 2b87 2220 :....@!....!+." │ │ │ -000013f0: 5b63 6173 652d 666f 6c64 2d73 6561 7263 [case-fold-searc │ │ │ -00001400: 6820 6669 6c65 2d63 6f64 696e 672d 7379 h file-coding-sy │ │ │ -00001410: 7374 656d 2d61 6c69 7374 2066 6f75 6e64 stem-alist found │ │ │ -00001420: 2066 696c 656e 616d 6520 616c 6973 7420 filename alist │ │ │ -00001430: 636f 6465 7379 7320 6e69 6c20 6669 6c65 codesys nil file │ │ │ -00001440: 2d6e 616d 652d 7361 6e73 2d76 6572 7369 -name-sans-versi │ │ │ -00001450: 6f6e 7320 7374 7269 6e67 2d6d 6174 6368 ons string-match │ │ │ -00001460: 2074 2066 756e 6374 696f 6e70 2069 6e73 t functionp ins │ │ │ -00001470: 6572 742d 6669 6c65 2d63 6f6e 7465 6e74 ert-file-content │ │ │ -00001480: 7320 6669 6e64 2d63 6f64 696e 672d 7379 s find-coding-sy │ │ │ -00001490: 7374 656d 5d20 3320 2823 2420 2e20 3437 stem] 3 (#$ . 47 │ │ │ -000014a0: 3736 295d 290a 2862 7974 652d 636f 6465 76)]).(byte-code │ │ │ -000014b0: 2022 c2c3 1918 c408 095c 2288 c508 095c ".......\"....\ │ │ │ -000014c0: 2288 2ac2 8722 205b 6f6c 6466 756e 206e ".*.." [oldfun n │ │ │ -000014d0: 6577 6675 6e20 6669 6e64 2d66 696c 652d ewfun find-file- │ │ │ -000014e0: 636f 6469 6e67 2d73 7973 7465 6d2d 6672 coding-system-fr │ │ │ -000014f0: 6f6d 2d66 696c 656e 616d 6520 6669 6e64 om-filename find │ │ │ -00001500: 2d66 696c 652d 636f 6469 6e67 2d73 7973 -file-coding-sys │ │ │ -00001510: 7465 6d2d 666f 722d 7265 6164 2d66 726f tem-for-read-fro │ │ │ -00001520: 6d2d 6669 6c65 6e61 6d65 2064 6566 696e m-filename defin │ │ │ -00001530: 652d 6675 6e63 7469 6f6e 206d 616b 652d e-function make- │ │ │ -00001540: 6f62 736f 6c65 7465 5d20 3329 0a23 4031 obsolete] 3).#@1 │ │ │ -00001550: 3836 204c 6f6f 6b20 7570 2063 6f64 696e 86 Look up codin │ │ │ -00001560: 6720 7379 7374 656d 2074 6f20 7772 6974 g system to writ │ │ │ -00001570: 6520 6120 6669 6c65 2069 6e20 6066 696c e a file in `fil │ │ │ -00001580: 652d 636f 6469 6e67 2d73 7973 7465 6d2d e-coding-system- │ │ │ -00001590: 616c 6973 7427 2e0a 5468 6520 7265 7475 alist'..The retu │ │ │ -000015a0: 726e 2076 616c 7565 2077 696c 6c20 6265 rn value will be │ │ │ -000015b0: 206e 696c 2028 6e6f 2061 7070 6c69 6361 nil (no applica │ │ │ -000015c0: 626c 6520 656e 7472 7929 206f 7220 6120 ble entry) or a │ │ │ -000015d0: 636f 6469 6e67 2073 7973 7465 6d0a 6f62 coding system.ob │ │ │ -000015e0: 6a65 6374 2028 7468 6520 656e 7472 7920 ject (the entry │ │ │ -000015f0: 7370 6563 6966 6965 6420 6120 636f 6469 specified a codi │ │ │ -00001600: 6e67 2073 7973 7465 6d29 2e1f 0a28 6465 ng system)...(de │ │ │ -00001610: 6661 6c69 6173 2027 6669 6e64 2d66 696c falias 'find-fil │ │ │ -00001620: 652d 636f 6469 6e67 2d73 7973 7465 6d2d e-coding-system- │ │ │ -00001630: 666f 722d 7772 6974 652d 6672 6f6d 2d66 for-write-from-f │ │ │ -00001640: 696c 656e 616d 6520 235b 2866 696c 656e ilename #[(filen │ │ │ -00001650: 616d 6529 2022 09c6 891d 1a1c c618 c70b ame) ".......... │ │ │ -00001660: 2113 5c6e ac96 0cab 93c8 0c40 400b 5c22 !.\n.......@@.\" │ │ │ -00001670: ab86 0c40 4115 c912 0c41 14aa 6729 0dad ...@A....A..g).. │ │ │ -00001680: 97ca 0d21 ab85 0dcb 0b5c 2215 0d3a ab86 ...!.....\"..:.. │ │ │ -00001690: cc0d 4121 aa83 cc0d 212b 8722 205b 6361 ..A!....!+." [ca │ │ │ -000016a0: 7365 2d66 6f6c 642d 7365 6172 6368 2066 se-fold-search f │ │ │ -000016b0: 696c 652d 636f 6469 6e67 2d73 7973 7465 ile-coding-syste │ │ │ -000016c0: 6d2d 616c 6973 7420 666f 756e 6420 6669 m-alist found fi │ │ │ -000016d0: 6c65 6e61 6d65 2061 6c69 7374 2063 6f64 lename alist cod │ │ │ -000016e0: 6573 7973 206e 696c 2066 696c 652d 6e61 esys nil file-na │ │ │ -000016f0: 6d65 2d73 616e 732d 7665 7273 696f 6e73 me-sans-versions │ │ │ -00001700: 2073 7472 696e 672d 6d61 7463 6820 7420 string-match t │ │ │ -00001710: 6675 6e63 7469 6f6e 7020 7772 6974 652d functionp write- │ │ │ -00001720: 7265 6769 6f6e 2066 696e 642d 636f 6469 region find-codi │ │ │ -00001730: 6e67 2d73 7973 7465 6d5d 2033 2028 2324 ng-system] 3 (#$ │ │ │ -00001740: 202e 2035 3435 3929 5d29 0a23 4036 3035 . 5459)]).#@605 │ │ │ -00001750: 204c 6f6f 6b20 666f 7220 7468 6520 636f Look for the co │ │ │ -00001760: 6469 6e67 2d73 7973 7465 6d20 6d61 6769 ding-system magi │ │ │ -00001770: 6320 636f 6f6b 6965 2069 6e20 7468 6520 c cookie in the │ │ │ -00001780: 6375 7272 656e 7420 6275 6666 6572 2e0a current buffer.. │ │ │ -00001790: 5468 6520 636f 6469 6e67 2d73 7973 7465 The coding-syste │ │ │ -000017a0: 6d20 6d61 6769 6320 636f 6f6b 6965 2069 m magic cookie i │ │ │ -000017b0: 7320 7468 6520 6578 6163 7420 7374 7269 s the exact stri │ │ │ -000017c0: 6e67 0a22 3b3b 3b23 2323 636f 6469 6e67 ng.";;;###coding │ │ │ -000017d0: 2073 7973 7465 6d3a 2022 2066 6f6c 6c6f system: " follo │ │ │ -000017e0: 7765 6420 6279 2061 2076 616c 6964 2063 wed by a valid c │ │ │ -000017f0: 6f64 696e 6720 7379 7374 656d 2073 796d oding system sym │ │ │ -00001800: 626f 6c2c 0a73 6f6d 6577 6865 7265 2077 bol,.somewhere w │ │ │ -00001810: 6974 6869 6e20 7468 6520 6669 7273 7420 ithin the first │ │ │ -00001820: 3330 3030 2063 6861 7261 6374 6572 7320 3000 characters │ │ │ -00001830: 6f66 2074 6865 2066 696c 652e 2020 4966 of the file. If │ │ │ -00001840: 2066 6f75 6e64 2c0a 7468 6520 636f 6469 found,.the codi │ │ │ -00001850: 6e67 2073 7973 7465 6d20 7379 6d62 6f6c ng system symbol │ │ │ -00001860: 2069 7320 7265 7475 726e 6564 3b20 6f74 is returned; ot │ │ │ -00001870: 6865 7277 6973 6520 6e69 6c20 6973 2072 herwise nil is r │ │ │ -00001880: 6574 7572 6e65 642e 0a4e 6f74 6520 7468 eturned..Note th │ │ │ -00001890: 6174 2069 7420 6973 2065 7874 7265 6d65 at it is extreme │ │ │ -000018a0: 6c79 2075 6e6c 696b 656c 7920 7468 6174 ly unlikely that │ │ │ -000018b0: 2073 7563 6820 6120 7374 7269 6e67 2077 such a string w │ │ │ -000018c0: 6f75 6c64 206f 6363 7572 0a63 6f69 6e63 ould occur.coinc │ │ │ -000018d0: 6964 656e 7461 6c6c 7920 6173 2074 6865 identally as the │ │ │ -000018e0: 2072 6573 756c 7420 6f66 2065 6e63 6f64 result of encod │ │ │ -000018f0: 696e 6720 736f 6d65 2063 6861 7261 6374 ing some charact │ │ │ -00001900: 6572 7320 696e 2061 206e 6f6e 2d41 5343 ers in a non-ASC │ │ │ -00001910: 4949 0a63 6861 7273 6574 2c20 616e 6420 II.charset, and │ │ │ -00001920: 7468 6174 2074 6865 2073 7061 6365 7320 that the spaces │ │ │ -00001930: 6d61 6b65 2069 7420 6576 656e 206c 6573 make it even les │ │ │ -00001940: 7320 6c69 6b65 6c79 2073 696e 6365 2074 s likely since t │ │ │ -00001950: 6865 2073 7061 6365 0a63 6861 7261 6374 he space.charact │ │ │ -00001960: 6572 2069 7320 6e6f 7420 6120 7661 6c69 er is not a vali │ │ │ -00001970: 6420 6f63 7465 7420 696e 2061 6e79 2049 d octet in any I │ │ │ -00001980: 534f 2032 3032 3220 656e 636f 6469 6e67 SO 2022 encoding │ │ │ -00001990: 206f 6620 6d6f 7374 206e 6f6e 2d41 5343 of most non-ASC │ │ │ -000019a0: 4949 0a63 6861 7273 6574 732e 1f0a 2864 II.charsets...(d │ │ │ -000019b0: 6566 616c 6961 7320 2766 696e 642d 636f efalias 'find-co │ │ │ -000019c0: 6469 6e67 2d73 7973 7465 6d2d 6d61 6769 ding-system-magi │ │ │ -000019d0: 632d 636f 6f6b 6965 2023 5b6e 696c 2022 c-cookie #[nil " │ │ │ -000019e0: 8a65 6288 c4c5 21ab 91c6 c794 c795 7b21 .eb...!.......{! │ │ │ -000019f0: 1bc8 0b21 ad81 0b29 aea7 c918 cacb 65cc ...!...)......e. │ │ │ -00001a00: 5c5c cd23 ad9b 60ce c977 8860 1a19 5c6e \\.#..`..w.`..\n │ │ │ -00001a10: 0956 ad8d c609 5c6e 7b21 1bc8 0b21 ad81 .V....\n{!...!.. │ │ │ -00001a20: 0b29 2a29 2987 2220 5b63 6173 652d 666f .)*))." [case-fo │ │ │ -00001a30: 6c64 2d73 6561 7263 6820 7374 6172 7420 ld-search start │ │ │ -00001a40: 656e 6420 636f 6465 7379 7320 6c6f 6f6b end codesys look │ │ │ -00001a50: 696e 672d 6174 2022 5e5b 5e5c 6e5d 2a2d ing-at "^[^\n]*- │ │ │ -00001a60: 5c5c 2a2d 5b5e 5c6e 5d2a 636f 6469 6e67 \\*-[^\n]*coding │ │ │ -00001a70: 3a20 5c5c 285b 5e20 095c 6e3b 5d2b 5c5c : \\([^ .\n;]+\\ │ │ │ -00001a80: 295b 5e5c 6e5d 2a2d 5c5c 2a2d 2220 696e )[^\n]*-\\*-" in │ │ │ -00001a90: 7465 726e 2031 2066 696e 642d 636f 6469 tern 1 find-codi │ │ │ -00001aa0: 6e67 2d73 7973 7465 6d20 6e69 6c20 7365 ng-system nil se │ │ │ -00001ab0: 6172 6368 2d66 6f72 7761 7264 2022 3b3b arch-forward ";; │ │ │ -00001ac0: 3b23 2323 636f 6469 6e67 2073 7973 7465 ;###coding syste │ │ │ -00001ad0: 6d3a 2022 2033 3030 3020 7420 225e 2009 m: " 3000 t "^ . │ │ │ -00001ae0: 5c6e 0d22 5d20 3420 2823 2420 2e20 3539 \n."] 4 (#$ . 59 │ │ │ -00001af0: 3639 295d 290a 2340 3437 3520 4578 6563 69)]).#@475 Exec │ │ │ -00001b00: 7574 6520 6120 6669 6c65 206f 6620 4c69 ute a file of Li │ │ │ -00001b10: 7370 2063 6f64 6520 6e61 6d65 6420 4649 sp code named FI │ │ │ -00001b20: 4c45 2e0a 4669 7273 7420 7472 6965 7320 LE..First tries │ │ │ -00001b30: 4649 4c45 2077 6974 6820 2e65 6c63 2061 FILE with .elc a │ │ │ -00001b40: 7070 656e 6465 642c 2074 6865 6e20 7472 ppended, then tr │ │ │ -00001b50: 6965 7320 7769 7468 202e 656c 2c0a 2074 ies with .el,. t │ │ │ -00001b60: 6865 6e20 7472 6965 7320 4649 4c45 2075 hen tries FILE u │ │ │ -00001b70: 6e6d 6f64 6966 6965 642e 2020 5365 6172 nmodified. Sear │ │ │ -00001b80: 6368 6573 2064 6972 6563 746f 7269 6573 ches directories │ │ │ -00001b90: 2069 6e20 6c6f 6164 2d70 6174 682e 0a49 in load-path..I │ │ │ -00001ba0: 6620 6f70 7469 6f6e 616c 2073 6563 6f6e f optional secon │ │ │ -00001bb0: 6420 6172 6720 4e4f 4552 524f 5220 6973 d arg NOERROR is │ │ │ -00001bc0: 206e 6f6e 2d6e 696c 2c0a 2072 6570 6f72 non-nil,. repor │ │ │ -00001bd0: 7420 6e6f 2065 7272 6f72 2069 6620 4649 t no error if FI │ │ │ -00001be0: 4c45 2064 6f65 736e 2774 2065 7869 7374 LE doesn't exist │ │ │ -00001bf0: 2e0a 5072 696e 7420 6d65 7373 6167 6573 ..Print messages │ │ │ -00001c00: 2061 7420 7374 6172 7420 616e 6420 656e at start and en │ │ │ -00001c10: 6420 6f66 206c 6f61 6469 6e67 2075 6e6c d of loading unl │ │ │ -00001c20: 6573 730a 206f 7074 696f 6e61 6c20 7468 ess. optional th │ │ │ -00001c30: 6972 6420 6172 6720 4e4f 4d45 5353 4147 ird arg NOMESSAG │ │ │ -00001c40: 4520 6973 206e 6f6e 2d6e 696c 2e0a 4966 E is non-nil..If │ │ │ -00001c50: 206f 7074 696f 6e61 6c20 666f 7572 7468 optional fourth │ │ │ -00001c60: 2061 7267 204e 4f53 5546 4649 5820 6973 arg NOSUFFIX is │ │ │ -00001c70: 206e 6f6e 2d6e 696c 2c20 646f 6e27 7420 non-nil, don't │ │ │ -00001c80: 7472 7920 6164 6469 6e67 0a20 7375 6666 try adding. suff │ │ │ -00001c90: 6978 6573 202e 656c 6320 6f72 202e 656c ixes .elc or .el │ │ │ -00001ca0: 2074 6f20 7468 6520 7370 6563 6966 6965 to the specifie │ │ │ -00001cb0: 6420 6e61 6d65 2046 494c 452e 0a52 6574 d name FILE..Ret │ │ │ -00001cc0: 7572 6e20 7420 6966 2066 696c 6520 6578 urn t if file ex │ │ │ -00001cd0: 6973 7473 2e1f 0a28 6465 6661 6c69 6173 ists...(defalias │ │ │ -00001ce0: 2027 6c6f 6164 2023 5b28 6669 6c65 2026 'load #[(file & │ │ │ -00001cf0: 6f70 7469 6f6e 616c 206e 6f65 7272 6f72 optional noerror │ │ │ -00001d00: 206e 6f6d 6573 7361 6765 206e 6f73 7566 nomessage nosuf │ │ │ -00001d10: 6669 7829 2022 c608 211d c70d c85c 221b fix) "..!....\". │ │ │ -00001d20: c91c 0bab 8a0b c80d 5c6e 0e1c 0925 aadf ........\n...%.. │ │ │ -00001d30: 0d47 ca58 ac8e cb0d 0e1f 093f ad81 cc23 .G.X.......?...# │ │ │ -00001d40: 8914 ac8c 5c6e 3fad c7cd cecf 0d44 5c22 ....\n?......D\" │ │ │ -00001d50: aabf d008 5c6e 0e1c 090c d1c9 4f97 d298 ....\n......O... │ │ │ -00001d60: 891e 1dac 840e 1eae a78a d3d4 2171 88d5 ............!q.. │ │ │ -00001d70: 2088 d61e 1ed7 0cc9 cad8 2488 29d9 2029 .........$.). ) │ │ │ -00001d80: ae8e 0e1d ab83 daaa 87db 0c21 ae82 0e20 ...........!... │ │ │ -00001d90: 2925 2b87 2220 5b66 696c 6520 6e6f 7375 )%+." [file nosu │ │ │ -00001da0: 6666 6978 206e 6f65 7272 6f72 2068 616e ffix noerror han │ │ │ -00001db0: 646c 6572 2070 6174 6820 6669 6c65 6e61 dler path filena │ │ │ -00001dc0: 6d65 2073 7562 7374 6974 7574 652d 696e me substitute-in │ │ │ -00001dd0: 2d66 696c 652d 6e61 6d65 2066 696e 642d -file-name find- │ │ │ -00001de0: 6669 6c65 2d6e 616d 652d 6861 6e64 6c65 file-name-handle │ │ │ -00001df0: 7220 6c6f 6164 206e 696c 2030 206c 6f63 r load nil 0 loc │ │ │ -00001e00: 6174 652d 6669 6c65 2028 222e 656c 6322 ate-file (".elc" │ │ │ -00001e10: 2022 2e65 6c22 2022 2229 2073 6967 6e61 ".el" "") signa │ │ │ -00001e20: 6c20 6669 6c65 2d65 7272 6f72 2022 4361 l file-error "Ca │ │ │ -00001e30: 6e6e 6f74 206f 7065 6e20 6c6f 6164 2066 nnot open load f │ │ │ -00001e40: 696c 6522 206c 6f61 642d 696e 7465 726e ile" load-intern │ │ │ -00001e50: 616c 202d 3420 222e 656c 6322 2067 6574 al -4 ".elc" get │ │ │ -00001e60: 2d62 7566 6665 722d 6372 6561 7465 2022 -buffer-create " │ │ │ -00001e70: 202a 6c6f 6164 2a22 2065 7261 7365 2d62 *load*" erase-b │ │ │ -00001e80: 7566 6665 7220 7261 772d 7465 7874 2069 uffer raw-text i │ │ │ -00001e90: 6e73 6572 742d 6669 6c65 2d63 6f6e 7465 nsert-file-conte │ │ │ -00001ea0: 6e74 7320 3330 3030 2066 696e 642d 636f nts 3000 find-co │ │ │ -00001eb0: 6469 6e67 2d73 7973 7465 6d2d 6d61 6769 ding-system-magi │ │ │ -00001ec0: 632d 636f 6f6b 6965 2062 696e 6172 7920 c-cookie binary │ │ │ -00001ed0: 6669 6e64 2d66 696c 652d 636f 6469 6e67 find-file-coding │ │ │ -00001ee0: 2d73 7973 7465 6d2d 666f 722d 7265 6164 -system-for-read │ │ │ -00001ef0: 2d66 726f 6d2d 6669 6c65 6e61 6d65 206e -from-filename n │ │ │ -00001f00: 6f6d 6573 7361 6765 2065 6c63 2063 6f64 omessage elc cod │ │ │ -00001f10: 696e 672d 7379 7374 656d 2d66 6f72 2d72 ing-system-for-r │ │ │ -00001f20: 6561 6420 6c6f 6164 2d70 6174 6820 6275 ead load-path bu │ │ │ -00001f30: 6666 6572 2d66 696c 652d 636f 6469 6e67 ffer-file-coding │ │ │ -00001f40: 2d73 7973 7465 6d2d 666f 722d 7265 6164 -system-for-read │ │ │ -00001f50: 5d20 3131 2028 2324 202e 2036 3930 3829 ] 11 (#$ . 6908) │ │ │ -00001f60: 5d29 0a23 4032 3436 2041 2068 6f6f 6b20 ]).#@246 A hook │ │ │ -00001f70: 746f 206d 616b 6520 6120 6669 6c65 2061 to make a file a │ │ │ -00001f80: 6363 6573 7369 626c 6520 6265 666f 7265 ccessible before │ │ │ -00001f90: 2072 6561 6469 6e67 2069 742e 0a60 696e reading it..`in │ │ │ -00001fa0: 7365 7274 2d66 696c 652d 636f 6e74 656e sert-file-conten │ │ │ -00001fb0: 7473 2720 6361 6c6c 7320 7468 6973 2068 ts' calls this h │ │ │ -00001fc0: 6f6f 6b20 6265 666f 7265 2064 6f69 6e67 ook before doing │ │ │ -00001fd0: 2061 6e79 7468 696e 6720 656c 7365 2e0a anything else.. │ │ │ -00001fe0: 4361 6c6c 6564 2077 6974 6820 7477 6f20 Called with two │ │ │ -00001ff0: 6172 6775 6d65 6e74 733a 2046 494c 454e arguments: FILEN │ │ │ -00002000: 414d 4520 616e 6420 5649 5349 542c 2074 AME and VISIT, t │ │ │ -00002010: 6865 2073 616d 6520 6173 2074 6865 0a63 he same as the.c │ │ │ -00002020: 6f72 7265 7370 6f6e 6469 6e67 2061 7267 orresponding arg │ │ │ -00002030: 756d 656e 7473 2069 6e20 7468 6520 6361 uments in the ca │ │ │ -00002040: 6c6c 2074 6f20 6069 6e73 6572 742d 6669 ll to `insert-fi │ │ │ -00002050: 6c65 2d63 6f6e 7465 6e74 7327 2e1f 0a28 le-contents'...( │ │ │ -00002060: 6465 6676 6172 2069 6e73 6572 742d 6669 defvar insert-fi │ │ │ -00002070: 6c65 2d63 6f6e 7465 6e74 732d 6163 6365 le-contents-acce │ │ │ -00002080: 7373 2d68 6f6f 6b20 6e69 6c20 2823 2420 ss-hook nil (#$ │ │ │ -00002090: 2e20 3830 3431 2929 0a23 4038 3738 2041 . 8041)).#@878 A │ │ │ -000020a0: 2073 7065 6369 616c 2068 6f6f 6b20 746f special hook to │ │ │ -000020b0: 2064 6563 6964 6520 7468 6520 636f 6469 decide the codi │ │ │ -000020c0: 6e67 2073 7973 7465 6d20 7573 6564 2066 ng system used f │ │ │ -000020d0: 6f72 2072 6561 6469 6e67 2069 6e20 6120 or reading in a │ │ │ -000020e0: 6669 6c65 2e0a 0a42 6566 6f72 6520 7265 file...Before re │ │ │ -000020f0: 6164 696e 6720 6120 6669 6c65 2c20 6069 ading a file, `i │ │ │ -00002100: 6e73 6572 742d 6669 6c65 2d63 6f6e 7465 nsert-file-conte │ │ │ -00002110: 6e74 7327 2063 616c 6c73 2074 6865 2066 nts' calls the f │ │ │ -00002120: 756e 6374 696f 6e73 206f 6e0a 7468 6973 unctions on.this │ │ │ -00002130: 2068 6f6f 6b20 7769 7468 2061 7267 756d hook with argum │ │ │ -00002140: 656e 7473 2046 494c 454e 414d 4520 616e ents FILENAME an │ │ │ -00002150: 6420 5649 5349 542c 2074 6865 2073 616d d VISIT, the sam │ │ │ -00002160: 6520 6173 2074 6865 0a63 6f72 7265 7370 e as the.corresp │ │ │ -00002170: 6f6e 6469 6e67 2061 7267 756d 656e 7473 onding arguments │ │ │ -00002180: 2069 6e20 7468 6520 6361 6c6c 2074 6f20 in the call to │ │ │ -00002190: 6069 6e73 6572 742d 6669 6c65 2d63 6f6e `insert-file-con │ │ │ -000021a0: 7465 6e74 7327 2e20 2049 6e0a 7468 6573 tents'. In.thes │ │ │ -000021b0: 6520 6675 6e63 7469 6f6e 732c 2079 6f75 e functions, you │ │ │ -000021c0: 206d 6179 2072 6566 6572 2074 6f20 7468 may refer to th │ │ │ -000021d0: 6520 676c 6f62 616c 2076 6172 6961 626c e global variabl │ │ │ -000021e0: 650a 6062 7566 6665 722d 6669 6c65 2d63 e.`buffer-file-c │ │ │ -000021f0: 6f64 696e 672d 7379 7374 656d 2d66 6f72 oding-system-for │ │ │ -00002200: 2d72 6561 6427 2e0a 0a54 6865 2072 6574 -read'...The ret │ │ │ -00002210: 7572 6e20 7661 6c75 6520 6f66 2074 6865 urn value of the │ │ │ -00002220: 2066 756e 6374 696f 6e73 2073 686f 756c functions shoul │ │ │ -00002230: 6420 6265 2065 6974 6865 720a 0a2d 2d20 d be either..-- │ │ │ -00002240: 6e69 6c0a 2d2d 2041 2063 6f64 696e 6720 nil.-- A coding │ │ │ -00002250: 7379 7374 656d 206f 7220 6120 7379 6d62 system or a symb │ │ │ -00002260: 6f6c 2064 656e 6f74 696e 6720 6974 2c20 ol denoting it, │ │ │ -00002270: 696e 6469 6361 7469 6e67 2074 6865 2063 indicating the c │ │ │ -00002280: 6f64 696e 6720 7379 7374 656d 0a20 2020 oding system. │ │ │ -00002290: 746f 2062 6520 7573 6564 2066 6f72 2072 to be used for r │ │ │ -000022a0: 6561 6469 6e67 2074 6865 2066 696c 650a eading the file. │ │ │ -000022b0: 2d2d 2041 206c 6973 7420 6f66 2074 776f -- A list of two │ │ │ -000022c0: 2065 6c65 6d65 6e74 7320 2861 6273 6f6c elements (absol │ │ │ -000022d0: 7574 6520 7061 7468 6e61 6d65 2061 6e64 ute pathname and │ │ │ -000022e0: 206c 656e 6774 6820 6f66 2064 6174 6120 length of data │ │ │ -000022f0: 696e 7365 7274 6564 292c 0a20 2020 7768 inserted),. wh │ │ │ -00002300: 6963 6820 6973 2075 7365 6420 6173 2074 ich is used as t │ │ │ -00002310: 6865 2072 6574 7572 6e20 7661 6c75 6520 he return value │ │ │ -00002320: 746f 2060 696e 7365 7274 2d66 696c 652d to `insert-file- │ │ │ -00002330: 636f 6e74 656e 7473 272e 2020 496e 2074 contents'. In t │ │ │ -00002340: 6869 730a 2020 2063 6173 652c 2060 696e his. case, `in │ │ │ -00002350: 7365 7274 2d66 696c 652d 636f 6e74 656e sert-file-conten │ │ │ -00002360: 7473 2720 6173 7375 6d65 7320 7468 6174 ts' assumes that │ │ │ -00002370: 2074 6865 2066 756e 6374 696f 6e20 6861 the function ha │ │ │ -00002380: 7320 696e 7365 7274 6564 0a20 2020 7468 s inserted. th │ │ │ -00002390: 6520 6669 6c65 2066 6f72 2069 7473 656c e file for itsel │ │ │ -000023a0: 6620 616e 6420 7375 7070 7265 7373 6573 f and suppresses │ │ │ -000023b0: 2066 7572 7468 6572 2072 6561 6469 6e67 further reading │ │ │ -000023c0: 2e0a 0a49 6620 616e 7920 6675 6e63 7469 ...If any functi │ │ │ -000023d0: 6f6e 2072 6574 7572 6e73 206e 6f6e 2d6e on returns non-n │ │ │ -000023e0: 696c 2c20 7468 6520 7265 6d61 696e 696e il, the remainin │ │ │ -000023f0: 6720 6675 6e63 7469 6f6e 7320 6172 6520 g functions are │ │ │ -00002400: 6e6f 7420 6361 6c6c 6564 2e1f 0a28 6465 not called...(de │ │ │ -00002410: 6676 6172 2069 6e73 6572 742d 6669 6c65 fvar insert-file │ │ │ -00002420: 2d63 6f6e 7465 6e74 732d 7072 652d 686f -contents-pre-ho │ │ │ -00002430: 6f6b 206e 696c 2028 2324 202e 2038 3335 ok nil (#$ . 835 │ │ │ -00002440: 3129 290a 2340 3438 3320 4120 686f 6f6b 1)).#@483 A hook │ │ │ -00002450: 2074 6f20 7365 7420 6062 7566 6665 722d to set `buffer- │ │ │ -00002460: 6669 6c65 2d63 6f64 696e 672d 7379 7374 file-coding-syst │ │ │ -00002470: 656d 2720 7768 656e 2061 2072 6561 6420 em' when a read │ │ │ -00002480: 6572 726f 7220 6861 7320 6f63 6375 7272 error has occurr │ │ │ -00002490: 6564 2e0a 0a57 6865 6e20 6120 6669 6c65 ed...When a file │ │ │ -000024a0: 2065 7272 6f72 2028 652e 672e 206e 6f6e error (e.g. non │ │ │ -000024b0: 6578 6973 7465 6e74 2066 696c 6529 206f existent file) o │ │ │ -000024c0: 6363 7572 7320 7768 696c 6520 7265 6164 ccurs while read │ │ │ -000024d0: 2061 2066 696c 652c 0a60 696e 7365 7274 a file,.`insert │ │ │ -000024e0: 2d66 696c 652d 636f 6e74 656e 7473 2720 -file-contents' │ │ │ -000024f0: 6361 6c6c 7320 7468 6520 6675 6e63 7469 calls the functi │ │ │ -00002500: 6f6e 7320 6f6e 2074 6869 7320 686f 6f6b ons on this hook │ │ │ -00002510: 2077 6974 6820 7468 7265 650a 6172 6775 with three.argu │ │ │ -00002520: 6d65 6e74 733a 2046 494c 454e 414d 4520 ments: FILENAME │ │ │ -00002530: 616e 6420 5649 5349 5420 2874 6865 2073 and VISIT (the s │ │ │ -00002540: 616d 6520 6173 2074 6865 2063 6f72 7265 ame as the corre │ │ │ -00002550: 7370 6f6e 6469 6e67 2061 7267 756d 656e sponding argumen │ │ │ -00002560: 7473 0a69 6e20 7468 6520 6361 6c6c 2074 ts.in the call t │ │ │ -00002570: 6f20 6069 6e73 6572 742d 6669 6c65 2d63 o `insert-file-c │ │ │ -00002580: 6f6e 7465 6e74 7327 2920 616e 6420 6120 ontents') and a │ │ │ -00002590: 636f 6e73 2028 5349 474e 414c 4544 2d43 cons (SIGNALED-C │ │ │ -000025a0: 4f4e 4449 5449 4f4e 530a 2e20 5349 474e ONDITIONS.. SIGN │ │ │ -000025b0: 414c 2d44 4154 4129 2e0a 0a41 6674 6572 AL-DATA)...After │ │ │ -000025c0: 2063 616c 6c69 6e67 2074 6869 7320 686f calling this ho │ │ │ -000025d0: 6f6b 2c20 7468 6520 6572 726f 7220 6973 ok, the error is │ │ │ -000025e0: 2073 6967 6e61 6c6c 6564 2066 6f72 2072 signalled for r │ │ │ -000025f0: 6561 6c20 616e 640a 7072 6f70 6167 6174 eal and.propagat │ │ │ -00002600: 6573 2074 6f20 7468 6520 6361 6c6c 6572 es to the caller │ │ │ -00002610: 206f 6620 6069 6e73 6572 742d 6669 6c65 of `insert-file │ │ │ -00002620: 2d63 6f6e 7465 6e74 7327 2e1f 0a28 6465 -contents'...(de │ │ │ -00002630: 6676 6172 2069 6e73 6572 742d 6669 6c65 fvar insert-file │ │ │ -00002640: 2d63 6f6e 7465 6e74 732d 6572 726f 722d -contents-error- │ │ │ -00002650: 686f 6f6b 206e 696c 2028 2324 202e 2039 hook nil (#$ . 9 │ │ │ -00002660: 3239 3029 290a 2340 3436 3320 4120 686f 290)).#@463 A ho │ │ │ -00002670: 6f6b 2074 6f20 7365 7420 6062 7566 6665 ok to set `buffe │ │ │ -00002680: 722d 6669 6c65 2d63 6f64 696e 672d 7379 r-file-coding-sy │ │ │ -00002690: 7374 656d 2720 666f 7220 7468 6520 6375 stem' for the cu │ │ │ -000026a0: 7272 656e 7420 6275 6666 6572 2e0a 0a41 rrent buffer...A │ │ │ -000026b0: 6674 6572 2073 7563 6365 7373 6675 6c20 fter successful │ │ │ -000026c0: 7265 6164 696e 672c 2060 696e 7365 7274 reading, `insert │ │ │ -000026d0: 2d66 696c 652d 636f 6e74 656e 7473 2720 -file-contents' │ │ │ -000026e0: 6361 6c6c 7320 7468 6520 6675 6e63 7469 calls the functi │ │ │ -000026f0: 6f6e 730a 6f6e 2074 6869 7320 686f 6f6b ons.on this hook │ │ │ -00002700: 2077 6974 6820 666f 7572 2061 7267 756d with four argum │ │ │ -00002710: 656e 7473 3a20 4649 4c45 4e41 4d45 2061 ents: FILENAME a │ │ │ -00002720: 6e64 2056 4953 4954 2028 7468 6520 7361 nd VISIT (the sa │ │ │ -00002730: 6d65 2061 7320 7468 650a 636f 7272 6573 me as the.corres │ │ │ -00002740: 706f 6e64 696e 6720 6172 6775 6d65 6e74 ponding argument │ │ │ -00002750: 7320 696e 2074 6865 2063 616c 6c20 746f s in the call to │ │ │ -00002760: 2060 696e 7365 7274 2d66 696c 652d 636f `insert-file-co │ │ │ -00002770: 6e74 656e 7473 2729 2c0a 434f 4449 4e47 ntents'),.CODING │ │ │ -00002780: 2d53 5953 5445 4d20 2874 6865 2061 6374 -SYSTEM (the act │ │ │ -00002790: 7561 6c20 636f 6469 6e67 2073 7973 7465 ual coding syste │ │ │ -000027a0: 6d20 7573 6564 2074 6f20 6465 636f 6465 m used to decode │ │ │ -000027b0: 2074 6865 2066 696c 6529 2c20 616e 640a the file), and. │ │ │ -000027c0: 6120 636f 6e73 206f 6620 6162 736f 6c75 a cons of absolu │ │ │ -000027d0: 7465 2070 6174 686e 616d 6520 616e 6420 te pathname and │ │ │ -000027e0: 6c65 6e67 7468 206f 6620 6461 7461 2069 length of data i │ │ │ -000027f0: 6e73 6572 7465 6420 2874 6865 2073 616d nserted (the sam │ │ │ -00002800: 650a 7468 696e 6720 6173 2077 696c 6c20 e.thing as will │ │ │ -00002810: 6265 2072 6574 7572 6e65 6420 6672 6f6d be returned from │ │ │ -00002820: 2060 696e 7365 7274 2d66 696c 652d 636f `insert-file-co │ │ │ -00002830: 6e74 656e 7473 2729 2e1f 0a28 6465 6676 ntents')...(defv │ │ │ -00002840: 6172 2069 6e73 6572 742d 6669 6c65 2d63 ar insert-file-c │ │ │ -00002850: 6f6e 7465 6e74 732d 706f 7374 2d68 6f6f ontents-post-hoo │ │ │ -00002860: 6b20 6e69 6c20 2823 2420 2e20 3938 3336 k nil (#$ . 9836 │ │ │ -00002870: 2929 0a23 4031 3433 3820 496e 7365 7274 )).#@1438 Insert │ │ │ -00002880: 2063 6f6e 7465 6e74 7320 6f66 2066 696c contents of fil │ │ │ -00002890: 6520 4649 4c45 4e41 4d45 2061 6674 6572 e FILENAME after │ │ │ -000028a0: 2070 6f69 6e74 2e0a 5265 7475 726e 7320 point..Returns │ │ │ -000028b0: 6c69 7374 206f 6620 6162 736f 6c75 7465 list of absolute │ │ │ -000028c0: 2066 696c 6520 6e61 6d65 2061 6e64 206c file name and l │ │ │ -000028d0: 656e 6774 6820 6f66 2064 6174 6120 696e ength of data in │ │ │ -000028e0: 7365 7274 6564 2e0a 4966 2073 6563 6f6e serted..If secon │ │ │ -000028f0: 6420 6172 6775 6d65 6e74 2056 4953 4954 d argument VISIT │ │ │ -00002900: 2069 7320 6e6f 6e2d 6e69 6c2c 2074 6865 is non-nil, the │ │ │ -00002910: 2062 7566 6665 7227 7320 7669 7369 7465 buffer's visite │ │ │ -00002920: 6420 6669 6c65 6e61 6d65 0a61 6e64 206c d filename.and l │ │ │ -00002930: 6173 7420 7361 7665 2066 696c 6520 6d6f ast save file mo │ │ │ -00002940: 6474 696d 6520 6172 6520 7365 742c 2061 dtime are set, a │ │ │ -00002950: 6e64 2069 7420 6973 206d 6172 6b65 6420 nd it is marked │ │ │ -00002960: 756e 6d6f 6469 6669 6564 2e0a 4966 2076 unmodified..If v │ │ │ -00002970: 6973 6974 696e 6720 616e 6420 7468 6520 isiting and the │ │ │ -00002980: 6669 6c65 2064 6f65 7320 6e6f 7420 6578 file does not ex │ │ │ -00002990: 6973 742c 2076 6973 6974 696e 6720 6973 ist, visiting is │ │ │ -000029a0: 2063 6f6d 706c 6574 6564 0a62 6566 6f72 completed.befor │ │ │ -000029b0: 6520 7468 6520 6572 726f 7220 6973 2073 e the error is s │ │ │ -000029c0: 6967 6e61 6c65 642e 0a0a 5468 6520 6f70 ignaled...The op │ │ │ -000029d0: 7469 6f6e 616c 2074 6869 7264 2061 6e64 tional third and │ │ │ -000029e0: 2066 6f75 7274 6820 6172 6775 6d65 6e74 fourth argument │ │ │ -000029f0: 7320 5354 4152 5420 616e 6420 454e 440a s START and END. │ │ │ -00002a00: 7370 6563 6966 7920 7768 6174 2070 6f72 specify what por │ │ │ -00002a10: 7469 6f6e 206f 6620 7468 6520 6669 6c65 tion of the file │ │ │ -00002a20: 2074 6f20 696e 7365 7274 2e0a 4966 2056 to insert..If V │ │ │ -00002a30: 4953 4954 2069 7320 6e6f 6e2d 6e69 6c2c ISIT is non-nil, │ │ │ -00002a40: 2053 5441 5254 2061 6e64 2045 4e44 206d START and END m │ │ │ -00002a50: 7573 7420 6265 206e 696c 2e0a 4966 206f ust be nil..If o │ │ │ -00002a60: 7074 696f 6e61 6c20 6669 6674 6820 6172 ptional fifth ar │ │ │ -00002a70: 6775 6d65 6e74 2052 4550 4c41 4345 2069 gument REPLACE i │ │ │ -00002a80: 7320 6e6f 6e2d 6e69 6c2c 0a69 7420 6d65 s non-nil,.it me │ │ │ -00002a90: 616e 7320 7265 706c 6163 6520 7468 6520 ans replace the │ │ │ -00002aa0: 6375 7272 656e 7420 6275 6666 6572 2063 current buffer c │ │ │ -00002ab0: 6f6e 7465 6e74 7320 2869 6e20 7468 6520 ontents (in the │ │ │ -00002ac0: 6163 6365 7373 6962 6c65 2070 6f72 7469 accessible porti │ │ │ -00002ad0: 6f6e 290a 7769 7468 2074 6865 2066 696c on).with the fil │ │ │ -00002ae0: 6520 636f 6e74 656e 7473 2e20 2054 6869 e contents. Thi │ │ │ -00002af0: 7320 6973 2062 6574 7465 7220 7468 616e s is better than │ │ │ -00002b00: 2073 696d 706c 7920 6465 6c65 7469 6e67 simply deleting │ │ │ -00002b10: 2061 6e64 2069 6e73 6572 7469 6e67 0a74 and inserting.t │ │ │ -00002b20: 6865 2077 686f 6c65 2074 6869 6e67 2062 he whole thing b │ │ │ -00002b30: 6563 6175 7365 2028 3129 2069 7420 7072 ecause (1) it pr │ │ │ -00002b40: 6573 6572 7665 7320 736f 6d65 206d 6172 eserves some mar │ │ │ -00002b50: 6b65 7220 706f 7369 7469 6f6e 730a 616e ker positions.an │ │ │ -00002b60: 6420 2832 2920 6974 2070 7574 7320 6c65 d (2) it puts le │ │ │ -00002b70: 7373 2064 6174 6120 696e 2074 6865 2075 ss data in the u │ │ │ -00002b80: 6e64 6f20 6c69 7374 2e0a 0a54 6865 2063 ndo list...The c │ │ │ -00002b90: 6f64 696e 6720 7379 7374 656d 2075 7365 oding system use │ │ │ -00002ba0: 6420 666f 7220 6465 636f 6469 6e67 2074 d for decoding t │ │ │ -00002bb0: 6865 2066 696c 6520 6973 2064 6574 6572 he file is deter │ │ │ -00002bc0: 6d69 6e65 6420 6173 2066 6f6c 6c6f 7773 mined as follows │ │ │ -00002bd0: 3a0a 0a31 2e20 6063 6f64 696e 672d 7379 :..1. `coding-sy │ │ │ -00002be0: 7374 656d 2d66 6f72 2d72 6561 6427 2c20 stem-for-read', │ │ │ -00002bf0: 6966 206e 6f6e 2d6e 696c 2e0a 322e 2054 if non-nil..2. T │ │ │ -00002c00: 6865 2072 6573 756c 7420 6f66 2060 696e he result of `in │ │ │ -00002c10: 7365 7274 2d66 696c 652d 636f 6e74 656e sert-file-conten │ │ │ -00002c20: 7473 2d70 7265 2d68 6f6f 6b27 2c20 6966 ts-pre-hook', if │ │ │ -00002c30: 206e 6f6e 2d6e 696c 2e0a 332e 2054 6865 non-nil..3. The │ │ │ -00002c40: 206d 6174 6368 696e 6720 7661 6c75 6520 matching value │ │ │ -00002c50: 666f 7220 7468 6973 2066 696c 656e 616d for this filenam │ │ │ -00002c60: 6520 6672 6f6d 0a20 2020 6066 696c 652d e from. `file- │ │ │ -00002c70: 636f 6469 6e67 2d73 7973 7465 6d2d 616c coding-system-al │ │ │ -00002c80: 6973 7427 2c20 6966 2061 6e79 2e0a 342e ist', if any..4. │ │ │ -00002c90: 2060 6275 6666 6572 2d66 696c 652d 636f `buffer-file-co │ │ │ -00002ca0: 6469 6e67 2d73 7973 7465 6d2d 666f 722d ding-system-for- │ │ │ -00002cb0: 7265 6164 272c 2069 6620 6e6f 6e2d 6e69 read', if non-ni │ │ │ -00002cc0: 6c2e 0a35 2e20 5468 6520 636f 6469 6e67 l..5. The coding │ │ │ -00002cd0: 2073 7973 7465 6d20 2772 6177 2d74 6578 system 'raw-tex │ │ │ -00002ce0: 742e 0a0a 4966 2061 206c 6f63 616c 2076 t...If a local v │ │ │ -00002cf0: 616c 7565 2066 6f72 2060 6275 6666 6572 alue for `buffer │ │ │ -00002d00: 2d66 696c 652d 636f 6469 6e67 2d73 7973 -file-coding-sys │ │ │ -00002d10: 7465 6d27 2069 6e20 7468 6520 6375 7272 tem' in the curr │ │ │ -00002d20: 656e 7420 6275 6666 6572 0a64 6f65 7320 ent buffer.does │ │ │ -00002d30: 6e6f 7420 6578 6973 742c 2069 7420 6973 not exist, it is │ │ │ -00002d40: 2073 6574 2074 6f20 7468 6520 636f 6469 set to the codi │ │ │ -00002d50: 6e67 2073 7973 7465 6d20 7768 6963 6820 ng system which │ │ │ -00002d60: 7761 7320 6163 7475 616c 6c79 2075 7365 was actually use │ │ │ -00002d70: 640a 666f 7220 7265 6164 696e 672e 0a0a d.for reading... │ │ │ -00002d80: 5365 6520 616c 736f 2060 696e 7365 7274 See also `insert │ │ │ -00002d90: 2d66 696c 652d 636f 6e74 656e 7473 2d61 -file-contents-a │ │ │ -00002da0: 6363 6573 732d 686f 6f6b 272c 0a60 696e ccess-hook',.`in │ │ │ -00002db0: 7365 7274 2d66 696c 652d 636f 6e74 656e sert-file-conten │ │ │ -00002dc0: 7473 2d70 7265 2d68 6f6f 6b27 2c20 6069 ts-pre-hook', `i │ │ │ -00002dd0: 6e73 6572 742d 6669 6c65 2d63 6f6e 7465 nsert-file-conte │ │ │ -00002de0: 6e74 732d 6572 726f 722d 686f 6f6b 272c nts-error-hook', │ │ │ -00002df0: 0a61 6e64 2060 696e 7365 7274 2d66 696c .and `insert-fil │ │ │ -00002e00: 652d 636f 6e74 656e 7473 2d70 6f73 742d e-contents-post- │ │ │ -00002e10: 686f 6f6b 272e 1f0a 2864 6566 616c 6961 hook'...(defalia │ │ │ -00002e20: 7320 2769 6e73 6572 742d 6669 6c65 2d63 s 'insert-file-c │ │ │ -00002e30: 6f6e 7465 6e74 7320 235b 2866 696c 656e ontents #[(filen │ │ │ -00002e40: 616d 6520 266f 7074 696f 6e61 6c20 7669 ame &optional vi │ │ │ -00002e50: 7369 7420 7374 6172 7420 656e 6420 7265 sit start end re │ │ │ -00002e60: 706c 6163 6529 2022 c609 2118 c708 c85c place) "..!....\ │ │ │ -00002e70: 2289 1e1d ab90 0e1d c809 0e1e 0e20 0e21 "............ .! │ │ │ -00002e80: 0e5c 2226 06aa f4c9 8989 1e1f 1d1c cacb .\"&............ │ │ │ -00002e90: cc8f 880e 1f15 cd0d ce5c 22cf 201b 1a0b .........\". ... │ │ │ -00002ea0: 600c 4140 5c5c c993 885c 6eab 9fd0 8e8a `.A@\\...\n..... │ │ │ -00002eb0: c91e 23d1 5c6e 21d2 59ab 895c 6e60 d30b ..#.\n!.Y..\n`.. │ │ │ -00002ec0: 215c 2288 aa88 5c6e d30b 2160 5a21 882b !\"...\n..!`Z!.+ │ │ │ -00002ed0: 0c41 d30b 2160 5aa0 882a d4d5 090e 1e0c .A..!`Z..*...... │ │ │ -00002ee0: 24ac 98d6 d770 5c22 ab8d d8d9 0e17 da0d $....p\"........ │ │ │ -00002ef0: 215c 22db 5c22 88aa 85d8 0ddb 5c22 88dc !\".\"......\".. │ │ │ -00002f00: 0d21 1624 0c2b 2a87 2220 5b65 7870 616e .!.$.+*." [expan │ │ │ -00002f10: 6465 6420 6669 6c65 6e61 6d65 2066 756e ded filename fun │ │ │ -00002f20: 6320 656e 646d 6172 6b20 7265 7475 726e c endmark return │ │ │ -00002f30: 2d76 616c 2063 6f64 696e 672d 7379 7374 -val coding-syst │ │ │ -00002f40: 656d 2073 7562 7374 6974 7574 652d 696e em substitute-in │ │ │ -00002f50: 2d66 696c 652d 6e61 6d65 2066 696e 642d -file-name find- │ │ │ -00002f60: 6669 6c65 2d6e 616d 652d 6861 6e64 6c65 file-name-handle │ │ │ -00002f70: 7220 696e 7365 7274 2d66 696c 652d 636f r insert-file-co │ │ │ -00002f80: 6e74 656e 7473 206e 696c 2065 7272 2028 ntents nil err ( │ │ │ -00002f90: 6279 7465 2d63 6f64 6520 22c6 c70c 0b23 byte-code "....# │ │ │ -00002fa0: 8809 ae90 c8c9 0c0b 23ae 89ca 0c21 ae84 ........#....!.. │ │ │ -00002fb0: 08ae 81cb 8915 3aab 840d 12aa 9ccc 0d21 ......:........! │ │ │ -00002fc0: ac89 cdc5 cecf 0d24 88d0 15d1 0c0b 0e13 .......$........ │ │ │ -00002fd0: 0e14 0e15 0dd2 2607 12c6 8722 205b 6275 ......&...." [bu │ │ │ -00002fe0: 6666 6572 2d66 696c 652d 636f 6469 6e67 ffer-file-coding │ │ │ -00002ff0: 2d73 7973 7465 6d2d 666f 722d 7265 6164 -system-for-read │ │ │ -00003000: 2063 6f64 696e 672d 7379 7374 656d 2d66 coding-system-f │ │ │ -00003010: 6f72 2d72 6561 6420 7265 7475 726e 2d76 or-read return-v │ │ │ -00003020: 616c 2076 6973 6974 2066 696c 656e 616d al visit filenam │ │ │ -00003030: 6520 636f 6469 6e67 2d73 7973 7465 6d20 e coding-system │ │ │ -00003040: 7275 6e2d 686f 6f6b 2d77 6974 682d 6172 run-hook-with-ar │ │ │ -00003050: 6773 2069 6e73 6572 742d 6669 6c65 2d63 gs insert-file-c │ │ │ -00003060: 6f6e 7465 6e74 732d 6163 6365 7373 2d68 ontents-access-h │ │ │ -00003070: 6f6f 6b20 7275 6e2d 686f 6f6b 2d77 6974 ook run-hook-wit │ │ │ -00003080: 682d 6172 6773 2d75 6e74 696c 2d73 7563 h-args-until-suc │ │ │ -00003090: 6365 7373 2069 6e73 6572 742d 6669 6c65 cess insert-file │ │ │ -000030a0: 2d63 6f6e 7465 6e74 732d 7072 652d 686f -contents-pre-ho │ │ │ -000030b0: 6f6b 2066 696e 642d 6669 6c65 2d63 6f64 ok find-file-cod │ │ │ -000030c0: 696e 672d 7379 7374 656d 2d66 6f72 2d72 ing-system-for-r │ │ │ -000030d0: 6561 642d 6672 6f6d 2d66 696c 656e 616d ead-from-filenam │ │ │ -000030e0: 6520 7261 772d 7465 7874 2066 696e 642d e raw-text find- │ │ │ -000030f0: 636f 6469 6e67 2d73 7973 7465 6d20 6c77 coding-system lw │ │ │ -00003100: 6172 6e20 6e6f 7469 6365 2022 496e 7661 arn notice "Inva │ │ │ -00003110: 6c69 6420 636f 6469 6e67 2d73 7973 7465 lid coding-syste │ │ │ -00003120: 6d20 2825 7329 2c20 7573 696e 6720 2775 m (%s), using 'u │ │ │ -00003130: 6e64 6563 6964 6564 2220 756e 6465 6369 ndecided" undeci │ │ │ -00003140: 6465 6420 696e 7365 7274 2d66 696c 652d ded insert-file- │ │ │ -00003150: 636f 6e74 656e 7473 2d69 6e74 6572 6e61 contents-interna │ │ │ -00003160: 6c20 7573 6564 2d63 6f64 6573 7973 2073 l used-codesys s │ │ │ -00003170: 7461 7274 2065 6e64 2072 6570 6c61 6365 tart end replace │ │ │ -00003180: 5d20 3929 2028 2866 696c 652d 6572 726f ] 9) ((file-erro │ │ │ -00003190: 7220 2862 7974 652d 636f 6465 2022 c3c4 r (byte-code ".. │ │ │ -000031a0: 0908 5c6e 2488 c55c 6e40 5c6e 415c 2287 ..\n$..\n@\nA\". │ │ │ -000031b0: 2220 5b76 6973 6974 2066 696c 656e 616d " [visit filenam │ │ │ -000031c0: 6520 6572 7220 7275 6e2d 686f 6f6b 2d77 e err run-hook-w │ │ │ -000031d0: 6974 682d 6172 6773 2069 6e73 6572 742d ith-args insert- │ │ │ -000031e0: 6669 6c65 2d63 6f6e 7465 6e74 732d 6572 file-contents-er │ │ │ -000031f0: 726f 722d 686f 6f6b 2073 6967 6e61 6c5d ror-hook signal] │ │ │ -00003200: 2035 2929 2920 636f 6469 6e67 2d73 7973 5))) coding-sys │ │ │ -00003210: 7465 6d2d 7072 6f70 6572 7479 2070 6f73 tem-property pos │ │ │ -00003220: 742d 7265 6164 2d63 6f6e 7665 7273 696f t-read-conversio │ │ │ -00003230: 6e20 6d61 6b65 2d6d 6172 6b65 7220 2828 n make-marker (( │ │ │ -00003240: 6279 7465 2d63 6f64 6520 2208 ab87 c120 byte-code ".... │ │ │ -00003250: 88c2 c321 88c3 8722 205b 7669 7369 7420 ...!..." [visit │ │ │ -00003260: 7365 742d 6275 6666 6572 2d61 7574 6f2d set-buffer-auto- │ │ │ -00003270: 7361 7665 6420 7365 742d 6275 6666 6572 saved set-buffer │ │ │ -00003280: 2d6d 6f64 6966 6965 642d 7020 6e69 6c5d -modified-p nil] │ │ │ -00003290: 2032 2929 2066 756e 6374 696f 6e2d 6d61 2)) function-ma │ │ │ -000032a0: 782d 6172 6773 2032 206d 6172 6b65 722d x-args 2 marker- │ │ │ -000032b0: 706f 7369 7469 6f6e 2072 756e 2d68 6f6f position run-hoo │ │ │ -000032c0: 6b2d 7769 7468 2d61 7267 732d 756e 7469 k-with-args-unti │ │ │ -000032d0: 6c2d 7375 6363 6573 7320 696e 7365 7274 l-success insert │ │ │ -000032e0: 2d66 696c 652d 636f 6e74 656e 7473 2d70 -file-contents-p │ │ │ -000032f0: 6f73 742d 686f 6f6b 206c 6f63 616c 2d76 ost-hook local-v │ │ │ -00003300: 6172 6961 626c 652d 7020 6275 6666 6572 ariable-p buffer │ │ │ -00003310: 2d66 696c 652d 636f 6469 6e67 2d73 7973 -file-coding-sys │ │ │ -00003320: 7465 6d20 7365 742d 6275 6666 6572 2d66 tem set-buffer-f │ │ │ -00003330: 696c 652d 636f 6469 6e67 2d73 7973 7465 ile-coding-syste │ │ │ -00003340: 6d20 7375 6273 6964 6961 7279 2d63 6f64 m subsidiary-cod │ │ │ -00003350: 696e 672d 7379 7374 656d 2063 6f64 696e ing-system codin │ │ │ -00003360: 672d 7379 7374 656d 2d65 6f6c 2d74 7970 g-system-eol-typ │ │ │ -00003370: 6520 7420 6765 742d 636f 6469 6e67 2d73 e t get-coding-s │ │ │ -00003380: 7973 7465 6d20 6861 6e64 6c65 7220 7669 ystem handler vi │ │ │ -00003390: 7369 7420 7573 6564 2d63 6f64 6573 7973 sit used-codesys │ │ │ -000033a0: 2073 7461 7274 2065 6e64 2072 6570 6c61 start end repla │ │ │ -000033b0: 6365 2062 7566 6665 722d 7265 6164 2d6f ce buffer-read-o │ │ │ -000033c0: 6e6c 7920 6275 6666 6572 2d66 696c 652d nly buffer-file- │ │ │ -000033d0: 636f 6469 6e67 2d73 7973 7465 6d2d 7768 coding-system-wh │ │ │ -000033e0: 656e 2d6c 6f61 6465 645d 2038 2028 2324 en-loaded] 8 (#$ │ │ │ -000033f0: 202e 2031 3033 3632 295d 290a 2340 3736 . 10362)]).#@76 │ │ │ -00003400: 3420 4120 7370 6563 6961 6c20 686f 6f6b 4 A special hook │ │ │ -00003410: 2074 6f20 6465 6369 6465 2074 6865 2063 to decide the c │ │ │ -00003420: 6f64 696e 6720 7379 7374 656d 2075 7365 oding system use │ │ │ -00003430: 6420 666f 7220 7772 6974 696e 6720 6f75 d for writing ou │ │ │ -00003440: 7420 6120 6669 6c65 2e0a 0a42 6566 6f72 t a file...Befor │ │ │ -00003450: 6520 7772 6974 696e 6720 6120 6669 6c65 e writing a file │ │ │ -00003460: 2c20 6077 7269 7465 2d72 6567 696f 6e27 , `write-region' │ │ │ -00003470: 2063 616c 6c73 2074 6865 2066 756e 6374 calls the funct │ │ │ -00003480: 696f 6e73 206f 6e20 7468 6973 2068 6f6f ions on this hoo │ │ │ -00003490: 6b20 7769 7468 0a61 7267 756d 656e 7473 k with.arguments │ │ │ -000034a0: 2053 5441 5254 2c20 454e 442c 2046 494c START, END, FIL │ │ │ -000034b0: 454e 414d 452c 2041 5050 454e 442c 2056 ENAME, APPEND, V │ │ │ -000034c0: 4953 4954 2c20 4c4f 434b 4e41 4d45 2061 ISIT, LOCKNAME a │ │ │ -000034d0: 6e64 2043 4f44 494e 472d 5359 5354 454d nd CODING-SYSTEM │ │ │ -000034e0: 2c0a 7468 6520 7361 6d65 2061 7320 7468 ,.the same as th │ │ │ -000034f0: 6520 636f 7272 6573 706f 6e64 696e 6720 e corresponding │ │ │ -00003500: 6172 6775 6d65 6e74 7320 696e 2074 6865 arguments in the │ │ │ -00003510: 2063 616c 6c20 746f 2060 7772 6974 652d call to `write- │ │ │ -00003520: 7265 6769 6f6e 272e 0a0a 5468 6520 7265 region'...The re │ │ │ -00003530: 7475 726e 2076 616c 7565 206f 6620 6561 turn value of ea │ │ │ -00003540: 6368 2066 756e 6374 696f 6e20 7368 6f75 ch function shou │ │ │ -00003550: 6c64 2062 6520 6f6e 6520 6f66 0a0a 2d2d ld be one of..-- │ │ │ -00003560: 206e 696c 0a2d 2d20 4120 636f 6469 6e67 nil.-- A coding │ │ │ -00003570: 2073 7973 7465 6d20 6f72 2061 2073 796d system or a sym │ │ │ -00003580: 626f 6c20 6465 6e6f 7469 6e67 2069 742c bol denoting it, │ │ │ -00003590: 2069 6e64 6963 6174 696e 6720 7468 6520 indicating the │ │ │ -000035a0: 636f 6469 6e67 2073 7973 7465 6d0a 2020 coding system. │ │ │ -000035b0: 2074 6f20 6265 2075 7365 6420 666f 7220 to be used for │ │ │ -000035c0: 7772 6974 696e 6720 7468 6520 6669 6c65 writing the file │ │ │ -000035d0: 0a2d 2d20 4120 6c69 7374 206f 6620 7477 .-- A list of tw │ │ │ -000035e0: 6f20 656c 656d 656e 7473 2028 6162 736f o elements (abso │ │ │ -000035f0: 6c75 7465 2070 6174 686e 616d 6520 616e lute pathname an │ │ │ -00003600: 6420 6c65 6e67 7468 206f 6620 6461 7461 d length of data │ │ │ -00003610: 2077 7269 7474 656e 292c 0a20 2020 7768 written),. wh │ │ │ -00003620: 6963 6820 6973 2075 7365 6420 6173 2074 ich is used as t │ │ │ -00003630: 6865 2072 6574 7572 6e20 7661 6c75 6520 he return value │ │ │ -00003640: 746f 2060 7772 6974 652d 7265 6769 6f6e to `write-region │ │ │ -00003650: 272e 2020 496e 2074 6869 7320 6361 7365 '. In this case │ │ │ -00003660: 2c0a 2020 2060 7772 6974 652d 7265 6769 ,. `write-regi │ │ │ -00003670: 6f6e 2720 6173 7375 6d65 7320 7468 6174 on' assumes that │ │ │ -00003680: 2074 6865 2066 756e 6374 696f 6e20 6861 the function ha │ │ │ -00003690: 7320 7772 6974 7465 6e20 7468 6520 6669 s written the fi │ │ │ -000036a0: 6c65 2061 6e64 0a20 2020 7265 7475 726e le and. return │ │ │ -000036b0: 732e 0a0a 4966 2061 6e79 2066 756e 6374 s...If any funct │ │ │ -000036c0: 696f 6e20 7265 7475 726e 7320 6e6f 6e2d ion returns non- │ │ │ -000036d0: 6e69 6c2c 2074 6865 2072 656d 6169 6e69 nil, the remaini │ │ │ -000036e0: 6e67 2066 756e 6374 696f 6e73 2061 7265 ng functions are │ │ │ -000036f0: 206e 6f74 2063 616c 6c65 642e 1f0a 2864 not called...(d │ │ │ -00003700: 6566 7661 7220 7772 6974 652d 7265 6769 efvar write-regi │ │ │ -00003710: 6f6e 2d70 7265 2d68 6f6f 6b20 6e69 6c20 on-pre-hook nil │ │ │ -00003720: 2823 2420 2e20 3133 3331 3429 290a 2340 (#$ . 13314)).#@ │ │ │ -00003730: 3235 3920 4120 686f 6f6b 2063 616c 6c65 259 A hook calle │ │ │ -00003740: 6420 6279 2060 7772 6974 652d 7265 6769 d by `write-regi │ │ │ -00003750: 6f6e 2720 6166 7465 7220 6120 6669 6c65 on' after a file │ │ │ -00003760: 2068 6173 2062 6565 6e20 7772 6974 7465 has been writte │ │ │ -00003770: 6e20 6f75 742e 0a0a 5468 6520 6675 6e63 n out...The func │ │ │ -00003780: 7469 6f6e 7320 6f6e 2074 6869 7320 686f tions on this ho │ │ │ -00003790: 6f6b 2061 7265 2063 616c 6c65 6420 7769 ok are called wi │ │ │ -000037a0: 7468 2061 7267 756d 656e 7473 2053 5441 th arguments STA │ │ │ -000037b0: 5254 2c20 454e 442c 0a46 494c 454e 414d RT, END,.FILENAM │ │ │ -000037c0: 452c 2041 5050 454e 442c 2056 4953 4954 E, APPEND, VISIT │ │ │ -000037d0: 2c20 4c4f 434b 4e41 4d45 2c20 616e 6420 , LOCKNAME, and │ │ │ -000037e0: 434f 4449 4e47 2d53 5953 5445 4d2c 2074 CODING-SYSTEM, t │ │ │ -000037f0: 6865 2073 616d 6520 6173 2074 6865 0a63 he same as the.c │ │ │ -00003800: 6f72 7265 7370 6f6e 6469 6e67 2061 7267 orresponding arg │ │ │ -00003810: 756d 656e 7473 2069 6e20 7468 6520 6361 uments in the ca │ │ │ -00003820: 6c6c 2074 6f20 6077 7269 7465 2d72 6567 ll to `write-reg │ │ │ -00003830: 696f 6e27 2e1f 0a28 6465 6676 6172 2077 ion'...(defvar w │ │ │ -00003840: 7269 7465 2d72 6567 696f 6e2d 706f 7374 rite-region-post │ │ │ -00003850: 2d68 6f6f 6b20 6e69 6c20 2823 2420 2e20 -hook nil (#$ . │ │ │ -00003860: 3134 3133 3229 290a 2340 3133 3931 2057 14132)).#@1391 W │ │ │ -00003870: 7269 7465 2063 7572 7265 6e74 2072 6567 rite current reg │ │ │ -00003880: 696f 6e20 696e 746f 2073 7065 6369 6669 ion into specifi │ │ │ -00003890: 6564 2066 696c 652e 0a42 7920 6465 6661 ed file..By defa │ │ │ -000038a0: 756c 7420 7468 6520 6669 6c65 2773 2065 ult the file's e │ │ │ -000038b0: 7869 7374 696e 6720 636f 6e74 656e 7473 xisting contents │ │ │ -000038c0: 2061 7265 2072 6570 6c61 6365 6420 6279 are replaced by │ │ │ -000038d0: 2074 6865 2073 7065 6369 6669 6564 2072 the specified r │ │ │ -000038e0: 6567 696f 6e2e 0a43 616c 6c65 6420 696e egion..Called in │ │ │ -000038f0: 7465 7261 6374 6976 656c 792c 2070 726f teractively, pro │ │ │ -00003900: 6d70 7473 2066 6f72 2061 2066 696c 6520 mpts for a file │ │ │ -00003910: 6e61 6d65 2e20 2057 6974 6820 6120 7072 name. With a pr │ │ │ -00003920: 6566 6978 2061 7267 2c20 7072 6f6d 7074 efix arg, prompt │ │ │ -00003930: 730a 666f 7220 6120 636f 6469 6e67 2073 s.for a coding s │ │ │ -00003940: 7973 7465 6d20 6173 2077 656c 6c2e 0a0a ystem as well... │ │ │ -00003950: 5768 656e 2063 616c 6c65 6420 6672 6f6d When called from │ │ │ -00003960: 2061 2070 726f 6772 616d 2c20 7461 6b65 a program, take │ │ │ -00003970: 7320 7468 7265 6520 7265 7175 6972 6564 s three required │ │ │ -00003980: 2061 7267 756d 656e 7473 3a0a 5354 4152 arguments:.STAR │ │ │ -00003990: 542c 2045 4e44 2061 6e64 2046 494c 454e T, END and FILEN │ │ │ -000039a0: 414d 452e 2020 5354 4152 5420 616e 6420 AME. START and │ │ │ -000039b0: 454e 4420 6172 6520 6275 6666 6572 2070 END are buffer p │ │ │ -000039c0: 6f73 6974 696f 6e73 2e0a 4f70 7469 6f6e ositions..Option │ │ │ -000039d0: 616c 2066 6f75 7274 6820 6172 6775 6d65 al fourth argume │ │ │ -000039e0: 6e74 2041 5050 454e 4420 6966 206e 6f6e nt APPEND if non │ │ │ -000039f0: 2d6e 696c 206d 6561 6e73 0a20 2061 7070 -nil means. app │ │ │ -00003a00: 656e 6420 746f 2065 7869 7374 696e 6720 end to existing │ │ │ -00003a10: 6669 6c65 2063 6f6e 7465 6e74 7320 2869 file contents (i │ │ │ -00003a20: 6620 616e 7929 2e0a 4f70 7469 6f6e 616c f any)..Optional │ │ │ -00003a30: 2066 6966 7468 2061 7267 756d 656e 7420 fifth argument │ │ │ -00003a40: 5649 5349 5420 6966 2074 206d 6561 6e73 VISIT if t means │ │ │ -00003a50: 0a20 2073 6574 206c 6173 742d 7361 7665 . set last-save │ │ │ -00003a60: 2d66 696c 652d 6d6f 6474 696d 6520 6f66 -file-modtime of │ │ │ -00003a70: 2062 7566 6665 7220 746f 2074 6869 7320 buffer to this │ │ │ -00003a80: 6669 6c65 2773 206d 6f64 7469 6d65 0a20 file's modtime. │ │ │ -00003a90: 2061 6e64 206d 6172 6b20 6275 6666 6572 and mark buffer │ │ │ -00003aa0: 206e 6f74 206d 6f64 6966 6965 642e 0a49 not modified..I │ │ │ -00003ab0: 6620 5649 5349 5420 6973 2061 2073 7472 f VISIT is a str │ │ │ -00003ac0: 696e 672c 2069 7420 6973 2061 2073 6563 ing, it is a sec │ │ │ -00003ad0: 6f6e 6420 6669 6c65 206e 616d 653b 0a20 ond file name;. │ │ │ -00003ae0: 2074 6865 206f 7574 7075 7420 676f 6573 the output goes │ │ │ -00003af0: 2074 6f20 4649 4c45 4e41 4d45 2c20 6275 to FILENAME, bu │ │ │ -00003b00: 7420 7468 6520 6275 6666 6572 2069 7320 t the buffer is │ │ │ -00003b10: 6d61 726b 6564 2061 7320 7669 7369 7469 marked as visiti │ │ │ -00003b20: 6e67 2056 4953 4954 2e0a 2020 5649 5349 ng VISIT.. VISI │ │ │ -00003b30: 5420 6973 2061 6c73 6f20 7468 6520 6669 T is also the fi │ │ │ -00003b40: 6c65 206e 616d 6520 746f 206c 6f63 6b20 le name to lock │ │ │ -00003b50: 616e 6420 756e 6c6f 636b 2066 6f72 2063 and unlock for c │ │ │ -00003b60: 6c61 7368 2064 6574 6563 7469 6f6e 2e0a lash detection.. │ │ │ -00003b70: 4966 2056 4953 4954 2069 7320 6e65 6974 If VISIT is neit │ │ │ -00003b80: 6865 7220 7420 6e6f 7220 6e69 6c20 6e6f her t nor nil no │ │ │ -00003b90: 7220 6120 7374 7269 6e67 2c0a 2020 7468 r a string,. th │ │ │ -00003ba0: 6174 206d 6561 6e73 2064 6f20 6e6f 7420 at means do not │ │ │ -00003bb0: 7072 696e 7420 7468 6520 2257 726f 7465 print the "Wrote │ │ │ -00003bc0: 2066 696c 6522 206d 6573 7361 6765 2e0a file" message.. │ │ │ -00003bd0: 5468 6520 6f70 7469 6f6e 616c 2073 6978 The optional six │ │ │ -00003be0: 7468 2061 7267 204c 4f43 4b4e 414d 452c th arg LOCKNAME, │ │ │ -00003bf0: 2069 6620 6e6f 6e2d 6e69 6c2c 2073 7065 if non-nil, spe │ │ │ -00003c00: 6369 6669 6573 2074 6865 206e 616d 6520 cifies the name │ │ │ -00003c10: 746f 0a20 2075 7365 2066 6f72 206c 6f63 to. use for loc │ │ │ -00003c20: 6b69 6e67 2061 6e64 2075 6e6c 6f63 6b69 king and unlocki │ │ │ -00003c30: 6e67 2c20 6f76 6572 7269 6469 6e67 2046 ng, overriding F │ │ │ -00003c40: 494c 454e 414d 4520 616e 6420 5649 5349 ILENAME and VISI │ │ │ -00003c50: 542e 0a4b 6c75 6467 7920 6665 6174 7572 T..Kludgy featur │ │ │ -00003c60: 653a 2069 6620 5354 4152 5420 6973 2061 e: if START is a │ │ │ -00003c70: 2073 7472 696e 672c 2074 6865 6e20 7468 string, then th │ │ │ -00003c80: 6174 2073 7472 696e 6720 6973 2077 7269 at string is wri │ │ │ -00003c90: 7474 656e 0a74 6f20 7468 6520 6669 6c65 tten.to the file │ │ │ -00003ca0: 2c20 696e 7374 6561 6420 6f66 2061 6e79 , instead of any │ │ │ -00003cb0: 2062 7566 6665 7220 636f 6e74 656e 7473 buffer contents │ │ │ -00003cc0: 2c20 616e 6420 454e 4420 6973 2069 676e , and END is ign │ │ │ -00003cd0: 6f72 6564 2e0a 4f70 7469 6f6e 616c 2073 ored..Optional s │ │ │ -00003ce0: 6576 656e 7468 2061 7267 756d 656e 7420 eventh argument │ │ │ -00003cf0: 434f 4449 4e47 2d53 5953 5445 4d20 7370 CODING-SYSTEM sp │ │ │ -00003d00: 6563 6966 6965 7320 7468 6520 636f 6469 ecifies the codi │ │ │ -00003d10: 6e67 2073 7973 7465 6d0a 2020 7573 6564 ng system. used │ │ │ -00003d20: 2074 6f20 656e 636f 6465 2074 6865 2074 to encode the t │ │ │ -00003d30: 6578 7420 7768 656e 2069 7420 6973 2077 ext when it is w │ │ │ -00003d40: 7269 7474 656e 206f 7574 2c20 616e 6420 ritten out, and │ │ │ -00003d50: 6465 6661 756c 7473 2074 6f0a 2020 7468 defaults to. th │ │ │ -00003d60: 6520 7661 6c75 6520 6f66 2060 6275 6666 e value of `buff │ │ │ -00003d70: 6572 2d66 696c 652d 636f 6469 6e67 2d73 er-file-coding-s │ │ │ -00003d80: 7973 7465 6d27 2069 6e20 7468 6520 6375 ystem' in the cu │ │ │ -00003d90: 7272 656e 7420 6275 6666 6572 2e0a 5365 rrent buffer..Se │ │ │ -00003da0: 6520 616c 736f 2060 7772 6974 652d 7265 e also `write-re │ │ │ -00003db0: 6769 6f6e 2d70 7265 2d68 6f6f 6b27 2061 gion-pre-hook' a │ │ │ -00003dc0: 6e64 2060 7772 6974 652d 7265 6769 6f6e nd `write-region │ │ │ -00003dd0: 2d70 6f73 742d 686f 6f6b 272e 1f0a 2864 -post-hook'...(d │ │ │ -00003de0: 6566 616c 6961 7320 2777 7269 7465 2d72 efalias 'write-r │ │ │ -00003df0: 6567 696f 6e20 235b 2873 7461 7274 2065 egion #[(start e │ │ │ -00003e00: 6e64 2066 696c 656e 616d 6520 266f 7074 nd filename &opt │ │ │ -00003e10: 696f 6e61 6c20 6170 7065 6e64 2076 6973 ional append vis │ │ │ -00003e20: 6974 206c 6f63 6b6e 616d 6520 636f 6469 it lockname codi │ │ │ -00003e30: 6e67 2d73 7973 7465 6d29 2022 0e19 ae98 ng-system) ".... │ │ │ -00003e40: c6c7 5c6e 090c 080b 0e15 0d26 08ae 8a0d ..\n.......&.... │ │ │ -00003e50: ae87 0e1a ae83 c80c 2189 153a ab82 0d87 ........!..:.... │ │ │ -00003e60: c90d ca5c 2289 1e16 abb8 70cb cc21 cd20 ...\".....p..!. │ │ │ -00003e70: 1e1b 1e17 1e18 ce8e 8a0e 1771 88cf 2088 ...........q.. . │ │ │ -00003e80: d00e 185c 6e09 2388 0e16 6564 5c22 88d1 ...\n.#...ed\".. │ │ │ -00003e90: 6564 0c08 0bd2 613f ad81 0b0e 150d 2607 ed....a?......&. │ │ │ -00003ea0: 882d aa8c d15c 6e09 0c08 0b0e 150d 2607 .-...\n.......&. │ │ │ -00003eb0: 8829 d3d4 5c6e 090c 080b 0e15 0d26 0887 .)..\n.......&.. │ │ │ -00003ec0: 2220 5b61 7070 656e 6420 656e 6420 7374 " [append end st │ │ │ -00003ed0: 6172 7420 7669 7369 7420 6669 6c65 6e61 art visit filena │ │ │ -00003ee0: 6d65 2063 6f64 696e 672d 7379 7374 656d me coding-system │ │ │ -00003ef0: 2072 756e 2d68 6f6f 6b2d 7769 7468 2d61 run-hook-with-a │ │ │ -00003f00: 7267 732d 756e 7469 6c2d 7375 6363 6573 rgs-until-succes │ │ │ -00003f10: 7320 7772 6974 652d 7265 6769 6f6e 2d70 s write-region-p │ │ │ -00003f20: 7265 2d68 6f6f 6b20 6669 6e64 2d66 696c re-hook find-fil │ │ │ -00003f30: 652d 636f 6469 6e67 2d73 7973 7465 6d2d e-coding-system- │ │ │ -00003f40: 666f 722d 7772 6974 652d 6672 6f6d 2d66 for-write-from-f │ │ │ -00003f50: 696c 656e 616d 6520 636f 6469 6e67 2d73 ilename coding-s │ │ │ -00003f60: 7973 7465 6d2d 7072 6f70 6572 7479 2070 ystem-property p │ │ │ -00003f70: 7265 2d77 7269 7465 2d63 6f6e 7665 7273 re-write-convers │ │ │ -00003f80: 696f 6e20 6765 6e65 7261 7465 2d6e 6577 ion generate-new │ │ │ -00003f90: 2d62 7566 6665 7220 2220 2a74 656d 702d -buffer " *temp- │ │ │ -00003fa0: 7772 6974 652d 6275 6666 6572 2a22 2062 write-buffer*" b │ │ │ -00003fb0: 7566 6665 722d 6d6f 6469 6669 6564 2d70 uffer-modified-p │ │ │ -00003fc0: 2028 2862 7974 652d 636f 6465 2022 c35c ((byte-code ".\ │ │ │ -00003fd0: 6e21 8809 ac83 08ac 8ec4 2088 c5c6 2188 n!........ ...!. │ │ │ -00003fe0: c720 ab83 c820 88c6 8722 205b 6d6f 6469 . ... ..." [modi │ │ │ -00003ff0: 6620 7669 7369 7420 7465 6d70 6275 6620 f visit tempbuf │ │ │ -00004000: 6b69 6c6c 2d62 7566 6665 7220 7365 742d kill-buffer set- │ │ │ -00004010: 6275 6666 6572 2d61 7574 6f2d 7361 7665 buffer-auto-save │ │ │ -00004020: 6420 7365 742d 6275 6666 6572 2d6d 6f64 d set-buffer-mod │ │ │ -00004030: 6966 6965 642d 7020 6e69 6c20 6275 6666 ified-p nil buff │ │ │ -00004040: 6572 2d66 696c 652d 6e61 6d65 2073 6574 er-file-name set │ │ │ -00004050: 2d76 6973 6974 6564 2d66 696c 652d 6d6f -visited-file-mo │ │ │ -00004060: 6474 696d 655d 2032 2929 2065 7261 7365 dtime] 2)) erase │ │ │ -00004070: 2d62 7566 6665 7220 696e 7365 7274 2d62 -buffer insert-b │ │ │ -00004080: 7566 6665 722d 7375 6273 7472 696e 6720 uffer-substring │ │ │ -00004090: 7772 6974 652d 7265 6769 6f6e 2d69 6e74 write-region-int │ │ │ -000040a0: 6572 6e61 6c20 7420 7275 6e2d 686f 6f6b ernal t run-hook │ │ │ -000040b0: 2d77 6974 682d 6172 6773 2077 7269 7465 -with-args write │ │ │ -000040c0: 2d72 6567 696f 6e2d 706f 7374 2d68 6f6f -region-post-hoo │ │ │ -000040d0: 6b20 6c6f 636b 6e61 6d65 2066 756e 6320 k lockname func │ │ │ -000040e0: 7465 6d70 6275 6620 6375 7262 7566 2063 tempbuf curbuf c │ │ │ -000040f0: 6f64 696e 672d 7379 7374 656d 2d66 6f72 oding-system-for │ │ │ -00004100: 2d77 7269 7465 2062 7566 6665 722d 6669 -write buffer-fi │ │ │ -00004110: 6c65 2d63 6f64 696e 672d 7379 7374 656d le-coding-system │ │ │ -00004120: 206d 6f64 6966 5d20 3130 2028 2324 202e modif] 10 (#$ . │ │ │ -00004130: 2031 3434 3437 2920 2272 5c6e 4657 7269 14447) "r\nFWri │ │ │ -00004140: 7465 2072 6567 696f 6e20 746f 2066 696c te region to fil │ │ │ -00004150: 653a 205c 6e69 5c6e 695c 6e69 5c6e 5a43 e: \ni\ni\ni\nZC │ │ │ -00004160: 6f64 696e 672d 7379 7374 656d 3a20 225d oding-system: "] │ │ │ -00004170: 290a ). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3334 2032 3032 310a 3b3b 3b20 :08:34 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6f64 652d 6669 6c65 4/lisp/code-file │ │ │ +00000090: 732e 656c 0a3b 3b3b 2065 6d61 6373 2076 s.el.;;; emacs v │ │ │ +000000a0: 6572 7369 6f6e 2032 312e 3420 2870 6174 ersion 21.4 (pat │ │ │ +000000b0: 6368 2032 3429 2022 5374 616e 6461 7264 ch 24) "Standard │ │ │ +000000c0: 2043 2220 5845 6d61 6373 204c 7563 6964 C" XEmacs Lucid │ │ │ +000000d0: 2e0a 3b3b 3b20 6279 7465 636f 6d70 2076 ..;;; bytecomp v │ │ │ +000000e0: 6572 7369 6f6e 2032 2e32 3720 5845 6d61 ersion 2.27 XEma │ │ │ +000000f0: 6373 3b20 3230 3030 2d30 392d 3132 2e0a cs; 2000-09-12.. │ │ │ +00000100: 3b3b 3b20 6f70 7469 6d69 7a61 7469 6f6e ;;; optimization │ │ │ +00000110: 2069 7320 6f6e 2e0a 3b3b 3b20 7468 6973 is on..;;; this │ │ │ +00000120: 2066 696c 6520 7573 6573 206f 7063 6f64 file uses opcod │ │ │ +00000130: 6573 2077 6869 6368 2064 6f20 6e6f 7420 es which do not │ │ │ +00000140: 6578 6973 7420 696e 2045 6d61 6373 2031 exist in Emacs 1 │ │ │ +00000150: 392e 0a0a 2869 6620 2861 6e64 2028 626f 9...(if (and (bo │ │ │ +00000160: 756e 6470 2027 656d 6163 732d 7665 7273 undp 'emacs-vers │ │ │ +00000170: 696f 6e29 0a09 2028 6f72 2028 616e 6420 ion).. (or (and │ │ │ +00000180: 2862 6f75 6e64 7020 2765 706f 6368 3a3a (boundp 'epoch:: │ │ │ +00000190: 7665 7273 696f 6e29 2065 706f 6368 3a3a version) epoch:: │ │ │ +000001a0: 7665 7273 696f 6e29 0a09 2020 2020 2028 version).. ( │ │ │ +000001b0: 7374 7269 6e67 2d6c 6573 7370 2065 6d61 string-lessp ema │ │ │ +000001c0: 6373 2d76 6572 7369 6f6e 2022 3230 2229 cs-version "20") │ │ │ +000001d0: 2929 0a20 2020 2028 6572 726f 7220 2260 )). (error "` │ │ │ +000001e0: 636f 6465 2d66 696c 6573 2e65 6c27 2077 code-files.el' w │ │ │ +000001f0: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ +00000200: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ +00000210: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ +00000220: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ +00000230: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ +00000240: 6c69 7374 206e 696c 2929 0a0a 0a28 6279 list nil))...(by │ │ │ +00000250: 7465 2d63 6f64 6520 22c4 c5c6 5c22 88c7 te-code "...\".. │ │ │ +00000260: c5c8 c923 88ca c51a 1bcb 0b21 ad84 cb5c ...#.......!...\ │ │ │ +00000270: 6e21 3fcb 0b21 ad82 0b4a 1918 cc0b 5c6e n!?..!...J....\n │ │ │ +00000280: 5c22 88cd 0b5c 6e5c 2288 08ab 845c 6e09 \"...\n\"....\n. │ │ │ +00000290: 4c88 2cce cf1a 1bcb 0b21 ad84 cb5c 6e21 L.,......!...\n! │ │ │ +000002a0: 3fcb 0b21 ad82 0b4a 1918 cc0b 5c6e 5c22 ?..!...J....\n\" │ │ │ +000002b0: 88cd 0b5c 6e5c 2288 08ab 845c 6e09 4c88 ...\n\"....\n.L. │ │ │ +000002c0: 2cc4 8722 205b 6e65 6564 732d 7365 7474 ,.." [needs-sett │ │ │ +000002d0: 696e 6720 7661 6c75 6520 6e65 7776 6172 ing value newvar │ │ │ +000002e0: 206f 6c64 7661 7220 7365 742d 6465 6661 oldvar set-defa │ │ │ +000002f0: 756c 7420 6275 6666 6572 2d66 696c 652d ult buffer-file- │ │ │ +00000300: 636f 6469 6e67 2d73 7973 7465 6d20 7261 coding-system ra │ │ │ +00000310: 772d 7465 7874 2070 7574 2070 6572 6d61 w-text put perma │ │ │ +00000320: 6e65 6e74 2d6c 6f63 616c 2074 2066 696c nent-local t fil │ │ │ +00000330: 652d 636f 6469 6e67 2d73 7973 7465 6d20 e-coding-system │ │ │ +00000340: 626f 756e 6470 2064 6566 7661 7261 6c69 boundp defvarali │ │ │ +00000350: 6173 206d 616b 652d 6f62 736f 6c65 7465 as make-obsolete │ │ │ +00000360: 2d76 6172 6961 626c 6520 6f76 6572 7269 -variable overri │ │ │ +00000370: 6469 6e67 2d66 696c 652d 636f 6469 6e67 ding-file-coding │ │ │ +00000380: 2d73 7973 7465 6d20 636f 6469 6e67 2d73 -system coding-s │ │ │ +00000390: 7973 7465 6d2d 666f 722d 7265 6164 5d20 ystem-for-read] │ │ │ +000003a0: 3429 0a23 4034 3035 2043 6f64 696e 6720 4).#@405 Coding │ │ │ +000003b0: 7379 7374 656d 2075 7365 6420 7768 656e system used when │ │ │ +000003c0: 2072 6561 6469 6e67 2061 2066 696c 652e reading a file. │ │ │ +000003d0: 0a54 6869 7320 7072 6f76 6964 6573 2063 .This provides c │ │ │ +000003e0: 6f61 7273 652d 6772 6169 6e65 6420 636f oarse-grained co │ │ │ +000003f0: 6e74 726f 6c3b 2066 6f72 2066 696e 6572 ntrol; for finer │ │ │ +00000400: 2d67 7261 696e 6564 2063 6f6e 7472 6f6c -grained control │ │ │ +00000410: 2c20 7573 650a 6066 696c 652d 636f 6469 , use.`file-codi │ │ │ +00000420: 6e67 2d73 7973 7465 6d2d 616c 6973 7427 ng-system-alist' │ │ │ +00000430: 2e20 2046 726f 6d20 6120 4c69 7370 2070 . From a Lisp p │ │ │ +00000440: 726f 6772 616d 2c20 6966 2079 6f75 2077 rogram, if you w │ │ │ +00000450: 6973 6820 746f 0a75 6e69 6c61 7465 7261 ish to.unilatera │ │ │ +00000460: 6c6c 7920 7370 6563 6966 7920 7468 6520 lly specify the │ │ │ +00000470: 636f 6469 6e67 2073 7973 7465 6d20 7573 coding system us │ │ │ +00000480: 6564 2066 6f72 206f 6e65 2070 6172 7469 ed for one parti │ │ │ +00000490: 6375 6c61 720a 6f70 6572 6174 696f 6e2c cular.operation, │ │ │ +000004a0: 2079 6f75 2073 686f 756c 6420 6269 6e64 you should bind │ │ │ +000004b0: 2074 6865 2076 6172 6961 626c 6520 6063 the variable `c │ │ │ +000004c0: 6f64 696e 672d 7379 7374 656d 2d66 6f72 oding-system-for │ │ │ +000004d0: 2d72 6561 6427 0a72 6174 6865 7220 7468 -read'.rather th │ │ │ +000004e0: 616e 2073 6574 7469 6e67 2074 6869 7320 an setting this │ │ │ +000004f0: 7661 7269 6162 6c65 2c20 7768 6963 6820 variable, which │ │ │ +00000500: 6973 2069 6e74 656e 6465 6420 746f 2062 is intended to b │ │ │ +00000510: 6520 7573 6564 2066 6f72 0a67 6c6f 6261 e used for.globa │ │ │ +00000520: 6c20 656e 7669 726f 6e6d 656e 7420 7370 l environment sp │ │ │ +00000530: 6563 6966 6963 6174 696f 6e2e 1f0a 2864 ecification...(d │ │ │ +00000540: 6566 7661 7220 6275 6666 6572 2d66 696c efvar buffer-fil │ │ │ +00000550: 652d 636f 6469 6e67 2d73 7973 7465 6d2d e-coding-system- │ │ │ +00000560: 666f 722d 7265 6164 2027 756e 6465 6369 for-read 'undeci │ │ │ +00000570: 6465 6420 2823 2420 2e20 3933 3729 290a ded (#$ . 937)). │ │ │ +00000580: 2862 7974 652d 636f 6465 2022 c4c5 1a1b (byte-code ".... │ │ │ +00000590: c60b 21ad 84c6 5c6e 213f c60b 21ad 820b ..!...\n!?..!... │ │ │ +000005a0: 4a19 18c7 0b5c 6e5c 2288 c80b 5c6e 5c22 J....\n\"...\n\" │ │ │ +000005b0: 8808 ab84 5c6e 094c 882c c487 2220 5b6e ....\n.L.,.." [n │ │ │ +000005c0: 6565 6473 2d73 6574 7469 6e67 2076 616c eeds-setting val │ │ │ +000005d0: 7565 206e 6577 7661 7220 6f6c 6476 6172 ue newvar oldvar │ │ │ +000005e0: 2066 696c 652d 636f 6469 6e67 2d73 7973 file-coding-sys │ │ │ +000005f0: 7465 6d2d 666f 722d 7265 6164 2062 7566 tem-for-read buf │ │ │ +00000600: 6665 722d 6669 6c65 2d63 6f64 696e 672d fer-file-coding- │ │ │ +00000610: 7379 7374 656d 2d66 6f72 2d72 6561 6420 system-for-read │ │ │ +00000620: 626f 756e 6470 2064 6566 7661 7261 6c69 boundp defvarali │ │ │ +00000630: 6173 206d 616b 652d 6f62 736f 6c65 7465 as make-obsolete │ │ │ +00000640: 2d76 6172 6961 626c 655d 2033 290a 2340 -variable] 3).#@ │ │ │ +00000650: 3639 3120 416c 6973 7420 746f 2064 6563 691 Alist to dec │ │ │ +00000660: 6964 6520 6120 636f 6469 6e67 2073 7973 ide a coding sys │ │ │ +00000670: 7465 6d20 746f 2075 7365 2066 6f72 2061 tem to use for a │ │ │ +00000680: 2066 696c 6520 492f 4f20 6f70 6572 6174 file I/O operat │ │ │ +00000690: 696f 6e2e 0a54 6865 2066 6f72 6d61 7420 ion..The format │ │ │ +000006a0: 6973 2028 2850 4154 5445 524e 202e 2056 is ((PATTERN . V │ │ │ +000006b0: 414c 2920 2e2e 2e29 2c0a 7768 6572 6520 AL) ...),.where │ │ │ +000006c0: 5041 5454 4552 4e20 6973 2061 2072 6567 PATTERN is a reg │ │ │ +000006d0: 756c 6172 2065 7870 7265 7373 696f 6e20 ular expression │ │ │ +000006e0: 6d61 7463 6869 6e67 2061 2066 696c 6520 matching a file │ │ │ +000006f0: 6e61 6d65 2c0a 5641 4c20 6973 2061 2063 name,.VAL is a c │ │ │ +00000700: 6f64 696e 6720 7379 7374 656d 2c20 6120 oding system, a │ │ │ +00000710: 636f 6e73 206f 6620 636f 6469 6e67 2073 cons of coding s │ │ │ +00000720: 7973 7465 6d73 2c20 6f72 2061 2066 756e ystems, or a fun │ │ │ +00000730: 6374 696f 6e20 7379 6d62 6f6c 2e0a 4966 ction symbol..If │ │ │ +00000740: 2056 414c 2069 7320 6120 636f 6469 6e67 VAL is a coding │ │ │ +00000750: 2073 7973 7465 6d2c 2069 7420 6973 2075 system, it is u │ │ │ +00000760: 7365 6420 666f 7220 626f 7468 2064 6563 sed for both dec │ │ │ +00000770: 6f64 696e 6720 616e 6420 656e 636f 6469 oding and encodi │ │ │ +00000780: 6e67 0a74 6865 2066 696c 6520 636f 6e74 ng.the file cont │ │ │ +00000790: 656e 7473 2e0a 4966 2056 414c 2069 7320 ents..If VAL is │ │ │ +000007a0: 6120 636f 6e73 206f 6620 636f 6469 6e67 a cons of coding │ │ │ +000007b0: 2073 7973 7465 6d73 2c20 7468 6520 6361 systems, the ca │ │ │ +000007c0: 7220 7061 7274 2069 7320 7573 6564 2066 r part is used f │ │ │ +000007d0: 6f72 2064 6563 6f64 696e 672c 0a61 6e64 or decoding,.and │ │ │ +000007e0: 2074 6865 2063 6472 2070 6172 7420 6973 the cdr part is │ │ │ +000007f0: 2075 7365 6420 666f 7220 656e 636f 6469 used for encodi │ │ │ +00000800: 6e67 2e0a 4966 2056 414c 2069 7320 6120 ng..If VAL is a │ │ │ +00000810: 6675 6e63 7469 6f6e 2073 796d 626f 6c2c function symbol, │ │ │ +00000820: 2074 6865 2066 756e 6374 696f 6e20 6d75 the function mu │ │ │ +00000830: 7374 2072 6574 7572 6e20 6120 636f 6469 st return a codi │ │ │ +00000840: 6e67 2073 7973 7465 6d0a 6f72 2061 2063 ng system.or a c │ │ │ +00000850: 6f6e 7320 6f66 2063 6f64 696e 6720 7379 ons of coding sy │ │ │ +00000860: 7374 656d 7320 7768 6963 6820 6172 6520 stems which are │ │ │ +00000870: 7573 6564 2061 7320 6162 6f76 652e 0a0a used as above... │ │ │ +00000880: 5468 6973 206f 7665 7272 6964 6573 2074 This overrides t │ │ │ +00000890: 6865 206d 6f72 6520 6765 6e65 7261 6c20 he more general │ │ │ +000008a0: 7370 6563 6966 6963 6174 696f 6e20 696e specification in │ │ │ +000008b0: 0a60 6275 6666 6572 2d66 696c 652d 636f .`buffer-file-co │ │ │ +000008c0: 6469 6e67 2d73 7973 7465 6d2d 666f 722d ding-system-for- │ │ │ +000008d0: 7265 6164 272c 2062 7574 2069 7320 6f76 read', but is ov │ │ │ +000008e0: 6572 7269 6464 656e 2062 790a 6063 6f64 erridden by.`cod │ │ │ +000008f0: 696e 672d 7379 7374 656d 2d66 6f72 2d72 ing-system-for-r │ │ │ +00000900: 6561 6427 2e1f 0a28 6465 6676 6172 2066 ead'...(defvar f │ │ │ +00000910: 696c 652d 636f 6469 6e67 2d73 7973 7465 ile-coding-syste │ │ │ +00000920: 6d2d 616c 6973 7420 2862 7974 652d 636f m-alist (byte-co │ │ │ +00000930: 6465 2022 c1c2 c308 5c22 c45c 2287 2220 de "....\".\"." │ │ │ +00000940: 5b62 696e 6172 792d 6669 6c65 2d72 6567 [binary-file-reg │ │ │ +00000950: 6578 7073 2061 7070 656e 6420 6d61 7063 exps append mapc │ │ │ +00000960: 6172 2023 5b28 7265 6765 7870 2920 2208 ar #[(regexp) ". │ │ │ +00000970: c142 8722 205b 7265 6765 7870 2062 696e .B." [regexp bin │ │ │ +00000980: 6172 795d 2032 5d20 2828 2254 5554 4f52 ary] 2] (("TUTOR │ │ │ +00000990: 4941 4c5c 5c2e 5c5c 283f 3a68 725c 5c7c IAL\\.\\(?:hr\\| │ │ │ +000009a0: 706c 5c5c 7c72 6f5c 5c29 5c5c 2722 202e pl\\|ro\\)\\'" . │ │ │ +000009b0: 2069 736f 2d38 3835 392d 3229 295d 2034 iso-8859-2))] 4 │ │ │ +000009c0: 2920 2823 2420 2e20 3136 3230 2929 0a23 ) (#$ . 1620)).# │ │ │ +000009d0: 4032 3537 2053 6574 2062 7566 6665 722d @257 Set buffer- │ │ │ +000009e0: 6669 6c65 2d63 6f64 696e 672d 7379 7374 file-coding-syst │ │ │ +000009f0: 656d 206f 6620 7468 6520 6375 7272 656e em of the curren │ │ │ +00000a00: 7420 6275 6666 6572 2074 6f20 434f 4449 t buffer to CODI │ │ │ +00000a10: 4e47 2d53 5953 5445 4d2e 0a49 6620 6f70 NG-SYSTEM..If op │ │ │ +00000a20: 7469 6f6e 616c 2061 7267 756d 656e 7420 tional argument │ │ │ +00000a30: 464f 5243 4520 2869 6e74 6572 6163 7469 FORCE (interacti │ │ │ +00000a40: 7665 6c79 2c20 7468 6520 7072 6566 6978 vely, the prefix │ │ │ +00000a50: 2061 7267 756d 656e 7429 2069 7320 6e6f argument) is no │ │ │ +00000a60: 740a 6769 7665 6e2c 2061 7474 656d 7074 t.given, attempt │ │ │ +00000a70: 2074 6f20 6d61 7463 6820 7468 6520 454f to match the EO │ │ │ +00000a80: 4c20 7479 7065 206f 6620 7468 6520 6e65 L type of the ne │ │ │ +00000a90: 7720 636f 6469 6e67 2073 7973 7465 6d20 w coding system │ │ │ +00000aa0: 746f 0a74 6865 2063 7572 7265 6e74 2076 to.the current v │ │ │ +00000ab0: 616c 7565 206f 6620 6062 7566 6665 722d alue of `buffer- │ │ │ +00000ac0: 6669 6c65 2d63 6f64 696e 672d 7379 7374 file-coding-syst │ │ │ +00000ad0: 656d 272e 1f0a 2864 6566 616c 6961 7320 em'...(defalias │ │ │ +00000ae0: 2773 6574 2d62 7566 6665 722d 6669 6c65 'set-buffer-file │ │ │ +00000af0: 2d63 6f64 696e 672d 7379 7374 656d 2023 -coding-system # │ │ │ +00000b00: 5b28 636f 6469 6e67 2d73 7973 7465 6d20 [(coding-system │ │ │ +00000b10: 266f 7074 696f 6e61 6c20 666f 7263 6529 &optional force) │ │ │ +00000b20: 2022 c35c 6e21 8808 ac87 c45c 6ec5 0921 ".\n!.....\n..! │ │ │ +00000b30: 5c22 125c 6e11 c6c7 2187 2220 5b66 6f72 \".\n...!." [for │ │ │ +00000b40: 6365 2062 7566 6665 722d 6669 6c65 2d63 ce buffer-file-c │ │ │ +00000b50: 6f64 696e 672d 7379 7374 656d 2063 6f64 oding-system cod │ │ │ +00000b60: 696e 672d 7379 7374 656d 2067 6574 2d63 ing-system get-c │ │ │ +00000b70: 6f64 696e 672d 7379 7374 656d 2073 7562 oding-system sub │ │ │ +00000b80: 7369 6469 6172 792d 636f 6469 6e67 2d73 sidiary-coding-s │ │ │ +00000b90: 7973 7465 6d20 636f 6469 6e67 2d73 7973 ystem coding-sys │ │ │ +00000ba0: 7465 6d2d 656f 6c2d 7479 7065 2072 6564 tem-eol-type red │ │ │ +00000bb0: 7261 772d 6d6f 6465 6c69 6e65 2074 5d20 raw-modeline t] │ │ │ +00000bc0: 3420 2823 2420 2e20 3235 3137 2920 227a 4 (#$ . 2517) "z │ │ │ +00000bd0: 4669 6c65 2063 6f64 696e 6720 7379 7374 File coding syst │ │ │ +00000be0: 656d 3a20 5c6e 5022 5d29 0a23 4031 3135 em: \nP"]).#@115 │ │ │ +00000bf0: 2053 6574 2045 4f4c 2074 7970 6520 6f66 Set EOL type of │ │ │ +00000c00: 2062 7566 6665 722d 6669 6c65 2d63 6f64 buffer-file-cod │ │ │ +00000c10: 696e 672d 7379 7374 656d 206f 6620 7468 ing-system of th │ │ │ +00000c20: 6520 6375 7272 656e 7420 6275 6666 6572 e current buffer │ │ │ +00000c30: 2074 6f0a 736f 6d65 7468 696e 6720 6f74 to.something ot │ │ │ +00000c40: 6865 7220 7468 616e 2077 6861 7420 6974 her than what it │ │ │ +00000c50: 2069 7320 6174 2074 6865 206d 6f6d 656e is at the momen │ │ │ +00000c60: 742e 1f0a 2864 6566 616c 6961 7320 2774 t...(defalias 't │ │ │ +00000c70: 6f67 676c 652d 6275 6666 6572 2d66 696c oggle-buffer-fil │ │ │ +00000c80: 652d 636f 6469 6e67 2d73 7973 7465 6d20 e-coding-system │ │ │ +00000c90: 235b 6e69 6c20 22c2 0821 19c3 c408 2109 #[nil "..!....!. │ │ │ +00000ca0: c561 ab83 c6aa 8e09 c661 ab83 c5aa 8609 .a.......a...... │ │ │ +00000cb0: c761 ad81 c55c 2210 c8c9 2129 8722 205b .a...\"...!)." [ │ │ │ +00000cc0: 6275 6666 6572 2d66 696c 652d 636f 6469 buffer-file-codi │ │ │ +00000cd0: 6e67 2d73 7973 7465 6d20 656f 6c2d 7479 ng-system eol-ty │ │ │ +00000ce0: 7065 2063 6f64 696e 672d 7379 7374 656d pe coding-system │ │ │ +00000cf0: 2d65 6f6c 2d74 7970 6520 7375 6273 6964 -eol-type subsid │ │ │ +00000d00: 6961 7279 2d63 6f64 696e 672d 7379 7374 iary-coding-syst │ │ │ +00000d10: 656d 2063 6f64 696e 672d 7379 7374 656d em coding-system │ │ │ +00000d20: 2d62 6173 6520 6c66 2063 726c 6620 6372 -base lf crlf cr │ │ │ +00000d30: 2073 6574 2d62 7566 6665 722d 6d6f 6469 set-buffer-modi │ │ │ +00000d40: 6669 6564 2d70 2074 5d20 3420 2823 2420 fied-p t] 4 (#$ │ │ │ +00000d50: 2e20 3330 3537 2920 6e69 6c5d 290a 2862 . 3057) nil]).(b │ │ │ +00000d60: 7974 652d 636f 6465 2022 c2c3 1918 c408 yte-code "...... │ │ │ +00000d70: 095c 2288 c508 095c 2288 2ac2 8722 205b .\"....\".*.." [ │ │ │ +00000d80: 6f6c 6466 756e 206e 6577 6675 6e20 7365 oldfun newfun se │ │ │ +00000d90: 742d 6669 6c65 2d63 6f64 696e 672d 7379 t-file-coding-sy │ │ │ +00000da0: 7374 656d 2073 6574 2d62 7566 6665 722d stem set-buffer- │ │ │ +00000db0: 6669 6c65 2d63 6f64 696e 672d 7379 7374 file-coding-syst │ │ │ +00000dc0: 656d 2064 6566 696e 652d 6675 6e63 7469 em define-functi │ │ │ +00000dd0: 6f6e 206d 616b 652d 6f62 736f 6c65 7465 on make-obsolete │ │ │ +00000de0: 5d20 3329 0a23 4032 3239 2053 6574 2074 ] 3).#@229 Set t │ │ │ +00000df0: 6865 2063 6f64 696e 6720 7379 7374 656d he coding system │ │ │ +00000e00: 2075 7365 6420 7768 656e 2072 6561 6469 used when readi │ │ │ +00000e10: 6e67 2069 6e20 6120 6669 6c65 2e0a 5468 ng in a file..Th │ │ │ +00000e20: 6973 2069 7320 6571 7569 7661 6c65 6e74 is is equivalent │ │ │ +00000e30: 2074 6f20 7365 7474 696e 6720 7468 6520 to setting the │ │ │ +00000e40: 7661 7269 6162 6c65 0a60 6275 6666 6572 variable.`buffer │ │ │ +00000e50: 2d66 696c 652d 636f 6469 6e67 2d73 7973 -file-coding-sys │ │ │ +00000e60: 7465 6d2d 666f 722d 7265 6164 272e 2020 tem-for-read'. │ │ │ +00000e70: 596f 7520 6361 6e20 616c 736f 2075 7365 You can also use │ │ │ +00000e80: 0a60 6669 6c65 2d63 6f64 696e 672d 7379 .`file-coding-sy │ │ │ +00000e90: 7374 656d 2d61 6c69 7374 2720 746f 2073 stem-alist' to s │ │ │ +00000ea0: 7065 6369 6679 2074 6865 2063 6f64 696e pecify the codin │ │ │ +00000eb0: 6720 7379 7374 656d 2066 6f72 0a70 6172 g system for.par │ │ │ +00000ec0: 7469 6375 6c61 7220 6669 6c65 732e 1f0a ticular files... │ │ │ +00000ed0: 2864 6566 616c 6961 7320 2773 6574 2d62 (defalias 'set-b │ │ │ +00000ee0: 7566 6665 722d 6669 6c65 2d63 6f64 696e uffer-file-codin │ │ │ +00000ef0: 672d 7379 7374 656d 2d66 6f72 2d72 6561 g-system-for-rea │ │ │ +00000f00: 6420 235b 2863 6f64 696e 672d 7379 7374 d #[(coding-syst │ │ │ +00000f10: 656d 2920 22c2 0921 8809 8910 8722 205b em) "..!....." [ │ │ │ +00000f20: 6275 6666 6572 2d66 696c 652d 636f 6469 buffer-file-codi │ │ │ +00000f30: 6e67 2d73 7973 7465 6d2d 666f 722d 7265 ng-system-for-re │ │ │ +00000f40: 6164 2063 6f64 696e 672d 7379 7374 656d ad coding-system │ │ │ +00000f50: 2067 6574 2d63 6f64 696e 672d 7379 7374 get-coding-syst │ │ │ +00000f60: 656d 5d20 3220 2823 2420 2e20 3335 3633 em] 2 (#$ . 3563 │ │ │ +00000f70: 2920 227a 4669 6c65 2063 6f64 696e 6720 ) "zFile coding │ │ │ +00000f80: 7379 7374 656d 2066 6f72 2072 6561 643a system for read: │ │ │ +00000f90: 2022 5d29 0a28 6279 7465 2d63 6f64 6520 "]).(byte-code │ │ │ +00000fa0: 22c2 c319 18c4 0809 5c22 88c5 0809 5c22 ".......\"....\" │ │ │ +00000fb0: 882a c287 2220 5b6f 6c64 6675 6e20 6e65 .*.." [oldfun ne │ │ │ +00000fc0: 7766 756e 2073 6574 2d66 696c 652d 636f wfun set-file-co │ │ │ +00000fd0: 6469 6e67 2d73 7973 7465 6d2d 666f 722d ding-system-for- │ │ │ +00000fe0: 7265 6164 2073 6574 2d62 7566 6665 722d read set-buffer- │ │ │ +00000ff0: 6669 6c65 2d63 6f64 696e 672d 7379 7374 file-coding-syst │ │ │ +00001000: 656d 2d66 6f72 2d72 6561 6420 6465 6669 em-for-read defi │ │ │ +00001010: 6e65 2d66 756e 6374 696f 6e20 6d61 6b65 ne-function make │ │ │ +00001020: 2d6f 6273 6f6c 6574 655d 2033 290a 2340 -obsolete] 3).#@ │ │ │ +00001030: 3236 3320 5365 7420 7468 6520 6465 6661 263 Set the defa │ │ │ +00001040: 756c 7420 7661 6c75 6520 6f66 2060 6275 ult value of `bu │ │ │ +00001050: 6666 6572 2d66 696c 652d 636f 6469 6e67 ffer-file-coding │ │ │ +00001060: 2d73 7973 7465 6d27 2074 6f20 434f 4449 -system' to CODI │ │ │ +00001070: 4e47 2d53 5953 5445 4d2e 0a54 6865 2064 NG-SYSTEM..The d │ │ │ +00001080: 6566 6175 6c74 2076 616c 7565 2069 7320 efault value is │ │ │ +00001090: 7573 6564 2062 6f74 6820 666f 7220 6275 used both for bu │ │ │ +000010a0: 6666 6572 7320 7769 7468 6f75 7420 6173 ffers without as │ │ │ +000010b0: 736f 6369 6174 6564 2066 696c 6573 0a61 sociated files.a │ │ │ +000010c0: 6e64 2066 6f72 2066 696c 6573 2077 6974 nd for files wit │ │ │ +000010d0: 6820 6e6f 2061 7070 6172 656e 7420 636f h no apparent co │ │ │ +000010e0: 6469 6e67 2073 7973 7465 6d20 2869 2e65 ding system (i.e │ │ │ +000010f0: 2e20 7072 696d 6172 696c 7920 4153 4349 . primarily ASCI │ │ │ +00001100: 4929 2e0a 5365 6520 6062 7566 6665 722d I)..See `buffer- │ │ │ +00001110: 6669 6c65 2d63 6f64 696e 672d 7379 7374 file-coding-syst │ │ │ +00001120: 656d 2720 666f 7220 6d6f 7265 2069 6e66 em' for more inf │ │ │ +00001130: 6f72 6d61 7469 6f6e 2e1f 0a28 6465 6661 ormation...(defa │ │ │ +00001140: 6c69 6173 2027 7365 742d 6465 6661 756c lias 'set-defaul │ │ │ +00001150: 742d 6275 6666 6572 2d66 696c 652d 636f t-buffer-file-co │ │ │ +00001160: 6469 6e67 2d73 7973 7465 6d20 235b 2863 ding-system #[(c │ │ │ +00001170: 6f64 696e 672d 7379 7374 656d 2920 22c1 oding-system) ". │ │ │ +00001180: c208 5c22 88c3 c421 8722 205b 636f 6469 ..\"...!." [codi │ │ │ +00001190: 6e67 2d73 7973 7465 6d20 7365 742d 6465 ng-system set-de │ │ │ +000011a0: 6661 756c 7420 6275 6666 6572 2d66 696c fault buffer-fil │ │ │ +000011b0: 652d 636f 6469 6e67 2d73 7973 7465 6d20 e-coding-system │ │ │ +000011c0: 7265 6472 6177 2d6d 6f64 656c 696e 6520 redraw-modeline │ │ │ +000011d0: 745d 2033 2028 2324 202e 2034 3134 3829 t] 3 (#$ . 4148) │ │ │ +000011e0: 2022 7a44 6566 6175 6c74 2066 696c 6520 "zDefault file │ │ │ +000011f0: 636f 6469 6e67 2073 7973 7465 6d3a 2022 coding system: " │ │ │ +00001200: 5d29 0a28 6279 7465 2d63 6f64 6520 22c2 ]).(byte-code ". │ │ │ +00001210: c319 18c4 0809 5c22 88c5 0809 5c22 882a ......\"....\".* │ │ │ +00001220: c287 2220 5b6f 6c64 6675 6e20 6e65 7766 .." [oldfun newf │ │ │ +00001230: 756e 2073 6574 2d64 6566 6175 6c74 2d66 un set-default-f │ │ │ +00001240: 696c 652d 636f 6469 6e67 2d73 7973 7465 ile-coding-syste │ │ │ +00001250: 6d20 7365 742d 6465 6661 756c 742d 6275 m set-default-bu │ │ │ +00001260: 6666 6572 2d66 696c 652d 636f 6469 6e67 ffer-file-coding │ │ │ +00001270: 2d73 7973 7465 6d20 6465 6669 6e65 2d66 -system define-f │ │ │ +00001280: 756e 6374 696f 6e20 6d61 6b65 2d6f 6273 unction make-obs │ │ │ +00001290: 6f6c 6574 655d 2033 290a 2340 3138 3520 olete] 3).#@185 │ │ │ +000012a0: 4c6f 6f6b 2075 7020 636f 6469 6e67 2073 Look up coding s │ │ │ +000012b0: 7973 7465 6d20 746f 2072 6561 6420 6120 ystem to read a │ │ │ +000012c0: 6669 6c65 2069 6e20 6066 696c 652d 636f file in `file-co │ │ │ +000012d0: 6469 6e67 2d73 7973 7465 6d2d 616c 6973 ding-system-alis │ │ │ +000012e0: 7427 2e0a 5468 6520 7265 7475 726e 2076 t'..The return v │ │ │ +000012f0: 616c 7565 2077 696c 6c20 6265 206e 696c alue will be nil │ │ │ +00001300: 2028 6e6f 2061 7070 6c69 6361 626c 6520 (no applicable │ │ │ +00001310: 656e 7472 7929 206f 7220 6120 636f 6469 entry) or a codi │ │ │ +00001320: 6e67 2073 7973 7465 6d0a 6f62 6a65 6374 ng system.object │ │ │ +00001330: 2028 7468 6520 656e 7472 7920 7370 6563 (the entry spec │ │ │ +00001340: 6966 6965 6420 6120 636f 6469 6e67 2073 ified a coding s │ │ │ +00001350: 7973 7465 6d29 2e1f 0a28 6465 6661 6c69 ystem)...(defali │ │ │ +00001360: 6173 2027 6669 6e64 2d66 696c 652d 636f as 'find-file-co │ │ │ +00001370: 6469 6e67 2d73 7973 7465 6d2d 666f 722d ding-system-for- │ │ │ +00001380: 7265 6164 2d66 726f 6d2d 6669 6c65 6e61 read-from-filena │ │ │ +00001390: 6d65 2023 5b28 6669 6c65 6e61 6d65 2920 me #[(filename) │ │ │ +000013a0: 2209 c689 1d1a 1cc6 18c7 0b21 135c 6eac "..........!.\n. │ │ │ +000013b0: 960c ab93 c80c 4040 0b5c 22ab 860c 4041 ......@@.\"...@A │ │ │ +000013c0: 15c9 120c 4114 aa67 290d ad97 ca0d 21ab ....A..g).....!. │ │ │ +000013d0: 850d cb0b 5c22 150d 3aab 86cc 0d40 21aa ....\"..:....@!. │ │ │ +000013e0: 83cc 0d21 2b87 2220 5b63 6173 652d 666f ...!+." [case-fo │ │ │ +000013f0: 6c64 2d73 6561 7263 6820 6669 6c65 2d63 ld-search file-c │ │ │ +00001400: 6f64 696e 672d 7379 7374 656d 2d61 6c69 oding-system-ali │ │ │ +00001410: 7374 2066 6f75 6e64 2066 696c 656e 616d st found filenam │ │ │ +00001420: 6520 616c 6973 7420 636f 6465 7379 7320 e alist codesys │ │ │ +00001430: 6e69 6c20 6669 6c65 2d6e 616d 652d 7361 nil file-name-sa │ │ │ +00001440: 6e73 2d76 6572 7369 6f6e 7320 7374 7269 ns-versions stri │ │ │ +00001450: 6e67 2d6d 6174 6368 2074 2066 756e 6374 ng-match t funct │ │ │ +00001460: 696f 6e70 2069 6e73 6572 742d 6669 6c65 ionp insert-file │ │ │ +00001470: 2d63 6f6e 7465 6e74 7320 6669 6e64 2d63 -contents find-c │ │ │ +00001480: 6f64 696e 672d 7379 7374 656d 5d20 3320 oding-system] 3 │ │ │ +00001490: 2823 2420 2e20 3437 3638 295d 290a 2862 (#$ . 4768)]).(b │ │ │ +000014a0: 7974 652d 636f 6465 2022 c2c3 1918 c408 yte-code "...... │ │ │ +000014b0: 095c 2288 c508 095c 2288 2ac2 8722 205b .\"....\".*.." [ │ │ │ +000014c0: 6f6c 6466 756e 206e 6577 6675 6e20 6669 oldfun newfun fi │ │ │ +000014d0: 6e64 2d66 696c 652d 636f 6469 6e67 2d73 nd-file-coding-s │ │ │ +000014e0: 7973 7465 6d2d 6672 6f6d 2d66 696c 656e ystem-from-filen │ │ │ +000014f0: 616d 6520 6669 6e64 2d66 696c 652d 636f ame find-file-co │ │ │ +00001500: 6469 6e67 2d73 7973 7465 6d2d 666f 722d ding-system-for- │ │ │ +00001510: 7265 6164 2d66 726f 6d2d 6669 6c65 6e61 read-from-filena │ │ │ +00001520: 6d65 2064 6566 696e 652d 6675 6e63 7469 me define-functi │ │ │ +00001530: 6f6e 206d 616b 652d 6f62 736f 6c65 7465 on make-obsolete │ │ │ +00001540: 5d20 3329 0a23 4031 3836 204c 6f6f 6b20 ] 3).#@186 Look │ │ │ +00001550: 7570 2063 6f64 696e 6720 7379 7374 656d up coding system │ │ │ +00001560: 2074 6f20 7772 6974 6520 6120 6669 6c65 to write a file │ │ │ +00001570: 2069 6e20 6066 696c 652d 636f 6469 6e67 in `file-coding │ │ │ +00001580: 2d73 7973 7465 6d2d 616c 6973 7427 2e0a -system-alist'.. │ │ │ +00001590: 5468 6520 7265 7475 726e 2076 616c 7565 The return value │ │ │ +000015a0: 2077 696c 6c20 6265 206e 696c 2028 6e6f will be nil (no │ │ │ +000015b0: 2061 7070 6c69 6361 626c 6520 656e 7472 applicable entr │ │ │ +000015c0: 7929 206f 7220 6120 636f 6469 6e67 2073 y) or a coding s │ │ │ +000015d0: 7973 7465 6d0a 6f62 6a65 6374 2028 7468 ystem.object (th │ │ │ +000015e0: 6520 656e 7472 7920 7370 6563 6966 6965 e entry specifie │ │ │ +000015f0: 6420 6120 636f 6469 6e67 2073 7973 7465 d a coding syste │ │ │ +00001600: 6d29 2e1f 0a28 6465 6661 6c69 6173 2027 m)...(defalias ' │ │ │ +00001610: 6669 6e64 2d66 696c 652d 636f 6469 6e67 find-file-coding │ │ │ +00001620: 2d73 7973 7465 6d2d 666f 722d 7772 6974 -system-for-writ │ │ │ +00001630: 652d 6672 6f6d 2d66 696c 656e 616d 6520 e-from-filename │ │ │ +00001640: 235b 2866 696c 656e 616d 6529 2022 09c6 #[(filename) ".. │ │ │ +00001650: 891d 1a1c c618 c70b 2113 5c6e ac96 0cab ........!.\n.... │ │ │ +00001660: 93c8 0c40 400b 5c22 ab86 0c40 4115 c912 ...@@.\"...@A... │ │ │ +00001670: 0c41 14aa 6729 0dad 97ca 0d21 ab85 0dcb .A..g).....!.... │ │ │ +00001680: 0b5c 2215 0d3a ab86 cc0d 4121 aa83 cc0d .\"..:....A!.... │ │ │ +00001690: 212b 8722 205b 6361 7365 2d66 6f6c 642d !+." [case-fold- │ │ │ +000016a0: 7365 6172 6368 2066 696c 652d 636f 6469 search file-codi │ │ │ +000016b0: 6e67 2d73 7973 7465 6d2d 616c 6973 7420 ng-system-alist │ │ │ +000016c0: 666f 756e 6420 6669 6c65 6e61 6d65 2061 found filename a │ │ │ +000016d0: 6c69 7374 2063 6f64 6573 7973 206e 696c list codesys nil │ │ │ +000016e0: 2066 696c 652d 6e61 6d65 2d73 616e 732d file-name-sans- │ │ │ +000016f0: 7665 7273 696f 6e73 2073 7472 696e 672d versions string- │ │ │ +00001700: 6d61 7463 6820 7420 6675 6e63 7469 6f6e match t function │ │ │ +00001710: 7020 7772 6974 652d 7265 6769 6f6e 2066 p write-region f │ │ │ +00001720: 696e 642d 636f 6469 6e67 2d73 7973 7465 ind-coding-syste │ │ │ +00001730: 6d5d 2033 2028 2324 202e 2035 3435 3129 m] 3 (#$ . 5451) │ │ │ +00001740: 5d29 0a23 4036 3035 204c 6f6f 6b20 666f ]).#@605 Look fo │ │ │ +00001750: 7220 7468 6520 636f 6469 6e67 2d73 7973 r the coding-sys │ │ │ +00001760: 7465 6d20 6d61 6769 6320 636f 6f6b 6965 tem magic cookie │ │ │ +00001770: 2069 6e20 7468 6520 6375 7272 656e 7420 in the current │ │ │ +00001780: 6275 6666 6572 2e0a 5468 6520 636f 6469 buffer..The codi │ │ │ +00001790: 6e67 2d73 7973 7465 6d20 6d61 6769 6320 ng-system magic │ │ │ +000017a0: 636f 6f6b 6965 2069 7320 7468 6520 6578 cookie is the ex │ │ │ +000017b0: 6163 7420 7374 7269 6e67 0a22 3b3b 3b23 act string.";;;# │ │ │ +000017c0: 2323 636f 6469 6e67 2073 7973 7465 6d3a ##coding system: │ │ │ +000017d0: 2022 2066 6f6c 6c6f 7765 6420 6279 2061 " followed by a │ │ │ +000017e0: 2076 616c 6964 2063 6f64 696e 6720 7379 valid coding sy │ │ │ +000017f0: 7374 656d 2073 796d 626f 6c2c 0a73 6f6d stem symbol,.som │ │ │ +00001800: 6577 6865 7265 2077 6974 6869 6e20 7468 ewhere within th │ │ │ +00001810: 6520 6669 7273 7420 3330 3030 2063 6861 e first 3000 cha │ │ │ +00001820: 7261 6374 6572 7320 6f66 2074 6865 2066 racters of the f │ │ │ +00001830: 696c 652e 2020 4966 2066 6f75 6e64 2c0a ile. If found,. │ │ │ +00001840: 7468 6520 636f 6469 6e67 2073 7973 7465 the coding syste │ │ │ +00001850: 6d20 7379 6d62 6f6c 2069 7320 7265 7475 m symbol is retu │ │ │ +00001860: 726e 6564 3b20 6f74 6865 7277 6973 6520 rned; otherwise │ │ │ +00001870: 6e69 6c20 6973 2072 6574 7572 6e65 642e nil is returned. │ │ │ +00001880: 0a4e 6f74 6520 7468 6174 2069 7420 6973 .Note that it is │ │ │ +00001890: 2065 7874 7265 6d65 6c79 2075 6e6c 696b extremely unlik │ │ │ +000018a0: 656c 7920 7468 6174 2073 7563 6820 6120 ely that such a │ │ │ +000018b0: 7374 7269 6e67 2077 6f75 6c64 206f 6363 string would occ │ │ │ +000018c0: 7572 0a63 6f69 6e63 6964 656e 7461 6c6c ur.coincidentall │ │ │ +000018d0: 7920 6173 2074 6865 2072 6573 756c 7420 y as the result │ │ │ +000018e0: 6f66 2065 6e63 6f64 696e 6720 736f 6d65 of encoding some │ │ │ +000018f0: 2063 6861 7261 6374 6572 7320 696e 2061 characters in a │ │ │ +00001900: 206e 6f6e 2d41 5343 4949 0a63 6861 7273 non-ASCII.chars │ │ │ +00001910: 6574 2c20 616e 6420 7468 6174 2074 6865 et, and that the │ │ │ +00001920: 2073 7061 6365 7320 6d61 6b65 2069 7420 spaces make it │ │ │ +00001930: 6576 656e 206c 6573 7320 6c69 6b65 6c79 even less likely │ │ │ +00001940: 2073 696e 6365 2074 6865 2073 7061 6365 since the space │ │ │ +00001950: 0a63 6861 7261 6374 6572 2069 7320 6e6f .character is no │ │ │ +00001960: 7420 6120 7661 6c69 6420 6f63 7465 7420 t a valid octet │ │ │ +00001970: 696e 2061 6e79 2049 534f 2032 3032 3220 in any ISO 2022 │ │ │ +00001980: 656e 636f 6469 6e67 206f 6620 6d6f 7374 encoding of most │ │ │ +00001990: 206e 6f6e 2d41 5343 4949 0a63 6861 7273 non-ASCII.chars │ │ │ +000019a0: 6574 732e 1f0a 2864 6566 616c 6961 7320 ets...(defalias │ │ │ +000019b0: 2766 696e 642d 636f 6469 6e67 2d73 7973 'find-coding-sys │ │ │ +000019c0: 7465 6d2d 6d61 6769 632d 636f 6f6b 6965 tem-magic-cookie │ │ │ +000019d0: 2023 5b6e 696c 2022 8a65 6288 c4c5 21ab #[nil ".eb...!. │ │ │ +000019e0: 91c6 c794 c795 7b21 1bc8 0b21 ad81 0b29 ......{!...!...) │ │ │ +000019f0: aea7 c918 cacb 65cc 5c5c cd23 ad9b 60ce ......e.\\.#..`. │ │ │ +00001a00: c977 8860 1a19 5c6e 0956 ad8d c609 5c6e .w.`..\n.V....\n │ │ │ +00001a10: 7b21 1bc8 0b21 ad81 0b29 2a29 2987 2220 {!...!...)*))." │ │ │ +00001a20: 5b63 6173 652d 666f 6c64 2d73 6561 7263 [case-fold-searc │ │ │ +00001a30: 6820 7374 6172 7420 656e 6420 636f 6465 h start end code │ │ │ +00001a40: 7379 7320 6c6f 6f6b 696e 672d 6174 2022 sys looking-at " │ │ │ +00001a50: 5e5b 5e5c 6e5d 2a2d 5c5c 2a2d 5b5e 5c6e ^[^\n]*-\\*-[^\n │ │ │ +00001a60: 5d2a 636f 6469 6e67 3a20 5c5c 285b 5e20 ]*coding: \\([^ │ │ │ +00001a70: 095c 6e3b 5d2b 5c5c 295b 5e5c 6e5d 2a2d .\n;]+\\)[^\n]*- │ │ │ +00001a80: 5c5c 2a2d 2220 696e 7465 726e 2031 2066 \\*-" intern 1 f │ │ │ +00001a90: 696e 642d 636f 6469 6e67 2d73 7973 7465 ind-coding-syste │ │ │ +00001aa0: 6d20 6e69 6c20 7365 6172 6368 2d66 6f72 m nil search-for │ │ │ +00001ab0: 7761 7264 2022 3b3b 3b23 2323 636f 6469 ward ";;;###codi │ │ │ +00001ac0: 6e67 2073 7973 7465 6d3a 2022 2033 3030 ng system: " 300 │ │ │ +00001ad0: 3020 7420 225e 2009 5c6e 0d22 5d20 3420 0 t "^ .\n."] 4 │ │ │ +00001ae0: 2823 2420 2e20 3539 3631 295d 290a 2340 (#$ . 5961)]).#@ │ │ │ +00001af0: 3437 3520 4578 6563 7574 6520 6120 6669 475 Execute a fi │ │ │ +00001b00: 6c65 206f 6620 4c69 7370 2063 6f64 6520 le of Lisp code │ │ │ +00001b10: 6e61 6d65 6420 4649 4c45 2e0a 4669 7273 named FILE..Firs │ │ │ +00001b20: 7420 7472 6965 7320 4649 4c45 2077 6974 t tries FILE wit │ │ │ +00001b30: 6820 2e65 6c63 2061 7070 656e 6465 642c h .elc appended, │ │ │ +00001b40: 2074 6865 6e20 7472 6965 7320 7769 7468 then tries with │ │ │ +00001b50: 202e 656c 2c0a 2074 6865 6e20 7472 6965 .el,. then trie │ │ │ +00001b60: 7320 4649 4c45 2075 6e6d 6f64 6966 6965 s FILE unmodifie │ │ │ +00001b70: 642e 2020 5365 6172 6368 6573 2064 6972 d. Searches dir │ │ │ +00001b80: 6563 746f 7269 6573 2069 6e20 6c6f 6164 ectories in load │ │ │ +00001b90: 2d70 6174 682e 0a49 6620 6f70 7469 6f6e -path..If option │ │ │ +00001ba0: 616c 2073 6563 6f6e 6420 6172 6720 4e4f al second arg NO │ │ │ +00001bb0: 4552 524f 5220 6973 206e 6f6e 2d6e 696c ERROR is non-nil │ │ │ +00001bc0: 2c0a 2072 6570 6f72 7420 6e6f 2065 7272 ,. report no err │ │ │ +00001bd0: 6f72 2069 6620 4649 4c45 2064 6f65 736e or if FILE doesn │ │ │ +00001be0: 2774 2065 7869 7374 2e0a 5072 696e 7420 't exist..Print │ │ │ +00001bf0: 6d65 7373 6167 6573 2061 7420 7374 6172 messages at star │ │ │ +00001c00: 7420 616e 6420 656e 6420 6f66 206c 6f61 t and end of loa │ │ │ +00001c10: 6469 6e67 2075 6e6c 6573 730a 206f 7074 ding unless. opt │ │ │ +00001c20: 696f 6e61 6c20 7468 6972 6420 6172 6720 ional third arg │ │ │ +00001c30: 4e4f 4d45 5353 4147 4520 6973 206e 6f6e NOMESSAGE is non │ │ │ +00001c40: 2d6e 696c 2e0a 4966 206f 7074 696f 6e61 -nil..If optiona │ │ │ +00001c50: 6c20 666f 7572 7468 2061 7267 204e 4f53 l fourth arg NOS │ │ │ +00001c60: 5546 4649 5820 6973 206e 6f6e 2d6e 696c UFFIX is non-nil │ │ │ +00001c70: 2c20 646f 6e27 7420 7472 7920 6164 6469 , don't try addi │ │ │ +00001c80: 6e67 0a20 7375 6666 6978 6573 202e 656c ng. suffixes .el │ │ │ +00001c90: 6320 6f72 202e 656c 2074 6f20 7468 6520 c or .el to the │ │ │ +00001ca0: 7370 6563 6966 6965 6420 6e61 6d65 2046 specified name F │ │ │ +00001cb0: 494c 452e 0a52 6574 7572 6e20 7420 6966 ILE..Return t if │ │ │ +00001cc0: 2066 696c 6520 6578 6973 7473 2e1f 0a28 file exists...( │ │ │ +00001cd0: 6465 6661 6c69 6173 2027 6c6f 6164 2023 defalias 'load # │ │ │ +00001ce0: 5b28 6669 6c65 2026 6f70 7469 6f6e 616c [(file &optional │ │ │ +00001cf0: 206e 6f65 7272 6f72 206e 6f6d 6573 7361 noerror nomessa │ │ │ +00001d00: 6765 206e 6f73 7566 6669 7829 2022 c608 ge nosuffix) ".. │ │ │ +00001d10: 211d c70d c85c 221b c91c 0bab 8a0b c80d !....\"......... │ │ │ +00001d20: 5c6e 0e1c 0925 aadf 0d47 ca58 ac8e cb0d \n...%...G.X.... │ │ │ +00001d30: 0e1f 093f ad81 cc23 8914 ac8c 5c6e 3fad ...?...#....\n?. │ │ │ +00001d40: c7cd cecf 0d44 5c22 aabf d008 5c6e 0e1c .....D\"....\n.. │ │ │ +00001d50: 090c d1c9 4f97 d298 891e 1dac 840e 1eae ....O........... │ │ │ +00001d60: a78a d3d4 2171 88d5 2088 d61e 1ed7 0cc9 ....!q.. ....... │ │ │ +00001d70: cad8 2488 29d9 2029 ae8e 0e1d ab83 daaa ..$.). )........ │ │ │ +00001d80: 87db 0c21 ae82 0e20 2925 2b87 2220 5b66 ...!... )%+." [f │ │ │ +00001d90: 696c 6520 6e6f 7375 6666 6978 206e 6f65 ile nosuffix noe │ │ │ +00001da0: 7272 6f72 2068 616e 646c 6572 2070 6174 rror handler pat │ │ │ +00001db0: 6820 6669 6c65 6e61 6d65 2073 7562 7374 h filename subst │ │ │ +00001dc0: 6974 7574 652d 696e 2d66 696c 652d 6e61 itute-in-file-na │ │ │ +00001dd0: 6d65 2066 696e 642d 6669 6c65 2d6e 616d me find-file-nam │ │ │ +00001de0: 652d 6861 6e64 6c65 7220 6c6f 6164 206e e-handler load n │ │ │ +00001df0: 696c 2030 206c 6f63 6174 652d 6669 6c65 il 0 locate-file │ │ │ +00001e00: 2028 222e 656c 6322 2022 2e65 6c22 2022 (".elc" ".el" " │ │ │ +00001e10: 2229 2073 6967 6e61 6c20 6669 6c65 2d65 ") signal file-e │ │ │ +00001e20: 7272 6f72 2022 4361 6e6e 6f74 206f 7065 rror "Cannot ope │ │ │ +00001e30: 6e20 6c6f 6164 2066 696c 6522 206c 6f61 n load file" loa │ │ │ +00001e40: 642d 696e 7465 726e 616c 202d 3420 222e d-internal -4 ". │ │ │ +00001e50: 656c 6322 2067 6574 2d62 7566 6665 722d elc" get-buffer- │ │ │ +00001e60: 6372 6561 7465 2022 202a 6c6f 6164 2a22 create " *load*" │ │ │ +00001e70: 2065 7261 7365 2d62 7566 6665 7220 7261 erase-buffer ra │ │ │ +00001e80: 772d 7465 7874 2069 6e73 6572 742d 6669 w-text insert-fi │ │ │ +00001e90: 6c65 2d63 6f6e 7465 6e74 7320 3330 3030 le-contents 3000 │ │ │ +00001ea0: 2066 696e 642d 636f 6469 6e67 2d73 7973 find-coding-sys │ │ │ +00001eb0: 7465 6d2d 6d61 6769 632d 636f 6f6b 6965 tem-magic-cookie │ │ │ +00001ec0: 2062 696e 6172 7920 6669 6e64 2d66 696c binary find-fil │ │ │ +00001ed0: 652d 636f 6469 6e67 2d73 7973 7465 6d2d e-coding-system- │ │ │ +00001ee0: 666f 722d 7265 6164 2d66 726f 6d2d 6669 for-read-from-fi │ │ │ +00001ef0: 6c65 6e61 6d65 206e 6f6d 6573 7361 6765 lename nomessage │ │ │ +00001f00: 2065 6c63 2063 6f64 696e 672d 7379 7374 elc coding-syst │ │ │ +00001f10: 656d 2d66 6f72 2d72 6561 6420 6c6f 6164 em-for-read load │ │ │ +00001f20: 2d70 6174 6820 6275 6666 6572 2d66 696c -path buffer-fil │ │ │ +00001f30: 652d 636f 6469 6e67 2d73 7973 7465 6d2d e-coding-system- │ │ │ +00001f40: 666f 722d 7265 6164 5d20 3131 2028 2324 for-read] 11 (#$ │ │ │ +00001f50: 202e 2036 3930 3029 5d29 0a23 4032 3436 . 6900)]).#@246 │ │ │ +00001f60: 2041 2068 6f6f 6b20 746f 206d 616b 6520 A hook to make │ │ │ +00001f70: 6120 6669 6c65 2061 6363 6573 7369 626c a file accessibl │ │ │ +00001f80: 6520 6265 666f 7265 2072 6561 6469 6e67 e before reading │ │ │ +00001f90: 2069 742e 0a60 696e 7365 7274 2d66 696c it..`insert-fil │ │ │ +00001fa0: 652d 636f 6e74 656e 7473 2720 6361 6c6c e-contents' call │ │ │ +00001fb0: 7320 7468 6973 2068 6f6f 6b20 6265 666f s this hook befo │ │ │ +00001fc0: 7265 2064 6f69 6e67 2061 6e79 7468 696e re doing anythin │ │ │ +00001fd0: 6720 656c 7365 2e0a 4361 6c6c 6564 2077 g else..Called w │ │ │ +00001fe0: 6974 6820 7477 6f20 6172 6775 6d65 6e74 ith two argument │ │ │ +00001ff0: 733a 2046 494c 454e 414d 4520 616e 6420 s: FILENAME and │ │ │ +00002000: 5649 5349 542c 2074 6865 2073 616d 6520 VISIT, the same │ │ │ +00002010: 6173 2074 6865 0a63 6f72 7265 7370 6f6e as the.correspon │ │ │ +00002020: 6469 6e67 2061 7267 756d 656e 7473 2069 ding arguments i │ │ │ +00002030: 6e20 7468 6520 6361 6c6c 2074 6f20 6069 n the call to `i │ │ │ +00002040: 6e73 6572 742d 6669 6c65 2d63 6f6e 7465 nsert-file-conte │ │ │ +00002050: 6e74 7327 2e1f 0a28 6465 6676 6172 2069 nts'...(defvar i │ │ │ +00002060: 6e73 6572 742d 6669 6c65 2d63 6f6e 7465 nsert-file-conte │ │ │ +00002070: 6e74 732d 6163 6365 7373 2d68 6f6f 6b20 nts-access-hook │ │ │ +00002080: 6e69 6c20 2823 2420 2e20 3830 3333 2929 nil (#$ . 8033)) │ │ │ +00002090: 0a23 4038 3738 2041 2073 7065 6369 616c .#@878 A special │ │ │ +000020a0: 2068 6f6f 6b20 746f 2064 6563 6964 6520 hook to decide │ │ │ +000020b0: 7468 6520 636f 6469 6e67 2073 7973 7465 the coding syste │ │ │ +000020c0: 6d20 7573 6564 2066 6f72 2072 6561 6469 m used for readi │ │ │ +000020d0: 6e67 2069 6e20 6120 6669 6c65 2e0a 0a42 ng in a file...B │ │ │ +000020e0: 6566 6f72 6520 7265 6164 696e 6720 6120 efore reading a │ │ │ +000020f0: 6669 6c65 2c20 6069 6e73 6572 742d 6669 file, `insert-fi │ │ │ +00002100: 6c65 2d63 6f6e 7465 6e74 7327 2063 616c le-contents' cal │ │ │ +00002110: 6c73 2074 6865 2066 756e 6374 696f 6e73 ls the functions │ │ │ +00002120: 206f 6e0a 7468 6973 2068 6f6f 6b20 7769 on.this hook wi │ │ │ +00002130: 7468 2061 7267 756d 656e 7473 2046 494c th arguments FIL │ │ │ +00002140: 454e 414d 4520 616e 6420 5649 5349 542c ENAME and VISIT, │ │ │ +00002150: 2074 6865 2073 616d 6520 6173 2074 6865 the same as the │ │ │ +00002160: 0a63 6f72 7265 7370 6f6e 6469 6e67 2061 .corresponding a │ │ │ +00002170: 7267 756d 656e 7473 2069 6e20 7468 6520 rguments in the │ │ │ +00002180: 6361 6c6c 2074 6f20 6069 6e73 6572 742d call to `insert- │ │ │ +00002190: 6669 6c65 2d63 6f6e 7465 6e74 7327 2e20 file-contents'. │ │ │ +000021a0: 2049 6e0a 7468 6573 6520 6675 6e63 7469 In.these functi │ │ │ +000021b0: 6f6e 732c 2079 6f75 206d 6179 2072 6566 ons, you may ref │ │ │ +000021c0: 6572 2074 6f20 7468 6520 676c 6f62 616c er to the global │ │ │ +000021d0: 2076 6172 6961 626c 650a 6062 7566 6665 variable.`buffe │ │ │ +000021e0: 722d 6669 6c65 2d63 6f64 696e 672d 7379 r-file-coding-sy │ │ │ +000021f0: 7374 656d 2d66 6f72 2d72 6561 6427 2e0a stem-for-read'.. │ │ │ +00002200: 0a54 6865 2072 6574 7572 6e20 7661 6c75 .The return valu │ │ │ +00002210: 6520 6f66 2074 6865 2066 756e 6374 696f e of the functio │ │ │ +00002220: 6e73 2073 686f 756c 6420 6265 2065 6974 ns should be eit │ │ │ +00002230: 6865 720a 0a2d 2d20 6e69 6c0a 2d2d 2041 her..-- nil.-- A │ │ │ +00002240: 2063 6f64 696e 6720 7379 7374 656d 206f coding system o │ │ │ +00002250: 7220 6120 7379 6d62 6f6c 2064 656e 6f74 r a symbol denot │ │ │ +00002260: 696e 6720 6974 2c20 696e 6469 6361 7469 ing it, indicati │ │ │ +00002270: 6e67 2074 6865 2063 6f64 696e 6720 7379 ng the coding sy │ │ │ +00002280: 7374 656d 0a20 2020 746f 2062 6520 7573 stem. to be us │ │ │ +00002290: 6564 2066 6f72 2072 6561 6469 6e67 2074 ed for reading t │ │ │ +000022a0: 6865 2066 696c 650a 2d2d 2041 206c 6973 he file.-- A lis │ │ │ +000022b0: 7420 6f66 2074 776f 2065 6c65 6d65 6e74 t of two element │ │ │ +000022c0: 7320 2861 6273 6f6c 7574 6520 7061 7468 s (absolute path │ │ │ +000022d0: 6e61 6d65 2061 6e64 206c 656e 6774 6820 name and length │ │ │ +000022e0: 6f66 2064 6174 6120 696e 7365 7274 6564 of data inserted │ │ │ +000022f0: 292c 0a20 2020 7768 6963 6820 6973 2075 ),. which is u │ │ │ +00002300: 7365 6420 6173 2074 6865 2072 6574 7572 sed as the retur │ │ │ +00002310: 6e20 7661 6c75 6520 746f 2060 696e 7365 n value to `inse │ │ │ +00002320: 7274 2d66 696c 652d 636f 6e74 656e 7473 rt-file-contents │ │ │ +00002330: 272e 2020 496e 2074 6869 730a 2020 2063 '. In this. c │ │ │ +00002340: 6173 652c 2060 696e 7365 7274 2d66 696c ase, `insert-fil │ │ │ +00002350: 652d 636f 6e74 656e 7473 2720 6173 7375 e-contents' assu │ │ │ +00002360: 6d65 7320 7468 6174 2074 6865 2066 756e mes that the fun │ │ │ +00002370: 6374 696f 6e20 6861 7320 696e 7365 7274 ction has insert │ │ │ +00002380: 6564 0a20 2020 7468 6520 6669 6c65 2066 ed. the file f │ │ │ +00002390: 6f72 2069 7473 656c 6620 616e 6420 7375 or itself and su │ │ │ +000023a0: 7070 7265 7373 6573 2066 7572 7468 6572 ppresses further │ │ │ +000023b0: 2072 6561 6469 6e67 2e0a 0a49 6620 616e reading...If an │ │ │ +000023c0: 7920 6675 6e63 7469 6f6e 2072 6574 7572 y function retur │ │ │ +000023d0: 6e73 206e 6f6e 2d6e 696c 2c20 7468 6520 ns non-nil, the │ │ │ +000023e0: 7265 6d61 696e 696e 6720 6675 6e63 7469 remaining functi │ │ │ +000023f0: 6f6e 7320 6172 6520 6e6f 7420 6361 6c6c ons are not call │ │ │ +00002400: 6564 2e1f 0a28 6465 6676 6172 2069 6e73 ed...(defvar ins │ │ │ +00002410: 6572 742d 6669 6c65 2d63 6f6e 7465 6e74 ert-file-content │ │ │ +00002420: 732d 7072 652d 686f 6f6b 206e 696c 2028 s-pre-hook nil ( │ │ │ +00002430: 2324 202e 2038 3334 3329 290a 2340 3438 #$ . 8343)).#@48 │ │ │ +00002440: 3320 4120 686f 6f6b 2074 6f20 7365 7420 3 A hook to set │ │ │ +00002450: 6062 7566 6665 722d 6669 6c65 2d63 6f64 `buffer-file-cod │ │ │ +00002460: 696e 672d 7379 7374 656d 2720 7768 656e ing-system' when │ │ │ +00002470: 2061 2072 6561 6420 6572 726f 7220 6861 a read error ha │ │ │ +00002480: 7320 6f63 6375 7272 6564 2e0a 0a57 6865 s occurred...Whe │ │ │ +00002490: 6e20 6120 6669 6c65 2065 7272 6f72 2028 n a file error ( │ │ │ +000024a0: 652e 672e 206e 6f6e 6578 6973 7465 6e74 e.g. nonexistent │ │ │ +000024b0: 2066 696c 6529 206f 6363 7572 7320 7768 file) occurs wh │ │ │ +000024c0: 696c 6520 7265 6164 2061 2066 696c 652c ile read a file, │ │ │ +000024d0: 0a60 696e 7365 7274 2d66 696c 652d 636f .`insert-file-co │ │ │ +000024e0: 6e74 656e 7473 2720 6361 6c6c 7320 7468 ntents' calls th │ │ │ +000024f0: 6520 6675 6e63 7469 6f6e 7320 6f6e 2074 e functions on t │ │ │ +00002500: 6869 7320 686f 6f6b 2077 6974 6820 7468 his hook with th │ │ │ +00002510: 7265 650a 6172 6775 6d65 6e74 733a 2046 ree.arguments: F │ │ │ +00002520: 494c 454e 414d 4520 616e 6420 5649 5349 ILENAME and VISI │ │ │ +00002530: 5420 2874 6865 2073 616d 6520 6173 2074 T (the same as t │ │ │ +00002540: 6865 2063 6f72 7265 7370 6f6e 6469 6e67 he corresponding │ │ │ +00002550: 2061 7267 756d 656e 7473 0a69 6e20 7468 arguments.in th │ │ │ +00002560: 6520 6361 6c6c 2074 6f20 6069 6e73 6572 e call to `inser │ │ │ +00002570: 742d 6669 6c65 2d63 6f6e 7465 6e74 7327 t-file-contents' │ │ │ +00002580: 2920 616e 6420 6120 636f 6e73 2028 5349 ) and a cons (SI │ │ │ +00002590: 474e 414c 4544 2d43 4f4e 4449 5449 4f4e GNALED-CONDITION │ │ │ +000025a0: 530a 2e20 5349 474e 414c 2d44 4154 4129 S.. SIGNAL-DATA) │ │ │ +000025b0: 2e0a 0a41 6674 6572 2063 616c 6c69 6e67 ...After calling │ │ │ +000025c0: 2074 6869 7320 686f 6f6b 2c20 7468 6520 this hook, the │ │ │ +000025d0: 6572 726f 7220 6973 2073 6967 6e61 6c6c error is signall │ │ │ +000025e0: 6564 2066 6f72 2072 6561 6c20 616e 640a ed for real and. │ │ │ +000025f0: 7072 6f70 6167 6174 6573 2074 6f20 7468 propagates to th │ │ │ +00002600: 6520 6361 6c6c 6572 206f 6620 6069 6e73 e caller of `ins │ │ │ +00002610: 6572 742d 6669 6c65 2d63 6f6e 7465 6e74 ert-file-content │ │ │ +00002620: 7327 2e1f 0a28 6465 6676 6172 2069 6e73 s'...(defvar ins │ │ │ +00002630: 6572 742d 6669 6c65 2d63 6f6e 7465 6e74 ert-file-content │ │ │ +00002640: 732d 6572 726f 722d 686f 6f6b 206e 696c s-error-hook nil │ │ │ +00002650: 2028 2324 202e 2039 3238 3229 290a 2340 (#$ . 9282)).#@ │ │ │ +00002660: 3436 3320 4120 686f 6f6b 2074 6f20 7365 463 A hook to se │ │ │ +00002670: 7420 6062 7566 6665 722d 6669 6c65 2d63 t `buffer-file-c │ │ │ +00002680: 6f64 696e 672d 7379 7374 656d 2720 666f oding-system' fo │ │ │ +00002690: 7220 7468 6520 6375 7272 656e 7420 6275 r the current bu │ │ │ +000026a0: 6666 6572 2e0a 0a41 6674 6572 2073 7563 ffer...After suc │ │ │ +000026b0: 6365 7373 6675 6c20 7265 6164 696e 672c cessful reading, │ │ │ +000026c0: 2060 696e 7365 7274 2d66 696c 652d 636f `insert-file-co │ │ │ +000026d0: 6e74 656e 7473 2720 6361 6c6c 7320 7468 ntents' calls th │ │ │ +000026e0: 6520 6675 6e63 7469 6f6e 730a 6f6e 2074 e functions.on t │ │ │ +000026f0: 6869 7320 686f 6f6b 2077 6974 6820 666f his hook with fo │ │ │ +00002700: 7572 2061 7267 756d 656e 7473 3a20 4649 ur arguments: FI │ │ │ +00002710: 4c45 4e41 4d45 2061 6e64 2056 4953 4954 LENAME and VISIT │ │ │ +00002720: 2028 7468 6520 7361 6d65 2061 7320 7468 (the same as th │ │ │ +00002730: 650a 636f 7272 6573 706f 6e64 696e 6720 e.corresponding │ │ │ +00002740: 6172 6775 6d65 6e74 7320 696e 2074 6865 arguments in the │ │ │ +00002750: 2063 616c 6c20 746f 2060 696e 7365 7274 call to `insert │ │ │ +00002760: 2d66 696c 652d 636f 6e74 656e 7473 2729 -file-contents') │ │ │ +00002770: 2c0a 434f 4449 4e47 2d53 5953 5445 4d20 ,.CODING-SYSTEM │ │ │ +00002780: 2874 6865 2061 6374 7561 6c20 636f 6469 (the actual codi │ │ │ +00002790: 6e67 2073 7973 7465 6d20 7573 6564 2074 ng system used t │ │ │ +000027a0: 6f20 6465 636f 6465 2074 6865 2066 696c o decode the fil │ │ │ +000027b0: 6529 2c20 616e 640a 6120 636f 6e73 206f e), and.a cons o │ │ │ +000027c0: 6620 6162 736f 6c75 7465 2070 6174 686e f absolute pathn │ │ │ +000027d0: 616d 6520 616e 6420 6c65 6e67 7468 206f ame and length o │ │ │ +000027e0: 6620 6461 7461 2069 6e73 6572 7465 6420 f data inserted │ │ │ +000027f0: 2874 6865 2073 616d 650a 7468 696e 6720 (the same.thing │ │ │ +00002800: 6173 2077 696c 6c20 6265 2072 6574 7572 as will be retur │ │ │ +00002810: 6e65 6420 6672 6f6d 2060 696e 7365 7274 ned from `insert │ │ │ +00002820: 2d66 696c 652d 636f 6e74 656e 7473 2729 -file-contents') │ │ │ +00002830: 2e1f 0a28 6465 6676 6172 2069 6e73 6572 ...(defvar inser │ │ │ +00002840: 742d 6669 6c65 2d63 6f6e 7465 6e74 732d t-file-contents- │ │ │ +00002850: 706f 7374 2d68 6f6f 6b20 6e69 6c20 2823 post-hook nil (# │ │ │ +00002860: 2420 2e20 3938 3238 2929 0a23 4031 3433 $ . 9828)).#@143 │ │ │ +00002870: 3820 496e 7365 7274 2063 6f6e 7465 6e74 8 Insert content │ │ │ +00002880: 7320 6f66 2066 696c 6520 4649 4c45 4e41 s of file FILENA │ │ │ +00002890: 4d45 2061 6674 6572 2070 6f69 6e74 2e0a ME after point.. │ │ │ +000028a0: 5265 7475 726e 7320 6c69 7374 206f 6620 Returns list of │ │ │ +000028b0: 6162 736f 6c75 7465 2066 696c 6520 6e61 absolute file na │ │ │ +000028c0: 6d65 2061 6e64 206c 656e 6774 6820 6f66 me and length of │ │ │ +000028d0: 2064 6174 6120 696e 7365 7274 6564 2e0a data inserted.. │ │ │ +000028e0: 4966 2073 6563 6f6e 6420 6172 6775 6d65 If second argume │ │ │ +000028f0: 6e74 2056 4953 4954 2069 7320 6e6f 6e2d nt VISIT is non- │ │ │ +00002900: 6e69 6c2c 2074 6865 2062 7566 6665 7227 nil, the buffer' │ │ │ +00002910: 7320 7669 7369 7465 6420 6669 6c65 6e61 s visited filena │ │ │ +00002920: 6d65 0a61 6e64 206c 6173 7420 7361 7665 me.and last save │ │ │ +00002930: 2066 696c 6520 6d6f 6474 696d 6520 6172 file modtime ar │ │ │ +00002940: 6520 7365 742c 2061 6e64 2069 7420 6973 e set, and it is │ │ │ +00002950: 206d 6172 6b65 6420 756e 6d6f 6469 6669 marked unmodifi │ │ │ +00002960: 6564 2e0a 4966 2076 6973 6974 696e 6720 ed..If visiting │ │ │ +00002970: 616e 6420 7468 6520 6669 6c65 2064 6f65 and the file doe │ │ │ +00002980: 7320 6e6f 7420 6578 6973 742c 2076 6973 s not exist, vis │ │ │ +00002990: 6974 696e 6720 6973 2063 6f6d 706c 6574 iting is complet │ │ │ +000029a0: 6564 0a62 6566 6f72 6520 7468 6520 6572 ed.before the er │ │ │ +000029b0: 726f 7220 6973 2073 6967 6e61 6c65 642e ror is signaled. │ │ │ +000029c0: 0a0a 5468 6520 6f70 7469 6f6e 616c 2074 ..The optional t │ │ │ +000029d0: 6869 7264 2061 6e64 2066 6f75 7274 6820 hird and fourth │ │ │ +000029e0: 6172 6775 6d65 6e74 7320 5354 4152 5420 arguments START │ │ │ +000029f0: 616e 6420 454e 440a 7370 6563 6966 7920 and END.specify │ │ │ +00002a00: 7768 6174 2070 6f72 7469 6f6e 206f 6620 what portion of │ │ │ +00002a10: 7468 6520 6669 6c65 2074 6f20 696e 7365 the file to inse │ │ │ +00002a20: 7274 2e0a 4966 2056 4953 4954 2069 7320 rt..If VISIT is │ │ │ +00002a30: 6e6f 6e2d 6e69 6c2c 2053 5441 5254 2061 non-nil, START a │ │ │ +00002a40: 6e64 2045 4e44 206d 7573 7420 6265 206e nd END must be n │ │ │ +00002a50: 696c 2e0a 4966 206f 7074 696f 6e61 6c20 il..If optional │ │ │ +00002a60: 6669 6674 6820 6172 6775 6d65 6e74 2052 fifth argument R │ │ │ +00002a70: 4550 4c41 4345 2069 7320 6e6f 6e2d 6e69 EPLACE is non-ni │ │ │ +00002a80: 6c2c 0a69 7420 6d65 616e 7320 7265 706c l,.it means repl │ │ │ +00002a90: 6163 6520 7468 6520 6375 7272 656e 7420 ace the current │ │ │ +00002aa0: 6275 6666 6572 2063 6f6e 7465 6e74 7320 buffer contents │ │ │ +00002ab0: 2869 6e20 7468 6520 6163 6365 7373 6962 (in the accessib │ │ │ +00002ac0: 6c65 2070 6f72 7469 6f6e 290a 7769 7468 le portion).with │ │ │ +00002ad0: 2074 6865 2066 696c 6520 636f 6e74 656e the file conten │ │ │ +00002ae0: 7473 2e20 2054 6869 7320 6973 2062 6574 ts. This is bet │ │ │ +00002af0: 7465 7220 7468 616e 2073 696d 706c 7920 ter than simply │ │ │ +00002b00: 6465 6c65 7469 6e67 2061 6e64 2069 6e73 deleting and ins │ │ │ +00002b10: 6572 7469 6e67 0a74 6865 2077 686f 6c65 erting.the whole │ │ │ +00002b20: 2074 6869 6e67 2062 6563 6175 7365 2028 thing because ( │ │ │ +00002b30: 3129 2069 7420 7072 6573 6572 7665 7320 1) it preserves │ │ │ +00002b40: 736f 6d65 206d 6172 6b65 7220 706f 7369 some marker posi │ │ │ +00002b50: 7469 6f6e 730a 616e 6420 2832 2920 6974 tions.and (2) it │ │ │ +00002b60: 2070 7574 7320 6c65 7373 2064 6174 6120 puts less data │ │ │ +00002b70: 696e 2074 6865 2075 6e64 6f20 6c69 7374 in the undo list │ │ │ +00002b80: 2e0a 0a54 6865 2063 6f64 696e 6720 7379 ...The coding sy │ │ │ +00002b90: 7374 656d 2075 7365 6420 666f 7220 6465 stem used for de │ │ │ +00002ba0: 636f 6469 6e67 2074 6865 2066 696c 6520 coding the file │ │ │ +00002bb0: 6973 2064 6574 6572 6d69 6e65 6420 6173 is determined as │ │ │ +00002bc0: 2066 6f6c 6c6f 7773 3a0a 0a31 2e20 6063 follows:..1. `c │ │ │ +00002bd0: 6f64 696e 672d 7379 7374 656d 2d66 6f72 oding-system-for │ │ │ +00002be0: 2d72 6561 6427 2c20 6966 206e 6f6e 2d6e -read', if non-n │ │ │ +00002bf0: 696c 2e0a 322e 2054 6865 2072 6573 756c il..2. The resul │ │ │ +00002c00: 7420 6f66 2060 696e 7365 7274 2d66 696c t of `insert-fil │ │ │ +00002c10: 652d 636f 6e74 656e 7473 2d70 7265 2d68 e-contents-pre-h │ │ │ +00002c20: 6f6f 6b27 2c20 6966 206e 6f6e 2d6e 696c ook', if non-nil │ │ │ +00002c30: 2e0a 332e 2054 6865 206d 6174 6368 696e ..3. The matchin │ │ │ +00002c40: 6720 7661 6c75 6520 666f 7220 7468 6973 g value for this │ │ │ +00002c50: 2066 696c 656e 616d 6520 6672 6f6d 0a20 filename from. │ │ │ +00002c60: 2020 6066 696c 652d 636f 6469 6e67 2d73 `file-coding-s │ │ │ +00002c70: 7973 7465 6d2d 616c 6973 7427 2c20 6966 ystem-alist', if │ │ │ +00002c80: 2061 6e79 2e0a 342e 2060 6275 6666 6572 any..4. `buffer │ │ │ +00002c90: 2d66 696c 652d 636f 6469 6e67 2d73 7973 -file-coding-sys │ │ │ +00002ca0: 7465 6d2d 666f 722d 7265 6164 272c 2069 tem-for-read', i │ │ │ +00002cb0: 6620 6e6f 6e2d 6e69 6c2e 0a35 2e20 5468 f non-nil..5. Th │ │ │ +00002cc0: 6520 636f 6469 6e67 2073 7973 7465 6d20 e coding system │ │ │ +00002cd0: 2772 6177 2d74 6578 742e 0a0a 4966 2061 'raw-text...If a │ │ │ +00002ce0: 206c 6f63 616c 2076 616c 7565 2066 6f72 local value for │ │ │ +00002cf0: 2060 6275 6666 6572 2d66 696c 652d 636f `buffer-file-co │ │ │ +00002d00: 6469 6e67 2d73 7973 7465 6d27 2069 6e20 ding-system' in │ │ │ +00002d10: 7468 6520 6375 7272 656e 7420 6275 6666 the current buff │ │ │ +00002d20: 6572 0a64 6f65 7320 6e6f 7420 6578 6973 er.does not exis │ │ │ +00002d30: 742c 2069 7420 6973 2073 6574 2074 6f20 t, it is set to │ │ │ +00002d40: 7468 6520 636f 6469 6e67 2073 7973 7465 the coding syste │ │ │ +00002d50: 6d20 7768 6963 6820 7761 7320 6163 7475 m which was actu │ │ │ +00002d60: 616c 6c79 2075 7365 640a 666f 7220 7265 ally used.for re │ │ │ +00002d70: 6164 696e 672e 0a0a 5365 6520 616c 736f ading...See also │ │ │ +00002d80: 2060 696e 7365 7274 2d66 696c 652d 636f `insert-file-co │ │ │ +00002d90: 6e74 656e 7473 2d61 6363 6573 732d 686f ntents-access-ho │ │ │ +00002da0: 6f6b 272c 0a60 696e 7365 7274 2d66 696c ok',.`insert-fil │ │ │ +00002db0: 652d 636f 6e74 656e 7473 2d70 7265 2d68 e-contents-pre-h │ │ │ +00002dc0: 6f6f 6b27 2c20 6069 6e73 6572 742d 6669 ook', `insert-fi │ │ │ +00002dd0: 6c65 2d63 6f6e 7465 6e74 732d 6572 726f le-contents-erro │ │ │ +00002de0: 722d 686f 6f6b 272c 0a61 6e64 2060 696e r-hook',.and `in │ │ │ +00002df0: 7365 7274 2d66 696c 652d 636f 6e74 656e sert-file-conten │ │ │ +00002e00: 7473 2d70 6f73 742d 686f 6f6b 272e 1f0a ts-post-hook'... │ │ │ +00002e10: 2864 6566 616c 6961 7320 2769 6e73 6572 (defalias 'inser │ │ │ +00002e20: 742d 6669 6c65 2d63 6f6e 7465 6e74 7320 t-file-contents │ │ │ +00002e30: 235b 2866 696c 656e 616d 6520 266f 7074 #[(filename &opt │ │ │ +00002e40: 696f 6e61 6c20 7669 7369 7420 7374 6172 ional visit star │ │ │ +00002e50: 7420 656e 6420 7265 706c 6163 6529 2022 t end replace) " │ │ │ +00002e60: c609 2118 c708 c85c 2289 1e1d ab90 0e1d ..!....\"....... │ │ │ +00002e70: c809 0e1e 0e20 0e21 0e5c 2226 06aa f4c9 ..... .!.\"&.... │ │ │ +00002e80: 8989 1e1f 1d1c cacb cc8f 880e 1f15 cd0d ................ │ │ │ +00002e90: ce5c 22cf 201b 1a0b 600c 4140 5c5c c993 .\". ...`.A@\\.. │ │ │ +00002ea0: 885c 6eab 9fd0 8e8a c91e 23d1 5c6e 21d2 .\n.......#.\n!. │ │ │ +00002eb0: 59ab 895c 6e60 d30b 215c 2288 aa88 5c6e Y..\n`..!\"...\n │ │ │ +00002ec0: d30b 2160 5a21 882b 0c41 d30b 2160 5aa0 ..!`Z!.+.A..!`Z. │ │ │ +00002ed0: 882a d4d5 090e 1e0c 24ac 98d6 d770 5c22 .*......$....p\" │ │ │ +00002ee0: ab8d d8d9 0e17 da0d 215c 22db 5c22 88aa ........!\".\".. │ │ │ +00002ef0: 85d8 0ddb 5c22 88dc 0d21 1624 0c2b 2a87 ....\"...!.$.+*. │ │ │ +00002f00: 2220 5b65 7870 616e 6465 6420 6669 6c65 " [expanded file │ │ │ +00002f10: 6e61 6d65 2066 756e 6320 656e 646d 6172 name func endmar │ │ │ +00002f20: 6b20 7265 7475 726e 2d76 616c 2063 6f64 k return-val cod │ │ │ +00002f30: 696e 672d 7379 7374 656d 2073 7562 7374 ing-system subst │ │ │ +00002f40: 6974 7574 652d 696e 2d66 696c 652d 6e61 itute-in-file-na │ │ │ +00002f50: 6d65 2066 696e 642d 6669 6c65 2d6e 616d me find-file-nam │ │ │ +00002f60: 652d 6861 6e64 6c65 7220 696e 7365 7274 e-handler insert │ │ │ +00002f70: 2d66 696c 652d 636f 6e74 656e 7473 206e -file-contents n │ │ │ +00002f80: 696c 2065 7272 2028 6279 7465 2d63 6f64 il err (byte-cod │ │ │ +00002f90: 6520 22c6 c70c 0b23 8809 ae90 c8c9 0c0b e "....#........ │ │ │ +00002fa0: 23ae 89ca 0c21 ae84 08ae 81cb 8915 3aab #....!........:. │ │ │ +00002fb0: 840d 12aa 9ccc 0d21 ac89 cdc5 cecf 0d24 .......!.......$ │ │ │ +00002fc0: 88d0 15d1 0c0b 0e13 0e14 0e15 0dd2 2607 ..............&. │ │ │ +00002fd0: 12c6 8722 205b 6275 6666 6572 2d66 696c ..." [buffer-fil │ │ │ +00002fe0: 652d 636f 6469 6e67 2d73 7973 7465 6d2d e-coding-system- │ │ │ +00002ff0: 666f 722d 7265 6164 2063 6f64 696e 672d for-read coding- │ │ │ +00003000: 7379 7374 656d 2d66 6f72 2d72 6561 6420 system-for-read │ │ │ +00003010: 7265 7475 726e 2d76 616c 2076 6973 6974 return-val visit │ │ │ +00003020: 2066 696c 656e 616d 6520 636f 6469 6e67 filename coding │ │ │ +00003030: 2d73 7973 7465 6d20 7275 6e2d 686f 6f6b -system run-hook │ │ │ +00003040: 2d77 6974 682d 6172 6773 2069 6e73 6572 -with-args inser │ │ │ +00003050: 742d 6669 6c65 2d63 6f6e 7465 6e74 732d t-file-contents- │ │ │ +00003060: 6163 6365 7373 2d68 6f6f 6b20 7275 6e2d access-hook run- │ │ │ +00003070: 686f 6f6b 2d77 6974 682d 6172 6773 2d75 hook-with-args-u │ │ │ +00003080: 6e74 696c 2d73 7563 6365 7373 2069 6e73 ntil-success ins │ │ │ +00003090: 6572 742d 6669 6c65 2d63 6f6e 7465 6e74 ert-file-content │ │ │ +000030a0: 732d 7072 652d 686f 6f6b 2066 696e 642d s-pre-hook find- │ │ │ +000030b0: 6669 6c65 2d63 6f64 696e 672d 7379 7374 file-coding-syst │ │ │ +000030c0: 656d 2d66 6f72 2d72 6561 642d 6672 6f6d em-for-read-from │ │ │ +000030d0: 2d66 696c 656e 616d 6520 7261 772d 7465 -filename raw-te │ │ │ +000030e0: 7874 2066 696e 642d 636f 6469 6e67 2d73 xt find-coding-s │ │ │ +000030f0: 7973 7465 6d20 6c77 6172 6e20 6e6f 7469 ystem lwarn noti │ │ │ +00003100: 6365 2022 496e 7661 6c69 6420 636f 6469 ce "Invalid codi │ │ │ +00003110: 6e67 2d73 7973 7465 6d20 2825 7329 2c20 ng-system (%s), │ │ │ +00003120: 7573 696e 6720 2775 6e64 6563 6964 6564 using 'undecided │ │ │ +00003130: 2220 756e 6465 6369 6465 6420 696e 7365 " undecided inse │ │ │ +00003140: 7274 2d66 696c 652d 636f 6e74 656e 7473 rt-file-contents │ │ │ +00003150: 2d69 6e74 6572 6e61 6c20 7573 6564 2d63 -internal used-c │ │ │ +00003160: 6f64 6573 7973 2073 7461 7274 2065 6e64 odesys start end │ │ │ +00003170: 2072 6570 6c61 6365 5d20 3929 2028 2866 replace] 9) ((f │ │ │ +00003180: 696c 652d 6572 726f 7220 2862 7974 652d ile-error (byte- │ │ │ +00003190: 636f 6465 2022 c3c4 0908 5c6e 2488 c55c code "....\n$..\ │ │ │ +000031a0: 6e40 5c6e 415c 2287 2220 5b76 6973 6974 n@\nA\"." [visit │ │ │ +000031b0: 2066 696c 656e 616d 6520 6572 7220 7275 filename err ru │ │ │ +000031c0: 6e2d 686f 6f6b 2d77 6974 682d 6172 6773 n-hook-with-args │ │ │ +000031d0: 2069 6e73 6572 742d 6669 6c65 2d63 6f6e insert-file-con │ │ │ +000031e0: 7465 6e74 732d 6572 726f 722d 686f 6f6b tents-error-hook │ │ │ +000031f0: 2073 6967 6e61 6c5d 2035 2929 2920 636f signal] 5))) co │ │ │ +00003200: 6469 6e67 2d73 7973 7465 6d2d 7072 6f70 ding-system-prop │ │ │ +00003210: 6572 7479 2070 6f73 742d 7265 6164 2d63 erty post-read-c │ │ │ +00003220: 6f6e 7665 7273 696f 6e20 6d61 6b65 2d6d onversion make-m │ │ │ +00003230: 6172 6b65 7220 2828 6279 7465 2d63 6f64 arker ((byte-cod │ │ │ +00003240: 6520 2208 ab87 c120 88c2 c321 88c3 8722 e ".... ...!..." │ │ │ +00003250: 205b 7669 7369 7420 7365 742d 6275 6666 [visit set-buff │ │ │ +00003260: 6572 2d61 7574 6f2d 7361 7665 6420 7365 er-auto-saved se │ │ │ +00003270: 742d 6275 6666 6572 2d6d 6f64 6966 6965 t-buffer-modifie │ │ │ +00003280: 642d 7020 6e69 6c5d 2032 2929 2066 756e d-p nil] 2)) fun │ │ │ +00003290: 6374 696f 6e2d 6d61 782d 6172 6773 2032 ction-max-args 2 │ │ │ +000032a0: 206d 6172 6b65 722d 706f 7369 7469 6f6e marker-position │ │ │ +000032b0: 2072 756e 2d68 6f6f 6b2d 7769 7468 2d61 run-hook-with-a │ │ │ +000032c0: 7267 732d 756e 7469 6c2d 7375 6363 6573 rgs-until-succes │ │ │ +000032d0: 7320 696e 7365 7274 2d66 696c 652d 636f s insert-file-co │ │ │ +000032e0: 6e74 656e 7473 2d70 6f73 742d 686f 6f6b ntents-post-hook │ │ │ +000032f0: 206c 6f63 616c 2d76 6172 6961 626c 652d local-variable- │ │ │ +00003300: 7020 6275 6666 6572 2d66 696c 652d 636f p buffer-file-co │ │ │ +00003310: 6469 6e67 2d73 7973 7465 6d20 7365 742d ding-system set- │ │ │ +00003320: 6275 6666 6572 2d66 696c 652d 636f 6469 buffer-file-codi │ │ │ +00003330: 6e67 2d73 7973 7465 6d20 7375 6273 6964 ng-system subsid │ │ │ +00003340: 6961 7279 2d63 6f64 696e 672d 7379 7374 iary-coding-syst │ │ │ +00003350: 656d 2063 6f64 696e 672d 7379 7374 656d em coding-system │ │ │ +00003360: 2d65 6f6c 2d74 7970 6520 7420 6765 742d -eol-type t get- │ │ │ +00003370: 636f 6469 6e67 2d73 7973 7465 6d20 6861 coding-system ha │ │ │ +00003380: 6e64 6c65 7220 7669 7369 7420 7573 6564 ndler visit used │ │ │ +00003390: 2d63 6f64 6573 7973 2073 7461 7274 2065 -codesys start e │ │ │ +000033a0: 6e64 2072 6570 6c61 6365 2062 7566 6665 nd replace buffe │ │ │ +000033b0: 722d 7265 6164 2d6f 6e6c 7920 6275 6666 r-read-only buff │ │ │ +000033c0: 6572 2d66 696c 652d 636f 6469 6e67 2d73 er-file-coding-s │ │ │ +000033d0: 7973 7465 6d2d 7768 656e 2d6c 6f61 6465 ystem-when-loade │ │ │ +000033e0: 645d 2038 2028 2324 202e 2031 3033 3534 d] 8 (#$ . 10354 │ │ │ +000033f0: 295d 290a 2340 3736 3420 4120 7370 6563 )]).#@764 A spec │ │ │ +00003400: 6961 6c20 686f 6f6b 2074 6f20 6465 6369 ial hook to deci │ │ │ +00003410: 6465 2074 6865 2063 6f64 696e 6720 7379 de the coding sy │ │ │ +00003420: 7374 656d 2075 7365 6420 666f 7220 7772 stem used for wr │ │ │ +00003430: 6974 696e 6720 6f75 7420 6120 6669 6c65 iting out a file │ │ │ +00003440: 2e0a 0a42 6566 6f72 6520 7772 6974 696e ...Before writin │ │ │ +00003450: 6720 6120 6669 6c65 2c20 6077 7269 7465 g a file, `write │ │ │ +00003460: 2d72 6567 696f 6e27 2063 616c 6c73 2074 -region' calls t │ │ │ +00003470: 6865 2066 756e 6374 696f 6e73 206f 6e20 he functions on │ │ │ +00003480: 7468 6973 2068 6f6f 6b20 7769 7468 0a61 this hook with.a │ │ │ +00003490: 7267 756d 656e 7473 2053 5441 5254 2c20 rguments START, │ │ │ +000034a0: 454e 442c 2046 494c 454e 414d 452c 2041 END, FILENAME, A │ │ │ +000034b0: 5050 454e 442c 2056 4953 4954 2c20 4c4f PPEND, VISIT, LO │ │ │ +000034c0: 434b 4e41 4d45 2061 6e64 2043 4f44 494e CKNAME and CODIN │ │ │ +000034d0: 472d 5359 5354 454d 2c0a 7468 6520 7361 G-SYSTEM,.the sa │ │ │ +000034e0: 6d65 2061 7320 7468 6520 636f 7272 6573 me as the corres │ │ │ +000034f0: 706f 6e64 696e 6720 6172 6775 6d65 6e74 ponding argument │ │ │ +00003500: 7320 696e 2074 6865 2063 616c 6c20 746f s in the call to │ │ │ +00003510: 2060 7772 6974 652d 7265 6769 6f6e 272e `write-region'. │ │ │ +00003520: 0a0a 5468 6520 7265 7475 726e 2076 616c ..The return val │ │ │ +00003530: 7565 206f 6620 6561 6368 2066 756e 6374 ue of each funct │ │ │ +00003540: 696f 6e20 7368 6f75 6c64 2062 6520 6f6e ion should be on │ │ │ +00003550: 6520 6f66 0a0a 2d2d 206e 696c 0a2d 2d20 e of..-- nil.-- │ │ │ +00003560: 4120 636f 6469 6e67 2073 7973 7465 6d20 A coding system │ │ │ +00003570: 6f72 2061 2073 796d 626f 6c20 6465 6e6f or a symbol deno │ │ │ +00003580: 7469 6e67 2069 742c 2069 6e64 6963 6174 ting it, indicat │ │ │ +00003590: 696e 6720 7468 6520 636f 6469 6e67 2073 ing the coding s │ │ │ +000035a0: 7973 7465 6d0a 2020 2074 6f20 6265 2075 ystem. to be u │ │ │ +000035b0: 7365 6420 666f 7220 7772 6974 696e 6720 sed for writing │ │ │ +000035c0: 7468 6520 6669 6c65 0a2d 2d20 4120 6c69 the file.-- A li │ │ │ +000035d0: 7374 206f 6620 7477 6f20 656c 656d 656e st of two elemen │ │ │ +000035e0: 7473 2028 6162 736f 6c75 7465 2070 6174 ts (absolute pat │ │ │ +000035f0: 686e 616d 6520 616e 6420 6c65 6e67 7468 hname and length │ │ │ +00003600: 206f 6620 6461 7461 2077 7269 7474 656e of data written │ │ │ +00003610: 292c 0a20 2020 7768 6963 6820 6973 2075 ),. which is u │ │ │ +00003620: 7365 6420 6173 2074 6865 2072 6574 7572 sed as the retur │ │ │ +00003630: 6e20 7661 6c75 6520 746f 2060 7772 6974 n value to `writ │ │ │ +00003640: 652d 7265 6769 6f6e 272e 2020 496e 2074 e-region'. In t │ │ │ +00003650: 6869 7320 6361 7365 2c0a 2020 2060 7772 his case,. `wr │ │ │ +00003660: 6974 652d 7265 6769 6f6e 2720 6173 7375 ite-region' assu │ │ │ +00003670: 6d65 7320 7468 6174 2074 6865 2066 756e mes that the fun │ │ │ +00003680: 6374 696f 6e20 6861 7320 7772 6974 7465 ction has writte │ │ │ +00003690: 6e20 7468 6520 6669 6c65 2061 6e64 0a20 n the file and. │ │ │ +000036a0: 2020 7265 7475 726e 732e 0a0a 4966 2061 returns...If a │ │ │ +000036b0: 6e79 2066 756e 6374 696f 6e20 7265 7475 ny function retu │ │ │ +000036c0: 726e 7320 6e6f 6e2d 6e69 6c2c 2074 6865 rns non-nil, the │ │ │ +000036d0: 2072 656d 6169 6e69 6e67 2066 756e 6374 remaining funct │ │ │ +000036e0: 696f 6e73 2061 7265 206e 6f74 2063 616c ions are not cal │ │ │ +000036f0: 6c65 642e 1f0a 2864 6566 7661 7220 7772 led...(defvar wr │ │ │ +00003700: 6974 652d 7265 6769 6f6e 2d70 7265 2d68 ite-region-pre-h │ │ │ +00003710: 6f6f 6b20 6e69 6c20 2823 2420 2e20 3133 ook nil (#$ . 13 │ │ │ +00003720: 3330 3629 290a 2340 3235 3920 4120 686f 306)).#@259 A ho │ │ │ +00003730: 6f6b 2063 616c 6c65 6420 6279 2060 7772 ok called by `wr │ │ │ +00003740: 6974 652d 7265 6769 6f6e 2720 6166 7465 ite-region' afte │ │ │ +00003750: 7220 6120 6669 6c65 2068 6173 2062 6565 r a file has bee │ │ │ +00003760: 6e20 7772 6974 7465 6e20 6f75 742e 0a0a n written out... │ │ │ +00003770: 5468 6520 6675 6e63 7469 6f6e 7320 6f6e The functions on │ │ │ +00003780: 2074 6869 7320 686f 6f6b 2061 7265 2063 this hook are c │ │ │ +00003790: 616c 6c65 6420 7769 7468 2061 7267 756d alled with argum │ │ │ +000037a0: 656e 7473 2053 5441 5254 2c20 454e 442c ents START, END, │ │ │ +000037b0: 0a46 494c 454e 414d 452c 2041 5050 454e .FILENAME, APPEN │ │ │ +000037c0: 442c 2056 4953 4954 2c20 4c4f 434b 4e41 D, VISIT, LOCKNA │ │ │ +000037d0: 4d45 2c20 616e 6420 434f 4449 4e47 2d53 ME, and CODING-S │ │ │ +000037e0: 5953 5445 4d2c 2074 6865 2073 616d 6520 YSTEM, the same │ │ │ +000037f0: 6173 2074 6865 0a63 6f72 7265 7370 6f6e as the.correspon │ │ │ +00003800: 6469 6e67 2061 7267 756d 656e 7473 2069 ding arguments i │ │ │ +00003810: 6e20 7468 6520 6361 6c6c 2074 6f20 6077 n the call to `w │ │ │ +00003820: 7269 7465 2d72 6567 696f 6e27 2e1f 0a28 rite-region'...( │ │ │ +00003830: 6465 6676 6172 2077 7269 7465 2d72 6567 defvar write-reg │ │ │ +00003840: 696f 6e2d 706f 7374 2d68 6f6f 6b20 6e69 ion-post-hook ni │ │ │ +00003850: 6c20 2823 2420 2e20 3134 3132 3429 290a l (#$ . 14124)). │ │ │ +00003860: 2340 3133 3931 2057 7269 7465 2063 7572 #@1391 Write cur │ │ │ +00003870: 7265 6e74 2072 6567 696f 6e20 696e 746f rent region into │ │ │ +00003880: 2073 7065 6369 6669 6564 2066 696c 652e specified file. │ │ │ +00003890: 0a42 7920 6465 6661 756c 7420 7468 6520 .By default the │ │ │ +000038a0: 6669 6c65 2773 2065 7869 7374 696e 6720 file's existing │ │ │ +000038b0: 636f 6e74 656e 7473 2061 7265 2072 6570 contents are rep │ │ │ +000038c0: 6c61 6365 6420 6279 2074 6865 2073 7065 laced by the spe │ │ │ +000038d0: 6369 6669 6564 2072 6567 696f 6e2e 0a43 cified region..C │ │ │ +000038e0: 616c 6c65 6420 696e 7465 7261 6374 6976 alled interactiv │ │ │ +000038f0: 656c 792c 2070 726f 6d70 7473 2066 6f72 ely, prompts for │ │ │ +00003900: 2061 2066 696c 6520 6e61 6d65 2e20 2057 a file name. W │ │ │ +00003910: 6974 6820 6120 7072 6566 6978 2061 7267 ith a prefix arg │ │ │ +00003920: 2c20 7072 6f6d 7074 730a 666f 7220 6120 , prompts.for a │ │ │ +00003930: 636f 6469 6e67 2073 7973 7465 6d20 6173 coding system as │ │ │ +00003940: 2077 656c 6c2e 0a0a 5768 656e 2063 616c well...When cal │ │ │ +00003950: 6c65 6420 6672 6f6d 2061 2070 726f 6772 led from a progr │ │ │ +00003960: 616d 2c20 7461 6b65 7320 7468 7265 6520 am, takes three │ │ │ +00003970: 7265 7175 6972 6564 2061 7267 756d 656e required argumen │ │ │ +00003980: 7473 3a0a 5354 4152 542c 2045 4e44 2061 ts:.START, END a │ │ │ +00003990: 6e64 2046 494c 454e 414d 452e 2020 5354 nd FILENAME. ST │ │ │ +000039a0: 4152 5420 616e 6420 454e 4420 6172 6520 ART and END are │ │ │ +000039b0: 6275 6666 6572 2070 6f73 6974 696f 6e73 buffer positions │ │ │ +000039c0: 2e0a 4f70 7469 6f6e 616c 2066 6f75 7274 ..Optional fourt │ │ │ +000039d0: 6820 6172 6775 6d65 6e74 2041 5050 454e h argument APPEN │ │ │ +000039e0: 4420 6966 206e 6f6e 2d6e 696c 206d 6561 D if non-nil mea │ │ │ +000039f0: 6e73 0a20 2061 7070 656e 6420 746f 2065 ns. append to e │ │ │ +00003a00: 7869 7374 696e 6720 6669 6c65 2063 6f6e xisting file con │ │ │ +00003a10: 7465 6e74 7320 2869 6620 616e 7929 2e0a tents (if any).. │ │ │ +00003a20: 4f70 7469 6f6e 616c 2066 6966 7468 2061 Optional fifth a │ │ │ +00003a30: 7267 756d 656e 7420 5649 5349 5420 6966 rgument VISIT if │ │ │ +00003a40: 2074 206d 6561 6e73 0a20 2073 6574 206c t means. set l │ │ │ +00003a50: 6173 742d 7361 7665 2d66 696c 652d 6d6f ast-save-file-mo │ │ │ +00003a60: 6474 696d 6520 6f66 2062 7566 6665 7220 dtime of buffer │ │ │ +00003a70: 746f 2074 6869 7320 6669 6c65 2773 206d to this file's m │ │ │ +00003a80: 6f64 7469 6d65 0a20 2061 6e64 206d 6172 odtime. and mar │ │ │ +00003a90: 6b20 6275 6666 6572 206e 6f74 206d 6f64 k buffer not mod │ │ │ +00003aa0: 6966 6965 642e 0a49 6620 5649 5349 5420 ified..If VISIT │ │ │ +00003ab0: 6973 2061 2073 7472 696e 672c 2069 7420 is a string, it │ │ │ +00003ac0: 6973 2061 2073 6563 6f6e 6420 6669 6c65 is a second file │ │ │ +00003ad0: 206e 616d 653b 0a20 2074 6865 206f 7574 name;. the out │ │ │ +00003ae0: 7075 7420 676f 6573 2074 6f20 4649 4c45 put goes to FILE │ │ │ +00003af0: 4e41 4d45 2c20 6275 7420 7468 6520 6275 NAME, but the bu │ │ │ +00003b00: 6666 6572 2069 7320 6d61 726b 6564 2061 ffer is marked a │ │ │ +00003b10: 7320 7669 7369 7469 6e67 2056 4953 4954 s visiting VISIT │ │ │ +00003b20: 2e0a 2020 5649 5349 5420 6973 2061 6c73 .. VISIT is als │ │ │ +00003b30: 6f20 7468 6520 6669 6c65 206e 616d 6520 o the file name │ │ │ +00003b40: 746f 206c 6f63 6b20 616e 6420 756e 6c6f to lock and unlo │ │ │ +00003b50: 636b 2066 6f72 2063 6c61 7368 2064 6574 ck for clash det │ │ │ +00003b60: 6563 7469 6f6e 2e0a 4966 2056 4953 4954 ection..If VISIT │ │ │ +00003b70: 2069 7320 6e65 6974 6865 7220 7420 6e6f is neither t no │ │ │ +00003b80: 7220 6e69 6c20 6e6f 7220 6120 7374 7269 r nil nor a stri │ │ │ +00003b90: 6e67 2c0a 2020 7468 6174 206d 6561 6e73 ng,. that means │ │ │ +00003ba0: 2064 6f20 6e6f 7420 7072 696e 7420 7468 do not print th │ │ │ +00003bb0: 6520 2257 726f 7465 2066 696c 6522 206d e "Wrote file" m │ │ │ +00003bc0: 6573 7361 6765 2e0a 5468 6520 6f70 7469 essage..The opti │ │ │ +00003bd0: 6f6e 616c 2073 6978 7468 2061 7267 204c onal sixth arg L │ │ │ +00003be0: 4f43 4b4e 414d 452c 2069 6620 6e6f 6e2d OCKNAME, if non- │ │ │ +00003bf0: 6e69 6c2c 2073 7065 6369 6669 6573 2074 nil, specifies t │ │ │ +00003c00: 6865 206e 616d 6520 746f 0a20 2075 7365 he name to. use │ │ │ +00003c10: 2066 6f72 206c 6f63 6b69 6e67 2061 6e64 for locking and │ │ │ +00003c20: 2075 6e6c 6f63 6b69 6e67 2c20 6f76 6572 unlocking, over │ │ │ +00003c30: 7269 6469 6e67 2046 494c 454e 414d 4520 riding FILENAME │ │ │ +00003c40: 616e 6420 5649 5349 542e 0a4b 6c75 6467 and VISIT..Kludg │ │ │ +00003c50: 7920 6665 6174 7572 653a 2069 6620 5354 y feature: if ST │ │ │ +00003c60: 4152 5420 6973 2061 2073 7472 696e 672c ART is a string, │ │ │ +00003c70: 2074 6865 6e20 7468 6174 2073 7472 696e then that strin │ │ │ +00003c80: 6720 6973 2077 7269 7474 656e 0a74 6f20 g is written.to │ │ │ +00003c90: 7468 6520 6669 6c65 2c20 696e 7374 6561 the file, instea │ │ │ +00003ca0: 6420 6f66 2061 6e79 2062 7566 6665 7220 d of any buffer │ │ │ +00003cb0: 636f 6e74 656e 7473 2c20 616e 6420 454e contents, and EN │ │ │ +00003cc0: 4420 6973 2069 676e 6f72 6564 2e0a 4f70 D is ignored..Op │ │ │ +00003cd0: 7469 6f6e 616c 2073 6576 656e 7468 2061 tional seventh a │ │ │ +00003ce0: 7267 756d 656e 7420 434f 4449 4e47 2d53 rgument CODING-S │ │ │ +00003cf0: 5953 5445 4d20 7370 6563 6966 6965 7320 YSTEM specifies │ │ │ +00003d00: 7468 6520 636f 6469 6e67 2073 7973 7465 the coding syste │ │ │ +00003d10: 6d0a 2020 7573 6564 2074 6f20 656e 636f m. used to enco │ │ │ +00003d20: 6465 2074 6865 2074 6578 7420 7768 656e de the text when │ │ │ +00003d30: 2069 7420 6973 2077 7269 7474 656e 206f it is written o │ │ │ +00003d40: 7574 2c20 616e 6420 6465 6661 756c 7473 ut, and defaults │ │ │ +00003d50: 2074 6f0a 2020 7468 6520 7661 6c75 6520 to. the value │ │ │ +00003d60: 6f66 2060 6275 6666 6572 2d66 696c 652d of `buffer-file- │ │ │ +00003d70: 636f 6469 6e67 2d73 7973 7465 6d27 2069 coding-system' i │ │ │ +00003d80: 6e20 7468 6520 6375 7272 656e 7420 6275 n the current bu │ │ │ +00003d90: 6666 6572 2e0a 5365 6520 616c 736f 2060 ffer..See also ` │ │ │ +00003da0: 7772 6974 652d 7265 6769 6f6e 2d70 7265 write-region-pre │ │ │ +00003db0: 2d68 6f6f 6b27 2061 6e64 2060 7772 6974 -hook' and `writ │ │ │ +00003dc0: 652d 7265 6769 6f6e 2d70 6f73 742d 686f e-region-post-ho │ │ │ +00003dd0: 6f6b 272e 1f0a 2864 6566 616c 6961 7320 ok'...(defalias │ │ │ +00003de0: 2777 7269 7465 2d72 6567 696f 6e20 235b 'write-region #[ │ │ │ +00003df0: 2873 7461 7274 2065 6e64 2066 696c 656e (start end filen │ │ │ +00003e00: 616d 6520 266f 7074 696f 6e61 6c20 6170 ame &optional ap │ │ │ +00003e10: 7065 6e64 2076 6973 6974 206c 6f63 6b6e pend visit lockn │ │ │ +00003e20: 616d 6520 636f 6469 6e67 2d73 7973 7465 ame coding-syste │ │ │ +00003e30: 6d29 2022 0e19 ae98 c6c7 5c6e 090c 080b m) "......\n.... │ │ │ +00003e40: 0e15 0d26 08ae 8a0d ae87 0e1a ae83 c80c ...&............ │ │ │ +00003e50: 2189 153a ab82 0d87 c90d ca5c 2289 1e16 !..:.......\"... │ │ │ +00003e60: abb8 70cb cc21 cd20 1e1b 1e17 1e18 ce8e ..p..!. ........ │ │ │ +00003e70: 8a0e 1771 88cf 2088 d00e 185c 6e09 2388 ...q.. ....\n.#. │ │ │ +00003e80: 0e16 6564 5c22 88d1 6564 0c08 0bd2 613f ..ed\"..ed....a? │ │ │ +00003e90: ad81 0b0e 150d 2607 882d aa8c d15c 6e09 ......&..-...\n. │ │ │ +00003ea0: 0c08 0b0e 150d 2607 8829 d3d4 5c6e 090c ......&..)..\n.. │ │ │ +00003eb0: 080b 0e15 0d26 0887 2220 5b61 7070 656e .....&.." [appen │ │ │ +00003ec0: 6420 656e 6420 7374 6172 7420 7669 7369 d end start visi │ │ │ +00003ed0: 7420 6669 6c65 6e61 6d65 2063 6f64 696e t filename codin │ │ │ +00003ee0: 672d 7379 7374 656d 2072 756e 2d68 6f6f g-system run-hoo │ │ │ +00003ef0: 6b2d 7769 7468 2d61 7267 732d 756e 7469 k-with-args-unti │ │ │ +00003f00: 6c2d 7375 6363 6573 7320 7772 6974 652d l-success write- │ │ │ +00003f10: 7265 6769 6f6e 2d70 7265 2d68 6f6f 6b20 region-pre-hook │ │ │ +00003f20: 6669 6e64 2d66 696c 652d 636f 6469 6e67 find-file-coding │ │ │ +00003f30: 2d73 7973 7465 6d2d 666f 722d 7772 6974 -system-for-writ │ │ │ +00003f40: 652d 6672 6f6d 2d66 696c 656e 616d 6520 e-from-filename │ │ │ +00003f50: 636f 6469 6e67 2d73 7973 7465 6d2d 7072 coding-system-pr │ │ │ +00003f60: 6f70 6572 7479 2070 7265 2d77 7269 7465 operty pre-write │ │ │ +00003f70: 2d63 6f6e 7665 7273 696f 6e20 6765 6e65 -conversion gene │ │ │ +00003f80: 7261 7465 2d6e 6577 2d62 7566 6665 7220 rate-new-buffer │ │ │ +00003f90: 2220 2a74 656d 702d 7772 6974 652d 6275 " *temp-write-bu │ │ │ +00003fa0: 6666 6572 2a22 2062 7566 6665 722d 6d6f ffer*" buffer-mo │ │ │ +00003fb0: 6469 6669 6564 2d70 2028 2862 7974 652d dified-p ((byte- │ │ │ +00003fc0: 636f 6465 2022 c35c 6e21 8809 ac83 08ac code ".\n!...... │ │ │ +00003fd0: 8ec4 2088 c5c6 2188 c720 ab83 c820 88c6 .. ...!.. ... .. │ │ │ +00003fe0: 8722 205b 6d6f 6469 6620 7669 7369 7420 ." [modif visit │ │ │ +00003ff0: 7465 6d70 6275 6620 6b69 6c6c 2d62 7566 tempbuf kill-buf │ │ │ +00004000: 6665 7220 7365 742d 6275 6666 6572 2d61 fer set-buffer-a │ │ │ +00004010: 7574 6f2d 7361 7665 6420 7365 742d 6275 uto-saved set-bu │ │ │ +00004020: 6666 6572 2d6d 6f64 6966 6965 642d 7020 ffer-modified-p │ │ │ +00004030: 6e69 6c20 6275 6666 6572 2d66 696c 652d nil buffer-file- │ │ │ +00004040: 6e61 6d65 2073 6574 2d76 6973 6974 6564 name set-visited │ │ │ +00004050: 2d66 696c 652d 6d6f 6474 696d 655d 2032 -file-modtime] 2 │ │ │ +00004060: 2929 2065 7261 7365 2d62 7566 6665 7220 )) erase-buffer │ │ │ +00004070: 696e 7365 7274 2d62 7566 6665 722d 7375 insert-buffer-su │ │ │ +00004080: 6273 7472 696e 6720 7772 6974 652d 7265 bstring write-re │ │ │ +00004090: 6769 6f6e 2d69 6e74 6572 6e61 6c20 7420 gion-internal t │ │ │ +000040a0: 7275 6e2d 686f 6f6b 2d77 6974 682d 6172 run-hook-with-ar │ │ │ +000040b0: 6773 2077 7269 7465 2d72 6567 696f 6e2d gs write-region- │ │ │ +000040c0: 706f 7374 2d68 6f6f 6b20 6c6f 636b 6e61 post-hook lockna │ │ │ +000040d0: 6d65 2066 756e 6320 7465 6d70 6275 6620 me func tempbuf │ │ │ +000040e0: 6375 7262 7566 2063 6f64 696e 672d 7379 curbuf coding-sy │ │ │ +000040f0: 7374 656d 2d66 6f72 2d77 7269 7465 2062 stem-for-write b │ │ │ +00004100: 7566 6665 722d 6669 6c65 2d63 6f64 696e uffer-file-codin │ │ │ +00004110: 672d 7379 7374 656d 206d 6f64 6966 5d20 g-system modif] │ │ │ +00004120: 3130 2028 2324 202e 2031 3434 3339 2920 10 (#$ . 14439) │ │ │ +00004130: 2272 5c6e 4657 7269 7465 2072 6567 696f "r\nFWrite regio │ │ │ +00004140: 6e20 746f 2066 696c 653a 205c 6e69 5c6e n to file: \ni\n │ │ │ +00004150: 695c 6e69 5c6e 5a43 6f64 696e 672d 7379 i\ni\nZCoding-sy │ │ │ +00004160: 7374 656d 3a20 225d 290a stem: "]). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/code-process.elc │ │ │ @@ -1,574 +1,573 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3535 2032 eb 25 01:53:55 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6f64 652d 7072 6f63 6573 732e 656c 0a3b ode-process.el.; │ │ │ -000000a0: 3b3b 2065 6d61 6373 2076 6572 7369 6f6e ;; emacs version │ │ │ -000000b0: 2032 312e 3420 2870 6174 6368 2032 3429 21.4 (patch 24) │ │ │ -000000c0: 2022 5374 616e 6461 7264 2043 2220 5845 "Standard C" XE │ │ │ -000000d0: 6d61 6373 204c 7563 6964 2e0a 3b3b 3b20 macs Lucid..;;; │ │ │ -000000e0: 6279 7465 636f 6d70 2076 6572 7369 6f6e bytecomp version │ │ │ -000000f0: 2032 2e32 3720 5845 6d61 6373 3b20 3230 2.27 XEmacs; 20 │ │ │ -00000100: 3030 2d30 392d 3132 2e0a 3b3b 3b20 6f70 00-09-12..;;; op │ │ │ -00000110: 7469 6d69 7a61 7469 6f6e 2069 7320 6f6e timization is on │ │ │ -00000120: 2e0a 3b3b 3b20 7468 6973 2066 696c 6520 ..;;; this file │ │ │ -00000130: 7573 6573 206f 7063 6f64 6573 2077 6869 uses opcodes whi │ │ │ -00000140: 6368 2064 6f20 6e6f 7420 6578 6973 7420 ch do not exist │ │ │ -00000150: 696e 2045 6d61 6373 2031 392e 0a0a 2869 in Emacs 19...(i │ │ │ -00000160: 6620 2861 6e64 2028 626f 756e 6470 2027 f (and (boundp ' │ │ │ -00000170: 656d 6163 732d 7665 7273 696f 6e29 0a09 emacs-version).. │ │ │ -00000180: 2028 6f72 2028 616e 6420 2862 6f75 6e64 (or (and (bound │ │ │ -00000190: 7020 2765 706f 6368 3a3a 7665 7273 696f p 'epoch::versio │ │ │ -000001a0: 6e29 2065 706f 6368 3a3a 7665 7273 696f n) epoch::versio │ │ │ -000001b0: 6e29 0a09 2020 2020 2028 7374 7269 6e67 n).. (string │ │ │ -000001c0: 2d6c 6573 7370 2065 6d61 6373 2d76 6572 -lessp emacs-ver │ │ │ -000001d0: 7369 6f6e 2022 3230 2229 2929 0a20 2020 sion "20"))). │ │ │ -000001e0: 2028 6572 726f 7220 2260 636f 6465 2d70 (error "`code-p │ │ │ -000001f0: 726f 6365 7373 2e65 6c27 2077 6173 2063 rocess.el' was c │ │ │ -00000200: 6f6d 7069 6c65 6420 666f 7220 456d 6163 ompiled for Emac │ │ │ -00000210: 7320 3230 2229 290a 0a28 6f72 2028 626f s 20"))..(or (bo │ │ │ -00000220: 756e 6470 2027 6375 7272 656e 742d 6c6f undp 'current-lo │ │ │ -00000230: 6164 2d6c 6973 7429 2028 7365 7471 2063 ad-list) (setq c │ │ │ -00000240: 7572 7265 6e74 2d6c 6f61 642d 6c69 7374 urrent-load-list │ │ │ -00000250: 206e 696c 2929 0a0a 0a23 4036 3030 2041 nil))...#@600 A │ │ │ -00000260: 6c69 7374 2074 6f20 6465 6369 6465 2061 list to decide a │ │ │ -00000270: 2063 6f64 696e 6720 7379 7374 656d 2074 coding system t │ │ │ -00000280: 6f20 7573 6520 666f 7220 6120 7072 6f63 o use for a proc │ │ │ -00000290: 6573 7320 492f 4f20 6f70 6572 6174 696f ess I/O operatio │ │ │ -000002a0: 6e2e 0a54 6865 2066 6f72 6d61 7420 6973 n..The format is │ │ │ -000002b0: 2028 2850 4154 5445 524e 202e 2056 414c ((PATTERN . VAL │ │ │ -000002c0: 2920 2e2e 2e29 2c0a 7768 6572 6520 5041 ) ...),.where PA │ │ │ -000002d0: 5454 4552 4e20 6973 2061 2072 6567 756c TTERN is a regul │ │ │ -000002e0: 6172 2065 7870 7265 7373 696f 6e20 6d61 ar expression ma │ │ │ -000002f0: 7463 6869 6e67 2061 2070 726f 6772 616d tching a program │ │ │ -00000300: 206e 616d 652c 0a56 414c 2069 7320 6120 name,.VAL is a │ │ │ -00000310: 636f 6469 6e67 2073 7973 7465 6d2c 2061 coding system, a │ │ │ -00000320: 2063 6f6e 7320 6f66 2063 6f64 696e 6720 cons of coding │ │ │ -00000330: 7379 7374 656d 732c 206f 7220 6120 6675 systems, or a fu │ │ │ -00000340: 6e63 7469 6f6e 2073 796d 626f 6c2e 0a49 nction symbol..I │ │ │ -00000350: 6620 5641 4c20 6973 2061 2063 6f64 696e f VAL is a codin │ │ │ -00000360: 6720 7379 7374 656d 2c20 6974 2069 7320 g system, it is │ │ │ -00000370: 7573 6564 2066 6f72 2062 6f74 6820 6465 used for both de │ │ │ -00000380: 636f 6469 6e67 2077 6861 7420 7265 6365 coding what rece │ │ │ -00000390: 6976 6564 0a66 726f 6d20 7468 6520 7072 ived.from the pr │ │ │ -000003a0: 6f67 7261 6d20 616e 6420 656e 636f 6469 ogram and encodi │ │ │ -000003b0: 6e67 2077 6861 7420 7365 6e74 2074 6f20 ng what sent to │ │ │ -000003c0: 7468 6520 7072 6f67 7261 6d2e 0a49 6620 the program..If │ │ │ -000003d0: 5641 4c20 6973 2061 2063 6f6e 7320 6f66 VAL is a cons of │ │ │ -000003e0: 2063 6f64 696e 6720 7379 7374 656d 732c coding systems, │ │ │ -000003f0: 2074 6865 2063 6172 2070 6172 7420 6973 the car part is │ │ │ -00000400: 2075 7365 6420 666f 7220 6465 636f 6469 used for decodi │ │ │ -00000410: 6e67 2c0a 616e 6420 7468 6520 6364 7220 ng,.and the cdr │ │ │ -00000420: 7061 7274 2069 7320 7573 6564 2066 6f72 part is used for │ │ │ -00000430: 2065 6e63 6f64 696e 672e 0a49 6620 5641 encoding..If VA │ │ │ -00000440: 4c20 6973 2061 2066 756e 6374 696f 6e20 L is a function │ │ │ -00000450: 7379 6d62 6f6c 2c20 7468 6520 6675 6e63 symbol, the func │ │ │ -00000460: 7469 6f6e 206d 7573 7420 7265 7475 726e tion must return │ │ │ -00000470: 2061 2063 6f64 696e 6720 7379 7374 656d a coding system │ │ │ -00000480: 0a6f 7220 6120 636f 6e73 206f 6620 636f .or a cons of co │ │ │ -00000490: 6469 6e67 2073 7973 7465 6d73 2077 6869 ding systems whi │ │ │ -000004a0: 6368 2061 7265 2075 7365 6420 6173 2061 ch are used as a │ │ │ -000004b0: 626f 7665 2e1f 0a28 6465 6676 6172 2070 bove...(defvar p │ │ │ -000004c0: 726f 6365 7373 2d63 6f64 696e 672d 7379 rocess-coding-sy │ │ │ -000004d0: 7374 656d 2d61 6c69 7374 206e 696c 2028 stem-alist nil ( │ │ │ -000004e0: 2324 202e 2036 3037 2929 0a23 4031 3334 #$ . 607)).#@134 │ │ │ -000004f0: 3620 4361 6c6c 2050 524f 4752 414d 2073 6 Call PROGRAM s │ │ │ -00000500: 796e 6368 726f 6e6f 7573 6c79 2069 6e20 ynchronously in │ │ │ -00000510: 7365 7061 7261 7465 2070 726f 6365 7373 separate process │ │ │ -00000520: 2e0a 5468 6520 7072 6f67 7261 6d27 7320 ..The program's │ │ │ -00000530: 696e 7075 7420 636f 6d65 7320 6672 6f6d input comes from │ │ │ -00000540: 2066 696c 6520 494e 4649 4c45 2028 6e69 file INFILE (ni │ │ │ -00000550: 6c20 6d65 616e 7320 602f 6465 762f 6e75 l means `/dev/nu │ │ │ -00000560: 6c6c 2729 2e0a 496e 7365 7274 206f 7574 ll')..Insert out │ │ │ -00000570: 7075 7420 696e 2042 5546 4645 5220 6265 put in BUFFER be │ │ │ -00000580: 666f 7265 2070 6f69 6e74 3b20 7420 6d65 fore point; t me │ │ │ -00000590: 616e 7320 6375 7272 656e 7420 6275 6666 ans current buff │ │ │ -000005a0: 6572 3b0a 206e 696c 2066 6f72 2042 5546 er;. nil for BUF │ │ │ -000005b0: 4645 5220 6d65 616e 7320 6469 7363 6172 FER means discar │ │ │ -000005c0: 6420 6974 3b20 3020 6d65 616e 7320 6469 d it; 0 means di │ │ │ -000005d0: 7363 6172 6420 616e 6420 646f 6e27 7420 scard and don't │ │ │ -000005e0: 7761 6974 2e0a 4966 2042 5546 4645 5220 wait..If BUFFER │ │ │ -000005f0: 6973 2061 2073 7472 696e 672c 2074 6865 is a string, the │ │ │ -00000600: 6e20 6669 6e64 206f 7220 6372 6561 7465 n find or create │ │ │ -00000610: 2061 2062 7566 6665 7220 7769 7468 2074 a buffer with t │ │ │ -00000620: 6861 7420 6e61 6d65 2c0a 7468 656e 2069 hat name,.then i │ │ │ -00000630: 6e73 6572 7420 7468 6520 6f75 7470 7574 nsert the output │ │ │ -00000640: 2069 6e20 7468 6174 2062 7566 6665 722c in that buffer, │ │ │ -00000650: 2062 6566 6f72 6520 706f 696e 742e 0a42 before point..B │ │ │ -00000660: 5546 4645 5220 6361 6e20 616c 736f 2068 UFFER can also h │ │ │ -00000670: 6176 6520 7468 6520 666f 726d 2028 5245 ave the form (RE │ │ │ -00000680: 414c 2d42 5546 4645 5220 5354 4445 5252 AL-BUFFER STDERR │ │ │ -00000690: 2d46 494c 4529 3b20 696e 2074 6861 7420 -FILE); in that │ │ │ -000006a0: 6361 7365 2c0a 5245 414c 2d42 5546 4645 case,.REAL-BUFFE │ │ │ -000006b0: 5220 7361 7973 2077 6861 7420 746f 2064 R says what to d │ │ │ -000006c0: 6f20 7769 7468 2073 7461 6e64 6172 6420 o with standard │ │ │ -000006d0: 6f75 7470 7574 2c20 6173 2061 626f 7665 output, as above │ │ │ -000006e0: 2c0a 7768 696c 6520 5354 4445 5252 2d46 ,.while STDERR-F │ │ │ -000006f0: 494c 4520 7361 7973 2077 6861 7420 746f ILE says what to │ │ │ -00000700: 2064 6f20 7769 7468 2073 7461 6e64 6172 do with standar │ │ │ -00000710: 6420 6572 726f 7220 696e 2074 6865 2063 d error in the c │ │ │ -00000720: 6869 6c64 2e0a 5354 4445 5252 2d46 494c hild..STDERR-FIL │ │ │ -00000730: 4520 6d61 7920 6265 206e 696c 2028 6469 E may be nil (di │ │ │ -00000740: 7363 6172 6420 7374 616e 6461 7264 2065 scard standard e │ │ │ -00000750: 7272 6f72 206f 7574 7075 7429 2c0a 7420 rror output),.t │ │ │ -00000760: 286d 6978 2069 7420 7769 7468 206f 7264 (mix it with ord │ │ │ -00000770: 696e 6172 7920 6f75 7470 7574 292c 206f inary output), o │ │ │ -00000780: 7220 6120 6669 6c65 206e 616d 6520 7374 r a file name st │ │ │ -00000790: 7269 6e67 2e0a 0a46 6f75 7274 6820 6172 ring...Fourth ar │ │ │ -000007a0: 6720 4449 5350 4c41 5950 206e 6f6e 2d6e g DISPLAYP non-n │ │ │ -000007b0: 696c 206d 6561 6e73 2072 6564 6973 706c il means redispl │ │ │ -000007c0: 6179 2062 7566 6665 7220 6173 206f 7574 ay buffer as out │ │ │ -000007d0: 7075 7420 6973 2069 6e73 6572 7465 642e put is inserted. │ │ │ -000007e0: 0a52 656d 6169 6e69 6e67 2061 7267 756d .Remaining argum │ │ │ -000007f0: 656e 7473 2061 7265 2073 7472 696e 6773 ents are strings │ │ │ -00000800: 2070 6173 7365 6420 6173 2063 6f6d 6d61 passed as comma │ │ │ -00000810: 6e64 2061 7267 756d 656e 7473 2074 6f20 nd arguments to │ │ │ -00000820: 5052 4f47 5241 4d2e 0a0a 4966 2042 5546 PROGRAM...If BUF │ │ │ -00000830: 4645 5220 6973 2030 2c20 6063 616c 6c2d FER is 0, `call- │ │ │ -00000840: 7072 6f63 6573 7327 2072 6574 7572 6e73 process' returns │ │ │ -00000850: 2069 6d6d 6564 6961 7465 6c79 2077 6974 immediately wit │ │ │ -00000860: 6820 7661 6c75 6520 6e69 6c2e 0a4f 7468 h value nil..Oth │ │ │ -00000870: 6572 7769 7365 2069 7420 7761 6974 7320 erwise it waits │ │ │ -00000880: 666f 7220 5052 4f47 5241 4d20 746f 2074 for PROGRAM to t │ │ │ -00000890: 6572 6d69 6e61 7465 2061 6e64 2072 6574 erminate and ret │ │ │ -000008a0: 7572 6e73 2061 206e 756d 6572 6963 2065 urns a numeric e │ │ │ -000008b0: 7869 7420 7374 6174 7573 0a20 6f72 2061 xit status. or a │ │ │ -000008c0: 2073 6967 6e61 6c20 6465 7363 7269 7074 signal descript │ │ │ -000008d0: 696f 6e20 7374 7269 6e67 2e0a 4966 2079 ion string..If y │ │ │ -000008e0: 6f75 2071 7569 742c 2074 6865 2070 726f ou quit, the pro │ │ │ -000008f0: 6365 7373 2069 7320 6b69 6c6c 6564 2077 cess is killed w │ │ │ -00000900: 6974 6820 5349 4749 4e54 2c20 6f72 2053 ith SIGINT, or S │ │ │ -00000910: 4947 4b49 4c4c 2069 6620 796f 750a 2071 IGKILL if you. q │ │ │ -00000920: 7569 7420 6167 6169 6e2e 0a0a 436f 6469 uit again...Codi │ │ │ -00000930: 6e67 2073 7973 7465 6d73 2061 7265 2074 ng systems are t │ │ │ -00000940: 616b 656e 2066 726f 6d20 6063 6f64 696e aken from `codin │ │ │ -00000950: 672d 7379 7374 656d 2d66 6f72 2d72 6561 g-system-for-rea │ │ │ -00000960: 6427 2066 6f72 2069 6e70 7574 2061 6e64 d' for input and │ │ │ -00000970: 0a60 636f 6469 6e67 2d73 7973 7465 6d2d .`coding-system- │ │ │ -00000980: 666f 722d 7772 6974 6527 2066 6f72 206f for-write' for o │ │ │ -00000990: 7574 7075 7420 6966 2074 686f 7365 2076 utput if those v │ │ │ -000009a0: 6172 6961 626c 6573 2061 7265 2062 6f75 ariables are bou │ │ │ -000009b0: 6e64 2e0a 4f74 6865 7277 6973 6520 7468 nd..Otherwise th │ │ │ -000009c0: 6579 2061 7265 206c 6f6f 6b65 6420 7570 ey are looked up │ │ │ -000009d0: 2069 6e20 6070 726f 6365 7373 2d63 6f64 in `process-cod │ │ │ -000009e0: 696e 672d 7379 7374 656d 2d61 6c69 7374 ing-system-alist │ │ │ -000009f0: 272e 2020 4966 206e 6f74 0a66 6f75 6e64 '. If not.found │ │ │ -00000a00: 2c20 7468 6579 2064 6566 6175 6c74 2074 , they default t │ │ │ -00000a10: 6f20 606e 696c 2720 666f 7220 626f 7468 o `nil' for both │ │ │ -00000a20: 2069 6e70 7574 2061 6e64 206f 7574 7075 input and outpu │ │ │ -00000a30: 742e 1f0a 2864 6566 616c 6961 7320 2763 t...(defalias 'c │ │ │ -00000a40: 616c 6c2d 7072 6f63 6573 7320 235b 2870 all-process #[(p │ │ │ -00000a50: 726f 6772 616d 2026 6f70 7469 6f6e 616c rogram &optional │ │ │ -00000a60: 2069 6e66 696c 6520 6275 6666 6572 2064 infile buffer d │ │ │ -00000a70: 6973 706c 6179 7020 2672 6573 7420 6172 isplayp &rest ar │ │ │ -00000a80: 6773 2920 220c aea5 c61d c7c8 8d88 c90d gs) "........... │ │ │ -00000a90: 21ab 850d ca0b 5c22 150d 3aab 840d 40aa !.....\"..:...@. │ │ │ -00000aa0: 8c0d ac83 cbaa 86cc 0d21 ad81 0d29 1ccd .........!...).. │ │ │ -00000ab0: ce0b 5c6e 0908 0e0f 2606 2987 2220 5b64 ..\n....&.)." [d │ │ │ -00000ac0: 6973 706c 6179 7020 6275 6666 6572 2069 isplayp buffer i │ │ │ -00000ad0: 6e66 696c 6520 7072 6f67 7261 6d20 636f nfile program co │ │ │ -00000ae0: 6469 6e67 2d73 7973 7465 6d2d 666f 722d ding-system-for- │ │ │ -00000af0: 7265 6164 2072 6574 206e 696c 2066 6f75 read ret nil fou │ │ │ -00000b00: 6e64 2028 6279 7465 2d63 6f64 6520 220b nd (byte-code ". │ │ │ -00000b10: c51a 891c ab97 c60c 4040 095c 22ab 89c7 ........@@.\"... │ │ │ -00000b20: c80c 4041 8910 5c22 880c 4189 14ac 692a ..@A..\"..A...i* │ │ │ -00000b30: c587 2220 5b72 6574 2070 726f 6772 616d .." [ret program │ │ │ -00000b40: 2063 6173 652d 666f 6c64 2d73 6561 7263 case-fold-searc │ │ │ -00000b50: 6820 7072 6f63 6573 732d 636f 6469 6e67 h process-coding │ │ │ -00000b60: 2d73 7973 7465 6d2d 616c 6973 7420 616c -system-alist al │ │ │ -00000b70: 6973 7420 6e69 6c20 7374 7269 6e67 2d6d ist nil string-m │ │ │ -00000b80: 6174 6368 2074 6872 6f77 2066 6f75 6e64 atch throw found │ │ │ -00000b90: 5d20 3529 2066 756e 6374 696f 6e70 2063 ] 5) functionp c │ │ │ -00000ba0: 616c 6c2d 7072 6f63 6573 7320 756e 6465 all-process unde │ │ │ -00000bb0: 6369 6465 6420 6669 6e64 2d63 6f64 696e cided find-codin │ │ │ -00000bc0: 672d 7379 7374 656d 2061 7070 6c79 2063 g-system apply c │ │ │ -00000bd0: 616c 6c2d 7072 6f63 6573 732d 696e 7465 all-process-inte │ │ │ -00000be0: 726e 616c 2061 7267 735d 2037 2028 2324 rnal args] 7 (#$ │ │ │ -00000bf0: 202e 2031 3236 3629 5d29 0a23 4031 3336 . 1266)]).#@136 │ │ │ -00000c00: 3120 5365 6e64 2074 6578 7420 6672 6f6d 1 Send text from │ │ │ -00000c10: 2053 5441 5254 2074 6f20 454e 4420 746f START to END to │ │ │ -00000c20: 2061 2073 796e 6368 726f 6e6f 7573 2070 a synchronous p │ │ │ -00000c30: 726f 6365 7373 2072 756e 6e69 6e67 2050 rocess running P │ │ │ -00000c40: 524f 4752 414d 2e0a 4465 6c65 7465 2074 ROGRAM..Delete t │ │ │ -00000c50: 6865 2074 6578 7420 6966 2066 6f75 7274 he text if fourt │ │ │ -00000c60: 6820 6172 6720 4445 4c45 5445 5020 6973 h arg DELETEP is │ │ │ -00000c70: 206e 6f6e 2d6e 696c 2e0a 0a49 6e73 6572 non-nil...Inser │ │ │ -00000c80: 7420 6f75 7470 7574 2069 6e20 4255 4646 t output in BUFF │ │ │ -00000c90: 4552 2062 6566 6f72 6520 706f 696e 743b ER before point; │ │ │ -00000ca0: 2074 206d 6561 6e73 2063 7572 7265 6e74 t means current │ │ │ -00000cb0: 2062 7566 6665 723b 0a20 6e69 6c20 666f buffer;. nil fo │ │ │ -00000cc0: 7220 4255 4646 4552 206d 6561 6e73 2064 r BUFFER means d │ │ │ -00000cd0: 6973 6361 7264 2069 743b 2030 206d 6561 iscard it; 0 mea │ │ │ -00000ce0: 6e73 2064 6973 6361 7264 2061 6e64 2064 ns discard and d │ │ │ -00000cf0: 6f6e 2774 2077 6169 742e 0a49 6620 4255 on't wait..If BU │ │ │ -00000d00: 4646 4552 2069 7320 6120 7374 7269 6e67 FFER is a string │ │ │ -00000d10: 2c20 7468 656e 2066 696e 6420 6f72 2063 , then find or c │ │ │ -00000d20: 7265 6174 6520 6120 6275 6666 6572 2077 reate a buffer w │ │ │ -00000d30: 6974 6820 7468 6174 206e 616d 652c 0a74 ith that name,.t │ │ │ -00000d40: 6865 6e20 696e 7365 7274 2074 6865 206f hen insert the o │ │ │ -00000d50: 7574 7075 7420 696e 2074 6861 7420 6275 utput in that bu │ │ │ -00000d60: 6666 6572 2c20 6265 666f 7265 2070 6f69 ffer, before poi │ │ │ -00000d70: 6e74 2e0a 4255 4646 4552 2063 616e 2061 nt..BUFFER can a │ │ │ -00000d80: 6c73 6f20 6861 7665 2074 6865 2066 6f72 lso have the for │ │ │ -00000d90: 6d20 2852 4541 4c2d 4255 4646 4552 2053 m (REAL-BUFFER S │ │ │ -00000da0: 5444 4552 522d 4649 4c45 293b 2069 6e20 TDERR-FILE); in │ │ │ -00000db0: 7468 6174 2063 6173 652c 0a52 4541 4c2d that case,.REAL- │ │ │ -00000dc0: 4255 4646 4552 2073 6179 7320 7768 6174 BUFFER says what │ │ │ -00000dd0: 2074 6f20 646f 2077 6974 6820 7374 616e to do with stan │ │ │ -00000de0: 6461 7264 206f 7574 7075 742c 2061 7320 dard output, as │ │ │ -00000df0: 6162 6f76 652c 0a77 6869 6c65 2053 5444 above,.while STD │ │ │ -00000e00: 4552 522d 4649 4c45 2073 6179 7320 7768 ERR-FILE says wh │ │ │ -00000e10: 6174 2074 6f20 646f 2077 6974 6820 7374 at to do with st │ │ │ -00000e20: 616e 6461 7264 2065 7272 6f72 2069 6e20 andard error in │ │ │ -00000e30: 7468 6520 6368 696c 642e 0a53 5444 4552 the child..STDER │ │ │ -00000e40: 522d 4649 4c45 206d 6179 2062 6520 6e69 R-FILE may be ni │ │ │ -00000e50: 6c20 2864 6973 6361 7264 2073 7461 6e64 l (discard stand │ │ │ -00000e60: 6172 6420 6572 726f 7220 6f75 7470 7574 ard error output │ │ │ -00000e70: 292c 0a74 2028 6d69 7820 6974 2077 6974 ),.t (mix it wit │ │ │ -00000e80: 6820 6f72 6469 6e61 7279 206f 7574 7075 h ordinary outpu │ │ │ -00000e90: 7429 2c20 6f72 2061 2066 696c 6520 6e61 t), or a file na │ │ │ -00000ea0: 6d65 2073 7472 696e 672e 0a0a 5369 7874 me string...Sixt │ │ │ -00000eb0: 6820 6172 6720 4449 5350 4c41 5950 206e h arg DISPLAYP n │ │ │ -00000ec0: 6f6e 2d6e 696c 206d 6561 6e73 2072 6564 on-nil means red │ │ │ -00000ed0: 6973 706c 6179 2062 7566 6665 7220 6173 isplay buffer as │ │ │ -00000ee0: 206f 7574 7075 7420 6973 2069 6e73 6572 output is inser │ │ │ -00000ef0: 7465 642e 0a52 656d 6169 6e69 6e67 2061 ted..Remaining a │ │ │ -00000f00: 7267 7320 6172 6520 7061 7373 6564 2074 rgs are passed t │ │ │ -00000f10: 6f20 5052 4f47 5241 4d20 6174 2073 7461 o PROGRAM at sta │ │ │ -00000f20: 7274 7570 2061 7320 636f 6d6d 616e 6420 rtup as command │ │ │ -00000f30: 6172 6773 2e0a 0a49 6620 4255 4646 4552 args...If BUFFER │ │ │ -00000f40: 2069 7320 302c 2072 6574 7572 6e73 2069 is 0, returns i │ │ │ -00000f50: 6d6d 6564 6961 7465 6c79 2077 6974 6820 mmediately with │ │ │ -00000f60: 7661 6c75 6520 6e69 6c2e 0a4f 7468 6572 value nil..Other │ │ │ -00000f70: 7769 7365 2077 6169 7473 2066 6f72 2050 wise waits for P │ │ │ -00000f80: 524f 4752 414d 2074 6f20 7465 726d 696e ROGRAM to termin │ │ │ -00000f90: 6174 650a 616e 6420 7265 7475 726e 7320 ate.and returns │ │ │ -00000fa0: 6120 6e75 6d65 7269 6320 6578 6974 2073 a numeric exit s │ │ │ -00000fb0: 7461 7475 7320 6f72 2061 2073 6967 6e61 tatus or a signa │ │ │ -00000fc0: 6c20 6465 7363 7269 7074 696f 6e20 7374 l description st │ │ │ -00000fd0: 7269 6e67 2e0a 4966 2079 6f75 2071 7569 ring..If you qui │ │ │ -00000fe0: 742c 2074 6865 2070 726f 6365 7373 2069 t, the process i │ │ │ -00000ff0: 7320 6669 7273 7420 6b69 6c6c 6564 2077 s first killed w │ │ │ -00001000: 6974 6820 5349 4749 4e54 2c20 7468 656e ith SIGINT, then │ │ │ -00001010: 2077 6974 6820 5349 474b 494c 4c20 6966 with SIGKILL if │ │ │ -00001020: 0a79 6f75 2071 7569 7420 6167 6169 6e20 .you quit again │ │ │ -00001030: 6265 666f 7265 2074 6865 2070 726f 6365 before the proce │ │ │ -00001040: 7373 2065 7869 7473 2e0a 0a43 6f64 696e ss exits...Codin │ │ │ -00001050: 6720 7379 7374 656d 7320 6172 6520 7461 g systems are ta │ │ │ -00001060: 6b65 6e20 6672 6f6d 2060 636f 6469 6e67 ken from `coding │ │ │ -00001070: 2d73 7973 7465 6d2d 666f 722d 7265 6164 -system-for-read │ │ │ -00001080: 2720 666f 7220 696e 7075 7420 616e 640a ' for input and. │ │ │ -00001090: 6063 6f64 696e 672d 7379 7374 656d 2d66 `coding-system-f │ │ │ -000010a0: 6f72 2d77 7269 7465 2720 666f 7220 6f75 or-write' for ou │ │ │ -000010b0: 7470 7574 2069 6620 7468 6f73 6520 7661 tput if those va │ │ │ -000010c0: 7269 6162 6c65 7320 6172 6520 626f 756e riables are boun │ │ │ -000010d0: 642e 0a4f 7468 6572 7769 7365 2074 6865 d..Otherwise the │ │ │ -000010e0: 7920 6172 6520 6c6f 6f6b 6564 2075 7020 y are looked up │ │ │ -000010f0: 696e 2060 7072 6f63 6573 732d 636f 6469 in `process-codi │ │ │ -00001100: 6e67 2d73 7973 7465 6d2d 616c 6973 7427 ng-system-alist' │ │ │ -00001110: 2e20 2049 6620 6e6f 740a 666f 756e 642c . If not.found, │ │ │ -00001120: 2074 6865 7920 6465 6661 756c 7420 746f they default to │ │ │ -00001130: 2060 6e69 6c27 2066 6f72 2062 6f74 6820 `nil' for both │ │ │ -00001140: 696e 7075 7420 616e 6420 6f75 7470 7574 input and output │ │ │ -00001150: 2e1f 0a28 6465 6661 6c69 6173 2027 6361 ...(defalias 'ca │ │ │ -00001160: 6c6c 2d70 726f 6365 7373 2d72 6567 696f ll-process-regio │ │ │ -00001170: 6e20 235b 2873 7461 7274 2065 6e64 2070 n #[(start end p │ │ │ -00001180: 726f 6772 616d 2026 6f70 7469 6f6e 616c rogram &optional │ │ │ -00001190: 2064 656c 6574 6570 2062 7566 6665 7220 deletep buffer │ │ │ -000011a0: 6469 7370 6c61 7970 2026 7265 7374 2061 displayp &rest a │ │ │ -000011b0: 7267 7329 2022 c6c7 c820 21c9 5021 1aca rgs) "... !.P!.. │ │ │ -000011c0: 8ecb 891c 1bcb 1dcc cd8d 88ce 0d21 ab85 .............!.. │ │ │ -000011d0: 0dcf 095c 2215 0d3a ab88 0d40 130d 4114 ...\"..:...@..A. │ │ │ -000011e0: aa92 0dac 8608 1308 14aa 89d0 0d21 ab84 .............!.. │ │ │ -000011f0: 0d13 0d14 290e 15ae 810b 0e16 ae81 0c1e ....)........... │ │ │ -00001200: 161e 15d1 0e17 0e18 5c6e cbd2 2588 0e19 ........\n..%... │ │ │ -00001210: ab86 0e17 0e18 7c88 d3d4 095c 6e0e 1a0e ......|....\n... │ │ │ -00001220: 1b0e 1c26 062e 0687 2220 5b62 7566 6665 ...&...." [buffe │ │ │ -00001230: 722d 6669 6c65 2d63 6f64 696e 672d 7379 r-file-coding-sy │ │ │ -00001240: 7374 656d 2070 726f 6772 616d 2074 656d stem program tem │ │ │ -00001250: 7020 6373 2d72 2063 732d 7720 7265 7420 p cs-r cs-w ret │ │ │ -00001260: 6d61 6b65 2d74 656d 702d 6e61 6d65 2066 make-temp-name f │ │ │ -00001270: 696c 652d 6e61 6d65 2d61 732d 6469 7265 ile-name-as-dire │ │ │ -00001280: 6374 6f72 7920 7465 6d70 2d64 6972 6563 ctory temp-direc │ │ │ -00001290: 746f 7279 2022 656d 6163 7322 2028 2862 tory "emacs" ((b │ │ │ -000012a0: 7974 652d 636f 6465 2022 c0c1 c28f 8722 yte-code "....." │ │ │ -000012b0: 205b 6e69 6c20 2864 656c 6574 652d 6669 [nil (delete-fi │ │ │ -000012c0: 6c65 2074 656d 7029 2028 2866 696c 652d le temp) ((file- │ │ │ -000012d0: 6572 726f 7229 295d 2033 2929 206e 696c error))] 3)) nil │ │ │ -000012e0: 2066 6f75 6e64 2028 6279 7465 2d63 6f64 found (byte-cod │ │ │ -000012f0: 6520 220b c51a 891c ab97 c60c 4040 095c e ".........@@.\ │ │ │ -00001300: 22ab 89c7 c80c 4041 8910 5c22 880c 4189 ".....@A..\"..A. │ │ │ -00001310: 14ac 692a c587 2220 5b72 6574 2070 726f ..i*.." [ret pro │ │ │ -00001320: 6772 616d 2063 6173 652d 666f 6c64 2d73 gram case-fold-s │ │ │ -00001330: 6561 7263 6820 7072 6f63 6573 732d 636f earch process-co │ │ │ -00001340: 6469 6e67 2d73 7973 7465 6d2d 616c 6973 ding-system-alis │ │ │ -00001350: 7420 616c 6973 7420 6e69 6c20 7374 7269 t alist nil stri │ │ │ -00001360: 6e67 2d6d 6174 6368 2074 6872 6f77 2066 ng-match throw f │ │ │ -00001370: 6f75 6e64 5d20 3529 2066 756e 6374 696f ound] 5) functio │ │ │ -00001380: 6e70 2063 616c 6c2d 7072 6f63 6573 732d np call-process- │ │ │ -00001390: 7265 6769 6f6e 2066 696e 642d 636f 6469 region find-codi │ │ │ -000013a0: 6e67 2d73 7973 7465 6d20 7772 6974 652d ng-system write- │ │ │ -000013b0: 7265 6769 6f6e 2073 696c 656e 7420 6170 region silent ap │ │ │ -000013c0: 706c 7920 6361 6c6c 2d70 726f 6365 7373 ply call-process │ │ │ -000013d0: 2063 6f64 696e 672d 7379 7374 656d 2d66 coding-system-f │ │ │ -000013e0: 6f72 2d72 6561 6420 636f 6469 6e67 2d73 or-read coding-s │ │ │ -000013f0: 7973 7465 6d2d 666f 722d 7772 6974 6520 ystem-for-write │ │ │ -00001400: 7374 6172 7420 656e 6420 6465 6c65 7465 start end delete │ │ │ -00001410: 7020 6275 6666 6572 2064 6973 706c 6179 p buffer display │ │ │ -00001420: 7020 6172 6773 5d20 3720 2823 2420 2e20 p args] 7 (#$ . │ │ │ -00001430: 3330 3734 295d 290a 2340 3838 3020 5374 3074)]).#@880 St │ │ │ -00001440: 6172 7420 6120 7072 6f67 7261 6d20 696e art a program in │ │ │ -00001450: 2061 2073 7562 7072 6f63 6573 732e 2020 a subprocess. │ │ │ -00001460: 5265 7475 726e 2074 6865 2070 726f 6365 Return the proce │ │ │ -00001470: 7373 206f 626a 6563 7420 666f 7220 6974 ss object for it │ │ │ -00001480: 2e0a 4172 6773 2061 7265 204e 414d 4520 ..Args are NAME │ │ │ -00001490: 4255 4646 4552 2050 524f 4752 414d 2026 BUFFER PROGRAM & │ │ │ -000014a0: 7265 7374 2050 524f 4752 414d 2d41 5247 rest PROGRAM-ARG │ │ │ -000014b0: 530a 4e41 4d45 2069 7320 6e61 6d65 2066 S.NAME is name f │ │ │ -000014c0: 6f72 2070 726f 6365 7373 2e20 2049 7420 or process. It │ │ │ -000014d0: 6973 206d 6f64 6966 6965 6420 6966 206e is modified if n │ │ │ -000014e0: 6563 6573 7361 7279 2074 6f20 6d61 6b65 ecessary to make │ │ │ -000014f0: 2069 7420 756e 6971 7565 2e0a 4255 4646 it unique..BUFF │ │ │ -00001500: 4552 2069 7320 7468 6520 6275 6666 6572 ER is the buffer │ │ │ -00001510: 206f 7220 2862 7566 6665 722d 6e61 6d65 or (buffer-name │ │ │ -00001520: 2920 746f 2061 7373 6f63 6961 7465 2077 ) to associate w │ │ │ -00001530: 6974 6820 7468 6520 7072 6f63 6573 732e ith the process. │ │ │ -00001540: 0a50 726f 6365 7373 206f 7574 7075 7420 .Process output │ │ │ -00001550: 676f 6573 2061 7420 656e 6420 6f66 2074 goes at end of t │ │ │ -00001560: 6861 7420 6275 6666 6572 2c20 756e 6c65 hat buffer, unle │ │ │ -00001570: 7373 2079 6f75 2073 7065 6369 6679 0a61 ss you specify.a │ │ │ -00001580: 6e20 6f75 7470 7574 2073 7472 6561 6d20 n output stream │ │ │ -00001590: 6f72 2066 696c 7465 7220 6675 6e63 7469 or filter functi │ │ │ -000015a0: 6f6e 2074 6f20 6861 6e64 6c65 2074 6865 on to handle the │ │ │ -000015b0: 206f 7574 7075 742e 0a42 5546 4645 5220 output..BUFFER │ │ │ -000015c0: 6d61 7920 616c 736f 2062 6520 6e69 6c2c may also be nil, │ │ │ -000015d0: 206d 6561 6e69 6e67 2074 6861 7420 7468 meaning that th │ │ │ -000015e0: 6973 2070 726f 6365 7373 2069 7320 6e6f is process is no │ │ │ -000015f0: 7420 6173 736f 6369 6174 6564 0a77 6974 t associated.wit │ │ │ -00001600: 6820 616e 7920 6275 6666 6572 2e0a 5468 h any buffer..Th │ │ │ -00001610: 6972 6420 6172 6720 6973 2070 726f 6772 ird arg is progr │ │ │ -00001620: 616d 2066 696c 6520 6e61 6d65 2e20 2049 am file name. I │ │ │ -00001630: 7420 6973 2073 6561 7263 6865 6420 666f t is searched fo │ │ │ -00001640: 7220 6173 2069 6e20 7468 6520 7368 656c r as in the shel │ │ │ -00001650: 6c2e 0a52 656d 6169 6e69 6e67 2061 7267 l..Remaining arg │ │ │ -00001660: 756d 656e 7473 2061 7265 2073 7472 696e uments are strin │ │ │ -00001670: 6773 2074 6f20 6769 7665 2070 726f 6772 gs to give progr │ │ │ -00001680: 616d 2061 7320 6172 6775 6d65 6e74 732e am as arguments. │ │ │ -00001690: 0a0a 436f 6469 6e67 2073 7973 7465 6d73 ..Coding systems │ │ │ -000016a0: 2061 7265 2074 616b 656e 2066 726f 6d20 are taken from │ │ │ -000016b0: 6063 6f64 696e 672d 7379 7374 656d 2d66 `coding-system-f │ │ │ -000016c0: 6f72 2d72 6561 6427 2066 6f72 2069 6e70 or-read' for inp │ │ │ -000016d0: 7574 2061 6e64 0a60 636f 6469 6e67 2d73 ut and.`coding-s │ │ │ -000016e0: 7973 7465 6d2d 666f 722d 7772 6974 6527 ystem-for-write' │ │ │ -000016f0: 2066 6f72 206f 7574 7075 7420 6966 2074 for output if t │ │ │ -00001700: 686f 7365 2076 6172 6961 626c 6573 2061 hose variables a │ │ │ -00001710: 7265 2062 6f75 6e64 2e0a 4f74 6865 7277 re bound..Otherw │ │ │ -00001720: 6973 6520 7468 6579 2061 7265 206c 6f6f ise they are loo │ │ │ -00001730: 6b65 6420 7570 2069 6e20 6070 726f 6365 ked up in `proce │ │ │ -00001740: 7373 2d63 6f64 696e 672d 7379 7374 656d ss-coding-system │ │ │ -00001750: 2d61 6c69 7374 272e 2020 4966 206e 6f74 -alist'. If not │ │ │ -00001760: 0a66 6f75 6e64 2c20 7468 6579 2064 6566 .found, they def │ │ │ -00001770: 6175 6c74 2074 6f20 6075 6e64 6563 6964 ault to `undecid │ │ │ -00001780: 6564 2720 666f 7220 696e 7075 7420 616e ed' for input an │ │ │ -00001790: 6420 606e 696c 2720 2862 696e 6172 7929 d `nil' (binary) │ │ │ -000017a0: 2066 6f72 0a6f 7574 7075 742e 1f0a 2864 for.output...(d │ │ │ -000017b0: 6566 616c 6961 7320 2773 7461 7274 2d70 efalias 'start-p │ │ │ -000017c0: 726f 6365 7373 2023 5b28 6e61 6d65 2062 rocess #[(name b │ │ │ -000017d0: 7566 6665 7220 7072 6f67 7261 6d20 2672 uffer program &r │ │ │ -000017e0: 6573 7420 7072 6f67 7261 6d2d 6172 6773 est program-args │ │ │ -000017f0: 2920 22c6 891c 1bc6 1dc7 c88d 88c9 0d21 ) "............! │ │ │ -00001800: ab85 0dca 5c6e 5c22 150d 3aab 880d 4013 ....\n\"..:...@. │ │ │ -00001810: 0d41 14aa 89cb 0d21 ab84 0d13 0d14 2909 .A.....!......). │ │ │ -00001820: ae84 0bae 81cc 08ae 810c 1819 cdce 0e0f ................ │ │ │ -00001830: 0e10 5c6e 0e11 252c 8722 205b 636f 6469 ..\n..%,." [codi │ │ │ -00001840: 6e67 2d73 7973 7465 6d2d 666f 722d 7772 ng-system-for-wr │ │ │ -00001850: 6974 6520 636f 6469 6e67 2d73 7973 7465 ite coding-syste │ │ │ -00001860: 6d2d 666f 722d 7265 6164 2070 726f 6772 m-for-read progr │ │ │ -00001870: 616d 2063 732d 7220 6373 2d77 2072 6574 am cs-r cs-w ret │ │ │ -00001880: 206e 696c 2066 6f75 6e64 2028 6279 7465 nil found (byte │ │ │ -00001890: 2d63 6f64 6520 220b c51a 891c ab97 c60c -code "......... │ │ │ -000018a0: 4040 095c 22ab 89c7 c80c 4041 8910 5c22 @@.\".....@A..\" │ │ │ -000018b0: 880c 4189 14ac 692a c587 2220 5b72 6574 ..A...i*.." [ret │ │ │ -000018c0: 2070 726f 6772 616d 2063 6173 652d 666f program case-fo │ │ │ -000018d0: 6c64 2d73 6561 7263 6820 7072 6f63 6573 ld-search proces │ │ │ -000018e0: 732d 636f 6469 6e67 2d73 7973 7465 6d2d s-coding-system- │ │ │ -000018f0: 616c 6973 7420 616c 6973 7420 6e69 6c20 alist alist nil │ │ │ -00001900: 7374 7269 6e67 2d6d 6174 6368 2074 6872 string-match thr │ │ │ -00001910: 6f77 2066 6f75 6e64 5d20 3529 2066 756e ow found] 5) fun │ │ │ -00001920: 6374 696f 6e70 2073 7461 7274 2d70 726f ctionp start-pro │ │ │ -00001930: 6365 7373 2066 696e 642d 636f 6469 6e67 cess find-coding │ │ │ -00001940: 2d73 7973 7465 6d20 756e 6465 6369 6465 -system undecide │ │ │ -00001950: 6420 6170 706c 7920 7374 6172 742d 7072 d apply start-pr │ │ │ -00001960: 6f63 6573 732d 696e 7465 726e 616c 206e ocess-internal n │ │ │ -00001970: 616d 6520 6275 6666 6572 2070 726f 6772 ame buffer progr │ │ │ -00001980: 616d 2d61 7267 735d 2036 2028 2324 202e am-args] 6 (#$ . │ │ │ -00001990: 2035 3138 3229 5d29 0a23 4037 3131 2041 5182)]).#@711 A │ │ │ -000019a0: 6c69 7374 2074 6f20 6465 6369 6465 2061 list to decide a │ │ │ -000019b0: 2063 6f64 696e 6720 7379 7374 656d 2074 coding system t │ │ │ -000019c0: 6f20 7573 6520 666f 7220 6120 6e65 7477 o use for a netw │ │ │ -000019d0: 6f72 6b20 492f 4f20 6f70 6572 6174 696f ork I/O operatio │ │ │ -000019e0: 6e2e 0a54 6865 2066 6f72 6d61 7420 6973 n..The format is │ │ │ -000019f0: 2028 2850 4154 5445 524e 202e 2056 414c ((PATTERN . VAL │ │ │ -00001a00: 2920 2e2e 2e29 2c0a 7768 6572 6520 5041 ) ...),.where PA │ │ │ -00001a10: 5454 4552 4e20 6973 2061 2072 6567 756c TTERN is a regul │ │ │ -00001a20: 6172 2065 7870 7265 7373 696f 6e20 6d61 ar expression ma │ │ │ -00001a30: 7463 6869 6e67 2061 206e 6574 776f 726b tching a network │ │ │ -00001a40: 2073 6572 7669 6365 206e 616d 650a 6f72 service name.or │ │ │ -00001a50: 2069 7320 6120 706f 7274 206e 756d 6265 is a port numbe │ │ │ -00001a60: 7220 746f 2063 6f6e 6e65 6374 2074 6f2c r to connect to, │ │ │ -00001a70: 0a56 414c 2069 7320 6120 636f 6469 6e67 .VAL is a coding │ │ │ -00001a80: 2073 7973 7465 6d2c 2061 2063 6f6e 7320 system, a cons │ │ │ -00001a90: 6f66 2063 6f64 696e 6720 7379 7374 656d of coding system │ │ │ -00001aa0: 732c 206f 7220 6120 6675 6e63 7469 6f6e s, or a function │ │ │ -00001ab0: 2073 796d 626f 6c2e 0a49 6620 5641 4c20 symbol..If VAL │ │ │ -00001ac0: 6973 2061 2063 6f64 696e 6720 7379 7374 is a coding syst │ │ │ -00001ad0: 656d 2c20 6974 2069 7320 7573 6564 2066 em, it is used f │ │ │ -00001ae0: 6f72 2062 6f74 6820 6465 636f 6469 6e67 or both decoding │ │ │ -00001af0: 2077 6861 7420 7265 6365 6976 6564 0a66 what received.f │ │ │ -00001b00: 726f 6d20 7468 6520 6e65 7477 6f72 6b20 rom the network │ │ │ -00001b10: 7374 7265 616d 2061 6e64 2065 6e63 6f64 stream and encod │ │ │ -00001b20: 696e 6720 7768 6174 2073 656e 7420 746f ing what sent to │ │ │ -00001b30: 2074 6865 206e 6574 776f 726b 2073 7472 the network str │ │ │ -00001b40: 6561 6d2e 0a49 6620 5641 4c20 6973 2061 eam..If VAL is a │ │ │ -00001b50: 2063 6f6e 7320 6f66 2063 6f64 696e 6720 cons of coding │ │ │ -00001b60: 7379 7374 656d 732c 2074 6865 2063 6172 systems, the car │ │ │ -00001b70: 2070 6172 7420 6973 2075 7365 6420 666f part is used fo │ │ │ -00001b80: 7220 6465 636f 6469 6e67 2c0a 616e 6420 r decoding,.and │ │ │ -00001b90: 7468 6520 6364 7220 7061 7274 2069 7320 the cdr part is │ │ │ -00001ba0: 7573 6564 2066 6f72 2065 6e63 6f64 696e used for encodin │ │ │ -00001bb0: 672e 0a49 6620 5641 4c20 6973 2061 2066 g..If VAL is a f │ │ │ -00001bc0: 756e 6374 696f 6e20 7379 6d62 6f6c 2c20 unction symbol, │ │ │ -00001bd0: 7468 6520 6675 6e63 7469 6f6e 206d 7573 the function mus │ │ │ -00001be0: 7420 7265 7475 726e 2061 2063 6f64 696e t return a codin │ │ │ -00001bf0: 6720 7379 7374 656d 0a6f 7220 6120 636f g system.or a co │ │ │ -00001c00: 6e73 206f 6620 636f 6469 6e67 2073 7973 ns of coding sys │ │ │ -00001c10: 7465 6d73 2077 6869 6368 2061 7265 2075 tems which are u │ │ │ -00001c20: 7365 6420 6173 2061 626f 7665 2e0a 0a53 sed as above...S │ │ │ -00001c30: 6565 2061 6c73 6f20 7468 6520 6675 6e63 ee also the func │ │ │ -00001c40: 7469 6f6e 2060 6669 6e64 2d6f 7065 7261 tion `find-opera │ │ │ -00001c50: 7469 6f6e 2d63 6f64 696e 672d 7379 7374 tion-coding-syst │ │ │ -00001c60: 656d 272e 1f0a 2864 6566 7661 7220 6e65 em'...(defvar ne │ │ │ -00001c70: 7477 6f72 6b2d 636f 6469 6e67 2d73 7973 twork-coding-sys │ │ │ -00001c80: 7465 6d2d 616c 6973 7420 6e69 6c20 2823 tem-alist nil (# │ │ │ -00001c90: 2420 2e20 3635 3539 2929 0a23 4031 3238 $ . 6559)).#@128 │ │ │ -00001ca0: 3420 4f70 656e 2061 2054 4350 2063 6f6e 4 Open a TCP con │ │ │ -00001cb0: 6e65 6374 696f 6e20 666f 7220 6120 7365 nection for a se │ │ │ -00001cc0: 7276 6963 6520 746f 2061 2068 6f73 742e rvice to a host. │ │ │ -00001cd0: 0a52 6574 7572 6e20 6120 7072 6f63 6573 .Return a proces │ │ │ -00001ce0: 7320 6f62 6a65 6374 2074 6f20 7265 7072 s object to repr │ │ │ -00001cf0: 6573 656e 7420 7468 6520 636f 6e6e 6563 esent the connec │ │ │ -00001d00: 7469 6f6e 2e0a 496e 7075 7420 616e 6420 tion..Input and │ │ │ -00001d10: 6f75 7470 7574 2077 6f72 6b20 6173 2066 output work as f │ │ │ -00001d20: 6f72 2073 7562 7072 6f63 6573 7365 733b or subprocesses; │ │ │ -00001d30: 2060 6465 6c65 7465 2d70 726f 6365 7373 `delete-process │ │ │ -00001d40: 2720 636c 6f73 6573 2069 742e 0a41 7267 ' closes it..Arg │ │ │ -00001d50: 7320 6172 6520 4e41 4d45 2042 5546 4645 s are NAME BUFFE │ │ │ -00001d60: 5220 484f 5354 2053 4552 5649 4345 2e0a R HOST SERVICE.. │ │ │ -00001d70: 4e41 4d45 2069 7320 6e61 6d65 2066 6f72 NAME is name for │ │ │ -00001d80: 2070 726f 6365 7373 2e20 2049 7420 6973 process. It is │ │ │ -00001d90: 206d 6f64 6966 6965 6420 6966 206e 6563 modified if nec │ │ │ -00001da0: 6573 7361 7279 2074 6f20 6d61 6b65 2069 essary to make i │ │ │ -00001db0: 7420 756e 6971 7565 2e0a 4255 4646 4552 t unique..BUFFER │ │ │ -00001dc0: 2069 7320 7468 6520 6275 6666 6572 2028 is the buffer ( │ │ │ -00001dd0: 6f72 2062 7566 6665 722d 6e61 6d65 2920 or buffer-name) │ │ │ -00001de0: 746f 2061 7373 6f63 6961 7465 2077 6974 to associate wit │ │ │ -00001df0: 6820 7468 6520 7072 6f63 6573 732e 0a20 h the process.. │ │ │ -00001e00: 5072 6f63 6573 7320 6f75 7470 7574 2067 Process output g │ │ │ -00001e10: 6f65 7320 6174 2065 6e64 206f 6620 7468 oes at end of th │ │ │ -00001e20: 6174 2062 7566 6665 722c 2075 6e6c 6573 at buffer, unles │ │ │ -00001e30: 7320 796f 7520 7370 6563 6966 790a 2061 s you specify. a │ │ │ -00001e40: 6e20 6f75 7470 7574 2073 7472 6561 6d20 n output stream │ │ │ -00001e50: 6f72 2066 696c 7465 7220 6675 6e63 7469 or filter functi │ │ │ -00001e60: 6f6e 2074 6f20 6861 6e64 6c65 2074 6865 on to handle the │ │ │ -00001e70: 206f 7574 7075 742e 0a20 4255 4646 4552 output.. BUFFER │ │ │ -00001e80: 206d 6179 2062 6520 616c 736f 206e 696c may be also nil │ │ │ -00001e90: 2c20 6d65 616e 696e 6720 7468 6174 2074 , meaning that t │ │ │ -00001ea0: 6869 7320 7072 6f63 6573 7320 6973 206e his process is n │ │ │ -00001eb0: 6f74 2061 7373 6f63 6961 7465 640a 2077 ot associated. w │ │ │ -00001ec0: 6974 6820 616e 7920 6275 6666 6572 0a54 ith any buffer.T │ │ │ -00001ed0: 6869 7264 2061 7267 2069 7320 6e61 6d65 hird arg is name │ │ │ -00001ee0: 206f 6620 7468 6520 686f 7374 2074 6f20 of the host to │ │ │ -00001ef0: 636f 6e6e 6563 7420 746f 2c20 6f72 2069 connect to, or i │ │ │ -00001f00: 7473 2049 5020 6164 6472 6573 732e 0a46 ts IP address..F │ │ │ -00001f10: 6f75 7274 6820 6172 6720 5345 5256 4943 ourth arg SERVIC │ │ │ -00001f20: 4520 6973 206e 616d 6520 6f66 2074 6865 E is name of the │ │ │ -00001f30: 2073 6572 7669 6365 2064 6573 6972 6564 service desired │ │ │ -00001f40: 2c20 6f72 2061 6e20 696e 7465 6765 720a , or an integer. │ │ │ -00001f50: 2073 7065 6369 6679 696e 6720 6120 706f specifying a po │ │ │ -00001f60: 7274 206e 756d 6265 7220 746f 2063 6f6e rt number to con │ │ │ -00001f70: 6e65 6374 2074 6f2e 0a46 6966 7468 2061 nect to..Fifth a │ │ │ -00001f80: 7267 756d 656e 7420 5052 4f54 4f43 4f4c rgument PROTOCOL │ │ │ -00001f90: 2069 7320 6120 6e65 7477 6f72 6b20 7072 is a network pr │ │ │ -00001fa0: 6f74 6f63 6f6c 2e20 2043 7572 7265 6e74 otocol. Current │ │ │ -00001fb0: 6c79 2027 7463 700a 2028 5472 616e 736d ly 'tcp. (Transm │ │ │ -00001fc0: 6973 7369 6f6e 2043 6f6e 7472 6f6c 2050 ission Control P │ │ │ -00001fd0: 726f 746f 636f 6c29 2061 6e64 2027 7564 rotocol) and 'ud │ │ │ -00001fe0: 7020 2855 7365 7220 4461 7461 6772 616d p (User Datagram │ │ │ -00001ff0: 2050 726f 746f 636f 6c29 2061 7265 0a20 Protocol) are. │ │ │ -00002000: 7375 7070 6f72 7465 642e 2020 5768 656e supported. When │ │ │ -00002010: 206f 6d69 7474 6564 2c20 2774 6370 2069 omitted, 'tcp i │ │ │ -00002020: 7320 6173 7375 6d65 642e 0a0a 4f75 7470 s assumed...Outp │ │ │ -00002030: 7574 2076 6961 2060 7072 6f63 6573 732d ut via `process- │ │ │ -00002040: 7365 6e64 2d73 7472 696e 6727 2061 6e64 send-string' and │ │ │ -00002050: 2069 6e70 7574 2076 6961 2062 7566 6665 input via buffe │ │ │ -00002060: 7220 6f72 2066 696c 7465 7220 2873 6565 r or filter (see │ │ │ -00002070: 0a60 7365 742d 7072 6f63 6573 732d 6669 .`set-process-fi │ │ │ -00002080: 6c74 6572 2729 2061 7265 2073 7472 6561 lter') are strea │ │ │ -00002090: 6d2d 6f72 6965 6e74 6564 2e20 2054 6861 m-oriented. Tha │ │ │ -000020a0: 7420 6d65 616e 7320 5544 5020 6461 7461 t means UDP data │ │ │ -000020b0: 6772 616d 7320 6172 650a 6e6f 7420 6775 grams are.not gu │ │ │ -000020c0: 6172 616e 7465 6564 2074 6f20 6265 2073 aranteed to be s │ │ │ -000020d0: 656e 7420 616e 6420 7265 6365 6976 6564 ent and received │ │ │ -000020e0: 2069 6e20 6469 7363 7265 7465 2070 6163 in discrete pac │ │ │ -000020f0: 6b65 7473 2e20 2842 7574 2073 6d61 6c6c kets. (But small │ │ │ -00002100: 0a64 6174 6167 7261 6d73 2061 726f 756e .datagrams aroun │ │ │ -00002110: 6420 3530 3020 6279 7465 7320 7468 6174 d 500 bytes that │ │ │ -00002120: 2061 7265 206e 6f74 2074 7275 6e63 6174 are not truncat │ │ │ -00002130: 6564 2062 7920 6070 726f 6365 7373 2d73 ed by `process-s │ │ │ -00002140: 656e 642d 7374 7269 6e67 270a 6172 6520 end-string'.are │ │ │ -00002150: 7573 7561 6c6c 7920 6669 6e65 2e29 2020 usually fine.) │ │ │ -00002160: 4e6f 7465 2066 7572 7468 6572 2074 6861 Note further tha │ │ │ -00002170: 7420 5544 5020 7072 6f74 6f63 6f6c 2064 t UDP protocol d │ │ │ -00002180: 6f65 7320 6e6f 7420 6775 6172 6420 6167 oes not guard ag │ │ │ -00002190: 6169 6e73 7420 0a6c 6f73 7420 7061 636b ainst .lost pack │ │ │ -000021a0: 6574 732e 1f0a 2864 6566 616c 6961 7320 ets...(defalias │ │ │ -000021b0: 276f 7065 6e2d 6e65 7477 6f72 6b2d 7374 'open-network-st │ │ │ -000021c0: 7265 616d 2023 5b28 6e61 6d65 2062 7566 ream #[(name buf │ │ │ -000021d0: 6665 7220 686f 7374 2073 6572 7669 6365 fer host service │ │ │ -000021e0: 2026 6f70 7469 6f6e 616c 2070 726f 746f &optional proto │ │ │ -000021f0: 636f 6c29 2022 c689 1c1b c61d c7c8 8d88 col) ".......... │ │ │ -00002200: c90d 21ab 850d ca5c 6e5c 2215 0d3a ab88 ..!....\n\"..:.. │ │ │ -00002210: 0d40 130d 4114 aa89 cb0d 21ab 840d 130d .@..A.....!..... │ │ │ -00002220: 1429 09ae 810b 08ae 810c 1819 cc0e 0d0e .).............. │ │ │ -00002230: 0e0e 0f5c 6e0e 1025 2c87 2220 5b63 6f64 ...\n..%,." [cod │ │ │ -00002240: 696e 672d 7379 7374 656d 2d66 6f72 2d77 ing-system-for-w │ │ │ -00002250: 7269 7465 2063 6f64 696e 672d 7379 7374 rite coding-syst │ │ │ -00002260: 656d 2d66 6f72 2d72 6561 6420 7365 7276 em-for-read serv │ │ │ -00002270: 6963 6520 6373 2d72 2063 732d 7720 7265 ice cs-r cs-w re │ │ │ -00002280: 7420 6e69 6c20 666f 756e 6420 2862 7974 t nil found (byt │ │ │ -00002290: 652d 636f 6465 2022 5c6e c689 1d19 891b e-code "\n...... │ │ │ -000022a0: abba 0b40 4089 15a7 ab89 0ca7 aba8 0d0c ...@@........... │ │ │ -000022b0: 61aa 980d 3bab 9f0c 3bab 86c7 0d0c 5c22 a...;...;.....\" │ │ │ -000022c0: ac8c 0ca7 ab91 c70d c80c 215c 22ab 89c9 ..........!\"... │ │ │ -000022d0: ca0b 4041 8910 5c22 880b 4189 13ac 462b ..@A..\"..A...F+ │ │ │ -000022e0: c687 2220 5b72 6574 2063 6173 652d 666f .." [ret case-fo │ │ │ -000022f0: 6c64 2d73 6561 7263 6820 6e65 7477 6f72 ld-search networ │ │ │ -00002300: 6b2d 636f 6469 6e67 2d73 7973 7465 6d2d k-coding-system- │ │ │ -00002310: 616c 6973 7420 616c 6973 7420 7365 7276 alist alist serv │ │ │ -00002320: 6963 6520 7061 7474 6572 6e20 6e69 6c20 ice pattern nil │ │ │ -00002330: 7374 7269 6e67 2d6d 6174 6368 206e 756d string-match num │ │ │ -00002340: 6265 722d 746f 2d73 7472 696e 6720 7468 ber-to-string th │ │ │ -00002350: 726f 7720 666f 756e 645d 2035 2920 6675 row found] 5) fu │ │ │ -00002360: 6e63 7469 6f6e 7020 6f70 656e 2d6e 6574 nctionp open-net │ │ │ -00002370: 776f 726b 2d73 7472 6561 6d20 6669 6e64 work-stream find │ │ │ -00002380: 2d63 6f64 696e 672d 7379 7374 656d 206f -coding-system o │ │ │ -00002390: 7065 6e2d 6e65 7477 6f72 6b2d 7374 7265 pen-network-stre │ │ │ -000023a0: 616d 2d69 6e74 6572 6e61 6c20 6e61 6d65 am-internal name │ │ │ -000023b0: 2062 7566 6665 7220 686f 7374 2070 726f buffer host pro │ │ │ -000023c0: 746f 636f 6c5d 2036 2028 2324 202e 2037 tocol] 6 (#$ . 7 │ │ │ -000023d0: 3333 3029 5d29 0a 330)]). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3334 2032 3032 310a 3b3b 3b20 :08:34 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6f64 652d 7072 6f63 4/lisp/code-proc │ │ │ +00000090: 6573 732e 656c 0a3b 3b3b 2065 6d61 6373 ess.el.;;; emacs │ │ │ +000000a0: 2076 6572 7369 6f6e 2032 312e 3420 2870 version 21.4 (p │ │ │ +000000b0: 6174 6368 2032 3429 2022 5374 616e 6461 atch 24) "Standa │ │ │ +000000c0: 7264 2043 2220 5845 6d61 6373 204c 7563 rd C" XEmacs Luc │ │ │ +000000d0: 6964 2e0a 3b3b 3b20 6279 7465 636f 6d70 id..;;; bytecomp │ │ │ +000000e0: 2076 6572 7369 6f6e 2032 2e32 3720 5845 version 2.27 XE │ │ │ +000000f0: 6d61 6373 3b20 3230 3030 2d30 392d 3132 macs; 2000-09-12 │ │ │ +00000100: 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 7469 ..;;; optimizati │ │ │ +00000110: 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 7468 on is on..;;; th │ │ │ +00000120: 6973 2066 696c 6520 7573 6573 206f 7063 is file uses opc │ │ │ +00000130: 6f64 6573 2077 6869 6368 2064 6f20 6e6f odes which do no │ │ │ +00000140: 7420 6578 6973 7420 696e 2045 6d61 6373 t exist in Emacs │ │ │ +00000150: 2031 392e 0a0a 2869 6620 2861 6e64 2028 19...(if (and ( │ │ │ +00000160: 626f 756e 6470 2027 656d 6163 732d 7665 boundp 'emacs-ve │ │ │ +00000170: 7273 696f 6e29 0a09 2028 6f72 2028 616e rsion).. (or (an │ │ │ +00000180: 6420 2862 6f75 6e64 7020 2765 706f 6368 d (boundp 'epoch │ │ │ +00000190: 3a3a 7665 7273 696f 6e29 2065 706f 6368 ::version) epoch │ │ │ +000001a0: 3a3a 7665 7273 696f 6e29 0a09 2020 2020 ::version).. │ │ │ +000001b0: 2028 7374 7269 6e67 2d6c 6573 7370 2065 (string-lessp e │ │ │ +000001c0: 6d61 6373 2d76 6572 7369 6f6e 2022 3230 macs-version "20 │ │ │ +000001d0: 2229 2929 0a20 2020 2028 6572 726f 7220 "))). (error │ │ │ +000001e0: 2260 636f 6465 2d70 726f 6365 7373 2e65 "`code-process.e │ │ │ +000001f0: 6c27 2077 6173 2063 6f6d 7069 6c65 6420 l' was compiled │ │ │ +00000200: 666f 7220 456d 6163 7320 3230 2229 290a for Emacs 20")). │ │ │ +00000210: 0a28 6f72 2028 626f 756e 6470 2027 6375 .(or (boundp 'cu │ │ │ +00000220: 7272 656e 742d 6c6f 6164 2d6c 6973 7429 rrent-load-list) │ │ │ +00000230: 2028 7365 7471 2063 7572 7265 6e74 2d6c (setq current-l │ │ │ +00000240: 6f61 642d 6c69 7374 206e 696c 2929 0a0a oad-list nil)).. │ │ │ +00000250: 0a23 4036 3030 2041 6c69 7374 2074 6f20 .#@600 Alist to │ │ │ +00000260: 6465 6369 6465 2061 2063 6f64 696e 6720 decide a coding │ │ │ +00000270: 7379 7374 656d 2074 6f20 7573 6520 666f system to use fo │ │ │ +00000280: 7220 6120 7072 6f63 6573 7320 492f 4f20 r a process I/O │ │ │ +00000290: 6f70 6572 6174 696f 6e2e 0a54 6865 2066 operation..The f │ │ │ +000002a0: 6f72 6d61 7420 6973 2028 2850 4154 5445 ormat is ((PATTE │ │ │ +000002b0: 524e 202e 2056 414c 2920 2e2e 2e29 2c0a RN . VAL) ...),. │ │ │ +000002c0: 7768 6572 6520 5041 5454 4552 4e20 6973 where PATTERN is │ │ │ +000002d0: 2061 2072 6567 756c 6172 2065 7870 7265 a regular expre │ │ │ +000002e0: 7373 696f 6e20 6d61 7463 6869 6e67 2061 ssion matching a │ │ │ +000002f0: 2070 726f 6772 616d 206e 616d 652c 0a56 program name,.V │ │ │ +00000300: 414c 2069 7320 6120 636f 6469 6e67 2073 AL is a coding s │ │ │ +00000310: 7973 7465 6d2c 2061 2063 6f6e 7320 6f66 ystem, a cons of │ │ │ +00000320: 2063 6f64 696e 6720 7379 7374 656d 732c coding systems, │ │ │ +00000330: 206f 7220 6120 6675 6e63 7469 6f6e 2073 or a function s │ │ │ +00000340: 796d 626f 6c2e 0a49 6620 5641 4c20 6973 ymbol..If VAL is │ │ │ +00000350: 2061 2063 6f64 696e 6720 7379 7374 656d a coding system │ │ │ +00000360: 2c20 6974 2069 7320 7573 6564 2066 6f72 , it is used for │ │ │ +00000370: 2062 6f74 6820 6465 636f 6469 6e67 2077 both decoding w │ │ │ +00000380: 6861 7420 7265 6365 6976 6564 0a66 726f hat received.fro │ │ │ +00000390: 6d20 7468 6520 7072 6f67 7261 6d20 616e m the program an │ │ │ +000003a0: 6420 656e 636f 6469 6e67 2077 6861 7420 d encoding what │ │ │ +000003b0: 7365 6e74 2074 6f20 7468 6520 7072 6f67 sent to the prog │ │ │ +000003c0: 7261 6d2e 0a49 6620 5641 4c20 6973 2061 ram..If VAL is a │ │ │ +000003d0: 2063 6f6e 7320 6f66 2063 6f64 696e 6720 cons of coding │ │ │ +000003e0: 7379 7374 656d 732c 2074 6865 2063 6172 systems, the car │ │ │ +000003f0: 2070 6172 7420 6973 2075 7365 6420 666f part is used fo │ │ │ +00000400: 7220 6465 636f 6469 6e67 2c0a 616e 6420 r decoding,.and │ │ │ +00000410: 7468 6520 6364 7220 7061 7274 2069 7320 the cdr part is │ │ │ +00000420: 7573 6564 2066 6f72 2065 6e63 6f64 696e used for encodin │ │ │ +00000430: 672e 0a49 6620 5641 4c20 6973 2061 2066 g..If VAL is a f │ │ │ +00000440: 756e 6374 696f 6e20 7379 6d62 6f6c 2c20 unction symbol, │ │ │ +00000450: 7468 6520 6675 6e63 7469 6f6e 206d 7573 the function mus │ │ │ +00000460: 7420 7265 7475 726e 2061 2063 6f64 696e t return a codin │ │ │ +00000470: 6720 7379 7374 656d 0a6f 7220 6120 636f g system.or a co │ │ │ +00000480: 6e73 206f 6620 636f 6469 6e67 2073 7973 ns of coding sys │ │ │ +00000490: 7465 6d73 2077 6869 6368 2061 7265 2075 tems which are u │ │ │ +000004a0: 7365 6420 6173 2061 626f 7665 2e1f 0a28 sed as above...( │ │ │ +000004b0: 6465 6676 6172 2070 726f 6365 7373 2d63 defvar process-c │ │ │ +000004c0: 6f64 696e 672d 7379 7374 656d 2d61 6c69 oding-system-ali │ │ │ +000004d0: 7374 206e 696c 2028 2324 202e 2035 3939 st nil (#$ . 599 │ │ │ +000004e0: 2929 0a23 4031 3334 3620 4361 6c6c 2050 )).#@1346 Call P │ │ │ +000004f0: 524f 4752 414d 2073 796e 6368 726f 6e6f ROGRAM synchrono │ │ │ +00000500: 7573 6c79 2069 6e20 7365 7061 7261 7465 usly in separate │ │ │ +00000510: 2070 726f 6365 7373 2e0a 5468 6520 7072 process..The pr │ │ │ +00000520: 6f67 7261 6d27 7320 696e 7075 7420 636f ogram's input co │ │ │ +00000530: 6d65 7320 6672 6f6d 2066 696c 6520 494e mes from file IN │ │ │ +00000540: 4649 4c45 2028 6e69 6c20 6d65 616e 7320 FILE (nil means │ │ │ +00000550: 602f 6465 762f 6e75 6c6c 2729 2e0a 496e `/dev/null')..In │ │ │ +00000560: 7365 7274 206f 7574 7075 7420 696e 2042 sert output in B │ │ │ +00000570: 5546 4645 5220 6265 666f 7265 2070 6f69 UFFER before poi │ │ │ +00000580: 6e74 3b20 7420 6d65 616e 7320 6375 7272 nt; t means curr │ │ │ +00000590: 656e 7420 6275 6666 6572 3b0a 206e 696c ent buffer;. nil │ │ │ +000005a0: 2066 6f72 2042 5546 4645 5220 6d65 616e for BUFFER mean │ │ │ +000005b0: 7320 6469 7363 6172 6420 6974 3b20 3020 s discard it; 0 │ │ │ +000005c0: 6d65 616e 7320 6469 7363 6172 6420 616e means discard an │ │ │ +000005d0: 6420 646f 6e27 7420 7761 6974 2e0a 4966 d don't wait..If │ │ │ +000005e0: 2042 5546 4645 5220 6973 2061 2073 7472 BUFFER is a str │ │ │ +000005f0: 696e 672c 2074 6865 6e20 6669 6e64 206f ing, then find o │ │ │ +00000600: 7220 6372 6561 7465 2061 2062 7566 6665 r create a buffe │ │ │ +00000610: 7220 7769 7468 2074 6861 7420 6e61 6d65 r with that name │ │ │ +00000620: 2c0a 7468 656e 2069 6e73 6572 7420 7468 ,.then insert th │ │ │ +00000630: 6520 6f75 7470 7574 2069 6e20 7468 6174 e output in that │ │ │ +00000640: 2062 7566 6665 722c 2062 6566 6f72 6520 buffer, before │ │ │ +00000650: 706f 696e 742e 0a42 5546 4645 5220 6361 point..BUFFER ca │ │ │ +00000660: 6e20 616c 736f 2068 6176 6520 7468 6520 n also have the │ │ │ +00000670: 666f 726d 2028 5245 414c 2d42 5546 4645 form (REAL-BUFFE │ │ │ +00000680: 5220 5354 4445 5252 2d46 494c 4529 3b20 R STDERR-FILE); │ │ │ +00000690: 696e 2074 6861 7420 6361 7365 2c0a 5245 in that case,.RE │ │ │ +000006a0: 414c 2d42 5546 4645 5220 7361 7973 2077 AL-BUFFER says w │ │ │ +000006b0: 6861 7420 746f 2064 6f20 7769 7468 2073 hat to do with s │ │ │ +000006c0: 7461 6e64 6172 6420 6f75 7470 7574 2c20 tandard output, │ │ │ +000006d0: 6173 2061 626f 7665 2c0a 7768 696c 6520 as above,.while │ │ │ +000006e0: 5354 4445 5252 2d46 494c 4520 7361 7973 STDERR-FILE says │ │ │ +000006f0: 2077 6861 7420 746f 2064 6f20 7769 7468 what to do with │ │ │ +00000700: 2073 7461 6e64 6172 6420 6572 726f 7220 standard error │ │ │ +00000710: 696e 2074 6865 2063 6869 6c64 2e0a 5354 in the child..ST │ │ │ +00000720: 4445 5252 2d46 494c 4520 6d61 7920 6265 DERR-FILE may be │ │ │ +00000730: 206e 696c 2028 6469 7363 6172 6420 7374 nil (discard st │ │ │ +00000740: 616e 6461 7264 2065 7272 6f72 206f 7574 andard error out │ │ │ +00000750: 7075 7429 2c0a 7420 286d 6978 2069 7420 put),.t (mix it │ │ │ +00000760: 7769 7468 206f 7264 696e 6172 7920 6f75 with ordinary ou │ │ │ +00000770: 7470 7574 292c 206f 7220 6120 6669 6c65 tput), or a file │ │ │ +00000780: 206e 616d 6520 7374 7269 6e67 2e0a 0a46 name string...F │ │ │ +00000790: 6f75 7274 6820 6172 6720 4449 5350 4c41 ourth arg DISPLA │ │ │ +000007a0: 5950 206e 6f6e 2d6e 696c 206d 6561 6e73 YP non-nil means │ │ │ +000007b0: 2072 6564 6973 706c 6179 2062 7566 6665 redisplay buffe │ │ │ +000007c0: 7220 6173 206f 7574 7075 7420 6973 2069 r as output is i │ │ │ +000007d0: 6e73 6572 7465 642e 0a52 656d 6169 6e69 nserted..Remaini │ │ │ +000007e0: 6e67 2061 7267 756d 656e 7473 2061 7265 ng arguments are │ │ │ +000007f0: 2073 7472 696e 6773 2070 6173 7365 6420 strings passed │ │ │ +00000800: 6173 2063 6f6d 6d61 6e64 2061 7267 756d as command argum │ │ │ +00000810: 656e 7473 2074 6f20 5052 4f47 5241 4d2e ents to PROGRAM. │ │ │ +00000820: 0a0a 4966 2042 5546 4645 5220 6973 2030 ..If BUFFER is 0 │ │ │ +00000830: 2c20 6063 616c 6c2d 7072 6f63 6573 7327 , `call-process' │ │ │ +00000840: 2072 6574 7572 6e73 2069 6d6d 6564 6961 returns immedia │ │ │ +00000850: 7465 6c79 2077 6974 6820 7661 6c75 6520 tely with value │ │ │ +00000860: 6e69 6c2e 0a4f 7468 6572 7769 7365 2069 nil..Otherwise i │ │ │ +00000870: 7420 7761 6974 7320 666f 7220 5052 4f47 t waits for PROG │ │ │ +00000880: 5241 4d20 746f 2074 6572 6d69 6e61 7465 RAM to terminate │ │ │ +00000890: 2061 6e64 2072 6574 7572 6e73 2061 206e and returns a n │ │ │ +000008a0: 756d 6572 6963 2065 7869 7420 7374 6174 umeric exit stat │ │ │ +000008b0: 7573 0a20 6f72 2061 2073 6967 6e61 6c20 us. or a signal │ │ │ +000008c0: 6465 7363 7269 7074 696f 6e20 7374 7269 description stri │ │ │ +000008d0: 6e67 2e0a 4966 2079 6f75 2071 7569 742c ng..If you quit, │ │ │ +000008e0: 2074 6865 2070 726f 6365 7373 2069 7320 the process is │ │ │ +000008f0: 6b69 6c6c 6564 2077 6974 6820 5349 4749 killed with SIGI │ │ │ +00000900: 4e54 2c20 6f72 2053 4947 4b49 4c4c 2069 NT, or SIGKILL i │ │ │ +00000910: 6620 796f 750a 2071 7569 7420 6167 6169 f you. quit agai │ │ │ +00000920: 6e2e 0a0a 436f 6469 6e67 2073 7973 7465 n...Coding syste │ │ │ +00000930: 6d73 2061 7265 2074 616b 656e 2066 726f ms are taken fro │ │ │ +00000940: 6d20 6063 6f64 696e 672d 7379 7374 656d m `coding-system │ │ │ +00000950: 2d66 6f72 2d72 6561 6427 2066 6f72 2069 -for-read' for i │ │ │ +00000960: 6e70 7574 2061 6e64 0a60 636f 6469 6e67 nput and.`coding │ │ │ +00000970: 2d73 7973 7465 6d2d 666f 722d 7772 6974 -system-for-writ │ │ │ +00000980: 6527 2066 6f72 206f 7574 7075 7420 6966 e' for output if │ │ │ +00000990: 2074 686f 7365 2076 6172 6961 626c 6573 those variables │ │ │ +000009a0: 2061 7265 2062 6f75 6e64 2e0a 4f74 6865 are bound..Othe │ │ │ +000009b0: 7277 6973 6520 7468 6579 2061 7265 206c rwise they are l │ │ │ +000009c0: 6f6f 6b65 6420 7570 2069 6e20 6070 726f ooked up in `pro │ │ │ +000009d0: 6365 7373 2d63 6f64 696e 672d 7379 7374 cess-coding-syst │ │ │ +000009e0: 656d 2d61 6c69 7374 272e 2020 4966 206e em-alist'. If n │ │ │ +000009f0: 6f74 0a66 6f75 6e64 2c20 7468 6579 2064 ot.found, they d │ │ │ +00000a00: 6566 6175 6c74 2074 6f20 606e 696c 2720 efault to `nil' │ │ │ +00000a10: 666f 7220 626f 7468 2069 6e70 7574 2061 for both input a │ │ │ +00000a20: 6e64 206f 7574 7075 742e 1f0a 2864 6566 nd output...(def │ │ │ +00000a30: 616c 6961 7320 2763 616c 6c2d 7072 6f63 alias 'call-proc │ │ │ +00000a40: 6573 7320 235b 2870 726f 6772 616d 2026 ess #[(program & │ │ │ +00000a50: 6f70 7469 6f6e 616c 2069 6e66 696c 6520 optional infile │ │ │ +00000a60: 6275 6666 6572 2064 6973 706c 6179 7020 buffer displayp │ │ │ +00000a70: 2672 6573 7420 6172 6773 2920 220c aea5 &rest args) "... │ │ │ +00000a80: c61d c7c8 8d88 c90d 21ab 850d ca0b 5c22 ........!.....\" │ │ │ +00000a90: 150d 3aab 840d 40aa 8c0d ac83 cbaa 86cc ..:...@......... │ │ │ +00000aa0: 0d21 ad81 0d29 1ccd ce0b 5c6e 0908 0e0f .!...)....\n.... │ │ │ +00000ab0: 2606 2987 2220 5b64 6973 706c 6179 7020 &.)." [displayp │ │ │ +00000ac0: 6275 6666 6572 2069 6e66 696c 6520 7072 buffer infile pr │ │ │ +00000ad0: 6f67 7261 6d20 636f 6469 6e67 2d73 7973 ogram coding-sys │ │ │ +00000ae0: 7465 6d2d 666f 722d 7265 6164 2072 6574 tem-for-read ret │ │ │ +00000af0: 206e 696c 2066 6f75 6e64 2028 6279 7465 nil found (byte │ │ │ +00000b00: 2d63 6f64 6520 220b c51a 891c ab97 c60c -code "......... │ │ │ +00000b10: 4040 095c 22ab 89c7 c80c 4041 8910 5c22 @@.\".....@A..\" │ │ │ +00000b20: 880c 4189 14ac 692a c587 2220 5b72 6574 ..A...i*.." [ret │ │ │ +00000b30: 2070 726f 6772 616d 2063 6173 652d 666f program case-fo │ │ │ +00000b40: 6c64 2d73 6561 7263 6820 7072 6f63 6573 ld-search proces │ │ │ +00000b50: 732d 636f 6469 6e67 2d73 7973 7465 6d2d s-coding-system- │ │ │ +00000b60: 616c 6973 7420 616c 6973 7420 6e69 6c20 alist alist nil │ │ │ +00000b70: 7374 7269 6e67 2d6d 6174 6368 2074 6872 string-match thr │ │ │ +00000b80: 6f77 2066 6f75 6e64 5d20 3529 2066 756e ow found] 5) fun │ │ │ +00000b90: 6374 696f 6e70 2063 616c 6c2d 7072 6f63 ctionp call-proc │ │ │ +00000ba0: 6573 7320 756e 6465 6369 6465 6420 6669 ess undecided fi │ │ │ +00000bb0: 6e64 2d63 6f64 696e 672d 7379 7374 656d nd-coding-system │ │ │ +00000bc0: 2061 7070 6c79 2063 616c 6c2d 7072 6f63 apply call-proc │ │ │ +00000bd0: 6573 732d 696e 7465 726e 616c 2061 7267 ess-internal arg │ │ │ +00000be0: 735d 2037 2028 2324 202e 2031 3235 3829 s] 7 (#$ . 1258) │ │ │ +00000bf0: 5d29 0a23 4031 3336 3120 5365 6e64 2074 ]).#@1361 Send t │ │ │ +00000c00: 6578 7420 6672 6f6d 2053 5441 5254 2074 ext from START t │ │ │ +00000c10: 6f20 454e 4420 746f 2061 2073 796e 6368 o END to a synch │ │ │ +00000c20: 726f 6e6f 7573 2070 726f 6365 7373 2072 ronous process r │ │ │ +00000c30: 756e 6e69 6e67 2050 524f 4752 414d 2e0a unning PROGRAM.. │ │ │ +00000c40: 4465 6c65 7465 2074 6865 2074 6578 7420 Delete the text │ │ │ +00000c50: 6966 2066 6f75 7274 6820 6172 6720 4445 if fourth arg DE │ │ │ +00000c60: 4c45 5445 5020 6973 206e 6f6e 2d6e 696c LETEP is non-nil │ │ │ +00000c70: 2e0a 0a49 6e73 6572 7420 6f75 7470 7574 ...Insert output │ │ │ +00000c80: 2069 6e20 4255 4646 4552 2062 6566 6f72 in BUFFER befor │ │ │ +00000c90: 6520 706f 696e 743b 2074 206d 6561 6e73 e point; t means │ │ │ +00000ca0: 2063 7572 7265 6e74 2062 7566 6665 723b current buffer; │ │ │ +00000cb0: 0a20 6e69 6c20 666f 7220 4255 4646 4552 . nil for BUFFER │ │ │ +00000cc0: 206d 6561 6e73 2064 6973 6361 7264 2069 means discard i │ │ │ +00000cd0: 743b 2030 206d 6561 6e73 2064 6973 6361 t; 0 means disca │ │ │ +00000ce0: 7264 2061 6e64 2064 6f6e 2774 2077 6169 rd and don't wai │ │ │ +00000cf0: 742e 0a49 6620 4255 4646 4552 2069 7320 t..If BUFFER is │ │ │ +00000d00: 6120 7374 7269 6e67 2c20 7468 656e 2066 a string, then f │ │ │ +00000d10: 696e 6420 6f72 2063 7265 6174 6520 6120 ind or create a │ │ │ +00000d20: 6275 6666 6572 2077 6974 6820 7468 6174 buffer with that │ │ │ +00000d30: 206e 616d 652c 0a74 6865 6e20 696e 7365 name,.then inse │ │ │ +00000d40: 7274 2074 6865 206f 7574 7075 7420 696e rt the output in │ │ │ +00000d50: 2074 6861 7420 6275 6666 6572 2c20 6265 that buffer, be │ │ │ +00000d60: 666f 7265 2070 6f69 6e74 2e0a 4255 4646 fore point..BUFF │ │ │ +00000d70: 4552 2063 616e 2061 6c73 6f20 6861 7665 ER can also have │ │ │ +00000d80: 2074 6865 2066 6f72 6d20 2852 4541 4c2d the form (REAL- │ │ │ +00000d90: 4255 4646 4552 2053 5444 4552 522d 4649 BUFFER STDERR-FI │ │ │ +00000da0: 4c45 293b 2069 6e20 7468 6174 2063 6173 LE); in that cas │ │ │ +00000db0: 652c 0a52 4541 4c2d 4255 4646 4552 2073 e,.REAL-BUFFER s │ │ │ +00000dc0: 6179 7320 7768 6174 2074 6f20 646f 2077 ays what to do w │ │ │ +00000dd0: 6974 6820 7374 616e 6461 7264 206f 7574 ith standard out │ │ │ +00000de0: 7075 742c 2061 7320 6162 6f76 652c 0a77 put, as above,.w │ │ │ +00000df0: 6869 6c65 2053 5444 4552 522d 4649 4c45 hile STDERR-FILE │ │ │ +00000e00: 2073 6179 7320 7768 6174 2074 6f20 646f says what to do │ │ │ +00000e10: 2077 6974 6820 7374 616e 6461 7264 2065 with standard e │ │ │ +00000e20: 7272 6f72 2069 6e20 7468 6520 6368 696c rror in the chil │ │ │ +00000e30: 642e 0a53 5444 4552 522d 4649 4c45 206d d..STDERR-FILE m │ │ │ +00000e40: 6179 2062 6520 6e69 6c20 2864 6973 6361 ay be nil (disca │ │ │ +00000e50: 7264 2073 7461 6e64 6172 6420 6572 726f rd standard erro │ │ │ +00000e60: 7220 6f75 7470 7574 292c 0a74 2028 6d69 r output),.t (mi │ │ │ +00000e70: 7820 6974 2077 6974 6820 6f72 6469 6e61 x it with ordina │ │ │ +00000e80: 7279 206f 7574 7075 7429 2c20 6f72 2061 ry output), or a │ │ │ +00000e90: 2066 696c 6520 6e61 6d65 2073 7472 696e file name strin │ │ │ +00000ea0: 672e 0a0a 5369 7874 6820 6172 6720 4449 g...Sixth arg DI │ │ │ +00000eb0: 5350 4c41 5950 206e 6f6e 2d6e 696c 206d SPLAYP non-nil m │ │ │ +00000ec0: 6561 6e73 2072 6564 6973 706c 6179 2062 eans redisplay b │ │ │ +00000ed0: 7566 6665 7220 6173 206f 7574 7075 7420 uffer as output │ │ │ +00000ee0: 6973 2069 6e73 6572 7465 642e 0a52 656d is inserted..Rem │ │ │ +00000ef0: 6169 6e69 6e67 2061 7267 7320 6172 6520 aining args are │ │ │ +00000f00: 7061 7373 6564 2074 6f20 5052 4f47 5241 passed to PROGRA │ │ │ +00000f10: 4d20 6174 2073 7461 7274 7570 2061 7320 M at startup as │ │ │ +00000f20: 636f 6d6d 616e 6420 6172 6773 2e0a 0a49 command args...I │ │ │ +00000f30: 6620 4255 4646 4552 2069 7320 302c 2072 f BUFFER is 0, r │ │ │ +00000f40: 6574 7572 6e73 2069 6d6d 6564 6961 7465 eturns immediate │ │ │ +00000f50: 6c79 2077 6974 6820 7661 6c75 6520 6e69 ly with value ni │ │ │ +00000f60: 6c2e 0a4f 7468 6572 7769 7365 2077 6169 l..Otherwise wai │ │ │ +00000f70: 7473 2066 6f72 2050 524f 4752 414d 2074 ts for PROGRAM t │ │ │ +00000f80: 6f20 7465 726d 696e 6174 650a 616e 6420 o terminate.and │ │ │ +00000f90: 7265 7475 726e 7320 6120 6e75 6d65 7269 returns a numeri │ │ │ +00000fa0: 6320 6578 6974 2073 7461 7475 7320 6f72 c exit status or │ │ │ +00000fb0: 2061 2073 6967 6e61 6c20 6465 7363 7269 a signal descri │ │ │ +00000fc0: 7074 696f 6e20 7374 7269 6e67 2e0a 4966 ption string..If │ │ │ +00000fd0: 2079 6f75 2071 7569 742c 2074 6865 2070 you quit, the p │ │ │ +00000fe0: 726f 6365 7373 2069 7320 6669 7273 7420 rocess is first │ │ │ +00000ff0: 6b69 6c6c 6564 2077 6974 6820 5349 4749 killed with SIGI │ │ │ +00001000: 4e54 2c20 7468 656e 2077 6974 6820 5349 NT, then with SI │ │ │ +00001010: 474b 494c 4c20 6966 0a79 6f75 2071 7569 GKILL if.you qui │ │ │ +00001020: 7420 6167 6169 6e20 6265 666f 7265 2074 t again before t │ │ │ +00001030: 6865 2070 726f 6365 7373 2065 7869 7473 he process exits │ │ │ +00001040: 2e0a 0a43 6f64 696e 6720 7379 7374 656d ...Coding system │ │ │ +00001050: 7320 6172 6520 7461 6b65 6e20 6672 6f6d s are taken from │ │ │ +00001060: 2060 636f 6469 6e67 2d73 7973 7465 6d2d `coding-system- │ │ │ +00001070: 666f 722d 7265 6164 2720 666f 7220 696e for-read' for in │ │ │ +00001080: 7075 7420 616e 640a 6063 6f64 696e 672d put and.`coding- │ │ │ +00001090: 7379 7374 656d 2d66 6f72 2d77 7269 7465 system-for-write │ │ │ +000010a0: 2720 666f 7220 6f75 7470 7574 2069 6620 ' for output if │ │ │ +000010b0: 7468 6f73 6520 7661 7269 6162 6c65 7320 those variables │ │ │ +000010c0: 6172 6520 626f 756e 642e 0a4f 7468 6572 are bound..Other │ │ │ +000010d0: 7769 7365 2074 6865 7920 6172 6520 6c6f wise they are lo │ │ │ +000010e0: 6f6b 6564 2075 7020 696e 2060 7072 6f63 oked up in `proc │ │ │ +000010f0: 6573 732d 636f 6469 6e67 2d73 7973 7465 ess-coding-syste │ │ │ +00001100: 6d2d 616c 6973 7427 2e20 2049 6620 6e6f m-alist'. If no │ │ │ +00001110: 740a 666f 756e 642c 2074 6865 7920 6465 t.found, they de │ │ │ +00001120: 6661 756c 7420 746f 2060 6e69 6c27 2066 fault to `nil' f │ │ │ +00001130: 6f72 2062 6f74 6820 696e 7075 7420 616e or both input an │ │ │ +00001140: 6420 6f75 7470 7574 2e1f 0a28 6465 6661 d output...(defa │ │ │ +00001150: 6c69 6173 2027 6361 6c6c 2d70 726f 6365 lias 'call-proce │ │ │ +00001160: 7373 2d72 6567 696f 6e20 235b 2873 7461 ss-region #[(sta │ │ │ +00001170: 7274 2065 6e64 2070 726f 6772 616d 2026 rt end program & │ │ │ +00001180: 6f70 7469 6f6e 616c 2064 656c 6574 6570 optional deletep │ │ │ +00001190: 2062 7566 6665 7220 6469 7370 6c61 7970 buffer displayp │ │ │ +000011a0: 2026 7265 7374 2061 7267 7329 2022 c6c7 &rest args) ".. │ │ │ +000011b0: c820 21c9 5021 1aca 8ecb 891c 1bcb 1dcc . !.P!.......... │ │ │ +000011c0: cd8d 88ce 0d21 ab85 0dcf 095c 2215 0d3a .....!.....\"..: │ │ │ +000011d0: ab88 0d40 130d 4114 aa92 0dac 8608 1308 ...@..A......... │ │ │ +000011e0: 14aa 89d0 0d21 ab84 0d13 0d14 290e 15ae .....!......)... │ │ │ +000011f0: 810b 0e16 ae81 0c1e 161e 15d1 0e17 0e18 ................ │ │ │ +00001200: 5c6e cbd2 2588 0e19 ab86 0e17 0e18 7c88 \n..%.........|. │ │ │ +00001210: d3d4 095c 6e0e 1a0e 1b0e 1c26 062e 0687 ...\n......&.... │ │ │ +00001220: 2220 5b62 7566 6665 722d 6669 6c65 2d63 " [buffer-file-c │ │ │ +00001230: 6f64 696e 672d 7379 7374 656d 2070 726f oding-system pro │ │ │ +00001240: 6772 616d 2074 656d 7020 6373 2d72 2063 gram temp cs-r c │ │ │ +00001250: 732d 7720 7265 7420 6d61 6b65 2d74 656d s-w ret make-tem │ │ │ +00001260: 702d 6e61 6d65 2066 696c 652d 6e61 6d65 p-name file-name │ │ │ +00001270: 2d61 732d 6469 7265 6374 6f72 7920 7465 -as-directory te │ │ │ +00001280: 6d70 2d64 6972 6563 746f 7279 2022 656d mp-directory "em │ │ │ +00001290: 6163 7322 2028 2862 7974 652d 636f 6465 acs" ((byte-code │ │ │ +000012a0: 2022 c0c1 c28f 8722 205b 6e69 6c20 2864 "....." [nil (d │ │ │ +000012b0: 656c 6574 652d 6669 6c65 2074 656d 7029 elete-file temp) │ │ │ +000012c0: 2028 2866 696c 652d 6572 726f 7229 295d ((file-error))] │ │ │ +000012d0: 2033 2929 206e 696c 2066 6f75 6e64 2028 3)) nil found ( │ │ │ +000012e0: 6279 7465 2d63 6f64 6520 220b c51a 891c byte-code "..... │ │ │ +000012f0: ab97 c60c 4040 095c 22ab 89c7 c80c 4041 ....@@.\".....@A │ │ │ +00001300: 8910 5c22 880c 4189 14ac 692a c587 2220 ..\"..A...i*.." │ │ │ +00001310: 5b72 6574 2070 726f 6772 616d 2063 6173 [ret program cas │ │ │ +00001320: 652d 666f 6c64 2d73 6561 7263 6820 7072 e-fold-search pr │ │ │ +00001330: 6f63 6573 732d 636f 6469 6e67 2d73 7973 ocess-coding-sys │ │ │ +00001340: 7465 6d2d 616c 6973 7420 616c 6973 7420 tem-alist alist │ │ │ +00001350: 6e69 6c20 7374 7269 6e67 2d6d 6174 6368 nil string-match │ │ │ +00001360: 2074 6872 6f77 2066 6f75 6e64 5d20 3529 throw found] 5) │ │ │ +00001370: 2066 756e 6374 696f 6e70 2063 616c 6c2d functionp call- │ │ │ +00001380: 7072 6f63 6573 732d 7265 6769 6f6e 2066 process-region f │ │ │ +00001390: 696e 642d 636f 6469 6e67 2d73 7973 7465 ind-coding-syste │ │ │ +000013a0: 6d20 7772 6974 652d 7265 6769 6f6e 2073 m write-region s │ │ │ +000013b0: 696c 656e 7420 6170 706c 7920 6361 6c6c ilent apply call │ │ │ +000013c0: 2d70 726f 6365 7373 2063 6f64 696e 672d -process coding- │ │ │ +000013d0: 7379 7374 656d 2d66 6f72 2d72 6561 6420 system-for-read │ │ │ +000013e0: 636f 6469 6e67 2d73 7973 7465 6d2d 666f coding-system-fo │ │ │ +000013f0: 722d 7772 6974 6520 7374 6172 7420 656e r-write start en │ │ │ +00001400: 6420 6465 6c65 7465 7020 6275 6666 6572 d deletep buffer │ │ │ +00001410: 2064 6973 706c 6179 7020 6172 6773 5d20 displayp args] │ │ │ +00001420: 3720 2823 2420 2e20 3330 3636 295d 290a 7 (#$ . 3066)]). │ │ │ +00001430: 2340 3838 3020 5374 6172 7420 6120 7072 #@880 Start a pr │ │ │ +00001440: 6f67 7261 6d20 696e 2061 2073 7562 7072 ogram in a subpr │ │ │ +00001450: 6f63 6573 732e 2020 5265 7475 726e 2074 ocess. Return t │ │ │ +00001460: 6865 2070 726f 6365 7373 206f 626a 6563 he process objec │ │ │ +00001470: 7420 666f 7220 6974 2e0a 4172 6773 2061 t for it..Args a │ │ │ +00001480: 7265 204e 414d 4520 4255 4646 4552 2050 re NAME BUFFER P │ │ │ +00001490: 524f 4752 414d 2026 7265 7374 2050 524f ROGRAM &rest PRO │ │ │ +000014a0: 4752 414d 2d41 5247 530a 4e41 4d45 2069 GRAM-ARGS.NAME i │ │ │ +000014b0: 7320 6e61 6d65 2066 6f72 2070 726f 6365 s name for proce │ │ │ +000014c0: 7373 2e20 2049 7420 6973 206d 6f64 6966 ss. It is modif │ │ │ +000014d0: 6965 6420 6966 206e 6563 6573 7361 7279 ied if necessary │ │ │ +000014e0: 2074 6f20 6d61 6b65 2069 7420 756e 6971 to make it uniq │ │ │ +000014f0: 7565 2e0a 4255 4646 4552 2069 7320 7468 ue..BUFFER is th │ │ │ +00001500: 6520 6275 6666 6572 206f 7220 2862 7566 e buffer or (buf │ │ │ +00001510: 6665 722d 6e61 6d65 2920 746f 2061 7373 fer-name) to ass │ │ │ +00001520: 6f63 6961 7465 2077 6974 6820 7468 6520 ociate with the │ │ │ +00001530: 7072 6f63 6573 732e 0a50 726f 6365 7373 process..Process │ │ │ +00001540: 206f 7574 7075 7420 676f 6573 2061 7420 output goes at │ │ │ +00001550: 656e 6420 6f66 2074 6861 7420 6275 6666 end of that buff │ │ │ +00001560: 6572 2c20 756e 6c65 7373 2079 6f75 2073 er, unless you s │ │ │ +00001570: 7065 6369 6679 0a61 6e20 6f75 7470 7574 pecify.an output │ │ │ +00001580: 2073 7472 6561 6d20 6f72 2066 696c 7465 stream or filte │ │ │ +00001590: 7220 6675 6e63 7469 6f6e 2074 6f20 6861 r function to ha │ │ │ +000015a0: 6e64 6c65 2074 6865 206f 7574 7075 742e ndle the output. │ │ │ +000015b0: 0a42 5546 4645 5220 6d61 7920 616c 736f .BUFFER may also │ │ │ +000015c0: 2062 6520 6e69 6c2c 206d 6561 6e69 6e67 be nil, meaning │ │ │ +000015d0: 2074 6861 7420 7468 6973 2070 726f 6365 that this proce │ │ │ +000015e0: 7373 2069 7320 6e6f 7420 6173 736f 6369 ss is not associ │ │ │ +000015f0: 6174 6564 0a77 6974 6820 616e 7920 6275 ated.with any bu │ │ │ +00001600: 6666 6572 2e0a 5468 6972 6420 6172 6720 ffer..Third arg │ │ │ +00001610: 6973 2070 726f 6772 616d 2066 696c 6520 is program file │ │ │ +00001620: 6e61 6d65 2e20 2049 7420 6973 2073 6561 name. It is sea │ │ │ +00001630: 7263 6865 6420 666f 7220 6173 2069 6e20 rched for as in │ │ │ +00001640: 7468 6520 7368 656c 6c2e 0a52 656d 6169 the shell..Remai │ │ │ +00001650: 6e69 6e67 2061 7267 756d 656e 7473 2061 ning arguments a │ │ │ +00001660: 7265 2073 7472 696e 6773 2074 6f20 6769 re strings to gi │ │ │ +00001670: 7665 2070 726f 6772 616d 2061 7320 6172 ve program as ar │ │ │ +00001680: 6775 6d65 6e74 732e 0a0a 436f 6469 6e67 guments...Coding │ │ │ +00001690: 2073 7973 7465 6d73 2061 7265 2074 616b systems are tak │ │ │ +000016a0: 656e 2066 726f 6d20 6063 6f64 696e 672d en from `coding- │ │ │ +000016b0: 7379 7374 656d 2d66 6f72 2d72 6561 6427 system-for-read' │ │ │ +000016c0: 2066 6f72 2069 6e70 7574 2061 6e64 0a60 for input and.` │ │ │ +000016d0: 636f 6469 6e67 2d73 7973 7465 6d2d 666f coding-system-fo │ │ │ +000016e0: 722d 7772 6974 6527 2066 6f72 206f 7574 r-write' for out │ │ │ +000016f0: 7075 7420 6966 2074 686f 7365 2076 6172 put if those var │ │ │ +00001700: 6961 626c 6573 2061 7265 2062 6f75 6e64 iables are bound │ │ │ +00001710: 2e0a 4f74 6865 7277 6973 6520 7468 6579 ..Otherwise they │ │ │ +00001720: 2061 7265 206c 6f6f 6b65 6420 7570 2069 are looked up i │ │ │ +00001730: 6e20 6070 726f 6365 7373 2d63 6f64 696e n `process-codin │ │ │ +00001740: 672d 7379 7374 656d 2d61 6c69 7374 272e g-system-alist'. │ │ │ +00001750: 2020 4966 206e 6f74 0a66 6f75 6e64 2c20 If not.found, │ │ │ +00001760: 7468 6579 2064 6566 6175 6c74 2074 6f20 they default to │ │ │ +00001770: 6075 6e64 6563 6964 6564 2720 666f 7220 `undecided' for │ │ │ +00001780: 696e 7075 7420 616e 6420 606e 696c 2720 input and `nil' │ │ │ +00001790: 2862 696e 6172 7929 2066 6f72 0a6f 7574 (binary) for.out │ │ │ +000017a0: 7075 742e 1f0a 2864 6566 616c 6961 7320 put...(defalias │ │ │ +000017b0: 2773 7461 7274 2d70 726f 6365 7373 2023 'start-process # │ │ │ +000017c0: 5b28 6e61 6d65 2062 7566 6665 7220 7072 [(name buffer pr │ │ │ +000017d0: 6f67 7261 6d20 2672 6573 7420 7072 6f67 ogram &rest prog │ │ │ +000017e0: 7261 6d2d 6172 6773 2920 22c6 891c 1bc6 ram-args) "..... │ │ │ +000017f0: 1dc7 c88d 88c9 0d21 ab85 0dca 5c6e 5c22 .......!....\n\" │ │ │ +00001800: 150d 3aab 880d 4013 0d41 14aa 89cb 0d21 ..:...@..A.....! │ │ │ +00001810: ab84 0d13 0d14 2909 ae84 0bae 81cc 08ae ......)......... │ │ │ +00001820: 810c 1819 cdce 0e0f 0e10 5c6e 0e11 252c ..........\n..%, │ │ │ +00001830: 8722 205b 636f 6469 6e67 2d73 7973 7465 ." [coding-syste │ │ │ +00001840: 6d2d 666f 722d 7772 6974 6520 636f 6469 m-for-write codi │ │ │ +00001850: 6e67 2d73 7973 7465 6d2d 666f 722d 7265 ng-system-for-re │ │ │ +00001860: 6164 2070 726f 6772 616d 2063 732d 7220 ad program cs-r │ │ │ +00001870: 6373 2d77 2072 6574 206e 696c 2066 6f75 cs-w ret nil fou │ │ │ +00001880: 6e64 2028 6279 7465 2d63 6f64 6520 220b nd (byte-code ". │ │ │ +00001890: c51a 891c ab97 c60c 4040 095c 22ab 89c7 ........@@.\"... │ │ │ +000018a0: c80c 4041 8910 5c22 880c 4189 14ac 692a ..@A..\"..A...i* │ │ │ +000018b0: c587 2220 5b72 6574 2070 726f 6772 616d .." [ret program │ │ │ +000018c0: 2063 6173 652d 666f 6c64 2d73 6561 7263 case-fold-searc │ │ │ +000018d0: 6820 7072 6f63 6573 732d 636f 6469 6e67 h process-coding │ │ │ +000018e0: 2d73 7973 7465 6d2d 616c 6973 7420 616c -system-alist al │ │ │ +000018f0: 6973 7420 6e69 6c20 7374 7269 6e67 2d6d ist nil string-m │ │ │ +00001900: 6174 6368 2074 6872 6f77 2066 6f75 6e64 atch throw found │ │ │ +00001910: 5d20 3529 2066 756e 6374 696f 6e70 2073 ] 5) functionp s │ │ │ +00001920: 7461 7274 2d70 726f 6365 7373 2066 696e tart-process fin │ │ │ +00001930: 642d 636f 6469 6e67 2d73 7973 7465 6d20 d-coding-system │ │ │ +00001940: 756e 6465 6369 6465 6420 6170 706c 7920 undecided apply │ │ │ +00001950: 7374 6172 742d 7072 6f63 6573 732d 696e start-process-in │ │ │ +00001960: 7465 726e 616c 206e 616d 6520 6275 6666 ternal name buff │ │ │ +00001970: 6572 2070 726f 6772 616d 2d61 7267 735d er program-args] │ │ │ +00001980: 2036 2028 2324 202e 2035 3137 3429 5d29 6 (#$ . 5174)]) │ │ │ +00001990: 0a23 4037 3131 2041 6c69 7374 2074 6f20 .#@711 Alist to │ │ │ +000019a0: 6465 6369 6465 2061 2063 6f64 696e 6720 decide a coding │ │ │ +000019b0: 7379 7374 656d 2074 6f20 7573 6520 666f system to use fo │ │ │ +000019c0: 7220 6120 6e65 7477 6f72 6b20 492f 4f20 r a network I/O │ │ │ +000019d0: 6f70 6572 6174 696f 6e2e 0a54 6865 2066 operation..The f │ │ │ +000019e0: 6f72 6d61 7420 6973 2028 2850 4154 5445 ormat is ((PATTE │ │ │ +000019f0: 524e 202e 2056 414c 2920 2e2e 2e29 2c0a RN . VAL) ...),. │ │ │ +00001a00: 7768 6572 6520 5041 5454 4552 4e20 6973 where PATTERN is │ │ │ +00001a10: 2061 2072 6567 756c 6172 2065 7870 7265 a regular expre │ │ │ +00001a20: 7373 696f 6e20 6d61 7463 6869 6e67 2061 ssion matching a │ │ │ +00001a30: 206e 6574 776f 726b 2073 6572 7669 6365 network service │ │ │ +00001a40: 206e 616d 650a 6f72 2069 7320 6120 706f name.or is a po │ │ │ +00001a50: 7274 206e 756d 6265 7220 746f 2063 6f6e rt number to con │ │ │ +00001a60: 6e65 6374 2074 6f2c 0a56 414c 2069 7320 nect to,.VAL is │ │ │ +00001a70: 6120 636f 6469 6e67 2073 7973 7465 6d2c a coding system, │ │ │ +00001a80: 2061 2063 6f6e 7320 6f66 2063 6f64 696e a cons of codin │ │ │ +00001a90: 6720 7379 7374 656d 732c 206f 7220 6120 g systems, or a │ │ │ +00001aa0: 6675 6e63 7469 6f6e 2073 796d 626f 6c2e function symbol. │ │ │ +00001ab0: 0a49 6620 5641 4c20 6973 2061 2063 6f64 .If VAL is a cod │ │ │ +00001ac0: 696e 6720 7379 7374 656d 2c20 6974 2069 ing system, it i │ │ │ +00001ad0: 7320 7573 6564 2066 6f72 2062 6f74 6820 s used for both │ │ │ +00001ae0: 6465 636f 6469 6e67 2077 6861 7420 7265 decoding what re │ │ │ +00001af0: 6365 6976 6564 0a66 726f 6d20 7468 6520 ceived.from the │ │ │ +00001b00: 6e65 7477 6f72 6b20 7374 7265 616d 2061 network stream a │ │ │ +00001b10: 6e64 2065 6e63 6f64 696e 6720 7768 6174 nd encoding what │ │ │ +00001b20: 2073 656e 7420 746f 2074 6865 206e 6574 sent to the net │ │ │ +00001b30: 776f 726b 2073 7472 6561 6d2e 0a49 6620 work stream..If │ │ │ +00001b40: 5641 4c20 6973 2061 2063 6f6e 7320 6f66 VAL is a cons of │ │ │ +00001b50: 2063 6f64 696e 6720 7379 7374 656d 732c coding systems, │ │ │ +00001b60: 2074 6865 2063 6172 2070 6172 7420 6973 the car part is │ │ │ +00001b70: 2075 7365 6420 666f 7220 6465 636f 6469 used for decodi │ │ │ +00001b80: 6e67 2c0a 616e 6420 7468 6520 6364 7220 ng,.and the cdr │ │ │ +00001b90: 7061 7274 2069 7320 7573 6564 2066 6f72 part is used for │ │ │ +00001ba0: 2065 6e63 6f64 696e 672e 0a49 6620 5641 encoding..If VA │ │ │ +00001bb0: 4c20 6973 2061 2066 756e 6374 696f 6e20 L is a function │ │ │ +00001bc0: 7379 6d62 6f6c 2c20 7468 6520 6675 6e63 symbol, the func │ │ │ +00001bd0: 7469 6f6e 206d 7573 7420 7265 7475 726e tion must return │ │ │ +00001be0: 2061 2063 6f64 696e 6720 7379 7374 656d a coding system │ │ │ +00001bf0: 0a6f 7220 6120 636f 6e73 206f 6620 636f .or a cons of co │ │ │ +00001c00: 6469 6e67 2073 7973 7465 6d73 2077 6869 ding systems whi │ │ │ +00001c10: 6368 2061 7265 2075 7365 6420 6173 2061 ch are used as a │ │ │ +00001c20: 626f 7665 2e0a 0a53 6565 2061 6c73 6f20 bove...See also │ │ │ +00001c30: 7468 6520 6675 6e63 7469 6f6e 2060 6669 the function `fi │ │ │ +00001c40: 6e64 2d6f 7065 7261 7469 6f6e 2d63 6f64 nd-operation-cod │ │ │ +00001c50: 696e 672d 7379 7374 656d 272e 1f0a 2864 ing-system'...(d │ │ │ +00001c60: 6566 7661 7220 6e65 7477 6f72 6b2d 636f efvar network-co │ │ │ +00001c70: 6469 6e67 2d73 7973 7465 6d2d 616c 6973 ding-system-alis │ │ │ +00001c80: 7420 6e69 6c20 2823 2420 2e20 3635 3531 t nil (#$ . 6551 │ │ │ +00001c90: 2929 0a23 4031 3238 3420 4f70 656e 2061 )).#@1284 Open a │ │ │ +00001ca0: 2054 4350 2063 6f6e 6e65 6374 696f 6e20 TCP connection │ │ │ +00001cb0: 666f 7220 6120 7365 7276 6963 6520 746f for a service to │ │ │ +00001cc0: 2061 2068 6f73 742e 0a52 6574 7572 6e20 a host..Return │ │ │ +00001cd0: 6120 7072 6f63 6573 7320 6f62 6a65 6374 a process object │ │ │ +00001ce0: 2074 6f20 7265 7072 6573 656e 7420 7468 to represent th │ │ │ +00001cf0: 6520 636f 6e6e 6563 7469 6f6e 2e0a 496e e connection..In │ │ │ +00001d00: 7075 7420 616e 6420 6f75 7470 7574 2077 put and output w │ │ │ +00001d10: 6f72 6b20 6173 2066 6f72 2073 7562 7072 ork as for subpr │ │ │ +00001d20: 6f63 6573 7365 733b 2060 6465 6c65 7465 ocesses; `delete │ │ │ +00001d30: 2d70 726f 6365 7373 2720 636c 6f73 6573 -process' closes │ │ │ +00001d40: 2069 742e 0a41 7267 7320 6172 6520 4e41 it..Args are NA │ │ │ +00001d50: 4d45 2042 5546 4645 5220 484f 5354 2053 ME BUFFER HOST S │ │ │ +00001d60: 4552 5649 4345 2e0a 4e41 4d45 2069 7320 ERVICE..NAME is │ │ │ +00001d70: 6e61 6d65 2066 6f72 2070 726f 6365 7373 name for process │ │ │ +00001d80: 2e20 2049 7420 6973 206d 6f64 6966 6965 . It is modifie │ │ │ +00001d90: 6420 6966 206e 6563 6573 7361 7279 2074 d if necessary t │ │ │ +00001da0: 6f20 6d61 6b65 2069 7420 756e 6971 7565 o make it unique │ │ │ +00001db0: 2e0a 4255 4646 4552 2069 7320 7468 6520 ..BUFFER is the │ │ │ +00001dc0: 6275 6666 6572 2028 6f72 2062 7566 6665 buffer (or buffe │ │ │ +00001dd0: 722d 6e61 6d65 2920 746f 2061 7373 6f63 r-name) to assoc │ │ │ +00001de0: 6961 7465 2077 6974 6820 7468 6520 7072 iate with the pr │ │ │ +00001df0: 6f63 6573 732e 0a20 5072 6f63 6573 7320 ocess.. Process │ │ │ +00001e00: 6f75 7470 7574 2067 6f65 7320 6174 2065 output goes at e │ │ │ +00001e10: 6e64 206f 6620 7468 6174 2062 7566 6665 nd of that buffe │ │ │ +00001e20: 722c 2075 6e6c 6573 7320 796f 7520 7370 r, unless you sp │ │ │ +00001e30: 6563 6966 790a 2061 6e20 6f75 7470 7574 ecify. an output │ │ │ +00001e40: 2073 7472 6561 6d20 6f72 2066 696c 7465 stream or filte │ │ │ +00001e50: 7220 6675 6e63 7469 6f6e 2074 6f20 6861 r function to ha │ │ │ +00001e60: 6e64 6c65 2074 6865 206f 7574 7075 742e ndle the output. │ │ │ +00001e70: 0a20 4255 4646 4552 206d 6179 2062 6520 . BUFFER may be │ │ │ +00001e80: 616c 736f 206e 696c 2c20 6d65 616e 696e also nil, meanin │ │ │ +00001e90: 6720 7468 6174 2074 6869 7320 7072 6f63 g that this proc │ │ │ +00001ea0: 6573 7320 6973 206e 6f74 2061 7373 6f63 ess is not assoc │ │ │ +00001eb0: 6961 7465 640a 2077 6974 6820 616e 7920 iated. with any │ │ │ +00001ec0: 6275 6666 6572 0a54 6869 7264 2061 7267 buffer.Third arg │ │ │ +00001ed0: 2069 7320 6e61 6d65 206f 6620 7468 6520 is name of the │ │ │ +00001ee0: 686f 7374 2074 6f20 636f 6e6e 6563 7420 host to connect │ │ │ +00001ef0: 746f 2c20 6f72 2069 7473 2049 5020 6164 to, or its IP ad │ │ │ +00001f00: 6472 6573 732e 0a46 6f75 7274 6820 6172 dress..Fourth ar │ │ │ +00001f10: 6720 5345 5256 4943 4520 6973 206e 616d g SERVICE is nam │ │ │ +00001f20: 6520 6f66 2074 6865 2073 6572 7669 6365 e of the service │ │ │ +00001f30: 2064 6573 6972 6564 2c20 6f72 2061 6e20 desired, or an │ │ │ +00001f40: 696e 7465 6765 720a 2073 7065 6369 6679 integer. specify │ │ │ +00001f50: 696e 6720 6120 706f 7274 206e 756d 6265 ing a port numbe │ │ │ +00001f60: 7220 746f 2063 6f6e 6e65 6374 2074 6f2e r to connect to. │ │ │ +00001f70: 0a46 6966 7468 2061 7267 756d 656e 7420 .Fifth argument │ │ │ +00001f80: 5052 4f54 4f43 4f4c 2069 7320 6120 6e65 PROTOCOL is a ne │ │ │ +00001f90: 7477 6f72 6b20 7072 6f74 6f63 6f6c 2e20 twork protocol. │ │ │ +00001fa0: 2043 7572 7265 6e74 6c79 2027 7463 700a Currently 'tcp. │ │ │ +00001fb0: 2028 5472 616e 736d 6973 7369 6f6e 2043 (Transmission C │ │ │ +00001fc0: 6f6e 7472 6f6c 2050 726f 746f 636f 6c29 ontrol Protocol) │ │ │ +00001fd0: 2061 6e64 2027 7564 7020 2855 7365 7220 and 'udp (User │ │ │ +00001fe0: 4461 7461 6772 616d 2050 726f 746f 636f Datagram Protoco │ │ │ +00001ff0: 6c29 2061 7265 0a20 7375 7070 6f72 7465 l) are. supporte │ │ │ +00002000: 642e 2020 5768 656e 206f 6d69 7474 6564 d. When omitted │ │ │ +00002010: 2c20 2774 6370 2069 7320 6173 7375 6d65 , 'tcp is assume │ │ │ +00002020: 642e 0a0a 4f75 7470 7574 2076 6961 2060 d...Output via ` │ │ │ +00002030: 7072 6f63 6573 732d 7365 6e64 2d73 7472 process-send-str │ │ │ +00002040: 696e 6727 2061 6e64 2069 6e70 7574 2076 ing' and input v │ │ │ +00002050: 6961 2062 7566 6665 7220 6f72 2066 696c ia buffer or fil │ │ │ +00002060: 7465 7220 2873 6565 0a60 7365 742d 7072 ter (see.`set-pr │ │ │ +00002070: 6f63 6573 732d 6669 6c74 6572 2729 2061 ocess-filter') a │ │ │ +00002080: 7265 2073 7472 6561 6d2d 6f72 6965 6e74 re stream-orient │ │ │ +00002090: 6564 2e20 2054 6861 7420 6d65 616e 7320 ed. That means │ │ │ +000020a0: 5544 5020 6461 7461 6772 616d 7320 6172 UDP datagrams ar │ │ │ +000020b0: 650a 6e6f 7420 6775 6172 616e 7465 6564 e.not guaranteed │ │ │ +000020c0: 2074 6f20 6265 2073 656e 7420 616e 6420 to be sent and │ │ │ +000020d0: 7265 6365 6976 6564 2069 6e20 6469 7363 received in disc │ │ │ +000020e0: 7265 7465 2070 6163 6b65 7473 2e20 2842 rete packets. (B │ │ │ +000020f0: 7574 2073 6d61 6c6c 0a64 6174 6167 7261 ut small.datagra │ │ │ +00002100: 6d73 2061 726f 756e 6420 3530 3020 6279 ms around 500 by │ │ │ +00002110: 7465 7320 7468 6174 2061 7265 206e 6f74 tes that are not │ │ │ +00002120: 2074 7275 6e63 6174 6564 2062 7920 6070 truncated by `p │ │ │ +00002130: 726f 6365 7373 2d73 656e 642d 7374 7269 rocess-send-stri │ │ │ +00002140: 6e67 270a 6172 6520 7573 7561 6c6c 7920 ng'.are usually │ │ │ +00002150: 6669 6e65 2e29 2020 4e6f 7465 2066 7572 fine.) Note fur │ │ │ +00002160: 7468 6572 2074 6861 7420 5544 5020 7072 ther that UDP pr │ │ │ +00002170: 6f74 6f63 6f6c 2064 6f65 7320 6e6f 7420 otocol does not │ │ │ +00002180: 6775 6172 6420 6167 6169 6e73 7420 0a6c guard against .l │ │ │ +00002190: 6f73 7420 7061 636b 6574 732e 1f0a 2864 ost packets...(d │ │ │ +000021a0: 6566 616c 6961 7320 276f 7065 6e2d 6e65 efalias 'open-ne │ │ │ +000021b0: 7477 6f72 6b2d 7374 7265 616d 2023 5b28 twork-stream #[( │ │ │ +000021c0: 6e61 6d65 2062 7566 6665 7220 686f 7374 name buffer host │ │ │ +000021d0: 2073 6572 7669 6365 2026 6f70 7469 6f6e service &option │ │ │ +000021e0: 616c 2070 726f 746f 636f 6c29 2022 c689 al protocol) ".. │ │ │ +000021f0: 1c1b c61d c7c8 8d88 c90d 21ab 850d ca5c ..........!....\ │ │ │ +00002200: 6e5c 2215 0d3a ab88 0d40 130d 4114 aa89 n\"..:...@..A... │ │ │ +00002210: cb0d 21ab 840d 130d 1429 09ae 810b 08ae ..!......)...... │ │ │ +00002220: 810c 1819 cc0e 0d0e 0e0e 0f5c 6e0e 1025 ...........\n..% │ │ │ +00002230: 2c87 2220 5b63 6f64 696e 672d 7379 7374 ,." [coding-syst │ │ │ +00002240: 656d 2d66 6f72 2d77 7269 7465 2063 6f64 em-for-write cod │ │ │ +00002250: 696e 672d 7379 7374 656d 2d66 6f72 2d72 ing-system-for-r │ │ │ +00002260: 6561 6420 7365 7276 6963 6520 6373 2d72 ead service cs-r │ │ │ +00002270: 2063 732d 7720 7265 7420 6e69 6c20 666f cs-w ret nil fo │ │ │ +00002280: 756e 6420 2862 7974 652d 636f 6465 2022 und (byte-code " │ │ │ +00002290: 5c6e c689 1d19 891b abba 0b40 4089 15a7 \n.........@@... │ │ │ +000022a0: ab89 0ca7 aba8 0d0c 61aa 980d 3bab 9f0c ........a...;... │ │ │ +000022b0: 3bab 86c7 0d0c 5c22 ac8c 0ca7 ab91 c70d ;.....\"........ │ │ │ +000022c0: c80c 215c 22ab 89c9 ca0b 4041 8910 5c22 ..!\".....@A..\" │ │ │ +000022d0: 880b 4189 13ac 462b c687 2220 5b72 6574 ..A...F+.." [ret │ │ │ +000022e0: 2063 6173 652d 666f 6c64 2d73 6561 7263 case-fold-searc │ │ │ +000022f0: 6820 6e65 7477 6f72 6b2d 636f 6469 6e67 h network-coding │ │ │ +00002300: 2d73 7973 7465 6d2d 616c 6973 7420 616c -system-alist al │ │ │ +00002310: 6973 7420 7365 7276 6963 6520 7061 7474 ist service patt │ │ │ +00002320: 6572 6e20 6e69 6c20 7374 7269 6e67 2d6d ern nil string-m │ │ │ +00002330: 6174 6368 206e 756d 6265 722d 746f 2d73 atch number-to-s │ │ │ +00002340: 7472 696e 6720 7468 726f 7720 666f 756e tring throw foun │ │ │ +00002350: 645d 2035 2920 6675 6e63 7469 6f6e 7020 d] 5) functionp │ │ │ +00002360: 6f70 656e 2d6e 6574 776f 726b 2d73 7472 open-network-str │ │ │ +00002370: 6561 6d20 6669 6e64 2d63 6f64 696e 672d eam find-coding- │ │ │ +00002380: 7379 7374 656d 206f 7065 6e2d 6e65 7477 system open-netw │ │ │ +00002390: 6f72 6b2d 7374 7265 616d 2d69 6e74 6572 ork-stream-inter │ │ │ +000023a0: 6e61 6c20 6e61 6d65 2062 7566 6665 7220 nal name buffer │ │ │ +000023b0: 686f 7374 2070 726f 746f 636f 6c5d 2036 host protocol] 6 │ │ │ +000023c0: 2028 2324 202e 2037 3332 3229 5d29 0a (#$ . 7322)]). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/coding.elc │ │ │ @@ -1,507 +1,507 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3535 2032 eb 25 01:53:55 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6f64 696e 672e 656c 0a3b 3b3b 2065 6d61 oding.el.;;; ema │ │ │ -000000a0: 6373 2076 6572 7369 6f6e 2032 312e 3420 cs version 21.4 │ │ │ -000000b0: 2870 6174 6368 2032 3429 2022 5374 616e (patch 24) "Stan │ │ │ -000000c0: 6461 7264 2043 2220 5845 6d61 6373 204c dard C" XEmacs L │ │ │ -000000d0: 7563 6964 2e0a 3b3b 3b20 6279 7465 636f ucid..;;; byteco │ │ │ -000000e0: 6d70 2076 6572 7369 6f6e 2032 2e32 3720 mp version 2.27 │ │ │ -000000f0: 5845 6d61 6373 3b20 3230 3030 2d30 392d XEmacs; 2000-09- │ │ │ -00000100: 3132 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 12..;;; optimiza │ │ │ -00000110: 7469 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 tion is on..;;; │ │ │ -00000120: 7468 6973 2066 696c 6520 7573 6573 206f this file uses o │ │ │ -00000130: 7063 6f64 6573 2077 6869 6368 2064 6f20 pcodes which do │ │ │ -00000140: 6e6f 7420 6578 6973 7420 696e 2045 6d61 not exist in Ema │ │ │ -00000150: 6373 2031 392e 0a0a 2869 6620 2861 6e64 cs 19...(if (and │ │ │ -00000160: 2028 626f 756e 6470 2027 656d 6163 732d (boundp 'emacs- │ │ │ -00000170: 7665 7273 696f 6e29 0a09 2028 6f72 2028 version).. (or ( │ │ │ -00000180: 616e 6420 2862 6f75 6e64 7020 2765 706f and (boundp 'epo │ │ │ -00000190: 6368 3a3a 7665 7273 696f 6e29 2065 706f ch::version) epo │ │ │ -000001a0: 6368 3a3a 7665 7273 696f 6e29 0a09 2020 ch::version).. │ │ │ -000001b0: 2020 2028 7374 7269 6e67 2d6c 6573 7370 (string-lessp │ │ │ -000001c0: 2065 6d61 6373 2d76 6572 7369 6f6e 2022 emacs-version " │ │ │ -000001d0: 3230 2229 2929 0a20 2020 2028 6572 726f 20"))). (erro │ │ │ -000001e0: 7220 2260 636f 6469 6e67 2e65 6c27 2077 r "`coding.el' w │ │ │ -000001f0: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ -00000200: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ -00000210: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ -00000220: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ -00000230: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ -00000240: 6c69 7374 206e 696c 2929 0a0a 0a28 6465 list nil))...(de │ │ │ -00000250: 6661 6c69 6173 2027 6368 6563 6b2d 636f falias 'check-co │ │ │ -00000260: 6469 6e67 2d73 7973 7465 6d20 2767 6574 ding-system 'get │ │ │ -00000270: 2d63 6f64 696e 672d 7379 7374 656d 290a -coding-system). │ │ │ -00000280: 2340 3538 204d 6f64 656c 696e 6520 636f #@58 Modeline co │ │ │ -00000290: 6e74 726f 6c20 666f 7220 7368 6f77 696e ntrol for showin │ │ │ -000002a0: 6720 6d75 6c74 6962 7974 6520 6578 7465 g multibyte exte │ │ │ -000002b0: 6e73 696f 6e20 7374 6174 7573 2e1f 0a28 nsion status...( │ │ │ -000002c0: 6465 6663 6f6e 7374 206d 6f64 656c 696e defconst modelin │ │ │ -000002d0: 652d 6d75 6c74 6962 7974 652d 7374 6174 e-multibyte-stat │ │ │ -000002e0: 7573 2027 2822 2543 2229 2028 2324 202e us '("%C") (#$ . │ │ │ -000002f0: 2036 3435 2929 0a28 6279 7465 2d63 6f64 645)).(byte-cod │ │ │ -00000300: 6520 22c1 c0c2 c308 4142 425c 2287 2220 e ".....ABB\"." │ │ │ -00000310: 5b6d 6f64 656c 696e 652d 666f 726d 6174 [modeline-format │ │ │ -00000320: 2073 6574 2d64 6566 6175 6c74 2022 2220 set-default "" │ │ │ -00000330: 6d6f 6465 6c69 6e65 2d6d 756c 7469 6279 modeline-multiby │ │ │ -00000340: 7465 2d73 7461 7475 735d 2035 290a 2340 te-status] 5).#@ │ │ │ -00000350: 3937 3320 4d6f 6469 6679 206f 6e65 206f 973 Modify one o │ │ │ -00000360: 6620 6c6f 6f6b 2075 7020 7461 626c 6573 f look up tables │ │ │ -00000370: 2066 6f72 2066 696e 6469 6e67 2061 2063 for finding a c │ │ │ -00000380: 6f64 696e 6720 7379 7374 656d 206f 6e20 oding system on │ │ │ -00000390: 492f 4f20 6f70 6572 6174 696f 6e2e 0a54 I/O operation..T │ │ │ -000003a0: 6865 7265 2061 7265 2074 6872 6565 206f here are three o │ │ │ -000003b0: 6620 7375 6368 2074 6162 6c65 732c 2060 f such tables, ` │ │ │ -000003c0: 6669 6c65 2d63 6f64 696e 672d 7379 7374 file-coding-syst │ │ │ -000003d0: 656d 2d61 6c69 7374 272c 0a60 7072 6f63 em-alist',.`proc │ │ │ -000003e0: 6573 732d 636f 6469 6e67 2d73 7973 7465 ess-coding-syste │ │ │ -000003f0: 6d2d 616c 6973 7427 2c20 616e 6420 606e m-alist', and `n │ │ │ -00000400: 6574 776f 726b 2d63 6f64 696e 672d 7379 etwork-coding-sy │ │ │ -00000410: 7374 656d 2d61 6c69 7374 272e 0a0a 5441 stem-alist'...TA │ │ │ -00000420: 5247 4554 2d54 5950 4520 7370 6563 6966 RGET-TYPE specif │ │ │ -00000430: 6965 7320 7768 6963 6820 6f66 2074 6865 ies which of the │ │ │ -00000440: 6d20 746f 206d 6f64 6966 792e 0a49 6620 m to modify..If │ │ │ -00000450: 6974 2069 7320 6066 696c 6527 2c20 6974 it is `file', it │ │ │ -00000460: 2061 6666 6563 7473 2060 6669 6c65 2d63 affects `file-c │ │ │ -00000470: 6f64 696e 672d 7379 7374 656d 2d61 6c69 oding-system-ali │ │ │ -00000480: 7374 2720 2877 6869 6368 2073 6565 292e st' (which see). │ │ │ -00000490: 0a49 6620 6974 2069 7320 6070 726f 6365 .If it is `proce │ │ │ -000004a0: 7373 272c 2069 7420 6166 6665 6374 7320 ss', it affects │ │ │ -000004b0: 6070 726f 6365 7373 2d63 6f64 696e 672d `process-coding- │ │ │ -000004c0: 7379 7374 656d 2d61 6c69 7374 2720 2877 system-alist' (w │ │ │ -000004d0: 6869 6368 2073 6565 292e 0a49 6620 6974 hich see)..If it │ │ │ -000004e0: 2069 7320 606e 6574 776f 726b 272c 2069 is `network', i │ │ │ -000004f0: 7420 6166 6665 6374 7320 606e 6574 776f t affects `netwo │ │ │ -00000500: 726b 2d63 6f64 696e 672d 7379 7374 656d rk-coding-system │ │ │ -00000510: 2d61 6c69 7374 2720 2877 6869 6368 2073 -alist' (which s │ │ │ -00000520: 6565 292e 0a0a 5245 4745 5850 2069 7320 ee)...REGEXP is │ │ │ -00000530: 6120 7265 6775 6c61 7220 6578 7072 6573 a regular expres │ │ │ -00000540: 7369 6f6e 206d 6174 6368 696e 6720 6120 sion matching a │ │ │ -00000550: 7461 7267 6574 206f 6620 492f 4f20 6f70 target of I/O op │ │ │ -00000560: 6572 6174 696f 6e2e 0a54 6865 2074 6172 eration..The tar │ │ │ -00000570: 6765 7420 6973 2061 2066 696c 6520 6e61 get is a file na │ │ │ -00000580: 6d65 2069 6620 5441 5247 4554 2d54 5950 me if TARGET-TYP │ │ │ -00000590: 4520 6973 2060 6669 6c65 272c 2061 2070 E is `file', a p │ │ │ -000005a0: 726f 6772 616d 206e 616d 6520 6966 0a54 rogram name if.T │ │ │ -000005b0: 4152 4745 542d 5459 5045 2069 7320 6070 ARGET-TYPE is `p │ │ │ -000005c0: 726f 6365 7373 272c 206f 7220 6120 6e65 rocess', or a ne │ │ │ -000005d0: 7477 6f72 6b20 7365 7276 6963 6520 6e61 twork service na │ │ │ -000005e0: 6d65 206f 7220 6120 706f 7274 206e 756d me or a port num │ │ │ -000005f0: 6265 720a 746f 2063 6f6e 6e65 6374 2074 ber.to connect t │ │ │ -00000600: 6f20 6966 2054 4152 4745 542d 5459 5045 o if TARGET-TYPE │ │ │ -00000610: 2069 7320 606e 6574 776f 726b 272e 0a0a is `network'... │ │ │ -00000620: 434f 4449 4e47 2d53 5953 5445 4d20 6973 CODING-SYSTEM is │ │ │ -00000630: 2061 2063 6f64 696e 6720 7379 7374 656d a coding system │ │ │ -00000640: 2074 6f20 7065 7266 6f72 6d20 636f 6465 to perform code │ │ │ -00000650: 2063 6f6e 7665 7273 696f 6e20 6f6e 2074 conversion on t │ │ │ -00000660: 6865 2049 2f4f 0a6f 7065 7261 7469 6f6e he I/O.operation │ │ │ -00000670: 2c20 6f72 2061 2063 6f6e 7320 6365 6c6c , or a cons cell │ │ │ -00000680: 2028 4445 434f 4449 4e47 202e 2045 4e43 (DECODING . ENC │ │ │ -00000690: 4f44 494e 4729 2073 7065 6369 6679 696e ODING) specifyin │ │ │ -000006a0: 6720 7468 6520 636f 6469 6e67 2073 7973 g the coding sys │ │ │ -000006b0: 7465 6d73 0a66 6f72 2064 6563 6f64 696e tems.for decodin │ │ │ -000006c0: 6720 616e 6420 656e 636f 6469 6e67 2072 g and encoding r │ │ │ -000006d0: 6573 7065 6374 6976 656c 792c 0a6f 7220 espectively,.or │ │ │ -000006e0: 6120 6675 6e63 7469 6f6e 2073 796d 626f a function symbo │ │ │ -000006f0: 6c20 7768 6963 682c 2077 6865 6e20 6361 l which, when ca │ │ │ -00000700: 6c6c 6564 2c20 7265 7475 726e 7320 7375 lled, returns su │ │ │ -00000710: 6368 2061 2063 6f6e 7320 6365 6c6c 2e1f ch a cons cell.. │ │ │ -00000720: 0a28 6465 6661 6c69 6173 2027 6d6f 6469 .(defalias 'modi │ │ │ -00000730: 6679 2d63 6f64 696e 672d 7379 7374 656d fy-coding-system │ │ │ -00000740: 2d61 6c69 7374 2023 5b28 7461 7267 6574 -alist #[(target │ │ │ -00000750: 2d74 7970 6520 7265 6765 7870 2063 6f64 -type regexp cod │ │ │ -00000760: 696e 672d 7379 7374 656d 2920 225c 6ec6 ing-system) "\n. │ │ │ -00000770: 73ac 85c7 c85c 6e5c 2288 0c3b ac8e 5c6e s....\n\"..;..\n │ │ │ -00000780: c961 ab84 0ca8 ac85 c7ca 0c5c 2288 0d39 .a.........\"..9 │ │ │ -00000790: ab8f cb0d 21ac 94cc 0d21 880d 8942 15aa ....!....!...B.. │ │ │ -000007a0: 8acc 0d40 2188 cc0d 4121 885c 6ecd 61ab ...@!...A!.\n.a. │ │ │ -000007b0: 96ce 0c09 5c22 891b ab85 0b0d a1aa 870c ....\".......... │ │ │ -000007c0: 0d42 0942 8911 2987 5c6e cf61 ab96 ce0c .B.B..).\n.a.... │ │ │ -000007d0: 085c 2289 1bab 850b 0da1 aa87 0c0d 4208 .\"...........B. │ │ │ -000007e0: 4289 1029 87ce 0c0e 105c 2289 1bab 850b B..).....\"..... │ │ │ -000007f0: 0da1 aa89 0c0d 420e 1042 8916 1029 8722 ......B..B...)." │ │ │ -00000800: 205b 7072 6f63 6573 732d 636f 6469 6e67 [process-coding │ │ │ -00000810: 2d73 7973 7465 6d2d 616c 6973 7420 6669 -system-alist fi │ │ │ -00000820: 6c65 2d63 6f64 696e 672d 7379 7374 656d le-coding-system │ │ │ -00000830: 2d61 6c69 7374 2074 6172 6765 742d 7479 -alist target-ty │ │ │ -00000840: 7065 2073 6c6f 7420 7265 6765 7870 2063 pe slot regexp c │ │ │ -00000850: 6f64 696e 672d 7379 7374 656d 2028 6669 oding-system (fi │ │ │ -00000860: 6c65 2070 726f 6365 7373 206e 6574 776f le process netwo │ │ │ -00000870: 726b 2920 6572 726f 7220 2249 6e76 616c rk) error "Inval │ │ │ -00000880: 6964 2074 6172 6765 7420 7479 7065 3a20 id target type: │ │ │ -00000890: 2573 2220 6e65 7477 6f72 6b20 2249 6e76 %s" network "Inv │ │ │ -000008a0: 616c 6964 2072 6567 756c 6172 2065 7870 alid regular exp │ │ │ -000008b0: 7265 7373 696f 6e3a 2025 7322 2066 626f ression: %s" fbo │ │ │ -000008c0: 756e 6470 2063 6865 636b 2d63 6f64 696e undp check-codin │ │ │ -000008d0: 672d 7379 7374 656d 2066 696c 6520 6173 g-system file as │ │ │ -000008e0: 736f 6320 7072 6f63 6573 7320 6e65 7477 soc process netw │ │ │ -000008f0: 6f72 6b2d 636f 6469 6e67 2d73 7973 7465 ork-coding-syste │ │ │ -00000900: 6d2d 616c 6973 745d 2034 2028 2324 202e m-alist] 4 (#$ . │ │ │ -00000910: 2038 3532 295d 290a 2340 3632 2052 6574 852)]).#@62 Ret │ │ │ -00000920: 7572 6e20 636f 6469 6e67 2d73 7973 7465 urn coding-syste │ │ │ -00000930: 6d20 6f66 2077 6861 7420 6973 2073 656e m of what is sen │ │ │ -00000940: 7420 6672 6f6d 2074 6572 6d69 6e61 6c20 t from terminal │ │ │ -00000950: 6b65 7962 6f61 7264 2e1f 0a28 6465 6661 keyboard...(defa │ │ │ -00000960: 6c69 6173 2027 6b65 7962 6f61 7264 2d63 lias 'keyboard-c │ │ │ -00000970: 6f64 696e 672d 7379 7374 656d 2023 5b6e oding-system #[n │ │ │ -00000980: 696c 2022 0887 2220 5b6b 6579 626f 6172 il ".." [keyboar │ │ │ -00000990: 642d 636f 6469 6e67 2d73 7973 7465 6d5d d-coding-system] │ │ │ -000009a0: 2031 2028 2324 202e 2032 3333 3329 5d29 1 (#$ . 2333)]) │ │ │ -000009b0: 0a28 6279 7465 2d63 6f64 6520 22c0 c14e .(byte-code "..N │ │ │ -000009c0: c273 ac85 c3c4 c05c 2288 c5c0 c1c6 2387 .s.....\".....#. │ │ │ -000009d0: 2220 5b6b 6579 626f 6172 642d 636f 6469 " [keyboard-codi │ │ │ -000009e0: 6e67 2d73 7973 7465 6d20 6279 7465 2d6f ng-system byte-o │ │ │ -000009f0: 7074 696d 697a 6572 2028 6e69 6c20 6279 ptimizer (nil by │ │ │ -00000a00: 7465 2d63 6f6d 7069 6c65 2d69 6e6c 696e te-compile-inlin │ │ │ -00000a10: 652d 6578 7061 6e64 2920 6572 726f 7220 e-expand) error │ │ │ -00000a20: 2225 7320 616c 7265 6164 7920 6861 7320 "%s already has │ │ │ -00000a30: 6120 6279 7465 2d6f 7074 696d 697a 6572 a byte-optimizer │ │ │ -00000a40: 2c20 6361 6e27 7420 6d61 6b65 2069 7420 , can't make it │ │ │ -00000a50: 696e 6c69 6e65 2220 7075 7420 6279 7465 inline" put byte │ │ │ -00000a60: 2d63 6f6d 7069 6c65 2d69 6e6c 696e 652d -compile-inline- │ │ │ -00000a70: 6578 7061 6e64 5d20 3429 0a23 4037 3020 expand] 4).#@70 │ │ │ -00000a80: 5365 7420 7468 6520 636f 6469 6e67 2073 Set the coding s │ │ │ -00000a90: 7973 7465 6d20 7573 6564 2066 6f72 2054 ystem used for T │ │ │ -00000aa0: 5459 206b 6579 626f 6172 6420 696e 7075 TY keyboard inpu │ │ │ -00000ab0: 742e 2043 7572 7265 6e74 6c79 2062 726f t. Currently bro │ │ │ -00000ac0: 6b65 6e2e 1f0a 2864 6566 616c 6961 7320 ken...(defalias │ │ │ -00000ad0: 2773 6574 2d6b 6579 626f 6172 642d 636f 'set-keyboard-co │ │ │ -00000ae0: 6469 6e67 2d73 7973 7465 6d20 235b 2863 ding-system #[(c │ │ │ -00000af0: 6f64 696e 672d 7379 7374 656d 2920 22c2 oding-system) ". │ │ │ -00000b00: 0921 8809 10c3 20c4 61ab 86c5 c620 085c .!.... .a.... .\ │ │ │ -00000b10: 2288 c7c8 2187 2220 5b6b 6579 626f 6172 "...!." [keyboar │ │ │ -00000b20: 642d 636f 6469 6e67 2d73 7973 7465 6d20 d-coding-system │ │ │ -00000b30: 636f 6469 6e67 2d73 7973 7465 6d20 6765 coding-system ge │ │ │ -00000b40: 742d 636f 6469 6e67 2d73 7973 7465 6d20 t-coding-system │ │ │ -00000b50: 6465 7669 6365 2d74 7970 6520 7474 7920 device-type tty │ │ │ -00000b60: 7365 742d 636f 6e73 6f6c 652d 7474 792d set-console-tty- │ │ │ -00000b70: 696e 7075 742d 636f 6469 6e67 2d73 7973 input-coding-sys │ │ │ -00000b80: 7465 6d20 6465 7669 6365 2d63 6f6e 736f tem device-conso │ │ │ -00000b90: 6c65 2072 6564 7261 772d 6d6f 6465 6c69 le redraw-modeli │ │ │ -00000ba0: 6e65 2074 5d20 3320 2823 2420 2e20 3236 ne t] 3 (#$ . 26 │ │ │ -00000bb0: 3838 2920 227a 6b65 7962 6f61 7264 2d63 88) "zkeyboard-c │ │ │ -00000bc0: 6f64 696e 672d 7379 7374 656d 3a20 225d oding-system: "] │ │ │ -00000bd0: 290a 2340 3430 2052 6574 7572 6e20 636f ).#@40 Return co │ │ │ -00000be0: 6469 6e67 2d73 7973 7465 6d20 6f66 2079 ding-system of y │ │ │ -00000bf0: 6f75 7220 7465 726d 696e 616c 2e1f 0a28 our terminal...( │ │ │ -00000c00: 6465 6661 6c69 6173 2027 7465 726d 696e defalias 'termin │ │ │ -00000c10: 616c 2d63 6f64 696e 672d 7379 7374 656d al-coding-system │ │ │ -00000c20: 2023 5b6e 696c 2022 0887 2220 5b74 6572 #[nil ".." [ter │ │ │ -00000c30: 6d69 6e61 6c2d 636f 6469 6e67 2d73 7973 minal-coding-sys │ │ │ -00000c40: 7465 6d5d 2031 2028 2324 202e 2033 3033 tem] 1 (#$ . 303 │ │ │ -00000c50: 3129 5d29 0a28 6279 7465 2d63 6f64 6520 1)]).(byte-code │ │ │ -00000c60: 22c0 c14e c273 ac85 c3c4 c05c 2288 c5c0 "..N.s.....\"... │ │ │ -00000c70: c1c6 2387 2220 5b74 6572 6d69 6e61 6c2d ..#." [terminal- │ │ │ -00000c80: 636f 6469 6e67 2d73 7973 7465 6d20 6279 coding-system by │ │ │ -00000c90: 7465 2d6f 7074 696d 697a 6572 2028 6e69 te-optimizer (ni │ │ │ -00000ca0: 6c20 6279 7465 2d63 6f6d 7069 6c65 2d69 l byte-compile-i │ │ │ -00000cb0: 6e6c 696e 652d 6578 7061 6e64 2920 6572 nline-expand) er │ │ │ -00000cc0: 726f 7220 2225 7320 616c 7265 6164 7920 ror "%s already │ │ │ -00000cd0: 6861 7320 6120 6279 7465 2d6f 7074 696d has a byte-optim │ │ │ -00000ce0: 697a 6572 2c20 6361 6e27 7420 6d61 6b65 izer, can't make │ │ │ -00000cf0: 2069 7420 696e 6c69 6e65 2220 7075 7420 it inline" put │ │ │ -00000d00: 6279 7465 2d63 6f6d 7069 6c65 2d69 6e6c byte-compile-inl │ │ │ -00000d10: 696e 652d 6578 7061 6e64 5d20 3429 0a23 ine-expand] 4).# │ │ │ -00000d20: 4037 3020 5365 7420 7468 6520 636f 6469 @70 Set the codi │ │ │ -00000d30: 6e67 2073 7973 7465 6d20 7573 6564 2066 ng system used f │ │ │ -00000d40: 6f72 2054 5459 2064 6973 706c 6179 206f or TTY display o │ │ │ -00000d50: 7574 7075 742e 2043 7572 7265 6e74 6c79 utput. Currently │ │ │ -00000d60: 2062 726f 6b65 6e2e 1f0a 2864 6566 616c broken...(defal │ │ │ -00000d70: 6961 7320 2773 6574 2d74 6572 6d69 6e61 ias 'set-termina │ │ │ -00000d80: 6c2d 636f 6469 6e67 2d73 7973 7465 6d20 l-coding-system │ │ │ -00000d90: 235b 2863 6f64 696e 672d 7379 7374 656d #[(coding-system │ │ │ -00000da0: 2920 22c2 0921 8809 10c3 20c4 61ab 86c5 ) "..!.... .a... │ │ │ -00000db0: c620 085c 2288 c7c8 2187 2220 5b74 6572 . .\"...!." [ter │ │ │ -00000dc0: 6d69 6e61 6c2d 636f 6469 6e67 2d73 7973 minal-coding-sys │ │ │ -00000dd0: 7465 6d20 636f 6469 6e67 2d73 7973 7465 tem coding-syste │ │ │ -00000de0: 6d20 6765 742d 636f 6469 6e67 2d73 7973 m get-coding-sys │ │ │ -00000df0: 7465 6d20 6465 7669 6365 2d74 7970 6520 tem device-type │ │ │ -00000e00: 7474 7920 7365 742d 636f 6e73 6f6c 652d tty set-console- │ │ │ -00000e10: 7474 792d 6f75 7470 7574 2d63 6f64 696e tty-output-codin │ │ │ -00000e20: 672d 7379 7374 656d 2064 6576 6963 652d g-system device- │ │ │ -00000e30: 636f 6e73 6f6c 6520 7265 6472 6177 2d6d console redraw-m │ │ │ -00000e40: 6f64 656c 696e 6520 745d 2033 2028 2324 odeline t] 3 (#$ │ │ │ -00000e50: 202e 2033 3336 3429 2022 7a74 6572 6d69 . 3364) "ztermi │ │ │ -00000e60: 6e61 6c2d 636f 6469 6e67 2d73 7973 7465 nal-coding-syste │ │ │ -00000e70: 6d3a 2022 5d29 0a23 4035 3620 5365 7420 m: "]).#@56 Set │ │ │ -00000e80: 7468 6520 636f 6469 6e67 2073 7973 7465 the coding syste │ │ │ -00000e90: 6d20 7573 6564 2066 6f72 2066 696c 6520 m used for file │ │ │ -00000ea0: 7379 7374 656d 2070 6174 6820 6e61 6d65 system path name │ │ │ -00000eb0: 732e 1f0a 2864 6566 616c 6961 7320 2773 s...(defalias 's │ │ │ -00000ec0: 6574 2d70 6174 686e 616d 652d 636f 6469 et-pathname-codi │ │ │ -00000ed0: 6e67 2d73 7973 7465 6d20 235b 2863 6f64 ng-system #[(cod │ │ │ -00000ee0: 696e 672d 7379 7374 656d 2920 22c2 0921 ing-system) "..! │ │ │ -00000ef0: 8809 8910 8722 205b 6669 6c65 2d6e 616d ....." [file-nam │ │ │ -00000f00: 652d 636f 6469 6e67 2d73 7973 7465 6d20 e-coding-system │ │ │ -00000f10: 636f 6469 6e67 2d73 7973 7465 6d20 6765 coding-system ge │ │ │ -00000f20: 742d 636f 6469 6e67 2d73 7973 7465 6d5d t-coding-system] │ │ │ -00000f30: 2032 2028 2324 202e 2033 3730 3829 2022 2 (#$ . 3708) " │ │ │ -00000f40: 7a50 6174 686e 616d 652d 636f 6469 6e67 zPathname-coding │ │ │ -00000f50: 2d73 7973 7465 6d3a 2022 5d29 0a23 4031 -system: "]).#@1 │ │ │ -00000f60: 3530 2053 686f 7720 7468 6520 656e 636f 50 Show the enco │ │ │ -00000f70: 6469 6e67 206f 6620 7465 7874 2069 6e20 ding of text in │ │ │ -00000f80: 7468 6520 7265 6769 6f6e 2e0a 5468 6973 the region..This │ │ │ -00000f90: 2066 756e 6374 696f 6e20 6973 206d 6561 function is mea │ │ │ -00000fa0: 6e74 2074 6f20 6265 2063 616c 6c65 6420 nt to be called │ │ │ -00000fb0: 696e 7465 7261 6374 6976 656c 793b 0a66 interactively;.f │ │ │ -00000fc0: 726f 6d20 6120 4c69 7370 2070 726f 6772 rom a Lisp progr │ │ │ -00000fd0: 616d 2c20 7573 6520 6064 6574 6563 742d am, use `detect- │ │ │ -00000fe0: 636f 6469 6e67 2d72 6567 696f 6e27 2069 coding-region' i │ │ │ -00000ff0: 6e73 7465 6164 2e1f 0a28 6465 6661 6c69 nstead...(defali │ │ │ -00001000: 6173 2027 7768 6174 2d63 6f64 696e 672d as 'what-coding- │ │ │ -00001010: 7379 7374 656d 2023 5b28 7374 6172 7420 system #[(start │ │ │ -00001020: 656e 6420 266f 7074 696f 6e61 6c20 6172 end &optional ar │ │ │ -00001030: 6729 2022 c2c3 0908 5c22 2187 2220 5b65 g) "....\"!." [e │ │ │ -00001040: 6e64 2073 7461 7274 2070 7269 6e63 2064 nd start princ d │ │ │ -00001050: 6574 6563 742d 636f 6469 6e67 2d72 6567 etect-coding-reg │ │ │ -00001060: 696f 6e5d 2034 2028 2324 202e 2033 3933 ion] 4 (#$ . 393 │ │ │ -00001070: 3929 2022 725c 6e50 225d 290a 2340 3133 9) "r\nP"]).#@13 │ │ │ -00001080: 3320 4465 636f 6465 2074 6865 2073 7472 3 Decode the str │ │ │ -00001090: 696e 6720 5354 5220 7768 6963 6820 6973 ing STR which is │ │ │ -000010a0: 2065 6e63 6f64 6564 2069 6e20 434f 4449 encoded in CODI │ │ │ -000010b0: 4e47 2d53 5953 5445 4d2e 0a44 6f65 7320 NG-SYSTEM..Does │ │ │ -000010c0: 6e6f 7420 6d6f 6469 6679 2053 5452 2e20 not modify STR. │ │ │ -000010d0: 2052 6574 7572 6e73 2074 6865 2064 6563 Returns the dec │ │ │ -000010e0: 6f64 6564 2073 7472 696e 6720 6f6e 2073 oded string on s │ │ │ -000010f0: 7563 6365 7373 6675 6c20 636f 6e76 6572 uccessful conver │ │ │ -00001100: 7369 6f6e 2e1f 0a28 6465 6661 6c69 6173 sion...(defalias │ │ │ -00001110: 2027 6465 636f 6465 2d63 6f64 696e 672d 'decode-coding- │ │ │ -00001120: 7374 7269 6e67 2023 5b28 7374 7220 636f string #[(str co │ │ │ -00001130: 6469 6e67 2d73 7973 7465 6d29 2022 c3c4 ding-system) ".. │ │ │ -00001140: c521 211a c68e 725c 6e71 8809 6388 c765 .!!...r\nq..c..e │ │ │ -00001150: 6408 2388 c820 2b87 2220 5b63 6f64 696e d.#.. +." [codin │ │ │ -00001160: 672d 7379 7374 656d 2073 7472 2023 313d g-system str #1= │ │ │ -00001170: 233a 7465 6d70 2d62 7566 6665 7220 6765 #:temp-buffer ge │ │ │ -00001180: 742d 6275 6666 6572 2d63 7265 6174 6520 t-buffer-create │ │ │ -00001190: 6765 6e65 7261 7465 2d6e 6577 2d62 7566 generate-new-buf │ │ │ -000011a0: 6665 722d 6e61 6d65 2022 202a 7465 6d70 fer-name " *temp │ │ │ -000011b0: 2a22 2028 2862 7974 652d 636f 6465 2022 *" ((byte-code " │ │ │ -000011c0: c108 21ab 84c2 0821 88c1 8722 205b 2331 ..!....!..." [#1 │ │ │ -000011d0: 2320 6275 6666 6572 2d6e 616d 6520 6b69 # buffer-name ki │ │ │ -000011e0: 6c6c 2d62 7566 6665 725d 2032 2929 2064 ll-buffer] 2)) d │ │ │ -000011f0: 6563 6f64 652d 636f 6469 6e67 2d72 6567 ecode-coding-reg │ │ │ -00001200: 696f 6e20 6275 6666 6572 2d73 7472 696e ion buffer-strin │ │ │ -00001210: 675d 2034 2028 2324 202e 2034 3232 3629 g] 4 (#$ . 4226) │ │ │ -00001220: 5d29 0a23 4031 3139 2045 6e63 6f64 6520 ]).#@119 Encode │ │ │ -00001230: 7468 6520 7374 7269 6e67 2053 5452 2075 the string STR u │ │ │ -00001240: 7369 6e67 2043 4f44 494e 472d 5359 5354 sing CODING-SYST │ │ │ -00001250: 454d 2e0a 446f 6573 206e 6f74 206d 6f64 EM..Does not mod │ │ │ -00001260: 6966 7920 5354 522e 2020 5265 7475 726e ify STR. Return │ │ │ -00001270: 7320 7468 6520 656e 636f 6465 6420 7374 s the encoded st │ │ │ -00001280: 7269 6e67 206f 6e20 7375 6363 6573 7366 ring on successf │ │ │ -00001290: 756c 2063 6f6e 7665 7273 696f 6e2e 1f0a ul conversion... │ │ │ -000012a0: 2864 6566 616c 6961 7320 2765 6e63 6f64 (defalias 'encod │ │ │ -000012b0: 652d 636f 6469 6e67 2d73 7472 696e 6720 e-coding-string │ │ │ -000012c0: 235b 2873 7472 2063 6f64 696e 672d 7379 #[(str coding-sy │ │ │ -000012d0: 7374 656d 2920 22c3 c4c5 2121 1ac6 8e72 stem) "...!!...r │ │ │ -000012e0: 5c6e 7188 0963 88c7 6564 0823 88c8 202b \nq..c..ed.#.. + │ │ │ -000012f0: 8722 205b 636f 6469 6e67 2d73 7973 7465 ." [coding-syste │ │ │ -00001300: 6d20 7374 7220 2331 3d23 3a74 656d 702d m str #1=#:temp- │ │ │ -00001310: 6275 6666 6572 2067 6574 2d62 7566 6665 buffer get-buffe │ │ │ -00001320: 722d 6372 6561 7465 2067 656e 6572 6174 r-create generat │ │ │ -00001330: 652d 6e65 772d 6275 6666 6572 2d6e 616d e-new-buffer-nam │ │ │ -00001340: 6520 2220 2a74 656d 702a 2220 2828 6279 e " *temp*" ((by │ │ │ -00001350: 7465 2d63 6f64 6520 22c1 0821 ab84 c208 te-code "..!.... │ │ │ -00001360: 2188 c187 2220 5b23 3123 2062 7566 6665 !..." [#1# buffe │ │ │ -00001370: 722d 6e61 6d65 206b 696c 6c2d 6275 6666 r-name kill-buff │ │ │ -00001380: 6572 5d20 3229 2920 656e 636f 6465 2d63 er] 2)) encode-c │ │ │ -00001390: 6f64 696e 672d 7265 6769 6f6e 2062 7566 oding-region buf │ │ │ -000013a0: 6665 722d 7374 7269 6e67 5d20 3420 2823 fer-string] 4 (# │ │ │ -000013b0: 2420 2e20 3436 3439 295d 290a 2340 3439 $ . 4649)]).#@49 │ │ │ -000013c0: 2052 6574 7572 6e20 7468 6520 276d 6e65 Return the 'mne │ │ │ -000013d0: 6d6f 6e69 6320 7072 6f70 6572 7479 206f monic property o │ │ │ -000013e0: 6620 434f 4449 4e47 2d53 5953 5445 4d2e f CODING-SYSTEM. │ │ │ -000013f0: 1f0a 2864 6566 616c 6961 7320 2763 6f64 ..(defalias 'cod │ │ │ -00001400: 696e 672d 7379 7374 656d 2d6d 6e65 6d6f ing-system-mnemo │ │ │ -00001410: 6e69 6320 235b 2863 6f64 696e 672d 7379 nic #[(coding-sy │ │ │ -00001420: 7374 656d 2920 22c1 08c2 5c22 8722 205b stem) "...\"." [ │ │ │ -00001430: 636f 6469 6e67 2d73 7973 7465 6d20 636f coding-system co │ │ │ -00001440: 6469 6e67 2d73 7973 7465 6d2d 7072 6f70 ding-system-prop │ │ │ -00001450: 6572 7479 206d 6e65 6d6f 6e69 635d 2033 erty mnemonic] 3 │ │ │ -00001460: 2028 2324 202e 2035 3035 3729 5d29 0a28 (#$ . 5057)]).( │ │ │ -00001470: 6465 6661 6c69 6173 2027 636f 6469 6e67 defalias 'coding │ │ │ -00001480: 2d73 7973 7465 6d2d 646f 6373 7472 696e -system-docstrin │ │ │ -00001490: 6720 2763 6f64 696e 672d 7379 7374 656d g 'coding-system │ │ │ -000014a0: 2d64 6f63 2d73 7472 696e 6729 0a23 4034 -doc-string).#@4 │ │ │ -000014b0: 3920 5265 7475 726e 2074 6865 2027 656f 9 Return the 'eo │ │ │ -000014c0: 6c2d 7479 7065 2070 726f 7065 7274 7920 l-type property │ │ │ -000014d0: 6f66 2043 4f44 494e 472d 5359 5354 454d of CODING-SYSTEM │ │ │ -000014e0: 2e1f 0a28 6465 6661 6c69 6173 2027 636f ...(defalias 'co │ │ │ -000014f0: 6469 6e67 2d73 7973 7465 6d2d 656f 6c2d ding-system-eol- │ │ │ -00001500: 7479 7065 2023 5b28 636f 6469 6e67 2d73 type #[(coding-s │ │ │ -00001510: 7973 7465 6d29 2022 c108 c25c 2287 2220 ystem) "...\"." │ │ │ -00001520: 5b63 6f64 696e 672d 7379 7374 656d 2063 [coding-system c │ │ │ -00001530: 6f64 696e 672d 7379 7374 656d 2d70 726f oding-system-pro │ │ │ -00001540: 7065 7274 7920 656f 6c2d 7479 7065 5d20 perty eol-type] │ │ │ -00001550: 3320 2823 2420 2e20 3532 3938 295d 290a 3 (#$ . 5298)]). │ │ │ -00001560: 2340 3437 2052 6574 7572 6e20 7468 6520 #@47 Return the │ │ │ -00001570: 2765 6f6c 2d6c 6620 7072 6f70 6572 7479 'eol-lf property │ │ │ -00001580: 206f 6620 434f 4449 4e47 2d53 5953 5445 of CODING-SYSTE │ │ │ -00001590: 4d2e 1f0a 2864 6566 616c 6961 7320 2763 M...(defalias 'c │ │ │ -000015a0: 6f64 696e 672d 7379 7374 656d 2d65 6f6c oding-system-eol │ │ │ -000015b0: 2d6c 6620 235b 2863 6f64 696e 672d 7379 -lf #[(coding-sy │ │ │ -000015c0: 7374 656d 2920 22c1 08c2 5c22 8722 205b stem) "...\"." [ │ │ │ -000015d0: 636f 6469 6e67 2d73 7973 7465 6d20 636f coding-system co │ │ │ -000015e0: 6469 6e67 2d73 7973 7465 6d2d 7072 6f70 ding-system-prop │ │ │ -000015f0: 6572 7479 2065 6f6c 2d6c 665d 2033 2028 erty eol-lf] 3 ( │ │ │ -00001600: 2324 202e 2035 3437 3729 5d29 0a23 4034 #$ . 5477)]).#@4 │ │ │ -00001610: 3920 5265 7475 726e 2074 6865 2027 656f 9 Return the 'eo │ │ │ -00001620: 6c2d 6372 6c66 2070 726f 7065 7274 7920 l-crlf property │ │ │ -00001630: 6f66 2043 4f44 494e 472d 5359 5354 454d of CODING-SYSTEM │ │ │ -00001640: 2e1f 0a28 6465 6661 6c69 6173 2027 636f ...(defalias 'co │ │ │ -00001650: 6469 6e67 2d73 7973 7465 6d2d 656f 6c2d ding-system-eol- │ │ │ -00001660: 6372 6c66 2023 5b28 636f 6469 6e67 2d73 crlf #[(coding-s │ │ │ -00001670: 7973 7465 6d29 2022 c108 c25c 2287 2220 ystem) "...\"." │ │ │ -00001680: 5b63 6f64 696e 672d 7379 7374 656d 2063 [coding-system c │ │ │ -00001690: 6f64 696e 672d 7379 7374 656d 2d70 726f oding-system-pro │ │ │ -000016a0: 7065 7274 7920 656f 6c2d 6372 6c66 5d20 perty eol-crlf] │ │ │ -000016b0: 3320 2823 2420 2e20 3536 3530 295d 290a 3 (#$ . 5650)]). │ │ │ -000016c0: 2340 3437 2052 6574 7572 6e20 7468 6520 #@47 Return the │ │ │ -000016d0: 2765 6f6c 2d63 7220 7072 6f70 6572 7479 'eol-cr property │ │ │ -000016e0: 206f 6620 434f 4449 4e47 2d53 5953 5445 of CODING-SYSTE │ │ │ -000016f0: 4d2e 1f0a 2864 6566 616c 6961 7320 2763 M...(defalias 'c │ │ │ -00001700: 6f64 696e 672d 7379 7374 656d 2d65 6f6c oding-system-eol │ │ │ -00001710: 2d63 7220 235b 2863 6f64 696e 672d 7379 -cr #[(coding-sy │ │ │ -00001720: 7374 656d 2920 22c1 08c2 5c22 8722 205b stem) "...\"." [ │ │ │ -00001730: 636f 6469 6e67 2d73 7973 7465 6d20 636f coding-system co │ │ │ -00001740: 6469 6e67 2d73 7973 7465 6d2d 7072 6f70 ding-system-prop │ │ │ -00001750: 6572 7479 2065 6f6c 2d63 725d 2033 2028 erty eol-cr] 3 ( │ │ │ -00001760: 2324 202e 2035 3832 3929 5d29 0a23 4036 #$ . 5829)]).#@6 │ │ │ -00001770: 3120 5265 7475 726e 2074 6865 2027 706f 1 Return the 'po │ │ │ -00001780: 7374 2d72 6561 642d 636f 6e76 6572 7369 st-read-conversi │ │ │ -00001790: 6f6e 2070 726f 7065 7274 7920 6f66 2043 on property of C │ │ │ -000017a0: 4f44 494e 472d 5359 5354 454d 2e1f 0a28 ODING-SYSTEM...( │ │ │ -000017b0: 6465 6661 6c69 6173 2027 636f 6469 6e67 defalias 'coding │ │ │ -000017c0: 2d73 7973 7465 6d2d 706f 7374 2d72 6561 -system-post-rea │ │ │ -000017d0: 642d 636f 6e76 6572 7369 6f6e 2023 5b28 d-conversion #[( │ │ │ -000017e0: 636f 6469 6e67 2d73 7973 7465 6d29 2022 coding-system) " │ │ │ -000017f0: c108 c25c 2287 2220 5b63 6f64 696e 672d ...\"." [coding- │ │ │ -00001800: 7379 7374 656d 2063 6f64 696e 672d 7379 system coding-sy │ │ │ -00001810: 7374 656d 2d70 726f 7065 7274 7920 706f stem-property po │ │ │ -00001820: 7374 2d72 6561 642d 636f 6e76 6572 7369 st-read-conversi │ │ │ -00001830: 6f6e 5d20 3320 2823 2420 2e20 3630 3032 on] 3 (#$ . 6002 │ │ │ -00001840: 295d 290a 2340 3631 2052 6574 7572 6e20 )]).#@61 Return │ │ │ -00001850: 7468 6520 2770 7265 2d77 7269 7465 2d63 the 'pre-write-c │ │ │ -00001860: 6f6e 7665 7273 696f 6e20 7072 6f70 6572 onversion proper │ │ │ -00001870: 7479 206f 6620 434f 4449 4e47 2d53 5953 ty of CODING-SYS │ │ │ -00001880: 5445 4d2e 1f0a 2864 6566 616c 6961 7320 TEM...(defalias │ │ │ -00001890: 2763 6f64 696e 672d 7379 7374 656d 2d70 'coding-system-p │ │ │ -000018a0: 7265 2d77 7269 7465 2d63 6f6e 7665 7273 re-write-convers │ │ │ -000018b0: 696f 6e20 235b 2863 6f64 696e 672d 7379 ion #[(coding-sy │ │ │ -000018c0: 7374 656d 2920 22c1 08c2 5c22 8722 205b stem) "...\"." [ │ │ │ -000018d0: 636f 6469 6e67 2d73 7973 7465 6d20 636f coding-system co │ │ │ -000018e0: 6469 6e67 2d73 7973 7465 6d2d 7072 6f70 ding-system-prop │ │ │ -000018f0: 6572 7479 2070 7265 2d77 7269 7465 2d63 erty pre-write-c │ │ │ -00001900: 6f6e 7665 7273 696f 6e5d 2033 2028 2324 onversion] 3 (#$ │ │ │ -00001910: 202e 2036 3231 3729 5d29 0a23 4034 3920 . 6217)]).#@49 │ │ │ -00001920: 5265 7475 726e 2074 6865 2062 6173 6520 Return the base │ │ │ -00001930: 636f 6469 6e67 2073 7973 7465 6d20 6f66 coding system of │ │ │ -00001940: 2043 4f44 494e 472d 5359 5354 454d 2e1f CODING-SYSTEM.. │ │ │ -00001950: 0a28 6465 6661 6c69 6173 2027 636f 6469 .(defalias 'codi │ │ │ -00001960: 6e67 2d73 7973 7465 6d2d 6261 7365 2023 ng-system-base # │ │ │ -00001970: 5b28 636f 6469 6e67 2d73 7973 7465 6d29 [(coding-system) │ │ │ -00001980: 2022 c108 21ac 8208 87c2 c3c4 c508 2121 "..!.........!! │ │ │ -00001990: c6c7 c8c4 c508 2121 5c22 4f21 2187 2220 ......!!\"O!!." │ │ │ -000019a0: 5b63 6f64 696e 672d 7379 7374 656d 2063 [coding-system c │ │ │ -000019b0: 6f64 696e 672d 7379 7374 656d 2d65 6f6c oding-system-eol │ │ │ -000019c0: 2d74 7970 6520 6669 6e64 2d63 6f64 696e -type find-codin │ │ │ -000019d0: 672d 7379 7374 656d 2069 6e74 6572 6e20 g-system intern │ │ │ -000019e0: 7379 6d62 6f6c 2d6e 616d 6520 636f 6469 symbol-name codi │ │ │ -000019f0: 6e67 2d73 7973 7465 6d2d 6e61 6d65 2030 ng-system-name 0 │ │ │ -00001a00: 2073 7472 696e 672d 6d61 7463 6820 222d string-match "- │ │ │ -00001a10: 756e 6978 245c 5c7c 2d64 6f73 245c 5c7c unix$\\|-dos$\\| │ │ │ -00001a20: 2d6d 6163 2422 5d20 3920 2823 2420 2e20 -mac$"] 9 (#$ . │ │ │ -00001a30: 3634 3332 295d 290a 2862 7974 652d 636f 6432)]).(byte-co │ │ │ -00001a40: 6465 2022 c0c1 89c2 c324 8722 205b 6d61 de ".....$." [ma │ │ │ -00001a50: 6b65 2d63 6f64 696e 672d 7379 7374 656d ke-coding-system │ │ │ -00001a60: 2075 6e64 6563 6964 6564 2022 4175 746f undecided "Auto │ │ │ -00001a70: 6d61 7469 6320 636f 6e76 6572 7369 6f6e matic conversion │ │ │ -00001a80: 2e22 2028 6d6e 656d 6f6e 6963 2022 4175 ." (mnemonic "Au │ │ │ -00001a90: 746f 2229 5d20 3529 0a28 6465 6661 6c69 to")] 5).(defali │ │ │ -00001aa0: 6173 2027 646f 6e74 7573 6574 6869 732d as 'dontusethis- │ │ │ -00001ab0: 7365 742d 7661 6c75 652d 6669 6c65 2d6e set-value-file-n │ │ │ -00001ac0: 616d 652d 636f 6469 6e67 2d73 7973 7465 ame-coding-syste │ │ │ -00001ad0: 6d2d 6861 6e64 6c65 7220 235b 2873 796d m-handler #[(sym │ │ │ -00001ae0: 2061 7267 7320 6675 6e20 6861 7267 2068 args fun harg h │ │ │ -00001af0: 616e 646c 6572 7329 2022 c1c2 0840 ae81 andlers) "...@.. │ │ │ -00001b00: c35c 2287 2220 5b61 7267 7320 6465 6669 .\"." [args defi │ │ │ -00001b10: 6e65 2d63 6f64 696e 672d 7379 7374 656d ne-coding-system │ │ │ -00001b20: 2d61 6c69 6173 2066 696c 652d 6e61 6d65 -alias file-name │ │ │ -00001b30: 2062 696e 6172 795d 2033 5d29 0a28 646f binary] 3]).(do │ │ │ -00001b40: 6e74 7573 6574 6869 732d 7365 742d 7379 ntusethis-set-sy │ │ │ -00001b50: 6d62 6f6c 2d76 616c 7565 2d68 616e 646c mbol-value-handl │ │ │ -00001b60: 6572 2027 6669 6c65 2d6e 616d 652d 636f er 'file-name-co │ │ │ -00001b70: 6469 6e67 2d73 7973 7465 6d20 2773 6574 ding-system 'set │ │ │ -00001b80: 2d76 616c 7565 2027 646f 6e74 7573 6574 -value 'dontuset │ │ │ -00001b90: 6869 732d 7365 742d 7661 6c75 652d 6669 his-set-value-fi │ │ │ -00001ba0: 6c65 2d6e 616d 652d 636f 6469 6e67 2d73 le-name-coding-s │ │ │ -00001bb0: 7973 7465 6d2d 6861 6e64 6c65 7229 0a28 ystem-handler).( │ │ │ -00001bc0: 6465 6661 6c69 6173 2027 646f 6e74 7573 defalias 'dontus │ │ │ -00001bd0: 6574 6869 732d 7365 742d 7661 6c75 652d ethis-set-value- │ │ │ -00001be0: 7465 726d 696e 616c 2d63 6f64 696e 672d terminal-coding- │ │ │ -00001bf0: 7379 7374 656d 2d68 616e 646c 6572 2023 system-handler # │ │ │ -00001c00: 5b28 7379 6d20 6172 6773 2066 756e 2068 [(sym args fun h │ │ │ -00001c10: 6172 6720 6861 6e64 6c65 7273 2920 22c1 arg handlers) ". │ │ │ -00001c20: c208 40ae 81c3 5c22 8722 205b 6172 6773 ..@...\"." [args │ │ │ -00001c30: 2064 6566 696e 652d 636f 6469 6e67 2d73 define-coding-s │ │ │ -00001c40: 7973 7465 6d2d 616c 6961 7320 7465 726d ystem-alias term │ │ │ -00001c50: 696e 616c 2062 696e 6172 795d 2033 5d29 inal binary] 3]) │ │ │ -00001c60: 0a28 646f 6e74 7573 6574 6869 732d 7365 .(dontusethis-se │ │ │ -00001c70: 742d 7379 6d62 6f6c 2d76 616c 7565 2d68 t-symbol-value-h │ │ │ -00001c80: 616e 646c 6572 2027 7465 726d 696e 616c andler 'terminal │ │ │ -00001c90: 2d63 6f64 696e 672d 7379 7374 656d 2027 -coding-system ' │ │ │ -00001ca0: 7365 742d 7661 6c75 6520 2764 6f6e 7475 set-value 'dontu │ │ │ -00001cb0: 7365 7468 6973 2d73 6574 2d76 616c 7565 sethis-set-value │ │ │ -00001cc0: 2d74 6572 6d69 6e61 6c2d 636f 6469 6e67 -terminal-coding │ │ │ -00001cd0: 2d73 7973 7465 6d2d 6861 6e64 6c65 7229 -system-handler) │ │ │ -00001ce0: 0a28 6465 6661 6c69 6173 2027 646f 6e74 .(defalias 'dont │ │ │ -00001cf0: 7573 6574 6869 732d 7365 742d 7661 6c75 usethis-set-valu │ │ │ -00001d00: 652d 6b65 7962 6f61 7264 2d63 6f64 696e e-keyboard-codin │ │ │ -00001d10: 672d 7379 7374 656d 2d68 616e 646c 6572 g-system-handler │ │ │ -00001d20: 2023 5b28 7379 6d20 6172 6773 2066 756e #[(sym args fun │ │ │ -00001d30: 2068 6172 6720 6861 6e64 6c65 7273 2920 harg handlers) │ │ │ -00001d40: 22c1 c208 40ae 81c3 5c22 8722 205b 6172 "...@...\"." [ar │ │ │ -00001d50: 6773 2064 6566 696e 652d 636f 6469 6e67 gs define-coding │ │ │ -00001d60: 2d73 7973 7465 6d2d 616c 6961 7320 6b65 -system-alias ke │ │ │ -00001d70: 7962 6f61 7264 2062 696e 6172 795d 2033 yboard binary] 3 │ │ │ -00001d80: 5d29 0a28 6279 7465 2d63 6f64 6520 22c5 ]).(byte-code ". │ │ │ -00001d90: c6c7 c823 88c9 c021 ac82 ca10 cbcc 21ac ...#...!......!. │ │ │ -00001da0: 8fcd cecf 5c22 88cd ced0 5c22 88d1 d2d3 ....\"....\".... │ │ │ -00001db0: 5c22 88cd ced4 5c22 88d5 d6d7 5c22 88d8 \"....\"....\".. │ │ │ -00001dc0: c01b 1cc9 0c21 ad84 c90b 213f c90c 21ad .....!....!?..!. │ │ │ -00001dd0: 820c 4a1a 19d9 0c0b 5c22 88da 0c0b 5c22 ..J.....\"....\" │ │ │ -00001de0: 8809 ab84 0b5c 6e4c 882c ca87 2220 5b66 .....\nL.,.." [f │ │ │ -00001df0: 696c 652d 6e61 6d65 2d63 6f64 696e 672d ile-name-coding- │ │ │ -00001e00: 7379 7374 656d 206e 6565 6473 2d73 6574 system needs-set │ │ │ -00001e10: 7469 6e67 2076 616c 7565 206e 6577 7661 ting value newva │ │ │ -00001e20: 7220 6f6c 6476 6172 2064 6f6e 7475 7365 r oldvar dontuse │ │ │ -00001e30: 7468 6973 2d73 6574 2d73 796d 626f 6c2d this-set-symbol- │ │ │ -00001e40: 7661 6c75 652d 6861 6e64 6c65 7220 6b65 value-handler ke │ │ │ -00001e50: 7962 6f61 7264 2d63 6f64 696e 672d 7379 yboard-coding-sy │ │ │ -00001e60: 7374 656d 2073 6574 2d76 616c 7565 2064 stem set-value d │ │ │ -00001e70: 6f6e 7475 7365 7468 6973 2d73 6574 2d76 ontusethis-set-v │ │ │ -00001e80: 616c 7565 2d6b 6579 626f 6172 642d 636f alue-keyboard-co │ │ │ -00001e90: 6469 6e67 2d73 7973 7465 6d2d 6861 6e64 ding-system-hand │ │ │ -00001ea0: 6c65 7220 626f 756e 6470 206e 696c 2066 ler boundp nil f │ │ │ -00001eb0: 6561 7475 7265 7020 6d75 6c65 2063 6f70 eaturep mule cop │ │ │ -00001ec0: 792d 636f 6469 6e67 2d73 7973 7465 6d20 y-coding-system │ │ │ -00001ed0: 756e 6465 6369 6465 6420 6973 6f2d 3838 undecided iso-88 │ │ │ -00001ee0: 3539 2d31 2069 736f 2d38 3835 392d 3220 59-1 iso-8859-2 │ │ │ -00001ef0: 6465 6669 6e65 2d63 6f64 696e 672d 7379 define-coding-sy │ │ │ -00001f00: 7374 656d 2d61 6c69 6173 2063 7465 7874 stem-alias ctext │ │ │ -00001f10: 2062 696e 6172 7920 6175 746f 6d61 7469 binary automati │ │ │ -00001f20: 632d 636f 6e76 6572 7369 6f6e 206d 616b c-conversion mak │ │ │ -00001f30: 652d 636f 6d70 6174 6962 6c65 2d76 6172 e-compatible-var │ │ │ -00001f40: 6961 626c 6520 656e 6162 6c65 2d6d 756c iable enable-mul │ │ │ -00001f50: 7469 6279 7465 2d63 6861 7261 6374 6572 tibyte-character │ │ │ -00001f60: 7320 2255 6e69 6d70 6c65 6d65 6e74 6564 s "Unimplemented │ │ │ -00001f70: 2220 7061 7468 6e61 6d65 2d63 6f64 696e " pathname-codin │ │ │ -00001f80: 672d 7379 7374 656d 2064 6566 7661 7261 g-system defvara │ │ │ -00001f90: 6c69 6173 206d 616b 652d 6f62 736f 6c65 lias make-obsole │ │ │ -00001fa0: 7465 2d76 6172 6961 626c 655d 2034 290a te-variable] 4). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3334 2032 3032 310a 3b3b 3b20 :08:34 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6f64 696e 672e 656c 4/lisp/coding.el │ │ │ +00000090: 0a3b 3b3b 2065 6d61 6373 2076 6572 7369 .;;; emacs versi │ │ │ +000000a0: 6f6e 2032 312e 3420 2870 6174 6368 2032 on 21.4 (patch 2 │ │ │ +000000b0: 3429 2022 5374 616e 6461 7264 2043 2220 4) "Standard C" │ │ │ +000000c0: 5845 6d61 6373 204c 7563 6964 2e0a 3b3b XEmacs Lucid..;; │ │ │ +000000d0: 3b20 6279 7465 636f 6d70 2076 6572 7369 ; bytecomp versi │ │ │ +000000e0: 6f6e 2032 2e32 3720 5845 6d61 6373 3b20 on 2.27 XEmacs; │ │ │ +000000f0: 3230 3030 2d30 392d 3132 2e0a 3b3b 3b20 2000-09-12..;;; │ │ │ +00000100: 6f70 7469 6d69 7a61 7469 6f6e 2069 7320 optimization is │ │ │ +00000110: 6f6e 2e0a 3b3b 3b20 7468 6973 2066 696c on..;;; this fil │ │ │ +00000120: 6520 7573 6573 206f 7063 6f64 6573 2077 e uses opcodes w │ │ │ +00000130: 6869 6368 2064 6f20 6e6f 7420 6578 6973 hich do not exis │ │ │ +00000140: 7420 696e 2045 6d61 6373 2031 392e 0a0a t in Emacs 19... │ │ │ +00000150: 2869 6620 2861 6e64 2028 626f 756e 6470 (if (and (boundp │ │ │ +00000160: 2027 656d 6163 732d 7665 7273 696f 6e29 'emacs-version) │ │ │ +00000170: 0a09 2028 6f72 2028 616e 6420 2862 6f75 .. (or (and (bou │ │ │ +00000180: 6e64 7020 2765 706f 6368 3a3a 7665 7273 ndp 'epoch::vers │ │ │ +00000190: 696f 6e29 2065 706f 6368 3a3a 7665 7273 ion) epoch::vers │ │ │ +000001a0: 696f 6e29 0a09 2020 2020 2028 7374 7269 ion).. (stri │ │ │ +000001b0: 6e67 2d6c 6573 7370 2065 6d61 6373 2d76 ng-lessp emacs-v │ │ │ +000001c0: 6572 7369 6f6e 2022 3230 2229 2929 0a20 ersion "20"))). │ │ │ +000001d0: 2020 2028 6572 726f 7220 2260 636f 6469 (error "`codi │ │ │ +000001e0: 6e67 2e65 6c27 2077 6173 2063 6f6d 7069 ng.el' was compi │ │ │ +000001f0: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ +00000200: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ +00000210: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ +00000220: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ +00000230: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ +00000240: 2929 0a0a 0a28 6465 6661 6c69 6173 2027 ))...(defalias ' │ │ │ +00000250: 6368 6563 6b2d 636f 6469 6e67 2d73 7973 check-coding-sys │ │ │ +00000260: 7465 6d20 2767 6574 2d63 6f64 696e 672d tem 'get-coding- │ │ │ +00000270: 7379 7374 656d 290a 2340 3538 204d 6f64 system).#@58 Mod │ │ │ +00000280: 656c 696e 6520 636f 6e74 726f 6c20 666f eline control fo │ │ │ +00000290: 7220 7368 6f77 696e 6720 6d75 6c74 6962 r showing multib │ │ │ +000002a0: 7974 6520 6578 7465 6e73 696f 6e20 7374 yte extension st │ │ │ +000002b0: 6174 7573 2e1f 0a28 6465 6663 6f6e 7374 atus...(defconst │ │ │ +000002c0: 206d 6f64 656c 696e 652d 6d75 6c74 6962 modeline-multib │ │ │ +000002d0: 7974 652d 7374 6174 7573 2027 2822 2543 yte-status '("%C │ │ │ +000002e0: 2229 2028 2324 202e 2036 3337 2929 0a28 ") (#$ . 637)).( │ │ │ +000002f0: 6279 7465 2d63 6f64 6520 22c1 c0c2 c308 byte-code "..... │ │ │ +00000300: 4142 425c 2287 2220 5b6d 6f64 656c 696e ABB\"." [modelin │ │ │ +00000310: 652d 666f 726d 6174 2073 6574 2d64 6566 e-format set-def │ │ │ +00000320: 6175 6c74 2022 2220 6d6f 6465 6c69 6e65 ault "" modeline │ │ │ +00000330: 2d6d 756c 7469 6279 7465 2d73 7461 7475 -multibyte-statu │ │ │ +00000340: 735d 2035 290a 2340 3937 3320 4d6f 6469 s] 5).#@973 Modi │ │ │ +00000350: 6679 206f 6e65 206f 6620 6c6f 6f6b 2075 fy one of look u │ │ │ +00000360: 7020 7461 626c 6573 2066 6f72 2066 696e p tables for fin │ │ │ +00000370: 6469 6e67 2061 2063 6f64 696e 6720 7379 ding a coding sy │ │ │ +00000380: 7374 656d 206f 6e20 492f 4f20 6f70 6572 stem on I/O oper │ │ │ +00000390: 6174 696f 6e2e 0a54 6865 7265 2061 7265 ation..There are │ │ │ +000003a0: 2074 6872 6565 206f 6620 7375 6368 2074 three of such t │ │ │ +000003b0: 6162 6c65 732c 2060 6669 6c65 2d63 6f64 ables, `file-cod │ │ │ +000003c0: 696e 672d 7379 7374 656d 2d61 6c69 7374 ing-system-alist │ │ │ +000003d0: 272c 0a60 7072 6f63 6573 732d 636f 6469 ',.`process-codi │ │ │ +000003e0: 6e67 2d73 7973 7465 6d2d 616c 6973 7427 ng-system-alist' │ │ │ +000003f0: 2c20 616e 6420 606e 6574 776f 726b 2d63 , and `network-c │ │ │ +00000400: 6f64 696e 672d 7379 7374 656d 2d61 6c69 oding-system-ali │ │ │ +00000410: 7374 272e 0a0a 5441 5247 4554 2d54 5950 st'...TARGET-TYP │ │ │ +00000420: 4520 7370 6563 6966 6965 7320 7768 6963 E specifies whic │ │ │ +00000430: 6820 6f66 2074 6865 6d20 746f 206d 6f64 h of them to mod │ │ │ +00000440: 6966 792e 0a49 6620 6974 2069 7320 6066 ify..If it is `f │ │ │ +00000450: 696c 6527 2c20 6974 2061 6666 6563 7473 ile', it affects │ │ │ +00000460: 2060 6669 6c65 2d63 6f64 696e 672d 7379 `file-coding-sy │ │ │ +00000470: 7374 656d 2d61 6c69 7374 2720 2877 6869 stem-alist' (whi │ │ │ +00000480: 6368 2073 6565 292e 0a49 6620 6974 2069 ch see)..If it i │ │ │ +00000490: 7320 6070 726f 6365 7373 272c 2069 7420 s `process', it │ │ │ +000004a0: 6166 6665 6374 7320 6070 726f 6365 7373 affects `process │ │ │ +000004b0: 2d63 6f64 696e 672d 7379 7374 656d 2d61 -coding-system-a │ │ │ +000004c0: 6c69 7374 2720 2877 6869 6368 2073 6565 list' (which see │ │ │ +000004d0: 292e 0a49 6620 6974 2069 7320 606e 6574 )..If it is `net │ │ │ +000004e0: 776f 726b 272c 2069 7420 6166 6665 6374 work', it affect │ │ │ +000004f0: 7320 606e 6574 776f 726b 2d63 6f64 696e s `network-codin │ │ │ +00000500: 672d 7379 7374 656d 2d61 6c69 7374 2720 g-system-alist' │ │ │ +00000510: 2877 6869 6368 2073 6565 292e 0a0a 5245 (which see)...RE │ │ │ +00000520: 4745 5850 2069 7320 6120 7265 6775 6c61 GEXP is a regula │ │ │ +00000530: 7220 6578 7072 6573 7369 6f6e 206d 6174 r expression mat │ │ │ +00000540: 6368 696e 6720 6120 7461 7267 6574 206f ching a target o │ │ │ +00000550: 6620 492f 4f20 6f70 6572 6174 696f 6e2e f I/O operation. │ │ │ +00000560: 0a54 6865 2074 6172 6765 7420 6973 2061 .The target is a │ │ │ +00000570: 2066 696c 6520 6e61 6d65 2069 6620 5441 file name if TA │ │ │ +00000580: 5247 4554 2d54 5950 4520 6973 2060 6669 RGET-TYPE is `fi │ │ │ +00000590: 6c65 272c 2061 2070 726f 6772 616d 206e le', a program n │ │ │ +000005a0: 616d 6520 6966 0a54 4152 4745 542d 5459 ame if.TARGET-TY │ │ │ +000005b0: 5045 2069 7320 6070 726f 6365 7373 272c PE is `process', │ │ │ +000005c0: 206f 7220 6120 6e65 7477 6f72 6b20 7365 or a network se │ │ │ +000005d0: 7276 6963 6520 6e61 6d65 206f 7220 6120 rvice name or a │ │ │ +000005e0: 706f 7274 206e 756d 6265 720a 746f 2063 port number.to c │ │ │ +000005f0: 6f6e 6e65 6374 2074 6f20 6966 2054 4152 onnect to if TAR │ │ │ +00000600: 4745 542d 5459 5045 2069 7320 606e 6574 GET-TYPE is `net │ │ │ +00000610: 776f 726b 272e 0a0a 434f 4449 4e47 2d53 work'...CODING-S │ │ │ +00000620: 5953 5445 4d20 6973 2061 2063 6f64 696e YSTEM is a codin │ │ │ +00000630: 6720 7379 7374 656d 2074 6f20 7065 7266 g system to perf │ │ │ +00000640: 6f72 6d20 636f 6465 2063 6f6e 7665 7273 orm code convers │ │ │ +00000650: 696f 6e20 6f6e 2074 6865 2049 2f4f 0a6f ion on the I/O.o │ │ │ +00000660: 7065 7261 7469 6f6e 2c20 6f72 2061 2063 peration, or a c │ │ │ +00000670: 6f6e 7320 6365 6c6c 2028 4445 434f 4449 ons cell (DECODI │ │ │ +00000680: 4e47 202e 2045 4e43 4f44 494e 4729 2073 NG . ENCODING) s │ │ │ +00000690: 7065 6369 6679 696e 6720 7468 6520 636f pecifying the co │ │ │ +000006a0: 6469 6e67 2073 7973 7465 6d73 0a66 6f72 ding systems.for │ │ │ +000006b0: 2064 6563 6f64 696e 6720 616e 6420 656e decoding and en │ │ │ +000006c0: 636f 6469 6e67 2072 6573 7065 6374 6976 coding respectiv │ │ │ +000006d0: 656c 792c 0a6f 7220 6120 6675 6e63 7469 ely,.or a functi │ │ │ +000006e0: 6f6e 2073 796d 626f 6c20 7768 6963 682c on symbol which, │ │ │ +000006f0: 2077 6865 6e20 6361 6c6c 6564 2c20 7265 when called, re │ │ │ +00000700: 7475 726e 7320 7375 6368 2061 2063 6f6e turns such a con │ │ │ +00000710: 7320 6365 6c6c 2e1f 0a28 6465 6661 6c69 s cell...(defali │ │ │ +00000720: 6173 2027 6d6f 6469 6679 2d63 6f64 696e as 'modify-codin │ │ │ +00000730: 672d 7379 7374 656d 2d61 6c69 7374 2023 g-system-alist # │ │ │ +00000740: 5b28 7461 7267 6574 2d74 7970 6520 7265 [(target-type re │ │ │ +00000750: 6765 7870 2063 6f64 696e 672d 7379 7374 gexp coding-syst │ │ │ +00000760: 656d 2920 225c 6ec6 73ac 85c7 c85c 6e5c em) "\n.s....\n\ │ │ │ +00000770: 2288 0c3b ac8e 5c6e c961 ab84 0ca8 ac85 "..;..\n.a...... │ │ │ +00000780: c7ca 0c5c 2288 0d39 ab8f cb0d 21ac 94cc ...\"..9....!... │ │ │ +00000790: 0d21 880d 8942 15aa 8acc 0d40 2188 cc0d .!...B.....@!... │ │ │ +000007a0: 4121 885c 6ecd 61ab 96ce 0c09 5c22 891b A!.\n.a.....\".. │ │ │ +000007b0: ab85 0b0d a1aa 870c 0d42 0942 8911 2987 .........B.B..). │ │ │ +000007c0: 5c6e cf61 ab96 ce0c 085c 2289 1bab 850b \n.a.....\"..... │ │ │ +000007d0: 0da1 aa87 0c0d 4208 4289 1029 87ce 0c0e ......B.B..).... │ │ │ +000007e0: 105c 2289 1bab 850b 0da1 aa89 0c0d 420e .\"...........B. │ │ │ +000007f0: 1042 8916 1029 8722 205b 7072 6f63 6573 .B...)." [proces │ │ │ +00000800: 732d 636f 6469 6e67 2d73 7973 7465 6d2d s-coding-system- │ │ │ +00000810: 616c 6973 7420 6669 6c65 2d63 6f64 696e alist file-codin │ │ │ +00000820: 672d 7379 7374 656d 2d61 6c69 7374 2074 g-system-alist t │ │ │ +00000830: 6172 6765 742d 7479 7065 2073 6c6f 7420 arget-type slot │ │ │ +00000840: 7265 6765 7870 2063 6f64 696e 672d 7379 regexp coding-sy │ │ │ +00000850: 7374 656d 2028 6669 6c65 2070 726f 6365 stem (file proce │ │ │ +00000860: 7373 206e 6574 776f 726b 2920 6572 726f ss network) erro │ │ │ +00000870: 7220 2249 6e76 616c 6964 2074 6172 6765 r "Invalid targe │ │ │ +00000880: 7420 7479 7065 3a20 2573 2220 6e65 7477 t type: %s" netw │ │ │ +00000890: 6f72 6b20 2249 6e76 616c 6964 2072 6567 ork "Invalid reg │ │ │ +000008a0: 756c 6172 2065 7870 7265 7373 696f 6e3a ular expression: │ │ │ +000008b0: 2025 7322 2066 626f 756e 6470 2063 6865 %s" fboundp che │ │ │ +000008c0: 636b 2d63 6f64 696e 672d 7379 7374 656d ck-coding-system │ │ │ +000008d0: 2066 696c 6520 6173 736f 6320 7072 6f63 file assoc proc │ │ │ +000008e0: 6573 7320 6e65 7477 6f72 6b2d 636f 6469 ess network-codi │ │ │ +000008f0: 6e67 2d73 7973 7465 6d2d 616c 6973 745d ng-system-alist] │ │ │ +00000900: 2034 2028 2324 202e 2038 3434 295d 290a 4 (#$ . 844)]). │ │ │ +00000910: 2340 3632 2052 6574 7572 6e20 636f 6469 #@62 Return codi │ │ │ +00000920: 6e67 2d73 7973 7465 6d20 6f66 2077 6861 ng-system of wha │ │ │ +00000930: 7420 6973 2073 656e 7420 6672 6f6d 2074 t is sent from t │ │ │ +00000940: 6572 6d69 6e61 6c20 6b65 7962 6f61 7264 erminal keyboard │ │ │ +00000950: 2e1f 0a28 6465 6661 6c69 6173 2027 6b65 ...(defalias 'ke │ │ │ +00000960: 7962 6f61 7264 2d63 6f64 696e 672d 7379 yboard-coding-sy │ │ │ +00000970: 7374 656d 2023 5b6e 696c 2022 0887 2220 stem #[nil ".." │ │ │ +00000980: 5b6b 6579 626f 6172 642d 636f 6469 6e67 [keyboard-coding │ │ │ +00000990: 2d73 7973 7465 6d5d 2031 2028 2324 202e -system] 1 (#$ . │ │ │ +000009a0: 2032 3332 3529 5d29 0a28 6279 7465 2d63 2325)]).(byte-c │ │ │ +000009b0: 6f64 6520 22c0 c14e c273 ac85 c3c4 c05c ode "..N.s.....\ │ │ │ +000009c0: 2288 c5c0 c1c6 2387 2220 5b6b 6579 626f ".....#." [keybo │ │ │ +000009d0: 6172 642d 636f 6469 6e67 2d73 7973 7465 ard-coding-syste │ │ │ +000009e0: 6d20 6279 7465 2d6f 7074 696d 697a 6572 m byte-optimizer │ │ │ +000009f0: 2028 6e69 6c20 6279 7465 2d63 6f6d 7069 (nil byte-compi │ │ │ +00000a00: 6c65 2d69 6e6c 696e 652d 6578 7061 6e64 le-inline-expand │ │ │ +00000a10: 2920 6572 726f 7220 2225 7320 616c 7265 ) error "%s alre │ │ │ +00000a20: 6164 7920 6861 7320 6120 6279 7465 2d6f ady has a byte-o │ │ │ +00000a30: 7074 696d 697a 6572 2c20 6361 6e27 7420 ptimizer, can't │ │ │ +00000a40: 6d61 6b65 2069 7420 696e 6c69 6e65 2220 make it inline" │ │ │ +00000a50: 7075 7420 6279 7465 2d63 6f6d 7069 6c65 put byte-compile │ │ │ +00000a60: 2d69 6e6c 696e 652d 6578 7061 6e64 5d20 -inline-expand] │ │ │ +00000a70: 3429 0a23 4037 3020 5365 7420 7468 6520 4).#@70 Set the │ │ │ +00000a80: 636f 6469 6e67 2073 7973 7465 6d20 7573 coding system us │ │ │ +00000a90: 6564 2066 6f72 2054 5459 206b 6579 626f ed for TTY keybo │ │ │ +00000aa0: 6172 6420 696e 7075 742e 2043 7572 7265 ard input. Curre │ │ │ +00000ab0: 6e74 6c79 2062 726f 6b65 6e2e 1f0a 2864 ntly broken...(d │ │ │ +00000ac0: 6566 616c 6961 7320 2773 6574 2d6b 6579 efalias 'set-key │ │ │ +00000ad0: 626f 6172 642d 636f 6469 6e67 2d73 7973 board-coding-sys │ │ │ +00000ae0: 7465 6d20 235b 2863 6f64 696e 672d 7379 tem #[(coding-sy │ │ │ +00000af0: 7374 656d 2920 22c2 0921 8809 10c3 20c4 stem) "..!.... . │ │ │ +00000b00: 61ab 86c5 c620 085c 2288 c7c8 2187 2220 a.... .\"...!." │ │ │ +00000b10: 5b6b 6579 626f 6172 642d 636f 6469 6e67 [keyboard-coding │ │ │ +00000b20: 2d73 7973 7465 6d20 636f 6469 6e67 2d73 -system coding-s │ │ │ +00000b30: 7973 7465 6d20 6765 742d 636f 6469 6e67 ystem get-coding │ │ │ +00000b40: 2d73 7973 7465 6d20 6465 7669 6365 2d74 -system device-t │ │ │ +00000b50: 7970 6520 7474 7920 7365 742d 636f 6e73 ype tty set-cons │ │ │ +00000b60: 6f6c 652d 7474 792d 696e 7075 742d 636f ole-tty-input-co │ │ │ +00000b70: 6469 6e67 2d73 7973 7465 6d20 6465 7669 ding-system devi │ │ │ +00000b80: 6365 2d63 6f6e 736f 6c65 2072 6564 7261 ce-console redra │ │ │ +00000b90: 772d 6d6f 6465 6c69 6e65 2074 5d20 3320 w-modeline t] 3 │ │ │ +00000ba0: 2823 2420 2e20 3236 3830 2920 227a 6b65 (#$ . 2680) "zke │ │ │ +00000bb0: 7962 6f61 7264 2d63 6f64 696e 672d 7379 yboard-coding-sy │ │ │ +00000bc0: 7374 656d 3a20 225d 290a 2340 3430 2052 stem: "]).#@40 R │ │ │ +00000bd0: 6574 7572 6e20 636f 6469 6e67 2d73 7973 eturn coding-sys │ │ │ +00000be0: 7465 6d20 6f66 2079 6f75 7220 7465 726d tem of your term │ │ │ +00000bf0: 696e 616c 2e1f 0a28 6465 6661 6c69 6173 inal...(defalias │ │ │ +00000c00: 2027 7465 726d 696e 616c 2d63 6f64 696e 'terminal-codin │ │ │ +00000c10: 672d 7379 7374 656d 2023 5b6e 696c 2022 g-system #[nil " │ │ │ +00000c20: 0887 2220 5b74 6572 6d69 6e61 6c2d 636f .." [terminal-co │ │ │ +00000c30: 6469 6e67 2d73 7973 7465 6d5d 2031 2028 ding-system] 1 ( │ │ │ +00000c40: 2324 202e 2033 3032 3329 5d29 0a28 6279 #$ . 3023)]).(by │ │ │ +00000c50: 7465 2d63 6f64 6520 22c0 c14e c273 ac85 te-code "..N.s.. │ │ │ +00000c60: c3c4 c05c 2288 c5c0 c1c6 2387 2220 5b74 ...\".....#." [t │ │ │ +00000c70: 6572 6d69 6e61 6c2d 636f 6469 6e67 2d73 erminal-coding-s │ │ │ +00000c80: 7973 7465 6d20 6279 7465 2d6f 7074 696d ystem byte-optim │ │ │ +00000c90: 697a 6572 2028 6e69 6c20 6279 7465 2d63 izer (nil byte-c │ │ │ +00000ca0: 6f6d 7069 6c65 2d69 6e6c 696e 652d 6578 ompile-inline-ex │ │ │ +00000cb0: 7061 6e64 2920 6572 726f 7220 2225 7320 pand) error "%s │ │ │ +00000cc0: 616c 7265 6164 7920 6861 7320 6120 6279 already has a by │ │ │ +00000cd0: 7465 2d6f 7074 696d 697a 6572 2c20 6361 te-optimizer, ca │ │ │ +00000ce0: 6e27 7420 6d61 6b65 2069 7420 696e 6c69 n't make it inli │ │ │ +00000cf0: 6e65 2220 7075 7420 6279 7465 2d63 6f6d ne" put byte-com │ │ │ +00000d00: 7069 6c65 2d69 6e6c 696e 652d 6578 7061 pile-inline-expa │ │ │ +00000d10: 6e64 5d20 3429 0a23 4037 3020 5365 7420 nd] 4).#@70 Set │ │ │ +00000d20: 7468 6520 636f 6469 6e67 2073 7973 7465 the coding syste │ │ │ +00000d30: 6d20 7573 6564 2066 6f72 2054 5459 2064 m used for TTY d │ │ │ +00000d40: 6973 706c 6179 206f 7574 7075 742e 2043 isplay output. C │ │ │ +00000d50: 7572 7265 6e74 6c79 2062 726f 6b65 6e2e urrently broken. │ │ │ +00000d60: 1f0a 2864 6566 616c 6961 7320 2773 6574 ..(defalias 'set │ │ │ +00000d70: 2d74 6572 6d69 6e61 6c2d 636f 6469 6e67 -terminal-coding │ │ │ +00000d80: 2d73 7973 7465 6d20 235b 2863 6f64 696e -system #[(codin │ │ │ +00000d90: 672d 7379 7374 656d 2920 22c2 0921 8809 g-system) "..!.. │ │ │ +00000da0: 10c3 20c4 61ab 86c5 c620 085c 2288 c7c8 .. .a.... .\"... │ │ │ +00000db0: 2187 2220 5b74 6572 6d69 6e61 6c2d 636f !." [terminal-co │ │ │ +00000dc0: 6469 6e67 2d73 7973 7465 6d20 636f 6469 ding-system codi │ │ │ +00000dd0: 6e67 2d73 7973 7465 6d20 6765 742d 636f ng-system get-co │ │ │ +00000de0: 6469 6e67 2d73 7973 7465 6d20 6465 7669 ding-system devi │ │ │ +00000df0: 6365 2d74 7970 6520 7474 7920 7365 742d ce-type tty set- │ │ │ +00000e00: 636f 6e73 6f6c 652d 7474 792d 6f75 7470 console-tty-outp │ │ │ +00000e10: 7574 2d63 6f64 696e 672d 7379 7374 656d ut-coding-system │ │ │ +00000e20: 2064 6576 6963 652d 636f 6e73 6f6c 6520 device-console │ │ │ +00000e30: 7265 6472 6177 2d6d 6f64 656c 696e 6520 redraw-modeline │ │ │ +00000e40: 745d 2033 2028 2324 202e 2033 3335 3629 t] 3 (#$ . 3356) │ │ │ +00000e50: 2022 7a74 6572 6d69 6e61 6c2d 636f 6469 "zterminal-codi │ │ │ +00000e60: 6e67 2d73 7973 7465 6d3a 2022 5d29 0a23 ng-system: "]).# │ │ │ +00000e70: 4035 3620 5365 7420 7468 6520 636f 6469 @56 Set the codi │ │ │ +00000e80: 6e67 2073 7973 7465 6d20 7573 6564 2066 ng system used f │ │ │ +00000e90: 6f72 2066 696c 6520 7379 7374 656d 2070 or file system p │ │ │ +00000ea0: 6174 6820 6e61 6d65 732e 1f0a 2864 6566 ath names...(def │ │ │ +00000eb0: 616c 6961 7320 2773 6574 2d70 6174 686e alias 'set-pathn │ │ │ +00000ec0: 616d 652d 636f 6469 6e67 2d73 7973 7465 ame-coding-syste │ │ │ +00000ed0: 6d20 235b 2863 6f64 696e 672d 7379 7374 m #[(coding-syst │ │ │ +00000ee0: 656d 2920 22c2 0921 8809 8910 8722 205b em) "..!....." [ │ │ │ +00000ef0: 6669 6c65 2d6e 616d 652d 636f 6469 6e67 file-name-coding │ │ │ +00000f00: 2d73 7973 7465 6d20 636f 6469 6e67 2d73 -system coding-s │ │ │ +00000f10: 7973 7465 6d20 6765 742d 636f 6469 6e67 ystem get-coding │ │ │ +00000f20: 2d73 7973 7465 6d5d 2032 2028 2324 202e -system] 2 (#$ . │ │ │ +00000f30: 2033 3730 3029 2022 7a50 6174 686e 616d 3700) "zPathnam │ │ │ +00000f40: 652d 636f 6469 6e67 2d73 7973 7465 6d3a e-coding-system: │ │ │ +00000f50: 2022 5d29 0a23 4031 3530 2053 686f 7720 "]).#@150 Show │ │ │ +00000f60: 7468 6520 656e 636f 6469 6e67 206f 6620 the encoding of │ │ │ +00000f70: 7465 7874 2069 6e20 7468 6520 7265 6769 text in the regi │ │ │ +00000f80: 6f6e 2e0a 5468 6973 2066 756e 6374 696f on..This functio │ │ │ +00000f90: 6e20 6973 206d 6561 6e74 2074 6f20 6265 n is meant to be │ │ │ +00000fa0: 2063 616c 6c65 6420 696e 7465 7261 6374 called interact │ │ │ +00000fb0: 6976 656c 793b 0a66 726f 6d20 6120 4c69 ively;.from a Li │ │ │ +00000fc0: 7370 2070 726f 6772 616d 2c20 7573 6520 sp program, use │ │ │ +00000fd0: 6064 6574 6563 742d 636f 6469 6e67 2d72 `detect-coding-r │ │ │ +00000fe0: 6567 696f 6e27 2069 6e73 7465 6164 2e1f egion' instead.. │ │ │ +00000ff0: 0a28 6465 6661 6c69 6173 2027 7768 6174 .(defalias 'what │ │ │ +00001000: 2d63 6f64 696e 672d 7379 7374 656d 2023 -coding-system # │ │ │ +00001010: 5b28 7374 6172 7420 656e 6420 266f 7074 [(start end &opt │ │ │ +00001020: 696f 6e61 6c20 6172 6729 2022 c2c3 0908 ional arg) ".... │ │ │ +00001030: 5c22 2187 2220 5b65 6e64 2073 7461 7274 \"!." [end start │ │ │ +00001040: 2070 7269 6e63 2064 6574 6563 742d 636f princ detect-co │ │ │ +00001050: 6469 6e67 2d72 6567 696f 6e5d 2034 2028 ding-region] 4 ( │ │ │ +00001060: 2324 202e 2033 3933 3129 2022 725c 6e50 #$ . 3931) "r\nP │ │ │ +00001070: 225d 290a 2340 3133 3320 4465 636f 6465 "]).#@133 Decode │ │ │ +00001080: 2074 6865 2073 7472 696e 6720 5354 5220 the string STR │ │ │ +00001090: 7768 6963 6820 6973 2065 6e63 6f64 6564 which is encoded │ │ │ +000010a0: 2069 6e20 434f 4449 4e47 2d53 5953 5445 in CODING-SYSTE │ │ │ +000010b0: 4d2e 0a44 6f65 7320 6e6f 7420 6d6f 6469 M..Does not modi │ │ │ +000010c0: 6679 2053 5452 2e20 2052 6574 7572 6e73 fy STR. Returns │ │ │ +000010d0: 2074 6865 2064 6563 6f64 6564 2073 7472 the decoded str │ │ │ +000010e0: 696e 6720 6f6e 2073 7563 6365 7373 6675 ing on successfu │ │ │ +000010f0: 6c20 636f 6e76 6572 7369 6f6e 2e1f 0a28 l conversion...( │ │ │ +00001100: 6465 6661 6c69 6173 2027 6465 636f 6465 defalias 'decode │ │ │ +00001110: 2d63 6f64 696e 672d 7374 7269 6e67 2023 -coding-string # │ │ │ +00001120: 5b28 7374 7220 636f 6469 6e67 2d73 7973 [(str coding-sys │ │ │ +00001130: 7465 6d29 2022 c3c4 c521 211a c68e 725c tem) "...!!...r\ │ │ │ +00001140: 6e71 8809 6388 c765 6408 2388 c820 2b87 nq..c..ed.#.. +. │ │ │ +00001150: 2220 5b63 6f64 696e 672d 7379 7374 656d " [coding-system │ │ │ +00001160: 2073 7472 2023 313d 233a 7465 6d70 2d62 str #1=#:temp-b │ │ │ +00001170: 7566 6665 7220 6765 742d 6275 6666 6572 uffer get-buffer │ │ │ +00001180: 2d63 7265 6174 6520 6765 6e65 7261 7465 -create generate │ │ │ +00001190: 2d6e 6577 2d62 7566 6665 722d 6e61 6d65 -new-buffer-name │ │ │ +000011a0: 2022 202a 7465 6d70 2a22 2028 2862 7974 " *temp*" ((byt │ │ │ +000011b0: 652d 636f 6465 2022 c108 21ab 84c2 0821 e-code "..!....! │ │ │ +000011c0: 88c1 8722 205b 2331 2320 6275 6666 6572 ..." [#1# buffer │ │ │ +000011d0: 2d6e 616d 6520 6b69 6c6c 2d62 7566 6665 -name kill-buffe │ │ │ +000011e0: 725d 2032 2929 2064 6563 6f64 652d 636f r] 2)) decode-co │ │ │ +000011f0: 6469 6e67 2d72 6567 696f 6e20 6275 6666 ding-region buff │ │ │ +00001200: 6572 2d73 7472 696e 675d 2034 2028 2324 er-string] 4 (#$ │ │ │ +00001210: 202e 2034 3231 3829 5d29 0a23 4031 3139 . 4218)]).#@119 │ │ │ +00001220: 2045 6e63 6f64 6520 7468 6520 7374 7269 Encode the stri │ │ │ +00001230: 6e67 2053 5452 2075 7369 6e67 2043 4f44 ng STR using COD │ │ │ +00001240: 494e 472d 5359 5354 454d 2e0a 446f 6573 ING-SYSTEM..Does │ │ │ +00001250: 206e 6f74 206d 6f64 6966 7920 5354 522e not modify STR. │ │ │ +00001260: 2020 5265 7475 726e 7320 7468 6520 656e Returns the en │ │ │ +00001270: 636f 6465 6420 7374 7269 6e67 206f 6e20 coded string on │ │ │ +00001280: 7375 6363 6573 7366 756c 2063 6f6e 7665 successful conve │ │ │ +00001290: 7273 696f 6e2e 1f0a 2864 6566 616c 6961 rsion...(defalia │ │ │ +000012a0: 7320 2765 6e63 6f64 652d 636f 6469 6e67 s 'encode-coding │ │ │ +000012b0: 2d73 7472 696e 6720 235b 2873 7472 2063 -string #[(str c │ │ │ +000012c0: 6f64 696e 672d 7379 7374 656d 2920 22c3 oding-system) ". │ │ │ +000012d0: c4c5 2121 1ac6 8e72 5c6e 7188 0963 88c7 ..!!...r\nq..c.. │ │ │ +000012e0: 6564 0823 88c8 202b 8722 205b 636f 6469 ed.#.. +." [codi │ │ │ +000012f0: 6e67 2d73 7973 7465 6d20 7374 7220 2331 ng-system str #1 │ │ │ +00001300: 3d23 3a74 656d 702d 6275 6666 6572 2067 =#:temp-buffer g │ │ │ +00001310: 6574 2d62 7566 6665 722d 6372 6561 7465 et-buffer-create │ │ │ +00001320: 2067 656e 6572 6174 652d 6e65 772d 6275 generate-new-bu │ │ │ +00001330: 6666 6572 2d6e 616d 6520 2220 2a74 656d ffer-name " *tem │ │ │ +00001340: 702a 2220 2828 6279 7465 2d63 6f64 6520 p*" ((byte-code │ │ │ +00001350: 22c1 0821 ab84 c208 2188 c187 2220 5b23 "..!....!..." [# │ │ │ +00001360: 3123 2062 7566 6665 722d 6e61 6d65 206b 1# buffer-name k │ │ │ +00001370: 696c 6c2d 6275 6666 6572 5d20 3229 2920 ill-buffer] 2)) │ │ │ +00001380: 656e 636f 6465 2d63 6f64 696e 672d 7265 encode-coding-re │ │ │ +00001390: 6769 6f6e 2062 7566 6665 722d 7374 7269 gion buffer-stri │ │ │ +000013a0: 6e67 5d20 3420 2823 2420 2e20 3436 3431 ng] 4 (#$ . 4641 │ │ │ +000013b0: 295d 290a 2340 3439 2052 6574 7572 6e20 )]).#@49 Return │ │ │ +000013c0: 7468 6520 276d 6e65 6d6f 6e69 6320 7072 the 'mnemonic pr │ │ │ +000013d0: 6f70 6572 7479 206f 6620 434f 4449 4e47 operty of CODING │ │ │ +000013e0: 2d53 5953 5445 4d2e 1f0a 2864 6566 616c -SYSTEM...(defal │ │ │ +000013f0: 6961 7320 2763 6f64 696e 672d 7379 7374 ias 'coding-syst │ │ │ +00001400: 656d 2d6d 6e65 6d6f 6e69 6320 235b 2863 em-mnemonic #[(c │ │ │ +00001410: 6f64 696e 672d 7379 7374 656d 2920 22c1 oding-system) ". │ │ │ +00001420: 08c2 5c22 8722 205b 636f 6469 6e67 2d73 ..\"." [coding-s │ │ │ +00001430: 7973 7465 6d20 636f 6469 6e67 2d73 7973 ystem coding-sys │ │ │ +00001440: 7465 6d2d 7072 6f70 6572 7479 206d 6e65 tem-property mne │ │ │ +00001450: 6d6f 6e69 635d 2033 2028 2324 202e 2035 monic] 3 (#$ . 5 │ │ │ +00001460: 3034 3929 5d29 0a28 6465 6661 6c69 6173 049)]).(defalias │ │ │ +00001470: 2027 636f 6469 6e67 2d73 7973 7465 6d2d 'coding-system- │ │ │ +00001480: 646f 6373 7472 696e 6720 2763 6f64 696e docstring 'codin │ │ │ +00001490: 672d 7379 7374 656d 2d64 6f63 2d73 7472 g-system-doc-str │ │ │ +000014a0: 696e 6729 0a23 4034 3920 5265 7475 726e ing).#@49 Return │ │ │ +000014b0: 2074 6865 2027 656f 6c2d 7479 7065 2070 the 'eol-type p │ │ │ +000014c0: 726f 7065 7274 7920 6f66 2043 4f44 494e roperty of CODIN │ │ │ +000014d0: 472d 5359 5354 454d 2e1f 0a28 6465 6661 G-SYSTEM...(defa │ │ │ +000014e0: 6c69 6173 2027 636f 6469 6e67 2d73 7973 lias 'coding-sys │ │ │ +000014f0: 7465 6d2d 656f 6c2d 7479 7065 2023 5b28 tem-eol-type #[( │ │ │ +00001500: 636f 6469 6e67 2d73 7973 7465 6d29 2022 coding-system) " │ │ │ +00001510: c108 c25c 2287 2220 5b63 6f64 696e 672d ...\"." [coding- │ │ │ +00001520: 7379 7374 656d 2063 6f64 696e 672d 7379 system coding-sy │ │ │ +00001530: 7374 656d 2d70 726f 7065 7274 7920 656f stem-property eo │ │ │ +00001540: 6c2d 7479 7065 5d20 3320 2823 2420 2e20 l-type] 3 (#$ . │ │ │ +00001550: 3532 3930 295d 290a 2340 3437 2052 6574 5290)]).#@47 Ret │ │ │ +00001560: 7572 6e20 7468 6520 2765 6f6c 2d6c 6620 urn the 'eol-lf │ │ │ +00001570: 7072 6f70 6572 7479 206f 6620 434f 4449 property of CODI │ │ │ +00001580: 4e47 2d53 5953 5445 4d2e 1f0a 2864 6566 NG-SYSTEM...(def │ │ │ +00001590: 616c 6961 7320 2763 6f64 696e 672d 7379 alias 'coding-sy │ │ │ +000015a0: 7374 656d 2d65 6f6c 2d6c 6620 235b 2863 stem-eol-lf #[(c │ │ │ +000015b0: 6f64 696e 672d 7379 7374 656d 2920 22c1 oding-system) ". │ │ │ +000015c0: 08c2 5c22 8722 205b 636f 6469 6e67 2d73 ..\"." [coding-s │ │ │ +000015d0: 7973 7465 6d20 636f 6469 6e67 2d73 7973 ystem coding-sys │ │ │ +000015e0: 7465 6d2d 7072 6f70 6572 7479 2065 6f6c tem-property eol │ │ │ +000015f0: 2d6c 665d 2033 2028 2324 202e 2035 3436 -lf] 3 (#$ . 546 │ │ │ +00001600: 3929 5d29 0a23 4034 3920 5265 7475 726e 9)]).#@49 Return │ │ │ +00001610: 2074 6865 2027 656f 6c2d 6372 6c66 2070 the 'eol-crlf p │ │ │ +00001620: 726f 7065 7274 7920 6f66 2043 4f44 494e roperty of CODIN │ │ │ +00001630: 472d 5359 5354 454d 2e1f 0a28 6465 6661 G-SYSTEM...(defa │ │ │ +00001640: 6c69 6173 2027 636f 6469 6e67 2d73 7973 lias 'coding-sys │ │ │ +00001650: 7465 6d2d 656f 6c2d 6372 6c66 2023 5b28 tem-eol-crlf #[( │ │ │ +00001660: 636f 6469 6e67 2d73 7973 7465 6d29 2022 coding-system) " │ │ │ +00001670: c108 c25c 2287 2220 5b63 6f64 696e 672d ...\"." [coding- │ │ │ +00001680: 7379 7374 656d 2063 6f64 696e 672d 7379 system coding-sy │ │ │ +00001690: 7374 656d 2d70 726f 7065 7274 7920 656f stem-property eo │ │ │ +000016a0: 6c2d 6372 6c66 5d20 3320 2823 2420 2e20 l-crlf] 3 (#$ . │ │ │ +000016b0: 3536 3432 295d 290a 2340 3437 2052 6574 5642)]).#@47 Ret │ │ │ +000016c0: 7572 6e20 7468 6520 2765 6f6c 2d63 7220 urn the 'eol-cr │ │ │ +000016d0: 7072 6f70 6572 7479 206f 6620 434f 4449 property of CODI │ │ │ +000016e0: 4e47 2d53 5953 5445 4d2e 1f0a 2864 6566 NG-SYSTEM...(def │ │ │ +000016f0: 616c 6961 7320 2763 6f64 696e 672d 7379 alias 'coding-sy │ │ │ +00001700: 7374 656d 2d65 6f6c 2d63 7220 235b 2863 stem-eol-cr #[(c │ │ │ +00001710: 6f64 696e 672d 7379 7374 656d 2920 22c1 oding-system) ". │ │ │ +00001720: 08c2 5c22 8722 205b 636f 6469 6e67 2d73 ..\"." [coding-s │ │ │ +00001730: 7973 7465 6d20 636f 6469 6e67 2d73 7973 ystem coding-sys │ │ │ +00001740: 7465 6d2d 7072 6f70 6572 7479 2065 6f6c tem-property eol │ │ │ +00001750: 2d63 725d 2033 2028 2324 202e 2035 3832 -cr] 3 (#$ . 582 │ │ │ +00001760: 3129 5d29 0a23 4036 3120 5265 7475 726e 1)]).#@61 Return │ │ │ +00001770: 2074 6865 2027 706f 7374 2d72 6561 642d the 'post-read- │ │ │ +00001780: 636f 6e76 6572 7369 6f6e 2070 726f 7065 conversion prope │ │ │ +00001790: 7274 7920 6f66 2043 4f44 494e 472d 5359 rty of CODING-SY │ │ │ +000017a0: 5354 454d 2e1f 0a28 6465 6661 6c69 6173 STEM...(defalias │ │ │ +000017b0: 2027 636f 6469 6e67 2d73 7973 7465 6d2d 'coding-system- │ │ │ +000017c0: 706f 7374 2d72 6561 642d 636f 6e76 6572 post-read-conver │ │ │ +000017d0: 7369 6f6e 2023 5b28 636f 6469 6e67 2d73 sion #[(coding-s │ │ │ +000017e0: 7973 7465 6d29 2022 c108 c25c 2287 2220 ystem) "...\"." │ │ │ +000017f0: 5b63 6f64 696e 672d 7379 7374 656d 2063 [coding-system c │ │ │ +00001800: 6f64 696e 672d 7379 7374 656d 2d70 726f oding-system-pro │ │ │ +00001810: 7065 7274 7920 706f 7374 2d72 6561 642d perty post-read- │ │ │ +00001820: 636f 6e76 6572 7369 6f6e 5d20 3320 2823 conversion] 3 (# │ │ │ +00001830: 2420 2e20 3539 3934 295d 290a 2340 3631 $ . 5994)]).#@61 │ │ │ +00001840: 2052 6574 7572 6e20 7468 6520 2770 7265 Return the 'pre │ │ │ +00001850: 2d77 7269 7465 2d63 6f6e 7665 7273 696f -write-conversio │ │ │ +00001860: 6e20 7072 6f70 6572 7479 206f 6620 434f n property of CO │ │ │ +00001870: 4449 4e47 2d53 5953 5445 4d2e 1f0a 2864 DING-SYSTEM...(d │ │ │ +00001880: 6566 616c 6961 7320 2763 6f64 696e 672d efalias 'coding- │ │ │ +00001890: 7379 7374 656d 2d70 7265 2d77 7269 7465 system-pre-write │ │ │ +000018a0: 2d63 6f6e 7665 7273 696f 6e20 235b 2863 -conversion #[(c │ │ │ +000018b0: 6f64 696e 672d 7379 7374 656d 2920 22c1 oding-system) ". │ │ │ +000018c0: 08c2 5c22 8722 205b 636f 6469 6e67 2d73 ..\"." [coding-s │ │ │ +000018d0: 7973 7465 6d20 636f 6469 6e67 2d73 7973 ystem coding-sys │ │ │ +000018e0: 7465 6d2d 7072 6f70 6572 7479 2070 7265 tem-property pre │ │ │ +000018f0: 2d77 7269 7465 2d63 6f6e 7665 7273 696f -write-conversio │ │ │ +00001900: 6e5d 2033 2028 2324 202e 2036 3230 3929 n] 3 (#$ . 6209) │ │ │ +00001910: 5d29 0a23 4034 3920 5265 7475 726e 2074 ]).#@49 Return t │ │ │ +00001920: 6865 2062 6173 6520 636f 6469 6e67 2073 he base coding s │ │ │ +00001930: 7973 7465 6d20 6f66 2043 4f44 494e 472d ystem of CODING- │ │ │ +00001940: 5359 5354 454d 2e1f 0a28 6465 6661 6c69 SYSTEM...(defali │ │ │ +00001950: 6173 2027 636f 6469 6e67 2d73 7973 7465 as 'coding-syste │ │ │ +00001960: 6d2d 6261 7365 2023 5b28 636f 6469 6e67 m-base #[(coding │ │ │ +00001970: 2d73 7973 7465 6d29 2022 c108 21ac 8208 -system) "..!... │ │ │ +00001980: 87c2 c3c4 c508 2121 c6c7 c8c4 c508 2121 ......!!......!! │ │ │ +00001990: 5c22 4f21 2187 2220 5b63 6f64 696e 672d \"O!!." [coding- │ │ │ +000019a0: 7379 7374 656d 2063 6f64 696e 672d 7379 system coding-sy │ │ │ +000019b0: 7374 656d 2d65 6f6c 2d74 7970 6520 6669 stem-eol-type fi │ │ │ +000019c0: 6e64 2d63 6f64 696e 672d 7379 7374 656d nd-coding-system │ │ │ +000019d0: 2069 6e74 6572 6e20 7379 6d62 6f6c 2d6e intern symbol-n │ │ │ +000019e0: 616d 6520 636f 6469 6e67 2d73 7973 7465 ame coding-syste │ │ │ +000019f0: 6d2d 6e61 6d65 2030 2073 7472 696e 672d m-name 0 string- │ │ │ +00001a00: 6d61 7463 6820 222d 756e 6978 245c 5c7c match "-unix$\\| │ │ │ +00001a10: 2d64 6f73 245c 5c7c 2d6d 6163 2422 5d20 -dos$\\|-mac$"] │ │ │ +00001a20: 3920 2823 2420 2e20 3634 3234 295d 290a 9 (#$ . 6424)]). │ │ │ +00001a30: 2862 7974 652d 636f 6465 2022 c0c1 89c2 (byte-code ".... │ │ │ +00001a40: c324 8722 205b 6d61 6b65 2d63 6f64 696e .$." [make-codin │ │ │ +00001a50: 672d 7379 7374 656d 2075 6e64 6563 6964 g-system undecid │ │ │ +00001a60: 6564 2022 4175 746f 6d61 7469 6320 636f ed "Automatic co │ │ │ +00001a70: 6e76 6572 7369 6f6e 2e22 2028 6d6e 656d nversion." (mnem │ │ │ +00001a80: 6f6e 6963 2022 4175 746f 2229 5d20 3529 onic "Auto")] 5) │ │ │ +00001a90: 0a28 6465 6661 6c69 6173 2027 646f 6e74 .(defalias 'dont │ │ │ +00001aa0: 7573 6574 6869 732d 7365 742d 7661 6c75 usethis-set-valu │ │ │ +00001ab0: 652d 6669 6c65 2d6e 616d 652d 636f 6469 e-file-name-codi │ │ │ +00001ac0: 6e67 2d73 7973 7465 6d2d 6861 6e64 6c65 ng-system-handle │ │ │ +00001ad0: 7220 235b 2873 796d 2061 7267 7320 6675 r #[(sym args fu │ │ │ +00001ae0: 6e20 6861 7267 2068 616e 646c 6572 7329 n harg handlers) │ │ │ +00001af0: 2022 c1c2 0840 ae81 c35c 2287 2220 5b61 "...@...\"." [a │ │ │ +00001b00: 7267 7320 6465 6669 6e65 2d63 6f64 696e rgs define-codin │ │ │ +00001b10: 672d 7379 7374 656d 2d61 6c69 6173 2066 g-system-alias f │ │ │ +00001b20: 696c 652d 6e61 6d65 2062 696e 6172 795d ile-name binary] │ │ │ +00001b30: 2033 5d29 0a28 646f 6e74 7573 6574 6869 3]).(dontusethi │ │ │ +00001b40: 732d 7365 742d 7379 6d62 6f6c 2d76 616c s-set-symbol-val │ │ │ +00001b50: 7565 2d68 616e 646c 6572 2027 6669 6c65 ue-handler 'file │ │ │ +00001b60: 2d6e 616d 652d 636f 6469 6e67 2d73 7973 -name-coding-sys │ │ │ +00001b70: 7465 6d20 2773 6574 2d76 616c 7565 2027 tem 'set-value ' │ │ │ +00001b80: 646f 6e74 7573 6574 6869 732d 7365 742d dontusethis-set- │ │ │ +00001b90: 7661 6c75 652d 6669 6c65 2d6e 616d 652d value-file-name- │ │ │ +00001ba0: 636f 6469 6e67 2d73 7973 7465 6d2d 6861 coding-system-ha │ │ │ +00001bb0: 6e64 6c65 7229 0a28 6465 6661 6c69 6173 ndler).(defalias │ │ │ +00001bc0: 2027 646f 6e74 7573 6574 6869 732d 7365 'dontusethis-se │ │ │ +00001bd0: 742d 7661 6c75 652d 7465 726d 696e 616c t-value-terminal │ │ │ +00001be0: 2d63 6f64 696e 672d 7379 7374 656d 2d68 -coding-system-h │ │ │ +00001bf0: 616e 646c 6572 2023 5b28 7379 6d20 6172 andler #[(sym ar │ │ │ +00001c00: 6773 2066 756e 2068 6172 6720 6861 6e64 gs fun harg hand │ │ │ +00001c10: 6c65 7273 2920 22c1 c208 40ae 81c3 5c22 lers) "...@...\" │ │ │ +00001c20: 8722 205b 6172 6773 2064 6566 696e 652d ." [args define- │ │ │ +00001c30: 636f 6469 6e67 2d73 7973 7465 6d2d 616c coding-system-al │ │ │ +00001c40: 6961 7320 7465 726d 696e 616c 2062 696e ias terminal bin │ │ │ +00001c50: 6172 795d 2033 5d29 0a28 646f 6e74 7573 ary] 3]).(dontus │ │ │ +00001c60: 6574 6869 732d 7365 742d 7379 6d62 6f6c ethis-set-symbol │ │ │ +00001c70: 2d76 616c 7565 2d68 616e 646c 6572 2027 -value-handler ' │ │ │ +00001c80: 7465 726d 696e 616c 2d63 6f64 696e 672d terminal-coding- │ │ │ +00001c90: 7379 7374 656d 2027 7365 742d 7661 6c75 system 'set-valu │ │ │ +00001ca0: 6520 2764 6f6e 7475 7365 7468 6973 2d73 e 'dontusethis-s │ │ │ +00001cb0: 6574 2d76 616c 7565 2d74 6572 6d69 6e61 et-value-termina │ │ │ +00001cc0: 6c2d 636f 6469 6e67 2d73 7973 7465 6d2d l-coding-system- │ │ │ +00001cd0: 6861 6e64 6c65 7229 0a28 6465 6661 6c69 handler).(defali │ │ │ +00001ce0: 6173 2027 646f 6e74 7573 6574 6869 732d as 'dontusethis- │ │ │ +00001cf0: 7365 742d 7661 6c75 652d 6b65 7962 6f61 set-value-keyboa │ │ │ +00001d00: 7264 2d63 6f64 696e 672d 7379 7374 656d rd-coding-system │ │ │ +00001d10: 2d68 616e 646c 6572 2023 5b28 7379 6d20 -handler #[(sym │ │ │ +00001d20: 6172 6773 2066 756e 2068 6172 6720 6861 args fun harg ha │ │ │ +00001d30: 6e64 6c65 7273 2920 22c1 c208 40ae 81c3 ndlers) "...@... │ │ │ +00001d40: 5c22 8722 205b 6172 6773 2064 6566 696e \"." [args defin │ │ │ +00001d50: 652d 636f 6469 6e67 2d73 7973 7465 6d2d e-coding-system- │ │ │ +00001d60: 616c 6961 7320 6b65 7962 6f61 7264 2062 alias keyboard b │ │ │ +00001d70: 696e 6172 795d 2033 5d29 0a28 6279 7465 inary] 3]).(byte │ │ │ +00001d80: 2d63 6f64 6520 22c5 c6c7 c823 88c9 c021 -code "....#...! │ │ │ +00001d90: ac82 ca10 cbcc 21ac 8fcd cecf 5c22 88cd ......!.....\".. │ │ │ +00001da0: ced0 5c22 88d1 d2d3 5c22 88cd ced4 5c22 ..\"....\"....\" │ │ │ +00001db0: 88d5 d6d7 5c22 88d8 c01b 1cc9 0c21 ad84 ....\".......!.. │ │ │ +00001dc0: c90b 213f c90c 21ad 820c 4a1a 19d9 0c0b ..!?..!...J..... │ │ │ +00001dd0: 5c22 88da 0c0b 5c22 8809 ab84 0b5c 6e4c \"....\".....\nL │ │ │ +00001de0: 882c ca87 2220 5b66 696c 652d 6e61 6d65 .,.." [file-name │ │ │ +00001df0: 2d63 6f64 696e 672d 7379 7374 656d 206e -coding-system n │ │ │ +00001e00: 6565 6473 2d73 6574 7469 6e67 2076 616c eeds-setting val │ │ │ +00001e10: 7565 206e 6577 7661 7220 6f6c 6476 6172 ue newvar oldvar │ │ │ +00001e20: 2064 6f6e 7475 7365 7468 6973 2d73 6574 dontusethis-set │ │ │ +00001e30: 2d73 796d 626f 6c2d 7661 6c75 652d 6861 -symbol-value-ha │ │ │ +00001e40: 6e64 6c65 7220 6b65 7962 6f61 7264 2d63 ndler keyboard-c │ │ │ +00001e50: 6f64 696e 672d 7379 7374 656d 2073 6574 oding-system set │ │ │ +00001e60: 2d76 616c 7565 2064 6f6e 7475 7365 7468 -value dontuseth │ │ │ +00001e70: 6973 2d73 6574 2d76 616c 7565 2d6b 6579 is-set-value-key │ │ │ +00001e80: 626f 6172 642d 636f 6469 6e67 2d73 7973 board-coding-sys │ │ │ +00001e90: 7465 6d2d 6861 6e64 6c65 7220 626f 756e tem-handler boun │ │ │ +00001ea0: 6470 206e 696c 2066 6561 7475 7265 7020 dp nil featurep │ │ │ +00001eb0: 6d75 6c65 2063 6f70 792d 636f 6469 6e67 mule copy-coding │ │ │ +00001ec0: 2d73 7973 7465 6d20 756e 6465 6369 6465 -system undecide │ │ │ +00001ed0: 6420 6973 6f2d 3838 3539 2d31 2069 736f d iso-8859-1 iso │ │ │ +00001ee0: 2d38 3835 392d 3220 6465 6669 6e65 2d63 -8859-2 define-c │ │ │ +00001ef0: 6f64 696e 672d 7379 7374 656d 2d61 6c69 oding-system-ali │ │ │ +00001f00: 6173 2063 7465 7874 2062 696e 6172 7920 as ctext binary │ │ │ +00001f10: 6175 746f 6d61 7469 632d 636f 6e76 6572 automatic-conver │ │ │ +00001f20: 7369 6f6e 206d 616b 652d 636f 6d70 6174 sion make-compat │ │ │ +00001f30: 6962 6c65 2d76 6172 6961 626c 6520 656e ible-variable en │ │ │ +00001f40: 6162 6c65 2d6d 756c 7469 6279 7465 2d63 able-multibyte-c │ │ │ +00001f50: 6861 7261 6374 6572 7320 2255 6e69 6d70 haracters "Unimp │ │ │ +00001f60: 6c65 6d65 6e74 6564 2220 7061 7468 6e61 lemented" pathna │ │ │ +00001f70: 6d65 2d63 6f64 696e 672d 7379 7374 656d me-coding-system │ │ │ +00001f80: 2064 6566 7661 7261 6c69 6173 206d 616b defvaralias mak │ │ │ +00001f90: 652d 6f62 736f 6c65 7465 2d76 6172 6961 e-obsolete-varia │ │ │ +00001fa0: 626c 655d 2034 290a ble] 4). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/compat.elc │ │ │ @@ -1,291 +1,290 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3032 2032 eb 25 01:54:02 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6f6d 7061 742e 656c 0a3b 3b3b 2065 6d61 ompat.el.;;; ema │ │ │ -000000a0: 6373 2076 6572 7369 6f6e 2032 312e 3420 cs version 21.4 │ │ │ -000000b0: 2870 6174 6368 2032 3429 2022 5374 616e (patch 24) "Stan │ │ │ -000000c0: 6461 7264 2043 2220 5845 6d61 6373 204c dard C" XEmacs L │ │ │ -000000d0: 7563 6964 2e0a 3b3b 3b20 6279 7465 636f ucid..;;; byteco │ │ │ -000000e0: 6d70 2076 6572 7369 6f6e 2032 2e32 3720 mp version 2.27 │ │ │ -000000f0: 5845 6d61 6373 3b20 3230 3030 2d30 392d XEmacs; 2000-09- │ │ │ -00000100: 3132 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 12..;;; optimiza │ │ │ -00000110: 7469 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 tion is on..;;; │ │ │ -00000120: 7468 6973 2066 696c 6520 7573 6573 206f this file uses o │ │ │ -00000130: 7063 6f64 6573 2077 6869 6368 2064 6f20 pcodes which do │ │ │ -00000140: 6e6f 7420 6578 6973 7420 696e 2045 6d61 not exist in Ema │ │ │ -00000150: 6373 2031 392e 0a0a 2869 6620 2861 6e64 cs 19...(if (and │ │ │ -00000160: 2028 626f 756e 6470 2027 656d 6163 732d (boundp 'emacs- │ │ │ -00000170: 7665 7273 696f 6e29 0a09 2028 6f72 2028 version).. (or ( │ │ │ -00000180: 616e 6420 2862 6f75 6e64 7020 2765 706f and (boundp 'epo │ │ │ -00000190: 6368 3a3a 7665 7273 696f 6e29 2065 706f ch::version) epo │ │ │ -000001a0: 6368 3a3a 7665 7273 696f 6e29 0a09 2020 ch::version).. │ │ │ -000001b0: 2020 2028 7374 7269 6e67 2d6c 6573 7370 (string-lessp │ │ │ -000001c0: 2065 6d61 6373 2d76 6572 7369 6f6e 2022 emacs-version " │ │ │ -000001d0: 3230 2229 2929 0a20 2020 2028 6572 726f 20"))). (erro │ │ │ -000001e0: 7220 2260 636f 6d70 6174 2e65 6c27 2077 r "`compat.el' w │ │ │ -000001f0: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ -00000200: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ -00000210: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ -00000220: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ -00000230: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ -00000240: 6c69 7374 206e 696c 2929 0a0a 0a28 6465 list nil))...(de │ │ │ -00000250: 6661 6c69 6173 2027 636f 6d70 6174 2d68 falias 'compat-h │ │ │ -00000260: 6173 682d 7461 626c 6520 235b 2867 726f ash-table #[(gro │ │ │ -00000270: 7570 2920 2208 c14e 8722 205b 6772 6f75 up) "..N." [grou │ │ │ -00000280: 7020 636f 6d70 6174 2d74 6162 6c65 5d20 p compat-table] │ │ │ -00000290: 325d 290a 2864 6566 616c 6961 7320 2763 2]).(defalias 'c │ │ │ -000002a0: 6f6d 7061 742d 6d61 6b65 2d68 6173 682d ompat-make-hash- │ │ │ -000002b0: 7461 626c 6520 235b 2867 726f 7570 2920 table #[(group) │ │ │ -000002c0: 22c1 08c2 c320 2387 2220 5b67 726f 7570 ".... #." [group │ │ │ -000002d0: 2070 7574 2063 6f6d 7061 742d 7461 626c put compat-tabl │ │ │ -000002e0: 6520 6d61 6b65 2d68 6173 682d 7461 626c e make-hash-tabl │ │ │ -000002f0: 655d 2034 5d29 0a23 4032 3531 2044 6566 e] 4]).#@251 Def │ │ │ -00000300: 696e 6520 4752 4f55 5020 6173 2061 2067 ine GROUP as a g │ │ │ -00000310: 726f 7570 206f 6620 636f 6d70 6174 6962 roup of compatib │ │ │ -00000320: 696c 6974 7920 6675 6e63 7469 6f6e 732e ility functions. │ │ │ -00000330: 0a49 6e64 6976 6964 7561 6c20 6675 6e63 .Individual func │ │ │ -00000340: 7469 6f6e 7320 6172 6520 6465 6669 6e65 tions are define │ │ │ -00000350: 6420 7573 696e 6720 6063 6f6d 7061 742d d using `compat- │ │ │ -00000360: 6465 6669 6e65 2d66 756e 6374 696f 6e73 define-functions │ │ │ -00000370: 272e 0a4f 6e63 6520 6465 6669 6e65 642c '..Once defined, │ │ │ -00000380: 2074 6865 2066 756e 6374 696f 6e73 2063 the functions c │ │ │ -00000390: 616e 2062 6520 7573 6564 2062 7920 7772 an be used by wr │ │ │ -000003a0: 6170 7069 6e67 2079 6f75 7220 636f 6465 apping your code │ │ │ -000003b0: 2069 6e20 7468 650a 6063 6f6d 7061 7427 in the.`compat' │ │ │ -000003c0: 206d 6163 726f 2e0a 0a49 6620 4752 4f55 macro...If GROU │ │ │ -000003d0: 5020 6973 2061 6c72 6561 6479 2064 6566 P is already def │ │ │ -000003e0: 696e 6564 2c20 6e6f 7468 696e 6720 6861 ined, nothing ha │ │ │ -000003f0: 7070 656e 732e 1f0a 2864 6566 616c 6961 ppens...(defalia │ │ │ -00000400: 7320 2763 6f6d 7061 742d 6465 6669 6e65 s 'compat-define │ │ │ -00000410: 2d67 726f 7570 2027 286d 6163 726f 202e -group '(macro . │ │ │ -00000420: 2023 5b28 6772 6f75 7029 2022 c108 2118 #[(group) "..!. │ │ │ -00000430: c2c3 0821 21ae 83c4 0821 2987 2220 5b67 ...!!....!)." [g │ │ │ -00000440: 726f 7570 2065 7661 6c20 6861 7368 2d74 roup eval hash-t │ │ │ -00000450: 6162 6c65 2d70 2063 6f6d 7061 742d 6861 able-p compat-ha │ │ │ -00000460: 7368 2d74 6162 6c65 2063 6f6d 7061 742d sh-table compat- │ │ │ -00000470: 6d61 6b65 2d68 6173 682d 7461 626c 655d make-hash-table] │ │ │ -00000480: 2033 2028 2324 202e 2037 3635 295d 2929 3 (#$ . 765)])) │ │ │ -00000490: 0a23 4035 3420 436c 6561 7220 616c 6c20 .#@54 Clear all │ │ │ -000004a0: 6465 6669 6e65 6420 6675 6e63 7469 6f6e defined function │ │ │ -000004b0: 7320 616e 6420 6d61 6372 6f73 206f 7574 s and macros out │ │ │ -000004c0: 206f 6620 4752 4f55 502e 1f0a 2864 6566 of GROUP...(def │ │ │ -000004d0: 616c 6961 7320 2763 6f6d 7061 742d 636c alias 'compat-cl │ │ │ -000004e0: 6561 722d 6675 6e63 7469 6f6e 7320 2728 ear-functions '( │ │ │ -000004f0: 6d61 6372 6f20 2e20 235b 2867 726f 7570 macro . #[(group │ │ │ -00000500: 2920 22c1 0821 18c2 c308 2121 2987 2220 ) "..!....!!)." │ │ │ -00000510: 5b67 726f 7570 2065 7661 6c20 636c 7268 [group eval clrh │ │ │ -00000520: 6173 6820 636f 6d70 6174 2d68 6173 682d ash compat-hash- │ │ │ -00000530: 7461 626c 655d 2033 2028 2324 202e 2031 table] 3 (#$ . 1 │ │ │ -00000540: 3137 3429 5d29 290a 2340 3737 3520 4465 174)])).#@775 De │ │ │ -00000550: 6669 6e65 2063 6f6d 7061 7469 6269 6c69 fine compatibili │ │ │ -00000560: 7479 2066 756e 6374 696f 6e73 2069 6e20 ty functions in │ │ │ -00000570: 4752 4f55 502e 0a59 6f75 2073 686f 756c GROUP..You shoul │ │ │ -00000580: 6420 7369 6d70 6c79 2077 7261 7020 7468 d simply wrap th │ │ │ -00000590: 6973 2061 726f 756e 6420 7468 6520 636f is around the co │ │ │ -000005a0: 6465 2074 6861 7420 6465 6669 6e65 7320 de that defines │ │ │ -000005b0: 7468 6520 6675 6e63 7469 6f6e 732e 0a41 the functions..A │ │ │ -000005c0: 6e79 2066 756e 6374 696f 6e73 2061 6e64 ny functions and │ │ │ -000005d0: 206d 6163 726f 7320 6465 6669 6e65 6420 macros defined │ │ │ -000005e0: 6174 2074 6f70 206c 6576 656c 2075 7369 at top level usi │ │ │ -000005f0: 6e67 2060 6465 6675 6e27 206f 7220 6064 ng `defun' or `d │ │ │ -00000600: 6566 6d61 6372 6f27 0a77 696c 6c20 6265 efmacro'.will be │ │ │ -00000610: 206e 6f74 6963 6564 2061 6e64 2061 6464 noticed and add │ │ │ -00000620: 6564 2074 6f20 4752 4f55 502e 2020 4f74 ed to GROUP. Ot │ │ │ -00000630: 6865 7220 746f 702d 6c65 7665 6c20 636f her top-level co │ │ │ -00000640: 6465 2077 696c 6c20 6265 2065 7865 6375 de will be execu │ │ │ -00000650: 7465 640a 6e6f 726d 616c 6c79 2e20 2041 ted.normally. A │ │ │ -00000660: 6c6c 2063 6f64 6520 616e 6420 6465 6669 ll code and defi │ │ │ -00000670: 6e69 7469 6f6e 7320 696e 2074 6869 7320 nitions in this │ │ │ -00000680: 6772 6f75 7020 6361 6e20 7361 6665 6c79 group can safely │ │ │ -00000690: 2072 6566 6572 656e 6365 2061 6e79 0a6f reference any.o │ │ │ -000006a0: 7468 6572 2066 756e 6374 696f 6e73 2069 ther functions i │ │ │ -000006b0: 6e20 7468 6973 2067 726f 7570 202d 2d20 n this group -- │ │ │ -000006c0: 7468 6520 636f 6465 2069 7320 6566 6665 the code is effe │ │ │ -000006d0: 6374 6976 656c 7920 7772 6170 7065 6420 ctively wrapped │ │ │ -000006e0: 696e 2061 0a60 636f 6d70 6174 2720 6361 in a.`compat' ca │ │ │ -000006f0: 6c6c 2e20 2059 6f75 2063 616e 2063 616c ll. You can cal │ │ │ -00000700: 6c20 6063 6f6d 7061 742d 6465 6669 6e65 l `compat-define │ │ │ -00000710: 2d66 756e 6374 696f 6e73 2720 6d6f 7265 -functions' more │ │ │ -00000720: 2074 6861 6e20 6f6e 6365 2c20 6966 0a6e than once, if.n │ │ │ -00000730: 6563 6573 7361 7279 2c20 666f 7220 6120 ecessary, for a │ │ │ -00000740: 7369 6e67 6c65 2067 726f 7570 2e0a 0a57 single group...W │ │ │ -00000750: 6861 7420 6163 7475 616c 6c79 2068 6170 hat actually hap │ │ │ -00000760: 7065 6e73 2069 7320 7468 6174 2074 6865 pens is that the │ │ │ -00000770: 2066 756e 6374 696f 6e73 2061 6e64 206d functions and m │ │ │ -00000780: 6163 726f 7320 6465 6669 6e65 6420 6865 acros defined he │ │ │ -00000790: 7265 2061 7265 2069 6e0a 6661 6374 2064 re are in.fact d │ │ │ -000007a0: 6566 696e 6564 2075 7369 6e67 206e 616d efined using nam │ │ │ -000007b0: 6573 2070 7265 6669 7865 6420 7769 7468 es prefixed with │ │ │ -000007c0: 2047 524f 5550 2e20 2054 6f20 7573 6520 GROUP. To use │ │ │ -000007d0: 7468 6573 6520 6675 6e63 7469 6f6e 732c these functions, │ │ │ -000007e0: 0a77 7261 7020 616e 7920 6361 6c6c 696e .wrap any callin │ │ │ -000007f0: 6720 636f 6465 2077 6974 6820 7468 6520 g code with the │ │ │ -00000800: 6063 6f6d 7061 7427 206d 6163 726f 2c20 `compat' macro, │ │ │ -00000810: 7768 6963 6820 6c65 7869 6361 6c6c 7920 which lexically │ │ │ -00000820: 7265 6e61 6d65 730a 7468 6520 6675 6e63 renames.the func │ │ │ -00000830: 7469 6f6e 2061 6e64 206d 6163 726f 2063 tion and macro c │ │ │ -00000840: 616c 6c73 2061 7070 726f 7072 6961 7465 alls appropriate │ │ │ -00000850: 6c79 2e1f 0a28 6465 6661 6c69 6173 2027 ly...(defalias ' │ │ │ -00000860: 636f 6d70 6174 2d64 6566 696e 652d 6675 compat-define-fu │ │ │ -00000870: 6e63 7469 6f6e 7320 2728 6d61 6372 6f20 nctions '(macro │ │ │ -00000880: 2e20 235b 2867 726f 7570 2026 7265 7374 . #[(group &rest │ │ │ -00000890: 2062 6f64 7929 2022 c55c 6e21 1ac6 081b body) ".\n!.... │ │ │ -000008a0: 1c0b abb7 0b40 8914 3aab 930c 40c7 61ab .....@..:...@.a. │ │ │ -000008b0: 8dc8 0c41 400c 4141 40c9 5c6e 2123 880c ...A@.AA@.\n!#.. │ │ │ -000008c0: 3aab 930c 40ca 61ab 8dc8 0c41 400c 4141 :...@.a....A@.AA │ │ │ -000008d0: 40c9 5c6e 2123 880b 4189 13ac 492a c608 @.\n!#..A...I*.. │ │ │ -000008e0: c619 1b1c 0bab d10b 4089 143a ab9e 0c40 ........@..:...@ │ │ │ -000008f0: c761 ab98 c7cb cc5c 6e21 cdcc 0c41 4021 .a.....\n!...A@! │ │ │ -00000900: 5121 0c41 4140 45ce 0c9b a4aa a30c 3aab Q!.AA@E.......:. │ │ │ -00000910: 9e0c 40ca 61ab 98ca cbcc 5c6e 21cd cc0c ..@.a.....\n!... │ │ │ -00000920: 4140 2151 210c 4141 4045 ce0c 9ba4 aa81 A@!Q!.AA@E...... │ │ │ -00000930: 0c09 4211 0b41 8913 ac2f cfd0 5c6e 4444 ..B..A.../..\nDD │ │ │ -00000940: 099f a42c 8722 205b 626f 6479 2072 6573 ...,." [body res │ │ │ -00000950: 756c 7420 6772 6f75 7020 626f 6479 2d74 ult group body-t │ │ │ -00000960: 6169 6c20 6675 6e64 6566 2065 7661 6c20 ail fundef eval │ │ │ -00000970: 6e69 6c20 6465 6675 6e20 7075 7468 6173 nil defun puthas │ │ │ -00000980: 6820 636f 6d70 6174 2d68 6173 682d 7461 h compat-hash-ta │ │ │ -00000990: 626c 6520 6465 666d 6163 726f 2069 6e74 ble defmacro int │ │ │ -000009a0: 6572 6e20 7379 6d62 6f6c 2d6e 616d 6520 ern symbol-name │ │ │ -000009b0: 222d 2220 3320 636f 6d70 6174 2071 756f "-" 3 compat quo │ │ │ -000009c0: 7465 5d20 3720 2823 2420 2e20 3133 3538 te] 7 (#$ . 1358 │ │ │ -000009d0: 295d 2929 0a28 6279 7465 2d63 6f64 6520 )])).(byte-code │ │ │ -000009e0: 22c1 0842 10c2 c121 ac85 c3c1 c45c 2288 "..B...!.....\". │ │ │ -000009f0: c487 2220 5b63 7572 7265 6e74 2d6c 6f61 .." [current-loa │ │ │ -00000a00: 642d 6c69 7374 2063 6f6d 7061 742d 6163 d-list compat-ac │ │ │ -00000a10: 7469 7665 2d67 726f 7570 7320 6465 6661 tive-groups defa │ │ │ -00000a20: 756c 742d 626f 756e 6470 2073 6574 2d64 ult-boundp set-d │ │ │ -00000a30: 6566 6175 6c74 206e 696c 5d20 3329 0a23 efault nil] 3).# │ │ │ -00000a40: 4031 3535 2054 2069 6620 4655 4e20 6973 @155 T if FUN is │ │ │ -00000a50: 2065 6974 6865 7220 6066 626f 756e 6470 either `fboundp │ │ │ -00000a60: 2720 6f72 206f 6e65 206f 6620 7468 6520 ' or one of the │ │ │ -00000a70: 636f 6d70 6174 6962 696c 6974 7920 6675 compatibility fu │ │ │ -00000a80: 6e73 2069 6e20 4752 4f55 5053 2e0a 4752 ns in GROUPS..GR │ │ │ -00000a90: 4f55 5053 2069 7320 6120 6c69 7374 206f OUPS is a list o │ │ │ -00000aa0: 6620 636f 6d70 6174 6962 696c 6974 7920 f compatibility │ │ │ -00000ab0: 6772 6f75 7073 2061 7320 6465 6669 6e65 groups as define │ │ │ -00000ac0: 6420 7573 696e 670a 6063 6f6d 7061 742d d using.`compat- │ │ │ -00000ad0: 6465 6669 6e65 2d67 726f 7570 272e 1f0a define-group'... │ │ │ -00000ae0: 2864 6566 616c 6961 7320 2763 6f6d 7061 (defalias 'compa │ │ │ -00000af0: 742d 6662 6f75 6e64 7020 235b 2867 726f t-fboundp #[(gro │ │ │ -00000b00: 7570 7320 6675 6e29 2022 c108 21ae 83c2 ups fun) "..!... │ │ │ -00000b10: c38d 8722 205b 6675 6e20 6662 6f75 6e64 ..." [fun fbound │ │ │ -00000b20: 7020 2d2d 636c 2d62 6c6f 636b 2d6e 696c p --cl-block-nil │ │ │ -00000b30: 2d2d 2028 6d61 7063 6172 2023 5b28 6772 -- (mapcar #[(gr │ │ │ -00000b40: 6f75 7029 2022 c209 c308 215c 22ad 84c4 oup) "....!\"... │ │ │ -00000b50: c5c6 5c22 8722 205b 6772 6f75 7020 6675 ..\"." [group fu │ │ │ -00000b60: 6e20 6765 7468 6173 6820 636f 6d70 6174 n gethash compat │ │ │ -00000b70: 2d68 6173 682d 7461 626c 6520 7468 726f -hash-table thro │ │ │ -00000b80: 7720 2d2d 636c 2d62 6c6f 636b 2d6e 696c w --cl-block-nil │ │ │ -00000b90: 2d2d 2074 5d20 345d 2067 726f 7570 7329 -- t] 4] groups) │ │ │ -00000ba0: 5d20 3220 2823 2420 2e20 3236 3239 295d ] 2 (#$ . 2629)] │ │ │ -00000bb0: 290a 2340 3132 3333 204d 616b 6520 7573 ).#@1233 Make us │ │ │ -00000bc0: 6520 6f66 2063 6f6d 7061 7469 6269 6c69 e of compatibili │ │ │ -00000bd0: 7479 2066 756e 6374 696f 6e73 2061 6e64 ty functions and │ │ │ -00000be0: 206d 6163 726f 7320 696e 2047 524f 5550 macros in GROUP │ │ │ -00000bf0: 2e0a 596f 7520 7368 6f75 6c64 2073 696d ..You should sim │ │ │ -00000c00: 706c 7920 7772 6170 2074 6869 7320 6172 ply wrap this ar │ │ │ -00000c10: 6f75 6e64 2074 6865 2063 6f64 6520 7468 ound the code th │ │ │ -00000c20: 6174 2075 7365 7320 7468 6520 6675 6e63 at uses the func │ │ │ -00000c30: 7469 6f6e 730a 616e 6420 6d61 6372 6f73 tions.and macros │ │ │ -00000c40: 2069 6e20 4752 4f55 502e 2020 5479 7069 in GROUP. Typi │ │ │ -00000c50: 6361 6c6c 792c 2061 2063 616c 6c20 746f cally, a call to │ │ │ -00000c60: 2060 636f 6d70 6174 2720 7368 6f75 6c64 `compat' should │ │ │ -00000c70: 2062 6520 706c 6163 6564 0a61 7420 7468 be placed.at th │ │ │ -00000c80: 6520 746f 7020 6f66 2061 6e20 454c 6973 e top of an ELis │ │ │ -00000c90: 7020 6d6f 6475 6c65 2c20 7769 7468 2074 p module, with t │ │ │ -00000ca0: 6865 2063 6c6f 7369 6e67 2070 6172 656e he closing paren │ │ │ -00000cb0: 7468 6573 6973 2061 7420 7468 650a 626f thesis at the.bo │ │ │ -00000cc0: 7474 6f6d 3b20 7573 6520 7468 6973 2069 ttom; use this i │ │ │ -00000cd0: 6e20 706c 6163 6520 6f66 2061 2060 7265 n place of a `re │ │ │ -00000ce0: 7175 6972 6527 2073 7461 7465 6d65 6e74 quire' statement │ │ │ -00000cf0: 2e20 2057 7261 7070 6564 2063 6f64 6520 . Wrapped code │ │ │ -00000d00: 6361 6e0a 6265 2065 6974 6865 7220 6675 can.be either fu │ │ │ -00000d10: 6e63 7469 6f6e 206f 7220 6d61 6372 6f20 nction or macro │ │ │ -00000d20: 6465 6669 6e69 7469 6f6e 7320 6f72 206f definitions or o │ │ │ -00000d30: 7468 6572 2045 4c69 7370 2063 6f64 652c ther ELisp code, │ │ │ -00000d40: 2061 6e64 0a77 7261 7070 6564 2066 756e and.wrapped fun │ │ │ -00000d50: 6374 696f 6e20 6f72 206d 6163 726f 2064 ction or macro d │ │ │ -00000d60: 6566 696e 6974 696f 6e73 206e 6565 6420 efinitions need │ │ │ -00000d70: 6e6f 7420 6265 2061 7420 746f 7020 6c65 not be at top le │ │ │ -00000d80: 7665 6c2e 2020 416c 6c0a 6361 6c6c 7320 vel. All.calls │ │ │ -00000d90: 746f 2074 6865 2063 6f6d 7061 7469 6269 to the compatibi │ │ │ -00000da0: 6c69 7479 2066 756e 6374 696f 6e73 206f lity functions o │ │ │ -00000db0: 7220 6d61 6372 6f73 2077 696c 6c20 6265 r macros will be │ │ │ -00000dc0: 206e 6f74 6963 6564 2061 6e79 7768 6572 noticed anywher │ │ │ -00000dd0: 650a 7769 7468 696e 2074 6865 2077 7261 e.within the wra │ │ │ -00000de0: 7070 6564 2063 6f64 652e 2020 4361 6c6c pped code. Call │ │ │ -00000df0: 7320 746f 2060 6662 6f75 6e64 7027 2077 s to `fboundp' w │ │ │ -00000e00: 6974 6869 6e20 7468 6520 7772 6170 7065 ithin the wrappe │ │ │ -00000e10: 6420 636f 6465 0a77 696c 6c20 616c 736f d code.will also │ │ │ -00000e20: 2062 6568 6176 6520 636f 7272 6563 746c behave correctl │ │ │ -00000e30: 7920 7768 656e 2063 616c 6c65 6420 6f6e y when called on │ │ │ -00000e40: 2063 6f6d 7061 7469 6269 6c69 7479 2066 compatibility f │ │ │ -00000e50: 756e 6374 696f 6e73 2061 6e64 0a6d 6163 unctions and.mac │ │ │ -00000e60: 726f 732c 2065 7665 6e20 7468 6f75 6768 ros, even though │ │ │ -00000e70: 2074 6865 7920 776f 756c 6420 7265 7475 they would retu │ │ │ -00000e80: 726e 206e 696c 2065 6c73 6577 6865 7265 rn nil elsewhere │ │ │ -00000e90: 2028 696e 636c 7564 696e 6720 696e 2063 (including in c │ │ │ -00000ea0: 6f64 650a 696e 206f 7468 6572 206d 6f64 ode.in other mod │ │ │ -00000eb0: 756c 6573 2063 616c 6c65 6420 6479 6e61 ules called dyna │ │ │ -00000ec0: 6d69 6361 6c6c 7920 6672 6f6d 2074 6865 mically from the │ │ │ -00000ed0: 2077 7261 7070 6564 2063 6f64 6529 2e0a wrapped code).. │ │ │ -00000ee0: 0a54 6865 2066 756e 6374 696f 6e73 2061 .The functions a │ │ │ -00000ef0: 6e64 206d 6163 726f 7320 6465 6669 6e65 nd macros define │ │ │ -00000f00: 2069 6e20 4752 4f55 5020 6172 6520 6163 in GROUP are ac │ │ │ -00000f10: 7475 616c 6c79 2064 6566 696e 6564 2075 tually defined u │ │ │ -00000f20: 6e64 6572 0a70 7265 6669 7865 6420 6e61 nder.prefixed na │ │ │ -00000f30: 6d65 732c 2074 6f20 6176 6f69 6420 6e61 mes, to avoid na │ │ │ -00000f40: 6d65 7370 6163 6520 636c 6173 6865 7320 mespace clashes │ │ │ -00000f50: 616e 6420 6261 6420 696e 7465 7261 6374 and bad interact │ │ │ -00000f60: 696f 6e73 2077 6974 680a 6f74 6865 7220 ions with.other │ │ │ -00000f70: 636f 6465 2074 6861 7420 6361 6c6c 7320 code that calls │ │ │ -00000f80: 6066 626f 756e 6470 272e 2020 416c 6c20 `fboundp'. All │ │ │ -00000f90: 6361 6c6c 7320 696e 7369 6465 206f 6620 calls inside of │ │ │ -00000fa0: 7468 6520 7772 6170 7065 6420 636f 6465 the wrapped code │ │ │ -00000fb0: 0a74 6f20 7468 6520 636f 6d70 6174 6962 .to the compatib │ │ │ -00000fc0: 696c 6974 7920 6675 6e63 7469 6f6e 7320 ility functions │ │ │ -00000fd0: 616e 6420 6d61 6372 6f73 2069 6e20 4752 and macros in GR │ │ │ -00000fe0: 4f55 5020 6172 6520 6c65 7869 6361 6c6c OUP are lexicall │ │ │ -00000ff0: 790a 6d61 7070 6564 2074 6f20 7468 6520 y.mapped to the │ │ │ -00001000: 7072 6566 6978 6564 206e 616d 6573 2e20 prefixed names. │ │ │ -00001010: 2053 696e 6365 2074 6869 7320 6973 2061 Since this is a │ │ │ -00001020: 206c 6578 6963 616c 206d 6170 7069 6e67 lexical mapping │ │ │ -00001030: 2c20 636f 6465 0a69 6e20 6f74 6865 7220 , code.in other │ │ │ -00001040: 6d6f 6475 6c65 7320 7468 6174 2069 7320 modules that is │ │ │ -00001050: 6361 6c6c 6564 2062 7920 6675 6e63 7469 called by functi │ │ │ -00001060: 6f6e 7320 696e 2074 6869 7320 6d6f 6475 ons in this modu │ │ │ -00001070: 6c65 2077 696c 6c20 6e6f 740a 6265 2061 le will not.be a │ │ │ -00001080: 6666 6563 7465 642e 1f0a 2864 6566 616c ffected...(defal │ │ │ -00001090: 6961 7320 2763 6f6d 7061 7420 2728 6d61 ias 'compat '(ma │ │ │ -000010a0: 6372 6f20 2e20 235b 2867 726f 7570 2026 cro . #[(group & │ │ │ -000010b0: 7265 7374 2062 6f64 7929 2022 c35c 6e21 rest body) ".\n! │ │ │ -000010c0: c419 1ac5 c6c7 5c6e 215c 2288 c8c9 cacb ......\n!\"..... │ │ │ -000010d0: 5c6e 44cc 4242 4443 cdce 0942 0842 4245 \nD.BBDC...B.BBE │ │ │ -000010e0: 2a87 2220 5b62 6f64 7920 6465 6673 2067 *." [body defs g │ │ │ -000010f0: 726f 7570 2065 7661 6c20 6e69 6c20 6d61 roup eval nil ma │ │ │ -00001100: 7068 6173 6820 235b 2866 756e 2061 7267 phash #[(fun arg │ │ │ -00001110: 7329 2022 0b5c 6ec4 c5c6 c708 21c8 c70b s) ".\n.....!... │ │ │ -00001120: 2151 2144 445c 6ea4 4509 4289 1187 2220 !Q!DD\n.E.B..." │ │ │ -00001130: 5b67 726f 7570 2064 6566 7320 6172 6773 [group defs args │ │ │ -00001140: 2066 756e 206c 6973 7420 7175 6f74 6520 fun list quote │ │ │ -00001150: 696e 7465 726e 2073 796d 626f 6c2d 6e61 intern symbol-na │ │ │ -00001160: 6d65 2022 2d22 5d20 395d 2063 6f6d 7061 me "-"] 9] compa │ │ │ -00001170: 742d 6861 7368 2d74 6162 6c65 206c 6574 t-hash-table let │ │ │ -00001180: 2063 6f6d 7061 742d 6163 7469 7665 2d67 compat-active-g │ │ │ -00001190: 726f 7570 7320 636f 6e73 2071 756f 7465 roups cons quote │ │ │ -000011a0: 2028 636f 6d70 6174 2d61 6374 6976 652d (compat-active- │ │ │ -000011b0: 6772 6f75 7073 2920 6d61 6372 6f6c 6574 groups) macrolet │ │ │ -000011c0: 2028 6662 6f75 6e64 7020 2866 756e 2920 (fboundp (fun) │ │ │ -000011d0: 286c 6973 7420 2763 6f6d 7061 742d 6662 (list 'compat-fb │ │ │ -000011e0: 6f75 6e64 7020 286c 6973 7420 2771 756f oundp (list 'quo │ │ │ -000011f0: 7465 2063 6f6d 7061 742d 6163 7469 7665 te compat-active │ │ │ -00001200: 2d67 726f 7570 7329 2066 756e 2929 5d20 -groups) fun))] │ │ │ -00001210: 3520 2823 2420 2e20 3330 3031 295d 2929 5 (#$ . 3001)])) │ │ │ -00001220: 0a . │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3531 2032 3032 310a 3b3b 3b20 :08:51 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6f6d 7061 742e 656c 4/lisp/compat.el │ │ │ +00000090: 0a3b 3b3b 2065 6d61 6373 2076 6572 7369 .;;; emacs versi │ │ │ +000000a0: 6f6e 2032 312e 3420 2870 6174 6368 2032 on 21.4 (patch 2 │ │ │ +000000b0: 3429 2022 5374 616e 6461 7264 2043 2220 4) "Standard C" │ │ │ +000000c0: 5845 6d61 6373 204c 7563 6964 2e0a 3b3b XEmacs Lucid..;; │ │ │ +000000d0: 3b20 6279 7465 636f 6d70 2076 6572 7369 ; bytecomp versi │ │ │ +000000e0: 6f6e 2032 2e32 3720 5845 6d61 6373 3b20 on 2.27 XEmacs; │ │ │ +000000f0: 3230 3030 2d30 392d 3132 2e0a 3b3b 3b20 2000-09-12..;;; │ │ │ +00000100: 6f70 7469 6d69 7a61 7469 6f6e 2069 7320 optimization is │ │ │ +00000110: 6f6e 2e0a 3b3b 3b20 7468 6973 2066 696c on..;;; this fil │ │ │ +00000120: 6520 7573 6573 206f 7063 6f64 6573 2077 e uses opcodes w │ │ │ +00000130: 6869 6368 2064 6f20 6e6f 7420 6578 6973 hich do not exis │ │ │ +00000140: 7420 696e 2045 6d61 6373 2031 392e 0a0a t in Emacs 19... │ │ │ +00000150: 2869 6620 2861 6e64 2028 626f 756e 6470 (if (and (boundp │ │ │ +00000160: 2027 656d 6163 732d 7665 7273 696f 6e29 'emacs-version) │ │ │ +00000170: 0a09 2028 6f72 2028 616e 6420 2862 6f75 .. (or (and (bou │ │ │ +00000180: 6e64 7020 2765 706f 6368 3a3a 7665 7273 ndp 'epoch::vers │ │ │ +00000190: 696f 6e29 2065 706f 6368 3a3a 7665 7273 ion) epoch::vers │ │ │ +000001a0: 696f 6e29 0a09 2020 2020 2028 7374 7269 ion).. (stri │ │ │ +000001b0: 6e67 2d6c 6573 7370 2065 6d61 6373 2d76 ng-lessp emacs-v │ │ │ +000001c0: 6572 7369 6f6e 2022 3230 2229 2929 0a20 ersion "20"))). │ │ │ +000001d0: 2020 2028 6572 726f 7220 2260 636f 6d70 (error "`comp │ │ │ +000001e0: 6174 2e65 6c27 2077 6173 2063 6f6d 7069 at.el' was compi │ │ │ +000001f0: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ +00000200: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ +00000210: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ +00000220: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ +00000230: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ +00000240: 2929 0a0a 0a28 6465 6661 6c69 6173 2027 ))...(defalias ' │ │ │ +00000250: 636f 6d70 6174 2d68 6173 682d 7461 626c compat-hash-tabl │ │ │ +00000260: 6520 235b 2867 726f 7570 2920 2208 c14e e #[(group) "..N │ │ │ +00000270: 8722 205b 6772 6f75 7020 636f 6d70 6174 ." [group compat │ │ │ +00000280: 2d74 6162 6c65 5d20 325d 290a 2864 6566 -table] 2]).(def │ │ │ +00000290: 616c 6961 7320 2763 6f6d 7061 742d 6d61 alias 'compat-ma │ │ │ +000002a0: 6b65 2d68 6173 682d 7461 626c 6520 235b ke-hash-table #[ │ │ │ +000002b0: 2867 726f 7570 2920 22c1 08c2 c320 2387 (group) ".... #. │ │ │ +000002c0: 2220 5b67 726f 7570 2070 7574 2063 6f6d " [group put com │ │ │ +000002d0: 7061 742d 7461 626c 6520 6d61 6b65 2d68 pat-table make-h │ │ │ +000002e0: 6173 682d 7461 626c 655d 2034 5d29 0a23 ash-table] 4]).# │ │ │ +000002f0: 4032 3531 2044 6566 696e 6520 4752 4f55 @251 Define GROU │ │ │ +00000300: 5020 6173 2061 2067 726f 7570 206f 6620 P as a group of │ │ │ +00000310: 636f 6d70 6174 6962 696c 6974 7920 6675 compatibility fu │ │ │ +00000320: 6e63 7469 6f6e 732e 0a49 6e64 6976 6964 nctions..Individ │ │ │ +00000330: 7561 6c20 6675 6e63 7469 6f6e 7320 6172 ual functions ar │ │ │ +00000340: 6520 6465 6669 6e65 6420 7573 696e 6720 e defined using │ │ │ +00000350: 6063 6f6d 7061 742d 6465 6669 6e65 2d66 `compat-define-f │ │ │ +00000360: 756e 6374 696f 6e73 272e 0a4f 6e63 6520 unctions'..Once │ │ │ +00000370: 6465 6669 6e65 642c 2074 6865 2066 756e defined, the fun │ │ │ +00000380: 6374 696f 6e73 2063 616e 2062 6520 7573 ctions can be us │ │ │ +00000390: 6564 2062 7920 7772 6170 7069 6e67 2079 ed by wrapping y │ │ │ +000003a0: 6f75 7220 636f 6465 2069 6e20 7468 650a our code in the. │ │ │ +000003b0: 6063 6f6d 7061 7427 206d 6163 726f 2e0a `compat' macro.. │ │ │ +000003c0: 0a49 6620 4752 4f55 5020 6973 2061 6c72 .If GROUP is alr │ │ │ +000003d0: 6561 6479 2064 6566 696e 6564 2c20 6e6f eady defined, no │ │ │ +000003e0: 7468 696e 6720 6861 7070 656e 732e 1f0a thing happens... │ │ │ +000003f0: 2864 6566 616c 6961 7320 2763 6f6d 7061 (defalias 'compa │ │ │ +00000400: 742d 6465 6669 6e65 2d67 726f 7570 2027 t-define-group ' │ │ │ +00000410: 286d 6163 726f 202e 2023 5b28 6772 6f75 (macro . #[(grou │ │ │ +00000420: 7029 2022 c108 2118 c2c3 0821 21ae 83c4 p) "..!....!!... │ │ │ +00000430: 0821 2987 2220 5b67 726f 7570 2065 7661 .!)." [group eva │ │ │ +00000440: 6c20 6861 7368 2d74 6162 6c65 2d70 2063 l hash-table-p c │ │ │ +00000450: 6f6d 7061 742d 6861 7368 2d74 6162 6c65 ompat-hash-table │ │ │ +00000460: 2063 6f6d 7061 742d 6d61 6b65 2d68 6173 compat-make-has │ │ │ +00000470: 682d 7461 626c 655d 2033 2028 2324 202e h-table] 3 (#$ . │ │ │ +00000480: 2037 3537 295d 2929 0a23 4035 3420 436c 757)])).#@54 Cl │ │ │ +00000490: 6561 7220 616c 6c20 6465 6669 6e65 6420 ear all defined │ │ │ +000004a0: 6675 6e63 7469 6f6e 7320 616e 6420 6d61 functions and ma │ │ │ +000004b0: 6372 6f73 206f 7574 206f 6620 4752 4f55 cros out of GROU │ │ │ +000004c0: 502e 1f0a 2864 6566 616c 6961 7320 2763 P...(defalias 'c │ │ │ +000004d0: 6f6d 7061 742d 636c 6561 722d 6675 6e63 ompat-clear-func │ │ │ +000004e0: 7469 6f6e 7320 2728 6d61 6372 6f20 2e20 tions '(macro . │ │ │ +000004f0: 235b 2867 726f 7570 2920 22c1 0821 18c2 #[(group) "..!.. │ │ │ +00000500: c308 2121 2987 2220 5b67 726f 7570 2065 ..!!)." [group e │ │ │ +00000510: 7661 6c20 636c 7268 6173 6820 636f 6d70 val clrhash comp │ │ │ +00000520: 6174 2d68 6173 682d 7461 626c 655d 2033 at-hash-table] 3 │ │ │ +00000530: 2028 2324 202e 2031 3136 3629 5d29 290a (#$ . 1166)])). │ │ │ +00000540: 2340 3737 3520 4465 6669 6e65 2063 6f6d #@775 Define com │ │ │ +00000550: 7061 7469 6269 6c69 7479 2066 756e 6374 patibility funct │ │ │ +00000560: 696f 6e73 2069 6e20 4752 4f55 502e 0a59 ions in GROUP..Y │ │ │ +00000570: 6f75 2073 686f 756c 6420 7369 6d70 6c79 ou should simply │ │ │ +00000580: 2077 7261 7020 7468 6973 2061 726f 756e wrap this aroun │ │ │ +00000590: 6420 7468 6520 636f 6465 2074 6861 7420 d the code that │ │ │ +000005a0: 6465 6669 6e65 7320 7468 6520 6675 6e63 defines the func │ │ │ +000005b0: 7469 6f6e 732e 0a41 6e79 2066 756e 6374 tions..Any funct │ │ │ +000005c0: 696f 6e73 2061 6e64 206d 6163 726f 7320 ions and macros │ │ │ +000005d0: 6465 6669 6e65 6420 6174 2074 6f70 206c defined at top l │ │ │ +000005e0: 6576 656c 2075 7369 6e67 2060 6465 6675 evel using `defu │ │ │ +000005f0: 6e27 206f 7220 6064 6566 6d61 6372 6f27 n' or `defmacro' │ │ │ +00000600: 0a77 696c 6c20 6265 206e 6f74 6963 6564 .will be noticed │ │ │ +00000610: 2061 6e64 2061 6464 6564 2074 6f20 4752 and added to GR │ │ │ +00000620: 4f55 502e 2020 4f74 6865 7220 746f 702d OUP. Other top- │ │ │ +00000630: 6c65 7665 6c20 636f 6465 2077 696c 6c20 level code will │ │ │ +00000640: 6265 2065 7865 6375 7465 640a 6e6f 726d be executed.norm │ │ │ +00000650: 616c 6c79 2e20 2041 6c6c 2063 6f64 6520 ally. All code │ │ │ +00000660: 616e 6420 6465 6669 6e69 7469 6f6e 7320 and definitions │ │ │ +00000670: 696e 2074 6869 7320 6772 6f75 7020 6361 in this group ca │ │ │ +00000680: 6e20 7361 6665 6c79 2072 6566 6572 656e n safely referen │ │ │ +00000690: 6365 2061 6e79 0a6f 7468 6572 2066 756e ce any.other fun │ │ │ +000006a0: 6374 696f 6e73 2069 6e20 7468 6973 2067 ctions in this g │ │ │ +000006b0: 726f 7570 202d 2d20 7468 6520 636f 6465 roup -- the code │ │ │ +000006c0: 2069 7320 6566 6665 6374 6976 656c 7920 is effectively │ │ │ +000006d0: 7772 6170 7065 6420 696e 2061 0a60 636f wrapped in a.`co │ │ │ +000006e0: 6d70 6174 2720 6361 6c6c 2e20 2059 6f75 mpat' call. You │ │ │ +000006f0: 2063 616e 2063 616c 6c20 6063 6f6d 7061 can call `compa │ │ │ +00000700: 742d 6465 6669 6e65 2d66 756e 6374 696f t-define-functio │ │ │ +00000710: 6e73 2720 6d6f 7265 2074 6861 6e20 6f6e ns' more than on │ │ │ +00000720: 6365 2c20 6966 0a6e 6563 6573 7361 7279 ce, if.necessary │ │ │ +00000730: 2c20 666f 7220 6120 7369 6e67 6c65 2067 , for a single g │ │ │ +00000740: 726f 7570 2e0a 0a57 6861 7420 6163 7475 roup...What actu │ │ │ +00000750: 616c 6c79 2068 6170 7065 6e73 2069 7320 ally happens is │ │ │ +00000760: 7468 6174 2074 6865 2066 756e 6374 696f that the functio │ │ │ +00000770: 6e73 2061 6e64 206d 6163 726f 7320 6465 ns and macros de │ │ │ +00000780: 6669 6e65 6420 6865 7265 2061 7265 2069 fined here are i │ │ │ +00000790: 6e0a 6661 6374 2064 6566 696e 6564 2075 n.fact defined u │ │ │ +000007a0: 7369 6e67 206e 616d 6573 2070 7265 6669 sing names prefi │ │ │ +000007b0: 7865 6420 7769 7468 2047 524f 5550 2e20 xed with GROUP. │ │ │ +000007c0: 2054 6f20 7573 6520 7468 6573 6520 6675 To use these fu │ │ │ +000007d0: 6e63 7469 6f6e 732c 0a77 7261 7020 616e nctions,.wrap an │ │ │ +000007e0: 7920 6361 6c6c 696e 6720 636f 6465 2077 y calling code w │ │ │ +000007f0: 6974 6820 7468 6520 6063 6f6d 7061 7427 ith the `compat' │ │ │ +00000800: 206d 6163 726f 2c20 7768 6963 6820 6c65 macro, which le │ │ │ +00000810: 7869 6361 6c6c 7920 7265 6e61 6d65 730a xically renames. │ │ │ +00000820: 7468 6520 6675 6e63 7469 6f6e 2061 6e64 the function and │ │ │ +00000830: 206d 6163 726f 2063 616c 6c73 2061 7070 macro calls app │ │ │ +00000840: 726f 7072 6961 7465 6c79 2e1f 0a28 6465 ropriately...(de │ │ │ +00000850: 6661 6c69 6173 2027 636f 6d70 6174 2d64 falias 'compat-d │ │ │ +00000860: 6566 696e 652d 6675 6e63 7469 6f6e 7320 efine-functions │ │ │ +00000870: 2728 6d61 6372 6f20 2e20 235b 2867 726f '(macro . #[(gro │ │ │ +00000880: 7570 2026 7265 7374 2062 6f64 7929 2022 up &rest body) " │ │ │ +00000890: c55c 6e21 1ac6 081b 1c0b abb7 0b40 8914 .\n!.........@.. │ │ │ +000008a0: 3aab 930c 40c7 61ab 8dc8 0c41 400c 4141 :...@.a....A@.AA │ │ │ +000008b0: 40c9 5c6e 2123 880c 3aab 930c 40ca 61ab @.\n!#..:...@.a. │ │ │ +000008c0: 8dc8 0c41 400c 4141 40c9 5c6e 2123 880b ...A@.AA@.\n!#.. │ │ │ +000008d0: 4189 13ac 492a c608 c619 1b1c 0bab d10b A...I*.......... │ │ │ +000008e0: 4089 143a ab9e 0c40 c761 ab98 c7cb cc5c @..:...@.a.....\ │ │ │ +000008f0: 6e21 cdcc 0c41 4021 5121 0c41 4140 45ce n!...A@!Q!.AA@E. │ │ │ +00000900: 0c9b a4aa a30c 3aab 9e0c 40ca 61ab 98ca ......:...@.a... │ │ │ +00000910: cbcc 5c6e 21cd cc0c 4140 2151 210c 4141 ..\n!...A@!Q!.AA │ │ │ +00000920: 4045 ce0c 9ba4 aa81 0c09 4211 0b41 8913 @E........B..A.. │ │ │ +00000930: ac2f cfd0 5c6e 4444 099f a42c 8722 205b ./..\nDD...,." [ │ │ │ +00000940: 626f 6479 2072 6573 756c 7420 6772 6f75 body result grou │ │ │ +00000950: 7020 626f 6479 2d74 6169 6c20 6675 6e64 p body-tail fund │ │ │ +00000960: 6566 2065 7661 6c20 6e69 6c20 6465 6675 ef eval nil defu │ │ │ +00000970: 6e20 7075 7468 6173 6820 636f 6d70 6174 n puthash compat │ │ │ +00000980: 2d68 6173 682d 7461 626c 6520 6465 666d -hash-table defm │ │ │ +00000990: 6163 726f 2069 6e74 6572 6e20 7379 6d62 acro intern symb │ │ │ +000009a0: 6f6c 2d6e 616d 6520 222d 2220 3320 636f ol-name "-" 3 co │ │ │ +000009b0: 6d70 6174 2071 756f 7465 5d20 3720 2823 mpat quote] 7 (# │ │ │ +000009c0: 2420 2e20 3133 3530 295d 2929 0a28 6279 $ . 1350)])).(by │ │ │ +000009d0: 7465 2d63 6f64 6520 22c1 0842 10c2 c121 te-code "..B...! │ │ │ +000009e0: ac85 c3c1 c45c 2288 c487 2220 5b63 7572 .....\"..." [cur │ │ │ +000009f0: 7265 6e74 2d6c 6f61 642d 6c69 7374 2063 rent-load-list c │ │ │ +00000a00: 6f6d 7061 742d 6163 7469 7665 2d67 726f ompat-active-gro │ │ │ +00000a10: 7570 7320 6465 6661 756c 742d 626f 756e ups default-boun │ │ │ +00000a20: 6470 2073 6574 2d64 6566 6175 6c74 206e dp set-default n │ │ │ +00000a30: 696c 5d20 3329 0a23 4031 3535 2054 2069 il] 3).#@155 T i │ │ │ +00000a40: 6620 4655 4e20 6973 2065 6974 6865 7220 f FUN is either │ │ │ +00000a50: 6066 626f 756e 6470 2720 6f72 206f 6e65 `fboundp' or one │ │ │ +00000a60: 206f 6620 7468 6520 636f 6d70 6174 6962 of the compatib │ │ │ +00000a70: 696c 6974 7920 6675 6e73 2069 6e20 4752 ility funs in GR │ │ │ +00000a80: 4f55 5053 2e0a 4752 4f55 5053 2069 7320 OUPS..GROUPS is │ │ │ +00000a90: 6120 6c69 7374 206f 6620 636f 6d70 6174 a list of compat │ │ │ +00000aa0: 6962 696c 6974 7920 6772 6f75 7073 2061 ibility groups a │ │ │ +00000ab0: 7320 6465 6669 6e65 6420 7573 696e 670a s defined using. │ │ │ +00000ac0: 6063 6f6d 7061 742d 6465 6669 6e65 2d67 `compat-define-g │ │ │ +00000ad0: 726f 7570 272e 1f0a 2864 6566 616c 6961 roup'...(defalia │ │ │ +00000ae0: 7320 2763 6f6d 7061 742d 6662 6f75 6e64 s 'compat-fbound │ │ │ +00000af0: 7020 235b 2867 726f 7570 7320 6675 6e29 p #[(groups fun) │ │ │ +00000b00: 2022 c108 21ae 83c2 c38d 8722 205b 6675 "..!......" [fu │ │ │ +00000b10: 6e20 6662 6f75 6e64 7020 2d2d 636c 2d62 n fboundp --cl-b │ │ │ +00000b20: 6c6f 636b 2d6e 696c 2d2d 2028 6d61 7063 lock-nil-- (mapc │ │ │ +00000b30: 6172 2023 5b28 6772 6f75 7029 2022 c209 ar #[(group) ".. │ │ │ +00000b40: c308 215c 22ad 84c4 c5c6 5c22 8722 205b ..!\".....\"." [ │ │ │ +00000b50: 6772 6f75 7020 6675 6e20 6765 7468 6173 group fun gethas │ │ │ +00000b60: 6820 636f 6d70 6174 2d68 6173 682d 7461 h compat-hash-ta │ │ │ +00000b70: 626c 6520 7468 726f 7720 2d2d 636c 2d62 ble throw --cl-b │ │ │ +00000b80: 6c6f 636b 2d6e 696c 2d2d 2074 5d20 345d lock-nil-- t] 4] │ │ │ +00000b90: 2067 726f 7570 7329 5d20 3220 2823 2420 groups)] 2 (#$ │ │ │ +00000ba0: 2e20 3236 3231 295d 290a 2340 3132 3333 . 2621)]).#@1233 │ │ │ +00000bb0: 204d 616b 6520 7573 6520 6f66 2063 6f6d Make use of com │ │ │ +00000bc0: 7061 7469 6269 6c69 7479 2066 756e 6374 patibility funct │ │ │ +00000bd0: 696f 6e73 2061 6e64 206d 6163 726f 7320 ions and macros │ │ │ +00000be0: 696e 2047 524f 5550 2e0a 596f 7520 7368 in GROUP..You sh │ │ │ +00000bf0: 6f75 6c64 2073 696d 706c 7920 7772 6170 ould simply wrap │ │ │ +00000c00: 2074 6869 7320 6172 6f75 6e64 2074 6865 this around the │ │ │ +00000c10: 2063 6f64 6520 7468 6174 2075 7365 7320 code that uses │ │ │ +00000c20: 7468 6520 6675 6e63 7469 6f6e 730a 616e the functions.an │ │ │ +00000c30: 6420 6d61 6372 6f73 2069 6e20 4752 4f55 d macros in GROU │ │ │ +00000c40: 502e 2020 5479 7069 6361 6c6c 792c 2061 P. Typically, a │ │ │ +00000c50: 2063 616c 6c20 746f 2060 636f 6d70 6174 call to `compat │ │ │ +00000c60: 2720 7368 6f75 6c64 2062 6520 706c 6163 ' should be plac │ │ │ +00000c70: 6564 0a61 7420 7468 6520 746f 7020 6f66 ed.at the top of │ │ │ +00000c80: 2061 6e20 454c 6973 7020 6d6f 6475 6c65 an ELisp module │ │ │ +00000c90: 2c20 7769 7468 2074 6865 2063 6c6f 7369 , with the closi │ │ │ +00000ca0: 6e67 2070 6172 656e 7468 6573 6973 2061 ng parenthesis a │ │ │ +00000cb0: 7420 7468 650a 626f 7474 6f6d 3b20 7573 t the.bottom; us │ │ │ +00000cc0: 6520 7468 6973 2069 6e20 706c 6163 6520 e this in place │ │ │ +00000cd0: 6f66 2061 2060 7265 7175 6972 6527 2073 of a `require' s │ │ │ +00000ce0: 7461 7465 6d65 6e74 2e20 2057 7261 7070 tatement. Wrapp │ │ │ +00000cf0: 6564 2063 6f64 6520 6361 6e0a 6265 2065 ed code can.be e │ │ │ +00000d00: 6974 6865 7220 6675 6e63 7469 6f6e 206f ither function o │ │ │ +00000d10: 7220 6d61 6372 6f20 6465 6669 6e69 7469 r macro definiti │ │ │ +00000d20: 6f6e 7320 6f72 206f 7468 6572 2045 4c69 ons or other ELi │ │ │ +00000d30: 7370 2063 6f64 652c 2061 6e64 0a77 7261 sp code, and.wra │ │ │ +00000d40: 7070 6564 2066 756e 6374 696f 6e20 6f72 pped function or │ │ │ +00000d50: 206d 6163 726f 2064 6566 696e 6974 696f macro definitio │ │ │ +00000d60: 6e73 206e 6565 6420 6e6f 7420 6265 2061 ns need not be a │ │ │ +00000d70: 7420 746f 7020 6c65 7665 6c2e 2020 416c t top level. Al │ │ │ +00000d80: 6c0a 6361 6c6c 7320 746f 2074 6865 2063 l.calls to the c │ │ │ +00000d90: 6f6d 7061 7469 6269 6c69 7479 2066 756e ompatibility fun │ │ │ +00000da0: 6374 696f 6e73 206f 7220 6d61 6372 6f73 ctions or macros │ │ │ +00000db0: 2077 696c 6c20 6265 206e 6f74 6963 6564 will be noticed │ │ │ +00000dc0: 2061 6e79 7768 6572 650a 7769 7468 696e anywhere.within │ │ │ +00000dd0: 2074 6865 2077 7261 7070 6564 2063 6f64 the wrapped cod │ │ │ +00000de0: 652e 2020 4361 6c6c 7320 746f 2060 6662 e. Calls to `fb │ │ │ +00000df0: 6f75 6e64 7027 2077 6974 6869 6e20 7468 oundp' within th │ │ │ +00000e00: 6520 7772 6170 7065 6420 636f 6465 0a77 e wrapped code.w │ │ │ +00000e10: 696c 6c20 616c 736f 2062 6568 6176 6520 ill also behave │ │ │ +00000e20: 636f 7272 6563 746c 7920 7768 656e 2063 correctly when c │ │ │ +00000e30: 616c 6c65 6420 6f6e 2063 6f6d 7061 7469 alled on compati │ │ │ +00000e40: 6269 6c69 7479 2066 756e 6374 696f 6e73 bility functions │ │ │ +00000e50: 2061 6e64 0a6d 6163 726f 732c 2065 7665 and.macros, eve │ │ │ +00000e60: 6e20 7468 6f75 6768 2074 6865 7920 776f n though they wo │ │ │ +00000e70: 756c 6420 7265 7475 726e 206e 696c 2065 uld return nil e │ │ │ +00000e80: 6c73 6577 6865 7265 2028 696e 636c 7564 lsewhere (includ │ │ │ +00000e90: 696e 6720 696e 2063 6f64 650a 696e 206f ing in code.in o │ │ │ +00000ea0: 7468 6572 206d 6f64 756c 6573 2063 616c ther modules cal │ │ │ +00000eb0: 6c65 6420 6479 6e61 6d69 6361 6c6c 7920 led dynamically │ │ │ +00000ec0: 6672 6f6d 2074 6865 2077 7261 7070 6564 from the wrapped │ │ │ +00000ed0: 2063 6f64 6529 2e0a 0a54 6865 2066 756e code)...The fun │ │ │ +00000ee0: 6374 696f 6e73 2061 6e64 206d 6163 726f ctions and macro │ │ │ +00000ef0: 7320 6465 6669 6e65 2069 6e20 4752 4f55 s define in GROU │ │ │ +00000f00: 5020 6172 6520 6163 7475 616c 6c79 2064 P are actually d │ │ │ +00000f10: 6566 696e 6564 2075 6e64 6572 0a70 7265 efined under.pre │ │ │ +00000f20: 6669 7865 6420 6e61 6d65 732c 2074 6f20 fixed names, to │ │ │ +00000f30: 6176 6f69 6420 6e61 6d65 7370 6163 6520 avoid namespace │ │ │ +00000f40: 636c 6173 6865 7320 616e 6420 6261 6420 clashes and bad │ │ │ +00000f50: 696e 7465 7261 6374 696f 6e73 2077 6974 interactions wit │ │ │ +00000f60: 680a 6f74 6865 7220 636f 6465 2074 6861 h.other code tha │ │ │ +00000f70: 7420 6361 6c6c 7320 6066 626f 756e 6470 t calls `fboundp │ │ │ +00000f80: 272e 2020 416c 6c20 6361 6c6c 7320 696e '. All calls in │ │ │ +00000f90: 7369 6465 206f 6620 7468 6520 7772 6170 side of the wrap │ │ │ +00000fa0: 7065 6420 636f 6465 0a74 6f20 7468 6520 ped code.to the │ │ │ +00000fb0: 636f 6d70 6174 6962 696c 6974 7920 6675 compatibility fu │ │ │ +00000fc0: 6e63 7469 6f6e 7320 616e 6420 6d61 6372 nctions and macr │ │ │ +00000fd0: 6f73 2069 6e20 4752 4f55 5020 6172 6520 os in GROUP are │ │ │ +00000fe0: 6c65 7869 6361 6c6c 790a 6d61 7070 6564 lexically.mapped │ │ │ +00000ff0: 2074 6f20 7468 6520 7072 6566 6978 6564 to the prefixed │ │ │ +00001000: 206e 616d 6573 2e20 2053 696e 6365 2074 names. Since t │ │ │ +00001010: 6869 7320 6973 2061 206c 6578 6963 616c his is a lexical │ │ │ +00001020: 206d 6170 7069 6e67 2c20 636f 6465 0a69 mapping, code.i │ │ │ +00001030: 6e20 6f74 6865 7220 6d6f 6475 6c65 7320 n other modules │ │ │ +00001040: 7468 6174 2069 7320 6361 6c6c 6564 2062 that is called b │ │ │ +00001050: 7920 6675 6e63 7469 6f6e 7320 696e 2074 y functions in t │ │ │ +00001060: 6869 7320 6d6f 6475 6c65 2077 696c 6c20 his module will │ │ │ +00001070: 6e6f 740a 6265 2061 6666 6563 7465 642e not.be affected. │ │ │ +00001080: 1f0a 2864 6566 616c 6961 7320 2763 6f6d ..(defalias 'com │ │ │ +00001090: 7061 7420 2728 6d61 6372 6f20 2e20 235b pat '(macro . #[ │ │ │ +000010a0: 2867 726f 7570 2026 7265 7374 2062 6f64 (group &rest bod │ │ │ +000010b0: 7929 2022 c35c 6e21 c419 1ac5 c6c7 5c6e y) ".\n!......\n │ │ │ +000010c0: 215c 2288 c8c9 cacb 5c6e 44cc 4242 4443 !\".....\nD.BBDC │ │ │ +000010d0: cdce 0942 0842 4245 2a87 2220 5b62 6f64 ...B.BBE*." [bod │ │ │ +000010e0: 7920 6465 6673 2067 726f 7570 2065 7661 y defs group eva │ │ │ +000010f0: 6c20 6e69 6c20 6d61 7068 6173 6820 235b l nil maphash #[ │ │ │ +00001100: 2866 756e 2061 7267 7329 2022 0b5c 6ec4 (fun args) ".\n. │ │ │ +00001110: c5c6 c708 21c8 c70b 2151 2144 445c 6ea4 ....!...!Q!DD\n. │ │ │ +00001120: 4509 4289 1187 2220 5b67 726f 7570 2064 E.B..." [group d │ │ │ +00001130: 6566 7320 6172 6773 2066 756e 206c 6973 efs args fun lis │ │ │ +00001140: 7420 7175 6f74 6520 696e 7465 726e 2073 t quote intern s │ │ │ +00001150: 796d 626f 6c2d 6e61 6d65 2022 2d22 5d20 ymbol-name "-"] │ │ │ +00001160: 395d 2063 6f6d 7061 742d 6861 7368 2d74 9] compat-hash-t │ │ │ +00001170: 6162 6c65 206c 6574 2063 6f6d 7061 742d able let compat- │ │ │ +00001180: 6163 7469 7665 2d67 726f 7570 7320 636f active-groups co │ │ │ +00001190: 6e73 2071 756f 7465 2028 636f 6d70 6174 ns quote (compat │ │ │ +000011a0: 2d61 6374 6976 652d 6772 6f75 7073 2920 -active-groups) │ │ │ +000011b0: 6d61 6372 6f6c 6574 2028 6662 6f75 6e64 macrolet (fbound │ │ │ +000011c0: 7020 2866 756e 2920 286c 6973 7420 2763 p (fun) (list 'c │ │ │ +000011d0: 6f6d 7061 742d 6662 6f75 6e64 7020 286c ompat-fboundp (l │ │ │ +000011e0: 6973 7420 2771 756f 7465 2063 6f6d 7061 ist 'quote compa │ │ │ +000011f0: 742d 6163 7469 7665 2d67 726f 7570 7329 t-active-groups) │ │ │ +00001200: 2066 756e 2929 5d20 3520 2823 2420 2e20 fun))] 5 (#$ . │ │ │ +00001210: 3239 3933 295d 2929 0a 2993)])). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/config.elc │ │ │ @@ -1,96 +1,96 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3032 2032 eb 25 01:54:02 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6f6e 6669 672e 656c 0a3b 3b3b 2065 6d61 onfig.el.;;; ema │ │ │ -000000a0: 6373 2076 6572 7369 6f6e 2032 312e 3420 cs version 21.4 │ │ │ -000000b0: 2870 6174 6368 2032 3429 2022 5374 616e (patch 24) "Stan │ │ │ -000000c0: 6461 7264 2043 2220 5845 6d61 6373 204c dard C" XEmacs L │ │ │ -000000d0: 7563 6964 2e0a 3b3b 3b20 6279 7465 636f ucid..;;; byteco │ │ │ -000000e0: 6d70 2076 6572 7369 6f6e 2032 2e32 3720 mp version 2.27 │ │ │ -000000f0: 5845 6d61 6373 3b20 3230 3030 2d30 392d XEmacs; 2000-09- │ │ │ -00000100: 3132 2e0a 3b3b 3b20 6f70 7469 6d69 7a61 12..;;; optimiza │ │ │ -00000110: 7469 6f6e 2069 7320 6f6e 2e0a 3b3b 3b20 tion is on..;;; │ │ │ -00000120: 7468 6973 2066 696c 6520 7573 6573 206f this file uses o │ │ │ -00000130: 7063 6f64 6573 2077 6869 6368 2064 6f20 pcodes which do │ │ │ -00000140: 6e6f 7420 6578 6973 7420 696e 2045 6d61 not exist in Ema │ │ │ -00000150: 6373 2031 392e 0a0a 2869 6620 2861 6e64 cs 19...(if (and │ │ │ -00000160: 2028 626f 756e 6470 2027 656d 6163 732d (boundp 'emacs- │ │ │ -00000170: 7665 7273 696f 6e29 0a09 2028 6f72 2028 version).. (or ( │ │ │ -00000180: 616e 6420 2862 6f75 6e64 7020 2765 706f and (boundp 'epo │ │ │ -00000190: 6368 3a3a 7665 7273 696f 6e29 2065 706f ch::version) epo │ │ │ -000001a0: 6368 3a3a 7665 7273 696f 6e29 0a09 2020 ch::version).. │ │ │ -000001b0: 2020 2028 7374 7269 6e67 2d6c 6573 7370 (string-lessp │ │ │ -000001c0: 2065 6d61 6373 2d76 6572 7369 6f6e 2022 emacs-version " │ │ │ -000001d0: 3230 2229 2929 0a20 2020 2028 6572 726f 20"))). (erro │ │ │ -000001e0: 7220 2260 636f 6e66 6967 2e65 6c27 2077 r "`config.el' w │ │ │ -000001f0: 6173 2063 6f6d 7069 6c65 6420 666f 7220 as compiled for │ │ │ -00000200: 456d 6163 7320 3230 2229 290a 0a28 6f72 Emacs 20"))..(or │ │ │ -00000210: 2028 626f 756e 6470 2027 6375 7272 656e (boundp 'curren │ │ │ -00000220: 742d 6c6f 6164 2d6c 6973 7429 2028 7365 t-load-list) (se │ │ │ -00000230: 7471 2063 7572 7265 6e74 2d6c 6f61 642d tq current-load- │ │ │ -00000240: 6c69 7374 206e 696c 2929 0a0a 0a23 4036 list nil))...#@6 │ │ │ -00000250: 3020 4669 6c65 2063 6f6e 7461 696e 696e 0 File containin │ │ │ -00000260: 6720 636f 6e66 6967 7572 6174 696f 6e20 g configuration │ │ │ -00000270: 7061 7261 6d65 7465 7273 2061 6e64 2074 parameters and t │ │ │ -00000280: 6865 6972 2076 616c 7565 732e 1f0a 2864 heir values...(d │ │ │ -00000290: 6566 7661 7220 636f 6e66 6967 2d76 616c efvar config-val │ │ │ -000002a0: 7565 2d66 696c 6520 2865 7870 616e 642d ue-file (expand- │ │ │ -000002b0: 6669 6c65 2d6e 616d 6520 2263 6f6e 6669 file-name "confi │ │ │ -000002c0: 672e 7661 6c75 6573 2220 646f 632d 6469 g.values" doc-di │ │ │ -000002d0: 7265 6374 6f72 7929 2028 2324 202e 2035 rectory) (#$ . 5 │ │ │ -000002e0: 3934 2929 0a23 4036 3420 4861 7368 2074 94)).#@64 Hash t │ │ │ -000002f0: 6162 6c65 2074 6f20 7374 6f72 6520 636f able to store co │ │ │ -00000300: 6e66 6967 7572 6174 696f 6e20 7061 7261 nfiguration para │ │ │ -00000310: 6d65 7465 7273 2061 6e64 2074 6865 6972 meters and their │ │ │ -00000320: 2076 616c 7565 732e 1f0a 2864 6566 7661 values...(defva │ │ │ -00000330: 7220 636f 6e66 6967 2d76 616c 7565 2d68 r config-value-h │ │ │ -00000340: 6173 682d 7461 626c 6520 6e69 6c20 2823 ash-table nil (# │ │ │ -00000350: 2420 2e20 3734 3629 290a 2340 3635 2052 $ . 746)).#@65 R │ │ │ -00000360: 6574 7572 6e20 6861 7368 2074 6162 6c65 eturn hash table │ │ │ -00000370: 206f 6620 636f 6e66 6967 7572 6174 696f of configuratio │ │ │ -00000380: 6e20 7061 7261 6d65 7465 7273 2061 6e64 n parameters and │ │ │ -00000390: 2074 6865 6972 2076 616c 7565 732e 1f0a their values... │ │ │ -000003a0: 2864 6566 616c 6961 7320 2763 6f6e 6669 (defalias 'confi │ │ │ -000003b0: 672d 7661 6c75 652d 6861 7368 2d74 6162 g-value-hash-tab │ │ │ -000003c0: 6c65 2023 5b6e 696c 2022 5c6e aca2 c3c4 le #[nil "\n.... │ │ │ -000003d0: c55c 2212 8ac6 c721 8919 7188 c820 88c9 .\"....!..q.. .. │ │ │ -000003e0: 0821 8865 6288 cacb cc8f 8829 cdc7 2188 .!.eb......)..!. │ │ │ -000003f0: 295c 6e87 2220 5b63 6f6e 6669 672d 7661 )\n." [config-va │ │ │ -00000400: 6c75 652d 6669 6c65 2062 7566 2063 6f6e lue-file buf con │ │ │ -00000410: 6669 672d 7661 6c75 652d 6861 7368 2d74 fig-value-hash-t │ │ │ -00000420: 6162 6c65 206d 616b 652d 6861 7368 2d74 able make-hash-t │ │ │ -00000430: 6162 6c65 203a 7369 7a65 2033 3030 2067 able :size 300 g │ │ │ -00000440: 6574 2d62 7566 6665 722d 6372 6561 7465 et-buffer-create │ │ │ -00000450: 2022 202a 436f 6e66 6967 2a22 2065 7261 " *Config*" era │ │ │ -00000460: 7365 2d62 7566 6665 7220 696e 7365 7274 se-buffer insert │ │ │ -00000470: 2d66 696c 652d 636f 6e74 656e 7473 206e -file-contents n │ │ │ -00000480: 696c 2028 6279 7465 2d63 6f64 6520 22c5 il (byte-code ". │ │ │ -00000490: 0821 1cc5 0821 1bc6 0c09 5c22 891a ac88 .!...!....\".... │ │ │ -000004a0: c70c 0b09 2388 aa93 5c6e 3aac 8ac7 0c5c ....#...\n:....\ │ │ │ -000004b0: 6e0b 4409 2388 aa85 5c6e 0b43 a488 2baa n.D.#...\n.C..+. │ │ │ -000004c0: 5222 205b 6275 6620 636f 6e66 6967 2d76 R" [buf config-v │ │ │ -000004d0: 616c 7565 2d68 6173 682d 7461 626c 6520 alue-hash-table │ │ │ -000004e0: 7072 6576 2076 616c 7565 206b 6579 2072 prev value key r │ │ │ -000004f0: 6561 6420 6765 7468 6173 6820 7075 7468 ead gethash puth │ │ │ -00000500: 6173 685d 2035 2920 2828 656e 642d 6f66 ash] 5) ((end-of │ │ │ -00000510: 2d66 696c 6529 2920 6b69 6c6c 2d62 7566 -file)) kill-buf │ │ │ -00000520: 6665 725d 2034 2028 2324 202e 2038 3633 fer] 4 (#$ . 863 │ │ │ -00000530: 295d 290a 2340 3634 2052 6574 7572 6e20 )]).#@64 Return │ │ │ -00000540: 7468 6520 7661 6c75 6520 6f66 2074 6865 the value of the │ │ │ -00000550: 2063 6f6e 6669 6775 7261 7469 6f6e 2070 configuration p │ │ │ -00000560: 6172 616d 6574 6572 2043 4f4e 4649 475f arameter CONFIG_ │ │ │ -00000570: 5359 4d42 4f4c 2e1f 0a28 6465 6661 6c69 SYMBOL...(defali │ │ │ -00000580: 6173 2027 636f 6e66 6967 2d76 616c 7565 as 'config-value │ │ │ -00000590: 2023 5b28 636f 6e66 6967 2d73 796d 626f #[(config-symbo │ │ │ -000005a0: 6c29 2022 c108 c220 5c22 8722 205b 636f l) "... \"." [co │ │ │ -000005b0: 6e66 6967 2d73 796d 626f 6c20 6765 7468 nfig-symbol geth │ │ │ -000005c0: 6173 6820 636f 6e66 6967 2d76 616c 7565 ash config-value │ │ │ -000005d0: 2d68 6173 682d 7461 626c 655d 2033 2028 -hash-table] 3 ( │ │ │ -000005e0: 2324 202e 2031 3333 3729 5d29 0a28 7072 #$ . 1337)]).(pr │ │ │ -000005f0: 6f76 6964 6520 2763 6f6e 6669 6729 0a ovide 'config). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3531 2032 3032 310a 3b3b 3b20 :08:51 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6f6e 6669 672e 656c 4/lisp/config.el │ │ │ +00000090: 0a3b 3b3b 2065 6d61 6373 2076 6572 7369 .;;; emacs versi │ │ │ +000000a0: 6f6e 2032 312e 3420 2870 6174 6368 2032 on 21.4 (patch 2 │ │ │ +000000b0: 3429 2022 5374 616e 6461 7264 2043 2220 4) "Standard C" │ │ │ +000000c0: 5845 6d61 6373 204c 7563 6964 2e0a 3b3b XEmacs Lucid..;; │ │ │ +000000d0: 3b20 6279 7465 636f 6d70 2076 6572 7369 ; bytecomp versi │ │ │ +000000e0: 6f6e 2032 2e32 3720 5845 6d61 6373 3b20 on 2.27 XEmacs; │ │ │ +000000f0: 3230 3030 2d30 392d 3132 2e0a 3b3b 3b20 2000-09-12..;;; │ │ │ +00000100: 6f70 7469 6d69 7a61 7469 6f6e 2069 7320 optimization is │ │ │ +00000110: 6f6e 2e0a 3b3b 3b20 7468 6973 2066 696c on..;;; this fil │ │ │ +00000120: 6520 7573 6573 206f 7063 6f64 6573 2077 e uses opcodes w │ │ │ +00000130: 6869 6368 2064 6f20 6e6f 7420 6578 6973 hich do not exis │ │ │ +00000140: 7420 696e 2045 6d61 6373 2031 392e 0a0a t in Emacs 19... │ │ │ +00000150: 2869 6620 2861 6e64 2028 626f 756e 6470 (if (and (boundp │ │ │ +00000160: 2027 656d 6163 732d 7665 7273 696f 6e29 'emacs-version) │ │ │ +00000170: 0a09 2028 6f72 2028 616e 6420 2862 6f75 .. (or (and (bou │ │ │ +00000180: 6e64 7020 2765 706f 6368 3a3a 7665 7273 ndp 'epoch::vers │ │ │ +00000190: 696f 6e29 2065 706f 6368 3a3a 7665 7273 ion) epoch::vers │ │ │ +000001a0: 696f 6e29 0a09 2020 2020 2028 7374 7269 ion).. (stri │ │ │ +000001b0: 6e67 2d6c 6573 7370 2065 6d61 6373 2d76 ng-lessp emacs-v │ │ │ +000001c0: 6572 7369 6f6e 2022 3230 2229 2929 0a20 ersion "20"))). │ │ │ +000001d0: 2020 2028 6572 726f 7220 2260 636f 6e66 (error "`conf │ │ │ +000001e0: 6967 2e65 6c27 2077 6173 2063 6f6d 7069 ig.el' was compi │ │ │ +000001f0: 6c65 6420 666f 7220 456d 6163 7320 3230 led for Emacs 20 │ │ │ +00000200: 2229 290a 0a28 6f72 2028 626f 756e 6470 "))..(or (boundp │ │ │ +00000210: 2027 6375 7272 656e 742d 6c6f 6164 2d6c 'current-load-l │ │ │ +00000220: 6973 7429 2028 7365 7471 2063 7572 7265 ist) (setq curre │ │ │ +00000230: 6e74 2d6c 6f61 642d 6c69 7374 206e 696c nt-load-list nil │ │ │ +00000240: 2929 0a0a 0a23 4036 3020 4669 6c65 2063 ))...#@60 File c │ │ │ +00000250: 6f6e 7461 696e 696e 6720 636f 6e66 6967 ontaining config │ │ │ +00000260: 7572 6174 696f 6e20 7061 7261 6d65 7465 uration paramete │ │ │ +00000270: 7273 2061 6e64 2074 6865 6972 2076 616c rs and their val │ │ │ +00000280: 7565 732e 1f0a 2864 6566 7661 7220 636f ues...(defvar co │ │ │ +00000290: 6e66 6967 2d76 616c 7565 2d66 696c 6520 nfig-value-file │ │ │ +000002a0: 2865 7870 616e 642d 6669 6c65 2d6e 616d (expand-file-nam │ │ │ +000002b0: 6520 2263 6f6e 6669 672e 7661 6c75 6573 e "config.values │ │ │ +000002c0: 2220 646f 632d 6469 7265 6374 6f72 7929 " doc-directory) │ │ │ +000002d0: 2028 2324 202e 2035 3836 2929 0a23 4036 (#$ . 586)).#@6 │ │ │ +000002e0: 3420 4861 7368 2074 6162 6c65 2074 6f20 4 Hash table to │ │ │ +000002f0: 7374 6f72 6520 636f 6e66 6967 7572 6174 store configurat │ │ │ +00000300: 696f 6e20 7061 7261 6d65 7465 7273 2061 ion parameters a │ │ │ +00000310: 6e64 2074 6865 6972 2076 616c 7565 732e nd their values. │ │ │ +00000320: 1f0a 2864 6566 7661 7220 636f 6e66 6967 ..(defvar config │ │ │ +00000330: 2d76 616c 7565 2d68 6173 682d 7461 626c -value-hash-tabl │ │ │ +00000340: 6520 6e69 6c20 2823 2420 2e20 3733 3829 e nil (#$ . 738) │ │ │ +00000350: 290a 2340 3635 2052 6574 7572 6e20 6861 ).#@65 Return ha │ │ │ +00000360: 7368 2074 6162 6c65 206f 6620 636f 6e66 sh table of conf │ │ │ +00000370: 6967 7572 6174 696f 6e20 7061 7261 6d65 iguration parame │ │ │ +00000380: 7465 7273 2061 6e64 2074 6865 6972 2076 ters and their v │ │ │ +00000390: 616c 7565 732e 1f0a 2864 6566 616c 6961 alues...(defalia │ │ │ +000003a0: 7320 2763 6f6e 6669 672d 7661 6c75 652d s 'config-value- │ │ │ +000003b0: 6861 7368 2d74 6162 6c65 2023 5b6e 696c hash-table #[nil │ │ │ +000003c0: 2022 5c6e aca2 c3c4 c55c 2212 8ac6 c721 "\n.....\"....! │ │ │ +000003d0: 8919 7188 c820 88c9 0821 8865 6288 cacb ..q.. ...!.eb... │ │ │ +000003e0: cc8f 8829 cdc7 2188 295c 6e87 2220 5b63 ...)..!.)\n." [c │ │ │ +000003f0: 6f6e 6669 672d 7661 6c75 652d 6669 6c65 onfig-value-file │ │ │ +00000400: 2062 7566 2063 6f6e 6669 672d 7661 6c75 buf config-valu │ │ │ +00000410: 652d 6861 7368 2d74 6162 6c65 206d 616b e-hash-table mak │ │ │ +00000420: 652d 6861 7368 2d74 6162 6c65 203a 7369 e-hash-table :si │ │ │ +00000430: 7a65 2033 3030 2067 6574 2d62 7566 6665 ze 300 get-buffe │ │ │ +00000440: 722d 6372 6561 7465 2022 202a 436f 6e66 r-create " *Conf │ │ │ +00000450: 6967 2a22 2065 7261 7365 2d62 7566 6665 ig*" erase-buffe │ │ │ +00000460: 7220 696e 7365 7274 2d66 696c 652d 636f r insert-file-co │ │ │ +00000470: 6e74 656e 7473 206e 696c 2028 6279 7465 ntents nil (byte │ │ │ +00000480: 2d63 6f64 6520 22c5 0821 1cc5 0821 1bc6 -code "..!...!.. │ │ │ +00000490: 0c09 5c22 891a ac88 c70c 0b09 2388 aa93 ..\"........#... │ │ │ +000004a0: 5c6e 3aac 8ac7 0c5c 6e0b 4409 2388 aa85 \n:....\n.D.#... │ │ │ +000004b0: 5c6e 0b43 a488 2baa 5222 205b 6275 6620 \n.C..+.R" [buf │ │ │ +000004c0: 636f 6e66 6967 2d76 616c 7565 2d68 6173 config-value-has │ │ │ +000004d0: 682d 7461 626c 6520 7072 6576 2076 616c h-table prev val │ │ │ +000004e0: 7565 206b 6579 2072 6561 6420 6765 7468 ue key read geth │ │ │ +000004f0: 6173 6820 7075 7468 6173 685d 2035 2920 ash puthash] 5) │ │ │ +00000500: 2828 656e 642d 6f66 2d66 696c 6529 2920 ((end-of-file)) │ │ │ +00000510: 6b69 6c6c 2d62 7566 6665 725d 2034 2028 kill-buffer] 4 ( │ │ │ +00000520: 2324 202e 2038 3535 295d 290a 2340 3634 #$ . 855)]).#@64 │ │ │ +00000530: 2052 6574 7572 6e20 7468 6520 7661 6c75 Return the valu │ │ │ +00000540: 6520 6f66 2074 6865 2063 6f6e 6669 6775 e of the configu │ │ │ +00000550: 7261 7469 6f6e 2070 6172 616d 6574 6572 ration parameter │ │ │ +00000560: 2043 4f4e 4649 475f 5359 4d42 4f4c 2e1f CONFIG_SYMBOL.. │ │ │ +00000570: 0a28 6465 6661 6c69 6173 2027 636f 6e66 .(defalias 'conf │ │ │ +00000580: 6967 2d76 616c 7565 2023 5b28 636f 6e66 ig-value #[(conf │ │ │ +00000590: 6967 2d73 796d 626f 6c29 2022 c108 c220 ig-symbol) "... │ │ │ +000005a0: 5c22 8722 205b 636f 6e66 6967 2d73 796d \"." [config-sym │ │ │ +000005b0: 626f 6c20 6765 7468 6173 6820 636f 6e66 bol gethash conf │ │ │ +000005c0: 6967 2d76 616c 7565 2d68 6173 682d 7461 ig-value-hash-ta │ │ │ +000005d0: 626c 655d 2033 2028 2324 202e 2031 3332 ble] 3 (#$ . 132 │ │ │ +000005e0: 3929 5d29 0a28 7072 6f76 6964 6520 2763 9)]).(provide 'c │ │ │ +000005f0: 6f6e 6669 6729 0a onfig). │ │ ├── ./usr/share/xemacs-21.4.24/lisp/console.elc │ │ │ @@ -1,72 +1,72 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 333a 3436 2032 eb 25 01:53:46 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 6f6e 736f 6c65 2e65 6c0a 3b3b 3b20 656d onsole.el.;;; em │ │ │ -000000a0: 6163 7320 7665 7273 696f 6e20 3231 2e34 acs version 21.4 │ │ │ -000000b0: 2028 7061 7463 6820 3234 2920 2253 7461 (patch 24) "Sta │ │ │ -000000c0: 6e64 6172 6420 4322 2058 456d 6163 7320 ndard C" XEmacs │ │ │ -000000d0: 4c75 6369 642e 0a3b 3b3b 2062 7974 6563 Lucid..;;; bytec │ │ │ -000000e0: 6f6d 7020 7665 7273 696f 6e20 322e 3237 omp version 2.27 │ │ │ -000000f0: 2058 456d 6163 733b 2032 3030 302d 3039 XEmacs; 2000-09 │ │ │ -00000100: 2d31 322e 0a3b 3b3b 206f 7074 696d 697a -12..;;; optimiz │ │ │ -00000110: 6174 696f 6e20 6973 206f 6e2e 0a3b 3b3b ation is on..;;; │ │ │ -00000120: 2074 6869 7320 6669 6c65 2075 7365 7320 this file uses │ │ │ -00000130: 6f70 636f 6465 7320 7768 6963 6820 646f opcodes which do │ │ │ -00000140: 206e 6f74 2065 7869 7374 2069 6e20 456d not exist in Em │ │ │ -00000150: 6163 7320 3139 2e0a 0a28 6966 2028 616e acs 19...(if (an │ │ │ -00000160: 6420 2862 6f75 6e64 7020 2765 6d61 6373 d (boundp 'emacs │ │ │ -00000170: 2d76 6572 7369 6f6e 290a 0920 286f 7220 -version).. (or │ │ │ -00000180: 2861 6e64 2028 626f 756e 6470 2027 6570 (and (boundp 'ep │ │ │ -00000190: 6f63 683a 3a76 6572 7369 6f6e 2920 6570 och::version) ep │ │ │ -000001a0: 6f63 683a 3a76 6572 7369 6f6e 290a 0920 och::version).. │ │ │ -000001b0: 2020 2020 2873 7472 696e 672d 6c65 7373 (string-less │ │ │ -000001c0: 7020 656d 6163 732d 7665 7273 696f 6e20 p emacs-version │ │ │ -000001d0: 2232 3022 2929 290a 2020 2020 2865 7272 "20"))). (err │ │ │ -000001e0: 6f72 2022 6063 6f6e 736f 6c65 2e65 6c27 or "`console.el' │ │ │ -000001f0: 2077 6173 2063 6f6d 7069 6c65 6420 666f was compiled fo │ │ │ -00000200: 7220 456d 6163 7320 3230 2229 290a 0a28 r Emacs 20"))..( │ │ │ -00000210: 6f72 2028 626f 756e 6470 2027 6375 7272 or (boundp 'curr │ │ │ -00000220: 656e 742d 6c6f 6164 2d6c 6973 7429 2028 ent-load-list) ( │ │ │ -00000230: 7365 7471 2063 7572 7265 6e74 2d6c 6f61 setq current-loa │ │ │ -00000240: 642d 6c69 7374 206e 696c 2929 0a0a 0a23 d-list nil))...# │ │ │ -00000250: 4031 3837 2052 6574 7572 6e20 7468 6520 @187 Return the │ │ │ -00000260: 6368 6172 6163 7465 7220 7468 6174 2063 character that c │ │ │ -00000270: 6175 7365 7320 6120 5155 4954 2074 6f20 auses a QUIT to │ │ │ -00000280: 6861 7070 656e 2e0a 5468 6973 2069 7320 happen..This is │ │ │ -00000290: 6e6f 726d 616c 6c79 2043 2d67 2e20 204f normally C-g. O │ │ │ -000002a0: 7074 696f 6e61 6c20 6172 6720 434f 4e53 ptional arg CONS │ │ │ -000002b0: 4f4c 4520 7370 6563 6966 6965 7320 7468 OLE specifies th │ │ │ -000002c0: 6520 636f 6e73 6f6c 650a 7468 6174 2074 e console.that t │ │ │ -000002d0: 6865 2069 6e66 6f72 6d61 7469 6f6e 2069 he information i │ │ │ -000002e0: 7320 7265 7475 726e 6564 2066 6f72 3b20 s returned for; │ │ │ -000002f0: 6e69 6c20 6d65 616e 7320 7468 6520 6375 nil means the cu │ │ │ -00000300: 7272 656e 7420 636f 6e73 6f6c 652e 1f0a rrent console... │ │ │ -00000310: 2864 6566 616c 6961 7320 2771 7569 742d (defalias 'quit- │ │ │ -00000320: 6368 6172 2023 5b28 266f 7074 696f 6e61 char #[(&optiona │ │ │ -00000330: 6c20 636f 6e73 6f6c 6529 2022 c1c2 0821 l console) "...! │ │ │ -00000340: 3887 2220 5b63 6f6e 736f 6c65 2033 2063 8." [console 3 c │ │ │ -00000350: 7572 7265 6e74 2d69 6e70 7574 2d6d 6f64 urrent-input-mod │ │ │ -00000360: 655d 2033 2028 2324 202e 2035 3937 295d e] 3 (#$ . 597)] │ │ │ -00000370: 290a 2340 3536 2052 6573 756d 6520 7468 ).#@56 Resume th │ │ │ -00000380: 6520 636f 6e73 6f6c 6573 2077 6974 6820 e consoles with │ │ │ -00000390: 6120 636f 6e74 726f 6c6c 696e 6720 7072 a controlling pr │ │ │ -000003a0: 6f63 6573 7320 6f66 2050 4944 2e1f 0a28 ocess of PID...( │ │ │ -000003b0: 6465 6661 6c69 6173 2027 7265 7375 6d65 defalias 'resume │ │ │ -000003c0: 2d70 6964 2d63 6f6e 736f 6c65 2023 5b28 -pid-console #[( │ │ │ -000003d0: 7069 6429 2022 c0c1 c220 5c22 88c3 8722 pid) "... \"..." │ │ │ -000003e0: 205b 6d61 7063 2023 5b28 6329 2022 c209 [mapc #[(c) ".. │ │ │ -000003f0: 21c3 61ad 9508 a7ab 8708 c409 216b aa85 !.a.........!k.. │ │ │ -00000400: 08c4 0921 61ad 83c5 0921 8722 205b 7069 ...!a....!." [pi │ │ │ -00000410: 6420 6320 636f 6e73 6f6c 652d 7479 7065 d c console-type │ │ │ -00000420: 2074 7479 2063 6f6e 736f 6c65 2d74 7479 tty console-tty │ │ │ -00000430: 2d63 6f6e 7472 6f6c 6c69 6e67 2d70 726f -controlling-pro │ │ │ -00000440: 6365 7373 2072 6573 756d 652d 636f 6e73 cess resume-cons │ │ │ -00000450: 6f6c 655d 2033 5d20 636f 6e73 6f6c 652d ole] 3] console- │ │ │ -00000460: 6c69 7374 206e 696c 5d20 3320 2823 2420 list nil] 3 (#$ │ │ │ -00000470: 2e20 3838 3729 5d29 0a . 887)]). │ │ │ +00000010: 7069 6c65 6420 6279 2062 7569 6c64 7573 piled by buildus │ │ │ +00000020: 6572 4030 6137 6236 3165 6337 3663 3120 er@0a7b61ec76c1 │ │ │ +00000030: 6f6e 204d 6f6e 204f 6374 2031 3120 3135 on Mon Oct 11 15 │ │ │ +00000040: 3a30 383a 3133 2032 3032 310a 3b3b 3b20 :08:13 2021.;;; │ │ │ +00000050: 6672 6f6d 2066 696c 6520 2f62 7569 6c64 from file /build │ │ │ +00000060: 2f78 656d 6163 7332 312d 7547 4e64 486b /xemacs21-uGNdHk │ │ │ +00000070: 2f78 656d 6163 7332 312d 3231 2e34 2e32 /xemacs21-21.4.2 │ │ │ +00000080: 342f 6c69 7370 2f63 6f6e 736f 6c65 2e65 4/lisp/console.e │ │ │ +00000090: 6c0a 3b3b 3b20 656d 6163 7320 7665 7273 l.;;; emacs vers │ │ │ +000000a0: 696f 6e20 3231 2e34 2028 7061 7463 6820 ion 21.4 (patch │ │ │ +000000b0: 3234 2920 2253 7461 6e64 6172 6420 4322 24) "Standard C" │ │ │ +000000c0: 2058 456d 6163 7320 4c75 6369 642e 0a3b XEmacs Lucid..; │ │ │ +000000d0: 3b3b 2062 7974 6563 6f6d 7020 7665 7273 ;; bytecomp vers │ │ │ +000000e0: 696f 6e20 322e 3237 2058 456d 6163 733b ion 2.27 XEmacs; │ │ │ +000000f0: 2032 3030 302d 3039 2d31 322e 0a3b 3b3b 2000-09-12..;;; │ │ │ +00000100: 206f 7074 696d 697a 6174 696f 6e20 6973 optimization is │ │ │ +00000110: 206f 6e2e 0a3b 3b3b 2074 6869 7320 6669 on..;;; this fi │ │ │ +00000120: 6c65 2075 7365 7320 6f70 636f 6465 7320 le uses opcodes │ │ │ +00000130: 7768 6963 6820 646f 206e 6f74 2065 7869 which do not exi │ │ │ +00000140: 7374 2069 6e20 456d 6163 7320 3139 2e0a st in Emacs 19.. │ │ │ +00000150: 0a28 6966 2028 616e 6420 2862 6f75 6e64 .(if (and (bound │ │ │ +00000160: 7020 2765 6d61 6373 2d76 6572 7369 6f6e p 'emacs-version │ │ │ +00000170: 290a 0920 286f 7220 2861 6e64 2028 626f ).. (or (and (bo │ │ │ +00000180: 756e 6470 2027 6570 6f63 683a 3a76 6572 undp 'epoch::ver │ │ │ +00000190: 7369 6f6e 2920 6570 6f63 683a 3a76 6572 sion) epoch::ver │ │ │ +000001a0: 7369 6f6e 290a 0920 2020 2020 2873 7472 sion).. (str │ │ │ +000001b0: 696e 672d 6c65 7373 7020 656d 6163 732d ing-lessp emacs- │ │ │ +000001c0: 7665 7273 696f 6e20 2232 3022 2929 290a version "20"))). │ │ │ +000001d0: 2020 2020 2865 7272 6f72 2022 6063 6f6e (error "`con │ │ │ +000001e0: 736f 6c65 2e65 6c27 2077 6173 2063 6f6d sole.el' was com │ │ │ +000001f0: 7069 6c65 6420 666f 7220 456d 6163 7320 piled for Emacs │ │ │ +00000200: 3230 2229 290a 0a28 6f72 2028 626f 756e 20"))..(or (boun │ │ │ +00000210: 6470 2027 6375 7272 656e 742d 6c6f 6164 dp 'current-load │ │ │ +00000220: 2d6c 6973 7429 2028 7365 7471 2063 7572 -list) (setq cur │ │ │ +00000230: 7265 6e74 2d6c 6f61 642d 6c69 7374 206e rent-load-list n │ │ │ +00000240: 696c 2929 0a0a 0a23 4031 3837 2052 6574 il))...#@187 Ret │ │ │ +00000250: 7572 6e20 7468 6520 6368 6172 6163 7465 urn the characte │ │ │ +00000260: 7220 7468 6174 2063 6175 7365 7320 6120 r that causes a │ │ │ +00000270: 5155 4954 2074 6f20 6861 7070 656e 2e0a QUIT to happen.. │ │ │ +00000280: 5468 6973 2069 7320 6e6f 726d 616c 6c79 This is normally │ │ │ +00000290: 2043 2d67 2e20 204f 7074 696f 6e61 6c20 C-g. Optional │ │ │ +000002a0: 6172 6720 434f 4e53 4f4c 4520 7370 6563 arg CONSOLE spec │ │ │ +000002b0: 6966 6965 7320 7468 6520 636f 6e73 6f6c ifies the consol │ │ │ +000002c0: 650a 7468 6174 2074 6865 2069 6e66 6f72 e.that the infor │ │ │ +000002d0: 6d61 7469 6f6e 2069 7320 7265 7475 726e mation is return │ │ │ +000002e0: 6564 2066 6f72 3b20 6e69 6c20 6d65 616e ed for; nil mean │ │ │ +000002f0: 7320 7468 6520 6375 7272 656e 7420 636f s the current co │ │ │ +00000300: 6e73 6f6c 652e 1f0a 2864 6566 616c 6961 nsole...(defalia │ │ │ +00000310: 7320 2771 7569 742d 6368 6172 2023 5b28 s 'quit-char #[( │ │ │ +00000320: 266f 7074 696f 6e61 6c20 636f 6e73 6f6c &optional consol │ │ │ +00000330: 6529 2022 c1c2 0821 3887 2220 5b63 6f6e e) "...!8." [con │ │ │ +00000340: 736f 6c65 2033 2063 7572 7265 6e74 2d69 sole 3 current-i │ │ │ +00000350: 6e70 7574 2d6d 6f64 655d 2033 2028 2324 nput-mode] 3 (#$ │ │ │ +00000360: 202e 2035 3839 295d 290a 2340 3536 2052 . 589)]).#@56 R │ │ │ +00000370: 6573 756d 6520 7468 6520 636f 6e73 6f6c esume the consol │ │ │ +00000380: 6573 2077 6974 6820 6120 636f 6e74 726f es with a contro │ │ │ +00000390: 6c6c 696e 6720 7072 6f63 6573 7320 6f66 lling process of │ │ │ +000003a0: 2050 4944 2e1f 0a28 6465 6661 6c69 6173 PID...(defalias │ │ │ +000003b0: 2027 7265 7375 6d65 2d70 6964 2d63 6f6e 'resume-pid-con │ │ │ +000003c0: 736f 6c65 2023 5b28 7069 6429 2022 c0c1 sole #[(pid) ".. │ │ │ +000003d0: c220 5c22 88c3 8722 205b 6d61 7063 2023 . \"..." [mapc # │ │ │ +000003e0: 5b28 6329 2022 c209 21c3 61ad 9508 a7ab [(c) "..!.a..... │ │ │ +000003f0: 8708 c409 216b aa85 08c4 0921 61ad 83c5 ....!k.....!a... │ │ │ +00000400: 0921 8722 205b 7069 6420 6320 636f 6e73 .!." [pid c cons │ │ │ +00000410: 6f6c 652d 7479 7065 2074 7479 2063 6f6e ole-type tty con │ │ │ +00000420: 736f 6c65 2d74 7479 2d63 6f6e 7472 6f6c sole-tty-control │ │ │ +00000430: 6c69 6e67 2d70 726f 6365 7373 2072 6573 ling-process res │ │ │ +00000440: 756d 652d 636f 6e73 6f6c 655d 2033 5d20 ume-console] 3] │ │ │ +00000450: 636f 6e73 6f6c 652d 6c69 7374 206e 696c console-list nil │ │ │ +00000460: 5d20 3320 2823 2420 2e20 3837 3929 5d29 ] 3 (#$ . 879)]) │ │ │ +00000470: 0a . │ │ ├── ./usr/share/xemacs-21.4.24/lisp/cus-dep.elc │ │ │ @@ -1,209 +1,208 @@ │ │ │ 00000000: 3b45 4c43 1400 0000 0a3b 3b3b 2063 6f6d ;ELC.....;;; com │ │ │ -00000010: 7069 6c65 6420 6279 2062 7569 6c64 6440 piled by buildd@ │ │ │ -00000020: 7838 362d 6772 6e65 742d 3032 2e64 6562 x86-grnet-02.deb │ │ │ -00000030: 6961 6e2e 6f72 6720 6f6e 2054 7565 2046 ian.org on Tue F │ │ │ -00000040: 6562 2032 3520 3031 3a35 343a 3032 2032 eb 25 01:54:02 2 │ │ │ -00000050: 3032 300a 3b3b 3b20 6672 6f6d 2066 696c 020.;;; from fil │ │ │ -00000060: 6520 2f62 7569 6c64 2f78 656d 6163 7332 e /build/xemacs2 │ │ │ -00000070: 312d 7547 4e64 486b 2f78 656d 6163 7332 1-uGNdHk/xemacs2 │ │ │ -00000080: 312d 3231 2e34 2e32 342f 6c69 7370 2f63 1-21.4.24/lisp/c │ │ │ -00000090: 7573 2d64 6570 2e65 6c0a 3b3b 3b20 656d us-dep.el.;;; em │ │ │ -000000a0: 6163 7320 7665 7273 696f 6e20 3231 2e34 acs version 21.4 │ │ │ -000000b0: 2028 7061 7463 6820 3234 2920 2253 7461 (patch 24) "Sta │ │ │ -000000c0: 6e64 6172 6420 4322 2058 456d 6163 7320 ndard C" XEmacs │ │ │ -000000d0: 4c75 6369 642e 0a3b 3b3b 2062 7974 6563 Lucid..;;; bytec │ │ │ -000000e0: 6f6d 7020 7665 7273 696f 6e20 322e 3237 omp version 2.27 │ │ │ -000000f0: 2058 456d 6163 733b 2032 3030 302d 3039 XEmacs; 2000-09 │ │ │ -00000100: 2d31 322e 0a3b 3b3b 206f 7074 696d 697a -12..;;; optimiz │ │ │ -00000110: 6174 696f 6e20 6973 206f 6e2e 0a3b 3b3b ation is on..;;; │ │ │ -00000120: 2074 6869 7320 6669 6c65 2075 7365 7320 this file uses │ │ │ -00000130: 6f70 636f 6465 7320 7768 6963 6820 646f opcodes which do │ │ │ -00000140: 206e 6f74 2065 7869 7374 2069 6e20 456d not exist in Em │ │ │ -00000150: 6163 7320 3139 2e0a 0a28 6966 2028 616e acs 19...(if (an │ │ │ -00000160: 6420 2862 6f75 6e64 7020 2765 6d61 6373 d (boundp 'emacs │ │ │ -00000170: 2d76 6572 7369 6f6e 290a 0920 286f 7220 -version).. (or │ │ │ -00000180: 2861 6e64 2028 626f 756e 6470 2027 6570 (and (boundp 'ep │ │ │ -00000190: 6f63 683a 3a76 6572 7369 6f6e 2920 6570 och::version) ep │ │ │ -000001a0: 6f63 683a 3a76 6572 7369 6f6e 290a 0920 och::version).. │ │ │ -000001b0: 2020 2020 2873 7472 696e 672d 6c65 7373 (string-less │ │ │ -000001c0: 7020 656d 6163 732d 7665 7273 696f 6e20 p emacs-version │ │ │ -000001d0: 2232 3022 2929 290a 2020 2020 2865 7272 "20"))). (err │ │ │ -000001e0: 6f72 2022 6063 7573 2d64 6570 2e65 6c27 or "`cus-dep.el' │ │ │ -000001f0: 2077 6173 2063 6f6d 7069 6c65 6420 666f was compiled fo │ │ │ -00000200: 7220 456d 6163 7320 3230 2229 290a 0a28 r Emacs 20"))..( │ │ │ -00000210: 6f72 2028 626f 756e 6470 2027 6375 7272 or (boundp 'curr │ │ │ -00000220: 656e 742d 6c6f 6164 2d6c 6973 7429 2028 ent-load-list) ( │ │ │ -00000230: 7365 7471 2063 7572 7265 6e74 2d6c 6f61 setq current-loa │ │ │ -00000240: 642d 6c69 7374 206e 696c 2929 0a0a 0a28 d-list nil))...( │ │ │ -00000250: 6279 7465 2d63 6f64 6520 22c2 c321 88c2 byte-code "..!.. │ │ │ -00000260: c421 88c2 c521 88c0 0942 11c6 10c2 8722 .!...!...B....." │ │ │ -00000270: 205b 6375 736c 6f61 642d 6261 7365 2d66 [cusload-base-f │ │ │ -00000280: 696c 6520 6375 7272 656e 742d 6c6f 6164 ile current-load │ │ │ -00000290: 2d6c 6973 7420 7265 7175 6972 6520 636c -list require cl │ │ │ -000002a0: 2077 6964 6765 7420 6375 732d 6661 6365 widget cus-face │ │ │ -000002b0: 2022 6375 7374 6f6d 2d6c 6f61 642e 656c "custom-load.el │ │ │ -000002c0: 225d 2032 290a 2864 6566 616c 6961 7320 "] 2).(defalias │ │ │ -000002d0: 2743 7573 746f 6d2d 6d61 6b65 2d64 6570 'Custom-make-dep │ │ │ -000002e0: 656e 6465 6e63 6965 732d 3120 235b 2873 endencies-1 #[(s │ │ │ -000002f0: 7562 6469 7273 2920 22c6 c70e 365c 2216 ubdirs) "...6\". │ │ │ -00000300: 36c8 c9ca 2121 1e39 cb8e 720e 3971 88cc 6...!!.9..r.9q.. │ │ │ -00000310: cdce cf5c 221a 1e3e 0e36 cc1c 8919 8300 ...\"..>.6...... │ │ │ -00000320: 0109 4014 d0d1 d20c 5c22 2188 c70e 370c ..@.....\"!...7. │ │ │ -00000330: 5c22 d30c d4d5 231e 3a1d d60d 21ab 8cd7 \"....#.:...!... │ │ │ -00000340: d88d ab87 d0d9 2188 82f8 000e 3acc 1b89 ......!.....:... │ │ │ -00000350: 18ab c108 4013 d60b 21ab b3da 2088 db0b ....@...!... ... │ │ │ -00000360: 2188 6562 88dc dd0b 2121 1e3b dedf ccd4 !.eb....!!.;.... │ │ │ -00000370: 23ab 9ae0 7988 e170 211e 3ccc e2e3 8f88 #...y..p!.<..... │ │ │ -00000380: e40e 3c41 400e 3b5c 6e23 8829 aa5f 2908 .. │ │ │ +00000310: 0e36 cc1c 8919 8300 0109 4014 d0d1 d20c .6........@..... │ │ │ +00000320: 5c22 2188 c70e 370c 5c22 d30c d4d5 231e \"!...7.\"....#. │ │ │ +00000330: 3a1d d60d 21ab 8cd7 d88d ab87 d0d9 2188 :...!.........!. │ │ │ +00000340: 82f8 000e 3acc 1b89 18ab c108 4013 d60b ....:.......@... │ │ │ +00000350: 21ab b3da 2088 db0b 2188 6562 88dc dd0b !... ...!.eb.... │ │ │ +00000360: 2121 1e3b dedf ccd4 23ab 9ae0 7988 e170 !!.;....#...y..p │ │ │ +00000370: 211e 3ccc e2e3 8f88 e40e 3c41 400e 3b5c !.<.......