IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 5512


Ignore:
Timestamp:
Nov 14, 2005, 12:18:48 PM (20 years ago)
Author:
desonia
Message:

* empty log message *

Location:
trunk/psLib
Files:
10 edited

Legend:

Unmodified
Added
Removed

  • trunk/psLib/Makefile.am

    r5221 r5512  
    1515    autogen.sh
    1616
     17if DOXYGEN
    1718docs: Doxyfile $(prefix)/docs/pslib $(mandir)/man3
    18         $(DOXYGEN)
     19        doxygen Doxyfile
    1920        mv -f $(prefix)/docs/pslib/man/man3/* $(mandir)/man3
    2021        rm -rf $(prefix)/docs/pslib/man
     22endif
    2123
    2224$(prefix)/docs/pslib:

  • trunk/psLib/configure.ac

    r5318 r5512  
    1 AC_PREREQ(2.57)
     1AC_PREREQ(2.59)
    22
    33AC_INIT([pslib],[0.8.99],[http://pan-starrs.ifa.hawaii.edu/bugzilla])
    … …  
    66
    77AM_INIT_AUTOMAKE([1.7 foreign dist-bzip2])
    8 AM_CONFIG_HEADER(src/config.h)
     8AC_CONFIG_HEADERS([src/config.h])
    99AM_MAINTAINER_MODE
    1010
    … …  
    1212AC_SUBST(PSLIB_LT_VERSION,$PSLIB_LT_VERSION)
    1313
    14 dnl Determine the location of GNU sed
    15 AC_CHECK_PROGS([SED],[gsed sed])
    16 if test "${SED}" == ""
    17 then
    18   AC_MSG_ERROR([GNU SED is required.])
    19 fi
    20 AC_SUBST(SED,[${SED}])
     14dnl ------------------- PERL options ---------------------
     15  AC_ARG_WITH(perl,
     16    [AS_HELP_STRING(--with-perl=FILE,Specify location of PERL executable.)],
     17    [AC_CHECK_PROG(PERL, $withval, $withval)],
     18    [AC_CHECK_PROG(PERL, perl, `which perl`)])
     19    if test "$PERL" == ""
     20    then
     21      AC_MSG_ERROR([PERL is required.  Use --with-perl to specify its install location.])
     22    fi
     23    AC_SUBST(PERL,$PERL)
    2124
    2225SUBDIR="etc src test" dnl don't include 'swig', as it is optional
    … …  
    2427SRCPATH='${top_srcdir}/src'
    2528SRCDIRS="sys astro db fft fits imageops math mathtypes types xml"
    26 SRCINC=`echo "${SRCDIRS=}" | ${SED} "s|\(\\w\+\)|-I\${SRCPATH=}/\1|g"`
     29# escape two escapes at this level so \\ gets passed to the shell and \ to perl
     30SRCINC=`echo "${SRCDIRS=}" | ${PERL} -pe "s|(\w+)|-I\\\\${SRCPATH=}/\1|g"`
    2731SRCINC="-I${SRCPATH=} ${SRCINC=}"
    28 SRCSUBLIBS=`echo "${SRCDIRS=}" | ${SED} "s|\(\\w\+\)|\1/libpslib\1.la|g"`
     32SRCSUBLIBS=`echo "${SRCDIRS=}" | ${PERL} -pe "s|(\w+)|\1/libpslib\1.la|g"`
    2933AC_SUBST(SRCSUBLIBS,${SRCSUBLIBS=})
    3034AC_SUBST(SRCINC,${SRCINC=})
    … …  
    4953)
    5054
    51 case $host in
    52   *-apple-darwin*)
    53 dnl    CFLAGS="${CFLAGS=} -Wno-long-double -fno-strict-aliasing"
    54 dnl GCC 4.0 on OSX seems to hate that.
    55     ;;
    56 esac
    57 
    5855AC_LANG(C)
    5956AC_PROG_CC
    … …  
    6966
    7067dnl check for standard language functionality
    71 AC_HEADER_STDC
    72 AC_HEADER_SYS_WAIT
    73 AC_CHECK_HEADERS([float.h limits.h stdint.h stdlib.h string.h sys/time.h unistd.h])
    74 AC_HEADER_STDBOOL
     68AC_CHECK_HEADERS([fcntl.h float.h limits.h stdint.h stdlib.h string.h sys/time.h unistd.h])
    7569AC_C_CONST
    7670AC_C_INLINE
    77 AC_TYPE_PID_T
    78 AC_C_RESTRICT
    79 AC_TYPE_SIZE_T
     71AC_HEADER_STDBOOL
     72AC_HEADER_SYS_WAIT
    8073AC_HEADER_TIME
    8174AC_STRUCT_TM
     75AC_TYPE_SIZE_T
    8276
    8377dnl Checks for library functions.
    … …  
    160154[CFITSIO_LDFLAGS="-L$withval"])
    161155PSLIB_CFLAGS="${PSLIB_CFLAGS=} ${CFITSIO_CFLAGS}"
    162 PSLIB_LIBS="${PSLIB_LIBS=} $CFITSIO_LDFLAGS -lcfitsio"
     156PSLIB_LIBS="${PSLIB_LIBS=} $CFITSIO_LDFLAGS -lcfitsio -lm"
     157
     158dnl Store off CFLAGS/LDFLAGS so that they can be restored after tests
    163159TMP_CFLAGS=${CFLAGS}
    164 CFLAGS=${CFITSIO_CFLAGS}
     160TMP_LDFLAGS=${LDFLAGS}
     161
     162CFLAGS=${PSLIB_CFLAGS}
     163LDFLAGS=${PSLIB_LIBS}
    165164AC_CHECK_HEADERS([fitsio.h],[],
    166    [AC_MSG_ERROR([CFITSIO is required.  Obtain it at  http://heasarc.gsfc.nasa.gov/docs/software/fitsio or use --with-cfitsio to specify location.])])
     165   [AC_MSG_ERROR([CFITSIO headers not found.  Obtain CFITSIO at  http://heasarc.gsfc.nasa.gov/docs/software/fitsio or use --with-cfitsio to specify location.])]
     166)
     167TMP_LIBS=${LIBS}
     168AC_CHECK_LIB(cfitsio,ffopen,[],
     169  [AC_MSG_ERROR([CFITSIO library not found.  Obtain it at  http://heasarc.gsfc.nasa.gov/docs/software/fitsio or use --with-cfitsio to specify location.])]
     170)
     171dnl Now check if CFITSIO supports fits_open_diskfile, i.e., is at least version 2.501
     172AC_CHECK_LIB(cfitsio,ffdkopen,
     173  [CFITSIO_DISKFILE=1],
     174  [AC_MSG_WARN([The CFITSIO library version is rather old.  Suggested version is 2.501 or greater.])
     175   CFITSIO_DISKFILE=0]
     176)
     177LIBS=${TMP_LIBS}
     178
     179dnl restore the CFLAGS/LDFLAGS
    167180CFLAGS=${TMP_CFLAGS}
    168 
     181LDFLAGS=${TMP_LDFLAGS}
     182
     183AC_DEFINE_UNQUOTED([CFITSIO_DISKFILE],${CFITSIO_DISKFILE},[Define to 1 if you have fits_open_diskfile in CFITSIO])
    169184AC_SUBST([CFITSIO_CFLAGS])
    170185
    … …  
    182197PSLIB_CFLAGS="${PSLIB_CFLAGS=} ${FFTW3_CFLAGS}"
    183198PSLIB_LIBS="${PSLIB_LIBS=} $FFTW3_LDFLAGS -lfftw3f"
     199
     200dnl Store off CFLAGS/LDFLAGS so that they can be restored after tests
    184201TMP_CFLAGS=${CFLAGS}
    185 CFLAGS=${FFTW3_CFLAGS}
     202TMP_LDFLAGS=${LDFLAGS}
     203
     204CFLAGS="${TMP_CFLAGS} ${PSLIB_CFLAGS}"
     205LDFLAGS="${TMP_LDFLAGS} ${PSLIB_LIBS}"
    186206AC_CHECK_HEADERS([fftw3.h],[],
    187    [AC_MSG_ERROR([FFTW version 3 with float support is required.  Obtain it at http://www.fftw.org/or use --with-fftw3 to specify location.])])
     207  [AC_MSG_ERROR([FFTW version 3 (--withfloat) headers not found.  Obtain it at http://www.fftw.org/or use --with-fftw3 to specify location.])]
     208)
     209TMP_LIBS=${LIBS}
     210AC_CHECK_LIB(fftw3f,fftwf_plan_dft_2d,[],
     211  [AC_MSG_ERROR([FFTW version 3 (--withfloat) library not found.  Obtain it at http://www.fftw.org/or use --with-fftw3 to specify location.])]
     212)
     213LIBS=${TMP_LIBS}
     214
     215dnl restore the CFLAGS/LDFLAGS
    188216CFLAGS=${TMP_CFLAGS}
     217LDFLAGS=${TMP_LDFLAGS}
    189218
    190219AC_SUBST([FFTW3_CFLAGS])
    … …  
    197226AC_CHECK_FILE($GSL_CONFIG,[],
    198227    [AC_MSG_ERROR([GSL is required.  Obtain it at http://www.gnu.org/software/gsl or use --with-gsl-config to specify location.])])
     228
    199229AC_MSG_CHECKING([GSL cflags])
    200230GSL_CFLAGS="`${GSL_CONFIG} --cflags`"
    201231AC_MSG_RESULT([${GSL_CFLAGS}])
     232
     233AC_MSG_CHECKING([GSL ldflags])
     234GSL_LDFLAGS="`${GSL_CONFIG} --libs`"
     235AC_MSG_RESULT([${GSL_LDFLAGS}])
     236
    202237PSLIB_CFLAGS="${PSLIB_CFLAGS=} ${GSL_CFLAGS}"
    203 PSLIB_LIBS="${PSLIB_LIBS=} `${GSL_CONFIG} --libs`"
     238PSLIB_LIBS="${PSLIB_LIBS=} ${GSL_LDFLAGS}"
    204239
    205240AC_SUBST([GSL_CFLAGS])
    … …  
    212247AC_CHECK_FILE($XML_CONFIG,[],
    213248    [AC_MSG_ERROR([GNOME XML C parser is required.  Obtain it at http://www.xmlsoft.org or use --with-xml2-config to specify location.])])
     249
    214250AC_MSG_CHECKING([xml2 cflags])
    215251XML_CFLAGS="`${XML_CONFIG} --cflags`"
    216252AC_MSG_RESULT([${XML_CFLAGS}])
     253
     254AC_MSG_CHECKING([xml2 ldflags])
     255XML_LDFLAGS="`${XML_CONFIG} --libs`"
     256AC_MSG_RESULT([${XML_LDFLAGS}])
     257
    217258PSLIB_CFLAGS="${PSLIB_CFLAGS=} ${XML_CFLAGS}"
    218 PSLIB_LIBS="${PSLIB_LIBS=} `${XML_CONFIG} --libs`"
     259PSLIB_LIBS="${PSLIB_LIBS=} ${XML_LDFLAGS}"
    219260
    220261AC_SUBST([XML_CFLAGS])
    … …  
    239280  SUBDIR="${SUBDIR=} swig"
    240281
    241 dnl ------------------- PERL options ---------------------
    242   AC_ARG_WITH(perl,
    243     [AS_HELP_STRING(--with-perl=FILE,Specify location of PERL executable.)],
    244     [AC_CHECK_PROG(PERL, $withval, $withval)],
    245     [AC_CHECK_PROG(PERL, perl, `which perl`)])
    246     if test "$PERL" == ""
    247     then
    248       AC_MSG_ERROR([PERL is required.  Use --with-perl to specify its install location.])
    249     fi
    250     AC_SUBST(PERL,$PERL)
    251 
    252282dnl ---------------- PERLPREFIX option -------------------
    253283  AC_ARG_WITH(perlprefix,
    … …  
    262292fi
    263293
    264 dnl for MacOSX, check if sqrtf is in mx library.
     294dnl for MacOSX suppport -- check if sqrtf is in mx library.
     295TMP_LIBS=${LIBS}
    265296AC_CHECK_LIB(mx,sqrtf,
    266297  [PSLIB_LIBS="${PSLIB_LIBS=} -lmx"])
     298LIBS=${TMP_LIBS}
    267299AC_CHECK_FUNC(atoll, [],
    268   [AC_MSG_ERROR([The C99 function, atoll, is required; update your compiler?])])
    269 
    270 DOXYGEN="doxygen Doxyfile"
    271 AC_CHECK_PROG(DOXYGEN,doxygen,[echo Doxygen not detected in configure stage.])
    272 AC_SUBST(DOXYGEN,$DOXYGEN)
    273 
    274 CFLAGS="${CFLAGS=} -Wall -Werror"
     300  [AC_MSG_ERROR([The C99 function, atoll, is required; update your compiler version?])])
     301
     302AC_CHECK_PROG(doxygen,[doxygen],[true],[false])
     303AM_CONDITIONAL(DOXYGEN, test x$doxygen = xtrue)
     304
     305
     306dnl ------- restore CFLAGS / LDFLAGS (tests done) --------
     307CFLAGS="${CFLAGS} -Wall -Werror"
     308AC_MSG_RESULT([CFLAGS is ${CFLAGS}])
     309AC_MSG_RESULT([LDFLAGS is ${LDFLAGS}])
    275310
    276311dnl ---------------- export variables --------------------

  • trunk/psLib/etc/pslib/Makefile.am

    r5016 r5512  
    88
    99pslib.config: pslib.config.template
    10         sed 's|PREFIX|$(prefix)|' $? > $@
     10        $(PERL) -pe 's|PREFIX|$(prefix)|' $? > $@
    1111
    1212$(sysconfdir)/pslib:

  • trunk/psLib/src/Makefile.am

    r5231 r5512  
    2525
    2626install-exec-hook: libpslib.la
    27         sed "s|\(^dependency_libs=.*\)|dependency_libs=\'$(PSLIB_LIBS)\'|" $(libdir)/libpslib.la > libpslib.la.temp
     27        $(PERL) -pe "s|(^dependency_libs=.*)|dependency_libs=\'$(PSLIB_LIBS)\'|" $(libdir)/libpslib.la > libpslib.la.temp
    2828        $(INSTALL) libpslib.la.temp $(libdir)/libpslib.la

  • trunk/psLib/src/psErrorText_en.dat

    r4971 r5512  
    127127psFits_FILENAME_NULL                   Specified filename can not be NULL.
    128128psFits_EXTNAME_NULL                    Specified extension name can not be NULL.
    129 psFits_EXTNAME_INVALID                 Could not find HDU '%s' in file %s.\nCFITSIO Error: %s
    130 psFits_EXTNUM_ABS_MOVE_FAILED          Could not move to specified HDU #%d in file %s.\nCFITSIO Error: %s
    131 psFits_EXTNUM_REL_MOVE_FAILED          Could not move %d HDUs from current position in file %s.\nCFITSIO Error: %s
     129psFits_EXTNAME_INVALID                 Could not find HDU '%s'.\nCFITSIO Error: %s
     130psFits_EXTNUM_ABS_MOVE_FAILED          Could not move to specified HDU #%d.\nCFITSIO Error: %s
     131psFits_EXTNUM_REL_MOVE_FAILED          Could not move %d HDUs from current position.\nCFITSIO Error: %s
    132132psFits_GET_EXTNUM_FAILED               Failed to determine the current HDU number in file %s.\nCFITSIO Error: %s
    133 psFits_GETNUMHDUS_FAILED               Failed to determine the number of HDUs in file %s.\nCFITSIO Error: %s
    134 psFits_GETHDUTYPE_FAILED               Failed to determine an HDU type in file %s.\nCFITSIO Error: %s
     133psFits_GETNUMHDUS_FAILED               Failed to determine the number of HDUs.\nCFITSIO Error: %s
     134psFits_GETHDUTYPE_FAILED               Failed to determine an HDU type.\nCFITSIO Error: %s
    135135psFits_GETNUMKEYS_FAILED               Failed to determine the number of header keys in file %s.\nCFITSIO Error: %s
    136136psFits_GET_TABLE_SIZE_FAILED           Failed to determine the size of the current HDU table.\nCFITSIO Error: %s
    … …  
    145145psFits_METATYPE_INVALID                Specified FITS metadata type, %c, is not supported.
    146146psFits_METADATA_ADD_FAILED             Failed to add metadata item, %s.
    147 psFits_WRITE_FAILED                    Could not write data to file,'%s'.\nCFITSIO Error: %s
     147psFits_WRITE_FAILED                    Could not write data to file.\nCFITSIO Error: %s
    148148psFits_IMAGE_NULL                      The input psImage was NULL.  Need a non-NULL psImage for operation to be performed.
    149149psFits_METADATA_NULL                   The input psMetadata was NULL.  Need a non-NULL psMetadata for operation to be performed.

  • trunk/psLib/src/pslib_strict.h

    r5446 r5512  
    99*  @author Eric Van Alst, MHPCC
    1010*
    11 *  @version $Revision: 1.10 $ $Name: not supported by cvs2svn $
    12 *  @date $Date: 2005-10-26 01:20:14 $
     11*  @version $Revision: 1.11 $ $Name: not supported by cvs2svn $
     12*  @date $Date: 2005-11-14 22:18:05 $
    1313*
    1414*  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
    … …  
    4848/// @{
    4949#include "psFits.h"
     50#include "psFitsHeader.h"
     51#include "psFitsImage.h"
     52#include "psFitsTable.h"
    5053/// @}
    5154

  • trunk/psLib/test/fits/verified/tst_psFits.stderr

    r4547 r5512  
    11/***************************** TESTPOINT ******************************************\
    22*             TestFile: tst_psFits.c                                               *
    3 *            TestPoint: psImage{psFitsAlloc}                                       *
    4 *             TestType: Positive                                                   *
    5 \**********************************************************************************/
    6 
    7 <DATE><TIME>|<HOST>|I|tst_psFitsAlloc
     3*            TestPoint: psImage{psFitsOpen}                                        *
     4*             TestType: Positive                                                   *
     5\**********************************************************************************/
     6
     7<DATE><TIME>|<HOST>|I|tst_psFitsOpen
    88    Following should generate an error message
    9 <DATE><TIME>|<HOST>|E|psFitsAlloc (FILE:LINENO)
     9<DATE><TIME>|<HOST>|E|psFitsOpen (FILE:LINENO)
    1010    Specified filename can not be NULL.
    11 
    12 ---> TESTPOINT PASSED (psImage{psFitsAlloc} | tst_psFits.c)
     11<DATE><TIME>|<HOST>|I|tst_psFitsOpen
     12    Following should generate an error message
     13<DATE><TIME>|<HOST>|E|psFitsOpen (FILE:LINENO)
     14    Specified mode, 'b+', is invalid.  Supported modes are r, r+, rw, w, w+, a, or a+.
     15
     16---> TESTPOINT PASSED (psImage{psFitsOpen} | tst_psFits.c)
    1317
    1418/***************************** TESTPOINT ******************************************\
    … …  
    2125    Following should be an error.
    2226<DATE><TIME>|<HOST>|E|psFitsMoveExtName (FILE:LINENO)
    23     Could not find HDU 'bogus' in file multi.fits.
     27    Could not find HDU 'bogus'.
    2428    CFITSIO Error: illegal HDU number
    2529<DATE><TIME>|<HOST>|I|tst_psFitsMoveExtName
    … …  
    5155    Following should be an error.
    5256<DATE><TIME>|<HOST>|E|psFitsMoveExtNum (FILE:LINENO)
    53     Could not move to specified HDU #-1 in file multi.fits.
     57    Could not move to specified HDU #-1.
    5458    CFITSIO Error: illegal HDU number
    5559<DATE><TIME>|<HOST>|I|tst_psFitsMoveExtNum
    5660    Following should be an error.
    5761<DATE><TIME>|<HOST>|E|psFitsMoveExtNum (FILE:LINENO)
    58     Could not move -1 HDUs from current position in file multi.fits.
     62    Could not move -1 HDUs from current position.
    5963    CFITSIO Error: illegal HDU number
    6064<DATE><TIME>|<HOST>|I|tst_psFitsMoveExtNum
    6165    Following should be an error.
    6266<DATE><TIME>|<HOST>|E|psFitsMoveExtNum (FILE:LINENO)
    63     Could not move to specified HDU #8 in file multi.fits.
     67    Could not move to specified HDU #8.
    6468    CFITSIO Error: tried to move past end of file
    6569<DATE><TIME>|<HOST>|I|tst_psFitsMoveExtNum
    6670    Following should be an error.
    6771<DATE><TIME>|<HOST>|E|psFitsMoveExtNum (FILE:LINENO)
    68     Could not move 1 HDUs from current position in file multi.fits.
     72    Could not move 1 HDUs from current position.
    6973    CFITSIO Error: tried to move past end of file
    7074<DATE><TIME>|<HOST>|I|tst_psFitsMoveExtNum
    … …  
    171175    Following should be an error.
    172176<DATE><TIME>|<HOST>|E|psFitsUpdateTable (FILE:LINENO)
    173     Could not write data to file,'table.fits'.
     177    Could not write data to file.
    174178    CFITSIO Error: bad first row number
    175179

  • trunk/psLib/test/imageops/tst_psImageGeomManip.c

    r5303 r5512  
    66 *  @author Robert DeSonia, MHPCC
    77 *
    8  *  @version $Revision: 1.4 $ $Name: not supported by cvs2svn $
    9  *  @date $Date: 2005-10-13 00:38:53 $
     8 *  @version $Revision: 1.5 $ $Name: not supported by cvs2svn $
     9 *  @date $Date: 2005-11-14 22:18:46 $
    1010 *
    1111 *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
    … …  
    537537    // write results of various rotates to a file and verify with truth images
    538538    mkdir("temp",0777);
    539     remove
    540         ("fOut.fits");
    541     remove
    542         ("sOut.fits");
    543     remove
    544         ("fBiOut.fits");
    545     remove
    546         ("sBiOut.fits");
    547539    psS32 index = 0;
    548540    psBool fail = false;
    549541    psF32 radianRot;
    550542
    551     psFits* fOutFile = psFitsAlloc("fOut.fits");
    552     psFits* sOutFile = psFitsAlloc("sOut.fits");
    553     psFits* fBiOutFile = psFitsAlloc("fBiOut.fits");
    554     psFits* sBiOutFile = psFitsAlloc("sBiOut.fits");
     543    psFits* fOutFile = psFitsOpen("fOut.fits","w");
     544    psFits* sOutFile = psFitsOpen("sOut.fits","w");
     545    psFits* fBiOutFile = psFitsOpen("fBiOut.fits","w");
     546    psFits* sBiOutFile = psFitsOpen("sBiOut.fits","w");
    555547    if (fOutFile == NULL ||sOutFile == NULL || fBiOutFile == NULL || sBiOutFile == NULL) {
    556548        psError(PS_ERR_UNKNOWN, true, "Can not create output files, so why continue!?");
    … …  
    558550    }
    559551
    560     psFits* fTruthFile = psFitsAlloc(VERIFIED_DIR "/fOut.fits");
    561     psFits* sTruthFile = psFitsAlloc(VERIFIED_DIR "/sOut.fits");
    562     psFits* fBiTruthFile = psFitsAlloc(VERIFIED_DIR "/fBiOut.fits");
    563     psFits* sBiTruthFile = psFitsAlloc(VERIFIED_DIR "/sBiOut.fits");
     552    psFits* fTruthFile = psFitsOpen(VERIFIED_DIR "/fOut.fits","r");
     553    psFits* sTruthFile = psFitsOpen(VERIFIED_DIR "/sOut.fits","r");
     554    psFits* fBiTruthFile = psFitsOpen(VERIFIED_DIR "/fBiOut.fits","r");
     555    psFits* sBiTruthFile = psFitsOpen(VERIFIED_DIR "/sBiOut.fits","r");
    564556    if (fTruthFile == NULL ||sTruthFile == NULL || fBiTruthFile == NULL || sBiTruthFile == NULL) {
    565557        psError(PS_ERR_UNKNOWN, true, "Can not open truth files, so why continue!?");

  • trunk/psLib/test/sys/table.fits

    r4899 r5512  
    1 SIMPLE  =                    T / file does conform to FITS standard             BITPIX  =                  -32 / number of bits per data pixel                  NAXIS   =                    2 / number of data axes                            NAXIS1  =                   16 / length of data axis 1                          NAXIS2  =                   16 / length of data axis 2                          EXTEND  =                    T / FITS dataset may contain extensions            COMMENT   FITS (Flexible Image Transport System) format is defined in 'AstronomyCOMMENT   and Astrophysics', volume 376, page 359; bibcode: 2001A&A...376..359H END                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             XTENSION= 'BINTABLE'           / binary table extension                         BITPIX  =                    8 / 8-bit bytes                                    NAXIS   =                    2 / 2-dimensional binary table                     NAXIS1  =                   17 / width of table in bytes                        NAXIS2  =                   11 / number of rows in table                        PCOUNT  =                    0 / size of special data area                      GCOUNT  =                    1 / one data group (required keyword)              TFIELDS =                    4 / number of fields in each row                   TTYPE1  = 'MYINT   '           / label for field   1                            TFORM1  = '1J      '           / data format of field: 4-byte INTEGER           TTYPE2  = 'MYFLT   '           / label for field   2                            TFORM2  = '1E      '           / data format of field: 4-byte REAL              TTYPE3  = 'MYDBL   '           / label for field   3                            TFORM3  = '1D      '           / data format of field: 8-byte DOUBLE            TTYPE4  = 'MYBOOL  '           / label for field   4                            TFORM4  = '1L      '           / data format of field: 1-byte LOGICAL           END                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             €€TÿÿÿÿœÌÌÍ¿„záG®{FÿÿÿþŸLÌÍ¿”záG®{TÿÿÿýŸ™™š¿žžQë
    2 
    3 žFÿÿÿüŸÌÌÍ¿€záG®{Tÿÿÿû¿¿©™™™™™šFÿÿÿú¿™š¿®žQë
    4 
    5 žTÿÿÿù¿333¿±ë
    6 
    7 žQìFÿÿÿø¿LÌÍ¿ŽzáG®{Tÿÿÿ÷¿fff¿·
    8 =p£×
    9 Fÿÿÿö¿€¿¹™™™™™š
     1END                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             

  • trunk/psLib/test/sys/tst_psMemory.c

    r5098 r5512  
    66*  @author Robert DeSonia, MHPCC
    77*
    8 *  @version $Revision: 1.5 $ $Name: not supported by cvs2svn $
    9 *  @date $Date: 2005-09-22 22:51:46 $
     8*  @version $Revision: 1.6 $ $Name: not supported by cvs2svn $
     9*  @date $Date: 2005-11-14 22:18:48 $
    1010*
    1111*  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
    … …  
    581581
    582582    psFits *fits;
    583     char *filename = "table.fits";
    584     fits = psFitsAlloc(filename);
     583    fits = psFitsOpen("test.fits","w");
     584    psImage* img = psImageAlloc(16,16,PS_TYPE_F32);
     585    psFitsWriteImage(fits,NULL,img,1);
     586    psFree(img);
    585587    if ( !psMemCheckType(PS_DATA_FITS, fits) ) {
    586588        psError(PS_ERR_BAD_PARAMETER_VALUE, true, "psMemCheckFits failed in memCheckType. \n");
    … …  
    588590        return 1;
    589591    }
    590     psFree(fits);
     592    psFitsClose(fits);
    591593
    592594    psHash *hash;
Note: See TracChangeset for help on using the changeset viewer.