>>>>> "Martin" == Martin Buchholz
<martin(a)xemacs.org> writes:
>>>>> "Robin" == Robin S Socha <robin(a)socha.net> writes:
Robin> cd ./src && /usr/local/bin/gmake all gmake[1]: Entering
Robin> directory `/usr/local/src/CVS/xemacs-21.2/src' GNUmakefile:279:
Robin> *** missing separator. Stop. gmake[1]: Leaving directory
Robin> `/usr/local/src/CVS/xemacs-21.2/src' gmake: *** [src] Error 2
Martin> Does `cvs diff src/depend' give you non-zero output? If so,
Martin> try `rm src/depend; cvs update src/depend' and try again.
Did.
(rootï¼ deathwish):(/usr/local/src/CVS/xemacs-21.2)# cat version.sh | head -n5
#!/bin/sh
emacs_is_beta=t
emacs_major_version=21
emacs_minor_version=2
emacs_beta_version=35
Kinda worked:
Loading /usr/local/src/CVS/xemacs-21.2/lisp/gutter-items.elc...*** Error in XEmacs
initialization
(error "instantiator item must be a vector" #<glyph (buffer)
#<image-specifier global=(((x) . [string :data ""]) ((tty) . [string :data
""]) ((stream) . [string :data ""])) fallback=((nil . [nothing]))
0x17a9>0x17a8>)
*** Backtrace
really-early-error-handler((error "instantiator item must be a vector"
#<glyph (buffer) #<image-specifier global=... fallback=... 0x17a9>0x17a8>))
check-valid-instantiator([layout :orientation vertical :justify left :margin-width 4
:items (#<glyph (buffer) #<image-specifier global=... fallback=...
0x17a9>0x17a8> [layout :orientation horizontal :items ...])] image)
# bind (result noerror specifier-type spec-list)
canonicalize-spec-list([layout :orientation vertical :justify left :margin-width 4
:items (#<glyph (buffer) #<image-specifier global=... fallback=...
0x17a9>0x17a8> [layout :orientation horizontal :items ...])] image)
# bind (is-valid nval how-to-add tag-set locale value specifier)
set-specifier(#<image-specifier global=<unspecified> fallback=((nil . ...))
0x17bf> [layout :orientation vertical :justify left :margin-width 4 :items (#<glyph
(buffer) #<image-specifier global=... fallback=... 0x17a9>0x17a8> [layout
:orientation horizontal :items ...])] nil nil nil)
# bind (how-to-add tag-set locale value property glyph)
set-glyph-property(#<glyph (buffer) #<image-specifier global=<unspecified>
fallback=(...) 0x17bf>0x17be> image [layout :orientation vertical :justify left
:margin-width 4 :items (#<glyph (buffer) #<image-specifier global=... fallback=...
0x17a9>0x17a8> [layout :orientation horizontal :items ...])] nil nil nil)
# bind (how-to-add tag-set locale spec glyph)
set-glyph-image(#<glyph (buffer) #<image-specifier global=<unspecified>
fallback=(...) 0x17bf>0x17be> [layout :orientation vertical :justify left
:margin-width 4 :items (#<glyph (buffer) #<image-specifier global=..
. fallback=... 0x17a9>0x17a8> [layout :orientation horizontal :items ...])])
# bind (glyph type spec-list)
make-glyph([layout :orientation vertical :justify left :margin-width 4 :items
(#<glyph (buffer) #<image-specifier global=... fallback=... 0x17a9>0x17a8>
[layout :orientation horizontal :items ...])])
# bind (style)
set-progress-display-style(large)
# bind (val var)
(lambda (var val) (set-progress-display-style val))(progress-display-style large)
# bind (value symbol)
custom-initialize-reset(progress-display-style (quote large))
# bind (initialize requests args doc value symbol)
custom-declare-variable(progress-display-style (quote large) "*Control the
appearance of the progress gauge.\nIf 'large, the default, then the progress-display
text is displayed\nabove the gauge itself. If 'small then the gauge and text are
arranged\nside-by-side." :group gutter :type (choice (const :tag "large"
large) (const :tag "small" small)) :set (lambda (var val)
(set-progress-display-style val)))
# bind (current-load-list)
# (unwind-protect ...)
# bind (load-file-name)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
load-internal("/usr/local/src/CVS/xemacs-21.2/lisp/gutter-items.elc" nil nil
nil nil nil)
# bind (nosuffix nomessage noerror file)
load("/usr/local/src/CVS/xemacs-21.2/lisp/gutter-items.elc")
(prog1 (load full-path) (unless (memq ... internal-error-checking) (garbage-collect)))
(if full-path (prog1 (load full-path) (unless ... ...)) (external-debugging-output
(format "\nLoad file %s: not found\n" file)) nil)
# bind (full-path)
(let ((full-path ...)) (if full-path (prog1 ... ...) (external-debugging-output ...)
nil))
# bind (file)
pureload("gutter-items")
(if (pureload file) nil (external-debugging-output "Fatal error during load,
aborting") (kill-emacs 1))
(unless (pureload file) (external-debugging-output "Fatal error during load,
aborting") (kill-emacs 1))
(while (setq file (car files)) (unless (pureload file) (external-debugging-output
"Fatal error during load, aborting") (kill-emacs 1)) (setq files (cdr files)))
# bind (file files)
(let ((files preloaded-file-list) file) (while (setq file ...) (unless ... ... ...)
(setq files ...)) (when (not ...) (defun toolbar-button-p ... "No toolbar
support." nil) (defun toolbar-specifier-p ... "No toolbar support." nil))
(fmakunbound (quote pureload)))
(lambda nil (setq Installation-string (save-current-buffer ... ... ... ... ...)) (let
(...) (setq load-path ...) (setq module-load-path ...)) (external-debugging-output (format
"\nUsing load-path %s" load-path)) (external-debugging-output (format
"\nUsing module-load-path %s" module-load-path)) (buffer-disable-undo
(get-buffer "*scratch*")) (load "very-early-lisp" nil t) (let (...)
(setq load-path ...)) (setq load-warn-when-source-newer t load-warn-when-source-only t)
(defun pureload (file) (let ... ...)) (load (expand-file-name
"../lisp/dumped-lisp.el")) (let (... file) (while ... ... ...) (when ... ...
...) (fmakunbound ...)) (packages-load-package-dumped-lisps late-package-load-path))()
# (unwind-protect ...)
call-with-condition-handler(really-early-error-handler (lambda nil (setq
Installation-string (save-current-buffer ... ... ... ... ...)) (let (...) (setq load-path
...) (setq module-load-path ...)) (external-debugging-output (format "\nUsing
load-path %s" load-path)) (external-debugging-output (format "\nUsing
module-load-path %s" module-load-path)) (buffer-disable-undo (get-buffer
"*scratch*")) (load "very-early-lisp" nil t) (let (...) (setq
load-path ...)) (setq load-warn-when-source-newer t load-warn-when-source-only t) (defun
pureload (file) (let ... ...)) (load (expand-file-name
"../lisp/dumped-lisp.el")) (let (... file) (while ... ... ...) (when ... ...
...) (fmakunbound ...)) (packages-load-package-dumped-lisps late-package-load-path)))
# bind (gc-cons-threshold)
(let ((gc-cons-threshold ...)) (call-with-condition-handler (quote
really-early-error-handler) (function ...)) (setq preloaded-file-list (mapcar ...
preloaded-file-list)) (setq load-warn-when-source-newer t load-warn-when-source-only nil)
(setq debugger (quote debug)) (when (member "no-site-file" command-line-args)
(setq site-start-file nil)) (when (load "site-load" t) (garbage-collect)) (when
purify-flag (message "Finding pointers to doc strings...") (Snarf-documentation
"DOC") (message "Finding pointers to doc strings...done")
(Verify-documentation)) (when (stringp site-start-file) (load "site-init" t))
(setq current-load-list nil) (garbage-collect) (buffer-enable-undo
"*scratch*"))
# bind (current-load-list)
# (unwind-protect ...)
# bind (load-file-name)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
load("/usr/local/src/CVS/xemacs-21.2/src/../lisp/loadup.el")
# (condition-case ... . error)
# (catch top-level ...)
*** Killing XEmacs
gmake[1]: *** [xemacs] Error 255
gmake[1]: Leaving directory `/usr/local/src/CVS/xemacs-21.2/src'
gmake: *** [src] Error 2
--
Robin S. Socha
Big. Black. Beautified. <
http://socha.net/XEmacs/>