#pragma once #include #include #include "type.hpp" struct type_env; using type_env_ptr = std::shared_ptr; struct type_env { type_env_ptr parent; std::map names; std::map type_names; type_env(type_env_ptr p) : parent(std::move(p)) {} type_env() : type_env(nullptr) {} type_scheme_ptr lookup(const std::string& name) const; type_ptr lookup_type(const std::string& name) const; void bind(const std::string& name, type_ptr t); void bind(const std::string& name, type_scheme_ptr t); void bind_type(const std::string& type_name, type_ptr t); void generalize(const std::string& name, type_mgr& mgr); }; type_env_ptr type_scope(type_env_ptr parent);