Fix comments to be ! not #!.

[factor.git] / basis / math / vectors / simd / simd-tests.factor

diff --git a/basis/math/vectors/simd/simd-tests.factor b/basis/math/vectors/simd/simd-tests.factor
index 0883822b803a7d72580b2197753facb9bdc4d90f..6bdb270e5719bfdacdbf1db8d8916914e2d1ae31 100644 (file)
--- a/basis/math/vectors/simd/simd-tests.factor
+++ b/basis/math/vectors/simd/simd-tests.factor
@@ -139,13 +139,13 @@ TUPLE: simd-test-failure
     --
     failures
 )
-    #! Use test-quot to generate a bunch of test cases from the
-    #! given inputs. Run each test case optimized and
-    #! unoptimized. Compare results with eq-quot.
-    #!
-    #! seq: sequence of inputs
-    #! test-quot: ( input -- input-quot: ( -- ..v ) code-quot: ( ..v -- result ) )
-    #! eq-quot: ( result1 result2 -- ? )
+    ! Use test-quot to generate a bunch of test cases from the
+    ! given inputs. Run each test case optimized and
+    ! unoptimized. Compare results with eq-quot.
+    !
+    ! seq: sequence of inputs
+    ! test-quot: ( input -- input-quot: ( -- ..v ) code-quot: ( ..v -- result ) )
+    ! eq-quot: ( result1 result2 -- ? )
     seq [| input |
         input test-quot call :> ( input-quot code-quot )
         input-quot [ class-of ] { } map-as :> input-classes