anchor.diff:        (when directives
           (iter (for directive in directives by #'cddr)
                 (for params in (cdr directives) by #'cddr)
  -              (when-let (handler (gethash directive *custom-print-handlers*))
  +              (when-let (handler (gethash directive *js-custom-print-handlers*))
  +                (format t "Directive ~S, handler ~S, function ~S, module ~S~%" directive
  +                        (print-handler-impl handler) (print-handler-name handler) (print-handler-module handler))
                   (let ((invocation (with-output-to-string (str)
                                       (when (print-handler-impl handler)
                                         (write-string *js-namespace* str)
  +                                      (write-string "." str))
  +                                    (when-let (module-name (print-handler-module handler))
  +                                      (write-string module-name str)
                                         (write-string "." str))
                                       (write-string (print-handler-name handler) str)
                                       (write-string "(" str)
  
positive.code:   (format out "~A = (function () {
  var module = { };" name)
    (write-namespace-helpers "module" out)
    (write-namespace-body "module" (namespace-templates (parse-template namespace)) out)
    (write-string "return module; })();
  " out))
  
  
negative.code: 
  ;;;; print
  
  (defstruct print-handler impl name module param-converter)
  
  (defparameter *js-custom-print-handlers* (make-hash-table))
  (defparameter *requirejs-custom-print-handlers* (make-hash-table))
  (defparameter *requirejs-deps* (make-hash-table :test 'equal))
  
  (defmethod register-print-handler ((backend (eql :javascript-backend)) directive &rest params)
    "Register DIRECTIVE handler for Javascript backend.
  