Changeset: 7084820ef155 for MonetDB
URL: https://dev.monetdb.org/hg/MonetDB/rev/7084820ef155
Modified Files:
        monetdb5/mal/mal_interpreter.c
Branch: default
Log Message:

Free previous exception before overwriting


diffs (26 lines):

diff --git a/monetdb5/mal/mal_interpreter.c b/monetdb5/mal/mal_interpreter.c
--- a/monetdb5/mal/mal_interpreter.c
+++ b/monetdb5/mal/mal_interpreter.c
@@ -944,8 +944,10 @@ str runMALsequence(Client cntxt, MalBlkP
 
                        /* unknown exceptions lead to propagation */
                        if (exceptionVar == -1) {
-                if (cntxt->querytimeout && mb->starttime && GDKusec()- 
mb->starttime > cntxt->querytimeout)
-                    ret= createException(MAL, "mal.interpreter", 
SQLSTATE(HYT00) RUNTIME_QRY_TIMEOUT);
+                               if (cntxt->querytimeout && mb->starttime && 
GDKusec()- mb->starttime > cntxt->querytimeout) {
+                                       freeException(ret);
+                                       ret = createException(MAL, 
"mal.interpreter", SQLSTATE(HYT00) RUNTIME_QRY_TIMEOUT);
+                               }
                                stkpc = mb->stop;
                                continue;
                        }
@@ -994,7 +996,8 @@ str runMALsequence(Client cntxt, MalBlkP
                        }
                        if (stkpc == mb->stop) {
                                if (cntxt->querytimeout && mb->starttime && 
GDKusec()- mb->starttime > cntxt->querytimeout){
-                                       ret= createException(MAL, 
"mal.interpreter", SQLSTATE(HYT00) RUNTIME_QRY_TIMEOUT);
+                                       freeException(ret);
+                                       ret = createException(MAL, 
"mal.interpreter", SQLSTATE(HYT00) RUNTIME_QRY_TIMEOUT);
                                        stkpc = mb->stop;
                                }
                                continue;
_______________________________________________
checkin-list mailing list
[email protected]
https://www.monetdb.org/mailman/listinfo/checkin-list

Reply via email to