Adding arguments to lifecycle methods

 - componentWillReceiveProps(nextProps)
 - shouldComponentUpdate(nextProps, nextState)
 - componentWillUpdate(nextProps, nextState)
 - componentDidUpdate(prevProps, prevState)

Author: ethul

src/React.js

@@ -41,6 +41,34 @@ exports.mkUI = function(ss) {
           if (s === "displayName") {
             result[s] = ss[s];
           }
+          else if (s === "componentWillReceiveProps") {
+            result[s] = (function(impl) {
+                return function(nextProps) {
+                    return impl(this)(nextProps)();
+                }
+            })(ss[s]);
+          }
+          else if (s === "shouldComponentUpdate") {
+            result[s] = (function(impl) {
+                return function(nextProps, nextState) {
+                    return impl(this)(nextProps)(nextState.state)();
+                }
+            })(ss[s]);
+          }
+          else if (s === "componentWillUpdate") {
+            result[s] = (function(impl) {
+                return function(nextProps, nextState) {
+                    return impl(this)(nextProps)(nextState.state)();
+                }
+            })(ss[s]);
+          }
+          else if (s === "componentDidUpdate") {
+            result[s] = (function(impl) {
+                return function(prevProps, prevState) {
+                    return impl(this)(prevProps)(prevState.state)();
+                }
+            })(ss[s]);
+          }
           else {
             result[s] = (function(impl) {
                 return function() {

src/React.purs

@@ -167,27 +167,34 @@ type UISpec props state eff =
              ) Unit
   , componentWillReceiveProps
       :: UIRef ->
+         props ->
          Eff ( props :: ReactProps props
              , state :: ReactState ReadWrite state
              , refs :: ReactRefs ReadOnly
              | eff
              ) Unit
   , shouldComponentUpdate
       :: UIRef ->
+         props ->
+         state ->
          Eff ( props :: ReactProps props
              , state :: ReactState ReadWrite state
              , refs :: ReactRefs ReadOnly
              | eff
              ) Boolean
   , componentWillUpdate
       :: UIRef ->
+         props ->
+         state ->
          Eff ( props :: ReactProps props
              , state :: ReactState ReadWrite state
              , refs :: ReactRefs ReadOnly
              | eff
              ) Unit
   , componentDidUpdate
       :: UIRef ->
+         props ->
+         state ->
          Eff ( props :: ReactProps props
              , state :: ReactState ReadOnly state
              , refs :: ReactRefs ReadOnly
@@ -210,10 +217,10 @@ spec st render =
   , getInitialState:           \_ -> pure st
   , componentWillMount:        \_ -> return unit
   , componentDidMount:         \_ -> return unit
-  , componentWillReceiveProps: \_ -> return unit
-  , shouldComponentUpdate:     \_ -> return true
-  , componentWillUpdate:       \_ -> return unit
-  , componentDidUpdate:        \_ -> return unit
+  , componentWillReceiveProps: \_ _ -> return unit
+  , shouldComponentUpdate:     \_ _ _ -> return true
+  , componentWillUpdate:       \_ _ _ -> return unit
+  , componentDidUpdate:        \_ _ _ -> return unit
   , componentWillUnmount:      \_ -> return unit
   }