1// ============================================================================= 2// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab 3// Copyright (C) 2012 - SCILAB ENTERPRISES - Simon GARESTE 4// 5// This file is distributed under the same license as the Scilab package. 6// ============================================================================= 7// 8// <-- CLI SHELL MODE --> 9msgerr = msprintf(gettext("%s: Wrong number of input argument(s): %d expected.\n"), "h5label", 4); 10assert_checkerror("h5label()",msgerr,77); 11msgerr = msprintf(gettext("%s: Wrong number of input argument(s): %d expected.\n"), "h5label", 4); 12assert_checkerror("h5label(42)",msgerr,77); 13msgerr = msprintf(gettext("%s: Wrong type for input argument #%d: string or H5Object expected.\n"), "h5label", 1); 14assert_checkerror("h5label(42,42,42,42)",msgerr,999); 15msgerr = msprintf(gettext("%s: Wrong type for input argument #%d: string expected.\n"), "h5label", 2); 16assert_checkerror("h5label(""42"",42,42,42)",msgerr,999); 17msgerr = msprintf(gettext("%s: Wrong type for input argument #%d: Row array of strings expected.\n"), "h5label", 4); 18assert_checkerror("h5label(""42"",""42"",42,42)",msgerr,999); 19msgerr = msprintf(gettext("%s: %s\n"), "h5label", msprintf(gettext("Invalid hdf5 file: %s."), "42")); 20assert_checkerror("h5label(""42"",""42"",42,[""42""])",msgerr,999); 21a = h5open(TMPDIR + "/test.h5", "w"); 22msgerr = msprintf(gettext("%s: %s\n"), "h5label", msprintf(gettext("Invalid name: %s.") ,"42")); 23assert_checkerror("h5label(a,""42"",42,[""42""])",msgerr,999); 24x = uint8(1:24); 25h5dataset(a, "Dset_1", [1 2 3 4 ; 1 1 1 1 ; 1 1 1 1 ; 1 1 1 1; 1 2 3 4], x, [1 2 3 4 ; 1 2 3 4 ; 1 1 1 1 ; 1 1 1 1 ; 1 1 1 1 ; 1 2 3 4]); 26h5label(a, "Dset_1", [1 3], ["Hello" "World"]); 27assert_checkequal(a.root.Dset_1.DIMENSION_LABELS.data,["Hello" "" "World" ""]); 28h5close(a) 29