Merge pull request #254 from maleadt/tb/asmcall_types

Allow literal types with at-asmcall.

Author: maleadt

src/interop/asmcall.jl

@@ -39,7 +39,8 @@ arguments as a tuple-type in `argtyp`.
 :(@asmcall)
 
 macro asmcall(asm::String, constraints::String, side_effects::Bool,
-              rettyp::Union{Expr,Symbol}=:(Nothing), argtyp::Expr=:(Tuple{}), args...)
+              rettyp::Union{Expr,Symbol,Type}=:(Nothing),
+              argtyp::Union{Expr,Type}=:(Tuple{}), args...)
     asm_val = Val{Symbol(asm)}()
     constraints_val = Val{Symbol(constraints)}()
     return esc(:(LLVM.Interop._asmcall($asm_val, $constraints_val,
@@ -49,12 +50,14 @@ end
 
 # shorthand: no side_effects
 macro asmcall(asm::String, constraints::String,
-              rettyp::Union{Expr,Symbol}=:(Nothing), argtyp::Expr=:(Tuple{}), args...)
+              rettyp::Union{Expr,Symbol,Type}=:(Nothing),
+              argtyp::Union{Expr,Type}=:(Tuple{}), args...)
     esc(:(LLVM.Interop.@asmcall $asm $constraints false $rettyp $argtyp $(args...)))
 end
 
 # shorthand: no side_effects or constraints
 macro asmcall(asm::String,
-              rettyp::Union{Expr,Symbol}=:(Nothing), argtyp::Expr=:(Tuple{}), args...)
+              rettyp::Union{Expr,Symbol,Type}=:(Nothing),
+              argtyp::Union{Expr,Type}=:(Tuple{}), args...)
     esc(:(LLVM.Interop.@asmcall $asm "" $rettyp $argtyp $(args...)))
 end