/[gcl]/gcl/ansi-tests/with-open-file.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/with-open-file.lsp

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

revision 1.1 by pfdietz, Wed Jan 28 03:15:08 2004 UTC revision 1.2 by pfdietz, Mon Dec 13 13:45:33 2004 UTC
# Line 43  Line 43 
43      (delete-all-versions pn)      (delete-all-versions pn)
44      (with-open-file      (with-open-file
45       (s pn :direction :output)       (s pn :direction :output)
46       (declare (ignore s))))       (declare (ignore s))
47         (declare (optimize))))
48    nil)    nil)
49    
50  (deftest with-open-file.6  (deftest with-open-file.6

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

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