[PATCH] a68: Unset timeout after testcase compilation

Jose E. Marchesi jemarch@gnu.org
Fri Oct 31 17:45:00 GMT 2025


Hi Pietro.
OK.

> 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