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

webidl: fixed typos

Browse Source
This commit is contained in:
mattias 2022-06-18 14:25:37 +02:00
parent b1981d646e
commit bf25b32cb2
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
utils/pas2js/webidl2pas.pp
View File

@ -104,7 +104,6 @@ var
I : Integer;
begin
Terminate;
// quick check parameters
ErrorMsg:=CheckOptions('hi:o:u:m:n:vx:t:ced::pw:', ['help','input:','output:','unitname:','include:','implementation:','verbose','extra:','typealiases:','constexternal','expandunionargs','dicttoclass::','optionsinheader','webidlversion:']);
@ -133,9 +132,9 @@ begin
else
Raise EConvertError.CreateFmt('Invalid webidl version: %s',[A]);
end;
if hasoption('n','include') then
if HasOption('n','include') then
FWebIDLToPas.IncludeInterfaceCode.LoadFromFile(GetOptionValue('n','include'));
if hasoption('m','implementation') then
if HasOption('m','implementation') then
FWebIDLToPas.IncludeImplementationCode.LoadFromFile(GetOptionValue('m','implementation'));
FWebIDLToPas.ExtraUnits:=GetOPtionValue('x','extra');
A:=GetOptionValue('t','typealiases');