[PATCH] a68: Unset timeout after testcase compilation

Pietro Monteiro pietro@sociotechnical.xyz
Fri Oct 31 17:27:29 GMT 2025


The timeout was being used for execution tests too. So unset it after
the compilation and let exec test use the default timeout.

gcc/testsuite/ChangeLog:

	* lib/algol68.exp (algol68_target_compile): Unset
	individual_timeout before returning.
---
 gcc/testsuite/lib/algol68.exp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/gcc/testsuite/lib/algol68.exp b/gcc/testsuite/lib/algol68.exp
index 9102ab9e668..dace8598647 100644
--- a/gcc/testsuite/lib/algol68.exp
+++ b/gcc/testsuite/lib/algol68.exp
@@ -213,5 +213,7 @@ proc algol68_target_compile { source dest type options } {

     set options [concat "$ALWAYS_ALGOL68FLAGS" $options]
     set options [dg-additional-files-options $options $source $dest $type]
-    return [target_compile $source $dest $type $options]
+    set ret [eval [target_compile $source $dest $type $options]]
+    unset individual_timeout
+    return $ret
 }
--
2.43.0


More information about the Algol68 mailing list