diff options
Diffstat (limited to 'modules/language/python/module')
-rw-r--r-- | modules/language/python/module/re.scm | 3 | ||||
-rw-r--r-- | modules/language/python/module/re/compile.scm | 2 |
2 files changed, 2 insertions, 3 deletions
diff --git a/modules/language/python/module/re.scm b/modules/language/python/module/re.scm index 4da2138..5ba3114 100644 --- a/modules/language/python/module/re.scm +++ b/modules/language/python/module/re.scm @@ -329,8 +329,7 @@ (() #t))) (set self '__t t) - (set self 'regs (__regs self)) - (pk (span self))))) + (set self 'regs (__regs self))))) (define er (list 'er)) (define group diff --git a/modules/language/python/module/re/compile.scm b/modules/language/python/module/re/compile.scm index 210a2ad..e259e3b 100644 --- a/modules/language/python/module/re/compile.scm +++ b/modules/language/python/module/re/compile.scm @@ -36,7 +36,7 @@ (define dotall (<pp-lambda> (L c) (let ((x (fluid-ref *flags*))) - (when (pk (not (= 0 (logand x DOTALL)))) + (when (not (= 0 (logand x DOTALL))) (<p-cc> (wrap L c)))))) (define multiline |