emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/parser-generator da14fbd 431/434: Passing more metadata


From: ELPA Syncer
Subject: [elpa] externals/parser-generator da14fbd 431/434: Passing more metadata about terminals to SDT
Date: Mon, 29 Nov 2021 16:00:31 -0500 (EST)

branch: externals/parser-generator
commit da14fbd07c3398c0f1a9cc770cde62046e5b3ba1
Author: Christian Johansson <christian@cvj.se>
Commit: Christian Johansson <christian@cvj.se>

    Passing more metadata about terminals to SDT
---
 parser-generator-lr-export.el | 10 ++++++----
 parser-generator-lr.el        |  2 +-
 2 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/parser-generator-lr-export.el b/parser-generator-lr-export.el
index 2cc54ca..3c052e2 100644
--- a/parser-generator-lr-export.el
+++ b/parser-generator-lr-export.el
@@ -779,10 +779,10 @@
                                           (let ((symbol-translation
                                                  (pop symbol-translations)))
                                             (push
-                                             symbol-translation
+                                             (car symbol-translation)
                                              popped-items-meta-contents)
                                             (push
-                                             nil
+                                             (car (cdr symbol-translation))
                                              popped-items-terminals)
                                             (puthash
                                              temp-hash-key
@@ -830,8 +830,10 @@
                                               temp-hash-key
                                               translation-symbol-table)))
                                         (push
-                                         partial-translation
-                                         symbol-translations)
+                                          (list
+                                           partial-translation
+                                           popped-items-terminals)
+                                           symbol-translations)
                                         (puthash
                                          temp-hash-key
                                          symbol-translations
diff --git a/parser-generator-lr.el b/parser-generator-lr.el
index e68fe5f..7522b5f 100644
--- a/parser-generator-lr.el
+++ b/parser-generator-lr.el
@@ -2074,7 +2074,7 @@
                                         (push
                                          (list
                                           partial-translation
-                                          (if (= (length 
popped-items-terminals) 1) popped-items-terminals nil))
+                                          popped-items-terminals)
                                          symbol-translations)
                                         (puthash
                                          temp-hash-key



reply via email to

[Prev in Thread] Current Thread [Next in Thread]