}
int unarchive_table_t::usecount = 0;
-unarchive_map_t* unarchive_table_t::unarch_map = 0;
+unarchive_map_t* unarchive_table_t::unarch_map = nullptr;
unarchive_table_t::unarchive_table_t()
{
nparams = 0;
eval_f = evalf_f = real_part_f = imag_part_f = conjugate_f = expand_f
= derivative_f = expl_derivative_f = power_f = series_f = nullptr;
- info_f = 0;
+ info_f = nullptr;
evalf_params_first = true;
use_return_type = false;
eval_use_exvector_args = false;
}
}
- if (opt.evalf_f==0) {
+ if (opt.evalf_f==nullptr) {
return function(serial,eseq).hold();
}
current_serial = serial;
GINAC_ASSERT(serial<registered_functions().size());
const function_options &opt = registered_functions()[serial];
- if (opt.series_f==0) {
+ if (opt.series_f==nullptr) {
return basic::series(r, order);
}
ex res;
GINAC_ASSERT(serial<registered_functions().size());
const function_options & opt = registered_functions()[serial];
- if (opt.conjugate_f==0) {
+ if (opt.conjugate_f==nullptr) {
return conjugate_function(*this).hold();
}
GINAC_ASSERT(serial<registered_functions().size());
const function_options & opt = registered_functions()[serial];
- if (opt.real_part_f==0)
+ if (opt.real_part_f==nullptr)
return basic::real_part();
if (opt.real_part_use_exvector_args)
GINAC_ASSERT(serial<registered_functions().size());
const function_options & opt = registered_functions()[serial];
- if (opt.imag_part_f==0)
+ if (opt.imag_part_f==nullptr)
return basic::imag_part();
if (opt.imag_part_use_exvector_args)
GINAC_ASSERT(serial<registered_functions().size());
const function_options & opt = registered_functions()[serial];
- if (opt.info_f==0) {
+ if (opt.info_f==nullptr) {
return basic::info(inf);
}
std::vector<cln::cl_N> *current_vector;
};
-std::vector<cln::cl_N>* lanczos_coeffs::coeffs = 0;
+std::vector<cln::cl_N>* lanczos_coeffs::coeffs = nullptr;
bool lanczos_coeffs::sufficiently_accurate(int digits)
{ if (digits<=20) {
print_context *p = static_cast<print_context *>(s.pword(i));
if (ev == std::ios_base::erase_event) {
delete p;
- s.pword(i) = 0;
- } else if (ev == std::ios_base::copyfmt_event && p != 0)
+ s.pword(i) = nullptr;
+ } else if (ev == std::ios_base::copyfmt_event && p != nullptr)
s.pword(i) = p->duplicate();
}
relational::safe_bool relational::make_safe_bool(bool cond) const
{
- return cond? &safe_bool_helper::nonnull : 0;
+ return cond? &safe_bool_helper::nonnull : nullptr;
}
/** Cast the relational into a Boolean, mainly for evaluation within an
*/
static int line_length = 0;
-static char *line_read = NULL;
+static char *line_read = nullptr;
static char *line_ptr;
// Input function that uses libreadline for interactive input
// List of input files to be processed
int num_files = 0;
-char **file_list = NULL;
+char **file_list = nullptr;
// EOF encountered, connect to next file. If this was the last file,
// connect to stdin. If this was stdin, terminate the scanner.
fclose(yyin);
if (num_files) {
yyin = fopen(*file_list, "r");
- if (yyin == NULL) {
+ if (yyin == nullptr) {
cerr << "Can't open " << *file_list << endl;
return 1;
}
typedef ex (*fcnp2)(const exprseq &e, int serial);
struct fcn_desc {
- fcn_desc() : p(NULL), num_params(0), is_ginac(false), serial(0) {}
+ fcn_desc() : p(nullptr), num_params(0), is_ginac(false), serial(0) {}
fcn_desc(fcnp func, int num) : p(func), num_params(num), is_ginac(false), serial(0) {}
fcn_desc(fcnp2 func, int num, int ser) : p((fcnp)func), num_params(num), is_ginac(true), serial(ser) {}
{"transpose", f_transpose, 1},
{"unassign", f_unassign, 1},
{"unit", f_unit, 2},
- {NULL, f_dummy, 0} // End marker
+ {nullptr, f_dummy, 0} // End marker
};
struct fcn_help_init {
{"H", "harmonic polylogarithm"},
{"Order", "order term function (for truncated power series)"},
{"Derivative", "inert differential operator"},
- {NULL, NULL} // End marker
+ {nullptr, nullptr} // End marker
};
#include "ginsh_extensions.h"
if (strncmp(fcn_name, text, len) == 0)
return strdup(fcn_name);
}
- return NULL;
+ return nullptr;
}
#ifdef HAVE_LIBREADLINE
file_list = argv + 1;
if (num_files) {
yyin = fopen(*file_list, "r");
- if (yyin == NULL) {
+ if (yyin == nullptr) {
cerr << "Can't open " << *file_list << endl;
exit(1);
}