Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Minor spacing fix. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | rberteig-json-test |
| Files: | files | file ages | folders |
| SHA1: |
2ff6ceb9853b6d1f87e67ce32029347c |
| User & Date: | mistachkin 2016-01-26 02:45:04.385 |
Context
|
2016-01-27
| ||
| 00:44 | Update copyright date to this year since the JSON tests are new this year. Fix indentation of Tcl to match established convention. Add test of JSON API version to reflect earliest I expect to pass these tests. Document block of Version and HAI, and add version for consistency. ... (check-in: c4f8d88f user: Ross tags: rberteig-json-test) | |
|
2016-01-26
| ||
| 02:45 | Minor spacing fix. ... (check-in: 2ff6ceb9 user: mistachkin tags: rberteig-json-test) | |
| 01:46 | Place a cornerstone for scaffolding of the test cases for the fossil json command and related REST API. This begins with an extension to fossil_maybe_answer in tester.tcl that adds a -expectError option to flag invocations of fossil that are expected to exit with error status and not log it when -quiet is in effect. The new file json.test has the first few test cases for fossil json, all of which are currently passing. ... (check-in: 95080f47 user: Ross tags: rberteig-json-test) | |
Changes
Changes to test/tester.tcl.
| ︙ | ︙ | |||
133 134 135 136 137 138 139 |
file delete $prompt_file
} else {
set rc [catch {eval exec $cmd} result]
}
global RESULT CODE
set CODE $rc
if {($rc && !$expectError) || (!$rc && $expectError)} {
| | | 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 |
file delete $prompt_file
} else {
set rc [catch {eval exec $cmd} result]
}
global RESULT CODE
set CODE $rc
if {($rc && !$expectError) || (!$rc && $expectError)} {
protOut "ERROR: $result" 1
} elseif {$::VERBOSE} {
protOut "RESULT: $result"
}
set RESULT $result
}
# Read a file into memory.
|
| ︙ | ︙ |