Author: Armin Rigo <ar...@tunes.org>
Branch:
Changeset: r391:e354e2de05eb
Date: 2013-07-11 11:26 +0200
http://bitbucket.org/pypy/stmgc/changeset/e354e2de05eb/
Log: Improve the test: check that pair? really evaluates its argument
diff --git a/duhton/test/test_cons.py b/duhton/test/test_cons.py
--- a/duhton/test/test_cons.py
+++ b/duhton/test/test_cons.py
@@ -10,6 +10,8 @@
def test_pair():
assert run("(print (pair? 1))") == "0\n"
assert run("(print (pair? (cons 1 2)))") == "1\n"
+ assert run("(setq x (cons 1 2)) (print (pair? x))") == "1\n"
+ assert run("(setq x 42) (print (pair? x))") == "0\n"
def test_car_cdr():
assert run("(print (car (quote (2 3))))") == "2\n"
_______________________________________________
pypy-commit mailing list
pypy-commit@python.org
http://mail.python.org/mailman/listinfo/pypy-commit
