/** * Copyright (c) Rich Hickey. All rights reserved. * The use and distribution terms for this software are covered by the * Common Public License 1.0 (http://opensource.org/licenses/cpl.php) * which can be found in the file CPL.TXT at the root of this distribution. * By using this software in any fashion, you are agreeing to be bound by * the terms of this license. * You must not remove this notice, or any other, from this software. **/ /* rich Mar 27, 2006 1:29:39 PM */ using System; using System.Collections.Specialized; namespace org.clojure.runtime { public class Namespace { /** * String->Namespace */ static public HybridDictionary table = new HybridDictionary(); /** * String->Symbol */ public HybridDictionary vars = new HybridDictionary(); public HybridDictionary accessors = new HybridDictionary(); public String name; Namespace(String name) { this.name = name; table.Add(name, this); } static public Namespace find(String name) { return (Namespace) table[name]; } static public Namespace findOrCreate(String name) { lock(table) { Namespace ns = find(name); if(ns == null) ns = new Namespace(name); return ns; } } static public Var internVar(String ns, String var) { return findOrCreate(ns).internVar(var); } static public Accessor internAccessor(String ns, String name) { return findOrCreate(ns).internAccessor(name); } public Var internVar(String name) { lock(vars) { Var var = (Var) vars[name]; if(var == null) vars.Add(name,var = new Var(name, this)); return var; } } public Accessor internAccessor(String name) { lock(accessors) { Accessor acc = (Accessor) accessors[name]; if(acc == null) accessors.Add(name, acc = new Accessor(name, this)); return acc; } } } }