MSymbol.cs

   1 using System;
   2 using System.Collections;
   3 using M17N.Core;
   4
   5 namespace M17N.Core
   6 {
   7   public class MSymbol
   8   {
   9     static private Hashtable pool = new Hashtable ();
  10
  11     private class MSymbolData
  12     {
  13       public string name;
  14       public object value;
  15       public MPlist plist;
  16
  17       public MSymbolData (string name)
  18       {
  19         this.name = name;
  20       }
  21     }
  22
  23     private MSymbolData data;
  24
  25     public static MSymbol nil = new MSymbol ("nil");
  26     public static MSymbol t = new MSymbol ("t");
  27     public static MSymbol symbol = new MSymbol ("symbol");
  28     public static MSymbol mtext = new MSymbol ("mtext");
  29     public static MSymbol plist = new MSymbol ("plist");
  30     public static MSymbol integer = new MSymbol ("integer");
  31
  32     public MSymbol (string name)
  33     {
  34       if (! pool.ContainsKey (name))
  35         {
  36           data = new MSymbolData (name);
  37           pool.Add (name, data);
  38         }
  39       else
  40         data = (MSymbolData) pool[name];
  41     }
  42
  43     public override string ToString ()
  44     {
  45       string str = "";
  46
  47       foreach (char c in data.name)
  48         {
  49           if (c == '\\' || c == ' ' || c == '\'' || c == '\"' || c == ':')
  50             str += "\\";
  51           str += c;
  52         }
  53       return str;
  54     }
  55
  56     public override bool Equals (object sym)
  57     {
  58       if (sym == null)
  59         return false;
  60       return (this.data == ((MSymbol) sym).data);
  61     }
  62
  63     public override int GetHashCode ()
  64     {
  65       return (data.name.GetHashCode ());
  66     }
  67
  68     public static bool operator== (MSymbol sym1, MSymbol sym2)
  69     {
  70       return (sym1.data == sym2.data);
  71     }
  72
  73     public static bool operator!= (MSymbol sym1, MSymbol sym2)
  74     {
  75       return (sym1.data != sym2.data);
  76     }
  77
  78     public MPlist Find (MSymbol key)
  79     {
  80       return (data.plist == null ? null : data.plist.Find (key));
  81     }
  82
  83     public object Get (MSymbol key)
  84     {
  85       return (data.plist == null ? null : data.plist.Get (key));
  86     }
  87
  88     public object Put (MSymbol key, object val)
  89     {
  90       if (data.plist == null)
  91         data.plist = new MPlist ();
  92       return data.plist.Put (key, val);
  93     }
  94   }
  95 }