Mercurial > hg > xemacs-beta
view lisp/dumped-lisp.el @ 814:a634e3b7acc8
[xemacs-hg @ 2002-04-14 12:41:59 by ben]
latest changes
TODO.ben-mule-21-5: Update.
make-docfile.c: Add basic support for handling ISO 2022 doc strings -- we parse
the basic charset designation sequences so we know whether we're
in ASCII and have to pay attention to end quotes and such.
Reformat code according to coding standards.
abbrev.el: Add `global-abbrev-mode', which turns on or off abbrev-mode in all
buffers. Added `defining-abbrev-turns-on-abbrev-mode' -- if
non-nil, defining an abbrev through an interactive function will
automatically turn on abbrev-mode, either globally or locally
depending on the command. This is the "what you'd expect"
behavior.
indent.el: general function for indenting a balanced expression in a
mode-correct way. Works similar to indent-region in that a mode
can specify a specific command to do the whole operation; if not,
figure out the region using forward-sexp and indent each line
using indent-according-to-mode.
keydefs.el: Removed.
Modify M-C-backslash to do indent-region-or-balanced-expression.
Make S-Tab just insert a TAB char, like it's meant to do.
make-docfile.el: Now that we're using the call-process-in-lisp, we need to load
an extra file win32-native.el because we're running a bare temacs.
menubar-items.el: Totally redo the Cmds menu so that most used commands appear
directly on the menu and less used commands appear in submenus.
The old way may have been very pretty, but rather impractical.
process.el: Under Windows, don't ever use old-call-process-internal, even
in batch mode. We can do processes in batch mode.
subr.el: Someone recoded truncate-string-to-width, saying "the FSF version
is too complicated and does lots of hard-to-understand stuff" but
the resulting recoded version was *totally* wrong! it
misunderstood the basic point of this function, which is work in
*columns* not chars. i dumped ours and copied the version from
FSF 21.1. Also added truncate-string-with-continuation-dots,
since this idiom is used often.
config.inc.samp, xemacs.mak: Separate out debug and optimize flags.
Remove all vestiges of USE_MINIMAL_TAGBITS,
USE_INDEXED_LRECORD_IMPLEMENTATION, and GUNG_HO, since those
ifdefs have long been removed.
Make error-checking support actually work.
Some rearrangement of config.inc.samp to make it more logical.
Remove callproc.c and ntproc.c from xemacs.mak, no longer used.
Make pdump the default.
lisp.h: Add support for strong type-checking of Bytecount, Bytebpos,
Charcount, Charbpos, and others, by making them classes,
overloading the operators to provide integer-like operation and
carefully controlling what operations are allowed. Not currently
enabled in C++ builds because there are still a number of compile
errors, and it won't really work till we merge in my "8-bit-Mule"
workspace, in which I make use of the new types Charxpos,
Bytexpos, Memxpos, representing a "position" either in a buffer or
a string. (This is especially important in the extent code.)
abbrev.c, alloc.c, eval.c, buffer.c, buffer.h, editfns.c, fns.c, text.h: Warning fixes, some of them related to new C++ strict type
checking of Bytecount, Charbpos, etc.
dired.c: Caught an actual error due to strong type checking -- char len
being passed when should be byte len.
alloc.c, backtrace.h, bytecode.c, bytecode.h, eval.c, sysdep.c: Further optimize Ffuncall:
-- process arg list at compiled-function creation time, converting
into an array for extra-quick access at funcall time.
-- rewrite funcall_compiled_function to use it, and inline this
function.
-- change the order of check for magic stuff in
SPECBIND_FAST_UNSAFE to be faster.
-- move the check for need to garbage collect into the allocation
code, so only a single flag needs to be checked in funcall.
buffer.c, symbols.c: add debug funs to check on mule optimization info in buffers and
strings.
eval.c, emacs.c, text.c, regex.c, scrollbar-msw.c, search.c: Fix evil crashes due to eistrings not properly reinitialized under
pdump. Redo a bit some of the init routines; convert some
complex_vars_of() into simple vars_of(), because they didn't need
complex processing.
callproc.c, emacs.c, event-stream.c, nt.c, process.c, process.h, sysdep.c, sysdep.h, syssignal.h, syswindows.h, ntproc.c: Delete. Hallelujah, praise the Lord, there is no god
but Allah!!!
fix so that processes can be invoked in bare temacs -- thereby
eliminating any need for callproc.c. (currently only eliminated
under NT.) remove all crufty and unnecessary old process code in
ntproc.c and elsewhere. move non-callproc-specific stuff (mostly
environment) into process.c, so callproc.c can be left out under
NT.
console-tty.c, doc.c, file-coding.c, file-coding.h, lstream.c, lstream.h: fix doc string handling so it works with Japanese, etc docs.
change handling of "character mode" so callers don't have to
manually set it (quite error-prone).
event-msw.c: spacing fixes.
lread.c: eliminate unused crufty vintage-19 "FSF defun hack" code.
lrecord.h: improve pdump description docs.
buffer.c, ntheap.c, unexnt.c, win32.c, emacs.c: Mule-ize some unexec and startup code. It was pseudo-Mule-ized
before by simply always calling the ...A versions of functions,
but that won't cut it -- eventually we want to be able to run
properly even if XEmacs has been installed in a Japanese
directory. (The current problem is the timing of the loading of
the Unicode tables; this will eventually be fixed.) Go through and
fix various other places where the code was not Mule-clean.
Provide a function mswindows_get_module_file_name() to get our own
name without resort to PATH_MAX and such. Add a big comment in
main() about the problem with Unicode table load timing that I
just alluded to.
emacs.c: When error-checking is enabled (interpreted as "user is developing
XEmacs"), don't ask user to "pause to read messages" when a fatal
error has occurred, because it will wedge if we are in an inner
modal loop (typically when a menu is popped up) and make us unable
to get a useful stack trace in the debugger.
text.c: Correct update_entirely_ascii_p_flag to actually work.
lisp.h, symsinit.h: declarations for above changes.
| author | ben |
|---|---|
| date | Sun, 14 Apr 2002 12:43:31 +0000 |
| parents | a5954632b187 |
| children | 2b6fa2618f76 |
line wrap: on
line source
(setq preloaded-file-list (assemble-list "backquote" ; needed for defsubst etc. "bytecomp-runtime" ; define defsubst "find-paths" "packages" ; Bootstrap run-time lisp environment "setup-paths" "dump-paths" "subr" ; load the most basic Lisp functions "replace" ; match-string used in version.el. ; Ignore compiled-by-mistake version.elc "version.el" "cl" "cl-extra" "cl-seq" "widget" "custom" ; Before the world so everything can be ; customized "cus-start" ; for customization of builtin variables "cmdloop" "keymap" "syntax" "device" "console" "obsolete" "specifier" "faces" ; must be loaded before any make-face call ;;(pureload "facemenu") #### not yet ported "glyphs" "objects" "extents" "events" "hash-table" "text-props" "process" ;; This is bad. network-streams may not be defined. (when-feature multicast "multicast") ; #+network-streams implicitly true "frame" ; move up here cause some stuff needs it here "map-ynp" "simple" "keydefs" ; Before loaddefs so that keymap vars exist. "abbrev" "derived" "minibuf" "list-mode" "modeline" ; needs simple.el to be loaded first ;; If SparcWorks support is included some additional packages are ;; dumped which would normally have autoloads. To avoid ;; duplicate doc string warnings, SparcWorks uses a separate ;; autoloads file with the dumped packages removed. ;; After fixing, eos/loaddefs-eos and loaddefs appear identical?!! ;; So just make loaddefs-eos go away... ;;(pureload (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs")) "cus-file" "startup" ; For initialization of ; `emacs-user-extension-dir' "misc" ;; (pureload "profile") "help" ;; (pureload "hyper-apropos") Soon... "files" "lib-complete" "format" "indent" "isearch-mode" "buffer" "buff-menu" "undo-stack" "window" "window-xemacs" "paths.el" ; don't get confused if paths compiled. "lisp" "page" "register" "iso8859-1" ; This must be before any modes ; (sets standard syntax table.) "paragraphs" "easymenu" ; Added for 20.3. "lisp-mode" "text-mode" "fill" "auto-save" ; Added for 20.4 "movemail" ; Added for 21.2 (when-feature windows-nt "win32-native") (when-feature lisp-float-type "float-sup") "itimer" ; for vars auto-save-timeout and ; auto-gc-threshold "itimer-autosave" "printer" "behavior" "behavior-defs" "diagnose" ;;;;;;;;;;;;;;;;;; GUI support (when-feature window-system "gui") (when-feature window-system "mouse") (when-feature window-system "mode-motion") (when-feature toolbar "toolbar") (when-feature scrollbar "scrollbar") (when-feature menubar "menubar") (when-feature dialog "dialog") (when-feature gutter "gutter") (when-feature dragdrop-api "dragdrop") "select" ;;;;;;;;;;;;;;;;;; Content for GUI's ;; There used to be window-system inserted in the when-feature, ;; but IMHO your configure script should turn off the menubar, ;; toolbar, etc. features when there is no window system. We ;; should just be able to assume that, if (featurep 'menubar), ;; the menubar should work and if items are added, they can be ;; seen clearly and usefully. (when-feature (and (not infodock) menubar) "menubar-items") (when-feature (and gutter) "gutter-items") (when-feature (and (not infodock) toolbar) "toolbar-items") (when-feature (and (not infodock) dialog) "dialog-items") ;;;;;;;;;;;;;;;;;; Coding-system support "coding" "code-files" ;; Handle process with encoding/decoding coding-system. "code-process" ;; Provide basic commands to set coding systems to user "code-cmds" "unicode" ;;;;;;;;;;;;;;;;;; MULE support (when-feature mule "mule-charset") (when-feature mule "mule-cmds") ; to sync with Emacs 20.1 (when-feature mule "mule-coding") (when-feature mule "mule-composite-stub") (when-feature mule "mule-composite") ;; may initialize coding systems (when-feature (and mule x) "mule-x-init") (when-feature (and mule tty) "mule-tty-init") (when-feature (and mule mswindows) "mule-msw-init") "code-init" ; set up defaults ;; All files after this can have extended characters in them. (when-feature mule "mule-category") (when-feature mule "mule-ccl") (when-feature mule "kinsoku") ;; after this goes the specific lisp routines for a particular input system ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site ;; or user switching of input systems??? ;(if (featurep 'wnn) ; (progn ; (pureload "egg") ; (pureload "egg-wnn") ; (setq egg-default-startup-file "eggrc-wnn"))) ;; (if (and (boundp 'CANNA) CANNA) ;; (pureload "canna") ;; ) ;; Now load files to set up all the different languages/environments that ;; Mule knows about. Formerly we had to worry about files shadowed by ;; those of the same name in leim/quail.el, but no longer, since we now ;; compile with -no-packages. (when-feature mule "arabic") (when-feature mule "chinese") (when-feature mule "cyrillic") (when-feature mule "english") (when-feature mule "ethiopic") (when-feature mule "european") (when-feature mule "greek") (when-feature mule "hebrew") (when-feature mule "indian") (when-feature mule "devanagari") ; must be loaded after indian.el (when-feature mule "japanese") (when-feature mule "korean") (when-feature mule "lao") (when-feature mule "latin") (when-feature mule "misc-lang") ;; #### merge thai and thai-xtis!!! ;(when-feature mule "thai") (when-feature mule "thai-xtis") (when-feature mule "tibetan") (when-feature mule "vietnamese") ;; Specialized language support (when-feature (and mule CANNA) "canna-leim") ;; Egg/Its is now a package ; (when-feature (and mule wnn) "egg-leim") ; (when-feature (and mule wnn) "egg-kwnn-leim") ; (when-feature (and mule wnn) "egg-cwnn-leim") ; (when-feature mule "egg-sj3-leim") ;; SKK is now a package ; (when-feature mule "skk-leim") ;; Enable Mule capability for Gnus, mail, etc... ;; Moved to sunpro-load.el - the default only for Sun. ;;(pureload "mime-setup") ;; needs access to the charsets created by the above ;; language-specific files. (when-feature (and mule mswindows) "mule-msw-init-late") ;;; mule-load.el ends here ;; preload InfoDock stuff. should almost certainly not be here if ;; id-menus is not here. infodock needs to figure out a clever way to ;; advise this stuff or we need to export a clean way for infodock or ;; others to control this programmatically. (when-feature (and infodock (or x mswindows gtk) menubar) "id-menus") ;; preload the X code. (when-feature x "x-faces") (when-feature x "x-iso8859-1") (when-feature x "x-mouse") (when-feature x "x-select") (when-feature (and x scrollbar) "x-scrollbar") (when-feature x "x-misc") (when-feature x "x-init") (when-feature x "x-win-xfree86") (when-feature x "x-win-sun") ;; preload the GTK code (when-feature gtk "gtk-ffi") (when-feature gtk "gtk-widgets") (when-feature gtk "gdk") (when-feature gtk "gtk-init") (when-feature gtk "gtk-faces") (when-feature gtk "gtk-iso8859-1") (when-feature (and gtk dialog) "dialog-gtk") (when-feature gtk "gtk-select") (when-feature gtk "gtk-mouse") (when-feature gtk "gtk-glyphs") (when-feature glade "glade") (when-feature gtk "widgets-gtk") ;; preload the mswindows code. (when-feature mswindows "msw-glyphs") (when-feature mswindows "msw-faces") (when-feature mswindows "msw-mouse") (when-feature mswindows "msw-init") (when-feature mswindows "msw-select") ;; preload the TTY init code. (when-feature tty "tty-init") ;;; Formerly in tooltalk/tooltalk-load.el ;; Moved to tooltalk package ;; (when-feature tooltalk "tooltalk-macros") ;; (when-feature tooltalk "tooltalk-util") ;; (when-feature tooltalk "tooltalk-init") ;; "vc-hooks" ; Packaged. Available in two versions. ;; "ediff-hook" ; Packaged. "fontl-hooks" "auto-show" "resize-minibuffer" (when-feature ldap "ldap") ;; (when-feature energize "energize/energize-load.el") ;;; formerly in sunpro/sunpro-load.el ;; (when-feature (and mule sparcworks) "mime-setup") ;; Moved to Sun package ;; (when-feature sparcworks "cc-mode") ; Requires cc-mode package ;; (when-feature sparcworks "sunpro-init") ;; (when-feature sparcworks "ring") ;; (when-feature sparcworks "comint") ; Requires comint package ;; (when-feature sparcworks "annotations") ;;; formerly in eos/sun-eos-load.el ;; (when-feature sparcworks "sun-eos-init") ;; (when-feature sparcworks "sun-eos-common") ;; (when-feature sparcworks "sun-eos-editor") ;; (when-feature sparcworks "sun-eos-browser") ;; (when-feature sparcworks "sun-eos-debugger") ;; (when-feature sparcworks "sun-eos-debugger-extra") ;; (when-feature sparcworks "sun-eos-menubar") "loadhist" ; Must be dumped before loaddefs is loaded "loaddefs" ; <=== autoloads get loaded here ))