Subversion Repositories planix.SVN

Rev

Rev 2 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2 Rev 33
Line 8... Line 8...
8 
 */
 8 
 */
9 
 
 9 
 
10 
mpint*
 10 
mpint*
11 
itomp(int i, mpint *b)
 11 
itomp(int i, mpint *b)
12 
{
 12 
{
13 
	if(b == nil)
 13 
	if(b == nil){
14 
		b = mpnew(0);
 14 
		b = mpnew(0);
15 
	mpassign(mpzero, b);
 15 
		setmalloctag(b, getcallerpc(&i));
16 
	if(i != 0)
 16 
	}
17 
		b->top = 1;
 17 
	b->sign = (i >> (sizeof(i)*8 - 1)) | 1;
18 
	if(i < 0){
 - 
 
19 
		b->sign = -1;
 18 
	i *= b->sign;
20 
		*b->p = -i;
 19 
	*b->p = i;
21 
	} else
 - 
 
22 
		*b->p = i;
 20 
	b->top = 1;
23 
	return b;
 21 
	return mpnorm(b);
24 
}
 22 
}
25 
 
 23 
 
26 
int
 24 
int
27 
mptoi(mpint *b)
 25 
mptoi(mpint *b)
28 
{
 26 
{