32-way branching in intmap.scm, not 16-way
[bpt/guile.git] / libguile / memmove.c
1 /* Wrapper to implement ANSI C's memmove using BSD's bcopy. */
2 /* This function is in the public domain. --Per Bothner. */
3
4
5 #include <sys/types.h>
6
7 #ifdef __STDC__
8 #define PTR void *
9 #define CPTR const void *
10 PTR memmove (PTR, CPTR, size_t);
11 #else
12 #define PTR char *
13 #define CPTR char *
14 PTR memmove ();
15 #endif
16
17 PTR
18 memmove (PTR s1, CPTR s2, size_t n)
19 {
20 bcopy (s2, s1, n);
21 return s1;
22 }
23
24 /*
25 Local Variables:
26 c-file-style: "gnu"
27 End:
28 */