Handbook
Glossary
bit-length ( x -- n )
Vocabulary
math.bitwise
Inputs
x
an
object
Outputs
n
an
object
Definition
USING:
kernel
math
;
IN:
math.bitwise
:
bit-length
( x -- n )
dup
0
<
[
non-negative-number-expected
]
[
dup
1
>
[
log2
1
+
]
when
]
if
;