aboutsummaryrefslogtreecommitdiffhomepage
path: root/kernel/nativecode.mli
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/nativecode.mli')
-rw-r--r--kernel/nativecode.mli12
1 files changed, 8 insertions, 4 deletions
diff --git a/kernel/nativecode.mli b/kernel/nativecode.mli
index 0f01ae80e..9e35dbd1b 100644
--- a/kernel/nativecode.mli
+++ b/kernel/nativecode.mli
@@ -24,6 +24,8 @@ val mk_open : string -> global
type symbol
+val clear_symb_tbl : unit -> unit
+
val get_value : symbol array -> int -> Nativevalues.t
val get_sort : symbol array -> int -> sorts
@@ -47,14 +49,14 @@ val empty_updates : code_location_updates
val register_native_file : string -> unit
val compile_constant_field : env -> string -> constant ->
- global list * symbol list * code_location_updates ->
+ global list * code_location_updates ->
constant_body ->
- global list * symbol list * code_location_updates
+ global list * code_location_updates
val compile_mind_field : string -> module_path -> label ->
- global list * symbol list * code_location_updates ->
+ global list * code_location_updates ->
mutual_inductive_body ->
- global list * symbol list * code_location_updates
+ global list * code_location_updates
val mk_conv_code : env -> string -> constr -> constr -> linkable_code
val mk_norm_code : env -> string -> constr -> linkable_code
@@ -64,3 +66,5 @@ val mk_library_header : dir_path -> global list
val mod_uid_of_dirpath : dir_path -> string
val update_locations : code_location_updates -> unit
+
+val add_header_comment : global list -> string -> global list