/[guile]/guile/guile-core/test-suite/tests/srfi-1.test
ViewVC logotype

Diff of /guile/guile-core/test-suite/tests/srfi-1.test

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

revision 1.7 by kryde, Fri Aug 22 22:57:46 2003 UTC revision 1.8 by kryde, Sat Aug 30 00:02:44 2003 UTC
# Line 318  Line 318 
318  ;;  ;;
319    
320  (with-test-prefix "list-copy"  (with-test-prefix "list-copy"
     
   ;; improper lists can be copied  
321    (pass-if (equal? '()          (list-copy '())))    (pass-if (equal? '()          (list-copy '())))
322    (pass-if (equal? '(1 2)       (list-copy '(1 2))))    (pass-if (equal? '(1 2)       (list-copy '(1 2))))
323    (pass-if (equal? '(1 2 3)     (list-copy '(1 2 3))))    (pass-if (equal? '(1 2 3)     (list-copy '(1 2 3))))

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