Mercurial > forge

changeset 7204:937278c100fd octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
removed warnings
author cdf
date Thu, 03 Jun 2010 09:23:57 +0000
parents 6a063e3b1dde
children b3832d0faec6
files extra/nurbs/src/surfderivcpts.cc extra/nurbs/src/tbasisfun.cc
diffstat 2 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/extra/nurbs/src/surfderivcpts.cc	Thu Jun 03 09:17:35 2010 +0000
+++ b/extra/nurbs/src/surfderivcpts.cc	Thu Jun 03 09:23:57 2010 +0000
@@ -79,8 +79,8 @@
       surfderivcpts (n, p, U, m, q, V, P, d, r1, r2, s1, s2,  pkl);
 
       retval(0) = octave_value (pkl);
-      return retval;
     }
+  return retval;
 }
 
 
--- a/extra/nurbs/src/tbasisfun.cc	Thu Jun 03 09:17:35 2010 +0000
+++ b/extra/nurbs/src/tbasisfun.cc	Thu Jun 03 09:23:57 2010 +0000
@@ -63,6 +63,7 @@
 
 {
   
+  octave_value_list retval;
   Matrix u = args(0).matrix_value ();
 
   if (! args(2).is_cell ())
@@ -91,8 +92,9 @@
 	  onebasisfun__ (u(1, ii), octave_idx_type(p(1)), V);
 	//std::cout << "N=" << N(ii) << "\n\n\n";
       }
-    return octave_value (N);
+    retval(0) = octave_value (N);
   }
+  return retval;
 }