From e57e545e58864d621ed9fca873d5da750c08a4b0 Mon Sep 17 00:00:00 2001
From: messju <messju@localhost>
Date: Thu, 27 Jan 2005 08:51:21 +0000
Subject: [PATCH] added a more robust implementation when removing of the
 trailing '<?php '-token after toke_get_all() . this is also a workaround for
 http://bugs.php.net/bug.php?id=29761

---
 libs/internals/core.write_compiled_include.php | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/libs/internals/core.write_compiled_include.php b/libs/internals/core.write_compiled_include.php
index d17bee11..5e0b2e0d 100644
--- a/libs/internals/core.write_compiled_include.php
+++ b/libs/internals/core.write_compiled_include.php
@@ -43,7 +43,19 @@ function smarty_core_write_compiled_include($params, &$smarty)
         if ($this_varname == '_smarty') {
             /* rename $this to $_smarty in the sourcecode */
             $tokens = token_get_all('<?php ' . $_match[4]);
-            array_shift($tokens); /* remove the opening <.?.php */
+
+            /* remove trailing <?php */
+            $open_tag = '';
+            while ($tokens) {
+                $token = array_shift($tokens);
+                if (is_array($token)) {
+                    $open_tag .= $token[1];
+                } else {
+                    $open_tag .= $token;
+                }
+                if ($open_tag == '<?php ') break;
+            }
+
             for ($i=0, $count = count($tokens); $i < $count; $i++) {
                 if (is_array($tokens[$i])) {
                     if ($tokens[$i][0] == T_VARIABLE && $tokens[$i][1] == '$this') {