![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to memcmp.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth / engine|
Return to memcmp.c CVS log | Up to [gforth] / gforth / engine |
| version 1.1, 1997/05/21 20:40:10 | version 1.2, 1998/10/25 23:15:48 |
|---|---|
| Line 19 | Line 19 |
| Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. | Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
| */ | */ |
| int memcmp(const char *s1, const char *s2, long n) | #include "forth.h" |
| Cell memcmp(const Char *s1, const Char *s2, Cell n) | |
| { | { |
| int i; | Cell i; |
| for (i=0; i<n; i++) | for (i=0; i<n; i++) |
| if (s1[i] != s2[i]) | if (s1[i] != s2[i]) |