Mercurial > octave

changeset 24920:9773b7ae807c stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed typos in __gammainc_lentz__.cc -- changed libinterp/corefcn/__gammainc_lentz__.cc
author Michele Ginesi <michele.ginesi@gmail.com>
date Wed, 21 Feb 2018 23:16:21 +0100
parents ed6f6bbed604
children 6b33ee8aad0f
files libinterp/corefcn/__gammainc_lentz__.cc
diffstat 1 files changed, 3 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/libinterp/corefcn/__gammainc_lentz__.cc	Wed Feb 21 23:13:26 2018 +0100
+++ b/libinterp/corefcn/__gammainc_lentz__.cc	Wed Feb 21 23:16:21 2018 +0100
@@ -62,8 +62,7 @@
           if (len_x == 1)
             x.fill (x_arg(0));
           else
-          x = x_arg;
-          //
+            x = x_arg;
           if (len_a == 1)
             a.fill (a_arg(0));
           else
@@ -98,8 +97,8 @@
                 }
               if (! error_state)
                   f(ii) = y;
-              outargs(0) = f;
             }
+          outargs(0) = f;
         }
       else
         {
@@ -111,7 +110,6 @@
             x_s.fill (x_arg_s(0));
           else
           x_s = x_arg_s;
-          //
           if (len_a == 1)
             a_s.fill (a_arg_s(0));
           else
@@ -146,8 +144,8 @@
                 }
               if (! error_state)
                   f(ii) = y;
-              outargs(0) = f;
             }
+          outargs(0) = f;
         }
     }
   return octave_value (outargs);