Asserting `fd' exists inside the with

This commit is contained in:
Paul R. Tagliamonte 2013-04-07 18:39:30 -04:00
parent 4db9446197
commit 83d91c3f81

View File

@ -293,7 +293,7 @@
(defn test-context []
"NATIVE: test with"
(with [fd (open "README.md" "r")] (pass))
(with [fd (open "README.md" "r")] (assert fd))
(with [(open "README.md" "r")] (pass)))