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: |
0625bcaa4ced73e9331133eb635f5295 |
| User & Date: | rolf 2019-08-17 13:54:00 |
Context
|
2019-08-22
| ||
| 21:23 | Made more info about the validation state available for recover scripts. Closed-Leaf check-in: 2c03ac9cd6 user: rolf tags: wip | |
|
2019-08-17
| ||
| 13:54 | wip check-in: 0625bcaa4c user: rolf tags: wip | |
| 01:40 | wip check-in: f8161e258e user: rolf tags: wip | |
Changes
Changes to generic/schema.c.
5366 5367 5368 5369 5370 5371 5372 5373 5374 5375 5376 5377 5378 5379 5380 |
char *text
)
{
SchemaKeySpace *ks = (SchemaKeySpace *) constraintData;
int hnew;
Tcl_HashEntry *h;
fprintf (stderr, "keyImpl called: '%s'\n", text);
if (!ks->active) return 1;
h = Tcl_CreateHashEntry (&ks->ids, text, &hnew);
if (hnew) {
Tcl_SetHashValue (h, 1);
return 1;
}
if (Tcl_GetHashValue (h) == 0) {
|
< |
5366 5367 5368 5369 5370 5371 5372 5373 5374 5375 5376 5377 5378 5379 |
char *text
)
{
SchemaKeySpace *ks = (SchemaKeySpace *) constraintData;
int hnew;
Tcl_HashEntry *h;
if (!ks->active) return 1;
h = Tcl_CreateHashEntry (&ks->ids, text, &hnew);
if (hnew) {
Tcl_SetHashValue (h, 1);
return 1;
}
if (Tcl_GetHashValue (h) == 0) {
|
Changes to tests/schema.test.
4836 4837 4838 4839 4840 4841 4842 4843 4844 4845 4846 4847 4848 4849 4850 4851 4852 4853 |
set result
} {s WRONG_VALUE 1 s WRONG_VALUE s MISSING_TEXT 1 1}
test schema-18.6 {reportcmd} {
tdom::schema s
s define {
defelement item {
text {key lang}
}
defelement items {
element item +
}
defelement doc {
element items +
}
}
s reportcmd schema-18
set result [list]
|
> | > | > > | > |
4836 4837 4838 4839 4840 4841 4842 4843 4844 4845 4846 4847 4848 4849 4850 4851 4852 4853 4854 4855 4856 4857 4858 |
set result
} {s WRONG_VALUE 1 s WRONG_VALUE s MISSING_TEXT 1 1}
test schema-18.6 {reportcmd} {
tdom::schema s
s define {
defelement item {
text {
key lang
minLength 2
}
}
defelement items {
keyspace lang {
element item +
}
}
defelement doc {
element items +
}
}
s reportcmd schema-18
set result [list]
|