Frontend updates for 0.12

Author: natefaubion

.gitignore

@@ -7,3 +7,4 @@
 /.psc*
 /.purs*
 /.psa*
+/.stack*

bower.json

@@ -7,68 +7,61 @@
     "output"
   ],
   "dependencies": {
-    "purescript-console": "^3.0.0",
-    "purescript-foreign-generic": "^5.0.0",
-    "purescript-jquery": "^4.2.1",
-    "purescript-js-timers": "^3.0.0",
-    "purescript-parallel": "^3.2.0",
-    "purescript-prelude": "^3.1.0",
-    "purescript-random": "^3.0.0"
+    "purescript-console": "^4.1.0",
+    "purescript-foreign-generic": "^7.0.0",
+    "purescript-jquery": "^5.0.0",
+    "purescript-js-timers": "^4.0.1",
+    "purescript-parallel": "^4.0.0",
+    "purescript-prelude": "^4.1.0",
+    "purescript-random": "^4.0.0",
+    "purescript-web-html": "^1.2.0"
   },
   "devDependencies": {
     "ace": "^1.2.8",
     "jquery": "^3.2.1",
     "underscore": "^1.8.3",
-    "react": "^15.6.1",
+    "react": "^16.1.0",
     "mathbox": "^0.0.5",
-    "purescript-thermite": "^4.1.1",
-    "purescript-behaviors": "^5.2.0",
-    "purescript-slides": "^0.5.0",
-    "purescript-flare": "^3.2.0",
-    "purescript-arrays": "^4.1.2",
-    "purescript-bifunctors": "^3.0.0",
-    "purescript-console": "^3.0.0",
-    "purescript-const": "^3.0.0",
-    "purescript-contravariant": "^3.1.0",
-    "purescript-control": "^3.3.0",
-    "purescript-distributive": "^3.0.0",
-    "purescript-eff": "^3.1.0",
-    "purescript-either": "^3.1.0",
-    "purescript-enums": "^3.2.1",
-    "purescript-exceptions": "^3.1.0",
-    "purescript-exists": "^3.0.0",
-    "purescript-foldable-traversable": "^3.6.0",
-    "purescript-foreign": "^4.0.1",
-    "purescript-free": "^4.1.0",
-    "purescript-functions": "^3.0.0",
-    "purescript-functors": "^2.2.0",
-    "purescript-generics": "^4.0.0",
-    "purescript-generics-rep": "^5.2.0",
-    "purescript-globals": "^3.0.0",
-    "purescript-graphs": "^3.0.0",
-    "purescript-identity": "^3.1.0",
-    "purescript-inject": "^4.0.0",
-    "purescript-integers": "^3.1.0",
-    "purescript-lazy": "^3.0.0",
-    "purescript-maps": "^3.5.2",
+    "purescript-arrays": "^5.1.0",
+    "purescript-bifunctors": "^4.0.0",
+    "purescript-console": "^4.1.0",
+    "purescript-const": "^4.1.0",
+    "purescript-contravariant": "^4.0.0",
+    "purescript-control": "^4.1.0",
+    "purescript-distributive": "^4.0.0",
+    "purescript-effect": "^2.0.0",
+    "purescript-either": "^4.1.0",
+    "purescript-enums": "^4.0.0",
+    "purescript-exceptions": "^4.0.0",
+    "purescript-exists": "^4.0.0",
+    "purescript-foldable-traversable": "^4.1.0",
+    "purescript-foreign": "^5.0.0",
+    "purescript-foreign-object": "^1.0.0",
+    "purescript-free": "^5.1.0",
+    "purescript-functions": "^4.0.0",
+    "purescript-functors": "^3.1.0",
+    "purescript-generics-rep": "^6.1.0",
+    "purescript-globals": "^4.0.0",
+    "purescript-identity": "^4.1.0",
+    "purescript-integers": "^4.0.0",
+    "purescript-lazy": "^4.0.0",
     "purescript-math": "^2.1.0",
-    "purescript-maybe": "^3.0.0",
-    "purescript-monoid": "^3.1.0",
-    "purescript-prelude": "^3.1.0",
-    "purescript-profunctor": "^3.2.0",
-    "purescript-proxy": "^2.1.0",
-    "purescript-quickcheck": "^4.4.0",
-    "purescript-random": "^3.0.0",
-    "purescript-refs": "^3.0.0",
-    "purescript-semirings": "^4.0.0",
-    "purescript-sets": "^3.0.0",
-    "purescript-st": "^3.0.0",
-    "purescript-strings": "^3.3.1",
-    "purescript-tailrec": "^3.3.0",
-    "purescript-transformers": "^3.4.0",
-    "purescript-tuples": "^4.1.0",
-    "purescript-typelevel-prelude": "^2.4.0",
-    "purescript-unfoldable": "^3.0.0",
-    "purescript-validation": "^3.1.0"
+    "purescript-maybe": "^4.0.0",
+    "purescript-ordered-collections": "^1.0.0",
+    "purescript-prelude": "^4.1.0",
+    "purescript-profunctor": "^4.0.0",
+    "purescript-proxy": "^3.0.0",
+    "purescript-quickcheck": "^5.0.0",
+    "purescript-random": "^4.0.0",
+    "purescript-refs": "^4.1.0",
+    "purescript-semirings": "^5.0.0",
+    "purescript-st": "^4.0.0",
+    "purescript-strings": "^4.0.0",
+    "purescript-tailrec": "^4.0.0",
+    "purescript-transformers": "^4.1.0",
+    "purescript-tuples": "^5.1.0",
+    "purescript-typelevel-prelude": "^3.0.0",
+    "purescript-unfoldable": "^4.0.0",
+    "purescript-validation": "^4.0.0"
   }
 }

