t-popc.c
上传用户:qaz666999
上传日期:2022-08-06
资源大小:2570k
文件大小:2k
- /* Test popc_limb.
- Copyright 2002 Free Software Foundation, Inc.
- This file is part of the GNU MP Library.
- The GNU MP Library is free software; you can redistribute it and/or modify
- it under the terms of the GNU Lesser General Public License as published by
- the Free Software Foundation; either version 3 of the License, or (at your
- option) any later version.
- The GNU MP Library is distributed in the hope that it will be useful, but
- WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
- or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
- License for more details.
- You should have received a copy of the GNU Lesser General Public License
- along with the GNU MP Library. If not, see http://www.gnu.org/licenses/. */
- #include <stdio.h>
- #include <stdlib.h>
- #include "gmp.h"
- #include "gmp-impl.h"
- #include "tests.h"
- int
- main (void)
- {
- mp_limb_t src, want, got;
- int i;
- tests_start ();
- mp_trace_base = -16;
- for (i = 0; i < GMP_LIMB_BITS; i++)
- {
- src = CNST_LIMB(1) << i;
- want = 1;
- popc_limb (got, src);
- if (got != want)
- {
- error:
- printf ("popc_limb wrong resultn");
- mpn_trace (" src ", &src, (mp_size_t) 1);
- mpn_trace (" want", &want, (mp_size_t) 1);
- mpn_trace (" got ", &got, (mp_size_t) 1);
- abort ();
- }
- }
- for (i = 0; i < 100; i++)
- {
- mpn_random2 (&src, (mp_size_t) 1);
- want = ref_popc_limb (src);
- popc_limb (got, src);
- if (got != want)
- goto error;
- }
- tests_end ();
- exit (0);
- }