mps 2009.8.18 → 2009.8.18.1
raw patch · 4 files changed
+21/−2 lines, 4 files
Files
- changelog.md +7/−0
- mps.cabal +1/−1
- src/MPS/Extra.hs +12/−0
- src/MPS/Light.hs +1/−1
changelog.md view
@@ -1,3 +1,10 @@+2009.8.18.1+-----------++### Fix++* make - behave as $+ 2009.8.18 ---------
mps.cabal view
@@ -1,5 +1,5 @@ Name: mps-Version: 2009.8.18+Version: 2009.8.18.1 Build-type: Simple Synopsis: simply oo Description: DSL that allows one to write Haskell from left to right
src/MPS/Extra.hs view
@@ -124,6 +124,18 @@ format_time :: String -> UTCTime -> String format_time = formatTime defaultTimeLocale +simple_time_format :: String+simple_time_format = "%Y-%m-%d %H:%M:%S %Z"++parse_time :: String -> String -> UTCTime+parse_time = readTime defaultTimeLocale++t2i :: UTCTime -> Integer+t2i = utcTimeToPOSIXSeconds > floor++i2t :: Integer -> UTCTime+i2t = from_i > posixSecondsToUTCTime+ -- Text filter_comment :: String -> String filter_comment =
src/MPS/Light.hs view
@@ -35,7 +35,7 @@ {-# INLINE (-) #-} (-) :: (a -> b) -> a -> b f - x = f x-infixl 0 -+infixr 0 - (<->) :: (Num a) => a -> a -> a (<->) = (Prelude.-)