mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-07 07:59:40 +01:00
+ bugfix for $Z+ for mode macpas
This commit is contained in:
parent
1d15fe4f31
commit
53f77231d5
@ -1997,6 +1997,7 @@ const
|
|||||||
tprocdef(pd).aliasnames.insert(tprocdef(pd).procsym.realname);
|
tprocdef(pd).aliasnames.insert(tprocdef(pd).procsym.realname);
|
||||||
include(pd.procoptions,po_public);
|
include(pd.procoptions,po_public);
|
||||||
include(pd.procoptions,po_has_public_name);
|
include(pd.procoptions,po_has_public_name);
|
||||||
|
include(pd.procoptions,po_global);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
while token in [_ID,_LECKKLAMMER] do
|
while token in [_ID,_LECKKLAMMER] do
|
||||||
@ -2357,7 +2358,10 @@ const
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.215 2004-11-29 21:50:08 peter
|
Revision 1.216 2004-12-05 00:32:56 olle
|
||||||
|
+ bugfix for $Z+ for mode macpas
|
||||||
|
|
||||||
|
Revision 1.215 2004/11/29 21:50:08 peter
|
||||||
* public is allowd in interface
|
* public is allowd in interface
|
||||||
|
|
||||||
Revision 1.214 2004/11/29 17:48:34 peter
|
Revision 1.214 2004/11/29 17:48:34 peter
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user