コード例 #1
0
        public Global(SystemImplementation parent, XmlNode xml, XmlNamespaceManager nsm)
            : base(parent, xml, nsm)
        {
            this.GlobalType           = GlobalTypeEnum.Variable;
            this.Initializer          = new Initializer <Global>(this);
            this.ImplementedProtocols = new NotifyingSortedSet <string>();

            XmlAttribute attr = xml.SelectSingleNode("@type", nsm) as XmlAttribute;

            if (attr != null)
            {
                this.GlobalType = (GlobalTypeEnum)Enum.Parse(typeof(GlobalTypeEnum), attr.Value, true);
            }

            foreach (XmlAttribute att in xml.SelectNodes("si:ImplementedProtocols/si:Protocol/@name", nsm))
            {
                this.ImplementedProtocols.Add(att.Value);
            }

            XmlNode elem = xml.SelectSingleNode("si:Initializer", nsm);

            if (elem != null)
            {
                this.Initializer = new Initializer <Global>(this, elem, nsm);
            }
        }
コード例 #2
0
ファイル: Global.cs プロジェクト: erlis/IronSmalltalk
 public Global(SystemImplementation parent)
     : base(parent)
 {
     this.GlobalType = GlobalTypeEnum.Variable;
     this.Initializer = new Initializer<Global>(this);
     this.ImplementedProtocols = new NotifyingSortedSet<string>();
 }
コード例 #3
0
 public Global(SystemImplementation parent)
     : base(parent)
 {
     this.GlobalType           = GlobalTypeEnum.Variable;
     this.Initializer          = new Initializer <Global>(this);
     this.ImplementedProtocols = new NotifyingSortedSet <string>();
 }
コード例 #4
0
ファイル: Pool.cs プロジェクト: erlis/IronSmalltalk
        public Pool(SystemImplementation parent, XmlNode xml, XmlNamespaceManager nsm)
            : base(parent, xml, nsm)
        {
            this.Values = new NotifyingHashSet<PoolValue>();

            foreach (XmlNode node in xml.SelectNodes("si:PoolValue", nsm))
                this.Values.Add(new PoolValue(this, node, nsm));
        }
コード例 #5
0
        public Pool(SystemImplementation parent, XmlNode xml, XmlNamespaceManager nsm)
            : base(parent, xml, nsm)
        {
            this.Values = new NotifyingHashSet <PoolValue>();

            foreach (XmlNode node in xml.SelectNodes("si:PoolValue", nsm))
            {
                this.Values.Add(new PoolValue(this, node, nsm));
            }
        }
コード例 #6
0
ファイル: Class.cs プロジェクト: todor-dk/IronSmalltalk
 public Class(SystemImplementation parent)
     : base(parent)
 {
     this.InstanceState                = InstanceStateEnum.NamedObjectVariables;
     this.InstanceVariables            = new NotifyingSortedSet <string>();
     this.ClassVariables               = new NotifyingSortedSet <string>();
     this.ClassInstanceVariables       = new NotifyingSortedSet <string>();
     this.SharedPools                  = new NotifyingSortedSet <string>();
     this.InstanceMethods              = new NotifyingHashSet <Method>();
     this.ClassMethods                 = new NotifyingHashSet <Method>();
     this.Initializer                  = new Initializer <Class>(this);
     this.ImplementedInstanceProtocols = new NotifyingSortedSet <string>();
     this.ImplementedClassProtocols    = new NotifyingSortedSet <string>();
 }
コード例 #7
0
ファイル: Class.cs プロジェクト: erlis/IronSmalltalk
 public Class(SystemImplementation parent)
     : base(parent)
 {
     this.InstanceState = InstanceStateEnum.NamedObjectVariables;
     this.InstanceVariables = new NotifyingSortedSet<string>();
     this.ClassVariables = new NotifyingSortedSet<string>();
     this.ClassInstanceVariables = new NotifyingSortedSet<string>();
     this.SharedPools = new NotifyingSortedSet<string>();
     this.InstanceMethods = new NotifyingHashSet<Method>();
     this.ClassMethods = new NotifyingHashSet<Method>();
     this.Initializer = new Initializer<Class>(this);
     this.ImplementedInstanceProtocols = new NotifyingSortedSet<string>();
     this.ImplementedClassProtocols = new NotifyingSortedSet<string>();
 }
