1 & This command macro creates the appropriate subdirectory
2 & for the specified processor type and then runs the
3 & build macro in that subdirectory to create the perl
4 & executable program module file.
5 & Written 99-02-03 by Paul Green (Paul_Green@stratus.com)
8 cpu option(-processor)name,allow(mc68020,i80860,pa7100,pa8000),=mc68020
9 recompile switch(-recompile),=1
10 rebind switch(-rebind),=1
11 module option(-module)module_name,='(current_module)'
16 &then &set_string recompile -recompile
17 &else &set_string recompile -no_recompile
20 &then &set_string rebind -rebind
21 &else &set_string rebind -no_rebind
24 &then &set_string obj ''
26 &then &set_string obj .860
28 &then &set_string obj .7100
30 &then &set_string obj .8000
32 &if ^ (exists obj&obj& -directory)
33 &then !create_dir obj&obj&
35 &if ^ (exists obj&obj&>build.out)
36 &then !create_file obj&obj&>build.out ; set_implicit_locking obj&obj&>build.out
38 !change_current_dir obj&obj&
39 !start_process (string <build -processor &cpu& &recompile& &rebind&) -module &module&