Support compile_string skip INITIAL

Author: huanghantao

Zend/zend_globals.h

@@ -94,6 +94,7 @@ struct _zend_compiler_globals {
 	struct _zend_ini_parser_param *ini_parser_param;
 
 	bool skip_shebang;
+	bool skip_initial;
 	bool increment_lineno;
 
 	bool variable_width_locale;   /* UTF-8, Shift-JIS, Big5, ISO 2022, EUC, etc */

Zend/zend_language_scanner.l

@@ -799,7 +799,11 @@ zend_op_array *compile_string(zend_string *source_string, const char *filename)
 	filename_str = zend_string_init(filename, strlen(filename), 0);
 	zend_prepare_string_for_scanning(&tmp, filename_str);
 	zend_string_release(filename_str);
-	BEGIN(ST_IN_SCRIPTING);
+	if (CG(skip_initial)) {
+		BEGIN(INITIAL);
+	} else {
+		BEGIN(ST_IN_SCRIPTING);
+	}
 	op_array = zend_compile(ZEND_EVAL_CODE);
 
 	zend_restore_lexical_state(&original_lex_state);