git @ Cat's Eye Technologies Pixley / 97d0178
This looks like it might be promising as a way to unknot tower.sh. Cat's Eye Technologies 11 years ago
3 changed file(s) with 27 addition(s) and 0 deletion(s). Raw diff Collapse all Expand all
+6
-0
script/miniscm.sh less more
0 #!/bin/sh
1
2 # A wrapper script around miniscm (my fork) to get it to behave more or less
3 # how we want.
4
5 miniscm -q -e <$1
+8
-0
script/scheme-adapter.sh less more
0 #!/bin/sh
1
2 echo "(display" >tmpprog.scm
3 cat $1 >>tmpprog.scm
4 echo ") (newline)" >>tmpprog.scm
5
6 ${SCHEME_IMPL} tmpprog.scm
7
+13
-0
script/test-scheme-adapter.sh less more
0 #!/bin/sh
1
2 cat >config.markdown <<EOF
3 -> Functionality "Interpret Pixley Program" is implemented by shell command
4 -> "script/scheme-adapter.sh %(test-file)"
5 EOF
6
7 for IMPL in plt-r5rs huski tinyscheme script/miniscm.sh; do
8 echo "Testing Pixley programs as Scheme programs on ${IMPL}..."
9 SCHEME_IMPL=$IMPL falderal test config.markdown src/tests.markdown
10 done
11
12 rm -f config.markdown tmpprog.scm