aot_path_close_fun Subroutine

  1. aot_path_module.f90
  2. aot_path_module
  3. aot_path_close_fun

private subroutine aot_path_close_fun(me, conf, fun, closeLua)

This routine closes function and all other tables opened along the path.

Arguments

Type IntentOptional AttributesName
type(aot_path_type), intent(inout) :: me

The path object to open as a function
type(flu_State) :: conf

The flu_state handle, which is either opened according to the path, or used to open the path in.
type(aot_fun_type), intent(inout) :: fun

The opened function
logical, intent(in), optional :: closeLua

A flag to indicate, wether to close the Lua script, default is false.

Calls

proc~~aot_path_close_fun~~CallsGraph proc~aot_path_close_fun aot_path_close_fun proc~aot_path_close_table aot_path_close_table proc~aot_path_close_fun->proc~aot_path_close_table proc~aot_fun_close aot_fun_close proc~aot_path_close_fun->proc~aot_fun_close proc~aot_table_close aot_table_close proc~aot_path_close_table->proc~aot_table_close proc~close_config close_config proc~aot_path_close_table->proc~close_config proc~flu_settop flu_settop proc~aot_fun_close->proc~flu_settop proc~aot_table_close->proc~flu_settop interface~lua_settop lua_settop proc~flu_settop->interface~lua_settop proc~flu_close flu_close proc~close_config->proc~flu_close interface~lua_close lua_close proc~flu_close->interface~lua_close

Called by

proc~~aot_path_close_fun~~CalledByGraph proc~aot_path_close_fun aot_path_close_fun interface~aot_path_close aot_path_close interface~aot_path_close->proc~aot_path_close_fun

Contents

Source Code

aot_path_close_fun

Source Code

  subroutine aot_path_close_fun(me, conf, fun, closeLua)
    !> The path object to open as a function
    type(aot_path_type), intent(inout) :: me
    !> The flu_state handle, which is either opened according to
    !! the path, or used to open the path in.
    type(flu_state) :: conf
    !> The opened function
    type(aot_fun_type), intent(inout) :: fun
    !> A flag to indicate, wether to close the Lua script, default
    !! is false.
    logical, intent(in), optional :: closeLua

    ! close function
    call aot_fun_close(L=conf, fun=fun)
    ! close tables
    call aot_path_close_table( me, conf, closeLua )

  end subroutine aot_path_close_fun