#include "m.h"
#include <assert.h>
#include <string.h>
#include <errno.h>
static char * names[] = {"fl.c", "sort.c", "Umain.c", "m.h", "Fast.c",
"Lmain.c", "p.c", "local.h", "sstream.c", "FM.c", "New.c", "m.h", "junk"} ;
#define FC 13
FILE * out;
static b32 bmap[1+FC];
char * bugName /* Debug only. */;
char * suppr = "CRL";
int locate(fport * C w, sx C m, fport C * C app)
   {int q=0; while(m.Bl >= bmap[1+q] && q<FC) ++q;
   strcpy((char *)w->name, names[q]); w->in = fopen(names[q], "r"); 
   if(!w->in) {fprintf(out,"Could not find file %s for iteration %d, errno=%d.\n",
      qs((uchar *)names[q]), q, errno); return ret(0);}
    bugName = names[q]; w->sig = m.sig; w->giBlc = bmap[q]; 
     return vernier(w, m.Bl-bmap[q], app);}
//static void Pbase(){b32 i; printf("Base is now:\n");
//for(i=0; i<16; ++i) printf("%08lx %08lx\n", LM[i].sig, LM[i].Bl);}
int main(){out = fopen("Report", "w"); init(); bmap[0]=0;
  {int j; for(j=0; j<FC; ++j) 
  {FILE * in = fopen(names[j], "r"); 
  if(!in) {fprintf(out, "Cannot open file %s\n", qs((uchar *)names[j])); exit(0);}
   fprintf(out,cen("F:File %s, GBlc=%ld\n"), qs((uchar *)names[j]), GBlc);
   fl(in, -10); bmap[1+j]=GBlc; fclose(in);}
  if(0){b32 j; for(j=1; j<mcnt; ++j) {fport p; locate(&p, LM[j], 0);
  fprintf(out,"%ld: file=%s, bn=%ld, bit num=%08lx\n",
     j, qs(p.name), LM[j].Bl, p.offsetBi);
  fclose(p.in);}} finish(); return 0;}}