Artifact bfcf498df327b5b07ad0b34cdc20f4b7dfe484288556450ea75bad5ddb7c4b87:

• Executable file r37/lisp/csl/jlisp/WriterToLisp.java — part of check-in [f2fda60abd] at 2011-09-02 18:13:33 on branch master — Some historical releases purely for archival purposes

  git-svn-id: https://svn.code.sf.net/p/reduce-algebra/code/trunk/historical@1375 2bfe0521-f11c-4a00-b80e-6202646ff360 (user: arthurcnorman@users.sourceforge.net, size: 541) [annotate] [blame] [check-ins using] [more...]

//
// This file is part of the Jlisp implementation of Standard Lisp
// Copyright \u00a9 (C) Codemist Ltd, 1998-2000.
//

import java.io.*;

class WriterToLisp extends Writer
{
    LispStream stream;

    WriterToLisp(LispStream s)
    {
        stream = s;
    }

    public void close()
    {
        stream.close();
    }

    public void flush()
    {
        stream.flush();
    }

    public void write(char [] buffer, int off, int len)
    {
        stream.print(new String(buffer, off, len));
    }

}

// end of WriterToLisp.java