Loading Builtin.pm +2 −2 Original line number Diff line number Diff line Loading @@ -324,7 +324,7 @@ sub Blet_star { #debug("Blet_star %s", $defs); new_environment(); my $result = eval { my $result; my $result = $Nil; while (consp($defs)) { my $def; ($def, $defs) = cxr($defs); Loading Loading @@ -367,7 +367,7 @@ sub Blet { #debug("Blet enter %s", $defs); new_environment(); my $result = eval { my $result; my $result = $Nil; while (consp($defs)) { my $def; ($def, $defs) = cxr($defs); Loading Loading
Builtin.pm +2 −2 Original line number Diff line number Diff line Loading @@ -324,7 +324,7 @@ sub Blet_star { #debug("Blet_star %s", $defs); new_environment(); my $result = eval { my $result; my $result = $Nil; while (consp($defs)) { my $def; ($def, $defs) = cxr($defs); Loading Loading @@ -367,7 +367,7 @@ sub Blet { #debug("Blet enter %s", $defs); new_environment(); my $result = eval { my $result; my $result = $Nil; while (consp($defs)) { my $def; ($def, $defs) = cxr($defs); Loading