Fixed constant hex/oct bug + Fixed some of the examples (work in progress) + added bootloader example (I will add some docs)

1 files changed, 42 insertions, 46 deletions

diff --git a/src/codegen/codegen_decl.c b/src/codegen/codegen_decl.c
index d59511d..10294e4 100644
--- a/src/codegen/codegen_decl.c
+++ b/src/codegen/codegen_decl.c
@@ -34,13 +34,9 @@ static void emit_freestanding_preamble(FILE *out)
     fputs("#define _z_arg(x) _Generic((x), _Bool: _z_bool_str(x), default: (x))\n", out);
     fputs("typedef struct { void *func; void *ctx; } z_closure_T;\n", out);
 
-    fputs("__attribute__((weak)) void* z_malloc(usize sz) { return NULL; }\n", out);
-    fputs("__attribute__((weak)) void* z_realloc(void* ptr, usize sz) { return "
-          "NULL; }\n",
-          out);
-    fputs("__attribute__((weak)) void z_free(void* ptr) { }\n", out);
-    fputs("__attribute__((weak)) void z_print(const char* fmt, ...) { }\n", out);
-    fputs("__attribute__((weak)) void z_panic(const char* msg) { while(1); }\n", out);
+    // In true freestanding, explicit definitions of z_malloc/etc are removed.
+    // The user must implement them if they use features requiring them.
+    // Most primitives (integers, pointers) work without them.
 }
 
 void emit_preamble(ParserContext *ctx, FILE *out)
@@ -48,6 +44,7 @@ void emit_preamble(ParserContext *ctx, FILE *out)
     if (g_config.is_freestanding)
     {
         emit_freestanding_preamble(out);
+        return;
     }
     else
     {
@@ -1034,53 +1031,52 @@ void print_type_defs(ParserContext *ctx, FILE *out, ASTNode *nodes)
     if (!g_config.is_freestanding)
     {
         fprintf(out, "typedef char* string;\n");
-    }
+    
 
-    fprintf(out, "typedef struct { void **data; int len; int cap; } Vec;\n");
-    fprintf(out, "#define Vec_new() (Vec){.data=0, .len=0, .cap=0}\n");
+        fprintf(out, "typedef struct { void **data; int len; int cap; } Vec;\n");
+        fprintf(out, "#define Vec_new() (Vec){.data=0, .len=0, .cap=0}\n");
 
-    if (g_config.use_cpp)
-    {
-        fprintf(out, "void _z_vec_push(Vec *v, void *item) { if(v->len >= v->cap) { "
-                     "v->cap = v->cap?v->cap*2:8; "
-                     "v->data = static_cast<void**>(realloc(v->data, v->cap * sizeof(void*))); } "
-                     "v->data[v->len++] = item; }\n");
-        fprintf(out, "static inline Vec _z_make_vec(int count, ...) { Vec v = {0}; v.cap = "
-                     "count > 8 ? "
-                     "count : 8; v.data = static_cast<void**>(malloc(v.cap * sizeof(void*))); "
-                     "v.len = 0; va_list "
-                     "args; "
-                     "va_start(args, count); for(int i=0; i<count; i++) { v.data[v.len++] = "
-                     "va_arg(args, void*); } va_end(args); return v; }\n");
-    }
-    else
-    {
-        fprintf(out, "void _z_vec_push(Vec *v, void *item) { if(v->len >= v->cap) { "
-                     "v->cap = v->cap?v->cap*2:8; "
-                     "v->data = z_realloc(v->data, v->cap * sizeof(void*)); } "
-                     "v->data[v->len++] = item; }\n");
-        fprintf(out, "static inline Vec _z_make_vec(int count, ...) { Vec v = {0}; v.cap = "
-                     "count > 8 ? "
-                     "count : 8; v.data = z_malloc(v.cap * sizeof(void*)); v.len = 0; va_list "
-                     "args; "
-                     "va_start(args, count); for(int i=0; i<count; i++) { v.data[v.len++] = "
-                     "va_arg(args, void*); } va_end(args); return v; }\n");
-    }
-    fprintf(out, "#define Vec_push(v, i) _z_vec_push(&(v), (void*)(long)(i))\n");
+        if (g_config.use_cpp)
+        {
+            fprintf(out, "void _z_vec_push(Vec *v, void *item) { if(v->len >= v->cap) { "
+                        "v->cap = v->cap?v->cap*2:8; "
+                        "v->data = static_cast<void**>(realloc(v->data, v->cap * sizeof(void*))); } "
+                        "v->data[v->len++] = item; }\n");
+            fprintf(out, "static inline Vec _z_make_vec(int count, ...) { Vec v = {0}; v.cap = "
+                        "count > 8 ? "
+                        "count : 8; v.data = static_cast<void**>(malloc(v.cap * sizeof(void*))); "
+                        "v.len = 0; va_list "
+                        "args; "
+                        "va_start(args, count); for(int i=0; i<count; i++) { v.data[v.len++] = "
+                        "va_arg(args, void*); } va_end(args); return v; }\n");
+        }
+        else
+        {
+            fprintf(out, "void _z_vec_push(Vec *v, void *item) { if(v->len >= v->cap) { "
+                        "v->cap = v->cap?v->cap*2:8; "
+                        "v->data = z_realloc(v->data, v->cap * sizeof(void*)); } "
+                        "v->data[v->len++] = item; }\n");
+            fprintf(out, "static inline Vec _z_make_vec(int count, ...) { Vec v = {0}; v.cap = "
+                        "count > 8 ? "
+                        "count : 8; v.data = z_malloc(v.cap * sizeof(void*)); v.len = 0; va_list "
+                        "args; "
+                        "va_start(args, count); for(int i=0; i<count; i++) { v.data[v.len++] = "
+                        "va_arg(args, void*); } va_end(args); return v; }\n");
+        }
+        fprintf(out, "#define Vec_push(v, i) _z_vec_push(&(v), (void*)(long)(i))\n");
 
-    if (g_config.is_freestanding)
-    {
         fprintf(out, "#define _z_check_bounds(index, limit) ({ ZC_AUTO _i = "
-                     "(index); if(_i < 0 "
-                     "|| _i >= (limit)) { z_panic(\"index out of bounds\"); } _i; })\n");
+                        "(index); if(_i < 0 "
+                        "|| _i >= (limit)) { fprintf(stderr, \"Index out of bounds: "
+                        "%%ld (limit "
+                        "%%d)\\n\", (long)_i, (int)(limit)); exit(1); } _i; })\n");
     }
     else
     {
-        fprintf(out, "#define _z_check_bounds(index, limit) ({ ZC_AUTO _i = "
+        // We might need to change this later. So TODO.
+         fprintf(out, "#define _z_check_bounds(index, limit) ({ ZC_AUTO _i = "
                      "(index); if(_i < 0 "
-                     "|| _i >= (limit)) { fprintf(stderr, \"Index out of bounds: "
-                     "%%ld (limit "
-                     "%%d)\\n\", (long)_i, (int)(limit)); exit(1); } _i; })\n");
+                     "|| _i >= (limit)) { z_panic(\"index out of bounds\"); } _i; })\n");
     }
 
     SliceType *c = ctx->used_slices;