Blame mpc-0.9/src/uceil_log2.c

Packit Service 2e9770
/* mpc_ceil_log2 - returns ceil(log(d)/log(2))
Packit Service 2e9770
Packit Service 2e9770
Copyright (C) INRIA, 2004, 2009, 2010
Packit Service 2e9770
Packit Service 2e9770
This file is part of the MPC Library.
Packit Service 2e9770
Packit Service 2e9770
The MPC Library is free software; you can redistribute it and/or modify
Packit Service 2e9770
it under the terms of the GNU Lesser General Public License as published by
Packit Service 2e9770
the Free Software Foundation; either version 2.1 of the License, or (at your
Packit Service 2e9770
option) any later version.
Packit Service 2e9770
Packit Service 2e9770
The MPC Library is distributed in the hope that it will be useful, but
Packit Service 2e9770
WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
Packit Service 2e9770
or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
Packit Service 2e9770
License for more details.
Packit Service 2e9770
Packit Service 2e9770
You should have received a copy of the GNU Lesser General Public License
Packit Service 2e9770
along with the MPC Library; see the file COPYING.LIB.  If not, write to
Packit Service 2e9770
the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
Packit Service 2e9770
MA 02111-1307, USA. */
Packit Service 2e9770
Packit Service 2e9770
#include "mpc-impl.h"
Packit Service 2e9770
Packit Service 2e9770
/* returns ceil(log(d)/log(2)) if d > 0 */
Packit Service 2e9770
/* Don't use count_leading_zeros since it is in longlong.h */
Packit Service 2e9770
mpfr_prec_t
Packit Service 2e9770
mpc_ceil_log2 (mpfr_prec_t d)
Packit Service 2e9770
{
Packit Service 2e9770
  mpfr_prec_t exp;
Packit Service 2e9770
Packit Service 2e9770
  for (exp = 0; d > 1; d = (d + 1) / 2)
Packit Service 2e9770
    exp++;
Packit Service 2e9770
  return exp;
Packit Service 2e9770
}