From 8fc33633d644bf0ff8bb10d39b3d14fe3bf83088 Mon Sep 17 00:00:00 2001
From: araq <rumpf_a@web.de>
Date: Thu, 18 Sep 2025 09:46:42 +0200
Subject: [PATCH] maybe so...

---
 compiler/ccgstmts.nim | 28 ++++++++++++++++++++++------
 lib/system/excpt.nim  |  4 ++++
 2 files changed, 26 insertions(+), 6 deletions(-)

diff --git a/compiler/ccgstmts.nim b/compiler/ccgstmts.nim
index f297a2d6f8..2fc92741fb 100644
--- a/compiler/ccgstmts.nim
+++ b/compiler/ccgstmts.nim
@@ -858,12 +858,28 @@ proc genRaiseStmt(p: BProc, t: PNode) =
     of excCpp:
       blockLeaveActions(p, howManyTrys = 0, howManyExcepts = p.inExceptBlockLen)
     of excGoto:
-      var inExcept = 0
-      for i in 0..<p.nestedTryStmts.len:
-        if p.nestedTryStmts[i].inExcept:
-          inExcept = 1
-          break
-      blockLeaveActions(p, howManyTrys = 0, howManyExcepts = inExcept)
+      #[
+      There is a difference between:
+
+        try:
+          something()
+        except:
+          # bug #25037
+          try:
+            let tmp = someValue()
+            raise E(tmp)
+          finally:
+            destroy(tmp)
+
+      And:
+
+        try:
+          something()
+        except:
+          raise E
+      ]#
+      if noSafePoints notin p.flags:
+        p.s(cpsStmts).addCallStmt(cgsymValue(p.module, "popAllButOneCurrentExceptions"))
     else:
       discard
     genLineDir(p, t)
diff --git a/lib/system/excpt.nim b/lib/system/excpt.nim
index 5563b1adf0..f8d93145d7 100644
--- a/lib/system/excpt.nim
+++ b/lib/system/excpt.nim
@@ -158,6 +158,10 @@ proc popCurrentException {.compilerRtl, inl.} =
   currException = currException.up
   #showErrorMessage2 "B"
 
+proc popAllButOneCurrentExceptions {.compilerRtl, inl.} =
+  while currException != nil and currException.up != nil:
+    currException = currException.up
+
 proc popCurrentExceptionEx(id: uint) {.compilerRtl.} =
   discard "only for bootstrapping compatbility"