Преглед изворни кода

* fixed broken fpu type setting in 2.1.1

git-svn-id: trunk@3586 -
florian пре 19 година
родитељ
комит
64f51612d4
1 измењених фајлова са 1 додато и 1 уклоњено
  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;