projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
message
[sbcl.git]
/
contrib
/
sb-simple-streams
/
fndb.lisp
diff --git
a/contrib/sb-simple-streams/fndb.lisp
b/contrib/sb-simple-streams/fndb.lisp
index
6d8579f
..
2df6088
100644
(file)
--- a/
contrib/sb-simple-streams/fndb.lisp
+++ b/
contrib/sb-simple-streams/fndb.lisp
@@
-83,7
+83,7
@@
TODO (rudi 2003-05-19): make the above work, make (defknown open) use it.
;; :derive-type #'result-type-open-class
)
;; :derive-type #'result-type-open-class
)
- (sb-c:defknown listen (&optional sb-kernel:streamlike
+ (sb-c:defknown listen (&optional sb-kernel:stream-designator
(or null (integer 1 10) (member character)))
boolean (sb-c::unsafely-flushable sb-c::explicit-check))
(or null (integer 1 10) (member character)))
boolean (sb-c::unsafely-flushable sb-c::explicit-check))