/[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.131 by fx, Mon Apr 28 22:03:13 2003 UTC revision 2.132 by jpw, Tue Apr 29 02:53:39 2003 UTC
# Line 1272  Each function's symbol gets marked with Line 1272  Each function's symbol gets marked with
1272               ;; here than caaar and friends.               ;; here than caaar and friends.
1273               (not (and (eq (get func 'byte-compile)               (not (and (eq (get func 'byte-compile)
1274                             'cl-byte-compile-compiler-macro)                             'cl-byte-compile-compiler-macro)
1275                         (match-string "\\`c[ad]+r\\'" (symbol-name func)))))                         (string-match "\\`c[ad]+r\\'" (symbol-name func)))))
1276          (byte-compile-warn "Function `%s' from cl package called at runtime"          (byte-compile-warn "Function `%s' from cl package called at runtime"
1277                             func)))                             func)))
1278    form)    form)

Legend:
Removed from v.2.131  
changed lines
  Added in v.2.132

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