~ chicken-core (chicken-5) a913beac4256366b9f307034ebe55613b91efb79

commit a913beac4256366b9f307034ebe55613b91efb79
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Wed Jan 13 21:20:03 2016 +1300
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Tue Mar 8 22:52:33 2016 +1300

    Update runtests.bat for meta-syntax-test.scm changes

diff --git a/tests/runtests.bat b/tests/runtests.bat
index cd4ab526..3cc5f31b 100644
--- a/tests/runtests.bat
+++ b/tests/runtests.bat
@@ -198,13 +198,13 @@ a.out
 if errorlevel 1 exit /b 1
 
 echo ======================================== meta-syntax tests ...
-%interpret% -bnq meta-syntax-test.scm -e "(import foo)" -e "(assert (equal? '((1)) (bar 1 2)))" -e "(assert (equal? '(list 1 2 3) (listify)))"
+%interpret% -bnq meta-syntax-test.scm -e "(import foo)" -e "(assert (equal? '((1)) (bar 1 2)))" -e "(assert (equal? '(list 1 2 3) (listify)))" -e "(import test-import-syntax-for-syntax)" -e "(assert (equal? '(1) (test)))" -e "(import test-begin-for-syntax)" -e "(assert (equal? '(1) (test)))"
 if errorlevel 1 exit /b 1
 %compile_s% meta-syntax-test.scm -j foo
 if errorlevel 1 exit /b 1
 %compile_s% foo.import.scm
 if errorlevel 1 exit /b 1
-%interpret% -bnq -e "(require-library meta-syntax-test)" -e "(import foo)" -e "(assert (equal? '((1)) (bar 1 2)))" -e "(assert (equal? '(list 1 2 3) (listify)))"
+%interpret% -bnq -e "(require-library meta-syntax-test)" -e "(import foo)" -e "(assert (equal? '((1)) (bar 1 2)))" -e "(assert (equal? '(list 1 2 3) (listify)))" -e "(import test-import-syntax-for-syntax)" -e "(assert (equal? '(1) (test)))" -e "(import test-begin-for-syntax)" -e "(assert (equal? '(1) (test)))"
 if errorlevel 1 exit /b 1
 
 echo ======================================== reexport tests ...