[commit: ghc] master: compiler/parser/cutils: drop unused 'ghc_memcmp_off' helper (bef8b79)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/bef8b7976bd9ea0ee384d77cc8111cceae8d0d42/ghc

>---------------------------------------------------------------

commit bef8b7976bd9ea0ee384d77cc8111cceae8d0d42
Author: Sergei Trofimovich <siarheit at google.com>
Date:   Tue Jan 20 23:27:08 2015 +0000

    compiler/parser/cutils: drop unused 'ghc_memcmp_off' helper
    
    Function came out of use in 2006:
    > commit 9d7da331989abcd1844e9d03b8d1e4163796fa85
    > Author: simonmar <unknown>
    > Date:   Fri Jan 6 16:30:19 2006 +0000
    >
    >     [project @ 2006-01-06 16:30:17 by simonmar]
    >     Add support for UTF-8 source files
    
    Found by uselex.rb:
    ghc_memcmp_off: [R]: exported from: ./compiler/stage1/build/parser/cutils.o ./compiler/stage2/build/parser/cutils.o
    
    Signed-off-by: Sergei Trofimovich <siarheit at google.com>


>---------------------------------------------------------------

bef8b7976bd9ea0ee384d77cc8111cceae8d0d42
 compiler/parser/cutils.c | 6 ------
 compiler/parser/cutils.h | 1 -
 2 files changed, 7 deletions(-)

diff --git a/compiler/parser/cutils.c b/compiler/parser/cutils.c
index d714a0c..e458c08 100644
--- a/compiler/parser/cutils.c
+++ b/compiler/parser/cutils.c
@@ -30,12 +30,6 @@ ghc_memcmp( HsPtr a1, HsPtr a2, HsInt len )
     return (memcmp((char *)a1, a2, len));
 }
 
-HsInt
-ghc_memcmp_off( HsPtr a1, HsInt i, HsPtr a2, HsInt len )
-{
-    return (memcmp((char *)a1 + i, a2, len));
-}
-
 void
 enableTimingStats( void )       /* called from the driver */
 {
diff --git a/compiler/parser/cutils.h b/compiler/parser/cutils.h
index c7c1867..95a10c5 100644
--- a/compiler/parser/cutils.h
+++ b/compiler/parser/cutils.h
@@ -9,7 +9,6 @@
 // Out-of-line string functions, see PrimPacked.lhs
 HsInt ghc_strlen( HsAddr a );
 HsInt ghc_memcmp( HsAddr a1, HsAddr a2, HsInt len );
-HsInt ghc_memcmp_off( HsAddr a1, HsInt i, HsAddr a2, HsInt len );
 
 
 void enableTimingStats( void );