The clunit2 Reference Manual

Table of Contents

The clunit2 Reference Manual

This is the clunit2 Reference Manual, version 0.2.4, generated automatically by Declt version 2.4 "Will Decker" on Wed Jun 20 11:35:43 2018 GMT+0.

1 Introduction

* CLUnit

* Overview

CLUnit is a  Common Lisp unit testing framework. It  is designed to be
easy to use so that you can quickly start testing.

- Author: Tapiwa Gutu
- Maintainer of this fork: cage

CLUnit provides  a rich set of  features aimed at improving  your unit
testing experience:

+ Multiple inheritance for test suites  allows you to group tests into
  hierarchies.
+ Composes the test results of each test run into a single report.
+ Allows redefinition of inline functions and macros without having to
  redefine your tests.
+ Supports composable test suite fixtures.
+ Allows for an interactive testing  process which gives you access to
  the test environment.
+ Provides visual feedback of the unit test progress.
+ Extensible test reporting. Builtin support for default reporting and
  [[http://en.wikipedia.org/wiki/Test_Anything_Protocol]["Test Anything Protocol" (TAP)]] output.
+ Released under MIT license

Check out the comprehensive [[http://tgutu.github.com/clunit][CLUnit Tutorial]].

* Example

#+BEGIN_SRC lisp
  (ql:quickload "clunit")
  (use-package :clunit)

  ;; Test suite for all number operation tests.
  (defsuite NumberSuite ())

  ;; Test suite for floating point operations
  (defsuite FloatSuite (NumberSuite))

  (defsuite IntegerSuite (NumberSuite))

  ;; Define a test called TEST-INT1
  (deftest test-int1 (IntegerSuite)
    (assert-true  (= 1 1))
    (assert-equalp 4 (+ 2 2)))

  ;; Define a test called TEST-FLOAT1
  (deftest test-float1 (FloatSuite)
    (assert-true (= 1.0 -1.0))
    (assert-equalp 4.0 (+ 2.0 2.0)))

  (print (run-suite 'NumberSuite))

#+END_SRC

which produces the output:

#+BEGIN_SRC
PROGRESS:
=========

    NUMBERSUITE: (Test Suite)

        INTEGERSUITE: (Test Suite)
            TEST-INT1: ..

        FLOATSUITE: (Test Suite)
            TEST-FLOAT1: F.

FAILURE DETAILS:
================

    NUMBERSUITE -> FLOATSUITE: (Test Suite)
        TEST-FLOAT1: Expression: (= 1.0 -1.0)
                     Expected: T
                     Returned: NIL


SUMMARY:
========
    Test functions:
        Executed: 2
        Skipped:  0

    Tested 4 assertions.
        Passed: 3/4 ( 75.0%)
        Failed: 1/4 ( 25.0%)
#+END_SRC

(if you  are entering  forms in  the REPL, the  ``print`` form  is not
usually needed).

# Tests and assertions

Each  test, like  ``test-int1`` in  the above  example, can  contain a
number of assertions, given in the table below:

|-------------------------------------------+----------------------|
| Assertion                                 | Description          |
|-------------------------------------------+----------------------|
|                                           | <20>                 |
| ``assert-true EXPRESSION``                | Passes if the expression ``EXPRESSION`` is not ``NIL`` |
| ``assert-false EXPRESSION``               | Passes if ``EXPRESSION`` is ``NIL`` |
| ``assert-eq VALUE EXPRESSION``            | Passes if ``(EQ VALUE EXPRESSION)`` returns true |
| ``assert-eql VALUE EXPRESSION``           | Passes if ``(EQL VALUE EXPRESSION)`` returns true |
| ``assert-equal VALUE EXPRESSION``         | Passes if ``(EQUAL VALUE EXPRESSION)`` returns true |
| ``assert-equalp VALUE EXPRESSION``        | Passes if ``(EQUALP VALUE EXPRESSION)`` returns true |
| ``assert-equality TEST VALUE EXPRESSION`` | Passes if ``(FUNCALL TEST VALUE EXPRESSION)`` returns true |
| ``assert-equality* VALUE EXPRESSION``     | Passes if  ``(FUNCALL \*clunit-equality-test\* VALUE EXPRESSION)`` returns true. By default *clunit-equality-test* is ``EQUALP`` |
| ``assert-expands EXPANSION EXPRESSION``   | Tests macro expansion, passes if ``(EQUALP EXPANSION (MACROEXPAND-1 EXPRESSION))`` is true |
| ``assert-condition CONDITION EXPRESSION`` | Passes if ``EXPRESSION`` signals ``CONDITION`` |
| ``assert-fails FORMAT-STRING``            | Force test to fail, giving a format string for the message |
|-------------------------------------------+----------------------|


All  of these  tests  take  optional forms,  which  are evaluated  and
printed  if  the test  fails.   These  can  be  used to  provide  test
diagnostics or documentation. For example

#+BEGIN_SRC lisp
  (deftest test-suiteless ()
    (let ((a 1) (b 2) (c 3))
      (assert-true (= a b c) "This assertion is meant to fail." a b c )))

  (run-test 'test-suiteless :report-progress nil)
#+END_SRC

produces the output:

#+BEGIN_SRC
FAILURE DETAILS:
================
    TEST-SUITELESS: Expression: (= A B C)
                    Expected: T
                    Returned: NIL
                    This assertion is meant to fail.
                    A => 1
                    B => 2
                    C => 3

SUMMARY:
========
    Test functions:
        Executed: 1
        Skipped:  0

    Tested 1 assertion.
        Passed: 0/1 (  0.0%)
        Failed: 1/1 (100.0%)
        Errors: 0/1 (  0.0%)
#+END_SRC

(if not in a REPL, you may have to print the return value of ``run-test``).

* Notes

This  is a  fork of https://github.com/tgutu/clunit .

2 Systems

The main system appears first, followed by any subsystem dependency.

2.1 clunit2

Author

Tapiwa Gutu <tgutu@ml.sun.ac.za>

Contact

cage@katamail.com

Bug Tracker

https://notabug.org/cage/clunit2/issues

License

BSD

Description

CLUnit is a Common Lisp unit testing framework.

Long Description

CLUnit is a Common Lisp unit testing framework. It is designed to be easy to use so that you can quickly start testing.

CLUnit provides a rich set of features aimed at improving your unit
testing experience:

* Multiple inheritance for test suites allows you to group tests into hierarchies.
* Composes the test results of each test run into a single report.
* Allows redefinition of inline functions and macros without
having to redefine your tests.
* Supports composable test suite fixtures.
* Allows for an interactive testing process which gives you access to the test environment.
* Provides visual feedback of the unit test progress.
* Extensible test reporting. Builtin support for default reporting and TAP output.

Version

0.2.4

Source

clunit2.asd (file)

Component

src (module)

3 Modules

Modules are listed depth-first from the system components tree.

3.1 clunit2/src

Parent

clunit2 (system)

Location

src/

Components

• package.lisp (file)
• specials.lisp (file)
• classes (module)
• functions (module)
• report-formats (module)
• macros (module)

3.2 clunit2/src/classes

Dependency

specials.lisp (file)

Parent

src (module)

Location

src/classes/

Components

• assertion-conditions.lisp (file)
• clunit-report.lisp (file)
• clunit-test-case.lisp (file)
• clunit-test-suite.lisp (file)
• clunit-test-report.lisp (file)

3.3 clunit2/src/functions

Dependency

classes (module)

Parent

src (module)

Location

src/functions/

Components

• assertion-functions.lisp (file)
• generic-functions.lisp (file)
• test-case-functions.lisp (file)
• test-suite-functions.lisp (file)
• rerun-failed-tests.lisp (file)
• progress-report-functions.lisp (file)

3.4 clunit2/src/report-formats

Dependency

functions (module)

Parent

src (module)

Location

src/report-formats/

Components

• report-format-default.lisp (file)
• report-format-tap.lisp (file)
• print-object.lisp (file)

3.5 clunit2/src/macros

Dependency

report-formats (module)

Parent

src (module)

Location

src/macros/

Components

• utility-macros.lisp (file)
• assertion-macros.lisp (file)
• deffixture.lisp (file)
• defsuite.lisp (file)
• deftest.lisp (file)

4 Files

Files are sorted by type and then listed depth-first from the systems components trees.

4.1 Lisp

4.1.1 clunit2.asd

Location

clunit2.asd

Systems

clunit2 (system)

4.1.2 clunit2/src/package.lisp

Parent

src (module)

Location

src/package.lisp

Packages

clunit

4.1.3 clunit2/src/specials.lisp

Dependency

package.lisp (file)

Parent

src (module)

Location

src/specials.lisp

Exported Definitions

• *clunit-equality-test* (special variable)
• *clunit-report-format* (special variable)

Internal Definitions

• *clunit-report* (special variable)
• *clunit-test-report* (special variable)
• *last-clunit-report* (special variable)
• *queued-test-reports* (special variable)
• *report-progress* (special variable)
• *stop-on-fail* (special variable)
• *suite-name* (special variable)
• *tab-width* (special variable)
• *test-case-hashtable* (special variable)
• *test-name* (special variable)
• *test-suite-hashtable* (special variable)
• *use-debugger* (special variable)

4.1.4 clunit2/src/classes/assertion-conditions.lisp

Parent

classes (module)

Location

src/classes/assertion-conditions.lisp

Internal Definitions

• assertion-condition (condition)
• assertion-error (condition)
• assertion-fail-forced (condition)
• assertion-failed (condition)
• assertion-passed (condition)

4.1.5 clunit2/src/classes/clunit-report.lisp

Parent

classes (module)

Location

src/classes/clunit-report.lisp

Exported Definitions

• clunit-report (class)
• test-reports (method)

4.1.6 clunit2/src/classes/clunit-test-case.lisp

Parent

classes (module)

Location

src/classes/clunit-test-case.lisp

Internal Definitions

clunit-test-case (class)

4.1.7 clunit2/src/classes/clunit-test-suite.lisp

Parent

classes (module)

Location

src/classes/clunit-test-suite.lisp

Internal Definitions

clunit-test-suite (class)

4.1.8 clunit2/src/classes/clunit-test-report.lisp

Parent

classes (module)

Location

src/classes/clunit-test-report.lisp

Exported Definitions

• clunit-test-report (class)
• test-report-name (method)
• test-report-passed-p (method)

4.1.9 clunit2/src/functions/assertion-functions.lisp

Parent

functions (module)

Location

src/functions/assertion-functions.lisp

Internal Definitions

• handle-assertion (function)
• handle-error (function)
• signal-assertion (function)

4.1.10 clunit2/src/functions/generic-functions.lisp

Parent

functions (module)

Location

src/functions/generic-functions.lisp

Internal Definitions

• expand-fixture (generic function)
• expand-fixture (method)
• print-format (generic function)

4.1.11 clunit2/src/functions/test-case-functions.lisp

Parent

functions (module)

Location

src/functions/test-case-functions.lisp

Exported Definitions

• defined-test-p (function)
• get-defined-tests (function)
• run-test (function)

Internal Definitions

• delete-test-case (function)
• execute-test-case (function)
• get-test-case (function)
• (setf get-test-case) (function)
• process-queued-tests (function)
• queue-test-case (function)
• skip-test-case (function)
• test-case-execution-action (function)

4.1.12 clunit2/src/functions/test-suite-functions.lisp

Parent

functions (module)

Location

src/functions/test-suite-functions.lisp

Exported Definitions

• defined-suite-p (function)
• get-child-suites (function)
• get-child-tests (function)
• get-defined-suites (function)
• run-suite (function)

Internal Definitions

• delete-test-suite (function)
• execute-test-suite (function)
• get-test-suite (function)
• (setf get-test-suite) (function)

4.1.13 clunit2/src/functions/rerun-failed-tests.lisp

Parent

functions (module)

Location

src/functions/rerun-failed-tests.lisp

Exported Definitions

rerun-failed-tests (function)

4.1.14 clunit2/src/functions/progress-report-functions.lisp

Parent

functions (module)

Location

src/functions/progress-report-functions.lisp

Internal Definitions

• report-assertion-progress (function)
• report-suite-progress (function)
• report-test-progress (function)

4.1.15 clunit2/src/report-formats/report-format-default.lisp

Parent

report-formats (module)

Location

src/report-formats/report-format-default.lisp

Internal Definitions

• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)

4.1.16 clunit2/src/report-formats/report-format-tap.lisp

Parent

report-formats (module)

Location

src/report-formats/report-format-tap.lisp

Internal Definitions

• *tap-test-num* (special variable)
• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)

4.1.17 clunit2/src/report-formats/print-object.lisp

Parent

report-formats (module)

Location

src/report-formats/print-object.lisp

4.1.18 clunit2/src/macros/utility-macros.lisp

Parent

macros (module)

Location

src/macros/utility-macros.lisp

Internal Definitions

• with-assert-restart (macro)
• with-gensyms (macro)
• with-test-restart (macro)

4.1.19 clunit2/src/macros/assertion-macros.lisp

Dependency

utility-macros.lisp (file)

Parent

macros (module)

Location

src/macros/assertion-macros.lisp

Exported Definitions

• assert-condition (macro)
• assert-eq (macro)
• assert-eql (macro)
• assert-equal (macro)
• assert-equality (macro)
• assert-equality* (macro)
• assert-equalp (macro)
• assert-expands (macro)
• assert-fail (function)
• assert-false (macro)
• assert-true (macro)

Internal Definitions

• assertion-expander (function)
• form-expander (function)

4.1.20 clunit2/src/macros/deffixture.lisp

Dependency

assertion-macros.lisp (file)

Parent

macros (module)

Location

src/macros/deffixture.lisp

Exported Definitions

• deffixture (macro)
• undeffixture (macro)

4.1.21 clunit2/src/macros/defsuite.lisp

Dependency

deffixture.lisp (file)

Parent

macros (module)

Location

src/macros/defsuite.lisp

Exported Definitions

• defsuite (macro)
• undefsuite (macro)

4.1.22 clunit2/src/macros/deftest.lisp

Dependency

defsuite.lisp (file)

Parent

macros (module)

Location

src/macros/deftest.lisp

Exported Definitions

• deftest (macro)
• undeftest (macro)

5 Packages

Packages are listed by definition order.

5.1 clunit

Source

package.lisp (file)

Use List

common-lisp

Exported Definitions

• *clunit-equality-test* (special variable)
• *clunit-report-format* (special variable)
• assert-condition (macro)
• assert-eq (macro)
• assert-eql (macro)
• assert-equal (macro)
• assert-equality (macro)
• assert-equality* (macro)
• assert-equalp (macro)
• assert-expands (macro)
• assert-fail (function)
• assert-false (macro)
• assert-true (macro)
• clunit-report (class)
• clunit-test-report (class)
• deffixture (macro)
• defined-suite-p (function)
• defined-test-p (function)
• defsuite (macro)
• deftest (macro)
• get-child-suites (function)
• get-child-tests (function)
• get-defined-suites (function)
• get-defined-tests (function)
• rerun-failed-tests (function)
• run-suite (function)
• run-test (function)
• test-report-name (generic function)
• test-report-name (method)
• test-report-passed-p (generic function)
• test-report-passed-p (method)
• test-reports (generic function)
• test-reports (method)
• undeffixture (macro)
• undefsuite (macro)
• undeftest (macro)

Internal Definitions

• *clunit-report* (special variable)
• *clunit-test-report* (special variable)
• *last-clunit-report* (special variable)
• *queued-test-reports* (special variable)
• *report-progress* (special variable)
• *stop-on-fail* (special variable)
• *suite-name* (special variable)
• *tab-width* (special variable)
• *tap-test-num* (special variable)
• *test-case-hashtable* (special variable)
• *test-name* (special variable)
• *test-suite-hashtable* (special variable)
• *use-debugger* (special variable)
• assertion-condition (condition)
• assertion-error (condition)
• assertion-expander (function)
• assertion-fail-forced (condition)
• assertion-failed (condition)
• assertion-passed (condition)
• clunit-test-case (class)
• clunit-test-suite (class)
• delete-test-case (function)
• delete-test-suite (function)
• execute-test-case (function)
• execute-test-suite (function)
• expand-fixture (generic function)
• expand-fixture (method)
• form-expander (function)
• get-test-case (function)
• (setf get-test-case) (function)
• get-test-suite (function)
• (setf get-test-suite) (function)
• handle-assertion (function)
• handle-error (function)
• print-format (generic function)
• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)
• print-format (method)
• process-queued-tests (function)
• queue-test-case (function)
• report-assertion-progress (function)
• report-suite-progress (function)
• report-test-progress (function)
• signal-assertion (function)
• skip-test-case (function)
• test-case-execution-action (function)
• with-assert-restart (macro)
• with-gensyms (macro)
• with-test-restart (macro)

6 Definitions

Definitions are sorted by export status, category, package, and then by lexicographic order.

6.1 Exported definitions

6.1.1 Special variables

Special Variable: *clunit-equality-test*

The equality test used to compare values by the ASSERT-EQUALITY macro.

Package

clunit

Source

specials.lisp (file)

Special Variable: *clunit-report-format*

Controls the output format of the unit test results. Possible values are :default, :tap or NIL.

Package

clunit

Source

specials.lisp (file)

6.1.2 Macros

Macro: assert-condition CONDITION EXPRESSION &body FORMS

Evaluates EXPRESSION as an assertion, an assertion passes if EXPRESSION signals CONDITION. FORMS and their values are printed if the test fails.

Package

clunit

Source

assertion-macros.lisp (file)

Macro: assert-eq VALUE EXPRESSION &body FORMS

Evaluates EXPRESSION as an assertion, an assertion passes if (EQ VALUE EXPRESSION) returns true. FORMS and their values are printed if the test fails.

Package

clunit

Source

assertion-macros.lisp (file)

Macro: assert-eql VALUE EXPRESSION &body FORMS

Evaluates EXPRESSION as an assertion, an assertion passes if (EQL VALUE EXPRESSION) returns true. FORMS and their values are printed if the test fails.

Package

clunit

Source

assertion-macros.lisp (file)

Macro: assert-equal VALUE EXPRESSION &body FORMS

Evaluates EXPRESSION as an assertion, an assertion passes if (EQUAL VALUE EXPRESSION) returns true. FORMS and their values are printed if the test fails.

Package

clunit

Source

assertion-macros.lisp (file)

Macro: assert-equality TEST VALUE EXPRESSION &body FORMS

Evaluates EXPRESSION as an assertion, an assertion passes if (FUNCALL TEST VALUE EXPRESSION) returns true. FORMS and their values are printed if the test fails.

Package

clunit

Source

assertion-macros.lisp (file)

Macro: assert-equality* VALUE EXPRESSION &body FORMS

Evaluates EXPRESSION as an assertion, an assertion passes if (FUNCALL *clunit-equality-test* VALUE EXPRESSION) returns true. FORMS and their values are printed if the test fails.

Package

clunit

Source

assertion-macros.lisp (file)

Macro: assert-equalp VALUE EXPRESSION &body FORMS

Evaluates EXPRESSION as an assertion, an assertion passes if (EQUALP VALUE EXPRESSION) returns true. FORMS and their values are printed if the test fails.

Package

clunit

Source

assertion-macros.lisp (file)

Macro: assert-expands EXPANSION EXPRESSION &body FORMS

Evaluates EXPRESSION as an assertion, an assertion passes if (EQUALP EXPANSION (MACROEXPAND-1 EXPRESSION)) returns true. FORMS and their values are printed if the test fails.

Package

clunit

Source

assertion-macros.lisp (file)

Macro: assert-false EXPRESSION &body FORMS

Evaluates EXPRESSION as an assertion, an assertion passes if it returns false. FORMS and their values are printed if the test fails.

Package

clunit

Source

assertion-macros.lisp (file)

Macro: assert-true EXPRESSION &body FORMS

Evaluates EXPRESSION as an assertion, an assertion passes if it returns any non-NIL value. FORMS and their values are printed if the test fails. Remember in Common Lisp any non-NIL value is true, if you want a strict binary assertion test use (assert-eq t expression) instead.

Package

clunit

Source

assertion-macros.lisp (file)

Macro: deffixture SUITE (PLUG) &body BODY

A fixture defines a code template that is wrapped around the code of each test case and test suite that are executed by test suite SUITE at runtime.. The test case body is plugged into the template at the position identified by PLUG.

Fixtures are expanded at runtime, so the fixture that will wrap around a test depends on the test suite call stack.

Package

clunit

Source

deffixture.lisp (file)

Macro: defsuite NAME PARENTS

Defines a test suite called NAME. If PARENTS is non-NIL the test suite is defined as a sub-suite of each of the test suites in PARENTS.

Package

clunit

Source

defsuite.lisp (file)

Macro: deftest NAME DECLARATIONS &body BODY

Defines a test case called NAME. DECLARATIONS declares which test suites this test case is associated with as well as any other test cases that it depends on. The test case body is revaluated on each run, so any redefinition of macros and inline functions will be automatically visible without having to redefine the test.

Package

clunit

Source

deftest.lisp (file)

Macro: undeffixture NAME

Remove a fixture definition.

Package

clunit

Source

deffixture.lisp (file)

Macro: undefsuite NAME

Package

clunit

Source

defsuite.lisp (file)

Macro: undeftest NAME

Package

clunit

Source

deftest.lisp (file)

6.1.3 Functions

Function: assert-fail FORMAT-STRING &rest ARGS

Package

clunit

Source

assertion-macros.lisp (file)

Function: defined-suite-p SUITE-NAME

Returns T if a test suite called SUITE-NAME is defined, otherwise returns NIL.

Package

clunit

Source

test-suite-functions.lisp (file)

Function: defined-test-p TEST-NAME

Returns T if a test case called TEST-NAME is defined, otherwise returns NIL.

Package

clunit

Source

test-case-functions.lisp (file)

Function: get-child-suites SUITE-NAME

Returns a list of all test suite names that are children of the suite called SUITE-NAME.

Package

clunit

Source

test-suite-functions.lisp (file)

Function: get-child-tests SUITE-NAME

Returns a list of all test case names that are children of the suite called SUITE-NAME.

Package

clunit

Source

test-suite-functions.lisp (file)

Function: get-defined-suites ()

Returns a list of all defined test suite names.

Package

clunit

Source

test-suite-functions.lisp (file)

Function: get-defined-tests ()

Returns a list of all defined test case names.

Package

clunit

Source

test-case-functions.lisp (file)

Function: rerun-failed-tests &key USE-DEBUGGER REPORT-PROGRESS STOP-ON-FAIL LAST-REPORT

Reruns all failed tests recorded in LAST-REPORT which defaults to the report of the previous test run. If REPORT-PROGRESS is non-NIL, the test progress is reported. If USE-DEBUGGER is non-NIL, the debugger is invoked whenever an assertion fails.

If STOP-ON-FAIL is non-NIL, the rest of the unit test is cancelled when any assertion fails or an error occurs.

Package

clunit

Source

rerun-failed-tests.lisp (file)

Function: run-suite SUITE &key USE-DEBUGGER REPORT-PROGRESS STOP-ON-FAIL

Executes a test case called SUITE. If REPORT-PROGRESS is non-NIL, the test progress is reported. If USE-DEBUGGER is non-NIL, the debugger is invoked whenever an assertion fails. If STOP-ON-FAIL is non-NIL, the rest of the unit test is cancelled when any assertion fails or an error occurs.

Package

clunit

Source

test-suite-functions.lisp (file)

Function: run-test TEST &key USE-DEBUGGER REPORT-PROGRESS STOP-ON-FAIL

Executes a test case called TEST. If REPORT-PROGRESS is non-NIL, the test progress is reported. If USE-DEBUGGER is non-NIL, the debugger is invoked whenever an assertion fails. If STOP-ON-FAIL is non-NIL, the rest of the unit test is cancelled when any assertion fails or an error occurs.

Package

clunit

Source

test-case-functions.lisp (file)

6.1.4 Generic functions

Generic Function: test-report-name OBJECT

Package

clunit

Methods

Method: test-report-name (CLUNIT-TEST-REPORT clunit-test-report)

the reader function is used in test-case-execution-action (see utility functions)

Source

clunit-test-report.lisp (file)

Generic Function: test-report-passed-p OBJECT

Package

clunit

Methods

Method: test-report-passed-p (CLUNIT-TEST-REPORT clunit-test-report)

automatically generated reader method

Source

clunit-test-report.lisp (file)

Generic Function: test-reports OBJECT

Package

clunit

Methods

Method: test-reports (CLUNIT-REPORT clunit-report)

automatically generated reader method

Source

clunit-report.lisp (file)

6.1.5 Classes

Class: clunit-report ()

the clunit-report instance is used to store the aggregated reports of all executed test cases.

Package

clunit

Source

clunit-report.lisp (file)

Direct superclasses

standard-object (class)

Direct methods

• print-object (method)
• print-format (method)
• print-format (method)
• test-reports (method)

Direct slots

Slot: errors

Initargs

:errors

Initform

0

Slot: failed

Initargs

:failed

Initform

0

Slot: passed

Initargs

:passed

Initform

0

Slot: skipped

Initargs

:skipped

Initform

0

Slot: test-reports

Initform

(list)

Readers

test-reports (generic function)

Class: clunit-test-report ()

Package

clunit

Source

clunit-test-report.lisp (file)

Direct superclasses

standard-object (class)

Direct methods

• print-object (method)
• print-format (method)
• print-format (method)
• test-report-passed-p (method)
• test-report-name (method)

Direct slots

Slot: test-name

the reader function is used in test-case-execution-action (see utility functions)

Initargs

:test-name

Readers

test-report-name (generic function)

Slot: passed-p

Initargs

:passed-p

Initform

t

Readers

test-report-passed-p (generic function)

Slot: skipped-p

Initargs

:skipped-p

Slot: suite-list

Initargs

:suite-list

Initform

(list)

Slot: assertion-conditions

the clunit-test-report instance is used to store the report information for each executed test case.

Initform

(list)

6.2 Internal definitions

6.2.1 Special variables

Special Variable: *clunit-report*

Holds a CLUNIT-REPORT object during a test run, used to store aggregated test reports.

Package

clunit

Source

specials.lisp (file)

Special Variable: *clunit-test-report*

Holds a CLUNIT-TEST-REPORT object for each executing test case.

Package

clunit

Source

specials.lisp (file)

Special Variable: *last-clunit-report*

Holds the last returned CLUNIT-REPORT object. Default optional argument to the function RERUN-FAILED-TESTS.

Package

clunit

Source

specials.lisp (file)

Special Variable: *queued-test-reports*

A list of queued CLUNIT-TEST-REPORT objects whose test case execution has been deferred until their dependencies requirements are met.

Package

clunit

Source

specials.lisp (file)

Special Variable: *report-progress*

This variable switches on progress reporting if set to true.

Package

clunit

Source

specials.lisp (file)

Special Variable: *stop-on-fail*

If any assertion fails or an error condition occurs, stop the unit test.

Package

clunit

Source

specials.lisp (file)

Special Variable: *suite-name*

Holds a list of suite symbol names in their current calling order. First called suite at the front, currently executing suite at the back.

Package

clunit

Source

specials.lisp (file)

Special Variable: *tab-width*

Number of tab columns to use for indentation (in the reporting functions).

Package

clunit

Source

specials.lisp (file)

Special Variable: *tap-test-num*

Counter used in these printing functions

Package

clunit

Source

report-format-tap.lisp (file)

Special Variable: *test-case-hashtable*

Holds CLUNIT-TEST-CASE instances. The key of each test case object is the symbol name.

Package

clunit

Source

specials.lisp (file)

Special Variable: *test-name*

Holds the name of the test currently executing.

Package

clunit

Source

specials.lisp (file)

Special Variable: *test-suite-hashtable*

Holds CLUNIT-TEST-SUITE instances. The key of each test suite object is the symbol name.

Package

clunit

Source

specials.lisp (file)

Special Variable: *use-debugger*

If set to true, the debugger is invoked whenever an assertion fails.

Package

clunit

Source

specials.lisp (file)

6.2.2 Macros

Macro: with-assert-restart &body BODY

WITH-ASSERT-RESTART places a restart called SKIP-ASSERTION around an assertion form.

Package

clunit

Source

utility-macros.lisp (file)

Macro: with-gensyms SYMS &body BODY

WITH-GENSYMS takes a list of symbols SYM and a list of body forms. It returns a LET clause with each symbol in SYM bound to a gensymbol and the body forms as the body of the let clause.

Package

clunit

Source

utility-macros.lisp (file)

Macro: with-test-restart &body BODY

Package

clunit

Source

utility-macros.lisp (file)

6.2.3 Functions

Function: assertion-expander &key RESULT TEST RESULT-EXPRESSION REPORT-EXPRESSION EXPECTED FORMS

Expands an assertion macro call.

Package

clunit

Source

assertion-macros.lisp (file)

Function: delete-test-case NAME

Deletes the TEST-CASE instance associated with the key NAME in the hash table *TEST-CASES*

Package

clunit

Source

test-case-functions.lisp (file)

Function: delete-test-suite NAME

Deletes the TEST-SUITE instance associated with the key NAME in the hash table *TEST-SUITES*

Package

clunit

Source

test-suite-functions.lisp (file)

Function: execute-test-case TEST-CASE

Package

clunit

Source

test-case-functions.lisp (file)

Function: execute-test-suite TEST-SUITE

Package

clunit

Source

test-suite-functions.lisp (file)

Function: form-expander FORMS

Package

clunit

Source

assertion-macros.lisp (file)

Function: get-test-case NAME

Retrieves the TEST-CASE instance associated with the key NAME in the hash table *TEST-CASES*

Package

clunit

Source

test-case-functions.lisp (file)

Writer

(setf get-test-case) (function)

Function: (setf get-test-case) NEW-TEST-CASE NAME

Adds NEW-TEST-CASE in the hash table *TEST-CASES* under the key NAME.

Package

clunit

Source

test-case-functions.lisp (file)

Reader

get-test-case (function)

Function: get-test-suite NAME

Retrieves the TEST-SUITE instance associated with the key NAME in the hash table *TEST-SUITES*

Package

clunit

Source

test-suite-functions.lisp (file)

Writer

(setf get-test-suite) (function)

Function: (setf get-test-suite) NEW-TEST-SUITE NAME

Adds NEW-TEST-SUITE in the hash table *TEST-SUITES* under the key NAME.

Package

clunit

Source

test-suite-functions.lisp (file)

Reader

get-test-suite (function)

Function: handle-assertion CONDITION

Records the result of assertion tests and records any errors that occur.

Package

clunit

Source

assertion-functions.lisp (file)

Function: handle-error ERROR

Package

clunit

Source

assertion-functions.lisp (file)

Function: process-queued-tests ()

Package

clunit

Source

test-case-functions.lisp (file)

Function: queue-test-case ()

Package

clunit

Source

test-case-functions.lisp (file)

Function: report-assertion-progress TYPE

Package

clunit

Source

progress-report-functions.lisp (file)

Function: report-suite-progress SUITE SUITE-LIST

Package

clunit

Source

progress-report-functions.lisp (file)

Function: report-test-progress TEST-NAME SUITE-LIST

Package

clunit

Source

progress-report-functions.lisp (file)

Function: signal-assertion TYPE &key EXPRESSION EXPECTED RETURNED FORMS MESSAGE FORMAT-STRING ARGS

Package

clunit

Source

assertion-functions.lisp (file)

Function: skip-test-case ()

Package

clunit

Source

test-case-functions.lisp (file)

Function: test-case-execution-action TEST-CASE

Determines the execution action for TEST-CASE. If test case has no dependencies or pending dependencies, then :RUN is returned.

If test case has another test case it depends on that failed or was skipped, then :SKIP is returned.

If test case depends on test cases that have not yet run or are also queued, then :QUEUE is returned.

Package

clunit

Source

test-case-functions.lisp (file)

6.2.4 Generic functions

Generic Function: expand-fixture SUITE BODY

Expands out a fixture body for the given test suite.

Package

clunit

Source

generic-functions.lisp (file)

Methods

Method: expand-fixture SUITE BODY

Generic Function: print-format OBJECT FORMAT STREAM

Outputs the OBJECT report to STREAM in the given FORMAT. FORMAT can be :default, :tap or NIL.

Package

clunit

Source

generic-functions.lisp (file)

Methods

Method: print-format (CONDITION assertion-fail-forced) (FORMAT (eql tap)) STREAM

Source

report-format-tap.lisp (file)

Method: print-format (CONDITION assertion-failed) (FORMAT (eql tap)) STREAM

Source

report-format-tap.lisp (file)

Method: print-format (CONDITION assertion-error) (FORMAT (eql tap)) STREAM

Source

report-format-tap.lisp (file)

Method: print-format (REPORT clunit-test-report) (FORMAT (eql tap)) STREAM

Source

report-format-tap.lisp (file)

Method: print-format (CLUNIT-REPORT clunit-report) (FORMAT (eql tap)) STREAM

Source

report-format-tap.lisp (file)

Method: print-format (CONDITION assertion-fail-forced) (FORMAT (eql default)) STREAM

Source

report-format-default.lisp (file)

Method: print-format (CONDITION assertion-failed) (FORMAT (eql default)) STREAM

Source

report-format-default.lisp (file)

Method: print-format (CONDITION assertion-error) (FORMAT (eql default)) STREAM

Source

report-format-default.lisp (file)

Method: print-format (REPORT clunit-test-report) (FORMAT (eql default)) STREAM

Source

report-format-default.lisp (file)

Method: print-format (CLUNIT-REPORT clunit-report) (FORMAT (eql default)) STREAM

Source

report-format-default.lisp (file)

6.2.5 Conditions

Condition: assertion-condition ()

Package

clunit

Source

assertion-conditions.lisp (file)

Direct superclasses

condition (condition)

Direct subclasses

• assertion-passed (condition)
• assertion-error (condition)
• assertion-failed (condition)
• assertion-fail-forced (condition)

Direct methods

print-object (method)

Condition: assertion-error ()

Package

clunit

Source

assertion-conditions.lisp (file)

Direct superclasses

assertion-condition (condition)

Direct methods

• print-format (method)
• print-format (method)

Direct slots

Slot: message

this is a special case, if an unexpected condition
is signalled outside an assertion test, store the condition description here.

Initargs

:message

Initform

(quote "")

Condition: assertion-fail-forced ()

Package

clunit

Source

assertion-conditions.lisp (file)

Direct superclasses

assertion-condition (condition)

Direct methods

• print-format (method)
• print-format (method)

Direct slots

Slot: format-string

the format string argument passed to format.

Initargs

:format-string

Initform

(quote "")

Slot: args

the format string arguments.

Initargs

:args

Initform

(quote "")

Condition: assertion-failed ()

Package

clunit

Source

assertion-conditions.lisp (file)

Direct superclasses

assertion-condition (condition)

Direct methods

• print-format (method)
• print-format (method)

Direct slots

Slot: expression

the expression that was tested.

Initargs

:expression

Initform

(quote nil)

Slot: forms

holds a list of form-value pairs, see function expand-forms for more detail.

Initargs

:forms

Initform

(quote nil)

Slot: expected

the value the expression was expected to return.

Initargs

:expected

Initform

(quote nil)

Slot: returned

the result that was returned from evaluating the expression.

Initargs

:returned

Initform

(quote nil)

Condition: assertion-passed ()

Package

clunit

Source

assertion-conditions.lisp (file)

Direct superclasses

assertion-condition (condition)

6.2.6 Classes

Class: clunit-test-case ()

Package

clunit

Source

clunit-test-case.lisp (file)

Direct superclasses

standard-object (class)

Direct slots

Slot: name

Initargs

:name

Slot: dependencies

The DEPENDENCIES slot holds the names of the test cases that
this test case depends on. Using an indirect reference like this allows us to easily undefine a test case without much cleaning up.

When we execute a test case and we resolve the references of the tests it depends on. If the object is not found it means the reference is now stale, so we remove the name from the list.

Initargs

:dependencies

Initform

(list)

Slot: test-function

Initargs

:test-function

Class: clunit-test-suite ()

The slots test-cases, child-suites and
parent-suites hold the symbol names of test cases and test suites instead of the actual objects. using an indirect reference like this allows us to undefine a test case or test suite.

When we execute a test suite and try to resolve the reference for an object. if the object is not found, it means the reference is now stale so the name of that test case or suite is removed.

Package

clunit

Source

clunit-test-suite.lisp (file)

Direct superclasses

standard-object (class)

Direct slots

Slot: name

Initargs

:name

Slot: test-cases

Initargs

:test-cases

Initform

(list)

Slot: child-suites

Initargs

:child-suites

Initform

(list)

Appendix A Indexes

A.1 Concepts

A.2 Functions

A.3 Variables

A.4 Data types