Fix comments to be ! not #!.

[factor.git] / extra / poker / poker.factor

diff --git a/extra/poker/poker.factor b/extra/poker/poker.factor
index 50d0feebd14a60a951aa2d34c18bcb4a9e2a1d25..7d5ef91be82004dcba838a0807deb7dceec51a87 100644 (file)
--- a/extra/poker/poker.factor
+++ b/extra/poker/poker.factor
@@ -131,8 +131,8 @@ M: integer >ckf ;
     [ 0xFF bitand ] map-product ;
 
 : perfect-hash-find ( q -- value )
-    #! magic to convert a hand's unique identifying bits to the
-    #! proper index for fast lookup in a table of hand values
+    ! magic to convert a hand's unique identifying bits to the
+    ! proper index for fast lookup in a table of hand values
     0xE91AAA35 +
     dup -16 shift bitxor
     dup   8 shift w+