diff options
| author | keller@cse.unsw.edu.au <unknown> | 2008-05-01 01:18:24 +0000 |
|---|---|---|
| committer | keller@cse.unsw.edu.au <unknown> | 2008-05-01 01:18:24 +0000 |
| commit | 7744453856bd776673d685216b666bb0d7c2f6f6 (patch) | |
| tree | 283e5b9e4fc0fa944b290b490abbdc6f77258b7e /compiler/vectorise | |
| parent | 6b4c4c07c8acb13fbb5beed98476c472b9b511f3 (diff) | |
| download | haskell-7744453856bd776673d685216b666bb0d7c2f6f6.tar.gz | |
Fixed vect decl for sumP, enumfromToP
Diffstat (limited to 'compiler/vectorise')
| -rw-r--r-- | compiler/vectorise/VectBuiltIn.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/vectorise/VectBuiltIn.hs b/compiler/vectorise/VectBuiltIn.hs index 2cfb28c76a..0bccdedbad 100644 --- a/compiler/vectorise/VectBuiltIn.hs +++ b/compiler/vectorise/VectBuiltIn.hs @@ -251,8 +251,8 @@ preludeVars , mk nDP_PRELUDE_INT (fsLit "intDiv") nDP_PRELUDE_INT (fsLit "intDivV") , mk nDP_PRELUDE_INT (fsLit "intMod") nDP_PRELUDE_INT (fsLit "intModV") , mk nDP_PRELUDE_INT (fsLit "intSquareRoot") nDP_PRELUDE_INT (fsLit "intSquareRootV") - , mk nDP_PRELUDE_INT (fsLit "sumP") nDP_PRELUDE_INT (fsLit "sumPA") - , mk nDP_PRELUDE_INT (fsLit "enumFromToP") nDP_PRELUDE_INT (fsLit "enumFromToPA") + , mk gHC_PARR (fsLit "sumP") nDP_PRELUDE_INT (fsLit "sumPA") + , mk gHC_PARR (fsLit "enumFromToP") nDP_PRELUDE_INT (fsLit "enumFromToPA") , mk nDP_PRELUDE_INT (fsLit "upToP") nDP_PRELUDE_INT (fsLit "upToPA") , mk nDP_PRELUDE_INT (fsLit "eq") nDP_PRELUDE_INT (fsLit "eqV") |