X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fregistrar.cpp;h=ee10f2d20e3df021cdb255516f1d50b04a4214cb;hp=f95b20131989c29e26b02366f1c8d62a67308665;hb=2c8d5b298c5354c32514c4d5e52cfc80e8b32fbd;hpb=956eeb82c513a723e864edefa857133282cf692b diff --git a/ginac/registrar.cpp b/ginac/registrar.cpp index f95b2013..ee10f2d2 100644 --- a/ginac/registrar.cpp +++ b/ginac/registrar.cpp @@ -3,7 +3,7 @@ * GiNaC's class registrar (for class basic and all classes derived from it). */ /* - * GiNaC Copyright (C) 1999-2000 Johannes Gutenberg University Mainz, Germany + * GiNaC Copyright (C) 1999-2015 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 @@ -17,45 +17,15 @@ * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */ -#include -#include - #include "registrar.h" -#ifndef NO_NAMESPACE_GINAC -namespace GiNaC { -#endif // ndef NO_NAMESPACE_GINAC - -registered_class_info *first_registered_class = NULL; - -/** Find registered_class_info strucure by class name. */ -static inline registered_class_info *find_registered_class_info(const string &class_name) -{ - registered_class_info *p = first_registered_class; - while (p) { - if (class_name == p->name) - return p; - p = p->next; - } - throw (std::runtime_error("class '" + class_name + "' not registered")); -} - -unsigned int find_tinfo_key(const string &class_name) -{ - registered_class_info *p = find_registered_class_info(class_name); - return p->tinfo_key; -} - -unarch_func find_unarch_func(const string &class_name) -{ - registered_class_info *p = find_registered_class_info(class_name); - return p->unarchive; -} +#include +#include +#include +namespace GiNaC { -#ifndef NO_NAMESPACE_GINAC } // namespace GiNaC -#endif // ndef NO_NAMESPACE_GINAC