[ clisp-Bugs-438486 ] funamental-stream error

[<no...@so...>]

Bugs item #438486, was opened at 2001-07-04 03:22
You can respond by visiting: 
http://sourceforge.net/tracker/?func=detail&atid=101355&aid=438486&group_id=1355

Category: clisp
Group: lisp error
Status: Open
Resolution: None
Priority: 5
Submitted By: Nobody/Anonymous (nobody)
Assigned to: Sam Steingold (sds)
Summary: funamental-stream error

Initial Comment:
In the following example, I am unable to use read-line 
with fundamental-character-input-stream when a blank 
line is being read. Clisp 2.26 is being run under 
windows 98. Also read-line doesn't recognise end of 
file.


[14]> (use-package "GRAY")

T
[15]> (defclass test (fundamental-character-input-
stream) ())

#<STANDARD-CLASS TEST>
[16]> (defmethod stream-read-char ((s test)) #\Newline)

WARNING:
The generic function #<GENERIC-FUNCTION STREAM-READ-
CHAR> is being modified, but has already been called.
#<STANDARD-METHOD (#<STANDARD-CLASS TEST>)>
[17]> (defmethod stream-unread-char ((s test) (ch 
character)))

#<STANDARD-METHOD (#<STANDARD-CLASS TEST> #<BUILT-IN-
CLASS CHARACTER>)>
[18]> (setf x (make-instance 'test))

#<TEST #x1A73227D>
[19]> (read-line x)

*** - handle_fault error2 ! address = 0x1A739000 not 
in [0x1A600000,0x1A6E9BEC) !
SIGSEGV cannot be cured. Fault address = 0x1A739000.

Process inferior-lisp exited abnormally with code 5


----------------------------------------------------------------------

You can respond by visiting: 
http://sourceforge.net/tracker/?func=detail&atid=101355&aid=438486&group_id=1355