diff options
author | Rich Hickey <richhickey@gmail.com> | 2006-06-12 15:01:43 +0000 |
---|---|---|
committer | Rich Hickey <richhickey@gmail.com> | 2006-06-12 15:01:43 +0000 |
commit | a00179b2fb6cc09f87efbe8100fb17a7dd34a920 (patch) | |
tree | 1a8184360c077c9090a2e3d079acd9b6b5ac5bf8 /src/jvm/clojure | |
parent | f127034f649276cb1bcde4fea50e6be4637dd5d0 (diff) |
renamed get,put etc to getAttr...
Diffstat (limited to 'src/jvm/clojure')
-rw-r--r-- | src/jvm/clojure/lang/IObj.java | 8 | ||||
-rw-r--r-- | src/jvm/clojure/lang/Keyword.java | 4 | ||||
-rw-r--r-- | src/jvm/clojure/lang/Obj.java | 8 | ||||
-rw-r--r-- | src/jvm/clojure/lang/TObj.java | 8 |
4 files changed, 14 insertions, 14 deletions
diff --git a/src/jvm/clojure/lang/IObj.java b/src/jvm/clojure/lang/IObj.java index 7ff70288..09fd94fb 100644 --- a/src/jvm/clojure/lang/IObj.java +++ b/src/jvm/clojure/lang/IObj.java @@ -12,13 +12,13 @@ package clojure.lang; public interface IObj {
-Object put( Object key, Object val) throws Exception;
+Object putAttr( Object key, Object val) throws Exception;
-Object get( Object key) throws Exception;
+Object getAttr( Object key) throws Exception;
-boolean has( Object key) throws Exception;
+boolean hasAttr( Object key) throws Exception;
IPersistentMap attrs() throws Exception;
-void remove(Object key) throws Exception;
+void removeAttr(Object key) throws Exception;
}
diff --git a/src/jvm/clojure/lang/Keyword.java b/src/jvm/clojure/lang/Keyword.java index a4684145..d1e1edb1 100644 --- a/src/jvm/clojure/lang/Keyword.java +++ b/src/jvm/clojure/lang/Keyword.java @@ -43,7 +43,7 @@ public Object invoke(Object obj) throws Exception { if (obj == null) return null; - return ((IObj)obj).get(this); + return ((IObj)obj).getAttr(this); } /** @@ -56,7 +56,7 @@ public Object invoke(Object obj) throws Exception */ public Object invoke(Object obj, Object val) throws Exception { - return ((IObj)obj).put(this,val); + return ((IObj)obj).putAttr(this,val); } public Object invoke( Object arg1, Object arg2, Object arg3) throws Exception diff --git a/src/jvm/clojure/lang/Obj.java b/src/jvm/clojure/lang/Obj.java index a15d912c..5714a4b4 100644 --- a/src/jvm/clojure/lang/Obj.java +++ b/src/jvm/clojure/lang/Obj.java @@ -16,18 +16,18 @@ public class Obj implements IObj { volatile IPersistentMap _attrs = PersistentArrayIdentityMap.EMPTY; -public Object put( Object key, Object val) +public Object putAttr( Object key, Object val) { _attrs = _attrs.put(key, val); return val; } -public Object get( Object key) +public Object getAttr( Object key) { return _attrs.get(key); } -public boolean has( Object key){ +public boolean hasAttr( Object key){ return _attrs.contains(key); } @@ -36,7 +36,7 @@ public IPersistentMap attrs() { return _attrs; } -public void remove(Object key) { +public void removeAttr(Object key) { _attrs = _attrs.remove(key); } } diff --git a/src/jvm/clojure/lang/TObj.java b/src/jvm/clojure/lang/TObj.java index ed3fd935..d04f38d8 100644 --- a/src/jvm/clojure/lang/TObj.java +++ b/src/jvm/clojure/lang/TObj.java @@ -18,19 +18,19 @@ public TObj() throws Exception{ }
-public Object put( Object key, Object val) throws Exception {
+public Object putAttr( Object key, Object val) throws Exception {
IPersistentMap t = (IPersistentMap) Transaction.get( _attrs);
t = t.put(key, val);
Transaction.set(_attrs,t);
return val;
}
-public Object get( Object key) throws Exception {
+public Object getAttr( Object key) throws Exception {
IPersistentMap t = (IPersistentMap) Transaction.get( _attrs);
return t.get(key);
}
-public boolean has( Object key) throws Exception {
+public boolean hasAttr( Object key) throws Exception {
IPersistentMap t = (IPersistentMap) Transaction.get( _attrs);
return t.contains(key);
}
@@ -39,7 +39,7 @@ public IPersistentMap attrs() throws Exception { return (IPersistentMap) Transaction.get(_attrs);
}
-public void remove(Object key) throws Exception {
+public void removeAttr(Object key) throws Exception {
IPersistentMap t = (IPersistentMap) Transaction.get( _attrs);
t = t.remove(key);
Transaction.set(_attrs,t);
|