]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/soundex/soundex.factor
Fix comments to be ! not #!.
[factor.git] / basis / soundex / soundex.factor
index 196fa7522cbc5863a9586139f3dd3891732d4d7e..91110b3b985a8a5720bc8c850b8111f94b7908bd 100644 (file)
@@ -9,8 +9,8 @@ TR: soundex-tr
     "00000000111122222222334556" ;
 
 : remove-duplicates ( seq -- seq' )
-    #! Remove _consecutive_ duplicates (unlike prune which removes
-    #! all duplicates).
+    ! Remove _consecutive_ duplicates (unlike prune which removes
+    ! all duplicates).
     [ 2 <clumps> [ = ] assoc-reject values ] [ first ] bi prefix ;
 
 : first>upper ( seq -- seq' ) 1 head >upper ;