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

.segment	"RODATA"

S0001:
	.byte	$00

; ---------------------------------------------------------------
; 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
	jsr     _ExitTurbo
	ldy     #$03
	lda     (sp),y
	dey
	ora     (sp),y
	beq     L0002
	iny
	jsr     ldaxysp
	sta     ptr1
	stx     ptr1+1
	lda     (ptr1)
	beq     L0002
	ldy     #$03
	jsr     ldaxysp
	bra     L000B
L0002:	lda     #<(S0001)
	ldx     #>(S0001)
L000B:	jsr     pushax
	ldy     #$03
	jsr     ldaxysp
	jsr     _DlgBoxOk
	jmp     incsp4

.endproc