compiler/parser/cutils: drop unused 'ghc_memcmp_off' helper
authorSergei Trofimovich <siarheit@google.com>
Tue, 20 Jan 2015 23:27:08 +0000 (23:27 +0000)
committerSergei Trofimovich <siarheit@google.com>
Tue, 20 Jan 2015 23:27:08 +0000 (23:27 +0000)
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@google.com>
compiler/parser/cutils.c
compiler/parser/cutils.h

index d714a0c..e458c08 100644 (file)
@@ -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 */
 {
index c7c1867..95a10c5 100644 (file)
@@ -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 );