Browse Source

agllvm: support specialised metadata with field names

Necessary for DIExpression
Jonas Maebe 3 years ago
parent
commit
41a6c5e967
1 changed files with 5 additions and 2 deletions
  1. 5 2
      compiler/llvm/agllvm.pas

+ 5 - 2
compiler/llvm/agllvm.pas

@@ -1271,8 +1271,11 @@ implementation
               else
               else
                 first:=false;
                 first:=false;
               specialised_element:=tllvmspecialisedmetaitem(element);
               specialised_element:=tllvmspecialisedmetaitem(element);
-              writer.AsmWrite(specialised_element.itemname);
-              writer.AsmWrite(': ');
+              if specialised_element.itemname<>'' then
+                begin
+                  writer.AsmWrite(specialised_element.itemname);
+                  writer.AsmWrite(': ');
+                end;
               case specialised_element.itemkind of
               case specialised_element.itemkind of
                 lsmik_boolean:
                 lsmik_boolean:
                   metadatakind:=mk_specialised_bool;
                   metadatakind:=mk_specialised_bool;