From: Adam Dickmeiss <adam@indexdata.dk>
Date: Thu, 29 Jan 1998 13:38:17 +0000 (+0000)
Subject: Fixed problem with mapping to record with unknown schema.
X-Git-Tag: ZEBRA.1.0~249
X-Git-Url: http://git.indexdata.com/?p=idzebra-moved-to-github.git;a=commitdiff_plain;h=6561129ee4916ac52934aed6f8a34e7cff84fd49

Fixed problem with mapping to record with unknown schema.
---

diff --git a/recctrl/recgrs.c b/recctrl/recgrs.c
index ccfed56..947afbb 100644
--- a/recctrl/recgrs.c
+++ b/recctrl/recgrs.c
@@ -4,7 +4,10 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: recgrs.c,v $
- * Revision 1.15  1998-01-26 10:37:57  adam
+ * Revision 1.16  1998-01-29 13:38:17  adam
+ * Fixed problem with mapping to record with unknown schema.
+ *
+ * Revision 1.15  1998/01/26 10:37:57  adam
  * Better diagnostics.
  *
  * Revision 1.14  1997/11/06 11:41:01  adam
@@ -669,6 +672,11 @@ static int grs_retrieve(struct recRetrieveCtrl *p)
 		p->diagnostic = 238;
 	    break;
 	default:
+            if (!node->u.root.absyn)
+            {
+		p->diagnostic = 238;
+		break;
+	    }
 	    for (marctab = node->u.root.absyn->marc; marctab;
 		marctab = marctab->next)
 		if (marctab->reference == p->input_format)