ground/ground-rewrite
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

progress on external functions

Browse Source
This commit is contained in:
Maxwell
2026-07-04 19:50:52 +10:00
parent 7c29048397
commit 5337a9e375
2 changed files with 49 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
include/ground.h
View File

@@ -300,6 +300,9 @@ struct GroundBytecodeFunction {
GroundBytecodeHeap* closure;
GroundSize _requiredSize;
// Only for native function
GroundType* returnType;
};
struct GroundBytecodeStruct {};
struct GroundBytecodeObject {};

51
src/Bytecode/Instruction/execute.c
View File

@@ -82,14 +82,12 @@ struct GroundExecutionResult _GroundBytecodeInstructionExecute(GroundBytecodeIns
PRINT: {
for (GroundSize i = 0; i < instruction->args.len; i++) {
printValue(HEAP_GET(heap, instruction->args.at[i]));
printf(" ");
}
return CONTINUE;
}
PRINTLN: {
for (GroundSize i = 0; i < instruction->args.len; i++) {
printValue(HEAP_GET(heap, instruction->args.at[i]));
printf(" ");
}
printf("\n");
return CONTINUE;
@@ -835,21 +833,64 @@ struct GroundExecutionResult _GroundBytecodeInstructionExecute(GroundBytecodeIns
GroundBytecodeFunction bf = {
.isNativeFunction = true,
.closure = NULL,
.program.native = handle,
.program.native = function,
.args = {
.at = malloc(sizeof(GroundFunctionArg) * argsSize),
.capacity = argsSize,
.count = argsSize
},
.returnType = malloc(sizeof(GroundType))
};
if (bf.args.at == NULL) {
if (bf.args.at == NULL || bf.returnType == NULL) {
Ground.Log.Error("malloc failed in Ground.Bytecode.Instruction.execute");
Ground.Flags.error = true;
return CONTINUE;
}
for (size_t i = 0; i < argsSize; i++) {
enum GroundTypeType returnTypeType = HEAP_GET(heap, instruction->args.at[3])->type.type;
switch (returnTypeType) {
case GroundType_Struct: {
bf.returnType->type = GroundType_Object;
// TODO implement structs
break;
}
case GroundType_CoreType: {
bf.returnType->type = HEAP_GET(heap, instruction->args.at[3])->as.CoreType;
break;
}
default: {
// should have been caught elsewhere, not really our problem
break;
}
}
for (size_t i = 0; i < argsSize; i++) {
enum GroundTypeType argTypeType = HEAP_GET(heap, instruction->args.at[i + 4])->as.CoreType;
switch (argTypeType) {
case GroundType_Struct: {
bf.args.at[i].as.type.type = GroundType_Object;
// TODO implement structs
break;
}
case GroundType_CoreType: {
bf.args.at[i].as.type.type = HEAP_GET(heap, instruction->args.at[3])->as.CoreType;
break;
}
default: {
// should have been caught elsewhere, not really our problem
break;
}
}
}
GroundBytecodeValue val = {
.type = {GroundType_Function},
.as.Function = bf
};
HEAP_SET(heap, instruction->args.at[3], val);
return CONTINUE;
}
CREATELABEL: {