Forráskód Böngészése

* force result to be set

florian 3 éve
szülő
commit
802f24dfbd
1 módosított fájl, 1 hozzáadás és 0 törlés
  1. 1 0
      compiler/options.pas

+ 1 - 0
compiler/options.pas

@@ -1177,6 +1177,7 @@ function TOption.ParseVersionStr(out ver: longint;
     compvarvalue: string[15];
     compvarvalue: string[15];
     i: longint;
     i: longint;
   begin
   begin
+    Result:=false;
     IdfVersionSet:=false;
     IdfVersionSet:=false;
     emptystr:='';
     emptystr:='';
     { check whether the value is a valid version number }
     { check whether the value is a valid version number }