void KPR_application_purge(xsMachine *the)
{
KprApplication self = kprGetHostData(xsThis, this, application);
FskInstrumentedItemSendMessageNormal(self, kprInstrumentedContentBeginCollect, self);
xsCollectGarbage();
FskInstrumentedItemSendMessageNormal(self, kprInstrumentedContentEndCollect, self);
KprContextPurge(self, false);
}
void KPR_host_purge(xsMachine* the)
{
KprHost self = xsGetHostData(xsThis);
KprApplication application = (KprApplication)self->first;
xsBeginHostSandboxCode(application->the, NULL);
{
FskInstrumentedItemSendMessageNormal(self, kprInstrumentedContentBeginCollect, self);
xsCollectGarbage();
FskInstrumentedItemSendMessageNormal(self, kprInstrumentedContentEndCollect, self);
}
xsEndHostSandboxCode();
KprContextPurge(application, false);
}
void gc(xsMachine* the)
{
xsCollectGarbage();
}