.TITLE ADDZ ; .MACRO .ADDZ Z1,Z2,Z3 ;COMPLEX Z3 = Z1 + Z2 .GLOBL .ADDZ A0=R0 Z3: .BLKW 4 Z2: .BLKW 4 Z1: .BLKW 4 .ADDZ: STF A0,-(SP) LDF Z1,A0 ;ADD REAL PARTS ADDF Z2,A0 STF A0,Z3 LDF Z1+4,A0 ADDF Z2+4,A0 STF A0,Z3+4 LDF (SP)+,A0 RETURN .END