# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1404922825 -7200
# Node ID 380f7238e94eddf74db0f2b0542cf56ecf30d6f7
# Parent  19b7ae0bbb490b9eb6b4457aea9e049801118016
comment/format only

diff -r 19b7ae0bbb49 -r 380f7238e94e Stream.st
--- a/Stream.st	Wed Jul 09 18:20:24 2014 +0200
+++ b/Stream.st	Wed Jul 09 18:20:25 2014 +0200
@@ -2868,6 +2868,8 @@
 !Stream methodsFor:'visiting'!
 
 acceptVisitor:aVisitor with:aParameter
+    "dispatch for visitor pattern; send #visitStream:with: to aVisitor."
+
     ^ aVisitor visitStream:self with:aParameter
 ! !
 
@@ -3595,11 +3597,11 @@
 !Stream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.223 2014-06-23 09:38:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.224 2014-07-09 16:20:25 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.223 2014-06-23 09:38:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Stream.st,v 1.224 2014-07-09 16:20:25 cg Exp $'
 ! !