wgaffa/deck-delta - Change 2CMLT3DIVTINEAAYNV74B7AHGYCQVEVCJTMB6NZOATJAAY4NW2MQC

Completed the diff algorithm

Second case of name comparison was adding the wrong card to a deck. Finished the last two cases for when one of quantity/category changed.

Created by wgaffa on March 20, 2024

2CMLT3DIVTINEAAYNV74B7AHGYCQVEVCJTMB6NZOATJAAY4NW2MQC

Dependencies

In channels

main

Change contents

Deletion in src/Diff.hs at line 1 [3.3955]
B:BD[3.3955] → [3.3956:4021]
```
{-# LANGUAGE TypeApplications #-}
{-# LANGUAGE TypeFamilies #-}
```

Replacement in src/Diff.hs at line 28 [3.3955]

B:BD[3.4913] → [3.4913:4971]

    let deckSort = map snd . Map.toDescList . runDeckList

[3.4913]

[3.4971]

    let deckSort = map snd . Map.toAscList . runDeckList

Replacement in src/Diff.hs at line 37 [3.3955]

B:BD[3.5320] → [3.5320:5371]

        | name x > name y = go (add x : acc) lx ys

[3.5320]

[3.5371]

        | name x > name y = go (add y : acc) lx ys

Replacement in src/Diff.hs at line 50 [3.3955]

∅:D[2.582] → [3.5656:5786]

B:BD[3.5656] → [3.5656:5786]

                (False, _) -> go (chunk (name x) [] : acc) xs ys
                (_, False) -> go (chunk (name x) [] : acc) xs ys

[2.582]

                (False, _) -> go (chunk (name x) [modifyCopies (const $ quantity y)] : acc) xs ys
                (_, False) -> go (chunk (name x) [modifyCategory (const $ category y)] : acc) xs ys