Cleaning up throw values around division + faults.

common/throw_values_tests.fs

@@ -23,3 +23,54 @@ e: test-abort"
   ' test catch -2 =assert
   out: doh!
 ;e
+
+( Skip on ESP32 as not emulated. )
+DEFINED? esp 0= [IF]
+
+e: test-0/
+  123 0 ' / catch -10 =assert
+  0 =assert 123 =assert
+;e
+
+e: test-0mod
+  123 0 ' mod catch -10 =assert
+  0 =assert 123 =assert
+;e
+
+e: test-0*/
+  123 456 0 ' */ catch -10 =assert
+  0 =assert 456 =assert 123 =assert
+;e
+
+e: test-0*/mod
+  123 456 0 ' */mod catch -10 =assert
+  0 =assert 456 =assert 123 =assert
+;e
+
+e: test-0/mod
+  123 0 ' /mod catch -10 =assert
+  0 =assert 123 =assert
+;e
+
+e: test-bad-load
+  0 ' @ catch -9 =assert
+  0 =assert
+;e
+
+e: test-bad-store
+  123 0 ' ! catch -9 =assert
+  0 =assert 123 =assert
+;e
+
+( Skip on win64 because wine can't handle these, unsure why. )
+DEFINED? windows 0= cell 4 = or [IF]
+
+e: test-bad-execute
+  internals
+  0 ' call0 catch -9 =assert
+  0 =assert
+;e
+
+[THEN]
+
+[THEN]