roc/examples/python-interop/platform/main.roc
2023-05-24 21:30:35 -04:00

12 lines
360 B
Text

platform "python-interop"
requires {} { main : arg -> ret | arg has Decoding, ret implements 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 _ -> []