packages feed

no-recursion-0.2.0.0: tests/ignore/Test/AnnName.hs

{-# LANGUAGE Unsafe #-}

module Test.AnnName
  ( recDef,
    nonRecDef,
  )
where

import safe "base" Control.Category (id)

recDef :: a -> b
recDef = recDef
-- Removing this line should cause this module to not compile.
{-# ANN recDef "Recursion" #-}

nonRecDef :: a -> a
nonRecDef = id