frontends/calculator/CEdev/lib/static/fabs.src


1
2
3
4
5
6
7
8
9
10
11
12
13
14

	.def _fabs
	.assume adl=1
	
; double fabs(double j);

_fabs:
	pop	bc
	pop	hl
	pop	de
	push	de
	push	hl
	push	bc
	res	7,e
	ret