From 72509dc43ba360485866872e04b19b64105d4d84 Mon Sep 17 00:00:00 2001 From: d6 Date: Sat, 29 Jan 2022 23:13:19 -0500 Subject: [PATCH] regex appears to be working --- regex.tal | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/regex.tal b/regex.tal index f8c1c90..759273e 100644 --- a/regex.tal +++ b/regex.tal @@ -233,13 +233,13 @@ ;c-char JMP2 @c-star ( c^ -> regex* ) - LIT '* emit print +( LIT '* emit print ) POP print ;pop4 JSR2 SWP2 STH2 STH2k ( x1 [x0 x1] ) - LIT '! emit space print +( LIT '! emit space print ) ;alloc-star JSR2 ( r ) STH2r STH2kr ( r x1 x0 [x0] ) - LIT '0 emit newline +( LIT '0 emit newline ) ;emit-arena JSR2 ;remove-from JSR2 ( r [x0] ) LIT '1 emit newline