Changeset 10136


Ignore:
Timestamp:
10/17/05 18:05:58 (16 years ago)
Author:
piso
Message:

outSynonymOf() is obsolete.

File:
1 edited

Legend:

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

    r10132 r10136  
    33 *
    44 * Copyright (C) 2002-2005 Peter Graves
    5  * $Id: Lisp.java,v 1.398 2005-10-17 15:44:44 piso Exp $
     5 * $Id: Lisp.java,v 1.399 2005-10-17 18:05:58 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    13361336    }
    13371337
    1338     public static final Stream outSynonymOf(LispObject obj)
    1339         throws ConditionThrowable
    1340     {
    1341         if (obj instanceof Stream)
    1342             return (Stream) obj;
    1343         if (obj == T)
    1344             return checkCharacterOutputStream(_TERMINAL_IO_.symbolValue());
    1345         if (obj == NIL)
    1346             return checkCharacterOutputStream(_STANDARD_OUTPUT_.symbolValue());
    1347         signalTypeError(obj, Symbol.STREAM);
    1348         // Not reached.
    1349         return null;
    1350     }
    1351 
    13521338    public static final void writeByte(int n, LispObject obj)
    13531339        throws ConditionThrowable
Note: See TracChangeset for help on using the changeset viewer.