 |
My Project
UNKNOWN_GIT_VERSION
|
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);
◆ 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);
◆ 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();
◆ iiS2I()
int iiS2I |
( |
const char * |
s | ) |
|
◆ ipListFlag()
void ipListFlag |
( |
idhdl |
h | ) |
|
◆ ipMoveId()
void ipMoveId |
( |
idhdl |
tomove | ) |
|
◆ ipNameList()
◆ 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");
◆ 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
◆ 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
int dynl_close(void *handle)
void iiCheckPack(package &p)
#define idDelete(H)
delete an ideal
CanonicalForm map(const CanonicalForm &primElem, const Variable &alpha, const CanonicalForm &F, const Variable &beta)
map from to such that is mapped onto
int search(const CFArray &A, const CanonicalForm &F, int i, int j)
search for F in A between index i and j
static FORCE_INLINE void n_Delete(number *p, const coeffs r)
delete 'p'
Class used for (list of) interpreter objects.
idhdl packFindHdl(package r)
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
void PrintS(const char *s)
void killhdl2(idhdl h, idhdl *ih, ring r)
sBucket_pt sBucketCreate(const ring r)
BOOLEAN lRingDependend(lists L)
void paKill(package pack)
static FORCE_INLINE number n_Init(long i, const coeffs r)
a number representing i in the given coeff field/ring r
static int ipSwapId(idhdl tomove, idhdl &root1, idhdl &root2)
void Werror(const char *fmt,...)
ideal idInit(int idsize, int rank)
initialise an ideal / module
void WerrorS(const char *s)
void s_internalDelete(const int t, void *d, const ring r)
INLINE_THIS void Init(int l=0)
const CanonicalForm int s
idhdl set(const char *s, int lev, int t, BOOLEAN init=TRUE)
#define omFreeBin(addr, bin)
blackbox * getBlackboxStuff(const int t)
return the structure to the type given by t
BOOLEAN iiAssign(leftv l, leftv r, BOOLEAN toplevel)
void nKillChar(coeffs r)
undo all initialisations