diff options
Diffstat (limited to 'kernel/vm.ml')
-rw-r--r-- | kernel/vm.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/kernel/vm.ml b/kernel/vm.ml index 160575ac7..d7eedc226 100644 --- a/kernel/vm.ml +++ b/kernel/vm.ml @@ -42,11 +42,11 @@ external push_vstack : vstack -> int -> unit = "coq_push_vstack" (* interpreteur *) -external coq_interprete : tcode -> values -> vm_global -> vm_env -> int -> values = - "coq_interprete_ml" +external coq_interprete : tcode -> values -> atom array -> vm_global -> vm_env -> int -> values = + "coq_interprete_byte" "coq_interprete_ml" let interprete code v env k = - coq_interprete code v (Csymtable.get_global_data ()) env k + coq_interprete code v (get_atom_rel ()) (Csymtable.get_global_data ()) env k (* Functions over arguments *) |