Mercurial > hg > octave-thorsten
diff liboctave/CRowVector.cc @ 3322:8c6b4de3bdc8
[project @ 1999-10-26 21:33:27 by jwe]
author | jwe |
---|---|
date | Tue, 26 Oct 1999 21:33:28 +0000 |
parents | 4bb976b250bf |
children | d14c483b3c12 |
line wrap: on
line diff
--- a/liboctave/CRowVector.cc +++ b/liboctave/CRowVector.cc @@ -791,6 +791,20 @@ retval.elem (i) = x1 + 1.0 * i * delta; retval.elem (n-1) = x2; } + else if (n == 1) + { + if (x1 == x2) + { + retval.resize (1); + retval.elem (0) = x1; + } + else + (*current_liboctave_error_handler) + ("linspace: npoints is 1, but x1 != x2"); + } + else + (*current_liboctave_error_handler) + ("linspace: npoints must be greater than 0"); return retval; }