Changeset 36d920 in git
- Timestamp:
- Apr 5, 2013, 11:47:27 AM (10 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'ad2543eab51733612ba7d118afc77edca719600e')
- Children:
- 380d25b177e88fcb4bfa2f03b368d2b6996b789f
- Parents:
- 48e8e1c8b5ddc51c12302028a5280f3f3b8d0c03
- Location:
- Singular
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/ipid.h
r48e8e1 r36d920 84 84 typedef int (*SModulFunc_t)(SModulFunctions*); 85 85 BOOLEAN load_builtin(char *newlib, BOOLEAN autoexport, SModulFunc_t init); 86 void module_help_main(c har *newlib,const char *help);87 void module_help_proc(c har *newlib,const char *p, const char *help);86 void module_help_main(const char *newlib,const char *help); 87 void module_help_proc(const char *newlib,const char *p, const char *help); 88 88 89 89 /* ================================================================== */ -
Singular/iplib.cc
r48e8e1 r36d920 1057 1057 idhdl h; 1058 1058 1059 #ifndef NDEBUG 1060 int dummy; 1061 if (IsCmd(procname,dummy)) 1062 { 1063 Werror(">>%s< is a reserved name",procname); 1064 return 0; 1065 } 1066 #endif 1067 1059 1068 h = enterid(procname,0, PROC_CMD, &IDROOT, TRUE); 1060 1069 if ( h!= NULL ) … … 1217 1226 } 1218 1227 /*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*/ 1219 void module_help_main(c har *newlib,const char *help)1228 void module_help_main(const char *newlib,const char *help) 1220 1229 { 1221 1230 char *plib = iiConvName(newlib); 1222 idhdl pl = IDROOT->get(plib,0);1231 idhdl pl = basePack->idroot->get(plib,0); 1223 1232 if ((pl==NULL)||(IDTYP(pl)!=PACKAGE_CMD)) 1224 Werror(">>%s<< is not a package ",plib);1233 Werror(">>%s<< is not a package (trying to add package help)",plib); 1225 1234 else 1226 1235 { … … 1232 1241 } 1233 1242 } 1234 void module_help_proc(c har *newlib,const char *p, const char *help)1243 void module_help_proc(const char *newlib,const char *p, const char *help) 1235 1244 { 1236 1245 char *plib = iiConvName(newlib); 1237 idhdl pl = IDROOT->get(plib,0);1246 idhdl pl = basePack->idroot->get(plib,0); 1238 1247 if ((pl==NULL)||(IDTYP(pl)!=PACKAGE_CMD)) 1239 Werror(">>%s<< is not a package ",plib);1248 Werror(">>%s<< is not a package(trying to add help for %s)",plib,p); 1240 1249 else 1241 1250 {
Note: See TracChangeset
for help on using the changeset viewer.