This is a partial revert of commit
4197555e6f7fa732bb5bf605c850972bdd84ad29.
This problem was reported by Ludovic Courtès.
* modules/language/python/module/re/compile.scm (multiline, dotall):
Fix unexpected compilation error by not using "unless".
(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)