archiveList complete with gateways, primitives, test and help
[scilab.git] / scilab / modules / fileio / tests / unit_tests / archiveList.dia.ref
1 // ============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2015 - DIGITEO - Kartik Gupta
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // ============================================================================
7 // <-- CLI SHELL MODE -->
8 // ============================================================================
9 // Unitary tests for archiveList function
10 // ============================================================================
11 files = archiveList("SCI/modules/fileio/tests/unit_tests/example.tar");
12 if length(length(files)) <> 2 | files(1) <> "example1.txt" | files(2) <> "example2.txt" then bugmes();quit;end
13 files = archiveList("SCI/modules/fileio/tests/unit_tests/example.tar.gz");
14 if length(length(files)) <> 2 | files(1) <> "example1.txt" | files(2) <> "example2.txt" then bugmes();quit;end
15 files = archiveList("SCI/modules/fileio/tests/unit_tests\example.tar.gz");
16 if length(length(files)) <> 2 | files(1) <> "example1.txt" | files(2) <> "example2.txt" then bugmes();quit;end
17 files = archiveList("SCI/modules/fileio/tests\unit_tests/example.tar.gz");
18 if length(length(files)) <> 2 | files(1) <> "example1.txt" | files(2) <> "example2.txt" then bugmes();quit;end
19 ierr = execstr("archiveList(SCI)","errcatch");
20 if ierr <> 999 then bugmes();quit;end
21 ierr = execstr("archiveList(SCI,1)","errcatch");
22 if ierr <> 77 then bugmes();quit;end