roc/examples/python-interop/platform/main.roc

12 lines
353 B
Text

platform "python-interop"
requires {} { main : arg -> ret | arg has Decoding, ret has Encoding }
exposes []
packages {}
imports [Json]
provides [mainForHost]
mainForHost : List U8 -> List U8
mainForHost = \json ->
when Decode.fromBytes json Json.json is
Ok arg -> Encode.toBytes (main arg) Json.json
Err _ -> []