From 3e68a09ae1617551ca1cbf3b5b72621170b4aa0c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?P=C5=99emysl=20Janouch?= Date: Fri, 26 May 2017 19:44:03 +0200 Subject: Remove suck struct context::arguments stank, the "arg" special form stank. The amount of lines this adds can be counted on one hand. --- greet.ell | 12 +++--------- 1 file changed, 3 insertions(+), 9 deletions(-) (limited to 'greet.ell') diff --git a/greet.ell b/greet.ell index 3bfad4e..b2f8ef9 100644 --- a/greet.ell +++ b/greet.ell @@ -1,19 +1,13 @@ -set greet { - arg _name - print 'hello ' @_name '\n' -} set decr { - arg _name - set @_name (- @@_name 1) + set @1 (- @@1 1) } set limit 2 -for (map { arg _x; .. @_x ! } [ +for (map { .. @1 ! } [ world creator 'darkness, my old friend' ]) { - arg _whom - greet @_whom + { print 'hello ' @1 '\n' } @1 if (= 0 (decr limit)) { break } } -- cgit v1.2.3