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

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gcc/] [gcc-4.1.1/] [gcc/] [config/] [scarts16/] [muldi.c] - Blame information for rev 12

Details | Compare with Previous | View Log


long long __muldi3(long long a, long long b)
{
  long long result = 0;
 
  while (a != 0)
    {
      if (a & 1)
        {
          result += b;
        }
      a = (unsigned long long)a >> 1;
      b <<= 1;
    }
 
  return result;
}

Line No.	Rev	Author	Line
1	12	jlechner	`long long __muldi3(long long a, long long b)`
2			`{`
3			`long long result = 0;`
4
5			`while (a != 0)`
6			`{`
7			`if (a & 1)`
8			`{`
9			`result += b;`
10			`}`
11			`a = (unsigned long long)a >> 1;`
12			`b <<= 1;`
13			`}`
14
15			`return result;`
16			`}`

Browse

Tools

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gcc/] [gcc-4.1.1/] [gcc/] [config/] [scarts16/] [muldi.c] - Blame information for rev 12