commit e8d4c8bab44ffc841d43a3bc6d519a636cf1fe1f
parent d618401a5a9f8fd6b8076ffce7c6e2ecf6d4a95e
Author: tomas <tomas@logand.com>
Date: Sat, 24 Apr 2010 09:59:28 +0200
s/Sd/Id/
Diffstat:
M | wl.java | | | 34 | +++++++++++++++++----------------- |
1 file changed, 17 insertions(+), 17 deletions(-)
diff --git a/wl.java b/wl.java
@@ -375,11 +375,11 @@ class wl implements Runnable {
}
// evaluator
- HashMap<String, Any> Sd = new HashMap<String, Any>();
+ HashMap<String, Any> Id = new HashMap<String, Any>();
Any intern(String Nm) {
- if(!Sd.containsKey(Nm)) Sd.put(Nm, mkNsym(Nm, NIL));
- return Sd.get(Nm);
+ if(!Id.containsKey(Nm)) Id.put(Nm, mkNsym(Nm, NIL));
+ return Id.get(Nm);
}
Any xrun(Any P, int n, Any L) {
@@ -631,9 +631,9 @@ class wl implements Runnable {
void unframe() {while(T != Env.val().car()) unbind(); Env.val(Env.val().cdr());}
void fn(String Nm, Fn F) {
- Any Z = Sd.get(Nm);
+ Any Z = Id.get(Nm);
if(null != Z) Z.val(mkObj(F));
- else Sd.put(Nm, mkNsym(Nm, mkObj(F)));
+ else Id.put(Nm, mkNsym(Nm, mkObj(F)));
}
boolean member(Any X, Any L) {
for(; L.isCons(); L = L.cdr())
@@ -725,18 +725,18 @@ class wl implements Runnable {
final BlockingQueue<Any> Que = new LinkedBlockingQueue<Any>();
public wl() {
- Sd.put("NIL", NIL);
- Sd.put("T", T);
- Sd.put("quote", Qte);
- Sd.put(".", Dot);
- Sd.put("@", At);
- Sd.put("*Args", Args);
- Sd.put("*In", In);
- Sd.put("*Out", Out);
- Sd.put("*Env", Env);
- Sd.put("*Stk", Stk);
- Sd.put("*Scl", Scl);
- Sd.put("java.lang.Class", mkNsym("java.lang.Class", mkObj(Class.class)));
+ Id.put("NIL", NIL);
+ Id.put("T", T);
+ Id.put("quote", Qte);
+ Id.put(".", Dot);
+ Id.put("@", At);
+ Id.put("*Args", Args);
+ Id.put("*In", In);
+ Id.put("*Out", Out);
+ Id.put("*Env", Env);
+ Id.put("*Stk", Stk);
+ Id.put("*Scl", Scl);
+ Id.put("java.lang.Class", mkNsym("java.lang.Class", mkObj(Class.class)));
fn("run", new Fn() {public Any fn(Any E) {
Any I = E.cdr();