Mercurial > hg > octave-nkf
changeset 17391:7d8d194f3f63
bitget.m, bitset.m: Make max bit index consistent
* bitget.m, bitset.m: Compute maximum bit index consistently.
author | Mike Miller <mtmiller@ieee.org> |
---|---|
date | Sun, 08 Sep 2013 17:51:23 -0400 |
parents | 4bcd301754ce |
children | e09cd91168d1 |
files | scripts/general/bitget.m scripts/general/bitset.m |
diffstat | 2 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/general/bitget.m +++ b/scripts/general/bitget.m @@ -39,7 +39,7 @@ endif if (isa (A, "double")) - Amax = log2 (bitmax) + 1; + Amax = ceil (log2 (bitmax)); _conv = @double; else if (isa (A, "uint8"))
--- a/scripts/general/bitset.m +++ b/scripts/general/bitset.m @@ -54,10 +54,10 @@ if (isfloat (A) && isreal (A)) Bmax = bitmax (cl); - Amax = log2 (Bmax); + Amax = ceil (log2 (Bmax)); elseif (isinteger (A)) Bmax = intmax (cl); - Amax = round (log2 (Bmax)); + Amax = ceil (log2 (Bmax)); else error ("bitset: invalid class %s", cl); endif