anchor.diff:  (define-js-macro %%usetf-href (val &rest x)
     `(%%usetf-aref ,val ,@x))
   
  -(define-js-macro make-string (&optional size)
  -  `(%transpiler-string ""))
  -
   (define-js-macro make-hash-table (&rest args)
     `("{"
       ,@(when args
  
positive.code: (defmacro define-js-binary (op repl-op)
    `(define-transpiler-binary *js-transpiler* ,op ,repl-op))
  
  (define-js-binary + "+")
  (define-js-binary - "-")
  (define-js-binary / "/")
  (define-js-binary * "*")
  (define-js-binary = "==")
  (define-js-binary < "<")
  (define-js-binary > ">")
  (define-js-binary >> ">>")
  (define-js-binary << "<<")
  (define-js-binary mod "%")
  (define-js-binary logxor "^")
  (define-js-binary eq "===")
  (define-js-binary bit-and "&")
  (define-js-binary bit-or "|")
  
  
negative.code: ;;;;; Transpiler: TRE to JavaScript
  ;;;;; Copyright (c) 2008-2009 Sven Klose <pixel@copei.de>
  ;;;;;
  ;;;;; Generating code
  
  ;;;; TRANSPILER-MACRO EXPANDER
  
  