jitcraft/TypeManager.cpp
changeset 11 a350c2cc736a
child 12 75e385f68b7e
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/jitcraft/TypeManager.cpp	Fri Jun 29 19:35:17 2012 -0700
     1.3 @@ -0,0 +1,55 @@
     1.4 +/*
     1.5 + * Copyright (C) 2012 David Anderson
     1.6 + *
     1.7 + * This file is part of JITCraft.
     1.8 + *
     1.9 + * JITCraft is free software: you can redistribute it and/or modify it under
    1.10 + * the terms of the GNU General Public License as published by the Free
    1.11 + * Software Foundation, either version 3 of the License, or (at your option)
    1.12 + * any later version.
    1.13 + * 
    1.14 + * Foobar is distributed in the hope that it will be useful, but WITHOUT ANY
    1.15 + * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
    1.16 + * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
    1.17 + *
    1.18 + * You should have received a copy of the GNU General Public License along with
    1.19 + * JITCraft. If not, see http://www.gnu.org/licenses/.
    1.20 + */
    1.21 +#include "Types.h"
    1.22 +#include "TypeManager.h"
    1.23 +
    1.24 +using namespace jc;
    1.25 +
    1.26 +
    1.27 +TypeManager::TypeManager(Zone *zone)
    1.28 +  : zone_(zone)
    1.29 +{
    1.30 +}
    1.31 +
    1.32 +bool
    1.33 +TypeManager::initialize()
    1.34 +{
    1.35 +    if ((primitiveTypes_[PrimitiveType_Int32] = Type::NewPrimitive(zone_, NULL)) == NULL)
    1.36 +        return false;
    1.37 +    if ((primitiveTypes_[PrimitiveType_Float] = Type::NewPrimitive(zone_, "Float")) == NULL)
    1.38 +        return false;
    1.39 +    return true;
    1.40 +}
    1.41 +
    1.42 +Type *
    1.43 +TypeManager::getPrimitiveForTag(Name *tag)
    1.44 +{
    1.45 +    if (tag == NULL)
    1.46 +        return getPrimitive(PrimitiveType_Int32);
    1.47 +    if (strcmp(tag, "Float") == 0)
    1.48 +        return getPrimitive(PrimitiveType_Float);
    1.49 +    assert(!"tag cache");
    1.50 +    return NULL;
    1.51 +}
    1.52 +
    1.53 +Type *
    1.54 +TypeManager::unsafeArray(Type *contained, int elements)
    1.55 +{
    1.56 +    // :TODO: cache this.
    1.57 +    return Type::NewUnsafeArray(zone_, contained, elements);
    1.58 +}