* color.cpp: remove duplicated default args.
[ginac.git] / ginac / structure.cpp
1 /** @file structure.cpp
2  *
3  *  Implementation of 'abstract' class structure. */
4
5 /*
6  *  GiNaC Copyright (C) 1999-2001 Johannes Gutenberg University Mainz, Germany
7  *
8  *  This program is free software; you can redistribute it and/or modify
9  *  it under the terms of the GNU General Public License as published by
10  *  the Free Software Foundation; either version 2 of the License, or
11  *  (at your option) any later version.
12  *
13  *  This program is distributed in the hope that it will be useful,
14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  *  GNU General Public License for more details.
17  *
18  *  You should have received a copy of the GNU General Public License
19  *  along with this program; if not, write to the Free Software
20  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
21  */
22
23 #include <string>
24
25 #include "structure.h"
26 #include "archive.h"
27 #include "debugmsg.h"
28 #include "utils.h"
29 #include "print.h"
30
31 namespace GiNaC {
32
33 GINAC_IMPLEMENT_REGISTERED_CLASS(structure, basic)
34
35 //////////
36 // default ctor, dtor, copy ctor assignment operator and helpers
37 //////////
38
39 DEFAULT_CTORS(structure)
40
41 //////////
42 // archiving
43 //////////
44
45 DEFAULT_ARCHIVING(structure)
46
47 //////////
48 // functions overriding virtual functions from bases classes
49 //////////
50
51 void structure::print(const print_context & c, unsigned level) const
52 {
53         debugmsg("structure print",LOGLEVEL_PRINT);
54
55         if (is_of_type(c, print_tree)) {
56
57                 c.s << std::string(level, ' ') << class_name()
58                     << std::hex << ", hash=0x" << hashvalue << ", flags=0x" << flags << std::dec
59                     << std::endl;
60
61         } else
62                 c.s << class_name() << "()";
63 }
64
65 // protected
66
67 DEFAULT_COMPARE(structure)
68
69 bool structure::is_equal_same_type(const basic & other) const
70 {
71         GINAC_ASSERT(is_of_type(other, structure));
72         return true; // all structures are the same
73 }
74
75 //////////
76 // non-virtual functions in this class
77 //////////
78
79 // protected
80
81 std::vector<registered_structure_info> & structure::registered_structures(void)
82 {
83         static std::vector<registered_structure_info> * rs = new std::vector<registered_structure_info>;
84         return *rs;
85 }
86
87 // public
88
89 unsigned structure::register_new(const char * nm)
90 {
91         registered_structure_info rsi={nm};
92         registered_structures().push_back(rsi);
93         return registered_structures().size()-1;
94 }
95
96 } // namespace GiNaC