File: CharClass.c

package info (click to toggle)
oo2c32 1.5.0-1
  • links: PTS
  • area: main
  • in suites: potato
  • size: 8,748 kB
  • ctags: 5,415
  • sloc: ansic: 95,007; sh: 473; makefile: 344; perl: 57; lisp: 21
file content (109 lines) | stat: -rw-r--r-- 1,853 bytes parent folder | download | duplicates (2)
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
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
/* file generated by oo2c -- do not edit */
#include "__oo2c.h"
#include "__libc.h"
#include "CharClass.d"

static _ModId _mid;

unsigned char CharClass__IsNumeric(unsigned char ch) {
  register int i0;
  i0 = (int)ch < 48;
  if (i0) goto l0;
  i0 = (int)ch <= 57;
  if (i0) goto l1;
l0:
  i0 = 0;
  goto l2;
l1:
  i0 = 1;
l2:
  return (unsigned char)i0;
}

unsigned char CharClass__IsLetter(unsigned char ch) {
  register int i0;
  i0 = (int)ch < 97;
  if (i0) goto l0;
  i0 = (int)ch <= 122;
  if (i0) goto l2;
l0:
  i0 = (int)ch >= 65;
  if (!(i0)) goto l1;
  i0 = (int)ch <= 90;
  if (i0) goto l2;
l1:
  i0 = 0;
  goto l3;
l2:
  i0 = 1;
l3:
  return (unsigned char)i0;
}

unsigned char CharClass__IsUpper(unsigned char ch) {
  register int i0;
  i0 = (int)ch < 65;
  if (i0) goto l0;
  i0 = (int)ch <= 90;
  if (i0) goto l1;
l0:
  i0 = 0;
  goto l2;
l1:
  i0 = 1;
l2:
  return (unsigned char)i0;
}

unsigned char CharClass__IsLower(unsigned char ch) {
  register int i0;
  i0 = (int)ch < 97;
  if (i0) goto l0;
  i0 = (int)ch <= 122;
  if (i0) goto l1;
l0:
  i0 = 0;
  goto l2;
l1:
  i0 = 1;
l2:
  return (unsigned char)i0;
}

unsigned char CharClass__IsControl(unsigned char ch) {
  register int i0;
  i0 = (int)ch < 32;
  return (unsigned char)i0;
}

unsigned char CharClass__IsWhiteSpace(unsigned char ch) {
  register int i0;
  i0 = (int)ch == 32;
  if (i0) goto l0;
  i0 = (int)ch == 12;
  if (i0) goto l0;
  i0 = (int)ch == 10;
  if (i0) goto l0;
  i0 = (int)ch == 13;
  if (i0) goto l0;
  i0 = (int)ch == 9;
  if (i0) goto l0;
  i0 = (int)ch == 11;
  if (i0) goto l0;
  i0 = 0;
  goto l1;
l0:
  i0 = 1;
l1:
  return (unsigned char)i0;
}

unsigned char CharClass__IsEol(unsigned char ch) {
  register int i0;
  i0 = (int)ch == 10;
  return (unsigned char)i0;
}

void CharClass_init(void) {
  _mid = _register_module(&CharClass_md.md, NULL);
}