Source file ctokens.ml

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

type token = 
  | WHILE of (string * int)
  | VOLATILE
  | VOID
  | UNSIGNED
  | UNION
  | TYPEDEF
  | TILDE
  | SWITCH of (string * int)
  | SUP_SUP_EQ of (string * int)
  | SUP_SUP
  | SUP_EQ
  | SUP
  | STRUCT
  | STATIC
  | STAR_EQ of (string * int)
  | STAR
  | SLASH_EQ of (string * int)
  | SLASH
  | SIZEOF
  | SIGNED
  | SHORT
  | SEMICOLON of (string * int)
  | RPAREN of (string * int)
  | RETURN of (string * int)
  | RESTRICT
  | REGISTER
  | RBRACKET of (string * int)
  | RBRACE of (string * int)
  | QUEST of (string * int)
  | PLUS_PLUS
  | PLUS_EQ of (string * int)
  | PLUS
  | PIPE_PIPE
  | PIPE_EQ of (string * int)
  | PIPE
  | PERCENT_EQ of (string * int)
  | PERCENT
  | NAMED_TYPE of (string)
  | MINUS_MINUS
  | MINUS_EQ of (string * int)
  | MINUS
  | LPAREN of (string * int)
  | LONG
  | LBRACKET of (string * int)
  | LBRACE of (string * int)
  | INT
  | INLINE
  | INF_INF_EQ of (string * int)
  | INF_INF
  | INF_EQ
  | INF
  | IF of (string * int)
  | IDENT of (string)
  | GOTO of (string * int)
  | GNU_ATTRS of (Cabs.gnu_attrs)
  | FOR of (string * int)
  | FLOAT
  | EXTERN
  | EXTENSION
  | EXCLAM_EQ
  | EXCLAM
  | EQ_EQ
  | EQ of (string * int)
  | EOF
  | ENUM
  | ELSE of (string * int)
  | ELLIPSIS of (string * int)
  | DOUBLE
  | DOT
  | DO of (string * int)
  | DEFAULT of (string * int)
  | CST_STRING of (string)
  | CST_INT of (string)
  | CST_FLOAT of (string)
  | CST_CHAR of (string)
  | CONTINUE of (string * int)
  | CONST
  | COMPLEX
  | COMMA of (string * int)
  | COLON of (string * int)
  | CIRC_EQ of (string * int)
  | CIRC
  | CHAR
  | CASE of (string * int)
  | BUILTIN_TYPE of (string)
  | BREAK of (string * int)
  | BOOL
  | AUTO
  | ATTRIBUTE
  | ASM
  | ARROW
  | AND_EQ of (string * int)
  | AND_AND
  | AND