jitcraft/Types.cpp
author David Anderson <dvander@alliedmods.net>
Wed Jun 27 02:21:56 2012 -0700 (2012-06-27)
changeset 4 633176823669
parent 3 f43e399ab622
child 11 a350c2cc736a
permissions -rw-r--r--
Add support for float variables and basic math.
dvander@0
     1
/*
dvander@0
     2
 * Copyright (C) 2012 David Anderson
dvander@0
     3
 *
dvander@0
     4
 * This file is part of JITCraft.
dvander@0
     5
 *
dvander@0
     6
 * JITCraft is free software: you can redistribute it and/or modify it under
dvander@0
     7
 * the terms of the GNU General Public License as published by the Free
dvander@0
     8
 * Software Foundation, either version 3 of the License, or (at your option)
dvander@0
     9
 * any later version.
dvander@0
    10
 * 
dvander@0
    11
 * Foobar is distributed in the hope that it will be useful, but WITHOUT ANY
dvander@0
    12
 * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
dvander@0
    13
 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
dvander@0
    14
 *
dvander@0
    15
 * You should have received a copy of the GNU General Public License along with
dvander@0
    16
 * JITCraft. If not, see http://www.gnu.org/licenses/.
dvander@0
    17
 */
dvander@0
    18
#include "Types.h"
dvander@0
    19
dvander@0
    20
using namespace jc;
dvander@0
    21
dvander@0
    22
Type *
dvander@4
    23
Type::NewPrimitive(Name *tag)
dvander@0
    24
{
dvander@0
    25
    Type *type = new Type;
dvander@0
    26
    type->kind_ = PRIMITIVE;
dvander@0
    27
    type->tag_ = tag;
dvander@0
    28
    
dvander@4
    29
    if (tag && strcmp(tag, "Float") == 0)
dvander@4
    30
        type->primitive_ = PrimitiveType_Float;
dvander@4
    31
    else
dvander@4
    32
        type->primitive_ = PrimitiveType_Int32;
dvander@4
    33
    return type;
dvander@4
    34
}
dvander@4
    35
dvander@4
    36
Type *
dvander@4
    37
Type::NewPrimitive(PrimitiveType prim)
dvander@4
    38
{
dvander@4
    39
    Type *type = new Type;
dvander@4
    40
    type->kind_ = PRIMITIVE;
dvander@4
    41
    type->tag_ = NULL;
dvander@4
    42
    type->primitive_ = prim;
dvander@0
    43
    return type;
dvander@0
    44
}
dvander@0
    45
dvander@0
    46
Type *
dvander@0
    47
Type::NewUnsafeArray(Type *contained, int elements)
dvander@0
    48
{
dvander@0
    49
    Type *type = new Type;
dvander@0
    50
    type->kind_ = UNSAFE_ARRAY;
dvander@0
    51
    type->contained_ = contained;
dvander@0
    52
    type->elements_ = elements;
dvander@0
    53
    if (contained->isPrimitive())
dvander@0
    54
        type->levels_ = 1;
dvander@0
    55
    else
dvander@0
    56
        type->levels_ = contained->levels() + 1;
dvander@0
    57
    return type;
dvander@0
    58
}