[Octave-bug-tracker] [bug #52067] dconv2.f out of bound

[Dmitri A. Sergatskov]

URL:
  <http://savannah.gnu.org/bugs/?52067>

                 Summary: dconv2.f out of bound
                 Project: GNU Octave
            Submitted by: dasergatskov
            Submitted on: Wed 20 Sep 2017 05:54:53 AM UTC
                Category: Octave Function
                Severity: 3 - Normal
                Priority: 5 - Normal
              Item Group: Segfault, Bus Error, etc.
                  Status: None
             Assigned to: None
         Originator Name: 
        Originator Email: 
             Open/Closed: Open
         Discussion Lock: Any
                 Release: dev
        Operating System: Any

    _______________________________________________________

Details:

I re-compiled octave with FFLAGS=-fbounds-check and the first 
test that fails is:


octave:1> test libinterp/corefcn/conv2.cc-tst verbose
>>>>> /home/dima/src/octave/gcc_fbounds/libinterp/corefcn/conv2.cc-tst
***** test
 c = [0,1,2,3;1,8,12,12;4,20,24,21;7,22,25,18];
 assert (conv2 ([0,1;1,2], [1,2,3;4,5,6;7,8,9]), c);
***** test
 c = single ([0,1,2,3;1,8,12,12;4,20,24,21;7,22,25,18]);
 assert (conv2 (single ([0,1;1,2]), single ([1,2,3;4,5,6;7,8,9])), c);
***** test
 c = [1,4,4;5,18,16;14,48,40;19,62,48;15,48,36];
 assert (conv2 (1:3, 1:2, [1,2;3,4;5,6]), c);
***** assert (conv2 (1:3, 1:2, [1,2;3,4;5,6], "full"),
        conv2 (1:3, 1:2, [1,2;3,4;5,6]));
***** shared A, B, C
 A = rand (3, 4);
 B = rand (4);
 C = conv2 (A, B);
***** assert (conv2 (A,B, "full"), C)
***** assert (conv2 (A,B, "same"), C(3:5,3:6))
***** assert (conv2 (A,B, "valid"), zeros (0, 1))
At line 73 of file ../liboctave/external/blas-xtra/dconv2.f
Fortran runtime error: Index '4' of dimension 1 of array 'a' above upper bound
of 3


Dmitri.
-- 





    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?52067>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/