diff options
| author | simonmar <unknown> | 2004-08-13 13:11:23 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2004-08-13 13:11:23 +0000 |
| commit | 423d477bfecd490de1449c59325c8776f91d7aac (patch) | |
| tree | 2fe481e38a21be66b17539de24a4fe56daf80642 /ghc/includes/StgFun.h | |
| parent | 553e90d9a32ee1b1809430f260c401cc4169c6c7 (diff) | |
| download | haskell-423d477bfecd490de1449c59325c8776f91d7aac.tar.gz | |
[project @ 2004-08-13 13:04:50 by simonmar]
Merge backend-hacking-branch onto HEAD. Yay!
Diffstat (limited to 'ghc/includes/StgFun.h')
| -rw-r--r-- | ghc/includes/StgFun.h | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/ghc/includes/StgFun.h b/ghc/includes/StgFun.h index b89cd984e5..a1a4712985 100644 --- a/ghc/includes/StgFun.h +++ b/ghc/includes/StgFun.h @@ -19,6 +19,9 @@ /* specialised function types: bitmaps and calling sequences * for these functions are pre-generated (see ghc/utils/genapply), and * the generated code in ghc/rts/AutoApply.hc. + * + * NOTE: this ordering/numbering is hard-coded into the tables + * generated by GenApply.hs which end up in AutoApply.cmm. */ #define ARG_N 3 #define ARG_P 4 @@ -29,21 +32,18 @@ #define ARG_NP 9 #define ARG_PN 10 #define ARG_PP 11 -#define ARG_FF 12 -#define ARG_DD 13 -#define ARG_LL 14 -#define ARG_NNN 15 -#define ARG_NNP 16 -#define ARG_NPN 17 -#define ARG_NPP 18 -#define ARG_PNN 19 -#define ARG_PNP 20 -#define ARG_PPN 21 -#define ARG_PPP 22 -#define ARG_PPPP 23 -#define ARG_PPPPP 24 -#define ARG_PPPPPP 25 -#define ARG_PPPPPPP 26 -#define ARG_PPPPPPPP 27 +#define ARG_NNN 12 +#define ARG_NNP 13 +#define ARG_NPN 14 +#define ARG_NPP 15 +#define ARG_PNN 16 +#define ARG_PNP 17 +#define ARG_PPN 18 +#define ARG_PPP 19 +#define ARG_PPPP 20 +#define ARG_PPPPP 21 +#define ARG_PPPPPP 22 +#define ARG_PPPPPPP 23 +#define ARG_PPPPPPPP 24 #endif // STGFUN_H |
