Simplify (#10)

Simplification of representation

Author: ethul

Diff for: .gitignore

@@ -2,6 +2,7 @@
 .psci
 .psci_modules
 .pulp-cache/
+.psc-ide-port
 npm-debug.log
 node_modules/
 bower_components/

Diff for: LICENSE

@@ -1,4 +1,4 @@
-Copyright (c) 2016 Eric Thul
+Copyright (c) 2016-2017 Eric Thul
 
 Permission is hereby granted, free of charge, to any person obtaining a
 copy of this software and associated documentation files (the

Diff for: bower.json

@@ -16,7 +16,13 @@
     "!src/**/*"
   ],
   "dependencies": {
-    "purescript-profunctor-lenses": "^3.2.0",
-    "purescript-react": "^3.0.0"
+    "purescript-react": "^3.0.0",
+    "purescript-record": "athanclark/purescript-record#850360dbfa1bf765a19b3ec207a706622fa47ac7",
+    "purescript-monoid": "^3.1.0",
+    "purescript-strings": "^3.3.1",
+    "purescript-nullable": "^3.0.0"
+  },
+  "resolutions": {
+    "purescript-record": "850360dbfa1bf765a19b3ec207a706622fa47ac7"
   }
 }

Diff for: package.json

@@ -8,6 +8,6 @@
     "pscid": "PATH=$PURESCRIPT_0_11_PATH:$PATH pscid"
   },
   "devDependencies": {
-    "pscid": "^1.12.1"
+    "pscid": "^2.0.2"
   }
 }

Diff for: src/React/Redux.js

@@ -4,138 +4,18 @@ var Redux = require('redux');
 
 var ReactRedux = require('react-redux');
 
-function startsWithActionType(actionForeign) {
-  var index = actionForeign.type.indexOf('@@PURESCRIPT_REACT_REDUX');
-
-  return index === 0;
-}
-
-function makeActionForeign(action) {
-  var constructorName = action.constructor && action.constructor.name ? action.constructor.name : 'UnknownConstructorName';
-
-  var actionForeign = {
-    type: '@@PURESCRIPT_REACT_REDUX/' + constructorName,
-    action: action
-  };
-
-  return actionForeign;
-}
-
-exports.createStore_ = function createStore_(reducer, state, enhancer){
-  return function(){
-    function reducerForeign(stateReducerForeign, actionForeign){
-      var result = startsWithActionType(actionForeign) ? reducer(actionForeign.action)(stateReducerForeign) : stateReducerForeign;
-
-      return result;
-    }
-
-    function enhancerForeign(createStoreForeign){
-      return function(reducerEnhancerForeign, stateEnhancerForeign){
-        function createStore(reducerCreateStore){
-          return function(stateCreateStore){
-            return function(){
-              var result = createStoreForeign(reducerCreateStore, stateCreateStore);
-
-              return result;
-            };
-          };
-        }
-
-        return enhancer(createStore)(reducerEnhancerForeign)(stateEnhancerForeign)();
-      };
-    }
-
-    return Redux.createStore(reducerForeign, state, enhancerForeign);
-  };
+exports.reduxCreateStore = function reduxCreateStore(reducer, state, enhancer){
+  return Redux.createStore(reducer, state, enhancer);
 };
 
-exports.connect_ = function connect_(Tuple, mapStateToProps, reactClass){
-  function mapStateToPropsForeign(state, props) {
-    var statePropsTuple = Tuple(state)(props);
-
-    var result = mapStateToProps(statePropsTuple);
-
-    return result;
-  }
-
-  return ReactRedux.connect(mapStateToPropsForeign)(reactClass);
+exports.reduxApplyMiddleware = function reduxApplyMiddleware(middleware){
+  return Redux.applyMiddleware.apply(Redux, middleware);
 };
 
-exports.dispatch_ = function dispatch_(thisForeign, action){
-  return function(){
-    var actionForeign = makeActionForeign(action);
-
-    var actionForeignResult = thisForeign.props.dispatch(actionForeign);
-
-    return actionForeignResult.action;
-  };
+exports.reduxConnect = function reduxConnect(mapStateToProps, mapDispatchToProps, mergeProps, options){
+  return ReactRedux.connect(mapStateToProps, mapDispatchToProps, mergeProps, options);
 };
 
-exports.applyMiddleware = function applyMiddleware(middlewares){
-  var middlewaresForeign = middlewares.map(function(middleware){
-    return function(middlewareAPIForeign){
-      function getState(){
-        return middlewareAPIForeign.getState();
-      }
-
-      function dispatch(action){
-        return function(){
-          var actionForeignResult = makeActionForeign(action);
-
-          var result = middlewareAPIForeign.dispatch(actionForeignResult);
-
-          return result;
-        };
-      }
-
-      var cont = middleware({ getState: getState, dispatch: dispatch })
-
-      return function(nextForeign){
-        return function(actionForeign){
-
-          function next(action){
-            return function(){
-              var actionForeignResult = makeActionForeign(action);
-
-              var result = nextForeign(actionForeignResult);
-
-              return result;
-            };
-          }
-
-          var action = actionForeign.action;
-
-          var result = cont(next)(action)();
-
-          return result;
-        };
-      };
-    }
-  });
-
-  var middlewareEnhancerForeign = Redux.applyMiddleware.apply(Redux, middlewaresForeign);
-
-  var result = exports.fromEnhancerForeign(middlewareEnhancerForeign);
-
-  return result;
-};
-
-exports.fromEnhancerForeign = function fromEnhancerForeign(enhancerForeign){
-  return function(createStore){
-    return function(reducerForeign){
-      return function(stateForeign){
-        return function(){
-          function createStoreForeign(reducer, state){
-            var result = createStore(reducer)(state)();
-
-            return result;
-          };
-
-          return enhancerForeign(createStoreForeign)(reducerForeign, stateForeign);
-        };
-      };
-    };
-  };
-}
+exports.reduxConnect_ = exports.reduxConnect;
 
-exports.providerClass = ReactRedux.Provider;
+exports.reduxProviderClass = ReactRedux.Provider;