version 1.2, 1998/10/25 23:15:48
|
version 1.5, 2002/12/24 23:40:30
|
Line 1
|
Line 1
|
/* case insensitive memory block comparison |
/* case insensitive memory block comparison |
|
|
Copyright (C) 1996 Free Software Foundation, Inc. |
Copyright (C) 1996,1998 Free Software Foundation, Inc. |
|
|
This file is part of Gforth. |
This file is part of Gforth. |
|
|
Line 16
|
Line 16
|
|
|
You should have received a copy of the GNU General Public License |
You should have received a copy of the GNU General Public License |
along with this program; if not, write to the Free Software |
along with this program; if not, write to the Free Software |
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA. |
*/ |
*/ |
|
|
/* this is mainly useful for testing for equality; to get a version |
/* this is mainly useful for testing for equality; to get a version |
that delivers the right < and > results in any locale, you would |
that delivers the right < and > results in any locale, you would |
have to work with strcoll and some hackery */ |
have to work with strcoll and some hackery */ |
|
|
#include <ctype.h> |
|
#include "forth.h" |
#include "forth.h" |
|
#include <ctype.h> |
|
|
Cell memcasecmp(const Char *s1, const Char *s2, Cell n) |
Cell memcasecmp(const Char *s1, const Char *s2, Cell n) |
{ |
{ |