gdb/guile: Do not error when trying to create empty array.
authorJoel Brobecker <brobecker@adacore.com>
Tue, 6 Jan 2015 14:37:53 +0000 (18:37 +0400)
committerJoel Brobecker <brobecker@adacore.com>
Tue, 6 Jan 2015 15:09:54 +0000 (19:09 +0400)
commitfce10a8494efa8faec67b718f25e06d3d71694b3
treee7240e5e692dbb18a13cff70c7307ab9599d01ce
parent8503d6e1e564cb5ac61bc6e3f16c0b384c76661e
gdb/guile: Do not error when trying to create empty array.

This fixes a similar error as in the Python support code where
trying to create an empty array.

In guile/scm-type.c::tyscm_array_1, the funtion raises an exception
if N2 < N1:

   if (n2 < n1)
     {
       gdbscm_out_of_range_error (func_name, SCM_ARG3,

But it should be doing so if N2 == N1 - 1, since that would simply
be an empty array, not an array with a negative length.

gdb/ChangeLog:

        * guile/scm-type.c (tyscm_array_1): Do not raise out-of-range
        error if N2 is equal to N1 - 1.
gdb/ChangeLog
gdb/guile/scm-type.c