Rakarake/churf
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix unnecessary supercombinator issue

Browse source
This commit is contained in:
Martin Fredin 2023-02-10 11:47:07 +01:00
parent ece621b0aa
commit 8688b303ac
5 changed files with 62 additions and 43 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/Main.hs
View file

@ -3,7 +3,7 @@ module Main where
import Grammar.Par (myLexer, pProgram)
import Grammar.Print (printTree)
import LambdaLifter (abstract, freeVars, lambdaLift, rename)
import LambdaLifter (lambdaLift)
import System.Environment (getArgs)
import System.Exit (exitFailure, exitSuccess)
@ -20,10 +20,6 @@ main = getArgs >>= \case
Right prg -> do
putStrLn "-- Parse"
putStrLn $ printTree prg
-- putStrLn "\n-- Abstract"
-- putStrLn . printTree $ (abstract . freeVars) prg
-- putStrLn "\n-- Rename"
-- putStrLn . printTree $ (rename . abstract . freeVars) prg
putStrLn "\n-- Lamda lifter"
putStrLn . printTree $ lambdaLift prg
putStrLn ""