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

* V2 is default

Browse Source 
git-svn-id: trunk@42790 -
This commit is contained in:
michael 2019-08-24 09:53:23 +00:00
parent 69385a7eb0
commit 9b261254ee
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/examples/parsewebidl.pas
View File

@ -44,6 +44,7 @@ begin
try try
S:=TWebIDLScanner.Create(F); S:=TWebIDLScanner.Create(F);
P:=TWebIDLParser.Create(FContext,S); P:=TWebIDLParser.Create(FContext,S);
P.Version:=v2;
P.Parse; P.Parse;
Writeln('// Contents of '+AFileName); Writeln('// Contents of '+AFileName);
For I:=0 to FConText.Definitions.Count-1 do For I:=0 to FConText.Definitions.Count-1 do