io.streams.memory: use constructor syntax.

db4
John Benediktsson 2014-04-29 13:20:03 -07:00
parent c6f8a84ee4
commit ca6cf294fc
1 changed files with 2 additions and 3 deletions

View File

@ -5,12 +5,11 @@ IN: io.streams.memory
TUPLE: memory-stream alien ;
: <memory-stream> ( alien -- stream )
memory-stream boa ;
C: <memory-stream> memory-stream
INSTANCE: memory-stream input-stream
M: memory-stream stream-element-type drop +byte+ ;
M: memory-stream stream-element-type drop +byte+ ; inline
M: memory-stream stream-read1
[ 1 over <displaced-alien> ] change-alien drop