krgamestudios/Toy
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

TMP: Brain broke, I need a break, don't use this commit

Browse Source
This commit is contained in:
Kayne Ruse
2026-05-23 14:40:32 +10:00
parent 813da3e1aa
commit 2a82b0052d
6 changed files with 209 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files
source/toy_vm.c
+68 -4
View File
@@ -33,6 +33,9 @@ static inline void fixAlignment(Toy_VM* vm) {
vm->programCounter = (vm->programCounter + 3) & ~3;
}
//forward declarations for delegations
static void processJump(Toy_VM* vm);
//instruction handlers
static void processRead(Toy_VM* vm) {
Toy_ValueType type = READ_BYTE(vm);
@@ -470,9 +473,56 @@ static void processDuplicate(Toy_VM* vm) {
}
static void processEliminate(Toy_VM* vm) {
//discard the stack top
Toy_Value value = Toy_popStack(&vm->stack);
Toy_freeValue(value);
//discard the stack top, X times
unsigned int x = (unsigned int)READ_BYTE(vm);
for (unsigned int i = 0; i < x; i++) {
Toy_Value value = Toy_popStack(&vm->stack);
Toy_freeValue(value);
}
}
static void processIterable(Toy_VM* vm) {
//access [-1] from [-2], incrementing [-1] afterwards
//if null, delegate to 'processJump' and exit
Toy_Value counter = Toy_popStack(&vm->stack);
Toy_Value compound = Toy_popStack(&vm->stack);
if (!TOY_VALUE_IS_INTEGER(counter)) {
fprintf(stderr, TOY_CC_ERROR "ERROR: Unknown counter type '%s' found in for loop, exiting\n" TOY_CC_RESET, Toy_getValueTypeAsCString(counter.type));
exit(-1);
}
if (TOY_VALUE_IS_ARRAY(compound)) {
Toy_Array* array = TOY_VALUE_AS_ARRAY(compound);
int index = TOY_VALUE_AS_INTEGER(counter);
//check out-of-bounds
if (index < 0 || (unsigned int)index >= array->count) {
Toy_freeValue(counter);
Toy_freeValue(compound);
Toy_pushStack(&vm->stack, TOY_VALUE_FROM_NULL());
processJump(vm);
return;
}
//get the desired element
Toy_Value value = Toy_copyValue(&vm->memoryBucket, array->data[index]);
//push everything back onto the stack
Toy_pushStack(&vm->stack, compound);
Toy_pushStack(&vm->stack, TOY_VALUE_FROM_INTEGER(index + 1));
Toy_pushStack(&vm->stack, value);
//cleanup & delegate
Toy_freeValue(compound);
Toy_freeValue(counter);
processJump(vm);
}
else {
fprintf(stderr, TOY_CC_ERROR "ERROR: Unknown value type '%s' found in for loop, exiting\n" TOY_CC_RESET, Toy_getValueTypeAsCString(compound.type));
exit(-1);
}
}
static void processArithmetic(Toy_VM* vm, Toy_OpcodeType opcode) {
@@ -682,6 +732,17 @@ static void processJump(Toy_VM* vm) {
Toy_freeValue(value);
return;
}
case TOY_OP_PARAM_JUMP_IF_NULL: {
Toy_Value value = Toy_popStack(&vm->stack);
if (TOY_VALUE_IS_NULL(value)) {
Toy_freeValue(value);
break;
}
Toy_freeValue(value);
return;
}
}
//do the jump
@@ -997,6 +1058,10 @@ static unsigned int process(Toy_VM* vm) {
processEliminate(vm);
break;
case TOY_OPCODE_ITERABLE:
processIterable(vm);
break;
//arithmetic instructions
case TOY_OPCODE_ADD:
case TOY_OPCODE_SUBTRACT:
@@ -1060,7 +1125,6 @@ static unsigned int process(Toy_VM* vm) {
processIndex(vm);
break;
case TOY_OPCODE_ITERABLE: //tmp
case TOY_OPCODE_UNUSED:
case TOY_OPCODE_PASS:
case TOY_OPCODE_ERROR: