Permalink
Browse files

Give wrapobj a unique name

  • Loading branch information...
jgoerzen committed Mar 29, 2006
1 parent d3a45bd commit 1f3902179a580516a5f665fe247b82e3e630efab
@@ -130,7 +130,7 @@ fdisconnect conn mchildren =
foreign import ccall unsafe "libpq-fe.h PQconnectdb"
pqconnectdb :: CString -> IO (Ptr CConn)
-foreign import ccall unsafe "hdbc-postgresql-helper.h wrapobj"
+foreign import ccall unsafe "hdbc-postgresql-helper.h wrapobjpg"
wrapconn :: Ptr CConn -> Ptr WrappedCConn -> IO (Ptr WrappedCConn)
foreign import ccall unsafe "libpq-fe.h PQstatus"
@@ -216,7 +216,7 @@ foreign import ccall unsafe "hdbc-postgresql-helper.h &PQclear_finalizer"
foreign import ccall unsafe "libpq-fe.h PQclear"
pqclear_raw :: Ptr CStmt -> IO ()
-foreign import ccall unsafe "hdbc-postgresql-helper.h wrapobj"
+foreign import ccall unsafe "hdbc-postgresql-helper.h wrapobjpg"
wrapstmt :: Ptr CStmt -> Ptr WrappedCConn -> IO (Ptr WrappedCStmt)
foreign import ccall unsafe "libpq-fe.h PQcmdTuples"
View
@@ -11,7 +11,7 @@ So, here's a little wrapper for things. */
void PQfinish_conditional_finalizer(finalizeonce *conn);
-finalizeonce *wrapobj(void *obj, finalizeonce *parentobj) {
+finalizeonce *wrapobjpg(void *obj, finalizeonce *parentobj) {
finalizeonce *newobj;
newobj = malloc(sizeof(finalizeonce));
if (newobj == NULL) {
View
@@ -7,7 +7,7 @@ typedef struct TAG_finalizeonce {
struct TAG_finalizeonce *parent;
} finalizeonce;
-extern finalizeonce *wrapobj(void *obj, finalizeonce *parentobj);
+extern finalizeonce *wrapobjpg(void *obj, finalizeonce *parentobj);
extern void PQfinish_app(finalizeonce *conn);
extern void PQfinish_finalizer(finalizeonce *conn);

0 comments on commit 1f39021

Please sign in to comment.