* Europagate, 1994-1995.
*
* $Log: iso2709dump.c,v $
- * Revision 1.5 1995/02/22 21:32:36 adam
+ * Revision 1.6 1995/03/27 12:52:18 adam
+ * A little more verbose in marc dump.
+ *
+ * Revision 1.5 1995/02/22 21:32:36 adam
* Changed header.
*
* Revision 1.3 1995/02/10 17:05:18 adam
{
char *buf;
Iso2709Rec rec;
+ int no = 0;
while ((buf = iso2709_read (stdin)))
{
rec = iso2709_cvt (buf);
- iso2709_display (rec, stderr);
+ fprintf (stderr, "------- %d --------\n", ++no);
+ if (rec)
+ {
+ iso2709_display (rec, stderr);
+ iso2709_rm (rec);
+ }
+ else
+ {
+ fprintf (stderr, "Bad record\n");
+ break;
+ }
free (buf);
- iso2709_rm (rec);
}
return 0;
}