paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-04 16:39:24 +01:00
Code Issues Packages Projects Releases Wiki Activity

support external <dllname>; also for variables

Browse Source
This commit is contained in:
peter 2005-03-09 23:44:18 +00:00
parent b16af7dfcc
commit d24397b6e6
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/pdecvar.pas
View File

@ -1088,8 +1088,10 @@ implementation
is_dll:=true; is_dll:=true;
dll_name:=get_stringconst; dll_name:=get_stringconst;
end; end;
consume(_NAME); if try_to_consume(_NAME) then
C_name:=get_stringconst; C_name:=get_stringconst
else
C_name:=sorg;
end; end;
{ consume the ; when export or external is used } { consume the ; when export or external is used }
if semicolonatend then if semicolonatend then
@ -1318,7 +1320,10 @@ implementation
end. end.
{ {
$Log$ $Log$
Revision 1.97 2005-02-14 17:13:07 peter Revision 1.98 2005-03-09 23:44:18 peter
support external <dllname>; also for variables
Revision 1.97 2005/02/14 17:13:07 peter
* truncate log * truncate log
Revision 1.96 2005/02/03 17:11:40 peter Revision 1.96 2005/02/03 17:11:40 peter