summaryrefslogtreecommitdiff
path: root/src/jvm/clojure
diff options
context:
space:
mode:
authorRich Hickey <richhickey@gmail.com>2007-10-14 23:17:31 +0000
committerRich Hickey <richhickey@gmail.com>2007-10-14 23:17:31 +0000
commit8d97d8311037125a74d1f21efbea1581adcf3cd0 (patch)
treeab75ef48e18686500e62247ef97cec68492aef64 /src/jvm/clojure
parent2c1fbde3089f2d38bb6aaa46f041b28c8013003b (diff)
swapped :t for t
Diffstat (limited to 'src/jvm/clojure')
-rw-r--r--src/jvm/clojure/lang/Compiler.java4
-rw-r--r--src/jvm/clojure/lang/RT.java2
2 files changed, 3 insertions, 3 deletions
diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java
index eb25c785..241832db 100644
--- a/src/jvm/clojure/lang/Compiler.java
+++ b/src/jvm/clojure/lang/Compiler.java
@@ -458,7 +458,7 @@ static abstract class HostExpr implements Expr{
Label falseLabel = gen.newLabel();
Label endLabel = gen.newLabel();
gen.ifZCmp(GeneratorAdapter.EQ, falseLabel);
- gen.getStatic(RT_TYPE, "T", SYMBOL_TYPE);
+ gen.getStatic(RT_TYPE, "T", KEYWORD_TYPE);
gen.goTo(endLabel);
gen.mark(falseLabel);
NIL_EXPR.emit(C.EXPRESSION, fn, gen);
@@ -1355,7 +1355,7 @@ static class InstanceExpr extends UntypedExpr{
expr.emit(C.EXPRESSION, fn, gen);
gen.instanceOf(Type.getObjectType(className.replace('.', '/')));
gen.ifZCmp(GeneratorAdapter.EQ, not);
- gen.getStatic(RT_TYPE, "T", SYMBOL_TYPE);
+ gen.getStatic(RT_TYPE, "T", KEYWORD_TYPE);
gen.goTo(end);
gen.mark(not);
NIL_EXPR.emit(C.EXPRESSION, fn, gen);
diff --git a/src/jvm/clojure/lang/RT.java b/src/jvm/clojure/lang/RT.java
index a555ef0c..6de45959 100644
--- a/src/jvm/clojure/lang/RT.java
+++ b/src/jvm/clojure/lang/RT.java
@@ -19,7 +19,7 @@ import java.lang.reflect.Array;
public class RT{
-static public Symbol T = Symbol.create(null, "t");
+static public Keyword T = Keyword.intern(Symbol.create(null, "t"));
final static public Var OUT =
Var.intern(Symbol.create("clojure", "*out*"), new OutputStreamWriter(System.out));
final static Keyword TAG_KEY = Keyword.intern("clojure", "tag");