0.6.0
Loading...
Searching...
No Matches
mod_json_writer Module Reference

Data Types

type  t_json
 JSON container. More...
 
type  t_json_value
 

Enumerations

enum  {
  json_value_object , json_value_array , json_value_null , json_value_boolean ,
  json_value_integer , json_value_double , json_value_string
}
 

Functions/Subroutines

subroutine json_up (json)
 Return to parent object.
 
subroutine json_add_object (json, key)
 Add an empty object.
 
subroutine json_add_array (json, key)
 Add an empty array.
 
subroutine json_finalize (json)
 Unalloc the structure.
 
subroutine json_add_integer (json, key, integer_value)
 
subroutine json_add_integer_array (json, key, integer_array)
 
subroutine json_add_double (json, key, double_value)
 
subroutine json_add_double_array (json, key, double_array)
 
subroutine json_add_string (json, key, string_value)
 
subroutine json_add_string_array (json, key, string_array)
 
subroutine json_add_boolean (json, key, boolean_value)
 
subroutine json_add_boolean_array (json, key, boolean_array)
 
subroutine json_add_null (json, key)
 
subroutine json_write_formatted (json, unit, iotype, v_list, iostat, iomsg)
 
recursive subroutine json_write_formatted_rec (json, json_value, lvl, unit, iostat, iomsg)
 
subroutine json_write_entry (json, lvl, key, text, has_next, unit, iostat, iomsg)
 
subroutine json_finalize_type_bound (json)
 
recursive subroutine json_value_finalize (json_value)
 
subroutine json_add_value (json, json_value, key)
 
subroutine json_add_child (json, json_value)
 
recursive subroutine json_add_next (json, json_value)
 
recursive subroutine json_go_tail (json)
 

Enumeration Type Documentation

◆ anonymous enum

anonymous enum
private
Enumerator
json_value_object 
json_value_array 
json_value_null 
json_value_boolean 
json_value_integer 
json_value_double 
json_value_string 

Function/Subroutine Documentation

◆ json_add_boolean()

subroutine mod_json_writer::json_add_boolean ( class(t_json), intent(inout) json,
character(len=*), intent(in) key,
logical, intent(in) boolean_value )
private

◆ json_add_boolean_array()

subroutine mod_json_writer::json_add_boolean_array ( class(t_json), intent(inout) json,
character(len=*), intent(in) key,
logical, dimension(:), intent(in) boolean_array )
private

◆ json_add_child()

subroutine mod_json_writer::json_add_child ( class(t_json), intent(inout) json,
type(t_json_value), pointer json_value )
private

◆ json_add_double()

subroutine mod_json_writer::json_add_double ( class(t_json), intent(inout) json,
character(len=*), intent(in) key,
double precision, intent(in) double_value )
private

◆ json_add_double_array()

subroutine mod_json_writer::json_add_double_array ( class(t_json), intent(inout) json,
character(len=*), intent(in) key,
double precision, dimension(:), intent(in) double_array )
private

◆ json_add_integer()

subroutine mod_json_writer::json_add_integer ( class(t_json), intent(inout) json,
character(len=*), intent(in) key,
integer, intent(in) integer_value )
private

◆ json_add_integer_array()

subroutine mod_json_writer::json_add_integer_array ( class(t_json), intent(inout) json,
character(len=*), intent(in) key,
integer, dimension(:), intent(in) integer_array )
private

◆ json_add_next()

recursive subroutine mod_json_writer::json_add_next ( class(t_json), intent(inout) json,
type(t_json_value), pointer json_value )
private

◆ json_add_null()

subroutine mod_json_writer::json_add_null ( class(t_json), intent(inout) json,
character(len=*), intent(in) key )
private

◆ json_add_string()

subroutine mod_json_writer::json_add_string ( class(t_json), intent(inout) json,
character(len=*), intent(in) key,
character(len=*), intent(in) string_value )
private

◆ json_add_string_array()

subroutine mod_json_writer::json_add_string_array ( class(t_json), intent(inout) json,
character(len=*), intent(in) key,
character(len=*), dimension(:), intent(in) string_array )
private

◆ json_add_value()

subroutine mod_json_writer::json_add_value ( class(t_json), intent(inout) json,
type(t_json_value), pointer json_value,
character(len=*), intent(in) key )
private

◆ json_finalize_type_bound()

subroutine mod_json_writer::json_finalize_type_bound ( class(t_json), intent(inout) json)
private

◆ json_go_tail()

recursive subroutine mod_json_writer::json_go_tail ( class(t_json), intent(inout) json)
private

◆ json_value_finalize()

recursive subroutine mod_json_writer::json_value_finalize ( type(t_json_value), intent(inout) json_value)
private

◆ json_write_entry()

subroutine mod_json_writer::json_write_entry ( class(t_json), intent(in) json,
integer, intent(in) lvl,
character(len=*), intent(in) key,
character(len=*), intent(in) text,
logical, intent(in) has_next,
integer, intent(in) unit,
integer, intent(out) iostat,
character(len=*), intent(inout) iomsg )
private

◆ json_write_formatted()

subroutine mod_json_writer::json_write_formatted ( class(t_json), intent(in) json,
integer, intent(in) unit,
character(len=*), intent(in) iotype,
integer, dimension(:), intent(in) v_list,
integer, intent(out) iostat,
character(len=*), intent(inout) iomsg )
private

◆ json_write_formatted_rec()

recursive subroutine mod_json_writer::json_write_formatted_rec ( class(t_json), intent(in) json,
class(t_json_value), intent(in) json_value,
integer, intent(in) lvl,
integer, intent(in) unit,
integer, intent(out) iostat,
character(len=*), intent(inout) iomsg )
private