aot_table_close Subroutine

  1. aot_table_ops_module.f90
  2. aot_table_ops_module
  3. aot_table_close

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 AttributesName
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_string_vvect get_top_string_vvect proc~get_top_string_vvect->proc~aot_table_close interface~aot_top_get_val~2 aot_top_get_val proc~get_top_string_vvect->interface~aot_top_get_val~2 proc~get_top_logical_vvect get_top_logical_vvect proc~get_top_logical_vvect->proc~aot_table_close proc~get_top_logical_vvect->interface~aot_top_get_val~2 proc~get_top_integer_v get_top_integer_v proc~get_top_integer_v->proc~aot_table_close proc~get_top_integer_v->interface~aot_top_get_val~2 proc~get_top_long_v get_top_long_v proc~get_top_long_v->proc~aot_table_close proc~get_top_long_v->interface~aot_top_get_val~2 proc~get_top_double_v get_top_double_v proc~get_top_double_v->proc~aot_table_close proc~get_top_double_v->interface~aot_top_get_val~2 proc~aot_require_buffer aot_require_buffer proc~aot_require_buffer->proc~aot_table_close proc~get_top_real_vvect get_top_real_vvect proc~get_top_real_vvect->proc~aot_table_close proc~get_top_real_vvect->interface~aot_top_get_val~2 proc~get_top_string_v get_top_string_v proc~get_top_string_v->proc~aot_table_close proc~get_top_string_v->interface~aot_top_get_val~2 proc~get_top_extdouble_vvect get_top_extdouble_vvect proc~get_top_extdouble_vvect->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_real_v->interface~aot_top_get_val~2 proc~get_top_logical_v get_top_logical_v proc~get_top_logical_v->proc~aot_table_close proc~get_top_logical_v->interface~aot_top_get_val~2 proc~get_top_extdouble_v get_top_extdouble_v proc~get_top_extdouble_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_integer_vvect get_top_integer_vvect proc~get_top_integer_vvect->proc~aot_table_close proc~get_top_integer_vvect->interface~aot_top_get_val~2 proc~get_top_double_vvect get_top_double_vvect proc~get_top_double_vvect->proc~aot_table_close proc~get_top_double_vvect->interface~aot_top_get_val~2 proc~get_top_quadruple_vvect get_top_quadruple_vvect proc~get_top_quadruple_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_long_vvect->interface~aot_top_get_val~2 proc~get_top_quadruple_v get_top_quadruple_v proc~get_top_quadruple_v->proc~aot_table_close interface~aot_top_get_val~3 aot_top_get_val interface~aot_top_get_val~3->proc~get_top_string_vvect interface~aot_top_get_val~3->proc~get_top_logical_vvect interface~aot_top_get_val~3->proc~get_top_real_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~7 aot_top_get_val interface~aot_top_get_val~7->proc~get_top_quadruple_vvect 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_long_v interface~aot_top_get_val~4->proc~get_top_double_v interface~aot_top_get_val~4->proc~get_top_string_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~6 aot_top_get_val interface~aot_top_get_val~6->proc~get_top_extdouble_vvect interface~aot_top_get_val~8 aot_top_get_val interface~aot_top_get_val~8->proc~get_top_quadruple_v interface~aot_top_get_val~2->proc~get_top_extdouble_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 proc~get_table_string_vvect get_table_string_vvect proc~get_table_string_vvect->interface~aot_top_get_val~2 proc~get_table_real_vvect get_table_real_vvect proc~get_table_real_vvect->interface~aot_top_get_val~2 proc~get_table_real_v get_table_real_v proc~get_table_real_v->interface~aot_top_get_val~2 proc~get_table_long_v get_table_long_v proc~get_table_long_v->interface~aot_top_get_val~2 proc~get_table_long_vvect get_table_long_vvect proc~get_table_long_vvect->interface~aot_top_get_val~2 proc~get_table_logical_vvect get_table_logical_vvect proc~get_table_logical_vvect->interface~aot_top_get_val~2 proc~get_table_integer_v get_table_integer_v proc~get_table_integer_v->interface~aot_top_get_val~2 proc~get_table_string_v get_table_string_v proc~get_table_string_v->interface~aot_top_get_val~2 proc~get_table_integer_vvect get_table_integer_vvect proc~get_table_integer_vvect->interface~aot_top_get_val~2 proc~get_table_logical_v get_table_logical_v proc~get_table_logical_v->interface~aot_top_get_val~2 proc~get_table_double_vvect get_table_double_vvect proc~get_table_double_vvect->interface~aot_top_get_val~2 proc~get_table_double_v get_table_double_v proc~get_table_double_v->interface~aot_top_get_val~2 interface~aot_get_val aot_get_val interface~aot_get_val->proc~get_table_string_vvect interface~aot_get_val->proc~get_table_real_vvect interface~aot_get_val->proc~get_table_long_vvect interface~aot_get_val->proc~get_table_logical_vvect interface~aot_get_val->proc~get_table_integer_vvect interface~aot_get_val->proc~get_table_double_vvect interface~aot_table_get_val~4 aot_table_get_val interface~aot_table_get_val~4->proc~get_table_string_vvect interface~aot_table_get_val~4->proc~get_table_real_vvect interface~aot_table_get_val~4->proc~get_table_long_vvect interface~aot_table_get_val~4->proc~get_table_logical_vvect interface~aot_table_get_val~4->proc~get_table_integer_vvect interface~aot_table_get_val~4->proc~get_table_double_vvect interface~aot_get_val~2 aot_get_val interface~aot_get_val~2->proc~get_table_real_v interface~aot_get_val~2->proc~get_table_long_v interface~aot_get_val~2->proc~get_table_integer_v interface~aot_get_val~2->proc~get_table_string_v interface~aot_get_val~2->proc~get_table_logical_v interface~aot_get_val~2->proc~get_table_double_v interface~aot_table_get_val~5 aot_table_get_val interface~aot_table_get_val~5->proc~get_table_real_v interface~aot_table_get_val~5->proc~get_table_long_v interface~aot_table_get_val~5->proc~get_table_integer_v interface~aot_table_get_val~5->proc~get_table_string_v interface~aot_table_get_val~5->proc~get_table_logical_v interface~aot_table_get_val~5->proc~get_table_double_v

Contents

Source Code

aot_table_close

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