]> gitweb.factorcode.org Git - factor.git/blobdiff - core/generic/standard/standard-tests.factor
Fix comments to be ! not #!.
[factor.git] / core / generic / standard / standard-tests.factor
index 888ce933d8b79ecfe199ee046eb939e5fe170e08..f194ac1959339e1b30fb5fe6419415444f69af38 100644 (file)
@@ -285,7 +285,7 @@ TUPLE: ceo < executive ;
 GENERIC: salary ( person -- n )
 
 M: intern salary
-    #! Intentional mistake.
+    ! Intentional mistake.
     call-next-method ;
 
 M: employee salary drop 24000 ;
@@ -299,7 +299,7 @@ M: senior-manager salary call-next-method 15000 + ;
 M: executive salary call-next-method 2 * ;
 
 M: ceo salary
-    #! Intentional error.
+    ! Intentional error.
     drop 5 call-next-method 3 * ;
 
 [ salary ] must-infer