aot_top_get_quadruple Subroutine

private subroutine aot_top_get_quadruple(val, ErrCode, L, default)

Interpret topmost entry on Lua stack as a quadruple precision real.

NOTE that numbers provided by Lua are only double precision.

Arguments

TypeIntentOptionalAttributesName
real(kind=quad_k), intent(out) :: val

Value of the Variable in the script

integer, intent(out) :: ErrCode

Error code to indicate what kind of problem might have occured.

type(flu_State) :: L
real(kind=quad_k), intent(in), optional :: default

Some default value, that should be used, if the variable is not set in the Lua script.


Calls

proc~~aot_top_get_quadruple~~CallsGraph proc~aot_top_get_quadruple aot_top_get_quadruple proc~flu_isnumber flu_isnumber proc~aot_top_get_quadruple->proc~flu_isnumber flu_isnoneornil flu_isnoneornil proc~aot_top_get_quadruple->flu_isnoneornil proc~flu_pop flu_pop proc~aot_top_get_quadruple->proc~flu_pop proc~flu_todouble flu_todouble proc~aot_top_get_quadruple->proc~flu_todouble lua_isnumber lua_isnumber proc~flu_isnumber->lua_isnumber interface~lua_settop lua_settop proc~flu_pop->interface~lua_settop interface~lua_tonumberx lua_tonumberx proc~flu_todouble->interface~lua_tonumberx

Called by

proc~~aot_top_get_quadruple~~CalledByGraph proc~aot_top_get_quadruple aot_top_get_quadruple interface~aot_top_get_val~5 aot_top_get_val interface~aot_top_get_val~5->proc~aot_top_get_quadruple

Contents


Variables

TypeVisibilityAttributesNameInitial
logical, private :: not_retrievable