{- | same as annotation Target in Manchester Syntax,
      named annotation Value in Abstract Syntax -}
annotationValue :: CharParser st AnnotationValue
annotationValue = do
    l <- literal
    return $ AnnValLit l
  <|> do
    i <- individual
    return $ AnnValue i
annotationValue :: CharParser st AnnotationValue
annotationValue = do
    l <- literal
    return $ AnnValLit l
  <|> do
    i <- individual
    return $ AnnValue i
annotationValue = do
    l <- literal
    return $ AnnValLit l
  <|> do
    i <- individual
    return $ AnnValue i