123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122 |
- package Automake::Language;
- use 5.006;
- use strict;
- use Class::Struct ();
- Class::Struct::struct (
-
- 'name' => "\$",
-
- 'Name' => "\$",
-
- 'config_vars' => '@',
-
-
-
- 'pure' => "\$",
- 'autodep' => "\$",
-
- 'compiler' => "\$",
-
- 'compile' => "\$",
-
- 'compile_flag' => "\$",
- 'extensions' => '@',
-
-
-
- 'output_extensions' => "\$",
-
-
- 'flags' => "@",
-
- 'libtool_tag' => "\$",
-
-
- 'rule_file' => "\$",
-
- 'linker' => "\$",
-
- 'link' => "\$",
-
- 'ccer' => "\$",
-
- 'lder' => "\$",
-
- 'ld' => "\$",
-
- 'output_flag' => "\$",
- '_finish' => "\$",
-
-
-
- '_target_hook' => "\$",
-
-
- 'nodist_specific' => "\$");
- sub finish ($)
- {
- my ($self) = @_;
- if (defined $self->_finish)
- {
- &{$self->_finish} (@_);
- }
- }
- sub target_hook ($$$$%)
- {
- my ($self) = @_;
- if (defined $self->_target_hook)
- {
- $self->_target_hook->(@_);
- }
- }
- 1;
|