File: example7.m

package info (click to toggle)
gnustep-make 2.6.2-2
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 3,084 kB
  • sloc: sh: 3,990; objc: 806; makefile: 229; perl: 71
file content (43 lines) | stat: -rw-r--r-- 1,035 bytes parent folder | download | duplicates (8)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
#import	"Testing.h"

/* A seventh test ... nesting sets.
 *
 * If you run the test with 'gnustep-tests example7.m' it should
 * report a one test fail, two test passes, and one set failed.
 */
int
main()
{
  /* Start a set.
   */
  START_SET("outer set")

  /* Our first test in this set will pass.
   */
  PASS(1 == 1, "integer equality works")

  /* Now we start a set nested inside the first one.
   */
  START_SET("inner set")

  /* And we say we need a test to pass, but it's actually a faulty one
   * which will fail, causing the set to be terminated.
   */
  NEED(PASS_EQUAL(@"hello", @"there", "faulty string equality test"))

  /* Here's a correct string equality test, but it's never reached because
   * the earlier test was needed.
   */
  PASS_EQUAL(@"there", @"there", "NSString equality works")

  END_SET("inner set")

  /* And here's another correct test which *is* reached because it's
   * in a different set.
   */
  PASS_EQUAL(@"there", @"there", "NSString equality works")

  END_SET("outer set")

  return 0;
}