[elpa] externals/parser-generator 99aa5b6 350/434: Added more unit tests for calculator

[ELPA Syncer]

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

    Added more unit tests for calculator
---
 test/parser-generator-lr-test.el | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)

diff --git a/test/parser-generator-lr-test.el b/test/parser-generator-lr-test.el
index f5eea17..8739191 100644
--- a/test/parser-generator-lr-test.el
+++ b/test/parser-generator-lr-test.el
@@ -699,6 +699,43 @@
       (parser-generator-lr-translate)))
     (message "3+4+5-6=6\n")
 
+    (switch-to-buffer buffer)
+    (kill-region (point-min) (point-max))
+    (insert "3*4*5\n")
+    (should
+     (equal
+      60
+      (parser-generator-lr-translate)))
+    (message "3*4*5=60\n")
+
+    (switch-to-buffer buffer)
+    (kill-region (point-min) (point-max))
+    (insert "10/5\n")
+    (should
+     (equal
+      2
+      (parser-generator-lr-translate)))
+    (message "10/5=2\n")
+
+    (switch-to-buffer buffer)
+    (kill-region (point-min) (point-max))
+    (insert "10^2\n")
+    (should
+     (equal
+      100
+      (parser-generator-lr-translate)))
+    (message "10^2=100\n")
+
+    (switch-to-buffer buffer)
+    (kill-region (point-min) (point-max))
+    (insert "3+4*5\n")
+    (should
+     (equal
+      23
+      (parser-generator-lr-translate)))
+    (message "3+4*5=23\n")
+
+
     (kill-buffer))
 
   (message "Passed tests for (parser-generator-lr--parse)"))