add moderations endpoint

Author: leafo

openai/init.lua

@@ -233,6 +233,18 @@ do
       end
       return self:_request("POST", "/embeddings", payload)
     end,
+    moderation = function(self, input, opts)
+      assert(input, "input must be provided")
+      local payload = {
+        input = input
+      }
+      if opts then
+        for k, v in pairs(opts) do
+          payload[k] = v
+        end
+      end
+      return self:_request("POST", "/moderations", payload)
+    end,
     _request = function(self, method, path, payload, more_headers, stream_fn)
       assert(path, "missing path")
       assert(method, "missing method")

openai/init.moon

@@ -234,7 +234,6 @@ class OpenAI
 
     @_request "POST", "/completions", payload
 
-
   -- Call /embeddings to generate an embedding for the given text
   -- input: A string or array table of strings to generate embeddings for
   -- opts: additional parameters as described in https://platform.openai.com/docs/api-reference/embeddings
@@ -252,6 +251,19 @@ class OpenAI
 
     @_request "POST", "/embeddings", payload
 
+  moderation: (input, opts) =>
+    assert input, "input must be provided"
+
+    payload = {
+      :input
+    }
+
+    if opts
+      for k,v in pairs opts
+        payload[k] = v
+
+    @_request "POST", "/moderations", payload
+
   _request: (method, path, payload, more_headers, stream_fn) =>
     assert path, "missing path"
     assert method, "missing method"