From e2142d9dbd871da87a091bcca2c5ffc6841dc1f5 Mon Sep 17 00:00:00 2001
From: Robert Bendun <robben@st.amu.edu.pl>
Date: Wed, 25 May 2022 04:34:37 +0200
Subject: [PATCH] Added each to prelude

---
 prelude.mq | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/prelude.mq b/prelude.mq
index daf6190..e242c66 100644
--- a/prelude.mq
+++ b/prelude.mq
@@ -12,4 +12,11 @@ var map = [array fun|
 	iter 0 (len array)
 ];
 
+var each = [array fun|
+	var iter = [start stop |
+		if (start >= stop) [nil] [fun (array.start); iter (start+1) stop]
+	];
+	iter 0 (len array)
+];
+
 var cdur = c47;