Skip to content

Commit 0436497

Browse files
eliotmirandaeliotmiranda
committed
CogVm source as per VMMaker.oscog-eem.2905
Cogit: extend the assert in cogMethodContaining: to handle interruption at backward branches. Rename ceCheckForInterrupts to ceCheckForInterrupt to match Cogit's ceCheckForInterruptTrampoline inst var. SoundPlugin/SmartSyntaxPlugin Slang:Fix a compile-time warning due to a bad cast of firstIndexableField: for WordsOrBytes parameters.
1 parent a783502 commit 0436497

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

51 files changed

+571
-459
lines changed

‎nsspur64src/vm/cogit.h‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11
/* Automatically generated by
2-
CCodeGenerator VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b
2+
CCodeGenerator VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc
33
*/
44

55

‎nsspur64src/vm/cogitARMv8.c‎

Lines changed: 10 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -1,10 +1,10 @@
11
/* Automatically generated by
2-
CCodeGenerator VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b
2+
CCodeGenerator VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc
33
from
4-
StackToRegisterMappingCogit VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b
4+
StackToRegisterMappingCogit VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc
55
CogARMv8Compiler ClosedVMMaker-eem.114 uuid: 627f25e2-a361-4576-9e60-755e07bdf13e
66
*/
7-
static char __buildInfo[] = "StackToRegisterMappingCogit VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b\n\
7+
static char __buildInfo[] = "StackToRegisterMappingCogit VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc\n\
88
CogARMv8Compiler ClosedVMMaker-eem.114 uuid: 627f25e2-a361-4576-9e60-755e07bdf13e " __DATE__ ;
99
char *__cogitBuildInfo = __buildInfo;
1010

@@ -2691,6 +2691,7 @@ void (*realCEEnterCogCodePopReceiverReg)(void);
26912691
#define breakOnImplicitReceiver() (traceFlags & 64)
26922692
#define ceBaseFrameReturnPC() ceBaseFrameReturnTrampoline
26932693
#define ceCannotResumePC() ((usqInt)ceCannotResumeTrampoline)
2694+
#define ceCheckForInterruptTrampoline() ceCheckForInterruptTrampoline
26942695
#define ceReturnToInterpreterPC() ((usqInt)ceReturnToInterpreterTrampoline)
26952696
#define codeByteAtput(address,value) byteAtput((address) + codeToDataDelta, value)
26962697
#define codeLong32Atput(address,value) long32Atput((address) + codeToDataDelta, value)
@@ -11926,7 +11927,7 @@ generateRunTimeTrampolines(void)
1192611927
/* begin gen:operand:literal: */
1192711928
operandTwo = instructionPointerAddress();
1192811929
checkLiteralforInstruction(operandTwo, genoperandoperand(MoveRAw, LinkReg, operandTwo));
11929-
ceCheckForInterruptTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceCheckForInterrupts, "ceCheckForInterruptsTrampoline", 0, null, null, null, null, 0 /* emptyRegisterMask */, 0, NoReg, 1);
11930+
ceCheckForInterruptTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceCheckForInterrupt, "ceCheckForInterruptTrampoline", 0, null, null, null, null, 0 /* emptyRegisterMask */, 0, NoReg, 1);
1193011931
ceFetchContextInstVarTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceContextinstVar, "ceFetchContextInstVarTrampoline", 2, ReceiverResultReg, SendNumArgsReg, null, null, 0 /* emptyRegisterMask */, 1, SendNumArgsReg, 0);
1193111932
ceStoreContextInstVarTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceContextinstVarvalue, "ceStoreContextInstVarTrampoline", 3, ReceiverResultReg, SendNumArgsReg, ClassReg, null, 0 /* emptyRegisterMask */, 1, ReceiverResultReg, 0);
1193211933

