paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 01:29:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ openstring id is now supported

Browse Source
This commit is contained in:
florian 1999-02-05 12:51:21 +00:00
parent ebaa3a84ac
commit d17abfd1ad
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/tokens.pas
View File

@ -173,6 +173,7 @@ type
_PROTECTED, _PROTECTED,
_PUBLISHED, _PUBLISHED,
_DESTRUCTOR, _DESTRUCTOR,
_OPENSTRING,
_CONSTRUCTOR, _CONSTRUCTOR,
_SHORTSTRING, _SHORTSTRING,
_FINALIZATION, _FINALIZATION,
@ -332,6 +333,7 @@ const
(str:'PROTECTED' ;special:false;keyword:m_none), (str:'PROTECTED' ;special:false;keyword:m_none),
(str:'PUBLISHED' ;special:false;keyword:m_none), (str:'PUBLISHED' ;special:false;keyword:m_none),
(str:'DESTRUCTOR' ;special:false;keyword:m_all), (str:'DESTRUCTOR' ;special:false;keyword:m_all),
(str:'OPENSTRING' ;special:false;keyword:m_none),
(str:'CONSTRUCTOR' ;special:false;keyword:m_all), (str:'CONSTRUCTOR' ;special:false;keyword:m_all),
(str:'SHORTSTRING' ;special:false;keyword:m_none), (str:'SHORTSTRING' ;special:false;keyword:m_none),
(str:'FINALIZATION' ;special:false;keyword:m_class), (str:'FINALIZATION' ;special:false;keyword:m_class),
@ -344,7 +346,10 @@ implementation
end. end.
{ {
$Log$ $Log$
Revision 1.1 1998-12-11 00:04:02 peter Revision 1.2 1999-02-05 12:51:21 florian
+ openstring id is now supported
Revision 1.1 1998/12/11 00:04:02 peter
+ globtype,tokens,version unit splitted from globals + globtype,tokens,version unit splitted from globals
} }