From 2d495a461981623692859d2d50d3daf3633a26c9 Mon Sep 17 00:00:00 2001
From: Nat Quayle Nelson <natquaylenelson@gmail.com>
Date: Sun, 27 Oct 2024 18:03:25 -0500
Subject: [PATCH] fix fossilizing Void->Void

---
 src/kiss/Kiss.hx | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/kiss/Kiss.hx b/src/kiss/Kiss.hx
index cac625c..bb521d1 100644
--- a/src/kiss/Kiss.hx
+++ b/src/kiss/Kiss.hx
@@ -552,7 +552,7 @@ class Kiss {
     static final fossilStart = "\n\t// BEGIN KISS FOSSIL CODE\n\t// "; // TODO remove the boneyard comments
     static final fossilEnd = "\t// END KISS FOSSIL CODE\n";
 
-    static function complexTypeToString(type:ComplexType) {
+    static function complexTypeToString(type:ComplexType, emptyForVoid = false) {
         var fossilCode = "";
         switch (type) {
             case TPath(path):
@@ -577,7 +577,7 @@ class Kiss {
                 }
             case TFunction(args, ret):
                 fossilCode += "(";
-                fossilCode += [for (arg in args) complexTypeToString(arg)].join(",");
+                fossilCode += [for (arg in args) complexTypeToString(arg, true)].join(",");
                 fossilCode += ")->";
                 fossilCode += complexTypeToString(ret);
             case TAnonymous(fields):
@@ -595,6 +595,7 @@ class Kiss {
             default:
                 fossilCode += '{ComplexType $type not supported for fossilization}';
         }
+        if (emptyForVoid && fossilCode == "Void") return "";
         return fossilCode;
     }