Started on 16-bit operations

Author: edwardatki

makefile

@@ -17,7 +17,7 @@ tests/build/%.asm: tests/%.c qcc
 	mkdir -p tests/build
 	rm -f tests/build/$(notdir $(basename $<)).asm
 	rm -f tests/build/$(notdir $(basename $<)).log
-	cd tests; ../qcc $(notdir $<) -o build/$(notdir $(basename $<)).asm >> build/$(notdir $(basename $<)).log || true
+	cd tests; ../qcc $(notdir $<) -o build/$(notdir $(basename $<)).asm >> build/$(notdir $(basename $<)).log || rm -f build/$(notdir $(basename $<)).asm || true
 	cat tests/build/$(notdir $(basename $<)).log
 
 # Assemble test

src/generator.c

@@ -382,7 +382,8 @@ static struct Node* assignment () {
         } else if ((node->type->kind == TY_INT) && (node->Assignment.right->type->kind == TY_POINTER)) {
             warning(node->token, "assignment to '%s' from '%s' makes integer from pointer without a cast", node->type->name, node->Assignment.right->type->name);
         } else if (get_common_type(node->token, node->type, node->Assignment.right->type)->kind != node->type->kind) {
-            error(node->token, "cannot assign '%s' to '%s'", node->Assignment.right->type->name, node->type->name);
+            // error(node->token, "cannot assign '%s' to '%s'", node->Assignment.right->type->name, node->type->name);
+            warning(node->token, "assignment makes '%s' from '%s' without a cast", node->type->name, node->Assignment.right->type->name);
         }
     }
 
@@ -597,20 +598,6 @@ static struct Node* program () {
                 eat();
             }
         }
-
-        // // TODO this is gross please fix
-        // struct Token* revert_token = current_token;
-        // struct Type* type_node = type();
-        // eat(TK_ID);
-        // int is_func = peek(TK_LPAREN);
-        // current_token = revert_token;
-
-        // if (is_func) {
-        //     list_add(&node->Program.function_declarations, function_decl());
-        // } else {
-        //     list_add(&node->Program.global_variables, var_decl());
-        //     eat_kind(TK_SEMICOLON);
-        // }
     }
     return node;
 }

src/parser.c

@@ -6,6 +6,7 @@ struct Register {
     int size;
     int free;
 
+    struct Register* parent_reg;
     struct Register* high_reg;
     struct Register* low_reg;
 };

src/register.h

@@ -0,0 +1,48 @@
+#ifndef _SNIPPETS_H
+#define _SNIPPETS_H
+
+void add_u8(FILE* fp, struct Register* left_reg, struct Register* right_reg) {
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov a, %s\n", left_reg->name);
+    fprintf(fp, "\tadd %s\n", right_reg->name);
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov %s, a\n", left_reg->name);
+}
+
+void sub_u8(FILE* fp, struct Register* left_reg, struct Register* right_reg) {
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov a, %s\n", left_reg->name);
+    fprintf(fp, "\tsub %s\n", right_reg->name);
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov %s, a\n", left_reg->name);
+}
+
+void and_u8(FILE* fp, struct Register* left_reg, struct Register* right_reg) {
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov a, %s\n", left_reg->name);
+    fprintf(fp, "\tand %s\n", right_reg->name);
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov %s, a\n", left_reg->name);
+}
+
+void or_u8(FILE* fp, struct Register* left_reg, struct Register* right_reg) {
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov a, %s\n", left_reg->name);
+    fprintf(fp, "\tor %s\n", right_reg->name);
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov %s, a\n", left_reg->name);
+}
+
+void cmp_u8(FILE* fp, struct Register* left_reg, struct Register* right_reg) {
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov a, %s\n", left_reg->name);
+    fprintf(fp, "\tcmp %s\n", right_reg->name);
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov %s, a\n", left_reg->name);
+}
+
+void zero_u8(FILE* fp, struct Register* left_reg) {
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov a, %s\n", left_reg->name);
+    fprintf(fp, "\tcmp 0\n");
+    fprintf(fp, "\tlde\n");
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov %s, a\n", left_reg->name);
+}
+
+void equal_u8(FILE* fp, struct Register* left_reg, struct Register* right_reg) {
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov a, %s\n", left_reg->name);
+    fprintf(fp, "\tcmp %s\n", right_reg->name);
+    fprintf(fp, "\tlde\n");
+    if (strcmp(left_reg->name, "a") != 0) fprintf(fp, "\tmov %s, a\n", left_reg->name);
+}
+
+#endif

src/snippets.h

@@ -4,11 +4,11 @@ char main() {
     x = 5;
 
     if (x != 5) return 1;
-    if (x > 5) return 1;
-    if (x < 5) return 1;
-    if (x >= 6) return 1;
-    if (x <= 4) return 1;
+    if (x > 5) return 2;
+    if (x < 5) return 3;
+    if (x >= 6) return 4;
+    if (x <= 4) return 5;
     if (x == 5) return 0;
 
-    return 0;
+    return 6;
 }

tests/006.c

@@ -0,0 +1,19 @@
+// Test 16 bit operations
+
+#include "io.h"
+
+char main() {
+    int x = 1234;
+    int y = 4321;
+    int z = 1111;
+
+    x = x + y - z;
+
+    print_hex_u16(x);
+    print("\n");
+
+    if (x != 4444) return 1;
+    if (x == 4444) return 0;
+
+    return 2;
+}