refactor input form

Author: jcouyang

src/__tests__/fantasy-test.tsx

@@ -197,10 +197,9 @@ describe('actions', () => {
   describe('combine', () => {
     let input1
     beforeEach(() => {
-      let inputNumber = x => xinput<'number', rx.URI, Event, ViewProps>(x)
-      let fantasyX1 = inputNumber('value0')
+      let fantasyX1 = xinput<rx.URI, Event, ViewProps>('value0')
 
-      let fantasyX2 = inputNumber('value1')
+      let fantasyX2 = xinput<rx.URI, Event, ViewProps>('value1')
 
       let View: React.SFC<any> = props => (
         <div>

src/forms/index.ts

@@ -1,18 +1,25 @@
-import { pure } from '../fantasy'
-import { Partial } from '../fantasy/interfaces'
 import { HKTS, streamOps, HKT } from '../xs'
-import { Update } from '../interfaces'
+import { Update, pure } from '..'
 import { FantasyX } from '../fantasy/fantasyx'
+import { Partial } from '../fantasy/interfaces'
+
+export type AnyProps = {
+  [name: string]: any
+}
 
 export function xinput<
   E extends HKTS,
   I extends Event,
-  S>(name: keyof S) {
+  S extends AnyProps>(name: keyof S) {
   return pure<E, I, S>(intent$ => {
     return {
       update$:
       streamOps.map<string, Update<S>>(
-        value => (state => ({ [name]: value }) as Partial<S>),
+        value => (state => {
+          let result = <S>{}
+          result[name] = value
+          return result as Partial<S>
+        }),
         streamOps.map<Event, string>(
           e => (e.target as HTMLFormElement).value,
           streamOps.filter<I>(i => {