Commit 9c799bda authored by Camil Staps's avatar Camil Staps 🐧

Add warnings field to Response (see cloogle-org#226)

parent 5ffa74d1
......@@ -41,6 +41,7 @@ from Text.GenJSON import generic JSONEncode, generic JSONDecode, :: JSONNode
, more_available :: Maybe Int //* How many more results are available in next pages
, suggestions :: Maybe [(Request, Int)]
//* Suggestions for related requests and how many results they have
, warnings :: Maybe [String] //* Human-readable warnings
}
/**
......
......@@ -131,6 +131,7 @@ where
, data = []
, more_available = Nothing
, suggestions = Nothing
, warnings = Nothing
}
instance toString Request where toString r = toString $ toJSON r
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment