Commit 803ab188 authored by Juergen Nickelsen's avatar Juergen Nickelsen
Browse files

fix: let/let* with empty body is not an error, just nil

parent 73b821ce

Builtin.pm

+2 −2
Original line number Diff line number Diff line
@@ -307,7 +307,7 @@ sub Blet_star { 


        #debug("Blet_star %s", $defs);

        my $result = eval {

                my $result;

                my $result = $Nil;

                while (consp($defs)) {

                        my $def;

                        ($def, $defs) = cxr($defs);
@@ -350,7 +350,7 @@ sub Blet { 


        #debug("Blet enter %s", $defs);

        my $result = eval {

                my $result;

                my $result = $Nil;

                while (consp($defs)) {

                        my $def;

                        ($def, $defs) = cxr($defs);