OpenCores
URL https://opencores.org/ocsvn/eco32/eco32/trunk

Subversion Repositories eco32

[/] [eco32/] [trunk/] [lcc/] [tst/] [spill.c] - Rev 130

Go to most recent revision | Compare with Previous | Blame | View Log

main(){}
 
f(i){i=f()+f();}
 
f2(i){i=f()+(i?f():1);}
 
f3(int i,int *p){register r1=0,r2=0,r3=0,r4=0,r5=0,r6=0,r7=0,r8=0,r9=0,r10=0;*p++=i?f():0;}
 
double a[10],b[10];int i;f4(){register r6=0,r7=0,r8=0,r9=0,r10=0,r11=0;i=a[i]+b[i] && i && a[i]-b[i];}
/* f4 causes parent to spill child on vax when odd double regs are enabled */
 
int j, k, m, n;
double *A, *B, x;
f5(){
	x=A[k*m]*A[j*m]+B[k*n]*B[j*n];
	x=A[k*m]*B[j*n]-B[k*n]*A[j*m];
}  
 

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.