aot_table_close Subroutine

public subroutine aot_table_close(L, thandle)

Close a table again.

This is done by popping all values above and itself from the stack.

Arguments

Type IntentOptional Attributes Name
type(flu_State) :: L

Handle for the Lua script.

integer, intent(in) :: thandle

Handle of the table to close.


Calls

proc~~aot_table_close~~CallsGraph proc~aot_table_close aot_table_close proc~flu_settop flu_settop proc~aot_table_close->proc~flu_settop interface~lua_settop lua_settop proc~flu_settop->interface~lua_settop

Called by

proc~~aot_table_close~~CalledByGraph proc~aot_table_close aot_table_close proc~get_top_real_vvect get_top_real_vvect proc~get_top_real_vvect->proc~aot_table_close proc~get_top_integer_v get_top_integer_v proc~get_top_integer_v->proc~aot_table_close proc~get_top_real_v get_top_real_v proc~get_top_real_v->proc~aot_table_close proc~get_top_logical_vvect get_top_logical_vvect proc~get_top_logical_vvect->proc~aot_table_close proc~get_top_integer_vvect get_top_integer_vvect proc~get_top_integer_vvect->proc~aot_table_close proc~get_top_logical_v get_top_logical_v proc~get_top_logical_v->proc~aot_table_close proc~aot_require_buffer aot_require_buffer proc~aot_require_buffer->proc~aot_table_close proc~get_top_extdouble_vvect get_top_extdouble_vvect proc~get_top_extdouble_vvect->proc~aot_table_close proc~get_top_quadruple_v get_top_quadruple_v proc~get_top_quadruple_v->proc~aot_table_close proc~aot_path_close_table aot_path_close_table proc~aot_path_close_table->proc~aot_table_close proc~get_top_double_vvect get_top_double_vvect proc~get_top_double_vvect->proc~aot_table_close proc~get_top_long_vvect get_top_long_vvect proc~get_top_long_vvect->proc~aot_table_close proc~get_top_string_vvect get_top_string_vvect proc~get_top_string_vvect->proc~aot_table_close proc~get_top_double_v get_top_double_v proc~get_top_double_v->proc~aot_table_close proc~get_top_long_v get_top_long_v proc~get_top_long_v->proc~aot_table_close proc~get_top_string_v get_top_string_v proc~get_top_string_v->proc~aot_table_close proc~get_top_extdouble_v get_top_extdouble_v proc~get_top_extdouble_v->proc~aot_table_close proc~get_top_quadruple_vvect get_top_quadruple_vvect proc~get_top_quadruple_vvect->proc~aot_table_close interface~aot_top_get_val~3 aot_top_get_val interface~aot_top_get_val~3->proc~get_top_real_vvect interface~aot_top_get_val~3->proc~get_top_logical_vvect interface~aot_top_get_val~3->proc~get_top_integer_vvect interface~aot_top_get_val~3->proc~get_top_double_vvect interface~aot_top_get_val~3->proc~get_top_long_vvect interface~aot_top_get_val~3->proc~get_top_string_vvect interface~aot_top_get_val~5 aot_top_get_val interface~aot_top_get_val~5->proc~get_top_extdouble_vvect interface~aot_top_get_val~9 aot_top_get_val interface~aot_top_get_val~9->proc~get_top_quadruple_v proc~aot_path_close_fun aot_path_close_fun proc~aot_path_close_fun->proc~aot_path_close_table interface~aot_top_get_val~4 aot_top_get_val interface~aot_top_get_val~4->proc~get_top_integer_v interface~aot_top_get_val~4->proc~get_top_real_v interface~aot_top_get_val~4->proc~get_top_logical_v interface~aot_top_get_val~4->proc~get_top_double_v interface~aot_top_get_val~4->proc~get_top_long_v interface~aot_top_get_val~4->proc~get_top_string_v interface~aot_path_close aot_path_close interface~aot_path_close->proc~aot_path_close_table interface~aot_path_close->proc~aot_path_close_fun interface~aot_top_get_val~6 aot_top_get_val interface~aot_top_get_val~6->proc~get_top_extdouble_v interface~aot_top_get_val~8 aot_top_get_val interface~aot_top_get_val~8->proc~get_top_quadruple_vvect

Contents

Source Code


Source Code

  subroutine aot_table_close(L, thandle)
    type(flu_state) :: L !! Handle for the Lua script.

    !> Handle of the table to close.
    integer, intent(in) :: thandle

    if (thandle > 0) call flu_settop(L, thandle-1)
  end subroutine aot_table_close