aihc-parser-1.0.0.2: test/Test/Fixtures/oracle/ExplicitLevelImports/explicit-level-with-as.hs

{- ORACLE_TEST pass -}
{-# LANGUAGE ExplicitLevelImports #-}

module ExplicitLevelWithAs where

import quote Data.List as L
import splice Data.Maybe as M

useAliases :: [a] -> a -> a
useAliases xs fallback = M.fromMaybe fallback (L.listToMaybe xs)