Skip to content

Instantly share code, notes, and snippets.

@frankhale
Last active Jun 30, 2020
Embed
What would you like to do?
#include "wren.h"
#include <stdio.h>
#include <string.h>
void writeFn(WrenVM* vm, const char* text) {
printf("%s", text);
}
void fooBar(WrenVM* vm) {
WrenType type = wrenGetSlotType(vm, 1);
if(type == WREN_TYPE_STRING) {
const char* text = wrenGetSlotString(vm, 1);
printf("fooBar: %s", text);
} else {
printf("bar requires a string\n");
}
}
WrenForeignMethodFn bindForeignMethod(
WrenVM* vm,
const char* module,
const char* className,
bool isStatic,
const char* signature) {
if (strcmp(module, "my_module") == 0)
{
if (strcmp(className, "Foo") == 0)
{
if (isStatic && strcmp(signature, "bar(_)") == 0)
{
return fooBar;
}
}
}
}
void errorFn(WrenVM* vm, WrenErrorType type, const char* module, int line, const char* message) {
printf("error type: %d\n", type);
printf("module: %s\n", module);
printf("line: %d\n", line);
printf("message: %s\n", message);
}
int main() {
WrenConfiguration config;
wrenInitConfiguration(&config);
config.writeFn = &writeFn;
config.bindForeignMethodFn = &bindForeignMethod;
config.errorFn = &errorFn;
WrenVM* vm = wrenNewVM(&config);
WrenInterpretResult result = wrenInterpret(
vm,
"my_module",
"class Foo { foreign static bar(str) }\r\nFoo.bar(\"Hello, Wren World!\n\")");
printf("script result = %d\n", result);
wrenFreeVM(vm);
return 0;
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment