From 5b734c315df0f0fe91e4782df60f1e06afd4e945 Mon Sep 17 00:00:00 2001
From: Josh Holtrop <jholtrop@gmail.com>
Date: Tue, 10 Oct 2023 11:36:46 -0400
Subject: [PATCH] Add "test" rscons task

---
 Rsconscript | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

diff --git a/Rsconscript b/Rsconscript
index 3548c37..c3cd7b9 100644
--- a/Rsconscript
+++ b/Rsconscript
@@ -2,10 +2,19 @@ configure do
   check_d_compiler
 end
 
-env do |env|
+fart_env = env "fart" do |env|
   env["DFLAGS"] += %w[-Werror -O2]
   env["D_IMPORT_PATH"] += %w[src]
 
-  sources = glob("src/**/*.d")
-  env.Program("fart", sources)
+  env["sources"] = glob("src/**/*.d")
+  env.Program("fart", "${sources}")
+end
+
+task "test" do
+  test_env = fart_env.clone "test" do |env|
+    env["DFLAGS"] += %w[-funittest]
+    env.Program("^/farttest", "${sources}")
+  end
+  test_env.process
+  sh test_env.expand("^/farttest")
 end