/[gcl]/gcl/ansi-tests/structures-02.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/structures-02.lsp

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

revision 1.20 by pfdietz, Sun Jul 27 15:30:39 2003 UTC revision 1.21 by pfdietz, Sat Nov 29 01:56:48 2003 UTC
# Line 478  Line 478 
478    
479  (defstruct-with-tests struct-test-66 nil)  (defstruct-with-tests struct-test-66 nil)
480    
481    (defstruct-with-tests struct-test-67
482      (a 0 :type (integer 0 (#.(ash 1 32))))
483      (b nil))
484    
485    (defstruct-with-tests (struct-test-68 (:include struct-test-67))
486      c d)  
487    
488  ;;; Error tests  ;;; Error tests
489    
490  (deftest copy-structure.error.1  (deftest copy-structure.error.1

Legend:
Removed from v.1.20  
changed lines
  Added in v.1.21

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