tests/dstore.min
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 |
'min-test require :test ;;; "dstore" test.describe ("dstore.json" dsinit type "dict:datastore" ==) test.assert ( "dstore.json" dsread :ds ds "tests" {} 1 "test1" dict.set 2 "test2" dict.set dspost dswrite "tests" (stack.pop true) dsquery size 1 == ) test.assert ( "dstore.json" dsread :ds ds "tests/aaa" {} 1 "test1" dict.set 3 "test3" dict.set dsput dswrite "tests" ("test1" dict.get 1 ==) dsquery size 2 == ) test.assert ( "dstore.json" dsread :ds ds "tests/aaa" dsdelete "tests" ("id" dict.get "aaa" ==) dsquery size 0 == ) test.assert "dstore.json" rm test.report stack.clear |