gozer 2003/12/15 11:14:22
Modified: src/modules/perl modperl_mgv.c
Log:
ISO C90 forbids mixed declarations and code
Revision Changes Path
1.29 +2 -1 modperl-2.0/src/modules/perl/modperl_mgv.c
Index: modperl_mgv.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_mgv.c,v
retrieving revision 1.28
retrieving revision 1.29
diff -u -r1.28 -r1.29
--- modperl_mgv.c 15 Dec 2003 03:13:36 -0000 1.28
+++ modperl_mgv.c 15 Dec 2003 19:14:22 -0000 1.29
@@ -185,9 +185,10 @@
static void package2filename(apr_pool_t *p, const char *package,
char **filename, int *len)
{
- *filename = apr_palloc(p, (strlen(package)+4)*sizeof(char));
const char *s;
char *d;
+
+ *filename = apr_palloc(p, (strlen(package)+4)*sizeof(char));
for (s = package, d = *filename; *s; s++, d++) {
if (*s == ':' && s[1] == ':') {