main_testing5/bfc_test.sh
changeset 348 b5b6ed38c2f2
parent 286 5c57c407e27b
child 352 97bcf8efe4e0
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/main_testing5/bfc_test.sh	Mon Nov 02 13:10:02 2020 +0000
@@ -0,0 +1,107 @@
+#!/bin/bash
+set -e
+
+out=${1:-output}
+
+echo -e "" > $out
+
+echo -e "Below is the feedback for your submission of CW 10, Part 2." >> $out
+echo -e "" >> $out
+
+# compilation tests
+
+function scala_compile {
+  (ulimit -t 30; JAVA_OPTS="-Xmx1g" scala -Xprint:parser "$1" 2> c$out 1> c$out)
+}
+
+# functional tests
+
+function scala_assert {
+  (ulimit -t 30; JAVA_OPTS="-Xmx1g" scala -i "$1" -- "$2" -e "" 2> /dev/null 1> /dev/null)
+}
+
+# purity test
+
+function scala_vars {
+   (egrep '\bvar\b|\breturn\b|\.par\.|\.par |ListBuffer|mutable|util.control|new Array' c$out 2> /dev/null 1> /dev/null)
+}
+
+
+
+
+# compilation test
+echo -e "bfc.scala runs?" >> $out
+
+if (scala_compile bfc.scala)
+then
+    echo -e "  --> success" >> $out
+    tsts1=$(( 0 ))
+else
+    echo -e "  -->   --> SCALA DID NOT RUN BFC.SCALA\n" >> $out
+    tsts1=$(( 1 )) 
+fi
+
+
+# var, return, ListBuffer test
+#
+if [ $tsts1 -eq 0 ]
+then
+    echo -e "bfc.scala does not contain vars, returns etc?" >> $out
+
+    if (scala_vars bfc.scala)
+    then
+	echo -e "   --> FAIL (make triple-sure your program conforms to the required format)" >> $out  
+	tsts1=$(( 1 ))
+    else
+	echo -e "  --> success" >> $out
+	tsts1=$(( 0 )) 
+    fi
+fi
+
+### bfc tests
+
+if [ $tsts1 -eq 0 ]
+then
+  echo -e " jtable(\"\"\"+++++[->++++++++++<]>--<+++[->>++++++++++<<]>>++<<----------[+>.>.<+<]\"\"\") ==" >> $out
+  echo -e "     Map(69 -> 61, 5 -> 20, 60 -> 70, 27 -> 44, 43 -> 28, 19 -> 6)" >> $out  
+  
+  if (scala_assert "bfc.scala" "bf_test5.scala")
+  then
+    echo -e "  --> success" >> $out
+  else
+    echo -e "  --> \n ONE TEST FAILED\n" >> $out
+  fi
+fi
+
+
+
+if [ $tsts1 -eq 0 ]
+then
+  echo -e " optimise(load_bff(\"benchmark.bf\")).length == 181" >> $out
+  echo -e " optimise(load_bff(\"mandelbrot.bf\")).length == 11205" >> $out  
+  
+  if (scala_assert "bfc.scala" "bf_test6.scala")
+  then
+    echo -e "  --> success" >> $out
+  else
+    echo -e "  --> \n ONE TEST FAILED\n" >> $out
+  fi
+fi
+
+
+
+if [ $tsts1 -eq 0 ]
+then
+    echo -e " combine(optimise(load_bff(\"benchmark.bf\"))).length == 134" >> $out
+    echo -e " combine(optimise(load_bff(\"mandelbrot.bf\"))).length == 6511" >> $out
+  
+  if (scala_assert "bfc.scala" "bf_test7.scala")
+  then
+    echo -e "  --> success" >> $out
+  else
+    echo -e "  --> \n ONE TEST FAILED\n" >> $out   
+  fi
+fi
+
+
+