migrate substitution keywords to SVN
[reactos.git] / reactos / lib / string / i386 / tcslen.h
1 /* $Id$
2 */
3
4 #include "tchar.h"
5
6 .globl _tcslen
7
8 _tcslen:
9 push %edi
10 mov 0x8(%esp), %edi
11 xor %eax, %eax
12 mov $-1, %ecx
13 cld
14
15 repne _tscas
16
17 not %ecx
18 dec %ecx
19
20 mov %ecx, %eax
21 pop %edi
22 ret
23
24 /* EOF */