--- freem/src/cmd_throw.c	2025/03/09 19:14:24	1.3
+++ freem/src/cmd_throw.c	2025/04/09 19:52:02	1.4
@@ -1,5 +1,5 @@
 /*
- *   $Id: cmd_throw.c,v 1.3 2025/03/09 19:14:24 snw Exp $
+ *   $Id: cmd_throw.c,v 1.4 2025/04/09 19:52:02 snw Exp $
  *    Implementation of the THROW command
  *
  *  
@@ -24,6 +24,9 @@
  *   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.
  *
  *   $Log: cmd_throw.c,v $
+ *   Revision 1.4  2025/04/09 19:52:02  snw
+ *   Eliminate as many warnings as possible while building with -Wall
+ *
  *   Revision 1.3  2025/03/09 19:14:24  snw
  *   First phase of REUSE compliance and header reformat
  *
@@ -50,7 +53,10 @@ MRESULT cmd_throw(MACTION *ra)
     NULLPTRCHK (throw_buf, "cmd_throw");
     
     expr (STRING);
-    if (merr ()) return merr ();
+    if (merr ()) {
+        free (throw_buf);
+        return merr ();
+    }
     
     stcnv_m2c (argptr);