problem with ps-print-buffer-faces

problem with ps-print-buffer-faces

[Jeffery Rancier]

All:

When I attempt to call ps-print-buffer-faces in jde-mode or c-mode, I get the follow error.  Is this a problem with my ps-print module?  Suggestions?

Platform: Windows XP
Emacs version: GNU Emacs 23.3.1 (i386-mingw-nt5.1.2600) of 2011-03-10 on 3249CTO
ps-print version : 7.3.5

Debugger entered--Lisp error: (wrong-type-argument stringp nil)
  looking-at(nil)
  c-font-lock-enclosing-decls(4773)
  font-lock-fontify-keywords-region(2163 4773 nil)
  font-lock-default-fontify-region(2163 4773 nil)
  font-lock-fontify-region(2163 4773)
  run-hook-with-args(font-lock-fontify-region 2163 4773)
  byte-code("\302\303\b	#\207" [start next run-hook-with-args jit-lock-functions] 4)
  jit-lock-fontify-now(1 4773)
  ps-print-ensure-fontified(1 4773)
  ps-generate-postscript-with-faces(1 4773)
  ps-generate(#<buffer SQLTool.java> 1 4773 ps-generate-postscript-with-faces)
  ps-spool-with-faces(1 4773 nil)
  ps-print-with-faces(1 4773 nil)
  ps-print-buffer-with-faces(nil)
  call-interactively(ps-print-buffer-with-faces nil nil)

Re: problem with ps-print-buffer-faces

[Alan Mackenzie]

Jeffery Rancier <Jeffery.Rancier@wegmans.com> wrote:
> All:

> When I attempt to call ps-print-buffer-faces in jde-mode or c-mode, I
> get the follow error.  Is this a problem with my ps-print module?
> Suggestions?

It looks very much like a bug in CC Mode which has already been fixed in
the upcoming Emacs 24.  If so, sorry about it.

By the way, are you _sure_ that it happens in C Mode too?

Would you please apply the following patch, recompile cc-fonts.el, and
tell me whether or not it solves the problem.  (If you're unsure about
patches or compiling lisp files, send me a private email.)

Here's the patch:

*** orig/cc-fonts.el    2011-10-02 10:20:24.000000000 +0000
--- cc-fonts.el 2011-10-07 17:02:54.000000000 +0000
***************
*** 1526,1532 ****
        (setq decl-context (c-beginning-of-decl-1)
              in-typedef (looking-at c-typedef-key))
        (if in-typedef (c-forward-token-2))
!       (when (looking-at c-opt-block-decls-with-vars-key)
          (goto-char ps-elt)
          (when (c-safe (c-forward-sexp))
            (c-forward-syntactic-ws)
--- 1529,1536 ----
        (setq decl-context (c-beginning-of-decl-1)
              in-typedef (looking-at c-typedef-key))
        (if in-typedef (c-forward-token-2))
!       (when (and c-opt-block-decls-with-vars-key
!                  (looking-at c-opt-block-decls-with-vars-key))
          (goto-char ps-elt)
          (when (c-safe (c-forward-sexp))
            (c-forward-syntactic-ws)



> Platform: Windows XP
> Emacs version: GNU Emacs 23.3.1 (i386-mingw-nt5.1.2600) of 2011-03-10 on 3249CTO
> ps-print version : 7.3.5
> 
> Debugger entered--Lisp error: (wrong-type-argument stringp nil)
>  looking-at(nil)
>  c-font-lock-enclosing-decls(4773)
>  font-lock-fontify-keywords-region(2163 4773 nil)
>  font-lock-default-fontify-region(2163 4773 nil)
>  font-lock-fontify-region(2163 4773)
>  run-hook-with-args(font-lock-fontify-region 2163 4773)
>  byte-code("\302\303^H #\207" [start next run-hook-with-args jit-lock-functions] 4)
>  jit-lock-fontify-now(1 4773)
>  ps-print-ensure-fontified(1 4773)
>  ps-generate-postscript-with-faces(1 4773)
>  ps-generate(#<buffer SQLTool.java> 1 4773 ps-generate-postscript-with-faces)
>  ps-spool-with-faces(1 4773 nil)
>  ps-print-with-faces(1 4773 nil)
>  ps-print-buffer-with-faces(nil)
>  call-interactively(ps-print-buffer-with-faces nil nil)
> 

-- 
Alan Mackenzie (Nuremberg, Germany).