[occt.git] / tests / bugs / xde / bug23570

puts "============"
puts "OCC23570"
puts "============"
puts ""
###########################################################################
# Command param in DRAW outputs non-readable symbols
###########################################################################

set info [param write.surfacecurve.mode]

set result1 [regexp {\-\-\- Type : Enum \[in 0-1\] 0:Off 1:On , alpha: +(.*):0 +(.*):1 +\n\-\-\-} $info full alpha_0 alpha_1]

if { ${result1} == 0 } {
   puts "Error: bad message or regexp"
} else {
   puts "alpha_0=${alpha_0}"
   puts "alpha_1=${alpha_1}"
   set result2 [regexp {([^A-Za-z0-9]+)} ${alpha_0} full non_readable_symbols_0]
   set result3 [regexp {([^A-Za-z0-9]+)} ${alpha_1} full non_readable_symbols_1]
   if { ${result2} == 1 } {
      puts "non_readable_symbols_0=${non_readable_symbols_0}"
      puts "Error: Command param in DRAW outputs non-readable symbols for enumerated parameters, after \"alpha\"; (0)"
   }
   if { ${result3} == 1 } {
      puts "non_readable_symbols_1=${non_readable_symbols_1}"
      puts "Error: Command param in DRAW outputs non-readable symbols for enumerated parameters, after \"alpha\"; (1)"
   }
}
Commit	Line	Data
381a6d0e	1	puts "============"
	2	puts "OCC23570"
	3	puts "============"
	4	puts ""
	5	###########################################################################
	6	# Command param in DRAW outputs non-readable symbols
	7	###########################################################################
	8
	9	set info [param write.surfacecurve.mode]
	10
	11	set result1 [regexp {\-\-\- Type : Enum \[in 0-1\] 0:Off 1:On , alpha: +(.):0 +(.):1 +\n\-\-\-} $info full alpha_0 alpha_1]
	12
	13	if { ${result1} == 0 } {
	14	puts "Error: bad message or regexp"
	15	} else {
	16	puts "alpha_0=${alpha_0}"
	17	puts "alpha_1=${alpha_1}"
	18	set result2 [regexp {([^A-Za-z0-9]+)} ${alpha_0} full non_readable_symbols_0]
	19	set result3 [regexp {([^A-Za-z0-9]+)} ${alpha_1} full non_readable_symbols_1]
	20	if { ${result2} == 1 } {
	21	puts "non_readable_symbols_0=${non_readable_symbols_0}"
	22	puts "Error: Command param in DRAW outputs non-readable symbols for enumerated parameters, after \"alpha\"; (0)"
	23	}
	24	if { ${result3} == 1 } {
	25	puts "non_readable_symbols_1=${non_readable_symbols_1}"
	26	puts "Error: Command param in DRAW outputs non-readable symbols for enumerated parameters, after \"alpha\"; (1)"
	27	}
	28	}