Add test for handling of prefab structs

goes with https://github.com/racket/pconvert-lib/pull/4 Closes #2.
2015-09-19 22:26:43 -04:00 · 2015-09-19 22:26:43 -04:00 · fb9aba2b8d
commit fb9aba2b8d
parent f376519eed
1 changed files with 2 additions and 0 deletions
--- a/compatibility-test/tests/mzlib/pconvert.rktl
+++ b/compatibility-test/tests/mzlib/pconvert.rktl
@ -413,6 +413,8 @@
  (test '(s 1) (pc #f) (s 1))
  (test '(make-s 1) (pc #t) (s 1)))

+(test '(make-prefab-struct 's 1) print-convert (make-prefab-struct 's 1))
+
 (let ([pc
       (lambda (pv)
         (lambda (x)