|
dvander@11
|
1 |
/* |
|
dvander@11
|
2 |
* Copyright (C) 2012 David Anderson |
|
dvander@11
|
3 |
* |
|
dvander@11
|
4 |
* This file is part of JITCraft. |
|
dvander@11
|
5 |
* |
|
dvander@11
|
6 |
* JITCraft is free software: you can redistribute it and/or modify it under |
|
dvander@11
|
7 |
* the terms of the GNU General Public License as published by the Free |
|
dvander@11
|
8 |
* Software Foundation, either version 3 of the License, or (at your option) |
|
dvander@11
|
9 |
* any later version. |
|
dvander@11
|
10 |
* |
|
dvander@11
|
11 |
* Foobar is distributed in the hope that it will be useful, but WITHOUT ANY |
|
dvander@11
|
12 |
* WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS |
|
dvander@11
|
13 |
* FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. |
|
dvander@11
|
14 |
* |
|
dvander@11
|
15 |
* You should have received a copy of the GNU General Public License along with |
|
dvander@11
|
16 |
* JITCraft. If not, see http://www.gnu.org/licenses/. |
|
dvander@11
|
17 |
*/ |
|
dvander@11
|
18 |
#include "Types.h" |
|
dvander@11
|
19 |
#include "TypeManager.h" |
|
dvander@11
|
20 |
|
|
dvander@11
|
21 |
using namespace jc; |
|
dvander@11
|
22 |
|
|
dvander@11
|
23 |
|
|
dvander@11
|
24 |
TypeManager::TypeManager(Zone *zone) |
|
dvander@11
|
25 |
: zone_(zone) |
|
dvander@11
|
26 |
{ |
|
dvander@11
|
27 |
} |
|
dvander@11
|
28 |
|
|
dvander@11
|
29 |
bool |
|
dvander@11
|
30 |
TypeManager::initialize() |
|
dvander@11
|
31 |
{ |
|
dvander@11
|
32 |
if ((primitiveTypes_[PrimitiveType_Int32] = Type::NewPrimitive(zone_, NULL)) == NULL) |
|
dvander@11
|
33 |
return false; |
|
dvander@11
|
34 |
if ((primitiveTypes_[PrimitiveType_Float] = Type::NewPrimitive(zone_, "Float")) == NULL) |
|
dvander@11
|
35 |
return false; |
|
dvander@11
|
36 |
return true; |
|
dvander@11
|
37 |
} |
|
dvander@11
|
38 |
|
|
dvander@11
|
39 |
Type * |
|
dvander@11
|
40 |
TypeManager::getPrimitiveForTag(Name *tag) |
|
dvander@11
|
41 |
{ |
|
dvander@11
|
42 |
if (tag == NULL) |
|
dvander@11
|
43 |
return getPrimitive(PrimitiveType_Int32); |
|
dvander@11
|
44 |
if (strcmp(tag, "Float") == 0) |
|
dvander@11
|
45 |
return getPrimitive(PrimitiveType_Float); |
|
dvander@11
|
46 |
assert(!"tag cache"); |
|
dvander@11
|
47 |
return NULL; |
|
dvander@11
|
48 |
} |
|
dvander@11
|
49 |
|
|
dvander@11
|
50 |
Type * |
|
dvander@11
|
51 |
TypeManager::unsafeArray(Type *contained, int elements) |
|
dvander@11
|
52 |
{ |
|
dvander@11
|
53 |
// :TODO: cache this. |
|
dvander@11
|
54 |
return Type::NewUnsafeArray(zone_, contained, elements); |
|
dvander@11
|
55 |
} |