* CPU386 define for Delphi compatibility

git-svn-id: trunk@3276 -

compiler/options.pas

@@ -1886,6 +1886,7 @@ begin
 {$ifdef i386}
   def_system_macro('CPU86');
   def_system_macro('CPU87');
+  def_system_macro('CPU386');
 {$endif}
 {$ifdef m68k}
   def_system_macro('CPU68');