summaryrefslogtreecommitdiff
path: root/src/org
diff options
context:
space:
mode:
authorRich Hickey <richhickey@gmail.com>2006-06-03 19:35:36 +0000
committerRich Hickey <richhickey@gmail.com>2006-06-03 19:35:36 +0000
commitb27a6f72bd8802fa07fb74cdf1252a612f50cb33 (patch)
tree4300e2ad11720a712f8f8696f82c15d6380a730e /src/org
parent9f0e5fc90b67ac32dd0516065af2ff82f9d9d3bf (diff)
brought compiler and runtime back in sync
Diffstat (limited to 'src/org')
-rw-r--r--src/org/clojure/runtime/Accessor.java17
1 files changed, 9 insertions, 8 deletions
diff --git a/src/org/clojure/runtime/Accessor.java b/src/org/clojure/runtime/Accessor.java
index 5883e3db..b69bb0bb 100644
--- a/src/org/clojure/runtime/Accessor.java
+++ b/src/org/clojure/runtime/Accessor.java
@@ -14,11 +14,12 @@ package org.clojure.runtime;
public class Accessor extends Symbol implements IFn{
-
+String memberName;
Accessor(String name)
{
super(name);
- }
+ memberName = name.substring(1);
+ }
public Object invoke(ThreadLocalData tld) throws Exception {
@@ -35,7 +36,7 @@ public Object invoke(ThreadLocalData tld) throws Exception {
public Object invoke(ThreadLocalData tld, Object obj) throws Exception
{
- return Reflector.invokeInstanceMember(name,obj);
+ return Reflector.invokeInstanceMember(memberName,obj);
}
/**
@@ -50,29 +51,29 @@ public Object invoke(ThreadLocalData tld, Object obj) throws Exception
public Object invoke(ThreadLocalData tld, Object obj, Object val) throws Exception
{
- return Reflector.invokeInstanceMember(name,obj,val);
+ return Reflector.invokeInstanceMember(memberName,obj,val);
}
public Object invoke(ThreadLocalData tld, Object arg1, Object arg2, Object arg3) throws Exception
{
- return Reflector.invokeInstanceMember(name,arg1,arg2,arg3);
+ return Reflector.invokeInstanceMember(memberName,arg1,arg2,arg3);
}
public Object invoke(ThreadLocalData tld, Object arg1, Object arg2, Object arg3, Object arg4) throws Exception
{
- return Reflector.invokeInstanceMember(name,arg1,arg2,arg3,arg4);
+ return Reflector.invokeInstanceMember(memberName,arg1,arg2,arg3,arg4);
}
public Object invoke(ThreadLocalData tld, Object arg1, Object arg2, Object arg3, Object arg4, Object arg5)
throws Exception
{
- return Reflector.invokeInstanceMember(name,arg1,arg2,arg3,arg4,arg5);
+ return Reflector.invokeInstanceMember(memberName,arg1,arg2,arg3,arg4,arg5);
}
public Object invoke(ThreadLocalData tld, Object arg1, Object arg2, Object arg3, Object arg4, Object arg5, Cons args)
throws Exception
{
- return Reflector.invokeInstanceMember(name,arg1,arg2,arg3,arg4,arg5,args);
+ return Reflector.invokeInstanceMember(memberName,arg1,arg2,arg3,arg4,arg5,args);
}
public Object applyTo(ThreadLocalData tld, Cons arglist) throws Exception {