mirror of
https://github.com/emilybache/GildedRose-Refactoring-Kata.git
synced 2025-12-12 04:12:13 +00:00
8 lines
207 B
Scheme
8 lines
207 B
Scheme
(include "assert.scm")
|
|
(include "gilded-rose.scm")
|
|
|
|
(test-case "foo"
|
|
(let ((items (list (make-item "foo" 0 0))))
|
|
(update-quality items)
|
|
(assert-string= "fixme" (item-name (car items)))))
|