src/FixedArray.cpp
author David Anderson <dvander@alliedmods.net>
Tue Jan 01 15:34:07 2013 -0800 (2013-01-01)
changeset 251 ca99a81745fe
parent 188 bab29bcec7fe
child 258 241d082d6d89
permissions -rw-r--r--
Refactor compilation process around the new concept of packages.
dvander@12
     1
/*
dvander@12
     2
 * Copyright (C) 2012 David Anderson
dvander@12
     3
 *
dvander@12
     4
 * This file is part of JITCraft.
dvander@12
     5
 *
dvander@12
     6
 * JITCraft is free software: you can redistribute it and/or modify it under
dvander@12
     7
 * the terms of the GNU General Public License as published by the Free
dvander@12
     8
 * Software Foundation, either version 3 of the License, or (at your option)
dvander@12
     9
 * any later version.
dvander@12
    10
 * 
dvander@12
    11
 * Foobar is distributed in the hope that it will be useful, but WITHOUT ANY
dvander@12
    12
 * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
dvander@12
    13
 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
dvander@12
    14
 *
dvander@12
    15
 * You should have received a copy of the GNU General Public License along with
dvander@12
    16
 * JITCraft. If not, see http://www.gnu.org/licenses/.
dvander@12
    17
 */
dvander@12
    18
#include <limits.h>
danderson@91
    19
#include <string.h>
dvander@12
    20
#include "FixedArray.h"
dvander@12
    21
#include "Zone.h"
dvander@28
    22
#include "Heap-inl.h"
dvander@12
    23
dvander@59
    24
using namespace ke;
dvander@12
    25
dvander@59
    26
static const unsigned kMaxFixedArrayLength = ((INT_MAX - sizeof(FixedArray)) / sizeof(ke::Object *));
dvander@12
    27
dvander@12
    28
FixedArray *
dvander@12
    29
FixedArray::New(Zone *zone, unsigned length, Heap::Tenure tenure)
dvander@12
    30
{
dvander@12
    31
    if (length >= kMaxFixedArrayLength) {
dvander@69
    32
        zone->reportError(Message_ArrayTooBig);
dvander@12
    33
        return NULL;
dvander@12
    34
    }
dvander@12
    35
dvander@35
    36
    Local<FixedArray> array(zone, FixedArray::cast(zone->allocate(MapKind_FixedArray, SizeFor(length), tenure)));
dvander@35
    37
    if (!array)
dvander@12
    38
        return NULL;
dvander@12
    39
dvander@13
    40
    array->length_ = length;
dvander@53
    41
    memset(array->vec(), 0, length * sizeof(Object *));
dvander@12
    42
    return array;
dvander@12
    43
}
dvander@12
    44
dvander@12
    45
ByteArray *
dvander@12
    46
ByteArray::New(Zone *zone, unsigned length, Heap::Tenure tenure)
dvander@12
    47
{
dvander@12
    48
    if (length >= kMaxFixedArrayLength) {
dvander@69
    49
        zone->reportError(Message_ArrayTooBig);
dvander@12
    50
        return NULL;
dvander@12
    51
    }
dvander@12
    52
dvander@35
    53
    Local<ByteArray> array(zone, ByteArray::cast(zone->allocate(MapKind_ByteArray, SizeFor(length), tenure)));
dvander@35
    54
    if (!array)
dvander@12
    55
        return NULL;
dvander@12
    56
dvander@13
    57
    array->length_ = length;
dvander@53
    58
    memset(array->raw(), 0, length);
dvander@12
    59
    return array;
dvander@12
    60
}
dvander@12
    61
dvander@85
    62
ByteArray *
dvander@85
    63
ByteArray::New(Zone *zone, Handle<Map> map, unsigned length, Heap::Tenure tenure)
dvander@85
    64
{
dvander@85
    65
    if (length >= kMaxFixedArrayLength) {
dvander@85
    66
        zone->reportError(Message_ArrayTooBig);
dvander@85
    67
        return NULL;
dvander@85
    68
    }
dvander@85
    69
dvander@85
    70
    Local<ByteArray> array(zone, ByteArray::cast(zone->allocate(map, SizeFor(length), tenure)));
dvander@85
    71
    if (!array)
dvander@85
    72
        return NULL;
dvander@85
    73
dvander@85
    74
    array->length_ = length;
dvander@85
    75
    memset(array->raw(), 0, length);
dvander@85
    76
    return array;
dvander@85
    77
}
dvander@188
    78