Changeset 27435 for trunk/Ohana/src/libfits/header/F_create_H.c

Timestamp:

Mar 24, 2010, 11:22:25 AM (16 years ago)

Author:

eugene

Message:

large update merging in changes for Ohana to support large files

Location:

trunk/Ohana

Files:

• . (modified) (1 prop)
• src/libfits/header/F_create_H.c (modified) (4 diffs)

trunk/Ohana/src/libfits/header/F_create_H.c

@@ -9 +9 @@
   char axis[10];
   
-  header[0].size = NBYTES;
+  header[0].datasize = NBYTES;
 
   ALLOCATE (header[0].buffer, char, NBYTES);
@@ -17 +17 @@
   strncpy (header[0].buffer, "END", 3);
 
-  gfits_modify (header, "SIMPLE", "%t", 1, header[0].simple);
+  gfits_modify_alt (header, "SIMPLE", "%t", 1, header[0].simple);
   gfits_modify (header, "BITPIX", "%d", 1, header[0].bitpix);
   gfits_modify (header, "NAXIS",  "%d", 1, header[0].Naxes);
@@ -23 +23 @@
   for (i = 0; i < header[0].Naxes; i++) {
     snprintf (axis, 10, "NAXIS%d", i + 1);
-    gfits_modify (header,  axis, "%d", 1, header[0].Naxis[i]);
+    gfits_modify (header,  axis, "%lld", 1, (long long) header[0].Naxis[i]);
   }
 
@@ -30 +30 @@
   gfits_modify (header, "BSCALE", "%lf", 1, header[0].bscale);
   gfits_modify (header, "BZERO",  "%lf", 1, header[0].bzero);
-  gfits_modify (header, "EXTEND", "%t",  1, header[0].extend);
+  gfits_modify_alt (header, "EXTEND", "%t",  1, header[0].extend);
   return (TRUE);