1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
|
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2009 - DIGITEO - Allan CORNET
//
// This file is distributed under the same license as the Scilab package.
// =============================================================================
// <-- JVM NOT MANDATORY -->
// <-- Non-regression test for bug 4807 -->
//
// <-- Bugzilla URL -->
// http://bugzilla.scilab.org/show_bug.cgi?id=4807
//
// <-- Short Description -->
//strsubst does not check if second argument is a valid pattern when there is 'r' as
// fourth argument
//========================================================================================
ierr = execstr("strsubst(''pattern -- pattern __ pattern '',''pattern'',''replace'',''r'');","errcatch");
if ierr <> 999 then bugmes();quit;end
ierr = execstr("strsubst(''pattern -- pattern __ pattern '',''/pattern/'',''replace'',''r'');","errcatch");
if ierr <> 0 then bugmes();quit;end
|