Cross Reference: /ast/src/lib/libtksh/tcl/tclLoad.c

Lines Matching refs:pkgPtr
64     LoadedPackage *pkgPtr;	/* Points to detailed information about
105     LoadedPackage *pkgPtr, *defaultPtr;
160     for (pkgPtr = firstPackagePtr; pkgPtr != NULL; pkgPtr = pkgPtr->nextPtr) {
165 	    for (p1 = argv[2], p2 = pkgPtr->packageName; ; p1++, p2++) {
176 	filesMatch = (strcmp(pkgPtr->fileName, fullFileName) == 0);
181 	    defaultPtr = pkgPtr;
191 		    pkgPtr->packageName, "\"", (char *) NULL);
196     if (pkgPtr == NULL) {
197 	pkgPtr = defaultPtr;
206     if (pkgPtr != NULL) {
210 	    if (ipPtr->pkgPtr == pkgPtr) {
217     if (pkgPtr == NULL) {
329 	pkgPtr = (LoadedPackage *) ckalloc(sizeof(LoadedPackage));
330 	pkgPtr->fileName = (char *) ckalloc((unsigned)
332 	strcpy(pkgPtr->fileName, fullFileName);
333 	pkgPtr->packageName = (char *) ckalloc((unsigned)
335 	strcpy(pkgPtr->packageName, Tcl_DStringValue(&pkgName));
336 	pkgPtr->initProc = initProc;
337 	pkgPtr->safeInitProc = safeInitProc;
338 	pkgPtr->nextPtr = firstPackagePtr;
339 	firstPackagePtr = pkgPtr;
349 	if (pkgPtr->safeInitProc != NULL) {
350 	    code = (*pkgPtr->safeInitProc)(target);
354 		    "no ", pkgPtr->packageName, "_SafeInit procedure",
360 	code = (*pkgPtr->initProc)(target);
395 	ipPtr->pkgPtr = pkgPtr;
447     LoadedPackage *pkgPtr;
455     for (pkgPtr = firstPackagePtr; pkgPtr != NULL; pkgPtr = pkgPtr->nextPtr) {
456 	if ((pkgPtr->initProc == initProc)
457 		&& (pkgPtr->safeInitProc == safeInitProc)
458 		&& (strcmp(pkgPtr->packageName, pkgName) == 0)) {
466     pkgPtr = (LoadedPackage *) ckalloc(sizeof(LoadedPackage));
467     pkgPtr->fileName = (char *) ckalloc((unsigned) 1);
468     pkgPtr->fileName[0] = 0;
469     pkgPtr->packageName = (char *) ckalloc((unsigned)
471     strcpy(pkgPtr->packageName, pkgName);
472     pkgPtr->initProc = initProc;
473     pkgPtr->safeInitProc = safeInitProc;
474     pkgPtr->nextPtr = firstPackagePtr;
475     firstPackagePtr = pkgPtr;
481 	ipPtr->pkgPtr = pkgPtr;
522     LoadedPackage *pkgPtr;
532 	for (pkgPtr = firstPackagePtr; pkgPtr != NULL;
533 		pkgPtr = pkgPtr->nextPtr) {
535 	    Tcl_AppendElement(interp, pkgPtr->fileName);
536 	    Tcl_AppendElement(interp, pkgPtr->packageName);
558 	pkgPtr = ipPtr->pkgPtr;
560 	Tcl_AppendElement(interp, pkgPtr->fileName);
561 	Tcl_AppendElement(interp, pkgPtr->packageName);
626     LoadedPackage *pkgPtr;
629 	pkgPtr = firstPackagePtr;
630 	firstPackagePtr = pkgPtr->nextPtr;
631 	ckfree(pkgPtr->fileName);
632 	ckfree(pkgPtr->packageName);
633 	ckfree((char *) pkgPtr);