@@ -16612,14 +16613,15 @@ cogMethodContaining(usqInt mcpc)
1661216613
}
1661316614
assert(mcpc < (limitZony()));
1661416615
cogMethod = ((CogMethod *) baseAddress);
16615-
while (cogMethod < mcpc) {
16616+
while ((((usqInt)cogMethod)) < mcpc) {
1661616617
prevMethod = cogMethod;
1661716618
cogMethod = ((CogMethod *) (roundUpToMethodAlignment(backEnd(), (((sqInt)cogMethod)) + ((cogMethod->blockSize)))));
1661816619
}
1661916620
assert((prevMethod != null)
16620-
&& (((mcpc == (((usqInt)prevMethod))) + ((prevMethod->stackCheckOffset)))
16621-
|| (((primitiveIndexOfMethodheader((prevMethod->methodObject), (prevMethod->methodHeader))) > 0)
16622-
&& (isCallPrecedingReturnPC(backEnd(), mcpc)))));
16621+
&& ((mcpc == ((((usqInt)prevMethod)) + ((prevMethod->stackCheckOffset))))
16622+
|| ((isCallPrecedingReturnPC(backEnd(), mcpc))
16623+
&& (((primitiveIndexOfMethodheader((prevMethod->methodObject), (prevMethod->methodHeader))) > 0)
16624+
|| ((callTargetFromReturnAddress(backEnd(), mcpc)) == (ceCheckForInterruptTrampoline()))))));
1662316625
return prevMethod;
1662416626
}
1662516627

‎nsspur64src/vm/cogitX64SysV.c‎

Lines changed: 10 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -1,9 +1,9 @@
11
/* Automatically generated by
2-
CCodeGenerator VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b
2+
CCodeGenerator VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc
33
from
4-
StackToRegisterMappingCogit VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b
4+
StackToRegisterMappingCogit VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc
55
*/
6-
static char __buildInfo[] = "StackToRegisterMappingCogit VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b " __DATE__ ;
6+
static char __buildInfo[] = "StackToRegisterMappingCogit VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc " __DATE__ ;
77
char *__cogitBuildInfo = __buildInfo;
88

99

@@ -2610,6 +2610,7 @@ void (*realCEEnterCogCodePopReceiverReg)(void);
26102610
#define breakOnImplicitReceiver() (traceFlags & 64)
26112611
#define ceBaseFrameReturnPC() ceBaseFrameReturnTrampoline
26122612
#define ceCannotResumePC() ((usqInt)ceCannotResumeTrampoline)
2613+
#define ceCheckForInterruptTrampoline() ceCheckForInterruptTrampoline
26132614
#define ceReturnToInterpreterPC() ((usqInt)ceReturnToInterpreterTrampoline)
26142615
#define codeByteAtput(address,value) byteAtput((address) + codeToDataDelta, value)
26152616
#define codeLong32Atput(address,value) long32Atput((address) + codeToDataDelta, value)
@@ -7604,7 +7605,7 @@ generateRunTimeTrampolines(void)
76047605
/* begin checkLiteral:forInstruction: */
76057606
instructionPointerAddress();
76067607
anInstruction1 = genoperandoperand(MoveRAw, TempReg, instructionPointerAddress());
7607-
ceCheckForInterruptTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceCheckForInterrupts, "ceCheckForInterruptsTrampoline", 0, null, null, null, null, 0 /* emptyRegisterMask */, 0, NoReg, 1);
7608+
ceCheckForInterruptTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceCheckForInterrupt, "ceCheckForInterruptTrampoline", 0, null, null, null, null, 0 /* emptyRegisterMask */, 0, NoReg, 1);
76087609
ceFetchContextInstVarTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceContextinstVar, "ceFetchContextInstVarTrampoline", 2, ReceiverResultReg, SendNumArgsReg, null, null, 0 /* emptyRegisterMask */, 1, SendNumArgsReg, 0);
76097610
ceStoreContextInstVarTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceContextinstVarvalue, "ceStoreContextInstVarTrampoline", 3, ReceiverResultReg, SendNumArgsReg, ClassReg, null, 0 /* emptyRegisterMask */, 1, ReceiverResultReg, 0);
76107611

