Parent Directory | Revision Log | Patch
revision 1.26.2.1 by mgrabmue, Thu Jul 19 20:49:34 2001 UTC | revision 1.26.2.2 by kryde, Wed Oct 1 23:38:56 2003 UTC | |
---|---|---|
# | Line 298 | Line 298 |
298 | (pass-if "output check" | (pass-if "output check" |
299 | (string=? text result)))) | (string=? text result)))) |
300 | ||
301 | (with-test-prefix "call-with-output-string" | |
302 | ||
303 | ;; In Guile 1.6.4, closing the port resulted in a segv, check that doesn't | |
304 | ;; occur. | |
305 | (pass-if-exception "proc closes port" exception:wrong-type-arg | |
306 | (call-with-output-string close-port))) | |
307 | ||
308 | ||
309 | ||
310 | ||
311 | ;;;; Soft ports. No tests implemented yet. | ;;;; Soft ports. No tests implemented yet. |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |