Changeset 8385


Ignore:
Timestamp:
01/22/05 17:18:20 (16 years ago)
Author:
asimon
Message:

unify/simplify signal() according to Peter's suggestion

File:
1 edited

Legend:

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

    r8381 r8385  
    33 *
    44 * Copyright (C) 2002-2005 Peter Graves
    5  * $Id: Lisp.java,v 1.312 2005-01-22 11:39:44 piso Exp $
     5 * $Id: Lisp.java,v 1.313 2005-01-22 17:18:20 asimon Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    268268    };
    269269
    270     public static final LispObject signal(Condition condition)
    271         throws ConditionThrowable
    272     {
    273         return Symbol.SIGNAL.getSymbolFunction().execute(condition);
    274     }
    275 
    276     public static final LispObject signal(Symbol condition)
    277         throws ConditionThrowable
    278     {
    279         return Packages.findPackage("SYSTEM").findSymbol("SIGNAL").getSymbolFunction().execute(condition);
    280     }
    281  
     270    public static final LispObject signal(LispObject condition)
     271        throws ConditionThrowable
     272    {
     273        return Symbol.SIGNAL.execute(condition);
     274    }
    282275
    283276    protected static volatile boolean interrupted;
Note: See TracChangeset for help on using the changeset viewer.