home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / xbin / compare.c < prev    next >
Encoding:
C/C++ Source or Header  |  1988-09-18  |  681 b   |  32 lines
  1. #include <stdio.h>
  2. #include <a.out.h>
  3.  
  4. /* Skip over SKIP bytes, and then compare files, up to the length
  5.    of the shortest.
  6. */
  7.   
  8. #define SKIP sizeof(struct exec)
  9.  
  10.  
  11. main(argc,argv)
  12.      int argc;
  13.      char *argv[];
  14.        
  15. {FILE *fp1,*fp2;
  16.  int i;
  17.  if (argc!=2) {printf("Usage:compare file1 file2 "); exit(1);}
  18.  fp1=fopen(argv[1],"r");
  19.  fp2=fopen(argv[2],"r");
  20.  if(fp1==0 || fp2==0){ perror("could not open file");
  21.                 fflush(stdout); exit(1);}
  22.  for (i=0; i< SKIP; i++)
  23.    {getc(fp1); getc(fp2);}
  24.  while (!feof(fp1) && !feof(fp2))
  25.    {if (getc(fp1)!=getc(fp2))
  26.      { if(feof(fp1)|| feof(fp2)) exit(1);
  27.        printf("they differed at %d",i);exit(1);}
  28.   i++;}
  29.  
  30.  exit(0);}
  31.  
  32.