stomp-subscribe ( destination -- frame )

Vocabulary

stomp

Inputs

destination

an object

Outputs

frame

an object

Definition

USING: assocs kernel math.parser namespaces ;

IN: stomp

:: stomp-subscribe ( destination -- frame )
    "SUBSCRIBE" <frame> destination stomp-subscriptions get
    [ drop stomp-subscription# counter number>string ] cache
    :> id id "id" set-header
    destination "destination" set-header
    stomp-ack-mode get "auto" or "ack" set-header ;