test for parameters

svn: r9659
This commit is contained in:
Sam Tobin-Hochstadt 2008-05-05 17:00:32 +00:00
parent 4ff1cd0ca4
commit 62cd19a42b

View File

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