1 & This command macro configures perl to build with
2 & either the alpha or generally-available version of
4 & Written 00-10-24 by Paul Green (Paul_Green@stratus.com)
7 version option(-version)name,allow(alpha,ga),=ga
11 &if (file_info config.&version&.def date_modified) >= &+
12 (file_info config.&version&.h date_modified)
14 !copy_file config.&version&.def config.def -delete
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.
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
26 !rename config.h.new config.&version&.h -delete
27 !delete_file config.def
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