4 #include "base/cl_sysdep.h"
7 #include "cln/complex.h"
12 #include "base/cl_N.h"
13 #include "cln/exception.h"
17 // Cf. cl_N_p in cl_C_ring.cc.
18 // But here, for better inlining in g++, it is preferrable to finish every
19 // alternative with either "return true;" or "return false;".
21 inline bool cl_N_p (const cl_number& x)
24 switch (x.nonpointer_tag()) {
27 #if defined(CL_WIDE_POINTERS)
33 if (x.pointer_type()->flags & cl_class_flags_subclass_complex)
38 const cl_N& cl_N_As (const cl_number& x, const char * filename, int line)
44 throw as_exception(x,"a number",filename,line);