File PDL-2.4.4.diff of Package perl-PDL

Overview Repositories Revisions Requests Users Attributes Meta

File PDL-2.4.4.diff of Package perl-PDL

--- Basic/Core/Core.pm.PL
+++ Basic/Core/Core.pm.PL
@@ -1361,7 +1361,7 @@
 		 },
 	    A => {
 		  Name => 'Address',
-		  Sub => sub { sprintf "%d", $_[0]->address }
+		  Sub => sub { sprintf "%lu", $_[0]->address }
 		 },
 	   );
 
--- Basic/Core/Core.xs.PL
+++ Basic/Core/Core.xs.PL
@@ -514,11 +514,11 @@
   CODE:
     setflag(self->state,PDL_INPLACE,val);
 
-int
+long
 address(self)
   pdl *self;
   CODE:
-    RETVAL = (int) self;
+    RETVAL = (long) self;
   OUTPUT:
     RETVAL
 
--- Basic/Core/pdlthread.h
+++ Basic/Core/pdlthread.h
@@ -32,7 +32,7 @@
 typedef struct pdl_thread {
 	pdl_errorinfo *einfo;
 #ifdef PDL_THREAD_DEBUG
-        int magicno;
+        unsigned int magicno;
 #endif
 	int gflags;	/* Flags about this struct */
 	int ndims;	/* Number of dimensions threaded over */
--- Lib/Slatec/Makefile.PL
+++ Lib/Slatec/Makefile.PL
@@ -133,6 +133,7 @@
 sub MY::postamble {
         $mycompiler     = $f77->compiler();
         $mycflags       = $f77->cflags();
+        $mycflags       .= " -fPIC";
 	my $orig = pdlpp_postamble_int(@::pack);
 	$hack_64bit = ($Config{archname}=~m/x86_64/ ?" -fPIC " : "");
 	$orig =~ s/:\s*slatec\.pd/: slatec.pd/;
--- perldl.conf
+++ perldl.conf
@@ -205,7 +205,7 @@
 #    about curses to fix it 
 #  - 1 builds, 0 or undef does not build
 #
-        WITH_IO_BROWSER => 0,
+        WITH_IO_BROWSER => 1,
 
 # Quiet Astro::FITS::Header warnings for PDL build process by default
 # Eventually would be better to set undef by default, and have the

Places

File PDL-2.4.4.diff of Package perl-PDL

Places