Changeset fe72e1 in git
- Timestamp:
- Aug 14, 2011, 6:25:19 PM (12 years ago)
- Branches:
- (u'spielwiese', '828514cf6e480e4bafc26df99217bf2a1ed1ef45')
- Children:
- 5938a0cae7da34f17a09979e3cb7b08d08028cd9
- Parents:
- 8d033e23e4d262eb3fb96d000b1f8b2253f44bd1
- git-author:
- Oleksandr Motsak <motsak@mathematik.uni-kl.de>2011-08-14 18:25:19+02:00
- git-committer:
- Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 16:12:20+01:00
- Location:
- Singular
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/iplib.cc
r8d033e2 rfe72e1 948 948 } 949 949 950 #if 0 951 // TODO!? 952 procinfo *iiInitSingularProcinfo(procinfo* pi, const char *libname, 953 const char *procname, int line, long pos, 954 BOOLEAN pstatic /*= FALSE*/) 955 { 956 pi->libname = (char *)malloc(strlen(libname)+1); 957 memcpy(pi->libname, libname, strlen(libname)); 958 *(pi->libname+strlen(libname)) = '\0'; 959 960 pi->procname = (char *)malloc(strlen(procname)+1); 961 strcpy(pi->procname, procname/*, strlen(procname)*/); 962 pi->language = LANG_SINGULAR; 963 pi->ref = 1; 964 pi->is_static = pstatic; 965 pi->data.s.proc_start = pos; 966 pi->data.s.def_end = 0L; 967 pi->data.s.help_start = 0L; 968 pi->data.s.body_start = 0L; 969 pi->data.s.body_end = 0L; 970 pi->data.s.example_start = 0L; 971 pi->data.s.proc_lineno = line; 972 pi->data.s.body_lineno = 0; 973 pi->data.s.example_lineno = 0; 974 pi->data.s.body = NULL; 975 pi->data.s.help_chksum = 0; 976 return(pi); 977 } 978 #endif 979 950 980 /*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*/ 951 981 int iiAddCproc(char *libname, char *procname, BOOLEAN pstatic, -
Singular/utils.cc
r8d033e2 rfe72e1 113 113 } 114 114 /*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*/ 115 116 procinfo *iiInitSingularProcinfo(procinfo* pi, const char *libname,117 const char *procname, int line, long pos,118 BOOLEAN pstatic /*= FALSE*/)119 {120 pi->libname = (char *)malloc(strlen(libname)+1);121 memcpy(pi->libname, libname, strlen(libname));122 *(pi->libname+strlen(libname)) = '\0';123 124 pi->procname = (char *)malloc(strlen(procname)+1);125 strcpy(pi->procname, procname/*, strlen(procname)*/);126 pi->language = LANG_SINGULAR;127 pi->ref = 1;128 pi->is_static = pstatic;129 pi->data.s.proc_start = pos;130 pi->data.s.def_end = 0L;131 pi->data.s.help_start = 0L;132 pi->data.s.body_start = 0L;133 pi->data.s.body_end = 0L;134 pi->data.s.example_start = 0L;135 pi->data.s.proc_lineno = line;136 pi->data.s.body_lineno = 0;137 pi->data.s.example_lineno = 0;138 pi->data.s.body = NULL;139 pi->data.s.help_chksum = 0;140 return(pi);141 }142 115 143 116 /*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*/
Note: See TracChangeset
for help on using the changeset viewer.