Mercurial > octave-nkf

diff liboctave/Array-util.cc @ 5148:9eab94f5fadf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-02-18 19:04:34 by jwe]
author jwe
date Fri, 18 Feb 2005 19:04:34 +0000
parents 100f9c190be4
children 23b37da9fd5b
line wrap: on
line diff
--- a/liboctave/Array-util.cc	Wed Feb 16 21:06:19 2005 +0000
+++ b/liboctave/Array-util.cc	Fri Feb 18 19:04:34 2005 +0000
@@ -461,9 +461,9 @@
   for (int i = 0; i < n_el; i++)
     {
       if (inv)
-	retval(perm_vec(i)-1) = old_idx(i);
+	retval(perm_vec(i)) = old_idx(i);
       else
-	retval(i) = old_idx(perm_vec(i)-1);
+	retval(i) = old_idx(perm_vec(i));
     }
 
   return retval;