@@ -12104,14 +12105,15 @@ cogMethodContaining(usqInt mcpc)
1210412105
}
1210512106
assert(mcpc < (limitZony()));
1210612107
cogMethod = ((CogMethod *) baseAddress);
12107-
while (cogMethod < mcpc) {
12108+
while ((((usqInt)cogMethod)) < mcpc) {
1210812109
prevMethod = cogMethod;
1210912110
cogMethod = ((CogMethod *) (roundUpToMethodAlignment(backEnd(), (((sqInt)cogMethod)) + ((cogMethod->blockSize)))));
1211012111
}
1211112112
assert((prevMethod != null)
12112-
&& (((mcpc == (((usqInt)prevMethod))) + ((prevMethod->stackCheckOffset)))
12113-
|| (((primitiveIndexOfMethodheader((prevMethod->methodObject), (prevMethod->methodHeader))) > 0)
12114-
&& (isCallPrecedingReturnPC(backEnd(), mcpc)))));
12113+
&& ((mcpc == ((((usqInt)prevMethod)) + ((prevMethod->stackCheckOffset))))
12114+
|| ((isCallPrecedingReturnPC(backEnd(), mcpc))
12115+
&& (((primitiveIndexOfMethodheader((prevMethod->methodObject), (prevMethod->methodHeader))) > 0)
12116+
|| ((callTargetFromReturnAddress(backEnd(), mcpc)) == (ceCheckForInterruptTrampoline()))))));
1211512117
return prevMethod;
1211612118
}
1211712119

‎nsspur64src/vm/cogitX64WIN64.c‎

Lines changed: 10 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -1,9 +1,9 @@
11
/* Automatically generated by
2-
CCodeGenerator VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b
2+
CCodeGenerator VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc
33
from
4-
StackToRegisterMappingCogit VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b
4+
StackToRegisterMappingCogit VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc
55
*/
6-
static char __buildInfo[] = "StackToRegisterMappingCogit VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b " __DATE__ ;
6+
static char __buildInfo[] = "StackToRegisterMappingCogit VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc " __DATE__ ;
77
char *__cogitBuildInfo = __buildInfo;
88

99

@@ -2610,6 +2610,7 @@ void (*realCEEnterCogCodePopReceiverReg)(void);
26102610
#define breakOnImplicitReceiver() (traceFlags & 64)
26112611
#define ceBaseFrameReturnPC() ceBaseFrameReturnTrampoline
26122612
#define ceCannotResumePC() ((usqInt)ceCannotResumeTrampoline)
2613+
#define ceCheckForInterruptTrampoline() ceCheckForInterruptTrampoline
26132614
#define ceReturnToInterpreterPC() ((usqInt)ceReturnToInterpreterTrampoline)
26142615
#define codeByteAtput(address,value) byteAtput((address) + codeToDataDelta, value)
26152616
#define codeLong32Atput(address,value) long32Atput((address) + codeToDataDelta, value)
@@ -7612,7 +7613,7 @@ generateRunTimeTrampolines(void)
76127613
/* begin checkLiteral:forInstruction: */
76137614
instructionPointerAddress();
76147615
anInstruction1 = genoperandoperand(MoveRAw, TempReg, instructionPointerAddress());
7615-
ceCheckForInterruptTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceCheckForInterrupts, "ceCheckForInterruptsTrampoline", 0, null, null, null, null, 0 /* emptyRegisterMask */, 0, NoReg, 1);
7616+
ceCheckForInterruptTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceCheckForInterrupt, "ceCheckForInterruptTrampoline", 0, null, null, null, null, 0 /* emptyRegisterMask */, 0, NoReg, 1);
76167617
ceFetchContextInstVarTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceContextinstVar, "ceFetchContextInstVarTrampoline", 2, ReceiverResultReg, SendNumArgsReg, null, null, 0 /* emptyRegisterMask */, 1, SendNumArgsReg, 0);
76177618
ceStoreContextInstVarTrampoline = genTrampolineForcallednumArgsargargargargregsToSavepushLinkRegresultRegappendOpcodes(ceContextinstVarvalue, "ceStoreContextInstVarTrampoline", 3, ReceiverResultReg, SendNumArgsReg, ClassReg, null, 0 /* emptyRegisterMask */, 1, ReceiverResultReg, 0);
76187619

