test/test

   1 #! /bin/sh
   2
   3 ### Run tests
   4
   5 errors=0
   6
   7 [ -n "$RUBY" ] || RUBY=ruby
   8
   9 # run_test program expected_output
  10 run_test() {
  11     printf '%s...' "$1"
  12     output=`$2`
  13     s=$?
  14     if [ $s -ne 0 ]
  15     then
  16         echo "FAIL: exit status is $s"
  17         errors=$((errors + 1))
  18     elif [ "$output" != "$3" ]
  19     then
  20         echo "FAIL: wrong output"
  21         errors=$((errors + 1))
  22     else
  23         echo pass
  24     fi
  25 }
  26
  27 run_test2() {
  28     run_test "$1" "./$1" "$2"
  29 }
  30
  31 run_test1() {
  32     run_test2 "$1" "`cat $1.out`"
  33 }
  34
  35 run_test2 hello "Hello, world!"
  36
  37 run_test1 call
  38
  39 run_test1 if
  40
  41 run_test1 goto
  42
  43 run_test2 fact 479001600
  44
  45 run_test1 bitwise
  46
  47 run_test1 plusminus
  48
  49 run_test1 many-vars
  50
  51 run_test1 mul
  52
  53 run_test1 div
  54
  55 run_test1 mod
  56
  57 run_test1 set-byte
  58
  59 run_test1 set-word
  60
  61 run_test1 vtable
  62
  63 run_test2 tail-calls ''
  64
  65 run_test1 99bottles
  66
  67 run_test1 gcd
  68
  69 printf 'test_output_name...'
  70 $RUBY test_output_name.rb
  71 [ $? -eq 0 ] || errors=$((errors + 1))
  72
  73 if [ $errors -eq 0 ]
  74 then
  75     echo All tests passed
  76 else
  77     echo "$errors tests failed"
  78     exit 1
  79 fi