@ Not a leaf function
	.include	"features.inc"
	.section	.text
	.global	putz
	.syntax	divided
	.type	putz, %function
putz:
	.ifdef	NetBSD
	stmdb	sp!, {r0, r1, lr}	@ Store arguments and return address
	.else
	stmdb	sp!, {r0, r1, r7, lr}	@ Store arguments, R7 and return address
	.endif
	mov	r0, r1
	bl	zstr_len	@ Get length of string
	mov	r2, r0
	ldm	sp!, {r0, r1}	@ Restore arguments
	.ifdef	NetBSD
	swi	#10485764	@ 10485760 + write system call number
	ldr	pc, [sp], #4	@ Return
	.else
	mov	r7, #4		@ Write system call
	swi	#0
	ldm	sp!, {r7, pc}	@ Restore R7 and return
	.endif
