Revert back to one lambda par, and fix issues with lambda lifter
This commit is contained in:
parent
78a3ed56ea
commit
e212c79a44
4 changed files with 73 additions and 35 deletions
|
|
@ -3,7 +3,7 @@ module Main where
|
|||
|
||||
import Grammar.Par (myLexer, pProgram)
|
||||
import Grammar.Print (printTree)
|
||||
import LambdaLifter (lambdaLift)
|
||||
import LambdaLifter (abstract, freeVars, lambdaLift)
|
||||
import System.Environment (getArgs)
|
||||
import System.Exit (exitFailure, exitSuccess)
|
||||
|
||||
|
|
@ -20,7 +20,7 @@ main = getArgs >>= \case
|
|||
Right prg -> do
|
||||
putStrLn "-- Parse"
|
||||
putStrLn $ printTree prg
|
||||
putStrLn "\n-- Lamda lifter"
|
||||
putStrLn "\n-- Lambda lifter"
|
||||
putStrLn . printTree $ lambdaLift prg
|
||||
putStrLn ""
|
||||
exitSuccess
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue