Mercurial > octave-nkf
diff src/ov-complex.cc @ 3223:3ee04ff37b3e
[project @ 1998-11-20 19:34:15 by jwe]
author | jwe |
---|---|
date | Fri, 20 Nov 1998 19:34:16 +0000 |
parents | 30770ba4457a |
children | d14c483b3c12 |
line wrap: on
line diff
--- a/src/ov-complex.cc Thu Nov 19 22:14:09 1998 +0000 +++ b/src/ov-complex.cc Fri Nov 20 19:34:16 1998 +0000 @@ -35,11 +35,16 @@ #include "oct-obj.h" #include "ops.h" #include "ov-complex.h" +#include "ov-base.h" +#include "ov-base-scalar.h" +#include "ov-base-scalar.cc" #include "ov-cx-mat.h" #include "ov-scalar.h" #include "gripes.h" #include "pr-output.h" +template class octave_base_scalar<Complex>; + DEFINE_OCTAVE_ALLOCATOR (octave_complex); DEFINE_OV_TYPEID_FUNCTIONS_AND_DATA (octave_complex, "complex scalar"); @@ -149,28 +154,6 @@ return ComplexMatrix (1, 1, scalar); } -void -octave_complex::print (ostream& os, bool pr_as_read_syntax) const -{ - print_raw (os, pr_as_read_syntax); - newline (os); -} - -void -octave_complex::print_raw (ostream& os, bool pr_as_read_syntax) const -{ - indent (os); - octave_print_internal (os, scalar, pr_as_read_syntax); -} - -bool -octave_complex::print_name_tag (ostream& os, const string& name) const -{ - indent (os); - os << name << " = "; - return false; -} - /* ;;; Local Variables: *** ;;; mode: C++ ***