exception Error of string
-(** [link_modules dst src mode] links [src] into [dst], raising [Error]
- if the linking fails. *)
-val link_modules : Llvm.llmodule -> Llvm.llmodule -> unit
\ No newline at end of file
+(** [link_modules' dst src] links [src] into [dst], raising [Error]
+ if the linking fails. The src module is destroyed. *)
+val link_modules' : Llvm.llmodule -> Llvm.llmodule -> unit
\ No newline at end of file