mirror of
https://github.com/emilybache/GildedRose-Refactoring-Kata.git
synced 2025-12-12 04:12:13 +00:00
10 lines
256 B
Plaintext
10 lines
256 B
Plaintext
(import ../gilded-rose/main)
|
|
(use judge)
|
|
|
|
(do
|
|
(def items
|
|
[@{ :name "foo" :quality 3 :sell-in 5}
|
|
@{ :name "bar" :quality 6 :sell-in 6}])
|
|
(main/update-quality items)
|
|
(def found (find |(= ($ :quality) 2) items))
|
|
(test (found :name) "fixme")) |