diff options
| author | Rich Hickey <richhickey@gmail.com> | 2008-04-21 17:06:11 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2008-04-21 17:06:11 +0000 |
| commit | 282d5a0e2ad4a87af87ac0e93c4f6933cf113d8a (patch) | |
| tree | cc387576d99608b4b0d2fc117c2cdfe1be1cea60 /src | |
| parent | 29dd6d70b825b8127b0fc8db7ac6e053e797caa6 (diff) | |
fixed RT.classForName call
Diffstat (limited to 'src')
| -rw-r--r-- | src/boot.clj | 2 | ||||
| -rw-r--r-- | src/jvm/clojure/lang/Compiler.java | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/boot.clj b/src/boot.clj index 5c25db05..e4d064e4 100644 --- a/src/boot.clj +++ b/src/boot.clj @@ -1699,7 +1699,7 @@ not-every? (comp not every?)) row-values (fn [] (map (fn [#^Integer i] (. rs (getObject i))) idxs)) rows (fn thisfn [] (when (. rs (next)) - (fnseq (apply struct row-struct (row-values)) thisfn)))] + (lazy-cons (apply struct row-struct (row-values)) (thisfn))))] (rows))) (defn set diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java index 3f5d474a..19f49953 100644 --- a/src/jvm/clojure/lang/Compiler.java +++ b/src/jvm/clojure/lang/Compiler.java @@ -1787,7 +1787,7 @@ static class NewExpr implements Expr{ final Class c; final static Method invokeConstructorMethod = Method.getMethod("Object invokeConstructor(Class,Object[])"); - final static Method forNameMethod = Method.getMethod("Class forName(String)"); + final static Method forNameMethod = Method.getMethod("Class classForName(String)"); public NewExpr(Class c, IPersistentVector args, int line) throws Exception{ |