git.iko.soy/rowtype-yoga/purescript-native
on 8a10621 help sign in
rowtype-yoga/purescript-native/examples/passing/FunctionScope.purs
19 lines 320 B history raw
1module Main where
3 import Prelude
5 mkValue :: Number -> Number
6 mkValue id = id
8 foreign import error
9 """
10 function error(msg) {
11 throw msg;
12 }
13 """ :: forall a. String -> a
15 main = do
16 let value = mkValue 1
17 if value == 1
18 then Debug.Trace.trace "Done"
19 else error "Not done"