Bläddra i källkod

* fixed previous commit

git-svn-id: trunk@3195 -
Jonas Maebe 19 år sedan
förälder
incheckning
76937d5222
1 ändrade filer med 1 tillägg och 1 borttagningar
  1. 1 1
      compiler/globals.pas

+ 1 - 1
compiler/globals.pas

@@ -1976,7 +1976,7 @@ end;
         hs : string;
         hs : string;
       begin
       begin
         result:=false;
         result:=false;
-        if (hs = '') then
+        if (s = '') then
           exit;
           exit;
         hs:=upper(s);
         hs:=upper(s);
         if (hs = 'DEFAULT') then
         if (hs = 'DEFAULT') then