/[emacs]/emacs/lisp/emacs-lisp/byte-opt.el
ViewVC logotype

Diff of /emacs/lisp/emacs-lisp/byte-opt.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.83 by monnier, Wed Nov 2 19:03:17 2005 UTC revision 1.84 by monnier, Wed Nov 2 21:56:15 2005 UTC
# Line 1135  of FORM by signaling the error at compil Line 1135  of FORM by signaling the error at compil
1135            (setq constant nil))            (setq constant nil))
1136        (setq args (cdr args)))        (setq args (cdr args)))
1137      (if constant      (if constant
1138          (eval form)          (cons 'quote (eval form))
1139        form)))        form)))
1140    
1141  ;; Avoid having to write forward-... with a negative arg for speed.  ;; Avoid having to write forward-... with a negative arg for speed.

Legend:
Removed from v.1.83  
changed lines
  Added in v.1.84

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26