3

我正在尝试在 emacs 24 中使用 dart-mode 和 d-mode。如果我单独使用任何一种模式,一切都很好。如果我分别在每种类型的文件上使用这两种模式,我在尝试缩进 D 代码时会出错。

以下是在 init 需要以下内容后出现的错误:

(require 'd-mode)
(require 'dart-mode)

然后我在第一个加载的 D 文件上打开 d-mode。

Error during redisplay: (jit-lock-function 1) signaled (invalid-function (setq ad-return-value (with-no-warnings (funcall ad--addoit-function))))

再次 - 如果我不需要 'dart-mode一切正常。

d-mode 来自https://raw.github.com/Emacs-D-Mode-Maintainers/Emacs-D-Mode/master/d-mode.el,dart模式来自https://github.com /nex3/dart-mode/blob/master/dart-mode.el

这是否意味着两种模式之间存在一些不兼容,或其他一些设置问题?我试过 --no-site-file 但仍然没有运气。


换一种说法,鉴于以下情况,如果我在其中调出一个 D 文件和Mx d-mode,我就会遇到问题:

user@user-thinkpad:/tmp/breakEmacs$ ls
dart-mode.el  d-mode.el  emacs_test.el
user@user-thinkpad:/tmp/breakEmacs$ cat emacs_test.el
(add-to-list 'load-path "/tmp/breakEmacs")
(require 'd-mode)
(require 'dart-mode)
user@user-thinkpad:/tmp/breakEmacs$ emacs-snapshot --no-init-file --no-site-file -l /tmp/breakEmacs/emacs_test.el 

我希望这种方式成功地消除了我的任何 .emacs 内容的潜在问题?


根据@wvxvw 的建议,我尝试通过添加(setq debug-on-error t)进行调试,它提供了如下所示的调用堆栈。我说喜欢是因为有些行很大并且看起来像二进制编码,所以我省略了一些文本。但是,希望这里的某些东西有助于指出罪魁祸首?

Debugger entered--Lisp error: (invalid-function (setq ad-return-value (with-no-warnings (funcall ad--addoit-function))))
  (setq ad-return-value (with-no-warnings (funcall ad--addoit-function)))()
  ad-Advice-c-parse-state(#[nil ...] 5])
  apply(ad-Advice-c-parse-state #[nil ...] nil)
  c-parse-state()
  #[nil  ...] 8 ("/usr/share/emacs/24.3.50/lisp/progmodes/cc-engine.elc" . 156151)]()
  ad-Advice-c-guess-basic-syntax(#[nil ...] 8 ("/usr/share/emacs/24.3.50/lisp/progmodes/cc-engine.elc" . 156151)])
  apply(ad-Advice-c-guess-basic-syntax #[nil ...] 8 ("/usr/share/emacs/24.3.50/lisp/progmodes/cc-engine.elc" . 156151)] nil)
  c-guess-basic-syntax()
  c-indent-line()
  c-indent-command(nil)
  c-indent-line-or-region(nil nil)
  call-interactively(c-indent-line-or-region nil nil)
  command-execute(c-indent-line-or-region)
4

1 回答 1

4

问题在于飞镖模式。它使用如下代码:

(if (not (c-major-mode-is 'dart-mode))
    (ad-do-it)

而它应该是

(if (not (c-major-mode-is 'dart-mode))
    ad-do-it

请注意删除 . 周围的括号ad-do-it

于 2013-04-24T14:36:30.150 回答