Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

webidl: parse enforcerange

mattias 3 years ago
parent
35cae0bd3d
commit
db6e1ef1cc
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      packages/webidl/src/webidlparser.pp

+ 1 - 1
packages/webidl/src/webidlparser.pp
View File 

@@ -1371,7 +1371,7 @@ begin
 
         ExpectToken(tkunsigned);
 
         ExpectToken(tkunsigned);
 
         ExpectToken(tklong);
 
         ExpectToken(tklong);
 
         Result:=TIDLTypeDefDefinition(AddDefinition(aParent,TIDLTypeDefDefinition,''));
 
         Result:=TIDLTypeDefDefinition(AddDefinition(aParent,TIDLTypeDefDefinition,''));
 
-        Result.TypeName:='unsinged long';
 
+        Result.TypeName:='unsigned long';
 
         Result.Attributes.Add(EnforceRange);
 
         Result.Attributes.Add(EnforceRange);
 
         end;
 
         end;
 
       LegacyDOMString:
 
       LegacyDOMString: