scope.cpp

/* ollieberzs 2018
** scope.cpp
** scope to hold named stuff
*/

#include <iostream>
#include "oca.hpp"

OCA_BEGIN

Scope::Scope(Scope* parent) : parent(parent) {}

// ----------------------------

void Scope::set(const std::string& name, ValuePtr value, bool pub) {
    uint index = 0;
    for (index = 0; index < vars.size(); ++index) {
        auto var = vars.at(index);
        if (var.name == name)
            break;
    }

    auto copy = value->copy();
    if (!copy)
        copy = value;
    copy->scope.parent = this;

    if (vars.size() > index && vars[index].value)
        vars[index] = {vars[index].publicity, name, copy};
    else
        vars.push_back({pub, name, copy});
}

bool Scope::remove(const std::string& name) {
    for (uint i = 0; i < vars.size(); ++i) {
        if (vars[i].name == name) {
            vars.erase(vars.begin() + i);
            return true;
            break;
        }
    }
    return false;
}

ValuePtr Scope::get(const std::string& name, bool super) {
    ValuePtr val = Nil::in(this);
    for (auto& var : vars) {
        if (var.name == name) {
            val = var.value;
            if (!super && !var.publicity)
                throw Error(NOT_PUBLIC);
            break;
        }
    }
    return val;
}

std::string Scope::get(ValuePtr value) {
    for (auto& var : vars) {
        if (var.value.get() == value.get())
            return var.name;
    }
    return "";
}

void Scope::add(const Scope& scope) {
    for (auto var : scope.vars) {
        set(var.name, var.value, true);
    }
}

// -----------------------------

void Scope::print() {
    std::string out = "{";
    for (auto& var : vars) {
        if (!var.publicity)
            out += "[";
        out += var.name;
        if (!var.publicity)
            out += "]";
        out += " ";
    }
    if (out.size() > 1)
        out.pop_back();
    out += "}";
    std::cout << out << "\n";
}

OCA_END