diff options
| -rw-r--r-- | modules/language/python/module/re/compile.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/modules/language/python/module/re/compile.scm b/modules/language/python/module/re/compile.scm index aea2c27..7f33124 100644 --- a/modules/language/python/module/re/compile.scm +++ b/modules/language/python/module/re/compile.scm @@ -74,13 +74,13 @@ (define dotall (<p-lambda> (c) (let ((x (fluid-ref *flags*))) - (unless (zero? (logand x DOTALL)) + (when (not (zero? (logand x DOTALL))) (<p-cc> c))))) (define multiline (<p-lambda> (c) (let ((x (fluid-ref *flags*))) - (unless (zero? (logand x MULTILINE)) + (when (not (zero? (logand x MULTILINE))) (<p-cc> c))))) (define (gt f) |