Changeset 4646


Ignore:
Timestamp:
11/04/03 19:40:36 (18 years ago)
Author:
piso
Message:

AUTOLOADP: don't call checkSymbol().

File:
1 edited

Legend:

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

    r4621 r4646  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: Autoload.java,v 1.98 2003-11-03 02:58:23 piso Exp $
     5 * $Id: Autoload.java,v 1.99 2003-11-04 19:40:36 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    195195        public LispObject execute(LispObject arg) throws ConditionThrowable
    196196        {
    197             Symbol symbol = checkSymbol(arg);
    198             return (symbol.getSymbolFunction() instanceof Autoload) ? T : NIL;
     197            if (arg instanceof Symbol) {
     198                if (arg.getSymbolFunction() instanceof Autoload)
     199                    return T;
     200            }
     201            return NIL;
    199202        }
    200203    };
Note: See TracChangeset for help on using the changeset viewer.