#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);

f->do_oop((HiObject **) &co->_file_path);

}

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, HiString *file_path) :

_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),

_file_path(file_path){

set_klass(CodeKlass::get_instance());

}