mirror of
https://github.com/reactos/reactos.git
synced 2024-09-20 09:40:52 +00:00
33 lines
388 B
PHP
33 lines
388 B
PHP
/* $Id: tcslen.inc 49591 2010-11-15 01:29:12Z tkreuzer $
|
|
*/
|
|
|
|
#include "tchar.h"
|
|
#include <asm.inc>
|
|
|
|
PUBLIC _tcslen
|
|
.code
|
|
|
|
_tcslen:
|
|
push edi
|
|
mov edi, [esp + 8]
|
|
xor eax, eax
|
|
test edi, edi
|
|
jz _tcslen_end
|
|
|
|
mov ecx, -1
|
|
cld
|
|
|
|
repne _tscas
|
|
|
|
not ecx
|
|
dec ecx
|
|
|
|
mov eax, ecx
|
|
|
|
_tcslen_end:
|
|
pop edi
|
|
ret
|
|
|
|
END
|
|
/* EOF */
|