1 // Simple vectors of numbers.
3 #ifndef _CL_SV_NUMBER_H
4 #define _CL_SV_NUMBER_H
6 #include "cln/number.h"
12 typedef cl_heap_SV<cl_number> cl_heap_SV_number;
14 struct cl_SV_number : public cl_SV<cl_number,cl_SV_any> {
18 cl_SV_number (const cl_SV_number&);
19 explicit cl_SV_number (std::size_t len);
20 // Assignment operators.
21 cl_SV_number& operator= (const cl_SV_number&);
22 // Private pointer manipulations.
23 operator cl_heap_SV_number* () const;
24 cl_SV_number (cl_heap_SV_number* p) : cl_SV<cl_number,cl_SV_any> (p) {}
25 cl_SV_number (cl_private_thing p) : cl_SV<cl_number,cl_SV_any> (p) {}
27 inline cl_SV_number::cl_SV_number (const cl_SV_number& x) : cl_SV<cl_number,cl_SV_any> (as_cl_private_thing(x)) {}
28 CL_DEFINE_ASSIGNMENT_OPERATOR(cl_SV_number,cl_SV_number)
29 // Returns a new simple vector with uninitialized contents.
30 extern cl_heap_SV_number* cl_make_heap_SV_number_uninit (std::size_t len);
31 // Returns a new simple vector with all elements initialized to 0.
32 extern cl_heap_SV_number* cl_make_heap_SV_number (std::size_t len);
33 inline cl_SV_number::cl_SV_number (std::size_t len)
34 : cl_SV<cl_number,cl_SV_any> (cl_make_heap_SV_number(len)) {}
36 // Private pointer manipulations. Never throw away a `struct cl_heap_SV_number *'!
37 inline cl_SV_number::operator cl_heap_SV_number* () const
39 cl_heap_SV_number* hpointer = (cl_heap_SV_number*)pointer;
40 cl_inc_refcount(*this);
43 extern const cl_SV_number cl_null_SV_number;
44 inline cl_SV_number::cl_SV_number ()
45 : cl_SV<cl_number,cl_SV_any> ((cl_heap_SV_number*) cl_null_SV_number) {}
46 class cl_SV_number_init_helper
50 cl_SV_number_init_helper();
51 ~cl_SV_number_init_helper();
53 static cl_SV_number_init_helper cl_SV_number_init_helper_instance;
55 // Copy a simple vector.
56 inline const cl_SV_number copy (const cl_SV_number& vector)
57 { return The(cl_SV_number) (copy((const cl_SV_any&) vector)); }
61 extern int cl_SV_number_debug_module;
62 CL_FORCE_LINK(cl_SV_number_debug_dummy, cl_SV_number_debug_module)
67 #endif /* _CL_SV_NUMBER_H */