File: switch1.c

package info (click to toggle)
cc65 2.19-2
  • links: PTS
  • area: main
  • in suites: forky, sid, trixie
  • size: 20,268 kB
  • sloc: ansic: 117,151; asm: 66,339; pascal: 4,248; makefile: 1,009; perl: 607
file content (91 lines) | stat: -rw-r--r-- 1,472 bytes parent folder | download | duplicates (3)
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
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
/*
  !!DESCRIPTION!!
  !!ORIGIN!!      SDCC regression tests
  !!LICENCE!!     GPL, read COPYING.GPL
*/

#include <stdio.h>
#include <limits.h>

unsigned char success=0;
unsigned char failures=0;
unsigned char dummy=0;

#ifdef SUPPORT_BIT_TYPES
bit bit0 = 0;
#endif
unsigned int aint0 = 0;
unsigned int aint1 = 0;
unsigned char achar0 = 0;
unsigned char achar1 = 0;

void done()
{
  dummy++;
}

void switch1(void)
{
  switch(achar0) {
  case 0:
    achar0 = 9;
    break;
  case 1:
    achar0 = 18;
    break;

  default:
    achar0 = 0;
  }
}

void switch2(void)
{
  switch(achar1) {
  case 0:    achar0 = 9;    break;
  case 1:    achar0 = 8;    break;
  case 2:    achar0 = 7;    break;
  case 3:    achar0 = 6;    break;
  case 4:    achar0 = 5;    break;
  case 5:    achar0 = 4;    break;
  case 6:    achar0 = 3;    break;
  case 7:    achar0 = 2;    break;
  case 8:    achar0 = 1;    break;
  case 9:    achar0 = 0;    break;
  case 10:    achar0 = 9;    break;
  case 11:    achar0 = 8;    break;
  case 12:    achar0 = 7;    break;
  default:    achar0 = 0xff;    break;
  }
}

int main(void)
{
  achar0 = 0;
  switch1();
  if(achar0 != 9)
    failures++;

  switch1();
  if(achar0 != 0)
    failures++;

  achar0++;

  switch1();
  if(achar0 != 18)
    failures++;

  for(achar1=0; achar1<10;achar1++){
    switch2();
    if(achar0 != (9-achar1))
      failures++;

  }

  success=failures;
  done();
  printf("failures: %d\n",failures);

  return failures;
}