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) |
|
Definition at line 256 of file ipid.cc.
278 && (strcmp(
s,
"Top")==0))
283 Warn(
"redefining %s **",
s);
301 Warn(
"redefining %s **",
s);
320 Warn(
"redefining `%s` **",
s);
329 *root = (*root)->
set(
s, lev, t, init);
337 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)
Definition at line 487 of file ipid.cc.
496 if (h2==
NULL)
return h;
const CanonicalForm CFMap CFMap int &both_non_zero int n
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
Definition at line 500 of file ipid.cc.
509 if (h2!=
NULL)
return h2;
510 if (h!=
NULL)
return h;
const CanonicalForm CFMap CFMap int &both_non_zero int n
ring currRing
Widely used global variable which specifies the current polynomial ring for Singular interpreter and ...
void* idrecDataInit |
( |
int |
t | ) |
|
Definition at line 131 of file ipid.cc.
145 return (
void *)
new intvec();
147 return (
void *)
nInit(0);
153 return (
void*)
idInit(1,1);
175 package pa=(package)omAlloc0Bin(sip_package_bin);
201 #ifdef BLACKBOX_DEVEL
202 Print(
"bb-type %d\n",t);
206 return (
void *)bb->blackbox_Init(bb);
209 Werror(
"unknown type %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
static number2 n2Init(long i, coeffs c)
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
Definition at line 742 of file ipid.cc.
815 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.
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,...)
void idDelete(ideal *h)
delete an ideal
BOOLEAN iiAssign(leftv l, leftv r, BOOLEAN toplevel)
int iiS2I |
( |
const char * |
s | ) |
|
Definition at line 71 of file ipid.cc.
const CanonicalForm int s
void ipListFlag |
( |
idhdl |
h | ) |
|
Definition at line 516 of file ipid.cc.
void PrintS(const char *s)
void ipMoveId |
( |
idhdl |
tomove | ) |
|
Definition at line 601 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)
Definition at line 524 of file ipid.cc.
INLINE_THIS void Init(int l=0)
Definition at line 547 of file ipid.cc.
INLINE_THIS void Init(int l=0)
Definition at line 369 of file ipid.cc.
384 while ((s!=h) && (s!=
NULL)) s=s->
next;
390 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)
Definition at line 400 of file ipid.cc.
420 if (strcmp(
IDID(h),
"Top")==0)
422 WarnS(
"can not kill `Top`");
472 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)
Definition at line 342 of file ipid.cc.
360 Werror(
"`%s` is not defined",
id);
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,...)
Definition at line 679 of file ipid.cc.
685 if( pack->language ==
LANG_C)
687 Print(
"//dlclose(%s)\n",pack->libname);
688 #ifdef HAVE_DYNAMIC_LOADING
int dynl_close(void *handle)
Definition at line 644 of file ipid.cc.
649 if (p->
pi==pi && pi->
ref <= 1)
672 memset((
void *) pi, 0,
sizeof(
procinfo));
#define omFreeBin(addr, bin)
Definition at line 620 of file ipid.cc.
623 else if (strcmp(request,
"libname") == 0)
return pi->
libname;
624 else if (strcmp(request,
"procname") == 0)
return pi->
procname;
625 else if (strcmp(request,
"type") == 0)
630 case LANG_C:
return "object";
break;
632 default:
return "unknow language";
635 else if (strcmp(request,
"ref") == 0)
638 sprintf(p,
"%d", pi->
ref);
const char* iiNoName ="_" |