IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Feb 16, 2007, 4:42:59 PM (19 years ago)
Author:
jhoblitt
Message:

VERSION 1.1.8

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ippdb/tests/insertfits.c

    r11820 r11867  
    10231023    }
    10241024
     1025    {
     1026        psDB            *dbh;
     1027        psFits          *fits;
     1028
     1029        dbh = psDBInit("localhost", "test", NULL, "test");
     1030        if (!dbh) {
     1031            exit(EXIT_FAILURE);
     1032        }
     1033
     1034        // open a temp
     1035        fits = psFitsOpen(TMP_FILENAME, "r");
     1036        if (!fits) {
     1037            exit(EXIT_FAILURE);
     1038        }
     1039
     1040        if (!p6InputScfileInsertFits(dbh, fits)) {
     1041            exit(EXIT_FAILURE);
     1042        }
     1043
     1044        if (!psFitsClose(fits)) {
     1045            exit(EXIT_FAILURE);
     1046        }
     1047
     1048        psDBCleanup(dbh);
     1049    }
     1050
     1051    {
     1052        psDB            *dbh;
     1053        psFits          *fits;
     1054
     1055        dbh = psDBInit("localhost", "test", NULL, "test");
     1056        if (!dbh) {
     1057            exit(EXIT_FAILURE);
     1058        }
     1059
     1060        // open a temp
     1061        fits = psFitsOpen(TMP_FILENAME, "r");
     1062        if (!fits) {
     1063            exit(EXIT_FAILURE);
     1064        }
     1065
     1066        if (!p6SumScfileInsertFits(dbh, fits)) {
     1067            exit(EXIT_FAILURE);
     1068        }
     1069
     1070        if (!psFitsClose(fits)) {
     1071            exit(EXIT_FAILURE);
     1072        }
     1073
     1074        psDBCleanup(dbh);
     1075    }
     1076
    10251077    exit(EXIT_SUCCESS);
    10261078}
Note: See TracChangeset for help on using the changeset viewer.