Mercurial > hg > octave-lyh
diff scripts/strings/dec2base.m @ 11172:7e8ce65f73cf
Overhaul functions used to convert between number bases.
author | Rik <octave@nomad.inbox5.com> |
---|---|
date | Sun, 31 Oct 2010 07:30:15 -0700 |
parents | 51beeeff9027 |
children | c776f063fefe |
line wrap: on
line diff
--- a/scripts/strings/dec2base.m +++ b/scripts/strings/dec2base.m @@ -45,7 +45,7 @@ ## ## The optional third argument, @var{len}, specifies the minimum ## number of digits in the result. -## @seealso{base2dec, dec2bin, bin2dec, hex2dec, dec2hex} +## @seealso{base2dec, dec2bin, dec2hex} ## @end deftypefn ## Author: Daniel Calvelo <dcalvelo@yahoo.com> @@ -73,6 +73,9 @@ if (length (unique (symbols)) != base) error ("dec2base: symbols representing digits must be unique"); endif + if (any (isspace (symbols))) + error ("dec2base: whitespace characters are not valid symbols"); + endif elseif (! isscalar (base)) error ("dec2base: cannot convert from several bases at once"); elseif (base < 2 || base > length (symbols)) @@ -140,13 +143,14 @@ %! '111111111111111111111111111111111111111111111111111'); %!assert(dec2base(uint64(2)^63-1,16), '7FFFFFFFFFFFFFFF'); -%!Test input validation +%%Test input validation %!error dec2base () %!error dec2base (1) %!error dec2base (1, 2, 3, 4) %!error dec2base (-1) %!error dec2base (1.1) %!error dec2base (1,"ABA") +%!error dec2base (1,"A B") %!error dec2base (1, ones(2)) %!error dec2base (1, 1) %!error dec2base (1, 37)