Add debug flag (-d)

1 files changed, 9 insertions, 0 deletions

diff --git a/config.ha b/config.ha
index b70341a..b959fd5 100644
--- a/config.ha
+++ b/config.ha
@@ -5,6 +5,7 @@ use os;
 use fs;
 use strings;
 use io;
+use fmt;
 
 type config = struct {
 	tasksdir: str,
@@ -59,3 +60,11 @@ fn strcerror(e: cerror) str = {
 		abort();
 	};
 };
+
+fn printconfig(cfg: config) void = {
+	fmt::errorln(cfg.tasksdir)!;
+	fmt::errorln(cfg.context)!;
+	for (const tag .. cfg.tags) {
+		fmt::errorln(tag)!;
+	};
+};