From a300d758a9dae43d0155b0f18742b4e5ede8a66b Mon Sep 17 00:00:00 2001 From: Nat Quayle Nelson Date: Tue, 16 Sep 2025 10:12:40 -0500 Subject: [PATCH] implement begin --- src/kiss/KissInterp2.kiss | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/kiss/KissInterp2.kiss b/src/kiss/KissInterp2.kiss index 387d693..a463628 100644 --- a/src/kiss/KissInterp2.kiss +++ b/src/kiss/KissInterp2.kiss @@ -28,6 +28,10 @@ (if val (evalCC (second args) cc) (evalCC (third args) cc))) + =>"begin" + ->[args cc] + (_evalAllCC args ->values + (cc (values.pop))) ]) (method :ReaderExp read [:Dynamic input]