X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fbasic.h;h=d7fef59385856882a370e4f8383e67700a784e63;hp=b319e0d5455c12f3092438ed676b5fe0cbeb5361;hb=bd05a471b5e57cdb65458b8d0af54f1743831103;hpb=ed58700a9b0dd302f28203c6ac7eee95e8d34d8a diff --git a/ginac/basic.h b/ginac/basic.h index b319e0d5..d7fef593 100644 --- a/ginac/basic.h +++ b/ginac/basic.h @@ -3,7 +3,7 @@ * Interface to GiNaC's ABC. */ /* - * GiNaC Copyright (C) 1999-2001 Johannes Gutenberg University Mainz, Germany + * GiNaC Copyright (C) 1999-2002 Johannes Gutenberg University Mainz, Germany * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -23,9 +23,7 @@ #ifndef __GINAC_BASIC_H__ #define __GINAC_BASIC_H__ -#include #include - // CINT needs to work properly with #include @@ -33,7 +31,6 @@ #include "tinfos.h" #include "assertion.h" #include "registrar.h" -/*#include "debugmsg.h"*/ namespace GiNaC { @@ -64,16 +61,12 @@ class basic friend class ex; - // default ctor, dtor, copy ctor assignment operator and helpers + // default ctor, dtor, copy ctor, assignment operator and helpers public: - basic() : tinfo_key(TINFO_basic), flags(0), refcount(0) - { - /* debugmsg("basic default ctor", LOGLEVEL_CONSTRUCT); */ - } + basic() : tinfo_key(TINFO_basic), flags(0), refcount(0) {} /** basic dtor, virtual because class ex will delete objects via ptr. */ virtual ~basic() { - /* debugmsg("basic dtor", LOGLEVEL_DESTRUCT); */ destroy(false); GINAC_ASSERT((!(flags & status_flags::dynallocated))||(refcount==0)); } @@ -92,10 +85,7 @@ protected: // other ctors /** ctor with specified tinfo_key */ - basic(unsigned ti) : tinfo_key(ti), flags(0), refcount(0) - { - /* debugmsg("basic ctor with tinfo_key", LOGLEVEL_CONSTRUCT); */ - } + basic(unsigned ti) : tinfo_key(ti), flags(0), refcount(0) {} // new virtual functions which can be overridden by derived classes public: // only const functions please (may break reference counting) @@ -179,7 +169,7 @@ extern int max_recursion_level; /** Check if obj is a T, including base classes. */ template -inline bool is_a(const basic & obj) +inline bool is_a(const basic &obj) { return dynamic_cast(&obj)!=0; } @@ -188,28 +178,29 @@ inline bool is_a(const basic & obj) * inefficient default. It should in all time-critical cases be overridden * by template specializations that don't create a temporary. */ template -inline bool is_exactly_a(const class basic & obj) +inline bool is_exactly_a(const class basic &obj) { const T foo; return foo.tinfo()==obj.tinfo(); } /** Check if ex is a handle to a T, including base classes. */ template -inline bool is_a(const ex & obj) +inline bool is_a(const ex &obj) { return is_a(*obj.bp); } /** Check if ex is a handle to a T, not including base classes. */ template -inline bool is_exactly_a(const ex & obj) +inline bool is_exactly_a(const ex &obj) { return is_exactly_a(*obj.bp); } /** Return a reference to the basic-derived class T object embedded in an * expression. This is fast but unsafe: the result is undefined if the - * expression does not contain a T object at its top level. + * expression does not contain a T object at its top level. Hence, you + * should generally check the type of e first. * * @param e expression * @return reference to pseries object