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

package ilog.language.design.base;

import ilog.language.design.backend.DisplayFormManager;
import ilog.language.design.backend.DisplayDeviceManager;
import ilog.language.design.backend.Runtime;

/**
 * @version     Last modified on Wed Jul 24 17:29:40 2002 by pviry
 * @version          modified on Sun Apr 21 19:29:09 2002 by hak
 * @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>
 */

public class WriteReal extends Instruction
{
  public WriteReal ()
    {
      setName("WRITE_R");
    }

  public final void execute (Runtime r)
    {
//       r.displayDeviceManager().print(Double.toString(r.popReal()));
      DisplayDeviceManager dd = r.displayDeviceManager();
      DisplayFormManager df = r.displayFormManager();
      dd.print(df.unquotedDisplayForm(r.popReal()));
      r.pushVoid();
      r.incIP();
    }
}