files.anubis
1015 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
/*
* 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 //generate all types and the message for these types
read generation/messages.anubis //generate all messages collection
public define Maybe(One)
generate_message_files
(
List(DS_Type) types, //Types description
List(DS_Message) messages,
String destination_dir
)=
if check_types(types) is
{
failure then failure,
success(_) then
println("Generating types and message files");
make_all_types(types, destination_dir);
println("Generating messages collection");
make_all_messages(messages, destination_dir);
success(unique)
}.
global define DS_Generator_API
ds_gen =
ds_api(generate_message_files).