Browse Source

- disabled can_call_ref() for llvm

git-svn-id: branches/hlcgllvm@27017 -
Jonas Maebe 11 years ago
parent
commit
482eb86047
1 changed files with 10 additions and 2 deletions
  1. 10 2
      compiler/llvm/nllvmcal.pas

+ 10 - 2
compiler/llvm/nllvmcal.pas

@@ -26,11 +26,14 @@ unit nllvmcal;
 interface
 interface
 
 
     uses
     uses
-      ncgcal;
+      parabase,
+      ncgcal,
+      cgutils;
 
 
     type
     type
       tllvmcallnode = class(tcgcallnode)
       tllvmcallnode = class(tcgcallnode)
        protected
        protected
+        function can_call_ref(var ref: treference): boolean; override;
         procedure pushparas; override;
         procedure pushparas; override;
       end;
       end;
 
 
@@ -41,7 +44,12 @@ implementation
        verbose,
        verbose,
        ncal;
        ncal;
 
 
-{ tllvmcallnode }
+
+    function tllvmcallnode.can_call_ref(var ref: treference): boolean;
+      begin
+        result:=false;
+      end;
+
 
 
     procedure tllvmcallnode.pushparas;
     procedure tllvmcallnode.pushparas;
       var
       var