@@ -12122,14 +12123,15 @@ cogMethodContaining(usqInt mcpc)
1212212123
}
1212312124
assert(mcpc < (limitZony()));
1212412125
cogMethod = ((CogMethod *) baseAddress);
12125-
while (cogMethod < mcpc) {
12126+
while ((((usqInt)cogMethod)) < mcpc) {
1212612127
prevMethod = cogMethod;
1212712128
cogMethod = ((CogMethod *) (roundUpToMethodAlignment(backEnd(), (((sqInt)cogMethod)) + ((cogMethod->blockSize)))));
1212812129
}
1212912130
assert((prevMethod != null)
12130-
&& (((mcpc == (((usqInt)prevMethod))) + ((prevMethod->stackCheckOffset)))
12131-
|| (((primitiveIndexOfMethodheader((prevMethod->methodObject), (prevMethod->methodHeader))) > 0)
12132-
&& (isCallPrecedingReturnPC(backEnd(), mcpc)))));
12131+
&& ((mcpc == ((((usqInt)prevMethod)) + ((prevMethod->stackCheckOffset))))
12132+
|| ((isCallPrecedingReturnPC(backEnd(), mcpc))
12133+
&& (((primitiveIndexOfMethodheader((prevMethod->methodObject), (prevMethod->methodHeader))) > 0)
12134+
|| ((callTargetFromReturnAddress(backEnd(), mcpc)) == (ceCheckForInterruptTrampoline()))))));
1213312135
return prevMethod;
1213412136
}
1213512137

‎nsspur64src/vm/cointerp.c‎

Lines changed: 18 additions & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -1,9 +1,9 @@
11
/* Automatically generated by
2-
CCodeGeneratorGlobalStructure VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b
2+
CCodeGeneratorGlobalStructure VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc
33
from
4-
CoInterpreter VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b
4+
CoInterpreter VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc
55
*/
6-
static char __buildInfo[] = "CoInterpreter VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b " __DATE__ ;
6+
static char __buildInfo[] = "CoInterpreter VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc " __DATE__ ;
77
char *__interpBuildInfo = __buildInfo;
88

99

@@ -467,7 +467,7 @@ extern sqInt ceCannotAssignTowithIndexvalueToAssign(sqInt immutableObject, sqInt
467467
#endif /* IMMUTABILITY */
468468
extern sqInt ceCannotResume(void);
469469
extern void ceCheckAndMaybeRetryPrimitive(sqInt primIndex);
470-
extern void ceCheckForInterrupts(void);
470+
extern void ceCheckForInterrupt(void);
471471
extern void ceCheckProfileTick(void);
472472
extern sqInt ceContextinstVar(sqInt maybeContext, sqInt slotIndex);
473473
extern sqInt ceContextinstVarvalue(sqInt maybeMarriedContext, sqInt slotIndex, sqInt anOop);
@@ -2627,7 +2627,7 @@ sqInt debugCallbackInvokes;
26272627
sqInt debugCallbackReturns;
26282628
sqInt ffiExceptionResponse;
26292629
sqInt checkedPluginName;
2630-
const char *interpreterVersion = "Newspeak Virtual Machine [ Open Smalltalk, Spur] CoInterpreterPrimitives_VMMaker.oscog-eem.2893";
2630+
const char *interpreterVersion = "Newspeak Virtual Machine [ Open Smalltalk, Spur] CoInterpreterPrimitives_VMMaker.oscog-eem.2905";
26312631
sqInt minBackwardJumpCountForCompile = MinBackwardJumpCountForCompile /* 40 */;
26322632
int displayWidth;
26332633
int displayDepth;
@@ -15130,6 +15130,8 @@ callbackEnter(sqInt *callbackID)
1513015130
assert(0);
1513115131
}
1513215132
/* begin setCFramePointer:setCStackPointer: */
15133+
assert(!(((currentCFramePointer == null)
15134+
|| (currentCStackPointer == null))));
1513315135
GIV(CStackPointer) = currentCStackPointer;
1513415136
GIV(CFramePointer) = currentCFramePointer;
1513515137
putToSleepyieldingIf(fetchPointerofObject(ActiveProcessIndex, schedulerPointer()), GIV(preemptionYields));
@@ -15522,9 +15524,9 @@ ceCheckAndMaybeRetryPrimitive(sqInt primIndex)
1552215524
}
1552315525
}
1552415526

