/dports/science/gnudatalanguage/gdl-1.0.1/testsuite/ |
H A D | test_isa.pro | 34 nb_errors=0 50 if ISA(data) eq 0 then nb_errors=nb_errors+1 53 if ISA(data,/NULL) eq 1 then nb_errors=nb_errors+1 118 if ISA(data) eq 0 then nb_errors=nb_errors+1 145 if ISA(ptr) eq 1 then nb_errors=nb_errors+1 154 if ISA(ptr) eq 0 then nb_errors=nb_errors+1 155 if ISA(*ptr) eq 0 then nb_errors=nb_errors+1 176 if ISA(obj) eq 1 then nb_errors=nb_errors+1 182 if ISA(obj) eq 0 then nb_errors=nb_errors+1 205 if ISA(str) eq 0 then nb_errors=nb_errors+1 [all …]
|
H A D | test_routine_filepath.pro | 12 nb_errors = 0 18 BANNER_FOR_TESTSUITE, name, nb_errors, /short 19 ERRORS_CUMUL, cumul_errors, nb_errors 29 nb_errors=0 35 BANNER_FOR_TESTSUITE, name, nb_errors, /short 36 ERRORS_CUMUL, cumul_errors, nb_errors 49 nb_errors = 0 55 BANNER_FOR_TESTSUITE, name, nb_errors, /short 56 ERRORS_CUMUL, cumul_errors, nb_errors 66 nb_errors=0 [all …]
|
H A D | test_diag_matrix.pro | 12 nb_errors=0 22 if ~ARRAY_EQUAL(res, [1,5]) then ERRORS_ADD, nb_errors, 'case 3x4 1' 24 if ~ARRAY_EQUAL(res, [2]) then ERRORS_ADD, nb_errors, 'case 3x4 2' 31 if ~ARRAY_EQUAL(res, [9]) then ERRORS_ADD, nb_errors, 'case 3x4 -3' 46 if ~ARRAY_EQUAL(res, [3]) then ERRORS_ADD, nb_errors, 'case 4x3 3' 56 ERRORS_CUMUL, cumul_errors, nb_errors 65 nb_errors=0 88 ERRORS_CUMUL, cumul_errors, nb_errors 103 TEST_DIAG_MATRIX_EXTRACT, nb_errors, test=test, verbose=verbose 105 TEST_DIAG_MATRIX_INSERT, nb_errors, test=test, verbose=verbose [all …]
|
H A D | test_qromo.pro | 46 nb_errors=0 47 if (ABS(expected1-comp1) GT eps) then nb_errors=nb_errors+1 48 if (ABS(expected2-comp2) GT eps) then nb_errors=nb_errors+1 49 if (ABS(expected3-comp3) GT eps) then nb_errors=nb_errors+1 119 nb_errors=0 124 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 129 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 158 nb_errors=0 162 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 166 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 [all …]
|
H A D | test_obj_isa.pro | 11 ; then reset "nb_errors" to 0 for next block of tests. 15 total_errors=total_errors+nb_errors 16 nb_errors=0 25 nb_errors=0 34 if OBJ_ISA(k,'list') NE 1 then nb_errors++ 35 if OBJ_ISA(l,'list') NE 1 then nb_errors++ 39 INCREMENT_ERRORS, external_errors, nb_errors 47 nb_errors=0 64 INCREMENT_ERRORS, external_errors, nb_errors 79 nb_errors=0 [all …]
|
H A D | test_file_test.pro | 26 nb_errors=0 58 ERRORS_CUMUL, cumul_errors, nb_errors 67 nb_errors=0 88 ERRORS_CUMUL, cumul_errors, nb_errors 102 nb_errors=0 126 ERRORS_CUMUL, cumul_errors, nb_errors 135 nb_errors=0 182 ERRORS_CUMUL, cumul_errors, nb_errors 196 nb_errors=0 239 nb_errors=0 [all …]
|
H A D | test_typename.pro | 21 nb_errors=0 26 if (TYPENAME(a) NE "UNDEFINED") then ERRORS_ADD, nb_errors, 'bad type with !NULL' 28 if (TYPENAME(1b) NE "BYTE") then ERRORS_ADD, nb_errors, 'bad type with BYTE' 29 if (TYPENAME(1) NE "INT") then ERRORS_ADD, nb_errors, 'bad type with INT' 30 if (TYPENAME(LONG(1)) NE "LONG") then ERRORS_ADD, nb_errors, 'bad type with LONG' 31 if (TYPENAME(1.) NE "FLOAT") then ERRORS_ADD, nb_errors, 'bad type with FLOAT' 35 if (TYPENAME(1l) NE "LONG") then ERRORS_ADD, nb_errors, 'bad type with LONG' 37 if (TYPENAME(1ul) NE "ULONG") then ERRORS_ADD, nb_errors, 'bad type with ULONG' 51 ERRORS_ADD, nb_errors, 'bad type with "idlsysmonitorinfo" Obj' 75 BANNER_FOR_TESTSUITE, 'TEST_TYPENAME', nb_errors [all …]
|
H A D | test_structures.pro | 21 nb_errors=0 38 nb_errors=nb_errors+1 43 nb_errors=nb_errors+1 47 nb_errors=nb_errors+1 51 nb_errors=nb_errors+1 55 nb_errors=nb_errors+1 64 nb_errors=nb_errors+1 70 nb_errors=nb_errors+1 77 nb_errors=nb_errors+1 82 nb_errors=nb_errors+1 [all …]
|
H A D | errors_reset.pro | 9 ; Purpose : this procedure adds running "nb_errors" into "cumul_errors" 10 ; then reset "nb_errors" to 0 for next block of tests. 12 ; It would surprising if "nb_errors" is undefined 29 if KEYWORD_SET(verbose) then print, cumul_errors, nb_errors 31 ; it would be surprising if "nb_errors" don't have a value ... 32 if (SIZE(nb_errors, /type) EQ 0) then $ 38 if (SIZE(nb_errors, /type) GT 0) then begin 39 cumul_errors=cumul_errors+nb_errors 43 if (SIZE(nb_errors, /type) GT 0) then cumul_errors=nb_errors else cumul_errors=0 46 ; reset the running "nb_errors" number [all …]
|
H A D | test_image_statistics.pro | 69 nb_errors=0 71 if pixelNumber NE 466200 then nb_errors=nb_errors+1 72 if ~DIFF_BELOW_TOL(pixelTotal, 2.26349e+07, 1e3) then nb_errors=nb_errors+1 73 if ~DIFF_BELOW_TOL(pixelMax, 255.0, 0.001) then nb_errors=nb_errors+1 74 if ~DIFF_BELOW_TOL(pixelMean, 48.5520, 0.0001) then nb_errors=nb_errors+1 75 if ~DIFF_BELOW_TOL(pixelMin,0.0, 0.0001) then nb_errors=nb_errors+1 76 if ~DIFF_BELOW_TOL(pixelDeviation, 65.5660, 0.0001) then nb_errors=nb_errors+1 77 if ~DIFF_BELOW_TOL(pixelSquareSum, 3.10312e+09, 1e4) then nb_errors=nb_errors+1 78 if ~DIFF_BELOW_TOL(pixelVariance, 4298.91, 0.01) then nb_errors=nb_errors+1 82 BANNER_FOR_TESTSUITE, 'TEST_IMAGE_STATISTICS', nb_errors, short=short [all …]
|
H A D | test_qromb.pro | 44 nb_errors=0 67 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 71 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 75 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 79 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 89 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 93 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 97 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 101 if TOTAL((resuQR-resuIN)^2) GT eps then nb_errors=nb_errors+1 103 if (nb_errors GT 0) then begin [all …]
|
H A D | test_norm.pro | 11 nb_errors=0 25 if TOTAL(ABS(expected-results)) GT 1.e-6 then nb_errors++ 29 ERRORS_CUMUL, cumul_errors, nb_errors 38 nb_errors=0 52 if TOTAL(ABS(expected-results)) GT 1.e-6 then nb_errors++ 56 ERRORS_CUMUL, cumul_errors, nb_errors 75 TEST_NORM_VECTORS, nb_errors 78 TEST_NORM_MATRIX, nb_errors 79 TEST_NORM_MATRIX, nb_errors, type=5 80 a=EXECUTE("TEST_NORM_MATRIX, nb_errors, type=6") [all …]
|
H A D | test_call_function.pro | 33 nb_errors = 0 42 nb_errors=nb_errors+1 53 nb_errors=nb_errors+1 64 nb_errors=nb_errors+1 75 nb_errors=nb_errors+1 87 nb_errors=nb_errors+1 93 nb_errors=nb_errors+1 105 nb_errors=nb_errors+1 111 nb_errors=nb_errors+1 122 nb_errors=nb_errors+1 [all …]
|
H A D | test_bug_719.pro | 14 nb_errors=0 33 ERRORS_ADD, nb_errors, 'case 3x4 Findgen EXECUTE' 37 BANNER_FOR_TESTSUITE, 'TEST_BUG_719_FINDGEN', nb_errors, /status 38 ERRORS_CUMUL, cumul_errors, nb_errors 47 nb_errors=0 62 ERRORS_ADD, nb_errors, 'case 3x4 Findgen EXECUTE' 66 BANNER_FOR_TESTSUITE, 'TEST_BUG_719_REFORM', nb_errors, /status 67 ERRORS_CUMUL, cumul_errors, nb_errors 82 TEST_BUG_719_FINDGEN, nb_errors, test=test, verbose=verbose 84 TEST_BUG_719_REFORM, nb_errors, test=test, verbose=verbose [all …]
|
H A D | test_array_indices.pro | 14 nb_errors=0 24 ERRORS_ADD, nb_errors, 'pb in case 1 (no /dim) ' 30 ERRORS_ADD, nb_errors, 'pb in case 2 (with /dim) ' 36 ERRORS_CUMUL, cumul_errors, nb_errors 49 nb_errors=0 66 ERRORS_ADD, nb_errors, 'pb in case 1 (square), no /dim' 106 ERRORS_CUMUL, cumul_errors, nb_errors 121 nb_errors=0 123 TEST_ARRAY_INDICES_REKO, nb_errors, verbose=verbose, test=test 125 TEST_ARRAY_INDICES_DIST, nb_errors, verbose=verbose, test=test [all …]
|
H A D | test_byte_conversion.pro | 46 nb_errors=0 88 ERRORS_CUMUL, cumul_errors, nb_errors 98 nb_errors=0 134 if ~KEYWORD_SET(debug) AND (nb_errors GT 0) then begin 139 ERRORS_CUMUL, cumul_errors, nb_errors 152 nb_errors=0 173 if (nb_errors GT 15) then begin 190 ERRORS_CUMUL, cumul_errors, nb_errors 200 nb_errors=0 212 ERRORS_CUMUL, cumul_errors, nb_errors [all …]
|
H A D | test_call_procedure.pro | 32 nb_errors = 0 41 if (STRCMP(txt1, txt2) NE 1) then nb_errors=nb_errors+1 55 nb_errors=nb_errors+1 66 nb_errors=nb_errors+1 78 nb_errors=nb_errors+1 84 nb_errors=nb_errors+1 96 nb_errors=nb_errors+1 102 nb_errors=nb_errors+1 114 nb_errors=nb_errors+1 119 if (nb_errors GT 0) then begin [all …]
|
H A D | test_size.pro | 23 nb_errors=0 47 ERRORS_CUMUL, cumul_errors, nb_errors 114 nb_errors=0 144 ERRORS_CUMUL, cumul_errors, nb_errors 160 nb_errors=0 162 TEST_BUG_675, nb_errors, verbose=verbose 164 TEST_SIZE_STRUCTURE, nb_errors, verbose=verbose 166 TEST_SIZE_ARRAY, nb_errors, verbose=verbose 170 TEST_SIZE_HASH, nb_errors, verbose=verbose, $ 172 TEST_SIZE_LIST, nb_errors, verbose=verbose, $ [all …]
|
H A D | test_null.pro | 62 nb_errors=0 82 ERRORS_RESET, total_errors, nb_errors, verbose=verbose 90 if (test2eq NE 1) then ERRORS_ADD, nb_errors, '!null EQ !Null' 92 if (test2ne NE 0) then ERRORS_ADD, nb_errors, '!null NE !Null' 96 if (test2eq NE 1) then ERRORS_ADD, nb_errors, 'Left EQ !Null' 98 if (test2ne NE 0) then ERRORS_ADD, nb_errors, 'Left NE !Null' 109 ERRORS_RESET, total_errors, nb_errors, verbose=verbose 134 ERRORS_RESET, total_errors, nb_errors;, verbose=verbose 159 ERRORS_RESET, total_errors, nb_errors;, verbose=verbose 183 nb_errors=0 [all …]
|
H A D | test_stregex.pro | 13 nb_errors=0 22 nb_errors=nb_errors+1 32 nb_errors=nb_errors+1 43 nb_errors=nb_errors+1 56 nb_errors=nb_errors+1 72 nb_errors=nb_errors+1 83 nb_errors=nb_errors+1 92 nb_errors=nb_errors+1 102 nb_errors=nb_errors+1 107 if (nb_errors GT 0) then begin [all …]
|
H A D | test_l64.pro | 21 nb_errors=0 30 ERRORS_ADD, nb_errors, 'bad TYPENAME for SIZE'+txt1 33 ERRORS_ADD, nb_errors, 'bad TYPENAME for SIZE'+txt2 39 ERRORS_ADD, nb_errors, 'bad value inside SIZE'+txt1 43 ERRORS_ADD, nb_errors, 'bad value inside SIZE'+txt2 56 ERRORS_ADD, nb_errors, 'bad value case 1 (SIZE(/n_elem))' 62 BANNER_FOR_TESTSUITE, 'TEST_L64_SIZE', nb_errors, /short 63 ERRORS_CUMUL, cumul_errors, nb_errors 77 nb_errors=0 88 ERRORS_ADD, nb_errors, 'bad value for N_ELEMENTS'+txt1 [all …]
|
H A D | test_where.pro | 12 nb_errors=0 25 ERRORS_CUMUL, cumul_errors, nb_errors 37 nb_errors=0 72 nb_errors++ 84 nb_errors++ 93 nb_errors++ 120 nb_errors++ 132 nb_errors++ 141 nb_errors++ 155 ERRORS_CUMUL, cumul_errors, nb_errors [all …]
|
H A D | test_str_sep.pro | 18 nb_errors=0 24 nb_errors++ 28 nb_errors++ 32 nb_errors++ 42 nb_errors++ 46 nb_errors++ 61 nb_errors++ 66 nb_errors++ 71 nb_errors++ 84 nb_errors++ [all …]
|
/dports/science/gnudatalanguage/gdl-1.0.1/testsuite/interactive_tests/ |
H A D | test_dialog_message.pro | 16 nb_errors=0 20 if (result NE expected) then ERRORS_ADD, 'Error case 1', nb_errors 23 if (result NE expected) then ERRORS_ADD, 'Error case 1 /Error', nb_errors 26 if (result NE expected) then ERRORS_ADD, 'Error case 1 /Information', nb_errors 32 if (result NE expected) then ERRORS_ADD, 'Error case 2 with /cancel', nb_errors 35 if (result NE expected) then ERRORS_ADD, 'Error case 2 /Error with /cancel', nb_errors 44 if (result NE expected) then ERRORS_ADD, 'Error case 3 with /cancel', nb_errors 56 if (result NE expected) then ERRORS_ADD, 'Error case 4 with /question', nb_errors 60 if (result NE expected) then ERRORS_ADD, 'Error case 4 with /question', nb_errors 72 if (nb_errors EQ 0) then begin [all …]
|
H A D | test_get_screen_size.pro | 43 nb_errors=0 58 ERRORS_ADD, nb_errors, 'Error, screen length < 0' 60 ERRORS_ADD, nb_errors, 'Error, screen height < 0' 62 ERRORS_ADD, nb_errors, 'Error, length resolution < 0' 64 ERRORS_ADD, nb_errors, 'Error, height resolution < 0' 77 ERRORS_ADD, nb_errors, 'The return value is not a "Long" type !' 80 BANNER_FOR_TESTSUITE, 'TESTING_GET_SCREEN_SIZE', nb_errors, /status 81 ERRORS_CUMUL, cumul_errors, nb_errors 100 TESTING_GET_SCREEN_SIZE, nb_errors, test=test 102 BANNER_FOR_TESTSUITE, 'TEST_GET_SCREEN_SIZE', nb_errors [all …]
|