소스 검색

agllvm: support nested constants in parameters

Needed for metadata support
Jonas Maebe 3 년 전
부모
커밋
c92a035614
1개의 변경된 파일2개의 추가작업 그리고 0개의 파일을 삭제
  1. 2 0
      compiler/llvm/agllvm.pas

+ 2 - 0
compiler/llvm/agllvm.pas

@@ -391,7 +391,9 @@ implementation
                    metadatakind:=mk_none
                  else
                    metadatakind:=mk_normal;
+                 inc(owner.fdecllevel);
                  owner.WriteTai(false,false,metadatakind,tmpinline,tmpasmblock,hp);
+                 dec(owner.fdecllevel);
                end;
              { empty records }
              top_undef: