EXPORT(sqInt) primitiveGetIntProperty(void) {
sqInt handle;
sqInt propID;
sqInt value;
if (!((interpreterProxy->methodArgumentCount()) == 2)) {
return interpreterProxy->primitiveFail();
}
propID = interpreterProxy->stackIntegerValue(0);
handle = interpreterProxy->stackIntegerValue(1);
if (interpreterProxy->failed()) {
return null;
}
value = sqGetIntPropertySSL(handle, propID);
if (interpreterProxy->failed()) {
return null;
}
interpreterProxy->popthenPush((interpreterProxy->methodArgumentCount()) + 1, interpreterProxy->signed32BitIntegerFor(value));
return null;
}
primitiveGetIntProperty(void)
{
sqInt handle;
sqInt propID;
sqInt value;
if (!((methodArgumentCount()) == 2)) {
return primitiveFail();
}
propID = stackIntegerValue(0);
handle = stackIntegerValue(1);
if (failed()) {
return null;
}
value = sqGetIntPropertySSL(handle, propID);
if (failed()) {
return null;
}
popthenPush((methodArgumentCount()) + 1, signed32BitIntegerFor(value));
return 0;
}