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 eba4ea1a41ca2217fdbbadb1331d2d8d851f8384..77e64b651b6fc773256b0342f1bd56ea5ada3f35 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_"),