diff options
| author | Drahflow <drahflow@gmx.de> | 2013-03-03 15:57:12 +0100 |
|---|---|---|
| committer | Drahflow <drahflow@gmx.de> | 2013-03-03 15:57:12 +0100 |
| commit | 0e1adc46b324f108d0caaa4cd977ad1043ff3fe2 (patch) | |
| tree | a3d48da91571c9f87ed355bf02f33fcb06c9bdff /compiler/standard.ey | |
| parent | 12d0948fa89e55b6a9460cf676ea73fc7851ab91 (diff) | |
LISP style conds
Diffstat (limited to 'compiler/standard.ey')
| -rw-r--r-- | compiler/standard.ey | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/compiler/standard.ey b/compiler/standard.ey index b294da8..71d4616 100644 --- a/compiler/standard.ey +++ b/compiler/standard.ey @@ -49,4 +49,11 @@ [ s keys { s -01 . } each ] } /values deff +{ _ =*conds len ==max + 0 ==i { i max lt } { + i conds { i 1 add conds * max =i } { } ? * + i 2 add =i + } loop +} /conds deff + # vim: syn=elymas |