Changeset 10220


Ignore:
Timestamp:
10/25/05 13:56:57 (16 years ago)
Author:
piso
Message:

JCLASS-OF

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/lisp/Autoload.java

    r9996 r10220  
    33 *
    44 * Copyright (C) 2003-2005 Peter Graves
    5  * $Id: Autoload.java,v 1.241 2005-09-22 00:23:37 piso Exp $
     5 * $Id: Autoload.java,v 1.242 2005-10-25 13:56:57 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    7575            }
    7676        }
     77        if (symbol.getSymbolFunction() == null)
     78            symbol.setSymbolFunction(new Autoload(symbol, null,
     79                                                  "org.armedbear.lisp.".concat(className)));
     80    }
     81
     82    public static void autoload(Symbol symbol, String className)
     83    {
    7784        if (symbol.getSymbolFunction() == null)
    7885            symbol.setSymbolFunction(new Autoload(symbol, null,
     
    634641        autoload(PACKAGE_SYS, "single-float-bits", "FloatFunctions", true);
    635642        autoload(PACKAGE_SYS, "zip", "zip", true);
     643
     644        autoload(Symbol.JCLASS_OF, "jclass_of");
    636645    }
    637646}
Note: See TracChangeset for help on using the changeset viewer.