Преглед на файлове

[hxb] fix anon field reading

Rudy Ges преди 2 години
родител
ревизия
10a237d322
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      src/compiler/hxb/hxbReader.ml

+ 1 - 1
src/compiler/hxb/hxbReader.ml

@@ -1284,7 +1284,7 @@ class hxb_reader
 			let an = anons.(i) in
 			let read_fields () =
 				let fields = self#read_list (fun () -> self#read_class_field' m) in
-				List.iter (fun cf -> ignore(PMap.add cf.cf_name cf an.a_fields)) fields
+				List.iter (fun cf -> an.a_fields <- PMap.add cf.cf_name cf an.a_fields;) fields;
 			in
 
 			begin match self#read_u8 with