View of shared list in parallel spoils layout
I have a type Train and a share with a list of them:
import StdEnv
import iTasks
:: Train =
{ name :: String
, pos :: Cell
, dest :: Cell
, face :: Face
}
:: Face = N | E | S | W
:: Cell = {x :: Int, y :: Int}
derive class iTask Cell, Train, Face
trains :: SimpleSDSLens [Train]
trains = sharedStore "trains" []
Start w = doTasks (ArrangeHorizontal @>> task) w
where
task =
updateSharedInformation [] trains
-&&-
updateSharedInformation [] trains
updating this share in parallel with a updateSharedInformation
spoils the layout. See screenshots.
I use the 2019-10-01 version of iTasks on Windows with Firefox. This bug is still present on 2020-10-12, and is platform-independent. It seems that some layout functions are not applied correctly.