From ee3788d35edd1a6107a2b5e0c1d7172234f7a640 Mon Sep 17 00:00:00 2001
From: Tom Smeding <tom.smeding@gmail.com>
Date: Fri, 24 Jul 2020 22:39:29 +0200
Subject: Define builtins in backend

---
 main/Main.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'main/Main.hs')

diff --git a/main/Main.hs b/main/Main.hs
index f5a3d5a..a7e242d 100644
--- a/main/Main.hs
+++ b/main/Main.hs
@@ -4,6 +4,7 @@ import System.Exit
 
 import qualified CC.Parser as Parser
 import qualified CC.Typecheck as Typecheck
+import qualified CC.Backend.Dumb as Backend
 
 import CC.Context
 import CC.Pretty
@@ -29,7 +30,7 @@ main = do
     let combined = parse `passJoin` typecheck
 
     source <- getContents
-    let context = Context "<stdin>"
+    let context = Context "<stdin>" Backend.builtins
     case combined context (read source) of
         Right prog -> pprint prog
         Left err -> die err
-- 
cgit v1.2.3-54-g00ecf