Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | wip |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | wip |
| Files: | files | file ages | folders |
| SHA3-256: |
1f800e1c4be6ceb39dab2842e01325bc |
| User & Date: | rolf 2019-03-29 00:35:51 |
Context
|
2019-03-30
| ||
| 01:31 | More gardening towards reportcmd. check-in: 7319d6926f user: rolf tags: wip | |
|
2019-03-29
| ||
| 00:35 | wip check-in: 1f800e1c4b user: rolf tags: wip | |
|
2019-03-26
| ||
| 01:43 | Clean up the mess, a bit. check-in: 7154504138 user: rolf tags: wip | |
Changes
Changes to generic/schema.c.
1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 |
Tcl_DStringValue (vdata->cdata)) != TCL_OK) {
sdata->validationState = VALIDATION_ERROR;
XML_StopParser (vdata->parser, 0);
Tcl_DStringSetLength (vdata->cdata, 0);
vdata->onlyWhiteSpace = 1;
return;
}
Tcl_DStringSetLength (vdata->cdata, 0);
vdata->onlyWhiteSpace = 1;
}
if (probeElementEnd (vdata->interp, sdata)
!= TCL_OK) {
sdata->validationState = VALIDATION_ERROR;
XML_StopParser (vdata->parser, 0);
|
> > |
1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 |
Tcl_DStringValue (vdata->cdata)) != TCL_OK) {
sdata->validationState = VALIDATION_ERROR;
XML_StopParser (vdata->parser, 0);
Tcl_DStringSetLength (vdata->cdata, 0);
vdata->onlyWhiteSpace = 1;
return;
}
}
if (Tcl_DStringLength (vdata->cdata)) {
Tcl_DStringSetLength (vdata->cdata, 0);
vdata->onlyWhiteSpace = 1;
}
if (probeElementEnd (vdata->interp, sdata)
!= TCL_OK) {
sdata->validationState = VALIDATION_ERROR;
XML_StopParser (vdata->parser, 0);
|
Changes to tests/schema.test.
1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 |
element a
any
element b
}
defelement a {}
defelement b {}
}
set result [s validate {<doc><a/><something/><b/></doc>}]
lappend result [s validate {<doc><a/><a><b>text</b><c><c><c/></c></c></a><b/></doc>}]
s delete
set result
} {1 1}
test schema-10.2 {any} {
tdom::schema create s
s define {
|
> > | | > > > |
1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 |
element a
any
element b
}
defelement a {}
defelement b {}
}
set result [list]
foreach xml {
<doc><a/><something/><b/></doc>
<doc><a/><a><b>text</b><c><c><c/></c></c></a><b/></doc>
} {
lappend result [s validate $xml]
}
s delete
set result
} {1 1}
test schema-10.2 {any} {
tdom::schema create s
s define {
|