shithub: riscv

ref: 0aae832ac3f3ae5d136563e980e9c32ceb0d1444
dir: /sys/src/libmp/port/mptolel.c/

#include "os.h"
#include <mp.h>
#include "dat.h"

void
mptolel(mpint *b, uchar *p, int n)
{
	int i, j, m;
	mpdigit x;

	memset(p, 0, n);

	m = b->top*Dbytes;
	if(m < n)
		n = m;

	i = 0;
	while(n >= Dbytes){
		n -= Dbytes;
		x = b->p[i++];
		for(j = 0; j < Dbytes; j++){
			*p++ = x;
			x >>= 8;
		}
	}
	if(n > 0){
		x = b->p[i];
		for(j = 0; j < n; j++){
			*p++ = x;
			x >>= 8;
		}
	}
}