Mercurial > hg > octave-nkf
comparison liboctave/CollocWt.cc @ 11570:57632dea2446
attempt better backward compatibility for Array constructors
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Wed, 19 Jan 2011 17:55:56 -0500 |
parents | fd0a3ac60b0e |
children | 12df7854fa7c |
comparison
equal
deleted
inserted
replaced
11569:7e9a111cae20 | 11570:57632dea2446 |
---|---|
426 return; | 426 return; |
427 } | 427 } |
428 else if (nt == 0) | 428 else if (nt == 0) |
429 return; | 429 return; |
430 | 430 |
431 Array<double> dif1 (nt, 1); | 431 Array<double> dif1 (dim_vector (nt, 1)); |
432 double *pdif1 = dif1.fortran_vec (); | 432 double *pdif1 = dif1.fortran_vec (); |
433 | 433 |
434 Array<double> dif2 (nt, 1); | 434 Array<double> dif2 (dim_vector (nt, 1)); |
435 double *pdif2 = dif2.fortran_vec (); | 435 double *pdif2 = dif2.fortran_vec (); |
436 | 436 |
437 Array<double> dif3 (nt, 1); | 437 Array<double> dif3 (dim_vector (nt, 1)); |
438 double *pdif3 = dif3.fortran_vec (); | 438 double *pdif3 = dif3.fortran_vec (); |
439 | 439 |
440 Array<double> vect (nt, 1); | 440 Array<double> vect (dim_vector (nt, 1)); |
441 double *pvect = vect.fortran_vec (); | 441 double *pvect = vect.fortran_vec (); |
442 | 442 |
443 r.resize (nt, 1); | 443 r.resize (nt, 1); |
444 q.resize (nt, 1); | 444 q.resize (nt, 1); |
445 A.resize (nt, nt); | 445 A.resize (nt, nt); |