module Main where foreign import foo "function foo(s) {\ \ return s;\ \}" :: String -> String bar :: String -> String bar _ = foo "test" main = Debug.Trace.trace "Done"