Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Added a test. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | wip |
| Files: | files | file ages | folders |
| SHA3-256: |
fd510a13be181de68b4723221273f69c |
| User & Date: | rolf 2019-10-28 00:33:07 |
Context
|
2019-10-31
| ||
| 14:12 | Work on validation error recovery continues. Since there seems to be no silver bullet, this throws code sprinkled all over the code to make some progress. check-in: 70f5d362f7 user: rolf tags: wip | |
|
2019-10-28
| ||
| 00:33 | Added a test. check-in: fd510a13be user: rolf tags: wip | |
|
2019-10-26
| ||
| 01:20 | Fixed not always poping up of tcl errors in called script during validation. check-in: a43c523416 user: rolf tags: wip | |
Changes
Changes to tests/schema.test.
1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 |
grammar define {
defelement doc {
group * {
element a
element b
}
element c
}
foreach e {a b c} {
defelement $e {}
}
}
set result [list]
foreach xml {
|
> > > > > > > > > > > > > > > > > > > > > > > > > > > |
1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 |
grammar define {
defelement doc {
group * {
element a
element b
}
element c
}
foreach e {a b c} {
defelement $e {}
}
}
set result [list]
foreach xml {
<doc><c/></doc>
<doc><a/><b/><c/></doc>
<doc><a/><b/><a/><b/><c/></doc>
<doc><a/><b/><a/><b/></doc>
} {
lappend result [grammar validate $xml]
}
grammar delete
set result
} {1 1 1 0}
test schema-7.11b {loop over seq} {
tdom::schema create grammar
grammar define {
defelement doc {
group 2 {
element a ?
element b ?
}
element c
}
foreach e {a b c} {
defelement $e {}
}
}
set result [list]
foreach xml {
|