HEX
Server: Microsoft-IIS/8.5
System: Windows NT YDAWBH120 6.3 build 9600 (Windows Server 2012 R2 Standard Edition) AMD64
User: tentjecom_web (0)
PHP: 7.4.14
Disabled: NONE
Upload Files
File: D:/HostingSpaces/debout/debout.nl/vendor/scrivo/highlight.php/test/markup/reasonml/functions.txt
/* This is a simple function */
let greet = (name) => "Hello World";

let body = `Plain("uploaded " ++ cacheServiceConfig.desc ++ "configuration data into cache on S3");

let getCacheConfigByEnv =
    (
      environment: environment,
      cacheServiceConfig: Js.Dict.t(cachingServiceConfig)
    ) =>
  switch (cacheServiceConfig) {
  | Some(config) => config
  | None =>
    raise(InvalidEnvironment("Caching Service Coinfiguration is missing"))
  };

let readCacheServiceConfigAndDecode = (configJson) =>
  switch (configJson |> Js.Json.decodeObject) {
  | None => raise(Json.Decode.DecodeError("Invalid Cache Config"))
  | Some(data) =>
    data |> Js.Dict.map((. json) => CachingServiceConfig.decode(json))
  };