Merge pull request #1279 from Varriount/fix-1216

Fix issue #1216
This commit is contained in:
Simon Hafner 2014-06-18 18:47:45 -05:00
commit be534279da
2 changed files with 15 additions and 1 deletions

View file

@ -625,7 +625,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: