+ tests for wrong relsymbol usage

git-svn-id: trunk@9369 -

.gitattributes

@@ -6039,6 +6039,8 @@ tests/tbf/tb0200.pp svneol=native#text/x-pascal
 tests/tbf/tb0201.pp svneol=native#text/plain
 tests/tbf/tb0202.pp svneol=native#text/plain
 tests/tbf/tb0203.pp svneol=native#text/plain
+tests/tbf/tb0204.pp svneol=native#text/plain
+tests/tbf/tb0204a.pp svneol=native#text/plain
 tests/tbf/ub0115.pp svneol=native#text/plain
 tests/tbf/ub0149.pp svneol=native#text/plain
 tests/tbf/ub0158a.pp svneol=native#text/plain

tests/tbf/tb0204.pp

@@ -0,0 +1,13 @@
+{ %fail }
+{ %cpu=i386 }
+{ %opt=-Cg- }
+
+var
+  a: longint;
+begin
+  {$asmmode att}
+  asm
+.LPIC:
+    movl a-.LPIC-.LPIC(%ecx),%eax
+  end;
+end.

tests/tbf/tb0204a.pp

@@ -0,0 +1,13 @@
+{ %fail }
+{ %cpu=i386 }
+{ %opt=-Cg- }
+
+var
+  a: longint;
+begin
+  {$asmmode intel}
+  asm
+@@LPIC:
+    mov eax,[a-@@LPIC-@@LPIC+ecx]
+  end;
+end.