diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2021-06-24 07:32:46 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-06-24 07:32:46 -0700 |
| commit | c45cb488586b0f8c54120d9eacb6491df017609b (patch) | |
| tree | bba2d774270a1cc0e3b2c636f0826363b53fcff4 /tests/common.tl | |
| parent | 2034729c70161b16d99eee0503c4354df39cd49d (diff) | |
| download | txr-c45cb488586b0f8c54120d9eacb6491df017609b.tar.gz txr-c45cb488586b0f8c54120d9eacb6491df017609b.tar.bz2 txr-c45cb488586b0f8c54120d9eacb6491df017609b.zip | |
Test for stack overflow protection.
* tests/012/stack.tl: New file.
* tets/common.tl (mvtest): New macro.
Diffstat (limited to 'tests/common.tl')
| -rw-r--r-- | tests/common.tl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/common.tl b/tests/common.tl index 4011583f..b9e46ad3 100644 --- a/tests/common.tl +++ b/tests/common.tl @@ -36,6 +36,9 @@ (defmacro mtest (. pairs) ^(progn ,*(mapcar (op cons 'test) (tuples 2 pairs)))) +(defmacro mvtest (. pairs) + ^(progn ,*(mapcar (op cons 'vtest) (tuples 2 pairs)))) + (defmacro mstest (. pairs) ^(progn ,*(mapcar (op cons 'stest) (tuples 2 pairs)))) |