reactos/lib/sdk/crt/string/i386/tcscat.inc
Hermès Bélusca-Maïto 65ce146169 Create a branch for working on csrss and co.
svn path=/branches/ros-csrss/; revision=57561
2012-10-14 13:04:31 +00:00

36 lines
456 B
PHP

/* $Id: tcscat.inc 49591 2010-11-15 01:29:12Z tkreuzer $
*/
#include "tchar.h"
#include <asm.inc>
PUBLIC _tcscat
.code
_tcscat:
push esi
push edi
mov edi, [esp + 12]
mov esi, [esp + 16]
xor eax, eax
mov ecx, -1
cld
repne _tscas
_tdec(edi)
.L1:
_tlods
_tstos
test _treg(a), _treg(a)
jnz .L1
mov eax, [esp + 12]
pop edi
pop esi
ret
END
/* EOF */