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

package ilog.language.design.base;

/**
 * @version     Last modified on Tue Dec 10 16:29:27 2002 by hak
 * @version          modified on Thu Jul 25 14:07:02 2002 by pviry
 * @author      <a href="mailto:hak@ilog.fr">Hassan A&iuml;t-Kaci</a>
 * @copyright   &copy; 2000-2002 <a href="http://www.ilog.fr/">ILOG, S.A.</a>
 */

import ilog.language.design.types.Type;
import ilog.language.design.backend.Runtime;
import ilog.language.design.backend.DisplayFormManager;

public class StringConcatenation extends TypedInstruction
{
  public StringConcatenation (Type type)
    {
      super(type);
      setName("STRCON");
    }

  public final void execute (Runtime r)
    {
      String s = _type.isVoid() ? r.displayFormManager().displayVoid()
        : r.displayFormManager().clearTags().unquotedDisplayForm(r.popObject(),_type);

      r.pushObject(s+r.popObject());
      r.incIP();
    }
}