Changeset 1082 in Sophya for trunk/SophyaExt/FitsIOServer/fitsioserver.cc
- Timestamp:
- Jul 24, 2000, 2:51:50 PM (25 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SophyaExt/FitsIOServer/fitsioserver.cc
r923 r1082 996 996 case 'I' : 997 997 { 998 int ival=(*it).second.elval. mtv.iv;998 int ival=(*it).second.elval.iv; 999 999 strcpy(comment,"I entier"); 1000 1000 fits_write_key(fptr,TINT,keyname,&ival,comment,&status); … … 1003 1003 case 'D' : 1004 1004 { 1005 double dval=(*it).second.elval. mtv.dv;1005 double dval=(*it).second.elval.dv; 1006 1006 strcpy(comment,"D double"); 1007 1007 fits_write_key(fptr,TDOUBLE,keyname,&dval,comment,&status); … … 1011 1011 { 1012 1012 char strval[128]; 1013 strncpy(strval,(*it).second.elval. mtv.strv,127);1013 strncpy(strval,(*it).second.elval.strv->c_str(),127); 1014 1014 strcpy(comment,"S character string"); 1015 1015 fits_write_key(fptr,TSTRING,keyname,&strval,comment,&status); … … 1407 1407 { 1408 1408 case TINT : 1409 ival=(*it).second.elval. mtv.iv;1409 ival=(*it).second.elval.iv; 1410 1410 strcpy(comment,"I entier"); 1411 1411 //DBG cerr << " Writing I " << (string)keyname << " = " << ival << endl; … … 1413 1413 break; 1414 1414 case TDOUBLE : 1415 dval=(*it).second.elval. mtv.dv;1415 dval=(*it).second.elval.dv; 1416 1416 strcpy(comment,"D double"); 1417 1417 //DBG cerr << " Writing D " << (string)keyname << " = " << dval << endl; … … 1419 1419 break; 1420 1420 case TSTRING : 1421 strncpy(strval, (*it).second.elval. mtv.strv, 128); strval[127] = '\0';1421 strncpy(strval, (*it).second.elval.strv->c_str(), 128); strval[127] = '\0'; 1422 1422 strcpy(comment,"S character string"); 1423 1423 //DBG cerr << " Writing S " << (string)keyname << " = " << (string)strval << endl; … … 1598 1598 { 1599 1599 case TINT : 1600 ival=(*it).second.elval. mtv.iv;1600 ival=(*it).second.elval.iv; 1601 1601 strcpy(comment," "); 1602 1602 //DBG cerr << " Writing I " << (string)keyname << " = " << ival << endl; … … 1604 1604 break; 1605 1605 case TDOUBLE : 1606 dval=(*it).second.elval. mtv.dv;1606 dval=(*it).second.elval.dv; 1607 1607 strcpy(comment," "); 1608 1608 //DBG cerr << " Writing D " << (string)keyname << " = " << dval << endl; … … 1610 1610 break; 1611 1611 case TSTRING : 1612 strncpy(strval, (*it).second.elval. mtv.strv, 128); strval[127] = '\0';1612 strncpy(strval, (*it).second.elval.strv->c_str(), 128); strval[127] = '\0'; 1613 1613 strcpy(comment," "); 1614 1614 //DBG cerr << " Writing S " << (string)keyname << " = " << (string)strval << endl;
Note:
See TracChangeset
for help on using the changeset viewer.