source: project/chicken/branches/hygienic/tests/runtests.sh @ 11391

Last change on this file since 11391 was 11391, checked in by felix winkelmann, 13 years ago

overhauled handling of primitives to fix indirect reexport problem reported by Jim; primitive modules now map to #%... symbols, which have a property pointing back to the original name

File size: 3.4 KB
Line 
1#!/bin/sh
2# runtests.sh
3
4set -e
5TEST_DIR=`pwd`
6export DYLD_LIBRARY_PATH=${TEST_DIR}/..
7export LD_LIBRARY_PATH=${TEST_DIR}/..
8compile="../csc -compiler ../chicken -v -I.. -L.. -include-path .. -o a.out"
9compile_s="../csc -s -compiler ../chicken -v -I.. -L.. -include-path .."
10interpret="../csi -include-path .."
11
12echo "======================================== runtime tests ..."
13$interpret -s apply-test.scm
14$compile test-gc-hooks.scm && ./a.out
15
16echo "======================================== library tests ..."
17$interpret -s library-tests.scm
18
19echo "======================================== syntax tests ..."
20$interpret -s syntax-tests.scm
21
22echo "======================================== syntax tests (compiled) ..."
23$compile syntax-tests.scm && ./a.out
24
25echo "======================================== syntax tests (matchable) ..."
26$interpret matchable.scm -s match-test.scm
27
28echo "======================================== syntax tests (loopy-loop) ..."
29$interpret -s loopy-test.scm
30
31echo "======================================== syntax tests (r5rs_pitfalls) ..."
32$interpret -i -s r5rs_pitfalls.scm
33
34echo "======================================== module tests ..."
35$interpret -include-path .. -s module-tests.scm
36
37echo "======================================== module tests (compiled) ..."
38$compile module-tests-compiled.scm && ./a.out
39
40echo "======================================== module tests (chained) ..."
41rm -f m*.import.* test-chained-modules.so
42$interpret -bnq test-chained-modules.scm
43$compile_s test-chained-modules.scm -j m3
44$compile_s m3.import.scm
45$interpret -bn test-chained-modules.so
46$interpret -bn test-chained-modules.so -e '(import m3) (s3)'
47
48echo "======================================== module tests (ec) ..."
49rm -f ec.so ec.import.*
50$interpret -bqn ec.scm ec-tests.scm
51$compile_s ec.scm -emit-import-library ec -o ec.so
52$compile_s ec.import.scm -o ec.import.so
53$interpret -bnq ec.so ec-tests.scm
54# $compile ec-tests.scm && ./a.out        # takes ages to compile
55
56echo "======================================== module tests (II) ..."
57$interpret -bnq module-tests-2.scm
58$compile module-tests-2.scm && ./a.out
59
60echo "======================================== hash-table tests ..."
61$interpret -s hash-table-tests.scm
62
63echo "======================================== port tests ..."
64$interpret -s port-tests.scm
65
66echo "======================================== fixnum tests ..."
67$compile fixnum-tests.scm && ./a.out
68
69echo "======================================== srfi-18 tests ..."
70$interpret -s srfi-18-tests.scm
71
72echo "======================================== path tests ..."
73$compile path-tests.scm && ./a.out
74
75echo "======================================== r4rstest ..."
76$interpret -e '(set! ##sys#procedure->string (constantly "#<procedure>"))' \
77  -i -s r4rstest.scm >r4rstest.log
78diff -u r4rstest.out r4rstest.log
79
80echo "======================================== locative stress test ..."
81$compile locative-stress-test.scm && ./a.out
82
83echo "======================================== embedding (1) ..."
84$compile embedded1.c && ./a.out
85
86echo "======================================== embedding (2) ..."
87$compile -e embedded2.scm && ./a.out
88
89echo "======================================== benchmarks ..."
90cd ../benchmarks
91for x in `ls *.scm`; do
92    case $x in
93        "cscbench.scm");;
94        "plists.scm");;
95        *)
96            echo $x
97            ../csc $x -compiler ../chicken -C -I.. -L.. -O2 -d0
98            ./`basename $x .scm`;;
99    esac
100done
101cd ${TEST_DIR}
102
103echo "======================================== done."
Note: See TracBrowser for help on using the repository browser.