finals but polymod

Author: KoloInDaCrib

polymod/hscript/_internal/PolymodAbstractScriptClass.hx

@@ -117,6 +117,12 @@ abstract PolymodAbstractScriptClass(PolymodScriptClass) from PolymodScriptClass
 			case _:
 				if (this.findVar(name) != null)
 				{
+					var isFinal = this.findVar(name).isfinal;
+					if (isFinal && this._interp.variables.exists(name)) // The variable already exists and has a set value.
+					{
+						throw "Invalid access to field " + name;
+						return null;
+					}
 					this._interp.variables.set(name, value);
 					return value;
 				}

polymod/hscript/_internal/PolymodInterpEx.hx

@@ -231,6 +231,11 @@ class PolymodInterpEx extends Interp
 				var result = (e == null) ? null : expr(e);
 				locals.set(n, {r: result});
 				return null;
+			case EFinal(n, _, e): // Fix to ensure local variables are committed properly.
+				declared.push({n: n, old: locals.get(n)});
+				var result = (e == null) ? null : expr(e);
+				locals.set(n, {r: result, isfinal: true});
+				return null;
 			case EFunction(params, fexpr, name, _): // Fix to ensure callback functions catch thrown errors.
 				var capturedLocals = duplicate(locals);
 				var me = this;