herr_t
 ss_gfile_debug_all(FILE *out)
 {
     SS_ENTER(ss_gfile_debug_all, herr_t);
     size_t      gfileidx;
     char        prefix[32];

     for (gfileidx=0; SS_GFILE_IDX(gfileidx); gfileidx++) {
         sprintf(prefix, "\001#%-4lu ", (unsigned long)gfileidx);
         ss_gfile_debug_one(gfileidx, out, prefix);
     }

     SS_LEAVE(0);
 }