Go to the source code of this file.
|
void | paCleanUp (package pack) |
|
int | iiS2I (const char *s) |
|
void * | idrecDataInit (int t) |
|
idhdl | enterid (const char *s, int lev, int t, idhdl *root, BOOLEAN init, BOOLEAN search) |
|
void | killid (const char *id, idhdl *ih) |
|
void | killhdl (idhdl h, package proot) |
|
void | killhdl2 (idhdl h, idhdl *ih, ring r) |
|
idhdl | ggetid (const char *n, BOOLEAN, idhdl *packhdl) |
|
idhdl | ggetid (const char *n) |
|
void | ipListFlag (idhdl h) |
|
lists | ipNameList (idhdl root) |
|
lists | ipNameListLev (idhdl root, int lev) |
|
static int | ipSwapId (idhdl tomove, idhdl &root1, idhdl &root2) |
|
void | ipMoveId (idhdl tomove) |
|
const char * | piProcinfo (procinfov pi, const char *request) |
|
BOOLEAN | piKill (procinfov pi) |
|
idhdl | packFindHdl (package r) |
|
BOOLEAN | iiAlias (leftv p) |
|
§ enterid()
Definition at line 261 of file ipid.cc.
284 if (strcmp(
s,
"Top")==0)
340 *root = (*root)->
set(
s, lev, t, init);
348 Werror(
"identifier `%s` in use",
s);
const CanonicalForm int s
idhdl get(const char *s, int lev)
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
void killhdl2(idhdl h, idhdl *ih, ring r)
int search(const CFArray &A, const CanonicalForm &F, int i, int j)
search for F in A between index i and j
void Werror(const char *fmt,...)
idhdl set(const char *s, int lev, int t, BOOLEAN init=TRUE)
§ ggetid() [1/2]
Definition at line 498 of file ipid.cc.
507 if (h2==
NULL)
return h;
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
§ ggetid() [2/2]
Definition at line 511 of file ipid.cc.
520 if (h2!=
NULL)
return h2;
521 if (h!=
NULL)
return h;
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
§ idrecDataInit()
void* idrecDataInit |
( |
int |
t | ) |
|
Definition at line 132 of file ipid.cc.
139 return (
void*)n2Init(0,
NULL);
141 return (
void*)p2Init(0,
NULL);
148 return (
void *)
new intvec();
150 return (
void *)
nInit(0);
156 return (
void*)
idInit(1,1);
178 package pa=(package)omAlloc0Bin(sip_package_bin);
206 #ifdef BLACKBOX_DEVEL 207 Print(
"bb-type %d\n",t);
211 return (
void *)bb->blackbox_Init(bb);
214 Werror(
"unknown type in idrecDataInit:%d",t);
CanonicalForm map(const CanonicalForm &primElem, const Variable &alpha, const CanonicalForm &F, const Variable &beta)
map from to such that is mapped onto
static FORCE_INLINE number n_Init(long i, const coeffs r)
a number representing i in the given coeff field/ring r
INLINE_THIS void Init(int l=0)
ideal idInit(int idsize, int rank)
initialise an ideal / module
void Werror(const char *fmt,...)
blackbox * getBlackboxStuff(const int t)
return the structure to the type given by t
§ iiAlias()
Definition at line 751 of file ipid.cc.
824 int eff_typ=h->
Typ();
CanonicalForm map(const CanonicalForm &primElem, const Variable &alpha, const CanonicalForm &F, const Variable &beta)
map from to such that is mapped onto
Class used for (list of) interpreter objects.
#define idDelete(H)
delete an ideal
void WerrorS(const char *s)
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
The main handler for Singular numbers which are suitable for Singular polynomials.
void CleanUp(ring r=currRing)
static FORCE_INLINE void n_Delete(number *p, const coeffs r)
delete 'p'
#define omFreeBin(addr, bin)
BOOLEAN lRingDependend(lists L)
static int ipSwapId(idhdl tomove, idhdl &root1, idhdl &root2)
void nKillChar(coeffs r)
undo all initialisations
void Werror(const char *fmt,...)
BOOLEAN iiAssign(leftv l, leftv r, BOOLEAN toplevel)
§ iiS2I()
int iiS2I |
( |
const char * |
s | ) |
|
Definition at line 72 of file ipid.cc.
const CanonicalForm int s
§ ipListFlag()
void ipListFlag |
( |
idhdl |
h | ) |
|
Definition at line 527 of file ipid.cc.
void PrintS(const char *s)
§ ipMoveId()
void ipMoveId |
( |
idhdl |
tomove | ) |
|
Definition at line 612 of file ipid.cc.
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
BOOLEAN lRingDependend(lists L)
static int ipSwapId(idhdl tomove, idhdl &root1, idhdl &root2)
§ ipNameList()
Definition at line 535 of file ipid.cc.
INLINE_THIS void Init(int l=0)
§ ipNameListLev()
Definition at line 558 of file ipid.cc.
INLINE_THIS void Init(int l=0)
§ ipSwapId()
§ killhdl()
Definition at line 380 of file ipid.cc.
395 while ((s!=h) && (s!=
NULL)) s=s->
next;
401 while ((s!=h) && (s!=
NULL)) s=s->
next;
const CanonicalForm int s
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
void killhdl2(idhdl h, idhdl *ih, ring r)
BOOLEAN lRingDependend(lists L)
§ killhdl2()
Definition at line 411 of file ipid.cc.
431 if (strcmp(
IDID(h),
"Top")==0)
433 WarnS(
"can not kill `Top`");
483 PrintS(
">>?<< not found for kill\n");
void paKill(package pack)
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
void killhdl2(idhdl h, idhdl *ih, ring r)
void s_internalDelete(const int t, void *d, const ring r)
void PrintS(const char *s)
idhdl packFindHdl(package r)
void iiCheckPack(package &p)
#define omFreeBin(addr, bin)
§ killid()
Definition at line 353 of file ipid.cc.
371 Werror(
"`%s` is not defined",
id);
void WerrorS(const char *s)
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
void killhdl2(idhdl h, idhdl *ih, ring r)
void Werror(const char *fmt,...)
§ packFindHdl()
§ paCleanUp()
Definition at line 690 of file ipid.cc.
696 if( pack->language ==
LANG_C)
698 Print(
"//dlclose(%s)\n",pack->libname);
699 #ifdef HAVE_DYNAMIC_LOADING
int dynl_close(void *handle)
§ piKill()
Definition at line 655 of file ipid.cc.
663 if (p->
pi==pi && pi->
ref <= 1)
683 memset((
void *) pi, 0,
sizeof(
procinfo));
#define omFreeBin(addr, bin)
§ piProcinfo()
Definition at line 631 of file ipid.cc.
634 else if (strcmp(request,
"libname") == 0)
return pi->
libname;
635 else if (strcmp(request,
"procname") == 0)
return pi->
procname;
636 else if (strcmp(request,
"type") == 0)
641 case LANG_C:
return "object";
break;
643 default:
return "unknown language";
646 else if (strcmp(request,
"ref") == 0)
649 sprintf(p,
"%d", pi->
ref);
§ basePack
§ basePackHdl
§ coeffs_BIGINT
§ currPack
§ currPackHdl
§ currRingHdl
§ feFilePending
§ idrec_bin
§ iiNoName
const char* iiNoName ="_" |
§ procstack
§ sip_command_bin
§ sip_package_bin