testsuite/misc-swfmill.all/dict_cross.xml

   1 <?xml version="1.0"?>
   2 <swf version="6" compressed="0">
   3
   4 <!--
   5
   6  Show that constant pool definition crosses boundary
   7  of a single DoAction block.
   8
   9 -->
  10
  11   <Header framerate="12" frames="2">
  12     <size>
  13       <Rectangle left="0" right="12800" top="0" bottom="9600"/>
  14     </size>
  15     <tags>
  16
  17       <DoAction><actions>
  18
  19         <!-- DICT 1 -->
  20           <Dictionary>
  21             <strings>
  22               <String value="A"/>
  23             </strings>
  24           </Dictionary>
  25
  26           <PushData>
  27             <items>
  28                 <!-- Lookup in DICT 1 -->
  29               <StackDictionaryLookup index="0"/>
  30             </items>
  31           </PushData>
  32
  33         <!-- DICT 2 -->
  34           <Dictionary>
  35             <strings> <String value="B"/> </strings>
  36           </Dictionary>
  37
  38           <EndAction/>
  39
  40       </actions> </DoAction>
  41
  42       <DoAction><actions>
  43
  44           <PushData>
  45             <items>
  46                 <!-- Lookup in DICT 2 -->
  47               <StackDictionaryLookup index="0"/>
  48             </items>
  49           </PushData>
  50
  51
  52         <!-- DICT 2 (skipped by BranchAlways) -->
  53           <BranchAlways byteOffset="7"/>
  54           <Dictionary>
  55             <strings> <String value="C"/> </strings>
  56           </Dictionary>
  57
  58           <PushData>
  59             <items>
  60                 <!-- Lookup in DICT 2 -->
  61               <StackDictionaryLookup index="0"/>
  62             </items>
  63           </PushData>
  64
  65           <AddTyped/>
  66           <AddTyped/>
  67           <Duplicate/>
  68           <Trace/>
  69
  70           // Verify the stack contains 'ABB'
  71           <PushData>
  72             <items>
  73               <StackString value="ABB"/>
  74             </items>
  75           </PushData>
  76           <EqualTyped/>
  77
  78           // If true, jump to PASSED tracing
  79           <BranchIfTrue byteOffset="51"/>
  80
  81           // Else, trace XFAILED
  82           <PushData>
  83             <items>
  84               <StackString value="FAILED: something went wrong with dicts "/>
  85             </items>
  86           </PushData>
  87           <Trace/>
  88           <BranchAlways byteOffset="44"/> // get to end
  89
  90           // PASSED tracing
  91           <PushData>
  92             <items>
  93               <StackString value="PASSED: cross boundary dicts all fine "/>
  94             </items>
  95           </PushData>
  96           <Trace/>
  97
  98           // END OF TEST tag
  99           <PushData>
 100             <items>
 101               <StackString value="END OF TEST"/>
 102             </items>
 103           </PushData>
 104           <Trace/>
 105
 106           <EndAction/>
 107
 108       </actions> </DoAction>
 109
 110       <ShowFrame/>
 111       <End/>
 112     </tags>
 113   </Header>
 114 </swf>
 115