File: Locale.hs

package info (click to toggle)
haskell98-report 20080907-8
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 2,148 kB
  • ctags: 105
  • sloc: haskell: 4,078; makefile: 322
file content (11 lines) | stat: -rw-r--r-- 464 bytes parent folder | download | duplicates (18) 
1
2
3
4
5
6
7
8
9
10
11
 
module Locale(TimeLocale(..), defaultTimeLocale) where

data TimeLocale = TimeLocale {
        wDays  :: [(String, String)],   -- full and abbreviated week days
        months :: [(String, String)],   -- full and abbreviated months
        amPm   :: (String, String),     -- AM/PM symbols
        dateTimeFmt, dateFmt,           -- formatting strings
          timeFmt, time12Fmt :: String     
        } deriving (Eq, Ord, Show)

defaultTimeLocale :: TimeLocale