svn commit: r126447 - /perl/modperl/trunk/xs/typemap

[go...@apache.org]

Author: gozer
Date: Tue Jan 25 16:09:00 2005
New Revision: 126447

URL: http://svn.apache.org/viewcvs?view=rev&rev=126447
Log:
Cleanup: whitespace
Modified:
   perl/modperl/trunk/xs/typemap

Modified: perl/modperl/trunk/xs/typemap
Url: http://svn.apache.org/viewcvs/perl/modperl/trunk/xs/typemap?view=diff&rev=126447&p1=perl/modperl/trunk/xs/typemap&r1=126446&p2=perl/modperl/trunk/xs/typemap&r2=126447
==============================================================================
--- perl/modperl/trunk/xs/typemap	(original)
+++ perl/modperl/trunk/xs/typemap	Tue Jan 25 16:09:00 2005
@@ -1,12 +1,12 @@
 TYPEMAP
-void *			T_VPTR
+void *                  T_VPTR
 char_len *              T_CHAR_LEN
 const char_len *        T_CONST_CHAR_LEN
 
 ######################################################################
 OUTPUT
 T_POOLOBJ
-        sv_setref_pv($arg, \"${ntype}\", (void*)$var);
+	sv_setref_pv($arg, \"${ntype}\", (void*)$var);
 
 T_APACHEOBJ
 	sv_setref_pv($arg, \"${ntype}\", (void*)$var);
@@ -28,7 +28,7 @@
 T_PTROBJ
 	if (SvROK($arg) && sv_derived_from($arg, \"${ntype}\")) {
 	    IV tmp = SvIV((SV*)SvRV($arg));
-	    $var = INT2PTR($type,tmp);
+	    $var = INT2PTR($type, tmp);
 	}
 	else {
 	    Perl_croak(aTHX_ SvROK($arg) ?
@@ -42,7 +42,7 @@
             if (tmp == 0) {
                 Perl_croak(aTHX_ \"invalid pool object (already destroyed?)\");
             }
-	    $var = INT2PTR($type,tmp);
+	    $var = INT2PTR($type, tmp);
 	}
 	else {
 	    Perl_croak(aTHX_ SvROK($arg) ?
@@ -71,7 +71,7 @@
 	$var = modperl_xs_sv2request_rec(aTHX_ $arg, \"$ntype\", cv)
 
 T_VPTR
-	$var = INT2PTR($type,SvIV(SvROK($arg) ? SvRV($arg) : $arg))
+	$var = INT2PTR($type, SvIV(SvROK($arg) ? SvRV($arg) : $arg))
 
 T_APR_TIME
 	$var = (apr_time_t)(apr_time_from_sec(SvNV($arg)))