You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl-cvs@perl.apache.org by ri...@apache.org on 2001/11/27 10:35:59 UTC
cvs commit: embperl epcache.c epprovider.c
richter 01/11/27 01:35:59
Modified: . Tag: Embperl2c epcache.c epprovider.c
Log:
fix compiler warnings
Revision Changes Path
No revision
No revision
1.1.2.16 +5 -2 embperl/Attic/epcache.c
Index: epcache.c
===================================================================
RCS file: /home/cvs/embperl/Attic/epcache.c,v
retrieving revision 1.1.2.15
retrieving revision 1.1.2.16
diff -u -r1.1.2.15 -r1.1.2.16
--- epcache.c 2001/11/25 19:48:10 1.1.2.15
+++ epcache.c 2001/11/27 09:35:58 1.1.2.16
@@ -9,7 +9,7 @@
# IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
# WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
#
-# $Id: epcache.c,v 1.1.2.15 2001/11/25 19:48:10 richter Exp $
+# $Id: epcache.c,v 1.1.2.16 2001/11/27 09:35:58 richter Exp $
#
###################################################################################*/
@@ -55,6 +55,7 @@
{
SetHashValueInt (pProviders, sName, (IV)pClass) ;
+ return ok ;
}
/* ------------------------------------------------------------------------ */
@@ -83,6 +84,7 @@
pCacheItems = newHV () ;
ArrayNew (&pCachesToRelease, 16, sizeof (tCacheItem *)) ;
+ return ok ;
}
@@ -417,7 +419,7 @@
}
}
else
- sv_catpvf (pKey, "-?", sProvider) ;
+ sv_catpv (pKey, "-?") ;
return ok ;
}
@@ -734,6 +736,7 @@
if (!pItem -> bCache)
pCachesToRelease[ArrayAdd(&pCachesToRelease, 1)] = pItem ;
+ return ok ;
}
1.1.2.15 +2 -2 embperl/Attic/epprovider.c
Index: epprovider.c
===================================================================
RCS file: /home/cvs/embperl/Attic/epprovider.c,v
retrieving revision 1.1.2.14
retrieving revision 1.1.2.15
diff -u -r1.1.2.14 -r1.1.2.15
--- epprovider.c 2001/11/23 11:43:55 1.1.2.14
+++ epprovider.c 2001/11/27 09:35:58 1.1.2.15
@@ -9,7 +9,7 @@
# IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
# WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
#
-# $Id: epprovider.c,v 1.1.2.14 2001/11/23 11:43:55 richter Exp $
+# $Id: epprovider.c,v 1.1.2.15 2001/11/27 09:35:58 richter Exp $
#
###################################################################################*/
@@ -1397,7 +1397,7 @@
{
int rc ;
- bool bCache ;
+ bool bCache = pProvider -> pCache -> bCache ;
/* update cache parameters */
if ((rc = embperl_PreExecute (r, pProvider -> pCache)) != ok)
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-cvs-help@perl.apache.org