Initial commit

src/New/Value/Bool.c

@@ -0,0 +1,8 @@
+#include "../../../include/ground.h"
+
+GroundValue _GroundNewValueBool(GroundBool in) {
+    return (GroundValue) {
+        .as.Bool = in,
+        .type = Ground.New.Type(GroundType_Bool)
+    };
+}

src/New/Value/Char.c

@@ -0,0 +1,8 @@
+#include "../../../include/ground.h"
+
+GroundValue _GroundNewValueChar(GroundChar in) {
+    return (GroundValue) {
+        .as.Char = in,
+        .type = Ground.New.Type(GroundType_Char)
+    };
+}

src/New/Value/Double.c

@@ -0,0 +1,8 @@
+#include "../../../include/ground.h"
+
+GroundValue _GroundNewValueDouble(GroundDouble in) {
+    return (GroundValue) {
+        .as.Double = in,
+        .type = Ground.New.Type(GroundType_Double)
+    };
+}

src/New/Value/Function.c

@@ -0,0 +1,8 @@
+#include "../../../include/ground.h"
+
+GroundValue _GroundNewValueFunction(GroundFunction in) {
+    return (GroundValue) {
+        .as.Function = in,
+        .type = Ground.New.Type(GroundType_Function)
+    };
+}

src/New/Value/Int.c

@@ -0,0 +1,8 @@
+#include "../../../include/ground.h"
+
+GroundValue _GroundNewValueInt(GroundInt in) {
+    return (GroundValue) {
+        .as.Int = in,
+        .type = Ground.New.Type(GroundType_Int)
+    };
+}

src/New/Value/List.c

@@ -0,0 +1,8 @@
+#include "../../../include/ground.h"
+
+GroundValue _GroundNewValueList(GroundList in) {
+    return (GroundValue) {
+        .as.List = in,
+        .type = Ground.New.Type(GroundType_List)
+    };
+}

src/New/Value/Object.c

@@ -0,0 +1,8 @@
+#include "../../../include/ground.h"
+
+GroundValue _GroundNewValueObject(GroundObject in) {
+    return (GroundValue) {
+        .as.Object = in,
+        .type = Ground.New.Type(GroundType_Object, *in.type)
+    };
+}

src/New/Value/String.c

@@ -0,0 +1,9 @@
+#include "../../../include/ground.h"
+
+GroundValue _GroundNewValueString(GroundString in) {
+    return (GroundValue) {
+        .as.String = in,
+        .type = Ground.New.Type(GroundType_String)
+    };
+}
+

src/New/Value/Struct.c

@@ -0,0 +1,9 @@
+#include "../../../include/ground.h"
+
+GroundValue _GroundNewValueStruct(GroundStruct in) {
+    return (GroundValue) {
+        .as.Struct = in,
+        .type = Ground.New.Type(GroundType_Struct)
+    };
+}
+