Replace for/break with a try/throw mechanism

1 files changed, 8 insertions, 0 deletions

diff --git a/greet.ell b/greet.ell
index b53f21d..3bfad4e 100644
--- a/greet.ell
+++ b/greet.ell
@@ -2,10 +2,18 @@ set greet {
 	arg _name
 	print 'hello ' @_name '\n'
 }
+set decr {
+	arg _name
+	set @_name (- @@_name 1)
+}
+
+set limit 2
 for (map { arg _x; .. @_x ! } [
 	world
 	creator
+	'darkness, my old friend'
 ]) {
 	arg _whom
 	greet @_whom
+	if (= 0 (decr limit)) { break }
 }