/*
 * Created by PyramIDE.
 * User: フランスのトトロ aka (David RENÉ) 
 * Date: 15/01/2017
 * Time: 23:40
 * © David RENÉ 
 */

read densaku_lib/types/densaku.anubis
read densaku_lib/ds_generator.anubis
read tools/basis.anubis
read types_checking.anubis
read generation/types.anubis

public define Maybe(One)
  generate_message_files
  (
    List(DS_Type)     types,             //Types description
//    DS_Messages messages,
    String      destination_dir
  )=

  if check_types(types) is 
  {
    failure           then failure,
    success(_) then  
      //since _types is hk_database(name, apps),
      println("Generating types and message files");
      make_all_types(types, destination_dir);
      //make_vtm(apps, destination_dir);
      //if generate_create_table(apps, destination_dir) is failure then println("failure");failure else
      //println("Generating message collection");
      //if generate_menus(apps, destination_dir) is failure then println("failure");failure else
      success(unique)
  }.

global define DS_Generator_API
  ds_gen =
  ds_api(generate_message_files).