PasteRack.org
Paste # 79279
2015-07-29 17:28:42

Fork as a new paste.

Paste viewed 249 times.


Embed:

macro

  1. #lang racket
  2.  
  3. (define-syntax-rule
  4.     (define-scene
  5.         name
  6.         #:title title
  7.         #:description description
  8.         .
  9.         links)
  10.     (hash-set!
  11.         (hash-ref world 'scenes)
  12.         name
  13.         (make-hasheq
  14.             (list
  15.                 (cons 'title title)
  16.                 (cons 'description description)
  17.                 (cons 'links (list . links))))))

=>