Subversion Repositories planix.SVN

Rev

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

Rev 22 Rev 26
Line 1... Line 1...
1 
#include "os.h"
 1 
#include "os.h"
2 
#include <mp.h>
 2 
#include <mp.h>
3 
#include <libsec.h>
 - 
 
4 
#include "dat.h"
 3 
#include "dat.h"
5 
 
 4 
 
6 
mpint*
 5 
mpint*
7 
mpfactorial(ulong n)
 6 
mpfactorial(ulong n)
8 
{
 7 
{
Line 40... Line 39...
40 
				}
 39 
				}
41 
			}else{
 40 
			}else{
42 
				max++;
 41 
				max++;
43 
				if(max > mmax){
 42 
				if(max > mmax){
44 
					mmax++;
 43 
					mmax++;
45 
					if(max >= nelem(stk))
 44 
					if(max > nelem(stk))
46 
						abort();
 45 
						abort();
47 
					stk[max] = mpnew(Dbits);
 46 
					stk[max] = mpnew(Dbits);
48 
				}
 47 
				}
49 
				stk[max]->top = 1;
 48 
				stk[max]->top = 1;
50 
				stk[max]->p[0] = p;
 49 
				stk[max]->p[0] = p;