Changeset 15542


Ignore:
Timestamp:
11/29/21 14:13:12 (10 months ago)
Author:
Mark Evenson
Message:

Fix for Github issue #408

  • If a symbol is found accessible now is printed without package prefix in all cases
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/Symbol.java

    r15500 r15542  
    562562    if (currentPackage.findInternalSymbol(name) == this)
    563563      return symbolName;
     564    if (currentPackage.findAccessibleSymbol(name) == this)
     565      return symbolName;
    564566    // Package prefix is necessary.
    565567    String packageName = ((Package)pkg).getName();
     
    662664      return true;
    663665    int radix;
    664     LispObject printBaseBinding = PRINT_BASE.symbolValue(thread); 
     666    LispObject printBaseBinding = PRINT_BASE.symbolValue(thread);
    665667    if (printBaseBinding instanceof Fixnum)
    666668      {
     
    944946  }
    945947    }
    946    
     948
    947949    @Override
    948950    public String toString() {
     
    32723274  public static final Symbol _THREADING_MODEL =
    32733275    PACKAGE_THREADS.addExternalSymbol("*THREADING-MODEL*");
    3274    
     3276
    32753277
    32763278  // JVM
Note: See TracChangeset for help on using the changeset viewer.