[elpa] externals/parser-generator d360e8a 176/434: Added failing unit test for FIRST function with starting e-identifier

[ELPA Syncer]

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

    Added failing unit test for FIRST function with starting e-identifier
---
 test/parser-generator-test.el | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/test/parser-generator-test.el b/test/parser-generator-test.el
index a355942..ec13ce4 100644
--- a/test/parser-generator-test.el
+++ b/test/parser-generator-test.el
@@ -296,6 +296,15 @@
     (parser-generator--first 'S)))
   (message "Passed first 3 with complex grammar")
 
+  (parser-generator-set-grammar '((Sp S) (a b) ((Sp S) (S (S a S b)) (S e)) 
Sp))
+  (parser-generator-set-look-ahead-number 2)
+  (parser-generator-process-grammar)
+  (should
+   (equal
+    '((a a) (a e) (e))
+    (parser-generator--first 'S)))
+  (message "Passed first 4 with complex grammar with starting e-identifier")
+
   (message "Passed tests for (parser-generator--first)"))
 
 (defun parser-generator-test--e-free-first ()
@@ -343,7 +352,7 @@
     (parser-generator--e-free-first '(a e))))
   (should
    (equal
-    '((a e))
+    '((a e) (a a))
     (parser-generator--e-free-first '(a S))))
   (message "Passed empty-free-first 2 with trailing e-identifier")