Browse Source

* fixed cs_externally_visible (macpas {$z+})

git-svn-id: trunk@5381 -
Jonas Maebe 18 years ago
parent
commit
76cd84f2a1
1 changed files with 2 additions and 1 deletions
  1. 2 1
      compiler/pdecvar.pas

+ 2 - 1
compiler/pdecvar.pas

@@ -838,8 +838,9 @@ implementation
                   is_external_var:=true;
                 end
               else if (cs_externally_visible in current_settings.localswitches) then
-                begin {The effect of this is the same as if cvar has been given as directives.}
+                begin {The effect of this is the same as if cvar has been given as directives and it's made public.}
                   is_cdecl:=true;
+                  is_public_var:=true;
                 end;
             end;