(define-alias Session javax.jms.Session) (define-alias ActiveMQConnectionFactory org.apache.activemq.ActiveMQConnectionFactory) (define connFactory (ActiveMQConnectionFactory:new)) (define conn (connFactory:createConnection)) (define sess (conn:createSession #f Session:AUTO_ACKNOWLEDGE)) (define dest (sess:createQueue "SampleQueue")) (define cons (sess:createConsumer dest)) (conn:start) (define msg (cons:receive)) (display msg) (conn:close)