; Author: Copyright 1993 Shaun Blackmore

        GET     Desk.sh.regdefs
        GET     ^.h.swinos
        GET     Desk.sh.macros

;void	Desk_Font_StringWidth(FontString *string);

;       r0=pointer to definition block

;       [r0, #0]  = char *s string
;       [r0, #4]  = x
;       [r0, #8]  = y
;       [r0, #12] = split
;       [r0, #16] = index

        PREAMBLE
        STARTCODE Desk_Font_StringWidth
;
        STMFD   sp!, {r4, r5, r6, lr}
        MOV     r6, r0
        LDMIA   r6, {r1, r2, r3, r4, r5}
        SWI     Desk_SWI_Font_StringWidth + Desk_XOS_Bit
        Desk_Error2_CheckV
        STMIA   r6, {r1, r2, r3, r4, r5}
        ;MOVVC   r0, #0
        LDMFD   sp!, {r4, r5, r6, pc}^
;
        END
