Project

General

Profile

0001-remove-NEW_LAMBDA-hack.patch

mame (Yusuke Endoh), 10/18/2011 01:21 AM

View differences:

node.h
362 362
#define NEW_UNTIL(c,b,n) NEW_NODE(NODE_UNTIL,c,b,n)
363 363
#define NEW_FOR(v,i,b) NEW_NODE(NODE_FOR,v,b,i)
364 364
#define NEW_ITER(a,b) NEW_NODE(NODE_ITER,0,NEW_SCOPE(a,b),0)
365
#define NEW_LAMBDA(a) NEW_NODE(NODE_LAMBDA,a,0,0)
365
#define NEW_LAMBDA(a,b) NEW_NODE(NODE_LAMBDA,0,NEW_SCOPE(a,b),0)
366 366
#define NEW_BREAK(s) NEW_NODE(NODE_BREAK,s,0,0)
367 367
#define NEW_NEXT(s) NEW_NODE(NODE_NEXT,s,0,0)
368 368
#define NEW_REDO() NEW_NODE(NODE_REDO,0,0,0)
parse.y
3529 3529
		    {
3530 3530
			lpar_beg = $<num>2;
3531 3531
		    /*%%%*/
3532
			$$ = $3;
3533
			$$->nd_body = NEW_SCOPE($3->nd_head, $4);
3532
			$$ = NEW_LAMBDA($3, $4);
3534 3533
		    /*%
3535 3534
			$$ = dispatch2(lambda, $3, $4);
3536 3535
		    %*/
......
3541 3540
f_larglist	: '(' f_args opt_bv_decl rparen
3542 3541
		    {
3543 3542
		    /*%%%*/
3544
			$$ = NEW_LAMBDA($2);
3543
			$$ = $2;
3545 3544
		    /*%
3546 3545
			$$ = dispatch1(paren, $2);
3547 3546
		    %*/
......
3549 3548
		| f_args
3550 3549
		    {
3551 3550
		    /*%%%*/
3552
			$$ = NEW_LAMBDA($1);
3551
			$$ = $1;
3553 3552
		    /*%
3554 3553
			$$ = $1;
3555 3554
		    %*/
3556
-