浏览代码

minor fix

Nicolas Cannasse 15 年之前
父节点
当前提交
92d045a491
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      genas3.ml

+ 2 - 2
genas3.ml

@@ -706,7 +706,7 @@ and gen_value ctx e =
 		if ctx.in_static then
 			print ctx "function() : %s " t
 		else
-			print ctx "function($this:%s) : %s " (snd ctx.path) t;
+			print ctx "(function($this:%s) : %s " (snd ctx.path) t;
 		let b = if block then begin
 			spr ctx "{";
 			let b = open_block ctx in
@@ -730,7 +730,7 @@ and gen_value ctx e =
 			if ctx.in_static then
 				print ctx "()"
 			else
-				print ctx "(%s)" (this ctx)
+				print ctx "(%s))" (this ctx)
 		)
 	in
 	match e.eexpr with