diff options
Diffstat (limited to 'kernel/nativecode.ml')
-rw-r--r-- | kernel/nativecode.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/nativecode.ml b/kernel/nativecode.ml index 04a063044..7b878c53e 100644 --- a/kernel/nativecode.ml +++ b/kernel/nativecode.ml @@ -1440,7 +1440,7 @@ let compile_constant_field env prefix con (code, symb, (mupds, cupds)) cb = gl@code, !symbols_list, (mupds, cupds) let compile_mind_field prefix mp l (code, symb, (mupds, cupds)) mb = - let mind = make_mind mp empty_dirpath l in + let mind = MutInd.make2 mp l in reset_symbols_list symb; let code, upd = compile_mind prefix mb mind code in let mupds = Mindmap_env.add mind upd mupds in |