bugfix: exception tracking (still disabled)

This commit is contained in:
Araq 2012-11-01 19:57:48 +01:00
commit 224f42bbd7
3 changed files with 3 additions and 3 deletions

View file

@ -219,8 +219,7 @@ proc checkRaisesSpec(spec, real: PNode) =
for r in items(real):
block search:
for s in 0 .. <spec.len:
# s supertype of r?
if inheritanceDiff(spec[s].typ, r.excType) <= 0:
if inheritanceDiff(r.excType, spec[s].typ) <= 0:
used.incl(s)
break search
# XXX call graph analysis would be nice here!