Fix comments to be ! not #!.

[factor.git] / core / math / order / order.factor

diff --git a/core/math/order/order.factor b/core/math/order/order.factor
index 4598d19d353b7856f8d011613b9be08d7a188a32..e26260bc8d7ca51b725cdc08e76a0eac130617cb 100644 (file)
--- a/core/math/order/order.factor
+++ b/core/math/order/order.factor
@@ -8,7 +8,7 @@ SYMBOL: +eq+
 SYMBOL: +gt+
 
 : invert-comparison ( <=> -- >=< )
-    #! Can't use case, index or nth here
+    ! Can't use case, index or nth here
     dup +lt+ eq? [ drop +gt+ ] [ +eq+ eq? +eq+ +lt+ ? ] if ;
 
 GENERIC: <=> ( obj1 obj2 -- <=> )