diff --git a/basis/delegate/delegate.factor b/basis/delegate/delegate.factor index e7ea370b8d..57f9b35c96 100644 --- a/basis/delegate/delegate.factor +++ b/basis/delegate/delegate.factor @@ -2,7 +2,7 @@ ! See http://factorcode.org/license.txt for BSD license. USING: accessors parser generic kernel classes classes.tuple words slots assocs sequences arrays vectors definitions -prettyprint math hashtables sets generalizations namespaces make ; +math hashtables sets generalizations namespaces make ; IN: delegate : protocol-words ( protocol -- words ) @@ -100,6 +100,4 @@ M: protocol definition protocol-words show-words ; M: protocol definer drop \ PROTOCOL: \ ; ; -M: protocol synopsis* word-synopsis ; ! Necessary? - M: protocol group-words protocol-words ; diff --git a/basis/delegate/protocols/protocols.factor b/basis/delegate/protocols/protocols.factor index 81310c16c0..c21f33ec8e 100644 --- a/basis/delegate/protocols/protocols.factor +++ b/basis/delegate/protocols/protocols.factor @@ -1,8 +1,7 @@ ! Copyright (C) 2007 Daniel Ehrenberg ! See http://factorcode.org/license.txt for BSD license. USING: delegate sequences.private sequences assocs -prettyprint.sections io definitions kernel continuations -listener ; +io definitions kernel continuations ; IN: delegate.protocols PROTOCOL: sequence-protocol @@ -16,7 +15,7 @@ PROTOCOL: assoc-protocol PROTOCOL: input-stream-protocol stream-read1 stream-read stream-read-partial stream-readln - stream-read-until stream-read-quot ; + stream-read-until ; PROTOCOL: output-stream-protocol stream-flush stream-write1 stream-write stream-format