forked from Mirror/wren
7fcdcf2f1a
This turns those functions into general-purpose functions for writing raw C values into slots on the foreign call stack. Writing a return just means writing a value to slot 0.
23 lines
465 B
C
23 lines
465 B
C
#include <string.h>
|
|
|
|
#include "benchmark.h"
|
|
|
|
static void arguments(WrenVM* vm)
|
|
{
|
|
double result = 0;
|
|
|
|
result += wrenGetSlotDouble(vm, 1);
|
|
result += wrenGetSlotDouble(vm, 2);
|
|
result += wrenGetSlotDouble(vm, 3);
|
|
result += wrenGetSlotDouble(vm, 4);
|
|
|
|
wrenSetSlotDouble(vm, 0, result);
|
|
}
|
|
|
|
WrenForeignMethodFn benchmarkBindMethod(const char* signature)
|
|
{
|
|
if (strcmp(signature, "static Benchmark.arguments(_,_,_,_)") == 0) return arguments;
|
|
|
|
return NULL;
|
|
}
|