source: git/kernel/p_Procs_Static.cc @ bc669c

fieker-DuValspielwiese
Last change on this file since bc669c was 341696, checked in by Hans Schönemann <hannes@…>, 15 years ago
Adding Id property to all files git-svn-id: file:///usr/local/Singular/svn/trunk@12231 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 1.9 KB
Line 
1/****************************************
2*  Computer Algebra System SINGULAR     *
3****************************************/
4/***************************************************************
5 *  File:    p_Procs_Static.cc
6 *  Purpose: source for static version of p_Procs
7 *  Author:  obachman (Olaf Bachmann)
8 *  Created: 12/00
9 *  Version: $Id$
10 *******************************************************************/
11#include "mod2.h"
12#include "structs.h"
13#include "p_polys.h"
14#include "ring.h"
15#include "p_Procs.h"
16#include "p_Numbers.h"
17#include "p_MemCmp.h"
18#include "p_MemAdd.h"
19#include "p_MemCopy.h"
20#include "kbuckets.h"
21#include "dError.h"
22
23BOOLEAN p_procs_dynamic = FALSE;
24
25#define p_Procs_Static
26#include "p_Procs_Static.inc"
27
28// include generated configuration
29#include "p_Procs_Static.h"
30// include general p_Proc stuff
31#include "p_Procs_Impl.h"
32
33// define DoSetProc and InitSetProcs
34#define SetStaticProcFromArray(what, type, field, length, ord) \
35  _p_procs->what = (what##_Proc_Ptr) \
36    what##_Proc_##type [index(what##_Proc, field, length, ord)]
37
38#define SetStaticProcFromFuncsArray(what, field, length, ord) \
39  SetStaticProcFromArray(what, funcs, field, length, ord)
40
41#ifdef RDEBUG
42#define DoSetProc(what, field, length, ord)                     \
43do                                                              \
44{                                                               \
45  if (set_names)                                                \
46    SetStaticProcFromArray(what, names, field, length, ord);    \
47  else                                                          \
48    SetStaticProcFromFuncsArray(what, field, length, ord);      \
49}                                                               \
50while(0)
51#else
52#define DoSetProc SetStaticProcFromFuncsArray
53#endif
54
55#define InitSetProcs(f, l, o) ((void)0)
56
57// include routines for setting p_ProcsSet
58
59#include "p_Procs_Set.h"
60
61
62
63
Note: See TracBrowser for help on using the repository browser.