]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/linked-assocs/linked-assocs-tests.factor
Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...
[factor.git] / basis / linked-assocs / linked-assocs-tests.factor
index 7a259ee59ae26932130dc175a0479efb6675a397..603b04e895e0d6df74e15cb5180b86f3cc58dde8 100644 (file)
@@ -50,8 +50,16 @@ IN: linked-assocs.test
 
 { 9 } [
     <linked-hash>
-    { [ 3 * ] [ 1- ] }          "first"   pick set-at
-    { [ [ 1- ] bi@ ] [ 2 / ] }  "second"  pick set-at
+    { [ 3 * ] [ 1 - ] }          "first"   pick set-at
+    { [ [ 1 - ] bi@ ] [ 2 / ] }  "second"  pick set-at
     4 6 pick values [ first call ] each
     + swap values <reversed> [ second call ] each
-] unit-test
\ No newline at end of file
+] unit-test
+
+{ V{ { "az" 1 } { "by" 2 } { "cx" 3 } } } [
+    <linked-hash>
+    1 "az" pick set-at
+    2 "by" pick set-at
+    3 "cx" pick set-at
+    >alist
+] unit-test