envmodules/modules
1
0
Fork 0
mirror of https://github.com/envmodules/modules.git synced 2026-06-14 00:42:43 +08:00
Code Issues Actions 5 Packages Projects Releases Wiki Activity

ts: fix _test_err_json comparison method

Browse Source 
Signed-off-by: Xavier Delaruelle <xavier.delaruelle@cea.fr>
This commit is contained in:
Xavier Delaruelle
2025-03-20 09:23:08 +01:00
parent 19efb813ec
commit 529fa7b26c
1 changed files with 8 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
testsuite/config/base-config.exp
View File

@@ -852,8 +852,14 @@ proc _test_err_json {test_shell cmd answer failcmd} {
$answer_last_entry end-2 end]} {
set errdiff 1
}
set comp_last_entry [string replace $comp_last_entry end-1 end ,]
set answer_last_entry [string replace $answer_last_entry end-1 end ,]
# make last content line with same structure as other lines (finishing by "\},")
if {[string index $comp_last_entry end] eq "\}"} {
append comp_last_entry ,
append answer_last_entry ,
} else {
set comp_last_entry [string replace $comp_last_entry end-1 end ,]
set answer_last_entry [string replace $answer_last_entry end-1 end ,]
}
set comp_error_list [lreplace $comp_error_list end-2 end-2 $comp_last_entry]
set answer_list [lreplace $answer_list end-2 end-2 $answer_last_entry]