Fix macros when and unless
Both support implicit progn, not just one expression.
This commit is contained in:
parent
5c37830ef4
commit
b930ed8eba
1 changed files with 2 additions and 2 deletions
|
@ -720,7 +720,7 @@ sub macro_when {
|
|||
my $ts = shift;
|
||||
|
||||
my $condition = parser_expr($ts);
|
||||
my $work = parser_expr($ts);
|
||||
my $work = macro_progn($ts);
|
||||
|
||||
return sub {
|
||||
my $ctx = shift;
|
||||
|
@ -739,7 +739,7 @@ sub macro_unless {
|
|||
my $ts = shift;
|
||||
|
||||
my $condition = parser_expr($ts);
|
||||
my $work = parser_expr($ts);
|
||||
my $work = macro_progn($ts);
|
||||
|
||||
return sub {
|
||||
my $ctx = shift;
|
||||
|
|
Loading…
Reference in a new issue