diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/jvm/clojure/lang/Delay.java | 4 | ||||
| -rw-r--r-- | src/jvm/clojure/lang/FnSeq.java | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/src/jvm/clojure/lang/Delay.java b/src/jvm/clojure/lang/Delay.java index 474e0c9a..3698417b 100644 --- a/src/jvm/clojure/lang/Delay.java +++ b/src/jvm/clojure/lang/Delay.java @@ -12,7 +12,7 @@ package clojure.lang; -public class Delay{ +public class Delay extends AFn{ public volatile Object val; IFn fn; @@ -22,7 +22,7 @@ public Delay(IFn fn){ this.val = this; } -public Object force() throws Exception{ +public Object invoke() throws Exception{ if(val == this) { synchronized(this) diff --git a/src/jvm/clojure/lang/FnSeq.java b/src/jvm/clojure/lang/FnSeq.java index e38cc01f..48211217 100644 --- a/src/jvm/clojure/lang/FnSeq.java +++ b/src/jvm/clojure/lang/FnSeq.java @@ -33,7 +33,7 @@ public Object first(){ public ISeq rest(){
try
{
- return (ISeq) _rest.force();
+ return (ISeq) _rest.invoke();
}
catch(Exception e)
{
|