tests/zpt-new.sh

   1 #!/bin/sh
   2
   3 function dotest {
   4   inname="$1"
   5   name=`basename "$inname" .asm`
   6   #pasmo "$inname" "${name}.raw"
   7   #res=$?
   8   #if [ $res != 0 ]; then
   9   #  echo "PASMO FAILED: $name"
  10   #  exit 1
  11   #fi
  12   urasm --raw "$inname"
  13   if [ $res != 0 ]; then
  14     echo "URASM-OLD FAILED: $name"
  15     exit 1
  16   fi
  17   mv "${name}_0100.bin" "${name}.raw"
  18   urasm-new --org100h --raw "$inname"
  19   cmp -b "${name}.raw" "${name}_0100.bin"
  20   res=$?
  21   if [ $res = 0 ]; then
  22     rm "${name}.raw"
  23     mv "${name}_0100.bin" _out/
  24     echo "*** RESULT: OK"
  25   else
  26     echo "************************* FAILED!"
  27     exit 1
  28   fi
  29 }
  30
  31
  32 mkdir _out 2>/dev/null
  33
  34 if [ $# -eq 0 ]; then
  35   for asrc in *.asm; do
  36     dotest "$asrc"
  37   done
  38 else
  39   while [ $# -ne 0 ]; do
  40     dotest "$1"
  41     shift
  42   done
  43 fi