[SHELL/EXPERIMENTS]

* Create a branch for some evul shell experiments.

svn path=/branches/shell-experiments/; revision=61927

lib/sdk/crt/string/i386/tcsncmp.inc

@@ -0,0 +1,41 @@
+
+#include "tchar.h"
+#include <asm.inc>
+
+PUBLIC _tcsncmp
+.code
+
+_tcsncmp:
+    push esi
+    push edi
+    mov esi, [esp + 12] /* s1 */
+    mov edi, [esp + 16] /* s2 */
+    mov ecx, [esp + 20] /* n */
+
+    xor eax, eax
+    cld
+
+.L1:
+    dec ecx
+    js .L2
+    _tlods
+    _tscas
+    jne .L3
+    test eax, eax
+    jne .L1
+
+.L2:
+    xor eax, eax
+    jmp .L4
+
+.L3:
+    sbb eax, eax
+    or al, 1
+
+.L4:
+    pop edi
+    pop esi
+    ret
+
+END
+/* EOF */