paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-13 10:59:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: test external class const

Browse Source 
git-svn-id: trunk@57953 -
This commit is contained in:
mattias 2018-05-18 08:04:09 +00:00
parent e1dcfde200
commit 167c4c911d
2 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/codetools/tests/testctpas2js.pas
View File

@ -53,7 +53,7 @@ type
published
procedure TestPas2js_ReadSettings;
procedure TestPas2js_FindDeclaration;
end;
end;
implementation

5
components/codetools/tests/testpascalparser.pas
View File

@ -456,6 +456,11 @@ begin
'program test1;',
'const NaN: double; external;',
'const nan: double; external name ''NaN'';',
'{$modeswitch externalclass}',
'type',
' TExtA = class external name ''ExtA''',
' const id;',
' end;',
'begin']);
ParseModule;
end;