;
; File generated by cc65 v 2.19 - Git ab8bb268
;
	.fopt		compiler,"cc65 v 2.19 - Git ab8bb268"
	.setcpu		"6502"
	.smart		on
	.autoimport	on
	.case		on
	.debuginfo	off
	.importzp	sp, sreg, regsave, regbank
	.importzp	tmp1, tmp2, tmp3, tmp4, ptr1, ptr2, ptr3, ptr4
	.macpack	longbranch
	.import		_stderr
	.import		_fprintf
	.export		_perror
	.import		_strerror
	.import		__errno

.segment	"RODATA"

S0001:
	.byte	$25,$73,$3A,$20,$25,$73,$0A,$00
S0002	:=	S0001+4

; ---------------------------------------------------------------
; void __near__ __fastcall__ perror (const char *msg)
; ---------------------------------------------------------------

.segment	"CODE"

.proc	_perror: near

.segment	"CODE"

	jsr     pushax
	lda     __errno
	ldx     __errno+1
	jsr     _strerror
	jsr     pushax
	ldy     #$03
	lda     (sp),y
	dey
	ora     (sp),y
	beq     L0002
	lda     _stderr
	ldx     _stderr+1
	jsr     pushax
	lda     #<(S0001)
	ldx     #>(S0001)
	jsr     pushax
	ldy     #$09
	jsr     pushwysp
	ldy     #$09
	jsr     pushwysp
	ldy     #$08
	jmp     L0004
L0002:	lda     _stderr
	ldx     _stderr+1
	jsr     pushax
	lda     #<(S0002)
	ldx     #>(S0002)
	jsr     pushax
	ldy     #$07
	jsr     pushwysp
	ldy     #$06
L0004:	jsr     _fprintf
	jmp     incsp4

.endproc