mirror of
https://github.com/github/semantic.git
synced 2024-11-23 16:37:50 +03:00
Less strict evaluation of the edit script.
This commit is contained in:
parent
d71f97d1b5
commit
8a2c0bf6c2
@ -14,7 +14,7 @@ import Prologue hiding (error)
|
||||
-- | An edit script, i.e. a sequence of changes/copies of elements.
|
||||
type EditScript a b = [These a b]
|
||||
|
||||
data Endpoint a b = Endpoint { x :: {-# UNPACK #-} !Int, _y :: {-# UNPACK #-} !Int, _script :: !(EditScript a b) }
|
||||
data Endpoint a b = Endpoint { x :: {-# UNPACK #-} !Int, _y :: {-# UNPACK #-} !Int, _script :: EditScript a b }
|
||||
deriving (Eq, Show)
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user