1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
ruby--ruby/missing/ffs.c
akr a22df39467 * missing/ffs.c (ffs): fixed for non-zero values.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@27788 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2010-05-13 12:41:29 +00:00

49 lines
689 B
C

/* ffs.c - find first set bit */
/* ffs() is defined by Single Unix Specification. */
#include "ruby.h"
int ffs(int arg)
{
unsigned int x = (unsigned int)arg;
int r;
if (x == 0)
return 0;
r = 1;
#if 32 < SIZEOF_INT * CHAR_BIT
if ((x & 0xffffffff) == 0) {
x >>= 32;
r += 32;
}
#endif
if ((x & 0xffff) == 0) {
x >>= 16;
r += 16;
}
if ((x & 0xff) == 0) {
x >>= 8;
r += 8;
}
if ((x & 0xf) == 0) {
x >>= 4;
r += 4;
}
if ((x & 0x3) == 0) {
x >>= 2;
r += 2;
}
if ((x & 0x1) == 0) {
x >>= 1;
r += 1;
}
return r;
}