diff options
| author | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-07-13 15:10:02 +0200 |
|---|---|---|
| committer | Stefan Israelsson Tampe <stefan.itampe@gmail.com> | 2018-07-13 15:10:02 +0200 |
| commit | 7d47faa9e658b14d67697856b3980b2ffa9d6776 (patch) | |
| tree | 51b54ae3860745de258665911d34474a745c75da /modules/language/python/range.scm | |
| parent | da7f3a7234edcd9dbb7d766f4f01c3d08cf33729 (diff) | |
python re module now implemeted and works partially
Diffstat (limited to 'modules/language/python/range.scm')
| -rw-r--r-- | modules/language/python/range.scm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/modules/language/python/range.scm b/modules/language/python/range.scm index 83c0313..85a45ac 100644 --- a/modules/language/python/range.scm +++ b/modules/language/python/range.scm @@ -41,8 +41,9 @@ (set self '_c k))))))) (define __iter__ - (make-generator (self) - (lambda (yield self) + (lambda (self) + ((make-generator () + (lambda (yield) (let* ((a (ref self '_a)) (b (ref self '_b)) (c (ref self '_c)) @@ -52,7 +53,7 @@ (if (op i b) (begin (yield i) - (lp (+ i c))))))))) + (lp (+ i c))))))))))) (define __reversed__ (lambda (self) |