From d525bb7d236d69d10f280e8c97f4fb529197bc22 Mon Sep 17 00:00:00 2001
From: Claudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Date: Thu, 21 Nov 2002 11:01:24 +0000
Subject: [PATCH] <h:Object> is now repeated every time a MainHypothesis (with
 its depth) is printed. The RDF file gets a bit bigger, but lexical analysing
 it becomes much easier.

---
 .../create_V7_mowgli/METADATA/sthandler.c        | 16 ++++++++--------
 .../create_V7_mowgli/METADATA/sthandler_ind.c    | 16 ++++++++--------
 2 files changed, 16 insertions(+), 16 deletions(-)

diff --git a/helm/metadata/create_V7_mowgli/METADATA/sthandler.c b/helm/metadata/create_V7_mowgli/METADATA/sthandler.c
index e26569fcd..0f32e07c1 100644
--- a/helm/metadata/create_V7_mowgli/METADATA/sthandler.c
+++ b/helm/metadata/create_V7_mowgli/METADATA/sthandler.c
@@ -243,37 +243,37 @@ print_mainhyp(about,outrel,outsort,uri,l)
     curr = l;
     if (!strcmp(uri,"Rel"))
       {
-        fprintf(outrel,"\t<h:Object rdf:about=\"");
-        fprintf(outrel,"%s",about);
-        fprintf(outrel,"\">\n");
         /* scan the list */
         while (curr != NULL)
 	  {
+            fprintf(outrel,"\t<h:Object rdf:about=\"");
+            fprintf(outrel,"%s",about);
+            fprintf(outrel,"\">\n");
 	    fprintf(outrel,"\t\t<h:refRel rdf:parseType=\"Resource\">");
             fprintf(outrel,"\n\t\t\t\t<h:position rdf:resource=\"&hns;MainHypothesis\"/>");
             fprintf(outrel,"\n\t\t\t\t<h:depth>%d</h:depth>",curr->val);
             fprintf(outrel,"\n\t\t</h:refRel>\n");
+	    fprintf(outrel,"\t</h:Object>\n");
             curr = curr->next;
 	  }
-	fprintf(outrel,"\t</h:Object>\n");
       }
    else if ((!strcmp(uri,"Prop")) || (!strcmp(uri,"Type")) ||
             (!strcmp(uri,"Set")))
       {
         /* scan the list */
-        fprintf(outsort,"\t<h:Object rdf:about=\"");
-        fprintf(outsort,"%s",about);
-        fprintf(outsort,"\">\n");
         while (curr != NULL)
 	  {
+            fprintf(outsort,"\t<h:Object rdf:about=\"");
+            fprintf(outsort,"%s",about);
+            fprintf(outsort,"\">\n");
 	    fprintf(outsort,"\t\t<h:refSort rdf:parseType=\"Resource\">");
             fprintf(outsort,"\n\t\t\t\t<h:position rdf:resource=\"&hns;MainHypothesis\"/>");
             fprintf(outsort,"\n\t\t\t\t<h:sort rdf:resource=\"&hns;%s\"/>",uri);
             fprintf(outsort,"\n\t\t\t\t<h:depth>%d</h:depth>",curr->val);
             fprintf(outsort,"\n\t\t</h:refSort>\n");
+	    fprintf(outsort,"\t</h:Object>\n");
             curr = curr->next;
 	  }
-	fprintf(outsort,"\t</h:Object>\n");
       }
     else 
      {
diff --git a/helm/metadata/create_V7_mowgli/METADATA/sthandler_ind.c b/helm/metadata/create_V7_mowgli/METADATA/sthandler_ind.c
index a6e3a04af..bfdc795d5 100644
--- a/helm/metadata/create_V7_mowgli/METADATA/sthandler_ind.c
+++ b/helm/metadata/create_V7_mowgli/METADATA/sthandler_ind.c
@@ -245,37 +245,37 @@ print_mainhyp(about,out,outrel,outsort,uri,l)
     curr = l;
     if (!strcmp(uri,"Rel"))
       {
-        fprintf(outrel,"\t<h:Object rdf:about=\"");
-        fprintf(outrel,"%s",about);
-        fprintf(outrel,"\">\n");
         /* scan the list */
         while (curr != NULL)
 	  {
+            fprintf(outrel,"\t<h:Object rdf:about=\"");
+            fprintf(outrel,"%s",about);
+            fprintf(outrel,"\">\n");
 	    fprintf(outrel,"\t\t<h:refRel rdf:parseType=\"Resource\">");
             fprintf(outrel,"\n\t\t\t\t<h:position rdf:resource=\"&hns;MainHypothesis\"/>");
             fprintf(outrel,"\n\t\t\t\t<h:depth>%d</h:depth>",curr->val);
             fprintf(outrel,"\n\t\t</h:refRel>\n");
+	    fprintf(outrel,"\t</h:Object>\n");
             curr = curr->next;
 	  }
-	fprintf(outrel,"\t</h:Object>\n");
       }
    else if ((!strcmp(uri,"Prop")) || (!strcmp(uri,"Type")) ||
             (!strcmp(uri,"Set")))
       {
         /* scan the list */
-        fprintf(outsort,"\t<h:Object rdf:about=\"");
-        fprintf(outsort,"%s",about);
-        fprintf(outsort,"\">\n");
         while (curr != NULL)
 	  {
+            fprintf(outsort,"\t<h:Object rdf:about=\"");
+            fprintf(outsort,"%s",about);
+            fprintf(outsort,"\">\n");
             fprintf(outsort,"\t\t<h:refSort rdf:parseType=\"Resource\">");
             fprintf(outsort,"\n\t\t\t\t<h:position rdf:resource=\"&hns;MainHypothesis\"/>");
             fprintf(outsort,"\n\t\t\t\t<h:sort rdf:resource=\"&hns;%s\"/>",uri);
             fprintf(outsort,"\n\t\t\t\t<h:depth>%d</h:depth>",curr->val);
             fprintf(outsort,"\n\t\t</h:refSort>\n");
+	    fprintf(outsort,"\t</h:Object>\n");
             curr = curr->next;
 	  }
-	fprintf(outsort,"\t</h:Object>\n");
       }
     else 
      {
-- 
2.39.2