cozis/Noja
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

testcases for instructions INSERT, INSERT2, SELECT and ASS

Browse Source
This commit is contained in:
Francesco Cozzuto
2023-01-23 21:36:44 +01:00
parent 31d0c100c1
commit 5234fc73a8
17 changed files with 359 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files
examples/http_server/parse.noja
+1 -1
View File
@@ -312,7 +312,7 @@ fun parseHead(src: String) {
return none, "Invalid header (missing \":\" after name)";
scan->consume();
char = scan->consumeSpaces();
# Header body until \r
body = "";
do {
src/lib/assembler/assemble.c
+1 -1
View File
@@ -463,7 +463,7 @@ Executable *assemble(Source *src, Error *error, int *error_offset)
goto done;
}
}
size_t unresolved_count = LabelList_GetUnresolvedCount(list);
if(unresolved_count > 0) {
*error_offset = -1;
src/lib/run.c
+5 -6
View File
@@ -497,8 +497,7 @@ static _Bool runInstruction(Runtime *runtime, Error *error)
ASSERT(runtime != NULL);
ASSERT(error->occurred == 0);
Stack *stack = Runtime_GetStack(runtime);
Heap *heap = Runtime_GetHeap(runtime);
Heap *heap = Runtime_GetHeap(runtime);
Executable *exe = Runtime_GetCurrentExecutable(runtime);
ASSERT(exe != NULL);
int index = Runtime_GetCurrentIndex(runtime);
@@ -855,14 +854,14 @@ static _Bool runInstruction(Runtime *runtime, Error *error)
return Object_Insert(col, key, val, heap, error);
}
case OPCODE_INSERT2:
{
ASSERT(opc == 0);
Object *val = Stack_Top(stack, -2);
Object *col = Stack_Top(stack, -1);
Object *key = Stack_Top(stack, 0);
Object *val = Runtime_Top(runtime, -2);
Object *col = Runtime_Top(runtime, -1);
Object *key = Runtime_Top(runtime, 0);
if (val == NULL || col == NULL || key == NULL) {
Error_Report(error, ErrorType_INTERNAL, "Frame has not enough values on the stack to run INSERT2 instruction");
return 0;
src/lib/runtime.h
-2
View File
@@ -35,7 +35,6 @@
#include "timing.h"
#include "executable.h"
#include "utils/error.h"
#include "utils/stack.h"
#include "objects/objects.h"
typedef struct xRuntime Runtime;
@@ -90,7 +89,6 @@ bool Runtime_CollectGarbage(Runtime *runtime, Error *error);
void Runtime_PrintStackTrace(Runtime *runtime, FILE *stream);
void Runtime_Interrupt(Runtime *runtime);
Heap* Runtime_GetHeap(Runtime *runtime);
Stack* Runtime_GetStack(Runtime *runtime);
int Runtime_GetCurrentIndex(Runtime *runtime);
Executable *Runtime_GetCurrentExecutable(Runtime *runtime);
Executable *Runtime_GetMostRecentExecutable(Runtime *runtime);
tests/runtime/ass/ass_00.noja-test
+17
View File
@@ -0,0 +1,17 @@
@type [runtime]
@bytecode
PUSHNNE;
ASS "xyz";
POP 1;
PUSHVAR "xyz";
PUSHVAR "print";
CALL 1, 1;
POP 1;
EXIT;
@output [none]
tests/runtime/ass/ass_01.noja-test
+28
View File
@@ -0,0 +1,28 @@
@type [runtime]
@bytecode
PUSHNNE;
ASS "xyz";
POP 1;
PUSHVAR "xyz";
PUSHVAR "print";
CALL 1, 1;
POP 1;
PUSHSTR "/";
PUSHVAR "print";
CALL 1, 1;
POP 1;
PUSHINT 99;
ASS "xyz";
POP 1;
PUSHVAR "xyz";
PUSHVAR "print";
CALL 1, 1;
POP 1;
EXIT;
@output [none/99]
tests/runtime/insert/insert_into_list.noja-test
+24
View File
@@ -0,0 +1,24 @@
@type [runtime]
@bytecode
PUSHLST 3;
PUSHINT 0;
PUSHSTR "A";
INSERT;
PUSHINT 1;
PUSHSTR "B";
INSERT;
PUSHINT 2;
PUSHSTR "C";
INSERT;
PUSHVAR "print";
CALL 1, 1;
POP 1;
EXIT;
@output {[A, B, C]}
tests/runtime/insert/insert_into_list_more_than_capacity.noja-test
+24
View File
@@ -0,0 +1,24 @@
@type [runtime]
@bytecode
PUSHLST 2;
PUSHINT 0;
PUSHSTR "A";
INSERT;
PUSHINT 1;
PUSHSTR "B";
INSERT;
PUSHINT 2;
PUSHSTR "C";
INSERT;
PUSHVAR "print";
CALL 1, 1;
POP 1;
EXIT;
@output {[A, B, C]}
tests/runtime/insert/insert_into_map.noja-test
+25
View File
@@ -0,0 +1,25 @@
@type [runtime]
@bytecode
PUSHMAP 3;
PUSHINT 0;
PUSHSTR "A";
INSERT;
PUSHINT 1;
PUSHSTR "B";
INSERT;
PUSHINT 2;
PUSHSTR "C";
INSERT;
PUSHVAR "print";
CALL 1, 1;
POP 1;
EXIT;
@output [{0: A, 1: B, 2: C}]
tests/runtime/insert/insert_into_map_more_than_capacity.noja-test
+25
View File
@@ -0,0 +1,25 @@
@type [runtime]
@bytecode
PUSHMAP 2;
PUSHINT 0;
PUSHSTR "A";
INSERT;
PUSHINT 1;
PUSHSTR "B";
INSERT;
PUSHINT 2;
PUSHSTR "C";
INSERT;
PUSHVAR "print";
CALL 1, 1;
POP 1;
EXIT;
@output [{0: A, 1: B, 2: C}]
tests/runtime/insert2/insert2_into_list.noja-test
+31
View File
@@ -0,0 +1,31 @@
@type [runtime]
@bytecode
PUSHLST 3;
ASS "list";
POP 1;
PUSHSTR "A";
PUSHVAR "list";
PUSHINT 0;
INSERT2;
PUSHSTR "B";
PUSHVAR "list";
PUSHINT 1;
INSERT2;
PUSHSTR "C";
PUSHVAR "list";
PUSHINT 2;
INSERT2;
PUSHVAR "list";
PUSHVAR "print";
CALL 4, 1;
POP 1;
EXIT;
@output {[A, B, C]CBA}
tests/runtime/insert2/insert2_into_list_more_than_capacity.noja-test
+31
View File
@@ -0,0 +1,31 @@
@type [runtime]
@bytecode
PUSHLST 2;
ASS "list";
POP 1;
PUSHSTR "A";
PUSHVAR "list";
PUSHINT 0;
INSERT2;
PUSHSTR "B";
PUSHVAR "list";
PUSHINT 1;
INSERT2;
PUSHSTR "C";
PUSHVAR "list";
PUSHINT 2;
INSERT2;
PUSHVAR "list";
PUSHVAR "print";
CALL 4, 1;
POP 1;
EXIT;
@output {[A, B, C]CBA}
tests/runtime/insert2/insert2_into_map.noja-test
+32
View File
@@ -0,0 +1,32 @@
@type [runtime]
@bytecode
PUSHMAP 3;
ASS "map";
POP 1;
PUSHSTR "A";
PUSHVAR "map";
PUSHINT 0;
INSERT2;
PUSHSTR "B";
PUSHVAR "map";
PUSHINT 1;
INSERT2;
PUSHSTR "C";
PUSHVAR "map";
PUSHINT 2;
INSERT2;
PUSHVAR "map";
PUSHVAR "print";
CALL 4, 1;
POP 1;
EXIT;
@output [{0: A, 1: B, 2: C}CBA]
tests/runtime/insert2/insert2_into_map_more_than_capacity.noja-test
+32
View File
@@ -0,0 +1,32 @@
@type [runtime]
@bytecode
PUSHMAP 2;
ASS "map";
POP 1;
PUSHSTR "A";
PUSHVAR "map";
PUSHINT 0;
INSERT2;
PUSHSTR "B";
PUSHVAR "map";
PUSHINT 1;
INSERT2;
PUSHSTR "C";
PUSHVAR "map";
PUSHINT 2;
INSERT2;
PUSHVAR "map";
PUSHVAR "print";
CALL 4, 1;
POP 1;
EXIT;
@output [{0: A, 1: B, 2: C}CBA]
tests/runtime/select/select_from_list.noja-test
+27
View File
@@ -0,0 +1,27 @@
@type [runtime]
@bytecode
PUSHLST 3;
PUSHINT 0;
PUSHSTR "A";
INSERT;
PUSHINT 1;
PUSHSTR "B";
INSERT;
PUSHINT 2;
PUSHSTR "C";
INSERT;
PUSHINT 1;
SELECT;
PUSHVAR "print";
CALL 1, 1;
POP 1;
EXIT;
@output [B]
tests/runtime/select/select_from_map.noja-test
+28
View File
@@ -0,0 +1,28 @@
@type [runtime]
@bytecode
PUSHMAP 3;
PUSHINT 0;
PUSHSTR "A";
INSERT;
PUSHINT 1;
PUSHSTR "B";
INSERT;
PUSHINT 2;
PUSHSTR "C";
INSERT;
PUSHINT 1;
SELECT;
PUSHVAR "print";
CALL 1, 1;
POP 1;
EXIT;
@output [B]
tests/runtime/select/select_from_map_2.noja-test
+28
View File
@@ -0,0 +1,28 @@
@type [runtime]
@bytecode
PUSHMAP 3;
PUSHINT 0;
PUSHSTR "A";
INSERT;
PUSHINT 1;
PUSHSTR "B";
INSERT;
PUSHINT 2;
PUSHSTR "C";
INSERT;
PUSHINT 8;
SELECT;
PUSHVAR "print";
CALL 1, 1;
POP 1;
EXIT;
@output [none]