/[gcl]/gcl/ansi-tests/packages-08.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/packages-08.lsp

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

revision 1.7 by pfdietz, Sat Feb 15 05:11:11 2003 UTC revision 1.8 by pfdietz, Sun Jun 22 03:10:53 2003 UTC
# Line 126  Line 126 
126    
127  (deftest delete-package.6  (deftest delete-package.6
128    (progn    (progn
129      (safely-delete-package "TEST-20)")      (safely-delete-package "TEST-20")
130      (handler-bind ((package-error      (handler-bind ((package-error
131                      #'(lambda (c)                      #'(lambda (c)
132                          (let ((r (find-restart 'continue c)))                          (let ((r (find-restart 'continue c)))

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

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