Fix nested boolean case - close #4510

This commit is contained in:
Gabriel Horner
2022-03-10 11:41:01 -05:00
committed by Tienson Qin
parent e959e257b7
commit 3a19687988
2 changed files with 8 additions and 7 deletions

View File

@@ -192,12 +192,7 @@
nested-and?
result
(and (zero? level) (= 'and fe))
(if (list? (first clauses))
result
(distinct (apply concat clauses)))
(and (zero? level) (= 'or fe))
(and (zero? level) (contains? #{'and 'or} fe))
result
:else