extra/build-support/build-support.factor

   1 ! Copyright (C) 2010 Doug Coleman.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: accessors arrays calendar io io.backend io.encodings.utf8
   4 io.launcher ;
   5 IN: build-support
   6
   7 CONSTANT: factor.sh-path "resource:build-support/factor.sh"
   8
   9 : factor.sh-make-target ( -- string )
  10     <process>
  11         factor.sh-path normalize-path "make-target" 2array >>command
  12         10 seconds >>timeout
  13     utf8 [ readln ] with-process-reader ;