Refactor fault handling.

2023-01-14 22:28:38 -08:00
parent f8cfaedc84
commit 2f79192ea0
9 changed files with 110 additions and 79 deletions
--- a/windows/interp.h
+++ b/windows/interp.h
@ -62,13 +62,7 @@ work:
        }
      }
    } __except (1) {
-      rp = *g_sys->throw_handler;
-      *g_sys->throw_handler = (cell_t *) *rp--;
-      sp = (cell_t *) *rp--;
-      fp = (float *) *rp--;
-      ip = (cell_t *) *rp--;
-      --sp;
-      tos = GetExceptionCode();
+      THROWIT(GetExceptionCode());
    }
  }
 }