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

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

[elpa] externals/parser-generator 5aeee49bd0 48/82: Added another todo n


From: Christian Johansson
Subject: [elpa] externals/parser-generator 5aeee49bd0 48/82: Added another todo note
Date: Thu, 12 May 2022 13:28:17 -0400 (EDT)

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

    Added another todo note
---
 test/parser-generator-ll-test.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/test/parser-generator-ll-test.el b/test/parser-generator-ll-test.el
index f8b92b2562..08fa9f4c9d 100644
--- a/test/parser-generator-ll-test.el
+++ b/test/parser-generator-ll-test.el
@@ -519,8 +519,8 @@
      (S A)
      (a b)
      (
-      (S e (a b A))
-      (A (S a a) b)
+      (S (a A S) b)
+      (A a (b S A))
       )
      S
      )
@@ -530,7 +530,7 @@
   (setq
    parser-generator-lex-analyzer--function
    (lambda (index)
-     (let* ((string '((a 1 . 2) (b 2 . 3) (a 3 . 4) (a 4 . 5)))
+     (let* ((string '((a 1 . 2) (b 2 . 3) (b 3 . 4) (a 4 . 5) (b 5 . 6)))
             (string-length (length string))
             (max-index index)
             (tokens))
@@ -547,9 +547,10 @@
   (parser-generator-ll-parse)
   (should
    (equal
-    '(1 2 0) ;; Example is indexed from 1 so that is why they have '(2 3 1)
+    '(0 3 1 2 1) ;; Example is indexed from 1 so that is why they have '(1 4 2 
3 2)
     (parser-generator-ll-parse)))
-  ;; TODO Test example 5.5 p. 340
+  (message "Passed example 5.5 p. 340")
+  ;; TODO Make this pass
 
   (message "Passed tests for (parser-generator-ll-parse)"))
 



reply via email to

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