From cff5a0dfa89ab3a7f95512382cedf88f8e1709d1 Mon Sep 17 00:00:00 2001
From: Jan Tuomi <jans.tuomi@gmail.com>
Date: Fri, 9 Dec 2022 18:16:41 +0200
Subject: Fix purity issue

---
 core/common.milch | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'core/common.milch')

diff --git a/core/common.milch b/core/common.milch
index cddf02f..2dc6698 100644
--- a/core/common.milch
+++ b/core/common.milch
@@ -1,8 +1,11 @@
 ;; Control flow
 ;;;;;;;;;;;;;;;;;;;;;;;;;
 
-(let . (\[f g]
-    (\[x] (f (g x)))))
+; function composition
+(let . (\[f g x] (f (g x))))
+
+; impure version of .
+(let .! (\![f g x] (f (g x))))
 
 (let flow (\[fs]
     (foldr . id (reverse fs))))
-- 
cgit v1.3