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

webidl: prefix enum types

Browse Source
This commit is contained in:
mattias 2022-07-18 18:11:53 +02:00
parent f8c49c4a1f
commit 20746a907d
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
packages/webidl/src/webidltopas.pp
View File

@ -1437,6 +1437,7 @@ begin
else else
begin begin
if (D is TIDLTypeDefDefinition) if (D is TIDLTypeDefDefinition)
or (D is TIDLEnumDefinition)
or ((D Is TIDLFunctionDefinition) and (foCallBack in TIDLFunctionDefinition(D).Options)) then or ((D Is TIDLFunctionDefinition) and (foCallBack in TIDLFunctionDefinition(D).Options)) then
begin begin
CN:=TypePrefix+CN; CN:=TypePrefix+CN;