From aa0b9f4e49a0da794e59d2803dc4654ff66824fb Mon Sep 17 00:00:00 2001
From: Ralph Ronnquist <ralph.ronnquist@gmail.com>
Date: Mon, 24 May 2021 00:47:37 +1000
Subject: [PATCH] expand DOFORTH to allow multiple ptrs

---
 machine.asm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/machine.asm b/machine.asm
index 6a133a1..4628077 100644
--- a/machine.asm
+++ b/machine.asm
@@ -97,9 +97,12 @@ macro ENDFORTH {
 ;;; ========================================
 ;;; The DOFORTH lays out a single FORTH call
 
-macro DOFORTH label {
+macro DOFORTH [label] {
+common
 	FORTH
+forward
 	dq label
+common
 	ENDFORTH
 }
 
-- 
2.39.2