diff options
author | Artyom Shalkhakov <artyom.shalkhakov@gmail.com> | 2018-05-08 17:25:29 +0600 |
---|---|---|
committer | Artyom Shalkhakov <artyom.shalkhakov@gmail.com> | 2018-05-08 17:25:29 +0600 |
commit | 1078553f5a8de2a5e85dbd49058370afeefa68c7 (patch) | |
tree | 5ad865ff4d91578fa2923930a83b6ffd003d3fd4 | |
parent | c293746d4c34ccb7abb8af41f7d05940aa7e4076 (diff) |
Adding jsbspace for #121.
-rw-r--r-- | tests/Makefile | 1 | ||||
-rw-r--r-- | tests/jsbspace.py | 11 | ||||
-rw-r--r-- | tests/jsbspace.ur | 12 |
3 files changed, 24 insertions, 0 deletions
diff --git a/tests/Makefile b/tests/Makefile index 63ae555e..250a2ece 100644 --- a/tests/Makefile +++ b/tests/Makefile @@ -19,3 +19,4 @@ simple:: ./driver.sh entities ./driver.sh fact ./driver.sh filter + ./driver.sh jsbspace diff --git a/tests/jsbspace.py b/tests/jsbspace.py new file mode 100644 index 00000000..b29d44b9 --- /dev/null +++ b/tests/jsbspace.py @@ -0,0 +1,11 @@ +import unittest +import base + +class Suite(base.Base): + def test_1(self): + """Test case 1""" + self.start() + el = self.xpath('button') + el.click() + alert = self.driver.switch_to.alert + self.assertEqual('Some \btext', alert.text) diff --git a/tests/jsbspace.ur b/tests/jsbspace.ur new file mode 100644 index 00000000..bf4b824f --- /dev/null +++ b/tests/jsbspace.ur @@ -0,0 +1,12 @@ +fun main () : transaction page = +let + fun onclick (): transaction unit = + (* this function runs on the client *) + alert "Some \btext" +in +return <xml> + <body> + <button onclick={fn _ => onclick()}>Click me!</button> + </body> +</xml> +end
\ No newline at end of file |