#include "code/codeObject.hpp"
#include "object/hiString.hpp"
#include "memory/heap.hpp"
#include "memory/oopClosure.hpp"

CodeKlass* CodeKlass::instance = NULL;

CodeKlass* CodeKlass::get_instance() {
    if (instance == NULL) {
        instance = new CodeKlass();
    }

    return instance;
}

CodeKlass::CodeKlass() {
    set_name(new HiString("code"));
    add_super(ObjectKlass::get_instance());
    HiTypeObject* dict_type_obj = new HiTypeObject();
    set_type_object(dict_type_obj);
}

void CodeKlass::oops_do(OopClosure* f, HiObject* obj) {
    CodeObject* co = (CodeObject*) obj;
    assert(co && co->klass() == (Klass*)this);

    f->do_oop((HiObject**)&co->_bytecodes);
    f->do_array_list(&co->_names);
    f->do_array_list(&co->_consts);
    f->do_array_list(&co->_var_names);
    f->do_array_list(&co->_free_vars);
    f->do_array_list(&co->_cell_vars);
    f->do_oop((HiObject**)&co->_co_name);
    f->do_oop((HiObject**)&co->_file_name);
    f->do_oop((HiObject**)&co->_notable);
}

size_t CodeKlass::size() {
    return sizeof(CodeObject);
}

CodeObject::CodeObject(int argcount, int nlocals, int stacksize, int flag, HiString* bytecodes,
    ArrayList<HiObject*>* consts, ArrayList<HiObject*>* names, ArrayList<HiObject*>* varnames, 
    ArrayList<HiObject*>* freevars, ArrayList<HiObject*>* cellvars,
    HiString* file_name, HiString* co_name, int lineno, HiString* notable):
        _argcount(argcount),
        _nlocals(nlocals),
        _stack_size(stacksize),
        _flag(flag),
        _bytecodes(bytecodes),
        _names(names),
        _consts(consts),
        _var_names(varnames),
        _free_vars(freevars),
        _cell_vars(cellvars),
        _co_name(co_name),
        _file_name(file_name),
        _lineno(lineno),
        _notable(notable){
    set_klass(CodeKlass::get_instance());
}