diff options
| author | Sergei Trofimovich <siarheit@google.com> | 2015-01-20 23:27:08 +0000 |
|---|---|---|
| committer | Sergei Trofimovich <siarheit@google.com> | 2015-01-20 23:27:08 +0000 |
| commit | bef8b7976bd9ea0ee384d77cc8111cceae8d0d42 (patch) | |
| tree | 3df0a6fe319d6e664eedf6aa24a58890f691aac6 | |
| parent | f3e62714e356521efe49a011f874d3a66e543d76 (diff) | |
| download | haskell-bef8b7976bd9ea0ee384d77cc8111cceae8d0d42.tar.gz | |
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@google.com>
| -rw-r--r-- | compiler/parser/cutils.c | 6 | ||||
| -rw-r--r-- | compiler/parser/cutils.h | 1 |
2 files changed, 0 insertions, 7 deletions
diff --git a/compiler/parser/cutils.c b/compiler/parser/cutils.c index d714a0cb2a..e458c080a1 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 c7c1867ded..95a10c59f9 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 ); |