@@ -3,6 +3,7 @@
33{-# LANGUAGE DeriveGeneric #-}
44{-# LANGUAGE FlexibleInstances #-}
55{-# LANGUAGE GeneralizedNewtypeDeriving #-}
6+{-# LANGUAGE KindSignatures #-}
67{-# LANGUAGE LambdaCase #-}
78{-# LANGUAGE MultiParamTypeClasses #-}
89{-# LANGUAGE OverloadedStrings #-}
@@ -316,6 +317,7 @@ instance FromJSON a => FromStream JSON a where
316317
317318class GoogleRequest a where
318319 type Rs a :: *
320+ type Ss a :: [Symbol]
319321
320322 requestClient :: a -> Client (Rs a)
321323