File happy-gcc-during_make.diff of Package perl-Prima

Overview Repositories Revisions Requests Users Attributes Meta

File happy-gcc-during_make.diff of Package perl-Prima

--- Prima-1.20/include/generic/thunks.tinc.orig	2006-07-26 23:27:04.000000000 +0200
+++ Prima-1.20/include/generic/thunks.tinc	2006-07-26 23:35:59.000000000 +0200
@@ -1715,6 +1715,7 @@
 	dSP;
 	int _apt_count_;
 	NPoint  _apt_res_;
+	_apt_res_.x = _apt_res_.y = 0;	// patch happiness in for GCC
 
 	ENTER;
 	SAVETMPS;
@@ -1753,6 +1754,7 @@
 	dSP;
 	int _apt_count_;
 	Point  _apt_res_;
+	_apt_res_.x = _apt_res_.y = 0;	// patch happiness in for GCC
 
 	ENTER;
 	SAVETMPS;
@@ -1791,6 +1793,7 @@
 	dSP;
 	int _apt_count_;
 	Rect  _apt_res_;
+	_apt_res_.left = _apt_res_.bottom = _apt_res_.right = _apt_res_.top = 0;	// patch happiness in for GCC
 
 	ENTER;
 	SAVETMPS;
@@ -3480,6 +3483,7 @@
 		croak( "Illegal object reference passed to %s", subName);
 	{
 		Point  _apt_res_;
+		_apt_res_.x = _apt_res_.y = 0;		// patch happiness in for GCC
 		if ( !( items > 1)) goto CALL_POINT;
 		_apt_res_. x = ( int) SvIV( ST( 1));
 		_apt_res_. y = ( int) SvIV( ST( 2));
@@ -4074,4 +4078,4 @@
 		);
 	}
 	XSRETURN_EMPTY;
-}
\ No newline at end of file
+}

Places

File happy-gcc-during_make.diff of Package perl-Prima

Places