mirror of
https://github.com/emilybache/GildedRose-Refactoring-Kata.git
synced 2025-12-12 04:12:13 +00:00
14 lines
401 B
Plaintext
14 lines
401 B
Plaintext
(defmodule gilded-rose-test
|
|
(behaviour ltest-unit)
|
|
(export all)
|
|
(import (from gilded-rose
|
|
(update-quality 1))))
|
|
|
|
(include-lib "ltest/include/ltest-macros.lfe")
|
|
|
|
(include-lib "include/gilded-rose-item.lfe")
|
|
|
|
(deftest update-quality-test
|
|
(is-equal "fixme" (item-name (car (update-quality
|
|
(list (make-item name "foo" sellin 0 quality 0)))))))
|