Changeset 5166


Ignore:
Timestamp:
12/16/03 17:18:03 (18 years ago)
Author:
piso
Message:

execute(): signal a type error.

File:
1 edited

Legend:

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

    r5111 r5166  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: LispObject.java,v 1.66 2003-12-12 19:41:06 piso Exp $
     5 * $Id: LispObject.java,v 1.67 2003-12-16 17:18:03 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    389389    public LispObject execute(LispObject[] args) throws ConditionThrowable
    390390    {
    391         return signal(new LispError());
     391        return signal(new TypeError(this, Symbol.FUNCTION));
    392392    }
    393393
     
    395395    public LispObject execute() throws ConditionThrowable
    396396    {
    397         return signal(new LispError());
     397        return signal(new TypeError(this, Symbol.FUNCTION));
    398398    }
    399399
     
    401401    public LispObject execute(LispObject arg) throws ConditionThrowable
    402402    {
    403         return signal(new LispError());
     403        return signal(new TypeError(this, Symbol.FUNCTION));
    404404    }
    405405
     
    408408        throws ConditionThrowable
    409409    {
    410         return signal(new LispError());
     410        return signal(new TypeError(this, Symbol.FUNCTION));
    411411    }
    412412
     
    415415        LispObject third) throws ConditionThrowable
    416416    {
    417         return signal(new LispError());
     417        return signal(new TypeError(this, Symbol.FUNCTION));
    418418    }
    419419
Note: See TracChangeset for help on using the changeset viewer.