simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-06 03:05:28 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix: remove code that is in the shims

Browse source
This commit is contained in:
Simon Cruanes 2020-08-06 11:19:52 -04:00
parent 09298b3324
commit 50ec164b67
1 changed files with 0 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/core/CCInt.ml
View file

@ -318,14 +318,7 @@ let range_by ~step i j yield =
(CCInt.range_by ~step:1 i j |> Iter.to_list) \ (CCInt.range_by ~step:1 i j |> Iter.to_list) \
(CCInt.range i j |> Iter.to_list) ) (CCInt.range i j |> Iter.to_list) )
*) *)
(* popcount comes from [Shims] as it's 32/64 bits dependent, see #327 *) (* popcount comes from [Shims] as it's 32/64 bits dependent, see #327 *)
let popcount (b:int) : int =
let rec loop count x =
if x=0 then count
else loop (count+1) (x land (x-1))
in
loop 0 b
(*$= (*$=
0 (popcount 0) 0 (popcount 0)