Fix comments to be ! not #!.

[factor.git] / extra / crypto / barrett / barrett.factor

diff --git a/extra/crypto/barrett/barrett.factor b/extra/crypto/barrett/barrett.factor
index 10f99058b5e51140026e97b3b037f55824425ddd..2b5e63f7f7a0419431b5fdd40a53c2d1ceeb97f1 100644 (file)
--- a/extra/crypto/barrett/barrett.factor
+++ b/extra/crypto/barrett/barrett.factor
@@ -4,7 +4,7 @@ USING: kernel math math.functions ;
 IN: crypto.barrett
 
 : barrett-mu ( n size -- mu )
-    #! Calculates Barrett's reduction parameter mu
-    #! size = word size in bits (8, 16, 32, 64, ...)
+    ! Calculates Barrett's reduction parameter mu
+    ! size = word size in bits (8, 16, 32, 64, ...)
     [ [ log2 1 + ] [ / 2 * ] bi* ]
     [ 2^ rot ^ swap /i ] 2bi ;