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.
This commit is contained in:
Jan Nieuwenhuizen 2017-12-04 23:19:32 +01:00
parent 53695b6124
commit 71906fb735
3 changed files with 8 additions and 2 deletions

View file

@ -76,10 +76,13 @@ t
7l-struct-any-size-array 7l-struct-any-size-array
7m-struct-char-array-assign 7m-struct-char-array-assign
7n-struct-struct-array 7n-struct-struct-array
80-setjmp
81-qsort
82-define
" "
if [ ! -x ./i686-unknown-linux-gnu-tcc ]; then 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 fi
set +e set +e

View file

@ -260,7 +260,8 @@ exec ${GUILE-guile} --no-auto-compile -L . -L guile -C . -C guile -s "$0" ${1+"$
(for-each (for-each
(cut add-scaffold-test <> #:libc libc+tcc-mes.hex2 #:libc-gcc libc+tcc-gcc.mlibc-o) (cut add-scaffold-test <> #:libc libc+tcc-mes.hex2 #:libc-gcc libc+tcc-gcc.mlibc-o)
'("80-setjmp" '("80-setjmp"
"81-qsort")) "81-qsort"
"82-define"))
(add-target (group "check-scaffold-tests/8" #:dependencies (filter (target-prefix? "check-scaffold/tests/8") %targets))) (add-target (group "check-scaffold-tests/8" #:dependencies (filter (target-prefix? "check-scaffold/tests/8") %targets)))

View file

@ -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; }