Changeset 6190


Ignore:
Timestamp:
03/11/04 11:37:53 (17 years ago)
Author:
piso
Message:

checkCharacterInputStream() => inSynonymOf()

File:
1 edited

Legend:

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

    r5618 r6190  
    33 *
    44 * Copyright (C) 2004 Peter Graves
    5  * $Id: listen.java,v 1.1 2004-01-31 13:41:46 piso Exp $
     5 * $Id: listen.java,v 1.2 2004-03-11 11:37:53 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    2222package org.armedbear.lisp;
    2323
     24// ### listen
    2425public final class listen extends Primitive
    2526{
     
    3839    public LispObject execute(LispObject arg) throws ConditionThrowable
    3940    {
    40         return checkCharacterInputStream(arg).listen();
     41        return inSynonymOf(arg).listen();
    4142    }
    4243
Note: See TracChangeset for help on using the changeset viewer.