1
1
mirror of https://github.com/idris-lang/Idris2.git synced 2024-12-23 19:54:50 +03:00
Idris2/tests/idris2/api001/LazyCodegen.idr

20 lines
597 B
Idris
Raw Normal View History

module Main
import Core.Context
import Compiler.Common
import Idris.Driver
2020-08-21 12:51:21 +03:00
compile : Ref Ctxt Defs -> (tmpDir : String) -> (execDir : String) ->
ClosedTerm -> (outfile : String) -> Core (Maybe String)
2020-08-21 12:51:21 +03:00
compile defs tmp dir term file = do coreLift $ putStrLn "I'd rather not."
pure $ Nothing
execute : Ref Ctxt Defs -> (execDir : String) -> ClosedTerm -> Core ()
execute defs dir term = do coreLift $ putStrLn "Maybe in an hour."
lazyCodegen : Codegen
lazyCodegen = MkCG compile execute
main : IO ()
main = mainWithCodegens [("lazy", lazyCodegen)]