diff options
Diffstat (limited to 'src/ortho/llvm6')
| -rw-r--r-- | src/ortho/llvm6/llvm-cbindings.cpp | 8 | ||||
| -rw-r--r-- | src/ortho/llvm6/ortho_llvm.private.ads | 1 |
2 files changed, 8 insertions, 1 deletions
diff --git a/src/ortho/llvm6/llvm-cbindings.cpp b/src/ortho/llvm6/llvm-cbindings.cpp index 2b8c83e85..a6f78df62 100644 --- a/src/ortho/llvm6/llvm-cbindings.cpp +++ b/src/ortho/llvm6/llvm-cbindings.cpp @@ -1959,7 +1959,7 @@ new_dyadic_op (ONOpKind Kind, OEnode Left, OEnode Right) } extern "C" OEnode -new_convert_ov (OEnode Val, OTnode Rtype) +new_convert (OEnode Val, OTnode Rtype) { if (Unreach) { return {nullptr, Rtype}; @@ -2042,6 +2042,12 @@ new_convert_ov (OEnode Val, OTnode Rtype) } extern "C" OEnode +new_convert_ov (OEnode Val, OTnode Rtype) +{ + return new_convert(Val, Rtype); +} + +extern "C" OEnode new_alloca (OTnode Rtype, OEnode Size) { LLVMValueRef Res; diff --git a/src/ortho/llvm6/ortho_llvm.private.ads b/src/ortho/llvm6/ortho_llvm.private.ads index 6a4c80b98..173855912 100644 --- a/src/ortho/llvm6/ortho_llvm.private.ads +++ b/src/ortho/llvm6/ortho_llvm.private.ads @@ -326,6 +326,7 @@ private pragma Import (C, New_Compare_Op); pragma Import (C, New_Convert_Ov); + pragma Import (C, New_Convert); pragma Import (C, New_Alloca); pragma Import (C, New_Signed_Literal); |