Remove the preemptive module

Author: mertyildiran

Makefile

@@ -101,7 +101,7 @@ chaos: lex.yy.c parser.tab.c parser.tab.h
 ifeq ($(UNAME_S), Darwin)
 	export CHAOS_STACK_SIZE=-Wl,-stack_size,0x100000000
 endif
-	${CHAOS_COMPILER} -Werror -Wall -pedantic -fcommon ${CHAOS_STACK_SIZE} -DCHAOS_INTERPRETER -o chaos parser.tab.c lex.yy.c parser/*.c utilities/*.c ast/*.c preemptive/*.c interpreter/*.c compiler/*.c vm/*.c Chaos.c -lreadline -L/usr/local/opt/readline/lib -I/usr/local/opt/readline/include -ldl ${CHAOS_EXTRA_FLAGS}
+	${CHAOS_COMPILER} -Werror -Wall -pedantic -fcommon ${CHAOS_STACK_SIZE} -DCHAOS_INTERPRETER -o chaos parser.tab.c lex.yy.c parser/*.c utilities/*.c ast/*.c interpreter/*.c compiler/*.c vm/*.c Chaos.c -lreadline -L/usr/local/opt/readline/lib -I/usr/local/opt/readline/include -ldl ${CHAOS_EXTRA_FLAGS}
 
 clean:
 	rm -rf chaos parser.tab.c lex.yy.c parser.tab.h

coverage.sh

@@ -24,6 +24,5 @@ llvm-cov show /usr/local/bin/chaos -instr-profile=chaos.profdata \
     ./interpreter/*.c \
     ./lexer/*.c \
     ./parser/*.c \
-    ./preemptive/*.c \
     ./utilities/*.c \
     -path-equivalence -use-color --format html > /tmp/coverage.html

help.txt

@@ -8,6 +8,5 @@ Usage: chaos [options] <file> [--] [args...]
     -o, --output        Binary output filename. Must be used with the -c / --compile option.
     -e, --extra         Extra flags to inject into C compiler command.
     -k, --keep          Don't remove the C source and header files (temporary files) after compilation.
-    -u, --unsafe        Unsafe mode (fast warm up). Disables the preemptive error checks.
     -a, --ast           Print Abstract Syntax Tree (AST) in JSON format and exit immediately.
 

interpreter/interpreter.c

@@ -31,7 +31,7 @@ extern unsigned long long nested_loop_counter;
 int kaos_lineno = 0;
 
 #ifndef CHAOS_COMPILER
-void interpret(char *module, enum Phase phase_arg, bool is_interactive, bool unsafe) {
+void interpret(char *module, enum Phase phase_arg, bool is_interactive) {
 #else
 void interpret(char *module, enum Phase phase_arg) {
 #endif
@@ -51,16 +51,6 @@ void interpret(char *module, enum Phase phase_arg) {
     case PREPARSE:
         phase = PREPARSE;
         register_functions(ast_node, module);
-#ifndef CHAOS_COMPILER
-        if (!unsafe) {
-            if (is_interactive) {
-                if (end_function != NULL)
-                    preemptive_check();
-            } else {
-                preemptive_check();
-            }
-        }
-#endif
         phase = PROGRAM;
         break;
     case PROGRAM:
@@ -74,16 +64,6 @@ void interpret(char *module, enum Phase phase_arg) {
     if (phase_arg == INIT_PREPARSE) {
         phase = PREPARSE;
         register_functions(ast_node, module);
-#ifndef CHAOS_COMPILER
-        if (!unsafe) {
-            if (is_interactive) {
-                if (end_function != NULL)
-                    preemptive_check();
-            } else {
-                preemptive_check();
-            }
-        }
-#endif
         phase = PROGRAM;
         eval_node(ast_node, module);
     }

interpreter/interpreter.h

@@ -29,15 +29,11 @@
 
 #include "../ast/ast.h"
 
-#ifndef CHAOS_COMPILER
-#include "../preemptive/preemptive.h"
-#endif
-
 extern unsigned long long nested_loop_counter;
 extern ASTNode* loop_end_ast_node;
 
 #ifndef CHAOS_COMPILER
-void interpret(char *module, enum Phase phase_arg, bool is_interactive, bool unsafe);
+void interpret(char *module, enum Phase phase_arg, bool is_interactive);
 #else
 void interpret(char *module, enum Phase phase_arg);
 #endif

lexer/lexer.l

@@ -37,7 +37,6 @@ extern void recordToken(char *token, int length);
 extern int oerrno;
 extern void yyerror(const char* s);
 extern FILE* tmp_stdin;
-extern bool global_unsafe;
 #define YY_FATAL_ERROR(msg) yy_fatal_error( msg )
 
 #include "parser.tab.h"
@@ -63,7 +62,7 @@ void injectCode(char *code, enum Phase phase_arg) {
     char *interpreted_module = malloc(1 + strlen(module_path_stack.arr[module_path_stack.size - 1]));
     strcpy(interpreted_module, module_path_stack.arr[module_path_stack.size - 1]);
 // #ifndef CHAOS_COMPILER
-//     interpret(interpreted_module, phase_arg, false, global_unsafe);
+//     interpret(interpreted_module, phase_arg, false);
 // #else
 //     interpret(interpreted_module, phase_arg);
 // #endif

make.bat

@@ -169,7 +169,7 @@ win_bison -d parser\parser.y
 IF errorlevel 1 (
     EXIT /B 1
 )
-%compiler% -fcommon -DCHAOS_INTERPRETER -o chaos.exe parser.tab.c lex.yy.c parser/*.c utilities/*.c utilities/windows/*.c ast/*.c preemptive/*.c interpreter/*.c compiler/*.c Chaos.c -lshell32 -lole32 %extra_flags%
+%compiler% -fcommon -DCHAOS_INTERPRETER -o chaos.exe parser.tab.c lex.yy.c parser/*.c utilities/*.c utilities/windows/*.c ast/*.c interpreter/*.c compiler/*.c Chaos.c -lshell32 -lole32 %extra_flags%
 IF errorlevel 1 (
     EXIT /B 1
 )

parser/parser.c

@@ -26,8 +26,6 @@ extern bool disable_complex_mode;
 extern char *suggestions[1000];
 extern unsigned long long suggestions_length;
 
-bool global_unsafe = false;
-
 #ifndef CHAOS_COMPILER
 static struct option long_options[] =
 {
@@ -39,7 +37,6 @@ static struct option long_options[] =
     {"output", required_argument, NULL, 'o'},
     {"extra", required_argument, NULL, 'e'},
     {"keep", no_argument, NULL, 'k'},
-    {"unsafe", no_argument, NULL, 'u'},
     {"ast", no_argument, NULL, 'a'},
     {NULL, 0, NULL, 0}
 };
@@ -52,11 +49,10 @@ int initParser(int argc, char** argv) {
     char *program_file = NULL;
     char *bin_file = NULL;
     // bool keep = false;
-    // bool unsafe = false;
     // char *extra_flags = NULL;
 
     char opt;
-    while ((opt = getopt_long(argc, argv, "hvldc:o:e:k:u:a:", long_options, NULL)) != -1)
+    while ((opt = getopt_long(argc, argv, "hvldc:o:e:k:a:", long_options, NULL)) != -1)
     {
         switch (opt) {
         case 'h':
@@ -88,10 +84,6 @@ int initParser(int argc, char** argv) {
         case 'k':
             // keep = true;
             break;
-        case 'u':
-            // unsafe = true;
-            global_unsafe = true;
-            break;
         case 'a':
             print_ast = true;
             break;
@@ -222,9 +214,9 @@ int initParser(int argc, char** argv) {
         free_cpu(c);
         // if (!is_interactive) {
         //     if (compiler_mode) {
-        //         compile(main_interpreted_module, INIT_PREPARSE, bin_file, extra_flags, keep, unsafe);
+        //         compile(main_interpreted_module, INIT_PREPARSE, bin_file, extra_flags, keep);
         //     } else {
-        //         interpret(main_interpreted_module, INIT_PREPARSE, false, unsafe);
+        //         interpret(main_interpreted_module, INIT_PREPARSE, false);
         //     }
         // }
         if (!is_interactive) break;
@@ -320,7 +312,6 @@ void absorbError() {
 
     phase = INIT_PROGRAM;
     disable_complex_mode = false;
-    preemptive_freeAllSymbols();
     freeComplexModeStack();
     freeLeftRightBracketStackSymbols();
     resetFunctionParametersMode();

parser/parser.h

@@ -60,8 +60,6 @@ char *program_code;
 char *main_interpreted_module;
 jmp_buf InteractiveShellErrorAbsorber;
 
-bool global_unsafe;
-
 int initParser(int argc, char** argv);
 void freeEverything();
 void yyerror(const char* s);