Merge pull request #84 from rikardn/FCOMP

Add FCOMP

testsuite/unit/math.vs

@@ -119,4 +119,118 @@ print "COMPARE"
 compare $61 $67 $1001
 print "END"
 
+print "TEST: mov MEM FAC1 const 1.0"
+fill $61 $67 FF FF FF FF FF AA
+fill $70 $70 CD
+r A=$BC
+r Y=$B9
+r PC=$BBA2
+ret
+fill $1001 $1006 81 80 00 00 00 00
+print "COMPARE"
+compare $61 $66 $1001
+compare $70 $70 $1003  ; FACOV = 0
+print "END"
+
+print "TEST: mov MEM FAC1 const -0.5"
+fill $61 $67 FF FF FF FF FF AA
+fill $70 $70 CD
+r A=$E0
+r Y=$B9
+r PC=$BBA2
+ret
+fill $1001 $1006 80 80 00 00 00 FF
+print "COMPARE"
+compare $61 $66 $1001
+compare $70 $70 $1003  ; FACOV = 0
+print "END"
+
+print "TEST: FCOMP 1.0 == 1.0"
+r A=$BC
+r Y=$B9
+r PC=$BBA2
+ret
+r A=$BC
+r Y=$B9
+r PC=$BC5B
+ret
+print "CHECK A==0"
+r
+
+print "TEST: FCOMP 1.0 > 0.5"
+r A=$BC
+r Y=$B9
+r PC=$BBA2
+ret
+r A=$11
+r Y=$BF
+r PC=$BC5B
+ret
+print "CHECK A==1"
+r
+
+print "TEST: FCOMP 0.5 < 1.0"
+r A=$11
+r Y=$BF
+r PC=$BBA2
+ret
+r A=$BC
+r Y=$B9
+r PC=$BC5B
+ret
+print "CHECK A==255"
+r
+
+print "TEST: FCOMP -0.5 < 1.0"
+r A=$E0
+r Y=$B9
+r PC=$BBA2
+ret
+r A=$BC
+r Y=$B9
+r PC=$BC5B
+ret
+print "CHECK A==255"
+r
+
+print "TEST: FCOMP 10.0 > -0.5"
+r A=$F9
+r Y=$BA
+r PC=$BBA2
+ret
+r A=$E0
+r Y=$B9
+r PC=$BC5B
+ret
+print "CHECK A==1"
+r
+
+print "TEST: FCOMP 0.9970194103661925 < 0.9970194105990231"
+fill $1001 $1005 80 7F 3C AA 01
+r A=$01
+r Y=$10
+r PC=$BBA2
+ret
+fill $1006 $100A 80 7F 3C AA 02
+r A=$06
+r Y=$10
+r PC=$BC5B
+ret
+print "CHECK A==255"
+r
+
+print "TEST: FCOMP 0.0 = 0.0"
+fill $1001 $1005 00 7F 3C AA 01
+r A=$01
+r Y=$10
+r PC=$BBA2
+ret
+fill $1006 $100A 00 7F 3C AA 02
+r A=$06
+r Y=$10
+r PC=$BC5B
+ret
+print "CHECK A==0"
+r
+
 q

testsuite/unit/testresults.cc

@@ -20,6 +20,26 @@ int main()
             } else if (line.starts_with("  print \"COMPARE")) {
                 getline(file, line);
                 in_compare = true;
+            } else if (line.starts_with("  print \"CHECK")) {
+                std::string cmp = line.substr(15, line.size() - 16);
+                std::string reg = cmp.substr(0, 1);
+                std::string op = cmp.substr(1, 2);
+                int value = std::stoi(cmp.substr(3, line.size() - 3));
+                if (op == "==") {
+                    getline(file, line);
+                    getline(file, line);
+                    getline(file, line);
+                    if (reg == "A") {
+                        int A_val = std::stoi(line.substr(7, 2), 0, 16);
+                        if (A_val != value) {
+                            std::cout << "FAIL: A != " << value << " (was " << A_val << ")" << std::endl;
+                            failed = true;
+                        }
+                    }
+                } else {
+                    std::cout << "ERROR: Unknown operator for check" << std::endl;
+                    failed = true;
+                }
             } else if (line.starts_with("  print \"END")) {
                 in_compare = false;
             }