Implement block comments

2026-03-01 15:30:58 +00:00
parent d60708645d
commit 922a0e6e31
1 changed files with 12 additions and 0 deletions
--- a/prelude.f
+++ b/prelude.f
@@ -38,6 +38,18 @@

 : RECURSE LATEST @ >CFA , ; IMMEDIATE

+\ Block comments (with nesting)
+
+: (
+  BEGIN
+    KEY DUP
+    40 = IF RECURSE THEN
+    41 =
+  UNTIL
+; IMMEDIATE
+
+( ( Take that, C ) )
+
 \ Peripheral register addresses

 : TXBUF 0 ;