Mercurial > octave

diff liboctave/numeric/oct-rand.cc @ 18573:53ba52143af7 stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix dead assignment in oct-rand.cc do_float_scalar (bug #41827). * oct-rand.cc (do_float_scalar): Correctly assign temporary output to dretval.
author Branden Archer <b.m.archer4@gmail.com>
date Wed, 19 Mar 2014 20:46:39 -0400
parents 49a5a4be04a1
children 4197fc428c7d
line wrap: on
line diff
--- a/liboctave/numeric/oct-rand.cc	Wed Mar 19 23:23:50 2014 +0100
+++ b/liboctave/numeric/oct-rand.cc	Wed Mar 19 20:46:39 2014 -0400
@@ -455,7 +455,7 @@
 
         case gamma_dist:
           if (da <= 0.0 || ! xfinite (a))
-            retval = octave_NaN;
+            dretval = octave_NaN;
           else
             F77_FUNC (dgengam, DGENGAM) (1.0, da, dretval);
           break;