Jerry,
The latest CVS packages cannot build with 21.4. I'm getting an error
compiling debug/gdb.el:
Compiling /ide/build/xemacs-packages-2006-05-29/xemacs-packages/debug/gdb.el...
While compiling toplevel forms in file /ide/build/xemacs-packages-2006-05-29/xemacs-packages/debug/gdb.el:
!! Invalid function (((macro . #<compiled-function (mode doc &optional init-value lighter keymap &rest body) "...(660)" [lighter group mode-name keymap mode body keywordp nil symbol-name easy-mmode-pretty-mode-name t intern "-map" "-hook" "-on-hook" "-off-hook" :init-value :lighter :global :extra-args :group :require quote replace-regexp-in-string "-mode\\'" "" progn defvar format "Non-nil if %s is enabled.
Use the command `%s' to change this variable." make-variable-buffer-local boundp byte-compile-current-file defcustom "Non-nil if %s is enabled.
See the command `%s' for a description of this minor-mode.
Setting this variable directly does not take effect;
use either \\[customize] or the function `%s'." :set (lambda (symbol value) (funcall symbol (or value 0))) :initialize (quote custom-initialize-default) append :type (quote boolean) file-name-nondirectory file-name-sans-extension defun &optional arg "Toggle %s on or off.
Interactively, with no prefix argument, toggle the mode.
With universal prefix ARG turn mode on.
With zero or negative ARG turn mode off.
\\{%s}" (interactive (list (or current-prefix-arg (quote toggle)))) let old-mode setq cond (eq arg (quote toggle)) not (arg (or (listp arg) (> (prefix-numeric-value arg) 0))) if null message "Toggling %s off; better pass an explicit argument." (nil) and equal run-hooks init-value keymap-sym G26002 pretty-name require globalp hook hook-on hook-off extra-args curfile load-file-name doc (interactive-p) "%s %%sabled" ("en" "dis") (force-mode-line-update) "Hook run at the end of function `%s'." (:type (quote hook)) "Hook to run when entering %s." (:type (quote hook)) "Hook to run when exiting %s." (:type (quote hook)) m ((keymapp m) m) ((listp m) (easy-mmode-define-keymap m)) error "Invalid keymap %S" "Keymap for `%s'." add-minor-mode symbol-value ((not purify-flag)) eval-after-load (1 -1)] 23 ("/ide/build/xemacs-packages-2006-05-29/xemacs-packages/xemacs-base/easy-mmode.elc" . 2632)>)))
backtrace(nil t)
# bind (error-info)
byte-compile-report-error((invalid-function (macro . #<compiled-function ... "...(660)" ... 23 ...>)))
# bind (error-info)
#<compiled-function (error-info) "...(4)" [error-info byte-compile-report-error] 2>((invalid-function (macro . #<compiled-function ... "...(660)" ... 23 ...>)))
define-minor-mode(t "Turn directory tracking on and off in a shell buffer." nil nil nil "/ide/build/xemacs-packages-2006-05-29/xemacs-packages/debug/" (shell-directory-tracker))
byte-code("..." [list-buffers-directory default-directory shell-dirtrack-mode defvaralias shell-dirtrackp define-minor-mode "Turn directory tracking on and off in a shell buffer." nil add-hook comint-input-filter-functions shell-directory-tracker t remove-hook defalias shell-dirtrack-toggle dirtrack-toggle dirtrack-mode] 12)
# bind (current-load-list)
# (unwind-protect ...)
# bind (load-file-name)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
load-internal("shell" nil t nil nil nil)
# bind (nosuffix nomessage noerror file)
load("shell" nil t nil)
# (unwind-protect ...)
require(shell)
eval((require (quote shell)))
# bind (form)
byte-compile-file-form-eval-boundary((require (quote shell)))
# bind (byte-compile-current-form handler form)
byte-compile-file-form((require (quote shell)))
# (unwind-protect ...)
#<compiled-function nil "...(43)" [byte-compile-unresolved-functions byte-compile-inbuffer 1 " \n " nil looking-at ";" byte-compile-file-form read byte-compile-flush-pending byte-compile-warn-about-unresolved-functions] 3>()
# (unwind-protect ...)
call-with-condition-handler(#<compiled-function (error-info) "...(4)" [error-info byte-compile-report-error] 2> #<compiled-function nil "...(43)" [byte-compile-unresolved-functions byte-compile-inbuffer 1 " \n " nil looking-at ";" byte-compile-file-form read byte-compile-flush-pending byte-compile-warn-about-unresolved-functions] 3>)
# (unwind-protect ...)
# bind (byte-compile-warnings-beginning byte-compile-point-max-prev byte-compile-log-buffer byte-compile-macro-environment byte-compile-function-environment byte-compile-autoload-environment byte-compile-unresolved-functions byte-compile-bound-variables byte-compile-free-references byte-compile-free-assignments byte-compile-verbose byte-optimize byte-compile-emacs19-compatibility byte-compile-dynamic byte-compile-dynamic-docstrings byte-compile-warnings byte-compile-file-domain byte-compile-outbuffer float-output-format case-fold-search print-length print-level byte-compile-constants byte-compile-variables byte-compile-tag-number byte-compile-depth byte-compile-maxdepth byte-compile-output eval filename byte-compile-inbuffer)
byte-compile-from-buffer(#<buffer " *Compiler Input*"> "/ide/build/xemacs-packages-2006-05-29/xemacs-packages/debug/gdb.el")
# bind (byte-compile-current-file target-file input-buffer output-buffer byte-compile-dest-file load filename)
byte-compile-file("gdb.el")
byte-code("..." [file byte-compile-file t] 2)
# (condition-case ... . ((error (byte-code "ÂÃ!Â!ÂÄ!ÅÆ!«Æ Ç\"ªÂ ＠ÈN® ＠!ÉÊ A\"ÂË!Ç" ... 3))))
# bind (file)
batch-byte-compile-1("gdb.el")
# bind (error file-to-process)
batch-byte-compile-one-file()
# bind (error)
batch-byte-compile()
# bind (arg)
command-line-do-funcall("-f")
# bind (dir file-count line end-of-options file-p arg tem)
command-line-1()
# bind (command-line-args-left)
command-line()
# (condition-case ... . ((t (byte-code " .Â" ... 1))))
# bind (error-data)
normal-top-level()
# (condition-case ... . error)
# (catch top-level ...)
>>Error occurred processing gdb.el:
Invalid function: (macro . #<compiled-function (mode doc &optional init-value lighter keymap &rest body) "...(660)" [lighter group mode-name keymap mode body keywordp nil symbol-name easy-mmode-pretty-mode-name t intern "-map" "-hook" "-on-hook" "-off-hook" :init-value :lighter :global :extra-args :group :require quote replace-regexp-in-string "-mode\\'" "" progn defvar format "Non-nil if %s is enabled.
Use the command `%s' to change this variable." make-variable-buffer-local boundp byte-compile-current-file defcustom "Non-nil if %s is enabled.
See the command `%s' for a description of this minor-mode.
Setting this variable directly does not take effect;
use either \\[customize] or the function `%s'." :set (lambda (symbol value) (funcall symbol (or value 0))) :initialize (quote custom-initialize-default) append :type (quote boolean) file-name-nondirectory file-name-sans-extension defun &optional arg "Toggle %s on or off.
Interactively, with no prefix argument, toggle the mode.
With universal prefix ARG turn mode on.
With zero or negative ARG turn mode off.
\\{%s}" (interactive (list (or current-prefix-arg (quote toggle)))) let old-mode setq cond (eq arg (quote toggle)) not (arg (or (listp arg) (> (prefix-numeric-value arg) 0))) if null message "Toggling %s off; better pass an explicit argument." (nil) and equal run-hooks init-value keymap-sym G26002 pretty-name require globalp hook hook-on hook-off extra-args curfile load-file-name doc (interactive-p) "%s %%sabled" ("en" "dis") (force-mode-line-update) "Hook run at the end of function `%s'." (:type (quote hook)) "Hook to run when entering %s." (:type (quote hook)) "Hook to run when exiting %s." (:type (quote hook)) m ((keymapp m) m) ((listp m) (easy-mmode-define-keymap m)) error "Invalid keymap %S" "Keymap for `%s'." add-minor-mode symbol-value ((not purify-flag)) eval-after-load (1 -1)] 23 ("/ide/build/xemacs-packages-2006-05-29/xemacs-packages/xemacs-base/easy-mmode.elc" . 2632)>)
Done
make[2]: *** [gdb.elc] Error 1
make[2]: Leaving directory `/ide/build/xemacs-packages-2006-05-29/xemacs-packages/debug'
make[1]: *** [debug/bytecompile.target] Error 2
make[1]: Leaving directory `/ide/build/xemacs-packages-2006-05-29/xemacs-packages'
make: *** [xemacs-packages/bytecompile.target] Error 2
This may not be due to your changes, Jerry, in which case I proffer my
apologies in advance.
Regards,
Vin
