[Bug testsuite/28032] gfortran.dg tests use dg-options with -On even though it is already torture tests

[jvdelisle at gcc dot gnu.org via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=28032

Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |jwakely.gcc at gmail dot com

--- Comment #10 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
In gfortran-dg.exp I have created a new procedure with a global like this:

global DO_ONE_PASS

proc gfortran-dg-onepass {  } {
        global DO_ONE_PASS 
        set DO_ONE_PASS 1
        puts "\nRunning gfortran-dg-onepass\n"
        #puts "arg2: \n"
        #puts "arg3: \n\n"
}

Then, in gfortran-dg-runtest I do this:

        global DO_ONE_PASS

        if { $DO_ONE_PASS == 1 } {
            set option_list [list { -O } ]
        } else {
            set option_list $torture_with_loops
        }

I am not figuring out how to invoke the gfortran_dg_onepass proc by specifying
it in the test case: from inline_matmul_1.f90 as an example:

! { dg-do run } { gfortran-dg-onepass }
! { dg-options "-ffrontend-optimize -fdump-tree-optimized -Wrealloc-lhs" }

Does anyone know how do this?