Changeset 4298

Timestamp:

10/11/03 00:11:02 (19 years ago)

Author:

piso

Message:

findTag(): recognize defuns, generic functions, and macros in Lisp mode.

File:

• trunk/j/src/org/armedbear/j/FindTagTextFieldHandler.java (modified) (2 diffs)

trunk/j/src/org/armedbear/j/FindTagTextFieldHandler.java

@@ -64 +64 @@
         if (tags != null) {
             if (tags.size() > 1) {
-                // Can we get a unique match if we just consider methods and
-                // explicit tags?
+                // Can we get a unique match if we just consider defuns etc.
+                // and explicit tags?
                 ArrayList shortList = new ArrayList();
                 for (Iterator it = tags.iterator(); it.hasNext();) {
@@ -71 +71 @@
                     if (tag instanceof LocalTag) {
                         int type = ((LocalTag)tag).getType();
+                        // Java etc.
                         if (type == TAG_METHOD || type == TAG_EXPLICIT)
+                            shortList.add(tag);
+                        // Lisp.
+                        if (type == TAG_DEFUN || type == TAG_GENERIC_FUNCTION ||
+                            type == TAG_MACRO)
                             shortList.add(tag);
                     }