test for parameters

svn: r9659

original commit: 62cd19a42b3881cba6b66647ccd35c3e87ffb596
This commit is contained in:
Sam Tobin-Hochstadt 2008-05-05 17:00:32 +00:00
parent bf2890d971
commit 1976c16563

View File

@ -0,0 +1,5 @@
#lang typed-scheme
(parameterize ([current-directory ".."])
(current-directory)
(current-directory ".."))