From: Michael K. <ki...@us...> - 2007-06-25 13:53:34
|
Update of /cvsroot/xsb/XSB/packages/dbdrivers/cc In directory sc8-pr-cvs10.sourceforge.net:/tmp/cvs-serv31108/packages/dbdrivers/cc Modified Files: driver_manager.c driver_manager.H Log Message: a fix from saikat. makes it possible to use dbdriver calls in a fail-loop Index: driver_manager.c =================================================================== RCS file: /cvsroot/xsb/XSB/packages/dbdrivers/cc/driver_manager.c,v retrieving revision 1.21 retrieving revision 1.22 diff -u -r1.21 -r1.22 --- driver_manager.c 19 Mar 2007 02:03:10 -0000 1.21 +++ driver_manager.c 25 Jun 2007 13:53:29 -0000 1.22 @@ -469,6 +469,17 @@ return FALSE; } +DllExport int call_conv moreResults(void) +{ + char* handle; + struct xsb_queryHandle* qHandle; + + handle = ptoc_string(1); + if ((qHandle = isQueryHandle(handle)) != NULL && qHandle->state != QUERY_BEGIN) { + return TRUE; + } + return FALSE; +} static char* buildSQLQuery(prolog_term sqlQueryList) { Index: driver_manager.H =================================================================== RCS file: /cvsroot/xsb/XSB/packages/dbdrivers/cc/driver_manager.H,v retrieving revision 1.5 retrieving revision 1.6 diff -u -r1.5 -r1.6 --- driver_manager.H 19 Mar 2007 02:03:10 -0000 1.5 +++ driver_manager.H 25 Jun 2007 13:53:29 -0000 1.6 @@ -33,5 +33,6 @@ prepareStatement/3, executePreparedStatement/3, closeStatement/1, - exception/2. + exception/2, + moreResults/1. |