Aria

commit f430fbd893a75b32519980ef7adb25a7a10cc37b
parent 3311ab95d241777836fcd7a0d8c1b44d87db9e0a
Author: m21c <ho*******@gmail.com>
Date:   Fri, 27 Jun 2025 18:57:59 +0200

cleanup

Diffstat:
M
compiler.c
 | 
22
++++++++++++++++++++++

1 file changed, 22 insertions(+), 0 deletions(-)
diff --git a/compiler.c b/compiler.c
@@ -1984,6 +1984,8 @@ makedocket(Node *node)
 {
 	Docket *docket;
 
+	(void) node; /* @todo implement. */
+
 	assert(dockettop < lengthof(docketbuf));
 
 	docket = docketbuf + dockettop;
@@ -2068,6 +2070,7 @@ finddeclaration(Source *source, Env *startenv, int key)
 	return NULL;
 }
 
+#if 0
 static Env *
 setheadenv(Source *source, EnvKind kind)
 {
@@ -2090,6 +2093,7 @@ setheadenv(Source *source, EnvKind kind)
 
 	return env;
 }
+#endif
 
 static Env *
 pushenv(Source *source, EnvKind kind)
@@ -4843,6 +4847,8 @@ fetchblocks(Block *block, Node *expr)
 	}
 }
 
+
+#if 0
 static void
 debugprintconduct(Conduct *conduct, int indent);
 
@@ -4893,12 +4899,22 @@ debugprintconduct(Conduct *conduct, int indent)
 		case CUNREACH: printf("\x1b[34mconduct<unreach>\x1b[0m\n"); break;
 		case CSCOPE: printf("\x1b[34mconduct<scope>\x1b[0m\n"); break;
 		case CLABEL: printf("\x1b[34mconduct<label>\x1b[0m\n"); break;
+		case CBLOCK:
+			break;
 		}
 
 		if (curr->head)
 			debugprintblock(curr->head, indent + 1);
 	}
 }
+#else
+static void
+debugprintblock(Block *block, int indent)
+{
+	(void) block;
+	(void) indent;
+}
+#endif
 
 static void
 dataflow(Block *block, Node *expr)
@@ -4914,6 +4930,8 @@ dataflow(Block *block, Node *expr)
 
 /* @section data-flow analysis version 2 */
 
+#if 0
+
 static void
 fetchsections(Analysis *analysis, Node *expr)
 {
@@ -4921,6 +4939,8 @@ fetchsections(Analysis *analysis, Node *expr)
 
 nextnode:
 	switch (expr->kind) {
+	default:
+		break;
 	}
 }
 
@@ -4932,6 +4952,8 @@ dataflow2(Analysis *analysis, Node *expr)
 	fetchsections(analysis, expr);
 }
 
+#endif
+
 
 
 // }}}