Mercurial > hg > octave-nkf

comparison liboctave/CSparse.cc @ 5775:ace8d8d26933

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-04-24 19:13:06 by jwe]
author jwe
date Mon, 24 Apr 2006 19:13:11 +0000
parents 8d7162924bd3
children cbf717bf8150
comparison
equal deleted inserted replaced
5774:e7af222e98b0 5775:ace8d8d26933
7553 } 7553 }
7554 7554
7555 return false; 7555 return false;
7556 } 7556 }
7557 7557
7558 // XXX FIXME XXX Do these really belong here? Maybe they should be 7558 // FIXME Do these really belong here? Maybe they should be
7559 // in a base class? 7559 // in a base class?
7560 7560
7561 SparseBoolMatrix 7561 SparseBoolMatrix
7562 SparseComplexMatrix::all (int dim) const 7562 SparseComplexMatrix::all (int dim) const
7563 { 7563 {
7838 operator * (const SparseComplexMatrix& m, const ComplexMatrix& a) 7838 operator * (const SparseComplexMatrix& m, const ComplexMatrix& a)
7839 { 7839 {
7840 SPARSE_FULL_MUL (ComplexMatrix, Complex, Complex (0.,0.)); 7840 SPARSE_FULL_MUL (ComplexMatrix, Complex, Complex (0.,0.));
7841 } 7841 }
7842 7842
7843 // XXX FIXME XXX -- it would be nice to share code among the min/max 7843 // FIXME -- it would be nice to share code among the min/max
7844 // functions below. 7844 // functions below.
7845 7845
7846 #define EMPTY_RETURN_CHECK(T) \ 7846 #define EMPTY_RETURN_CHECK(T) \
7847 if (nr == 0 || nc == 0) \ 7847 if (nr == 0 || nc == 0) \
7848 return T (nr, nc); 7848 return T (nr, nc);