Fix comments to be ! not #!.

[factor.git] / extra / benchmark / raytracer / raytracer.factor

diff --git a/extra/benchmark/raytracer/raytracer.factor b/extra/benchmark/raytracer/raytracer.factor
index 4ecc0a6a0a2cfc72e45ac1af499de9333692f64c..c246f1538fb6f76ec8668fb46e5cc70737747665 100644 (file)
--- a/extra/benchmark/raytracer/raytracer.factor
+++ b/extra/benchmark/raytracer/raytracer.factor
@@ -66,7 +66,7 @@ C: <sphere> sphere
     dup 0.0 < [ 3drop 1/0. ] [ sqrt sphere-t nip ] if ; inline
 
 : if-ray-sphere ( hit ray sphere quot -- hit )
-    #! quot: hit ray sphere l -- hit
+    ! quot: hit ray sphere l -- hit
     [
         [ ] [ swap ray-sphere nip ] [ 2drop lambda>> ] 3tri
         [ drop ] [ < ] 2bi