EXPORT(sqInt) primitiveCurrencySymbol(void) { sqInt oop; sqInt length; length = sqLocCurrencySymbolSize(); oop = interpreterProxy->instantiateClassindexableSize(interpreterProxy->classString(), length); sqLocGetCurrencySymbolInto(interpreterProxy->firstIndexableField(oop)); if (interpreterProxy->failed()) { return null; } interpreterProxy->popthenPush(1, oop); return null; }
primitiveCurrencySymbol(void) { sqInt length; sqInt oop; length = sqLocCurrencySymbolSize(); oop = instantiateClassindexableSize(classString(), length); sqLocGetCurrencySymbolInto(firstIndexableField(oop)); if (failed()) { return null; } popthenPush(1, oop); return null; }