Mercurial > octave

changeset 22950:f2fae9bd5cec

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* randpoisson.cc: Fix dlgams call to match prototype.
author John W. Eaton <jwe@octave.org>
date Mon, 26 Dec 2016 21:16:01 -0500
parents 8b56cd9867aa
children 2e6a327e7903
files liboctave/numeric/randpoisson.cc
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/liboctave/numeric/randpoisson.cc	Mon Dec 26 21:13:09 2016 -0500
+++ b/liboctave/numeric/randpoisson.cc	Mon Dec 26 21:16:01 2016 -0500
@@ -63,7 +63,7 @@
   else if (x <= 0 || lo_ieee_isinf (x))
     result = octave_Inf;
   else
-    F77_XFCN (dlgams, DLGAMS, (&x, &result, &sgngam));
+    F77_XFCN (dlgams, DLGAMS, (x, result, sgngam));
 #endif
   return result;
 }