fourmolu-0.7.0.1: fixity-tests/test-0-with-fixity-info-expected.hs

instance A.ToJSON UpdateTable where
  toJSON a =
    A.object $
      "TableName" .= updateTableName a
        : "ProvisionedThroughput" .= updateProvisionedThroughput a
        : case updateGlobalSecondaryIndexUpdates a of
          [] -> []
          l -> ["GlobalSecondaryIndexUpdates" .= l]