use interrupts_disabled instead of enabled.
This commit is contained in:
parent
fe01f71f3e
commit
efcf162aa6
4
H/Heap.h
4
H/Heap.h
@ -123,7 +123,7 @@ typedef struct worker_local_struct {
|
|||||||
union CONSULT_OBJ *consultlow;
|
union CONSULT_OBJ *consultlow;
|
||||||
struct pred_entry *last_asserted_pred;
|
struct pred_entry *last_asserted_pred;
|
||||||
int debug_on;
|
int debug_on;
|
||||||
int interrupts_enabled;
|
int interrupts_disabled;
|
||||||
UInt consultcapacity;
|
UInt consultcapacity;
|
||||||
UInt active_signals;
|
UInt active_signals;
|
||||||
UInt i_pred_arity;
|
UInt i_pred_arity;
|
||||||
@ -688,7 +688,7 @@ extern struct various_codes *Yap_heap_regs;
|
|||||||
#define XDiff RINFO.x_diff
|
#define XDiff RINFO.x_diff
|
||||||
#define DelayDiff RINFO.delay_diff
|
#define DelayDiff RINFO.delay_diff
|
||||||
#define BaseDiff RINFO.base_diff
|
#define BaseDiff RINFO.base_diff
|
||||||
#define Yap_InterruptsEnabled Yap_heap_regs->WL.interrupts_enabled
|
#define Yap_InterruptsDisabled Yap_heap_regs->WL.interrupts_disabled
|
||||||
/* current consult stack */
|
/* current consult stack */
|
||||||
#define ConsultSp Yap_heap_regs->WL.consultsp
|
#define ConsultSp Yap_heap_regs->WL.consultsp
|
||||||
/* top of consult stack */
|
/* top of consult stack */
|
||||||
|
Reference in New Issue
Block a user