aboutsummaryrefslogtreecommitdiffstats
path: root/lib/G4fClient/Model.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/G4fClient/Model.hs')
-rw-r--r--lib/G4fClient/Model.hs21
1 files changed, 2 insertions, 19 deletions
diff --git a/lib/G4fClient/Model.hs b/lib/G4fClient/Model.hs
index 35baa85..e878672 100644
--- a/lib/G4fClient/Model.hs
+++ b/lib/G4fClient/Model.hs
@@ -612,31 +612,14 @@ mkCompletionTokenDetails completionTokenDetailsReasoningTokens completionTokenDe
-- | Content
-- Content
--
-data Content = Content
- {
- } deriving (P.Show, P.Eq, P.Typeable)
-
--- | FromJSON Content
-instance A.FromJSON Content where
- parseJSON = A.withObject "Content" $ \o ->
- pure Content
-
-
--- | ToJSON Content
-instance A.ToJSON Content where
- toJSON Content =
- _omitNulls
- [
- ]
+type Content = Text
-- | Construct a value of type 'Content' (by applying it's required fields, if any)
mkContent
:: Content
mkContent =
- Content
- {
- }
+ ""
-- ** ContentPart
-- | ContentPart