Feature/llvm inline

README.md

@@ -49,6 +49,10 @@ To debug leaks on OS X:
 
 leaks --atExit -- ./name_of_the_test
 
+To show llvm IR for runtime:
+
+llvm-dis runtime_uber.bc -o runtime_uber.ll
+
 
 ## Running
 

backend-v2/CMakeLists.txt

@@ -31,7 +31,6 @@ set(CMAKE_CXX_FLAGS_RELEASE "-Ofast")
 set(CMAKE_CXX_STANDARD 20)
 add_compile_definitions(BUILD_TYPE="${CMAKE_BUILD_TYPE}")
 
-add_subdirectory(runtime)
 
 # --- Dependency Discovery ---
 
@@ -138,6 +137,8 @@ set(BACKEND_SOURCES
       codegen/ops/LocalNode.cpp
       codegen/ops/WithMetaNode.cpp)
 
+add_subdirectory(runtime)
+
 
 # 2. Protobuf Detection
 find_package(Protobuf CONFIG QUIET)

backend-v2/codegen/CodeGen.cpp

@@ -1,11 +1,11 @@
 #include "CodeGen.h"
-#include "CleanupChainGuard.h"
 #include "../bridge/Exceptions.h"
 #include "../cljassert.h"
+#include "CleanupChainGuard.h"
 #include "TypedValue.h"
+#include "runtime/Object.h"
 #include "runtime/RTValue.h"
 #include "runtime/String.h"
-#include "runtime/Object.h"
 
 using namespace llvm;
 using namespace clojure::rt::protobuf::bytecode;
@@ -67,7 +67,8 @@ std::string CodeGen::codegenTopLevel(const Node &node) {
 
   // Declare personality function
   FunctionType *personalityFnTy = FunctionType::get(types.i32Ty, true);
-  personalityFn = TheModule->getOrInsertFunction("__gxx_personality_v0", personalityFnTy);
+  personalityFn =
+      TheModule->getOrInsertFunction("__gxx_personality_v0", personalityFnTy);
   F->setPersonalityFn(cast<Function>(personalityFn.getCallee()));
 
   // Set initial debug location
@@ -83,10 +84,11 @@ std::string CodeGen::codegenTopLevel(const Node &node) {
 }
 
 TypedValue CodeGen::codegen(const Node &node,
-                             const ObjectTypeSet &typeRestrictions) {
+                            const ObjectTypeSet &typeRestrictions) {
   CLJ_ASSERT(TSContext != nullptr, "Codegen was moved");
 
-  MemoryManagement::UnwindGuidanceGuard guidanceGuard(memoryManagement, &node.unwindmemory());
+  MemoryManagement::UnwindGuidanceGuard guidanceGuard(memoryManagement,
+                                                      &node.unwindmemory());
 
   auto env = node.env();
   if (!LexicalBlocks.empty()) {
@@ -137,8 +139,8 @@ TypedValue CodeGen::codegen(const Node &node,
     return codegen(node, node.subnode().if_(), typeRestrictions);
   // case opImport:
   //   return codegen(node, node.subnode().import(), typeRestrictions);
-  // case opInstanceCall:
-  //   return codegen(node, node.subnode().instancecall(), typeRestrictions);
+  //case opInstanceCall:
+//    return codegen(node, node.subnode().instancecall(), typeRestrictions);
   // case opInstanceField:
   //   return codegen(node, node.subnode().instancefield(), typeRestrictions);
   // case opIsInstance:
@@ -237,8 +239,8 @@ ObjectTypeSet CodeGen::getType(const Node &node,
     return getType(node, node.subnode().if_(), typeRestrictions);
   // case opImport:
   //   return getType(node, node.subnode().import(), typeRestrictions);
-  // case opInstanceCall:
-  //   return getType(node, node.subnode().instancecall(), typeRestrictions);
+  //case opInstanceCall:
+//    return getType(node, node.subnode().instancecall(), typeRestrictions);
   // case opInstanceField:
   //   return getType(node, node.subnode().instancefield(), typeRestrictions);
   // case opIsInstance:
@@ -299,7 +301,8 @@ ObjectTypeSet CodeGen::getType(const Node &node,
 Var *CodeGen::getOrCreateVar(std::string_view name) {
   return compilerState.varRegistry.getOrCreate(
       std::string(name).c_str(), [name]() {
-        RTValue keyword = Keyword_create(String_createDynamicStr(std::string(name).c_str()));
+        RTValue keyword =
+            Keyword_create(String_createDynamicStr(std::string(name).c_str()));
         return Var_create(keyword);
       });
 }
@@ -314,11 +317,12 @@ bool CodeGen::canThrow(const Node &node) {
   case opFn:
   case opFnMethod:
     return false;
-  
+
   case opLet: {
     const auto &l = node.subnode().let();
     for (int i = 0; i < l.bindings_size(); ++i) {
-        if (canThrow(l.bindings(i))) return true;
+      if (canThrow(l.bindings(i)))
+        return true;
     }
     return canThrow(l.body());
   }
@@ -394,5 +398,4 @@ bool CodeGen::canThrow(const Node &node) {
   }
 }
 
-
 } // namespace rt

backend-v2/codegen/CodeGen.h

@@ -58,7 +58,7 @@ class CodeGen {
   std::unique_ptr<llvm::DIBuilder> DIB;
   llvm::DICompileUnit *CU;
   std::vector<llvm::DIScope *> LexicalBlocks;
-  
+
   // Static Landing Pads management via manager
   llvm::FunctionCallee personalityFn;
 
@@ -122,6 +122,8 @@ class CodeGen {
                      const ObjectTypeSet &typeRestrictions);
   TypedValue codegen(const Node &node, const LocalNode &subnode,
                      const ObjectTypeSet &typeRestrictions);
+  TypedValue codegen(const Node &node, const InstanceCallNode &subnode,
+                     const ObjectTypeSet &typeRestrictions);
 
   ObjectTypeSet getType(const Node &node,
                         const ObjectTypeSet &typeRestrictions);
@@ -154,15 +156,22 @@ class CodeGen {
                         const ObjectTypeSet &typeRestrictions);
   ObjectTypeSet getType(const Node &node, const LocalNode &subnode,
                         const ObjectTypeSet &typeRestrictions);
+  ObjectTypeSet getType(const Node &node, const InstanceCallNode &subnode,
+                        const ObjectTypeSet &typeRestrictions);
+
   Var *getOrCreateVar(std::string_view name);
   bool canThrow(const clojure::rt::protobuf::bytecode::Node &node);
-  
+
   // Exception safety helpers
   void pushResource(TypedValue val) { memoryManagement.pushResource(val); }
   void popResource() { memoryManagement.popResource(); }
-  llvm::BasicBlock* getLandingPad(size_t skipCount = 0) { return memoryManagement.getLandingPad(skipCount); }
+  llvm::BasicBlock *getLandingPad(size_t skipCount = 0) {
+    return memoryManagement.getLandingPad(skipCount);
+  }
   bool hasLandingPad() const { return memoryManagement.hasPushedResources(); }
-  bool hasPushedResources() const { return memoryManagement.hasPushedResources(); }
+  bool hasPushedResources() const {
+    return memoryManagement.hasPushedResources();
+  }
   MemoryManagement &getMemoryManagement() { return memoryManagement; }
 };
 

backend-v2/codegen/MemoryManagement.cpp

@@ -26,7 +26,7 @@ MemoryManagement::MemoryManagement(llvm::LLVMContext &c, IRBuilder<> &b,
                                    LLVMTypes &t,
                                    VariableBindings<TypedValue> &vb,
                                    InvokeManager &i)
-    : context(c), builder(b), theModule(m), valueEncoder(v), types(t),
+    : context(c), builder(b), valueEncoder(v), types(t),
       variableBindingStack(vb), invoke(i) {}
 
 void MemoryManagement::initFunction(llvm::Function *F) {
@@ -183,7 +183,7 @@ void MemoryManagement::dynamicMemoryGuidance(
   auto name = guidance.variablename();
   auto change = guidance.requiredrefcountchange();
 
-  for (word_t depth = variableBindingStack.stackDepth() - 1; depth >= 0;
+  for (word_t depth = (word_t)variableBindingStack.stackDepth() - 1; depth >= 0;
        depth--) {
     auto val = variableBindingStack.find(name, depth);
     if (val) {

backend-v2/codegen/MemoryManagement.h

@@ -66,7 +66,7 @@ class MemoryManagement {
 private:
   llvm::LLVMContext &context;
   llvm::IRBuilder<> &builder;
-  llvm::Module &theModule;
+
   ValueEncoder &valueEncoder;
   LLVMTypes &types;
   VariableBindings<TypedValue> &variableBindingStack;

backend-v2/codegen/invoke/InvokeManager.cpp

@@ -118,7 +118,7 @@ TypedValue InvokeManager::generateIntrinsic(const IntrinsicDescription &id,
   if (id.type == CallType::Intrinsic) {
     auto git = genericIntrinsics.find(id.symbol);
     if (git != genericIntrinsics.end()) {
-      return TypedValue(id.returnType, git->second(builder, args));
+      return TypedValue(id.returnType, git->second(builder, args, guard));
     }
 
     auto it = intrinsics.find(id.symbol);

backend-v2/codegen/invoke/InvokeManager.h

@@ -29,7 +29,7 @@ using IntrinsicCall = std::function<llvm::Value *(llvm::IRBuilder<> &,
 using TypeIntrinsicCall =
     std::function<ObjectTypeSet(const std::vector<ObjectTypeSet> &)>;
 using GenericIntrinsicCall = std::function<llvm::Value *(
-    llvm::IRBuilder<> &, const std::vector<TypedValue> &)>;
+    llvm::IRBuilder<> &, const std::vector<TypedValue> &, CleanupChainGuard *)>;
 
 class InvokeManager {
   friend void registerMathIntrinsics(InvokeManager &mgr);