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

Overview
Comment:Fixed -DTDOM_NO_SCHEMA=1 build.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | schema
Files: files | file ages | folders
SHA3-256: 95b30715cddf3ca9a9a1bcea96e1b7fc0af448b1839938315ceaf3939eb8ff4f
User & Date: rolf 2019-11-21 00:57:03
Context
2019-11-22
23:51
Minor editorial change. check-in: 16866bc56d user: rolf tags: schema
2019-11-21
00:57
Fixed -DTDOM_NO_SCHEMA=1 build. check-in: 95b30715cd user: rolf tags: schema
2019-11-18
22:42
Removed slipped throu debuging instrumentalization. check-in: 22b17ef648 user: rolf tags: schema
Changes

Changes to generic/tclexpat.c.

795
796
797
798
799
800
801

802
803
804
805

806
807
808
809
810
811
812
        CheckArgs (2,2,1,"");

        if (expat->parsingState > 1) {
            Tcl_SetResult (interp, "parser delete not allowed from within "
                           "callback", TCL_STATIC);
            result = TCL_ERROR;
        } else {

            if (expat->sdata) {
                expat->sdata->inuse--;
                tDOM_schemaReset (expat->sdata, 1);
            }

            Tcl_DeleteCommand(interp, Tcl_GetString(expat->name));
            result = TCL_OK;
        }
	break;

    case EXPAT_GET:








>




>







795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
        CheckArgs (2,2,1,"");

        if (expat->parsingState > 1) {
            Tcl_SetResult (interp, "parser delete not allowed from within "
                           "callback", TCL_STATIC);
            result = TCL_ERROR;
        } else {
#ifndef TDOM_NO_SCHEMA
            if (expat->sdata) {
                expat->sdata->inuse--;
                tDOM_schemaReset (expat->sdata, 1);
            }
#endif
            Tcl_DeleteCommand(interp, Tcl_GetString(expat->name));
            result = TCL_OK;
        }
	break;

    case EXPAT_GET:

Changes to generic/tclexpat.h.

132
133
134
135
136
137
138

139

140
141
142
143
144
145
146
                                   2 == parsing an input chunk */
    XML_Char nsSeparator;       
    int paramentityparsing;     
    int noexpand;
    int useForeignDTD;
    const char *currentmarkup;  /* Used to transfer data for method */
    int currentmarkuplen;       /* currentmarkup */

    SchemaData *sdata;          /* Validation / Schema data */

 
    TclHandlerSet *firstTclHandlerSet;
    CHandlerSet *firstCHandlerSet;
} TclGenExpatInfo;

/*--------------------------------------------------------------------------
|   Function prototypes







>

>







132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
                                   2 == parsing an input chunk */
    XML_Char nsSeparator;       
    int paramentityparsing;     
    int noexpand;
    int useForeignDTD;
    const char *currentmarkup;  /* Used to transfer data for method */
    int currentmarkuplen;       /* currentmarkup */
#ifndef TDOM_NO_SCHEMA
    SchemaData *sdata;          /* Validation / Schema data */
#endif
 
    TclHandlerSet *firstTclHandlerSet;
    CHandlerSet *firstCHandlerSet;
} TclGenExpatInfo;

/*--------------------------------------------------------------------------
|   Function prototypes