*** bc-1.02/execute.c	Fri Sep  3 00:42:28 1993
--- bc-1.02-amiga/execute.c	Fri Sep  3 00:38:51 1993
***************
*** 93,96 ****
--- 93,99 ----
    while (pc.pc_addr < functions[pc.pc_func].f_code_size && !runtime_error)
      {
+ #ifdef __SASC
+       chkabort();
+ #endif
        inst = byte(&pc);