mirror of
https://github.com/ganelson/inform.git
synced 2024-07-03 07:24:58 +03:00
32 lines
688 B
OpenEdge ABL
32 lines
688 B
OpenEdge ABL
[ArchModule::] Arch Module.
|
|
|
|
Setting up the use of this module.
|
|
|
|
@ This section simoly 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:
|
|
|
|
@d ARCH_MODULE TRUE
|
|
|
|
@ This module defines the following classes:
|
|
|
|
@e inter_architecture_CLASS
|
|
@e target_vm_CLASS
|
|
@e compatibility_specification_CLASS
|
|
|
|
=
|
|
DECLARE_CLASS(inter_architecture)
|
|
DECLARE_CLASS(target_vm)
|
|
DECLARE_CLASS(compatibility_specification)
|
|
|
|
@ Like all modules, this one must define a |start| and |end| function:
|
|
|
|
=
|
|
void ArchModule::start(void) {
|
|
Architectures::create();
|
|
TargetVMs::create();
|
|
}
|
|
|
|
void ArchModule::end(void) {
|
|
}
|