This commit is contained in:
Clay Sweetser
2014-05-26 07:24:57 -04:00
parent 1658a29ec6
commit ec23f5ec0a

View File

@@ -484,7 +484,7 @@ proc factImplies(fact, prop: PNode): TImplication =
# == not a or not b == not (a and b)
let arg = fact.sons[1]
case arg.getMagic
of mIsNil:
of mIsNil, mEqRef:
return ~factImplies(arg, prop)
of mAnd:
# not (a and b) means not a or not b: