annotate lexer/Token.d @ 1:2168f4cb73f1

First push
author johnsen@johnsen-desktop
date Fri, 18 Apr 2008 02:01:38 +0200
parents
children 2c5a8f4c254a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
1 module lexer.Token;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
2
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
3 public
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
4 import misc.Location;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
5
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
6 import Integer = tango.text.convert.Integer;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
7
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
8 struct Token
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
9 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
10 Tok type;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
11 Location location;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
12 uint length;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
13
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
14 static Token opCall (Tok type, Location location, uint length)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
15 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
16 Token t;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
17 t.type = type;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
18 t.location = location;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
19 t.length = length;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
20 return t;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
21 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
22
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
23 char[] getType ()
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
24 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
25 return typeToString[this.type];
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
26 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
27
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
28 char[] toString ()
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
29 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
30 return this.getType()~": Len: "~Integer.toString(this.length)
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
31 ~", Loc: "~location.toString;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
32 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
33
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
34 char[] get ()
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
35 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
36 return location.get(length);
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
37 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
38 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
39
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
40 enum Tok : ushort
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
41 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
42 /* Non-code related tokens */
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
43 EOF,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
44
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
45 /* Basic types */
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
46 Identifier,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
47 Integer,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
48
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
49 /* Basic operators */
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
50 Assign,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
51 Add, Sub,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
52 Mul, Div,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
53 Comma,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
54
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
55 /* Symbols */
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
56 OpenParentheses,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
57 CloseParentheses,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
58 OpenBrace,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
59 CloseBrace,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
60 Seperator,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
61
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
62 /* Keywords */
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
63 Byte, Ubyte,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
64 Short, Ushort,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
65 Int, Uint,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
66 Long, Ulong,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
67
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
68 Float, Double,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
69
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
70 Return,
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
71
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
72 }
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
73
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
74 public char[][Tok] typeToString;
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
75
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
76 static this()
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
77 {
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
78 typeToString =
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
79 [
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
80 Tok.EOF:"EOF"[],
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
81 Tok.Identifier:"Identifier",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
82 Tok.Byte:"Byte",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
83 Tok.Short:"Short",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
84 Tok.Int:"Int",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
85 Tok.Long:"Long",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
86 Tok.OpenParentheses:"OpenParentheses",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
87 Tok.CloseParentheses:"CloseParentheses",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
88 Tok.OpenBrace:"OpenBrace",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
89 Tok.CloseBrace:"CloseBrace",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
90 Tok.Assign:"Assign",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
91 Tok.Add:"Add",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
92 Tok.Sub:"Sub",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
93 Tok.Mul:"Mul",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
94 Tok.Div:"Div",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
95 Tok.Integer:"Interger",
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
96 Tok.Seperator:"Seperator"
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
97 ];
2168f4cb73f1 First push
johnsen@johnsen-desktop
parents:
diff changeset
98 }