mirror of
https://github.com/reactos/reactos.git
synced 2024-09-20 09:40:52 +00:00
527f2f9057
* Create a branch for some evul shell experiments. svn path=/branches/shell-experiments/; revision=61927
34 lines
393 B
PHP
34 lines
393 B
PHP
|
|
#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 */
|