diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2019-01-18 15:24:21 +0000 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2019-01-18 15:24:21 +0000 |
| commit | 391f3ccea45fe6f72a1d041a306fed7ee3a96db9 (patch) | |
| tree | 9d0f3ca15b481b675a3c3e19bea107d148c4aae5 /compiler/HsVersions.h | |
| parent | 07e58c7d5b2186954987578abc0889cfe0fd9625 (diff) | |
| download | haskell-wip/T16185.tar.gz | |
Improvements to the AnonArgFlag stuffwip/T16185
One step forward is using CPP for FunTy
See Note [Function types] in TyCoRep
Diffstat (limited to 'compiler/HsVersions.h')
| -rw-r--r-- | compiler/HsVersions.h | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/compiler/HsVersions.h b/compiler/HsVersions.h index a4ec3e4c40..cb9f47f67e 100644 --- a/compiler/HsVersions.h +++ b/compiler/HsVersions.h @@ -63,3 +63,11 @@ foreign import ccall unsafe saccessor \ #define ASSERTM(e) do { bool <- e; MASSERT(bool) } #define ASSERTM2(e,msg) do { bool <- e; MASSERT2(bool,msg) } #define WARNM2(e,msg) do { bool <- e; WARN(bool, msg) return () } + + +/* ------------------------------------ */ +/* Egregions hack for FunTy */ +/* See Note [Function types] in TyCoRep */ +/* ------------------------------------ */ + +#define FunTy FFunTy _ |