r3242 - in /packages/libastro-fits-cfitsio-perl/branches/upstream/current: CFITSIO.pm ChangeLog INSTALL META.yml README announce util.c

gregoa-guest at users.alioth.debian.org gregoa-guest at users.alioth.debian.org
Sat Jul 8 18:08:26 UTC 2006


Author: gregoa-guest
Date: Sat Jul  8 18:08:25 2006
New Revision: 3242

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=3242
Log:
Load /tmp/tmp.bZJrD28603/libastro-fits-cfitsio-perl-1.05 into
packages/libastro-fits-cfitsio-perl/branches/upstream/current.

Modified:
    packages/libastro-fits-cfitsio-perl/branches/upstream/current/CFITSIO.pm
    packages/libastro-fits-cfitsio-perl/branches/upstream/current/ChangeLog
    packages/libastro-fits-cfitsio-perl/branches/upstream/current/INSTALL
    packages/libastro-fits-cfitsio-perl/branches/upstream/current/META.yml
    packages/libastro-fits-cfitsio-perl/branches/upstream/current/README
    packages/libastro-fits-cfitsio-perl/branches/upstream/current/announce
    packages/libastro-fits-cfitsio-perl/branches/upstream/current/util.c

Modified: packages/libastro-fits-cfitsio-perl/branches/upstream/current/CFITSIO.pm
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libastro-fits-cfitsio-perl/branches/upstream/current/CFITSIO.pm?rev=3242&op=diff
==============================================================================
--- packages/libastro-fits-cfitsio-perl/branches/upstream/current/CFITSIO.pm (original)
+++ packages/libastro-fits-cfitsio-perl/branches/upstream/current/CFITSIO.pm Sat Jul  8 18:08:25 2006
@@ -1,5 +1,5 @@
 package Astro::FITS::CFITSIO;
-$VERSION = '1.04';
+$VERSION = '1.05';
 
 use strict;
 use Carp;

Modified: packages/libastro-fits-cfitsio-perl/branches/upstream/current/ChangeLog
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libastro-fits-cfitsio-perl/branches/upstream/current/ChangeLog?rev=3242&op=diff
==============================================================================
--- packages/libastro-fits-cfitsio-perl/branches/upstream/current/ChangeLog (original)
+++ packages/libastro-fits-cfitsio-perl/branches/upstream/current/ChangeLog Sat Jul  8 18:08:25 2006
@@ -1,3 +1,14 @@
+2006-06-27  Pete Ratzlaff  <pratzlaff at cfa.harvard.edu>
+
+	* CFITSIO.pm: $VERSION = '1.0.5';
+
+	* util.c: fixed order_reverse, which was called by
+	fits_read_pix[null], so that it now actually does something
+
+2006-05-20  Pete Ratzlaff  <pratzlaff at cfa.harvard.edu>
+
+	* CFITSIO.pm: $VERSION = '1.0.4';
+
 2006-05-19  Pete Ratzlaff  <pratzlaff at cfa.harvard.edu>
 
 	* CFITSIO.xs: added fits_translate_keyword(s),

Modified: packages/libastro-fits-cfitsio-perl/branches/upstream/current/INSTALL
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libastro-fits-cfitsio-perl/branches/upstream/current/INSTALL?rev=3242&op=diff
==============================================================================
--- packages/libastro-fits-cfitsio-perl/branches/upstream/current/INSTALL (original)
+++ packages/libastro-fits-cfitsio-perl/branches/upstream/current/INSTALL Sat Jul  8 18:08:25 2006
@@ -1,4 +1,4 @@
-NOTE: Astro::FITS::CFITSIO v1.04 requires cfitsio library version
+NOTE: Astro::FITS::CFITSIO v1.05 requires cfitsio library version
       3.006 or later. It can be obtained from
       http://heasarc.gsfc.nasa.gov/fitsio
 

Modified: packages/libastro-fits-cfitsio-perl/branches/upstream/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libastro-fits-cfitsio-perl/branches/upstream/current/META.yml?rev=3242&op=diff
==============================================================================
--- packages/libastro-fits-cfitsio-perl/branches/upstream/current/META.yml (original)
+++ packages/libastro-fits-cfitsio-perl/branches/upstream/current/META.yml Sat Jul  8 18:08:25 2006
@@ -1,7 +1,7 @@
 # http://module-build.sourceforge.net/META-spec.html
 #XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
 name:         Astro-FITS-CFITSIO
-version:      1.04
+version:      1.05
 version_from: CFITSIO.pm
 installdirs:  site
 requires:

Modified: packages/libastro-fits-cfitsio-perl/branches/upstream/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libastro-fits-cfitsio-perl/branches/upstream/current/README?rev=3242&op=diff
==============================================================================
--- packages/libastro-fits-cfitsio-perl/branches/upstream/current/README (original)
+++ packages/libastro-fits-cfitsio-perl/branches/upstream/current/README Sat Jul  8 18:08:25 2006
@@ -13,7 +13,7 @@
 
 What version of cfitsio does this module require?
 ----------------------------------------------
-  Astro::FITS::CFITSIO version 1.04 requires at least cfitsio v3.006
+  Astro::FITS::CFITSIO version 1.05 requires at least cfitsio v3.006
 
 Installation
 ------------

Modified: packages/libastro-fits-cfitsio-perl/branches/upstream/current/announce
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libastro-fits-cfitsio-perl/branches/upstream/current/announce?rev=3242&op=diff
==============================================================================
--- packages/libastro-fits-cfitsio-perl/branches/upstream/current/announce (original)
+++ packages/libastro-fits-cfitsio-perl/branches/upstream/current/announce Sat Jul  8 18:08:25 2006
@@ -4,97 +4,19 @@
 subroutine library is available. For more information on cfitsio, see
 http://heasarc.gsfc.nasa.gov/fitsio
 
