From: Mohammad-Reza Nabipoor <mnabipoor@gnu.org>
Date: Wed, 25 Sep 2024 10:05:09 +0000 (+0200)
Subject: WIP Fix poke_command to reset lexical cuckolding after error
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=refs%2Fheads%2Fusers%2Fmnabipoor%2Fpoke-gdb;p=thirdparty%2Fbinutils-gdb.git

WIP Fix poke_command to reset lexical cuckolding after error
---

diff --git a/gdb/poke.c b/gdb/poke.c
index 37801bb6b56..d8957fab55b 100644
--- a/gdb/poke.c
+++ b/gdb/poke.c
@@ -929,8 +929,8 @@ poke_command (const char *args, int from_tty)
 			     &exit_exception)
 	      != PK_OK
 	  || exit_exception != PK_NULL)
-	/* Poke compiler will right error message to the output.  */
-	goto error;
+	/* Poke compiler will write error message to the output.  */
+	goto done;
     }
   else
     {
@@ -941,7 +941,7 @@ poke_command (const char *args, int from_tty)
 				&exit_exception)
 	      != PK_OK
 	  || exit_exception != PK_NULL)
-	goto error;
+	goto done;
 
       if (val != PK_NULL)
 	{
@@ -950,9 +950,9 @@ poke_command (const char *args, int from_tty)
 	}
     }
 
+done:
   pk_set_lexical_cuckolding_p (poke_compiler (), 0);
 
-error:
   if (exit_exception != PK_NULL)
     poke_handle_exception (exit_exception);
 }