gistfile1.cpp

    PALETTE pal;
    PACKFILE *file;
    /* Open file */
    file = pack_fopen(filename, "rb");
    if (!file) some_error_func();

    /* Read header before palette ... */ 
    /* ... Some header reading code here ;) */
    /* Read palette */
    pack_fread(&pal, 1024, file);
    pack_fclose(file);