gcc3 seems to have changed -Wall behaviour a bit and now considers that
the 'use of label at end of compound statement' should be deprecated.

Small patch to fix this and everything builds find with gcc3

Index: xs/APR/PerlIO/apr_perlio.c
===================================================================
RCS file: 
/home/gozer/mirror/cvs.apache.org/modperl-2.0-cvs/xs/APR/PerlIO/apr_perlio.c,v
retrieving revision 1.10
diff -u -b -B -r1.10 apr_perlio.c
--- xs/APR/PerlIO/apr_perlio.c  8 Jan 2002 01:09:19 -0000       1.10
+++ xs/APR/PerlIO/apr_perlio.c  4 Mar 2002 15:47:37 -0000
@@ -308,7 +308,6 @@
         return 0;
       case APR_EOF:
         return 1;
-      default:
     }
 
     return -1;
@@ -374,8 +373,6 @@
       case APR_PERLIO_HOOK_READ:
         mode = "r";
         break;
-      default:
-        /* */
     };
     
     PerlIO_apply_layers(aTHX_ f, mode, layers);
@@ -413,8 +410,6 @@
       case APR_PERLIO_HOOK_READ:
         IoIFP(GvIOp(gv)) = pio;
         break;
-      default:
-        /* */
     };
 
     return sv_2mortal(retval);
@@ -445,8 +440,6 @@
       case APR_PERLIO_HOOK_READ:
         mode = "r";
         break;
-      default:
-        /* */
     };
 
     /* convert to the OS representation of file */
@@ -487,8 +480,6 @@
       case APR_PERLIO_HOOK_READ:
         IoIFP(GvIOp(gv)) = apr_perlio_apr_file_to_FILE(aTHX_ file, type);
         break;
-      default:
-        /* */
     };
   
     return sv_2mortal(retval);



--------------------------------------------------------------------------------
Philippe M. Chiasson /gozer\@(cpan|ectoplasm)\.org/ 88C3A5A5 (122FF51B/C634E37B)
http://gozer.ectoplasm.org/    F9BF E0C2 480E 7680 1AE5 3631 CB32 A107 88C3 A5A5
Q: It is impossible to make anything foolproof because fools are so ingenious.
perl -e'$$=\${gozer};{$_=unpack(P7,pack(L,$$));/^JAm_pH\n$/&&print||$$++&&redo}'

Attachment: msg02402/pgp00000.pgp
Description: PGP signature

Reply via email to