tests/syntax/identifier/runtests
author Andrey Skvortsov <andrej.skvortzov@gmail.com>
Sun, 14 Oct 2018 20:14:13 +0300
changeset 1073 24ef30a9bcee
parent 258 d7d92b2f87e9
permissions -rwxr-xr-x
revert commits improved performance of some extensible Standard Functions (ADD, MUL, AND, OR, XOR)

Following commits are reverted:
mjsousa 0b275a2 improve performance of some extensible Standard Functions (ADD, MUL, AND, OR, XOR) -- increase hardcoded limit to 499
mjsousa 2228799 improve performance of some extensible Standard Functions (ADD, MUL, AND, OR, XOR) -- Add comments!!
mjsousa ce81fa6 improve performance of some extensible Standard Functions (ADD, MUL, AND, OR, XOR)"

The reason is that they cause regression in some cases (if function is
used as argument for function block, for example) and this is not
fixed for a long time.
#!/bin/bash

# assume no error to start with...
error=0

for ff in `ls *.test`
do
  for id in `cat $ff | grep "^#" | sed "s/#[^ ]*//g"`
  do
	sed s/XXXX/$id/g $ff > $ff"_"$id.iec
	if `../../../iec2iec $ff"_"$id.iec -I ../../../lib > $ff"_"$id.out 2>$ff"_"$id.err`
	#if `../../../iec2c $ff"_"$id.iec -I ../../../lib > $ff"_"$id.out 2>$ff"_"$id.err`
		# TODO before deciding test is success [OK]
		#       - test whether xxx.out has size <> 0
		#       - test whether xxx.err has size == 0
		#       - (?) test whether xxx.out2 is identical to xxx.out
		#       - (?) test whether xxx.err2 has size == 0
		#       - perhaps produce a [WARN] instead of [ERROR] in cases of (?)
	  then echo "[ O K ]   " $ff "->" $id
	  else echo "[ERROR]   " $ff "->" $id; error=1
	fi
#	../../../iec2iec $ff"_"$id.out -I ../../../lib > $ff"_"$id.out2 2>$ff"_"$id.err2
  done
done

echo
if `test $error = 1`
  then echo "FAILURE -> At least one of the tests failed!"
  else echo "SUCCESS -> All tests passed!"
fi