#include "ast.hpp" #include "parser.hpp" #include "type.hpp" #include void yy::parser::error(const std::string& msg) { std::cout << "An error occured: " << msg << std::endl; } extern std::vector program; void typecheck_program(const std::vector& prog) { type_mgr mgr; type_env env; type_ptr int_type = type_ptr(new type_base("Int")); type_ptr binop_type = type_ptr(new type_arr( int_type, type_ptr(new type_arr(int_type, int_type)))); env.bind("+", binop_type); env.bind("-", binop_type); env.bind("*", binop_type); env.bind("/", binop_type); for(auto& def : prog) { def->typecheck_first(mgr, env); } for(auto& def : prog) { def->typecheck_second(mgr, env); } for(auto& pair : env.names) { std::cout << pair.first << ": "; pair.second->print(mgr, std::cout); std::cout << std::endl; } } int main() { yy::parser parser; parser.parse(); for(auto& definition : program) { definition_defn* def = dynamic_cast(definition.get()); if(!def) continue; std::cout << def->name; for(auto& param : def->params) std::cout << " " << param; std::cout << ":" << std::endl; def->body->print(1, std::cout); } typecheck_program(program); std::cout << program.size() << std::endl; }