(begin-for-syntax (require-extension srfi-13 data-structures))

(define-syntax call
  (ir-macro-transformer
    (lambda (e i c)
      (string-append
        "["
        (string-concatenate 
          (map (o symbol->string strip-syntax) (cdr e)))
        "]"))))