~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to strings/strchr.c

  • Committer: Monty Taylor
  • Date: 2008-10-16 06:32:30 UTC
  • mto: (511.1.5 codestyle)
  • mto: This revision was merged to the branch mainline in revision 521.
  • Revision ID: monty@inaugust.com-20081016063230-4brxsra0qsmsg84q
Added -Wunused-macros.

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/* Copyright (C) 2000 MySQL AB
2
 
 
3
 
   This program is free software; you can redistribute it and/or modify
4
 
   it under the terms of the GNU General Public License as published by
5
 
   the Free Software Foundation; version 2 of the License.
6
 
 
7
 
   This program is distributed in the hope that it will be useful,
8
 
   but WITHOUT ANY WARRANTY; without even the implied warranty of
9
 
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
10
 
   GNU General Public License for more details.
11
 
 
12
 
   You should have received a copy of the GNU General Public License
13
 
   along with this program; if not, write to the Free Software
14
 
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
15
 
 
16
 
/*  File   : strchr.c
17
 
    Author : Richard A. O'Keefe.
18
 
             Michael Widenius:  ifdef MC68000
19
 
    Updated: 20 April 1984
20
 
    Defines: strchr(), index()
21
 
 
22
 
    strchr(s, c) returns a pointer to the  first  place  in  s  where  c
23
 
    occurs,  or  NullS if c does not occur in s. This function is called
24
 
    index in V7 and 4.?bsd systems; while not ideal the name is  clearer
25
 
    than  strchr,  so index remains in strings.h as a macro.  NB: strchr
26
 
    looks for single characters,  not for sets or strings.   To find the
27
 
    NUL character which closes s, use strchr(s, '\0') or strend(s).  The
28
 
    parameter 'c' is declared 'int' so it will go in a register; if your
29
 
    C compiler is happy with register _char_ change it to that.
30
 
*/
31
 
 
32
 
#include "strings.h"
33
 
 
34
 
#if defined(MC68000) && defined(DS90)
35
 
 
36
 
char*   strchr(char *s, pchar c)
37
 
{
38
 
asm("           movl    4(a7),a0        ");
39
 
asm("           movl    8(a7),d1        ");
40
 
asm(".L2:       movb    (a0)+,d0        ");
41
 
asm("           cmpb    d0,d1           ");
42
 
asm("           beq     .L1             ");
43
 
asm("           tstb    d0              ");
44
 
asm("           bne     .L2             ");
45
 
asm("           moveq   #0,d0           ");
46
 
asm("           rts                     ");
47
 
asm(".L1:       movl    a0,d0           ");
48
 
asm("           subql   #1,d0           ");
49
 
}
50
 
#else
51
 
 
52
 
char *strchr(register const char *s, register pchar c)
53
 
{
54
 
  for (;;)
55
 
  {
56
 
     if (*s == (char) c) return (char*) s;
57
 
     if (!*s++) return NullS;
58
 
  }
59
 
}
60
 
 
61
 
#endif