7 #include "cl_complex.h"
14 // Cf. cl_N_p in cl_C_ring.cc.
15 // But here, for better inlining in g++, it is preferrable to finish every
16 // alternative with either "return cl_true;" or "return cl_false;".
18 inline cl_boolean cl_N_p (const cl_number& x)
21 switch (x.nonpointer_tag()) {
24 #if defined(CL_WIDE_POINTERS)
30 if (x.pointer_type()->flags & cl_class_flags_subclass_complex)
35 const cl_N& as_cl_N (const cl_number& x, const char * filename, int line)
41 cl_as_error(x,"a number",filename,line);