Mirror/wren
1
0
Fork 1
mirror of https://github.com/wren-lang/wren.git synced 2026-01-18 13:49:59 +01:00
Code Issues Packages Projects Releases Wiki Activity

Add System.gc().

Browse Source
This commit is contained in:
Bob Nystrom
2015-10-24 10:56:27 -07:00
parent f145662158
commit 720c03cf49
4 changed files with 20 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/vm/wren_core.c
View File

@ -1008,6 +1008,12 @@ DEF_PRIMITIVE(system_clock)
RETURN_NUM((double)clock() / CLOCKS_PER_SEC);
}
DEF_PRIMITIVE(system_gc)
{
wrenCollectGarbage(vm);
RETURN_NULL;
}
DEF_PRIMITIVE(system_writeString)
{
if (vm->config.writeFn != NULL)
@ -1254,6 +1260,7 @@ void wrenInitializeCore(WrenVM* vm)
ObjClass* systemClass = AS_CLASS(wrenFindVariable(vm, coreModule, "System"));
PRIMITIVE(systemClass->obj.classObj, "clock", system_clock);
PRIMITIVE(systemClass->obj.classObj, "gc()", system_gc);
PRIMITIVE(systemClass->obj.classObj, "writeString_(_)", system_writeString);
// While bootstrapping the core types and running the core module, a number