# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1510154504 18000
# Node ID affd98ae79ef71968cdbb8ec89f9df0a613a0dbd
# Parent  140f1403d6035d73836c73c18c772c7b1bebc4c1
correctly parse dasrt arguments

* dasrt.cc (Fdasrt): Increment argument index after extracting state
vector value.  Bug introduced in 85e5efae848a.

diff -r 140f1403d603 -r affd98ae79ef libinterp/corefcn/dasrt.cc
--- a/libinterp/corefcn/dasrt.cc	Mon Nov 06 13:24:15 2017 +0100
+++ b/libinterp/corefcn/dasrt.cc	Wed Nov 08 10:21:44 2017 -0500
@@ -485,13 +485,11 @@
       func.set_constraint_function (dasrt_user_cf);
     }
 
-  ColumnVector state = args(argp).xvector_value ("dasrt: initial state X_0 must be a vector");
+  ColumnVector state = args(argp++).xvector_value ("dasrt: initial state X_0 must be a vector");
 
-  ColumnVector stateprime = args(argp).xvector_value ("dasrt: initial derivatives XDOT_0 must be a vector");
-  argp++;
+  ColumnVector stateprime = args(argp++).xvector_value ("dasrt: initial derivatives XDOT_0 must be a vector");
 
-  ColumnVector out_times = args(argp).xvector_value ("dasrt: output time variable T must be a vector");
-  argp++;
+  ColumnVector out_times = args(argp++).xvector_value ("dasrt: output time variable T must be a vector");
 
   double tzero = out_times (0);