summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRich Hickey <richhickey@gmail.com>2006-06-12 15:01:43 +0000
committerRich Hickey <richhickey@gmail.com>2006-06-12 15:01:43 +0000
commita00179b2fb6cc09f87efbe8100fb17a7dd34a920 (patch)
tree1a8184360c077c9090a2e3d079acd9b6b5ac5bf8
parentf127034f649276cb1bcde4fea50e6be4637dd5d0 (diff)
renamed get,put etc to getAttr...
-rw-r--r--src/cli/runtime/IObj.cs8
-rw-r--r--src/cli/runtime/Keyword.cs2
-rw-r--r--src/cli/runtime/Obj.cs8
-rw-r--r--src/cli/runtime/TObj.cs8
-rw-r--r--src/jvm/clojure/lang/IObj.java8
-rw-r--r--src/jvm/clojure/lang/Keyword.java4
-rw-r--r--src/jvm/clojure/lang/Obj.java8
-rw-r--r--src/jvm/clojure/lang/TObj.java8
8 files changed, 27 insertions, 27 deletions
diff --git a/src/cli/runtime/IObj.cs b/src/cli/runtime/IObj.cs
index 6e101dbb..9e8d0d93 100644
--- a/src/cli/runtime/IObj.cs
+++ b/src/cli/runtime/IObj.cs
@@ -13,14 +13,14 @@ namespace clojure.lang
{
interface IObj
{
- Object put(Object key, Object val);
+ Object putAttr(Object key, Object val);
- Object get(Object key);
+ Object getAttr(Object key);
- bool has(Object key);
+ bool hasAttr(Object key);
IPersistentMap attrs();
- void remove(Object key);
+ void removeAttr(Object key);
}
}
diff --git a/src/cli/runtime/Keyword.cs b/src/cli/runtime/Keyword.cs
index 8c4f645a..34c893d6 100644
--- a/src/cli/runtime/Keyword.cs
+++ b/src/cli/runtime/Keyword.cs
@@ -24,7 +24,7 @@ internal Keyword(String name):base(name) { } public Object invoke() /*throws
} /** * Indexer implements IFn for attr access * This single arg version is the getter * @param tld * @param obj - must be AMap * @return the value of the attr or nil if not found */ public Object invoke( Object obj) /*throws Exception*/ {
if (obj == null)
return null;
- return ((IObj)obj).get(this); } /** * Indexer implements IFn for attr access * This two arg version is the setter * @param tld * @param obj - must be AMap * @param val * @return val */ public Object invoke( Object obj, Object val) /*throws Exception*/ { return ((IObj)obj).put(this,val); }
+ return ((IObj)obj).getAttr(this); } /** * Indexer implements IFn for attr access * This two arg version is the setter * @param tld * @param obj - must be AMap * @param val * @return val */ public Object invoke( Object obj, Object val) /*throws Exception*/ { return ((IObj)obj).putAttr(this,val); }
public Object invoke( Object arg1, Object arg2, Object arg3) /*throws Exception*/
{
diff --git a/src/cli/runtime/Obj.cs b/src/cli/runtime/Obj.cs
index 32684a6b..9f201cd7 100644
--- a/src/cli/runtime/Obj.cs
+++ b/src/cli/runtime/Obj.cs
@@ -19,18 +19,18 @@ public class Obj : 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 bool has( Object key){
+public bool hasAttr( Object key){
return _attrs.contains(key);
}
@@ -39,7 +39,7 @@ public IPersistentMap attrs() {
return _attrs;
}
-public void remove(Object key) {
+public void removeAttr(Object key) {
_attrs = _attrs.remove(key);
}
diff --git a/src/cli/runtime/TObj.cs b/src/cli/runtime/TObj.cs
index 37c38b83..5bc2e2cd 100644
--- a/src/cli/runtime/TObj.cs
+++ b/src/cli/runtime/TObj.cs
@@ -21,19 +21,19 @@ public TObj(){
}
-public Object put( Object key, Object val) {
+public Object putAttr( Object key, Object val) {
IPersistentMap t = (IPersistentMap) Transaction.get( _attrs);
t = t.put(key, val);
Transaction.set(_attrs,t);
return val;
}
-public Object get( Object key) {
+public Object getAttr( Object key) {
IPersistentMap t = (IPersistentMap) Transaction.get( _attrs);
return t.get(key);
}
-public bool has( Object key) {
+public bool hasAttr( Object key) {
IPersistentMap t = (IPersistentMap) Transaction.get( _attrs);
return t.contains(key);
}
@@ -42,7 +42,7 @@ public IPersistentMap attrs() {
return (IPersistentMap) Transaction.get(_attrs);
}
-public void remove(Object key) {
+public void removeAttr(Object key) {
IPersistentMap t = (IPersistentMap) Transaction.get( _attrs);
t = t.remove(key);
Transaction.set(_attrs,t);
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);