Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Editorial changes.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: ed2de2fd5cc78f7d267bf409228305af26869d16
User & Date: rolf 2008-03-04 20:34:28
Context
2008-03-04
20:35
See file. check-in: 5abde0c7a3 user: rolf tags: trunk
20:34
Editorial changes. check-in: ed2de2fd5c user: rolf tags: trunk
2007-12-25
23:19
See file. check-in: 88b105d155 user: rolf tags: trunk
Changes

Changes to generic/tclexpat.c.

2159
2160
2161
2162
2163
2164
2165

2166

2167
2168
2169
2170
2171
2172
2173
....
2284
2285
2286
2287
2288
2289
2290

2291

2292
2293
2294
2295
2296
2297
2298
      }

      if (activeTclHandlerSet->elementstartObjProc != NULL) {
          vector[0] = activeTclHandlerSet->elementstartcommand;
          Tcl_IncrRefCount (vector[0]);
          vector[1] = Tcl_NewStringObj((char *)name, -1);
          Tcl_IncrRefCount (vector[1]);

          result = activeTclHandlerSet->elementstartObjProc(activeTclHandlerSet->elementstartclientData, expat->interp, 3, vector);

          TclExpatHandlerResult(expat, activeTclHandlerSet, result);
          Tcl_DecrRefCount (vector[0]);
          Tcl_DecrRefCount (vector[1]);
      } else {
          if (activeTclHandlerSet->elementstartcommand != NULL) {

              /*
................................................................................
              Tcl_IncrRefCount (ename);
          } else {
              Tcl_SetStringObj (ename, (char *)name, -1);
          }
          vector[0] = activeTclHandlerSet->elementendcommand;
          vector[1] = ename;
          Tcl_Preserve((ClientData) expat->interp);

          result = activeTclHandlerSet->elementendObjProc(activeTclHandlerSet->elementendclientData, expat->interp, 2, vector);

          Tcl_Release((ClientData) expat->interp);
          TclExpatHandlerResult(expat, activeTclHandlerSet, result);
      } else {
          if (activeTclHandlerSet->elementendcommand != NULL) {

              /*
               * Take a copy of the callback script so that arguments may be appended.







>
|
>







 







>
|
>







2159
2160
2161
2162
2163
2164
2165
2166
2167
2168
2169
2170
2171
2172
2173
2174
2175
....
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
      }

      if (activeTclHandlerSet->elementstartObjProc != NULL) {
          vector[0] = activeTclHandlerSet->elementstartcommand;
          Tcl_IncrRefCount (vector[0]);
          vector[1] = Tcl_NewStringObj((char *)name, -1);
          Tcl_IncrRefCount (vector[1]);
          result = activeTclHandlerSet->elementstartObjProc(
              activeTclHandlerSet->elementstartclientData, expat->interp,
              3, vector);
          TclExpatHandlerResult(expat, activeTclHandlerSet, result);
          Tcl_DecrRefCount (vector[0]);
          Tcl_DecrRefCount (vector[1]);
      } else {
          if (activeTclHandlerSet->elementstartcommand != NULL) {

              /*
................................................................................
              Tcl_IncrRefCount (ename);
          } else {
              Tcl_SetStringObj (ename, (char *)name, -1);
          }
          vector[0] = activeTclHandlerSet->elementendcommand;
          vector[1] = ename;
          Tcl_Preserve((ClientData) expat->interp);
          result = activeTclHandlerSet->elementendObjProc(
              activeTclHandlerSet->elementendclientData, expat->interp,
              2, vector);
          Tcl_Release((ClientData) expat->interp);
          TclExpatHandlerResult(expat, activeTclHandlerSet, result);
      } else {
          if (activeTclHandlerSet->elementendcommand != NULL) {

              /*
               * Take a copy of the callback script so that arguments may be appended.