b9d26ee · elk · git.iko.soy

on master help sign in

Make the `Time` type more flexible.

b9d26eeevancz14 years ago

elm/src/Parse/Types.hs+1

@@ -36,6 +36,7 @@ typeUnambiguous = typeList <|> typeTuple

36typeSimple :: IParser ParseType

37typeSimple = dealias <$> var

38 where dealias "String" = listPT (VarPT "Char")

39+ dealias "Time" = VarPT "Float"

39 dealias v = VarPT v

40 dealias v = VarPT v

41typeApp :: IParser ParseType

42typeApp :: IParser ParseType

elm/src/Types/Types.hs+1−1

@@ -42,7 +42,7 @@ bool = tipe "Bool"

42string = listOf char -- tipe "String"

43text = tipe "Text"

45−time = tipe "Time"

45+time = float --tipe "Time"

46date = tipe "Date"

47month = tipe "Month"

48day = tipe "Day"