Require mangled names for global variables.

This commit is contained in:
Danila Fedorin 2020-09-15 14:39:31 -07:00
parent 03465c07ce
commit 18aac4c8fd
3 changed files with 8 additions and 12 deletions

View File

@ -55,15 +55,11 @@ void ast_lid::translate(global_scope& scope) {
}
void ast_lid::compile(const env_ptr& env, std::vector<instruction_ptr>& into) const {
auto mangled_name = this->env->get_mangled_name(id);
// Local names shouldn't need mangling.
assert(!(mangled_name != id && !this->env->is_global(id)));
into.push_back(instruction_ptr(
(env->has_variable(mangled_name) && !this->env->is_global(id)) ?
(instruction*) new instruction_push(env->get_offset(id)) :
(instruction*) new instruction_pushglobal(mangled_name)));
(this->env->is_global(id)) ?
(instruction*) new instruction_pushglobal(id) :
(instruction*) new instruction_push(
env->get_offset(this->env->get_mangled_name(id)))));
}
void ast_uid::print(int indent, std::ostream& to) const {

View File

@ -3,7 +3,7 @@
int env_var::get_offset(const std::string& name) const {
if(name == this->name) return 0;
assert(parent);
assert(parent != nullptr);
return parent->get_offset(name) + 1;
}
@ -14,7 +14,7 @@ bool env_var::has_variable(const std::string& name) const {
}
int env_offset::get_offset(const std::string& name) const {
assert(parent);
assert(parent != nullptr);
return parent->get_offset(name) + offset;
}

View File

@ -46,8 +46,8 @@ const std::string& type_env::get_mangled_name(const std::string& name) const {
auto it = names.find(name);
if(it != names.end())
return (it->second.mangled_name != "") ? it->second.mangled_name : name;
if(parent) return parent->get_mangled_name(name);
return name;
assert(parent != nullptr);
return parent->get_mangled_name(name);
}
type_ptr type_env::lookup_type(const std::string& name) const {