Differences
This shows you the differences between two versions of the page.
Both sides previous revisionPrevious revisionNext revision | Previous revision | ||
tutorials:beginner:testing [2019/07/11 13:07] – [Setting up the infrastructure and our first test] gkazhoya | tutorials:beginner:testing [2022/03/15 10:12] (current) – [Integrating into the ASDF testing operation] schimpf | ||
---|---|---|---|
Line 100: | Line 100: | ||
<code lisp> | <code lisp> | ||
(defsystem cram-my-beginner-tutorial-tests | (defsystem cram-my-beginner-tutorial-tests | ||
- | :depends-on (cram-my-beginner-tutorial | + | :depends-on (cram-my-beginner-tutorial |
| | ||
| | ||
Line 199: | Line 199: | ||
| | ||
| | ||
- | (assert-number-equal angle pi)) | + | (assert-number-equal angle pi))) |
</ | </ | ||
- | Unfortunately, | + | Now let us rerun the tests: |
- | error if the tests fail, and ours does not. | + | |
- | In the future, we might want to tweak the library such that it does throw errors but for now just remember how the | + | <code lisp> |
- | integration with the ASDF interfaces works. | + | CL-USER> (asdf: |
- | So let us see, though, if the test actually failed: | ||
- | |||
- | <code lisp> | ||
- | CL-USER> (lisp-unit: | ||
Unit Test Summary | Unit Test Summary | ||
| 2 assertions total | | 2 assertions total | ||
Line 219: | Line 214: | ||
| 0 missing tests | | 0 missing tests | ||
- | #< | + | T |
</ | </ | ||
- | To get more detailed information, | + | To get more detailed information, |
<code lisp> | <code lisp> | ||
CL-USER> (setf lisp-unit: | CL-USER> (setf lisp-unit: | ||
T | T | ||
- | CL-USER> (lisp-unit:run-tests :all : | + | CL-USER> (asdf:test-system |
| Failed Form: PI | | Failed Form: PI | ||
| Expected 0.0d0 but saw 3.141592653589793d0 | | Expected 0.0d0 but saw 3.141592653589793d0 |