//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
// PLEASE DO NOT EDIT WITHOUT THE EXPLICIT CONSENT OF THE AUTHOR! \\
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\

package hlt.language.design.instructions;

/**
 * @version     Last modified on Wed Jun 20 14:29:51 2012 by hak
 * @author      <a href="mailto:hak@acm.org">Hassan A&iuml;t-Kaci</a>
 * @copyright   &copy; <a href="http://www.hassan-ait-kaci.net/">by the author</a>
 */

import hlt.language.design.backend.Runtime;
import hlt.language.design.backend.IntMap;
import hlt.language.design.backend.ObjectMap;
import hlt.language.design.backend.Indexable;

public class FillMapFromIntMap extends Instruction implements PushValue, PushObject
{
  public FillMapFromIntMap ()
    {
      setName("FILL_MAP_IM");
    }

  public final void execute (Runtime r)
    {
      Indexable indexable = (Indexable)r.popObject();
      Object[] array = new Object[indexable.size()];
      IntMap intMap = (IntMap)(array[0] = r.popObject());
      int[] seed = intMap.array();
      Indexable seedIndexable = (Indexable)(intMap.indexable());
      for (int i=1; i<array.length; i++)
        array[i] = new IntMap(r.copy(seed),seedIndexable);
      r.pushObject(new ObjectMap(array,indexable));
      r.incIP();
    }
}