]> granicus.if.org Git - libvpx/commitdiff
Fix iOS conversion script
authorJohann <johannkoenig@google.com>
Tue, 13 Dec 2011 01:14:03 +0000 (17:14 -0800)
committerJohann <johannkoenig@google.com>
Tue, 13 Dec 2011 01:14:03 +0000 (17:14 -0800)
Mach-O prefixes function calls with _

Change-Id: I778c2ab91266887731a6a0316b42af7641826da4

build/make/ads2gas_apple.pl

index 78f4a97f52d390d515c7495055b43d4c33cce9c4..2af6116d53f7a4cf1810c61b0e759baf65bd1276 100755 (executable)
@@ -30,6 +30,8 @@ my @mapping_list = ("\$0", "\$1", "\$2", "\$3", "\$4", "\$5", "\$6", "\$7", "\$8
 
 my @incoming_array;
 
+my @imported_functions;
+
 # Perl trim function to remove whitespace from the start and end of the string
 sub trim($)
 {
@@ -132,7 +134,18 @@ while (<STDIN>)
     # Make function visible to linker, and make additional symbol with
     # prepended underscore
     s/EXPORT\s+\|([\$\w]*)\|/.globl _$1\n\t.globl $1/;
-    s/IMPORT\s+\|([\$\w]*)\|/.globl $1/;
+
+    # Prepend imported functions with _
+    if (s/IMPORT\s+\|([\$\w]*)\|/.globl $1/)
+    {
+        $function = trim($1);
+        push(@imported_functions, $function);
+    }
+
+    foreach $function (@imported_functions)
+    {
+        s/$function/_$function/;
+    }
 
     # No vertical bars required; make additional symbol with prepended
     # underscore