diff --git a/src/Data/Abstract/Located.hs b/src/Data/Abstract/Located.hs index 2aedd65c4..ae10f85bb 100644 --- a/src/Data/Abstract/Located.hs +++ b/src/Data/Abstract/Located.hs @@ -7,3 +7,5 @@ import Data.Record type Provenance = Record Location data Located location = Located { provenance :: !Provenance, location :: location } + +newtype LocatedValue value = LocatedValue { getLocatedValue :: value }