Changeset 5046


Ignore:
Timestamp:
12/10/03 08:04:17 (17 years ago)
Author:
asimon
Message:

ARGLIST: autoload function

File:
1 edited

Legend:

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

    r5038 r5046  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: arglist.java,v 1.2 2003-12-09 20:38:53 asimon Exp $
     5 * $Id: arglist.java,v 1.3 2003-12-10 08:04:17 asimon Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    3232            LispThread thread = LispThread.currentThread();
    3333            Function function = coerceToFunction(arg);
     34            if (function instanceof Autoload) {
     35                Autoload autoload = (Autoload) function;
     36                autoload.load();
     37                function = (Function)autoload.getSymbol().getSymbolFunction();
     38      }
    3439            LispObject arglist = function.getArglist();
    3540            final LispObject value1, value2;
Note: See TracChangeset for help on using the changeset viewer.