Changeset 38441 for trunk/Ohana/src/libfits/header/F_copy_H.c

Timestamp:

Jun 12, 2015, 6:18:23 PM (11 years ago)

Author:

eugene

Message:

merge changes from EAM dev branch ohana.20150429

Location:

trunk/Ohana

Files:

• . (modified) (1 prop)
• src/libfits/header/F_copy_H.c (modified) (1 diff)

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

@@ -30 +30 @@
   return (TRUE);
 }       
+
+int gfits_copy_header_ptr (Header *in, Header *out) {
+
+  int i;
+
+  if (!in)  return FALSE;
+  if (!out) return FALSE;
+
+  out[0].simple = in[0].simple;
+  out[0].unsign = in[0].unsign;
+  out[0].extend = in[0].extend;
+  out[0].bitpix = in[0].bitpix;
+
+  out[0].Naxes  = in[0].Naxes;
+  for (i = 0; i < FT_MAX_NAXES; i++) 
+    out[0].Naxis[i] = in[0].Naxis[i];
+
+  out[0].datasize = in[0].datasize;
+
+  out[0].pcount = in[0].pcount;
+  out[0].gcount = in[0].gcount;
+  out[0].bzero  = in[0].bzero;
+  out[0].bscale = in[0].bscale;
+
+  out[0].buffer = in[0].buffer;
+
+  return (TRUE);
+}