diff options
| author | partain <unknown> | 1996-01-11 14:26:13 +0000 |
|---|---|---|
| committer | partain <unknown> | 1996-01-11 14:26:13 +0000 |
| commit | 10521d8418fd3a1cf32882718b5bd28992db36fd (patch) | |
| tree | 09cb781a215d1ab0c871f9655c1460207a601497 /ghc/lib/hbc/Time_p.hi | |
| parent | 7fa716e248a1f11fa686965f57aebbb83b74fa7b (diff) | |
| download | haskell-10521d8418fd3a1cf32882718b5bd28992db36fd.tar.gz | |
[project @ 1996-01-11 14:06:51 by partain]
Diffstat (limited to 'ghc/lib/hbc/Time_p.hi')
| -rw-r--r-- | ghc/lib/hbc/Time_p.hi | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/lib/hbc/Time_p.hi b/ghc/lib/hbc/Time_p.hi index 79e46a74fb..9203e3b14b 100644 --- a/ghc/lib/hbc/Time_p.hi +++ b/ghc/lib/hbc/Time_p.hi @@ -22,7 +22,7 @@ instance Ord Time _tagCmp = _A_ 2 _U_ 11 _N_ _S_ "U(U(P)LLLLLLL)U(U(P)LLLLLLL)" _N_ _N_ #-} instance Text Time {-# GHC_PRAGMA _M_ Time {-dfun-} _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 5 _!_ _TUP_4 [(Int -> [Char] -> [(Time, [Char])]), (Int -> Time -> [Char] -> [Char]), ([Char] -> [([Time], [Char])]), ([Time] -> [Char] -> [Char])] [_CONSTM_ Text readsPrec (Time), _CONSTM_ Text showsPrec (Time), _CONSTM_ Text readList (Time), _CONSTM_ Text showList (Time)] _N_ - readsPrec = _A_ 1 _U_ 12 _N_ _S_ "U(P)" {_A_ 1 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_, + readsPrec = _A_ 2 _U_ 12 _N_ _S_ "U(P)L" {_A_ 2 _U_ 22 _N_ _N_ _N_ _N_} _N_ _N_, showsPrec = _A_ 2 _U_ 112 _N_ _S_ "LU(LLLLLLLL)" _N_ _N_, readList = _A_ 0 _U_ 2 _N_ _N_ _N_ _N_, showList = _A_ 0 _U_ 12 _N_ _N_ _N_ _N_ #-} |