-The major change in this version of the module is a synchronization
-with cfitsio version 3.006, including implementation of functions
-accepting 64-bit integer and signed byte arguments. Note that
-internally Perl will still use 32-bit integer types unless compiled
-with support for 64-bit integer values.
-
-New features in Astro::FITS::CFITSIO 1.04 include:
-
-* Added recent cfitsio routines
-  fits_open_diskfile
-  fits_create_diskfile
-  fits_copy_cell2image
-  fits_copy_image2cell
-  fits_translate_keyword
-  fits_translate_keywords
-
-* Added long long and signed char functions
-  fits_parse_rangell
-  fits_binary_tformll
-  fits_write_tdimll
-  fits_write_keys_lnglng
-  fits_write_imghdrll
-  fits_write_grphdrll
-  fits_read_key_lnglng
-  fits_read_tdimll
-  fits_decode_tdimll
-  fits_read_keys_lnglng
-  fits_read_imghdrll
-  fits_read_atblhdrll
-  fits_read_btblhdrll
-  fits_get_hduaddrll
-  fits_get_img_parmall
-  fits_create_imgll
-  fits_insert_imgll
-  fits_resize_imgll
-  fits_get_coltypell
-  fits_get_eqcoltypell
-  fits_get_num_rowsll
-  fits_get_bcol_parmsll
-  fits_read_pixll
-  fits_read_pixnullll
-  fits_read_img_sbyt
-  fits_read_img_lnglng
-  fits_read_imgnull_sbyt
-  fits_read_imgnull_lnglng
-  fits_read_2d_sbyt
-  fits_read_2d_lnglng
-  fits_read_3d_sbyt
-  fits_read_3d_lnglng
-  fits_read_subset_lnglng
-  fits_read_subsetnull_sbyt
-  fits_read_subsetnull_lnglng
-  fits_read_grppar_lnglng
-  fits_read_col_sbyt
-  fits_read_col_lnglng
-  fits_read_colnull_sbyt
-  fits_read_colnull_lnglng
-  fits_read_descriptll
-  fits_read_descriptsll
-  fits_write_pixll
-  fits_write_pixnullll
-  fits_write_img_sbyt
-  fits_write_img_lnglng
-  fits_write_imgnull_sbyt
-  fits_write_imgnull_lnglng
-  fits_write_2d_sbyt
-  fits_write_2d_lnglng
-  fits_write_3d_sbyt
-  fits_write_3d_lnglng
-  fits_write_subset_sbyt
-  fits_write_subset_lnglng
-  fits_write_grppar_sbyt
-  fits_write_grppar_lnglng
-  fits_write_col_sbyt
-  fits_write_col_lnglng
-  fits_write_nullrows
-  fits_write_colnull_sbyt
-  fits_write_colnull_lnglng
-  fits_delete_rowlistll
-  fits_read_grppar_sbyt
-  fits_read_subset_sbyt
+The only change in this version is a bug fixed from 1.04 whereby Perl
+multidimensional arrays returned from fits_read_pix and fits_read_pixnull 
+had their dimensions reversed.
 
 Version 3.006 of the cfitsio library is required to build this
 module. Astro::FITS::CFITSIO has been tested on Linux 2.6 (ix86, Perl
 5.8.3) and Solaris 2.8 (Sparc, Perl 5.005).
 
 This version of Astro::FITS::CFITSIO can be obtained at
-  http://hea-www.harvard.edu/~rpete/cfitsio/Astro-FITS-CFITSIO-1.04.tar.gz
+  http://hea-www.harvard.edu/~rpete/cfitsio/Astro-FITS-CFITSIO-1.05.tar.gz
 
 And also on your local CPAN mirror
-  http://cpan.org/authors/id/P/PR/PRATZLAFF/Astro-FITS-CFITSIO-1.04.tar.gz
+  http://cpan.org/authors/id/P/PR/PRATZLAFF/Astro-FITS-CFITSIO-1.05.tar.gz
 
 As always, you can find the latest version of Astro::FITS::CFITSIO at
   http://hea-www.harvard.edu/~rpete/cfitsio

Modified: packages/libastro-fits-cfitsio-perl/branches/upstream/current/util.c
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libastro-fits-cfitsio-perl/branches/upstream/current/util.c?rev=3242&op=diff
==============================================================================
--- packages/libastro-fits-cfitsio-perl/branches/upstream/current/util.c (original)
+++ packages/libastro-fits-cfitsio-perl/branches/upstream/current/util.c Sat Jul  8 18:08:25 2006
@@ -980,6 +980,16 @@
  * off to unpack?D() */
 
 void order_reversell (int nelem, LONGLONG *vals) {
+  LONGLONG tmp;
+  int i;
+  for (i=0; i<nelem/2; i++) {
+    tmp = vals[i];
+    vals[i] = vals[nelem-i-1];
+    vals[nelem-i-1] = tmp;
+  }
+}
+
+void order_reverse (int nelem, long *vals) {
   long tmp;
   int i;
   for (i=0; i<nelem/2; i++) {
@@ -988,14 +998,3 @@
     vals[nelem-i-1] = tmp;
   }
 }
-
-void order_reverse (int nelem, long *vals)
-{
-  LONGLONG* valsll = malloc(nelem*sizeof(LONGLONG));
-  int i;
-  for (i=0; i<nelem; ++i)
-    valsll[i] = vals[i];
-  order_reversell(nelem, valsll);
-  free(valsll);
-  return;
-}




More information about the Pkg-perl-cvs-commits mailing list