pqc/external/libtompoly-0.04/pb_clamp.c

22 lines
525 B
C

/* LibTomPoly, Polynomial Basis Math -- Tom St Denis
*
* LibTomPoly is a public domain library that provides
* polynomial basis arithmetic support. It relies on
* LibTomMath for large integer support.
*
* This library is free for all purposes without any
* express guarantee that it works.
*
* Tom St Denis, tomstdenis@iahu.ca, http://poly.libtomcrypt.org
*/
#include <tompoly.h>
void pb_clamp(pb_poly *a)
{
while (a->used > 0 && (mp_iszero(&(a->terms[a->used-1])) == MP_YES)) {
--(a->used);
}
}