15 lines
291 B
Haskell
15 lines
291 B
Haskell
{-# LANGUAGE OverloadedLists #-}
|
|
module Gyehoek.CPS.Lower
|
|
( lower
|
|
) where
|
|
|
|
import Gyehoek.CPS.Syntax
|
|
import Gyehoek.Scheme.Syntax qualified as Scm
|
|
import Gyehoek.GenSym
|
|
import Data.List.NonEmpty (NonEmpty((:|)))
|
|
import Effectful
|
|
import Control.Monad.Cont qualified as Cont
|
|
|
|
|
|
lower = _
|