summaryrefslogtreecommitdiffstats
path: root/tests/dimension/arithexp.sh
diff options
context:
space:
mode:
authorTavian Barnes <tavianator@gmail.com>2009-11-25 02:04:15 -0500
committerTavian Barnes <tavianator@gmail.com>2009-11-25 02:04:15 -0500
commit7bbc14551b0513ec94bdac0eff0d64842fe55b2b (patch)
tree5372e3149a0d277531613b61296d99567f233f53 /tests/dimension/arithexp.sh
parent1d427193ffd38b85489b5e997faf72051305ec7a (diff)
downloaddimension-7bbc14551b0513ec94bdac0eff0d64842fe55b2b.tar.xz
Format S-expressions a bit nicer in test scripts.
Diffstat (limited to 'tests/dimension/arithexp.sh')
-rwxr-xr-xtests/dimension/arithexp.sh18
1 files changed, 16 insertions, 2 deletions
diff --git a/tests/dimension/arithexp.sh b/tests/dimension/arithexp.sh
index dc63576..24aebd8 100755
--- a/tests/dimension/arithexp.sh
+++ b/tests/dimension/arithexp.sh
@@ -20,8 +20,22 @@
#########################################################################
arithexp=$(${top_builddir}/dimension/dimension --tokenize --parse ${srcdir}/arithexp.pov)
-arithexp_exp='(sphere { < < (float "2.0") - (float "1.0") , (float "3.0") , (float "4.0") > . x , \( (float "1.0") + (integer "2") \) * (integer "2") - (integer "5") , (float "1.0") + (integer "2") * (integer "2") - (integer "4") > - - < (integer "0") , (integer "0") , (integer "1") > , (float "2.25") - (integer "1") * (integer "2") })
-((sphere (vector (float 0) (float 0) (float 0) (integer 0) (integer 0)) (float 0.25) object-modifiers))'
+arithexp_exp="$(echo -n \
+'(sphere {
+ < < (float "2.0") - (float "1.0") , (float "3.0") , (float "4.0") > . x ,
+ \( (float "1.0") + (integer "2") \) * (integer "2") - (integer "5") ,
+ (float "1.0") + (integer "2") * (integer "2") - (integer "4") >
+ -
+ - < (integer "0") , (integer "0") , (integer "1") > ,
+ (float "2.25") - (integer "1") * (integer "2")
+ })' \
+| tr '\n' ' ' | sed -r 's/[[:space:]]+/ /g')
+$(echo -n \
+'((sphere
+ (vector (float 0) (float 0) (float 0) (integer 0) (integer 0))
+ (float 0.25)
+ object-modifiers))' \
+| tr '\n' ' ' | sed -r 's/[[:space:]]+/ /g')"
if [ "$arithexp" != "$arithexp_exp" ]; then
echo "arithexp.pov parsed as \"$arithexp\"" >&2