Bläddra i källkod

rautils: don't interpret ".L3" as potentially meaning "unitx.identifier"

Fixes compilation of webtbs/tw10641.pp with a compiler compiled with
range checking
Jonas Maebe 3 år sedan
förälder
incheckning
8c67a4370b
1 ändrade filer med 1 tillägg och 1 borttagningar
  1. 1 1
      compiler/rautils.pas

+ 1 - 1
compiler/rautils.pas

@@ -1413,7 +1413,7 @@ var
 begin
   i:=pos('.',s);
   { allow unit.identifier }
-  if i>0 then
+  if i>1 then
     begin
       searchsym(Copy(s,1,i-1),srsym,srsymtable);
       if assigned(srsym) then