let basic_index_eq uri
~refresh_uri_in_universe
~refresh_uri_in_term
- = index_eq uri
+ = index_eq (NCicLibrary.refresh_uri uri)
in
NCicLibrary.Serializer.register#run "index_eq"
object(_ : 'a NCicLibrary.register_type)
let rec aux f (text, prefix_len, tac) =
match tac with
| GrafiteAst.NApply (_loc, t) -> NTactics.apply_tac (text,prefix_len,t)
+ | GrafiteAst.NSmartApply (_loc, t) ->
+ NnAuto.smart_apply_tac (text,prefix_len,t)
| GrafiteAst.NAssert (_loc, seqs) ->
NTactics.assert_tac
((List.map