On Wednesday, February 13, 2008 at 22:03:20, Toby Allsopp wrote:
[...]
> Me? I don't. I only started hacking DVC a week or so ago :-)
>
> But I just tried and had some success starting xemacs using the command
> that the Makefile uses but taking off the -l and -f options, then
> setting debug-on-error, then `load-file'ing dvc-build.el.
>
> It seems that the problem is that (require 'cl) only sets up an autoload
> for `defstruct' but this isn't operational in the presence of
> -no-autoloads.
>
> Can you try the following patch?
I already tried this before, but it caused backtraces which leave
me puzzled I ... I will try to compile without package-maint, i.e.
the old xtla Makefile now an let you know the results.
Cheers,
Robert
error loading /home/fenk/prog/bazaar/dvc/lisp/bzr-dvc.el
backtrace()
(condition-case nil (load (expand-file-name file srcdir) t t t) (error
(message ...) (backtrace)))
(while --dolist-temp--34713 (setq file (car --dolist-temp--34713))
(condition-case nil (load ... t t t) (error ... ...)) (setq
--dolist-temp--34713 (cdr --dolist-temp--34713)))
(let ((--dolist-temp--34713 files) file) (while --dolist-temp--34713 (setq
file ...) (condition-case nil ... ...) (setq --dolist-temp--34713 ...)) nil)
(catch (quote --cl-block-nil--) (let (... file) (while --dolist-temp--34713
... ... ...) nil))
(cl-block-wrapper (catch (quote --cl-block-nil--) (let ... ... nil)))
(block nil (let (... file) (while --dolist-temp--34713 ... ... ...) nil))
(dolist (file files) (condition-case nil (load ... t t t) (error ... ...)))
package-maint-load-files(("/home/fenk/prog/bazaar/dvc/lisp/dvc-site.el"
"/home/fenk/prog/bazaar/dvc/lisp/dvc-version.el" "baz-dvc.el" "baz.el"
"bzr-core.el" "bzr-dvc.el" "bzr-gnus.el" "bzr-revision.el" "bzr-revlog.el"
"bzr-submit.el" "bzr.el" "dvc-about.el" "dvc-annotate.el" "dvc-be.el"
"dvc-bookmarks.el" "dvc-buffers.el" "dvc-bug.el" "dvc-cmenu.el" "dvc-config.el"
"dvc-core.el" "dvc-defs.el" "dvc-diff.el" "dvc-fileinfo.el" "dvc-gnus.el"
"dvc-lisp.el" "dvc-log.el" "dvc-register.el" "dvc-revlist.el" "dvc-revlog.el"
"dvc-site.el" "dvc-state.el" "dvc-tips.el" "dvc-ui.el" "dvc-unified.el"
"dvc-utils.el" "dvc-version.el" "dvc-xemacs.el" "tla-autoconf.el"
"tla-bconfig.el" "tla-browse.el" "tla-core.el" "tla-defs.el" "tla-dvc.el"
"tla-gnus.el" "tla-tests.el" "tla.el" "xdarcs-core.el" "xdarcs-dvc.el"
"xdarcs.el" "xgit-annotate.el" "xgit-core.el" "xgit-dvc.el" "xgit-gnus.el"
"xgit-log.el" "xgit-revision.el" "xgit.el" "xhg-be.el" "xhg-core.el"
"xhg-dvc.el" "xhg-gnus.el" "xhg-log.el" "xhg-mq.el" "xhg-revision.el" "xhg.el"
"xmtn-automate.el" "xmtn-base.el" "xmtn-basic-io.el" "xmtn-compat.el"
"xmtn-dvc.el" "xmtn-ids.el" "xmtn-match.el" "xmtn-minimal.el" "xmtn-revlist.el"
"xmtn-run.el"))
(progn (package-maint-load-files package-maint-files)
(package-maint-build-dep changed) (package-maint-clean-elc changed))
(if (not (null changed)) (progn (package-maint-load-files
package-maint-files) (package-maint-build-dep changed) (package-maint-clean-elc
changed)))
(when (not (null changed)) (package-maint-load-files package-maint-files)
(package-maint-build-dep changed) (package-maint-clean-elc changed))
(let ((changed ...)) (when (not ...) (package-maint-load-files
package-maint-files) (package-maint-build-dep changed) (package-maint-clean-elc
changed)))
package-maint-clean-some-elc()
(let ((to-compile ...)) (when (not ...) (dolist ... ...)))
package-maint-compile()
command-line-do-funcall("-f")
command-line-1()
command-line()
normal-top-level()
_______________________________________________
Dvc-dev mailing list
[email protected]
https://mail.gna.org/listinfo/dvc-dev
