From 012d3d0cf54e53789348721cb6a6221371c192b1 Mon Sep 17 00:00:00 2001
From: Ulf Magnusson <ulfalizer@gmail.com>
Date: Thu, 13 Dec 2012 07:28:00 +0100
Subject: Add more equality selftests.

---
 testsuite.py | 39 ++++++++++++++++++++++++++++++++++++++-
 1 file changed, 38 insertions(+), 1 deletion(-)

(limited to 'testsuite.py')

diff --git a/testsuite.py b/testsuite.py
index f4e587f..99b6009 100644
--- a/testsuite.py
+++ b/testsuite.py
@@ -197,7 +197,7 @@ def run_selftests():
     verify_bounds("HEX", None, None)
 
     #
-    # eval() (Already well exercised. Just test some basics.)
+    # eval()
     #
 
     # TODO: Stricter syntax checking?
@@ -238,6 +238,43 @@ def run_selftests():
     verify_val('"foo"', "n")
     verify_val('"foo" || "bar"', "n")
 
+    # Test equality for symbols
+
+    verify_val("N = N", "y")
+    verify_val("N = n", "y")
+    verify_val("N = 'n'", "y")
+    verify_val("N != N", "n")
+    verify_val("N != n", "n")
+    verify_val("N != 'n'", "n")
+
+    verify_val("M = M", "y")
+    verify_val("M = m", "y")
+    verify_val("M = 'm'", "y")
+    verify_val("M != M", "n")
+    verify_val("M != m", "n")
+    verify_val("M != 'm'", "n")
+
+    verify_val("Y = Y", "y")
+    verify_val("Y = y", "y")
+    verify_val("Y = 'y'", "y")
+    verify_val("Y != Y", "n")
+    verify_val("Y != y", "n")
+    verify_val("Y != 'y'", "n")
+
+    verify_val("N != M", "y")
+    verify_val("N != Y", "y")
+    verify_val("M != Y", "y")
+
+    # string/int/hex
+    verify_val("Y_STRING = y", "y")
+    verify_val("Y_STRING = 'y'", "y")
+    verify_val('FOO_BAR_STRING = "foo bar"', "y")
+    verify_val('FOO_BAR_STRING != "foo bar baz"', "y")
+    verify_val('INT_3 = 3', "y")
+    verify_val("INT_3 = '3'", "y")
+    verify_val('HEX_0X3 = 0x3', "y")
+    verify_val("HEX_0X3 = '0x3'", "y")
+
     # Compare some constants...
     verify_val('"foo" != "bar"', "y")
     verify_val('"foo" = "bar"', "n")
-- 
cgit v1.2.3