From cb2cc7a81a76ab204a4bca95a517195bc34b1e5c Mon Sep 17 00:00:00 2001
From: Marius Gerbershagen <marius.gerbershagen@gmail.com>
Date: Thu, 26 Dec 2019 19:13:59 +0100
Subject: [PATCH] tests: Add stack overflow test

---
 src/tests/normal-tests/mixed.lsp | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/src/tests/normal-tests/mixed.lsp b/src/tests/normal-tests/mixed.lsp
index 586485148..3e91a7596 100644
--- a/src/tests/normal-tests/mixed.lsp
+++ b/src/tests/normal-tests/mixed.lsp
@@ -364,3 +364,11 @@
        do (is-true (funcall (cdr (elt object-table i))
                             (elt to-be-serialized i)
                             (elt deserialized i))))))
+
+;;; Date: 2019-12-26
+;;; Description:
+;;;
+;;;   Stack overflow detection and recovery
+(test mix.0018.stack-overflow
+  (signals ext:stack-overflow (labels ((f (x) (f (1+ x))))
+                                (f 1))))