[pypy-commit] lang-scheme default: More symbol test

[boemmels]

Author: Juergen Boemmels <boemmels at web.de>
Branch: 
Changeset: r6:7702fffadbc2
Date: 2011-09-05 23:19 +0200
http://bitbucket.org/pypy/lang-scheme/changeset/7702fffadbc2/

Log:	More symbol test

diff --git a/scheme/test/test_parser.py b/scheme/test/test_parser.py
--- a/scheme/test/test_parser.py
+++ b/scheme/test/test_parser.py
@@ -44,6 +44,18 @@
     w_sym = parse_sexpr('abfa__')
     assert isinstance(w_sym, W_Symbol)
     assert w_sym.to_string() == 'abfa__'
+    
+    more_syms = ['abc',
+                 'call/cc',
+                 '+',
+                 '-',
+                 'set!',
+                 'eqv?',
+                ]
+    for s in more_syms:
+        w_sym = parse_sexpr(s)
+        assert isinstance(w_sym, W_Symbol)
+        assert w_sym.to_string() == s
 
 def test_string():
     t = parse_sexpr(r'''"don't believe \"them\""''')