X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fsymbol.cpp;h=1bea2cec954698bc3751b8bbdd51efaee2ac8665;hp=839a105a383c515fa9f8ff7ded9dbb3c7e1317fd;hb=afdd7fa8c6c0a587f7c80789198551383e8beb7b;hpb=66c0f31c678e6c1938d637636b230ea376c157c1 diff --git a/ginac/symbol.cpp b/ginac/symbol.cpp index 839a105a..1bea2cec 100644 --- a/ginac/symbol.cpp +++ b/ginac/symbol.cpp @@ -1,7 +1,8 @@ /** @file symbol.cpp * - * Implementation of GiNaC's symbolic objects. - * + * Implementation of GiNaC's symbolic objects. */ + +/* * GiNaC Copyright (C) 1999 Johannes Gutenberg University Mainz, Germany * * This program is free software; you can redistribute it and/or modify @@ -25,6 +26,12 @@ #include "symbol.h" #include "lst.h" #include "utils.h" +#include "idx.h" +#include "debugmsg.h" + +#ifndef NO_GINAC_NAMESPACE +namespace GiNaC { +#endif // ndef NO_GINAC_NAMESPACE ////////// // default constructor, destructor, copy constructor assignment operator and helpers @@ -163,13 +170,13 @@ ex symbol::eval(int level) const ex symbol::subs(lst const & ls, lst const & lr) const { - ASSERT(ls.nops()==lr.nops()); -#ifdef DOASSERT + GINAC_ASSERT(ls.nops()==lr.nops()); +#ifdef DO_GINAC_ASSERT for (int i=0; i(&other); if (serial==o->serial) return 0; return serial < o->serial ? -1 : 1; @@ -191,7 +198,7 @@ int symbol::compare_same_type(basic const & other) const bool symbol::is_equal_same_type(basic const & other) const { - ASSERT(is_of_type(other,symbol)); + GINAC_ASSERT(is_of_type(other,symbol)); const symbol *o = static_cast(&other); return serial==o->serial; } @@ -275,3 +282,7 @@ type_info const & typeid_symbol=typeid(some_symbol); symbol::assigned_ex_info::assigned_ex_info(void) : is_assigned(0), refcount(1) { } + +#ifndef NO_GINAC_NAMESPACE +} // namespace GiNaC +#endif // ndef NO_GINAC_NAMESPACE