- removed pocall_mwpascal from the supported calling conventions of the i8086

code generator

git-svn-id: trunk@38937 -

compiler/i8086/cpuinfo.pas

@@ -104,8 +104,7 @@ Const
      pocall_cdecl,
      pocall_cppdecl,
      pocall_far16,
-     pocall_pascal,
-     pocall_mwpascal
+     pocall_pascal
    ];
 
    cputypestr : array[tcputype] of string[10] = ('',

compiler/i8086/cpupara.pas

@@ -164,9 +164,7 @@ unit cpupara;
               else
                 result:=
                   (not(calloption in (cdecl_pocalls)) and
-                   (def.size>sizeof(aint))) or
-                  ((calloption = pocall_mwpascal) and
-                   (varspez=vs_const));
+                   (def.size>sizeof(aint)));
             end;
           arraydef :
             begin
@@ -215,7 +213,6 @@ unit cpupara;
           pocall_safecall,
           pocall_stdcall,
           pocall_cppdecl,
-          pocall_mwpascal,
           pocall_far16,
           pocall_pascal :
             result:=[RS_AX,RS_DX,RS_CX,RS_SI,RS_DI,RS_BX];
@@ -250,7 +247,6 @@ unit cpupara;
           pocall_safecall,
           pocall_stdcall,
           pocall_cppdecl,
-          pocall_mwpascal,
           pocall_far16,
           pocall_pascal :
             result:=saveregs_pascal;