Nicolas Cannasse преди 18 години
родител
ревизия
c2bd37e597
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      genswf9.ml

+ 1 - 1
genswf9.ml

@@ -403,7 +403,7 @@ let rec setvar ctx (acc : write access) retval =
 		write ctx (A3InitProp id)
 	| VArray ->
 		let id_aset = lookup (A3MMultiNameLate ctx.gpublic) ctx.names in
-		write ctx (A3InitProp id_aset);
+		write ctx (A3SetProp id_aset);
 		ctx.infos.istack <- ctx.infos.istack - 1
 	| VScope n ->
 		write ctx (A3SetSlot n)