コード例 #8
0
ファイル: Class.cs プロジェクト: erlis/IronSmalltalk
        public Class(SystemImplementation parent, XmlNode xml, XmlNamespaceManager nsm)
            : base(parent, xml, nsm)
        {
            this.InstanceState = InstanceStateEnum.NamedObjectVariables;
            this.InstanceVariables = new NotifyingSortedSet<string>();
            this.ClassVariables = new NotifyingSortedSet<string>();
            this.ClassInstanceVariables = new NotifyingSortedSet<string>();
            this.SharedPools = new NotifyingSortedSet<string>();
            this.InstanceMethods = new NotifyingHashSet<Method>();
            this.ClassMethods = new NotifyingHashSet<Method>();
            this.Initializer = new Initializer<Class>(this);
            this.ImplementedInstanceProtocols = new NotifyingSortedSet<string>();
            this.ImplementedClassProtocols = new NotifyingSortedSet<string>();

            XmlAttribute attr = xml.SelectSingleNode("@instanceState", nsm) as XmlAttribute;
            if (attr != null)
                this.InstanceState = (InstanceStateEnum)Enum.Parse(typeof(InstanceStateEnum), attr.Value, true);
            attr = xml.SelectSingleNode("@superclassName", nsm) as XmlAttribute;
            if (attr != null)
                this.SuperclassName = attr.Value.Trim();

            foreach (XmlAttribute att in xml.SelectNodes("si:SharedPools/si:Pool/@name", nsm))
                this.SharedPools.Add(att.Value);
            foreach (XmlAttribute att in xml.SelectNodes("si:ImplementedInstanceProtocols/si:Protocol/@name", nsm))
                this.ImplementedInstanceProtocols.Add(att.Value);
            foreach (XmlAttribute att in xml.SelectNodes("si:ImplementedClassProtocols/si:Protocol/@name", nsm))
                this.ImplementedClassProtocols.Add(att.Value);
            foreach (XmlAttribute att in xml.SelectNodes("si:InstanceVariables/si:Variable/@name", nsm))
                this.InstanceVariables.Add(att.Value);
            foreach (XmlAttribute att in xml.SelectNodes("si:ClassVariables/si:Variable/@name", nsm))
                this.ClassVariables.Add(att.Value);
            foreach (XmlAttribute att in xml.SelectNodes("si:ClassInstanceVariables/si:Variable/@name", nsm))
                this.ClassInstanceVariables.Add(att.Value);
            foreach (XmlAttribute att in xml.SelectNodes("si:SharedPools/si:Variable/@name", nsm))
                this.SharedPools.Add(att.Value);

            foreach (XmlNode node in xml.SelectNodes("si:InstanceMethods/si:Method", nsm))
                this.InstanceMethods.Add(new Method(this, node, nsm));
            foreach (XmlNode node in xml.SelectNodes("si:ClassMethods/si:Method", nsm))
                this.ClassMethods.Add(new Method(this, node, nsm));

            XmlNode elem = xml.SelectSingleNode("si:Initializer", nsm);
            if (elem != null)
                this.Initializer = new Initializer<Class>(this, elem, nsm);
        }
コード例 #9
0
ファイル: Global.cs プロジェクト: erlis/IronSmalltalk
        public Global(SystemImplementation parent, XmlNode xml, XmlNamespaceManager nsm)
            : base(parent, xml, nsm)
        {
            this.GlobalType = GlobalTypeEnum.Variable;
            this.Initializer = new Initializer<Global>(this);
            this.ImplementedProtocols = new NotifyingSortedSet<string>();

            XmlAttribute attr = xml.SelectSingleNode("@type", nsm) as XmlAttribute;
            if (attr != null)
                this.GlobalType = (GlobalTypeEnum)Enum.Parse(typeof(GlobalTypeEnum), attr.Value, true);

            foreach (XmlAttribute att in xml.SelectNodes("si:ImplementedProtocols/si:Protocol/@name", nsm))
                this.ImplementedProtocols.Add(att.Value);

            XmlNode elem = xml.SelectSingleNode("si:Initializer", nsm);
            if (elem != null)
                this.Initializer = new Initializer<Global>(this, elem, nsm);
        }
