Changeset 37549

Timestamp:

Nov 2, 2014, 3:39:10 PM (12 years ago)

Author:

eugene

Message:

raise error on fseek error

Location:

branches/eam_branches/ipp-20140904/Ohana/src/libfits

Files:

• header/F_free_H.c (modified) (1 diff)
• table/F_write_T.c (modified) (1 diff)

branches/eam_branches/ipp-20140904/Ohana/src/libfits/header/F_free_H.c

@@ -4 +4 @@
 /*********************** fits free header ***********************************/
 void gfits_free_header (Header *header) {
+
+  // fprintf (stderr, "free data for %zx\n", (size_t) header->buffer);
 
   if (header[0].buffer == (char *) NULL) return;

branches/eam_branches/ipp-20140904/Ohana/src/libfits/table/F_write_T.c

@@ -95 +95 @@
 
   // cursor must be at start of the table (after table header)
-  fseeko (f, Nskip, SEEK_CUR);
+  if (fseeko (f, Nskip, SEEK_CUR)) {
+    fprintf (stderr, "can't seek table start\n");
+    return (FALSE);
+  }
+
   Nwrite = fwrite (ftable[0].buffer, sizeof (char), Nbytes, f);
   if (Nwrite != Nbytes) {