]> www.ginac.de Git - cln.git/blob - src/rational/misc/cl_RA_class.cc
e44387c7f5acab4f195927678e1250c20b392ad2
[cln.git] / src / rational / misc / cl_RA_class.cc
1 // cl_class_ratio.
2
3 // General includes.
4 #include "cl_sysdep.h"
5
6 // Specification.
7 #include "cl_rational.h"
8
9
10 // Implementation.
11
12 #include "cl_RA.h"
13
14 static void ratio_destructor (cl_heap* pointer)
15 {
16         (*(cl_heap_ratio*)pointer).~cl_heap_ratio();
17 }
18
19 cl_class cl_class_ratio = {
20         ratio_destructor,
21         cl_class_flags_subclass_complex | cl_class_flags_subclass_real | cl_class_flags_subclass_rational
22 };