util/iso2709dump.c

   1 /*
   2    gw-res.c: Iso2709 record management
   3
   4    Europagate, 1994-1995.
   5
   6    $Log: iso2709dump.c,v $
   7    Revision 1.2  1995/02/10 16:50:33  adam
   8    Indicator field moved to 'struct iso2709_dir' from 'struct
   9    iso2709_field'.
  10    Function iso2709_rm implemented - to delete a MARC record.
  11
  12  * Revision 1.1.1.1  1995/02/09  17:27:11  adam
  13  * Initial version of email gateway under CVS control.
  14  *
  15  */
  16
  17 #include <stdio.h>
  18 #include <stdlib.h>
  19
  20 #include <iso2709.h>
  21
  22 int main (int argc, char **argv)
  23 {
  24     char *buf;
  25     Iso2709Rec rec;
  26
  27     while ((buf = iso2709_read (stdin)))
  28     {
  29         rec = iso2709_cvt (buf);
  30         free (buf);
  31         iso2709_rm (rec);
  32     }
  33     return 0;
  34 }