X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/8fdca65cf20ae4dba861fa6667d6e233cbb900cf..6b769f3d1f81ffebba557208083a1fc161dfbe23:/src/common/wxexpr.cpp diff --git a/src/common/wxexpr.cpp b/src/common/wxexpr.cpp index f03b2900b7..e7cabf24f0 100644 --- a/src/common/wxexpr.cpp +++ b/src/common/wxexpr.cpp @@ -6,7 +6,7 @@ // Created: 04/01/98 // RCS-ID: $Id$ // Copyright: (c) Julian Smart and Markus Holzem -// Licence: wxWindows license +// Licence: wxWindows license ///////////////////////////////////////////////////////////////////////////// #ifdef __GNUG__ @@ -20,7 +20,12 @@ #pragma hdrstop #endif -#include +#if wxUSE_IOSTREAMH + #include +#else + #include +#endif + #include #include #include @@ -34,11 +39,10 @@ extern "C" void add_expr(char *); extern "C" void LexFromFile(FILE *fd); extern "C" void LexFromString(char *buf); + wxExprDatabase *thewxExprDatabase = NULL; wxExprErrorHandler currentwxExprErrorHandler; -IMPLEMENT_DYNAMIC_CLASS(wxExprDatabase, wxList) - wxExpr::wxExpr(const wxString& functor) { type = wxExprList; @@ -843,7 +847,14 @@ void wxExpr::WriteLispExpr(ostream& stream) } } -// wxExpr 'database' (list of expressions) +/* + * wxExpr 'database' (list of expressions) + */ + +#if !USE_SHARED_LIBRARIES +IMPLEMENT_DYNAMIC_CLASS(wxExprDatabase, wxList) +#endif + wxExprDatabase::wxExprDatabase(wxExprErrorHandler handler) { position = NULL; @@ -1124,14 +1135,14 @@ bool wxExprIsFunctor(wxExpr *expr, const wxString& functor) * */ -char *make_integer(char *str) +char *wxmake_integer(char *str) { wxExpr *x = new wxExpr(atol(str)); return (char *)x; } -char *make_real(char *str1, char *str2) +char *wxmake_real(char *str1, char *str2) { char buf[50]; @@ -1144,7 +1155,7 @@ char *make_real(char *str1, char *str2) // extern "C" double exp10(double); -char *make_exp(char *str1, char *str2) +char *wxmake_exp(char *str1, char *str2) { double mantissa = (double)atoi(str1); double exponent = (double)atoi(str2); @@ -1156,7 +1167,7 @@ char *make_exp(char *str1, char *str2) return (char *)x; } -char *make_exp2(char *str1, char *str2, char *str3) +char *wxmake_exp2(char *str1, char *str2, char *str3) { char buf[50]; @@ -1171,13 +1182,13 @@ char *make_exp2(char *str1, char *str2, char *str3) return (char *)x; } -char *make_word(char *str) +char *wxmake_word(char *str) { wxExpr *x = new wxExpr(wxExprWord, str); return (char *)x; } -char *make_string(char *str) +char *wxmake_string(char *str) { char *s, *t; int len, i;