gateway-identify-json ( -- json )

Vocabulary

discord

Inputs

None

Outputs

json

an object

Definition

USING: accessors formatting json kernel namespaces ;

IN: discord

: gateway-identify-json ( -- json )
    \ discord-bot get [ config>> ] ?call
    [ [ token>> ] ?call "0" or ]
    [ [ intents>> ] ?call 3276541 or ] bi
    "{\n        \"op\": 2,\n        \"d\": {\n            \"token\": \"%s\",\n..."
    sprintf json> >json ;