Mercurial > octave-libgccjit
diff src/OPERATORS/op-sm-scm.cc @ 9931:fb6b6fcafa62
untabify files in src/OPERATORS directory
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Mon, 07 Dec 2009 14:49:48 -0500 |
parents | a1dbe9d80eee |
children | ac4b97c6bf8b |
line wrap: on
line diff
--- a/src/OPERATORS/op-sm-scm.cc Mon Dec 07 13:17:13 2009 -0500 +++ b/src/OPERATORS/op-sm-scm.cc Mon Dec 07 14:49:48 2009 -0500 @@ -1,6 +1,6 @@ /* -Copyright (C) 2004, 2005, 2006, 2007 David Bateman +Copyright (C) 2004, 2005, 2006, 2007, 2009 David Bateman Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004 Andy Adler This file is part of Octave. @@ -54,7 +54,7 @@ Complex d = v2.complex_value (); if (d == 0.0) - gripe_divide_by_zero (); + gripe_divide_by_zero (); return octave_value (v1.sparse_matrix_value () / d); } @@ -62,7 +62,7 @@ { MatrixType typ = v2.matrix_type (); SparseComplexMatrix ret = xdiv (v1.sparse_matrix_value (), - v2.sparse_complex_matrix_value (), typ); + v2.sparse_complex_matrix_value (), typ); v2.matrix_type (typ); return ret; @@ -84,7 +84,7 @@ double d = v1.scalar_value (); if (d == 0.0) - gripe_divide_by_zero (); + gripe_divide_by_zero (); return octave_value (v2.sparse_complex_matrix_value () / d); } @@ -93,8 +93,8 @@ MatrixType typ = v1.matrix_type (); SparseComplexMatrix ret = - xleftdiv (v1.sparse_matrix_value (), - v2.sparse_complex_matrix_value (), typ); + xleftdiv (v1.sparse_matrix_value (), + v2.sparse_complex_matrix_value (), typ); v1.matrix_type (typ); return ret; @@ -115,7 +115,7 @@ DEFBINOP (el_ldiv, sparse_matrix, sparse_complex_matrix) { CAST_BINOP_ARGS (const octave_sparse_matrix&, - const octave_sparse_complex_matrix&); + const octave_sparse_complex_matrix&); return octave_value (quotient (v2.sparse_complex_matrix_value (), v1.sparse_matrix_value ())); @@ -136,49 +136,49 @@ install_sm_scm_ops (void) { INSTALL_BINOP (op_add, octave_sparse_matrix, octave_sparse_complex_matrix, - add); + add); INSTALL_BINOP (op_sub, octave_sparse_matrix, octave_sparse_complex_matrix, - sub); + sub); INSTALL_BINOP (op_mul, octave_sparse_matrix, octave_sparse_complex_matrix, - mul); + mul); INSTALL_BINOP (op_div, octave_sparse_matrix, octave_sparse_complex_matrix, - div); + div); INSTALL_BINOP (op_pow, octave_sparse_matrix, octave_sparse_complex_matrix, - pow); + pow); INSTALL_BINOP (op_ldiv, octave_sparse_matrix, octave_sparse_complex_matrix, - ldiv); + ldiv); INSTALL_BINOP (op_lt, octave_sparse_matrix, octave_sparse_complex_matrix, - lt); + lt); INSTALL_BINOP (op_le, octave_sparse_matrix, octave_sparse_complex_matrix, - le); + le); INSTALL_BINOP (op_eq, octave_sparse_matrix, octave_sparse_complex_matrix, - eq); + eq); INSTALL_BINOP (op_ge, octave_sparse_matrix, octave_sparse_complex_matrix, - ge); + ge); INSTALL_BINOP (op_gt, octave_sparse_matrix, octave_sparse_complex_matrix, - gt); + gt); INSTALL_BINOP (op_ne, octave_sparse_matrix, octave_sparse_complex_matrix, - ne); + ne); INSTALL_BINOP (op_el_mul, octave_sparse_matrix, - octave_sparse_complex_matrix, el_mul); + octave_sparse_complex_matrix, el_mul); INSTALL_BINOP (op_el_div, octave_sparse_matrix, - octave_sparse_complex_matrix, el_div); + octave_sparse_complex_matrix, el_div); INSTALL_BINOP (op_el_pow, octave_sparse_matrix, - octave_sparse_complex_matrix, el_pow); + octave_sparse_complex_matrix, el_pow); INSTALL_BINOP (op_el_ldiv, octave_sparse_matrix, - octave_sparse_complex_matrix, el_ldiv); + octave_sparse_complex_matrix, el_ldiv); INSTALL_BINOP (op_el_and, octave_sparse_matrix, - octave_sparse_complex_matrix, el_and); + octave_sparse_complex_matrix, el_and); INSTALL_BINOP (op_el_or, octave_sparse_matrix, - octave_sparse_complex_matrix, el_or); + octave_sparse_complex_matrix, el_or); INSTALL_CATOP (octave_sparse_matrix, octave_sparse_complex_matrix, sm_scm); INSTALL_ASSIGNCONV (octave_sparse_matrix, octave_sparse_complex_matrix, - octave_sparse_complex_matrix); + octave_sparse_complex_matrix); INSTALL_WIDENOP (octave_sparse_matrix, octave_sparse_complex_matrix, - sparse_complex_matrix_conv); + sparse_complex_matrix_conv); } /*