From a553fc879f9229ffd8a5af65255f41605f885666 Mon Sep 17 00:00:00 2001 From: Gaius Mulley Date: Sat, 25 Feb 2023 21:45:35 +0000 Subject: Disable tower socket runtest The projects-pim-run-pass-tower.exp test blocks indefinitely on some platforms. This patch disables it for now - it should be enabled once a cross platform fix for RTint.mod is found. gcc/testsuite/ChangeLog: * gm2/projects/pim/run/pass/tower/projects-pim-run-pass-tower.exp (gm2_run_tower_test): New global variable. Add conditional before invoking gm2-local-exec. Signed-off-by: Gaius Mulley --- .../projects/pim/run/pass/tower/projects-pim-run-pass-tower.exp | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'gcc') diff --git a/gcc/testsuite/gm2/projects/pim/run/pass/tower/projects-pim-run-pass-tower.exp b/gcc/testsuite/gm2/projects/pim/run/pass/tower/projects-pim-run-pass-tower.exp index 303672e..927dbc5 100644 --- a/gcc/testsuite/gm2/projects/pim/run/pass/tower/projects-pim-run-pass-tower.exp +++ b/gcc/testsuite/gm2/projects/pim/run/pass/tower/projects-pim-run-pass-tower.exp @@ -29,6 +29,7 @@ load_lib gm2-simple.exp gm2_init_cor "${srcdir}/${subdir}" -g gm2_link_obj "advflex.o AdvCmd.o AdvIntroduction.o AdvMap.o AdvMath.o AdvParse.o AdvSound.o AdvSystem.o AdvTreasure.o AdvUtil.o DrawG.o DrawL.o Lock.o ProcArgs.o Screen.o Window.o SocketControl.o" +set gm2_run_tower_test 0 proc gm2-local-exec { testcase execname mapfile } { global tool; @@ -105,6 +106,11 @@ foreach testcase [lsort [glob -nocomplain $srcdir/$subdir/Dungeon.mod]] { global tmpdir; set executable $tmpdir/[file tail [file rootname $testcase].x]; - gm2-local-exec ${testcase} ${executable} $srcdir/$subdir/star + + if { ${gm2_run_tower_test} } then { + gm2-local-exec ${testcase} ${executable} $srcdir/$subdir/star + } else { + verbose "not running tower socket test" 1 + } remote_file build delete ${executable}; } -- cgit v1.1