KSP/njvm
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fixed some mistakes

Browse Source
This commit is contained in:
nilspolek 2024-01-23 17:18:54 +01:00
parent e8b4062331
commit c174108e09
3 changed files with 14 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
njvm.c
View File

@ -243,16 +243,16 @@ void execute(struct program program) {
break;
case NEW:
if (debug == 1) printf("new");
push(stack, newRecord(SIGN_EXTEND(IMMEDIATE(program.program[i]))))
push(stack, stackSlotWithObjRef(newRecord(SIGN_EXTEND(IMMEDIATE(program.program[i])))));
break;
case GETF:
if (debug == 1) printf("getf");
push(stack, getField(pop(stack), SIGN_EXTEND(IMMEDIATE(program.program[i]))))
push(stack, stackSlotWithObjRef(getField(pop(stack).u.objRef,SIGN_EXTEND(IMMEDIATE(program.program[i])))));
break;
case PUTF:
if (debug == 1) printf("putf");
tempObj = pop(stack)
setField(pop(stack), SIGN_EXTEND(IMMEDIATE(program.program[i])),tempObj)
tempObj = pop(stack).u.objRef;
setField(pop(stack).u.objRef, SIGN_EXTEND(IMMEDIATE(program.program[i])),tempObj);
break;
}
}

BIN
njvm.o
View File

Binary file not shown.

17
record.c
View File

@ -7,19 +7,22 @@
#include "instruktion.c"
ObjRef newRecord(int size){
ObjRef record;
if((record = malloc(*record + size * sizeof(void *)))== NULL){
perror("malloc")
unsigned int objSize;
objSize = sizeof(*record) + (size * sizeof(void *));
if((record = malloc(objSize))== NULL){
perror("malloc");
}
record->size = MSB & size;
for(int i = 0; i < size; i++) {
GET_REFS_PTR(record)[i] = malloc(8)
GET_REFS_PTR(record)[i] = malloc(8);
}
return record;
}
ObjRef getField(ObjRef array, int point){
return *(ObjRef *)GET_REFS_PTR(array)[point]->data
ObjRef getField(ObjRef arr, int point){
return *(ObjRef *)GET_REFS_PTR(arr)[point]->data;
}
setField(ObjRef array, int point, ObjRef value){
(ObjRef *)GET_REFS_PTR(array)[point]->data = value
void setField(ObjRef arr, int point, ObjRef value){
* (ObjRef *)GET_REFS_PTR(arr)[point]->data = value;
}
#endif