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 bytes
  38
  39 run_test1 call
  40
  41 run_test1 at
  42
  43 run_test1 if
  44
  45 run_test1 goto
  46
  47 run_test2 fact 479001600
  48
  49 run_test1 bitwise
  50
  51 run_test1 plusminus
  52
  53 run_test1 many-vars
  54
  55 run_test1 mul
  56
  57 run_test1 div
  58
  59 run_test1 mod
  60
  61 run_test1 set-byte
  62
  63 run_test1 set-word
  64
  65 run_test1 vtable
  66
  67 run_test2 tail-calls ''
  68
  69 run_test1 99bottles
  70
  71 run_test1 gcd
  72
  73 printf 'test_output_name...'
  74 $RUBY test_output_name.rb
  75 [ $? -eq 0 ] || errors=$((errors + 1))
  76
  77 if [ $errors -eq 0 ]
  78 then
  79     echo All tests passed
  80 else
  81     echo "$errors tests failed"
  82     exit 1
  83 fi