paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-24 09:19:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

pastojs: improved error message typeinfo

Browse Source 
git-svn-id: trunk@35875 -
This commit is contained in:
Mattias Gaertner 2017-04-21 13:46:48 +00:00
parent 3688141236
commit c52668a0ed
1 changed files with 3 additions and 1 deletions

4
packages/pastojs/src/fppas2js.pp
View File

@ -269,6 +269,7 @@ ToDos:
- asm: pas() - useful for overloads and protect an identifier from optimization
- source maps
- ifthen
- stdcall of methods: pass original 'this' as first parameter
Not in Version 1.0:
- write, writeln
@ -8837,7 +8838,8 @@ begin
RaiseNotSupported(ErrorEl,AContext,20170409195518,'cannot typeinfo itself');
end;
if El.Name='' then
RaiseNotSupported(El,AContext,20170412125911,'typeinfo of anonymous '+El.ElementTypeName);
DoError(20170421145257,nTypeXCannotBePublished,sTypeXCannotBePublished,
['typeinfo of anonymous '+El.ElementTypeName],ErrorEl);
C:=El.ClassType;
if C=TPasUnresolvedSymbolRef then