From 4ab551c0002a18f8ca0757eb8c7c9a14aa71a3b2 Mon Sep 17 00:00:00 2001 From: mkv Date: Tue, 25 Jul 2017 16:48:43 +0300 Subject: [PATCH] Test for 0023497: Units package raises exception for composite units --- tests/bugs/fclasses/bug23497 | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100644 tests/bugs/fclasses/bug23497 diff --git a/tests/bugs/fclasses/bug23497 b/tests/bugs/fclasses/bug23497 new file mode 100644 index 0000000000..524a5385b8 --- /dev/null +++ b/tests/bugs/fclasses/bug23497 @@ -0,0 +1,18 @@ +puts "TODO OCC23497 ALL: Exception" +puts "TODO OCC23497 ALL: exception" + +puts "============" +puts "OCC23497" +puts "============" +puts "" +####################################################################### +# Units package raises exception for composite units +####################################################################### + +set UnitString "sq.km" + +if [catch {unitconvtoSI 1 ${UnitString}} res] { + puts "Error: Units package raises exception for composite units" +} else { + puts "OK: Units package work good for composite unit" +} -- 2.39.5