From 0c341b31ca4de86b12b8b98f724b4f746e98a5d2 Mon Sep 17 00:00:00 2001
From: Peter Verthez <Peter.Verthez@advalvas.be>
Date: Sat, 1 Dec 2001 17:23:26 +0000
Subject: [PATCH] Return level number together with OPEN token.

---
 gedcom.y         | 3 ++-
 gedcom_1byte.lex | 4 +++-
 gedcom_hilo.lex  | 4 +++-
 gedcom_lohi.lex  | 4 +++-
 4 files changed, 11 insertions(+), 4 deletions(-)

diff --git a/gedcom.y b/gedcom.y
index e512aa6..98d36e2 100644
--- a/gedcom.y
+++ b/gedcom.y
@@ -223,13 +223,14 @@ int  compat_mode(int flags);
 
 %union {
   char *string;
+  int  number;
 }
 
 %token_table
 %expect 300
 
 %token <string> BADTOKEN
-%token <string> OPEN
+%token <number> OPEN
 %token <string> CLOSE
 %token <string> ESCAPE
 %token <string> DELIM
diff --git a/gedcom_1byte.lex b/gedcom_1byte.lex
index 5705c1e..df4559a 100644
--- a/gedcom_1byte.lex
+++ b/gedcom_1byte.lex
@@ -97,6 +97,7 @@ if (level_diff < 1) {
 }
 else if (level_diff == 1) {
   level_diff++;
+  gedcom_lval.number = current_level;
   return OPEN;
 }
 else {
@@ -133,6 +134,7 @@ else {
 		    }
 		    else if (level_diff == 1) {
 		      level_diff++;
+		      gedcom_lval.number = current_level;
 		      return OPEN;
 		    }
 		    else {
@@ -355,7 +357,7 @@ int main()
   while (tok) {
     switch(tok) {
       case BADTOKEN: printf("BADTOKEN "); break;
-      case OPEN: printf("OPEN "); break;
+      case OPEN: printf("OPEN(%d) ", gedcom_lval.number); break;
       case CLOSE: printf("CLOSE "); break;
       case ESCAPE: printf("ESCAPE(%s) ", gedcom_lval.string); break;
       case DELIM: printf("DELIM "); break;
diff --git a/gedcom_hilo.lex b/gedcom_hilo.lex
index 62b9645..e5135dc 100644
--- a/gedcom_hilo.lex
+++ b/gedcom_hilo.lex
@@ -99,6 +99,7 @@ if (level_diff < 1) {
 }
 else if (level_diff == 1) {
   level_diff++;
+  gedcom_lval.number = current_level;
   return OPEN;
 }
 else {
@@ -135,6 +136,7 @@ else {
 		    }
 		    else if (level_diff == 1) {
 		      level_diff++;
+		      gedcom_lval.number = current_level;
 		      return OPEN;
 		    }
 		    else {
@@ -352,7 +354,7 @@ int main()
   while (tok) {
     switch(tok) {
       case BADTOKEN: printf("BADTOKEN "); break;
-      case OPEN: printf("OPEN "); break;
+      case OPEN: printf("OPEN(%d) ", gedcom_lval.number); break;
       case CLOSE: printf("CLOSE "); break;
       case ESCAPE: printf("ESCAPE(%s) ", gedcom_lval.string); break;
       case DELIM: printf("DELIM "); break;
diff --git a/gedcom_lohi.lex b/gedcom_lohi.lex
index 2545343..9b76ac9 100644
--- a/gedcom_lohi.lex
+++ b/gedcom_lohi.lex
@@ -99,6 +99,7 @@ if (level_diff < 1) {
 }
 else if (level_diff == 1) {
   level_diff++;
+  gedcom_lval.number = current_level;
   return OPEN;
 }
 else {
@@ -135,6 +136,7 @@ else {
 		    }
 		    else if (level_diff == 1) {
 		      level_diff++;
+		      gedcom_lval.number = current_level;
 		      return OPEN;
 		    }
 		    else {
@@ -352,7 +354,7 @@ int main()
   while (tok) {
     switch(tok) {
       case BADTOKEN: printf("BADTOKEN "); break;
-      case OPEN: printf("OPEN "); break;
+      case OPEN: printf("OPEN(%d) ", gedcom_lval.number); break;
       case CLOSE: printf("CLOSE "); break;
       case ESCAPE: printf("ESCAPE(%s) ", gedcom_lval.string); break;
       case DELIM: printf("DELIM "); break;
-- 
2.30.2