| Line | |
|---|
| 1 | & This command macro configures perl to build with
|
|---|
| 2 | & either the alpha or generally-available version of
|
|---|
| 3 | & VOS POSIX.1 support.
|
|---|
| 4 | & Written 00-10-24 by Paul Green (Paul_Green@stratus.com)
|
|---|
| 5 | &
|
|---|
| 6 | &begin_parameters
|
|---|
| 7 | version option(-version)name,allow(alpha,ga),=ga
|
|---|
| 8 | &end_parameters
|
|---|
| 9 | &echo command_lines
|
|---|
| 10 | &
|
|---|
| 11 | &if (file_info config.&version&.def date_modified) >= &+
|
|---|
| 12 | (file_info config.&version&.h date_modified)
|
|---|
| 13 | &then &do
|
|---|
| 14 | !copy_file config.&version&.def config.def -delete
|
|---|
| 15 | &
|
|---|
| 16 | & NOTE: We must invoke Perl 5 not Perl 4. The following
|
|---|
| 17 | & commands runs perl5 if it exists, otherwise runs perl,
|
|---|
| 18 | & in the hopes it is really perl5.
|
|---|
| 19 | &
|
|---|
| 20 | !attach_default_output (process_dir)>_where_perl ; &+
|
|---|
| 21 | where_command perl5 ; detach_default_output
|
|---|
| 22 | &if (index (contents (process_dir)>_where_perl) 'perl5:') ^= 0
|
|---|
| 23 | &then !perl5 config.pl
|
|---|
| 24 | &else !perl config.pl
|
|---|
| 25 | &
|
|---|
| 26 | !rename config.h.new config.&version&.h -delete
|
|---|
| 27 | !delete_file config.def
|
|---|
| 28 | &end
|
|---|
| 29 | &
|
|---|
| 30 | &if (file_info config.&version&.h date_modified) ^= (file_info config.h date_modified)
|
|---|
| 31 | &then !copy_file config.&version&.h config.h -delete -keep_dates
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
