mescc: Tinycc support: test #include.
authorJan Nieuwenhuizen <janneke@gnu.org>
Sat, 18 Nov 2017 10:55:47 +0000 (11:55 +0100)
committerJan Nieuwenhuizen <janneke@gnu.org>
Sat, 18 Nov 2017 10:55:47 +0000 (11:55 +0100)
* scaffold/tests/exit-42.i: New file.
* scaffold/tests/07-include.c: New file.
* make.scm ("07-include"): Build it.

make.scm
scaffold/tests/07-include.c [new file with mode: 0644]
scaffold/tests/exit-42.i [new file with mode: 0644]

index 34ad32404c69d28a4275f2e2d94cdefb179a4958..445c8da88269eeda5efe56c54bf658cbac34410a 100755 (executable)
--- a/make.scm
+++ b/make.scm
@@ -146,6 +146,7 @@ exec ${GUILE-guile} --no-auto-compile -L . -L guile -C . -C guile -s "$0" ${1+"$
 (add-scaffold-test "04-call-0" #:libc #f)
 (add-scaffold-test "05-call-1" #:libc #f #:exit 1)
 (add-scaffold-test "06-call-!1" #:libc #f)
+(add-scaffold-test "07-include" #:libc #f #:exit 42)
 
 (add-target (group "check-scaffold-tests/0" #:dependencies (filter (target-prefix? "check-scaffold/tests/0") %targets)))
 
diff --git a/scaffold/tests/07-include.c b/scaffold/tests/07-include.c
new file mode 100644 (file)
index 0000000..98da8d4
--- /dev/null
@@ -0,0 +1,27 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * Mes --- Maxwell Equations of Software
+ * Copyright © 2017 Jan Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of Mes.
+ *
+ * Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * Mes 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 General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#include "exit-42.i"
+
+int
+main ()
+{
+  return 1;
+}
diff --git a/scaffold/tests/exit-42.i b/scaffold/tests/exit-42.i
new file mode 100644 (file)
index 0000000..3efe8fa
--- /dev/null
@@ -0,0 +1,27 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * Mes --- Maxwell Equations of Software
+ * Copyright © 2017 Jan Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of Mes.
+ *
+ * Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * Mes 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 General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+main ()
+{
+  return 42;
+}
+
+#define main fubar