diff options
author | Aaron Crane <arc@cpan.org> | 2017-10-12 14:00:03 +0200 |
---|---|---|
committer | Aaron Crane <arc@cpan.org> | 2017-10-21 16:51:36 +0100 |
commit | 1eb06a387814d96975ac806b89805b1e28e8080d (patch) | |
tree | f4b8fab42d7009f9196a7cd4233b9ec42158262e /ext/SDBM_File | |
parent | 1c1d7d5ba0bc33e7bea0a9aeb2d420fc5a8128ab (diff) | |
download | perl-1eb06a387814d96975ac806b89805b1e28e8080d.tar.gz |
Assume we have C89 memcpy() and memmove()
We can therefore also avoid probing for and/or using BSD bcopy().
Diffstat (limited to 'ext/SDBM_File')
-rw-r--r-- | ext/SDBM_File/pair.c | 5 | ||||
-rw-r--r-- | ext/SDBM_File/sdbm.h | 20 |
2 files changed, 0 insertions, 25 deletions
diff --git a/ext/SDBM_File/pair.c b/ext/SDBM_File/pair.c index 18c14971ef..5bbd873c03 100644 --- a/ext/SDBM_File/pair.c +++ b/ext/SDBM_File/pair.c @@ -191,14 +191,9 @@ delpair(char *pag, datum key) } } #else -#ifdef HAS_MEMMOVE dst -= m; src -= m; memmove(dst, src, m); -#else - while (m--) - *--dst = *--src; -#endif #endif /* * adjust offset index up diff --git a/ext/SDBM_File/sdbm.h b/ext/SDBM_File/sdbm.h index f32a00698e..adc0f95c30 100644 --- a/ext/SDBM_File/sdbm.h +++ b/ext/SDBM_File/sdbm.h @@ -202,26 +202,6 @@ Free_t Perl_mfree proto((Malloc_t where)); #include <memory.h> #endif -#ifdef __cplusplus -#define HAS_MEMCPY -#endif - -#ifdef HAS_MEMCPY -# if !defined(STANDARD_C) && !defined(I_STRING) && !defined(I_MEMORY) -# ifndef memcpy - extern char * memcpy proto((char*, char*, int)); -# endif -# endif -#else -# ifndef memcpy -# ifdef HAS_BCOPY -# define memcpy(d,s,l) bcopy(s,d,l) -# else -# define memcpy(d,s,l) my_bcopy(s,d,l) -# endif -# endif -#endif /* HAS_MEMCPY */ - #define memzero(d,l) memset(d,0,l) #if defined(mips) && defined(ultrix) && !defined(__STDC__) |