X-Git-Url: http://sru.miketaylor.org.uk/?a=blobdiff_plain;f=recctrl%2Fsgmlread.c;h=4fa978083e10a32664ce5fc541dc0968376bbd63;hb=10e178572346e8c5c3caaa43b803dd10c005cb5f;hp=f75a1c5afa173fb6fc0b9dfa4d95af1db8a0db36;hpb=1f793b6c2f61fd47c7a26c0274f0c7e6ab9d1a07;p=idzebra-moved-to-github.git

diff --git a/recctrl/sgmlread.c b/recctrl/sgmlread.c
index f75a1c5..4fa9780 100644
--- a/recctrl/sgmlread.c
+++ b/recctrl/sgmlread.c
@@ -1,10 +1,23 @@
 /*
- * Copyright (C) 1994-1996, Index Data I/S 
+ * Copyright (C) 1994-1999, Index Data
  * All rights reserved.
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: sgmlread.c,v $
- * Revision 1.3  1997-09-04 13:54:41  adam
+ * Revision 1.7  1999-05-21 12:00:17  adam
+ * Better diagnostics for extraction process.
+ *
+ * Revision 1.6  1999/05/20 12:57:18  adam
+ * Implemented TCL filter. Updated recctrl system.
+ *
+ * Revision 1.5  1999/02/02 14:51:31  adam
+ * Updated WIN32 code specific sections. Changed header.
+ *
+ * Revision 1.4  1997/09/17 12:19:22  adam
+ * Zebra version corresponds to YAZ version 1.4.
+ * Changed Zebra server so that it doesn't depend on global common_resource.
+ *
+ * Revision 1.3  1997/09/04 13:54:41  adam
  * Added MARC filter - type grs.marc.<syntax> where syntax refers
  * to abstract syntax. New method tellf in retrieve/extract method.
  *
@@ -19,7 +32,26 @@
 
 #include "grsread.h"
 
-data1_node *grs_read_sgml (struct grs_read_info *p)
+static data1_node *grs_read_sgml (struct grs_read_info *p)
+{
+    return data1_read_record (p->dh, p->readf, p->fh, p->mem);
+}
+
+static void *grs_init_sgml()
 {
-    return data1_read_record (p->readf, p->fh, p->mem);
+    return 0;
 }
+
+static void grs_destroy_sgml(void *clientData)
+{
+}
+
+static struct recTypeGrs sgml_type = {
+    "sgml",
+    grs_init_sgml,
+    grs_destroy_sgml,
+    grs_read_sgml
+};
+
+RecTypeGrs recTypeGrs_sgml = &sgml_type;
+