source: trunk/abcl/t/url-stream.lisp

Last change on this file was 15453, checked in by Mark Evenson, 4 years ago

t/url-stream: reflect change in SYS:MAKE-FILE-STREAM

File size: 390 bytes
Line 
1(in-package :cl-user)
2
3(prove:plan 1)
4(require :abcl-contrib)
5(require :jss)
6
7
8(let ((uri #P"https://raw.githubusercontent.com/parallele-at/covid/master/eg/covid.n3"))
9  (prove:ok
10    (#"getInputStream"
11     (system:make-file-stream uri 
12                              'character :input nil :default))
13    (format nil "Building a Java file stream~%~tfrom~t'~a'~%" uri)))
14
15(prove:finalize)
16
17
Note: See TracBrowser for help on using the repository browser.