anchor.diff:       ;;todo: type declarations
        ,@body))
   ;;
  +
   (defparameter string.ctor
     (js-function (obj)
   	       (let ((str (if (stringp obj) obj (format nil "~A" obj))))
  
positive.code: ;;
  
  (defun clip-index (n)
    (if (eq n :NaN 0
        (let ((n (floor n)))
  	(if (< n 0) 0 n))))
  
  
negative.code: print(s2.length)
  print(s2.length = 555)
  print(s2.length)
  print(s2.substr("1",8))
  print(s2.substring (0, 100))
  .
  