URL https://opencores.org/ocsvn/rf6809/rf6809/trunk

Subversion Repositories rf6809

[/] [rf6809/] [trunk/] [software/] [vbcc/] [datatypes/] [dt48t.c] - Blame information for rev 20

Line No.	Rev	Author	Line
1	18	robfinch	`from)`
2			`{`
3			`DTFTYPE to;`
4			`to.a[0]=from&255LL;`
5			`to.a[1]=(from>>8LL)&255LL;`
6			`to.a[2]=(from>>16LL)&255LL;`
7			`to.a[3]=(from>>24LL)&255LL;`
8			`to.a[4]=(from>>32LL)&255LL;`
9			`to.a[5]=(from>>40LL)&255LL;`
10			`to.a[6]=(from&0x800000000000LL)?255LL:0LL;`
11			`to.a[7]=(from&0x800000000000LL)?255LL:0LL;`
12			`return to;`
13			`}`