Source position: fpjson.schema.pascaltypes.pp line 282
public procedure TSchemaData.AddPropertiesToType(
aType: TPascalTypeData;
aSchema: TJsonSchema = Nil;
Recurse: Boolean = True
);