f.inc

傅里叶变换

******************************************************************
* Texas Instruments
* $Id:$
* Far-mode assembly calls
******************************************************************

 .if __far_mode
************************************************************
* Far mode

F_RetAdrSize	.set	2
F_StackOffset	.set	1

F_RET	.macro
	FRET
	.endm
F_RETD	.macro
	FRETD
	.endm
F_CALL	.macro  adrs
	FCALL	adrs
	.endm
F_CALLD	.macro	adrs
	FCALLD	adrs
	.endm
F_B	.macro	adrs
	FB	adrs
	.endm
F_BD	.macro	adrs
	FBD	adrs
	.endm
F_CC	.macro	adrs,conds
    nop
    nop
    XC      2,conds
	FCALL	adrs
	.endm
F_CCD	.macro	adrs,conds
    nop
    nop
    XC      2,conds
	FCALLD	adrs
	.endm
F_BACC	.macro	src
	FBACC	src
	.endm
F_BACCD	.macro	src
	FBACCD	src
	.endm
F_CALA	.macro	src
	FCALA	src
	.endm
F_CALAD	.macro	src
	FCALAD	src
	.endm
 .else
************************************************************
* Near mode

F_RetAdrSize	.set	1
F_StackOffset	.set	0

F_RET	.macro
	RET
	.endm
F_RETD	.macro
	RETD
	.endm
F_CALL	.macro  adrs
	CALL	adrs
	.endm
F_CALLD	.macro	adrs
	CALLD	adrs
	.endm
F_B	.macro	adrs
	B	adrs
	.endm
F_BD	.macro	adrs
	BD	adrs
	.endm
F_CC	.macro	adrs,conds
	CC	adrs,conds
	.endm
F_CCD	.macro	adrs,conds
	CCD	adrs,conds
	.endm
F_BACC	.macro	src
	BACC	src
	.endm
F_BACCD	.macro	src
	BACCD	src
	.endm
F_CALA	.macro	src
	CALA	src
	.endm
F_CALAD	.macro	src
	CALAD	src
	.endm
 .endif