anchor.diff:    (with-string-stream out
       (when import-universe?
         (transpiler-import-universe tr))
  -    (format out (+ "<?php~%"
  -                   "mb_internal_encoding ('UTF-8');~%"
  +    (format out (+ "mb_internal_encoding ('UTF-8');~%"
                      "if (get_magic_quotes_gpc ()) {~%"
                      "    $vars = array (&$_GET, &$_POST, &$_COOKIE, &$_REQUEST);~%"
                      "    while (list ($key, $val) = each ($vars)) {~%"
  
positive.code: ;;;;; tré - Copyright (c) 2008-2011 Sven Klose <pixel@copei.de>
  
  (defvar *php-goto?* t)
  
  
negative.code:                          (transpiler-sighten tr
                               (transpiler-compiled-inits tr))))
  			:files-to-update files-to-update
  			:print-obfuscations? print-obfuscations?)
          "?>")))
  