/[emacs]/emacs/lisp/emacs-lisp/bytecomp.el
ViewVC logotype

Diff of /emacs/lisp/emacs-lisp/bytecomp.el

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

revision 2.173 by rms, Sat Jul 16 18:27:25 2005 UTC revision 2.174 by rms, Sat Jul 16 18:39:14 2005 UTC
# Line 3409  warnings during execution of BODY." Line 3409  warnings during execution of BODY."
3409            (byte-compile-form (nth 2 form) for-effect))            (byte-compile-form (nth 2 form) for-effect))
3410          (byte-compile-goto 'byte-goto donetag)          (byte-compile-goto 'byte-goto donetag)
3411          (byte-compile-out-tag elsetag)          (byte-compile-out-tag elsetag)
3412          (byte-compile-body (cdr (cdr (cdr form))) for-effect)          (byte-compile-maybe-guarded (list 'not clause)
3413              (byte-compile-body (cdr (cdr (cdr form))) for-effect))
3414          (byte-compile-out-tag donetag))))          (byte-compile-out-tag donetag))))
3415    (setq for-effect nil))    (setq for-effect nil))
3416    

Legend:
Removed from v.2.173  
changed lines
  Added in v.2.174

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