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

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

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

revision 1.1 by kryde, Fri Jun 6 22:38:20 2003 UTC revision 1.2 by kryde, Tue Jul 8 00:14:44 2003 UTC
# Line 82  Line 82 
82        (display "abcdef" port)        (display "abcdef" port)
83        (seek port 2 SEEK_SET)        (seek port 2 SEEK_SET)
84        (display "--" port)        (display "--" port)
       (display (get-output-string port))  
85        (string=? "ab--ef" (get-output-string port)))))        (string=? "ab--ef" (get-output-string port)))))

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