sub value {
    my ($self) = @_;
    return @{[$self->{first},
              $self->{rest} ? $self->{rest}->value : ()]};
}