summaryrefslogtreecommitdiff
path: root/src/Obs/Main.idr
diff options
context:
space:
mode:
Diffstat (limited to 'src/Obs/Main.idr')
-rw-r--r--src/Obs/Main.idr5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Obs/Main.idr b/src/Obs/Main.idr
index 0ff1d70..639094f 100644
--- a/src/Obs/Main.idr
+++ b/src/Obs/Main.idr
@@ -1,7 +1,9 @@
module Obs.Main
+import Obs.Abstract
import Obs.Parser
import Obs.Syntax
+import Obs.Term
import System
@@ -18,4 +20,5 @@ main = do
[_, file] <- getArgs
| _ => usage
defs <- parseFile file
- putDoc $ concatWith (\x, y => x <+> hardline <+> hardline <+> y) (map pretty defs)
+ blk <- printErr $ abstractBlock defs
+ putDoc $ pretty blk