diff --git a/compiler/llvm/llvmdef.pas b/compiler/llvm/llvmdef.pas
index 2cdae2d7c0..ae259b08f8 100644
--- a/compiler/llvm/llvmdef.pas
+++ b/compiler/llvm/llvmdef.pas
@@ -402,7 +402,8 @@ implementation
                  tprocvardef(def).is_addressonly then
                 begin
                   llvmaddencodedproctype(tabstractprocdef(def),'',lpd_procvar,encodedstr);
-                  encodedstr:=encodedstr+'*';
+                  if def.typ=procvardef then
+                    encodedstr:=encodedstr+'*';
                 end
               else
                 begin