engine/compiler.c

@@ -2640,6 +2640,8 @@ static sxi32 PH7_CompileVar(ph7_gen_state *pGen) {
 				rc = PH7_CompileExpr(&(*pGen), EXPR_FLAG_COMMA_STATEMENT, 0);
 				if(rc == SXERR_EMPTY) {
 					PH7_GenCompileError(&(*pGen), E_ERROR, pGen->pIn->nLine, "Variable '%z' is missing default value", &pName);
+				} else {
+					PH7_VmEmitInstr(pGen->pVm, nLine, PH7_OP_POP, 1, 0, 0, 0);
 				}
 			} else {
 				pGen->pIn += 2; /* Jump the dollar '$' sign and variable name */