Browse Source

- remove no longer needed gen_fpc_dummy()

git-svn-id: trunk@35374 -
svenbarth 8 years ago
parent
commit
d149f260fc
1 changed files with 0 additions and 11 deletions
  1. 0 11
      compiler/ncgutil.pas

+ 0 - 11
compiler/ncgutil.pas

@@ -99,7 +99,6 @@ interface
 
     function getprocalign : shortint;
 
-    procedure gen_fpc_dummy(list : TAsmList);
     procedure gen_load_frame_for_exceptfilter(list : TAsmList);
 
 implementation
@@ -1765,16 +1764,6 @@ implementation
       end;
 
 
-    procedure gen_fpc_dummy(list : TAsmList);
-      begin
-{$ifdef i386}
-        { fix me! }
-        list.concat(Taicpu.Op_const_reg(A_MOV,S_L,1,NR_EAX));
-        list.concat(Taicpu.Op_const(A_RET,S_W,12));
-{$endif i386}
-      end;
-
-
     procedure gen_load_frame_for_exceptfilter(list : TAsmList);
       var
         para: tparavarsym;