diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/jvm/clojure/lang/RT.java | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/src/jvm/clojure/lang/RT.java b/src/jvm/clojure/lang/RT.java index c35bdedb..aa9736b9 100644 --- a/src/jvm/clojure/lang/RT.java +++ b/src/jvm/clojure/lang/RT.java @@ -102,7 +102,7 @@ Symbol.create("Exception"), Exception.class ); -static final Namespace CLOJURE_NS = Namespace.findOrCreate(Symbol.create("clojure")); +static public final Namespace CLOJURE_NS = Namespace.findOrCreate(Symbol.create("clojure")); //static final Namespace USER_NS = Namespace.findOrCreate(Symbol.create("user")); final static public Var OUT = Var.intern(CLOJURE_NS, Symbol.create("*out*"), new OutputStreamWriter(System.out)); @@ -124,8 +124,8 @@ final static Symbol IN_NAMESPACE = Symbol.create("in-ns"); static final Symbol IDENTICAL = Symbol.create("identical?"); final static Var CMD_LINE_ARGS = Var.intern(CLOJURE_NS, Symbol.create("*command-line-args*"), null); //symbol -final static Var CURRENT_NS = Var.intern(CLOJURE_NS, Symbol.create("*ns*"), - CLOJURE_NS); +final public static Var CURRENT_NS = Var.intern(CLOJURE_NS, Symbol.create("*ns*"), + CLOJURE_NS); final static Var PRINT_META = Var.intern(CLOJURE_NS, Symbol.create("*print-meta*"), F); final static Var PRINT_READABLY = Var.intern(CLOJURE_NS, Symbol.create("*print-readably*"), T); @@ -227,6 +227,10 @@ static // } +static public Var var(String ns, String name){ + return Var.intern(Namespace.findOrCreate(Symbol.intern(null, ns)), Symbol.intern(null, name)); +} + static public void init() throws Exception{ try { |