[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