small typo fix
authorStefan Israelsson Tampe <stefan.itampe@gmail.com>
Fri, 15 Sep 2017 22:56:18 +0000 (00:56 +0200)
committerStefan Israelsson Tampe <stefan.itampe@gmail.com>
Fri, 15 Sep 2017 22:56:18 +0000 (00:56 +0200)
modules/language/python/compile.scm
modules/language/python/yield.scm

index a14c342de950fbe11e45ffb5ea0f02ca8cabd8e1..94674132fd1224d31f142cb6de1b39c9ca832e10 100644 (file)
       ((_ #t f ab code)
        (pr 'def-wrap #'f 'true)
        #'(lambda x
-           (define obj   (make <yield>))
-           (define ab (make-prompt-tag))
+           (define obj (make <yield>))
+           (define ab  (make-prompt-tag))
            (slot-set! obj 'k #f)
            (slot-set! obj 'closed #f)
            (slot-set! obj 's
index 289eb4d2aa941da094faec0aa4239abf8e4fd893..22ad8727f684b87d70c8849615f9a8dd304df9de 100644 (file)
@@ -55,7 +55,7 @@
                                                 lam)))
                                   (apply values l))))
                         lam))))
-        ob))))
+        obj))))
 
 (define-syntax-rule (define-generator (f . args) code ...)
   (define f (make-generator args code ...)))