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

Overview
Comment:Added another test.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | wip
Files: files | file ages | folders
SHA3-256: 05cfa07ebfe2cc0c6bc2e9b5e10ed53b7e799e0438f88b7d8e356dc10e3a7b99
User & Date: rolf 2019-10-03 02:23:04
Context
2019-10-03
11:29
Added #text to the possible next events in case of mixed. check-in: f1a7ec26da user: rolf tags: wip
02:23
Added another test. check-in: 05cfa07ebf user: rolf tags: wip
02:18
This returns even something to script level. check-in: c8b0062672 user: rolf tags: wip
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to tests/schema.test.

4780
4781
4782
4783
4784
4785
4786























4787
4788
4789
4790
4791
4792
4793
    }
    s event start doc
    set result [s info frontexpected]
    s delete
    set result
} {a c b toplevel musthave}
























proc schema-18 {args} {
    lappend ::result {*}$args
}
test schema-18.1 {reportcmd} {
    tdom::schema s
    s define {
        defelement doc {







>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>







4780
4781
4782
4783
4784
4785
4786
4787
4788
4789
4790
4791
4792
4793
4794
4795
4796
4797
4798
4799
4800
4801
4802
4803
4804
4805
4806
4807
4808
4809
4810
4811
4812
4813
4814
4815
4816
    }
    s event start doc
    set result [s info frontexpected]
    s delete
    set result
} {a c b toplevel musthave}

test schema-17.6 {info frontexpected} {
    tdom::schema s
    s prefixns {foo http://foo.bar}
    s define {
        defelement doc {
            choice ? {
                element a
                element c
                element b
            }
            element toplevel ?
            namespace foo {
                element musthave
            }
            element aftermust
        }
    }
    s event start doc
    set result [s info frontexpected]
    s delete
    set result
} {a c b toplevel {musthave http://foo.bar}}

proc schema-18 {args} {
    lappend ::result {*}$args
}
test schema-18.1 {reportcmd} {
    tdom::schema s
    s define {
        defelement doc {