mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-11 16:12:20 +00:00
Rework live reloading. (#191)
This commit is contained in:
parent
1181e0f802
commit
16fd952c9a
16 changed files with 379 additions and 386 deletions
10
windows/Detach.hs
Normal file
10
windows/Detach.hs
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
module Detach (detach) where
|
||||
|
||||
import Control.Monad
|
||||
import Control.Concurrent
|
||||
|
||||
detach :: IO () -> IO Bool
|
||||
detach action = do
|
||||
void $ forkIO action
|
||||
threadDelay (10^(6::Int))
|
||||
return False
|
||||
Loading…
Reference in a new issue