Mercurial > hg > octave-lyh

diff scripts/general/bitset.m @ 10635:d1978e7364ad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Print name of function in error() string messages.
author Rik <octave@nomad.inbox5.com>
date Sun, 16 May 2010 22:26:54 -0700
parents 16f53d29049f
children be55736a0783
line wrap: on
line diff
--- a/scripts/general/bitset.m
+++ b/scripts/general/bitset.m
@@ -74,14 +74,14 @@
       Amax = 64;
       _conv = @int64;
     else
-      error ("invalid class %s", class (A));
+      error ("bitset: invalid class %s", class (A));
     endif
     Bmax = intmax (class (A));
   endif
 
   m = double (n(:));
   if (any (m < 1) || any (m > Amax))
-    error ("n must be in the range [1,%d]", Amax);
+    error ("bitset: n must be in the range [1,%d]", Amax);
   endif
 
   mask = bitshift (_conv (1), uint8 (n) - uint8 (1));