+static Iso2709Rec copy_rec (Iso2709Rec rec_in)
+{
+ Iso2709Rec rec_out;
+ Iso2709Anchor a_in, a_out;
+ char *tag, *indicator, *identifier, *data;
+
+ rec_out = iso2709_mk();
+
+ a_in = iso2709_a_mk (rec_in);
+ a_out = iso2709_a_mk (rec_out);
+
+ do {
+ if (!iso2709_a_info_field (a_in, &tag, &indicator, &identifier, &data))
+ break;
+ printf ("[%s %s %s]", tag, indicator ? indicator : "",
+ identifier ? identifier : "");
+#if 1
+ iso2709_a_insert (a_out, tag, indicator, identifier, data);
+#endif
+ } while (iso2709_a_next (a_in));
+ iso2709_a_rm (a_in);
+ iso2709_a_rm (a_out);
+ return rec_out;
+}
+