15525-
/* CoInterpreter>>#ceCheckForInterrupts */
15527+
/* CoInterpreter>>#ceCheckForInterrupt */
1552615528
void
15527-
ceCheckForInterrupts(void)
15529+
ceCheckForInterrupt(void)
1552815530
{
1552915531
sqInt switched;
1553015532

@@ -20880,7 +20882,7 @@ markActiveMethodsAndReferents(void)
2088020882
if (GIV(instructionPointer) != 0) {
2088120883
primCogMethod = cogMethodContaining(GIV(instructionPointer));
2088220884
if (!(primCogMethod == null)) {
20883-
markMethodAndReferents(primCogMethod);
20885+
markMethodAndReferents(((CogBlockMethod *) primCogMethod));
2088420886
}
2088520887
}
2088620888
for (i = 0; i < GIV(numStackPages); i += 1) {
@@ -62254,7 +62256,7 @@ prepareForSnapshot(void)
6225462256
sqInt limit;
6225562257
sqInt newEndOfMemory;
6225662258
sqInt next;
62257-
sqInt node;
62259+
usqInt node;
6225862260
SpurSegmentInfo *seg;
6225962261
sqInt smallChild;
6226062262
sqInt treeNode;
@@ -66068,8 +66070,8 @@ static sqInt
6606866070
getErrorObjectFromPrimFailCode(void)
6606966071
{ DECL_MAYBE_SQ_GLOBAL_STRUCT
6607066072
sqInt classIndex;
66071-
sqInt clone;
66072-
sqInt errObj;
66073+
usqInt clone;
66074+
usqInt errObj;
6607366075
sqInt fieldIndex;
6607466076
sqInt i;
6607566077
usqInt newObj;
@@ -71080,7 +71082,7 @@ printCallStackOf(sqInt aContextOrProcessOrFrame)
7108071082
return printCallStackFP(((char *) aContextOrProcessOrFrame));
7108171083
}
7108271084
if (aContextOrProcessOrFrame == (activeProcess())) {
71083-
return printCallStackOf(GIV(framePointer));
71085+
return printCallStackOf(((sqInt)GIV(framePointer)));
7108471086
}
7108571087
if (couldBeProcess(aContextOrProcessOrFrame)) {
7108671088
return printCallStackOf(longAt((aContextOrProcessOrFrame + BaseHeaderSize) + (((sqInt)((usqInt)(SuspendedContextIndex) << (shiftForWord()))))));
@@ -73870,6 +73872,8 @@ returnAsThroughCallbackContext(sqInt returnTypeOop, VMCallbackContext *vmCallbac
7387073872
/* begin restoreCStackStateForCallbackContext: */
7387173873
cFramePointer = ((sqInt) ((vmCallbackContext->savedCFramePointer)));
7387273874
cStackPointer = ((sqInt) ((vmCallbackContext->savedCStackPointer)));
73875+
assert(!(((cFramePointer == null)
73876+
|| (cStackPointer == null))));
7387373877
GIV(CStackPointer) = cStackPointer;
7387473878
GIV(CFramePointer) = cFramePointer;
7387573879
/* begin assertValidExecutionPointe:r:s: */
@@ -73943,6 +73947,8 @@ returnAsThroughCallbackContext(sqInt returnTypeOop, VMCallbackContext *vmCallbac
7394373947
/* begin restoreCStackStateForCallbackContext: */
7394473948
cFramePointer1 = ((sqInt) ((vmCallbackContext->savedCFramePointer)));
7394573949
cStackPointer1 = ((sqInt) ((vmCallbackContext->savedCStackPointer)));
73950+
assert(!(((cFramePointer1 == null)
73951+
|| (cStackPointer1 == null))));
7394673952
GIV(CStackPointer) = cStackPointer1;
7394773953
GIV(CFramePointer) = cFramePointer1;
7394873954

‎nsspur64src/vm/cointerp.h‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11
/* Automatically generated by
2-
CCodeGeneratorGlobalStructure VMMaker.oscog-eem.2893 uuid: 80846f05-27f9-4e14-a97e-11dcde420a0b
2+
CCodeGeneratorGlobalStructure VMMaker.oscog-eem.2905 uuid: b2778a08-d45d-4f84-8467-21a8eccf46dc
33
*/
44

55

@@ -31,7 +31,7 @@ extern sqInt ceCannotAssignTowithIndexvalueToAssign(sqInt immutableObject, sqInt
3131
#endif /* IMMUTABILITY */
3232
extern sqInt ceCannotResume(void);
3333
extern void ceCheckAndMaybeRetryPrimitive(sqInt primIndex);
34-
extern void ceCheckForInterrupts(void);
34+
extern void ceCheckForInterrupt(void);
3535
extern void ceCheckProfileTick(void);
3636
extern sqInt ceContextinstVar(sqInt maybeContext, sqInt slotIndex);
3737
extern sqInt ceContextinstVarvalue(sqInt maybeMarriedContext, sqInt slotIndex, sqInt anOop);

0 commit comments

Comments
 (0)