Fix ComponentSpec state

Author: maddie927

src/React/Basic.purs

@@ -106,8 +106,8 @@ import Type.Row (class Union)
 -- |   a React-Basic component from JavaScript, use `toReactComponent`.__
 -- |
 -- | __*See also:* `Component`, `ComponentSpec`, `make`, `makeStateless`__
-type ComponentSpec props state action =
-  ( initialState :: state
+type ComponentSpec props state initialState action =
+  ( initialState :: initialState
   , update       :: Self props state action -> action -> StateUpdate props state action
   , render       :: Self props state action -> JSX
   , shouldUpdate :: Self props state action -> props -> state -> Boolean
@@ -146,10 +146,6 @@ foreign import createComponent
    . String
   -> Component props
 
--- | A simplified alias for `ComponentSpec`. This type is usually used to represent
--- | the default component type returned from `createComponent`.
--- type Component props = forall state action. ComponentSpec props state action
-
 -- | Opaque component information for internal use.
 -- |
 -- | __*Note:* Never define a component with
@@ -289,7 +285,7 @@ foreign import readState :: forall props state action. Self props state action -
 -- | __*See also:* `makeStateless`, `createComponent`, `Component`, `ComponentSpec`__
 foreign import make
   :: forall spec spec_ props state action
-   . Union spec spec_ (ComponentSpec props state action)
+   . Union spec spec_ (ComponentSpec props state state action)
   => Component props
   -> { render :: Self props state action -> JSX | spec }
   -> props
@@ -430,7 +426,7 @@ data ReactComponentInstance
 -- | __*See also:* `ReactComponent`__
 foreign import toReactComponent
   :: forall spec spec_ jsProps props state action
-   . Union spec spec_ (ComponentSpec props state action)
+   . Union spec spec_ (ComponentSpec props state state action)
   => ({ | jsProps } -> props)
   -> Component props
   -> { render :: Self props state action -> JSX | spec }