update example to compile

Author: wcbeard

example/tutorial/bower.json

@@ -20,7 +20,7 @@
     "react": "~0.10.0",
     "showdown": "~0.3.1",
     "purescript-showdown": "https://github.com/joneshf/purescript-showdown.git",
-    "purescript-arrays": "~0.1.3",
+    "purescript-arrays": "~0.2.1",
     "jquery": "~2.1.1"
   }
 }

example/tutorial/tutorial.purs

@@ -4,7 +4,7 @@ module Tutorial where
   -- http://facebook.github.io/react/docs/tutorial.html
 
   import Control.Monad.Eff
-  import Data.Array
+  import Data.Array hiding (span)
   import React
   import React.DOM
   import Showdown
@@ -28,7 +28,7 @@ module Tutorial where
     \  var load = loadCommentsFromServer.bind(this);\
     \  load();\
     \  setInterval(function() { load(); }, this.props.pollInterval);\
-    \}" :: forall eff props state. ReadState eff props state {}
+    \}" :: forall eff. Eff ( reactState :: ReactState (read :: ReadAllowed) Unit | eff ) Unit
 
 
   commentList = mkUI spec do

gulpfile.js

@@ -20,7 +20,8 @@ var paths = {
                 'example/tutorial/tutorial.purs',
                 'bower_components/purescript-*/src/**/*.purs',
                 'example/tutorial/bower_components/purescript-*/src/**/*.purs'
-            ]
+            ],
+            dest: '.'
         }
     }
 };

package.json

@@ -17,7 +17,7 @@
   },
   "homepage": "https://github.com/purescript-contrib/purescript-react",
   "devDependencies": {
-    "gulp": "^3.6.2",
-    "gulp-purescript": "0.0.4"
+    "gulp": "^3.8.7",
+    "gulp-purescript": "0.0.10"
   }
 }

src/React/DOM.purs

@@ -363,7 +363,6 @@ module React.DOM where
   html = mkDOM "html"
   i = mkDOM "i"
   iframe = mkDOM "iframe"
-  iframe = mkDOM "iframe"
   img = mkDOM "img"
   input = mkDOM "input"
   ins = mkDOM "ins"
@@ -389,17 +388,14 @@ module React.DOM where
   output = mkDOM "output"
   p = mkDOM "p"
   param = mkDOM "param"
-  param = mkDOM "param"
   pre = mkDOM "pre"
   progress = mkDOM "progress"
   q = mkDOM "q"
   rp = mkDOM "rp"
-  rp = mkDOM "rp"
   rt = mkDOM "rt"
   ruby = mkDOM "ruby"
   s = mkDOM "s"
   samp = mkDOM "samp"
-  samp = mkDOM "samp"
   script = mkDOM "script"
   section = mkDOM "section"
   select = mkDOM "select"
@@ -424,15 +420,13 @@ module React.DOM where
   track = mkDOM "track"
   u = mkDOM "u"
   ul = mkDOM "ul"
-  ul = mkDOM "ul"
   var = mkDOM "var"
   video = mkDOM "video"
   wbr = mkDOM "wbr"
   circle = mkDOM "circle"
   defs = mkDOM "defs"
   g = mkDOM "g"
   line = mkDOM "line"
-  line = mkDOM "line"
   linearGradient = mkDOM "linearGradient"
   path = mkDOM "path"
   polygon = mkDOM "polygon"
@@ -452,7 +446,6 @@ module React.DOM where
   audio' = audio []
   b' = b []
   base' = base []
-  base' = base []
   bdi' = bdi []
   bdo' = bdo []
   big' = big []
@@ -492,7 +485,6 @@ module React.DOM where
   html' = html []
   i' = i []
   iframe' = iframe []
-  iframe' = iframe []
   img' = img []
   input' = input []
   ins' = ins []
@@ -518,17 +510,14 @@ module React.DOM where
   output' = output []
   p' = p []
   param' = param []
-  param' = param []
   pre' = pre []
   progress' = progress []
   q' = q []
   rp' = rp []
-  rp' = rp []
   rt' = rt []
   ruby' = ruby []
   s' = s []
   samp' = samp []
-  samp' = samp []
   script' = script []
   section' = section []
   select' = select []
@@ -553,15 +542,13 @@ module React.DOM where
   track' = track []
   u' = u []
   ul' = ul []
-  ul' = ul []
   var' = var []
   video' = video []
   wbr' = wbr []
   circle' = circle []
   defs' = defs []
   g' = g []
   line' = line []
-  line' = line []
   linearGradient' = linearGradient []
   path' = path []
   polygon' = polygon []