60 lines
1.9 KiB
Clojure
60 lines
1.9 KiB
Clojure
![]() |
[{:test/label ":db.cardinality/one, insert"
|
||
|
:test/assertions
|
||
|
[[:db/add 100 :db/ident :keyword/value1]
|
||
|
[:db/add 101 :db/ident :keyword/value2]]
|
||
|
:test/expectedtransaction
|
||
|
#{[100 :db/ident :keyword/value1 ?tx1 true]
|
||
|
[101 :db/ident :keyword/value2 ?tx1 true]
|
||
|
[?tx1 :db/txInstant ?ms1 ?tx1 true]}
|
||
|
:test/expecteddatoms
|
||
|
#{[100 :db/ident :keyword/value1]
|
||
|
[101 :db/ident :keyword/value2]}}
|
||
|
|
||
|
{:test/label ":db.cardinality/many, insert"
|
||
|
:test/assertions
|
||
|
[[:db/add 200 :db.schema/attribute 100]
|
||
|
[:db/add 200 :db.schema/attribute 101]]
|
||
|
:test/expectedtransaction
|
||
|
#{[200 :db.schema/attribute 100 ?tx2 true]
|
||
|
[200 :db.schema/attribute 101 ?tx2 true]
|
||
|
[?tx2 :db/txInstant ?ms2 ?tx2 true]}
|
||
|
:test/expecteddatoms
|
||
|
#{[100 :db/ident :keyword/value1]
|
||
|
[101 :db/ident :keyword/value2]
|
||
|
[200 :db.schema/attribute 100]
|
||
|
[200 :db.schema/attribute 101]}}
|
||
|
|
||
|
{:test/label ":db.cardinality/one, retract"
|
||
|
:test/assertions
|
||
|
[[:db/retract 100 :db/ident :keyword/value1]]
|
||
|
:test/expectedtransaction
|
||
|
#{[100 :db/ident :keyword/value1 ?tx3 false]
|
||
|
[?tx3 :db/txInstant ?ms3 ?tx3 true]}
|
||
|
:test/expecteddatoms
|
||
|
#{[101 :db/ident :keyword/value2]
|
||
|
[200 :db.schema/attribute 100]
|
||
|
[200 :db.schema/attribute 101]}}
|
||
|
|
||
|
{:test/label ":db.cardinality/many, retract"
|
||
|
:test/assertions
|
||
|
[[:db/retract 200 :db.schema/attribute 100]]
|
||
|
:test/expectedtransaction
|
||
|
#{[200 :db.schema/attribute 100 ?tx4 false]
|
||
|
[?tx4 :db/txInstant ?ms4 ?tx4 true]}
|
||
|
:test/expecteddatoms
|
||
|
#{[101 :db/ident :keyword/value2]
|
||
|
[200 :db.schema/attribute 101]}
|
||
|
}
|
||
|
|
||
|
{:test/label ":db.cardinality/{one,many}, not present."
|
||
|
:test/assertions
|
||
|
[[:db/retract 100 :db/ident :keyword/value1]
|
||
|
[:db/retract 200 :db.schema/attribute 100]]
|
||
|
:test/expectedtransaction
|
||
|
#{[?tx5 :db/txInstant ?ms5 ?tx5 true]}
|
||
|
:test/expecteddatoms
|
||
|
#{[101 :db/ident :keyword/value2]
|
||
|
[200 :db.schema/attribute 101]}
|
||
|
}
|
||
|
]
|