mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-08 14:07:34 +00:00
50 lines
1.2 KiB
Plaintext
50 lines
1.2 KiB
Plaintext
|
NEW
|
|||
|
AUTO 3,1
|
|||
|
.LIST ON
|
|||
|
.OP 65C02
|
|||
|
.OR $2000
|
|||
|
.TF lib/string.o
|
|||
|
*--------------------------------------
|
|||
|
.INB inc/macros.i
|
|||
|
.INB inc/a2osx.i
|
|||
|
*--------------------------------------
|
|||
|
.DA #0 KERNEL
|
|||
|
*--------------------------------------
|
|||
|
>PSTR "strlen"
|
|||
|
.DA CODE.strlen
|
|||
|
>PSTR "strdup"
|
|||
|
.DA CODE.strdup
|
|||
|
>PSTR "strupr"
|
|||
|
.DA CODE.strupr
|
|||
|
>PSTR "strlwr"
|
|||
|
.DA CODE.strlwr
|
|||
|
.DA 0
|
|||
|
*--------------------------------------
|
|||
|
CODE.strlen .DA #CODE.strlen.L
|
|||
|
>SYSCALL strlen
|
|||
|
CODE.strlen.L .EQ *-CODE.strlen
|
|||
|
rts
|
|||
|
*--------------------------------------
|
|||
|
*--------------------------------------
|
|||
|
*--------------------------------------
|
|||
|
CODE.strdup .DA #CODE.strdup.L
|
|||
|
>SYSCALL strdup
|
|||
|
CODE.strdup.L .EQ *-CODE.strdup
|
|||
|
rts
|
|||
|
*--------------------------------------
|
|||
|
CODE.strupr .DA #CODE.strupr.L
|
|||
|
>SYSCALL strupr
|
|||
|
CODE.strupr.L .EQ *-CODE.strupr
|
|||
|
rts
|
|||
|
*--------------------------------------
|
|||
|
CODE.strlwr .DA #CODE.strlwr.L
|
|||
|
>SYSCALL strlwr
|
|||
|
CODE.strlwr.L .EQ *-CODE.strlwr
|
|||
|
rts
|
|||
|
*--------------------------------------
|
|||
|
*--------------------------------------
|
|||
|
*--------------------------------------
|
|||
|
MAN
|
|||
|
SAVE usr/src/lib/string.o.s
|
|||
|
ASM
|