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

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

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

revision 1.35.6.1 by handa, Fri Apr 16 12:50:13 2004 UTC revision 1.35.6.2 by miles, Fri Oct 22 10:13:47 2004 UTC
# Line 108  printer proceeds to the next function on Line 108  printer proceeds to the next function on
108  This variable is not used at present, but it is defined in hopes that  This variable is not used at present, but it is defined in hopes that
109  a future Emacs interpreter will be able to use it.")  a future Emacs interpreter will be able to use it.")
110    
111  (defvar cl-unload-hook '(cl-cannot-unload)  (add-hook 'cl-unload-hook 'cl-cannot-unload)
   "Prevent unloading the feature `cl', since it does not work.")  
112  (defun cl-cannot-unload ()  (defun cl-cannot-unload ()
113    (error "Cannot unload the feature `cl'"))    (error "Cannot unload the feature `cl'"))
114    

Legend:
Removed from v.1.35.6.1  
changed lines
  Added in v.1.35.6.2

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