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

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

[elpa] externals/parser-generator 843bc57 398/434: Fixed invalid referen


From: ELPA Syncer
Subject: [elpa] externals/parser-generator 843bc57 398/434: Fixed invalid reference to parser-generator to fetch translation by production number
Date: Mon, 29 Nov 2021 16:00:24 -0500 (EST)

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

    Fixed invalid reference to parser-generator to fetch translation by 
production number
---
 parser-generator-lr-export.el | 20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

diff --git a/parser-generator-lr-export.el b/parser-generator-lr-export.el
index e295322..761c3fd 100644
--- a/parser-generator-lr-export.el
+++ b/parser-generator-lr-export.el
@@ -744,13 +744,15 @@
 
                             ;; Perform translation at reduction if specified
                             (if
-                                
(parser-generator--get-grammar-translation-by-number
+                                (%s--get-grammar-translation-by-number
                                  production-number)
                                 (let ((partial-translation
                                        (funcall
-                                        
(parser-generator--get-grammar-translation-by-number
+                                        (%s--get-grammar-translation-by-number
                                          production-number)
-                                        popped-items-meta-contents)))"))
+                                        popped-items-meta-contents)))"
+                      namespace
+                      namespace))
 
       (insert "
                                   (let ((temp-hash-key
@@ -838,8 +840,11 @@
                     ;;    in the output buffer to be the right parse of the 
original
                     ;;    input string.
 
-                    (setq accept t))
+                    (setq accept t))"
+                               namespace
+                               namespace))
 
+               (insert "
                    (t (error
                        \"Invalid action-match: %s!\"
                        action-match)))))))))
@@ -863,12 +868,7 @@
          output
          translation
          translation-symbol-table-list
-         history)))))"
-               namespace
-               namespace
-               namespace
-               namespace
-               ))
+         history)))))")
 
       ;; Parse
       (insert



reply via email to

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