1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2010 - DIGITEO - Allan CORNET
//
// This file is distributed under the same license as the Scilab package.
// =============================================================================
// <-- JVM NOT MANDATORY -->
// <-- Non-regression test for bug 7312 -->
//
// <-- Bugzilla URL -->
// http://bugzilla.scilab.org/show_bug.cgi?id=7312
//
// <-- Short Description -->
// strstr crashed scilab if the second input argument was longer than the first one.
if execstr("r = strstr(""small"", ""largestring"")", "errcatch") <> 0 then bugmes();quit;end
if r <> "" then bugmes();quit;end
r = strstr(["a","b";"c","d"], "largestring");
ref = emptystr(2, 2);
if or(r <> ref) then bugmes();quit;end
|
