extra/fuel/listener/listener.factor

   1 USING: kernel listener system vocabs ;
   2 IN: fuel.listener
   3
   4 HOOK: fuel-pty-setup os ( -- )
   5
   6 M: object fuel-pty-setup ;
   7
   8 os linux? [ "fuel.listener.linux" require ] when
   9
  10 : fuel-listener ( -- )
  11     fuel-pty-setup listener-main ;
  12
  13 MAIN: fuel-listener