]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/annotations/annotations-tests.factor
Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...
[factor.git] / extra / annotations / annotations-tests.factor
index 72fd0f8b743158ced6cdcc41efb01d506ba54042..48fd281c6cdf8c37b670c1fd8be2d772f1ae794b 100644 (file)
@@ -1,17 +1,27 @@
-USING: annotations math sorting tools.test ;
+USING: accessors annotations combinators.short-circuit
+io.pathnames kernel math sequences sorting tools.test ;
 IN: annotations.tests
 
+!NOTE testing toplevel form 
+
 : three ( -- x )
-    !BROKEN find a dictionary
-    "threa" ;
+    !BROKEN english plz
+    "þrij" ;
 
 : four ( -- x )
     !BROKEN this code is broken
-    2 2 + 1+ ;
+    2 2 + 1 + ;
 
 : five ( -- x )
     !TODO return 5
     f ;
 
+[ t ] [
+    NOTEs {
+        [ length 1 = ]
+        [ first string>> file-name "annotations-tests.factor" = ]
+    } 1&&
+] unit-test
+
 [ { four three } ] [ BROKENs natural-sort ] unit-test
 [ { five } ] [ TODOs ] unit-test