This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
amigaos4: use raise() instead of kill() on ourselves
[perl5.git] / djgpp / configure.bat
1 @echo off\r
2 set CONFIG=\r
3 set PATH_SEPARATOR=;\r
4 set PATH_EXPAND=y\r
5 sh -c 'if test $PATH_SEPARATOR = ";"; then exit 1; fi'\r
6 if ERRORLEVEL 1 goto path_sep_ok\r
7 echo Error:\a\r
8 echo Make sure the environment variable PATH_SEPARATOR=; while building perl!\r
9 echo Please check your DJGPP.ENV!\r
10 goto end\r
11 \r
12 :path_sep_ok\r
13 sh -c 'if test $PATH_EXPAND = "Y" -o $PATH_EXPAND = "y"; then exit 1; fi'\r
14 if ERRORLEVEL 1 goto path_exp_ok\r
15 echo Error:\a\r
16 echo Make sure the environment variable PATH_EXPAND=Y while building perl!\r
17 echo Please check your DJGPP.ENV!\r
18 goto end\r
19 \r
20 :path_exp_ok\r
21 sh -c '$SHELL -c "exit 128"'\r
22 if ERRORLEVEL 128 goto shell_ok\r
23 \r
24 echo Error:\a\r
25 echo The SHELL environment variable must be set to the full path of your sh.exe!\r
26 goto end\r
27 \r
28 :shell_ok\r
29 sh -c 'if test ! -d /tmp; then mkdir /tmp; fi'\r
30 cp djgpp.[hc] config.over ..\r
31 cd ..\r
32 echo Running sed...\r
33 sh djgpp/djgppsed.sh\r
34 \r
35 echo Running Configure...\r
36 sh Configure %1 %2 %3 %4 %5 %6 %7 %8 %9\r
37 :end\r