@@ -476,8 +476,8 @@ function native_llvm_module(funcs::Array; mangle_names = false, kwargs...)
476476 return mod
477477end
478478
479- function generate_obj (funcs:: Array , path:: String = tempname (), filenamebase:: String = " obj" ,
480- mangle_names = false ;
479+ function generate_obj (funcs:: Array , path:: String = tempname (), filenamebase:: String = " obj" ;
480+ mangle_names = false ,
481481 strip_llvm = false ,
482482 strip_asm = true ,
483483 opt_level= 3 ,
@@ -486,19 +486,19 @@ function generate_obj(funcs::Array, path::String = tempname(), filenamebase::Str
486486 mkpath (path)
487487 obj_path = joinpath (path, " $filenamebase .o" )
488488 fakejob, kwargs = native_job (f,tt, kwargs... )
489- mod = native_llvm_module (funcs, mangle_names, kwargs... )
489+ mod = native_llvm_module (funcs; mangle_names = mangle_names, kwargs... )
490490 obj, _ = GPUCompiler. emit_asm (fakejob, mod; strip= strip_asm, validate= false , format= LLVM. API. LLVMObjectFile)
491491 open (obj_path, " w" ) do io
492492 write (io, obj)
493493 end
494494 path, obj_path
495495end
496496
497- function generate_shlib (funcs:: Array , path:: String = tempname (), filename:: String = " libfoo" , mangle_names= false ; kwargs... )
497+ function generate_shlib (funcs:: Array , path:: String = tempname (), filename:: String = " libfoo" ; mangle_names= false , kwargs... )
498498
499499 lib_path = joinpath (path, " $filename .$(Libdl. dlext) " )
500500
501- _,obj_path = generate_obj (funcs, path, mangle_names, kwargs... )
501+ _,obj_path = generate_obj (funcs, path, filename; mangle_names = mangle_names, kwargs... )
502502 # Pick a Clang
503503 cc = Sys. isapple () ? ` cc` : clang ()
504504 # Compile!
@@ -523,7 +523,7 @@ function compile_shlib(funcs::Array, path::String="./";
523523# Would be nice to use a compiler pass or something to check if there are any heap allocations or references to globals
524524# Keep an eye on https://github.com/JuliaLang/julia/pull/43747 for this
525525
526- generate_shlib (funcs, path, filename, mangle_names, kwargs... )
526+ generate_shlib (funcs, path, filename; mangle_names = mangle_names, kwargs... )
527527
528528 joinpath (abspath (path), filename * " ." * Libdl. dlext)
529529end
0 commit comments