diff options
| author | Richard Eisenberg <eir@cis.upenn.edu> | 2016-01-13 23:29:17 -0500 |
|---|---|---|
| committer | Richard Eisenberg <eir@cis.upenn.edu> | 2016-01-27 09:33:26 -0500 |
| commit | 00cbbab3362578df44851442408a8b91a2a769fa (patch) | |
| tree | c8f79d003510e191adeab0d1b98f20ebde40d914 /testsuite/tests/th/T11452.hs | |
| parent | 2899aa580d633103fc551e36c977720b94f5b41c (diff) | |
| download | haskell-00cbbab3362578df44851442408a8b91a2a769fa.tar.gz | |
Refactor the typechecker to use ExpTypes.
The idea here is described in [wiki:Typechecker]. Briefly,
this refactor keeps solid track of "synthesis" mode vs
"checking" in GHC's bidirectional type-checking algorithm.
When in synthesis mode, the expected type is just an IORef
to write to.
In addition, this patch does a significant reworking of
RebindableSyntax, allowing much more freedom in the types
of the rebindable operators. For example, we can now have
`negate :: Int -> Bool` and
`(>>=) :: m a -> (forall x. a x -> m b) -> m b`. The magic
is in tcSyntaxOp.
This addresses tickets #11397, #11452, and #11458.
Tests:
typecheck/should_compile/{RebindHR,RebindNegate,T11397,T11458}
th/T11452
Diffstat (limited to 'testsuite/tests/th/T11452.hs')
| -rw-r--r-- | testsuite/tests/th/T11452.hs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/testsuite/tests/th/T11452.hs b/testsuite/tests/th/T11452.hs new file mode 100644 index 0000000000..8d91ee47c9 --- /dev/null +++ b/testsuite/tests/th/T11452.hs @@ -0,0 +1,6 @@ +{-# LANGUAGE RankNTypes, TemplateHaskell #-} + +module T11452 where + +impred :: (forall a. a -> a) -> () +impred = $$( [|| \_ -> () ||] ) |