X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fstructure.cpp;h=2dc8849688389eeb4f719d8d767119b85e67b37b;hp=d2f6a9b8ddbe22380b6a07a407cc68b4bddda94e;hb=c8feefe95a6c219195aea22050f17e2294656f32;hpb=dbd9c306a74f1cb258c0d15a346b973b39deaad2 diff --git a/ginac/structure.cpp b/ginac/structure.cpp index d2f6a9b8..2dc88496 100644 --- a/ginac/structure.cpp +++ b/ginac/structure.cpp @@ -1,6 +1,6 @@ /** @file structure.cpp * - * Implementation of 'abstract' class structure. */ + * Wrapper template for making GiNaC classes out of C++ structures. */ /* * GiNaC Copyright (C) 1999-2003 Johannes Gutenberg University Mainz, Germany @@ -20,75 +20,11 @@ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ -#include -#include - #include "structure.h" -#include "archive.h" -#include "utils.h" -#include "print.h" namespace GiNaC { -GINAC_IMPLEMENT_REGISTERED_CLASS(structure, basic) - -////////// -// default ctor, dtor, copy ctor, assignment operator and helpers -////////// - -DEFAULT_CTORS(structure) - -////////// -// archiving -////////// - -DEFAULT_ARCHIVING(structure) - -////////// -// functions overriding virtual functions from base classes -////////// - -void structure::print(const print_context & c, unsigned level) const -{ - if (is_a(c)) { - - c.s << std::string(level, ' ') << class_name() - << std::hex << ", hash=0x" << hashvalue << ", flags=0x" << flags << std::dec - << std::endl; - - } else - c.s << class_name() << "()"; -} - -// protected - -DEFAULT_COMPARE(structure) - -bool structure::is_equal_same_type(const basic & other) const -{ - GINAC_ASSERT(is_a(other)); - return true; // all structures are the same -} - -////////// -// non-virtual functions in this class -////////// - -// protected - -std::vector & structure::registered_structures(void) -{ - static std::vector * rs = new std::vector; - return *rs; -} - -// public - -unsigned structure::register_new(const char * nm) -{ - registered_structure_info rsi={nm}; - registered_structures().push_back(rsi); - return registered_structures().size()-1; -} +/** Next free tinfo_key for structure types. */ +unsigned next_structure_tinfo_key = TINFO_structure; } // namespace GiNaC