Commit | Line | Data |
---|---|---|
809eca9d | 1 | pload QAcommands |
2 | ||
3 | puts "============" | |
4 | puts "OCC22744" | |
5 | puts "============" | |
6 | puts "" | |
7 | ####################################################################### | |
8 | # Global HashCode function for TCollection_ExtendedString | |
9 | ####################################################################### | |
10 | ||
11 | set BugNumber OCC22744 | |
12 | ||
13 | set QATestVar [ catch { OCC22744 } ] | |
14 | if { ${QATestVar} == 0 } { | |
15 | puts "OK ${BugNumber}" | |
16 | } else { | |
17 | puts "Faulty ${BugNumber}" | |
18 | } |