From 8151ce5ffec4283a3bc1eeea52b8f9b17cb5d069 Mon Sep 17 00:00:00 2001
From: dan <me@danrh.co.uk>
Date: Mon, 29 May 2023 10:54:33 -0400
Subject: tests: add initial tests and test runner script

---
 tests/define-mult.forth | 6 ++++++
 1 file changed, 6 insertions(+)
 create mode 100644 tests/define-mult.forth

(limited to 'tests/define-mult.forth')

diff --git a/tests/define-mult.forth b/tests/define-mult.forth
new file mode 100644
index 0000000..5b6f798
--- /dev/null
+++ b/tests/define-mult.forth
@@ -0,0 +1,6 @@
+INPUT
+: multrec over if rot swap over + rot 1 - swap multrec then ;
+: mult 0 multrec ;
+6 8 mult .
+OUTPUT
+48
-- 
cgit v1.2.3