Test for function scope issue #186
commit38d8bc9ea5f37a1b2d8471223ca14a085a3684eb
authorGary Burgess <garyb@users.noreply.github.com>
dateSun 9 Feb 2014, 23:54 (13 years ago)
parentbd94ad8
examples/shouldpass/FunctionScope.pursnew file+17
@@ -0,0 +1,17 @@
1+module RecordScope where
2+
3+ import Prelude
4+
5+ mkValue :: Number -> Number
6+ mkValue id = id
7+
8+module Main where
9+
10+ import Prelude
11+ import RecordScope
12+
13+ main = do
14+ let value = mkValue 1
15+ if value == 1
16+ then Trace.trace "Done"
17+ else Errors.throwError "Not done"