Mercurial > hg > octave-nkf

comparison liboctave/Array.cc @ 8379:ad8ed668e0a4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
allow initialized local buffers
author Jaroslav Hajek <highegg@gmail.com>
date Sat, 06 Dec 2008 09:15:44 +0100
parents 25bc2d31e1bf
children 49901b624316
comparison
equal deleted inserted replaced
8378:7d0492aa522d 8379:ad8ed668e0a4
1913 v += ns; 1913 v += ns;
1914 } 1914 }
1915 } 1915 }
1916 else 1916 else
1917 { 1917 {
1918 // Don't use OCTAVE_LOCAL_BUFFER here as it doesn't work with bool 1918 OCTAVE_LOCAL_BUFFER (T, pvi, ns);
1919 // on some compilers.
1920 Array<T> vi (ns);
1921 T *pvi = vi.fortran_vec ();
1922 1919
1923 for (octave_idx_type j = 0; j < iter; j++) 1920 for (octave_idx_type j = 0; j < iter; j++)
1924 { 1921 {
1925 octave_idx_type offset = j; 1922 octave_idx_type offset = j;
1926 octave_idx_type offset2 = 0; 1923 octave_idx_type offset2 = 0;