1 2 3 4 5 6
{-# GHC_PRAGMA INTERFACE VERSION 5 #-} interface LiberateCase where import CoreSyn(CoreBinding) import Id(Id) liberateCase :: Int -> [CoreBinding Id Id] -> [CoreBinding Id Id]