Go to the source code of this file.
#define DoReallySetProc |
( |
|
what, |
|
|
|
field, |
|
|
|
length, |
|
|
|
ord |
|
) |
| |
Value:_p_procs->what = cast_vptr_to_A<what##_Proc_Ptr>(
\ static void * GetDynamicProc(const char *proc_s, p_Proc proc, p_Field field, p_Length length, p_Ord ord, int get_name=0)
static p_Procs_s * _p_procs
Definition at line 215 of file p_Procs_Dynamic.cc.
#define DoSetProc |
( |
|
what, |
|
|
|
field, |
|
|
|
length, |
|
|
|
ord |
|
) |
| |
Value:do \
_p_procs->what = cast_vptr_to_A<what##_Proc_Ptr>(
\ #define DoReallySetProc(what, field, length, ord)
static void * GetDynamicProc(const char *proc_s, p_Proc proc, p_Field field, p_Length length, p_Ord ord, int get_name=0)
static p_Procs_s * _p_procs
Definition at line 220 of file p_Procs_Dynamic.cc.
#define LINKAGE extern "C" |
#define MAX_PROCNAME_LEN 200 |
#define WARN_MSG "Singular will work properly, but much slower." |
Definition at line 173 of file p_Procs_Dynamic.cc.
180 void* proc_ptr =
NULL;
182 sprintf(proc_name,
"%s__%s_%s_%s", proc_s,
189 if (proc_ptr ==
NULL)
193 if (proc_ptr ==
NULL)
205 #if (!defined(SING_NDEBUG)) && (!defined(OM_NDEBUG)) static const char * p_OrdEnum_2_String(p_Ord ord)
void * dynl_sym(void *handle, const char *symbol)
void * dynl_sym_warn(void *handle, const char *proc, const char *msg)
static void * p_ProcGetHandle(p_Proc proc, p_Field field)
static void * GetGeneralProc(p_Proc proc)
static const char * p_LengthEnum_2_String(p_Length length)
char name(const Variable &v)
static const char * GetGeneralProcName(p_Proc proc)
#define DYNL_KERNEL_HANDLE
void omMarkAsStaticAddr(void *addr)
static const char * p_FieldEnum_2_String(p_Field field)
static void* GetGeneralProc |
( |
p_Proc |
proc | ) |
|
|
static |
Definition at line 87 of file p_Procs_Dynamic.cc.
92 return cast_A_to_vptr(p_Copy__FieldGeneral_LengthGeneral_OrdGeneral);
94 return cast_A_to_vptr(p_Delete__FieldGeneral_LengthGeneral_OrdGeneral);
96 return cast_A_to_vptr(p_ShallowCopyDelete__FieldGeneral_LengthGeneral_OrdGeneral);
98 return cast_A_to_vptr(p_Mult_nn__FieldGeneral_LengthGeneral_OrdGeneral);
100 return cast_A_to_vptr(pp_Mult_nn__FieldGeneral_LengthGeneral_OrdGeneral);
102 return cast_A_to_vptr(pp_Mult_mm__FieldGeneral_LengthGeneral_OrdGeneral);
104 return cast_A_to_vptr(pp_Mult_mm_Noether__FieldGeneral_LengthGeneral_OrdGeneral);
106 return cast_A_to_vptr(p_Mult_mm__FieldGeneral_LengthGeneral_OrdGeneral);
108 return cast_A_to_vptr(p_Add_q__FieldGeneral_LengthGeneral_OrdGeneral);
110 return cast_A_to_vptr(p_Minus_mm_Mult_qq__FieldGeneral_LengthGeneral_OrdGeneral);
112 return cast_A_to_vptr(p_Neg__FieldGeneral_LengthGeneral_OrdGeneral);
114 return cast_A_to_vptr(pp_Mult_Coeff_mm_DivSelect__FieldGeneral_LengthGeneral_OrdGeneral);
116 return cast_A_to_vptr(pp_Mult_Coeff_mm_DivSelectMult__FieldGeneral_LengthGeneral_OrdGeneral);
118 return cast_A_to_vptr(p_Merge_q__FieldGeneral_LengthGeneral_OrdGeneral);
120 return cast_A_to_vptr(p_kBucketSetLm__FieldGeneral_LengthGeneral_OrdGeneral);
void * cast_A_to_vptr(A a)
Definition at line 131 of file p_Procs_Dynamic.cc.
136 return "p_Copy__FieldGeneral_LengthGeneral_OrdGeneral";
138 return "p_Delete__FieldGeneral_LengthGeneral_OrdGeneral";
140 return "p_ShallowCopyDelete__FieldGeneral_LengthGeneral_OrdGeneral";
142 return "p_Mult_nn__FieldGeneral_LengthGeneral_OrdGeneral";
144 return "pp_Mult_nn__FieldGeneral_LengthGeneral_OrdGeneral";
146 return "pp_Mult_mm__FieldGeneral_LengthGeneral_OrdGeneral";
148 return "pp_Mult_mm_Noether__FieldGeneral_LengthGeneral_OrdGeneral";
150 return "p_Mult_mm__FieldGeneral_LengthGeneral_OrdGeneral";
152 return "p_Add_q__FieldGeneral_LengthGeneral_OrdGeneral";
154 return "p_Minus_mm_Mult_qq__FieldGeneral_LengthGeneral_OrdGeneral";
156 return "p_Neg__FieldGeneral_LengthGeneral_OrdGeneral";
158 return "pp_Mult_Coeff_mm_DivSelect__FieldGeneral_LengthGeneral_OrdGeneral";
160 return "pp_Mult_Coeff_mm_DivSelectMult__FieldGeneral_LengthGeneral_OrdGeneral";
162 return "p_Merge_q__FieldGeneral_LengthGeneral_OrdGeneral";
164 return "p_kBucketSetLm__FieldGeneral_LengthGeneral_OrdGeneral";
168 return "p_Unknown_Proc";
Definition at line 67 of file p_Procs_Dynamic.cc.
71 if (strcmp(module,
"FieldIndep") == 0)
73 else if (strcmp(module,
"FieldZp") == 0)
75 else if (strcmp(module,
"FieldQ") == 0)
77 else if (strcmp(module,
"FieldGeneral") == 0)
static void * p_ProcInitHandle(void **handle, const char *module)
static void * p_procs_handle_FieldIndep
static void * p_procs_handle_FieldGeneral
static void * p_procs_handle_FieldZp
static void * p_procs_handle_FieldQ
static const char * p_ProcField_2_Module(p_Proc proc, p_Field field)
static void* p_ProcInitHandle |
( |
void ** |
handle, |
|
|
const char * |
module |
|
) |
| |
|
static |
Definition at line 56 of file p_Procs_Dynamic.cc.
61 sprintf(name,
"p_Procs_%s", module);
void * dynl_open_binary_warn(const char *binary_name, const char *msg)
char name(const Variable &v)
void* p_procs_handle_FieldGeneral = NULL |
|
static |
void* p_procs_handle_FieldIndep = NULL |
|
static |
void* p_procs_handle_FieldQ = NULL |
|
static |
void* p_procs_handle_FieldZp = NULL |
|
static |