jitcraft/Strings.cpp
author David Anderson <dvander@alliedmods.net>
Sat Jul 07 20:28:29 2012 -0700 (2012-07-07)
changeset 54 8e22792a3921
child 59 b7d61ddb3c8d
permissions -rw-r--r--
Convert Name and StringPool to a GC-safe symbol table.
dvander@54
     1
/* vim: set ts=4 sw=4 tw=99 et:
dvander@54
     2
 *
dvander@54
     3
 * Copyright (C) 2012 David Anderson
dvander@54
     4
 *
dvander@54
     5
 * This file is part of JITCraft.
dvander@54
     6
 *
dvander@54
     7
 * JITCraft is free software: you can redistribute it and/or modify it under
dvander@54
     8
 * the terms of the GNU General Public License as published by the Free
dvander@54
     9
 * Software Foundation, either version 3 of the License, or (at your option)
dvander@54
    10
 * any later version.
dvander@54
    11
 * 
dvander@54
    12
 * Foobar is distributed in the hope that it will be useful, but WITHOUT ANY
dvander@54
    13
 * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
dvander@54
    14
 * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
dvander@54
    15
 *
dvander@54
    16
 * You should have received a copy of the GNU General Public License along with
dvander@54
    17
 * JITCraft. If not, see http://www.gnu.org/licenses/.
dvander@54
    18
 */
dvander@54
    19
#include "Strings.h"
dvander@54
    20
#include "Zone.h"
dvander@54
    21
#include "Heap-inl.h"
dvander@54
    22
dvander@54
    23
using namespace jc;
dvander@54
    24
dvander@54
    25
String *
dvander@54
    26
String::New(Zone *zone, const char *from, Heap::Tenure tenure)
dvander@54
    27
{
dvander@54
    28
    return New(zone, from, strlen(from), tenure);
dvander@54
    29
}
dvander@54
    30
dvander@54
    31
String *
dvander@54
    32
String::New(Zone *zone, const char *from, size_t length, Heap::Tenure tenure)
dvander@54
    33
{
dvander@54
    34
    size_t bytes = SizeFor(length);
dvander@54
    35
    Local<String> string(zone, String::cast(zone->allocate(MapKind_String, bytes, tenure)));
dvander@54
    36
    if (!string)
dvander@54
    37
        return NULL;
dvander@54
    38
dvander@54
    39
    string->length_ = length;
dvander@54
    40
    memcpy(string->chars(), from, length + 1);
dvander@54
    41
dvander@54
    42
    return string;
dvander@54
    43
}