4 #include "base/cl_sysdep.h"
7 #include "cln/rational.h"
12 #include "base/cl_N.h"
16 // Cf. cl_RA_p in cl_RA_ring.cc.
17 // But here, for better inlining in g++, it is preferrable to finish every
18 // alternative with either "return true;" or "return false;".
20 inline bool cl_RA_p (const cl_number& x)
23 switch (x.nonpointer_tag()) {
28 if (x.pointer_type()->flags & cl_class_flags_subclass_rational)
33 const cl_RA& cl_RA_As (const cl_number& x, const char * filename, int line)
39 throw as_exception(x,"a rational number",filename,line);