src/Modules.cpp
author David Anderson <dvander@alliedmods.net>
Sat Aug 04 19:33:06 2012 -0700 (2012-08-04)
changeset 147 9c544823d090
parent 86 32ad0523b309
child 195 c1ba166f3fc4
permissions -rw-r--r--
Structure declaration support.
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 "Modules.h"
dvander@14
    19
#include "Zone.h"
dvander@14
    20
#include "Heap.h"
dvander@14
    21
#include "Heap-inl.h"
dvander@0
    22
dvander@59
    23
using namespace ke;
dvander@0
    24
dvander@14
    25
Module *
dvander@14
    26
Module::New(Zone *zone, unsigned nfunctions)
dvander@0
    27
{
dvander@36
    28
    Local<Module> module(zone, Module::cast(zone->allocate(MapKind_Module, sizeof(Module), Heap::Tenure_Old)));
dvander@14
    29
    if (!module)
dvander@14
    30
        return NULL;
dvander@14
    31
dvander@36
    32
    Local<FixedArray> functions(zone, FixedArray::New(zone, nfunctions, Heap::Tenure_Old));
dvander@14
    33
    if (!functions)
dvander@14
    34
        return NULL;
dvander@14
    35
dvander@14
    36
    module->functions_ = functions;
dvander@70
    37
    module->file_ = NULL;
dvander@64
    38
    module->publics_ = NULL;
dvander@68
    39
    module->natives_ = NULL;
dvander@85
    40
    module->environment_ = NULL;
dvander@68
    41
    module->nativeIdentity_ = NULL;
dvander@14
    42
    return module;
dvander@0
    43
}