anchor.diff:      return c;
     }
   })();")
  +
  +
  +(console.log (concat "\n\n"  (+ passes fails) " total tests, "
  +                     passes " passed, " fails " failed"))
positive.code: #!/usr/bin/env sibilant -x
  
  (defvar sibilant (require "../lib/sibilant")
          sys      (require 'sys))
  
  (console.log (concat "Testing " (sibilant.version-string)))
  
  
negative.code:   (send string trim))
  
  (defun assert-equal (expected actual &optional message)
    (sys.print (if (= expected actual) (progn (incr passes) ".")
                 (progn (incr fails)
                        (concat "F\n\n" (if message (concat message "\n\n") "") "expected "expected 
                                "\n\nbut got " actual "\n\n")))))
  
  (defun assert-translation (sibilant-code js-code)
    (assert-equal (trim js-code)
  