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

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

[elpa] externals/parser-generator 79565f4 089/434: Fixed sorting of colu


From: ELPA Syncer
Subject: [elpa] externals/parser-generator 79565f4 089/434: Fixed sorting of columns in GOTO-table
Date: Mon, 29 Nov 2021 15:59:15 -0500 (EST)

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

    Fixed sorting of columns in GOTO-table
---
 parser.el           | 1 +
 test/parser-test.el | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/parser.el b/parser.el
index 18872a2..7c8e570 100644
--- a/parser.el
+++ b/parser.el
@@ -764,6 +764,7 @@
                     (setq lr-item-set-new-index (1+ 
lr-item-set-new-index)))))))
 
           (setq iteration (1+ iteration))
+          (setq goto-table-table (sort goto-table-table 'parser--sort-list))
           (push `(,lr-item-set-index ,goto-table-table) goto-table)))
       (setq parser--goto-table (sort goto-table 'parser--sort-list))))
 
diff --git a/test/parser-test.el b/test/parser-test.el
index b69cc58..6a9372a 100644
--- a/test/parser-test.el
+++ b/test/parser-test.el
@@ -241,10 +241,10 @@
     '((0 ((S 1)))
       (1 ((a 2)))
       (2 ((S 3)))
-      (3 ((b 5) (a 4)))
+      (3 ((a 4) (b 5)))
       (4 ((S 6)))
       (5 nil)
-      (6 ((b 7) (a 4)))
+      (6 ((a 4) (b 7)))
       (7 nil))
     parser--goto-table))
 



reply via email to

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