35 my $gcc_include_dir = File::Spec->catfile(get_epoc32_dir(),"include","gcc"); |
35 my $gcc_include_dir = File::Spec->catfile(get_epoc32_dir(),"include","gcc"); |
36 if (! -d $gcc_include_dir) { |
36 if (! -d $gcc_include_dir) { |
37 mkdir $gcc_include_dir or die $!; |
37 mkdir $gcc_include_dir or die $!; |
38 print ">>> Created \"$gcc_include_dir\"\n"; |
38 print ">>> Created \"$gcc_include_dir\"\n"; |
39 } |
39 } |
40 my $gcc_441_prelinclude_hdr_rel = File::Spec->catfile("epoc32","include","gcc","gcc_4_4_1.h"); |
40 my $gcc_443_prelinclude_hdr_rel = File::Spec->catfile("epoc32","include","gcc","gcc_4_4_3.h"); |
41 my $gcc_441_prelinclude_hdr_abs = File::Spec->catfile("$epocroot","$gcc_441_prelinclude_hdr_rel"); |
41 my $gcc_443_prelinclude_hdr_abs = File::Spec->catfile("$epocroot","$gcc_443_prelinclude_hdr_rel"); |
42 my $gcc_prelinclude_hdr = File::Spec->catfile("$epocroot","epoc32","include","gcc","gcc.h"); |
42 my $gcc_prelinclude_hdr = File::Spec->catfile("$epocroot","epoc32","include","gcc","gcc.h"); |
43 if (apply_patch_file($gcc_441_prelinclude_hdr_rel)) { |
43 if (apply_patch_file($gcc_443_prelinclude_hdr_rel)) { |
44 print ">>> Created \"$gcc_441_prelinclude_hdr_abs\"\n"; |
44 print ">>> Created \"$gcc_443_prelinclude_hdr_abs\"\n"; |
45 unlink($gcc_prelinclude_hdr) |
45 unlink($gcc_prelinclude_hdr) |
46 } |
46 } |
47 if (! -l $gcc_prelinclude_hdr) { |
47 if (! -l $gcc_prelinclude_hdr) { |
48 symlink($gcc_441_prelinclude_hdr_abs,$gcc_prelinclude_hdr); |
48 symlink($gcc_443_prelinclude_hdr_abs,$gcc_prelinclude_hdr); |
49 print ">>> Created symlink \"$gcc_441_prelinclude_hdr_abs\" -> \"$gcc_prelinclude_hdr\"\n"; |
49 print ">>> Created symlink \"$gcc_443_prelinclude_hdr_abs\" -> \"$gcc_prelinclude_hdr\"\n"; |
50 } |
50 } |
51 exit 0; |
51 exit 0; |
52 |
52 |