diff --git a/compiler/sempass2.nim b/compiler/sempass2.nim index 7b2be510f9..044da75dbc 100644 --- a/compiler/sempass2.nim +++ b/compiler/sempass2.nim @@ -497,6 +497,34 @@ proc addRaiseEffect(a: PEffects, e, comesFrom: PNode) = if not isDefectException(e.typ): throws(a.exc, e, comesFrom) +proc skipHiddenConv(n: PNode): PNode = + result = n + while true: + case result.kind + of nkHiddenStdConv, nkHiddenSubConv: + result = result[1] + else: break + +proc addRaiseEffectsFromExpr(a: PEffects, e, comesFrom: PNode) = + if e.isNil: + return + let x = skipHiddenConv(e) + case x.kind + of nkStmtList, nkStmtListExpr, nkBlockStmt, nkBlockExpr: + if x.len > 0: + addRaiseEffectsFromExpr(a, x.lastSon, comesFrom) + of nkIfExpr, nkIfStmt: + for branch in items(x): + if branch.len > 0: + addRaiseEffectsFromExpr(a, branch.lastSon, comesFrom) + of nkCaseStmt: + for i in 1.. 0: + addRaiseEffectsFromExpr(a, branch.lastSon, comesFrom) + else: + addRaiseEffect(a, x, comesFrom) + proc addTag(a: PEffects, e, comesFrom: PNode) = var aa = a.tags for i in 0..