1// ============================================================================= 2// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab 3// Copyright (C) ????-2008 - INRIA 4// 5// This file is distributed under the same license as the Scilab package. 6// ============================================================================= 7 8// <-- CLI SHELL MODE --> 9 10// <-- Non-regression test for bug 654 --> 11// 12// <-- Bugzilla URL --> 13// http://bugzilla.scilab.org/show_bug.cgi?id=654 14// 15// <-- Short Description --> 16// listfiles(getenv('SCI')+"/tcl") gives wrong result. 17// 18// - or the syntax is accepted and the result should be correct 19// - or an error message should be displayed 20// 21// of course listfiles(getenv('SCI')+"/tcl/") is OK 22 23if or( listfiles(getenv('SCI')+"/modules/tclsci") <> listfiles(getenv('SCI')+"/modules/tclsci/") ) then pause,end 24