comparison libinterp/corefcn/data.cc @ 21575:bc9aa534bc29

maint: Clean up BIST tests so they don't produce warnings. * data.cc (Fhorzcat): Temporarily disable "num-to-str" warning for BIST tests. * luinc.cc (__luinc__): Move BIST tests to luinc.m. * luinc.m: Add BIST tests for luinc. * regexp.cc (Fregexp): Temporarily disable "regexp-lookbehind-limit" for BIST tests. * sqrtm.cc (Fsqrtm): Temporarily disable "sqrtm:SingularMatrix" for BIST tests. * __eigs__.cc, __init_fltk__.cc, __init_gnuplot__.cc: Add 'assert (1)' BIST test to mark internal functions as tested. * ov-range.cc (Fallow_noninteger_range_as_index: Temporarily disable "deprecated-syntax" for BIST tests. * quadv.m: Temporarily disable "divide-by-zero" warning for BIST tests. * imfinfo.m: Temporarily disable "GraphicsMagic-Quantum-Depth" for BIST tests.
author Rik <rik@octave.org>
date Fri, 01 Apr 2016 13:56:09 -0700
parents ad0599a0acc6
children ecce63c99c3f
comparison
equal deleted inserted replaced
21574:ae4d7dfea337 21575:bc9aa534bc29
2144 return do_cat (args, -2, "horzcat"); 2144 return do_cat (args, -2, "horzcat");
2145 } 2145 }
2146 2146
2147 /* 2147 /*
2148 ## Test concatenation with all zero matrices 2148 ## Test concatenation with all zero matrices
2149 %!assert (horzcat ("", 65*ones (1,10)), "AAAAAAAAAA") 2149 %!test
2150 %!assert (horzcat (65*ones (1,10), ""), "AAAAAAAAAA") 2150 %! warning ("off", "Octave:num-to-str", "local");
2151 %! assert (horzcat ("", 65*ones (1,10)), "AAAAAAAAAA");
2152 %! assert (horzcat (65*ones (1,10), ""), "AAAAAAAAAA");
2151 2153
2152 %!assert (class (horzcat (int64 (1), int64 (1))), "int64") 2154 %!assert (class (horzcat (int64 (1), int64 (1))), "int64")
2153 %!assert (class (horzcat (int64 (1), int32 (1))), "int64") 2155 %!assert (class (horzcat (int64 (1), int32 (1))), "int64")
2154 %!assert (class (horzcat (int64 (1), int16 (1))), "int64") 2156 %!assert (class (horzcat (int64 (1), int16 (1))), "int64")
2155 %!assert (class (horzcat (int64 (1), int8 (1))), "int64") 2157 %!assert (class (horzcat (int64 (1), int8 (1))), "int64")
2159 %!assert (class (horzcat (int64 (1), uint8 (1))), "int64") 2161 %!assert (class (horzcat (int64 (1), uint8 (1))), "int64")
2160 %!assert (class (horzcat (int64 (1), single (1))), "int64") 2162 %!assert (class (horzcat (int64 (1), single (1))), "int64")
2161 %!assert (class (horzcat (int64 (1), double (1))), "int64") 2163 %!assert (class (horzcat (int64 (1), double (1))), "int64")
2162 %!assert (class (horzcat (int64 (1), cell (1))), "cell") 2164 %!assert (class (horzcat (int64 (1), cell (1))), "cell")
2163 %!assert (class (horzcat (int64 (1), true)), "int64") 2165 %!assert (class (horzcat (int64 (1), true)), "int64")
2164 %!assert (class (horzcat (int64 (1), "a")), "char") 2166 %!test
2167 %! warning ("off", "Octave:num-to-str", "local");
2168 %! assert (class (horzcat (int64 (1), "a")), "char");
2165 2169
2166 %!assert (class (horzcat (int32 (1), int64 (1))), "int32") 2170 %!assert (class (horzcat (int32 (1), int64 (1))), "int32")
2167 %!assert (class (horzcat (int32 (1), int32 (1))), "int32") 2171 %!assert (class (horzcat (int32 (1), int32 (1))), "int32")
2168 %!assert (class (horzcat (int32 (1), int16 (1))), "int32") 2172 %!assert (class (horzcat (int32 (1), int16 (1))), "int32")
2169 %!assert (class (horzcat (int32 (1), int8 (1))), "int32") 2173 %!assert (class (horzcat (int32 (1), int8 (1))), "int32")
2173 %!assert (class (horzcat (int32 (1), uint8 (1))), "int32") 2177 %!assert (class (horzcat (int32 (1), uint8 (1))), "int32")
2174 %!assert (class (horzcat (int32 (1), single (1))), "int32") 2178 %!assert (class (horzcat (int32 (1), single (1))), "int32")
2175 %!assert (class (horzcat (int32 (1), double (1))), "int32") 2179 %!assert (class (horzcat (int32 (1), double (1))), "int32")
2176 %!assert (class (horzcat (int32 (1), cell (1))), "cell") 2180 %!assert (class (horzcat (int32 (1), cell (1))), "cell")
2177 %!assert (class (horzcat (int32 (1), true)), "int32") 2181 %!assert (class (horzcat (int32 (1), true)), "int32")
2178 %!assert (class (horzcat (int32 (1), "a")), "char") 2182 %!test
2183 %! warning ("off", "Octave:num-to-str", "local");
2184 %! assert (class (horzcat (int32 (1), "a")), "char");
2179 2185
2180 %!assert (class (horzcat (int16 (1), int64 (1))), "int16") 2186 %!assert (class (horzcat (int16 (1), int64 (1))), "int16")
2181 %!assert (class (horzcat (int16 (1), int32 (1))), "int16") 2187 %!assert (class (horzcat (int16 (1), int32 (1))), "int16")
2182 %!assert (class (horzcat (int16 (1), int16 (1))), "int16") 2188 %!assert (class (horzcat (int16 (1), int16 (1))), "int16")
2183 %!assert (class (horzcat (int16 (1), int8 (1))), "int16") 2189 %!assert (class (horzcat (int16 (1), int8 (1))), "int16")
2187 %!assert (class (horzcat (int16 (1), uint8 (1))), "int16") 2193 %!assert (class (horzcat (int16 (1), uint8 (1))), "int16")
2188 %!assert (class (horzcat (int16 (1), single (1))), "int16") 2194 %!assert (class (horzcat (int16 (1), single (1))), "int16")
2189 %!assert (class (horzcat (int16 (1), double (1))), "int16") 2195 %!assert (class (horzcat (int16 (1), double (1))), "int16")
2190 %!assert (class (horzcat (int16 (1), cell (1))), "cell") 2196 %!assert (class (horzcat (int16 (1), cell (1))), "cell")
2191 %!assert (class (horzcat (int16 (1), true)), "int16") 2197 %!assert (class (horzcat (int16 (1), true)), "int16")
2192 %!assert (class (horzcat (int16 (1), "a")), "char") 2198 %!test
2199 %! warning ("off", "Octave:num-to-str", "local");
2200 %! assert (class (horzcat (int16 (1), "a")), "char");
2193 2201
2194 %!assert (class (horzcat (int8 (1), int64 (1))), "int8") 2202 %!assert (class (horzcat (int8 (1), int64 (1))), "int8")
2195 %!assert (class (horzcat (int8 (1), int32 (1))), "int8") 2203 %!assert (class (horzcat (int8 (1), int32 (1))), "int8")
2196 %!assert (class (horzcat (int8 (1), int16 (1))), "int8") 2204 %!assert (class (horzcat (int8 (1), int16 (1))), "int8")
2197 %!assert (class (horzcat (int8 (1), int8 (1))), "int8") 2205 %!assert (class (horzcat (int8 (1), int8 (1))), "int8")
2201 %!assert (class (horzcat (int8 (1), uint8 (1))), "int8") 2209 %!assert (class (horzcat (int8 (1), uint8 (1))), "int8")
2202 %!assert (class (horzcat (int8 (1), single (1))), "int8") 2210 %!assert (class (horzcat (int8 (1), single (1))), "int8")
2203 %!assert (class (horzcat (int8 (1), double (1))), "int8") 2211 %!assert (class (horzcat (int8 (1), double (1))), "int8")
2204 %!assert (class (horzcat (int8 (1), cell (1))), "cell") 2212 %!assert (class (horzcat (int8 (1), cell (1))), "cell")
2205 %!assert (class (horzcat (int8 (1), true)), "int8") 2213 %!assert (class (horzcat (int8 (1), true)), "int8")
2206 %!assert (class (horzcat (int8 (1), "a")), "char") 2214 %!test
2215 %! warning ("off", "Octave:num-to-str", "local");
2216 %! assert (class (horzcat (int8 (1), "a")), "char");
2207 2217
2208 %!assert (class (horzcat (uint64 (1), int64 (1))), "uint64") 2218 %!assert (class (horzcat (uint64 (1), int64 (1))), "uint64")
2209 %!assert (class (horzcat (uint64 (1), int32 (1))), "uint64") 2219 %!assert (class (horzcat (uint64 (1), int32 (1))), "uint64")
2210 %!assert (class (horzcat (uint64 (1), int16 (1))), "uint64") 2220 %!assert (class (horzcat (uint64 (1), int16 (1))), "uint64")
2211 %!assert (class (horzcat (uint64 (1), int8 (1))), "uint64") 2221 %!assert (class (horzcat (uint64 (1), int8 (1))), "uint64")
2215 %!assert (class (horzcat (uint64 (1), uint8 (1))), "uint64") 2225 %!assert (class (horzcat (uint64 (1), uint8 (1))), "uint64")
2216 %!assert (class (horzcat (uint64 (1), single (1))), "uint64") 2226 %!assert (class (horzcat (uint64 (1), single (1))), "uint64")
2217 %!assert (class (horzcat (uint64 (1), double (1))), "uint64") 2227 %!assert (class (horzcat (uint64 (1), double (1))), "uint64")
2218 %!assert (class (horzcat (uint64 (1), cell (1))), "cell") 2228 %!assert (class (horzcat (uint64 (1), cell (1))), "cell")
2219 %!assert (class (horzcat (uint64 (1), true)), "uint64") 2229 %!assert (class (horzcat (uint64 (1), true)), "uint64")
2220 %!assert (class (horzcat (uint64 (1), "a")), "char") 2230 %!test
2231 %! warning ("off", "Octave:num-to-str", "local");
2232 %! assert (class (horzcat (uint64 (1), "a")), "char");
2221 2233
2222 %!assert (class (horzcat (uint32 (1), int64 (1))), "uint32") 2234 %!assert (class (horzcat (uint32 (1), int64 (1))), "uint32")
2223 %!assert (class (horzcat (uint32 (1), int32 (1))), "uint32") 2235 %!assert (class (horzcat (uint32 (1), int32 (1))), "uint32")
2224 %!assert (class (horzcat (uint32 (1), int16 (1))), "uint32") 2236 %!assert (class (horzcat (uint32 (1), int16 (1))), "uint32")
2225 %!assert (class (horzcat (uint32 (1), int8 (1))), "uint32") 2237 %!assert (class (horzcat (uint32 (1), int8 (1))), "uint32")
2229 %!assert (class (horzcat (uint32 (1), uint8 (1))), "uint32") 2241 %!assert (class (horzcat (uint32 (1), uint8 (1))), "uint32")
2230 %!assert (class (horzcat (uint32 (1), single (1))), "uint32") 2242 %!assert (class (horzcat (uint32 (1), single (1))), "uint32")
2231 %!assert (class (horzcat (uint32 (1), double (1))), "uint32") 2243 %!assert (class (horzcat (uint32 (1), double (1))), "uint32")
2232 %!assert (class (horzcat (uint32 (1), cell (1))), "cell") 2244 %!assert (class (horzcat (uint32 (1), cell (1))), "cell")
2233 %!assert (class (horzcat (uint32 (1), true)), "uint32") 2245 %!assert (class (horzcat (uint32 (1), true)), "uint32")
2234 %!assert (class (horzcat (uint32 (1), "a")), "char") 2246 %!test
2247 %! warning ("off", "Octave:num-to-str", "local");
2248 %! assert (class (horzcat (uint32 (1), "a")), "char");
2235 2249
2236 %!assert (class (horzcat (uint16 (1), int64 (1))), "uint16") 2250 %!assert (class (horzcat (uint16 (1), int64 (1))), "uint16")
2237 %!assert (class (horzcat (uint16 (1), int32 (1))), "uint16") 2251 %!assert (class (horzcat (uint16 (1), int32 (1))), "uint16")
2238 %!assert (class (horzcat (uint16 (1), int16 (1))), "uint16") 2252 %!assert (class (horzcat (uint16 (1), int16 (1))), "uint16")
2239 %!assert (class (horzcat (uint16 (1), int8 (1))), "uint16") 2253 %!assert (class (horzcat (uint16 (1), int8 (1))), "uint16")
2243 %!assert (class (horzcat (uint16 (1), uint8 (1))), "uint16") 2257 %!assert (class (horzcat (uint16 (1), uint8 (1))), "uint16")
2244 %!assert (class (horzcat (uint16 (1), single (1))), "uint16") 2258 %!assert (class (horzcat (uint16 (1), single (1))), "uint16")
2245 %!assert (class (horzcat (uint16 (1), double (1))), "uint16") 2259 %!assert (class (horzcat (uint16 (1), double (1))), "uint16")
2246 %!assert (class (horzcat (uint16 (1), cell (1))), "cell") 2260 %!assert (class (horzcat (uint16 (1), cell (1))), "cell")
2247 %!assert (class (horzcat (uint16 (1), true)), "uint16") 2261 %!assert (class (horzcat (uint16 (1), true)), "uint16")
2248 %!assert (class (horzcat (uint16 (1), "a")), "char") 2262 %!test
2263 %! warning ("off", "Octave:num-to-str", "local");
2264 %! assert (class (horzcat (uint16 (1), "a")), "char");
2249 2265
2250 %!assert (class (horzcat (uint8 (1), int64 (1))), "uint8") 2266 %!assert (class (horzcat (uint8 (1), int64 (1))), "uint8")
2251 %!assert (class (horzcat (uint8 (1), int32 (1))), "uint8") 2267 %!assert (class (horzcat (uint8 (1), int32 (1))), "uint8")
2252 %!assert (class (horzcat (uint8 (1), int16 (1))), "uint8") 2268 %!assert (class (horzcat (uint8 (1), int16 (1))), "uint8")
2253 %!assert (class (horzcat (uint8 (1), int8 (1))), "uint8") 2269 %!assert (class (horzcat (uint8 (1), int8 (1))), "uint8")
2257 %!assert (class (horzcat (uint8 (1), uint8 (1))), "uint8") 2273 %!assert (class (horzcat (uint8 (1), uint8 (1))), "uint8")
2258 %!assert (class (horzcat (uint8 (1), single (1))), "uint8") 2274 %!assert (class (horzcat (uint8 (1), single (1))), "uint8")
2259 %!assert (class (horzcat (uint8 (1), double (1))), "uint8") 2275 %!assert (class (horzcat (uint8 (1), double (1))), "uint8")
2260 %!assert (class (horzcat (uint8 (1), cell (1))), "cell") 2276 %!assert (class (horzcat (uint8 (1), cell (1))), "cell")
2261 %!assert (class (horzcat (uint8 (1), true)), "uint8") 2277 %!assert (class (horzcat (uint8 (1), true)), "uint8")
2262 %!assert (class (horzcat (uint8 (1), "a")), "char") 2278 %!test
2279 %! warning ("off", "Octave:num-to-str", "local");
2280 %! assert (class (horzcat (uint8 (1), "a")), "char");
2263 2281
2264 %!assert (class (horzcat (single (1), int64 (1))), "int64") 2282 %!assert (class (horzcat (single (1), int64 (1))), "int64")
2265 %!assert (class (horzcat (single (1), int32 (1))), "int32") 2283 %!assert (class (horzcat (single (1), int32 (1))), "int32")
2266 %!assert (class (horzcat (single (1), int16 (1))), "int16") 2284 %!assert (class (horzcat (single (1), int16 (1))), "int16")
2267 %!assert (class (horzcat (single (1), int8 (1))), "int8") 2285 %!assert (class (horzcat (single (1), int8 (1))), "int8")
2271 %!assert (class (horzcat (single (1), uint8 (1))), "uint8") 2289 %!assert (class (horzcat (single (1), uint8 (1))), "uint8")
2272 %!assert (class (horzcat (single (1), single (1))), "single") 2290 %!assert (class (horzcat (single (1), single (1))), "single")
2273 %!assert (class (horzcat (single (1), double (1))), "single") 2291 %!assert (class (horzcat (single (1), double (1))), "single")
2274 %!assert (class (horzcat (single (1), cell (1))), "cell") 2292 %!assert (class (horzcat (single (1), cell (1))), "cell")
2275 %!assert (class (horzcat (single (1), true)), "single") 2293 %!assert (class (horzcat (single (1), true)), "single")
2276 %!assert (class (horzcat (single (1), "a")), "char") 2294 %!test
2295 %! warning ("off", "Octave:num-to-str", "local");
2296 %! assert (class (horzcat (single (1), "a")), "char");
2277 2297
2278 %!assert (class (horzcat (double (1), int64 (1))), "int64") 2298 %!assert (class (horzcat (double (1), int64 (1))), "int64")
2279 %!assert (class (horzcat (double (1), int32 (1))), "int32") 2299 %!assert (class (horzcat (double (1), int32 (1))), "int32")
2280 %!assert (class (horzcat (double (1), int16 (1))), "int16") 2300 %!assert (class (horzcat (double (1), int16 (1))), "int16")
2281 %!assert (class (horzcat (double (1), int8 (1))), "int8") 2301 %!assert (class (horzcat (double (1), int8 (1))), "int8")
2285 %!assert (class (horzcat (double (1), uint8 (1))), "uint8") 2305 %!assert (class (horzcat (double (1), uint8 (1))), "uint8")
2286 %!assert (class (horzcat (double (1), single (1))), "single") 2306 %!assert (class (horzcat (double (1), single (1))), "single")
2287 %!assert (class (horzcat (double (1), double (1))), "double") 2307 %!assert (class (horzcat (double (1), double (1))), "double")
2288 %!assert (class (horzcat (double (1), cell (1))), "cell") 2308 %!assert (class (horzcat (double (1), cell (1))), "cell")
2289 %!assert (class (horzcat (double (1), true)), "double") 2309 %!assert (class (horzcat (double (1), true)), "double")
2290 %!assert (class (horzcat (double (1), "a")), "char") 2310 %!test
2311 %! warning ("off", "Octave:num-to-str", "local");
2312 %! assert (class (horzcat (double (1), "a")), "char");
2291 2313
2292 %!assert (class (horzcat (cell (1), int64 (1))), "cell") 2314 %!assert (class (horzcat (cell (1), int64 (1))), "cell")
2293 %!assert (class (horzcat (cell (1), int32 (1))), "cell") 2315 %!assert (class (horzcat (cell (1), int32 (1))), "cell")
2294 %!assert (class (horzcat (cell (1), int16 (1))), "cell") 2316 %!assert (class (horzcat (cell (1), int16 (1))), "cell")
2295 %!assert (class (horzcat (cell (1), int8 (1))), "cell") 2317 %!assert (class (horzcat (cell (1), int8 (1))), "cell")
2313 %!assert (class (horzcat (true, uint8 (1))), "uint8") 2335 %!assert (class (horzcat (true, uint8 (1))), "uint8")
2314 %!assert (class (horzcat (true, single (1))), "single") 2336 %!assert (class (horzcat (true, single (1))), "single")
2315 %!assert (class (horzcat (true, double (1))), "double") 2337 %!assert (class (horzcat (true, double (1))), "double")
2316 %!assert (class (horzcat (true, cell (1))), "cell") 2338 %!assert (class (horzcat (true, cell (1))), "cell")
2317 %!assert (class (horzcat (true, true)), "logical") 2339 %!assert (class (horzcat (true, true)), "logical")
2318 %!assert (class (horzcat (true, "a")), "char") 2340 %!test
2319 2341 %! warning ("off", "Octave:num-to-str", "local");
2320 %!assert (class (horzcat ("a", int64 (1))), "char") 2342 %! assert (class (horzcat (true, "a")), "char");
2321 %!assert (class (horzcat ("a", int32 (1))), "char") 2343
2322 %!assert (class (horzcat ("a", int16 (1))), "char") 2344 %!test
2323 %!assert (class (horzcat ("a", int8 (1))), "char") 2345 %! warning ("off", "Octave:num-to-str", "local");
2324 %!assert (class (horzcat ("a", int64 (1))), "char") 2346 %! assert (class (horzcat ("a", int64 (1))), "char");
2325 %!assert (class (horzcat ("a", int32 (1))), "char") 2347 %! assert (class (horzcat ("a", int32 (1))), "char");
2326 %!assert (class (horzcat ("a", int16 (1))), "char") 2348 %! assert (class (horzcat ("a", int16 (1))), "char");
2327 %!assert (class (horzcat ("a", int8 (1))), "char") 2349 %! assert (class (horzcat ("a", int8 (1))), "char");
2328 %!assert (class (horzcat ("a", single (1))), "char") 2350 %! assert (class (horzcat ("a", int64 (1))), "char");
2329 %!assert (class (horzcat ("a", double (1))), "char") 2351 %! assert (class (horzcat ("a", int32 (1))), "char");
2330 %!assert (class (horzcat ("a", cell (1))), "cell") 2352 %! assert (class (horzcat ("a", int16 (1))), "char");
2331 %!assert (class (horzcat ("a", true)), "char") 2353 %! assert (class (horzcat ("a", int8 (1))), "char");
2332 %!assert (class (horzcat ("a", "a")), "char") 2354 %! assert (class (horzcat ("a", single (1))), "char");
2355 %! assert (class (horzcat ("a", double (1))), "char");
2356 %! assert (class (horzcat ("a", cell (1))), "cell");
2357 %! assert (class (horzcat ("a", true)), "char");
2358 %! assert (class (horzcat ("a", "a")), "char");
2333 2359
2334 %!assert (class (horzcat (cell (1), struct ("foo", "bar"))), "cell") 2360 %!assert (class (horzcat (cell (1), struct ("foo", "bar"))), "cell")
2335 2361
2336 %!error horzcat (struct ("foo", "bar"), cell (1)) 2362 %!error horzcat (struct ("foo", "bar"), cell (1))
2337 */ 2363 */