diff options
| author | Gabor Greif <ggreif@gmail.com> | 2012-07-18 12:14:16 +0200 |
|---|---|---|
| committer | Gabor Greif <ggreif@gmail.com> | 2012-07-18 12:14:16 +0200 |
| commit | f25718b039f8a31dc158ab8dad3c9523ee6f87e5 (patch) | |
| tree | f5a70a01ff9383769f5439ce420b01fc301b13a9 | |
| parent | 9ef3b765e85adb158dfe87f0c95fad290e12af93 (diff) | |
| download | haskell-f25718b039f8a31dc158ab8dad3c9523ee6f87e5.tar.gz | |
made comments C-style, so that no gcc-extension is needed
also removed an unnecessary 'struct' tag (since the struct is
not recursive); this is in line with the other struct definitions
fixed a typo, updated copyright
it remains to remove the tabs and align the structure members
accordingly
| -rw-r--r-- | includes/stg/Regs.h | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/includes/stg/Regs.h b/includes/stg/Regs.h index bfc3d4b04d..bf17b7e825 100644 --- a/includes/stg/Regs.h +++ b/includes/stg/Regs.h @@ -1,6 +1,6 @@ /* ----------------------------------------------------------------------------- * - * (c) The GHC Team, 1998-2009 + * (c) The GHC Team, 1998-2012 * * Registers in the STG machine. * @@ -21,7 +21,7 @@ * * The register set is backed by a table in memory (struct * StgRegTable). If a particular STG register is not mapped to a - * machine register, then the apprpriate slot in this table is used + * machine register, then the appropriate slot in this table is used * instead. * * This table is itself pointed to by another register, BaseReg. If @@ -58,7 +58,7 @@ typedef union { * register, probably because there's a shortage of real registers. * 2) caller-saves registers are saved across a CCall */ -typedef struct StgRegTable_ { +typedef struct { StgUnion rR1; StgUnion rR2; StgUnion rR3; @@ -80,13 +80,13 @@ typedef struct StgRegTable_ { StgPtr rSpLim; StgPtr rHp; StgPtr rHpLim; - struct CostCentreStack_ * rCCCS; // current cost-centre-stack + struct CostCentreStack_ * rCCCS; /* current cost-centre-stack */ struct StgTSO_ * rCurrentTSO; struct nursery_ * rNursery; struct bdescr_ * rCurrentNursery; /* Hp/HpLim point into this block */ struct bdescr_ * rCurrentAlloc; /* for allocation using allocate() */ StgWord rHpAlloc; /* number of *bytes* being allocated in heap */ - StgWord rRet; // holds the return code of the thread + StgWord rRet; /* holds the return code of the thread */ } StgRegTable; #if IN_STG_CODE |
