Freed result from strexpr

usgs-coupled · May 9, 2024 · 6c90534 · 6c90534
1 parent 9898ea2
commit 6c90534
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/src/PBasic.cpp b/src/PBasic.cpp
@@ -3249,6 +3249,7 @@ factor(struct LOC_exec * LINK)
 			break;
 		}
 		std::string min_string = min_name;
+		PhreeqcPtr->PHRQ_free(min_name);
 		Utilities::str_tolower(min_string);
 		std::map<std::string, std::vector<double> >::const_iterator it = PhreeqcPtr->rate_parameters_pk.find(min_string);
 		if (it == PhreeqcPtr->rate_parameters_pk.end())
@@ -3420,6 +3421,7 @@ factor(struct LOC_exec * LINK)
 			break;
 		}
 		std::string min_string = min_name;
+		PhreeqcPtr->PHRQ_free(min_name);
 		Utilities::str_tolower(min_string);
 		std::map<std::string, std::vector<double> >::const_iterator it = PhreeqcPtr->rate_parameters_svd.find(min_string);
 		if (it == PhreeqcPtr->rate_parameters_svd.end())
@@ -3574,6 +3576,7 @@ factor(struct LOC_exec * LINK)
 			break;
 		}
 		std::string min_string = min_name;
+		PhreeqcPtr->PHRQ_free(min_name);
 		Utilities::str_tolower(min_string);
 		std::map<std::string, std::vector<double> >::const_iterator it = PhreeqcPtr->rate_parameters_hermanska.find(min_string);
 		if (it == PhreeqcPtr->rate_parameters_hermanska.end())
@@ -3667,6 +3670,7 @@ factor(struct LOC_exec * LINK)
 			break;
 		}
 		std::string min_string = min_name;
+		PhreeqcPtr->PHRQ_free(min_name);
 		Utilities::str_tolower(min_string);
 		std::map<std::string, cxxNameDouble>::const_iterator it = PhreeqcPtr->mean_gammas.find(min_string);
 		if (it == PhreeqcPtr->mean_gammas.end() || it->second.size() == 0)
@@ -5403,7 +5407,9 @@ cmdput_(struct LOC_exec* LINK)
 	require(toklp, LINK);
 
 	/* get first argumen */
-	std::string s_value = strexpr(LINK);
+	char* str = strexpr(LINK);
+	std::string s_value = str;
+	PhreeqcPtr->PHRQ_free(str);
 
 	for (;;)
 	{