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

* sorted in correctly new tokens added by Karoly

Browse Source
This commit is contained in:
olle 2005-01-04 19:22:33 +00:00
parent c2be1fd337
commit 94e74ca197
1 changed files with 15 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
compiler/tokens.pas
View File

@ -90,7 +90,8 @@ type
_DIVASN, _DIVASN,
_NOTASN, _NOTASN,
_XORASN, _XORASN,
{ Normal words } { Normal words -- ATTENTION: These words must be sorted: }
{ first in length order, then in alphabetical order. }
_C, _C,
_AS, _AS,
_AT, _AT,
@ -129,6 +130,7 @@ type
_NEAR, _NEAR,
_READ, _READ,
_SELF, _SELF,
_SYSV,
_THEN, _THEN,
_TRUE, _TRUE,
_TYPE, _TYPE,
@ -156,6 +158,7 @@ type
_EXCEPT, _EXCEPT,
_EXPORT, _EXPORT,
_INLINE, _INLINE,
_LEGACY,
_OBJECT, _OBJECT,
_PACKED, _PACKED,
_PASCAL, _PASCAL,
@ -226,9 +229,7 @@ type
_UNIMPLEMENTED, _UNIMPLEMENTED,
_IMPLEMENTATION, _IMPLEMENTATION,
_INITIALIZATION, _INITIALIZATION,
_RESOURCESTRING, _RESOURCESTRING
_LEGACY,
_SYSV
); );
const const
@ -321,7 +322,8 @@ const
(str:'' ;special:true ;keyword:m_none;op:NOTOKEN), (str:'' ;special:true ;keyword:m_none;op:NOTOKEN),
(str:'' ;special:true ;keyword:m_none;op:NOTOKEN), (str:'' ;special:true ;keyword:m_none;op:NOTOKEN),
(str:'' ;special:true ;keyword:m_none;op:NOTOKEN), (str:'' ;special:true ;keyword:m_none;op:NOTOKEN),
{ Normal words } { Normal words -- ATTENTION: These words must be sorted: }
{ first in length order, then in alphabetical order. }
(str:'C' ;special:false;keyword:m_none;op:NOTOKEN), (str:'C' ;special:false;keyword:m_none;op:NOTOKEN),
(str:'AS' ;special:false;keyword:m_class;op:_OP_AS), (str:'AS' ;special:false;keyword:m_class;op:_OP_AS),
(str:'AT' ;special:false;keyword:m_none;op:NOTOKEN), (str:'AT' ;special:false;keyword:m_none;op:NOTOKEN),
@ -360,6 +362,7 @@ const
(str:'NEAR' ;special:false;keyword:m_none;op:NOTOKEN), (str:'NEAR' ;special:false;keyword:m_none;op:NOTOKEN),
(str:'READ' ;special:false;keyword:m_none;op:NOTOKEN), (str:'READ' ;special:false;keyword:m_none;op:NOTOKEN),
(str:'SELF' ;special:false;keyword:m_none;op:NOTOKEN), {set inside methods only PM } (str:'SELF' ;special:false;keyword:m_none;op:NOTOKEN), {set inside methods only PM }
(str:'SYSV' ;special:false;keyword:m_none;op:NOTOKEN),
(str:'THEN' ;special:false;keyword:m_all;op:NOTOKEN), (str:'THEN' ;special:false;keyword:m_all;op:NOTOKEN),
(str:'TRUE' ;special:false;keyword:m_all;op:NOTOKEN), (str:'TRUE' ;special:false;keyword:m_all;op:NOTOKEN),
(str:'TYPE' ;special:false;keyword:m_all;op:NOTOKEN), (str:'TYPE' ;special:false;keyword:m_all;op:NOTOKEN),
@ -387,6 +390,7 @@ const
(str:'EXCEPT' ;special:false;keyword:m_class;op:NOTOKEN), (str:'EXCEPT' ;special:false;keyword:m_class;op:NOTOKEN),
(str:'EXPORT' ;special:false;keyword:m_none;op:NOTOKEN), (str:'EXPORT' ;special:false;keyword:m_none;op:NOTOKEN),
(str:'INLINE' ;special:false;keyword:m_none;op:NOTOKEN), (str:'INLINE' ;special:false;keyword:m_none;op:NOTOKEN),
(str:'LEGACY' ;special:false;keyword:m_none;op:NOTOKEN),
(str:'OBJECT' ;special:false;keyword:m_all;op:NOTOKEN), (str:'OBJECT' ;special:false;keyword:m_all;op:NOTOKEN),
(str:'PACKED' ;special:false;keyword:m_all;op:NOTOKEN), (str:'PACKED' ;special:false;keyword:m_all;op:NOTOKEN),
(str:'PASCAL' ;special:false;keyword:m_none;op:NOTOKEN), (str:'PASCAL' ;special:false;keyword:m_none;op:NOTOKEN),
@ -457,11 +461,10 @@ const
(str:'UNIMPLEMENTED' ;special:false;keyword:m_all;op:NOTOKEN), (str:'UNIMPLEMENTED' ;special:false;keyword:m_all;op:NOTOKEN),
(str:'IMPLEMENTATION';special:false;keyword:m_all;op:NOTOKEN), (str:'IMPLEMENTATION';special:false;keyword:m_all;op:NOTOKEN),
(str:'INITIALIZATION';special:false;keyword:m_initfinal;op:NOTOKEN), (str:'INITIALIZATION';special:false;keyword:m_initfinal;op:NOTOKEN),
(str:'RESOURCESTRING';special:false;keyword:m_class;op:NOTOKEN), (str:'RESOURCESTRING';special:false;keyword:m_class;op:NOTOKEN)
(str:'LEGACY' ;special:false;keyword:m_none;op:NOTOKEN),
(str:'SYSV' ;special:false;keyword:m_none;op:NOTOKEN)
); );
var var
tokeninfo:ptokenarray; tokeninfo:ptokenarray;
tokenidx:ptokenidx; tokenidx:ptokenidx;
@ -520,7 +523,10 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.33 2005-01-04 17:40:33 karoly Revision 1.34 2005-01-04 19:22:33 olle
* sorted in correctly new tokens added by Karoly
Revision 1.33 2005/01/04 17:40:33 karoly
+ sysv style syscalls added for MorphOS + sysv style syscalls added for MorphOS
Revision 1.32 2004/10/24 20:01:08 peter Revision 1.32 2004/10/24 20:01:08 peter