lang/cem/libcc.ansi/string/strcoll.c

   1 /*
   2  * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
   3  * See the copyright notice in the ACK home directory, in the file "Copyright".
   4  */
   5 /* $Id: strcoll.c,v 1.3 1994/06/24 11:56:46 ceriel Exp $ */
   6
   7 #include        <string.h>
   8 #include        <locale.h>
   9
  10 int
  11 strcoll(register const char *s1, register const char *s2)
  12 {
  13         while (*s1 == *s2++) {
  14                 if (*s1++ == '\0') {
  15                         return 0;
  16                 }
  17         }
  18         return *s1 - *--s2;
  19 }