+ extended tests with some additional ways to produce call relative near/absolute far in BP7's inline asm

git-svn-id: trunk@32172 -

tests/test/cpu16/i8086/tfarcal3.pp

@@ -73,24 +73,42 @@ begin
   asm
     int NearInt
     call testproc1
+    int NearInt
+    call [testproc1]
     int FarInt
     call testproc2
     int FarInt
+    call [testproc2]
+    int FarInt
     call testproc3
+    int FarInt
+    call [testproc3]
 
     int NearInt
     call near ptr testproc1
     int NearInt
+    call near ptr [testproc1]
+    int NearInt
     call near ptr testproc2
     int NearInt
+    call near ptr [testproc2]
+    int NearInt
     call near ptr testproc3
+    int NearInt
+    call near ptr [testproc3]
 
     int FarInt
     call far ptr testproc1
     int FarInt
+    call far ptr [testproc1]
+    int FarInt
     call far ptr testproc2
     int FarInt
+    call far ptr [testproc2]
+    int FarInt
     call far ptr testproc3
+    int FarInt
+    call far ptr [testproc3]
   end;
   Writeln('Ok');
 

tests/test/cpu16/i8086/tfarcal4.pp

@@ -73,24 +73,42 @@ begin
   asm
     int NearInt
     call testproc1
+    int NearInt
+    call [testproc1]
     int FarInt
     call testproc2
+    int FarInt
+    call [testproc2]
     int NearInt
     call testproc3
+    int NearInt
+    call [testproc3]
 
     int NearInt
     call near ptr testproc1
     int NearInt
+    call near ptr [testproc1]
+    int NearInt
     call near ptr testproc2
     int NearInt
+    call near ptr [testproc2]
+    int NearInt
     call near ptr testproc3
+    int NearInt
+    call near ptr [testproc3]
 
     int FarInt
     call far ptr testproc1
     int FarInt
+    call far ptr [testproc1]
+    int FarInt
     call far ptr testproc2
     int FarInt
+    call far ptr [testproc2]
+    int FarInt
     call far ptr testproc3
+    int FarInt
+    call far ptr [testproc3]
   end;
   Writeln('Ok');