webidl: add Document/DocumentFragment/Node types

packages/webidl/src/webidldefs.pp

@@ -67,7 +67,10 @@ Type
     wibtUint32Array,
     wibtUint8ClampedArray,
     wibtFloat32Array,
-    wibtFloat64Array
+    wibtFloat64Array,
+    wibtDocument,
+    wibtDocumentFragment,
+    wibtNode
     );
   TWebIDLBaseTypes = set of TWebIDLBaseType;
 const
@@ -110,7 +113,10 @@ const
     'Uint32Array',
     'Uint8ClampedArray',
     'Float32Array',
-    'Float64Array');
+    'Float64Array',
+    'Document',
+    'DocumentFragment',
+    'Node');
 
 type
 

packages/webidl/src/webidltopas.pp

@@ -928,7 +928,10 @@ begin
     'Uint32Array',
     'Uint8ClampedArray',
     'Float32Array',
-    'Float64Array': Result:=GetPasClassName(aTypeName);
+    'Float64Array',
+    'Document',
+    'DocumentFragment',
+    'Node': Result:=GetPasClassName(aTypeName);
 
     'void': Result:=aTypeName;
   else