slim compiler interface a little

Author: UplinkCoder

compiler_intrinsics/buildlib.sh

@@ -0,0 +1,3 @@
+#!/bin/sh
+
+gcc metac_compiler_interface.c -fPIC -shared -Os -fno-exceptions -fno-unwind-tables -fno-asynchronous-unwind-tables -fno-stack-protector -o libcompiler.so

compiler_intrinsics/metac_compiler_interface.c

@@ -1,56 +1,40 @@
 #include <stdio.h>
-#include "../os/os.c"
 #include "metac_compiler_interface.h"
 #include "../semantic/metac_type.h"
 #include "metac_type_kind.c"
 
 extern metac_compiler_t compiler;
 
-uint32_t compiler_CurrentTimeStamp ()
-{
-    uint32_t ts;
-    OS.GetTimeStamp(&ts);
-    return ts;
-}
-
-void compiler_Message(struct metac_compiler_t* compilerP,
+static void compiler_Message(struct metac_compiler_t* compilerP,
                       const char* str)
 {
 }
 
-void compiler_Error(struct metac_compiler_t* compilerP,
+static void compiler_Error(struct metac_compiler_t* compilerP,
                     const char* str)
 {
 
 }
 
-metac_type_kind_t compiler_GetTypeKind (uint32_t T)
+static metac_type_kind_t compiler_GetTypeKind (uint32_t T)
 {
     metac_type_index_t typeIdx;
     typeIdx.v = T;
     return (metac_type_kind_t)TYPE_INDEX_KIND(typeIdx);
 }
 
-const char* compiler_TypeKindString(metac_type_kind_t T)
+static const char* compiler_TypeKindString(metac_type_kind_t T)
 {
     return MetaCTypeKind_toChars(T);
 }
 
-const char* compiler_Help ()
+static const char* compiler_Help ()
 {
     return "Hello I am Mr. compiler. I cannot help you ...";
 }
 
 
-void compiler_PrintInt(int32_t value)
-{
-    char Buffer[24];
-    int len = sprintf(Buffer, "%d", value);
-    Buffer[len] = '\0';
-    //compiler.Message(&compiler, Buffer, 0);
-    fprintf(stderr, "-> %s\n", Buffer);
-}
-metac_enum_members_t* compiler_GetEnumMembers (struct metac_compiler_t* compilerP, uint32_t T)
+static metac_enum_members_t* compiler_GetEnumMembers (struct metac_compiler_t* compilerP, uint32_t T)
 {
 
 }
@@ -61,7 +45,6 @@ metac_enum_members_t* compiler_GetEnumMembers (struct metac_compiler_t* compiler
 metac_compiler_t compiler = {
     0,
 
-    compiler_CurrentTimeStamp,
     compiler_Help,
 
     compiler_Message,
@@ -70,8 +53,6 @@ metac_compiler_t compiler = {
     compiler_GetTypeKind,
     compiler_TypeKindString,
 
-    compiler_PrintInt,
-
     compiler_GetEnumMembers,
 
      "v0.1",

compiler_intrinsics/metac_compiler_interface.h

@@ -40,8 +40,6 @@ typedef struct metac_compiler_t
 {
     void* semanticState;
 
-    uint32_t (*CurrentTimeStamp) ();
-
     const char* (*Help) ();
 
     void (*Message) (struct metac_compiler_t* compilerP,
@@ -53,8 +51,6 @@ typedef struct metac_compiler_t
     metac_type_kind_t (*GetTypeKind) (uint32_t T);
     const char* (*TypeKindString)(metac_type_kind_t Kind);
 
-    void (*PrintInt) (int32_t value);
-
     metac_enum_members_t* (*GetEnumMembers) (struct metac_compiler_t* compilerP, uint32_t T);
 
     const char* Version;