Changeset 7054 for trunk/Ohana/src/libfits/header/F_print.c

Timestamp:

May 3, 2006, 12:01:09 PM (20 years ago)

Author:

eugene

Message:

converted fits_ to gfits_

File:

• trunk/Ohana/src/libfits/header/F_print.c (modified) (4 diffs)

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

@@ -2 +2 @@
 # include <gfitsio.h>
 
-int fits_print (Header *header, char *field, char *mode, int N,...) {
+int gfits_print (Header *header, char *field, char *mode, int N,...) {
   
   /* this function expects one more argument, the value to be written */
@@ -14 +14 @@
   
   if (mode[0] != '%') {
-    fprintf (stderr, "fits_print: weird mode:  %s\n", mode);
+    fprintf (stderr, "gfits_print: weird mode:  %s\n", mode);
     return (FALSE);
   }
 
   /* this is supposed to create a new field, not modify an old one.  */
-  p = fits_header_field (header, field, N);
+  p = gfits_header_field (header, field, N);
   if (p != NULL) return (FALSE);
 
   /* find the END of the header */
-  p = fits_header_field (header, "END", 1);
+  p = gfits_header_field (header, "END", 1);
   if (p == NULL) return (FALSE); 
 
@@ -31 +31 @@
     REALLOCATE (header[0].buffer, char, header[0].size);
     /* re-find the "END" marker, in case new memory block is used */
-    p = fits_header_field (header, "END", 1);
+    p = gfits_header_field (header, "END", 1);
     if (p == NULL) return (FALSE); 
     memset (p + FT_LINE_LENGTH, ' ', FT_RECORD_SIZE);
@@ -90 +90 @@
   */
 
-  /* can't write the comment in fits_print - use fits_modify */
+  /* can't write the comment in gfits_print - use gfits_modify */
   if (!strcmp (mode, "%C")) return (FALSE);