title	Module from library INTEGER_1 : ADDI32
	name	('ADDI32')
	maclib	baselib.lib

; Copyright (C)	Werner Cirsovius
;		Hohe Weide 44
;		D-20253 Hamburg
;		Tel.: +49-40-4223247

;		Version 1.0 October 1989

; Add 32 bit integers

; ENTRY	Regs HL,BC hold 2nd operand and result
;	Stack hold 1st number

; EXIT	Result filled with sum

	entry	$add32

$add32:	
	pop	iy		; Get PC
	ex	(sp),hl		; Get lo
	add	hl,bc		; .. add
	ld	b,h
	ld	c,l
	pop	de		; Get hi
	pop	hl
	adc	hl,de		; .. add, too
	jp	(iy)

	end