Diff
Not logged in

Differences From Artifact [2a9562a99e]:

To Artifact [db8ce01168]:


106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
    CompiledLocal *localPtr;

    TclNewObj(argObjList);
    for (localPtr=procPtr->firstLocalPtr; localPtr!=NULL;
	    localPtr=localPtr->nextPtr) {
	if (TclIsVarArgument(localPtr)) {
	    Tcl_Obj *argObj;
    
	    TclNewObj(argObj);
	    Tcl_ListObjAppendElement(NULL, argObj, Tcl_NewStringObj(
		    localPtr->name, localPtr->nameLength));
	    if (localPtr->defValuePtr != NULL) {
		Tcl_ListObjAppendElement(NULL, argObj, localPtr->defValuePtr);
	    }
	    Tcl_ListObjAppendElement(NULL, argObjList, argObj);







|







106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
    CompiledLocal *localPtr;

    TclNewObj(argObjList);
    for (localPtr=procPtr->firstLocalPtr; localPtr!=NULL;
	    localPtr=localPtr->nextPtr) {
	if (TclIsVarArgument(localPtr)) {
	    Tcl_Obj *argObj;

	    TclNewObj(argObj);
	    Tcl_ListObjAppendElement(NULL, argObj, Tcl_NewStringObj(
		    localPtr->name, localPtr->nameLength));
	    if (localPtr->defValuePtr != NULL) {
		Tcl_ListObjAppendElement(NULL, argObj, localPtr->defValuePtr);
	    }
	    Tcl_ListObjAppendElement(NULL, argObjList, argObj);