Fix comments to be ! not #!.

[factor.git] / basis / channels / examples / examples.factor

diff --git a/basis/channels/examples/examples.factor b/basis/channels/examples/examples.factor
index 8aec6f593522951a37cf721e4660278891cee03b..b841a10695dfb5491ccbaaa165ba17151038b4d6 100644 (file)
--- a/basis/channels/examples/examples.factor
+++ b/basis/channels/examples/examples.factor
@@ -17,9 +17,9 @@ IN: channels.examples
     [ from ] keep [ from ] keep from ;
 
 : filter ( send prime recv -- )
-    #! Receives numbers from the 'send' channel,
-    #! filters out all those divisible by 'prime',
-    #! and sends to the 'recv' channel.
+    ! Receives numbers from the 'send' channel,
+    ! filters out all those divisible by 'prime',
+    ! and sends to the 'recv' channel.
     [
         from swap dupd mod zero? not [ swap to ] [ 2drop ] if
     ] 3keep filter ;
@@ -32,7 +32,7 @@ IN: channels.examples
     prime newc (sieve) ;
 
 : sieve ( prime -- )
-    #! Send prime numbers to 'prime' channel
+    ! Send prime numbers to 'prime' channel
     <channel> dup [ counter ] curry "Counter" spawn drop
     (sieve) ;