Changeset 15252

Timestamp:

04/20/20 05:35:59 (3 years ago)

Author:

Mark Evenson

Message:

Provide accessor in URL-STREAM for underlying java.io.InputStream?

(ql:quickload :prove)
(prove:run (asdf:system-relative-pathname :abcl "t/url-stream.lisp"))

Location:

trunk/abcl

Files:

• doc/design/streams/url-stream.org (added)
• src/org/armedbear/lisp/URLStream.java (modified) (2 diffs)
• t/url-stream.lisp (added)

trunk/abcl/src/org/armedbear/lisp/URLStream.java

@@ -47 +47 @@
  * Stream interface for a URL.
  * 
- * This only supports reading from the stream.
+ * Currently only supports reading from the stream.
  */
 public final class URLStream extends Stream
@@ -118 +118 @@
     }
 
+    // unused 20200418 ME
+    public Reader getReader()
+    {
+        return reader;
+    }
+
+    /**
+     * Accessing the underlying java.io.InputStream can be helpful
+     * when utlizing Java-side frameworks like Apache Jena built on
+     * the java.io abstractions.  State should only be mutated if you
+     * know what you are doing.
+     * 
+     * c.f. <https://gitlab.common-lisp.net/mevenson/jeannie/>
+     **/
+    public InputStream getInputStream()
+    {
+        return input;
+    }
+
+    // unused 20200418 ME
+    public int getBytesPerUnit() {
+        return bytesPerUnit;
+    }
     @Override
     public void _close()