diff --git a/STATUS.md b/STATUS.md index a04bca38..5a10b83a 100644 --- a/STATUS.md +++ b/STATUS.md @@ -227,7 +227,7 @@ Floating point mathematical routines - not official, but well known and broadly | `$BBCA` | `mov_r_FAC1_TMP1` | PARTIAL | not fully tested yet | | `$BBD0` | `mov_r_FAC1_VAR` | PARTIAL | not fully tested yet | | `$BBD4` | `mov_r_FAC1_MEM` | PARTIAL | not fully tested yet | -| `$BBFC` | `mov_FAC2_FAC1` | PARTIAL | not fully tested yet | +| `$BBFC` | `mov_FAC2_FAC1` | DONE | | | `$BC0C` | `mov_r_FAC1_FAC2` | PARTIAL | not fully tested yet | | `$BC0F` | `mov_FAC1_FAC2` | DONE | | | `$BC1B` | `round_FAC1` | PARTIAL | not fully tested yet | diff --git a/testsuite/unit/math.vs b/testsuite/unit/math.vs index 390910dc..7e4e530f 100644 --- a/testsuite/unit/math.vs +++ b/testsuite/unit/math.vs @@ -33,6 +33,20 @@ print "COMPARE" compare $E2EA $E2EE $1001 print "END" +print "TEST: mov FAC2 FAC1 0.9970194103661925" +fill $61 $66 FF FF FF FF FF AA +fill $70 $70 CD +fill $69 $6E 80 7F 3C AA 01 00 +r A=$BC +r Y=$B9 +r PC=$BBFC +ret +fill $1001 $1006 81 80 00 00 00 00 +print "COMPARE" +compare $61 $66 $69 +compare $70 $70 $6E ; FACOV = 0 +print "END" + print "TEST: convert_A_to_FAC1 A=0" r A=0 r PC=$BC3C