Changeset 12558


Ignore:
Timestamp:
03/17/10 19:14:27 (11 years ago)
Author:
astalla
Message:

Exposed in/out streams and reader/writers of Stream.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/Stream.java

    r12513 r12558  
    123123
    124124    public Stream(Symbol structureClass, InputStream stream) {
    125         super(structureClass);
     125        this(structureClass);
    126126        initAsBinaryInputStream(stream);
    127127    }
    128128
    129129    public Stream(Symbol structureClass, Reader r) {
    130         super(structureClass);
     130        this(structureClass);
    131131        initAsCharacterInputStream(r);
    132132    }
    133133
    134134    public Stream(Symbol structureClass, OutputStream stream) {
    135         super(structureClass);
     135        this(structureClass);
    136136        initAsBinaryOutputStream(stream);
    137137    }
    138138
    139139    public Stream(Symbol structureClass, Writer w) {
    140         super(structureClass);
     140        this(structureClass);
    141141        initAsCharacterOutputStream(w);
    142142    }
     
    150150    public Stream(Symbol structureClass, InputStream inputStream,
    151151                  LispObject elementType, LispObject format) {
    152         super(structureClass);
     152        this(structureClass);
    153153        this.elementType = elementType;
    154154        setExternalFormat(format);
     
    179179    // Output stream constructors.
    180180    public Stream(Symbol structureClass, OutputStream outputStream, LispObject elementType, LispObject format) {
    181         super(structureClass);
     181        this(structureClass);
    182182        this.elementType = elementType;
    183183        setExternalFormat(format);
     
    25582558        }
    25592559    };
     2560
     2561    public InputStream getInputStream() {
     2562  return in;
     2563    }
     2564
     2565    public OutputStream getOutputStream() {
     2566  return out;
     2567    }
     2568
     2569    public Writer getWriter() {
     2570  return writer;
     2571    }
     2572
     2573    public PushbackReader getReader() {
     2574  return reader;
     2575    }
     2576
    25602577}
Note: See TracChangeset for help on using the changeset viewer.