~louis/ubuntu/trusty/clamav/lp799623_fix_logrotate

« back to all changes in this revision

Viewing changes to libclamav/tomsfastmath/bit/fp_rshd.c

  • Committer: Package Import Robot
  • Author(s): Scott Kitterman
  • Date: 2014-02-01 11:06:17 UTC
  • mfrom: (0.35.37 sid)
  • Revision ID: package-import@ubuntu.com-20140201110617-33h2xxk09dep0ui4
Tags: 0.98.1+dfsg-1ubuntu1
* Merge from Debian unstable.  Remaining changes:
  - Drop build-dep on electric-fence (in Universe)
  - Add apparmor profiles for clamd and freshclam along with maintainer
    script changes
  - Add autopkgtest

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/* TomsFastMath, a fast ISO C bignum library.
 
2
 * 
 
3
 * This project is meant to fill in where LibTomMath
 
4
 * falls short.  That is speed ;-)
 
5
 *
 
6
 * This project is public domain and free for all purposes.
 
7
 * 
 
8
 * Tom St Denis, tomstdenis@gmail.com
 
9
 */
 
10
#include "bignum_fast.h"
 
11
 
 
12
void fp_rshd(fp_int *a, int x)
 
13
{
 
14
  int y;
 
15
 
 
16
  /* too many digits just zero and return */
 
17
  if (x >= a->used) {
 
18
     fp_zero(a);
 
19
     return;
 
20
  }
 
21
 
 
22
   /* shift */
 
23
   for (y = 0; y < a->used - x; y++) {
 
24
      a->dp[y] = a->dp[y+x];
 
25
   }
 
26
 
 
27
   /* zero rest */
 
28
   for (; y < a->used; y++) {
 
29
      a->dp[y] = 0;
 
30
   }
 
31
   
 
32
   /* decrement count */
 
33
   a->used -= x;
 
34
   fp_clamp(a);
 
35
}
 
36
 
 
37
 
 
38
/* $Source: /cvs/libtom/tomsfastmath/src/bit/fp_rshd.c,v $ */
 
39
/* $Revision: 1.1 $ */
 
40
/* $Date: 2006/12/31 21:25:53 $ */