aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/OverloadedLabels/basic.hs

{- ORACLE_TEST pass -}
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE OverloadedLabels #-}
module OverloadedLabelsBasic where

import GHC.OverloadedLabels (IsLabel (..))

data Label = Label

instance IsLabel "typeUrl" Label where
  fromLabel = Label

x :: Label
x = #typeUrl