bug 14821: getio function added.
[scilab.git] / scilab / modules / io / tests / nonreg_tests / bug_14821.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2016 - Scilab Enterprises - Adeline CARNIS
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- Non-regression test for bug 14821 -->
8 //
9 // <-- Bugzilla URL -->
10 // http://bugzilla.scilab.org/14821
11 //
12 // <-- Short Description -->
13 // getio function has been added.
14 // WARNING: a diary file opened with test_run !
15 res = getio();
16 assert_checkequal(res, [5 5 1 6]);
17 a = diary(fullfile("TMPDIR", "diary.txt"));
18 res = getio();
19 assert_checkequal(res, [5 5 2 6]);
20 // error
21 str = "getio(1)";
22 assert_checkfalse(execstr(str   ,"errcatch") == 0);
23 refMsg = msprintf(_("%s: Wrong number of input argument(s): %d expected.\n"), "getio", 0);
24 assert_checkerror(str, refMsg);
25 str = "[a,b] = getio()";
26 assert_checkfalse(execstr(str   ,"errcatch") == 0);
27 refMsg = msprintf(_("%s: Wrong number of output argument(s): %d expected.\n"), "getio", 1);
28 assert_checkerror(str, refMsg);