[commit: ghc] wip/angerman/llvmng: pdep/pext signature fix. (428dc68)
git at git.haskell.org
git at git.haskell.org
Sat Nov 25 09:15:02 UTC 2017
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/angerman/llvmng
Link : http://ghc.haskell.org/trac/ghc/changeset/428dc68a5d1ed9cb68e53de736d9742e92befd06/ghc
>---------------------------------------------------------------
commit 428dc68a5d1ed9cb68e53de736d9742e92befd06
Author: Moritz Angermann <moritz.angermann at gmail.com>
Date: Fri Nov 24 13:40:30 2017 +0800
pdep/pext signature fix.
>---------------------------------------------------------------
428dc68a5d1ed9cb68e53de736d9742e92befd06
libraries/ghc-prim/cbits/pdep.c | 3 +--
libraries/ghc-prim/cbits/pext.c | 3 +--
2 files changed, 2 insertions(+), 4 deletions(-)
diff --git a/libraries/ghc-prim/cbits/pdep.c b/libraries/ghc-prim/cbits/pdep.c
index a3b7da3..9a2b014 100644
--- a/libraries/ghc-prim/cbits/pdep.c
+++ b/libraries/ghc-prim/cbits/pdep.c
@@ -1,9 +1,8 @@
#include "Rts.h"
#include "MachDeps.h"
-extern StgWord hs_pdep64(StgWord64 src, StgWord mask);
StgWord
-hs_pdep64(StgWord src, StgWord mask)
+hs_pdep64(StgWord64 src, StgWord64 mask)
{
uint64_t result = 0;
diff --git a/libraries/ghc-prim/cbits/pext.c b/libraries/ghc-prim/cbits/pext.c
index d08fb94..db9fddf 100644
--- a/libraries/ghc-prim/cbits/pext.c
+++ b/libraries/ghc-prim/cbits/pext.c
@@ -1,9 +1,8 @@
#include "Rts.h"
#include "MachDeps.h"
-extern StgWord hs_pext64(StgWord src, StgWord mask);
StgWord
-hs_pext64(StgWord src, StgWord mask)
+hs_pext64(StgWord64 src, StgWord64 mask)
{
uint64_t result = 0;
int offset = 0;
More information about the ghc-commits
mailing list