Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Bug fix in case of domuniqe with elements as fields. |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | schema |
| Files: | files | file ages | folders |
| SHA3-256: |
34e75df5dd3e2a88a6d692ce172514c7 |
| User & Date: | rolf 2019-06-05 17:29:34.904 |
Context
|
2019-06-08
| ||
| 14:36 | Work on validation error reporting. check-in: 634d7e6d48 user: rolf tags: schema | |
|
2019-06-05
| ||
| 17:29 | Bug fix in case of domuniqe with elements as fields. check-in: 34e75df5dd user: rolf tags: schema | |
|
2019-05-31
| ||
| 17:00 | Small editorial corrections. check-in: 09863d4ab7 user: rolf tags: schema | |
Changes
Changes to generic/schema.c.
| ︙ | ︙ | |||
2330 2331 2332 2333 2334 2335 2336 |
break;
}
SetResult ("DOM_KEYCONSTRAINT");
goto errorCleanup;
}
} else {
keystr = xpathGetStringValue (frs.nodes[0], &len);
| | | 2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340 2341 2342 2343 2344 |
break;
}
SetResult ("DOM_KEYCONSTRAINT");
goto errorCleanup;
}
} else {
keystr = xpathGetStringValue (frs.nodes[0], &len);
Tcl_CreateHashEntry (&htable, keystr, &hnew);
FREE(keystr);
if (!hnew) {
if (recover (interp, sdata, S("DOM_KEYCONSTRAINT"))) {
break;
}
SetResult ("DOM_KEYCONSTRAINT");
goto errorCleanup;
|
| ︙ | ︙ |
Changes to tests/schema.test.
| ︙ | ︙ | |||
4652 4653 4654 4655 4656 4657 4658 4659 4660 4661 4662 4663 4664 4665 |
}
return $rc
}
proc postValidation {g xml} {
set doc [dom parse $xml]
set rc [$g domvalidate $doc errMsg]
$doc delete
return $rc
}
test schema-19.1 {keyspace} {
tdom::schema s
s define {
| > | 4652 4653 4654 4655 4656 4657 4658 4659 4660 4661 4662 4663 4664 4665 4666 |
}
return $rc
}
proc postValidation {g xml} {
set doc [dom parse $xml]
set rc [$g domvalidate $doc errMsg]
#puts "error: $errMsg"
$doc delete
return $rc
}
test schema-19.1 {keyspace} {
tdom::schema s
s define {
|
| ︙ | ︙ | |||
4882 4883 4884 4885 4886 4887 4888 4889 4890 4891 |
{<doc><item ref="1" id="a"/><item ref="1" id="b"/></doc>}
} {
lappend result [postValidation s $xml]
}
s delete
set result
} {1 0 1 0 1}
}
| > > > > > > > > > > > > > > > > > > > > > | 4883 4884 4885 4886 4887 4888 4889 4890 4891 4892 4893 4894 4895 4896 4897 4898 4899 4900 4901 4902 4903 4904 4905 4906 4907 4908 4909 4910 4911 4912 4913 |
{<doc><item ref="1" id="a"/><item ref="1" id="b"/></doc>}
} {
lappend result [postValidation s $xml]
}
s delete
set result
} {1 0 1 0 1}
test schema-20.5 {domunique} {
tdom::schema s
s define {
defelement doc {
domunique item ref
element item * {
element ref ! text
}
}
}
set result [list]
foreach xml {
{<doc><item><ref>1</ref></item><item><ref>foo</ref></item></doc>}
{<doc><item><ref>1</ref></item><item><ref>1</ref></item></doc>}
} {
lappend result [postValidation s $xml]
}
s delete
set result
} {1 0}
}
|