1
/* TomsFastMath, a fast ISO C bignum library.
3
* This project is meant to fill in where LibTomMath
4
* falls short. That is speed ;-)
6
* This project is public domain and free for all purposes.
8
* Tom St Denis, tomstdenis@gmail.com
10
#include "bignum_fast.h"
12
void fp_rshd(fp_int *a, int x)
16
/* too many digits just zero and return */
23
for (y = 0; y < a->used - x; y++) {
24
a->dp[y] = a->dp[y+x];
28
for (; y < a->used; y++) {
38
/* $Source: /cvs/libtom/tomsfastmath/src/bit/fp_rshd.c,v $ */
39
/* $Revision: 1.1 $ */
40
/* $Date: 2006/12/31 21:25:53 $ */