~ chicken-core (chicken-5) a9ca6d91052ef6152227a8d5ed2b523a2076f4ea


commit a9ca6d91052ef6152227a8d5ed2b523a2076f4ea
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Mon Jul 13 10:29:48 2015 +1200
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Mon Jul 13 10:29:48 2015 +1200

    Add basic test case for `chicken-profile'

diff --git a/tests/runtests.bat b/tests/runtests.bat
index 10e04637..2af3216a 100644
--- a/tests/runtests.bat
+++ b/tests/runtests.bat
@@ -7,6 +7,7 @@ set TEST_DIR=%cd%
 set OS_NAME=WindowsNT
 
 set CHICKEN=..\chicken
+set CHICKEN_PROFILE=..\chicken-profile
 set ASMFLAGS=-Wa,-w
 set FAST_OPTIONS=-O5 -d0 -b -disable-interrupts
 set PATH=%cd%\..;%PATH%
@@ -42,6 +43,12 @@ if errorlevel 1 exit /b 1
 a.out
 if errorlevel 1 exit /b 1
 
+echo ======================================== profiler tests ...
+%compile% null.scm -profile -profile-name TEST.profile
+a.out
+%CHICKEN_PROFILE% TEST.profile
+if errorlevel 1 exit /b 1
+
 echo ======================================== scrutiny tests ...
 %compile% typematch-tests.scm -specialize -w
 if errorlevel 1 exit /b 1
diff --git a/tests/runtests.sh b/tests/runtests.sh
index c4f3e889..f4dc1a8d 100755
--- a/tests/runtests.sh
+++ b/tests/runtests.sh
@@ -48,6 +48,7 @@ done
 
 CHICKEN_REPOSITORY=${TEST_DIR}/test-repository
 CHICKEN=${TEST_DIR}/../chicken
+CHICKEN_PROFILE=${TEST_DIR}/../chicken-profile
 CHICKEN_INSTALL=${TEST_DIR}/../chicken-install
 CHICKEN_UNINSTALL=${TEST_DIR}/../chicken-uninstall
 ASMFLAGS=
@@ -85,6 +86,11 @@ echo "======================================== optimizer tests  ..."
 $compile clustering-tests.scm -clustering
 ./a.out
 
+echo "======================================== profiler tests ..."
+$compile null.scm -profile -profile-name TEST.profile
+./a.out
+$CHICKEN_PROFILE TEST.profile
+
 echo "======================================== scrutiny tests ..."
 $compile typematch-tests.scm -specialize -w
 ./a.out
Trap