Closed port giving incorrect error about type instead of about being closed

Bug #178385 reported by Derick Eddington on 2007-12-24
2
Affects Status Importance Assigned to Milestone
Ikarus Scheme
Medium
Abdulaziz Ghuloum

Bug Description

Ikarus Scheme version 0.0.2patched+ (revision 1284, build 2007-12-23)
Copyright (c) 2006-2007 Abdulaziz Ghuloum

> (define p #f)
> (call-with-output-file "blah.hoho"
    (lambda (op) (set! p op)))
> p
#<output-port "blah.hoho">
> (textual-port? p)
#t
> (write 123 p)
Unhandled exception
 Condition components:
   1. &assertion
   2. &who: write-char
   3. &message: "not a textual port"
   4. &irritants: (#<output-port "blah.hoho">)

Abdulaziz Ghuloum (aghuloum) wrote :

Fixed in revision 1285.

Ikarus Scheme version 0.0.2patched+ (revision 1285, build 2007-12-23)
Copyright (c) 2006-2007 Abdulaziz Ghuloum

> (define p #f)
> (call-with-output-file "blah.hoho"
    (lambda (op) (set! p op)))
> p
#<output-port "blah.hoho">
> (write 123 p)
Unhandled exception
 Condition components:
   1. &assertion
   2. &who: write
   3. &message: "port is closed"
   4. &irritants: (#<output-port "blah.hoho">)
> (write-char #\a p)
Unhandled exception
 Condition components:
   1. &assertion
   2. &who: write-char
   3. &message: "port is closed"
   4. &irritants: (#<output-port "blah.hoho">)
> (put-char p #\a)
Unhandled exception
 Condition components:
   1. &assertion
   2. &who: put-char
   3. &message: "port is closed"
   4. &irritants: (#<output-port "blah.hoho">)
> ^D

Changed in ikarus:
assignee: nobody → aghuloum
importance: Undecided → Medium
status: New → Fix Committed
Abdulaziz Ghuloum (aghuloum) wrote :

This bug report is about to be closed as the fix comitted
previously will be incorporated in the next 0.0.3 release of
Ikarus Scheme, scheduled for January 31, 2008. A release
candidate tarball is available for download from:
http://www.cs.indiana.edu/~aghuloum/ikarus/ikarus-0.0.3-rc1.tar.gz
Please do test it if you have the time and report any issues
you might encounter. Thank you very much for your support.
(Sorry for the duplicates; I'm updating every open bug.)

Changed in ikarus:
milestone: none → 0.0.3
Changed in ikarus:
status: Fix Committed → Fix Released
To post a comment you must log in.
This report contains Public information  Edit
Everyone can see this information.

Other bug subscribers