aot_path_close_fun Subroutine

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 Attributes Name
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_fun_close aot_fun_close proc~aot_path_close_fun->proc~aot_fun_close proc~aot_path_close_table aot_path_close_table proc~aot_path_close_fun->proc~aot_path_close_table proc~flu_settop flu_settop proc~aot_fun_close->proc~flu_settop 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~aot_table_close->proc~flu_settop proc~flu_close flu_close proc~close_config->proc~flu_close interface~lua_settop lua_settop proc~flu_settop->interface~lua_settop 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

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