1
0
Fork 0
mirror of https://github.com/ganelson/inform.git synced 2024-07-16 22:14:23 +03:00
inform7/services/inflections-module/Chapter 1/Inflections Module.w

38 lines
982 B
OpenEdge ABL
Raw Normal View History

2019-02-05 02:44:07 +02:00
[InflectionsModule::] Inflections Module.
Setting up the use of this module.
2022-05-17 09:46:35 +03:00
@ This section simply sets up the module in ways expected by //foundation//, and
contains no code of interest. The following constant exists only in tools
which use this module:
2019-02-05 02:44:07 +02:00
@d INFLECTIONS_MODULE TRUE
@ This module defines the following classes:
2019-02-05 02:44:07 +02:00
2020-06-29 13:41:12 +03:00
@e lexical_cluster_CLASS
@e individual_form_CLASS
2020-05-09 15:07:39 +03:00
@e plural_dictionary_entry_CLASS
@e verb_conjugation_CLASS
2019-02-05 02:44:07 +02:00
=
2020-06-29 13:41:12 +03:00
DECLARE_CLASS(individual_form)
DECLARE_CLASS(lexical_cluster)
2020-05-09 15:07:39 +03:00
DECLARE_CLASS(plural_dictionary_entry)
DECLARE_CLASS(verb_conjugation)
2019-02-05 02:44:07 +02:00
@ Like all modules, this one must define a |start| and |end| function:
2019-02-05 02:44:07 +02:00
2020-05-24 18:15:15 +03:00
@e CONSTRUCTED_PAST_PARTICIPLES_DA
@e CONSTRUCTED_PLURALS_DA
2019-02-05 02:44:07 +02:00
=
void InflectionsModule::start(void) {
2020-05-24 18:15:15 +03:00
Log::declare_aspect(CONSTRUCTED_PAST_PARTICIPLES_DA,
U"constructed past participles", FALSE, FALSE);
2020-05-24 18:15:15 +03:00
Log::declare_aspect(CONSTRUCTED_PLURALS_DA,
U"constructed plurals", FALSE, FALSE);
2019-02-05 02:44:07 +02:00
}
void InflectionsModule::end(void) {
}