| 1 | /* -*- mode: C++ -*- */ |
|---|
| 2 | ////////////////////////////////////////////////////////////////////////////// |
|---|
| 3 | // FILE : test.tol |
|---|
| 4 | // PURPOSE: test for a resolved bug |
|---|
| 5 | ////////////////////////////////////////////////////////////////////////////// |
|---|
| 6 | |
|---|
| 7 | //Sets the bugzilla identifier number, your e-mail and the bugŽs summary |
|---|
| 8 | Real bugNum_ = 1228; |
|---|
| 9 | Text email_ = "vdebuen@tol-project.org"; |
|---|
| 10 | Text summary_="Managing Descriptions. ClassMembers and member descriptions"; |
|---|
| 11 | Text link_ = GetTolBugzillaLink(bugNum_); |
|---|
| 12 | |
|---|
| 13 | //Write here the initial test TOL code if needed |
|---|
| 14 | |
|---|
| 15 | Real numErr0 = Copy(NError); |
|---|
| 16 | Real numWar0 = Copy(NWarning); |
|---|
| 17 | #Embed "check.tol"; |
|---|
| 18 | Real numErr1 = Copy(NError); |
|---|
| 19 | Real numWar1 = Copy(NWarning); |
|---|
| 20 | |
|---|
| 21 | |
|---|
| 22 | Set partialResults_ = [[ numErr0,numErr1,numWar1,numWar0, ok.1, ok.2]]; |
|---|
| 23 | |
|---|
| 24 | //This is a messure of the success of the test |
|---|
| 25 | Real quality_ = Group("And",[[numErr1==numErr0,numWar1==numWar0,ok.1,ok.1]]); |
|---|
| 26 | |
|---|
| 27 | //Return the results |
|---|
| 28 | Set resultStr_ = @strTestStatus(summary_, link_, quality_, |
|---|
| 29 | "Partial results = "<<partialResults_, |
|---|
| 30 | "NO DBServerType", "NO DBServerHost", "NO DBAlias", |
|---|
| 31 | email_); |
|---|
| 32 | WriteLn(""<<resultStr_); |
|---|
| 33 | resultStr_; |
|---|
| 34 | |
|---|
| 35 | /* */ |
|---|
| 36 | |
|---|