From: Mike Lowis <mike.lowis@gentex.com>
Date: Thu, 20 Jun 2024 19:09:19 +0000 (-0400)
Subject: delete old hard coded main
X-Git-Url: https://git.mdlowis.com/?a=commitdiff_plain;h=0f1a12f967f6ba8845f7d26301167a5017969627;p=proto%2Fcerise-c.git

delete old hard coded main
---

diff --git a/runtime/runtime.c b/runtime/runtime.c
deleted file mode 100644
index 10e23a9..0000000
--- a/runtime/runtime.c
+++ /dev/null
@@ -1,115 +0,0 @@
-/**
-
-  Immediate Tag Values:
-      Nil        {  0x00
-      Undefined  {  0x01
-      False      {  0x02
-      True       {  0x03
-                  / 0x04
-      Unused     {
-                  \ 0x07
-
-  NaN Tag Values:
-      Object      {  0000:PPPP:PPPP:PPPP
-      Array       {  0001:PPPP:PPPP:PPPP
-      String      {  0002:PPPP:PPPP:PPPP
-      Block       {  0003:PPPP:PPPP:PPPP
-      NativeBlock {  0004:PPPP:PPPP:PPPP
-      Symbol      {  0005:0000:IIII:IIII
-      Integer     {  0006:0000:IIII:IIII
-                   / 0007:****:****:****
-      Double      {          ...
-                   \ FFFF:****:****:****
-
-*/
-
-#include <runtime.h>
-
-/* Start The Program
- *************************************************/
-
-int main(int argc, char** argv)
-{
-    String *str1, *str2;
-    Value val;
-
-    val = MakeNil();
-    assert(IsNil(val));
-    assert(!IsFalse(val));
-    assert(!IsTrue(val));
-    assert(!IsBool(val));
-    assert(!IsNumber(val));
-    assert(!IsInt(val));
-    assert(!IsReal(val));
-    assert(!IsString(val));
-
-    val = MakeBool(true);
-    assert(!IsNil(val));
-    assert(!IsFalse(val));
-    assert(IsTrue(val));
-    assert(IsBool(val));
-    assert(!IsNumber(val));
-    assert(!IsInt(val));
-    assert(!IsReal(val));
-    assert(!IsString(val));
-
-    val = MakeBool(false);
-    assert(!IsNil(val));
-    assert(IsFalse(val));
-    assert(!IsTrue(val));
-    assert(IsBool(val));
-    assert(!IsNumber(val));
-    assert(!IsInt(val));
-    assert(!IsReal(val));
-    assert(!IsString(val));
-
-    val = MakeInt(42);
-    assert(!IsNil(val));
-    assert(!IsFalse(val));
-    assert(!IsTrue(val));
-    assert(!IsBool(val));
-    assert(IsNumber(val));
-    assert(IsInt(val));
-    assert(!IsReal(val));
-    assert(!IsString(val));
-
-    val = MakeReal(42.0);
-    assert(!IsNil(val));
-    assert(!IsFalse(val));
-    assert(!IsTrue(val));
-    assert(!IsBool(val));
-    assert(IsNumber(val));
-    assert(!IsInt(val));
-    assert(IsReal(val));
-    assert(!IsString(val));
-
-    val = MakeString("Hi!");
-    assert(!IsNil(val));
-    assert(!IsFalse(val));
-    assert(!IsTrue(val));
-    assert(!IsBool(val));
-    assert(!IsNumber(val));
-    assert(!IsInt(val));
-    assert(!IsReal(val));
-    assert(IsString(val));
-    assert(!strcmp(ValueAsString(val)->bytes, "Hi!"));
-
-    val = ToString(MakeNil());
-    assert(!strcmp(ValueAsString(val)->bytes, "nil"));
-
-    val = ToString(MakeBool(true));
-    assert(!strcmp(ValueAsString(val)->bytes, "true"));
-
-    val = ToString(MakeBool(false));
-    assert(!strcmp(ValueAsString(val)->bytes, "false"));
-
-    val = ToString(MakeInt(42));
-    assert(!strcmp(ValueAsString(val)->bytes, "42"));
-
-    val = ToString(MakeReal(42.5));
-    assert(!strcmp(ValueAsString(val)->bytes, "42.500000"));
-
-    extern Value Main(void);
-    (void)Main();
-    return 0;
-}