mirror of
https://github.com/swarm-game/swarm.git
synced 2024-09-11 14:46:33 +03:00
parent
f6f01b264c
commit
1da74a79dd
@ -34,12 +34,12 @@ import Graphics.Vty.Platform.Unix qualified as VS
|
||||
import Swarm.Game.Failure (SystemFailure)
|
||||
import Swarm.Language.Pretty (prettyText)
|
||||
import Swarm.Log (LogSource (SystemLog), Severity (..))
|
||||
import Swarm.ReadableIORef (mkReadonly)
|
||||
import Swarm.TUI.Controller
|
||||
import Swarm.TUI.Model
|
||||
import Swarm.TUI.Model.StateUpdate
|
||||
import Swarm.TUI.Model.UI (uiAttrMap)
|
||||
import Swarm.TUI.View
|
||||
import Swarm.Util.ReadableIORef (mkReadonly)
|
||||
import Swarm.Version (getNewerReleaseVersion)
|
||||
import Swarm.Web
|
||||
import System.IO (stderr)
|
||||
|
@ -3,7 +3,7 @@
|
||||
--
|
||||
-- Ensures that access to an 'IORef' is read-only
|
||||
-- by hiding behind a newtype.
|
||||
module Swarm.ReadableIORef (mkReadonly, ReadableIORef, readIORef) where
|
||||
module Swarm.Util.ReadableIORef (mkReadonly, ReadableIORef, readIORef) where
|
||||
|
||||
import Data.IORef (IORef)
|
||||
import Data.IORef qualified as R (readIORef)
|
@ -79,10 +79,10 @@ import Swarm.Language.Module
|
||||
import Swarm.Language.Pipeline
|
||||
import Swarm.Language.Pretty (prettyTextLine)
|
||||
import Swarm.Language.Syntax
|
||||
import Swarm.ReadableIORef
|
||||
import Swarm.TUI.Model
|
||||
import Swarm.TUI.Model.Goal
|
||||
import Swarm.TUI.Model.UI
|
||||
import Swarm.Util.ReadableIORef
|
||||
import Swarm.Util.RingBuffer
|
||||
import Swarm.Web.Worldview
|
||||
import System.Timeout (timeout)
|
||||
|
@ -137,6 +137,7 @@ library swarm-util
|
||||
Swarm.Util.Lens
|
||||
Swarm.Util.OccurrenceEncoder
|
||||
Swarm.Util.Parse
|
||||
Swarm.Util.ReadableIORef
|
||||
Swarm.Util.RingBuffer
|
||||
Swarm.Util.UnitInterval
|
||||
Swarm.Util.WindowedCounter
|
||||
@ -284,7 +285,6 @@ library
|
||||
Swarm.Language.Typed
|
||||
Swarm.Language.Types
|
||||
Swarm.Language.Value
|
||||
Swarm.ReadableIORef
|
||||
Swarm.TUI.View
|
||||
Swarm.TUI.View.Achievement
|
||||
Swarm.TUI.View.Attribute.Attr
|
||||
@ -424,6 +424,7 @@ executable swarm
|
||||
vty,
|
||||
swarm,
|
||||
swarm-web,
|
||||
swarm-util,
|
||||
if os(windows)
|
||||
build-depends: vty-windows >= 0.1.0.3 && < 0.2,
|
||||
else
|
||||
|
Loading…
Reference in New Issue
Block a user