diff --git a/src/cowboy/Cowboy.fs b/src/cowboy/Cowboy.fs index cd4d65c..e82c9ee 100644 --- a/src/cowboy/Cowboy.fs +++ b/src/cowboy/Cowboy.fs @@ -1,5 +1,5 @@ /// Fable bindings for the Cowboy HTTP server. -/// See: https://ninenines.eu/docs/en/cowboy/2.12/manual/cowboy/ +/// See: https://ninenines.eu/docs/en/cowboy/2.14/manual/cowboy/ module Fable.Beam.Cowboy.Cowboy open Fable.Core @@ -15,3 +15,11 @@ let startTls (name: obj) (transportOpts: obj) (protoOpts: obj) : obj = nativeOnl /// Stop a running listener. [] let stopListener (name: obj) : obj = nativeOnly + +/// Retrieve a listener's environment value. +[] +let getEnv (name: obj) (key: obj) : obj = nativeOnly + +/// Update a listener's environment value. +[] +let setEnv (name: obj) (key: obj) (value: obj) : obj = nativeOnly diff --git a/src/cowboy/CowboyRouter.fs b/src/cowboy/CowboyRouter.fs index 8625922..a6c697b 100644 --- a/src/cowboy/CowboyRouter.fs +++ b/src/cowboy/CowboyRouter.fs @@ -1,5 +1,5 @@ /// Fable bindings for Cowboy's cowboy_router module. -/// See: https://ninenines.eu/docs/en/cowboy/2.12/manual/cowboy_router/ +/// See: https://ninenines.eu/docs/en/cowboy/2.14/manual/cowboy_router/ module Fable.Beam.Cowboy.CowboyRouter open Fable.Core @@ -7,3 +7,11 @@ open Fable.Core /// Compile routing rules into a dispatch list. [] let compile (routes: obj) : obj = nativeOnly + +/// Route: {Path, Handler, InitialState}. +[] +let route (path: string) (handler: obj) (state: obj) : obj = nativeOnly + +/// Host rule: {HostMatch, Routes}. +[] +let hostRule (host: obj) (routes: obj list) : obj = nativeOnly