Selaa lähdekoodia

A cleaner solution

Thareh 1 vuosi sitten
vanhempi
commit
8d79b5d21a
1 muutettua tiedostoa jossa 3 lisäystä ja 4 poistoa
  1. 3 4
      mariadb.mod/mariadb.bmx

+ 3 - 4
mariadb.mod/mariadb.bmx

@@ -416,15 +416,14 @@ Type TMySQLResultSet Extends TQueryResultSet
 		preparedQuery = False
 		preparedQuery = False
 		
 		
 		Local q:Byte Ptr = statement.ToUTF8String()
 		Local q:Byte Ptr = statement.ToUTF8String()
+		Local query:Int = mysql_real_query(conn.handle, q, _strlen(q)) Then
+		MemFree(q)
 		
 		
-		If mysql_real_query(conn.handle, q, _strlen(q)) Then
-			MemFree(q)
+		If query
 			conn.setError("Error executing query", String.FromUTF8String(mysql_error(conn.handle)), TDatabaseError.ERROR_STATEMENT, mysql_errno(conn.handle))
 			conn.setError("Error executing query", String.FromUTF8String(mysql_error(conn.handle)), TDatabaseError.ERROR_STATEMENT, mysql_errno(conn.handle))
 			Return False
 			Return False
 		End If
 		End If
 		
 		
-		MemFree(q)
-		
 		resultHandle = mysql_store_result(conn.handle)
 		resultHandle = mysql_store_result(conn.handle)
 		
 		
 		If Not resultHandle And mysql_field_count(conn.handle) > 0 Then
 		If Not resultHandle And mysql_field_count(conn.handle) > 0 Then