X-Git-Url: http://git.lukelau.me/?p=kaleidoscope-hs.git;a=blobdiff_plain;f=Main.hs;fp=Main.hs;h=c2fff06f82a811a3cc789fc37a3836fb70fa5d26;hp=97407fee2fbf6ef7907f3f45a934e737fa29d593;hb=c0262e071b9909756911c55339ba03c78d207332;hpb=e0a26bc0a8d6c8021c0a2da5bb66008a1c7a51de

diff --git a/Main.hs b/Main.hs
index 97407fe..c2fff06 100644
--- a/Main.hs
+++ b/Main.hs
@@ -19,6 +19,7 @@ import LLVM.AST.Operand
 import LLVM.AST.Type as Type
 import LLVM.Context
 import LLVM.IRBuilder
+import LLVM.Linking
 import LLVM.Module
 import LLVM.OrcJIT
 import LLVM.OrcJIT.CompileLayer
@@ -38,7 +39,8 @@ data JITEnv = JITEnv
   }
 
 main :: IO ()
-main =
+main = do
+  loadLibraryPermanently (Just "stdlib.dylib")
   withContext $ \ctx -> withHostTargetMachineDefault $ \tm ->
     withExecutionSession $ \exSession ->
       withSymbolResolver exSession (SymbolResolver symResolver) $ \symResolverPtr ->