Procházet zdrojové kódy

* fixed broken fpu type setting in 2.1.1

git-svn-id: trunk@3586 -
florian před 19 roky
rodič
revize
64f51612d4
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      compiler/globals.pas

+ 1 - 1
compiler/globals.pas

@@ -2020,7 +2020,7 @@ end;
         for t:=low(tfputype) to high(tfputype) do
           if fputypestr[t]=s then
             begin
-              aktfputype:=t;
+              a:=t;
               result:=true;
               break;
             end;