summaryrefslogtreecommitdiff
path: root/testsuite/tests/javascript/js-ffi-string.hs
diff options
context:
space:
mode:
authorJosh Meredith <joshmeredith2008@gmail.com>2023-03-06 09:18:03 +0000
committerJosh Meredith <joshmeredith2008@gmail.com>2023-04-11 10:27:20 +0000
commitffb4fc49cc57c411dcd2d83f8b5e6c3fb48923b7 (patch)
tree5951ce0b43bfc9870c026bd16099b9539547ec99 /testsuite/tests/javascript/js-ffi-string.hs
parent3ba77b369a170ba68f4eb5c8f3ae13e03dcbb28d (diff)
downloadhaskell-wip/js-exports.tar.gz
Base/JS: GHC.JS.Foreign.Callback module (issue 23126)wip/js-exports
* Add the Callback module for "exporting" Haskell functions to be available to plain JavaScript code * Fix some primitives defined in GHC.JS.Prim * Add a JavaScript section to the user guide with instructions on how to use the JavaScript FFI, building up to using Callbacks to interact with the browser * Add tests for the JavaScript FFI and Callbacks
Diffstat (limited to 'testsuite/tests/javascript/js-ffi-string.hs')
-rw-r--r--testsuite/tests/javascript/js-ffi-string.hs13
1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/tests/javascript/js-ffi-string.hs b/testsuite/tests/javascript/js-ffi-string.hs
new file mode 100644
index 0000000000..9e9931e85f
--- /dev/null
+++ b/testsuite/tests/javascript/js-ffi-string.hs
@@ -0,0 +1,13 @@
+import GHC.JS.Prim
+
+foreign import javascript "((x) => { console.log(x); })"
+ log_js_string :: JSVal -> IO ()
+
+foreign import javascript "(() => { return 'a string'; })"
+ a_string :: JSVal
+
+main :: IO ()
+main = do
+ log_js_string (toJSString "test")
+ putStrLn (fromJSString a_string)
+ putStrLn (fromJSString $ toJSString "test")