Changeset 11279
- Timestamp:
- 08/13/08 06:33:36 (15 years ago)
- Location:
- trunk/j/src/org/armedbear/lisp
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/j/src/org/armedbear/lisp/JHandler.java
r11158 r11279 3 3 * 4 4 * Copyright (C) 2003-2005 Andras Simon, Peter Graves 5 * $Id: JHandler.java,v 1.1 0 2007-02-23 21:17:33 pisoExp $5 * $Id: JHandler.java,v 1.11 2008-08-13 06:33:36 ehuelsmann Exp $ 6 6 * 7 7 * This program is free software; you can redistribute it and/or … … 28 28 public final class JHandler extends Lisp 29 29 { 30 private static final Map table = new WeakHashMap(); 30 private static final Map<Object,Map<String,Entry>> table = 31 new WeakHashMap<Object,Map<String,Entry>>(); 31 32 32 33 public static void callLisp (String s, Object o) … … 52 53 { 53 54 if (table.containsKey(o)) { 54 Map entryTable = (Map)table.get(o);55 Map<String,Entry> entryTable = (Map<String,Entry>)table.get(o); 55 56 if (entryTable.containsKey(s)) { 56 57 Function f = ((Entry)entryTable.get(s)).getHandler(); … … 87 88 if (args.length != 5) 88 89 return error(new WrongNumberOfArgumentsException(this)); 89 Map entryTable = null;90 Map<String,Entry> entryTable = null; 90 91 Object object = args[0].javaInstance(); 91 92 String event = ((Symbol)args[1]).getName(); 92 93 if (!table.containsKey(object)) { 93 entryTable = new HashMap ();94 entryTable = new HashMap<String,Entry>(); 94 95 table.put(object,entryTable); 95 96 } else { 96 entryTable = (Map )table.get(object);97 entryTable = (Map<String,Entry>)table.get(object); 97 98 } 98 99 Entry entry = new Entry((Function) args[2], args[3], event, entryTable); … … 109 110 LispObject data; 110 111 int count = -1; 111 Map entryTable;112 Map<String,Entry> entryTable; 112 113 String event; 113 114 114 public Entry (Function handler, LispObject data, String event, Map entryTable) 115 public Entry (Function handler, LispObject data, String event, 116 Map<String,Entry> entryTable) 115 117 { 116 118 this.entryTable = entryTable; -
trunk/j/src/org/armedbear/lisp/JProxy.java
r11158 r11279 3 3 * 4 4 * Copyright (C) 2002-2005 Peter Graves, Andras Simon 5 * $Id: JProxy.java,v 1. 9 2007-02-23 21:17:33 pisoExp $5 * $Id: JProxy.java,v 1.10 2008-08-13 06:33:36 ehuelsmann Exp $ 6 6 * 7 7 * This program is free software; you can redistribute it and/or … … 31 31 public final class JProxy extends Lisp 32 32 { 33 private static final Map table = new WeakHashMap();33 private static final Map<Object,Entry> table = new WeakHashMap<Object,Entry>(); 34 34 35 35 // ### %jnew-proxy interface &rest method-names-and-defs … … 43 43 if (length < 3 || length % 2 != 1) 44 44 return error(new WrongNumberOfArgumentsException(this)); 45 Map lispDefinedMethods = new HashMap();45 Map<String,Function> lispDefinedMethods = new HashMap<String,Function>(); 46 46 for (int i = 1; i < length; i += 2) 47 47 lispDefinedMethods.put(args[i].getStringValue(), -
trunk/j/src/org/armedbear/lisp/Java.java
r11158 r11279 3 3 * 4 4 * Copyright (C) 2002-2006 Peter Graves, Andras Simon 5 * $Id: Java.java,v 1.7 2 2007-02-23 21:17:33 pisoExp $5 * $Id: Java.java,v 1.73 2008-08-13 06:33:36 ehuelsmann Exp $ 6 6 * 7 7 * This program is free software; you can redistribute it and/or … … 33 33 public final class Java extends Lisp 34 34 { 35 private static final Map registeredExceptions = new HashMap(); 35 private static final Map<Class,Symbol> registeredExceptions = 36 new HashMap<Class,Symbol>(); 36 37 37 38 private static final LispClass java_exception = LispClass.findClass(Symbol.JAVA_EXCEPTION); … … 54 55 if ((symbol instanceof Symbol) && isJavaException(LispClass.findClass((Symbol) symbol))) { 55 56 registeredExceptions.put(classForName(className.getStringValue()), 56 symbol);57 (Symbol)symbol); 57 58 return T; 58 59 } -
trunk/j/src/org/armedbear/lisp/JavaClassLoader.java
r11278 r11279 3 3 * 4 4 * Copyright (C) 2003-2005 Peter Graves 5 * $Id: JavaClassLoader.java,v 1.1 4 2008-08-12 21:59:07ehuelsmann Exp $5 * $Id: JavaClassLoader.java,v 1.15 2008-08-13 06:33:36 ehuelsmann Exp $ 6 6 * 7 7 * This program is free software; you can redistribute it and/or … … 40 40 private static JavaClassLoader persistentInstance; 41 41 42 private static Set packages = Collections.synchronizedSet(new HashSet<String>());42 private static Set<String> packages = Collections.synchronizedSet(new HashSet<String>()); 43 43 44 44 public JavaClassLoader()
Note: See TracChangeset
for help on using the changeset viewer.