diff options
| author | Michael D. Adams <t-madams@microsoft.com> | 2007-06-27 15:01:33 +0000 |
|---|---|---|
| committer | Michael D. Adams <t-madams@microsoft.com> | 2007-06-27 15:01:33 +0000 |
| commit | 207802589da0d23c3f16195f453b24a1e46e322d (patch) | |
| tree | 2a17423ada08e5a890b17132440dda10c4f860bc /compiler/codeGen/SMRep.lhs | |
| parent | bb5c3f58b1da850b68e0745766f2786e538b5fbf (diff) | |
| download | haskell-207802589da0d23c3f16195f453b24a1e46e322d.tar.gz | |
Added pointerhood to LocalReg
This version should compile but is still incomplete as it introduces
potential bugs at the places marked 'TODO FIXME NOW'.
It is being recorded to help keep track of changes.
Diffstat (limited to 'compiler/codeGen/SMRep.lhs')
| -rw-r--r-- | compiler/codeGen/SMRep.lhs | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/compiler/codeGen/SMRep.lhs b/compiler/codeGen/SMRep.lhs index c2a2a44e5c..6c57a4ee67 100644 --- a/compiler/codeGen/SMRep.lhs +++ b/compiler/codeGen/SMRep.lhs @@ -19,7 +19,7 @@ module SMRep ( CgRep(..), nonVoidArg, argMachRep, primRepToCgRep, primRepHint, isFollowableArg, isVoidArg, - isFloatingArg, isNonPtrArg, is64BitArg, + isFloatingArg, is64BitArg, separateByPtrFollowness, cgRepSizeW, cgRepSizeB, retAddrSizeW, @@ -200,11 +200,6 @@ isFloatingArg DoubleArg = True isFloatingArg FloatArg = True isFloatingArg _ = False -isNonPtrArg :: CgRep -> Bool --- Identify anything which is one word large and not a pointer. -isNonPtrArg NonPtrArg = True -isNonPtrArg other = False - is64BitArg :: CgRep -> Bool is64BitArg LongArg = True is64BitArg _ = False |