diff options
author | Gaius Mulley <gaiusmod2@gmail.com> | 2023-02-25 21:45:35 +0000 |
---|---|---|
committer | Gaius Mulley <gaiusmod2@gmail.com> | 2023-02-25 21:45:35 +0000 |
commit | a553fc879f9229ffd8a5af65255f41605f885666 (patch) | |
tree | ea5209f029c5a1a21645ca21f3dd9beb66f2a512 | |
parent | 5c638095e7e0fa4de4e4f7326384a86830b25732 (diff) | |
download | gcc-a553fc879f9229ffd8a5af65255f41605f885666.zip gcc-a553fc879f9229ffd8a5af65255f41605f885666.tar.gz gcc-a553fc879f9229ffd8a5af65255f41605f885666.tar.bz2 |
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 <gaiusmod2@gmail.com>
-rw-r--r-- | gcc/testsuite/gm2/projects/pim/run/pass/tower/projects-pim-run-pass-tower.exp | 8 |
1 files changed, 7 insertions, 1 deletions
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}; } |