+ {
+#if 0
+ if (marcdump)
+ fwrite(p->u.octet_aligned->buf, p->u.octet_aligned->len, 1,
+ marcdump);
+#endif
+ static count = 0;
+ FILE *f;
+ char buf[256];
+
+ sprintf(buf, "marc.%d", count++);
+ if (!(f = fopen(buf, "w")))
+ {
+ perror(buf);
+ exit(1);
+
+ }
+ fwrite(p->u.octet_aligned->buf, p->u.octet_aligned->len, 1, f);
+ fclose(f);
+
+