Fix unnecessary use of BLOCK macro

diff --git a/parser.c b/parser.c
index 2653d92650801886787ec330bafc5f836b442be2..f0650184d501145b63e4f69191af6ffc64dfa0e1 100644 (file)
--- a/parser.c
+++ b/parser.c
@@ -398,7 +398,7 @@ static block gen_binop(block a, block b, int op) {
 }
 
 static block gen_format(block a, jv fmt) {
-  return BLOCK(a, gen_call("format", BLOCK(gen_lambda(gen_const(fmt)))));
+  return BLOCK(a, gen_call("format", gen_lambda(gen_const(fmt))));
 }
 
 static block gen_definedor_assign(block object, block val) {

diff --git a/parser.y b/parser.y
index 6633b727eaf15c2b156de8fb33ee76687a7f3abe..d57e5c8aa85e544f0eab8ecfce1d245261beb563 100644 (file)
--- a/parser.y
+++ b/parser.y
@@ -261,7 +261,7 @@ static block gen_binop(block a, block b, int op) {
 }
 
 static block gen_format(block a, jv fmt) {
-  return BLOCK(a, gen_call("format", BLOCK(gen_lambda(gen_const(fmt)))));
+  return BLOCK(a, gen_call("format", gen_lambda(gen_const(fmt))));
 }
 
 static block gen_definedor_assign(block object, block val) {