Changeset 38553 for trunk/Ohana/src/libfits/table/F_get_T_value.c
- Timestamp:
- Jun 25, 2015, 10:41:05 PM (11 years ago)
- File:
-
- 1 edited
-
trunk/Ohana/src/libfits/table/F_get_T_value.c (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana/src/libfits/table/F_get_T_value.c
r7054 r38553 10 10 { 11 11 12 char Tform[ 100], field[100];12 char Tform[256], field[256]; 13 13 int start, Nchar, byte; 14 14 char tmp[1000]; … … 16 16 /* no error checking, all sorts of problems! */ 17 17 18 s printf (field, "TBCOL%d\0", X);18 snprintf (field, 256, "TBCOL%d\0", X); 19 19 gfits_scan (&table[0].header, field, "%d", &start, 1); 20 20 start --; 21 21 22 s printf (field, "TFORM%d\0", X);22 snprintf (field, 256, "TFORM%d\0", X); 23 23 gfits_scan (&table[0].header, field, "%s", Tform, 1); 24 24 Nchar = atof (&Tform[1]); 25 myAssert (Nchar < 999, "overflow"); 25 26 26 27 byte = Y*table[0].Naxis[0] + start;
Note:
See TracChangeset
for help on using the changeset viewer.
