mirror of
https://github.com/reactos/reactos.git
synced 2024-11-20 06:15:26 +00:00
b819608ed8
svn path=/branches/condrv_restructure/; revision=63104
30 lines
326 B
PHP
30 lines
326 B
PHP
|
|
#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 */
|