diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2018-03-28 23:35:43 +0200 |
|---|---|---|
| committer | Alan Zimmerman <alan.zimm@gmail.com> | 2018-04-07 15:01:20 +0200 |
| commit | 5819ae2173d4b16f1fde067d39c3c215a6adfe97 (patch) | |
| tree | cfa6fe74b75dcf43126ab2b22ce9c860a5a3fb47 /compiler/deSugar/DsMeta.hs | |
| parent | 718a018128a0ba2ae20001c10bc8ca4d929a1d33 (diff) | |
| download | haskell-5819ae2173d4b16f1fde067d39c3c215a6adfe97.tar.gz | |
Remove HasSourceText and SourceTextX classes
Updates haddock submodule to match.
Test Plan : Validate
Differential Revision: https://phabricator.haskell.org/D4199
Diffstat (limited to 'compiler/deSugar/DsMeta.hs')
| -rw-r--r-- | compiler/deSugar/DsMeta.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/compiler/deSugar/DsMeta.hs b/compiler/deSugar/DsMeta.hs index bcc6464918..c8f70e03e7 100644 --- a/compiler/deSugar/DsMeta.hs +++ b/compiler/deSugar/DsMeta.hs @@ -2390,16 +2390,16 @@ repLiteral lit mk_integer :: Integer -> DsM (HsLit GhcRn) mk_integer i = do integer_ty <- lookupType integerTyConName - return $ HsInteger noSourceText i integer_ty + return $ HsInteger NoSourceText i integer_ty mk_rational :: FractionalLit -> DsM (HsLit GhcRn) mk_rational r = do rat_ty <- lookupType rationalTyConName return $ HsRat def r rat_ty mk_string :: FastString -> DsM (HsLit GhcRn) -mk_string s = return $ HsString noSourceText s +mk_string s = return $ HsString NoSourceText s mk_char :: Char -> DsM (HsLit GhcRn) -mk_char c = return $ HsChar noSourceText c +mk_char c = return $ HsChar NoSourceText c repOverloadedLiteral :: HsOverLit GhcRn -> DsM (Core TH.Lit) repOverloadedLiteral (OverLit { ol_val = val}) |