diff --git a/basis/ui/tools/listener/listener.factor b/basis/ui/tools/listener/listener.factor index 4710b29c71..b0a87927a0 100644 --- a/basis/ui/tools/listener/listener.factor +++ b/basis/ui/tools/listener/listener.factor @@ -157,9 +157,6 @@ M:: interactor stream-read-unsafe ( n buf interactor -- count ) n short [ head-slice 0 buf copy ] keep ] if-zero ; -M: interactor stream-read-partial-unsafe - stream-read-unsafe ; inline - M: interactor stream-read1 dup interactor-read { { [ dup not ] [ 2drop f ] }