diff options
| author | coqbot-app[bot] | 2020-11-10 08:56:03 +0000 |
|---|---|---|
| committer | GitHub | 2020-11-10 08:56:03 +0000 |
| commit | 449aef5dea7314f3bf4311380aa10c5cf0c3a158 (patch) | |
| tree | 81191c6eed316b32aedcd4e4a988edbd685b9f22 /kernel/nativelib.mli | |
| parent | e38d3bac150b709ffbbe6115723ce97177ace638 (diff) | |
| parent | fb5aa52ab8d870ee3613de325fbab7c98c33a433 (diff) | |
Merge PR #13297: Remove the native symbol registering from the safe environment.
Reviewed-by: SkySkimmer
Diffstat (limited to 'kernel/nativelib.mli')
| -rw-r--r-- | kernel/nativelib.mli | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/kernel/nativelib.mli b/kernel/nativelib.mli index 29b4d20197..0c0fe3acc9 100644 --- a/kernel/nativelib.mli +++ b/kernel/nativelib.mli @@ -27,27 +27,24 @@ val get_ml_filename : unit -> string * string whether are in byte mode or not; file is expected to be .ml file *) val compile : string -> global list -> profile:bool -> string -(** [compile_library lib code file] is similar to [compile file code] +type native_library = Nativecode.global list * Nativevalues.symbols + +(** [compile_library (code, _) file] is similar to [compile file code] but will perform some extra tweaks to handle [code] as a Coq lib. *) -val compile_library : Names.DirPath.t -> global list -> string -> unit +val compile_library : native_library -> string -> unit val call_linker : ?fatal:bool - -> Environ.env -> prefix:string -> string -> code_location_updates option -> unit val link_library - : Environ.env - -> prefix:string + : prefix:string -> dirname:string -> basename:string -> unit val rt1 : Nativevalues.t ref val rt2 : Nativevalues.t ref - -val get_library_native_symbols : Names.DirPath.t -> Nativevalues.symbols -(** Strictly for usage by code produced by native compute. *) |