ReC98/libs/BorlandC/__abort.asm

public __abort
__abort	proc DIST
		push	si
		push	di
if LDATA
		push	ds
		mov	ax, offset aAbnormalProgra
		push	ax		; buf
		nopcall	___ErrorMessage
		mov	ax, 3
		push	ax		; status
		nopcall	__exit
		add	sp, 6
else
		mov	ax, offset aAbnormalProgra
		push	ax		; buf
		call	___ErrorMessage
		mov	ax, 3
		push	ax		; status
		call	__exit
		pop	cx
		pop	cx
endif
		pop	di
		pop	si
		ret
__abort	endp
[Reduction] #1: __abort It begins. And this already shows that the inclusion of TH01's ZUNSOFT.COM will double the size of all Borland C routines we slice out, because we have to cover both large and tiny memory models... 2014-08-10 03:39:02 +00:00			`public __abort`
Replace the compatibility NOPs with a macro 2014-08-22 15:08:37 +00:00			`__abort proc DIST`
[Reduction] #1: __abort It begins. And this already shows that the inclusion of TH01's ZUNSOFT.COM will double the size of all Borland C routines we slice out, because we have to cover both large and tiny memory models... 2014-08-10 03:39:02 +00:00			`push si`
			`push di`
Replace the compatibility NOPs with a macro 2014-08-22 15:08:37 +00:00			`if LDATA`
[Reduction] #1: __abort It begins. And this already shows that the inclusion of TH01's ZUNSOFT.COM will double the size of all Borland C routines we slice out, because we have to cover both large and tiny memory models... 2014-08-10 03:39:02 +00:00			`push ds`
			`mov ax, offset aAbnormalProgra`
			`push ax ; buf`
Replace the compatibility NOPs with a macro 2014-08-22 15:08:37 +00:00			`nopcall ___ErrorMessage`
[Reduction] #1: __abort It begins. And this already shows that the inclusion of TH01's ZUNSOFT.COM will double the size of all Borland C routines we slice out, because we have to cover both large and tiny memory models... 2014-08-10 03:39:02 +00:00			`mov ax, 3`
			`push ax ; status`
Replace the compatibility NOPs with a macro 2014-08-22 15:08:37 +00:00			`nopcall __exit`
[Reduction] #1: __abort It begins. And this already shows that the inclusion of TH01's ZUNSOFT.COM will double the size of all Borland C routines we slice out, because we have to cover both large and tiny memory models... 2014-08-10 03:39:02 +00:00			`add sp, 6`
			`else`
			`mov ax, offset aAbnormalProgra`
			`push ax ; buf`
			`call ___ErrorMessage`
			`mov ax, 3`
			`push ax ; status`
			`call __exit`
			`pop cx`
			`pop cx`
Replace the compatibility NOPs with a macro 2014-08-22 15:08:37 +00:00			`endif`
[Reduction] #1: __abort It begins. And this already shows that the inclusion of TH01's ZUNSOFT.COM will double the size of all Borland C routines we slice out, because we have to cover both large and tiny memory models... 2014-08-10 03:39:02 +00:00			`pop di`
			`pop si`
Replace the compatibility NOPs with a macro 2014-08-22 15:08:37 +00:00			`ret`
[Reduction] #1: __abort It begins. And this already shows that the inclusion of TH01's ZUNSOFT.COM will double the size of all Borland C routines we slice out, because we have to cover both large and tiny memory models... 2014-08-10 03:39:02 +00:00			`__abort endp`