migrate substitution keywords to SVN
[reactos.git] / reactos / lib / string / i386 / tcsrchr.h
1 /* $Id$
2 */
3
4 #include "tchar.h"
5
6 .globl _tcsrchr
7
8 _tcsrchr:
9 push %esi
10 mov 0x8(%esp), %esi
11 mov 0xC(%esp), %edx
12
13 cld
14 mov _tsize, %ecx
15
16 .L1:
17 _tlods
18 cmp %_treg(a), %_treg(d)
19 jne .L2
20 mov %esi, %ecx
21
22 .L2:
23 test %_treg(a), %_treg(a)
24 jnz .L1
25
26 mov %ecx, %eax
27 _tdec(%eax)
28 pop %esi
29 ret
30
31 /* EOF */