From 2f4f8d2878f78b41d08aebe97b90b53767fb03ed Mon Sep 17 00:00:00 2001
From: Spoike <acceptthis@users.sourceforge.net>
Date: Sat, 20 Jun 2015 14:19:17 +0000
Subject: [PATCH] array=0; should be an error.

git-svn-id: https://svn.code.sf.net/p/fteqw/code/trunk@4912 fc73d0e0-1445-4013-8a0c-d673dee63da5
---
 engine/qclib/qcc_pr_comp.c | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/engine/qclib/qcc_pr_comp.c b/engine/qclib/qcc_pr_comp.c
index 8ddacbbc1..0a7550762 100644
--- a/engine/qclib/qcc_pr_comp.c
+++ b/engine/qclib/qcc_pr_comp.c
@@ -7466,6 +7466,16 @@ QCC_sref_t QCC_StoreToRef(QCC_ref_t *dest, QCC_sref_t source, pbool readable, pb
 	{
 		switch(dest->type)
 		{
+		case REF_ARRAYHEAD:
+			QCC_PR_ParseWarning(ERR_PARSEERRORS, "left operand must be an l-value (add you mean %s[0]?)", QCC_GetSRefName(dest->base));
+			if (!preservedest)
+				QCC_PR_DiscardRef(dest);
+			break;
+		default:
+			QCC_PR_ParseWarning(ERR_PARSEERRORS, "left operand must be an l-value (unsupported reference type)", QCC_GetSRefName(dest->base));
+			if (!preservedest)
+				QCC_PR_DiscardRef(dest);
+			break;
 		case REF_GLOBAL:
 		case REF_ARRAY:
 			if (!dest->index.cast || dest->index.sym->constant)