Re: [Ming-dev] actionscript code generation bugHi

[Klaus R. <kl...@re...>]

Hi,

your script produces the following output with current CVS-HEAD:

<snip>
Offset: 36 (0x0024)
Block type: 12 (SWF_DOACTION)
Block length: 81

 11 Actions
    42:SWFACTION_CONSTANTPOOL
     [000] xtext
     [001] Math
     [002] abs
    62:SWFACTION_PUSH
     [000]   Constant: 0 "xtext"
     [001]   Integer: 4
     [002]   Integer: 3
    77:SWFACTION_LESS2
    78:SWFACTION_IF
    BranchOffset: 13, TargetOffset: 96
    2 Action
    83:SWFACTION_PUSH
     [000]   Integer: 6
    91:SWFACTION_JUMP
    BranchOffset: 8, TargetOffset: 104
    96:SWFACTION_PUSH
     [000]   Integer: 5
    104:SWFACTION_PUSH
     [000]   Integer: 1
     [001]   Constant: 1 "Math"
    114:SWFACTION_GETVARIABLE
    115:SWFACTION_PUSH
     [000]   Constant: 2 "abs"
    120:SWFACTION_CALLMETHOD
    121:SWFACTION_SETVARIABLE
    122:SWFACTION_END

<snap>

Looks OK for me. What did i miss ?

	Klaus


Am Samstag 01 Dezember 2007 20:49:47 schrieb Albrecht Kleine:
> Hi Klaus,
> 
> maybe I did something wrong, but the patch didn't help.
> If you want test it yourself, here is the Perl script I used:
> 
> 
> #!/usr/bin/perl -w
> use SWF qw(:ALL);
> SWF::setVersion(7);
> my $m = new SWF::Movie();
> my $font = new SWF::Font("_sans");
> my $tf = new SWF::TextField();
> $tf->setFont($font);
> $tf->setName("xtext");
> $tf->setHeight( 40);
> $tf->setBounds(150,150);
> $m->add($tf);
> $m->add(new SWF::Action(
> <<ENDACTION
>  xtext=Math.abs(3>4? 5:6);
> ENDACTION
> ));
> $m->nextFrame();
> $m->save("test.swf");
> __EOF__
> 
> Thank you once again!
> 
> Cheers,
> Albrecht
> 
> -------------------------------------------------------------------------
> SF.Net email is sponsored by: The Future of Linux Business White Paper
> from Novell.  From the desktop to the data center, Linux is going
> mainstream.  Let it simplify your IT future.
> http://altfarm.mediaplex.com/ad/ck/8857-50307-18918-4
> _______________________________________________
> Ming-devr mailing list
> Min...@li...
> https://lists.sourceforge.net/lists/listinfo/ming-devr
>