reactos/lib/sdk/crt/string/i386/tcsrchr.inc
Johannes Anderwald 6c8e7899a9 - Update to trunk
svn path=/branches/audio-bringup/; revision=49927
2010-12-03 15:05:26 +00:00

34 lines
445 B
PHP

/* $Id: tcsrchr.inc 49591 2010-11-15 01:29:12Z tkreuzer $
*/
#include "tchar.h"
#include <asm.inc>
PUBLIC _tcsrchr
.code
_tcsrchr:
push esi
mov esi, [esp + 8]
mov edx, [esp + 12]
cld
mov ecx, _tsize
.L1:
_tlods
cmp _treg(d), _treg(a)
jne .L2
mov ecx, esi
.L2:
test _treg(a), _treg(a)
jnz .L1
mov eax, ecx
_tdec(eax)
pop esi
ret
END
/* EOF */