extra/tokyo/utils/utils.factor

   1 ! Copyright (C) 2009 Bruno Deferrari
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: io io.streams.memory serialize kernel ;
   4 IN: tokyo.utils
   5
   6 : with-memory-reader ( memory quot -- )
   7     [ <memory-stream> ] dip with-input-stream* ; inline
   8
   9 : memory>object ( memory -- object )
  10     [ deserialize ] with-memory-reader ;