Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...

[factor.git] / basis / biassocs / biassocs-tests.factor

diff --git a/basis/biassocs/biassocs-tests.factor b/basis/biassocs/biassocs-tests.factor
index 4cd7f00f80836836b09e702285c6b1bb975197c1..2ef54441e14f838a0eaac7a1dd92e95e50cdfb81 100644 (file)
--- a/basis/biassocs/biassocs-tests.factor
+++ b/basis/biassocs/biassocs-tests.factor
@@ -1,5 +1,5 @@
-IN: biassocs.tests
 USING: biassocs assocs namespaces tools.test ;
+IN: biassocs.tests
 
 <bihash> "h" set
 
@@ -20,3 +20,13 @@ USING: biassocs assocs namespaces tools.test ;
 [ 2 ] [ 1 "h" get value-at ] unit-test
 
 [ 2 ] [ "h" get assoc-size ] unit-test
+
+H{ { "a" "A" } { "b" "B" } } "a" set
+
+[ ] [ "a" get >biassoc "b" set ] unit-test
+
+[ t ] [ "b" get biassoc? ] unit-test
+
+[ "A" ] [ "a" "b" get at ] unit-test
+
+[ "a" ] [ "A" "b" get value-at ] unit-test