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

package ilog.language.design.kernel;

/**
 * @version     Last modified on Thu Jul 18 17:46:24 2002 by pviry
 * @version          modified on Sat Mar 02 15:40:24 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>
 */

import ilog.language.design.types.*;
import ilog.language.design.base.*;

/**
 * This is the class of strings.
 */
public class StringConstant extends BuiltinObjectConstant
{
  public StringConstant ()
    {
      this("");
    }

  public StringConstant (String value)
    {
      super(Type.STRING);
      _setValue(value);
    }

  private void _setValue (String value)
    {
      _value = value.intern();
      if (_value == "") setIsNull();
    }

  public final String stringValue ()
    {
      return (String)_value;
    }

  public boolean equals (Object other)
    {
      if (!(other instanceof StringConstant))
        return false;
      
      return _value == ((StringConstant)other).value();
    }

  public final String toString ()
    {
      return "\""+_value+"\"";
    }
}