Mercurial > octave-nkf

comparison scripts/general/bitset.m @ 14634:7e10eb490b87

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix quotes in bitset (bug #36458)
author Jordi Gutiérrez Hermoso <jordigh@octave.org>
date Mon, 14 May 2012 02:09:27 -0400
parents 056ea51070b8
children 87a50e7cec7a
comparison
equal deleted inserted replaced
14633:056ea51070b8 14634:7e10eb490b87
52 Bmax = bitmax (cl); 52 Bmax = bitmax (cl);
53 Amax = log2 (Bmax); 53 Amax = log2 (Bmax);
54 elseif (isinteger (A)) 54 elseif (isinteger (A))
55 Bmax = intmax (cl); 55 Bmax = intmax (cl);
56 ## FIXME: Better way to get number of bits than regexping? 56 ## FIXME: Better way to get number of bits than regexping?
57 Amax = str2num (nthargout (4, @regexp, cl, "\d{1,2}"){1}); 57 Amax = str2num (nthargout (4, @regexp, cl, '\d{1,2}'){1});
58 else 58 else
59 error ("bitset: invalid class %s", cl); 59 error ("bitset: invalid class %s", cl);
60 endif 60 endif
61 61
62 if (any ((n < 1)(:)) || any ((n > Amax)(:))) 62 if (any ((n < 1)(:)) || any ((n > Amax)(:)))