Explorar o código

* set the proper TextRec size for i8086

git-svn-id: branches/i8086@23854 -
nickysn %!s(int64=12) %!d(string=hai) anos
pai
achega
a0e683bed6
Modificáronse 1 ficheiros con 5 adicións e 1 borrados
  1. 5 1
      compiler/symdef.pas

+ 5 - 1
compiler/symdef.pas

@@ -2499,7 +2499,11 @@ implementation
 {$ifdef cpu16bitaddr}
 {$ifdef cpu16bitaddr}
         case filetyp of
         case filetyp of
           ft_text :
           ft_text :
-            savesize:=96;
+            {$ifdef avr}
+              savesize:=96;
+            {$else avr}
+              savesize:=576;
+            {$endif avr}
           ft_typed,
           ft_typed,
           ft_untyped :
           ft_untyped :
             savesize:=76;
             savesize:=76;