cross-plat-dev-utils/fix_epoc32.pl
changeset 42 cf609178ac39
parent 40 68f68128601f
equal deleted inserted replaced
41:1600211976c3 42:cf609178ac39
    12 
    12 
    13 use strict;
    13 use strict;
    14 use check_os;
    14 use check_os;
    15 use perl_run;
    15 use perl_run;
    16 
    16 
    17 my $rc = perl_run("fix_tool_exports.pl @ARGV");
       
    18 exit $rc, if $rc;
       
    19 if (os_is_windows()) {
    17 if (os_is_windows()) {
    20 	exit perl_run("fix_epoc32_win.pl @ARGV");
    18 	exit perl_run("fix_epoc32_win.pl @ARGV");
    21 }
    19 }
    22 if (os_is_linux()) {
    20 if (os_is_linux()) {
    23 	exit perl_run("fix_epoc32_linux.pl @ARGV");
    21 	exit perl_run("fix_epoc32_linux.pl @ARGV");