p_ram.asm

EVM2407板卡上的测试程序源码

*******************************************************
* TMS320C2x/C2xx/C5x ANSI C Codegen Version 7.00       
*******************************************************
;	C:\TIC2XX\C2000\CGTOOLS\BIN\DSPAC.EXE -v2xx p_ram.c C:\WINDOWS\TEMP\p_ram.if 
;	dspopt NOT RUN
;	C:\TIC2XX\C2000\CGTOOLS\BIN\DSPCG.EXE -o -v2xx -o C:\WINDOWS\TEMP\p_ram.if C:\WINDOWS\TEMP\p_ram.asm C:\WINDOWS\TEMP\p_ram.tmp 
	.port
	.bss	_a,1,1
	.bss	_b,1
	.file	"p_ram.c"
	.globl	_prog_ram_check
	.globl	_a
	.globl	_b
	.text

	.sym	_prog_ram_check,_prog_ram_check,46,2,0
	.globl	_prog_ram_check

	.func	6
;>>>> 	unsigned int prog_ram_check(void)
******************************************************
* FUNCTION DEF : _prog_ram_check
******************************************************
_prog_ram_check:
	POPD	*+
	SAR	AR0,*+
	SAR	AR1,*
	LARK	AR0,1
	LAR	AR0,*0+

	.line	3
;>>>> 	for (b=0x8800;b<0xfe00;b++)
	LDPK	_b
	SPLK	#34816,_b
	ZALS	_b
	RSXM
	SUBK	-512
	BGEZ	L2
L1:
	.line	6
;>>>> 	    a=0x0000;
	LACK	0
	LDPK	_a
	SACL	_a
	.line	7
;>>>> 	    asm("	LDPK  	_b");
	LDPK  	_b
	.line	8
;>>>> 		asm("	LACL	_b");
	LACL	_b
	.line	9
;>>>> 		asm("	LDPK 	_a");
	LDPK 	_a
	.line	10
;>>>> 		asm("	TBLW	_a");	/*write a to *acc prog*/
	TBLW	_a
	.line	11
;>>>> 		asm("	TBLR	_a");   /*read *acc prog to a*/ 
	TBLR	_a
	.line	12
;>>>> 		if (a != 0x0000) return(0);
	LAC	_a
	BZ	L3
	LACK	0
	B	EPI0_1
L3:
	.line	13
;>>>> 		a=0x5555;
	SPLK	#21845,_a
	.line	14
;>>>> 		asm("	LDPK	_b");
	LDPK	_b
	.line	15
;>>>> 		asm("	LACL	_b");
	LACL	_b
	.line	16
;>>>> 		asm("	LDPK	_a");
	LDPK	_a
	.line	17
;>>>> 		asm("	TBLW	_a");	/*write a to *acc prog*/
	TBLW	_a
	.line	18
;>>>> 		asm("	TBLR	_a");   /*read *acc prog to a*/ 
	TBLR	_a
	.line	19
;>>>> 		if (a != 0x5555) return(0);	
	LAC	_a
	SUBK	21845
	BZ	L4
	LACK	0
	B	EPI0_1
L4:
	.line	20
;>>>> 		a=0x0aaaa;
	SPLK	#43690,_a
	.line	21
;>>>> 		asm("	LDPK	_b");
	LDPK	_b
	.line	22
;>>>> 		asm("	LACL	_b");
	LACL	_b
	.line	23
;>>>> 		asm("	LDPK    _a");
	LDPK    _a
	.line	24
;>>>> 		asm("	TBLW	_a");	/*write a to *acc prog*/
	TBLW	_a
	.line	25
;>>>> 		asm("	TBLR	_a");   /*read *acc prog to a*/ 
	TBLR	_a
	.line	26
;>>>> 		if (a != 0x0aaaa) return(0);
	ZALS	_a
	RSXM
	SUBK	-21846
	BZ	L5
	LACK	0
	B	EPI0_1
L5:
	.line	27
;>>>> 		a=0x0ffff;
	SPLK	#65535,_a
	.line	28
;>>>> 		asm("	LDPK	_b");
	LDPK	_b
	.line	29
;>>>> 		asm("	LACL	_b");
	LACL	_b
	.line	30
;>>>> 		asm("	LDPK	_a");
	LDPK	_a
	.line	31
;>>>> 		asm("	TBLW	_a");	/*write a to *acc prog*/
	TBLW	_a
	.line	32
;>>>> 		asm("	TBLR	_a");   /*read *acc prog to a*/ 
	TBLR	_a
	.line	33
;>>>> 		if (a != 0x0ffff) return(0);
	ZALS	_a
	SUBK	-1
	BZ	L6
	LACK	0
	B	EPI0_1
L6:
	.line	3
	LAC	_b
	ADDK	1
	SACL	_b
	ZALS	_b
	SUBK	-512
	BLZ	L1
L2:
	.line	35
;>>>> 	return(1);
	LACK	1
EPI0_1:
	.line	37
	MAR	* ,AR1
	SBRK	2
	LAR	AR0,*-
	PSHD	*
	RET

	.endfunc	42,000000000H,1

	.sym	_a,_a,14,2,16
	.globl	_a

	.sym	_b,_b,14,2,16
	.globl	_b
	.end