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