Fix comments to be ! not #!.

[factor.git] / core / io / io.factor

diff --git a/core/io/io.factor b/core/io/io.factor
index bad3551c4d214dfed6f92fd93c0af264c6d63cc0..fc804f068084354ed0382c03eedee2c126af99b6 100644 (file)
--- a/core/io/io.factor
+++ b/core/io/io.factor
@@ -86,9 +86,9 @@ SYMBOL: error-stream
     swapd [ with-output-stream* ] curry with-input-stream* ; inline
 
 : with-streams ( input output quot -- )
-    #! We have to dispose of the output stream first, so that
-    #! if both streams point to the same FD, we get to flush the
-    #! buffer before closing the FD.
+    ! We have to dispose of the output stream first, so that
+    ! if both streams point to the same FD, we get to flush the
+    ! buffer before closing the FD.
     swapd [ with-output-stream ] curry with-input-stream ; inline
 
 : with-input-output+error-streams* ( input output+error quot -- )