[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Gnash-commit] /srv/bzr/gnash/avm2 r9628: Don't skip calls to String.con
From: |
Tom Stellard |
Subject: |
[Gnash-commit] /srv/bzr/gnash/avm2 r9628: Don't skip calls to String.concat() |
Date: |
Sun, 19 Oct 2008 14:01:52 +0800 |
User-agent: |
Bazaar (1.5) |
------------------------------------------------------------
revno: 9628
committer: Tom Stellard <address@hidden>
branch nick: gnash_dev
timestamp: Sun 2008-10-19 14:01:52 +0800
message:
Don't skip calls to String.concat()
modified:
testsuite/actionscript.all/haxe-swf9/as_to_hx.pl
=== modified file 'testsuite/actionscript.all/haxe-swf9/as_to_hx.pl'
--- a/testsuite/actionscript.all/haxe-swf9/as_to_hx.pl 2008-10-19 05:56:07
+0000
+++ b/testsuite/actionscript.all/haxe-swf9/as_to_hx.pl 2008-10-19 06:01:52
+0000
@@ -79,7 +79,7 @@
$_ =~ s/(new \w+)(;)/$1\(\)$2/g;
$_ =~ s/(new \w+)(\))/$1\(\)$2/g;
#Replace things like o = new Object(); with o = {};
- $_ =~ s/\s*(\w+)\s*=\s*new Object\(\)/$1={}/g;
+ $_ =~ s/new Object\(\)/{}/g;
#Add extra arguments when Date() is called with less than 6
args.
if($_ =~ /new Date\(.+\)/){
my $num_args = length(split(/,/,$_));
@@ -193,12 +193,6 @@
}
- #Ignore calls to concat, I cannot find the equivilent haxe function.
- if(index($_,"concat") != $[-1){
- skip_line();
- next;
- }
-
#Replace undefined with null.
$_ =~ s/undefined/null/g;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Gnash-commit] /srv/bzr/gnash/avm2 r9628: Don't skip calls to String.concat(),
Tom Stellard <=