max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

fix(frontends/lean/structure_cmd): fixes #1347

Browse source
This commit is contained in:
Leonardo de Moura 2017-01-30 14:49:14 -08:00
parent d34386fef7
commit c09f60de6e
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/frontends/lean/structure_cmd.cpp
View file

@ -28,6 +28,7 @@ Author: Leonardo de Moura
#include "library/aliases.h"
#include "library/annotation.h"
#include "library/explicit.h"
#include "library/unfold_macros.h"
#include "library/protected.h"
#include "library/private.h"
#include "library/class.h"
@ -889,8 +890,10 @@ struct structure_cmd_fn {
args.push_back(local);
}
name decl_name = name(m_name + local_pp_name(field.first), "_default");
expr decl_type = Pi(args, mlocal_type(field.first));
expr decl_value = Fun(args, mk_explicit(*field.second));
/* TODO(Leo): add helper function for adding definition.
It should unfold_untrusted_macros */
expr decl_type = unfold_untrusted_macros(m_env, Pi(args, mlocal_type(field.first)));
expr decl_value = unfold_untrusted_macros(m_env, Fun(args, *field.second));
name_set used_univs;
used_univs = collect_univ_params(decl_value, used_univs);
used_univs = collect_univ_params(decl_type, used_univs);