diff options
| author | Tavian Barnes <tavianator@gmail.com> | 2009-10-31 14:05:02 -0400 |
|---|---|---|
| committer | Tavian Barnes <tavianator@gmail.com> | 2009-10-31 14:05:02 -0400 |
| commit | 92efb5d0d7ba0c2b49cf189d5055bc0d9b09994c (patch) | |
| tree | 8634a495a71efac721e1fae8fd2b61461fbcdea9 /tests/dimension | |
| parent | ff94c67ce80d6baf4677c4564796e163b8d6b5aa (diff) | |
| download | dimension-92efb5d0d7ba0c2b49cf189d5055bc0d9b09994c.tar.xz | |
Implement dmnsn_print_astree_sexpr().
Diffstat (limited to 'tests/dimension')
| -rwxr-xr-x | tests/dimension/box.sh | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/dimension/box.sh b/tests/dimension/box.sh index 244b6fa..7a9f754 100755 --- a/tests/dimension/box.sh +++ b/tests/dimension/box.sh @@ -19,4 +19,14 @@ # along with this program. If not, see <http://www.gnu.org/licenses/>. # ######################################################################### +box=$(${top_builddir}/dimension/dimension --tokenize --parse ${srcdir}/box.pov) +box_exp='(box { < - (float "0.125") , - (integer "1") , - (integer "1") > , < (float "0.125") , (integer "1") , (integer "1") > } box { < - (integer "1") , - (integer "1") , - (float "0.125") > , < (integer "1") , (integer "1") , (float "0.125") > }) +((box (vector (float -0.125) (float -1) (float -1)) (vector (float 0.125) (float 1) (float 1))) (box (vector (float -1) (float -1) (float -0.125)) (vector (float 1) (float 1) (float 0.125))))' + +if [ "$box" != "$box_exp" ]; then + echo "box.pov parsed as \"$box\"" >&2 + echo " -- expected \"$box_exp\"" >&2 + exit 1 +fi + ${top_builddir}/dimension/dimension -o box.png ${srcdir}/box.pov |