- xml_listing_laps :: Int, -- Avoid clash with race's "laps" field.
- xml_earnings :: String, -- Should be an int, but they use commas.
- xml_status :: String }
- deriving (Eq, Show)
+ xml_listing_laps :: Int, -- ^ Avoid clash with race's \"laps\" field.
+ xml_earnings :: String, -- ^ Should be an 'Int', but can have commas.
+ xml_status :: Maybe String -- ^ They can be empty
+ }
+ deriving (Eq, GHC.Generic, Show)
+
+-- | For 'Generics.to_tuple'.
+--
+instance Generic AutoRacingScheduleListingRaceResultRaceResultListingXml
+