diff options
| author | Tavian Barnes <tavianator@gmail.com> | 2009-11-25 02:04:15 -0500 |
|---|---|---|
| committer | Tavian Barnes <tavianator@gmail.com> | 2009-11-25 02:04:15 -0500 |
| commit | 7bbc14551b0513ec94bdac0eff0d64842fe55b2b (patch) | |
| tree | 5372e3149a0d277531613b61296d99567f233f53 /tests/dimension/demo.sh | |
| parent | 1d427193ffd38b85489b5e997faf72051305ec7a (diff) | |
| download | dimension-7bbc14551b0513ec94bdac0eff0d64842fe55b2b.tar.xz | |
Format S-expressions a bit nicer in test scripts.
Diffstat (limited to 'tests/dimension/demo.sh')
| -rwxr-xr-x | tests/dimension/demo.sh | 24 |
1 files changed, 22 insertions, 2 deletions
diff --git a/tests/dimension/demo.sh b/tests/dimension/demo.sh index da3548a..0e0303a 100755 --- a/tests/dimension/demo.sh +++ b/tests/dimension/demo.sh @@ -20,8 +20,28 @@ ######################################################################### demo=$(${top_builddir}/dimension/dimension --tokenize --parse ${srcdir}/demo.pov) -demo_exp='(box { < - (integer "1") , - (integer "1") , - (integer "1") > , < (integer "1") , (integer "1") , (integer "1") > rotate < (integer "45") , (integer "0") , (integer "0") > } sphere { < (integer "0") , (integer "0") , (integer "0") > , (float "1.25") }) -((box (vector (integer -1) (integer -1) (integer -1) (integer 0) (integer 0)) (vector (integer 1) (integer 1) (integer 1) (integer 0) (integer 0)) (object-modifiers (rotate (vector (integer 45) (integer 0) (integer 0) (integer 0) (integer 0))))) (sphere (vector (integer 0) (integer 0) (integer 0) (integer 0) (integer 0)) (float 1.25) object-modifiers))' +demo_exp="$(echo -n \ +'(box { + < - (integer "1") , - (integer "1") , - (integer "1") > , + < (integer "1") , (integer "1") , (integer "1") > + rotate < (integer "45") , (integer "0") , (integer "0") > + } + sphere { + < (integer "0") , (integer "0") , (integer "0") > , (float "1.25") + })' \ +| tr '\n' ' ' | sed -r 's/[[:space:]]+/ /g') +$(echo -n \ +'((box + (vector (integer -1) (integer -1) (integer -1) (integer 0) (integer 0)) + (vector (integer 1) (integer 1) (integer 1) (integer 0) (integer 0)) + (object-modifiers + (rotate (vector (integer 45) (integer 0) (integer 0) (integer 0) + (integer 0))))) + (sphere + (vector (integer 0) (integer 0) (integer 0) (integer 0) (integer 0)) + (float 1.25) + object-modifiers))' \ +| tr '\n' ' ' | sed -r 's/[[:space:]]+/ /g')" if [ "$demo" != "$demo_exp" ]; then echo "demo.pov parsed as \"$demo\"" >&2 |