diff options
| author | Drahflow <drahflow@gmx.de> | 2013-01-23 01:56:25 +0100 |
|---|---|---|
| committer | Drahflow <drahflow@gmx.de> | 2013-01-23 01:56:25 +0100 |
| commit | d7fbde238c596c3f7cbc5471a0efb32481bdf6b8 (patch) | |
| tree | 988353c9d4dcd64f9f57a93bea60a962f588e04e /examples/working/fold.ey | |
| parent | e5b6407246b3fd64014f92e80679274cb1a7bfde (diff) | |
Thinner scope handling when necessary
Functions without own scope don't unneccesary save
the current scope. This makes < > possible.
Also: dearray implemented
Diffstat (limited to 'examples/working/fold.ey')
| -rw-r--r-- | examples/working/fold.ey | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/examples/working/fold.ey b/examples/working/fold.ey index 9ae19d5..d3b20ce 100644 --- a/examples/working/fold.ey +++ b/examples/working/fold.ey @@ -1,4 +1,6 @@ -{ =f =a a len =l +|defv "==" deff + +{ ==f ==a a len ==l l { 0 a * 1 l 1 sub range { a * f * } each @@ -6,9 +8,9 @@ ? * } /fold deff -{ =f _ len =l l dearray l 1 sub f rep } /foldshort deff +{ ==f _ len ==l l dearray l 1 sub f rep } /foldshort deff -{ =f { f fold } } /enfold deff +{ ==f { f fold } } /enfold deff [ 1 2 3 ] _ |add fold dump |