]> gitweb.factorcode.org Git - factor.git/commitdiff
don't natural-sort the stack effects or $values in help-lint -- catches a lot more...
authorDoug Coleman <doug.coleman@gmail.com>
Wed, 21 Oct 2009 22:39:53 +0000 (17:39 -0500)
committerDoug Coleman <doug.coleman@gmail.com>
Wed, 21 Oct 2009 22:39:53 +0000 (17:39 -0500)
basis/help/lint/checks/checks.factor

index 56f104a1a1234cf258dbeeb469b2efe7c487390b..dac3900cc923c303824944f45eac80ddcf2e5551 100644 (file)
@@ -33,14 +33,13 @@ SYMBOL: vocab-articles
 
 : extract-values ( element -- seq )
     \ $values swap elements dup empty? [
-        first rest [ first ] map prune natural-sort
+        first rest [ first ] map prune
     ] unless ;
 
 : effect-values ( word -- seq )
     stack-effect
     [ in>> ] [ out>> ] bi append
-    [ dup pair? [ first ] when effect>string ] map
-    prune natural-sort ;
+    [ dup pair? [ first ] when effect>string ] map prune ;
 
 : contains-funky-elements? ( element -- ? )
     {