Re: [Aquamacs-bugs] C++ program auto-insertion fails with Aquamacs 1.3

[David Reitter]

On 8 Mar 2008, at 01:26, Stefan Monnier wrote:

>  (setq debug-ignored-errors nil)

Okay, I managed to reproduce this with Aquamacs 1.3a (compiled from 22  
branch CVS, 2008-02-23), but not with the current nightly build.

The stack trace is below. I suspect the following check-in fixed the  
bug.

----------------------------
revision 1.69
date: 2008-03-04 22:15:39 +0000;  author: acmacm;  state: Exp;  lines:  
+8 -9;  commitid: XH8Xc2hh7pI2fRTs;
(c-neutralize-syntax-in-CPP): Fix coding bug.





Debugger entered--Lisp error: (end-of-buffer)
  c-neutralize-syntax-in-CPP(1 9 0)
  c-after-change(1 9 0)
  skeleton-internal-1("#ifndef " nil nil)
  byte-code("...   #‡" [skeleton recursive skeleton-internal-1 nil] 4)
  skeleton-internal-list(((upcase (concat ... "_" ...)) "#ifndef "  
str n "#define " str "\n\n" _ "\n\n#endif") nil)
  (let nil (skeleton-internal-list skeleton str))
  eval((let nil (skeleton-internal-list skeleton str)))
  skeleton-insert(((upcase (concat ... "_" ...)) "#ifndef " str n  
"#define " str "\n\n" _ "\n\n#endif"))
  byte-code(...)
  mapcar(#[(action) "...ؤ‹‡" [action auto-insert-directory file- 
readable-p insert-file-contents (...)] 3] [((upcase ...) "#ifndef "  
str n "#define " str "\n\n" _ "\n\n#endif")])
  auto-insert()
  run-hooks(find-file-hook)
  after-find-file(t t)
  find-file-noselect-1(#<buffer test2.hpp> "~/Temp/test2.hpp" nil nil  
"~/Temp/test2.hpp" nil)
  find-file-noselect("~/Temp/test2.hpp" nil nil t)
  find-file("~/Temp/test2.hpp" t)
  call-interactively(find-file)
  (if (or (not one-buffer-one-frame) (< ... 2)) (call-interactively  
(quote find-file)) (let (...) (new-frame-with-new-scratch nil)) (let  
(...) (unwind-protect ... ...)))
  aquamacs-find-file()
  call-interactively(aquamacs-find-file)

smime.p7s
Description: S/MIME cryptographic signature