From 7b1411db7c54e083500a85425a805cca9c0f5b67 Mon Sep 17 00:00:00 2001
From: stepan <stepan.sindelar@oracle.com>
Date: Tue, 23 Jan 2018 17:21:23 +0100
Subject: [PATCH] Fix NFI signature of dpstrf in NativeFunctions
---
.../src/com/oracle/truffle/r/runtime/ffi/NativeFunction.java | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/ffi/NativeFunction.java b/com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/ffi/NativeFunction.java
index eba4ea1a41..77e64b651b 100644
--- a/com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/ffi/NativeFunction.java
+++ b/com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/ffi/NativeFunction.java
@@ -62,7 +62,7 @@ public enum NativeFunction {
dgetrf("(sint32, sint32, [double], sint32, [sint32]) : sint32", "call_lapack_"),
dpotrf("(uint8, sint32, [double], sint32) : sint32", "call_lapack_"),
dpotri("(uint8, sint32, [double], sint32) : sint32", "call_lapack_"),
- dpstrf("uint8, sint32, [double], sint32, [sint32], [sint32], double, [double]) : sint32", "call_lapack_"),
+ dpstrf("(uint8, sint32, [double], sint32, [sint32], [sint32], double, [double]) : sint32", "call_lapack_"),
dgesv("(sint32, sint32, [double], sint32, [sint32], [double], sint32) : sint32", "call_lapack_"),
dgesdd("(uint8, sint32, sint32, [double], sint32, [double], [double], sint32, [double], sint32, [double], sint32, [sint32]) : sint32", "call_lapack_"),
dlange("(uint8, sint32, sint32, [double], sint32, [double]) : double", "call_lapack_"),
--
GitLab