浏览代码

fix property encoding

Simon Krajewski 9 年之前
父节点
当前提交
843759b331
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      src/macro/interp.ml

+ 1 - 1
src/macro/interp.ml

@@ -4343,7 +4343,7 @@ and decode_field v =
 		| 1, [f] ->
 			FFun (decode_fun f)
 		| 2, [get;set; t; e] ->
-			FProp (decode_placed_name get VNull, decode_placed_name set VNull, opt decode_ctype t, opt decode_expr e)
+			FProp (decode_placed_name VNull get, decode_placed_name VNull set, opt decode_ctype t, opt decode_expr e)
 		| _ ->
 			raise Invalid_expr
 	in