diff options
Diffstat (limited to 'testsuite/tests/th/TH_pragma.stderr')
-rw-r--r-- | testsuite/tests/th/TH_pragma.stderr | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/testsuite/tests/th/TH_pragma.stderr b/testsuite/tests/th/TH_pragma.stderr index 0fcd167aa4..07b56645cd 100644 --- a/testsuite/tests/th/TH_pragma.stderr +++ b/testsuite/tests/th/TH_pragma.stderr @@ -1,16 +1,16 @@ -TH_pragma.hs:(6,4)-(8,26): Splicing declarations - [d| foo :: Int -> Int - {-# NOINLINE foo #-} - foo x = x + 1 |] - ======> - foo :: Int -> Int - {-# NOINLINE foo #-} - foo x = (x + 1) -TH_pragma.hs:(10,4)-(12,31): Splicing declarations - [d| bar :: Num a => a -> a - {-# SPECIALIZE INLINE[~1] bar :: Float -> Float #-} - bar x = x * 10 |] - ======> - bar :: forall a. Num a => a -> a - {-# SPECIALIZE INLINE[~1] bar :: Float -> Float #-} - bar x = (x * 10) +TH_pragma.hs:(6,4)-(8,26): Splicing declarations
+ [d| foo :: Int -> Int
+ {-# NOINLINE foo #-}
+ foo x = x + 1 |]
+ ======>
+ foo :: Int -> Int
+ {-# NOINLINE foo #-}
+ foo x = (x + 1)
+TH_pragma.hs:(10,4)-(12,31): Splicing declarations
+ [d| bar :: Num a => a -> a
+ {-# SPECIALIZE INLINE[~1] bar :: Float -> Float #-}
+ bar x = x * 10 |]
+ ======>
+ bar :: forall a. Num a => a -> a
+ {-# SPECIALIZE INLINE[~1] bar :: Float -> Float #-}
+ bar x = (x * 10)
|