peval fix: (cons 1 #nil) is not (list 1)
authorAndy Wingo <wingo@pobox.com>
Thu, 22 Dec 2011 03:04:18 +0000 (22:04 -0500)
committerAndy Wingo <wingo@pobox.com>
Thu, 22 Dec 2011 03:04:18 +0000 (22:04 -0500)
commitcc8afa2b361635953dfba7f10e4193b1f243a50f
tree6ad38522559a9df645cb89108579b9a13e07ec39
parentfff39e1aa5df70a65e78a3d49d6d841f58bafde7
peval fix: (cons 1 #nil) is not (list 1)

* module/language/tree-il/peval.scm (peval): (cons FOO #nil) is not
  (cons FOO '()).

* test-suite/tests/tree-il.test ("partial evaluation"): Add a test.
module/language/tree-il/peval.scm
test-suite/tests/tree-il.test