From f3adf180edbf6ebe642cf4c1ad8f029ce0876d0d Mon Sep 17 00:00:00 2001 From: Mike Gran
Date: Tue, 26 Feb 2013 08:27:22 -0800 Subject: [PATCH] Add standalone test for smob marking * test-suite/standalone/Makefile.am: add test-smob-mark * test-suite/standalone/test-smob-mark.c: new test * test-suite/standalone/.gitignore: ignore test-smob-mark --- test-suite/standalone/.gitignore | 2 + test-suite/standalone/Makefile.am | 6 ++ test-suite/standalone/test-smob-mark.c | 118 +++++++++++++++++++++++++++++++++ 3 files changed, 126 insertions(+) create mode 100644 test-suite/standalone/test-smob-mark.c diff --git a/test-suite/standalone/.gitignore b/test-suite/standalone/.gitignore index 794146e..db0794b 100644 --- a/test-suite/standalone/.gitignore +++ b/test-suite/standalone/.gitignore @@ -13,3 +13,5 @@ /test-scm-take-u8vector /test-loose-ends /test-srfi-1 +/test-smob-mark + diff --git a/test-suite/standalone/Makefile.am b/test-suite/standalone/Makefile.am index be5d913..8190e59 100644 --- a/test-suite/standalone/Makefile.am +++ b/test-suite/standalone/Makefile.am @@ -251,4 +251,10 @@ EXTRA_DIST += test-with-guile-module.c test-scm-with-guile.c endif +test_smob_mark_SOURCES = test-smob-mark.c +test_smob_mark_CFLAGS = ${test_cflags} +test_smob_mark_LDADD = $(LIBGUILE_LDADD) +check_PROGRAMS += test-smob-mark +TESTS += test-smob-mark + EXTRA_DIST += ${check_SCRIPTS} diff --git a/test-suite/standalone/test-smob-mark.c b/test-suite/standalone/test-smob-mark.c new file mode 100644 index 0000000..d97ef25 --- /dev/null +++ b/test-suite/standalone/test-smob-mark.c @@ -0,0 +1,118 @@ +/* Copyright (C) 2013 Free Software Foundation, Inc. + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public License + * as published by the Free Software Foundation; either version 3 of + * the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, but + * WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library; if not, write to the Free Software + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA + * 02110-1301 USA + */ + +#if HAVE_CONFIG_H +#include