micropelago/garage
3
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

jepsen: fix set2 test omg finally this is so stupid

Browse Source
This commit is contained in:
Alex Auvolat 2023-10-25 11:50:16 +02:00
parent db921cc05f
commit cfbfa09d24
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
script/jepsen.garage/src/jepsen/garage/set.clj
View File

@ -81,7 +81,7 @@
([:invoke :read]) ([:invoke :read])
(assoc-in state [:read-must-contain (:process op)] (:add-done state)) (assoc-in state [:read-must-contain (:process op)] (:add-done state))
([:ok :read]) ([:ok :read])
(let [read-must-contain (get (:process op) (:read-must-contain state)) (let [read-must-contain (get (:read-must-contain state) (:process op))
new-missed (set/difference read-must-contain (:value op)) new-missed (set/difference read-must-contain (:value op))
new-unexpected (set/difference (:value op) (:add-started state))] new-unexpected (set/difference (:value op) (:add-started state))]
(assoc state (assoc state