dm_lua_to Interface

public interface dm_lua_to

Converts Lua table to Fortran derived type.


Module Procedures

private function lua_to_job(lua, job) result(rc)

Reads Lua table into Fortran job type. The table has to be on top of the stack and will be removed once finished.

Arguments

Type IntentOptional Attributes Name
type(lua_state_type), intent(inout) :: lua

Lua state.
type(job_type), intent(out) :: job

Job.

Return Value integer

private function lua_to_job_list(lua, job_list) result(rc)

Reads Lua table into Fortran job list. The table has to be on top of the stack and will be removed once finished.

Arguments

Type IntentOptional Attributes Name
type(lua_state_type), intent(inout) :: lua

Lua state.
type(job_list_type), intent(out) :: job_list

Job list.

Return Value integer

private function lua_to_jobs(lua, jobs) result(rc)

Reads Lua table into Fortran jobs type array. The table has to be on top of the stack and will be removed once finished.

The functions returns the following error codes:

  • E_ALLOC if the array allocation failed.
  • E_EMPTY if the table is empty.
  • E_TYPE if the stack element is not a table.

Arguments

Type IntentOptional Attributes Name
type(lua_state_type), intent(inout) :: lua

Lua state.
type(job_type), intent(out), allocatable :: jobs(:)

Job type array.

Return Value integer

private function lua_to_observ(lua, observ) result(rc)

Reads Lua table into Fortran observation type. The table has to be on top of the stack and will be removed once finished.

Arguments

Type IntentOptional Attributes Name
type(lua_state_type), intent(inout) :: lua

Lua state.
type(observ_type), intent(out) :: observ

Observation.

Return Value integer

private function lua_to_observs(lua, observs) result(rc)

Reads Lua table into Fortran observation type array. The table has to be on top of the stack and will be removed once finished.

Arguments

Type IntentOptional Attributes Name
type(lua_state_type), intent(inout) :: lua

Lua state.
type(observ_type), intent(out), allocatable :: observs(:)

Observation type array.

Return Value integer

private function lua_to_report(lua, report) result(rc)

Reads Lua table into Fortran report type. The table has to be on top of the stack and will be removed once finished.

Arguments

Type IntentOptional Attributes Name
type(lua_state_type), intent(inout) :: lua

Lua state.
type(report_type), intent(out) :: report

Report.

Return Value integer

private function lua_to_request(lua, request) result(rc)

Reads Lua table into Fortran request type. The table has to be on top of the stack and will be removed once finished.

Arguments

Type IntentOptional Attributes Name
type(lua_state_type), intent(inout) :: lua

Lua state.
type(request_type), intent(out) :: request

Request.

Return Value integer