From a15c95aef01cd392100622d5ff799b54c05f463d Mon Sep 17 00:00:00 2001
From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Sat, 26 Oct 2019 16:39:43 +0200
Subject: [PATCH] tests: Add gc.test.

* tests/gc.test: New file.
* build-aux/check-mes.sh (TESTS): Add it.
* scaffold/gc-test.scm: Remove.
---
 build-aux/check-mes.sh                |  1 +
 scaffold/gc-test.scm => tests/gc.test | 12 ++++++++++++
 2 files changed, 13 insertions(+)
 rename scaffold/gc-test.scm => tests/gc.test (77%)

diff --git a/build-aux/check-mes.sh b/build-aux/check-mes.sh
index b6f92b7a..7b0c08fa 100755
--- a/build-aux/check-mes.sh
+++ b/build-aux/check-mes.sh
@@ -27,6 +27,7 @@ tests/boot.test
 tests/read.test
 tests/srfi-0.test
 tests/macro.test
+tests/gc.test
 tests/perform.test
 tests/base.test
 tests/quasiquote.test
diff --git a/scaffold/gc-test.scm b/tests/gc.test
similarity index 77%
rename from scaffold/gc-test.scm
rename to tests/gc.test
index c6a23619..bdd1002d 100644
--- a/scaffold/gc-test.scm
+++ b/tests/gc.test
@@ -1,3 +1,15 @@
+#! /bin/sh
+# -*-scheme-*-
+MES_ARENA=10000
+MES_MAX_ARENA=$MES_ARENA
+export MES_ARENA
+export MES_MAX_ARENA
+if [ "$MES" != guile ]; then
+    MES_BOOT=$0 exec ${MES-mes}
+fi
+exec ${MES-mes} --no-auto-compile -L ${0%/*} -L module -C module -e '(tests boot)' -s "$0" "$@"
+!#
+
 ;;; GNU Mes --- Maxwell Equations of Software
 ;;; Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
 ;;;