diff lib/kreiderclib/strspn.as @ 2824:1647f1874cdf lwtools-port

Added Kreidier C library
author Boisy Pitre <boisy.pitre@nuance.com>
date Thu, 23 May 2013 05:49:13 -0500
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lib/kreiderclib/strspn.as	Thu May 23 05:49:13 2013 -0500
@@ -0,0 +1,31 @@
+* Disassembly by Os9disasm of strspn.r
+
+ section code
+
+strspn: pshs  x,u 
+ ldx   8,s 
+ ldu   6,s 
+ pshs  x 
+L0008 ldb   ,u+ 
+ beq   L0028 
+ stb   3,s 
+ lbsr  strchr 
+ bne   L0008 
+ bra   L0028 
+strcspn: pshs  x,u 
+ ldx   8,s 
+ ldu   6,s 
+ pshs  x 
+L001d ldb   ,u+ 
+ beq   L0028 
+ stb   3,s 
+ lbsr  strchr 
+ beq   L001d 
+L0028 leau  -1,u 
+ tfr   u,d 
+ subd  8,s 
+ leas  4,s 
+ puls  u,pc 
+
+ endsect  
+