From 71906fb735cc3971e97a51938c4050ebb8176576 Mon Sep 17 00:00:00 2001 From: Jan Nieuwenhuizen Date: Mon, 4 Dec 2017 23:19:32 +0100 Subject: [PATCH] mescc: M4 support: scaffold/tests/82-define.c. * scaffold/tests/82-define.c: New file; inspired by M4. Thanks, Ricardo! * make.scm ("82-define"): Build it. * check-mescc.sh: Add 82-define. --- check-mescc.sh | 5 ++++- make.scm | 3 ++- scaffold/tests/82-define.c | 2 ++ 3 files changed, 8 insertions(+), 2 deletions(-) create mode 100644 scaffold/tests/82-define.c diff --git a/check-mescc.sh b/check-mescc.sh index fc6a2045..3fba6974 100755 --- a/check-mescc.sh +++ b/check-mescc.sh @@ -76,10 +76,13 @@ t 7l-struct-any-size-array 7m-struct-char-array-assign 7n-struct-struct-array +80-setjmp +81-qsort +82-define " if [ ! -x ./i686-unknown-linux-gnu-tcc ]; then - tests=$(echo "$tests" | grep -Ev "02-return-1|05-call-1") + tests=$(echo "$tests" | grep -Ev "02-return-1|05-call-1|80-setjmp|81-qsort") fi set +e diff --git a/make.scm b/make.scm index 4dc4c2e3..4e3f403f 100755 --- a/make.scm +++ b/make.scm @@ -260,7 +260,8 @@ exec ${GUILE-guile} --no-auto-compile -L . -L guile -C . -C guile -s "$0" ${1+"$ (for-each (cut add-scaffold-test <> #:libc libc+tcc-mes.hex2 #:libc-gcc libc+tcc-gcc.mlibc-o) '("80-setjmp" - "81-qsort")) + "81-qsort" + "82-define")) (add-target (group "check-scaffold-tests/8" #:dependencies (filter (target-prefix? "check-scaffold/tests/8") %targets))) diff --git a/scaffold/tests/82-define.c b/scaffold/tests/82-define.c new file mode 100644 index 00000000..735fb178 --- /dev/null +++ b/scaffold/tests/82-define.c @@ -0,0 +1,2 @@ +#define A AA AB AC AD AE AF AG AH AI AJ AK AL AM AN AO AP AQ AR AS AT AU AV AW AX AY AZ BA BB BC BD BE BF BG BH BI BJ BK BL BM BN BO BP BQ BR BS BT BU BV BW BX BY BZ CA CB CC CD CE CF CG CH CI CJ CK CL CM CN CO CP CQ CR CS CT CU CV CW CX CY CZ DA DB DC DD DE DF DG DH DI DJ DK DL DM DN DO DP +int main () { return 0; }