add LCC - a better C-Compiler for WEGA
This commit is contained in:
parent
aafb31fb68
commit
136f50b5bd
|
|
@ -0,0 +1,22 @@
|
||||||
|
//
|
||||||
|
// memcpy - copies n characters from s2 to s1, and returns s1
|
||||||
|
//
|
||||||
|
.seg
|
||||||
|
|
||||||
|
sp := r15
|
||||||
|
SP := rr14
|
||||||
|
|
||||||
|
.psec
|
||||||
|
.code
|
||||||
|
_memcpy::
|
||||||
|
{
|
||||||
|
ldm r2,|_stkseg+4|(sp),#5 // rr2 = s1
|
||||||
|
// rr4 = s2
|
||||||
|
// r6 = n
|
||||||
|
cp r6,#0
|
||||||
|
ret le
|
||||||
|
ldl rr0,rr2 // save s1
|
||||||
|
ldirb @rr2,@rr4,r6
|
||||||
|
ldl rr2,rr0 // return s1
|
||||||
|
ret
|
||||||
|
}
|
||||||
Loading…
Reference in New Issue