Initial coalesce operator implementation

1 files changed, 27 insertions, 0 deletions

diff --git a/Zend/zend_compile.c b/Zend/zend_compile.c
index 5beacab0b6..5d3d7727e1 100644
--- a/Zend/zend_compile.c
+++ b/Zend/zend_compile.c
@@ -6917,6 +6917,30 @@ void zend_compile_conditional(znode *result, zend_ast *ast TSRMLS_DC) /* {{{ */
 }
 /* }}} */
 
+void zend_compile_coalesce(znode *result, zend_ast *ast TSRMLS_DC) /* {{{ */
+{
+	zend_ast *expr_ast = ast->child[0];
+	zend_ast *default_ast = ast->child[1];
+
+	znode expr_node, default_node;
+	zend_op *opline;
+	uint32_t opnum;
+
+	zend_compile_var(&expr_node, expr_ast, BP_VAR_IS TSRMLS_CC);
+
+	opnum = get_next_op_number(CG(active_op_array));
+	zend_emit_op(result, ZEND_COALESCE, &expr_node, NULL TSRMLS_CC);
+
+	zend_compile_expr(&default_node, default_ast TSRMLS_CC);
+
+	opline = zend_emit_op(NULL, ZEND_QM_ASSIGN, &default_node, NULL TSRMLS_CC);
+	SET_NODE(opline->result, result);
+
+	opline = &CG(active_op_array)->opcodes[opnum];
+	opline->op2.opline_num = get_next_op_number(CG(active_op_array));
+}
+/* }}} */
+
 void zend_compile_print(znode *result, zend_ast *ast TSRMLS_DC) /* {{{ */
 {
 	zend_ast *expr_ast = ast->child[0];
@@ -7754,6 +7778,9 @@ void zend_compile_expr(znode *result, zend_ast *ast TSRMLS_DC) /* {{{ */
 		case ZEND_AST_CONDITIONAL:
 			zend_compile_conditional(result, ast TSRMLS_CC);
 			return;
+		case ZEND_AST_COALESCE:
+			zend_compile_coalesce(result, ast TSRMLS_CC);
+			return;
 		case ZEND_AST_PRINT:
 			zend_compile_print(result, ast TSRMLS_CC);
 			return;