From 0a12bc469754e6404cbd60d1b8465fa8c2408cec Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Sun, 6 May 2018 14:07:31 +0000
Subject: [PATCH] - removed pocall_oldfpccall from the supported calling
 conventions of the i8086   code generator

git-svn-id: trunk@38935 -
---
 compiler/i8086/cpuinfo.pas | 1 -
 compiler/i8086/cpupara.pas | 6 ++----
 compiler/x86/nx86cal.pas   | 2 +-
 3 files changed, 3 insertions(+), 6 deletions(-)

diff --git a/compiler/i8086/cpuinfo.pas b/compiler/i8086/cpuinfo.pas
index 578cae520f..6ed08ae0ef 100644
--- a/compiler/i8086/cpuinfo.pas
+++ b/compiler/i8086/cpuinfo.pas
@@ -105,7 +105,6 @@ Const
      pocall_cppdecl,
      pocall_far16,
      pocall_pascal,
-     pocall_oldfpccall,
      pocall_mwpascal
    ];
 
diff --git a/compiler/i8086/cpupara.pas b/compiler/i8086/cpupara.pas
index 5de53fbdcc..32e2287cf2 100644
--- a/compiler/i8086/cpupara.pas
+++ b/compiler/i8086/cpupara.pas
@@ -217,8 +217,7 @@ unit cpupara;
           pocall_cppdecl,
           pocall_mwpascal,
           pocall_far16,
-          pocall_pascal,
-          pocall_oldfpccall :
+          pocall_pascal :
             result:=[RS_AX,RS_DX,RS_CX,RS_SI,RS_DI,RS_BX];
           else
             internalerror(200309071);
@@ -253,8 +252,7 @@ unit cpupara;
           pocall_cppdecl,
           pocall_mwpascal,
           pocall_far16,
-          pocall_pascal,
-          pocall_oldfpccall :
+          pocall_pascal :
             result:=saveregs_pascal;
           else
             internalerror(2018042301);
diff --git a/compiler/x86/nx86cal.pas b/compiler/x86/nx86cal.pas
index 6e5347d95e..aa7ef900eb 100644
--- a/compiler/x86/nx86cal.pas
+++ b/compiler/x86/nx86cal.pas
@@ -88,7 +88,7 @@ implementation
   function tx86callnode.can_call_ref(var ref: treference): boolean;
     const
 {$if defined(i8086)}
-      save_all_regs=[pocall_far16,pocall_pascal,pocall_oldfpccall];
+      save_all_regs=[pocall_far16,pocall_pascal];
 {$elseif defined(i386)}
       save_all_regs=[pocall_far16,pocall_oldfpccall];
 {$elseif defined(x86_64)}