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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.17.0/] [newlib/] [libc/] [machine/] [w65/] [mulsi3.c] - Blame information for rev 455

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


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

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

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.17.0/] [newlib/] [libc/] [machine/] [w65/] [mulsi3.c] - Blame information for rev 455