cdo/wipforth
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Implement block comments

Browse Source
This commit is contained in:
Camden Dixie O'Brien
2026-03-01 15:30:58 +00:00
parent d60708645d
commit 922a0e6e31
1 changed files with 12 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
prelude.f
View File

@@ -38,6 +38,18 @@
: RECURSE LATEST @ >CFA , ; IMMEDIATE : RECURSE LATEST @ >CFA , ; IMMEDIATE
\ Block comments (with nesting)
: (
BEGIN
KEY DUP
40 = IF RECURSE THEN
41 =
UNTIL
; IMMEDIATE
( ( Take that, C ) )
\ Peripheral register addresses \ Peripheral register addresses
: TXBUF 0 ; : TXBUF 0 ;