diff --git a/make.scm b/make.scm index 34ad3240..445c8da8 100755 --- 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 index 00000000..98da8d4e --- /dev/null +++ b/scaffold/tests/07-include.c @@ -0,0 +1,27 @@ +/* -*-comment-start: "//";comment-end:""-*- + * Mes --- Maxwell Equations of Software + * Copyright © 2017 Jan Nieuwenhuizen + * + * 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 . + */ + +#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 index 00000000..3efe8fa0 --- /dev/null +++ b/scaffold/tests/exit-42.i @@ -0,0 +1,27 @@ +/* -*-comment-start: "//";comment-end:""-*- + * Mes --- Maxwell Equations of Software + * Copyright © 2017 Jan Nieuwenhuizen + * + * 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 . + */ + +int +main () +{ + return 42; +} + +#define main fubar