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) |
|
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 267 of file ipid.cc.
282 if ((
h=(*root)->get(
s,lev))!=
NULL)
290 if (strcmp(
s,
"Top")==0)
346 *root = (*root)->
set(
s, lev, t, init);
354 Werror(
"identifier `%s` in use",
s);
idhdl set(const char *s, int lev, int t, BOOLEAN init=TRUE)
const CanonicalForm int s
int search(const CFArray &A, const CanonicalForm &F, int i, int j)
search for F in A between index i and j
void killhdl2(idhdl h, idhdl *ih, ring r)
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
void Werror(const char *fmt,...)
◆ ggetid()
◆ idrecDataInit()
void* idrecDataInit |
( |
int |
t | ) |
|
Definition at line 127 of file ipid.cc.
134 return (
void*)n2Init(0,
NULL);
136 return (
void*)p2Init(0,
NULL);
146 WerrorS(
"need basering for polyBucket");
151 return (
void *)
new intvec();
163 return (
void*)
idInit(1,1);
185 package pa=(package)omAlloc0Bin(sip_package_bin);
211 #ifdef BLACKBOX_DEVEL
212 Print(
"bb-type %d\n",t);
216 return (
void *)bb->blackbox_Init(bb);
219 Werror(
"unknown type in idrecDataInit:%d",t);
blackbox * getBlackboxStuff(const int t)
return the structure to the type given by 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
void WerrorS(const char *s)
sBucket_pt sBucketCreate(const ring r)
ideal idInit(int idsize, int rank)
initialise an ideal / module
◆ iiAlias()
Definition at line 765 of file ipid.cc.
783 if ((
h->Typ()!=
p->Typ()) &&(
p->Typ()!=
DEF_CMD))
831 Werror(
"unknown type %d",
p->Typ());
836 int eff_typ=
h->Typ();
Class used for (list of) interpreter objects.
static FORCE_INLINE void n_Delete(number *p, const coeffs r)
delete 'p'
void nKillChar(coeffs r)
undo all initialisations
#define idDelete(H)
delete an ideal
BOOLEAN iiAssign(leftv l, leftv r, BOOLEAN toplevel)
static int ipSwapId(idhdl tomove, idhdl &root1, idhdl &root2)
BOOLEAN lRingDependend(lists L)
The main handler for Singular numbers which are suitable for Singular polynomials.
#define omFreeBin(addr, bin)
◆ iiS2I()
int iiS2I |
( |
const char * |
s | ) |
|
◆ ipListFlag()
void ipListFlag |
( |
idhdl |
h | ) |
|
Definition at line 538 of file ipid.cc.
void PrintS(const char *s)
◆ ipMoveId()
void ipMoveId |
( |
idhdl |
tomove | ) |
|
◆ ipNameList()
Definition at line 546 of file ipid.cc.
INLINE_THIS void Init(int l=0)
◆ ipNameListLev()
◆ ipSwapId()
◆ killhdl()
◆ killhdl2()
Definition at line 417 of file ipid.cc.
430 if (
h->attribute!=
NULL)
435 h->attribute->killAll(r);
441 || (strcmp(
IDID(
h),
"Top")==0))
493 PrintS(
">>?<< not found for kill\n");
idhdl packFindHdl(package r)
void paKill(package pack)
void iiCheckPack(package &p)
void s_internalDelete(const int t, void *d, const ring r)
◆ killid()
◆ packFindHdl()
◆ paCleanUp()
Definition at line 704 of file ipid.cc.
710 if( pack->language ==
LANG_C)
712 Print(
"//dlclose(%s)\n",pack->libname);
713 #ifdef HAVE_DYNAMIC_LOADING
int dynl_close(void *handle)
◆ piKill()
Definition at line 666 of file ipid.cc.
676 if (
p->pi==
pi &&
pi->ref <= 1)
678 Warn(
"`%s` in use, can not be killed",
pi->procname);
691 if (
pi->data.s.body !=
NULL)
◆ piProcinfo()
Definition at line 642 of file ipid.cc.
645 else if (strcmp(request,
"libname") == 0)
return pi->libname;
646 else if (strcmp(request,
"procname") == 0)
return pi->procname;
647 else if (strcmp(request,
"type") == 0)
649 switch (
pi->language)
652 case LANG_C:
return "object";
break;
654 default:
return "unknown language";
657 else if (strcmp(request,
"ref") == 0)
660 sprintf(
p,
"%d",
pi->ref);
◆ basePack
◆ basePackHdl
◆ coeffs_BIGINT
◆ currPack
◆ currPackHdl
◆ currRingHdl
◆ idrec_bin
◆ procstack
◆ sip_command_bin
◆ sip_package_bin