コード例 #10
0
 public static new void FileOut(SystemImplementation systemImplementation, TextWriter writer)
 {
     FileOutWriterIST10 fileout = new FileOutWriterIST10(systemImplementation, writer);
     fileout.EmitInterchangeFile();
 }
コード例 #11
0
 protected FileOutWriterIST10(SystemImplementation systemImplementation, TextWriter writer)
     : base(systemImplementation, writer)
 {
 }
コード例 #12
0
ファイル: Pool.cs プロジェクト: erlis/IronSmalltalk
 public Pool(SystemImplementation parent)
     : base(parent)
 {
     this.Values = new NotifyingHashSet<PoolValue>();
 }
コード例 #13
0
 public Pool(SystemImplementation parent)
     : base(parent)
 {
     this.Values = new NotifyingHashSet <PoolValue>();
 }
コード例 #14
0
ファイル: Class.cs プロジェクト: todor-dk/IronSmalltalk
        public Class(SystemImplementation parent, XmlNode xml, XmlNamespaceManager nsm)
            : base(parent, xml, nsm)
        {
            this.InstanceState                = InstanceStateEnum.NamedObjectVariables;
            this.InstanceVariables            = new NotifyingSortedSet <string>();
            this.ClassVariables               = new NotifyingSortedSet <string>();
            this.ClassInstanceVariables       = new NotifyingSortedSet <string>();
            this.SharedPools                  = new NotifyingSortedSet <string>();
            this.InstanceMethods              = new NotifyingHashSet <Method>();
            this.ClassMethods                 = new NotifyingHashSet <Method>();
            this.Initializer                  = new Initializer <Class>(this);
            this.ImplementedInstanceProtocols = new NotifyingSortedSet <string>();
            this.ImplementedClassProtocols    = new NotifyingSortedSet <string>();

            XmlAttribute attr = xml.SelectSingleNode("@instanceState", nsm) as XmlAttribute;

            if (attr != null)
            {
                this.InstanceState = (InstanceStateEnum)Enum.Parse(typeof(InstanceStateEnum), attr.Value, true);
            }
            attr = xml.SelectSingleNode("@superclassName", nsm) as XmlAttribute;
            if (attr != null)
            {
                this.SuperclassName = attr.Value.Trim();
            }

            foreach (XmlAttribute att in xml.SelectNodes("si:SharedPools/si:Pool/@name", nsm))
            {
                this.SharedPools.Add(att.Value);
            }
            foreach (XmlAttribute att in xml.SelectNodes("si:ImplementedInstanceProtocols/si:Protocol/@name", nsm))
            {
                this.ImplementedInstanceProtocols.Add(att.Value);
            }
            foreach (XmlAttribute att in xml.SelectNodes("si:ImplementedClassProtocols/si:Protocol/@name", nsm))
            {
                this.ImplementedClassProtocols.Add(att.Value);
            }
            foreach (XmlAttribute att in xml.SelectNodes("si:InstanceVariables/si:Variable/@name", nsm))
            {
                this.InstanceVariables.Add(att.Value);
            }
            foreach (XmlAttribute att in xml.SelectNodes("si:ClassVariables/si:Variable/@name", nsm))
            {
                this.ClassVariables.Add(att.Value);
            }
            foreach (XmlAttribute att in xml.SelectNodes("si:ClassInstanceVariables/si:Variable/@name", nsm))
            {
                this.ClassInstanceVariables.Add(att.Value);
            }
            foreach (XmlAttribute att in xml.SelectNodes("si:SharedPools/si:Variable/@name", nsm))
            {
                this.SharedPools.Add(att.Value);
            }

            foreach (XmlNode node in xml.SelectNodes("si:InstanceMethods/si:Method", nsm))
            {
                this.InstanceMethods.Add(new Method(this, node, nsm));
            }
            foreach (XmlNode node in xml.SelectNodes("si:ClassMethods/si:Method", nsm))
            {
                this.ClassMethods.Add(new Method(this, node, nsm));
            }

            XmlNode elem = xml.SelectSingleNode("si:Initializer", nsm);

            if (elem != null)
            {
                this.Initializer = new Initializer <Class>(this, elem, nsm);
            }
        }