瀏覽代碼

* V2 is default

git-svn-id: trunk@42790 -
michael 6 年之前
父節點
當前提交
9b261254ee
共有 1 個文件被更改,包括 1 次插入0 次删除
  1. 1 0
      packages/webidl/examples/parsewebidl.pas

+ 1 - 0
packages/webidl/examples/parsewebidl.pas

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