index.html

@@ -54,6 +54,7 @@
               <input type="radio" name="backend_inputs" value="core" id="backend_core" checked="true">
               <label for="backend_core" title="Use the core libraries backend">Core</label>
             </li>
+            <!--
             <li>
               <input type="radio" name="backend_inputs" value="thermite" id="backend_thermite">
               <label for="backend_thermite" title="Use the try-thermite backend">Thermite</label>
@@ -74,6 +75,7 @@
               <input type="radio" name="backend_inputs" value="behaviors" id="backend_behaviors">
               <label for="backend_behaviors" title="Use the try-behaviors backend">Behaviors</label>
             </li>
+            -->
           </ul>
         </li><li class="menu-item view_gist_li mobile-only">
           <a class="view_gist" target="trypurs_gist">

src/Control/Monad/Eff/JQuery/Extras.purs

@@ -0,0 +1,40 @@
+module JQuery.Extras
+  ( click
+  , empty
+  , fadeIn
+  , fadeOut
+  , filter
+  , is
+  , getValueMaybe
+  ) where
+
+import Prelude
+
+import Data.Maybe (Maybe)
+import Data.Nullable (Nullable, toMaybe)
+import Effect (Effect)
+import JQuery (JQuery, Selector)
+
+-- | Simulate a click event on the specified element.
+foreign import click :: JQuery -> Effect Unit
+
+-- | Remove all elements from the specified container element.
+foreign import empty :: JQuery -> Effect Unit
+
+-- | Fade in an element.
+foreign import fadeIn :: JQuery -> Effect Unit
+
+-- | Fade out an element.
+foreign import fadeOut :: JQuery -> Effect Unit
+
+-- | Filter elements based on an additional selector.
+foreign import filter :: JQuery -> Selector -> Effect JQuery
+
+-- | Test whether elements match an additional selector.
+foreign import is :: JQuery -> Selector -> Effect Boolean
+
+-- | Get the value of the first element, if it exists.
+foreign import getValue :: JQuery -> Effect (Nullable String)
+
+getValueMaybe :: JQuery -> Effect (Maybe String)
+getValueMaybe = map toMaybe <<< getValue