flu_pushreal Subroutine

private subroutine flu_pushreal(L, n)

Arguments

Type IntentOptional Attributes Name
type(flu_State) :: L
real :: n

Calls

proc~~flu_pushreal~~CallsGraph proc~flu_pushreal flu_pushreal interface~lua_pushnumber lua_pushnumber proc~flu_pushreal->interface~lua_pushnumber

Called by

proc~~flu_pushreal~~CalledByGraph proc~flu_pushreal flu_pushreal interface~flu_pushnumber flu_pushnumber interface~flu_pushnumber->proc~flu_pushreal proc~aot_fun_put_double aot_fun_put_double proc~aot_fun_put_double->interface~flu_pushnumber proc~aot_fun_put_extdouble aot_fun_put_extdouble proc~aot_fun_put_extdouble->interface~flu_pushnumber proc~aot_fun_put_quadruple aot_fun_put_quadruple proc~aot_fun_put_quadruple->interface~flu_pushnumber proc~aot_fun_put_single aot_fun_put_single proc~aot_fun_put_single->interface~flu_pushnumber proc~create_1darray_double create_1Darray_double proc~create_1darray_double->interface~flu_pushnumber proc~create_1darray_extdouble create_1Darray_extdouble proc~create_1darray_extdouble->interface~flu_pushnumber proc~create_1darray_quadruple create_1Darray_quadruple proc~create_1darray_quadruple->interface~flu_pushnumber proc~create_1darray_real create_1Darray_real proc~create_1darray_real->interface~flu_pushnumber proc~set_table_double set_table_double proc~set_table_double->interface~flu_pushnumber proc~set_table_extdouble set_table_extdouble proc~set_table_extdouble->interface~flu_pushnumber proc~set_table_quadruple set_table_quadruple proc~set_table_quadruple->interface~flu_pushnumber proc~set_table_real set_table_real proc~set_table_real->interface~flu_pushnumber interface~aot_fun_put aot_fun_put interface~aot_fun_put->proc~aot_fun_put_double interface~aot_fun_put->proc~aot_fun_put_single proc~aot_fun_put_double_v aot_fun_put_double_v interface~aot_fun_put->proc~aot_fun_put_double_v proc~aot_fun_put_single_v aot_fun_put_single_v interface~aot_fun_put->proc~aot_fun_put_single_v interface~aot_fun_put~2 aot_fun_put interface~aot_fun_put~2->proc~aot_fun_put_quadruple proc~aot_fun_put_quadruple_v aot_fun_put_quadruple_v interface~aot_fun_put~2->proc~aot_fun_put_quadruple_v interface~aot_fun_put~3 aot_fun_put interface~aot_fun_put~3->proc~aot_fun_put_extdouble proc~aot_fun_put_extdouble_v aot_fun_put_extdouble_v interface~aot_fun_put~3->proc~aot_fun_put_extdouble_v interface~aot_table_from_1darray aot_table_from_1Darray interface~aot_table_from_1darray->proc~create_1darray_extdouble interface~aot_table_from_1darray~2 aot_table_from_1Darray interface~aot_table_from_1darray~2->proc~create_1darray_double interface~aot_table_from_1darray~2->proc~create_1darray_real interface~aot_table_from_1darray~3 aot_table_from_1Darray interface~aot_table_from_1darray~3->proc~create_1darray_quadruple interface~aot_table_set_val aot_table_set_val interface~aot_table_set_val->proc~set_table_extdouble interface~aot_table_set_val~2 aot_table_set_val interface~aot_table_set_val~2->proc~set_table_double interface~aot_table_set_val~2->proc~set_table_real interface~aot_table_set_val~3 aot_table_set_val interface~aot_table_set_val~3->proc~set_table_quadruple proc~aot_fun_put_double_v->interface~aot_table_from_1darray proc~aot_fun_put_extdouble_v->interface~aot_table_from_1darray proc~aot_fun_put_quadruple_v->interface~aot_table_from_1darray proc~aot_fun_put_single_v->interface~aot_table_from_1darray proc~aot_require_buffer aot_require_buffer proc~aot_require_buffer->interface~aot_table_set_val

Source Code

  subroutine flu_pushreal(L, n)
    type(flu_State) :: L
    real :: n

    real(kind=c_double) :: n_c

    n_c = real(n, c_double)
    call lua_pushnumber(L%state, n_c)
  end subroutine flu_pushreal