Changeset 13132 for trunk/abcl/src/org


Ignore:
Timestamp:
01/10/11 21:26:51 (11 years ago)
Author:
ehuelsmann
Message:

Fix: When deleting a package it remains on the usedByList of
the packages in its use list. Usually a package uses *at least*
the CL package, meaning that packages don't get GC-ed.

File:
1 edited

Legend:

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

    r12977 r13132  
    162162    {
    163163        if (name != null) {
     164            LispObject usedPackages = useList;
     165            while (usedPackages != NIL) {
     166                Package pkg = (Package) usedPackages.car();
     167                unusePackage(pkg);
     168                usedPackages = usedPackages.cdr();
     169            }
     170
    164171            Packages.deletePackage(this);
    165172
Note: See TracChangeset for help on using the changeset viewer.