; generated by Norcroft RISC OS ARM C vsn 5.06 (Acorn Computers Ltd) [May 25 1995]

        AREA |C$$code|, CODE, READONLY
|x$codeseg|

        EXPORT  User_Vector
User_Vector
        MOV      a1,#0
        MOVS     pc,lr

        DCB     &55,&73,&65,&72
        DCB     &5f,&5f,&66,&69
        DCB     &6e,&61,&6c,&69
        DCB     &73,&65,&00,&00
        DCD     &ff000010

        IMPORT  __rt_stkovf_split_small
        IMPORT  _kernel_swi
User__finalise
        MOV      ip,sp
        STMDB    sp!,{fp,ip,lr,pc}
        SUB      fp,ip,#4
        CMP      sp,sl
        BLLT     __rt_stkovf_split_small
        MOV      a1,#0
        STR      a1,[sp,#-&28]!
        LDR      a1,[pc, #L000068-.-8]
        STR      a1,[sp,#4]
        LDR      a1,[pc, #L00006c-.-8]
        LDR      ip,[sl,#-0]
        ADD      a1,ip,a1
        LDR      a1,[a1,#0]
        STR      a1,[sp,#8]
        MOV      a3,sp
        MOV      a2,sp
        MOV      a1,#&20
        BL       _kernel_swi
        LDMDB    fp,{fp,sp,pc}^
L000068
        IMPORT  Entry_Vector
        DCD     Entry_Vector
L00006c
        DCD     |x$dataseg|

        DCB     &55,&73,&65,&72
        DCB     &5f,&69,&6e,&69
        DCB     &74,&69,&61,&6c
        DCB     &69,&73,&65,&00
        DCD     &ff000010

        IMPORT  atexit
        EXPORT  User_initialise
User_initialise
        MOV      ip,sp
        STMDB    sp!,{a1-a3,fp,ip,lr,pc}
        SUB      fp,ip,#4
        CMP      sp,sl
        BLLT     __rt_stkovf_split_small
        LDR      a1,[pc, #L00006c-.-8]
        LDR      ip,[sl,#-0]
        ADD      a1,ip,a1
        STR      a3,[a1,#0]
        MOV      a1,#0
        STR      a1,[sp,#-&28]!
        LDR      a1,[pc, #L000068-.-8]
        STMIB    sp,{a1,a3}
        MOV      a3,sp
        MOV      a2,sp
        MOV      a1,#&1f
        BL       _kernel_swi
        TEQ      a1,#0
        LDREQ    a1,[pc, #L0000dc-.-8]
        BLEQ     atexit
        MOVEQ    a1,#0
        LDMDB    fp,{fp,sp,pc}^
L0000dc
        DCD     User__finalise

        AREA |C$$data|,DATA

|x$dataseg|

        EXPORT  User_ws
User_ws
        DCD     &00000000

        END
