changeset 12480:139f993936af

Uppercase variables in script error strings.
author Rik <octave@nomad.inbox5.com>
date Fri, 25 Feb 2011 20:12:05 -0800
parents c741c1f2789e
children 97d103fcb6dd
files scripts/ChangeLog scripts/general/bitcmp.m scripts/general/bitget.m scripts/general/bitset.m scripts/miscellaneous/license.m scripts/special-matrix/pascal.m scripts/statistics/base/quantile.m scripts/statistics/tests/cor_test.m scripts/strings/substr.m
diffstat 9 files changed, 15 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,3 +1,10 @@
+2010-02-22  Rik  <octave@nomad.inbox5.com>
+
+	* general/bitcmp.m, general/bitget.m, general/bitset.m,
+	miscellaneous/license.m, special-matrix/pascal.m,
+	statistics/base/quantile.m, statistics/tests/cor_test.m,
+	strings/substr.m: Uppercase variables in error strings.
+
 2011-02-25  Jordi GutiƩrrez Hermoso  <jordigh@gmail.com>
 
 	* miscellaneous/warnings_ids.m: Add a warning description for
--- a/scripts/general/bitcmp.m
+++ b/scripts/general/bitcmp.m
@@ -77,7 +77,7 @@
   else
     m = double (k);
     if (any (m < 1) || any (m > amax))
-      error ("bitcmp: k must be in the range [1,%d]", amax);
+      error ("bitcmp: K must be in the range [1,%d]", amax);
     endif
     mask = bitshift (bmax, k - amax);
     C = bitxor (bitand (A, mask), mask);
--- a/scripts/general/bitget.m
+++ b/scripts/general/bitget.m
@@ -73,7 +73,7 @@
 
   m = double (n(:));
   if (any (m < 1) || any (m > Amax))
-    error ("bitget: n must be in the range [1,%d]", Amax);
+    error ("bitget: N must be in the range [1,%d]", Amax);
   endif
 
   C = bitand (A, bitshift (_conv (1), uint8 (n) - uint8 (1))) != _conv (0);
--- a/scripts/general/bitset.m
+++ b/scripts/general/bitset.m
@@ -81,7 +81,7 @@
 
   m = double (n(:));
   if (any (m < 1) || any (m > Amax))
-    error ("bitset: 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));
--- a/scripts/miscellaneous/license.m
+++ b/scripts/miscellaneous/license.m
@@ -159,7 +159,7 @@
             error ("TOGGLE must be either `enable' of `disable'");
           endif
         else
-          error ("feature `%s' not found", feature);
+          error ("FEATURE `%s' not found", feature);
         endif
       endif
 
--- a/scripts/special-matrix/pascal.m
+++ b/scripts/special-matrix/pascal.m
@@ -52,7 +52,7 @@
   endif
 
   if (t < -1 || t > 2)
-    error ("pascal: expecting t to be -1, 0, 1, or 2, found %d", t);
+    error ("pascal: expecting T to be -1, 0, 1, or 2, found %d", t);
   endif
 
   retval = zeros (n);
--- a/scripts/statistics/base/quantile.m
+++ b/scripts/statistics/base/quantile.m
@@ -373,7 +373,7 @@
             p = kron (p, m+0.25) + 0.375;
 
           otherwise
-            error ("quantile: Unknown method, '%d'", method);
+            error ("quantile: Unknown METHOD, '%d'", method);
         endswitch
 
         ## Duplicate single values.
--- a/scripts/statistics/tests/cor_test.m
+++ b/scripts/statistics/tests/cor_test.m
@@ -113,7 +113,7 @@
     t.dist = "stdnormal";
     cdf = stdnormal_cdf (t.stat);
   else
-    error ("cor_test: method `%s' not recognized", method);
+    error ("cor_test: METHOD `%s' not recognized", method);
   endif
 
   if (strcmp (alt, "!=") || strcmp (alt, "<>"))
--- a/scripts/strings/substr.m
+++ b/scripts/strings/substr.m
@@ -64,7 +64,7 @@
         error ("substr: length = %d out of range", len);
       endif
     else
-      error ("substr: offset = %d out of range", offset);
+      error ("substr: OFFSET = %d out of range", offset);
     endif
   else
     error ("substr: expecting string argument");